通达信优化跟庄买卖未加密选股指标公式源码

通达信优化跟庄买卖未加密选股指标公式源码

源码正文：

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>28,28,VARG){XG51};
吸筹:stICKLINE(VARH>-120,0,VARH,6,1),COLOR0FFFFF{XG51};
备钱:IF(吸筹,1,0),COLOR0FFFFF{XG51};
RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100){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};
买入时机: IF(crOSS(J,3),65,0),COLORFF00FF,LINETHICK1{XG51};
DRAWTEXT(买入时机,70.1,' 跟庄'),COLOR00FF00{XG51};
VA:=(2*C+H+L)/4{XG51};
VB:=LLV(L,5){XG51};
VC:=HHV(H,5){XG51};
红线上穿买:EMA((VA-VB)/(VC-VB)*100,5),COLORWHITE{XG51};
红线下穿卖:EMA(红线上穿买,3),COLORFFFF00{XG51};
趋势:3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1),COLOR00FFFF{XG51};
秘密买点: IF(趋势<=3,20,0),COLOR00FF00,LINETHICK3{XG51};
机构建仓: IF(趋势<5,40,0),COLORFFFFFF,LINETHICK3{XG51};
R9:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100){XG51};
K9:=EMA(R9,3){XG51};
D9:=EMA(K9,3){XG51};
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1){XG51};
N:=IF((陡峭度 > 0.35),6,65){XG51};
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110)){XG51};
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110)){XG51};
获利盘:=(WINNER(CLOSE))*(100){XG51};
获利线:=FORCAST(获利盘,7){XG51};
线:=(FORCAST(VAR1A,7))*((DATE < 30070110)){XG51};
轻仓:=IF((获利盘 >= 60) AND (线 > REF(线,1)) AND (REF(线,1) < 20) AND (线 < 40) AND (COUNT((线 > REF(线,1)),5) = 1) AND (REF(N,1) = 6),1,0){XG51};
出击:=CROSS(线,20) AND IF((COUNT(CROSS(K,D),3) = 1) AND (D < 40),1,(线 > D) OR (K > D) AND (D < 60)) AND IF((N = 6),(获利盘 < 70),(获利盘 < 40)) AND (COUNT((获利线 > 20),20) > 0){XG51};
进一:=CROSS(线,D) AND (D > 30) AND (D > REF(D,1)) AND (D < 80){XG51};
进二:=CROSS(线,获利线) AND (D > 30) AND (获利线 > 25) AND (D > REF(D,1)){XG51};
((线 > REF(线,1)) AND (线 < 25) AND (COUNT((线 > REF(线,1)),5) = 1) AND IF((N = 6),(获利盘 < 60),(获利盘 < 40)) AND (COUNT((获利线 > 20),20) > 0))*(40),COLORWHITE,LINETHICK3{X*G_5~1*C*N*{};

通达信资金分析优化主图未加密选股指标公式源码

源码正文：

DRAWGBK(C>0, RGB(0,10,10),RGB(88,0,0),0,'24',0){XG51};
DRAWNUMBER(ISLAstBAR,C,C),COLORmaGENTA{XG51};
MA5:MA(CLOSE,5),COLORFFFFFF{XG51};
MA17:MA(CLOSE,17),COLORBLUE{XG51};
MA55:MA(CLOSE,55),COLORLIMAGENTA{XG51};
MA72:MA(CLOSE,72),COLORCYAN{XG51};
MA200:MA(CLOSE,200),COLORE67010{XG51};
DRAWKLINE(HIGH, OPEN,LOW, CLOSE){XG51};
射线3X: DRAWLINE(L=LLV(L,3),L,H=HHV(H,3),L,0),COLORBLACK{XG51};
射线5: DRAWLINE(H=HHV(H,5),H,L=LLV(L,5),L,0),COLORBLACK{XG51};
射线5X: DRAWLINE(L=LLV(L,5),L,H=HHV(H,5),L,0),COLORBLACK{XG51};
射线7: DRAWLINE(H=HHV(H,7),H,L=LLV(L,7),L,0),COLORE67010{XG51};
射线7X: DRAWLINE(L=LLV(L,7),L,H=HHV(H,7),L,0),COLORE67010{XG51};
射线10:DRAWLINE(H=HHV(H,10),H,L=LLV(L,10),L,0),COLOR0000FF{XG51};
射线10X:DRAWLINE(L=LLV(L,10),L,H=HHV(H,10),L,0),COLOR0000FF{XG51};
涨幅大于9.94:=C/REF(C,1)>1.09{XG51};
超B:=L2_AMO(0,2)/10000.0{XG51};
大B:=L2_AMO(1,2)/10000.0{XG51};
中B:=L2_AMO(2,2)/10000.0{XG51};
小B:=L2_AMO(3,2)/10000.0{XG51};
超S:=-L2_AMO(0,3)/10000.0{XG51};
大S:=-L2_AMO(1,3)/10000.0{XG51};
中S:=-L2_AMO(2,3)/10000.0{XG51};
小S:=-L2_AMO(3,3)/10000.0{XG51};
净流入亿:((超B+大B+中B+小B)+(超S+大S+中S+小S))/100,COLORGREEN,NODRAW{XG51};
中单:(中B+中S)/100,COLORBLACK,NODRAW{XG51};
大宗净入:=((超B+大B)+(超S+大S))/100{XG51};
超大单:=((超B)+(超S))/100{XG51};
大单:=((大B)+(大S))/100{XG51};
小单:=((小B)+(小S))/100{XG51};
大宗进:=((超B)+(大B))/100{XG51};
大宗出:=((超S)+(大S))/100{XG51};
非大宗进:=((中B)+(小B))/100{XG51};
非大宗出:=((中S)+(小S))/100{XG51};
资金净入:=((超B+大B+中B+小B)+(超S+大S+中S+小S))/100{XG51};
净入5日:=SUM(资金净入,5){XG51};
净入10日:=SUM(资金净入,10){XG51};
主力资金线:=(L2_AMO(0,0)+L2_AMO(1,0)-L2_AMO(0,1)-L2_AMO(1,1))/100.0,LINETHICK2{XG51};
主力买力度:=LARGEINTRDvol*100/VOL{XG51};
主力卖力度:=LARGEOUTTRDVOL*100/VOL{XG51};
AA:=CONST(MAX(Abs(净流入亿),MAX(ABS(大宗净入),MAX(ABS(大宗进),MAX(ABS(大宗出),MAX(ABS(非大宗进),ABS(非大宗出)))))))*3,NODRAW{XG51};
DRAwrECTREL(0,CONST(830-(ABS(净流入亿)*500/AA)),30,945,IF(CONST(净流入亿)>0,RGB(250,150,10),RGB(0,100,100))){XG51};
DRAWRECTREL(35,CONST(830-(ABS(大宗净入)*500/AA)),65,945,IF(CONST(大宗净入)>0,RGB(250,150,10),RGB(0,100,100))){XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.000,0.88,0,INTPART(净流入亿)),COLORRED{XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.034,0.88,0,INTPART(大宗净入)),COLORRED{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.000,1,0,'净流入'),COLORRED{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.034,1,0,'净大宗'),COLORRED{XG51};
DRAWRECTREL(77,CONST(830-(ABS(大宗进)*500/AA)),97,945,IF(CONST(大宗进)>0,RGB(255,0,0),RGB(0,0,255))){XG51};
DRAWRECTREL(99,CONST(830-(ABS(大宗出)*500/AA)),119,945,IF(CONST(大宗出)<0,RGB(0,0,255),RGB(0,0,255))){XG51};
DRAWRECTREL(127,CONST(830-(ABS(非大宗进)*500/AA)),147,945,IF(CONST(非大宗进)>0,RGB(139,0,139),RGB(23,155,255))){XG51};
DRAWRECTREL(149,CONST(830-(ABS(非大宗出)*500/AA)),169,945,IF(CONST(非大宗出)<0,RGB(23,155,255),RGB(139,0,139))){XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.077,1,0,'主力进出'),COLORRED{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.128,1,0,'散户进出'),COLORRED{XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.077,0.88,0,INTPART(大宗进)),COLORRED{XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.097,0.88,0,INTPART(大宗出)),COLORRED{XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.126,0.88,0,INTPART(非大宗进)),COLORRED{XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.149,0.88,0,INTPART(非大宗出)),COLORRED{XG51};
AAB:=CONST(MAX(ABS(超大单),MAX(ABS(大单),MAX(ABS(中单),ABS(小单))))),NODRAW{XG51};
DRAWRECTREL(0,CONST(830-(ABS(超大单)*500/AAB))/2,15,460,IF(CONST(超大单)>0,RGB(255,0,255),RGB(23,155,255))){XG51};
DRAWRECTREL(17,CONST(830-(ABS(大单)*500/AAB))/2,32,460,IF(CONST(大单)>0,RGB(255,0,255),RGB(23,155,255))){XG51};
DRAWRECTREL(34,CONST(830-(ABS(中单)*500/AAB))/2,49,460,IF(CONST(中单)>0,RGB(255,0,255),RGB(23,155,255))){XG51};
DRAWRECTREL(51,CONST(830-(ABS(小单)*500/AAB))/2,66,460,IF(CONST(小单)>0,RGB(255,0,255),RGB(23,155,255))){XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.000,0.460,0,'超 大 中 散'),COLORRED{XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.000,0.400,0,INTPART(超大单)),COLORRED{XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.017,0.400,0,INTPART(大单)),COLORRED{XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.034,0.400,0,INTPART(中单)),COLORRED{XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.051,0.400,0,INTPART(小单)),COLORRED{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0,0,'【资金分析￥百万元】'),COLORRED{XG51};
Aac:=CONST(MAX(ABS(净入5日),ABS(净入10日))),NODRAW{XG51};
DRAWRECTREL(78,CONST(830-(ABS(净入5日)*500/AAC))/2,110,460,IF(CONST(净入5日)>0,RGB(250,150,10),RGB(23,133,255))){XG51};
DRAWRECTREL(116,CONST(830-(ABS(净入10日)*500/AAC))/2,148,460,IF(CONST(净入10日)>0,RGB(250,150,10),RGB(23,133,255))){XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.078,0.400,0,INTPART(净入5日)),COLORRED{XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.115,0.400,0,INTPART(净入10日)),COLORRED{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.075,0.460,0,'流入5日 流入10日'),COLORRED{XG51};
ddx:=(LARGEINTRDVOL-LARGEOUTTRDVOL)*1000/FINANCE(7){XG51};
DDY:=IF(TRADENUM>0,(TRADEOUTNUM-TRADEINNUM)*100/TRADENUM,0){XG51};
DDZ:=IF(TRADENUM>0,(LARGETRDINNUM-LARGETRDOUTNUM)/TRADENUM*100,0){XG51};
DRAWRECTREL(118,0,165,40,IF(CONST(DDX)>0,RGB(255,0,0),RGB(0,50,0))){XG51};
DRAWRECTREL(118,45,165,85,IF(CONST(DDY)>0,RGB(255,0,0),RGB(0,50,0))){XG51};
DRAWRECTREL(118,90,165,130,IF(CONST(DDZ)>0,RGB(255,0,0),RGB(0,50,0))){XG51};
DRAWTEXT_FIX(1,0.123,0.00,0,STRCAT('DDX:',CON2STR(DDX,0))),COLORBLUE,COLORRED{XG51};
DRAWTEXT_FIX(1,0.123,0.04,0,STRCAT('DDY:',CON2STR(DDY,0))),COLORBLUE,COLORRED{XG51};
DRAWTEXT_FIX(1,0.123,0.09,0,STRCAT('DDZ:',CON2STR(DDZ,0))),COLORBLUE,COLORRED{XG51};
AAD:=CONST(MAX(ABS(主力买力度),ABS(主力卖力度)))*4,NODRAW{XG51};
DRAWRECTREL(0,515,CONST(ABS(主力买力度)*500/AAD),568,IF(CONST(主力买力度)>0,RGB(139,0,139),RGB(0,255,255))){XG51};
DRAWRECTREL(0,570,CONST(ABS(主力卖力度)*500/AAD),623,IF(CONST(主力卖力度)>0,RGB(23,125,255),RGB(0,255,255))){XG51};
DRAWTEXT_FIX(1,0,0.516,0,STRCAT('主力买力度:',CON2STR(主力买力度,0))),COLORWHITE,COLORRED{XG51};
DRAWTEXT_FIX(1,0,0.574,0,STRCAT('主力卖力度:',CON2STR(主力卖力度,0))),COLORWHITE,COLORRED{XG51};
涨幅:=(C-REF(C,1))/REF(C,1)*100,NODRAW{XG51};
STICKLINE(涨幅大于9.94,C,O,4,0),COLORWHITE{XG51};
STICKLINE(涨幅<-9.92,C,O,4,0),COLORYELLOW{XG51};
DRAWTEXT(涨幅大于9.94,L-0.009,'涨停'),COLORWHITE{XG51};
DRAWTEXT_FIX((DYNAINFO(23)/DYNAINFO(22))>1,0.86,0.95,0,'★外盘大1倍以上'),COLORRED{XG51};
DRAWTEXT_FIX((DYNAINFO(23)/DYNAINFO(22))>2,0.86,0.95,0,'★外盘大2倍以上'),COLORRED{XG51};
DRAWTEXT_FIX((DYNAINFO(23)/DYNAINFO(22))>3,0.86,0.95,0,'★外盘大3倍以上'),COLORRED{XG51};
N8:=STRCAT(CON2STR(YEAR,0),' 年 '){XG51};
Y8:=STRCAT(CON2STR(MONTH,0),' 月 '){XG51};
R8:=STRCAT(CON2STR(DAY,0),' 日 '){XG51};
SJ8:=STRCAT(STRCAT(N8,Y8), R8){XG51};
DRAWTEXT_FIX(C>0,0.88,0,0,SJ8),COLOR00FFFF{X~G_5_1~C~N~{};