伏击雷达（通达信公式 主图 源码 测试图）

公式名称:伏击雷达

这是某UP软件的公式转换为通达信的
 

预警:(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),POINTDOT,COLORBLUE;

操盘:XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK2,COLORRED;

趋势:EMA(操盘,25),LINETHICK2;

STICKLINE(操盘>LOW AND 操盘<HIGH,操盘,MIN(MIN(OPEN,CLOSE),操盘),4,0),COLORYELLOW;

STICKLINE(操盘>MIN(C,O) AND 操盘<MAX(C,O),操盘,MIN(OPEN,CLOSE),4,0),COLORYELLOW;

STICKLINE(操盘>HIGH,OPEN,CLOSE,4,0),COLORYELLOW;

STICKLINE(操盘>HIGH,HIGH,LOW,0,0),COLORYELLOW;

VAR23:=100*XMA(XMA((C-REF(C,1)),6),6)/XMA(XMA(ABS((C-REF(C,1))),6),6);

回调买:=LLV(VAR23,2)==LLV(VAR23,7) AND COUNT(VAR23<0,2) AND CROSS(VAR23,MA(VAR23,2));

XG:=操盘>HIGH AND 回调买 AND L<=操盘;

DRAWTEXT(XG,L,'▲买入'),COLORRED;

JJ:=(HIGH+LOW+CLOSE)/3;

QJ0:=VOL/IFF(HIGH==LOW,4,HIGH-LOW);

QJ1:=IFF(CAPITAL==0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IFF(HIGH==LOW,1,(MIN(OPEN,CLOSE)-LOW)));

QJ2:=IFF(CAPITAL==0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IFF(HIGH==LOW,1,(JJ-MIN(CLOSE,OPEN))));

QJ3:=IFF(CAPITAL==0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IFF(HIGH==LOW,1,(HIGH-MAX(OPEN,CLOSE))));

QJ4:=IFF(CAPITAL==0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IFF(HIGH==LOW,1,(MAX(CLOSE,OPEN)-JJ)));

DDX:=((QJ1+QJ2)-(QJ3+QJ4))/IFF(CAPITAL==0,10000,100
..........

2022188495368468.png

 

2022188495941666.png