on *:load: //echo -a $smb 4,1Thank You for Loading The CJG Away System Type /awaysys or right click in a channel and hit Away System to Run it
dialog away {
title "CJG Away System"
size -1 -1 122 120
option dbu
radio "On", 5, 24 8 26 10,
radio "Off", 6, 72 8 26 10
box "Away Logger", 7, 8 0 106 26
text "Away Reason:", 1, 16 48 41 8, center
text "Away Nick :", 2, 16 64 41 8, center
edit %areason, 3, 56 48 50 10, autohs
edit %anick, 4, 56 64 50 10, autohs
box "Enter Your Reason And Nick", 8, 8 32 106 50
button "Away", 10, 7 85 107 12, center
button "Back", 11, 7 100 107 12, center
}
on *:dialog:away:edit:*: {
if ($did == 3) { /set %areason $did(away,3) }
if ($did == 4) { /set %anick $did(away,4) }
}
on *:dialog:away:sclick:*: {
if ($did == 10) { /ame 4,1is now away! 0 %areason 0,1 4 *CJG Away System* | /set %backnick $me | /nick %anick | set %mtime $ctime | .enable #away | window -aei @AwayLogs }
if ($did == 11) { /ame 4,1is now back from away!0 %areason 4Duration: 0 $duration($calc($ctime - %mtime)) 4 *CJG Away System* | /nick %backnick | disable #away | /unset %anick | /unset %areason | /unset %mtime }
}
on *:dialog:away:sclick:*: {
if ($did == 5) { /set %log 1 }
if ($did == 6) { /set %log 0 }
}
#away off
on *:text:*:?: {
if (%log == 1) { //echo @AwayLogs 4< $+ $nick $+ > $1- | /msg $nick I Am Not Away Your Messages Are Logged! | /close -m }
}
#away end
alias awaysys {
/dialog -m away away
}
menu channel {
-
Away System: /awaysys
}
