[通达信指标]大底小底 大顶小顶 公式源码

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

JZ0:=V/CAPITAL*100;

JA1:=HHVBARS(H,55);

JA2:=SUM(JY0,JA1);

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

DINGA1:=(JA2-JA3)/C;

JA4:=HHVBARS(H,55);

JA5:=SUM(JZ0,JA4);

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

DINGA2:=(JA5-JA6);

DINGA3:= (DINGA1+DINGA2)/2;

DINGA4:= MA(DINGA3,1)+25;

JB1:=HHVBARS(H,120);

JB2:=SUM(JY0,JB1);

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

DINGB1:=(JB2-JB3)/C;

JB4:=HHVBARS(H,120);

JB5:=SUM(JZ0,JB4);

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

DINGB2:=(JB5-JB6);

DINGB3:= (DINGB1+DINGB2)/2;

DINGB4:= MA(DINGB3,5)+25;

DA1:=LLVBARS(L,65);

DA2:=SUM(JY0,DA1);

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

DIBUA1:=(DA3-DA2)/C;

DA4:=LLVBARS(L,65);

DA5:=SUM(JZ0,DA4);

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

DIBUA2:=(DA6-DA5);

DIBUA3:= (DIBUA1+DIBUA2)/2;

DIBUA4:= MA(DIBUA3,1)-3;

DB1:=LLVBARS(L,850);

DB2:=SUM(JY0,DB1);

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

DIBUB1:=(DB3-DB2)/C;

DB4:=LLVBARS(L,850);

DB5:=SUM(JZ0,DB4);

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

DIBUB2:=(DB6-DB5);

DIBUB3:= (DIBUB1+DIBUB2)/2;

DIBUB4:= MA(DIBUB3,5)-3;

STICKLINE(DINGB4>22,13,22,10,0),COLOR5555AA;

STICKLINE(DINGA4>22,15,22,10,0),COLOR885588;

STICKLINE(DIBUB4<0,7,0,10,0),COLOR883333;

STICKLINE(DIBUA4<0,5,0,10,0),COLOR557733;

XDING:=IF(DINGA4>-3,DINGA4,-3),COLORMAGENTA;

DDING: IF(DINGB4>22,DINGB4,22),COLORRED,LINETHICK2;

IF(DINGA4>22,DINGA4,22),COLORMAGENTA;

XDIBU:=IF(DIBUA4<25,DIBUA4,25);

IF(DIBUA4<0,DIBUA4,0),COLORCYAN;

DDIBU: IF(DIBUB4<0,DIBUB4,0),COLORGREEN,LINETHICK2;STICKLINE(C>0,11,11,5,0),COLORYELLOW;

DINGDIBU:=(XDING+XDIBU)/2;

DINGDIBUX1:= EMA(DINGDIBU,3);

DINGDIBUX2: EMA(DINGDIBU,21);

DINGDIBUX3:= EMA(DINGDIBUX2,34);

STICKLINE(DINGDIBUX1>DINGDIBUX2,DINGDIBUX1,DINGDIBUX2,0,0),COLORRED;

STICKLINE(DINGDIBUX1<DINGDIBUX2,DINGDIBUX1,DINGDIBUX2,0,0),COLORGREEN;

DRAWTEXT(FILTER(DINGA4>22,10),18,’小顶’),COLORCYAN;

DRAWTEXT(FILTER(DINGB4>22,10),20,’大顶’),COLORYELLOW;

DRAWTEXT(FILTER(DIBUA4<0,12),4,’小底’),COLORWHITE;

DRAWTEXT(FILTER(DIBUB4<0,12),6,’大底’),COLORGREEN;