folkert/KEK
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

comments

Browse source
This commit is contained in:
folkert van heusden 2024-04-23 21:48:45 +02:00
parent 846de6cac7
commit 4039c8f274
Signed by untrusted user who does not match committer: folkert
GPG key ID: 6B6455EDFEED3BD1
1 changed files with 4 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
tests/rl02test.mac
View file

@ -116,15 +116,19 @@ reg_to_r0:
; sets r0 to 1 for wrap, else 0 ; sets r0 to 1 for wrap, else 0
next_sector: next_sector:
clr r0 clr r0
; inc sector
inc r3 inc r3
; sector 40(dec)?
cmp r3,#050 cmp r3,#050
blt ns_finished blt ns_finished
; sector wrap ; sector wrap
clr r3 clr r3
; next head
inc r2 inc r2
cmp r2,#02 cmp r2,#02
blt ns_finished blt ns_finished
clr r2 clr r2
; next track
inc r1 inc r1
cmp r1,#01000 cmp r1,#01000
blt ns_finished blt ns_finished