Verdiğim kodu ekledim, Şu şekilde çalışması gerekiyor.
Deneme için sunucum yok. Hala olmazsa PM atın beraber bakalım.
Kod: Kodu kopyalamak için üzerine çift tıklayın!
#RezilEt TCL - Written by aLoNe
#Sunucunuzda m_sendraw.c modülü yüklenmiş olmalıdır.
#Botun RAW yetkisi olması şarttır.
#Öküzler için bire bir.
#Kullanım: !rezilet Nick
#Başlayalım..!
set rdlck [rand 9999999]
set admin_chan "#Opers"
set owner "No_FeaR"
proc rezalet { n u h c a } {
global botnick admin_chan rdlck
if {[onchan $n $admin_chan]==1} {
if { $::owner == $nick } {
putserv "shun $a Sus!"
putserv "sendraw $c ::$a PRIVMSG $c :Merhaba :("
putserv "sendraw $c ::$a PRIVMSG $c :Ben çok öküzüm :V"
putserv "sendraw $c ::$a PRIVMSG $c :Hani nasıl desem, semer vurup deh deseniz ayıp olmaz ühühüüü :("
putserv "sendraw $c ::$a PRIVMSG $c :Rahatsız ettim sizleri de mallığımla."
putserv "sendraw $c ::$a PRIVMSG $c :Ama ne demişler zayıf öküzün kıblesi olmazmış :c"
putserv "sendraw $c ::$a PRIVMSG $c :Harbi malım ben yaa :("
putserv "sendraw $c ::$a PRIVMSG $c :Özür dilerim hepinizden. Allah belamı vereydi benim :("
putserv "sendraw $c ::$a PRIVMSG $c :Vay arkadaş ne malım ben yaa..."
putserv "sendraw $c ::$a PRIVMSG $c :Affedin beni :("
putserv "sendraw $c ::$a PRIVMSG $c :Nickimi değişim de kafa bulun azcık :("
putserv "os raw svsnick $a YilinAngutu$rdlck :1"
putserv "sendraw $c ::$a PRIVMSG $c :Buyrun hep beraber atlayın abi :("
putserv "privmsg $admin_chan :$a nickli zavallı başarıyla rezil edildi :Q"
}
if {[onchan $n $admin_chan]==0} {
putserv "privmsg $c :Hop dedik. Admin ol gel yavru :)"
}
}
putlog "Rezilet.Tcl v1.0 - Written by aLoNe"
Bunu Farklı olarak düzenledim birde bunu dene, Bu sadece kanal yetkilileri kullanabilmesi için.
Kod: Kodu kopyalamak için üzerine çift tıklayın!
bind pub - !RezilEt reziletnick
set admin_chan "#Opers"
proc reziletnick {nick uhost handle chan text} {
global admin_chan server op_chan
if {[onchan $n $admin_chan]==1} {
if {[isop $nick $chan] || [onchan $nick $admin_chan] || [onchan $nick $op_chan]} {
putserv "shun $a Sus!"
putserv "sendraw $c ::$a PRIVMSG $c :Merhaba :("
putserv "sendraw $c ::$a PRIVMSG $c :Ben çok öküzüm :V"
putserv "sendraw $c ::$a PRIVMSG $c :Hani nasıl desem, semer vurup deh deseniz ayıp olmaz ühühüüü :("
putserv "sendraw $c ::$a PRIVMSG $c :Rahatsız ettim sizleri de mallığımla."
putserv "sendraw $c ::$a PRIVMSG $c :Ama ne demişler zayıf öküzün kıblesi olmazmış :c"
putserv "sendraw $c ::$a PRIVMSG $c :Harbi malım ben yaa :("
putserv "sendraw $c ::$a PRIVMSG $c :Özür dilerim hepinizden. Allah belamı vereydi benim :("
putserv "sendraw $c ::$a PRIVMSG $c :Vay arkadaş ne malım ben yaa..."
putserv "sendraw $c ::$a PRIVMSG $c :Affedin beni :("
putserv "sendraw $c ::$a PRIVMSG $c :Nickimi değişim de kafa bulun azcık :("
putserv "os raw svsnick $a YilinAngutu$rdlck :1"
putserv "sendraw $c ::$a PRIVMSG $c :Buyrun hep beraber atlayın abi :("
putserv "privmsg $admin_chan :$a nickli zavallı başarıyla rezil edildi :Q"
}
}