If j>a(i) 
Else 
j=a(i) 
h=i 
EndIf 
i=i+1 
wend 
a(h)=0 
q(p)=h 
p=p+1 
wend 
g=1 
u=1 
num=0
//读取到有数字返回值为 num， 没读取到有数字返回值为0
If n=0 then
num=1
Else 
For n 
num=num+b(q(g))*10^(g-1) 
g=g+1 
Next 
End If 
'jiaqian(cishu)=num //这些都是测试时用的，可以不必理
'lx=leftx+30
'leftx=leftx+30
'rightx=rightx+30 
'cishu=cishu+1
wupin=JQ*num //改初始坐标
End Function