Systematic trend following/mean reversion 8H Bar Close

Going to be testing out an older system ive used......live capital, strong historical results. Looking to fully automate with hard rules. Using FXCM TS2 .lua language(c)

I like mean reversion systems. What criteria's are you looking for. whats the setup?

does your system come from DeMark's TD Sequential (?)
thank you

TD Sequential is just one metric I use for confidence levels in my model. Not the main piece I weight.

M6E trade long 1.0720, Stop 1.0559, Limit 1.1018

Still trying to define an algorithmically converted language with what I can say about looking at it. Need to define definite(coded commands) for entry points and exit. using a monthly mean indicator, DSS, Lyapunov time series with Hodridck Prescott filter, TD sequential...... all codes are here in FXCM TS2 C (.lua language). I really would like to see how raw time series price data forecastability into the next 3, 8h bars would look like with these 4 data price variables used as predictors with defined signal entry(individually and as a group)


Monthly Mean

function Init()
indicator:name("Mean indicator (dot version)");
indicator:description("Mean indicator (dot version)");
indicator:requiredSource(core.Tick);
indicator:type(core.Indicator);
indicator.parameters:addGroup("Parameters");
indicator.parameters:addString("TF", "Time Frame", "", "D1");
indicator.parameters:setFlag("TF", core.FLAG_PERIODS);
indicator.parameters:addGroup("Style");
indicator.parameters:addColor("clrUP", "UP Color", "UP Color", core.rgb(0, 255, 0));
indicator.parameters:addColor("clrDN", "DN Color", "DN Color", core.rgb(255, 0, 0));
indicator.parameters:addColor("clrPrev", "Prev Color", "Prev Color", core.rgb(0, 0, 255));
indicator.parameters:addInteger("width", "Line width", "Line width", 3, 1, 5);
end
local first;
local source = nil;
local MeanUP = nil;
local MeanDN = nil;
local Buff = nil;
local Day = nil;
local PrevBuff = nil;
local bmk = 1;
local TF;
local host;
local offset;
local weekoffset;
function Prepare()
TF = instance.parameters.TF;
host = core.host;
offset = host:execute("getTradingDayOffset");
weekoffset = host:execute("getTradingWeekOffset");
source = instance.source;
first = source:first();
Buff = instance:addInternalStream(first, 0);
Day = instance:addInternalStream(first, 0);
DayBmk = instance:addInternalStream(first, 0);
local name = profile:id() .. "(" .. source:name() .. "," .. TF .. ")";
instance:name(name);
MeanUP = instance:addStream("MeanUP", core.Dot, name .. ".UP", "UP", instance.parameters.clrUP, first);
MeanDN = instance:addStream("MeanDN", core.Dot, name .. ".DN", "DN", instance.parameters.clrDN, first);
PrevBuff = instance:addStream("Prev", core.Dot, name .. ".P", "P", instance.parameters.clrPrev, first);
MeanUP:setWidth(instance.parameters.width);
MeanDN:setWidth(instance.parameters.width);
PrevBuff:setWidth(instance.parameters.width);
end
function Update(period, mode)
if period >= first then
Day[period] = math.floor(core.getcandle(TF, source:date(period), offset, weekoffset) * 86400 + 0.5);
if period == first then
-- first available candle
Day:setBookmark(bmk, period);
DayBmk[period] = bmk;
bmk = bmk + 1;
else
-- the first candle of the current day
if Day[period] ~= Day[period - 1] then
Day:setBookmark(bmk, period);
DayBmk[period] = bmk;
bmk = bmk + 1;
else
DayBmk[period] = DayBmk[period - 1];
end
end
local start, avg;
start = Day:getBookmark(DayBmk[period]);
avg = core.avg(source, core.range(start, period));
Buff[period] = avg;
if start ~= source:first() then
PrevBuff[period] = Buff[start - 1];
end
end
if period > first then
if Buff[period] > Buff[period - 1] then
MeanUP[period] = Buff[period];
MeanDN[period] = nil;
elseif Buff[period] < Buff[period - 1] then
MeanUP[period] = nil;
MeanDN[period] = Buff[period];
else
if MeanUP:hasData(period - 1) then
MeanUP[period] = MeanUP[period - 1];
MeanDN[period] = nil;
elseif MeanDN:hasData(period - 1) then
MeanUP[period] = nil;
MeanDN[period] = MeanDN[period - 1];
end
end
end
end

