putlog "## ..:: Initializing bulan Addon TCL ::... ##"
# Set Channel
set bulan_chan "*"
set master 1
# Set respon, baris pertama direspon oleh baris selanjutnya
set bulan {
{
"!bulan" {
"4$nick 7: 6Gunakan Perintah 1!14bulan (Nama Bulan)"
}
}
{
"!Hari" {
"4$nick 7: 6Gunakan Perintah 1!14Hari (Nama Hari)"
}
}
{
"!bulan Januari*" {
"4$nick, 7(6Bulan Januari7) 14Mempunyai Watak: Tenang dan berwibawa - Suka berterus terang dan tidak suka basa-basi - Pandai menyimpan rahasia dan bisa dipercaya - Disukai banyak orang karena selalu kelihatan ceria - Mandiri dan tidak suka meminta bantuan pada orang lain - Pandai mengatur keuangan - Agak pendiam dan lebih senang memperhatikan dirinya sendiri - Teliti dan tidak sembarangan melakukan pekerjaan."
}
}
{
"!bulan Februari*" {
"4$nick, 7(6Bulan Februari7) 14Mempunyai Watak: Mempunyai hati yang tulus - Perasaannya peka dan mudah tersinggung - Senang dipuji dan selalu - Menuruti apa yang diinginkannya - Suka humor dan hormat pada siapa saja - Keras hati dan mempunyai pendirian tetap - Agak pemalas dan suka mengingkari janji."
}
}
{
"!bulan Maret*" {
"4$nick, 7(6Bulan Maret7) 14Mempunyai Watak: Baik hati dan suka menolong sesama - Suka kehidupan yang serba wah - Seleranya tinggi - Tidak tegaan dan selalu memberi pada orang yang kesusahan - Agak pemalu, namun jujur dan tidak pernah bohong - Mudah terpengaruh dan tidak kuat menghadapi godaan - Suka melalaikan kesehatan dirinya sendiri."
}
}
{
"!bulan April*" {
"4$nick, 7(6Bulan ApriL7) 14Mempunyai Watak: Tidak mau mengalah dan selalu ingin menang sendiri - Pembosan - Senang dipuji - Agak boros walau pandai mencari uang - Mempunyai otak yang cerdas namun tidak suka diperintah - Tak pernah memilih dalam berteman."
}
}
{
"!bulan Mei*" {
"4$nick, 7(6Bulan MeI7) 14Mempunyai Watak: Pandai menguasai perasaan - Pandai mengambil hati orang lain - Punya selera tinggi dan senang kehidupan yang serbah wah - Senang menunda pekerjaan - Agak boros walau rejekinya bagus - Tidak suka basa-basi dan tidak senang dipuji."
}
}
{
"!bulan Juni*" {
"4$nick, 7(6Bulan JuNi7) 14Mempunyau WaTaK: Romantis dan suka menolong - Tidak mempunyai pendirian tetap - Suka berpikir yang muluk-muluk - Mudah tersinggung bila perasaanya tersentuh - Agak pemalas dan baru mau bekerja bila di iming-iming hasil besar - Selalu ceria walau hatinya sedang kesal."
}
}
{
"!bulan JuLi*" {
"4$nick, 7(6Bulan JuLi7) 14Mempunyai WaTaK: Senang berkhayal - Kalau sudah marah, kata-katanya tajam - Tidak mempunyai pendirian tetap#Senang dipuji - Suka menolong pada sesama - Pandai bicara dan berotak cerdas - Agak pemalas."
}
}
{
"!bulan AgusTuS*" {
"4$nick, 7(6Bulan AgUsTuS7) 14Mempunyai WaTaK Mempunyai perasaan yang peka/halus - Cepat tersinggung - Suka menghayal dan berpikiran yang muluk-muluk - Tidak mudah terpengaruh@Agak pemalas - Kalau bekerja lebih menuruti kehendak hatinya sendiri."
}
}
{
"!bulan SeptemBeR*" {
"4$nick, 7(6Bulan SeptemBeR7) 14Mempunyai WaTaK: Mudah tersinggung dan cepat naik darah - Baik hati dan jujur - Bisa menyimpan rahasia - Suka berfoya-foya - Pandai menyimpan uang namun tidak pelit - Suka menolong sesama dan pandai mendidik anak."
}
}
{
"!bulan oktober*" {
"4$nick, 7(6Bulan OkToBeR7) 14Mempunyai WaTaK: Berjiwa besar dan mau mengalah!Pandai bicara - Cerdas dan baik hati-Memiliki tekad yang kuat - Tidak sabaran dan agak boros - Pikirannya tidak tetap dan selalu berubah-ubah."
}
}
{
"!bulan NoVemBeR*" {
"4$nick, 7(6Bulan NoVemBer7) 14MempUnyai WaTaK: Tabah dan kuat dalam menghadapi segala cobaan - Pandai mengerjakan setiap pekerjaan - Pandai mengambil hati orang lain - Agak pemalas dan suka menunda pekerjaan - Banyak berpikir - Agak pendendam dan tidak mudah memberi maaf pada orang yang bersalah - Keras hati."
}
}
{
"!bulan DesemBeR*" {
"4$nick, 7(6Bulan DeSemBer7) 14Mempunyai WaTaK: Mudah menaruh rasa percaya pada orang lain - Kalau mengerjakan sesuatu suka tergesa-gesa - Tidak sabaran - Tidak mau mengalah dan selalu ingin menang sendiri - Mudah terpengaruh - Jujur dan baik hati - Pemborosan dan suka memaksakan kehendak."
}
}
{
"!hari Minggu" {
"4$nick, 7(6Watak Minggu7) 14Pandai bergaul, disukai orang banyak, berjiwa besar, suka merendahkan diri, pandai berbicara dan dapat mengatasi masalah yang dihadapiya dengan baik."
}
}
{
"!hari Senin" {
"4$nick, 7(6Watak Senin7) 14Tidak pelit, ikhlas hati dalam memberi, tidak bisa menyimpan uang, senang membela kebenaran, mudah tersinggung dan tidak pandai bicara."
}
}
{
"!hari Selasa" {
"4$nick, 7(6Watak Selasa7) 14Mudah terpengaruh, tidak mempunyai pendirian tetap, gampang naik darah, tidak sabaran dan selalu mau menang sendiri."
}
}
{
"!hari Rabu" {
"4$nick, 7(6Watak Rabu7) 14Pendiam namun kalau sudah bicara tidak terduga, tidak suka mencampuri urusan orang lain, baik hati, suka menolong dan banyak rejeki."
}
}
{
"!hari Kamis" {
"4$nick, 7(6Watak Kamis7) 14Pendiriannya tidak tetap, suka dipuji, mudah emosi, mudah terbujuk oleh rayuan halus dan tidak sabaran."
}
}
{
"!hari Jum'at" {
"4$nick, 7(6Watak Jum'at7) 14Disukai orang banyak, kuat mental, suka menolong, suka memberi nasehat yang baik dan suka mempelajari ilmu pengetahuan"
}
}
{
"!hari Sabtu" {
"4$nick, 7(6Watak Sabtu7) 14Giat bekerja, rajin pandai mencari rejeki, ditakuti orang banyak, pandai menempatkan diri dan bisa menyelesaikan apa yang menjadi tanggung jawabnya dengan baik."
}
}
{
"!mutiara" {
"4$nick14 : Agama tanpa ilmu adalah buta. Ilmu tanpa agama adalah lumpuh (Albert Einstein)"
"4$nick14 : Hidup biar beradab, bukan hidup untuk biadap (Al-Ghazali Bayruni)"
"4$nick14 : Orang yang berjaya dalam hidup adalah orang yang nampak tujuannya dengan jelas dan menjurus kepadanya tanpa menyimpang (Cecil B. DeMille)"
"4$nick14 : Semulia-mulia manusia ialah siapa yang mempunyai adab, merendahkan diri ketika berkedudukan tinggi,memaafkan ketika berdaya membalas dan bersikap adil ketika kuat (Khalifah Abdul Malik bin Marwan)"
"4$nick14 : Life Is Choice, So Don`t Wasted Away (John F Kennedy)"
"4$nick14 : Cakap sahabat yang jujur lebih besar harganya daripada harta benda yg diwarisi dari nenek moyang (Saidina Ali)"
"4$nick14 : Selemah-lemah manusia ialah orang yg tak boleh mencari sahabat dan orang yang lebih lemah dari itu ialah orang yg mensia-siakan sahabat yg telah dicari (Saidina Ali)"
"4$nick14 : Keberanian yang sebenar ibarat layang-layang. Sentakan angin yang menentangnya bukan melemparkannya ke bawah, sebaliknya menaikkannya (John Petitsenn)"
"4$nick14 : Kurang semangat mengakibatkan lebih banyak kegagalan berbanding kurangnya kebijaksanaan atau kemahiran (Flower A. Newhouse)"
"4$nick14 : Manusia tidak merancang untuk gagal, mereka gagal untuk merancang (William J. Siegel)"
"4$nick14 : Sesiapa yang tidak berfikir panjang, kesusahan telah bersedia di mukanya (Khong Hu Cu)"
"4$nick14 : Jagalah dirimu baik-baik, usahakanlah kemuliaannya, kerana engkau dipandang manusia bukan kerana rupa tetapi kesempurnaan budi dan adab (Nabi Muhammad SAW)"
"4$nick14 : Anda mungkin ditipu jika terlalu mempercayai tetapi hidup anda akan terseksa jika tidak cukup mempercayai (Frank Crane)"
"4$nick14 : jika anda bekerja semata-mata untuk uang, anda tidak akan menjadi kaya kerananya. Tetapi jika anda menyintai pekerjaan yang anda lakukan itu, kejayaan akan menjadi milik anda (Ray Kroc - Pendiri McDonalds)"
"4$nick14 : Makin banyak pilihan, makin sulit kita memilih (Abbe D`allaival)"
"4$nick14 : Perang adalah ilmu penghancuran (Abbott)"
"4$nick14 : Sabar itu adalah ibu dari segala akhlak (Syekh Mohammad Abduh)"
"4$nick14 : Orang yang tak merasa bahagia dengan yang sedikit, selamanya tidak pernah menemui kebahagiaan (Abikors)"
"4$nick14 : Orang yang cinta kemewahan dunia, itulah orang yang penakut; tidak berani menegakkan kebenaran yang diridhai 4JJI (Abu Hanifah )"
"4$nick14 : Moralitas adalah suatu kemewahan pribadi yang sangat mahal (Henry Brooks Adams)"
"4$nick14 : Kemurahan hati adalah kesempurnaan dan hiasan agama (Joseph Addison)"
"4$nick14 : Tiada sesuatu kebajikan yang sedemikian agungnya dan mencerminkan sinar ketuhanan, kecuali keadilan (Joseph Addison)"
"4$nick14 : Barangsiapa yang mempunyai kepercayaan yang tak tergoncangkan terhadap 4JJI, adalah kuat sekali dalam kekuasaannya, pandai karena bijaksanaannya, beruntung karena kebahagiannya (Joseph Addison) "
"4$nick14 : Pemujaan adalah gairah yang pendek usianya, yang segera akan rapuh setelah akrab dengan yang bersangkutan (Joseph Addison)"
"4$nick14 : Buku adalah warisan berharga yang ditinggalkan oleh kaum genius kepada kemanusiaan, dan diberikan turun-temurun kepada anak cucu yang merupakan hadiah pula bagi mereka yang belum dilahirkan (Joseph Addison)"
"4$nick14 : Mata yang merah membuat kecantikan jadi berkurang (Joseph Addison) "
"4$nick14 : Iman tetap hidup dalam diri kita dan makin kuat, lebih-lebih dikarenakan oleh praktek daripada perhitungan (Joseph Addison)"
"4$nick14 : Hadapilah jiwamu dan sempurnakanlah keutamaan-keutamaanmu, karena engkau di sebut seorang insan, bukan lantaran tubuhmu, tetapi lantaran jiwamu (Joseph Addison)"
"4$nick14 : Tiada ada ekstrim tajam yang bisa bertahan; yang sedang, biasanya bisa berdiri aman tenteram (Joseph Addison)"
"4$nick14 : Orang yang berusaha sungguh-sungguh, 4JJI akan meminjamkan tangan penolong-Nya (Aeschylus)"
"4$nick14 : Sekiranya angkatan muda tidak dipersenjatai dengan jiwa agama, akan hancurlah akhlak angkatan dan bangsanya (Haji Agus Salim)"
"4$nick14 : Mempunyai uang adalah baik, tetapi lebih baik lagi ialah mempunyai sesuatu yang tidak dapat diperoleh dengan uang (Haji Agus Salim)"
"4$nick14 : Barangsiapa yang ingin memetik padi yang bagus, hendaklah menaburkan benih yang bagus pula (Haji Agus Salim)"
"4$nick14 : Kepercayaan adalah percaya pada apa yang kita lihat, dan hadiahnya ialah melihat apa yang kita percayai (St Agustin)"
"4$nick14 : Yang tak cemburu, tak cinta (St Agustin)"
"4$nick14 : Keinginan adalah seperti api, makin di beri kayu makin besar nyalanya (St Agustin)"
"4$nick14 : Bijaksana adalah pangkal dari persahabatan yang kekal (St Agustin)"
"4$nick14 : Berbahagialah orang yang terlalu sibuk untuk merasa cemas di waktu siang, dan terlalu mengantuk untuk cemas di waktu malam (Aikman)"
"4$nick14 : Orang jadi mulia bukan karena keturunannya, melainkan karena perbuatannya (Zone Albert)"
"4$nick14 : Jika ada kemauan, tak ada yang mustahil (Aleksander Agung)"
"4$nick14 : Karena saya tak pernah ragu-ragu, maka saya memperoleh kemenangan-kemenangan hebat (Aleksander Agung)"
"4$nick14 : Seringkali ujian bagi keberanian bukanlah berani mati, tetapi berani hidup (Vittorio Alfieri)"
"4$nick14 : Bila semua laki - laki tahu semua pikiran wanita, maka mereka akan menjadi dua puluh kali lebih berani (Alfonso Karr)"
"4$nick14 : Orang yang cuma berfikir untuk kepentingan perutnya maka harga dirinya serupa dengan apa yang keluar dari isi perutnya (Ali Bin Abu Thalib)"
"4$nick14 : Kesempatan, datangnya seperti awan berlalu; oleh karena itu pergunakanlah selagi ia tampak didepanmu (Ali Bin Abu Thalib)"
"4$nick14 : Perhatikan apa yang dikatakan seseorang, dan jangan memperhatikan siapa yang mengatakan (Ali Bin Abu Thalib)"
"4$nick14 : Kemuliaan itu dicapai dengan akal dan adab, bukan dengan asal dan bangsa suku/kabilah (Ali Bin Abu Thalib)"
"4$nick14 : Kemauanlah yang menjadikan orang - orang besar dalam sejarah (Takdir Alisyahbana)"
"4$nick14 : Jangan mencoba membuktikan kepada seseorang bahwa ia salah, tetapi cobalah buktikan kepadanya bagaimana kesalahan itu dapat dihindarkan (Takdir Alisyahbana)"
"4$nick14 : Kalau tak ada tiga perkara, rusak binasalah dunia ini, karena kalau tidak ada syahwat, putuslah keturunan; kalau tak ada keinginan mengmpulkan, binasalah penghidupan dan kalau tak ada keinginan terkemuka, lenyaplah ilmu pengetahuan (Al Ma`mun)"
"4$nick14 : Cinta dapat meluruskan watak yang bengkok dan menghidupkan yang mati dalam jiwa orang yang mencintainya (Al Manfaluthi)"
"4$nick14 : Emasmu ialah hatimu, dan perakmu ialah kata-katamu (Ambrosius)"
"4$nick14 : Perkara yang paling sedikit di dunia ini ialah mendengar dan memahami apa yang anda dengar (Anastas)"
"4$nick14 : Kamatangan, adalah jenis individu yang dapat menerima orang lain menurut keadaan orang itu dan bukan menurut apa yang kelihatan (Anastas)"
"4$nick14 : Seperti halnya karat menggerogoti besi, demikian pula iri hati menggerogoti manusia (Anisthenes)"
"4$nick14 : Seorang optimis melihat kesempatan dalam setiap malapetaka, seorang pesimis melihat malapetaka dalam setiap kesempatan (Anom)"
"4$nick14 : Kemustahilan - kemustahilan yang masuk akal selalu lebih baik daripada kemungkinan - kemungkinan yang tak meyakinkan (Aristoteles)"
"4$nick14 : Bahagia itu adalah sesuatu kesenangan yang dicapai oleh tiap manusia menurut kehendaknya masig - masing (Aristoteles)"
"4$nick14 : Budi yang di beli dengan pengalaman adalah sangat tinggi nilainya (Roger Ascam)"
"4$nick14 : Cinta adalah api yang dingin; siapa yang mendekatinya tidak akan terbakar tetapi tertangkap (Awem?)"
"4$nick14 : Orang yang bijaksana akan membuat kesempatan lebih banyak, daripada yang dijumpainya (Francis Bacon)"
"4$nick14 : Falsafah yang dangkal menyebabkan manusia cenderung pada atheisme, tetapi jika di gali sedalam - dalamnya, membimbing alam pikiran manusia kepada keimanan agama (Francis Bacon)"
"4$nick14 : Kepercayaan yang kuat, menguasai orang - orang yang kuat dan kemudian menjadikan mereka lebih kuat (Walter Bagehot)"
"4$nick14 : Kegembiraan yang paling manis dan kesedihan yang paling pahit ialah cinta (Baily)"
"4$nick14 : Panggilan batin seni, bukan meniru - niru alam, tetapi melukiskan alam itu (Honore de Balzac)"
"4$nick14 : Cinta itu puisi untuk panca indera (Honore de Balzac)"
"4$nick14 : Hidup batin, hidup rohani, harapan, kebahagian dan kasih adalah kekayaan - kekayaan sejati (Beecher)"
"4$nick14 : Hati wanita hanya mengenal satu kebahagiaan di dunia, yaitu : mencintai dan di cintai (M Beer)"
"4$nick14 : Orang yang bijaksana, berfikir sekali sebelum berbicara dua kali (Robert Benchley)"
"4$nick14 : Ingatlah bahwa apa yang hari ini tak mau anda mulai mengerjakannya, besok pun belum tentu anda mau mengerjakannya (Bennin)"
"4$nick14 : Sejarah adalah seni yang tidak boleh mengabaikan fakta - fakta yang diketahui orang (Bernard Berenson)"
"4$nick14 : Sesudah kata mencintai, menolong adalah kata - kata yang terindah di dunia (Bertha Von Sttner Baronne)"
"4$nick14 : Modal paling berharga ialah seorang isteri yang cerdas (Henry Besemer)"
"4$nick14 : Dua kepala tentu lebih baik daripada satu kapala (Henry Besemer)"
"4$nick14 : Lelaki yang paling bahagia ialah yang beristerikan seorang wanita yang baik (Billings)"
"4$nick14 : Suatu kegagalan, tak lain hanya menunjukkan bahwa kemauan kita untuk mencapai sukses tidak cukup kuat (Bovee)"
"4$nick14 : Jika segala sesuatu hilang, masih ada masa depan (Bovee)"
"4$nick14 : Bedanya yang tabah dan yang pengecut bukan karena yang tabah kurang takut, tetapi karena ia bisa mengendalikan dan menguasai rasa takut itu (WJ Brown)"
"4$nick14 : Bahwa sakaratul maut yang paling hebat terjadi dalam hati mereka yang masih hidup, dan bukan pada orang - orang yang akan meninggal (WJ Brown)"
"4$nick14 : Kita sendiri tak tahu apa yang baik bagi kita; kita memandang kehidupan ini sebagai lukisan yang belum selesai dan mengerti apa artinya (WJ Brown)"
"4$nick14 : Siapa yang ingin sukses dalam kehidupan, hendaknya jangan mengandalkan kepada hal - hal kebetulan (WJ Brown)"
}
}
}
bind pubm - * pub_bulan
if {$master==1} {
}
proc pub_bulan {nick uhost hand chan arg} {
global bulan bulan_chan botnick
if {(([lsearch -exact [string tolower $bulan_chan] [string tolower $chan]] != -1) || ($bulan_chan == "*")) && (![matchattr $hand b]) && ($nick != $botnick)} {
foreach i $bulan {
if {[string match [string tolower [lindex $i 0]] [string tolower $arg]]} {
putserv "PRIVMSG $chan :[subst [lindex [lindex $i 1] [rand [llength [lindex $i 1]]]]]"
}
}
}
}
putlog "*** bulan Addon TCL edited by dede Loaded!"
Sunday, August 28, 2011
bulan.tcl
Labels:
tCL
Subscribe to:
Post Comments (Atom)
No comments:
Post a Comment