code / tomo-game

   1 # This game demo uses Raylib to present a simple maze-type game
   2 use ./raylib.tm
   3 use ./world.tm
   4 
   5 func main(map=(./map.txt))
   6     InitWindow(1600, 900, CString("raylib [core] example - 2d camera"))
   7 
   8     map_contents := map.read() or exit("Could not find the game map: $map")
   9 
  10     world := @World(
  11         player=@Player(Vector2(0,0), Vector2(0,0)),
  12         goal=@Box(Vector2(0,0), Vector2(50,50), color=Color(0x10,0xa0,0x10)),
  13         boxes=@[],
  14     )
  15     world.load_map(map_contents)
  16 
  17     SetTargetFPS(60)
  18 
  19     while not WindowShouldClose()
  20         dt := GetFrameTime()
  21         world.update(dt)
  22 
  23         BeginDrawing()
  24         ClearBackground(Color(0xCC, 0xCC, 0xCC, 0xFF))
  25         world.draw()
  26         EndDrawing()
  27     
  28     CloseWindow()
  29