Jumat, 09 April 2010

CERITA HIDUPKU DI PEKANBARU, YANG KINI HaNYA MENJADI KENAGAN HIDUPKU…..


Awal aku mulai matrikulasi! (maklum, anak PBUD!!! “tapi kok Bongak”), aku merasa snagt canggung, bagaimana ya bertemu dengan orang-orang yang belum dikenal dari seluruh penjuru Riau, ternyata setelah duduk dibangku kuliah untuk pertama kalinya, aku merasa tidak bias bernafas!!! Aku merasa terkucilkan degan teman-teman yang lain, hati kecil ku berkata “aku merasa aku ini orang bodoh, aku berada ditengah-tengah orang yang aku fikir berilmu tinggi, apa aku mampu melakukan yang terbaik dari mereka???”. Utung aja saat itu aku sudah punya kenalan, namanya Nofri, diman saat pertama kali aku ketemu dengan dia sewaktu daftar ulang, yang dimana dia minta aku temeni untuk daftar ulang di puskom.

Stelah dosen masuk, semakin buat saya deg-deg an!!! Tenyata setelah lama mendengar dosen tu ceramah sepanjang-panjang, aku berkenalan dengan teman lagi, namanya putri dan elvina, dan kamipun saling berbagi crita tentang cerita masing-masing, tetapi dalam cerita kami terputus, karena pandangan kami tertuju dengan seorang teman yang melakukan tindakan yang aneh dan mengundang tawa, aku belum kenal dengan teman yang aneh tu, ternyata stetlah aku Tanya sama teman yang lain itu, mereka juga tidak tahu, dan aku juga kaget bahwa dikelasku ini ada anak SMP yang ikut kuliah juga!!! Aku fikir dia ini anak SMP, ternyata dia teman 1 kelas ku juga!!!saat tu aku tau namanya karena dia diangkat jadi Komting kami, namnya Arizal Nurohman!!!!

Untuk urusan asmara saat itu aku masih menjalin asmara dengan Maimunah salah satu teman dan pacarku dari tempat asalku, dia salah satu mahasiswi kedokteran yang diterima melalui jalur khusus, kalua diingat perjuangan untuk mendapatkan bangku kuliah itu sangat berat, tapi saat itu aku benar-benar senang, karena kami sama-sama ingin mengmbil jurusan dokter, tapi waluapun hanya dia yang lulus ya tak jadi masalah bagiku,

Apda suatu hari sewaktu aku ingin menuggu imay pulang dari kuliah matrikulasinya, aku bertemu dengan nofri, saat itu nofri dengan dua temen yang kukenali, tapi aku belum tau namanya, yang ku tahu satu orang aneh yang buat keanehan dikelas denga tingkah lakunya, dan satu lagi aku tak tau, ternyata setelah berkenalan nama orang aneh itu Ade Gunawan yang biasa dipanggil dengan pak de, aku pun heran kenapa dia dipanggil dengan sebutan itu, dan satu lagi bernama Kamaludin. Ternyata aku dan mereka sedang sama-sama menuggu seseorang, pak de n kawan2 sedang menunggu anak perawat yang katanyasih mau mereka incar(maklum anak perawatnya cewek)!

Setelah waktu berlalu, pada saatu hari pandangan ku tertuju pada seorang wanita, berbadan kecil dengan gaya yang ya lumayan nyentrik, pada saat itu aku penasaran sapa nama cewek itu, setelah mengorek infomasi, ternyata nama cewek itu Raja Silvia Nora, ternyatadia tu masih ada keturunan raja gitu deh, dan pada saat itu aku memanggil dia dengan sebutan tuan Puteri, tapi tiba2 dia mambalas dengan memanggilku Pangeran, akukaget mendengarnya, Pangeran???? Pangeran Monyet ya!!! Setelah lama berteman dengan dia. Ternyata dia asyik juga,………………………………. dan seterusnya……………. Dirahasia in ya…………………..

Singkat cerita, setelah selesai matrikulasi aku sudah banyak mengenal teman teman yang satu jurusan dengan ku, dan dimulailah kuliah ku baru terhitung masuk semester 1, tapi disaat itu aku sudah tidak canggung lagi, dan disitu juga aku melihat kisah asmara nofri, diman dia cerita bahwa dia suka dengan yang namanya Afriani Rizka, salah satu temen sekelasku, dia berjuang dan berusaha untuk mendekatinya, ya disaat itu aku mendukungnya banget!! (anak ketek, jangan emosi dulu ya???). tapi untuk kelanjutan asmara si nofri aku tak pernah tau ge entah apa lagi ceritanya,soalnya dia ga pernah cerita ge.

