1. list program [kembali]
START: JMP MULAI
Tanya db 'Jawablah Pertanyaan dibawah Ini !',13,10
db 'Apakah anda Seorang Mahasiswa ?(Y/T)',13,10
db 'Jawaban Anda : $'
Jawab1 db 13,10,'Anda Adalah Seorang Mahasiswa ',13,10,'$'
Jawab2 db 13,10,'Anda Adalah Seorang MAhasiswi ',13,10,'$'
MULAI: MOV AH,09H ; SERVICE NUMBER = 09H
MOV DX,OFFSET TANYA ; NENCETAK 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' ; APAAH JAWABAN T
JE Mahasiswi ; JIKA SAMA LOMPAT KE Mahasiswi
CMP AL,'t' ; APAKAH JAWABAN 't'
JNE ULANG ; JIKA TIDAK SAMA LOMPAT 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
2. Video Simulasi [kembali]
3. Hasil Compile and Run program [kembali]
4. Penjelasan Program perbaris [kembali]
START: JMP MULAI (Program dimulai langsung di arahkan ke bagian MULAI)
Tanya db 'Jawablah Pertanyaan dibawah Ini !',13,10 (dibuat sebuah pertanyaan atau pernyataan)
db 'Apakah anda Seorang Mahasiswa ?(Y/T)',13,10 (dibuat sebuah pertanyaan atau pernyataan)
db 'Jawaban Anda : $' (dibuat pertanyaan atau pernyataan)
Jawab1 db 13,10,'Anda Adalah Seorang Mahasiswa ',13,10,'$' (membuat hasil dari inputan kemungkinan pertama)
Jawab2 db 13,10,'Anda Adalah Seorang MAhasiswi ',13,10,'$' (membuat hasil dari inputan kemungkinan kedua)
MULAI: MOV AH,09H ; SERVICE NUMBER = 09H (membuat service number)
MOV DX,OFFSET TANYA ; NENCETAK TANYA. (menapilkan pertanyaan yang sudah disiapkan)
INT 21H (mencetak huruf ke layar)
ULANG: MOV AH,01H ; SERVICE NUMBER = 01H (membuat service number)
INT 21H (mencetak huruf ke layar)
CMP AL,'Y' ; APAKAH JAWABAN 'Y' (memastikan jawaban)
JE Mahasiswa ; JIKA SAMA LOMPAT KE Mahasiswa (jika sama dengan Y maka ke mahasiswa)
CMP AL,'y' ; APAKAH JAWABAN 'y' (memastikan jawaban)
JE Mahasiswa ; JIKA SAMA LOMPAT KE Mahasiswa (jika sama dengan y maka ke mahasiswa)
CMP AL,'T' ; APAAH JAWABAN T (memastikan jawaban)
JE Mahasiswi ; JIKA SAMA LOMPAT KE Mahasiswi (jika sama maka ke mahasiswi)
CMP AL,'t' ; APAKAH JAWABAN 't' (memastikan jawaban)
JNE ULANG ; JIKA TIDAK SAMA LOMPAT ULANG (jika tidak maka kembali ke ulang)
Mahasiswi: MOV AH,09H (dipindahkan ke register AH dari 09H)
MOV DX,OFFSET JAWAB2 ; MENCETAK JAWAB2 (memindahkan jawab2 ke register DX)
INT 21H (mencetak huruf ke layar)
JMP SELESAI ; LOMPAT KE SELESAI (setelah ditampilkan jawab2 maka tampilkan selesai)
Mahasiswa: MOV AH,09H (memindahkan dari 09H ke register AH)
MOV DX,OFFSET JAWAB1 ; MENCETAK JAWAB1 (jawab1 ditampilkan)
INT 21H (menampilkan tulisan di layar)
SELESAI: MOV AH,4CH (dipindahkan dari 4ch ke AH)
INT 21H ; AKHIR PROGRAM (program selesai)
No comments:
Post a Comment