Mereka Bisa kenapa Kita nggak?

Sejarah Augmented Reality

2011-07-09T03:40:00.000-07:00

augmented reality (AR) adalah penggabungan antara obejek virtual dengan objek nyata. Sebagai contoh, adalah saat stasiun televisi, menyiarkan pertandingan sepak bola, terdapat objek virtual, tentang skor pertandingan yang sedang berlangsung. Menurut Ronald Azuma pada tahun 1997, augmented reality adalah menggabungakan dunia nyata dan virtual, bersifat interaktif secara real time, dan merupakan animasai 3D. Sejarah tentang augmented reality dimulai dari tahun 1957-1962, ketika seorang penemu yang bernama Morton Heilig, seorang sinematografer, menciptakan dan memapatenkan sebuah simulator yang disebut Sensorama dengan visual, getaran dan bau. Pada tahun 1966, Ivan Sutherland menemukan head-mounted display yang dia claim adalah, jendela ke dunia virtual.

Tahun 1975 seorang ilmuwan bernama Myron Krueger menemukan Videoplace yang memungkinkan pengguna, dapat berinteraksi dengan objek virtual untuk pertama kalinya. Tahun 1989, Jaron Lanier, memeperkenalkan Virtual Reality dan menciptakan bisnis komersial pertama kali di dunia maya, Tahun 1992 mengembangkan Augmented Reality untuk melakukan perbaikan pada pesawat boeing, dan pada tahun yang sama, LB Rosenberg mengembangkan salah satu fungsi sistem AR, yang disebut Virtual Fixtures, yang digunakan di Angkatan Udara AS Armstrong Labs, dan menunjukan manfaatnya pada manusia, dan pada tahun 1992 juga, Steven Feiner, Blair Maclntyre dan dorée Seligmann, memperkenalkan untuk pertama kalinya Major Paper untuk perkembangan Prototype AR.

Pada tahun 1999, Hirokazu Kato, mengembangkan ArToolkit di HITLab dan didemonstrasikan di SIGGRAPH, pada tahun 2000, Bruce.H.Thomas, mengembangkan ARQuake, sebuah Mobile Game AR yang ditunjukan di International Symposium on Wearable Computers.
Pada tahun 2008, Wikitude AR Travel Guide, memperkenalkan Android G1 Telephone yang berteknologi AR, tahun 2009, Saqoosha memperkenalkan FLARToolkit yang merupakan perkembangan dari ArToolkit. FLARToolkit memungkinkan kita memasang teknologi AR di sebuah website, karena output yang dihasilkan FLARToolkit berbentuk Flash. Ditahun yang sama, Wikitude Drive meluncurkan sistem navigasi berteknologi AR di Platform Android. Tahun 2010, Acrossair menggunakan teknologi AR pada I-Phone 3GS.

sumber : belajar-ar.blogspot.com

Augmented Reality

2011-07-09T03:35:00.000-07:00

Augmented Reality (AR), adalah sebuah penggabungan gambaran 2 dimensi dan atau 3 dimensi kedalam proyeksi waktu nyata. Sejarah tentang augmented reality dimulai dari tahun 1957-1962, ketika seorang penemu yang bernama Morton Heilig, seorang sinematografer, menciptakan dan memapatenkan sebuah simulator yang disebut Sensorama dengan visual, getaran dan bau. Pada tahun 1966, Ivan Sutherland menemukan head-mounted display yang dia claim adalah, jendela ke dunia virtual.

Penjelasan AR ini dapat dipahami dengan baik bila kita melihat contoh secara langsung. Untuk melihatnya kita bisa lihat video demo AR di youtube. Dari layar kita bisa melihat ada sebuah benda muncul di depan objek yang menjadi marker (untuk Artoolkit)/target (untuk popcode).

Bidang-bidang yang pernah menerapkan teknologi augmented reality adalah:

Kedokteran (Medical): Teknologi pencitraan sangat dibutuhkan di dunia kedokteran, seperti misanya, untuk simulasi operasi, simulasi pembuatan vaksin virus, dll. Untuk itu, bidang kedokteran menerapkan augmented reality pada visualisasi penelitian mereka.
Hiburan (Entertainment): Dunia hiburan membutuhkan augmented reality sebagai penunjang efek-efek yang akan dihasilkan oleh hiburan tersebut. Sebagai contoh, ketika sesorang wartawan cuaca memperkirakan ramalan cuaca, dia berdiri di depan layar hijau atau biru, kemudian dengan teknologi augmented reality, layar hijau atau biru tersebut berubah menjadi gambar animasi tentang cuaca tersebut, sehingga seolah-olah wartawan tersebut, masuk ke dalam animasi tersebut.
Latihan Militer (Military Training): Militer telah menerapkan augmented reality pada latihan tempur mereka. Sebagai contoh, militer menggunakan augmented reality untuk membuat sebuah permainan perang, dimana prajurit akan masuk kedalam dunia game tersebut, dan seolah-olah seperti melakukan perang sesungguhnya.
Engineering Design: Seorang engineering design membutuhkan augmented reality untuk menampilkan hasil design mereka secara nyata terhadap klien. Dengan augmented reality klien akan tahu, tentang spesifikasi yang lebih detail tentang desain mereka.
Robotics dan Telerobotics: Dalam bidang robotika, seorang operator robot, mengunnakan pengendari pencitraan visual dalam mengendalikan robot itu. Jadi, penerapan augmented reality dibutuhkan di dunia robot.
Consumer Design: Virtual reality telah digunakan dalam mempromsikan produk. Sebagai contoh, seorang pengembang menggunkan brosur virtual untuk memberikan informasi yang lengkap secara 3D, sehingga pelanggan dapat mengetahui secara jelas, produk yang ditawarkan.

Referensi : belajar-ar.blogspot.com

Wikipedia indonesia

NES GAME YANG TERLUPA

2011-06-20T01:40:00.000-07:00

