EdgeTalk

here is a Daily formula called

HK_Jackson_Zones

BP:(H+L+C)/3,Width2,ColorBlack;
Range:=(H-L);
EV:BP + Range,Width2,ColorRed;
DV:BP + (.5*Range),Width2,ColorRed;
BV:BP - (.5* Range),Width2,ColorGreen;
AV:BP - Range,Width2,ColorGreen;
RB2:BP + (Range*1.382),Width2,ColorOrange;
RB1:BP + (Range*.618),Width2,ColorOrange;
SB2:BP - (Range*1.382),Width2,ColorLime;
SB1:BP - (Range*.618),Width2,ColorLime;

FillRgn(1,RB2,EV),Brush#33C71585;
FillRgn(1,RB1,DV),Brush#33EE82EE;
FillRgn(1,SB1,BV),Brush#338FBC8F;
FillRgn(1,SB2,AV),Brush#332E8857;

Here is the Weekly Jackson Zones

HK_Jackson_Zones_Weekly

BPw:Fml('My.HK_Jackson_Zones[BP]#WEEK1'),Width2,ColorBlack;
Rangew:=Fml('My.HK_Jackson_Zones[Range]#WEEK1');
EVw:Fml('My.HK_Jackson_Zones[EV]#WEEK1'),Width2,ColorRed;
DVw:Fml('My.HK_Jackson_Zones[DV]#WEEK1'),Width2,ColorRed;
BVw:Fml('My.HK_Jackson_Zones[BV]#WEEK1'),Width2,ColorGreen;
AVw:Fml('My.HK_Jackson_Zones[AV]#WEEK1'),Width2,ColorGreen;
RB2w:Fml('My.HK_Jackson_Zones[RB2]#WEEK1'),Width2,ColorOrange;
RB1w:Fml('My.HK_Jackson_Zones[RB1]#WEEK1'),Width2,ColorOrange;
SB2w:Fml('My.HK_Jackson_Zones[SB2]#WEEK1'),Width2,ColorLime;
SB1w:Fml('My.HK_Jackson_Zones[SB1]#WEEK1'),Width2,ColorLime;

FillRgn(1,RB2w,EVw),Brush#33C71585;
FillRgn(1,RB1w,DVw),Brush#33EE82EE;
FillRgn(1,SB1w,BVw),Brush#338FBC8F;
FillRgn(1,SB2w,AVw),Brush#332E8857;

Here is a Monthly Jackson Zones

HK_Jackson_Zones_Monthly

BPm:Fml('My.HK_Jackson_Zones[BP]#MONTH1'),Width2,ColorBlack;
Rangem:=Fml('My.HK_Jackson_Zones[Range]#MONTH1');
EVm:Fml('My.HK_Jackson_Zones[EV]#MONTH1'),Width2,ColorRed;
DVm:Fml('My.HK_Jackson_Zones[DV]#MONTH1'),Width2,ColorRed;
BVm:Fml('My.HK_Jackson_Zones[BV]#MONTH1'),Width2,ColorGreen;
AVm:Fml('My.HK_Jackson_Zones[AV]#MONTH1'),Width2,ColorGreen;
RB2m:Fml('My.HK_Jackson_Zones[RB2]#MONTH1'),Width2,ColorOrange;
RB1m:Fml('My.HK_Jackson_Zones[RB1]#MONTH1'),Width2,ColorOrange;
SB2m:Fml('My.HK_Jackson_Zones[SB2]#MONTH1'),Width2,ColorLime;
SB1m:Fml('My.HK_Jackson_Zones[SB1]#MONTH1'),Width2,ColorLime;

FillRgn(1,RB2m,EVm),Brush#33C71585;
FillRgn(1,RB1m,DVm),Brush#33EE82EE;
FillRgn(1,SB1m,BVm),Brush#338FBC8F;
FillRgn(1,SB2m,AVm),Brush#332E8857;

Here is the yearly Jackson Zones

HK_Jackson_Zones_Yearly

BPy:Fml('My.HK_Jackson_Zones[BP]#Year1'),Width2,ColorBlack;
Rangey:=Fml('My.HK_Jackson_Zones[Range]#Year1');
EVy:Fml('My.HK_Jackson_Zones[EV]#Year1'),Width2,ColorRed;
DVy:Fml('My.HK_Jackson_Zones[DV]#Year1'),Width2,ColorRed;
BVy:Fml('My.HK_Jackson_Zones[BV]#Year1'),Width2,ColorGreen;
AVy:Fml('My.HK_Jackson_Zones[AV]#Year1'),Width2,ColorGreen;
RB2y:Fml('My.HK_Jackson_Zones[RB2]#Year1'),Width2,ColorOrange;
RB1y:Fml('My.HK_Jackson_Zones[RB1]#Year1'),Width2,ColorOrange;
SB2y:Fml('My.HK_Jackson_Zones[SB2]#Year1'),Width2,ColorLime;
SB1y:Fml('My.HK_Jackson_Zones[SB1]#Year1'),Width2,ColorLime;

FillRgn(1,RB2y,EVy),Brush#33C71585;
FillRgn(1,RB1y,DVy),Brush#33EE82EE;
FillRgn(1,SB1y,BVy),Brush#338FBC8F;
FillRgn(1,SB2y,AVy),Brush#332E8857;