cc65/libsrc/cbm/where.s

;
; Ullrich von Bassewitz, 06.08.1998
;
; unsigned char wherex (void);
; unsigned char wherey (void);


	.export		_wherex, _wherey
        .import         PLOT


_wherex:
	sec
	jsr	PLOT		; Get cursor position
	tya
	rts

_wherey:
	sec
	jsr	PLOT		; Get cursor position
	txa
	rts
This commit was generated by cvs2svn to compensate for changes in r2, which included commits to RCS files with non-trunk default branches. git-svn-id: svn://svn.cc65.org/cc65/trunk@3 b7a2c559-68d2-44c3-8de9-860c34a00d81 2000-05-28 13:40:48 +00:00			`;`
			`; Ullrich von Bassewitz, 06.08.1998`
			`;`
			`; unsigned char wherex (void);`
			`; unsigned char wherey (void);`

Use external symbols for the CBM kernal jump table functions. This allows to emulate these functions on platforms where one or more of these functions are not available (PET, CBM-II). git-svn-id: svn://svn.cc65.org/cc65/trunk@1544 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-11-19 23:02:47 +00:00
This commit was generated by cvs2svn to compensate for changes in r2, which included commits to RCS files with non-trunk default branches. git-svn-id: svn://svn.cc65.org/cc65/trunk@3 b7a2c559-68d2-44c3-8de9-860c34a00d81 2000-05-28 13:40:48 +00:00			`.export _wherex, _wherey`
Use external symbols for the CBM kernal jump table functions. This allows to emulate these functions on platforms where one or more of these functions are not available (PET, CBM-II). git-svn-id: svn://svn.cc65.org/cc65/trunk@1544 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-11-19 23:02:47 +00:00			`.import PLOT`

This commit was generated by cvs2svn to compensate for changes in r2, which included commits to RCS files with non-trunk default branches. git-svn-id: svn://svn.cc65.org/cc65/trunk@3 b7a2c559-68d2-44c3-8de9-860c34a00d81 2000-05-28 13:40:48 +00:00
			`_wherex:`
			`sec`
			`jsr PLOT ; Get cursor position`
			`tya`
			`rts`

			`_wherey:`
			`sec`
			`jsr PLOT ; Get cursor position`
			`txa`
			`rts`