alias awaymenu {  dialog -m arkaway arkaway } 
dialog arkaway {
  title "Away / Meşgul Menüsü"
  size -1 -1 227 115
  option dbu 
  text "Away Sebebi : ", 1, 7 12 80 8
  edit "", 2, 47 11 131 10
  button "AWAY OL", 3, 141 27 55 9, flat
  check "Nickin Sonuna Ekle :", 4, 7 27 57 8
  edit "", 5, 68 26 64 10
  box "Away Menü Ayarları :", 6, 3 1 220 40
  button "Dışarıdayım", 8, 7 61 41 12, flat
  button "TV İzliyorum", 15, 7 75 41 12, flat
  button "PC Başında Değilim", 16, 60 75 50 12, flat
  button "Hemen Döneceğim", 17, 113 75 50 12, flat
  button "Telefondayım", 18, 166 75 41 12, flat
  button "Yemekteyim", 9, 60 61 50 12, flat
  button "Oyundayım", 10, 113 61 50 12, flat
  button "Uyuyorum", 11, 166 61 41 12, flat
  box "Hazır Away Mesajları :", 12, 3 42 220 70
  text "Seçtiğiniz Away Sebebinin Üstüne  Tıkla***** Otomatik Olarak Away Olabilirsiniz.", 13, 12 50 196 8, disable
  button "AWAYDAN DÖN", 7, 17 92 87 12
  button "PENCEREYİ KAPAT", 14, 111 92 87 12, ok
}
on *:dialog:arkaway:init:0: {
  .timer -m 1 10 /did -f arkaway 2
  if (%addnick != $null) { did -c arkaway 4 | did -a arkaway 5 %addnick | did -e arkaway 5 }
  if (%awayres != $null) { did -a arkaway 2 %awayres }
  if (%addnick == $null) { did -u arkaway 4 | did -b arkaway 5 
  }
}
on *:dialog:arkaway:sclick:3: {
  set %addnick $did(5)
  set %awayres $did(2)
  if ($did(4).state == 1) {
    if ($away == $true) halt
    set %backnick $me 
    /ame Şuanda Awayım. Sebep : ( $+ $did(2) $+ )   |  echo -a %logo $+ 2 Şuan awaysınız. 
    /away %logo 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 $did(2)  
    /nick $me $+ $did(5) 
  }
  if ($did(4).state == 0) { 
    if ($away == $true) halt 
    /ame Şuanda Awayım. Sebep : ( $did(2) )  [Away Meşgul Sistemi]  | echo -a %logo $+ 2  Şuan awaysınız. 
    /away %logo 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 $did(2)  
  }
}
on *:dialog:arkaway:sclick:4: {
  if ($did(4).state == 0) { did -r arkaway 5 | did -b arkaway 5 | unset %addnick }
  if ($did(4).state == 1) { 
    if (%addnick == $null) { 
      set %addnick _aWay
      did -r arkaway 5 
      did -a arkaway 5 %addnick 
      did -e arkaway 5
    } 
    did -e arkaway 5
  }
}
on *:dialog:arkaway:sclick:8: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Dışarıdayım!  | echo %logo 2Şuanda Awaysınız. }
on *:dialog:arkaway:sclick:9: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Yemekteyim!  | echo %logo 2Şuanda Awaysınız. }
on *:dialog:arkaway:sclick:10: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Oyundayım!  | echo %logo 2Şuanda Awaysınız. }
on *:dialog:arkaway:sclick:11: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Uyuyorum!  | echo %logo 2Şuanda Awaysınız. }
on *:dialog:arkaway:sclick:15: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 TV İzliyorum!  | echo %logo 2Şuanda Awaysınız. }
on *:dialog:arkaway:sclick:16: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 PC Başında Değilim!  | echo %logo 2Şuanda Awaysınız. }
on *:dialog:arkaway:sclick:17: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Hemen Döneceğim!  | echo %logo 2Şuanda Awaysınız. }
on *:dialog:arkaway:sclick:18: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Telefondayım!  | echo %logo 2Şuanda Awaysınız. }
on *:dialog:arkaway:sclick:7: { away  | /amsg Awaydım Geri Döndüm! | echo %logo 2Away Modundan Çıktınız.  }