操盘王的风险栅栏源码

a:=LLV(INDEXC,24)*"PRICEOSC.N";
 b:="PRICEOSC.B";
 DRAWICON(CROSS(INDEXC,a) and LLV(INDEXC,24)=LLV(INDEXC,60) and COUNT(CROSS(INDEXC,a),13)<=1 and "DMI.B3"<"DMI.B4" or CROSS(INDEXC,a) and LLV(INDEXC,24)=LLV(INDEXC,60) and INDEXC<MIN("DMI.B1",MIN("DMI.B2",MIN("DMI.B3","DMI.B4"))) and COUNT(CROSS(INDEXC,a),13)<=1 or CROSS(INDEXC,a) and INDEXC>REF(INDEXC,1)*"PRICEOSC.N" and INDEXC<MIN("DMI.B1",MIN("DMI.B2",MIN("DMI.B3","DMI.B4"))) and COUNT(CROSS(INDEXC,a),13)<=1 or CROSS(INDEXC,a) and INDEXC>MAX("DMI.B1",MAX("DMI.B2",MAX("DMI.B3","DMI.B4"))) and MAX("DMI.B1","DMI.B2")<MAX("DMI.B3","DMI.B4") and "DMI.B3"<"DMI.B4" and COUNT(CROSS(INDEXC,a),13)<=1 or CROSS(INDEXC,a) and INDEXC>MAX("DMI.B1",MAX("DMI.B2",MAX("DMI.B3","DMI.B4"))) and MAX("DMI.B1","DMI.B2")<MIN("DMI.B3","DMI.B4") and "DMI.B3">"DMI.B4" and COUNT(CROSS(INDEXC,a),13)<=1,LOW,1);
 s:=if(date<1080701,1,0);

 b1:ma(b,5)*s,colorff;
 b2:ma(b,10)*s,colorff;
 b3:ma(b,30)*s,colorffff;
 b4:ma(b,60)*s,colorffff;

 x:=REF(CLOSE,1)<REF(CLOSE,2) and REF(VOL,1)>MAX(REF(MA(VOL,5),1),MAX(REF(MA(VOL,10),1),REF(MA(VOL,20),1))) and REF(VOL,1)>REF(MA(VOL,20),1)*1.1;
 y:=IF(x,MIN(REF(LOW,1),LOW),0);
 z1:REF(y,BARSLAST(x)),Linethick5,colorffff;
 x1:=REF(CLOSE,1)<REF(OPEN,1) and REF(VOL,1)>MAX(REF(MA(VOL,5),1),MAX(REF(MA(VOL,10),1),REF(MA(VOL,20),1))) and REF(AMOUNT,1)=REF(HHV(AMOUNT,20),1) or REF(CLOSE,1)<REF(OPEN,1) and REF(AMOUNT,1)=REF(HHV(AMOUNT,20),1);
 y1:=IF(x1,REF(CLOSE,1),0);
 z2:REF(y1,BARSLAST(x1)),COLORred,Linethick5,colorffff;
 STICKLINE(CLOSE>0 and (MAX(z1,z2)-MIN(z1,z2))/MIN(z1,z2)*100<3 and MAX("DMI.B1","DMI.B2")>MIN("DMI.B3","DMI.B4"),z1,z2,3,0),COLORred;
 CG:ma(C,17),colorffcc66;
 FL:hhv(CG,2);
 FS:if(CG<FL,(CG-(FL-CG)),FL);
 STICKLINE(close>=open,open,close,5,1),colorred;
 STICKLINE(open>close,close,open,5,0 ),color00ff00;
 STICKLINE(close>=open,close,HIGH,0.5 ,1 ),colorred;
 STICKLINE(close>=open,open,low,0.5 ,1 ),colorred;
 STICKLINE(open>close,close,low,0.5 ,0 ),color00ff00;
 STICKLINE(open>close,open,HIGH,0.5 ,0 ),color00ff00;