通达信牛气看盘主图选股指标公式源码

通达信牛气看盘主图选股指标公式源码

源码正文：

快线:=ema(Ema(EMA(EMA(CLOSE,2),2),2),2),LINETHICK2,COLOR0000FF{XG51};
慢线:=EMA(REF(快线,1),2),LINETHICK2,COLOR00FFFF{XG51};
DRAWBAND(快线,RGB(500,280,180),慢线,RGB(256,200,0)){XG51};
套牢盘％:=100*(1-WINNER(C)){XG51};
获利盘％:=100*WINNER(C){XG51};
成本90％:=COst(90){XG51};
成本70％:=COST(70){XG51};
市场成本:=COST(50){XG51};
主力成本:=COST(10){XG51};
短期压力:=HHV(H,15){XG51};
短期支撑:=LLV(L,20){XG51};
DRAWTEXT_FIX(C>0,0.005 ,0.22,0,'【获利盘％】:'),COLORWHITE{XG51};
DRAWTEXT_FIX(C>0,0.105,0.22,0,'【套牢盘％】:'),COLOR00FF00{XG51};
DRAWTEXT_FIX(C>0,0.21,0.22,0,'【市场成本】:'),COLORBLUE{XG51};
DRAWTEXT_FIX(C>0,0.315,0.22,0,'【主力成本】:'),COLOR008FFF{XG51};
DRAWTEXT_FIX(C>0,0.005,0.27,0,'【90％成本】:'),COLORFFFFBF{XG51};
DRAWTEXT_FIX(C>0,0.105,0.27,0,'【70％成本】:'),COLORF0F000{XG51};
DRAWTEXT_FIX(C>0,0.21,0.27,0,'【  换    手  】:'),COLORLICYAN{XG51};
DRAWTEXT_FIX(C>0,0.315,0.27,0,'【  量    比  】:'),COLORBLUE{XG51};
DRAWTEXT_FIX(C>0,0.005,0.32,0,'【短期压力】:'),COLORRED{XG51};
DRAWTEXT_FIX(C>0,0.105,0.32,0,'【短期支撑】:'),COLORBLUE{XG51};
DRAWNUMBER_FIX(C>0,0.075,0.22,0,CONST(获利盘％)),COLORWHITE{XG51};
DRAWNUMBER_FIX(C>0,0.175,0.22,0,CONST(套牢盘％)),COLOR00FF00{XG51};
DRAWNUMBER_FIX(C>0,0.28,0.22,0,CONST(市场成本)),COLORBLUE{XG51};
DRAWNUMBER_FIX(C>0,0.385,0.22,0,CONST(主力成本)),COLOR008FFF{XG51};
DRAWNUMBER_FIX(C>0,0.075,0.27,0,CONST(成本90％)),COLORFFFFBF{XG51};
DRAWNUMBER_FIX(C>0,0.175,0.27,0,CONST(成本70％)),COLORF0F000{XG51};
DRAWNUMBER_FIX(C>0,0.28,0.27,0,CONST(DYNAINFO(37)*100)),COLORLICYAN{XG51};
DRAWNUMBER_FIX(C>0,0.385,0.27,0,CONST(DYNAINFO(17))),COLORBLUE{XG51};
DRAWNUMBER_FIX(C>0,0.075,0.32,0,CONST(短期压力)),COLORRED{XG51};
DRAWNUMBER_FIX(C>0,0.175,0.32,0,CONST(短期支撑)),COLORBLUE{XG51};
X11:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2{XG51};
X12:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;{XG51};
X13:=FINANCE(23)/FINANCE(10)*3.3{XG51};
X14:=FINANCE(19)/FINANCE(15)*0.6{XG51};
X15:=FINANCE(20)/FINANCE(15)*0.999{XG51};
Z值:=X11+X12+X13+X14+X15{XG51};
DRAWTEXT_FIX(Z值<1.2,0.65,0,1,' 【●财务重警●】'),COLORLICYAN{XG51};
DRAWTEXT_FIX( BETWEEN(Z值,1.2,2.6),0.65,0,1,' 【○财务轻警○】'),COLOR0099FF{XG51};
DRAWTEXT_FIX(Z值>2.6,0.65,0,1,' 【◎财务无警◎】'),COLORLIBLUE{XG51};
M5:MA(C,5),COLORBLUE,LINETHICK2{XG51};
M10:MA(C,10),NODRAW{XG51};
M20:MA(C,20),COLORRED,LINETHICK2{XG51};
M60:MA(C,60),NODRAW{XG51};
M240:MA(C,60),COLORLIGREEN,CIRCLEDOT{XG51};
警示:=NAMEINCLUDE('S'){XG51};
涨停价:ZTPRICE(REF(C,1),IF(警示,0.05,0.1)),NODRAW,COLORBLUE{XG51};
跌停价:DTPRICE(REF(C,1),IF(警示,0.05,0.1)),NODRAW,COLORCYAN{XG51};
明涨停:IF(警示=1,ZTPRICE(C,0.05),ZTPRICE(C,0.1)),NODRAW,COLORBLUE{XG51};
明跌停:IF(警示=1,DTPRICE(C,0.05),DTPRICE(C,0.1)),NODRAW,COLORCYAN{XG51};
VAR1:=BacKSET(REF(HIGH,2)=HHV(HIGH,5),3){XG51};
VAR2:=crOSS(VAR1,0.9) AND CURRBARSCOUNT<=10{XG51};
VAR3:=BACKSET(REF(LOW,2)=LLV(LOW,5),3){XG51};
VAR4:=CROSS(VAR3,0.9) AND CURRBARSCOUNT<=10{XG51};
STICKLINE(CLOSE,REF(HIGH,BArslAST(VAR2)),REF(HIGH,BARSLAST(VAR2)),2,1),COLORCYAN,LINETHICK1{XG51};
STICKLINE(CLOSE,REF(LOW,BARSLAST(VAR4)),REF(LOW,BARSLAST(VAR4)),2,1),COLORWHITE,LINETHICK4{XG51};
T:=HHVBARS(H,4){XG51};
TT:=IF(T=0,REF(T,T+1)+T+1,T){XG51};
TA:=LLVBARS(L,3){XG51};
TTA:=IF(TA=0,REF(TA,TA+1)+TA+1,TA){XG51};
T1:=HHVBARS(H,10){XG51};
TT1:=IF(T1=0,REF(T1,T1+1)+T1+1,T1){XG51};
HX1:=CURRBARSCOUNT=CONST(TTA+1),NODRAW{XG51};
三日支撑:DRAWLINE(HX1,L,ISLASTBAR,CONST(REF(L,TTA)),0),COLORBLUE,DOTLINE,LINETHICK1{XG51};
TA1:=LLVBARS(L,10){XG51};
TTA1:=IF(TA1=0,REF(TA1,TA1+1)+TA1+1,TA1){XG51};
十日支撑:DRAWLINE(CURRBARSCOUNT=CONST(TTA1+1),L,ISLASTBAR,CONST(REF(L,TTA1)),0),COLORBLUE,DOTLINE,LINETHICK1{XG51};
十日压力:DRAWLINE(CURRBARSCOUNT=CONST(TT+1),H,ISLASTBAR,CONST(REF(H,TT)),0),COLORCYAN,DOTLINE,LINETHICK1{XG51};
QA:=REF(H,10)=HHV(H,2*10+1){XG51};
QB:=BACKSET(QA,10+1){XG51};
QC:=FILTER(QB,10) AND H=HHV(H,10+1){XG51};
QD:=BARSLAST(QC){XG51};
QE:=IF(QC,CURRBARSCOUNT,0){XG51};
QF:=IF(QD,REF(QE,QD),QE){XG51};
QG:=CONST(QF){XG51};
QH:=REF(QF,QD+1){XG51};
QW:=CONST(QH){XG51};
区间压力:DRAWLINE(CURRBARSCOUNT=QG,H,ISLASTBAR,REF(H,QG-1),1),COLORCYAN,DOTLINE,LINETHICK1{XG51};
QA1:=REF(L,8)=LLV(L,2*8+1){XG51};
QB1:=BACKSET(QA1,8+1){XG51};
QC1:=FILTER(QB1,8) AND L=LLV(L,8+1){XG51};
QD1:=BARSLAST(QC1){XG51};
QE1:=IF(QC1,CURRBARSCOUNT,0){XG51};
QF1:=IF(QD1,REF(L,QD1),L){XG51};
QG1:=IF(QD1,REF(QE1,QD1),QE1){XG51};
QH1:=CONST(QG1){XG51};
QW1:=REF(QF1,QD1+1){XG51};
QM1:=REF(QG1,QD1+1){XG51};
QR1:=CONST(QM1){XG51};
短线支撑:DRAWLINE(CURRBARSCOUNT=QH1,L,ISLASTBAR,REF(L,QH1-1),1),COLORWHITE,DOTLINE,LINETHICK1{XG51};
平台支撑:DRAWLINE(CURRBARSCOUNT=QR1,L,ISLASTBAR,REF(L,QR1-1),1),COLORWHITE,DOTLINE,LINETHICK1{XG51};
EMA(EMA(C,5),5),COLORCYAN{XG51};
EMA(EMA(EMA(C,5),5),5),COLORCYAN{XG51};
EMA(EMA(EMA(EMA(C,5),5),5),5),COLORCYAN{XG51};
EMA(EMA(EMA(EMA(EMA(C,5),5),5),5),5),COLORCYAN{XG51};
IF(EMA(EMA(C,5),5)>REF(EMA(EMA(C,5),5),1),EMA(EMA(C,5),5),DRAWNULL),COLORWHITE{XG51};
IF(EMA(EMA(EMA(C,5),5),5)>REF(EMA(EMA(EMA(C,5),5),5),1),EMA(EMA(EMA(C,5),5),5),DRAWNULL),COLORWHITE{XG51};
IF(EMA(EMA(EMA(EMA(C,5),5),5),5)>REF(EMA(EMA(EMA(EMA(C,5),5),5),5),1),EMA(EMA(EMA(EMA(C,5),5),5),5),DRAWNULL),COLORWHITE{XG51};
IF(EMA(EMA(EMA(EMA(EMA(C,5),5),5),5),5)>REF(EMA(EMA(EMA(EMA(EMA(C,5),5),5),5),5),1),EMA(EMA(EMA(EMA(EMA(C,5),5),5),5),5),DRAWNULL),COLORWHITE{XG51};
STICKLINE(OPEN>CLOSE,CLOSE,OPEN,3,0),COLORFF7700{XG51};
STICKLINE(OPEN>CLOSE,CLOSE,OPEN,2.2,0),COLORFF9900{XG51};
STICKLINE(OPEN>CLOSE,CLOSE,OPEN,1.5,0),COLORFFBB00{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),COLOR000099{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.2,0),COLOR0000CC{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.5,0),COLOR0000FF{XG51};
STICKLINE(CLOSE=OPEN,CLOSE,OPEN,3,0),COLORRED{XG51};
STICKLINE(CLOSE=OPEN,CLOSE,OPEN,2.2,0),COLORRED{XG51};
STICKLINE(CLOSE=OPEN,CLOSE,OPEN,1.5,0),COLORRED{XG51};
STICKLINE(CLOSE=OPEN,CLOSE,OPEN,0.5,0),COLORRED{XG51};
大阳:=C/REF(C,1)>=1.05 AND NOT(C>=INTPART(REF(C,1)*(1.1)*100)/100) AND C>O{XG51};
STICKLINE(大阳,CLOSE,OPEN,4,-1),COLORLICYAN{XG51};
STICKLINE(大阳,CLOSE,OPEN,3,-1),COLORBLUE{XG51};
STICKLINE(大阳,OPEN,CLOSE,2.5,0),COLORWHITE{XG51};
STICKLINE(大阳,OPEN,CLOSE,1,0),COLORLIMAGENTA{XG51};
大阴:=REF(C,1)/C<=1.099 AND REF(C,1)/C>=1.05 AND C<O{XG51};
STICKLINE(大阴,CLOSE,OPEN,4,-1),COLORCYAN{XG51};
STICKLINE(大阴,CLOSE,OPEN,3,-1),COLORFF9900{XG51};
STICKLINE(大阴,OPEN,CLOSE,2.5,0),COLORFFBB00{XG51};
STICKLINE(大阴,OPEN,CLOSE,1,0),COLORGREEN{XG51};
STG:=NAMELIKE('S') OR NAMELIKE('*'){XG51};
涨停:=(C/REF(C,1)>=1.095 AND C=H) OR (C/REF(C,1)>=1.09 AND C=O AND O=L AND H=L) OR (C/REF(C,1)>=1.048 AND STG=1 AND C=H) OR (C/REF(C,1)>=1.045 AND C=O AND O=L AND H=L AND STG=1){XG51};
STICKLINE(涨停,CLOSE,OPEN,4,-1),COLORBLUE{XG51};
STICKLINE(涨停,OPEN,CLOSE,3.5,0),COLORWHITE{XG51};
STICKLINE(涨停,O,C,2.5,1),COLOR007FFF{XG51};
STICKLINE(涨停,OPEN,CLOSE,1,0),COLORBLUE{XG51};
跌停:=(REF(C,1)/C>=1.095 AND C=L) OR (REF(C,1)/C>=1.09 AND C=O AND O=L AND H=L) OR (REF(C,1)/C>=1.048 AND STG=1 AND C=L) OR (REF(C,1)/C>=1.045 AND C=O AND O=L AND H=L AND STG=1){XG51};
STICKLINE(跌停,CLOSE,OPEN,4,-1),COLORCYAN{XG51};
STICKLINE(跌停,OPEN,CLOSE,3.5,0),COLORYELLOW{XG51};
STICKLINE(跌停,O,C,2.5,1),COLORLIRED{XG51};
STICKLINE(跌停,OPEN,CLOSE,1,0),COLORCYAN{XG51};
STICKLINE(CLOSE>OPEN AND H/C>=1.03,H,C,0,0),COLORGRAY,LINETHICK2{XG51};
STICKLINE(CLOSE>OPEN AND O/L>=1.03,O,L,0,0),COLORBLUE,LINETHICK2{XG51};
STICKLINE(CLOSE<OPEN AND H/O>=1.03,H,O,0,0),COLORGRAY,LINETHICK2{XG51};
STICKLINE(CLOSE<OPEN AND C/L>=1.03,C,L,0,0),COLORBLUE,LINETHICK2{XG51};
LOWV:=LLV(LOW,90){XG51};
HIGHV:=HHV(HIGH,90){XG51};
RSV:=EMA((CLOSE-LOWV)/(HIGHV-LOWV)*100,3){XG51};
K:=EMA(RSV,3){XG51};
D:=MA(K,3){XG51};
DRAWICON(CROSS(K,D),L*0.98,7){XG51};
DRAWICON(CROSS(D,K),H*1.02,8){XG51};
DRAWTEXT("kdj.J"-REF("kdJ.J",1)>30  AND C/REF(C,1)>1.043
AND expma(C,12)>EXPMA(C,50),L*0.95,'主升'),COLORBLUE{X_G*5_1_C_N_{};