mIRCbuL.Net Türkçe mIRC indir

/cik /quit [bukısmadamesajınız]

alias kısmına eklemeniz yeterli olcaktır /cik komutunu uyugladığınızda kanaldan cıkar ve yetkiniz varsa yazmış olduğunuz çıkış mesajı görünür..

sunucuya bağlandığınızda bu kod ile istediğiniz kanallara otomatik olarak girebilirsiniz..Bu kodu scriptinizin remote bölümüne eklemeniz yeterli olacaktır..ayrıca kanal1 kanal2 kanal 3 bunların aralarına kodda virgül koyarak coğaltabilirsiniz…örnek .join #Kanal1,#kanal2,#kanal3,#kanal4,#kanal5 gibi…

on *:CONNECT: {
.Oper nickiniz operşifreniz
.ns ghost nickiniz nickşifreniz
.nick nickiniz
.msg nickserv identify nickşifreniz
.join #Kanal1,#kanal2,#kanal3,#kanal4
}

/list komutu ile komutu kullandığımız IRC ağındaki aktif bütün kanalları listeleriz.Bazı IRC ağlarında binlerce kanal aktif durumda bulunur. Ancak biz listeleme yaparken /List komutu parametrelerinden faydalanarak kendi isteğimize yakın kanalları listeleyebiliriz.

Kullanım Şekli : /List

Şimdi /List komutu ve parametreleri ile kullanımını öğrenelim ;

Belirtilen kullanıcı sayısından daha fazla kullanıcı bulunan kanalları listelemek için kullanılır ;

Kullanım Şekli : /raw list >Sayı

Örnek :/raw list >10
Açıklama : Bu komutu uygularsak, içerisinde 10 kişiden fazla kullanıcı olan kanalları listeleriz.
Belirtilen kullanıcı sayısından daha az kullanıcı bulunan kanalları listelemek için kullanılır ;
Kullanım Şekli : /raw list <Sayı
Örnek : /raw list <10
Açıklama :Bu komutu uygularsak, içerisinde 10 kişiden az kullanıcı bulunan kanalları listeleriz.
Belirtilen tarihten daha erken oluşturulmuş kanalları listelemek için kullanılır ;
Kullanım Şekli : /raw list C<Sayı
Örnek : /raw list C<15,>25
Açıklama : Bu komutu uygularsak, 15 dakika içinde oluşturulmuş olan ve içerisinde 25 kullanıcıdan fazla kullanıcı bulunan kanalları listeleriz.
Belirtilen tarihten daha sonra oluşturulmuş kanalları listelemek için kullanılır ;
Kullanım Şekli : /raw list C>sayi
Örnek : /raw list C>20,>40
Açıklama : Bu komutu uygularsak, son 20 dakika içerisinde kurulmuş ve içerisinde 40 kullanıcıdan fazla kullanıcı bulunan kanalları listeleriz.
Belirtilen tarihten daha geç kurulmuş topic’leri olan kanalları listelemek için kullanılır ;
Kullanım Şekli : /raw list T>Sayı
Örnek : /raw list T>20
Açıklama : Bu komutu uygularsak, topici son 20 dakikadan önce değiştirilmiş kanalları listeleriz.
Belirtilen tarihten daha önce kurulmuş top.ic’leri olan kanalları listelemek için kullanılır ;
Kullanım Şekli : /raw list T<Sayı
Örnek : /raw list T<20
Açıklama : Bu komutu uygularsak, topici son 20 dakika içerisinde değiştirilmiş kanalları listeleriz.
Belirtilen Mask’a uygun kanalları listelemek için kullanılır ;
Kullanım Şekli : /raw list *mask*
Örnek : /raw list *kanal*
Açıklama : Bu komutu uygularsak, içerisinde kanal geçen bütün kanalları listeleriz.
Belirtilen Mask’ı içerisinde bulundurmayan kanalları listelemek için kullanılır ;
Kullanım Şekli : /raw list !mask
Örnek : /raw list !*kanal*
Açıklama : Bu komutu uygularsak, içerisinde LiderChat  kelimesi geçen kanallar harici bütün kanalları listeleriz.
Birkaç örnek ile öğrendiklerimizi pekiştirelim ;
soru : x harfi ile başlayan kanalları listelemek ?
çözüm : /list #x*
soru : x harfi ile biten kanalları listelemek ?
çözüm : /list #*x
soru : içerisinde “x” harfi geçen kanalları listelemek ?
çözüm : /list #*x*
soru : içerisinde “LiderChat” kelimesi geçen kanalları listelemek ?
çözüm : /list #*LiderChat*
soru : 6′dan fazla kullanıcı olan kanalları listelemek ?
çözüm : /list >6
soru : 100′den az kullanıcının olduğu kanalları listelemek ?
çözüm : /list <100
soru : Top.ic’i 20 dakika önce atılmış kanalları listelemek ?
çözüm : /list T<20>
soru :  Sohbet , oyun  kanalları dışında bütün kanalları listelemek istiyorum ?
çözüm : /raw list !#sohbet,!#oyun
soru : 20 den büyük 65 den küçük kanallardan #kanal kanalı haric olanları listelemek ?

