Robots: Difference between revisions

Content added Content deleted
(J)
m (J: reduce vertical space consumption on page here)
Line 25: Line 25:


move_handler=: {{
move_handler=: {{
if. 'char'-:systype do.
if. 'char'-:systype do.wd'timer 0'
wd'timer 0'
select.{.tolower sysdata
select.{.tolower sysdata
case.'y'do.move _1 _1
case.'y'do.move _1 _1
Line 66: Line 65:
}}
}}


query_handler=: {{game_handler=: m&{{if.'char'-:systype do.x`]@.('ny'i.{.sysdata)0 end.}}}}
teleport=: {{move (dim#:?*/dim)-player}}
start=: {{initlevel 1[score=: 0}}
advance=: {{initlevel level+1}}
color=: [ gltextcolor@glrgb@{{<.0.5+255*y}}
color=: [ gltextcolor@glrgb@{{<.0.5+255*y}}
at=: (gltext@[ [ gltextxy@])"1
at=: (gltext@[ [ gltextxy@])"1
dim=: 110 72
has=: +./ .=


showscore=: {{
showscore=: {{
Line 78: Line 83:
}}
}}


dim=: 110 72
has=: +./ .=
initlevel=: {{
initlevel=: {{
game_handler=: move_handler
game_handler=: move_handler
Line 106: Line 109:
if.player e.junk,bots do.lose''
if.player e.junk,bots do.lose''
elseif.0=#bots do.win'' end.
elseif.0=#bots do.win'' end.
}}

query_handler=: {{
game_handler=: m&{{
if.'char'-:systype do.
wd'timer 0'
x`]@.('ny'i.{.sysdata)0
end.
}}
}}
}}


Line 132: Line 126:
glfont '"courier" 24'
glfont '"courier" 24'
'Continue? (y/n)' at 480 480 color 0 0 0
'Continue? (y/n)' at 480 480 color 0 0 0
}}

teleport=: {{
move (dim#:?*/dim)-player
}}

start=: {{
score=: 0
initlevel 1
}}

advance=: {{
initlevel level+1
}}
}}


giveup=: {{
giveup=: {{
sys_timer_z_=: {{
sys_timer_z_=: {{move_base_ 0 0}}
move_base_ 0 0
}}
wd'timer 100'
wd'timer 100'
}}
}}