ProsSreener candele rialziste / ribassiste come le HAMMER, o le SPIKE

Eccolo (non l’ho provato):

// entrambe le ULTIME DUE candele hanno le condizioni A SEGUIRE...cioè sono ENTRAMBE candele RIALZISTE / RIBASSISTE
 
//le candele devono avere le seguenti dimensioni:
 
// l’ombra inferiore (nel caso di candela rialzista) o superiore (nel caso di candela ribassista) deve essere compresa tra il 40 e il 90% dell’intera lunghezza della candela
// il corpo della candela deve essere compreso tra il 5 ed il 30% dell’intera lunghezza della candela
// l’ombra superiore (nel caso di candela rialzista) o inferiore (nel caso di candela ribassista) deve essere compresa tra il 5 ed il 25% dell’intera lunghezza della candela
 
Corpo          = abs(open - close)       //grandezza del corpo
OmbraSuperiore = high - max(open,close)  //grandezza ombra superiore
OmbraInferiore = min(open,close) - low   //grandezza ombra inferiore
Ampiezza       = range                   //ampiezza della candela (high - low)
 
Rialzo         = (OmbraInferiore >= (Ampiezza  * 0.40) AND OmbraInferiore <= (Ampiezza * 0.90))
Ribasso        = (OmbraSuperiore >= (Ampiezza  * 0.40) AND OmbraSuperiore <= (Ampiezza * 0.90))
 
Rialzo         = Rialzo  AND (OmbraSuperiore >= (Ampiezza  * 0.05) AND OmbraSuperiore <= (Ampiezza * 0.40))
Ribasso        = Ribasso AND (OmbraInferiore >= (Ampiezza  * 0.05) AND OmbraInferiore <= (Ampiezza * 0.40))
 
Rialzo         = Rialzo  AND (Corpo >= (Ampiezza * 0.05)) AND (Corpo <= (Ampiezza * 0.35))
Ribasso        = Ribasso AND (Corpo >= (Ampiezza * 0.05)) AND (Corpo <= (Ampiezza * 0.35))

MM200          = average[200,0](close)
MM20           = average[20,0](close)
Rialzo2        = close < MM200
Rialzo3        = close < MM20
Ribasso2       = close > MM200
Ribasso3       = close > MM20
FiltriRialzo   = Rialzo2  AND Rialzo3
FiltriRibasso  = Ribasso2 AND Ribasso3

Risultato      = 0
IF (summation[2](Rialzo) = 2) AND FiltriRialzo THEN
   Risultato = 1                                 //restituisce 1 per i pattern al RIALZO
ELSIF (summation[2](Ribasso) = 2) AND FiltriRibasso THEN
   Risultato = 2                                 //restituisce 2 per i pattern al RIBASSO
ENDIF
 
SCREENER [Risultato] (Risultato AS "Rialzo/Ribasso")