Bir txt dosyası içerisine server listesinizi şu şekilde hazırlayınız.
Kod: Kodu kopyalamak için üzerine çift tıklayın!
X Server¿irc.x.net
Y Server¿irc.y.net
Z Server¿irc.z.net
Aşağıdaki örnek kod yukardaki şekilde bir text dosyasına alt alta sıralanmış server
listesini örnek dialog'daki listeye yansıtıcaktır.
Kod: Kodu kopyalamak için üzerine çift tıklayın!
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
}