Dice system by Nautica

/*
 *      Copyright © 2013-2013
 *      aDice (v1.0.0) Nautica
 *
 *      This filterscript scripting by Nautica, please don't remove credits!
 *      This filterscript post In SA-MP froum in: 2/2/2013.
*/

#include "a_samp.inc"
#include "rCmd.inc"

#define MAX_START (50)
#define MAX_STRING (128)
#define COLOR_WHITE 0xFFFFFFFF
#define COLOR_RED 0xFF0000FF
#define COLOR_GREEN 0x40FF00FF

rCmd["uiI"]->dice(playerid,success,&number,&amount)
{
    new string[MAX_STRING];
    if(!success) return SendClientMessage(playerid,COLOR_WHITE,"<Error!> /dice [Number] [Amount]");
    new Money = GetPlayerMoney(playerid);
    if(Money < MAX_START)
    {
        format(string,sizeof(string),"<Error!> You are don't have %d$ for start dice!",MAX_START);
        return SendClientMessage(playerid,COLOR_WHITE,string);
    }
    if(number < 1 || number > 6) return SendClientMessage(playerid,COLOR_WHITE,"<Error!> This dice number can be 1 to 6");
    if(Money < amount) return SendClientMessage(playerid,COLOR_WHITE,"<Error!> You are don't have the money for this bet!");
    GivePlayerMoney(playerid,-amount),GivePlayerMoney(playerid,-MAX_START);
    new NumbersDice[][] = {{1},{2},{3},{4},{5},{6}},RandomDice = random(sizeof(NumbersDice)),WinDice = NumbersDice[RandomDice][0];
    if(WinDice != number) return SendClientMessage(playerid,COLOR_RED,"[aDice]: Sorry, you are not win :(");
    else if(WinDice == number) return SendClientMessage(playerid,COLOR_GREEN,"[aDice]: Good, you are win :)");
    return 1;
}