Apple-2-SW/million-perfect-letters
1
0
Fork 0
mirror of https://github.com/a2-4am/million-perfect-letters.git synced 2024-06-09 23:29:39 +00:00
Code Issues Projects Releases Wiki Activity

up is down

Browse Source
This commit is contained in:
4am 2020-10-05 16:13:20 -04:00
parent f2b38e4ee8
commit a7528f7e5f
2 changed files with 21 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

38
src/ui.demo.a
View File

@ -51,13 +51,13 @@ DemoCode
!byte LOAD ,0,0 !byte LOAD ,0,0
!byte WAIT ,30 !byte WAIT ,30
!byte HIDE !byte HIDE
!byte UP !byte DOWN
!byte WAIT ,2 !byte WAIT ,2
!byte RIGHT !byte RIGHT
!byte WAIT ,2 !byte WAIT ,2
!byte RIGHT !byte RIGHT
!byte WAIT ,2 !byte WAIT ,2
!byte UP !byte DOWN
; A C ; A C
; --v- ; --v-
; LOUD ; LOUD
@ -71,21 +71,21 @@ DemoCode
!byte WAIT ,2 !byte WAIT ,2
!byte LEFT !byte LEFT
!byte WAIT ,2 !byte WAIT ,2
!byte UP
!byte WAIT ,2
!byte RIGHT
!byte WAIT ,2
!byte DOWN
!byte WAIT ,2
!byte DOWN !byte DOWN
!byte WAIT ,2 !byte WAIT ,2
!byte RIGHT !byte RIGHT
!byte WAIT ,2 !byte WAIT ,2
!byte UP !byte DOWN
!byte WAIT ,2
!byte UP
!byte WAIT ,2 !byte WAIT ,2
!byte RIGHT !byte RIGHT
!byte WAIT ,2 !byte WAIT ,2
!byte UP !byte DOWN
!byte WAIT ,2
!byte RIGHT
!byte WAIT ,2
!byte UP
; OC ; OC
; TUD ; TUD
; ---v ; ---v
@ -94,22 +94,22 @@ DemoCode
; L H ; L H
; I ; I
!byte WAIT ,30 !byte WAIT ,30
!byte DOWN
!byte WAIT ,2
!byte LEFT
!byte UP !byte UP
!byte WAIT ,2 !byte WAIT ,2
!byte LEFT !byte UP
!byte DOWN
!byte WAIT ,2
!byte DOWN
!byte WAIT ,2
!byte LEFT
!byte WAIT ,2
!byte DOWN
!byte WAIT ,2 !byte WAIT ,2
!byte LEFT !byte LEFT
!byte WAIT ,2 !byte WAIT ,2
!byte UP !byte UP
!byte WAIT ,2 !byte WAIT ,2
!byte UP !byte LEFT
!byte WAIT ,2
!byte DOWN
!byte WAIT ,2
!byte DOWN
; A D ; A D
; LO E ; LO E
; v--- ; v---

4
src/ui.play.a
View File

@ -133,14 +133,14 @@ PlayEventReturn
+ ldx #kKeepPlaying + ldx #kKeepPlaying
rts rts
PlayEventUpArrow PlayEventDownArrow
ldy gSelectedLogicalColumn ldy gSelectedLogicalColumn
jsr ScrollPuzzleUp jsr ScrollPuzzleUp
bcs CantMove bcs CantMove
jsr ScrollUp jsr ScrollUp
jmp CheckAfterArrow jmp CheckAfterArrow
PlayEventDownArrow PlayEventUpArrow
ldy gSelectedLogicalColumn ldy gSelectedLogicalColumn
jsr ScrollPuzzleDown jsr ScrollPuzzleDown
bcc + bcc +