剑网三太原之战阶段:“筹码”指标源码荟萃4

指南针云带(飞狐源码)

a0:=BARSCOUNT(c);a3:=SYSPARAM(3);a2:=SYSPARAM(2);
a4:=SYSPARAM(4);a5:=SYSPARAM(5);
nn0:=a3-a2;nn:=a0-a2;hh1:=(a4-a5)/8;
hh2:=hh1/4;
ll1:=llv(l,nn0);ll2:=ll1[a3];
y0:=a0>=a2;vv0:=if(y0=1 and SYSPARAM(1)>=a0,v,0);
c1:=if(BETWEEN(c,a4-0*hh1,a4-1*hh1),vv0,0);
c2:=if(BETWEEN(c,a4-1*hh1,a4-2*hh1),vv0,0);
c3:=if(BETWEEN(c,a4-2*hh1,a4-3*hh1),vv0,0);
c4:=if(BETWEEN(c,a4-3*hh1,a4-4*hh1),vv0,0);
c5:=if(BETWEEN(c,a4-4*hh1,a4-5*hh1),vv0,0);
c6:=if(BETWEEN(c,a4-5*hh1,a4-6*hh1),vv0,0);
c7:=if(BETWEEN(c,a4-6*hh1,a4-7*hh1),vv0,0);
c8:=if(BETWEEN(c,a4-7*hh1,a4-8*hh1),vv0,0);
c9:=if(BETWEEN(c,a4-8*hh1,a4-9*hh1),vv0,0);
c10:=if(BETWEEN(c,a4-9*hh1,a4-10*hh1),vv0,0);
v1:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c1,nn0),0),2)),LINETHICK;
v2:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c2,nn0),0),2));
v3:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c3,nn0),0),2));
v4:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c4,nn0),0),2));
v5:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c5,nn0),0),2));
v6:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c6,nn0),0),2));
v7:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c7,nn0),0),2));
v8:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c8,nn0),0),2));
v9:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c9,nn0),0),2));
v10:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c10,nn0),0),2));
av0:=max(v1,max(v2,max(v3,max(v4,max(v5,max(v6,max(v7,max(v8,max(v9,v10)))))))));
x1:=v1/av0>=nn/nn0 and nn>=0;
x3:=v3/av0>=nn/nn0 and nn>=0;
x5:=v5/av0>=nn/nn0 and nn>=0;
x7:=v7/av0>=nn/nn0 and nn>=0;
FILLRGN(v1/av0>=nn/nn0 and nn>=0,a4-0*hh1,a4-1*hh1+hh1*0.5),color666666;
FILLRGN(v2/av0>=nn/nn0 and nn>=0,a4-1*hh1,a4-2*hh1+hh1*0.5),color666666;
FILLRGN(v3/av0>=nn/nn0 and nn>=0,a4-2*hh1,a4-3*hh1+hh1*0.5),color666666;
FILLRGN(v4/av0>=nn/nn0 and nn>=0,a4-3*hh1,a4-4*hh1+hh1*0.5),color666666;
FILLRGN(v5/av0>=nn/nn0 and nn>=0,a4-4*hh1,a4-5*hh1+hh1*0.5),color666666;
FILLRGN(v6/av0>=nn/nn0 and nn>=0,a4-5*hh1,a4-6*hh1+hh1*0.5),color666666;
FILLRGN(v7/av0>=nn/nn0 and nn>=0,a4-6*hh1,a4-7*hh1+hh1*0.5),color666666;
FILLRGN(v8/av0>=nn/nn0 and nn>=0,a4-7*hh1,a4-8*hh1+hh1*0.5),color666666;
{阴柱}
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),COLOR008800;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLOR009900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLOR00AA00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00BB00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLOR00CC00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00DD00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLOR00EE00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR00FF00;
{红柱}
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0) ,COLORFFBBFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLORFF00FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLORFF22FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLORFF44FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLORFF66FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLORFF88FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLORFF99FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLORFFAAFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLORFFBBFF;
SSL:CLOSE,LINETHICK;
上限:a4,LINETHICK;
间距:HH1,LINETHICK;
DRAWNUMBER(FILTER(refx(x10,10),a4,a4-0*hh1,2),COLORCYAN;
DRAWNUMBER(FILTER(refx(x30,10),(a4-2.7*3*hh2),a4-2*hh1,2),COLORCYAN;
DRAWNUMBER(FILTER(refx(x50,10),(a4-3.2*5*hh2),a4-4*hh1,2),COLORCYAN;
DRAWNUMBER(FILTER(refx(x70,5),10),ll2+1.1*7*hh2,a4-6*hh1,2),COLORCYAN;
ema17:ema(c,17);
ema50:ema(c,50);
ema144:ema(c,144);

飞狐行情软件调出云带方法

飞狐行情软件调出云带方法：
飞狐行情软件-成本分析-- 成本分布设置--三角形分布--历史换手衰减系数--改为0.1--应用--确定

衰减系数小了所有历史的筹码就显示出来了！

SSL与筹码分布指标（原码）

说明：由于指南针指标体系缺少相应功能的函数，这两个指标是在飞狐上实现的。

    SSL指标，及支撑与压力指标，由于指南针强行圈钱升级，一头热地神吹海捧，被K线见多识广的朋友一针尖见血披露其某种联系，成为指南针用户热门话题。其实它本来就是钱龙、分析家等股软的知名指标。

    第二个筹码分布指标，准确地说和指南针的不一样，因为没有进行历史衰减计算。但它的确是目前为止唯一能在一个股软指标平台上实现筹码分布的指标公式，为指标爱好者打造自己理解的筹码分布指标，提供了难能可贵的工具，大家可以不断优化。
    原指标使用成交量计算，修改为换手率；原指标是50根筹码线，根据指南针定制改成了100根。


SSL

a0:=BARSCOUNT(c);a3:=SYSPARAM(3);a2:=SYSPARAM(2);
a4:=SYSPARAM(4);a5:=SYSPARAM(5);
nn0:=a3-a2;nn:=a0-a2;hh1:=(a4-a5)/10;
y0:=a0>=a2;vv0:=if(y0=1 and SYSPARAM(1)>=a0,v,0);
c1:=if(BETWEEN(c,a4-0*hh1,a4-1*hh1),vv0,0);
c2:=if(BETWEEN(c,a4-1*hh1,a4-2*hh1),vv0,0);
c3:=if(BETWEEN(c,a4-2*hh1,a4-3*hh1),vv0,0);
c4:=if(BETWEEN(c,a4-3*hh1,a4-4*hh1),vv0,0);
c5:=if(BETWEEN(c,a4-4*hh1,a4-5*hh1),vv0,0);
c6:=if(BETWEEN(c,a4-5*hh1,a4-6*hh1),vv0,0);
c7:=if(BETWEEN(c,a4-6*hh1,a4-7*hh1),vv0,0);
c8:=if(BETWEEN(c,a4-7*hh1,a4-8*hh1),vv0,0);
c9:=if(BETWEEN(c,a4-8*hh1,a4-9*hh1),vv0,0);
c10:=if(BETWEEN(c,a4-9*hh1,a4-10*hh1),vv0,0);
v1:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c1,nn0),0),2));
v2:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c2,nn0),0),2));
v3:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c3,nn0),0),2));
v4:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c4,nn0),0),2));
v5:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c5,nn0),0),2));
v6:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c6,nn0),0),2));
v7:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c7,nn0),0),2));
v8:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c8,nn0),0),2));
v9:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c9,nn0),0),2));
v10:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c10,nn0),0),2));
av0:=max(v1,max(v2,max(v3,max(v4,max(v5,max(v6,max(v7,max(v8,max(v9,v10)))))))));
FILLRGN(v1/av0>=nn/nn0 and nn>=0,a4-0*hh1,a4-1*hh1+0.05),colorgray;
FILLRGN(v2/av0>=nn/nn0 and nn>=0,a4-1*hh1,a4-2*hh1+0.05),colorgray;
FILLRGN(v3/av0>=nn/nn0 and nn>=0,a4-2*hh1,a4-3*hh1+0.05),colorgray;
FILLRGN(v4/av0>=nn/nn0 and nn>=0,a4-3*hh1,a4-4*hh1+0.05),colorgray;
FILLRGN(v5/av0>=nn/nn0 and nn>=0,a4-4*hh1,a4-5*hh1+0.05),colorgray;
FILLRGN(v6/av0>=nn/nn0 and nn>=0,a4-5*hh1,a4-6*hh1+0.05),colorgray;
FILLRGN(v7/av0>=nn/nn0 and nn>=0,a4-6*hh1,a4-7*hh1+0.05),colorgray;
FILLRGN(v8/av0>=nn/nn0 and nn>=0,a4-7*hh1,a4-8*hh1+0.05),colorgray;
FILLRGN(v9/av0>=nn/nn0 and nn>=0,a4-8*hh1,a4-9*hh1+0.05),colorgray;
FILLRGN(v10/av0>=nn/nn0 and nn>=0,a4-9*hh1,a4-10*hh1+0.05),colorgray;

