以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  公式模型编写问题提交  (http://222.73.7.161/bbs/list.asp?boardid=4)
----  请教全局变量的使用  (http://222.73.7.161/bbs/dispbbs.asp?boardid=4&id=140987)

--  作者:a383623133
--  发布时间:2016/10/14 17:02:18
--  请教全局变量的使用
初始策略:
b:=c>ref(h,1);
s:=c<ref(l,1);

KD:=b;          //开多条件
PD:=s;          //平多条件
KK:=s;          //开空条件
PK:=b;          //平空条件


平空:SELLSHORT(PK,1,THISCLOSE);                  //平空信号
开多:BUY(KD AND HOLDING=0,1,THISCLOSE);          //开多信号
平多:SELL(PD,1,THISCLOSE);                       //平多信号
开空:BUYSHORT(KK AND HOLDING=0,1,THISCLOSE);     //开空信号

怎么利用全局变量来统计上面策略的连续亏损次数?

--  作者:jinzhe
--  发布时间:2016/10/14 17:14:05
--  
variable:n=0;
b:=c>ref(h,1);
s:=c<ref(l,1);

KD:=b;          //开多条件
PD:=s;          //平多条件
KK:=s;          //开空条件
PK:=b;          //平空条件

if pk and holding<0 then begin
平空:SELLSHORT(PK,1,THISCLOSE);                  //平空信号
       if numprofit(1)>=0 then n:=0;
       if numprofit(1)<0 then n:=n+1;
end
开多:BUY(KD AND HOLDING=0,1,THISCLOSE);          //开多信号
if pd and holding>0 then begin
平多:SELL(PD,1,THISCLOSE);                       //平多信号
       if numprofit(1)>=0 then n:=0;
       if numprofit(1)<0 then n:=n+1;
end
开空:BUYSHORT(KK AND HOLDING=0,1,THISCLOSE);     //开空信号
 
n为连亏值