金字塔如何實現判斷60分鐘一漲一跌

漲（可以是一根或多根連續上漲K線）——跌（同理 ）以當天第一個上漲K為起點

問題：

1 如何實現？

2 因為60分鐘中間有休息15分鐘和中午休息時間，而且涉及到劃分60分鐘周期問題（博弈大師和金字塔劃分不同）所以不會像5分鐘那樣容易實現，很可能會出錯，請問這個怎么解決？

variable:zhangtime=0,dietime=0,a=0,b=0;
if date<>ref(date,1) then begin
 if c>o then begin
 zhangtime:=time;
 a:=1;
 end
 
 if c<o then begin
 dietime:=time;
 b:=1;
 end
 
end

if date=ref(date,1)  and a=1 then begin
 if c<o then begin
 dietime:=time;
 a:=2;
 end
end
if date=ref(date,1)  and b=1 then begin
 if c>o then begin
 zhangtime:=time;
 b:=2;
 end
end
z1:zhangtime,linethick0;
d1:dietime,linethick0; 
if time=151500 then BEGIN
a:=0;
b:=0;
dietime:=0;
zhangtime:=0;
end