【通达信源码分享】可媲美波段极品的副图公式源码

DRAWGBK(C>O,RGB(60,0,0),RGB(0,0,0),1,2,1);

 VAR1:=((LLV(LOW,5) = LLV(LOW,45)) AND (CLOSE >= (OPEN * 1.04)));

 VAR2:=(CLOSE > ((REF(HIGH,1) + REF(LOW,1)) / 2));

 VAR3:=REF(CLOSE,1);

 VAR4:((SMA(MAX((CLOSE - VAR3),0),6,1) / SMA(ABS((CLOSE - VAR3)),6,1)) * 100);

 VAR5:MAX(VAR4,5);

 VAR6:MAX(VAR5,10);

 VAR7:MAX(VAR6,20);

 VAR8:MAX(VAR7,30);

 VAR9:MAX(VAR8,60),COLORGREEN;

 VAR10:MAX(VAR9,90);

粘合加速:=CROSS(VAR4,60)*30;

 DRAWTEXT(ISLASTBAR,VAR10,' 顶'),COLORYELLOW;

大底:VAR5<VAR6 AND VAR4<5,STICK,COLORRED,LINETHICK2; 

 DRAWTEXT(大底 ,10,'大'),COLORRED;

 DRAWTEXT(大底 ,5,'底'),COLORRED;

中底:VAR6<VAR7 AND VAR4<20 AND VAR4>10,STICK,COLORYELLOW,LINETHICK2; 

 DRAWTEXT(中底 ,20,'中'),COLORYELLOW;

 DRAWTEXT(中底 ,10,'底'),COLORYELLOW;

短底:VAR7<VAR8 AND VAR4<30 AND VAR4>20,STICK,COLORYELLOW,LINETHICK2; 

 DRAWTEXT(短底 ,30,'短'),COLORYELLOW;

 DRAWTEXT(短底 ,20,'底'),COLORYELLOW;

 {小底:VAR8<VAR9 AND VAR4<40 AND VAR4>30 AND C>O,STICK,COLORGREEN,LINETHICK2; 

 DRAWTEXT(小底 ,40,'小'),COLORGREEN;

 DRAWTEXT(小底 ,30,'底'),COLORGREEN;}

 IF((VAR4=VAR5),VAR5,DRAWNULL),COLORGREEN,LINETHICK2;

 IF((VAR4=VAR6),VAR6,DRAWNULL),COLORWHITE,LINETHICK2;

 IF((VAR4=VAR7),VAR7,DRAWNULL),COLORYELLOW,LINETHICK2;

 IF((VAR4=VAR8),VAR7,DRAWNULL),COLORRED,LINETHICK2;

 IF((VAR4=VAR9),VAR9,DRAWNULL),COLORMAGENTA,LINETHICK2;

 IF((VAR4=VAR10),VAR10,DRAWNULL),COLORBLUE,LINETHICK2;

 TT:=VAR4-REF(VAR4,1);

粘合加速2:(CROSS(VAR4,60) AND TT>15 AND VAR9>60)*30,LINETHICK2,COLORGREEN;

加速:(CROSS(VAR4,80) AND TT>17 )*20,COLORMAGENTA,LINETHICK2;

风险:=CROSS(VAR4,90);

 STICKLINE( 风险,风险,20,3,0),COLORFF5500;

 STICKLINE( 风险,风险,30,2,0),COLORFF8800;

 STICKLINE( 风险,风险,30,1,0),COLORFFAA00;

 STICKLINE( 风险,风险,30,0.5,0),COLORFFCC00;

 DRAWTEXT(风险,35,'风险'),COLORYELLOW;

顶2:=VAR8<90 AND VAR10<REF(VAR10,1);

 DRAWICON(顶2,95,2);

 STICKLINE( 顶2,顶2,20,3,0),COLORFF5500;

 STICKLINE( 顶2,顶2,30,2,0),COLORFF8800;

 STICKLINE( 顶2,顶2,30,1,0),COLORFFAA00;

 STICKLINE( 顶2,顶2,30,0.5,0),COLORFFCC00;

 DRAWICON(顶2,95,2);

 DRAWICON(顶2,10,2);

 DRAWTEXT(顶2,35,'清仓'),COLORYELLOW;