[AHK] ReadChat funktioniert nicht

malE · 1. April 2016

Hallo,
kann mir jemand sagen, warum das nicht funktioniert?
Es wird bei allen einfach nichts ausgegeben.

C

SetTimer, ReadChat, 100
ReadChat:
if(A_isSuspended)
	return
if(WinActive("GTA:SA:MP"))
{
	GetChatLine(0, chat)
	If InStr(chat, "|================| Gehalts-Check |================|")
	{
		AddChatMessage("{2E9AFE}[Keybinder] {FFFFFF}: Du hast insgesamt $" todayVerdienst " und " todayEXP "EXP auf " todayLinien " Linien erhalten.")
		AddChatMessage("{2E9AFE}[Keybinder] {FFFFFF}: Deine Einstellungen wurde durch den Payday soeben zurückgesetzt.")
		todayVerdient = 0
		todayEXP = 0
		todayLinien = 0
	}
	If InStr(chat, "Du kannst das Fahrzeug mit /motor starten. Die Scheinwerfer können mit /licht angeschaltet werden.")
	{
		SendChat("/lock")
		SendChat("/licht")
		SendChat("/motor")
	}
	;* Du erhälst am nächsten Payday 2900$ gutgeschrieben. Erhaltene Exp: 1
	If InStr(chat, "* Du erhälst am nächsten Payday ") AND InStr(chat, "gutgeschrieben. Erhaltene Exp: ") AND InStr(chat, ".")
	{
		RegExMatch(chat, "\* Du erhälst am nächsten Payday (.*)\$ gutgeschrieben\. Erhaltene Exp\: (.*)\.", var_)
		AddChatMessage("{2E9AFE}[Keybinder] {FFFFFF}: Buslinie erfolgreich beendet.")
		AddChatMessage("{2E9AFE}[Keybinder] {FFFFFF}: Verdienst: $" var_1 " & EXP: " var_2 ".")
		globalVerdienst += var_1
		globalEXP += var_2
		globalLinien++
		IniWrite, %globalVerdienst%, %ini%, Informationen, globalVerdienst
		IniWrite, %globalEXP%, %ini%, Informationen, globalEXP
		IniWrite, %globalLinien%, %ini%, Informationen, globalLinien
		todayVerdienst += var_1
		todayEXP += var_2
		todayLinien++
		GuiControl, , textStats, Heute:`nVerdienst: %todayVerdienst%`nEXP: %todayEXP%`nLinien: %todayLinien%`n`nGlobal:`nVerdienst: $%globalVerdienst%`nEXP: %globalEXP%`nLinien: %globalLinien%
		;AddChatMessage("{2E9AFE}** Linienfahrt beendet, neue Buslinie 1 wird ausgewählt.")
	}
}
return

Alles anzeigen

Mit freundlichen Grüßen
malE

Renz · 2. April 2016

Brainfuck

SetTimer, ReadChat, 100
ReadChat:
FileRead, Chat, %A_MyDocuments%\GTA San Andreas User Files\SAMP\Chatlog.txt
If InStr(chat, "Gehalts-Check")
{
	AddChatMessage("{2E9AFE}[Keybinder] {FFFFFF}: Du hast insgesamt $" todayVerdienst " und " todayEXP "EXP auf " todayLinien " Linien erhalten.")
	AddChatMessage("{2E9AFE}[Keybinder] {FFFFFF}: Deine Einstellungen wurde durch den Payday soeben zurückgesetzt.")
	todayVerdient = 0
	todayEXP = 0
	todayLinien = 0	
	FileRead,log_Backup, %A_MyDocuments%\GTA San Andreas User Files\SAMP\Chatlog.txt
	Backup := log_Backup
	Filedelete, %A_MyDocuments%\GTA San Andreas User Files\SAMP\Chatlog.txt
	FileAppEnd,`n%Backup%,%A_MyDocuments%\GTA San Andreas User Files\SAMP\Chatlog_backup.txt
}
If InStr(chat, "Du kannst das Fahrzeug mit /motor starten. Die Scheinwerfer können mit /licht angeschaltet werden.")
{
	SendChat("/lock")
	SendChat("/licht")
	SendChat("/motor")
	FileRead,log_Backup, %A_MyDocuments%\GTA San Andreas User Files\SAMP\Chatlog.txt
	Backup := log_Backup
	Filedelete, %A_MyDocuments%\GTA San Andreas User Files\SAMP\Chatlog.txt
	FileAppEnd,`n%Backup%,%A_MyDocuments%\GTA San Andreas User Files\SAMP\Chatlog_backup.txt
}
;* Du erhälst am nächsten Payday 2900$ gutgeschrieben. Erhaltene Exp: 1
If InStr(chat, "am nächsten Payday ") AND InStr(chat, "Erhaltene Exp:")
{
	RegExMatch(chat, "Payday (.*)\$ .* Exp\: (.*)\.", var_)
	AddChatMessage("{2E9AFE}[Keybinder] {FFFFFF}: Buslinie erfolgreich beendet.")
	AddChatMessage("{2E9AFE}[Keybinder] {FFFFFF}: Verdienst: $" var_1 " & EXP: " var_2 ".")
	globalVerdienst += var_1
	globalEXP += var_2
	globalLinien++
	IniWrite, %globalVerdienst%, %ini%, Informationen, globalVerdienst
	IniWrite, %globalEXP%, %ini%, Informationen, globalEXP
	IniWrite, %globalLinien%, %ini%, Informationen, globalLinien
	todayVerdienst += var_1
	todayEXP += var_2
	todayLinien++
	GuiControl, , textStats, Heute:`nVerdienst: %todayVerdienst%`nEXP: %todayEXP%`nLinien: %todayLinien%`n`nGlobal:`nVerdienst: $%globalVerdienst%`nEXP: %globalEXP%`nLinien: %globalLinien%
	;AddChatMessage("{2E9AFE}** Linienfahrt beendet, neue Buslinie 1 wird ausgewählt.")
	FileRead,log_Backup, %A_MyDocuments%\GTA San Andreas User Files\SAMP\Chatlog.txt
	Backup := log_Backup
	Filedelete, %A_MyDocuments%\GTA San Andreas User Files\SAMP\Chatlog.txt
	FileAppEnd,`n%Backup%,%A_MyDocuments%\GTA San Andreas User Files\SAMP\Chatlog_backup.txt
}
return

Alles anzeigen

Versuchs mal so, GetChatline() kann ich nicht empfehlen. Mach das lieber selber mit FileRead und einem Chatlog Backup

malE · 2. April 2016

Funktioniert leider immer nicht.
Sende mir z.B die Nachricht via AddChatMessage AddChatMessage("{33CCFF}* Du erhälst am nächsten Payday 2900$ gutgeschrieben. Erhaltene Exp: 1.")
und nichts passiert.

DJ Deagle · 2. April 2016

Zitat von malE

Funktioniert leider immer nicht.
Sende mir z.B die Nachricht via AddChatMessage AddChatMessage("{33CCFF}* Du erhälst am nächsten Payday 2900$ gutgeschrieben. Erhaltene Exp: 1.")
und nichts passiert.

Gibt es die "AddChatMessage" auch in der API? (nicht nur in der inkludierten AHK sondern auch in der Programmbibliothek)

malE · 2. April 2016

Nicht das ich wüsste.

Bookai · 2. April 2016

Welche API verwendest du überhaupt? Sehe nicht, dass du das schonmal erwähnt hättest.

malE · 3. April 2016

AHPi oder die Standard API.

-
Funktioniert jetzt doch, Danke Renz.

breadfish.de 12. März 2022