Rabu, 01 Mei 2013

Nilai Kehidupan

Alkisah, ada seorang pemuda yang hidup sebatang kara. Pendidikan rendah, hidup dari bekerja sebagai buruh tani milik tuan tanah yang kaya raya. Walapun hidupnya sederhana tetapi sesungguhnya dia bisa melewati kesehariannya dengan baik.

Pada suatu ketika, si pemuda merasa jenuh dengan kehidupannya. Dia tidak mengerti, untuk apa sebenarnya hidup di dunia ini. Setiap hari bekerja di ladang orang demi sesuap nasi. Hanya sekadar melewati hari untuk menunggu kapan akan mati. Pemuda itu merasa hampa, putus asa, dan tidak memiliki arti.

"Daripada tidak tahu hidup untuk apa dan hanya menunggu mati, lebih baik aku mengakhiri saja kehidupan ini," katanya dalam hati. Disiapkannya seutas tali dan dia berniat menggantung diri di sebatang pohon.

Pohon yang dituju, saat melihat gelagat seperti itu, tiba-tiba menyela lembut. "Anak muda yang tampan dan baik hati, tolong jangan menggantung diri di dahanku yang telah berumur ini. Sayang, bila dia patah. Padahal setiap pagi ada banyak burung yang hinggap di situ, bernyanyi riang untuk menghibur siapapun yang berada di sekitar sini."

Dengan bersungut-sungut, si pemuda pergi melanjutkan memilih pohon yang lain, tidak jauh dari situ. Saat bersiap-siap, kembali terdengar suara lirih si pohon, "Hai anak muda. Kamu lihat di atas sini, ada sarang tawon yang sedang dikerjakan oleh begitu banyak lebah dengan tekun dan rajin. Jika kamu mau bunuh diri, silakan pindah ke tempat lain. Kasihanilah lebah dan manusia yang telah bekerja keras tetapi tidak dapat menikmati hasilnya."

Sekali lagi, tanpa menjawab sepatah kata pun, si pemuda berjalan mencari pohon yang lain. Kata yang didengarpun tidak jauh berbeda, "Anak muda, karena rindangnya daunku, banyak dimanfaatkan oleh manusia dan hewan untuk sekadar beristirahat atau berteduh di bawah dedaunanku. Tolong jangan mati di sini."

Setelah pohon yang ketiga kalinya, si pemuda termenung dan berpikir, "Bahkan sebatang pohonpun begitu menghargai kehidupan ini. Mereka menyayangi dirinya sendiri agar tidak patah, tidak terusik, dan tetap rindang untuk bisa melindungi alam dan bermanfaat bagi makhluk lain".

Segera timbul kesadaran baru. "Aku manusia; masih muda, kuat, dan sehat. Tidak pantas aku melenyapkan kehidupanku sendiri. Mulai sekarang, aku harus punya cita-cita dan akan bekerja dengan baik untuk bisa pula bermanfaat bagi makhluk lain".

Si pemuda pun pulang ke rumahnya dengan penuh semangat dan perasaan lega.

Teman-teman yang luar biasa,

Kalau kita mengisi kehidupan ini dengan menggerutu, mengeluh, dan pesimis, tentu kita menjalani hidup ini (dengan) terasa terbeban dan saat tidak mampu lagi menahan akan memungkinkan kita mengambil jalan pintas yaitu bunuh diri.

Sebaliknya, kalau kita mampu menyadari sebenarnya kehidupan ini begitu indah dan menggairahkan, tentu kita akan menghargai kehidupan ini. Kita akan mengisi kehidupan kita, setiap hari penuh dengan optimisme, penuh harapan dan cita-cita yang diperjuangkan, serta mampu bergaul dengan manusia-manusia lainnya.

Maka, jangan melayani perasaan negatif. Usir segera. Biasakan memelihara pikiran positif, sikap positif, dan tindakan positif. Dengan demikian kita akan menjalani kehidupan ini penuh dengan syukur, semangat, dan sukses luar biasa!

