1. 定义环境变量 hwnd
2. 注释：初始化镜头
3. 令 Hwnd = Window.Foreground()
4. 令 title = Window.GetText(hwnd)
5. 调用 Bkgnd.KeyPress(Hwnd,35)
6. 延时 50 毫秒
7. 循环 10 次
8.     调用 Bkgnd.KeyPress(Hwnd,36)
9.     延时 50 毫秒
10. 循环结束
11. 注释：获取窗口坐标
12. 令 rect = Window.GetClientRect(Hwnd)
13. 令 rect = Split(rect,"|")
14. 注释：开始
15. (语句无法识别，可能有错误): 开始线程=BeginThread(开始)
16. (语句无法识别，可能有错误): 计时线程=BeginThread(计时)
17. 子程序 开始()
18.     注释：获取窗口坐标
19.     令 rect = Window.GetClientRect(Hwnd)
20.     令 rect = Split(rect,"|")
21.     注释：定义屏幕矩形变量
22.     定义变量 x1
23.     定义变量 y1
24.     定义变量 x2
25.     定义变量 y2
26.     注释：变量赋值
27.     令 x1 = rect(0) + rect(2) / 2 - rect(2) / 4
28.     令 y1 = rect(1) + rect(3) / 2
29.     令 x2 = rect(0) + rect(2) / 2 + rect(2) / 4
30.     令 y2 = rect(1) + rect(3) / 2 + rect(3) / 3
31.     令 数量 = 0
32.     标记 fish(子程序 开始)
33.     锁定鼠标位置
34.     注释：放鱼竿
35.     （键盘）按 1 键, 1次
36.     注释：移动鼠标遍历屏幕直到找到鱼漂
37.     令 intA = x1
38.     令 intB = y1
39.     令 i = 0
40.     令 j = 0
41.     （鼠标）移动到 (intA, intB)
42.     延时 1000 毫秒
43.     注释：获取鼠标形状，1053591638为鱼钩形状
44.     令 shape = 返回当前鼠标的形状特征（0）
45.     注释：如果鼠标不是鱼钩形状则循环
46.     循环当 shape <> 1053591638 时
47.         如果 intA + 5 > x2 则
48.             如果 intB + 50 > y2 则
49.                 跳出循环
50.             否则
51.                 令 intA = x1
52.                 令 intB = intB + 30
53.             条件结束
54.         否则
55.             令 intA = intA + rect(2) / 100
56.         条件结束
57.         （鼠标）移动到 (intA, intB)
58.         令 shape = 返回当前鼠标的形状特征（0）
59.         延时 10 毫秒
60.     循环结束
61.     注释：将鼠标向左移动到鱼漂最左方恰好不变形状的位置
62.     循环当 shape = 1053591638 时
63.         （鼠标）移动到 (intA, intB)
64.         如果 shape = 1053591638 则
65.             令 intA = intA - 1
66.             延时 5 毫秒
67.         条件结束
68.         令 shape = 返回当前鼠标的形状特征（0）
69.     循环结束
70.     注释：将鼠标向右移动到鱼漂左方恰好变形状的位置
71.     循环当 shape <> 1053591638 时
72.         （鼠标）移动到 (intA, intB)
73.         如果 shape <> 1053591638 则
74.             令 intA = intA + 1
75.             令 j = j + 1
76.             如果 j > 15 则
77.                 注释：15次未找到则认为出错，提出循环
78.             条件结束
79.             跳出循环
80.         条件结束
81.         延时 50 毫秒
82.     条件结束
83.     令 xx1 = intA
84.     令 shape = 返回当前鼠标的形状特征（0）
85. 循环结束
86. 注释：将鼠标向右移动到鱼漂最右方恰好不变形状的位置
87. 循环当 shape = 1053591638 时
88.     （鼠标）移动到 (intA, intB)
89.     如果 shape = 1053591638 则
90.         令 intA = intA + 1
91.         延时 5 毫秒
92.     条件结束
93.     令 shape = 返回当前鼠标的形状特征（0）
94. 循环结束
95. 注释：将鼠标向左移动到鱼漂右方恰好变形状的位置
96. 循环当 shape <> 1053591638 时
97.     （鼠标）移动到 (intA, intB)
98.     如果 shape <> 1053591638 则
99.         令 intA = intA - 1
100.         令 j = j + 1