Loteria System: By: Zinglish - Trdução & Edição: [NWD]Tweener_

// Lotto FS
// By: Zinglish
// Trdução & Edição: [NWD]Tweener_
// Edit to your liking, no need to give credit btw
// Only if wanted


#include <a_samp>
#define dcmd(%1,%2,%3) if (!strcmp((%3)[1], #%1, true, (%2)) && ((((%3)[(%2) + 1] == '\0') && (dcmd_%1(playerid, ""))) || (((%3)[(%2) + 1] == ' ') && (dcmd_%1(playerid, (%3)[(%2) + 2]))))) return 1

// Colors
#define COLOR_GREY 0x84848455
#define COLOR_WHITE 0xFFFFFFFF
#define COLOR_RED 0xE21F1FFF
#define COLOR_TURQUOISE 0x84FFFFFF
#define COLOR_YELLOW 0xFDFF3DFF
#define COLOR_GREEN 0x62FF32FF

// Functions

stock RandomLottoCash()
{
    return random(30) * 100000;
}


stock PlayerName(playerid)
{
    new name[255];
    GetPlayerName(playerid, name, 255);
    return name;
}

// Lotto variables
new hasPlayedLotto[MAX_PLAYERS];
new pLottoNumber[MAX_PLAYERS];
new lottoWinner;
new lottoCashAmount;
new lottoCashAmountIncrease;
new chosenLottoNumber[MAX_PLAYERS];
new Text:lottoDrawText;
new lottoDestroy;
new Menu:lottoBacking;

runLotto()
{
    new stringLotto[512], stringClientMessage[256];
    new lottoNumber = random(100);

    for (new i=0; i<MAX_PLAYERS; i++)
    {
        if (hasPlayedLotto[i] == 1)
        {
            if(chosenLottoNumber[i] == lottoNumber)
            {
                lottoWinner = i;
            }
            hasPlayedLotto[i] = 0;
            pLottoNumber[i] = 0;
        }
        ShowMenuForPlayer(lottoBacking, i);
    }

    if(lottoWinner >= 0) //Se houver um Ganhador
    {
        format(stringLotto, sizeof(stringLotto), "~w~Loteria~n~~n~Premio: ~g~$%i        ~w~Numero Sorteado: ~b~%i~n~~n~~w~Ganhador: ~r~%s", lottoCashAmount, lottoNumber, PlayerName(lottoWinner));
        format(stringClientMessage, sizeof(stringClientMessage), "| Loteria | %s ganhou $%i com a loteria.Jogue você também! /Loto", PlayerName(lottoWinner), lottoCashAmount);
        GivePlayerMoney(lottoWinner, lottoCashAmount);
        SendClientMessageToAll(COLOR_GREEN, stringClientMessage);
        lottoCashAmount = RandomLottoCash();
        lottoWinner = -1;
    }
    else if(lottoWinner == -1) // Sem ganhadores
    {
        format(stringLotto, sizeof(stringLotto), "~w~Loteria~n~~n~Premio: ~g~$%i        ~w~Numero Sorteado: ~b~%i~n~~w~Nenhum Ganhador", lottoCashAmount, lottoNumber);
        SendClientMessageToAll(COLOR_GREEN, "| Loteria | Seja um ganhador! Jogue na loteria! /Loto" );
        lottoCashAmount = lottoCashAmount + lottoCashAmountIncrease;
    }

    TextDrawSetString(lottoDrawText, stringLotto);
    TextDrawShowForAll(lottoDrawText);
    KillTimer(lottoDestroy);
    lottoDestroy = SetTimer("lottoDrawHide", 8000, 0);
}

//------------------------------------------------

public OnFilterScriptInit()
{
    print("\n*************************************\n");
    print("**      Criação: Zinglish         ***\n");
    print("**Trdução & Edição: [NWD]Tweener_ ***\n");
    print("*************************************\n");
    return 1;
}

public OnGameModeInit()
{
    lottoWinner = -1;
    lottoCashAmount = RandomLottoCash();

    lottoDrawText = TextDrawCreate(350, 390, " ");
    TextDrawAlignment(lottoDrawText, 2);
    TextDrawSetShadow(lottoDrawText, 0);
    TextDrawSetOutline(lottoDrawText, 1);
    TextDrawFont(lottoDrawText, 1);
    TextDrawLetterSize(lottoDrawText, 0.4, 0.8);
    TextDrawHideForAll(lottoDrawText);

    lottoBacking = CreateMenu(" ", 1, 200, 380, 280);

    // Timers
    SetTimer("lottoDrawCreate", 3600000, 1);
}

