N:=5.88;
HH:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)+13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)+7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+REF(H,20))/210,COLORBLUE,LINETHICK1;
LL:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)+13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)+7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+REF(L,20))/210,COLORBLUE,LINETHICK1;
D90H:=EMA(HH,90),COLORRED,LINETHICK1;
D90L:=EMA(LL,90),COLORRED,LINETHICK1;
DGH:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)+13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)+7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+REF(H,20))/210,COLORBLUE,LINETHICK1;
DDL:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)+13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)+7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+REF(L,20))/210,COLORBLUE,LINETHICK1;
D90C:=D90H-D90L;
D90D:=D90H+D90C*2,COLORRED,LINETHICK1;
D90T:=D90L-D90C*2,COLORRED,LINETHICK1;
KK:=H;
BB1:=IF(ISNULL(REFX(KK,1)),0,REFX(KK,1))+IF(ISNULL(REFX(KK,2)),0,REFX(KK,2))+IF(ISNULL(REFX(KK,3)),0,REFX(KK,3))+IF(ISNULL(REFX(KK,4)),0,REFX(KK,4))+IF(ISNULL(REFX(KK,5)),0,REFX(KK,5))+IF(ISNULL(REFX(KK,6)),0,REFX(KK,6))+IF(ISNULL(REFX(KK,7)),0,REFX(KK,7))+IF(ISNULL(REFX(KK,8)),0,REFX(KK,8))+IF(ISNULL(REFX(KK,9)),0,REFX(KK,9))+IF(ISNULL(REFX(KK,10)),0,REFX(KK,10))+IF(ISNULL(REFX(KK,11)),0,REFX(KK,11))+IF(ISNULL(REFX(KK,12)),0,REFX(KK,12))+IF(ISNULL(REFX(KK,13)),0,REFX(KK,13))+IF(ISNULL(REFX(KK,14)),0,REFX(KK,14))+IF(ISNULL(REFX(KK,15)),0,REFX(KK,15))+IF(ISNULL(REFX(KK,16)),0,REFX(KK,16))+IF(ISNULL(REFX(KK,17)),0,REFX(KK,17))+IF(ISNULL(REFX(KK,18)),0,REFX(KK,18))+IF(ISNULL(REFX(KK,19)),0,REFX(KK,19))+IF(ISNULL(REFX(KK,20)),0,REFX(KK,20))+IF(ISNULL(REFX(KK,21)),0,REFX(KK,21))+IF(ISNULL(REFX(KK,22)),0,REFX(KK,22))+IF(ISNULL(REFX(KK,23)),0,REFX(KK,23))+IF(ISNULL(REFX(KK,24)),0,REFX(KK,24))+IF(ISNULL(REFX(KK,25)),0,REFX(KK,25))+IF(ISNULL(REFX(KK,26)),0,REFX(KK,26))+IF(ISNULL(REFX(KK,27)),0,REFX(KK,27))+IF(ISNULL(REFX(KK,28)),0,REFX(KK,28))+IF(ISNULL(REFX(KK,29)),0,REFX(KK,29));
BB2:=ISNULL(REFX(KK,1))+ISNULL(REFX(KK,2))+ISNULL(REFX(KK,3))+ISNULL(REFX(KK,4))+ISNULL(REFX(KK,5))+ISNULL(REFX(KK,6))+ISNULL(REFX(KK,7))+ISNULL(REFX(KK,8))+ISNULL(REFX(KK,9))+ISNULL(REFX(KK,10))+ISNULL(REFX(KK,11))+ISNULL(REFX(KK,12))+ISNULL(REFX(KK,13))+ISNULL(REFX(KK,14))+ISNULL(REFX(KK,15))+ISNULL(REFX(KK,16))+ISNULL(REFX(KK,17))+ISNULL(REFX(KK,18))+ISNULL(REFX(KK,19))+ISNULL(REFX(KK,20))+ISNULL(REFX(KK,21))+ISNULL(REFX(KK,22))+ISNULL(REFX(KK,23))+ISNULL(REFX(KK,24))+ISNULL(REFX(KK,25))+ISNULL(REFX(KK,26))+ISNULL(REFX(KK,27))+ISNULL(REFX(KK,28))+ISNULL(REFX(KK,29));
BB3:=(SUM(KK,31)+BB1)/(60-BB2);
KK1:=BB3;
BB4:=IF(ISNULL(REFX(KK1,1)),0,REFX(KK1,1))+IF(ISNULL(REFX(KK1,2)),0,REFX(KK1,2))+IF(ISNULL(REFX(KK1,3)),0,REFX(KK1,3))+IF(ISNULL(REFX(KK1,4)),0,REFX(KK1,4))+IF(ISNULL(REFX(KK1,5)),0,REFX(KK1,5))+IF(ISNULL(REFX(KK1,6)),0,REFX(KK1,6))+IF(ISNULL(REFX(KK1,7)),0,REFX(KK1,7))+IF(ISNULL(REFX(KK1,8)),0,REFX(KK1,8))+IF(ISNULL(REFX(KK1,9)),0,REFX(KK1,9))+IF(ISNULL(REFX(KK1,10)),0,REFX(KK1,10))+IF(ISNULL(REFX(KK1,11)),0,REFX(KK1,11))+IF(ISNULL(REFX(KK1,12)),0,REFX(KK1,12))+IF(ISNULL(REFX(KK1,13)),0,REFX(KK1,13))+IF(ISNULL(REFX(KK1,14)),0,REFX(KK1,14))+IF(ISNULL(REFX(KK1,15)),0,REFX(KK1,15))+IF(ISNULL(REFX(KK1,16)),0,REFX(KK1,16))+IF(ISNULL(REFX(KK1,17)),0,REFX(KK1,17))+IF(ISNULL(REFX(KK1,18)),0,REFX(KK1,18))+IF(ISNULL(REFX(KK1,19)),0,REFX(KK1,19))+IF(ISNULL(REFX(KK1,20)),0,REFX(KK1,20))+IF(ISNULL(REFX(KK1,21)),0,REFX(KK1,21))+IF(ISNULL(REFX(KK1,22)),0,REFX(KK1,22))+IF(ISNULL(REFX(KK1,23)),0,REFX(KK1,23))+IF(ISNULL(REFX(KK1,24)),0,REFX(KK1,24))+IF(ISNULL(REFX(KK1,25)),0,REFX(KK1,25))+IF(ISNULL(REFX(KK1,26)),0,REFX(KK1,26))+IF(ISNULL(REFX(KK1,27)),0,REFX(KK1,27))+IF(ISNULL(REFX(KK1,28)),0,REFX(KK1,28))+IF(ISNULL(REFX(KK1,29)),0,REFX(KK1,29));
BB5:=ISNULL(REFX(KK1,1))+ISNULL(REFX(KK1,2))+ISNULL(REFX(KK1,3))+ISNULL(REFX(KK1,4))+ISNULL(REFX(KK1,5))+ISNULL(REFX(KK1,6))+ISNULL(REFX(KK1,7))+ISNULL(REFX(KK1,8))+ISNULL(REFX(KK1,9))+ISNULL(REFX(KK1,10))+ISNULL(REFX(KK1,11))+ISNULL(REFX(KK1,12))+ISNULL(REFX(KK1,13))+ISNULL(REFX(KK1,14))+ISNULL(REFX(KK1,15))+ISNULL(REFX(KK1,16))+ISNULL(REFX(KK1,17))+ISNULL(REFX(KK1,18))+ISNULL(REFX(KK1,19))+ISNULL(REFX(KK1,20))+ISNULL(REFX(KK1,21))+ISNULL(REFX(KK1,22))+ISNULL(REFX(KK1,23))+ISNULL(REFX(KK1,24))+ISNULL(REFX(KK1,25))+ISNULL(REFX(KK1,26))+ISNULL(REFX(KK1,27))+ISNULL(REFX(KK1,28))+ISNULL(REFX(KK1,29));
MA60H:=(SUM(KK1,31)+BB4)/(60-BB5);
KK2:=L;
DD1:=IF(ISNULL(REFX(KK2,1)),0,REFX(KK2,1))+IF(ISNULL(REFX(KK2,2)),0,REFX(KK2,2))+IF(ISNULL(REFX(KK2,3)),0,REFX(KK2,3))+IF(ISNULL(REFX(KK2,4)),0,REFX(KK2,4))+IF(ISNULL(REFX(KK2,5)),0,REFX(KK2,5))+IF(ISNULL(REFX(KK2,6)),0,REFX(KK2,6))+IF(ISNULL(REFX(KK2,7)),0,REFX(KK2,7))+IF(ISNULL(REFX(KK2,8)),0,REFX(KK2,8))+IF(ISNULL(REFX(KK2,9)),0,REFX(KK2,9))+IF(ISNULL(REFX(KK2,10)),0,REFX(KK2,10))+IF(ISNULL(REFX(KK2,11)),0,REFX(KK2,11))+IF(ISNULL(REFX(KK2,12)),0,REFX(KK2,12))+IF(ISNULL(REFX(KK2,13)),0,REFX(KK2,13))+IF(ISNULL(REFX(KK2,14)),0,REFX(KK2,14))+IF(ISNULL(REFX(KK2,15)),0,REFX(KK2,15))+IF(ISNULL(REFX(KK2,16)),0,REFX(KK2,16))+IF(ISNULL(REFX(KK2,17)),0,REFX(KK2,17))+IF(ISNULL(REFX(KK2,18)),0,REFX(KK2,18))+IF(ISNULL(REFX(KK2,19)),0,REFX(KK2,19))+IF(ISNULL(REFX(KK2,20)),0,REFX(KK2,20))+IF(ISNULL(REFX(KK2,21)),0,REFX(KK2,21))+IF(ISNULL(REFX(KK2,22)),0,REFX(KK2,22))+IF(ISNULL(REFX(KK2,23)),0,REFX(KK2,23))+IF(ISNULL(REFX(KK2,24)),0,REFX(KK2,24))+IF(ISNULL(REFX(KK2,25)),0,REFX(KK2,25))+IF(ISNULL(REFX(KK2,26)),0,REFX(KK2,26))+IF(ISNULL(REFX(KK2,27)),0,REFX(KK2,27))+IF(ISNULL(REFX(KK2,28)),0,REFX(KK2,28))+IF(ISNULL(REFX(KK2,29)),0,REFX(KK2,29));
DD2:=ISNULL(REFX(KK2,1))+ISNULL(REFX(KK2,2))+ISNULL(REFX(KK2,3))+ISNULL(REFX(KK2,4))+ISNULL(REFX(KK2,5))+ISNULL(REFX(KK2,6))+ISNULL(REFX(KK2,7))+ISNULL(REFX(KK2,8))+ISNULL(REFX(KK2,9))+ISNULL(REFX(KK2,10))+ISNULL(REFX(KK2,11))+ISNULL(REFX(KK2,12))+ISNULL(REFX(KK2,13))+ISNULL(REFX(KK2,14))+ISNULL(REFX(KK2,15))+ISNULL(REFX(KK2,16))+ISNULL(REFX(KK2,17))+ISNULL(REFX(KK2,18))+ISNULL(REFX(KK2,19))+ISNULL(REFX(KK2,20))+ISNULL(REFX(KK2,21))+ISNULL(REFX(KK2,22))+ISNULL(REFX(KK2,23))+ISNULL(REFX(KK2,24))+ISNULL(REFX(KK2,25))+ISNULL(REFX(KK2,26))+ISNULL(REFX(KK2,27))+ISNULL(REFX(KK2,28))+ISNULL(REFX(KK2,29));
DD3:=(SUM(KK2,31)+DD1)/(60-DD2);
KK3:=DD3;
DD4:=IF(ISNULL(REFX(KK3,1)),0,REFX(KK3,1))+IF(ISNULL(REFX(KK3,2)),0,REFX(KK3,2))+IF(ISNULL(REFX(KK3,3)),0,REFX(KK3,3))+IF(ISNULL(REFX(KK3,4)),0,REFX(KK3,4))+IF(ISNULL(REFX(KK3,5)),0,REFX(KK3,5))+IF(ISNULL(REFX(KK3,6)),0,REFX(KK3,6))+IF(ISNULL(REFX(KK3,7)),0,REFX(KK3,7))+IF(ISNULL(REFX(KK3,8)),0,REFX(KK3,8))+IF(ISNULL(REFX(KK3,9)),0,REFX(KK3,9))+IF(ISNULL(REFX(KK3,10)),0,REFX(KK3,10))+IF(ISNULL(REFX(KK3,11)),0,REFX(KK3,11))+IF(ISNULL(REFX(KK3,12)),0,REFX(KK3,12))+IF(ISNULL(REFX(KK3,13)),0,REFX(KK3,13))+IF(ISNULL(REFX(KK3,14)),0,REFX(KK3,14))+IF(ISNULL(REFX(KK3,15)),0,REFX(KK3,15))+IF(ISNULL(REFX(KK3,16)),0,REFX(KK3,16))+IF(ISNULL(REFX(KK3,17)),0,REFX(KK3,17))+IF(ISNULL(REFX(KK3,18)),0,REFX(KK3,18))+IF(ISNULL(REFX(KK3,19)),0,REFX(KK3,19))+IF(ISNULL(REFX(KK3,20)),0,REFX(KK3,20))+IF(ISNULL(REFX(KK3,21)),0,REFX(KK3,21))+IF(ISNULL(REFX(KK3,22)),0,REFX(KK3,22))+IF(ISNULL(REFX(KK3,23)),0,REFX(KK3,23))+IF(ISNULL(REFX(KK3,24)),0,REFX(KK3,24))+IF(ISNULL(REFX(KK3,25)),0,REFX(KK3,25))+IF(ISNULL(REFX(KK3,26)),0,REFX(KK3,26))+IF(ISNULL(REFX(KK3,27)),0,REFX(KK3,27))+IF(ISNULL(REFX(KK3,28)),0,REFX(KK3,28))+IF(ISNULL(REFX(KK3,29)),0,REFX(KK3,29));
DD5:=ISNULL(REFX(KK3,1))+ISNULL(REFX(KK3,2))+ISNULL(REFX(KK3,3))+ISNULL(REFX(KK3,4))+ISNULL(REFX(KK3,5))+ISNULL(REFX(KK3,6))+ISNULL(REFX(KK3,7))+ISNULL(REFX(KK3,8))+ISNULL(REFX(KK3,9))+ISNULL(REFX(KK3,10))+ISNULL(REFX(KK3,11))+ISNULL(REFX(KK3,12))+ISNULL(REFX(KK3,13))+ISNULL(REFX(KK3,14))+ISNULL(REFX(KK3,15))+ISNULL(REFX(KK3,16))+ISNULL(REFX(KK3,17))+ISNULL(REFX(KK3,18))+ISNULL(REFX(KK3,19))+ISNULL(REFX(KK3,20))+ISNULL(REFX(KK3,21))+ISNULL(REFX(KK3,22))+ISNULL(REFX(KK3,23))+ISNULL(REFX(KK3,24))+ISNULL(REFX(KK3,25))+ISNULL(REFX(KK3,26))+ISNULL(REFX(KK3,27))+ISNULL(REFX(KK3,28))+ISNULL(REFX(KK3,29));
XXMA60L:=(SUM(KK3,31)+DD4)/(60-DD5);
MM:=H;
CC1:=IF(ISNULL(REFX(MM,1)),0,REFX(MM,1))+IF(ISNULL(REFX(MM,2)),0,REFX(MM,2))+IF(ISNULL(REFX(MM,3)),0,REFX(MM,3))+IF(ISNULL(REFX(MM,4)),0,REFX(MM,4))+IF(ISNULL(REFX(MM,5)),0,REFX(MM,5))+IF(ISNULL(REFX(MM,6)),0,REFX(MM,6))+IF(ISNULL(REFX(MM,7)),0,REFX(MM,7))+IF(ISNULL(REFX(MM,8)),0,REFX(MM,8))+IF(ISNULL(REFX(MM,9)),0,REFX(MM,9))+IF(ISNULL(REFX(MM,10)),0,REFX(MM,10))+IF(ISNULL(REFX(MM,11)),0,REFX(MM,11))+IF(ISNULL(REFX(MM,12)),0,REFX(MM,12));
CC2:=ISNULL(REFX(MM,1))+ISNULL(REFX(MM,2))+ISNULL(REFX(MM,3))+ISNULL(REFX(MM,4))+ISNULL(REFX(MM,5))+ISNULL(REFX(MM,6))+ISNULL(REFX(MM,7))+ISNULL(REFX(MM,8))+ISNULL(REFX(MM,9))+ISNULL(REFX(MM,10))+ISNULL(REFX(MM,11))+ISNULL(REFX(MM,12));
CC3:=(SUM(MM,13)+CC1)/(25-CC2);
MM1:=CC3;
CC4:=IF(ISNULL(REFX(MM1,1)),0,REFX(MM1,1))+IF(ISNULL(REFX(MM1,2)),0,REFX(MM1,2))+IF(ISNULL(REFX(MM1,3)),0,REFX(MM1,3))+IF(ISNULL(REFX(MM1,4)),0,REFX(MM1,4))+IF(ISNULL(REFX(MM1,5)),0,REFX(MM1,5))+IF(ISNULL(REFX(MM1,6)),0,REFX(MM1,6))+IF(ISNULL(REFX(MM1,7)),0,REFX(MM1,7))+IF(ISNULL(REFX(MM1,8)),0,REFX(MM1,8))+IF(ISNULL(REFX(MM1,9)),0,REFX(MM1,9))+IF(ISNULL(REFX(MM1,10)),0,REFX(MM1,10))+IF(ISNULL(REFX(MM1,11)),0,REFX(MM1,11))+IF(ISNULL(REFX(MM1,12)),0,REFX(MM1,12));
CC5:=ISNULL(REFX(MM1,1))+ISNULL(REFX(MM1,2))+ISNULL(REFX(MM1,3))+ISNULL(REFX(MM1,4))+ISNULL(REFX(MM1,5))+ISNULL(REFX(MM1,6))+ISNULL(REFX(MM1,7))+ISNULL(REFX(MM1,8))+ISNULL(REFX(MM1,9))+ISNULL(REFX(MM1,10))+ISNULL(REFX(MM1,11))+ISNULL(REFX(MM1,12));
MA25H:=(SUM(MM1,13)+CC4)/(25-CC5);
MM2:=L;
EE1:=IF(ISNULL(REFX(MM2,1)),0,REFX(MM2,1))+IF(ISNULL(REFX(MM2,2)),0,REFX(MM2,2))+IF(ISNULL(REFX(MM2,3)),0,REFX(MM2,3))+IF(ISNULL(REFX(MM2,4)),0,REFX(MM2,4))+IF(ISNULL(REFX(MM2,5)),0,REFX(MM2,5))+IF(ISNULL(REFX(MM2,6)),0,REFX(MM2,6))+IF(ISNULL(REFX(MM2,7)),0,REFX(MM2,7))+IF(ISNULL(REFX(MM2,8)),0,REFX(MM2,8))+IF(ISNULL(REFX(MM2,9)),0,REFX(MM2,9))+IF(ISNULL(REFX(MM2,10)),0,REFX(MM2,10))+IF(ISNULL(REFX(MM2,11)),0,REFX(MM2,11))+IF(ISNULL(REFX(MM2,12)),0,REFX(MM2,12));
EE2:=ISNULL(REFX(MM2,1))+ISNULL(REFX(MM2,2))+ISNULL(REFX(MM2,3))+ISNULL(REFX(MM2,4))+ISNULL(REFX(MM2,5))+ISNULL(REFX(MM2,6))+ISNULL(REFX(MM2,7))+ISNULL(REFX(MM2,8))+ISNULL(REFX(MM2,9))+ISNULL(REFX(MM2,10))+ISNULL(REFX(MM2,11))+ISNULL(REFX(MM2,12));
EE3:=(SUM(MM2,13)+EE1)/(25-EE2);
MM3:=EE3;
EE4:=IF(ISNULL(REFX(MM3,1)),0,REFX(MM3,1))+IF(ISNULL(REFX(MM3,2)),0,REFX(MM3,2))+IF(ISNULL(REFX(MM3,3)),0,REFX(MM3,3))+IF(ISNULL(REFX(MM3,4)),0,REFX(MM3,4))+IF(ISNULL(REFX(MM3,5)),0,REFX(MM3,5))+IF(ISNULL(REFX(MM3,6)),0,REFX(MM3,6))+IF(ISNULL(REFX(MM3,7)),0,REFX(MM3,7))+IF(ISNULL(REFX(MM3,8)),0,REFX(MM3,8))+IF(ISNULL(REFX(MM3,9)),0,REFX(MM3,9))+IF(ISNULL(REFX(MM3,10)),0,REFX(MM3,10))+IF(ISNULL(REFX(MM3,11)),0,REFX(MM3,11))+IF(ISNULL(REFX(MM3,12)),0,REFX(MM3,12));
EE5:=ISNULL(REFX(MM3,1))+ISNULL(REFX(MM3,2))+ISNULL(REFX(MM3,3))+ISNULL(REFX(MM3,4))+ISNULL(REFX(MM3,5))+ISNULL(REFX(MM3,6))+ISNULL(REFX(MM3,7))+ISNULL(REFX(MM3,8))+ISNULL(REFX(MM3,9))+ISNULL(REFX(MM3,10))+ISNULL(REFX(MM3,11))+ISNULL(REFX(MM3,12));
XXMA25L:=(SUM(MM3,13)+EE4)/(25-EE5);
G0:=2*MA25H-XXMA25L,LINETHICK1,COLORWHITE;
D0:=2*XXMA25L-MA25H,LINETHICK1,COLORWHITE;
DTD:=D0>=D90T && G0>=D90D;
KTD:=G0<=D90D && D0<=D90T;
ZDD:=D0>=D90T && G0<=D90D;
BDD0:=4*MA60H-3*XXMA60L,LINETHICK2,COLORGREEN;
BDT0:=4*XXMA60L-3*MA60H,LINETHICK2,COLORGREEN;

