[FilterScript] [FS] Sistema de bingo
#1

Oiiieee *----*
hoje venho postar mais um projeto.
ele й muito simples.

Info:
Vocк compra bilhete depois de um certo tempo ele calcula quem ganhou.
se houver mais de um ganhador o premio й automaticamente dividido.


Crйditos:
- [O.z]Caroline
- [KoS]Shickcard

Download
pawn Код:
#include <a_samp>

#define Time                                15    // defina aqui o tempo em minutos para ocorrer o sorteio '-'
#define DINHEIRO_GANHA                      1000  // dinheiro para quem acertar o nъmero.

new Bilhete[MAX_PLAYERS], string[128];

forward Sortear();

public OnFilterScriptInit()
{
    print("###################################");
    print("#- Sistema de sorteio por:");
    print("#- [O.z]Caroline & [KoS]ShickCard");
    print("###################################");
    return 1;
}


public OnPlayerConnect(playerid)
{
    Bilhete[playerid] = 0;
    return 1;
}

public OnPlayerCommandText(playerid, cmdtext[])
{

    new cmd[128], idx;
    cmd = strtok(cmdtext, idx);
   
    if(!strcmp(cmd, "/ComprarBilhete", true))
    {
        if(Bilhete[playerid] != 0)
            return SendClientMessage(playerid, -1,"Vocк jб tem bilhete!");
           
        new tmp[128];
        tmp = strtok(cmdtext, idx);
        if(strlen(tmp) == 0)
            return SendClientMessage(playerid, 0xFFFFFFFF, "USAGE: /ComprarBilhete [nъmero1]");
           
        if(1 > strlen(tmp) || strlen(tmp) > 60)
            return SendClientMessage(playerid, 0xFF0000AA, "Nъmeros entre 1 e 60!");
           
        Bilhete[playerid] = strval(tmp);
        format(string, sizeof(string),"Vocк comprou o nЄ bilhete %d", strval(tmp));
        SendClientMessage(playerid, -1, string);
        return 1;
    }
    return 0;
}

public Sortear()
{
    new rand = random(60);
    new ganhadores = 0;
    for(new i; i < MAX_PLAYERS; i++)
    {
        if(IsPlayerConnected(i))
        {
            if(Bilhete[i] == rand)
            {
                GivePlayerMoney(i, DINHEIRO_GANHA / ganhadores );
                ganhadores++;
            }
        }
    }
    format(string, sizeof(string),"Teve %d Ganhadores, nъmero sorteado: %d, cada um ganhou %d", ganhadores, rand, DINHEIRO_GANHA / ganhadores);
    SendClientMessageToAll(-1, string);
    return 1;
}


strtok(const strrr[], &index)
{
    new length = strlen(strrr);
    while ((index < length) && (strrr[index] <= ' '))
    {
        index++;
    }

    new offset = index;
    new result[20];
    while ((index < length) && (strrr[index] > ' ') && ((index - offset) < (sizeof(result) - 1)))
    {
        result[index - offset] = strrr[index];
        index++;
    }
    result[index - offset] = EOS;
    return result;
}
Reply


Messages In This Thread
[FS] Sistema de bingo - by [O.z]Caroline - 24.09.2011, 05:34
Re: [FS] Sistema de bingo - by WLSF - 24.09.2011, 05:52
Re: [FS] Sistema de bingo - by Y_Baby - 24.09.2011, 12:36
Re: [FS] Sistema de bingo - by CyNiC - 24.09.2011, 12:38
Re: [FS] Sistema de bingo - by Juninho_Oakley - 24.09.2011, 13:29
Re: [FS] Sistema de bingo - by Leeo_Perez - 24.09.2011, 13:47
Re: [FS] Sistema de bingo - by Bruno Pereira - 24.09.2011, 13:50
Re: [FS] Sistema de bingo - by BrunoBSF - 24.09.2011, 14:50
Re: [FS] Sistema de bingo - by Kuddy - 24.09.2011, 14:52
Re: [FS] Sistema de bingo - by JonathanFeitosa - 24.09.2011, 15:43
Re: [FS] Sistema de bingo - by Falcon. - 24.09.2011, 15:58
Re: [FS] Sistema de bingo - by Cristhian - 24.09.2011, 16:18
Re: [FS] Sistema de bingo - by Macintosh - 24.09.2011, 16:19
Re: [FS] Sistema de bingo - by [NWD]Jim._.Carrey - 24.09.2011, 17:36
Re: [FS] Sistema de bingo - by StrondA_ - 24.09.2011, 17:45
Re: [FS] Sistema de bingo - by [O.z]Caroline - 24.09.2011, 18:21
Re: [FS] Sistema de bingo - by Kuddy - 24.09.2011, 20:44
Re: [FS] Sistema de bingo - by Laercio - 18.10.2011, 01:38
Re: [FS] Sistema de bingo - by Chefгo - 18.10.2011, 08:16
Re: [FS] Sistema de bingo - by shadauer - 18.10.2011, 11:09
Re: [FS] Sistema de bingo - by Kuddy - 19.10.2011, 22:39
Re: [FS] Sistema de bingo - by Josma_cmd - 19.10.2011, 22:55
Re: [FS] Sistema de bingo - by Pharrel - 20.10.2011, 00:01

Forum Jump:


Users browsing this thread: 1 Guest(s)