Gambar 38. Program Aplikasi Int 21 hexa Service 01 hexa
1. Listing Program [kembali]
;PROGRAM INPUT KEYBOARD
START: JMP MULAI
Tanya db 'Jawablah Pertanyaan di Bawah Ini !',13,10
db 'Apakah Anda seseorang mahasiswa ?(Y/T)',13,10
db 'Jawaban Anda :$'
Jawab1 db 13,10,'Anda Adalah seorang mahasiswa ',13,10,'$'
Jawab2 db 13,10,'Anda Adalag seorang mahasiswi ',13,10,'$'
MULAI: MOV AH,09H
START: JMP MULAI
Tanya db 'Jawablah Pertanyaan di Bawah Ini !',13,10
db 'Apakah Anda seseorang mahasiswa ?(Y/T)',13,10
db 'Jawaban Anda :$'
Jawab1 db 13,10,'Anda Adalah seorang mahasiswa ',13,10,'$'
Jawab2 db 13,10,'Anda Adalag seorang mahasiswi ',13,10,'$'
MULAI: MOV AH,09H
MOV DX,OFFSET Tanya
INT 21H
ULANG: MOV AH,01H
ULANG: MOV AH,01H
INT 21H
CMP AL,'Y'
CMP AL,'Y'
JE Mahasiswa
CMP AL,'y'
JE Mahasiswa
CMP AL,'T'
JE Mahasiswa
CMP AL,'t'
JE Mahasiswa
JNE ULANG
Mahasiswi: MOV AH,09H
MOV DX,OFFSET JAWAB2
Mahasiswi: MOV AH,09H
MOV DX,OFFSET JAWAB2
INT 21H
JMP SELESAI
JMP SELESAI
Mahasiswa: MOV AH,09H
MOV DX,OFFSET Jawab1
MOV DX,OFFSET Jawab1
INT 21H
SELESAI: MOV AH,4CH
INT 21H
2. Video [kembali]SELESAI: MOV AH,4CH
INT 21H
3. Hasil Running [kembali]
;PROGRAM INPUT KEYBOARD
START: JMP MULAITanya db 'Jawablah Pertanyaan di Bawah Ini !',13,10
db 'Apakah Anda seseorang mahasiswa ?(Y/T)',13,10
db 'Jawaban Anda :$'
Jawab1 db 13,10,'Anda Adalah seorang mahasiswa ',13,10,'$'
Jawab2 db 13,10,'Anda Adalag seorang mahasiswi ',13,10,'$'
MULAI: MOV AH,09H ;SERVICE NUMBER = 09h
MOV DX,OFFSET Tanya ;MENCETAK TANYA.
INT 21H
ULANG: MOV AH,01H ;SERVICE NUMBER =01H
INT 21H
CMP AL,'Y' ;APAKAH JAWABAN 'y'
JE Mahasiswa ;JIKA SAMA LOMPAT KE Mahasiswa
CMP AL,'y' ;APAKAH JAWABAN 'y'
JE Mahasiswa ;JIKA SAMA LOMPAT KE Mahasiswa
CMP AL,'T' ;APAKAH JAWABAN 'T'
JE Mahasiswa ;JIKA SAMA LOMPAT KE Mahasiswa
CMP AL,'t' ;APAKAH JAWABAN 't'
JE Mahasiswa ;JIKA SAMA LOMPAT KE Mahasiswa
JNE ULANG
Mahasiswi: MOV AH,09H
MOV DX,OFFSET JAWAB2 ;MENCETAK JAWAB2
INT 21H
JMP SELESAI ;LOMPAT KE SELESAI
Mahasiswa: MOV AH,09H
MOV DX,OFFSET Jawab1 ;MENCETAK JAWAB1
INT 21H
SELESAI: MOV AH,4CH
INT 21H ;AKHIR PROGRAM
5. Link Download [kembali]
1. Kode Program
Download File
2. Video Simulasi
Download File
Tidak ada komentar:
Posting Komentar