;;  UPIT.ASM--defines a PUBLIC array UpCase such that for any character,
;;    UpCase[the character] = the character unless it's lower case, in
;;    which case it's the corresponding upper case character.
;;
;;  Usage:
;;	.DATA	; (to get segment right)
;;	EXTRN	UpIt : BYTE
;;
;;	...
;;	mov	al, the character
;;	mov	bx, OFFSET UpIt
;;	xlat	;	leaves translated character in al
;;
;;  Library source text from "Assembly Language for the IBM PC Family" by
;;   William B. Jones, (c) Copyright 1992, 1997, Scott/Jones Inc.
;;
	.MODEL	SMALL
	.DATA
	PUBLIC	UpIt
	count = 0
UpIt	LABEL	BYTE
	REPT	256
IF (count GE 'a') AND (count LE 'z')
	DB	count - 32
ELSE
	DB	count
ENDIF
count=count+1
	ENDM
	END