on *:text:@away*:#: {
set %away.msg $+ $nick $2-
set %away.nick $nick
writeini away.ini away $nick is away
describe $chan 0,4 $nick 0,12 is now away $2-
else {
halt
}
}
on *:text:*:#: {
if ($1- == %away.nick) {
if ($readini(away.ini,away,$nick)) notice $nick Korvin is away right now because of this: %away.msg [ $+ [ $nick ] ] $+ , try again when hes back
else { halt
}
}
}
on *:text:@back:#: {
if ($readini(away.ini,away,$nick)) {
describe $chan $nick is now back.
remini away.ini away $nick
}
}