"Nintendo Entertainment System, atau NES, adalah sebuah konsol permainan video 8-bit yang dirilis oleh Nintendo di Amerika Utara, Eropa dan Australia pada tahun 1984. Seblumnya, versi Jepangnya dikenal dengan nama Nintendo Family Computer atau Famicom telah dirilis pada tahun 1983 dan didistribusikan di beberapa negara seperti Cina, Vietnam, Singapura, Timur Tengah dan Hong Kong. Di Korea Selatan, itu dikenal sebagai Comboy Hyundai dan didistribusikan oleh Hyundai Electronics. Sedangkan di Rusia, diproduksi secara tamap lisensi dengan nama Dendy (bahasa Rusia: Денди). Demikian pula di India, NES diproduksi tanpa lisensi dan sangat populer dengan nama Little Guru dan Wiz Kid [1]. Kasus yang sama terjadi juga di Polandia yang disebut dengan Pegasus."

itu adalah penjelasan tentang NES. tapi untuk lebih mudah lagi adalah melihat gambar dibawah ini

ini adalah game console terlaris di era 90an. namun sekarang game console ini hampir tidak ada yang memainkan. namun jika anda kangen untuk memainkannya, kita bisa menggunakan PC untuk memainkannya karena sudah ada emulatornya. gamenya pun bisa kita dapatkan di internet (biasanya saya cari di 4shared.com dengan kata kunci .NES).
untuk contohnya bisa di klik link ini

referensi :http://nunugenius.net/nes-download-lengkap

read more...

merubah favicon pada bloger

2011-05-26T20:15:00.001-07:00

Bloger memiliki favicon secara default yaitu huruf B, untuk merubahnya dengan keinginan kita dengan cara :
1. Upload gambar yang akan di jadikan favicon ke photobucket.com (jika belum memiliki akun maka harus sign up terlebih dahulu)
2. setelah gambar terunggah lalu copy link gambar tersebut.
3. sign in ke dalam blogger
4. masuk ke rancangan/layout lalu pilih edit html
5. cari (ctrl+F)
6. sisipkan code ini diatas
7. save

MAVIS BEACON PLATINUM 20

2011-05-24T08:02:00.001-07:00

mavis beacon teaches typing platinum 20, adalah aplikasi yang membantu untuk belajar mengetik dengan 10 jari. aplikasi ini cocok bagi pengguna komputer yang terbiasa dengan menggunakan 11 jari (baca: hanya jari telunjuk). mavis beacon 20 platinum ini merupakan pengembangan dari aplikasi mavis beacon versi sebelumnya dari broderbund.
sebelumnya (saat saya masih kursus di donbosco tigaraksa, th 2007) saya diberikan pelajaran mengetik dasar dengan menggunakan aplikasi mavis beacon versi 10. saya rasa aplikasi ini sangat membatu saya disaat itu. dari hasi pengamatan saya, pengembangan mavis beacon platinum 20 dibandingkan dengan mavis beacon versi 10 atau versi sebelumnya adalah tampilan yang lebih atraktif, selain itu adanya penambahan bebarapa game sehingga membuat tidak bosan bagi penggunanya. selain itu ukuran filenya pun lebih kecil dari versi sebelumnya sekitar 100mb.

download mavis beacon platinum 20

RUNNING KEY CHIPER

2011-05-19T10:18:00.000-07:00

Artikel ini berkenaan dengan tugas mata kuliah keamanan komputer. saya mendapat tugas untuk menyusun artikel dengan tema running key chiper, namun sangat jarang sekali halaman-halaman website yang menyajikan informasi tentang running key chiper secara jelas. karena itu saya coba angkat tulisan ini ke internet.
RUNNING KEY CHIPER/BOOK KEY CHIPER adalah kriptografi klasik yang menggunakan tabula recta dan buku sebagai medianya. Cipher ini menggunakan teks dari sebuah sumber (misalnya buku) untuk mengenkripsi plaintext. Kunci, diketahui oleh pengirim dan penerima yang dimaksud, dapat berupa halaman dan jumlah baris dari teks pada buku.

Contoh :
Misalkan kita ingin mengirimkan pesan kepada seseorang, terlebih dahulu kita harus menyepakati buku yang akan digunakan sebagai media penyampaian pesan. Pada contoh kali ini kita akan menggunakan buku “The C Programming Language (1978 edition)”. Dan menggunakan tabula recta sebagai tablo nya.
Langkah pertama
Kita pilih titik awal, disini penulis memilih halaman 63 baris pertama.
“errors can occur in several places. A label has...”
Teks yang akan disampaikan
“Flee at once”
Plaintext: f l e e a t o n c e
Running key: E R R O R S C A N O
Ciphertext: J C V S R L Q N P S

Selanjutnya kita perlu memberitahu penerima di mana menemukan running key untuk pesan ini. Dalam hal ini, kami telah memutuskan untuk membuat sebuah blok palsu dari lima karakter ciphertext, dengan tiga yang menunjukkan nomor halaman, dan dua nomor baris, menggunakan A 0 =, B = 1 dll untuk menyandikan digit. Seperti blok yang disebut blok indikator. Blok indikator akan dimasukkan sebagai yang terakhir kedua setiap pesan. (Tentu saja, skema lainnya yang mungkin untuk blok indikator bersembunyi). Jadi halaman 63, baris 1 encode sebagai 'AGDAB' (06301).

TABULA RECTA

BACA SELENGKAPNYA

craagle mesin pencari serial number

2011-05-08T20:29:00.000-07:00

kita sebagai pengguna komputer pastinya sudah tidak asing dengan aplikasi/ program bajakan. biasanya program bajakan tersebut meminta serial number untuk mendapatkan full version.
craagle adalah software yang membantu kita untuk mencari serial number atau pun crack dari program yang kita inginkan, meskipun tidak semua aplikasi bisa di dapatkan serial numbernya namun program ini cukup membantu untuk mencari serial number program-program yang sudah terkenal kegunaannya seperti microsoft office atau corel draw. cara penggunaan aplikasi craagle juga sangat mudah, hanya memasukan nama aplikasi yang akan dicari serial numbernya. namun sebelum melakukan pencarian terlebih dahulu pastikan komputer anda terkoneksi dengan internet.

baca lebih lanjut....

Seagate expansion drive 320 gb tidak terdetek

2011-04-28T08:00:00.000-07:00

