mIRCbuL.Net Türkçe mIRC indir

»Helper Menü
.Hitaplar
..(+) Ver Yardım Et:/mode # +v $$1 2 | /say Merhaba $$1 : YardIm kanaLı # `e HoşgeLdin. Size ServisLer hakkında nasıL yardImcı oLaßiLirim?
..SoRun ßeLirt:/say $$1 : Sorunuz Yoksa GerekSiz ßekLeme yapmayın. Aksi haLde kanaLdan ßanLanacakSınız.
..(-) Al Bye:/mode # -v $$1 2 | /say $$1 : Hoş Sohbetler Dileriz..
.-
.ChanServ Yardım
..Sık Kullanılan Komutlar
…Kayıt Et:/say $$1 : /Cs Register #Kanal Şifreniz Açıklamanız | /say Başka Yardım edeßiLeceğim ßir Konu varmı?
…Şifre Tanıt:/say $$1 : /Cs identify #Kanal Şifre | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Topic At:/say $$1 : /Cs Topic #Kanal Topiciniz | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…İnfo Çek:/say $$1 : /Cs info #Kanal | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Dropla Düşür:/say $$1 : Once : /Cs identify #KanaL Şifre | /Say DoğRu Şifreyi Girdikten Sonra : /Cs Drop #Kanal | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Şifre Gönder:/say $$1 : /Cs Sendpass #Kanal | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…İnvite:/say $$1 : /Cs invite #Kanal Nick | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Unban:/say $$1 : /Cs unban #Kanal Nick | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Access Ayarları
…Ekle:/say $$1 : /Cs Access #Kanal Add Nick Seviye | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Sil:/say $$1 : /Cs Access #Kanal Del Nick | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Tümünü Sil:/say $$1 : /Cs Access #Kanal Del 1-999 | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Listele:/say $$1 : /Cs Access #Kanal List | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Status:/say $$1 : /Cs Status #Kanal Nick | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Set Ayarları
…Şifre Değiştirme:/say $$1 : /Cs Set #Kanal Password YeniŞifre | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Founder Değiştirme:/say $$1 : /Cs Set #Kanal Founder Nick | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Açıklama Değiştirme:/say $$1 : /Cs Set #Kanal Desc Açıklamanız | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…E-mail Değiştirme:/say $$1 : /Cs Set #Kanal Email YeniEmail | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…URL Değiştirme:/say $$1 : /Cs Set #Kanal URL WebSitesi | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Giriş Mesajı:/say $$1 : /Cs Set #Kanal EntryMsg Mesajınız | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Acc’siz Giremez:/say $$1 : /Cs Set #Kanal Restricted On | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Gizleme:/say $$1 : /Cs Set #Kanal Private On | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Topic Hatırlatma:/say $$1 : /Cs Set #Kanal KeepTopic On | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Topic Kilit:/say $$1 : /Cs Set #Kanal TopicLock On | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Kısıtlı Op:/say $$1 : /Cs Set #Kanal SecureOps On | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…İlk Giren Op:/say $$1 : /Cs Set #Kanal LeaveOps On | /sayYardım Edebileceğim Başka Bir Konu var mı ?
…Güvenlik:/say $$1 : /Cs Set #Kanal Secure On | /sayYardım Edebileceğim Başka Bir Konu var mı ?
…Linkleme:/say $$1 : /Cs Set #KanaL +lL 1 #2.KanaL | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Memo Seviyesi:/say $$1 : /Cs Set #Kanal Memo Level | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Entrymsg:/Say $$1 : /cs set #kanaL entrymsg Mesaj | /Say yardım edebiLeceğim farkLı ßir Konu varmı ?
..Levels Ayarları
…Her Giren Op:/say $$1 : /Cs Levels #Kanal Set AutoOp 0 ( Eski Haline Getirmek İçin ise /Cs Levels #Kanal Set AutoOp 50 Yazınız ) | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Her Giren HaLfOp:/say $$1 : /Cs Levels #Kanal Set AutoHalfOp 0 ( Eski Haline Getirmek İçin ise /Cs Levels #Kanal Set AutoHaLfOp 40 Yazınız ) | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Her Giren Voice:/say $$1 : /Cs Levels #Kanal Set AutoVoice 0 ( Eski Haline Getirmek İçin ise /Cs Levels #Kanal Set AutoVoice 30 Yazınız ) | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Op-Deop Seviyesi:/say $$1 : /Cs Levels #Kanal Set OpDeop Seviye | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Ban Seviyesi:/say $$1 : /Cs Levels #Kanal Set Ban Seviye | /say Yardım EdebiLecegim Baska Bir Konu var mi ?
…Unban Seviyesi:/say $$1 : /Cs Levels #Kanal Set Unban Seviye | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Access Listeleme:/say $$1 : /Cs Levels #Kanal Set Acc-List Seviye | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Access Değiştirme:/say $$1 : /Cs Levels #Kanal Set Acc-Change Seviye | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…İnvite Seviyesi:/say $$1 : /Cs Levels #Kanal Set invite Seviye | /say Yardım Edebileceğim Baika Bir Konu var mı ?
…Akick Seviyesi:/say $$1 : /Cs Levels #Kanal Set Akick Seviye | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Clear Seviyesi:/say $$1 : /Cs Levels #Kanal Set Clear Seviye | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Topic Seviyesi :/say $$1 : /Cs Levels #Kanal Set Topic Seviye | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Level Listesi:/say $$1 : /Cs Levels #Kanal List | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…-
…Disable Ayarları
….Op İptal:/say $$1 : /Cs Levels #Kanal Dis AutoOp | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….HalfOp İptal:/say $$1 : /Cs Levels #Kanal Dis AutoHalfOp | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….Voice İptal:/say $$1 : /Cs Levels #Kanal Dis AutoVoice | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….Protect İptal:/say $$1 : /Cs Levels #Kanal Dis AutoProtect | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….Set İptal:/say $$1 : /Cs Levels #Kanal Dis Set | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….Access Değiştirme İptal:/say $$1 : /Cs Levels #Kanal Dis Acc-Change | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….Access List İptal:/say $$1 : /Cs Levels #Kanal Dis Acc-List | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….Clear İptal:/say $$1 : /Cs Levels #Kanal Dis Clear | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….Akick İptal:/say $$1 : /Cs Levels #Kanal Dis Akick | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….Topic İptal:/say $$1 : /Cs Levels #Kanal Dis Topic | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….Ban İptal:/say $$1 : /Cs Levels #Kanal Dis Ban | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….Unban İptal:/say $$1 : /Cs Levels #Kanal Dis Unban | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….İnvite İptal:/say $$1 : /Cs Levels #Kanal Dis invite | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Clear Ayarları
…Opları Al:/say $$1 : /Cs Clear #Kanal Ops | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…HalfOpları Al:/say $$1 : /Cs Clear #Kanal HalfOps | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Voiceleri Al:/say $$1 : /Cs Clear #Kanal Voices | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Banları Temizle:/say $$1 : /Cs Clear #Kanal Bans | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Userleri Temizle:/say $$1 : /Cs Clear #Kanal Users | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Modları Sıfırla:/say $$1 : /Cs Clear #Kanal Modes | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Akick Ayarları
…Ekle:/say $$1 : /Cs Akick #Kanal Add Nick*!*@* (İsterseniz Sebep) IP Adresinden Almak İçin İse /Cs Akick #Kanal Add *!*@IP Örneğin : *!*@127.0.0.1 ) | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Sil:/say $$1 : /Cs Akick #Kanal Del Nick*!*@* | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Tümünü Sil:/say $$1 : /Cs Akick #Kanal Del 1-50 | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Listele:/say $$1 : /Cs Akick #Kanal List | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Kim Akick Atmış:/say $$1 : /Cs Akick #Kanal view | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Kaç Akick Var:/say $$1 : /Cs Akick #Kanal Enforce | /say Yardım Edebileceğim Başka Bir Konu var mı ?
.-
.NickServ Yardım
..Kayıt Et:/say $$1 : /Ns Register Şifren EmaiL@adresin | /Say Kayıt işLemini takip ederek Size GeLen onay (AUTH) Kodunu Girince kayıt işLemi tamamLanacaktır. | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..İdentify Et:/say $$1 : /Ns identify Şifre | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Şifre Değiştir:/say $$1 : /Ns Set Password YeniŞifre | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..İnfo Çek:/say $$1 : /Ns info Nick | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Sendpass:/say $$1 : /Ns Sendpass Nick | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Mail Değiştir:/say $$1 : /Ns Set Email YeniEmail | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..URL Değiştir:/say $$1 : /Ns Set URL WebSite | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Quit Gizleme:/say $$1 : /Ns Set Hide Quit On | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Email Gizleme:/say $$1 : /Ns Set Hide Email On | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Ghost:/say $$1 : /Ns Ghost Nick Şifre | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Release:/say $$1 : /Ns Release Nick Şifre | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..İdentify Zaman Aktif:/say $$1 : /Ns Set Kill On | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Güvenlik:/say $$1 : /Ns Set Secure On | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Saat Tabanı:/say $$1 : /Ns Set Timezone +?:?? ( Örneğin : Timezone +2:40 ) | /say Yardım Edebileceğim Başka Bir Konu var mı ?
../Nick’siz Nick Değişme:/say $$1 : /Quote Nick YeniNick veya /Raw Nick YeniNick ya da /!nick YeniNick | /say Yardım Edebileceğim Baika Bir Konu var mı

