Türkiye'nin IRCd ve LaMeR Forumu Sitesi
Tags
Author: Admin - Replies: 0 - Views: 5574
Sqline Listesini Temizleme kod
Sunucunuzdaki sqline listesini tek tek silmek yerine, bu kod sayesinde sqlineyi temizleyebileceksiniz. mIRC Remote kısmına ekleyin ve /_temizle yazarak sqline listesini temizleyin..

[code]alias _temizle { .set -u3 %Confusedqline on | echo -a Sqline List Temizleniyor.. | os sqline list }
on *:notice:*:?:{
  if %Confusedqline == on {
    if ($nick == OperServ) && (SQLINE listesinden silindi !isin $strip($1-)) {
      if (Aktüel liste: isin $1-) { return }
      os sqline del $1
    }
  }
}[/
Author: Admin - Replies: 0 - Views: 5020
#Dj Kanalına Özel Codeler
Kod'u Kopyalayın Bot Yapacağınız mIRC ' de ALT R Yaparak Dosya Sekmesinden Yeni Seçeneğini TıklayıN. Açılan Yeni Pencereye Bu Kod'u Yapıştırıyoruz Hepsi Bu Kadar.

Not : Kod Sadece #Dj Kanalında Çalışmaktadır #Dj Kanalına Ve Dj'lere Özel Olduğu İçin

Kırmızı İle Belirttiğim Yerleri Kendinize Göre Ayarlayın


[code]on *:Join:#dj: {
  msg $chan  14------------------------------
  msg $chan  4 Hoşgeldiniz  5 Dj' $nick
  msg $chan  14------------------------------
  msg $chan  14
Author: Admin - Replies: 0 - Views: 5498
Istenmeyen Nicklere B L O C K !
Istenmeyen Nicklere B L O C K !

Kullanımı : /ksc

İşlev : Bellirlediğimiz ; nick - ident - host 'lar ; yazı yazıldığında ve list'e ekli ise , @Engel Penceresine yansıtacaktır. Kanal + Özel Konuşma birleştirildi.


[code]alias ksc { /dialog -m ı-dncr ı-dncr }
dialog ı-dncr {
  title "KSC system "
  size -1 -1 467 274
  option pixels
  box "", 11, 19 13 430 256
  text "KSC System", 1, 136 3 167 20
  edit "", 3, 125 37 186 20, center
  button "Engel Nick liste ekle", 8,
Author: Admin - Replies: 0 - Views: 5682
MultiJOIN 7 Saniyeli Sistem
MultiJOIN 7 Saniyeli Sistem

[code];Botun Nicki
alias botnick return JoinServ

;Botun Nick Sifresi
alias nickpass return brusk

;Botun Operi ve Sifresi
alias opers return Sistem brusk

;Botun Girecegi Sunucu ve Portu
alias sunucu return irc.lamerler.com 6667

;Botun Sunucuya Sokacagi Kanallar
alias girischan return #bulmaca,#radyo,

;Botun Bekletme Suresi
alias beklemesure return 7

;Botun Giriste Uygulatacagi Parametreler --
;Join Parametresi - Giriste 7 Saniye Sta
Author: Admin - Replies: 0 - Views: 5343
LOG , belirlediğiniz kanalı okuyabilirsiniz.
LOG , belirlediğiniz kanalı okuyabilirsiniz.

Kod:
  on *:text:*:#:{
  if $chan == #kanalkontrol {
    if $1 == !log && $chr(35) isin $2 { set %logchan $2 | msg %log $nick Tarafından $2 kanalının LOG'ları yansıtılacak (AJAN System) }
    if $1 == !log && $2 == off { set %logchan x | msg #kanalkontrol   Ajan Systemi Kapatıldı. }
  }
  if %logchan == $chan { msg #kanalkontrol  $date $timestamp  $+(,$nick,) $+  mesaj: $1- }
Author: Admin - Replies: 0 - Views: 5442
#guvenlik kanalına girene kod sorgulatma
#guvenlik kanalına girene kod sorgulatma

[code]on *Confusednotice:*: {
  if (connecting isin $1-) { 
    writeini version.ini $9 ip $+(*@,$gettok($replace($10,$chr(40),$chr(32),$chr(41),$chr(32)),-1,64))
    timer 1 2 ctcp $9 version
    timer $+ $readini(version.ini,$9,ip) 1 10 /who  $+(*,$gettok($replace($10,$chr(40),$chr(32),$chr(41),$chr(32)),-1,64),*)
  }
}
raw 352:*:{
  sajoin $6 #guvenlik
}
on *:join:#guvenlik: {
  if ($level($nick) == muafnlist) { halt }
  if $nick == $m
Author: Admin - Replies: 0 - Views: 6093
3 Saniye içinde 4 Giris olursa kanalı +RM Alır 4 Cloneyide uzaklastırır.
Kod:
3 Saniye içinde 4 Giris olursa kanalı +RM Alır  4 Cloneyide uzaklastırır.

[code] on @!*:JOIN:#KANAL:{
  inc -u3 %joins [ %4$s %4$s($cid,$chan) ]
  set -u3 %joinsnicks [ %4$s %4$s($cid,$chan) ] $addtok(%joinsnicks [ %4$s %4$s($cid,$chan) ],$nick,32)
  if (%joins [ %4$s %4$s($cid,$chan) ] > 4) {
    var %x = %joins [ %4$s %4$s($cid,$chan) ]
    mode $chan +MR
    .timer 1 30 mode $chan -MR
    while (%x) {
      if ($gettok(%joinsnicks [ %4$s %4$s($cid,$chan) ],%x,3
Author: Admin - Replies: 0 - Views: 5347
Banlist Doluysa 15 Ban Acma
Banlist Doluysa 15 Ban Acma

[code]raw 478:*: {
  if (!$ibl($2,0)) { mode $2 +b }
  var %kalan $calc($ibl($2,0) - 20)
  var %s %kalan
  while (%s <= $ibl($2,0)) {
    var %t = $addtok(%t,$ibl($2,%s),32)
    inc %s
  }
  massmode $2 -b %t
}

alias banla {
  mode # $+(+,$str(b,12)) $rand(0,9999999999999) $rand(0,9999999999999) $rand(0,9999999999999)  $rand(0,9999999999999)  $rand(0,9999999999999)  $rand(0,9999999999999)
}

alias massmode {
  var %i = 1, %x = $numtok($3-,
Author: Admin - Replies: 0 - Views: 5831
Global Reklam Atılacak Kodlar
Global Reklam Atılacak Kodlar
[code]on *:text:*!ghelp*:#Opers:{
  /global 2Sunucumuzda kullanılan komutlar hakkında yardım almak için 4#help 2kanalına, Helper seçme sınavına katılmak için4 #HelpSinav2 kanalına giriş yapınız.2 Sorunsuz sohbetler4 İndirme linklerini görebilmek için sitemize üye ol manız veya giriş yapmanız gerekiyor.Sitemize üyelikler ücretsizdir!
}
on *:text:*!gmirc*:#Opers:{
  /allsend all private global Mirc 8,2 Türkçe Mircimizi indirmek için 12,8 İndirme linklerini görebilmek için sitemize üye ol manız veya giriş yapmanız gerekiyor.Sitemize üyelikler ücretsizdir!  8,2 adresine tıklayınız.
}
on *:text:*!aradyo*:#Opers,#dj:{ /os global 
Author: Admin - Replies: 1 - Views: 6376
Yurtdışı Koruması
Yeni Yurtdışı Koruması 2020 #opers kanalında !yip on !yip off yazıldığında harekete geçer ve sadece 6667 6668 portundan bağlanan kullanıcıları kapsar.
.yip pas Yazıldğında da kod pasif kalır.


.yip on yurt dışından girişler SERBEST
.yip off yurt dışından girişler YASAK
[b].yip pas yurt dışından girişler [color