Discution et Maj indicateur Kinko Yo
- This topic has 4 replies, 3 voices, and was last updated 3 years ago by
.
Viewing 5 posts - 1 through 5 (of 5 total)
-
Code de L’indicateur
123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277////=/===============/=//=/===============/=//=/ Paramettre de Base//defparam calculateonlastbars = 2000////=/===============/=//=/===============/=//=/ Paramettre des couleurs//////=/ = = Tenkan////=/ Tenkan HausseUPxT1 = 0UPxT2 = 150UPxT3 = 255UPxT4 = 200//=/ Tenkan BaisseDWxT1 = 102DWxT2 = 102DWxT3 = 102DWxT4 = 200//=/ Tenkan AnormalitéANxT1 = 255ANxT2 = 102ANxT3 = 0ANxT4 = 250////=/ = = Kijun////=/ Kijun HausseUPxK1 = 0UPxK2 = 150UPxK3 = 255UPxK4 = 200//=/ Kijun BaisseDWxK1 = 102DWxK2 = 102DWxK3 = 102DWxK4 = 200//=/ Kijun Anormalité Type 1A1xK1 = 255A1xK2 = 102A1xK3 = 0A1xK4 = 250//=/ Kijun Anormalité Type 2A2xK1 = 204A2xK2 = 0A2xK3 = 0A2xK4 = 250////=/ = = Excès Tenkan////=/ Excès HaussierEHxT1 = 0EHxT2 = 150EHxT3 = 255EHxT4 = 30//=/ Excès BaissierEBxT1 = 102EBxT2 = 102EBxT3 = 102EBxT4 = 30////=/ = = Excès Kijun//EKxT1 = 255EKxT2 = 102EKxT3 = 0EKxT4 = 30////=/===============/=//=/===============/=//=/ Indicateur////=/ IchimokuHx1 = highest[9](high)Lx1 = lowest[9](low)//=//Hx2 = highest[26](high)Lx2 = lowest[26](low)//=//Hx3 = highest[52](high)Lx3 = lowest[52](low)//=//XB = (Hx3+Lx3)/2XA = (Hx1+Lx1+Hx2+Lx2)/4//=//SA = (XA[26])SB = (XB[26])TK = (highest[9](high)+lowest[9](low))/2KJ = (highest[26](high)+lowest[26](low))/2////=/===============/=//=/===============/=//=/ Tenkan////=/ UPif TK > KJ thenRx1 = UPxT1Gx1 = UPxT2Bx1 = UPxT3Tx1 = UPxT4elsif TK = KJ and TK > TK[1] thenRx1 = UPxT1Gx1 = UPxT2Bx1 = UPxT3Tx1 = UPxT4//=/ Downelsif TK < KJ thenRx1 = DWxT1Gx1 = DWxT2Bx1 = DWxT3Tx1 = DWxT4elsif TK = KJ and TK < TK[1] thenRx1 = DWxT1Gx1 = DWxT2Bx1 = DWxT3Tx1 = DWxT4//=/ AlerteelseRx1 = ANxT1Gx1 = ANxT2Bx1 = ANxT3Tx1 = ANxT4endif////=/===============/=//=/===============/=//=/ Kijun////=/ UPif KJ < TK and (KJ > XB or KJ < XB) thenRx2 = UPxK1Gx2 = UPxK2Bx2 = UPxK3Tx2 = UPxK4elsif KJ < TK and KJ = XB and KJ > KJ[1] thenRx2 = UPxK1Gx2 = UPxK2Bx2 = UPxK3Tx2 = UPxK4elsif KJ = TK and TK > TK[1] and (KJ > XB or KJ < XB) thenRx2 = UPxK1Gx2 = UPxK2Bx2 = UPxK3Tx2 = UPxK4elsif KJ = TK and KJ = XB and KJ > KJ[1] thenRx2 = UPxK1Gx2 = UPxK2Bx2 = UPxK3Tx2 = UPxK4//=/ Downelsif KJ > TK and (KJ > XB or KJ < XB) thenRx2 = DWxK1Gx2 = DWxK2Bx2 = DWxK3Tx2 = DWxK4elsif KJ > TK and KJ = XB and KJ < KJ[1] thenRx2 = DWxK1Gx2 = DWxK2Bx2 = DWxK3Tx2 = DWxK4elsif KJ = TK and TK < TK[1] and (KJ > XB or KJ < XB) thenRx2 = DWxK1Gx2 = DWxK2Bx2 = DWxK3Tx2 = DWxK4elsif KJ = TK and KJ = XB and KJ < KJ[1] thenRx2 = DWxK1Gx2 = DWxK2Bx2 = DWxK3Tx2 = DWxK4//=/ Alerte 1elsif KJ = TK and TK = TK[1] and (KJ > XB or KJ < XB) thenRx2 = A1xK1Gx2 = A1xK2Bx2 = A1xK3Tx2 = A1xK4//=/ Alerte 2elseRx2 = A2xK1Gx2 = A2xK2Bx2 = A2xK3Tx2 = A2xK4endif////=/===============/=//=/===============/=//=/ Excès Tenkan////=/ UP T1if Lx1 > KJ and Lx1[1] => KJ[1] and TK > KJ thendrawtriangle(barindex[1],Lx1[1],barindex[1],KJ[1],barindex,KJ) coloured(EHxT1,EHxT2,EHxT3,EHxT4) bordercolor(0,0,0,0)drawtriangle(barindex,Lx1,barindex,KJ,barindex[1],Lx1[1]) coloured(EHxT1,EHxT2,EHxT3,EHxT4) bordercolor(0,0,0,0)endif//=//if Lx1 > KJ and Lx1[1] =< KJ[1] and TK > KJ thendrawtriangle(barindex,Lx1,barindex,KJ,barindex[1],KJ[1]) coloured(EHxT1,EHxT2,EHxT3,EHxT4) bordercolor(0,0,0,0)endif//=//if Lx1 =< KJ and Lx1[1] > KJ[1] and TK > KJ thendrawtriangle(barindex[1],Lx1[1],barindex[1],KJ[1],barindex,KJ) coloured(EHxT1,EHxT2,EHxT3,EHxT4) bordercolor(0,0,0,0)endif//=/ DW T1if Hx1 < KJ and Hx1[1] =< KJ[1] and TK < KJ thendrawtriangle(barindex[1],Hx1[1],barindex[1],KJ[1],barindex,KJ) coloured(EBxT1,EBxT2,EBxT3,EBxT4) bordercolor(0,0,0,0)drawtriangle(barindex,Hx1,barindex,KJ,barindex[1],Hx1[1]) coloured(EBxT1,EBxT2,EBxT3,EBxT4) bordercolor(0,0,0,0)endif//=//if Hx1 < KJ and Hx1[1] => KJ[1] and TK < KJ thendrawtriangle(barindex,Hx1,barindex,KJ,barindex[1],KJ[1]) coloured(EBxT1,EBxT2,EBxT3,EBxT4) bordercolor(0,0,0,0)endif//=//if Hx1 => KJ and Hx1[1] < KJ[1] and TK < KJ thendrawtriangle(barindex[1],Hx1[1],barindex[1],KJ[1],barindex,KJ) coloured(EBxT1,EBxT2,EBxT3,EBxT4) bordercolor(0,0,0,0)endif////=/===============/=//=/===============/=//=/ Excès Kijun////=/ UP T1if Lx2 > XB and Lx2[1] => XB[1] and KJ > XB thendrawtriangle(barindex[1],Lx2[1],barindex[1],XB[1],barindex,XB) coloured(EKxT1,EKxT2,EKxT3,EKxT4) bordercolor(0,0,0,0)drawtriangle(barindex,Lx2,barindex,XB,barindex[1],Lx2[1]) coloured(EKxT1,EKxT2,EKxT3,EKxT4) bordercolor(0,0,0,0)endif//=//if Lx2 > XB and Lx2[1] =< XB[1] and KJ > XB thendrawtriangle(barindex,Lx2,barindex,XB,barindex[1],XB[1]) coloured(EKxT1,EKxT2,EKxT3,EKxT4) bordercolor(0,0,0,0)endif//=//if Lx2 =< XB and Lx2[1] > XB[1] and KJ > XB thendrawtriangle(barindex[1],Lx2[1],barindex[1],XB[1],barindex,XB) coloured(EKxT1,EKxT2,EKxT3,EKxT4) bordercolor(0,0,0,0)endif//=/ DW T1if Hx2 < XB and Hx2[1] =< XB[1] and KJ < XB thendrawtriangle(barindex[1],Hx2[1],barindex[1],XB[1],barindex,XB) coloured(EKxT1,EKxT2,EKxT3,EKxT4) bordercolor(0,0,0,0)drawtriangle(barindex,Hx2,barindex,XB,barindex[1],Hx2[1]) coloured(EKxT1,EKxT2,EKxT3,EKxT4) bordercolor(0,0,0,0)endif//=//if Hx2 < XB and Hx2[1] => XB[1] and KJ < XB thendrawtriangle(barindex,Hx2,barindex,XB,barindex[1],XB[1]) coloured(EKxT1,EKxT2,EKxT3,EKxT4) bordercolor(0,0,0,0)endif//=//if Hx2 => XB and Hx2[1] < XB[1] and KJ < XB thendrawtriangle(barindex[1],Hx2[1],barindex[1],XB[1],barindex,XB) coloured(EKxT1,EKxT2,EKxT3,EKxT4) bordercolor(0,0,0,0)endif////=/===============/=//=/===============/=//=/ Fin//return TK coloured(Rx1,Gx1,Bx1,Tx1) style(line,1) as "Tenkan", KJ coloured(Rx2,Gx2,Bx2,Tx2) style(line,2) as "Kijun"1 user thanked author for this post.
Merci pour ce travail et le partage.
1 user thanked author for this post.
Viewing 5 posts - 1 through 5 (of 5 total)
Find exclusive trading pro-tools on 
Similar topics:
