ONCE Period = 14
ONCE BullishFalg = 0
ONCE BearishFalg = 0
ONCE OuvertureHA = (open + close + high + low)/4
ONCE ClotureHA = (open + close)/2
ONCE PlusBasHA = high
ONCE PlusHautHA = low
OuvertureHA = (OuvertureHA + ClotureHA)/2
ClotureHA = (open + close + high + low)/4
PlusBasHA = MIN(MIN(OuvertureHA,ClotureHA),low)
PlusHautHA = MAX(MAX(OuvertureHA,ClotureHA),high)
myRSI = rsi[period](ClotureHA)
if myRSI > 50 then
IF myRSI[1] <= 50 THEN
BullishFlag = 0
ENDIF
DRAWCANDLE (ouvertureHA, plushautHA, plusbasHA, clotureHA) COLOURED (100,200,100)
IF BullishFlag = 0 AND (PlusBasHA = OuvertureHA) THEN
DRAWCANDLE (ouvertureHA, plushautHA, plusbasHA, clotureHA) COLOURED ("Cyan")
BullishFlag = 1
ENDIF
elsif myRSI < 50 then
IF myRSI[1] >= 50 THEN
BearishFlag = 0
ENDIF
DRAWCANDLE (ouvertureHA, plushautHA, plusbasHA, clotureHA) COLOURED (200,100,100)
IF BearishFlag = 0 AND PlusHautHA = OuvertureHA THEN
DRAWCANDLE (ouvertureHA, plushautHA, plusbasHA, clotureHA) COLOURED ("Fuchsia")
BearishFlag = 1
ENDIF
else
DRAWCANDLE (ouvertureHA, plushautHA, plusbasHA, clotureHA) COLOURED (100,100,100)
BullishFlag = 0
BearishFlag = 0
endif
RETURN