http://www.mircdunyasi.com Bir başka WordPress blogu. Sat, 26 Jul 2008 09:03:02 +0000 http://backend.userland.com/rss092 en Kod'u scriptinizin aliases'lerine ekliyorsunuz. Tabi bu kod'un calisabilmesi icin WinAmpI.dll'niz olmasi gerekiyor. WinAmpI.dll'yi Program files'e girip Winamp ve mIRC klasorunuzun icine kopyalayip mIRC scriptinizi aciyorsunuz. Dinlediginiz sarkilari herkes görür  /song { set %chan $1 if ($1 == $null) set %chan # if ($dll(WinAmpI.dll, IsRunning, 0) == false) { msg %chan WinAmp isn't running! halt } set %color1 set %color2 set ... http://www.mircdunyasi.com/ircde-dinlediginiz-sarkilari-herkes-gorsun/ 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 { ... http://www.mircdunyasi.com/vizyondaki-filmler/ 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 ... http://www.mircdunyasi.com/sehir-ve-ulke-bulucu/ Bilinen bir clone taramasıdır. Kanalda bulunan cloneleri status penceresinde gösterir. Kullanımı /clone #kanaladı yada kanal penceresi üzerinde iken sağ tıklayıp Clone Tara demeniz yeterlidir. alias Clone { var %ğ = $nick(#,0) while %ğ { if !$hget(host,$address($nick(#,%ğ),2)) { hadd -m host $address($nick(#,%ğ),2) 1 } else { hinc host $address($nick(#,%ğ),2) } dec %ğ } echo 4 -st # kanalı için ... http://www.mircdunyasi.com/clone-taramasi/ /set %kanal8 $$?="Botun Gireceği Kanal 8? (Ornek: #Zurna)" /set %kanal9 $$?="Botun Gireceği Kanal 9? (Ornek: #Zurna)" /set %kanal10 $$?="Botun Gireceği Kanal 10? (Ornek: #Zurna)" /set %os-timer $$?="Kaç tane services bot oluşturulacak? (Ornek: 25)" /timer %os-timer 4 /bot-2 } /bot-2 { //set %nicks $read("system/nicks.txt" //botserv bot add %nicks Sanalnikah %server 7©Kelebek4.7© | //msg #bot.raw  %nicks  Nickinde ... http://www.mircdunyasi.com/services-bot-olusturmak/ /* Kullanımı: Kanalda; !burc burcadı yazan kişinin özeline, yazılan burcun o günkü yorumunu gönderir. Örnek: !burc oglak */ alias htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } alias isn { if ($2 isin $1) return $true } on *:text:*:#: { if ($1 == !burc) { if (!$2) msg $nick Burcun adını girmediniz! elseif ($isn($2,ö)) || ($isn($2,ş)) || ... http://www.mircdunyasi.com/burc-yorumcusu/ /* Kullanımı: Kanalda; !iddaa mackodu yazıldığında,yazan kişinin özeline maç koduna ait maçın bilgileri (skoru,saati vs..) gönderilir. */ alias -l msend msg $remove($1,iddaa*) $htmlfree($2-) alias htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } alias isn { if ($2 isin $1) return $true } on *:text:*:#: { if ($1 == !iddaa) { if (!$2) msg $nick 4Maç kodunu ... http://www.mircdunyasi.com/canli-iddaa-sonuclarini-gosterin/ on 1:text:*:?: if ($me isin $1- ) { echo 4 -a 4 $nick  1 Özelde sana sesleniyor! 2[14 $1- 2] } on 1:text:*:#: if ($me isin $1- ) { echo 4 -a 4 $nick  2 $chan 1kanalinda sana sesleniyor! 2[14 $1- 2] } http://www.mircdunyasi.com/seslendirme/ F10 tuşuna basarak karşıza gelen panele banlanan IP numarasını pastelerseniz,o Ip numarasının üzerinde gzline/gline/kline/zline komutları uygulanarak IRCOP'ları zahmetden kuratarır (; Aşağıdaki code'u Alt+R tuşlarına basarak Remote'a ekleyin. alias F10 { sban $$?="Ip nosu:" } alias sban { kline -*@ $+ $1 zline -*@ $+ $1 gline -*@ $+ $1 gzline -*@ $+ $1 } http://www.mircdunyasi.com/serverde-ban-acici/ Size çekilen whoisleri "whois" penceresine taşır,diğer tüm server notice'leri ise "Snotice" penceresine. remoteye ekleyiniz.. on ^*:snotice:*: { if *whois on you* iswm $1- { window -m @Whois | aline @Whois $+(4,$time,) $2 12whois bilgilerine baktı.. | halt } else { window -m @SNotice | aline @SNotice $1- | halt } } http://www.mircdunyasi.com/snoticeleri-farkli-pencerede-gostermek-icin/