《天下3跳舞脚本源码》由会员分享，可在线阅读，更多相关《天下3跳舞脚本源码（9页珍藏版）》请在金锄头文库上搜索。
1、普通视图1. 注释：头部 获得窗口信息2. 注释：跳舞次数3. 令 sum = 04. 令 max = 105. 令 off = 06. 注释：空格速度微调（50-70之间 机器速度越慢 数值越小）7. 令 speed = 658. 定义变量 hwnd9. 注释：申明变量是个好习惯10. 注释：定义变量11. 令 hwnd = Window.Foreground()12. 注释：调用插件得到当前窗口句柄，结果返回给变量hwnd13. 令 wtext = Window.GetText(hwnd)14. 注释：调用插件根据窗口句柄得到当前窗口标题，结果返回给变量wtext15. 令 wclass
2、= Window.GetClass(hwnd)16. 注释：调用插件根据窗口句柄得到当前窗口类，结果返回给变量wclass17. 令 path = Window.GetExePath(hwnd)18. 注释：调用插件根据窗口句柄得到当前窗口的路径，结果返回给变量path19. 令 rect = Window.GetClientRect(hwnd)20. 注释：调用插件根据窗口句柄得到当前客户区坐标数据，结果返回给变量rect21. 令 wrect = Window.GetWindowRect(hwnd)22. 注释：调用插件根据窗口句柄得到当前窗口坐标数据，结果返回给变量wrect23. 令
3、MyArray = Split(rect,|,- 1 ,1)24. 令 Area = MyArray(2) * MyArray(3)25. 如果 Area 480000 则26. 弹出窗口 请将游戏分辨率调整为800*600，谢谢。27. 脚本停止运行28. 条件结束29. 注释：主程序30. 标记 主程序31. 如果 sum = max 则32. 弹出窗口 已经跳了次数了呦。33. 脚本停止运行34. 调用 Msg.ShowScrTXT(10,10,500,500, ,ffff00)35. 条件结束36. 令 sum = sum + 137. （鼠标）移动到 (458 + MyArray(0
4、), 152 + MyArray(1)38. 延时 100 毫秒39. （鼠标）左键单击, 1次40. 跳转到标记 跳舞41. 注释：跳舞程序42. 标记 跳舞43. 令 x = 53 + MyArray(0)44. 令 y = 390 + MyArray(1)45. 循环当 x 0 则49. （键盘）按 Up 键, 1次50. 条件结束51. 注释：downn52. 调用 从左上到右下查找图片 down.bmp，把找到的坐标保存到 (intX, intY)，指定区域（左：x 上：y 右：x + 63 下：y + 63），相似度 0.953. 如果 intX 0 则54. （键盘）按 Down
5、 键, 1次55. 条件结束56. 注释：left57. 调用 从左上到右下查找图片 left.bmp，把找到的坐标保存到 (intX, intY)，指定区域（左：x 上：y 右：x + 63 下：y + 63），相似度 0.958. 如果 intX 0 则59. （键盘）按 Left 键, 1次60. 条件结束61. 注释：right62. 调用 从左上到右下查找图片 right.bmp，把找到的坐标保存到 (intX, intY)，指定区域（左：x 上：y 右：x + 63 下：y + 63），相似度 0.963. 如果 intX 0 则64. （键盘）按 Right 键, 1次65. 条
6、件结束66. 如果点 (31 + x,29 + y) 的颜色约等于 0000E5 则67. 注释：rup68. 调用 从左上到右下查找图片 rup.bmp，把找到的坐标保存到 (intX, intY)，指定区域（左：x 上：y 右：x + 63 下：y + 63），相似度 0.969. 如果 intX 0 则70. （键盘）按 Down 键, 1次71. 条件结束72. 注释：downn73. 调用 从左上到右下查找图片 rdown.bmp，把找到的坐标保存到 (intX, intY)，指定区域（左：x 上：y 右：x + 63 下：y + 63），相似度 0.974. 如果 intX 0 则
7、75. （键盘）按 Up 键, 1次76. 条件结束77. 注释：rleft78. 调用 从左上到右下查找图片 rleft.bmp，把找到的坐标保存到 (intX, intY)，指定区域（左：x 上：y 右：x + 63 下：y + 63），相似度 0.979. 如果 intX 0 则80. （键盘）按 Right 键, 1次81. 条件结束82. 注释：rright83. 调用 从左上到右下查找图片 rright.bmp，把找到的坐标保存到 (intX, intY)，指定区域（左：x 上：y 右：x + 63 下：y + 63），相似度 0.984. 如果 intX 0 则85. （键盘）按
8、 Left 键, 1次86. 条件结束87. 条件结束88. 注释：判断空格89. 如果点 (405 + MyArray(0),405 + MyArray(1) 的颜色约等于 FFFFFF 则90. 如果点 (581 + MyArray(0),374 + MyArray(1) 的颜色约等于 E7BF67 则91. 延时 speed 毫秒92. （键盘）按 Space 键, 1次93. 条件结束94. 条件结束95. 注释：判断是否结束96. 如果点 (218 + MyArray(0),71 + MyArray(1) 的颜色约等于 9B4C48 则97. （鼠标）移动到 (657 + MyArr
9、ay(0), 63 + MyArray(1)98. 延时 100 毫秒99. （鼠标）左键单击, 1次100. 延时 1000 毫秒101.102. 以下为源代码103.104. /头部获得窗口信息 105. /跳舞次数 106. sum=0 107. max=10 108. off=0 109. /空格速度微调（50-70之间机器速度越慢数值越小） 110. speed=65 111. Dimhwnd 112. /申明变量是个好习惯 113. /定义变量 114. hwnd=Plugin.Window.Foreground() 115. /调用插件得到当前窗口句柄，结果返回给变量hwnd 1
10、16. wtext=Plugin.Window.GetText(hwnd) 117. /调用插件根据窗口句柄得到当前窗口标题，结果返回给变量wtext 118. wclass=Plugin.Window.GetClass(hwnd) 119. /调用插件根据窗口句柄得到当前窗口类，结果返回给变量wclass 120. path=Plugin.Window.GetExePath(hwnd) 121. /调用插件根据窗口句柄得到当前窗口的路径，结果返回给变量path 122. rect=Plugin.Window.GetClientRect(hwnd) 123. /调用插件根据窗口句柄得到当前客户
11、区坐标数据，结果返回给变量rect 124. wrect=Plugin.Window.GetWindowRect(hwnd) 125. /调用插件根据窗口句柄得到当前窗口坐标数据，结果返回给变量wrect 126. MyArray=Split(rect,|,-1,1) 127. Area=MyArray(2)*MyArray(3) 128. IfArea480000Then129. MessageBox请将游戏分辨率调整为800*600，谢谢。130. EndScript131. Endif 132. /主程序 133. Rem主程序 134. Ifsum=maxThen135. Messag
12、eBox已经跳了次数了呦。136. EndScript137. CallPlugin.Msg.ShowScrTXT(10,10,500,500,ffff00) 138. Endif 139. sum=sum+1 140. MoveTo458+MyArray(0),152+MyArray(1) 141. Delay100 142. LeftClick1 143. Goto跳舞 144. /跳舞程序 145. Rem跳舞 146. x=53+MyArray(0) 147. y=390+MyArray(1) 148. Whilex0Then152. KeyPress38,1 153. Endif 154. /downn 155. CallFindPic(x,y,x+63,y+63,down.bmp,0.9,intX,intY) 156. IfintX0Then157. KeyPress40,1 158. Endif 159. /left 160. CallFindPic(x,y,x+63,y+6
