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: xD1999 - 2013. június 05. - 17:54:56

Cím: Színválasztó script by xD1999(zcmd,0.3x)15 szín
Írta: xD1999 - 2013. június 05. - 17:54:56

Helló Újra :D

Elhoztam nektek a mai scriptemet ami 1 színváltó lesz

Nem is húzom tovább az idõt:

Készítõ:xD1999(én)

Készítési idõ(színek keresésével együtt):20 perc(kezdõ vagyok)

Színek száma:15

Script típusa:Dialog

Színfélék:Piros,Kék,Zöld,Rózsaszín,Sárga,Fehér,Bíbor Vörös,Sötét Bíbor Vörös,Narancs Sárga,Sárgás Zöld,Sötét Rózsaszín,Sötét Piros,Sötét Zöld,Sötét Narancs Sárga,Arany,Fekete.

A script:

//Includék
#include <a_samp> //a_samp include
#include <zcmd> //zcmd include
#pragma tabsize 0 //Sorok elcsuszás figyekmenkivülhagyása
//Defináciok
#define szinek 111
#if defined FILTERSCRIPT //Itt defináljuk hogy ez 1 filterscript
 
public OnFilterScriptInit()
{
print(\"\\n--------------------------------------\");
print(\" Szinváltó script by xD1999 betöltve\");
print(\"--------------------------------------\\n\");
return 1;
}
 
#else
 
public OnPlayerConnect(playerid)
{
SendClientMessage(playerid,0x0000FFAA,\"{FF0000}Unod már a régi szinedet?{00FF00}Használd /color parancsot!\");
return 1;
}
 
    public OnDialogResponse ( playerid, dialogid, response, listitem, inputtext [ ] )
    {
        if (dialogid == szinek )
        {
            if ( !response )
            {
                  SendClientMessage ( playerid, 0xFF0000FF, \"Te kiléptél a dialogból!\" );
                  return 1;
               }
      if (listitem == 0)
           {
            SetPlayerColor(playerid,0xAA3333AA);
            SendClientMessage(playerid,0xAA3333AA,\"***Szinet átállítva piros-ra\");
               }
               if (listitem == 1)
           {
            SetPlayerColor(playerid,0x0000FFAA);
            SendClientMessage(playerid,0x0000FFAA,\"***Szinet átállítva kék-re\");
               }
      if (listitem == 2)
           {
            SetPlayerColor(playerid,0xAFAFAFAA);
            SendClientMessage(playerid,0xAFAFAFAA,\"***Szinet átállítva zöld-re\");
               }
      if (listitem == 3)
           {
            SetPlayerColor(playerid,0xFF66FFAA);
            SendClientMessage(playerid,0xFF66FFAA,\"***Szinet átállítva rózsaszin-re\");
               }
      if (listitem == 4)
           {
            SetPlayerColor(playerid,0xFFFF00AA);
            SendClientMessage(playerid,0xFFFF00AA,\"***Szinet átállítva sárgá-ra\");
               }
      if (listitem == 5)
           {
            SetPlayerColor(playerid,0xFFFFFFAA);
            SendClientMessage(playerid,0xFFFFFFAA,\"***Szinet átállítva fehér-re\");
               }
      if (listitem == 6)
           {
            SetPlayerColor(playerid,0xFF00FFFF);
            SendClientMessage(playerid,0xFF00FFFF,\"***Szinet átállítva bibör vörös-re\");
               }
      if (listitem == 7)
           {
            SetPlayerColor(playerid,0x8B008BAA);
            SendClientMessage(playerid,0x8B008BAA,\"***Szinet átállítva sötét bibor vörös-re\");
               }
      if (listitem == 8)
           {
            SetPlayerColor(playerid,0xFF9900AA);
            SendClientMessage(playerid,0xFF9900AA,\"***Szinet átállítva narancs sárgá-ra\");
               }
      if (listitem == 9)
           {
            SetPlayerColor(playerid,0xFF1493FF);
            SendClientMessage(playerid,0xFF1493FF,\"***Szinet átállítva sötét rózsaszin-re\");
               }
      if (listitem == 10)
           {
            SetPlayerColor(playerid,0xFF0606FF);
            SendClientMessage(playerid,0xFF0606FF,\"***Szinet átállítva sötét piros-ra\");
               }
               if (listitem == 11)
           {
            SetPlayerColor(playerid,0x006400FF);
            SendClientMessage(playerid,0x006400FF,\"***Szinet átállítva sötét zöld-re\");
               }
      if (listitem == 12)
           {
            SetPlayerColor(playerid,0xFF8C00FF);
            SendClientMessage(playerid,0xFF8C00FF,\"***Szinet átállítva sötét narancs sárgá-ra\");
               }
      if (listitem == 13)
           {
            SetPlayerColor(playerid,0xFFD700FF);
            SendClientMessage(playerid,0xFFD700FF,\"***Szinet átállítva arany-ra\");
               }
               if (listitem == 14)
           {
            SetPlayerColor(playerid,0x000000FF);
            SendClientMessage(playerid,0x000000FF,\"***Szinet átállítva feketé-re\");
               }
            return 1;
        }
        return 0;
    }
CMD:color(playerid, params[])
{
ShowPlayerDialog(playerid, szinek, DIALOG_STYLE_LIST, \"Színek\",\"{FF0000}Piros\\n{0000FF}Kék\\n{00FF00}Zöld\\n{DDA0DD}Rózsaszín\\n{FFFF00}Sárga\\n{FFFFFF}Fehér\\n{FF00FF}Bíbor Vörös\\n{8B008B}Sötét Bíbor Vörös\\n{FFA500}Narancs Sárga\\n{9ACD32}Sárgás Zöld\\n{FF1493}Sötét Rózsaszín\\n{8B0000}Sötét Piros\\n{006400}Sötét Zöld\\n{FF8C00}Sötét Narancs Sárga\\n{FFD700}Arany\\n{000000}Fekete\", \"Kiválaszt!\",\"Kilépés!\");
return 1;
}
#endif

Képek:
$\"879112242sa-mp-014_www.kepfeltoltes.hu_.png\"$
$\"396785412sa-mp-016_www.kepfeltoltes.hu_.png\"$
Színek forrása:

http://forum.sa-mp.com/showthread.php?t=157789

http://www.w3schools.com/html/html_colornames.asp
Hibát NEM találtam ha találtok szóljatok!

Cím: Színválasztó script by xD1999(zcmd,0.3x)15 szín
Írta: huhboy - 2013. június 05. - 22:39:57

ha már egyszer publikálsz valami scriptet egy magyar oldalon, legalább a magyar helyesírásra figyelnél oda -.-\"

Cím: Színválasztó script by xD1999(zcmd,0.3x)15 szín
Írta: xD1999 - 2013. június 06. - 13:16:32

B+ nem magyar vagyok majd a fórumosok segitenek javitani

Cím: Színválasztó script by xD1999(zcmd,0.3x)15 szín
Írta: ECS_Tom - 2013. június 06. - 14:05:33

#define szinek 111 ez mi lenne? elmagyaráznád? ezen a soron kívül sehol nem használod a szinek konstansot. A másik én tömbbe raknám a színeket és egy másik tömbbe a színek neveit! sokkal jabban járnál vele, és spórolnál vele pár sort... De dicséretes, hogy használod a zcmd-t

Cím: Színválasztó script by xD1999(zcmd,0.3x)15 szín
Írta: Loren - 2013. június 06. - 14:16:24

Lehetne jobb is, a helyesírás az szörnyû, legalább zcmd-t használtál!

Cím: Színválasztó script by xD1999(zcmd,0.3x)15 szín
Írta: [(The_Pro_Kari)] - 2013. június 06. - 14:17:37

#define szinek 111
Ezt õ jelenleg a dialogoknál használja

if (dialogid == 111 )
        {

ShowPlayerDialog(playerid, 111,

Csak máskor nézd meg jobban miután próbálod leégetni. ;)
U.I.: Helyesírásért meg ne basztassátok mert nem Magyarországon él és tanul. Szerintem sokaknak elég hasznos lehet.

Cím: Színválasztó script by xD1999(zcmd,0.3x)15 szín
Írta: ECS_Tom - 2013. június 06. - 14:19:54

if (dialogid == szinek )
        {

Szerintem így lenne helyes, és nem leégetni akarom, hanem ösztönözni, hogy máskor figyeljen egy picit jobban arrra, amit csinál

Cím: Színválasztó script by xD1999(zcmd,0.3x)15 szín
Írta: [(The_Pro_Kari)] - 2013. június 06. - 14:22:54

Annyi igaz hogy úgy jobb lenne, de még elég kezdõ örüljünk hogy egy ilyet össze rakott nekünk.

Cím: Színválasztó script by xD1999(zcmd,0.3x)15 szín
Írta: ECS_Tom - 2013. június 06. - 14:27:04

Idézetet írta: _KaRi_ date=1370521374\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"38178\" data-ipsquote-contentclass=\"forums_Topic

Annyi igaz hogy úgy jobb lenne, de még elég kezdõ örüljünk hogy egy ilyet össze rakott nekünk.

Én örülök, remélem csinál majd valami forradalmi újítást... Addig meg tanul
Csak PMbe nem ezt írta nekem :) mármint hogy õ kezdõ scripter...

Cím: Színválasztó script by xD1999(zcmd,0.3x)15 szín
Írta: [(The_Pro_Kari)] - 2013. június 06. - 14:29:48

Általában senki nem tudja hogy maga milyen scripter a kezdõk azt hiszik hogy megváltják a gagyi cuccaikkal a samp világát és profinak nevezik magukat. Na az OFF-tól térjünk el.
egy \"+\"-t adtam neked ikszdé

Cím: Színválasztó script by xD1999(zcmd,0.3x)15 szín
Írta: ECS_Tom - 2013. június 06. - 14:32:25

Még annyit segítek, hogy a PAWN is és a HTML is hex színeket használ. Csak más formátumban. A HTML féle hex kódban nincs alfa... (rgba-val lehet elõteremteni az alfát, csak sok böngészõ nem támogatja, és ez már nem is HTML hanem CSS)
0x----->FF0000<-----FF az a rész a HTML formátumú hex kód. Remélem segítettem

Cím: Színválasztó script by xD1999(zcmd,0.3x)15 szín
Írta: jana4 - 2013. június 06. - 16:33:02

Ez az #if defined FILTERSCRIPT-es dolog nagyon nagy baromság.

A másik, ha már definiáltad a színek párbeszédpaneljének az azonosítószámát, miért nem alkalmazod?
Itt az egyszerûbb változat, tõlem. Ezt még jobban lelehetne egyszerûsíteni.


#include a_samp
#include zcmd
#define SzinekDialog 111
public ChangePlayerColor(playerid, colorid);
public OnFilterScriptInit()
{
print(\"\\n--------------------------------------\");
print(\"Színváltó szkript by xD1999 betöltve\");
print(\"--------------------------------------\\n\");
return 1;
}
public OnPlayerConnect(playerid) SendClientMessage(playerid, -1, \"{FF0000}Unod már a régi színedet? {00FF00}Használd a /color parancsot!\");
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(dialogid == SzinekDialog)
{
if(!response) return SendClientMessage(playerid, 0xFF0000FF, \"Kiléptél a párbeszédpanelbõl!\");
else ChangePlayerColor(playerid, listitem);
}
return 1;
}
public ChangePlayerColor(playerid, colorid)
{
switch(colorid)
{
    case 0: SetPlayerColor(playerid, 0xAA3333AA), SendClientMessage(playerid, -1, \"Színed átállítva: Piros\");
    case 1: SetPlayerColor(playerid, 0x0000FFAA), SendClientMessage(playerid, -1, \"Színed átállítva: Kék\");
    case 2: SetPlayerColor(playerid, 0xAFAFAFAA), SendClientMessage(playerid, -1, \"Színed átállítva: Zöld\");
    case 3: SetPlayerColor(playerid, 0xFF66FFAA), SendClientMessage(playerid, -1, \"Színed átállítva: Rózsaszín\");
    case 4: SetPlayerColor(playerid, 0xFFFF00AA), SendClientMessage(playerid, -1, \"Színed átállítva: Sárga\");
    case 5: SetPlayerColor(playerid, 0xFFFFFFAA), SendClientMessage(playerid, -1, \"Színed átállítva: Fehér\");
    case 6: SetPlayerColor(playerid, 0xFF00FFFF), SendClientMessage(playerid, -1, \"Színed átállítva: Bíborvörös\");
    case 7: SetPlayerColor(playerid, 0x8B008BAA), SendClientMessage(playerid, -1, \"Színed átállítva: Sötét bíborvörös\");
    case 8: SetPlayerColor(playerid, 0xFF9900AA), SendClientMessage(playerid, -1, \"Színed átállítva: Narancssárga\");
    case 9: SetPlayerColor(playerid, 0xFF1493FF), SendClientMessage(playerid, -1, \"Színed átállítva: Sötétrózsaszín\");
    case 10: SetPlayerColor(playerid, 0xFF0606FF), SendClientMessage(playerid, -1, \"Színed átállítva: Sötétpiros\");
    case 11: SetPlayerColor(playerid, 0x006400FF), SendClientMessage(playerid, -1, \"Színed átállítva: Sötétzöld\");
    case 12: SetPlayerColor(playerid, 0xFF8C00FF), SendClientMessage(playerid, -1, \"Színed átállítva: Sötét narancssárga\");
    case 13: SetPlayerColor(playerid, 0xFFD700FF), SendClientMessage(playerid, -1, \"Színed átállítva: Arany\");
    case 14: SetPlayerColor(playerid, 0x000000FF), SendClientMessage(playerid, -1, \"Színed átállítva: Fekete\");
}
return 1;
}
CMD:color(playerid)
{
ShowPlayerDialog(playerid, SzinekDialog, DIALOG_STYLE_LIST, \"Színek\", \"{FF0000}Piros\\n{0000FF}Kék\\n{00FF00}Zöld\\n{DDA0DD}Rózsaszín\\n{FFFF00}Sárga\\n{FFFFFF}Fehér\\n{FF00FF}Bíborvörös\\n{8B008B}Sötét bíborvörös\\n{FFA500}Narancssárga\\n{9ACD32}Sárgászöld\\n{FF1493}Sötétrózsaszín\\n{8B0000}Sötétpiros\\n{006400}Sötétzöld\\n{FF8C00}Sötét narancssárga\\n{FFD700}Arany\\n{000000}Fekete\", \"Kiválaszt!\", \"Kilépés!\");
return 1;
}

Vagy letölthetõ itt ----> http://www.solidfiles.com/d/a4dc48b0b6/

Idézetet írta: xD1999 date=1370517392\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"38178\" data-ipsquote-contentclass=\"forums_Topic

bö nem magyar vagyok majd a fórumosok segitenek javitani

Ez legrosszabb amit egy magyar fórumon, magyar nyelven írhattál le.

Cím: Színválasztó script by xD1999(zcmd,0.3x)15 szín
Írta: xD1999 - 2013. június 06. - 18:53:12

Idézetet írta: ECS_Tom date=1370520333\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"38178\" data-ipsquote-contentclass=\"forums_Topic

#define szinek 111 ez mi lenne? elmagyaráznád? ezen a soron kívül sehol nem használod a szinek konstansot. A másik én tömbbe raknám a színeket és egy másik tömbbe a színek neveit! sokkal jabban járnál vele, és spórolnál vele pár sort... De dicséretes, hogy használod a zcmd-t

Az kérem szépen a dialog ID je !

Cím: Színválasztó script by xD1999(zcmd,0.3x)15 szín
Írta: ECS_Tom - 2013. június 06. - 19:05:56

Én pontosan tudtam mit akartál, de ahogy ScreaM is leírta, hibásan használod, sõt tulképp nem is használod
Lehet egy kicsit durván fogalmaztam, de a tényeken nem változtat

Cím: Színválasztó script by xD1999(zcmd,0.3x)15 szín
Írta: Ja]SP[eR - 2013. június 07. - 14:21:03

jó lett...D

Cím: Színválasztó script by xD1999(zcmd,0.3x)15 szín
Írta: xD1999 - 2013. június 07. - 19:38:15

Köszi
És KaRi neked is köszönöm!