Voici de nouveaux screeners pour ProRealTime que nous offre JC merci beaucoup à lui c'est super sympa !
Ils sont très bien fait et très clairs. (Bruno (Angle)) celui sur les katanas devrait te plaire !
Voici un copié collé du mail de JC qui accepte de partager avec la communauté
3 screeners et mon indicateur (à charger dans le graphique principal).
Pour le screener "Ichi_complet_V2.1" un fois installé il faut que tu fasses "modifier" pour accéder au programme et tu pourras voir dans les premières lignes qu'il y a 12 détections possible, tu peux sélectionner celles qui t’intéresse. Pour cela il suffit de remplacer le 0 par 1 (exemple : selection critere 12 = 1). Le screener te renverra les valeurs qui correspondent à ta sélection.
Pour les 2 autres screener (Ichi_recovery kijun et Ichi_recovery tenkan) c'est plus simple. Ces screeners recherchent les plus gros écarts en pourcent entre les prix et Kijun ou Tenkan. On peut paramétrer la valeur du pourcentage mini dans le programme. Par exemple le programme va me renvoyer toutes les valeurs dont l'écart entre les prix et Kijun est supérieur à 10%. En fait comme je travaille principalement à la hausse sur les actions je détecte toujours un écart en vue d'une hausse, c'est à dire des prix EN DESSOUS de kijun de 10% mini.
Idem pour Tenkan. Le screener recherche des prix sous Tenkan de 10% mini (on changer 10% et mettre 20% par exemple c'est assez courant sur les smalls en période purge).
C'est maintenant l’intérêt de l'indicateur "ligne HB26P +text" cet indicateur va te tracer une ligne horizontal verte sur les + haut à 26 périodes et une rouge sur les + bas à 26 périodes en indiquant la valeur. Ensuite bien en dessous 3 textes :
- Plat kijun = x bougies : c'est difficile à expliquer !! car c'est le nombre de bougie (à venir ou futur) ou l'on aura un plat kijun si les cours restent entre le + haut et le + bas à 26P. Pour mieux visualiser il faut mettre en plus 3 indicateurs suplémentaires qui sont les indicateurs "ligne verticale" une à 9 périodes, une à 26 et une autre à 52 périodes (facultative).
- Ecart prix/kijun = x % : indique le % entre kijun et prix sur la bougie en cours.
- Risk reward = x : c'est le fameux rapport que tu calcules pour savoir si on y va ou pas. Ici on prend le + bas à 26 période c'est le stop et l'objectif c'est la Kijun pour le calcul.
Par exemple l'action AB Science (en daily) , on voit qu'elle a un écart kijun/prix de 44% avec un risk reward de quasi 14 c'est un peu moins pour tenkan. Par contre on voit que le plat kijun indique 1 bougie, ca veut dire que (si les prix restent en le + haut à 26P et le plus bas à 26P) le plat ne va durer que 1 bougie et kijun va débuter une baisse quasi continue donc un peu comme avec la valeur temps des warrants l'écart va diminuer de jours en jours. Mais parfois kijun décroit rapidement et le cours croit à la même vitesse....
Ce croisement on le voit bien avec AXA entrée achat le 29 mars avec quasi 10 % entre prix et kijun et fin du trade le 20 avril
Autre exemple super interessant, l'action VILMORIN (RIN) : Plat kijun = 23 bougies, Ecart prix/kijun = 17 % et risk reward = 84 !! Ici c'est l'inverse si les prix restent en le + haut et le + bas à 26 périodes (toujours la même hypothèse) kijun et tenkan vont former un grand plat dans le futur et la probabilité pour le cours revienne sur tenkan sur forte MAIS comme le cours est en train de dégringoler de plus en plus bas il va falloir attendre un peu que chinkou se redresse et avoir un chandelier de retournement pour tenter un achat. Pour le chandelier de retournement je n'y connais pour l'instant rien donc je fais avec chinkou. Si par exemple demain il y a ce retournement à la hausse et bien on aura 22 bougies pour rester en position après le cours aura peut etre rejoint kijun ou tenkan et le phénomème de l'élastique va disparaitre peu à peu .
Screener 1 ICHI_COMPLET_V2.1
//-- Activation des choix de critère des sélections :
//Correspondance pour activer les criteres de selection
//1 = croisement Chinkou avec Kijun
SelectionCritere1= 1
//2 = croisement Chinkou avec SSA
SelectionCritere2= 0
//3 = croisement Chinkou avec SSB
SelectionCritere3= 0
//4 = croisement Prix avec Kijun
SelectionCritere4= 0
//5 = croisement Tenkan avec Kijun
SelectionCritere5= 0
//6 = Hausse de Tenkan et Kijun et SSA
SelectionCritere6= 0
//7 = Hausse de Tenkan et Kijun et SSA et SSB
SelectionCritere7= 0
//8 = PIP de +
SelectionCritere8= 0
//9 = Katana
SelectionCritere9= 0
//10 = Twist haussier
SelectionCritere10= 1
//11 = Croisement prix avec le nuage (les prix sortent par le haut du nuage)
SelectionCritere11= 0
//12 = + haut à 26P (kijun à la hausse)
SelectionCritere12= 0
// Définition du volume et variation mini
//count=0
//jour=0
//for jour=1 to 52 do
//varjour = high[jour] - low[jour]
//if varjour <= 0.01 then
//count = count+1
//endif
//next
volmin52p=lowest[52](close)*lowest[52](volume)
//c1=count<=2
c2=volmin52p>1000 // 1000 € par bougie
//-- definition screen_Ichi_Complet--
Kijun = (Highest [26] (High) + Lowest [26] (Low)) /2
Kijun26PAvant = Kijun[26]
Tenkan = (Highest [9] (High) + Lowest [9] (Low)) /2
chinkou = Close
SpanA = (Tenkan + Kijun) / 2
SenkouSpanA52Avant = SpanA[52]
SpanB = ((HIGHEST [52] (HIGH)) + LOWEST [52] (LOW)) / 2
SenkouSpanB52Avant = SpanB [52]
SSA26Avant =SpanA[26]
SSB26Avant =SpanB[26]
//-- croissement hausse Chinkou et Kijun criere 1 ------
CassureHaussiereChinkouKijun = (chinkou >= Kijun26PAvant) AND (chinkou[1] <= Kijun26PAvant[1]) and SelectionCritere1=1
// -- croissement hausse Chinkou et SSA critere 2 ----
CassureHaussiereChinkouSpanA = (chinkou CROSSES OVER SenkouSpanA52Avant)and SelectionCritere2=1
// -- croissement hausse Chinkou et SSB critere 3 ----
CassureHaussiereChinkouSpanB = (chinkou CROSSES OVER SenkouSpanB52Avant)and SelectionCritere3=1
//-- Croisement prix et kijun critere 4 --
CroixPK = Close crosses over Kijun and SelectionCritere4=1
//-- Croisement Tenkan et Kijun crirere 5 --
CroixTK = Tenkan crosses over Kijun and SelectionCritere5=1
//-- Hausse Tenkan et Kijun et Chinkou et SSA et SSB plat critere 6 --
HausseTKCA = (Kijun>Kijun[1]) and (Kijun[1]>=Kijun[2]) and (Tenkan>Tenkan[1]) and (Tenkan[1]>=Tenkan[2]) and (chinkou>chinkou[1]) and (chinkou[1]>=chinkou[2]) and (SpanA>SpanA[1]) and (SpanA[1]>=SpanA[2])and (SpanB=SpanB[1]) and (SpanB[1]>=SpanB[2]) and SelectionCritere6=1
//-- Hausse Tenkan et Kijun et Chinkou et SSA et SSB critere 7 --
HausseTKCAB = (Kijun>Kijun[1]) and (Kijun[1]>=Kijun[2]) and (Tenkan>Tenkan[1]) and (Tenkan[1]>=Tenkan[2]) and (chinkou>chinkou[1]) and (chinkou[1]>=chinkou[2]) and (SpanA>SpanA[1]) and (SpanA[1]>=SpanA[2]) and (SpanB>SpanB[1]) and (SpanB[1]>=SpanB[2])and SelectionCritere7=1
//-- PIP de plus critere 8 ----
PH52 = Highest[52](high)
PHjour = high[0]
Pipdeplus = PHjour = PH52 and SelectionCritere8=1
//-- Katana critere 9 ----
Katana = (Tenkan = Kijun) and (Tenkan[1] = Kijun[1])and (Kijun>Kijun[1]) and (Tenkan>Tenkan[1]) and SelectionCritere9=1
// -- TWIST haussier : SSA croise à la hausse SSB critere 10 --
TWH = (SpanA[2] < SpanB[2]) and (SpanA[1]<= SpanB[1]) and (SpanA > SpanB) and SelectionCritere10=1
// -- Croisement prix avec nuage à la hausse critere 11 --
PrixSSA = SSA26Avant > SSB26Avant and close Crosses over SSA26Avant and chinkou > close[26] and SelectionCritere11=1
PrixSSB = SSB26Avant > SSA26Avant and close crosses over SSB26Avant and chinkou > close[26] and SelectionCritere11=1
// -- + haut à 26P kijun à la hausse critere 12 --
H26P = Highest[26](high) and selectionCritere12=1
//-- Tri des criteres de selection ---
IF (chinkou >= Kijun26PAvant) AND (chinkou[1] <= Kijun26PAvant[1]) AND (chinkou[2]<= Kijun26PAvant[2]) AND SelectionCritere1=1 THEN
Critere1 = 2.1
Else
Critere1 = 0
ENDIF
IF (chinkou CROSSES OVER SenkouSpanA52Avant)AND SelectionCritere2=1 THEN
Critere2 = 2.1
ELSE
Critere2 = 0
ENDIF
IF (chinkou CROSSES OVER SenkouSpanB52Avant)AND SelectionCritere3=1 THEN
Critere3 = 2.1
ELSE
Critere3 = 0
ENDIF
IF Close crosses over Kijun AND SelectionCritere4=1 THEN
Critere4 = 1.1
ELSE
Critere4 = 0
ENDIF
IF Tenkan crosses over Kijun AND SelectionCritere5=1THEN
Critere5 = 2.1
ELSE
Critere5 = 0
ENDIF
IF (Kijun>Kijun[1]) and (Kijun[1]>=Kijun[2]) and (Tenkan>Tenkan[1]) and (Tenkan[1]>=Tenkan[2]) and (chinkou>chinkou[1]) and (chinkou[1]>=chinkou[2]) and (SpanA>SpanA[1]) and (SpanA[1]>=SpanA[2]) AND SelectionCritere6=1 THEN
Critere6 = 1.1
ELSE
Critere6 = 0
ENDIF
IF (Kijun>Kijun[1]) and (Kijun[1]>=Kijun[2]) and (Tenkan>Tenkan[1]) and (Tenkan[1]>=Tenkan[2]) and (chinkou>chinkou[1]) and (chinkou[1]>=chinkou[2]) and (SpanA>SpanA[1]) and (SpanA[1]>=SpanA[2]) and (SpanB>SpanB[1]) and (SpanB[1]>=SpanB[2]) AND SelectionCritere7=1 THEN
Critere7 = 1.1
ELSE
Critere7 = 0
ENDIF
IF PHjour = PH52 AND SelectionCritere8=1 THEN
Critere8 = 1.1
ELSE
Critere8 = 0
ENDIF
IF (Tenkan = Kijun) and (Tenkan[1] = Kijun[1])and (Kijun>Kijun[1]) and (Tenkan>Tenkan[1])AND SelectionCritere9=1 THEN
Critere9 = 1.1
ELSE
Critere9=0
ENDIF
IF (SpanA[2] < SpanB[2]) and (SpanA[1]<= SpanB[1]) and (SpanA > SpanB) and SelectionCritere10=1 THEN
Critere10 = 1.1
ELSE
Critere10 = 0
ENDIF
IF (SSA26Avant > SSB26Avant and close Crosses over SSA26Avant and chinkou > close[26] and SelectionCritere11=1) or (SSB26Avant > SSA26Avant and close crosses over SSB26Avant and chinkou > close[26] and SelectionCritere11=1)THEN
Critere11=4.1
ELSE
Critere11 = 0
ENDIF
IF H26P = Highest[26](high) and selectionCritere12=1 THEN
Critere12=1.1
Else
Critere12=0
ENDIF
Critere = Critere1 + Critere2 + Critere3 +Critere4 + Critere5 + Critere6 + Critere7 + Critere8 +Critere9 + Critere10 + Critere11 + Critere12
SCREENER[((CassureHaussiereChinkouKijun) or (CassureHaussiereChinkouSpanA) or (CassureHaussiereChinkouSpanB) or (CroixPK) or (CroixTK) or (HausseTKCA) or (HausseTKCAB) or (Pipdeplus) or (Katana) or (TWH) or (PrixSSA) or (PrixSSB) or H26P) and c2] (Critere AS "Critere")
SCREENER 2 ICHI_Recovery Kijun
//REM Kijun-Sen
Upper2 = HIGHEST[26](HIGH)
Lower2 = LOWEST[26](LOW)
Kijun = (Upper2 + Lower2) / 2
// calcul de l'écart en % entre kijun et le cours
riskreward = (Kijun - close) / (close - lower2)
Ecartpourcent = ((Kijun - close)/ close)*100
// calcul du nb de bougies restant jusqu'au plus haut
period = 26
Yhh = highest[period](high)
///Yll = lowest[period](low)
FOR i = 0 to period do
if high[i] = Yhh then
Xhh = barindex[i]
endif
//if low[i] = Yll then
//Xll = barindex[i]
//endif
NEXT
Ecarttemps=Xhh-(barindex-26)
// -- Montant minimum en € échangé ---
volmini = lowest[9](volume)
prixmini = lowest[9](close)
montantmini = volmini * prixmini
vol = montantmini> 3000
c2 = riskreward >= 2
SCREENER [(riskreward and vol and c2)and Ecartpourcent > 5 and Ecarttemps > 5 ] (Ecartpourcent AS "E%")
SCREENER 3 ICHI_RECOVERY tenkan
//REM Kijun-Sen
Upper2 = HIGHEST[9](HIGH)
Lower2 = LOWEST[9](LOW)
Tenkan = (Upper2 + Lower2) / 2
// calcul de l'écart en % entre kijun et le cours
riskreward = (Tenkan - close) / (close - lower2)
Ecartpourcent = ((Tenkan - close)/ close)*100
// calcul du nb de bougies restant jusqu'au plus haut
period = 9
Yhh = highest[period](high)
///Yll = lowest[period](low)
FOR i = 0 to period do
if high[i] = Yhh then
Xhh = barindex[i]
endif
//if low[i] = Yll then
//Xll = barindex[i]
//endif
NEXT
Ecarttemps=Xhh-(barindex-9)
// -- Montant minimum en € échangé ---
volmini = lowest[9](volume)
prixmini = lowest[9](close)
montantmini = volmini * prixmini
vol = montantmini> 2000
c2 = riskreward >= 2
SCREENER [(riskreward and vol and c2)and Ecartpourcent > 4 and Ecarttemps > 2 ] (Ecartpourcent AS "E%")
Indicateur
defparam drawonlastbaronly = true
hh = highest[26](high)
ll = lowest[26](low)
decaltextH=(hh*1)/100
decaltextB=(ll*1)/100
DRAWHLINE(hh)coloured(0,200,0)
DRAWHLINE(ll)coloured(200,0,0)
DRAWTEXT("+Haut 26P = #hh#",barindex-1,hh+decaltextH,SansSerif,Bold,16)coloured(0,200,0)
DRAWTEXT("+Bas 26P = #ll#",barindex-1,ll-decaltextB,SansSerif,Bold,16)coloured(200,0,0)
period = 26
Yhh = highest[period](high)
///Yll = lowest[period](low)
FOR i = 0 to period do
if high[i] = Yhh then
Xhh = barindex[i]
endif
//if low[i] = Yll then
//Xll = barindex[i]
//endif
NEXT
ecarttemps=Xhh-(barindex-26)
DRAWTEXT("Plat kijun = #ecarttemps# bougies ",barindex-1,ll-5*decaltextB,SansSerif,Bold,16)coloured(0,0,0)
ecartpourcent = ((kijun - close)/ close)*100
DRAWTEXT("Ecart prix / kijun = #ecartpourcent# % ",barindex-1,ll-10*decaltextB,SansSerif,Bold,16)coloured(0,0,0)
upper2 = HIGHEST[26](HIGH)
lower2 = LOWEST[26](LOW)
kijun = (upper2 + lower2) / 2
riskreward = (kijun-close) / (close-lower2)
DRAWTEXT("Risk Reward = #riskreward# ",barindex-1,ll-15*decaltextB,SansSerif,Bold,16)coloured(0,0,0)
//DRAWARROWUP(barindex[1],hh)coloured(0,200,0)
RETURN







