Heres a little snippet i made for the fun, just because i hate all of these huge away systems LOL
(20:02:22) ::: (~Chain) I am now away, reason: Koolies
(20:02:23) ::: (Chain) Known As (Chain[AFK])
(20:02:23) ::: You have been marked as being away
(20:02:37) ::: (~Chain[AFK]) I am now back from: testing I was gone for: 15secs
(20:02:37) ::: (Chain[AFK]) Known As (Chain)
::::::::::::::::::::::::
:: Chain's Away dialog
::
:: November.6,2008
::
::::::::::::::::::::::::
dialog away {
title "Chainz away system"
size -1 -1 121 52
option dbu
icon C:\Chain's\images\away.ico
box " Reason:", 1, 26 1 91 20
box "Away Nick:", 2, 27 21 90 21
button "Go", 3, 6 3 15 10
button "Bk", 4, 6 19 15 10
button "Exit", 5, 6 33 15 10, cancel
edit "", 6, 28 10 86 10, autohs
edit "", 7, 28 30 86 10, autohs
}
on *:dialog:away:sclick:3: {
set %away.time $ctime
set %away.nick.2 $me
set %away.nick $did(6).text
set %nick.nick $did(7).text
if (%away.nick == $null) {
amsg I am now Away
away %away.nick
}
else {
amsg I am now away, reason:4 %away.nick
nick %nick.nick
away %away.nick
}
}
on *:dialog:away:init:0:{
did -a away 6 %away.nick
did -a away 7 %nick.nick
}
on *:dialog:away:sclick:4: {
nick %away.nick.2
amsg 14I am now back from:4 %away.nick 14I was gone for:4 $duration($calc($ctime - %away.time))
away
}
menu channel,query {
away system:dialog -m away away
}