Ez egy fekvõrendõr lerakó script és hiba van benne!!! Valaki segitene kijavitani????
#include <a_samp>
#include <zcmd>
#define GREEN 0x21DD00FF
#define RED 0xE60000FF
#define WHITE 0xFFFFFFAA
#define DIALOGSP 1000
new object;
new string[128],Float:X,Float:Y,Float:Z,File:pos;
CMD:xcredits(playerid,params[])
{
SendClientMessage(playerid, -1 ,\"XtremeR for The Dynamic Speed Break Maker \");
SendClientMessage(playerid, -1 ,\"Fordította: Adii\");
return 1;
}
CMD:xspeedbreaker(playerid,params[])
{
ShowPlayerDialog(playerid, 1, DIALOG_STYLE_LIST, \"xSpeedBreaker Maker by XtremeR\", \"Fekvõrendõr létrehozása\\nKorábbi szerkesztése\\nMentés\", \"Kiválaszt\", \"Mégse\");
return 1;
}
CMD:xsb(playerid,params[])
{
ShowPlayerDialog(playerid, 1, DIALOG_STYLE_LIST, \"xSpeedBreaker Maker by XtremeR\", \"Fekvõrendõr létrehozása\\nKorábbi szerkesztése\\nMentés\", \"Kiválaszt\", \"Mégse\");
return 1;
}
CMD:xedit(playerid,params[])
{
SelectObject(playerid);
SendClientMessage(playerid, -1 ,\"Válaszd ki,hogy melyik objektumot akarod szerkeszteni!\");
return 1;
}
public OnPlayerSpawn(playerid)
{
SendClientMessage(playerid,RED,\"Fekvõrendõr létrehozásához használd a következõ parancsokat: /xspeedbreaker vagy /xsb\");
return 1;
}
public OnPlayerEditObject(playerid, playerobject, objectid, response, Float:fX, Float:fY, Float:fZ, Float:fRotX, Float:fRotY, Float:fRotZ)
{
new Float:oldX, Float:oldY, Float:oldZ,
Float:oldRotX, Float:oldRotY, Float:oldRotZ;
GetObjectPos(objectid, oldX, oldY, oldZ);
GetObjectRot(objectid, oldRotX, oldRotY, oldRotZ);
if(response == EDIT_RESPONSE_FINAL)
{
SendClientMessage(playerid, -1 ,\"Használd a /xedit parancsot a szerkesztéshez vagy a /xsb parancsot a mentéshez!\");
}
if(response == EDIT_RESPONSE_CANCEL)
{
DestroyObject(object);
}
}
public OnPlayerSelectObject(playerid, type, objectid, modelid, Float:fX, Float:fY, Float:fZ)
{
if(type == SELECT_OBJECT_GLOBAL_OBJECT)
{
EditObject(playerid, objectid);
}
else
{
EditPlayerObject(playerid, objectid);
}
SendClientMessage(playerid, 0xFFFFFFFF, \"Mostmár tudod szerkeszteni az objektumot!\");
return 1;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(response)// They pressed the first button.
{
switch(dialogid)
{
case 1:
{
switch(listitem)
{
case 0:
{
GetPlayerPos(playerid, X,Y,Z);
object = CreateObject(19425,X,Y+1,Z-1,0,0.00,0.00);
EditObject(playerid, object);
SendClientMessage(playerid, -1 ,\"A fekvõrendõr letéve mostmár elhelyezheted!\");
}
case 1:
{
SelectObject(playerid);
SendClientMessage(playerid, -1 ,\"Válaszd ki azt az objektumot amelyiken változtatni szeretnél!\");
}
case 2:
{
new Float:oldX, Float:oldY, Float:oldZ;
GetObjectPos(object, oldX, oldY, oldZ);
pos = fopen(\"xSpeedBreakers.pwn\", io_append);
format(string, 256, \"CreateObject(19425,%f,%f,%f,0.00,0.00,0.00);//By XtremeR\\n\", X, Y, Z);
fwrite(pos, string), fclose(pos);
SendClientMessage(playerid, -1 ,\"Fekvõrendõr lehelyezve és mentve a Scriptfiles mappába!(CreateObject)\");
}
}
}
}
}
return 1;
}
HIBA:
C:\\Users\\robi\\Desktop\\Szerverem Paraszt RPG\\pawno\\include\\zcmd.inc(90) : warning 219: local variable \"pos\" shadows a variable at a preceding level
C:\\Users\\robi\\Desktop\\teszt.pwn(95) : warning 235: public function lacks forward declaration (symbol \"OnPlayerEditObject\")
C:\\Users\\robi\\Desktop\\teszt.pwn(107) : error 017: undefined symbol \"EDIT_RESPONSE_FINAL\"
C:\\Users\\robi\\Desktop\\teszt.pwn(115) : error 017: undefined symbol \"EDIT_RESPONSE_CANCEL\"
C:\\Users\\robi\\Desktop\\teszt.pwn(125) : warning 235: public function lacks forward declaration (symbol \"OnPlayerSelectObject\")
C:\\Users\\robi\\Desktop\\teszt.pwn(129) : error 017: undefined symbol \"SELECT_OBJECT_GLOBAL_OBJECT\"
Pawn compiler 3.2.3664 Copyright (c) 1997-2006, ITB CompuPhase
3 Errors.
Tessek egy script szögesdrót script volt de kicseréltem az object idét remélem hasznos lesz
#include a_samp
#include zcmd
new bool:szogesdrot, drot, Float:x, Float:y, Float:z, Float:Fordulas;
CMD:lerak(playerid, params[])
{
if(szogesdrot == true) return SendClientMessage(playerid,0xff0000AA,\"Figyelem.Már raktak le útzárat, ha leraksz mégegyet, a régit nem lehet felvenni.\"), szogesdrot = false;
szogesdrot = true;
GetPlayerPos(playerid, x, y, z);
GetPlayerFacingAngle(playerid, Fordulas);
DestroyObject(drot);
drot = CreateObject(19425, x-1, y, z-1, 0.0, 0.0, Fordulas);
SendClientMessage(playerid,0x009924AA,\"Leraktál egy útzárat. Felvenni a /felszed paranccsal tudod.\");
return 1;
}
CMD:felszed(playerid, params[])
{
szogesdrot = false;
DestroyObject(drot);
SendClientMessage(playerid,0x009924AA,\"Felszetted az útzárat.\");
return 1;
}
public OnPlayerUpdate(playerid)
{
new vehicleid = GetPlayerVehicleID(playerid);
new panels, doors, lights, tires;
GetVehicleDamageStatus(vehicleid, panels, doors, lights, tires);
if(szogesdrot == true && IsPlayerInRangeOfPoint(playerid, 4.0, x, y, z) && IsPlayerInAnyVehicle(playerid)) UpdateVehicleDamageStatus(vehicleid, panels, doors, lights, 15), SendClientMessage(playerid,0xff0000AA,\"Rámentél egy szögesdrótra, a kerekeid kilyukadtak.\");
return 1;
}
Ha 0.3x Kilen PWN-el csinálom akkor ez a hiba!!!
Hiba:
C:\\Users\\robi\\Desktop\\teszt.pwn(200) : warning 203: symbol is never used: \"xcredits\"
C:\\Users\\robi\\Desktop\\teszt.pwn(200) : warning 203: symbol is never used: \"xedit\"
C:\\Users\\robi\\Desktop\\teszt.pwn(200) : warning 203: symbol is never used: \"xsb\"
C:\\Users\\robi\\Desktop\\teszt.pwn(200) : warning 203: symbol is never used: \"xspeedbreaker\"
Pawn compiler 3.2.3664 Copyright (c) 1997-2006, ITB CompuPhase
4 Warnings.