Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #include <a_samp>
- new
- AKsandelyje,
- DGLsandelyje,
- USPsandelyje,
- UZIsandelyje,
- MP5sandelyje
- ;
- new
- GunShopPICKUP
- ;
- #define AK_KAINA 1000
- #define DGL_KAINA 300
- #define USP_KAINA 150
- #define UZI_KAINA 700
- #define MP5_KAINA 850
- #define CALLBACK::%0(%1) forward %0(%1); public %0(%1)
- #define GUN::%0(%1) %0(%1)
- #define BUTTON_YES if(response)
- #define BUTTON_NO if(!response)
- enum{
- DIALOG_GUNSHOP
- }
- CALLBACK::OnGameModeInit()
- {
- AKsandelyje = 100;
- DGLsandelyje = 30;
- USPsandelyje = 15;
- UZIsandelyje = 70;
- MP5sandelyje = 85;
- GunShopPICKUP = CreatePickup(1242, 2, 1503.3359, 1432.3585, 10.1191, -1);
- }
- CALLBACK::OnPlayerPickUpPickup(playerid, pickupid)
- {
- if(pickupid == GunShopPICKUP)
- {
- new
- sandelyje[50],
- isviso,
- masyvas[128]
- ;
- isviso = AKsandelyje + DGLsandelyje + USPsandelyje + UZIsandelyje + MP5sandelyje;
- format(sandelyje, sizeof(sandelyje), "Sandelyje viso ginklų yra %d", isviso);
- format(masyvas, sizeof(masyvas), "\
- AK-47 - %dLT (liko %d vnt.)\n\
- Desert Eagle - %dLT (liko %d vnt.)\n\
- USP - %dLT (liko %d vnt.)\n\
- UZI - %dLT (liko %d vnt.)\n\
- MP5 - %dLT (liko %d vnt.)\n",
- AK_KAINA, AKsandelyje, DGL_KAINA, DGLsandelyje, USP_KAINA, USPsandelyje, UZI_KAINA, UZIsandelyje, MP5_KAINA, MP5sandelyje);
- ShowPlayerDialog(playerid, DIALOG_GUNSHOP, DIALOG_STYLE_LIST, sandelyje, masyvas, "Pirkti", "Išeiti");
- }
- return true;
- }
- CALLBACK::OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
- {
- switch(dialogid)
- {
- case DIALOG_GUNSHOP:
- {
- BUTTON_YES
- {
- switch(listitem)
- {
- case 0:
- {
- if(GetPlayerMoney(playerid) < AK_KAINA) return SendClientMessage(playerid, -1, "Jūms neužtenka pinigų.");
- GivePlayerWeapon(playerid, 30, 1000);
- GivePlayerMoney(playerid, -AK_KAINA);
- SendClientMessage(playerid, -1, "Sėkmingai nusipirkote AK-47");
- AKsandelyje -= 1;
- }
- case 1:
- {
- if(GetPlayerMoney(playerid) < DGL_KAINA) return SendClientMessage(playerid, -1, "Jūms neužtenka pinigų.");
- GivePlayerWeapon(playerid, 24, 500);
- GivePlayerMoney(playerid, -DGL_KAINA);
- SendClientMessage(playerid, -1, "Sėkmingai nusipirkote Desert Eagle");
- DGLsandelyje -= 1;
- }
- case 2:
- {
- if(GetPlayerMoney(playerid) < USP_KAINA) return SendClientMessage(playerid, -1, "Jūms neužtenka pinigų.");
- GivePlayerWeapon(playerid, 22, 500);
- GivePlayerMoney(playerid, -USP_KAINA);
- SendClientMessage(playerid, -1, "Sėkmingai nusipirkote USP");
- USPsandelyje -= 1;
- }
- case 3:
- {
- if(GetPlayerMoney(playerid) < UZI_KAINA) return SendClientMessage(playerid, -1, "Jūms neužtenka pinigų.");
- GivePlayerWeapon(playerid, 28, 1000);
- GivePlayerMoney(playerid, -UZI_KAINA);
- SendClientMessage(playerid, -1, "Sėkmingai nusipirkote UZI");
- UZIsandelyje -= 1;
- }
- case 4:
- {
- if(GetPlayerMoney(playerid) < MP5_KAINA) return SendClientMessage(playerid, -1, "Jūms neužtenka pinigų.");
- GivePlayerWeapon(playerid, 29, 1000);
- GivePlayerMoney(playerid, -MP5_KAINA);
- SendClientMessage(playerid, -1, "Sėkmingai nusipirkote MP5");
- MP5sandelyje -= 1;
- }
- }
- }
- BUTTON_NO
- {
- SendClientMessage(playerid, -1, "Ačiū kad apsilankėte, kitą kartą kąnors nusipirkite.");
- }
- return true;
- }
- }
- return true;
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement