Channel Change (Bot kick +invite to new channel)

[TheOuch]

I've been looking for something to do this simple task, but have been unable to find anything.

Basically, I want a script that sits in #oldchannel. When anyone joins, it kicks them, and invites them to chat in #newchannel. Neither channel is invite only.

We're trying to change channel names.

So -- does anything like this exist? If not, would it be easier to implement in eggdrop's tcl, or should I just run a quick iirc bot to do it?

Any help would be appreciated!

[metroid]

Code: Select all

set redirect(old_chan) [list #oldchannel]; # Note put the channel name here in lowercase!
set redirect(new_chan) [list #newchannel]

bind JOIN -|- * redirect:join

proc redirect:join {nickname hostname handle channel} {
  global redirect;

  if {[matchattr $handle n|n $channel]} {
    return 0;
  }

  if {[lsearch -exact $redirect(old_chan) [string tolower $channel]]} {
    putserv "KICK $channel $nickname :Please join $redirect(new_chan), you will recieve an invite."
    putserv "INVITE $nickname $redirect(new_chan)"
  }
}

[TheOuch]

What does that matchattr section do:

Code: Select all

  if {[matchattr $handle n|n $channel]} {
    return 0;
  }

[Alchera]

What does that matchattr section do:

Code: Select all

  if {[matchattr $handle n|n $channel]} {
    return 0;
  }

Use the following via the Command Console:

Code: Select all

.help whois

n - owner (user has absolute control over the bot)
...
n - owner (user is a channel owner)

Eggdrop Command Reference