nihilazo
/
javapool
Archived
2
2
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

small display changes to prepare for second screen

This commit is contained in:
Nico 2021-03-30 14:02:47 +01:00
parent 3e46ceca92
commit 2fbf00ce3e
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
main.fs
View File

@ -258,13 +258,13 @@ S" you feel like throwing some stuff into the pool." set-message
\ clear-xy clears the x and y positions from the stack
: clear-xy ( x y -- ) drop drop ;
\ draw-screen redraws the screen, but only if there's been a change.
\ 1 1 is the starting position to draw from.
: draw-screen any-change? if 1 1 draw-message draw-devices draw-blank draw-actions clear-xy clear-all then ;
\ draw-screen redraws the devices screen, but only if there's been a change.
\ ( x y -- )
: draw-devices-screen any-change? if draw-message draw-devices draw-blank draw-actions clear-xy clear-all else 2drop then ;
\ : draw-screen clear-all ;
\ main game loop
: game-loop begin wait-tick game-tick handle-input draw-screen 0 until ;
: game-loop begin wait-tick game-tick handle-input 1 1 draw-devices-screen 0 until ;
\ for use in the debugging shell
: restart page game-loop ;