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

İki script bir arada

PHP- Kodu:

   #gerekli bindler

bind pub - !identekle identekle

bind evnt - init-server baglan_yap

proc baglan_yap {type} {

global inick ipass

putserv "OPER $inick $ipass"

}

proc identekle {n u h c a} {

global gnick

set gnick $n

set identname [lindex $a ]

putserv "spamfilter add u kill - sebeb ^.+!$identname+"

}

PHP- Kodu:

   #gerekli bindler

bind pub - !identsil identsil

bind evnt - init-server baglan_yap

proc baglan_yap {type} {

global inick ipass

putserv "OPER $inick $ipass"

}

proc identsil {n u h c a} {

global gnick

set gnick $n

set identname [lindex $a ]

putserv "spamfilter del u kill - sebeb ^.+!$identname+"

}