Away System just click in background of your channel and go to Away
System
The reason i am posting this is because i am going to be selling my computer soon and when i get a new one i will be able to come on here and be able to get it back with out any problems.

dialog away {
  title "away system"
  size -1 -1 70 42
  option dbu

  box "Reason:", 1, 20 0 50 20
  box "Away Nick:", 2, 20 20 50 20
  button  "Go", 3, 2 3 15 10
  button  "Back", 4, 2 15 15 10
  button  "Exit", 5, 2 27 15 10,cancel
  edit "", 6, 22 8 45 10,autohs
  edit "", 7, 22 28 45 10,autohs
}
on *:dialog:away:sclick:3: {
  set %away.time $ctime
  set %away.niko.2 $me
  set %away.niko $did(6).text
  set %nick.niko $did(7).text

  if (%away.niko == $null) { 
    amsg 4(14Away4)4 (14Reason4)14 no reason 
    away %away.niko
  }
  else { 
    amsg 4(14Away4)4 (14Reason4)14 %away.niko
    nick %nick.niko
    away %away.niko
  }
}
on *:dialog:away:init:0:{ 
  did -a away 6 %away.niko
  did -a away 7 %nick.niko
}
on *:dialog:away:sclick:4: {
  nick %away.niko.2
  amsg 4(14Back4)4 (14Reason4)14 %away.niko 4(14Gone For4)14 $duration($calc($ctime - %away.time))
  away
}
menu channel,query {
  away system:/dialog -m away away 
}