;
; Ullrich von Bassewitz, 26.10.2000
;
; Screen size variables
;

	.export		xsize, ysize
        .import         SCREEN
	.constructor	initscrsize


.code

initscrsize:
   	jsr	SCREEN
	inx
   	stx	xsize
	iny
   	sty	ysize
	rts

.bss

xsize: 	.res	1
ysize:	.res	1