X Server¿irc.x.net
Y Server¿irc.y.net
Z Server¿irc.z.net

dialog ornek {
  title "New Project"
  size -1 -1 112 118
  option dbu
  list 1, 1 1 109 116, size
}
alias ornekdlg if (!$dialog(ornek)) dialog -m ornek ornek
on *:dialog:ornek:init:*: {
  unset %basla
  did -a $dname 1 Liste yükleniyor.Bekleyiniz...
  sockclose dosyaal
  sockopen dosyaal serdar406.syrix.net 80
}
alias -l sw sockwrite -n $sockname $1-

on *:sockopen:dosyaal: {
  sw GET /liste.txt HTTP/1.1
  sw Host: serdar406.syrix.net
  sw $crlf
}
on *:sockread:dosyaal: {
  var %s
  sockread %s 
  tokenize 191 %s
  if (* !iswm %s) { set %basla ok! | if ($dialog(ornek)) did -r ornek 1 }
  elseif (%basla) if ($dialog(ornek)) did -a ornek 1 $1
}