Fahrzeug ID auslesen AutoHotkey

BreadScript · 15. Dezember 2017

Hallo,

ich würde gerne die Fahrzeug ID auslesen in dem der Spieler sitzt. Hierzu ist in meiner SAMP.ahk API folgendes vorgegeben

Code

getTargetVehicleModelIdById(dwId)

ich habe das ganze wie folgt zuerst gemacht

addMessageToChat(getTargetVehicleModelIdById(dwId))

allerdings ohne Erfolg. Er zeigt immer 0 an. Wie ist es hier am besten zu Regeln ?

@Madd92

Madd92 · 15. Dezember 2017

Ehm welche API nutzt du denn? AddMessageToChat ist wenn ich mich richtig erinnere früher mal der Funktionsname in irgendeiner Lib gewesen.

noahschnapp · 15. Dezember 2017

Damit ich das richtig Verstehe, möchtest du die Model-ID oder die Fahrzeug-ID (Serverseitig) ausgeben?

BreadScript · 15. Dezember 2017

Zitat von Madd92

Ehm welche API nutzt du denn? AddMessageToChat ist wenn ich mich richtig erinnere früher mal der Funktionsname in irgendeiner Lib gewesen.

addChatMessage Sorry

Zitat von noahschnapp

Damit ich das richtig Verstehe, möchtest du die Model-ID oder die Fahrzeug-ID (Serverseitig) ausgeben?

Ich möchte die Fahrzeug ID Serverseitig auslesen ja

Madd92 · 15. Dezember 2017

Komisch trotzdem, dass in der UDF die ModelID-Funktion anscheinend nicht funktioniert. Schau am besten mal, ob du die aktuellste hast, also R16, für die 0.3.7, nicht R1 oder R2.

Ich weiß noch, dass ich mich mit der Fahrzeug-ID schon einmal beschäftigt hatte, weil die vehicleID in der RemotePlayerData-Struktur nicht zurückgesetzt wird und daher auch wenn der Spieler zu Fuß unterwegs war, eine Fahrzeug-ID ausgegeben wurde. Es gab glaube ich eine einfachere Lösung, ich hab sie auf die schnelle aber nicht wiedergefunden, daher kannst du auch einfach erstmal diese Kombination verwenden:

PHP

getVehiclePassengers(vehicleID) {
	if (vehicleID < 1 || vehicleID > 2000 || !checkHandles() || !updateOScoreboardData())
		return ""


	dwAddress := readDWORD(hGTA, readDWORD(hGTA, readDWORD(hGTA, readDWORD(hGTA, dwSAMP + SAMP_INFO_OFFSET) + SAMP_PPOOLS_OFFSET) + 0x1C) + 0x4FB4 + vehicleID * 0x4)
	if (dwAddress == 0x0 || dwAddress == "")
		return ""


	dwCPedPtr := readDWORD(hGTA, ADDR_CPED_PTR)
	passengers := []


	Loop, 10 {
		if ((dwPED := readDWORD(hGTA, dwAddress + 0x45C + 4 * A_Index)) == 0x0)
			continue


		if (dwCPedPtr == dwPED)
			passengers.Push(Object("SEAT", A_Index - 1, "PED", dwPED, "ID", getPlayerID(), "NAME", getPlayerName()))
		else
			passengers.Push(Object("SEAT", A_Index - 1, "PED", dwPED, "ID", 0xFFFF, "NAME", ""))
	}


	for i, o in oScoreboardData {
		for j, k in passengers {
			if (o.PED != k.PED)
				continue
			k.ID := o.ID
			k.NAME := o.NAME
		}
	}


	return passengers
}


getPlayerVehicleID(playerID) {
	if (playerID < 0 || playerID >= SAMP_PLAYER_MAX || !checkHandles()) 
		return 0


	dwAddress := readDWORD(hGTA, readDWORD(hGTA, dwSAMP + SAMP_INFO_OFFSET) + SAMP_PPOOLS_OFFSET)
	dwPlayer := readDWORD(hGTA, readDWORD(hGTA, dwAddress + SAMP_PPOOL_PLAYER_OFFSET) + SAMP_PREMOTEPLAYER_OFFSET + playerID * 4) 
	vehID := readMem(hGTA, readDWORD(hGTA, dwPlayer + 0x0) + 0xAD, 2, "UShort")
	if (vehID < 1 || vehID > 2000)
		return 0


	passengers := getVehiclePassengers(vehID)
	for i, o in passengers {
		if (o.ID == playerID)
			return vehID
	}


	return 0
}

Alles anzeigen

BreadScript · 15. Dezember 2017

Probiere ich gleich mal aus.

Hab noch eine Frage

Code

