Jesco

/*

The weapondealer filterscript is made by Jesco, for release on
SA-MP forums. Do not release this anywhere, without contacting me/Jesco
over MSN at [email protected]

                                  © Schurman PAWN Scripting
©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©
 .d8888b.           888
d88P  Y88b          888
Y88b.               888
"Y888b.    .d8888b 88888b.  888  888 888d888 88888b.d88b.   8888b.  88888b.
"Y88b. d88P"    888 "88b 888  888 888P"   888 "888 "88b     "88b 888 "88b
"888 888      888  888 888  888 888     888  888  888 .d888888 888  888
Y88b  d88P Y88b.    888  888 Y88b 888 888     888  888  888 888  888 888  888
"Y8888P"   "Y8888P 888  888  "Y88888 888     888  888  888 "Y888888 888  888
©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©©

*/

#define WHITE 0xFFFFFFFF

#define FILTERSCRIPT

#include <a_samp>
#include <zcmd>

#if defined FILTERSCRIPT

public OnFilterScriptInit()
{
    print("\n=_-_==_-_==_-_==_-_==_-_==_-_==_-_==_-_==_-_==_-_=");
    print(" Weapon Dealer Filterscript by Jesco loaded. ");
    print("=_-_==_-_==_-_==_-_==_-_==_-_==_-_==_-_==_-_==_-_=\n");
    return 1;
}


public OnFilterScriptExit()
{
    return 1;
}


#else

main()
{
}
#endif

command(gunshop, playerid, params[])
{
    if(IsPlayerInRangeOfPoint(playerid, 3.5, 2066.8347,-1555.0211,13.4342)) {
        ShowPlayerDialog(playerid,04041,DIALOG_STYLE_LIST,"{FF0000}Gun Dealer","Desert Eagle ($5000)\nColt 45. ($2000)\nMP5-K MG ($5000)\nM4 ($10000)\nAK-47 ($9000)\nSpas12 Shotgun ($10000)\nTec-9 ($4000)","Accept","Cancel");
    }
    else {
        SendClientMessage(playerid,WHITE,"{FF0000}You're not at the gun dealer! {FFFFFF}It has been marked on your map.");
        SetPlayerCheckpoint(playerid, 2066.8347,-1555.0211,13.4342, 4.0);
    }
    return 1;
}


public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
    if(dialogid==04041) {
        if(response) {
            if(listitem==0) {                     // Deagle
                if(GetPlayerMoney(playerid) < 5000) return SendClientMessage(playerid, 0xFFFFFF, "You don't have enough Cash!");
                GivePlayerWeapon(playerid,24,50000);
                GivePlayerMoney(playerid,-5000);
                SendClientMessage(playerid,WHITE,"Desert Eagle purchased for $5000.");
            }
            if(listitem==1) {                     // COLT 45
                if(GetPlayerMoney(playerid) < 2000) return SendClientMessage(playerid, 0xFFFFFF, "You don't have enough Cash!");
                GivePlayerWeapon(playerid,22,50000);
                GivePlayerMoney(playerid,-2000);
                SendClientMessage(playerid,WHITE,"Colt 45 purchased for $2000.");
            }
            if(listitem==2) {                     // MP5K
                if(GetPlayerMoney(playerid) < 5000) return SendClientMessage(playerid, 0xFFFFFF, "You don't have enough Cash!");
                GivePlayerWeapon(playerid,29,50000);
                GivePlayerMoney(playerid,-5000);
                SendClientMessage(playerid,WHITE,"MP5-K purchased for $5000.");
            }
            if(listitem==3) {                     // M4
                if(GetPlayerMoney(playerid) < 10000) return SendClientMessage(playerid, 0xFFFFFF, "You don't have enough Cash!");
                GivePlayerWeapon(playerid,31,50000);
                GivePlayerMoney(playerid,-10000);
                SendClientMessage(playerid,WHITE,"M4-Carbine purchased for $10000.");
            }
            if(listitem==4) {                     // AK47
                if(GetPlayerMoney(playerid) < 9000) return SendClientMessage(playerid, 0xFFFFFF, "You don't have enough Cash!");
                GivePlayerWeapon(playerid,30,50000);
                GivePlayerMoney(playerid,-9000);
                SendClientMessage(playerid,WHITE,"AK-47 purchased for $9000.");
            }
            if(listitem==5) {                     // SPAS12
                if(GetPlayerMoney(playerid) < 10000) return SendClientMessage(playerid, 0xFFFFFF, "You don't have enough Cash!");
                GivePlayerWeapon(playerid,27,50000);
                GivePlayerMoney(playerid,-10000);
                SendClientMessage(playerid,WHITE,"Spas 12 Shotgun purchased for $10000.");
            }
            if(listitem==6) {                     // TEC N9NE
                if(GetPlayerMoney(playerid) < 4000) return SendClientMessage(playerid, 0xFFFFFF, "You don't have enough Cash!");
                GivePlayerWeapon(playerid,32,50000);
                GivePlayerMoney(playerid,-4000);
                SendClientMessage(playerid,WHITE,"Tec Nine purchased for $4000.");
            }

        }
    }
    return 0;
}


public OnPlayerEnterCheckpoint(playerid)
{
    SendClientMessage(playerid,WHITE,"You are at the gun dealer. Type /buygun again to shop.");
    DisablePlayerCheckpoint(playerid);
    return 1;
}