|
bind pub - .isinla birbirx
bind msgm - .isinla birbirx
proc birbirx {nick uhost handle chan poseidon } {
global birbir
if {[llength $poseidon] == 1} {
putserv "SAJOIN $poseidon #kanal1,#kanal2"
putserv "PRIVMSG $chan :isinlama islemi tamamlanlmıştır"
return 0
}
return 0
}
not : yukaridaki sajoin komutunu kendi serverinizin versionuna göre değiştiriniz.
Kolay gelsin
Konu POSEiDON tarafından (14 Ağustos 2005 Saat 21:15 ) değiştirilmiştir.
|