Wednesday, February 28, 2007
Media Convert Online
Media-Convert is 100% free. No software is needed, and you don't have to register. You only need your favorite Internet browser.
Add-ins for MS-Excell
There are five add-ins for Microsoft Excel that can be downloaded from this website:
1. PowerEdit (new)
Provides additional copy and paste functionality to excel.
2. Formula Mapper
Graphical representation of formula relationships
3. Password Remover
Removes worksheet passwords and workbook passwords from Microsoft Excel workbooks.
4. Formula Indenter
Allows formulae to be viewed as little discrete pieces of program code by indenting the
formulae using programmer like indentation conventions.
5. Name Box Extender
Increases the width of the ‘name’ drop down box
1. PowerEdit (new)
Provides additional copy and paste functionality to excel.
2. Formula Mapper
Graphical representation of formula relationships
3. Password Remover
Removes worksheet passwords and workbook passwords from Microsoft Excel workbooks.
4. Formula Indenter
Allows formulae to be viewed as little discrete pieces of program code by indenting the
formulae using programmer like indentation conventions.
5. Name Box Extender
Increases the width of the ‘name’ drop down box
Excel Invoice Manager
Excel Invoice Manager is an electronic invoice software and billing software based on Excel templates and add-in. By seamlessly integrated with Microsoft Excel and utilizing backend databases, it provides you with a powerful, easy-to-use and highly-customizable invoicing and billing system, saving your time and money - taking the hard work out of invoicing!
ExTools free Microsoft Excel add-in
ExTools is a free add-in software program for Microsoft Excel (Windows). It is designed to make your work with Excel more productive as it provides many features that make spreadsheet editing much easier.
Features:
Many tools and utilites that add power to Excel. They can be accessed from the ExTools menu and also the worksheet pop-up menu.
"Undo" function is provided for many of the tools. (This feature is NOT available for any other FREE Excel add-in programs)
Extools is made up of many tools. No unnecessary tools are loaded during Excel startup, therefore speeding the startup process. During working, Extools will automatically manage its own memory usage. You do not need to manually unload any tools, it will be handled transparently in the background.
Extools is designed for Excel 97, 2000, 2002, 2003 and 2007.
Some tools and utilities included in ExTools:
Text edit tool - Change case, Insert, Trim, Remove, Combine
Worksheet - Compare worksheets, Create Worksheet Map and more
Unit Converter - Area, Length, Speed, Temperature, Volume, Weight and more
Numbers - Math calculation on selection, Convert number types and more
Check for duplicates
Multiple selection copy
Favorite Text Clips
Clear recently used files list
Save Selection as File or Picture
More than 60 tools tota
Sponge Bob Screen Toy
It features three characters from the TV-cartoon-show 'Sponge Bob': Sponge Bob, Squidward and Patrick. Their behaviour can be configured to either follow one of the other characters or the mouse pointer, or to run away from one of the others or the mouse pointer.
Tuesday, February 27, 2007
Peraturan Baru !!!!
PERATURAN MENTERI KEUANGAN
NOMOR 145/PMK.04/2006
TENTANG
PERUBAHAN ATAS KEPUTUSAN MENTERI KEUANGAN NOMOR 84/KMK.04/2003
TENTANG TATALAKSANA PEMBAYARAN DAN PENYETORAN PENERIMAAN NEGARA
DALAM RANGKA IMPOR DAN PENERIMAAN NEGARA ATAS BARANG KENA CUKAI
BUATAN DALAM NEGERI
NOMOR 145/PMK.04/2006
TENTANG
PERUBAHAN ATAS KEPUTUSAN MENTERI KEUANGAN NOMOR 84/KMK.04/2003
TENTANG TATALAKSANA PEMBAYARAN DAN PENYETORAN PENERIMAAN NEGARA
DALAM RANGKA IMPOR DAN PENERIMAAN NEGARA ATAS BARANG KENA CUKAI
BUATAN DALAM NEGERI
MS Office to PDF Converter
Convert to PDF from any application by simply 'printing' to the PrimoPDF® printer - it couldn't be easier!
Within minutes, you can create high-quality PDFs by converting from Word, Excel, PowerPoint, and virtually any other printable file type.
Within minutes, you can create high-quality PDFs by converting from Word, Excel, PowerPoint, and virtually any other printable file type.
Jus Korma - !!! ^_^
Salam sehat,
Menurut dokter spesialis penyakit dalam yang berpengalamanmenangani pasien demam berdarah, DBD belum ada obatnya. Yang merekalakukan adalah mengembalikan keseimbangan cairan tubuh pasien denganinfus cairan. Keterangan ini sama dengan keterangan yang saya copypaste dari Kompas sbb.
"Situs resmi Organisasi Kesehatan Dunia (WHO) menyebutkan belum adaobat untuk penyakit ini. Namun, disebutkan dalam situs tersebutbahwa perawatan oleh dokter di rumah sakit seringkali menyelamatkannyawa pasien. Menjaga asupan cairan adalah tindakan utama dalamperawatan pasien demam berdarah.
Kekurangan cairan dan elektrolit, kata Dr. Handrawan, bisamenyebabkan pasien demam berdarah meninggal dunia. Ciri-ciri pasiendemam berdarah yang sudah kekurangan cairan adalah sudah lama tidakbuang air kecil, kulit kering tak berkeringat, jika dicubit kulittampak mengeriput dan tidak kembali lagi, kelopak mata cekung, padaanak-anak ubun-ubun cekung, bibir kering, tampak kehausan dangelisah.
"Jadi jus kurma hanyalah cara untuk memasukkan banyak cairan ke dalamtubuh. Rasa manisnya akan membuat pasien ketagihan dan ingin minumlagi dan lagi, sehingga bisa minum cairan lebih banyak. Selain itu,kurma kaya mineral elektrolit yang banyak terbuang akibat DBD,terutama kalium.
Namun bahayanya bila pasien DBD adalah pengidap diabetes. SebelumDBD-nya teratasi, jangan-jangan kadar gula darahnya sudah keburumelonjak! Menurut saya, lebih baik melakukan pertolongan pertamadengan memberinya banyak jus buah segar (diproses menggunakan juiceextractor) atau jus jeruk manis sering-sering yang diminum setegukdemi seteguk. Jadi, tidak terbatas hanya berupa jus hambu bijiseperti yang selama ini banyak diyakini. Cara ini kami lakukanterhadap anak kami ketika mengidap DBD (setelah hasil lab positifDBD) tetapi harus menunggu 2 hari untuk masuk RS karena RS sedangpenuh.
Namun ada cara yang secara ilmiah sudah terbukti secara empirikmaupun riset. Silakan baca pesan saya berikutnya.
Terima kasih dan banyak salam:
Subject: Jus Korma -
SEHUBUNGAN dengan masih banyaknya telefon pada kami, baik yangmengucapkan > terima kasih atas kesembuhannya, maupun yang bertanyaperihal cara > pembuatan jus korma untuk penyembuhan demam berdarah,maka pada kesempatan > ini kami menerangkan tata cara dan takarannyasebagai berikut:
>>> Untuk yang telah positif DBD menurut dokter, ambil 500 gramkorma, buang > bijinya lalu diblender dicampur dengan 5 gelas air,sampai lembut. Kemudian > minumkan pada penderita setiap jam, satugelas sampai habis. Insya Allah > dengan habisnya jus korma tadi,trombosit penderita normal kembali.
>>> Itu yang terjadi pada 7 orang keluarga kami dan juga puluhanorang yang > mengucapkan terima kasih pada kami setelah pemuatanpertama di "PR" pada > tanggal 25 Januari lalu dari ratusan yangtelefon.
>>> Juga alhamdulillah kami telah mengetahui kandungan yang ada padasetiap 100 > gram korma. Agar yang lebih berkompeten dapatmempelajari mengapa jus korma > mujarab untuk mengobati demamberdarah, yaitu mineral (calsicum 52mg, iron > 1,2 mg, magnisium 50mg, phosphorus 60 mg, patassium 667 mg. sodium 13 mg, > choride 271mg, sulphur 14,7 mg, manganese 4,9 mg, copper 2,4 mg, zinc 1,2> mg, cobalt 1,9 mg).
>>> Vitamin: vitamin A 90 IU, Tharmin B1 93 mg, Ripovlavine B2 144mg, Biotin > 4,4 microgram, Folio Acid 5,4 microgram, Niacin 2,0 mg,Ascorbic Acid 6,1 > mg, Glucose 38,5 gms, Fructose 35,5 gms, OtherSugars 3,4 gms, Protein 2,35 > gms, Fat 0,43 gms. Energi 323 cal.
Demikian yang tertulis dalam jus korma.
Menurut dokter spesialis penyakit dalam yang berpengalamanmenangani pasien demam berdarah, DBD belum ada obatnya. Yang merekalakukan adalah mengembalikan keseimbangan cairan tubuh pasien denganinfus cairan. Keterangan ini sama dengan keterangan yang saya copypaste dari Kompas sbb.
"Situs resmi Organisasi Kesehatan Dunia (WHO) menyebutkan belum adaobat untuk penyakit ini. Namun, disebutkan dalam situs tersebutbahwa perawatan oleh dokter di rumah sakit seringkali menyelamatkannyawa pasien. Menjaga asupan cairan adalah tindakan utama dalamperawatan pasien demam berdarah.
Kekurangan cairan dan elektrolit, kata Dr. Handrawan, bisamenyebabkan pasien demam berdarah meninggal dunia. Ciri-ciri pasiendemam berdarah yang sudah kekurangan cairan adalah sudah lama tidakbuang air kecil, kulit kering tak berkeringat, jika dicubit kulittampak mengeriput dan tidak kembali lagi, kelopak mata cekung, padaanak-anak ubun-ubun cekung, bibir kering, tampak kehausan dangelisah.
"Jadi jus kurma hanyalah cara untuk memasukkan banyak cairan ke dalamtubuh. Rasa manisnya akan membuat pasien ketagihan dan ingin minumlagi dan lagi, sehingga bisa minum cairan lebih banyak. Selain itu,kurma kaya mineral elektrolit yang banyak terbuang akibat DBD,terutama kalium.
Namun bahayanya bila pasien DBD adalah pengidap diabetes. SebelumDBD-nya teratasi, jangan-jangan kadar gula darahnya sudah keburumelonjak! Menurut saya, lebih baik melakukan pertolongan pertamadengan memberinya banyak jus buah segar (diproses menggunakan juiceextractor) atau jus jeruk manis sering-sering yang diminum setegukdemi seteguk. Jadi, tidak terbatas hanya berupa jus hambu bijiseperti yang selama ini banyak diyakini. Cara ini kami lakukanterhadap anak kami ketika mengidap DBD (setelah hasil lab positifDBD) tetapi harus menunggu 2 hari untuk masuk RS karena RS sedangpenuh.
Namun ada cara yang secara ilmiah sudah terbukti secara empirikmaupun riset. Silakan baca pesan saya berikutnya.
Terima kasih dan banyak salam:
Subject: Jus Korma -
SEHUBUNGAN dengan masih banyaknya telefon pada kami, baik yangmengucapkan > terima kasih atas kesembuhannya, maupun yang bertanyaperihal cara > pembuatan jus korma untuk penyembuhan demam berdarah,maka pada kesempatan > ini kami menerangkan tata cara dan takarannyasebagai berikut:
>>> Untuk yang telah positif DBD menurut dokter, ambil 500 gramkorma, buang > bijinya lalu diblender dicampur dengan 5 gelas air,sampai lembut. Kemudian > minumkan pada penderita setiap jam, satugelas sampai habis. Insya Allah > dengan habisnya jus korma tadi,trombosit penderita normal kembali.
>>> Itu yang terjadi pada 7 orang keluarga kami dan juga puluhanorang yang > mengucapkan terima kasih pada kami setelah pemuatanpertama di "PR" pada > tanggal 25 Januari lalu dari ratusan yangtelefon.
>>> Juga alhamdulillah kami telah mengetahui kandungan yang ada padasetiap 100 > gram korma. Agar yang lebih berkompeten dapatmempelajari mengapa jus korma > mujarab untuk mengobati demamberdarah, yaitu mineral (calsicum 52mg, iron > 1,2 mg, magnisium 50mg, phosphorus 60 mg, patassium 667 mg. sodium 13 mg, > choride 271mg, sulphur 14,7 mg, manganese 4,9 mg, copper 2,4 mg, zinc 1,2> mg, cobalt 1,9 mg).
>>> Vitamin: vitamin A 90 IU, Tharmin B1 93 mg, Ripovlavine B2 144mg, Biotin > 4,4 microgram, Folio Acid 5,4 microgram, Niacin 2,0 mg,Ascorbic Acid 6,1 > mg, Glucose 38,5 gms, Fructose 35,5 gms, OtherSugars 3,4 gms, Protein 2,35 > gms, Fat 0,43 gms. Energi 323 cal.
Demikian yang tertulis dalam jus korma.
Warung Kopi Ceria
Oleh: Agussyafii
Setiap bepergian jika belum sarapan pagi saya selalu menyempatkan diri untukmampir ke warung sekedar mencari pengganjal perut. Pagi itu saya mampir kewaarung kopi, terlihat gorengan dan ketan. Sambil menunggu kendaraan sayasempat berbincang dengan ibu penjaga warung kopi. "Ibu ini keliatan selaluceria. Gimana sih biar selalu ceria?"
"Hidup ini sudah susah, kenapa mesti dibuat susah. Ya harus ceria selalu tomas..mas ini ada-ada saja pertanyaannya.."katanya sambil terkekeh sendiri.Melihat ketawa ibu penjaga warung kopi hidup menjadi terasa indah pagi inibiarpun sarapan pagi cuman dengan gorengan dan ketan. Ayo siapa mau?Wassalam.
Setiap bepergian jika belum sarapan pagi saya selalu menyempatkan diri untukmampir ke warung sekedar mencari pengganjal perut. Pagi itu saya mampir kewaarung kopi, terlihat gorengan dan ketan. Sambil menunggu kendaraan sayasempat berbincang dengan ibu penjaga warung kopi. "Ibu ini keliatan selaluceria. Gimana sih biar selalu ceria?"
"Hidup ini sudah susah, kenapa mesti dibuat susah. Ya harus ceria selalu tomas..mas ini ada-ada saja pertanyaannya.."katanya sambil terkekeh sendiri.Melihat ketawa ibu penjaga warung kopi hidup menjadi terasa indah pagi inibiarpun sarapan pagi cuman dengan gorengan dan ketan. Ayo siapa mau?Wassalam.
Monday, February 26, 2007
ABC Kid Genius 2.08
Teach children the Alphabet,Numbers,Counting , Readingand Spelling using sound,pictures and video clips. Using the recognition method young children learn by watching auto rotating lessons. toddlers learn to use the keyboard.
Mp3 Doctor 5.11.055
MP3 Doctor is an editing tool that lets you check, modify, and improve all your MP3s and WAVs in several ways. You can repair imperfect songs or modify them with TRIM, EQUALIZE, RESAMPLE, and a very efficient and improved NORMALIZE MP3 - VOLUME NORMALIZERfeature, and more (stretch, pitch, mp3 to karaoke...). The goal is to let you maintain a similar quality, volume and sound on all your existing MP3s and discover a new quality for you mp3 files.In addition, it comes with encode and decode options (MP3 to WAV / WAV to MP3). You can modify hundreds of files with one ** using 'Batch' mode or use 'Single' mode to process one file at time. In addition it can handle ID tags of MP3 files.Improve/Normalize ALL you mp3 collection with just one **!- Did your mp3 collection has different volumes or quality?- Mp3Doctor let you standardize the volume level (volume normalizer), sample rate, quality, etc. of ALL you mp3 collection with JUST ONE **.- Standarize all the mp3 that you has download from internet (Kazaa, WinMX, Morpheus, etc)- Optimize internally every file to get the best from it.- Let you normalize a song to avoid lower parts, now you can experience you music colletion at 100%- Trim (delete lead - ending silence) of your Mp3s.- Finally a complete MP3 NORMALIZE MP3 - TRIM - FIX TOOL
WinMPG Video Convert 6.6.1
WinMPG Video Convert is a complete solution for video file conversion.It supports convert AVI to Mpeg1, AVI to Mpeg2, AVI to DVD, AVI toVCD, AVI to SVCD. And also RMVB to MPEG-1,MPEG-2,VCD,DVD,SVCD,AVI. And all media file to DivX, RMVB, WMV. And all to AVI.WinMPG Video Convert supports almost all media file format, include AVI, Mpeg-1, Mpeg-2, Mpeg-4, VCD, SVCD, DVD, DivX, ASF, WMV, RMVB, RM, QuickTime MOV MP4,and Flash SWF. Preview support.WinMPG Video Convert functions:- Convert RMVB to MPEG-1,MPEG-2,VCD,DVD,SVCD,AVI- Convert AVI,ASF,MPEG1,VCD,WMV,RM,QuickTime MOV to RMVB- Convert ASF,MPEG-1,VCD,SVCD,WMV,RMVB,RM to WMV- Convert AVI to Standard MPEG-1- Convert AVI to MPEG-1 with VCD extensions(VCD).- Convert AVI to Standard MPEG-2- Convert AVI to MPEG-2 Super Video CD extensions(SVCD).- Convert AVI to MPEG-2 with DVD extensions(DVD).- Convert ASF,WMV,MPEG1,MPEG2,Divx(MPEG4) to AVI- Convert ASF,WMV,MPEG1,MPEG2,AVI to Divx(MPEG4)- Convert QuickTime MOV MP4 to AVI- Convert Flash SWF to AVI- Media file information display- All conversion support preview. WinMPG Video Convert only convert video file between different format, will not burn a VCD,SVCD or DVD.
Self Esteem, Self Confidence, Pride
Dua orang lelaki yang datang bertamu ke rumah seorang bijak tertegunkeheranan. Mereka melihat si orang bijak sedang bekerja keras. Ia mengangkut air dalam ember kemudian menyikat lantai rumahnya. Keringatnya derasbercucuran.
Menyaksikan keganjilan ini salah seorang lelaki ini bertanya,"Apakah yang sedang engkau lakukan hai orang bijak?"Orang bijak menjawab, "Tadi aku kedatangan serombongan tamu yang meminta nasihat kepadaku. Aku memberikan banyak nasihat yang sangat bermanfaat bagi mereka. Merekapun tampak puas dan bahagia mendengar semua perkataanku. Namun, setelah mereka pulang tiba-tiba aku merasa menjadi orang yang hebat.Kesombonganku mulai bermunculan. Karena itu, aku melakukan pekerjaan iniuntuk membunuh perasaan sombongku itu."
Para pembaca yang budiman, sombong adalah penyakit yang sering menghinggapi kita semua yang benih-benihnya sering muncul tanpa kita sadari. Di tingkat terbawah, sombong sering disebabkan karena faktor materi. Kita merasa lebih kaya, lebih cantik, dan lebih terhormat daripada orang lain.Di tingkat kedua, sombong sering disebabkan faktor kecerdasan. Kita merasa lebih pintar, lebih kompeten, lebih bijaksana dan lebih berwawasan dibandingkan orang lain.Di tingkat ketiga, sombong sering disebabkan faktor kebaikan. Kita seringkali menganggap diri kita lebih berakhlak, lebih bermoral, lebih pemurah, dan lebih tulus dibandingkan dengan orang lain.Yang menarik, semakin tinggi tingkat kesombongan ini, semakin sulit pula kita mendeteksinya. Sombong karena materi akan sangat mudah terlihat tetapi sombong karena pengetahuan, apalagi sombong karena kebaikan, sulit terdeteksi karena seringkali hanya berbentuk benih-benih yang halus di dalam hati kita. Akar dari kesombongan ini adalah ego yang berlebihan dan tidak pada tempatnya. Pada tataran yang wajar, ego menampilkan dirinya dalam bentukharga diri (self-esteem) dan kepercayaan diri (self-confidence) . Namun,begitu kedua hal ini berubah menjadi kebanggaan (pride), Anda sudah beradasangat dekat dengan kesombongan. Bahkan, seringkali batas antara bangga dan sombong tak terlalu jelas.Diri kita sebenarnya terdiri atas dua kutub, yaitu ego di satu kutub dandiri sejati di lain kutub. Pada saat dilahirkan ke dunia, kita sepenuhnya berada dalam kutub diri sejati, kita lahir dalam keadaan telanjang dan tak punya apa-apa. Kita sama sekali bebas dari materi apapun. Tetapi, seiring dengan berjalannya waktu, kita mulai memiliki berbagai kebutuhan materi.Bahkan, lebih dari sekedar yang kita butuhkan dalam hidup, kelima indra kitaselalu mengatakan bahwa kita membutuhkan yang lebih banyak lagi.Perjalanan hidup seringkali mengantarkan kita menuju kutub ego. Perjalanan inilah yang memperkenalkan kita kepada kesombongan, kerakusan, serta iri dandengki. Ketiga sifat ini adalah akar segala permasalahan yang terjadi dalamsejarah umat manusia.Perjuangan melawan kesombongan sebenarnya adalah perjuangan menarik diri kita ke kutub diri sejati. Untuk bisa melawan kesombongan dengan segalabentuknya ada dua perubahan paradigma yang perlu Anda lakukan.
Pertama, Anda perlu menyadari bahwa hakikat manusia adalah diri sejati, kita bukanlah makhluk fisik tetapi makhluk spiritual.Diri sejati kita adalah spiritualitas, sementara tubuh fisik hanyalah syaratkita untuk hidup di dunia. Kita lahir tanpa membawa apa-apa, dan kita matipun tanpa membawa apa-apa. Pandangan seperti ini akan membuat Anda melihatsiapapun sebagai manusia yang sama. Anda tidak akan lagi tertipu olehpenampilan, kecantikan, dan segala "tampak luar" yang lain. Yang kini Andalihat adalah "tampak dalam." Pandangan seperti ini sudah pasti akan menjauhkan Anda dari berbagai kesombongan.
Kedua, Anda perlu menyadari bahwa apapun perbuatan baik yang Anda lakukan, semuanya itu semata-mata adalah untuk diri Anda sendiri. Anda menolong orang untuk kebaikan Anda sendiri. Anda memberikan sesuatu kepada orang lainadalah untuk Anda sendiri. Dalam hidup ini berlaku hukum kekekalan energi: Energi yang Anda berikankepada dunia tak akan pernah hilang. Energi itu akan kembali kepada Andadalam bentuk yang lain. Kebaikan yang Anda lakukan pasti akan kembali kepadaAnda dalam bentuk persahabatan, cinta kasih, perasaan bermakna maupunkepuasan batin yang mendalam.
Jadi, setiap berbuat baik pada orang lain,kita sebenarnya sedang berbuat baik kepada diri kita sendiri. Kalau begitu,apalagi yang harus kita sombongkan?
Menyaksikan keganjilan ini salah seorang lelaki ini bertanya,"Apakah yang sedang engkau lakukan hai orang bijak?"Orang bijak menjawab, "Tadi aku kedatangan serombongan tamu yang meminta nasihat kepadaku. Aku memberikan banyak nasihat yang sangat bermanfaat bagi mereka. Merekapun tampak puas dan bahagia mendengar semua perkataanku. Namun, setelah mereka pulang tiba-tiba aku merasa menjadi orang yang hebat.Kesombonganku mulai bermunculan. Karena itu, aku melakukan pekerjaan iniuntuk membunuh perasaan sombongku itu."
Para pembaca yang budiman, sombong adalah penyakit yang sering menghinggapi kita semua yang benih-benihnya sering muncul tanpa kita sadari. Di tingkat terbawah, sombong sering disebabkan karena faktor materi. Kita merasa lebih kaya, lebih cantik, dan lebih terhormat daripada orang lain.Di tingkat kedua, sombong sering disebabkan faktor kecerdasan. Kita merasa lebih pintar, lebih kompeten, lebih bijaksana dan lebih berwawasan dibandingkan orang lain.Di tingkat ketiga, sombong sering disebabkan faktor kebaikan. Kita seringkali menganggap diri kita lebih berakhlak, lebih bermoral, lebih pemurah, dan lebih tulus dibandingkan dengan orang lain.Yang menarik, semakin tinggi tingkat kesombongan ini, semakin sulit pula kita mendeteksinya. Sombong karena materi akan sangat mudah terlihat tetapi sombong karena pengetahuan, apalagi sombong karena kebaikan, sulit terdeteksi karena seringkali hanya berbentuk benih-benih yang halus di dalam hati kita. Akar dari kesombongan ini adalah ego yang berlebihan dan tidak pada tempatnya. Pada tataran yang wajar, ego menampilkan dirinya dalam bentukharga diri (self-esteem) dan kepercayaan diri (self-confidence) . Namun,begitu kedua hal ini berubah menjadi kebanggaan (pride), Anda sudah beradasangat dekat dengan kesombongan. Bahkan, seringkali batas antara bangga dan sombong tak terlalu jelas.Diri kita sebenarnya terdiri atas dua kutub, yaitu ego di satu kutub dandiri sejati di lain kutub. Pada saat dilahirkan ke dunia, kita sepenuhnya berada dalam kutub diri sejati, kita lahir dalam keadaan telanjang dan tak punya apa-apa. Kita sama sekali bebas dari materi apapun. Tetapi, seiring dengan berjalannya waktu, kita mulai memiliki berbagai kebutuhan materi.Bahkan, lebih dari sekedar yang kita butuhkan dalam hidup, kelima indra kitaselalu mengatakan bahwa kita membutuhkan yang lebih banyak lagi.Perjalanan hidup seringkali mengantarkan kita menuju kutub ego. Perjalanan inilah yang memperkenalkan kita kepada kesombongan, kerakusan, serta iri dandengki. Ketiga sifat ini adalah akar segala permasalahan yang terjadi dalamsejarah umat manusia.Perjuangan melawan kesombongan sebenarnya adalah perjuangan menarik diri kita ke kutub diri sejati. Untuk bisa melawan kesombongan dengan segalabentuknya ada dua perubahan paradigma yang perlu Anda lakukan.
Pertama, Anda perlu menyadari bahwa hakikat manusia adalah diri sejati, kita bukanlah makhluk fisik tetapi makhluk spiritual.Diri sejati kita adalah spiritualitas, sementara tubuh fisik hanyalah syaratkita untuk hidup di dunia. Kita lahir tanpa membawa apa-apa, dan kita matipun tanpa membawa apa-apa. Pandangan seperti ini akan membuat Anda melihatsiapapun sebagai manusia yang sama. Anda tidak akan lagi tertipu olehpenampilan, kecantikan, dan segala "tampak luar" yang lain. Yang kini Andalihat adalah "tampak dalam." Pandangan seperti ini sudah pasti akan menjauhkan Anda dari berbagai kesombongan.
Kedua, Anda perlu menyadari bahwa apapun perbuatan baik yang Anda lakukan, semuanya itu semata-mata adalah untuk diri Anda sendiri. Anda menolong orang untuk kebaikan Anda sendiri. Anda memberikan sesuatu kepada orang lainadalah untuk Anda sendiri. Dalam hidup ini berlaku hukum kekekalan energi: Energi yang Anda berikankepada dunia tak akan pernah hilang. Energi itu akan kembali kepada Andadalam bentuk yang lain. Kebaikan yang Anda lakukan pasti akan kembali kepadaAnda dalam bentuk persahabatan, cinta kasih, perasaan bermakna maupunkepuasan batin yang mendalam.
Jadi, setiap berbuat baik pada orang lain,kita sebenarnya sedang berbuat baik kepada diri kita sendiri. Kalau begitu,apalagi yang harus kita sombongkan?
Sunday, February 25, 2007
Overtime’ dengan Allah. !!! ^_^
Overtime' dengan Allah.
Malam……….anugerah besar untuk orang yang sanggup bersekang mata untuk-Nya.Malam yang sunyi, waktu paling baik untuk beribadah. Suasana bening, waktu paling sesuai untuk bermunajat dengan Allah. Sebab itulah beribadah malam menjadi pakaian Rasulullah SAW, para Sahabat dan orang-orang soleh.
Kelebihannya banyak, antaranya:
- Jalan mendekatkan diri dengan Allah. Itulah peluang berbakti lebih masa untuk-Nya setelah siang hari berurusan sesama manusia.
- Dimuliakan Allah. Sabda Nabi SAW: "Telah datang Jibril kepadaku seraya berkata: `Ketahuilah bahawa kemuliaan seseorang Mukmin itu terletak pada mengerjakan ibadah qiamullail dan kehormatannya terletak pada keengganannya meminta-minta."
- Dimakbulkan doa. Sabda Nabi SAW: "Sesungguhnya dari sebahagian malam itu terdapat satu saat yang mempunyai kelebihan bagi seseorang Muslim untuk memohon sesuatu yang baik kepada Allah. Allah SWT pasti akan kabulkan doanya. Demikianlah itu ada pada setiap malam."
- Faktor pertolongan Tuhan. Inilah juga amalan untuk menguatkan jiwa para pejuang Kebenaran. Oleh sebab itulah dalam sejarah Sultan Salahuddin Al Ayubi dan Muhammad Al Fateh, tentera-tentera yang beribadah malam sahaja yang dibawa ke medan perang.
- Menjadi pelindung di Hari Qiamat. Sabda Rasul SAW: "Semua manusia akan dikumpulkan di hari Qiamat di satu tempat. Mereka akan mendengar satu seruan yang berbunyi: `Di manakah mereka yang meninggalkan tempat tidurnya dan menghabiskan malamnya dengan beribadah. Akan ada satu golongan yang bangkit dan masuk Syurga tanpa hisab.
"Berqiamullail boleh dilakukan sama ada sepanjang malam, bermula lepas Isyak hingga Subuh, atau separuh malam, sepertiga malam, seperenam malam atau akhir malam. Bukan senang untuk bangun malam di kala kesejukan menggigit dan mimpi menggamit. Hanya orang yang dipermudahkan Tuhan, kuat azam dan kecintaan kepada-Nya yang mampu bersekang mata untuk-Nya.
Malam……….anugerah besar untuk orang yang sanggup bersekang mata untuk-Nya.Malam yang sunyi, waktu paling baik untuk beribadah. Suasana bening, waktu paling sesuai untuk bermunajat dengan Allah. Sebab itulah beribadah malam menjadi pakaian Rasulullah SAW, para Sahabat dan orang-orang soleh.
Kelebihannya banyak, antaranya:
- Jalan mendekatkan diri dengan Allah. Itulah peluang berbakti lebih masa untuk-Nya setelah siang hari berurusan sesama manusia.
- Dimuliakan Allah. Sabda Nabi SAW: "Telah datang Jibril kepadaku seraya berkata: `Ketahuilah bahawa kemuliaan seseorang Mukmin itu terletak pada mengerjakan ibadah qiamullail dan kehormatannya terletak pada keengganannya meminta-minta."
- Dimakbulkan doa. Sabda Nabi SAW: "Sesungguhnya dari sebahagian malam itu terdapat satu saat yang mempunyai kelebihan bagi seseorang Muslim untuk memohon sesuatu yang baik kepada Allah. Allah SWT pasti akan kabulkan doanya. Demikianlah itu ada pada setiap malam."
- Faktor pertolongan Tuhan. Inilah juga amalan untuk menguatkan jiwa para pejuang Kebenaran. Oleh sebab itulah dalam sejarah Sultan Salahuddin Al Ayubi dan Muhammad Al Fateh, tentera-tentera yang beribadah malam sahaja yang dibawa ke medan perang.
- Menjadi pelindung di Hari Qiamat. Sabda Rasul SAW: "Semua manusia akan dikumpulkan di hari Qiamat di satu tempat. Mereka akan mendengar satu seruan yang berbunyi: `Di manakah mereka yang meninggalkan tempat tidurnya dan menghabiskan malamnya dengan beribadah. Akan ada satu golongan yang bangkit dan masuk Syurga tanpa hisab.
"Berqiamullail boleh dilakukan sama ada sepanjang malam, bermula lepas Isyak hingga Subuh, atau separuh malam, sepertiga malam, seperenam malam atau akhir malam. Bukan senang untuk bangun malam di kala kesejukan menggigit dan mimpi menggamit. Hanya orang yang dipermudahkan Tuhan, kuat azam dan kecintaan kepada-Nya yang mampu bersekang mata untuk-Nya.
Minyak esensial untuk meredakan aneka penyakit !!! ^_^
Minyak esensial untuk meredakan aneka penyakit
Dalam buku Aromatherapy, recipes and Remedies to Enhance Your Life, Denis Rowley menuliskan beragaam resep minyak esensial guna meredakan aneka penyakit. Namun, perlu diingat, minyak esensial tidak bersifat menyembuhkan. Pada beberapa orang yang sensitif dengan minyak esensial tertentu, ada baiknya berkonsultasi terlebih dulu dengan terapis.
Artritis:
**********
Guna mengurangi rasa sakit akibat artritis, campurkan lima tetes minyak rosemary dengan dua sendok makan minyak sweet almond. Balurkan campuran tersebut pads bagian yang terasa nyeri. Pijat secara perlahan. Campuran ini juga bisa ditambahkan pada air hangat yang akan digunakan untuk mandi.
Bau Mulut:
****************
Agar bau mulut tidak menghambat komunikasi dan pergaulan, cobalah ramuan satu atau dua tetes minyak peppermint, lemon, tea tree, lavender, bergamot, atau fennel dalam 300 ml air. Campuran tersebut bisa digunakan sebagai obat kumur.
Bisul:
********
Rasa nyeri akibat bisul bisa diredakan dengan mencampur dua tetes minyak lavender dan dua tetes tea tree atau thyme dalam semangkuk air panas. Basuh bagian tubuh tempat "tumbuhnya" bisul dengan campuran tersebut dua kali sehari.
Gatal:
**********
Rasa gatal bisa diatasi dengan mencampurkan satu tetes minyak lavender clan satu tetes minyak tea tree. Celupkan cotton bud dalam campuran tersebut clan tempelkan pada bagian yang terasa gatal.MelepuhTeteskan satu tetes minyak lavender dan satu tetes minyak lemon pada cotton bud clan oleskan dengan lembut pada bagian yang melepuh. Ulangi dua kali sehari hingga sembuh.
Terbakar:
***************
Saat bagian tubuh terbakar atau tersiram sesuatu yang panas, segera basahi dengan air dingin yang mengalir selama 10 menit. Lalu, oleskan dua tetes minyak lavender pada bagian yang terbakar. Jika masih terasa sakit, rendam bagian yang mengalami lukabakar dalam satu mangkuk air dingin yang telah ditambah 10 tetes minyak lavender. Larutan tersebut jangan ditelan.
Memar:
*************
Untuk meredakan nyeri dan bengkak, tambahkan tiga tetes minyak rosemary, satu tetes minyak geranium, dan dua tetes minyak lavender dalam satu mangkuk air es. Celupkan handuk kecil dalam cam' puran tersebut lalu peras. Tempelkan handuk basah pads bagian yang bengkak dan di sekelilingnya.Selain itu, kita bisa juga membuat larutan dengan mencampur dua tetes minyak rosemary, dua tetes minyak geranium, dan satu tetes minyak lavender dengan satu sendok teh minyak pelarut. Secara perlahan, oleskan campuran minyak tersebut pada bagian yang bengkak.
Selulit"
************
Buat ramuan minyak untuk pijat dengan mencampurkan tujuh tetes minyak cypress, tiga tetes minyak rosemary, dan 20 ml minyak sweet almond. Oleskan sedikit campuran tersebut pada bagian yang mengalami selulit. Pijat perlahan bagian selulit tersebut setiap hari untuk membantu memecah timbunan lemak.
Kulit Merekah:
*******************
Campur satu cangkir susu hangat dan satu tetes minyak lavender. Rendam kain atau handuk pada larutan tersebut dan peras. Kemudian kompreskan pada wajah, leher, tangan, atau tubuh.
Pilek:
***********
Campur satu tetes minyak lemon, dua tetes minyak eucalyptus, dan tiga tetes minyak rosemary dengan satu sendok teh minyak pelarut. Oleskan campuran tersebut pada kening, hidung, dada, dan leher, lalu pijat.Pilihan lain adalah dengan meneteskan satu tetes minyak peppermint clan satu tetes minyak eucalyptus pada tisu atau saputangan. Hirup saputangan atau tisu saat diperlukan.
Sembelit:
****************
Guna mengurangi sembelit, campurkan 10 tetes minyak rosemary, 10 tetes minyak lemon, clan lima tetes minyak peppermint dengan 50 ml minyak sweet almond. Secara perlahan, oleskan sedikit campuran minyak tersebut pada perut bagian bawah dan pijat search jarum jam.
Deodoran alami:
***********************
Pengharum badan alami bisa diperoleh dengan mencampurkan tiga tetes minyak lavender dan dua tetes minyak tea tree dengan 10 ml krim pelembab. Aduk agar minyak tercampur rata. Oleskan sedikit campuran tersebut pada ketiak.
Bau Kaki:
***************
Bau kaki bisa terjadi karena jamur, pola diet yang salah, atau kebiasaan menggunakan kaus kaki sintetis dengan sepatu yang selalu tertutup rapat. Itu sebabnya, sangat dianjurkan untuk sering bertelanjang kaki guna merangsang titik-titik refleksi pada telapak kaki. Bertelanjang kaki juga membantu kaki untuk bernapas.Cara lain menghilangkan bau kaki bisa dilakukan dengan merendam kaki selama 10 menit pada mangkuk berisi air hangat yang telah dicampur dua tetes minyak sage dan dua tetes minyak cypress.Untuk menghilangkan bau tak sedap pada sepatu, teteskan satu tetes minyak lavender atau eucalyptus pada gumpalan kapas. Lalu gunakan untuk mengelap bagian dalam sepatu.
Wasir:
************
Campurkan dua tetes minyak cypress dalam semangkuk air hangat. Celupkan kain flanel dan peras, lalu tempelkan kain tersebut pada dubur selama beberapa menit. Ulangi tiga kali. Lakukan pengompresan dua kali sehari.Untuk penggunaan langsung, larutkan dua tetes minyak cypress, dua tetes minyak geranium, dan dua tetes minyak peppermint dalam 30 ml minyak wheatgerm atau vaseline. Oleskan pada dubur tiga atau empat kali sehari.
Sakit kepala:
********************
Beragam cara bisa dilakukan untuk meredakan sakit kepala, misalnya berendam dalam air hangat. Isi bathtub dengan air hangat. Tambahkan tiga tetes minyak lavender, dua tetes minyak orange, dan satu tetes minyak chamomile. Nyalakan lilin pasang musik yang menenangkai dan berendamlah dalam bathtub selama 15 menit.Anda juga bisa melakukan cara lain, yakni menghirup minyak espnsial. Campur dua tetes minyak peppermint dan satu tetes minyak rose mary dalam satu mangkuk air panas. Tutup kepala dengan handuk, tutup mata, hirup dalam-dalam uap yang timbul dari mangkuk. Lakukan selama 10 menit.
Insomnia:
******************
Aroma satu tetes minyak lavender pada tisu yang ditempatkan dekat dengan bantal akan memudahkan Anda terlelap. Bisa pula dengan membakar satu tetes minyak lavender dan satu tetes minyak ylang ylang dalam pembakar terapi aroma. Letakkan pembakar tersebut di dalam kamar tidur satu jam sebelum Anda tidur. Setelah itu, matikan dan keluarkan dari kamar sebelum Anda tidur.
Pegal-pegal:
*********************
Campurkan 14 tetes minyak clarysage, lima tetes minyak mawar, dan enam tetes minyak ylang ylang dalam 50 ml minyak sweet almond. Secara perlahan pijat punggung bagian bawah, kaki, dan perut dengan campuran tersebut.
Menopause:
******************
Untuk rileksasi, gunakan dua tetes minyak lavender, dua tetes minyak ylang ylang, dan dua tetes minyak chamomile pada pembakar terapi aroma.Untuk meredakan gejala menopause, Anda bisa berendam selama 15 menit dalam bathtub berisi air hangat yang telah diberi dua tetes minyak chamomile, dua tetes minyak cypress, dan dua tetes minyak clary sage.Bisa juga Anda melakukan pijatan pada kaki dengan mencampur lima ml minyak sweet almond, satu tetes minyak lavender, der, dan satu tetes minyak patchouli. Beri pijatan pada jempol kaki.
Nyeri otot:
***************
Redakan nyeri otot dengan memijat bagian tersebut. Pijat dengan campuran 10 tetes minyak juniper, delapan tetes minyak rosemary, tujuh tetes minyak lavender dalam 50 ml minyak sweet almond.
Nyeri saat menstruasi:
*********************************
Untuk meredakan kram saat menstruasi, secara lembut pijat bagian perut dan punggung bagian bawah dengan campuran 50 ml minyak sweet almond dan 15 tetes minyak dary sage. Lakukan pijatan secara berulang selama menstruasi berlangsung.
Sariawan:
****************
Campur tiga tetes minyak tea tree dalam setengah gelas air. Gunakan larutan tersebut sebagai obat kumur. Beberapa orang sensitif dengan minyak tea tree karena itu hati-hati dalam penggunaannya.Stretch markCampurkan 50 ml minyak wheatgerm dengan 20 tetes minyak lavender clan lima tetes minyak geranium. Oleskan campuran tersebut pada bagian tubuh yang mengalami stretch mark clan pijat secara perlahan. Lakukan setiap hari.
Sakit gigi:
*****************
Teteskan satu tetes minyak cengkih atau satu tetes minyak peppermint pada cotton bud. Oleskan cotton bud tersebut pada bagian gigi yang sakit. Metode ini sebaiknya tidak dilakukan pada bayi dan anak-anak.
Varises:
****************
Campurkan lima tetes minyak cypress dan lima tetes minyak geranium dalam 20 ml minyak sweet almond. Balurkan satu sendok teh campuran tersebut untuk memijat kaki yang mengalami varises secara perlahanlahan. Jangan lupa, angkat kaki sesering mungkin untuk meredakan rasa nyeri.
Friday, February 23, 2007
Golden Al-Wafi Translator v1.12
pass: apadanagroup
Translation software for more advanced users and professionaltranslators. Expanded and specialized dictionaries and multi-documenttranslation makes this software more suitable for advanced translationpurposes.FEATURESFast and accurate translationNew translation engineTranslates thousands of words in just secondsEnglish Text-to-SpeechNew dictionary with more than 2 million English/Arabic entriesEightspecialized science dictionaries in Medicine, Veterinary, Biology,Physics, Mathematics, Chemistry, Engineering and GeologyMulti-document translationMultiple file translation in the background (batch translation)English/Arabic DictionaryArabic/English DictionaryEnglish spelling checkerArabic text with/without vowel points (harakat)Transliteration of proper nounsBilingual user interfaceBilingual electronic user guide (HTML)Runs under windows 98/2000/NT/ME/XP
Translation software for more advanced users and professionaltranslators. Expanded and specialized dictionaries and multi-documenttranslation makes this software more suitable for advanced translationpurposes.FEATURESFast and accurate translationNew translation engineTranslates thousands of words in just secondsEnglish Text-to-SpeechNew dictionary with more than 2 million English/Arabic entriesEightspecialized science dictionaries in Medicine, Veterinary, Biology,Physics, Mathematics, Chemistry, Engineering and GeologyMulti-document translationMultiple file translation in the background (batch translation)English/Arabic DictionaryArabic/English DictionaryEnglish spelling checkerArabic text with/without vowel points (harakat)Transliteration of proper nounsBilingual user interfaceBilingual electronic user guide (HTML)Runs under windows 98/2000/NT/ME/XP
Driver Genius Professional Edition 2007.v7.0.2358
http://rapidshare.com/files/17395849/DriverGenV7.rar
Rumus Excell : Pasaran hari ini ?????
=TEXT(TODAY();"DDDD") &" "& IF(DATEVALUE("1904/1/2")=1; IF(MOD(TODAY();5)=0;"Pahing"; IF(MOD(TODAY();5)=1;"Pon"; IF(MOD(TODAY();5)=2;"Wage"; IF(MOD(TODAY();5)=3;"Kliwon"; IF(MOD(TODAY();5)=4;"Manis";))))); IF(MOD(TODAY();5)=0;"Kliwon"; IF(MOD(TODAY();5)=1;"Manis"; IF(MOD(TODAY();5)=2;"Pahing"; IF(MOD(TODAY();5)=3;"Pon";IF(MOD(TODAY();5)=4;"Wage";))))))
Rumus Excell : cari hari pasaran
=TEXT(A1;"DDDD") &" "& IF(DATEVALUE("1904/1/2")=1; IF(MOD(A1;5)=0;"Pahing"; IF(MOD(A1;5)=1;"Pon"; IF(MOD(A1;5)=2;"Wage"; IF(MOD(A1;5)=3;"Kliwon"; IF(MOD(A1;5)=4;"Manis";))))); IF(MOD(A1;5)=0;"Kliwon"; IF(MOD(A1;5)=1;"Manis"; IF(MOD(A1;5)=2;"Pahing"; IF(MOD(A1;5)=3;"Pon"; IF(MOD(A1;5)=4;"Wage";))))))
Script fungsi terbilang MS-Excell (Add-in)
'Fungsi Terbilang dengan VBA untuk MS Office
'Fungsi penterjemahan masing-masing angka
Private Function KeKata(Nomor)
TrjKata = Array("", "satu", "dua", "tiga", "empat", "lima", "enam", "tujuh", "delapan", "sembilan")
KeKata = TrjKata(Nomor)
End Function
'Mulai penulisan Fungsi Terbilang
Public Function terbilang(Nilai_Angka, Optional Style = 4, Optional Satuan = "")
Angka = Fix(Abs(Nilai_Angka))
'Desimal dibelakang koma
des1 = Mid(Abs(Nilai_Angka), Len(Angka) + 2, 1)
des2 = Mid(Abs(Nilai_Angka), Len(Angka) + 3, 1)
If des2 = "" Then
If des1 = "" Or des1 = "0" Then
Koma = ""
Else
Koma = " koma " & KeKata(des1)
End If
ElseIf des2 = "0" Then
If des1 = "0" Then
Koma = ""
ElseIf des1 = "1" Then
Koma = " koma sepuluh"
Else
Koma = " koma " & KeKata(des1) & " puluh"
End If
Else
If des1 = "0" Then
Koma = " koma nol " & KeKata(des2)
ElseIf des1 = "1" Then
If des2 = "1" Then
Koma = " koma sebelas"
Else
Koma = " koma " & KeKata(des2) & " belas"
End If
Else
Koma = " koma " & KeKata(des1) & " puluh " & KeKata(des2)
End If
End If
'Misahin Angka
No1 = Left(Right(Angka, 1), 1)
No2 = Left(Right(Angka, 2), 1)
No3 = Left(Right(Angka, 3), 1)
No4 = Left(Right(Angka, 4), 1)
No5 = Left(Right(Angka, 5), 1)
No6 = Left(Right(Angka, 6), 1)
No7 = Left(Right(Angka, 7), 1)
No8 = Left(Right(Angka, 8), 1)
No9 = Left(Right(Angka, 9), 1)
No10 = Left(Right(Angka, 10), 1)
No11 = Left(Right(Angka, 11), 1)
No12 = Left(Right(Angka, 12), 1)
No13 = Left(Right(Angka, 13), 1)
No14 = Left(Right(Angka, 14), 1)
No15 = Left(Right(Angka, 15), 1)
'Satuan
If Len(Angka) >= 1 Then
If Len(Angka) = 1 And No1 = 1 Then
Nomor1 = "satu"
ElseIf Len(Angka) = 1 And No1 = 0 Then
Nomor1 = "Nol"
ElseIf No2 = "1" Then
If No1 = "1" Then
Nomor1 = "sebelas"
ElseIf No1 = "0" Then
Nomor1 = "sepuluh"
Else
Nomor1 = KeKata(No1) & " belas"
End If
Else
Nomor1 = KeKata(No1)
End If
Else
Nomor1 = ""
End If
'Puluhan
If Len(Angka) >= 2 Then
If No2 = 1 Or No2 = "0" Then
Nomor2 = ""
Else
Nomor2 = KeKata(No2) & " puluh "
End If
Else
Nomor2 = ""
End If
'Ratusan
If Len(Angka) >= 3 Then
If No3 = "1" Then
Nomor3 = "seratus "
ElseIf No3 = "0" Then
Nomor3 = ""
Else
Nomor3 = KeKata(No3) & " ratus "
End If
Else
Nomor3 = ""
End If
'Ribuan
If Len(Angka) >= 4 Then
If No6 = "0" And No5 = "0" And No4 = "0" Then
Nomor4 = ""
ElseIf (No4 = "1" And Len(Angka) = 4) Or (No6 = "0" And No5 = "0" And No4 = "1") Then
Nomor4 = "seribu "
ElseIf No5 = "1" Then
If No4 = "1" Then
Nomor4 = "sebelas ribu "
ElseIf No4 = "0" Then
Nomor4 = "sepuluh ribu "
Else
Nomor4 = KeKata(No4) & " belas ribu "
End If
Else
Nomor4 = KeKata(No4) & " ribu "
End If
Else
Nomor4 = ""
End If
'Puluhan ribu
If Len(Angka) >= 5 Then
If No5 = "1" Or No5 = "0" Then
Nomor5 = ""
Else
Nomor5 = KeKata(No5) & " puluh "
End If
Else
Nomor5 = ""
End If
'Ratusan Ribu
If Len(Angka) >= 6 Then
If No6 = "1" Then
Nomor6 = "seratus "
ElseIf No6 = "0" Then
Nomor6 = ""
Else
Nomor6 = KeKata(No6) & " ratus "
End If
Else
Nomor6 = ""
End If
'Jutaan
If Len(Angka) >= 7 Then
If No9 = "0" And No8 = "0" And No7 = "0" Then
Nomor7 = ""
ElseIf No7 = "1" And Len(Angka) = 7 Then
Nomor7 = "satu juta "
ElseIf No8 = "1" Then
If No7 = "1" Then
Nomor7 = "sebelas juta "
ElseIf No7 = "0" Then
Nomor7 = "sepuluh juta "
Else
Nomor7 = KeKata(No7) & " belas juta "
End If
Else
Nomor7 = KeKata(No7) & " juta "
End If
Else
Nomor7 = ""
End If
'Puluhan juta
If Len(Angka) >= 8 Then
If No8 = "1" Or No8 = "0" Then
Nomor8 = ""
Else
Nomor8 = KeKata(No8) & " puluh "
End If
Else
Nomor8 = ""
End If
'Ratusan juta
If Len(Angka) >= 9 Then
If No9 = "1" Then
Nomor9 = "seratus "
ElseIf No9 = "0" Then
Nomor9 = ""
Else
Nomor9 = KeKata(No9) & " ratus "
End If
Else
Nomor9 = ""
End If
'Milyar
If Len(Angka) >= 10 Then
If No12 = "0" And No11 = "0" And No10 = "0" Then
Nomor10 = ""
ElseIf No10 = "1" And Len(Angka) = 10 Then
Nomor10 = "satu milyar "
ElseIf No11 = "1" Then
If No10 = "1" Then
Nomor10 = "sebelas milyar "
ElseIf No10 = "0" Then
Nomor10 = "sepuluh milyar "
Else
Nomor10 = KeKata(No10) & " belas milyar "
End If
Else
Nomor10 = KeKata(No10) & " milyar "
End If
Else
Nomor10 = ""
End If
'Puluhan Milyar
If Len(Angka) >= 11 Then
If No11 = "1" Or No11 = "0" Then
Nomor11 = ""
Else
Nomor11 = KeKata(No11) & " puluh "
End If
Else
Nomor11 = ""
End If
'Ratusan Milyar
If Len(Angka) >= 12 Then
If No12 = "1" Then
Nomor12 = "seratus "
ElseIf No12 = "0" Then
Nomor12 = ""
Else
Nomor12 = KeKata(No12) & " ratus "
End If
Else
Nomor12 = ""
End If
'Triliun
If Len(Angka) >= 13 Then
If No15 = "0" And No14 = "0" And No13 = "0" Then
Nomor13 = ""
ElseIf No13 = "1" And Len(Angka) = 13 Then
Nomor13 = "satu triliun "
ElseIf No14 = "1" Then
If No13 = "1" Then
Nomor13 = "sebelas triliun "
ElseIf No13 = "0" Then
Nomor13 = "sepuluh triliun "
Else
Nomor13 = KeKata(No13) & " belas triliun "
End If
Else
Nomor13 = KeKata(No13) & " triliun "
End If
Else
Nomor13 = ""
End If
'Puluhan triliun
If Len(Angka) >= 14 Then
If No14 = "1" Or No14 = "0" Then
Nomor14 = ""
Else
Nomor14 = KeKata(No14) & " puluh "
End If
Else
Nomor14 = ""
End If
'Ratusan triliun
If Len(Angka) >= 15 Then
If No15 = "1" Then
Nomor15 = "seratus "
ElseIf No15 = "0" Then
Nomor15 = ""
Else
Nomor15 = KeKata(No15) & " ratus "
End If
Else
Nomor15 = ""
End If
If Len(Angka) > 15 Then
bilang = "Digit Angka Terlalu Banyak"
Else
If IsNull(Nilai_Angka) Then
bilang = ""
ElseIf Nilai_Angka < 0 Then
bilang = "minus " & Trim(Nomor15 & Nomor14 & Nomor13 & Nomor12 & Nomor11 & Nomor10 & Nomor9 & Nomor8 & Nomor7 _
& Nomor6 & Nomor5 & Nomor4 & Nomor3 & Nomor2 & Nomor1 & Koma & " " & Satuan)
Else
bilang = Trim(Nomor15 & Nomor14 & Nomor13 & Nomor12 & Nomor11 & Nomor10 & Nomor9 & Nomor8 & Nomor7 _
& Nomor6 & Nomor5 & Nomor4 & Nomor3 & Nomor2 & Nomor1 & Koma & " " & Satuan)
End If
End If
If Style = 4 Then
terbilang = StrConv(Left(bilang, 1), 1) & StrConv(Mid(bilang, 2, 1000), 2)
Else
terbilang = StrConv(bilang, Style)
End If
terbilang = Replace(terbilang, " ", " ", 1, 1000, vbTextCompare)
End Function
'Fungsi penterjemahan masing-masing angka
Private Function KeKata(Nomor)
TrjKata = Array("", "satu", "dua", "tiga", "empat", "lima", "enam", "tujuh", "delapan", "sembilan")
KeKata = TrjKata(Nomor)
End Function
'Mulai penulisan Fungsi Terbilang
Public Function terbilang(Nilai_Angka, Optional Style = 4, Optional Satuan = "")
Angka = Fix(Abs(Nilai_Angka))
'Desimal dibelakang koma
des1 = Mid(Abs(Nilai_Angka), Len(Angka) + 2, 1)
des2 = Mid(Abs(Nilai_Angka), Len(Angka) + 3, 1)
If des2 = "" Then
If des1 = "" Or des1 = "0" Then
Koma = ""
Else
Koma = " koma " & KeKata(des1)
End If
ElseIf des2 = "0" Then
If des1 = "0" Then
Koma = ""
ElseIf des1 = "1" Then
Koma = " koma sepuluh"
Else
Koma = " koma " & KeKata(des1) & " puluh"
End If
Else
If des1 = "0" Then
Koma = " koma nol " & KeKata(des2)
ElseIf des1 = "1" Then
If des2 = "1" Then
Koma = " koma sebelas"
Else
Koma = " koma " & KeKata(des2) & " belas"
End If
Else
Koma = " koma " & KeKata(des1) & " puluh " & KeKata(des2)
End If
End If
'Misahin Angka
No1 = Left(Right(Angka, 1), 1)
No2 = Left(Right(Angka, 2), 1)
No3 = Left(Right(Angka, 3), 1)
No4 = Left(Right(Angka, 4), 1)
No5 = Left(Right(Angka, 5), 1)
No6 = Left(Right(Angka, 6), 1)
No7 = Left(Right(Angka, 7), 1)
No8 = Left(Right(Angka, 8), 1)
No9 = Left(Right(Angka, 9), 1)
No10 = Left(Right(Angka, 10), 1)
No11 = Left(Right(Angka, 11), 1)
No12 = Left(Right(Angka, 12), 1)
No13 = Left(Right(Angka, 13), 1)
No14 = Left(Right(Angka, 14), 1)
No15 = Left(Right(Angka, 15), 1)
'Satuan
If Len(Angka) >= 1 Then
If Len(Angka) = 1 And No1 = 1 Then
Nomor1 = "satu"
ElseIf Len(Angka) = 1 And No1 = 0 Then
Nomor1 = "Nol"
ElseIf No2 = "1" Then
If No1 = "1" Then
Nomor1 = "sebelas"
ElseIf No1 = "0" Then
Nomor1 = "sepuluh"
Else
Nomor1 = KeKata(No1) & " belas"
End If
Else
Nomor1 = KeKata(No1)
End If
Else
Nomor1 = ""
End If
'Puluhan
If Len(Angka) >= 2 Then
If No2 = 1 Or No2 = "0" Then
Nomor2 = ""
Else
Nomor2 = KeKata(No2) & " puluh "
End If
Else
Nomor2 = ""
End If
'Ratusan
If Len(Angka) >= 3 Then
If No3 = "1" Then
Nomor3 = "seratus "
ElseIf No3 = "0" Then
Nomor3 = ""
Else
Nomor3 = KeKata(No3) & " ratus "
End If
Else
Nomor3 = ""
End If
'Ribuan
If Len(Angka) >= 4 Then
If No6 = "0" And No5 = "0" And No4 = "0" Then
Nomor4 = ""
ElseIf (No4 = "1" And Len(Angka) = 4) Or (No6 = "0" And No5 = "0" And No4 = "1") Then
Nomor4 = "seribu "
ElseIf No5 = "1" Then
If No4 = "1" Then
Nomor4 = "sebelas ribu "
ElseIf No4 = "0" Then
Nomor4 = "sepuluh ribu "
Else
Nomor4 = KeKata(No4) & " belas ribu "
End If
Else
Nomor4 = KeKata(No4) & " ribu "
End If
Else
Nomor4 = ""
End If
'Puluhan ribu
If Len(Angka) >= 5 Then
If No5 = "1" Or No5 = "0" Then
Nomor5 = ""
Else
Nomor5 = KeKata(No5) & " puluh "
End If
Else
Nomor5 = ""
End If
'Ratusan Ribu
If Len(Angka) >= 6 Then
If No6 = "1" Then
Nomor6 = "seratus "
ElseIf No6 = "0" Then
Nomor6 = ""
Else
Nomor6 = KeKata(No6) & " ratus "
End If
Else
Nomor6 = ""
End If
'Jutaan
If Len(Angka) >= 7 Then
If No9 = "0" And No8 = "0" And No7 = "0" Then
Nomor7 = ""
ElseIf No7 = "1" And Len(Angka) = 7 Then
Nomor7 = "satu juta "
ElseIf No8 = "1" Then
If No7 = "1" Then
Nomor7 = "sebelas juta "
ElseIf No7 = "0" Then
Nomor7 = "sepuluh juta "
Else
Nomor7 = KeKata(No7) & " belas juta "
End If
Else
Nomor7 = KeKata(No7) & " juta "
End If
Else
Nomor7 = ""
End If
'Puluhan juta
If Len(Angka) >= 8 Then
If No8 = "1" Or No8 = "0" Then
Nomor8 = ""
Else
Nomor8 = KeKata(No8) & " puluh "
End If
Else
Nomor8 = ""
End If
'Ratusan juta
If Len(Angka) >= 9 Then
If No9 = "1" Then
Nomor9 = "seratus "
ElseIf No9 = "0" Then
Nomor9 = ""
Else
Nomor9 = KeKata(No9) & " ratus "
End If
Else
Nomor9 = ""
End If
'Milyar
If Len(Angka) >= 10 Then
If No12 = "0" And No11 = "0" And No10 = "0" Then
Nomor10 = ""
ElseIf No10 = "1" And Len(Angka) = 10 Then
Nomor10 = "satu milyar "
ElseIf No11 = "1" Then
If No10 = "1" Then
Nomor10 = "sebelas milyar "
ElseIf No10 = "0" Then
Nomor10 = "sepuluh milyar "
Else
Nomor10 = KeKata(No10) & " belas milyar "
End If
Else
Nomor10 = KeKata(No10) & " milyar "
End If
Else
Nomor10 = ""
End If
'Puluhan Milyar
If Len(Angka) >= 11 Then
If No11 = "1" Or No11 = "0" Then
Nomor11 = ""
Else
Nomor11 = KeKata(No11) & " puluh "
End If
Else
Nomor11 = ""
End If
'Ratusan Milyar
If Len(Angka) >= 12 Then
If No12 = "1" Then
Nomor12 = "seratus "
ElseIf No12 = "0" Then
Nomor12 = ""
Else
Nomor12 = KeKata(No12) & " ratus "
End If
Else
Nomor12 = ""
End If
'Triliun
If Len(Angka) >= 13 Then
If No15 = "0" And No14 = "0" And No13 = "0" Then
Nomor13 = ""
ElseIf No13 = "1" And Len(Angka) = 13 Then
Nomor13 = "satu triliun "
ElseIf No14 = "1" Then
If No13 = "1" Then
Nomor13 = "sebelas triliun "
ElseIf No13 = "0" Then
Nomor13 = "sepuluh triliun "
Else
Nomor13 = KeKata(No13) & " belas triliun "
End If
Else
Nomor13 = KeKata(No13) & " triliun "
End If
Else
Nomor13 = ""
End If
'Puluhan triliun
If Len(Angka) >= 14 Then
If No14 = "1" Or No14 = "0" Then
Nomor14 = ""
Else
Nomor14 = KeKata(No14) & " puluh "
End If
Else
Nomor14 = ""
End If
'Ratusan triliun
If Len(Angka) >= 15 Then
If No15 = "1" Then
Nomor15 = "seratus "
ElseIf No15 = "0" Then
Nomor15 = ""
Else
Nomor15 = KeKata(No15) & " ratus "
End If
Else
Nomor15 = ""
End If
If Len(Angka) > 15 Then
bilang = "Digit Angka Terlalu Banyak"
Else
If IsNull(Nilai_Angka) Then
bilang = ""
ElseIf Nilai_Angka < 0 Then
bilang = "minus " & Trim(Nomor15 & Nomor14 & Nomor13 & Nomor12 & Nomor11 & Nomor10 & Nomor9 & Nomor8 & Nomor7 _
& Nomor6 & Nomor5 & Nomor4 & Nomor3 & Nomor2 & Nomor1 & Koma & " " & Satuan)
Else
bilang = Trim(Nomor15 & Nomor14 & Nomor13 & Nomor12 & Nomor11 & Nomor10 & Nomor9 & Nomor8 & Nomor7 _
& Nomor6 & Nomor5 & Nomor4 & Nomor3 & Nomor2 & Nomor1 & Koma & " " & Satuan)
End If
End If
If Style = 4 Then
terbilang = StrConv(Left(bilang, 1), 1) & StrConv(Mid(bilang, 2, 1000), 2)
Else
terbilang = StrConv(bilang, Style)
End If
terbilang = Replace(terbilang, " ", " ", 1, 1000, vbTextCompare)
End Function
Pro Evolution Soccer 6
Acrobat Reader versi 8
http://rapidshare.com/files/17759960/acrobat.v8.proper.zwtiso.part6.rar
http://rapidshare.com/files/17759828/acrobat.v8.proper.zwtiso.part1.rar
http://rapidshare.com/files/17759421/acrobat.v8.proper.zwtiso.part3.rar
http://rapidshare.com/files/17759405/acrobat.v8.proper.zwtiso.part7.rar
http://rapidshare.com/files/17761731/acrobat.v8.proper.zwtiso.part2.rar
http://rapidshare.com/files/17761147/acrobat.v8.proper.zwtiso.part5.rar
http://rapidshare.com/files/17760668/acrobat.v8.proper.zwtiso.part4.rar
http://rapidshare.com/files/17759828/acrobat.v8.proper.zwtiso.part1.rar
http://rapidshare.com/files/17759421/acrobat.v8.proper.zwtiso.part3.rar
http://rapidshare.com/files/17759405/acrobat.v8.proper.zwtiso.part7.rar
http://rapidshare.com/files/17761731/acrobat.v8.proper.zwtiso.part2.rar
http://rapidshare.com/files/17761147/acrobat.v8.proper.zwtiso.part5.rar
http://rapidshare.com/files/17760668/acrobat.v8.proper.zwtiso.part4.rar
Subscribe to:
Posts (Atom)
GEROMBOLAN PENYAMUN
Aku, pakde dan Bude
