IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

- mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)

- - IRCoplar için .bankontrol ve .banac (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/373383-ircoplar-icin-bankontrol-ve-banac.html)

IRCoplar için .bankontrol ve .banac

PHP- Kodu:

   on *:text:.bankontrol *:#Opers:{
  if $verify_ip($2) {
    .set -u15 %bankontrolip $chr(42) $+ @ $+ $2
    .enable #bankontrol
    .stats g
  }
  if !$verify_ip($2) {
    msg #Opers IP adresini uygun girmediniz.(Örnek: .bankontrol 212.101.125.2 )
  }
}
on *:text:.banac *:#Opers :{
  if $verify_ip($2) {
    /rmtkl * *@ $+ $2
    msg #Opers $2 üzerindeki tüm banlar açıldı.
  }
  if !$verify_ip($2) {
    msg #Opers IP adresini uygun girmediniz. (Örnek: .banac 212.101.125.2 )
  }
}
on *:input:*:{
  if *.bankontrol* iswm $1 {
    if $verify_ip($2) {
      .set -u15 %bankontrolip $chr(42) $+ @ $+ $2
      .enable #bankontrol
      .stats g
    }
    if !$verify_ip($2) {
      msg #Opers IP adresini uygun girmediniz.(Örnek: .bankontrol 212.101.125.2 )
    }
  }
  if *.banac* iswm $1 {
    if $verify_ip($2) {
      /rmtkl * *@ $+ $2
      msg #Opers $2 üzerindeki tüm banlar açıldı.
    }
    if !$verify_ip($2) {
      msg #Opers IP adresini uygun girmediniz. (Örnek: .banac 212.101.125.2 )
    }
  }
}
#bankontrol off
raw 223:* {
  if %bankontrolip == $3 {
    .set -u15 %banokey 1
    msg #Opers %bankontrolip >>> $6-
  }
}
raw 219:* {
  if !%banokey {
    msg #Opers %bankontrolip >>> Bu IP'de ban bulunmuyor.
  }
  .unset %banokey
  .unset %bankontrolip
  .disable #bankontrol
}
#bankontrol end
alias verify_ip {
  if ($regex(vfip, $1, /(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})/)) {
    var %i = 1
    while (%i <= 4) {
      if ($regml(vfip, %i) < 0 || $regml(vfip, %i) > 255) {
        return $false
      }
      inc %i
    }
    return $true
  }
  return $false
}

Kullanımı :

#Opers kanalında .bankontrol IP
.banac IP

Dilerseniz Hem kenıdınız yada socket botunuzda Kullanabilirsiniz.. 2 şekilde ayarlıdır.

iyi Çalışmalar..

Cevap: IRCoplar için .bankontrol ve .banac

* Tanımlama Yok: $verify_ip
-

böyle bir uyari aldim.

Cevap: IRCoplar için .bankontrol ve .banac

Alıntı:

FirardayizNet Nickli Üyeden Alıntı (Mesaj 1040628525)

* Tanımlama Yok: $verify_ip
-

böyle bir uyari aldim.

Şimdi tekrar denedim Kodda Hıcbır sorun yok. .bankontrol Ip yazdıgınızda mırcınızı cıkan yazıyı bana kopyalayabilirmisiniz.

Cevap: IRCoplar için .bankontrol ve .banac

04Boreas IP adresini uygun girmediniz.(Örnek: .bankontrol 212.101.125.2 )
04Boreas .bankontrol 88.231.64.54
04Boreas IP adresini uygun girmediniz.(Örnek: .bankontrol 212.101.125.2 )
04Boreas .bankontrol 46.106.152.32
04Boreas IP adresini uygun girmediniz. (Örnek: .banac 212.101.125.2 )
04Boreas .banac 46.106.152.32

Bu Şekilde Uyarı Veriyor, Herhangi Bir İşlem Yapmıyor

Cevap: IRCoplar için .bankontrol ve .banac