Setelah aku mulai kuliah, aku mencoba bagiamna, menyesuaikan diri denga teman-teman ku, bagaiman cartanya buat tugas di kelas, bagaimana caranya untuk ngasi contekan, dan masih banyak lagi, sampai sekarang aku juga masih melakukannya, walaupun aku tau tugas itu, tapi aku pura2 ga tau aja, sperti teman2 yang laen, untuk menyusaikan semuanya. Dan disaat masuk kuliah praktikum,ada seorang cewek dikelas itu, sama sekali belumpernah kulihat sekalipun, mungkin aku fikir dia itu senior yang ngulang, dan aku fikir dia tu orang yang bodoh makanya dia ngulang, tapi yang makin buat kau keasl sama dia, dia tu sombong, masa aku tegu dengan senyuman ku yang manis ini, dia malah diam aja dan membuang muka, “emangnya wajahku sjelek apasih????” tapi sewktu mulai beljar, dia terus aktif dikelas itu, disitu aku berfikir ga mungkin dia senior yang ngulang, karena sangking penasarannya, aku Tanya ma ilmiah, durotun, erwan, tapi mereka juga ga tau, yang aku herankandia setiap jam kuliah teori dia tidak pernah kelihatan, karena aku sangat penasaran, jadi setiap pergi kuliah aku tunggu, dan pulangpun aku unggu, tapi juga ga pernah kelihatan, tapi setiap jam kuliah praktikum, dia ada dikelas, sempat terfikir kalu mungkin dia tu setan yang pengen kuliah ya, dan akupun terus dan terus penasaran….

Pada suatu pagi, aku mendapat telepon, suara itu suara seorang wanita dengan tangisannya, ternyata suara itu suara adiknya imay, dia bilang bahwa mereka baru saja mengalami kecelakan, dan sedang dirawat dirumah sakit, akupun bergegas pergi kerumah sakit, padahal dikampus pagi itu juga ada Quiz dengan Pak hamidi, ternyata setelah sampai rumah sakit aku mendengar berita bahwa imay harus segera dioperasi, karena ada gumpalan darah dikepalanya akibat terbentur oleh trotoar jalan, disaat itu aku benar2 kalut dan hancur, aku ga tau lagi harus buat apa lagi, sedangkan imay sedang berteriak2 menahan rasa sakit, aku ga tau harus berbuat apa lagi, dokter ingin menjumpai aku, dan mengatakan “ Pasien Harus Segera dioperasi, kalau tidak akan semakin gawat” disitu aku bingung harus berbuat apa, dokter memberikan surat ntuk persetujuan operasi dan memakai ruang ICU, dia saat itu aku ga bias berkata apapun, karena aku ini bukan saudara imay, jadi ga mungkin aku mengambil keputusan itu.

Akhirnya akumenuruh adik imay untuk menelpon orang tuanya, dan menanyakan keputusan itu, dan akhirnya orang tua imay menyetujui untuk dioperasi, dan aku menjadi wakil orang tuanya untuk menyetujui operasi itu, walaupun sangat berat semua itu aku lakukan, tapi aku harus yakin dia akan selamat.

Oke, kita pindah topic dulu ya, dikampus kini aku sudah akrab dengan ilmiah, arizal, pk de, n yang laen, diman pada saat itu kami berramai2 pergi kepuskom untuk ngenet bareng2, tapi semua itu ga berjalan lama, speretinyasih pada boke or bangkrut ya??? Wkwkwkwkwkkwk

Setelah masuk semester 2, aku memulai lagi kuliah dengan teman2 baru dan berbeda disetiap kelas, karena ada perubahan kelas. Dan dismester 2 ini aku ternyata satu kelas dengan wanita yang kupikir jelmaan setan, dan disemester 2 ini aku juga baru tau kalau nama wannita itu adalah “Libertin Zendrato” disini aku berfikir, namanya agak aneh, ya mungkin ortunya agak terobsesi dengan orang bule kali ya, lama-lama kelamaan, ternyata dia tu orangnya asyik juga ya.

Dan disemester 2 ini juga hubungan ku dengan imay mulai hancur, dimana dia menjadi seorang yang tak pernah kukenal,dia menjadi egois dan tak peduli lagi. Akupun heran, kenapa kok dia bias seperti itu, padahal setelah keluar dari rumah sakit semua waktu ku untuk dia, dia sebentar2 marah, emosi, dan semua itu membuat aku ga tahan lagi menahan rasa sakit hati yang sudah mencapai puncaknya, dan akhirnya aku memutuskan untuk mengakhiri hubungan ini, dan kujelaskan semua kenapa aku ingin putus dari dia, tapi dia menolaknya, dan minta dikasi kesempatan, setelah dikasi kesempatan ………………………………………(dirahasiakan) tapi karena itu semua akhrinya aku denga dia resmi PUTUS.

Dikuliahan kini aku lebih tenang dengan keendirian ini, dan aku memiliki ya bias dikatkna kelompok belajar, yang terdiri dari aku, Arizal, libie dan ilmiah, disaat itu akupun heran, entah darimana datangnya tiba2 kelas kami tiu memilki kelompok2 tersendiri, dan disseat itu juga aku ma ari mendapat julukan hantu warnet, karena bagi kami tiada waktu tanpa kewarnet, karena pada saat itu kami sedang terobsesi dengan yang namanya bisnid internet dan blog. tapi, ternyata apa yang kami lakukan itu menjadi bermanfaat juga bagi temen2 kami, disaat tugas struktur data, kami yang jadi pahlawan kemalamannya!!! Wkwkwkwkwk…….

Tapi lagi2 dismester ini juga aku menjadi salah satu tim sukses asmara, yang mengalaminya temenku sendiri, Arizal gituloh, aku, libie n ilmiah punya cara tersendiri bgaiman caranya untuk membantu ari menyampaikan rasanya, tapi, disini yang kami herankan kenapa si ari ga mau ngaku kalu dia bener suka ssama rizka, semua alasannya ga jelas dan dengan kode2 yang buat kepala puyeng! Dan semua itu terjadi karena angka 13 dengan usaha yang gigih,ternyata kami sebgai tim sukses berhasail dan sukses mengantarkan ari menjadi Papa n mama Kami!wkwkwkwkwk….

Tapi ternyata hubungan ini ga berjalan dengan mulus, hubungan kedua sejoli itu diuji, dnegan alas an utama menggunakn kata kelompok yang tak pernah ada yang membentuk dan memproklamirkannya, perselisihanpun terjadi, dan hubungan aripun terancam berakhir, dan disaat itu juga kelihatannya ari mengalami tekanan berat sampai-smpai dia hmapir melakukan BUNUH DIRI Di GEdung MIPA itu…kami bertiga kewalahan denga sikap dan tingkah laku yang ari lakukan,bahkan demi mencari dia, aku memecahkan rekorku sendiri, naek dan turun tangga dari lantai 1-3 berkali dalam waktu 5 menit, dan dan akhirnya ketemu juga, dia keluar dari persembuyiannya. Karena hal itu,maka aku, libie dan ilmiah setiap pulang kampus melakukan sidang, kami menyidang ari, dan tah darimana datangnya akal sidang menyidang itu, disidang itu kami saling memberi masukan, dan tiba disidang puncak tah bagaiman caranya aku bisa menjadi tokoh utamanya, ya bisa dikatakan aku sebagai ketua sidanglah!wkwkwkwkw.. tapi dengan sidang puncak itu permasalahan ini menjadi selesai.

Demi tidak terjadi kesalaha pahaman itu lagi, akhirnya yang namanya kelompok atau koloni apapun, itu dihilangkan, tapi lama kelamaan kami juga harus terpisah dengan ari(maksudnya ga lengket banget gituloh) tapi yang dikatakan pepatah itu bener “patah tumbuh hilang berganti”, tidak lama kemudia Ical pelan2 mulai ikut dengan kami….

Dan disini juga aku mulai tertarik dengan libie… disitu aku tau kelebihannya! Dan sterus aku…………………………………………
(dirahasiakan ya! Hanya kami berdua yang tau) tapi tanggal 18 juni 2009 ruang 303 menjaadi saksi hari jadi ini, semua itu tak terlepas dari bantuan dan dukungan tim sukses ku, Ari, Ilmiah N ical, thx buat kalean semua ya teman……

Masuk smester 3, aku, libie, ilmiah dan ical semakin kompak, kami berjuang bersama2 dalam menghadapai kuliah ini, kami saling berbagi apa yang kami dapatkan, tiada rahsia diantara kami, dan kamipun saling mendukung, mungkin bisa dikatan walaupun kami Cuma ber4, tapi kami mampu menjadi terbaik, walaupun temen yang lain juga menunjukkan kemampuan merupakan yang juga ga kalah bagus, ataupun malah lebih bagus lagi dari kami….

Dan disemester ini, kamikami juga menjadi tim sukses temen kami yang lagi mabuk asmara yang ga jelas, ical lagi jatuh cinta, tapi bingung jatuh cinta drngan yang mana???? Kamipun juga bingung, tapi kami ga mau buat dia jadi rusak gara2 hubungan yang ga jelas, jadi aku kami bertiga kini mulai lagi melakukan persidangan untuk ical, mana yang dia mau sebenarnya, dan setelah sekian lama dan memakan waktu yang tidk sedikit, akhirnya ical bisa juga mengambil keputusan.

Tapi temen kami yang satu lagi mengalami Fall in love jg, tapi kami ga ada ikut andil disini, maklum ilmiahkan agak malu2 kucing, sok pura2 ga peduli n dicueki, tapi ternyata semua itu hanya pura2!!! Dasar ilmiah…………………..

Memasuki semester 4, kami juga mendapat seorang teman yang sedang ingin mencari cinta, tapi setiap usahanya gagal, diapun hamper depresi dengan wanita, tapi sabar ya teman, berjuang terus, mungkin dia buakn yang terbaik untukmu…. (maaf, nama temennya dirhasiakan).

Tapi dismester 4 ini kami ber4 mengalami masa kelam, diman salah satu teman kami, ada yang keliatannya berubah, kini dia mulai merahasiakan semua dari kami, dan tertutup dari kami, aku tak tau kenapa ini bisa terjadi, kini kami ber4 terpisah masing2, aku tidak tahu apa salahku sam temen itu, sehingga kini dia bersikap seperti itu sekarang, dan sekarangpun kelihatan kami hanya berstatus teman sekelas.

Kini aku, mengtalami masa penderitaan, diamna aku selalu merasa sendiri dan kesepian, padahal setiap saat libie selalu menemaniku, dan dimulai sakitku yang mulai berkembang ditubuh ku ini, aku tak tahu mengapa aku makin cpat emosi dan marah, seakan-akan aku ingin mengakhiri hidupku ini.

