Mirc Hazır Kodla Kanal girişinde Services Botları Konuşturmak bu remotu kullanabilmek için bütün yetkilerinizin acık olmasi lazım. Mirc ALT + R yaparak açılan yere aşagıdaki kodları yapıştırın. daha sonra mircinizde /remote on yazınız örnek olarak operservi ekledim siz istediginiz botu yazabilirsiniz hangi kanala girerseniz otomotik olarak o kanalda belirlediginiz mesajı yazacaktır.. on *:join:#: { if [...]
Mirc version cektirmekle bot saldırılarından ircd Nizi koruyun Bu hazır kod ile sunucunuzda bot saldırısı yapanları gline komutuyla uzaklaştırmış olursunuz. Günümüzde ki trojan saldırı botları, ” ctcp version ” sorgusuna yanıt vermemektedir. Dolayasıyla aşağıda ki hazır kod ile bu sorguya cevap vermeyen botlar sunucudan uzaklatırılmış olur. Mevcut hazır kodu mirc remote kısmına kopyalamanız yeterlidir. on [...]
Mirc Hazır Kod: Proxy Koruma Sistemi: ;############################################## ;# by SpecifiC – 29/07/07 ;# menu status,menubar,channel { .- .Tekrar Koruması ..Açık:.enable #xproxyx | .echo -a 0,2 Proxy Koruması Açıldı ..Kapalı:.disable #xproxyx | .echo -a 0,2 Proxy Koruması Kapatıldı .- } #xproxyx on on *:snotice:*Client*connecting*: { var %dx = $gettok($right($left($10,-1),-1),2,64) var %re = $iif($regex(%dx,-) != [...]
alias yildiztemizle { var %y $+(.,?) , %yi if $numtok($1-,32) == 1 { var %1kelime 1 } %yi = $replace($1-,$chr(42),%y,$chr(36),%y,$chr(91),%y,$chr(93),%y,$ chr(92),%y,$chr(47),%y,$chr(43),%y,$chr(63),%y,$ch r(94),%y,$chr(124),%y,$chr(40),%y,$chr(41),%y,$chr (164),%y,$chr(33),%y,$chr(123),%y,$chr(125),%y,$ch r(189),%y,$chr(188),%y,$chr(39),%y,$chr(46),%y,$ch r(44),%y,$chr(60),%y,$chr(61),%y,$chr(62),%y,$chr( 34),%y,$chr(199),%y,$chr(221),%y,$chr(58),%y,$chr( 45),%y,$chr(254),%y,$chr(222),%y,$chr(32),%y) if %1kelime { %yi = $+(^,%yi,$chr(36)) } return $iif($len($remove(%yi,.,*)) > 5,%yi,SPAMKONTROLUNDEGECERSIZ aslolan mesaj: $1- ) } on *:open:?:{ set -u5 %nickw. [ $+ [ $nick ] ] warn [...]
Kodu mirc botunuza eklemeniz halinde herhangi bir kanalda nick kanala .fikra veya !fikra yazarsa rastgele bir fıkrayı kanala yazacaktır. Böylelikle kanaldaki tüm kullanıcılarla fıkrayı paylaşmış olacaksınız. Hayır,fıkrayı kendim okumak istiyorum başkasının görmesine istemiyorum derseniz: Kodu kendi mirc scriptinize ekledikten sonra /fikra komutunu uyguladığınızda @Fıkra penceresinden okuyabileceksiniz. Fıkra bitiminde @Fıkra penceresinin editbox’unda fikra yazısı belirecektir. Enter [...]
1. Kod : Google’da arama yapma. Kullanımı: /gara kelime 2. Kod : Pagerank değeri ölçme. Kullanımı: /ara domain.uzantısı 1. Kod; alias gara { if !$1 { echo -at Bilgi: Herhangi bir kelime girmediniz. Kullanım şekli: $+($chr(2),/gara kelime,$chr(2)) | halt } else { set -e %1 $1- | set %3 $count(%1,$chr(32)) | sockclose google | sockopen [...]
on $*:text:/!badnick(ekle|sil)\s(\S+)/ASi:#rapor:{ var %badnick = badnick $regml(2),%msj = msg # $regml(2) maskı goto $regml(1) :ekle | auser %badnick | %msj eklendi | halt :sil | ruser %badnick | %msj silindi } on *:snotice:*:{ if $level($9) == badnick { if $($+(%,bad,~,$9),2) == $9 { os raw svsnick $9 Guest $+ $r(1,9999999) :0 } else { kill [...]
Proje : Kelime Algılayıcı (Strong Wall System) v1.0 Kodlayan : XcLusive Download: sws-addonu Ne işe yarar?; algılama için eklenen kelimeyi ascii karakterlerden söküp alır bu sayede küfür reklam vb. mesajları daha iyi ve sağlıklı olarak tespit edebilirsiniz. (SpecifiC arkadaşımzın önerim üzerine kendi kodlamasına koyduğu bir işlem tabi ben bunu daha anlaşılır bir şekilde dialog haline [...]
on *:start:unset %scnt alias msj { if !%scnt { set %scnt 1 } msg #test,#oyun,#sohbet $read(mesaj.txt,%scnt) inc %scnt 1 if %szlines < %scnt { set %scnt 1 } } menu * { Oto mesaj .Aç:set %scnt 0 | .timerfm 0 600 msj .kapat:.timerfm off } Did you like this? Share it:Tweet
alias yt { if (($dde(opera,WWW_GetWindowInfo)) || ($dde(firefox,WWW_GetWindowInfo)) || ($dde(netscape6,WWW_GetWindowInfo)) || ($dde(iexplore,WWW_GetWindowInfo,1))) { if ($regex(url,$v1,/^”([^"]+)”\x2C”([^"]*)”(?:x2C”.*”)?$/)) { if (http://www.youtube.com/* iswm $+($regml(url,1)),$+(“,$regml(url,1),”)) { describe $active IzLediğim Video : $+ $iif($regml(url,2),$remove($gettok($regml(url,2),2-,45),])) YouTube $+($regml(url,1)),$+(“,$regml(url,1),”)) } else { echo -a *Hata* Bu Bir YouTube Linki DeğiL. } } else { echo -a *Hata* Browser BuLunamadı yada TanımLanamıyor… } } } NOT: [...]
