按键精灵源代码整理汇总.docx

1、按键精灵源代码整理汇总1. 御剑脚本Hwnd = Plugi n.Win dow.MousePoi nt(Rem XXCall Plugi n.Bkg nd.KeyPress(Hw nd, 51Call Plugi n.Bkg nd.KeyPress(Hw nd, 51Call Plugi n.Bkg nd.KeyPress(Hw nd, 51Call Plugi n.Bkg nd.KeyPress(Hw nd, 51Call Plugi n.Bkg nd.KeyPress(Hw nd, 51Call Plugi n.Bkg nd.KeyPress(Hw nd, 51Call Plugi n.

2、Bkg nd.KeyPress(Hw nd, 50Call Plugi n.Bkg nd.KeyPress(Hw nd, 50Call Plugi n.Bkg nd.KeyPress(Hw nd, 50Call Plugi n.Bkg nd.KeyPress(Hw nd, 52Call Plugi n.Bkg nd.KeyPress(Hw nd, 53Goto XXCall Plugin.Window.Move(Hwnd, 4, 143Hwnd = Plugi n.Win dow.MousePoi nt(Call Plugin.Window.Size(Hwnd, 900, 600Rem XXI

3、fColor 325,208,163CDB,0 The nElseCall Plugi n.Bkg nd.KeyPress(Hw nd, 50End IfIfColor 257,208,163CDB,0 ThenElseDelay 1000Call Plugin.Bkgnd.KeyPress(Hwnd, 51Delay 1000Call Plugi n.Bkg nd.KeyPress(Hw nd, 52End IfIfColor 163,222,9C841A,0 The nElseCall Plugi n.Bkg nd.KeyPress(Hw nd, 53End IfIfColor 77,22

4、6,453A10,0 The nElse掉宠物附体回蓝的，属于前台的）Delay 291MoveTo 374, 506Delay 125MoveTo 375, 504Delay 33MoveTo 375, 503Delay 50MoveTo 377, 501Delay 36MoveTo 381, 500Delay 49MoveTo 385, 498Delay 40MoveTo 386, 498MoveTo 388, 497Delay 163MoveTo 388, 497MoveTo 389, 497Delay 7MoveTo 390, 497Delay 50MoveTo 394, 496Del

5、ay 51MoveTo 397, 495MoveTo 398, 494Delay 30KeyDow n 1, 1Delay 19MoveTo 402, 493Delay 43MoveTo 405, 491Delay 40MoveTo 410, 486Delay 1KeyUp 1, 1MoveTo 430, 471Delay 55MoveTo 459, 431Delay 8MoveTo 463, 423Delay 7MoveTo 468, 414Delay 55MoveTo 503, 331Delay 47MoveTo 531,287Delay 1MoveTo 535, 282Delay 54M

6、oveTo 551,261Delay 12MoveTo 553, 259MoveTo 564, 251Delay 36MoveTo 572, 246Delay 43MoveTo 583, 240Delay 38MoveTo 589, 235Delay 37MoveTo 593, 233Delay 30MoveTo 597, 230Delay 47MoveTo 602, 226Delay 1MoveTo 605, 223Delay 32Delay 36MoveTo 611,215Delay 38MoveTo 614, 211Delay 39MoveTo 615, 208Delay 143Move

7、To 616, 207Delay 332RightDow n 1Delay 14RightDow n 1Delay 53RightClick 1Delay 1RightClick 1Delay 68MoveTo 617, 206Delay 66Delay 40MoveTo 625,Delay 10MoveTo 626,Delay 77MoveTo 627,Delay 51MoveTo 627,Delay 30MoveTo 627,Delay 67MoveTo 627,Delay 1325RightDow n 1Delay 8RightDow n 1MoveTo 624, 19919719719

8、6195194193Delay 109RightClick 1Delay 1RightClick 1Delay 1362MoveTo 628, 194Delay 113MoveTo 628, 195Delay 42MoveTo 628, 196Delay 25MoveTo 628, 198Delay 1KeyDow n 2, 1Delay 1Delay 48Delay 1MoveTo 631,207Delay 46MoveTo 637, 219229243247249250252Delay 37MoveTo 637,Delay 1KeyUp 2, 1Delay 1MoveTo 640,Dela

9、y 77MoveTo 647,Delay 46MoveTo 648,Delay 63MoveTo 648,Delay 30MoveTo 648,Delay 77MoveTo 650,MoveTo 648, 251Delay 134MoveTo 650, 252MoveTo 656, 256Delay 38MoveTo 674, 269Delay 32MoveTo 704, 295Delay 27MoveTo 745, 326Delay 70MoveTo 954, 476Delay 11MoveTo 978, 490Delay 2MoveTo 1000, 504Delay 283MoveTo 1

10、113, 582Delay 51Delay 50MoveTo 1084, 582Goto XX3. 奶妈 7 秒叶子Hwnd = Plugi n.Win dow.MousePoi nt(Rem AACall Plugi n.Bkg nd.KeyPress(Hw nd, 49Delay 14000Goto AA4.奶妈无限群加Hwnd = Plugi n.Win dow.MousePoi nt(Rem xxCall Plugi n.Bkg nd.KeyPress(Hw nd, 49Call Plugin.Bkgnd.LeftClick(Hwnd, 450-dx, 380-dyDelay 1000

11、Goto xx5.剑半后台挂机，自动回宗派躲验证 (怪物血条得露出来才行，其他的按键是 后台操作 ) Hwnd = Plug in .Wi ndow.MousePoi nt(Call Plugi n.Win dow.Size(Hw nd, 800, 500Rem 重置时间Dim t1t1= nowRem XXIfColor 215,206,1332B1,0 ThenCall Plugi n.Bkg nd.KeyPress(Hw nd, 49Call Plugi n.Bkg nd.KeyPress(Hw nd, 50Call Plugin.Bkgnd.KeyPress(Hwnd, 51Call

12、Plugin.Bkgnd.KeyPress(Hwnd, 51Call Plugi n.Bkg nd.KeyPress(Hw nd, 52Call Plugi n.Bkg nd.KeyPress(Hw nd, 53Call Plugi n.Bkg nd.KeyPress(Hw nd, 50Call Plugin.Bkgnd.KeyPress(Hwnd, 51Call Plugin.Bkgnd.KeyPress(Hwnd, 51Call Plugi n.Bkg nd.KeyPress(Hw nd, 52Call Plugi n.Bkg nd.KeyPress(Hw nd, 56Call Plugi

13、 n.Bkg nd.KeyPress(Hw nd, 50Call Plugin.Bkgnd.KeyPress(Hwnd, 51Call Plugi n.Bkg nd.KeyPress(Hw nd, 52Call Plugi n.Bkg nd.KeyPress(Hw nd, 53Call Plugi n.Bkg nd.KeyPress(Hw nd, 54Call Plugi n.Bkg nd.KeyPress(Hw nd, 50Call Plugin.Bkgnd.KeyPress(Hwnd, 51Call Plugin.Bkgnd.KeyPress(Hwnd, 51Call Plugi n.Bk

14、g nd.KeyPress(Hw nd, 52Call Plugi n.Bkg nd.KeyPress(Hw nd, 53Call Plugi n.Bkg nd.KeyPress(Hw nd, 56Call Plugi n.Bkg nd.KeyPress(Hw nd, 50Call Plugin.Bkgnd.KeyPress(Hwnd, 51Call Plugi n.Bkg nd.KeyPress(Hw nd, 52Call Plugi n.Bkg nd.KeyPress(Hw nd, 56Call Plugi n.Bkg nd.KeyPress(Hw nd, 50Call Plugin.Bk

15、gnd.KeyPress(Hwnd, 51Call Plugin.Bkgnd.KeyPress(Hwnd, 51Call Plugi n.Bkg nd.KeyPress(Hw nd, 53Call Plugi n.Bkg nd.KeyPress(Hw nd, 56Call Plugi n.Bkg nd.KeyPress(Hw nd, 50Call Plugin.Bkgnd.KeyPress(Hwnd, 51Call Plugin.Bkgnd.KeyPress(Hwnd, 51Call Plugi n.Bkg nd.KeyPress(Hw nd, 52Call Plugi n.Bkg nd.Ke

16、yPress(Hw nd, 53Call Plugi n.Bkg nd.KeyPress(Hw nd, 56Call Plugi n.Bkg nd.KeyPress(Hw nd, 50Call Plugin.Bkgnd.KeyPress(Hwnd, 51Call Plugin.Bkgnd.KeyPress(Hwnd, 51Call Plugi n.Bkg nd.KeyPress(Hw nd, 53Call Plugi n.Bkg nd.KeyPress(Hw nd, 56Call Plugi n.Bkg nd.KeyPress(Hw nd, 50Call Plugin.Bkgnd.KeyPre

17、ss(Hwnd, 51Call Plugin.Bkgnd.KeyPress(Hwnd, 51Call Plugi n.Bkg nd.KeyPress(Hw nd, 52Call Plugi n.Bkg nd.KeyPress(Hw nd, 50Call Plugin.Bkgnd.KeyPress(Hwnd, 51Call Plugin.Bkgnd.KeyPress(Hwnd, 51Call Plugi n.Bkg nd.KeyPress(Hw nd, 52Call Plugi n.Bkg nd.KeyPress(Hw nd, 53Call Plugi n.Bkg nd.KeyPress(Hw

18、nd, 50Call Plugin.Bkgnd.KeyPress(Hwnd, 51Call Plugin.Bkgnd.KeyPress(Hwnd, 51Call Plugi n.Bkg nd.KeyPress(Hw nd, 52Call Plugi n.Bkg nd.KeyPress(Hw nd, 50Call Plugin.Bkgnd.KeyPress(Hwnd, 51Call Plugin.Bkgnd.KeyPress(Hwnd, 51Call Plugi n.Bkg nd.KeyPress(Hw nd, 52Call Plugi n.Bkg nd.KeyPress(Hw nd, 53Ca

19、ll Plugi n.Bkg nd.KeyPress(Hw nd, 55ElseCall Plugi n.Bkg nd.KeyPress(Hw nd, 68Delay 500End IfIfColor 215,206,1332B1,0 ThenGoto XXElseDelay 1000if datediff ( ”n,t1,now=35 then (35 分钟自动回宗派 )Call Plugi n.Bkg nd.KeyPress(Hw nd, 57Delay 5000 IfColor 215,206,1332B1,0 The nGoto XXElseDelay 1000Call Plugin.

20、Bkgnd.KeyPress(Hwnd, 57 Delay 80000MoveTo 757, 759Delay 2000LeftClick 1Delay 2000MoveTo 422, 471Delay 2000LeftClick 1Delay 150000MoveTo 399, 700Delay 1000LeftClick 1Delay 70000 MoveTo 542, 620Delay 15000 LeftClick 1Delay 1000Goto 重置时间End IfElseGoto XXEnd IfEnd IfGoto XX6.奶妈半后台打怪Hwnd = Plugi n.Win do

21、w.MousePoi nt(Call Plugin.Window.Size(Hwnd, 800, 500 Call Plugin.Window.Move(Hwnd, 480, 0Rem 重置时间Dim t1t1= nowRem XXIfColor 695,66,1332B1,0 ThenCall Plugin.Bkgnd.KeyPress(Hwnd, 49 Call Plugin.Bkgnd.KeyPress(Hwnd, 50 CallPlugin.Bkgnd.KeyPress(Hwnd, 51 Call Plugin.Bkgnd.KeyPress(Hwnd, 52 CallPlugi n.B

22、kg nd.KeyPress(Hw nd, 53 Call Plugi n.Bkg nd.KeyPress(Hw nd, 53 CallPlugi n.Bkg nd.KeyPress(Hw nd, 53 Call Plugi n.Bkg nd.KeyPress(Hw nd, 53 CallPlugi n.Bkg nd.KeyPress(Hw nd, 53 Call Plugi n.Bkg nd.KeyPress(Hw nd, 54 CallPlugi n.Bkg nd.KeyPress(Hw nd, 49 Call Plugi n.Bkg nd.KeyPress(Hw nd, 50 CallP

23、lugin.Bkgnd.KeyPress(Hwnd, 51 Call Plugin.Bkgnd.KeyPress(Hwnd, 52 CallPlugi n.Bkg nd.KeyPress(Hw nd, 53 Call Plugi n.Bkg nd.KeyPress(Hw nd, 53 CallPlugi n.Bkg nd.KeyPress(Hw nd, 53 Call Plugi n.Bkg nd.KeyPress(Hw nd, 53 CallPlugi n.Bkg nd.KeyPress(Hw nd, 53 Call Plugi n.Bkg nd.KeyPress(Hw nd, 53 Cal

24、lPlugin.Bkgnd.KeyPress(Hwnd, 50 Call Plugin.Bkgnd.KeyPress(Hwnd, 51 CallPlugi n.Bkg nd.KeyPress(Hw nd, 52 Call Plugi n.Bkg nd.KeyPress(Hw nd, 53 CallPlugi n.Bkg nd.KeyPress(Hw nd, 53 Call Plugi n.Bkg nd.KeyPress(Hw nd, 53 CallPlugi n.Bkg nd.KeyPress(Hw nd, 49 Call Plugi n.Bkg nd.KeyPress(Hw nd, 50 C

25、allPlugin.Bkgnd.KeyPress(Hwnd, 51 Call Plugin.Bkgnd.KeyPress(Hwnd, 52 CallPlugi n.Bkg nd.KeyPress(Hw nd, 53 Call Plugi n.Bkg nd.KeyPress(Hw nd, 53 CallPlugi n.Bkg nd.KeyPress(Hw nd, 53 Call Plugi n.Bkg nd.KeyPress(Hw nd, 53 CallPlugi n.Bkg nd.KeyPress(Hw nd, 53Call Plugin.Bkgnd.KeyPress(Hwnd, 53 Cal

26、l Plugin.Bkgnd.KeyPress(Hwnd, 53 Call Plugi n.Bkg nd.KeyPress(Hw nd, 54 Call Plugi n.Bkg nd.KeyPress(Hw nd, 49 Call Plugin.Bkgnd.KeyPress(Hwnd, 50 Call Plugin.Bkgnd.KeyPress(Hwnd, 51 Call Plugi n.Bkg nd.KeyPress(Hw nd, 52 Call Plugi n.Bkg nd.KeyPress(Hw nd, 53 Call Plugi n.Bkg nd.KeyPress(Hw nd, 53

27、Call Plugi n.Bkg nd.KeyPress(Hw nd, 53 Call Plugin.Bkgnd.KeyPress(Hwnd, 53 Call Plugin.Bkgnd.KeyPress(Hwnd, 53 Call Plugin.Bkgnd.KeyPress(Hwnd, 53 Call Plugin.Bkgnd.KeyPress(Hwnd, 49 Call Plugin.Bkgnd.KeyPress(Hwnd, 50 Call Plugin.Bkgnd.KeyPress(Hwnd, 51 Call Plugin.Bkgnd.KeyPress(Hwnd, 52 Call Plug

28、in.Bkgnd.KeyPress(Hwnd, 53 Call Plugin.Bkgnd.KeyPress(Hwnd, 53 Call Plugin.Bkgnd.KeyPress(Hwnd, 53 Call Plugin.Bkgnd.KeyPress(Hwnd, 53 Call Plugin.Bkgnd.KeyPress(Hwnd, 53 Call Plugi n.Bkg nd.KeyPress(Hw nd, 55 Call Plugi n.Bkg nd.KeyPress(Hw nd, 53 ElseCall Plugi n.Bkg nd.KeyPress(Hw nd, 68Call Plug

29、i n.Bkg nd.KeyPress(Hw nd, 9 Delay 500End IfIfColor 695,66,1332B1,0 ThenGoto XXElse if datediff( n,t1, no w=35 the nDelay 1011Call Plugi n.Bkg nd.KeyPress(Hw nd, 48Delay 5011IfColor 695,66,1332B1,0 Then Goto XXElseDelay 1000Call Plugin.Bkgnd.KeyPress(Hwnd, 48 Delay 80011MoveTo 1236, 621Delay 2011LeftClick 1 Delay 2011 MoveTo 896, 331 Delay 2011 LeftClick 1 Delay 150051MoveTo 876, 567 Delay 1011 LeftClick 1 Delay 70011 MoveTo 1030, 484 Delay 10011LeftClick 1 Delay 2000 Goto 重置时间 End If Else End If End If Goto XX