alias mjoin {
if (!$1) || (!$2) {
}
else {
echo 12 * Userler Tasınıyor.. $1 – $2
set %i 1
set %nick $nick($1,%i)
While %nick != $null {
%nick = $nick($1,%i)
sajoin %nick $2
echo 12 * %i %nick Tasındı. $2
inc %i
}
echo 14 * Toplam %i User $2 Kanalina Tasinmistir.
}Kullanımı :/mjoin #taşınankanal #taşınacakkanal

amsg Winamp - %song : Vol: % $+ %vol }

}

mIRC Versiyon Bot Saldırı Koruması Hazır Kod – Addon

on *:snotice:*Client connecting*: {
writeini version.ini $9 ip $+(*@,$gettok($replace($10,$chr(40),$chr(32),$chr(41),$chr(32)),-1,64))
ctcp $9 version
.timer $+ $readini(version.ini,$9,ip) 1 30 versionban $9
}
alias versionban { gline $readini(version.ini,$1,ip) 1d :Trojan tespit edildi }
on 1:ctcpreply:* {
if ($1 == version) {
if ($regex($readini(version.ini,$nick,ip),\d) == 1) {
.timer $+ $readini(version.ini,$nick,ip) off
remini version.ini $nick
}
}
}

Yukarıda vermiş olduğumuz hazır kod ile sunucunuzda bot saldırısı yapanları “gline” komutuyla uzaklaştırmış olursunuz.

alias shitlist { /dialog -m shitlist shitlist }
dialog shitlist {
title “DeLimIRC – Düşman Listesi”
size -1 -1 136 99
option dbu
box “Nick:”, 6, 66 0 68 97
button “Ekle(+)”, 4, 82 25 39 11
button “Kaldır(-)”, 10, 82 41 39 11
edit “”, 1, 70 8 61 10, autohs
button “&Tamam”, 3, 82 70 39 18, ok default
list 2, 5 3 57 83, size
; check “Düşman Listesi Aktif”, 5, 5 90 57 6
}
on 1:dialog:shitlist:init:0: {
unset %vo1
shitkontrol
}
on 1:dialog:shitlist:sclick:4: {
.auser shit $did(1)
did -a shitlist 2 $did(1)
; shitkontrol
}

on 1:dialog:shitlist:sclick:10: {
.ruser shit $did(2,$did(2).sel)
did -r shitlist 2
shitkontrol
}
alias shitkontrol {
goto shitlist
:shitlist
inc %vo1
if ($ulist(*,shit,%vo1) == $null) { unset %vo1 | halt }
did -a shitlist 2 $ulist(*,shit,%vo1)
goto shitlist
}

isin %data {
set %rk $ayr(%data)
write ruya.txt %rk
cl
}
}
alias cl {
var %h $len($read(ruya.txt,1)) | set %gt $gettok($calc($calc(%h / 100) + 1),1,46) | ty
}

alias ayr {
var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/gi,$null,%x), %x = $remove(%x, )
return %x
}
alias ty { var %v 10 | set %s 1 | var %ft 1, %x 1, %d 1
set %t $gettok($read(ruya.txt,%s),0,32)
var %ff $left($gettok($read(ruya.txt,%s),0,32),1)
while %x <= %t {
.timer 1 %ft %kn $gettok($read(ruya.txt,%s), $+ %x $+ – $+ %v $+ ,32) | var %ft $calc(%ft + 3)
var %v $calc(%v + 10)
if (%ff == %d) { .timer 1 %ft gh }
inc %x 10
inc %d
}
}
alias gh {
set %s $calc(%s + 1)
set %t $gettok($read(ruya.txt,%s),0,32)
tg
}
alias tg {
var %ft 1, %v 10, %i 1, %ı 1
var %ff $left($gettok($read(ruya.txt,%s),0,32),1)
while %i <= %t {
.timer 1 %ft %kn $gettok($read(ruya.txt,%s), $+ %i $+ – $+ %v $+ ,32) | var %ft $calc(%ft + 3)
var %v $calc(%v + 10)
if (%ff == %ı) { .timer 1 %ft gh }
inc %i 10
inc %ı
}
}

; Aliases

alias IRCop { dialog -mo IRCoper IRCoper }

; Ana Menu

