通达信捉大牛主图未加密选股指标公式源码

源码正文：

K:=(C+H+L)/3{XG51};
D:=ma(K,4){XG51};
DRAWTEXT(REF(C,1)>D AND C<D AND D>REF(D,1),H*1.02,'卖'){XG51};
DRAWTEXT(REF(C,1)<D AND C>D AND D<REF(D,1) AND C>REF(C,1)*1.045,L*0.98, '买'),COLORRED{X~G-5^1~C~N~{};

源码正文：

HDAY:=15{XG51};
LDAY:=15{XG51};
PE:=1{XG51};
KE:=3{XG51};
CURR:=CURRBARSCOUNT{XG51};
TCH:=CONst(FINDHIGH(H,0,HDAY*10,1)){XG51};
GTT:=CONST(BArslAST(TCH=H))+1{XG51};
SX跌H:=CONST(IF(GTT=1,H,REF(H,GTT-1))){XG51};
BCL:=CONST(FINDLOW(L,0,LDAY*10,1)){XG51};
DTT:=CONST(BARSLAST(BCL=L))+1{XG51};
SX涨L:=CONST(IF(DTT=1,L,REF(L,DTT-1))){XG51};
IM68:=((SX跌H-SX涨L)/6-(SX跌H-SX涨L)/8){XG51};
GH跌X:=SX跌H+(SX跌H-SX涨L)/8; DL涨X:=SX涨L-(SX跌H-SX涨L)/8{XG51};
STICKLINE(1=1,H,L,9,0)COLOR000000{XG51};
GTHT:=IF(DTT>GTT,DTT,GTT); R:=Abs(GTT-DTT){XG51};
DRAWBAND(IF(CURR<=GTHT+R/8,GH跌X,DRAWNULL),RGB(80,124,124),DL涨X,RGB(80,124,124)){XG51};
DRAWBAND(IF(CURR<=GTHT+R/8,SX跌H,DRAWNULL),RGB(8,168,168),SX跌H,RGB(8,168,168)){XG51};
DRAWBAND(IF(CURR<=GTHT+R/8,SX涨L,DRAWNULL),RGB(8,168,168),SX涨L,RGB(8,168,168)){XG51};
DRAWBAND(IF(CURR<=GTHT+R/8,SX跌H-(SX跌H-SX涨L)/8,DRAWNULL),RGB(80,124,24),SX涨L+(SX跌H-SX涨L)/8,RGB(80,124,24)){XG51};
DRAWBAND(IF(CURR<=GTHT+R/8,SX跌H-(SX跌H-SX涨L)/4,DRAWNULL),RGB(0,124,154),SX涨L+(SX跌H-SX涨L)/4,RGB(0,124,154)){XG51};
DRAWBAND(IF(CURR<=GTHT+R/8,SX跌H-(SX跌H-SX涨L)*3/8,DRAWNULL),RGB(80,124,24),SX涨L+(SX跌H-SX涨L)*3/8,RGB(80,124,24)){XG51};
DRAWBAND(IF(CURR<=GTHT+R/8,(SX跌H+SX涨L)/2,DRAWNULL),RGB(8,168,168),(SX跌H+SX涨L)/2,RGB(8,168,168)){XG51};
DRAWTEXT(CURR=GTHT,SX涨L-IM68,' 开心?果?'),COLOR8899AA{XG51};
SX涨:=(CURR=KE+DTT)-1{XG51};
SX跌:=(CURR=KE+GTT)-1{XG51};
SX涨跌:=DRAWLINE(SX涨=0,SX涨L,SX跌=0,SX跌H,0){XG51};
SX跌涨:=DRAWLINE(SX涨=0,SX跌H,SX跌=0,SX涨L,0){XG51};
S涨跌X:=DRAWLINE(SX跌=0,SX跌H,SX涨=0,SX涨L,0){XG51};
S跌涨X:=DRAWLINE(SX跌=0,SX涨L,SX涨=0,SX跌H,0){XG51};
SX涨跌X:=IF(DTT>GTT,SX涨跌,S涨跌X){XG51};
SX跌涨X:=IF(DTT>GTT,SX跌涨,S跌涨X){XG51};
PEDAY:=IF(PE=1,0,IF(PE=2,R/2,IF(PE=3,R,IF(PE=4,R+R/2,IF(PE=5,2*R,IF(PE=6,2*R+R/2,IF(PE=7,3*R,3*R+R/2))))))){XG51};
SLXH:IF(BETWEEN(CURR,KE+DTT-PEDAY,KE+GTT-PEDAY),(SX跌H+SX涨L)/2,DRAWNULL),COLOR8E0000,LINETHICK3{XG51};
H跌X:IF(BETWEEN(CURR,KE+DTT-PEDAY,KE+GTT-PEDAY),SX跌H,DRAWNULL),COLOR8E0000,LINETHICK3{XG51};
L涨X:IF(BETWEEN(CURR,KE+DTT-PEDAY,KE+GTT-PEDAY),SX涨L,DRAWNULL),COLOR8E0000,LINETHICK3{XG51};
STICKLINE(REF(SX涨=0,PEDAY) OR REF(SX跌=0,PEDAY) OR REF(CURR=KE+ROUND((GTT+DTT)/2),PEDAY),SX跌H,SX涨L,0.1,0),COLOR8E0000{XG51};
X涨点:=IF(SX涨>SX跌,SX涨,SX跌){XG51};
X跌点:=IF(SX涨>SX跌,SX涨,SX跌){XG51};
开心1:REF(DRAWLINE(X跌点=0,SX跌H,CURR=KE+ROUND((GTT+DTT)/2),SX涨L,0),PEDAY),COLOR00FFFF{XG51};
开心2:REF(DRAWLINE(X跌点=0,(SX跌H+SX涨L)/2,CURR=KE+ROUND((GTT+DTT)/2),SX涨L,0),PEDAY),COLORFF0000,LINETHICK2{XG51};
开心3:REF(DRAWLINE(X跌点=0,SX涨L,CURR=KE+ROUND((GTT+DTT)/2),SX跌H,0),PEDAY),COLOR00FFFF{XG51};
开心4:REF(DRAWLINE(X跌点=0,SX跌H,X涨点=0,(SX跌H+SX涨L)/2,0),PEDAY),COLOR00FFFF{XG51};
开心5:REF(DRAWLINE(X跌点=0,SX涨L,X涨点=0,(SX跌H+SX涨L)/2,0),PEDAY),COLOR00FFFF{XG51};
开心6:REF(DRAWLINE(X跌点=0,(SX跌H+SX涨L)/2,CURR=KE+ROUND((GTT+DTT)/2),SX跌H,0),PEDAY),COLORFF0000,LINETHICK2{XG51};
开心7:REF(DRAWLINE(X跌点=0,(SX跌H+SX涨L)/2,X涨点=0,SX跌H,0),PEDAY),COLOR00FFFF{XG51};
开心8:REF(DRAWLINE(X跌点=0,(SX跌H+SX涨L)/2,X涨点=0,SX涨L,0),PEDAY),COLOR00FFFF{XG51};
开心9:REF(DRAWLINE(CURR=KE+ROUND((GTT+DTT)/2),SX涨L,X涨点=0,(SX跌H+SX涨L)/2,0),PEDAY),COLORFF0000,LINETHICK2{XG51};
开心10:REF(DRAWLINE(CURR=KE+ROUND((GTT+DTT)/2),SX跌H,X涨点=0,(SX跌H+SX涨L)/2,0),PEDAY),COLORFF0000,LINETHICK2{XG51};
开心11:REF(DRAWLINE(CURR=KE+ROUND((GTT+DTT)/2),SX跌H,X涨点=0,SX涨L,0),PEDAY),COLOR00FFFF{XG51};
开心12:REF(DRAWLINE(CURR=KE+ROUND((GTT+DTT)/2),SX涨L,X涨点=0,SX跌H,0),PEDAY),COLOR00FFFF{XG51};
开心13:REF(SX涨跌X,PEDAY),COLOR8E00E8{XG51};
开心14:REF(SX跌涨X,PEDAY),COLOR8E00E8{XG51};
IF(BETWEEN(CURR,KE+DTT,KE+GTT),SX跌H,DRAWNULL),COLOR8E0000,LINETHICK3{XG51};
IF(BETWEEN(CURR,KE+DTT,KE+GTT),SX涨L,DRAWNULL),COLOR8E0000,LINETHICK3{XG51};
STICKLINE(SX涨=0 OR SX跌=0,SX跌H,SX涨L,0.1,0),COLOR8E0000{XG51};
DRAWTEXT(CURR=KE+ROUND((GTT+DTT)/2)+5,SX跌H*0.98,'历史区间'),COLOR8800AA{XG51};
DRAWKLINE(IF(CURR>KE,REFX(H,KE),DRAWNULL),IF(CURR>KE,REFX(O,KE),DRAWNULL),
IF(CURR>KE,REFX(L,KE),DRAWNULL),IF(CURR>KE,REFX(C,KE),DRAWNULL)){X*G!5~1*C*N*{};