万变不离其宗 （源码、副图、通达信 贴图）分时公式
全蓝，基本在底部反弹；
由蓝变绿，从底部向上升起；
由绿变黄，茁壮成长；
由黄变红，接近收获；
全红，顶部反弹；
由红变黄，回落；
由黄变绿，向下缓落；
由绿变蓝，寻找底部；
DI3:=DYNAINFO(3);DI5:=DYNAINFO(5);DI6:=DYNAINFO(6);
DBS0:=XMA(XMA(XMA(C,9),8),7)*100;
DBS1:=(MAX(DI3,DI5)+MIN(DI3,DI6))/2;
DBS2:=MIN(DI3,DI6)+8*(MAX(DI3,DI5)-MIN(DI3,DI6))/9;
DBS3:=MIN(DI3,DI6)+(MAX(DI3,DI5)-MIN(DI3,DI6))/18;
DBS4:=CONST(IF((DBS0 REF(DBS0,1) AND C =DBS3) OR (DBS0 =REF(DBS0,1) AND C =DBS2),150,0));
DBS5:=CONST(IF((DBS0 REF(DBS0,1) AND C DBS1) OR (DBS0 =REF(DBS0,1) AND C =DBS1),150,IF(DBS0 =REF(DBS0,1) AND C DBS1,50,0)));
DBS6:=CONST(IF((DBS0 REF(DBS0,1) AND (C =DBS1 OR C DBS3)) OR (DBS0 =REF(DBS0,1) AND C =DBS1 AND C DBS2),50,IF(DBS0 =REF(DBS0,1) AND C DBS1,150,0)));
DBS7:=CONST(IF(C DBS1,150,0));
DBS8:=CONST(IF(C DBS3,50,IF(C =DBS2,0,150)));
DBS9:=CONST(IF(C DBS2,50,IF(C DBS2 AND C =DBS1,0,50)));
DRAWGBK(1,RGB(DBS4,DBS5,DBS6),RGB(DBS7,DBS8,DBS9),1,0,0);
