- 注释:取得剩余跑商次数
- 函数 Get_RemainTime()
- 定义变量 a(9)
- 令 a(0) = "0111010001100011000110001100011000101110=0"
- 令 a(1) = "0010001100001000010000100001000010001110=1"
- 令 a(2) = "0111010001100010001000100010001000011111=2"
- 令 a(3) = "0111010001000010011000001000011000101110=3"
- 令 a(4) = "0001000110010100101010010011110001000011=4"
- 令 a(5) = "1111110000100001111000001000011000101110=5"
- 令 a(6) = "0111010010100001011011001100011000101110=6"
- 令 a(7) = "1111110010000100010000100001000010000100=7"
- 令 a(8) = "0111010001100010111010001100011000101110=8"
- 令 a(9) = "0111010001100011000101111000010100101110=9"
- 令 RemainTime = RFNO.GetNumberEx(L + 167,T + 318,"010178",2,a,5,8,1)
- 令 RemainTime = Clng(RemainTime)
- 函数结束
- 注释:去猎场
- 函数 Go_LC()
- (键盘)按 "M" 键, 1次
- 延时 300 毫秒
- (鼠标)移动到 (L + 640, T + 120)
- 延时 300 毫秒
- (鼠标)左键单击, 1次
- 延时 300 毫秒
- 输入文本 "传送"
- 延时 300 毫秒
- (鼠标)移动到 (L + 774, T + 120)
- 延时 300 毫秒
- (鼠标)左键单击, 1次
- 延时 300 毫秒
- (鼠标)移动到 (L + 676, T + 448)
- 延时 300 毫秒
- (鼠标)左键单击, 1次
- 延时 300 毫秒
- (键盘)按 "M" 键, 1次
- 延时 300 毫秒
- 令 i = 0
- 循环当 i = 0 时
- 从左上到右下查找图片 "Attachment:\传送中心广场.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:L 上:T 右:L + 200 下:T + 200),相似度 0.9
- 如果 intX > 0 并且 intY > 0 则
- 令 i = 1
- (鼠标)移动到 (L + 92, T + 220)
- 延时 300 毫秒
- (鼠标)左键单击, 1次
- 延时 300 毫秒
- (鼠标)移动到 (L + 114, T + 298)
- 延时 300 毫秒
- (鼠标)左键单击, 1次
- 条件结束
- 延时 3000 毫秒
- 循环结束
- 注释:判断是否在猎场
- 令 i = 0
- 循环当 i = 0 时
- 从左上到右下查找图片 "Attachment:\猎场.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:L + 664 上:T 右:L + 800 下:T + 45),相似度 0.9
- 如果 intX > 0 并且 intY > 0 则
- 令 i = 1
- 条件结束
- 循环结束
- 函数结束
- 注释:去帮会NPC,并取得剩余跑商次数
- 函数 Go_BH_gettime
- (键盘)按 "M" 键, 1次
- 延时 300 毫秒
- (鼠标)移动到 (L + 640, T + 120)
- 延时 300 毫秒
- (鼠标)左键单击, 1次
- 延时 300 毫秒
- 输入文本 "壹其座"
- 延时 300 毫秒
- (鼠标)移动到 (L + 774, T + 120)
- 延时 300 毫秒
- (鼠标)左键单击, 1次
- 延时 300 毫秒
- (鼠标)移动到 (L + 676, T + 448)
- 延时 300 毫秒
- (鼠标)左键单击, 1次
- 延时 300 毫秒
- (键盘)按 "M" 键, 1次
- 延时 300 毫秒
- 注释:判断是否已经打开 帮会任务NPC 对话界面,并接取跑商任务
- 令 i = 0
- 循环当 i = 0 时
- 从左上到右下查找图片 "Attachment:\帮会跑商NPC.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:L 上:T 右:L + 300 下:T + 300),相似度 0.9
- 如果 intX > 0 并且 intY > 0 则
- 令 i = 1
- (鼠标)移动到 (L + 153, T + 225)
- 延时 300 毫秒
- (鼠标)左键单击, 1次
- 延时 300 毫秒
- (鼠标)滚轮滚动 - 6 下
- 延时 300 毫秒
- (鼠标)滚轮滚动 - 6 下
- 延时 300 毫秒
- (鼠标)滚轮滚动 - 6 下
- 延时 300 毫秒
- (鼠标)移动到 (L + 128, T + 390)
- 延时 300 毫秒
- (鼠标)左键单击, 1次
- 延时 300 毫秒