Metropoli BBS
VIEWER: where.asm MODE: TEXT (ASCII)
include qlib.inc

.code
wherex proc
  pushad
  mov ah,3
  xor bh,bh
  int 10h
  ;dl = coloum #
  inc dl
  xor eax,eax
  mov al,dl
  mov [esp].callstruct._eax,eax
  popad
  ret
wherex endp

wherey proc
  pushad
  mov ah,3
  xor bh,bh
  int 10h
  ;dh = row #
  inc dh
  xor eax,eax
  mov al,dl
  mov [esp].callstruct._eax,eax
  popad
  ret
wherey endp

end

[ RETURN TO DIRECTORY ]