SA-MP Forums Archive
[Ajuda] [Profissгo] Carregamento - Printable Version

+- SA-MP Forums Archive (https://sampforum.blast.hk)
+-- Forum: Non-English (https://sampforum.blast.hk/forumdisplay.php?fid=9)
+--- Forum: Languages (https://sampforum.blast.hk/forumdisplay.php?fid=33)
+---- Forum: Português/Portuguese (https://sampforum.blast.hk/forumdisplay.php?fid=34)
+---- Thread: [Ajuda] [Profissгo] Carregamento (/showthread.php?tid=406607)

Pages: 1 2

[Profissгo] Carregamento - WotusPower - 10.01.2013

Olб Pessoal do forum SA-MP.
Estou com uma duvida que to quebrando a cabeзa a dias...
Seguinte:
* O Player pega o caminhгo de minerio, e ja vai diretamente ao ponto de descarga.
* Ao chegar la o player digita /descarregarm, e ele fica digitando[floodando] o comando, fazendo com que ele ganhe sempre 2000 a cada digitada.
* Estou atras do comando /carregarm, ao qual tem a funзгo de ao digitar em uma coordenada, crie um checkpoint no local da descarga. E Quando o player chegar la, ele checa se o player digitou o comando no local certo.
Caso contrario ele manda uma mensagem [ sendClientMessage ] Ao player dizendo que ele nгo carregou o caminhao
EU JA TENTEI UMAS COISAS, MAS NADA FUNCIONOU.
/CARREGARM [ELE SУ DIZ QUE CARREGOU E MAIS NADA]
pawn Код:
if(strcmp(cmd,"/carregarm", true) == 0)
{
    if(GetVehicleModel(GetPlayerVehicleID(playerid)) != 515 && GetVehicleModel(GetPlayerVehicleID(playerid)) != 450) return SendClientMessage(playerid, 0xFF0000, "Vocк nгo estб em um veнculo adequado!");
    if(IsPlayerInRangeOfPoint(playerid, 5.0,2632.691650,850.259277,6.093750))
    {
        SendClientMessage(playerid, -1, "Carregado com sucesso!");
        SetPVarInt(playerid, "CarregouMinerio", 1);
    }
    else
    {
        SendClientMessage(playerid, -1, "Vocк nao esta no CheckPoint!");
    }
    return 1;
}
/DESCARREGARM
pawn Код:
if(strcmp(cmd,"/descarregarm", true) == 0)
{
   if(GetVehicleModel(GetPlayerVehicleID(playerid)) != 515 && GetVehicleModel(GetPlayerVehicleID(playerid)) != 450) return SendClientMessage(playerid, 0xFF0000, "Vocк nгo estб em um veнculo adequado!");
    if(IsPlayerInRangeOfPoint(playerid, 5.0,2632.691650,850.259277,6.093750))
    {
    if(GetPVarInt(playerid, "CarregouMinerio") == 1)
{
     // Carregado
}
else
{
     // Nгo carregou
     SendClientMessage(playerid, -1, "Vocк nгo carregou os minйrios, logo nгo poderб descarregar.");
}
        GivePlayerGrana(playerid, 2000);
        SendClientMessage(playerid, -1, "Descarregado com sucesso! + 2000");
    }
    else
    {
        SendClientMessage(playerid, -1, "Vocк nao esta no CheckPoint!");
    }
    return 1;
}
NO AGUARDO!!

Re: [Profissгo] Carregamento [AJUDA] - Maklister - 10.01.2013

Descarregar

pawn Код:
if(strcmp(cmd,"/descarregarm", true) == 0)
{
    if(GetVehicleModel(GetPlayerVehicleID(playerid)) != 515 && GetVehicleModel(GetPlayerVehicleID(playerid)) != 450) return SendClientMessage(playerid, 0xFF0000, "Vocк nгo estб em um veнculo adequado!");
    if(IsPlayerInRangeOfPoint(playerid, 5.0,2632.691650,850.259277,6.093750))
    {
        if(GetPVarInt(playerid, "CarregouMinerio") == 1)
        {
            SetPVarInt(playerid, "CarregouMinerio", 0);
            GivePlayerGrana(playerid, 2000);
            SendClientMessage(playerid, -1, "Descarregado com sucesso! + 2000");
        }
        else if(GetPVarInt(playerid, "CarregouMinerio") == 0)
        {
             // Nгo carregou
             SendClientMessage(playerid, -1, "Vocк nгo carregou os minйrios, logo nгo poderб descarregar.");
        }
    }
    else
    {
        SendClientMessage(playerid, -1, "Vocк nao esta no CheckPoint!");
    }
    return 1;
}


Re: [Profissгo] Carregamento [AJUDA] - WotusPower - 10.01.2013

VEI TE AMOOOOOOOO
deu sertinho aqui, thanks!!!!!
@
Sу preciso de uma ajuda rбpida.
Quando o player digita /carregarm, cria um checkpoint no mapa. [ ponto vermelho ]

Re: [Profissгo] Carregamento [AJUDA] - HardWar - 10.01.2013

pawn Код:
if(strcmp(cmd,"/carregarm", true) == 0)
{
    if(GetVehicleModel(GetPlayerVehicleID(playerid)) != 515 && GetVehicleModel(GetPlayerVehicleID(playerid)) != 450) return SendClientMessage(playerid, 0xFF0000, "Vocк nгo estб em um veнculo adequado!");
    if(IsPlayerInRangeOfPoint(playerid, 5.0,2632.691650,850.259277,6.093750))
    {
        SetPlayerCheckpoint(playerid, 2632.691650, 850.259277, 6.093750, 3.0);
        SetPVarInt(playerid, "CarregouMinerio", 1);
        SendClientMessage(playerid, -1, "Carregado com sucesso!");
    }
    else
    {
        SendClientMessage(playerid, -1, "Vocк nao esta no CheckPoint!");
    }
    return 1;
}

if(strcmp(cmd,"/descarregarm", true) == 0)
{
    if(GetVehicleModel(GetPlayerVehicleID(playerid)) != 515 && GetVehicleModel(GetPlayerVehicleID(playerid)) != 450) return SendClientMessage(playerid, 0xFF0000, "Vocк nгo estб em um veнculo adequado!");
    if(IsPlayerInRangeOfPoint(playerid, 5.0,2632.691650,850.259277,6.093750))
    {
        if(GetPVarInt(playerid, "CarregouMinerio") == 1)
        {
            SetPVarInt(playerid, "CarregouMinerio", 0);
            GivePlayerGrana(playerid, 2000);
            DisablePlayerCheckpoint(playerid);
            SendClientMessage(playerid, -1, "Descarregado com sucesso! + 2000");
        }
        else if(GetPVarInt(playerid, "CarregouMinerio") == 0)
        {
             // Nгo carregou
             SendClientMessage(playerid, -1, "Vocк nгo carregou os minйrios, logo nгo poderб descarregar.");
        }
    }
    else
    {
        SendClientMessage(playerid, -1, "Vocк nao esta no CheckPoint!");
    }
    return 1;
}


Re: [Profissгo] Carregamento [AJUDA] - WotusPower - 11.01.2013

Sу mais uma duvida
Como eu faзo pra sу Minerador poder entrar no veiculo ?
Veiculos criados no MTA.
Codigo:
pawn Код:
AddStaticVehicleEx(515,823.0000000,922.0000000,13.8999996,188.0000000,-1,-1,15); //Roadtrain
AddStaticVehicleEx(515,829.2000122,922.4000244,13.8999996,187.9980469,-1,-1,15); //Roadtrain
AddStaticVehicleEx(515,835.9000244,923.4000244,13.8999996,187.9980469,-1,-1,15); //Roadtrain
AddStaticVehicleEx(515,843.0000000,924.2000122,13.8999996,187.9980469,-1,-1,15); //Roadtrain
AddStaticVehicleEx(515,849.5999756,925.5000000,13.8999996,187.9980469,-1,-1,15); //Roadtrain
AddStaticVehicleEx(515,856.2999878,926.5999756,13.8999996,187.9980469,-1,-1,15); //Roadtrain
AddStaticVehicleEx(515,863.5000000,927.7000122,13.8999996,187.9980469,-1,-1,15); //Roadtrain
AddStaticVehicleEx(515,877.9000244,892.7000122,14.1000004,138.0000000,-1,-1,15); //Roadtrain
AddStaticVehicleEx(515,860.2000122,878.7000122,14.1000004,123.9992676,-1,-1,15); //Roadtrain
AddStaticVehicleEx(515,840.9000244,866.0999756,14.1000004,121.9971924,-1,-1,15); //Roadtrain
Nгo sei como chama isso mas segue abaixo
pawn Код:
#define C_MCN                                                                      0xBBBB00AA
Se precisar de mais algo pra fazer isso, eu posto!

Re: [Profissгo] Carregamento [AJUDA] - Maklister - 11.01.2013

Espero que intenda

pawn Код:
// No Topo
new VeiculosMinerio[10];
new vid = GetPlayerVehicleID(playerid);

// Public OnGameModeInit
public OnGameModeInit()
{
    VeiculosMinerio[0] = AddStaticVehicleEx(515,823.0000000,922.0000000,13.8999996,188.0000000,-1,-1,15); //Roadtrain
    VeiculosMinerio[1] = AddStaticVehicleEx(515,829.2000122,922.4000244,13.8999996,187.9980469,-1,-1,15); //Roadtrain
    VeiculosMinerio[2] = AddStaticVehicleEx(515,835.9000244,923.4000244,13.8999996,187.9980469,-1,-1,15); //Roadtrain
    VeiculosMinerio[3] = AddStaticVehicleEx(515,843.0000000,924.2000122,13.8999996,187.9980469,-1,-1,15); //Roadtrain
    VeiculosMinerio[4] = AddStaticVehicleEx(515,849.5999756,925.5000000,13.8999996,187.9980469,-1,-1,15); //Roadtrain
    VeiculosMinerio[5] = AddStaticVehicleEx(515,856.2999878,926.5999756,13.8999996,187.9980469,-1,-1,15); //Roadtrain
    VeiculosMinerio[6] = AddStaticVehicleEx(515,863.5000000,927.7000122,13.8999996,187.9980469,-1,-1,15); //Roadtrain
    VeiculosMinerio[7] = AddStaticVehicleEx(515,877.9000244,892.7000122,14.1000004,138.0000000,-1,-1,15); //Roadtrain
    VeiculosMinerio[8] = AddStaticVehicleEx(515,860.2000122,878.7000122,14.1000004,123.9992676,-1,-1,15); //Roadtrain
    VeiculosMinerio[9] = AddStaticVehicleEx(515,840.9000244,866.0999756,14.1000004,121.9971924,-1,-1,15); //Roadtrain
    return 1;
}

// Public OnPlayerStateChange
public OnPlayerStateChange(playerid, newstate, oldstate)
{
    if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER)
    {
        if(vid == VeiculosMinerio[0] || vid == VeiculosMinerio[1] || vid == VeiculosMinerio[2] || vid == VeiculosMinerio[3] || vid == VeiculosMinerio[4] || vid == VeiculosMinerio[5]
        || vid == VeiculosMinerio[6] || vid == VeiculosMinerio[7] || vid == VeiculosMinerio[8] || vid == VeiculosMinerio[9])
        {
            if(VariavelMotorista == 1) // Troque por sua variavel
            {
                // Se ele for motorista
                SendClientMessage(playerid, -1, "* Bem vindo ao veiculo de minerio.");
            }
            else
            {
                // Se ele NГO for motorista
                RemovePlayerFromVehicle(playerid);
                SendClientMessage(playerid, -1, "* Vocк nгo й um motorista.");
            }
        }
    }
    return 1;
}


Re: [Profissгo] Carregamento [AJUDA] - WotusPower - 11.01.2013

To procurando minha vareavel aqui


E OUTRA, DEU ERRO NAO ENVIAR NO PAWNO ...

Re: [Profissгo] Carregamento [AJUDA] - Maklister - 11.01.2013

a variavel й a variavel de Minerador ali,

" ERRO NAO ENVIAR NO PAWNO "

Re: [Profissгo] Carregamento - WotusPower - 11.01.2013

Eu acho que nгo tenho sei la.
Sу achei defines.
tipo, me baseei na /prender, la diz as profs que podem usar.
E achei esse pertinho.. [ minerador.. ]
pawn Код:
#define MCN                                                                         25


Re: [Profissгo] Carregamento [AJUDA] - Schocc - 12.01.2013

Quote:
Originally Posted by Murilo_sousa
Посмотреть сообщение
pawn Код:
// No Topo
new vid = GetPlayerVehicleID(playerid);
Creio que nгo vai funcionar no topo do gm... Mas sim Coloque no topo da callback...

Qual й o problema quais erros o pawno lhe Apresentou??

Re: [Profissгo] Carregamento [AJUDA] - Maklister - 12.01.2013

Quote:
Originally Posted by Schocc
Посмотреть сообщение
Creio que nгo vai funcionar no topo do gm... Mas sim Coloque no topo da callback...

Qual й o problema quais erros o pawno lhe Apresentou??
No topo da Callback, pois playerid nгo resulta fora de alguma callback que tenha a mesma :P

Sem a var do motorista de minйrio es impossible amigo. caso nгo tenha, crie uma.

Re: [Profissгo] Carregamento - WotusPower - 12.01.2013

To boiando aqui ...

Re: [Profissгo] Carregamento - Schocc - 12.01.2013

Quote:
Originally Posted by WotusPower
Посмотреть сообщение
To boiando aqui ...
OffTopic:
І....



OnTopic:
Vocк jб testou o modo como mostrou nosso amigo?
Qual sua duvida ?
O Problema presiste ?

Re: [Profissгo] Carregamento - WotusPower - 12.01.2013

Quando compila segue a mensagem

Pawno.exe Parou de funcionar.
Ai tem enviar relatorio de erros do windons e Nгo enviar.
Ainda nгo sei pq ele fecha com esse codigo.

Re: [Profissгo] Carregamento - Schocc - 12.01.2013

Quote:
Originally Posted by WotusPower
Посмотреть сообщение
Quando compila segue a mensagem

Pawno.exe Parou de funcionar.
Ai tem enviar relatorio de erros do windons e Nгo enviar.
Ainda nгo sei pq ele fecha com esse codigo.
Chave nгo fechada {} ()
Algo fora do local correto!
Se quiser posso ver se encontro o problema e te envio o script novamente...

Re: [Profissгo] Carregamento - Maklister - 12.01.2013

ve se vocк abriu chaves demais, revise a ultima parte em que vocк modificou antes do erro acontecer ...

Re: [Profissгo] Carregamento - WotusPower - 12.01.2013

Se possivel poderia arrumar o script certinho para mim @Schocc

Re: [Profissгo] Carregamento - WotusPower - 12.01.2013

Aguardando Ajuda..

Re: [Profissгo] Carregamento - WotusPower - 13.01.2013

@ Alguem?

Re: [Profissгo] Carregamento - WotusPower - 13.01.2013

@Alguem ?