sys(16) - 正在执行的程序文件名示例

在下面的小程序示例中返回程序嵌套数目：

store 1 to gnx
do while len(sys(16,gnx)) != 0
? sys(16,gnx)
store gnx+1 to gnx
enddo