Apple-2-SW/pitch-dark
1
0
Fork 0
mirror of https://github.com/a2-4am/pitch-dark.git synced 2025-02-08 03:30:35 +00:00
Code Issues Projects Releases Wiki Activity

moar bell

Browse Source
This commit is contained in:
4am 2018-03-22 21:11:08 -04:00
parent 0afc33f594
commit eb74119732
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/action.a
View File

@ -134,6 +134,7 @@ HandleKey
lda #0
.xyzzyStoreAndExit
sta .xyzzy
.nope
jmp SoftBell
.xyzzy
!byte $00
@ -147,6 +148,7 @@ HandleKey
jsr AddToPath
jsr SetPrefix
!word gPathname
bcs .nope
jsr ResetPath
lda #<.dhrslideFilename
ldy #>.dhrslideFilename
@ -156,6 +158,7 @@ HandleKey
!word $2000
!word $2000
!word kProDOSFileBuffer
bcs .nope
jsr ExitWeeGUI
jmp $2000
.dhrslideFilename
@ -261,8 +264,7 @@ callback_clues
; shutdown WeeGUI and transfer control to interpreter
jsr ExitWeeGUI
jmp $2000
.nope sec
rts
.nope jmp SoftBell
callback_play
LaunchInterpreter