Stuneris

pColorChange

Jul 26th, 2011
267
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 2.78 KB | None | 0 0
  1. #include <a_samp>
  2. #include <zcmd>
  3.  
  4. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  5. {
  6.     if(dialogid == 0)
  7.     {
  8.             if(response)
  9.             {
  10.                 if(listitem == 0)
  11.                 {
  12.                 SetPlayerColor(playerid, 0xFF0000FF);
  13.                 SendClientMessage(playerid, GetPlayerColor(playerid), "Jūsų nauja spalva - kaip šis pranešimas.");
  14.                 }
  15.                 if(listitem == 1)
  16.                 {
  17.                         SetPlayerColor(playerid, 0x00FF00FF);
  18.                         SendClientMessage(playerid, GetPlayerColor(playerid), "Jūsų nauja spalva - kaip šis pranešimas.");
  19.                 }
  20.                 if(listitem == 2)
  21.                 {
  22.                         SetPlayerColor(playerid, 0xFFFF00FF);
  23.                         SendClientMessage(playerid, GetPlayerColor(playerid), "Jūsų nauja spalva - kaip šis pranešimas.");
  24.                 }
  25.                 if(listitem == 3)
  26.                 {
  27.                         SetPlayerColor(playerid, 0xFFFFFFFF);
  28.                         SendClientMessage(playerid, GetPlayerColor(playerid), "Jūsų nauja spalva - kaip šis pranešimas.");
  29.                 }
  30.                 if(listitem == 4)
  31.                 {
  32.                         SetPlayerColor(playerid, 0xCCCCCCFF);
  33.                         SendClientMessage(playerid, GetPlayerColor(playerid), "Jūsų nauja spalva - kaip šis pranešimas.");
  34.                 }
  35.                 if(listitem == 5)
  36.                 {
  37.                         SetPlayerColor(playerid, 0x0000FFFF);
  38.                         SendClientMessage(playerid, GetPlayerColor(playerid), "Jūsų nauja spalva - kaip šis pranešimas.");
  39.                 }
  40.                 if(listitem == 6)
  41.                 {
  42.                         SetPlayerColor(playerid, 0xFF9900FF);
  43.                         SendClientMessage(playerid, GetPlayerColor(playerid), "Jūsų nauja spalva - kaip šis pranešimas.");
  44.                 }
  45.                 if(listitem == 7)
  46.                 {
  47.                         SetPlayerColor(playerid, 0x660066FF);
  48.                         SendClientMessage(playerid, GetPlayerColor(playerid), "Jūsų nauja spalva - kaip šis pranešimas.");
  49.                 }
  50.                 if(listitem == 8)
  51.                 {
  52.                         SetPlayerColor(playerid, 0xFF00FFFF);
  53.                         SendClientMessage(playerid, GetPlayerColor(playerid), "Jūsų nauja spalva - kaip šis pranešimas.");
  54.                 }
  55.                 if(listitem == 9)
  56.                 {
  57.                         SetPlayerColor(playerid, 0x000000FF);
  58.                         SendClientMessage(playerid, GetPlayerColor(playerid), "Jūsų nauja spalva - kaip šis pranešimas.");
  59.                 }
  60.         }
  61.     }
  62.     return 1;
  63. }
  64.  
  65. CMD:color(playerid, params[])
  66. {
  67.     ShowPlayerDialog(playerid, 0, DIALOG_STYLE_LIST, "Pasirinkite spalvą ir ji bus pakeista", "{FF0000}Raudona\n{00FF00}Žalia\n{FFFF00}Geltona\n{FFFFFF}Balta\n{CCCCCC}Pilka\n{0000FF}Mėlyna\n{FF9900}Oranžinė\n{660066}Violetinė\n{FF00FF}Alyvinė\n{000000}Juoda", "Rinktis", "Išeiti");
  68.     return 1;
  69. }
Advertisement
Add Comment
Please, Sign In to add comment