通达信主图幅图及选股公式源码 通达信放量突破左峰主图幅图及选股公式源码:

  公式中用到画线函数DRAWLINE,不喜欢的请飘过。跟帖不再做解释。

  指标思路 本意想找到去年12月中最高价画线,但考虑有些停牌股12月没有数据。所以,左峰取60天前(今天距去年12月交易日大致时间)的30天内最高价为左峰。高点大概视个股交易时间不同取值为去年11月份或12月份 今年一月份的最高点(大概),然后 放量突破这个高点 出票 相比前期“突破锅盖选股”条件相对宽松 出票要多 12月到今天共出票161张。

  主图

  T:=FINDHIGHBARS(H,60,30,1);

  A:DRAWLINE(CURRBARSCOUNT=CONST(T)+1,H,ISLASTBAR,REF(H,T),0),COLORYELLOW;

  TT:=BARSLAST(C》A*1.014 AND L《A);

  TA:=BARSLAST(CROSS(A!=DRAWNULL,0.5));

  TJ:=VOL=HHV(VOL,T+1) AND TA》28 AND HSL》8;

  XG:=COUNT(TT=0,T+1)=1 AND TT=0 AND TJ;

  STICKLINE(XG,C,O,1.5,0),COLORYELLOW;

  STICKLINE(XG,H,L,1.5,0),COLORYELLOW;

  DRAWICON(XG,L*0.95,1);

  DRAWTEXT(TA=0,A*1.05,STRCAT(STRCAT(最高价:,VAR2STR(REF(A,TA),2)),元))COLORYELLOW;

  幅图

  T:=FINDHIGHBARS(H,60,30,1);

  A:=DRAWLINE(CURRBARSCOUNT=CONST(T)+1,H,ISLASTBAR,REF(H,T),0);

  TT:=BARSLAST(C》A*1.014 AND L《A);

  TA:=BARSLAST(CROSS(A!=DRAWNULL,0.5));

  TJ:=VOL=HHV(VOL,T+1) AND TA》28 AND HSL》8;

  XG:=COUNT(TT=0,T+1)=1 AND TT=0 AND TJ;

  STICKLINE(XG,0,8,1.5,0),COLORYELLOW;

  选股

  T:=FINDHIGHBARS(H,60,30,1);

  A:=DRAWLINE(CURRBARSCOUNT=CONST(T)+1,H,ISLASTBAR,REF(H,T),0);

  TT:=BARSLAST(C》A*1.014 AND L《A);

  TA:=BARSLAST(CROSS(A!=DRAWNULL,0.5));

  TJ:=VOL=HHV(VOL,T+1) AND TA》28 AND HSL》8;

  XG:COUNT(TT=0,T+1)=1 AND TT=0 AND TJ;