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 进行 有偿 编写!(不贵!点击查看价格!)
相关文章
-
没有相关内容