分时主图叠加变色成交量【源码奉上】

看到一些朋友想设置分时主图变色，也是应一朋友多次提议促就而成，几经修改还是一些不如意，暂就这样用吧，有能力者可以再优化一下，有空我也会再看看通过别的方法，源码奉上有缘者得之

源码如下：
CS:=DYNAINFO(3);
JG:=DYNAINFO(5);
JD:=DYNAINFO(6);
ZZ:=MAX(JG-CS,CS-JD);
DX1:=CS-ZZ;
DX2:=CS-ZZ-0.05;
DX:=IF(ZZ>0.04,DX1,DX2);
LA:=AMOUNT/10000/10000;
LB:=ZZ/hhv(LA,0);
LC:=AMOUNT/10000/10000*LB+DX;
STICKLINE(REF(c,1)>c ,LC ,DX,1,0 ),colorgreen;
STICKLINE(REF(c,1)<c ,LC ,DX,1,0 ),colorred;
STICKLINE(REF(c,1)=c ,LC ,DX,1,0 ),colorwhite;