通达信BOLL基本面主图选股指标公式源码

通达信BOLL基本面主图选股指标公式源码

源码正文：

N:=20{XG51};
MIDA:=ma(C,N){XG51};
VART1:=POW((C-MIDA),2){XG51};
VART2:=MA(VART1,N){XG51};
VART3:=SQRT(VART2){XG51};
UPPERA:=MIDA+2*VART3{XG51};
LOWERA:=MIDA-2*VART3{XG51};
boll:REF(MIDA,1){XG51};
UB:REF(UPPERA,1){XG51};
LB:REF(LOWERA,1){XG51};
所属板块:=stRCAT(' 【所属板块】：',STRCAT(STRCAT(STRCAT('       [行业]——',HYBLOCK),STRCAT('       [地域]——',DYBLOCK)),STRCAT('       [概念]——',GNBLOCK))){XG51};
DRAWTEXT_FIX(ISLASTBAR,0.005,0.02,0,所属板块),COLORLIMAGENTA{XG51};
Z1:=STRCAT(HYBLOCK,'----');  
Z2:=STRCAT(Z1,FGBLOCK){XG51};
Z3:=STRCAT(Z2,DYBLOCK);  
Z4:=STRCAT(Z3,'----');  
DRAWTEXT_FIX(1,0.00,0.06,0,'    【主题概念】：')COLORGREEN{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.10,0.06,0,STRCAT(Z4,GNBLOCK)),COLORGREEN{XG51};
DRAWTEXT_FIX(1,0.07,0.24,0,EXTERNSTR(0,14))COLORBLUE{XG51};
HH:=CONST(HHV(H,160)){XG51};
LL:=CONST(LLV(L,160)){XG51};
HL1:=CONST(IF(CONST(REF(MA(C,10),10))>CONST((HH+LL)/2),0.76,0.04)){XG51};
HL2:=CONST(IF(CONST(REF(MA(C,10),10))>CONST((HH+LL)/2),0.80,0.08)){XG51};
HL3:=CONST(IF(CONST(REF(MA(C,10),10))>CONST((HH+LL)/2),0.84,0.12)){XG51};
HL4:=CONST(IF(CONST(REF(MA(C,10),10))>CONST((HH+LL)/2),0.88,0.16)){XG51};
HL5:=CONST(IF(CONST(REF(MA(C,10),10))>CONST((HH+LL)/2),0.92,0.20)){XG51};
HL6:=CONST(IF(CONST(REF(MA(C,10),10))>CONST((HH+LL)/2),0.96,0.24)){XG51};
DRAWTEXT_FIX (1,0.80,HL1,0,'股本:'){XG51};
DRAWNUMBER_FIX(1,0.84,HL1,0,CONST(FINANCE(1)/100000000)){XG51};
DRAWTEXT_FIX (1,0.80,HL2,0,'流通:'){XG51};
DRAWNUMBER_FIX(1,0.84,HL2,0,CONST(FINANCE(7)/100000000)){XG51};
DRAWTEXT_FIX (1,0.80,HL3,0,'动PE:'){XG51};
DRAWNUMBER_FIX(1,0.84,HL3,0,CONST(DYNAINFO(39))){XG51};
DRAWTEXT_FIX (1,0.80,HL4,0,'换手:'){XG51};
DRAWNUMBER_FIX(1,0.84,HL4,0,CONST(DYNAINFO(37)*100)){XG51};
DRAWTEXT_FIX (1,0.80,HL5,0,'量比:'){XG51};
DRAWNUMBER_FIX(1,0.84,HL5,0,CONST(DYNAINFO(17))){XG51};
DRAWTEXT_FIX (1,0.80,HL6,0,'涨幅:'){XG51};
DRAWNUMBER_FIX(1,0.84,HL6,0,CONST(DYNAINFO(14)*100)),COLORFF00FF{XG51};
DRAWNUMBER_FIX(1,0.84,HL6,0,IF(CONST(DYNAINFO(14)*100)<0,CONST(DYNAINFO(14)*100),DRAWNULL))COLOR00FF00{XG51};
字:=STRCAT(STRCAT(STRCAT('名称: ',STKNAME),' 代码: '),CODE){XG51};
DRAWTEXT_FIX(ISLASTBAR,0.5,0.10,0,字),COLORBLUE{X_G*5~1_C_N_{};