Çevrimdışı

#cLonekorumaSi on
on @!*:JOIN:#:{
if ($ialchan($wildsite,#,0) > %clonesayi) {
var %' = $ifmatch, %. | while %' {
var %7 = $gettok($ialchan($wildsite,#,%'),1,33)
if (%7 !isop #) { %. = $addtok(%.,%7,44) | dec %' } | else { return } }
if %. { mode # +b $wildsite | var %~ = $numtok(%.,44) | while %~ { kick # $gettok(%.,%~,44) %clonekorumasebep | dec %~ } }
}
}
#cLonekorumaSi end
alias clonekoruma { dialog -m clonekorumasi clonekorumasi }
dialog clonekorumasi {
title "Clone Korumasi"
size -1 -1 144 88
option dbu
text "Kanal'a", 1, 9 7 20 8
edit "", 2, 30 6 13 10
text "Den Fazla Clone Girerse o Adresi Banla", 3, 43 7 100 8
box "Durum", 4, 5 19 135 37
button "Aç", 5, 23 27 37 12
button "Kapat", 6, 83 27 37 12
text "Durum:", 7, 35 44 22 8
edit "", 8, 57 44 50 10, read
edit "", 9, 44 60 97 10, autohs
text "Kick Sebebiniz", 10, 4 61 40 8
button "Kaydet Ve Çık", 11, 22 72 46 12, ok
button "İptal", 12, 73 72 46 12, cancel
}
on *:dialog:clonekorumasi:*:*:{
if ($devent == init) {
did -a $dname 8 %clonekorumadurum
did -a $dname 9 %clonekorumasebep
did -a $dname 2 %clonesayi
}
if ($devent == sclick) {
if ($did == 5) { .enable #cLoneKorumaSi | set %clonekorumadurum Açık | set %clonekorumasebep $did(9) | set %clonesayi $did(2) | dialog -x clonekorumasi clonekorumasi | clonekoruma }
if ($did == 6) { .disable #cLoneKorumaSi | set %clonekorumadurum Kapalı | set %clonekorumasebep $did(9) | set %clonesayi $did(2) | dialog -x clonekorumasi clonekorumasi | clonekoruma }
if ($did == 11) { set %clonekorumasebep $did(9) | set %clonesayi $did(2) }
}



Bu kodun @ op'Lara işLememesi icin ne yapmak lazım :?

 

Çevrimdışı

Tinba Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

#cLonekorumaSi on on @!*:JOIN:#:{ if $nick isop $chan { halt } if ($ialchan($wildsite,#,0) > %clonesayi) { var %' = $ifmatch, %. | while %' { var %7 = $gettok($ialchan($wildsite,#,%'),1,33) if (%7 !isop #) { %. = $addtok(%.,%7,44) | dec %' } | else { return } } if %. { mode # +b $wildsite | var %~ = $numtok(%.,44) | while %~ { kick # $gettok(%.,%~,44) %clonekorumasebep | dec %~ } } } } #cLonekorumaSi end alias clonekoruma { dialog -m clonekorumasi clonekorumasi } dialog clonekorumasi { title "Clone Korumasi" size -1 -1 144 88 option dbu text "Kanal'a", 1, 9 7 20 8 edit "", 2, 30 6 13 10 text "Den Fazla Clone Girerse o Adresi Banla", 3, 43 7 100 8 box "Durum", 4, 5 19 135 37 button "Aç", 5, 23 27 37 12 button "Kapat", 6, 83 27 37 12 text "Durum:", 7, 35 44 22 8 edit "", 8, 57 44 50 10, read edit "", 9, 44 60 97 10, autohs text "Kick Sebebiniz", 10, 4 61 40 8 button "Kaydet Ve Çık", 11, 22 72 46 12, ok button "İptal", 12, 73 72 46 12, cancel } on *:dialog:clonekorumasi:*:*:{ if ($devent == init) { did -a $dname 8 %clonekorumadurum did -a $dname 9 %clonekorumasebep did -a $dname 2 %clonesayi } if ($devent == sclick) { if ($did == 5) { .enable #cLoneKorumaSi | set %clonekorumadurum Açık | set %clonekorumasebep $did(9) | set %clonesayi $did(2) | dialog -x clonekorumasi clonekorumasi | clonekoruma } if ($did == 6) { .disable #cLoneKorumaSi | set %clonekorumadurum Kapalı | set %clonekorumasebep $did(9) | set %clonesayi $did(2) | dialog -x clonekorumasi clonekorumasi | clonekoruma } if ($did == 11) { set %clonekorumasebep $did(9) | set %clonesayi $did(2) } } }

Bu şekilde, kod'un op'larda pasif kalmasını saglayabilirsiniz.

 

Çevrimdışı

trivia bot um var tamamen kendim editledim farkli bi oyun oynatiyorum klavye yarisi gibi bisi wpm falan verio baglantim 2048 pc cift cekirdek 4 gb ram serverde tt net gayet hizli bi server basen botta soru biliyorum botun tbrk msj ile arama 4 5 kisinin cevabi girio gec alio sebebi ne olabilir cozum bulabilirmiyis eger konunun yeri burasi degilse link plz tskrler
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.