// "First non-garbage strategy" (NGS)

sclass NGSStrategy extends G22CandleBasedStrategy {
/*
strategy("NGS", overlay=true, commission_type=strategy.commission.percent, commission_value=0.06, initial_capital = 100, default_qty_type=strategy.cash, default_qty_value=1000, calc_on_every_tick = true)

minDistance = input.float(0.4, minval=0, step=0.02)
period1 = input.int(100) // the "slow" MA
period2 = input.int(5)  // the fast MA (for opening)
maMinMove = input.float(0.07, step=0.001)
stopLoss=input.float(2, minval=0.1, step=0.05)
trailStart=input.float(1, minval=0.1, step=0.05)
trailPullback=input.float(0.3, minval=0.02, step=0.02)
doLongs=input.bool(true, "Do longs")
doShorts=input.bool(true, "Do shorts")
unblockAfterCrossingBand=input.bool(false, "Unblock direction after crossing band")
unblockAfterTouchingBand=input.bool(false, "Unblock direction after touching band", tooltip="Overrides checkbox above")

var bool blockLong = false
var bool blockShort = false

unblockLong() =>
    if blockLong
        log("Long unblock")
    result = false

unblockShort() =>
    if blockShort
        log("Short unblock")
    result = false

ma1 = ta.sma(close, period1)
ma2 = ta.sma(close, period2) 

upperBand=ma1*(1+minDistance/100)
lowerBand=ma1*(1-minDistance/100)

percentToTicks(percent) => close*percent/100/syminfo.mintick

maMove = (ma1/ma1[1]-1)*100 // in percent
maRising = maMove >= maMinMove
maFalling = maMove <= -maMinMove

plot(ma1, color=maRising ? color.green : maFalling ? color.red : color.gray, linewidth=2)
plot(ma2, color=color.blue)
fill(plot(lowerBand, color=na), plot(upperBand, color=na), color=color.new(color.gray, 75))

longCondition = doLongs and ma2 > upperBand and maRising
shortCondition = doShorts and ma2 < lowerBand and maFalling

evenBar = bar_index-math.floor(bar_index/2)*2 == 0
plotshape(longCondition and evenBar, style=shape.labelup, location=location.top, color=color.green)
plotshape(shortCondition and evenBar, style=shape.labeldown, location=location.bottom, color=color.red)
plotshape(blockLong and not evenBar, style=shape.xcross, location=location.top, color=color.green)
plotshape(blockShort and not evenBar, style=shape.xcross, location=location.bottom, color=color.red)

//if barstate.isrealtime
//    log(time/100000)

// Manual adjustments
//if time == 1676775600000
//    blockLong := false
//if time == 1676818800000
//    strategy.close_all(comment = "Manual close")

if ma2 > ma1 // longCondition
    blockShort := unblockShort()

if ma2 < ma1 // shortCondition
    blockLong := unblockLong()

stopLossAndTP() =>
    strategy.exit("Exit", comment_loss="Stop loss", loss=percentToTicks(stopLoss), comment_trailing="Trailing stop", trail_points=percentToTicks(trailStart), trail_offset=percentToTicks(trailPullback))

if longCondition and not blockLong
    strategy.entry("Long", strategy.long)
    stopLossAndTP()
    blockLong := true

if shortCondition and not blockShort
    strategy.entry("Short", strategy.short)
    stopLossAndTP()
    blockShort := true

drift = drift()
if drift > 0 and close < lowerBand
    strategy.close_all(comment = "Below band")
    if unblockAfterCrossingBand
        blockLong := unblockLong()

if drift < 0 and close > upperBand
    strategy.close_all(comment = "Above band")
    if unblockAfterCrossingBand
        blockShort := unblockShort()
*/
    
if (unblockAfterTouchingBand && close < upperBand)
  unblockLong();

if (unblockAfterTouchingBand && close > lowerBand)
  unblockShort();
*/
}