alias chkatime {
  if *[away] !iswm $me && $server {
    if !%chkatimer { .set %chkatimer $ctime }
    if $calc($ctime - %chkatimer) >= 1200 { nick $+($me,[away]) | away Meşkulum | deop komutun | part komutun }
  }
}
on *:connect: {
  .set %chkatimer $ctime 
  .timerchkatime 0 60 chkatime 
}
on *:input:*: {
  if $left($1,1) != / {
    if $server && $regex($window($active).type,channel|query)  {
      if *[away] iswm $me  {
        nick $regsubex($me,\[away\]$,$null) 
         away
        identify şifren 
        join komutun
      }
      else { .set %chkatimer $ctime }
    }
  }
}