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

San Andreas Multiplayer (SA-MP) => SA-MP: Szerverfejlesztés => A témát indította: Yakuza™ - 2012. Március 15. - 21:46:21

Cím: Sziréna neon
Írta: Yakuza™ - 2012. Március 15. - 21:46:21
Csináltam egy olyat,hogy ha beirjuk,hogy /sziréna bejön egy dialog és az admin tud rakni a kocsira szirénát de le is tudja venni..
Script:
 
#include <a_samp>
#include ladmin
#define hiba    0xFF0000AA
public OnFilterScriptInit()
{
print(\"\\n************************************\");
print(\"         Sziréna Betöltve       \");
print(\"************************************\\n\");
return 1;
}
public OnFilterScriptExit()
{
print(\"\\n***************************************\");
print(\"         Sziréna Kikapcsolva         \");
print(\"***************************************\\n\");
return 1;
}
 
public OnPlayerCommandText(playerid, cmdtext[])
{
if(strcmp(cmdtext, \"/sziréna\", true)==0)
{
  if(IsPlayerLuxAdmin(playerid))
{
    ShowPlayerDialog(playerid, 8899, DIALOG_STYLE_LIST, \"Sziréna System By Yakuza\", \"Sziréna\\nSziréna törlése\", \"Kiválaszt\", \"Kilépés\");
}
else
{
SendClientMessage(playerid, hiba, \"Nem vagy rendszervezet tagja!\");
}
return 1;
}
return 0;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(dialogid == 8899)
{
if(response)
{
   if(listitem == 0)
   {
      SetPVarInt(playerid, \"Status\", 1);
            SetPVarInt(playerid, \"undercover\", CreateObject(18646,0,0,0,0,0,0));
            SetPVarInt(playerid, \"undercover1\", CreateObject(18646,0,0,0,0,0,0));
            AttachObjectToVehicle(GetPVarInt(playerid, \"undercover\"), GetPlayerVehicleID(playerid), -0.5, -0.2, 0.8, 2.0, 2.0, 3.0);
            AttachObjectToVehicle(GetPVarInt(playerid, \"undercover1\"), GetPlayerVehicleID(playerid), -0.5, -0.2, 0.8, 2.0, 2.0, 3.0);
            SendClientMessage(playerid, 0x00FFFFAA, \"Sziréna felrakva!\");
   }
   if(listitem == 1)
   {
            DestroyObject(GetPVarInt(playerid, \"undercover\"));
            DeletePVar(playerid, \"Status\");
            DestroyObject(GetPVarInt(playerid, \"undercover1\"));
            DeletePVar(playerid, \"Status\");
          }
}
}
return 0;
}

 
Civil is tudja használni:
 
#include <a_samp>
#include ladmin
#define hiba    0xFF0000AA
public OnFilterScriptInit()
{
print(\"\\n************************************\");
print(\"         Sziréna Betöltve       \");
print(\"************************************\\n\");
return 1;
}
public OnFilterScriptExit()
{
print(\"\\n***************************************\");
print(\"         Sziréna Kikapcsolva         \");
print(\"***************************************\\n\");
return 1;
}
 
public OnPlayerCommandText(playerid, cmdtext[])
{
if(strcmp(cmdtext, \"/sziréna\", true)==0)
    ShowPlayerDialog(playerid, 8899, DIALOG_STYLE_LIST, \"Sziréna System By Yakuza\", \"Sziréna\\nSziréna törlése\", \"Kiválaszt\", \"Kilépés\");
}
return 1;
}
return 0;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(dialogid == 8899)
{
if(response)
{
   if(listitem == 0)
   {
      SetPVarInt(playerid, \"Status\", 1);
            SetPVarInt(playerid, \"undercover\", CreateObject(18646,0,0,0,0,0,0));
            SetPVarInt(playerid, \"undercover1\", CreateObject(18646,0,0,0,0,0,0));
            AttachObjectToVehicle(GetPVarInt(playerid, \"undercover\"), GetPlayerVehicleID(playerid), -0.5, -0.2, 0.8, 2.0, 2.0, 3.0);
            AttachObjectToVehicle(GetPVarInt(playerid, \"undercover1\"), GetPlayerVehicleID(playerid), -0.5, -0.2, 0.8, 2.0, 2.0, 3.0);
            SendClientMessage(playerid, 0x00FFFFAA, \"Sziréna felrakva!\");
   }
   if(listitem == 1)
   {
            DestroyObject(GetPVarInt(playerid, \"undercover\"));
            DeletePVar(playerid, \"Status\");
            DestroyObject(GetPVarInt(playerid, \"undercover1\"));
            DeletePVar(playerid, \"Status\");
          }
}
}
return 0;
}

 
Valakinek jól jöhet :D
Edit:
ladmin.inc
http://solidfiles.com/d/bc5089d7c9/
Cím: Sziréna neon
Írta: Dead - 2012. Március 15. - 21:56:52
Jó!
Off: de mi az az ladmin.inc?  xd  sztem linkeld meg.
Cím: Sziréna neon
Írta: Yakuza™ - 2012. Március 16. - 09:36:51
Köszönöm,hogy szóltál!
Itt a link:
ladmin.inc letöltés
Cím: Sziréna neon
Írta: lackos888 - 2012. Március 16. - 09:44:08
Ez egy neon scriptbõl vett részlet, mivel a neon scriptbe is így van az 1-ikbe talán.
Cím: Sziréna neon
Írta: Meta Pro - 2012. Március 16. - 09:56:53
Idézetet írta: lackos888 date=1331887448\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"18561\" data-ipsquote-contentclass=\"forums_Topic
Ez egy neon scriptbõl vett részlet, mivel a neon scriptbe is így van az 1-ikbe talán.
 
Viszont van akinek így kell!
Cím: Sziréna neon
Írta: CANNONN - 2012. Március 16. - 10:56:14
A második kódba nem kell az if(IsPlayerLuxAdmin(playerid)).
Amúgy jó lett!
Cím: Sziréna neon
Írta: SuBaRu - 2012. Március 16. - 10:57:49
nekem tetszik jo :)
Cím: Sziréna neon
Írta: Yakuza™ - 2012. Március 16. - 11:01:45
Cannonn javítva! :)
Akkor jó ha tetszik.
Cím: Sziréna neon
Írta: Neon - 2012. Május 13. - 13:09:07
Jó lett
Cím: Sziréna neon
Írta: Neon - 2012. Május 13. - 13:09:07
Jó lett
Cím: Sziréna neon
Írta: MaRcK - 2012. Június 16. - 13:48:53
Copyzni konnyu-.- Trucks And Trailers-rol copyztad es elsajatitottad hat ugyes vagy-.-
Cím: Sziréna neon
Írta: instant - 2012. Június 16. - 13:52:03
Idézetet írta: MaRcK date=1339847333\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"18561\" data-ipsquote-contentclass=\"forums_Topic
Copyzni konnyu-.- Trucks And Trailers-rol copyztad es elsajatitottad hat ugyes vagy-.-
 
bizonyítékkal vádolj + így magába is könnyû megcsinálni
Cím: Sziréna neon
Írta: norbee0170 - 2012. Június 16. - 13:57:36
én csak ennyit mondok:
 
Re:Sziréna neon
« Válasz #8 Dátum: 2012. Május 13. 13:09:07 »

 
és ha már ittjárok, 8 millió 1 ezer ilyen neon script van amiben benne van, szal nehéz lenne kideríteni \"HA COPY\" h honnan szedte ki
Cím: Sziréna neon
Írta: Kovacs_Bela - 2012. Június 16. - 16:33:58
szerintem ez is olyan mint amit a tesóm már egyszer kitalált ;)
http://forum.sa-mp.com/showthread.php?t=343224
Cím: Sziréna neon
Írta: norbee0170 - 2012. Június 16. - 16:52:32
Idézetet írta: danix99 date=1339857238\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"18561\" data-ipsquote-contentclass=\"forums_Topic
szerintem ez is olyan mint amit a tesóm már egyszer kitalált ;)
http://forum.sa-mp.com/showthread.php?t=343224
 
csak az kicsit komolyabb :D