#SingleInstance force
#include API.ahk
#Persistent
OnExit, Callback_OnExit
Overlay_Box := -1
API_Logo_Img := -1
API_Logo_Text := -1
Gui, Show, w900 h600, ©Liru's Allround Keybinder
Gui, Add, Picture, x0 y0 h610 w960, Sweety.png
SetTimer, WantedRead, 1000
settimer, hitman, 100
return
NumpadAdd::
Suspend
If ( A_IsSuspended)
ShowGameText("~w~Keybinder ~r~deaktiviert.", 1000, 3)
If ( !A_IsSuspended)
ShowGameText("~w~Keybinder ~g~aktiviert.", 1000, 3)
return
:?:/ab::
Suspend Permit
SendChat("/pickup")
SendChat("Guten Tag, das ist der Anrufbeantworter von Silas.")
SendChat("Leider bin ich gerade nicht erreichtbar bitte schreiben Sie mir eine SMS.")
SendChat("Vielen Dank und Schönen Tag noch wünscht ihnen Silas")
SendChat("/h")
return
:?:/cops::
Suspend permit
Loop, 3
Sendchat("/s >>>COPS - INCOMING<<<")
sleep, 3000
return
:?:/p::
Suspend Permit
Loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
{
	If InStr(A_LoopReadLine, "klingelt. Anrufer: ")
	{
		RegExMatch(A_LoopReadLine, "Anrufer: (\S+)" ,var)
	}
}
SendChat("/pickup")
SendChat("Guten Tag " var1 " Sie sprechen mit Liru.")
SendChat("Autogramme gibt es später oder gibt es eine andere Frage?")
return
!2::
Random, Zufall, 1, 4
GoSub, Nocheinbeispiel%Zufall%
Return

Nocheinbeispiel1:
SendChat("Mit freundlichen Grüßen.")
Return

Nocheinbeispiel2:
SendChat("Mhh...ein weiter Freekill.")
Return

Nocheinbeispiel3:
SendChat("jojo Easy Snack")
Return

Nocheinbeispiel4:
SendChat("Nächste mal mit etwas Skill, danke!")
Return
Numpad2::
Sendchat("/engine")
Sleep, 500
Send, {enter}
return


:?:/suche::
TextDestroy(Find)
Suspend Permit
Suspend on
SendInput /suche{space}
Input, var2, V I M, {Enter}.{NumpadEnter}
sendinput {end}+{home}{del}{enter}
suspend off
GetPlayerData()
GetPlayerNameById(var2, name)
;SendChat("Name von Id " var2 ": "name)
SendChat("/find "var2)
Settimer, Find ,6000
;Numpad1::
return

Find:
SendChat("/find "var2)
return

Numpad1::
Settimer, Find , off
return

:?:/id::
Suspend Permit
Suspend on
SendInput /id{space}
Input, var3, V I M, {Enter}.{NumpadEnter}
sendinput {end}+{home}{del}{enter}
suspend off
GetPlayerData()
id := GetPlayerIdByName(var3)
if(id == -1)
; MsgBox, Spieler wurde nicht gefunden.
 AddChatMessage(0xFFFFFF, "Spieler wurde nicht gefunden.")
else
; MsgBox, Spieler wurde gefunden. ID: %id%
 AddChatMessage(0xFFFFFF, "Spieler {FFA000}" var3 "{FFFFFF} wurde gefunden. ID: {FFA000}"id)
return
F2::
Send, {down}
Sleep, 40
Send, {enter}
Sleep, 40
Send, {enter}
Sleep, 40
Send, {down}
Sleep, 40
Send, {down}
Sleep, 35
Send, {enter}
return

F3::
Send, {down}
Sleep, 40
Send, {down}
Sleep, 40
Send, {enter}
Sleep, 40
Send, {enter}
Sleep, 40
Send, {down}
Sleep, 40
Send, {down}
Sleep, 40
Send, {enter}
Sleep, 47
SendInput 300
Sleep, 40
Send, {enter}
return

F4::
Send, {down}
Sleep, 40
Send, {down}
Sleep, 40
Send, {down}
Sleep, 40
Send, {enter}
Sleep, 40
Send, {down}
Sleep, 40
Send, {enter}
return
GuiClose:
Callback_OnExit:
DestroyAllVisual()
ExitApp
return
SetTimer, WantedRead, 1000
return ;AutoExec Ende

WantedRead:
IfWinNotActive, GTA:SA:MP
	return
GetChatLine(2, Str)
If InStr(Str, "Achtung du wirst von der Polizei gesucht") {
	RegExMatch(Str, "Zeuge\:(.*)", Zeuge)
	GetChatLine(1, Str)
	if InStr(Str, "Grund") {
		RegExMatch(Str, "Grund\:(.*)", Grund)
		GetChatLine(0, Str)
		if InStr(Str, "Dein aktuelles Wantedlevel beträgt") {
			RegExMatch(Str, "Dein aktuelles Wantedlevel beträgt\:(.*)", WantedLevel)
		} else {
			WantedLevel1 := "Unbekannt"
		}
	} else {
		Grund1 := "Unbekannt"
	}
} else {
	Zeuge1 := "Unbekannt"
}
if (InStr(Str, "Minuten in das Gefängnis gesperrt") || InStr(Str, "Wanteds aus deiner Polizeiakte gelöscht")
{
	Zeuge1 := "Keiner"
	Grund1 := "Keiner"
	WantedLevel1 := "0"
}
return

Numpad6::
if(IsChatOpen() == 1 || IsDialogOpen() == 1)
	return
AddChatMessage(0x00ffff , "INFO: {FFFFFF}Dein Wantedlevel ist: {99ff99}" . Wantedlevel1 . "{FFFFFF} | Zeuge: {99ff99}" . Zeuge1 . "{FFFFFF} | Grund: {99ff99}" . Grund1)
AddChatMessage(0x00ffff, "Health: {99ff99}" . GetPlayerHealth() . "{FFFFFF}.")
AddChatMessage(0x00ffff, "Armor: {99ff99}" . GetPlayerArmor() . "{FFFFFF}.")
return