飞狐日月同辉副图指标

源码

M:=42;N:=3;N1:=28;M1:=4;M2:=2;

TYP := (HIGH + LOW + CLOSE)/3;
短:(TYP-MA(TYP,M))/(0.015*AVEDEV(TYP,M));
中:ma(短,7);
长:ma(短,30),;
D:if(CROSS(短,中) and CROSS(短,长),70,-100),Color0000FF;
zjg:if(ref(短,1)<100 and 短>100,-20,-100);

Z:100,pointdot,Linethick3,colorff00;
ZZ:-100,pointdot,Linethick3,,ColorFFFFFF;
PARTLINE(中>Z,中),,Color0000FF;
PARTLINE(长>Z,长),LINEDOT,Color00FFFF;
{PARTLINE(月>ref(月,1),月),ColorFF0000;}
PARTLINE(短>z,短);
PARTLINE(短>Z,Z),ColorFF0000;
PARTLINE(短<-Z,-Z),,Color0000FF;

{n:1,100,3}
Var1:=DMA(AMOUNT/VOL/100,VOL/CAPITAL);
Var2:=Var1+Var1*34/100;
Var3:=LOW;
Var4:=REF(LOW,1);
Var5:=SMA(ABS(Var3-Var4),3,1)/SMA(MAX(Var3-Var4,0),N,1)*100;
Var6:=MA(IF(CLOSE*1.68<="CYC@CYCMAX",Var5*10,Var5/10),N);
Var7:=LLV(LOW,30);
Var8:=HHV(Var6,30);
牛魔王:= MA(IF(LOW<=Var7,(Var6+Var8*2)/2,0),N);
{A:IF(牛魔王>10000,牛魔王,0), , COLORRED;}
魔道:if(牛魔王>0 and 短<-100,80,100);
DRAWICON(cross(短, 中) and 魔道,-80,9);
DRAWICON(cross(短, 中) and 魔道,-100,9);
DRAWICON(cross(短, 中) and 魔道,-85,9) , COLORRED;
DRAWICON(cross(短,