Bu kod sayesinde butun services’leri tek bir pencerede toplayabilirsiniz.

on ^*:notice:*:?: {
if ($nick == Nickserv) {
if (!$window(@Services)) { window -en @Services }
echo 5 -t @Services Nickserv ~ $1- | haltdef
}
if ($nick == Chanserv) {
if (!$window(@Services)) { window -en @Services }
echo 5 -t @Services Chanserv ~ $1- | haltdef
}
if ($nick == Memoserv) {
if (!$window(@Services)) { window -en @Services }
echo 5 -t @Services Memoserv ~ $1- | haltdef
}
}

mIRCKoLik Bağımlılarının Tek Buluşma Mekanı.

AŞK,SEVGİ,DOSTLUK,ARKADAŞLIK,SOHBET,EĞLENCE,MÜZİK,RADYO,OYUN,GIRGIR-ŞAMATA,MUHABBET ve daha fazlası için sitemizi mutlaka ziyaret edin.

SOHBETE GİRMEK İÇİN: http://www.mirckolik.com/sohbet

!reklam www.reklamkelimesi şeklinde çalışmatadır.

Bu kodu mircinizi remote kısmına eklemeniz gerekmektedir.

on *:text:*:?:{
if !reklam isin $1 {
.msg #opers $nick $+ : Reklam raporu verdi.. Reklam Yapan Nick $2 , Reklamı $3-
.msg $nick Teşekkürler Raporunuz Alındı 12 $nick

mIRCKoLik Bağımlılarının Tek Buluşma Mekanı.

AŞK,SEVGİ,DOSTLUK,ARKADAŞLIK,SOHBET,EĞLENCE,MÜZİK,RADYO,OYUN,GIRGIR-ŞAMATA,MUHABBET ve daha fazlası için sitemizi mutlaka ziyaret edin.

SOHBETE GİRMEK İÇİN: http://www.mirckolik.com/sohbet

mIRC addonları, mirc scriptlere eklenmek suretiyle özel olarak yapılmış yardımcı mirc kodlarına denir.

Sozluk anlami “Uzerine Ekle” olan addonlar sadece mIRC’ta degil hemen hemen yapilmis tum software programlarda bulunmaktadir. Addonlargenelde bu programlara sonradan eklenen ve hem gorsel hemde islevsellik acisindan zenginlik katan program parcalaridir.

Cogunlukla kod olan bu kucuk eklemeler sadece bu standart ta kalmayip exe, dll vs.. olabiliyorlar. Onemli olan yama ile addonları karistirmamaktir.Add-on’larda bazen acik kapayabilir. Ama bu Addonlarin asil gorevleri degildir.

Son donemlerde add-on larin koltugunu DLL’ler sallamaya basladi. Fakat yazilimi ve kullanimi Addonlar kadar kolay olmayan dll ler herzaman bu yarista Addonlardan sonra yer alacaklardir.

mIRC ADDON Kurulumu
Addonların kurulumu çok basit ve çesitlidir.
Kurulum komutları kısaca şöyledir;
/load -rs sürücü:\klasor\MircDizini\addo nismi.mrc
//load -rs $mircdir\system\addonismi.mrc
/load -rs system/addon/addonismi.mrc
/load -rs addonismi.mrc

Addonunuzu mIRC programindan direkt olarak(komut yazmadan) da yukleyebilirsiniz. ALT + R tuslarina basarak mIRC editorunu ortaya cikartin ve yeni bir sayfa ekleyerek gerekli kodları yapıştırın.

mIRCKoLik Bağımlılarının Tek Buluşma Mekanı.

Arkadaşlık,Dostluk,Sevgi,Aşk,Muhabbet,Gırgır,Şamata,Sohbet,Dedikodu,Oyun,Müzik ve daha fazlası için aşağıdaki adresimize tıklayın ve sizlerde bu arkadaşlık sayfasında bize takılın.

Sohbete Katılmak için:  http://www.mirckolik.com/sohbet/

Şamata,Eglence,Aşk,Sevgi,Muhabbet,Dostluk,Arkadaşlık bütün bunları Yaşayabileceğiniz tek bir mekan var.İsterseniz sizlerde bizlere katılıp sevginin,aşkın,dostluğun,sohbetin en samimi ve en sıcak olduğu bu mekana sizlerde katılabilirsiniz.Yapmanız gereken tek şey Aşağıdaki adrese tıklayıp aramıza katılmanız olacaktır.Sabırsızlıkla bekliyoruz senin de bize katılmanı.

mIRCKoLik Bağımlılarının Tek Buluşma Mekanı

Tıklayın Sohbete Katılın: http://www.mirckolik.com/sohbet/

Log Okuyucu Hazir Kod 
kod:
mIRC Scriptinizde konuşmalarin loglarini ( kayitlarini ) tutmaya yarayan bir koddur. Kullanimi /logs

alias logs {
window -aekl21S @Log Verdana 12
.titlebar @Log Dosyalar? …
editbox @Log Ekranda arama yapaca??n?z kelimeyi buraya girin…
echo 7 @Log $findfile($logdir,*.log,0,aline -l 6 @Log $remove($1-,$logdir)) adet dosya mevcut
echo 12 @Log Görüntülemek istedi?iniz dosyay? seçin.
}
menu @Log {
lbclick:{
clear @Log | loadbuf @Log $+($shortfn($logdir),$line(@Log,$1,1))
window -b @Log
}
$iif(!$sline(@Log,0),$style(2)) ??lem
.Bilgi: {
aline @Log $str(-,5)
aline @Log 4Dosya bilgileri…
aline @Log 2Boyutu :7 $bytes($file($+($logdir,$$1)).size).suf
aline @Log 2Dosya Ad? :7 $$1
aline @Log 2Dosya Yolu :7 $logdir $+ $$1
aline @Log 2?lk oturum :7 $replace($asctime($file($+($logdir,$$1)).ctime),mon,Pazartesi,tue,Sal?,wed,Çar?amba,thu,Per?embe,fri,Cuma,sun,Pazar,jan,Ocak,Feb,?ubat,Mar,Mart,sat,Cumartesi,apr,Nisan,May,May?s,Jun,Haziran,Jul,Temmuz,Aug,A?ustos,Sep,Eylül,Oct,Ekim,Nov,Kas?m,Dec,Aral?k)
aline @Log 2Son kapan??:7 $replace($asctime($file($+($logdir,$$1)).mtime),mon,Pazartesi,tue,Sal?,wed,Çar?amba,thu,Per?embe,fri,Cuma,sun,Pazar,jan,Ocak,Feb,?ubat,Mar,Mart,sat,Cumartesi,apr,Nisan,May,May?s,Jun,Haziran,Jul,Temmuz,Aug,A?ustos,Sep,Eylül,Oct,Ekim,Nov,Kas?m,Dec,Aral?k)
aline @Log $str(-,5)
}
.Listeden Ç?kar:dline -l @Log $sline(@Log,1).ln
.Tamamen Sil:{
clear @Log
.remove $+($shortfn($logdir),$$1)
echo 4 @Log $$1 dosyas? silindi.
dline -l @Log $sline(@Log,1).ln
}
.Dosya Arama: {
var %t = $$?=\\\\”Aranacak kelimeyi girin\\\\”
if $findfile($logdir,$+(*,%t,*).log,0) {
clear @Log
clear -l @Log
echo 5 @Log $findfile($logdir,$+(*,%t,*).log,0,aline -l 6 @Log $remove($1-,$logdir)) adet dosya mevcut
}
else { clear @Log | echo 4 @Log Arama kay?tlar?nda $qt(%t) bulunamad?… }
}
.Tüm Liste:clear @Log | clear -l @Log | echo 7 @Log $findfile($logdir,*.log,0,aline -l 6 @Log $remove($1-,$logdir)) adet dosya mevcut
}
on *:input:@Log:{
if $left($1,1) == / { return }
if $fline(@Log,$+(*,$1-,*),0) {
aline 3 @Log || Arama yap?l?yor ||
var %Jenk = 1, %\\\\\\\’ = ||
while %Jenk <= $fline(@Log,$+(*,$1-,*),0) {
if ($mid($fline(@Log,$+(*,$1-,*),%Jenk).text,1,2) != %\\\\\\\’) {
aline -p @Log || $+ $fline(@Log,$+(*,$1-,*),%Jenk).text
}
inc %Jenk
}
aline 5 @log || Arama sona erdi ||
}
else { aline 4 @Log || Arama kayd? bulunamad? || }
}
VN:F [1.1.8_518]

Bekleyiniz.

Toplu sajoin kodu. Sajoni nedir? Sajoin komutunu sadece adminler kullanabilir. Sajoin kısaca bir kullanıcıyı (useri) komut sistemiyle bir kanala otomatik çekme joinleme işlemidir. Bu kodumuz ise birden fazla kullanıcı aynı anda baska kanala sajoinlemeye yarıyor. Kodu remotenize eklemeniz gerekmektedir.

Toplu Sajoin Kodu

Kod:
menu status,channel,query {
  Sunucu Ban aç
  .Zline Kaldir:/zline -*@ $+ $$?=”Zline Kaldirmak istediginiz IP Örnek : 212.62.34.53″
  .Gline Kaldir:/gline -*@ $+ $$?=”Gline Kaldirmak istediginiz IP Örnek : 212.62.34.53″
  .Kline Kaldir:/kline -*@ $+ $$?=”Kline Kaldirmak istediginiz IP Örnek : 212.62.34.53″
  .Gzline Kaldir:/gzline -*@ $+ $$?=”Zline Kaldirmak istediginiz IP Örnek : 212.62.34.53″
  .Shun Kaldir:/shun -*@ $+ $$?=”Shun Kaldirmak istediginiz IP Örnek : 212.62.34.53″
  .TempShun:/tempshun – $+ $$?=”TempShun Kaldirmak istediginiz Nick Örnek : absolut”
}

Gerçek Aşkların,Gerçek Dostlukların Tek Adresi Tıkla sende bu Anı Bizimle Paylaş: http://www.mirckolik.com/sohbet/

mIRC ‘ de Kayıtsız nickleri kontrol et.

•Kod:
alias masreg {
  /set %m 1
  :jump1
  /set %mnick $nick(#,%m)
  if (%mnick == $null) { halt | /unset %except }
  if (%mnick == %except) { /inc %m | goto jump1 }
  if (%mnick == $me) { /inc %m | goto jump1 }
  if (%mnick != $me) { /ns status %mnick  }
  inc %m
  goto jump1
}

#yeah On
On *:notice:*:*: {
  if ($nick == NickServ) {
    if (Status isin $1-) && ($3 == 0) { write kayit.txt $2 }
  }
}
#yeah End

alias bilgi {
  var %i 1
  while %i <= $lines(kayit.txt) {
    !msg $read(kayit.txt,%i) Nickiniz Kayıtlı değildir. Nick’inizi kaydetmek için :  /ns register şifre e-maiL   Komutunu uygulayınız. Not: (YazdıGınız Email adresi birebir doGru oLmaLidir.) İslemde Sonra Mailinize Böyle  Bir  Kod Gelecektir  4Örnek (.NickServ AUTH 1840800 ) Mailinize Gelen kodu Copy  Tab veya Aynını  Yazıp  Enter  Yaparak İşlemi  Tamamlamıs Olursunuz.Örnek:/NickServ AUTH 1840800 4Önemli Not:Nick şifrenizi kimseyle paylaşmayınız.   
    inc %i
  }
}

alias kayit { .enable #yeah | .timer 1 1 /masreg | .timer 1 5 /bilgi | .disable #yeah }
• Kullanım : /kayit

Not: /Kayit yazınca bulunduğunuz kanalda status aracılığıyla tüm nicklerin kayıtlı olup olmadığına bakar ve kayıtlı olmuyanları bir metin belgesinde toplar o metin belgesindeki nicklere kayıt komutunu iletir. (Kodu sadece Oper ve Adminler Kullanmalıdır!)

Kod Alt + R bölümüne aittir.
/bigtext mesajınız. seklinde yollayın

Açıklama: 
Alias kelimesinin kimseye yabancı gelmediğini biliyorum.
Aliases kullanımı mIRC’de gayet basit olmakla beraber, hayal gücünüze bağlı olarak; gerek komut oluşturma gerek identifier oluşturmanıza yarar.

-

Basit kullanım(Giriş)

Örneğin: /allnotice diye bir komut oluşturalım ve bu komut ile tüm bulunduğumuz kanallara notice yollayalım.
Komut: /allnotice

Alias: allnotice if ($1) { var %1 = 1 | while (%1 <= $chan(0)) { notice $chan(%1) $1- | inc %1 } }

Kod açıklaması:
;Alias ismimizi belirledik.
allnotice {
;$1 1. kelime demek. Yani /allnotice kelime($1) Diyoruzki, eğer 1. kelime girilmişse yani mevcut ise
if ($1) {
;%1 isminde bir değişken oluşturup değer olarak 1 atıyoruz.
var %1 = 1
;/while komutu ile %1 değişkenini(değer = 1) bulunduğumuz kanal sayısınına($chan(0)) eşitleyene kadar %1 değişkenini arttırıyoruz(/inc aşşağıda)
while (%1 <= $chan(0)) {
;/notice ile bulunduğumuz tüm kanallara $1-(1. kelime ve sonrasındaki girdiğimiz text) gönderiyoruz.
notice $chan(%1) $1-
;/inc komutu ile %1 değişkenini yukarıda belirttiğimiz gibi kanal sayısına eşit olana kadar arttırıyoruz.
inc %1
}
}

En basit kullanıma örnek bu şekilde verilir.
Şimdi diyeceksinizki; Arkadaşım iyi güzel hoşta yok /while dedin, yok /inc dedin? Bunlar nedir? Bunu bana söylemeden önce, /while kullanımınıda anlatayım.

Zaten mIRC’da /help aliases yazdığınız zaman while loops konusunu göreceksiniz.

While Loops:

While (vakit, zaman, müddet, süre, iken) tabirlerine gelmektedir.
Mantık olarak /while komutunda açılan bracket sonrasındaki tüm işlevler belirlediğiniz şekilde TEKRARLANIR.
Komut içerisinde ek olarak /break ve /continue komutlarıda vardır. Bunları açıklayacağım.

While’da işlev yapacağınız değişkeni oluştururken /set yerine /var kullanırsanız daha mantıklı olur. Çünki /set kullandığınız’da, tekrarlama işlemi sona erdiğinde oluşturduğunuz değişken silinmez. Ama /var kullanırsanız, tekrarlama işlemi sona erdiğinde değişken silinir.

Örnek bir kullanım gösterelim: //var %1 = 1 | while (%1 <= 10) { echo -a Sayı: %1 | inc %1 }

Burada %1 adında bir değişken oluşturduk ve değer olarak 1 verdik.
/echo komutunu %1 değeri 10 olana kadar tekrarladık.
Yukarıda görüldüğü gibi mantık gayet basit.

/break kullanımı:
Bu komut ise tekrarlama işlemini durdurmak için kullanılır.
Örnek bir kod göstereceğim. Zaten burada /break komutunun manığını iyice çözeceksiniz.
Örneğin: Mesela bir txt dosyasının içerisinde belirlediğimiz bir kelimeyi arayalım.
Kod: //var %1 = 1 | while (%1 <= $lines(deneme.txt)) { if ($regex($read(deneme.txt),$1)) { echo -a Kelime bulundu. | break } | inc %1 }

Burada diyoruzki: %1 adında bir değiken oluşturup değer olarak 1 veriyoruz.
Sonra deneme.txt dosyasındaki satır sayısını($lines(deneme.txt)) %1 değişkenine eşitleyene kadar, /if komutunu uyguluyoruz. /if komutunda(eğer 1. kelime deneme.txt dosyasının içinde mevcut ise, /echo komutu ile “kelime bulundu.” verisini aktif ekrana yansıt.)
Şimdi diyeceksinizki “arkadaşım /break kullandında ne işe yaradı? kullanmasanda “kelime bulundu.” verisini alıcaktık?
Bende diyorumki: Evet alıcaktınız. Ama kelime ilk satırda olsa bile, son satır’ı okuyana kadar while devam eicekti. Yani burada diyoruzki eğer 1. kelime, deneme.txt dosyasındaki herhangi bir satırdaki veri ile eşleşdiği taktirde, “kelime bulundu.” verisini yansıt ve tekrarlama işlemini durdur. Mantık bu kadar basit.

Ek bilgi: Herhangi bir tekrarlanma işlevi gerçekleşirken, CTRL+Break tuşuna basarsanız, tekrarlanma işlevi sona erecektir.
Sanırım while loops hakkında anlaşılmayan bir konu kalmadı.

Aliases kullanımında $1,$2,$5- gibi tabirler nedir?:

Bunun mantığı oldukça basitdir. $1 1. kelime demektir.
Örneğin; /deneme isminde bir aliasımız var. /deneme komutundan sonra gelen ilk veri $1 olur. Mantığı gayet basit.

Örnekle gösterelim: alias deneme if ($1 == ok) { echo -a 1. kelime ok. } | if ($1 == not) { echo -a 1. kelime not. }

Denemek için, /deneme ok ve /deneme not yazınız. En basit mantığı budur.

İdentifier şeklinde aliases kullanımı:

mIRC ile uğraşan her kişi, identifier kelimesinin ne manaya geldiğini bilir.
Bilmiyorsanız söyleyeyim, mIRC’de gördüğünüz $ ile başlayan bir takım kullanımlar.
Örneğin: Token identifier’larından $addtok veya en basit olarak bilinen identifier $nick gibi.

-

Şimdi bizde aliases kullanımında bunun nasıl yapılabileceğini öğreneceğiz.
Örneğin: Bir kanal içerisindeki belirlediğimiz bir harf ile başlayan kullanıcıları belirliyelim.

Kod:
alias chk if ($1 && $2) { var %1 = 1,%2 | while (%1 <= $nick($1,0)) { if ($regex($nick($1,%1),$2)) { %2 = $addtok(%2,$nick($1,%1),32) } | inc %1 } | return %2 }

Örnek kullanım: $chk(#kanalismi,a)
Gördüğünüz gibi bir identifier oluşturduk, aliases kullanarak.
Kullanım tarzı size kalmış. //echo -a $chk(#kanalismi,a) olarak veya //msg #kanal Rumuzunun içerisinde z harfi bulunan kullanıcılar: $chk(#kanalismi,z) gibi.

Aliases $prop kullanımı:

Örnek bir identifier: $group(#grup-ismi).fname (#grup-ismi grubunun dosya yolunu verir)
İşte buradaki fname prop(propertie) oluyor.
Buna örnek olarak yukarıdaki alias ile örnek vereceğim.
Kod:
alias chk if ($1 && $2) { var %1 = 1,%2 | while (%1 <= $nick($1,0)) { if ($+($iif($prop == not,!$regex($nick($1,%1),$2),$regex($nick($1,%1),$ 2)))) { %2 = $addtok(%2,$nick($1,%1),32) } | inc %1 } | return %2 }

Burada diyoruzki, eğer prop not ise, ters işlev yap. Yani nick’inin içinde belirtilen harf olmayan kullanıcıları göster.
Daha basit bir kod ile;
alias deneme var %1 = Bur bir denemedir. | if ($prop == ok) { return Bu bir deneme değildir. } | return %1
//echo -a $deneme => Bur bir denemedir.
//echo -a $deneme().ok => Bu bir deneme değildir.
şeklinde dönecektir.

Alias kullanımında -l parametresi:
Herhangi bir alias oluştururken, -l anahtarını kullanırsanız, manuel olarak o alias’ı uygulayamazsınız. Kullanmaya kalktığınızda, alias ekli değilmiş gibi hata verir.
Örneğin: alias -l deneme echo * Bu bir denemedir.
/deneme yazdığınız’da alias’ın çalışmadığını göreceksiniz. Yani kısacası manuel olarak işlev görmez. Ama otomatik olarak görür.
Örneğin; alias deneme1 deneme
Yaptığınız’da çalışacaktır.