Compucolor.org – Virtual Media

Listing of file='BASTOK.MAC;01' on disk='vmedia/asm_utility_routines-sideB-sector.ccvf'

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
;	BASTOK - BASIC TOKENS
;
	TITLE	BASTOK
;
;	KEYWORD TABLE FOR BASIC TOKENS. TOKENS ARE TERMINATED
;	BY A CHARACTER WITH THE MSB SET. THEY ARE IN NUMERIC
;	ORDER CORRESPONDING TO THEIR VALUES IN THE "COMPRESSED"
;	BASIC SOURCE.
;
	PUBLIC	BASTOK

BASTOK:	DB	255
	DB	'EN','D'  +80H
	DB	'FO','R'  +80H
	DB	'NEX','T' +80H
	DB	'DAT','A' +80H
	DB	'INPU','T'+80H
	DB	'DI','M'  +80H
	DB	'REA','D' +80H
	DB	'FIL','E' +80H
	DB	'GOT','O' +80H
	DB	'RU','N'  +80H
	DB	'I','F'   +80H
	DB	'RESTOR','E'+80H
	DB	'GOSU','B'+80H
	DB	'RETUR','N'+80H
	DB	'RE','M'  +80H
	DB	'GE','T'  +80H
	DB	'OU','T'  +80H
	DB	'PU','T'  +80H
	DB	'PLO','T' +80H
	DB	'SAV','E' +80H
	DB	'LOA','D' +80H
	DB	'POK','E' +80H
	DB	'PRIN','T'+80H
	DB	'LIS','T' +80H
	DB	'CON','T' +80H
	DB	'CLEA','R' +80H
	DB	'DE','F'  +80H
	DB	'WAI','T' +80H
	DB	'O','N'   +80H
	DB	'TAB','(' +80H
	DB	'T','O'   +80H
	DB	'F','N'   +80H
	DB	'SPC','(' +80H
	DB	'THE','N' +80H
	DB	'NO','T'  +80H
	DB	'STE','P' +80H
	DB	'+' +80H
	DB	'-' +80H
	DB	'*' +80H
	DB	'/' +80H
	DB	'^' +80H
	DB	'AN','D'  +80H
	DB	'O','R'   +80H
	DB	'>' +80H
	DB	'=' +80H
	DB	'<' +80H
	DB	'SG','N'  +80H
	DB	'IN','T'  +80H
	DB	'AB','S'  +80H
	DB	'CAL','L' +80H
	DB	'FR','E'  +80H
	DB	'IN','P'  +80H
	DB	'PO','S'  +80H
	DB	'SQ','R'  +80H
	DB	'RN','D'  +80H
	DB	'LO','G'  +80H
	DB	'EX','P'  +80H
	DB	'CO','S'  +80H
	DB	'SI','N'  +80H
	DB	'TA','N'  +80H
	DB	'AT','N'  +80H
	DB	'PEE','K' +80H
	DB	'LE','N'  +80H
	DB	'STR','$' +80H
	DB	'VA','L'  +80H
	DB	'AS','C'  +80H
	DB	'CHR','$' +80H
	DB	'LEFT','$'+80H
	DB	'RIGHT','$'+80H
	DB	'MID','$' +80H
	DB	0,0

	END