API tools faq
paste
Advertisement
Guest User

SAMP.AHK

a guest
Aug 29th, 2015
143
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 93.22 KB | None | 0 0
raw download clone embed print report
  1. ; #### SAMP UDF R12.0.3 ####
  2. ; SAMP Version: 0.3.7
  3. ; Written by Chuck_Floyd
  4. ; https://github.com/FrozenBrain
  5. ; Modified by Suchty112
  6. ; https://github.com/Suchty112
  7. ; Modified by: paul-phoenix
  8. ; https://github.com/paul-phoenix
  9. ; Modified by: Agrippa1994
  10. ; https://github.com/agrippa1994
  11. ; Do not remove these lines.
  12. ; ####################
  13.  
  14.  
  15.  
  16. ; ErrorLevels
  17. global ERROR_OK := 0
  18. global ERROR_PROCESS_NOT_FOUND := 1
  19. global ERROR_OPEN_PROCESS := 2
  20. global ERROR_INVALID_HANDLE := 3
  21. global ERROR_MODULE_NOT_FOUND := 4
  22. global ERROR_ENUM_PROCESS_MODULES := 5
  23. global ERROR_ZONE_NOT_FOUND := 6
  24. global ERROR_CITY_NOT_FOUND := 7
  25. global ERROR_READ_MEMORY := 8
  26. global ERROR_WRITE_MEMORY := 9
  27. global ERROR_ALLOC_MEMORY := 10
  28. global ERROR_FREE_MEMORY := 11
  29. global ERROR_WAIT_FOR_OBJECT := 12
  30. global ERROR_CREATE_THREAD := 13
  31. ; GTA Addresses
  32. global ADDR_ZONECODE := 0xA49AD4
  33. global ADDR_POSITION_X := 0xB6F2E4
  34. global ADDR_POSITION_Y := 0xB6F2E8
  35. global ADDR_POSITION_Z := 0xB6F2EC
  36. global ADDR_CPED_PTR := 0xB6F5F0
  37. global ADDR_CPED_HPOFF := 0x540
  38. global ADDR_CPED_ARMOROFF := 0x548
  39. global ADDR_VEHICLE_PTR := 0xBA18FC
  40. global ADDR_VEHICLE_HPOFF := 0x4C0
  41. global ADDR_CPED_MONEY := 0x0B7CE54
  42. global ADDR_CPED_INTID := 0xA4ACE8
  43. global ADDR_VEHICLE_DOORSTATE := 0x4F8
  44. global ADDR_VEHICLE_ENGINESTATE := 0x428
  45. global ADDR_VEHICLE_LIGHTSTATE := 0x584
  46. global ADDR_VEHICLE_MODEL := 0x22
  47. global ADDR_VEHICLE_TYPE := 0x590
  48. global ADDR_VEHICLE_DRIVER := 0x460
  49.  
  50. global ADDR_VEHICLE_CVEH := 0xB6F980
  51. global ADDR_VEHICLE_SPEED_X := 0x44
  52. global ADDR_VEHICLE_SPEED_Y := 0x48
  53. global ADDR_VEHICLE_SPEED_Z := 0x4C
  54.  
  55. global oAirplaneModels := [417, 425, 447, 460, 469, 476, 487, 488, 497, 511, 512, 513, 519, 520, 548, 553, 563, 577, 592, 593]
  56. global oBikeModels := [481,509,510]
  57. global ovehicleNames := ["Landstalker","Bravura","Buffalo","Linerunner","Perrenial","Sentinel","Dumper","Firetruck","Trashmaster","Stretch","Manana","Infernus","Voodoo","Pony","Mule","Cheetah","Ambulance","Leviathan","Moonbeam","Esperanto","Taxi","Washington","Bobcat","Whoopee","BFInjection","Hunter","Premier","Enforcer","Securicar","Banshee","Predator","Bus","Rhino","Barracks","Hotknife","Trailer","Previon","Coach","Cabbie","Stallion","Rumpo","RCBandit","Romero","Packer","Monster","Admiral","Squalo","Seasparrow","Pizzaboy","Tram","Trailer","Turismo","Speeder","Reefer","Tropic","Flatbed","Yankee","Caddy","Solair","Berkley'sRCVan","Skimmer","PCJ-600","Faggio","Freeway","RCBaron","RCRaider","Glendale","Oceanic","Sanchez","Sparrow","Patriot","Quad","Coastguard","Dinghy","Hermes","Sabre","Rustler","ZR-350","Walton","Regina","Comet","BMX","Burrito","Camper","Marquis","Baggage","Dozer","Maverick","NewsChopper","Rancher","FBIRancher","Virgo","Greenwood","Jetmax","Hotring","Sandking","BlistaCompact","PoliceMaverick","Boxvillde","Benson","Mesa","RCGoblin","HotringRacerA","HotringRacerB","BloodringBanger","Rancher","SuperGT","Elegant","Journey","Bike","MountainBike","Beagle","Cropduster","Stunt","Tanker","Roadtrain","Nebula","Majestic","Buccaneer","Shamal","hydra","FCR-900","NRG-500","HPV1000","CementTruck","TowTruck","Fortune","Cadrona","FBITruck","Willard","Forklift","Tractor","Combine","Feltzer","Remington","Slamvan","Blade","Freight","Streak","Vortex","Vincent","Bullet","Clover","Sadler","Firetruck","Hustler","Intruder","Primo","Cargobob","Tampa","Sunrise","Merit","Utility","Nevada","Yosemite","Windsor","Monster","Monster","Uranus","Jester","Sultan","Stratum","Elegy","Raindance","RCTiger","Flash","Tahoma","Savanna","Bandito","FreightFlat","StreakCarriage","Kart","Mower","Dune","Sweeper","Broadway","Tornado","AT-400","DFT-30","Huntley","Stafford","BF-400","NewsVan","Tug","Trailer","Emperor","Wayfarer","Euros","Hotdog","Club","FreightBox","Trailer","Andromada","Dodo","RCCam","Launch","PoliceCar","PoliceCar","PoliceCar","PoliceRanger","Picador","S.W.A.T","Alpha","Phoenix","GlendaleShit","SadlerShit","Luggage","Luggage","Stairs","Boxville","Tiller","UtilityTrailer"]
  58. ; SAMP Addresses
  59. global ADDR_SAMP_INCHAT_PTR := 0x21a10c
  60. global ADDR_SAMP_INCHAT_PTR_OFF := 0x55
  61. global ADDR_SAMP_USERNAME := 0x219A6F
  62. global ADDR_SAMP_CHATMSG_PTR := 0x21A0E4
  63. global ADDR_SAMP_SHOWDLG_PTR := 0x21A0B8
  64. global FUNC_SAMP_SENDCMD := 0x65c60
  65. global FUNC_SAMP_SENDSAY := 0x57f0
  66. global FUNC_SAMP_ADDTOCHATWND := 0x64520
  67. global FUNC_SAMP_SHOWGAMETEXT := 0x9C2C0
  68. global FUNC_SAMP_PLAYAUDIOSTR := 0x62dA0
  69. global FUNC_SAMP_STOPAUDIOSTR := 0x629A0
  70. global FUNC_SAMP_SHOWDIALOG := 0x6B9C0
  71. global FUNC_UPDATESCOREBOARD := 0x8A10
  72.  
  73. global SAMP_INFO_OFFSET := 0x21A0F8
  74. global SAMP_PPOOLS_OFFSET := 0x3CD
  75. global SAMP_PPOOL_PLAYER_OFFSET := 0x18
  76. global SAMP_SLOCALPLAYERID_OFFSET := 0x4
  77. global SAMP_ISTRLEN_LOCALPLAYERNAME_OFFSET := 0x1A
  78. global SAMP_SZLOCALPLAYERNAME_OFFSET := 0xA
  79. global SAMP_PSZLOCALPLAYERNAME_OFFSET := 0xA
  80. global SAMP_PREMOTEPLAYER_OFFSET := 0x2E
  81. global SAMP_ISTRLENNAME___OFFSET := 0x1C
  82. global SAMP_SZPLAYERNAME_OFFSET := 0xC
  83. global SAMP_PSZPLAYERNAME_OFFSET := 0xC
  84. global SAMP_ILOCALPLAYERPING_OFFSET := 0x26
  85. global SAMP_ILOCALPLAYERSCORE_OFFSET := 0x2A
  86. global SAMP_IPING_OFFSET := 0x28
  87. global SAMP_ISCORE_OFFSET := 0x24
  88. global SAMP_ISNPC_OFFSET := 0x4
  89. global SAMP_SZIP_OFFSET := 0x20
  90. global SAMP_SZHOSTNAME_OFFSET := 0x121
  91.  
  92. global SAMP_PLAYER_MAX := 1004
  93.  
  94. ; Sizes
  95. global SIZE_SAMP_CHATMSG := 0xFC
  96. ; Internal
  97. global hGTA := 0x0
  98. global dwGTAPID := 0x0
  99. global dwSAMP := 0x0
  100. global pMemory := 0x0
  101. global pParam1 := 0x0
  102. global pParam2 := 0x0
  103. global pParam3 := 0x0
  104. global pParam4 := 0x0
  105. global pParam5 := 0x0
  106. global pInjectFunc := 0x0
  107. global nZone := 1
  108. global nCity := 1
  109. global bInitZaC := 0
  110. global iRefreshScoreboard := 0
  111. global oScoreboardData := ""
  112. global iRefreshHandles := 0
  113. global iUpdateTick := 2500 ;time in ms, used for getPlayerNameById etc. to refresh data
  114.  
  115.  
  116. ; #####################################################################################################################
  117. ; # SAMP-Funktionen: #
  118. ; # - isInChat() Prüft, ob der Spieler gerade chattet oder in einem Dialog ist #
  119. ; # - getUsername(name) Liest den Namen des Spielers aus #
  120. ; # - SendChat(wText) Sendet eine Nachricht od. einen Befehl direkt an den Server #
  121. ; # - addChatMessage(wText) Fügt eine Zeile in den Chat ein (nur für den Spieler sichtbar) #
  122. ; # - showGameText(wText, dwTime, dwTextsize) Zeigt einen Text inmitten des Bildschirmes an #
  123. ; # - showDialog(dwStyle, wCaption, wInfo, wButton1) Zeigt einen Dialog an #
  124. ; # - playAudioStream(wUrl) Spielt einen "Audio Stream" ab #
  125. ; # - stopAudioStream() Stoppt den aktuellen Audio Stream #
  126. ; # - GetChatLine(Line, Output) Liest die eingestellte Zeile aus, #
  127. ; # Optionale Parameter (timestamp=0, color=0) #
  128. ; # - blockChatInput() Eine Funktion um Messages zum Server zu blockieren #
  129. ; # - unBlockChatInput() Eine Funktion um Messages zum Server zu entblockieren #
  130. ; # ----------------------------------------------------------------------------------------------------------------- #
  131. ; # - patchRadio() (interner stuff) #
  132. ; # - unPatchRadio() (interner stuff) #
  133. ; #####################################################################################################################
  134. ; # #
  135. ; # - getPlayerScoreById(dwId) Zeigt den Score zu der Id #
  136. ; # - getPlayerPingById(dwId) Zeigt den Ping zu der Id #
  137. ; # - getPlayerNameById(dwId) Zeigt den Namen zu der Id #
  138. ; # - getPlayerIdByName(wName) Zeigt die Id zu dem Namen #
  139. ; # - updateScoreboardDataEx() Aktualisiert Scoreboard Inhalte (wird implizit aufgerufen) #
  140. ; # - updateOScoreboardData() Aktualisiert Scoreboard Inhalte (wird implizit aufgerufen) #
  141. ; # - isNPCById(dwId) Zeigt an ob die ID ein NPC #
  142. ; # - getIP() Zeigt die Server IP #
  143. ; # - getHostname() Zeigt den Servernamen #
  144. ; # - restart() Restartet das Game #
  145. ; # - CountOnlinePlayers() Gibt die Spieleranzahl zurück #
  146. ; #####################################################################################################################
  147. ; # Spielerfunktionen: #
  148. ; # - getPlayerHealth() Ermittelt die HP des Spielers #
  149. ; # - getPlayerArmor() Ermittelt den Rüstungswert des Spielers #
  150. ; # - getPlayerInteriorId() Ermittelt die Interior ID wo der Spieler ist #
  151. ; # - getPlayerMoney() Ermittelt den Kontostand des Spielers (nur GTA Intern) #
  152. ; # - getPlayerWanteds() Ermittelt die Wantedanzahl des Spielers(nur bis 6 Wanteds) #
  153. ; #####################################################################################################################
  154. ; # Fahrzeugfunktionen: #
  155. ; # - isPlayerInAnyVehicle() Ermittelt, ob sich der Spieler in einem Fahrzeug befindet #
  156. ; # - getVehicleHealth() Ermittelt die HP des Fahrzeugs, in dem der Spieler sitzt #
  157. ; # - isPlayerDriver() Ermittelt ob der Spieler Fahrer des Auto's ist #
  158. ; # - getVehicleType() Ermittelt den FahrzeugTyp(Auto,LKW etc) #
  159. ; # - getVehicleModelId() Ermittelt die Fahrzeugmodell ID #
  160. ; # - getVehicleModelName() Ermittelt den FahrzeugModell Namen #
  161. ; # - getVehicleLightState() Ermittelt den Lichtzustand vom Auto #
  162. ; # - getVehicleEngineState() Ermittelt den Motorzustand vom Auto #
  163. ; # - getVehicleLockState() Ermittelt ob das Auto auf oder zu ist #
  164. ; # - GetVehicleSpeed() Ermittelt die Geschwindigkeit des Autos
  165. ; #####################################################################################################################
  166. ; # Standpunktbestimmung: #
  167. ; # - getCoordinates() Ermittelt die aktuelle Position (Koordinaten) #
  168. ; # - GetPlayerPos(X,Y,Z) siehe oben drüber #
  169. ; # ----------------------------------------------------------------------------------------------------------------- #
  170. ; # - initZonesAndCities() Initialisiert eine Liste aller Standartgebiete #
  171. ; # (Voraussetzung für die folgenden Funktionen dieser Kategorie) #
  172. ; # - calculateZone(X, Y, Z) Bestimmt die Zone (= Stadtteil) aus den geg. Koordinaten #
  173. ; # - calculateCity(X, Y, Z) Bestimmt die Stadt aus den geg. Koordinaten #
  174. ; # - getCurrentZonecode() Ermittelt die aktulle Zone in Kurzform #
  175. ; # - AddZone(Name, X1, Y1, Z1, X2, Y2, Z2) Fügt eine Zone zum Index hinzu #
  176. ; # - AddCity(Name, X1, Y1, Z1, X2, Y2, Z2) Fügt eine Stadt zum Index hinzu #
  177. ; # - IsPlayerInRangeOfPoint(X, Y, Z, Radius) Bestimmt ob der Spieler in der Nähe der Koordinaten ist #
  178. ; # - IsIsPlayerInRangeOfPoint2D(X, Y, Radius) Bestimmt ob der Spieler in der Nähe der Koordinaten ist #
  179. ; # - getPlayerZone() - #
  180. ; # - getPlayerCity() - #
  181. ; #####################################################################################################################
  182. ; # Sonstiges: #
  183. ; # - checkHandles() #
  184. ; #####################################################################################################################
  185. ; # Speicherfunktionen (intern genutzt): #
  186. ; # Memory Functions: #
  187. ; # - checkHandles() #
  188. ; # - refreshGTA() #
  189. ; # - refreshSAMP() #
  190. ; # - refreshMemory() #
  191. ; # - getPID(szWindow) #
  192. ; # - openProcess(dwPID, dwRights) #
  193. ; # - closeProcess(hProcess) #
  194. ; # - getModuleBaseAddress(sModule, dwPID) #
  195. ; # - readString(hProcess, dwAddress, dwLen) #
  196. ; # - readFloat(hProcess, dwAddress) #
  197. ; # - readDWORD(hProcess, dwAddress) #
  198. ; # - readMem(hProcess, dwAddress, dwLen=4, type="UInt") #
  199. ; # - writeString(hProcess, dwAddress, wString) #
  200. ; # - writeRaw(hProcess, dwAddress, data, dwLen) #
  201. ; # - callWithParams(hProcess, dwFunc, aParams, bCleanupStack = true) #
  202. ; # - virtualAllocEx(hProcess, dwSize, flAllocationType, flProtect) #
  203. ; # - virtualFreeEx(hProcess, lpAddress, dwSize, dwFreeType) #
  204. ; # - createRemoteThread(hProcess, lpThreadAttributes, dwStackSize, lpStartAddress, lpParameter, #
  205. ; # dwCreationFlags, lpThreadId) #
  206. ; # - waitForSingleObject(hThread, dwMilliseconds) #
  207. ; # - __ansiToUnicode(sString, nLen = 0) #
  208. ; # - __unicodeToAnsi(wString, nLen = 0) #
  209. ; #####################################################################################################################
  210.  
  211. ; ##### SAMP-Funktionen #####
  212.  
  213. isInChat() {
  214. if(!checkHandles())
  215. return -1
  216.  
  217. dwPtr := dwSAMP + ADDR_SAMP_INCHAT_PTR
  218. dwAddress := readDWORD(hGTA, dwPtr) + ADDR_SAMP_INCHAT_PTR_OFF
  219. if(ErrorLevel) {
  220. ErrorLevel := ERROR_READ_MEMORY
  221. return -1
  222. }
  223.  
  224. dwInChat := readDWORD(hGTA, dwAddress)
  225. if(ErrorLevel) {
  226. ErrorLevel := ERROR_READ_MEMORY
  227. return -1
  228. }
  229.  
  230. ErrorLevel := ERROR_OK
  231. if(dwInChat > 0) {
  232. return true
  233. } else {
  234. return false
  235. }
  236. }
  237.  
  238. getUsername() {
  239. if(!checkHandles())
  240. return ""
  241.  
  242. dwAddress := dwSAMP + ADDR_SAMP_USERNAME
  243. sUsername := readString(hGTA, dwAddress, 25)
  244. if(ErrorLevel) {
  245. ErrorLevel := ERROR_READ_MEMORY
  246. return ""
  247. }
  248.  
  249. ErrorLevel := ERROR_OK
  250. return sUsername
  251. }
  252.  
  253. getId() {
  254. s:=getUsername()
  255. return getPlayerIdByName(s)
  256. }
  257.  
  258.  
  259. SendChat(wText) {
  260. wText := "" wText
  261.  
  262. if(!checkHandles())
  263. return false
  264.  
  265. dwFunc:=0
  266. if(SubStr(wText, 1, 1) == "/") {
  267. dwFunc := dwSAMP + FUNC_SAMP_SENDCMD
  268. } else {
  269. dwFunc := dwSAMP + FUNC_SAMP_SENDSAY
  270. }
  271.  
  272. callWithParams(hGTA, dwFunc, [["s", wText]], false)
  273.  
  274. ErrorLevel := ERROR_OK
  275. return true
  276. }
  277.  
  278. addChatMessage(wText) {
  279. wText := "" wText
  280.  
  281. if(!checkHandles())
  282. return false
  283.  
  284. dwFunc := dwSAMP + FUNC_SAMP_ADDTOCHATWND
  285. dwChatInfo := readDWORD(hGTA, dwSAMP + ADDR_SAMP_CHATMSG_PTR)
  286. if(ErrorLevel) {
  287. ErrorLevel := ERROR_READ_MEMORY
  288. return false
  289. }
  290.  
  291. callWithParams(hGTA, dwFunc, [["p", dwChatInfo], ["s", wText]], true)
  292.  
  293. ErrorLevel := ERROR_OK
  294. return true
  295. }
  296. showGameText(wText, dwTime, dwSize) {
  297. wText := "" wText
  298. dwTime += 0
  299. dwTime := Floor(dwTime)
  300. dwSize += 0
  301. dwSize := Floor(dwSize)
  302.  
  303. if(!checkHandles())
  304. return false
  305.  
  306. dwFunc := dwSAMP + FUNC_SAMP_SHOWGAMETEXT
  307.  
  308. callWithParams(hGTA, dwFunc, [["s", wText], ["i", dwTime], ["i", dwSize]], false)
  309.  
  310. ErrorLevel := ERROR_OK
  311. return true
  312. }
  313.  
  314. showDialog(dwStyle, wCaption, wInfo, wButton1 ) {
  315. dwStyle += 0
  316. dwStyle := Floor(dwStyle)
  317. wCaption := "" wCaption
  318. wInfo := "" wInfo
  319. wButton1 := "" wButton1
  320.  
  321. if(dwStyle<0 || dwStyle>5 || StrLen(wCaption)>=64 || StrLen(wInfo)>=4096 || StrLen(wButton1)>10)
  322. return false
  323.  
  324. if(!checkHandles())
  325. return false
  326.  
  327.  
  328. dwFunc := dwSAMP + FUNC_SAMP_SHOWDIALOG
  329.  
  330. dwAddress := readDWORD(hGTA, dwSAMP + ADDR_SAMP_SHOWDLG_PTR)
  331. if(ErrorLevel || dwAddress==0) {
  332. ErrorLevel := ERROR_READ_MEMORY
  333. return false
  334. }
  335.  
  336. writeString(hGTA, pParam5, wCaption)
  337. if(ErrorLevel)
  338. return false
  339. writeString(hGTA, pParam1, wInfo)
  340. if(ErrorLevel)
  341. return false
  342. writeString(hGTA, pParam5+512, wButton1)
  343. if(ErrorLevel)
  344. return false
  345.  
  346. ;mov + 7*push + call + retn
  347. dwLen := 5 + 7*5 + 5 + 1
  348.  
  349.  
  350. VarSetCapacity(injectData, dwLen, 0)
  351.  
  352. NumPut(0xB9, injectData, 0, "UChar") ;0 + 1 ;mov ecx
  353. NumPut(dwAddress, injectData, 1, "UInt") ;1 + 4
  354. NumPut(0x68, injectData, 5, "UChar") ;5 + 1 ;push 0
  355. NumPut(0, injectData, 6, "UInt") ;6 + 4
  356. NumPut(0x68, injectData, 10, "UChar") ;10 + 1 ;push 0
  357. NumPut(pParam5+StrLen(wCaption), injectData, 11, "UInt") ;11 + 4
  358. NumPut(0x68, injectData, 15, "UChar") ;15 + 1 ;push button1
  359. NumPut(pParam5+512, injectData, 16, "UInt") ;16 + 4
  360. NumPut(0x68, injectData, 20, "UChar") ;20 + 1 ;push info
  361. NumPut(pParam1, injectData, 21, "UInt") ;21 + 4
  362. NumPut(0x68, injectData, 25, "UChar") ;25 + 1 ;push caption
  363. NumPut(pParam5, injectData, 26, "UInt") ;26 + 4
  364. NumPut(0x68, injectData, 30, "UChar") ;30 + 1 ;push style
  365. NumPut(dwStyle, injectData, 31, "UInt") ;31 + 4
  366. NumPut(0x68, injectData, 35, "UChar") ;35 + 1 ;push 1
  367. NumPut(1, injectData, 36, "UInt") ;36 + 4
  368.  
  369. NumPut(0xE8, injectData, 40, "UChar") ;40 + 1 ;call
  370. offset := dwFunc - (pInjectFunc + 45)
  371. NumPut(offset, injectData, 41, "Int") ;41 + 4
  372. NumPut(0xC3, injectData, 45, "UChar") ;45 + 1 ;retn
  373.  
  374. writeRaw(hGTA, pInjectFunc, &injectData, dwLen)
  375. if(ErrorLevel)
  376. return false
  377.  
  378. hThread := createRemoteThread(hGTA, 0, 0, pInjectFunc, 0, 0, 0)
  379. if(ErrorLevel)
  380. return false
  381.  
  382. waitForSingleObject(hThread, 0xFFFFFFFF)
  383.  
  384. closeProcess(hThread)
  385.  
  386. return true
  387. }
  388.  
  389. playAudioStream(wUrl) {
  390. wUrl := "" wUrl
  391.  
  392. if(!checkHandles())
  393. return false
  394.  
  395. dwFunc := dwSAMP + FUNC_SAMP_PLAYAUDIOSTR
  396.  
  397. patchRadio()
  398.  
  399. callWithParams(hGTA, dwFunc, [["s", wUrl], ["i", 0], ["i", 0], ["i", 0], ["i", 0], ["i", 0]], false)
  400.  
  401. unPatchRadio()
  402.  
  403. ErrorLevel := ERROR_OK
  404. return true
  405. }
  406.  
  407. stopAudioStream() {
  408. if(!checkHandles())
  409. return false
  410.  
  411. dwFunc := dwSAMP + FUNC_SAMP_STOPAUDIOSTR
  412.  
  413. patchRadio()
  414.  
  415. callWithParams(hGTA, dwFunc, [["i", 1]], false)
  416.  
  417. unPatchRadio()
  418.  
  419. ErrorLevel := ERROR_OK
  420. return true
  421. }
  422.  
  423. patchRadio()
  424. {
  425. if(!checkHandles())
  426. return false
  427.  
  428. VarSetCapacity(nop, 4, 0)
  429. NumPut(0x90909090,nop,0,"UInt")
  430.  
  431. dwFunc := dwSAMP + FUNC_SAMP_PLAYAUDIOSTR
  432. writeRaw(hGTA, dwFunc, &nop, 4)
  433. writeRaw(hGTA, dwFunc+4, &nop, 1)
  434.  
  435. dwFunc := dwSAMP + FUNC_SAMP_STOPAUDIOSTR
  436. writeRaw(hGTA, dwFunc, &nop, 4)
  437. writeRaw(hGTA, dwFunc+4, &nop, 1)
  438. return true
  439. }
  440.  
  441. unPatchRadio()
  442. {
  443. if(!checkHandles())
  444. return false
  445.  
  446. VarSetCapacity(old, 4, 0)
  447.  
  448. dwFunc := dwSAMP + FUNC_SAMP_PLAYAUDIOSTR
  449. NumPut(0x74003980,old,0,"UInt")
  450. writeRaw(hGTA, dwFunc, &old, 4)
  451. NumPut(0x39,old,0,"UChar")
  452. writeRaw(hGTA, dwFunc+4, &old, 1)
  453.  
  454. dwFunc := dwSAMP + FUNC_SAMP_STOPAUDIOSTR
  455. NumPut(0x74003980,old,0,"UInt")
  456. writeRaw(hGTA, dwFunc, &old, 4)
  457. NumPut(0x09,old,0,"UChar")
  458. writeRaw(hGTA, dwFunc+4, &old, 1)
  459. return true
  460. }
  461.  
  462. blockChatInput() {
  463. if(!checkHandles())
  464. return false
  465.  
  466. VarSetCapacity(nop, 2, 0)
  467.  
  468. dwFunc := dwSAMP + FUNC_SAMP_SENDSAY
  469. NumPut(0x04C2,nop,0,"Short")
  470. writeRaw(hGTA, dwFunc, &nop, 2)
  471.  
  472. dwFunc := dwSAMP + FUNC_SAMP_SENDCMD
  473. writeRaw(hGTA, dwFunc, &nop, 2)
  474.  
  475. return true
  476. }
  477.  
  478.  
  479. unBlockChatInput() {
  480. if(!checkHandles())
  481. return false
  482.  
  483. VarSetCapacity(nop, 2, 0)
  484.  
  485. dwFunc := dwSAMP + FUNC_SAMP_SENDSAY
  486. NumPut(0xA164,nop,0,"Short")
  487. writeRaw(hGTA, dwFunc, &nop, 2)
  488.  
  489. dwFunc := dwSAMP + FUNC_SAMP_SENDCMD
  490. writeRaw(hGTA, dwFunc, &nop, 2)
  491.  
  492. return true
  493. }
  494.  
  495. getPlayerNameById(dwId) {
  496. dwId += 0
  497. dwId := Floor(dwId)
  498. if(dwId < 0 || dwId >= SAMP_PLAYER_MAX)
  499. return ""
  500.  
  501. if(iRefreshScoreboard+iUpdateTick > A_TickCount)
  502. {
  503. if(oScoreboardData[dwId])
  504. return oScoreboardData[dwId].NAME
  505. return ""
  506. }
  507.  
  508. if(!updateOScoreboardData())
  509. return ""
  510.  
  511. if(oScoreboardData[dwId])
  512. return oScoreboardData[dwId].NAME
  513. return ""
  514. }
  515.  
  516. getPlayerIdByName(wName) {
  517. wName := "" wName
  518. if(StrLen(wName) < 1 || StrLen(wName) > 20)
  519. return -1
  520.  
  521. if(iRefreshScoreboard+iUpdateTick > A_TickCount)
  522. {
  523. For i, o in oScoreboardData
  524. {
  525. if(InStr(o.NAME,wName)==1)
  526. return i
  527. }
  528. return -1
  529. }
  530.  
  531. if(!updateOScoreboardData())
  532. return -1
  533.  
  534. For i, o in oScoreboardData
  535. {
  536. if(InStr(o.NAME,wName)==1)
  537. return i
  538. }
  539. return -1
  540. }
  541.  
  542. getPlayerScoreById(dwId) {
  543. dwId += 0
  544. dwId := Floor(dwId)
  545. if(dwId < 0 || dwId >= SAMP_PLAYER_MAX)
  546. return ""
  547.  
  548. if(iRefreshScoreboard+iUpdateTick > A_TickCount)
  549. {
  550. if(oScoreboardData[dwId])
  551. return oScoreboardData[dwId].SCORE
  552. return ""
  553. }
  554.  
  555. if(!updateOScoreboardData())
  556. return ""
  557.  
  558. if(oScoreboardData[dwId])
  559. return oScoreboardData[dwId].SCORE
  560. return ""
  561. }
  562.  
  563. getPlayerPingById(dwId) {
  564. dwId += 0
  565. dwId := Floor(dwId)
  566. if(dwId < 0 || dwId >= SAMP_PLAYER_MAX)
  567. return -1
  568.  
  569. if(iRefreshScoreboard+iUpdateTick > A_TickCount)
  570. {
  571. if(oScoreboardData[dwId])
  572. return oScoreboardData[dwId].PING
  573. return -1
  574. }
  575.  
  576. if(!updateOScoreboardData())
  577. return -1
  578.  
  579. if(oScoreboardData[dwId])
  580. return oScoreboardData[dwId].PING
  581. return -1
  582. }
  583.  
  584. isNPCById(dwId) {
  585. dwId += 0
  586. dwId := Floor(dwId)
  587. if(dwId < 0 || dwId >= SAMP_PLAYER_MAX)
  588. return -1
  589.  
  590. if(iRefreshScoreboard+iUpdateTick > A_TickCount)
  591. {
  592. if(oScoreboardData[dwId])
  593. return oScoreboardData[dwId].ISNPC
  594. return -1
  595. }
  596.  
  597. if(!updateOScoreboardData())
  598. return -1
  599.  
  600. if(oScoreboardData[dwId])
  601. return oScoreboardData[dwId].ISNPC
  602. return -1
  603. }
  604.  
  605. getIP() {
  606. if(!checkHandles())
  607. return ""
  608.  
  609. dwAddress := readDWORD(hGTA, dwSAMP + SAMP_INFO_OFFSET)
  610. if(ErrorLevel || dwAddress==0) {
  611. ErrorLevel := ERROR_READ_MEMORY
  612. return ""
  613. }
  614.  
  615. ipaddr := readString(hGTA, dwAddress+SAMP_SZIP_OFFSET, 257)
  616. if(ErrorLevel) {
  617. ErrorLevel := ERROR_READ_MEMORY
  618. return ""
  619. }
  620.  
  621. return ipaddr
  622. }
  623.  
  624. getHostname() {
  625. if(!checkHandles())
  626. return ""
  627.  
  628. dwAddress := readDWORD(hGTA, dwSAMP + SAMP_INFO_OFFSET)
  629. if(ErrorLevel || dwAddress==0) {
  630. ErrorLevel := ERROR_READ_MEMORY
  631. return ""
  632. }
  633.  
  634. hostname := readString(hGTA, dwAddress+SAMP_SZHOSTNAME_OFFSET, 259)
  635. if(ErrorLevel) {
  636. ErrorLevel := ERROR_READ_MEMORY
  637. return ""
  638. }
  639.  
  640. return hostname
  641. }
  642.  
  643. CountOnlinePlayers() {
  644. if(!checkHandles())
  645. return -1
  646.  
  647. dwOnline := readDWORD(hGTA, dwSAMP + 0x21A0B4)
  648. if(ErrorLevel) {
  649. ErrorLevel := ERROR_READ_MEMORY
  650. return -1
  651. }
  652.  
  653. dwAddr := dwOnline + 0x4
  654. OnlinePlayers := readDWORD(hGTA, dwAddr)
  655. if(ErrorLevel) {
  656. ErrorLevel := ERROR_READ_MEMORY
  657. return -1
  658. }
  659.  
  660. ErrorLevel := ERROR_OK
  661. return OnlinePlayers
  662. }
  663.  
  664. ; internal stuff
  665. updateScoreboardDataEx() {
  666.  
  667. if(!checkHandles())
  668. return false
  669.  
  670. dwAddress := readDWORD(hGTA, dwSAMP + SAMP_INFO_OFFSET) ;g_SAMP
  671. if(ErrorLevel || dwAddress==0) {
  672. ErrorLevel := ERROR_READ_MEMORY
  673. return false
  674. }
  675.  
  676. dwFunc := dwSAMP + FUNC_UPDATESCOREBOARD
  677.  
  678. VarSetCapacity(injectData, 11, 0) ;mov + call + retn
  679.  
  680. NumPut(0xB9, injectData, 0, "UChar")
  681. NumPut(dwAddress, injectData, 1, "UInt")
  682.  
  683. NumPut(0xE8, injectData, 5, "UChar")
  684. offset := dwFunc - (pInjectFunc + 10)
  685. NumPut(offset, injectData, 6, "Int")
  686. NumPut(0xC3, injectData, 10, "UChar")
  687.  
  688. writeRaw(hGTA, pInjectFunc, &injectData, 11)
  689. if(ErrorLevel)
  690. return false
  691.  
  692. hThread := createRemoteThread(hGTA, 0, 0, pInjectFunc, 0, 0, 0)
  693. if(ErrorLevel)
  694. return false
  695.  
  696. waitForSingleObject(hThread, 0xFFFFFFFF)
  697.  
  698. closeProcess(hThread)
  699.  
  700. return true
  701.  
  702. }
  703.  
  704. ; internal stuff
  705. updateOScoreboardData() {
  706. if(!checkHandles())
  707. return 0
  708.  
  709. oScoreboardData := []
  710.  
  711. if(!updateScoreboardDataEx())
  712. return 0
  713.  
  714. iRefreshScoreboard := A_TickCount
  715.  
  716. dwAddress := readDWORD(hGTA, dwSAMP + SAMP_INFO_OFFSET)
  717. if(ErrorLevel || dwAddress==0) {
  718. ErrorLevel := ERROR_READ_MEMORY
  719. return 0
  720. }
  721.  
  722. dwAddress := readDWORD(hGTA, dwAddress + SAMP_PPOOLS_OFFSET)
  723. if(ErrorLevel || dwAddress==0) {
  724. ErrorLevel := ERROR_READ_MEMORY
  725. return 0
  726. }
  727.  
  728. dwPlayers := readDWORD(hGTA, dwAddress + SAMP_PPOOL_PLAYER_OFFSET)
  729. if(ErrorLevel || dwPlayers==0) {
  730. ErrorLevel := ERROR_READ_MEMORY
  731. return 0
  732. }
  733.  
  734. wID := readMem(hGTA, dwPlayers + SAMP_SLOCALPLAYERID_OFFSET, 2, "Short") ;sLocalPlayerID
  735. if(ErrorLevel) {
  736. ErrorLevel := ERROR_READ_MEMORY
  737. return 0
  738. }
  739.  
  740. dwPing := readMem(hGTA, dwPlayers + SAMP_ILOCALPLAYERPING_OFFSET, 4, "Int")
  741. if(ErrorLevel) {
  742. ErrorLevel := ERROR_READ_MEMORY
  743. return 0
  744. }
  745.  
  746. dwScore := readMem(hGTA, dwPlayers + SAMP_ILOCALPLAYERSCORE_OFFSET, 4, "Int")
  747. if(ErrorLevel) {
  748. ErrorLevel := ERROR_READ_MEMORY
  749. return 0
  750. }
  751.  
  752. dwTemp := readMem(hGTA, dwPlayers + SAMP_ISTRLEN_LOCALPLAYERNAME_OFFSET, 4, "Int") ;iStrlen_LocalPlayerName
  753. if(ErrorLevel) {
  754. ErrorLevel := ERROR_READ_MEMORY
  755. return 0
  756. }
  757.  
  758. sUsername := ""
  759. if(dwTemp <= 0xf) {
  760. sUsername := readString(hGTA, dwPlayers + SAMP_SZLOCALPLAYERNAME_OFFSET, 16) ;szLocalPlayerName
  761. if(ErrorLevel) {
  762. ErrorLevel := ERROR_READ_MEMORY
  763. return 0
  764. }
  765. }
  766. else {
  767. dwAddress := readDWORD(hGTA, dwPlayers + SAMP_PSZLOCALPLAYERNAME_OFFSET) ;pszLocalPlayerName
  768. if(ErrorLevel) {
  769. ErrorLevel := ERROR_READ_MEMORY
  770. return 0
  771. }
  772. sUsername := readString(hGTA, dwAddress, 25)
  773. if(ErrorLevel) {
  774. ErrorLevel := ERROR_READ_MEMORY
  775. return 0
  776. }
  777. }
  778. oScoreboardData[wID] := Object("NAME", sUsername, "ID", wID, "PING", dwPing, "SCORE", dwScore, "ISNPC", 0)
  779.  
  780. Loop, % SAMP_PLAYER_MAX
  781. {
  782. i := A_Index-1
  783.  
  784. dwRemoteplayer := readDWORD(hGTA, dwPlayers+SAMP_PREMOTEPLAYER_OFFSET+i*4) ;pRemotePlayer
  785. if(ErrorLevel) {
  786. ErrorLevel := ERROR_READ_MEMORY
  787. return 0
  788. }
  789.  
  790. if(dwRemoteplayer==0)
  791. continue
  792.  
  793. dwPing := readMem(hGTA, dwRemoteplayer + SAMP_IPING_OFFSET, 4, "Int")
  794. if(ErrorLevel) {
  795. ErrorLevel := ERROR_READ_MEMORY
  796. return 0
  797. }
  798.  
  799. dwScore := readMem(hGTA, dwRemoteplayer + SAMP_ISCORE_OFFSET, 4, "Int")
  800. if(ErrorLevel) {
  801. ErrorLevel := ERROR_READ_MEMORY
  802. return 0
  803. }
  804.  
  805. dwIsNPC := readMem(hGTA, dwRemoteplayer + SAMP_ISNPC_OFFSET, 4, "Int")
  806. if(ErrorLevel) {
  807. ErrorLevel := ERROR_READ_MEMORY
  808. return 0
  809. }
  810.  
  811. dwTemp := readMem(hGTA, dwRemoteplayer + SAMP_ISTRLENNAME___OFFSET, 4, "Int")
  812. if(ErrorLevel) {
  813. ErrorLevel := ERROR_READ_MEMORY
  814. return 0
  815. }
  816. sUsername := ""
  817. if(dwTemp <= 0xf)
  818. {
  819. sUsername := readString(hGTA, dwRemoteplayer+SAMP_SZPLAYERNAME_OFFSET, 16)
  820. if(ErrorLevel) {
  821. ErrorLevel := ERROR_READ_MEMORY
  822. return 0
  823. }
  824. }
  825. else {
  826. dwAddress := readDWORD(hGTA, dwRemoteplayer + SAMP_PSZPLAYERNAME_OFFSET)
  827. if(ErrorLevel || dwAddress==0) {
  828. ErrorLevel := ERROR_READ_MEMORY
  829. return 0
  830. }
  831. sUsername := readString(hGTA, dwAddress, 25)
  832. if(ErrorLevel) {
  833. ErrorLevel := ERROR_READ_MEMORY
  834. return 0
  835. }
  836. }
  837. o := Object("NAME", sUsername, "ID", i, "PING", dwPing, "SCORE", dwScore, "ISNPC", dwIsNPC)
  838. oScoreboardData[i] := o
  839. }
  840. ErrorLevel := ERROR_OK
  841. return 1
  842. }
  843.  
  844. ; ##### Sonstiges #####
  845. GetChatLine(Line, ByRef Output, timestamp=0, color=0){
  846. chatindex := 0
  847. FileRead, file, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
  848. loop, Parse, file, `n, `r
  849. {
  850. if(A_LoopField)
  851. chatindex := A_Index
  852. }
  853. loop, Parse, file, `n, `r
  854. {
  855. if(A_Index = chatindex - line){
  856. output := A_LoopField
  857. break
  858. }
  859. }
  860. file := ""
  861. if(!timestamp)
  862. output := RegExReplace(output, "U)^\[\d{2}:\d{2}:\d{2}\]")
  863. if(!color)
  864. output := RegExReplace(output, "Ui)\{[a-f0-9]{6}\}")
  865. return
  866. }
  867.  
  868. ; ##### Spielerfunktionen #####
  869. getPlayerHealth() {
  870. if(!checkHandles())
  871. return -1
  872.  
  873. dwCPedPtr := readDWORD(hGTA, ADDR_CPED_PTR)
  874. if(ErrorLevel) {
  875. ErrorLevel := ERROR_READ_MEMORY
  876. return -1
  877. }
  878.  
  879. dwAddr := dwCPedPtr + ADDR_CPED_HPOFF
  880. fHealth := readFloat(hGTA, dwAddr)
  881. if(ErrorLevel) {
  882. ErrorLevel := ERROR_READ_MEMORY
  883. return -1
  884. }
  885.  
  886. ErrorLevel := ERROR_OK
  887. return Round(fHealth)
  888. }
  889.  
  890. getPlayerArmor() {
  891. if(!checkHandles())
  892. return -1
  893.  
  894. dwCPedPtr := readDWORD(hGTA, ADDR_CPED_PTR)
  895. if(ErrorLevel) {
  896. ErrorLevel := ERROR_READ_MEMORY
  897. return -1
  898. }
  899.  
  900. dwAddr := dwCPedPtr + ADDR_CPED_ARMOROFF
  901. fHealth := readFloat(hGTA, dwAddr)
  902. if(ErrorLevel) {
  903. ErrorLevel := ERROR_READ_MEMORY
  904. return -1
  905. }
  906.  
  907. ErrorLevel := ERROR_OK
  908. return Round(fHealth)
  909. }
  910.  
  911. getPlayerInteriorId() {
  912. if(!checkHandles())
  913. return -1
  914.  
  915. iid := readMem(hGTA, ADDR_CPED_INTID, 4, "Int")
  916. if(ErrorLevel) {
  917. ErrorLevel := ERROR_READ_MEMORY
  918. return -1
  919. }
  920.  
  921. ErrorLevel := ERROR_OK
  922. return iid
  923. }
  924.  
  925. getPlayerMoney() {
  926. if(!checkHandles())
  927. return ""
  928.  
  929. money := readMem(hGTA, ADDR_CPED_MONEY, 4, "Int")
  930. if(ErrorLevel) {
  931. ErrorLevel := ERROR_READ_MEMORY
  932. return ""
  933. }
  934.  
  935. ErrorLevel := ERROR_OK
  936. return money
  937. }
  938.  
  939. getPlayerWanteds() {
  940. if(!checkHandles())
  941. return -1
  942.  
  943. dwPtr := 0xB7CD9C
  944. dwPtr := readDWORD(hGTA, dwPtr)
  945. if(ErrorLevel) {
  946. ErrorLevel := ERROR_READ_MEMORY
  947. return -1
  948. }
  949.  
  950. Wanteds := readDWORD(hGTA, dwPtr)
  951. if(ErrorLevel) {
  952. ErrorLevel := ERROR_READ_MEMORY
  953. return -1
  954. }
  955.  
  956. ErrorLevel := ERROR_OK
  957. return Wanteds
  958. }
  959.  
  960. ; ##### Fahrzeugfunktionen #####
  961.  
  962. isPlayerInAnyVehicle()
  963. {
  964. if(!checkHandles())
  965. return -1
  966.  
  967. dwVehPtr := readDWORD(hGTA, ADDR_VEHICLE_PTR)
  968. if(ErrorLevel) {
  969. ErrorLevel := ERROR_READ_MEMORY
  970. return -1
  971. }
  972.  
  973. return (dwVehPtr > 0)
  974. }
  975.  
  976.  
  977. isPlayerDriver() {
  978. if(!checkHandles())
  979. return -1
  980.  
  981. dwAddr := readDWORD(hGTA, ADDR_VEHICLE_PTR)
  982. if(ErrorLevel) {
  983. ErrorLevel := ERROR_READ_MEMORY
  984. return -1
  985. }
  986.  
  987. if(!dwAddr)
  988. return -1
  989.  
  990. dwCPedPtr := readDWORD(hGTA, ADDR_CPED_PTR)
  991. if(ErrorLevel) {
  992. ErrorLevel := ERROR_READ_MEMORY
  993. return -1
  994. }
  995.  
  996. dwVal := readDWORD(hGTA, dwAddr + ADDR_VEHICLE_DRIVER)
  997. if(ErrorLevel) {
  998. ErrorLevel := ERROR_READ_MEMORY
  999. return -1
  1000. }
  1001.  
  1002. ErrorLevel := ERROR_OK
  1003. return (dwVal==dwCPedPtr)
  1004. }
  1005.  
  1006. getVehicleHealth() {
  1007. if(!checkHandles())
  1008. return -1
  1009.  
  1010. dwVehPtr := readDWORD(hGTA, ADDR_VEHICLE_PTR)
  1011. if(ErrorLevel) {
  1012. ErrorLevel := ERROR_READ_MEMORY
  1013. return -1
  1014. }
  1015.  
  1016. dwAddr := dwVehPtr + ADDR_VEHICLE_HPOFF
  1017. fHealth := readFloat(hGTA, dwAddr)
  1018. if(ErrorLevel) {
  1019. ErrorLevel := ERROR_READ_MEMORY
  1020. return -1
  1021. }
  1022.  
  1023. ErrorLevel := ERROR_OK
  1024. return Round(fHealth)
  1025. }
  1026.  
  1027. ; 1=car, 2=boat, 3=train, 4=motorbike, 5=plane, 6=bike
  1028. ; 0 on error
  1029. getVehicleType() {
  1030. if(!checkHandles())
  1031. return 0
  1032.  
  1033. dwAddr := readDWORD(hGTA, ADDR_VEHICLE_PTR)
  1034. if(ErrorLevel) {
  1035. ErrorLevel := ERROR_READ_MEMORY
  1036. return 0
  1037. }
  1038.  
  1039. if(!dwAddr)
  1040. return 0
  1041.  
  1042. cVal := readMem(hGTA, dwAddr + ADDR_VEHICLE_TYPE, 1, "Char")
  1043. if(ErrorLevel) {
  1044. ErrorLevel := ERROR_READ_MEMORY
  1045. return 0
  1046. }
  1047.  
  1048. ErrorLevel := ERROR_OK
  1049. if(!cVal)
  1050. {
  1051. mid := getVehicleModelId()
  1052. Loop % oAirplaneModels.MaxIndex()
  1053. {
  1054. if(oAirplaneModels[A_Index]==mid)
  1055. return 5
  1056. }
  1057. return 1
  1058. }
  1059. else if(cVal==5)
  1060. return 2
  1061. else if(cVal==6)
  1062. return 3
  1063. else if(cVal==9)
  1064. {
  1065. mid := getVehicleModelId()
  1066. Loop % oBikeModels.MaxIndex()
  1067. {
  1068. if(oBikeModels[A_Index]==mid)
  1069. return 6
  1070. }
  1071. return 4
  1072. }
  1073. return 0
  1074. }
  1075.  
  1076. getVehicleModelId() {
  1077. if(!checkHandles())
  1078. return 0
  1079.  
  1080. dwAddr := readDWORD(hGTA, ADDR_VEHICLE_PTR)
  1081. if(ErrorLevel) {
  1082. ErrorLevel := ERROR_READ_MEMORY
  1083. return 0
  1084. }
  1085.  
  1086. if(!dwAddr)
  1087. return 0
  1088.  
  1089. sVal := readMem(hGTA, dwAddr + ADDR_VEHICLE_MODEL, 2, "Short")
  1090. if(ErrorLevel) {
  1091. ErrorLevel := ERROR_READ_MEMORY
  1092. return 0
  1093. }
  1094.  
  1095. ErrorLevel := ERROR_OK
  1096. return sVal
  1097. }
  1098.  
  1099. getVehicleModelName() {
  1100. id:=getVehicleModelId()
  1101. if(id>400 && id <611)
  1102. {
  1103. return ovehicleNames[id-399]
  1104. }
  1105. return ""
  1106. }
  1107.  
  1108. getVehicleLightState() {
  1109. if(!checkHandles())
  1110. return -1
  1111.  
  1112. dwAddr := readDWORD(hGTA, ADDR_VEHICLE_PTR)
  1113. if(ErrorLevel) {
  1114. ErrorLevel := ERROR_READ_MEMORY
  1115. return -1
  1116. }
  1117.  
  1118. if(!dwAddr)
  1119. return -1
  1120.  
  1121. dwVal := readMem(hGTA, dwAddr + ADDR_VEHICLE_LIGHTSTATE, 4, "Int")
  1122. if(ErrorLevel) {
  1123. ErrorLevel := ERROR_READ_MEMORY
  1124. return -1
  1125. }
  1126.  
  1127. ErrorLevel := ERROR_OK
  1128. return (dwVal>0)
  1129. }
  1130.  
  1131.  
  1132. getVehicleEngineState() {
  1133. if(!checkHandles())
  1134. return -1
  1135.  
  1136. dwAddr := readDWORD(hGTA, ADDR_VEHICLE_PTR)
  1137. if(ErrorLevel) {
  1138. ErrorLevel := ERROR_READ_MEMORY
  1139. return -1
  1140. }
  1141.  
  1142. if(!dwAddr)
  1143. return -1
  1144.  
  1145. cVal := readMem(hGTA, dwAddr + ADDR_VEHICLE_ENGINESTATE, 1, "Char")
  1146. if(ErrorLevel) {
  1147. ErrorLevel := ERROR_READ_MEMORY
  1148. return -1
  1149. }
  1150.  
  1151. ErrorLevel := ERROR_OK
  1152. return (cVal==24 || cVal==56 || cVal==88 || cVal==120)
  1153. }
  1154.  
  1155.  
  1156. getVehicleLockState() {
  1157. if(!checkHandles())
  1158. return -1
  1159.  
  1160. dwAddr := readDWORD(hGTA, ADDR_VEHICLE_PTR)
  1161. if(ErrorLevel) {
  1162. ErrorLevel := ERROR_READ_MEMORY
  1163. return -1
  1164. }
  1165.  
  1166. if(!dwAddr)
  1167. return -1
  1168.  
  1169. dwVal := readDWORD(hGTA, dwAddr + ADDR_VEHICLE_DOORSTATE)
  1170. if(ErrorLevel) {
  1171. ErrorLevel := ERROR_READ_MEMORY
  1172. return -1
  1173. }
  1174.  
  1175. ErrorLevel := ERROR_OK
  1176. return (dwVal==2)
  1177. }
  1178.  
  1179. GetVehicleSpeed()
  1180. {
  1181. if(!checkHandles())
  1182. return -1
  1183.  
  1184. dwAddr := readDWORD(hGTA,ADDR_VEHICLE_CVEH)
  1185. if(ErrorLevel) {
  1186. ErrorLevel := ERROR_READ_MEMORY
  1187. return -1
  1188. }
  1189. SpeedX := readFloat(hGTA, dwAddr+ADDR_VEHICLE_SPEED_X)
  1190. if(ErrorLevel) {
  1191. ErrorLevel := ERROR_READ_MEMORY
  1192. return -1
  1193. }
  1194. SpeedY := readFloat(hGTA, dwAddr+ADDR_VEHICLE_SPEED_Y)
  1195. if(ErrorLevel) {
  1196. ErrorLevel := ERROR_READ_MEMORY
  1197. return -1
  1198. }
  1199. SpeedZ := readFloat(hGTA, dwAddr+ADDR_VEHICLE_SPEED_Z)
  1200. if(ErrorLevel) {
  1201. ErrorLevel := ERROR_READ_MEMORY
  1202. return -1
  1203. }
  1204. SpeedX := (SpeedX*145)**2
  1205. SpeedY := (SpeedY*145)**2
  1206. SpeedZ := (SpeedZ*145)**2
  1207. Speed := Sqrt(SpeedX+SpeedY+SpeedZ)
  1208. Speed := Round(Speed)
  1209. return Speed
  1210. }
  1211.  
  1212. ; ##### Positionsbestimmung #####
  1213. getCoordinates() {
  1214. if(!checkHandles())
  1215. return ""
  1216.  
  1217. fX := readFloat(hGTA, ADDR_POSITION_X)
  1218. if(ErrorLevel) {
  1219. ErrorLevel := ERROR_READ_MEMORY
  1220. return ""
  1221. }
  1222.  
  1223. fY := readFloat(hGTA, ADDR_POSITION_Y)
  1224. if(ErrorLevel) {
  1225. ErrorLevel := ERROR_READ_MEMORY
  1226. return ""
  1227. }
  1228.  
  1229. fZ := readFloat(hGTA, ADDR_POSITION_Z)
  1230. if(ErrorLevel) {
  1231. ErrorLevel := ERROR_READ_MEMORY
  1232. return ""
  1233. }
  1234.  
  1235. ErrorLevel := ERROR_OK
  1236. return [fX, fY, fZ]
  1237. }
  1238.  
  1239. GetPlayerPos(ByRef fX,ByRef fY,ByRef fZ) {
  1240. if(!checkHandles())
  1241. return 0
  1242.  
  1243. fX := readFloat(hGTA, ADDR_POSITION_X)
  1244. if(ErrorLevel) {
  1245. ErrorLevel := ERROR_READ_MEMORY
  1246. return 0
  1247. }
  1248.  
  1249. fY := readFloat(hGTA, ADDR_POSITION_Y)
  1250. if(ErrorLevel) {
  1251. ErrorLevel := ERROR_READ_MEMORY
  1252. return 0
  1253. }
  1254.  
  1255. fZ := readFloat(hGTA, ADDR_POSITION_Z)
  1256. if(ErrorLevel) {
  1257. ErrorLevel := ERROR_READ_MEMORY
  1258. return 0
  1259. }
  1260.  
  1261. ErrorLevel := ERROR_OK
  1262. }
  1263.  
  1264. initZonesAndCities() {
  1265. AddCity("Las Venturas", 685.0, 476.093, -500.0, 3000.0, 3000.0, 500.0)
  1266. AddCity("San Fierro", -3000.0, -742.306, -500.0, -1270.53, 1530.24, 500.0)
  1267. AddCity("San Fierro", -1270.53, -402.481, -500.0, -1038.45, 832.495, 500.0)
  1268. AddCity("San Fierro", -1038.45, -145.539, -500.0, -897.546, 376.632, 500.0)
  1269. AddCity("Los Santos", 480.0, -3000.0, -500.0, 3000.0, -850.0, 500.0)
  1270. AddCity("Los Santos", 80.0, -2101.61, -500.0, 1075.0, -1239.61, 500.0)
  1271. AddCity("Tierra Robada", -1213.91, 596.349, -242.99, -480.539, 1659.68, 900.0)
  1272. AddCity("Red County", -1213.91, -768.027, -242.99, 2997.06, 596.349, 900.0)
  1273. AddCity("Flint County", -1213.91, -2892.97, -242.99, 44.6147, -768.027, 900.0)
  1274. AddCity("Whetstone", -2997.47, -2892.97, -242.99, -1213.91, -1115.58, 900.0)
  1275.  
  1276. AddZone("Avispa Country Club", -2667.810, -302.135, -28.831, -2646.400, -262.320, 71.169)
  1277. AddZone("Easter Bay Airport", -1315.420, -405.388, 15.406, -1264.400, -209.543, 25.406)
  1278. AddZone("Avispa Country Club", -2550.040, -355.493, 0.000, -2470.040, -318.493, 39.700)
  1279. AddZone("Easter Bay Airport", -1490.330, -209.543, 15.406, -1264.400, -148.388, 25.406)
  1280. AddZone("Garcia", -2395.140, -222.589, -5.3, -2354.090, -204.792, 200.000)
  1281. AddZone("Shady Cabin", -1632.830, -2263.440, -3.0, -1601.330, -2231.790, 200.000)
  1282. AddZone("East Los Santos", 2381.680, -1494.030, -89.084, 2421.030, -1454.350, 110.916)
  1283. AddZone("LVA Freight Depot", 1236.630, 1163.410, -89.084, 1277.050, 1203.280, 110.916)
  1284. AddZone("Blackfield Intersection", 1277.050, 1044.690, -89.084, 1315.350, 1087.630, 110.916)
  1285. AddZone("Avispa Country Club", -2470.040, -355.493, 0.000, -2270.040, -318.493, 46.100)
  1286. AddZone("Temple", 1252.330, -926.999, -89.084, 1357.000, -910.170, 110.916)
  1287. AddZone("Unity Station", 1692.620, -1971.800, -20.492, 1812.620, -1932.800, 79.508)
  1288. AddZone("LVA Freight Depot", 1315.350, 1044.690, -89.084, 1375.600, 1087.630, 110.916)
  1289. AddZone("Los Flores", 2581.730, -1454.350, -89.084, 2632.830, -1393.420, 110.916)
  1290. AddZone("Starfish Casino", 2437.390, 1858.100, -39.084, 2495.090, 1970.850, 60.916)
  1291. AddZone("Easter Bay Chemicals", -1132.820, -787.391, 0.000, -956.476, -768.027, 200.000)
  1292. AddZone("Downtown Los Santos", 1370.850, -1170.870, -89.084, 1463.900, -1130.850, 110.916)
  1293. AddZone("Esplanade East", -1620.300, 1176.520, -4.5, -1580.010, 1274.260, 200.000)
  1294. AddZone("Market Station", 787.461, -1410.930, -34.126, 866.009, -1310.210, 65.874)
  1295. AddZone("Linden Station", 2811.250, 1229.590, -39.594, 2861.250, 1407.590, 60.406)
  1296. AddZone("Montgomery Intersection", 1582.440, 347.457, 0.000, 1664.620, 401.750, 200.000)
  1297. AddZone("Frederick Bridge", 2759.250, 296.501, 0.000, 2774.250, 594.757, 200.000)
  1298. AddZone("Yellow Bell Station", 1377.480, 2600.430, -21.926, 1492.450, 2687.360, 78.074)
  1299. AddZone("Downtown Los Santos", 1507.510, -1385.210, 110.916, 1582.550, -1325.310, 335.916)
  1300. AddZone("Jefferson", 2185.330, -1210.740, -89.084, 2281.450, -1154.590, 110.916)
  1301. AddZone("Mulholland", 1318.130, -910.170, -89.084, 1357.000, -768.027, 110.916)
  1302. AddZone("Avispa Country Club", -2361.510, -417.199, 0.000, -2270.040, -355.493, 200.000)
  1303. AddZone("Jefferson", 1996.910, -1449.670, -89.084, 2056.860, -1350.720, 110.916)
  1304. AddZone("Julius Thruway West", 1236.630, 2142.860, -89.084, 1297.470, 2243.230, 110.916)
  1305. AddZone("Jefferson", 2124.660, -1494.030, -89.084, 2266.210, -1449.670, 110.916)
  1306. AddZone("Julius Thruway North", 1848.400, 2478.490, -89.084, 1938.800, 2553.490, 110.916)
  1307. AddZone("Rodeo", 422.680, -1570.200, -89.084, 466.223, -1406.050, 110.916)
  1308. AddZone("Cranberry Station", -2007.830, 56.306, 0.000, -1922.000, 224.782, 100.000)
  1309. AddZone("Downtown Los Santos", 1391.050, -1026.330, -89.084, 1463.900, -926.999, 110.916)
  1310. AddZone("Redsands West", 1704.590, 2243.230, -89.084, 1777.390, 2342.830, 110.916)
  1311. AddZone("Little Mexico", 1758.900, -1722.260, -89.084, 1812.620, -1577.590, 110.916)
  1312. AddZone("Blackfield Intersection", 1375.600, 823.228, -89.084, 1457.390, 919.447, 110.916)
  1313. AddZone("Los Santos International", 1974.630, -2394.330, -39.084, 2089.000, -2256.590, 60.916)
  1314. AddZone("Beacon Hill", -399.633, -1075.520, -1.489, -319.033, -977.516, 198.511)
  1315. AddZone("Rodeo", 334.503, -1501.950, -89.084, 422.680, -1406.050, 110.916)
  1316. AddZone("Richman", 225.165, -1369.620, -89.084, 334.503, -1292.070, 110.916)
  1317. AddZone("Downtown Los Santos", 1724.760, -1250.900, -89.084, 1812.620, -1150.870, 110.916)
  1318. AddZone("The Strip", 2027.400, 1703.230, -89.084, 2137.400, 1783.230, 110.916)
  1319. AddZone("Downtown Los Santos", 1378.330, -1130.850, -89.084, 1463.900, -1026.330, 110.916)
  1320. AddZone("Blackfield Intersection", 1197.390, 1044.690, -89.084, 1277.050, 1163.390, 110.916)
  1321. AddZone("Conference Center", 1073.220, -1842.270, -89.084, 1323.900, -1804.210, 110.916)
  1322. AddZone("Montgomery", 1451.400, 347.457, -6.1, 1582.440, 420.802, 200.000)
  1323. AddZone("Foster Valley", -2270.040, -430.276, -1.2, -2178.690, -324.114, 200.000)
  1324. AddZone("Blackfield Chapel", 1325.600, 596.349, -89.084, 1375.600, 795.010, 110.916)
  1325. AddZone("Los Santos International", 2051.630, -2597.260, -39.084, 2152.450, -2394.330, 60.916)
  1326. AddZone("Mulholland", 1096.470, -910.170, -89.084, 1169.130, -768.027, 110.916)
  1327. AddZone("Yellow Bell Gol Course", 1457.460, 2723.230, -89.084, 1534.560, 2863.230, 110.916)
  1328. AddZone("The Strip", 2027.400, 1783.230, -89.084, 2162.390, 1863.230, 110.916)
  1329. AddZone("Jefferson", 2056.860, -1210.740, -89.084, 2185.330, -1126.320, 110.916)
  1330. AddZone("Mulholland", 952.604, -937.184, -89.084, 1096.470, -860.619, 110.916)
  1331. AddZone("Aldea Malvada", -1372.140, 2498.520, 0.000, -1277.590, 2615.350, 200.000)
  1332. AddZone("Las Colinas", 2126.860, -1126.320, -89.084, 2185.330, -934.489, 110.916)
  1333. AddZone("Las Colinas", 1994.330, -1100.820, -89.084, 2056.860, -920.815, 110.916)
  1334. AddZone("Richman", 647.557, -954.662, -89.084, 768.694, -860.619, 110.916)
  1335. AddZone("LVA Freight Depot", 1277.050, 1087.630, -89.084, 1375.600, 1203.280, 110.916)
  1336. AddZone("Julius Thruway North", 1377.390, 2433.230, -89.084, 1534.560, 2507.230, 110.916)
  1337. AddZone("Willowfield", 2201.820, -2095.000, -89.084, 2324.000, -1989.900, 110.916)
  1338. AddZone("Julius Thruway North", 1704.590, 2342.830, -89.084, 1848.400, 2433.230, 110.916)
  1339. AddZone("Temple", 1252.330, -1130.850, -89.084, 1378.330, -1026.330, 110.916)
  1340. AddZone("Little Mexico", 1701.900, -1842.270, -89.084, 1812.620, -1722.260, 110.916)
  1341. AddZone("Queens", -2411.220, 373.539, 0.000, -2253.540, 458.411, 200.000)
  1342. AddZone("Las Venturas Airport", 1515.810, 1586.400, -12.500, 1729.950, 1714.560, 87.500)
  1343. AddZone("Richman", 225.165, -1292.070, -89.084, 466.223, -1235.070, 110.916)
  1344. AddZone("Temple", 1252.330, -1026.330, -89.084, 1391.050, -926.999, 110.916)
  1345. AddZone("East Los Santos", 2266.260, -1494.030, -89.084, 2381.680, -1372.040, 110.916)
  1346. AddZone("Julius Thruway East", 2623.180, 943.235, -89.084, 2749.900, 1055.960, 110.916)
  1347. AddZone("Willowfield", 2541.700, -1941.400, -89.084, 2703.580, -1852.870, 110.916)
  1348. AddZone("Las Colinas", 2056.860, -1126.320, -89.084, 2126.860, -920.815, 110.916)
  1349. AddZone("Julius Thruway East", 2625.160, 2202.760, -89.084, 2685.160, 2442.550, 110.916)
  1350. AddZone("Rodeo", 225.165, -1501.950, -89.084, 334.503, -1369.620, 110.916)
  1351. AddZone("Las Brujas", -365.167, 2123.010, -3.0, -208.570, 2217.680, 200.000)
  1352. AddZone("Julius Thruway East", 2536.430, 2442.550, -89.084, 2685.160, 2542.550, 110.916)
  1353. AddZone("Rodeo", 334.503, -1406.050, -89.084, 466.223, -1292.070, 110.916)
  1354. AddZone("Vinewood", 647.557, -1227.280, -89.084, 787.461, -1118.280, 110.916)
  1355. AddZone("Rodeo", 422.680, -1684.650, -89.084, 558.099, -1570.200, 110.916)
  1356. AddZone("Julius Thruway North", 2498.210, 2542.550, -89.084, 2685.160, 2626.550, 110.916)
  1357. AddZone("Downtown Los Santos", 1724.760, -1430.870, -89.084, 1812.620, -1250.900, 110.916)
  1358. AddZone("Rodeo", 225.165, -1684.650, -89.084, 312.803, -1501.950, 110.916)
  1359. AddZone("Jefferson", 2056.860, -1449.670, -89.084, 2266.210, -1372.040, 110.916)
  1360. AddZone("Hampton Barns", 603.035, 264.312, 0.000, 761.994, 366.572, 200.000)
  1361. AddZone("Temple", 1096.470, -1130.840, -89.084, 1252.330, -1026.330, 110.916)
  1362. AddZone("Kincaid Bridge", -1087.930, 855.370, -89.084, -961.950, 986.281, 110.916)
  1363. AddZone("Verona Beach", 1046.150, -1722.260, -89.084, 1161.520, -1577.590, 110.916)
  1364. AddZone("Commerce", 1323.900, -1722.260, -89.084, 1440.900, -1577.590, 110.916)
  1365. AddZone("Mulholland", 1357.000, -926.999, -89.084, 1463.900, -768.027, 110.916)
  1366. AddZone("Rodeo", 466.223, -1570.200, -89.084, 558.099, -1385.070, 110.916)
  1367. AddZone("Mulholland", 911.802, -860.619, -89.084, 1096.470, -768.027, 110.916)
  1368. AddZone("Mulholland", 768.694, -954.662, -89.084, 952.604, -860.619, 110.916)
  1369. AddZone("Julius Thruway South", 2377.390, 788.894, -89.084, 2537.390, 897.901, 110.916)
  1370. AddZone("Idlewood", 1812.620, -1852.870, -89.084, 1971.660, -1742.310, 110.916)
  1371. AddZone("Ocean Docks", 2089.000, -2394.330, -89.084, 2201.820, -2235.840, 110.916)
  1372. AddZone("Commerce", 1370.850, -1577.590, -89.084, 1463.900, -1384.950, 110.916)
  1373. AddZone("Julius Thruway North", 2121.400, 2508.230, -89.084, 2237.400, 2663.170, 110.916)
  1374. AddZone("Temple", 1096.470, -1026.330, -89.084, 1252.330, -910.170, 110.916)
  1375. AddZone("Glen Park", 1812.620, -1449.670, -89.084, 1996.910, -1350.720, 110.916)
  1376. AddZone("Easter Bay Airport", -1242.980, -50.096, 0.000, -1213.910, 578.396, 200.000)
  1377. AddZone("Martin Bridge", -222.179, 293.324, 0.000, -122.126, 476.465, 200.000)
  1378. AddZone("The Strip", 2106.700, 1863.230, -89.084, 2162.390, 2202.760, 110.916)
  1379. AddZone("Willowfield", 2541.700, -2059.230, -89.084, 2703.580, -1941.400, 110.916)
  1380. AddZone("Marina", 807.922, -1577.590, -89.084, 926.922, -1416.250, 110.916)
  1381. AddZone("Las Venturas Airport", 1457.370, 1143.210, -89.084, 1777.400, 1203.280, 110.916)
  1382. AddZone("Idlewood", 1812.620, -1742.310, -89.084, 1951.660, -1602.310, 110.916)
  1383. AddZone("Esplanade East", -1580.010, 1025.980, -6.1, -1499.890, 1274.260, 200.000)
  1384. AddZone("Downtown Los Santos", 1370.850, -1384.950, -89.084, 1463.900, -1170.870, 110.916)
  1385. AddZone("The Mako Span", 1664.620, 401.750, 0.000, 1785.140, 567.203, 200.000)
  1386. AddZone("Rodeo", 312.803, -1684.650, -89.084, 422.680, -1501.950, 110.916)
  1387. AddZone("Pershing Square", 1440.900, -1722.260, -89.084, 1583.500, -1577.590, 110.916)
  1388. AddZone("Mulholland", 687.802, -860.619, -89.084, 911.802, -768.027, 110.916)
  1389. AddZone("Gant Bridge", -2741.070, 1490.470, -6.1, -2616.400, 1659.680, 200.000)
  1390. AddZone("Las Colinas", 2185.330, -1154.590, -89.084, 2281.450, -934.489, 110.916)
  1391. AddZone("Mulholland", 1169.130, -910.170, -89.084, 1318.130, -768.027, 110.916)
  1392. AddZone("Julius Thruway North", 1938.800, 2508.230, -89.084, 2121.400, 2624.230, 110.916)
  1393. AddZone("Commerce", 1667.960, -1577.590, -89.084, 1812.620, -1430.870, 110.916)
  1394. AddZone("Rodeo", 72.648, -1544.170, -89.084, 225.165, -1404.970, 110.916)
  1395. AddZone("Roca Escalante", 2536.430, 2202.760, -89.084, 2625.160, 2442.550, 110.916)
  1396. AddZone("Rodeo", 72.648, -1684.650, -89.084, 225.165, -1544.170, 110.916)
  1397. AddZone("Market", 952.663, -1310.210, -89.084, 1072.660, -1130.850, 110.916)
  1398. AddZone("Las Colinas", 2632.740, -1135.040, -89.084, 2747.740, -945.035, 110.916)
  1399. AddZone("Mulholland", 861.085, -674.885, -89.084, 1156.550, -600.896, 110.916)
  1400. AddZone("King's", -2253.540, 373.539, -9.1, -1993.280, 458.411, 200.000)
  1401. AddZone("Redsands East", 1848.400, 2342.830, -89.084, 2011.940, 2478.490, 110.916)
  1402. AddZone("Downtown", -1580.010, 744.267, -6.1, -1499.890, 1025.980, 200.000)
  1403. AddZone("Conference Center", 1046.150, -1804.210, -89.084, 1323.900, -1722.260, 110.916)
  1404. AddZone("Richman", 647.557, -1118.280, -89.084, 787.461, -954.662, 110.916)
  1405. AddZone("Ocean Flats", -2994.490, 277.411, -9.1, -2867.850, 458.411, 200.000)
  1406. AddZone("Greenglass College", 964.391, 930.890, -89.084, 1166.530, 1044.690, 110.916)
  1407. AddZone("Glen Park", 1812.620, -1100.820, -89.084, 1994.330, -973.380, 110.916)
  1408. AddZone("LVA Freight Depot", 1375.600, 919.447, -89.084, 1457.370, 1203.280, 110.916)
  1409. AddZone("Regular Tom", -405.770, 1712.860, -3.0, -276.719, 1892.750, 200.000)
  1410. AddZone("Verona Beach", 1161.520, -1722.260, -89.084, 1323.900, -1577.590, 110.916)
  1411. AddZone("East Los Santos", 2281.450, -1372.040, -89.084, 2381.680, -1135.040, 110.916)
  1412. AddZone("Caligula's Palace", 2137.400, 1703.230, -89.084, 2437.390, 1783.230, 110.916)
  1413. AddZone("Idlewood", 1951.660, -1742.310, -89.084, 2124.660, -1602.310, 110.916)
  1414. AddZone("Pilgrim", 2624.400, 1383.230, -89.084, 2685.160, 1783.230, 110.916)
  1415. AddZone("Idlewood", 2124.660, -1742.310, -89.084, 2222.560, -1494.030, 110.916)
  1416. AddZone("Queens", -2533.040, 458.411, 0.000, -2329.310, 578.396, 200.000)
  1417. AddZone("Downtown", -1871.720, 1176.420, -4.5, -1620.300, 1274.260, 200.000)
  1418. AddZone("Commerce", 1583.500, -1722.260, -89.084, 1758.900, -1577.590, 110.916)
  1419. AddZone("East Los Santos", 2381.680, -1454.350, -89.084, 2462.130, -1135.040, 110.916)
  1420. AddZone("Marina", 647.712, -1577.590, -89.084, 807.922, -1416.250, 110.916)
  1421. AddZone("Richman", 72.648, -1404.970, -89.084, 225.165, -1235.070, 110.916)
  1422. AddZone("Vinewood", 647.712, -1416.250, -89.084, 787.461, -1227.280, 110.916)
  1423. AddZone("East Los Santos", 2222.560, -1628.530, -89.084, 2421.030, -1494.030, 110.916)
  1424. AddZone("Rodeo", 558.099, -1684.650, -89.084, 647.522, -1384.930, 110.916)
  1425. AddZone("Easter Tunnel", -1709.710, -833.034, -1.5, -1446.010, -730.118, 200.000)
  1426. AddZone("Rodeo", 466.223, -1385.070, -89.084, 647.522, -1235.070, 110.916)
  1427. AddZone("Redsands East", 1817.390, 2202.760, -89.084, 2011.940, 2342.830, 110.916)
  1428. AddZone("The Clown's Pocket", 2162.390, 1783.230, -89.084, 2437.390, 1883.230, 110.916)
  1429. AddZone("Idlewood", 1971.660, -1852.870, -89.084, 2222.560, -1742.310, 110.916)
  1430. AddZone("Montgomery Intersection", 1546.650, 208.164, 0.000, 1745.830, 347.457, 200.000)
  1431. AddZone("Willowfield", 2089.000, -2235.840, -89.084, 2201.820, -1989.900, 110.916)
  1432. AddZone("Temple", 952.663, -1130.840, -89.084, 1096.470, -937.184, 110.916)
  1433. AddZone("Prickle Pine", 1848.400, 2553.490, -89.084, 1938.800, 2863.230, 110.916)
  1434. AddZone("Los Santos International", 1400.970, -2669.260, -39.084, 2189.820, -2597.260, 60.916)
  1435. AddZone("Garver Bridge", -1213.910, 950.022, -89.084, -1087.930, 1178.930, 110.916)
  1436. AddZone("Garver Bridge", -1339.890, 828.129, -89.084, -1213.910, 1057.040, 110.916)
  1437. AddZone("Kincaid Bridge", -1339.890, 599.218, -89.084, -1213.910, 828.129, 110.916)
  1438. AddZone("Kincaid Bridge", -1213.910, 721.111, -89.084, -1087.930, 950.022, 110.916)
  1439. AddZone("Verona Beach", 930.221, -2006.780, -89.084, 1073.220, -1804.210, 110.916)
  1440. AddZone("Verdant Bluffs", 1073.220, -2006.780, -89.084, 1249.620, -1842.270, 110.916)
  1441. AddZone("Vinewood", 787.461, -1130.840, -89.084, 952.604, -954.662, 110.916)
  1442. AddZone("Vinewood", 787.461, -1310.210, -89.084, 952.663, -1130.840, 110.916)
  1443. AddZone("Commerce", 1463.900, -1577.590, -89.084, 1667.960, -1430.870, 110.916)
  1444. AddZone("Market", 787.461, -1416.250, -89.084, 1072.660, -1310.210, 110.916)
  1445. AddZone("Rockshore West", 2377.390, 596.349, -89.084, 2537.390, 788.894, 110.916)
  1446. AddZone("Julius Thruway North", 2237.400, 2542.550, -89.084, 2498.210, 2663.170, 110.916)
  1447. AddZone("East Beach", 2632.830, -1668.130, -89.084, 2747.740, -1393.420, 110.916)
  1448. AddZone("Fallow Bridge", 434.341, 366.572, 0.000, 603.035, 555.680, 200.000)
  1449. AddZone("Willowfield", 2089.000, -1989.900, -89.084, 2324.000, -1852.870, 110.916)
  1450. AddZone("Chinatown", -2274.170, 578.396, -7.6, -2078.670, 744.170, 200.000)
  1451. AddZone("El Castillo del Diablo", -208.570, 2337.180, 0.000, 8.430, 2487.180, 200.000)
  1452. AddZone("Ocean Docks", 2324.000, -2145.100, -89.084, 2703.580, -2059.230, 110.916)
  1453. AddZone("Easter Bay Chemicals", -1132.820, -768.027, 0.000, -956.476, -578.118, 200.000)
  1454. AddZone("The Visage", 1817.390, 1703.230, -89.084, 2027.400, 1863.230, 110.916)
  1455. AddZone("Ocean Flats", -2994.490, -430.276, -1.2, -2831.890, -222.589, 200.000)
  1456. AddZone("Richman", 321.356, -860.619, -89.084, 687.802, -768.027, 110.916)
  1457. AddZone("Green Palms", 176.581, 1305.450, -3.0, 338.658, 1520.720, 200.000)
  1458. AddZone("Richman", 321.356, -768.027, -89.084, 700.794, -674.885, 110.916)
  1459. AddZone("Starfish Casino", 2162.390, 1883.230, -89.084, 2437.390, 2012.180, 110.916)
  1460. AddZone("East Beach", 2747.740, -1668.130, -89.084, 2959.350, -1498.620, 110.916)
  1461. AddZone("Jefferson", 2056.860, -1372.040, -89.084, 2281.450, -1210.740, 110.916)
  1462. AddZone("Downtown Los Santos", 1463.900, -1290.870, -89.084, 1724.760, -1150.870, 110.916)
  1463. AddZone("Downtown Los Santos", 1463.900, -1430.870, -89.084, 1724.760, -1290.870, 110.916)
  1464. AddZone("Garver Bridge", -1499.890, 696.442, -179.615, -1339.890, 925.353, 20.385)
  1465. AddZone("Julius Thruway South", 1457.390, 823.228, -89.084, 2377.390, 863.229, 110.916)
  1466. AddZone("East Los Santos", 2421.030, -1628.530, -89.084, 2632.830, -1454.350, 110.916)
  1467. AddZone("Greenglass College", 964.391, 1044.690, -89.084, 1197.390, 1203.220, 110.916)
  1468. AddZone("Las Colinas", 2747.740, -1120.040, -89.084, 2959.350, -945.035, 110.916)
  1469. AddZone("Mulholland", 737.573, -768.027, -89.084, 1142.290, -674.885, 110.916)
  1470. AddZone("Ocean Docks", 2201.820, -2730.880, -89.084, 2324.000, -2418.330, 110.916)
  1471. AddZone("East Los Santos", 2462.130, -1454.350, -89.084, 2581.730, -1135.040, 110.916)
  1472. AddZone("Ganton", 2222.560, -1722.330, -89.084, 2632.830, -1628.530, 110.916)
  1473. AddZone("Avispa Country Club", -2831.890, -430.276, -6.1, -2646.400, -222.589, 200.000)
  1474. AddZone("Willowfield", 1970.620, -2179.250, -89.084, 2089.000, -1852.870, 110.916)
  1475. AddZone("Esplanade North", -1982.320, 1274.260, -4.5, -1524.240, 1358.900, 200.000)
  1476. AddZone("The High Roller", 1817.390, 1283.230, -89.084, 2027.390, 1469.230, 110.916)
  1477. AddZone("Ocean Docks", 2201.820, -2418.330, -89.084, 2324.000, -2095.000, 110.916)
  1478. AddZone("Last Dime Motel", 1823.080, 596.349, -89.084, 1997.220, 823.228, 110.916)
  1479. AddZone("Bayside Marina", -2353.170, 2275.790, 0.000, -2153.170, 2475.790, 200.000)
  1480. AddZone("King's", -2329.310, 458.411, -7.6, -1993.280, 578.396, 200.000)
  1481. AddZone("El Corona", 1692.620, -2179.250, -89.084, 1812.620, -1842.270, 110.916)
  1482. AddZone("Blackfield Chapel", 1375.600, 596.349, -89.084, 1558.090, 823.228, 110.916)
  1483. AddZone("The Pink Swan", 1817.390, 1083.230, -89.084, 2027.390, 1283.230, 110.916)
  1484. AddZone("Julius Thruway West", 1197.390, 1163.390, -89.084, 1236.630, 2243.230, 110.916)
  1485. AddZone("Los Flores", 2581.730, -1393.420, -89.084, 2747.740, -1135.040, 110.916)
  1486. AddZone("The Visage", 1817.390, 1863.230, -89.084, 2106.700, 2011.830, 110.916)
  1487. AddZone("Prickle Pine", 1938.800, 2624.230, -89.084, 2121.400, 2861.550, 110.916)
  1488. AddZone("Verona Beach", 851.449, -1804.210, -89.084, 1046.150, -1577.590, 110.916)
  1489. AddZone("Robada Intersection", -1119.010, 1178.930, -89.084, -862.025, 1351.450, 110.916)
  1490. AddZone("Linden Side", 2749.900, 943.235, -89.084, 2923.390, 1198.990, 110.916)
  1491. AddZone("Ocean Docks", 2703.580, -2302.330, -89.084, 2959.350, -2126.900, 110.916)
  1492. AddZone("Willowfield", 2324.000, -2059.230, -89.084, 2541.700, -1852.870, 110.916)
  1493. AddZone("King's", -2411.220, 265.243, -9.1, -1993.280, 373.539, 200.000)
  1494. AddZone("Commerce", 1323.900, -1842.270, -89.084, 1701.900, -1722.260, 110.916)
  1495. AddZone("Mulholland", 1269.130, -768.027, -89.084, 1414.070, -452.425, 110.916)
  1496. AddZone("Marina", 647.712, -1804.210, -89.084, 851.449, -1577.590, 110.916)
  1497. AddZone("Battery Point", -2741.070, 1268.410, -4.5, -2533.040, 1490.470, 200.000)
  1498. AddZone("The Four Dragons Casino", 1817.390, 863.232, -89.084, 2027.390, 1083.230, 110.916)
  1499. AddZone("Blackfield", 964.391, 1203.220, -89.084, 1197.390, 1403.220, 110.916)
  1500. AddZone("Julius Thruway North", 1534.560, 2433.230, -89.084, 1848.400, 2583.230, 110.916)
  1501. AddZone("Yellow Bell Gol Course", 1117.400, 2723.230, -89.084, 1457.460, 2863.230, 110.916)
  1502. AddZone("Idlewood", 1812.620, -1602.310, -89.084, 2124.660, -1449.670, 110.916)
  1503. AddZone("Redsands West", 1297.470, 2142.860, -89.084, 1777.390, 2243.230, 110.916)
  1504. AddZone("Doherty", -2270.040, -324.114, -1.2, -1794.920, -222.589, 200.000)
  1505. AddZone("Hilltop Farm", 967.383, -450.390, -3.0, 1176.780, -217.900, 200.000)
  1506. AddZone("Las Barrancas", -926.130, 1398.730, -3.0, -719.234, 1634.690, 200.000)
  1507. AddZone("Pirates in Men's Pants", 1817.390, 1469.230, -89.084, 2027.400, 1703.230, 110.916)
  1508. AddZone("City Hall", -2867.850, 277.411, -9.1, -2593.440, 458.411, 200.000)
  1509. AddZone("Avispa Country Club", -2646.400, -355.493, 0.000, -2270.040, -222.589, 200.000)
  1510. AddZone("The Strip", 2027.400, 863.229, -89.084, 2087.390, 1703.230, 110.916)
  1511. AddZone("Hashbury", -2593.440, -222.589, -1.0, -2411.220, 54.722, 200.000)
  1512. AddZone("Los Santos International", 1852.000, -2394.330, -89.084, 2089.000, -2179.250, 110.916)
  1513. AddZone("Whitewood Estates", 1098.310, 1726.220, -89.084, 1197.390, 2243.230, 110.916)
  1514. AddZone("Sherman Reservoir", -789.737, 1659.680, -89.084, -599.505, 1929.410, 110.916)
  1515. AddZone("El Corona", 1812.620, -2179.250, -89.084, 1970.620, -1852.870, 110.916)
  1516. AddZone("Downtown", -1700.010, 744.267, -6.1, -1580.010, 1176.520, 200.000)
  1517. AddZone("Foster Valley", -2178.690, -1250.970, 0.000, -1794.920, -1115.580, 200.000)
  1518. AddZone("Las Payasadas", -354.332, 2580.360, 2.0, -133.625, 2816.820, 200.000)
  1519. AddZone("Valle Ocultado", -936.668, 2611.440, 2.0, -715.961, 2847.900, 200.000)
  1520. AddZone("Blackfield Intersection", 1166.530, 795.010, -89.084, 1375.600, 1044.690, 110.916)
  1521. AddZone("Ganton", 2222.560, -1852.870, -89.084, 2632.830, -1722.330, 110.916)
  1522. AddZone("Easter Bay Airport", -1213.910, -730.118, 0.000, -1132.820, -50.096, 200.000)
  1523. AddZone("Redsands East", 1817.390, 2011.830, -89.084, 2106.700, 2202.760, 110.916)
  1524. AddZone("Esplanade East", -1499.890, 578.396, -79.615, -1339.890, 1274.260, 20.385)
  1525. AddZone("Caligula's Palace", 2087.390, 1543.230, -89.084, 2437.390, 1703.230, 110.916)
  1526. AddZone("Royal Casino", 2087.390, 1383.230, -89.084, 2437.390, 1543.230, 110.916)
  1527. AddZone("Richman", 72.648, -1235.070, -89.084, 321.356, -1008.150, 110.916)
  1528. AddZone("Starfish Casino", 2437.390, 1783.230, -89.084, 2685.160, 2012.180, 110.916)
  1529. AddZone("Mulholland", 1281.130, -452.425, -89.084, 1641.130, -290.913, 110.916)
  1530. AddZone("Downtown", -1982.320, 744.170, -6.1, -1871.720, 1274.260, 200.000)
  1531. AddZone("Hankypanky Point", 2576.920, 62.158, 0.000, 2759.250, 385.503, 200.000)
  1532. AddZone("K.A.C.C. Military Fuels", 2498.210, 2626.550, -89.084, 2749.900, 2861.550, 110.916)
  1533. AddZone("Harry Gold Parkway", 1777.390, 863.232, -89.084, 1817.390, 2342.830, 110.916)
  1534. AddZone("Bayside Tunnel", -2290.190, 2548.290, -89.084, -1950.190, 2723.290, 110.916)
  1535. AddZone("Ocean Docks", 2324.000, -2302.330, -89.084, 2703.580, -2145.100, 110.916)
  1536. AddZone("Richman", 321.356, -1044.070, -89.084, 647.557, -860.619, 110.916)
  1537. AddZone("Randolph Industrial Estate", 1558.090, 596.349, -89.084, 1823.080, 823.235, 110.916)
  1538. AddZone("East Beach", 2632.830, -1852.870, -89.084, 2959.350, -1668.130, 110.916)
  1539. AddZone("Flint Water", -314.426, -753.874, -89.084, -106.339, -463.073, 110.916)
  1540. AddZone("Blueberry", 19.607, -404.136, 3.8, 349.607, -220.137, 200.000)
  1541. AddZone("Linden Station", 2749.900, 1198.990, -89.084, 2923.390, 1548.990, 110.916)
  1542. AddZone("Glen Park", 1812.620, -1350.720, -89.084, 2056.860, -1100.820, 110.916)
  1543. AddZone("Downtown", -1993.280, 265.243, -9.1, -1794.920, 578.396, 200.000)
  1544. AddZone("Redsands West", 1377.390, 2243.230, -89.084, 1704.590, 2433.230, 110.916)
  1545. AddZone("Richman", 321.356, -1235.070, -89.084, 647.522, -1044.070, 110.916)
  1546. AddZone("Gant Bridge", -2741.450, 1659.680, -6.1, -2616.400, 2175.150, 200.000)
  1547. AddZone("Lil' Probe Inn", -90.218, 1286.850, -3.0, 153.859, 1554.120, 200.000)
  1548. AddZone("Flint Intersection", -187.700, -1596.760, -89.084, 17.063, -1276.600, 110.916)
  1549. AddZone("Las Colinas", 2281.450, -1135.040, -89.084, 2632.740, -945.035, 110.916)
  1550. AddZone("Sobell Rail Yards", 2749.900, 1548.990, -89.084, 2923.390, 1937.250, 110.916)
  1551. AddZone("The Emerald Isle", 2011.940, 2202.760, -89.084, 2237.400, 2508.230, 110.916)
  1552. AddZone("El Castillo del Diablo", -208.570, 2123.010, -7.6, 114.033, 2337.180, 200.000)
  1553. AddZone("Santa Flora", -2741.070, 458.411, -7.6, -2533.040, 793.411, 200.000)
  1554. AddZone("Playa del Seville", 2703.580, -2126.900, -89.084, 2959.350, -1852.870, 110.916)
  1555. AddZone("Market", 926.922, -1577.590, -89.084, 1370.850, -1416.250, 110.916)
  1556. AddZone("Queens", -2593.440, 54.722, 0.000, -2411.220, 458.411, 200.000)
  1557. AddZone("Pilson Intersection", 1098.390, 2243.230, -89.084, 1377.390, 2507.230, 110.916)
  1558. AddZone("Spinybed", 2121.400, 2663.170, -89.084, 2498.210, 2861.550, 110.916)
  1559. AddZone("Pilgrim", 2437.390, 1383.230, -89.084, 2624.400, 1783.230, 110.916)
  1560. AddZone("Blackfield", 964.391, 1403.220, -89.084, 1197.390, 1726.220, 110.916)
  1561. AddZone("'The Big Ear'", -410.020, 1403.340, -3.0, -137.969, 1681.230, 200.000)
  1562. AddZone("Dillimore", 580.794, -674.885, -9.5, 861.085, -404.790, 200.000)
  1563. AddZone("El Quebrados", -1645.230, 2498.520, 0.000, -1372.140, 2777.850, 200.000)
  1564. AddZone("Esplanade North", -2533.040, 1358.900, -4.5, -1996.660, 1501.210, 200.000)
  1565. AddZone("Easter Bay Airport", -1499.890, -50.096, -1.0, -1242.980, 249.904, 200.000)
  1566. AddZone("Fisher's Lagoon", 1916.990, -233.323, -100.000, 2131.720, 13.800, 200.000)
  1567. AddZone("Mulholland", 1414.070, -768.027, -89.084, 1667.610, -452.425, 110.916)
  1568. AddZone("East Beach", 2747.740, -1498.620, -89.084, 2959.350, -1120.040, 110.916)
  1569. AddZone("San Andreas Sound", 2450.390, 385.503, -100.000, 2759.250, 562.349, 200.000)
  1570. AddZone("Shady Creeks", -2030.120, -2174.890, -6.1, -1820.640, -1771.660, 200.000)
  1571. AddZone("Market", 1072.660, -1416.250, -89.084, 1370.850, -1130.850, 110.916)
  1572. AddZone("Rockshore West", 1997.220, 596.349, -89.084, 2377.390, 823.228, 110.916)
  1573. AddZone("Prickle Pine", 1534.560, 2583.230, -89.084, 1848.400, 2863.230, 110.916)
  1574. AddZone("Easter Basin", -1794.920, -50.096, -1.04, -1499.890, 249.904, 200.000)
  1575. AddZone("Leafy Hollow", -1166.970, -1856.030, 0.000, -815.624, -1602.070, 200.000)
  1576. AddZone("LVA Freight Depot", 1457.390, 863.229, -89.084, 1777.400, 1143.210, 110.916)
  1577. AddZone("Prickle Pine", 1117.400, 2507.230, -89.084, 1534.560, 2723.230, 110.916)
  1578. AddZone("Blueberry", 104.534, -220.137, 2.3, 349.607, 152.236, 200.000)
  1579. AddZone("El Castillo del Diablo", -464.515, 2217.680, 0.000, -208.570, 2580.360, 200.000)
  1580. AddZone("Downtown", -2078.670, 578.396, -7.6, -1499.890, 744.267, 200.000)
  1581. AddZone("Rockshore East", 2537.390, 676.549, -89.084, 2902.350, 943.235, 110.916)
  1582. AddZone("San Fierro Bay", -2616.400, 1501.210, -3.0, -1996.660, 1659.680, 200.000)
  1583. AddZone("Paradiso", -2741.070, 793.411, -6.1, -2533.040, 1268.410, 200.000)
  1584. AddZone("The Camel's Toe", 2087.390, 1203.230, -89.084, 2640.400, 1383.230, 110.916)
  1585. AddZone("Old Venturas Strip", 2162.390, 2012.180, -89.084, 2685.160, 2202.760, 110.916)
  1586. AddZone("Juniper Hill", -2533.040, 578.396, -7.6, -2274.170, 968.369, 200.000)
  1587. AddZone("Juniper Hollow", -2533.040, 968.369, -6.1, -2274.170, 1358.900, 200.000)
  1588. AddZone("Roca Escalante", 2237.400, 2202.760, -89.084, 2536.430, 2542.550, 110.916)
  1589. AddZone("Julius Thruway East", 2685.160, 1055.960, -89.084, 2749.900, 2626.550, 110.916)
  1590. AddZone("Verona Beach", 647.712, -2173.290, -89.084, 930.221, -1804.210, 110.916)
  1591. AddZone("Foster Valley", -2178.690, -599.884, -1.2, -1794.920, -324.114, 200.000)
  1592. AddZone("Arco del Oeste", -901.129, 2221.860, 0.000, -592.090, 2571.970, 200.000)
  1593. AddZone("Fallen Tree", -792.254, -698.555, -5.3, -452.404, -380.043, 200.000)
  1594. AddZone("The Farm", -1209.670, -1317.100, 114.981, -908.161, -787.391, 251.981)
  1595. AddZone("The Sherman Dam", -968.772, 1929.410, -3.0, -481.126, 2155.260, 200.000)
  1596. AddZone("Esplanade North", -1996.660, 1358.900, -4.5, -1524.240, 1592.510, 200.000)
  1597. AddZone("Financial", -1871.720, 744.170, -6.1, -1701.300, 1176.420, 300.000)
  1598. AddZone("Garcia", -2411.220, -222.589, -1.14, -2173.040, 265.243, 200.000)
  1599. AddZone("Montgomery", 1119.510, 119.526, -3.0, 1451.400, 493.323, 200.000)
  1600. AddZone("Creek", 2749.900, 1937.250, -89.084, 2921.620, 2669.790, 110.916)
  1601. AddZone("Los Santos International", 1249.620, -2394.330, -89.084, 1852.000, -2179.250, 110.916)
  1602. AddZone("Santa Maria Beach", 72.648, -2173.290, -89.084, 342.648, -1684.650, 110.916)
  1603. AddZone("Mulholland Intersection", 1463.900, -1150.870, -89.084, 1812.620, -768.027, 110.916)
  1604. AddZone("Angel Pine", -2324.940, -2584.290, -6.1, -1964.220, -2212.110, 200.000)
  1605. AddZone("Verdant Meadows", 37.032, 2337.180, -3.0, 435.988, 2677.900, 200.000)
  1606. AddZone("Octane Springs", 338.658, 1228.510, 0.000, 664.308, 1655.050, 200.000)
  1607. AddZone("Come-A-Lot", 2087.390, 943.235, -89.084, 2623.180, 1203.230, 110.916)
  1608. AddZone("Redsands West", 1236.630, 1883.110, -89.084, 1777.390, 2142.860, 110.916)
  1609. AddZone("Santa Maria Beach", 342.648, -2173.290, -89.084, 647.712, -1684.650, 110.916)
  1610. AddZone("Verdant Bluffs", 1249.620, -2179.250, -89.084, 1692.620, -1842.270, 110.916)
  1611. AddZone("Las Venturas Airport", 1236.630, 1203.280, -89.084, 1457.370, 1883.110, 110.916)
  1612. AddZone("Flint Range", -594.191, -1648.550, 0.000, -187.700, -1276.600, 200.000)
  1613. AddZone("Verdant Bluffs", 930.221, -2488.420, -89.084, 1249.620, -2006.780, 110.916)
  1614. AddZone("Palomino Creek", 2160.220, -149.004, 0.000, 2576.920, 228.322, 200.000)
  1615. AddZone("Ocean Docks", 2373.770, -2697.090, -89.084, 2809.220, -2330.460, 110.916)
  1616. AddZone("Easter Bay Airport", -1213.910, -50.096, -4.5, -947.980, 578.396, 200.000)
  1617. AddZone("Whitewood Estates", 883.308, 1726.220, -89.084, 1098.310, 2507.230, 110.916)
  1618. AddZone("Calton Heights", -2274.170, 744.170, -6.1, -1982.320, 1358.900, 200.000)
  1619. AddZone("Easter Basin", -1794.920, 249.904, -9.1, -1242.980, 578.396, 200.000)
  1620. AddZone("Los Santos Inlet", -321.744, -2224.430, -89.084, 44.615, -1724.430, 110.916)
  1621. AddZone("Doherty", -2173.040, -222.589, -1.0, -1794.920, 265.243, 200.000)
  1622. AddZone("Mount Chiliad", -2178.690, -2189.910, -47.917, -2030.120, -1771.660, 576.083)
  1623. AddZone("Fort Carson", -376.233, 826.326, -3.0, 123.717, 1220.440, 200.000)
  1624. AddZone("Foster Valley", -2178.690, -1115.580, 0.000, -1794.920, -599.884, 200.000)
  1625. AddZone("Ocean Flats", -2994.490, -222.589, -1.0, -2593.440, 277.411, 200.000)
  1626. AddZone("Fern Ridge", 508.189, -139.259, 0.000, 1306.660, 119.526, 200.000)
  1627. AddZone("Bayside", -2741.070, 2175.150, 0.000, -2353.170, 2722.790, 200.000)
  1628. AddZone("Las Venturas Airport", 1457.370, 1203.280, -89.084, 1777.390, 1883.110, 110.916)
  1629. AddZone("Blueberry Acres", -319.676, -220.137, 0.000, 104.534, 293.324, 200.000)
  1630. AddZone("Palisades", -2994.490, 458.411, -6.1, -2741.070, 1339.610, 200.000)
  1631. AddZone("North Rock", 2285.370, -768.027, 0.000, 2770.590, -269.740, 200.000)
  1632. AddZone("Hunter Quarry", 337.244, 710.840, -115.239, 860.554, 1031.710, 203.761)
  1633. AddZone("Los Santos International", 1382.730, -2730.880, -89.084, 2201.820, -2394.330, 110.916)
  1634. AddZone("Missionary Hill", -2994.490, -811.276, 0.000, -2178.690, -430.276, 200.000)
  1635. AddZone("San Fierro Bay", -2616.400, 1659.680, -3.0, -1996.660, 2175.150, 200.000)
  1636. AddZone("Restricted Area", -91.586, 1655.050, -50.000, 421.234, 2123.010, 250.000)
  1637. AddZone("Mount Chiliad", -2997.470, -1115.580, -47.917, -2178.690, -971.913, 576.083)
  1638. AddZone("Mount Chiliad", -2178.690, -1771.660, -47.917, -1936.120, -1250.970, 576.083)
  1639. AddZone("Easter Bay Airport", -1794.920, -730.118, -3.0, -1213.910, -50.096, 200.000)
  1640. AddZone("The Panopticon", -947.980, -304.320, -1.1, -319.676, 327.071, 200.000)
  1641. AddZone("Shady Creeks", -1820.640, -2643.680, -8.0, -1226.780, -1771.660, 200.000)
  1642. AddZone("Back o Beyond", -1166.970, -2641.190, 0.000, -321.744, -1856.030, 200.000)
  1643. AddZone("Mount Chiliad", -2994.490, -2189.910, -47.917, -2178.690, -1115.580, 576.083)
  1644. AddZone("Tierra Robada", -1213.910, 596.349, -242.990, -480.539, 1659.680, 900.000)
  1645. AddZone("Flint County", -1213.910, -2892.970, -242.990, 44.615, -768.027, 900.000)
  1646. AddZone("Whetstone", -2997.470, -2892.970, -242.990, -1213.910, -1115.580, 900.000)
  1647. AddZone("Bone County", -480.539, 596.349, -242.990, 869.461, 2993.870, 900.000)
  1648. AddZone("Tierra Robada", -2997.470, 1659.680, -242.990, -480.539, 2993.870, 900.000)
  1649. AddZone("San Fierro", -2997.470, -1115.580, -242.990, -1213.910, 1659.680, 900.000)
  1650. AddZone("Las Venturas", 869.461, 596.349, -242.990, 2997.060, 2993.870, 900.000)
  1651. AddZone("Red County", -1213.910, -768.027, -242.990, 2997.060, 596.349, 900.000)
  1652. AddZone("Los Santos", 44.615, -2892.970, -242.990, 2997.060, -768.027, 900.000)
  1653. }
  1654.  
  1655. calculateZone(posX, posY, posZ) {
  1656.  
  1657. if ( bInitZaC == 0 )
  1658. {
  1659. initZonesAndCities()
  1660. bInitZaC := 1
  1661. }
  1662.  
  1663. Loop % nZone-1
  1664. {
  1665. if (posX >= zone%A_Index%_x1) && (posY >= zone%A_Index%_y1) && (posZ >= zone%A_Index%_z1) && (posX <= zone%A_Index%_x2) && (posY <= zone%A_Index%_y2) && (posZ <= zone%A_Index%_z2)
  1666. {
  1667. ErrorLevel := ERROR_OK
  1668. return zone%A_Index%_name
  1669. }
  1670. }
  1671.  
  1672. ErrorLevel := ERROR_ZONE_NOT_FOUND
  1673. return "Unbekannt"
  1674. }
  1675.  
  1676. calculateCity(posX, posY, posZ) {
  1677.  
  1678. if ( bInitZaC == 0 )
  1679. {
  1680. initZonesAndCities()
  1681. bInitZaC := 1
  1682. }
  1683. smallestCity := "Unbekannt"
  1684. currentCitySize := 0
  1685. smallestCitySize := 0
  1686.  
  1687. Loop % nCity-1
  1688. {
  1689. if (posX >= city%A_Index%_x1) && (posY >= city%A_Index%_y1) && (posZ >= city%A_Index%_z1) && (posX <= city%A_Index%_x2) && (posY <= city%A_Index%_y2) && (posZ <= city%A_Index%_z2)
  1690. {
  1691. currentCitySize := ((city%A_Index%_x2 - city%A_Index%_x1) * (city%A_Index%_y2 - city%A_Index%_y1) * (city%A_Index%_z2 - city%A_Index%_z1))
  1692. if (smallestCity == "Unbekannt") || (currentCitySize < smallestCitySize)
  1693. {
  1694. smallestCity := city%A_Index%_name
  1695. smallestCitySize := currentCitySize
  1696. }
  1697. }
  1698. }
  1699.  
  1700. if(smallestCity == "Unbekannt") {
  1701. ErrorLevel := ERROR_CITY_NOT_FOUND
  1702. } else {
  1703. ErrorLevel := ERROR_OK
  1704. }
  1705. return smallestCity
  1706. }
  1707.  
  1708. /*
  1709. ;do not work?
  1710. getCurrentZonecode() {
  1711. if(!checkHandles())
  1712. return ""
  1713.  
  1714. return readString(hGTA, ADDR_ZONECODE, 5)
  1715. }
  1716. */
  1717.  
  1718. AddZone(sName, x1, y1, z1, x2, y2, z2) {
  1719. global
  1720. zone%nZone%_name := sName
  1721. zone%nZone%_x1 := x1
  1722. zone%nZone%_y1 := y1
  1723. zone%nZone%_z1 := z1
  1724. zone%nZone%_x2 := x2
  1725. zone%nZone%_y2 := y2
  1726. zone%nZone%_z2 := z2
  1727. nZone := nZone + 1
  1728. }
  1729.  
  1730. AddCity(sName, x1, y1, z1, x2, y2, z2) {
  1731. global
  1732. city%nCity%_name := sName
  1733. city%nCity%_x1 := x1
  1734. city%nCity%_y1 := y1
  1735. city%nCity%_z1 := z1
  1736. city%nCity%_x2 := x2
  1737. city%nCity%_y2 := y2
  1738. city%nCity%_z2 := z2
  1739. nCity := nCity + 1
  1740. }
  1741.  
  1742. IsPlayerInRangeOfPoint(_posX, _posY, _posZ, _posRadius)
  1743. {
  1744. GetPlayerPos(posX, posY, posZ)
  1745. X := posX -_posX
  1746. Y := posY -_posY
  1747. Z := posZ -_posZ
  1748. if(((X < _posRadius) && (X > -_posRadius)) && ((Y < _posRadius) && (Y > -_posRadius)) && ((Z < _posRadius) && (Z > -_posRadius)))
  1749. return TRUE
  1750. return FALSE
  1751. }
  1752.  
  1753. IsPlayerInRangeOfPoint2D(_posX, _posY, _posRadius)
  1754. {
  1755.  
  1756. GetPlayerPos(posX, posY, posZ)
  1757. X := posX - _posX
  1758. Y := posY - _posY
  1759. if(((X < _posRadius) && (X > -_posRadius)) && ((Y < _posRadius) && (Y > -_posRadius)))
  1760. return TRUE
  1761. return FALSE
  1762. }
  1763.  
  1764. getPlayerZone()
  1765. {
  1766. aktPos := getCoordinates()
  1767. return calculateZone(aktPos[1], aktPos[2], aktPos[3])
  1768. }
  1769.  
  1770. getPlayerCity()
  1771. {
  1772. aktPos := getCoordinates()
  1773. return calculateCity(aktPos[1], aktPos[2], aktPos[3])
  1774. }
  1775.  
  1776. ; ##### Sonstiges #####
  1777. checkHandles() {
  1778. if(iRefreshHandles+500>A_TickCount)
  1779. return true
  1780. iRefreshHandles:=A_TickCount
  1781. if(!refreshGTA() || !refreshSAMP() || !refreshMemory()) {
  1782. return false
  1783. } else {
  1784. return true
  1785. }
  1786.  
  1787. return true
  1788. }
  1789.  
  1790. ; internal stuff
  1791. refreshGTA() {
  1792. newPID := getPID("GTA:SA:MP")
  1793. if(!newPID) { ; GTA not found
  1794. if(hGTA) { ; open handle
  1795. virtualFreeEx(hGTA, pMemory, 0, 0x8000)
  1796. closeProcess(hGTA)
  1797. hGTA := 0x0
  1798. }
  1799. dwGTAPID := 0
  1800. hGTA := 0x0
  1801. dwSAMP := 0x0
  1802. pMemory := 0x0
  1803. return false
  1804. }
  1805.  
  1806. if(!hGTA || (dwGTAPID != newPID)) { ; changed PID, closed handle
  1807. hGTA := openProcess(newPID)
  1808. if(ErrorLevel) { ; openProcess fail
  1809. dwGTAPID := 0
  1810. hGTA := 0x0
  1811. dwSAMP := 0x0
  1812. pMemory := 0x0
  1813. return false
  1814. }
  1815. dwGTAPID := newPID
  1816. dwSAMP := 0x0
  1817. pMemory := 0x0
  1818. return true
  1819. }
  1820. return true
  1821. }
  1822.  
  1823. ; internal stuff
  1824. refreshSAMP() {
  1825. if(dwSAMP)
  1826. return true
  1827.  
  1828. dwSAMP := getModuleBaseAddress("samp.dll", hGTA)
  1829. if(!dwSAMP)
  1830. return false
  1831.  
  1832. return true
  1833. }
  1834.  
  1835. ; internal stuff
  1836. refreshMemory() {
  1837. if(!pMemory) {
  1838. pMemory := virtualAllocEx(hGTA, 6144, 0x1000 | 0x2000, 0x40)
  1839. if(ErrorLevel) {
  1840. pMemory := 0x0
  1841. return false
  1842. }
  1843. pParam1 := pMemory
  1844. pParam2 := pMemory + 1024
  1845. pParam3 := pMemory + 2048
  1846. pParam4 := pMemory + 3072
  1847. pParam5 := pMemory + 4096
  1848. pInjectFunc := pMemory + 5120
  1849. }
  1850. return true
  1851. }
  1852.  
  1853. ; internal stuff
  1854. getPID(szWindow) {
  1855. local dwPID := 0
  1856. WinGet, dwPID, PID, %szWindow%
  1857. return dwPID
  1858. }
  1859.  
  1860. ; internal stuff
  1861. openProcess(dwPID, dwRights = 0x1F0FFF) {
  1862. hProcess := DllCall("OpenProcess"
  1863. , "UInt", dwRights
  1864. , "int", 0
  1865. , "UInt", dwPID
  1866. , "Uint")
  1867. if(hProcess == 0) {
  1868. ErrorLevel := ERROR_OPEN_PROCESS
  1869. return 0
  1870. }
  1871.  
  1872. ErrorLevel := ERROR_OK
  1873. return hProcess
  1874. }
  1875.  
  1876. ; internal stuff
  1877. closeProcess(hProcess) {
  1878. if(hProcess == 0) {
  1879. ErrorLevel := ERROR_INVALID_HANDLE
  1880. return 0
  1881. }
  1882.  
  1883. dwRet := DllCall( "CloseHandle"
  1884. , "Uint", hProcess
  1885. , "UInt")
  1886. ErrorLevel := ERROR_OK
  1887. }
  1888.  
  1889. ; internal stuff
  1890. getModuleBaseAddress(sModule, hProcess) {
  1891. if(!sModule) {
  1892. ErrorLevel := ERROR_MODULE_NOT_FOUND
  1893. return 0
  1894. }
  1895.  
  1896. if(!hProcess) {
  1897. ErrorLevel := ERROR_INVALID_HANDLE
  1898. return 0
  1899. }
  1900.  
  1901. dwSize = 1024*4 ; 1024 * sizeof(HMODULE = 4)
  1902. VarSetCapacity(hMods, dwSize)
  1903. VarSetCapacity(cbNeeded, 4) ; DWORD = 4
  1904. dwRet := DllCall( "Psapi.dll\EnumProcessModules"
  1905. , "UInt", hProcess
  1906. , "UInt", &hMods
  1907. , "UInt", dwSize
  1908. , "UInt*", cbNeeded
  1909. , "UInt")
  1910. if(dwRet == 0) {
  1911. ErrorLevel := ERROR_ENUM_PROCESS_MODULES
  1912. return 0
  1913. }
  1914.  
  1915. dwMods := cbNeeded / 4 ; cbNeeded / sizeof(HMDOULE = 4)
  1916. i := 0
  1917. VarSetCapacity(hModule, 4) ; HMODULE = 4
  1918. VarSetCapacity(sCurModule, 260) ; MAX_PATH = 260
  1919. while(i < dwMods) {
  1920. hModule := NumGet(hMods, i*4)
  1921. DllCall("Psapi.dll\GetModuleFileNameEx"
  1922. , "UInt", hProcess
  1923. , "UInt", hModule
  1924. , "Str", sCurModule
  1925. , "UInt", 260)
  1926. SplitPath, sCurModule, sFilename
  1927. if(sModule == sFilename) {
  1928. ErrorLevel := ERROR_OK
  1929. return hModule
  1930. }
  1931. i := i + 1
  1932. }
  1933.  
  1934. ErrorLevel := ERROR_MODULE_NOT_FOUND
  1935. return 0
  1936. }
  1937.  
  1938. ; internal stuff
  1939. readString(hProcess, dwAddress, dwLen) {
  1940. if(!hProcess) {
  1941. ErrorLevel := ERROR_INVALID_HANDLE
  1942. return 0
  1943. }
  1944.  
  1945. VarSetCapacity(sRead, dwLen)
  1946. dwRet := DllCall( "ReadProcessMemory"
  1947. , "UInt", hProcess
  1948. , "UInt", dwAddress
  1949. , "Str", sRead
  1950. , "UInt", dwLen
  1951. , "UInt*", 0
  1952. , "UInt")
  1953. if(dwRet == 0) {
  1954. ErrorLevel := ERROR_READ_MEMORY
  1955. return 0
  1956. }
  1957.  
  1958. ErrorLevel := ERROR_OK
  1959. if A_IsUnicode
  1960. return __ansiToUnicode(sRead)
  1961. return sRead
  1962. }
  1963.  
  1964. ; internal stuff
  1965. readFloat(hProcess, dwAddress) {
  1966. if(!hProcess) {
  1967. ErrorLevel := ERROR_INVALID_HANDLE
  1968. return 0
  1969. }
  1970.  
  1971. VarSetCapacity(dwRead, 4) ; float = 4
  1972. dwRet := DllCall( "ReadProcessMemory"
  1973. , "UInt", hProcess
  1974. , "UInt", dwAddress
  1975. , "Str", dwRead
  1976. , "UInt", 4
  1977. , "UInt*", 0
  1978. , "UInt")
  1979. if(dwRet == 0) {
  1980. ErrorLevel := ERROR_READ_MEMORY
  1981. return 0
  1982. }
  1983.  
  1984. ErrorLevel := ERROR_OK
  1985. return NumGet(dwRead, 0, "Float")
  1986. }
  1987.  
  1988. ; internal stuff
  1989. readDWORD(hProcess, dwAddress) {
  1990. if(!hProcess) {
  1991. ErrorLevel := ERROR_INVALID_HANDLE
  1992. return 0
  1993. }
  1994.  
  1995. VarSetCapacity(dwRead, 4) ; DWORD = 4
  1996. dwRet := DllCall( "ReadProcessMemory"
  1997. , "UInt", hProcess
  1998. , "UInt", dwAddress
  1999. , "Str", dwRead
  2000. , "UInt", 4
  2001. , "UInt*", 0)
  2002. if(dwRet == 0) {
  2003. ErrorLevel := ERROR_READ_MEMORY
  2004. return 0
  2005. }
  2006.  
  2007. ErrorLevel := ERROR_OK
  2008. return NumGet(dwRead, 0, "UInt")
  2009. }
  2010.  
  2011. ; internal stuff
  2012. readMem(hProcess, dwAddress, dwLen=4, type="UInt") {
  2013. if(!hProcess) {
  2014. ErrorLevel := ERROR_INVALID_HANDLE
  2015. return 0
  2016. }
  2017.  
  2018. VarSetCapacity(dwRead, dwLen)
  2019. dwRet := DllCall( "ReadProcessMemory"
  2020. , "UInt", hProcess
  2021. , "UInt", dwAddress
  2022. , "Str", dwRead
  2023. , "UInt", dwLen
  2024. , "UInt*", 0)
  2025. if(dwRet == 0) {
  2026. ErrorLevel := ERROR_READ_MEMORY
  2027. return 0
  2028. }
  2029.  
  2030. ErrorLevel := ERROR_OK
  2031. return NumGet(dwRead, 0, type)
  2032. }
  2033.  
  2034. ; internal stuff
  2035. writeString(hProcess, dwAddress, wString) {
  2036. if(!hProcess) {
  2037. ErrorLevel := ERROR_INVALID_HANDLE
  2038. return false
  2039. }
  2040.  
  2041. sString := wString
  2042. if A_IsUnicode
  2043. sString := __unicodeToAnsi(wString)
  2044.  
  2045. dwRet := DllCall( "WriteProcessMemory"
  2046. , "UInt", hProcess
  2047. , "UInt", dwAddress
  2048. , "Str", sString
  2049. , "UInt", StrLen(wString) + 1
  2050. , "UInt", 0
  2051. , "UInt")
  2052. if(dwRet == 0) {
  2053. ErrorLEvel := ERROR_WRITE_MEMORY
  2054. return false
  2055. }
  2056.  
  2057. ErrorLevel := ERROR_OK
  2058. return true
  2059. }
  2060.  
  2061. ; internal stuff
  2062. writeRaw(hProcess, dwAddress, pBuffer, dwLen) {
  2063. if(!hProcess) {
  2064. ErrorLevel := ERROR_INVALID_HANDLE
  2065. return false
  2066. }
  2067.  
  2068. dwRet := DllCall( "WriteProcessMemory"
  2069. , "UInt", hProcess
  2070. , "UInt", dwAddress
  2071. , "UInt", pBuffer
  2072. , "UInt", dwLen
  2073. , "UInt", 0
  2074. , "UInt")
  2075. if(dwRet == 0) {
  2076. ErrorLEvel := ERROR_WRITE_MEMORY
  2077. return false
  2078. }
  2079.  
  2080. ErrorLevel := ERROR_OK
  2081. return true
  2082. }
  2083.  
  2084. ; internal stuff
  2085. callWithParams(hProcess, dwFunc, aParams, bCleanupStack = true) {
  2086. if(!hProcess) {
  2087. ErrorLevel := ERROR_INVALID_HANDLE
  2088. return false
  2089. }
  2090. validParams := 0
  2091.  
  2092. i := aParams.MaxIndex()
  2093.  
  2094. ; i * PUSH + CALL + RETN
  2095. dwLen := i * 5 + 5 + 1
  2096. if(bCleanupStack)
  2097. dwLen += 3
  2098. VarSetCapacity(injectData, i * 5 + 5 + 3 + 1, 0)
  2099.  
  2100. i_ := 1
  2101. while(i > 0) {
  2102. if(aParams[i][1] != "") {
  2103. dwMemAddress := 0x0
  2104. if(aParams[i][1] == "p") {
  2105. dwMemAddress := aParams[i][2]
  2106. } else if(aParams[i][1] == "s") {
  2107. if(i_>3)
  2108. return false
  2109. dwMemAddress := pParam%i_%
  2110. writeString(hProcess, dwMemAddress, aParams[i][2])
  2111. if(ErrorLevel)
  2112. return false
  2113. i_ += 1
  2114. } else if(aParams[i][1] == "i") {
  2115. dwMemAddress := aParams[i][2]
  2116. } else {
  2117. return false
  2118. }
  2119. NumPut(0x68, injectData, validParams * 5, "UChar")
  2120. NumPut(dwMemAddress, injectData, validParams * 5 + 1, "UInt")
  2121. validParams += 1
  2122. }
  2123. i -= 1
  2124. }
  2125.  
  2126. offset := dwFunc - ( pInjectFunc + validParams * 5 + 5 )
  2127. NumPut(0xE8, injectData, validParams * 5, "UChar")
  2128. NumPut(offset, injectData, validParams * 5 + 1, "Int")
  2129.  
  2130. if(bCleanupStack) {
  2131. NumPut(0xC483, injectData, validParams * 5 + 5, "UShort")
  2132. NumPut(validParams*4, injectData, validParams * 5 + 7, "UChar")
  2133.  
  2134. NumPut(0xC3, injectData, validParams * 5 + 8, "UChar")
  2135. } else {
  2136. NumPut(0xC3, injectData, validParams * 5 + 5, "UChar")
  2137. }
  2138.  
  2139. writeRaw(hGTA, pInjectFunc, &injectData, dwLen)
  2140. if(ErrorLevel)
  2141. return false
  2142.  
  2143. hThread := createRemoteThread(hGTA, 0, 0, pInjectFunc, 0, 0, 0)
  2144. if(ErrorLevel)
  2145. return false
  2146.  
  2147. waitForSingleObject(hThread, 0xFFFFFFFF)
  2148.  
  2149. closeProcess(hThread)
  2150.  
  2151. return true
  2152. }
  2153.  
  2154. ; internal stuff
  2155. virtualAllocEx(hProcess, dwSize, flAllocationType, flProtect) {
  2156. if(!hProcess) {
  2157. ErrorLevel := ERROR_INVALID_HANDLE
  2158. return 0
  2159. }
  2160.  
  2161. dwRet := DllCall( "VirtualAllocEx"
  2162. , "UInt", hProcess
  2163. , "UInt", 0
  2164. , "UInt", dwSize
  2165. , "UInt", flAllocationType
  2166. , "UInt", flProtect
  2167. , "UInt")
  2168. if(dwRet == 0) {
  2169. ErrorLEvel := ERROR_ALLOC_MEMORY
  2170. return 0
  2171. }
  2172.  
  2173. ErrorLevel := ERROR_OK
  2174. return dwRet
  2175. }
  2176.  
  2177. ; internal stuff
  2178. virtualFreeEx(hProcess, lpAddress, dwSize, dwFreeType) {
  2179. if(!hProcess) {
  2180. ErrorLevel := ERROR_INVALID_HANDLE
  2181. return 0
  2182. }
  2183.  
  2184. dwRet := DllCall( "VirtualFreeEx"
  2185. , "UInt", hProcess
  2186. , "UInt", lpAddress
  2187. , "UInt", dwSize
  2188. , "UInt", dwFreeType
  2189. , "UInt")
  2190. if(dwRet == 0) {
  2191. ErrorLEvel := ERROR_FREE_MEMORY
  2192. return 0
  2193. }
  2194.  
  2195. ErrorLevel := ERROR_OK
  2196. return dwRet
  2197. }
  2198.  
  2199. ; internal stuff
  2200. createRemoteThread(hProcess, lpThreadAttributes, dwStackSize, lpStartAddress, lpParameter, dwCreationFlags, lpThreadId) {
  2201. if(!hProcess) {
  2202. ErrorLevel := ERROR_INVALID_HANDLE
  2203. return 0
  2204. }
  2205.  
  2206. dwRet := DllCall( "CreateRemoteThread"
  2207. , "UInt", hProcess
  2208. , "UInt", lpThreadAttributes
  2209. , "UInt", dwStackSize
  2210. , "UInt", lpStartAddress
  2211. , "UInt", lpParameter
  2212. , "UInt", dwCreationFlags
  2213. , "UInt", lpThreadId
  2214. , "UInt")
  2215. if(dwRet == 0) {
  2216. ErrorLEvel := ERROR_ALLOC_MEMORY
  2217. return 0
  2218. }
  2219.  
  2220. ErrorLevel := ERROR_OK
  2221. return dwRet
  2222. }
  2223.  
  2224. ; internal stuff
  2225. waitForSingleObject(hThread, dwMilliseconds) {
  2226. if(!hThread) {
  2227. ErrorLevel := ERROR_INVALID_HANDLE
  2228. return 0
  2229. }
  2230.  
  2231. dwRet := DllCall( "WaitForSingleObject"
  2232. , "UInt", hThread
  2233. , "UInt", dwMilliseconds
  2234. , "UInt")
  2235. if(dwRet == 0xFFFFFFFF) {
  2236. ErrorLEvel := ERROR_WAIT_FOR_OBJECT
  2237. return 0
  2238. }
  2239.  
  2240. ErrorLevel := ERROR_OK
  2241. return dwRet
  2242. }
  2243.  
  2244. ; internal stuff
  2245. __ansiToUnicode(sString, nLen = 0) {
  2246. If !nLen
  2247. {
  2248. nLen := DllCall("MultiByteToWideChar"
  2249. , "Uint", 0
  2250. , "Uint", 0
  2251. , "Uint", &sString
  2252. , "int", -1
  2253. , "Uint", 0
  2254. , "int", 0)
  2255. }
  2256.  
  2257. VarSetCapacity(wString, nLen * 2)
  2258.  
  2259. DllCall("MultiByteToWideChar"
  2260. , "Uint", 0
  2261. , "Uint", 0
  2262. , "Uint", &sString
  2263. , "int", -1
  2264. , "Uint", &wString
  2265. , "int", nLen)
  2266.  
  2267. return wString
  2268. }
  2269.  
  2270. ; internal stuff
  2271. __unicodeToAnsi(wString, nLen = 0) {
  2272. pString := wString + 1 > 65536 ? wString : &wString
  2273.  
  2274. If !nLen
  2275. {
  2276. nLen := DllCall("WideCharToMultiByte"
  2277. , "Uint", 0
  2278. , "Uint", 0
  2279. , "Uint", pString
  2280. , "int", -1
  2281. , "Uint", 0
  2282. , "int", 0
  2283. , "Uint", 0
  2284. , "Uint", 0)
  2285. }
  2286.  
  2287. VarSetCapacity(sString, nLen)
  2288.  
  2289. DllCall("WideCharToMultiByte"
  2290. , "Uint", 0
  2291. , "Uint", 0
  2292. , "Uint", pString
  2293. , "int", -1
  2294. , "str", sString
  2295. , "int", nLen
  2296. , "Uint", 0
  2297. , "Uint", 0)
  2298. return sString
  2299. }
  2300.  
  2301.  
  2302. restartGameEx() {
  2303.  
  2304. if(!checkHandles())
  2305. return -1
  2306.  
  2307. dwAddress := readDWORD(hGTA, dwSAMP + SAMP_INFO_OFFSET) ;g_SAMP
  2308. if(ErrorLevel || dwAddress==0) {
  2309. ErrorLevel := ERROR_READ_MEMORY
  2310. return -1
  2311. }
  2312.  
  2313. dwFunc := dwSAMP + 0xA060
  2314.  
  2315. VarSetCapacity(injectData, 11, 0) ;mov, call, retn
  2316.  
  2317. NumPut(0xB9, injectData, 0, "UChar") ;mov ecx 0+1
  2318. NumPut(dwAddress, injectData, 1, "UInt") ;1+4
  2319. NumPut(0xE8, injectData, 5, "UChar") ;call 5+1
  2320. offset := dwFunc - (pInjectFunc + 10)
  2321. NumPut(offset, injectData, 6, "Int") ; 6+4
  2322. NumPut(0xC3, injectData, 10, "UChar") ; 10+1
  2323.  
  2324. writeRaw(hGTA, pInjectFunc, &injectData, 11)
  2325. if(ErrorLevel)
  2326. return false
  2327.  
  2328. hThread := createRemoteThread(hGTA, 0, 0, pInjectFunc, 0, 0, 0)
  2329. if(ErrorLevel)
  2330. return false
  2331.  
  2332. waitForSingleObject(hThread, 0xFFFFFFFF)
  2333.  
  2334. return true
  2335.  
  2336. }
  2337.  
  2338. disconnectEx() {
  2339.  
  2340. if(!checkHandles())
  2341. return 0
  2342.  
  2343. dwAddress := readDWORD(hGTA, dwSAMP + SAMP_INFO_OFFSET) ;g_SAMP
  2344. if(ErrorLevel || dwAddress==0) {
  2345. ErrorLevel := ERROR_READ_MEMORY
  2346. return 0
  2347. }
  2348.  
  2349. dwAddress := readDWORD(hGTA, dwAddress + 0x3c9) ;pRakClientInterface
  2350. if(ErrorLevel || dwAddress==0) {
  2351. ErrorLevel := ERROR_READ_MEMORY
  2352. return 0
  2353. }
  2354.  
  2355. ecx := dwAddress ;this
  2356.  
  2357. dwAddress := readDWORD(hGTA, dwAddress) ;vtable
  2358. if(ErrorLevel || dwAddress==0) {
  2359. ErrorLevel := ERROR_READ_MEMORY
  2360. return 0
  2361. }
  2362.  
  2363.  
  2364.  
  2365. VarSetCapacity(injectData, 24, 0) ;mov, call, retn
  2366.  
  2367. NumPut(0xB9, injectData, 0, "UChar") ;mov ecx 0+1
  2368. NumPut(ecx, injectData, 1, "UInt") ;1+4
  2369.  
  2370. NumPut(0xB8, injectData, 5, "UChar") ;mov eax 5+1
  2371. NumPut(dwAddress, injectData, 6, "UInt") ;6+4
  2372.  
  2373. ;NumPut(0x006A006A, injectData, 10, "UInt") ; 2x push 10+4
  2374.  
  2375. NumPut(0x68, injectData, 10, "UChar") ;10 + 1 ;push style
  2376. NumPut(0, injectData, 11, "UInt") ;11 + 4
  2377.  
  2378. NumPut(0x68, injectData, 15, "UChar") ;15 + 1 ;push style
  2379. NumPut(500, injectData, 16, "UInt") ;16 + 4
  2380.  
  2381. ;---
  2382.  
  2383. NumPut(0x50FF, injectData, 20, "UShort") ;20 + 2
  2384. NumPut(0x08, injectData, 22, "UChar") ;22 + 1
  2385.  
  2386. NumPut(0xC3, injectData, 23, "UChar") ;retn 23+1
  2387.  
  2388. writeRaw(hGTA, pInjectFunc, &injectData, 24)
  2389. if(ErrorLevel)
  2390. return false
  2391.  
  2392. hThread := createRemoteThread(hGTA, 0, 0, pInjectFunc, 0, 0, 0)
  2393. if(ErrorLevel)
  2394. return false
  2395.  
  2396. waitForSingleObject(hThread, 0xFFFFFFFF)
  2397.  
  2398. return true
  2399.  
  2400. }
  2401.  
  2402. setrestart()
  2403. {
  2404. VarSetCapacity(old, 4, 0)
  2405. dwAddress := readDWORD(hGTA, dwSAMP + SAMP_INFO_OFFSET) ;g_SAMP
  2406. if(ErrorLevel || dwAddress==0) {
  2407. ErrorLevel := ERROR_READ_MEMORY
  2408. return 0
  2409. }
  2410.  
  2411. NumPut(9,old,0,"Int")
  2412. writeRaw(hGTA, dwAddress + 957, &old, 4)
  2413. }
  2414.  
  2415. restart()
  2416. {
  2417. restartGameEx()
  2418. disconnectEx()
  2419. addChatMessage("{FFFFFF}Rejoining..")
  2420. Sleep 1000
  2421. setrestart()
  2422. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!