通达信自用量比换手选股指标公式源码

通达信自用量比换手选股指标公式源码

源码正文：

量比:vol/REF(ma(VOL,M1),1)*10,LINETHICK0,COLORBLUE;二十日量比:SUM(VOL/REF(MA(VOL,M1),1)*1,20),NODRAW{XG51};
stICKLINE(量比,量比,0,1,1),COLOR00FF00;正常量:10;换手:V/CAPITAL*100,COLORWHITE,NODRAW;十日换手:SUM(换手,10),NODRAW;二十日换手:SUM(换手,20),NODRAW{XG51};
关注线:20.5 ;MA5:=MA(量比,1),COLORFF00FF,LINETHICK2{XG51};
突破线:40,LINETHICK2;STICKLINE(量比>=关注线,量比,0,3,0),COLORWHITE{XG51};
ZK1:="kd.K#WEEK"(9,3,3);IF(量比>REF(量比,1),量比,DRAWNULL),COLORBLUE,LINETHICK3{XG51};
ZD2:="KD.D#WEEK"(9,3,3);STICKLINE(量比>=10,量比,0,2,1),COLORBLUE{XG51};
ZF1:="macd.dif#WEEK"(12,26,9){XG51};
ZA2:="MacD.DEA#WEEK"(12,26,9){XG51};
JCD:=FILTER(crOSS(ZK1,ZD2) AND REF(ZD2,1)<30,13),NODRAW{XG51};
取点:=BArslAST(JCD){XG51};
吸筹区:=IF(取点>0 AND 取点<61,取点,0){XG51};
ZS1:=吸筹区{XG51};
ZS2:=吸筹区+1{XG51};
ZS3:=换手/5{XG51};
ZSA:=IF(ZS1>0,SUM((ZS3),吸筹区+1),0),NODRAW{XG51};
主力筹码%:=ZSA,NODRAW{XG51};
建仓天数:ZS1,NODRAW{XG51};
成交额【亿】:AMOUNT/100000000,NODRAW,COLORLICYAN{XG51};
换手冷清:STICKLINE(换手<3,(0-6)*4,(换手-6)*4,0.5,1),COLORCYAN{XG51};
换手活跃:STICKLINE(换手>=3 AND 换手<7,(0-6)*4,(换手-6)*4,0.5,1),COLORWHITE{XG51};
换手热烈:STICKLINE(换手>=7,(0-6)*4,(换手-6)*4,0.5,1),COLORFF00FF;VAR4:=MA(CLOSE,5){XG51};
VAR5:=MA(CLOSE,10);DRAWICON(二十日换手>30,(0-6)*5,9){XG51};
DRAWICON(二十日换手>80,(0-6)*6,17){XG51};
DRAWICON(十日换手>30,(0-6)*3,1){XG51};
DRAWICON(十日换手>80,(0-6)*4,23){XG51};
VAR6:=MA(CLOSE,30){XG51};
VAR7:=MA(CLOSE,60){XG51};
VAR8:=ema(COST(85),7){XG51};
VAR9:=EMA(COST(15),7){XG51};
VARA:=(SUM(((CLOSE * VOL) * 10),4) / SUM((VOL * 200),4)){XG51};
VARB:=(INTPART((VARA * 10)) / 10){XG51};
VARC:=(SUM(((CLOSE * VOL) * 10),7) / SUM((VOL * 200),7)){XG51};
VARD:=(INTPART((VARC * 10)) / 10){XG51};
VARE:=(SUM(((CLOSE * VOL) * 10),28) / SUM((VOL * 200),28)){XG51};
VARF:=(INTPART((VARE * 10)) / 10){XG51};
短线趋势:=(EMA(CLOSE,5) - EMA(CLOSE,10)),COLORWHITE,LINETHICK1{XG51};
中线趋势:=EMA(短线趋势,9),COLORLIMAGENTA,LINETHICK2{XG51};
VAR10:=((0 - ((10 * (HHV(CLOSE,5) - CLOSE)) / (HHV(CLOSE,5) - LLV(LOW,5)))) + 10){XG51};
VAR11:=((0 - ((10 * (HHV(CLOSE,10) - CLOSE)) / (HHV(CLOSE,10) - LLV(LOW,10)))) + 10){XG51};
VAR12:=((0 - ((10 * (HHV(CLOSE,20) - CLOSE)) / (HHV(CLOSE,20) - LLV(LOW,20)))) + 10){XG51};
VAR13:=((0 - ((10 * (HHV(CLOSE,30) - CLOSE)) / (HHV(CLOSE,30) - LLV(LOW,30)))) + 10){XG51};
VAR14:=REF(中线趋势,1){XG51};
VAR15:=中线趋势{XG51};
VAR16:=(VAR15 - VAR14){XG51};
VAR17:=REF(短线趋势,1){XG51};
VAR18:=短线趋势{XG51};
VAR19:=(VAR18 - VAR17){XG51};
VAR1A:=OPEN{XG51};
VAR1B:=CLOSE{XG51};
庄家吸筹:IF((((((((VAR1A <= VAR4) AND (VAR1A <= VAR5)) AND (VAR1A <= VAR6)) AND (VAR1B >= VAR4)) AND (VAR1B >= VARF)) AND (VAR16 > 0)) AND (VAR19 > 0)),20,0),LINETHICK2,COLOR66FF00{XG51};
短线指标:=IF(((((CROSS(短线趋势,中线趋势) AND (短线趋势 < 0)) AND (中线趋势 < (0 - 0.2))) AND (VAR11 > 45)) AND (VAR16 > 0)),0.3,0.1),COLOR66FF00;N:=20;JJ:=(HIGH+LOW+CLOSE)/3;QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW){XG51};
QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW))){XG51};
QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN)))){XG51};
QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE)))){XG51};
QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJ))){XG51};
ddx:((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,1000000,10000),COLOR00AAAA,LINETHICK{XG51};
DX:=MA(DDX,5)*N;

DDX1:=SMA(DX,3,1),COLORFFFFFF{XG51};
DDX2:=SMA(DDX1,3,1),COLOR00FFFF{XG51};
DDX3:=EMA(DDX2,5),COLORFF00FF{XG51};
预警:DDX>0 AND MA(V,5)>MA(MA(V,5),5) AND CROSS(DDX1,DDX2),LINETHICK{XG51};
天:=COUNT(DDX>0,5),COLORWHITE{XG51};
DRAWTEXT(预警,DDX*1.06,'★'),LINETHICK3,COLOR00FFFF{XG51};
上斜线:=DRAWLINE(量比<= LLV(量比,20),量比,量比>=HHV(量比,20) ,HHV(量比,20),0),,COLOR00FFFF,LINETHICK2{XG51};
下斜线:=DRAWLINE(量比>=HHV(量比,20),量比,量比<=LLV(量比,10),HHV(量比,6),0),COLORFFCCCC,LINETHICK2{XG51};
DRAWTEXT(CURRBARSCOUNT=30,突破线,'10日换手>30出红箭头,>80出红十字');DRAWTEXT(CURRBARSCOUNT=50,关注线,'20日换手>30出绿箭头,>80出桔子'),COLOR00FFFF{X_G~5-1_C_N_{};