ARTIKEL NARKOBA


  Narkoba adalah singkatan dari narkotika dan obat/bahan berbahaya. Selain "narkoba",istilah lain yang diperkenalkan khususnya oleh Departemen Kesehatan Republik Indonesia adalah napza yang merupakan singkatan dari Narkotika, Psikotropika dan ZatAdiktif.Semua istilah ini, baik "narkoba" atau napza, mengacu pada sekelompok zat yangumumnya mempunyai resiko kecanduan bagi penggunanya. Menurut pakar kesehatannarkoba sebenarnya adalah psikotropika yang biasa dipakai untuk membius pasien saathendak dioparasi atau obat-obatan untuk penyakit tertentu. Namun kini presepsi itudisalah gunakan akibat pemakaian yang telah diluar batas dosis.Penyebaran NarkobaHingga kini penyebaran narkoba sudah hampir tak bisa dicegah. Mengingat hampir seluruh penduduk dunia dapat dengan mudah mendapat narkoba dari oknum-oknum yangtidak bertanggung jawab. Misalnya saja dari bandar narkoba yang senang mencarimangsa didaerah sekolah, diskotik, tempat pelacuran, dan tempat-tempat perkumpulangenk. Tentu saja hal ini bisa membuat para orang tua, ormas,pemerintah khawatir akan penyebaran narkoba yang begitu meraja rela. Upaya pemberantas narkoba pun sudahsering dilakukan namun masih sedikit kemungkinan untuk menghindarkan narkoba darikalangan remaja maupun dewasa, bahkan anak-anak usia SD dan SMP pun banyak yangterjerumus narkoba. Hingga saat ini upaya yang paling efektif untuk mencegah penyalahgunaan Narkoba pada anak-anak yaitu dari pendidikan keluarga. Orang tuadiharapkan dapat mengawasi dan mendidik anaknya untuk selalu menjauhi Narkoba.Efek-efek narkobaa. Halusinogen, efek dari narkoba bisa mengakibatkan bila dikonsumsi dalam sekiandosis tertentu dapat mengakibatkan seseorang menjadi ber-halusinasi dengan melihatsuatu hal/benda yang sebenarnya tidak ada / tidak nyata contohnya kokain & LTD b. Stimulan , efek dari narkoba yang bisa mengakibatkan kerja organ tubuh seperti jantung dan otak bekerja lebih cepat dari kerja biasanya sehingga mengakibatkanseseorang lebih bertenaga untuk sementara waktu , dan cenderung membuat seorang pengguna lebih senang dan gembira untuk sementara waktuc. Depresan, efek dari narkoba yang bisa menekan sistem syaraf pusat dan mengurangiaktivitas fungsional tubuh, sehingga pemakai merasa tenang bahkan bisa membuat pemakai tidur dan tidak sadarkan diri. Contohnya putawd. Adiktif , Seseorang yang sudah mengkonsumsi narkoba biasanya akan ingin dan inginlagi karena zat tertentu dalam narkoba mengakibatkan seseorang cenderung bersifat pasif , karena secara tidak langsung narkoba memutuskan syaraf-syaraf dalamotak,contohnya ganja , heroin , putawe. Jika terlalu lama dan sudah ketergantungan narkoba maka lambat laun organ dalamtubuh akan rusak dan jika sudah melebihi takaran maka pengguna itu akan overdosis danakhirnya kematianJenis-jenis narkobaa. Heroin atau diamorfin (INN) adalah sejenis opioid alkaloid.Heroin adalah derivatif 3.6-diasetil dari morfin (karena itulah namanya adalahdiasetilmorfin) dan disintesiskan darinya melalui asetilasi. Bentuk kristal putihnyaumumnya adalah garam hidroklorida, diamorfin hidroklorida. Heroin dapat menyebabkankecanduan. b. Ganja(Cannabis sativa syn. Cannabis indica) adalah tumbuhan budidaya penghasilserat, namun lebih dikenal karena kandungan zat narkotika pada bijinya,tetrahidrokanabinol (THC, tetra-hydro-cannabinol) yang dapat membuat pemakainyamengalami euforia (rasa senang yang berkepanjangan tanpa sebab).
 
