intrabarpersist限制啓動後只觸發一次

469
最後發表生生 2022 五月 10

生生發文於 2022/05/05

如果我希望我的脚本print可以和系統一樣執行後只觸發一次的話，我需要怎麽改我的Intrabarpesist，下面附上我的脚本

var: intrabarpersist oncePerBar(0);

variable: tr(0);

tr= ( (close-GetField("最高價","D"))/GetField("最高價","D") )*100;

if tr<=-2 and GetInfo("IsRealTime") = 1 and oncePerBar<> currentbar then begin

ret=1;

print(file("C:\print\print.log"),date,symbol,close);

oncePerBar= currentbar; //若當根Bar已經執行過，limit就會記錄當根Bar的編號避免再度執行。

end;

#文章連結
0

5 評論

排序方式: 標準 | 最新

貓老大發文於 2022/05/05

試試看改成這樣:

if oncePerBar<> currentbar then begin

  if tr<=-2 and GetInfo("IsRealTime") = 1 then begin
    ret=1;
    print(file("C:\print\print.log"),date,symbol,close); 
    end;

  end;

oncePerBar= currentbar;  //若當根Bar已經執行過，limit就會記錄當根Bar的編號避免再度執行。

#文章連結
0

生生發文於 2022/05/06

我跟著你的方法改了，可是print的時候還是會每根bar都洗一次，并沒有只處罰一次

var: intrabarpersist oncePerBar(0);

variable: tr(0);



tr= ( (close-GetField("最高價","D"))/GetField("最高價","D") )*100;
if oncePerBar<> currentbar then begin

    if tr<=-2 and GetInfo("IsRealTime") = 1 then begin

        ret=1;

        Print(file("C:\print\print.log"),FormatDate("yyyy/MM/dd", currentDate),FormatTime("HH:mm:ss", currentTime),symbol,symbolName);

        end;
    end;

oncePerBar= currentbar;