public OnPlayerConnect(playerid)
{
    hasPlayedLotto[playerid] = 0;
    pLottoNumber[playerid] = 0;

    HideMenuForPlayer(lottoBacking, playerid);
    return 1;
}

public OnPlayerCommandText(playerid, cmdtext[])
{
    dcmd(loto,4,cmdtext);

    if(strcmp(cmdtext, "/sortear") == 0)
    {
        if(IsPlayerAdmin(playerid))
        {
            runLotto();
            return 1;
        }
        else
        {
            return 0;
        }
    }
    return 0;
}
dcmd_loto(playerid, params[])
{
    new ValidNumber = 1;
    if(sscanf(params, "i", chosenLottoNumber[playerid]))
    {
        SendClientMessage(playerid, COLOR_RED, "[ERRO] /loto [numero 1-50]");
        SendClientMessage(playerid, COLOR_RED, "[ERRO] O Número custa: $900");
    }
    else if(chosenLottoNumber[playerid] < 1 || chosenLottoNumber[playerid] > 100)
    {
        SendClientMessage(playerid, COLOR_RED, "[ERRO] Número deve estar entre 0 e 100");
    }
    else if(hasPlayedLotto[playerid] == 0)
    {
        if(GetPlayerMoney(playerid) < 899)
        {
            SendClientMessage(playerid, COLOR_RED, "[ERRO] Você não tem $900 para comprar o Número");
        }
        if(GetPlayerMoney(playerid) > 899)
        {
            for(new i; i < MAX_PLAYERS; i++)
            {
                if(pLottoNumber[playerid] == pLottoNumber[i] && pLottoNumber[playerid] != pLottoNumber[playerid])
                {
                    ValidNumber = 0;
                }
            }
            if(ValidNumber == 1)
            {
                new string[256];
                format(string, sizeof(string), "[INFO] Você jogou na loteria com o numero: %i ", chosenLottoNumber[playerid]);
                SendClientMessage(playerid, COLOR_YELLOW, string);
                GivePlayerMoney(playerid, -900);
                hasPlayedLotto[playerid] = 1;
                pLottoNumber[playerid] = chosenLottoNumber[playerid];
            }
            if(ValidNumber == 0)
            {
                SendClientMessage(playerid, COLOR_RED, "[ERRO] Esse número já foi escolhido!");
            }
        }
    }
    else if(hasPlayedLotto[playerid] == 1)
    {
        SendClientMessage(playerid, COLOR_RED, "[ERRO] Você já está jogando na Loteria!");
    }

    return 1;
}

forward lottoDrawCreate(playerid);
public lottoDrawCreate(playerid)
{
    runLotto();
}