Ganja menjadi simbol budaya hippies yang pernah populer di Amerika Serikat. Hal ini biasanya dilambangkan dengan daun ganja yang berbentuk khas. Selain itu ganja danopium juga didengungkan sebagai simbol perlawanan terhadap arus globalisme yangdipaksakan negara kapitalis terhadap negara berkembang. Di India, sebagian Sadhu yangmenyembah dewa Shiva menggunakan produk derivatif ganja untuk melakukan ritual penyembahan dengan cara menghisap Hashish melalui pipa Chilam/Chillum, dan denganmeminum Bhang.d. KontroversiDi beberapa negara tumbuhan ini tergolong narkotika, walau tidak terbukti bahwa pemakainya menjadi kecanduan, berbeda dengan obat-obatan terlarang yang berdasarkan bahan kimiawi dan merusak sel-sel otak, yang sudah sangat jelas bahayanya bagi umatmanusia. Diantara pengguna ganja, beragam efek yang dihasilkan, terutama euphoria(rasa gembira) yang berlebihan, serta hilangnya konsentrasi untuk berpikir diantara para pengguna tertentu.Efek negatif secara umum adalah bila sudah menghisap maka pengguna akan menjadimalas dan otak akan lamban dalam berpikir. Namun, hal ini masih menjadi kontroversi,karena tidak sepenuhnya disepakati oleh beberapa kelompok tertentu yang mendukungmedical marijuana dan marijuana pada umumnya. Selain diklaim sebagai pereda rasasakit, dan pengobatan untuk penyakit tertentu (termasuk kanker), banyak juga pihak yangmenyatakan adanya lonjakan kreatifitas dalam berfikir serta dalam berkarya (terutama pada para seniman dan musisi.Berdasarkan penelitian terakhir, hal ini (lonjakan kreatifitas), juga di pengaruhi oleh jenisganja yang digunakan. Salah satu jenis ganja yang dianggap membantu kreatifitas adalahhasil silangan modern "Cannabis indica" yang berasal dari India dengan "Cannabissativa" dari Barat, dimana jenis Marijuana silangan inilah yang merupakan tipe yangtumbuh di Indonesia.Efek yang dihasilkan juga beragam terhadap setiap individu, dimana dalam golongantertentu ada yang merasakan efek yang membuat mereka menjadi malas, sementara adakelompok yang menjadi aktif, terutama dalam berfikir kreatif (bukan aktif secara fisik seperti efek yang dihasilkan Methamphetamin). Marijuana, hingga detik ini, tidak pernahterbukti sebagai penyebab kematian maupun kecanduan. Bahkan, di masa lalu dianggapsebagai tanaman luar biasa, dimana hampir semua unsur yang ada padanya dapatdimanfaatkan untuk berbagai keperluan. Hal ini sangat bertolak belakang dan berbedadengan efek yang dihasilkan oleh obat-obatan terlarang dan alkohol, yang menyebabkan penggunanya menjadi kecanduan hingga tersiksa secara fisik, dan bahkan berbuatkekerasan maupun penipuan (aksi kriminal) untuk mendapatkan obat-obatan kimia buatan manusia itu. 
Jenis Narkoba BerbahayaPutawGanjaHeroinMorphinLSDMTDKokainMariyuanaHashOpiumJamur gaibInex

Selasa, 02 April 2013

FUNGSI – FUNGSI STRING


Dalam Visual Basic terdapat banyak fungsi yang digunakan untuk mengolah data bertipe string. Berikut ini adalah penjelasan tentang fungsi-fungsi string yang sering digunakan.
a)       LCase(x) , digunakan untuk mengubah semua huruf dalam string x menjadi kecil semua.
Contoh:
s = LCase("Aku Bisa") , maka nilai s adalah "aku bisa"
b)       UCase(x) , digunakan untuk mengubah semua huruf dalam string x menjadi besar semua.
Contoh:
s = LCase("Aku Bisa") , maka nilai s adalah "AKU BISA"
c)       Left(x,n) , digunakan untuk mengambil karakter dari string x yang dimulai dari kiri sebanyak n.
Contoh:
VB 6.0, s = Left("Aku Bisa", 3)
VB .NET, s = Strings.Left("Aku Bisa", 3) maka nilai s adalah "Aku"
d)       Right(x,n) , digunakan untuk mengambil karakter dari string x yang dimulai dari kanan sebanyak n.
Contoh:
VB 6.0, s = Right("Aku Bisa", 3)
VB .NET, s = Strings.Right("Aku Bisa", 3) maka nilai s adalah "isa"
e)       Mid(x,m,n) , digunakan untuk mengambil karakter dari string x yang dimulai dari karakter ke m sebanyak n.
Contoh:
s = Mid("Aku Bisa", 2, 2) , maka nilai s adalah "ku"
f)        LTrim(x) , digunakan untuk menghapus karakter spasi di bagian kiri dari string x.
Contoh:
s = LTrim("     Aku Bisa     ") , maka nilai s adalah "Aku Bisa     "
g)       RTrim(x) , digunakan untuk menghapus karakter spasi di bagian kanan dari string x.
Contoh:
s = RTrim("     Aku Bisa     ") , maka nilai s adalah "     Aku Bisa"
h)       Trim(x) , digunakan untuk menghapus karakter spasi di bagian kiri dan kanan dari string x.
Contoh:
s = Trim("     Aku Bisa     ") , maka nilai s adalah "Aku Bisa"
i)         Len(x) , digunakan untuk menghitung jumlah karakter dari string x.
Contoh:
s = Len("Aku Bisa") , maka nilai s adalah 8.
j)         String(n,x) , digunakan untuk membuat karakter x sebanyak n.
Contoh:
VB 6.0,  s = String(10, "A")
VB .NET, s = New String("A", 10) maka nilai s adalah "AAAAAAAAAA"
k)       Space(n) , digunakan untuk membuat karakter spasi sebanyak n.
Contoh:
s = Space(10) , maka nilai s adalah "          "
l)         Asc(x) , digunakan untuk mengetahui nilai ASCII dari karakter x.
Contoh:
s = Asc("A") , maka nilai s adalah 65
m)      Chr(x) , digunakan untuk mengetahui karakter dari nilai ASCII x.
Contoh:
s = Chr(65) , maka nilai s adalah "A"
n)       InStr(x,n) , digunakan untuk mengetahui posisi karakter n didalam string x.
Contoh:
s = InStr("Aku Bisa", "u") , maka nilai s adalah 3
o)       StrComp(x,y,n) , digunakan untuk membandingkan string x dan string y berdasarkan n. Jika n bernilai 0 maka akan dibandingkan secara case-sensitive, sedangkan jika n bernilai 1 maka akan dibandingkan secara biasa.
Contoh:
s = StrComp("Aku", "aku", 0) , maka nilai s adalah -1
s = StrComp("Aku", "aku", 1) , maka nilai s adalah 0
Khusus untuk fungsi ini, jika menghasilkan nilai 0 maka dianggap sebagai True, dan jika menghasilkan nilai selain 0 maka dianggap False.
p)       StrConv(x,n) , digunakan untuk mengubah huruf dalam string x berdasarkan nilai n.
Contoh:
s = StrConv("Aku Bisa", 1) , maka nilai s adalah "AKU BISA"
s = StrConv("Aku Bisa", 2) , maka nilai s adalah "aku bisa"
s = StrConv("aku bisa", 3) , maka nilai s adalah "Aku Bisa"
q)       StrReverse(x) , digunakan untuk membalikkan posisi huruf dalam string x.
Contoh:
s = StrReverse("Aku Bisa") , maka nilai s adalah "asiB ukA"
r)        Replace(x,m,n) , digunakan untuk menggantikan karakter m dalam string x dengan karakter n.
Contoh:
s = Replace("Kamu Juga Bisa", "a", "o") , maka nilai s adalah "Komu Jugo Biso"
s)       Split(x,n)(i) , digunakan untuk memecah string x berdasarkan karakter n dengan penomoran i.
Contoh:
s = Split("Kuda,Kerbau,Sapi,Kambing,Macan", ",")(0) , maka nilai s adalah "Kuda"
s = Split("Kuda,Kerbau,Sapi,Kambing,Macan", ",")(1) , maka nilai s adalah "Kerbau"
s = Split("Kuda,Kerbau,Sapi,Kambing,Macan", ",")(4) , maka nilai s adalah "Macan"
t)        Join(x,n) , digunakan untuk menggabungkan rangkain string x yang dihubungkan dengan string n.
Contoh:
VB6, s = Join(Array("Hani", "Indah", "Budi", "Herman"), " & ")
VB.NET, s = Join(New Object() {"Hani", "Indah", "Budi", "Herman"}, " & ") maka nilai s adalah "Hani & Indah & Budi & Herman"

