通达信满堂红源码

DIFF:=EMA(C,8)-EMA(C,13);
DEA:=EMA(DIFF,5);
MACD:=2*(DIFF-DEA);A1:=DIFF>DEA;
K:=SMA((C-LLV(L,8))/(HHV(H,8)-LLV(L,8))*100,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
A2:=K>D;
RSI1:=(SMA(MAX(C-REF(C,1),0),5,1))/(SMA(ABS(C-REF(C,1)),5,1))*100;
RSI2:=(SMA(MAX(C-REF(C,1),0),13,1))/(SMA(ABS(C-REF(C,1)),13,1))*100;
A3:=RSI1>RSI2;
LWR1:=SMA(-(HHV(H,13)-C)/(HHV(H,13)-LLV(L,13))*100,3,1);
LWR2:=SMA(LWR1,3,1);
A4:=LWR1>LWR2;
BBI:=(MA(C,3)+MA(C,5)+MA(C,8)+MA(C,13))/4;
A5:=C>BBI;
MMS:=100*EMA(EMA(C-REF(C,1),5),3)/EMA(EMA(ABS(C-REF(C,1)),5),3);
MMM:=100*EMA(EMA(C-REF(C,1),13),8)/EMA(EMA(ABS(C-REF(C,1)),13),8);
A6:=MMS>MMM;
BIAS:=(C-MA(C,5))/MA(C,5);
DIF:=(BIAS-REF(BIAS,16));
DBCD:=SMA(DIF,76,1);
MM:=MA(DBCD,5);
A7:=DBCD>MM;
双线持股:3*SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5,1)-
2*SMA(SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5,1),3,1),LINETHICK2,COLORRED;
单线持币:LLV(双线持股,3),LINETHICK2,COLORYELLOW;
运行方向:=MA(双线持股,12),LINETHICK1,COLOR6B8E23;
转向:CROSS(双线持股,运行方向),COLORGRAY;
MA1:=MA(双线持股,5);
向下:CROSS(MA1,双线持股) AND MA1>80,COLORBLUE;
A8:=双线持股>运行方向;
主力攻击:=100*EMA(EMA(C-REF(C,1),8),8)/EMA(EMA(ABS(C-REF(C,1)),8),8);
五日攻击:=MA(主力攻击,5);
A9:=主力攻击>五日攻击;
PJJ:=DMA((H+L+C*2)/4,0.9);
JJ:=REF(EMA(PJJ,3),1);
QJJ:=VOL/((H-L)*2-ABS(C-O));
XVL:=IF(C>O,QJJ*(H-L),IF(C<O,QJJ*(H-O+C-L),VOL/2))+IF(C>O,0-QJJ*(H-C+O-L),IF(C<O,0-QJJ*(H-L),0-VOL/2));
HSL:=(XVL/20)/1.15;
攻击流量:=((HSL*0.55+(REF(HSL,1)*0.33))+(REF(HSL,2)*0.22));
GJJ:=EMA(攻击流量,8);
LLJX:=EMA(攻击流量,3);
资金流量:=LLJX/1000,LINETHICK0,COLOR0000FF;
A10:=资金流量>0;
夕阳无限好:=108,COLORYELLOW;
黎明前的黑暗:=0,COLORGRAY;
股价趋势:=SMA(MAX(C-REF(C,2),0),7,1)/SMA(ABS(C-REF(C,2)),7,1)*100,
COLORYELLOW,LINETHICK1;
极品逃亡:IF(股价趋势<REF(股价趋势,1) AND 股价趋势>79,股价趋势,夕阳无限好),
COLORGREEN,LINETHICK3;
短线绝杀:(A1+A2+A3+A4+A5+A6+A7+A8+A9+A10)*20,LINETHICK3,COLORFFFF00;{{超级快线，今天买明天卖，线形有点夸张}
VARA:=EMA((C-LLV(L,36))/(HHV(H,30)-LLV(L,36))*4,4)*25,COLOR0000FF,LINETHICK1;
花好月圆:(VARA-LLV(VARA,21))/(HHV(VARA,21)-LLV(VARA,21))*108,
COLORFF5555,LINETHICK3;{短线}
VAR1:=(C*2+H+L)/4*10;
VAR2:=EMA(VAR1,13)-EMA(VAR1,34);
VAR3:=EMA(VAR2,5);
VAR4:=2*(VAR2-VAR3)*5.5;
VAR5:=(INDEXC*2+INDEXH+INDEXL)/4;
VAR6:=EMA(VAR5,13)-EMA(VAR5,34);
VAR7:=EMA(VAR6,3);
VAR8:=(VAR6-VAR7)/2;
【以退为进】:=IF(VAR4<=0,VAR4,0),LINETHICK0;
【主动攻击】:=IF(VAR8>=0,VAR8,0),LINETHICK0;
抄底:IF((CROSS(双线持股,10) AND 【主动攻击】>=0.4 AND 【主动攻击】<17
AND 【以退为进】>-0.68),50,黎明前的黑暗),LINETHICK2,COLORMAGENTA;