通达信新益萌量能BS主图未加密选股指标公式源码

源码正文：

P1:=16{XG51};
能量:=SQRT(vol)*(((C-(H+L)/2))/((H+L)/2)){XG51};
平滑能量:=ema(能量,P1){XG51};
能量惯性:=Ema(平滑能量,P1) {XG51};
BUY2:=crOSS(平滑能量,能量惯性){XG51};
BUY3:=CROSS(能量,平滑能量) AND (平滑能量>能量惯性){XG51};
DRAWTEXT(BUY2 OR BUY3,L*0.99,'▲ '),COLORF00FF0,LINETHICK5{XG51};
SEL2:=CROSS(平滑能量 ,能量){XG51};
SEL3:=CROSS(能量惯性 ,平滑能量){XG51};
DRAWTEXT(能量<REF(能量,1) AND SEL2 AND 平滑能量>能量惯性,H*1.01,'ㄓ'),COLORCYAN,LINETHICK5{XG51};
DRAWTEXT(SEL3,H*1.015,'顶'),COLORCYAN,LINETHICK5{XG51};
卖线12:EMA(SLOPE(C,12)*12+C,21),LINETHICK3{XG51};
买线:EMA(C,2),COLORWHITE,LINETHICK1{XG51};
卖线:EMA(SLOPE(C,21)*21+C,42),COLORWHITE{XG51};
BUY:=CROSS(买线,卖线){XG51};
BUY1:=CROSS(买线,卖线12){XG51};
SEL:=CROSS(卖线,买线){XG51};
SEL1:=CROSS(卖线12,买线){XG51};
DRAWTEXT(BUY ,LOW-0.1,'▲Ｂ '),COLORF00FF0,LINETHICK5{XG51};
DRAWTEXT(BUY1 AND (CROSS(能量,能量惯性) OR 平滑能量>能量惯性),LOW-0.1,'▲Ｂ1 '),COLORCYAN,LINETHICK5{XG51};
DRAWTEXT(SEL,HIGH+0.1,'▼Ｓ'),COLORRED,LINETHICK5{XG51};
DRAWTEXT(SEL1,HIGH+0.4,'▼Ｓ1'),COLORCYAN,LINETHICK5;
VAR111:=REF(CLOSE,1){XG51};
VAR222:=SMA(MAX(CLOSE-VAR111,0),7,1)/SMA(Abs(CLOSE-VAR111),7,1)*100{XG51};
DRAWTEXT(FILTER(REF(VAR222,1)<20 AND VAR222>REF(VAR222,1),5),买线*0.99,'↖特准抄底'),COLORCYAN{XG51};
bias1:=(C-MA(C,6))/MA(C,6)*100{XG51};
BIAS2:=(C-MA(C,12))/MA(C,12)*100{XG51};
BIAS3:=(C-MA(C,24))/MA(C,24)*100{XG51};
BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6{XG51};
乖离:=MA(BIAS,3){XG51};
DRAWTEXT(CROSS(BIAS,乖离) AND 乖离<-9.5,买线*0.96,'↖红柱抄底'),COLORWHITE{XG51};
红柱抄底:=CROSS(BIAS,乖离) AND 乖离<-9.5{XG51};
特准抄底:=FILTER(REF(VAR222,1)<20 AND VAR222>REF(VAR222,1),5){XG51};
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2){XG51};
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
买:=IF("kdj.J"<0,10,0){XG51};
条件:=CROSS(9.9,买){XG51};
VAR1111:=(2*CLOSE+HIGH+LOW)/4{XG51};
VAR2222:=LLV(LOW,5){XG51};
VAR3333:=HHV(HIGH,5){XG51};
VAR4444:=EMA((VAR1111-VAR2222)/(VAR3333-VAR2222)*100,5){XG51};
MA11:=MA(VAR4444,2){XG51};
AA:=stICKLINE(VAR4>MA11,VAR4,MA11,3,1),COLORWHITE{XG51};
BBB:=STICKLINE(VAR4>MA11 AND REF(VAR4,1)<30,VAR4,MA11,3,1),COLORWHITE{XG51};
DRAWICON(CROSS(9.9,买),C,1){XG51};
STICKLINE(CROSS(9.9,买),H*1.01,H,3,1),COLORBLUE{XG51};
XXX:=STICKLINE(BBB ,H*1.01,H,3,1),COLORBLUE{XG51};
STICKLINE(FILTER(XXX ,5) ,C*0.9,L,3,1),COLORBLUE{X~G_5=1~C~N~{};

源码正文：

ma4:=MA(CLOSE,60){XG51};
MA55:=MA(CLOSE,120){XG51};
DRAWBAND(MA4,RGB(100,10,0),MA55,RGB(40,90,10)){XG51};
N1:=IF(BARSCOUNT(C)>=10,10,BARSCOUNT(C)){XG51};
DRAWKLINE(H,O,L,C){XG51};
N:=IF(BARSCOUNT(C)>=45,45,BARSCOUNT(C)){XG51};
stICKLINE(C>=MA(C,N),MA(C,N),MA(C,N*0.78),4,0),COLORBLUE{XG51};
STICKLINE(C<MA(C,N),MA(C,N),MA(C,N*0.78),4,0),COLORYELLOW{XG51};
DRAWKLINE(H,O,L,C){XG51};
MA5:MA(CLOSE,5){XG51};
MA10:MA(CLOSE,10),COLORGREEN{XG51};
MA20:MA(CLOSE,20){XG51};
MA60:MA(CLOSE,60){XG51};
MA120:MA(CLOSE,120){XG51};
VVA1:=((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8)))*(100){XG51};
VVA2:=((CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21)))*(100){XG51};
VVA3:=((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)))*(100){XG51};
上升VVA4:=MAX(VVA1,VVA2){XG51};
上升VVA5:=MAX(上升VVA4,VVA3){XG51};
上升VVA6:=ema(上升VVA5,3){XG51};
上升位置1:=REF(上升VVA6,1),COLOR00FFFF{XG51};
上升位置2:=REF(上升VVA6,2),COLOR00FFFF{XG51};
上升位置3:=REF(上升VVA6,3),COLOR00FFFF{XG51};
上升高位置4:=MAX(上升位置1,上升位置2),COLOR00FFFF{XG51};
上升高位置:=MAX(上升高位置4,上升位置3),COLOR00FFFF{XG51};
下跌VVA4:=MIN(VVA1,VVA2){XG51};
下跌VVA5:=MIN(下跌VVA4,VVA3){XG51};
下跌VVA6:=EMA(下跌VVA5,3){XG51};
下跌位置1:=REF(下跌VVA6,1),COLOR00FFFF{XG51};
下跌位置2:=REF(下跌VVA6,2),COLOR00FFFF{XG51};
下跌位置3:=REF(下跌VVA6,3),COLOR00FFFF{XG51};
下跌低位置4:=MIN(下跌位置1,下跌位置2),COLOR00FFFF{XG51};
下跌低位置:=MIN(下跌低位置4,下跌位置3),COLOR00FFFF{XG51};
上升短高点5:=MAX(REF(C,1),REF(C,2)){XG51};
上升短高点:=MAX(上升短高点5,REF(C,3)){XG51};
上升短低点5:=MIN(REF(C,4),REF(C,5)){XG51};
上升短低点:=MIN(上升短低点5,REF(C,6)){XG51};
上升涨幅5:=(上升短高点-上升短低点)/上升短低点*100{XG51};
上升短期高点8:=MAX(REF(C,1),REF(C,2)){XG51};
上升短期高点:=MAX(上升短期高点8,REF(C,3)){XG51};
上升短期低点8:=MIN(REF(C,7),REF(C,8)){XG51};
上升短期低点:=MIN(上升短期低点8,REF(C,9)){XG51};
上升涨幅8:=(上升短期高点-上升短期低点)/上升短期低点*100{XG51};
上升中期高点21:=MAX(REF(C,1),REF(C,2)){XG51};
上升中期高点:=MAX(上升中期高点21,REF(C,3)){XG51};
上升中期低点21:=MIN(REF(C,20),REF(C,21)){XG51};
上升中期低点:=MIN(上升中期低点21,REF(C,22)){XG51};
上升涨幅21:=(上升中期高点-上升中期低点)/上升中期低点*100{XG51};
上升长期高点34:=MAX(REF(C,1),REF(C,2)){XG51};
上升长期高点:=MAX(上升长期高点34,REF(C,3)){XG51};
上升长期低点34:=MIN(REF(C,33),REF(C,34)){XG51};
上升长期低点:=MIN(上升长期低点34,REF(C,35)){XG51};
上升涨幅34:=(上升长期高点-上升长期低点)/上升长期低点*100{XG51};
上升涨幅1:=IF((上升涨幅8>10 OR 上升涨幅21>20 OR 上升涨幅34>30),1,0){XG51};
上升涨幅2:=IF((上升涨幅8>5 OR 上升涨幅21>10 OR 上升涨幅34>15),1,0){XG51};
上升涨幅:=IF(CAPITAL=0,上升涨幅2,上升涨幅1){XG51};
下跌短低点5:=MIN(REF(C,1),REF(C,2)){XG51};
下跌短低点:=MIN(下跌短低点5,REF(C,3)){XG51};
下跌短高点5:=MAX(REF(C,4),REF(C,5)){XG51};
下跌短高点:=MAX(下跌短高点5,REF(C,6)){XG51};
下跌跌幅5:=(下跌短高点-下跌短低点)/下跌短低点*100{XG51};
下跌短期低点8:=MIN(REF(C,1),REF(C,2)){XG51};
下跌短期低点:=MIN(下跌短期低点8,REF(C,3)){XG51};
下跌短期高点8:=MAX(REF(C,7),REF(C,8)){XG51};
下跌短期高点:=MAX(下跌短期高点8,REF(C,9)){XG51};
下跌跌幅8:=(下跌短期高点-下跌短期低点)/下跌短期低点*100{XG51};
下跌中期低点21:=MIN(REF(C,1),REF(C,2)){XG51};
下跌中期低点:=MIN(下跌中期低点21,REF(C,3)){XG51};
下跌中期高点21:=MAX(REF(C,20),REF(C,21)){XG51};
下跌中期高点:=MAX(下跌中期高点21,REF(C,22)){XG51};
下跌跌幅21:=(下跌中期高点-下跌中期低点)/下跌中期低点*100{XG51};
下跌长期低点34:=MIN(REF(C,1),REF(C,2)){XG51};
下跌长期低点:=MIN(下跌长期低点34,REF(C,3)){XG51};
下跌长期高点34:=MAX(REF(C,33),REF(C,34)){XG51};
下跌长期高点:=MAX(下跌长期高点34,REF(C,35)){XG51};
下跌跌幅34:=(下跌长期高点-下跌长期低点)/下跌长期低点*100{XG51};
下跌跌幅:=IF((下跌跌幅8>10 OR 下跌跌幅21>20 OR 下跌跌幅34>30),1,0){XG51};
STICKLINE( C<MA60,H,L,0,0),COLOR777777{XG51};
STICKLINE( C<MA60,O,C,3,1),COLOR777777{XG51};
QN1:=MA(C,13){XG51};
QN:=ATAN((QN1-REF(QN1,1)))*180/2{XG51};
QN2:=MA(C,21){XG51};
QN3:=ATAN((QN2-REF(QN2,1)))*180/2{XG51};
MIN1:=MIN(QN1,QN2){XG51};
MAX1:=MAX(QN1,QN2){XG51};
开炮1:=IF(L<MIN1 AND C>MAX1 AND C>REF(C,1) AND vol>MA(VOL,5) AND (C-REF(C,1))/REF(C,1)*100>3,1,0){XG51};
STICKLINE(开炮1>0,C,O,3,1),COLOR0066BB{XG51};
STICKLINE(开炮1>0,C,O,2,1),COLOR0066BB{XG51};
涨幅10:=(HHV(H,10)-LLV(L,10))/LLV(L,10)*100,NODRAW{XG51};
DRAWTEXT(开炮1>0 AND 下跌低位置<25 AND 下跌跌幅>0,L*0.97,'开炮'),COLOR0000FF{XG51};
短买:=L<QN1 AND C>QN1 AND C>REF(C,1) AND MA(C,5)>REF(MA(C,5),1) AND 开炮1=0{XG51};
DRAWICON(短买 AND 下跌低位置<25 AND 下跌跌幅>0,L,1),COLOR0000FF{XG51};
撤退:=IF(H>MAX1 AND C<MIN1 AND C<REF(C,1) AND (REF(C,1)-C)/REF(C,1)*100>3,1,0){XG51};
STICKLINE(撤退>0,C,O,3,1),COLOR008800{XG51};
STICKLINE(撤退>0,C,O,2,1),COLOR008800{XG51};
DRAWTEXT(撤退>0 AND 上升高位置>75 AND 上升涨幅>0,H*1.02,'撤退'),COLORCYAN{XG51};
短卖:=H>QN1 AND C<QN1 AND C<REF(C,1) AND 撤退=0{XG51};
DRAWICON(短卖 AND 上升高位置>75 AND 上升涨幅>0,H,2),COLORCYAN{XG51};
AAS:=BArslAST(MA60>MA20 AND (MA20=MA10 OR MA20>MA10)){XG51};
Bbs:=REF(COUNT(C<MA60,AAS)=AAS,1){XG51};
CC:=crOSS(C,MA60) AND VOL>MA(VOL,5) AND (C-REF(C,1))/REF(C,1)*100>3{XG51};
芙蓉出水:=BB AND CC,COLOR00FF00{XG51};
STICKLINE(芙蓉出水,O,C,3,1),COLORFF00FF{XG51};
STICKLINE(芙蓉出水,O,C,2,1),COLORFF00FF{XG51};
DRAWTEXT(芙蓉出水,L,'芙蓉出水'),COLORFF00FF{XG51};
B:=BARSLAST(C>O AND C>REF(C,1)){XG51};
A1C:=CONST(REF(C,B)){XG51};
超短压力价:=DRAWLINE(CURRBARSCOUNT=B+10 AND C<REF(C,B), A1C, ISLASTBAR, A1C, 1),LINETHICK2,COLOR0000FF{XG51};
TT:=IF(LOW<=LLV(LOW,3),HHV(HIGH,3),HHV(HIGH,3)){XG51};
下降压力线:DRAWLINE(HIGH>=HHV(HIGH,10),HIGH, ISLASTBAR,TT,1),LINETHICK2,COLORFF00FF{XG51};
SS1:=短卖 AND 上升高位置>75 AND 上升涨幅>0{XG51};
SS2:=H>MAX1 AND C<MIN1 AND C<REF(C,1) AND (REF(C,1)-C)/REF(C,1)*100>3{XG51};
SS3:=IF((SS1>0 OR SS1>0),MA(C,5),DRAWNULL){XG51};
水平压力线:DRAWLINE((SS1>0 OR SS1>0),MA(C,5), ISLASTBAR,SS3,1),LINETHICK2,COLORFF00FF{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.18,0.01,1,'上市日期:'),COLOR00FF00{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.18,0.01,0,FInaNCE(42)),COLOR00FF00{XG51};
DRAWTEXT_FIX(1,0.01,0.13,0,EXTERNSTR(0,1)),COLORWHITE{XG51};
DRAWTEXT_FIX(1,0.26,0.01,0,EXTERNSTR(0,2)),COLORDD00DD{XG51};
DRAWTEXT_FIX(1,0.01,0.066,0,EXTERNSTR(0,3)),COLOR00DD00{XG51};
DRAWTEXT_FIX(ISLASTBAR ,0.06,0.01,1,DYBLOCK),COLORBLUE{XG51};
DRAWTEXT_FIX(ISLASTBAR ,0.065,0.01,0,HYBLOCK),COLORBLUE{XG51};
总额:=AMOUNT{XG51};
买:=IF(O=C AND (C-REF(C,1))/REF(C,1)*100>9.8,AMOUNT,AMOUNT/((H-L)*2-ABS(O-C))*(C-L)){XG51};
买%:=买/AMOUNT*100{XG51};
流入:=AMOUNT*买%/10000000000{XG51};
流出:=AMOUNT/100000000-流入{XG51};
净流:=(流入-流出){XG51};
总额3:=SUM(AMOUNT,3){XG51};
流入3:=SUM(流入,3){XG51};
流出3:=SUM(流出,3){XG51};
净流3:=SUM(流入-流出,3){XG51};
总额5:=SUM(AMOUNT,5){XG51};
流入5:=SUM(流入,5){XG51};
流出5:=SUM(流出,5){XG51};
净流5:=SUM(流入-流出,5){XG51};
总额10:=SUM(AMOUNT,10){XG51};
流入10:=SUM(流入,10){XG51};
流出10:=SUM(流出,10){XG51};
净流10:=SUM(流入-流出,10){XG51};
画:=CONST(FINDHIGH(总额10,0,190,1)){XG51};
DRAWTEXT_FIX(1,0.71,0.07,0,'净流(亿):'),COLORLIMAGENTA,LINETHICK1{XG51};
DRAWTEXT_FIX(1,0.78,0.05,0,'1日'),COLORLIMAGENTA,LINETHICK1{XG51};
DRAWTEXT_FIX(1,0.83,0.05,0,'3日'),COLORLIMAGENTA,LINETHICK1{XG51};
DRAWTEXT_FIX(1,0.88,0.05,0,'5日'),COLORLIMAGENTA,LINETHICK1{XG51};
DRAWTEXT_FIX(1,0.93,0.05,0,'10日'),COLORLIMAGENTA,LINETHICK1{XG51};
DRAWNUMBER_FIX(1,0.78,0.10,0,CONST((净流))),COLORBLUE{XG51};
DRAWNUMBER_FIX(1,0.83,0.10,0,CONST((净流3))),COLORBLUE{XG51};
DRAWNUMBER_FIX(1,0.88,0.10,0,CONST((净流5))),COLORBLUE{XG51};
DRAWNUMBER_FIX(1,0.93,0.10,0,CONST((净流10))),COLORBLUE{X-G_5!1-C-N-{};