EasyLanguage for "First hour high/low"

["Doug Fields" <dfields@xxxxxxxxxxxxx>]

Hello,

I'm trying to make a few intra-day trading strategies (perhaps just a T/F
filter for the moment) which require the knowledge of the high/low in the
first part of the day. (I just this past Thursday receive ProStation 2000i.)

This part can vary; say it's 30 minutes or an hour. Not important.

Obviously, I want to be able to tell:

1) How long since open it is
2) What the day's open and previous day's close is
3) What the high, low, and volume are for the first X minutes

during all bars after X minutes.

I found an example on the omega site which says "1 hour breakout"signal. The
easylanguage is at the bottom. It is completely commentless. Further, it
uses data2 and data3, without specifying what they should be.

I am a software engineering manager; please be as technical as you like (I'd
say software engineer, but I moved into management recently).

An example RadarScreen indicator I would like to implement would be three
columns:

1) First X minute high
2) First X minute low
3) True or False, indicating if the last value is between these

Your help would be greatly appreciated.

Thanks,

Doug

Vars:  Sess1firstBarDate(0,Data2), Sess1FirstBarHigh(0,Data2),
Sess1FirstBarLow(0,data2), AveDayRange(0,data3);

Input:  RanLn(10);

AvedayRange = Average((H[0] of Data3 - L[0] of Data3),RanLn) of data3;

If (time of data2 = Sess1FirstBarTime of data2) or (date[0] Data2 > Date[1]
of data2) then begin
 Sess1FirstBarDate = Date[0] of Data2;
 Sess1FirstBarHigh = High[0] of data2;
 Sess1FirstBarLow = low[0] of Data2;
end;

If (Sess1firstBarDate = Date of Data2) and (Time of Data2 < Sess1EndTime of
Data2) then begin
 Condition1 = C[1] < Sess1FirstBarHigh[0];
 If Condition1 then Buy at Sess1FirstBarHigh[0] + 20 points stop;
 Condition2 = close[1] > Sess1FirstBarLow[0];
 If Condition2 then sell at Sess1FirstBarLow - 20 points stop;
end;

Value1 = Sess1FirstBarHigh[0] - Avedayrange;
Value2 = Sess1FirstBarLow[0] + Avedayrange;

If low[0] <= Value1 then Exitshort at Market;

If high[0] >= Value2 then Exitlong at market;