Apple-2gs-SW/itty-bitty-vtty
1
0
Fork 0
mirror of https://github.com/ksherlock/itty-bitty-vtty.git synced 2024-06-01 12:41:30 +00:00
Code Issues Projects Releases Wiki Activity

fix CDA paging

Browse Source
This commit is contained in:
Kelvin Sherlock 2022-01-15 16:15:05 -05:00
parent 1cc501e72a
commit ea6ee76a9d
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
vt100.cda.S
View File

@ -51,6 +51,7 @@ Header
page ds 2 page ds 2
MAX_PAGE equ 8
pages dw variables pages dw variables
dw hexdump_r dw hexdump_r
dw hexdump_w dw hexdump_w
@ -112,14 +113,14 @@ main
dec dec
dec dec
bpl :lok bpl :lok
lda #$05 lda #MAX_PAGE-2
:lok sta page :lok sta page
bra main bra main
:right lda page :right lda page
inc inc
inc inc
cmp #$05+1 cmp #MAX_PAGE
bcc :rok bcc :rok
lda #0 lda #0
:rok sta page :rok sta page