## ----------------------------------------------------------------#
# bawel.tcl Editing by hadie #
#
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] #
#
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. #
## ----------------------------------------------------------------#
## ----------------------------------------------------------------
## Set global variables and specificic
## ----------------------------------------------------------------
## -=[ SPEAK ]=- Set the next line as the channels you want to run in
## for all channel just type "*" if only for 1 channel or 2 chnnel just
## type "#Sohbet"
set speaks_chans "*"
# Set you want in XXX seconds you bot always talk
set speaks_time 700
## ----------------------------------------------------------------
## --- Don't change anything below here if you don't know how ! ---
## ----------------------------------------------------------------
################################################## ####################
##--------------------------------------------------------------------
##--- F O R --- E N T E R T A I N M E N T --- CHANNEL ----
##--------------------------------------------------------------------
################################################## ####################
### SPEAK ###
set spoken.v "Auto talk"
# Set the next lines as the random speaks msgs you want to say
set speaks_msg {
{"nikmati hidup selagi bisa,,jgn merasa terbebani"}
{"tinggalah sebuah kenangan"}
{"ku ingin terbang bersamamu,menggapai semua angan dan mimpi yang blum terwujud,,"}
{"biar ku sendiri dahulu,tanpamu disisiku,tenangkan hatiku yang keluh"}
{"kamulah satu2nya yang ternyata mengerti aku,,maafkan aku slama ini yang tak pernah memikirkan kamu"}
{"butuh penyegaran pikiran,,refreshing dlo akh,,,"}
{"what's wrong with you !!!!!!!!!!"}
{"ku putuskan ntuk melangkah pergi jauh dari dirimu,,,"}
{"usai sudah semua rasa yang ku punya,hilang terkikis oleh luka"}
{"seiring berlalu,bergulirnya waktu,,membuka rahasia di antara kita,,,"}
{"ku mencoba bertahan,,meskipun menyakitkan,,tak menyisakan sebuah sesal di hatiku,"}
{"masih menunggumu bicara,,menantikan sebuah jawaban di hatimu"}
{"belajarlah merenung jgn melemparkan kesalahan ke orang lain"}
{"mungkin ku relakan,untuk kau tinggalkan,,diriku disni harus mengakhiri kisah ini,,,"}
{"apakah engkau merasa,aku bukan manusia,,yang luput dari rasa amarah"}
{"mari kita ber dan ska ria"}
{"gw kagak peduli dah orang laen mau bilang apa,"}
{"suatu saat kebenaran bakal terungkap walau itu terlambat"}
{"hanya mengikuti ego masing2 yg ada masalah akan tambah rumit"}
{"tak pantas kah aku ngedapetin ketenangan dan kesenangan walau cuma sesaat"}
{"suatu saat nnt kita bru menyadari,,org yg slama ini tidak pernah kita anggap kebradaannya,akan sangat berharga bagi kita disaat org tersebut prg meninggalkan kita"}
{"masa indah saat bersamamu takkan pernah terlupakan"}
{"seharusnya kau berada disisiku,,mengusir sepi yang menyelimutiku"}
{"penyesalan memang slalu menakutkan,tapi itu kenyataan"}
{"ku hanya ingin menjadi matahari yang slalu menghangatkan hari2mu"}
{"berbahagialah,"}
{"kau ada tak ku anggap,,dan kini ku sadari setelah kau pergi,,kau begitu berarti bagiku"}
{"jangan mudah percaya dengan sesuatu yg blum tentu benar,,,carilah terlebih dahulu kebenrannya,,,"}
{"terbayang slalu,,masa lalu yang silam,,yang penuh penderitaan"}
{"baikk dan buruk kelakuan kita,,suatu saat kita juga yg terima akibatnya"}
{"mungkin di matamu,,aku tak pantas untuk dirimu"}
{"bila dya jodohku,,satukanlah,,,bila bukan,,,jauhkan dya dari pikiranku"}
{"apa sebenarnya yg ada dibenakku,,yg menjadi impian"}
{"tak ada yang tak mungkin,,,tetap optimis,,masalah pasti bisa terselesaikan"}
{"akhir dri sebuah cerita yg menyakitkan"}
{"kehidupan memang keras..perlu perjuangan penuh mencapai makna hdup yg sesungguhnya"}
{"ketika smua tlah dah berakhir..masi sja ada permaslahan yg tmbul..antara penyeselan,kekesalan,kekecewaan yg membuat terjdinya pertikaian yg tak berkesudahan"}
{"kepandaian digunakan untuk hal yg slah demi ego..sma aja dgn blajar menjadi org yg bdoh"}
{"masih tdk mengerti arti hidup yg sesungguhnya"}
{"cahaya matamu menghiasi seluruh hatiku"}
{"I Miss You 4ever"}
{"aku masih menunggumu sampai akhir waktuku"}
{"masihkah ku bisa terus tertawa terbahak ???"}
{"Bersabar dan mengalah,langkah yg terbaik..buat menciptakan perdamaian"}
{"Sdar akan prilaku yg bruk di masa lalu..jadikanlah suatu pengalaman yg berharga"}
{"Let me free..to take the choice..thanx"}
{"Terjadi ksalahan dalam penyampaian pesan..dgn cra yg slah,berakibat kacau"}
{"berusaha keras untuk hasil yg lebih,,namun,di saat hasil telah di gapai,,lupa akan hal yg di inginkan karena kesenangan sesaat"}
{"kadang jalan yang terbaik membuat seseorang merasa tersakiti,,hanya waktu yg bisa menyelesaikan sebuah masalah"}
{"kesabaran dan kemapuan orang ada batasnya,,ng ada yang sempurna"}
{"presence has now graced my dreams, when I opened my eyes from my sleep and wish you were by my side, but it was a dream that has not been achieved"}
{"maybe I'm not the best, but I will do my best for you"}
{"can only wait and hope that all can become better, more, amien"}
{"hanya berusaha melakukan yang terbaik tanpa takut akan datang kegagalan,,terus berjuang"}
{"memulai langkah baru
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir."}
{"ku coba terus melangkah ntuk melupakanmu,,membuang semua bayang2mu yang slalu menggangu pikiranku"}
{"semua takkan berubah,,inilah jalan hidupku aku yang jalanin aku pula yang rasakan"}
{"don't disturb me n' don't make me destroy"}
{"ku ingin terbang tinggi melayang ntuk tinggalkan semua kebisingan yg ada"}
{"jangan dengar sebelah telinga,jangan melihat sebelah mata,lihat bukti nyata"}
}
if {![string match "*time_speaks*" [timers]]} {
utimer $speaks_time time_speaks
}
proc time_speaks {} {
global speaks_msg speaks_chans speaks_time
if {$speaks_chans == "*"} {
set speaks_temp [channels]
} else {
set speaks_temp $speaks_chans
}
foreach chan $speaks_temp {
set speaks_rmsg [lindex $speaks_msg [rand [llength $speaks_msg]]]
foreach msgline $speaks_rmsg {
puthelp "PRIVMSG $chan :[subst $msgline]"
}
}
if {![string match "*time_speaks*" [timers]]} {
utimer $speaks_time time_speaks
}
}
##------------------------------------------------------------------------
## *** E N D OF ENT3.1.TCL ***
## -----------------------------------------------------------------------