From 05374f05f17e28fd3e1f37e573ecacafe37f497f Mon Sep 17 00:00:00 2001
From: "B. Watson" <yalhcru@gmail.com>
Date: Tue, 30 Mar 2021 04:36:07 -0400
Subject: Save 14 bytes

---
 draw_lorcha.s | 14 ++++----------
 1 file changed, 4 insertions(+), 10 deletions(-)

diff --git a/draw_lorcha.s b/draw_lorcha.s
index 3cd56ec..c3a5c38 100644
--- a/draw_lorcha.s
+++ b/draw_lorcha.s
@@ -3,6 +3,7 @@
 ; Lorcha (boat), a type of sailing vessel having a Chinese
 ; junk rig on a Portuguese or European style hull.
 
+ .import _jsleep
  .export _draw_lorcha, _sink_lorcha, _damage_lorcha, _clear_lorcha, _flash_lorcha
 
 ; TODO: maybe replace position tables with mul40? see
@@ -123,19 +124,12 @@ sinkloop:
  adc #0
  sta destptr+1
 
- ldx #6 ; line loop counter
  ; delay for several jiffies
- sei
- lda #0
- sta 541
+ ldx #0
  lda #7
- sta 540
- cli
-sdelay:
- lda 541
- ora 540
- bne sdelay
+ jsr _jsleep
 
+ ldx #6 ; line loop counter
 
  ; at start of loop, destptr points to last line, and temp
  ; is unitialized.
-- 
cgit v1.2.3