Y_Less

interpreter.inc

Jan 21st, 2014
357
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 1.03 KB | None | 0 0
  1. #if !defined PARSER_TEXT_CHAR
  2.     #define PARSER_TEXT_CHAR '>'
  3. #endif
  4.  
  5. #define INTROSPECT_NATIVES
  6. #define INTROSPECT_PLAYER_DATA
  7.  
  8. #tryinclude "introspect\exec"
  9. #tryinclude "exec"
  10. #tryinclude <introspect\exec>
  11. #tryinclude <exec>
  12.  
  13. #if !defined RunExpression
  14.     #error "introspect" is required.  Get it here: github.com/oscar-broman/samp-introspect
  15. #endif
  16.  
  17. public OnPlayerText(playerid, text[])
  18. {
  19.     if (text[0] == PARSER_TEXT_CHAR)
  20.     {
  21.         if (IsPlayerAdmin(playerid))
  22.         {
  23.             printf("Running (%d): %s", playerid, text[1]);
  24.             new
  25.                 dest[144],
  26.                 token[E_TOKEN];
  27.             token = RunExpression(text[1], strlen(text[1]), playerid);
  28.             RenderToken(dest, token);
  29.             SendClientMessage(playerid, 0x66CD00FF, dest);
  30.         }
  31.         return 0;
  32.     }
  33.     #if defined Parser_OnPlayerText
  34.         return Parser_OnPlayerText(playerid, text);
  35.     #else
  36.         return 1;
  37.     #endif
  38. }
  39.  
  40. #if defined _ALS_OnPlayerText
  41.     #undef OnPlayerText
  42. #else
  43.     #define _ALS_OnPlayerText
  44. #endif
  45.  
  46. #if defined Parser_OnPlayerText
  47.     forward Parser_OnPlayerText(playerid, text[]);
  48. #endif
Advertisement
Add Comment
Please, Sign In to add comment