From f29db6ace0e1015dcbe5d49da30d6f37f2fe6f4a Mon Sep 17 00:00:00 2001 From: izydorst Date: Fri, 20 Dec 2002 22:55:17 +0000 Subject: [PATCH] added missing cputhex8 and cputhex16 functions git-svn-id: svn://svn.cc65.org/cc65/trunk@1804 b7a2c559-68d2-44c3-8de9-860c34a00d81 --- libsrc/geos/conio/Makefile | 2 +- libsrc/geos/conio/cputhex.s | 39 +++++++++++++++++++++++++++++++++++++ 2 files changed, 40 insertions(+), 1 deletion(-) create mode 100644 libsrc/geos/conio/cputhex.s diff --git a/libsrc/geos/conio/Makefile b/libsrc/geos/conio/Makefile index 9dc6ff387..9d0f3b896 100644 --- a/libsrc/geos/conio/Makefile +++ b/libsrc/geos/conio/Makefile @@ -8,7 +8,7 @@ S_OBJS = cclear.o chline.o cvline.o cgetc.o clrscr.o color.o\ - cputc.o cpputs.o cputs.o cursor.o gotoxy.o kbhit.o revers.o\ + cputc.o cputhex.o cpputs.o cputs.o cursor.o gotoxy.o kbhit.o revers.o\ screensize.o where.o _scrsize.o all: $(S_OBJS) diff --git a/libsrc/geos/conio/cputhex.s b/libsrc/geos/conio/cputhex.s new file mode 100644 index 000000000..1aaeed6b2 --- /dev/null +++ b/libsrc/geos/conio/cputhex.s @@ -0,0 +1,39 @@ +; +; Ullrich von Bassewitz, 08.08.1998 +; +; void cputhex8 (unsigned char val); +; void cputhex16 (unsigned val); +; + + .export _cputhex8, _cputhex16 + .import _cputc + .import __hextab + + +_cputhex16: + pha ; Save low byte + txa ; Get high byte into A + jsr _cputhex8 ; Output high byte + pla ; Restore low byte and run into _cputhex8 + +_cputhex8: + pha ; Save the value + lsr a + lsr a + lsr a + lsr a + tay + lda __hextab,y + jsr _cputc + pla + and #$0F + tay + lda __hextab,y + jmp _cputc + + + + + + + -- 2.39.5