funfriend/src/funfriend.cr

require "crystglfw"
require "lib_glfw"
require "crystgl"
require "crystimage"

require "./log.cr"
require "./gl.cr"
require "./textureman.cr"
require "./fontman.cr"
require "./soundman.cr"
require "./window_context.cr"
require "./funfriend_context.cr"
require "./funfriend_renderer.cr"
require "./chatter_context.cr"
require "./text_renderer.cr"

include CrystGLFW
include CrystGL

module Funfriend
  VERSION = "0.1.0"

  LOG = ::Log.for("")

  @@contexts = [] of WindowContext
  @@main_context : WindowContext?

  def self.should_close?
    @@main_context && @@main_context.not_nil!.window.should_close?
  end

  def self.init_contexts
    add_context(FunfriendContext.new)
    @@main_context = @@contexts[0]
    at_exit { contexts.each &.destroy }
  end

  def self.add_context(context : WindowContext)
    @@contexts << context
  end

  def self.contexts
    @@contexts
  end

  def self.run
    Logging.init

    SoundMan.init

    CrystGLFW.run do
      init_contexts

      last_t = CrystGLFW.time
      until should_close?
        dt = CrystGLFW.time - last_t
        last_t = CrystGLFW.time

        @@contexts = @@contexts.select do |context|
          if context.window.should_close?
            context.close
            at_exit { context.clean_up }
            false
          else
            context.update(dt)
            true
          end
        end

        CrystGLFW.wait_events(1/120)
      end
    end
  end
end

Funfriend.run