[Ajuda]Biz Casino
#2

Se vocк jб tiver um sistema de bizz, basta criar o cassino com base em uma outra empresa.

Bem, fiz um FS pra resolver o seu problema

pawn Код:
#include "a_samp.inc"

new bool:CassinoAberto;
#define CASSINO_PRECO 2500  //Mude "2500", pelo preзo do cassino


public OnFilterScriptInit()
{
    print("\n***---------------------------------***\n");
    print(" Cassino Empresa - Produtor: [iPs]Ken   \n");
    print("***---------------------------------***\n");
    new Texto3D[45];
    format(Texto3D,45,"\nPreзo: %d, use /comprarcassino !", CASSINO_PRECO);
    CreatePickup(1272, 23, 2019.8138,1007.6473,10.8203, 0);
    Create3DTextLabel(Texto3D, 0x8D8DFFAA, 2019.8138,1007.6473,10.8203, 50, 0);
    Create3DTextLabel("Aperte F para entrar !", 0x8D8DFFAA, 2019.8138,1007.6473,10.8203, 50, 0);
    return 1;
}

public OnPlayerCommandText(playerid, cmdtext[])
{
    if(strcmp("/comprarcassino", cmdtext, true, 15) == 0)
    {
        if(IsPlayerInRangeOfPoint(playerid, 3.0, 2019.8138,1007.6473,10.8203))
        {
            if(GetPlayerMoney(playerid) < CASSINO_PRECO)
            {
                return SendClientMessage(playerid, 0xFFFF00AA, "Vocк nгo tem dinheiro pra comprar o Cassino !");
            }
            GivePlayerMoney(playerid, -CASSINO_PRECO);
            CassinoAberto = true;
            SendClientMessage(playerid, 0xFFFF00AA, "Parabйns :P, vocк comprou o Cassino !");
            return 1;
        }
    }
    return 0;
}

public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
{
    if(newkeys == 16 && IsPlayerInRangeOfPoint(playerid, 3.0, 2019.8138,1007.6473,10.8203))
    {
        if(CassinoAberto) SetPlayerPos(playerid, 2015.4500,1017.0900,996.8750), SetPlayerInterior(playerid, 10);
        else if(!CassinoAberto) return SendClientMessage(playerid, 0xFFFF00AA, "Cassino Trancado !");
    }
    if(newkeys == 16 && IsPlayerInRangeOfPoint(playerid, 3.0, 2015.4500,1017.0900,996.8750))
    {
        SetPlayerPos(playerid, 2019.8138,1007.6473,10.8203), SetPlayerInterior(playerid, 0);
    }
    return 1;
}


public OnFilterScriptExit()
{
    return 1;
}

Espero ter ajudado
Reply


Messages In This Thread
[Ajuda]Biz Casino - by [Dk]TuReTOo - 06.02.2011, 11:21
Re: [Ajuda]Biz Casino - by rjjj - 06.02.2011, 12:07
Re: [Ajuda]Biz Casino - by [Dk]TuReTOo - 06.02.2011, 12:59
Re: [Ajuda]Biz Casino - by rjjj - 06.02.2011, 13:36
Re: [Ajuda]Biz Casino - by [Dk]TuReTOo - 06.02.2011, 14:00
Re: [Ajuda]Biz Casino - by Macintosh - 06.02.2011, 14:04
Re: [Ajuda]Biz Casino - by [Dk]TuReTOo - 06.02.2011, 14:15
Re: [Ajuda]Biz Casino - by Macintosh - 06.02.2011, 15:16
Re: [Ajuda]Biz Casino - by [Dk]TuReTOo - 06.02.2011, 15:31
Re: [Ajuda]Biz Casino - by Macintosh - 06.02.2011, 15:51

Forum Jump:


Users browsing this thread: 2 Guest(s)