Whois Code
mircalem Whois çekeni gösteren kod 25.02.2011 eklendi.

irc kodu:
raw 301:*: {
haltdef
echo -a 4» Away Durumu:12 ( $+ $3- $+ )
}
raw 310:*: {
haltdef
echo -a 4» IRC Helper
}
raw 311:*:{
echo -a 4&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;-1<12Kimlik Bilgisi Sorgulamas?1>4&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;
echo -a 4» Nick: $2
echo -a 4» FullName: $6-
echo -a 4» ?p Adresi: $3 $+ 4 $+ @ $+ 1 $+ $4
var %clone = $kanalclone($2)
if (%clone == $null) echo -a 4» Kanaldaki Klonlar?: (14 Clone yok! 4)
else echo -a 4» Klonlar?: 4( $+ $numtok(%clone,44) $+ 4) 1ki?i:12 %clone
haltdef
}
alias kanalclone {
if ($ial($address($1,2),0) == 1) return
var %nickler = 0 | var %clone = $1
while (%nickler < $ial($address($1,2),0)) { inc %nickler | var %clone = $addtok(%clone,$ial($address($1,2),%nickler).nick, 44) }
return %clone
}
raw 338:*:{
haltdef
echo -a 4» Gerçek ?p Adresi: $3
echo -a 4» Gerçek ?p: $4
}

raw 312:*:{
haltdef
echo -a 4» Ba?l? Oldu?u Server: $3
}
raw 313:*: {
haltdef
echo -a 4» Network Özelli?i: $5 $6 $7 $8 $9
}
raw 307:*: {
haltdef
echo -a 4» Kay?t Durumu: Bu Nick Kay?tl? ve ?dentify Edilmi?tir.
}

raw 314:*:{
haltdef
echo -a 4&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;1<12Kimlik Bilgisi Sorgulamas? Sonu1>14&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;
echo -a 4» Nick: $2
echo -a 4» FullName: $6-
echo -a 4» ?p Adresi: $3 $+ 4 $+ @ $+ 1 $+ $4
}
raw 317:*:{
haltdef
%idle = $replace($duration($3),secs, saniye,sec, saniye,mins,dakika,min,dakika,hrs,saat,hr,saat,day s,gün,day,gün,wks,hafta,wk,hafta)
%baglanis = $replace($asctime($4),mon,Pazartesi,tue,Sal?,wed,Ç ar?amba,thu,Per?embe,fri,Cuma,sat,Cumartesi,sun,Pa zar,jan,Ocak,Feb,?ubat,Mar,Mart,apr,Nisan,May,May? s,Jun,Haziran,Jul,Temmuz,Aug,A?ustos,Sep,Eylül,Oct ,Ekim,Nov,Kas?m,Dec,Aral?k)
echo -a 4» Ba?land??? Zaman: %baglanis
echo -a 4» Bo? Oldu?u Süre: %idle
echo -a 4» Ba?land?ktan Sonra Geçen Süre: $duration($calc($ctime - $4))
}
raw 318:*:{
haltdef
echo -a 4&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211;1<12Kimlik Bilgisi Sorgulamas? Sonu1>4&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;
}
raw 319:*:{
haltdef
echo -a 4» Kanallar?: $3-
}
raw 320:*:{
haltdef
echo -a 4» swhois: $4-
}
raw 378:*:{
haltdef
echo -a 4» Gerçek Ip Adresi: $6
}
raw 379:*:{
haltdef
echo -a 4» Nick modeleri: $6-
}
raw 671:*:{
haltdef
echo -a 4» Baglantı: $3-
}