通达信牛熊分道+主散筹码+庄家控盘+行情主升浪主图选股指标公式源码

通达信牛熊分道+主散筹码+庄家控盘+行情主升浪主图选股指标公式源码

源码正文：

价量:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*Sma(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1){XG51};
主力活跃力度:=(((价量-LLV(价量,27))/(HHV(价量,27)-LLV(价量,27)))*(4))*(25){XG51};
快线:=(((价量-LLV(价量,9))/(HHV(价量,9)-LLV(价量,9)))*(4))*(25){XG51};
RSV:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100{XG51};
K1:=SMA(RSV,3,1){XG51};
D1:=SMA(K1,3,1){XG51};
KK:=INTPART(K1){XG51};
DD:=INTPART(D1){XG51};
TFXXS:=KK+DD{XG51};
TGLXS:=(TFXXS-REF(TFXXS,1)){XG51};
主力筹码:=ema(WINNER(CLOSE)*70,3){XG51};
散户筹码:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3){XG51};
金叉疯牛:=EMA((EMA(CLOSE,4)+EMA(CLOSE,6)+EMA(CLOSE,12)+EMA(CLOSE,24))/4,2){XG51};
界:=MA(CLOSE,27){XG51};
持股时段:=IF((金叉疯牛>界)AND(散户筹码<主力筹码)AND((主力活跃力度>50)OR(主力活跃力度>REF(主力活跃力度,1))),-40,0),COLORWHITE,NODRAW{XG51};
ZLCM:=EMA(WINNER(CLOSE)*70,3){XG51};
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3){XG51};
ZSHTL:=SHCM/(ZLCM+SHCM)*100{XG51};
ZZLKP:=ZLCM/(ZLCM+SHCM)*100{XG51};
ZCMZL:=MA(ZLCM+SHCM,13){XG51};
ZZNTS:=BArslAst(ZSHTL<90 AND REF(ZSHTL,1)>90){XG51};
ZSHJJ:=EMA(ZSHTL,89){XG51};
ZZLJJ:=EMA(ZZLKP,89){XG51};
ZJLRQD:=INTPART(ZZLKP-ZZLJJ){XG51};
BB:=MA(C,1){XG51};
持币阶段:=SMA(SMA(SMA(BB,2,1),2,1),2,1){XG51};
主升持股波段:=HHV(MA(持币阶段,1),13){XG51};
SH8:=EMA(ZSHTL,8){XG51};
DKB:=IF(ZZLKP-REF(ZZLKP,1)>ZSHTL-REF(ZSHTL,1),1,0){XG51};
牛股出现预警:=WINNER(C/1.10)*100,COLOR00FFFF,NODRAW{XG51};
主力赢利25持仓:=WINNER(C/1.25)*100,COLORFF00FF,NODRAW{XG51};
散户套牢筹码:=散户筹码/(主力筹码+散户筹码)*100{XG51};
主升浪波段:=主力筹码/(主力筹码+散户筹码)*100,COLORFF6100,NODRAW{XG51};
主力主导行情:=EMA(主升浪波段,55),NODRAW,COLORFF00FF{XG51};
M:=60{XG51};
N:=30{XG51};
SHX:=100*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60)) COLORBROWN{XG51};
庄家主力线:=50-SMA(SMA(SMA(SHX,2,1),2,1),2,1)/2,COLOR00FFFF,LINETHICK2{XG51};
散户持股线:=50-HHV(MA(庄家主力线,1),13)/2,COLORFF00FF,LINETHICK4{XG51};
跌幅:=(REF(C,1)-C)/REF(C,1)*100{XG51};
涨幅:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100,POINTDOT,COLOR009900,LINETHICK0{XG51};
ER:=V/FINANCE(7)*100{XG51};
A0:=TMA(ER,(1-ER),1){XG51};
MAXcyc:=dma((C+O)/2,ER/TMA(ER,(1-ER),1)){XG51};
T1:=BARSLAST(C>MAXCYC*POW(1.1,0.9)){XG51};
T2:=BARSLAST(C<MAXCYC*POW(1.1,-0.9)){XG51};
T3:=crOSS(T1,T2) OR CROSS(T2,T1) OR BARSSINCE(T1+1)=0 OR BARSSINCE(T2+1)=0 OR BARSCOUNT(C)=0{XG51};
T4:=REF(MAXCYC,BARSLAST(T3)){XG51};
HZ:=HHV((H+L)/2,120){XG51};
AA:=(2*C+H+L)/4{XG51};
VAR1:=IF(DATE=10301201,0,1){XG51};
VAR2:=EMA(SLOPE(CLOSE,21)*20+CLOSE,55){XG51};
VAR3:=EMA(CLOSE,3){XG51};
VAR4:=(2*CLOSE+LOW+HIGH)/4*VAR1{XG51};
VAR5:=VAR2-VAR3{XG51};
VAR6:=CLOSE*vol{XG51};
VAR7:=EMA((EMA(VAR6,3)/EMA(VOL,3)+EMA(VAR6,6)/EMA(VOL,6)+EMA(VAR6,12)/EMA(VOL,12)+EMA(VAR6,24)/EMA(VOL,24))/4,13){XG51};
VAR8:=(EMA(CLOSE,5)*7+EMA(CLOSE,10)*3)/10{XG51};
VAR9:=(CLOSE+OPEN)/2{XG51};
MA5:=MA(CLOSE,5){XG51};
VAR11:=3*SMA((C-LLV(L,480))/(HHV(H,480)-LLV(L,480))*100,5,1)
-2*SMA(SMA((C-LLV(L,480))/(HHV(H,480)-LLV(L,480))*100,180,1),15,1){XG51};
超级主升:=EMA(VAR11,5){XG51};
主升1:=超级主升-100{XG51};
D8:=EMA(C,5){XG51};
D2:=(EMA(C,1)+EMA(C,5)+EMA(C,10)+EMA(C,15)+EMA(C,20)+EMA(C,25)+EMA(C,30)+EMA(C,35)+EMA(C,40)+EMA(C,45)+
EMA(C,50)+EMA(C,55)+EMA(C,60)+EMA(C,65)+EMA(C,70)+EMA(C,75)+EMA(C,80)+EMA(C,85)+EMA(C,90)+EMA(C,95)+
EMA(C,100)+EMA(C,105)+EMA(C,110)+EMA(C,115)+EMA(C,120)+EMA(C,125)+EMA(C,130)+EMA(C,135)+EMA(C,140)+EMA(C,150))/30{XG51};
dde:=(D8/D2)*100{XG51};
主升2:=DDE-110{XG51};
A:=(H+L+2*C)/4{XG51};
A1:=(A-REF(A,3))/3+A{XG51};
J:=EMA(HHV(A1,20),60),LINETHICK3{XG51};
CB5:=EMA(COST(80),30),CIRCLEDOT{XG51};
HMX:=EMA(1.4*EMA(FORCAST(A1,20),40),20),LINETHICK2{XG51};
金牛线:=(J+CB5+HMX)/3,LINETHICK2{XG51};
MA20:=MA(C,20){XG51};
UP:=EMA(EMA(C*1.38,50),50),DOTLINE,COLOR0000FF{XG51};
白色:=SMA(HIGH,21,2)*1.05{XG51};
黄色:=SMA(LOW,21,2)*0.95{XG51};
中线:=(白色+黄色)/2{XG51};
UP1:=中线+2*STD(中线,20){XG51};
UP2:=REF(UP1,0){XG51};
CC:=Abs((2*CLOSE+HIGH+LOW)/4-MA(A1,20))/MA(A1,20){XG51};
DT:=DMA(CLOSE,CC){XG51};
通道3:=(1+9/100)*DT{XG51};
通道4:=(1-7/100)*DT{XG51};
界限:=(REF((金牛线+UP+EMA(UP1*1.04,40)+通道3)/4,10)+MA(C,20)*1.04)/2{XG51};
AHC1:=H*VOL{XG51};
AHC24:=EMA((expma(AHC1,180)/EXPMA(VOL,180)+EXPMA(AHC1,360)/EXPMA(VOL,360)+EXPMA(AHC1,720)/EXPMA(VOL,720)+EXPMA(AHC1,1440)/EXPMA(VOL,1440))/4,34){XG51};
C上X:=1.06*AHC24{XG51};
C下X:=AHC24*0.94{XG51};
AHC22:=EMA((EXPMA(AHC1,27)/EXPMA(VOL,27)+EXPMA(AHC1,54)/EXPMA(VOL,54)+EXPMA(AHC1,108)/EXPMA(VOL,108)+EXPMA(AHC1,316)/EXPMA(VOL,316))/4,34){XG51};
上X:=1.06*AHC22{XG51};
下X:=AHC22*0.94{XG51};
AHC23:=EMA((EXPMA(AHC1,5)/EXPMA(VOL,5)+EXPMA(AHC1,10)/EXPMA(VOL,10)+EXPMA(AHC1,20)/EXPMA(VOL,20)+EXPMA(AHC1,40)/EXPMA(VOL,40))/4,34){XG51};
D上X:=1.06*AHC23{XG51};
D下X:=AHC23*0.94{XG51};
T:=(C上X+D上X+上X)/3*1.05{XG51};
主升3:=(MA5*2/(界限+T)-1)*100{XG51};
cbx80:=MA(COST(80),20){XG51};
主升4:=(MA5/CBX80-1)*100{XG51};
FT:=((HHV(H,42)-LLV(L,42)))/2+LLV(L,42){XG51};
FT1:=ABS(HHV(H,40)-LLV(L,40)-LLV(L,40))+FT*0.5{XG51};
主升5:=(FT/FT1-1)*100{XG51};
P:=EMA(EMA(C*1.14,55),20){XG51};
主升6:=(MA5/P-1)*100{XG51};
金k线:=(EMA(HHV(H,60),60)+EMA(FT,453)*1.62)/2{XG51};
主升7:=(MA5/金K线-1)*100{XG51};
超牛拉升:=(主升1+主升2+主升3+主升4+主升5+主升6+主升7)/2,LINETHICK2{XG51};
SMA2:=MA(持币阶段,3){XG51};
V1:=(C*2+H+L)/4*10{XG51};
V2:=EMA(V1,13)-EMA(V1,21){XG51};
V3:=EMA(V2,5){XG51};
V4:=2*(V2-V3)*100,COLORWHITE,LINETHICK2{XG51};
筹码进:=IF(V4>=0,V4,0){XG51};
VARAA:=REF((LOW+OPEN+CLOSE+HIGH)/4,1){XG51};
VAR21:=SMA(ABS(HIGH-VARAA),13,1)/SMA(MIN(HIGH-VAR1,0),10,1){XG51};
VAR31:=EMA(VAR21,10){XG51};
VAR41:=HHV(HIGH,33){XG51};
VAR51:=EMA(IF(HIGH>=VAR41,VAR31,0),3){XG51};
主力抬轿:=IF(VAR51<REF(VAR51,1)AND(涨幅>0)AND(筹码进>150)AND(持股时段<-18)AND(跌幅<3),筹码进,0),COLORWHITE,NODRAW{XG51};
上轨:=EMA(VAR8,15)*1.02,COLORWHITE,LINETHICK1{XG51};
黄线:=(EMA(VAR9,3)+EMA(VAR9,6)+EMA(VAR9,12)+EMA(VAR9,24))/4,COLORBLUE,LINETHICK1{XG51};
HH:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)
+13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)
+7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+
REF(H,20))/210,COLORYELLOW,LINETHICK1{XG51};
LL:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)
+13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)
+7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+REF(L,20))/210,COLORYELLOW,LINETHICK1{XG51};
VAR80:=3*SMA((C-LLV(L,180))/(HHV(H,180)-LLV(L,180))*100,5,1)-2*SMA(SMA((C-LLV(L,180))/(HHV(H,180)-LLV(L,180))*100,180,1),15,1){XG51};
疯牛潜力股:=EMA(VAR80,5), NODRAW,COLOR6600FF{XG51};
牛熊分道:EMA(HH,90),COLORBLUE,LINETHICK2{XG51};
下:=牛熊分道-((C-牛熊分道)*C-牛熊分道)/牛熊分道*1.68,LINETHICK3,COLORWHITE{XG51};
下轨:=MA(下,14)*0.9,COLORCYAN,LINETHICK2{XG51};
IF(持股时段<-28 AND 上轨>=下轨 AND 牛熊分道>=下轨 AND 疯牛潜力股>REF(疯牛潜力股,1),下轨,DRAWNULL),COLORFF0080,LINETHICK6{XG51};
IF(持股时段<-28 AND 疯牛潜力股>50 AND BARSCOUNT(C)>250 AND 上轨>=下轨 AND 牛熊分道>=下轨 AND 疯牛潜力股>=REF(疯牛潜力股,1),下轨,DRAWNULL),COLORFF0080,LINETHICK6{XG51};
IF(疯牛潜力股>50 AND BARSCOUNT(C)>250 AND 上轨>=下轨 AND 牛熊分道>=下轨 AND 疯牛潜力股<=REF(疯牛潜力股,1),下轨,DRAWNULL),COLORCYAN,LINETHICK6{XG51};
IF(上轨>=下轨 AND 下轨>REF(下轨,1),下轨,DRAWNULL),COLORCYAN,LINETHICK6{XG51};
IF(持股时段<-28 AND BARSCOUNT(C)<250 AND 上轨>=下轨 AND 牛熊分道>=下轨 AND 疯牛潜力股>=REF(疯牛潜力股,1),下轨,DRAWNULL),COLORFF0080,LINETHICK6{XG51};
IF(持股时段=0 AND BARSCOUNT(C)<250 AND 上轨>=下轨 AND 牛熊分道>=下轨 AND 疯牛潜力股>=REF(疯牛潜力股,1),下轨,DRAWNULL),COLORFF00FF,LINETHICK6{XG51};
IF(疯牛潜力股>50 AND 上轨>=下轨 AND 疯牛潜力股>REF(疯牛潜力股,1) AND 牛熊分道>=下轨,上轨,DRAWNULL),COLORFF00FF,LINETHICK4{XG51};
IF(疯牛潜力股>50 AND 上轨>=下轨 AND 疯牛潜力股>REF(疯牛潜力股,1),上轨,DRAWNULL),COLORFF00FF,LINETHICK4{XG51};
IF(COUNT(C>上轨,5)>=2 AND 上轨>=牛熊分道 AND 疯牛潜力股>REF(疯牛潜力股,1) AND 涨幅>0.5,上轨,DRAWNULL),COLOR0000FF,LINETHICK4{XG51};
不参与阶段:IF(上轨<下轨,上轨,上轨),COLORCYAN,LINETHICK2{XG51};
分道关注:IF(上轨>=下轨 AND 牛熊分道<下轨 AND 下轨<REF(下轨,1),下轨,DRAWNULL),COLORFF00FF,LINETHICK2{XG51};
IF(上轨>=下轨 AND 牛熊分道<下轨 AND 下轨<REF(下轨,1),下轨,DRAWNULL),COLORFF00FF,LINETHICK2{XG51};
行情主升浪:IF(持股时段<-28 AND 疯牛潜力股>50 AND 上轨>=下轨 AND 牛熊分道>=下轨 AND 疯牛潜力股>REF(疯牛潜力股,1),下轨,DRAWNULL),COLORFF0080,LINETHICK2{XG51};
IF(持股时段<-28 AND 上轨>=下轨 AND 牛熊分道>=下轨 AND 疯牛潜力股>REF(疯牛潜力股,1),下轨,DRAWNULL),COLORFF0080,LINETHICK2{XG51};
IF(持股时段<-28 AND 疯牛潜力股>50 AND BARSCOUNT(C)>250 AND 上轨>=下轨 AND 牛熊分道>=下轨 AND 疯牛潜力股>=REF(疯牛潜力股,1),下轨,DRAWNULL),COLORFF0080,LINETHICK2{XG51};
IF(疯牛潜力股>50 AND BARSCOUNT(C)>250 AND 上轨>=下轨 AND 牛熊分道>=下轨 AND 疯牛潜力股<=REF(疯牛潜力股,1),下轨,DRAWNULL),COLORCYAN,LINETHICK2{XG51};
IF(上轨>=下轨 AND 下轨>REF(下轨,1),下轨,DRAWNULL),COLORCYAN,LINETHICK2{XG51};
IF(持股时段<-28 AND BARSCOUNT(C)<250 AND 上轨>=下轨 AND 牛熊分道>=下轨 AND 疯牛潜力股>=REF(疯牛潜力股,1),下轨,DRAWNULL),COLORFF0080,LINETHICK2{XG51};
IF(疯牛潜力股>50 AND 上轨>=下轨 AND 疯牛潜力股>REF(疯牛潜力股,1) AND 牛熊分道>=下轨,上轨,DRAWNULL),COLORFF00FF,LINETHICK2{XG51};
IF(疯牛潜力股>50 AND 上轨>=下轨 AND 疯牛潜力股>REF(疯牛潜力股,1),上轨,DRAWNULL),COLORFF00FF,LINETHICK2{XG51};
超级疯牛分界:IF(持股时段<-28 AND 疯牛潜力股>50 AND 上轨>=下轨 AND 疯牛潜力股>REF(疯牛潜力股,1),上轨,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
IF(COUNT(C>上轨,5)>=2 AND 上轨>=牛熊分道 AND 疯牛潜力股>REF(疯牛潜力股,1) AND 涨幅>0.5,上轨,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
开口选股:=BARSLASTCOUNT(上轨>下轨)=1,NODRAW{XG51};
DRAWICON(开口选股,MIN(下轨,上轨)*1.08,26){XG51};
DRAWTEXT(开口选股,LOW,71),COLORBLUE{XG51};
DRAWTEXT(开口选股,上轨*1.13,'开始关注'),COLORWHITE{XG51};
变盘加速上扬:=CROSS(牛熊分道,下轨){XG51};
DRAWICON(变盘加速上扬,LOW*0.9,25){XG51};
重仓目标:=FILTER((COUNT(变盘加速上扬,5)=1),15),COLORFFFF00,LINETHICK2{XG51};
STICKLINE(重仓目标>0.8,牛熊分道*0.8,牛熊分道*0.88,0.5,0),COLORFFFF00,LINETHICK2{XG51};
STICKLINE(重仓目标>0.8,牛熊分道*0.8,牛熊分道*0.86,2,0),COLORFF0080,LINETHICK2{XG51};
STICKLINE(重仓目标>0.8,牛熊分道*0.8,牛熊分道*0.84,4,0),COLORFF00FF,LINETHICK2{XG51};
DRAWTEXT(重仓目标>0.8,牛熊分道*0.76,'重点目标'),COLORWHITE{XG51};
超强自选:=(CROSS(CLOSE,下轨) AND CROSS(CLOSE,超级疯牛分界) AND COUNT(上轨>下轨,2)=1 AND REF(下轨,2)>REF(上轨,2)){XG51};
STICKLINE(重仓目标>0.8 OR 超强自选,牛熊分道*0.8,牛熊分道*0.88,0.5,0),COLORFFFF00,LINETHICK2{XG51};
STICKLINE(重仓目标>0.8 OR 超强自选,牛熊分道*0.8,牛熊分道*0.86,2,0),COLORFF0080,LINETHICK2{XG51};
STICKLINE(重仓目标>0.8 OR 超强自选,牛熊分道*0.8,牛熊分道*0.84,4,0),COLORFF00FF,LINETHICK2{XG51};
DRAWTEXT(重仓目标>0.8 OR 超强自选,牛熊分道*1.05,'重点目标'),COLORWHITE{XG51};
VARA:=SMA(AMOUNT,10,1)/1000000{XG51};
VARB:=REF(VARA,1){XG51};
VARC:=MA(REF(CLOSE,1),5){XG51};
最高:=VARA*HIGH/VARC*1/10,POINTDOT,COLOR009900,COLORBROWN{XG51};
最低:=VARA*LOW/VARC*1/10,POINTDOT,COLOR009900,COLORBLUE{XG51};
开盘:=VARA*OPEN/VARC*1/10,POINTDOT,COLOR009900,COLORLIMAGENTA{XG51};
收盘:=VARA*CLOSE/VARC*1/10,COLOR009900,COLORCYAN,POINTDOT{XG51};
涨跌:=(收盘-REF(收盘,1))/REF(收盘,1)*100,POINTDOT,COLOR009900,LINETHICK0{XG51};
STICKLINE((CLOSE>下轨 AND 涨跌>15 AND CLOSE<上轨 AND OPEN<上轨 AND 下轨<牛熊分道),CLOSE,OPEN,3,0),COLORBLUE{XG51};
自选:=IF((CROSS(CLOSE,上轨) AND 下轨<=牛熊分道),18,0),COLORWHITE,LINETHICK2{XG51};
重点自选:=FILTER((自选>8),20),COLORWHITE,LINETHICK2{XG51};
STICKLINE(重点自选,CLOSE*1.1,CLOSE*1.15,0.5,0),COLORWHITE{XG51};
DRAWICON(重点自选,CLOSE*1.06,12),COLORWHITE{XG51};
DRAWTEXT(重点自选,CLOSE*1.2,'快马加鞭'),COLORWHITE{XG51};
STICKLINE((涨跌>20 AND CLOSE>上轨),OPEN+(CLOSE-OPEN),OPEN,3,0),COLORWHITE{XG51};
STICKLINE((涨幅>5 AND 涨跌>0 AND 涨跌<20 AND CLOSE>上轨 AND OPEN<上轨),CLOSE,OPEN,3,0),COLORWHITE{XG51};
STICKLINE((涨幅>5 AND 涨跌>0 AND 涨跌<20 AND CLOSE>上轨 AND OPEN<上轨),OPEN+(CLOSE-OPEN)*2/3,OPEN,3,0),COLORYELLOW{XG51};
STICKLINE((涨跌>40 AND CLOSE>上轨 AND OPEN<上轨),OPEN+(CLOSE-OPEN)/3,OPEN+(CLOSE-OPEN)*2/3,3,0),COLORBLUE{XG51};
STICKLINE((涨跌>20 AND CLOSE>上轨 AND OPEN<上轨),OPEN+(CLOSE-OPEN)/3,OPEN+(CLOSE-OPEN)*2/3,3,0),COLORYELLOW{XG51};
STICKLINE((涨跌>10 AND CLOSE>上轨 AND OPEN>上轨),OPEN+(CLOSE-OPEN)/3,OPEN+(CLOSE-OPEN)*2/3,3,0),COLORBLUE{XG51};
DRAWICON(变盘加速上扬,LOW*0.9,25){X=G*5*1=C=N={};