|
香港期指15分K圖如下:
Variables:
DayChange (False),
DayUp (0),
DayDown (99999999);
If time = 0930 then
begin
//print (date," ", time, " ", DayUp ," ", DayDown );
Value1 = TL_New(Date-1, 0930, DayUp , Date+1, 0100, DayUp );
Value2 = TL_New(Date-1, 0930, DayDown , Date+1, 0100, DayDown );
DayUp =0;
DayDown =9999999999;
end;
if time > 0900 then
begin
if High > DayUp then DayUp = High;
if Low < DayDown then DayDown = Low;
end;
if DayChange = True and time <=0100 then
begin
if High > DayUp then DayUp = High;
if Low < DayDown then DayDown = Low;
if time = 0100 then
begin
DayChange = False;
//Print (Date," ",Time," ",DayUp," ", DayDown);
end;
end;
if date <> date[1] then
begin
DayChange = True;
end;
|
|