on *:text:!idle*:%chanIdle:{ if ($me ison $2) { error 1 } elseif ($left($2,1) != $chr(35)) { error 2 } elseif ($iidle($nick)) { error 3 } elseif ($2 == #Help) { error 1 } elseif ($good($nick,$2)) { joinit $nick $2- } } on !*:nick:{ if ($iidle($nick)) { set %idle. [ $+ [ $newnick ] ] %idle. [ $+ [ $nick ] ] .timer 1 1 unset %idle. [ $+ [ $nick ] ] } } on !*:kick:%chanIdle:{ if ($iidle($knick)) { partit $oidle($knick) } } on !*:part:%chanIdle:{ if ($iidle($nick)) { partit $oidle($nick) } } on *:quit:%chanIdle:{ if ($iidle($nick)) { partit $oidle($nick) } } alias iidle { if (%idle. [ $+ [ $1 ] ]) != $null) { return $true } } alias oidle { return %idle. [ $+ [ $1 ] ] } alias joinit { join $2- | set %idle. [ $+ [ $1 ] ] $2 | .timer 1 5 check_chan $nick $2 } alias partit { msg $2 IdleBot By Mini Me | part %idle. [ $+ [ $1 ] ] | .timer 1 1 unset %idle. [ $+ [ $1 ] ] } alias good { if ($me !ison $2) && ($left($2,1) == $chr(35)) && (!$iidle($1)) && ($2 != #Help) { return $true } } alias check_chan { if ($1 ison $2) { msg $2 Requierments has been filled so i will stay. } if ($1 !ison $2) { msg $2 Requierments hasn't been filled so i will leave. | partit $2 } } alias error { if ($1 == 1) { msg %chanIdle Error: I'm already on that channel. } if ($1 == 2) { msg %chanIdle Error: Invalid channel name. } if ($1 == 3) { msg %chanIdle Error: You may have already reqested me. Try /hop and invite me again. } }