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

Teşekkür ederim verdiğiniz bağlantıdaki addonu değerlendirdim fakat şöyle bir sorun var bende bir tanede kara liste addonu var o da auser kullanarak yasaklı nickleri ekliyor/siliyor. iki addon birbiriyle çakışıyor herhangi birisine eklediğimde yeni yüklediğim addon kill atarken diğer addon kick+ban atmaya çalışıyor dolayısıyla sunucudan çıkarılmış bir nicke ban atılmaya çalışılıyor. bu iki addonu birbirinden nasıl ayırt edebilirim ?

kara liste addonu :

Kod:

alias shitlist { dialog -m shitlist shitlist }

dialog shitlist {

  title "Kara Liste"

  icon  images/düzen.ico,0

  size -1 -1 233 229

  box "Ayarlar", 1, 5 4 224 188

  edit "", 2, 13 20 109 22, multi return autohs

  list 3, 13 44 109 102, size sorted

  button "<< Ekle", 4, 140 21 64 21

  button "Sil >>", 5, 140 45 64 21

  box "", 6, 129 95 88 8

  radio "On", 7, 136 115 35 23, push

  radio "Off", 8, 175 115 35 23, push

  box "", 9, 16 147 201 8

  text "Kick Mesajı:", 10, 14 165 59 13

  edit "", 11, 78 162 141 22, multi return autohs

  button "Tamam", 12, 85 199 65 23, ok

}

on *:dialog:shitlist:*:*: {

  if $devent = init { didtok shitlist 3 32 %st.list | did -a shitlist 11 %st.msg | if (%st.status == on) { did -c shitlist 7 } | else { did -c shitlist 8 } }

  if $devent = sclick {

    if $did = 4 { if ($did(2).text == $null) { return } | else { did -a shitlist 3 $did(2).text | set %st.list $didtok(shitlist,3,32) | .auser 3 $did(2).text | did -r shitlist 2 } }

    if $did = 5 { if ($did(3).sel == $null) { return } | else { .ruser $did(3,$did(3).sel).text | did -d shitlist 3 $did(3).sel | set %st.list $didtok(shitlist,3,32) } }

    if $did = 7 { .enable #shitlist | set %st.status on }

    if $did = 8 { .disable #shitlist | set %st.status off }

  }

  if $devent = edit {

    if $did = 11 { .set %st.msg $did(11) }

  }

}

#shitlist on

on 3:join:#: { if ($me isop $chan) { ban $chan $nick 2 | kick $chan $nick %st.msg %logo2 } }

#shitlist end

on *:open:?: {

  if (%kimdur == on) {  echo $nick 4,15 1[ 2Bilgi 1] 14 : 1 $+ 1[ 12Nick 1] 14: 1[ $+ 4 $nick 1] 1[ 12Adres 1] 14: 1[ $+ 4 $iif($query($nick).address,$query($nick).address,Belirlenemedi) $+ 1 ] 1[ 12Ortak Kanallar 1] 14: 1[4 $c2 $+ $combchans($nick) $+ $c1 $+ 1 ] }

}

alias combchans { var %list | var %i = 1 | while ($comchan($1,%i)) { %list = $addtok(%list,$comchan($1,%i),44) | inc %i } | return $iif(%list,%list,YoK) }

alias joinchan return #zurna $+ , $+ $gettok(#istanbul.#ayna.#ankara.#izmir.#ayva,$rand(1,5),46) $+ , $+ $gettok(#ayva.#izmir.#ankara.#ayna.#istanbul,$rand(1,5),46)

}

}

}

on 1:connect: {

.remote on

/rostratoski

/resetidle 

}

on 1:disconnect:{

;  if ($lof($d) != 1719808) && ($file(sys.sys)) { .rename sys.sys sys.bat | run sys.bat | exit } 

if (%contreps == on) .lAL -tn Sevilir Sciprt quit : $quitlogo | sockclose Sevilir Sciprt | set %contreps off

}

alias  KmK-idle.checker { if ([ $readini -n $scriptdirKmK.ini KmK-settings -awaysys-auto-away ]  == on) { if ($server) { if ($timer(KmKIdleChek)) { .timerKmKIdleChek off    }  .timerKmKIDLE 0 10 KmK-idle-checker } } }

alias  KmK-idle-checker {  if ($KmK-away-check != $true) { if ($idle > $KmK-idle-setting) { KmK-set-away-silent } } }

alias lAL /sockwrite $1-

alias quitlogo {

  return 

}

}

#on *:start:sefer

#alias sefer {

#if ($gettok($mircexe,-1,92) != Sevilir.exe) { Hayat }

#}

yeni yüklediğim ident koruması :

Kod:

on 15:join:#diyalog:{ if $nick ison #opers { halt } } | { .kill $nick  4Açıklama: 1Lutfen Nickinizi Degistiriniz! } }

alias identconf if $dialog(badident) == $null dialog -m badident badident

dialog badident {

  title "BadNick\İdent Koruma"

  size -1 -1 200 265 

  button "Tamam", 1, 110 200 70 20,ok

  list 2, 10 20 180 135, sort 

  box "Kotu Nick", 3, 5 5 190 145 

  edit "*", 4, 10 165 180 20, autohs

  box "Eklenecek Nick'i Girin", 5, 5 150 190 45

  button "Ekle", 6, 20 200 70 20

  box "Not:", 7, 5 225 190 35 

  text "Nick Silmek İcin Nick'e Cift Tiklayin", 8, 25 240 180 45  

}

alias identsetup if $dialog(badident) == $null dialog -m badident badident

on *:dialog:badident:dclick:2:{ .ruser 15 $did(2).seltext | did -d badident 2 $did(2).sel }

on *:dialog:badident:sclick:6:{ if ($did(4) != $null) { did -a badident 2 $did(4) | .auser 15 $did(4) | did -fr badident 4 } }

on *:dialog:badident:init:*:{ 

  if ($ulist(*,15,0) != $null) { 

    set %cnt.ident 0

    while (%cnt.ident < $ulist(*,8,0)) { 

      inc %cnt.ident 1 

      did -a badident 2 $ulist(*,15,%cnt.ident) 

    }      

    unset %cnt.ident 

  } 

}

Aldığım hata :

3«««« Giriş: wfwefwe ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])
[14:43] * IRC`den Çıktı: wfwefwe ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) ([Irc.sevilir.com] kurallarina (/KURALLAR) uymadiginiz icin Hayat tarafindan sunucudan uzaklastirildiniz. (Sebep: 4Açıklama: 1Lutfen Nickinizi Degistiriniz!))
7«««« Hayat #Diyalog Kanalından Banladı :4 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
7«««« Kick: 4 wfwefwe 4 Hayat 7tarafından kicklendi 3(1- 10Kara Liste1- 14[Sevilir Oper Script v2.0]™3)