DSS (Double Smoothed Stochastic)


Indicator profile initialization routine
-- Defines indicator profile properties and indicator parameters
-- TODO: Add minimal and maximal value of numeric parameters and default color of the streams
function Init()
indicator:name("DSS Bressert");
indicator:description("DSS Bressert");
indicator:requiredSource(core.Bar);
indicator:type(core.Oscillator);
indicator.parameters:addGroup("Calculation");
indicator.parameters:addInteger("Frame", "Stochastic Period", "Stochastic Period", 13);
indicator.parameters:addInteger("EMAFrame", "Smooth Period", "Smooth Period", 8);
indicator.parameters:addInteger("SignalFrame", "Signal Period", "Signal Period", 8);
indicator.parameters:addGroup("Style");
indicator.parameters:addColor("Stochastic_color", "Color of Stochastic", "Color of Stochastic", core.rgb(255, 0, 0));
indicator.parameters:addInteger("width1", "Line width", "", 1, 1, 5);
indicator.parameters:addInteger("style1", "Line style", "", core.LINE_SOLID);
indicator.parameters:setFlag("style1", core.FLAG_LINE_STYLE);
indicator.parameters:addColor("Signal_color", "Color of Signal", "Color of Signal", core.rgb(0, 255, 0));
indicator.parameters:addInteger("width2", "Line width", "", 1, 1, 5);
indicator.parameters:addInteger("style2", "Line style", "", core.LINE_SOLID);
indicator.parameters:setFlag("style2", core.FLAG_LINE_STYLE);
indicator.parameters:addGroup("OB/OS Levels");
indicator.parameters:addDouble("overbought", "Overbought Level","", 80);
indicator.parameters:addDouble("oversold","Oversold Level","", 20);
indicator.parameters:addColor("level_overboughtsold_color", "Line Color","", core.rgb(128, 128, 128));
indicator.parameters:addInteger("level_overboughtsold_width","Line width","", 1, 1, 5);
indicator.parameters:addInteger("level_overboughtsold_style", "Line Style","", core.LINE_SOLID);
indicator.parameters:setFlag("level_overboughtsold_style", core.FLAG_LEVEL_STYLE);
indicator.parameters:addGroup("OB/OS Zone");
indicator.parameters:addBoolean("Show" , "Show Overlay", "", true);
indicator.parameters:addInteger("transparency", "Fill Transparency", "0 - opaque, 100 - transparent", 75, 0, 100);
indicator.parameters:addColor("OBColor", "Overbought Zone Color","", core.rgb(255, 0, 0));
indicator.parameters:addColor("OSColor", "Oversold Zone Color","", core.rgb(0, 255, 0));

end

-- Indicator instance initialization routine
-- Processes indicator parameters and creates output streams
-- TODO: Refine the first period calculation for each of the output streams.
-- TODO: Calculate all constants, create instances all subsequent indicators and load all required libraries
-- Parameters block
local Frame;
local EMAFrame;
local SignalFrame;

local first;
local source = nil;

-- Streams block
local DSS= nil;
local EMA = nil;
local Show;
local HIGH=nil;
local LOW=nil;

local DELTA=nil;
local MIT=nil;
local SmoothCoefficient=nil;

local Buffer=nil;
local Signal=nil;
local OUT=nil;
local transparency;
local OBColor, OSColor;
-- Routine
function Prepare()
Frame = instance.parameters.Frame;
EMAFrame = instance.parameters.EMAFrame;
SignalFrame = instance.parameters.SignalFrame;
Show = instance.parameters.Show;
OBColor = instance.parameters.OBColor;
OSColor = instance.parameters.OSColor;

source = instance.source;
first = source:first()+Frame;
Buffer=instance:addInternalStream(0, 0);
OUT=instance:addInternalStream(0, 0);

