Szerző Téma: Autó bérlés  (Megtekintve 556 alkalommal)

Nem elérhető Mokus

  • 608
    • Profil megtekintése
Autó bérlés
« Dátum: 2012. szeptember 20. - 07:39:23 »
0 Show voters
Sziasztok narancs kérdezte hogy kell autóbérlés rendszert írni én sem tudtam hogy vannak az elágazások de válaszoltak kérdésemre meg értettem és tovább adom neki hogy õ is értse.
Õ kérte ezt a kis \"LEIRÁS SCRIPTET\" hogy értse meg én persze meg írtam neki mert jó ha az ember egy teljes példát kap róla én el készitettem neki õ meg értette.
Állítólag jónak kell lennie õ azt mondta jó nem hibás.
Nem töltöm fel sehova csak be másolom a kódját
 
#include <a_samp>
#define nemberelt 0
#define berelt 1
#include zcmd
#include colors
forward Auto();
enum berelheto
{
berelheto1,
berelheto2,
berelheto3,
berelheto4,
berelheto5,
berelheto6,
berelheto7,
berelheto8,
};
new Cars[berelheto];
public OnFilterScriptInit()
{
Cars[berelheto1] = CreateVehicle(540,2499.3921,-1653.9977,13.3069,91.5500,0,0, 600000);
Cars[berelheto2] = CreateVehicle(540,2481.6992,-1693.0907,13.3798,356.4631,0,0, 600000);
Cars[berelheto3] = CreateVehicle(540,2473.0889,-1698.1953,13.3775,359.3281,0,0, 600000);
Cars[berelheto4] = CreateVehicle(540,2433.6191,-1644.6014,13.3629,178.1214,0,0, 600000);
Cars[berelheto5] = CreateVehicle(540,2424.4717,-1643.5405,13.3581,183.2421,0,0, 600000);
}
CMD:berel(playerid,params[])
{
SetTimer(\"Auto\", 600000, 1);
new CarCheck = GetPlayerVehicleID(playerid);
if(CarCheck == Cars[berelheto1] || CarCheck == Cars[berelheto2] || CarCheck == Cars[berelheto3] || CarCheck == Cars[berelheto4] || CarCheck == Cars[berelheto5] || CarCheck == Cars[berelheto6] || CarCheck == Cars[berelheto7] || CarCheck == Cars[berelheto8])//ezzel kérjük le hogy csak ezeknek a kocsiknak mûködjön
{
TogglePlayerControllable(playerid,1);
SetPVarInt(playerid,\"berelt\",berelt);
SendClientMessage(playerid,COLOR_GREEN,\"Sikeresen kibérelted ezt az autót\");
}
else
{
SendClientMessage(playerid,COLOR_GREEN,\"Béreld ki az autot /berel\");
TogglePlayerControllable(playerid,0);
}
return 1;
}
public OnPlayerStateChange(playerid, newstate, oldstate)
{
if(newstate == PLAYER_STATE_DRIVER)
{
     new CarCheck = GetPlayerVehicleID(playerid);
      if(CarCheck == Cars[berelheto1] || CarCheck == Cars[berelheto2] || CarCheck == Cars[berelheto3] || CarCheck == Cars[berelheto4] || CarCheck == Cars[berelheto5] || CarCheck == Cars[berelheto6] || CarCheck == Cars[berelheto7] || CarCheck == Cars[berelheto8])
    {
    if(GetPVarInt(playerid,\"berelt\") == berelt)
    {
    }
else
{
SendClientMessage(playerid,COLOR_GREEN,\"Bereld ki a jármûvel /berel\");
TogglePlayerControllable(playerid,0);
}
}
}
}
public OnPlayerConnect(playerid)
{
SetPVarInt(playerid,\"nemberelt\",nemberelt);
}
public Auto()
{
new CarCheck = GetPlayerVehicleID(true);
if(CarCheck == Cars[berelheto1] || CarCheck == Cars[berelheto2] || CarCheck == Cars[berelheto3] || CarCheck == Cars[berelheto4] || CarCheck == Cars[berelheto5] || CarCheck == Cars[berelheto6] || CarCheck == Cars[berelheto7] || CarCheck == Cars[berelheto8])
{
SendClientMessage(true,COLOR_GREEN,\"Lejárt a bérlési idõd\");
RemovePlayerFromVehicle(true);
}
}
public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
{
return 1;
}

Nem elérhető JackBronson

  • 1499
  • ??
    • Profil megtekintése
Autó bérlés
« Válasz #1 Dátum: 2012. szeptember 20. - 08:44:06 »
0 Show voters
Nem muszaly ,hogy le jarjon neki a berles :D

Nem elérhető Mokus

  • 608
    • Profil megtekintése
Autó bérlés
« Válasz #2 Dátum: 2012. szeptember 20. - 14:15:04 »
0 Show voters
Tudom de õ így kérte :)

Nem elérhető DrAkE

  • 2078
    • Profil megtekintése
Autó bérlés
« Válasz #3 Dátum: 2012. szeptember 20. - 18:58:49 »
0 Show voters
Nem tudom, hogy sírjak, vagy nevessek, de ez olyan rossz, ahogy én most itt írok. Sajnos elég hosszú lenne ha leírnám mi a hibája, ugyanis ott van az idõzítõ, a pvarint rossz használata. GetPlayerVehicleID rossz használata (GetPlayerVehicleID(true);) Szöveges üzenet használata, illetve játékos eltávolítása a jármûbõl. (SendClientMessage(true,COLOR_GREEN,\"Lejárt a bérlési idõd\");
RemovePlayerFromVehicle(true);). Ha te ezt tesztelted akkor le a kalappal (csodálkoznék is, hiszen már alapból ránézésre sok hibát adna ki). Illetve ezen felül, van egy olyan szabály (de minek is írom le, sz*r se olvassa el), hogy TILOS NEM TESZTELT SCRIPTET KIRAKNI! Többiek pedig, csak jönnek adnak egy ki******* Lájkot (nem értem, miért, tehát ebbõl adódóan csak megnézik a témát, hsz hunterkednek, adnak egy puszi Lájkot, aztán mennek tovább utukra)
U.I.: Hogy miért nem javítom, és írom ezeket a sorokat? Mivel sz*rt se foglalkoztok vele, csak kijavítom, kirakjátok, aztán puszi-pá. Semmi erõt nem fektettek abba, hogy valami tanulási ösztönötök is legyen.
« Utoljára szerkesztve: 2012. szeptember 20. - 19:00:45 írta DrAkE »

Nem elérhető doboka98

  • 1002
    • Profil megtekintése
Autó bérlés
« Válasz #4 Dátum: 2012. szeptember 20. - 19:13:00 »
0 Show voters
Idézetet írta: DrAkE date=1348160329\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"27702\" data-ipsquote-contentclass=\"forums_Topic
Nem tudom, hogy sírjak, vagy nevessek, de ez olyan rossz, ahogy én most itt írok. Sajnos elég hosszú lenne ha leírnám mi a hibája, ugyanis ott van az idõzítõ, a pvarint rossz használata. GetPlayerVehicleID rossz használata (GetPlayerVehicleID(true);) Szöveges üzenet használata, illetve játékos eltávolítása a jármûbõl. (SendClientMessage(true,COLOR_GREEN,\"Lejárt a bérlési idõd\");
RemovePlayerFromVehicle(true);). Ha te ezt tesztelted akkor le a kalappal (csodálkoznék is, hiszen már alapból ránézésre sok hibát adna ki). Illetve ezen felül, van egy olyan szabály (de minek is írom le, sz*r se olvassa el), hogy TILOS NEM TESZTELT SCRIPTET KIRAKNI! Többiek pedig, csak jönnek adnak egy ki******* Lájkot (nem értem, miért, tehát ebbõl adódóan csak megnézik a témát, hsz hunterkednek, adnak egy puszi Lájkot, aztán mennek tovább utukra)
U.I.: Hogy miért nem javítom, és írom ezeket a sorokat? Mivel sz*rt se foglalkoztok vele, csak kijavítom, kirakjátok, aztán puszi-pá. Semmi erõt nem fektettek abba, hogy valami tanulási ösztönötök is legyen.
 
Én már ezen szakadtam és tovább sem néztem : SendClientMessage(true, COLOR_GREEN, \"Lejárt a bérlési idõd\"); ....

Nem elérhető DrAkE

  • 2078
    • Profil megtekintése
Autó bérlés
« Válasz #5 Dátum: 2012. szeptember 20. - 20:04:07 »
0 Show voters
Idézetet írta: doboka98 date=1348161180\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"27702\" data-ipsquote-contentclass=\"forums_Topic


Nem tudom, hogy sírjak, vagy nevessek, de ez olyan rossz, ahogy én most itt írok. Sajnos elég hosszú lenne ha leírnám mi a hibája, ugyanis ott van az idõzítõ, a pvarint rossz használata. GetPlayerVehicleID rossz használata (GetPlayerVehicleID(true);) Szöveges üzenet használata, illetve játékos eltávolítása a jármûbõl. (SendClientMessage(true,COLOR_GREEN,\"Lejárt a bérlési idõd\");
RemovePlayerFromVehicle(true);). Ha te ezt tesztelted akkor le a kalappal (csodálkoznék is, hiszen már alapból ránézésre sok hibát adna ki). Illetve ezen felül, van egy olyan szabály (de minek is írom le, sz*r se olvassa el), hogy TILOS NEM TESZTELT SCRIPTET KIRAKNI! Többiek pedig, csak jönnek adnak egy ki******* Lájkot (nem értem, miért, tehát ebbõl adódóan csak megnézik a témát, hsz hunterkednek, adnak egy puszi Lájkot, aztán mennek tovább utukra)
U.I.: Hogy miért nem javítom, és írom ezeket a sorokat? Mivel sz*rt se foglalkoztok vele, csak kijavítom, kirakjátok, aztán puszi-pá. Semmi erõt nem fektettek abba, hogy valami tanulási ösztönötök is legyen.
 
Én már ezen szakadtam és tovább sem néztem : SendClientMessage(true, COLOR_GREEN, \"Lejárt a bérlési idõd\"); ....
 
[/quote]
Örülök neki, csak itt az a gond, hogy az a legutolsó sorokban volt, szóval nem volt mit tovább nézni.

Nem elérhető Mokus

  • 608
    • Profil megtekintése
Autó bérlés
« Válasz #6 Dátum: 2012. szeptember 20. - 20:15:26 »
0 Show voters
Nekem azt mondtál a script 100% ig jó nem néztem meg az egésszet csak pár dolgot és kérem ne fikázzatok ha nem tetsztik irjatok jobbat mível ti jobb scipterek vagytok nyomorékok nem érdekel a beszolásotok ha titeket fikázlak akkor ti egyböl fel kapjátok a vizet én ezeket a sorokat holt nyugodtan írom mível nem tud fel idegesiteni mert nem veszem fel mert kezdõ scripter vagyok köszönöm a megértéseteket sziasztok

 

SimplePortal 2.3.7 © 2008-2024, SimplePortal