[PEL] 复制代码 INPUT:N1(10,1,500,1),N2(1,1,10000,1);
H1B:HHVBARS(H,N1);
L1B:=LLVBARS(L,N1);
ZF:100*(high-low)/ref(c,1);//振幅数值
cd:ref(h1b=l1b,1) and BARPOS>N1;//前N个K,不包含当前K。
ZF1:=VALUEWHEN(cd,ref(ref(ZF,L1B),1));//N1日最高最低价的振幅
L1:=VALUEWHEN(cd,ref(ref(l,L1B),1));//前N1日的最低价
H1:=VALUEWHEN(cd,ref(ref(H,L1B),1));//前N1日的最高价
kd:cd and zf1<1 and L<l1 and c>l1;
buy(kd and holding=0,1,LIMIT,c+1*MINDIFF);
止损:sell(l<ref(l,ENTERBARS+1),holding,market);
if c>((N2/10000)*(H1-L1) ) 止盈:sell(1,holding,market);//当前收盘价大于 开仓位置的前N1日(最高-最低)的万分之N2倍
|