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

added throw command

This commit is contained in:
Nico 2021-03-18 15:29:55 +00:00
parent 699603d466
commit d0444cfc80
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
main.fs
View File

@ -118,12 +118,16 @@ S" you feel like throwing some stuff into the pool." set-message
page
." Entering debug/cheat mode!"
page ;
\ throw-device throws a device into the pool.
: throw-device 1 devices +! devices changed ;
\ the word handle-input handles input every time around the game loop.
: handle-input
key? if key case
[char] q of exit-game endof
[char] h of hire-chat-member endof
[char] t of throw-device endof
[char] D of debug-console endof
endcase then ;
@ -158,6 +162,7 @@ S" you feel like throwing some stuff into the pool." set-message
\ draw-actions draws a list of the actions you've unlocked.
: draw-actions
1 4 at-xy
." (t)hrow a device into the pool" cr 1 move-right
draw-members cr 1 move-right
." (q)uit (without saving)" ;