saya memiliki harddisk external expansion drive 320gb. suatu ketika saya mencabut harddisk external tersebut dari pc tanpa eject. mungkin karena terlalu sering melakukan hal itu sehingga harddisk external saya menajadi tidak terdeteksi. saya sempat bingung karena sebelumnya saya memindahkan semua file penting dari laptop saya ke Harddisk. saya mencoba mencari solusi dari mbah google, tapi saya tidak menemukan satu pun solusi yang cocok. dari internet saya disarankan untuk membuka command prompt di windows,Kemudian mengetik pada command prompt perintah sebagai berikut :
chkdsk x: /F di mana X diganti dengan path di mana harddisk/partisi harddisk. namun solusi ini tidak behasil karena harddisk external saya tidak terdeteksi sama sekali. akhirnya saya mendapat saran dari teman kampus untuk membongkar harddisk tersebut. kondisi harddisk saya saat itu lampu indikatornya hanya nyala saat usb di plug in. tapi setelah itu mati lagi, disknya pun terasa berputar hanya saat lampu indikator menyala, di windows hanya ada konfimasi bahwa usb not recognize.
saya membongkar harddisk external tersebut dan ternyata harddisk tersebut berisi harddisk sata seperti harddisk internal yang biasa pada pc dan tersambung dengan converter sata to miniusb.

saya coba menyambungkan langsung ke PC dengan kabel sata dan melakukan instalasi dengan ubuntu ternyata berhasil. semua data saya bisa diambil.

Memasang Favicon.ico

2011-04-09T18:34:00.000-07:00

favicon.ico adalah icon yang berada pada sebelah url. untuk memasangnya terlebih dahulu buat dulu icon dengan corel, atau photoshop. biasanya ukurannya kecil yaitu 16x16 dengan beri nama favicon.ico

Memasang favicon.ico

Simpanlah file favicon.ico di root direktori dari website anda. Oh iya saya pernah mengalami beberapa kasus web hosting tidak bisa membuat favicon bekerja. Jika anda menemui masalah ini email saja web hosting anda untuk menanyakan masalahnya. Tetapi sebagian besar web hosting dapat menampilkan favicon. Setelah file favicon.ico anda tersimpan dengan baik , anda perlu memanggilnya melalui kode HTML diantara tag . Anda perlu menggunakan kode berikut ini:

</span>Judul Website<span class="shkeyword">

Sekarang buka browser anda dan periksalah favicon anda akan muncul disebelah URL anda. Perlu di ingat jika anda menggunakan Internet Explorer 6 kebawah favicon hanya muncul jika anda telah memasukkan website anda ke folder favorites. Atau untuk mudahnya anda gunakan saja Opera atau Mozilla atau Internet Explorer 7 Beta yang semuanya telah dapat memunculkan favicon pada address bar.

Mungkin favicon terlihat sederhana, tetapi dapat membuat website anda terlihat sedikit lebih menarik.

UNTUK LEBIH JELAS KLIK DISINI

(saya lupa menyadur artikel ini dimana)

Membuat Browser Bergetar.

2011-04-08T06:17:00.000-07:00

kali ini saya mencoba menyajikan trik membuat browser bergetar. langsung saja ke tutorialnya
buka notepad lalu ketikan coding dibawah ini (copypaste aja biar cepet), lalu save dengan extension *.html

Browser yang bisa menari

Membuat form TIP OF THE DAY dengan VB 6.0

2011-03-31T02:35:00.000-07:00

Membuat form TIP OF THE DAY
Form tip of the day merupakan sebuah form yang sering terdapat pada program-program komersial yang berfungsi untuk memberikan penjelasan cara menggunakan aplikasi bawaannya tersebut.
1.Buat sebuah file dengan nama TIPOFDAY.TXT dengan notepad
2.pada file TIPOFDAY.TXT tersebut ketikan naskah yang ingin dimunculkan. Tiap tip dibuat dalam satu baris. Untuk menambah tip yang lain, ketikan tip berikutnya pada baris dibawahnya.
3.simpan TIPOFDAY.TXT tersebut pada folder yang sama dengan file program yang akan kita buat.
4.buka visual basic 6.0. pilih menu Project =>add form => pilih form Tip Of the Day dan kemudian klik OK
5.buka kembali form1 lalu tambahkan commandbutton pada form. Ketikan listing berikut pada form1

Private Sub Command1_Click()
Form1.Hide
'menyembunyikan form1
Load frmTip
frmTip.Show
'menampilkan form tip of the day
End Sub

6.simpan d folder yang sama dengan file TIPOFDAY.TXT tadi. Untuk mencobanya sebaiknya buat aplikasi yang kita buat tadi menjadi .exe dengan cara pilih menu File =>make project1.exe, dan sekali lagi simpan program ini di folder yang sama dengan file TIPOFDAY.TXT

sumber: Tip&Trik Pemrograman Visual Basic 6.0

Membatasi Bandwidth tanpa software

2011-03-24T05:54:00.000-07:00

Untuk membatasi Bandwidth di Win XP kita bisa menggunakan pengaturan pada gpedit.msc. cara ini cukup berguna dan hemat biaya untuk pengaturan bandwidth di warnet-warnet sederhana (mengingat sekarang ini sudah menjamur warnet-warnet sederhana maupun sekelas game online).
berikut cara pengaturannya:

1. Masuk ke menu Run dari start
2. ketik gpedit.msc

3. masuk ke menu Administrative Templates ==> Network ==> QoS Packet Scheduler lalu double klik pada Limit reservable bandwidth

4. pilih opsi Enable dan tentukan berapa persen Bandwidth yang di bagi atau dibatasi.

5. klik OK. lalu restart.

Namun cara ini kurang berguna bisa warnet ya tidak selalu ramai pengunjung karena tidak bisa otomatis membagi bandwidth yang sesuai dengan jumlai client yang sedang online. selain itu cara ini juga tidak akan berguna bila ada client yang mendownload dengan download manager seperti internet download manager.

Aku bergumam tentang ibu

2010-06-17T01:26:00.000-07:00

Menurutku wanita adalah makhluk paling istimewa di dunia ini, karena wanita akan menjadi seorang ibu. Dia lembut, halus dan penyabar. Bagi umat islam, wanita adalah makhluk paling mulia. Bayangkan saja ada ungkapan surga di telapak kaki ibu. Nabi Muhamad pun pernah berkata bahwa kita harus menghormati dan menyayangi ibu, ibu, ibu, ayah dan seterusnya. Bukan tanpa alasan seorang baginda Rosull menyebut kata “ibu” sampai tiga kali. Coba kita renungkan peran ibu.

