Szerző Téma: [FS] Neon menü by: infinitY (Kezdõknek) (Egyszerû)  (Megtekintve 2101 alkalommal)

[FS] Neon menü by: infinitY (Kezdõknek) (Egyszerû)
« Dátum: 2014. július 18. - 16:40:54 »
0 Show voters
Sziasztok!
A mai napon egy neon menüt rakok ki a fórumra.
Tulajdonságai: Dialogos, összes neon fajta, 112 soros.
Parancs: /neonmenu
Készítõ: Én
Tudom hogy nem nagy valami, de kezdõknek jóljöhet :)
Code:
 
/*||||||||||||||||||||||||||
  ||||||||||||||||||||||||||
  ||||       ||||||    |||||
  ||||    |   |||||    |||||
  ||||    ||   ||||    |||||
  ||||    |||   |||    |||||
  ||||    ||||   ||    |||||                                                    By: _NoS_ \"infinitY\"
  ||||    |||||   |    |||||
  ||||    ||||||       |||||
  ||||    |||||||      |||||
  ||||    ||||||||     |||||
  ||||||||||||||||||||||||||
  ||||||||||||||||||||||||||*/
 
#include <a_samp>
#define DIALOG_NEON 1679
public OnFilterScriptInit()
{
print(\"\\n------------------------------------------\");
print(\" Neon script by: _NoS_ \'infinitY\' betöltve.\");
print(\"------------------------------------------\\n\");
return 1;
}
public OnFilterScriptExit()
{
print(\"\\n------------------------------------------\");
print(\" Neon script by: _NoS_ \'infinitY\' kilõve.\");
print(\"------------------------------------------\\n\");
return 1;
}
public OnPlayerCommandText(playerid, cmdtext[])
{
if (strcmp(\"/neonmenu\", cmdtext, true, 10) == 0)
{
if(IsPlayerInAnyVehicle(playerid))
{
ShowPlayerDialog(playerid, DIALOG_NEON, DIALOG_STYLE_LIST, \"Neon menü by: _NoS_ \'infinitY\'\", \"Piros neon\\nKék neon\\nZöld neon\\nFehér neon\\nCitrom sz. neon\\nPink neon\", \"Választ\", \"Kilép\");
}
else
{
SendClientMessage(playerid, 0xff0000AA, \"Te nem vagy jármûben!\");
}
return 1;
}
return 0;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(dialogid == DIALOG_NEON)
{
if(response)
{
   if(listitem == 0)
   {
   new red = CreateObject(18647,0,0,-1000,0,0,0,100);
   AttachObjectToVehicle(red, GetPlayerVehicleID(playerid), -0.974999,-0.075000,-0.600000,0.000000,0.000000,0.000000);
   new red2 = CreateObject(18647,0,0,-1000,0,0,0,100);
   AttachObjectToVehicle(red2, GetPlayerVehicleID(playerid), 0.974999,-0.075000,-0.600000,0.000000,0.000000,0.000000);
   SendClientMessage(playerid, 0xff0000AA, \"Piros neon a jármûveden!\");
   }
   if(listitem == 1)
            {
   new blue = CreateObject(18648,0,0,-1000,0,0,0,100);
   AttachObjectToVehicle(blue, GetPlayerVehicleID(playerid), -0.974999,-0.075000,-0.600000,0.000000,0.000000,0.000000);
   new blue2 = CreateObject(18648,0,0,-1000,0,0,0,100);
   AttachObjectToVehicle(blue2, GetPlayerVehicleID(playerid), 0.974999,-0.075000,-0.600000,0.000000,0.000000,0.000000);
   SendClientMessage(playerid, 0x0066ffAA, \"Kék neon a jármûveden!\");
            }
            if(listitem == 2)
            {
   new green = CreateObject(18649,0,0,-1000,0,0,0,100);
   AttachObjectToVehicle(green, GetPlayerVehicleID(playerid), -0.974999,-0.075000,-0.600000,0.000000,0.000000,0.000000);
   new green2 = CreateObject(18649,0,0,-1000,0,0,0,100);
   AttachObjectToVehicle(green2, GetPlayerVehicleID(playerid), 0.974999,-0.075000,-0.600000,0.000000,0.000000,0.000000);
   SendClientMessage(playerid, 0x22c900AA, \"Zöld neon a jármûveden!\");
            }
            if(listitem == 3)
            {
   new white = CreateObject(18652,0,0,-1000,0,0,0,100);
   AttachObjectToVehicle(white, GetPlayerVehicleID(playerid), -0.974999,-0.075000,-0.600000,0.000000,0.000000,0.000000);
   new white2 = CreateObject(18652,0,0,-1000,0,0,0,100);
   AttachObjectToVehicle(white2, GetPlayerVehicleID(playerid), 0.974999,-0.075000,-0.600000,0.000000,0.000000,0.000000);
   SendClientMessage(playerid, 0x999999AA, \"Fehér neon a jármûveden!\");
            }
            if(listitem == 4)
            {
   new yellow = CreateObject(18650,0,0,-1000,0,0,0,100);
   AttachObjectToVehicle(yellow, GetPlayerVehicleID(playerid), -0.974999,-0.075000,-0.600000,0.000000,0.000000,0.000000);
   new yellow2 = CreateObject(18650,0,0,-1000,0,0,0,100);
   AttachObjectToVehicle(yellow2, GetPlayerVehicleID(playerid), 0.974999,-0.075000,-0.600000,0.000000,0.000000,0.000000);
   SendClientMessage(playerid, 0xfff200AA, \"Sárga neon a jármûveden!\");
            }
            if(listitem == 5)
            {
   new pink = CreateObject(18651,0,0,-1000,0,0,0,100);
   AttachObjectToVehicle(pink, GetPlayerVehicleID(playerid), -0.974999,-0.075000,-0.600000,0.000000,0.000000,0.000000);
   new pink2 = CreateObject(18651,0,0,-1000,0,0,0,100);
   AttachObjectToVehicle(pink2, GetPlayerVehicleID(playerid), 0.974999,-0.075000,-0.600000,0.000000,0.000000,0.000000);
   SendClientMessage(playerid, 0xff00ccAA, \"Pink neon a jármûveden!\");
            }
}
}else{
SendClientMessage(playerid, 0x00c264AA, \"Bezártad a neon menü-t.\");
}
return 1;
}

 

« Utoljára szerkesztve: 2014. július 18. - 18:30:56 írta infinitY »

[FS] Neon menü by: infinitY (Kezdõknek) (Egyszerû)
« Válasz #1 Dátum: 2014. július 19. - 00:37:02 »
0 Show voters
Én a neon rendszer-t úgy szoktam megírni hogy 1-oldalra rakjon  majd  a másikra is lehessen rakni pl Zöldet.

Nem elérhető Nátha

  • 1036
    • Profil megtekintése
[FS] Neon menü by: infinitY (Kezdõknek) (Egyszerû)
« Válasz #2 Dátum: 2014. július 19. - 01:12:12 »
0 Show voters
Én pedig hiányolom belõle a neon törlését.
Mert ha rárakod és megunod nem tudod levenni, ha pedig tuningolt kocsiról van szó akkor vagy megszokod a neont vagy tuningolsz újat :D

[FS] Neon menü by: infinitY (Kezdõknek) (Egyszerû)
« Válasz #3 Dátum: 2014. július 19. - 11:46:10 »
0 Show voters
Idézetet írta: Nátha date=1405725132\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"49533\" data-ipsquote-contentclass=\"forums_Topic
Én pedig hiányolom belõle a neon törlését.
Mert ha rárakod és megunod nem tudod levenni, ha pedig tuningolt kocsiról van szó akkor vagy megszokod a neont vagy tuningolsz újat :D
 


Én a neon rendszer-t úgy szoktam megírni hogy 1-oldalra rakjon  majd  a másikra is lehessen rakni pl Zöldet.
 
[/quote]
Kössz az ötleteket. Lehet hogy megvalósítom.  ;)
« Utoljára szerkesztve: 2014. július 19. - 12:43:19 írta infinitY »

[FS] Neon menü by: infinitY (Kezdõknek) (Egyszerû)
« Válasz #4 Dátum: 2017. augusztus 25. - 02:29:59 »
0 Show voters
help valaki segít be másoltam pawnoba és ezt írta ki.C:\\Documents and Settings\\user\\Asztal\\Untitled.pwn(75) : warning 217: loose indentation ez mi nem vagyok egy pawno tudós. :D

[FS] Neon menü by: infinitY (Kezdõknek) (Egyszerû)
« Válasz #5 Dátum: 2017. augusztus 25. - 02:30:18 »
0 Show voters
Idézetet írta: kriszhd22 date=1503620999


   
      help valaki segít be másoltam pawnoba és ezt írta ki.C:\\Documents and Settings\\user\\Asztal\\Untitled.pwn(75) : warning 217: loose indentation ez mi nem vagyok egy pawno tudós. :D
   


 

[FS] Neon menü by: infinitY (Kezdõknek) (Egyszerû)
« Válasz #6 Dátum: 2017. augusztus 25. - 03:10:05 »
0 Show voters
Az adott sorban ami nálad a 75-ös elcsúszött valami, sima warning így figyelmen kívül lehet hagyni. :)

 

SimplePortal 2.3.7 © 2008-2024, SimplePortal