forward lottoDrawHide(playerid);
public lottoDrawHide(playerid)
{
    TextDrawHideForAll(lottoDrawText);
    for(new i; i < MAX_PLAYERS; i++)
    {
        HideMenuForPlayer(lottoBacking, i);
    }
    KillTimer(lottoDestroy);
}
stock sscanf(string[], format[], {Float,_}:...)
{
    #if defined isnull
        if (isnull(string))
    #else
        if (string[0] == 0 || (string[0] == 1 && string[1] == 0))
    #endif
        {
            return format[0];
        }
    #pragma tabsize 4
    new
        formatPos = 0,
        stringPos = 0,
        paramPos = 2,
        paramCount = numargs(),
        delim = ' ';
    while (string[stringPos] && string[stringPos] <= ' ')
    {
        stringPos++;
    }
    while (paramPos < paramCount && string[stringPos])
    {
        switch (format[formatPos++])
        {
            case '\0':
            {
                return 0;
            }
            case 'i', 'd':
            {
                new
                    neg = 1,
                    num = 0,
                    ch = string[stringPos];
                if (ch == '-')
                {
                    neg = -1;
                    ch = string[++stringPos];
                }
                do
                {
                    stringPos++;
                    if ('0' <= ch <= '9')
                    {
                        num = (num * 10) + (ch - '0');
                    }
                    else
                    {
                        return -1;
                    }
                }
                while ((ch = string[stringPos]) > ' ' && ch != delim);
                setarg(paramPos, 0, num * neg);
            }
            case 'h', 'x':
            {
                new
                    ch,
                    num = 0;
                while ((ch = string[stringPos]) > ' ' && ch != delim)
                {
                    switch (ch)
                    {
                        case 'x', 'X':
                        {
                            num = 0;
                            continue;
                        }
                        case '0' .. '9':
                        {
                            num = (num << 4) | (ch - '0');
                        }
                        case 'a' .. 'f':
                        {
                            num = (num << 4) | (ch - ('a' - 10));
                        }
                        case 'A' .. 'F':
                        {
                            num = (num << 4) | (ch - ('A' - 10));
                        }
                        default:
                        {
                            return -1;
                        }
                    }
                }
                setarg(paramPos, 0, num);
            }
            case 'c':
            {
                setarg(paramPos, 0, string[stringPos++]);
            }
            case 'f':
            {
                setarg(paramPos, 0, _:floatstr(string[stringPos]));
            }
            case 'p':
            {
                delim = format[formatPos++];
                continue;
            }
            case '\'':
            {
                new
                    end = formatPos - 1,
                    ch;
                while ((ch = format[++end]) && ch != '\'') {}
                if (!ch)
                {
                    return -1;
                }
                format[end] = '\0';
                if ((ch = strfind(string, format[formatPos], false, stringPos)) == -1)
                {
                    if (format[end + 1])
                    {
                        return -1;
                    }
                    return 0;
                }
                format[end] = '\'';
                stringPos = ch + (end - formatPos);
                formatPos = end + 1;
            }
            case 'u':
            {
                new
                    end = stringPos - 1,
                    id = 0,
                    bool:num = true,
                    ch;
                while ((ch = string[++end]) && ch != delim)
                {
                    if (num)
                    {
                        if ('0' <= ch <= '9')
                        {
                            id = (id * 10) + (ch - '0');
                        }
                        else
                        {
                            num = false;
                        }
                    }
                }
                if (num && IsPlayerConnected(id))
                {
                    setarg(paramPos, 0, id);
                }
                else
                {
                    #if !defined foreach
                        #define foreach(%1,%2) for (new %2 = 0; %2 < MAX_PLAYERS; %2++) if (IsPlayerConnected(%2))
                        #define __SSCANF_FOREACH__
                    #endif
                    string[end] = '\0';
                    num = false;
                    new
                        name[MAX_PLAYER_NAME];
                    id = end - stringPos;
                    foreach (Player, playerid)
                    {
                        GetPlayerName(playerid, name, sizeof (name));
                        if (!strcmp(name, string[stringPos], true, id))
                        {
                            setarg(paramPos, 0, playerid);
                            num = true;
                            break;
                        }
                    }
                    if (!num)
                    {
                        setarg(paramPos, 0, INVALID_PLAYER_ID);
                    }
                    string[end] = ch;
                    #if defined __SSCANF_FOREACH__
                        #undef foreach
                        #undef __SSCANF_FOREACH__
                    #endif
                }
                stringPos = end;
            }
            case 's', 'z':
            {
                new
                    i = 0,
                    ch;
                if (format[formatPos])
                {
                    while ((ch = string[stringPos++]) && ch != delim)
                    {
                        setarg(paramPos, i++, ch);
                    }
                    if (!i)
                    {
                        return -1;
                    }
                }
                else
                {
                    while ((ch = string[stringPos++]))
                    {
                        setarg(paramPos, i++, ch);
                    }
                }
                stringPos--;
                setarg(paramPos, i, '\0');
            }
            default:
            {
                continue;
            }
        }
        while (string[stringPos] && string[stringPos] != delim && string[stringPos] > ' ')
        {
            stringPos++;
        }
        while (string[stringPos] && (string[stringPos] == delim || string[stringPos] <= ' '))
        {
            stringPos++;
        }
        paramPos++;
    }
    do
    {
        if ((delim = format[formatPos++]) > ' ')
        {
            if (delim == '\'')
            {
                while ((delim = format[formatPos++]) && delim != '\'') {}
            }
            else if (delim != 'z')
            {
                return delim;
            }
        }
    }
    while (delim > ' ');
    return 0;
}