大智慧魔鬼K线副图指标

大智慧魔鬼K线副图指标

源码

N:=1;

开:SMA(MAX(O-REF(O,N),0),6,1)/SMA(ABS(O-REF(O,1)),6,1)*100 ,linethick0;
高:SMA(MAX(H-REF(H,N),0),6,1)/SMA(ABS(H-REF(H,1)),6,1)*100 ,linethick0;
低:SMA(MAX(L-REF(L,N),0),6,1)/SMA(ABS(L-REF(L,1)),6,1)*100 ,linethick0;
收:SMA(MAX(C-REF(C,N),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100 ,linethick0;
PARTLINE(C,20);PARTLINE(C,80);PARTLINE(C,90); PARTLINE(C,50);
M5:MA(收,5),colorwhite;M13:MA(收,13),coloryellow;
STICKLINE(收>开,开,高,0,0),colorred;
STICKLINE(收>开,收,开,7,0),colorred;
STICKLINE(收<开,开,高,0,0),COLORgreen;
STICKLINE(收<开,收,开,7,0),COLORgreen;
50,pointdot;
DRAWTEXT(abs(max(高,低)-开)<14 and (开-收)>17 and REF(收,1)>60 ,80,'★光头开阴'),Color00FF00;
DRAWTEXT(filter(Min(高,低)<20 and Min(REF(高,1),REF(低,1))<20 and Min(REF(高,2),REF(低,2))<20 and 收>REF(收,1) and c>ma(c,120),5),50,'★买'),colorred;
DRAWTEXT(filter(Min(高,低)<20 and 收>REF(收,1) and c>ma(c,120),5),低,'★买');
DRAWTEXT((收-低)>25,低-5,'★火箭发射'),colorred;
DRAWTEXT(MAX(高,低)>89 and 收<90 and REF(收,1)>90 and REF(收,2)>90,10,'★逃顶'),colorgreen;
DRAWTEXT(MAX(高,低)>79 and 收<80 and REF(收,1)>80 and REF(收,2)>80 ,10,'★透顶');
DRAWTEXT(收<90 and 开>90 and REF(收,1)>90 and REF(收,2)>90 ,30,'★天顶'),colorgreen;
DRAWTEXT(收<90 and 开>90 and REF(收,1)>REF(收,3),高+5,'★瀑布');
{DRAWTEXT(高>50 and 高<80  and (高-MAX(收,开))/(高-低)>0.667 and (ref(高,1)-MAX(ref(收,1),ref(开,1)))/(ref(高,1)-ref(低,1))>0.567 and 高>ref(高,1),高+15,'★调整');
DRAWLINE(收< 开 ,低,ISLASTbar,低,1),COLORYELLOW,POINTDOT;}
DRAWTEXT((Min(高,低)-abs(收-开))/abs(高-低)>0.667 and 收<80 and REF(收,1)>80 ,100,'★逃');
Vars1:=REF(CLOSE,1);
Vars2:=SUM(IF(CLOSE> REF(CLOSE,1),VOL,IF(CLOSE< REF(CLOSE,1),0-VOL,0)),0);
Vars3:= REF(Vars2,1);
Vars4:=SMA(MAX(CLOSE-Vars1,0),7,1)/SMA(ABS(CLOSE-Vars1),7,1)*100;
Vars5:=SMA(MAX(CLOSE-Vars1,0),13,1)/SMA(ABS(CLOSE-Vars1),13,1)*100;
Vars6:=SMA(MAX(Vars2-Vars3,0),26,1)/SMA(ABS(Vars2-Vars3),26,1)*100;
Vars7:=1;
底部: IF(Vars4<15 AND Vars5<20 AND Vars6<50 AND BARSCOUNT(CLOSE)>25,-100,0),stick;
顶部: IF(Vars4>85 AND Vars5>80 AND Vars6>50 AN