- 金字塔客服中心 - 专业程序化交易软件提供商 (http://222.73.7.161/bbs/index.asp)
-- 金字塔软件问题提交 (http://222.73.7.161/bbs/list.asp?boardid=2)
---- 向QQ发送消息可以用于后台吗? (http://222.73.7.161/bbs/dispbbs.asp?boardid=2&id=170615)
-- 发布时间：2019/6/24 12:55:05
-- 向QQ发送消息可以用于后台吗?
http://www.weistock.com/bbs/dispbbs.asp?boardid=5&id=11344&authorid=0&page=0&star=1
按照这个帖子去做, 前台没有问题, 但后台无效, 是不能支持吗?
-- 发布时间：2019/6/24 13:17:09
--
后台也是支持的
-- 发布时间：2019/6/24 13:27:03
--
在PL里后台怎么实现每根K线走完的判断?
-- 发布时间：2019/6/24 14:24:34
--
后台也有走完K线的模式可以选择，和图表上是一样的
-- 发布时间：2019/6/24 15:05:58
--
此主题相关图片如下：3333.png
GLOBALVARIABLE: bb=0;
上次开多:=TTYPEBAR(1,1);
上次平多:=TTYPEBAR(2,1);
上次开空:=TTYPEBAR(3,1);
上次平空:=TTYPEBAR(4,1);
if 上次开多<=3 then begin
if bb=0 then
DEBUGFILE(\'D:\\TESTg.TXT\',\'上次开多:%.0f\',上次开多);
bb=1;
begin
extgbstringSet(\'QQSTR\',\'品种:\'+STKLABEL+\';开多仓;\'+\'价格:\'+numtostr(close,5));
VQQM:=QQMSGX(1,close);
end
end
if 上次开多>3 then begin
bb=0;
end
================
Function QQMSGX(Formula,QQNum,QQMSG)
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
End Function
[此贴子已经被作者于2019/6/24 15:07:04编辑过]
-- 发布时间：2019/6/24 15:10:52
--
debugfile是否有输出呢
-- 发布时间：2019/6/24 15:12:53
--
这是debugfile
此主题相关图片如下：6666.png
-- 发布时间：2019/6/24 15:14:55
--
问题在于, 消息是"每秒"发送一次的, 但程序控制是走完一根k线(1分钟), 从debugfile来看, 也是1分钟一次的.
怎么可以让消息发送也是按照 1分钟 呢?
-- 发布时间：2019/6/24 15:16:29
--
图片是后台的设置
此主题相关图片如下：1111.png
此主题相关图片如下：2222.png
[此贴子已经被作者于2019/6/24 15:16:49编辑过]
-- 发布时间：2019/6/24 17:09:13
--
后台公式采用逐k模式试试
实在抱歉这个qq发送也不是我们写的，好比别人写的东西我这边也很难帮您调试，你试试看吧