; This little program will print the x-coordinate of the
;  mouse in hex.  In text mode, the x-coordinate is from 0 to 79
;  which prints as 00h to 4Fh. 
title test
.model small
.stack 100h
.data
x       db 1
eight   db 8
.code
if1
include ../mac/basic.mac
endif
;
main proc
initdata	; macro
;
mov ax, 3
int 33h         ; mouse pos interrupt
mov ax,cx
mov dl,8
div eight       ; need to divide by 8 to get character 
                ; column number!
outhex al     ; macro to print al in hex
exitdos 
main endp
end main
