通达信角买主图未加密选股指标公式源码

源码正文：

DRAWGBK(CURRBARSCOUNT=1, RGB(110,108,108),RGB(88,30,0),0,'',0){XG51};
N1:=30{XG51};
T1:=CONst(HHVBARS(V,N1)){XG51};
T0:IF(CURRBARSCOUNT<=N1+7,CONST(IF(T1=0,C,REF(C,T1))),DRAWNULL),LINETHICK3{XG51};
IF(CURRBARSCOUNT=T1+1,T0,DRAWNULL),CIRCLEDOT{XG51};
DRAWTEXT(ISLASTBAR,T0,'　量能平台'){XG51};
STICKLINE(ISLASTBAR,HHV(C,5)*0.95-0.01,HHV(C,5)*0.95,100,0),COLORRED,LINETHICK3{XG51};
DRAWNUMBER(ISLASTBAR,HHV(C,5)*0.95-0.01,HHV(C,5)*0.95),LINETHICK3{XG51};
止损点:=(ISLASTBAR,HHV(C,5)*0.95-0.01,HHV(C,5)*0.95),LINETHICK3{XG51};
DRAWTEXT(ISLASTBAR ,止损点,' 止损点'),LINETHICK3{XG51};
TY:=C{XG51};
A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BacKSET(B1,10+1); HD:=FILTER(C1,10){XG51};
A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10){XG51};
前期高位:REF(C,BArslAST(HD)),COLOR00FF00,POINTDOT{XG51};
STICKLINE(C,前期高位,前期高位,8,0),COLORBLUE{XG51};
E5:=ema(C,5);E13:=Ema(C,13){XG51};
DRAWBAND(E5,RGB(200,0,0),E13,RGB(0,200,0)){XG51};
DRAWKLINE(H,O,L,C){XG51};
平衡:EMA(C,20)COLORBLUE{XG51};
上轨:平衡 + 2*STD(C,20),LINETHICK2,COLORLIMAGENTA{XG51};
下轨:平衡 - 2*STD(C,20),LINETHICK3,COLORCYAN{XG51};
上:=EMA(C,3),COLORYELLOW,LINETHICK1{XG51};
中:=EMA(C,5),COLORRED,LINETHICK1{XG51};
下:=EMA(中,5),COLOR00FF00,LINETHICK1{XG51};
QQ:= C<中{XG51};
MM:=上>REF(上,1) AND REF(上,1)<REF(上,2) {XG51};
VAR1W:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21)))){XG51};
VAR2W:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21)))){XG51};
VAR3W:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34)){XG51};
VAR3P:=IF(CLOSE/REF(CLOSE,1)>1.050 AND HIGH/CLOSE<1.010 AND IF(CLOSE>REF(CLOSE,1),88,0)>0, 91, 0){XG51};
STICKLINE(VAR3P>90,L,L*0.92,1,1),COLORFF00FF{XG51};
DRAWTEXT(VAR3P>90,LOW*0.92,'追涨'),COLORFF00FF{XG51};
SS:=MA((LOW+HIGH+CLOSE)/3,5)>REF(MA((LOW+HIGH+CLOSE)/3,5),1) AND REF(MA((LOW+HIGH+CLOSE)/3,5),1)<REF(MA((LOW+HIGH+CLOSE)/3,5),2){XG51};
SC:=L<HHV(MA((LOW+HIGH+CLOSE)/3,5),13) AND H>HHV(MA((LOW+HIGH+CLOSE)/3,5),13) AND C>REF(C,1) AND C>O{XG51};
MR:=SC AND COUNT(SS,2){XG51};
买:=MR AND NOT(REF(MR,1)){XG51};
STICKLINE(买,L,L*0.95,2,1),COLORYELLOW{XG51};
DRAWTEXT(买,L*0.95, '必涨'),COLORWHITE{XG51};
V1:=Abs((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20){XG51};
V2:=(1-7/100)*(dma(CLOSE,V1)){XG51};
V3:=(1+7/100)*(DMA(CLOSE,V1)){XG51};
V5:=MA((LOW+HIGH+CLOSE)/3,5){XG51};
MA1:=MEMA(CLOSE,5){XG51};
MA2:=ATAN((MA1/REF(MA1,1)-1)*100)*180/3.1416{XG51};
MA3:=IF(MA2>0,MA2,MA2){XG51};
MA5:MA(C,5){XG51};
MA25:=MA(C,25),COLORCYAN,LINETHICK2{XG51};
VAR1:=CLOSE=HHV(C,4) AND (REF(C,1)>=REF(C,2) OR REF(C,1)>=REF(C,3))
OR REF(C,1)=HHV(C,4) AND CLOSE>=REF(C,2) OR REF(C,2)=HHV(C,4) AND
REF(C,3)=LLV(C,4) AND C>=REF(C,1) OR REF(C,3)=HHV(C,4) AND
C>=REF(C,1) AND C>=REF(C,2){XG51};
VAR2:=CLOSE=HHV(C,4) AND REF(C,1)=LLV(C,4){XG51};
VAR3:=CLOSE=LLV(C,4) AND (REF(C,1)<REF(C,2) OR REF(C,1)<REF(C,3)) OR
REF(C,1)=LLV(C,4) AND C<REF(C,2) OR REF(C,2)=LLV(C,4) AND
REF(C,1)=HHV(C,4) AND C<REF(C,1) OR REF(C,3)=LLV(C,4) AND
C<REF(C,1) AND C<REF(C,2){XG51};
VAR4:=REF(C,1)=LLV(C,4) AND C>=REF(C,2) OR REF(C,2)=LLV(C,4) AND
REF(C,1)<=REF(C,3) AND REF(C,2)<REF(C,4) AND C>=REF(C,1){XG51};
STICKLINE(CLOSE>REF(CLOSE,1)*1.0985 AND CLOSE=HIGH,CLOSE,OPEN,4,-1),
COLOR00FFFF{XG51};
STICKLINE(CLOSE<REF(CLOSE,1)*0.9015 AND CLOSE=LOW,CLOSE,OPEN,4,-1),
COLORCYAN{XG51};
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3.3,0),COLORFF6600{XG51};
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2.4,0),COLORFF8800{XG51};
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.3,0),COLORFFAA00{XG51};
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,0.6,0),COLORFFCC00{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3.3,0),COLOR000099{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.4,0),COLOR0000BB{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.3,0),COLOR0000DD{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0.5,0),COLOR0000FF{XG51};
STICKLINE(VAR3,OPEN,(OPEN+CLOSE)/2,3.3,0),COLOR009900{XG51};
STICKLINE(VAR3,OPEN,(OPEN+CLOSE)/2,2.4,0),COLOR00BB00{XG51};
STICKLINE(VAR3,OPEN,(OPEN+CLOSE)/2,0.5,0),COLOR00FF00{XG51};
STICKLINE(VAR4 AND MM,OPEN,(OPEN+CLOSE)/2,3.3,0),COLOR999999{XG51};
STICKLINE(VAR4 AND MM,OPEN,(OPEN+CLOSE)/2,2.2,0),COLORBBBBBB{XG51};
STICKLINE(VAR4 AND MM,OPEN,(OPEN+CLOSE)/2,1.3,0),COLORDDDDDD{XG51};
STICKLINE(VAR4 AND MM,OPEN,(OPEN+CLOSE)/2,0.5,0),COLORFFFFFF{XG51};
AA10:=MA(CLOSE,8),COLOR0000FF{XG51};
BB10:=((ATAN((AA10 - REF(AA10,1))) * 3.1416) * 10){XG51};
均线３０:=MA(CLOSE,30){XG51};
均线８９:=MA(CLOSE,89){XG51};
均线:=MA(CLOSE,16){XG51};
DRAWTEXT((((((OPEN <= 均线) AND ((均线３０ - REF(均线３０,1)) > 0))
AND (CLOSE > 均线８９)) AND (BB10 > 1)) AND ((CLOSE / OPEN) > 1.04)),
LOW,'←天马过桥'),COLORCC99FF{XG51};
DRAWTEXT_FIX(1,0.00,0,0,'所属行业：')COLORGREEN{XG51};
DRAWTEXT_FIX(1,0.06,0,0,HYBLOCK),COLORRED{XG51};
DRAWTEXT_FIX(1,0.14,0,0,'所属地区：')COLORGREEN{XG51};
DRAWTEXT_FIX(1,0.20,0,0,DYBLOCK),COLORRED{XG51};
DRAWTEXT_FIX(1,0.30,0.00,0,'主题投资：'),COLORGREEN{XG51};
DRAWTEXT_FIX(1,0.36,0.00,0,EXTERNSTR(0,2)),COLORLICYAN{XG51};
DRAWTEXT_FIX(1,0.00,0.05,0,'主营业务：')COLORGREEN{XG51};
DRAWTEXT_FIX(1,0.06,0.05,0,EXTERNSTR(0,3)),COLORWHITE{XG51};
DRAWTEXT_FIX(1,0.00,0.15,0,'莸利比例:'),COLORBLUE{XG51};
DRAWNUMBER_FIX(1,0.06,0.15,0,CONST(WINNER(C )*100)),COLORRED{XG51};
DRAWTEXT_FIX(1,0.12,0.15,0,'动态PE:'),COLORBLUE{XG51};
DRAWNUMBER_FIX(1,0.17,0.15,0,CONST(DYnaINFO(39))),COLORRED{XG51};
DRAWTEXT_FIX(1,0.22,0.15,0,'市值:'),COLORBLUE{XG51};
DRAWNUMBER_FIX(1,0.26,0.15,0,FINANCE(40)/100000000),COLORRED{XG51};
DRAWTEXT_FIX (1,0.31,0.15,0,'公积金(股):'),COLORBLUE{XG51};
DRAWNUMBER_FIX(1,0.38,0.15,0,FINANCE(18)),COLORRED{XG51};
DRAWTEXT_FIX (1,0.43,0.15,0,'收益:'),COLORBLUE{XG51};
DRAWNUMBER_FIX(1,0.47,0.15,0,FINANCE(33)),COLORRED{XG51};
角线:=(ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*180/3.14115926){XG51};
角线MA:=MA(角线,5){XG51};
ANA:=PLOYLINE(CROSS(角线,角线MA),角线MA),COLORWHITE{XG51};
ANB:=PLOYLINE(CROSS(角线MA,角线),角线MA),COLORFF00FF {XG51};
角买点:=CROSS(角线,角线MA) AND ((ANB>REF(ANB,1) AND ANB>ANA AND 角线MA<=0) OR ((角线MA<=-45 OR CROSS(角线MA,-45)) AND (ANB<-60 OR LLV("kdj.J",3)<=-49) AND ANB>0)),COLORCYAN{XG51};
角起涨:=COUNT(CROSS(角线,角线MA),ANA<REF(ANA,5) AND ANB>REF(ANB,5)){XG51};
角卖点:=(CROSS(角线MA,角线) AND (ANB>REF(ANB,1) OR ANA<REF(ANA,1)) AND ANB>ANA AND 角线MA>0)*1{XG51};
角始跌:=COUNT(CROSS(角线MA,角线),ANA<REF(ANA,5) AND ANB>REF(ANB,5)){XG51};
DRAWTEXT(角买点,L,'━━角买'),COLOR00FFFF{X^G?5.1^C^N^{};

源码正文：

N:=3{XG51};
Tcr:=(C-REF(CLOSE,1))*100{XG51};
LC:=REF(CLOSE,1){XG51};
rsi5:=((SMA(maX((CLOSE - LC),0),5,1) / SMA(Abs((CLOSE - LC)),5,1)) * 100){XG51};
TR1:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),10){XG51};
S:=(HHV(H,2)-HHV(C,2))*100{XG51};
B:=(LLV(L,2)-LLV(C,2))*100{XG51};
HD:=(HIGH - REF(HIGH,1)){XG51};
LD:=(REF(LOW,1) - LOW){XG51};
DMP:=SUM(IF(((HD > 0) AND (HD > LD)),HD,0),10){XG51};
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),10){XG51};
趋势线:MA(TCR,N),COLORWHITE{XG51};
牛线:MA(S,9),COLORRED{XG51};
支撑线:MA(B,9),COLORCYAN{XG51};
pdi:=((DMP * 100) / TR1){XG51};
mdi:=((DMM * 100) / TR1){XG51};
ADX:=MA(((ABS((MDI - PDI)) / (MDI + PDI)) * 100),5){XG51};
AV:=(RSI5 + ADX){XG51};
DXR:=(((ADX + REF(ADX,5)) / 2) + RSI5){XG51};
wr10:=((100 * (HHV(HIGH,10) - CLOSE)) / (HHV(HIGH,10) - LLV(LOW,10))){XG51};
NEWvol:=(RSI5 - WR10){XG51};
最佳买入:=(AV + NEWVOL){XG51};
最佳买入选股:=IF(CROSS(最佳买入,0),1,0),stICK,COLORWHITE{XG51};
引差:=LOW-REF(C,1){XG51};
引涨:=H-REF(C,1){XG51};
VAR1:=SMA(最佳买入选股,3,1){XG51};
VAR2:=SMA(VAR1,3,1),COLOR0000FF{XG51};
VAR3:=SMA(VAR2,3,1),COLOR00FFFF{XG51};
F1:=IF(引涨>ABS(引差),引涨,引差){XG51};
F2:=IF(引涨<ABS(引差),引涨,引差){XG51};
建仓买点:IF(CROSS(VAR2,VAR3) AND (VAR2<40),5,0* 10000),COLOR0000FF,LINETHICK2{XG51};
STICKLINE(建仓买点,0,2.5,8,0),COLORWHITE{XG51};
STICKLINE(建仓买点,0.45,4.0,2,0),COLORWHITE{XG51};
RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 50){XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
J:=3*K-2*D{XG51};
X:=LLV(J,2)=LLV(J,8){XG51};
热线:MA(引涨*100,13),COLORLIBLUE{XG51};
冷线:MA(引差*100,13),COLORGREEN{XG51};
操作线:MA(F1*100,3),COLORBLUE{XG51};
最佳买入时机: IF(CROSS(J,3),1,0),STICK,COLORFFFF00{XG51};
STICKLINE(最佳买入时机,0,1,3,0),COLOR009999{XG51};
STICKLINE(最佳买入时机,0,1,2,0),COLOR00DDDD{XG51};
STICKLINE(最佳买入时机,0,1,1,0),COLOR00FFFF{XG51};
DRAWTEXT(CROSS(趋势线,支撑线),支撑线*0.99,'买涨'),COLORBLUE{XG51};
机构建仓: IF(最佳买入<5,-0.2,0),STICK,COLOR00FF00,LINETHICK1{XG51};
机构建仓日:STICKLINE(机构建仓,0,-0.2,3,0),COLOR00FF00,LINETHICK6{XG51};
获利:STICKLINE(REF("kdj.J",1)<0 AND "kdJ.J">0,60,0,1,0),COLOR0000FF{XG51};
RSV9:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
WWWGUPANGCOM:=((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100){XG51};
K1:SMA(RSV9,3,1){XG51};
DK1:K1-REF(K1,1){XG51};
出手就赢:IF(DK1>7 AND REF(DK1,1)<0 AND (DK1-REF(DK1,1))>9,50,0), STICK,COLORBLUE;DRAWICON(出手就赢>0,50 ,1){XG51};
IF(支撑线>冷线,冷线,DRAWNULL),COLORGRAY,LINETHICK2{XG51};
IF(热线>牛线,热线,DRAWNULL),COLORLIMAGENTA,LINETHICK2{XG51};
DRAWTEXT(CROSS(趋势线,30)&&CROSS(操作线,30)&&趋势线>热线,趋势线,'追'){XG51};
0,COLORGREEN,POINTDOT{X_G?5_1_C_N_{};