|
Software Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. |
1- Dosyadan okutucaz mümkünse eğer, sadece bu işlemi yapacak, küfür olan logu ayrı pencerede, hangi kanalda söylediğini göstericek logda dahil. 2- Kanalda küfürlü kick ve akick olduğu zaman da ayrı pencerede olacak. 3- Küfür eden kişi kanaldan uzaklaştırılmicak, sebepe gerek yok yani Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. |
PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#: {
var %kufur $lines(kufur.txt)
while (%kufur > 0) {
if ($read(kufur.txt,%kufur) isin $strip($1-)) {
if ($window(@Kufur) == $null) { window -ne @Kufur }
echo 12 -t @Kufur $Nick Nicki $Chan Kanalında $time Saatinde Şunu Yazdı: $1-
}
dec %kufur
}
}
on *:Kick:#: {
if *AKICK by* iswm $1-) { $kmsjc(2,$chan,$knick,$remove($4-,$chr(40),$chr(41))) }
else { $kmsjc(1,$nick,$knick,$chan,$1-) }
}
alias kmsjc {
if $1 == 2 {
var %i = 1
while (%i <= $numtok($5-)) {
if $read(kufur.txt,w,$gettok($5-,%i,32)) {
if (!$window(@Kick)) { window -ne @Kick }
echo 4 -t @Kick Kick: $2 $3 nickli kişiyi $4 kanalından şu sebeple attı: $5- | break
}
inc %i 1
}
}
elseif $1 == 2 {
var %i = 1
while (%i <= $numtok($3-)) {
if $read(kufur.txt,w,$gettok($3-,%i,32)) {
if (!$window(@Kick)) { window -ne @Kick }
echo 4 -t @Kick AKICK: $2 kanalından $3 nickli kişi akick nedeniyle atıldı : $3- | break
}
inc %i 1
}
}
else { halt }
}
bu kod kick ve akick mesajları eğer kufur.txt'de geçiyorsa @kick penceresine yansıtmakta, yok ben @akick ve @kick pencereleri farklı olsun diyorsan,
PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#: {
var %kufur $lines(kufur.txt)
while (%kufur > 0) {
if ($read(kufur.txt,%kufur) isin $strip($1-)) {
if ($window(@Kufur) == $null) { window -ne @Kufur }
echo 12 -t @Kufur $Nick Nicki $Chan Kanalında $time Saatinde Şunu Yazdı: $1-
}
dec %kufur
}
}
on *:Kick:#: {
if *AKICK by* iswm $1-) {
var %i $lines(kufur.txt)
while (%i > 0) {
if ($read(kufur.txt,%i) isin $strip($4-)) {
if ($window(@Akick) == $null) { window -ne @Akick }
echo 4 -t @Akick $nick $knick nickli kişiyi $chan Kanalından şu sebeple attı: $1-
}
dec %i
}
}
else {
var %i $lines(kufur.txt)
while (%i > 0) {
if ($read(kufur.txt,%i) isin $strip($1-)) {
if ($window(@Kick) == $null) { window -ne @Kick }
echo 4 -t @Kick $nick $knick nickli kişiyi $chan Kanalından şu sebeple attı: $1-
}
dec %i
}
}
}
bu şekilde
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.