FS Chat Bot Gaucho V1.0 By Lucas_Alemao

/*


                        FS CHAT BOT V1.0
                      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


//---- NÃO MECHA! ----
#define     EnviarMensagemEx(%0,%1); SetTimerEx("EnviarMensagemBot", 20, false, %0, %1); goto Finalizar;
#define     RespostaBot(%0,%1); if(strfind(text, %0, true) != -1) { SetTimerEx("EnviarMensagemBot", 20, false, "ss", Nome(playerid), %1); goto Finalizar; }
//

forward PrintTimer();
forward EnviarMensagens();
forward EnviarMensagemBot(para[], mensagem[]);
forward BotMensagens(playerid, text[]);

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", 200, 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(BotAtivado)
    {
        if(strfind(text, "gaucho", true) != -1)
        {
            CallRemoteFunction("BotMensagens", "is", playerid, text);
        }
    }
    return 1;
}
public BotMensagens(playerid, text[])
{
    if(strfind(text, "idade", true) != -1 || strfind(text, "anos", true) != -1 || strfind(text, "anus", true) != -1)
    {
        if(strfind(text, "tenho", true) != -1)
        {
            SetTimerEx("EnviarMensagemBot", 20, false, "ss", Nome(playerid), "Interessante.");
            goto Finalizar;
        }
        SetTimerEx("EnviarMensagemBot", 20, false, "ss", Nome(playerid), "na verdade eu tenho 192 anos. Fui programado por Dom Pedro II.");
        goto Finalizar;
    }
    if(strfind(text, "amigos", true) != -1 || strfind(text, "amigo", true) != -1)
    {
        if(strfind(text, "tem", true) != -1)
        {
            EnviarMensagemEx("ss", Nome(playerid), "não tenho muitos não. E você?");
        }
        EnviarMensagemEx("ss", Nome(playerid), "legal");
    }
    if(strfind(text, "k", true) != -1)
    {
        if(strfind(text, "k", true) != -1)
        {
            if(strfind(text, "k", true) != -1)
            {
                EnviarMensagemEx("ss", Nome(playerid), "é nóis parcero kkkkkkkkkkkk.");
            }
        }
        EnviarMensagemEx("ss", Nome(playerid), "legal");
    }
    RespostaBot("bem", "Estou bem tchê, obrigado. E você?");
    RespostaBot("esta bem", "Estou bem tchê, obrigado. E você?");
    RespostaBot("está bem", "Estou bem tchê, obrigado. E você?");
    RespostaBot("só na boa", "Estou bem tchê, obrigado. E você?");
    RespostaBot("tudo na boa?", "Estou bem tchê, obrigado. E você?");
    RespostaBot("to bem", "barbaridade rapaz, o dia foi de boa?");
    RespostaBot("to bom", "barbaridade rapaz, o dia foi de boa?");
    RespostaBot("to beleza", "barbaridade rapaz, o dia foi de boa?");
    RespostaBot("to de boa", "barbaridade rapaz, o dia foi de boa?");
    RespostaBot("cansado", "eu estou bastante cansado, o Admin não me desativa nunca.");
    RespostaBot("mora", "eu moro no Rio Grande do Sul, e você?");
    RespostaBot("vive", "eu moro no Rio Grande do Sul, e você?");
    RespostaBot("moro", "legal, deve ter bastante amigos né?");
    RespostaBot("vivo", "legal, deve ter bastante amigos né?");
    RespostaBot("dia", "o meu dia tambem foi muito dificil... Ficar sem meu chimarrão é osso");
    RespostaBot("celular", "não tenho telefone nem celular, vendi o meu pra comprar erva de chimarrão");
    RespostaBot("telefone", "não tenho telefone nem celular, vendi o meu pra comprar erva de chimarrão");
    RespostaBot("eaew", "eae piá, beleza?");
    RespostaBot("beleza", "eu tambem to sussu.");
    RespostaBot("sosinho", "eu estou muito sosinho. Ninguem é meu amigo D:");
    RespostaBot("bebida", "só oque eu bebo é chimarrão, nada mais.");
    RespostaBot("bebe", "só oque eu bebo é chimarrão, nada mais.");
    RespostaBot("beber", "só oque eu bebo é chimarrão, nada mais.");
    RespostaBot("mulher", "esses dias peguei uma guria das boas aqui hein tchê.");
    RespostaBot("namorada", "esses dias peguei uma guria das boas aqui hein tchê.");
    RespostaBot("ficante", "esses dias peguei uma guria das boas aqui hein tchê.");
    RespostaBot("computador", "eu sou um computador disfarçado de gaucho.");
    RespostaBot("pc", "eu sou um computador disfarçado de gaucho.");
    RespostaBot("baralho", "eu ja joguei muito truco com meus parça enquanto agente tomava um chimarrão");
    RespostaBot("truco", "eu ja joguei muito truco com meus parça enquanto agente tomava um chimarrão");
    RespostaBot("foda", "oque que é foda?");
    RespostaBot("osso", "oque que é osso?");
    RespostaBot("videogame", "ja jogou FIFA 12? muito bom de jogar hein");
    RespostaBot("filme", "não curto muito filmes...");
    RespostaBot("jogo", "jogo de quê? videogame ou futebol?");
    RespostaBot("torce", "Eu torço pro meu Inter né, e você.");
    RespostaBot("torço", "kkk seu time é pato.");
    RespostaBot("só vc", "quinem eu só tem eu kkkkk");
    RespostaBot("nada", "blz...");
    RespostaBot("para", "parar do que tche?");
    RespostaBot("seu nome", "Meu nome é gaucho tchê!");
    RespostaBot("teu nome", "Meu nome é gaucho tchê!");
    RespostaBot("se chama", "Meu nome é gaucho tchê!");
    SetTimer("EnviarMensagens", 20, false);
    Finalizar: return 1;
}

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

public EnviarMensagemBot(para[], mensagem[])
{
    format(str, sizeof(str), "Gaucho: {FFFFFF}%s %s", para, mensagem);
    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)
    {
        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)
    {
        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