Dear sr114
Please see the attached image as per CASONI'S code
Please see the attached image as per CASONI'S code
SetChartOptions(0,chartShowArrows|chartShowDates);
Plot( C, "Close", ParamColor("Color", colorDefault ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
Stime =151500;
Etime = 153000;
TN = TimeNum();
ST = TN == Stime ;
ET = TN == Etime ;
BS = ValueWhen ( ST, Cum(1)-1);
BE = ValueWhen ( ET, Cum(1)-1);
Bar = BE - BS;
SO = ValueWhen ( ST , O );
SH = ValueWhen ( ET , HHV ( H, Bar ) );
SL = ValueWhen ( ET , LLV ( L, Bar ) );
SC = ValueWhen ( ET , C );
O1=SO;
H1=SH;
L1=SL;
C1=SC;
bu1 = (C1-L1)+C1;
se2 = C1-(H1-C1);
PP = (H1 + L1 + C1 + O1) / 4 ;
R1 = (2 * PP) - L1;
S1 = (2 * PP) - H1;
R2 = PP + R1 - S1;
S2 = PP + S1 - R1;
R3 = R2 + (R1 - PP);
S3 = S2 - (PP - S1);
Plot (se2,"Sell Pressure",32,4);
Plot (bu1,"Buy Pressure",27,4);
_SECTION_BEGIN("bsp");
Stime =091500;
Etime = 093000;
TN = TimeNum();
ST = TN == Stime ;
ET = TN == Etime ;
BS = ValueWhen ( ST, Cum(1));
BE = ValueWhen ( ET, Cum(1));
Bar = BE - BS;
SO = ValueWhen ( ST , O );
SH = ValueWhen ( ET , HHV ( H, Bar ) );
SL = ValueWhen ( ET , LLV ( L, Bar ) );
SC = ValueWhen ( ET , C );
O1=SO;
H1=SH;
L1=SL;
C1=SC;
bu1 = (C1-L1)+C1;
se2 = C1-(H1-C1);
PP = (H1 + L1 + C1 + O1) / 4 ;
R1 = (2 * PP) - L1;
S1 = (2 * PP) - H1;
R2 = PP + R1 - S1;
S2 = PP + S1 - R1;
R3 = R2 + (R1 - PP);
S3 = S2 - (PP - S1);
Plot (se2,"Sell Pressure",32,styleDashed);
Plot (bu1,"Buy Pressure",27,styleDashed);
Plot( C, "Close", ParamColor("Color", colorDefault ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
Stime =151500;
Etime = 153000;
TN = TimeNum();
ST = TN == Stime ;
ET = TN == Etime ;
BS = ValueWhen ( ST, Cum(1)-1);
BE = ValueWhen ( ET, Cum(1)-1);
Bar = BE - BS;
SO = ValueWhen ( ST , O );
SH = ValueWhen ( ET , HHV ( H, Bar ) );
SL = ValueWhen ( ET , LLV ( L, Bar ) );
SC = ValueWhen ( ET , C );
O1=SO;
H1=SH;
L1=SL;
C1=SC;
bu1 = (C1-L1)+C1;
se2 = C1-(H1-C1);
PP = (H1 + L1 + C1 + O1) / 4 ;
R1 = (2 * PP) - L1;
S1 = (2 * PP) - H1;
R2 = PP + R1 - S1;
S2 = PP + S1 - R1;
R3 = R2 + (R1 - PP);
S3 = S2 - (PP - S1);
Plot (se2,"Sell Pressure",32,4);
Plot (bu1,"Buy Pressure",27,4);
_SECTION_BEGIN("bsp");
Stime =091500;
Etime = 093000;
TN = TimeNum();
ST = TN == Stime ;
ET = TN == Etime ;
BS = ValueWhen ( ST, Cum(1));
BE = ValueWhen ( ET, Cum(1));
Bar = BE - BS;
SO = ValueWhen ( ST , O );
SH = ValueWhen ( ET , HHV ( H, Bar ) );
SL = ValueWhen ( ET , LLV ( L, Bar ) );
SC = ValueWhen ( ET , C );
O1=SO;
H1=SH;
L1=SL;
C1=SC;
bu1 = (C1-L1)+C1;
se2 = C1-(H1-C1);
PP = (H1 + L1 + C1 + O1) / 4 ;
R1 = (2 * PP) - L1;
S1 = (2 * PP) - H1;
R2 = PP + R1 - S1;
S2 = PP + S1 - R1;
R3 = R2 + (R1 - PP);
S3 = S2 - (PP - S1);
Plot (se2,"Sell Pressure",32,styleDashed);
Plot (bu1,"Buy Pressure",27,styleDashed);
Attachments
-
52 KB Views: 164
Last edited: