Advertisement
Guest User

BeleidigungsFilter By Austrianer

a guest
Apr 29th, 2012
223
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 1.39 KB | None | 0 0
  1. /*
  2. @Copyright Austrianer
  3. @Version 1.0
  4. @Datum 29.04.2012
  5.  
  6. Script wurde alleine von Austrianer gemacht und darf nicht von einem anderem Scripter als seines ausgegeben werden. Dieses Script hilft zur Bekämpfung gegen Internetgangster die glauben sie müssen beleidigen und wären super wenn sie vor dem Computer groß spielen.
  7. */
  8.  
  9. // Array kann um viele weitere Wörter erweitert werden, diese sind nur Beispiele
  10. new beleidigungen[][50] = {
  11.     "Hurensohn", "Arschloch", "Wichser", "Hure", "Arsch", "Nazi", "Missgeburt", "Schwuchtel", "Fotze", "Trottel"
  12. };
  13.  
  14. public OnPlayerText(playerid, text[]) {
  15.         new chatstring[144];
  16.         format(chatstring, sizeof(chatstring), "%s", BeleidigungsFilter(text));
  17.     // Weiteres mit Textverarbeitung z.B. Textausgabe usw.
  18.     return 0;
  19. }
  20.  
  21. stock BeleidigungsFilter(text[]) {
  22.     new chatstring[144], ende, zahl, ersetzstring[30];
  23.         format(chatstring, sizeof(chatstring), "%s", text);
  24.         for (new i = 0; i < sizeof(beleidigungen); i++) {
  25.             zahl = strfind(chatstring, beleidigungen[i], true);
  26.             if (zahl != -1) {
  27.                     ersetzstring = "";
  28.             ende = zahl + strlen(beleidigungen[i]);
  29.             strdel(chatstring, zahl, ende);
  30.             for (new a = 0; a < strlen(beleidigungen[i]); a++) {
  31.                 format(ersetzstring, sizeof(ersetzstring), "%s*", ersetzstring);
  32.             }
  33.             strins(chatstring, ersetzstring, zahl);
  34.             }
  35.         }
  36.         return chatstring;
  37. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement