Genel Forumlar Haylazforum.Net

Genel Forumlar Haylazforum.Net (https://haylazforum.net/)
-   TCL Scriptler (https://haylazforum.net/345-tcl-scriptler/)
-   -   RezilEt Tcl (https://haylazforum.net/tcl-scriptler/5872-rezilet-tcl.html)

Aytac 02.Ocak.2019 00:13

RezilEt Tcl
 
Kullanımı: !rezilet nick

Kod:

#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"
bind pub - !rezilet rezalet

proc rezalet { n u h c a } {

    global botnick admin_chan rdlck

    if {[onchan $n $admin_chan]==1} {
    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"

-------------Sadece belirli nick kullanmak için----------------

"set yonet" kismina nickini girmeyi unutmayınız.

Kod:

#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 yonet "nickinizi girin"

set rdlck [rand 9999999]
set admin_chan "#Opers"
bind pub - !rezilet rezalet

proc rezalet { n u h c a } {

    global botnick admin_chan rdlck yonet

    if {[onchan $n $admin_chan]==1 & [string match -nocase $n $yonet]} {
    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"
    } else {
    putserv "privmsg $c :Hop dedik. Ağır ol bakalım :)"
}
}
putlog "Rezilet.Tcl v1.0 - Written by aLoNe"


diShy 02.Ocak.2019 00:23

Irc miz olaydı kullanırdık değil mi @[Linki Görebilmeniz Icin Üye Olmaniz Gerekiyor! Üye Olmak Icin Tiklayin...] :)

facia 02.Ocak.2019 00:26

@[Linki Görebilmeniz Icin Üye Olmaniz Gerekiyor! Üye Olmak Icin Tiklayin...] ircmi açalım bu saatten sonra Yaşlandık artık geçti bizden ama iyi uğraşırdım senle açsaydık bütün komutları Uyguladım sen de:)

Aytac 02.Ocak.2019 00:29

@[Linki Görebilmeniz Icin Üye Olmaniz Gerekiyor! Üye Olmak Icin Tiklayin...] irc aleminde geçinemiyoz milletle bir vukuat cıkıyor illa : )

diShy 02.Ocak.2019 01:16

Ay yok be takılıyorum ben telden bakıp cıkıyom zaten pc acmaya erinyorum birde sceipt mi kuracağım :p @[Linki Görebilmeniz Icin Üye Olmaniz Gerekiyor! Üye Olmak Icin Tiklayin...] & @[Linki Görebilmeniz Icin Üye Olmaniz Gerekiyor! Üye Olmak Icin Tiklayin...] :D

facia 02.Ocak.2019 01:31

Vallahi esra sen kurarsın sen de o azim var eğer irc açarsak dayanamazsın sen aytaç sana pembe bir mirc yapar:)

diShy 02.Ocak.2019 01:38

Hahaha sey pembe olursa iş değişebilir :p


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 07:06.

Powered by vBulletin® Version 3.8.9
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.
Search Engine Optimization by vBSEO 3.6.1

User Alert System provided by Advanced User Tagging (Lite) - vBulletin Mods & Addons Copyright © 2025 DragonByte Technologies Ltd.Navbar with Avatar by Motorradforum