on $*:text:/[!.]opver/i:#Op: {
  ;Kanalları belirtelim aralarında virgül(,) koyarak.
  var %chanlar #sohbet,#radyo
  ;Hash tabloya nick ve host kayit ediliyor.
  hadd -m opver $address($nick,2) $nick
  ;Belirtigin kanallarda opa cıkartıyor.
  msg # $nick Globalop oldunuz.
  tokenize 44 %chanlar
  mode $* +o $nick
}
on *:part:#op: {
  ;Kanalları belirtelim aralarında virgül(,) koyarak.
  var %chanlar #sohbet,#radyo
  ;Cıkan host kayitli ise opver tablosuna islem yapalim.
  if $hget(opver,$address($nick,2)) {
    msg # $qt($nick) Nick'i Oplistesine $qt($v1) seklinde kayit olmus, Op kanalından cıkıs yapmistir.
    hdel -m opver $address($nick,2)
    tokenize 44 %chanlar
    mode $* -o $nick
  }
}
on *:quit: {
  ;Cıkan host kayitli ise opver tablosuna islem yapalim.
  if $hget(opver,$address($nick,2)) {
    hdel -m opver $address($nick,2)
  }
}

 
on $*:text:/[!.]opver/i:#Op: {
  var %chanlar #sohbet,#radyo
  hadd -m opver $nick op
  msg # $nick Globalop oldunuz.
  tokenize 44 %chanlar
  mode $* +o $nick
}
on *:nick: {
  if $hget(opver,$nick) {
    hdel -m opver $nick
    hadd -m opver $newnick
  }
}
on *:part:#op: {
  var %chanlar #sohbet,#radyo
  if $hget(opver,$nick) {
    msg # $qt($nick) Nick'i Op kanalından cıkıs yapmistir.
    hdel -m opver $nick
    tokenize 44 %chanlar
    mode $* -o $nick
  }
}
on *:quit: {
  if $hget(opver,$nick) {
    hdel -m opver $address($nick,2)
  }
}