SMS: Text, Sender:Name(Nummer)

aus den Text würde ich gerne nur den Namen auslesen

Code

if(RegExMatch(Chat_9, "SMS\: (.*)\, Sender\: (.*) \(([0-9]+)\)", params))

Madd92 · 15. Dezember 2017

https://ahkde.github.io/docs/misc/RegEx-QuickRef.htm einfach bitte mal reingucken, nicht auf Verdacht alles escapen, was danach aussieht

BreadScript · 15. Dezember 2017

Hat nun alles geklappt. Wie kann ich am sinnvollsten alle Chatlines überprüfen `? Jedoch wenn ein Ergebnis gefunden wurde das er nicht mehr weiter sucht ?

Madd92 · 16. Dezember 2017

GetChatLine in nem Loop mit Break?

BreadScript · 16. Dezember 2017

Scheine ich auch für zu Blöd zusein.

So sieht mein loop derzeit aus

Code

ArrestList:
Loop 1
{
	GetChatLine(0, chat1)
	GetChatLine(1, chat2)
	GetChatLine(2, chat3)
	GetChatLine(3, chat4)
	if(InStr(chat, freename))
	{
		if(RegExMatch(chat1 . chat2 . chat3 . chat4, freename " (\d+) Minuten (\d+)\$ LSPD", params_))
		{
			if(params_2 != "" || params_2 != Error)
			{			
				addChatMessage("Ja")
			}
		}
	}
}
break_ArrestList:

Alles anzeigen

es rührt sich aber nichts

Madd92 · 16. Dezember 2017

Ich weiß jetzt nicht genau, was deine Abbruchbedingung ist, aber im Prinzip einfach:

PHP

Loop, 20 ; // Maximale Anzahl an Durchläufen (Chatzeilen)
{
   GetChatLine(A_Index - 1, chat) ; // A_Index wird von 1-20 hochgezählt
   if (!InStr(chat, freename) || !RegExMatch(chat, "", params)) ; // Haystack angeben 
      continue ; // wenn der Name nicht enthalten ist, weiter mit der nächsten Zeile


   AddChatMessage(params1) ; // Was auch immer ausgeführt werden soll
   break ; // nach Erfolg den Loop vorzeitig beenden
}

Wenn das ganze in einem Timer laufen und dauerhaft überprüft werden soll, ist es vermutlich sinnvoller, regelmäßig die chatlog.txt auszulesen und zu prüfen, ob es neue Chatzeilen gibt und die neuen dann abzuarbeiten. Statt jedes Mal bis zu 20 Zeilen auszulesen und zu prüfen, die eventuell längere Zeit immer die gleichen sind.

BreadScript · 16. Dezember 2017

Oh supi

Wollte nun aber den params ausgeben lassen also params_2 und da gibt er mit immer wieder den kack freename aus

Code

if(freemember==1)
	{
		Loop, 20 ; // Maximale Anzahl an Durchläufen (Chatzeilen)
		{


		   GetChatLine(A_Index - 1, chat) ; // A_Index wird von 1-20 hochgezählt
		   if (!InStr(chat, %freename%) || !RegExMatch(chat, %freename% " (\d+) Minuten (\d+)\$ LSPD", params)) ; // Haystack angeben 
			continue ; // wenn der Name nicht enthalten ist, weiter mit der nächsten Zeile
		   addChatMessage(params_2) ; // Was auch immer ausgeführt werden soll
		   freemember=0
		   break ; // nach Erfolg den Loop vorzeitig beenden
		} 
	}

Alles anzeigen

Madd92 · 16. Dezember 2017

Eher so: if (!InStr(chat, freename) || !RegExMatch(chat, freename " (\d+) Minuten (\d+)\$ LSPD", params_)) ; // Haystack angeben wenn die Zeile z.B. "BreadScript 5 Minuten 2000$ LSPD" enthält.

BreadScript · 16. Dezember 2017

Zitat von Madd92

Eher so: if (!InStr(chat, freename) || !RegExMatch(chat, freename " (\d+) Minuten (\d+)\$ LSPD", params_)) ; // Haystack angeben wenn die Zeile z.B. "BreadScript 5 Minuten 2000$ LSPD" enthält.

So kann er iwie den freename nicht auslesen warum auch immer

und er liest den params aus einem anderen Befehl aus

Madd92 · 16. Dezember 2017

Was meinst du? Wie sieht denn die Zeile zum Beispiel aus?

BreadScript · 16. Dezember 2017

Ah hab den Fehler gefunden. Musste statt

Code

params_1

auf

Code

params1

da du etwas anders als ich schreibst und sicher auch viel besser bist haha

Madd92 · 16. Dezember 2017

Hatte es ja in der Zeile geändert, damit es unten passt

BreadScript · 29. Mai 2019

Zitat von Madd92

Komisch trotzdem, dass in der UDF die ModelID-Funktion anscheinend nicht funktioniert. Schau am besten mal, ob du die aktuellste hast, also R16, für die 0.3.7, nicht R1 oder R2.

Ich weiß noch, dass ich mich mit der Fahrzeug-ID schon einmal beschäftigt hatte, weil die vehicleID in der RemotePlayerData-Struktur nicht zurückgesetzt wird und daher auch wenn der Spieler zu Fuß unterwegs war, eine Fahrzeug-ID ausgegeben wurde. Es gab glaube ich eine einfachere Lösung, ich hab sie auf die schnelle aber nicht wiedergefunden, daher kannst du auch einfach erstmal diese Kombination verwenden:

PHP

getVehiclePassengers(vehicleID) {
	if (vehicleID < 1 || vehicleID > 2000 || !checkHandles() || !updateOScoreboardData())
		return ""


	dwAddress := readDWORD(hGTA, readDWORD(hGTA, readDWORD(hGTA, readDWORD(hGTA, dwSAMP + SAMP_INFO_OFFSET) + SAMP_PPOOLS_OFFSET) + 0x1C) + 0x4FB4 + vehicleID * 0x4)
	if (dwAddress == 0x0 || dwAddress == "")
		return ""


	dwCPedPtr := readDWORD(hGTA, ADDR_CPED_PTR)
	passengers := []


	Loop, 10 {
		if ((dwPED := readDWORD(hGTA, dwAddress + 0x45C + 4 * A_Index)) == 0x0)
			continue


		if (dwCPedPtr == dwPED)
			passengers.Push(Object("SEAT", A_Index - 1, "PED", dwPED, "ID", getPlayerID(), "NAME", getPlayerName()))
		else
			passengers.Push(Object("SEAT", A_Index - 1, "PED", dwPED, "ID", 0xFFFF, "NAME", ""))
	}


	for i, o in oScoreboardData {
		for j, k in passengers {
			if (o.PED != k.PED)
				continue
			k.ID := o.ID
			k.NAME := o.NAME
		}
	}


	return passengers
}


getPlayerVehicleID(playerID) {
	if (playerID < 0 || playerID >= SAMP_PLAYER_MAX || !checkHandles()) 
		return 0


	dwAddress := readDWORD(hGTA, readDWORD(hGTA, dwSAMP + SAMP_INFO_OFFSET) + SAMP_PPOOLS_OFFSET)
	dwPlayer := readDWORD(hGTA, readDWORD(hGTA, dwAddress + SAMP_PPOOL_PLAYER_OFFSET) + SAMP_PREMOTEPLAYER_OFFSET + playerID * 4) 
	vehID := readMem(hGTA, readDWORD(hGTA, dwPlayer + 0x0) + 0xAD, 2, "UShort")
	if (vehID < 1 || vehID > 2000)
		return 0


	passengers := getVehiclePassengers(vehID)
	for i, o in passengers {
		if (o.ID == playerID)
			return vehID
	}


	return 0
}

Alles anzeigen

Brauche das mal wieder. Leider gerade etwas eingerostet. Ich würde gerne Abfragen ob der User in einem bestimmten Fahrzeug sitzt. Wie war der passende Code nochmal dazu

Madd92 · 29. Mai 2019

Du meinst der lokale Spieler?

Spoiler anzeigen

C

getVehicleID() {
	if (!checkHandles() || !isPlayerInAnyVehicle())
		return 0


	return __READMEM(hGTA, dwSAMP, [SAMP_INFO_PTR, SAMP_POOLS, SAMP_POOL_PLAYER, SAMP_LOCALPLAYER, isPlayerDriver() ? 0xAA : 0x5C], "UShort")
}

BreadScript · 31. Mai 2019

Zitat von Madd92

Du meinst der lokale Spieler?

Spoiler anzeigen

C

getVehicleID() {
	if (!checkHandles() || !isPlayerInAnyVehicle())
		return 0


	return __READMEM(hGTA, dwSAMP, [SAMP_INFO_PTR, SAMP_POOLS, SAMP_POOL_PLAYER, SAMP_LOCALPLAYER, isPlayerDriver() ? 0xAA : 0x5C], "UShort")
}

Ja es geht um die Ermittlung der Fahrzeugid des Spielers der den Keybinder verwendet.

Ich habe es nun wie folgt mal gemacht

Code

status = getVehicleID()
addChatMessage(status)
if(status)==482

Leider aber ohne Richtige funktion. Die AddChatMessage gibt nichts aus.