Robots: Difference between revisions
m
J: reduce vertical space consumption on page here
(J) |
m (J: reduce vertical space consumption on page here) |
||
Line 25:
move_handler=: {{
if. 'char'-:systype do.wd'timer 0'
select.{.tolower sysdata
case.'y'do.move _1 _1
Line 66 ⟶ 65:
}}
query_handler=: {{game_handler=: m&{{if.'char'-:systype do.x`]@.('ny'i.{.sysdata)0 end.}}}}
start=: {{initlevel 1[score=: 0}}
color=: [ gltextcolor@glrgb@{{<.0.5+255*y}}
at=: (gltext@[ [ gltextxy@])"1
dim=: 110 72▼
has=: +./ .=▼
showscore=: {{
Line 78 ⟶ 83:
}}
▲dim=: 110 72
▲has=: +./ .=
initlevel=: {{
game_handler=: move_handler
Line 106 ⟶ 109:
if.player e.junk,bots do.lose''
elseif.0=#bots do.win'' end.
}}
Line 132 ⟶ 126:
glfont '"courier" 24'
'Continue? (y/n)' at 480 480 color 0 0 0
▲ move (dim#:?*/dim)-player
▲ initlevel level+1
}}
giveup=: {{
sys_timer_z_=: {{move_base_ 0 0}}
wd'timer 100'
}}
| |||