Advertisement
Guest User

Untitled

a guest
Jun 24th, 2017
59
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.38 KB | None | 0 0
  1. on NOTICE notcfront {
  2. splitsrc
  3. set from_display $_nick
  4. if {$_dest ne [me]} {
  5. append from_display "/$_dest"
  6. }
  7. if {[set activenet [network [set activecontext [findcontext]]]] ne [set recvnet [network [set recvcontext [getcontext]]]]} {
  8. append from_display "@$recvnet"
  9. }
  10.  
  11. print [findcontext] \00313-\00306[set from_display]\00313-\003\t$_rest
  12.  
  13. complete EAT_ALL;
  14. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement