Advertisement
Guest User

Untitled

a guest
Jan 23rd, 2018
70
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.09 KB | None | 0 0
  1. CMD:pame( playerid, params[] )
  2. {
  3. if( sscanf( params, "u", params[0] ) )
  4. return SendClientMessage(playerid, C_GRAY,""gbInfo"Введите: /pame [ id игрока ]");
  5.  
  6. if( !IsPlayerLogged( params[0] ) )
  7. return SendClientMessage( playerid, C_WHITE, !INCORRECT_PLAYER_ID );
  8.  
  9. //if( GetPVarInt( params[0], "Player:Pame" ) == 0 )
  10. // return SendClientMessage(playerid,C_GRAY,""gbError"У данного игрока не установлено описание.");
  11.  
  12. vb_string[0] = EOS;
  13.  
  14. format:gb_string( ""gbInfo"Описание персонажа "cBLUE"%s"cWHITE":\n\n%s",
  15. Player[params[0]][uName],
  16. Player[params[0]][uPame]
  17. );
  18.  
  19. strcat( vb_string, gb_string );
  20.  
  21. if( Player[ params[0] ][uMember] != 0 && IsDuty( params[0] ) != 0 )
  22. {
  23. format:gb_string( "\n\n"cGRAY"— %s, %s",
  24. F::[ Player[ params[0] ][uMember] ][fName],
  25. FRank[ Player[ params[0] ][uMember] ][ Player[ params[0] ][uRank] - 1 ]
  26. );
  27.  
  28. strcat( vb_string, gb_string );
  29. }
  30.  
  31. showPlayerDialog( playerid, 9999, DIALOG_STYLE_MSGBOX, " ", vb_string, "Закрыть", "" );
  32. return 1;
  33. }
  34.  
  35. CMD:mypame( playerid, params[] )
  36. {
  37. if( Player[playerid][uMute] != 0)
  38. return SendClientMessage(playerid,C_GRAY,""gbError"Простите, но вам запрещено писать что-то!");
  39.  
  40. if( GetPVarInt( playerid, "Player:Pame" ) != 0)
  41. return SendClientMessage(playerid,C_GRAY,""gbError"У Вас уже установленно описание персонажа.");
  42.  
  43. if( sscanf(params, "s[144]", params[0] ) )
  44. return SendClientMessage(playerid, C_GRAY,""gbInfo"Введите: /mypame [ текст ]");
  45.  
  46. query[0] = EOS;
  47. SetPVarInt( playerid, "Player:Pame", 1 );
  48. Player[playerid][uPame][0] = EOS;
  49. strcat( Player[playerid][uPame], params[0], 144 );
  50.  
  51. SendClientMessage( playerid, C_GRAY, ""gbAccess"Вы успешно установили бесконечное действие над персонажем.");
  52. SendClientMessage( playerid, C_GRAY, ""gbInfo"Чтобы удалить используйте повторно команду - "cBLUE"/dmypame");
  53. format( vb_string,sizeof(vb_string),"[A] %s[%d] установил описание: %s",Player[playerid][uName], playerid,params[0]);
  54. SendAdminMessage( C_LIGHTGREEN, vb_string );
  55.  
  56. mysql_format(1, query, sizeof(query),"UPDATE gb_users SET uPame = '%s' WHERE BINARY uName = '%s'",Player[playerid][uPame],Player[playerid][uName]);
  57. mysql_tquery(1, query, "", "");
  58.  
  59. return 1;
  60. }
  61.  
  62. CMD:dmypame( playerid, params[] )
  63. {
  64. if( !GetPVarInt( playerid, "Player:Pame" ) )
  65. return SendClientMessage(playerid, C_GRAY, ""gbError"Вы не устанавливали описание персонажа.");
  66.  
  67. query[0] = EOS;
  68. SetPVarInt( playerid, "Player:Pame", 0 );
  69. Player[playerid][uPame][0] = EOS;
  70.  
  71. SendClientMessage(playerid, C_GRAY, ""gbAccess"Вы успешно удалили описание персонажа.");
  72.  
  73. mysql_format(1, query, sizeof(query),"UPDATE gb_users SET uPame = '%s' WHERE BINARY uName = ''",Player[playerid][uPame],Player[playerid][uName]);
  74. mysql_tquery(1, query, "", "");
  75. return 1;
  76. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement