通达信量顶天立地副图源码

　　以下是通达信量顶天立地副图源码

　　A1:=V=HHV(V,120);

　　A2:=C/OPEN>1.049;

　　TJ:=A1ANDA2;

　　TJAND(REF(BARSLAST(TJ),1)>80ORBARSSINCE(TJ)=0);

　　三阴一阳:IF(LAST(C<O,3,0)ANDLAST(vol<REF(VOL,1),3,0),3,0);

　　DRAWTEXT(LAST(C<O,3,0)ANDLAST(VOL<REF(VOL,1),3,0),3,'三阴缩量一阳'),COLORBLUE;

　　捉暴张:IF(crOSS("DMI.pdi","DMI.mdi")ANDCROSS("DMI.PDI","DMI.ADX")ANDCROSS("DMI.PDI","DMI.ADXR")ANDC>REF(C,1)*1.05ANDVOL>REF(VOL,1),3,0);

　　DRAWTEXT(CROSS("DMI.PDI","DMI.MDI")ANDCROSS("DMI.PDI","DMI.ADX")ANDCROSS("DMI.PDI","DMI.ADXR")ANDC>REF(C,1)*1.05ANDVOL>REF(VOL,1),3,'DMI捉暴张'),COLORWHITE;

　　背离底:IF(LAST(ma(C,5)<MA(C,10),5,0)AND"cci.CCI">REF("CCI.CCI",1)ANDCROSS("CCI.CCI",-100),3,0);

　　DRAWTEXT(LAST(MA(C,5)<MA(C,10),5,0)AND"CCI.CCI">REF("CCI.CCI",1)ANDCROSS("CCI.CCI",-100),3,'CCI背离底'),COLORGREEN;

　　平台起:IF(LAST((H-L)/REF(C,1)<0.1,5,0)ANDVOL>REF(VOL,1)*2ANDC>REF(C,1)*1.05,3,0),COLORBLUE;

　　DRAWTEXT(LAST((H-L)/REF(C,1)<0.1,5,0)ANDVOL>REF(VOL,1)*2ANDC>REF(C,1)*1.05,3,'121平台起'),COLORBLUE;

　　山谷停板:IF(LAST(MA(C,5)<MA(C,10),5,0)ANDC>REF(C,1)*1.098,3,0);

　　DRAWTEXT(LAST(MA(C,5)<MA(C,10),5,0)ANDC>REF(C,1)*1.098,3,'山谷\N停板');

　　拨云见日:STICKLINE((LAST(C<O,6,3)ANDLAST(C>O,2,0))OR(LAST(C<O,6,3)ANDC>OANDREF(C,1)<REF(O,1)ANDREF(C,2)>REF(O,2)),4,0,2,0),COLORLIMAGENTA;

　　DRAWTEXT((LAST(C<O,6,3)ANDLAST(C>O,2,0))OR(LAST(C<O,6,3)ANDC>OANDREF(C,1)<REF(O,1)ANDREF(C,2)>REF(O,2)),4,'●'),COLORWHITE;

　　DRAWTEXT((LAST(C<O,6,3)ANDLAST(C>O,2,0))OR(LAST(C<O,6,3)ANDC>OANDREF(C,1)<REF(O,1)ANDREF(C,2)>REF(O,2)),4.2,'拨云见日'),COLORLIMAGENTA;

　　{DRAWTEXT(CROSS((CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100,(CLOSE-MA(CLOSE,11))/MA(CLOSE,11)*100)ANDMA(C,40)>REF(MA(C,40),1),L*0.98,'bias绝密买点'),COLORGRAY;}

　　南天一柱:STICKLINE(C<OANDVOL>REF(VOL,1)*1.5ANDLAST(VOL<REF(VOL,1),5,1),5,0,2,0),COLORYELLOW;

　　DRAWTEXT(C<OANDVOL>REF(VOL,1)*1.5ANDLAST(VOL<REF(VOL,1),5,1),5,'南天一柱'),COLORWHITE;

　　顶天立地:STICKLINE((C>OANDV>REF(V,1)*2.5ANDCROSS(C,MA(C,5)))OR(C>OANDV>REF(V,1)*10),5,0,2,0),COLORLIMAGENTA;

　　DRAWTEXT((C>OANDV>REF(V,1)*2.5ANDCROSS(C,MA(C,5)))OR(C>OANDV>REF(V,1)*10),5,'顶天立地'),COLORLIMAGENTA;

　　VAR3:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;

　　VAR4:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;

　　VAR5:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100;

　　VAR6:=(VAR3+VAR4+VAR5)/3;

　　VAR8:=IF(VAR6<=-20,10,0);

　　VAR9:=HHV(VAR8,10);

　　VARA:=IF(VAR9ANDCROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0);

　　DRAWTEXT(VAR8=10ANDFILTER(VAR8=10,5),3,'准备')COLORLIMAGENTA;

　　DRAWTEXT(VARA=20,4,'一定要买')COLORWHITE;

　　U1:=IF(YEAR>=2022ANDMONTH>=1,0,1);

　　YS1:=(HIGH+LOW+CLOSE*2)/4;

　　RK3:=ema(YS1,10);

　　RK4:=STD(YS1,10);

　　RK5:=(YS1-RK3)*100/RK4;

　　RK6:=EMA(RK5,5)*U1;

　　RK7:=EMA(RK6,10);

　　涨:=EMA(RK6,10)+100/2-5*U1,LINETHICK0,COLORWHITE;

　　跌:=EMA(涨,4)*U1,LINETHICK0,COLORRED;

　　天晴了:=IF(CROSS(涨,跌)AND跌<-10,20,0),LINETHICK0,COLORCCCCFF;

　　DRAWTEXT(CROSS(涨,跌)AND跌<20AND跌>-10,2,'雨暂停,转多云!'),COLORCCFF99;

　　DRAWTEXT(CROSS(涨,跌)AND跌<20AND跌>-10,0.5,'▲'),COLORWHITE;

　　DRAWTEXT(CROSS(涨,跌)AND跌<20AND跌>-10,1.5,'▲'),COLORWHITE;

　　DRAWTEXT(天晴了>0,0.5,'▲'),COLORLIMAGENTA;

　　DRAWTEXT(天晴了>0,1.5,'▲'),COLORLIMAGENTA;

　　DRAWTEXT(天晴了>0,2,'天晴了!'),COLORCCCCFF;