通达信炮弹未加密选股指标公式源码

源码正文：

N:=15;M:=32{XG51};
VAR1H:=dma(AMOUNT/vol/100, VOL/CAPITAL){XG51};
VAR2H:=ma(WINNER(HIGH)-WINNER(VAR1H), 15){XG51};
VAR3H:=MA(WINNER(LOW)-WINNER(VAR1H),32){XG51};
VAR4H:=VAR3H-VAR2H{XG51};
火箭:IF(REF(VAR4H,2)<REF(VAR4H,1) AND REF(VAR4H,1)>VAR4H AND VAR4H>0 AND
VAR4H*10>1,80,0),stICK,COLOR00FF00{XG51};
DRAWTEXT(火箭,70,'火箭'),COLORF00FF0{XG51};
导弹:IF(REF(VAR4H,2)<REF(VAR4H,1) AND REF(VAR4H,1)>VAR4H AND VAR4H>0 AND
VAR4H*10<1 AND VAR4H*10>0.55,45,0),STICK,COLORWHITE{XG51};
DRAWTEXT(导弹,40,'导弹'),COLORBLUE{XG51};
炮弹:IF (REF(VAR4H,2)<REF(VAR4H,1) AND REF(VAR4H,1)>VAR4H AND VAR4H>0 AND
VAR4H*10<=0.55,60,0),STICK,COLORF0F000{XG51};
DRAWTEXT(炮弹,55,'炮弹'),COLOR000099{X+G_5-1+C+N+{};

源码正文：

A1:=COst(95){XG51};
A2:=COST(5){XG51};
集中度:(A1-A2)*100/(A1+A2),COLORWHITE,LINETHICK2{XG51};
M5:HHV(集中度,5){XG51};
DRAWICON(集中度>REF(集中度,1),集中度,1){XG51};
IF(集中度>REF(集中度,1),集中度,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
IF(集中度<REF(集中度,1),集中度,DRAWNULL),COLORCYAN,LINETHICK2{XG51};
顶21天:HHV(集中度,21),COLORFF00FF,DOTLINE{XG51};
顶与集中度差:Abs(顶21天-集中度),LINETHICK0,COLORWHITE{XG51};
集中度差值:集中度-REF(集中度,1),LINETHICK0,COLORWHITE{X*G_5*1*C*N*{};