Zinglish

//
// Lotto FS
// By: Zinglish
// 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; // Only a maximum of $3,000,000
}

// When the player is given cash, it displays how much he is given
new Text:DrawcashAmount[MAX_PLAYERS];
new GivePlayerCashRemoveTimer[MAX_PLAYERS];
stock GivePlayerCash(playerid, cashAmount)
{
    GivePlayerMoney(playerid, cashAmount);
    new cashAmountString[56];
    format(cashAmountString, sizeof(cashAmountString), "+$%i", cashAmount);
    TextDrawSetString(DrawcashAmount[playerid], cashAmountString);
    KillTimer(GivePlayerCashRemoveTimer[playerid]);
    GivePlayerCashRemoveTimer[playerid] = SetTimer("GivePlayerCashRemove", 5000, 0);
}
stock TakePlayerCash(playerid, cashAmount)
{
    GivePlayerMoney(playerid, -cashAmount);
    new cashAmountString[56];
    format(cashAmountString, sizeof(cashAmountString), "-$%i", cashAmount);
    TextDrawSetString(DrawcashAmount[playerid], cashAmountString);
    KillTimer(GivePlayerCashRemoveTimer[playerid]);
    GivePlayerCashRemoveTimer[playerid] = SetTimerEx("GivePlayerCashRemove", 5000, 0, "i", playerid);
}
forward GivePlayerCashRemove(playerid);
public GivePlayerCashRemove(playerid)
{
    TextDrawSetString(DrawcashAmount[playerid], " ");
    KillTimer(GivePlayerCashRemoveTimer[playerid]);
}

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

// Lotto variables
new hasPlayedLotto[MAX_PLAYERS]; // Stores whether player has played lotto or not
new pLottoNumber[MAX_PLAYERS]; // Stores the player's lotto number he has chosen
new lottoWinner; // Stores the player who won
new lottoCashAmount; // Stores the lotto pot amount cash
new lottoCashAmountIncrease;
new chosenLottoNumber[MAX_PLAYERS];
new Text:lottoDrawText; // Text draw
new lottoDestroy;
new Menu:lottoBacking;

// Lotto function (runLotto();)
runLotto()
{
    new stringLotto[512], stringClientMessage[256]; // Text draw text
    new lottoNumber = random(50); // Random lotto number

    // loop for every player's lotto number entry
    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) // If there is a winner
    {
        format(stringLotto, sizeof(stringLotto), "~w~Lotto Draw~n~~n~Lotto: ~g~$%i      ~w~Winning number: ~b~%i~n~~n~~w~Winner: ~r~%s", lottoCashAmount, lottoNumber, PlayerName(lottoWinner));
        format(stringClientMessage, sizeof(stringClientMessage), "%s has won $%i from the lotto", PlayerName(lottoWinner), lottoCashAmount);

        GivePlayerCash(lottoWinner, lottoCashAmount);
        SendClientMessageToAll(COLOR_GREEN, stringClientMessage);
        lottoCashAmount = RandomLottoCash();
        lottoWinner = -1;
    }
    if(lottoWinner == -1) // If lottoWinner = -1 (No winner)
    {
        format(stringLotto, sizeof(stringLotto), "~w~Lotto Draw~n~~n~Lotto: ~g~$%i      ~w~Winning number: ~b~%i~n~~w~No winners", lottoCashAmount, lottoNumber);
        lottoCashAmount = lottoCashAmount + lottoCashAmountIncrease;
    }

    TextDrawSetString(lottoDrawText, stringLotto);
    TextDrawShowForAll(lottoDrawText);

    // Timer to make lotto dissapear after 20 seconds
    KillTimer(lottoDestroy);
    lottoDestroy = SetTimer("lottoDrawHide", 20000, 0);
}

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

public OnFilterScriptInit()
{
    print("\n******************************\n");
    print("**Zinglish's lotto FS loaded**\n");
    print("******************************\n");
    return 1;
}

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

    // Draw text arrangements and draws
    lottoDrawText = TextDrawCreate(350, 390, " ");
    TextDrawAlignment(lottoDrawText, 2);
    TextDrawUseBox(lottoDrawText, 0);
    TextDrawBoxColor(lottoDrawText, 0x84848455);
    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", 1440000, 1);
}

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

    HideMenuForPlayer(lottoBacking, playerid);
}

public OnPlayerCommandText(playerid, cmdtext[])
{
    dcmd(lotto,5,cmdtext);

    if(strcmp(cmdtext, "/drawlotto") == 0)
    {
        //if(IsPlayerAdmin(playerid))
        //{
            runLotto();

            return 1;
        //}
        //else
        //{
            //return 0;
        //}
    }
    return 0;
}

/**************************************************************
******************** COMMANDS *********************************
***************************************************************/
// Player chooses lotto number
dcmd_lotto(playerid, params[])
{
    new ValidNumber = 1;
    if(sscanf(params, "i", chosenLottoNumber[playerid]))
    {
        SendClientMessage(playerid, COLOR_RED, "Usage: /lotto [number 1-50]");
        SendClientMessage(playerid, COLOR_RED, "The lotto costs $200");
    }
    else if(chosenLottoNumber[playerid] < 1 || chosenLottoNumber[playerid] > 50)
    {
        SendClientMessage(playerid, COLOR_RED, "Number must be between 1 and 50");
    }
    else if(hasPlayedLotto[playerid] == 0)
    {
        if(GetPlayerMoney(playerid) < 200)
        {
            SendClientMessage(playerid, COLOR_RED, "You do not have the $200 to pay for the lotto ticket");
        }
        if(GetPlayerMoney(playerid) > 200)
        {
            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), "You have played the lotto with number %i on you ticket", chosenLottoNumber[playerid]);
                SendClientMessage(playerid, COLOR_YELLOW, string);
                TakePlayerCash(playerid, 200);
                hasPlayedLotto[playerid] = 1;
                pLottoNumber[playerid] = chosenLottoNumber[playerid];
            }
            if(ValidNumber == 0)
            {
                SendClientMessage(playerid, COLOR_YELLOW, "Number has already been chosen");
            }
        }
    }
    else if(hasPlayedLotto[playerid] == 1)
    {
        SendClientMessage(playerid, COLOR_YELLOW, "You have already played the lotto");
    }

    return 1;
}



// Draw lotto from function
forward lottoDrawCreate(playerid);
public lottoDrawCreate(playerid)
{
    runLotto();
}
// Remove the lotto draw and reset timers
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;
}