Save 3 bytes

3 files changed, 4 insertions, 5 deletions

diff --git a/conio/cputc.s b/conio/cputc.s
index 60fa7cc..748eb00 100644
--- a/conio/cputc.s
+++ b/conio/cputc.s
@@ -13,7 +13,7 @@
 ;
 
         ;.export         _cputcxy, _cputc
-        .export         _cputc
+        .export         _cputc, _crlf
         .export         plot, cputdirect, putchar
         .import         popa, _gotoxy
         .importzp       tmp4,ptr4
@@ -64,6 +64,7 @@ cputdirect:                     ; accepts screen code
         sta     COLCRS
 
         .export newline
+_crlf:
 newline:
         lda     #0
         sta     COLCRS
diff --git a/console.s b/console.s
index 809d0c2..009fc7f 100644
--- a/console.s
+++ b/console.s
@@ -2,7 +2,7 @@
 
  .include "atari.inc"
  .include "conio/mul40.s"
- .export _clrtobot, _clrtoeol, _clr_screen, _clrtoline, _cspaces, _cblank, _cblankto, _backspace, _cprint_pipe, _cprint_bang, _cspace, _cputc_s, _comma_space, _cprint_colon_space, _cprint_question_space, _cprint_period, _cprint_taipan_prompt, _crlf, _plus_or_space, _gotox0y, _cputc0, _set_orders
+ .export _clrtobot, _clrtoeol, _clr_screen, _clrtoline, _cspaces, _cblank, _cblankto, _backspace, _cprint_pipe, _cprint_bang, _cspace, _cputc_s, _comma_space, _cprint_colon_space, _cprint_question_space, _cprint_period, _cprint_taipan_prompt, _plus_or_space, _gotox0y, _cputc0, _set_orders
  .export _rvs_on, _rvs_off
 
  .importzp tmp3       ; ditto
@@ -217,9 +217,6 @@ _cprint_period:
  .byte $2c
 _cprint_bang:
  lda #'!'
- .byte $2c
-_crlf:
- lda #$9b
  jmp _cputc
 
 ; extern void plus_or_space(unsigned char b);
diff --git a/taipan.c b/taipan.c
index 5cff0f9..ee525dd 100644
--- a/taipan.c
+++ b/taipan.c
@@ -1703,6 +1703,7 @@ void port_stats(void) {
 		comma_space();
 		// cputs(location[1]);
 		print_msg(M_hong_kong);
+		clrtoeol();
 	}
 
 	/* dynamic stuff: */