debugfile 同时输出多个参数

欧阳16724

老师好，请教我想在下面语句中增加输出即时的5日十日二十日均线值，该怎么写？

begin
平预警:1;//预警条件1
   extgbdataset(str1,date);
    DEBUGFILE('D:\AAA\AAA L.TXT',stklabel&'   sellcond:%.0f'&' 周期类型='&NUMTOSTR(datatype,0),sellcond);
end

技术009

DEBUGFILE('D:\AAA\AAA L.TXT',stklabel&'   sellcond:%.0f'&' 周期类型=%.2f'&NUMTOSTR(datatype,0)' ma5:'&NUMTOSTR(ma5,3)&' ma10:'&NUMTOSTR(ma10,3)&' ma20:'&NUMTOSTR(ma20,3),sellcond);

欧阳16724

好的 ，谢谢

欧阳16724

编译错误，无法判断该表达式的意图，  这是什么地方的问题呢

欧阳16724

ma5:=ma(c,5);

ma10:=ma(c,10);

ma20:=ma(c,20);

ma30:=ma(c,30);

ma60:=ma(c,60);

l1:=min(min(min(ma10,ma20),ma30),ma60) ;

l2:=max(max(max(ma10,ma20),ma30),ma60) ;

a:ma5>l1&&(c< ref(c,1) || ref(c,1)< ref(c,2)
|| ma5<ma10 )&&(ma5>ma20
|| ma5>ma60) &&(( ( l1>( l-(hhv(h,5)-l)*0.15) and  ref(c,1)> ref(l1,1) )
||( l<l1 and (ref(c,1)> ref(l1,1) || c>l1)))) ;

b:ma5<l2&&(c> ref(c,1) || ref(c,1)> ref(c,2)
|| ma5>ma10 )&&(ma5<ma20
|| ma5<ma60) &&(( ( l2<( h+(h-llv(l,5))*0.15) and  ref(c,1)< ref(l2,1) )
||( h>l2 and (ref(c,1)< ref(l2,1) || c<l2)))) ;


sellcond:=a;
buycond:=b;

str1:STKLABEL&' '&NUMTOSTR(datatype,0)&' t11';
str2:STKLABEL&' '&NUMTOSTR(datatype,0)&' t22';
t11:extgbdata(str1);
t22:extgbdata(str2);

IF DATE<>REF(DATE,1) THEN BEGIN
   extgbdataset(str1,0);
   extgbdataset(str2,0);
   END       

if  sellcond and t11<TIME  then

begin
平预警:1;//预警条件1
extgbdataset(str1,TIME);
DEBUGFILE('D:\AAA\AAA L.TXT',stklabel&'   sellcond:%.0f'&' 周期类型=%.2f'&NUMTOSTR(datatype,0)'  ma5:'&NUMTOSTR(ma5,3)&' ma10:'&NUMTOSTR(ma10,3)&' ma20:'&NUMTOSTR(ma20,3),sellcond);
end

if  buycond and t22<TIME then
begin
开预警:1;//预警条件2
extgbdataset(str2,TIME);
DEBUGFILE('D:\AAA\UMS###.TXT',stklabel&'  BUYCON:%.0f'&' 周期类型='&NUMTOSTR(datatype,0)',buycond);

欧阳16724

这是整段逻辑

欧阳16724

显示新改那一段编译错误

技术009

漏了一个连接符，补上就行了。

DEBUGFILE('D:\AAA\AAAL.TXT',stklabel&'   sellcond:%.0f'&' 周期类型='&NUMTOSTR(datatype,0)&' ma5:'&NUMTOSTR(ma5,3)&' ma10:'&NUMTOSTR(ma10,3)&' ma20:'&NUMTOSTR(ma20,3),sellcond);

欧阳16724

begin语句缺少end？我查了几遍，不缺啊，麻烦您帮我看看

sellcond:=a;
buycond:=b;

str1:STKLABEL&' '&NUMTOSTR(datatype,0)&' t11';
str2:STKLABEL&' '&NUMTOSTR(datatype,0)&' t22';
t11:extgbdata(str1);
t22:extgbdata(str2);

IF DATE<>REF(DATE,1) THEN BEGIN
   extgbdataset(str1,0);
   extgbdataset(str2,0);
   END       

if  sellcond and t11<TIME  then

begin
平预警:1;//预警条件1
extgbdataset(str1,TIME);
DEBUGFILE('D:\AAA\AAAL.TXT',stklabel&'   sellcond:%.0f'&' 周期类型='&NUMTOSTR(datatype,0)
&' ma5:'&NUMTOSTR(ma5,3)&' ma10:'&NUMTOSTR(ma10,3)&' ma20:'&NUMTOSTR(ma20,3),sellcond);

end

if  buycond and t22<TIME then
begin
开预警:1;//预警条件2
extgbdataset(str2,TIME);
DEBUGFILE('D:\AAA\UMS###.TXT',stklabel&'  BUYCON:%.0f'&' 周期类型='&NUMTOSTR(datatype,0)',buycond);

end

技术009

我是说  &  缺了一个，我不是已经补上了么。