This is just a basic away system dialog. I realised i could of changed a few things but i thought i would post it first and see what happens. just copy and paste in remotes.
alias awayopen { dialog $iif(!$dialog(BioAway),-m,-v) bioaway bioaway
}
dialog BioAway {
title "Bioshock Away"
size -1 -1 153 99
button "[Away]", 1, 9 7 66 27
edit "Away Reason", 3, 9 69 134 20
button "[Back]", 2, 80 7 63 27
edit "Away Nick", 4, 10 41 134 18
}
on *:DIALOG:BioAway:sclick:1:{
set %o.nick $me
set %a.reason $did(3).text
set %a.nick $did(4).text
amsg 14,1[15,1I Am Now Away For:0,1 %a.reason 14,1][15,1Time Is Now:0,1 $time(hh.nnTT) 14,1]
away %a.reason
nick %a.nick
}
on *:DIALOG:BioAway:sclick:2:{
nick %o.nick
amsg 14,1[15,1I Am Now Back From:0,1 %a.reason 14,1][15,1Returned At:0,1 $time(hh.nnTT) 14,1][15,1Time Gone:0,1 $duration($awaytime) 14,1]
away
}
menu channel,nicklist,menubar {
[Bio-Away]
.AwayNew: dialog -m BioAway BioAway
.AwayOpen: awayopen
}
You don\'t seem to error check, ( something like an if ($did(3).text) for example ) and it\'s rather simple. But, it gets the job done I suppose. Perhaps an alias to check if the dialog is in use? Here try this,
alias awayopen { dialog $iif(!$dialog(BioAway),-m,-v) bioaway bioaway
And just put awayopen in the menu. ;)