diff options
| author | B. Watson <yalhcru@gmail.com> | 2021-03-30 04:36:07 -0400 |
|---|---|---|
| committer | B. Watson <yalhcru@gmail.com> | 2021-03-30 04:36:07 -0400 |
| commit | 05374f05f17e28fd3e1f37e573ecacafe37f497f (patch) | |
| tree | 16d2214c08097cf77242b463bb757ac671bcfc4f | |
| parent | 7c439dc0c032792749beefe5590632cab8377c43 (diff) | |
| download | taipan-05374f05f17e28fd3e1f37e573ecacafe37f497f.tar.gz | |
Save 14 bytes
| -rw-r--r-- | draw_lorcha.s | 14 |
1 files 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. |