南方财富网带来通达信公式源码 通达信【精确顶底】源码:

  【精确顶底】通达信源码

  JY0:=(2*C+H+L)/4;

  流通盘:=IF(C《300,CAPITAL,1200000000);

  JZ0:=V/流通盘*100;

  JA1:=HHVBARS(H,55);

  JA2:=SUM(JY0,JA1);

  JA3:=SUM(JY0,2*JA1);

  顶A1:=(JA2-JA3)/C;

  JA4:=HHVBARS(H,55);

  JA5:=SUM(JZ0,JA4);

  JA6:=SUM(JZ0,2*JA4);

  顶A2:=(JA5-JA6);

  顶A3:= (顶A1+顶A2)/2;

  顶A4:= MA(顶A3,1)+25;

  JB1:=HHVBARS(H,120);

  JB2:=SUM(JY0,JB1);

  JB3:=SUM(JY0,2*JB1);

  顶B1:=(JB2-JB3)/C;

  JB4:=HHVBARS(H,120);

  JB5:=SUM(JZ0,JB4);

  JB6:=SUM(JZ0,2*JB4);

  顶B2:=(JB5-JB6);

  顶B3:= (顶B1+顶B2)/2;

  顶B4:= MA(顶B3,5)+25;

  DA1:=LLVBARS(L,65);

  DA2:=SUM(JY0,DA1);

  DA3:=SUM(JY0,2*DA1);

  底A1:=(DA3-DA2)/C;

  DA4:=LLVBARS(L,65);

  DA5:=SUM(JZ0,DA4);

  DA6:=SUM(JZ0,2*DA4);

  底A2:=(DA6-DA5);

  底A3:= (底A1+底A2)/2;

  底A4:= MA(底A3,1)-3;

  DB1:=LLVBARS(L,850);

  DB2:=SUM(JY0,DB1);

  DB3:=SUM(JY0,2*DB1);

  底B1:=(DB3-DB2)/C;

  DB4:=LLVBARS(L,850);

  DB5:=SUM(JZ0,DB4);

  DB6:=SUM(JZ0,2*DB4);

  底B2:=(DB6-DB5);

  底B3:= (底B1+底B2)/2;

  底B4:= MA(底B3,5)-3;

  STICKLINE(顶B4》22,13,22,10,0),COLOR5555AA;

  STICKLINE(顶A4》22,15,22,10,0),COLOR885588;

  STICKLINE(底B4《0,7,0,10,0),COLOR883333;

  STICKLINE(底A4《0,5,0,10,0),COLOR557733;

  小顶:=IF(顶A4》-3,顶A4,-3),COLORMAGENTA;

  大顶: IF(顶B4》22,顶B4,22),COLORRED,LINETHICK2;

  IF(顶A4》22,顶A4,22),COLORMAGENTA;

  小底:= IF(底A4《25,底A4,25);

  IF(底A4《0,底A4,0),COLORCYAN;

  大底: IF(底B4《0,底B4,0),COLORGREEN,LINETHICK2;

  强弱分界:STICKLINE(C》0,11,11,5,0),COLORYELLOW;

  DRAWTEXT(ISLASTBAR,14,‘切切!\N右侧\N交易!’),COLORYELLOW;

  顶底:=(小顶+小底)/2;

  顶底线1:= EMA(顶底,3);

  顶底线2: EMA(顶底,21);

  顶底线3:= EMA(顶底线2,34);

  STICKLINE(顶底线1》顶底线2,顶底线1,顶底线2,0,0),COLORRED;

  STICKLINE(顶底线1《顶底线2,顶底线1,顶底线2,0,0),COLORBLUE;

  IF(顶底线1》=REF(顶底线1,1),顶底线1,DRAWNULL),COLORRED;

  IF(顶底线1《REF(顶底线1,1),顶底线1,DRAWNULL),COLORCYAN;

  IF(顶底线2》=REF(顶底线2,1),顶底线2,DRAWNULL),COLORYELLOW;

  IF(顶底线2《REF(顶底线2,1),顶底线2,DRAWNULL),COLORBBBBBB;

  IF(顶底线3》=REF(顶底线3,1),顶底线3,DRAWNULL),COLORMAGENTA,LINETHICK2;

  IF(顶底线3《REF(顶底线3,1),顶底线3,DRAWNULL),COLORBLUE,LINETHICK2;

  DRAWTEXT(FILTER(顶A4》22,10),18,‘小顶’),COLORCYAN;

  DRAWTEXT(FILTER(顶B4》22,10),20,‘大顶’),COLORYELLOW;

  DRAWTEXT(FILTER(底A4《0,12),4,‘小底’),COLORWHITE;

  DRAWTEXT(FILTER(底B4《0,12),6,‘大底’),COLORGREEN;