Tekil Mesaj gösterimi
Alt 27 Aralık 2008, 18:05   #4
Çevrimiçi
CesuryureK
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: @Küfür | Kick/Akick/Msg




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,%kufurisin $strip($1-)) {
      if (
$window(@Kufur) == $null) { window -ne @Kufur }
      echo 
12 -@Kufur $Nick Nicki $Chan Kanalında $time Saatinde Şunu Yazdı: $1
    }
    
dec %kufur
  
}
}
 
on *:Kick:#: {
  
if *AKICK byiswm $1-) { $kmsjc(2,$chan,$knick,$remove($4-,$chr(40),$chr(41))) } 
  else { 
$kmsjc(1,$nick,$knick,$chan,$1-) }
}
alias kmsjc {
  if $
== {
    var %

    
while (%<= $numtok($5-)) {
      if 
$read(kufur.txt,w,$gettok($5-,%i,32)) { 
        if (!
$window(@Kick)) { window -ne @Kick }
        echo 
-@Kick Kick: $$3 nickli kişiyi $4 kanalından şu sebeple attı: $5- | break
      }
      
inc %i 1
    
}
  }
  elseif  $
== 
    var %

    
while (%<= $numtok($3-)) {
      if 
$read(kufur.txt,w,$gettok($3-,%i,32)) { 
        if (!
$window(@Kick)) { window -ne @Kick }
        echo 
-@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,%kufurisin $strip($1-)) {
      if (
$window(@Kufur) == $null) { window -ne @Kufur }
      echo 
12 -@Kufur $Nick Nicki $Chan Kanalında $time Saatinde Şunu Yazdı: $1
    }
    
dec %kufur
  
}
}

on *:Kick:#: {
  
if *AKICK byiswm $1-) { 
    var %
i $lines(kufur.txt)
    while (%
0) {
      if (
$read(kufur.txt,%iisin $strip($4-)) {
        if (
$window(@Akick) == $null) { window -ne @Akick }
        echo 
-@Akick $nick $knick nickli kişiyi $chan Kanalından şu sebeple attı: $1
      }
      
dec %i
    
}
  }
  else {
    var %
i $lines(kufur.txt)
    while (%
0) {
      if (
$read(kufur.txt,%iisin $strip($1-)) {
        if (
$window(@Kick) == $null) { window -ne @Kick }
        echo 
-@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.

__________________
Şimdi Saat Sensizliğin Ertesi..

Konu CesuryureK tarafından (27 Aralık 2008 Saat 18:45 ) değiştirilmiştir.
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet bizimmekan sohbet odaları