Szerző Téma: /chatcolor parancs (Megtekintve 2850 alkalommal)

BoSS · « **Válasz #15 Dátum:** 2012. május 13. - 19:03:45 »

Idézetet írta: Flash date=1336927030\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"21424\" data-ipsquote-contentclass=\"forums_Topic

Két színben gyorsan összedobtam, de nem teszteltem!

#include <a_samp>
#include <zcmd>
CMD:chatcolor(playerid)
{
ShowPlayerDialog(playerid, 5000, DIALOG_STYLE_LIST, \"ChatColor change\", \"Kék\\nPiros\", \"Change!\", \"Mégse\");
return 1;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(dialogid == 5000)
{
if(response)
{
   if(listitem==0)
   {
      SetPVarInt(playerid, \"Kek\", 1);
      SetPVarInt(playerid, \"Piros\", 0);
      SendClientMessage(playerid, -1, \"Kék szövegszín kiválasztva!\");
   }
   if(listitem==1)
   {
      SetPVarInt(playerid, \"Kek\", 0);
      SetPVarInt(playerid, \"Piros\", 1);
      SendClientMessage(playerid, -1, \"Piros szövegszín kiválasztva!\");
   }
}
}
return 1;
}
public OnPlayerText(playerid, text[])
{
      new string[512], Name[MAX_PLAYER_NAME];
GetPlayerName(playerid, Name, MAX_PLAYER_NAME);
if(GetPVarInt(playerid, \"Kek\") == 1)
{
format(string, sizeof(string), \"%s {375FFF}%s\", Name, text);
}
if(GetPVarInt(playerid, \"Piros\") == 1)
{
format(string, sizeof(string), \"%s {E60000}%s\", Name, text);
}
SendClientMessageToAll(GetPlayerColor(playerid), string);
return 0;
}

Ha ezt berakja akkor aki nem írja be a /chatcolor parancsot annak nem fogja mutatni az írását nem?
Csak akkor ha választ szint is....Vagy nem?

Flash · « **Válasz #16 Dátum:** 2012. május 13. - 19:04:54 »

így nem megy?

    #include <a_samp>
    #include <zcmd>
     
    CMD:chatcolor(playerid)
    {
            ShowPlayerDialog(playerid, 5000, DIALOG_STYLE_LIST, \"ChatColor change\", \"Kék\\nPiros\", \"Change!\", \"Mégse\");
            return 1;
    }
     
    public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
    {
            if(dialogid == 5000)
            {
                    if(response)
                    {
                            if(listitem==0)
                            {
                                    SetPVarInt(playerid, \"Kek\", 1);
                                    SetPVarInt(playerid, \"Piros\", 0);
                                    SendClientMessage(playerid, -1, \"Kék szövegszín kiválasztva!\");
                            }
                            if(listitem==1)
                            {
                                    SetPVarInt(playerid, \"Kek\", 0);
                                    SetPVarInt(playerid, \"Piros\", 1);
                                    SendClientMessage(playerid, -1, \"Piros szövegszín kiválasztva!\");
                            }
                    }
            }
            return 1;
    }
     
    public OnPlayerText(playerid, text[])
    {
            new e[200];
            if(GetPVarInt(playerid, \"Kek\") == 1)
            {
            format( e, 200, \"{FFFFFF}(%i){375FFF}%s\", playerid, text );
            }
            if(GetPVarInt(playerid, \"Piros\") == 1)
            {
            format( e, 200, \"{FFFFFF}(%i){E60000}%s\", playerid, text );
            }
            SendPlayerMessageToAll(playerid, e);
            return 0;
    }

FastFurious · « **Válasz #17 Dátum:** 2012. május 13. - 19:14:11 »

nem

Ugy kellene megcsinalni hogy ha még nem irom be hoogy /chatcolor akkor fehér szinûvel irjon az ember
vagyis belépek és fehér szinnel irjon
és ha beirom /chatcolor --> piros akkor pirossal irjon!

Flash · « **Válasz #18 Dátum:** 2012. május 13. - 21:50:37 »

#include <a_samp>
#include <zcmd>
public OnPlayerConnect(playerid)
{
SetPVarInt(playerid, \"Alap\", 1);
return 1;
}
CMD:chatcolor(playerid)
{
ShowPlayerDialog(playerid, 5000, DIALOG_STYLE_LIST, \"ChatColor change\", \"Kék\\nPiros\\nAlap\", \"Change!\", \"Mégse\");
return 1;
}
public OnPlayerText(playerid, text[])
{
new e[200];
if(GetPVarInt(playerid, \"Kek\") == 1)
{
   format( e, 200, \"{FFFFFF}(%i){375FFF}%s\", playerid, text );
}
if(GetPVarInt(playerid, \"Piros\") == 1)
{
   format( e, 200, \"{FFFFFF}(%i){E60000}%s\", playerid, text );
}
if(GetPVarInt(playerid, \"Alap\") == 1)
{
   format( e, 200, \"{FFFFFF}(%i){FFFFFF}%s\", playerid, text );
}
SendPlayerMessageToAll(playerid, e);
return 0;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
    if(dialogid == 5000)
    {
       if(response)
        {
            if(listitem==0)
           {
               SetPVarInt(playerid, \"Kek\", 1);
                SetPVarInt(playerid, \"Piros\", 0);
                SetPVarInt(playerid, \"Alap\", 0);
      SendClientMessage(playerid, -1, \"Kék szövegszín kiválasztva!\");
          }
          if(listitem==1)
            {
                SetPVarInt(playerid, \"Kek\", 0);
                SetPVarInt(playerid, \"Piros\", 1);
                SetPVarInt(playerid, \"Alap\", 0);
             SendClientMessage(playerid, -1, \"Piros szövegszín kiválasztva!\");
            }
           if(listitem==2)
            {
                SetPVarInt(playerid, \"Kek\", 0);
        SetPVarInt(playerid, \"Piros\", 0);
             SetPVarInt(playerid, \"Alap\", 1);
                SendClientMessage(playerid, -1, \"Alap szövegszín (fehér) kiválasztva!\");
             }
          }
    }
return 1;
}

Teszteltem: MÛKÖDIK!

FastFurious · « **Válasz #19 Dátum:** 2012. május 14. - 05:41:38 »

Nagyon szépen köszi a segitséget mindenkitõl (fõleg Flash-tól)
ment a ++

FastFurious · « **Válasz #20 Dátum:** 2012. május 13. - 18:20:21 »

Hi all!
Valaki megscripteli azt hogy ha beirom /chatcolor elõ jön egy dialog és ott vannak szinek és ha a pirosra kattintok akkor piros szinû lessz az irás!

SyncMaster · « **Válasz #21 Dátum:** 2012. május 13. - 18:22:13 »

Van ilyen?

Flash · « **Válasz #22 Dátum:** 2012. május 13. - 18:24:10 »

Nem copy-zz..
De ésszel meg lehet írni..

FastFurious · « **Válasz #23 Dátum:** 2012. május 13. - 18:24:50 »

jah láttam más szerverbe!
(de nem azért kell mert más szerójáról akarok másolni) :mistrust:

Flash · « **Válasz #24 Dátum:** 2012. május 13. - 18:28:14 »

public OnPlayerText(playerid, text[])
{
new string[512];
if(GetPVarInt(playerid, \"Kek\") == 1)
{
format(string, sizeof(string), \"%s: {375FFF}%s\", Nome(playerid), text);
}
SendClientMessageToAll(GetPlayerColor(playerid), string);
return 0;
}

S így...

FastFurious · « **Válasz #25 Dátum:** 2012. május 13. - 18:29:42 »

Kösz de ilyen scriptet adtak vagy 10 en is
nekem olyan kell hogy /chatcolor és ugy tudok szint váltani!

Flash · « **Válasz #26 Dátum:** 2012. május 13. - 18:37:10 »

Két színben gyorsan összedobtam, de nem teszteltem!

#include <a_samp>
#include <zcmd>
CMD:chatcolor(playerid)
{
ShowPlayerDialog(playerid, 5000, DIALOG_STYLE_LIST, \"ChatColor change\", \"Kék\\nPiros\", \"Change!\", \"Mégse\");
return 1;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(dialogid == 5000)
{
if(response)
{
   if(listitem==0)
   {
      SetPVarInt(playerid, \"Kek\", 1);
      SetPVarInt(playerid, \"Piros\", 0);
      SendClientMessage(playerid, -1, \"Kék szövegszín kiválasztva!\");
   }
   if(listitem==1)
   {
      SetPVarInt(playerid, \"Kek\", 0);
      SetPVarInt(playerid, \"Piros\", 1);
      SendClientMessage(playerid, -1, \"Piros szövegszín kiválasztva!\");
   }
}
}
return 1;
}
public OnPlayerText(playerid, text[])
{
      new string[512], Name[MAX_PLAYER_NAME];
GetPlayerName(playerid, Name, MAX_PLAYER_NAME);
if(GetPVarInt(playerid, \"Kek\") == 1)
{
format(string, sizeof(string), \"%s {375FFF}%s\", Name, text);
}
if(GetPVarInt(playerid, \"Piros\") == 1)
{
format(string, sizeof(string), \"%s {E60000}%s\", Name, text);
}
SendClientMessageToAll(GetPlayerColor(playerid), string);
return 0;
}

FastFurious · « **Válasz #27 Dátum:** 2012. május 13. - 18:45:05 »

kösz de ha modba teszem akkor a pawno lefagy ha scriptbe akkor jol elmenti

Flash · « **Válasz #28 Dátum:** 2012. május 13. - 18:46:31 »

h-h lefagy? Lehet szarul tetted be. :O

ZyZu. · « **Válasz #29 Dátum:** 2012. május 13. - 18:48:04 »

Mod elejére #define 5000 dialog neve..

Szerző Téma: /chatcolor parancs (Megtekintve 2850 alkalommal)

SyncMaster