Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-09-10 08:54:51 +00:00
Code Issues Projects Releases Wiki Activity

waterfall: fix typo

Browse Source
This commit is contained in:
Vince Weaver 2018-09-27 22:51:37 -04:00
parent 3f164367e5
commit a1f435c1b3
1 changed files with 22 additions and 89 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

111
waterfall/waterfall.s
View File

@ -158,8 +158,8 @@ wfloopB:dex ; 2
jmp display_loop jmp display_loop
jump_table: jump_table:
; .word (display_even-1) .word (display_even-1)
.word (display_odd-1) ; .word (display_odd-1)
.word (display_odd-1) .word (display_odd-1)
.word (display_three-1) .word (display_three-1)
.word (display_four-1) .word (display_four-1)
@ -506,7 +506,7 @@ twinkle_loop_even:
jsr delay_a ; 25+34 jsr delay_a ; 25+34
; line 3 ; line 3
bit PAGE1 ; 4 bit PAGE1 ; 4
lda #29 ; 2 lda #27 ; 2
jsr delay_a ; 25+27 jsr delay_a ; 25+27
; below: 7 if not zero ; below: 7 if not zero
@ -578,7 +578,7 @@ falls_loop_even:
asl DUMMY ; 6 asl DUMMY ; 6
lda YPOS ; 3 lda YPOS ; 3
;== line 4 ;== line 3
bit PAGE0 ; 4 bit PAGE0 ; 4
; delay 31 ; delay 31
lda #4 ; 2 lda #4 ; 2
@ -782,100 +782,33 @@ falls_loop_odd_done:
ground_loop_odd: ground_loop_odd:
; line 0 ;=== line 0
bit PAGE1 ; 4 bit PAGE1 ; 4
; delay 29 ; delay 61
asl DUMMY ; 6 lda #34 ; 2
asl DUMMY ; 6 jsr delay_a ; 25+34
asl DUMMY ; 6
asl DUMMY ; 6
lda YPOS ; 3
nop ; 2
nop
; falls
bit PAGE1 ; 4
lda YPOS ; 3
bit PAGE1 ; 4
; endfalls
; delay 21
; asl DUMMY ; 6
nop
nop
asl DUMMY ; 6
asl DUMMY ; 6
lda YPOS ; 3
; line 2 ;=== line 1
bit PAGE0 ; 4 bit PAGE0 ; 4
; delay 29 ; delay 61
asl DUMMY ; 6 lda #34 ; 2
asl DUMMY ; 6 jsr delay_a ; 25+34
asl DUMMY ; 6
asl DUMMY ; 6
lda YPOS ; 3
nop ; 2
nop
; falls
bit PAGE0 ; 4
lda YPOS ; 3
bit PAGE0 ; 4
; end falls
; delay 21
; asl DUMMY ; 6
nop
nop
asl DUMMY ; 6
asl DUMMY ; 6
lda YPOS ; 3
; line 3 ;==== line 2
bit PAGE1 ; 4 bit PAGE1 ; 4
; delay 29 ; delay 61
asl DUMMY ; 6 lda #34 ; 2
asl DUMMY ; 6 jsr delay_a ; 25+34
asl DUMMY ; 6
asl DUMMY ; 6
lda YPOS ; 3
nop ; 2
nop
; falls
bit PAGE1 ; 4
lda YPOS ; 3
bit PAGE1 ; 4
; end falls
; delay 21
; asl DUMMY ; 6
nop
nop
asl DUMMY ; 6
asl DUMMY ; 6
lda YPOS ; 3
; line 4 ;==== line 3
bit PAGE0 ; 4 bit PAGE0 ; 4
; delay 29 ; delay 54
asl DUMMY ; 6 lda #27 ; 2
asl DUMMY ; 6 jsr delay_a ; 25+27
asl DUMMY ; 6
asl DUMMY ; 6
lda YPOS ; 3
nop ; 2
nop
; falls
bit PAGE0 ; 4
lda YPOS ; 3
bit PAGE0 ; 4 ; 44
; end falls
; delay 21 - 7 from loop
; asl DUMMY ; 6
nop
nop
asl DUMMY ; 6
nop ; 2 ; 58
dey ; 2 dey ; 2
beq ground_loop_odd_done ; beq ground_loop_odd_done ; 3
; 2 ;-1
jmp ground_loop_odd ; 3 jmp ground_loop_odd ; 3
ground_loop_odd_done: ground_loop_odd_done: