Pine Scripters Network

Code: Select all

// long and short stops
Stopshort = crossover (high, prevWeekHigh)
Stoplong = crossunder (low, prevWeekLow)

// Entry & Exit Conditions
var Golong = false // variable that is initialized once
LongEntry = crossover (high[1], prevWeekHigh) and high > prevWeekHigh //the previous high is greater then the previous week high and so is the current high

if LongEntry 
    Golong := true
if Golong and Stoplong
    Golong := false

var Goshort = false
ShortEntry = crossunder (low[1], prevWeekLow) and low < prevWeekLow 

if ShortEntry
    Goshort := true

if Goshort and Stopshort
    Goshort := false

Code: Select all

// This source code is subject to the terms of the Mozilla Public License 2.0 at https://mozilla.org/MPL/2.0/
//@version=4
//By Juros

study(title="Universal weekly breakout + universal filter", shorttitle="weekly breakout+ filter", overlay=true, precision=8)
prevwkH = input(true, title="Show previous week high?")
prevwkL = input(true, title="show previous week low?")

//previous week high and low
prevWeekHigh = security(syminfo.tickerid, 'W', high[barstate.isrealtime ? 1:0])
prevWeekLow = security(syminfo.tickerid, 'W', low[barstate.isrealtime ? 1:0])

//previous Week high and low Plots
plot(prevwkH ? prevWeekHigh : na, title="Prev Week High", style=plot.style_stepline, linewidth=1, color=color.fuchsia, transp=20)
plot(prevwkL ? prevWeekLow : na, title="Prev Week Low", style=plot.style_stepline, linewidth=1, color=color.fuchsia, transp=20)

//------------------------------------------------------------------------------------------

// stop location for short- and long position (at crossover of previous week low or high)
Stopshort = crossover (high, prevWeekHigh)
Stoplong = crossunder (low, prevWeekLow)

Longposmemo = false
Longposmemo := Stopshort ? true : Stoplong ? false : Longposmemo[1]

Longcond = Stopshort and not Longposmemo[1]
color_1 = color.new(color.green, 70)


Shortposmemo = false
Shortposmemo := Stoplong ? true : Stopshort ? false : Shortposmemo[1]

Shortcond = Stoplong and not Shortposmemo[1]
color_2 = color.new(color.red, 70)
//bgcolor(Sellnow ? color_2 : na)

//------------------------------------------------------------------------------------------

// Entry & Exit Conditions
var Golong = false
var Goshort = false

LongEntry = high > prevWeekHigh and not Golong and (crossover (high[1], prevWeekHigh) or
 crossover (high[2], prevWeekHigh) or
 crossover (high[3], prevWeekHigh) or
 crossover (high[4], prevWeekHigh))

if LongEntry 
    Golong := true
    Goshort :=false

ShortEntry = low < prevWeekLow and not Goshort and (crossunder (low[1], prevWeekLow) or 
 crossunder (low[2], prevWeekLow) or 
 crossunder (low[3], prevWeekLow) or 
 crossunder (low[4], prevWeekLow))

if ShortEntry
    Goshort := true
    Golong := false
    
LSL =  (Golong and Stoplong) ? 1 : 0
SSL = (Goshort and Stopshort) ? 1 : 0


//------------------------------------------------------------------------------------------

// plots : X where the position is stopped
plotchar (LSL, char='X', location=location.abovebar, color=color.yellow)
plotchar (SSL, char='X', location=location.belowbar, color=color.yellow)

plotshape (LongEntry ? high : na, style = shape.labelup, location = location.belowbar, color=color.lime, size=size.tiny, text = 'L', textcolor=color.black)
plotshape (ShortEntry ? low : na, style = shape.labeldown, location = location.abovebar, color=color.fuchsia, size=size.tiny, text ='S', textcolor=color.black)

// alerts
alertcondition(Golong, title="Weakly breakout go long", message="WBO go long")
alertcondition(Goshort, title="weakly breakout go short", message="WBO go short")

//------------------------------------------------------------------------------------------

// Filter to show only those signals that follow on the previous position (long or short) that was a loss.

Code: Select all

res = input(title="Resolution", type=input.resolution, defval="W")

//previous week high and low
prevWeekHigh = security(syminfo.tickerid, res, high[1], lookahead=true)
prevWeekLow = security(syminfo.tickerid, res, low[1], lookahead=true)