等级: 免费版
- 注册:
- 2022-3-5
- 曾用名:
|

楼主 |
发表于 2023-6-5 11:59
|
显示全部楼层
老师,你好,改好的策略用的很好。是我的过错,没有把原策略发全,现在的后台开仓信号有点多,我现在把原稿发过来 ,不好意思,老师,又麻烦你,改成后台模式,谢谢,再一次感谢!!!!!
duo:=1;//1意思是允许开多,0意思是不允许开多
kong:=0;//1意思是允许开空,0意思是不允许开空
input:ss(2,1,100,1),//手数
x(0.2966.0,0.01,1000,0.01),
ying(50,1,1000,1),
kui(15,1,1000,1),
d1(2,1,1000,1),
d2(4,1,1000,1),
d3(8,1,1000,1);
PBX1:=(EMA(CLOSE,4)+MA(CLOSE,4*2)+MA(CLOSE,4*4))/3;
PBX2:=(EMA(CLOSE,6)+MA(CLOSE,6*2)+MA(CLOSE,6*4))/3;
PBX3:=(EMA(CLOSE,9)+MA(CLOSE,9*2)+MA(CLOSE,9*4))/3;
PBX4:=(EMA(CLOSE,13)+MA(CLOSE,13*2)+MA(CLOSE,13*4))/3;
PBX5:=(EMA(CLOSE,18)+MA(CLOSE,18*2)+MA(CLOSE,18*4))/3;
PBX6:=(EMA(CLOSE,24)+MA(CLOSE,24*2)+MA(CLOSE,24*4))/3;
DIFF := EMA(CLOSE,d1) - EMA(CLOSE,d2);
DEA := EMA(DIFF,d3);
MACD := 2*(DIFF-DEA), COLORSTICK;
jc:cross(diff,dea);
sc:cross(dea,diff);
kd1:jc and macd>0 and macd>ref(macd,1) and dea>0 and dea>ref(dea,1) and diff>0 and diff>ref(diff,1) and o<c;
kk1:sc and macd<0 and macd<ref(macd,1) and dea<0 and dea<ref(dea,1) and diff<0 and diff<ref(diff,1) and o>c;
kd2:=c>PBX1 and c>PBX2 and c>PBX3 and c>PBX4 and c>PBX5 and c>PBX6;
kk2:=c<PBX1 and c<PBX2 and c<PBX3 and c<PBX4 and c<PBX5 and c<PBX6;
kc:=abs(dea-0)<x;
//up5f:=stkindi('','b1.up',0,22,-1);
//down5f:=stkindi('','b1.down',0,22,-1);
pd:=macd<ref(macd,1) and diff<ref(diff,1);
pk:=macd>ref(macd,1) and diff>ref(diff,1);
if kd1 and kd2 and holding=0 and kc and duo=1 then buy(1,ss,marketr);
if kk1 and kk2 and holding=0 and kc and kong=1 then buyshort(1,ss,marketr);
if c-ENTERPRICE>ying*mindiff and enterbars>0 and holding>0 and duo=1 then 多赢:sell(1,holding,thisclose);
if ENTERPRICE-c>ying*mindiff and enterbars>0 and holding<0 and kong=1 then 空赢:sellshort(1,holding,thisclose);
if ENTERPRICE-c>kui*mindiff and holding>0 and duo=1 then 多损:sell(1,holding,thisclose);
if c-ENTERPRICE>kui*mindiff and holding<0 and kong=1 then 空损:sellshort(1,holding,thisclose); |
|