Advertisement
D357R0XX

Untitled

Oct 15th, 2018
112
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.07 KB | None | 0 0
  1. //========================
  2. // Ausgehende CRYPT-MSGs
  3. //=========================
  4. IFMATCHES(%CHATCLEAN%,"^\[Du -> \[([a-zA-Z]+)\] ([a-zA-Z0-9_]{3,15})\] E~(.+)~E$")
  5. IFMATCHES(%@&code1%,"^$")
  6. LOG("&4Warnung &8- &3Bitte persönliches Codewort 1 einrichten &c=>")
  7. LOG("&6/&ccode1 &7<&3Codewort&7>")
  8. @#codes = 0
  9. ENDIF()
  10. IFMATCHES(%@&code2%,"^$")
  11. LOG("&4Warnung &8- &3Bitte persönliches Codewort 2 einrichten &c=>")
  12. LOG("&6/&ccode2 &7<&3Codewort&7>")
  13. @# codes = 0
  14. ENDIF()
  15.  
  16. IF(%@#codes%==1)
  17. MATCH(%CHATCLEAN%,"^\[Du -> \[([a-zA-Z]+)\] ([a-zA-Z0-9_]{3,15})\] E~(.+)~E$",&matches[])
  18. &rang = %&matches[1]%
  19. &name = %&matches[2]%
  20. &nachricht = %&matches[3]%
  21. DECODE(%&nachricht%,&uncodiert)
  22. &uncodiert = REPLACE(&uncodiert,"%@&code1%~","")
  23. &uncodiert = REPLACE(&uncodiert,"~%@&code2%","")
  24. LOG("&f[&6CRYPT&f] &f[&6MSG&f] &3Ich &7an &3%&name% &f: &a%&uncodiert%")
  25. FILTER()
  26. ENDIF()
  27. ENDIF()
  28.  
  29. //========================
  30. // Eingehende CRYPT-MSGs
  31. //=========================
  32. IFMATCHES(%CHATCLEAN%,"^\[\[([a-zA-Z]+)\] ([a-zA-Z0-9_]{3,15}) -> Du\] E~(.+)~E$")
  33. IFMATCHES(%@&code1%,"^$")
  34. LOG("&4Warnung &8- &3Bitte persönliches Codewort 1 einrichten &c=>")
  35. LOG("&6/&ccode1 &7<&3Codewort&7>")
  36. @#codes = 0
  37. ENDIF()
  38.  
  39. IFMATCHES(%@&code2%,"^$")
  40. LOG("&4Warnung &8- &3Bitte persönliches Codewort 2 einrichten &c=>")
  41. LOG("&6/&ccode2 &7<&3Codewort&7>")
  42. @# codes = 0
  43. ENDIF()
  44.  
  45. IF(%@#codes%==1)
  46. MATCH(%CHATCLEAN%,"^\[\[([a-zA-Z]+)\] ([a-zA-Z0-9_]{3,15}) -> Du\] E~(.+)~E$",&matches[])
  47. &rang = %&matches[1]%
  48. &name = %&matches[2]%
  49. &nachricht = %&matches[3]%
  50. DECODE(%&nachricht%,&uncodiert)
  51. &uncodiert = REPLACE(&uncodiert,"%@&code1%~","")
  52. &uncodiert = REPLACE(&uncodiert,"~%@&code2%","")
  53. LOG("&f[&6CRYPT&f] &f[&6MSG&f] &3%&name% &7an &3mich&f: &a%&uncodiert%")
  54. FILTER()
  55. ENDIF()
  56. ENDIF()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement