alias identify {
  ; if (!$dialog(identify)) { .remote on | var %d = $dialog(identify,identify,-4) }
  if (!$dialog(identify)) { .remote on | dialog -m identify identify }
  else { halt }
}
dialog identify {
  title "Software mIRC "
  size -1 -1 67 37
  option dbu
  button "&Şifreni Gir", 1, 16 24 35 12, ok
  edit "", 2, 1 13 65 10, pass autohs
  text "Lütfen Şifrenizi Giriniz:", 6, 4 3 61 8
}
on 1:DIALOG:identify:init:0: { did -f identify 2 }
on 1:DIALOG:identify:*:*: {
  if ($devent == sclick) { 
    if ($did == 1) { /gir }
  }
}
alias gir {
  if ($did(2) == $null) { .error HoşGeldin. }
  else { /NickServ identify $did(2) }
}
on *:NOTiCE:*NickServ identify*:?:{ if ($nick == NickServ) { dialog -m identify identify } 
}

 
alias acilis /dialog -m acilis acilis
dialog acilis {
  title "Bağlantı Menüsü"
  size -1 -1 360 300
  option pixels
  box "Bağlantı Seçenekleri", 9, 12 56 334 200, flat
  text "Nick :", 15, 19 77 50 16, flat
  text "Alternatif Nick :", 16, 19 101 78 16, flat
  edit "", 17, 115 73 200 21
  edit "", 18, 115 96 200 21
  button "Sohbet Portalına Bağlan !", 19, 17 140 324 80, flat default
}
on *:dialog:F:sclick:27:freset
On *:DIALOG:acilis:*:* {
  if ($devent == init) { 
    did -a $dname 17 $me 
    did -a $dname 18 $anick
    if $server != $null {
    }
  }
  if ($devent == sclick) { 
    if ($did == 19 ) { .nick $did(17) | .anick $did(18) | uhu | server irc.ircforumlari.net }
    if ($did == 1 ) { run [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] }
    if ($did == 11 ) {
    }
  }
}
alias open {
  dialog -m acilis acilis
}
alias uhu {
  .timerss1 off
  .timerss off
  dialog -c acilis acilis 
}
on 1:start: { 
  .remote on 
  .acilis
  .set %otomsg.giren Kapalı
  .set %otomsg.çıkan Kapalı
}