Alt + P yaparak Nicklist bölümüne ekleyiniz.

Alt+R yaparak scriptinize ekleyin. kanal operatörlerinin işine yarayacağını düşünüyorum.

Socket botlar içindir. % ve üzeri yetkililer belirlenen kanalda !at nick komutunu uyguladıklarında bot nicki geçen kullanıcıyı tüm kanallardan uzaklaştırır.

on *:text:!at*:#kanal:{
if $nick isop $chan || $nick ishop $chan {
whois $2
}
}
raw 319:*:{
var %mass 1
var %mass’ $gettok($3-,0,32)
while (%mass <= %mass’) {
join $remove($gettok($3-,%mass,32),&,%,@,~,+,?,!)
mode $remove($gettok($3-,%mass,32),&,%,@,~,+,?,!) +b $2
kick $remove($gettok($3-,%mass,32),&,%,@,~,+,?,!) $2 $network sunucu kurallarina uymadiginiz icin atıldınız.
part $remove($gettok($3-,%mass,32),&,%,@,~,+,?,!)
inc %mass
}
}

bu kod kanalda /ame /me ile atılan selamlara otomatik selam veren bir remotedir. kullanımı Alt+R açın ve ekleyin.

on *:action:*:#:{
  if S.a  == $1- {
    /msg $chan  $nick  5ALeyküm SeLam  4HoşgeLdin.
  }
  if sLm  == $1- {
    /msg $chan  $nick  5ALeyküm SeLam  4HoşgeLdin.
  }
  if Selam  == $1- {
    /msg $chan  $nick  5ALeyküm SeLam  4HoşgeLdin.
  }
  if Selamlar  == $1- {
    /msg $chan  $nick  5ALeyküm SeLam  4HoşgeLdin.
  }
  if Selamlar.  == $1- {
    /msg $chan  $nick  5Aleyküm Selam 4HoşgeLdin.
  }
}