local name = profile:id() .. "(" .. source:name() .. ", " .. Frame .. ", " .. EMAFrame ..", ".. SignalFrame.. ")";
instance:name(name);
DSS = instance:addStream("DSS", core.Line, name .. ".DSS", "DSS", instance.parameters.Stochastic_color, 3*Frame + EMAFrame);
DSS:setWidth(instance.parameters.width1);
DSS:setStyle(instance.parameters.style1);
if not Show then
DSS:addLevel(instance.parameters.oversold, instance.parameters.level_overboughtsold_style, instance.parameters.level_overboughtsold_width, instance.parameters.level_overboughtsold_color);
DSS:addLevel(instance.parameters.overbought, instance.parameters.level_overboughtsold_style, instance.parameters.level_overboughtsold_width, instance.parameters.level_overboughtsold_color);
end

EMA = core.indicators:create("EMA", OUT, SignalFrame);
Signal = instance:addStream("SIGNAL", core.Line, name .. ".Signal", "Signal", instance.parameters.Signal_color, EMA.DATA:first());
Signal:setWidth(instance.parameters.width2);
Signal:setStyle(instance.parameters.style2);
SmoothCoefficient= 2.0 / (1.0 + EMAFrame);
instance:ownerDrawn(Show);
end

-- Indicator calculation routine
-- TODO: Add your code for calculation output values
function Update(period,mode)
if period < first or not source:hasData(period) then
return;
end
HIGH = mathex.max(source.high, period-Frame+1, period);
LOW = mathex.min(source.low, period-Frame+1, period);
DELTA = source.close[period] - LOW;
MIT = DELTA/(HIGH - LOW)*100.0;
Buffer[period] = SmoothCoefficient * (MIT - Buffer[period-1]) + Buffer[period-1];
if period < 2*Frame then
return;
end
LOW, HIGH = mathex.minmax(Buffer , period-Frame-1, period);
DELTA= Buffer[period] -LOW;
MIT = DELTA/(HIGH - LOW)*100.0;
OUT[period] = SmoothCoefficient * (MIT - OUT[period-1]) + OUT[period-1];
if period < 3*Frame + EMAFrame then
return;
end
DSS[period]=OUT[period];

EMA:update(mode);
if period < EMA.DATA:first() then
return;
end
Signal[period] = EMA.DATA[period];



end


local init = false;

function Draw(stage, context)
if stage ~= 0 then
return;
end
Height= context:bottom()-context:top();
if not init then
context:createSolidBrush(1, OBColor);
context:createSolidBrush(2, OSColor);
transparency =context:convertTransparency ( instance.parameters.transparency )

init = true;
end
visible, y1 = contextointOfPrice (instance.parameters.overbought);
visible, y2 = contextointOfPrice (instance.parameters.oversold);

context:drawRectangle (-1, 1, context:left (), context:top (), context:right (), y1, transparency);
context:drawRectangle (-1, 2, context:left (), y2,context:right (), context:bottom (), transparency);
end

