- 用户定义变量 Var1=DropList{作者QQ:939130693:2|作者QQ:939130693:3}=0 ★第1步请先打开你要使用的窗口★
- 用户定义变量 Var2=DropList{WINDOWS经典模式:2|作者QQ:939130693:3}=0 ★然后在桌面空白地方点一下鼠标左键★
- 用户定义变量 Var3=DropList{32色:2|作者QQ:939130693:3}=0 ★现在您可以按启动热键开始工作了★
- dim tp(10)
- dim i
- dim wpx,wpy
- tp(0)="Attachment:\卡.bmp"
- tp(1)="Attachment:\合成炉寒铁.bmp"
- tp(2)="Attachment:\合成炉火铜.bmp"
- tp(3)="Attachment:\合成炉密银.bmp"
- tp(4)="Attachment:\合成炉金髓.bmp"
- tp(5)="Attachment:\合成炉水晶.bmp"
- tp(6)="Attachment:\合成炉白金.bmp"
- tp(7)="Attachment:\合成炉星沙.bmp"
- tp(8)="Attachment:\合成炉太阴.bmp"
- tp(9)="Attachment:\合成炉太阳.bmp"
- tp(10)="Attachment:\合成炉天魂.bmp"
- 延时2000毫秒
- 按住<Alt>
- 按键<Esc>
- 弹起<Alt>
- 延时200毫秒
- 按键<Enter>
- 延时1000毫秒
- 调用插件命令 hwnd=Window.MousePoint()
- 调用插件命令 biaoti=Window.GetText(hwnd)
- 调用插件命令 hwnd=Window.Find(0,"biaoti")
- 调用插件命令 Window.Active(hwnd)
- 调用插件命令 hwnd = Window.GetKeyFocusWnd()
- 调用插件命令 Window.Move(hwnd,0,0)
- 标记 查龙城
- 调用外部VBScript子程序 在屏幕区域里查找图形(650,0,799,50,"Attachment:\龙城.bmp",0.8,zx,zy)
- 如果表达式 (X>0 and y>0) 为真,则
- 按键<F11>
- 否则
- i=0
- 如果表达式 (i<2) 为真,则
- 调用外部VBScript子程序 在屏幕区域里查找图形(650,0,799,50,"Attachment:\龙城.bmp",0.8,zx,zy)
- 如果表达式 (x>0) 为真,则
- 鼠标移到 x+5 , y+5
- 调用子程序 点鼠标
- 跳转到标记 查到回城卷
- 条件结束
- 调用外部VBScript子程序 在屏幕区域里查找图形(650,0,799,50,"Attachment:\龙城.bmp",0.8,zx,zy)
- 如果表达式 (x=-1) 为真,则
- 鼠标移到 468 , 590
- 调用子程序 点鼠标
- 条件结束
- 调用外部VBScript子程序 在屏幕区域里查找图形(650,0,799,50,"Attachment:\龙城.bmp",0.8,zx,zy)
- 如果表达式 (x>0) 为真,则
- 鼠标移到 x+5 , y+5
- 调用子程序 点鼠标
- 跳转到标记 查龙城
- 条件结束
- i=i+1
- 条件结束
- 调用外部VBScript子程序 在屏幕区域里查找图形(650,0,799,50,"Attachment:\龙城.bmp",0.8,zx,zy)
- 调用外部VBScript子程序 在屏幕区域里查找图形(650,0,799,50,"Attachment:\龙城.bmp",0.8,zx,zy)
- 调用外部VBScript子程序 在屏幕区域里查找图形(650,0,799,50,"Attachment:\龙城.bmp",0.8,zx,zy)
- 如果表达式 (clx>0) 为真,则
- hdx=530:hdy=403:FKTXZy=340
- 调用子程序 自动跑NPC
- 否则如果(yxx>0)为真,则
- hdx=392:hdy=177:FKTXZy=320
- 调用子程序 自动跑NPC
- 否则如果(ydx>0)为真,则
- hdx=333:hdy=195:FKTXZy=320
- 调用子程序 自动跑NPC
- 否则
- 鼠标移到 706 , 195
- 调用子程序 点鼠标
- 鼠标移到 645 , 238
- 调用子程序 点鼠标
- 鼠标移到 464 , 260
- 调用子程序 点鼠标
- 跳转到标记 查龙城
- 条件结束
- 标记 传送1
- 鼠标移到 711 , 114
- 调用子程序 点鼠标
- 鼠标移到 404 , 280
- 调用子程序 点鼠标
- 按键<Enter>
- 标记 找传送
- 调用外部VBScript子程序 在屏幕区域里查找图形(650,0,799,50,"Attachment:\龙城.bmp",0.8,zx,zy)
- 如果表达式 (x>0) 为真,则
- 鼠标移到 273 , 447
- 延时200毫秒
- 左键单击
- 延时32毫秒
- 否则
- 延时200毫秒
- 跳转到标记 找传送
- 条件结束
- 条件结束
- 条件结束
- 鼠标移到 711 , 114
- 调用子程序 点鼠标
- 标记 到了炉子旁
- 调用外部VBScript子程序 在屏幕区域里查找图形(650,0,799,50,"Attachment:\龙城.bmp",0.8,zx,zy)