simple conio support for GEOS

git-svn-id: svn://svn.cc65.org/cc65/trunk@1093 b7a2c559-68d2-44c3-8de9-860c34a00d81

libsrc/geos/conio/screensize.s

@@ -0,0 +1,35 @@
+
+;
+; Maciej 'YTM/Elysium' Witkowiak
+;
+; 27.10.2001
+
+; void screensize (unsigned char* x, unsigned char* y);
+;
+
+    	.export	 	_screensize
+
+	.import	 	popax
+	.importzp	ptr1, ptr2
+	
+	.include 	"../inc/geossym.inc"
+
+_screensize:
+
+	sta	ptr1		; Store the y pointer
+	stx	ptr1+1
+
+	jsr	popax		; get the x pointer
+	sta	ptr2
+	stx	ptr2+1
+
+	ldy	#0
+	lda	graphMode
+	bpl	L1
+	lda	#80		; 80 columns (more or less)
+	.byte	$2c
+L1:	lda	#40		; 40 columns (more or less)
+	sta	(ptr2),y
+	lda	#24		; something like that for Y size
+	sta	(ptr1),y
+   	rts