Fungsi-fungsi diatas juga dapat djadikan fungsi lain diantaranya adalah :
  1. Mengecek keberadaan string dalam string. Misalnya Anda ingin memeriksa ada tidaknya string "a" dalam string "anda berhasil", maka kodenya adalah :
If CBool(InStr("anda berhasil", "a")) Then
    'jika ada
Else
    'jika tidak ada
End If
  1. Menghitung karakter tertentu dalam string. Misalnya Anda ingin menghitung karakter "a" dalam string "anda berhasil", maka kodenya adalah :
t = "anda berhasil"
s = Len(t) - Len(Replace(t, "a", ""))
maka nilai s adalah 3
  1. Menghitung jumlah kata dalam string. Misalnya Anda ingin menghitung jumlah kata dalam string "anda berhasil", maka kodenya adalah :
s = UBound(Split("anda berhasil", " ")) + 1
maka nilai s adalah 2
  1. Menghilangkan karakter tertentu dalam string. Misalnya Anda ingin menghilangkan karakter "a" dalam string "anda berhasil", maka kodenya adalah :
s = Replace("anda berhasil", "a", "")
maka nilai s adalah "nd berhsil"
  1. Mengisi variabel array dinamis dengan string. Contoh kodenya sebagai berikut :
Dim Binatang() As String
Binatang = Split("Kuda,Kerbau,Sapi,Kambing,Macan", ",")
maka variabel Binatang memiliki 5 index (0-4) dengan rincian:
nilai Binatang(0) = "Kuda"
nilai Binatang(1) = "Kerbau"
nilai Binatang(2) = "Sapi"
nilai Binatang(3) = "Kambing"
nilai Binatang(4) = "Macan"

