Untitled

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. } 
}