5分k開盤3連紅

(1)你應該在第四根K棒才判斷前三根是否都是紅K。

(2)由於你只判斷今天前三根K的關係，而上漲需要前後期的收盤價比較，因此應該判斷是否連續兩漲。

if barfreq <> "Min" or Barinterval <>5 then RaiseRuntimeError("請設定頻率為5分鐘");
variable:BarNumberOfToday(0); 
if Date <> Date[1] then
    BarNumberOfToday=1 
else
    BarNumberOfToday+=1;{記錄今天的Bar數} 

if barnumberoftoday=4 then 
    begin
        //今天第三根5分鐘K，也就是開盤第15分鐘
        if trueall(close[1]>open[1],3)
            //連三根K棒都是紅棒
            and trueall(close[1]>close[2],2)
            //連三根K棒都突破高點
        then ret=1;
    end;

更有效率的寫法：

if barfreq <> "Min" or Barinterval <>5 then RaiseRuntimeError("請設定頻率為5分鐘");
if time=091500 then 
    if trueall(close[1]>open[1],3) and trueall(close[1]>close[2],2)   then ret=1;