Pemrograman Bahasa Rakitan | Mencari Hasil Penjumlahan dan Rata-Rata di Assembly

Dibawah ini merupakan listing program assembly untuk menampilkan hasil penjumlahan dan rerata dari beberapa bilangan yang diinputkan. Sebelumnya banyaknya bilangan, diinput oleh user sendiri.

Priview :

Listing Programnya :
cetak_kal macro kal
mov ah,09h
lea dx,kal
int 21h
endm
cetak_angka macro angka
mov al,angka
cmp al,09h
jg duadigit
mov dl,al
mov ah,02h
int 21h
duadigit:
xor ax,ax
mov al,angka
mov bl,10
div bl
mov bh,ah
mov dl,al
or dl,30h
mov ah,2
int 21h
mov dl,bh
or dl,30h
mov ah,2
int 21h
endm

.model small
.code
org 100h
mulai: jmp proses
val1 db ?
val2 db ?
label1  db 13,10,'Jumlah data : $'
label2  db 13,10,'Masukkan angka : $'
label3  db 13,10,'Rata-rata : $'
label4  db 13,10,'Jumlah semua : $'
proses:
cetak_kal label1 ;cetak kalimat "Masukkan angka : "
mov ah, 01h ;ambil jumlah angka
int 21h ;ambil jumlah angka
sub al, 30h ;kurangkan hasil inputan dengan 30
mov cl, al ;copy ke register cl (untuk jumlah perulangan) dari al (hasil inputan tadi)
mov bl, al ;copy ke register bl (untuk pembagi rata2) dari al (hasil inputan tadi)
mov al, 00 ;copy ke register al = 00
mov val1, al ;isi variabel sementara val1 dengan al = 0
lbl2: ;cetak label2 (Masukkan angka : )
cetak_kal label2 ;cetak label2 dengan makro cetak_kal
mov ah, 01h ;ambil hasil angka inputan ke-"cl"
int 21h ;ambil hasil angka inputan
sub al, 30h ;kurangkan hasil inputan dengan 30
add al, val1 ;tambahkan al(hasil inputan barusan) dengan val1
mov val1, al ;isikan val1, dengan al (hasil val1+inputan)
loop lbl2 ;melakukan perulangan sebanyak "cl" (kembali ke lbl1)
rata2: cetak_kal label3 ;cetak label3 (Rata-rata : ) dengan makro cetak_kal
mov ax, 00 ;copy ke register ax = 00
mov al, val1 ;copy ke register ax = val1 (hasil penjumlahan inputan angka)
div bl ;bagi al, dengan bl (jumlah angkan yang diinput di atas)
add ax, 3030h ;tambahkan ax == 00, dengan 3030
mov dx, ax ;copy ke register dx = ax (00+3030)
mov ah, 02h ;cetak dx (rata-rata)
int 21h
jumlah: cetak_kal label4 ;cetak label4 (Jumlah semua : )
cetak_angka val1 ;cetak nilai val1 (hasil penjumlahan inputan)
mov ah, 4ch
int 21h
end mulai

DOWNLOAD
Pemrograman Java | Mengubah dan Memecah Tanggal MySQL

Pemrograman Java | Mengubah dan Memecah Tanggal MySQL

Format Default dari tanggal MySQL adalah YYY-MM-DD, misalnya 1990-03-26. Misalkan kita cuma akan mengambil tahun-nya, atau bulan atau tanggalnya saja, bisa menggunakan fungsi substring-nya dari java. Misalkan data diambil dari jTable dari action MouseClick, seperti berikut ini :

String TahunAjaran = tabmode.getValueAt(row, 0).toString()); 
// buat variabel Tahun Ajaran dari jTabel ==> Hasilnya (1990-03-26)
String TahunTok = TahunAjaran.substring(0,4);
// lha di sinilah kuncinya, fungsi substring(angka_mulai, angka_ke_akhir). Jadi ambil karakter ke 0-4 dari variabel TahunAjaran (1990-03-26) ==> 1990
txtTA.setText(TahunTok); // Masukkan ke TextField 

Wah, gitu tok, kok bos, Sekian dan terima kasih....,

Download Kalender Tahun 2012 Manchester United beserta Hari Libur Umum Indonesia format JPG dan CDR

Di halaman ini Anda dapat Download Kalender Tahun 2012 Manchester United beserta Hari Libur Umum Indonesia format JPG dan CDR. Tahun baru tahun 2012 telah datang. Bagi pengunjung blog ini yang belum mempunyai penanggalah 2012 dan ingin mendapatkannya, dapat melihat format .JPEGnya di bawah ini. Namun, sebelumnya maaf, karena untuk tampilan desain utamanya saya buat Manchester United. Nah, jika Anda ingin mengeditnya, Anda dapat mendownloadnya yang format Corel Draw 12 (.CDR), dengan mengklik link di bawah ini. Sekian dan terima kasih. GGMU....

1. Link download format .JPG (Ziddu - 2 MB) : klik DISINI
2. Link download format .CDR (Ziddu - 0,7 MB) : klik DISINI