[Ajuda] Leia para entender
#4

Feito.

pawn Код:
#include <a_samp>
#include <sscanf>

#define MAX_CRIADOS 50

new
    CarroID[MAX_CRIADOS],
    CarrosCriados = 0;

CMD:criarcarro(playerid, params[])
{
    new carro, cor1 = -1, cor2 = -1;
    GetPlayerName(playerid, Nome, sizeof(Nome));
    if(sscanf(params, "iii",carro, cor1, cor2)) return SendClientMessage(playerid, -1, "Use: /criarcarro [Modelo] [Cor1] [Cor2]");
    else if(400 < (carro) > 611) return SendClientMessage(playerid, -1, "O modelo tem que ser entre {00E5FF}400 {FFFFFF}e {00E5FF}611");
    else if(CarrosCriados == MAX_CRIADOS) return SendClientMessage(playerid, -1, "Jб foram criados o mбximo de carros permitidos!");
    GetPlayerPos(playerid, X, Y, Z);
    CarrosCriados++;
    CarroID[CarrosCriados] = CreateVehicle(carro, X, Y, Z-1, 0.0, cor1, cor2, 25000);
    PutPlayerInVehicle(playerid, CarroID[CarrosCriados], 0);
    return 1;
}

CMD:destruircarros(playerid)
{
    if(CarrosCriados == 0) return SendClientMessage(playerid, -1, "Nenhum carro foi criado.");
    for(new i = 0; i < MAX_CRIADOS; i++)
    {
        if(IsVehicleConnected(i))
        {
            DestroyVehicle(i);
            CarrosCriados = 0;
        }
    }
    return 1;
}

stock IsVehicleConnected(vehicleid)
{
    new Float:x, Float:y, Float:z;
    GetVehiclePos(vehicleid, x, y, z);
    if(x == 0.0 && y == 0.0 && z == 0.0) return 0;
    return 1;
}
Reply


Messages In This Thread
[Ajuda] Leia para entender - by [NVC]Eduardo - 31.01.2012, 17:14
Re: [Ajuda] Leia para entender - by [Pawno] - 31.01.2012, 17:34
Re: [Ajuda] Leia para entender - by [NVC]Eduardo - 31.01.2012, 17:37
Re: [Ajuda] Leia para entender - by Lуs - 01.02.2012, 12:53
Re: [Ajuda] Leia para entender - by Lуs - 01.02.2012, 12:58
Re: [Ajuda] Leia para entender - by [NVC]Eduardo - 01.02.2012, 12:58
Re: [Ajuda] Leia para entender - by Lуs - 01.02.2012, 13:01

Forum Jump:


Users browsing this thread: 1 Guest(s)