Aku pernah berfikir betapa bodohnya orang yang mati bunuh diri itu, tapi sekarang ini aku baru merasakan apa yang dirasakan oleh orang-orang yang bunuh diri itu, merasakn tekanan yang tak berhenti-henti, jadi akupun juga pantas jika melakukan bunuh diri, mungkinpun akan akau lakukan, aku masih ingat diman disuatu malam aku naik kesebuah ruko yangbelum jadi, ruko itu terdiri dari 3 lantai, bagaimabn rasanya jika aku terjun dari lantai atas itu sampai kedasar tanah. Dan aku juga ingin merasakan bagaiman rasanya tubuhku tergantung di udara, karena leherku terlilit oleh tali, dan bagaiman juga rasnya jika aku minum racu, dan bagaiman juga rasanya jika pembuluh nadiku ku potong???

Tapi kini aku seangh bermain2 dengan pisau ini, pelan2 ingi ku potong sedikit demmi sedikit lengan tang ku ini, kemudia kaki ku, dan aku kan menikmati mati secara pelan2 dan senyap dna tenang, tanpa ada tekanan lagi di hidupku, tekanan yang membuat ku tak tau berbuat apa2 ge………

Apkah aku akan melakukannya??? Akupun tidak tahu, tapi jika itu memang harus ku lakukan, maka akan aku lakukan semua itu……

Kini aku hanya bisa meratap semua yang kualami ini semdrian, ubtuk kedua kalinya airmata ku ini tertetes lagi diwarnet ini, kini hanya ini yang bisa ku lakukn, karena aku tak tau mau apa lagi.

Ade Gunawan: seorang temen yang penuh denganide2 yang gokil, mampu merubah suasana, selalu eksis dengan kenarsisannya, pennuh dengan tawa, dan rayuan kepada setiap wanita, dan jika kuingat, dulu setiap pagi kampuz, paket sms 100, masih ingat ga pak de!!! Itu menjadi sebuah kenangan terlucu ku.

Arizal : seorang anak ketek yang menjadi temen deket ku, orang yang pennuh denganinspirasi yang berbeda, punya motivasi yang tak pernah berhenti, n kemampuan untuk menentukan jalan hidup sendiri, kalua dingat2 mu dulu punya kata2 loh cil ” kata2 yang sampai saat ini masih akau ingat banget, tapi kalau rizka tau, dia marah ga ya????” tapi mu adalah my best friend….

Ical : cal, mu tu seorang yang punya cara tersendiri menarik perhatian orang, ituyang kusuka darimu, tapi mu juga harus belajar untuk menentukan pilihan yang menurut mu benar2 baik untuk mu, hargai dan sayangilah orang yang mu sayangi.

Rizka : thanks menjadi temenku yang baik, mu itu seorang wanita yang bersifat keras, tapi bertujuan lurus, n makasih banget telah menjaga ari…….

Ilmiah : sebelumnya aku mau mengucapkan Selamat Ulang tahun ya mia, semoga mu panjang umur n sehat selalu. Maaf telat, karena memang disengaja, rencananya aku n libie mau buat acara tersendiri untuk mu, tapi melihat keadaan yang ga memungkinkan kayaknya semua itu ga bisa dilakukan, sekali maaf ya??? N sekali lagi selamat ulang tahun. Mai, aku mau bilang, kalau aku ada salah, aku minta maaf dan aku minta mu jangan maen rahasia ma kami, dan mu ga perlu mentutp2i sesuatu hal, dan kami ga pernah merasa marah or apapun iotu ma mu, tapi aku mohon mu terbuka sama kami, jangan biarkan kami merasa bingung dan salah ya?? Kita sudah berteman lama, jadi jangan biarkan pertemanan ini hancur dan hanya menjadi temen kampus dikelas doang, kami ingin kita berteman selamanya. Thanks atas bntuan mu selama ini………

Imay : thanks ya may atas perhatian n kasih syang mu selama ini, saat ini kita hnya menjadi teman, dan aku harap temen ini lebih baik bagi kita. Thanks ya….

Thanks buat kalean semua sahabat ku, kalean tak akan pernah aku lupakn dan aku minta maaf kepada teman2 yang tak terucapkan…..

Libie : Sayang, maaf yang selama ini ku perbuat, aku memang ga bisa menjadi yang terbaik, dan g bisa membuat mu bahagia, akau tak mampu menjadi yang kamu inginkan, mungkin aku hany aseorang pencudang, thanks atas kasih saying mu selama ini……… ♥♥♥miss u♥♥♥…..♥♥♥Love U♥♥♥

Thanks buat kalian semua, mudah2an kalau aku masih waras, kita akan bertemu lagi……

9 April 2010

Feri Irwanda FBie

Rabu, 11 November 2009

Hati-Hati, Undang-Undang Lalu Lintas 2009


Waspada sebelum dirazia, perhatikan UU terbaru yang menggantikan UU tahun 1992, UU Nomor 22 Tahun 2009. Undang-Undang yang sudah ditandatangani Presiden SBY pada tanggal 22 Juni 2009, memuat antara lain:

