Forums Scripts & Popups Joining a channel on text and auto connect.

on *:TEXT:!joinxd*:#:{ 
  if ((%floodjoinxd) || ($($+(%,floodjoinxd.,$nick),2))) { return }
  set -u10 %floodjoinxd On
  set -u30 %floodjoinxd. $+ $nick On

  var %jchannel /j $nick
  if ($read(JoinChannels.txt,w,%jchannel)) { msg # Your channel already on the list $nick ! | return }
  else {
    /j $nick
    write JoinChannels.txt %jchannel
    msg $chan I joined your channel $nick
  }
}

on *:TEXT:!leavexd*:#:{
  var %jchannel /j $nick
  if (!$read(JoinChannels.txt,w,%jchannel)) { msg # You're not on the list! | return }
  else {
    var %leftChan $+($chr(35),$read(JoinChannels.txt,w,* $+ $nick))
    write -dl $+ $readn JoinChannels.txt
    /part %leftChan
    msg # I left your channel $nick
  }
}