 
等级: 超级版主
- 注册:
- 2021-5-18
- 曾用名:
|
input:p(26,20,100,8),s(12,5,40,4),m(9,2,60,6);//参数设置
diff := ema(close,s) - ema(close,p);
dea : =ema(diff,m);
macd1 : =2*(diff-dea), colorstick;
n1:=sumbars(macd1>0 and ref(macd1<0,1),1);
n2:=sumbars(macd1<0 and ref(macd1>0,1),1);
n3:=sumbars(macd1>0 and ref(macd1<0,1),2);
n4:=sumbars(macd1<0 and ref(macd1>0,1),2);
H1:=ref(hhv(h,n1),n2);//上一个红柱区间的最高价
L1:=ref(llv(l,n2),n1);
H2:=ref(hhv(h,n1),n4);//上上一个红柱区间的最高价
L2:=ref(llv(l,n2),n3);
MACD_H1:=ref(hhv(macd1,n1),n2);//上一个红柱区间的MACD最大值
MACD_L1:=ref(llv(macd1,n2),n1);
MACD_H2:=ref(hhv(macd1,n1),n4);//上上一个红柱区间的MACD最大值
MACD_L2:=ref(llv(macd1,n2),n3);
顶背离:H1>H2 AND MACD_H1<MACD_H2 AND N2=1;
底背离:L1<L2 AND MACD_L1>MACD_L2 AND N1=1;
if 顶背离 and close<open then
begin
sell(1,holding,marketr);
buyshort(1,6,marketr);
END
if 底背离 and close>open then
begin
sellshort(1,holding,marketr);
buy(1,6,marketr);
END
//止损平多
IF AVGENTERPRICE-C>10*MINDIFF THEN BEGIN
SELL(1,4,marketr);
END
//止损平空
IF C-AVGENTERPRICE>10*MINDIFF THEN BEGIN
SELLshort(1,4,marketr);
END
//止盈平多
IF C-AVGENTERPRICE>10*MINDIFF THEN BEGIN
SELL(1,4,marketr);
END
//止盈平空
IF AVGENTERPRICE-C>10*MINDIFF THEN BEGIN
SELLshort(1,4,marketr);
END |
|