Advertisement
Guest User

Untitled

a guest
Mar 8th, 2022
241
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #include classMemory.ahk
  2.  
  3. #SingleInstance, Force
  4. SendMode Input
  5. SetWorkingDir, %A_ScriptDir%
  6.  
  7. global ClientPIDs := []
  8. global MainPID := 0
  9. global mainX := 0
  10. global mainY := 0
  11. global mainZ := 0
  12.  
  13. Gui, New, , FollowBots | NanoDragon
  14. Gui, Font, s12
  15. Gui, Add, ListView, , Client PID|X  |Y  |Z    |Main |Следовать
  16. Gui, Add, Button, gStart, Запуск
  17. Gui, Add, Checkbox, vfollow, Следовать
  18. Gui, Tab, 2
  19. Gui, Show, W400 H250 X0 Y0
  20. return
  21.  
  22. start:
  23.    if(%MainPID% == 0) {
  24.         MsgBox, Выберите свой мейн (Num5)
  25.         return
  26.     }
  27.     else {
  28.         WinGet,l,list,ahk_exe Trove.exe
  29.         loop %l%{
  30.             WinGet,pidU,PID,% "ahk_id " l%a_index%
  31.             ClientPIDs.Insert(pidU)
  32.         }
  33.     }
  34.  
  35.     for index, clientPID in ClientPIDs {
  36.         if(clientPID == MainPID) {
  37.             isMain := "True"
  38.         } else {
  39.             isMain := "False"
  40.         }
  41.         LV_Add("", clientPID, 0, 0, 0, isMain)
  42.     }
  43.  
  44. loop{
  45.  
  46.     for index, clientPID in ClientPIDs {
  47.         GuicontrolGet, follow
  48.         if(follow == "0") {
  49.             follow := "Нет"
  50.         } else {
  51.             follow := "Да"
  52.         }
  53.         if(clientPID == MainPID){
  54.             mainMem := new _ClassMemory("ahk_pid" MainPID, "", hProcessCopy)
  55.             mainX := mainMem.read(mainMem.BaseAddress + 0x00FD6664, "UInt", 0x10, 0x11C, 0xC4, 0x4, 0x60) + 0
  56.             mainY := mainMem.read(mainMem.BaseAddress + 0x00FD6664, "UInt", 0x0, 0x28, 0xC4, 0x4, 0x64) + 0
  57.             mainZ := mainMem.read(mainMem.BaseAddress + 0x00FD6664, "UInt", 0x4, 0x11C, 0xC4, 0x4, 0x68) + 0
  58.             LV_Modify(index, "", , mainX, mainY, mainZ, ,follow)
  59.             LV_ModifyCol(1, 100)
  60.         } else {
  61.             altMem := new _ClassMemory("ahk_pid" clientPID, "", hProcessCopy)
  62.             if(follow == "Да"){
  63.                 altMem.write(altMem.BaseAdress + 0x00FD6664, mainX, "UInt", 0x10, 0x11C, 0xC4, 0x4, 0x60) ; Изменение X
  64.                 altMem.write(altMem.BaseAdress + 0x00FD6664, mainY, "UInt", 0x0, 0x28, 0xC4, 0x4, 0x64) ; Изменение Y
  65.                 altMem.write(altMem.BaseAdress + 0x00FD6664, mainZ, "UInt", 0x4, 0x11C, 0xC4, 0x4, 0x68) ; Изменение Z
  66.             }
  67.             altX := altMem.read(altMem.BaseAddress + 0x00FD6664, "UInt", 0x10, 0x11C, 0xC4, 0x4, 0x60)
  68.             altY := altMem.read(altMem.BaseAddress + 0x00FD6664, "UInt", 0x0, 0x28, 0xC4, 0x4, 0x64)
  69.             altZ := altMem.read(altMem.BaseAddress + 0x00FD6664, "UInt", 0x4, 0x11C, 0xC4, 0x4, 0x68)
  70.             LV_Modify(index, "", , altX, altY, altZ, ,follow)
  71.             LV_ModifyCol(1, 100)
  72.         }
  73.     }
  74.     Sleep, 20
  75. }
  76.  
  77.  
  78.  
  79. Numpad5::
  80.  
  81.     WinGet,pidU,PID, A
  82.     MainPID = %pidU%
  83.     MsgBox, Мейн: %MainPID%
  84.  
  85. Return
  86.  
  87. F12::
  88.     Reload
  89. Return
  90.  
  91. GuiClose:
  92. ExitApp
  93. return
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement