INDICADORES : HAIKUIDATEN

Me encontraba rebuscando en Google , cuando por casualidad , como siempre, hallé una interesante página alemana de programación para la plataforma Prorealtime http://www.aktienboard.com/forum/f29/prorealtime-cmc-script-programmierung-t94783/215
Echando mano del traductor y paciencia , me topé con un indicador sumamente curioso ,colgado por un forero apodado Trader-Hawk, bajo el nombre de Candle Pattern , el indicador en cuestión era un detector de patrones de velas japonesas . Su aspecto visual así como su función me recordó enseguida al indicador del gran Blai5 http://www.blai5.net/www/  el Blai HAIKU.
Al descargarme el indicador alemán me dí cuenta de que siendo en esencia un indicador de patrones como el de Blai , este utilizaba otros patrones, y entonces se me ocurrió ¿ y si uniéramos los patrones de ambos en un solo indicador?.
Vaya por delante mi agradecimiento a Xavier García (Blai5) por su amabilidad y disponibilidad ,con el que me puse en contacto, siendo él, el que me animó a ello.
Empecé a la tarea ,pero todavía me faltaba otro detalle, ponerle un nombre molón a ese indicador que tenía en mente.
Para ello,recurrí al foro http://www.bolsacafe.com/  donde el ilustre forero Loquillo (como en otras ocasiones) fué mi fuente de inspiración.Ya que el indicador es un híbrido ,debía respetar a ambos,así que  por un lado tenía la hermosa palabra HAIKU (forma de poesía tradicional japonesa) y por otro lado  un homenaje a la figura mítica de los mercados , el cuidata, pero bajo un toque germánico ,algo así como KUIDATEN.
El HAIKUIDATEN tiene este aspecto...

Tiene la peculiaridad de que cuando avanzamos el cursor por encima de una de sus barras,nos muestra cúal es el patrón encontrado,tal como veís aquí...

Sin más dilación ,! totalmente gratis ,oiga !,para todo aquel que tenga interés por testearlo o simplemente tenerlo para vacilar con los colegas , aquí os pongo su código para la plataforma Prorealtime :

--------------------------------------------------------------------------------------------------------

REM HAIKUIDATEN
REM programado por Miguel Angel Castillo - Octubre 2014
REM indicador mixto basado en el indicador BlaiHaiku de Blai5 y
// el indicador Candle pattern de Trader-Hawk.

REM  Martillo- Hombre colgado (HHM)

IF close > open and (open - low) > (2 *(close - open)) and (2 *(high - close)) < (close - open) THEN
HHM = 1

ELSIF close < open and (close - low) > (2 *(open - close)) and (2 *(high - open)) < (open - close) THEN
HHM = -1

ELSE
HHM = 0

ENDIF
REM  Estrella matutina-martillo invertido (SSIH)

IF close > open and (high - close) > (2 *(close - open)) and (2 *(open - low)) < (close - open) THEN
SSIH = 2

ELSIF close < open and (high - open) > (2 *(open - close)) and (2 *(close - low)) < (open - close) THEN
SSIH = -2

ELSE
SSIH = 0

ENDIF

REM Doji(Doji)

IF open < close and (high - close) > (3 *(close - open)) and (open - low) > (3 * (close - open)) THEN
Doji = 3

ELSIF open > close and (high - open) > (3 *(open - close)) and (close - low) >(3 * (open - close)) THEN
Doji = -3

ELSE
Doji = 0

ENDIF

REM Harami (HARA)

IF close[1]<open[1]and open<close and open>=close[1]and close<=open[1]and high[1]>high and low[1]<low THEN
HARA=4
ELSIF close[1]>open[1]and open>close and open<=close[1]and close>=open[1]and high[1]>high and low[1]<low THEN
HARA=-4
ELSE
HARA=0
ENDIF

REM Envolvente (ENVOL)

IF close[1]<open[1]and range>0 and open<low[1]and close>high[1] THEN
ENVOL=5
ELSIF close[1]>open[1]and open>high[1]and close<low[1] THEN
ENVOL=-5
ELSE
ENVOL=0
ENDIF

REM Penetrante alcista-Cubierta nube oscura (PACNO)
IF close[1]<close[2]and close[2]<close[3]and open[1]>close[1]and open<close and open<close[1]and low<low[1] THEN
PACNO=6
ELSIF close[1]>close[2]and close[2]>close[3]and open[1]<close[1]and open>close and open>close[1]and high>high[1] THEN
PACNO=-6
ELSE
PACNO=0
ENDIF

RETURN PACNO as "Penetrante alcista-Cubierta nube oscura",Doji as "Doji",SSIH as "Estrella matutina-Martillo invertido",HARA as "Harami",HHM as "Martillo-Hombre colgado",ENVOL as "Envolvente"

----------------------------------------------------------------------------------------------------------

En el cuadro de propiedades configurarlo todo en estilo histograma y elegir colores alcista y bajista.