|
| Alıntı: |
bind join - * msg_chan
proc msg_chan {nick uhost hand chan} {
if {[string match -nocase "Nickiniz" $nick]} {
putquick "PRIVMSG $chan Sunucu Sahibi System Root Administrator'u $nick su anda kanala girdi."
}
if {[string match -nocase "Nickiniz2" $nick]} {
putquick "PRIVMSG $chan Sunucu Sahibi System Root Administrator'u $nick su anda kanala girdi."
}
if {[string match -nocase "Nickiniz3" $nick]} {
putquick "PRIVMSG $chan Sunucu Sahibi System Root Administrator'u $nick su anda kanala girdi."
}
if {[string match -nocase "Nickiniz4" $nick]} {
putquick "PRIVMSG $chan Sunucu Sahibi System Root Administrator'u $nick su anda kanala girdi."
}
if {[string match -nocase "Nickiniz5" $nick]} {
putquick "PRIVMSG $chan Sunucu Sahibi System Root Administrator'u $nick su anda kanala girdi."
}
}
putlog "Karşılama TCL v1.0 - Written By CLubber"
|
Bu Kod Kanala Join Yaptıgında Devreye Giriyor Demi @
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]