战无不胜区域背离指标改成mt4用的
本帖最后由 hnjjw 于 2010-7-26 08:19 编辑 请编程高手帮助 将下面指标改成mt4用指标 :[img][/img] 飞狐指标原码: POLYLINE(1,"KDJ.D"),colorFFFF00; RSI1:SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100; 短高:IF(BETWEEN("KDJ.K",100,80),88,100),; 短低:IF(BETWEEN("KDJ.K",20,0),12,0),; 波低:IF(BETWEEN("KDJ.K#week",10,0),30,0),; 波高:IF(BETWEEN("KDJ.K#week",100,90),70,100),; 中低:IF(BETWEEN("KDJ.K#MONTH",20,0),30,0),,colorFF; 中高:IF(BETWEEN("KDJ.K#MONTH",100,75),70,100),; POLYLINE(1,0),,colorFFFF; A1:=BARSLAST(ref(cross("macd.diff","macd.dea"),1)); B1:=ref(c,A1+1)>c and ref("macd.diff",A1+1) 0),5),0,45,3,0); DRAWTEXT(FILTER((B1 > 0),5),45,'MACD底背离')colorFF00; A2:=BARSLAST(ref(cross("kdj.k"(9,3,3),"kdj.d"(9,3,3)),1)); B2:=ref(c,A2+1)>c and ref("kdj.k"(9,3,3),A2+1) 0),5),0,15,3,0); DRAWTEXT(FILTER((B2 > 0),5),15,'KDJ底背离'),colorFFFF; A3:=BARSLAST(ref(cross("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1)); B3:=ref(c,A3+1)>c and ref("RSI.RSI1"(6,12,24),A3+1) 0),5),0,30,3,0); DRAWTEXT(FILTER((B3 > 0),5),30,'RSI底背离')colorFFFF00; C1:=BARSLAST(ref(cross("macd.dea","macd.diff"),1)); D1:=ref(c,C1+1)"macd.diff" and cross("macd.dea","macd.diff"); MACD顶背离:=STICKLINE(FILTER((D1 > 0),5),100,55,3,0); DRAWTEXT(FILTER((D1 > 0),5),55,'MACD顶背离')color66FF; C2:=BARSLAST(ref(cross("kdj.d"(9,3,3),"kdj.k"(9,3,3)),1)); D2:=ref(c,C2+1)"kdj.k"(9,3,3) and cross("kdj.d"(9,3,3),"kdj.k"(9,3,3)); KDJ顶背离:=STICKLINE(FILTER((D2 > 0),5),100,85,3,0); DRAWTEXT(FILTER((D2 > 0),5),85,'KDJ顶背离')colorFF; C3:=BARSLAST(ref(cross("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1)); D3:=ref(c,C3+1)"RSI.RSI1"(6,12,24) and cross("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)); RSI顶背离:=STICKLINE(FILTER((D3 > 0),5),100,70,3,0); DRAWTEXT(FILTER((D3 > 0),5),70,'RSI顶背离')colorFF00FF; Var1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; Var2:=SMA(Var1,8,1); Var3:=SMA(Var2,5,1); Var4:="KDJ.K#WEEK"(13,5,3); Var5:="KDJ.D#WEEK"(13,5,3); Var6:="KDJ.K#MONTH"(13,5,3); Var7:="KDJ.D#MONTH"(13,5,3); 日金叉: IF(CROSS(Var2,Var3),0.5,0)*20,colorwhite; 周金叉: IF(CROSS(Var4,Var5),0.9,0)*25,colore000e0; 月金叉: IF(CROSS(Var6,Var7),1,0)*30,colorred,linethick3; |
打赏
最新创建圈子
- 新闻EA运行效果图圈 2019-05-05
圈主:admin 帖子:1