SCORM 2004 : CAM

SCORM 2004 merupakan pengembangan dari versi SCORM sebelumnya, yang mana merupakan kumpulan dari dokumen yang saling berhubungan



Dalam SCORM terdapat 3 (tiga) komponen inti yang menyusun SCORM, komponen tersebut adalah :

1. Content Aggregation Model (CAM)
SCORM sering disebut juga sebagai kumpulan buku pada rak buku. CAM merupakan satu kumpulan buku
yang tersusun pada suatu rak buku, seperti ilustrasi berikut



SCORM CAM mendeskripsikan komponen yang dugunakan untuk pengembang dan pengguna untuk mengumpulkan sumber daya pembelajaran, sehingga dapat menyajikan konten pembelajaran yang sesuai dengan keinginan pengembang dan pengguna, secara umum SCORM CAM terdiri dari 4 susunan utama, yaitu :

1. a. Content Model : mendefinisikan komponen SCORM yang menyusun sistem pembelajaran dan menjelaskan bagaimana komponen tersebut saling berhubungan, dan dari susunan Content Model didapat susunan sebagai berikut :

1.a.1. Asset : merupakan blok paling dasar pembentuk learning resource. Asset adalah representasi dari data elektronik, seperti text, gambar, dll.

1.a.2. Sharable Content Object (SCO) : merupakan kumpulan dari satu atau lebih asset yang mendeskripsikan learning resource yang dapat digunakan.

1.a.3. Content Organization : Gambaran atau pemetaan yang mendefinisikan urutan penggunaan konten melalui aktivitas yang terstruktur



1.b. Content Packaging : Berisi semua koleksi file yang diperlukan untuk menjalankan materi pembelajaran pada format standar

1.c. Metadata : suatu mekanisme yang mendeskripsikan instance secara spesifik dari komponen dalam content model.

1.d. Manifest : Dikenal juga sebagai IMS Manifest yang berupa dokumen XML yang mendeskripsikan semua konten.



untuk selanjutnya akan saya tuliskan mengenai penyusun SCORM yang lain

Ref :

SCORM Overview by ADL SCORM

Dodds, Philips, 2006b, SCORM 2004 : Content Aggregation Model

Konversi Mata Uang Ke Penulisan Huruf

Pada tulisan kali ini akan saya bagi2 programming sedikit mengenai konversi mata uang ke bentuk penulisan huruf

Fungsi terbilang nilai mata uang ini biasanya digunakan pada aplikasi-aplikasi yang berkaitan dengan penjualan atau sejenisnya. Sebagai gambaran, Operator/admin hanya memasukkan nilai mata uang maka secara otomatis aplikasi tersebut mengkonversnya ke huruf. Selain itu juga mempermudah pengucapan nilai mata uang.

Ikuti langkah berikut:

• Buat 1 Modul dan satu form. Nama modul dan form terserah anda
• Sisipkan kode berikut pada modul

Function Cur2Int(str_ As String) As Long

Dim s As String
Dim D As String
Dim dd As String
Dim I As Byte
Dim J As Byte
On Error GoTo hancuR
s = str_
D = ""
For I = 0 To Len(s) - 1
dd = Mid(s, Len(s) - I, 1)
If dd <> "." Then
D = dd + D
End If
Next I
If dd <> "" Then
Cur2Int = Val(D)
Else
Cur2Int = 0
End If
Exit Function
hancuR:
'//Nama text terbilang
Txtterbilang.Text = "0"
End Function


'// fungsi terbilang
Public Function Terbilang(strAngka As String) As String

Dim strJmlHuruf$, intPecahan As Integer, strPecahan$, Urai$, Bil1$, strTot$, Bil2$
Dim X, Y, z As Integer

If strAngka = "" Then Exit Function
strJmlHuruf = LTrim(strAngka)
intPecahan = Val(Mid(strAngka, 15, 2))
If (intPecahan = 0) Then
strPecahan = ""
Else
strPecahan = LTrim(Str(intPecahan)) + "/100 "
End If
X = 0
Y = 0
Urai = ""
While (X < x =" X" strtot =" Mid(strJmlHuruf," y =" Y" z =" Len(strJmlHuruf)" z =" 1" z =" 7" z =" 10" z =" 13)" bil1 = "Satu " z =" 4)" x =" 1)" bil1 = "Se" bil1 = "Satu " z =" 2" z =" 5" z =" 8" z =" 11" z =" 14)" x =" X" strtot =" Mid(strJmlHuruf," z =" Len(strJmlHuruf)" bil2 = "" bil1 = "Sepuluh " bil1 = "Sebelas " bil1 = "Dua Belas " bil1 = "Tiga Belas " bil1 = "Empat Belas " bil1 = "Lima Belas " bil1 = "Enam Belas " bil1 = "Tujuh Belas " bil1 = "Delapan Belas " bil1 = "Sembilan Belas " bil1 = "Se" bil1 = "Dua " bil1 = "Tiga " bil1 = "Empat " bil1 = "Lima " bil1 = "Enam " bil1 = "Tujuh " bil1 = "Delapan " bil1 = "Sembilan " bil1 = ""> 0) Then
If (z = 2 Or z = 5 Or z = 8 Or z = 11 Or z = 14) Then
Bil2 = "Puluh "
ElseIf (z = 3 Or z = 6 Or z = 9 Or z = 12 Or z = 15) Then
Bil2 = "ratus "
Else
Bil2 = ""
End If
Else
Bil2 = ""
End If

If (Y > 0) Then
Select Case z
Case 4
Bil2 = Bil2 + "Ribu "
Y = 0
Case 7
Bil2 = Bil2 + "Juta "
Y = 0
Case 10
Bil2 = Bil2 + "Milyar "
Y = 0
Case 13
Bil2 = Bil2 + "Triliun "
Y = 0
End Select
End If

Urai = Urai + Bil1 + Bil2
Wend
Urai = Urai + strPecahan
Terbilang = Urai & "Rupiah"
End Function

• Sisipkan 2 buah text box pada form, dan beri nama textbox tadi :

* txtangka -> untuk inputan bilangan
* txtTerbilang -> untuk menampilkan hasil konversi

• Sisipkan 1 buah Command button. Klik 2 kali Command Button dan sisipkan kode berikut :

If TxtAngka.Text = "" Then
MsgBox "Inputan Angka masih kosong", vbQuestion, "Kesalahan | inputan kosong"
TxtAngka.SetFocus
Else
TxtTerbilang.Text = Terbilang(Str(Cur2Int(TxtAngka.Text)))
End If

Langkah-langkah diatas merupakan langkah peng-Codingan. Sekarang saatnya kita melakukan pengujian pada aplikasi ini.

• Jalankan Script yang telah dibuat pada menu RUN
• Masukkan angka/bilangan pada txtAngka.
• Klik Command button, maka hasil konversi akan tampil pada txtTerbilang.

Untuk source yang sudah jadi dapat di download pada Halaman Download.
Okey.. Selamat mencoba.

1000 Kertas lipat

Sewaktu boy dan girl baru pacaran, boy melipat 1000 burung kertas buat girl, menggantungkannya di dalam kamar girl. Boy mengatakan, 1000 burung kertas itu menandakan 1000 ketulusan hatinya.

Waktu itu, girl dan boy setiap detik selalu merasakan betapa indahnya cinta mereka berdua.

Tetapi pada suatu saat, girl mulai menjauhi boy. Girl memutuskan untuk menikah dan pergi ke Perancis, ke Paris tempat yang dia impikan di dalam mimpinya berkali-kali itu!!

Sewaktu girl mau mutusin boy, girl bilang sama boy, "Kita harus melihat dunia ini dengan pandangan yang dewasa. Menikah bagi cewek adalah kehidupan kedua kalinya!! Aku harus bisa memegang kesempatan ini dengan baik. Kamu terlalu miskin, sungguh aku tidak berani membayangkan bagaimana kehidupan kita setelah menikah.!!"

Setelah Girl pergi ke Perancis, Boy bekerja keras, dia pernah menjual koran, menjadi karyawan sementara, bisnis kecil, setiap pekerjaan dia kerjakan dengan sangat baik dan tekun.

Sudah lewat beberapa tahun...
Karena pertolongan teman dan kerja kerasnya , akhirnya dia mempunyai sebuah perusahaan. Dia sudah kaya, tetapi hatinya masih tertuju pada Girl, dia masih tidak dapat melupakannya.

Pada suatu hari, waktu itu hujan, Boy dari mobilnya melihat sepasang orang tua berjalan sangat pelan di depan. Dia mengenali mereka, mereka adalah orang tua Girl.

Dia ingin mereka lihat kalau sekarang dia tidak hanya mempunyai mobil pribadi, tetapi juga mempunyai Vila dan perusahaan sendiri, ingin mereka tahu kalau dia bukan seorang yang miskin lagi, dia sekarang adalah seorang Bos. Boy mengendarai mobilnya sangat pelan sambil mengikuti sepasang orang tua tersebut.

Hujan terus turun, tanpa henti, biarpun kedua org tua itu memakai payung,tetapi badan mereka tetap basah karena hujan.

Sewaktu mereka sampai tempat tujuan, Boy tercengang oleh apa yang ada di depan matanya, itu adalah tempat pemakaman. Dia melihat di atas papan nisan Girl tersenyum sangat manis terhadapnya.

