WBB_Stats Filerscript (BSP)

#include <a_samp>
#include <dini>
#include <KC_WBB>

#define COLOR_RED 0xFF0000FF


#define DIALOG_REGISTER_1 1
#define DIALOG_REGISTER_2 2
#define DIALOG_LOGIN_1 3

#define ID_GELD_STATS 49

/*
Titel: WBB_Stats by KingClem™
Rel. Date: 02.02.2013
Version: Open-BETA
Beschreibung:
Dieses Script,dient dazu Profilfelder im WBB vom Script aus
zu ändern.Zusätzlich liefert es auch noch die Funktionen:
*User Erstellen (Create_User)
*User Ban (Ban_User)
*User Entbannen (Unbann_User)
*Benutzerfeld ändern (Edit_Feld)

Ich empfehle aktuell noch die Nutzung von WBB_Connect 2.0 (von |-|auke)
Es hat einfach ein größeres einsatzgebiet und weit mehr Funktionen.
Es fehlt einfach nur die Funktion Editfeld.Vieleicht wird er das ja
hinzufügen ,wenn er es hier sieht,dann werde ich diese Version für
den öffentlichen gebrauch nicht weiter ausbauen.
Beigelegt ist ein Beispiel Script,wo die Benutzung erläutert wird.
Das PHP Script basiert so weit wie möglich auf der WCF API.Allerdings
lieferte diese nicht die Funktion um Benutzerfelder zu ändern,also
mache ich dieses über einen eigenen SQL Befehl.


Instalation:
*Die Datei: KC_Script.php öffnen und den SEC_KEY ändern.Zeile 9 & Abspeichern
*Die Datei: KC_Script.php auf ihren Webspace hochladen
****ACHTUNG: Dateiname nicht ändern! | Datei muss ins WBB Verzeichniss!
*Im WBB ein neues Benutzerfeld erstellen.
*Die ID merken und hier angeben.
*Am besten das Filterscript anschauen,dort ist es einmal vorgemacht.
*Die Datei: KC_WBB includieren (PAWN)

*/

public OnFilterScriptInit()
{
    print("\n--------------------------------------");
    print(" Beispiel Nutzung | WBB_Stats");
    print("--------------------------------------\n\n\nKingClem :D");
    Activate_Script("localhost/WBB","12165hg8dth46ghdf6g5");
    return 1;
}

public OnFilterScriptExit()
{
    return 1;
}




public OnPlayerRequestClass(playerid, classid)
{
    return 1;
}
stock GetName(playerid)
{
    new name[MAX_PLAYER_NAME];
    GetPlayerName(playerid,name,sizeof(name));
    return name;
}
public OnPlayerConnect(playerid)
{
    new Acc_String[128];
    format(Acc_String,sizeof(Acc_String),"Accounts/%s.KC",GetName(playerid));
    if(fexist(Acc_String))
    {
    ShowPlayerDialog(playerid,DIALOG_LOGIN_1,1,"Login","Bitte geben sie ihr Passwort ein.","Weiter","Abbrechen");
    }else{
    ShowPlayerDialog(playerid,DIALOG_REGISTER_1,DIALOG_STYLE_INPUT,"Registrierung","Neuen Account anlegen\nBitte geben sie ihr Passwort ein.","Weiter","Abbrechen");
    }
    return 1;
}

public OnPlayerDisconnect(playerid, reason)
{
    new Bug_Fix[40];
    format(Bug_Fix,sizeof(Bug_Fix),"%i",GetPlayerMoney(playerid));
    Edit_Feld(GetName(playerid),ID_GELD_STATS,Bug_Fix);
    new Acc_String[128];
    format(Acc_String,sizeof(Acc_String),"Accounts/%s.KC",GetName(playerid));
    dini_IntSet(Acc_String,"Geld",GetPlayerMoney(playerid));
    return 1;
}

public OnPlayerSpawn(playerid)
{
    return 1;
}

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

public OnVehicleSpawn(vehicleid)
{
    return 1;
}

public OnVehicleDeath(vehicleid, killerid)
{
    return 1;
}

public OnPlayerText(playerid, text[])
{
    return 1;
}

public OnPlayerCommandText(playerid, cmdtext[])
{
    if(strcmp(cmdtext,"/geldher",true)==0)
    {
    GivePlayerMoney(playerid,50000);
    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[])
{
    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[])
{
    new AccF[128];
    format(AccF,sizeof(AccF),"Accounts/%s.KC",GetName(playerid));
    if(response==1)
    {
        switch(dialogid)
        {
            case DIALOG_REGISTER_1:
            {
            if(strlen(inputtext)>3)
            {
                dini_Create(AccF);
                dini_Set(AccF,"Passwort",inputtext);
                ShowPlayerDialog(playerid,DIALOG_REGISTER_2,1,"E-Mail","Bitte geben sie ihre E-Mail addresse ein.\nDiese wird für das WBB Benötigt","Weiter","Abbrechen");
            }else{
                ShowPlayerDialog(playerid,DIALOG_REGISTER_1,1,"Passwort","Das Passwort muss mindestens 4Stellen haben!","Weiter","Abbrechen");
            }
            }
            case DIALOG_REGISTER_2:
            {
            if((strlen(inputtext) <=5 )|| ((strfind(inputtext, "@", true,4) != -1))){
            Create_User(GetName(playerid),dini_Get(AccF,"Passwort"),inputtext);
            SendClientMessage(playerid,COLOR_RED,"Account erfolgreich erstellt.WBB Login ist der selbe!");
            }else{
            ShowPlayerDialog(playerid,DIALOG_REGISTER_2,1,"E-Mail","Bitte geben sie ihre E-Mail addresse ein.\nDiese wird für das WBB Benötigt","Weiter","Abbrechen");
            }
            }
            case DIALOG_LOGIN_1:
            {
            if(strcmp(inputtext,dini_Get(AccF,"Passwort"))==0)
            {
            SendClientMessage(playerid,COLOR_RED,"Login erfolgreich!");
            GivePlayerMoney(playerid,dini_Int(AccF,"Geld"));
            }

            }
        }


    }else{
        switch(dialogid)
        {
            case DIALOG_REGISTER_1:
            {
                ShowPlayerDialog(playerid,DIALOG_REGISTER_1,1,"Passwort","Das Passwort muss mindestens 4Stellen haben!","Weiter","Abbrechen");
            }
            case DIALOG_REGISTER_2:
            {
                ShowPlayerDialog(playerid,DIALOG_REGISTER_2,1,"E-Mail","Bitte geben sie ihre E-Mail addresse ein.\nDiese wird für das WBB Benötigt","Weiter","Abbrechen");
            }
            case DIALOG_LOGIN_1:
            {
                ShowPlayerDialog(playerid,DIALOG_LOGIN_1,1,"Login","Bitte geben sie ihr Passwort ein.","Weiter","Abbrechen");
            }
        }

    }
    return 1;
}

public OnPlayerClickPlayer(playerid, clickedplayerid, source)
{
    return 1;
}