通达信整合机构K线未加密选股指标公式源码

源码正文：

dif1:=ema(CLOSE,12) - Ema(CLOSE,26){XG51};
DEA1:=EMA(DIF1,9){XG51};
macd1:=2*(DIF1-DEA1),stICK{XG51};
MacD2:=EMA(MACD1,3){XG51};
STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,3.2,0),COLOR000055{XG51};
STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,2.7,0),COLOR000077{XG51};
STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,2.1,0),COLOR000099{XG51};
STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,1.5,0),COLOR0000BB{XG51};
STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,0.9,0),COLOR0000DD{XG51};
STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,0.3,0),COLOR0000FF{XG51};
STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,3.2,0),COLOR555555{XG51};
STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,2.7,0),COLOR777777{XG51};
STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,2.1,0),COLOR999999{XG51};
STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,1.5,0),COLORBBBBBB{XG51};
STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,0.9,0),COLORDDDDDD{XG51};
STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,0.3,0),COLORFFFFFF{XG51};
STICKLINE(MACD1<MACD2,0,MACD1,3.2,0),COLORB20000{XG51};
STICKLINE(MACD1<MACD2,0,MACD1,2.7,0),COLOREC0000{XG51};
STICKLINE(MACD1<MACD2,0,MACD1,2.1,0),COLORFF4600{XG51};
STICKLINE(MACD1<MACD2,0,MACD1,1.5,0),COLORFF6300{XG51};
STICKLINE(MACD1<MACD2,0,MACD1,0.9,0),COLORFF8B00{XG51};
STICKLINE(MACD1<MACD2,0,MACD1,0.3,0),COLORFFAB00{XG51};
STICKLINE(MACD1>=0 OR MACD1<=0,0,0,50,1),COLORRED{XG51};
DIF:DIF1,COLOR33FF33,LINETHICK1{XG51};
DEA:DEA1,COLORBLUE,LINETHICK1{XG51};
MACD:MACD1,NODRAW,COLORLIMAGENTA{XG51};
N:=7; N2:=8; N3:=9{XG51};
VAR1:=REF(MA(C,20),10);开:=O-VAR1;高:=H-VAR1;低:=L-VAR1;收:=C-VAR1;MID:=MA(C,20){XG51};
UPPER:=MID+2*STD(C,20);LOWER:=MID-2*STD(C,20);V1:=(C-LOWER)/(UPPER-LOWER)*100{XG51};
V2:=V1-EMA(V1,5);K1:=SUM(LLV(V2,4),4)/4;V3:=EMA(V2,64)*10;V4:=EMA(0.4*V2*(-1),3){XG51};
V5:=-1*EMA(V2,39)*10;A:=V3>10;B:=V2>V4;D:=V5>10;E:=V3<=10 OR V2<=V4 OR V5<=10{XG51};
均线1:MA(收, N){XG51};
均线2:MA(收, N2){XG51};
均线3:MA(收, N3){XG51};
STICKLINE(C,0,0,6,0),COLORD9D919{XG51};
STICKLINE(收>=开 AND E,高,低,0,0), COLORBLUE{XG51};
STICKLINE(收>=开 AND E,收,开,2,0) ,COLORBLUE{XG51};
STICKLINE(收< 开 AND E,高,低,0,0) ,COLORBLUE{XG51};
STICKLINE(收< 开 AND E,收,开,2,0) ,COLORBLUE{XG51};
STICKLINE(开> 收 AND A ,低,高,0,0),COLORFF0000{XG51};
STICKLINE(开> 收 AND A ,收,开,2,0),COLORFF0000{XG51};
STICKLINE(开<=收 AND A,低,高,0,0),COLORBLUE{XG51};
STICKLINE(开<=收 AND A,收,开,2,1),COLORBLUE{XG51};
STICKLINE(开> 收 AND B,低,高,0,0),COLORWHITE{XG51};
STICKLINE(开> 收 AND B,收,开,2,0),COLORWHITE{XG51};
STICKLINE(开<=收 AND B,低,高,0,0),COLORWHITE{XG51};
STICKLINE(开<=收 AND B,收,开,2,1),COLORWHITE{XG51};
STICKLINE(开> 收 AND D,低,高,0,0),COLORCYAN{XG51};
STICKLINE(开> 收 AND D,收,开,2,0),COLORCYAN{XG51};
{X^G?5*1^C^N^{};

源码正文：

VAR1:=ema(Ema(CLOSE,13),13){XG51};
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000{XG51};
stICKLINE(控盘<0,控盘,0,1,1),COLOR00FF00{XG51};
STICKLINE(控盘>REF(控盘,1) AND 控盘<0,控盘,0,1,1),COLORFF00FF{XG51};
无庄控盘:=控盘<0{XG51};
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,1),COLOR0000FF{XG51};
有庄控盘:=控盘>REF(控盘,1) AND 控盘>0{XG51};
VAR2:=100*WINNER(CLOSE*0.95){XG51};
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,1),COLORFFFF00{XG51};
主力出货:=控盘<REF(控盘,1) AND 控盘>0{XG51};
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,1,1),COLOR00FFFF{XG51};
高度控盘: VAR2>50 AND COST(85)<CLOSE AND 控盘>0,COLOR00FFFF,LINETHICK2{XG51};
A10:=crOSS(控盘,0){XG51};
控盘B:=FILTER(IF(A10,1,0),5){XG51};
JJ:=DYnaINFO(11){XG51};
P:=55;S:=8;M1:=3{XG51};
财:=(EMA(CLOSE,S)-EMA(CLOSE,P))*10,COLORWHITE,LINETHICK2{XG51};
神:=EMA(财,M1),COLORCYAN,LINETHICK1{XG51};
DRAWBAND(财,RGB(255,0,0),神,RGB(0,100,50)){XG51};
BTJ1:=(C-JJ)/JJ<-0.005{XG51};
BTJ11:=(C-JJ)/JJ<-0.03{XG51};
BTJ12:=LAST(JJ>=REF(JJ,1),5,1) AND (C-JJ)/JJ<0.005{XG51};
STJ1:=(C-JJ)/JJ>0.005{XG51};
STJ01:=控盘<REF(控盘,1) AND 控盘>0.5{XG51};
STJ02:=控盘>0{XG51};
BTJ2:=控盘>REF(控盘,1) AND 控盘<-0.2{XG51};
BTJ22:=控盘>REF(控盘,1) AND 控盘<0 {XG51};
BTJ3:=CROSS(财,神) AND 财<-0.3{XG51};
BTJ32:=CROSS(财,神) AND 财<-0.1{XG51};
STJ31:=CROSS(神,财){XG51};
STJ32:=CROSS(神,财) AND 财>1.618{XG51};
{XG51};
BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,13){XG51};
BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13){XG51};
BTJ82:=FILTER(BTJ12 AND BTJ22 AND BTJ32,13){XG51};
DRAWICON(BTJ82,神,23);{XG51};
DRAWICON(BTJ81 AND TIME>10,神,27);{XG51};
DRAWICON(BTJ811 AND TIME>10,神,26);{XG51};
DRAWTEXT(BTJ81,神,''),COLORWHITE{XG51};
DRAWTEXT(BTJ811,神*1.2,'有庄'),COLORRED{XG51};
STJ81:=FILTER(STJ1 AND STJ01 AND STJ31,13){XG51};
DRAWICON(STJ81,神,19){XG51};
STJ82:=FILTER(STJ02 AND STJ32 ,13){XG51};
DRAWICON(STJ82,神,15){XG51};
STJ83:=STJ81 AND STJ82{XG51};
DRAWTEXT(STJ83,神,'必卖'),COLOR00FF00{X.G-5_1.C.N.{};