- 如果 (tx+1,ty+3) 的颜色大约等于 #clfont 则
- num=5
- 否则
- num=2
- 条件结束
- 条件结束
- 否则
- 如果 (tx+3,ty+1) 的颜色大约等于 #clfont 则
- 如果 (tx+1,ty+7) 的颜色大约等于 #clfont 则
- num=4
- 否则
- num=1
- 条件结束
- 否则
- 如果 (tx+4,ty+2) 的颜色大约等于 #clfont 则
- 如果 (tx+4,ty+1) 的颜色大约等于 #clfont 则
- num=8
- 否则
- num=7
- 条件结束
- 否则
- 如果 (tx+2,ty+1) 的颜色大约等于 #clfont 则
- num=6
- 否则
- num=0
- 条件结束
- 条件结束
- 条件结束
- 条件结束
- 子程序结束,回到调用处
- 子程序 读取坐标
- tx=cx+892:ty=cy+54:i=0:clfont="E0E0E0":num=0
- 调用子程序 读取单个坐标值
- 如果表达式 (num<>2) 为真,则
- tx=tx+1
- 调用子程序 读取单个坐标值
- 如果表达式 (num<>2) 为真,则
- tx=tx-2
- 条件结束
- 条件结束
- 循环 2 遍
- pxy(i)=0
- 循环 4 遍
- 调用子程序 读取单个坐标值
- pxy(i)=pxy(i)*10+num
- 如果表达式 (num=8) 为真,则
- tx=tx+7
- 否则
- 如果表达式 (num=0) 为真,则
- tx=tx+7
- 否则
- tx=tx+6
- 条件结束
- 条件结束
- 循环结束
- i=i+1
- tx=tx+6
- 循环结束
- 子程序结束,回到调用处
- 子程序 读取单个坐标值
- 如果 (tx+4,ty+1) 的颜色大约等于 #clfont 则
- 如果 (tx+4,ty+4) 的颜色大约等于 #clfont 则
- 如果 (tx+4,ty+2) 的颜色大约等于 #clfont 则
- num=4
- 否则
- num=2
- 条件结束
- 否则
- 如果 (tx+1,ty+3) 的颜色大约等于 #clfont 则
- num=0
- 否则
- 如果 (tx,ty+4) 的颜色大约等于 #clfont 则
- num=9
- 否则
- num=3
- 条件结束
- 条件结束
- 条件结束
- 否则
- 如果 (tx+5,ty+1) 的颜色大约等于 #clfont 则
- 如果 (tx+1,ty+5) 的颜色大约等于 #clfont 则
- num=8
- 否则
- num=7
- 条件结束
- 否则
- 如果 (tx+2,ty+3) 的颜色大约等于 #clfont 则
- 如果 (tx+1,ty+4) 的颜色大约等于 #clfont 则
- num=6
- 否则
- num=5
- 条件结束
- 否则
- 如果 (tx+3,ty) 的颜色大约等于 #clfont 则
- num=1
- 否则
- num=0
- 条件结束
- 条件结束
- 条件结束