var1:=(H+L+2*C)/4;
擒龙线1:=ma(hhv(var1,10) ,20);
擒龙线3:=ma(llv(var1,10) ,20);
擒龙线2:=(擒龙线1+擒龙线3)/2;
BIAS3 :(var1-擒龙线2)/擒龙线2*100,colorffffff,LINETHICK1;
fillrgn(1,ma(hhv(BIAS3,20) ,BARSCOUNT(hhv(BIAS3,20))),ma(llv(BIAS3,20) ,BARSCOUNT(hhv(BIAS3,20)))),color223322;
(var1-擒龙线2)/擒龙线2*100,color00ffff,LINETHICK1;
t:ma(hhv(BIAS3,20) ,BARSCOUNT(hhv(BIAS3,20))),colorCC00;
d:ma(llv(BIAS3,20) ,BARSCOUNT(hhv(BIAS3,20))),colorCC00;
z:(t+d)/2,color000000;
t+0.809*(t-d),colorff00ff,POINTDOT;
t+0.618*(t-d),colorff00ff,POINTDOT;
t+0.382*(t-d),colorff00ff;
d-0.809*(t-d),colorffff00,POINTDOT;
d-0.618*(t-d),colorffff00,POINTDOT;
d-0.382*(t-d),colorffff00;
z+0.618*(t-z),colorCC00,POINTDOT;
z-0.618*(t-z),colorCC00,POINTDOT;
p1:=min(count(c,0),3);
p2:=min(count(c,0),5);
p3:=min(count(c,0),8);
p4:=min(count(c,0),13);
p5:=min(count(c,0),21);
p6:=min(count(c,0),34);
p7:=min(count(c,0),55);
p8:=min(count(c,0),60);
p9:=min(count(c,0),55);
p10:=min(count(c,0),25);
SW1:=(eMA(BIAS3 ,5)*7+eMA(BIAS3 ,10)*3)/10;
bbi3:= SW1-AVEDEV(BIAS3 , 5);
bbi4:= SW1+AVEDEV(BIAS3 , 5);
g1:=hhv(bbi3,p1);
g2:=hhv(bbi3,p2);
g3:=hhv(bbi3,p3);
g4:=hhv(bbi3,p4);
g5:=hhv(bbi3,p5);
g6:=hhv(bbi3,p6);
g7:=hhv(bbi3,p7);
hjx2:(g1+g2+g3+g4+g5+g6+g7)/7, LINETHICK1,color00FF;
d1:=llv(bbi4,p1);
d2:=llv(bbi4,p2);
d3:=llv(bbi4,p3);
d4:=llv(bbi4,p4);
d5:=llv(bbi4,p5);
d6:=llv(bbi4,p6);
d7:=llv(bbi4,p7);
hjx3:(d1+d2+d3+d4+d5+d6+d7)/7, LINETHICK1,color00FF;
PARTLINE(BIAS3 < hjx2,hjx2), LINETHICK2,colorFF4400;
PARTLINE(BIAS3 < hjx3,hjx3), LINETHICK2,colorFF4400;