1

title input ouput

.model small
.stack 64
.data

	inputqueue db 'Input a single digit integer: $'
	output db 'The integer is: $'
	hello db 'hello$'
	wa	db	'zero$'
	uno	db	'one$'
	dos	db	'two$'
	tres	db	'three$'
	quatro	db	'four$'
	singko	db	'five$'
	says	db	'six$'
	site	db	'seven$'
	otso	db	'eight$'
	noybe	db	'nine$'
	wabalu	db	'Wa ko balu sa imo input!$'
.code
main proc far

	mov ax, @data
	mov ds, ax

	;clear screen
	mov ax, 0600h
	mov bh, 0fh
	mov cx, 0000h
	mov dx, 184fh
	int 10h

	; first border gray
	mov ax, 0600h
	mov bh, 70h
	mov cx, 040bh
	mov dx, 083fh
	int 10h

	; box red
	mov ax, 0600h
	mov bh, 40h
	mov cx, 050ch
	mov dx, 073eh
	int 10h

	; set color
	mov bh, 4eh
	int 10h

	;set cursor position
	mov ah, 2
	mov dh, 6
	mov dl, 13
	mov bh, 0
	int 10h

	; print queue
	mov ah, 9
	lea dx, inputqueue
	int 21h


	; second border gray
	mov ax, 0600h
	mov bh, 70h
	mov cx, 0c0bh
	mov dx, 103fh
	int 10h

	;box blue
	mov ax, 0600h
	mov bh, 10h
	mov cx, 0d0ch
	mov dx, 0f3eh
	int 10h

	; set color
	mov bh, 1eh
	int 10h

	;set cursor position
	mov ah, 2
	mov dh, 14
	mov dl, 13
	mov bh, 0
	int 10h

	; print queue
	mov ah, 9
	lea dx, output
	int 21h

	;set cursor to input box
	mov ah, 2
	mov dh, 6
	mov dl, 43
	mov bh, 0
	int 10h

	;input
	mov ah, 1
	int 21h

	;set to output box
	mov ah, 2
	mov dh, 14
	mov dl, 29
	mov bh, 0
	int 10h

	;switch
	cmp al, '0'
	je zero
	cmp al, '1'
	je one
	cmp al, '2'
	je two
	cmp al, '3'
	je three
	cmp al, '4'
	je four
	cmp al, '5'
	je five
	cmp al, '6'
	je six
	cmp al, '7'
	je seven
	cmp al, '8'
	je eight
	cmp al, '9'
	je nine

	;print not found
	mov ah, 9
	lea dx, wabalu
	int 21h
	jmp endprog
zero:
	mov ah, 9
	lea dx, wa
	int 21h
	jmp endprog
one:
	mov ah, 9
	lea dx, uno
	int 21h
	jmp endprog
two:
	mov ah, 9
	lea dx, dos
	int 21h
	jmp endprog
three:
	mov ah, 9
	lea dx, tres
	int 21h
	jmp endprog
four:
	mov ah, 9
	lea dx, quatro
	int 21h
	jmp endprog
five:
	mov ah, 9
	lea dx, singko
	int 21h
	jmp endprog
six:
	mov ah, 9
	lea dx, says
	int 21h
	jmp endprog
seven:
	mov ah, 9
	lea dx, site
	int 21h
	jmp endprog
eight:
	mov ah, 9
	lea dx, otso
	int 21h
	jmp endprog
nine:
	mov ah, 9
	lea dx, noybe
	int 21h
endprog:
	; end of program
	mov ax, 4c00h
	int 21h

main endp
end main