通达信满堂红源码

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;