求助 指标改系统交易

a3516666

指标改系统交易  


DS:=NEWHBARS(HIGH,1);
DN:=IF(DS=BARPOS(),1,DS);
DM:REF(DN,DN)+DN,LINETHICK0;
HH:=IF(BARPOS()<4,CLOSE,REF(HIGH,DM));
KD:=CLOSE>LLV(HH,DS);KS:=NEWLBARS(LOW,1);
KN:=IF(KS=BARPOS(),1,KS);
KM:REF(KN,KN)+KN,LINETHICK0;
LL:=IF(BARPOS()<4,CLOSE,REF(LOW,KM));
KK:=CLOSE<HHV(LL,KS);
ENTERLONG:KD,TFILTER;
EXITLONG:kk,TFILTER;
ENTERSHORT:kk,TFILTER;
EXITSHORT:KD,TFILTER;
TD:=BARSLAST(ENTERLONG)+1;
TK:=BARSLAST(EXITLONG)+1;A:=REF(IF(TD<TK,HHV(LL,TD),LLV(HH,TK)),1);
多空线:A,COLOR0000FF,LINETHICK2;PARTLINE(CLOSE<多空线,多空线,65280,2,0),COLOR00FF00,LINETHICK2;

技术006

ENTERLONG:KD,TFILTER;
EXITLONG:kk,TFILTER;
ENTERSHORT:kk,TFILTER;
EXITSHORT:KD,TFILTER;
TD:=BARSLAST(ENTERLONG)+1;
TK:=BARSLAST(EXITLONG)+1;
部分改掉就行。正常逻辑平多开空，平空开多，下面示例提供平多开空的部分，另一部分参照学习后自行实现。
注:
1.holidng的3中状态，大于0代表多头，小于0代表空头，等于0代表无持仓
2.图表不支持锁仓，所以需要遵循先平后开原则

if kk=1 then begin
sell(HOLDING>0,1,MARKET);
BUYSHORT(HOLDING=0,1,MARKET);
end

IF KD=1 THEN BEgin
//自行实现部分
.....

END
TD:=BARSLAST(kd=1)+1;
TK:=BARSLAST(kk=1)+1;