[Ajuda] mSelection bugando
#10

Baixe a Incluide "mSelection.inc"

PHP код:
#include <a_samp>
#include <zcmd>
#include <mSelection>
new gun mS_INVALID_LISTID;
public 
OnFilterScriptInit()
{
    
gun LoadModelSelectionMenu("WeaponsMenu.txt");
    print(
"Weapon Menu loaded!");
    return 
1;
}
CMD:menuweapons(playeridparams[])
{
    
ShowModelSelectionMenu(playeridgun"Weapons menu");
    return 
1;
}
public 
OnPlayerModelSelection(playeridresponselistidmodelid)
{
    if(
listid == gun)
    {
        if(
response)
        {
            switch(
modelid)
            {
                case 
346:
                {
                    if(
GetPlayerMoney(playerid) <200) return GameTextForPlayer(playerid"~r~ No Money"2001);
                    
GivePlayerMoney(playerid, -200), GivePlayerWeapon(playerid2230);
                    
GameTextForPlayer(playerid"~r~9 mm"2001);
                    
ShowModelSelectionMenu(playeridgun"Weapons menu");
                }
                case 
347:
                {
                    if(
GetPlayerMoney(playerid) <600) return GameTextForPlayer(playerid"~r~ No Money"2001);
                    
GivePlayerMoney(playerid, -600), GivePlayerWeapon(playerid2330), GameTextForPlayer(playerid"~r~Silinced 9mm"2001);
                    
ShowModelSelectionMenu(playeridgun"Weapons menu");
                }
                case 
348:
                {
                    if(
GetPlayerMoney(playerid) <1200) return GameTextForPlayer(playerid"~r~ No Money"2001);
                    
GivePlayerMoney(playerid, -1200), GivePlayerWeapon(playerid2430), GameTextForPlayer(playerid"~r~Desert Eagle"2001);
                    
ShowModelSelectionMenu(playeridgun"Weapons menu");
                }
                case 
372:
                {
                    if(
GetPlayerMoney(playerid) <300) return GameTextForPlayer(playerid"~r~ No Money"2001);
                    
GivePlayerMoney(playerid, -300), GivePlayerWeapon(playerid3230), GameTextForPlayer(playerid"~r~TEC-9"2001);
                    
ShowModelSelectionMenu(playeridgun"Weapons menu");
                }
                case 
352:
                {
                    if(
GetPlayerMoney(playerid) <500) return GameTextForPlayer(playerid"~r~ No Money"2001);
                    
GivePlayerMoney(playerid, -500), GivePlayerWeapon(playerid2830), GameTextForPlayer(playerid"~r~Uzi"2001);
                    
ShowModelSelectionMenu(playeridgun"Weapons menu");
                }
                case 
349:
                {
                    if(
GetPlayerMoney(playerid) <600) return GameTextForPlayer(playerid"~r~No Money"2001);
                    
GivePlayerMoney(playerid, -600), GivePlayerWeapon(playerid2515), GameTextForPlayer(playerid"~r~Shotgun"2001);
                    
ShowModelSelectionMenu(playeridgun"Weapons menu");
                }
                case 
350:
                {
                    if(
GetPlayerMoney(playerid) <800) return GameTextForPlayer(playerid"~r~No Money"2001);
                    
GivePlayerMoney(playerid, -800), GivePlayerWeapon(playerid2615), GameTextForPlayer(playerid"~r~Sawnoff Shotgun"2001);
                    
ShowModelSelectionMenu(playeridgun"Weapons menu");
                }
                case 
351:
                {
                    if(
GetPlayerMoney(playerid) <1000) return GameTextForPlayer(playerid"~r~No Money"2001);
                    
GivePlayerMoney(playerid, -1000), GivePlayerWeapon(playerid2715), GameTextForPlayer(playerid"~r~Combat Shotgun"2001);
                    
ShowModelSelectionMenu(playeridgun"Weapons menu");
                }
                case 
353:
                {
                    if(
GetPlayerMoney(playerid) <2000) return GameTextForPlayer(playerid"~r~No Money"2001);
                    
GivePlayerMoney(playerid, -2000), GivePlayerWeapon(playerid2930), GameTextForPlayer(playerid"~r~MP5"2001);
                    
ShowModelSelectionMenu(playeridgun"Weapons menu");
                }
                  case 
355:
                {
                    if(
GetPlayerMoney(playerid) <3500) return GameTextForPlayer(playerid"~r~No Money"2001);
                    
GivePlayerMoney(playerid, -3500), GivePlayerWeapon(playerid30120), GameTextForPlayer(playerid"~r~AK-47"2001);
                    
ShowModelSelectionMenu(playeridgun"Weapons menu");
                }
                case 
356:
                {
                    if(
GetPlayerMoney(playerid) <4500) return GameTextForPlayer(playerid"~r~No Money"2001);
                    
GivePlayerMoney(playerid, -4500), GivePlayerWeapon(playerid31120), GameTextForPlayer(playerid"~r~M4"2001);
                    
ShowModelSelectionMenu(playeridgun"Weapons menu");
                }
                case 
357:
                {
                    if(
GetPlayerMoney(playerid) <1000) return GameTextForPlayer(playerid"~r~No Money"2001);
                    
GivePlayerMoney(playerid, -1000), GivePlayerWeapon(playerid3320), GameTextForPlayer(playerid"~r~Country Rifle"2001);
                    
ShowModelSelectionMenu(playeridgun"Weapons menu");
                }
                case 
358:
                {
                    if(
GetPlayerMoney(playerid) <5000) return GameTextForPlayer(playerid"~r~No Money"2001);
                    
GivePlayerMoney(playerid, -5000), GivePlayerWeapon(playerid3410), GameTextForPlayer(playerid"~r~Sniper Rifle"2001);
                    
ShowModelSelectionMenu(playeridgun"Weapons menu");
                }
            }
        }
        else 
SendClientMessage(playerid, -1"Fechou o Menu!");
    }
    return 
1;

Reply


Messages In This Thread
mSelection bugando - by lKiller - 16.01.2016, 19:56
Re: mSelection bugando - by ClaudioF - 16.01.2016, 19:59
Re: mSelection bugando - by XandyMello - 16.01.2016, 19:59
Re: mSelection bugando - by lKiller - 16.01.2016, 20:16
Re: mSelection bugando - by ClaudioF - 16.01.2016, 20:17
Re: mSelection bugando - by XandyMello - 16.01.2016, 20:36
Re: mSelection bugando - by lKiller - 16.01.2016, 20:48
Re: mSelection bugando - by XandyMello - 16.01.2016, 20:49
Re: mSelection bugando - by lKiller - 16.01.2016, 20:56
Re: mSelection bugando - by Jimmmy - 16.01.2016, 21:19

Forum Jump:


Users browsing this thread: 1 Guest(s)