Szerző Téma: Autóbérlés 2 errort ír rá (Megtekintve 1719 alkalommal)

BoSS · « **Dátum:** 2012. április 13. - 17:47:15 »

Sziasztok, Script kérésnél kértem ezt a scriptet amit meg kaptam így ott lezártam,mert ide többen néznek be és háth elõbb kapok segítséget
Script:
[pawn]#include <a_samp>
forward BerlesVege(playerid, kocsi);
CMD:berles(playerid, params[])
{
if(!BerlosKocsi(GetPlayerVehicleID(playerid))) return SendClientMessage(playerid, -1, \"Nem ülsz bérlõs kocsiban!\");
if(GetPlayerMoney(playerid) < 1500) return return SendClientMessage(playerid, -1, \"A bérlés ára 1500$!\");
SetTimerEx(\"BerlesVege\", 60*1000*20, false, \"ii\", playerid, kocsi);
return SendClientMessage(playerid, -1, \"Jármû kibérelve! -1500$, 20 percig érvényes!\");
}
stock BerlosKocsi(v)
{
if(v >= ELSÕKOCSIID && v <= UTOLSÓKOCSIID) return 1;
return 0;
}
public BerlesVege(playerid, kocsi)
{
SendClientMessage(playerid, -1, \"Lejárt a bérlési idõ!\");
SetVehicleToRespawn(kocsi);
}[/pawn]
2 error:
[pawn]C:\\Documents and Settings\\Rendszergazda\\Asztal\\Modtesztelés\\Fejlesztés\\pc.pwn(2637) : error 029: invalid expression, assumed zero
C:\\Documents and Settings\\Rendszergazda\\Asztal\\Modtesztelés\\Fejlesztés\\pc.pwn(2638) : error 017: undefined symbol \"kocsi\"[/pawn]
sorok ahova mutat:
[pawn] if(GetPlayerMoney(playerid) < 1500) return return SendClientMessage(playerid, -1, \"A bérlés ára 1500$!\");
SetTimerEx(\"BerlesVege\", 60*1000*20, false, \"ii\", playerid, kocsi);[/pawn]
a segítségeteket elõre is köszönöm.

$uRí · « **Válasz #1 Dátum:** 2012. április 13. - 17:57:53 »

A második erorhoz ird ezt new kocsi; mod elejére!

BoSS · « **Válasz #2 Dátum:** 2012. április 13. - 18:04:06 »

Másik errort kijavítottam én köszi.
Most az a baj hogy beülök a kocsiban meg adtam hogy 8 -tól 18-as id-ig a bérelhetõ kocsik idjei de ugyan úgy elindulnak és úgy kéne hogy ne induljon el ha nem bérlem ki
Valaki tud benne segíteni?

Dupla hozzászólás automatikusan összefûzve. ( 2012. április 13. - 20:13:07 )

Senki nem tud helpelni? :/

szabyxxx · « **Válasz #3 Dátum:** 2012. április 14. - 12:02:23 »

[pawn]
CMD:berles(playerid, params[])
{
if(!BerlosKocsi(GetPlayerVehicleID(playerid))) return SendClientMessage(playerid, -1, \"Nem ülsz bérlõs kocsiban!\");
if(GetPlayerMoney(playerid) < 1500) return SendClientMessage(playerid, -1, \"A bérlés ára 1500$!\");
SetTimerEx(\"BerlesVege\", 60*1000*20, false, \"ii\", playerid, kocsi);
return SendClientMessage(playerid, -1, \"Jármû kibérelve! -1500$, 20 percig érvényes!\");
}
stock BerlosKocsi(v)
{
if(v >= ELSÕKOCSIID && v <= UTOLSÓKOCSIID) return 1;
return 0;
}
public BerlesVege(playerid, kocsi)
{
SendClientMessage(playerid, -1, \"Lejárt a bérlési idõ!\");
SetVehicleToRespawn(kocsi);
}[/pawn]
Tessék Kijavítva!
Hiba:
if(GetPlayerMoney(playerid) < 1500) return return SendClientMessage(playerid, -1, \"A bérlés ára 1500$!\");
A Dublavisszatérés miatt volt!

BoSS · « **Válasz #4 Dátum:** 2012. április 14. - 12:31:35 »

Õ azt tudom én azt ki is vettem,de ugyan úgy beindulnak a kocsik ha beülnek úgy kéne hogy neinduljanak be...hanem mondjuk kiírja hogy bérlési díj 1500$ (/berles)

$uRí · « **Válasz #5 Dátum:** 2012. április 14. - 13:23:33 »

Tessék hibátlan, remélem megyen:


#include <a_samp>
#include <zcmd>
new kocsi;
new ELSOKOCSIID;
new UTOLSOKOCSIID;
forward BerlesVege(playerid, kocsi);
CMD:berles(playerid, params[])
{
       if(!BerlosKocsi(GetPlayerVehicleID(playerid))) return SendClientMessage(playerid, -1, \"Nem ülsz bérlõs kocsiban!\");
       if(GetPlayerMoney(playerid) < 1500) return SendClientMessage(playerid, -1, \"A bérlés ára 1500$!\")   return  TogglePlayerControllable(playerid,0);
       SetTimerEx(\"BerlesVege\", 60*1000*20, false, \"ii\", playerid, kocsi);
       return SendClientMessage(playerid, -1, \"Jármû kibérelve! -1500$, 20 percig érvényes!\") return TogglePlayerControllable(playerid,1);
}
stock BerlosKocsi(v)
{
      if(v >= ELSOKOCSIID && v <= UTOLSOKOCSIID) return 1;
      return 0;
}
public BerlesVege(playerid)
{
      SendClientMessage(playerid, -1, \"Lejárt a bérlési idõ!\");
      SetVehicleToRespawn(kocsi);
}

BoSS · « **Válasz #6 Dátum:** 2012. április 14. - 18:50:50 »

Nem jó.Ugyan úgy el indul ha nem bérelik ki a kocsit , úgy kéne h bese indul a motor és ha beírom h /berles (annak ellenére h elindul az nélkül is

) szóval ha beírom h berles akkor lese von pénzt.

stock BerlosKocsi(v)
{
      if(v >= 8 && v <= 18) return 1;
      return 0;
}

E: ÉS kétwarning is van
[pawn]
C:\\Documents and Settings\\Rendszergazda\\Asztal\\Modtesztelés\\Fejlesztés\\pc.pwn(4970) : warning 203: symbol is never used: \"ELSOKOCSIID\"
C:\\Documents and Settings\\Rendszergazda\\Asztal\\Modtesztelés\\Fejlesztés\\pc.pwn(4970) : warning 203: symbol is never used: \"UTOLSOKOCSIID\"[/pawn]

$uRí · « **Válasz #7 Dátum:** 2012. április 14. - 19:15:54 »

Ez így meni -e kell modosítottam probáld meg így


#include <a_samp>
#include <zcmd>
new kocsi;
new ELSOKOCSIID;
new UTOLSOKOCSIID;
forward BerlesVege(playerid, kocsi);
CMD:berles(playerid, params[])
{
       if(!BerlosKocsi(GetPlayerVehicleID(playerid)))
       if(RemovePlayerFromVehicle(playerid)) return SendClientMessage(playerid,-1,\"Nem bérelted ki a kocsit!\");
       if(GetPlayerMoney(playerid) < 1500) return SendClientMessage(playerid, -1, \"A bérlés ára 1500$!\");
       SetTimerEx(\"BerlesVege\", 60*1000*20, false, \"ii\", playerid, kocsi);
       return SendClientMessage(playerid, -1, \"Jármû kibérelve! -1500$, 20 percig érvényes!\");
}
stock BerlosKocsi(v)
{
      if(v >= ELSOKOCSIID && v <= UTOLSOKOCSIID) return 1;
      return 0;
}
public BerlesVege(playerid)
{
      SendClientMessage(playerid, -1, \"Lejárt a bérlési idõ!\");
      SetVehicleToRespawn(kocsi);
      RemovePlayerFromVehicle(playerid);
}

Nekem hibátlan:


Pawn compiler 3.2.3664           Copyright (c) 1997-2006, ITB CompuPhase

BoSS · « **Válasz #8 Dátum:** 2012. április 14. - 19:36:17 »

Sajnos nálam nem jó be ágyaztam a módba....ha beülök bérlés nélkül eltudok indulni de ha beírom h /berles akkor lese vo lovét . Nekem sajnos nem megy

$uRí · « **Válasz #9 Dátum:** 2012. április 14. - 19:48:03 »

De ne a modba tedd bele hanem FS -ként!

BoSS · « **Válasz #10 Dátum:** 2012. április 14. - 20:01:34 »

Idézetet írta: $uRí date=1334425683\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"20111\" data-ipsquote-contentclass=\"forums_Topic

De ne a modba tedd bele hanem FS -ként!

Meg történt úgy se jó.... :/
fsbe beraktam így:
[pawn]#include <a_samp>
#include <zcmd>
new kocsi;
new ELSOKOCSIID;
new UTOLSOKOCSIID;
forward BerlesVege(playerid, kocsi);
CMD:berles(playerid, params[])
{
if(!BerlosKocsi(GetPlayerVehicleID(playerid)))
if(RemovePlayerFromVehicle(playerid)) return SendClientMessage(playerid,-1,\"Nem bérelted ki a kocsit!\");
if(GetPlayerMoney(playerid) < 1500) return SendClientMessage(playerid, -1, \"A bérlés ára 1500$!\");
SetTimerEx(\"BerlesVege\", 60*1000*20, false, \"ii\", playerid, kocsi);
return SendClientMessage(playerid, -1, \"Jármû kibérelve! -1500$, 20 percig érvényes!\");
}
stock BerlosKocsi(v)
{
if(v >= 8 && v <= 18) return 1;
return 0;
}
public BerlesVege(playerid)
{
SendClientMessage(playerid, -1, \"Lejárt a bérlési idõ!\");
SetVehicleToRespawn(kocsi);
RemovePlayerFromVehicle(playerid);
}[/pawn]
ÉS nem jó,ráadásul nekem 2 warningot add ki.
[pawn]C:\\Documents and Settings\\Rendszergazda\\Asztal\\Ghost.pwn(31) : warning 203: symbol is never used: \"ELSOKOCSIID\"
C:\\Documents and Settings\\Rendszergazda\\Asztal\\Ghost.pwn(31) : warning 203: symbol is never used: \"UTOLSOKOCSIID\"
Pawn compiler 3.2.3664 Copyright © 1997-2006, ITB CompuPhase
2 Warnings.[/pawn]
31.sor nicns az fsben.

Gabor.. · « **Válasz #11 Dátum:** 2012. április 14. - 20:07:02 »

#include <a_samp>
#include <zcmd>
new kocsi;
forward BerlesVege(playerid, kocsi);
CMD:berles(playerid, params[])
{
    if(GetPlayerMoney(playerid) <= 1500)
   {
       if(!BerlosKocsi(GetPlayerVehicleID(playerid)))
       if(RemovePlayerFromVehicle(playerid)) return SendClientMessage(playerid,-1,\"Nem bérelted ki a kocsit!\");
       if(GetPlayerMoney(playerid) < 1500) return SendClientMessage(playerid, -1, \"A bérlés ára 1500$!\");
       SetTimerEx(\"BerlesVege\", 60*1000*20, false, \"ii\", playerid, kocsi);
       GivePlayerMoney(playerid, -1500);
       SendClientMessage(playerid, -1, \"Jármû kibérelve! -1500$, 20 percig érvényes!\");
    }
    else
    {
        SendClientMessage(playerid, -1, \"Nincs  $1500-od!\");
    }
}
stock BerlosKocsi(v)
{
      if(v >= 8 && v <= 18) return 1;
      return 0;
}
public BerlesVege(playerid)
{
      SendClientMessage(playerid, -1, \"Lejárt a bérlési idõ!\");
      SetVehicleToRespawn(kocsi);
      RemovePlayerFromVehicle(playerid);
}

Így?

Casamiro · « **Válasz #12 Dátum:** 2012. április 14. - 20:16:49 »

Itt az egész hibátlanul, megcsinálva ahogy kérted:

#include <a_samp>
#include <zcmd>
forward BerlesVege(playerid, kocsi);
public OnGameModeInit()
{
      new x = 8-1;
      for(; x++ < 18;) MotorAllitas(x);
      return 1;
}
CMD:berles(playerid, params[])
{
       if(!BerlosKocsi(GetPlayerVehicleID(playerid))) return SendClientMessage(playerid, -1, \"Nem ülsz bérlõs kocsiban!\");
       if(GetPlayerMoney(playerid) < 1500) return SendClientMessage(playerid, -1, \"A bérlés ára 1500$!\");
       SetTimerEx(\"BerlesVege\", 60*1000*20, false, \"ii\", playerid, GetPlayerVehicleID(playerid));
       MotorInditas(GetPlayerVehicleID(playerid));
       return SendClientMessage(playerid, -1, \"Jármû kibérelve! -1500$, 20 percig érvényes!\");
}
stock BerlosKocsi(v)
{
      if(v >= 8 && v <= 18) return 1;
      return 0;
}
public BerlesVege(playerid, kocsi)
{
      SendClientMessage(playerid, -1, \"Lejárt a bérlési idõ!\");
      SetVehicleToRespawn(kocsi);
      MotorAllitas(kocsi);
}
stock MotorAllitas(vehicleid)
{
new engine,lights,alarm,doors,bonnet,boot,objective;
GetVehicleParamsEx(vehicleid,engine,lights,alarm,doors,bonnet,boot,objective);
SetVehicleParamsEx(vehicleid,VEHICLE_PARAMS_OFF,lights,alarm,doors,bonnet,boot,objective);
        return 1;
}
stock MotorInditas(vehicleid)
{
new engine,lights,alarm,doors,bonnet,boot,objective;
GetVehicleParamsEx(vehicleid,engine,lights,alarm,doors,bonnet,boot,objective);
SetVehicleParamsEx(vehicleid,VEHICLE_PARAMS_ON,lights,alarm,doors,bonnet,boot,objective);
        return 1;
}

BoSS · « **Válasz #13 Dátum:** 2012. április 14. - 20:39:46 »

Idézetet írta: Casamiro date=1334427409\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"20111\" data-ipsquote-contentclass=\"forums_Topic

Itt az egész hibátlanul, megcsinálva ahogy kérted:

#include <a_samp>
#include <zcmd>
forward BerlesVege(playerid, kocsi);
public OnGameModeInit()
{
      new x = 8-1;
      for(; x++ < 18;) MotorAllitas(x);
      return 1;
}
CMD:berles(playerid, params[])
{
       if(!BerlosKocsi(GetPlayerVehicleID(playerid))) return SendClientMessage(playerid, -1, \"Nem ülsz bérlõs kocsiban!\");
       if(GetPlayerMoney(playerid) < 1500) return SendClientMessage(playerid, -1, \"A bérlés ára 1500$!\");
       SetTimerEx(\"BerlesVege\", 60*1000*20, false, \"ii\", playerid, GetPlayerVehicleID(playerid));
       MotorInditas(GetPlayerVehicleID(playerid));
       return SendClientMessage(playerid, -1, \"Jármû kibérelve! -1500$, 20 percig érvényes!\");
}
stock BerlosKocsi(v)
{
      if(v >= 8 && v <= 18) return 1;
      return 0;
}
public BerlesVege(playerid, kocsi)
{
      SendClientMessage(playerid, -1, \"Lejárt a bérlési idõ!\");
      SetVehicleToRespawn(kocsi);
      MotorAllitas(kocsi);
}
stock MotorAllitas(vehicleid)
{
new engine,lights,alarm,doors,bonnet,boot,objective;
GetVehicleParamsEx(vehicleid,engine,lights,alarm,doors,bonnet,boot,objective);
SetVehicleParamsEx(vehicleid,VEHICLE_PARAMS_OFF,lights,alarm,doors,bonnet,boot,objective);
        return 1;
}
stock MotorInditas(vehicleid)
{
new engine,lights,alarm,doors,bonnet,boot,objective;
GetVehicleParamsEx(vehicleid,engine,lights,alarm,doors,bonnet,boot,objective);
SetVehicleParamsEx(vehicleid,VEHICLE_PARAMS_ON,lights,alarm,doors,bonnet,boot,objective);
        return 1;
}

Kösz Casamiro megy.
Mindenkinek adtam érte + aki próbált segítséget nyújtani

Viszont annyi van még,hogy a pénzt nem vonja le.

JBauer · « **Válasz #14 Dátum:** 2012. április 14. - 20:42:06 »

SetPlayerMoney((GetPlayerMoney(playerid)-1500)

Asszem, de nem biztos, teszteld le.