源码如下：

KK:=IF(H=HHV(H,3),H,L);
 KK0:=CONST(MAX(TROUGHBARS(KK,15,1),PEAKBARS(KK,15,1)));
前期大箱顶:IF(CURRBARSCOUNT<KK0+2,CONST((PEAK(KK,15,1))),DRAWNULL),COLORRED;
前期大箱底:IF(CURRBARSCOUNT<KK0+2,CONST((TROUGH(KK,15,1))),DRAWNULL),COLORBROWN,LINETHICK1;
 STICKLINE(CURRBARSCOUNT<KK0+2,前期大箱顶,前期大箱底,5,0),COLOR00AA99;
 N:=13;
 BC:=(H*0.382+L*0.618+O*0.382+C*0.618)/2;
 LJ:=IF(INDEXC=C,BC,(BC+AMOUNT/(V*100))/2),COLORGRAY;
 HT:=REF((HHV(LJ,N*0.691)+HHV(LJ,N)+HHV(LJ,N*1.309))/3,1),LINETHICK,COLORRED;
 LT:=REF((LLV(LJ,N*0.691)+LLV(LJ,N)+LLV(LJ,N*1.309))/3,1),LINETHICK,COLORGREEN;
 ZT:=(HT+LT)/2,LINETHICK,COLORYELLOW;
 STICKLINE(ISLASTBAR=1  AND LJ<ZT,HT,LT,N*8,0),COLORBLUE;
 STICKLINE(ISLASTBAR=1  AND LJ=ZT,HT,LT,N*8,0),COLORGRAY;
 STICKLINE(ISLASTBAR=1  AND LJ>ZT,HT,LT,N*8,1),COLOR6600FF;
 STICKLINE(ISLASTBAR=1,ZT,ZT,N*8,0),COLORGRAY;
 DRAWKLINE(H,O,L,C);