通达信笑脸红钻分时主图未加密选股指标公式源码

通达信笑脸红钻分时主图未加密选股指标公式源码

源码正文：

A1:=(vol/CLOSE)/3{XG51};
A2:=SUM((IF(((A1>40) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0){XG51};
A3:=SUM((IF(((A1>40) AND (CLOSE<(REF(CLOSE,1)))),A1,0)),0){XG51};
A4:=SUM((IF(((A1<40) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0){XG51};
A5:=SUM((IF(((A1<40) AND (CLOSE<(REF(CLOSE,1)))),A1,0)),0){XG51};
A6:=((A2+A3)+A4)+A5{XG51};
A7:=IF((BARstATUS=2),((100*A2)/A6),0){XG51};
A8:=((IF((BARSTATUS=2),((100*A3)/A6),0))){XG51};
A9:=((IF((BARSTATUS=2),((100*A4)/A6),0))){XG51};
A10:=((IF((BARSTATUS=2),((100*A5)/A6),0))){XG51};
机构买盘:=(A2),LINETHICK2{XG51};
机构卖盘:=(A3),LINETHICK2{XG51};
散户买盘:=(A4){XG51};
散户卖盘:=(A5){XG51};
DRAWTEXT_FIX(1,0.000,1-0.05,0,STRCAT(STRCAT('【机构买盘】',CON2STR(机构买盘,2)),'万')),COLORWHITE{XG51};
DRAWTEXT_FIX(1,0.250,1-0.05,0,STRCAT(STRCAT('【机构卖盘】',CON2STR(机构卖盘,2)),'万')),COLOR00FF00{XG51};
DRAWTEXT_FIX(1,0.500,1-0.05,0,STRCAT(STRCAT('【散户买盘】',CON2STR(散户买盘,2)),'万')),COLORWHITE{XG51};
DRAWTEXT_FIX(1,0.745,1-0.05,0,STRCAT(STRCAT('【散户卖盘】',CON2STR(散户卖盘,2)),'万')),COLOR00FF00{XG51};
突破:=REF(ema(C,14),1){XG51};
A1X:=(Ema(C,10)-突破)/突破*100{XG51};
多方:=IF(A1X>=0,REF(EMA(C,10),BArslAST(crOSS(A1X,0))+1),DRAWNULL){XG51};
空方:=IF(A1X<0,REF(EMA(C,10),BARSLAST(CROSS(0,A1X))+1),DRAWNULL){XG51};
STICKLINE(A1X>=0,多方,突破,0,0),COLOR000099{XG51};
STICKLINE(A1X<0,空方,突破,0,0),COLOR00CC66{XG51};
最新:CLOSE,LINETHICK1,COLORRED{XG51};
AA:=SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C)){XG51};
BB:=BETWEEN(C/AA,C+H,C-H){XG51};
DRAWTEXT( ISLASTBAR AND 最新>REF(最新,1),最新,STRCAT(' 涨▲',CON2STR(最新,2))),COLORLIMAGENTA{XG51};
DRAWTEXT( ISLASTBAR AND 最新<REF(最新,1),最新,STRCAT(' 跌▼',CON2STR(最新,2))),COLOR00FF00{XG51};
DRAWTEXT_FIX(1,0.880,1-0.97,0,DYBLOCK),COLORRED{XG51};
DRAWTEXT_FIX(1,0.940,1-0.97,0,HYBLOCK),COLORBLUE{XG51};
均价:SUM(C*V,240)/SUM(V,240),COLORBLUE,LINETHICK1{XG51};
DXJP:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,21)-LLV(LOW,34))*100{XG51};
FSZX:=(EMA(DXJP,3)-50)*2,COLORBROWN{XG51};
BGTYU:=IF(DATE<=1150530,1,0){XG51};
GHYJKU:=BETWEEN((DCLOSE*BGTYU)/(SUM(AMOUNT,BARSCOUNT((DCLOSE*BGTYU)))/SUM(VOL*100,BARSCOUNT((DCLOSE*BGTYU)))),1.05,0.95){XG51};
VBNH:=IF(GHYJKU=0,MA((DCLOSE*BGTYU),BARSCOUNT((DCLOSE*BGTYU))),(SUM(AMOUNT,BARSCOUNT((DCLOSE*BGTYU)))/SUM(VOL*100,BARSCOUNT((DCLOSE*BGTYU))))){XG51};
DRAWICON(FSZX<=-95,C,38){XG51};
DRAWTEXT(CROSS(expma((DCLOSE/VBNH),20),1.04),C,'板'),COLORGREEN{XG51};
DRAWTEXT(CROSS(EXPMA((DCLOSE/VBNH),20),1.02),C,'追'),COLORBLUE{XG51};
DRAWICON(CROSS(EXPMA((DCLOSE/VBNH),120),1.004),C,17){XG51};
H1:=MAX(DYNAINFO(3),DYNAINFO(5)){XG51};
L1:=MIN(DYNAINFO(3),DYNAINFO(6)){XG51};
P1:=H1-L1{XG51};
阻力:=L1+P1*7/8,COLORCYAN{XG51};
支撑:=L1+P1*0.5/8,COLORLIMAGENTA{XG51};
DRAWICON(LONGCROSS(支撑,C,2),C,5){XG51};
DRAWICON(LONGCROSS(C,阻力,2),C,6){XG51};
VARJ1:=EMA(EMA(CLOSE,13),13){XG51};
控盘2:=(VARJ1-REF(VARJ1,1))/REF(VARJ1,1)*1000{XG51};
STJ01:=控盘2<REF(控盘2,1) AND 控盘2>0.5{XG51};
STJ02:=控盘2>0{XG51};
BTJ2:=控盘2>REF(控盘2,1) AND 控盘2<-0.2{XG51};
BTJ22:=控盘2>REF(控盘2,1) AND 控盘2<0 {XG51};
JJ:=DYNAINFO(11){XG51};
P:=55;S:=8;M1:=3{XG51};
能量:=(EMA(CLOSE,S)-EMA(C,P))*10{XG51};
空头:=EMA(能量,M1),COLOR00FF00{XG51};
BTJ1:=(CLOSE-JJ)/JJ<-0.005{XG51};
BTJ11:=(CLOSE-JJ)/JJ<-0.03{XG51};
BTJ12:=COUNT(JJ>=REF(JJ,1),5)>=4 AND (CLOSE-JJ)/JJ<0.005{XG51};
STJ1:=(C-JJ)/JJ>0.005{XG51};
BTJ3:=CROSS(能量,空头) AND 能量<-0.3{XG51};
BTJ32:=CROSS(能量,空头) AND 能量<-0.1{XG51};
STJ31:=CROSS(空头,能量){XG51};
STJ32:=CROSS(空头,能量) AND 能量>1.618{XG51};
A:=8{XG51};
BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,A){XG51};
BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,A){XG51};
BTJ82:=FILTER(BTJ12 AND BTJ22 AND BTJ32,A){XG51};
时长:=IF(HOUR>=9 AND HOUR<14 ,1,0){XG51};
捡钱:=BTJ811 AND TIME>15 AND 时长{XG51};
DRAWICON(捡钱,C,27){XG51};
AYGB1:=(DVOL/C)/2,NODRAW{XG51};
AYGB2:=SUM(IF(AYGB1>100 AND CLOSE>REF(CLOSE,1),AYGB1,0),0){XG51};
AYGB3:=SUM(IF(AYGB1>100 AND CLOSE<REF(CLOSE,1),AYGB1,0),0){XG51};
AYGB4:=SUM(IF(AYGB1<100 AND CLOSE>REF(CLOSE,1),AYGB1,0),0){XG51};
AYGB5:=SUM(IF(AYGB1<100 AND CLOSE<REF(CLOSE,1),AYGB1,0),0){XG51};
AYGB6:=AYGB2+AYGB3+AYGB4+AYGB5{XG51};
机买:=(AYGB2/AYGB6)*100-100,LINETHICK1,COLORWHITE{XG51};
机卖:=(AYGB3/AYGB6)*100-100,LINETHICK1,COLORCYAN{XG51};
主力差:=机买-机卖{XG51};
LQH:=主力差>0 AND REF(主力差,1)<=0{XG51};
DRAWICON(LQH,C,25){XG51};
JJXX:=IF(BETWEEN(C/(SUM(AMOUNT,0)/SUM(VOL*100,0)),1.05,0.95)=0,MA(C,0),(SUM(AMOUNT,0)/SUM(VOL*100,0))),COLORBLUE{XG51};
JJXXH:=(JJXX*1.007 ),COLORFF6600{XG51};
FFLL:=SUM(VOL,6)>REF(MA(VOL,30),1)*10{XG51};
HHPP:=((HHV(CLOSE,BARSCOUNT(CLOSE))-LLV(CLOSE,BARSCOUNT(CLOSE)))/CLOSE)<1{XG51};
HHZZ:=HHPP AND FFLL AND (C>JJXXH){XG51};
TTPP2:=FILTER(HHZZ,100){XG51};
DRAWICON(TTPP2,C,26){XG51};
ZS:=DYNAINFO(3){XG51};
KP:=DYNAINFO(4){XG51};
ZX:=DYNAINFO(7){XG51};
ZG:=DYNAINFO(5){XG51};
ZD:=DYNAINFO(6){XG51};
MA5:='FSKY.MA5#DAY'{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.9,1-0.2,0,STRCAT('A5 : ',CON2STR(MA5,2))),COLORRED{XG51};
MA10:='FSKY.MA10#DAY'{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.9,1-0.15,0,STRCAT('A10 : ',CON2STR(MA10,2))),COLORRED{XG51};
MA20:='FSKY.MA20#DAY'{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.9,1-0.1,0,STRCAT('A20 : ',CON2STR(MA20,2))),COLORRED{XG51};
MA60:='FSKY.MA60#DAY'{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.9,1,0,STRCAT('A60 : ',CON2STR(MA60,2))),COLORRED{XG51};
分时均价线:SUM(C*V,240)/SUM(V,240),COLORBLUE{XG51};
昨高:='FSKY.ZH#DAY'{XG51};
昨低:='FSKY.ZL#DAY'{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.9,1-0.25,0,STRCAT('昨低 : ',CON2STR(昨低,2))),COLORRED{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.9,1-0.3,0,STRCAT('昨高 : ',CON2STR(昨高,2))),COLORRED{X.G=5_1.C.N.{};

通达信暴风控盘高抛低吸未加密选股指标公式源码

源码正文：

转折周期:=7;转折灵敏:=50;筹码周期:=17{XG51};
A:=(3*C+L+O+H)/6{XG51};
X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+
14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+
REF(A,20))/210{XG51};
主力成本:ema(X,13),NODRAW,COLORAAAAFF{XG51};
短期支撑:LLV(HIGH,30),NODRAW,COLORAAAAFF{XG51};
获利盘:100*WINNER(C),NODRAW,COLORAAAAFF{XG51};
筹码重心:(HHV(获利盘,筹码周期)+LLV(获利盘,筹码周期))/2,COLORAAAAFF{XG51};
TTR:=SMA(maX(MAX(HIGH-LOW,Abs(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),转折周期,1){XG51};
HD:=HIGH-REF(HIGH,1){XG51};
LD:=REF(LOW,1)-LOW{XG51};
DMP:=SMA(IF(HD>0 AND HD>LD,HD,0),转折周期,1){XG51};
DMM:=SMA(IF(LD>0 AND LD>HD,LD,0),转折周期,1){XG51};
正DI:=DMP*100/TTR,COLORWHITE{XG51};
负DI:=DMM*100/TTR,COLORCYAN{XG51};
转折点:SMA(ABS(负DI-正DI)/(负DI+正DI)*100,转折周期,1),COLORFF00FF,LINETHICK2{XG51};
换手率:vol/CAPITAL*100,NODRAW,COLORFF8888{XG51};
五日均换手率:SUM(100*V/CAPITAL,5)/5,NODRAW,COLORAAAAFF{XG51};
十日均换手率:SUM(100*V/CAPITAL,10)/10,NODRAW,COLORAAAAFF{XG51};
ADXR:=(转折点+REF(转折点,6))/2,COLOR66FF66{XG51};
转折点A:=FILTER(转折点<REF(转折点,1)-1.3 AND EVERY(REF(转折点,1)>=REF(转折点,2)-1.3,5) AND REF(转折点,1)>转折灵敏,5){XG51};
转折点B:=FILTER(转折点<REF(转折点,1)-1.3 AND EVERY(REF(转折点,1)>=REF(转折点,2)-1.3,5) AND REF(转折点,1)>转折灵敏,5){XG51};
转折点C:=FILTER(转折点<REF(转折点,1)-1 AND EVERY(REF(转折点,1)>=REF(转折点,2)-1,3) AND REF(转折点,1)<=转折灵敏 AND REF(转折点,1)>=21,3){XG51};
转折点D:=FILTER(转折点<REF(转折点,1)-1 AND EVERY(REF(转折点,1)>=REF(转折点,2)-1,3) AND REF(转折点,1)<=转折灵敏 AND REF(转折点,1)>=21,3){XG51};
B1:=SMA(SMA(SMA(MA(C,1),2,1),2,1),2,1){XG51};
停损线:=IF(LLV(MA(B1,8),3)<B1,LLV(MA(B1,8),3),B1){XG51};
操盘线:=HHV(MA(B1,1),13),COLORWHITE,LINETHICK3{XG51};
stICKLINE(筹码重心>25,25,筹码重心,0,0),COLOR2222FF{XG51};
STICKLINE(筹码重心<25,25,筹码重心,0,0),COLORFFFF55{XG51};
ISBUY:=IF (BArslAST(crOSS(C,操盘线))>BARSLAST(CROSS(停损线,C)),0,1){XG51};
ISSEL:=IF (BARSLAST(CROSS(C,操盘线))>BARSLAST(CROSS(停损线,C)),1,0){XG51};
STICKLINE(转折点A AND REF(正DI>负DI,1),0,100,0,-1),COLORCYAN{XG51};
DRAWTEXT (转折点A AND REF(正DI>负DI,1),90,'止盈'),COLORCYAN{XG51};
STICKLINE(转折点B AND REF(正DI<负DI,1),0,100,0,-1),COLOR8888FF{XG51};
DRAWTEXT (转折点B AND REF(正DI<负DI,1),15,'建仓'),COLORFF88FF{XG51};
STICKLINE(转折点C AND REF(正DI>负DI,1),62,70,1,0),COLORCYAN{XG51};
DRAWTEXT (转折点C AND REF(正DI>负DI,1),70,' 减'),COLORCYAN{XG51};
STICKLINE(转折点D AND REF(正DI<负DI,1),27,35,1,0),COLOR8888FF{XG51};
DRAWTEXT (转折点D AND REF(正DI<负DI,1),35,' 吸'),COLORFF88FF{XG51};
STICKLINE(ISBUY,0,-7,5,0),COLOR6666FF{XG51};
STICKLINE(ISSEL,0,-7,5,0),COLORFFFF33{XG51};
STICKLINE(获利盘<=1,-6,-1,2.5,0),COLORYELLOW{XG51};
STICKLINE(获利盘>=99,-6,-1,2.5,0),COLORWHITE{XG51};
0,COLORFF8888,LINETHICK2{XG51};
25,COLOR9966FF,LINETHICK2{XG51};
100,COLOR88FF88,LINETHICK2{XG51};
量:=IF(C>200,VOL/1000000,VOL/1),LINETHICK0,COLOREEEEFF{XG51};
地量:=换手率<1,COLORFF6600{XG51};
低靡:=C=C AND 换手率>=1 AND 换手率<2,COLOR008364{XG51};
温和:=C=C AND 换手率>=2 AND 换手率<3,COLORFFFFFF{XG51};
活跃:=C=C AND 换手率>=3 AND 换手率<5,COLOR208FFF{XG51};
带量:=C=C AND 换手率>=5 AND 换手率<8,COLORBLUE{XG51};
放量:=C=C AND 换手率>=8 AND 换手率<15,COLORFF00FF{XG51};
巨量:=C=C AND 换手率>=15 AND 换手率<25,COLORWHITE{XG51};
怪异:=C=C AND 换手率>=25,COLORE66878{XG51};
DRAWTEXT(地量 AND ISLASTBAR AND PERIOD=5,80,'成交地量'),COLORFF6600{XG51};
DRAWTEXT(低靡 AND ISLASTBAR AND PERIOD=5,80,'成交低靡'),COLOR008364{XG51};
DRAWTEXT(温和 AND ISLASTBAR AND PERIOD=5,80,'成交温和'),COLORFFFFFF{XG51};
DRAWTEXT(活跃 AND ISLASTBAR AND PERIOD=5,80,'成交活跃'),COLOR208FFF{XG51};
DRAWTEXT(带量 AND ISLASTBAR AND PERIOD=5,80,'成交带量'),COLORBLUE{XG51};
DRAWTEXT(放量 AND ISLASTBAR AND PERIOD=5,80,'成交放量'),COLORFF00FF{XG51};
DRAWTEXT(巨量 AND ISLASTBAR AND PERIOD=5,80,'成交巨量'),COLORWHITE{XG51};
DRAWTEXT(怪异 AND ISLASTBAR AND PERIOD=5,80,'成交怪异'),COLORE66878{XG51};
VVOL:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW{XG51};
V换手率:=VVOL/CAPITAL*100,NODRAW,COLORBLUE{XG51};
V地量:=V换手率<1,COLORFF6600{XG51};
V低靡:=C=C AND V换手率>=1 AND V换手率<2,COLOR008364{XG51};
V温和:=C=C AND V换手率>=2 AND V换手率<3,COLORFFFFFF{XG51};
V活跃:=C=C AND V换手率>=3 AND V换手率<5,COLOR208FFF{XG51};
V带量:=C=C AND V换手率>=5 AND V换手率<8,COLORBLUE{XG51};
V放量:=C=C AND V换手率>=8 AND V换手率<15,COLORFF00FF{XG51};
V巨量:=C=C AND V换手率>=15 AND V换手率<25,COLORWHITE{XG51};
V怪异:=C=C AND V换手率>=25,COLORE66878{XG51};
DRAWTEXT(V地量 AND ISLASTBAR AND FROMOPEN<240 AND FROMOPEN>5 AND PERIOD=5,70,'预测地量'),COLORFF6600{XG51};
DRAWTEXT(V低靡 AND ISLASTBAR AND FROMOPEN<240 AND FROMOPEN>5 AND PERIOD=5,70,'预测低靡'),COLOR008364{XG51};
DRAWTEXT(V温和 AND ISLASTBAR AND FROMOPEN<240 AND FROMOPEN>5 AND PERIOD=5,70,'预测温和'),COLORFFFFFF{XG51};
DRAWTEXT(V活跃 AND ISLASTBAR AND FROMOPEN<240 AND FROMOPEN>5 AND PERIOD=5,70,'预测活跃'),COLOR208FFF{XG51};
DRAWTEXT(V带量 AND ISLASTBAR AND FROMOPEN<240 AND FROMOPEN>5 AND PERIOD=5,70,'预测带量'),COLORBLUE{XG51};
DRAWTEXT(V放量 AND ISLASTBAR AND FROMOPEN<240 AND FROMOPEN>5 AND PERIOD=5,70,'预测放量'),COLORFF00FF{XG51};
DRAWTEXT(V巨量 AND ISLASTBAR AND FROMOPEN<240 AND FROMOPEN>5 AND PERIOD=5,70,'预测巨量'),COLORWHITE{XG51};
DRAWTEXT(V怪异 AND ISLASTBAR AND FROMOPEN<240 AND FROMOPEN>5 AND PERIOD=5,70,'预测怪量'),COLORE66878{XG51};
个股6日:=(C-MA(C,6))/MA(C,6){XG51};
个股12日:=(C-MA(C,12))/MA(C,12){XG51};
个股24日:=(C-MA(C,24))/MA(C,24){XG51};
大盘6日:=(INDEXC-MA(INDEXC,6))/MA(INDEXC,6){XG51};
大盘12日:=(INDEXC-MA(INDEXC,12))/MA(INDEXC,12){XG51};
大盘24日:=(INDEXC-MA(INDEXC,24))/MA(INDEXC,24){XG51};
大盘:=(大盘6日 + 大盘12日 + 大盘24日)/3{XG51};
个股:=(个股6日 + 个股12日 + 个股24日)/3{XG51};
DRAWTEXT(个股>大盘 AND ISLASTBAR,60,'强于大盘'),COLORBLUE{XG51};
DRAWTEXT(个股<大盘 AND ISLASTBAR,60,'弱于大盘'),COLORCYAN{XG51};
DRAWTEXT(个股>0 AND ISLASTBAR,50,'走势较强'),COLORBLUE{XG51};
DRAWTEXT(个股<0 AND ISLASTBAR,50,'走势较弱'),COLORCYAN{XG51};
DRAWICON(换手率<五日均换手率*0.6 AND ("kdJ.J"<0 OR REF("KDJ.J",1)<0),5,9){XG51};
DRAWICON((LLV(H,3)-C)/C<0.03 AND (HHV(L,3)-H)/H<0.05
AND 换手率<五日均换手率*0.55 AND "KDJ.J"<70 AND REF("KDJ.J">=0,1) AND "KDJ.J">=0
AND ABS(REF("KDJ.J",1)-REF("KDJ.K",1))>=12,5,11){X_G~5-1_C_N_{};