/*
    Coypright by Atrox, DMA und Sebihunter
*/
#define SAMP
#include <samp\a_samp>

// DB
new DB:HandleGlobal

// Player

new HFGonline[MAX_PLAYERS], HFGchannel[MAX_PLAYERS],
    TutorialStep[MAX_PLAYERS], TutorialTimer[MAX_PLAYERS],
    supportModus[MAX_PLAYERS], supportSelect[MAX_PLAYERS],
    name[MAX_PLAYERS][MAX_PLAYER_NAME]

// Staaten
new Float:Hospitals[][3] =
{
    { 0.0, 0.0, 7.0 }, // SF
    { 0.0, 0.0, 7.0 }, // LS
    { 0.0, 0.0, 7.0 }, // LV
    { 0.0, 0.0, 7.0 }, // Wüste
    { 0.0, 0.0, 7.0 }  // AP
}

// Forward
forward TutorialForPlayer(playerid)
forward DoesPlayerHasTag(playerid,tag[]);

// DIALOG
#define DIALOG_LOGIN 1000
#define DIALOG_REGISTER 1001
#define DIALOG_OKAY 1002
#define DIALOG_WARNING 1003
#define DIALOG_INVENTAR 1004
#define DIALOG_IOBJECT 1005
#define DIALOG_PSTAT 1006
#define DIALOG_SOPTIONS 1007
#define DIALOG_STATE_LIST 1008

//Colors
#define COLOR_GREEN 0x21DD00FF
#define COLOR_GOLD 0xCFB53BFF
#define COLOR_ADMIN_RED 0xFB0000FF
#define COLOR_LIGHTRED 0xFF8080FF
#define COLOR_LIGHTBLUE 0x00C2ECFF
#define COLOR_PURPLE 0xB360FDFF
#define COLOR_WHITE 0xFFFFFFFF
#define COLOR_DARKPINK 0xE100E1FF
#define COLOR_SYSTEM 0xEFEFF7AA
#define COLOR_NICESKY 0x99FFFFAA
#define COLOR_GRAY 0xCECECEFF
#define COLOR_PINK 0xFF66FFAA
#define COLOR_DBLUE 0x2641FEAA
#define COLOR_GRAD1 0xB4B5B7FF
#define COLOR_GRAD2 0xBFC0C2FF
#define COLOR_GRAD3 0xCBCCCEFF
#define COLOR_GRAD4 0xD8D8D8FF
#define COLOR_GRAD5 0xE3E3E3FF
#define COLOR_GRAD6 0xF0F0F0FF
#define COLOR_YELLOW2 0xF5DEB3AA
#define COLOR_GREY 0xAFAFAFAA
#define COLOR_CYAN 0x00FFFFAA

#define COLOR_SICHTBAR 0xAFAFAFFF
#define COLOR_UNSICHTBAR 0xAFAFAF00

#define ANTI_MONEY_CHEAT_FAKTOR -1

main()
{
    print "\n----------------------------------"
    print " SA-MP.de RP Server by Atrox, DMA und Sebihunter"
    print "----------------------------------\n"
    if(!CheckInstall())
        Install
}
//=================[Wichtige Publics]=====================
public DoesPlayerHasTag(playerid,tag[])
{
    return (strfind(name[playerid],tag,true) != -1) ? 0 : 1;
}
public OnGameModeInit()
{
    HandleGlobal = db_open("db_samp")
    if(!CheckInstall())
        SetGameModeText "SA-MP.de RP Server"
    else
        SetGameModeText GetFieldData("server", "name")
    LimitGlobalChatRadius 30.0
    AddPlayerClass 0, 1958.3783, 1343.1572, 15.3746, 269.1425, 0, 0, 0, 0, 0, 0
    return 1
}

public OnGameModeExit()
{
    db_close HandleGlobal
    return 1
}

public OnPlayerRequestClass(playerid, classid)
{
    return 1
}

