软件名称：[B]提供几个选股公式的通用原码[/B]
软件类型：国产软件
运行环境：Win9X/2000/XP/2003/
软件语言：简体中文
授权方式：解密版
软件大小：0 Bytes
官方主页：Home Page
更新时间：2009-04-16 21:12:27
软件简介:

几个选股原码............!!!!!!!!!!!!!

0001.大黑马 选股雷达
VAR1:=EMA(VOL/CAPITAL,3);VAR2:=HHV(VAR1,240);VAR3:=LLV(VAR1,240);
VAR4:=MA(CLOSE,33);VAR5:=EMA(CLOSE,13)-EMA(CLOSE,26);
VAR6:=EMA(VAR5,9);VAR7:=2*(VAR5-VAR6);
VAR8:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VAR9:=(CLOSE-LLV(LOW,45))/(HHV(HIGH,45)-LLV(LOW,45))*100;
VARA:=(CLOSE-LLV(LOW,225))/(HHV(HIGH,225)-LLV(LOW,225))*100;
VARB:=SMA(VAR8,3,1);VARC:=SMA(VAR9,15,1);
VARD:=SMA(VARA,45,1);VARE:=(VARD-REF(VARD,1))*50;
VARF:=(VARC-REF(VARC,1))*10;VAR10:=REF(VARC,1)-REF(VARD,1);
VAR11:=(VARC-VAR10-VARD)*30;VAR12:=VARB-REF(VARB,1);
固定筹码:= EMA((VAR1-VAR3)/VAR3*VAR4,13);
移动筹码:= EMA((VAR2-VAR1)/VAR1*VAR4,13);
多空对比:=固定筹码-移动筹码;
VAR13:=VAR7>=-0.035 AND VAR7<=0.045 AND
CLOSE>MA(CLOSE,5)
AND CLOSE>MA(CLOSE,10) AND 多空对比>-100;
大黑马: IF(VAR13 AND VAR12>7 AND REF(VAR12,1)<0 AND VAR12-REF(VAR12,1)>9,1,0);

0002.   (通达信)选股公式:基本面选股,可与黑马起飞结合运用
公式原出处已忘记了,好像是MACD,用此公式好处是可以快速选出基本面优良个股,节省你宝贵的时间
基本面选股:
AA:=DYNAINFO(39)>0 AND DYNAINFO(39)<200;{0<市盈率<200}
BB:=FINANCE(20)>5000 AND FINANCE(21)/FINANCE(20)>0.2;{主营业务利润率>0.2}
CC:=FINANCE(34)>0 AND CLOSE/FINANCE(34)<80;{市净率}
DD:=FINANCE(29)>0 AND FINANCE(30)/FINANCE(19)>0.08;{净资产收益率大于8％}
EE:=FINANCE(1)*C/FINANCE(20)>0 AND FINANCE(1)*C/FINANCE(20)<12;{市销率取值小于12}
AA AND BB AND CC AND DD AND EE;
用此公式你会发现好多老面孔,例如497
选出的股被通达信列为条件股
与排序指标"黑马起飞"结合运用,效果更佳

0003.
顶天立地选股 可选出当日所有发出信号的个股
----------------------------------------------------------------
VAR3:=MA(CLOSE,13);
VAR4:=100-ABS(((CLOSE-VAR3)/(VAR3))*(100));
VAR5:=LLV(LOW,75);
VAR6:=HHV(HIGH,75);
VAR7:=(VAR6-VAR5)/(100);
VAR8:=SMA((CLOSE-VAR5)/(VAR7),20,1);
VAR9:=SMA((OPEN-VAR5)/(VAR7),20,1);
VARA:=(3)*(VAR8)-(2)*(SMA(VAR8,15,1));
VARB:=(3)*(VAR9)-(2)*(SMA(VAR9,15,1));
VARC:=100-VARB;
VARD:=(REF(LOW,1))*(0.89999997);
VARE:=(LOW)*(0.89999997);
VARF:=((VARE)*(VOL)+(VARD)*(CAPITAL-VOL))/(CAPITAL);
VAR10:=EMA(VARF,30);
VAR11:=CLOSE-REF(CLOSE,1);
VAR12:=MAX(VAR11,0);
VAR13:=ABS(VAR11);
VAR14:=((SMA(VAR12,7,1))/(SMA(VAR13,7,1)))*(100);
VAR15:=((SMA(VAR12,13,1))/(SMA(VAR13,13,1)))*(100);
VAR16:=BARSCOUNT(CLOSE);
VAR17:=((SMA(MAX(VAR11,0),6,1))/(SMA(ABS(VAR11),6,1)))*(100);
VAR18:=(((-200))*(HHV(HIGH,60)-CLOSE))/(HHV(HIGH,60)-LLV(LOW,60))+100;
VAR19:=((CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15)))*(100);
VAR1A:=SMA((SMA(VAR19,4,1)-50)*(2),3,1);
VAR1B:=((INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14)))*(100);
VAR1C:=SMA(VAR1B,4,1);
VAR1D:=SMA(VAR1C,3,1);
VAR1E:=((HHV(HIGH,30)-CLOSE)/(CLOSE))*(100);
VAR1F:=((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100);
VAR20:=REVERSE(VAR1F);
VAR21:=SMA(VAR1F,3,1);
趋势:=SMA(VAR21,3,1),COLOR0000FF,LINETHICK2;
人气:=SMA(趋势,3,1),COLORYELLOW,LINETHICK2;
出击:=IF(CROSS(趋势,人气) AND (趋势<30),20,0),COLOR0000FF,LINETHICK2;
短卖:=IF(CROSS(人气,趋势) AND (人气>75),85,100),COLOR008000,LINETHICK2;
CROSS(趋势,人气) AND (趋势<60);

0004.【超跌选股】成功率99%

xgVAR1:=DMA(CLOSE,((VOL / SMA(VOL,4,1)) / 4));
xgVAR2:=DMA(CLOSE,((VOL / SMA(VOL,19,1)) / 16));
xgVAR3:=((((CLOSE - xgVAR1) / xgVAR1) * 100) < (0 - 10));
xgVAR4:=((((xgVAR1 - xgVAR2) / xgVAR2) * 100) < (0 - 21));
((((((((((xgVAR3 AND xgVAR4) AND ((OPEN > CLOSE) OR
(OPEN < CLOSE))) AND (((OPEN - REF(CLOSE,1)) / REF(CLOSE,1)) > (0 - 0.05))) AND
(((REF(CLOSE,1) > REF(OPEN,1))) OR (REF(CLOSE,1) < REF(OPEN,1)))) AND
(((REF(OPEN,2) > REF(CLOSE,2))) OR (REF(OPEN,2) < REF(CLOSE,2)))) AND
(((REF(OPEN,3) > REF(CLOSE,3))) OR (REF(OPEN,3) < REF(CLOSE,3)))) AND
(((REF(OPEN,4) > REF(CLOSE,4))) OR (REF(OPEN,4) < REF(CLOSE,4)))) AND
(((REF(OPEN,5) > REF(CLOSE,5))) OR (REF(OPEN,5) < REF(CLOSE,5)))) AND
(((REF(OPEN,6) > REF(CLOSE,6))) OR (REF(OPEN,6) < REF(CLOSE,6)))) AND
(((REF(OPEN,7) > REF(CLOSE,7))) OR (REF(OPEN,7) < REF(CLOSE,7))));
 

[url=http://www.70822.com/soft/sort013/sort03/down-8360.html]提供几个选股公式的通用原码[/url]