（主要是有个CONST函数，不知道在金字塔里用哪个函数来代替，请版主看一下，（这个指标在通达信软件里能够运行））

EV:=VOL;

实际Ｖ（万手）:EV/10000;

AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));

买盘:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+

(CLOSE-LOW)),VOL/2)),POINTDOT,COLORRED;

买:买盘/10000,COLORYELLOW,NODRAW;

卖盘:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,

0-AA*(HIGH-LOW),0-VOL/2)),LINETHICK0,COLORGREEN;

卖:卖盘/10000,COLORYELLOW,NODRAW;

差额:(买盘+卖盘)/10000,COLORYELLOW;

BB:=(买盘+卖盘);

换手:VOL/CAPITAL*100,CIRCLEDOT,COLORYELLOW;

成交额（千万）:AMOUNT/10000000,POINTDOT,COLORYELLOW;

S1:=VOL/(((REF(V,1)+REF(V,2)+REF(V,3)+REF(V,4)+REF(V,5))/1200)*FROMOPEN);

量比:MA(S1,1),COLORYELLOW;

量坑:=MA(VOL,233);

F:=VOL<量坑;

TYP:=(HIGH+LOW+CLOSE)/3;

HH:=CONST(HHV(EV,144));

CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));

R:DRAWTEXT(F

AND CCI<-180,HH/1.35,\'☉\'),COLORYELLOW;

RSV:=(CLOSE -

LLV(LOW,18))/(HHV(HIGH,18) -

LLV(LOW,18));

K:=EMA(RSV,3);

D:=EMA(K,3);

J:=3*K-2*D;

KDJ1:=REF(COUNT(J<REF(J,1),5)>=3,1) AND

REF(J,1)<0.03;

KDJ2:=J>REF(J,1);

KDJ3:=REF(COUNT(J>REF(J,1),5)>=3,1)

AND

REF(J,1)>0.99;

KDJ4:=J<REF(J,1);

STICKLINE(买盘>0,0,VOL,2,1),COLORWHITE;

STICKLINE(买盘>0,0,买盘,3.2,0),COLOR000033;

STICKLINE(买盘>0,0,买盘,2.5,0),COLOR000066;

STICKLINE(买盘>0,0,买盘,1.9,0),COLOR000099;

STICKLINE(买盘>0,0,买盘,1.3,0),COLOR0000FF;

STICKLINE(买盘>0,0,买盘,0.9,0),COLORCC66FF;

STICKLINE(卖盘<0,0,卖盘,3.2,0),COLOR990000;

STICKLINE(卖盘<0,0,卖盘,2.5,0),COLORCC0000;

STICKLINE(卖盘<0,0,卖盘,1.9,0),COLORFF4400;

STICKLINE(卖盘<0,0,卖盘,1.3,0),COLORFFCC00;

STICKLINE(卖盘<0,0,卖盘,0.9,0),COLORCYAN;

STICKLINE((卖盘+买盘)>0,0,(卖盘+买盘),0.5,0),COLORYELLOW;

STICKLINE((卖盘+买盘)<0,0,(卖盘+买盘),0.3,0),COLORGRAY;

VAR22:=(CLOSE-LLV(LOW,24))/(HHV(HIGH,24)-LLV(LOW,24))*200*10;

能量:=SMA(VAR22,5,1),COLORRED;

三日内净流入:SUM (BB,3),

LINETHICK2,COLORGREEN;

流入:IF

(三日内净流入>REF(三日内净流入,1),三日内净流入,DRAWNULL),COLORLIMAGENTA,LINETHICK2;

CCII:=(TYP-MA(TYP,9))/(0.016*AVEDEV(TYP,9));

提款机1:=CROSS(CCII,-140);

超买:=CROSS(180,CCII)COLORGREEN,LINETHICK3;

JJ:=(H+L+C)/3;QJ0:=VOL/IF(H=L,4,H-L);

QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(C,O)),QJ0*(MIN(O,C)-L));

QJ2:=IF(CAPITAL=0,QJ0*(MIN(O,C)-L),QJ0*(JJ-MIN(C,O)));

QJ3:=QJ0*(H-MAX(O,C));QJ4:=QJ0*(MAX(C,O)-JJ);

QJ5:=QJ1+QJ2;QJ6:=QJ3+QJ4;DD:=(QJ5-QJ6)/(QJ5+QJ6)*100;

DDX:=((QJ1+QJ2)-(QJ3+QJ4))/SUM(VOL,10)*100;DDZ:=DD*17;

DDY:=((QJ2+QJ4)-(QJ1+QJ3))/SUM(VOL,10)*100;

提款机2:=CROSS(CCII,-140)

AND ((DDX>0 AND DDY>0) OR

DDZ>400),COLORRED;

BIAS:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;

提款机3:=IF(BIAS<=-16,1,0);

KM1:DRAWICON(

FILTER(KDJ1 AND KDJ2,3) AND 能量<700 ,HH,1);

KM2:DRAWICON( 提款机1 AND

能量<600 ,HH,1);

KM3:DRAWICON( 提款机2 AND 能量<600 ,HH,1);

KM4:DRAWICON(

提款机3 AND 能量<600 ,HH,1);

KM5:DRAWICON( FILTER(KDJ3 AND KDJ4,3) AND

能量>1400 ,HH,2);

KM6:DRAWICON( 超买 AND 能量>1400 ,HH,2);
{本文来源：波金论坛 HTTP://JSXGW.5D6D.COM/BBS.PHP};