QQ一直在發消息怎么辦 [金字塔]
- 咨詢內容：
我添加自定義函數 后 Function QQMSGX(Formula,QQNum,QQMSG) '系統會在逐K線模式解釋公式時的每個周期都會調用此函數一遍，因此設計時應該注重程序的執行效率，不要重復的執行一些沒必要的代碼 QQMSG=document.GetExtString("QQSTR") Set obj = CreateObject("WWSCommon.TCGroup") bq = " 道衍交易系統信號發布 " mxmsg = bq &" " & Date &" " & Time & vbCrLf & " 橡膠主力" & " " & QQMSG call obj.TransMessage("", mxmsg) Set obj = Nothing Set obj = CreateObject("WWSCommon.TCGroup") call obj.TransMessage("群", mxmsg) Set obj = Nothing Set obj = CreateObject("WWSCommon.TCGroup") call obj.TransMessage("", mxmsg) Set obj = Nothing End Function然后在公式代碼做這樣的修改該 原來是 IF COND THEN BEGIN BUY(1,1,MARKET) ;END 我在END前加入if islastbar and bb<>barpos then begin bb:= barpos;extgbstringSet('QQSTR','下班回家平倉:'+numtostr(close,5)); VQQM:=QQMSGX(1,close); end 這樣的效果條件出現信號那K線一直在發消息 怎么解決
- 金字塔客服：
用一個超全局變量控制一下,代碼邏輯如下:
GLOBALVARIABLE : MySend = 0;
[此貼子已經被作者于2014/6/6 12:12:09編輯過]
if ISLASTBAR THEN
begin
IF 條件 AND MYSend <> TIME THEN
BEGIN
MYSEND := TIME;
//QQ發送代碼
END;
end;
有思路，想編寫各種指標公式，程序化交易模型，選股公式，預警公式的朋友
可聯系技術人員 QQ: 1145508240 進行 有償 編寫！（不貴！點擊查看價格！）
相關文章
-
沒有相關內容
會員登錄/注冊