Evet kod çalışmıyor. Bende denedim. IP adresini uygun girmediniz.(Örnek: .bankontrol 212.101.125.2 ) Uyarısı veriyor devamlı. Bu konuda çalışan bir kod bulamadım. Elinde çalışan xline açma konu olan varsa paylaşırsa sevinirim. Teşekkürler.

Cevap: IRCoplar için .bankontrol ve .banac

Kod:

on *:text:*:#Kontrol:{

if !banac isin $1 { 

set %'.ip $2 | set %'.kanal $chan | .stats k 

.unzline $2

.unkline $2

.os akill del *@ $+ $2

.msg #kontrol  $2  üzerindeki tüm engellemeler kaldırıldı.

} 

}

raw 216:*: { 

if (%'.ip == $3) && ($2 === A) { haltdef | set %akillident $+($4,@,$3) | unakill $+($4,@,$3) | unset %'.* 

} 

}

Kod:

on *:text:*:#kontrol: {

if ($1 == !lines) {

.enable #statsli

.stats k

.msg $chan Stats K Listesi Listeleniyor

}

}

#statsli on

raw 216:*:{ msg #kontrol $2- }

raw 219:*:{ disable #statsli | msg #kontrol Liste Sunumu Tamamlandı | halt }

#statsli end

Kod:

[20:35] <@DaDaS> !lines

[20:35] <@T®ßøt> Stats K Listesi Listeleniyor

[20:35] <@T®ßøt> A IRc.Laflariz.Com * Küfür Ettiniz, Sizi Banliyorum. 0 -1

[20:35] <@T®ßøt> A 31* * perm 0 -1

[20:35] <@T®ßøt> A 130* * perm 0 -1

[20:35] <@T®ßøt> A 74* * perm 0 -1

[20:35] <@T®ßøt> A 71* * perm 0 -1

[20:35] <@T®ßøt> A 160* * perm 0 -1

[20:35] <@T®ßøt> A 108* * perm 0 -1

[20:35] <@T®ßøt> A 170* * perm 0 -1

[20:35] <@T®ßøt> A 99* * perm 0 -1

[20:35] <@T®ßøt> A 89* * perm 0 -1

[20:35] <@T®ßøt> A 213* * perm 0 -1

[20:35] <@T®ßøt> A 217* * perm 0 -1

[20:35] <@T®ßøt> A 75* * perm 0 -1

[20:35] <@T®ßøt> A 72* * perm 0 -1

[20:35] <@T®ßøt> A 24* * perm 0 -1

[20:35] <@T®ßøt> A 98* * perm 0 -1

[20:35] <@T®ßøt> A 86* * perm 0 -1

[20:35] <@T®ßøt> A 67* * perm 0 -1

[20:35] <@T®ßøt> A 173* * perm 0 -1

[20:35] <@T®ßøt> A 216* * perm 0 -1

[20:35] <@T®ßøt> A 184* * perm 0 -1

[20:35] <@T®ßøt> A 80* * perm 0 -1

[20:35] <@T®ßøt> A 62* * perm 0 -1

[20:35] <@T®ßøt> A 109* * perm 0 -1

[20:35] <@T®ßøt> z 78.164.245.238 78.164.245.238 * 9 -1

[20:35] <@T®ßøt> Liste Sunumu Tamamlandı

Kod:

[20:36] [S] Notice --- Temporary Z-line removed by T®ßøt!laflariz@88.252.72.2K12= for 109.0.0.0

-

[20:36] [S] T®ßøt!laflariz@88.252.72.2K12= removed an AKILL for [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]*

-

[20:36] <@DaDaS> !banac 109*

[20:36] <@T®ßøt>  109*  üzerindeki tüm engellemeler kaldırıldı.

Cevap: IRCoplar için .bankontrol ve .banac

alias verify_ip {
if ($regex(vfip, $1, /(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})/)) {
var %i = 1
while (%i <= 4) {
if ($regml(vfip, %i) < 0 || $regml(vfip, %i) > 255) {
return $false
}
inc %i
}
return $true
}
return $false
}

#BUYRUN#