通达信主力筹码趋向未加密选股指标公式源码

通达信主力筹码趋向未加密选股指标公式源码

源码正文：

VAR1:=1{XG51};
VAR3:=ma(CLOSE,13){XG51};
VAR4:=100-Abs((CLOSE-VAR3)/VAR3*100){XG51};
VAR5:=LLV(LOW,75){XG51};
VAR6:=HHV(HIGH,75){XG51};
VAR7:=(VAR6-VAR5)/100{XG51};
VAR8:=SMA((CLOSE-VAR5)/VAR7,20,1){XG51};
VAR9:=SMA((OPEN-VAR5)/VAR7,20,1){XG51};
VARA:=3*VAR8-2*SMA(VAR8,15,1){XG51};
VARB:=3*VAR9-2*SMA(VAR9,15,1){XG51};
VARC:=100-VARB{XG51};
主力筹码趋向: (100-VARA)*VAR1,COLOR0099FF{XG51};
VARD:=主力筹码趋向>VAR4{XG51};
VARE:=REF(LOW,1)*0.9{XG51};
VARF:=LOW*0.9{XG51};
VAR11:=ema(VARF,30){XG51};
VAR12:=CLOSE-REF(CLOSE,1){XG51};
VAR13:=MAX(VAR12,0){XG51};
VAR14:=ABS(VAR12){XG51};
VAR15:=SMA(VAR13,7,1)/SMA(VAR14,7,1)*100{XG51};
VAR16:=SMA(VAR13,13,1)/SMA(VAR14,13,1)*100{XG51};
VAR17:=BARSCOUNT(CLOSE){XG51};
VAR18:=SMA(MAX(VAR12,0),6,1)/SMA(ABS(VAR12),6,1)*100{XG51};
VAR19:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100{XG51};
VAR1A:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100{XG51};
VAR1B:=SMA((SMA(VAR1A,4,1)-50)*2,3,1){XG51};
VAR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100{XG51};
VAR1D:=SMA(VAR1C,4,1){XG51};
VAR1E:=SMA(VAR1D,3,1){XG51};
VAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100{XG51};
VAR20:=VAR18<=25 AND VAR19<-95 AND VAR1F>20 AND VAR1B<-30 AND VAR1E<30 AND VAR11-CLOSE>=-0.25 AND VAR15<22 AND VAR16<28 AND VAR17>50{XG51};
stICKLINE(VARD,VAR4,主力筹码趋向,1,0),COLOR0099FF{XG51};
STICKLINE(VAR20,0,80,1,0),COLORWHITE,LINETHICK3 {XG51};
主力做底轴线:95,COLORBLUE ,LINETHICK2 {XG51};
主力做大底轴线:100,COLORLIMAGENTA ,LINETHICK3 {XG51};
主力做顶轴线:0,COLORGREEN ,LINETHICK2 {XG51};
中线轴: 15,COLORRED ,LINETHICK2 {X-G^5.1-C-N-{};

通达信3背离主图未加密选股指标公式源码

源码正文：

A:=ma(CLOSE,17)+Abs(MA(CLOSE,17)-REF(MA(CLOSE,17),1)){XG51};
B:=MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1){XG51};
分水岭:IF(MA(CLOSE,17)<B,B,MA(CLOSE,17)),COLORBLUE,LINETHICK2{XG51};
操作线:分水岭-(ema(C,3)-分水岭),COLORCYAN,LINETHICK2{XG51};
PM:MA(C,5),COLORRED,LINETHICK2{XG51};
IF(PM>REF(PM,1),PM,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
IF(PM=REF(PM,1),PM,DRAWNULL),COLORWHITE{XG51};
IF(PM<REF(PM,1),PM,DRAWNULL),COLORFF9900,LINETHICK2{XG51};
S:=(PM>操作线){XG51};
DD:=分水岭<REF(分水岭,1){XG51};
IF(DD,分水岭,DRAWNULL),COLORBLUE,LINETHICK2{XG51};
IF(S,分水岭,DRAWNULL),COLORBLUE,POINTDOT,LINETHICK4{XG51};
DRAWICON(crOSS(分水岭,操作线),分水岭-0.1,1){XG51};
A1:=BArslAst(REF(CROSS("macd.dif","MacD.DEA"),1)){XG51};
B1:=REF(C,A1+1)>C AND REF("MACD.DIF",A1+1)<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA"){XG51};
DRAWTEXT(B1>0,L-0.02,'★M'),COLOR00FFFF{XG51};
A2:=BARSLAST(REF(CROSS("kdj.K","kdJ.D"),1)){XG51};
B2:=REF(C,A2+1)>C AND REF("KDJ.K",A2+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D"){XG51};
DRAWTEXT(B2,L-0.10,'◎K'),COLORFF00FF{XG51};
A3:=BARSLAST(REF(CROSS("rsi.RSI1","RSI.RSI2"),1)){XG51};
B3:=REF(C,A3+1)>C AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2"){XG51};
DRAWTEXT(B3>0,L-0.18,'◆R'),COLOR0000FF{XG51};
C1:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1)){XG51};
D1:=REF(C,C1+1)<C AND REF("MACD.DIF",C1+1)>"MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF"){XG51};
DRAWTEXT(D1>0,H+0.16,'★M'),COLOR00FF00{XG51};
C2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1)){XG51};
D2:=REF(C,C2+1)<C AND REF("KDJ.K",C2+1)>"KDJ.K" AND CROSS("KDJ.D","KDJ.K"){XG51};
DRAWTEXT(D2>0,H+0.08,'◎K'),COLORFFFFCC{XG51};
C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1)){XG51};
D3:=REF(C,C3+1)<C AND REF("RSI.RSI1",C3+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1"){XG51};
DRAWTEXT(D3>0,H+0.04,'◆R'),COLORFF9900;{XG51};
A1A:=EMA(CLOSE, 9){XG51};
A1B:=((A1A - EMA(CLOSE, 5)) < 0){XG51};
A1C:=((A1A - EMA(CLOSE, 5)) > 0){XG51};
A1D:=BARSLAST(A1B){XG51};
A1E:=BARSLAST(A1C){XG51};
A1F:=IF((A1E > 0),(CLOSE - REF(CLOSE, 1)) / REF(CLOSE, 1) * 100,0){XG51};
A20:=SUM(A1F,0){XG51};
A21:=IF((A1D > 0),(0 - 2),0){XG51};
A25:=EMA(EMA(EMA(CLOSE, 3), 3), 3){XG51};
多方:=((A25 - REF(A25, 1)) + A25)COLOR0000FF,LINETHICK2{XG51};
空方:=MA(多方, 15)COLORFF49FF{XG51};
DRAWTEXT(CROSS(多方,空方),空方 * 0.99,'↑买')COLOR0000FF{XG51};
DRAWICON(((REF(A21, 1) = (0 - 2)) AND (A21 = 0)),LOW, 5){XG51};
AAA:=(3*C+H+L+O)/6{XG51};
短线:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36,COLORWHITE,LINETHICK2{XG51};
中线:=MA(MA(C,18),5),LINETHICK1{XG51};
DRAWICON(REF(C,1)<中线 AND C>中线,L*0.98,5){XG51};
EMA13:=EMA(C,13),COLORRED{XG51};
EMA21:=EMA(C,21),COLORBLUE{XG51};
EMA34:=EMA(C,34),COLORFF00FF{XG51};
EMA60:=MA(C,60),COLORFFCC66{XG51};
VAR200:=(2*CLOSE+HIGH+LOW)/4{XG51};
VAR300:=IF(YEAR>=2099 AND MONTH>2,0,1){XG51};
VAR400:=LLV(LOW,5); VAR500:=HHV(HIGH,4){XG51};
散户:=EMA((VAR200-VAR400)/(VAR500-VAR400)*100,4)*VAR300{XG51};
庄家:=EMA(0.667*REF(散户,1)+0.333*散户,2)*VAR300{XG51};
DRAWTEXT(vol=HHV(VOL,20),C ,'------------------------------------------------------------'),COLOR808080{XG51};
DRAWTEXT(CROSS(散户,庄家) AND 散户<30,L-0.05,'←低吸'),COLORLICYAN{XG51};
DRAWTEXT(CROSS(庄家,散户) AND 散户>70,H+0.05,'←高抛'),COLORCYAN{XG51};
DRAWICON(CROSS(散户,庄家) AND 散户<30,L-0.05,1){XG51};
DRAWICON(CROSS(庄家,散户) AND 散户>70,H+0.05,2){XG51};
VAR900:=CLOSE-REF(CLOSE,5){XG51};
VARA00:=EMA(EMA(VAR900,5),5)/EMA(EMA(ABS(VAR900),5),5){XG51};
VARC00:=EMA(EMA(VAR900,20),20)/EMA(EMA(ABS(VAR900),20),20){XG51};
卖出:=IF(VARA00>0 AND CROSS(VARC00,VARA00),90,100){XG51};
DRAWICON(卖出<0,H+0.05,2); 买线:=EMA(CLOSE,2){XG51};
卖线:=EMA(SLOPE(CLOSE,21)*20+CLOSE,42){XG51};
B1Q:IF(CROSS(买线,卖线),L-0.02,DRAWNULL),CROSSDOT,LINETHICK3,COLORLIMAGENTA{XG51};
S1:IF(CROSS(80,RSI)*30,H+0.02,DRAWNULL),CROSSDOT,LINETHICK3,COLORBLUE{XG51};
VC:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100+(CLOSE-MA (CLOSE,32))/MA(CLOSE,32)*100)/3{XG51};
S2:=IF(VC>20 AND FILTER(VC< REF(VC,1),5),H+0.02,DRAWNULL),CIRCLEDOT,LINETHICK3,COLORCYAN{XG51};
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2){XG51};
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2){XG51};
VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1{XG51};
VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD{XG51};
DRAWTEXT(FILTER(VAR19=1,5),LOW,' '),COLORFF00FF{XG51};
DRAWICON(FILTER(VAR19=1,5),LOW,9){XG51};
DRAWTEXT(FILTER(VAR1A=1,5),HIGH,' '),COLOR00FF00{XG51};
DRAWICON(FILTER(VAR1A=1,5),HIGH,15){XG51};
BL:=VOL>=REF(V,1)*1.91 AND C>REF(C,1)*1.01{XG51};
DRAWTEXT(FILTER(BL,3),(LOW * 0.97),'倍量')COLORBLUE{X-G~5*1-C-N-{};