Kosaten Hyo (Croisement de courbe)

Viewing 6 posts - 1 through 6 (of 6 total)
  • Author
    Posts
  • #97075 quote
    swapping
    Participant
    Master

    Certains considèrent que la bourse est un jeu à somme nulle, d’autre pense qu’il y a une similitude entre Poker et stratégie mais personne ne remarque que le trading s’apparente au jeu d’échecs car il faut prévoir les coups à l’avance ?

    C’est chose faite avec ce programme qui trace sous forme de pièces les événements éphémères les plus importants !

    Qu’il soit blanc ou noir le choix du camp est important puisque c’est à vous qu’incombe la suite des évènements. Adopter une stratégie garantissant le contrôle des mouvements présent et à venir car dans ce jeu vous êtes la pièce principale qu’il faut conserver en toute circonstance et de son issue dépendra la réussite ou un cuisant échec …

    Le rôle des pièces spécifique au système “ichimoku” est le suivant:
    – ♖ La Tour : Elle vous informe sur la formation d’un “Twist Crossing” en traçant un rectangle encadrant les points mini/maxi des 26 dernières bougies (ou des 13 bougies dans le cas d’un “Twist Flat”)
    – ♗ Le Fou : Sur un croisement “Tenkan-sen et Kijun-sen” indique la possibilité d’un départ imminent d’une Tendance
    – ♘ Le Cavalier : Il montre le signal d’un Katana dès la superposition sur 2 ou 3 points de Tenkan et Kijun
    – ♕ La Reine : Pièce importante qui visualise tout croisement qu’effectue la “Chikou Span” aux abords ou dans le “Kumo”
    – ♙ Le Pion : La mémoire du passé évoluant en zone libre pour ouvrir le chemin une fois les obstacles franchis avec l’aide de la Reine
    – ♔ Le Roi : Maître de l’avenir (clairvoyance, sagesse, patiente, humilité) tout cela s’apprends avec le temps mais il faut faire attention aux pièges cachés qui ne sont ni le marché ni les courtiers mais bien Toi !!!

    // Kosaten Hyo | Indicator
    // 24/04/2019 (Release 1.0)
    // Swapping @ www.forexswap.fr
    // Sharing ProRealTime knowledge (alt+16)
    // (Kosaten Hyo) "Croisement de courbe" (Katana) "Lame Longue" (Daisho) "Lame courte"
    
    DefParam DrawOnLastBarOnly = true
    // --- Property settings
    alpha = max(alpha,0)         // Limit input variable
    alpha = min(alpha,255)       //
    // --- end
    
    period = (p)
    UpHH = highest[period](high)
    LoLL = lowest[period](low)
    
    Tenkansen = (highest[9](High)+lowest[9](Low))/2
    Kijunsen  = (highest[26](High)+lowest[26](Low))/2
    SenkouSA  = (Tenkansen[26]+Kijunsen[26])/2
    SenkouSB  = (highest[52](High[26])+lowest[52](Low[26]))/2
    
    Kata1 = summation[2](Tenkansen = Kijunsen) = 2  // (two contacts followed   = Katana)
    Kata2 = summation[3](Tenkansen = Kijunsen) = 3  // (three contacts followed = Daisho)
    
    if close crosses over tenkansen[26] then
    co1=1              // for further development
    if ColorPawn = 0 then
    DrawText("♕",barindex[26],close,Dialog,Standard,20) coloured(0,0,0,alpha)    // chess queen white
    else
    DrawText("♛",barindex[26],close,Dialog,Standard,20) coloured(0,0,0,alpha)    // chess queen black
    endif
    if close crosses under tenkansen[26] then
    co2=2
    if ColorPawn = 0 then
    DrawText("♕",barindex[26],close,Dialog,Standard,20) coloured(0,0,0,alpha) // chess queen white
    else
    DrawText("♛",barindex[26],close,Dialog,Standard,20) coloured(0,0,0,alpha) // chess queen black
    endif
    endif
    endif
    if close crosses over kijunsen[26] then
    co1=3
    if ColorPawn = 0 then
    DrawText("♕",barindex[26],close,Dialog,Standard,20) coloured(0,0,0,alpha)    // chess queen white
    else
    DrawText("♛",barindex[26],close,Dialog,Standard,20) coloured(0,0,0,alpha)    // chess queen black
    endif
    endif
    if close crosses under kijunsen[26] then
    co2=4
    if ColorPawn = 0 then
    DrawText("♕",barindex[26],close,Dialog,Standard,20) coloured(0,0,0,alpha)    // chess queen white
    else
    DrawText("♛",barindex[26],close,Dialog,Standard,20) coloured(0,0,0,alpha)    // chess queen black
    endif
    endif
    
    if close crosses over senkousa[26] then
    co1=5
    if ColorPawn = 0 then
    DrawText("♕",barindex[26],close,Dialog,Standard,20) coloured(0,0,0,alpha)    // chess queen white
    else
    DrawText("♛",barindex[26],close,Dialog,Standard,20) coloured(0,0,0,alpha)    // chess queen black
    endif
    endif
    if close crosses under senkousa[26] then
    co2=6
    if ColorPawn = 0 then
    DrawText("♕",barindex[26],close,Dialog,Standard,20) coloured(0,0,0,alpha)    // chess queen white
    else
    DrawText("♛",barindex[26],close,Dialog,Standard,20) coloured(0,0,0,alpha)    // chess queen black
    endif
    endif
    
    if close crosses over senkousb[26] then
    co1=7
    if ColorPawn = 0 then
    DrawText("♕",barindex[26],close,Dialog,Standard,20) coloured(0,0,0,alpha)    // chess queen white
    else
    DrawText("♛",barindex[26],close,Dialog,Standard,20) coloured(0,0,0,alpha)    // chess queen black
    endif
    endif
    if close crosses under senkousb[26] then
    co2=8
    if ColorPawn = 0 then
    DrawText("♕",barindex[26],close,Dialog,Standard,20) coloured(0,0,0,alpha)    // chess queen white
    else
    DrawText("♛",barindex[26],close,Dialog,Standard,20) coloured(0,0,0,alpha)    // chess queen black
    endif
    endif
    
    if Tenkansen crosses over Kijunsen then
    co1=9
    if ColorPawn = 0 then
    DrawText("♗",barindex,kijunsen,Dialog,Standard,20) coloured(0,0,0,alpha)     // chess crazy white
    else
    DrawText("♝",barindex,Tenkansen,Dialog,Standard,20) coloured(0,0,0,alpha)    // chess crazy black
    endif
    endif
    if Tenkansen crosses under Kijunsen then
    co2=10
    if ColorPawn = 0 then
    DrawText("♗",barindex,kijunsen,Dialog,Standard,20) coloured(0,0,0,alpha)     // chess crazy white
    else
    DrawText("♝",barindex,Tenkansen,Dialog,Standard,20) coloured(0,0,0,alpha)    // chess crazy black
    endif
    endif
    
    if Kijunsen crosses over Tenkansen then
    co1=11
    if ColorPawn = 0 then
    DrawText("♗",barindex,kijunsen,Dialog,Standard,20) coloured(0,0,0,alpha)     // chess crazy white
    else
    DrawText("♝",barindex,Tenkansen,Dialog,Standard,20) coloured(0,0,0,alpha)    // chess crazy black
    endif
    endif
    if Kijunsen crosses under Tenkansen then
    co2=12
    if ColorPawn = 0 then
    DrawText("♗",barindex,kijunsen,Dialog,Standard,20) coloured(0,0,0,alpha)     // chess crazy white
    else
    DrawText("♝",barindex,Tenkansen,Dialog,Standard,20) coloured(0,0,0,alpha)    // chess crazy black
    endif
    endif
    
    if close > tenkansen[26] and close > kijunsen[26] and close > senkousa[26] and close > senkousb[26] and close > high[26] then // Chikou Span » Free High Area
    co1=13
    if ColorPawn = 0 then
    DrawText("♙",barindex[26],close,Dialog,Standard,26) coloured(0,0,0,alpha)    // chess pawn white
    else
    DrawText("♟",barindex[26],close,Dialog,Standard,26) coloured(0,0,0,alpha)    // chess pawn black
    endif
    endif
    if close < tenkansen[26] and close < kijunsen[26] and close < senkousa[26] and close < senkousb[26] and close < high[26] then // Chikou Span « Free Low Area
    co2=14
    if ColorPawn = 0 then
    DrawText("♙",barindex[26],close,Dialog,Standard,26) coloured(0,0,0,alpha)    // chess pawn white
    else
    DrawText("♟",barindex[26],close,Dialog,Standard,26) coloured(0,0,0,alpha)    // chess pawn black
    endif
    endif
    
    if Kata1 then
    co1=15
    DrawText("Katana",barindex[5],LoLL,Dialog,BoldItalic,18) coloured(0,160,250)
    if ColorPawn = 0 then
    DrawText("♘",barindex,Tenkansen,Dialog,Standard,20) coloured(0,0,0,alpha)    // chess horse white
    else
    DrawText("♞",barindex,Tenkansen,Dialog,Standard,20) coloured(0,0,0,alpha)    // chess horse black
    endif
    if Kata2 then
    co2=16
    DrawText("Daisho",barindex,UpHH,Dialog,BoldItalic,16) coloured(250,160,0)
    if ColorPawn = 0 then
    DrawText("♘",barindex,Tenkansen,Dialog,Standard,20) coloured(0,0,0,alpha) // chess horse white
    else
    DrawText("♞",barindex,Tenkansen,Dialog,Standard,20) coloured(0,0,0,alpha) // chess horse black
    endif
    endif
    endif
    
    if SenkouSA crosses over SenkouSB or SenkouSA crosses under SenkouSB then    // Twist crossing
    co1=17
    DrawText("Twist Cross",barindex[35],UpHH,Dialog,BoldItalic,18) coloured(250,160,0)
    DrawLine(barindex[period],UpHH[0],barindex[0],UpHH[0]) coloured(222,0,0)  // Line Upper (Optional)
    DrawLine(barindex[period],LoLL[0],barindex[0],LoLL[0]) coloured(0,222,0)  // Line Lower (Optional)
    DrawRectangle(barindex[period],UpHH[0],barindex,LoLL[0])                  // Default
    if ColorPawn = 0 then
    DrawText("♖",barindex,SenkouSA,Dialog,Standard,20) coloured(0,0,0,alpha)     // chess tower white
    else
    DrawText("♜",barindex,SenkouSA,Dialog,Standard,20) coloured(0,0,0,alpha)     // chess tower black
    endif
    endif
    if SenkouSA = SenkouSB then                                                  // Twist flat
    co2=18
    DrawText("Twist Flat",barindex[21],UpHH,Dialog,BoldItalic,18) coloured(250,160,0)
    period = (p)/2
    UpHH = highest[period](high)
    LoLL = lowest[period](low)
    DrawLine(barindex[period],UpHH[0],barindex[0],UpHH[0]) coloured(222,0,0)  // Line Upper (Optional)
    DrawLine(barindex[period],LoLL[0],barindex[0],LoLL[0]) coloured(0,222,0)  // Line Lower (Optional)
    DrawRectangle(barindex[period],UpHH[0],barindex,LoLL[0])                  // Default
    if ColorPawn = 0 then
    DrawText("♖",barindex,SenkouSA,Dialog,Standard,20) coloured(0,0,0,alpha)     // chess tower white
    else
    DrawText("♜",barindex,SenkouSA,Dialog,Standard,20) coloured(0,0,0,alpha)     // chess tower black
    endif
    endif
    
    //DrawText("◯",barindex[26],LoDay,MonoSpaced,Standard,26) coloured(10,190,0)  // for further development
    DrawText(" #co1#",barindex[26],LoDay,SansSerif,Bold,18) coloured(10,190,0,0) //    -------------
    //DrawText("◯",barindex[20],LoDay,MonoSpaced,Standard,26) coloured(190,10,0)  //    -------------
    DrawText(" #co2#",barindex[20],LoDay,SansSerif,Bold,18) coloured(190,10,0,0) //    -------------
    
    // Fibonacci Section
    if day <> day[1] then
    firstbar = barindex
    endif
    HiDay       = dhigh(0)
    LoDay       = dlow(0)
    
    if Fibonacci = 1 then
    fib0    = (hiday-loday)*.0+loday
    DrawSegment(firstbar,fib0,barindex-3,fib0) coloured(0,0,0,alpha)
    DrawText("0%",barindex,fib0,Dialog,Bold,11) coloured(0,0,0,alpha)
    fib236  = (hiday-loday)*.236+loday
    DrawSegment(firstbar,fib236,barindex-3,fib236) coloured(0,0,0,alpha)
    DrawText("23.6%",barindex,fib236,Dialog,Bold,11) coloured(0,0,0,alpha)
    fib382  = (hiday-loday)*.382+loday
    DrawSegment(firstbar,fib382,barindex-3,fib382) coloured(0,0,0,alpha)
    DrawText("38.2%",barindex,fib382,Dialog,Bold,11) coloured(0,0,0,alpha)
    fib500  = (hiday-loday)*.5+loday
    DrawSegment(firstbar,fib500,barindex-3,fib500) coloured(0,0,0,alpha)
    DrawText("50.0%",barindex,fib500,Dialog,Bold,11) coloured(0,0,0,alpha)
    fib618  = (hiday-loday)*.618+loday
    DrawSegment(firstbar,fib618,barindex-3,fib618) coloured(0,0,0,alpha)
    DrawText("61.8%",barindex,fib618,Dialog,Bold,11) coloured(0,0,0,alpha)
    fib764  = (hiday-loday)*.764+loday
    DrawSegment(firstbar,fib764,barindex-3,fib764) coloured(0,0,0,alpha)
    DrawText("76.4%",barindex,fib764,Dialog,Bold,11) coloured(0,0,0,alpha)
    fib1000 = (hiday-loday)*1.0+loday
    DrawSegment(firstbar,fib1000,barindex-3,fib1000) coloured(0,0,0,alpha)
    DrawText("100%",barindex,fib1000,Dialog,Bold,11) coloured(0,0,0,alpha)
    elsif Fibonacci = 2 then
    fib0    = (hiday-loday)*1.0+loday
    DrawSegment(firstbar,fib0,barindex-3,fib0) coloured(0,0,0,alpha)
    DrawText("0%",barindex,fib0,Dialog,Bold,11) coloured(0,0,0,alpha)
    fib236  = (hiday-loday)*.764+loday
    DrawSegment(firstbar,fib236,barindex-3,fib236) coloured(0,0,0,alpha)
    DrawText("23.6%",barindex,fib236,Dialog,Bold,11) coloured(0,0,0,alpha)
    fib382  = (hiday-loday)*.618+loday
    DrawSegment(firstbar,fib382,barindex-3,fib382) coloured(0,0,0,alpha)
    DrawText("38.2%",barindex,fib382,Dialog,Bold,11) coloured(0,0,0,alpha)
    fib500  = (hiday-loday)*.5+loday
    DrawSegment(firstbar,fib500,barindex-3,fib500) coloured(0,0,0,alpha)
    DrawText("50.0%",barindex,fib500,Dialog,Bold,11) coloured(0,0,0,alpha)
    fib618  = (hiday-loday)*.382+loday
    DrawSegment(firstbar,fib618,barindex-3,fib618) coloured(0,0,0,alpha)
    DrawText("61.8%",barindex,fib618,Dialog,Bold,11) coloured(0,0,0,alpha)
    fib764  = (hiday-loday)*.236+loday
    DrawSegment(firstbar,fib764,barindex-3,fib764) coloured(0,0,0,alpha)
    DrawText("76.4%",barindex,fib764,Dialog,Bold,11) coloured(0,0,0,alpha)
    fib1000 = (hiday-loday)*.0+loday
    DrawSegment(firstbar,fib1000,barindex-3,fib1000) coloured(0,0,0,alpha)
    DrawText("100%",barindex,fib1000,Dialog,Bold,11) coloured(0,0,0,alpha)
    endif
    
    return
    

    Vous pouvez modifier le nombre de chandelier, ajouter un Fibonacci du plus haut et du plus bas, inverser ses valeurs, vous pouvez également rendre partiellement transparent les pièces et même choisir la couleur (blanche ou noire)…

    Alai-n thanked this post
    DJI-3-minutes.png DJI-3-minutes.png DJI-20-minutes.png DJI-20-minutes.png DJI-21-Ticks.png DJI-21-Ticks.png Ich-Kosaten-Hyo.itf
    #98018 quote
    Nicolas
    Keymaster
    Master

    Merci Swapping, décidément Ichimoku est pour toi une source intarassible pour la création d’indicateurs personnalisés ! 😆

    A nouveau, je vois bien cet indicateur prend place dans la bibliothèque de codes pour PRT du site ! Bravo.

    swapping thanked this post
    #98040 quote
    swapping
    Participant
    Master

    Bonjour à tous

    Une rectification doit être faites à la ligne 177 afin d’éviter un message d’erreur par celle-ci dessous

    period = 13

    Si Nicolas peut la modifier en dur dans le fichier itf avant mise en bibliothèque ce sera super

    #98128 quote
    Nicolas
    Keymaster
    Master

    Le mieux serait de ma partager le fichier itf ici stp, il y a d’autres paramètres qui ne sont pas inclut dans le code (p, colorpawn, fibonacci). Pour info, quand tu postes dans la library, il y a un bouton pour ajouter le fichier itf, cela m’évite ce genre de recherche ! 🙂

    #98138 quote
    swapping
    Participant
    Master

    Bonjour Nicolas, c’est étrange puisque je l’ai bien dans le fichier que j’ai placé sur le thread #97075 ? je le télécharge et il est bien présent !

    Je le replace ici en pièce jointe ( celui-ci est corrigé à la ligne 177  ce sera celui la à placer dans la bibliothèque si tu veux bien) et te montre un screenshout des variables (en dur) du fichier .itf

    de tout façon, merci

    Nicolas thanked this post
    Ich-Kosaten-Hyo.itf variables_en_dur.png variables_en_dur.png
    #98293 quote
    Nicolas
    Keymaster
    Master

    Désolé je n’avais pas remarqué le fichier ! Je m’occupe du post dans la library, merci encore.

Viewing 6 posts - 1 through 6 (of 6 total)
  • You must be logged in to reply to this topic.

Kosaten Hyo (Croisement de courbe)


ProBuilder : Indicateurs & Outils Personnalisés

New Reply
Author
author-avatar
swapping @swapping Participant
Summary

This topic contains 5 replies,
has 2 voices, and was last updated by Nicolas
6 years, 9 months ago.

Topic Details
Forum: ProBuilder : Indicateurs & Outils Personnalisés
Language: French
Started: 04/24/2019
Status: Active
Attachments: 6 files
Logo Logo
Loading...