STICKLINE(c>=o,c,o,9,1),colorred;
STICKLINE(c>=o,l,o,0.1,0),colorred;
STICKLINE(c>=o,c,h,0.1,0),colorred;
STICKLINE(c
STICKLINE(c< P>

筹码分布

variable: pv[21]=1;//定义每个价格元内的累计换手率数组
n:=sysparam(3)-sysparam(1)+1;//光标k线到最后可见k线的k线数
nh1:=hhv(h,n);
nl1:=llv(l,n);
nh:=nh1[sysparam(3)]-nl1[sysparam(3)];//n周期内的高低价之差
nllv:=nl1[sysparam(3)];//n周期内的最低价
dp:=nh/20;//价格元
hsl:=5*vol/capital*100;//换手率
fh:=high;
fl:=low;
for i=sysparam(3) downto sysparam(1) do begin
   kh:=fh[i]-fl[i];//第i根k线的长度
   kms:=intpart((fl[i]-nllv)/dp)+1;//这根k线包含的第一个价格元序号
   kme:=intpart((fh[i]-nllv)/dp)+1;//这根k线包含的最后一个价格元序号
   for j=kms to kme do begin
       if nllv+(j-1)*dp

          if nllv+j*dp>fh[i] then
             pv[j]:=pv[j]+hsl[i];
          else
             pv[j]:=pv[j]+hsl[i]*(nllv+j*dp-fl[i])/kh;
       end;
       else
          if nllv+j*dp
             pv[j]:=pv[j]+hsl[i]*(dp/kh);
          else
             pv[j]:=pv[j]+hsl[i]*(fh[i]-nllv-(j-1)*dp)/kh;
   end;
end;
STICKLINE(barpos=sysparam(3),hhv(h,n),llv(l,n),2,0),SHIFT1;
drawsl(barpos=sysparam(3),llv(l,n),0,n,1),SHIFT1;
drawsl(barpos=sysparam(3),llv(l,n)+0.5*dp,0,pv[1],1),COLORGRAY,SHIFT1;
drawsl(barpos=sysparam(3),llv(l,n)+1.5*dp,0,pv[2],1),COLORGRAY,SHIFT1;
drawsl(barpos=sysparam(3),llv(l,n)+2.5*dp,0,pv[3],1),COLORGRAY,SHIFT1;
drawsl(barpos=sysparam(3),llv(l,n)+3.5*dp,0,pv[4],1),COLORGRAY,SHIFT1;
drawsl(barpos=sysparam(3),llv(l,n)+4.5*dp,0,pv[5],1),COLORGRAY,SHIFT1;
drawsl(barpos=sysparam(3),llv(l,n)+5.5*dp,0,pv[6],1),COLORGRAY,SHIFT1;
drawsl(barpos=sysparam(3),llv(l,n)+6.5*dp,0,pv[7],1),COLORGRAY,SHIFT1;
drawsl(barpos=sysparam(3),llv(l,n)+7.5*dp,0,pv[8],1),COLORGRAY,SHIFT1;
drawsl(barpos=sysparam(3),llv(l,n)+8.5*dp,0,pv[9],1),COLORGRAY,SHIFT1;
drawsl(barpos=sysparam(3),llv(l,n)+9.5*dp,0,pv[10],1),COLORGRAY,SHIFT1;
drawsl(barpos=sysparam(3),llv(l,n)+10.5*dp,0,pv[11],1),COLORGRAY,SHIFT1;
drawsl(barpos=sysparam(3),llv(l,n)+11.5*dp,0,pv[12],1),COLORGRAY,SHIFT1;
drawsl(barpos=sysparam(3),llv(l,n)+12.5*dp,0,pv[13],1),COLORGRAY,SHIFT1;
drawsl(barpos=sysparam(3),llv(l,n)+13.5*dp,0,pv[14],1),COLORGRAY,SHIFT1;
drawsl(barpos=sysparam(3),llv(l,n)+14.5*dp,0,pv[15],1),COLORGRAY,SHIFT1;
drawsl(barpos=sysparam(3),llv(l,n)+15.5*dp,0,pv[16],1),COLORGRAY,SHIFT1;
drawsl(barpos=sysparam(3),llv(l,n)+16.5*dp,0,pv[17],1),COLORGRAY,SHIFT1;
drawsl(barpos=sysparam(3),llv(l,n)+17.5*dp,0,pv[18],1),COLORGRAY,SHIFT1;
drawsl(barpos=sysparam(3),llv(l,n)+18.5*dp,0,pv[19],1),COLORGRAY,SHIFT1;
drawsl(barpos=sysparam(3),llv(l,n)+19.5*dp,0,pv[20],1),COLORGRAY,SHIFT1;
{★移动筹码}
DRAWGBK(C,COLORRGB(90,10,10),COLORRGB(90,10,10),0);

nn0:=SYSPARAM(3)-SYSPARAM(2);
nn:=BARSCOUNT(c)-SYSPARAM(2);
hh1:=(SYSPARAM(4)-SYSPARAM(5))/10;
y0:=BARSCOUNT(c)>=SYSPARAM(2);
vv0:=if(y0=1 and SYSPARAM(1)>=BARSCOUNT(c),v,0);
c1:=if(BETWEEN(c,SYSPARAM(4)-0*hh1,SYSPARAM(4)-0.5*hh1),vv0,0);
c2:=if(BETWEEN(c,SYSPARAM(4)-0.5*hh1,SYSPARAM(4)-1*hh1),vv0,0);
c3:=if(BETWEEN(c,SYSPARAM(4)-1*hh1,SYSPARAM(4)-1.5*hh1),vv0,0);
c4:=if(BETWEEN(c,SYSPARAM(4)-1.5*hh1,SYSPARAM(4)-2*hh1),vv0,0);
c5:=if(BETWEEN(c,SYSPARAM(4)-2*hh1,SYSPARAM(4)-2.5*hh1),vv0,0);
c6:=if(BETWEEN(c,SYSPARAM(4)-2.5*hh1,SYSPARAM(4)-3*hh1),vv0,0);
c7:=if(BETWEEN(c,SYSPARAM(4)-3*hh1,SYSPARAM(4)-3.5*hh1),vv0,0);
c8:=if(BETWEEN(c,SYSPARAM(4)-3.5*hh1,SYSPARAM(4)-4*hh1),vv0,0);
c9:=if(BETWEEN(c,SYSPARAM(4)-4*hh1,SYSPARAM(4)-4.5*hh1),vv0,0);
c10:=if(BETWEEN(c,SYSPARAM(4)-4.5*hh1,SYSPARAM(4)-5*hh1),vv0,0);
c11:=if(BETWEEN(c,SYSPARAM(4)-5*hh1,SYSPARAM(4)-5.5*hh1),vv0,0);
c12:=if(BETWEEN(c,SYSPARAM(4)-5.5*hh1,SYSPARAM(4)-6*hh1),vv0,0);
c13:=if(BETWEEN(c,SYSPARAM(4)-6*hh1,SYSPARAM(4)-6.5*hh1),vv0,0);
c14:=if(BETWEEN(c,SYSPARAM(4)-6.5*hh1,SYSPARAM(4)-7*hh1),vv0,0);
c15:=if(BETWEEN(c,SYSPARAM(4)-7*hh1,SYSPARAM(4)-7.5*hh1),vv0,0);
c16:=if(BETWEEN(c,SYSPARAM(4)-7.5*hh1,SYSPARAM(4)-8*hh1),vv0,0);
c17:=if(BETWEEN(c,SYSPARAM(4)-8*hh1,SYSPARAM(4)-8.5*hh1),vv0,0);
c18:=if(BETWEEN(c,SYSPARAM(4)-8.5*hh1,SYSPARAM(4)-9*hh1),vv0,0);
c19:=if(BETWEEN(c,SYSPARAM(4)-9*hh1,SYSPARAM(4)-9.5*hh1),vv0,0);
c20:=if(BETWEEN(c,SYSPARAM(4)-9.5*hh1,SYSPARAM(4)-10*hh1),vv0,0);

v1:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c1,nn0),0),2));
v2:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c2,nn0),0),2));
v3:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c3,nn0),0),2));
v4:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c4,nn0),0),2));
v5:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c5,nn0),0),2));
v6:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c6,nn0),0),2));
v7:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c7,nn0),0),2));
v8:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c8,nn0),0),2));
v9:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c9,nn0),0),2));
v10:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c10,nn0),0),2));
v11:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c11,nn0),0),2));
v12:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c12,nn0),0),2));
v13:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c13,nn0),0),2));
v14:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c14,nn0),0),2));
v15:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c15,nn0),0),2));
v16:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c16,nn0),0),2));
v17:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c17,nn0),0),2));
v18:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c18,nn0),0),2));
v19:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c19,nn0),0),2));
v20:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c20,nn0),0),2));

