SpindleyQ/honeylisp
1
1
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Fix title screen - Neut Tower builds!!

Browse source
This commit is contained in:
Jeremy Penner 2021-06-25 22:43:38 -04:00
parent 8aeea9aaad
commit 78e559cf3b
2 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

BIN
NeutTower.dsk Normal file
View file

Binary file not shown.

4
neuttower/disk.fnl
View file

@ -75,8 +75,8 @@
(create-sys-loader disk :NEUT game) (create-sys-loader disk :NEUT game)
(disk:add-file "TITLE.SCREEN" Prodos.file-type.BIN 0x2000 (: (util.readjson "game/title.screen") :fromhex)) (disk:add-file "TITLE.SCREEN" Prodos.file-type.BIN 0x2000 (: (util.readjson "neuttower/title.screen") :fromhex))
(disk:add-file "ELEVATOR.SCREEN" Prodos.file-type.BIN 0x2000 (: (util.readjson "game/end.screen") :fromhex)) (disk:add-file "ELEVATOR.SCREEN" Prodos.file-type.BIN 0x2000 (: (util.readjson "neuttower/end.screen") :fromhex))
(each [_ file (ipairs game.files)] (each [_ file (ipairs game.files)]
(disk:add-file file.filename Prodos.file-type.BIN file.org (. game.org-to-block file.org :bytes))) (disk:add-file file.filename Prodos.file-type.BIN file.org (. game.org-to-block file.org :bytes)))