
等级: 新手上路
- 注册:
- 2023-1-19
- 曾用名:
|
L1:STKINDI('','VM.A',0,4)
L2:STKINDI('','VM.A',0,5)
L3:STKINDI('','VM.A',0,6)
A:L1>0 OR L2>0 OR L3>0 ;
SELLCOND:=A;
str1:STKLABEL&' '&NUMTOSTR(datatype,0)&' t15';
str2:STKLABEL&' '&NUMTOSTR(datatype,0)&' t25';
老师,我如果只需要对十五分钟进行后台预警与输出,该如何修改,谢谢
t15:extgbdata(str1);
t25:extgbdata(str2);
IF DATE<>REF(DATE,1) THEN BEGIN
extgbdataset(str1,0);
extgbdataset(str2,0);
END
if A and t15<TIME then
begin
平预警:1;//预警条件1
extgbdataset(str1,TIME);
DEBUGFILE('D:\AAA\CCI M#.TXT',stklabel&' SELLCOND:%.0f'&' A:%.0f'&' 周期类型='&NUMTOSTR(datatype,0)
,SELLCOND);
END
end
|
|