通达信黑马屠夫未加密选股指标公式源码

源码正文：

var1:=c>(h+l)/2{XG51};
var2:=c/ma(c,5)>=1.04{XG51};
var3:=ref(c,1)/ref(ma(c,5),1)>=1.04{XG51};
var4:=ref(c,2)/ref(ma(c,5),2)>=1.04{XG51};
var1 and var2 and var3 and var4 {X_G^5+1_C_N_{};

源码正文：

TS:=130{XG51};
N:=99{XG51};
M:=3{XG51};
MT:=3{XG51};
M1:=5{XG51};
M2:=7{XG51};
M3:=21{XG51};
M4:=12{XG51};
M5:=50;
DA1:=IF(TS>TOTALBARSCOUNT,TOTALBARSCOUNT,TS){XG51};
DA:=IF(CURRBARSCOUNT>DA1,0,DA1){XG51};
HI:=REFDATE(HHV(H,DA),DATE){XG51};
LO:=REFDATE(LLV(L,DA),DATE){XG51};
C1:=IF(CURRBARSCOUNT<=DA,C,DRAWNULL){XG51};
GZ:=EXP(LN(HI/LO)/10);
LH1:=SUM(IF(C1>=(HI/GZ),V,0),DA){XG51};
LH2:=SUM(IF(C1>=(HI/POW(GZ,2)) AND C1<(HI/GZ),V,0),DA){XG51};
LH3:=SUM(IF(C1>=(HI/POW(GZ,3)) AND C1<(HI/POW(GZ,2)),V,0),DA){XG51};
LH4:=SUM(IF(C1>=(HI/POW(GZ,4)) AND C1<(HI/POW(GZ,3)),V,0),DA){XG51};
LH5:=SUM(IF(C1>=(HI/POW(GZ,5)) AND C1<(HI/POW(GZ,4)),V,0),DA){XG51};
LH6:=SUM(IF(C1>=(HI/POW(GZ,6)) AND C1<(HI/POW(GZ,5)),V,0),DA){XG51};
LH7:=SUM(IF(C1>=(HI/POW(GZ,7)) AND C1<(HI/POW(GZ,6)),V,0),DA){XG51};
LH8:=SUM(IF(C1>=(HI/POW(GZ,8)) AND C1<(HI/POW(GZ,7)),V,0),DA){XG51};
LH9:=SUM(IF(C1>=(LO*GZ) AND C1<LO*POW(GZ,2),V,0),DA){XG51};
LH10:=SUM(IF(C1>=LO AND C1<LO*GZ,V,0),DA){XG51};
L1:=REFDATE(HHV(LH1,DA),DATE),LINETHICK0{XG51};
L2:=REFDATE(HHV(LH2,DA),DATE),LINETHICK0{XG51};
L3:=REFDATE(HHV(LH3,DA),DATE),LINETHICK0{XG51};
L4:=REFDATE(HHV(LH4,DA),DATE){XG51};
L5:=REFDATE(HHV(LH5,DA),DATE){XG51};
L6:=REFDATE(HHV(LH6,DA),DATE){XG51};
L7:=REFDATE(HHV(LH7,DA),DATE){XG51};
L8:=REFDATE(HHV(LH8,DA),DATE){XG51};
L9:=REFDATE(HHV(LH9,DA),DATE){XG51};
L10:=REFDATE(HHV(LH10,DA),DATE){XG51};
SS:=(L1+L2+L3+L4+L5+L6+L7+L8+L9+L10){XG51};
stICKLINE(CEILING(DA*L1/SS)*3>=CURRBARSCOUNT,HI*N/100,(HI/GZ),1,1),COLOR454545,LINETHICK1{XG51};
STICKLINE(CEILING(DA*L2/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,1)*N/100,HI/POW(GZ,2),1,1),COLOR454545,LINETHICK1{XG51};
STICKLINE(CEILING(DA*L3/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,2)*N/100,HI/POW(GZ,3),1,1),COLOR454545,LINETHICK1{XG51};
STICKLINE(CEILING(DA*L4/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,3)*N/100,HI/POW(GZ,4),1,1),COLOR454545,LINETHICK1{XG51};
STICKLINE(CEILING(DA*L5/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,4)*N/100,HI/POW(GZ,5),1,1),COLOR454545,LINETHICK1{XG51};
STICKLINE(CEILING(DA*L6/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,5)*N/100,HI/POW(GZ,6),1,1),COLOR454545,LINETHICK1{XG51};
STICKLINE(CEILING(DA*L7/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,6)*N/100,HI/POW(GZ,7),1,1),COLOR454545,LINETHICK1{XG51};
STICKLINE(CEILING(DA*L8/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,2),LO*POW(GZ,3)*N/100,1,1),COLOR454545,LINETHICK1{XG51};
STICKLINE(CEILING(DA*L9/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,1),LO*POW(GZ,2)*N/100,1,1),COLOR454545,LINETHICK1{XG51};
STICKLINE(CEILING(DA*L10/SS)*3>=CURRBARSCOUNT,LO,LO*POW(GZ,1)*N/100,1,1),COLOR454545,LINETHICK1{XG51};
DRAWKLINE(H,O,L,C);JJ:=(CLOSE+HIGH+LOW)/3{XG51};
DRAWBAND(ma(C,2),RGB(108,0,1),MA(C,7),RGB(28,134,238)){XG51};
TT:=IF(ISLASTBAR,240/FROMOPEN,1){XG51};
NN:=120{XG51};
HH:=HHV(V*TT,NN){XG51};
LL:=LLV(V,NN){XG51};
最高:=CONST(HH){XG51};
最低:=CONST(LL){XG51};
最高2:=CONST(HHV(H,NN)){XG51};
最低2:=CONST(LLV(L,NN)){XG51};
PP:=IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,20)),0.9,IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,50)),0.7,0.6)),NODRAW{XG51};
RCC1:=最高2*0.9-(最高2-最低2)*PP{XG51};
最低3:=MIN(RCC1,最低2){XG51};
AA:=最低3{XG51};
MA20:MA(C,20),COLORWHITE,LINETHICK1{XG51};
MA55:MA(C,55),COLORWHITE,CIRCLEDOT{XG51};
IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLOR00FF00,LINETHICK1{XG51};
IF(MA55<REF(MA55,1),MA55,DRAWNULL),COLOR408000,CIRCLEDOT{XG51};
BB:MA(MA(CLOSE,3),1),LINETHICK1,COLORFFFF00{XG51};
IF(BB>=REF(BB,1),BB,DRAWNULL),COLOR0000FF,LINETHICK1{XG51};
STICKLINE(BB>=REF(BB,1),AA-0.000*AA,AA-0.050*AA,3,0),COLOR000074{XG51};
STICKLINE(BB<REF(BB,1),AA-0.010*AA,AA-0.040*AA,3,1),COLORFFFF00{XG51};
今日保护价:(REF(C,2)+REF(C,1)+O)/3 ,COLOR4080FF,NODRAW{XG51};
三日最低:=ema((REF(L,4)+REF(L,3)+REF(L,2))/3,3);
三日最高:=EMA((REF(H,4)+REF(H,3)+REF(H,2))/3,3),COLORRED;
S:=crOSS(CROSS(三日最高,C),0.6){XG51};
B:=CROSS(CROSS(C,三日最低),0.5){XG51};
DRAWICON(B,LOW*0.99,34){XG51};
DRAWICON(S,H*1.00,35){XG51};
STICKLINE(C>=O,C,O,3.4,0),COLOR0000AA{XG51};
STICKLINE(C>=O,C,O,3.0,0),COLOR0000BB {XG51};
STICKLINE(C>=O,C,O,2.4,0),COLOR0000CC{XG51};
STICKLINE(C>=O,C,O,2.0,0),COLOR0000DD {XG51};
STICKLINE(C>=O,C,O,1.6,0),COLOR0000EE{XG51};
STICKLINE(C>=O,C,O,1.2,0),COLOR0000FF{XG51};
STICKLINE(C>=O,C,O,0.6,0),COLOR0000FF{XG51};
STICKLINE(C>=O,H,L,0,0),COLORWHITE{XG51};
STICKLINE(C<=O,C,O,3.4,0),COLORAAAA00{XG51};
STICKLINE(C<=O,C,O,3.0,0),COLORBBBB00{XG51};
STICKLINE(C<=O,C,O,2.4,0),COLORCCCC00{XG51};
STICKLINE(C<=O,C,O,2.0,0),COLORDDDD00{XG51};
STICKLINE(C<=O,C,O,1.6,0),COLOREEEE00{XG51};
STICKLINE(C<=O,C,O,1.2,0),COLORFFFF00{XG51};
STICKLINE(C<=O,C,O,0.6,0),COLORFFFF00{XG51};
STICKLINE(C<=O,H,L,0,0),COLORFFFF00{XG51};
V1:=Abs((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
V2:=(1-7/100)*(dma(CLOSE,V1)){XG51};
V3:=(1+7/100)*(DMA(CLOSE,V1)){XG51};
V5:=MA((LOW+HIGH+CLOSE)/3,5);
EMA13:=EMA(C,13),COLORRED;
EMA21:=EMA(C,21),COLORBLUE;
EMA34:=EMA(C,34),COLORFF00FF;
EMA60:=MA(C,60),COLORFFCC66;
VAR2:=(2*CLOSE+HIGH+LOW)/4;
VAR3:=IF(YEAR>=2099 AND MONTH>2,0,1);
VAR4:=LLV(LOW,5); VAR5:=HHV(HIGH,4);
散户:=EMA((VAR2-VAR4)/(VAR5-VAR4)*100,4)*VAR3;
庄家:=EMA(0.667*REF(散户,1)+0.333*散户,2)*VAR3;
DRAWICON(CROSS(散户,庄家) AND 散户<30,L-0.05,1);
DRAWICON(CROSS(庄家,散户) AND 散户>70,H+0.05,2);
VAR9:=CLOSE-REF(CLOSE,5);
VARA:=EMA(EMA(VAR9,5),5)/EMA(EMA(ABS(VAR9),5),5);
VARC:=EMA(EMA(VAR9,20),20)/EMA(EMA(ABS(VAR9),20),20);
卖出:=IF(VARA>0 AND CROSS(VARC,VARA),90,100);
DRAWICON(卖出<0,H+0.05,2); 买线:=EMA(CLOSE,2);
卖线:=EMA(SLOPE(CLOSE,21)*20+CLOSE,42);
B1:IF(CROSS(买线,卖线),L-0.02,DRAWNULL),CROSSDOT,LINETHICK3,COLORLIMAGENTA;
S1:IF(CROSS(80,rsi)*30,H+0.02,DRAWNULL),CROSSDOT,LINETHICK3,COLORBLUE;
VC:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100+(CLOSE-MA (CLOSE,32))/MA(CLOSE,32)*100)/3{XG51};
S2:=IF(VC>20 AND FILTER(VC< REF(VC,1),5),H+0.02,DRAWNULL),CIRCLEDOT,LINETHICK3,COLORCYAN;
A0:=(L+H+C*2)/4{XG51};
A1:EMA(A0,14)NODRAW,COLORFFFFFF,LINETHICK1{XG51};
A2:=EMA(A0,25)COLORLIGREEN,LINETHICK2{XG51};
A1X:=(A1-REF(A1,1))/REF(A1,1)*100,NODRAW{XG51};
A2X:=(A2-REF(A2,1))/REF(A2,1)*100,NODRAW{XG51};
看多:IF(A1X>=0 AND BArslAST(CROSS(A1X,0))>0,REF((C+O)/2,BARSLAST(CROSS(A1X,0))),DRAWNULL)DOTLINE,COLOR00FFFF{XG51};
看空:IF(A1X<0 AND BARSLAST(CROSS(0,A1X))>0,REF((C+O)/2,BARSLAST(CROSS(0,A1X))),DRAWNULL)DOTLINE,COLORGREEN,{XG51};
STICKLINE(CROSS(A1X,0),H,L,0,0 ),COLOR9933FF{XG51};
STICKLINE(CROSS(A1X,0),C,O,3,0 ),COLOR0000CC;
STICKLINE(CROSS(A1X,0),C,O,1,0 ),COLOR0033FF;
STICKLINE(CROSS(0,A1X),L,H,0,0 ),COLOR66CC33{XG51};
N1:=10{XG51};
T1:=CONST(HHVBARS(V,10)),COLOR0000FF,LINETHICK1{XG51};
量能平台:IF(CURRBARSCOUNT<=N1+15,CONST(IF(T1=0,C,REF(C,T1))),DRAWNULL),COLORFF1A8C,LINETHICK1{XG51};
新量能点:IF(CURRBARSCOUNT=T1+1,量能平台,DRAWNULL),CIRCLEDOT,COLORFFFFFF,LINETHICK9{XG51};
DRAWTEXT(ISLASTBAR,量能平台,' 量能平台'),COLOR00F0F0{XG51};
HV:=HHV(V,5)=V OR V/REF(V,1)>=5{XG51};
FT:=BARSLAST(HV){XG51};
量能平台1:=IF(HV,C,REF(C,FT)){XG51};
DRAWTEXT(量能平台1>REF(量能平台1,1)AND C<REF(C,1),L,'*带量跌'),COLORCYAN{XG51};
DRAWTEXT(量能平台1<REF(量能平台1,1) AND C>REF(C,1),L,'*缩量涨'),COLORBLUE{XG51};
DRAWTEXT(量能平台1>REF(量能平台1,1) AND C>REF(C,1) AND C>MA(C,13) AND C=HHV(C,20) AND C/REF(C,1)>1.05,L,'*突破量'),COLORFFFFFF{XG51};
DRAwrECTREL(0,500,147,999.4,IF(120,RGB(10,0,0),0));
超B:=L2_AMO(0,2)/10000.0{XG51};
大B:=L2_AMO(1,2)/10000.0{XG51};
中B:=L2_AMO(2,2)/10000.0{XG51};
小B:=L2_AMO(3,2)/10000.0{XG51};
超S:=L2_AMO(0,3)/10000.0{XG51};
大S:=L2_AMO(1,3)/10000.0{XG51};
中S:=L2_AMO(2,3)/10000.0{XG51};
小S:=L2_AMO(3,3)/10000.0{XG51};
TESTSKIP(NOT(超B OR 大B OR 中B OR 小B OR 超S OR 大S OR 中S OR 小S)!=0){XG51};
大宗进:=(超B)+(大B),NODRAW{XG51};
大宗出:=(超S)+(大S),NODRAW{XG51};
非大宗进:=(中B)+(小B),NODRAW{XG51};
非大宗出:=(中S)+(小S),NODRAW{XG51};
大宗进限制:=IF((超B+大B)=0,0,大宗进){XG51};
大宗出限制:=IF((超S+大S)=0,0,大宗出){XG51};
非大宗进限制:=IF(中B+小B=0,0,非大宗进){XG51};
非大宗出限制:=IF(中S+小S=0,0,非大宗出){XG51};
主力净流入:=(超B+大B)-(超S+大S),COLORWHITE,NODRAW{XG51};
散户净流入:=(中B+小B)-(中S+小S),COLORWHITE,NODRAW{XG51};
净流入:=(超B+大B+中B+小B)-(超S+大S+中S+小S),COLORWHITE,NODRAW{XG51};
大单流入:=(超B+大B)/(超B+大B+超S+大S)*100,NODRAW{XG51};
大单流入限制:=IF((超B+大B+超S+大S)=0,0,大单流入){XG51};
大单流出比:=(超S+大S)/(超B+大B+超S+大S)*100,NODRAW{XG51};
大单流出限制:=IF((超B+大B+超S+大S)=0,0,大单流出比){XG51};
总流入比:=(超B+大B+中B+小B)/(超B+大B+中B+小B+超S+大S+中S+小S)*100,NODRAW{XG51};
总流出比:=(超S+大S+中S+小S)/(超B+大B+中B+小B+超S+大S+中S+小S)*100,NODRAW{XG51};
成交总量:=(超B+大B+中B+小B+超S+大S+中S+小S),NODRAW{XG51};
机构参与度:=(超B+超S+大B+大S)/成交总量*100,COLORBLUE,NODRAW{XG51};
大单强度:=(超B+大B-超S-大S)/成交总量*100,COLORBLUE,NODRAW{XG51};
大单强度限制:=IF(大单强度=0,-100,大单强度){XG51};
大单强度比:=IF(大单强度>=0,(大单强度限制+100)/2,100-ABS((大单强度限制-100)/2)),NODRAW{XG51};
超单强度:=(超B-超S)/(超B+超S)*100,COLORBLUE,NODRAW{XG51};
超单强度限制:=IF(超单强度=0,-100,超单强度){XG51};
超单强度比:=IF(超单强度>0,(超单强度限制+100)/2,IF(超单强度<0,100-ABS((超单强度限制-100)/2),0)),NODRAW{XG51};
DAZHIV:=CONST(MAX(ABS(大宗进),MAX(ABS(大宗出),MAX(ABS(非大宗进),ABS(非大宗出))))),NODRAW{XG51};
DRAWRECTREL(0,CONST(930-(ABS(大宗进)*250/DAZHIV)),35,950,IF(CONST(大宗进>0),RGB(255,0,0),RGB(23,125,255))){XG51};
DRAWRECTREL(37,CONST(930-(ABS(大宗出)*250/DAZHIV)),72,950,IF(CONST(大宗出>0),RGB(23,125,255),RGB(255,0,0))){XG51};
DRAWRECTREL(75,CONST(930-(ABS(非大宗进)*250/DAZHIV)),110,950,IF(CONST(非大宗进>0),RGB(255,0,0),RGB(23,125,255))){XG51};
DRAWRECTREL(112,CONST(930-(ABS(非大宗出)*250/DAZHIV)),147,950,IF(CONST(非大宗出>0),RGB(23,125,255),RGB(255,0,0))){XG51};
DRAWRECTREL(150,CONST(940-(ABS(净流入)*250/DAZHIV))-20,190,950,IF(CONST(净流入>0),RGB(200,0,0),RGB(0,125,50))){XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.0001,0.9,0,STRCAT('',CON2STR(大宗进/1,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.036,0.9,0,STRCAT('',CON2STR(大宗出/1,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.074,0.9,0,STRCAT('',CON2STR(非大宗进/1,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.111,0.9,0,STRCAT('',CON2STR(非大宗出/1,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.150,0.9,0,STRCAT('',CON2STR(净流入/1,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.000,0.99,0,STRCAT(STRCAT('主力 ',CON2STR(主力净流入,0)),'万')),COLORLIMAGENTA{XG51};
DRAWTEXT_FIX(1,0.078,0.99,0,STRCAT(STRCAT('散户 ',CON2STR(散户净流入,0)),'万')),COLORGREEN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.145,0.99,0,'净流入:(万)'),COLORBLUE{XG51};
主力买力度:=LARGEINTRDvol*1000/VOL{XG51};
主力卖力度:=LARGEOUTTRDVOL*1000/VOL{XG51};
AAD:=CONST(MAX(ABS(主力买力度),ABS(主力卖力度)))*4,NODRAW{XG51};
DRAWRECTREL(0,515,CONST(ABS(主力买力度)*560/AAD),568,IF(CONST(主力买力度)>0,RGB(255,0,0),RGB(0,50,0))){XG51};
DRAWRECTREL(0,570,CONST(ABS(主力卖力度)*560/AAD),623,IF(CONST(主力卖力度)>0,RGB(0,50,0),RGB(255,0,0))){XG51};
DRAWTEXT_FIX(1,0,0.524,0,STRCAT('主买力度:',CON2STR(主力买力度,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0,0.576,0,STRCAT('主卖力度:',CON2STR(主力卖力度,0))),COLORBLUE{X*G=5?1*C*N*{};