defparam cumulateorders = true
av1 = average[3](close)
av2 = average[20](close)
av3 = average[50](close)
//x = 0.5
bull = close> av1 and close >av2 and close > av3
bear = close <av1 and close <av2 and close <av3
//n= 1
If (high-low) = 0 Then
HiLo = 1
Else
HiLo = (high-low)
EndIf
hammerupnegated= max(open,close)<min(open[1],close[1]) and (abs(open-close)/max(pointsize,HiLo))>0.5
hammerup = min(open[1],close[1])>high[1]-(high[1]-low[1])/3 //and timeok
hammerupnegated= max(open,close)<min(open[1],close[1]) and (abs(open-close)/max(pointsize,HiLo))>0.5
cs = hammerup and hammerupnegated and bear
hammerdown = max(open[1],close[1])<low[1]+(high[1]-low[1])/3 //and timeok
hammerdownnegated = min(open,close)>max(open[1],close[1]) and (abs(open-close)/max(pointsize,HiLo))>0.5
cl = hammerdown and hammerdownnegated and bull
if cs and not onmarket then
sellshort 0.25 contract at market
endif
if cl and not onmarket then
buy 0.25 contract at market
endif
//TRAILING STOP
TGL =25
TGS= 25
if not onmarket then
MAXPRICE = 0
MINPRICE = close
PREZZOUSCITA = 0
ENDIF
if longonmarket then
MAXPRICE = MAX(MAXPRICE,close)
if MAXPRICE-tradeprice(1)>=TGL*pointsize then
PREZZOUSCITA = MAXPRICE-TGL*pointsize
ENDIF
ENDIF
if shortonmarket then
MINPRICE = MIN(MINPRICE,close)
if tradeprice(1)-MINPRICE>=TGS*pointsize then
PREZZOUSCITA = MINPRICE+TGS*pointsize
ENDIF
ENDIF
if onmarket and PREZZOUSCITA>0 then
EXITSHORT AT PREZZOUSCITA STOP
SELL AT PREZZOUSCITA STOP
ENDIF
SET STOP ploss 25
SET TARGET pPROFIT 75
.
