autochange nick

[turker]

Hi,
i want my bot parts channel and change nick and rejoin channel. do you know any script?

[XRTC]

Code: Select all

# Channels
set chans "#sex"

# minutes to cycle
set time 5

# seconds out of the channel
set outa 5

# random nicknames

set nicks {
    "Very_Sexy|"
    "LoVeRgIrL_"
    "nick3.. etc"
}
   

bind notc I "*registered*and*protected*" must:id
 
if {![info exists ald]} {
set ald 1
timer $time do:it
}
    
proc do:it {} {
global nicks chans outa time
link sexy 
set newnick [lindex $nicks [rand [llength $nicks]]]
foreach chana $chans {
channel set $chana +inactive
}
puthelp "nick $newnick"
foreach chana $chans {
utimer $outa "channel set $chana -inactive"
}
timer $time do:it
}   

proc must:id {n u h c a} {
global nicks
if {$n == "NickServ"} {
set newnick [lindex $nicks [rand [llength $nicks]]]
puthelp "nick $newnick"
 }
}

Also no!spam is kewl.
--Greets