;;; -*-asm-*-
;;; (c) 2021 Mark Wooding

;;;----- Licensing notice ---------------------------------------------------
;;;
;;; This file is part of ZX Fizzbuzz.
;;;
;;; ZX Fizzbuzz is free software: you can redistribute it and/or modify it
;;; under the terms of the GNU Lesser General Public License as published
;;; by the Free Software Foundation; either version 3 of the License, or
;;; (at your option) any later version.
;;;
;;; ZX Fizzbuzz is distributed in the hope that it will be useful, but
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
;;; Lesser General Public License for more details.
;;;
;;; You should have received a copy of the GNU Lesser General Public
;;; License along with ZX Fizzbuzz.  If not, see
;;; <https://www.gnu.org/licenses/>.

	org	0x7000

spc:	equ	' '

tvflag:	equ	0x5c3c

fixdig:	macro
	or	0x30
	endm

print_a: macro
	rst	0x10
	endm

endstrp: macro
	and	a
	endm

	jr	setup

fizz:	db	"fizz", 0
buzz:	db	"buzz", 0

setup:
	;; Use the main screen.
	xor	a
	ld	(tvflag), a