Tidak Memiliki SIM
Menurut Pasal 281, apabila pengendara kendaraan bermotor tidak memiliki Surat Izin Mengemudi (SIM) bisa dikenakan denda paling banyak Rp1.000.000,00 (satu juta rupiah). Atau di pidana kurungan paling lama 4 bulan. Jadi, selalu bawa SIM Anda setiap kali Anda mengendarai motormu.

Mengemudi Tidak Konsentrasi

Hati hati juga buat biker yang suka menelpon sambil mengendarai motor bisa kena sanksi pasal 283, menurut pasal ini bagi yang mengemudikan Kendaraan Bermotor di Jalan secara tidak wajar dan melakukan kegiatan lain atau dipengaruhi oleh suatu keadaan yang mengakibatkan gangguan konsentrasi dalam mengemudi di Jalan dapat dipidana dengan pidana kurungan paling lama 3 bulan atau denda paling banyak Rp750.000,00 (tujuh ratus lima puluh ribu rupiah).

Kelengkapan Motor
Bagi pengendara roda dua di Jalan yang tidak memenuhi persyaratan teknis dan laik jalan yang meliputi kaca spion, klakson, lampu utama, lampu rem, lampu penunjuk arah, alat pemantul cahaya, alat pengukur kecepatan, knalpot, dan kedalaman alur ban, mengacu pada Pasal 285 dapat dikenai denda paling banyak Rp250.000,00 (dua ratus lima puluh ribu rupiah) atau pidana kurungan paling lama 1 bulan.

Rambu dan Markah

Jangan abaikan rambu dan markah jalan, karena di Pasal 287 Pengendara motor di Jalan yang melanggar aturan perintah atau larangan yang dinyatakan dengan Rambu Lalu Lintas sebagaimana dapat dipidana dengan pidana kurungan paling lama 2 bulan atau denda paling banyak Rp500.000,00 (lima ratus ribu rupiah).

Tidak Bawa STNK

Nah, buat biker yang suka lupa bawa STNK harap waspada, karena menurut Pasal 288, setiap pengendara roda dua di Jalan yang tidak dilengkapi dengan Surat Tanda Nomor Kendaraan Bermotor atau surat tanda coba Kendaraan Bermotor yang ditetapkan oleh Kepolisian Negara Republik Indonesia sebagaimana dapat dipidana dengan pidana kurungan paling lama 2 bulan atau denda paling banyak Rp500.000,00 (lima ratus ribu rupiah).

Helm Standard Buat Penumpang dan Pengemudi

Selalu pakai helm SNI saat mengendarai sepeda motor, baik pengemudi maupun penumpang motor. Karena menurut Pasal 291, bagi setiap pengemudi dan penumpang Sepeda Motor yang tidak mengenakan helm standar nasional Indonesia (SNI) dipidana dengan pidana kurungan paling lama sebulan atau denda paling banyak Rp250.000,00 (dua ratus lima puluh ribu rupiah).

Menyalakan Lampu Utama Malam atau Siang Hari

Selalu nyalakan lampu utama motor Anda di Jalan pada siang maupun malam hari. Karena menurut Pasal 293, karena jika Anda tidak menyalakan lampu utama pada motor Anda di malam hari, Anda bisa dikenakan dipidana dengan pidana kurungan paling lama sebulan atau denda paling banyak Rp250.000,00 (dua ratus lima puluh ribu rupiah). Bila sebelumnya ligh on disiang hari hanya dianjurkan, sekarang diwajibkan. Jika tidak menyalakan lampu utama di siang hari dipidana dengan pidana kurungan paling lama 15 hari atau denda paling banyak Rp100.000,00 (seratus ribu rupiah).

Belok Kiri Boleh Langsung?

Kalau dulu biker dapat langsung belok kiri meskipun saat itu lampu lalulintas menunjukkan warna merah. Sekarang tidak dibolehkan! Karena menurut UU No. 22 / 2009 Pasal 112, Pengemudi Kendaraan dilarang langsung berbelok kiri, kecuali ditentukan lain oleh Rambu Lalu Lintas atau Alat Pemberi Isyarat Lalu Lintas. Bagi yang melanggar akan ditilang dan dikenakan denda sebesar 250 ribu rupiah.

Jumat, 05 Juni 2009

TIPS JADIKAN BLOG TERKENAL

TIPS JADIKAN BLOG TERKENAL



1.Tulislah artikel menarik yang kontroversial berdasarkan opini anda yang didasari argumen logis, bukan opini yang melewati batas-batas , "misalnya rahasia cepat balajar Blog"...wehehe..!

3.Berikan pada pembaca anda barang-barang gratis. misalnya wallpaper,musik,software, untuk di downlad.

4.Tulis atau review blogger lain yang anda sukai lalu beri tau lewat komentar di blog yangg anda tulis tersebut ,hal ini untuk menarik pengunjung blogger tersebut membaca blog anda.

5.Lakukan interview lewat email kepada beberapa blogger terkenal tanyakan tentang berbagai opini yang positif, ini cara yang masih banyak dipakai para blogger yang cerdik, karena interview ini biasanya memberikan kebanggaan pada blogger terkenal tersebut dan biasannya anda akan di review balik...hehehe...kamu ketauan..