çözüm : /raw list >20,<65,!#kanal

IRC Wildcard (Joker) 

IRC komutlarında kullanım alanını genişletmek adına kullanılan, isminden de anlaşılacağı üzere joker görevi gören karakterlerdir. Bu karakterler genellikle bir kullanıcının, kullanıcı maskesinin tümünü veya bir bölümünü tanımlarken kullanılır. akick,ban,who,list,ignore gibi komutlar wildcard karakterlerin kullanılabileceği komutlardan sadece birkaçıdır. 

? karakteri: 

Örnek: /who +cu #eğitim a? 

yukarıdaki örneği uygularsanız #eğitim kanalındaki kullanıcılar arasında identi iki haneli olupta ilk hanesi a olanları görüntülerseniz. 

Örnek: /who +cu #eğitim ??a 

yukarıdaki örneği uygularsanız #eğitim kanalındaki kullanıcılar arasında identi üç haneli olanlardan son hanesi a olanları görüntülersiniz. 

?? : bilinmeyen iki hanenin yerine gelebilecek tüm olasılıkların yerini alır. 

??? : bilinmeyen üç hanenin yerine gelebilecek tüm olasılıkların yerini alır. 

???? : bilinmeyen dört hanenin yerine gelebilecek tüm olasılıkların yerini alır. 

?x? : ikinci hanesi x olan üç haneli tüm olasılıkların yerini alır. 

??x? : üçüncü hanesi x olan dört haneli tüm olasılıkların yerini alır.* karakteri: 

Örnek: /who +cu #eğitim a* 

yukarıdaki örneği uygularsanız #eğitim kanalındaki kullanıcılar arasında identinin ilk harfi a olan tüm kullanıcıları görüntülersiniz. 

Örnek: /who +cu #eğitim a*b 

yukarıdaki örneği uygularsanız #eğitim kanalındaki kullanıcılar arasında identinin ilk harfi a, son harfi b olan tüm kullanıcıları görüntülersiniz. 

x*t*y : ilk hanesi x, son hanesi y ve içerisinde t harfi olan metnin geriye kalan tüm olasılıkların yerini alır. 

*x? : sondan bir önceki hanesi x olan metnin geriye kalan tüm olasılıkların yerini alır. 

x??* : ilk hanesi x olan en az üç haneli metinlerde geriye kalan tüm olasılıkların yerini alır. 

x*??a : ilk hanesi x son hanesi a olan en az dört haneli metinlerde geriye kalan tüm olasılıkların yerini alır. 

Kullanıldığı alana gelebilecek tüm olasılıkların yerini alır. Kullanıldığı tek hanenin yerine gelebilecek tüm olasılıkları kapsar.

on *:text:*:#:{

if !k isin $1 {

if $nick !isop $chan {

.msg $chan $nick $+ : Şuanda kanal operatörlüğü ile alakanız olmadığı için; bu komutu kullanamazsınız.

}

else {

.kick $chan $2 $3-

}

}

if !kb isin $1 {

if $nick !isop $chan {

.msg $chan $nick $+ : 12Şuanda kanal operatörlüğü ile alakanız olmadığı için; bu komutu kullanamazsınız.

}

else {

.mode $chan +b $2 | .kick $chan $2 $3 $4-

}

}