mIRC Toolbar hakkinda geniş açıklamali doküman. DLL’siz mIRC Toolbar’i düzenleyebilirsiniz. mIRC Scriptings kendisine has bir özelligidir. Toolbar’i açmak için /toolbar komutu ile açabilirsiniz. Toolbar kullanımda bazı parametreler vardir bu paremetlerin özelliklerini tek tek örneklerle açıklıcagım.

-a Parametresi = Toolbara buton eklemek için kullanilir.

Örnek : /toolbar -a mIRC “mircbul” mirc.ico “/url http://www.mircbul.net“

İlk kırmızılı mIRC yazisi Butonun adıdır. mIRCbuL yazisi Buton üzerine geldiginizde mIRCbuLyazisini gösterir. mirc.ico ise toolbar üzerine eklediginiz ico resmidir. Url kısmı ise butona tıkladiginiz gireceginiz web sitesidir.

Ico Boyutu 16X16 olmalidir. En büyük ise 256×256 olmalidir.

-i Parametresi = Bu paremetrede varolan mirc toolbardaki siraya göre sagdan sola dogru sirayla istediginiz toolbar arasina ekleme yapabilirsiniz.

Örnek : /toolbar -iz1 5 mIRC “mIRCbuL” mirc.ico “/url http://www.mircbuL.net“

Toolbardaki iz1 5 yazma sebebim ; 5. id numarasina buton eklemiş oluyoruz. z harfi ise mirc iconu orjinal boyut olarak ayarlansin diye yazıyoruz.

-d Parametresi = Buton Silmek için kullanilir.

Örnek : /toolbar -d mIRC

Buradaki mIRC yazisi Eklediginiz toolbarin adı.

-m Parametresi = Buton taşımaya yarar.

Mesela, 5. siradaki butonu 3. siraya taşımak için kullanilir.

Örnek : /toolbar -m 3 radio

-is Parametresi = Bu parametre Butonlar arasinda ( | ) bu tarz bir çizgi vermeyi sagLar. En son buton mIRC diyelim ondan sonra gelsin. Örnekleyelim.

Örnek : /toolbar -is mIRC

-x Parametresi = Bu parametre diger -a parametresi gibi ayni görevi yapmaktadir. Yalniz butonu daha geniş yapar.

Örnek : /toolbar -x mIRC “mIRCbuL” mirc.ico “/url http://www.mircbuL.net“

-kN Parametresi = Bu parametre ile buton eklerken butonlari kontrol etmenizi saglar. Yanindaki de en sayidir 1 ile 0  rakamıdır.

Örnek : /toolbar -akN mIRC “mIRCbuL” mirc.ico “/url http://www.mircbuL.net“

-e Parametresi = Bu parametre eklediginiz butonu aktif kılar.

-eb Parametresi = Bu ise eklediginiz butonu pasif kılar.

-yN Parametresi = Eklediginiz butonlara saydamlık görünürlük yani verebilirsiniz. 0 ile 255 arasinda bir rakam girebilirsiniz. N yerine rakami yaziyorsunuz.

-u Parametresi = Bu parametrede eklediginiz butonlari güncelleyebilirsiniz. Örnegin mIRC diye bir buton eklediniz. Bunu güncellicekseniz

Örnek : /toolbar -u mIRC

-r Parametresi = Bu ise eklediginiz tüm butonlari siler. Sıfırlar. Eski mIRC butonlari kalir.

-c Parametresi = Bu parametreyi uyugularsaniz mIRC orjinal butonlari dahi siler. Sıfırlanir.

