Çevrimdışı

Arkadaşlar başlıkta da dediğim gibi bir kanalda deopsunuz ve özelinizde veya kanalda kural ihlali yapılıyor...otomatik olarak op olup bu kural ihlalini yapan kişiye otomatik ban atıp kanalda tekrar deop olmak için bir kod yazabilirmiyiz...ben bir örnek vericem ama tam olarak bilmiyorum doğru mu bu kod...

 

Çevrimdışı

Dediğin yapılır fakat bahsettiğin kural ihlalleri nelerdir ? Neye göre opa çıkartıcağız bunu belirtmen gerekir . Küfürdemi , badnickleri görüncemi , reklamdamı vs vs..

 

Çevrimdışı

mesela elimizde şu kod var...

burda anladığım kadarıyla eğer op isem 15dk nicke ban at diyor galiba...
işte eğer bu kelime kanalda geçerse op değilsem beni op yap ve ban at ondan sonra tekrar deop yap gibi bir komut diyelim...

 

Çevrimdışı

on *:text:*sikece*:#:{
;içinde *sikece* geçen bir cümle olduğunda
if $nick isreg # {
;eğer bunu kullanan kanalda op/voice/hop değilse
if $me isop # {
;eğer ben bu kanalda opsam
ban -ku900 # $nick 2 küfür etme
;<nick>'i 900 saniyeliğine kanaldan *@ip şeklinde banla ve kickle
}
else {
;eğer ben bu kanalda op değilsem
chanserv op # $me | .timer 1 3 ban -ku900 # $nick 2 küfür etme | .timer 1 5 chanserv deop # $me
;chanservden op iste, 3 saniye sonra bu nicki kanaldan atmaya çalış, 5 saniye sonra deop ol
}
}
}

 

Çevrimdışı

on @*:TEXT:*sıkece*:#: {
if $nick !isop $chan {
if $me !isop $chan { goto islemoto }
ban -u $+ 900 # $nick 2 | kick # $nick 4# Kanalında 4Argo veya küfürlu konuştuğunuz tespit edildi. | halt
:islemoto
/msg chanserv op $chan $me
timer 1 2 /ban -u $+ 900 # $nick 2 | kick # $nick kanalinda argo veya kufurlu konustugunuz tespit edildi
/msg chanserv deop $chan $me
}
}

 

Çevrimdışı

eğer akick seviyen var ise

on *:text:*sikece*:#:{
;içinde *sikece* geçen bir cümle olduğunda
if $nick isreg # {
;eğer bunu kullanan kanalda op/voice/hop değilse
if $me isop # {
;eğer ben bu kanalda opsam
ban -ku900 # $nick 2 küfür etme
;<nick>'i 900 saniyeliğine kanaldan *@ip şeklinde banla ve kickle
}
else {
;eğer ben bu kanalda op değilsem
;bu kısımdan sonra
cs akick $chan $add $address($nick,2)
cs akick $chan enforce
timer 1 300 cs akick $chan del $address($nick,2)
;kısmını eklersen kanaldan akick ile atarsın
;kendini op a cıkarman gerekmez.
}
}
}

[box=el33t]ve tabi bracketları } kapatmayı unutmuyoruz.. ;o (el33t)[/box]

 

Çevrimdışı

hepinize teşekkürler arkadaşlar böyle anlatarak çok faydalı oluyo.....
fakat bu kelime kanalda geçiyo cs beni op yapıyo fakat ban atmıyo sonra deop yapıyo ama...
; 'ler vr yukarıda açıklamalarda onları ekliyor muyuz....ondan mı acaba...

 

Çevrimdışı

on *:TEXT:*sikece*:#: {
if $nick !isop $chan {
if $me !isop $chan { goto islemoto }
ban -u $+ 900 # $nick 2 | kick # $nick 4# Kanal?nda 4Argo veya küfürlu konu?tu?unuz tespit edildi. | halt
:islemoto
/msg chanserv op $chan $me
timer 1 2 /ban -u $+ 900 # $nick 2 | kick # $nick kanalinda argo veya kufurlu konustugunuz tespit edildi
timer 1 5 /msg chanserv deop $chan $me
}
}



bu kodu remoteye ekle bu sekilde calisiyor denedim

 

Çevrimdışı

Güzel oldu...bide bu kelimeleri bir küfür.txt 'den okutsak nasıl bir değişiklik yapmamız gerekir...
bi yerden bi txt okutmak nasıl oluyo
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
onu da bir anlatarak yazarsanız çok sevinicem...bir de onu öğreneyim...
şimdiden ...;oki teşekkürler....;oki

 

Çevrimdışı

on *:text:*:#:{
var %a = $lines(küfürler.txt)
while %a {
if ($read(küfürler.txt,%a) isin $1-) {
banla $nick $chan
halt
}
else {
dec %a
}
}
}
alias banla {
if $1 isreg $2 {
if $me isop $2 {
ban -ku900 $2 $1 2 küfür etme
}
else {
cs akick $2 $add $address($1,2)
cs akick $2 enforce
timer 1 300 cs akick $2 del $address($1,2)
}
}
}
Şimdilik işinin görülmesi açısından kodu veriyim.En yakın zamanda anlatımda yaparım.