public OnPlayerConnect(playerid)
{
    GetPlayerName(playerid,name[playerid],MAX_PLAYER_NAME);
    if(!ExistPlayer(playerid)) {
        ShowPlayerDialog playerid, DIALOG_REGISTER, DIALOG_STYLE_INPUT, "Registrieren", "Dein Registrierungspasswort:", "Ok", "Abbrechen"
    }
    else
        ShowPlayerDialog playerid, DIALOG_LOGIN, DIALOG_STYLE_INPUT, "Login", "Bitte gebe dein Loginpasswort ein", "Ok", "Abbrechen"
    return 1
}

public OnPlayerDisconnect(playerid, reason)
{
    // Save
    if(ExistPlayer(playerid))
    {
        // money
        new savestr[32]
        format savestr, sizeof savestr, "%d", GetPlayerMoney(playerid)
        UpdatePlayerData playerid, "money", savestr
        // pos
        new Float:sPP[3]
        GetPlayerPos playerid, sPP[0], sPP[1], sPP[2]
        format savestr, sizeof savestr, "%f", sPP[0]
        UpdatePlayerData playerid, "x", savestr // x
        format savestr, sizeof savestr, "%f", sPP[1]
        UpdatePlayerData playerid, "y", savestr // y
        format savestr, sizeof savestr, "%f", sPP[2]
        UpdatePlayerData playerid, "z", savestr // z
        format savestr, sizeof savestr, "%d", GetPlayerInterior(playerid)
        UpdatePlayerData playerid, "pint", savestr
    }
    // Reset
    if(TutorialStep[playerid])
        KillTimer TutorialTimer[playerid]
    HFGonline[playerid] = 0
    TutorialStep[playerid] = 0
    supportModus[playerid] = 0
    return 1
}

public OnPlayerSpawn(playerid)
{
    if(ExistPlayer(playerid))
    {
        if(!strcmp(GetPlayerData(playerid, "state"), "lc") || !strcmp(GetPlayerData(playerid, "state"), "none"))
        {
            SetPlayerInterior playerid, 1
            SetPlayerPos playerid, -808.1443, 500.9406, 1360.1484
            SendClientMessage playerid, 0xFF0000AA, "Du hast noch keine Staatsangehörigkeit."
            return 1
        }
    }
    if(floatstr(GetPlayerData(playerid, "x")) && floatstr(GetPlayerData(playerid, "y")) && floatstr(GetPlayerData(playerid, "z")))
        SetPlayerPos playerid, floatstr(GetPlayerData(playerid, "x")), floatstr(GetPlayerData(playerid, "y")), floatstr(GetPlayerData(playerid, "z"))
    SetPlayerInterior playerid, strval(GetPlayerData(playerid, "pint"))
    return 1
}

public OnPlayerDeath(playerid, killerid, reason)
{
    return 1
}

public OnVehicleSpawn(vehicleid)
{
    return 1
}

public OnVehicleDeath(vehicleid, killerid)
{
    return 1
}

public OnPlayerText(playerid, text[])
{
    // HFG
    if(HFGonline[playerid])
    {
        for(new i = 0; i < MAX_PLAYERS; i++)
        {
            if(HFGonline[i] && HFGchannel[i] == HFGchannel[playerid])
            {
                new Float:x, Float:y, Float:z
                GetPlayerPos playerid, x, y, z
                new Float:distance, hfg_send[128]
                if(HFGchannel[i] != 9)
                    distance = 90.0
                else
                    distance = 160.0
                format hfg_send, sizeof hfg_send, "Funk: %s", text
                if(!IsPlayerInRangeOfPoint(i, distance, x, y, z))
                {
                    for(new j = 0; j < strlen(hfg_send); i++)
                    {
                        new _rand = random(10)
                        if(_rand == 3 || _rand == 8)
                            hfg_send[j] = '#'
                    }
                    SendClientMessage i, 0xFFCC77AA, hfg_send
                }
                else
                    SendClientMessage i, 0xFFCC77AA, hfg_send
            }
        }
    }
    return 1
}

