Çevrimdışı

merhaba verdiğim cod lar join part ve quit giriş cıkışları gösteriyo 2 3 tane eklediğim kanal da quit join partların gözükmemesini istiyorum. ekleme yapabilirmisiniz.aşşağıdaki codlara.

on ^*:part:#: {
if $nick == $me {
echo -t # 14» 14»14 # kanalından çıktınız. ( $+ $me rumuzu ile, $replace($replace($asctime,sun,Pazar,mon,Pazartesi ,tue,Salı,wed,Çarşamba,thu,Perşembe,sat,Cumártesi, fri,Cuma,jan,Ocak,feb,Şubat,mar,Mart,apr,Nisan,may ,Mayıs,jun,Haziran,jul,Temmuz,aug,Ağustos,sep,Eylü l,oct,Ekim,nov,Kasım,dec,Aralık),á,a) $+ )
echo -ts 14» 14»14 # kanalından çıktınız. ( $+ $me rumuzu ile, $replace($replace($asctime,sun,Pazar,mon,Pazartesi ,tue,Salı,wed,Çarşamba,thu,Perşembe,sat,Cumártesi, fri,Cuma,jan,Ocak,feb,Şubat,mar,Mart,apr,Nisan,may ,Mayıs,jun,Haziran,jul,Temmuz,aug,Ağustos,sep,Eylü l,oct,Ekim,nov,Kasım,dec,Aralık),á,a) $+ )
}
echo -t # $+(,$color(quit)) $+ 2 $nick $address
if $query($nick) {
echo -t $nick $+(,$color(quit)) $+ $nick $address # kanalından çıktı.
}
haltdef
}
on ^*:join:#: {
if $nick == $me {
echo -t # 10» 10»10 # kanalına girdiniz. ( $+ $me rumuzu ile, $replace($replace($asctime,sun,Pazar,mon,Pazartesi ,tue,Salı,wed,Çarşamba,thu,Perşembe,sat,Cumártesi, fri,Cuma,jan,Ocak,feb,Şubat,mar,Mart,apr,Nisan,may ,Mayıs,jun,Haziran,jul,Temmuz,aug,Ağustos,sep,Eylü l,oct,Ekim,nov,Kasım,dec,Aralık),á,a) $+ )
}
else {
if $getoption(kisiselflood) && $me !isop # && $me !ishop # && o !isincs $usermode {
inc $+(-u,$hget(_jpayar,saniye)) %jpff. [ $+ [ $+($address($nick,2),#) ] ] 1
if %jpff. [ $+ [ $+($address($nick,2),#) ] ] >= $hget(_jpayar,kez) {
if %jpff. [ $+ [ $+($address($nick,2),#) ] ] == $hget(_jpayar,kez) {
linesep #
_bilgiq # $address($nick,2) IP'sinden yoğun giriş/çıkış yapıldığı için gösterilmedi.
linesep #
}
halt
}
}
var %c # , %nc $nick , %ret
if $ialchan($address(%nc,2),%c,0) > 1 {
var %i 1
while %i <= $ialchan($address(%nc,2),%c,0) {
if $ialchan($address(%nc,2),%c,%i).nick != %nc {
%ret = $addtok(%ret,$ialchan($address(%nc,2),%c,%i).nick, 44)
}
inc %i
}
}
echo -t # $+(,$color(join)) $+ $nick $address
if $query($nick) {
echo -t $nick $+(,$color(join)) $+ Giriş: $nick $address # kanalına girdi.
}
}
haltdef
}
on ^*:quit: {
var %i 1
while $comchan($nick,%i) {
$iif($v1 !== #sohbet,echo -t $v1 $+(,$color(quit)) $+ 14 $nick $address $1- )
inc %i
}
if $query($nick) {
echo -t $nick $+(,$color(quit)) $+ 14 $nick 14( $address ) $1- )
}
haltdef
}