program assembler dari seorang newbie....
sebenernya ini teh tugas kuliah, tapi ane share deh...
.model small
.code
org 100h
start : jmp tanya1
menu1 db '* TEST IQ ANDA !! *',13,10
db '*PERTANYAAN KE-1: 1 x 1 + 1 : 1 - 1 = ',13,10
db '* Tekan 1 untuk jawaban = 4',13,10
db '* Tekan 2 untuk jawaban = 1',13,10
db '* Tentukan Pilihan Anda [1 / 2] : $'
jmp tanya2
JWB1 db 13,10,'SALAH, IQ ANDA 40 !! $'
MENU2 db ' PERTANYAAN KE-2: 2 + 2 : 2 x 2 = ',13,10
db '* Tekan 1 untuk jawaban = 4',13,10
db '* Tekan 2 untuk jawaban = 6 ',13,10
db '* Tentukan Pilihan Anda [1 / 2] :$'
jmp tanya3
jwb2 db 13,10,'SALAH, IQ ANDA 60 !! $'
MENU3 db ' PERTANYAAN KE-3: 5 + 5 x 5 : 5 - 5 =',13,10
db '* Tekan 1 untuk jawaban = 5',13,10
db '* Tekan 2 untuk jawaban = 9 ',13,10
db ' Tentukan Pilihan Anda [1 / 2] :$'
jmp tanya4
jwb3 db 13,10,'SALAH, IQ ANDA 80 !! $'
MENU4 db ' PERTANYAAN KE-4: 7 + 7 - 7 x 7 : 7 =',13,10
db '* Tekan 1 untuk jawaban = 16',13,10
db '* Tekan 2 untuk jawaban = 14',13,10
db ' Tentukan Pilihan Anda [1 / 2] :$'
jwb4 db 13,10,'BENAR, IQ ANDA 100 !!'
db 13,10,'Nama: Deny Rudiansah '
db 13,10,'NPM : 09.14.1.0130 $'
tanya1 : mov ax,03h
int 10h
mov ah,09h
lea dx,menu1
int 21h
mov ah,01h
int 21h
cmp al,"1"
je pilA
cmp al,"2"
je pilB
pilA : mov ah,09h
lea dx,JWB1
int 21h
jmp selesai
pilB : mov ah,09h
lea dx,JWB1
int 21h
jmp tanya2
tanya2 : mov ax,03h
int 10h
mov ah,09h
lea dx,MENU2
int 21h
mov ah,01h
int 21h
cmp al,"1"
je pileA
cmp al,"2"
je pileB
pileA : mov ah,09h
lea dx,jwb2
int 21h
jmp tanya3
pileB : mov ah,09h
lea dx,jwb1
int 21h
jmp selesai
tanya3 : mov ax,03h
int 10h
mov ah,09h
lea dx,MENU3
int 21h
mov ah,01h
int 21h
cmp al,"1"
je pileSA
cmp al,"2"
je pileSB
pileSA : mov ah,09h
lea dx,jwb3
int 21h
jmp tanya4
pileSB : mov ah,09h
lea dx,jwb2
int 21h
jmp selesai
tanya4 : mov ax,03h
int 10h
mov ah,09h
lea dx,MENU4
int 21h
mov ah,01h
int 21h
cmp al,"1"
je pilexA
cmp al,"2"
je pilexB
pilexA : mov ah,09h
lea dx,JWB3
int 21h
jmp selesai
pilexB : mov ah,09h
lea dx,JWB4
int 21h
jmp selesai
selesai : int 20h
end start
sebenernya ini teh tugas kuliah, tapi ane share deh...
.model small
.code
org 100h
start : jmp tanya1
menu1 db '* TEST IQ ANDA !! *',13,10
db '*PERTANYAAN KE-1: 1 x 1 + 1 : 1 - 1 = ',13,10
db '* Tekan 1 untuk jawaban = 4',13,10
db '* Tekan 2 untuk jawaban = 1',13,10
db '* Tentukan Pilihan Anda [1 / 2] : $'
jmp tanya2
JWB1 db 13,10,'SALAH, IQ ANDA 40 !! $'
MENU2 db ' PERTANYAAN KE-2: 2 + 2 : 2 x 2 = ',13,10
db '* Tekan 1 untuk jawaban = 4',13,10
db '* Tekan 2 untuk jawaban = 6 ',13,10
db '* Tentukan Pilihan Anda [1 / 2] :$'
jmp tanya3
jwb2 db 13,10,'SALAH, IQ ANDA 60 !! $'
MENU3 db ' PERTANYAAN KE-3: 5 + 5 x 5 : 5 - 5 =',13,10
db '* Tekan 1 untuk jawaban = 5',13,10
db '* Tekan 2 untuk jawaban = 9 ',13,10
db ' Tentukan Pilihan Anda [1 / 2] :$'
jmp tanya4
jwb3 db 13,10,'SALAH, IQ ANDA 80 !! $'
MENU4 db ' PERTANYAAN KE-4: 7 + 7 - 7 x 7 : 7 =',13,10
db '* Tekan 1 untuk jawaban = 16',13,10
db '* Tekan 2 untuk jawaban = 14',13,10
db ' Tentukan Pilihan Anda [1 / 2] :$'
jwb4 db 13,10,'BENAR, IQ ANDA 100 !!'
db 13,10,'Nama: Deny Rudiansah '
db 13,10,'NPM : 09.14.1.0130 $'
tanya1 : mov ax,03h
int 10h
mov ah,09h
lea dx,menu1
int 21h
mov ah,01h
int 21h
cmp al,"1"
je pilA
cmp al,"2"
je pilB
pilA : mov ah,09h
lea dx,JWB1
int 21h
jmp selesai
pilB : mov ah,09h
lea dx,JWB1
int 21h
jmp tanya2
tanya2 : mov ax,03h
int 10h
mov ah,09h
lea dx,MENU2
int 21h
mov ah,01h
int 21h
cmp al,"1"
je pileA
cmp al,"2"
je pileB
pileA : mov ah,09h
lea dx,jwb2
int 21h
jmp tanya3
pileB : mov ah,09h
lea dx,jwb1
int 21h
jmp selesai
tanya3 : mov ax,03h
int 10h
mov ah,09h
lea dx,MENU3
int 21h
mov ah,01h
int 21h
cmp al,"1"
je pileSA
cmp al,"2"
je pileSB
pileSA : mov ah,09h
lea dx,jwb3
int 21h
jmp tanya4
pileSB : mov ah,09h
lea dx,jwb2
int 21h
jmp selesai
tanya4 : mov ax,03h
int 10h
mov ah,09h
lea dx,MENU4
int 21h
mov ah,01h
int 21h
cmp al,"1"
je pilexA
cmp al,"2"
je pilexB
pilexA : mov ah,09h
lea dx,JWB3
int 21h
jmp selesai
pilexB : mov ah,09h
lea dx,JWB4
int 21h
jmp selesai
selesai : int 20h
end start
Post a Comment