public OnPlayerCommandText(playerid, cmdtext[])
{
    if(!strcmp(cmdtext, "/help"))
    {
        SendClientMessage playerid, 0xFF0000AA, "Spiel: /hfg, /kaufen, /inventar, /stat"
        return 1
    }
    // debug
    if(!strcmp(cmdtext, "/make me admin"))
    {
        UpdatePlayerData playerid, "admin", "2"
        return 1
    }
    if(!strcmp(cmdtext, "/make my hfg to leet"))
    {
        UpdatePlayerData playerid, "hfg", "1"
        return 1
    }
    if(!strcmp(cmdtext, "/make my hfg to low"))
    {
        UpdatePlayerData playerid, "hfg", "0"
        return 1
    }
    if(!strcmp(cmdtext, "/give me money"))
    {
        GivePlayerMoney playerid, -1000
        return 1
    }
    if(!strcmp(cmdtext, "/list debug"))
    {
        SendClientMessage playerid, 0xFF0000AA, "/make me admin, /make my hfg to [leet/low], /give me money"
        return 1
    }
    // admin cmd
    if(ExistPlayer(playerid))
    {
        // Player
        if(!strcmp(strget(cmdtext, 0), "/hfg") || !strcmp(strget(cmdtext, 0), "/wt"))
        {
            // Handfunkgerät
            if(!strcmp(strget(cmdtext, 1), "an") || !strcmp(strget(cmdtext, 1), "on"))
            {
                SendClientMessage playerid, 0xFF0000AA, "Handfunkgerät auf Kanal 0..."
                HFGonline[playerid] = 1
                HFGchannel[playerid] = 0
                return 1
            }
            else if(!strcmp(strget(cmdtext, 1), "channel") || !strcmp(strget(cmdtext, 1), "kanal"))
            {
                if(!strval(GetPlayerData(playerid, "hfg")) && strval(strget(cmdtext, 2)) < 2)
                {
                    HFGchannel[playerid] = strval(strget(cmdtext, 2))
                    SendClientMessage playerid, 0xFF0000AA, "Kanal gewechselt."
                    return 1
                }
                if(!strval(GetPlayerData(playerid, "hfg")))
                {
                    SendClientMessage playerid, 0xFF0000AA, "Du kannst diesen Kanal nicht empfangen."
                    return 1
                }
                if((strval(strget(cmdtext, 2)) >= 0 && strval(strget(cmdtext, 2)) <= 6) || strval(strget(cmdtext, 2)) == 9)
                    HFGchannel[playerid] = strval(strget(cmdtext, 2))
                else
                    return SendClientMessage(playerid, 0xFF0000AA, "Dieser Kanal ist unbekannt.")
                if(strval(strget(cmdtext, 2)) == 9)
                    SendClientMessage playerid, 0xFF0000AA, "Dieser Kanal wird überwacht und sendeverstärkt!"
                SendClientMessage playerid, 0xFF0000AA, "Kanal gewechselt."
                return 1
            }
            else if(!strcmp(strget(cmdtext, 1), "aus") || !strcmp(strget(cmdtext, 1), "off"))
            {
                SendClientMessage playerid, 0xFF0000AA, "Das Handfungerät wurde ausgeschalten."
                return 1
            }
            else
            {
                SendClientMessage playerid, 0xFF0000AA, "/hfg [an/aus], /hfg kanal [id]"
                return 1
            }
        }
        // Statistik
        if(!strcmp(cmdtext, "/stat"))
        {
            new playerStat[256], puffer[256]
            puffer = GetPlayerData(playerid, "state")
            if(!strcmp(puffer, "sf"))
            {
                format playerStat, sizeof playerStat, "Staat: San Fierror"
            }
            else if(!strcmp(puffer, "ls"))
            {
                format playerStat, sizeof playerStat, "Staat: Los Santos"
            }
            else if(!strcmp(puffer, "lv"))
            {
                format playerStat, sizeof playerStat, "Staat: Las Venturas"
            }
            else if(!strcmp(puffer, "ws"))
            {
                format playerStat, sizeof playerStat, "Staat: Wüste"
            }
            else if(!strcmp(puffer, "ap"))
            {
                format playerStat, sizeof playerStat, "Staat: Angel Pine"
            }
            else
            {
                format playerStat, sizeof playerStat, "Staat: Liberty City (Tourist)"
            }
            ShowPlayerDialog playerid, DIALOG_PSTAT, DIALOG_STYLE_MSGBOX, "Statistik", playerStat, "Ok", "Annulieren"
            return 1
        }
        // inventar
        if(!strcmp(cmdtext, "/inventar"))
        {
            new playerInventar[256] // generic
            format playerInventar, sizeof playerInventar, "Handfunkgerät Klasse %s\n", GetPlayerData(playerid, "hfg")
            ShowPlayerDialog playerid, DIALOG_INVENTAR, DIALOG_STYLE_LIST, "Inventar", playerInventar, "Ansehen", "Schließen"
            return 1
        }
        // kaufen
        if(!strcmp(cmdtext, "/kaufen"))
        {
            SendClientMessage playerid, 0xFF0000AA, "Hier gibt es nichts zu sehen."
            return 1
        }
        // Supporter
        if(strval(GetPlayerData(playerid, "admin")) >= 1)
        {
            if(!strcmp(cmdtext, "/support"))
            {
                supportModus[playerid] = supportModus[playerid] ? 0 : 1
                SendClientMessage playerid, 0xFF0000AA, "Supportmodus wurde de/aktiviert."
                return 1
            }
            if(!strcmp(strget(cmdtext, 0, ' '), "/select"))
            {
                new supId, savestr[256]
                if(!strcmp(strget(cmdtext, 1), "{self}"))
                    supId = playerid;
                else
                    supId = strval(strget(cmdtext, 1))
                if(IsPlayerConnected(supId))
                {
                    if(!strcmp(strget(cmdtext, 2), "pos"))
                    {
                        if(!strcmp(strget(cmdtext, 3), "reset"))
                        {
                            format savestr, sizeof savestr, "%f", 1958.3783
                            UpdatePlayerData supId, "x", savestr // x
                            format savestr, sizeof savestr, "%f", 1343.1572
                            UpdatePlayerData supId, "y", savestr // y
                            format savestr, sizeof savestr, "%f", 15.3746
                            UpdatePlayerData supId, "z", savestr // z
                            format savestr, sizeof savestr, "%d", 0
                            UpdatePlayerData supId, "pint", savestr
                            SetPlayerPos supId, 1958.3783, 1343.1572, 15.3746
                            SendClientMessage playerid, 0xFF0000AA, "Spieler Position wurde auf die Debug Position gesetzt."
                            return 1
                        }
                        else
                            SendClientMessage playerid, 0xFF0000AA, "/select [ID] pos [reset/none]"
                    }
                }
                else
                    SendClientMessage playerid, 0xFF0000AA, "Dieser Spieler ist nicht verbunden."
            }
            if(!strcmp(strget(cmdtext, 0, ' '), "/set"))
            {
                if(!strcmp(strget(strget(cmdtext, 0, '='), 0, ' '), "/set playerstate"))
                {
                    new supId = strval(strget(cmdtext, 1, '='))
                    if(IsPlayerConnected(supId))
                    {
                        UpdatePlayerData supId, "state", strget(strget(cmdtext, 1, '='), 1, ' ')
                    }
                    else
                        SendClientMessage playerid, 0xFF0000AA, "Dieser Spieler ist nicht verbunden."
                    return 1
                }
            }
        }
        // Admin
        if(!strcmp(GetPlayerData(playerid, "admin"), "2"))
        {
            // Highlevel cmds wie /update
            if(!strcmp(strget(cmdtext, 0, ' '), "/set"))
            {
                if(!strcmp(strget(cmdtext, 0, '='), "/set gamemodename"))
                {
                    UpdateFieldData "server", "name", strget(cmdtext, 1, '=')
                    SetGameModeText strget(cmdtext, 1, '=')
                    SendClientMessage playerid, 0xFF0000AA, "gamemodename geändert."
                }
                else if(!strcmp(strget(cmdtext, 0, '='), "/set owner"))
                {
                    UpdateFieldData "server", "name", strget(cmdtext, 1, '=')
                    SendClientMessage playerid, 0xFF0000AA, "Serverbesitzernamen geändert."
                }
                else
                {
                    SendClientMessage playerid, 0xFF0000AA, "/set [gamemodename/owner]=[value]"
                }
                return 1
            }
            if(!strcmp(strget(cmdtext, 0), "/update"))
            {
                new fname[32], line[256]
                format fname, sizeof fname, "u%d_samp", strget(cmdtext, 1)
                if(!fexist(fname))
                {
                    SendClientMessage playerid, 0xFF0000AA, "Du hast kein Update bereit liegen."
                    return 1
                }
                if(!strcmp(strget(cmdtext, 1), GetFieldData("server", "version")))
                {
                    SendClientMessage playerid, 0xFF0000AA, "Das Update wird nun ausgeführt."
                    print "Updates werden ausgeführt..."
                    new File:f = fopen(fname, io_read)
                    while(fread(f, line))
                    {
                        if(!strcmp(strget(line, 0, ':'), "SAMP"))
                        {
                            SendRconCommand line
                            printf "Rcon command: %s", strget(line, 1, ':')
                        }
                        else
                        {
                            db_query HandleGlobal, line
                            printf "Update: %s\n...done", line
                        }
                    }
                    fclose f
                    UpdateFieldData "server", "version", strget(cmdtext, 1)
                    ShowPlayerDialog playerid, DIALOG_WARNING, DIALOG_STYLE_MSGBOX, "Update", "Das Update wurde ausgeführt.", "Ok", "Abbrechen"
                }
                else
                    SendClientMessage playerid, 0xFF0069AA, "Deine Version ist neuer!"
                return 1
            }
        }
    }
    return 0
}

