通达信魔王源码
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);
