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

uzun zaman önce yazdığım bir şeydi, işini görür sanırım, böyle şeyleri kendim arşivlemediğim için nette bulabildim ancak : )

Kod:

;................................................. .................................................. ...................;

;coded by SaW

;

;kaynak belirtilmeden kısmen ya da tamamen alınmaması rica olunur 

;addonu yüklemek için /load -rs ircopbak.mrc yazmanız yeterlidir 

;kendiniz bi kanala girdiğinizde nicklistteki ircopları renklendirir 

;bi ircop kanala girdiğinde ise bunu size bir echo ile haber verir 

;................................................. .................................................. ...................;
 

on me:*:JOIN:#:/who $chan

raw 352:*: {

if (* isin $7) { cline 13 $2 $6 }

else { cline $colour(listbox text) $2 $6 }

haltdef

}
 

on *:JOIN:#: {

set %kanal $chan

set $+(%,ircopbak,$cid,$nick) 1

userhost $nick

}

raw 302:*: {

var %nick = $remove($gettok($2,1,61),*)

if ($($+(%,ircopbak,$cid,%nick),2)) {

if ($chr(42) isin $gettok($2,1,61)) {

echo -a 2 ( $+ $time(hh:nn) $+ ) 1*2*12* 13 $+ %nick $+ , 2Kullanıcı ircop! %kanal 2 Kanalına giriş yaptı.

}

unset $+(%,ircopbak,$cid,%nick)

halt

}

}