Flow Control Instruction 2
Flow Control Instruction 2
***********print star***********
.model small
.stack 100h
.data
.code
main proc
mov ax,@data
mov ds,ax
mov cx,15
l1:
mov bx,cx
l2:
mov dl,'*'
mov ah,2
int 21h
loop l2
mov ah,2
mov dl,0ah
int 21h
mov dl,0dh
int 21h
mov cx,bx
loop l1
ret
exit:
mov ah,4ch
int 21h
main endp
***********************************************************
*************convert hexa************
.model small
.stack 100h
.data
nl equ 0ah,0dh
M1 DB nl,'TYPE A CHARACTER :','$'
M2 DB nl,'THE ASCII CODE OF '
C1 DB ?,' IN HEXA IS ','$'
.code
main proc
mov ax,@data
mov ds,ax
BEGIN:
MOV AH,9 ;prompt user
LEA DX,M1
INT 21h
MOV AH,1 ;read char.
INT 21H
CMP AL,0DH ;if CR exit
JE exit
MOV C1,AL ;store char.
MOV BL,AL ;take a copy of char
MOV CL,4
SHR C1,CL ;prapare for display 1st half
;* note below
ADD C1,30H ;convert to char.
MOV DL,C1
JMP EXE1
INT 21H
exit:
mov ah,4ch
int 21h
main endp