gandhi segment
assume cs:gandhi
org 100h
assume cs:gandhi
org 100h
mulai: jmp cetak
menu db, ‘MENU UTAMA’
db 13,10,’1. discending’
db 13,10,’2. biodata’
db 13,10,’3. Keluar$’
db 13,10,’1. discending’
db 13,10,’2. biodata’
db 13,10,’3. Keluar$’
pilihan db 13,10,’Pilihan [1-3]: $’
biodata db ‘BIODATA$’
nim db 13,10,’NIM : $’
nama db 13,10,’Nama : $’
kel db 13,10,’Kelompok : $’
inputnim db 15,?,15 dup(?)
inputnama db 31,?,31 dup(?)
inputkel db 8,?,8 dup(?)
nim db 13,10,’NIM : $’
nama db 13,10,’Nama : $’
kel db 13,10,’Kelompok : $’
inputnim db 15,?,15 dup(?)
inputnama db 31,?,31 dup(?)
inputkel db 8,?,8 dup(?)
discendingmenu db ‘DISCENDING’
db 13,10,’1. Tampil secara Ascending’
db 13,10,’2. Tampil secara Descending’
db 13,10,’3. Ke Menu utama$’
db 13,10,’1. Tampil secara Ascending’
db 13,10,’2. Tampil secara Descending’
db 13,10,’3. Ke Menu utama$’
back db ‘Kembali ke menu utama [Y/T]: $’
cetak: mov ax,03h
int 10h
mov ah,09h
mov dx,offset menu
int 21h
mov ah,09h
mov dx,offset pilihan
int 21h
mov ah,01h
int 21h
cmp al,’1′
je bio
cmp al,’2′
je alpha
cmp al,’3′
selesai: int 20h
int 10h
mov ah,09h
mov dx,offset menu
int 21h
mov ah,09h
mov dx,offset pilihan
int 21h
mov ah,01h
int 21h
cmp al,’1′
je bio
cmp al,’2′
je alpha
cmp al,’3′
selesai: int 20h
bio: mov ax,03h
int 10h
mov ah,09h
mov dx,offset biodata
int 21h
mov ah,09h
mov dx,offset nim
int 21h
mov ah,0ah
mov dx,offset inputnim
int 21h
mov ah,09h
mov dx,offset nama
int 21h
mov ah,0ah
mov dx,offset inputnama
int 21h
mov ah,09h
mov dx,offset kel
int 21h
mov ah,0ah
mov dx,offset inputkel
int 21h
mov ah,09h
mov dx,offset back
int 21h
cmp al,’y’
jmp cetak
cmp al,’Y’
jmp cetak
cmp al,’t’
jmp selesai
cmp al,’T’
jmp bio
jmp selesai
int 10h
mov ah,09h
mov dx,offset biodata
int 21h
mov ah,09h
mov dx,offset nim
int 21h
mov ah,0ah
mov dx,offset inputnim
int 21h
mov ah,09h
mov dx,offset nama
int 21h
mov ah,0ah
mov dx,offset inputnama
int 21h
mov ah,09h
mov dx,offset kel
int 21h
mov ah,0ah
mov dx,offset inputkel
int 21h
mov ah,09h
mov dx,offset back
int 21h
cmp al,’y’
jmp cetak
cmp al,’Y’
jmp cetak
cmp al,’t’
jmp selesai
cmp al,’T’
jmp bio
jmp selesai
alpha: mov ax,03h
int 10h
int 10h
mov ah,09h
mov dx,offset discendingmenu
int 21h
mov dx,offset pilihan
int 21h
mov dx,offset discendingmenu
int 21h
mov dx,offset pilihan
int 21h
mov ah,01h
int 21h
cmp al,’1′
je descending
cmp al,’2′
jmp cetak
int 21h
cmp al,’1′
je descending
cmp al,’2′
jmp cetak
descending:mov ax,03h
int 10h
mov cx,1ah
mov ah,02h
mov dl,’Z’
b: int 21h
dec dl
loop b
mov ah,01h
int 21h
jmp alpha
int 10h
mov cx,1ah
mov ah,02h
mov dl,’Z’
b: int 21h
dec dl
loop b
mov ah,01h
int 21h
jmp alpha
;submenubio: jmp bio
;submenualpha: jmp alpha
;selesai: int 20h
gandhi ends
end mulai
gandhi ends
end mulai
0 komentar:
Posting Komentar