Kullanılan Mirc Sürümü 6.35 Kullanılan Mirc Dili Türkçe Yapım Tarihi 27.12.2018 Versiyon v1 Script Editör KraLaz Web Sitesi www.mircclub.org Boyut 2.03 MB mIRCClub Oper/Admin Script IRC Sunucularında Oper ve Admin olarak görev yapan IRC kullanıcılarına hitap etmektedir. Mirc Scripti helper...
Unutulmayan chat programı mirc değişen windows sürümlerinde uyum sağlayabilimesi için güncellenerek kullanımınıza sunuldu mirc 6.35 sürümünün en güncel stabil versiyonunu indir. Eski internet kullanıcılarının bir çoğunun yakından tanıdığı ve kullandığı chat programı olan mirc zaman içinde yeni programların gölgesinde kaldı...
Mirc efsane chat programı uzun yıllardır eskimeyen gizemli sohbet plaftormu mirc ülkemizde yaklaşık 20 yıldır aktif olarak kullanılmaktadır. Sohbet mirc platformunda online olarak on binlerce kullanıcı chat yapmaktadır, kullanıcı sayısı bağlanacağınız sunucuya göre değişmektedir. Her sunucuda farklı kullanıcılar chat yapmaktadır...
Remote ile kullanabileceğiniz soru-cevap botu botu kullanabilmeniz için mirc ana dizine sorular.txt adı altında bir not defteri açıp içerisine soru*cevap şeklinde soruları alt alta ekleyebilirsiniz. Örnek olarak ingilizce türkçe liste aşağıda veriyorum indirebilirsiniz.
Mirc scriptinizde kullabileceğiniz eğlenceli bir kod !zar komutu ile çalışır kazanan kullanıcıya hediye gönderir.
Zurna Mirc Script İndir Zurna mirc script ile sohbete doyamayacaksınız, susmak bilmeyen sohbetciler ile 7/24 durmadan sohbet edebilirsiniz. Zurna mirc güncel mirc sürümü üzerine inşa edilmiş olup windows 7 ve üzeri işletim sistemlerinde sorunsuz olarak kullanabilirsiniz. Remote silme, lisans sorunu...
Geveze Mirc Script İndir Geveze mirc script ile sohbete doyamayacaksınız, susmak bilmeyen gevezelerle 7/24 durmadan sohbet edebilirsiniz. Soyle mirc güncel mirc sürümü üzerine inşa edilmiş olup windows 7 ve üzeri işletim sistemlerinde sorunsuz olarak kullanabilirsiniz. Remote silme, lisans sorunu gibi...
Müslüm Gürses namı değer Müslüm Baba, 7 Mayıs 1953 tarihinde Urfa’nın Halfeti ilçesinin Fıstıközü köyünde dünyaya gelmiştir. Gerçek adı Ahmet Akbaşdır. Müslüm Gürses’in çocukluğunun ilk yılları Şanlıurfa’da geçti. Annesinin acısını kaldıramamışken kardeşini de kara toprağa gömer. Bu durum Gürses’i daha...
Bu koruma ile giren kullanıcıların nick, ident ve hostunu kontrol edip eklediğiniz nick , ident ve hostlara gzline atmanıza yarayan alternatif bir karaliste addonu.
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 |
### /lamer komutu ile korumayı açabilirsiniz ### mircclub.org alias lamer { /dialog -m start start } dialog start { title "Ident Nick Ekstra Korumaları" size -1 -1 467 274 option pixels box "", 11, 19 13 430 256 text "Güvenlik Giriş Ayarları", 1, 136 3 167 20 edit "", 3, 125 37 186 20, center button "Nick gzline liste ekle", 8, 30 70 190 30, flat button "İdent gzline liste ekle", 4, 30 108 190 30, flat button "Host gzline liste ekle", 5, 30 148 190 30, flat button "Host gzline list'en sil", 2, 240 148 190 30, flat button "İdent gzline list'en sil", 6, 241 108 190 30, flat button "Nick gzline list'en sil", 7, 240 70 190 30, flat button "Kapat", 9, 125 190 192 29, flat text " Bu koruma sunucuya hep aynı nick yada ident ile saldırıları önlemek için yazılmıştır.", 10, 24 228 413 16 } on 1:dialog:start:*:*: { if ($devent == init) { did -a start 3 $null } if ($devent == sclick) { if ($did == 8 ) { /auser gzline $did(3) | /echo -a 0,4 $did(3) 0,1 Nicki Gzline Liste eklendi } } if ($devent == sclick) { if ($did == 9 ) { /dialog -c start start } } if ($devent == sclick) { if ($did == 7 ) { /ruser gzline $did(3) | /echo -a 0,4 $did(3) 0,1 Nicki Gzline List'en silindi } } if ($devent == sclick) { if ($did == 2 ) { /ruser gzline *!*@ $+ $did(3) | /echo -a 0,4 $did(3) 0,1 hostu Gzline List'en silindi } } if ($devent == sclick) { if ($did == 4 ) { /auser gzline *! $+ $did(3) $+ @* | /echo -a 0,4 $did(3) 0,1 identi Gzline Liste eklendi } } if ($devent == sclick) { if ($did == 6 ) { /ruser gzline *! $+ $did(3) $+ @* | /echo -a 0,4 $did(3) 0,1 identi Gzline Listen silindi } } if ($devent == sclick) { if ($did == 5 ) { /auser gzline *!*@ $+ $did(3) | /echo -a 0,4 $did(3) 0,1 hostu Gzline Liste eklendi } } } on gzline:join:#:{ gzline $nick : 4,1 Security Korumasi 4 $time - } |
Addona girdiğiz ipler sunucuya girdiğinde size uyarı verir ve geçici olarak shun atar açılan ekranda istefiğiniz işlemi yapabilirsiniz. Admin ve ircopların işine yarayabilecek bir kod.
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 |
on *:start:{ if (!$hget(ips)) { .hmake ips | .hload ips ips.mercy } if (!$hget(muafn)) { .hmake muafn | .hload muafn muafn.mercy } } alias ips { if !$dialog(ips) { .dialog -ms ips ips } } alias islem { if !$dialog(işlem) { .dialog -ms işlem işlem } } dialog işlem { title "İşlem Merkezi" size -1 -1 109 150 option dbu text " Nick :", 1, 6 6 25 8 edit "", 2, 40 4 65 13, read text " ident :", 3, 6 22 25 8 edit "", 4, 40 20 65 13, read text " iP :", 5, 6 38 25 8 edit "", 6, 40 36 65 13, read text " Şehir :", 7, 4 54 37 8 edit "", 8, 40 52 65 13, read box "", 12, 3 -2 105 69 text "Şuan Bu Kişiye Shun Atıldı", 15, 3 68 102 8, center button "Gline At", 9, 3 79 48 17 button "Shun Kaldır", 10, 55 79 48 17 button "Yardım'a Çek", 11, 3 98 48 17 button "Özel'e Al", 13, 55 98 48 17 button "Bu kişiyi Muaf Nicklere Ekle", 14, 3 117 100 12 box "", 16, 1 74 106 58 button "Kapat", 17, 2 133 104 15, ok } on *:dialog:işlem:init:*: { ;mdx MarkDialog $dname ; mdx SetDialog $dname bgcolor $rgb(237,351,219) ; mdx SetColor $dname 1 textbg $rgb(237,241,219) ;mdx SetColor $dname 1 background $rgb(287,291,219) ;mdx SetFont $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19 13 900 Verdana ; mdx SetColor $dname 1,2,3,4,5,6,7,8,15 background $rgb(237,241,219) ;mdx SetColor $dname 1,2,3,4,5,6,7,8,15 textbg $rgb(237,241,219) ;mdx SetColor $dname 15l text $rgb(199,92,2) } on *:dialog:işlem:sclick:13: { query $did(2).text } on *:dialog:işlem:sclick:14: { if $hget(muafn,$did(2).text).item { noop $input(Bu Nick Muaf Listede Mevcut,o,Muaf Uyarı) } else { if !$hget(muafn) { .hmake muafn 100 | .hadd -m muafn $did(2).text 1 | .hsave muafn muafn.mercy | shun $+(-*@,$did(6).text) | return $input(Nick Muaf Listeye Eklendi ve Shunu Kaldırıldı,o,Muaf Uyarı) } else { .hadd -m muafn $did(2).text 1 | .hsave muafn muafn.mercy | shun $+(-*@,$did(6).text) | return $input(Nick Muaf Listeye Eklendi ve Shunu Kaldırıldı,o,Muaf Uyarı) } } } dialog ips { title "Sorunlu IP Tespit Merkezi" size -1 -1 159 156 option dbu list 1, 6 13 64 74, size text " IP'ler", 2, 7 5 63 7 text " Muaf Nick'ler", 3, 88 5 64 8 list 4, 88 13 64 74, size edit "", 5, 6 91 64 12, multi autohs button "IP Ekle", 6, 6 107 64 12, flat edit "", 7, 88 91 64 12, multi autohs button "Muaf Nick Ekle", 8, 88 107 64 12, flat button "« « KAPAT » »", 15, 2 139 154 15, flat box "", 16, 2 -1 72 124 box "", 17, 84 -1 72 124 box "", 9, 2 122 154 16 text " Silmek için üstüne Çift tıklayınız", 10, 9 127 125 8 } on *:dialog:ips:*:*: { if $devent == init { mdx MarkDialog $dname mdx SetDialog $dname bgcolor $rgb(237,241,219) mdx SetFont $dname 1,2,3,4,6,8,9,10,11,12,13,14,15,16,17,18 +b Turkish 13 950 Verdana mdx SetColor $dname 1,2,3,4,6,8,9,10,11,12,13,14,15,16,17,18 textbg $rgb(237,241,219) mdx SetColor $dname 1,2,3,4,6,8,9,10,11,12,13,14,15,16,17,18 background $rgb(237,241,219) mdx SetColor $dname 1,2,3,4,6,8,9,10,11,12,13,14,15,16,17,18 text $rgb(0,0,0) mdx SetColor $dname 9,10,12,13,14,15 background $rgb(237,241,219) mdx SetColor $dname 9,10,12,13,14,15 textbg $rgb(237,241,219) mdx SetFont $dname 2,5,6,7,9,10,11,14 13 950 Verdana mdx SetColor $dname 9,10,15 textbg $rgb(237,241,219) mdx SetFont $dname 9,10,15 13 950 Verdana mdx SetColor $dname 2,3,10l text $rgb(199,92,2) var %:ips = 1 | while %:ips <= $hget(ips,0).item { .did -a $dname 1 $hget(ips,%:ips).item | inc %:ips } var %:muafn = 1 | while %:muafn <= $hget(muafn,0).item { .did -a $dname 4 $hget(muafn,%:muafn).item | inc %:muafn } } if $devent == sclick { if $did == 6 { if (*.* iswm $did(5)) { if $hget(ips,$did(5)) { return } | if !$hget(ips) { .hmake ips 100 | .write ips.mercy | return } | .hadd -ms ips $did(5) $rand(10,999) | .hsave -o ips ips.mercy | did -a $dname 1 $did(5) | did -r $dname 5 } } if $did == 8 { if $did(7) { if #* iswm $did(7) || *.* iswm $did(7) { return } | if !$hget(muafn) { .hmake muafn 100 | .write muafn.mercy | return } | if $hget(muafn,$did(7)) { return } | .hadd -ms muafn $did(7) $rand(10,9999) | .hsave muafn muafn.mercy | .did -a $dname 4 $did(7) | did -r $dname 7 } } if $did == 10 { if %:nick { .sajoin %:nick #0,0 | unset %:nick | unset %:ipp } } if $did == 12 { if %:nick { .shun $+(-*@,%:ipp) | unset %:nick | unset %:ipp } } if $did == 11 { if %:ipp { gline $+(*@,%:ipp) - Sorunlu | unset %:ipp | unset %:nick } } if $did == 13 { if %:nick { var %:com = 1 | while %:com <= $comchan(%:nick,0) { ban -k $comchan(%:nick,%:com) %:nick Sorunlu | inc %:com } unset %:nick | unset %:ipp } } if $did == 15 { unset %:nick | unset %:ipp | .dialog -c $dname } } if $devent == dclick { if $did == 1 { .hdel ips $hfind(ips,$did(1).seltext,1,W).item | .hsave -o ips ips.mercy | .hload ips ips.mercy | .did -d $dname 1 $did(1).sel } if $did == 4 { .hdel muafn $hfind(muafn,$did(4).seltext,1,W).item | .hsave -o muafn muafn.mercy | .hload muafn muafn.mercy | .did -d $dname 4 $did(4).sel } } } on *:dialog:işlem:*:*: { if $devent == init { renklendirici 20 } if $devent == sclick { if $did == 9 { gline $+(*@,$did(6).text) Sorunlu | dialog -c $dname } if $did == 10 { .shun $+(-*@,$did(6).text) | return $input(Shun Kaldırıldı,o,İşlem Merkezi) } if $did == 11 { sajoin $did(2).text #Yardim } } } on *:snotice:*Client connecting on port*:{ if $hget(muafn,$9) { return } .enable #ips | .who +I $9 var %:ip = 1 | while %:ip <= $hget(ips,0).item { if $+($hget(ips,%:ip).item,*) iswm $token($token($10,2,64),1,41) { .islem | set %:nick $9 | set %:ipp $token($token($10,2,64),1,41) | .shun %:nick - Sorunlu | .splay $mircdirsounds\uyar.wav | break } | inc %:ip } } #ips off raw 352:*:{ haltdef var %:ip = 1 | while %:ip <= $hget(ips,0).item { if $+($hget(ips,%:ip).item,*) iswm $4 { if !$dialog(işlem) { .dialog -ms işlem işlem } var %:rand $rand(10,9999999) .sockopen $+(bul,%:rand) anonymouse.org 80 | .sockmark $+(bul,%:rand) $4 .did -a işlem 2 $6 | did -a işlem 4 $3 | did -a işlem 6 $4 | did -a işlem 8 Bekleyin.. break } inc %:ip } .disable #ips } #ips end alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } on *:sockopen:bul*:{ var %:city sockwrite -n $sockname %:city GET /cgi-bin/anon-www.cgi/http://whatismyipaddress.com/ip/ $+ $sock($sockname).mark HTTP/1.1 %:city Accept: text/html, application/xhtml+xml, */* %:city Accept-Language: tr-TR %:city User-Agent: Mozilla/5.0 (compatible; MSIE 9.0; Windows NT 6.1; WOW64; Trident/5.0) %:city Host: anonymouse.org %:city DNT: 1 %:city Connection: Keep-Alive %:city $crlf if $dialog(işlem) { .did -r işlem 8 | .did -a işlem 8 Siteye Baglanıldı.. } } on *:sockread:bul*:{ if ($sockerr) { .sockclose $sockname | if $dialog(işlem) { .did -r işlem 8 | .did -a işlem 8 Hata.. | return } } var %city | sockread %city if (Country: isin %city) { if $token($htmlfree(%city),2,58) != Turkey { if $dialog(işlem) { sockclose $sockname | .did -r işlem 8 | .did -a işlem 8 Yurt Dışı... | return } } } if (City: isin %city) { if $dialog(işlem) { .did -r işlem 8 | .did -a işlem 8 $token($htmlfree(%city),2,58) | sockclose $sockname } } } |
Proxy koruması sorgulu sorgu cevaplarını istediğiniz log kanalına yansıtır. %95 civarı başarılı saldırıları büyük çoğunlukla kesmenize yarayabilir faydalı bir kod.
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 |
# Add-on u ekledikten sonra sağ tıklayıp log kanalını ayarlandıktan sonra aktif ediniz. # Muaf port için ilgili satırı çoğaltabilirsiniz. menu * { Proxy Koruması .Aç:/.enable #ProxyKoruma | echo -a Proxy koruması açıldı.. .Kapat:/.disable #ProxyKoruma | echo -a Proxy koruması kapatıldı.. .- .Log Kanalı:.set %proxylogkanali $$?="Örnek #kanal1,#kanal2" } #ProxyKoruma off on *:snotice:*Client connecting*:{ ; alt satır kopyalanarak muaf port eklenebilir if $remove($8,1,33,:) == 7000 { halt } .who +I $token($token($4-,2,58),1,32) } raw 352:*:{ var %:r $+($left($md5($ticks),$r(5,20)),$6) sockopen $+(proxy,%:r) proxy.turkirc.org 80 sockmark $+(proxy,%:r) $+($4,¿,$6) } on *:sockopen:proxy*:{ sockwrite -nt $sockname GET $+(/?ipv4=,$token($sock($sockname).mark,1,191)) HTTP/1.1 sockwrite -nt $sockname Host: $sock($sockname).addr sockwrite -nt $sockname Accept: image/jpeg, application/x-ms-application, image/gif, application/xaml+xml, image/pjpeg, application/x-ms-xbap, */* sockwrite -nt $sockname Accept-Language: tr-TR sockwrite -nt $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; Trident/4.0; SLCC2; .NET CLR 2.0.50727; .NET CLR 3.5.30729; .NET CLR 3.0.30729) sockwrite -nt $sockname Connection: Keep-Alive sockwrite -nt $sockname $crlf } on *:sockread:proxy*:{ if ($sockerr) { .sockclose $sockname | return } var %:proxy | sockread -f %:proxy | tokenize 32 %:proxy ;msg %proxylogkanali -a %:proxy if $regex($1-,/sonuc red/i) { gzline $+(*@,$token($sock($sockname).mark,1,191)) +5h Proxy Yasak! /msg %proxylogkanali (4GİRİŞ) $token($sock($sockname).mark,1,191) numaralı IP Proxy'dir. (Nick: $token($sock($sockname).mark,2,191) $+ ) sockclose $sockname return } if $regex($1-,/sonuc green/i) { /msg %proxylogkanali (3GİRİŞ) $token($sock($sockname).mark,1,191) numaralı IP Proxy degildir. (Nick: $token($sock($sockname).mark,2,191) $+ ) sockclose $sockname return } if $regex($1-,/sonuc orange/i) { /msg %proxylogkanali (7GİRİŞ) $token($sock($sockname).mark,1,191) numaralı IP sorgulanamadı! (Nick: $token($sock($sockname).mark,2,191) $+ ) sockclose $sockname return } } #ProxyKoruma end |
30.09.2018 tarihli güncel ssl proxy listesidir linkden indirebilirsiniz.
30.09.2018 tarihli güncel socks proxy listesi irc sunucularına proxy sokmanıza yarayan socks 5 listesidir.
Mircinizde Sunucu akill listesini döküp düzenleyebileceğiniz güzel bir addon
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 |
on ^1:NOTICE:*:*:{ if (*@* iswm $1) && (%akilnotice == on) { write akill.txt $gettok($1,2,64) did -a aklist 1 $regsubex(akill,$gettok($1,2,64),/(\*)$/S,) } } dialog aklist { title "Akill Listesi - Liste Otomatik Akill Yer" size -1 -1 123 169 option dbu list 1, 2 16 119 104, size edit "", 2, 46 124 57 10, multi autohs text " IP Girin :", 3, 3 125 43 8 button "Ekle", 7, 105 123 16 26 button "KAPAT", 6, 1 152 120 14, ok text "Örnek: 78.161.*", 4, 3 139 98 9 box "", 8, 2 135 101 14 box "", 9, 2 121 42 13 box "", 10, 2 0 119 13 text " Silmek icin ipin uzerine Cift tiklayin", 11, 3 4 111 8 } on *:dialog:aklist:*:*:{ if $devent == init { ;mdx MarkDialog $dname //set %akilnotice on | .os akill list .timer 1 1 //set %akilnotice off ; mdx MarkDialog $dname ; mdx SetDialog $dname bgcolor $rgb(237,241,219) ; mdx SetFont $dname 1,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20 +b Turkish 13 950 Verdana ; mdx SetColor $dname 1,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20 textbg $rgb(237,241,219) ; mdx SetColor $dname 1,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20 background $rgb(237,241,219) ; mdx SetColor $dname 1,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20 text $rgb(0,0,0) ; mdx SetColor $dname 11,13,10,12 background $rgb(237,241,219) ; mdx SetColor $dname 11,13,12,10 textbg $rgb(237,241,219) ; mdx SetFont $dname 2,7,6,11,13,12,10,14,15,16 13 950 Tahoma ; mdx SetColor $dname 11,4l text $rgb(199,92,2) } if $devent == dclick { if $did == 1 { .os akill del $+(*@, $did(1).seltext,*) did -d $dname 1 $did(1).sel } } if $devent == sclick && $did == 7 { haltdef .os akill add +0 *@ $+ $did(2) $+ * Sunucu Kurallarini İhlal Ettiniz.. | did -a aklist 1 $did(2) } if $devent == sclick && $did == 4 { dialog -m xbilgi xbilgi } if $devent == close { write -c akill.txt set %akilnotice off } } alias xakil { dialog -m aklist aklist } |
Spamfilter nedir ? Spamfilter ile nick’leri , yazıları , saldırıları , ipleri dahi , herşeyi kontrol etmemizi sağlayan ve kontrol altına tutmamız için en büyük yarar sağlıyacak bir niteliğe sahip olmasına rağmen çok sık kullanılmamaktadır. Soru Cevap şeklinde ve kısa...
Random nick ve identlere karşı spam olarak alabileceğiniz güzel bir koruma, nickleirn sunucuya girmesini engelleyerek statusde ban yemelerine sebeb olur.
|
1 |
/spamfilter add u gzline - Random_Nick (?-i)^(.+![a-z]{3,7}@.+:[a-z]{3,7})$ |
Nick ve identinde 3 ile 7 arası sessiz yanyana harf bulunan kullanıcıların ban yemesine sebeb olur.
