[INC]Inventory v0.1 - Bebras

                /*
                        Inventoriaus kūrimo include
                        Autorius "Bebras" 2013

                */


/*
    native AddItem(itemname[]);                             Ši funkcija pridėta daiktą, nepanaudoję jos negalėsite naudotis tuo daiktu..
    native GivePlayerItem(playerid,item[],amount);          Ši funkcija duoda žaidėjui tam tikrą daiktų skaičių(galima naudoti ir daiktų atėmimui).
    native ShowPlayerInventory(playerid);                   Ši funkcija parodys žaidėjui GUI su visais jo daiktais ir jų kiekiu(taipat paspaudus įvyks nurodytas veiksmas).
    native ResetPlayerItem(playerid,itemname[]);            Ši funkcija atiims iš žaidėjo visus nurodytus daiktus.
    native ResetPlayerItems(playerid);                      Ši funkcija attims visus žaidėjo daiktus.
    native GetPlayerItemAmount(playerid,itemname[]);        Ši funkcija gražins nurodyto daikto skaičių.

*/

#define Bebras AUTORIUS

#define MAX_ITEMS               15
#define MAX_ITEM_NAME           30
#define DIALOG_INVENTORY        457


#define Item:%0(%1) forward %0(%1); public %0(%1)

new UsableItems[MAX_ITEMS][MAX_ITEM_NAME];


stock AddItem(itemname[])
{
    for(new i; i < MAX_ITEMS; i++)
    {
        if(!isnull(UsableItems[i]) && !strcmp(UsableItems[i],itemname)) return 0;
        if(isnull(UsableItems[i]))
        {
            strins(UsableItems[i],itemname,0,MAX_ITEM_NAME);
            return 1;
        }
    }
    return 0;
}

stock GivePlayerItem(playerid,item[],amount)
{
    if(GetPVarInt(playerid,item) !=  0) SetPVarInt(playerid,item,GetPVarInt(playerid,item)+amount);
    else SetPVarInt(playerid,item,amount);
    return GetPVarInt(playerid,item);
}
stock GetPlayerItemAmount(playerid,itemname[])
    return GetPVarInt(playerid,itemname[]);

stock ShowPlayerInventory(playerid)
{
    new bigstring[MAX_ITEMS*MAX_ITEM_NAME],str[MAX_ITEM_NAME+5];
    for(new i; i < MAX_ITEMS; i++)
    {
        if(GetPVarInt(playerid,UsableItems[i]) > 0)
        {
            format(str,sizeof(str),"%s  %d\n",UsableItems[i],GetPVarInt(playerid,UsableItems[i]));
            strcat(bigstring,str);
        }
    }
    ShowPlayerDialog(playerid,DIALOG_INVENTORY,DIALOG_STYLE_LIST,"Inventorius",bigstring,"Pasirinkti","Išeiti");
    return 1;
}
stock ResetPlayerItem(playerid,itemname[])
    return DeletePVar(playerid,itemname);
stock ResetPlayerItems(playerid)
{
    for(new i; i < MAX_ITEMS; i++)
    {
        if(isnull(UsableItems[i])) break;
        DeletePVar(playerid,UsableItems[i]);
    }
    return 1;
}
public OnDialogResponse(playerid,dialogid,response,listitem,inputtext[])
{
    if(dialogid == DIALOG_INVENTORY && response)
    {
        if(isnull(inputtext)) return 1;
        new func[MAX_ITEM_NAME];
        strmid(func,inputtext,0,strfind(inputtext,"  "));
        if(funcidx(func) == -1) return printf("Daikto \"%s\" funkcija nesukurta",func);
        CallLocalFunction(func,"i",playerid);
        return 1;
    }
    #if defined Bebras_OnDialogResponse
        return Bebras_OnDialogResponse(playerid,dialogid,response,listitem,inputtext);
    #endif
}
#if defined _ALS_OnDialogResponse
    #undef OnDialogResponse
#else
    #define _ALS_OnDialogResponse
#endif
#define OnDialogResponse Bebras_OnDialogResponse
#if defined Bebras_OnDialogResponse
    forward Bebras_OnDialogResponse(playerid,dialogid,response,listitem,inputtext[]);
#endif
#if !defined Bebras
    #error Include autorius - Bebras. Nuo tiesos nepabegsi, turek pagarbos.
#endif