By CaRe_Taker on Dec 11, 2005Re worked Alias away
using $input()
*************************Alias Away Script**********************************
alias brb {
if ($away == $false) {
var %away.reason = $input(Away Reason,e,CT Away)
/ame 12[14Away12] %away.reason 12[14Time Left12] $time(hh:nn TT)
/tnick $me $+ [AWAY]
/away %away.reason
}
}
alias here {
if ($away == $true) {
/nick $mnick
/ame 12[14Back From12] $awaymsg [14Time Away12] $duration($awaytime)
/away
}
}
on *:TEXT:*:# {
if ($away == $true) && ($mnick isin $1-) /notice $nick Currently Away: $awaymsg Gone For: $duration($awaytime)
}
on *:INPUT:*: {
if ($Left($strip($1-),1) != /) {
if ($away == $true) { /here }
.timerAutoaway 1 2600 { /setawaynow }
}
}
alias setawaynow {
/away Auto Away | /tnick $me $+ [Gone] | /me 12[14Away12] $awaymsg 12[14Time Left12] $time(hh:nn TT)
}
*****************************End of away Script*******************************
