[Trollolollo]

Hello Guys,I Have A Problem,I Need Pawn Code /shop That Can Buy Vehicles And Weapon There,
This /shop Command Is Useful And I Need The Pawn Code Please,
Hope You Guys Can Help Me

[SwisherSweet]

make your own.
I have a weapon system with prices(no cars added)
Take that and learn to script.
I also made a tut on dialog scripting(go look in wiki)(has EVEYTHING)))

[Trollolollo]

Wiki cant help me a little,I learn Pawno scripting using Pawn Code that post here,Can you post your scripts?Hope you can help me

[[Ro]DuReX]

This is /weapons command. It's in Romanian. I've copied this from my gamemode. I'll translate this later.
arme = weapons
cumpara = buy
inchide = close
Nu ai suficienti bani = You haven't enough money!
viata = health
armura = armour
la pretul de = at the price of
ti-ai luat = you bought
RNG = My server (Romania New Generation)

pawn Код:

#include <a_samp>
#include <zcmd>
#define DIALOG_WEAPONS 1000
#define red 0xFF0000AA
#define green 0x33AA33AA

public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
    if(dialogid == DIALOG_WEAPONS)
    {
        if(response)
        {
            if(listitem == 0)
            {
                if(GetPlayerMoney(playerid) >= 10000)
                {
                    GivePlayerMoney(playerid, -10000);
                    SetPlayerHealth(playerid, 100);
                    SendClientMessage(playerid,green,"RNG Message: {FFFFFF}Ti-ai luat {33AA33}viata {FFFFFF}la pretul de {33AA33}10000$");
                    return cmd_arme(playerid);
                }
                else SendClientMessage(playerid,red,"RNG Error: {FFFFFF}Nu ai suficienti bani!");
                return cmd_arme(playerid);
            }
            if(listitem == 1)
            {
                if(GetPlayerMoney(playerid) >= 15000)
                {
                    GivePlayerMoney(playerid, -15000);
                    SetPlayerArmour(playerid, 100);
                    SendClientMessage(playerid,green,"RNG Message: {FFFFFF}Ti-ai luat {33AA33}armura {FFFFFF}la pretul de {33AA33}15000$");
                    return cmd_arme(playerid);
                }
                else SendClientMessage(playerid,red,"RNG Error: {FFFFFF}Nu ai suficienti bani!");
                return cmd_arme(playerid);
            }
            if(listitem == 2)
            {
                if(GetPlayerMoney(playerid) >= 20000)
                {
                    GivePlayerMoney(playerid, -20000);
                    GivePlayerWeapon(playerid, 22, 1000);
                    SendClientMessage(playerid,green,"RNG Message: {FFFFFF}Ti-ai luat un {33AA33}.9mm (1000 ammo) {FFFFFF}la pretul de {33AA33}20000$");
                    return cmd_arme(playerid);
                }
                else SendClientMessage(playerid,red,"RNG Error: {FFFFFF}Nu ai suficienti bani!");
                return cmd_arme(playerid);
            }
            if(listitem == 3)
            {
                if(GetPlayerMoney(playerid) >= 25000)
                {
                    GivePlayerMoney(playerid, -25000);
                    GivePlayerWeapon(playerid, 23, 1000);
                    SendClientMessage(playerid,green,"RNG Message: {FFFFFF}Ti-ai luat un {33AA33}Silenced .9mm (1000 ammo) {FFFFFF}la pretul de {33AA33}25000$");
                    return cmd_arme(playerid);
                }
                else SendClientMessage(playerid,red,"RNG Error: {FFFFFF}Nu ai suficienti bani!");
                return cmd_arme(playerid);
            }
            if(listitem == 4)
            {
                if(GetPlayerMoney(playerid) >= 30000)
                {
                    GivePlayerMoney(playerid, -30000);
                    GivePlayerWeapon(playerid, 24, 1000);
                    SendClientMessage(playerid,green,"RNG Message: {FFFFFF}Ti-ai luat un {33AA33}Desert Eagle (1000 ammo) {FFFFFF}la pretul de {33AA33}30000$");
                    return cmd_arme(playerid);
                }
                else SendClientMessage(playerid,red,"RNG Error: {FFFFFF}Nu ai suficienti bani!");
                return cmd_arme(playerid);
            }
            if(listitem == 5)
            {
                if(GetPlayerMoney(playerid) >= 50000)
                {
                    GivePlayerMoney(playerid, -50000);
                    GivePlayerWeapon(playerid, 25, 1000);
                    SendClientMessage(playerid,green,"RNG Message: {FFFFFF}Ti-ai luat un {33AA33}Shotgun (1000 ammo) {FFFFFF}la pretul de {33AA33}50000$");
                    return cmd_arme(playerid);
                }
                else SendClientMessage(playerid,red,"RNG Error: {FFFFFF}Nu ai suficienti bani!");
                return cmd_arme(playerid);
            }
            if(listitem == 6)
            {
                if(GetPlayerMoney(playerid) >= 60000)
                {
                    GivePlayerMoney(playerid, -60000);
                    GivePlayerWeapon(playerid, 26, 1000);
                    SendClientMessage(playerid,green,"RNG Message: {FFFFFF}Ti-ai luat un {33AA33}Sawn-Off Shotgun (1000 ammo) {FFFFFF}la pretul de {33AA33}60000$");
                    return cmd_arme(playerid);
                }
                else SendClientMessage(playerid,red,"RNG Error: {FFFFFF}Nu ai suficienti bani!");
                return cmd_arme(playerid);
            }
            if(listitem == 7)
            {
                if(GetPlayerMoney(playerid) >= 65000)
                {
                    GivePlayerMoney(playerid, -65000);
                    GivePlayerWeapon(playerid, 27, 1000);
                    SendClientMessage(playerid,green,"RNG Message: {FFFFFF}Ti-ai luat un {33AA33}Combat Shotgun (1000 ammo) {FFFFFF}la pretul de {33AA33}65000$");
                    return cmd_arme(playerid);
                }
                else SendClientMessage(playerid,red,"RNG Error: {FFFFFF}Nu ai suficienti bani!");
                return cmd_arme(playerid);
            }
            if(listitem == 8)
            {
                if(GetPlayerMoney(playerid) >= 30000)
                {
                    GivePlayerMoney(playerid, -30000);
                    GivePlayerWeapon(playerid, 28, 1000);
                    SendClientMessage(playerid,green,"RNG Message: {FFFFFF}Ti-ai luat un {33AA33}Micro SMG (1000 ammo) {FFFFFF}la pretul de {33AA33}30000$");
                    return cmd_arme(playerid);
                }
                else SendClientMessage(playerid,red,"RNG Error: {FFFFFF}Nu ai suficienti bani!");
                return cmd_arme(playerid);
            }
            if(listitem == 9)
            {
                if(GetPlayerMoney(playerid) >= 40000)
                {
                    GivePlayerMoney(playerid, -40000);
                    GivePlayerWeapon(playerid, 29, 1000);
                    SendClientMessage(playerid,green,"RNG Message: {FFFFFF}Ti-ai luat un {33AA33}MP5 (1000 ammo) {FFFFFF}la pretul de {33AA33}40000$");
                    return cmd_arme(playerid);
                }
                else SendClientMessage(playerid,red,"RNG Error: {FFFFFF}Nu ai suficienti bani!");
                return cmd_arme(playerid);
            }
            if(listitem == 10)
            {
                if(GetPlayerMoney(playerid) >= 55000)
                {
                    GivePlayerMoney(playerid, -55000);
                    GivePlayerWeapon(playerid, 32, 1000);
                    SendClientMessage(playerid,green,"RNG Message: {FFFFFF}Ti-ai luat un {33AA33}Tec-9 (1000 ammo) {FFFFFF}la pretul de {33AA33}55000$");
                    return cmd_arme(playerid);
                }
                else SendClientMessage(playerid,red,"RNG Error: {FFFFFF}Nu ai suficienti bani!");
                return cmd_arme(playerid);
            }
            if(listitem == 11)
            {
                if(GetPlayerMoney(playerid) >= 45000)
                {
                    GivePlayerMoney(playerid, -45000);
                    GivePlayerWeapon(playerid, 30, 1000);
                    SendClientMessage(playerid,green,"RNG Message: {FFFFFF}Ti-ai luat un {33AA33}Ak47 (1000 ammo) {FFFFFF}la pretul de {33AA33}45000$");
                    return cmd_arme(playerid);
                }
                else SendClientMessage(playerid,red,"RNG Error: {FFFFFF}Nu ai suficienti bani!");
                return cmd_arme(playerid);
            }
            if(listitem == 12)
            {
                if(GetPlayerMoney(playerid) >= 60000)
                {
                    GivePlayerMoney(playerid, -60000);
                    GivePlayerWeapon(playerid, 31, 1000);
                    SendClientMessage(playerid,green,"RNG Message: {FFFFFF}Ti-ai luat un {33AA33}M4 (1000 ammo) {FFFFFF}la pretul de {33AA33}60000$");
                    return cmd_arme(playerid);
                }
                else SendClientMessage(playerid,red,"RNG Error: {FFFFFF}Nu ai suficienti bani!");
                return cmd_arme(playerid);
            }
            if(listitem == 13)
            {
                if(GetPlayerMoney(playerid) >= 65000)
                {
                    GivePlayerMoney(playerid, -65000);
                    GivePlayerWeapon(playerid, 33, 1000);
                    SendClientMessage(playerid,green,"RNG Message: {FFFFFF}Ti-ai luat un {33AA33}Country Rifle (1000 ammo) {FFFFFF}la pretul de {33AA33}65000$");
                    return cmd_arme(playerid);
                }
                else SendClientMessage(playerid,red,"RNG Error: {FFFFFF}Nu ai suficienti bani!");
                return cmd_arme(playerid);
            }
            if(listitem == 14)
            {
                if(GetPlayerMoney(playerid) >= 70000)
                {
                    GivePlayerMoney(playerid, -70000);
                    GivePlayerWeapon(playerid, 34, 1000);
                    SendClientMessage(playerid,green,"RNG Message: {FFFFFF}Ti-ai luat un {33AA33}Sniper Rifle (1000 ammo) {FFFFFF}la pretul de {33AA33}000$");
                    return cmd_arme(playerid);
                }
                else SendClientMessage(playerid,red,"RNG Error: {FFFFFF}Nu ai suficienti bani!");
                return cmd_arme(playerid);
            }
        }
    }
    return 0;
}


