Greeffer's Long Strategy

// Greeffer's Long Strategy
// Tuned for the 5 minute time frame
// 40x leverage using 10% of equity per trade by default
// @version=4
// @Greeffer

// S T U D Y
// study(shorttitle="Long Study", title="Greeffer's Long Study", overlay=true)

// S T R A T E G Y 
strategy(
     "Greeffer's Long Strategy",
     "Long Strategy",
     overlay=true, 
     pyramiding=10,
     default_qty_type=strategy.percent_of_equity,
     default_qty_value=400,
     initial_capital=50,
     commission_type=strategy.commission.percent,
     commission_value=0.01,
     margin_long=1./40*50, 
     margin_short=1./40*50
     )

// I N P U T S
//sma = input(title="sma", type=input.integer, defval=250)
longOrShort = input(title="Long", type=input.bool, defval=true, tooltip="Uncheck to Short")
amount = input(title="amount", type=input.float, defval=0.001, step=0.001)
volumeMA = input(title="volume ma period", type=input.integer, defval=200)
volMultiplyer = input(title="volume multiplyer", type=input.integer, defval=3)
donchianupper = input(title="upper donchian channel period", type=input.integer, defval=1440)
donchianlower = input(title="lower donchian channel period", type=input.integer, defval=1440)
stops = input(title="stops", type=input.float, defval=500.00, step=0.01)

// V A R S
symbol = "BTCUSDT"
short = false
long = false
stopshort = close + stops
stoplong = close - stops

// to do:
//symbol = syminfo.ticker

// D O N C H I A N   C H A N N E L S
lower = lowest(donchianlower)
upper = highest(donchianupper)
middle= (upper-lower)/2+lower
plot(middle, title='Middle', color=color.green, linewidth=1)
plot(upper, title='Upper', color=color.orange, linewidth=1)
plot(lower, title='Lower', color=color.orange, linewidth=1)

// S M A
//plot(sma(close,sma))

// V O L U M E
volMA = sma(volume, 200)
//upperVol = highest(volume, 200)
upperVol = volMA*volMultiplyer

// E N T R Y / E X I T   C o n d i t i o n s 
// S h o r t
if high>=upper and volume>upperVol
    short:=true
else 
    short:=false

// L o n g :
if low<=lower and volume>upperVol
    long:=true
else
    long:=false

// O R D E R S :
// L o n g
if long==true and longOrShort==true
    //alert(message='{"side":"limitBuy","limit":"'+tostring(lower)+'","stopPrice":"'+tostring(stoplong)+'","symbol":"'+symbol+'","close":"'+tostring(close)+'","amount":"'+tostring(amount)+'"}', freq=alert.freq_once_per_bar_close)
    strategy.order("long", long=true, limit=lower, oca_name="order", stop=stoplong, comment="long", when=long)

if short==true and longOrShort==true
    //alert(message='{"side":"closeLong","stopPrice":"'+tostring(upper[3])+'","symbol":"'+symbol+'","close":"'+tostring(close)+'","amount":"'+tostring(amount)+'"}', freq=alert.freq_once_per_bar_close)
    strategy.close("long", comment="close-long", qty_percent=100, when=short)

// S h o r t
if short==true and longOrShort==false
    //alert(message='{"side":"limitSell","limit":"'+tostring(upper)+'","stopPrice":"'+tostring(stopshort)+'","symbol":"'+symbol+'","close":"'+tostring(close)+'","amount":"'+tostring(amount)+'"}', freq=alert.freq_once_per_bar_close)
    strategy.order("short", long=false, limit=upper, oca_name="order", stop=stopshort, comment="short", when=short)

if long==true and longOrShort==false
    //alert(message='{"side":"closeShort","stopPrice":"'+tostring(lower[3])+'","symbol":"'+symbol+'","close":"'+tostring(close)+'","amount":"'+tostring(amount)+'"}', freq=alert.freq_once_per_bar_close)
    strategy.close("short", comment="close-short", qty_percent=100, when=long)