mirror of
https://github.com/Pecusx/scorch_src.git
synced 2026-05-21 06:39:40 +02:00
manu WIP...
This commit is contained in:
+19
-1
@@ -13,6 +13,7 @@ screen = $1000 ; start - 40*screen_height
|
|||||||
.zpvar next_line_begin .byte
|
.zpvar next_line_begin .byte
|
||||||
.zpvar end_address .word
|
.zpvar end_address .word
|
||||||
.zpvar start_address .word
|
.zpvar start_address .word
|
||||||
|
.zpvar temp .word
|
||||||
|
|
||||||
start
|
start
|
||||||
mwa #dl dlptrs
|
mwa #dl dlptrs
|
||||||
@@ -88,7 +89,23 @@ scroll_down
|
|||||||
jmp main_loop
|
jmp main_loop
|
||||||
|
|
||||||
scroll_up
|
scroll_up
|
||||||
sbw top_src #screen_width
|
; find second $ff before top_src
|
||||||
|
sbw top_src #$00ff temp
|
||||||
|
ldy #$ff-1
|
||||||
|
@ dey
|
||||||
|
lda (temp),y
|
||||||
|
cmp #$ff
|
||||||
|
bne @-
|
||||||
|
iny
|
||||||
|
tya
|
||||||
|
clc
|
||||||
|
adc temp
|
||||||
|
sta top_src
|
||||||
|
lda temp+1
|
||||||
|
adc #0
|
||||||
|
sta top_src+1
|
||||||
|
|
||||||
|
;sbw top_src #screen_width
|
||||||
cpw top_src #man_text_en
|
cpw top_src #man_text_en
|
||||||
scs:mwa #man_text_en top_src
|
scs:mwa #man_text_en top_src
|
||||||
jmp main_loop
|
jmp main_loop
|
||||||
@@ -194,6 +211,7 @@ escflag .byte 0
|
|||||||
paddlestate .byte 0
|
paddlestate .byte 0
|
||||||
man_text_en
|
man_text_en
|
||||||
ins 'manual.bin' ;icl 'man_cart_txt_EN.asm'
|
ins 'manual.bin' ;icl 'man_cart_txt_EN.asm'
|
||||||
|
.by $ff, $ff
|
||||||
man_text_en_end
|
man_text_en_end
|
||||||
|
|
||||||
.align $400
|
.align $400
|
||||||
|
|||||||
Binary file not shown.
Binary file not shown.
Reference in New Issue
Block a user