6.Promosikan dengan bijak alamat blog anda lewat SMS rekan anda , misalnya "Ma'af saya telat membalas, karena lagi menyelesaikan tulisan di mast3rf.blogspot.com"

7.Carilah info-info yang paling populer atau lagi hangat-hangatnya

Kamis, 04 Juni 2009

ARRAY (LARIK)

1. Pendahuluan
Suatu array adalah sebuah struktur data yang terdiri atas banyak variabel dengan tipe data sama, dimana masing-masing elemen variabel mempunyai nilai indeks. Setiap elemen array mampu untuk menyimpan satu jenis data (yaitu: variabel). Suatu array dinyatakan dengan type, sehingga variabel yang bekerja akan dinyatakan dengan:
contoh type
A = array [1..10] of integer;

Secara logika pendefinisian array di atas merupakan sekumpulan kotak , dimana tiap kotak mempunyai nilai indeks integer 1, 2, 3, ...,9, 10 tiap elemen array ditandai dengan:
A[1], A[2], A[3], A[4], A[5], A[6], A[7], A[8], A[9], A[10]

2.
Sifat Array
Array merupakan struktur data yang statis, yaitu jumlah elemen yang ada harus ditentukan terlebih dahulu dan tak bisa di ubah saat program berjalan. Untuk menyatakan array dalam PASCAL kita harus terlebih dahulu:
Mendefinisikan jumlah elemen array,
-
Mendefinisikan
- tipe data dari elemen array
Contoh. const N=10;
type
A= array [1..N] of integer;

3. Array Satu Dimensi
Pernyataan di atas merupakan penjelasan tentang array dengan satu dimensi. Pendefinisian array secara umum adalah sebagai berikut: jika kita ingin membuat beberapa array dengan tipe/jenis yang sama, kita lebih baik jika mendeklarasikan dengan type selanjutnya dengan deklarasi var.
SYNTAX

Type nama_array = ARRAY[bawah..atas] of tipe_data;
var variabel_array : nama_array;
atau dengan menggunakan statemen var :

var variabel_array : ARRAY[bawah..atas] of tipe_data;

Penjelasan: Bawah dan Atas menyatakan batas untuk array. tipe_data adalah merupakan tipe variabel yang dipunyai array (mis. Integer, char, real, dsb)
Contoh:
type intarray = ARRAY [1..20] of integer;
Pernyataan diatas adalah pernyataan untuk membentuk suatu array bernama intarray,yang berisi 20 tempat untuk bilangan integer. Setiap posisi disebut elemen, yang menyimpan suatu bilangan integer.langkah berikutnya adalah membuat suatu variabel kerja dengan tipe intarray yaitu,
var numbers : intarray;
kita bisa melakukan operasi pada setiap elemen dari numbers secara individual. Contoh kita bisa memberi nilai pada suatu elemen array seperti berikut:
numbers[2] := 10;
perintah ini memberikan suatu nilai integer 10 pada elemen ke-2 dari array numbers. Nomor dari elemen ditempatkan didalam kurung tegak. Contoh berikut adalah merupakan array yang menyimpan variabel-variabel integer. Data dengan tipe integer hanya bisa dimasukkan satu persatu, kemudian baru bisa ditampilkan di monitor secara bersamaan

Contoh a.

program INT_ARRAY;
uses wincrt;
const N=10;
type int_array = ARRAY [1..N] of integer;
var bil : int_array;
indeks : integer;
BEGIN
writeln('masukkan sepuluh bilangan integer.');
for indeks := 1 to 10 do
begin
readln(bil[indeks]); { loop untuk memasukkan elemen array }
end;
writeln('Isi dari array ini adalah'); { tampilkan setiap elemen }
for indeks := 1 to 10 do
begin
writeln('bil[', indeks:2,'] adalah ',bil[indeks] );
end
END.

Contoh b.

program contoh_ARRAY;
uses wincrt;
var
a : array[1..10] of byte;{maksimum jumlah elemen=10}
begin
a[1]:=10;
a[2]:=15;
a[3]:=a[1]+a[2];
writeln(a[1]);
writeln(a[2]);
writeln(a[3]);
end.

Latihan

1. Menggunakan Array 1 dimensi buatlah program dengan ketentuan:

Input---à Nilai PPN, Nilai PPA, Nilai Logika, Nilai Agama

Output-à Total Nilai

Ket: Nama Array = nilai

Nama variabel = n

Jumlah Range = 5

2. Untuk soal no.1 tambahkan proses untuk mendapatkan kelulusan jika nilai logika > 7 dan proses untuk mendapatkan grade ( A jika total >34, B jika total > 28, C jika total > 24 dan D jika total <=24 ).
ARRAY MULTI DIMENSI

4. Array Multidimensi
Dalam array multidimensi terdiri atas baris (row) dan kolom (column). Index pertama adalah baris dan yang kedua adalah kolom .
SYNTAX
Type nama_array =ARRAY[bawah..atas, bawah..atas] of tipe_data;
var variabel_array : nama_array;

atau dengan menggunakan statemen var :
SYNTAX var variabel_array : ARRAY[bawah..atas, bawah..atas] of tipe_data;
Pernyataan berikut membentuk suatu array integer dengan nama bilangan , 10 x 10 elemen (100).
type matriks = ARRAY [1..10, 1..10] of integer;
var AKU: matriks;