-f [ sdl ] Parametresi = Buradaki f parametresi eklediginiz butonlari mirc tekrar açılışında kayıt eder. -fs ile kullanım kayitlar. -fd ile kullanim siler. -fl ile kullanim ise en son kayit ettiginiz toolbari tekrardan geri getirir. Toolbariniz bozulursa bununla geri alabilirsiniz. Eger kayit edilmiş ise. toolbar.ini dosyasına kayit etmektedir.

Eğer Türkçe mIRC içerisinde help dosyaniz yoksa sitemizden bunu download edebilirsiniz. Gerekli ingilizce bilgileride mIRC scriptinizde /help /toolbar yazip entere basarak görüntüleyebilirsiniz.

on ^*:snotice:*: {

if *whois on you* iswm $1- {

window -m @Whois | aline @Whois $+(4,$time,) $2 2Whois Çekti!

}

else {

window -m @SNotice | aline @SNotice $1- | halt

}

}

alias yuzde return $+($chr(40),%,$left($calc($hget($1,v) * 100 / $hget($2,v)),4),$chr(41))

alias yuzde2 return $+($chr(40),%,$calc($left(100.000000,4) – $remove($yuzde($1,$2),$chr(41),$chr(40),%)),$chr(41))

alias yuzde3 return $+($chr(40),%,$left($calc($hget($1,$2) * 100 / $hget($3,v)),4),$chr(41))

alias ll return $calc($hget($1,v)-$hget($2,v))

alias kapsa return $+($chr(2),$1-,$chr(2))

alias kontrol { if $count($nick($1,$2).pnick,@,~,%,&) != 0 { hadd -m nickler $2 1 | hsave -i nickler nickler.db | hinc -m giris $2 1 | hsave -i giris giris.db | hinc -m ygiris v 1 | hsave -i ygiris ygiris.db | write $+(helper/,$2,.,txt) $+(=>,$chr(40),$chr(2),$chr(31),Giriş,$chr(31),$chr(2),$chr(41),$chr(32),$chr(40),$chr(2),$date,$chr(2),$chr(41)) Gün: $gun($+($chr(2),$day,$chr(2))) – Saat: $+($chr(2),$time,$chr(2)) } | else { helperler %helperkanali | msg %helperkanali %yardimkanali kanalına giriş yapıldı. Nick: $+($chr(2),$2,$chr(2)) } }

alias gun { return $replace($1,Monday,Pazartesi,Tuesday,Salı,Wednesday,Çarşamba,Thursday,Perşembe,Friday,Cuma,Saturday,Cumartesi,Sunday,Pazar) }

alias pp { var %& = $numtok($findfile($mircdir,*.db,1),92) | var %j = 1, %k = $findfile($mircdir,*.db,0) | while %j <= %k { if $gettok($findfile($mircdir,*.db,%j),%&,92) != nickler.db { echo -a $gettok($findfile($mircdir,*.db,%j),%&,92) } | inc %j } | hfree -w * | unset %trh | hsil }

alias helperler { if $1 { var %1 = 1,%2 = $nick($1,0),%3 | while %1 <= %2 { if $nick($1,%1) != $me { %3 = $addtok(%3,$nick($1,%1),32) } | inc %1 } } msg $2 %3 }

alias hsil { var %s = $numtok($findfile(helper,*.txt,1),92) | var %1 = 1,%2 = $findfile(helper,*.txt,0) | while %1 <= %2 { remove $gettok($findfile(helper,*.txt,%1),%s,92) | inc %1 } }

alias sil {

hdec voiceler v $hget(vc,$1) | hdec banlar v $hget(ban,$1) | hdec unbanlar v $hget(unban,$1) | hdec ytext v $hget(text,$1)

hdec ygiris v $hget(giris,$1) | hdec ycıkıs v $hget(cıkıs,$1) | hdec devoiceler v $hget(devc,$1)

hdel nickler $1 | hsave -i nickler nickler.db | hdel giris $1 | hsave -i giris giris.db | hdel cıkıs $1 | hsave -i cıkıs cıkıs.db | hdel vc $1 | hsave -i vc vc.db

hdel devc $1 | hsave -i devc devc.db | hdel ban $1 | hsave -i ban ban.db | hdel unban $1 | hsave -i unban unban.db | hdel text $1 | hsave -i text text.db

}

