益盟操盘手庄散动向源码 EA

回报论坛和大家的支持，再转发个我觉得不错的指标—-庄散动向指标。愿大家不再做傻户！对不认识的原作者表示感谢！
rnDDD:=DATE;
rn期限:=1100930;
rn
rnSTICKLINE(C>0,0,49.5,12,0),COLOR282200;
rnkk:=COUNT(CLOSE>OPEN OR CLOSE<=OPEN,0);
rnDRAWTEXT(FILTER(kk,51),13.8,’我是小股民,但不做傻户’),COLOR350015;
rn
rnSTICKLINE(C>0,100,100,5,1),COLOR583000;
rnSTICKLINE(C>0,5,5,5,1),COLOR550000;
rnPolyLINE(C>0,10),COLOR555533;
rnAA4:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
rnAA5:=SMA(AA4,13,7);
rn庄家:CEILING(SMA(AA5,13,7)),COLOR9900DD{COLORMAGENTA};
rn傻户:SMA((HHV(HIGH,36)-CLOSE)/(HHV(HIGH,36)-LLV(LOW,36))*100,2,1),COLOR00bb00,LINETHICK1;
rn快速:100*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60)),color6666ee;
rn
rnA:=(EMA((CLOSE-ref(c,1))/ref(c,1)*10-
rn(INDEXC-ref(INDEXC,1))/ref(INDEXC,1)*10,5))*30+50;
rnSTICKLINE(A>50 and DDD<=期限,50,A,8,0),COLOR6050df;
rnSTICKLINE(A>50 and DDD<=期限,50,A,5,0),COLOR8070ef;
rnSTICKLINE(A>50 and DDD<=期限,50,A,3,0),COLORa090ff;
rnSTICKLINE(A>50 and DDD<=期限,50,A,0.5,0),colorFFEDFF;
rn
rnstickline(A<50,50,A,8.4,0),color564400;
rnstickline(A<50,50,A,7,0),color776600;
rnstickline(A<50,50,A,5,0),color998800;
rnstickline(A<50,50,A,3,0),colorBBAA00;
rnstickline(A<50,50,A,1,0),colorDDEE00;
rnSTICKLINE(A<50,50,A,1,0),colorFFFB90;
rn
rnVAR01:=(H+L+O+C*2)/5;
rnVAR02:=EMA(VAR01,21);
rnVAR03:=STD(VAR01,23);
rnVAR04:=EMA(VAR01,2);
rnVARA:=(VAR01-VAR02)*100/VAR03;
rnAJ:=(EMA(VARA,23)+100)/2-3,COLORBLACK;
rnB:=SMA(AJ,5,1),COLORBLACK;
rnDZJ:=4*AJ-3*B;
rnab:=ref(dzj,1)<=-6.5 and dzj>ref(dzj,1) and ref(dzj,1)<ref(dzj,2);
rncd:=FILTER(ab,3);
rnXG:cd AND c/ref(c,1)<1.07 AND DDD<=期限,colorffffFF;
rnSTICKLINE(XG,19,26,4,0),COLOR3300bb;
rnSTICKLINE(XG,0,31,6,1),COLORFFFFFF;
rnSTICKLINE(XG,0,20,7,0),COLOR000000;
rn
rnPolyLINE(((庄家>=0 or 庄家<0) and DDD<=期限),庄家),COLORMAGENTA;
rnPolyLINE(((傻户>=0 or 傻户<0) and DDD<=期限),傻户),COLOR00bb00;
rnPolyLINE(快速>=0 AND DDD<=期限,快速),COLOR6666ee;
rn
rnQ:=((CLOSE)/(REF(CLOSE,1))>1.023) AND (CLOSE=HIGH) AND BETWEEN(FORCAST(VOL,4),(0.2)*(FORCAST(VOL,12)),(2.1)*(FORCAST(VOL,12)));
rnW:=FILTER(Q,26) AND REF(庄家,1)>REF(庄家,2)
rnAND (REF(A,1)>0 OR REF(A,2)>0) AND DDD<=期限;
rnDRAWLINE(W,庄家+25,w,庄家-11.7,0),color0000ee,linethick3;
rnHJ:W ,COLOR0000DD;
rn
rnSTICKLINE(W,庄家+1.9,庄家-9.45,12,0),COLORwhite;
rnDRAWLINE(W,庄家+14.2,w,庄家,0),colorwhite,linethick5;
rnDRAWLINE(W,庄家-9,w,庄家+1,0),color004230,linethick7;{colorff4811}
rnDRAWLINE(W,庄家-9.3,w,庄家-9.8,0),colorred,linethick5;
rnDRAWLINE(W,庄家+11.5,w,庄家+10.9,0),color502000,linethick1;
rnDRAWLINE(W,庄家+9.3,w,庄家+8.8,0),color502000,linethick1;
rnDRAWLINE(W,庄家+7.3,w,庄家+6.8,0),color502000,linethick1;
rnDRAWLINE(W,庄家+5.25,w,庄家+4.68,0),color502000,linethick1;
rn