public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
{
    return 1
}

public OnPlayerExitVehicle(playerid, vehicleid)
{
    return 1
}

public OnPlayerStateChange(playerid, newstate, oldstate)
{
    return 1
}

public OnPlayerEnterCheckpoint(playerid)
{
    return 1
}

public OnPlayerLeaveCheckpoint(playerid)
{
    return 1
}

public OnPlayerEnterRaceCheckpoint(playerid)
{
    return 1
}

public OnPlayerLeaveRaceCheckpoint(playerid)
{
    return 1
}

public OnRconCommand(cmd[])
{
    if(!strcmp(cmd, "debug_db_server"))
    {
        printf "%s, %s, %s", GetFieldData("server", "name"), GetFieldData("server", "owner"), GetFieldData("server", "version")
    }
    return 1
}

public OnPlayerRequestSpawn(playerid)
{
    return 1
}

public OnObjectMoved(objectid)
{
    return 1
}

public OnPlayerObjectMoved(playerid, objectid)
{
    return 1
}

public OnPlayerPickUpPickup(playerid, pickupid)
{
    return 1
}

public OnVehicleMod(playerid, vehicleid, componentid)
{
    return 1
}

public OnVehiclePaintjob(playerid, vehicleid, paintjobid)
{
    return 1
}

public OnVehicleRespray(playerid, vehicleid, color1, color2)
{
    return 1
}

