7/23 更新後的 新基址 AHK 釣魚腳本 Trove 寶藏世界

新偏移地址：


所有站內附件皆會附上安全掃描報告
請會員查看純淨度百分比後判斷使用



相關檔案須知：
取得檔案前，請先詳細閱讀文章內容
避免不必要錯誤與誤會發生。
也可多參考文章討論樓層內容
了解附件檔案相關討論資訊。

【此文章部分內容隱藏中】    解除隱藏說明教學點擊下方 繼續閱讀文章 後
請仔細觀看文章內容 並依照指示進行下一步
最後完成解除隱藏後
系統會回到此文章自動顯示隱藏內容~

繼續閱讀

Ctrl + j 開始

ctrl + k t暫停.

1. #WinActivateForce
   
2. 
   
3. ^j::
   
4.   shouldRun = 1
   
5.   if !setupDone
   
6.   {
   
7.     WinGet, pidn, PID, A
   
8.     pid := pidn
   
9.     WinGet, hwnds, ID, A
   
10.     Handle := hwnds
    
11.     Base := getProcessBaseAddress()
    
12.     WaterAddress := GetAddressWater(Base,0x0097E114)
    
13.     LavaAddress := GetAddressLava(Base,0x00964208)
    
14.     ChocoAddress := GetAddressChoco(Base,0x00964208)
    
15.     setupDone = 1
    
16.   }
    
17.   Loop
    
18.   {
    
19.     if shouldRun
    
20.     {
    
21.       ControlSend, , {c down}, ahk_pid %pid%
    
22.       Sleep, 86
    
23.       ControlSend, , {c up}, ahk_pid %pid%
    
24.       Sleep, 500
    
25.           
    
26.       ControlSend, , {f down}, ahk_pid %pid%
    
27.       Sleep, 86
    
28.       ControlSend, , {f up}, ahk_pid %pid%
    
29.           
    
30.       Catch := 0
    
31.       PoleCheck := 40
    
32. 
    
33.       While Catch = 0
    
34.       {
    
35.         If (PoleCheckN = PoleCheck)
    
36.         {
    
37.           ControlSend, , {f down}, ahk_pid %pid%
    
38.           Sleep, 86
    
39.           ControlSend, , {f up}, ahk_pid %pid%
    
40.         }
    
41.         
    
42.         CaughtWater := ReadMemory(WaterAddress)
    
43.         CaughtLava := ReadMemory(LavaAddress)
    
44.         CaughtChoco := ReadMemory(ChocoAddress)
    
45.         
    
46.         If (CaughtWater = 1 or CaughtLava = 1 or CaughtChoco = 1)
    
47.         {
    
48.           ControlSend, , {f down}, ahk_pid %pid%
    
49.           Sleep, 86
    
50.           ControlSend, , {f up}, ahk_pid %pid%
    
51.           Random, Wait, 2000, 3500
    
52.           Sleep, %Wait%
    
53.           Catch := 1
    
54.         }
    
55.         else
    
56.         {
    
57.           PoleCheckN := PoleCheckN +1
    
58.           Sleep, 1000
    
59.         }
    
60.         
    
61.         FindAndDropBoots()
    
62.       }
    
63.     }
    
64.     else
    
65.     {
    
66.       Return
    
67.     }
    
68.   }
    
69. Return
    
70. 
    
71. GetAddressWater(Base, Address)
    
72. {
    
73.   pointerBase := base + Address
    
74.   y1 := ReadMemory(pointerBase)
    
75.   y2 := ReadMemory(y1 + 0x144)
    
76.   y3 := ReadMemory(y2 + 0xe4)
    
77.   Return WaterAddress := (y3 + 0x70)
    
78. }
    
79. 
    
80. GetAddressLava(Base, Address)
    
81. {
    
82.   pointerBase := base + Address
    
83.   y1 := ReadMemory(pointerBase)
    
84.   y2 := ReadMemory(y1 + 0x144)
    
85.   y3 := ReadMemory(y2 + 0xe4)
    
86.   Return LavaAddress := (y3 + 0x514)
    
87. }
    
88. 
    
89. GetAddressChoco(Base, Address)
    
90. {
    
91.   pointerBase := base + Address
    
92.   y1 := ReadMemory(pointerBase)
    
93.   y2 := ReadMemory(y1 + 0x144)
    
94.   y3 := ReadMemory(y2 + 0xe4)
    
95.   Return ChocoAddress := (y3 + 0x2c0)
    
96. }
    
97. 
    
98. getProcessBaseAddress()
    
99. {
    
100.   Global Handle
     
101.   return DllCall( A_PtrSize = 4
     
102.   ? "GetWindowLong"
     
103.   : "GetWindowLongPtr"
     
104.   , "Ptr", Handle
     
105.   , "Int", -6
     
106.   , "Int64") ; Use Int64 to prevent negative overflow when AHK is 32 bit and target process is 64bit
     
107.   ; If DLL call fails, returned value will = 0
     
108. }
     
109. 
     
110. ReadMemory(MADDRESS)
     
111. {
     
112.   Global pid
     
113.   VarSetCapacity(MVALUE,4,0)
     
114.   ProcessHandle := DllCall("OpenProcess", "Int", 24, "Char", 0, "UInt", pid, "UInt")
     
115.   ;DllCall("ReadProcessMemory","UInt",ProcessHandle, "UInt",MADDRESS,"Str",MVALUE,"UInt",4,"UInt *",0)
     
116.   DllCall("ReadProcessMemory", "UInt", ProcessHandle, "Ptr", MADDRESS, "Ptr", &MVALUE, "Uint",4)
     
117.   Loop 4
     
118.   result += *(&MVALUE + A_Index-1) << 8*(A_Index-1)
     
119.   return, result
     
120. }
     
121. 
     
122. FindAndDropBoots()
     
123. {
     
124.   Imagesearch, Foundx, FoundY, 0, 0, A_ScreenWidth, A_ScreenHeight, *50 c:\boot.bmp
     
125.   
     
126.   While errorlevel = 0
     
127.   {
     
128.     MouseClickDrag, Left, %FoundX%, %FoundY%, 779, 412
     
129.     Imagesearch, Foundx, FoundY, 0, 0, A_ScreenWidth, A_ScreenHeight, *50 c:\boot.bmp
     
130.   }
     
131. }
     
132. 
     
133. ^k::
     
134.   shouldRun = 0
     
135. Return

複製代碼