#UseHook, On
#IfWinActive, GTA:SA:MP
#NoEnv
#Include SAMP.ahk

SetTimer, KillsTode, on

iniread, zivikillspruch, settings.ini, Sprüche, zivikillspruch
iniread, fzivikillspruch, settings.ini, Sprüche, fzivikillspruch
iniread, gangkillspruch, settings.ini, Sprüche, gangkillspruch
iniread, fgangkillspruch, settings.ini, Sprüche, fgangkillspruch
iniread, copkillspruch, settings.ini, Sprüche, copkillspruch
iniread, fcopkillspruch, settings.ini, Sprüche, fcopkillspruch
iniread, fgangwarkillspruch, settings.ini, Sprüche, fgangwarkillspruch
iniread, gangwartodspruch, settings.ini, Sprüche, gangwartodspruch
iniread, todkillspruch, settings.ini, Sprüche, todkillspruch
iniread, blacklistspruch, settings.ini, Sprüche, blacklistspruch
iniread, randomspruch, settings.ini, Sprüche, randomspruch

iniread, kill, settings.ini, Kills, kill, 0
iniread, tod, settings.ini, Tode, tod, 0

IniWrite, %zivikillspruch%, settings.ini, Sprüche, zivikillspruch
IniWrite, %fzivikillspruch%, settings.ini, Sprüche, fzivikillspruch
iniwrite, %gangkillspruch%, settings.ini, Sprüche, gangkillspruch
iniwrite, %fgangkillspruch%, settings.ini, Sprüche, fgangkillspruch
iniwrite, %copkillspruch%, settings.ini, Sprüche, copkillspruch
iniwrite, %fcopkillspruch%, settings.ini, Sprüche, fcopkillspruch
iniwrite, %fgangwarkillspruch%, settings.ini, Sprüche, fgangwarkillspruch
iniwrite, %gangwartodspruch%, settings.ini, Sprüche, gangwartodspruch
iniwrite, %todkillspruch%, settings.ini, Sprüche, todkillspruch
iniwrite, %blacklistspruch%, settings.ini, Sprüche, blacklistspruch
iniwrite, %randomspruch%, settings.ini, Sprüche, randomspruch

Gui, Add, Text, x10 y5 , In der settings.ini alle "Sprüche" ausfüllen sonst kommt Ingame "ERROR" als Killspruch.
Gui, Show, h25 w430, Killzähler
return

GuiClose:
iniwrite, %kill%, settings.ini, Kills, kill
iniwrite, %tod%, settings.ini, Tode, tod
ExitApp
return

KillsTode:
GetChatLine(1, Chatline)
GetChatLine(0, Chatline1)
phealth := GetPlayerHealth()
parmor := GetPlayerArmor()
pzone := GetPlayerZone()
pcity := GetPlayerCity()
KD := Round(kill/tod, 2)

if(InStr(Chatline, "Du hast ein Verbrechen begangen! ( Mord ). Zeuge: Zivilist."))
{
    kill ++
    SendChat("/f " fzivikillspruch " | Kills: " kill " | KD: " KD "")
    SendChat("" zivikillspruch " | Kills: " kill " | KD: " KD "")
    AddChatMessage("{ffffff}+1 Zivi Kill")
    showGameText("ZIVIKILL +1", 2000, 3)
}
else if (InStr(Chatline, "Du hast ein Verbrechen begangen! ( Gang Mord ). Zeuge: Zivilist."))
{
    kill ++
    SendChat("/f " fgangkillspruch " | Kills: " kill " | KD: " KD "")
    SendChat("" gangkillspruch " | Kills: " kill " | KD: " KD "")
    AddChatMessage("{ffffff}+1 Gang Kill")
    showGameText("GANGKILL +1", 2000, 3)
}
else if (InStr(Chatline, "Du hast ein Verbrechen begangen! ( Cop Mord ). Zeuge: Zivilist."))
{
    kill ++
    SendChat("/f " fcopkillspruch " | Kills: " kill " | KD: " KD "")
    SendChat("" copkillspruch " | Kills: " kill " | KD: " KD "")
    AddChatMessage("{ffffff}+1 Cop Kill")
    showGameText("COPKILL +1", 2000, 3)
}
else if(InStr(Chatline1, "[GANGFIGHT] Du hast") && InStr(Chatline1, "in einer Einnahme getötet (+500$)."))
{
    kill ++
	SendChat("/f " fgangwarkillspruch " | Kills: " kill " | KD: " KD "")
    AddChatMessage("{ffffff}+1 Gangwar Kill")
    showGameText("GANGWARKILL +1", 2000, 3)
}
else if (InStr(Chatline, "Du bist gestorben! Alle Ärzte wurden benachrichtigt!"))
{
    tod ++
    SendChat("/f " todkillspruch " | Tode: " tod "")
    AddChatMessage("{ffffff}+1 Tod")
    showGameText("TOD +1", 2000, 3)
}
else if (InStr(Chatline1, "[GANGFIGHT] Du wurdest von") && InStr(Chatline1, "in einer Einnahme getötet (-500$)."))
{
    tod ++
    SendChat("/f " gangwartodspruch " | Tode: " tod "")
    AddChatMessage("{ffffff}+1 Gangwar Tod")
    showGameText("TOD +1", 2000, 3)
}
return