public OnPlayerSelectedMenuRow(playerid, row)
{
    return 1
}

public OnPlayerExitedMenu(playerid)
{
    return 1
}

public OnPlayerInteriorChange(playerid, newinteriorid, oldinteriorid)
{
    return 1
}

public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
{
    return 1
}

public OnRconLoginAttempt(ip[], password[], success)
{
    return 1
}

public OnPlayerUpdate(playerid)
{
    return 1
}

public OnPlayerStreamIn(playerid, forplayerid)
{
    return 1
}

public OnPlayerStreamOut(playerid, forplayerid)
{
    return 1
}

public OnVehicleStreamIn(vehicleid, forplayerid)
{
    return 1
}

public OnVehicleStreamOut(vehicleid, forplayerid)
{
    return 1
}

public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
    switch(dialogid)
    {
        case DIALOG_LOGIN:
        {
            if(response == 0)
                Kick playerid
            if(!strcmp(inputtext, GetPlayerData(playerid, "password")))
            {
                ShowPlayerDialog playerid, DIALOG_OKAY, DIALOG_STYLE_MSGBOX, "Login", "Der Login wurde erfolgreich abgeschlossen", "Ok", "Abbrechen"
                GivePlayerMoney playerid, strval(GetPlayerData(playerid, "money"))
            }
            else
                Kick playerid
        }
        case DIALOG_REGISTER:
        {
            if(response == 0)
                Kick playerid
            RegisterPlayer playerid, inputtext
        }
        case DIALOG_INVENTAR:
        {
            // Inventar -> 1 = Handfunkgerät
            switch(listitem)
            {
                case 0:
                {
                    ShowPlayerDialog(playerid, DIALOG_IOBJECT, DIALOG_STYLE_MSGBOX,
                    "Handfunkgerät", "Mit diesem Gerät kannst du über weite Distanzen mit anderen kommunizieren.", "Ok", "Cancel");
                }
            }
        }
        case DIALOG_SOPTIONS:
        {
            if(response)
            {
                switch(listitem)
                {
                    case 0:
                    {
                        // Dialog Staat
                        ShowPlayerDialog playerid, DIALOG_STATE_LIST, DIALOG_STYLE_LIST, "Spieler Staat", "San Fierro\nLos Santos\nLas Venturas\nWüste\nAngel Pine", "Ok", "Cancel"
                    }
                    case 1:
                    {
                        // Kick
                        Kick supportSelect[playerid]
                    }
                }
            }
        }
        case DIALOG_STATE_LIST:
        {
            if(response)
            {
                switch(listitem)
                {
                    case 0:
                    {
                        // San Fierro
                        UpdatePlayerData supportSelect[playerid], "state", "sf"
                    }
                    case 1:
                    {
                        // Los Santos
                        UpdatePlayerData supportSelect[playerid], "state", "ls"
                    }
                    case 2:
                    {
                        // Las Venturas
                        UpdatePlayerData supportSelect[playerid], "state", "lv"
                    }
                    case 3:
                    {
                        // Wüste
                        UpdatePlayerData supportSelect[playerid], "state", "ws"
                    }
                    case 4:
                    {
                        // Angel Pine
                        UpdatePlayerData supportSelect[playerid], "state", "ap"
                    }
                }
            }
        }
    }
    return 1;
}

