02 Avr 2021, 02:36
02 Avr 2021, 09:38
02 Avr 2021, 17:51
02 Avr 2021, 18:16
03 Avr 2021, 01:41
// Version : O.4 TEST
// Auteur : Smarty
// Screener détectant la configuration "SANYAKU KOUTEN" (="improvement", amélioration)
// pouvant apparaître en SORTIE DE RANGE (à vérifier visuellement!)
// *!* Il faut détecter les dépassements dans l'ordre, c'est là toute la difficulté *!*
// La situation "Sanyaku Kouten" se définit ainsi:
// (Tenkan > Kijun ) PUIS ( Chikou > prix passé) PUIS ( prix actuel > Kumo)
// " > " doit être lu comme "dépasse vers le haut"
// =====================================
// DEBUT DES PARAMETRES MODIFIABLES
// =====================================
// Nombre de jours à parcourir, dans le passé, à partir du Kumo breakout pour rechercher une Golden Cross
// (Tenkan dépassant Kijun vers le haut)
nbjFindGC = 25
// Pronfondeur d'analyse :
// Intervalle des jours d'apparition du Kumo Breakout à analyser
// 0: J dernier jour cotation dispo
// 1: J-1
// 2: J-2 ...
// Indice jour de début
jDeb = 0
// Indice jour de fin
jFin = 9
// =====================================
// FIN DES PARAMETRES MODIFIABLES
// =====================================
// Indicateurs Ichimoku classiques
Tenkan = (highest[9](high)+lowest[9](low))/2
Kijun = (highest[26](high)+lowest[26](low))/2
SSpanA = (tenkan[26]+kijun[26])/2
SSpanB = (highest[52](high[26])+lowest[52](low[26]))/2
CondOK = 0
jKumoBreak = jDeb
// Tant qu'on n'a pas parcouru tous les jours à analyser et que "kouten" non trouvée
WHILE jKumoBreak <= jFin AND NOT CondOk
// Pour chaque jour à analyser
// Golden Cross non trouvée
jGoldCross = -1
// Si Kumo breakout
// Pour les SSpan, le n° du jour doit impérativement être précisé sinon J0 (dernier j.de cotation) est utilisé par défaut
IF (close[jKumoBreak] CROSSES OVER SSpanA[jKumoBreak] AND SSpanA[jKumoBreak] >= SSpanB[jKumoBreak]) OR (close[jKumoBreak] CROSSES OVER SSpanB[jKumoBreak] and SSpanB[jKumoBreak] >= SSpanA) THEN
// Recherche du jour d'apparition de Golden Cross
jpos = jKumoBreak
WHILE tenkan [jpos] > kijun [jpos] AND jpos < (nbjFindGC+jKumoBreak) DO
// si Golden Cross au moins 2j avant Kumo breakout
IF tenkan [jpos+2] CROSSES OVER kijun[jpos+2] and tenkan[jpos+2] < SSpanA[jpos+2] and tenkan[jpos+2] < SSpanB[jpos+2] THEN
// Golden Cross sous le nuage
// No jour Golden Cross
jGoldCross = jpos + 2
jpos = nbjFindGC + jKumoBreak // pour sortir de la boucle
ENDIF
jpos = jpos + 1
WEND
// Recherche si Chikou casse prix APRES Golden Cross
// Si aucune GC n'a été trouvée (jGoldCross=-1) sur la période paramétrée, la recherche n'est pas faite
jpos = jKumoBreak
WHILE close [jpos] > close[jpos+26] AND jpos < jGoldCross DO
// si Chikou cross au moins 1j avant Kumo breakout
IF close [jpos+1] CROSSES OVER close[jpos+27] THEN
CondOk = 1
jpos = jGoldCross // pour sortir de la boucle
ENDIF
jpos = jpos + 1
WEND
ENDIF
jKumoBreak = jKumoBreak + 1
WEND // On passe au jour suivant si "kouten" non détecté
SCREENER[CondOK] (jGoldCross*1000+jKumoBreak-1 AS "jGoldCross, jKumoBreak")
06 Avr 2021, 02:57
06 Avr 2021, 10:29
06 Avr 2021, 10:52
07 Avr 2021, 03:27
07 Avr 2021, 11:53