{涨停高量单阳F副图源码如下}
VVOL:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,VVOL,0,-1,-1),COLOR00C0C0;
VOLUME:VOL,VOLSTICK;
AA:=VOL>REF(V,1)*1.9;
AA1:=VOL<REF(LLV(VOL,13),1);
AA2:=VOL<REF(LLV(VOL,55),1);
STICKLINE(AA,0,V,1,0),COLORYELLOW;
STICKLINE(AA1,0,V,1,0),COLORGREEN;
STICKLINE(AA2,0,V,1,0),COLORMAGENTA;
ABC1:=COUNT(V>REF(V,1)*1.9,4)=1;
ABC2:=COUNT(V<REF(V,1) AND L>MIN(L,4) AND L>REF(L,1),3)=3 ;
ABC3:=ABC1 AND ABC2;
STICKLINE(ABC3,0,V,1,0),COLORRED;
MV5:MA(V,100);
MV10:MA(V,100);
MV40:MA(V,100);
DRAWICON(CROSS( MV5, MV10),L*1.002,23);
{涨停高量单阳主图源码如下}
AB:=EMA(((2*C+H+L)/4-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100,8);
BA:=EMA(AB,5);
A18:=REFDATE(REF(HHV(H,96),5),DATE);{高}
B1:=REFDATE(REF(LLV(L,96),5),DATE);{低}
DY:=((A18)+(B1))/2;{中}
顶:IF(AB>0 AND AB-BA<=0,A18,A18),DOTLINE,COLORCYAN;
腰:IF(AB>0 AND AB-BA<=0,DY,DY),DOTLINE,COLORCYAN;
底:IF(AB>0 AND AB-BA<=0,B1,B1),DOTLINE,COLORCYAN;
MC:=C#MONTH,NODRAW;
MO1:=IF(DAY<REF(DAY,1),O,DRAWNULL);
MO:=HHV(MO1,DAY),NODRAW;
STICKLINE(MC>=MO,MO,MC,4,-1)COLOR00009C;
STICKLINE(MC<MO,MO,MC,4,-1),COLOR4F2F4F;
AQ:=O#WEEK;B:=C#WEEK;
AAQ:=H#WEEK;BB:=L#WEEK;
STICKLINE(B>=AQ,AAQ,BB,4,0),COLOR00006B;
STICKLINE(B<AQ,AAQ,BB,4,0),COLOR663300;
P:=9;
WH1:=IF(L=LLV(L,P),L,DRAWNULL);
WH2:=CONST(BARSLAST(WH1!=DRAWNULL));
WH3:=CONST(IF(WH2=0,H,REF(H,WH2)));
WH4:=CONST(REF(BARSLAST(H>WH3),WH2+1)+WH2+1);
WH5:=CONST(IF(WH4=0,H,REF(H,WH4)));
WH6:=CONST(REF(BARSLAST(H>WH5),WH4+1)+WH4+1);
赢:IF(CURRBARSCOUNT<=WH2+10,CONST(IF(WH6=0,H,REF(H,WH6))),DRAWNULL),COLORMAGENTA,LINETHICK2;
DRAWTEXT(ISLASTBAR,赢,' 进场位'),COLORMAGENTA;
H1:=IF(H=HHV(H,P),H,DRAWNULL);
H2:=CONST(BARSLAST(H1!=DRAWNULL));
H3:=CONST(IF(H2=0,L,REF(L,H2)));
H4:=CONST(REF(BARSLAST(L<H3),H2+1)+H2+1);
H5:=CONST(IF(H4=0,L,REF(L,H4)));
H6:=CONST(REF(BARSLAST(L<H5),H4+1)+H4+1);
损:IF(CURRBARSCOUNT<=H2+10,CONST(IF(H6=0,L,REF(L,H6))),DRAWNULL),COLORGREEN,LINETHICK2;
DRAWTEXT(ISLASTBAR,损,' 止损位'),COLORGREEN;
WYZB1:=(2*CLOSE+HIGH+LOW+OPEN)/5;
A1:(EMA(WYZB1,3)+EMA(WYZB1,6)+EMA(WYZB1,12)+EMA(WYZB1,24))/4,COLOR0044BB;
A2:EMA(A1,2),COLOR3355BB;
A3:EMA(A2,2),COLOR4455BB;
A4:EMA(A3,2),COLOR5555BB;
A5:EMA(A4,2),COLOR6655BB;
A6:EMA(A5,2),COLOR7755BB;
A7:EMA(A6,2),COLOR8855BB;
DRAWKLINE(H,O,L,C);
STICKLINE(C>=O,C,O,3,0),COLOR1F1AC5;
STICKLINE(C>=O,C,O,1.3,0),COLOR1F1AD5;
STICKLINE(C>=O,C,O,0,0),COLOR1F1AF5;
STICKLINE(C<O,C,O,3,0),COLORBBBB00;
STICKLINE(C<O,C,O,1.3,0),COLORDDDD00;
STICKLINE(C<O,H,L,0,0),COLORFFFF00;
A8:EMA(WYZB1,2.78)*1.028,COLORWHITE,LINETHICK1;
A9:MA(OPEN,3.2)*1.028,COLORYELLOW,LINETHICK1;
C6:=REF(C,1);
涨停:=IF((C-C6)*100/C6>=(10-0.01*100/C6),1,0);
STICKLINE(涨停,OPEN,CLOSE,2,0),COLORMAGENTA;
STICKLINE(涨停,H,L,0,0),COLORLIRED;
WYZB2:=(REF(HIGH,1)+REF(LOW,1))/2;
WYZB3:=MA(CLOSE,20)+2*STD(CLOSE,20);
DRAWTEXT(CROSS(WYZB2,WYZB3),HIGH*1.045,'↓高'),COLORCYAN;
WYZB7:=REF(C,1);
WYZB8:=SMA(MAX(C-WYZB7,0),6,1)/SMA(ABS(C-WYZB7),6,1)*100;
DRAWTEXT(CROSS(82,WYZB8),H*1.025,'↓逃'),COLORCYAN;
{KDJ金叉}
WYZB4:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
WYZB5:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
WYZB6:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));
DRAWICON(CROSS(WYZB5,MA(WYZB6,6)),(LOW - (LOW*0.015)),38);
DRAWICON(CROSS(MA(WYZB6,6),WYZB4),(HIGH+(HIGH*0.015)),39);
STICKLINE(CROSS("KDJ.K"(3,5,3),"KDJ.D"(3,5,3)),O,C,0.6,0),COLORYELLOW;
STICKLINE(CROSS("KDJ.D"(3,5,3),"KDJ.K"(3,5,3)),O,C,0.6,0),COLORBLUE;
WYZB3AA:=IF((CLOSE>REF(CLOSE,1)),88,0);
WYZB4AA:=IF(((CLOSE)/(REF(CLOSE,1))>1.05) AND ((HIGH)/(CLOSE)<1.01) AND (WYZB3AA>0),91,0);
DRAWTEXT(FILTER((WYZB4AA>90),45),(LOW)*(0.95),'★仓'),COLORMAGENTA;
DRAWTEXT(FILTER((WYZB4AA>90),35),(LOW)*(0.97),'★加'),COLORMAGENTA;
WYZB9:=((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100);
WYZB10:=SMA(WYZB9,3,1);
WYZB11:=SMA(WYZB10,3,1);
WYZB12:=SMA(WYZB11,3,1);
主力出现:DRAWICON(CROSS(WYZB11,WYZB12) AND (WYZB11<40),L*0.98,23);
A10:=HHV(H,73);
A11:=LLV(L,73);
M1:=MA(C,13);
M2:=MA(C,36);
M3:=MA(C,73);
K1:=(0.618*A10+0.382*A11),COLORGREEN;
K2:=(0.5*A10+0.5*A11),COLORGREEN;
K3:=(0.382*A10+0.618*A11),COLORGREEN;
K4:=(0.191*A10+0.809*A11),COLORRED;
K5:=(0.809*A10+0.191*A11),COLORRED;
牛:=V=HHV(V,64) AND V>REF(V,1)*1.5;
单阳:=C AND 牛;
单阳收:=C;
单阳开:=O;
高不破价:=REF(C,BARSLAST(单阳));
前高:=HHV(高不破价,13);
STICKLINE(前高,高不破价,高不破价,5,0)DOTLINE,COLORBLUE;
突破:=CROSS(C,前高) AND C>MA(C,36) AND (C-O)/O>0.030 AND MA(C,13)>REF(MA(C,13),1) AND C>K5;
DRAWTEXT(CROSS(C,前高) AND C>MA(C,36) AND (C-O)/O>0.035 AND MA(C,13)>REF(MA(C,13),1) AND MA(C,36)>REF(MA(C,36),1) ,L*1.00,'☆突') ,COLORMAGENTA;
DRAWTEXT(单阳 >REF(单阳,1) AND (C-O)/O>0.0455,L*1.00,'★追') ,COLORMAGENTA;
所属地域:DRAWTEXT_FIX(ISLASTBAR ,0.05,0.01,1,DYBLOCK),COLORYELLOW;
所属行业:DRAWTEXT_FIX(ISLASTBAR ,0.06,0.01,0,HYBLOCK),COLORYELLOW;
低:IF(CURRBARSCOUNT<=WH2+1,IF(L=LLV(L,P),L*0.98,DRAWNULL),DRAWNULL),COLORRED,CIRCLEDOT,LINETHICK6;
高:IF(CURRBARSCOUNT<=H2+1,IF(H=HHV(H,P),H*1.012,DRAWNULL),DRAWNULL),COLORGREEN,CIRCLEDOT,LINETHICK6;
上趋势:MA(LOW,20)*1.2,COLOR0080FF,LINETHICK1,NODRAW;
次上趋势:MA(LOW,20)*1.1,COLORYELLOW;
次下趋势:MA(HIGH,20)*0.9,COLORWHITE,NODRAW;
下趋势:MA(HIGH,20)*0.8,COLORGREEN,LINETHICK1;
ZD:=(C-REF(C,1))/REF(C,1)*100;
HDZF:=(HHV(H,20)-C)/(HHV(H,20)-LLV(L,20));
趋势强度:=IF(C>次上趋势,IF(C>上趋势,4,3),IF(C>次下趋势 AND C<次上趋势,2,IF(C<下趋势,0,1)));
DRAWTEXT(REF(趋势强度,1)=2 AND 趋势强度=1,H,'←主力出货'),COLORGREEN;
DRAWTEXT(REF(趋势强度,1)=3 AND 趋势强度=4,L,'←主力入场'),COLORMAGENTA;
DRAWTEXT(REF(趋势强度,1)=3 AND 趋势强度=2,H,'←主力洗盘'),COLORWHITE;
DRAWTEXT(REF(趋势强度,1)=1 AND 趋势强度=0,L,'←主力建仓'),COLORRED;
DRAWTEXT(REF(趋势强度,1)=2 AND 趋势强度=4,L,'←主力入场'),COLORMAGENTA;
AA:= BARSLAST (C/REF(C,1)>=1.095 AND C=H ) ;
BBA:= REF(V,1) < REF(V,AA)/2 OR REF(V,1) < REF(V,AA+1)/2 ;
CC:= REF(V,1) < REF(V,2);
DD:= REF(O>C,1) AND O<=REF(O,1) AND C>REF(O,1) AND O>REF(C,1) ;
EE:= REF( RANGE(O/C,1.01,1.03),1) AND RANGE(C/O,1.02 ,1.05);
FF:= REF(C,1)<REF(C,AA)*0.97 ;
XG:=RANGE(AA,8,15) AND BBA AND CC AND DD AND EE AND FF;
DRAWICON(XG,L*0.98,1);
STICKLINE(XG,O,C,2,0),COLORYELLOW;
DRAWTEXT(XG,L*0.968,'<--破位战法'),COLORYELLOW;