Pagi-pagi buta di dapur sudah terdengar suara ibu sedang memasak. Ini terjadi setiap hari, saat aku terjaga dari tidurku. Tidak dapat ku bayangkan betapa lelahnya hari-hari ibuku. Setiap pagi harus bangun jam 3 untuk mempersiapkan makanan-makanan yang akan di perdagangkan di sebuah pabrik kecil di dekat rumah kami.

Ibu berdagang di sebuah pabrik kecil yang berada di kawasan industri dekat dengan tempat tinggalku. Setiap harinya ibu berjualan sejak pukul 6 pagi hingga pukul 8 malam. Kadang aku selalu sedih bila ingat dengan ibuku. Dia membanting tulang untuk membiayai kehidupan kami dan biaya sekolah aku dan tiga adikku.

Kami bersyukur punya ibu tegar dan tangguh seperti dia. Beberapa tahun yang lalu kehidupan kami sangatlah sulit, ayah kami yang di pecat dari perusahaan tekstil memilih pergi mencari pekerjaan di luar kota, namun hingga sekarang tidak pernah ku dapat kabarnya. Kabar yang ku dapat malah dari orang lain yang bercerita bahwa ayahku sudah menikah dengan janda kaya. Sekarang aku tidak ingin membicarakan itu.

Karena ibu, kebutuhan kami dapat terpenuhi, meski dengan mengorbankan jiwa dan raganya. Ibu membiayai kuliah ku, sekolah adik-adikku, tak banyak yang dapat ku lakukan saat itu. Kami bertekad akan membahagiakannya di masa tua.

Akhirnya kami menjadi orang-orang yang berhasil. Adik ku yang pertama kini menjadi seorang dokter di salah satu rumah sakit besar di ibu kota, adikku yang kedua kini sudah menjadi artis terkenal, dan adikku yang paling kecil menjadi designer terkemuka di negara ini. Tak dapat dipungkiri semua itu tak lepas dari hasil kerja keras ibuku.

Tapi apa yang ia dapat di masa tuanya?

Seiring dengan suksesnya kami, usia dan kondisi ibu semakin menua dan melemah. Ibu tidak bisa lagi jadi wonder woman, dia hanya bisa duduk di kursi roda. Tapi kami terlalu sibuk dengan urusan masing-masing. Sulit bagi kami untuk dapat menemani ibu meski hanya satu bulan sekali.

Sesekali ibu mengeluh kepada kami, dia ingin ada yang menemani. Aku dan ketiga adikku mencoba berunding untuk mencari solusi yang tepat bagi ibu, akhirnya kami memutuskan untuk mengajak ibu tinggal bersama kami dengan membagi periode waktu tiga bulan sekali.

Bulan pertama adalah adikku yang pertama. Pada hari-hari pertama ibuku merasa senang tinggal bersamanya. Adikku sangat telaten menjaganya. Namun setelah dua bulan adikku di tugaskan untuk pindah tugas ke luar negeri. Adikku sudah konfirmasi dengan kami, namun tidak ada satupun dari kami yang mengindahkan, kami merasa sibuk. Lagi pula akan ada giliran nanti. Ibu hanya tinggal dengan dua orang pembantu dan satu orang supir yang siap mengantarkan kemana saja bila ia ingin, ibu hanya bisa terima.

Periode pertama usai, kini adikku yang kedua mendapat jadwal mengurus ibu di rumahnya. Tapi apa yang ibu dapat? Ibu malah selalu di tinggal oleh adikku. Maklum saat itu adikku sedang naik daun di dunia perfilman. Ibu merasa kesepian jika hanya di temani oleh para pembantu. Ibu mencoba menghubungi adikku yang ketiga, tapi adikku sedang ada di luar negeri menemani suaminya yang sedang tugas.

Ibu terus mengeluh sampai akhirnya kami berunding agar ibu di tempatkan di panti jompo dengan kualitas paling mahal. Ibu mulai di taruh di panti jompo, satu dua bulan kami selalu mengunjungi dan menelponnya. Tapi belakangan kami semua sibuk sehingga tidak sempat mengunjungi.

Saat di panti jompo ibu mulai sakit-sakitan, tidak ada satupun dari kami yang mempunyai waktu luang untuk mengunjungi, meski kami mendapat kabar dari para suster yang merawat ibu, bahwa keadaan ibu sudah sangat lemah dan ingin kami ada di dekatnya, tapi kami tetap tidak mengindahkannya. Kami malah berkata akan menambah biaya ibu empat kali lipat untuk panti jompo asal ibu mendapat perawatan terbaik. Tapi bukan itu yang di inginkan ibu.

Lebih dari satu tahun ibu sakit, akhirnya ibu meninggal dunia. Namun kami tidak tahu akan kematian ibu. Pihak panti yang biasa menghubungi adikku yang paling kecil menjadi sulit karena keberadaan dia di luar negeri. Sayangnya pihak panti tidak mengetahui no HP adik-adikku yang lain.

Setelah satu tahun kematian ibu, akhirnya adik-adikku kembali ke indonesia dan berunding untuk menjemput ibu kembali dari panti asuhan. Awalnya kami ingin memberi sureprize pada ibu dengan datangnya kami. Tapi apa yang kami dapat?

Ibu yang malah memberi sureprize.

“Ibu meninggal dunia”, itu lah kata-kata yang kami dapat dari pihak panti, lalu pihak panti menceritakan semua yang terjadi pada ibu kepada kami. Kami hanya bisa menyesal dan menangisi kepergian ibu. Meski semuanya sudah terlambat.

Sepucuk surat ibu titipkan dan ibu tinggalkan pada pihak panti dan berharap dapat di berikan kepada kami kelak.

“Anak-anakku yang ku cinta, kini sudah sampai di penghujung perjalanan ibu. Ibu bangga pada kalian. Jirihpayah ibu selama ini tidak sia-sia. Maafkan ibu yang selalu mengeluh di masa tua ibu. Ibu berharap kalian dapat menjadi keluarga yang baik yang selalu di sayangi oleh anak-anak kalian hingga ajal menjemput kalian. Kini ibu pergi dan akan mendapat tempat yang layak, yaitu tinggal bersama kakak kalian. Anak pertama ibu, yang sudah mendahului ibu.