public OnPlayerCommandText(playerid, cmdtext[])
{
if (strcmp("/weapons", cmdtext, true, 10) == 0)
{
{
    new armes[1900];
    strcat(armes, "{FF0000}• {FFFFFF}Viata - {FF0000}10000$ \n", 1900);
    strcat(armes, "{FF0000}• {FFFFFF}Armura - {FF0000}15000$ \n", 1900);
    strcat(armes, "{FF0000}• {FFFFFF}9mm - {FF0000}20000$ \n", 1900);
    strcat(armes, "{FF0000}• {FFFFFF}Silenced 9mm - {FF0000}25000$ \n", 1900);
    strcat(armes, "{FF0000}• {FFFFFF}Desert Eagle - {FF0000}30000$ \n", 1900);
    strcat(armes, "{FF0000}• {FFFFFF}Shotgun - {FF0000}50000$ \n", 1900);
    strcat(armes, "{FF0000}• {FFFFFF}Sawn-Off Shotgun - {FF0000}60000$ \n", 1900);
    strcat(armes, "{FF0000}• {FFFFFF}Combat Shotgun - {FF0000}65000$ \n", 1900);
    strcat(armes, "{FF0000}• {FFFFFF}Micro SMG - {FF0000}30000$ \n", 1900);
    strcat(armes, "{FF0000}• {FFFFFF}MP5 - {FF0000}40000$ \n", 1900);
    strcat(armes, "{FF0000}• {FFFFFF}Tec-9 - {FF0000}55000$ \n", 1900);
    strcat(armes, "{FF0000}• {FFFFFF}Ak47 - {FF0000}45000$ \n", 1900);
    strcat(armes, "{FF0000}• {FFFFFF}M4 - {FF0000}60000$ \n", 1900);
    strcat(armes, "{FF0000}• {FFFFFF}Country Rifle - {FF0000}65000$ \n", 1900);
    strcat(armes, "{FF0000}• {FFFFFF}Sniper Rifle - {FF0000}70000$ ", 1900);
    ShowPlayerDialog(playerid, DIALOG_WEAPONS, DIALOG_STYLE_LIST, "{0000FF}R {FFFF00}N {FF0000}G{FFFFFF} | Weapons", armes, "Cumpara", "Inchide");
    return 1;
}
return 0;
}