From a025fb40fdf3563de0d044fbf0e2598ec5f5b97b Mon Sep 17 00:00:00 2001
From: "B. Watson" <yalhcru@gmail.com>
Date: Fri, 21 May 2021 04:21:00 -0400
Subject: Remove conio/revers.s (move to console.s)

---
 conio/Makefile |  4 ++--
 conio/revers.s | 33 ---------------------------------
 console.s      |  6 ++++--
 3 files changed, 6 insertions(+), 37 deletions(-)
 delete mode 100644 conio/revers.s

diff --git a/conio/Makefile b/conio/Makefile
index b3cd9a3..7e42b7c 100644
--- a/conio/Makefile
+++ b/conio/Makefile
@@ -1,9 +1,9 @@
 all: conio.lib
 
-OBJS=cgetc.o chline.o cputc.o cputs.o cvline.o revers.o
+OBJS=cgetc.o chline.o cputc.o cputs.o cvline.o
 
 # unused, disabled:
-# clrscr.o gotox.o gotoxy.o gotoy.o wherex.o wherey.o
+# clrscr.o gotox.o gotoxy.o gotoy.o wherex.o wherey.o revers.o
 
 conio.lib: $(OBJS)
 	ar65 a conio.lib *.o
diff --git a/conio/revers.s b/conio/revers.s
deleted file mode 100644
index a04a969..0000000
--- a/conio/revers.s
+++ /dev/null
@@ -1,33 +0,0 @@
-;
-; Ullrich von Bassewitz, 07.08.1998
-
-; modified version for taipan, which doesn't actually
-; call revers() any more. only _revflag is needed, see
-; rvs_on() and rvs_off() in console.s.
-
-;
-; unsigned char revers (unsigned char onoff);
-;
-        .include "atari.inc"
-        
-;        .export         _revers
-        .export         _revflag
-
-;_revers:
-;        ldx     #$00            ; Assume revers off
-;        tay                     ; Test onoff
-;        beq     L1              ; Jump if off
-;        ldx     #$80            ; Load on value
-;L1:     ldy     #$00            ; Assume old value is zero
-;        lda     _revflag        ; Load old value
-;        stx     _revflag        ; Set new value
-;        beq     L2              ; Jump if old value zero
-;        iny                     ; Make old value = 1
-;L2:     ldx     #$00            ; Load high byte of result
-;        tya                     ; Load low byte, set CC
-;        rts
-
-        .bss
-
-_revflag:
-        .res    1
diff --git a/console.s b/console.s
index 50fe3ed..a1fa4d1 100644
--- a/console.s
+++ b/console.s
@@ -13,9 +13,9 @@
  .export _rvs_on, _rvs_off
  .export _prepare_report, _clear_msg_window
  .export _print_status_desc, _print_month
+ .export _revflag
 
- .importzp tmp3       ; ditto
- .import _revflag     ; conio/revers.s
+ .importzp tmp3
  .import bump_destptr ; these two are
  .importzp destptr    ; from draw_lorcha.s
  .importzp sreg
@@ -417,3 +417,5 @@ months:
  .byte $ce, $ef, $f6, $00
  .byte $c4, $e5, $e3, $00
 
+ .bss
+_revflag: .res 1
-- 
cgit v1.2.3