IRCoplar için .bankontrol ve .banac Kodu.

Reklam Alani.

web sitene
sohbet ekle

mirc yükle

java yükle

favorilerime ekle

IRCoplar için .bankontrol ve .banac Kodu.

60 views kere okundu.

Admin ve İrcoplar için Kullanışlı Bir Kod.

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
}