通达信暴力量价K线主图未加密选股指标公式源码

源码正文：

M_V:=AMOUNT/V/1000{XG51};
L_H:=H*M_V/C*10{XG51};
L_O:=O*M_V/C*10{XG51};
L_C:=C*M_V/C*10{XG51};
L_L:=L*M_V/C*10{XG51};
stICKLINE(L_C>=L_O,L_L,L_H,0.00001,0),COLORWHITE{XG51};
STICKLINE(L_C>L_O,L_O,L_C,2.5,0),COLORWHITE{XG51};
STICKLINE(L_C>L_O,L_O,L_C,0.6,0),COLORCC66FF{XG51};
STICKLINE(L_C<L_O,L_O,L_C,2.5,0),COLORFF6600{XG51};
STICKLINE(L_C<L_O,L_O,L_C,0.6,0),COLORFF9900{XG51};
STICKLINE(L_C<L_O,L_L,L_H,0.00001,0),COLORFF9900{X~G+5=1~C~N~{};

源码正文：

N:=6{XG51};
M:=10{XG51};
VAR2:=(C-ma(C,M))/MA(C,M)*100{XG51};
VAR3:=(C-MA(C,M*2))/MA(C,M*2)*100{XG51};
VAR4:=(C-MA(C,M*4))/MA(C,M*4)*100{XG51};
VAR5:=(VAR2+2*VAR3+3*VAR4)/6{XG51};
VAR6:=MA(VAR5,3){XG51};
离心力:VAR6*5,COLORCYAN{XG51};
IF(离心力>REF(离心力,1),离心力,DRAWNULL),COLORWHITE{XG51};
XG:=离心力>REF(离心力,1) AND REF(离心力,1)<REF(离心力,2) AND 离心力<-N{XG51};
stICKLINE(XG,离心力,15,1,0){X=G*5=1=C=N={};