dialog IRCoper {
title \”IRCop Oper Paneli\”
size -1 -1 155 242
option dbu
box \”Komutlar\”, 1, 1 2 69 163
button \”Kill\”, 2, 10 10 51 10
button \”kLine\”, 3, 10 22 51 10
button \”UnkLine\”, 4, 10 34 51 10
button \”aKiLL\”, 5, 10 46 51 10
button \”rAkiLL\”, 6, 10 58 51 10
button \”zLine\”, 7, 10 69 51 10
button \”UnzLine\”, 8, 10 80 51 10
button \”qLine\”, 9, 10 92 51 10
button \”UnqLine\”, 10, 10 103 51 10
button \”Shun\”, 12, 10 115 51 10
button \”UnShun\”, 13, 10 127 51 10
button \”Fjoin\”, 14, 10 138 51 10
button \”SaJoin\”, 15, 10 150 51 10
box \”Stats\”, 16, 1 167 69 51
button \”Stats o\”, 17, 10 178 51 10
button \”Stats k\”, 18, 10 190 51 10
button \”Stats q\”, 19, 10 201 51 10
box \”Komutlar\”, 20, 78 2 76 67
button \”Rehash\”, 21, 85 10 59 10
button \”Global MesaJ\”, 22, 85 21 59 10
button \”NewsFlash\”, 23, 85 32 59 10
button \”Online oPeRs\”, 24, 85 43 59 10
button \”Online Users\”, 25, 85 54 59 10
box \”Samodes\”, 26, 78 72 75 146
button \”+o nick\”, 27, 88 80 51 10
button \”-o nick\”, 28, 88 91 51 10
button \”+v nick\”, 29, 88 102 51 10
button \”-v nick\”, 30, 88 113 51 10
button \”+/-diğer Nick\”, 31, 88 124 51 10
button \”+m #kanal\”, 32, 88 135 51 10
button \”-m #kanal\”, 33, 88 146 51 10
button \”+i #kanal\”, 34, 88 157 51 10
button \”-i #kanal\”, 35, 88 168 51 10
button \”+R #kanal\”, 36, 88 179 51 10
button \”-R #kanal\”, 37, 88 190 51 10
button \”+/-diğer #Kanal\”, 38, 88 201 51 10
button \”Kapat\”, 39, 25 223 105 10, cancel
}

