通达信AAA 财富4源码副图

X_1:=IF(DATE<1151219 AND DATE>900101,1,0);
 X_2:=10;
 X_3:=40;
 X_4:=XMA(CLOSE,X_2)*X_1;
 X_5:=XMA(CLOSE,X_3)*X_1;
 X_6:=REF(X_5,X_3/2+1-CURRBARSCOUNT)/REF(X_5,X_3/2+2-CURRBARSCOUNT)*X_1;
 X_7:=REF(X_4,X_2/2+1-CURRBARSCOUNT)/REF(X_4,X_2/2+2-CURRBARSCOUNT)*X_1;
 JB上轨:IF(CURRBARSCOUNT>X_3/2,X_5*1.1,REF(X_5,X_3/2+1-CURRBARSCOUNT)*POW(X_6,X_3/2+1-CURRBARSCOUNT)*1.1)*X_1;
 JB下轨:IF(CURRBARSCOUNT>X_3/2,X_5*0.9,REF(X_5,X_3/2+1-CURRBARSCOUNT)*POW(X_6,X_3/2+1-CURRBARSCOUNT)*0.9)*X_1;
 CJ上轨:IF(CURRBARSCOUNT>X_2/2,X_4*1.05,REF(X_4,X_2/2+1-CURRBARSCOUNT)*POW(X_7,X_2/2+1-CURRBARSCOUNT)*1.05)*X_1;
 CJ下轨:IF(CURRBARSCOUNT>X_2/2,X_4*0.95,REF(X_4,X_2/2+1-CURRBARSCOUNT)*POW(X_7,X_2/2+1-CURRBARSCOUNT)*0.95)*X_1;
 GX:DRAWTEXT(OPEN<=CJ下轨,LOW*0.98,27*X_1)*X_1,COLORYELLOW;
 DRAWTEXT(CROSS(HIGH,CJ上轨),HIGH*1.01,28*X_1)*X_1,COLORYELLOW;
 X_8:=VOL>=REF(VOL,1)*1.91 AND CLOSE>REF(CLOSE,1)*1.01*X_1;
 STICKLINE(X_8,CLOSE,OPEN+(CLOSE-OPEN)/2,1,0)*X_1,COLORYELLOW;
 X_9:=MA(CLOSE,5)*X_1;
 X_10:=MA(CLOSE,10)*X_1;
 X_11:=MA(CLOSE,20)*X_1;
 X_12:=X_9>OPEN AND X_10>OPEN AND X_11>OPEN AND X_9<CLOSE AND X_10<CLOSE AND X_11<CLOSE AND CLOSE>OPEN;
 STICKLINE(X_12,OPEN,OPEN+(CLOSE-OPEN)/2,1,0)*X_1,COLORMAGENTA;
 DRAWTEXT_FIX(CLOSE>OPEN,0.03,0.2,0,29),COLORWHITE;
 DRAWTEXT_FIX(ISLASTBAR,0.1,0.01,1,DYBLOCK),COLORYELLOW;
 DRAWTEXT_FIX(ISLASTBAR,0.18,0.01,1,HYBLOCK),COLORYELLOW;
 DRAWTEXT_FIX(ISLASTBAR,0.36,0.01,1,GNBLOCK),COLORWHITE;