Üdv!
Készítettem egy fegyver vásárlõ menüt.
Beírod, hogy /weapon kidob egy dialogot és lehet fegyvert venni, a fegyver után ott az ára, de pontokhoz is hozzá van fûzve, az az csak akkor bírod megvenni a fegyvert ha elég pontod is meg pénzed is van hozzá.
Scriptet készítette: LUCIFER (én)
Elkészítési idõ: 5-7 perc
Parancs: /weapon
Link:
http://www.mediafire.com/download/sgnb0oac9a76ai9/Fegyver.zipPawn kód:
#include <a_samp>
#include <zcmd>
#define COLOR_DARKORANGE 0xff7700AA
#define COLOR_ORANGE 0xfaa108AA
#define DIALOG_WEAPON 0
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(dialogid == DIALOG_WEAPON)
{
if(response)
{
if(listitem == 0)
{
if(GetPlayerMoney(playerid) < 5120)
{
SendClientMessage(playerid, COLOR_ORANGE, \"Nincs elég pénzed\");
}
else
{
if(GetPlayerScore(playerid) < 200)
{
SendClientMessage(playerid, COLOR_ORANGE, \"Nincs elég pontod. Ehez szükséges pont: 200.\");
}
else
{
GivePlayerWeapon(playerid, 30, 320);
GivePlayerMoney(playerid, -5120);
SendClientMessage(playerid, COLOR_DARKORANGE, \"Vásároltál egy fegyvert, neve: AK47, ára: 5000$, töltények száma: 320, ára: 120$.\");
}
}
}
if(listitem == 1)
{
if(GetPlayerMoney(playerid) < 3060)
{
SendClientMessage(playerid, COLOR_ORANGE, \"Nincs ennyi pénzed.\");
}
else
{
if(GetPlayerScore(playerid) < 50)
{
SendClientMessage(playerid, COLOR_ORANGE, \"Nincs elég pontod. Ehez szükséges pont: 50.\");
}
else
{
GivePlayerWeapon(playerid, 29, 240);
GivePlayerMoney(playerid, -3060);
SendClientMessage(playerid, COLOR_DARKORANGE, \"Vásároltál egy fegyvert, neve: MP5, ára: 3000$, töltények száma: 240, ára: 60$.\");
}
}
}
if(listitem == 2)
{
if(GetPlayerMoney(playerid) < 1570)
{
SendClientMessage(playerid, COLOR_ORANGE, \"Nincs ennyi pénzed.\");
}
else
{
if(GetPlayerScore(playerid) < 30)
{
SendClientMessage(playerid, COLOR_ORANGE, \"Nincs elég pontod. Ehez szükséges pont: 30.\");
}
else
{
GivePlayerWeapon(playerid, 32, 300);
GivePlayerMoney(playerid, -1570);
SendClientMessage(playerid, COLOR_DARKORANGE, \"Vásároltál egy fegyvert, neve: Tec-9, ára: 1500$, töltények száma: 300, ára: 70$.\");
}
}
}
if(listitem == 3)
{
if(GetPlayerMoney(playerid) < 2200)
{
SendClientMessage(playerid, COLOR_ORANGE, \"Nincs ennyi pénzed.\");
}
else
{
if(GetPlayerScore(playerid) < 20)
{
SendClientMessage(playerid, COLOR_ORANGE, \"Nincs elég pontod. Ehez szükséges pont: 20.\");
}
else
{
GivePlayerWeapon(playerid, 24, 97);
GivePlayerMoney(playerid, -2200);
SendClientMessage(playerid, COLOR_DARKORANGE, \"Vásároltál egy fegyvert, neve: Desert Eagle, ára: 2000$, töltények száma: 97, ára: 200$.\");
}
}
}
if(listitem == 4)
{
if(GetPlayerMoney(playerid) < 2000)
{
SendClientMessage(playerid, COLOR_ORANGE, \"Nincs ennyi pénzed.\");
}
else
{
if(GetPlayerScore(playerid) < 1)
{
SendClientMessage(playerid, COLOR_ORANGE, \"Nincs elég pontod. Ehez szükséges pont: 1.\");
}
else
{
GivePlayerWeapon(playerid, 16, 6);
GivePlayerMoney(playerid, -2000);
SendClientMessage(playerid, COLOR_DARKORANGE, \"Gránátot vásároltál, 6db-ot, ára: 2000$.\");
}
}
}
if(listitem == 5)
{
if(GetPlayerMoney(playerid) < 2200)
{
SendClientMessage(playerid, COLOR_ORANGE, \"Nincs ennyi pénzed.\");
}
else
{
if(GetPlayerScore(playerid) < 20)
{
SendClientMessage(playerid, COLOR_ORANGE, \"Nincs elég pontod. Ehez szükséges pont: 20.\");
}
else
{
GivePlayerWeapon(playerid, 27, 200);
GivePlayerMoney(playerid, -2200);
SendClientMessage(playerid, COLOR_DARKORANGE, \"Vásároltál egy fegyvert, neve: Harci Shotgun, ára: 2000$, töltények száma: 200, ára: 200$.\");
}
}
}
if(listitem == 6)
{
if(GetPlayerMoney(playerid) < 2750)
{
SendClientMessage(playerid, COLOR_ORANGE, \"Nincs ennyi pénzed.\");
}
else
{
if(GetPlayerScore(playerid) < 25)
{
SendClientMessage(playerid, COLOR_ORANGE, \"Nincs elég pontod. Ehez szükséges pont: 25.\");
}
else
{
GivePlayerWeapon(playerid, 26, 250);
GivePlayerMoney(playerid, -2750);
SendClientMessage(playerid, COLOR_DARKORANGE, \"Vásároltál egy fegyvert, neve: Rövid csövû Shotgun, ára: 2500$, töltények száma: 250, ára: 250$.\");
}
}
}
if(listitem == 7)
{
if(GetPlayerMoney(playerid) < 5500)
{
SendClientMessage(playerid, COLOR_ORANGE, \"Nincs ennyi pénzed.\");
}
else
{
if(GetPlayerScore(playerid) <200)
{
SendClientMessage(playerid, COLOR_ORANGE, \"Nincs elég pontod. Ehez szükséges pont: 200.\");
}
else
{
GivePlayerWeapon(playerid, 31, 450);
GivePlayerMoney(playerid, -5500);
SendClientMessage(playerid, COLOR_DARKORANGE, \"Vásároltál egy fegyvert, neve: M4, ára: 5000$, töltények száma: 450, ára: 500$.\");
}
}
}
if(listitem == 
{
if(GetPlayerMoney(playerid) < 3500)
{
SendClientMessage(playerid, COLOR_ORANGE, \"Nincs ennyi pénzed.\");
}
else
{
if(GetPlayerScore(playerid) < 250)
{
SendClientMessage(playerid, COLOR_ORANGE, \"Nincs elég pontod. Ehez szükséges pont: 250.\");
}
else
{
GivePlayerWeapon(playerid, 36, 20);
GivePlayerMoney(playerid, -3500);
SendClientMessage(playerid, COLOR_DARKORANGE, \"Vásároltál egy fegyvert, neve: Rocket, ára: 3000$ töltények száma: 20, ára: 500$.\");
}
}
}
if(listitem == 9)
{
if(GetPlayerMoney(playerid) < 505000)
{
SendClientMessage(playerid, COLOR_ORANGE, \"Nincs ennyi pénzed.\");
}
else
{
if(GetPlayerScore(playerid) < 1500)
{
SendClientMessage(playerid, COLOR_ORANGE, \"Nincs elég pontod. Ehez szükséges pont: 1500.\");
}
else
{
GivePlayerWeapon(playerid, 38, 10000);
GivePlayerMoney(playerid, -505000);
SendClientMessage(playerid, COLOR_DARKORANGE, \"Vásároltál egy fegyvert, neve: Minigun, ára: 500000$ töltények száma: 10000, ára: 5000$.\");
}
}
}
}
else
{
}
}
return 1;
}
CMD:weapon(playerid, params[])
{
ShowPlayerDialog(playerid, DIALOG_WEAPON, DIALOG_STYLE_LIST, \"{ffff00}Fegyverek{1100ff}(WEAPON)\", \"{2600ff}AK47 - 5120$\\n{fafafa}MP5 - 3060$\\n{15ff00}Tec-9 - 1570$\\n{f7ff00}Desert Eagle - 2200$\\n{f7ff00}Gránát - 2000$\\n{f7ff00}Harci Shotgun - 2200$\\n{0022ff}Rövid csövû Shotgun - 2750$\\n{00f7ff}M4 - 5500$\\n{00ff09}Rocket - 3500$\\nMinigun - 505000$\", \"Megvesz\", \"Kilépés\");
return 1;
}
