	using "system"
	org $code
	

	mov eax, 0

	

loop1:

	cmp al, 0
	je loop1
loop2:
	call printch
	cmp al, 0
	je done
	jmp loop2



printch:
 	mov ecx, [cursor]
       	mov [ecx],al
	inc ecx
	mov byte [ecx],7
	inc ecx
	mov [cursor], ecx
	ret
	out dx,al
	inc ebx
	jmp loop1

done:
	mov eax, 0
	ret

com1: dd 0x03F8
string : db "teststring", 0

cursor: dd 0xB87a8









