原帖由 logoslogos 于 2014-1-28 23:43 发表
好像我改一下对付能用了。。。
当你依照7楼的方式在小窗口调整参数N时,划线会随着一直变动,"""""""""""方便观查小浪顶的契合度""""""""""""""""
INPUT:N(4,4,10000);
drawnumber(sysparam(1)=barpos,h*1.05,barpos,0),colorffffff;
input:kpos(50,50,100000);
partline(barpos>=kpos,pow(sqrt(n)+0.5,2)),colorgreen;
partline(barpos>=kpos,pow(sqrt(n)+1,2)),colorwhite;
partline(barpos>=kpos,pow(sqrt(n)+1.5,2)),colorwhite;
partline(barpos>=kpos,pow(sqrt(n)+2,2)),colorgreen;
partline(barpos>=kpos,pow(sqrt(n)+2.5,2)),colorwhite;
partline(barpos>=kpos,pow(sqrt(n)+3,2)),colorwhite;
partline(barpos>=kpos,pow(sqrt(n)+3.5,2)),colorgreen;
partline(barpos>=kpos,pow(sqrt(n)+4,2)),colorwhite;
drawnumber(barpos>=kpos and barpos-kpos=10,pow(sqrt(n)+0.5,2),pow(sqrt(n)+0.5,2),2),colorgreen;
drawnumber(barpos>=kpos and barpos-kpos=10,pow(sqrt(n)+1,2),pow(sqrt(n)+1,2),2),colorwhite;
drawnumber(barpos>=kpos and barpos-kpos=10,pow(sqrt(n)+1.5,2),pow(sqrt(n)+1.5,2),2),colorwhite;
drawnumber(barpos>=kpos and barpos-kpos=10,pow(sqrt(n)+2,2),pow(sqrt(n)+2,2),2),colorgreen;
drawnumber(barpos>=kpos and barpos-kpos=10,pow(sqrt(n)+2.5,2),pow(sqrt(n)+2.5,2),2),colorwhite;
drawnumber(barpos>=kpos and barpos-kpos=10,pow(sqrt(n)+3,2),pow(sqrt(n)+3,2),2),colorwhite;
drawnumber(barpos>=kpos and barpos-kpos=10,pow(sqrt(n)+3.5,2),pow(sqrt(n)+3.5,2),2),colorgreen;
drawnumber(barpos>=kpos and barpos-kpos=10,pow(sqrt(n)+4,2),pow(sqrt(n)+4,2),2),colorwhite;
-------------------------------------------------
INPUT:M(4,4,10000);
drawnumber(sysparam(1)=barpos,h*1.05,barpos,0),colorffffff;
input:Lpos(50,50,100000);
partline(barpos>=Lpos,pow(sqrt(m)-0.5,2)),colormagenta;
partline(barpos>=Lpos,pow(sqrt(m)-1,2)),coloryellow;
partline(barpos>=Lpos,pow(sqrt(m)-1.5,2)),coloryellow;
partline(barpos>=Lpos,pow(sqrt(m)-2,2)),colormagenta;
partline(barpos>=Lpos,pow(sqrt(m)-2.5,2)),coloryellow;
partline(barpos>=Lpos,pow(sqrt(m)-3,2)),coloryellow;
partline(barpos>=Lpos,pow(sqrt(m)-3.5,2)),colormagenta;
partline(barpos>=Lpos,pow(sqrt(m)-4,2)),coloryellow;
drawnumber(barpos>=Lpos and barpos-Lpos=10,pow(sqrt(m)-0.5,2),pow(sqrt(m)-0.5,2),2),colormagenta;
drawnumber(barpos>=Lpos and barpos-Lpos=10,pow(sqrt(m)-1,2),pow(sqrt(m)-1,2),2),coloryellow;
drawnumber(barpos>=Lpos and barpos-Lpos=10,pow(sqrt(m)-1.5,2),pow(sqrt(m)-1.5,2),2),coloryellow;
drawnumber(barpos>=Lpos and barpos-Lpos=10,pow(sqrt(m)-2,2),pow(sqrt(m)-2,2),2),colormagenta;
drawnumber(barpos>=Lpos and barpos-Lpos=10,pow(sqrt(m)-2.5,2),pow(sqrt(m)-2.5,2),2),coloryellow;
drawnumber(barpos>=Lpos and barpos-Lpos=10,pow(sqrt(m)-3,2),pow(sqrt(m)-3,2),2),coloryellow;
drawnumber(barpos>=Lpos and barpos-Lpos=10,pow(sqrt(m)-3.5,2),pow(sqrt(m)-3.5,2),2),colormagenta;
drawnumber(barpos>=Lpos and barpos-Lpos=10,pow(sqrt(m)-4,2),pow(sqrt(m)-4,2),2),coloryellow; |