Apple-2-SW/rnd
1
0
Fork 0
mirror of https://github.com/gungwald/rnd.git synced 2025-04-29 11:37:12 +00:00
Code Issues Projects Releases Wiki Activity

Don't remember

Browse Source
This commit is contained in:
Bill Chatfield 2020-07-31 17:21:28 -04:00
parent 241df8e94f
commit 2c9e853569
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/rnd.s
View File

@ -4,7 +4,7 @@
;
;**************************
.code
.code
.include "symbols.s"
.include "macros.s"
@ -19,6 +19,9 @@ main
sta TEXTON
rts
waitForKeypress
rts
drawHallway
lda #16
jsr generateRandomInt
@ -26,6 +29,9 @@ drawHallway
HLIN #0,x2,#10
rts
drawRoom
rts
initLoResFullScreen
sta TEXTOFF ;Enable graphics
sta HIRESOFF ;Enable Lo-res
@ -93,3 +99,4 @@ setRandomColor
jsr SETCOLR ;Set the color
rts
x2 .db 0