UAS ASSEMBLER LANGUAGE

  Assalamu'alaikumwr .wb

Nama : salman Alfaridzi 

NIM : 3420210017

Prodi : Teknik Informatika 

                                                                                    jawaban

; You may customize this and other start-up templates; 

; The location of this template is c:\emu8086\inc\0_com_template.txt

org 100h

                           

;Nama  : SALMAN ALFARIDZI

;NIM   : 3420210017

;Prodi : Teknik Informatika

                           

; add your code here

; Buat sebuah program untuk: 

;<A> Mencetak "?"

;<B> Membaca 1 buah angla dari 1-9

;<C> Buat buah tampilan sebagai berikut

; Contoh Hasil

;?5

;1111 

;1111

;1111

;1111

;1111

JMP START

; Inisialisasi variable

K1 DB '1111$'

;Pemberian nilai awal pada variable BUF1, BUF2, BUF3

BUF1 DB 0

BUF2 DB 0

BUF3 DB 0            

;Inisialisasi fungsi enter

SPASI DB 10,13,'$'    

START:

;Isi register DL dengan karakter "?"

MOV DL, "?"

;Aktifkan fungsi output karakter

MOV AH,2

;Interupsi DOS

INT 21H

;Aktifkan fungsi input karakter

MOV AH,1

;Interupsi DOS

INT 21H

;Pindahkan isi register AL ke variable BUF1

MOV BUF1,AL

;Pindahkan nilai offset SPASI ke register DX 

LEA DX, SPASI

;Aktifkan fungsi output string

MOV AH,9

;Interupsi DOS

INT 21H 

;Inisialisasi jumlah perulangan sebanyak 5 kali

MOV CX,5

ULANG:  

;Pindahkan nilai offset Ki ke register DX

LEA DX,K1

;Aktifkan fungsi output string

MOV AH,9

;Interupsi DOS

INT 21H

;Aktifkan fungsi output string

MOV AH,9

;Pindahkan nilai offset SPASI ke register DX

LEA DX, SPASI

;Interupsi DOS

INT 21H     

;Isi register DL dengan nilai 07h (bunyi "beep">

MOV DL,7

;Aktifkan fungsi output karakter

MOV AH,2

;Interupsi DOS

INT 21H     

LOOP ULANG        

ret