FS Chat Bot Gaucho V0.1b By Lucas_Alemao

/*


                        FS CHAT BOT
                      BY LUCAS_ALEMAO

                  NÃO RETIRE OS CRÉDITOS


*/

#include a_samp

#define     USAR_ZCMD       1           //MUDE PARA 0 CASO NÃO QUEIRA USA ZCMD

#if USAR_ZCMD 1
    #include zcmd
#endif

#define     COR_BOT         0xF97804FF //LARANJADO              DEFINA A COR DO NICK DO SEU BOT

forward PrintTimer();
forward EnviarMensagens();

new bool:BotAtivado;
new str[256];

new MensagensBot[42][256] = {
"Barbaridade Rapaz, como este server está bonito Tche!",
"Ara tche, estou doido para tomar um chimarrão.",
"nossa guri, você é muito ruim no X1",
"Duvido alguem me ganhar no X1 piás.",
"Barbaridade guri, eu queria muito poder sair e tomar uns chimarrão",
"Quem torce para o internacional ae tchê?",
"Quem torce para o Grêmio aqui?",
"Não sei porque fazer tantas piadas de gaucho por aí.",
"Ara tche, está um dia quente! vá la fora dar uma volta.",
"Quanto tempo que o Admin não me desativa. Já estou cansado de tanto falar.",
"Queria mandar um abraço pro meu criador, Lucas Alemao.",
"Vocês preferem chimarrão ou tererê?",
"Oque cai em pé e corre deitado? kkkkk duvido quem acerta.",
"Barbaridade rapaziada, estou cansado de ficar aqui atoa.",
"Quem assiste UFC aí guris?",
"Estou doido para conversar com alguem.",
"Alguem converse comigo!!!",
"Acho que sou um forever alone tche",
"Quem gosta de memes ae Tchê?",
"Hoje vamo assistir nosso Internacional bagaçar.",
"Esse ano o Inter será campeão brasileiro.",
"Cadê as mulher desse servidor?",
"Ó meu Deus não acredito que um ser humano tenha dito isso.",
"Hoje é meu aniversário!",
"Quem aí é meu Fan?",
"As mina pira nos gaucho piranha.",
"Aqui no Rio Grande do Sul tem muito pernilongo.",
"Estou ouvindo um sertanejo universitário, e vocês?",
"Quem sabe jogar truco? podíamos marcar uma partida.",
"Quem gosta da cachaça pode aproveitar, que hoje a festa é Open Bar...",
"Barbaridade Tchê, estou sem nada pra fazer.",
"Quem assiste Formula 1 aí?",
"Conhecem a piada do não nem eu?",
"O fim de semana não chega nunca tchê!",
"Quando é que agente vai pra balada?",
"Quando vamos marcar de bater um papo tomando um chimarrão?",
"Legal conversar com vocês galera.",
"Quem ja ouviu Sou Foda?",
"Ontem tomei 4,7 litros de chimarrão",
"De todos os meus amigos, só eu torço pro Internacional",
"Espero que Amanha o dia seja melhor",
"Oração de um gaucho: Senhor, que o preço da erva de chimarrão abaixe. Amém."
};


stock Nome(playerid)
{
    new pnome[24];
    GetPlayerName(playerid, pnome, 24);
    return pnome;
}

public OnFilterScriptInit()
{
    SetTimer("PrintTimer", 500, false);
    BotAtivado = false;
    return 1;
}

public PrintTimer()
{
    print("\n\n---------------------------------\n");
    print("       CHAT BOT 'GAUCHO'       ");
    print("        BY: LUCAS_ALEMAO       ");
    print("     carregado com sucesso");
    print("\n---------------------------------\n\n");
    return 1;
}

public OnPlayerText(playerid, text[])
{
    if(strfind(text, "gaucho", true) != -1)
    {
        if(BotAtivado)
        {
            SetTimer("EnviarMensagens", 20, false);
        }
    }
    return 1;
}

public EnviarMensagens()
{
    new MsgBots = random(sizeof(MensagensBot));
    format(str, sizeof(str), "Gaucho: {FFFFFF}%s", MensagensBot[MsgBots]);
    SendClientMessageToAll(COR_BOT, str);
    return 1;
}

#if USAR_ZCMD 0
    public OnPlayerCommandText(playerid, cmdtext[])
    {
        if(strcmp(cmdtext, "/ativargaucho", true) == 0)
        {
            if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, -1, "Você precisa logar na Rcon para usar este comando");
            BotAtivado = true;
            SendClientMessage(playerid, 0xFFAA0596, "Bot Gaucho Ativado Com Sucesso");
            format(str, sizeof(str), "O Admin %s Ativou o bot 'Gaucho'", Nome(playerid));
            SendClientMessageToAll(0xAA459196, str);
            return 1;
        }
        if(strcmp(cmdtext, "/desativargaucho", true) == 0)
        {
            if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, -1, "Você precisa logar na Rcon para usar este comando");
            BotAtivado = false;
            SendClientMessage(playerid, 0xFFAA0596, "Bot Gaucho Desativado Com Sucesso");
            format(str, sizeof(str), "O Admin %s Desativou o bot 'Gaucho'", Nome(playerid));
            SendClientMessageToAll(0xAA459196, str);
            return 1;
        }
        return 0;
    }
#endif
#if USAR_ZCMD 1
    CMD:ativargaucho(playerid, params[])
    {
        if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, -1, "Você precisa logar na Rcon para usar este comando");
        BotAtivado = true;
        SendClientMessage(playerid, 0xFFAA0596, "Bot Gaucho Ativado Com Sucesso");
        format(str, sizeof(str), "O Admin %s Ativou o bot 'Gaucho'", Nome(playerid));
        SendClientMessageToAll(0xAA459196, str);
        return 1;
    }
    CMD:desativargaucho(playerid, params[])
    {
        if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, -1, "Você precisa logar na Rcon para usar este comando");
        BotAtivado = false;
        SendClientMessage(playerid, 0xFFAA0596, "Bot Gaucho Desativado Com Sucesso");
        format(str, sizeof(str), "O Admin %s Desativou o bot 'Gaucho'", Nome(playerid));
        SendClientMessageToAll(0xAA459196, str);
        return 1;
    }
#endif