Kamis, 05 Juli 2012

BAHASA PEMROGRAMAN

Bahasa Pemrograman HTML

HTML ( Hyper Text Markup Language) adalah bahasa markup yang digunakan untuk membuat sebuah halaman web dan menampilkan berbagai informasi di dalam sebuah browser Internet(Mozilla, Opera, Safari, Internet explorer, dsb).
HTML berupa kode-kode tag yang menginstruksikan browser untuk menghasilkan tampilan sesuai dengan yang diinginkan. HTML dibuat oleh Tim Berners-Lee  dan dipopulerkan pertama kali oleh browser Mosaic. Selama awal tahun 1990 HTML mengalami perkembangan yang sangat pesat.
HTML saat ini merupakan standar Internet yang didefinisikan dan dikendalikan penggunaannya oleh World Wide Web Consortium (W3C).
Hal-hal yang bisa di lakukan dengan HTML yaitu:
  • Mengontrol tampilan dari web page dan contentnya.
  • Mempublikasikan document secara online sehingga bisa di akses dari seluruh dunia.
  • Membuat online form yang bisa di gunakan untuk menangani pendaftaran, transaksi secara online.
  • Menambahkan object-object seperti image, audi, video dan juga java applet dalam document HTML.
Perintah HTML biasanya berada dalam tanda <…> dan diakhiri dengan tanda </..>
Contoh dalam membuat design web :
  1. Aktifkan notepad
  2. ketikkan tag HTML, contoh dlm bntuk umum:

<HTML>
<Head>
<Title> “nama judul” </Title>
</Head>
<Body>
“Ketikkan isi”
</Body>
</HTML>

3. save tag dgn extensi HTML.
4. Aktifkan aplikasi browsing (IE,Opera,Mozilla,dsb). pilih file -> open -> browse -> kemudian cari file HTML tadi -> ok. Kemudian liat hasilnya.

 

Bahasa Pemrograman PHP

