ex3_8.asm

data segment
	char	db		'i'
data ends

stack1	segment para stack
			dw	10h		dup(0)
stack1 ends

codeseg	segment
start:
	assume cs:codeseg, ds:data, ss:stack1
	mov		ax,		data
	mov		ds,		ax
	mov		cx,		8
	mov		bl,		char
lower:
	shl		bl,		1
	mov		dl,		'0'
	jnc str1
	inc		dl
str1:
	mov		ah,		02h
	int 21h
	loop lower
	mov		ah,		4ch
	int 21h

codeseg ends
	end start