# I wanna bot change nick radomly ever X mins but it should part #chan #for a 60 secs when changing nick so users of #chan can't notice it.
set changeN "30"
set chaN "#chan"
set nickz {
example1
example2
}
if {![info exists tnchange_r ]} {
timer $changeN tnchange
set tnchange_r 1
}
proc tnchange {} {
global nickz
set nick [lindex $nickz [rand [llength $nickz]]]
}