#include <a_samp>
#include <zcmd>
#define DIALOG_FEGYVER 3
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(dialogid == DIALOG_FEGYVER) // 
{
if(listitem == 0)
{
SendClientMessage(playerid,-1,\"Vettél EGY kést!\");
GivePlayerWeapon(playerid,4,1);
GivePlayerMoney(playerid,-1000);
}
if(listitem == 1)
{
SendClientMessage(playerid,-1,\"Vettél EGY baseball ütőt!\");
GivePlayerWeapon(playerid,5,1);
GivePlayerMoney(playerid,-6000);
}
if(listitem == 2)
{
SendClientMessage(playerid,-1,\"Vettél egy ásót!\");
GivePlayerWeapon(playerid,6,1);
GivePlayerMoney(playerid,-2000);
}
if(listitem == 3)
{
SendClientMessage(playerid,-1,\"Vettél egy Katanát!\");
GivePlayerWeapon(playerid,8,1);
GivePlayerMoney(playerid,-10000);
}
if(listitem == 4)
{
SendClientMessage(playerid,-1,\"Vettél egy Láncfűrészt\");
GivePlayerWeapon(playerid,9,1);
GivePlayerMoney(playerid,-10000);
}
if(listitem == 5)
{
SendClientMessage(playerid,-1,\"Vettél egy Colt45 típusú fegyvert!\");
GivePlayerWeapon(playerid,22,100);
GivePlayerMoney(playerid,-10000);
}
if(listitem == 6)
{
SendClientMessage(playerid,-1,\"Vettél egy Silenced típusú fegyvert!\");
GivePlayerWeapon(playerid,23,100);
GivePlayerMoney(playerid,-12000);
}
if(listitem == 7)
{
SendClientMessage(playerid,-1,\"Vettél egy Deagle típusú fegyvert!\");
GivePlayerWeapon(playerid,24,100);
GivePlayerMoney(playerid,-15000);
}
if(listitem == 
{
SendClientMessage(playerid,-1,\"Vettél egy Shotgun típusú fegyvert!\");
GivePlayerWeapon(playerid,25,100);
GivePlayerMoney(playerid,-20000);
}
if(listitem == 9)
{
SendClientMessage(playerid,-1,\"Vettél egy Sawnoff Shotgun típusú fegyvert!\");
GivePlayerWeapon(playerid,26,100);
GivePlayerMoney(playerid,-20000);
}
if(listitem == 10)
{
SendClientMessage(playerid,-1,\"Vettél egy Combat Shotgun típusú fegyvert!\");
GivePlayerWeapon(playerid,27,100);
GivePlayerMoney(playerid,-22000);
}
if(listitem == 11)
{
SendClientMessage(playerid,-1,\"Vettél egy UZI típusú fegyvert!\");
GivePlayerWeapon(playerid,28,100);
GivePlayerMoney(playerid,-14000);
}
if(listitem == 12)
{
SendClientMessage(playerid,-1,\"Vettél egy MP5 típusú fegyvert!\");
GivePlayerWeapon(playerid,29,100);
GivePlayerMoney(playerid,-25000);
}
if(listitem == 13)
{
SendClientMessage(playerid,-1,\"Vettél egy AK-47 típusú fegyvert!\");
GivePlayerWeapon(playerid,30,100);
GivePlayerMoney(playerid,-30000);
}
if(listitem == 14)
{
SendClientMessage(playerid,-1,\"Vettél egy M4 típusú fegyvert!\");
GivePlayerWeapon(playerid,31,100);
GivePlayerMoney(playerid,-32000);
}
if(listitem == 15)
{
SendClientMessage(playerid,-1,\"Vettél egy Sniper típusú fegyvert!\");
GivePlayerWeapon(playerid,34,100);
GivePlayerMoney(playerid,-40000);
}
if(listitem == 16)
{
SendClientMessage(playerid,-1,\"Vettél egy Minigun típusú fegyvert!\");
GivePlayerWeapon(playerid,38,100);
GivePlayerMoney(playerid,-20000);
}
}
return 1;
}
CMD:fegyver(playerid,params[])
{
ShowPlayerDialog(playerid,DIALOG_FEGYVER,DIALOG_STYLE_LIST,\"Fegyvermenü (100 golyó)\",\"Kés -1000\\nBaseball ütő -6000\\nÁsó -2000\\nKatana -10000\\nLáncfűrész -10000\\nColt45 -10000\\nSilenced(Hangtompítós)-12000\\nDeagle -15000\\nShotgun -20000\\nSawnoff Shotgun -20000\\nCombat -22000\\nUzi -14000\\nMP5 -25000\\nAK47 -30000\\nM4 -32000\\nSniper -40000\\nMinigun -1000000\",\"Vásárol\",\"Mégse\");
return 1;
}

Itt még az is gond hogy ha 0 $-om van vagy negativ pénzösszegem vagy esetleg kevesebb mint amennyi a \"fegyver\" akkor is megadja és negatívba számol az egész rendszer, bővíthetnéd hogy csak akkor tudja megvenni ha van elég pénze mert ez így semmit nem ér!
 

if(listitem == 6)
{
        SendClientMessage(playerid,-1,\"Vettél egy Silenced típusú fegyvert!\");
        GivePlayerWeapon(playerid,23,100);
        GivePlayerMoney(playerid,-12000);
}

if(listitem == 6)
{
if(GetPlayerMoney(playerid) < 12000) return SendClientMessage(playerid, -1, \"Nincs elég pénzed! (12000$)\");
    SendClientMessage(playerid,-1,\"Vettél egy Silenced típusú fegyvert!\");
    GivePlayerWeapon(playerid,23,100);
    GivePlayerMoney(playerid,-12000);
}