7 replies to this topic

[Lanzo]

Hallo,

ich arbeite zur Zeit öfters an einem Keybinder für SAMP, ich habe die API und arbeite eben mit Autohotkey.

Ich möchte das der Chatlog ausgelesen wird "deine Reload-Time ist nun 15 Minuten." und daraufhin

AddChatMessage Timer gestartet

dann sollte ein Timer von 15 Minuten runterzählen also "900000"

und danach wieder

AddChatMessage "Du kannst nun wieder ein Auto verticken"

 

Ich hoffe ihr könnt mir helfen

MfG 

[ripper121]

wo wird der denn gespeichert der chatlog? In einer datei oder wo?

[Lanzo]

In einer .txt

C:\Users\Dominik\Documents\GTA San Andreas User Files\SAMP\chatlog.txt

[SAPlayer]

So sollte es funktionieren (mal wieder ungetestet):

GetChatLine(Line, ByRef Output, timestamp=0, color=0){ ;Funktion, recht weit oben hin
	chatindex := 0
	FileRead, file, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
	loop, Parse, file, `n, `r
	{
		if(A_LoopField)
			chatindex := A_Index
	}
	loop, Parse, file, `n, `r
	{
		if(A_Index = chatindex - line){
			output := A_LoopField
			break
		}
	}
	file := ""
	if(!timestamp)
		output := RegExReplace(output, "U)^\[\d{2}:\d{2}:\d{2}\]")
	if(!color)
		output := RegExReplace(output, "Ui)\{[a-f0-9]{6}\}")
	return
}

SetTimer, CheckCar, 500 ;vor das erste return!
return

CheckCar:
if(!WinActive("GTA:SA:MP"))
  return
GetChatLine(0, chat)
if(InStr(chat, "deine Reload-Time ist nun 15 Minuten.")){
  SetTimer, CarSell, -900000
  AddChatMessage(0xFF6600, "Timer gestartet")
}
return
CarSell:
if(WinActive("GTA:SA:MP"))
  AddChatMessage(0xFF6600, "Du kannst nun wieder ein Auto verticken")
else
  MsgBox, Du kannst nun wieder ein Auto verticken

[ripper121]

Test mal das:

#NoEnv  ; Recommended for performance and compatibility with future AutoHotkey releases.
SendMode Input  ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir%  ; Ensures a consistent starting directory.
Loop, read, C:\Users\Dominik\Documents\GTA San Andreas User Files\SAMP\chatlog.txt
{
  Needle = deine Reload-Time ist nun 15 Minuten.
  IfInString, A_LoopReadLine, %Needle%
  {
    MsgBox, The string %A_LoopReadLine% was found @ Line %A_Index%
  }
}
return

[Lanzo]

So sollte es funktionieren (mal wieder ungetestet):

GetChatLine(Line, ByRef Output, timestamp=0, color=0){ ;Funktion, recht weit oben hin
	chatindex := 0
	FileRead, file, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
	loop, Parse, file, `n, `r
	{
		if(A_LoopField)
			chatindex := A_Index
	}
	loop, Parse, file, `n, `r
	{
		if(A_Index = chatindex - line){
			output := A_LoopField
			break
		}
	}
	file := ""
	if(!timestamp)
		output := RegExReplace(output, "U)^\[\d{2}:\d{2}:\d{2}\]")
	if(!color)
		output := RegExReplace(output, "Ui)\{[a-f0-9]{6}\}")
	return
}

SetTimer, CheckCar, 500 ;vor das erste return!
return

CheckCar:
if(!WinActive("GTA:SA:MP"))
  return
GetChatLine(0, chat)
if(InStr(chat, "deine Reload-Time ist nun 15 Minuten.")){
  SetTimer, CarSell, -900000
  AddChatMessage(0xFF6600, "Timer gestartet")
}
return
CarSell:
if(WinActive("GTA:SA:MP"))
  AddChatMessage(0xFF6600, "Du kannst nun wieder ein Auto verticken")
else
  MsgBox, Du kannst nun wieder ein Auto verticken

Duplicate function definiton " GetChatLine irgendwas"

[ripper121]

screnshot vom fehler machen

[SAPlayer]

Dann lass meine Funktion raus und nutze die API-Funktion - die funktioniert genauso.