; int86(), int386() ,int86x() tests

include qlib.inc
include conio.inc
include video.inc
include stdio.inc
include dos.inc

.data
  reg REGS <>
  vid dd 0a0000h
.code
main proc
  mov reg.d._eax,13h
  callp int386,10h,offset reg,offset reg  ;calls PMODE int

;just print some garbage till key is slammed
top:
  mov ebx,46ch
  mov eax,[ebx]

  mov edi,vid
  mov ecx,320*200
@@:
  stosb
  add eax,edi
  dec ecx
  jnz @b

@@:
  call getch
  cmp al,0
  jz top

  mov reg.d._eax,3
  callp int86,10h,offset reg,offset reg   ;calls RMODE int
  ret
main endp

end