diff options
-rw-r--r-- | wiki.tcl | 6 |
1 files changed, 6 insertions, 0 deletions
@@ -5,6 +5,8 @@ bind pub - !ewiki ewiki #bind pub - !say say bind pub - !mitsu mitsu bind pub - !google say +bind pub - !pastebin pastebin +bind pub - !ezcrypt pastebin proc say {nick host hand chan arg} { # putserv "PRIVMSG $chan :$arg"; @@ -16,6 +18,10 @@ proc mitsu {nick host hand chan arg} { # putserv "PRIVMSG $chan :das hier ist [string trimleft $chan #]"; } +proc pastebin {nick host hand chan arg} { + putserv "PRIVMSG $chan :Längere Texte bitte nicht in den Chat kopieren! Benutze stattdessen https://ezcrypt.it/ : kopiere den Text in das große Textfeld, klicke auf \"Submit\" und teile uns die URL mit, auf die du automatisch weitergeleitet wurdest."; +} + proc wiki {nick host hand chan arg} { global do_wiki if {[info exists do_wiki($nick:$chan)]} { |