# aldershot.rb

=begin
main file for aldershot mountain.
aldershot mountain is/will be a (currently)
simple chutes and ladders/snakes and
ladder/adders and ladders/moksha patamu/
gyanbazi/leela ripoff.
=end

tmv = lambda do |c, x, y|
  case c
    when :b
      stroke goldenrod
      fill cornflowerblue
    when :r
      stroke forestgreen
      fill tomato
  end
  strokewidth 5
  oval x, y, 40
end


Shoes.app(:height => 760, :width => 760) do
  background gradient(darkkhaki, olivedrab)
  (5..755).step(75) do |x|
    stroke maroon
    strokewidth 5
    line 5, x, 755, x
    stroke fuchsia
    strokewidth 5
    line x, 5, x, 755
  end
  tmv.call :b, 175, 325
  tmv.call :r, 550, 700
end