av0:=max(v1,max(v2,max(v3,max(v4,max(v5,max(v6,max(v7,max(v8,max(v9,max(v10,max(V11,max(V12,max(V13,max(V14,max(V15,max(V16,max(V17,max(V18,max(V19,V20)))))))))))))))))));
FILLRGN(v1/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-0*hh1,SYSPARAM(4)-0.5*hh1+0.05),ColorF16085;
FILLRGN(v2/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-0.5*hh1,SYSPARAM(4)-1*hh1+0.05),Color008591;
FILLRGN(v3/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-1*hh1,SYSPARAM(4)-1.5*hh1+0.05),ColorF16085;
FILLRGN(v4/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-1.5*hh1,SYSPARAM(4)-2*hh1+0.05),Color008591;
FILLRGN(v5/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-2*hh1,SYSPARAM(4)-2.5*hh1+0.05),ColorF16085;
FILLRGN(v6/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-2.5*hh1,SYSPARAM(4)-3*hh1+0.05),Color008591;
FILLRGN(v7/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-3*hh1,SYSPARAM(4)-3.5*hh1+0.05),ColorF16085;
FILLRGN(v8/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-3.5*hh1,SYSPARAM(4)-4*hh1+0.05),Color008591;
FILLRGN(v9/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-4*hh1,SYSPARAM(4)-4.5*hh1+0.05),ColorF16085;
FILLRGN(v10/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-4.5*hh1,SYSPARAM(4)-5*hh1+0.05),Color008591;
FILLRGN(v11/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-5*hh1,SYSPARAM(4)-5.5*hh1+0.05),ColorF16085;
FILLRGN(v12/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-5.5*hh1,SYSPARAM(4)-6*hh1+0.05),Color008591;
FILLRGN(v13/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-6*hh1,SYSPARAM(4)-6.5*hh1+0.05),ColorF16085;
FILLRGN(v14/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-6.5*hh1,SYSPARAM(4)-7*hh1+0.05),Color008591;
FILLRGN(v15/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-7*hh1,SYSPARAM(4)-7.5*hh1+0.05),ColorF16085;
FILLRGN(v16/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-7.5*hh1,SYSPARAM(4)-8*hh1+0.05),Color008591;
FILLRGN(v17/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-8*hh1,SYSPARAM(4)-8.5*hh1+0.05),ColorF16085;
FILLRGN(v18/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-8.5*hh1,SYSPARAM(4)-9*hh1+0.05),Color008591;
FILLRGN(v19/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-9*hh1,SYSPARAM(4)-9.5*hh1+0.05),ColorF16085;
FILLRGN(v20/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-9.5*hh1,SYSPARAM(4)-10*hh1+0.05),Color008591;

stickline(c>=o,c,o,6.6,1),colorff;
stickline(c>=o,l,o,0.1,0),colorff;
stickline(c>=o,c,h,0.1,0),colorff;
stickline(c
stickline(c