Szerző Téma: ReSpawnCar  (Megtekintve 2669 alkalommal)

ReSpawnCar
« Dátum: 2011. július 10. - 12:06:02 »
0 Show voters
Szewasztok!
Ismét hozzátok fordulok egy olyan kéréssel hogy szeretnék a szerverembe egy olyan parancsot hogy /rsc. Ez a parancs helyre állítaná eredeti helyére az összes használoton kívüli jármûvet!
Lécci segítsetek!
Elõre is köszönöm!
by:mcdcadam

Nem elérhető shadee

  • 1073
    • Profil megtekintése
ReSpawnCar
« Válasz #1 Dátum: 2011. július 10. - 12:17:40 »
0 Show voters
Idézetet írta: mcdcadam date=1310292362\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"9535\" data-ipsquote-contentclass=\"forums_Topic
Szewasztok!
Ismét hozzátok fordulok egy olyan kéréssel hogy szeretnék a szerverembe egy olyan parancsot hogy /rsc. Ez a parancs helyre állítaná eredeti helyére az összes használoton kívüli jármûvet!
Lécci segítsetek!
Elõre is köszönöm!
by:mcdcadam
 
Csinálj 1 parancsot
else alá írd be ezt
          SetVehicleToRespawn(GetPlayerVehicleID(playerid));
a Mód végére:
public RespawnAllCars(vehid)
{
    if(IsAnOwnableCar(vehid))
    {
        CarInfo[VehicleOwned[vehid]][cFuel] = Gas[vehid];
        VehicleOwned[vehid] = SCRIPT_CARS;
        DestroyVehicle(vehid);
    }
    else
    {
        SetVehicleToRespawn(vehid);
    }
    return 1;
}

ReSpawnCar
« Válasz #2 Dátum: 2011. július 10. - 12:21:04 »
0 Show voters
Shade megtudnád nekem írni mert ilyenekbe béna vagyok  :D  :angel:

