标题：[求助]请版主帮忙检查一下这段代码，为什么不能每分钟显示一次"当前资产为"，是不是全局变量有问题呢

请版主帮忙检查一下这段代码，为什么不能每分钟显示一次"当前资产为"，是不是全局变量有问题？

谢谢

（这段代码主要为测试公式的正确性，不是为了这种每分钟显示一个数据）

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

不好意思if 判断打错了应该是if dd<tt then,请版主帮忙看看这段代码，不知什么问题

 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

是每分钟输出一次啊