通达信魔王源码

N1:=7;
 LC:=REF(CLOSE,1);
 X:=SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100,COLORYELLOW,LINETHICK1;
魔鬼:=DRAWLINE(X>=HHV(X,N1),X,X<=LLV(X,N1),X,1),COLOR00FF00;
魔王:=DRAWLINE(X>=HHV(X,N1),X,X<=LLV(X,N1),1,X),COLOR00FF00;

 TJ0:=X=魔王;
TJ1:=X=魔鬼;
TJ2:=X<REF(X,1);
 TJ3:=X>REF(1,X);
 JRS1:=DRAWICON(TJ1 AND TJ2,X,1);
 JRS2:=DRAWICON(TJ0 AND TJ3,X,2);
 DRAWICON(FILTER(JRS1>0,1),L*0.97,1);
 DRAWICON(FILTER(JRS2>0,1),H*1.02,2);