 | |  |  |
SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100);
DRAWTEXTREL(12,5,'量能饱和度：'+NUMTOSTRN(SAT,0)),LINETHICK3,Color8000FF;
AA10:MA(CLOSE,8),color0000FF;
AA12:MA(CLOSE,12),color0000FF;
BB10:=((ATAN((AA10-REF(AA10,1)))*3.1416)*10);
BB12:=((ATAN((AA12-REF(AA12,1)))*3.1416)*10);
MA13:=MA(CLOSE,13);
FILLRGN((((AA12<=AA10)AND(BB12>=1))AND(BB10>=1)),AA10,AA12),Color0098FF;
FILLRGN((((AA12>=AA10)AND(BB10<=1))AND(BB10<=1)),AA10,AA12),color00FF00;
x1:=(C+L+H)/3;
bb13:=atan(ema(x1,13)-ref(ema(x1,13),1))*3.1416*10;
ema8:=ema(c,8);
DRAWTEXT(filter(bb13>1andema(x1,13)>ref(ema(x1,8),1),10),
ema8,'∠45上升'),colorwhite;
压力:MA(REF(HHV(C,30),1),2),Color9DFFFF;
支撑:MA(REF(LLV(C,30),1),2),ColorABFF46;
AA1:=AMOUNT/V;
BB1:=L<AA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD1:=L<MA(C,5)*0.921;
EE1:=V<MA(V,5)*1.5;
FF1:=BB1ANDCC1ANDDD1ANDEE1;
DRAWTEXT(ff1,(LOW*0.99),'老鼠仓'),Color4080FF;
A51:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);
黑马线:=EMA(A51,5);
A54:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;
趋势线:=(MA(3*SMA(A54,6,1)-2*SMA(SMA(A54,5,1),5,1),2));
DRAWTEXT(CROSS(趋势线,0)AND黑马线<40,(HIGH*0.94),'▲'),COLORYELLOW,align;
DRAWTEXT(CROSS(趋势线,0)AND黑马线<40,(HIGH*0.92),'大黑马'),COLORYELLOW;
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE-LC),0),3,1)/SMA(ABS((CLOSE-LC)),3,1))*100);
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
DRAWTEXT(CROSS(FF,MA15),(LOW*0.99),'底背离'),ColorA6E500;
DRAWTEXT(CROSS(88,RSI),(HIGH*1.02),'顶背离'),Color1880FF;
VAR2:=LLV(LOW,27);
VAR3:=HHV(HIGH,34);
VAR4:=EMA((CLOSE-Var2)/(Var3-Var2)*4,4)*25;
注意买:=IF((Var4<10),80,100);
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
超跌:=IF(J<0,10,0);
BDDD:=LLV(J,2)=LLV(J,8);
买入:=IF(CROSS(J,REF(J+0.01,1))ANDBDDDANDJ<20,30,0);
DRAWTEXT(买入AND注意买=100AND超跌=0,low,'短线'),Color8000FF;
MTM:=C-REF(C,1);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
买:=IF(LLV(DX,2)=LLV(DX,7)ANDCOUNT(DX<0,2)ANDCROSS(DX,MA(DX,2)),1,0);
DRAWTEXT(filter(买=1,5),LOW-0.03,'拉升'),ColorFFDE00;
STICKLINE(CLOSE>OPEN,OPEN,LOW,0.5,0),COLOR0000FF;
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.5,0),COLOR0000FF;
STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0.5,0),COLOR00FF00;
STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0.5,0),COLOR00FF00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,7,0),COLORff7700;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,6,0),COLORff9900;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,5,0),COLORffbb00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,4,0),COLORffcc00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3,0),COLORffdd00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2,0),COLORffee00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1,0),COLORffFF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0),COLOR000055;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0),COLOR000066;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0),COLOR000077;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0),COLOR000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),COLOR0000bb;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0),COLOR0000dd;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0),COLOR0000ff;
var9Q:=c=hhv(c,4)and(ref(c,1)>=ref(c,2)orref(c,1)>=ref(c,3))orref(c,1)=hhv(c,4)andclose>=ref(c,2)orref(c,2)=hhv(c,4)andref(c,3)=llv(c,4)andc>=ref(c,1)orref(c,3)=hhv(c,4)andc>=ref(c,1)andc>=ref(c,2);
stickline(var9Q,c,(o+c)/2,7,0),color000055;
stickline(var9Q,c,(o+c)/2,6,0),color000066;
stickline(var9Q,c,(o+c)/2,5,0),color000077;
stickline(var9Q,c,(o+c)/2,4,0),color000099;
stickline(var9Q,c,(o+c)/2,3,0),color0000bb;
stickline(var9Q,c,(o+c)/2,2,0),color0000dd;
stickline(var9Q,c,(o+c)/2,1,0),color0000ff;
varaQ:=c=hhv(c,4)andref(c,1)=llv(c,4);
stickline(varaQ,c,(o+c)/2,7,0),colorff11ff;
stickline(varaQ,c,(o+c)/2,6,0),colorff33ff;
stickline(varaQ,c,(o+c)/2,5,0),colorff55ff;
stickline(varaQ,c,(o+c)/2,4,0),colorff77ff;
stickline(varaQ,c,(o+c)/2,3,0),colorff99ff;
stickline(varaQ,c,(o+c)/2,2,0),colorffbbff;
stickline(varaQ,c,(o+c)/2,1,0),colorffddff;
varbQ:=c=llv(c,4)and(ref(c,1)<ref(c,2)orref(c,1)<ref(c,3))orref(c,1)=llv(c,4)andc<ref(c,2)orref(c,2)=llv(c,4)andref(c,1)<>hhv(c,4)andc<ref(c,1)orref(c,3)=llv(c,4)andc<ref(c,1)andc<ref(c,2);
stickline(varbQ,c,(o+c)/2,7,0),color333333;
stickline(varbQ,c,(o+c)/2,6,0),color555555;
stickline(varbQ,c,(o+c)/2,5,0),color777777;
stickline(varbQ,c,(o+c)/2,4,0),color999999;
stickline(varbQ,c,(o+c)/2,3,0),colorbbbbbb;
stickline(varbQ,c,(o+c)/2,2,0),colordddddd;
stickline(varbQ,c,(o+c)/2,1,0),colorffffff;
varcQ:=ref(c,1)=llv(c,4)andc>=ref(c,2)orref(c,2)=llv(c,4)andref(c,1)<=ref(c,3)andref(c,2)<ref(c,4)andc>=ref(c,1);
stickline(varcQ,o,(o+c)/2,7,0),color003300;
stickline(varcQ,o,(o+c)/2,6,0),color005500;
stickline(varcQ,o,(o+c)/2,5,0),color007700;
stickline(varcQ,o,(o+c)/2,4,0),color009900;
stickline(varcQ,o,(o+c)/2,3,0),color00bb00;
stickline(varcQ,o,(o+c)/2,2,0),color00dd00;
stickline(varcQ,o,(o+c)/2,1,0),color00ff00;
vardQ:=ref(c,1)=hhv(c,4)andc<ref(c,2)or(ref(c,2)=hhv(c,4)andref(c,1)>ref(c,3)orref(c,3)=hhv(c,4)andref(c,1)>ref(c,2))andref(c,2)>=ref(c,4)andc<ref(c,1);
stickline(vardQ,o,(o+c)/2,7,0),colorff1100;
stickline(vardQ,o,(o+c)/2,6,0),colorff3300;
stickline(vardQ,o,(o+c)/2,5,0),colorff5500;
stickline(vardQ,o,(o+c)/2,4,0),colorff7700;
stickline(vardQ,o,(o+c)/2,3,0),colorff9900;
stickline(vardQ,o,(o+c)/2,2,0),colorffbb00;
stickline(vardQ,o,(o+c)/2,1,0),colorffdd00;
STICKLINE(C>=O,C,O,7,0),COLOR0000AA;
STICKLINE(C>=O,C,O,6,0),COLOR0000bb;
STICKLINE(C>=O,C,O,5,0),COLOR0000cc;
STICKLINE(C>=O,C,O,4,0),COLOR0000DD;
STICKLINE(C>=O,C,O,3,0),COLOR0000ee;
STICKLINE(C>=O,C,O,2,0),COLOR0000FF;
STICKLINE(C>=O,C,O,1,0),COLOR0000ff;
STICKLINE(C>=O,H,L,0,0),COLORRED;
STICKLINE(C<=O,C,O,7,0),Coloraaaa00;
STICKLINE(C<=O,C,O,6,0),Colorbbbb00;
STICKLINE(C<=O,C,O,5,0),Colorcccc00;
STICKLINE(C<=O,C,O,4,0),Colordddd00;
STICKLINE(C<=O,C,O,3,0),Coloreeee00;
STICKLINE(C<=O,C,O,2,0),COLORffff00;
STICKLINE(C<=O,C,O,1,0),Colorffff00;
STICKLINE(C<=O,H,L,0,0),COLORffff00;
STICKLINE(c/ref(c,1)>1.05,(c+o)/2,c,7,0),color00AAAA;
STICKLINE(c/ref(c,1)>1.05,(c+o)/2,c,5,0),color00CCCC;
STICKLINE(c/ref(c,1)>1.05,(c+o)/2,c,3,0),color00EEEE;
STICKLINE(c/ref(c,1)>1.05,(c+o)/2,c,1,0),coloryellow;//当涨幅大于3--5％，要主图K线的实体的一半变为另一色。
stickline(varbQ,c,(o+c)/2,7,0),color333333;
stickline(varbQ,c,(o+c)/2,6,0),color555555;
stickline(varbQ,c,(o+c)/2,5,0),color777777;
stickline(varbQ,c,(o+c)/2,4,0),color999999;
stickline(varbQ,c,(o+c)/2,3,0),colorbbbbbb;
stickline(varbQ,c,(o+c)/2,2,0),colordddddd;
stickline(varbQ,c,(o+c)/2,1,0),colorffffff;
SS:=30;
HhC:=HHV(h,SS);
LLc:=LLV(L,SS);
AA:PARTLINE(BARPOS>=SYSPARAM(1)-SS,hHC[SYSPARAM(1)]),COLORGREEN;{1}
DRAWNUMBER(BARPOS=SYSPARAM(1)-SS,hHC[SYSPARAM(1)],hHC[SYSPARAM(1)],2),COLORFF88CC,PXUP25;
BB:PARTLINE(BARPOS>=SYSPARAM(1)-SS,(hHC[SYSPARAM(1)]*3+LLc[SYSPARAM(1)])/4),COLORYELLOW,POINTDOT;{2}
CC:PARTLINE(BARPOS>=SYSPARAM(1)-SS,(hHC[SYSPARAM(1)]+LLc[SYSPARAM(1)])/2),COLORWHITE;{3}
DRAWNUMBER(BARPOS=SYSPARAM(1)-SS,(hHC[SYSPARAM(1)]+LLc[SYSPARAM(1)])/2,(hHC[SYSPARAM(1)]+LLc[SYSPARAM(1)])/2,2),COLORFF88CC,PXUP25;
DD:PARTLINE(BARPOS>=SYSPARAM(1)-SS,(hHC[SYSPARAM(1)]+LLc[SYSPARAM(1)]*3)/4),COLORYELLOW,POINTDOT;{4}
EE:PARTLINE(BARPOS>=SYSPARAM(1)-SS,LLc[SYSPARAM(1)]),COLORRED;{5}
DRAWNUMBER(BARPOS=SYSPARAM(1)-SS,LLc[SYSPARAM(1)],LLc[SYSPARAM(1)],2),COLORFF88CC,PXUP25;
| |  | |  |
|
