通达信公式源码 通达信突破压力线选股公式源码:

  HIGHN:=5;

  AA:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);

  QY:=BACKSET(AA,HIGHN+1);

  CC:=FILTER(QY,HIGHN) AND H=HHV(H,HIGHN+1);

  DDD:=BARSLAST(CC);

  GDTS:=IF(CC,CURRBARSCOUNT,0);

  DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);

  GDCS1:=CONST(DINGBUTS);

  DINGBUTS1:=REF(DINGBUTS,DDD+1);

  GDCS2:=CONST(DINGBUTS1);

  高点压力:=DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1);

  XG:C》高点压力 AND (C-高点压力)/高点压力《0.05;