Pawn Code:

#include <a_samp>
#include <zcmd>
CMD:buyweapon(playerid, params[])
{
ShowPlayerDialog(playerid, 101, DIALOG_STYLE_LIST, "Vu Khi", "9mm\nBase Ball Bat\nBrass Knuckles", "Give", "Canck");
return 1;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(dialogid == 101)
{
if(!response)
return 1;
switch(listitem)
{
case 0:
{
if(GetPlayerMoney(playerid) < 500)
return SendClientMessage(playerid, 0, "Ban khong du Tien.");
GivePlayerMoney(playerid, -500);
GivePlayerWeapon(playerid, 22, 500);
}
case 1:
{
if(GetPlayerMoney(playerid) < 1200)
return SendClientMessage(playerid, 0, "Ban Khong Du Tien.");
GivePlayerMoney(playerid, -1200);
GivePlayerWeapon(playerid, 5, 500);
}
case 2:
{
if(GetPlayerMoney(playerid) < 300)
return SendClientMessage(playerid, 0, "Ban Khong Du Tien.");
GivePlayerMoney(playerid, -300);
GivePlayerWeapon(playerid, 1, 300);
}
}
}
return 1;
}