后台公式调试输出K线序列次序异常

技术008

DEBUGFILE('D:\TEST.TXT',numtostr(date+19000000,0)&'当前时间为%.2f',time);

用这个去试下

hanzi-999

时间格式转换后, 用debugfile仍旧会出现错落, 你又怎么解释呢? 代码如下:
RUNMODE : 0; //指定逐K模式

DBG_PATH := 'D:\'; //调试输出文件路径
DBG_TRADE_LOG_FILE := DBG_PATH & 'debug_test1.txt'; //调试输出文件名

//若非最新K，则退出
IF NOT(ISLASTBAR) THEN BEGIN
        //DEBUGFILE2(DBG_TRADE_LOG_FILE, STKLABEL & ' not lastK',0,0);
    EXIT;
END

//////////////////////////////////////////////////////////////////
//                  调试输出最新K时间戳相关
//////////////////////////////////////////////////////////////////
reldate := DATE+19000000;  
current_date_str := NUMTOSTR(reldate,0); //日期字符串  

reltime := TIME;  
hh := reltime/10000;
mmss := MOD(reltime,10000);
minutes := mmss/100;
ss := MOD(mmss,100);  
current_time_str := NUMTOSTR(hh,0) & ':' & NUMTOSTR(minutes,0) & ':' & NUMTOSTR(ss,0);

k_stamp := current_date_str & ' ' & current_time_str;
//////////////////////////////////////////////////////////////////
//                 end of 调试输出最新K时间戳相关
//////////////////////////////////////////////////////////////////


debug_content := '调试' & ' ' & STKLABEL;
debug_content := k_stamp & ' ' & debug_content;
DEBUGFILE(DBG_TRADE_LOG_FILE,debug_content,0);

技术008

具体没看你中间怎么转换，你就用上面的取看呢

技术008

如果没问题就说明你自己的逻辑算法是错误的

hanzi-999

这个代码并没有业务逻辑 就是打印K线时间戳.而且我也把时间转换格式的代码贴出来了,逻辑算法哪里有问题?  你没有去测试吧?  reltime := TIME;  
hh := reltime/10000;
mmss := MOD(reltime,10000);
minutes := mmss/100;
ss := MOD(mmss,100);  

技术006

你算法有点问题。NUMTOSTR函数在转换字符传时，会整理精度，你time/10000时会有小数位，整理精度时遵循四舍五入的方式,例如：HH等于1.5时会被处理成立2.

技术008

hour
MINUTE
second

不是又现成函数吗，你直接对这个用numtostr转字符串就行了，不要去自己计算了

hanzi-999

谢谢!  那一行应该改为: hh := FLOOR(reltime/10000);