Ibu cinta kalian”

Itulah secarik surat yang di tinggalkan ibu untuk kami.

Pesta Dunia VS Kehancuran di Gaza

2010-06-10T19:03:00.000-07:00

seiring dengan deru nya suasana piala dunia, bunyi ledakan mendebarkan semua gendang telinga, seluruh dunia pun ikut berpesta. tapi tidak begitu dengan saudara-saudara kami di Gaza sanah. memang sama-sama bunyi ledakan, tapi yang memporak-porandakan seluruh harapan. kematian dimana-mana, namun hanya mereka saja yang bersedih. sepertinya dunia tidak menghiraukan kesedihan dan kehancuran mereka. dunia bahkan bangsa saya sendiri lebih menyemarakkan pesta dunia itu meskipun tak ada anak bangsa yang mewakili berjuang.

NAWALA = Cara mudah buat warnet sehat

2010-06-09T19:16:00.000-07:00

"Nawala Project adalah sebuah layanan yang bebas digunakan oleh pengguna internet yang membutuhkan saringan konten negatif. Nawala Project secara spesifik akan memblokir jenis konten negatif yang tidak sesuai dengan peraturan perundangan, nilai dan norma sosial, adat istiadat dan kesusilaan bangsa Indonesia seperti pornografi dan perjudian. Selain itu, Nawala Project juga akan memblokir situs Internet yang mengandung konten berbahaya seperti malware, situs phising (penyesatan) dan sejenisnya.

Perlindungan pengguna, terutama anak-anak menjadi perhatian utama Nawala Project. Dengan adanya layanan ini diharapkan Internet dapat menjadi tempat yang lebih aman dan nyaman agar dapat dimanfaatkan secara optimal oleh masyarakat Indonesia untuk mempercepat kemajuan serta kesejahteraan.

Layanan ini sejak awal dirancang untuk menerima masukan langsung dari komunitas internet dan Masyarakat Umum yang menjadi pengguna layanan. Masukan inilah yang ditelaah oleh Tim Nawala Project untuk menentukan apakah sebuah situs layak di filter atau tidak."

Bagi rekan-rekan pemilik warnet, mari kita dukung warnet sehat. salah satunya dengan menggunakan DNS dari NAWALA.org.
Cara menggunakannya sangat mudah yaitu hanya dengan mengganti DNS pada komputer client,
DNS Nawala
DNS #1: 180.131.144.144

DNS #2: 180.131.145.145

Cara Membuat Installer Suatu Program Aplikasi

2010-06-07T08:06:00.000-07:00

Installer adalah sebuah aplikasi yang dimana untuk mengekstrak file yang dibungkus ke dalam file arsip seperti WinRAR atau WinZip ke folder yang dimana kamu letakkan direktorinya contohnya: C:\Program Files\(nama foldernya).

Membuat installer itu sangatlah mudah sekali,apalagi sudah mahir. Yang terutama adalah kita punya aplikasi khusus InstallerMaker seperti: Nullsoft Installer System (NSIS),WinRAR,dan masih banyak lagi.

Disini saya hanya akan memberikan tutor pengistallan yang mudah yaitu dengan WinRAR:

1. Pertama kamu harus punya WinRAR terlebih dahulu, apabila tidak punya, anda dapat mendownloadnya dengan versi 3.90Disini

2. Setelah itu installah WinRARnya,kemudian buka folder yang kalian mau dibikin installernya.

3. Kemudian pilih semua file yang mau dibikin installernya dengan menekan tombol pintasnya Ctrl + A.

4. Kemudian pointer komputer kamu harus berada pada posisi file yang sudah dipilih yang dilanjuti dengan mengklik mouse kanan dan pilih “Add to archive…”.

5. Setelah itu pada kotak dialog muncul beberapa pilihan pada kotak “Archiving options” dan pilih “Create SFX archive”.

6. Setelah itu klik .RAR pada kotak Archive format. Kenapa pilih .rar? karena ada perbedaan antara file arsip .rar dengan .zip yaitu file arsip .rar biasanya kompresan file kuat jadi bisa makan ratio kompresan sampai 50%,semakin kurang ratio kompresan maka membuat muatan file arsipnya kecil dan jadi mudah dipindahkan ke direktori mana saja.

7. Setelah itu pilih “Advanced” untuk mengatur mode installer yang akan di buat.

8. Setelah itu klik button “SFX options” untuk mengatur rancangannya.

9. Pada pilihan General isi kotak Path to extrac dan isikan dengan tulisan C:\Program Files\(nama foldernya).

10. Pilih Advanced untuk membuat shorcut,dengan klik button Add shortcut…

11. Pada kotak dialog add shortcut pilihlah dimana shortcutnya dibuat pada Where to create.

12. Kemudian pilih Desktop jika kamu ingin muncul jalan pintasnya di depan layar komputer.

13. Isilah source file name yaitu file aplikasi dasar dimana yang ada pada folder program kamu.contoh: Application.exe,maka pada kotak source file name tersebut kamu isikan yang sama dengan nama file aslinya.

14. Isi shortcut name dengan menuliskan nama file pintas yang kamu inginkan. Jika sudah klik Ok

15. Jika ada lagi yang mau dibuat shortcutnya,klik lagi add to shortcutnya. Jika mau dibikin ke folder start pilih Start Menu/Program dan caranya sama dengan tutor dari nomor 13 dan 14.

16. Kemudian pilih “Text and icon” untuk mengisi rancangan lainnya.

17. Isi Title of SFX window untuk mengisi nama installernya.

18. Isi Text to display in SFX window untuk mengisi petunjuknya.

19. Kemudian pada kotak Customize SFX logo and icon pilih browse pada kotak “Load SFX logo from the file” itu untuk apa?,yaitu untuk memasukan mode gambar pada installer kamu. Filenya harus berformat .bmp ukurannya disarankan 100 x 300 juga muatannya maksimal 300 kb.