Di samping makamnya yang kecil, tergantung burung-burung kertas yang dibuatkan Boy, dalam hujan burung-burung kertas itu terlihat begitu hidup.

Orang tua Girl memberitahu Boy, Girl tidak pergi ke paris, Girl terserang kanker, Girl pergi ke surga. Girl ingin Boy menjadi orang, mempunyai keluarga yang harmonis, maka dengan terpaksa berbuat demikian terhadap Boy dulu. Girl bilang dia sangat mengerti Boy, dia percaya kalau Boy pasti akan berhasil.

Girl mengatakan, kalau pada suatu hari Boy akan datang ke makamnya dan berharap dia membawakan beberapa burung kertas buatnya lagi. Boy langsung berlutut, berlutut di depan makam Girl, menangis dengan begitu sedihnya.

Hujan pada hari Ching Ming itu terasa tidak akan berhenti, membasahi sekujur tubuh Boy. Boy teringat senyum manis Girl yang begitu manis dan polos, mengingat semua itu, hatinya mulai meneteskan darah.

Sewaktu Orang tua ini keluar dari pemakaman, mereka melihat kalau Boy sudah membukakan pintu mobil untuk mereka. Lagu sedih terdengar dari dalam mobil tersebut.

Hatiku tidak pernah menyesal,
Semuanya hanya untukmu 1000 burung kertas,
1000 ketulusan hatiku,
Beterbangan di dalam angin
Menginginkan bintang yang lebat besebaran di langit,
Melewati sungai perak,
Apakah aku bisa bertemu denganmu?
Tidak takut berapapun jauhnya,
Hanya ingin sekarang langsung berlari ke sampingmu.
Masa lalu seperti asap, hilang dan tak kan kembali,
Menambah kerinduan di hatiku.
Bagaimanapun dicari,
Jodoh kehidupan ini pasti tidak akan berubah.

Burung sebelah sayap

Seorang teman dengan potensi tinggi, mengeluh berat setelah pindah-pindah kerja di lebih dari lima tempat. Tadinya, saya fikir ia mencari penghasilan yang lebih tinggi. Setelah mendengarkan dengan penuh empati, rekan ini rupanya mengalami kesulitan dengan lingkungan kerja. Di semua tempat kerja sebelumnya, dia selalu bertemu dengan orang yang tidak cocok. Di sini tidak cocok dengan atasan, di situ bentrok dengan rekan sejawat, di tempat lain malah diprotes bawahan.
Kalau rekan di atas berhobi pindah-pindah kerja, seorang sahabat saya yang lain punya pengalaman yang lain lagi. Setelah berganti istri sejumlah tiga kali, dengan berbagai alasan yang berbau tidak cocok, ia kemudian merasa capek dengan kegiatan berganti-ganti pasangan ini.
Seorang pengusaha berhasil punya pengalaman lain lagi. Setiap kali menerima orang baru sebagai pimpinan puncak, ia senantiasa semangat dan penuh optimis. Seolah-olah orang baru yang datang pasti bisa menyelesaikan semua masalah. Akan tetapi, begitu orang baru ini berumur kerja lebih dari satu tahun, maka mulailah kelihatan busuk-busuknya. Dan iapun mulai capek dengan kegiatan berganti-ganti pimpinan puncak ini.
Digabung menjadi satu, seluruh cerita ini menunjukkan bahwa kalau motif kita mencari pasangan - entah pasangan hidup maupun pasangan kerja – adalah mencari orang yang cocok di semua bidang, sebaiknya dilupakan saja. Bercermin dari semua inilah, bahwa fundamen paling dasar dari manajemen sumber daya manusia adalah manajemen perbedaan, yang mencakup dua hal mendasar :
• menerima perbedaan dan
• mentransformasikan perbedaan sebagai kekayaan.
Sayangnya, kendati idenya sederhana, namun implementasinya memerlukan upaya yang tidak kecil. Ini bisa terjadi, karena tidak sedikit dari kita yang menganggap diri seperti burung yang bersayap lengkap. Bisa terbang (baca :hidup dan bekerja ) sendiri tanpa ketergantungan pada orang lain. Padahal, meminjam apa yang pernah ditulis Luciano de Crescendo, kita semua sebenarnya lebih mirip dengan burung yang bersayap sebelah.Dan hanya bisa terbang kalau mau berpelukan erat-erat bersama orang lain.
Di perusahaan, hampir tidak pernah kita bertemu pemimpin berhasil tanpa kemampuan bekerja sama dengan orang lain.
Di keluarga, tidak pernah kita temukan keluarga bahagia tanpa kesediaan sengaja untuk 'berpelukan' dengan anggota keluarga yang lain.
Di tingkat pemimpin negara, orang sehebat Nelson Mandela dan Kim Dae Jung bahkan mau berpelukan bersama orang yang dulu pernah menyiksanya.
Lebih-lebih kalau kegiatan berpelukan ini dilakukan dengan penuh cinta. Ia tidak saja merubah sesuatu yang tidak mungkin menjadi mungkin,mentransformasikan kegagalan menjadi keberhasilan, namun juga membuat semuanya tampak indah dan menyenangkan. Makanya, penulis buku Chicken Soup For The Couple Soul mengemukakan, cinta adalah rahmat Tuhan yang terbesar.
Demikian besarnya makna dan dampak cinta, sampai-sampai ia tidak bisa dibandingkan dengan apapun. Rugi besarlah manusia yang selama hidupnya tidak pernah mengenal cinta. Ia seperti pendaki gunung yang tidak pernah sampai di puncak gunung. Capek, lelah, penuh perjuangan namun sia-sia.

