mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-12-29 00:31:52 +00:00
b1238af49d
this will probably upset people
51 lines
544 B
ArmAsm
51 lines
544 B
ArmAsm
|
|
.include "zp.inc"
|
|
.include "hardware.inc"
|
|
|
|
lda #0
|
|
sta DRAW_PAGE
|
|
|
|
bit SET_GR
|
|
bit PAGE0
|
|
|
|
bit KEYRESET
|
|
pause_loop:
|
|
lda KEYPRESS
|
|
bpl pause_loop
|
|
|
|
lda #<graphic_start
|
|
sta LZ4_SRC
|
|
lda #>graphic_start
|
|
sta LZ4_SRC+1
|
|
|
|
lda #<graphic_end
|
|
sta LZ4_END
|
|
lda #>graphic_end
|
|
sta LZ4_END+1
|
|
|
|
lda #$0
|
|
sta LZ4_DST
|
|
lda #$c
|
|
sta LZ4_DST+1
|
|
|
|
before:
|
|
|
|
jsr lz4_decode
|
|
after:
|
|
|
|
jsr gr_copy_to_current
|
|
|
|
|
|
blah:
|
|
jmp blah
|
|
|
|
|
|
.include "lz4_decode.s"
|
|
.include "gr_copy.s"
|
|
.include "gr_offsets.s"
|
|
|
|
graphic_start:
|
|
|
|
.incbin "spaceship_far_n.lz4"
|
|
graphic_end:
|