get_nums proc
	push -1
	@@loop:
		mov bx, 10h
		div bx
		push dx
		cmp ax, 0
		jne @@loop
ret
get_nums endp


write_nums proc
	xor cx, cx
	mov cx, 4
	xor dx, dx
	@@loop:
		pop dx
		cmp dx, -1
		je @@end

		cmp dl, 0ah
		jge @@more

		add dl, 30h
		jmp @@write
	@@more:
		add dl, 37h

	@@write:
		mov ah, 02h
		int 21h
	jmp @@loop
@@end:
ret
write_nums endp

finish proc
	mov dx, word ptr[oldVec2f]
	mov ds, word ptr [oldVec2f + 2]

	mov ax, dx
	call get_nums
	call write_nums
	mov ah, 02h
	mov dl, 3ah
	int 21h

	mov ax, ds
	call get_nums
	call write_nums

	lea dx, msg_inst
	int 21h
ret
finish endp