;; Test of something.


	INCLUDE	USEFUL.INC
	INCLUDE	PCMAC.INC 

        .MODEL  SMALL

        .STACK  100h

        .DATA

        .CODE
Main    PROC
	EXTRN	PutBin : NEAR, PutHex : NEAR
        mov     ax, @data
        mov     ds, ax

	int	11h
	call	PutHex
	_PutCh	32,'-',32
	int	11h
	call	PutBin
	_PutCh	13, 10

        mov     al, 0   ; Return code of 0
        mov     ah, 4ch ;       Exit back to MS/PCDOS
        int     21h
Main    ENDP


        END     Main