ReSpawnCar
« Válasz #3 Dátum: 2011. július 10. - 12:22:46 »
0 Show voters
Tessék..
[pawn]if ( strcmp ( cmdtext, \"/rsc\", true ) == 0 )
{
    for ( new vid = 0; vid < MAX_VEHICLES; vid ++ )
    {
        if ( !IsVehicleOccupied ( vid )
        {
            SetVehicleToRespawn ( vid );
        }
    }
    SendClientMessageToAll( 0xAA3333AA,\"* Minden használaton kívüli jármu helyreállítva!\" ); // Mindenkinek küld egy üzenetet
    return 1; // Visszatérés
}
stock IsVehicleOccupied ( vehicleid )
{
for ( new i = 0; i < MAX_PLAYERS; i++ )
{
   if ( IsPlayerInVehicle ( i, vehicleid ) ) return 1;
}
return 0;
}[/pawn]

Kovacs_Bela

  • Vendég
ReSpawnCar
« Válasz #4 Dátum: 2011. július 10. - 13:23:13 »
0 Show voters
shade érthetõbben is leírhattad volna...

ReSpawnCar
« Válasz #5 Dátum: 2011. július 10. - 13:46:40 »
0 Show voters
Messi 1errort ír

ReSpawnCar
« Válasz #6 Dátum: 2011. július 10. - 17:34:47 »
0 Show voters
másold be ide az error sort

ReSpawnCar
« Válasz #7 Dátum: 2011. július 10. - 17:50:26 »
0 Show voters
Itt egy kép Róla:
\"error8dd6.png\"

ReSpawnCar
« Válasz #8 Dátum: 2011. július 10. - 19:08:11 »
0 Show voters
Hát gõzöm nincs hogy jön ide a dini bocs :(

Nem elérhető Popec16

  • 1267
    • Profil megtekintése
ReSpawnCar
« Válasz #9 Dátum: 2011. július 17. - 19:29:15 »
0 Show voters
A pawno mappájában az includeseknél hiányzik a dini.inc .... :)

Nem elérhető maark

  • 565
    • Profil megtekintése
ReSpawnCar
« Válasz #10 Dátum: 2011. július 17. - 23:19:10 »
0 Show voters
Nem az a gond hogy az inc fájl kis D-vel van írva? és akkor #include <Dini>

ReSpawnCar
« Válasz #11 Dátum: 2011. július 17. - 23:55:57 »
0 Show voters
Tessék jármû respawnoló. Nem én írtam. Rcon adminok használhatják csak.
 

/*
   Jármû Respawnoló
       Készítõ: Sheet
           Elkészítési Idõ: 20 perc
               Készült: 2011.07.11
*/
/*          Include             */
#include <a_samp>
#include <zcmd>
#include <sscanf>
/*             Szín definició        */
#define COLOR_ORANGE 0xFFA500FF
/*              Beállítások          */
#define K_TIME 2
#define Z_TIME 3
/*              Timerek              */
new vehicletimer, vehtimer;
/*              Forward              */
forward VehicleRespawn();      forward CheckTimer();
/*                                   */
public OnFilterScriptInit()
{
SetTimer(\"VehicleRespawn\", 3600000, true);
return 1;
}
public OnPlayerConnect(playerid)
{
return 1;
}
public CheckTimer()
{
new time[4];
gettime(time[0], time[1], time[2]);
if(time[0] >= K_TIME && time[0] <= Z_TIME)
{
vehicletimer = 60;
       vehtimer = SetTimer(\"VehicleRespawn\", 1000, true);
    SendClientMessageToAll(COLOR_ORANGE, \"Minden használaton kívüli jármû repsawnolva lesz 60 másodperc mulva a rendszer által.\");
}
}
CMD:rcar(playerid, params[])
{
return cmd_crs(playerid, params);
}
CMD:crs(playerid, params[])
{
new vehicletime;
if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, COLOR_ORANGE, \"Nem vagy RCON admin!\");
if(sscanf(params, \"d\", vehicletime)) return SendClientMessage(playerid, COLOR_ORANGE, \"Használat: /r(espawn)a(ll)c(ars) [idõ]\");
    vehicletimer = vehicletime;
    vehtimer = SetTimer(\"VehicleRespawn\", 1000, true);
    new string[128], sendername[MAX_PLAYER_NAME];
    GetPlayerName(playerid, sendername, sizeof(sendername));
    format(string, sizeof(string), \"* Minden használaton kívüli jármû repsawnolva lesz %d másodperc mulva %s által.\", vehicletime, sendername);
    SendClientMessageToAll(COLOR_ORANGE, string);
return 1;
}
public VehicleRespawn()
{
--vehicletimer;
if( !vehicletimer )   {
new vehid;
    while(vehid < MAX_VEHICLES)
    {
        if(!IsVehicleOccupied(vehid))
        {
            SetVehicleToRespawn(vehid);
        }
        vehid++;
    }
KillTimer(vehtimer);
return;
}
static string[ 3 ];
format( string, 3, \"%d\", vehicletimer );
GameTextForAll(string, 1000, 6 );
}
stock IsVehicleOccupied ( vehicleid )
{
new i;
while(i < MAX_PLAYERS)
{
if ( IsPlayerInVehicle ( i, vehicleid ) ) return 1;
i++;
}
return 0;
}

 
10000% hogy mûködik én is ezt használlom

ReSpawnCar
« Válasz #12 Dátum: 2011. július 19. - 15:44:59 »
0 Show voters
Pioneer eltudod küldeni hozzá a hozzátartozó sscanf.inc fájlt?!
Elõre is köszi

Kovacs_Bela

  • Vendég
ReSpawnCar
« Válasz #13 Dátum: 2011. július 19. - 16:36:05 »
0 Show voters
Idézetet írta: mcdcadam date=1310313026\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"9535\" data-ipsquote-contentclass=\"forums_Topic
Itt egy kép Róla:
\"error8dd6.png\"
 
másold át az XS.pwn-t oda ahol a dini van csak ne a pawno/includesbe hanem a gamemodesbe

ReSpawnCar
« Válasz #14 Dátum: 2011. július 19. - 16:41:57 »
0 Show voters
Idézetet írta: mcdcadam date=1311083099\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"9535\" data-ipsquote-contentclass=\"forums_Topic
Pioneer eltudod küldeni hozzá a hozzátartozó sscanf.inc fájlt?!
Elõre is köszi
 
Tessék:
http://solidfiles.com/d/44bba/

 

SimplePortal 2.3.7 © 2008-2024, SimplePortal