“庄影”的源码

{有庄控盘}
VAR18:=EMA(EMA(CLOSE,13),13);
控盘:=(VAR18-REF(VAR18,1))/REF(VAR18,1)*1000;
JJ:=DYNAINFO(11);
P:=55;S:=8;M1:=3;
财:=(EMA(CLOSE,S)-EMA(CLOSE,P))*10;
神:=EMA(财,M1);
{股价与均线偏离买卖条件}
BTJ1:=(C-JJ)/JJ<-0.03;
{控盘买卖条件}
BTJ2:=控盘>REF(控盘,1) AND 控盘<-0.2;
{波段买卖条件}
BTJ3:=CROSS(财,神) AND 财<-0.3;
{以下为信号};
BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,13);
DRAWTEXT(BTJ81,C,'●庄影'),COLORCYAN;