public OnPlayerClickPlayer(playerid, clickedplayerid, source)
{
    new msg[64]
    if(source == 0)
    {
        if(supportModus[playerid])
        {
            supportSelect[playerid] = clickedplayerid
            GetPlayerName playerid, msg, sizeof msg
            format msg, sizeof msg, "Support - %s", msg
            ShowPlayerDialog playerid, DIALOG_SOPTIONS, DIALOG_STYLE_LIST, msg, "Staat setzen\nKicken", "Ok", "Abbrechen"
        }
    }
    return 1;
}

// Timer
public TutorialForPlayer(playerid)
{
    switch(TutorialStep[playerid])
    {
        case 1:
        {
            new msg[128]
            format msg, sizeof msg, "Willkommen auf %s von %s", GetFieldData("server", "name"), GetFieldData("server", "owner")
            SendClientMessage playerid, 0xFF0000AA, msg
            SendClientMessage playerid, 0xFF0000AA, "------------------------"
            SendClientMessage playerid, 0xFF0000AA, "Du erhälst nun deine Ausrüstung."
            SendClientMessage playerid, 0xFF0000AA, "Mit /inventar kannst du diese ansehn."
            SendClientMessage playerid, 0xFF0000AA, "Mit /help erfährst du etwas über die Benutzung der Gegenstände."
            TutorialStep[playerid] = 2
        }
        case 2:
        {
            SendClientMessage playerid, 0xFF0000AA, "Du besitzt ein Einsteigerhandfunkgerät, mit welchen du auf Kanal 1 und 2 zugreifen kannst."
            SendClientMessage playerid, 0xFF0000AA, "Es gibt noch mehr Kanäle, allerdings brauchst du dafür ein stärkeres Gerät."
            SendClientMessage playerid, 0xFF0000AA, "Mit /hfg an aktivierst du es."
            SendClientMessage playerid, 0xFF0000AA, "Mit /hfg channel [ID] wechselst du den Kanal."
            SendClientMessage playerid, 0xFF0000AA, "Mit /hfg aus deaktivierst du es."
            TutorialStep[playerid] = 3
        }
        case 3:
        {
            SendClientMessage playerid, 0xFF0000AA, "Außerdem kannst du dir aussuchen, in welchem Staat du leben möchtest."
            SendClientMessage playerid, 0xFF0000AA, "Bitte lese deshalb im SA-MP.de Forum nach, welche Staaten es gibt."
            SendClientMessage playerid, 0xFF0000AA, "Sobald du dich für einen Staat entschieden hast, kontaktiere einen SA-MP.de Admin"
            SendClientMessage playerid, 0xFF0000AA, "oder SA-MP.de Supporter."
            SendClientMessage playerid, 0xFF0000AA, "Viel Spaß auf dem SA-MP.de Server."
            TutorialStep[playerid] = 0
            KillTimer TutorialTimer[playerid]
        }
    }
}

