A:=(3*C+L+O+H)/6;
B:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12) +7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+ REF(A,20))/210;
STICKLINE(B>REF(B,1),REF(B,1),B,3,0),COLORRED;
STICKLINE(B<=REF(B,1),REF(B,1),B,3,0),COLORGREEN;
M50:=MA(CLOSE,50);
M100:=MA(CLOSE,100);
M200:=MA(CLOSE,200);
AAA:=REFX1(HHV(H,90),10000);
...
A710:=REF(M200,1);
A711:=(M200 > A710);
AVX:=(((((IF(A75,10,(0 - 10)) + IF(A76,10,(0 - 10))) + IF(A77,10,(0 - 10))) + IF(A78,10,(0 - 10))) + IF(A79,10,(0 - 10))) + IF(A711,10,(0 - 10)));
INDEXC:="7186$CLOSE";
DSLX:=(CLOSE / INDEXC);
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
V1:=MA(VOL,5);
V2:=MA(VOL,10);
T1:=REFX1(IF(C< 200 AND ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0),10000);
T2:=REFX1(IF(C< 200 AND ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0),10000);
T3:=REFX1(IF(C< 200 AND ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)),1,0),10000);
T4:=REFX1(IF(C< 200 AND ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)),1,0),10000);
T5:=REFX1(IF(C< 200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0),10000);
T6:=REFX1(IF(C< 200 AND (( AND (V1 >V2)) AND (DSLX < DSLX1) AND T3=0),1,0),10000);
T12:=REFX1(IF(C< 200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 <=V2)) AND (DSLX < DSLX1) AND T4=0),1,0),10000);
T13:=REFX1(IF(C< 200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1) AND T5=0),1,0),10000);
T14:=REFX1(IF( C< 200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1) AND T6=0),1,0),10000);
T15:=REFX1(IF(C< 200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >V2)) AND (DSLX < DSLX1) AND T7=0),1,0),10000);
T16:=REFX1(IF(C< 200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 <= V2)) AND (DSLX < DSLX1) AND T8=0),1,0),10000);
T17:=REFX1(IF(C>200 AND (CROSS(AVX,1) AND (V1 >= V2)),1,0),10000);
T18:=REFX1(IF(C>200 AND (CROSS(AVX,1) AND (V1 >= V2)),1,0),10000);
T19:=REFX1(IF(C>200 AND (CROSS(AVX,1) AND (V1 < V2)),1,0),10000);
T20:=REFX1(IF(C>200 AND (CROSS(1,AVX) AND (V1 >= V2)),1,0),10000);
T21:=REFX1(IF(C>200 AND (CROSS(1,AVX) AND (V1 < V2)),1,0),10000);
T22:=REFX1(IF(C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2) AND T17=0),1,0),10000);
T23:=REFX1(IF(C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2) AND T18=0),1,0),10000);
T24:=REFX1(IF(C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2) AND T19=0),1,0),10000);
T25:=REFX1(IF(C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2) AND T20=0),1,0),10000);
CURRBARSCOUNT:=DATACOUNT-BARPOS+1;
DRAWTEXT(T1=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03),'量能理想,明显走强'),COLORFF00FF ;
DRAWTEXT(T2=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03),'走势趋强'),COLORFF00FF ;
DRAWTEXT(T7=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03),'放量下跌,走势明显偏弱'),COLORFF00FF ;
DRAWTEXT(T8=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03),'缩量下跌,走势偏弱'),COLORFF00FF ;
DRAWTEXT(T9=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03),'形态良好,强势明显,量能充足'),COLORFF00FF ;
DRAWTEXT(T10=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03),'上行趋势'),COLORFF00FF ;
DRAWTEXT(T12=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03),'走势趋弱'),COLORFF00FF ;
DRAWTEXT(T15=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03),'有走强迹象'),COLORFF00FF ;
DRAWTEXT(T22=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03),'大盘走势良好,量能理想'),COLORFF9900 ;
DRAWTEXT(T23=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03),'大盘形态良好,量能不足'),COLORFF9900 ;
DRAWTEXT(T25=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03),'大盘趋势向下,...........省略,附件里有源码文本