ZK1:=2*MA25H-XXMA25L,COLORRED;
ZD1:=2*XXMA25L-MA25H,COLORRED;
BS:3.2*MA60H-2.2*XXMA60L,COLORRED,LINETHICK2;
BD:3.8*XXMA60L-2.8*MA60H,COLORRED,LINETHICK2;
SS:=2.5*XXMA25L-1.5*MA25H,DOT,COLORGREEN;
ZZ:=(ZK1+ZD1)/2,DOT,COLORYELLOW;
DEA3:=EMA((EMA(CLOSE,3)-EMA(CLOSE,6)),9),COLORGREEN,LINETHICK2;
DEA3B:=REF(DEA3,1),COLORWHITE;
DEA33B:=EMA((EMA(EMA(CLOSE,3)-EMA(CLOSE,9),3)-EMA(EMA(CLOSE,3)-EMA(CLOSE,9),9)),9),COLORWHITE;
DEA333B:=REF(DEA33B,1),COLORWHITE;
 
DRAWCOLORKLINE((DEA3BREF(ZK1,1);
B4:=ZD1>REF(ZD1,1);

B1:=BS>REF(BS,1);
IF(NOT(B1),BS,NULL),COLORGREEN,LINETHICK2;
B2:=BD>REF(BD,1);
IF(NOT(B1),BD,NULL),COLORGREEN,LINETHICK2;

白色点多定位1:=LZD1;
黄色点空定位1:=H>ZK1 AND LZK1;
DRAWTEXT(白色点多定位2=1,L,'■'),COLORYELLOW,VALIGN0,ALIGN1;
DRAWTEXT(黄色点空定位2=1,H,'■'),COLORBLUE,VALIGN2,ALIGN1;

 
多头红色点:=DEA3BDEA3 OR DEA333B>DEA33B;
多头红色点定位1:=白色点多定位1=1 AND 多头红色点=1;
空头红色点定位1:=黄色点空定位1=1 AND 空头红色点=1;
多头红色点定位2:=白色点多定位2=1 AND 多头红色点=1;
空头红色点定位2:=黄色点空定位2=1 AND 空头红色点=1;
DRAWTEXT(多头红色点定位2=1,L,'■'),COLORYELLOW,VALIGN0,ALIGN1;
DRAWTEXT(空头红色点定位2=1,H,'■'),COLORBLUE,VALIGN2,ALIGN1;

P:=IF(ISCONTRACT('CL07')||ISCONTRACT('NQ06'),2,1);
MA5:=MA(C,5);
MA10:=MA(C,10);
G:=MA5;
DY:=MA10;
NNH:=BARSLAST(H=HHV(H,15)) ,NODRAW;
NNL:=BARSLAST(L=LLV(L,15)) ,NODRAW;
NN:=IF(REF(G,NNH)>REF(DY,NNH) AND NNH<=12,NNH,IF(REF(G,NNL)0,NN,13) ,NODRAW;
HHY:=REF(H,YN)=HHV(H,14);
LLY:=REF(L,YN)=LLV(L,14);
FG01:=BACKSET(HHY,YN+1)>BACKSET(HHY,YN),NODRAW;//只设置前面第6个
FD01:=BACKSET(LLY,YN+1)>BACKSET(LLY,YN) ,NODRAW;
FG02:=FG01=FD01 AND G>DY,NODRAW;
FD02:=FG01=FD01 AND G=5,5,BARSLAST(FD01)))) AND FD02=0 ,NODRAW;
FD0:=FD01 AND IF(FD02=1,L=LLV(L,BARSLAST(REF(FG01,1))+1),L=LLV(L,IF(BARSLAST(H=HHV(L,7))>=5,5,BARSLAST(FG01))))  AND FG02=0 ,NODRAW;
GT:=BARSLAST(FG0),NODRAW;
DT:=BARSLAST(FD0),NODRAW;
LLLL:=DT=0 AND REF(DT,1)REF(L,REF(DT,1)+1),NODRAW;
FG1:=BACKSET(REFX(GT,1)=0 AND GT
=REF(H,GT),GT+1),NODRAW; FD1:=BACKSET(REFX(DT,1)=0 AND DTREF(DY,BARSLAST(L=LLV(L,7))),BARSLAST(L=LLV(L,7))<5,1) AND HREF(L,REF(DT,1)+1),1,0),NODRAW; GT1:=BARSLAST(FG11<>1 AND FG1<>1 AND FG0),NODRAW; DT1:=BARSLAST(FD11<>1 AND FD1<>1 AND FD0),NODRAW; FD2:=BACKSET(REFX(GT1,1)=0 AND DT1<3 AND GT1-DT1<4 AND REF(L,DT1)>LLV(L,GT1+5),DT1+1),NODRAW; FG2A:=BACKSET(REFX(GT1,1)=0 AND DT1<3 AND GT1-DT1<4 AND REF(L,DT1)<=LLV(L,GT1+5) AND REF(H,GT1)>HHV(H,GT1+5),GT1+1),NODRAW; FG2B:=IF(GT1=0 AND DT1<4 AND REF(GT1,1)-DT1<4 AND REF(L,DT1)<=LLV(L,REF(GT1,1)+6) AND H>HHV(H,REF(GT1,1)+6),1,0),NODRAW; FG2:=BACKSET(REFX(DT1,1)=0 AND GT1<3 AND DT1-GT1<4 AND REF(H,GT1)=HHV(L,DT1+5) AND REF(L,DT1)>LLV(L,DT1+5),DT1+1),NODRAW; FD2B:=IF(DT1=0 AND GT1<4 AND REF(DT1,1)-GT1<4 AND REF(H,GT1)>=HHV(H,REF(DT1,1)+6) AND L>LLV(L,REF(DT1,1)+6),1,0),NODRAW; TTTTTT:= H=REF(L,REF(DT1,1)+1) ,1,0),NODRAW; FD231:=BACKSET(REFX(GT1,1)=0 AND DT1>3 AND GT1>DT1 AND GT1-DT1<4 AND REFX(H,1)>REF(H,GT1) AND REF(L,DT1)>REF(LLV(L,10),DT1),DT1+1),NODRAW; FG23:=BACKSET(REFX(GT1,1)=0 AND DT1>3 AND GT1>DT1 AND GT1-DT1<4 AND REFX(H,1)>REF(H,GT1) AND (REF(H,GT1)3 AND DT1>GT1 AND DT1-GT1<4 AND REFX(L,1)3 AND DT1>GT1 AND DT1-GT1<4 AND REFX(L,1)REF(LLV(L,13),DT1) OR REF(FG231,GT1)=0),DT1+1),NODRAW; FDD23:=REF(H,GT1)3 AND GT1>DT1 AND GT1-DT1<4 AND REFX(H,1)LLV(L,DT1+5),DT1+1),NODRAW; FG24:=BACKSET(REFX(DT1,1)=0 AND GT1>3 AND DT1>GT1 AND DT1-GT1<4 AND REFX(L,1)>LLV(L,DT1+3) AND REF(H,GT1)1 AND FG23<>1 AND FG231<>1 AND FG24<>1 AND FG2<>1 AND FG2A<>1 AND FG2B<>1 AND GT1=0),NODRAW; DT2:=BARSLAST(FD21<>1 AND FD23<>1 AND FD231<>1 AND FD24<>1 AND FD2<>1 AND FD2A<>1 AND FD2B<>1 AND DT1=0),NODRAW; FG3:=BACKSET(REFX(GT2,1)=0 AND GT2=REF(H,GT2),GT2+1),NODRAW; FD3:=BACKSET(REFX(DT2,1)=0 AND DT2REF(L,REF(DT2,1)+1),1,0),NODRAW; GT3:=BARSLAST(GT2=0 AND FG3<>1 AND FG31<>1 ),NODRAW; DT3:=BARSLAST(DT2=0 AND FD3<>1 AND FD31<>1),NODRAW; FG4:=BACKSET(REFX(GT3,1)=0 AND GT3=REF(H,GT3),GT3+1),NODRAW; FD4:=BACKSET(REFX(DT3,1)=0 AND DT3REF(L,REF(DT3,1)+1),1,0),NODRAW; HHH:=GT3=0 AND FG31<>1 AND FG3<>1,NODRAW; LLL:=DT3=0 AND FD31<>1 AND FD3<>1,NODRAW; DRAWTEXT(HHH&&NOT(B1),H,'空'),FONTSIZE22,COLORCYAN,ALIGN2,VALIGN2; DRAWTEXT(LLL&&B1,L,'多'),FONTSIZE22,RGB(255,255,255),ALIGN2,VALIGN0; TYP:=(HIGH+LOW+CLOSE)/3; CCI:=(TYP-MA(TYP,13))/(0.015*AVEDEV(TYP,13)); MQ:=(H+L+3*C+O)/6; M3:=MA(MQ,3); M7:=MA(MQ,7); M14:=MA(MQ,14); M21:=MA(MQ,21); M28:=MA(MQ,28); M35:=MA(MQ,35); M42:=MA(MQ,42); M49:=MA(MQ,49); M56:=MA(MQ,56); MH7:=MA(H,7); MH14:=MA(H,14); MH21:=MA(H,21); MH28:=MA(H,28); MH35:=MA(H,35); MH42:=MA(H,42); MH49:=MA(H,49); MH56:=MA(H,56); ML7:=MA(L,7); ML14:=MA(L,14); ML21:=MA(L,21); ML28:=MA(L,28); ML35:=MA(L,35); ML42:=MA(L,42); ML49:=MA(L,49); ML56:=MA(L,56); MZ:=(7*M7+14*M14+21*M21+28*M28+35*M35+42*M42+49*M49+56*M56)/252; MH:=(7*MH7+14*MH14+21*MH21+28*MH28+35*MH35+42*MH42+49*MH49+56*MH56)/252; ML:=(7*ML7+14*ML14+21*ML21+28*ML28+35*ML35+42*ML42+49*ML49+56*ML56)/252; GB:=H-MH; ZB:=C-MZ; DB:=L-ML; BZCZ:=SQRT(SUM(POW(ZB,2),20)/20); BZCH:=SQRT(SUM(POW(GB,2),20)/20); BZCL:=SQRT(SUM(POW(DB,2),20)/20); CVH:=BZCH/MH; CVL:=BZCL/ML; UPPER:=MH*(1+CVH*(1+1/SQRT(20))),DOT,COLORYELLOW,FONTSIZE20; DOWN:=ML*(1-CVL*(1+1/SQRT(20))),POINTDOT,COLORYELLOW,FONTSIZE20; B11:=UPPER>REF(UPPER,1); IF(NOT(B11),UPPER,NULL),COLORBLUE,LINETHICK3,NODRAW; B12:=DOWN>REF(DOWN,1); IF(NOT(B12),DOWN,NULL),COLORBLUE,LINETHICK3,NODRAW; VAR1:=ZIGZAG(C,2.88,1) < REF(ZIGZAG(C,2.88,1) ,1) AND REF(ZIGZAG(C,2.88,1) ,1) > REF(ZIGZAG(C,2.88,1) ,2); VAR2:=ZIGZAG(C,2.88,1) > REF(ZIGZAG(C,2.88,1) ,1) AND REF(ZIGZAG(C,2.88,1) ,1) < REF(ZIGZAG(C,2.88,1) ,2); VAR3:=ZIGZAG(C,4.88,1) < REF(ZIGZAG(C,4.88,1) ,1) AND REF(ZIGZAG(C,4.88,1) ,1) > REF(ZIGZAG(C,4.88,1) ,2); VAR4:=ZIGZAG(C,4.88,1) > REF(ZIGZAG(C,4.88,1) ,1) AND REF(ZIGZAG(C,4.88,1) ,1) < REF(ZIGZAG(C,4.88,1) ,2); VAR5:=ZIGZAG(C,5.88,1) < REF(ZIGZAG(C,5.88,1) ,1) AND REF(ZIGZAG(C,5.88,1) ,1) > REF(ZIGZAG(C,5.88,1) ,2); VAR6:=ZIGZAG(C,5.88,1) > REF(ZIGZAG(C,5.88,1) ,1) AND REF(ZIGZAG(C,5.88,1) ,1) < REF(ZIGZAG(C,5.88,1) ,2); VAR13:=ZIGZAG(C,N,1) < REF(ZIGZAG(C,N,1) ,1) AND REF(ZIGZAG(C,N,1) ,1) > REF(ZIGZAG(C,N,1) ,2); VAR14:=ZIGZAG(C,N,1) > REF(ZIGZAG(C,N,1) ,1) AND REF(ZIGZAG(C,N,1) ,1) < REF(ZIGZAG(C,N,1) ,2); DRAWTEXT(VAR13,H*1.02,'大逆转 趋势'),COLOR00FF00; DRAWTEXT(VAR14,L*0.975,'大逆转 趋势'),COLOR00FFFF; VAR15:=ZIGZAG(C,0.23,1) < REF(ZIGZAG(C,0.23,1) ,1) AND REF(ZIGZAG(C,0.23,1) ,1) > REF(ZIGZAG(C,0.23,1) ,2); VAR16:=ZIGZAG(C,0.23,1) > REF(ZIGZAG(C,0.23,1) ,1) AND REF(ZIGZAG(C,0.23,1) ,1) < REF(ZIGZAG(C,0.23,1) ,2); K1:=BARSLAST(B1&&B3&&B4); K2:=BARSLAST(NOT(B1)&&NOT(B3)&&NOT(B4)); DRAWCOLORKLINE(K1K2,COLORMAGENTA,1); DRAWCOLORKLINE(K1>K2&&ISDOWN,COLORMAGENTA,0); DRAWCOLORKLINE(B1&&ISDOWN=0&&B3&&B4,COLORRED,1); DRAWCOLORKLINE(NOT(B1)&&ISDOWN=0&&NOT(B3)&&NOT(B4),COLORGREEN,1); DRAWCOLORKLINE(B1&&ISDOWN=1&&B3&&B4,COLORRED,0); DRAWCOLORKLINE(NOT(B1)&&ISDOWN=1&&NOT(B3)&&NOT(B4),COLORGREEN,0);

作者 admin

九稳量化交易系统 是一套高胜率策略趋势跟踪系统,系统最大优势就是开仓位置精确,信号不漂移 不延迟 同步行情信号 拒绝马后面!www.gao998.cn 微信 fxfx668998

发表回复

您的邮箱地址不会被公开。 必填项已用 * 标注