Lyapunov time series forecasting with Hodrick Prescott Filter
function Init()
indicator:name("Lyapunov HP oscillator");
indicator:description("Lyapunov HP oscillator");
indicator:requiredSource(core.Tick);
indicator:type(core.Oscillator);
indicator.parameters:addGroup("Calculation");
indicator.parameters:addInteger("MA_Period", "MA period", "", 4);
indicator.parameters:addInteger("Filter", "Filter", "", 7);
indicator.parameters:addInteger("L_Period", "Lyapunov period", "", 525);
indicator.parameters:addInteger("L_Time", "Lyapunov time", "", 20);
indicator.parameters:addGroup("Style");
indicator.parameters:addColor("clr", "Color", "Color", core.rgb(255, 255, 0));
indicator.parameters:addInteger("widthLinReg", "Line width", "Line width", 1, 1, 5);
indicator.parameters:addInteger("styleLinReg", "Line style", "Line style", core.LINE_SOLID);
indicator.parameters:setFlag("styleLinReg", core.FLAG_LINE_STYLE);
end
local first;
local source = nil;
local MA_Period;
local Filter;
local L_Period;
local L_Time;
local Lyapunov_HP=nil;
local Lambda;
local hpf, a, b, c;
function Prepare()
source = instance.source;
MA_Period=instance.parameters.MA_Period;
Filter=instance.parameters.Filter;
L_Period=instance.parameters.L_Period;
L_Time=instance.parameters.L_Time;
first = source:first()+2;
hpf = instance:addInternalStream(first, 0);
a = instance:addInternalStream(first, 0);
b = instance:addInternalStream(first, 0);
c = instance:addInternalStream(first, 0);
local name = profile:id() .. "(" .. source:name() .. ", " .. instance.parameters.MA_Period .. ", " .. instance.parameters.Filter .. ", " .. instance.parameters.L_Period .. ", " .. instance.parameters.L_Time .. ")";
instance:name(name);
Lyapunov_HP = instance:addStream("Lyapunov_HP", core.Line, name .. ".Lyapunov_HP", "Lyapunov_HP", instance.parameters.clr, first);
Lyapunov_HP:setWidth(instance.parameters.widthLinReg);
Lyapunov_HP:setStyle(instance.parameters.styleLinReg);
Lambda = 0.0625/math.pow(math.sin(math.pi/Filter),4);
end
function Update(period, mode)
if period>first+L_Period and period==source:size()-1 then
a[period]=1+Lambda;
b[period]=-2*Lambda;
c[period]=Lambda;
local i;
for i=first, period-1, 1 do
a[i]=6*Lambda+1;
b[i]=-4*Lambda;
c[i]=Lambda;
end
a[period-1]=5*Lambda+1;
a[first]=1+Lambda;
a[first+1]=5*Lambda+1;
b[first+1]=-2*Lambda;
b[first]=0;
c[first+1]=0;
c[first]=0;

local H1, H2, H3, H4, H5, HH1, HH2, HH3, HH4, HH5, HB, HC, Z = 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0;

for i=period, first, -1 do
Z=a[i]-H4*H1-HH5*HH2;
HB=b[i];
HH1=H1;
H1=(HB-H4*H2)/Z;
b[i]=H1;
HC=c[i];
HH2=H2;
H2=HC/Z;
c[i]=H2;
a[i]=(source[i]-HH3*HH5-H3*H4)/Z;
HH3=H3;
H3=a[i];
H4=HB-H5*HH1;
HH5=H5;
H5=HC;
end

H2=0;
H1=a[first+1];
hpf[first+1]=H1;
for i=first+2, period, 1 do
hpf[i]=a[i]-b[i]*H1-c[i]*H2;
H2=H1;
H1=hpf[i];
end

for i=period, first+1, -1 do
Lyapunov_HP[i]=math.log(math.abs(hpf[i]/hpf[i-1]))*100000;
end

end
end

TD Sequential


