örnek; /wiki Ankara
Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias wiki {
if ($1 == $null) { echo -a Lütfen bir arama terimi girin. | return }
var %term = $replace($1-, $chr(32), %20)
sockclose wiki
sockopen wiki tr.wikipedia.org 80
set %wikiterm %term
}
on *:sockopen:wiki:{
if ($sockerr > 0) return
sockwrite -n $sockname GET /w/api.php?action=query&prop=extracts&exintro&explaintext&format=json&titles= $+ %wikiterm HTTP/1.1
sockwrite -n $sockname Host: tr.wikipedia.org
sockwrite -n $sockname Connection: close
sockwrite -n $sockname $crlf
}
on *:sockread:wiki:{
var %tmp
sockread %tmp
if (%tmp != $null) {
if ($regex(%tmp, /"extract":"([^"]+)"/)) {
var %summary = $regml(1)
echo -a Wikipedia özeti: $replace(%summary, \n, $crlf)
}
}
}