if !voice isin $1 {

if $nick !isop $chan {

.msg $chan $nick $+ : $chan 12Şuanda kanal operatörlüğü ile alakanız olmadığı için; bu komutu kullanamazsınız.

}

else {

.mode $chan +v $2

.msg $chan $2 : Kanalında $nick tarafından size voice 4(+v) verilmiştir.

}

}

if !devoice isin $1 {

if $nick !isop $chan {

.msg $chan $nick $+ :12 Şuanda kanal operatörlüğü ile alakanız olmadığı için; bu komutu kullanamazsınız.

}

else {

.mode $chan -v $2

.msg $chan $2 : $chan 12Kanalında voiceniz 4(+v) $nick tarafından alınmıştır.

}

}

if !deop isin $1 {

if $nick !isop $chan {

.msg $chan $nick $+ : 12Şuanda kanal operatörlüğü ile alakanız olmadığı için; bu komutu kullanamazsınız.

}

else {

.mode $chan -o $2

}

}

if !op isin $1 {

if $nick !isop $chan {

.msg $chan $nick $+ : 12Şuanda kanal operatörlüğü ile alakanız olmadığı için; bu komutu kullanamazsınız.

}

else {

.mode $chan +o $2

}

}

Bu Kodu Yüklemek için arkadaslar C:\Program Files içinde bulunan mirc klasorumuzu acıyoruz ve orda bi txt acıp kodumuzu o txt belgesine kopyalıyoruz kapatıyoruz evet diyip kayıt ediyoruz ve hemen ardından mircimizi acıp /load -rs dosyaadı.txt yapıp enterledikden sonra kodumuz yuklenmiş olucaktır.

#sericlone on 

on *:snotice:*Client connecting on*:{ 

.timer 1 15 unset %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ] 

inc %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ] 

if %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ] >= 4 { 

.kline $+(*@,$gettok($gettok($10,2,64),1,41)) 3600 IRC Network Özel Koruma Sistemi ; 4Secure2 aynı IP’den 4′den fazla giris tespit etmistir. 

unset %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ] 

} 

} 

#sericlone end 

YÜKLEME :

;Günlük Fal addonı, Editleyen: ‘KeMaNcI’

;Günlük falınıza bakmak için “/günlükfal” yazınız, ya da popupslardaki Günlük Fal’a tıklayınız.

on *:LOAD:echo 12 -st > Günlük Fal addonını yüklediniz. “/günlükfal” yazarak yada popupslardaki Günlük Fal’a tıklayarak falınıza bakabilirsiniz.

menu status,menubar,channel {

-

Günlük Fal:günlükfal

}

alias günlükfal { if !$sock(muneccim) { if $dialog(sa_gunlukfal) { dialog -x sa_gunlukfal } | dialog -ma sa_gunlukfal sa_gunlukfal } | else { echo 12 -st > Hata: Başka bir fala bakılıyor. } }

alias -l falgoster { if !$window(GünlükFal) { window -k0 @GünlükFal } | aline -p @GünlükFal $1- }

on *:sockopen:muneccim:{

if %burç {

sockwrite -n $sockname GET $+(/gunluk_fal/bugun.asp?burc=,%burç) HTTP/1.1

sockwrite -n $sockname Host: muneccim.com $+ $crlf $+ $crlf

}

else { echo 12 -st > Hata: Burç seçmelisiniz.. }

}