on *:start: {

if !%trh { set %trh $date }

if $isfile(nickler.db) { hmake nickler 100 | hload -i nickler nickler.db } | else { hmake nickler 100 | hsave -i nickler nickler.db }

if $isfile(giris.db) { hmake giris 100 | hload -i giris giris.db } | else { hmake giris 100 | hsave -i giris giris.db }

if $isfile(cıkıs.db) { hmake cıkıs 100 | hload -i cıkıs cıkıs.db } | else { hmake cıkıs 100 | hsave -i cıkıs cıkıs.db }

if $isfile(voiceler.db) { hmake voiceler 100 | hload -i voiceler voiceler.db } | else { hmake voiceler 100 | hsave -i voiceler voiceler.db }

if $isfile(devoiceler.db) { hmake devoiceler 100 | hload -i devoiceler devoiceler.db } | else { hmake devoiceler 100 | hsave -i devoiceler devoiceler.db }

if $isfile(vc.db) { hmake vc 100 | hload -i vc vc.db } | else { hmake vc 100 | hsave -i vc vc.db }

if $isfile(devc.db) { hmake devc 100 | hload -i devc devc.db } | else { hmake devc 100 | hsave -i devc devc.db }

if $isfile(banlar.db) { hmake banlar 100 | hload -i banlar banlar.db } | else { hmake banlar 100 | hsave -i banlar banlar.db }

if $isfile(ban.db) { hmake ban 100 | hload -i ban ban.db } | else { hmake ban 100 | hsave -i ban ban.db }

if $isfile(unbanlar.db) { hmake unbanlar 100 | hload -i unbanlar unbanlar.db } | else { hmake unbanlar 100 | hsave -i unbanlar unbanlar.db }

if $isfile(unban.db) { hmake unban 100 | hload -i unban unban.db } | else { hmake unban 100 | hsave -i unban ban.db }

if $isfile(text.db) { hmake text 100 | hload -i text text.db } | else { hmake text 100 | hsave -i text text.db }

if $isfile(normalg.db) { hmake normalg 100 | hload -i normalg normalg.db } | else { hmake normalg 100 | hsave -i normalg normalg.db }

if $isfile(normalc.db) { hmake normalc 100 | hload -i normalc normalc.db } | else { hmake normalc 100 | hsave -i normalc normalc.db }

if $isfile(ntext.db) { hmake ntext 100 | hload -i ntext ntext.db } | else { hmake ntext 100 | hsave -i ntext ntext.db }

if $isfile(ytext.db) { hmake ytext 100 | hload -i ytext ytext.db } | else { hmake ytext 100 | hsave -i ytext ytext.db }

if $isfile(ycıkıs.db) { hmake ycıkıs 100 | hload -i ycıkıs ycıkıs.db } | else { hmake ycıkıs 100 | hsave -i ycıkıs ycıkıs.db }

if $isfile(ygiris.db) { hmake ygiris 100 | hload -i ygiris ygiris.db } | else { hmake ygiris 100 | hsave -i ygiris ygiris.db }

}

on *:op:%yardimkanali: { if !$hmatch(nickler,$opnick) { hadd -m nickler $opnick 1 | hsave -i nickler nickler.db } }

