SHARE
TWEET

autojoin channels

Seb Jul 7th, 2016 (edited) 114 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. on *:connect:{ .timer 1 10 join -n %aj. [ $+ [ $network ] ] }
  2. menu status {
  3.   Autojoin on $network
  4.   .List
  5.   ..$submenu($channel_list($1))
  6.   .Join list now:join -n %aj. [ $+ [ $network ] ]
  7. }
  8.  
  9. menu channel {
  10.   Autojoin on $network
  11.   .Add $chan:set $+(%,aj,.,$network) $addtok($eval($+(%,aj,.,$network),2),$chan,44)
  12.   .Remove $chan:set $+(%,aj,.,$network) $remtok($eval($+(%,aj,.,$network),2),$chan,44)
  13.   .-
  14.   .Join list now:join -n %aj. [ $+ [ $network ] ]
  15.   .-
  16.   .$submenu($channel_list($1))
  17. }
  18.  
  19. alias channel_list {
  20.   if ($istok(begin end,$1,32)) return -
  21.   else return $gettok($($+(%,aj.,$network),2),$1,44) :noop
  22. }
RAW Paste Data
Top