on *:sockread:muneccim:{

if ($sockerr) {

echo 12 -st > Hata: Bağlantı hatası, lütfen tekrar deneyiniz.

halt

}

else {

var %temptext

sockread %temptext

if (*<td><p align=”center”><img src=”../images/*”></td>* iswm %temptext) && $istok(koc.boga.ikizler.yengec.aslan.basak.terazi.akrep.yay.oglak.kova.balik,$gettok($gettok($gettok(%temptext,3,47),1,34),1,46),46) { falgoster $+(04,$upper($gettok($gettok($gettok(%temptext,3,47),1,34),1,46))) }

if (*<p align=”center”><big><big><font face=”Arial Black”>*</font></big></big></p>* iswm %temptext) { falgoster $+(14,$htmlfree(%temptext)) }

if (<p><font color=”#000000″ face=”Arial Narrow”><strong><big>* iswm %temptext) { falgoster $+(10,$htmlfree(%temptext)) | falgoster  | if $sock(muneccim) { sockclose muneccim } }

}

unset %burç

}

alias -l htmlfree {

var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;)

return %x

}

dialog sa_gunlukfal {

title “Günlük Fal”

size -1 -1 59 35

option dbu

combo 1, 3 8 53 55, size drop

box “Burç:”, 2, 1 0 57 21

button “Oku”, 3, 3 22 25 10

box “”, 4, 1 17 29 17

button “Kapat”, 5, 31 22 25 10, ok

box “”, 6, 29 17 29 17

}

on *:dialog:sa_gunlukfal:*:*:{

if $devent = INIT {

didtok $dname 1 44 koç,boğa,ikizler,yengeç,aslan,başak,terazi,akrep,yay,oğlak,kova,balık

did -c $dname 1 1

}

if $devent = SCLICK {

if $did = 3 { if !$sock(muneccim) { set %burç $did($dname,1).sel | sockopen muneccim muneccim.com 80 } | else { echo 12 -st > Hata: Başka bir fala bakılıyor. } }

}

}

Bu Kodu Yuklemek için ONcelikle Arkadaslar İlk Yapacagımız Şey C:\Program Files  içinde bulunan C:\Program Files\xx-Script Dosyamızın içine bir tane txt dosyası acıyoruz ornek olarak veriyorum gunlukfal.txt yukardaki addonumuzu bu koda yerleştirdikden sonra dosyamıza kayıt ediyoruz ve  scriptimizi acıyoruz oraya yazmamız gereken acıldıkdan sonra ise /load -rs gunlukfal.txt kodunu yazıp enterledikden sonra gunluk fal addonumuz kullanıma hazır haldedir.

on *:TEXT:!infoban:?:{
  if !$hget($nick) {
    .msg $nick Siz Banlanmadiniz ! | halt
  }
  else {
    msg $nick ———-Ban Bilgi Başlangici———-
    msg $nick [Nickiniz: $+($hget($nick,nickiniz),])
    msg $nick [Kanal: $+($hget($nick,kanal),])
    msg $nick [Banlayan: $+($hget($nick,banlayan),])
    msg $nick [Sebep: $+($hget($nick,sebep),])
    msg $nick [Zaman: $+($hget($nick,zaman),])
    msg $nick ———-Ban Bilgi Sonucu———-
    halt
  }
}   

YÜKLEME :

on *:text:*:?:{

if $1 == yardim {

msg $nick Lütfen !yardım olarak kullanın.

}

elseif $1 == !yardım {

var %> = $+(%,yardım,$nick)

if !$(%>,2) {

.timer 0 6 /sajoin $nick #Help | msg $nick Yardım odasına yönlendiriliyorsunuz. | /timer 0 11 /timers off |

inc -u200 $(%>,1)

}

else {

msg $nick Daha önce yardım almışınız,3 dk. beklemeniz gerekli

}

}

YÜKLEME :

Bos Bir Txt Belgesi OlusTurun bu txt belgesinin adı !yard

ım.txt örnek olsun bu belgeyi Mirc Klasörünüzün iÇine Veya Mirc Klasörünüzün Çinde Bas ka bir Klasöre Ati n daha sonra mirci açip/ load-rs!yardım.txt yazip enterleyin bu sayede haberler taramasi mircinize hazır olarak yüklenmiş olacaktır. Bu İşlemden Sonra Yapmanız Gereken İşlem Çalıştırmanızı Saglıyacaktır.

on *:snotice:*: {

if ($level($9) == muafnlist) { halt }

if ($level($9) == muafclist) { halt }

if (connecting isin $1-) {

if (%botnet == Acik) {

var %:ip $remove($gettok($10,2,64),$chr(41))

if $read(muafips.txt,w,$+(*,%:ip,*)) { halt }

if ($read(botnet.txt,w,$9)) {

.gzline $+(*@,%:ip) %agresif [ $+ [ %:ip ] ] +1800 Sc5 veya Botnet girisi olasiligiyla sunucudan 30 dakika Uzaklastirildiniz $date $time $+([,%botnick,])

.msg %operkanali [BILGI][ IP : %:ip ][ NICK : $9 ][Sc5 Veya Botnet Olasiligi]

halt

}

}

if (%random == Acik) {

var %identd = $remove($gettok($10,1,64),$chr(40))) {

if ($randomnick($9)) || ($randomnick(%identd)) { .gzline $+(*@,%:ip) +3800 Random nick/ident girisi yasaktir lutfen turkce karakterli harfler kullaniniz! $date $time $+([,%botnick,]) | .msg %operkanali [BILGI][ IP : %:ip ][ NICK : $9 ][Random Nick] | halt }

}

}

if (%proxy == Acik) {

if $read(muafips.txt,w,$+(*,%:ip,*)) { halt }

if $level($remove($gettok($10,2,64),$chr(41))) == proxy {

.gzline $+(*@,%:ip) +0 Proxy Korumasi! $date $time $+([,$me,])

.msg %operkanali [BILGI][ IP : %:ip ][ NICK : $9 ][Proxy Girisi][Users]

inc %istabutun

inc %istaProxy

}

else {

var %proxya $gettok($remove($10,$chr(41)),2,64)

if $read(proxyport.txt,w,$+(*,%proxya,*)) {

.msg %operkanali [BILGI][ IP : %:ip ][ NICK : $9 ][Proxy Girisi][Proxyport.Txt]

.gzline $+(*@,%:ip) +0 Proxy Korumasi! $date $time $+([,%botnick,]) | unset %proxya

}

if $read(proxylist.txt,w,%proxya) {

.msg %operkanali [BILGI][ IP : %:ip ][ NICK : $9 ][Proxy Girisi][Proxylist.Txt]

.gzline $+(*@,%:ip) +0 Proxy Korumasi! $date $time $+([,%botnick,]) | unset %proxya | halt

}

}

if (%agresif == Acik) {

if ($level($9) == muafnlist) { halt }

inc -u15 %agresif. [ $+ [ %:ip ] ]

if ( %agresif. [ $+ [ %:ip ] ] == 3 ) { .gzline $+(*@,%:ip) +1200 agresif baglanma sebebiyle 10 dakka sunucudan uzaklastirildiniz $date $time $+([,%botnick,]) | .msg %operkanali [BILGI][ IP : %:ip ][ NICK : $9 ][Agresif Baglanma] | unset %agresif. [ $+ [ %:ip ] ] | halt }

}

}

if (%vsifre == Acik) {

writeini version.ini $9 ip $+(*@,$gettok($replace($10,$chr(40),$chr(32),$chr(41),$chr(32)),-1,64))

.msg $9
VERSION

.timervkontrol 1 15 /set -u1 %vkontrol on

.timer $+ $9 1 15 /who $+(*,%:ip,*)

halt

}

}

}

alias guncelle {

.write -c proxylist.txt

sockopen dify list.iblocklist.com 80

.msg %operkanali Güncel proxy listesi alınıyor…

}

on *:sockopen:dify:{

sockwrite -n $sockname GET /?list=tor HTTP/1.1

sockwrite -n $sockname Host: list.iblocklist.com $+ $crlf $+ $crlf

}

on *:sockread:dify:{

if ($sockerr) { echo 12 -st Hataya rastlandı | halt }

else {

var %dify

sockread %dify

if $regex(%dify,/^tor:(.+)-/) { prekle $regml(1) }

}

}

on *:connect: {

torkur

}

alias torkur {

.timer 05:00 1 1 /guncelle

}

alias prekle { if $1 { if $read(proxylist.txt,w,$1) { halt } | else { write proxylist.txt $1 } } }

YÜKLEME :

Bos Bir Txt Belgesi OlusTurun bu txt belgesinin adı sc5random.txt örnek olsun bu belgeyi Mirc Klasörünüzün iÇine Veya Mirc Klasörünüzün Çinde Bas ka bir Klasöre Ati n daha sonra mirci açip/ load-rs sc5random.txtyazip enterleyin bu sayede haberler taramasi mircinize hazır olarak yüklenmiş olacaktır. Bu İşlemden Sonra Yapmanız Gereken İşlem Çalıştırmanızı Saglıyacaktır.