untuk memasukkan tiap elemen maka, diperlukan suatu procedure dengan mempergunakan struktur pengulangan for ...do tersarangseperti berikut:
procedure ISI_MATRIK(AKU:matriks; m,n:integer);
var
i,j: integer; {faktor pengulang}
begin
for i:=1 to m do
begin
for j:=1 to n do
begin
read(A[i,j]);
end;
readln ;{ini memungkinkan kita menulis tiap baris elemen}
end;
untuk menampilkan tiap elemen maka, digunakan struktur pengulangan for ...do tersarang seperti berikut
procedure TULIS_MATRIK(AKU:matriks; m,n:integer);
var i,j: integer; {faktor pengulang}
begin
for i:=1 to m do
begin
for j:=1 to n do
begin
write(A[i,j]:6);
end;
writeln ; {ini memungkinkan kita menulis elemen dalam baris dan kolom }
end;
end;
5. Operasi pada Array
Sifat masing-masing elemen array mengikuti jenis data yang dimilikinya, untuk array dengan tipe bilangan integer atau real kita bisa melakukan berbagai standar operasi aritmatika seperti penjumlahan, perkalian, pengurangan, dsb. Yang perlu di garis bawahi, bahwa sifat dari array dimanfaatkan untuk operasi matrik.

a. Mencari Harga Tertentu pada Array
Mencari suatu elemen data di dalam suatu data merupakan suatu kejadian yang sering kita alami, contoh: mencari nama mahasiswa dari daftar presensi. Pencarian beruntun (sequence), merupakan suatu teknik untuk mencari suatu elemen dalam suatu sistim yang lebih besar.
Contoh.
Misal array A[8], dengan elemen sbb:
A
60 12 76 23 11 42 18 42
Untuk mencari apakah bilangan x=11 ada didalam tabel maka dilakukan pemeriksaan terhadap :
60 12 76 23 11
Sehingga ditemukan x pada elemen ke-5, dalam bahasa PASCAL diterjemahkan seperti berikut:
type PITA = ARRAY [1..8] of integer;
var AKU: PITA;
procedure CARI_MATRIK(AKU: PITA);
var
i: integer; {faktor pengulang}
begin
for i:=1 to 8 do
begin
if AKU[i]:= 11 then
writeln(‘ terdapat bilangan 11 dalam pita ini ‘);
else
writeln(‘ tidak ada bilangan 11, pencarian berhenti ‘);
end;
end;
b. Mencari Harga Maksimum pada Array
Misal array di atas kita cari harga yang tertinggi, maka kita perlu menentukan nilai tertinggi dahulu sebelum melakukan pencarian ; diawali dengan nilai maksimum=0
procedure CARI_MAKSIMUM(AKU: PITA);
var
i: integer; {faktor pengulang}
MAKS : integer;
begin
MAKS := AKU[1];
for i:=1 to 8 do
begin
if AKU[i]> MAKS then
MAKS:= AKU[i];
End;
Writeln(‘NILAI MAKSIMUM = ’,MAKS);
end;
b. Mencari Harga Minimum pada Array
Misal array di atas kita cari harga yang terendah, maka kita perlu menentukan nilai terendah dahulu sebelum melakukan pencarian ; diawali dengan nilai maksimum=3200
procedure CARI_MINIMUM(AKU: PITA);
var
i: integer; {faktor pengulang}
MIN : integer;
begin
MIN := 3200;
for i:=1 to 8 do
begin
if AKU[i]< minimum =" ’,MIN);" matrik="array[1..100,1..100]" m="p)" n="q)" m="p)" n="q)" n="p)" onblur="try {parent.deselectBloggerImageGracefully();} catch(e) {}" href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhTYGAsrBosOQtAmCwQl_kFDmbpBdA__Gp2k36E15tDEohQBY7KBLuN7uA9zqLPhQAfw3l3gfmDIqTgeX7qWuDQQywAjb3nrXGsfongwRcmrPQy1s-nSxkij5poF7OPzDpECCrKFrRtj9o/s1600-h/2.JPG">
Buat program Array 2 dimensi untuk memasukkan data nilai matakuliah tiap mahasiswa.
Kolom- N1, N2, N3, Total
Baris--- Yani, Riski, Eko



2.


Baris--senin, selasa, rabu, kamis, jum’at, sabtu
- Buat program Array 2 dimensi untuk memasukkan jumlah anak yang ikut kegiatan tertentu.
- Outputkan dalam bentuk matrik 2 dimensi.
STACK ( Tumpukan )

- Adalah tumpulan data yang seolah-olah ada data di atas data lain.
- Suatu metode untuk Input dan hapus di dalam memori komputer.

Konsep utama dalam STACK adalah LIFO ( Last In First Out ).
Contoh:














Data nomor 1 datang/masuk duluan, data nomor 5 yang paling atas yang keluar terlebih dahulu.

Algoritma:
1. Input/tambah data
• Jika ada input maka no stack/no tumpukan yang semula 0 akan tambah 1 demi 1 sampai maksimal tumpukan.