20. Setelah itu pilih browse pada kotak “Load SFX icon from the file” untuk apa juga?,yaitu untuk membuat tampilan ikon gambar installer kamu. Filenya harus asli yang berformat .ico,bukan file dari .bmp terus diubah formatnya menjadi .ico paham?.

21. Pilih License untuk membuat tampilan installer kamu lebih menarik dengan lilensi atau ketentuan syarat sah untuk pemakai.

22. Isilah judul lilensinya yang dilanjutkan mengisi isi lilensinya.

23. Kemudian jika ada lagi yang diisikan atau diatur silahkan kamu atur sendiri,kenapa?,karena disini saya hanya memberi tutor yang mudahnya saja. (It’s only easy)

24. Setelah itu klik Ok untuk SFX options dan kemudian klik Ok lagi pada kotak dialog WinRARnya.

25. Tunggulah sampai beberapa saat sampai selesai.

(ini saya dapat dari postingan tetangga)

Kumpulan lagu

2010-06-05T19:44:00.000-07:00

Kumpulan Lagu yang di share di 4shared.com

five minute-selamat tinggal
five minute-teman biasa
five minute-sumpah mati
five minute-Aku tergoda
Five minute-AISAH
five minute-selamat tinggal (New Version)
five minute-semakin ku kejar semakin kau jauh
five minute-salah apa
five minute-Bertahan
five minute- Aku Patut Membenci Dia
five minute-salam terakhir
five minute-ampuni aku
five minute-Apatis (Ku hanya bisa mendengar)
five minute-Pujaan hati (new version)
five minute-Satu hati
five minute-ambilkan bulanku
five minute-takkan rela
five minute-Hampa
five minute-Aku akan Pergi
five minute-salam terakhir
five minute-Bidadari
five minute-tak merasa bersalah
five minute-Luka Cinta
five minute-teman biasa
five minute-Jangan sakiti Aku
five minute-Rasa Cinta
five minute-katakan sebenarnya
five minute-Perih
five minute-ternyata
five minute-Benarkah Cinta
five minute-tanpa ada cinta
five minute-oow oow
five minute-Bila
five minute-Direlung hati
five minute-KetulusanMu
five minute-Andai kau setia
five minute-masihkah aku
five minute-jauhi dirinya
five minute-kuberi khayal
five minute-selingkuh
hello-Dua cincin
Hello-Biarkan Berlalu
Michael Heart-WE WILL NOT GO DOWN (Song for Gaza)

Memainkan Flash (*SWF) di Delphi

2010-06-02T01:58:00.000-07:00

Di Kampus saya mendapatkan tugas untuk membuat program menggunakan delphi, maka kali ini saya juga berniat membuat postingan sederhana tentang Delphi 7 memainkan file berekstensi *SWF.

coding yang diketikkan hanya

ShockWaveFlash1.Movie := GetCurrentDir + '/tes.swf';
ShockWaveFlash1.Play;

langkah pertama

buat project baru, lalu masukkan komponen shockWaveFlash,
double klik pada area form (bukan area shockwaveflash) dan copy paste coding diatas.
sehingga tampak seperti ini

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, OleCtrls, ShockwaveFlashObjects_TLB;

type
TForm1 = class(TForm)
ShockwaveFlash1: TShockwaveFlash;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
ShockWaveFlash1.Movie := GetCurrentDir + '/tes.swf';
ShockWaveFlash1.Play;
end;

end.

Simpan project tersebut dalam sebuah folder beserta file *swf, dalam hal ini saya memberikan nama file tersebut adalah tes.swf, setelah itu silahkan project di Running
bila shockwaveflash tidak berfungsi maka coba copy paste komponen shockwaveflash dari contoh source code berikut.

Download Contoh

Terima Kasih,

LATIHAN SISTEM DATABASE

2010-06-02T01:42:00.000-07:00

Minggu kemaren saya diberikan tugas kampus mengenai SQL, jadi saya pikir lumayan buat tambahan postingan.

A. Sebuah klinik ingin melakukan komputerisasi untuk mendukung operasionalnya. Untuk itu dibutuhkan sebuah aplikasi Client/Server untuk mendatakan seluruh dokter dan pasiennya. Anda sebagai seorang programmer, mengusulkan untuk membuat database menggunakan Microsoft SQL Server karena dapat mendukung aplikasi Client/Server. Sebagai awal dari perancangan sistem informasi anda ditugaskan untuk membuat suatu database dengan nama KLINIK.

Buat database dengan nama Klinik_nim anda

Dengan ketentuan :

- (untuk file .mdf)

Name = klinik_dat,

filename = 'D:\Lat_SisDat\klinik_dat.mdf',

size = 1, maxsize = 2, filegrowth = 1

- (Untuk file .log)

name = klinik_log,

filename = 'D:\Lat_SisDat\klinik_log.ldf',

size = 1MB, maxsize = 2MB, filegrowth = 1MB )

Tabel-tabel yang dibutuhkan diantaranya :

Dokter :

KdDokter char(5), NmDokter varchar(30), Spesialisasi Char(2), Golongan char(1)

Pasien :

KdPasien char(5), NmPasien varchar(30), JenKel char(1), Umur tinyint

TrKlinik :

KdTransaksi char(5), TglPeriksa datetime, KdDokter char(5), KdPasien char(5), Biaya Money(8)

Isilah tabel-tabel tersebut dengan data-data berikut ini

Tabel Dokter

KdDokter	NmDokter	Spesialisasi	Golongan	Supervisor
DR001	Nelly Gunardi	GG	1	DR007
DR002	Hadi Mulyadi	KD	3
DR003	Ahmad Dani	KL	3
DR004	Nobita	AK	1	DR008
DR005	Suneo Brotokusumo	BD	3
DR006	Dora	UM	2	DR009
DR007	Toto	GG	3
DR008	Kiki	AK	3
DR009	Opik	UM	3

Tabel Pasien

KdPasien	NmPasien	JenKel	Umur
PS001	Wahyu	L	23
PS002	Slamet	L	25
PS003	Lia Arman	W	27
PS004	Jonathan	L	30
PS005	Andri Graha Dewata	L	23
PS006	Anita Sakura	W	15
PS007	Gita Candra	W	10
PS008	Diana	W	5
PS009	Gery	L	29
PS010	Merry Resh	W	19

