节点分布不规则，编号如何提取

MILAN3

节点横平竖直排列，但是两点间的间距不规则，有的间距大，有的间距小，如果所示，想按位置提取这些节点的编号，设
想的命令流如下
*dim num,1000,array                                      假设共1000个节点，建立数组，用于存放节点编号
*do,i,1,10,1                                                      X向循环，坐标值从1到10，每次递进1，保证覆盖所有可能节点位置
       *do,j,1,10,1                                               Y向循环，坐标值从1到10，每次递进1，保证覆盖所有可能节点位置
        if,node(i,j,0)=1                                          这一命令虚构，意思为如果(i,j,0)这一位置有节点
        then, num(k,1)=node(i,j,0)                       节点编号存入数组
        k=k+1                                                       数组内单元格到下一个
        else, j=j+1                                                 这一命令虚构，意思为如果(i,j,0)这一位置没有节点，则Y坐标步进1，搜索下一位置
        *enddo                                                      Y方向搜索完成，即搜索完了1列
        i=i+1                                                          X坐标步进1，搜索下一列
*enddo                                                              X方向搜索完成，即整个区域搜索完成

以上是本人的一点想法，为了说明问题，虚构了一些命令流，请教高手，这种方法可以实现吗？正确的命令流应该怎么编写？
是不是还有其它种方法可以实现这一要求？
谢谢。