Not Getting It

[blackda14]

Alright sometimes you search read and dont get it. So heres my issue. Trading stocks how do you reference in indicators the first bar high and low of a 60 min chart/bar/candle, and have those static through out the day. Say opening range 60 min high gets broke in the afternoon. I want to know in radarscreen where it is in reference to that point in the day (point = being high and low of the first 60 min candle with out changing if there is a higher high later I still want to know what the high was in the first bar).

Sorry to make it confusing its probably pretty basic concept but it sure is kicking my butt right now.

Thanks
Dennis

[TheRumpledOne]

You have to look at the bar time. I think I wrote an indicator to do that. Part of the DIRECTIONAL DAY FILTER idea. I don't recall the indicator name.

[blackda14]

If you have a minute can you slide this into a SMAA for RS also trying to add a column for date last occured?

Code: Select all

[LegacyColorValue = true];

Inputs: AlrtLen(4);
Vars: SH(0), LftSide(0), LftLen(0), B(0), CC(0), AvgVal(0), Cup(False), CupBar(0), RgtSide(0);
Vars: HiVolume(0), AvgVolume(0), CHP(0), KBar(0), RS(0), RSLine(0), AlertReset(0);

SH = SwingHigh(1, Close, 1, 2)[2];
AvgVal = Average(Close, 5);
IF AvgVal > AvgVal[1] Then
   CC = CC + 1
Else
   CC = 0;
HiVolume = Highest(Volume, 5);
AvgVolume = Average(Volume, 50);

IF SH <> -1 AND HiVolume > AvgVolume[2] AND Highest(Close, 3) <= SH Then Begin
   LftSide = SH;
   LftLen = 0;
   For value1 = 145 DownTo 25 Begin
      IF Close[value1] >= LftSide AND HiVolume[value1-2] > AvgVolume[value1] Then Begin
         LftSide = Close[value1];
         LftLen = value1;
      End;
   End;
   IF LftLen <> 0 Then Begin
      IF Highest(Close, LftLen-8)[4] < SH Then Begin
         CHP = Text_New(Date[LftLen], Time[LftLen], Close[LftLen], "LS");
         Text_SetStyle(CHP, 2, 1);
         CHP = Text_New(Date[3], Time[3], SH, "RS");
         Text_SetStyle(CHP, 2, 1);
         B = Close[CC[3]+3];
         CHP = Text_New(Date[CC[3]+3],Time[CC[3]+3],B,"B");
         Text_SetStyle(CHP, 2, 0);
         IF Lowest(Close, 35)[LftLen] <= B Then Begin
            KBar = LowestBar(Close, 30)[LftLen];
            CHP = Text_New(Date[KBar],Time[KBar],Close[KBar],"K");
            Text_SetStyle(CHP, 2, 0);
            Cup = True;
            CupBar = BarNumber[3];
            RgtSide = SH;
            AlertReset = 0;
            RS = SH;
            RSLine = TL_New(Date[3], Time[3], RS, Date, Time, RS);
         End;
      End;
   End;
End;

IF Cup AND BarNumber > CupBar + 3 Then Begin
   TL_SetEnd(RSLine, Date, Time, RS);
   IF Close < (RgtSide*.80) Then
      Cup = False
   Else
      IF Close > RgtSide AND Volume > AvgVolume Then Begin
         Plot1(Close, "C&H_Brkout");
         AlertReset = 0;
         Cup = False;
      End;
End;

AlertReset = AlertReset + 1;
IF AlertReset <= AlrtLen Then
   Alert = True;