( O V E R W O R L D )

:noname
  reset-level
  1 player.state DRIVING f!

  :|
touch-begin E leaving? dup
  if pete say" It's 100 miles to the next town." then
touch-next 5 9 2= dup
  if 13 12 pete.jor queue-level then
touch-next 13 6 2= dup
  if pete say" Old hiking trail." then
touch-next 24 6 2= dup
  if mary say" Welcome to my place, Pete!" then
touch-last |; ' player-touch redefine
s" road.map" load-map

; ' onload redefine