GTA Közösség - A magyar GTA fórum

San Andreas Multiplayer (SA-MP) => SA-MP: Szerverfejlesztés => Segítségkérés => A témát indította: grove4l - 2013. április 11. - 16:58:54

Cím: [Segítségkérés] Sziréna Script.
Írta: grove4l - 2013. április 11. - 16:58:54

Tegnap nekiláttam egy sziréna Script megírásához. Sikerült is minden beraktam a modba. Amikor felmentem kipróbáltam mûködött minden. Azonban egy idõ után teljesen elbugolt. Kiírta ugyan hogy Kirakva meg levéve de nem rakta ki az objectet. Akkor a Premier esetében ki se írta hogy felrakva csak azt hogy leszedve. Segítséget kérnék.
 

CMD:szirena(playerid, params[])
{
if(PlayerInfo[playerid][pLeader] != 1 && PlayerInfo[playerid][pMember] != 1 && PlayerInfo[playerid][pLeader] != 2 && PlayerInfo[playerid][pMember] != 2 && PlayerInfo[playerid][pFBIleader] != 2 && PlayerInfo[playerid][pFBItag] != 2 )return SendClientMessage(playerid,FEHER,\"Nem használhatod ezt a parancsot.\");
if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid, FEHER, \"Nem ülsz jármûben!\");
if(GetPlayerVehicleSeat(playerid) != 0)return SendClientMessage(playerid,FEHER,\"Nem vagy a vezetõ ülésnél.\");
new VID = GetPlayerVehicleID(playerid);
{
if(GetVehicleModel(VID) == 421)
{
   if(Siren[VID] == 0)
   {
      SirenObject[VID] = CreateObject(18646,0,0,-1000,0,0,0,100);
      AttachObjectToVehicle(SirenObject[VID], GetPlayerVehicleID(playerid), -0.130000, 0.909999, 0.254999, 0.000000, 0.000000, 0.000000);
      SendClientMessage(playerid, FEHER, \"Villogó kitéve.\");
      Siren[VID] = 1;
   }
   else if(Siren[VID] == 1)
   {
      Siren[VID] = 0;
      DestroyObject(SirenObject[VID]);
      SendClientMessage(playerid, FEHER, \"Villogó levéve.\");
   }
}
if(GetVehicleModel(VID) == 426)
{
   if(Siren[VID] == 0)
   {
      SirenObject[VID] = CreateObject(18646,0,0,-1000,0,0,0,100);
      AttachObjectToVehicle(SirenObject[VID], GetPlayerVehicleID(playerid), -0.164999, 0.774999, 0.374999, 0.000000, 0.000000, 0.000000);
      SendClientMessage(playerid, FEHER, \"Villogó kitéve.\");
      Siren[VID] = 1;
   }
   else if(Siren[VID] == 1)
   {
      Siren[VID] = 0;
      DestroyObject(SirenObject[VID]);
   }
}
if(GetVehicleModel(VID) == 586)
{
   if(Siren[VID] == 0)
   {
      SirenObject[VID] = CreateObject(18646,0,0,-1000,0,0,0,100);
      AttachObjectToVehicle(SirenObject[VID], GetPlayerVehicleID(playerid), 0.000000, -1.189999, 0.689999, 0.000000, 0.000000, 0.000000);
      SendClientMessage(playerid, FEHER, \"Villogó kitéve.\");
      Siren[VID] = 1;
   }
   else if(Siren[VID] == 1)
   {
      Siren[VID] = 0;
      DestroyObject(SirenObject[VID]);
      SendClientMessage(playerid, FEHER, \"Villogó levéve.\");
   }
}
}
return 1;
}

Cím: [Segítségkérés] Sziréna Script.
Írta: jana4 - 2013. április 11. - 18:43:41

CMD:szirena(playerid)
{
if((PlayerInfo[playerid][pLeader] != 1 && 2) && (PlayerInfo[playerid][pMember] != 1 && 2) && (PlayerInfo[playerid][pFBIleader] && PlayerInfo[playerid][pFBItag] != 2)) return SendClientMessage(playerid, -1, \"Nem használhatod ezt a parancsot.\");
if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid, -1, \"Nem ülsz jármûben!\");
if(GetPlayerVehicleSeat(playerid) != 0) return SendClientMessage(playerid, -1, \"Nem vagy a vezetõ ülésnél.\");
if(GetVehicleModel(GetPlayerVehicleID(playerid)) == 421)
{
if(!Siren[GetPlayerVehicleID(playerid)])
{
   SirenObject[GetPlayerVehicleID(playerid)] = CreateObject(18646, 0, 0, -1000, 0, 0, 0, 100);
   AttachObjectToVehicle(SirenObject[GetPlayerVehicleID(playerid)], GetPlayerVehicleID(playerid), -0.130000, 0.909999, 0.254999, 0.000000, 0.000000, 0.000000);
   SendClientMessage(playerid, -1, \"Villogó kitéve.\");
   Siren[GetPlayerVehicleID(playerid)] = 1;
}
else
{
   Siren[GetPlayerVehicleID(playerid)] = 0;
   DestroyObject(SirenObject[GetPlayerVehicleID(playerid)]);
   SendClientMessage(playerid, -1, \"Villogó levéve.\");
}
}
else if(GetVehicleModel(GetPlayerVehicleID(playerid)) == 426)
{
   if(!Siren[GetPlayerVehicleID(playerid)])
        {
        SirenObject[GetPlayerVehicleID(playerid)] = CreateObject(18646, 0, 0, -1000, 0, 0, 0, 100);
        AttachObjectToVehicle(SirenObject[GetPlayerVehicleID(playerid)], GetPlayerVehicleID(playerid), -0.164999, 0.774999, 0.374999, 0.000000, 0.000000, 0.000000);
        SendClientMessage(playerid, -1, \"Villogó kitéve.\");
        Siren[GetPlayerVehicleID(playerid)] = 1;
        }
        else
        {
           Siren[GetPlayerVehicleID(playerid)] = 0;
            DestroyObject(SirenObject[GetPlayerVehicleID(playerid)]);
        }
else if(GetVehicleModel(GetPlayerVehicleID(playerid)) == 586)
{
if(!Siren[GetPlayerVehicleID(playerid)])
{
   SirenObject[GetPlayerVehicleID(playerid)] = CreateObject(18646, 0, 0, -1000, 0, 0, 0, 100);
            AttachObjectToVehicle(SirenObject[GetPlayerVehicleID(playerid)], GetPlayerVehicleID(playerid), 0.000000, -1.189999, 0.689999, 0.000000, 0.000000, 0.000000);
            SendClientMessage(playerid, -1, \"Villogó kitéve.\");
            Siren[GetPlayerVehicleID(playerid)] = 1;
         }
else
{
   Siren[GetPlayerVehicleID(playerid)] = 0;
   DestroyObject(SirenObject[GetPlayerVehicleID(playerid)]);
   SendClientMessage(playerid, -1, \"Villogó levéve.\");
}
}
return 1;
}

Cím: [Segítségkérés] Sziréna Script.
Írta: grove4l - 2013. április 11. - 19:10:44

Azt megtudhatnám hogy hol rontottam el?

Cím: [Segítségkérés] Sziréna Script.
Írta: jana4 - 2013. április 12. - 21:18:53

Hagytál egy \'{\' jelet a kódban, plusz egy kicsit rövidítettem is, vannak azért furcsa szkriptelési szokásaid. :)