function Init()
indicator:name("DeMark Sequential Indicator");
indicator:description("Sequential Indicator based on Chapter 1 of Jason Perl's Book 'DeMark Indicators', Bloomberg 2008");
indicator:requiredSource(core.Bar);
indicator:type(core.Indicator);
indicator.parameters:addGroup("Options");
indicator.parameters:addBoolean("ShowPerf", "Show Setup Perfection?", "Whether or not to show arrows on perfected setups.", true);
indicator.parameters:addBoolean("ShowCDown", "Show Countdown", "Whether of not to show the countdown after a setup.", true);
indicator.parameters:addInteger("Perfection_Wait", "Perfection Wait", "No. of Bars to Keep Looking for Setup Perfection", 13, 0, 300);
indicator.parameters:addInteger("Lookback", "Setup Look-Back", "No. of Bars to Look Back in Setup Calculations", 4, 1, 25);
indicator.parameters:addGroup("Colors");
indicator.parameters:addColor("BuySU_color", "Buy Setup Color", "Color of Buy Setup Digits and Arrow", core.rgb(0, 127, 0));
indicator.parameters:addColor("SellSU_color", "Sell Setup Color", "Color of Sell Setup Digits and Arrow", core.rgb(127, 0, 0));
indicator.parameters:addColor("TrendSup_color", "Color of Trend Support", "Color of Trend Support", core.rgb(100, 220, 120));
indicator.parameters:addColor("TrendRes_color", "Color of Trend Resistance", "Color of Trend Resistance", core.rgb(220, 100, 120));
indicator.parameters:addColor("BuyCNT_color", "Color of Buy Countdown", "Color of Buy Countdown", core.rgb(0, 255, 127));
indicator.parameters:addColor("SellCNT_color", "Color of Sell Countdown", "Color of Sell Countdown", core.rgb(255, 0, 127));
end
-- Parameters block
local first;
local source = nil;
-- Streams block
local BuySU, SellSU = nil, nil;
local bCountdown = 0;
local sCountdown = 0;
local BuyCDTest, SellCDTest = nil, nil;
-- Routine
function Prepare()
source = instance.source;
first = source:first();
lookback = instance.parameters.Lookback;
waitlimit = instance.parameters.Perfection_Wait;
showperf = instance.parameters.ShowPerf;
showcdown = instance.parameters.ShowCDown;
BuySUCount, SellSUCount = 0, 0;
TrendSupVal, TrendResVal = 0, 0;
Bar67Low, Bar67High = 0, 0;
SellPerfWaitCount, BuyPerfWaitCount = 0, 0;
InBuySU, InSellSU = false, false;
SeekingBuyPerfection, SeekingSellPerfection = false, false;
InBuyCD, InSellCD = false, false;
BuyDoppelganger, SellDoppelganger = false, false;
local name = profile:id() .. "(" .. source:name() .. ")";
instance:name(name);
BuySU = instance:createTextOutput ("BuySU", "Buy Setup 1 to 9", "Arial", 10, core.H_Center, core.V_Bottom, instance.parameters.BuySU_color, 0);
SellSU = instance:createTextOutput ("SellSU", "Sell Setup 1 to 9", "Arial", 10, core.H_Center, core.V_Top, instance.parameters.SellSU_color, 0);
TrendSup = instance:addStream ("Sup", core.Line, "Trend Support Line", "Sup", instance.parameters.TrendSup_color, first);
TrendRes = instance:addStream ("Res", core.Line, "Trend Resistance Line", "Res", instance.parameters.TrendRes_color, first);
BuyPSU = instance:createTextOutput ("PerfBuySU", "Perfected Buy Setup Arrows", "Wingdings 3", 12, core.H_Center, core.V_Bottom, instance.parameters.BuySU_color, 0);
SellPSU = instance:createTextOutput ("PerfSellSU", "Perfected Sell Setup Arrows", "Wingdings 3", 12, core.H_Center, core.V_Top, instance.parameters.SellSU_color, 0);
BuyCNT = instance:createTextOutput ("BuyCD", "Buy Countdown 1 to 13", "Arial", 10, core.H_Center, core.V_Bottom, instance.parameters.BuyCNT_color, 0);
SellCNT = instance:createTextOutput ("SellCD", "Sell Countdown 1 to 13", "Arial", 10, core.H_Center, core.V_Top, instance.parameters.SellCNT_color, 0);
BuyCNTS = instance:createTextOutput ("Buy", "Basic Buy Signal", "Wingdings", 14, core.H_Center, core.V_Bottom, instance.parameters.BuyCNT_color, 0);
SellCNTS = instance:createTextOutput ("Sell", "Basic Sell Signal", "Wingdings", 14, core.H_Center, core.V_Top, instance.parameters.SellCNT_color, 0);
end
function Update(period)
if period > lookback and period < source:size() - 1 and source:hasData(period) then
if InBuySU == true and BuySUCount < 9 then
-- we're currently in an uncompleted prospective buy setup sequence.
if source.close[period] < source.close[period - lookback] then
-- the setup remains intact
BuySUCount = BuySUCount + 1;
BuySU:set(period, source.low[period], BuySUCount, "Buy Setup Count 1 to 9");
if BuySUCount == 9 then
-- The buy setup sequence has just completed.
InBuySU, InBuyCD = false, true;
if InSellCD == true then
InSellCD = false;
SellCNT:set(period, source.high[period], "X", "Sell Countdown Cancelled");
end
Bar67Low = math.min(source.low[period - 3], source.low[period - 2]);
-- calculate the new Trend Resistance level.
TrendResVal = math.max(source.high[period - 8], source.high[period - 7], source.high[period - 6], source.high[period - 5], source.high[period - 4], source.high[period - 3]);
-- draw the new Trend Resistance level back to bar #1 of the setup sequence.
--core.drawLine(TrendRes, core.range(period - 8, period), TrendResVal, period - 8, TrendResVal, period);
-- looking for perfect Setup
if showperf == true and (source.low[period] <= Bar67Low or source.low[period-1] <= Bar67Low) then
BuyPSU:set(period, source.low[period], "\010\143", "Perfected Buy Setup");
SeekingBuyPerfection = false;
elseif showperf == true then
SeekingBuyPerfection = true;
BuyPerfWaitCount = 0;
end
-- start countdown?
if showcdown == true and source.close[period] <= source.low[period - 2] then
bCountdown = 1;
BuyCNT:set(period, source.low[period], "\010\010" .. bCountdown, "Buy Countdown 1 to 13");
BuyDoppelganger = true;
elseif showcdown == true then
bCountdown = 0;
BuyDoppelganger = false;
end
end
else
-- the setup has been broken
for a = 1, BuySUCount, 1 do
-- clear away the existing setup numbers
BuySU:setNoData(period - a);
end
-- reset the buy setup tracking variables
InBuySU, BuySUCount = false, 0;
end
elseif InSellSU == true and SellSUCount < 9 then
-- we're currently in an uncompleted prospective sell setup sequence.
if source.close[period] > source.close[period - lookback] then
-- the setup remains intact
SellSUCount = SellSUCount + 1;
SellSU:set(period, source.high[period], SellSUCount, "Sell Setup Count 1 to 9");
if SellSUCount == 9 then
-- The sell setup sequence has just completed.
InSellSU, InSellCD = false, true;
if InBuyCD == true then
InBuyCD = false;
BuyCNT:set(period, source.low[period], "X", "Buy Countdown Cancelled");
end
Bar67High = math.max(source.high[period - 3], source.high[period - 2]);
-- calculate a new Trend Support level.
TrendSupVal = math.min(source.low[period - 8], source.low[period - 7], source.low[period - 6], source.low[period - 5]);
-- draw the new Trend Support level back to bar #1 of the setup sequence.
core.drawLine(TrendSup, core.range(period - 8, period), TrendSupVal, period - 8, TrendSupVal, period);
-- looking for perfect Setup
if showperf == true and (source.high[period] >= Bar67High or source.high[period-1] >= Bar67High) then
SellPSU:set(period, source.high[period], "\144\010", "Perfected Sell Setup");
SeekingSellPerfection = false;
elseif showperf == true then
SeekingSellPerfection = true;
SellPerfWaitCount = 0;
end
-- start countdown?
if showcdown == true and source.close[period] >= source.high[period - 2] then
sCountdown = 1;
SellCNT:set(period, source.high[period], sCountdown .. "\010\010", "Sell Countdown 1 to 13");
SellDoppelganger = true;
elseif showcdown == true then
sCountdown = 0;
SellDoppelganger = false;
end
end
else
-- the setup has been broken
for a = 1, SellSUCount, 1 do
-- clear away the existing setup numbers
SellSU:setNoData(period - a);
end
-- reset the buy setup tracking variables
InSellSU, SellSUCount = false, 0;
end
end
if showperf == true and SeekingSellPerfection == true and SellPerfWaitCount <= waitlimit then
-- a sell setup has recently completed, but it has not been perfected
if (source.high[period] >= Bar67High) then
-- setup has just been perfected
SeekingSellPerfection = false;
SellPSU:set(period, source.high[period], "\144", "Perfected Sell Setup");
else
SellPerfWaitCount = SellPerfWaitCount + 1;
end
end
if showperf == true and SeekingBuyPerfection == true and BuyPerfWaitCount <= waitlimit then
-- a buy setup has recently completed, but it has not been perfected
if (source.low[period] <= Bar67Low) then
-- setup has just been perfected
SeekingBuyPerfection = false;
BuyPSU:set(period, source.low[period], "\143", "Perfected Buy Setup");
else
BuyPerfWaitCount = BuyPerfWaitCount + 1;
end
end
-- Countdown Calculations
if showcdown == true and InBuyCD == true and BuyDoppelganger == false then
if bCountdown < 12 and source.close[period] <= source.low[period - 2] then
-- countdown.
bCountdown = bCountdown + 1;
BuyCNT:set(period, source.low[period], "\010" .. bCountdown, "Buy Countdown 1 to 13");
if bCountdown == 8 then
BuyCDTest = source.close[period];
end
elseif bCountdown == 12 and source.close[period] <= source.low[period - 2] and source.low[period] <= BuyCDTest then
-- we have countdown bar 13: a completed countdown, which could be used as a buy signal.
bCountdown = 13;
InBuyCD = false;
BuyCNT:set(period, source.low[period], "\010" .. bCountdown, "Buy Countdown 1 to 13");
BuyCNTS:set(period, source.low[period], "\010\010\225", "Basic Buy Signal");
elseif bCountdown == 12 and source.close[period] <= source.low[period - 2] then
-- this WOULD be bar 13 but it's still above bar 8 of the countdown.
BuyCNT:set(period, source.low[period], "\010+", "Count 13 (buy signal) has been deferred");
end
else
BuyDoppelganger = false;
end
if showcdown == true and InSellCD == true and SellDoppelganger == false then
if sCountdown < 12 and source.close[period] >= source.high[period - 2] then
-- countdown.
sCountdown = sCountdown + 1;
SellCNT:set(period, source.high[period], sCountdown .. "\010", "Sell Countdown 1 to 13");
if sCountdown == 8 then
SellCDTest = source.close[period];
end
elseif sCountdown == 12 and source.close[period] >= source.high[period - 2] and source.high[period] >= SellCDTest then
-- we have countdown bar 13: a completed countdown, which could be used as a sell signal.
sCountdown = 13;
InSellCD = false;
SellCNT:set(period, source.high[period], sCountdown .. "\010", "Sell Countdown 1 to 13");
SellCNTS:set(period, source.high[period], "\226\010\010", "Basic Sell Signal");
elseif sCountdown == 12 and source.close[period] >= source.high[period - 2] then
-- this WOULD be bar 13 but it's still below bar 8 of the countdown.
SellCNT:set(period, source.high[period], "+\010", "Count 13 (sell signal) has been deferred");
end
else
SellDoppelganger = false;
end
-- If there's not currently a setup sequence happening, check if a new one is just starting.
if InBuySU == false and InSellSU == false then
if source.close[period - 1] > source.close[period - 1 - lookback] and source.close[period] < source.close[period - lookback] then
-- a bearish price flip has occurred. This is bar 1 of a possible buy setup sequence.
InBuySU, InSellSU = true, false;
BuySUCount, SellSUCount = 1, 0;
BuySU:set(period, source.low[period], BuySUCount);
elseif source.close[period - 1] < source.close[period - 1 - lookback] and source.close[period] > source.close[period - lookback] then
-- a bullish price flip has occurred. This is bar 1 of a possible sell setup sequence.
InSellSU, InBuySU = true, false;
SellSUCount, BuySUCount = 1, 0;
SellSU:set(period, source.high[period], SellSUCount);
end
end
-- extend the existing Trend Level lines up to the current bar.
--core.drawLine(TrendRes, core.range(period - 1, period), TrendResVal, period - 1, TrendResVal, period);
--core.drawLine(TrendSup, core.range(period - 1, period), TrendSupVal, period - 1, TrendSupVal, period);
end
end

thank you
happy trading 2U

Thanks, eyes on USD sinking a bit here and US indicies taking out some upside stops

M6B Long 1.2530, stop 1.2498, tgt 1.2950

MES LONG 4156, stop 4114, tgt 4386

Long XAU mini 1849.98 stp 1834 tgt 1936

STOPPED OUT

JFC stopped out of every trade. still have Gold long running