SA-MP Forums Archive
[FilterScript] [Weapon System]Team_PRO - Printable Version

+- SA-MP Forums Archive (https://sampforum.blast.hk)
+-- Forum: SA-MP Scripting and Plugins (https://sampforum.blast.hk/forumdisplay.php?fid=8)
+--- Forum: Filterscripts (https://sampforum.blast.hk/forumdisplay.php?fid=17)
+--- Thread: [FilterScript] [Weapon System]Team_PRO (/showthread.php?tid=373389)



[Weapon System]Team_PRO - Team_PRO - 30.08.2012

Hello This is Weapon System


Credits
*Team_PRO Scriptor/Bug Fixer/Tester


Usage /weapon
Impotant Note

This FS is Really Maded By Me No Steal Or Stole


Download Link

pawn Код:
//Maded By Team_PRO
//100% Work Of Me :)
//Hope You Like My Weapon System

//Includes//
#include <a_samp>
#include <zcmd>

//Defines//
#define COLOR_GREEN 0x008000FF




CMD:weapon(playerid, params[])
{
ShowPlayerDialog(playerid, 3, DIALOG_STYLE_LIST, "Choose a Weapon", "Brass knuckles($50\nKnife($200\n9mm($1000)\nDesert eagle($1000)\nCombat shotgun($1000)\nMp5($1000)\nM4($1000)\nSniper rifle($1000)\nRpg($10000)\nFlame-thrower($10000)\n","Buy","Close");
}

public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
    if(dialogid == 4)
    {
        if(response)
        {
            if(listitem == 0)
            {
                if(GetPlayerMoney(playerid) < 3000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
                GivePlayerWeapon(playerid, 1, 10 );
                GivePlayerMoney(playerid, -1000);
                SendClientMessage(playerid, COLOR_GREEN, "You have purchased A Brass knuckles!");
            }
            if(listitem == 1)
            {
                if(GetPlayerMoney(playerid) < 5000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
                GivePlayerWeapon(playerid, 4, 200);
                GivePlayerMoney(playerid, -1000);
                SendClientMessage(playerid, COLOR_GREEN, "You have purchased A Knife!");
            }
            if(listitem == 2)
            {
                if(GetPlayerMoney(playerid) < 2000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
                GivePlayerWeapon(playerid, 22, 200);
                GivePlayerMoney(playerid, -1000);
                SendClientMessage(playerid, COLOR_GREEN, "You have purchased A 9mm Pistol!");
            }
            if(listitem == 3)
            {
                if(GetPlayerMoney(playerid) < 4500) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
                GivePlayerWeapon(playerid, 24, 200);
                GivePlayerMoney(playerid, -1000);
                SendClientMessage(playerid, COLOR_GREEN, "You have purchased A Desert Eagle!");
            }
            if(listitem == 4)
            {
                if(GetPlayerMoney(playerid) < 3000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
                GivePlayerWeapon(playerid, 27, 200);
                GivePlayerMoney(playerid, -1000);
                SendClientMessage(playerid, COLOR_GREEN, "You have purchased a Combat Shotgun!");
            }
            if(listitem == 5)
            {
                if(GetPlayerMoney(playerid) < 2000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
                GivePlayerWeapon(playerid, 29, 200);
                GivePlayerMoney(playerid, -1000);
                SendClientMessage(playerid, COLOR_GREEN, "You have purchased A MP5!");
            }
            if(listitem == 6)
            {
                if(GetPlayerMoney(playerid) < 3800) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
                GivePlayerWeapon(playerid, 31, 200);
                GivePlayerMoney(playerid, -1000);
                SendClientMessage(playerid, COLOR_GREEN, "You have purchased A M4A1!");
            }
            if(listitem == 7)
            {
                if(GetPlayerMoney(playerid) < 2000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
                GivePlayerWeapon(playerid, 34, 200);
                GivePlayerMoney(playerid, -1000);
                SendClientMessage(playerid, COLOR_GREEN, "You have purchased a Sniper!");
            }
            if(listitem == 8)
            {
                if(GetPlayerMoney(playerid) < 3000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
                GivePlayerWeapon(playerid, 35, 200);
                GivePlayerMoney(playerid, -10000);
                SendClientMessage(playerid, COLOR_GREEN, "You have purchased RPG!");
            }
            if(listitem == 9)
            {
                if(GetPlayerMoney(playerid) < 2500) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
                GivePlayerWeapon(playerid, 37,200);
                GivePlayerMoney(playerid, -10000);
                SendClientMessage(playerid, COLOR_GREEN, "You have purchased A Flame-Thrower!");
            }
        }
        return 1;
    }
    return 0;
}
Mediafire[Link is destoryed]


[NEW]Mediafire
Hope You Will Enjoy My FS



Re: [Weapon System]Team_PRO - Lordzy - 30.08.2012

Simple and not bad.
Any way better than my first fs[Easy Weapon].
And please note that you're having a mistake in id.
For flame thrower it isnt 73,its 37


Re: [Weapon System]Team_PRO - Dan. - 30.08.2012

Brass Knuckles cost 50, then you check if he has 3000, and then take 1000 away from him. Seems legit.

Good work though, just fix the bugs.


Re: [Weapon System]Team_PRO - Team_PRO - 30.08.2012

Thx For Your Comments


Re: [Weapon System]Team_PRO - Team_PRO - 30.08.2012

Quote:
Originally Posted by [xB]Lordz
Посмотреть сообщение
please note that you're having a mistake in id.
For flame thrower it isnt 73,its 37
Thx For Letting me know


Re: [Weapon System]Team_PRO - XtremeR - 30.08.2012

Great FS +Rep


Re: [Weapon System]Team_PRO - Team_PRO - 30.08.2012

Quote:
Originally Posted by XtremeR
Посмотреть сообщение
Great FS +Rep
Thx For You Comment


Re: [Weapon System]Team_PRO - [MK]Man_Deep - 30.08.2012

nice


Re: [Weapon System]Team_PRO - Cena44 - 30.08.2012

simple, good job


Re: [Weapon System]Team_PRO - Team_PRO - 31.08.2012

Quote:
Originally Posted by Cena44
Посмотреть сообщение
simple, good job
Thank You