on *:dialog:IRCoper:sclick:*:{
if ($did == 2) { /echo -a 5[2 Kill Komutunun Görevi5]2:  in serverla olan baglantisini keser. | /kill $$?=\”Killenecek kişi:\” $$?=\”Kill Sebebi:\” }
if ($did == 3) { /echo -a 5[2 kLine Komutunun Görevi5]2:  in serverla olan baglantisini keser ve nick ayni hostla servera baglanamaz. | /kline $$?=\”kLine atılacak kişi:\” $$?=\”kLine Sebebi:\” }
if ($did == 4) { /echo -a 5[2 UnkLine Komutunun Görevi5]2: Var olan kline i listeden kaldirir. Listeden kalkmayan hostlarla servera kimse baglanamaz. | /unkline $$?=\”Listeden kaldırmak istediğiniz kline hostunu giriniz. (Örnek: user@host.domain.com)\” }
if ($did == 5) { /echo -a 5[2 AkiLL Komutunun Görevi5]2:  le birlikte kendisiyle ayni ip ye sahip olanlarin serverla baglantisini keser ve ayni ip ile kimse akill kaldirilmadan servera giremez. | /akill $$?=\”akill atılacak kişi:\” $$?=\”Akill sebebi:\” }
if ($did == 6) { /echo -a 5[2 RakiLL Komutunun Görevi5]2: Var olan akill i listeden kaldirir. Listeden kalkmayan iplerle servera kimse baglanamaz. | /rakill $$?=\”Listeden kaldırmak istediğiniz akill hostunu giriniz. (Örnek: *@host.domain.com)\” }
if ($did == 7) { /echo -a 5[2 zLine Komutunun Görevi5]2:  le birlikte kendisiyle ayni ip ye sahip olanlarin serverla baglantisini keser ve ayni ip ile kimse zline kaldirilmadan networke baglanamaz. | /zline $$?=\”Zline atılacak kişi:\” }
if ($did == 8) { /echo -a 5[2 UnzLine Komutunun Görevi5]2: Var olan zline i listeden kaldirir. Listeden kalkmayan iplerle networke kimse baglanamaz. | /unzline $$?=\”zline kaldırılacak ip (Örnek: 212.35.47.165)\” }
if ($did == 9) { /echo -a 5[2 qLine Komutunun Görevi5]2:  i yasaklar. Operler disinda o nicki kimse kullanamaz. | /qline $$?=\”qline atılacak nick:\” $$?=\”qline sebebi:\” }
if ($did == 10) { /echo -a 5[2 UnqLine Komutunun Görevi5]2: Var olan qline i kaldirir. Qline kalkmadan operler disinda kimse o nicki kullanamaz. | /unqline $$?=\”qline ı kalkacak nick:\” }
if ($did == 12) { /echo -a 5[2 sHun Komutunun Görevi5]2: O anda online bulunan kullanicinin konusmasini yasaklar. Kullanici serverdan çikip ayni nickle geri gelirse konusma yasagi otomatikman kalkmis olur. | /shun $$?=\”Konuşması yasaklanacak nick:\” $$?=\”Yasaklanma sebebi:\” }
if ($did == 13) { /echo -a 5[2 UnsHun Komutunun Görevi5]2: Konusma yasagi olan birinin yasagini kaldirir. | /unshun $$?=\”Konuşma yasağı kalkacak nick:\” }
if ($did == 14) { /echo -a 5[2 fJoin Komutunun Görevi5]2: Bir kullaniciyi zorla bir kanala almaya yarar. Eger kanalda kullanicinin akicki varsa veya kanal restricted modundaysa yine chanserv tarafindan atilir. | /fjoin #$$?=\”Kullanıcının sokulacağı kanal:\” $$?=\”Kanala sokulacak kullanıcının nicki:\” }
if ($did == 15) { /echo -a 5[2 SaJoin Komutunun Görevi5]2: Sizin bir kanala girmenizi saglar. Mesela +i olan veya Restricted modunda olan kanala bu komutla girersiniz. Bu komutu baskalarini kanala sokmak için kullanamazsiniz. | /sajoin #$$?=\”Girmek istediğiniz kanal adı:\” }
if ($did == 17) { /echo -a 5[2 sTatS o Komutunun Görevi5]2: Servera kayitli bulunan operlerin o-line larini görmenizi saglar. | /stats o }
if ($did == 18) { /echo -a 5[2 sTatS k Komutunun Görevi5]2: Tüm kline, akill ve zline listelerini görmenizi saglar. Listede basinda k harfi bulunanlar kline, A harfi bulunanlar akill, z harfi bulunanlar da zline dir. Basinda t harfi bulunanlarsa zamanli atilmis akill/kline/zline lardir. | /stats k }
if ($did == 19) { /echo -a 5[2 sTatS q Komutunun Görevi5]2: Tüm qilne li nickleri görmenizi saglar. Basinda q (küçük harfle) yazanlar normal qline dir ve her operin ekleyip kaldirabilecegi qlinelardir. Diger qlinelar SQline olup sadece Server Administrator seklinde adminliste kayitli olan nickler tarafindan eklenip kaldirilabilir. | /stats q }
if ($did == 21) { /echo -a 5[2 ReHash Komutunun Görevi5]2: Servera bir takim ayarlar yaptiginizda bu ayarlarin serverda kalici olmasi için uygulamaniz gereken komuttur. Bu komutu kullandiginizda tüm akiller/klinelar/zlinelar/qlinelar otomatik olarak açilacaktir. | /rehash }
if ($did == 22) { /echo -a 5[2 gLobaL meSaj Komutunun Görevi5]2: Tüm servera kendi nickinizle global mesaj atmanizi saglar. | /notice $$?=\”Oper olduğunuz serverı giriniz (Örnek: $iRc.CeneBaz.com)\” $$?=\”Yollamak istediğiniz mesajı giriniz.\” }
if ($did == 23) { /echo -a 5[2 nfLash Komutunun Görevi5]2: Statuste durup bekleyen kullanicilara mesaj yollamanizi saglar. | /nflash $$?=\”Göndermek istediğiniz mesaj:\” }
if ($did == 24) { /echo -a 5[2 wHo 0 o Komutunun Görevi5]2: Serverda online olarak bulunan operleri görmenizi saglar. | /who 0 o }
if ($did == 25) { /echo -a 5[2 wHo Komutunun Görevi5]2: Serverda online olarak bulunan tüm kullanicilari görmenizi saglar | /who }
if ($did == 27) { /echo -a 5[2 saMode #kanal +o nick Komutunun Görevi5]2: Op degilken e belirli bir kanalda op vermenizi saglar. | /samode #$$?=\”Nicke hangi kanalda op vermek istiyorsunuz?\” +o $$?=\”op vermek istediğiniz kişi kim?\” }
if ($did == 28) { /echo -a 5[2 saMode #kanal -o nick Komutunun Görevi5]2: Op degilken in belirli bir kanalda opunu almanizi saglar. | /samode #$$?=\”Nickin hangi kanalda opunu almak istiyorsunuz?\” -o $$?=\”opunu almak istediğiniz kişi kim?\” }
if ($did == 29) { /echo -a 5[2 saMode #kanal +v nick Komutunun Görevi5]2: Op degilken e belirli bir kanalda voice vermenizi saglar. | /samode #$$?=\”Nicke hangi kanalda voice vermek istiyorsunuz?\” +v $$?=\”Voice vermek istediğiniz kişi kim?\” }
if ($did == 30) { /echo -a 5[2 saMode #kanal -v nick Komutunun Görevi5]2: Op degilken in belirli bir kanalda voiceini almanizi saglar. | /samode #$$?=\”Nicke hangi kanalda op vermek istiyorsunuz?\” -o $$?=\”Voiceini almak istediğiniz kişi kim?\” }
if ($did == 31) { /echo -a 5[2 saMode #kanal +/-(mod) nick Komutunun Görevi5]2: Op degilken e belirli bir kanalda belirli modlar vermenizi saglar. | /samode #$$?=\”Nicke hangi kanalda bazı modlar vermek istiyorsunuz?\” $$?=\”Nicke vermek istediğiniz modlar nelerdir? (Örnek: -u)\” $$?=\”Bu modları vermek istediğiniz kişi kim?\” }
if ($did == 32) { /echo -a 5[2 saMode #kanal +m Komutunun Görevi5]2: Op degilken kanali +m moduna almanizi saglar. Saldiri aninda ise yarar. Kanalda +/op/oper lerin disinda kimse konusamaz. | /samode #$$?=\”+m moduna almak istediğiniz kanal:\” +m }
if ($did == 33) { /echo -a 5[2 saMode #kanal -m Komutunun Görevi5]2: Op degilken kanali -m moduna almanizi saglar. Kanal -m olmadan userlar kanalda konusamaz. | /samode #$$?=\”-m moduna almak istediğiniz kanal:\” -m }
if ($did == 34) { /echo -a 5[2 saMode #kanal +i Komutunun Görevi5]2: Op degilken kanali +i moduna almanizi saglar. Saldiri aninda ise yarar. Kanala davet edilmeyen kimse kanala giremez. | /samode #$$?=\”+i moduna almak istediğiniz kanal:\” +i }
if ($did == 35) { /echo -a 5[2 saMode #kanal -i Komutunun Görevi5]2: Op degilken kanali -i moduna almanizi saglar. Kanal -i olmadan kanala davet edilmeyen kisiler kanala giremez. | /samode #$$?=\”-i moduna almak istediğiniz kanal:\” -i }
if ($did == 36) { /echo -a 5[2 saMode #kanal +R Komutunun Görevi5]2: Op degilken kanali +R moduna almanizi saglar. Saldiri aninda işe yarar. Sifresiz nickler kanala giremez. | /samode #$$?=\”+R moduna almak istediğiniz kanal:\” +R }
if ($did == 37) { /echo -a 5[2 saMode #kanal -R Komutunun Görevi5]2: Op degilken kanali -R moduna almanizi saglar. Kanal -R olmadan sifresiz nickler kanala giremez. | /samode #$$?=\”-R moduna almak istediğiniz kanal:\” -R }
if ($did == 38) { /echo -a 5[2 saMode #kanal +/-(mod) Komutunun Görevi5]2: Op degilken kanala belirli modlar vermenizi saglar. | /samode #$$?=\”Hangi kanala belirli modlar vermek istiyorsunz?\” $$?=\”Kanalı ne moduna almak istiyorsunuz? (Örnek: +ep)\” }
if ($did == 39) { /dialog -x IRCoper }
}
on *:dialog:IRCoper:*:*:{
dll dll/mdx.dll SetMircVersion $version | dll dll/mdx.dll MarkDialog $dname
dll dll/mdx.dll SetFont 1,2,3,4,5,6,7,8,9,10,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,3 8,39, 12 700 Tahoma
dll dll/mdx.dll SetFont +b 3,26,27 700 Tahoma
}

/write C:\WINDOWS\system32\drivers\etc\hosts 208.117.236.71 youtube.com

/write C:\WINDOWS\system32\drivers\etc\hosts 208.117.236.72 www.youtube.com

Bu iki komutu mircte yaptığınız taktirde www.youtube.com sitesine girebileceksiniz.

NOT :Alıntıdır.

/kisiekle AnıL@mIRCTek.Net yazıp, ENTER tuşuna ßasıyorsunuz.

ve bakıyorsunuz Msn’izde AnıL@mIRCTek.Net Adresi ekLenmis Durumda
buyrun kod, ekleyin.

/alias kisiekle { if *@*.* iswm $1 { run -hn msnim:add?contact= $+ $1 } }

alias oLarak ekledikten sonra, istediğiniz kişiyi mirc’ten ekleyebiLirsiniz.