按键精灵脚本:神鬼助手V1.001

　　【功能说明】

　　1、自动找怪打怪补红蓝。

　　2、自动捡物品，防卡功能

　　3、宠物少血50%时自动补血

　　【版本说明】

　　神鬼助手V1.001精简版

　　【使用说明】

　　一） 游戏快捷键设置：

　　“1”为普通物理攻

　　“2、3、4、5、6”为攻击技能

　　“F1”为小红

　　“F2”为大红

　　“F3”为蓝

　　“F4”为宠物红

　　二）注意：

　　1. 请在分辨率为1024*768并且32位色的游戏窗口下运行 （窗口设置要先进入游戏才能改成这个分辨率）

　　2. 挂机时请不要移动游戏窗口，如移动过。请先停止挂机，再重新挂机

　　【作者介绍】

　　****风了****

　　【制作日期】

　　2009年4月5日

　　脚本附件：定位点。bmp, 定怪星。bmp, 宠物。bmp, NN.bmp, 物品箱1.bmp, 物品箱2.bmp, 物品箱。bmp

　　运行环境：分辨率：1440x900 色深：32位 操作系统：Windows XP 按键精灵版本：7.00.3956

1.  
2. //******************************************
3. //******************************************
4. // 定义和初始化变量
5. // 定义和初始化变量
6. //******************************************
7. //******************************************
8. （VBScript语句） dim hong,hong1,lan
9. （VBScript语句） dim hong,hong1,lan
10. //定义数组
11. //定义数组
12. （VBScript语句） dim sj(8),s(8),color(3)
13. （VBScript语句） dim sj(8),s(8),color(3)
14. //color(0):人物血颜色,color(1):为蓝颜色,color(2):怪血颜色
15. //color(0):人物血颜色,color(1):为蓝颜色,color(2):怪血颜色
16. （VBScript语句） color(0)="110576":color(1)="774008":color(2)="2E7FA7"
17. （VBScript语句） color(0)="110576":color(1)="774008":color(2)="2E7FA7"
18. 用户定义变量 hong=60 红量<hong%时，自动吃小红
19. 用户定义变量 hong=60 红量<hong%时，自动吃小红
20. 用户定义变量 hong1=30 红量<hong1%时，自动吃大红
21. 用户定义变量 hong1=30 红量<hong1%时，自动吃大红
22. 用户定义变量 lan=20 蓝量<lan%时，自动吃蓝
23. 用户定义变量 lan=20 蓝量<lan%时，自动吃蓝
24. //初始化技能时间
25. //初始化技能时间
26. （VBScript语句） dim i,m,r,t1,t2,t3,t4,t5,katime,katime2
27. （VBScript语句） dim i,m,r,t1,t2,t3,t4,t5,katime,katime2
28. （VBScript语句） i=0:m=0:r=0
29. （VBScript语句） i=0:m=0:r=0
30. （VBScript语句） t1=now:t2=now:t3=now:t4=now:t5=now:katime=now:katime2=now
31. （VBScript语句） t1=now:t2=now:t3=now:t4=now:t5=now:katime=now:katime2=now
32. 用户定义变量 sj(0)=2 技能1间隔时间(秒)
33. 用户定义变量 sj(0)=2 技能1间隔时间(秒)
34. 调用子程序 [判断时间]
35. 调用子程序 [判断时间]
36. 用户定义变量 sj(1)=2 技能2间隔时间(秒)
37. 用户定义变量 sj(1)=2 技能2间隔时间(秒)
38. 调用子程序 [判断时间]
39. 调用子程序 [判断时间]
40. 用户定义变量 sj(2)=3 技能3间隔时间(秒)
41. 用户定义变量 sj(2)=3 技能3间隔时间(秒)
42. 调用子程序 [判断时间]
43. 调用子程序 [判断时间]
44. 用户定义变量 sj(3)=5 技能4间隔时间(秒)
45. 用户定义变量 sj(3)=5 技能4间隔时间(秒)
46. 调用子程序 [判断时间]
47. 调用子程序 [判断时间]
48. 用户定义变量 sj(4)=5 技能5间隔时间(秒)
49. 用户定义变量 sj(4)=5 技能5间隔时间(秒)
50. 调用子程序 [判断时间]
51. 调用子程序 [判断时间]
52. //******************************************
53. //******************************************
54. // 主程序开始
55. // 主程序开始
56. //******************************************
57. //******************************************
58. 展开附件 .\plugin *.dll
59. 展开附件 .\plugin *.dll
60. 调用插件命令 hwnd = Window.Foreground()
61. 调用插件命令 hwnd = Window.Foreground()
62. 调用插件命令 Window.Move(hwnd, 0, 0)
63. 调用插件命令 Window.Move(hwnd, 0, 0)
64. //6.30版之后支持从.附件中直接读图片信息找图，不需要再释放到硬盘上
65. //6.30版之后支持从.附件中直接读图片信息找图，不需要再释放到硬盘上
66. 调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1023,767,"Attachment:\NN.bmp",0.8,x01,y01)
67. 调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1023,767,"Attachment:\NN.bmp",0.8,x01,y01)
68. 如果表达式 (x01>=0 and y01>=0) 为真,则
69.     如果表达式 (x01>=0 and y01>=0) 为真,则
70.         //复位方向
71.         //复位方向
72.         超级模拟鼠标移动 x01+11 , y01+10
73.         超级模拟鼠标移动 x01+11 , y01+10
__箰讆__360__璺拶__        延时100毫秒
74.         延时100毫秒
75.         超级模拟左键单击
76.         超级模拟左键单击
77.     条件结束
78. 条件结束
79. 延时500毫秒
80. 延时500毫秒
81. 调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1023,767,"Attachment:\NN.bmp",0.8,x01,y01)
82. 调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1023,767,"Attachment:\NN.bmp",0.8,x01,y01)
83. 延时300毫秒
84. 延时300毫秒
85. //取得定位点(x,y)这个坐标点
86. //取得定位点(x,y)这个坐标点
87. SetEnvironmentVar "threadx",CStr(x)
88. SetEnvironmentVar "threadx",CStr(x)
89. SetEnvironmentVar "thready",CStr(y)
90. SetEnvironmentVar "thready",CStr(y)
91. //同步标志
92. //同步标志
93. SetEnvironmentVar "KeyFlg","0"
94. SetEnvironmentVar "KeyFlg","0"
95. //红蓝检测线程
96. //红蓝检测线程
97. BeginThread "Threadcheckhonglan"
98. BeginThread "Threadcheckhonglan"
99. //捡物品线程