alias ozelkabul { 
  set %ozelkabul.nick $1
  set %ozelkabul.address $2
  set %ozelkabul.msg $3-
  if ($dialog($1) != $null) { goto son }
  dialog -m $1 ozelkabul
  :son
}

dialog ozelkabul {
  title "Özel Konuşma İsteği"
  size -1 -1 164 61
  option dbu
  edit "", 1, 40 4 120 10, read
  text "Nick :", 2, 4 7 27 8
  text "Adres :", 3, 4 19 28 8
  text "Mesaj :", 4, 4 31 28 8
  edit "", 5, 40 18 121 10, read
  edit "", 6, 40 30 121 10, read
  button "Kabul ET", 7, 13 44 67 12, flat ok
  button "Red ET", 8, 86 44 66 12, flat cancel
}

on *:dialog:*:init:*:{
  if (Özel Konuşma İsteği == $dialog($dname).title ) { 
    set %ozelkabul.dialog $dname
    did -a $dname 1 %ozelkabul.nick
    did -a $dname 5 %ozelkabul.address
    did -a $dname 6 %ozelkabul.msg
  } 
}

on *:dialog:*:sclick:*:{
  if (Özel Konuşma İsteği == $dialog($dname).title ) { 
    if ($did == 7) { 
      .window -w $dname 
      .msg $dname 3,9/9,3\1,3/3,1\9,19,1  15,2 ÖzeL  ~    Görüşme  ~   İsteginiz   11,1    ®     15,2   KaBuL   Edilmiştir   11,1  ||   8,2 $$me 11,1  ||     3,1/1,3\9,3/3,9\0,9
      .set %ozelkabul.gorusme. [ $+ [ $dname ] ] ok
    }
    if ($did == 8) {
      .msg $dname   3,9/9,3\1,3/3,1\ 0,4   R  E  D   !   ®     8,5ÖzeL  ~    Görüşme  ~   İsteginiz   11,1    ®     15,2   KaBuL   Edilmemiştir  !    11,1  ||   8,2 $$me 11,1  ||     3,1/1,3\9,3/3,9\0,9

      .ignore -pu300 $dname
      .closemsg $dname
    } 
  }
}

on *:TEXT:*:?:{
  if ($nick == $me) { goto son }
  if (%ozelkabul.gorusme. [ $+ [ $nick ] ] == $null) {
    .ozelkabul $nick $address($nick,2) $1-
    .msg $nick  3,9/9,3\1,3/3,1\9,1 15 11,1 ÖzeL  ~   Görüşme  ~  İçin  11,1  ®   11,1  Lutfen ~  Bekleyiniz 11,1  ||   8,2 $$me 11,1  ||     3,1/1,3\9,3/3,9\0,93,9\0,9
    .window -h $nick
  }
}

on *:CLOSE:?:{ 
  if (%ozelkabul.gorusme. [ $+ [ $target ] ] != $null) { unset %ozelkabul.gorusme. [ $+ [ $target ] ] } 
}

menu status,query,channel,nicklist,menubar { 
  -
  Ozel sistem
  .Aç:.enable #ozelkabul| echo -a 4,1Özel Sistem :4,1 Açık 
  .Kapa:.disable #ozelkabul | echo -a 4,1Özel Sistem :4,1 Kapalı 
  -
}
}