Ini semua, mendidik kita untuk hidup dengan pelukan cinta. Di pagi hari ketika baru bangun dan membuka jendela, kita senantiasa berterimakasih akan pagi yang indah. Dan mencari-cari lambang cinta yang bisa kita peluk. Entah itu pohon bonsai di halaman rumah, ikan koi di kolam, atau suara anak yang rajin menonton film kartun. Begitu keluar dari kamar tidur, akan indah sekali hidup ini rasanya kalau kita mencium anak, atau istri. Melihat burung gereja yang memakan nasi yang sengaja diletakkan di pinggir kali, juga menghasilkan pelukan cinta tersendiri. Demikian juga dengan di kantor,godaan memang ada banyak sekali. Dari marah, stres, frustrasi, egois sampai dengan nafsu untuk memecat orang. Namun, begitu kita ingat karyawan dan karyawati bawah yang bekerja penuh ketulusan, dan menghitung jumlah perut yang tergantung pada kelangsungan hidup perusahaan, energi pelukan cinta entah datang dari mana.
Kembali ke pengandaian awal tentang burung dengan sebelah sayap, Manusia memang tidak pernah merasa cukup, Kita selalu lebih di sini dan kurang disitu. Atau sebaliknya. Kesombongan atau keyakinan berlebihan yang menganggap kita bisa sukses sendiri tanpa bantuan orang lain, hanya akan membuat kita bernasib sama dengan burung yang bersayap sebelah, namun memaksa diri untuk terbang. Sepintar dan sehebat apapun kita, tetap kita hanya akan memiliki sebelah sayap. Mau belajar, berjuang, berdoa, bermeditasi atau sebesar dan sehebat apapun usaha kita, semuanya akan diakhiri dengan jumlah sayap yang hanya sebelah.

dari berbagai sumber

Kekasih standar vs Kekasih sejati

Kekasih standar selalu ingat senyum di wajahmu.
Kekasih sejati juga mengingat wajahmu ketika bersedih.

Kekasih standar akan membawamu makan makanan yang enak-enak.
Kekasih sejati akan mempersiapkan makanan yang kamu suka.

Kekasih standar setiap detik selalu menunggu telpon dari kamu.
Kekasih sejati setiap detik selalu teringat ingin menelponmu.

Kekasih standar selalu mendoakanmu kebahagiaan.
Kekasih sejati selalu berusaha memberimu kebahagiaan.

Kekasih standar mengharapkan kamu berubah demi dia.
Kekasih sejati mengharapkan dia bisa berubah untuk kamu.

Kekasih standar paling sebal jika kamu menelpon waktu dia tidur.
Kekasih sejati akan menanyakan kenapa sekarang kamu baru telpon?

Kekasih standar akan mencarimu untuk membahas kesulitanmu.
Kekasih sejati akan mencarimu untuk memecahkan kesulitanmu.

Kekasih standar selalu bertanya mengapa kamu selalu membuatnya sedih?
Kekasih sejati akan selalu menanyakan diri sendiri mengapa membuat kamu sedih?

Kekasih standar selalu memikirkan penyebab perpisahan.
Kekasih sejati memecahkan penyebab perpisahan.

Kekasih standar bisa melihat semua yang telah dia korbankan untukmu.
Kekasih sejati bisa melihat semua yang telah kamu korbankan untuknya.

Kekasih standar berpikir bahwa pertengkaran adalah akhir dari segalanya.
Kekasih sejati berpikir, jika tidak pernah bertengkar tidak bisa disebut cinta sejati.

Kekasih standar selalu ingin kamu disampingnya, menemaninya selamanya.
Kekasih sejati selalu berharap selamanya bisa disampingmu, menemanimu.