通达信底部出现未加密选股指标公式源码

源码正文：

VARA:=REF(LOW,1){XG51};
VARB:=SMA(Abs(LOW-VARA),3,1)/Sma(MAX(LOW-VARA,0),3,1)*100{XG51};
VARC:=ema(IF(CLOSE*1.3,VARB*10,VARB/10),3){XG51};
VARD:=LLV(LOW,30){XG51};
VARE:=HHV(VARC,30){XG51};
VARF:=IF(MA(CLOSE,58),1,0){XG51};
VARG:=EMA(IF(LOW<=VARD,(VARC+VARE*2)/2,0),3)/618*VARF{XG51};
VARH:=IF(VARG>100,100,VARG){XG51};
吸筹:stICKLINE(VARH>-120,0,VARH/2,6,1),COLORYELLOW{XG51};
A11:=REF(C,1){XG51};
rsi11:=SMA(MAX(C-A11,0),6,1)/SMA(ABS(C-A11),6,1)*100{XG51};
A1:=C-MA(C,5)/MA(C,5)*100<1{XG51};
A2:=C-MA(C,13)/MA(C,13)*100<-10{XG51};
A3:=C-MA(C,34)/MA(C,34)*100<-15{XG51};
A4:=RSI11<18{XG51};
TYP := (HIGH + LOW + CLOSE)/3{XG51};
A5:=(TYP-MA(TYP,14)/(0.015*AVEDEV(TYP,14)))<-120{XG51};
组合底部:(A1 AND A2 AND A3 AND A4 AND A5)*5,COLORRED{XG51};
L1:=EMA(CLOSE,2){XG51};
L2:=EMA(CLOSE,150){XG51};
L3:=L1-L2{XG51};
L4:=EMA(L3,100){XG51};
L5:=2*(L3-L4){XG51};
L6:=POW(L5,3)*0.1+POW(L5,1){XG51};
黑马线0:=IF(L5>0.1,L6,0){XG51};
黑马线:IF(黑马线0>100,100,黑马线0),COLORCYAN{XG51};
趋势线:(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100,COLORBLUE{XG51};
X:SMA(趋势线,3,1),COLORLIMAGENTA{X!G_5?1!C!N!{};

源码正文：

AB:=ema(((2*C+H+L)/4-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100,8){XG51};
BA:=Ema(AB,5){XG51};
A18:=REFDATE(REF(HHV(H,96),5),DATE){XG51};
B1:=REFDATE(REF(LLV(L,96),5),DATE){XG51};
DY:=((A18)+(B1))/2{XG51};
顶:IF(AB>0 AND AB-BA<=0,A18,A18),DOTLINE,COLORGREEN{XG51};
腰:IF(AB>0 AND AB-BA<=0,DY,DY),DOTLINE,COLORGREEN{XG51};
底:IF(AB>0 AND AB-BA<=0,B1,B1),DOTLINE,COLORGREEN{XG51};
MC:=C#MONTH,NODRAW{XG51};
MO1:=IF(DAY<REF(DAY,1),O,DRAWNULL){XG51};
MO:=HHV(MO1,DAY),NODRAW{XG51};
stICKLINE(MC>=MO,MO,MC,4,-1)COLOR00009C{XG51};
STICKLINE(MC<MO,MO,MC,4,-1),COLOR4F2F4F{XG51};
AQ:=O#WEEK;B:=C#WEEK{XG51};
AAQ:=H#WEEK;BB:=L#WEEK{XG51};
STICKLINE(B>=AQ,AAQ,BB,4,0),COLOR00006B{XG51};
STICKLINE(B<AQ,AAQ,BB,4,0),COLOR663300{XG51};
P:=9{XG51};
WH1:=IF(L=LLV(L,P),L,DRAWNULL){XG51};
WH2:=CONST(BArslAST(WH1!=DRAWNULL)){XG51};
WH3:=CONST(IF(WH2=0,H,REF(H,WH2))){XG51};
WH4:=CONST(REF(BARSLAST(H>WH3),WH2+1)+WH2+1){XG51};
WH5:=CONST(IF(WH4=0,H,REF(H,WH4))){XG51};
WH6:=CONST(REF(BARSLAST(H>WH5),WH4+1)+WH4+1){XG51};
赢:IF(CURRBARSCOUNT<=WH2+10,CONST(IF(WH6=0,H,REF(H,WH6))),DRAWNULL),COLORLIMAGENTA,LINETHICK2{XG51};
DRAWTEXT(ISLASTBAR,赢,' YW'),COLORLIMAGENTA{XG51};
H1:=IF(H=HHV(H,P),H,DRAWNULL){XG51};
H2:=CONST(BARSLAST(H1!=DRAWNULL)){XG51};
H3:=CONST(IF(H2=0,L,REF(L,H2))){XG51};
H4:=CONST(REF(BARSLAST(L<H3),H2+1)+H2+1){XG51};
H5:=CONST(IF(H4=0,L,REF(L,H4))){XG51};
H6:=CONST(REF(BARSLAST(L<H5),H4+1)+H4+1){XG51};
损:IF(CURRBARSCOUNT<=H2+10,CONST(IF(H6=0,L,REF(L,H6))),DRAWNULL),COLORCYAN,LINETHICK2{XG51};
DRAWTEXT(ISLASTBAR,损,' SW'),COLORCYAN{XG51};
VAR1:=(2*CLOSE+HIGH+LOW+OPEN)/5{XG51};
A1:(EMA(VAR1,3)+EMA(VAR1,6)+EMA(VAR1,12)+EMA(VAR1,24))/4,COLOR0044BB{XG51};
A2:EMA(A1,2),COLOR3355BB{XG51};
A3:EMA(A2,2),COLOR4455BB{XG51};
A4:EMA(A3,2),COLOR5555BB{XG51};
A5:EMA(A4,2),COLOR6655BB{XG51};
A6:EMA(A5,2),COLOR7755BB{XG51};
A7:EMA(A6,2),COLOR8855BB{XG51};
DRAWKLINE(H,O,L,C){XG51};
STICKLINE(C>=O,C,O,3,0),COLOR1F1ac5{XG51};
STICKLINE(C>=O,C,O,1.3,0),COLOR1F1AD5{XG51};
STICKLINE(C>=O,C,O,0,0),COLOR1F1AF5{XG51};
STICKLINE(C<O,C,O,3,0),COLORBBBB00{XG51};
STICKLINE(C<O,C,O,1.3,0),COLORDDDD00{XG51};
STICKLINE(C<O,H,L,0,0),COLORFFFF00{XG51};
A8:EMA(VAR1,2.78)*1.028,COLORRED,LINETHICK1{XG51};
A9:MA(OPEN,3.2)*1.028,COLORBLUE,LINETHICK1{XG51};
C6:=REF(C,1){XG51};
涨停:=IF((C-C6)*100/C6>=(10-0.01*100/C6),1,0){XG51};
STICKLINE(涨停,OPEN,CLOSE,2,0),COLORLIMAGENTA{XG51};
STICKLINE(涨停,H,L,0,0),COLORLICYAN{XG51};
VAR2:=(REF(HIGH,1)+REF(LOW,1))/2{XG51};
VAR3:=MA(CLOSE,20)+2*STD(CLOSE,20){XG51};
DRAWTEXT(crOSS(VAR2,VAR3),HIGH*1.045,'↓高'),COLORGREEN{XG51};
VAR7:=REF(C,1){XG51};
VAR8:=SMA(MAX(C-VAR7,0),6,1)/SMA(Abs(C-VAR7),6,1)*100{XG51};
DRAWTEXT(CROSS(82,VAR8),H*1.025,'↓逃'),COLORGREEN{XG51};
VAR4:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14)))){XG51};
VAR5:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14)))){XG51};
VAR6:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34)){XG51};
DRAWICON(CROSS(VAR5,MA(VAR6,6)),(LOW - (LOW*0.015)),38){XG51};
DRAWICON(CROSS(MA(VAR6,6),VAR4),(HIGH+(HIGH*0.015)),39){XG51};
STICKLINE(CROSS("kdJ.K"(3,5,3),"kdj.D"(3,5,3)),O,C,0.6,0),COLORBLUE{XG51};
STICKLINE(CROSS("KDJ.D"(3,5,3),"KDJ.K"(3,5,3)),O,C,0.6,0),COLORYELLOW{XG51};
VAR3AA:=IF((CLOSE>REF(CLOSE,1)),88,0){XG51};
VAR4AA:=IF(((CLOSE)/(REF(CLOSE,1))>1.05) AND ((HIGH)/(CLOSE)<1.01) AND (VAR3AA>0),91,0){XG51};
DRAWTEXT(FILTER((VAR4AA>90),45),(LOW)*(0.95),'★马'),COLORLIMAGENTA{XG51};
DRAWTEXT(FILTER((VAR4AA>90),35),(LOW)*(0.97),'★加'),COLORLIMAGENTA{XG51};
VAR9:=((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100){XG51};
VAR10:=SMA(VAR9,3,1){XG51};
VAR11:=SMA(VAR10,3,1){XG51};
VAR12:=SMA(VAR11,3,1){XG51};
主力出现:DRAWICON(CROSS(VAR11,VAR12) AND (VAR11<40),L*0.98,23){XG51};
A10:=HHV(H,73){XG51};
A11:=LLV(L,73){XG51};
M1:=MA(C,13){XG51};
M2:=MA(C,36){XG51};
M3:=MA(C,73){XG51};
K1:=(0.618*A10+0.382*A11),COLORCYAN{XG51};
K2:=(0.5*A10+0.5*A11),COLORCYAN{XG51};
K3:=(0.382*A10+0.618*A11),COLORCYAN{XG51};
K4:=(0.191*A10+0.809*A11),COLORWHITE{XG51};
K5:=(0.809*A10+0.191*A11),COLORWHITE{XG51};
牛:=V=HHV(V,64) AND V>REF(V,1)*1.5{XG51};
单阳:=C AND 牛{XG51};
单阳收:=C{XG51};
单阳开:=O{XG51};
高不破价:=REF(C,BARSLAST(单阳)){XG51};
前高:=HHV(高不破价,13){XG51};
STICKLINE(前高,高不破价,高不破价,5,0)DOTLINE,COLORYELLOW{XG51};
突破:=CROSS(C,前高) AND C>MA(C,36) AND (C-O)/O>0.030 AND MA(C,13)>REF(MA(C,13),1) AND C>K5{XG51};
DRAWTEXT(CROSS(C,前高) AND C>MA(C,36) AND (C-O)/O>0.035 AND MA(C,13)>REF(MA(C,13),1) AND MA(C,36)>REF(MA(C,36),1) ,L*1.00,'☆突') ,COLORLIMAGENTA{XG51};
DRAWTEXT(单阳 >REF(单阳,1) AND (C-O)/O>0.0455,L*1.00,'★追') ,COLORLIMAGENTA{XG51};
所属地域:DRAWTEXT_FIX(ISLASTBAR ,0.05,0.01,1,DYBLOCK),COLORBLUE{XG51};
所属行业:DRAWTEXT_FIX(ISLASTBAR ,0.06,0.01,0,HYBLOCK),COLORBLUE{XG51};
低:IF(CURRBARSCOUNT<=WH2+1,IF(L=LLV(L,P),L*0.98,DRAWNULL),DRAWNULL),COLORWHITE,CIRCLEDOT,LINETHICK6{XG51};
高:IF(CURRBARSCOUNT<=H2+1,IF(H=HHV(H,P),H*1.012,DRAWNULL),DRAWNULL),COLORCYAN,CIRCLEDOT,LINETHICK6{X+G.5?1+C+N+{};