menu channel,nicklist,query,status {
  -
  AwAy: /dialog -md Away Away
  -
}
dialog Away {
  title "Away"
  size -1 -1 170 73
  option dbu
  text "Away Nick", 1, 25 4 120 8, center
  edit "AwAyOldum", 2, 50 14 70 12
  text "Away Nedeni", 3, 25 28 120 8, center
  edit "", 4, 10 38 151 12
  button "Away Ol", 5, 10 53 50 12
  button "Geri Gel", 6, 112 53 50 12
}
on *:dialog:Away:sclick:5: {
  /set %nick $did($dname,2)
  /set %grund $did($dname,4)
  /set %Away1 ..::Come Back::..
  set %mynick $me
  set %away.time $ctime
  scon -a /nick %nick
  scon -a /away %grund
  scon -a ame 14i15s 14A15WAY 14b15ecause 14[ $+ 4 %grund $+ 15] 14g15one 14a15way 14a15t 14[ $+ 4 $time $+ 15]
  /dialog -x Away Away
}
on *:dialog:Away:sclick:6: {
  scon -a /nick %mynick
  scon -a /away
  set %away.time.duration $duration( $calc( $ctime - %away.time ) )
  scon -a ame  14i15s 14b15ack 14a15nd 14t15he 14r15eason 14w15as 14[ 4 %grund 15] , 14d15uration 14[ $+ 4 %away.time.duration $+ 15]
  /set %Away1 ..::Go Away::..
  /unset %nick
  /unset %grund
  close -@ @away
  /dialog -x Away Away
}
on *:text:*:#: {
  if (%nick isin $1-) {
    notice $nick   14I4'15m 14A15WAY! 14R15eason4: 14[ $+ 4 %grund $+ 15] 14D15uration 14[ $+ 4 %away.time.duration $+ 15]
  }