- 金字塔客服中心 - 专业程序化交易软件提供商 (http://weistock.com/bbs/index.asp)
-- 金字塔软件问题提交 (http://weistock.com/bbs/list.asp?boardid=2)
---- [求助]请版主帮忙检查一下这段代码，为什么不能每分钟显示一次"当前资产为"，是不是全局变量有问题呢 (http://weistock.com/bbs/dispbbs.asp?boardid=2&id=2498)
-- 发布时间：2010/8/17 6:42:11
-- [求助]请版主帮忙检查一下这段代码，为什么不能每分钟显示一次"当前资产为"，是不是全局变量有问题呢
请版主帮忙检查一下这段代码，为什么不能每分钟显示一次"当前资产为"，是不是全局变量有问题？
谢谢
（这段代码主要为测试公式的正确性，不是为了这种每分钟显示一个数据）
seco:=mod(TIMETOT0(CURRENTTIME),60);
minu:=(mod(TIMETOT0(CURRENTTIME),3600)-mod(TIMETOT0(CURRENTTIME),60))/60;
dd:=EXTGBDATA(\'mydd\');
EXTGBDATASET(\'mytt\',minu);
tt:=EXTGBDATA(\'mytt\');
if tt<dd then
begin
DEBUGOUT(\'当前资产为\',1234);
EXTGBDATASET(\'mydd\',minu);
end
-- 发布时间：2010/8/17 6:44:35
--
不好意思if 判断打错了应该是if dd<tt then,请版主帮忙看看这段代码，不知什么问题
-- 发布时间：2010/8/17 7:43:35
--
seco:=mod(TIMETOT0(CURRENTTIME),60);
minu:=(mod(TIMETOT0(CURRENTTIME),3600)-mod(TIMETOT0(CURRENTTIME),60))/60;
dd:=EXTGBDATA(\'mydd\');
EXTGBDATASET(\'mytt\',minu);
tt:=EXTGBDATA(\'mytt\');
if tt<dd then
begin
DEBUGOUT(\'当前资产为\',1234);
EXTGBDATASET(\'mydd\',minu);
end
将标红处改为：
DEBUGFILE2(\'D:\\TEST.TXT\',\'dd=%f\',dd,1);
DEBUGFILE2(\'D:\\TEST.TXT\',\'tt=%f\',tt,1);
输出的结果：
2010-08-17 07:27:39.828 tt=27.000000
2010-08-17 07:28:00.390 dd=27.000000
2010-08-17 07:28:00.390 tt=28.000000
2010-08-17 07:29:01.906 dd=28.000000
2010-08-17 07:29:01.906 tt=29.000000
2010-08-17 07:30:00.406 dd=29.000000
2010-08-17 07:30:00.406 tt=30.000000
2010-08-17 07:31:01.906 dd=30.000000
2010-08-17 07:31:01.906 tt=31.000000
2010-08-17 07:32:03.515 dd=31.000000
2010-08-17 07:32:03.515 tt=32.000000
2010-08-17 07:33:02.015 dd=32.000000
2010-08-17 07:33:02.015 tt=33.000000
2010-08-17 07:34:00.718 dd=33.000000
2010-08-17 07:34:00.718 tt=34.000000
2010-08-17 07:35:01.093 dd=34.000000
2010-08-17 07:35:01.093 tt=35.000000
是每分钟输出一次啊