请问如何用subin函数顺序读取文本文件内容

wenzerg

我想用grads顺序读一个文本文件中站点号和经纬度信息，里边的内容如下：


然后编写如下脚本：
'reinit'
filename='D:\DAO\936.dat'
r=read(filename)
line1=sublin(r,1) *读第一行状态码
say line1


num=2
while (num<=10) *先读10行
line2=sublin(r,num) *第一行可以读出来
station=subwrd(r,2) *提取站点号
say line2
say station
num=num+1
endwhile




这时只能显示第一行：50136   50136     53.28    122.22    297.30
从第二行开始就不能显示，请教各位该如何解决？