通达信直接找盘中热点和强势股排序源码副图

[复制链接]
查看78 | 回复0 | 2022-7-8 09:41:54 | 显示全部楼层 |阅读模式

X00:=C;
 MX000:=(0.3609454219*X00-0.03309329629*REF(X00,1)-0.04241822779*REF(X00,2)-0.026737249*REF(X00,3)-0.007010041271*REF(X00,4)-0.002652859952*REF(X00,5)-0.0008415042966*REF(X00,6)-0.0002891931964*REF(X00,7)-0.0000956265934*REF(X00,8)-0.0000321286052*REF(X00,9)-0.0000106773454*REF(X00,10)-0.0000035457562*REF(X00,11)-0.0000011670713*REF(X00,12) )/ (1-0.7522406533 );
明日重心涨跌幅:=(MX000-X00)/X00*100;
 {波段趋势}
VAR21:=(CLOSE-LLV(LOW,80))/(HHV(HIGH,80)-LLV(LOW,80))*200;
 VAR22:=SMA(VAR21,3,1);VAR23:=SMA(VAR22,3,1);
 VAR24:=3*VAR22-2*VAR23;VAR25:=LLV(LOW,5);VAR26:=HHV(HIGH,5);
 VAR27:=EMA((CLOSE-VAR25)/(VAR26-VAR25)*100,4)*2;
 VAR28:=EMA(0.667*REF(VAR27,1)+0.333*VAR27,2); VAR29:=3*VAR27-2*VAR28;
 VARA:=POW(MA(CLOSE,5),2)+MA(CLOSE,5);
 VARB:=POW(MA(LOW,5),2)+MA(LOW,5);
 VARC:=POW(MA(HIGH,5),2)+MA(HIGH,5);
 VARD:=(VARA-LLV(VARB,64))/(HHV(VARC,64)-LLV(VARB,64))*150+65-10;
 VARE:=SMA(VARD,3,1)*1.5-100; VARF:=SMA(VARE,3,1);
 VAR30:=3*VARE-2*VARF;VAR31:=(HIGH+LOW+CLOSE*2)/4;
 VAR32:=EMA(VAR31,13);
 VAR33:=STD(VAR31,13);
 VAR34:=(VAR31-VAR32)*100/ VAR33;
 VAR35:=EMA(VAR34,5);
 VAR37:=EMA(VAR35,13)+200-100;
 VAR38:=EMA(VAR37,10);
 VAR39:=3*VAR37-2*VAR38;
 VAR1A:=VAR22+VAR27+VARE+VAR37;
 VAR1B:=VAR23+VAR28+VARF+VAR38;
 VAR1C:=VAR24+VAR29+VAR30+VAR39;
 VAR1D:=(HIGH+LOW+CLOSE)/3;
 VAR40:=(VAR1D-MA(VAR1D,34))/(0.015*AVEDEV(VAR1D,34));
 VAR42:=(HIGH+LOW+CLOSE+VAR1D)/4;
 VAR43:=EMA(VAR42,24);
 VAR44:=STD(VAR42,24);
 VAR45:=(VAR42-VAR43)/ VAR44*100;
 VAR46:=(VAR1D-MA(VAR1D,24))/(0.015*AVEDEV(VAR1D,24));
 VAR47:=EMA(VAR45,5);
 VAR2A:=((VAR47+VAR46+VAR40)/3+165)/4;
 VAR2C:=(VAR1A+VAR1B+VAR1C*30)/32/5-15;
 VAR2E:=(VAR2A+VAR2C)/2/1.1;
 VAR48:=EMA(VAR2E,3);
 VAR49:=EMA(VAR48,5);
 VAR51:=SMA(VAR48,2,1);
 {为了规避风险,设定了VAR48>=VAR51进行处理}
周明:IF((VAR48>VAR51 OR VAR48=VAR51) ,明日重心涨跌幅,-99);
 {-99表示为已经在下跌趋势里};

627411845.jpg

627411845.jpg

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则