通达信实用四色主图未加密选股指标公式源码

通达信实用四色主图未加密选股指标公式源码

源码正文：

ma5:MA(C,5),COLORRED{XG51};
MA10:MA(C,10),COLORBLUE{XG51};
MA20:MA(C,20),COLORLIMAGENTA{XG51};
MA30:MA(C,30),COLORCYAN{XG51};
MA60:MA(C,60),COLORLICYAN{XG51};
MA120:MA(C,120),COLORGREEN{XG51};
MA240:MA(C,240),COLORWHITE{XG51};
M4:=MA(C,4);M8:=MA(C,8);M32:=MA(C,32);M160:=MA(C,160){XG51};
NXJX:IF(PERIOD=5,M160,IF(PERIOD=6,M32,IF(PERIOD=7,M8,
IF(PERIOD=10,M4,DRAWNULL)))),COLORMAGENTA,LINETHICK2{XG51};
DRAWTEXT(ISLAstBAR,NXJX,CON2STR(NXJX,2)),COLORMAGENTA{XG51};
做多:=IF("kdj.K"(9,3,3)>"kdj.D"(9,3,3) AND "macd.MacD"(12,26,9)>0 AND V>1,2,0),COLORWHITE,NODRAW{XG51};
做空:=IF("KDJ.K"(9,3,3)<"KDJ.D"(9,3,3) AND "MACD.MACD"(12,26,9)<0 AND V>1,-2,0),COLOR2288EE,NODRAW{XG51};
强洗:=IF("MACD.MACD"(12,26,9)>0 AND "KDJ.K"(9,3,3)<"KDJ.D"(9,3,3) AND V>1,1,0),COLOR0099FF,NODRAW{XG51};
弱升:=IF("MACD.MACD"(12,26,9)<0 AND "KDJ.K"(9,3,3)>"KDJ.D"(9,3,3) AND V>1,-1,0),COLOR00DD00,NODRAW{XG51};
STICKLINE(做多,L,H,0,0),COLORWHITE{XG51};
STICKLINE(做多 AND C>=O,C,O,3,1),COLORWHITE{XG51};
STICKLINE(做多 AND C<O,C,O,3,0),COLORWHITE{XG51};
STICKLINE(做空,L,H,0,0),COLORFF3300{XG51};
STICKLINE(做空 AND C>=O,C,O,3,1),COLORFF3300{XG51};
STICKLINE(做空 AND C<O,C,O,3,0),COLORFF3300{XG51};
STICKLINE(强洗,L,H,0,0),COLOR0099FF{XG51};
STICKLINE(强洗 AND C>=O,C,O,3,1),COLOR0099FF{XG51};
STICKLINE(强洗 AND C<O,C,O,3,0),COLOR0099FF{XG51};
STICKLINE(弱升,L,H,0,0),COLORCCCCCC{XG51};
STICKLINE(弱升 AND C>=O,C,O,3,1),COLORCCCCCC{XG51};
STICKLINE(弱升 AND C<O,C,O,3,0),COLORCCCCCC{XG51};
DRAwrECTREL(0,500,145,999.4,IF(120,RGB(10,0,10),0));
超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};
TESTSKIP(NOT(超B OR 大B OR 中B OR 小B OR 超S OR 大S OR 中S OR 小S)!=0){XG51};
主力进:=(超B)+(大B),NODRAW{XG51};
主力出:=(超S)+(大S),NODRAW{XG51};
小散进:=(中B)+(小B),NODRAW{XG51};
小散出:=(中S)+(小S),NODRAW{XG51};
DAZHIV:=CONST(MAX(Abs(主力进),MAX(ABS(主力出),MAX(ABS(小散进),ABS(小散出))))),NODRAW{XG51};
DRAWRECTREL(0,CONST(940-(ABS(主力进)*250/DAZHIV)),30,960,IF(CONST(主力进>0),RGB(255,0,0),RGB(23,125,255))){XG51};
DRAWRECTREL(32,CONST(940-(ABS(主力出)*250/DAZHIV)),62,960,IF(CONST(主力出>0),RGB(23,125,255),RGB(255,0,0))){XG51};
DRAWRECTREL(70,CONST(940-(ABS(小散进)*250/DAZHIV)),100,960,IF(CONST(小散进>0),RGB(255,0,0),RGB(23,125,255))){XG51};
DRAWRECTREL(102,CONST(940-(ABS(小散出)*250/DAZHIV)),132,960,IF(CONST(小散出>0),RGB(23,125,255),RGB(255,0,0))){XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.0001,0.9,0,STRCAT('',CON2STR(主力进/10,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.033,0.9,0,STRCAT('',CON2STR(主力出/10,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.07,0.9,0,STRCAT('',CON2STR(小散进/10,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.101,0.9,0,STRCAT('',CON2STR(小散出/10,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.033,1,0,'（X10万元)'),COLOR00FFFF{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0,1,0,'主进出'),COLORGREEN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.09,1,0,'散进出'),COLORGREEN{XG51};
主力买力度:=LARGEINTRDvol*1000/VOL{XG51};
主力卖力度:=LARGEOUTTRDVOL*1000/VOL{XG51};
AAD:=CONST(MAX(ABS(主力买力度),ABS(主力卖力度)))*4,NODRAW{XG51};
DRAWRECTREL(0,515,CONST(ABS(主力买力度)*500/AAD),568,IF(CONST(主力买力度)>0,RGB(255,0,0),RGB(0,50,0))){XG51};
DRAWRECTREL(0,570,CONST(ABS(主力卖力度)*500/AAD),623,IF(CONST(主力卖力度)>0,RGB(0,50,0),RGB(255,0,0))){XG51};
DRAWTEXT_FIX(1,0,0.524,0,STRCAT('主买力度:',CON2STR(主力买力度,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0,0.576,0,STRCAT('主卖力度:',CON2STR(主力卖力度,0))),COLORBLUE{X.G.5.1.C.N.{};

通达信神彩飞扬主图未加密选股指标公式源码

源码正文：

A:=(3*CLOSE+LOW+OPEN+HIGH)/6{XG51};
HJX21:=(21*A+20*REF(A,1)+19*REF(A,2)+18*REF(A,3)+17*REF(A,4)+16*REF(A,5)+
15*REF(A,6)+14*REF(A,7)+13*REF(A,8)+12*REF(A,9)+11*REF(A,10)+
10*REF(A,11)+9*REF(A,12)+8*REF(A,13)+7*REF(A,14)+6*REF(A,15)+
5*REF(A,16)+4*REF(A,17)+3*REF(A,18)+2*REF(A,19)+
REF(A,21))/231{XG51};
HJX3:=(3*A+2*REF(A,1)+REF(A,2))/6{XG51};
DC1:ema(HJX3,4),COLORLImaGENTA{XG51};
DC2:EMA(DC1,3),COLORWHITE{XG51};
DC3:EMA(DC1,7),COLORWHITE{XG51};
K1:=BacKSET(DC1<REF(DC1,1),2){XG51};
IF(K1,DC1,DRAWNULL),COLORCYAN,LINETHICK1{XG51};
K2:=BACKSET(DC2<REF(DC2,1),2){XG51};
IF(K2,DC2,DRAWNULL),COLORCYAN,LINETHICK1{XG51};
K3:=BACKSET(DC3<REF(DC3,1),2){XG51};
IF(K3,DC3,DRAWNULL),COLORCYAN,LINETHICK1{XG51};
DC4:EMA(HJX21,6),COLORBLUE{XG51};
DC5:EMA(HJX21,16),COLORBLUE{XG51};
DC6:EMA(HJX21,34),COLORBLUE{XG51};
RSV:=(CLOSE-LLV(LOW,6))/(HHV(HIGH,6)-LLV(LOW,6))*100{XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
J:=3*K-2*D{XG51};
YX2:=D>REF(D,1){XG51};
YX3:=DC4>DC6 AND DC5>DC6{XG51};
YX4:=CLOSE>DC4 AND CLOSE/DC4<1.1{XG51};
YX5:=DC1>DC2 AND DC2>DC3{XG51};
XG:=YX2 AND YX3 AND YX4{XG51};
神彩飞扬培训:=XG AND COUNT(XG,10)=1 AND COUNT(YX5,10)<5{XG51};
DRAWTEXT(神彩飞扬培训,LOW*0.98,'神彩'),COLORFFFFFF{XG51};
difF:=EMA(CLOSE,12) - EMA(CLOSE,26){XG51};
DEA:=EMA(DIFF,9){XG51};
macd:=2*(DIFF-DEA){XG51};
XG0:=crOSS(MACD,0){XG51};
XG1:=CROSS(CLOSE,DC1) AND CROSS(CLOSE,DC2) AND CROSS(CLOSE,DC3) AND BArslAst(XG0)<=5
AND CLOSE<DC4 {XG51};
DRAWTEXT(XG1,LOW*0.98,'叠彩'),COLORFF00FF{XG51};
HJX:=EMA(HJX21,12){XG51};
ZF:=100*(CLOSE-REF(CLOSE,1))/REF(CLOSE,1){XG51};
TTUP:=HJX+2*STD(CLOSE,20){XG51};
TTDOWN:=HJX-2*STD(CLOSE,20){XG51};
HUP:=EMA(TTUP,3){XG51};
HDOWN:=EMA(TTDOWN,3){XG51};
LBRISE:=HUP/REF(HUP,1)>1.0035{XG51};
MIDRISE:=HJX>REF(HJX,1){XG51};
LBDOWN:=HDOWN<REF(HDOWN,1){XG51};
CLB1:=LOW/HUP<1.01 AND CLOSE/HUP>0.99 AND (OPEN+LOW)/2.1<HUP {XG51};
KXT:=CLOSE>OPEN AND ((HIGH-CLOSE)+(OPEN-LOW))/(CLOSE-OPEN)<1.2 AND HIGH/CLOSE<1.035{XG51};
TDkd:=100*(HUP-HDOWN)/HJX{XG51};
TDXT:=TDKD<15 AND LLV(TDKD,8)<10{XG51};
XGG:=LBRISE AND MIDRISE AND CLB1 AND KXT AND TDXT{XG51};
CXG:=COUNT(XGG,20){XG51};
喇叭开口:=XGG AND CXG=1 AND COUNT(LBRISE,10)<10 AND HIGH/HHV(HIGH,5)>0.98{XG51};
DRAWTEXT(喇叭开口,LOW*0.99,'喇叭'),COLORFFFF00{XG51};
DRAWICON(CROSS(DC1,DC2),LOW*0.99,5){XG51};
DRAWICON(神彩飞扬培训,LOW*0.970,9){XG51};
DRAWICON(喇叭开口,LOW,2),COLORFFFF00{X.G!5_1.C.N.{};