3 Clone Girişinde Kill/Gzline/Shun Addonu

Bu addon kanala 3 Clone girdiginde Ekranınıza bir addon gelicektir. Size sorucaktir Clonelere hangi komut uygulansin diye. Siz kill basarsanız kill atıcaktir. Gzline basarsaniz Zline atacaktir. Shun basarsaniz Shun Yiceklerdir. Güzel bir Koruma addonudur.

Coderi : CesurYurek

on *:join:#: {
  %clone = $ialchan($wildsite,#,0)
  if (%clone == 3) {
    var %c = 1
    set %cloneNick csr
    while (%c <= %clone)  {
      %cloneNick = %cloneNick  $ial($wildsite,%c).nick
      inc %c
    }
    dialog -m clone clone
    .set %At1 $gettok($remove(%cloneNick,csr),1,32)
    .set  %At2 $gettok($remove(%cloneNick,csr),2,32)
    .set %at3 $gettok($remove(%cloneNick,csr),3,32)
  }
  set %change $read -s $+ $address($nick,4) notes.ini
  if (%change == $null) {
    haltdef
    halt
  }
}

dialog Clone {
  title "Clone İşlem Paneli"
  size -1 -1 106 54
  option dbu
  box "Clonelere Uygulanacak  Komut?", 1, 2 0 102 52
  button "Gzline", 2, 71 13 27 12, ok
  button "Kill", 3, 38 13 27 12, ok
  button "Shun", 4, 6 13 27 12, ok
  button "Kapat", 5, 33 33 37 12, ok cancel
}
on *:dialog:clone:sclick:*:{
  if ($did == 2) { gzline %at1 Clone Girişi Yasaktir. | unset %at1 %at2 %at3 }
  if ($did == 3) { kill %at1 Clone Girişi Yasaktir. | kill %at2 Clone! | kill %at3 Clone | unset %at1 %at2 %at3 }
  if ($did == 4) { Shun %at1 Clone Girişi Yasaktir. | unset %at1 %at2 %at3 }
  if ($did == 5) { unset %at1 %at2 %at3 }
}