-- 后台测试
老师您好,我在进行后台模型回测,遇到些问题。我写了一个简单的前台程序代码,还有与这个程序相对应的后台程序的代码,请您看一下,有什么问题。因为我做测试的时候,选择相同的起始和结束时间,选择相同的周期,结果不太一样。前台程序:
BUYCOND :=(O-C)/C>9/1000 ;
SELLCOND:=(C-O)/C>9/1000;
多头出场:SELL( HOLDING>0 ,0,LIMITR,C);
空头出场:SELLSHORT( HOLDING<0,0,LIMITR,C);
IF (SELLCOND AND HOLDING=0 ) THEN
BEGIN
BUYSHORT(1,1,LIMITR,C);
END
IF (BUYCOND AND HOLDING=0 ) THEN
BEGIN
BUY(1,1,LIMITR,C);
END
与之对应的后台程序:
VARIABLE: HASPOSITION = 0;
BUYCOND:=(O-C)/C >9/1000 ;
SELLCOND:=(C-O)/C>9/1000 ;
IF HASPOSITION>0 THEN
BEGIN
TSELL( HASPOSITION>0 ,1,LMT,C);
HASPOSITION := 0;
END
IF HASPOSITION<0 THEN
BEGIN
TSELLSHORT( HASPOSITION<0,1,LMT,C);
HASPOSITION := 0;
END
IF (SELLCOND AND HASPOSITION = 0 ) THEN
BEGIN
TBUYSHORT(1,1,LMT,C);
HASPOSITION := -1;
END
IF (BUYCOND AND HASPOSITION=0 ) THEN
BEGIN
TBUY(1,1,LMT,C);
HASPOSITION := 1;
END