Tabel TrKlinik

KdTransaksi	TglPeriksa	KdDokter	KdPasien	Biaya
TR001	12/10/2007 5:00PM	DR001	PS005	50000
TR002	12/10/2007 6:30PM	DR003	PS005	25000
TR003	12/10/2007 7:00PM	DR002	PS002	35000
TR004	12/11/2007 5:00PM	DR004	PS007	25000
TR005	12/11/2007 5:15PM	DR004	PS008	75000
TR006	12/11/2007 6:00PM	DR005	PS002	50000
TR007	12/11/2007 6:30PM	DR004	PS007	25000
TR008	12/12/2007 4:30PM	DR005	PS004	80000
TR009	12/12/2007 5:00PM	DR002	PS002	70000
TR010	12/12/2007 6:00PM	DR006	PS005	40000
TR011	12/12/2007 6:45PM	DR006	PS001	55000
TR012	12/12/2007 7:00PM	DR004	PS008	95000
TR013	12/12/2007 7:30PM	DR006	PS003	35000
TR014	12/20/2007	DR005	PS010	25000
TR015	12/21/2007		PS009
TR016	12/21/2007	DR008
TR017	12/22/2007	DR009	PS011	35000

B. Untuk soal berikut ini tuliskan jawabannya dalam file .sql (file untuk menulis script di Query Analyzer) dengan nama file : lat4.sql

Pihak User ingin mendapatkan informasi-informasi sebagai berikut :

1. tampilkan kode dokter, nama dokter dan spesialisasi dari dokter yang memiliki golongan 3

2. tampilkan data pasien anak-anak (umurnya dibawah atau sama dengan 15)

3. tampilkan pasien yang memiliki umur diantara 20 sampai dengan 35 diurutkan berdasarkan abjad yang terbesar (dari huruf Z sampai ke A)

4. berapa jumlah pasien berjenis kelamin W yang berumur diatas 12 tahun

5. tampilkan kode pasien yang diperiksa tanggal 12/12/2007 diurutkan secara Ascending

6. Hitung total biaya yang dibayarkan oleh pasien yang memiliki kode ‘PS005’

7. Hitung total biaya yang dibayarkan oleh masing-masing pasien.

8. Hitung rata-rata biaya yang diterima oleh masing-masing dokter.

9. Hitung total biaya yang dibayarkan oleh masing-masing pasien yang ditangani dokter NOBITA

10. Hitung total biaya yang dibayarkan oleh pasien yang memiliki kode ‘PS005’ pada tanggal 12/10/2007

11. tampilkan TglPeriksa, kode dokter, nama dokter, spesialisasi

12. tampilkan kode transaksi, tgl periksa, kode dokter, nama dokter, kode pasien, nama pasien

13. tampilkan kode transaksi, nama pasien. Termasuk data yang NULL

14. tampilkan semua pasien yang dirawat oleh dokter Nobita

15. tampilkan kode transaksi, kode dokter, nama dokter, spesialisasi, nama pasien. Dimana data yang ditampilkan adalah dokter yang memiliki spesialisasi AK dan KD

Jawaban

--buat database
create database Klinik_0822461671
on (
name = klinik_dat,
filename = 'D:\Lat_SisDat\klinik_dat.mdf',
size = 1,
maxsize = 2,
filegrowth = 1)
log on (
name = klinik_log,
filename = 'D:\Lat_SisDat\klinik_log.ldf',
size = 1MB, maxsize = 2MB, filegrowth = 1MB )
go

--table dokter
use klinik_0822461671
create table Dokter
(
KdDokter char(5),
NmDokter varchar(30),
Spesialisasi char(2),
golongan char(1),
Supervisor char(5)
constraint PK_Dokter primary key (KdDokter))
--table pasien
use klinik_0822461671
create table Pasien
(
KdPasien char(5),
NmPasien varchar(30),
JenKel char(1),
Umur tinyint
constraint PK_Pasien primary key (KdPasien))

--table TrKlinik
use klinik_0822461671
create table TrKlinik
(
KdTransaksi char(5),
TglPeriksa datetime,
KdDokter char(5),
KdPasien char(5),
Biaya Money
constraint PK_TrKlinik primary key (KdTransaksi))

--menambahkan data di tabel dokter
insert into Dokter (KdDokter,NmDokter,Spesialisasi,Golongan,Supervisor)
values ('DR001','Nelly Gunardi','GG',1,'DR007')
insert into Dokter (KdDokter,NmDokter,Spesialisasi,Golongan)
values ('DR002','Hadi Mulyadi','KD',3)
--menambahkan data di tabel Pasien
insert into Pasien (KdPasien,Nmpasien,Jenkel,Umur)
values ('PS001','Wahyu','L',23)
--menambahkan data di tabel TrKlinik
insert into TrKlinik (KdTransaksi,TglPeriksa,KdDokter,KdPasien,Biaya)
values ('TR001','12/10/2007 05:00PM','DR001','PS005',5000)

select *from trklinik
where tglperiksa='12/10/2007 6:30pm'

-- No 1.
SELECT KDDOKTER,NMDOKTER,SPESIALISASI FROM Dokter
WHERE GOLONGAN=3

--No.2
select*from Pasien
where umur<=15

--No.3
select*from pasien
where umur between 20 and 35 order by nmpasien desc

--no.4
select count (jenkel) from pasien
where jenkel='w'

--no.5
select kdpasien from Trklinik
where tglperiksa between '12/12/2007 00:00:00'and '12/12/2007 23:59:00'
order by kdpasien asc

--no 6
select sum (biaya) from trklinik
where kdpasien='ps005'

--no 7
select kdpasien, sum (biaya) from trklinik
group by kdpasien

--no 8
select kddokter,avg (biaya) from trklinik
group by kddokter

--no 9
select nmpasien, sum (biaya) from trklinik A
inner join dokter B
on A.kddokter=B.kddokter
inner join pasien C
on A.kdpasien=C.kdpasien
where nmdokter='Nobita'
group by nmpasien

--no10
select KdPasien,sum (biaya) from trklinik
where tglperiksa between '12/10/2007 00:00:00' and '12/10/2007 23:59:00' and kdpasien='PS005'
and kdpasien='PS005'
group by kdpasien
--no 11
select tglperiksa,A.kddokter,nmdokter,spesialisasi from trklinik A
inner join dokter B
on A.kddokter=B.kddokter

