Moderator: admin
spotdespot wrote:Hi Apprentice - useful indicators thanks.
Is there any possibility of having the option to use True Volume for these please? Or produce real volume versions if not?
Many thanks,
Dave.
--+------------------------------------------------------------------+
--| VSA No Demand No Supply.lua |
--| Copyright © 2015, Gehtsoft USA LLC |
--| http://fxcodebase.com |
--+------------------------------------------------------------------+
--| Developed by : Mario Jemic |
--| mario.jemic@gmail.com |
--+------------------------------------------------------------------+
--| Support our efforts by donating |
--| Paypal: http://goo.gl/cEP5h5 |
--| BitCoin : 1MfUHS3h86MBTeonJzWdszdzF2iuKESCKU |
--+------------------------------------------------------------------+
-- 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("VSA No Demand No Supply with Real Volume");
indicator:description("");
indicator:requiredSource(core.Bar);
indicator:type(core.Indicator);
indicator.parameters:addInteger("NumberofTicks", "Number of Ticks", "Number of Ticks", 0);
indicator.parameters:addInteger("Size", "Label Size", "", 10, 1 , 100);
indicator.parameters:addColor("NSLabelColor", "Color of NoSupply", "Color of Label", core.rgb(0, 255, 0));
indicator.parameters:addColor("NDLabelColor", "Color of NoDemand", "Color of Label", core.rgb(255,0 , 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 NumberofTicks;
local first;
local source = nil;
local Size, NSLabelColor, NDLabelColor, font;
-- Streams block
local O,L,H,C,Vol;
local FirstStart;
local LastTime;
function ReleaseInstance()
core.host:execute("deleteFont", font);
end
-- Routine
function Prepare(nameOnly)
NumberofTicks = instance.parameters.NumberofTicks;
source = instance.source;
first = source:first()+5;
Size = instance.parameters.Size;
NSLabelColor = instance.parameters.NSLabelColor;
NDLabelColor = instance.parameters.NDLabelColor;
font = core.host:execute("createFont", "Wingdings", Size, false, false);
HT = instance:addInternalStream(first, 0);
LT = instance:addInternalStream(first, 0);
H=source.high;
L=source.low;
O=source.open;
C=source.close;
Vol=core.indicators:create("REAL VOLUME", source);
FirstStart=true;
LastTime=0;
local name = profile:id() .. "(" .. source:name() .. ", " .. tostring(NumberofTicks) .. ")";
instance:name(name);
end
function Plot(Data, period, Label)
if Data[period]== LT[period] then
core.host:execute("drawLabel1", source:serial(period), source:date(period), core.CR_CHART, Data[period], core.CR_CHART, core.H_Center, core.V_Top, font, NDLabelColor, "\108");
else
core.host:execute("drawLabel1", source:serial(period), source:date(period), core.CR_CHART, Data[period], core.CR_CHART, core.H_Center, core.V_Bottom, font, NSLabelColor, "\108");
end
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
Vol:update(mode);
if not(Vol.DATA:hasData(period)) then
if period==first then
FirstStart=true;
end
return;
elseif FirstStart then
FirstStart=false;
instance:updateFrom(first);
elseif LastTime~=source:date(period) and period==source:size()-1 then
LastTime=source:date(period);
instance:updateFrom(period-10);
end
HT[period]=L[period] - NumberofTicks*source:pipSize();
LT[period]=H[period] + NumberofTicks*source:pipSize();
if H[period]>H[period-1] and L[period]>=L[period-1] and (H[period]-L[period])<(H[period-1]-L[period-1]) and C[period]==O[period] and C[period]==H[period] and C[period]>C[period-1] and Vol.DATA[period]<Vol.DATA[period-1]and Vol.DATA[period]<Vol.DATA[period-2] then
Plot(LT,period,"NoDemand");
end;
if L[period]<L[period-1] and H[period]<=H[period-1] and (H[period]-L[period])<(H[period-1]-L[period-1]) and C[period]==O[period] and C[period]==L[period] and C[period]<C[period-1] and Vol.DATA[period]<Vol.DATA[period-1]and Vol.DATA[period]<Vol.DATA[period-2] then
Plot(HT,period,"NoSupply");
end;
if H[period]>H[period-1] and L[period]>=L[period-1] and (H[period]-L[period])<(H[period-1]-L[period-1]) and C[period]==O[period] and C[period]==(((H[period]-L[period])*0.5)+L[period]) and C[period]>C[period-1] and Vol.DATA[period]<Vol.DATA[period-1] and Vol.DATA[period]<Vol.DATA[period-2] then
Plot(LT,period,"NoDemand");
end;
if L[period]<L[period-1] and H[period]<=H[period-1] and (H[period]-L[period])<(H[period-1]-L[period-1]) and C[period]==O[period] and C[period]==(((H[period]-L[period])*0.5)+L[period]) and C[period]<C[period-1] and Vol.DATA[period]<Vol.DATA[period-1] and Vol.DATA[period]<Vol.DATA[period-2] then
Plot(HT,period,"NoSupply");
end;
if H[period]>H[period-1] and L[period]>=L[period-1] and (H[period]-L[period])<(H[period-1]-L[period-1]) and C[period]==O[period] and C[period]==L[period] and C[period]>C[period-1] and Vol.DATA[period]<Vol.DATA[period-1] and Vol.DATA[period]<Vol.DATA[period-2] then
Plot(LT,period,"NoDemand");
end;
if L[period]<L[period-1] and H[period]<=H[period-1] and (H[period]-L[period])<(H[period-1]-L[period-1]) and C[period]==O[period] and C[period]==H[period] and C[period]<C[period-1] and Vol.DATA[period]<Vol.DATA[period-1] and Vol.DATA[period]<Vol.DATA[period-2] then
Plot(HT,period,"NoSupply");
end;
if H[period-1]>H[period-2] and L[period-1]>=L[period-2] and C[period-1]>C[period] and H[period-1]>=H[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] then
Plot(LT,period-1,"NoDemand");
end;
if L[period-1]<L[period-2] and H[period-1]<=H[period-2] and C[period-1]<C[period] and L[period-1]<=L[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] then
Plot(HT,period-1,"NoSupply");
end;
if H[period-2]>H[period-3] and L[period-2]>=L[period-3] and (H[period-2]-L[period-2])<(H[period-3]-L[period-3]) and C[period-2]==O[period-2] and C[period-2]>C[period-3] and C[period-2]==C[period-1] and C[period-2]>C[period] and H[period-2]>=H[period-1] and H[period-2]>=H[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] then
Plot(LT,period-2,"NoDemand");
end;
if L[period-2]<L[period-3] and H[period-2]<=H[period-3] and (H[period-2]-L[period-2])<(H[period-3]-L[period-3]) and C[period-2]==O[period-2] and C[period-2]<C[period-3] and C[period-2]==C[period-1] and C[period-2]<C[period] and L[period-2]<=L[period-1] and L[period-2]<=L[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] then
Plot(HT,period-2,"NoSupply");
end;
if H[period-2]>H[period-3] and L[period-2]>=L[period-3] and (H[period-2]-L[period-2])<(H[period-3]-L[period-3]) and C[period-2]~=O[period-2] and C[period-2]==H[period-2] and C[period-2]>C[period-3] and C[period-2]==C[period-1] and C[period-2]>C[period] and H[period-2]>=H[period-1] and H[period-2]>=H[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] then
Plot(LT,period-2,"NoDemand");
end;
if L[period-2]<L[period-3] and H[period-2]<=H[period-3] and (H[period-2]-L[period-2])<(H[period-3]-L[period-3]) and C[period-2]~=O[period-2] and C[period-2]==L[period-2] and C[period-2]<C[period-3] and C[period-2]==C[period-1] and C[period-2]<C[period] and L[period-2]<=L[period-1] and L[period-2]<=L[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] then
Plot(HT,period-2,"NoSupply");
end;
if H[period-2]>H[period-3] and L[period-2]>=L[period-3] and (H[period-2]-L[period-2])<(H[period-3]-L[period-3]) and C[period-2]~=O[period-2] and C[period-2]==((H[period-2]-L[period-2])*0.5)+L[period-2] and C[period-2]>C[period-3] and C[period-2]==C[period-1] and C[period-2]>C[period] and H[period-2]>=H[period-1] and H[period-2]>=H[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] then
Plot(LT,period-2,"NoDemand");
end;
if L[period-2]<L[period-3] and H[period-2]<=H[period-3] and (H[period-2]-L[period-2])<(H[period-3]-L[period-3]) and C[period-2]~=O[period-2] and C[period-2]==((H[period-2]-L[period-2])*0.5)+L[period-2] and C[period-2]<C[period-3] and C[period-2]==C[period-1] and C[period-2]<C[period] and L[period-2]<=L[period-1] and L[period-2]<=L[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] then
Plot(HT,period-2,"NoSupply");
end;
if H[period-2]>H[period-3] and L[period-2]>=L[period-3] and (H[period-2]-L[period-2])<(H[period-3]-L[period-3]) and C[period-2]~=O[period-2] and C[period-2]==L[period-2] and C[period-2]>C[period-3] and C[period-2]==C[period-1] and C[period-2]>C[period] and H[period-2]>=H[period-1] and H[period-2]>=H[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] then
Plot(LT,period-2,"NoDemand");
end;
if L[period-2]<L[period-3] and H[period-2]<=H[period-3] and (H[period-2]-L[period-2])<(H[period-3]-L[period-3]) and C[period-2]~=O[period-2] and C[period-2]==H[period-2] and C[period-2]<C[period-3] and C[period-2]==C[period-1] and C[period-2]<C[period] and L[period-2]<=L[period-1] and L[period-2]<=L[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] then
Plot(HT,period-2,"NoSupply");
end;
if H[period-3]>H[period-4] and L[period-3]>=L[period-4] and (H[period-3]-L[period-3])<(H[period-4]-L[period-4]) and C[period-3]==O[period-3] and C[period-3]==H[period-3] and C[period-3]>C[period-4] and C[period-3]==C[period-2] and C[period-3]==C[period-1] and C[period-3]>C[period] and H[period-3]>=H[period-2] and H[period-3]>=H[period-1] and H[period-3]>=H[period] and Vol.DATA[period-3]<Vol.DATA[period-4] and Vol.DATA[period-3]<Vol.DATA[period-5] then
Plot(LT,period-3,"NoDemand");
end;
if L[period-3]<L[period-4] and H[period-3]<=H[period-4] and (H[period-3]-L[period-3])<(H[period-4]-L[period-4]) and C[period-3]==O[period-3] and C[period-3]==L[period-3] and C[period-3]<C[period-4] and C[period-3]==C[period-2] and C[period-3]==C[period-1] and C[period-3]<C[period] and L[period-3]<=L[period-2] and L[period-3]<=L[period-1] and L[period-3]<=L[period] and Vol.DATA[period-3]<Vol.DATA[period-4] and Vol.DATA[period-3]<Vol.DATA[period-5] then
Plot(HT,period-3,"NoSupply");
end;
if H[period-3]>H[period-4] and L[period-3]>=L[period-4] and (H[period-3]-L[period-3])<(H[period-4]-L[period-4]) and C[period-3]==O[period-3] and C[period-3]==((H[period-3]-L[period-3])*0.5)+L[period-3] and C[period-3]>C[period-4] and C[period-3]==C[period-2] and C[period-3]==C[period-1] and C[period-3]>C[period] and H[period-3]>=H[period-2] and H[period-3]>=H[period-1] and H[period-3]>=H[period] and Vol.DATA[period-3]<Vol.DATA[period-4] and Vol.DATA[period-3]<Vol.DATA[period-5] then
Plot(LT,period-3,"NoDemand");
end;
if L[period-3]<L[period-4] and H[period-3]<=H[period-4] and (H[period-3]-L[period-3])<(H[period-4]-L[period-4]) and C[period-3]==O[period-3] and C[period-3]==((H[period-3]-L[period-3])*0.5)+L[period-3] and C[period-3]<C[period-4] and C[period-3]==C[period-2] and C[period-3]==C[period-1] and C[period-3]<C[period] and L[period-3]<=L[period-2] and L[period-3]<=L[period-1] and L[period-3]<=L[period] and Vol.DATA[period-3]<Vol.DATA[period-4] and Vol.DATA[period-3]<Vol.DATA[period-5] then
Plot(HT,period-3,"NoSupply");
end;
if H[period-3]>H[period-4] and L[period-3]>=L[period-4] and (H[period-3]-L[period-3])<(H[period-3]-L[period-3]) and C[period-3]==O[period-3] and C[period-3]==L[period-3] and C[period-3]>C[period-4] and C[period-3]==C[period-2] and C[period-3]==C[period-1] and C[period-3]>C[period] and H[period-3]>=H[period-2] and H[period-3]>=H[period-1] and H[period-3]>=H[period] and Vol.DATA[period-3]<Vol.DATA[period-4] and Vol.DATA[period-3]<Vol.DATA[period-5] then
Plot(LT,period-3,"NoDemand");
end;
if L[period-3]<L[period-4] and H[period-3]<=H[period-4] and (H[period-3]-L[period-3])<(H[period-3]-L[period-3]) and C[period-3]==O[period-3] and C[period-3]==H[period-3] and C[period-3]<C[period-4] and C[period-3]==C[period-2] and C[period-3]==C[period-1] and C[period-3]<C[period] and L[period-3]<=L[period-2] and L[period-3]<=L[period-1] and L[period-3]<=L[period] and Vol.DATA[period-3]<Vol.DATA[period-4] and Vol.DATA[period-3]<Vol.DATA[period-5] then
Plot(HT,period-3,"NoSupply");
end;
if H[period]<=H[period-1] and L[period]>=L[period-1] and (H[period]-L[period])<(H[period-1]-L[period-1]) and C[period]==O[period] and C[period]==H[period] and C[period]>C[period-1] and Vol.DATA[period]<Vol.DATA[period-1] and Vol.DATA[period]<Vol.DATA[period-2] then
Plot(LT,period,"NoDemand");
end;
if H[period]<=H[period-1] and L[period]>=L[period-1] and (H[period]-L[period])<(H[period-1]-L[period-1]) and C[period]==O[period] and C[period]==L[period] and C[period]<C[period-1] and Vol.DATA[period]<Vol.DATA[period-1] and Vol.DATA[period]<Vol.DATA[period-2] then
Plot(HT,period,"NoSupply");
end;
if H[period]<=H[period-1] and L[period]>=L[period-1] and (H[period]-L[period])<(H[period-1]-L[period-1]) and C[period]==O[period] and C[period]==((H[period]-L[period])*0.5)+L[period] and C[period]>C[period-1] and Vol.DATA[period]<Vol.DATA[period-1] and Vol.DATA[period]<Vol.DATA[period-2] then
Plot(LT,period,"NoDemand");
end;
if H[period]<=H[period-1] and L[period]>=L[period-1] and (H[period]-L[period])<(H[period-1]-L[period-1]) and C[period]==O[period] and C[period]==((H[period]-L[period])*0.5)+L[period] and C[period]<C[period-1] and Vol.DATA[period]<Vol.DATA[period-1] and Vol.DATA[period]<Vol.DATA[period-2] then
Plot(HT,period,"NoSupply");
end;
if H[period]<=H[period-1] and L[period]>=L[period-1] and (H[period]-L[period])<(H[period-1]-L[period-1]) and C[period]==O[period] and C[period]==L[period] and C[period]>C[period-1] and Vol.DATA[period]<Vol.DATA[period-1] and Vol.DATA[period]<Vol.DATA[period-2] then
Plot(LT,period,"NoDemand");
end;
if H[period]<=H[period-1] and L[period]>=L[period-1] and (H[period]-L[period])<(H[period-1]-L[period-1]) and C[period]==O[period] and C[period]==H[period] and C[period]<C[period-1] and Vol.DATA[period]<Vol.DATA[period-1] and Vol.DATA[period]<Vol.DATA[period-2] then
Plot(HT,period,"NoSupply");
end;
if H[period-1]<=H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]>C[period-2] and C[period-1]>C[period] and H[period-1]>=H[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] then
Plot(LT,period-1,"NoDemand");
end;
if H[period-1]<=H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]<C[period-2] and C[period-1]<C[period] and L[period-1]<=L[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] then
Plot(HT,period-1,"NoSupply");
end;
if H[period-2]<=H[period-3] and L[period-2]>=L[period-3] and (H[period-2]-L[period-2])<(H[period-3]-L[period-3]) and C[period-2]==O[period-2] and C[period-2]>C[period-3] and C[period-2]==C[period-1] and C[period-2]>C[period] and H[period-2]>=H[period-1] and H[period-2]>=H[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] then
Plot(LT,period-2,"NoDemand");
end;
if H[period-2]<=H[period-3] and L[period-2]>=L[period-3] and (H[period-2]-L[period-2])<(H[period-3]-L[period-3]) and C[period-2]==O[period-2] and C[period-2]<C[period-3] and C[period-2]==C[period-1] and C[period-2]<C[period] and L[period-2]<=L[period-1] and L[period-2]<=L[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] then
Plot(HT,period-2,"NoSupply");
end;
if H[period-2]<=H[period-3] and L[period-2]>=L[period-3] and (H[period-2]-L[period-2])<(H[period-3]-L[period-3]) and C[period-2]~=O[period-2] and C[period-2]==H[period-2] and C[period-2]>C[period-3] and C[period-2]==C[period-1] and C[period-2]>C[period] and H[period-2]>=H[period-1] and H[period-2]>=H[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] then
Plot(LT,period-2,"NoDemand");
end;
if H[period-2]<=H[period-3] and L[period-2]>=L[period-3] and (H[period-2]-L[period-2])<(H[period-3]-L[period-3]) and C[period-2]~=O[period-2] and C[period-2]==L[period-2] and C[period-2]<C[period-3] and C[period-2]==C[period-1] and C[period-2]<C[period] and L[period-2]<=L[period-1] and L[period-2]<=L[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] then
Plot(HT,period-2,"NoSupply");
end;
if H[period-2]<=H[period-3] and L[period-2]>=L[period-3] and (H[period-2]-L[period-2])<(H[period-3]-L[period-3]) and C[period-2]~=O[period-2] and C[period-2]==((H[period-2]-L[period-2])*0.5)+L[period-2] and C[period-2]>C[period-3] and C[period-2]==C[period-1] and C[period-2]>C[period] and H[period-2]>=H[period-1] and H[period-2]>=H[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] then
Plot(LT,period-2,"NoDemand");
end;
if H[period-2]<=H[period-3] and L[period-2]>=L[period-3] and (H[period-2]-L[period-2])<(H[period-3]-L[period-3]) and C[period-2]~=O[period-2] and C[period-2]==((H[period-2]-L[period-2])*0.5)+L[period-2] and C[period-2]<C[period-3] and C[period-2]==C[period-1] and C[period-2]<C[period] and L[period-2]<=L[period-1] and L[period-2]<=L[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] then
Plot(HT,period-2,"NoSupply");
end;
if H[period-2]<=H[period-3] and L[period-2]>=L[period-3] and (H[period-2]-L[period-2])<(H[period-3]-L[period-3]) and C[period-2]~=O[period-2] and C[period-2]==L[period-2] and C[period-2]>C[period-3] and C[period-2]==C[period-1] and C[period-2]>C[period] and H[period-2]>=H[period-1] and H[period-2]>=H[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] then
Plot(LT,period-2,"NoDemand");
end;
if H[period-2]<=H[period-3] and L[period-2]>=L[period-3] and (H[period-2]-L[period-2])<(H[period-3]-L[period-3]) and C[period-2]~=O[period-2] and C[period-2]==H[period-2] and C[period-2]<C[period-3] and C[period-2]==C[period-1] and C[period-2]<C[period] and L[period-2]<=L[period-1] and L[period-2]<=L[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] then
Plot(HT,period-2,"NoSupply");
end;
if H[period-3]<=H[period-4] and L[period-3]>=L[period-4] and (H[period-3]-L[period-3])<(H[period-4]-L[period-4]) and C[period-3]==O[period-3] and C[period-3]==H[period-3] and C[period-3]>C[period-4] and C[period-3]==C[period-2] and C[period-3]==C[period-1] and C[period-3]>C[period] and H[period-3]>=H[period-2] and H[period-3]>=H[period-1] and H[period-3]>=H[period] and Vol.DATA[period-3]<Vol.DATA[period-4] and Vol.DATA[period-3]<Vol.DATA[period-5] then
Plot(LT,period-3,"NoDemand");
end;
if H[period-3]<=H[period-4] and L[period-3]>=L[period-4] and (H[period-3]-L[period-3])<(H[period-4]-L[period-4]) and C[period-3]==O[period-3] and C[period-3]==L[period-3] and C[period-3]<C[period-4] and C[period-3]==C[period-2] and C[period-3]==C[period-1] and C[period-3]<C[period] and L[period-3]<=L[period-2] and L[period-3]<=L[period-1] and L[period-3]<=L[period] and Vol.DATA[period-3]<Vol.DATA[period-4] and Vol.DATA[period-3]<Vol.DATA[period-5] then
Plot(HT,period-3,"NoSupply");
end;
if H[period-3]<=H[period-4] and L[period-3]>=L[period-4] and (H[period-3]-L[period-3])<(H[period-4]-L[period-4]) and C[period-3]==O[period-3] and C[period-3]==((H[period-3]-L[period-3])*0.5)+L[period-3] and C[period-3]>C[period-4] and C[period-3]==C[period-2] and C[period-3]==C[period-1] and C[period-3]>C[period] and H[period-3]>=H[period-2] and H[period-3]>=H[period-1] and H[period-3]>=H[period] and Vol.DATA[period-3]<Vol.DATA[period-4] and Vol.DATA[period-3]<Vol.DATA[period-5] then
Plot(LT,period-3,"NoDemand");
end;
if H[period-3]<=H[period-4] and L[period-3]>=L[period-4] and (H[period-3]-L[period-3])<(H[period-4]-L[period-4]) and C[period-3]==O[period-3] and C[period-3]==((H[period-3]-L[period-3])*0.5)+L[period-3] and C[period-3]<C[period-4] and C[period-3]==C[period-2] and C[period-3]==C[period-1] and C[period-3]<C[period] and L[period-3]<=L[period-2] and L[period-3]<=L[period-1] and L[period-3]<=L[period] and Vol.DATA[period-3]<Vol.DATA[period-4] and Vol.DATA[period-3]<Vol.DATA[period-5] then
Plot(HT,period-3,"NoSupply");
end;
if H[period-3]<=H[period-4] and L[period-3]>=L[period-4] and (H[period-3]-L[period-3])<(H[period-4]-L[period-4]) and C[period-3]==O[period-3] and C[period-3]==L[period-3] and C[period-3]>C[period-4] and C[period-3]==C[period-2] and C[period-3]==C[period-1] and C[period-3]>C[period] and H[period-3]>=H[period-2] and H[period-3]>=H[period-1] and H[period-3]>=H[period] and Vol.DATA[period-3]<Vol.DATA[period-4] and Vol.DATA[period-3]<Vol.DATA[period-5] then
Plot(LT,period-3,"NoDemand");
end;
if H[period-3]<=H[period-4] and L[period-3]>=L[period-4] and (H[period-3]-L[period-3])<(H[period-4]-L[period-4]) and C[period-3]==O[period-3] and C[period-3]==H[period-3] and C[period-3]<C[period-4] and C[period-3]==C[period-2] and C[period-3]==C[period-1] and C[period-3]<C[period] and L[period-3]<=L[period-2] and L[period-3]<=L[period-1] and L[period-3]<=L[period] and Vol.DATA[period-3]<Vol.DATA[period-4] and Vol.DATA[period-3]<Vol.DATA[period-5] then
Plot(HT,period-3,"NoSupply");
end;
if H[period-1]<=H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])==(H[period-2]-L[period-2]) and C[period-1]==O[period-1] and C[period-1]>C[period-2] and C[period-1]>C[period] and H[period-1]>=H[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] then
Plot(LT,period-1,"NoDemand");
end;
if H[period-1]<=H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])==(H[period-2]-L[period-2]) and C[period-1]==O[period-1] and C[period-1]<C[period-2] and C[period-1]<C[period] and L[period-1]<=L[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] then
Plot(HT,period-1,"NoSupply");
end;
if H[period-1]<=H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])==(H[period-2]-L[period-2]) and C[period-1]~=O[period-1] and C[period-1]==H[period-1] and C[period-1]>C[period-2] and C[period-1]>C[period] and H[period-1]>=H[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] then
Plot(LT,period-1,"NoDemand");
end;
if H[period-1]<=H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])==(H[period-2]-L[period-2]) and C[period-1]~=O[period-1] and C[period-1]==L[period-1] and C[period-1]<C[period-2] and C[period-1]<C[period] and L[period-1]<=L[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] then
Plot(HT,period-1,"NoSupply");
end;
if H[period-1]<=H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])==(H[period-2]-L[period-2]) and C[period-1]~=O[period-1] and C[period-1]==((H[period-1]-L[period-1])*0.5)+L[period-1] and C[period-1]>C[period-2] and C[period-1]>C[period] and H[period-1]>=H[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] then
Plot(LT,period-1,"NoDemand");
end;
if H[period-1]<=H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])==(H[period-2]-L[period-2]) and C[period-1]~=O[period-1] and C[period-1]==((H[period-1]-L[period-1])*0.5)+L[period-1] and C[period-1]<C[period-2] and C[period-1]<C[period] and L[period-1]<=L[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] then
Plot(HT,period-1,"NoSupply");
end;
if H[period-2]<=H[period-3] and L[period-2]>=L[period-3] and (H[period-2]-L[period-2])==(H[period-3]-L[period-3]) and C[period-2]==O[period-2] and C[period-2]==H[period-2] and C[period-2]>C[period-3] and C[period-2]==C[period-1] and C[period-2]>C[period] and H[period-2]>=H[period-1] and H[period-2]>=H[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] then
Plot(LT,period-2,"NoDemand");
end;
if H[period-2]<=H[period-3] and L[period-2]>=L[period-3] and (H[period-2]-L[period-2])==(H[period-3]-L[period-3]) and C[period-2]==O[period-2] and C[period-2]==L[period-2] and C[period-2]<C[period-3] and C[period-2]==C[period-1] and C[period-2]<C[period] and L[period-2]<=L[period-1] and L[period-2]<=L[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] then
Plot(HT,period-2,"NoSupply");
end;
if H[period-2]<=H[period-3] and L[period-2]>=L[period-3] and (H[period-2]-L[period-2])==(H[period-3]-L[period-3]) and C[period-2]==O[period-2] and C[period-2]==((H[period-2]-L[period-2])*0.5)+L[period-2] and C[period-2]>C[period-3] and C[period-2]==C[period-1] and C[period-2]>C[period] and H[period-2]>=H[period-1] and H[period-2]>=H[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] then
Plot(LT,period-2,"NoDemand");
end;
if H[period-2]<=H[period-3] and L[period-2]>=L[period-3] and (H[period-2]-L[period-2])==(H[period-3]-L[period-3]) and C[period-2]==O[period-2] and C[period-2]==((H[period-2]-L[period-2])*0.5)+L[period-2] and C[period-2]<C[period-3] and C[period-2]==C[period-1] and C[period-2]<C[period] and L[period-2]<=L[period-1] and L[period-2]<=L[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] then
Plot(HT,period-2,"NoSupply");
end;
if H[period-1]<=H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]==O[period-1] and C[period-1]==C[period-2] and C[period-1]>C[period] and H[period-1]>=H[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] and C[period-2]>C[period-3] then
Plot(LT,period-1,"NoDemand");
end;
if H[period-1]<=H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]==O[period-1] and C[period-1]==C[period-2] and C[period-1]<C[period] and L[period-1]<=L[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] and C[period-2]<C[period-3] then
Plot(HT,period-1,"NoSupply");
end;
if H[period-1]<=H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]~=O[period-1] and C[period-1]==H[period-1] and C[period-1]==C[period-2] and C[period-1]>C[period] and H[period-1]>=H[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] and C[period-2]>C[period-3] then
Plot(LT,period-1,"NoDemand");
end;
if H[period-1]<=H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]~=O[period-1] and C[period-1]==L[period-1] and C[period-1]==C[period-2] and C[period-1]<C[period] and L[period-1]<=L[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] and C[period-2]<C[period-3] then
Plot(HT,period-1,"NoSupply");
end;
if H[period-1]<=H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]~=O[period-1] and C[period-1]==((H[period-1]-L[period-1])*0.5)+L[period-1] and C[period-1]==C[period-2] and C[period-1]>C[period] and H[period-1]>=H[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] and C[period-2]>C[period-3] then
Plot(LT,period-1,"NoDemand");
end;
if H[period-1]<=H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1] ~=O[period-1] and C[period-1]==((H[period-1]-L[period-1])*0.5)+L[period-1] and C[period-1]==C[period-2] and C[period-1]<C[period] and L[period-1]<=L[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] and C[period-2]<C[period-3] then
Plot(HT,period-1,"NoSupply");
end;
if H[period-1]<=H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]~=O[period-1] and C[period-1]==L[period-1] and C[period-1]==C[period-2] and C[period-1]>C[period] and H[period-1]>=H[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] and C[period-2]>C[period-3] then
Plot(LT,period-1,"NoDemand");
end;
if H[period-1]<=H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]~=O[period-1] and C[period-1]==H[period-1] and C[period-1]==C[period-2] and C[period-1]<C[period] and L[period-1]<=L[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] and C[period-2]<C[period-3] then
Plot(HT,period-1,"NoSupply");
end;
if H[period-2]<=H[period-3] and L[period-2]>=L[period-3] and (H[period-2]-L[period-2])<(H[period-3]-L[period-3]) and C[period-2]==O[period-2] and C[period-2]==((H[period-2]-L[period-2])*0.5)+L[period-2] and C[period-2]==C[period-3] and C[period-2]==C[period-1] and C[period-2]>C[period] and H[period-2]>=H[period-1] and H[period-2]>=H[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] and C[period-3]>C[period-4] then
Plot(LT,period-2,"NoDemand");
end;
if H[period-2]<=H[period-3] and L[period-2]>=L[period-3] and (H[period-2]-L[period-2])<(H[period-3]-L[period-3]) and C[period-2]==O[period-2] and C[period-2]==((H[period-2]-L[period-2])*0.5)+L[period-2] and C[period-2]==C[period-3] and C[period-2]==C[period-1] and C[period-2]<C[period] and L[period-2]<=L[period-1] and L[period-2]<=L[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] and C[period-3]<C[period-4] then
Plot(HT,period-2,"NoSupply");
end;
if H[period-2]<=H[period-3] and L[period-2]>=L[period-3] and (H[period-2]-L[period-2])<(H[period-3]-L[period-3]) and C[period-2]==O[period-2] and C[period-2]==L[period-2] and C[period-2]==C[period-3] and C[period-2]==C[period-1] and C[period-2]>C[period] and H[period-2]>=H[period-1] and H[period-2]>=H[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] and C[period-3]>C[period-4] then
Plot(LT,period-2,"NoDemand");
end;
if H[period-2]<=H[period-3] and L[period-2]>=L[period-3] and (H[period-2]-L[period-2])<(H[period-3]-L[period-3]) and C[period-2]==O[period-2] and C[period-2]==H[period-2] and C[period-2]==C[period-3] and C[period-2]==C[period-1] and C[period-2]<C[period] and L[period-2]<=L[period-1] and L[period-2]<=L[period] and Vol.DATA[period-2]<Vol.DATA[period-3] and Vol.DATA[period-2]<Vol.DATA[period-4] and C[period-3]<C[period-4] then
Plot(HT,period-2,"NoSupply");
end;
if H[period-1]<=H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])==(H[period-2]-L[period-2]) and C[period-1]==O[period-1] and C[period-1]==H[period-1] and C[period-1]==C[period-2] and C[period-1]>C[period] and H[period-1]>=H[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] and C[period-2]>C[period-3] then
Plot(LT,period-1,"NoDemand");
end;
if H[period-1]<=H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])==(H[period-2]-L[period-2]) and C[period-1]==O[period-1] and C[period-1]==L[period-1] and C[period-1]==C[period-2] and C[period-1]<C[period] and L[period-1]<=L[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] and C[period-2]<C[period-3] then
Plot(HT,period-1,"NoSupply");
end;
if H[period-1]<=H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])==(H[period-2]-L[period-2]) and C[period-1]==O[period-1] and C[period-1]==((H[period-1]-L[period-1])*0.5)+L[period-1] and C[period-1]==C[period-2] and C[period-1]>C[period] and H[period-1]>=H[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] and C[period-2]>C[period-3] then
Plot(LT,period-1,"NoDemand");
end;
if H[period-1]<=H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])==(H[period-2]-L[period-2]) and C[period-1]==O[period-1] and C[period-1]==((H[period-1]-L[period-1])*0.5)+L[period-1] and C[period-1]==C[period-2] and C[period-1]<C[period] and L[period-1]<=L[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] and C[period-2]<C[period-3] then
Plot(HT,period-1,"NoSupply");
end;
if H[period-1]<=H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])==(H[period-2]-L[period-2]) and C[period-1]==O[period-1] and C[period-1]==L[period-1] and C[period-1]==C[period-2] and C[period-1]>C[period] and H[period-1]>=H[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] and C[period-2]>C[period-3] then
Plot(LT,period-1,"NoDemand");
end;
if H[period-1]<=H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])==(H[period-2]-L[period-2]) and C[period-1]==O[period-1] and C[period-1]==H[period-1] and C[period-1]==C[period-2] and C[period-1]<C[period] and L[period-1]<=L[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]<Vol.DATA[period-3] and C[period-2]<C[period-3] then
Plot(HT,period-1,"NoSupply");
end;
if H[period-1]>H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]==O[period-1] and C[period-1]>C[period-2] and C[period-1]>C[period] and H[period-1]>=H[period] and Vol.DATA[period-1]==Vol.DATA[period-2] and Vol.DATA[period-1]<=Vol.DATA[period-3] then
Plot(LT,period-1,"NoDemand");
end;
if L[period-1]<L[period-2] and H[period-1]<=H[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]==O[period-1] and C[period-1]<C[period-2] and C[period-1]<C[period] and L[period-1]<=L[period] and Vol.DATA[period-1]==Vol.DATA[period-2] and Vol.DATA[period-1]<=Vol.DATA[period-3] then
Plot(HT,period-1,"NoSupply");
end;
if H[period-1]>H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]~=O[period-1] and C[period-1]==H[period-1] and C[period-1]>C[period-2] and C[period-1]>C[period] and H[period-1]>=H[period] and Vol.DATA[period-1]==Vol.DATA[period-2] and Vol.DATA[period-1]<=Vol.DATA[period-3] then
Plot(LT,period-1,"NoDemand");
end;
if L[period-1]<L[period-2] and H[period-1]<=H[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]~=O[period-1] and C[period-1]==L[period-1] and C[period-1]<C[period-2] and C[period-1]<C[period] and L[period-1]<=L[period] and Vol.DATA[period-1]==Vol.DATA[period-2] and Vol.DATA[period-1]<=Vol.DATA[period-3] then
Plot(HT,period-1,"NoSupply");
end;
if H[period-1]>H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]~=O[period-1] and C[period-1]==((H[period-1]-L[period-1])*0.5)+L[period-1] and C[period-1]>C[period-2] and C[period-1]>C[period] and H[period-1]>=H[period] and Vol.DATA[period-1]==Vol.DATA[period-2] and Vol.DATA[period-1]<=Vol.DATA[period-3] then
Plot(LT,period-1,"NoDemand");
end;
if L[period-1]<L[period-2] and H[period-1]<=H[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]~=O[period-1] and C[period-1]==((H[period-1]-L[period-1])*0.5)+L[period-1] and C[period-1]<C[period-2] and C[period-1]<C[period] and L[period-1]<=L[period] and Vol.DATA[period-1]==Vol.DATA[period-2] and Vol.DATA[period-1]<=Vol.DATA[period-3] then
Plot(HT,period-1,"NoSupply");
end;
if H[period-1]>H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]~=O[period-1] and C[period-1]==L[period-1] and C[period-1]>C[period-2] and C[period-1]>C[period] and H[period-1]>=H[period] and Vol.DATA[period-1]==Vol.DATA[period-2] and Vol.DATA[period-1]<=Vol.DATA[period-3] then
Plot(LT,period-1,"NoDemand");
end;
if L[period-1]<L[period-2] and H[period-1]<=H[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]~=O[period-1] and C[period-1]==H[period-1] and C[period-1]<C[period-2] and C[period-1]<C[period] and L[period-1]<=L[period] and Vol.DATA[period-1]==Vol.DATA[period-2] and Vol.DATA[period-1]<=Vol.DATA[period-3] then
Plot(HT,period-1,"NoSupply");
end;
if H[period-1]>H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]==O[period-1] and C[period-1]>C[period-2] and C[period-1]>C[period] and H[period-1]>=H[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]==Vol.DATA[period-3] then
Plot(LT,period-1,"NoDemand");
end;
if L[period-1]<L[period-2] and H[period-1]<=H[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]==O[period-1] and C[period-1]<C[period-2] and C[period-1]<C[period] and L[period-1]<=L[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]==Vol.DATA[period-3] then
Plot(HT,period-1,"NoSupply");
end;
if H[period-1]>H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]~=O[period-1] and C[period-1]==H[period-1] and C[period-1]>C[period-2] and C[period-1]>C[period] and H[period-1]>=H[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]==Vol.DATA[period-3] then
Plot(LT,period-1,"NoDemand");
end;
if L[period-1]<L[period-2] and H[period-1]<=H[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]~=O[period-1] and C[period-1]==L[period-1] and C[period-1]<C[period-2] and C[period-1]<C[period] and L[period-1]<=L[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]==Vol.DATA[period-3] then
Plot(HT,period-1,"NoSupply");
end;
if H[period-1]>H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]~=O[period-1] and C[period-1]==((H[period-1]-L[period-1])*0.5)+L[period-1] and C[period-1]>C[period-2] and C[period-1]>C[period] and H[period-1]>=H[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]==Vol.DATA[period-3] then
Plot(LT,period-1,"NoDemand");
end;
if L[period-1]<L[period-2] and H[period-1]<=H[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]~=O[period-1] and C[period-1]==((H[period-1]-L[period-1])*0.5)+L[period-1] and C[period-1]<C[period-2] and C[period-1]<C[period] and L[period-1]<=L[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]==Vol.DATA[period-3] then
Plot(HT,period-1,"NoSupply");
end;
if H[period-1]>H[period-2] and L[period-1]>=L[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]~=O[period-1] and C[period-1]==L[period-1] and C[period-1]>C[period-2] and C[period-1]>C[period] and H[period-1]>=H[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]==Vol.DATA[period-3] then
Plot(LT,period-1,"NoDemand");
end;
if L[period-1]<L[period-2] and H[period-1]<=H[period-2] and (H[period-1]-L[period-1])<(H[period-2]-L[period-2]) and C[period-1]~=O[period-1] and C[period-1]==H[period-1] and C[period-1]<C[period-2] and C[period-1]<C[period] and L[period-1]<=L[period] and Vol.DATA[period-1]<Vol.DATA[period-2] and Vol.DATA[period-1]==Vol.DATA[period-3] then
Plot(HT,period-1,"NoSupply");
end;
end
Users browsing this forum: No registered users and 169 guests