Selingan: Display Dot Matrix (Animasi)

Sebelum saya melanjutkan pembahasan tentang Delphi dan Sitem Embedding, kita selingi dulu dengan bermain-main animasi dengan dot matrix. Kalau contoh program di buku saya hanya bisa menampilkan gambar diam, contoh program ini adalah contoh program berikut akan membuat display dot matrik kita beranimasi.

Program animasi dot matriks ini tidak menggunakan algoritma yang rumit. Hanya menampilkan frame-frame gambar ke dalam display dot matriks. Untuk membuat animasinya saya menggunakan Ulead Gif Animator. Inilah animasi yang saya buat..

Ukuran animasi harus disesuaikan dengan ukuran dot matriks, dalam contoh ini 80×8 (WxH). Setelah selesai, simpan file animasi sebagai Image Frame, menu File/Save As/Image Frames. Simpan sebagai Jpeg dan pilih Export All Frame. Masukan nama, misal Animasi. Ketika di simpan, Gif Animator akan menyimpan frame-frame animasi sebagai file jpeg dengan nama sesuai dengan jumlah frame dalam animasi tersebut. Misal jika ada 30 frame, maka setiap frame akan tersimpan dengan nama Animasi001.jpg – Animasi0030.jpg. Setelah itu convert semua file ke dalam bentuk bitmap (bmp) monokrom, menggunakan paint, msialnya.

Lalu ekstrak data bitmapnya menggunakan file Bitmap Extractor, kemudian copy paste tabel datanya ke program assembler anda.

Dan inilah hasil simulasi Proteusnya:

File Assembler dan simulasi Proteusnya bisa di download di sini.

Sekarang liat potongan program berikut:

mov       R5,#240
mov       DPTR, #AnimatedData1
call      Display_Graphic

Dan juga ini:

AnimatedData1:
db        0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FCH, 0FFH, 0FFH,  ;1
db        0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
db        0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
db        0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
db        0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
db        0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
db        0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
db        0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,

R5 menyimpan informai frame. Setiap frame akan berisi akan berisi 80 byte data, 8 x 10 byte. Oleh karena itu jika animasi berisi 30 frame maka R5 harus diisi dengan 30×8 = 240. Sehingga total data yang harus dikirim adalah 240×10 byte dalam sub-rutin Display_Graphic.

Selamat berkreasi…