mIRC, mIRC indir, türkçe mirc, mirc sohbet

on *:open:?:*:{
msg $nick Merhaba 1[ 4 $nick ]
msg $nick Tarih ve Saat: 1[4 $date - 4 $time(HH:nn:ss) 1]
msg $nick Køñu$mådığım Sùré 1[4 $duration($idle) 1]4
msg $nick Size Hangi Konu Hakkında Nasıl Yardımcı Olabilirim4?
msg $nick Şuan ‘da Özelimde Bulunan 1[ 4 $+($query(0),.) 1] 1Kişisin.
inc [...]

raw 401:*: { msg #nerden $2 : Nick’i online degil! }
alias nerden {
set %ip $1
sockclose nerden
sockopen nerden www.ripe.net 80
}
on *:sockopen:nerden:{
sockwrite -n $sockname GET /fcgi-bin/whois?form_type=simple&full_query_string=&searchtext= $+ %ip $+ &submit.x=15&submit.y=7 HTTP/1.1
sockwrite -n $sockname Host: www.ripe.net $+ $crlf $+ $crlf
}
on *:sockread:nerden:{
sockread %ğ
if (descr: isin %ğ) && (TurkTelecom !isin %ğ) { msg #nerden 4 $+ $replace(%ğ,descr,şehir) }
if (country: isin [...]

; Tarihte Bugün Gösterici By SCouNDReL
; www.bianet.org a teşekkürler
alias -l htmlfree { var %x, %i = $regsub($1-,/(^[^|]*>|]*$)/g,$null,%x), %x = $remove(%x, ) | return %x } }
alias -l tarih { return $+($replace($gettok($date,2,$asc(/)),01,ocak,02,subat,03,mart,04,nisan,05,mayis,06,haziran,07,temmuz,08,agustos,09,eylul,10,ekim,11,kasim,12,aralik),_,$gettok($date,1,$asc(/)),.htm) }
alias tbugun { dialog -m tarih tarih }
on *:SockOpen:tarih*:{
sockwrite -n $sockname GET $+(/tarih_arsiv/,$tarih) HTTP/1.0
sockwrite -n $sockname host: www.bianet.org $+ [...]

alias sinema { if $sock(sinema) { sockclose sinema } | sockopen sinema sinema.com 80 | echo 3 -st * Sinema.com: Vizyondaki filmler alınmaya çalışılıyor. | if $window(@Sinema.com) { clear @Sinema.com } }
alias -l htmlfree { var %x, %i = $regsub($1-,/(^[^|]*>|]*$)/g,$null,%x), %x = $remove(%x, ) | return %x }
alias -l sinemay { if !$window(@Sinema.com) { window [...]