【图】三线玄机加十线开花源码

{三线玄机}
n    21


rsv:=(c-llv(l,9))/(hhv(h,9)-llv(l,9))*100;

k:=sma(rsv,3,1);

d:=sma(k,3,1);

j:=3*k-2*d;

a:=((100-2*ref(k,1)+2*k+4*ref(d,1)/3)/3*(hhv(h,9)-llv(l,9))+100*llv(l,9))/100;

b:=((-(2*ref(k,1))+2*k+4*ref(d,1)/3)/3*(hhv(h,9)-llv(l,9))+100*llv(l,9))/100;

a1:=if(cross(d,k),l,0);

a2:=if(cross("XT5.R1","XT5.R3") and count(cross(50,d),barslast(cross(d,k)))=1 and c<hhv(c,11) and count(cross("XT5.R1","XT5.R3"),barslast(cross(55,d)))=1 or cross("XT5.R2","XT5.R1") and count(cross(55,d),barslast(cross(d,k)))=1 and c<hhv(c,10) and count(cross("XT5.R2","XT5.R1"),barslast(cross(55,d)))=1 or cross(50,d) and ref(c,1)>a and ref(c,1)>ref(o,1),1,0);

b1:ref(a,barslast(a2)),Linethick5,colorff;

b2:if("DR4.B3"<"DR4.B4",ref(b,barslast(a1)),ref(a,barslast(a1))),Linethick5,colorffff;

fillrgn(b1>=b2 and (b1-b2)/b2*100<2,b1,b2),colorffffff;

fillrgn(b1<b2 and abs(b1-b2)/b2*100<2,b1,b2),colorffffff;

stickline(b1<b2 and c>b1 and b1<b2*0.962,b2,b2*0.962,0,0),colorff00;

b3:if(b1<b2 and c>b1 and b1<b2*0.962,b2*0.962,ref(a,barslast(a2))),Linethick5,colorff00ff;


MA3:MA(CLOSE,5),colorred;
MA4:MA(CLOSE,6),colorred;
MA5:MA(CLOSE,7),colorred;
MA6:MA(CLOSE,8),colorred;
MA7:MA(CLOSE,9),colorred;
MA8:MA(CLOSE,10),colorred;
MA9:MA(CLOSE,11),colorred;
MA10:MA(CLOSE,12),colorred;
MA11:MA(CLOSE,13),colorred;
MA12:MA(CLOSE,14),colorred;
MA13:MA(CLOSE,15),colorred;
MA14:MA(CLOSE,n);
洼: IF(MA14>MA3,MA3,MA14),coloryellow;
洼1: IF(MA14>MA4,MA4,MA14),coloryellow;
洼2: IF(MA14>MA5,MA5,MA14),coloryellow;
洼3: IF(MA14>MA6,MA6,MA14),coloryellow;
洼4: IF(MA14>MA7,MA7,MA14),coloryellow;
洼5: IF(MA14>MA8,MA8,MA14),coloryellow;
洼6: IF(MA14>MA9,MA9,MA14),coloryellow;
洼7: IF(MA14>MA10,MA10,MA14),coloryellow;
洼8: IF(MA14>MA11,MA11,MA14),coloryellow;
洼9: IF(MA14>MA12,MA12,MA14),coloryellow;
洼10: IF(MA14>MA13,MA13,MA14),coloryellow;