SA-MP Forums Archive
[AJUDA]setargrana - Printable Version

+- SA-MP Forums Archive (https://sampforum.blast.hk)
+-- Forum: Non-English (https://sampforum.blast.hk/forumdisplay.php?fid=9)
+--- Forum: Languages (https://sampforum.blast.hk/forumdisplay.php?fid=33)
+---- Forum: Português/Portuguese (https://sampforum.blast.hk/forumdisplay.php?fid=34)
+---- Thread: [AJUDA]setargrana (/showthread.php?tid=343463)


[AJUDA]setargrana - mengueh - 17.05.2012

pawn Код:
CMD:setargrana(playerid, params[])
{
    new id, quantidade, jogador[24], admin[24], string[128], strg[128];
    if(PlayerInfo[playerid][mAdmin] < 4) return SendClientMessage(playerid, VERMELHO, falha);
    if(sscanf(params, "dd", id, quantidade)) return SendClientMessage(playerid, BRANCO, "[INFO]: /dargrana [playerid] [quantidade]");
    {
        if(!IsPlayerConnected(id)) return SendClientMessage(playerid, VERMELHO, "[INFO]: Jogador invбlido!");
        GetPlayerName(id, jogador, 24); // jogador kickado
        GetPlayerName(playerid, admin, 24); // admin
        format(string, sizeof(string), "O administrador %s setou dinheiro para R$ %d.", admin, quantidade);
        format(strg, sizeof(strg), "Vocк setou o dinheiro de %s para R$ %d.", jogador, quantidade);
        SetPlayerMoney(id, quantidade);
        SendClientMessage(id, AZUL, string);
        SendClientMessage(playerid, AZUL, strg);

    }
    return 1;
}
Tб dando erro na linha do SetPlayerMoney, tб dizendo que nгo tб definido

Re: [AJUDA]setargrana - zbt - 17.05.2012

use GivePlayerMoney.

SetPlayerMoney nгo existe.

Re: [AJUDA]setargrana - Vitor_Marfioso - 17.05.2012

pawn Код:
if(strcmp(cmd, "/dinheiro", true) == 0)
    {
        if(IsPlayerConnected(playerid))
        {
            tmp = strtok(cmdtext, idx);
            if(!strlen(tmp))
            {
                SendClientMessage(playerid, COLOR_GRAD2, "USE: /dinheiro [id] [money]");
                return 1;
            }
            new playa;
            new name[MAX_PLAYER_NAME];
            new money;
            playa = ReturnUser(tmp);
            tmp = strtok(cmdtext, idx);
            money = strval(tmp);
            if (PlayerInfo[playerid][pAdminBPC] >= 1337)
            {
                if(modoadmin[playerid] < 1)
                {
                SendClientMessage(playerid, COLOR_GRAD1, "Vocк nгo estб em modo de trabalho!");
                return 1;
                }
                if(IsPlayerConnected(playa))
                {
                    if(playa != INVALID_PLAYER_ID)
                    {
                        ResetPlayerMoneyEx(playa);
                        ConsumingMoney[playa] = 1;
                        GivePlayerMoneyEx(playa, money);
            GetPlayerName(playerid, name, sizeof(name));
            GetPlayerName(playa, playername, sizeof(playername));
            format(string, 256, "AdmCmd: O Admin %s estб editando -$%d para %s.",name,money,playername);
            ABroadCast(COLOR_LIGHTGREEN,string,1);
                    }
                }
            }
            else
            {
                SendClientMessage(playerid, COLOR_GRAD1, "Vocк nгo tem autorizaзгo para acessar estб бrea!");
            }
        }
        return 1;
            }


Re: [AJUDA]setargrana - mau.tito - 17.05.2012

pawn Код:
CMD:setargrana(playerid, params[])
{
    new id, quantidade, jogador[24], admin[24], string[128], strg[128];
    if(PlayerInfo[playerid][mAdmin] < 4) return SendClientMessage(playerid, VERMELHO, falha);
    if(sscanf(params, "dd", id, quantidade)) return SendClientMessage(playerid, BRANCO, "[INFO]: /dargrana [playerid] [quantidade]");
    {
        if(!IsPlayerConnected(id)) return SendClientMessage(playerid, VERMELHO, "[INFO]: Jogador invбlido!");
        GetPlayerName(id, jogador, 24); // jogador kickado
        GetPlayerName(playerid, admin, 24); // admin
        format(string, sizeof(string), "O administrador %s setou dinheiro para R$ %d.", admin, quantidade);
        format(strg, sizeof(strg), "Vocк setou o dinheiro de %s para R$ %d.", jogador, quantidade);
        GivePlayerMoneyEx(id, quantidade);
        SendClientMessage(id, AZUL, string);
        SendClientMessage(playerid, AZUL, strg);

    }
    return 1;
}


Re: [AJUDA]setargrana - ViniBorn - 17.05.2012

pawn Код:
new id, quantidade, jogador[24], admin[24], string[128], strg[128];
Vocк nгo precisa criar 2 arrays para mensagens e duas para nomes ...

pawn Код:
CMD:setargrana(playerid, params[])
{
    if(PlayerInfo[playerid][mAdmin] < 4) return SendClientMessage(playerid, VERMELHO, falha);

    new id, quantidade;
    if(sscanf(params, "rd", id, quantidade)) return SendClientMessage(playerid, BRANCO, "[INFO]: /dargrana [playerid] [quantidade]");
    if(!IsPlayerConnected(id)) return SendClientMessage(playerid, VERMELHO, "[INFO]: Jogador invбlido!");

    new VBNome[MAX_PLAYER_NAME], VBString[75];

    GetPlayerName(playerid, VBNome, MAX_PLAYER_NAME);
    format(VBString, sizeof(VBString), "O administrador %s setou seu dinheiro para R$ %d.", VBNome, quantidade);
    SendClientMessage(id, AZUL, VBString);
    
    GetPlayerName(id, VBNome, MAX_PLAYER_NAME);
    format(VBString, sizeof(VBString),     "Vocк setou o dinheiro de %s para R$ %d.", VBNome, quantidade);
    SendClientMessage(playerid, AZUL, VBString);
    
    SetPlayerMoney(id, quantidade);
    return 1;
}