input:N(100,1,10000);
llv(v,N);
ll:=llvbars(v,N);
bp:ref(barpos,LL),linethick0;
vertline(barpos=bp[datacount]);
vertline(barpos=datacount-ll[datacount]); //驗證用
bp1:ref(barpos,LL[sysparam(1)]),linethick0;
vertline(barpos=bp[sysparam(1)]),coloryellow,pointdot;