diff --git a/libsrc/c16/kbhit.s b/libsrc/c16/kbhit.s index bb88beea8..e09678650 100644 --- a/libsrc/c16/kbhit.s +++ b/libsrc/c16/kbhit.s @@ -1,26 +1 @@ -; -; Ullrich von Bassewitz, 06.08.1998 -; -; unsigned char kbhit (void); -; - - .export _kbhit - - .include "plus4.inc" - - -.proc _kbhit - - ldx #0 ; High byte of return is always zero - lda KEY_COUNT ; Get number of characters - ora FKEY_COUNT ; Or with number of chars from function keys - beq L9 - lda #1 -L9: rts - -.endproc - - - - - +.include "../plus4/kbhit.s" diff --git a/libsrc/c16/randomize.s b/libsrc/c16/randomize.s index 0d1ccaf03..9c24bf974 100644 --- a/libsrc/c16/randomize.s +++ b/libsrc/c16/randomize.s @@ -1,18 +1 @@ -; -; 2002-11-05, Ullrich von Bassewitz -; 2015-09-11, Greg King -; -; void __randomize (void); -; /* Initialize the random number generator */ -; - - .export ___randomize - .import _srand - - .include "plus4.inc" - -___randomize: - ldx TED_VLINELO ; Use TED rasterline as high byte - lda TIME+2 ; Use 60HZ clock as low byte - jmp _srand ; Initialize generator - +.include "../plus4/randomize.s"