1. //捡物品线程
  2. BeginThread "ThreadGetThing"
  3. BeginThread "ThreadGetThing"
  4. 如果表达式 (1) 为真,则循环执行
  5.     如果表达式 (1) 为真,则循环执行
  6.         标记 开始
  7.         标记 开始
  8.         延时100毫秒
  9.         延时100毫秒
  10.         调用子程序 怪检测
  11.         调用子程序 怪检测
  12.     循环结束
  13. 循环结束
  14. //循环执行主程序
  15. //循环执行主程序
  16. 标记 脚本结束
  17. 标记 脚本结束
  18. 脚本停止运行
  19. 脚本停止运行
  20. //***********************************************
  21. //***********************************************
  22. // 主程序结束
  23. // 主程序结束
  24. //***********************************************
  25. //***********************************************
  26. //****************************************
  27. //****************************************
  28. // 红蓝检测线程
  29. // 红蓝检测线程
  30. //****************************************
  31. //****************************************
  32. 子程序 Threadcheckhonglan
  33.     子程序 Threadcheckhonglan
  34.         （VBScript语句） dim xx,yy
  35.         （VBScript语句） dim xx,yy
  36.         延时1000毫秒
  37.         延时1000毫秒
  38.         xx = GetEnvironmentVar("threadx")
  39.         xx = GetEnvironmentVar("threadx")
  40.         yy = GetEnvironmentVar("thready")
  41.         yy = GetEnvironmentVar("thready")
  42.         调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1023,767,"Attachment:\NN.bmp",0.8,x01,y01)
  43.         调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1023,767,"Attachment:\NN.bmp",0.8,x01,y01)
  44.         延时500毫秒
  45.         延时500毫秒
  46.         //取得宠物点(x02,y02)这个坐标点
  47.         //取得宠物点(x02,y02)这个坐标点
  48.         如果表达式 (1) 为真,则循环执行
  49.             如果表达式 (1) 为真,则循环执行
  50.                 延时100毫秒
  51.                 延时100毫秒
  52.                 如果 (hong/100*((xx-567)-(xx-716))+(xx-716),yy-11) 的颜色大约等于 #"110576" 则
  53.                     如果 (hong/100*((xx-567)-(xx-716))+(xx-716),yy-11) 的颜色大约等于 #"110576" 则
  54.                         //人物血量少于hong%时,自动补血
  55.                         //人物血量少于hong%时,自动补血
  56.                         延时10毫秒
  57.                         延时10毫秒
  58.                     否则
  59.                     否则
  60.                         超级模拟按键<F1>
  61.                         超级模拟按键<F1>
  62.                         延时200毫秒
  63.                         延时200毫秒
  64.                         如果 (hong1/100*((xx-567)-(xx-716))+(xx-716),yy-11) 的颜色大约等于 #"110576" 则
  65.                             如果 (hong1/100*((xx-567)-(xx-716))+(xx-716),yy-11) 的颜色大约等于 #"110576" 则
  66.                                 //人物血量少于hong1%时,自动补大血
  67.                                 //人物血量少于hong1%时,自动补大血
  68.                                 延时10毫秒
  69.                                 延时10毫秒
  70.                             否则
  71.                             否则
  72.                                 超级模拟按键<F2>
  73.                                 超级模拟按键<F2>
  74.                                 延时200毫秒
  75.                                 延时200毫秒
  76.                             条件结束
  77.                         条件结束
  78.                     条件结束
  79.                 条件结束
  80.                 //-------------------------------------------------------
  81.                 //-------------------------------------------------------
  82.                 延时10毫秒
  83.                 延时10毫秒
  84.                 如果 (lan/100*((xx-582)-(xx-716))+(xx-716),yy-4) 的颜色大约等于 #"774008" 则
  85.                     如果 (lan/100*((xx-582)-(xx-716))+(xx-716),yy-4) 的颜色大约等于 #"774008" 则
  86.                         //蓝少于lan%时,自动补蓝
  87.                         //蓝少于lan%时,自动补蓝
  88.                         延时10毫秒
  89.                         延时10毫秒
  90.                     否则
  91.                     否则
  92.                         超级模拟按键<F3>
  93.                         超级模拟按键<F3>
  94.                         延时200毫秒
  95.                         延时200毫秒
  96.                     条件结束
  97.                 条件结束
  98.                 如果 (x02-58,y02+4) 的颜色大约等于 #"100AF0" 则
  99.                     如果 (x02-58,y02+4) 的颜色大约等于 #"100AF0" 则
  100.                         //宠物血少于50%时,自动补血