AdiIRC

Saves all joined channels to a temporary list and adds a right-click menu for rejoining.

on me:*:JOIN:#:{
  if (!$hget(channelhistory $+ $network, #)) {
    hadd -m channelhistory $+ $network # #
  }
}

menu * {
  Channel History
  .$submenu($channelhistory($1))
  }
}

alias channelhistory {
  if ($hget(channelhistory $+ $network)) {
    var %chan = $hget(channelhistory $+ $network, $1)
    return %chan $+ :join %chan
  }
}