--no 12
select kdtransaksi,tglperiksa,A.kddokter,nmdokter,C.kdpasien,nmpasien from trklinik A
inner join dokter B
on A.kddokter=B.kddokter
inner join pasien C
on C.kdpasien=A.kdpasien

--no 13
select kdtransaksi,nmpasien from trklinik A
inner join pasien B
on A.kdpasien=B.kdpasien

--no 14
select nmpasien from trklinik A
inner join pasien B
on A.kdpasien=B.kdpasien
inner join dokter C
on A.kddokter=C.kddokter
where nmdokter='Nobita'
group by nmpasien

--no 15
select kdtransaksi,A.kddokter,nmdokter,spesialisasi,nmpasien from trklinik A
inner join Dokter B
on A.kddokter=B.kddokter
inner join Pasien C
on A.kdpasien=C.kdPasien
where spesialisasi='AK' or spesialisasi='KD'

Source Code Tugas Pemrograman II

2010-05-30T01:48:00.000-07:00

Ini adalah source code untuk memenuhi tugas pemrograman II, source code ini program yang menamplikan harga dari komponen mobil. untuk lebih jelasnya silahkan download

mengambil data dari form lain

2010-05-24T20:43:00.000-07:00

Kali ini saya akan memberikan tip yang saya dapat dari hasil searching saya di google,
yaitu mengambil data iputan dari form lain dalam delphi.

caranya cukup menyebutkan nama form dari data yang di input terlebh dahulu,

form2.edit1.text:= form1.edit1.text;

lebih jelasnya silahkan download source codenya

Input-an Edit.text hanya angka atau huruf saja

2010-05-24T20:03:00.000-07:00

Ini adalah program yang memberikan validasi pada input-an edit.text pada delphi.
dimana edit.text hanya bisa di input nilai angka saja atau huruf saja. misalnya saja program yang meminta input-an banyaknya jumlah, user tidak mungkin memberikan input-an huruf, untuk menghindari itu maka kita perlu memberikan validasi.
caranya:
buat sebuah program dengan dua edit text.
dan ketikkan coding seperti di gambar

Berikut source codenya download

Tugas Delphi di kampus

2010-05-22T04:10:00.000-07:00

kali ini saya akan memberikan hasil pengerjaan tugas pemrograman II saya di PT Raharja, saya diminta untuk membuat program dengan bahasa pemrograman delphi,
SISTEM PAKAR KESEHATAN adalah nama dari program yang saya buat, program ini memang masih sangat jauh dari sempurna karena masih dalam pembuatan. program ini saya buat installer dalam winrar isinya program dalam bentuk .exe sekaligus seluruh komponen dalam pembuatannya.
silahkan download prgramnya

Sistem Pakar Kesehatan

Membuat Text berjalan pada Status Bar

2010-05-18T18:04:00.000-07:00

Buat Projek baru, lalu tambahkan komponen Microsoft Windows Common Control 5.0 (SP2)
Lalu beri komponen timer dan komponen status bar pada form.
Klik View Code dan ketikan coding seperti dibawah ini:

Dim Counter As Integer Private Sub Form_Load()

Counter = 0

Timer1.Interval = 50 'Atur kecepatannya di sini

With StatusBar1

.Panels(1).Width = 4000

.Panels(1).Alignment = sbrRight

End With

End Sub

Private Sub Timer1_Timer()

Dim Kalimat As String

Dim pnlX1 As Panel

Set pnlX1 = StatusBar1.Panels(1)

Kalimat = "Testing tulisan berjalan"

Counter = Counter + 1

DoEvents

pnlX1.Text = TulisJalan(Counter, Kalimat, 150)

End Sub

Public Function TulisJalan(Hitung As Integer, _

strKalimat As String, Panjang As Integer)

If Hitung = Len(strKalimat) + Panjang Then

Hitung = 0

ElseIf Hitung > Len(strKalimat) Then

TulisJalan = strKalimat & Space(Hitung - _

Len(strKalimat))

Else

TulisJalan = Mid(strKalimat, 1, Hitung)

End If

End Function

Menampilkan Waktu

2010-05-16T03:34:00.000-07:00

waktu
Untuk menampilkan tanggal atau waktu atau keduanya di delphi secara real time
anda bisa menggunakan Komponen Timer pada event OnTimer.
berikut ini tutorial singkatnya (saya menggunakan delphi 7) :

Buat sebuah project baru di delphi. tambahkan sebuah komponen Label dan sebuah komponen Timer (ada di tab System)
Set property Interval komponen Timer menjadi 100 atau berapa saja (satuan dalam milli second) lebih kecil interval yang diberikan, lebih cepat event OnTimer dieksekusi
Tambahkan perintah berikut pada Event OnTimer komponen Timer

label1.Caption :=

formatdatetime('"Tanggal : "dd/mm/yyyy',now)+chr(10)+

formatdatetime('"Pukul : "hh:nn:ss',now);

label1.Refresh;

Kode perintah di atas akan menghasilkan output tanggal seperti
25/02/2008 dan waktu seperti 14:15:15.
Anda bisa merubah format tampilan tanggal dan waktu sesuai dengan keinginan atau kebutuhan anda
dengan cara merubah parameter format tanggal atau waktu (tulisan yang ditebalkan) pada function formatdatetime diatas.

Cara membuat form bergradasi warna.

2010-05-16T03:28:00.000-07:00

Kali ini saya akan memberikan sedikit trik untuk membuat form pada delphi menjadi berwarna merah bergradasi hitam.

langkah yang pertama adalah buka projeck baru, pada form objeck inspektor klik event, cari onPaint dan berinilai FormPaint lalu klik onPaint tersebut. ketikan coding berikut:

procedure TForm1.FormPaint(Sender: TObject);
var
Row, Ht: Word;
begin
Ht:=(ClientHeight+255) div 256;
for Row:=0 to 255 do
with Canvas do
begin
Brush.Color:=RGB(Row,0,0);
FillRect(Rect(0,Row*Ht,ClientWidth,(Row+1)*Ht));
end;
end;