通達信股票公式之魔鬼魔王

　　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);