10点抓涨停的公式改成通达信

早盘10点抓涨停的公式， 10点之后用。（必须实盘的，不能盘后选）。大伙共同研究把

选择涨停股票的基本条件

{ST股票判断、今日停牌股票}

ISST:=STRFIND(STkNAME,UPPERSTR('ST'),1)<>0;

JB:=(ISST=0) and  DYNAINFO(8)>0;

{早盘30分钟，成交量}

B:=DYNAINFO(8);

BV:=REF(V,1);

ZF2:=B/BV*100;

{10点的涨幅}

A:=DYNAINFO(7);

AC1:=REF(C,1);

ZF1:=(A-AC1)/AC1*100;

{当前价格高于开盘价}

D:=A-O;

{股票昨天是涨的}

{K:=REF(C,1)-REF(O,1);}

{5日均线比10日均线高}

KK:=ma(c,5) >ma(c,10) and ma(c,5)>ref(ma(c,5),1);

{5分钟、15分钟、30分钟MACD都出现红柱}

DEA5:="MACD.DEA#min5";

DIFF5:="MACD.DIFF#min5";

d5:=DIFF5-DEA5;

DEA15:="MACD.DEA#min15";

DIFF15:="MACD.DIFF#min15";

d15:=DIFF15-DEA15;

DEA30:="MACD.DEA#min30";

DIFF30:="MACD.DIFF#min30";

d30:=DIFF30-DEA30;

{j:=(d5>0 and d15>0) or (d5>0 and d30>0) or (d15>0 and d30>0);}

j:= (d5>0 and d15>0 and d30>0);

{委买大于委卖}

E:=DYNAINFO(23)-DYNAINFO(22);

{昨天成交量比前天多}

F:=REF(V,1)-REF(V,2);

选股:ZF1<6 and ZF2>30 and JB>0 and j>0 and D>0 and E>0 and F>0 and KK>0;

========================================================================

9点45之后用。（必须实盘的，不能盘后选）。大伙讨论讨论把。

{选择涨停股票的基本条件}

{ST股票判断、今日停牌股票}

ISST:=STRFIND(STkNAME,UPPERSTR('ST'),1)<>0;

JB:=(ISST=0) and  DYNAINFO(8)>0;

{早盘15分钟，成交量}

B:=DYNAINFO(8);

BV:=REF(V,1);

ZF2:=B/BV*100;

{9点45 的涨幅}

A:=DYNAINFO(7);

AC1:=REF(C,1);

ZF1:=(A-AC1)/AC1*100;

{当前价格高于开盘价}

D:=A-O;

{股票昨天是涨的}

{K:=REF(C,1)-REF(O,1);}

{5日均线比10日均线高}

KK:=ma(c,5)>ma(c,10) and ma(c,5)>ref(ma(c,5),1);

{5分钟、15分钟MACD都出现红柱}

DEA5:="MACD.DEA#min5";

DIFF5:="MACD.DIFF#min5";

d5:=DIFF5-DEA5;

DEA15:="MACD.DEA#min15";

DIFF15:="MACD.DIFF#min15";

d15:=DIFF15-DEA15;

{j:=(d5>0 and d15>0) or (d5>0 and d30>0) or (d15>0 and d30>0);}

j:= (d5>0 and d15>0);

{委买大于委卖}

E:=DYNAINFO(23)-DYNAINFO(22);

{昨天成交量比前天多}

F:=REF(V,1)-REF(V,2);

ZF1<6 and ZF2>15 and JB>0 and j>0 and D>0 and E>0 and F>0 and KK>0;