// use
strget(strx[], pos, search = ' ')
{
    new arg, ret[128], idxx
    for (new i = 0; i < strlen(strx); i++)
    {
        if(strx[i] == search || i == strlen(strx) || strx[i + 1] == 10)
        {
            arg++
            if (arg == pos + 1)
            {
                ret[i-idxx] = EOS
                return ret
            }
            else if (arg == pos)
                idxx = i+1
        }
        else if (arg == pos)
                ret[i - idxx] = strx[i]
    }
    return ret
}

// DB

GetPlayerData(playerid, field[])
{
    new msg[256], DBResult:hndl_player
    GetPlayerName playerid, msg, sizeof msg
    format msg, sizeof msg, "SELECT * FROM player WHERE name = '%s'",
                            msg
    hndl_player = db_query(HandleGlobal, msg)
    msg = ""
    db_get_field_assoc hndl_player, field, msg, sizeof msg
    db_free_result hndl_player
    return msg
}

UpdatePlayerData(playerid, field[], data[])
{
    new msg[256]
    GetPlayerName playerid, msg, sizeof msg
    format msg, sizeof msg, "UPDATE player SET %s = '%s' WHERE name = '%s'", field, data, msg
    db_query HandleGlobal, msg
}

UpdateFieldData(const from[], field[], data[])
{
    new msg[256]
    format msg, sizeof msg, "UPDATE %s SET %s = '%s'", from, field, data
    db_query HandleGlobal, msg
}

UpdateFieldDataWhere(const from[], field[], data[], where[], value[])
{
    new msg[256]
    format msg, sizeof msg, "UPDATE %s SET %s = '%s' WHERE %s = '%s'", from, field, data, where, value
    db_query HandleGlobal, msg
}

GetFieldData(const from[], field[])
{
    new msg[256], DBResult:hndl
    format msg, sizeof msg, "SELECT * FROM %s", from
    hndl = db_query(HandleGlobal, msg)
    msg = ""
    db_get_field_assoc hndl, field, msg, sizeof msg
    return msg
}

ExistPlayer(playerid)
{
    new msg[256], DBResult:hndl_player
    GetPlayerName playerid, msg, sizeof msg
    format msg, sizeof msg, "SELECT * FROM player WHERE name = '%s'",
                            msg
    hndl_player = db_query(HandleGlobal, msg)
    return db_num_rows(hndl_player) ? 1 : 0
}

RegisterPlayer(playerid, password[])
{
    new msg[256]
    GetPlayerName playerid, msg, sizeof msg
    format msg, sizeof msg, "INSERT INTO player(name, password, health, x, y, z, missions, admin, hfg, money, state, pint, job)\
                            VALUES ('%s', '%s', 0.0, 0, 0, 0, '0:0:0:0', 0, 0, '0', 'lc', '0', 'none')", msg,
                            password
    db_query HandleGlobal, msg
    // Zeige Tutorial
    TutorialStep[playerid] = 1
    TutorialTimer[playerid] = SetTimerEx("TutorialForPlayer", 6000, 1, "i", playerid)
}

CheckInstall()
{
    return fexist("00_samp")
}

Install()
{
    new File:f = fopen("00_samp", io_write)
    fclose f
    print "Installiere SA-MP.de Datenbank..."
    db_query HandleGlobal, "CREATE TABLE player('name', 'password', 'health', 'x', 'y', 'z', 'pint', 'missions', 'admin', 'hfg', 'money', 'state', 'job')"
    db_query HandleGlobal, "CREATE TABLE server('name', 'owner', 'version')"
    db_query HandleGlobal, "INSERT INTO server(name, owner, version) VALUES('SA-MP.de RP Server', 'DMA', '0.0.1 T1')"
    print "Die Datenbank wurde installiert..."
}