1. 用户定义变量 Var1=DropList{作者QQ:939130693:2|作者QQ:939130693:3}=0 ★第1步请先打开你要使用的窗口★
  2. 用户定义变量 Var2=DropList{WINDOWS经典模式:2|作者QQ:939130693:3}=0 ★然后在桌面空白地方点一下鼠标左键★
  3. 用户定义变量 Var3=DropList{32色:2|作者QQ:939130693:3}=0 ★现在您可以按启动热键开始工作了★
  4. dim tp(10)
  5. dim i
  6. dim wpx,wpy
  7. tp(0)="Attachment:\卡.bmp"
  8. tp(1)="Attachment:\合成炉寒铁.bmp"
  9. tp(2)="Attachment:\合成炉火铜.bmp"
  10. tp(3)="Attachment:\合成炉密银.bmp"
  11. tp(4)="Attachment:\合成炉金髓.bmp"
  12. tp(5)="Attachment:\合成炉水晶.bmp"
  13. tp(6)="Attachment:\合成炉白金.bmp"
  14. tp(7)="Attachment:\合成炉星沙.bmp"
  15. tp(8)="Attachment:\合成炉太阴.bmp"
  16. tp(9)="Attachment:\合成炉太阳.bmp"
  17. tp(10)="Attachment:\合成炉天魂.bmp"
  18. 延时2000毫秒
  19. 按住<Alt>
  20. 按键<Esc>
  21. 弹起<Alt>
  22. 延时200毫秒
  23. 按键<Enter>
  24. 延时1000毫秒
  25. 调用插件命令 hwnd=Window.MousePoint()
  26. 调用插件命令 biaoti=Window.GetText(hwnd)
  27. 调用插件命令 hwnd=Window.Find(0,"biaoti")
  28. 调用插件命令 Window.Active(hwnd)
  29. 调用插件命令 hwnd = Window.GetKeyFocusWnd()
  30. 调用插件命令 Window.Move(hwnd,0,0)
  31. 标记 查龙城
  32. 调用外部VBScript子程序 在屏幕区域里查找图形(650,0,799,50,"Attachment:\龙城.bmp",0.8,zx,zy)
  33. 如果表达式 (X>0 and y>0) 为真,则
  34.     按键<F11>
  35. 否则
  36.     i=0
  37.     如果表达式 (i<2) 为真,则
  38.         调用外部VBScript子程序 在屏幕区域里查找图形(650,0,799,50,"Attachment:\龙城.bmp",0.8,zx,zy)
  39.         如果表达式 (x>0) 为真,则
  40.             鼠标移到 x+5 , y+5
  41.             调用子程序 点鼠标
  42.             跳转到标记 查到回城卷
  43.         条件结束
  44.         调用外部VBScript子程序 在屏幕区域里查找图形(650,0,799,50,"Attachment:\龙城.bmp",0.8,zx,zy)
  45.         如果表达式 (x=-1) 为真,则
  46.             鼠标移到 468 , 590
  47.             调用子程序 点鼠标
  48.         条件结束
  49.         调用外部VBScript子程序 在屏幕区域里查找图形(650,0,799,50,"Attachment:\龙城.bmp",0.8,zx,zy)
  50.         如果表达式 (x>0) 为真,则
  51.             鼠标移到 x+5 , y+5
  52.             调用子程序 点鼠标
  53.             跳转到标记 查龙城
  54.         条件结束
  55.         i=i+1
  56.     条件结束
  57.     调用外部VBScript子程序 在屏幕区域里查找图形(650,0,799,50,"Attachment:\龙城.bmp",0.8,zx,zy)
  58.     调用外部VBScript子程序 在屏幕区域里查找图形(650,0,799,50,"Attachment:\龙城.bmp",0.8,zx,zy)
  59.     调用外部VBScript子程序 在屏幕区域里查找图形(650,0,799,50,"Attachment:\龙城.bmp",0.8,zx,zy)
  60.     如果表达式 (clx>0) 为真,则
  61.         hdx=530:hdy=403:FKTXZy=340
  62.         调用子程序 自动跑NPC
  63.     否则如果(yxx>0)为真,则
  64.         hdx=392:hdy=177:FKTXZy=320
  65.         调用子程序 自动跑NPC
  66.     否则如果(ydx>0)为真,则
  67.         hdx=333:hdy=195:FKTXZy=320
  68.         调用子程序 自动跑NPC
  69.     否则
  70.         鼠标移到 706 , 195
  71.         调用子程序 点鼠标
  72.         鼠标移到 645 , 238
  73.         调用子程序 点鼠标
  74.         鼠标移到 464 , 260
  75.         调用子程序 点鼠标
  76.         跳转到标记 查龙城
  77.     条件结束
  78.     标记 传送1
  79.     鼠标移到 711 , 114
  80.     调用子程序 点鼠标
  81.     鼠标移到 404 , 280
  82.     调用子程序 点鼠标
  83.     按键<Enter>
  84.     标记 找传送
  85.     调用外部VBScript子程序 在屏幕区域里查找图形(650,0,799,50,"Attachment:\龙城.bmp",0.8,zx,zy)
  86.     如果表达式 (x>0) 为真,则
  87.         鼠标移到 273 , 447
  88.         延时200毫秒
  89.         左键单击
  90.         延时32毫秒
  91.     否则
  92.         延时200毫秒
  93.         跳转到标记 找传送
  94.     条件结束
  95. 条件结束
  96. 条件结束
  97. 鼠标移到 711 , 114
  98. 调用子程序 点鼠标
  99. 标记 到了炉子旁
  100. 调用外部VBScript子程序 在屏幕区域里查找图形(650,0,799,50,"Attachment:\龙城.bmp",0.8,zx,zy)