2. Pengambilan data
• Jika ada pengambilan data maka data dipindahkan di variabel lain contohnya temp. Dan posisi tumpukannya yang semula maksimal akan berkurang 1 demi 1 sampai posisi 0 kembali.

1. Deklarasi STACK

Type
Const
Max = 5;
Nama record = Record
Data : type data;
Top : byte;
End;
Nama_array = ARRAY [1..max] of Nama record;
Var
STACK : nama Array





Nama Array----- Barang
Nama Record--- Coba
Nama Variabel-- Stack

Contoh Deklarasi dari gambar diatas:
Type
Coba = record
Data :string;
Top : byte;
End;
Barang = ARRAY [1..4] of coba;
Var
Stack:barang;

2. Operasi pada STACK
• CREATE
Membuat stack baru yang masih kosong.

Procedure create;
Begin
Stack.top:=0;
End;

• FULL
Untuk memeriksa apakah stack sudah penuh atau belum.

Fuction full:bolean;
Begin
Stack.top:=max;
End;

• PUSH
Menambah sebuah elemen ( data ) kedalam stack
Syarat: tidak bisa dilakukan jika stack sudah penuh.

Procedure push ( input:string );
Begin
If not full then
Begin
Stack.top:=stack.top;
Stack.data:=input;
End;
End;

• EMPTY
Fuction empty: bolean;
Begin
Empty:=false;
If top:=0 then empty:=true;
End;

• POP
Mengambil elemen teratas dari stack.
Syarat: Stack tidak boleh kosong.

Procedure Pop ( elemen:string );
Begin
If not empty then
Begin
Elemen:=stack.data;
Stack.top:=top – 1;
End;
End;

Contoh:
1 2 3 4







Uses wincrt;
Type
kelas = ARRAY[1..4] of string;
Var
Stack: kelas;
top:byte;
Elemen: string;
I : integer;
Begin
top:=0;
For i:=1 to 4 do
Begin
Writeln('masukkan nama ke', ' ',i,' ','='); readln(stack[i]);
top:=top+1;
End;
writeln('posisi tumpukan=',top);
Writeln('pengambilan data');
For i:=1 to 4 do
Begin
Elemen:=stack[i];
top:=top - 1;
End;
writeln;
Writeln('data elemen sekarang=',elemen);
writeln('posisi tumpukan=',top);
Readln;
End.

Latihan.























lht jg disini: http://id.wikipedia.org/wiki/Struktur_data
QUEUE ( ANTRIAN )

-à Kumpulan data dimana data masuk dan keluar pada ujung yang berbeda.

-à Konsep utama FIFO ( Fisrt In First Out ).

Contoh:



Data nomor 1 datang/masuk dan keluar duluan.

Algoritma:

  1. Input/tambah data
    • Jika ada input maka no antrian yang semula 0 akan tambah 1 demi 1 sampai maksimal antrian.

  1. Hapus/Pengambilan data

· Jika ada pengambilan data maka data dipindahkan di variabel lain contohnya temp, antrian ke-dua akan maju ke antrian pertama dan seterusnya. Dan jumlah antrian yang semula maksimal akan berkurang 1 demi 1 sampai antrian 0 kembali.

  1. Deklarasi Queue

Type

Const

Max = 5;

Nama record = Record

Data : type data;

Top : byte;

End;

Nama_array = ARRAY [1..max] of Nama record;

Var

Antri : nama Array;

Nama Array-----à Barang

Nama Record---à Coba

Nama Variabel--à Antri

Contoh Deklarasi dari gambar diatas:

Type

Coba = record

Data :string;

Top : byte;

End;

Barang = ARRAY [1..4] of coba;

Var Antri:barang;

  1. Operasi pada queue

· CREATE

Membuat antrian baru yang masih kosong.

Procedure create;

Begin

antri.top:=0;

End;

· FULL

Untuk memeriksa apakah antrian sudah penih..

Fuction full:bolean;

Begin

antri.top:=max;

End;

· PUSH

Menambah sebuah elemen ( data ) kedalam antrian.

Syarat: tidak bisa dilakukan jika antrian sudah penuh.

Procedure push ( input:string );

Begin

If not full then

Begin

antri.top:=antri.top;

antri.data:=input;

End;

End;

· EMPTY

Fuction empty: bolean;

Begin

Empty:=false;

If top:=0 then empty:=true;

End;

· POP

Mengambil 1 elemen dari sebuah antrian.

Syarat: antrian tidak boleh kosong.

Procedure Pop ( elemen:string );

Begin

If not empty then

Begin

Elemen:=antri.data;

antri.top:=top – 1;

End;

End;

Contoh:




Program antrian_1;

Uses wincrt;

Type

Data= array [1..3] of string;

Var

D: data;

I, antri: integer;

Temp: string;

Begin

Antri:=0;

{untuk input}

For I:=1 to 3 do

Begin

Writeln(’masukkan nama ke’,’ ’,i);

Readln(d[i]);

Antri:=antri+1;

End;

{untuk Output}

For I:=1 to 3 do

Begin

Temp:=d[i];

Antri:=antri-1;

End;

{lihat output di var temp setelah pengambilan }

Writeln(’hasil var temp=’,temp);

Readln;

End.