[PEL] 复制代码
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;
macdjc:=cross(diff,dea);//macd金叉
macdsc:=cross(dea,diff);
n1:=sumbars(macdjc,1);//最近1次金叉位置
n2:=sumbars(macdsc,1);//最近1次死叉位置
h1:VALUEWHEN(macd1>0,hhv(macd1,n1));//最近一次金叉区间最大值
l1:VALUEWHEN(macd1<0,llv(macd1,n2));//最近一次死叉区间最小值
hcon:macd1=hhv(macd1,n1) and macd1>0,nodraw;//红柱创新高(阶段性)
lcon:macd1=llv(macd1,n2) and macd1<0,nodraw;
|