kanal üstünde komutla "mesajı" atmak istemediniz mi? hep sabit bir mesaj mı atmak istiyorsunuz da script içine "mesajı" eklemek istiyorsunuz ?
Kod: Kodu kopyalamak için üzerine çift tıklayın!
bind pubm mn "#Dj *" vs_op
proc vs_op {n u h c t} {
if {![string equal -nocase "!djalım" [lindex [split $t] 0]]} { return }
set mesaj [join [lrange [split $t] 1 end]]
if {[llength $mesaj] < 1} {
puthelp "notice $n :Kullanımı :$::lastbind <sunucudaki kullanıcılara göndermek istenen meaaj>"
puthelp "notice $n :Örnek : $::lastbind DeeJay alımı yapılıcak.Tercihen uzun bacaklı,ince belli,ceylan gözlü,az cilveli \
hanımların, direk $::owner özeline dalmaları reca olunur..."
return 0
} else {
putserv "describe \$*$::server :$mesaj"
return 0
}
}
yada
Kod: Kodu kopyalamak için üzerine çift tıklayın!
bind pub mn "!djalım" vs_op
proc vs_op {n u h c t} {
if {![string compare -nocase "#Dj" $c]} { return 0 }
set mesaj [join [lrange [split $t] 0 end]]
if {[llength $mesaj] eq 0} {
puthelp "notice $n :Kullanımı :$::lastbind <sunucudaki kullanıcılara göndermek istenen meaaj>"
puthelp "notice $n :Örnek : $::lastbind DeeJay alımı yapılıcak.Tercihen uzun bacaklı,ince belli,ceylan gözlü,az cilveli \
hanımların, direk $::owner özeline dalmaları reca olunur..."
return 0
} else {
putserv "describe \$*$::server :$mesaj"
return 0
}
}
ikiside aynı şekilde #Dj kanalında !djalım <mesajınız> komutuyla işler.
örnek : !djalım DeeJay alımı yapılıcak.Adayların sarışın, uzun bacaklı,ince belli olması gerekmektedir.ilgilenenlerin No_FeaR özeline cep-numaralarını bırakmaları reca olunur...
gibi...
yok sabit bi mesajı her !djalım komutunda atılsın deniyorsa...
Kod: Kodu kopyalamak için üzerine çift tıklayın!
set mesaj "buraya mesajınızı yazın..."
bind pubm mn "#Dj *" vs_op
proc vs_op {n u h c t} {
if {![string equal -nocase "!djalım" [lindex [split $t] 0]]} { return }
if {$::mesaj == ""} {
puthelp "notice $n :Kullanımı :$::lastbind <sunucudaki kullanıcılara göndermek istenen meaaj>"
puthelp "notice $n :Örnek : $::lastbind DeeJay alımı yapılıcak.Tercihen uzun bacaklı,ince belli,ceylan gözlü,az kırıtık \
arkadaşların, direk $::owner özeline dalmaları reca olunur..."
return 0
} else {
putserv "describe \$*$::server :$::mesaj"
return 0
}
}
gibi...