[Ajuda] cmd:transferir para dialogid
#3

pawn Код:
#define DIALOG_TRANSFERIR_PEGAR_ID 8000
#define DIALOG_TRANSFERIR_PEGAR_QUANTIA 8001

new Transferir_ID[MAX_PLAYERS];

CMD:transferir(playerid) {

    ShowPlayerDialog(playerid, DIALOG_TRANSFERIR_PEGAR_ID, DIALOG_STYLE_INPUT, "Tranfкrencia", "No campo abaixo digite o ID do jogador que receberб determinada quantia!", "Prуximo", "Fechar");
    return 1;
}

public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[]) {

    if ( dialogid == DIALOG_TRANSFERIR_PEGAR_ID ) {

        if ( response ) {

            Transferir_ID[playerid] = strval(inputtext);

            if ( !IsPlayerConnected(Transferir_ID[playerid]) ) {

                SendClientMessage(playerid, -1, "Jogador offline, por favor informe outro ID!");
                ShowPlayerDialog(playerid, DIALOG_TRANSFERIR_PEGAR_ID, DIALOG_STYLE_INPUT, "Tranfкrencia", "No campo abaixo digite o ID do jogador que receberб determinada quantia!\n", "Prуximo", "Fechar");
            }
            else {

                new str[128];

                format (str, 128, "No campo abaixo digite a quantia que vocк deseja transferir para %s (ID:%d)\nCaso este nгo seja o jogador desejado clique em voltar!", Nome(Transferir_ID[playerid]), Transferir_ID[playerid] );
                ShowPlayerDialog(playerid, DIALOG_TRANSFERIR_PEGAR_QUANTIA, DIALOG_STYLE_INPUT, "Tranferкncia", str, "Prуximo", "Voltar");
            }
            return 1;
        }
    }

    if ( dialogid == DIALOG_TRANSFERIR_PEGAR_QUANTIA ) {

        if ( response ) {

            new Quantia = strval(inputtext), str[128];

            if ( Quantia <= 0 ) {

                SendClientMessage(playerid, -1, "Quantia invбlida!");
                format (str, 128, "No campo abaixo digite a quantia que vocк deseja transferir para %s (ID:%d)\nCaso este nгo seja o jogador desejado clique em voltar!", Nome(Transferir_ID[playerid]), Transferir_ID[playerid] );
                ShowPlayerDialog(playerid, DIALOG_TRANSFERIR_PEGAR_QUANTIA, DIALOG_STYLE_INPUT, "Tranferкncia", str, "Prуximo", "Voltar");
                return 1;
            }

            if (Quantia > GetPlayerMoney(playerid) ) {

                SendClientMessage(playerid, -1, "Vocк nгo tem tudo isso!")
                format (str, 128, "No campo abaixo digite a quantia que vocк deseja transferir para %s (ID:%d)\nCaso este nгo seja o jogador desejado clique em voltar!", Nome(Transferir_ID[playerid]), Transferir_ID[playerid] );
                ShowPlayerDialog(playerid, DIALOG_TRANSFERIR_PEGAR_QUANTIA, DIALOG_STYLE_INPUT, "Tranferкncia", str, "Prуximo", "Voltar");
                return 1;
            }

            GivePlayerMoney(playerid, -Quantia);
            GivePlayerMoney(Transferir_ID[playerid], Quantia);
            format(String, sizeof(String), "{00FF00}[BANCO]: {FFFFFF}Vocк transferiu {00FF00}%d${FFFFFF}, para o jogador {00FF00}%s{FFFFFF}.", Quantia, Nome(Transferir_ID[playerid]));
            SendClientMessage(playerid, -1, String);
            format(String, sizeof(String), "{00FF00}[BANCO]: {FFFFFF}O jogador {00FF00}%s {FFFFFF}transferiu {00FF00}%d${FFFFFF}, para vocк.", Nome(playerid), Quantia);
            SendClientMessage(Transferir_ID[playerid], -1, String);

            Transferir_ID[playerid] = -1;

        }
        else
            ShowPlayerDialog(playerid, DIALOG_TRANSFERIR_PEGAR_ID, DIALOG_STYLE_INPUT, "Tranfкrencia", "No campo abaixo digite o ID do jogador que receberб determinada quantia!\n", "Prуximo", "Fechar");

    }
    return 1;
}

public OnPlayerConnect(playerid) {

    Transferir_ID[playerid] = -1;
    return 1;
}
1 postagem basta!
Reply


Messages In This Thread
cmd:transferir para dialogid - by PetterAdriano - 18.01.2014, 01:45
Re: cmd:transferir para dialogid - by PetterAdriano - 18.01.2014, 04:53
Re: cmd:transferir para dialogid - by Gii - 18.01.2014, 05:12

Forum Jump:


Users browsing this thread: 2 Guest(s)