通达信BS操盘主图未加密选股指标公式源码

源码正文：

VAR1:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14)))){XG51};
VAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14)))){XG51};
VAR3:=(100 - ma(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34)){XG51};
DIR1:=Abs(CLOSE-REF(CLOSE,5)){XG51};
VIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),5){XG51};
ER1:=DIR1/VIR1{XG51};
CS1:=ER1*(0.8-2/8)+2/8{XG51};
CQ1:=CS1*CS1{XG51};
AMA1:ema(dma(CLOSE,CQ1),2) ,COLORRED{XG51};
DIR2:=ABS(CLOSE-REF(CLOSE,10)){XG51};
VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10){XG51};
ER2:=DIR2/VIR2{XG51};
CS2:=ER2*(0.8-2/24)+2/24{XG51};
CQ2:=CS2*CS2{XG51};
AMA2:EMA(DMA(CLOSE,CQ2),2),COLORCYAN,LINETHICK2{XG51};
AMA3:IF(AMA2/REF(AMA2,1)>0.997,AMA2,DRAWNULL),COLORBLUE,LINETHICK2{XG51};
AMA4:IF(AMA2/REF(AMA2,1)>1.001,AMA2,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
stICKLINE((VAR2 < MA(VAR3,6)),CLOSE,OPEN,3,1),COLOR008000{XG51};
STICKLINE((VAR2 > MA(VAR3,6)),OPEN,CLOSE,3,1),COLORWHITE{XG51};
STICKLINE(((OPEN > CLOSE) AND (VAR2 > MA(VAR3,6))),(OPEN * 0.998),(CLOSE * 1.0001),2.3,0),COLOR008000{XG51};
STICKLINE(((OPEN < CLOSE) AND (VAR2 < MA(VAR3,6))),(CLOSE * 0.998),(OPEN * 1.002),2.3,0),COLORWHITE{XG51};
STICKLINE(((OPEN > CLOSE) AND (VAR2 < MA(VAR3,6))),CLOSE,OPEN,2.3,0),COLOR008000{XG51};
DRAWICON(crOSS(VAR2,MA(VAR3,6)),(LOW - (LOW*0.04)),7){XG51};
DRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH+(HIGH*0.03)),8){XG51};
PT:=REF(H,1)-REF(L,1){XG51};
cdp:=(REF(H,1)+REF(L,1)+REF(C,1)*2)/4{XG51};
AH:=CDP+PT{XG51};
AL:=CDP-PT{XG51};
NH:=CDP*2-REF(L,1){XG51};
NL:=CDP*2-REF(H,1){XG51};
强:IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH)NODRAW{XG51};
阻:IF(NH>强,(强-CDP)*0.618+CDP,NH)NODRAW,COLORGREEN{XG51};
M:=IF(AL<REF(C,1)/1.1,REF(C,1)/1.1,AL){XG51};
撑:IF(NL<M,CDP-(CDP-M)*0.618,NL)NODRAW{XG51};
底:IF(AL<REF(C,1)/1.1,REF(C,1)/1.1,AL)NODRAW{X-G^5+1-C-N-{};

源码正文：

历史量比:=vol/ma(VOL,5){XG51};
换手:=(VOL*100/CAPITAL){XG51};
十日换手:SUM(换手,10){XG51};
AA:=VOL/((HIGH-LOW)*2-Abs(CLOSE-OPEN)){XG51};
主买:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL /2)),POINTDOT,COLORWHITE{XG51};
主卖:=IF(CLOSE>OPEN,AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,AA*(HIGH-LOW),VOL /2)),COLORGREEN,POINTDOT{XG51};
ZM:=ema(HHV(主买,34),1),COLOR999999{XG51};
DRAWBAND(ZM,RGB(0,0,100),0,RGB(0,0,0)){XG51};
T5:=FROMOPEN-INTPART(FROMOPEN/5)*5{XG51};
VV5:=IF(CURRBARSCOUNT=1 AND PERIOD=1,VOL*5/T5,DRAWNULL){XG51};
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=1,VV5,0,4,-1),COLORFFFFFF{XG51};
T15:=FROMOPEN-INTPART(FROMOPEN/15)*15{XG51};
VV15:=IF(CURRBARSCOUNT=1 AND PERIOD=2,VOL*15/T15,DRAWNULL){XG51};
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=2,VV15,0,4,-1),COLORFFFFFF{XG51};
T30:=FROMOPEN-INTPART(FROMOPEN/30)*30{XG51};
VV30:=IF(CURRBARSCOUNT=1 AND PERIOD=3,VOL*30/T30,DRAWNULL){XG51};
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=3,VV30,0,4,-1),COLORFFFFFF{XG51};
T60:=FROMOPEN-INTPART(FROMOPEN/60)*60{XG51};
VV60:=IF(CURRBARSCOUNT=1 AND PERIOD=4,VOL*60/T60,DRAWNULL){XG51};
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=4,VV60,0,4,-1),COLORFFFFFF{XG51};
VVOL:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW{XG51};
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,VVOL,0,4,-1),COLORFFFFFF{XG51};
VAR2:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100{XG51};
获利盘: WINNER(CLOSE)*100{XG51};
VAR3:=SMA(VAR2,3,1){XG51};
VAR4:=SMA(VAR3,9,1){XG51};
VAR5:=3*VAR3-2*VAR4{XG51};
VAR6:=VOL{XG51};
涨跌1:= (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100{XG51};
角度: (CLOSE-REF(OPEN,29))/REF(OPEN,29)*100{XG51};
VAR7:=SUM(换手,30){XG51};
VAR8:=LLV(INDEXL,5){XG51};
VAR9:=HHV(INDEXH,5){XG51};
VARA:=EMA((INDEXC-VAR8)/(VAR9-VAR8)*100,4){XG51};
VARB:=MA(EMA(0.667*REF(VARA,1)+0.333*VARA,2),9){XG51};
VARC:=MA(VARB,30){XG51};
VARD:=EMA(获利盘,4){XG51};
本盘亿股:= CAPITAL/1000000{XG51};
振幅1:= (HIGH-LOW)/REF(CLOSE,1)*100{XG51};
VARF:=(涨跌1>VARD AND 角度<-30 AND 涨跌1>3){XG51};
crOSS(VARB,VARC) AND VARC<29{XG51};
STICKLINE(VOL AND VAR5>VAR4 AND C>=O,0,VOL,3,1),COLORWHITE{XG51};
STICKLINE(VOL AND VAR5>VAR4 AND C<O,0,VOL,3,0),COLORFFFF00{XG51};
STICKLINE(VOL AND VAR5<VAR4 AND C>=O,0,VOL,3,1),COLOR00FF00{XG51};
STICKLINE(VOL AND VAR5<VAR4 AND C<O,0,VOL,3,1),COLOR00FF00{XG51};
STICKLINE(VOL AND VAR4<16,-10,VOL*0.5,3,0),COLOR00FFFF{XG51};
STICKLINE(主买,0,主买,1.5,0),COLORWHITE{XG51};
STICKLINE(主卖,0,主卖,0.8,0),COLOR004000{XG51};
V5: MA(VOL,5),COLORRED{XG51};
V60: MA(VOL,60),COLOR00FFFF{XG51};
EMA(HHV(主买,34),1),COLOR555555,LINETHICK1{X=G_5_1=C=N={};