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

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 25 Kasım 2008, 20:49   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
HeLp me..




#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 :?

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 25 Kasım 2008, 23:38   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: HeLp me..




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.

 
Alıntı ile Cevapla

Alt 12 Aralık 2008, 20:36   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: HeLp me..




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.

 
Alıntı ile Cevapla

Cevapla

Etiketler
mirc, mirc download, mirc indir


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık