本帖最后由 王向辉 于 2010-10-21 23:07 编辑
请直接导入使用:
kpdxg 通达信2.0 (4.2 KB) 下载次数: 425
2010-10-21 23:03
源码: 真是有点晕了@
{通达信适用}
{股性测评工具之二:庄家控盘力度 设计:王向辉}
{KPD1(25,100,30);
KPD2(60,200,80)}
停牌:=(DYNAINFO(4)=0);
VAR1:=EMA(EMA(CLOSE,9),9);
KPD:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
{IF(KPD-REF(KPD,1)>50,KPD=REF(KPD,1),KPD);}
MAXKPD:=HHV(KPD,99);
X1:=MAXKPD>KPD1;
X2:=MAXKPD<KPD2;
XGX:NOT(停牌) AND X1=1 AND X2=1;
{条件选股:xgx=1} |