SHARE
TWEET

autojoin v2

Seb Dec 13th, 2015 (edited) 124 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. on *:start:{
  2.  s irc.freenode.org -i nick altnick- ident fullname goes here
  3. }
  4.  
  5. on *:connect:{
  6.   if ($network == freenode) { .mode $me +ix }
  7.   .timer 1 6 join -n %aj. [ $+ [ $network ] ]
  8. }
  9.  
  10. on *:NOTICE:*This nickname is registered*:*:{
  11.   if ($nick == NickServ) && ($network == freenode) { .ns id YOURNickServPWDHERE }
  12. }
  13.  
  14. menu status {
  15.   Autojoin on $network
  16.   .List
  17.   ..$submenu($channel_list($1))
  18.   .Join list now:join -n %aj. [ $+ [ $network ] ]
  19. }
  20.  
  21. menu channel {
  22.   Autojoin on $network
  23.   .Add $chan:set $+(%,aj,.,$network) $addtok($eval($+(%,aj,.,$network),2),$chan,44)
  24.   .Remove $chan:set $+(%,aj,.,$network) $remtok($eval($+(%,aj,.,$network),2),$chan,44)
  25.   .-
  26.   .Join list now:join -n %aj. [ $+ [ $network ] ]
  27.   .-
  28.   .$submenu($channel_list($1))
  29. }
  30.  
  31. alias channel_list {
  32.   if ($istok(begin end,$1,32)) return -
  33.   else return $gettok($($+(%,aj.,$network),2),$1,44) :noop
  34. }
RAW Paste Data
Top