;Mem Check .5 by Chicane
;This is a useless Program unless you are very lazy, and dont want to push
;2nd>Mem>F1 to find the free memory
#include "ti86asm.inc"
_dispahl                equ     $4a33
_pause					equ		$4D40
.org _asm_exec_ram
	call	_clrScrn		;clear screen
	call	_homeup			;Reset _curRow
	call	_MEMCHK			;Puts free mom in ahl
	call	_dispahl		;display the #
	ld		hl,ByteString	;Add "bytes free"
	call	_puts			;output to LCD
	call	_pause			;wait for enter
	ret						;return to ti-os

ByteString:
	.db "bytes free",0
.end