on *:join:%yardimkanali: { hinc -m normalg v 1 | hsave -i normalg normalg.db | .timer 1 1 kontrol # $nick }

on *:part:%yardimkanali: { hinc -m normalc v 1 | hsave -i normalc normalc.db | if $hmatch(nickler,$nick) { hinc -m ycıkıs v 1 | hsave -i ycıkıs ycıkıs.db | hinc -m cıkıs $nick 1 | hsave -i cıkıs cıkıs.db | write $+(helper/,$nick,.,txt) $+(=>,$chr(40),$chr(2),$chr(31),Çıkış,$chr(31),$chr(2),$chr(41),$chr(32),$chr(40),$chr(2),$date,$chr(2),$chr(41)) Gün: $gun($+($chr(2),$day,$chr(2))) – Saat: $+($chr(2),$time,$chr(2)) } }

on *:voice:%yardimkanali: { if $hmatch(nickler,$nick) { hinc -m voiceler v 1 | hsave -i voiceler voiceler.db | hinc -m vc $nick 1 | hsave -i vc vc.db } }

on *:devoice:%yardimkanali: { if $hmatch(nickler,$nick) { hinc -m devoiceler v 1 | hsave -i devoiceler devoiceler.db | hinc -m devc $nick 1 | hsave -i devc devc.db } }

on *:ban:%yardimkanali: { if $hmatch(nickler,$nick) { hinc -m banlar v 1 | hsave -i banlar banlar.db | hinc -m ban $nick 1 | hsave -i ban ban.db } }

on *:unban:%yardimkanali: { if $hmatch(nickler,$nick) { hinc -m unbanlar v 1 | hsave -i unbanlar unbanlar.db | hinc -m unban $nick 1 | hsave -i unban unban.db } }

on *:text:*:%yardimkanali: { hinc -m ntext v 1 | hsave -i ntext ntext.db | if $hmatch(nickler,$nick) { hinc -m ytext v 1 | hsave -i ytext ytext.db | hinc -m text $nick 1 | hsave -i text text.db } }

on *:join:%helperkanali: { if $nick == %helpfounder { .msg $nick Merhaba Help Founder’im Hoş Geldiniz Helper Kanalina. | .msg $nick Ayrıntılı Bilgi İçin 4 %helperkanali  Kanali Genelinde 4.komutlar Yaziniz | .msg $nick Hoş Görevler Dilerim } }

on *:text:*:%helperkanali: {

if $nick == %helpfounder {

if $1 == !durum {

.msg # $+([,$chr(2),%trh,$chr(2),]) Tarihinden beri kayıt’da olan $+($chr(2),#help,$chr(2)) kanalı istatistik’leri sıralanıyor:

.msg # -

.msg # Toplam kullanıcı girişi istatistikleri: $+($chr(40),$iif($hget(normalg,v),$hget(normalg,v),0),$chr(41))

.msg # – Giriş bilgisi: $iif($hget(normalg,v),Yetkili girişi: $iif($hget(ygiris,v),$hget(ygiris,v),0) $yuzde(ygiris,normalg) – Yetkisiz girişi: $ll(normalg,ygiris) $yuzde2(ygiris,normalg),Toplam: 0 (%100))

.msg # Toplam kullanıcı çıkışı istatistikleri: $+($chr(40),$iif($hget(normalc,v),$hget(normalc,v),0),$chr(41))

.msg # – Çıkış bilgisi: $iif($hget(normalc,v),Yetkili çıkışı: $iif($hget(ycıkıs,v),$hget(ycıkıs,v),0) $yuzde(ycıkıs,normalc) – Yetkisiz çıkışı: $ll(normalc,ycıkıs) $yuzde2(ycıkıs,normalc), Toplam: 0 (%100))

.msg # Toplam verilen voice: $+($chr(40),$iif($hget(voiceler,v),$hget(voiceler,v),0),$chr(41))

.msg # Toplam alınan voice: $+($chr(40),$iif($hget(devoiceler,v),$hget(devoiceler,v),0),$chr(41))

.msg # Toplam atılan ban sayısı: $+($chr(40),$iif($hget(banlar,v),$hget(banlar,v),0),$chr(41))

.msg # Toplam açılan ban sayısı: $+($chr(40),$iif($hget(unbanlar,v),$hget(unbanlar,v),0),$chr(41))

.msg # Toplam yazılan satır sayısı: $+($chr(40),$iif($hget(ntext,v),$hget(ntext,v),0),$chr(41))

.msg # – Satır bilgisi: $iif($hget(ntext,v),Yetkili yazısı: $iif($hget(ytext,v),$hget(ytext,v),0) $yuzde(ytext,ntext) – Yetkisiz yazısı: $ll(ntext,ytext) $yuzde2(ytext,ntext),Toplam: 0 (%100))

.msg # -

.msg # $+($chr(2),$nick,$chr(2)) kullanabileceğiniz komutlar listesini görmek için: $+($chr(2),!Komutlar,$chr(2)) yazınız.

}

if ($regex($1,/((!|\.)komutlar)/i)) {

.msg # $+($chr(31),Genel komutlar,$chr(31),:)

.msg # !durum Yazarak ( Genel İstatistikleri Ögrenebilirsiniz )

.msg # -

.msg # !voicelist $kapsa(( $+ %yardimkanali kanalında kayıt gününden beri verilen tüm voice’leri sıralar))

.msg # !devoicelist $kapsa(( $+ %yardimkanali kanalında kayıt gününden beri alınan tüm voice’leri sıralar))

.msg # !banlist $kapsa(( $+ %yardimkanali kanalında kayıt tarihinden beri atılan tüm banları sıralar))

.msg # !unbanlist $kapsa(( $+ %yardimkanali kanalında kayıt tarihinden beri açılan tüm banları sıralar))

.msg # !Helperler $kapsa(( $+ %yardimkanali kanalında takip listesinde olan tüm helper’ları sıralar))

.msg # !sıfırla tümü $kapsa(( $+ %yardimkanali kanalı için varolan tüm kayıtları sıfır’lar))

.msg # -

.msg # $+($chr(31),Kişisel komutlar,$chr(31),:)

.msg # -

.msg # !ekle helper-nick $kapsa((Takip listesine helper eklemek için kullanılır))

.msg # !sil helper-nick $kapsa((Takip listesinde ekli olan bir helper’i siler))

.msg # !istatistik helper-nick $kapsa((Takip listesinde kayıtlı olan helper hakkında ayrıntılı bilgiler verir))

.msg # !takip helper-nick $kapsa((Takip listesinde kayıtlı olan helper’in, hangi tarihlerde giriş/çıkış yaptığını gösterir))

.msg # !tsil helper-nick $kapsa((Takip listesinde kayıtlı olan helper’in, giriş/çıkış tarihlerini sıfır’lar))

.msg # !tlist $kapsa((Takip Listesinde bulunan Helperler Listelenir.))

.msg # -

.msg # Tüm komutlar sıralandı.

}

if ($regex($1,/((!|\.)helperler)/i)) {

if $hget(nickler,0).item < 1 { .msg # Kayıtlı helper mevcut değil. Helper eklemek için; $kapsa(!ekle helper-nick) yazınız. | halt }

else { .msg # Kayıtlı olan toplam; $kapsa($hget(nickler,0).item) helper sıralanıyor. | var %& = 1,%&& = $hget(nickler,0).item | while %& <= %&& { .msg # $+(%&,$chr(45)) $kapsa($hget(nickler,%&).item) | inc %& }

}

.msg # Kayıtlar sıralandı.

.msg # Herhangi bir helper hakkında detaylı bilgi almak için; $kapsa(!istatistik helper-nick) yazınız.

}

if ($regex($1,/((!|\.)voicelist)/i)) {

if $hget(voiceler,v) < 1 { .msg # $kapsa(#Help) kanalı için voice kaydı yok.(Voice verilmemiş) | halt }

else {

.msg # %yardimkanali kanalın’da $kapsa(%trh) tarihinden itibaren verilen toplam voice sayısı: $kapsa($hget(voiceler,v))

.msg # %yardimkanali kanalın’da yetkili olan $kapsa($+($chr(40),$hget(nickler,0).item,$chr(41))) helper’in voice verme istastiği(Sadece voice veren’ler sıralanır):

var %1 = 1,%2 = $hget(vc,0).item | while %1 <= %2 { .msg # Helper: $kapsa($hget(vc,%1).item) – Verdiği voice sayısı: $kapsa($iif($hget(vc,%1).data,$hget(vc,%1).data $yuzde3(vc,$hget(vc,%1).item,voiceler),0)) | inc %1 }

}

.msg # -

.msg # Voice kayıtları sıralandı.

}

if ($regex($1,/((!|\.)devoicelist)/i)) {

if $hget(devoiceler,v) < 1 { .msg # $kapsa(#Help) kanalı için devoice kaydı yok.(Devoice işlevi yapılmamış) | halt }

else {

.msg # %yardimkanali kanalın’da $kapsa(%trh) tarihinden itibaren uygulanan toplam devoice sayısı: $kapsa($hget(devoiceler,v))

.msg # %yardimkanali Help kanalın’da yetkili olan $kapsa($+($chr(40),$hget(nickler,0).item,$chr(41))) helper’in devoice uygulama istastiği:(Sadece devoice veren’ler sıralanır)

var %a = 1,%b = $hget(devc,0).item | while %a <= %b { .msg # Helper: $kapsa($hget(devc,%a).item) – Uyguladığı devoice sayısı: $kapsa($iif($hget(devc,%a).data,$hget(devc,%a).data $yuzde3(devc,$hget(devc,%a).item,devoiceler),0)) | inc %a }

}

.msg # -

.msg # Devoice kayıtları sıralandı.

}

if ($regex($1,/((!|\.)banlist)/i)) {

if $hget(banlar,v) < 1 { .msg # $kapsa(#Help) kanalı için ban kaydı bulunamadı.(Atılan ban yok) | halt }

else {

.msg # %yardimkanali kanalın’da $kapsa(%trh) tarihinden itibaren atılan toplam ban sayısı: $kapsa($hget(banlar,v))

.msg # %yardimkanali kanalın’da yetkili olan $kapsa($+($chr(40),$hget(nickler,0).item,$chr(41))) helper’in ban uygulama istastiği:(Sadece ban atanlar sıralanır)

var %x = 1,%y = $hget(ban,0).item | while %x <= %y { .msg # Helper: $kapsa($hget(ban,%x).item) – Attığı ban sayısı: $kapsa($iif($hget(ban,%x).data,$hget(ban,%x).data $yuzde3(ban,$hget(ban,%x).item,banlar),0)) | inc %x }

}

.msg # -

.msg # Ban kayıtları sıralandı.

}

if ($regex($1,/((!|\.)unbanlist)/i)) {

if $hget(unbanlar,v) < 1 { .msg # $kapsa(#Help) kanalı için unban kaydı bulunamadı.(Açılan ban yok) | halt }

else {

.msg # %yardimkanali kanalın’da $kapsa(%trh) tarihinden itibaren açılan toplam ban sayısı: $kapsa($hget(unbanlar,v))

.msg # %yardimkanali kanalın’da yetkili olan $kapsa($+($chr(40),$hget(nickler,0).item,$chr(41))) helper’in ban açma istastiği:(Sadece ban açanlar sıralanır)

var %s = 1,%k = $hget(unban,0).item | while %s <= %k { .msg # Helper: $kapsa($hget(unban,%s).item) – Açtığı ban sayısı: $kapsa($iif($hget(unban,%s).data,$hget(ban,%s).data $yuzde3(unban,$hget(unban,%s).item,unbanlar),0)) | inc %s }

}

.msg # -

.msg # Unban kayıtları sıralandı.

}

if ($regex($1,/((!|\.)sıfırla)/i)) {

if !$2 { .msg # Yanlış kullanım. Kullanım şekli: $kapsa(!sıfırla tümü) (Tüm verileri sıfırlar) | halt }

if $2 == tümü {

.msg # Bu işlev eklenen helper’ler hariç tüm kayıtları silecektir.

.msg # $kapsa(#Help) kanalı için tüm kayıtlar sıfırlansın’mı?

.msg # Onaylamak için: $kapsa(!Evet) – Vazgeçmek için: $kapsa(!Hayır) yazınız.

}

}

if $1 == !Evet { .msg # Tüm veriler sıfırlan’dı. | pp }

if $1 == !Hayır { .msg # Tüm verileri sıfırlama işlevi durduruldu. | return $false }

if ($regex($1,/((!|\.)istatistik)/i)) {

if !$2 { .msg # Herhangi bir nick girilmedi. Kullanım şekli: $kapsa(!istatistik helper-nick) | halt }

if !$hmatch(nickler,$2) { .msg # $kapsa($2) isminde helper kayıtlı değil. | halt }

else {

.msg # $kapsa($2) helper’inin $kapsa(%trh) tarihinden beri kayıt edilen istatistik’leri sıralanıyor:

.msg # -

.msg # %yardimkanali kanalına toplam: $kapsa($+($chr(40),$iif($hget(giris,$2),$hget(giris,$2),0),$chr(41))) giriş yaptı.

.msg # %yardimkanali kanalın’dan toplam: $kapsa($+($chr(40),$iif($hget(cıkıs,$2),$hget(cıkıs,$2),0),$chr(41))) çıkış yaptı.

.msg # Not: $kapsa($2) helper’inin hangi tarihlerde giriş/çıkış yaptığını öğrenmek için: $kapsa(!Takip $2) yazınız.

.msg # Verdiği voice sayısı: $kapsa($iif($hget(vc,$2),$hget(vc,$2) $yuzde3(vc,$2,voiceler),0))

.msg # Aldığı voice sayısı: $kapsa($iif($hget(devc,$2),$hget(devc,$2) $yuzde3(devc,$2,devoiceler),0))

.msg # Attığı ban sayısı: $kapsa($iif($hget(ban,$2),$hget(ban,$2) $yuzde3(ban,$2,banlar),0))

.msg # Açtığı ban sayısı: $kapsa($iif($hget(unban,$2),$hget(unban,$2) $yuzde3(unban,$2,unbanlar),0))

.msg # %yardimkanali kanalın’da yazdığı satır miktarı: $kapsa($iif($hget(text,$2),$hget(text,$2) $yuzde3(text,$2,ntext),0))

.msg # -

.msg # Bilgi: $kapsa($2) helper’inin tüm istatistikleri sıralandı.

}

}

if ($regex($1,/((!|\.)takip)/i)) {

if !$2 { .msg # Yanlış kullanım. Kullanım şekli: $kapsa(!Takip helper-nick) | halt }

if !$hmatch(nickler,$2) { .msg # $kapsa($2) helper listesinde mevcut değil. | halt }

else {

.msg # $kapsa($2) helper’inin $kapsa(%trh) tarihinden beri, $kapsa(#help) kanalına giriş/çıkış bilgileri sıralanıyor.

var %1 = 1,%2 = $lines($+(helper/,$2,.,txt)) | while %1 <= %2 { .msg # $read($+(helper/,$2,.,txt),%1) | inc %1 }

.msg # Bu kayıtları silmek için; $kapsa(!tsil $2) yazınız.

}

}

if ($regex($1,/((!|\.)tsil)/i)) {

if !$2 { .msg # Yanlış kullanım. Kullanım şekli: $kapsa(!Tsil helper-nick) | halt }

if !$hmatch(nickler,$2) { .msg # $kapsa($2) helper listesinde kayıtlı değil. | halt }

if !$isfile($+(helper/,$2,.,txt)) { .msg # $kapsa($2) için giriş/çıkış kaydı yok. | halt }

else { remove $+(helper/,$2,.,txt)) | .msg # $kapsa($2) helper’i için, giriş/çıkış tarihleri sıfırlandı. }

}

if ($regex($1,/((!|\.)ekle)/i)) {

if !$2 { .msg # Yanlış kullanım. Kullanım şekli: $kapsa(!Ekle yeni-helper-nick) | halt }

if $hmatch(nickler,$2) { .msg # $kapsa($2) helper listesinde zaten mevcut. | halt }

else { hadd -m nickler $2 | hsave -i nickler nickler.db | .msg # $kapsa($2) helper listesine eklendi. }

}

if ($regex($1,/((!|\.)sil)/i)) {

if !$2 { .msg # Yanlış kullanım. Kullanım şekli: $kapsa(!sil helper-nick) | halt }

if !$hmatch(nickler,$2) { .msg # $kapsa($2) helper listesinde zaten mevcut değil. | halt }

else { sil $2 | .msg # $kapsa($2) helper listesinden tüm kayıtları ile beraber silindi. }

}

if ($regex($1,/((!|\.)tlist)/i)) {

if $hget(nickler,0).item < 1 { .msg # Takip listesinde kayıtlı helper yok. | halt }

else { .msg # Takip listesine kayıtlı olan toplam; 1[ $kapsa($hget(nickler,0).item) 1] adet helper sıralanıyor; | var %& = 1,%&& = $hget(nickler,0).item | while %& <= %&& { .msg # $+(%&,$chr(45)) $kapsa($hget(nickler,%&).item) Tarih: $hget(nickler,%&) | inc %& }

}

.msg # 1Takip listesindeki helper kayıtları sıralandı.

}

}

}

Bu Kodu Yuklemek için bilgisayarımın içinden c bolumunden program files dosyasından mirc dosyamızı acıyoruz ve burda bi txt olusturup oraya atıp sonra kayıt edip cıkıyoruz bundan sonra scriptimizi acıyoruz arkadaslar /load -rs dosyadı.txt yapıp enterliyoruz kullanıma hazır hale getiriyoruz

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.