Bahasa PHP adalah bahasa scripting yang didesign untuk web. PHP pertama kali dibuat oleh Rasmus lerdorf yang pada awalnya dibuat untuk menghitung jumlah pengunjung pada homepage nya. Saat ini PHP amat populer dan menggantikan Perl yang sebelumnya juga populer sebagai bahasa scripting web.  Saat ini PHP telah digunakan oleh berbagai situs populer baik luar negeri maupun situs dalam negeri. PHP menjadi populer karena kesederhanaanya dan kemampuannya dalam menghasilkan berbagai aplikasi web. Mulai dari counter, sistem artikel atau content management system, e-commerce/e-store, bulletin board/forum diskusi, dan sebagainya dapat dibuat dengan PHP.
Kelebihan PHP:
  • Aplikasi program dengan PHP cukup cepat dibandingkan dengan aplikasi CGI dengan Perl atau Phyton bahkan lebih cepat dibanding dengan ASP maupun Java dalam berbagai aplikasi web (Kecepatan ini bisa bervariasi karena dipengaruhi oleh tipe aplikasi dan jumlah pengunjung).
  • Tersedia baik di Windows maupun Linux, walau saat ini paling efektif di web server Apache dan OS Linux
  • Sintaks mirip C dan mudah dipelajari
  • Dalam sisi pemahamanan, PHP adalah bahasa scripting yang paling mudah karena memiliki referensi yang banyak, sehingga bahasa PHP menjadi bahasa yang populer untuk pemrogaman web.
Kelemahan PHP:
  • Tidak ideal untuk pengembangan skala besar
  • Tidak memiliki sistem pemrograman berorientasi objek yang sesungguhnya (sampai versi 4 ini)
  • Tidak bisa memisahkan antara tampilan dengan logik dengan baik (walau penggunaan template dapat memperbaikinya)
  • PHP memiliki kelemahan security tertentu apabila programmer tidak jeli dalam melakukan pemrograman dan kurang memperhatikan isu dan konfigurasi PHP
  • Kode PHP dapat dibaca semua orang,
  • PHP adalah bahasa yang tidak melakukan kompilasi dalam penggunaanya.

Bahasa Pemrograman Pascal

Apa itu bahasa Pascal? dan Apa kegunaannya?. Mungkin kita semua udah pada tau apa itu pascal. Pascal adalah bahasa Pemrograman yang di rancang oleh seorang profesor bernama “Niklaus Wirth”  dari Swiss pada Tahun 1971. Sedangkan nama Pascal sendiri diambil dari nama seorang matematikawan asal perancis yang bernama “Blaise Pascal”, yang pertama kali menciptakan mesin penghitung.
Pascal menyediakan fasiltas IDE (Integrated Development Environment), yang diantaranya berisi :
Kompiler (untuk mengkompilasi program menjadi suatu objek yang dapat dipahami oleh komputer)
Debugger ( untuk membantu mencari kesalahan program)
Linker (untuk menggabungkan file objek dan file pustaka serta membentuk file executable)
Editor (untuk menuliskan program sumber).
Kelebihan :
Kelebihan dari bahasa pemrograman Pascal adalah:
  • Tipe Data Standar, tipe-tipe data standar yang telah tersedia pada kebanyakan bahasa pemrograman. Pascal memiliki tipe standar: boolean, interger, real, char, string, byte.
  • User defined Data Types, programmer dapat membuat tipe data lain yang diturunkan dari tipe data standar.
  • Strongly-typed, programmer harus menentukan tipe data dari suatu variabel, dan variabel tersebut tidak dapat dipergunakan untuk menyimpan tipe data selain dari format yang ditentukan.
  • Terstruktur, memiliki sintaks yang memungkinkan penulisan program dipecah menjadi fungsi-fungsi kecil (procedure dan function) yang dapat dipergunakan berulang-ulang.
  • Sederhana dan Ekspresif, memiliki struktur yang sederhana dan sangat mendekati bahasa manusia (bahasa Inggris) sehingga mudah dipelajari dan dipahami.

Type Data
Type data dalam Bahasa Pascal antara lain :
Boolean : Nilai True atau False
Integer   : Angka dari -32768 sampai 32767
Real       : Semua nilai pecahan dari 1E-38 to 1E+38
Char      : Semua karakter dari tabel ASCII
String     : Semua huruf, spasi, frase
Byte       : Angka dari 0 sampai 255