Forums Scripts & Popups Script for channels and passwords

on *:CONNECT: {
    if ($read(joins.txt, s, $network)) {
    var %readline = $read(joins.txt, s, $network)
    var %command = $gettok(%readline,3,9)
    %command  
    var %x = 1
    while (%x <= $numtok(%readline,35)) {
      var %chan = $char(35) $+ $gettok(%readline,%x,35)
      join %chan
      inc %x
    }
  }
}