author_engine 0.1.0

data/lib/author_engine/game/parts/common.rb

@@ -0,0 +1,13 @@
+class AuthorEngine
+  class Part
+    module Common
+      def width; Window::VIEW_WIDTH; end
+      def height; Window::VIEW_HEIGHT; end
+      def fps; Gosu.fps; end
+      def milliseconds
+        @__initial_milliseconds ||= Gosu.milliseconds
+        Gosu.milliseconds - @__initial_milliseconds
+      end
+    end
+  end
+end

data/lib/author_engine/game/parts/graphics.rb

@@ -0,0 +1,41 @@
+class AuthorEngine
+  class Part
+    module Graphics
+      def rect(x = 0, y = 0, width = 1, height = 1, color = Gosu::Color::WHITE, z = 0)
+        Gosu.draw_rect(x, y, width, height, color, z)
+      end
+
+      def text(text, x = 0, y = 0, size = 4, z = 0, color = white)
+        @fonts ||= {}
+
+        font = nil
+
+        if @fonts.dig(size)
+          font = @fonts.dig(size)
+        else
+          font = (@fonts[size] = Gosu::Font.new(size, name: Text::FONT_DEFAULT))
+        end
+
+        font.draw_markup(text, x, y, z, 1, 1, color)
+      end
+
+      def sprite(index, x = 0, y = 0, z = 0, alpha = 255)
+        image = SpriteEditor.instance.sprites[index]
+        raise "No sprite at '#{index}'!" unless image
+        image.draw(x, y, z, 1,1, Gosu::Color.rgba(255,255,255, alpha))
+      end
+
+      def translate(x, y, &block)
+        Gosu.translate(x, y) do
+          block.call if block
+        end
+      end
+
+      def rotate(angle, around_x = 0, around_y = 0, &block)
+        Gosu.rotate(angle, around_x, around_y) do
+          block.call if block
+        end
+      end
+    end
+  end
+end

data/lib/author_engine/game/parts/input.rb

@@ -0,0 +1,25 @@
+class AuthorEngine
+  class Part
+    module Input
+      BUTTONS = {
+        "left" => Gosu::KbLeft,
+        "right" => Gosu::KbRight,
+        "up" => Gosu::KbUp,
+        "down" => Gosu::KbDown,
+        "x" => Gosu::KbX,
+        "y" => Gosu::KbC,
+      }
+      def button?(name)
+        down = false
+
+        if BUTTONS.dig(name)
+          down = Gosu.button_down?(BUTTONS.dig(name))
+        else
+          raise "Button '#{name}' not found!"
+        end
+
+        return down
+      end
+    end
+  end
+end

data/lib/author_engine/image.rb

@@ -0,0 +1,53 @@
+class AuthorEngine
+  class Image
+    include AuthorEngine::Support
+    CACHE = {}
+
+    def initialize(path, retro: true)
+      @retro = retro
+      @image = image_from_cache(path)
+    end
+
+    def width; @image.width; end
+    def height; @image.height; end
+
+    def image_from_cache(path)
+      image = nil
+      if image = CACHE.dig(path)
+        return image
+      else
+        _image = nil
+        begin
+          _image = Gosu::Image.new(path, retro: @retro)
+        rescue RuntimeError => e
+          if e.message.downcase.include?("cannot open file")
+            warn e.message
+            warn caller[0..2].map{|s| s = "  #{s}"}.reverse
+            _image = image_missing
+          else
+            raise
+          end
+        end
+
+        image = CACHE[path] = _image
+      end
+
+      return image
+    end
+
+    def image_missing
+      return Gosu.render(window.sprite_size, window.sprite_size) do
+        Gosu.draw_rect(0, 0, window.sprite_size, window.sprite_size, Gosu::Color::YELLOW)
+        Gosu.draw_rect(2, 2, window.sprite_size-4, window.sprite_size-4, Gosu::Color::RED)
+      end
+    end
+
+    def draw(*args)
+      @image.draw(*args)
+    end
+
+    def draw_rot(*args)
+      @image.draw_rot(*args)
+    end
+  end
+end

data/lib/author_engine/palette.rb

@@ -0,0 +1,114 @@
+class AuthorEngine
+  class Palette
+    include Support
+    include AuthorEngine::Part::Colors
+
+    attr_accessor :x, :y, :width, :height
+    def initialize(x:, y:, size: 8)
+      @x_padding = window.scale_x
+      @y_padding = window.scale_y
+
+      @size = (size * @y_padding)
+      @slot_width = 8
+
+      set_origin(x, y)
+
+      @color_set = [
+        [
+          black,
+          dark_blue,
+          dark_purple,
+          dark_green
+        ],
+        [
+          brown,
+          dark_gray,
+          light_gray,
+          white
+        ],
+        [
+          red,
+          orange,
+          yellow,
+          green
+        ],
+        [
+          blue,
+          indigo,
+          pink,
+          peach
+        ]
+      ]
+      @active_set = 0
+      @active_color = nil
+    end
+
+    def color
+      @active_color
+    end
+
+    def set_origin(x, y)
+      _x = x
+      _y = y
+
+      if x == :center
+        _x = window.width/2 - (@slot_width*@size)/2
+      end
+      if y == :bottom
+        _y = window.height - ((@size*2)+@y_padding)
+      end
+
+      @x, @y = _x, _y
+      @width  = 4 * @size
+      @height = 4 * @size
+    end
+
+    def draw
+      Gosu.draw_rect(@x-window.square_scale, @y-window.square_scale, @width + (window.square_scale*2), @height + (window.square_scale*2), light_gray)
+      draw_colors
+      hightlight_active_color
+    end
+
+    def update
+    end
+
+    def button_up(id)
+      if id == Gosu::MsLeft
+        @color_set.each_with_index do |row, i|
+          row.each_with_index do |color, x|
+            if window.mouse_x.between?(@x+(x*@size), @x+(x*@size) + @size)
+              if window.mouse_y.between?(@y + (@size*i), @y + (@size*i) + @size)
+                @active_color = color
+              end
+            end
+          end
+        end
+      end
+    end
+
+    def draw_colors
+      @color_set.each_with_index do |row, i|
+        row.each_with_index do |color, x|
+          z = color == @active_color ? 100 : 7
+          Gosu.draw_rect(
+            @x+(x*@size), @y+(@size*i),
+            @size, @size,
+            color,
+            z
+          )
+        end
+      end
+    end
+
+    def hightlight_active_color
+      @color_set.each_with_index do |row, i|
+        row.each_with_index do |color, x|
+          if color == @active_color
+            Gosu.draw_rect(@x+(x*@size)-window.square_scale, (@y+(@size*i))-window.square_scale, @size+(window.square_scale*2), @size+(window.square_scale*2), Gosu::Color.rgba(255,255,255, 200), 8)
+            break
+          end
+        end
+      end
+    end
+  end
+end

data/lib/author_engine/save_file.rb

@@ -0,0 +1,134 @@
+class AuthorEngine
+  class SaveFile
+    SpriteSheetData = Struct.new(:columns, :rows, :to_blob)
+
+    def self.create(file)
+      if File.exists?(file)
+        return false
+      else
+        File.open(file, "w") {|f| f.write ""}
+        if File.exists?(file)
+          return true
+        else
+          return false
+        end
+      end
+    end
+
+    attr_reader :file
+    attr_reader :code, :sprites, :levels
+    def initialize(file)
+      @file = file
+      @buffer = ""
+
+      @code, @sprites, @levels = nil, nil, nil
+
+      load
+    end
+
+    def save
+      save_code
+      save_spritesheet
+      save_levels
+
+      File.open(@file, "w") do |f|
+        f.write @buffer
+      end
+
+      @buffer = ""
+      puts "Saved #{file}"
+    end
+
+    def save_code
+      @buffer+= "___CODE___\n"
+      @buffer+= CodeEditor.instance.code
+      # @buffer+="\n" # CodeEditor always has this newline
+    end
+
+    def save_spritesheet
+      sheet = SpriteEditor.instance.spritesheet
+
+      @buffer+= "___SPRITES___\n"
+      @buffer+="#{sheet.width}x#{sheet.height}"
+      @buffer+="\n"
+
+      pack = sheet.to_blob.unpack('H*').first
+      # @buffer+= pack
+      pack.chars.each_slice(1024) do |slice|
+        @buffer+=slice.join
+        @buffer+="\n"
+      end
+
+      @buffer+="\n"
+    end
+
+    def save_levels
+      @buffer+= "___LEVELS___\n"
+      # @buffer+= LevelEditor.instance.levels
+      @buffer+="\n"
+    end
+
+    def load
+      file = ""
+      File.open(@file, "r") {|f| file = f.read}
+
+      load_code(file)
+      load_spritesheet(file)
+      load_levels(file)
+    end
+
+    def load_code(file)
+      buffer = ""
+      in_code= false
+      file.each_line do |line|
+        if line.start_with?("___CODE___")
+          in_code = true
+          next
+        end
+        if line.start_with?("___") && in_code
+          break
+        end
+
+        buffer+="#{line}" if in_code
+      end
+
+      @code = buffer
+    end
+
+    def load_spritesheet(file)
+      buffer = ""
+      width  = 0
+      height = 0
+      in_sprites = false
+
+      file.each_line do |line|
+        if line.strip.start_with?("___SPRITES___")
+          in_sprites = true
+          next
+        end
+        if line.start_with?("___") && in_sprites
+          break
+        end
+
+        next unless in_sprites
+
+        if line.include?("x")
+          a = line.strip.split("x")
+          width = a.first.to_i
+          height = a.last.to_i
+          next
+        end
+
+
+        buffer += line.strip
+      end
+
+      stream = buffer.scan(/../).map { |x| x.hex }.pack('c*')
+
+      @sprites = SpriteSheetData.new(width, height, stream)
+    end
+
+    def load_levels(file)
+    end
+  end
+end

data/lib/author_engine/sprite.rb

@@ -0,0 +1,4 @@
+class AuthorEngine
+  class Sprite
+  end
+end

data/lib/author_engine/sprite_picker.rb

@@ -0,0 +1,154 @@
+class AuthorEngine
+  class SpritePicker
+    include Support
+
+    attr_reader :active_sprite
+    attr_reader :x, :y, :width, :height
+    attr_reader :rows, :columns
+    def initialize(x: nil, y:, width: nil, height: nil)
+      @x, @y, @width, @height = x, y, width, height
+      @sprite_size = window.sprite_size
+      @scaled_sprite_size = @sprite_size * window.square_scale
+      @active_sprite = 0 # array index
+
+      @width = width ? width : window.width - (@scaled_sprite_size)
+      @height= height ? height : @scaled_sprite_size*2
+
+      @x = x ? x : window.width/2 - @width/2
+
+      @columns = (@width  / @scaled_sprite_size).floor
+      @rows    = (@height / @scaled_sprite_size).floor
+
+      @offset = 1 * window.square_scale
+      @tooltip = AuthorEngine::Text.new(message: "", z: 100)
+      @current_page = AuthorEngine::Text.new(message: "Page 0", size: 20, x: window.width/2, y: @y - 24, z: 100)
+
+      @page = 0
+    end
+
+    def draw
+      Gosu.draw_rect(@x-@offset, @y-@offset, @width+(@offset*2), @height+(@offset*2), Gosu::Color::WHITE, 15)
+      Gosu.draw_rect(@x, @y, @width, @height, Gosu::Color.rgba(10, 10, 10, 200), 15)
+      draw_grid
+      draw_sprites
+
+      draw_and_update_tooltip
+      @current_page.message = "Page #{@page}"
+      @current_page.draw
+    end
+
+    def draw_grid
+      (@columns-1).times do |i|
+        i += 1
+        # Vertical line
+        Gosu.draw_rect((@x + (i * @width /  @columns)) - 1, @y, 1, @height, Gosu::Color::WHITE, 17)
+      end
+      #Horizontal line
+      (@rows-1).times do |i|
+        Gosu.draw_rect(@x, (@y + (i * @height / @rows)) + @scaled_sprite_size, @width, 1, Gosu::Color::WHITE, 17)
+      end
+    end
+
+    def draw_sprites
+      y = @y
+      x = @x
+      n = 0
+      size  = (@columns * @rows)
+      index = size * @page
+
+      SpriteEditor.instance.sprites[index..(index + size)].each_with_index do |sprite, i|
+        sprite.draw(x, y, 16, 1.0 * window.square_scale, 1.0 * window.square_scale) if sprite
+        x+=@scaled_sprite_size
+
+        if n >= @columns-1
+          y+=@scaled_sprite_size
+          x = @x
+          n = 0
+        else
+          n += 1
+        end
+      end
+
+      highlight_sprite
+    end
+
+    def highlight_sprite
+      sprite_block do |x, y|
+        Gosu.draw_rect(x + @x, y + @y, @sprite_size * window.square_scale, @sprite_size * window.square_scale, Gosu::Color.rgba(0,0,0, 50), 17)
+      end
+    end
+
+    def mouse_over_sprite?(x, y, width, height)
+      if window.mouse_x.between?(x, x + width) &&
+         window.mouse_y.between?(y, y + height)
+         return true
+      end
+    end
+
+    def draw_and_update_tooltip
+      found = false
+
+      sprite_block do |x,y,index|
+        if @tooltip
+          @tooltip.message = "#{index}"
+          @tooltip.x = window.mouse_x - @tooltip.width/2
+          @tooltip.y = window.mouse_y - @tooltip.height
+        end
+
+        found = true
+      end
+
+      if found
+        Gosu.draw_rect(@tooltip.x - @offset, @tooltip.y - @offset, @tooltip.width+(@offset*2), @tooltip.height+(@offset), Gosu::Color.rgba(0,0,0,100), 100)
+        @tooltip.draw
+      else
+        @tooltip.message = ""
+      end
+    end
+
+    def select_sprite
+      sprite_block do |x, y, index|
+        @active_sprite = index
+        SpriteEditor.instance.set_sprite
+      end
+    end
+
+    def sprite_block(&block)
+      found = false
+      index = @page * (@columns * @rows)
+
+      @rows.times do |y|
+        _y = y * @scaled_sprite_size
+        break if found
+
+        @columns.times do |x|
+          break if found
+          _x = x * @scaled_sprite_size
+
+          if mouse_over_sprite?(_x + @x, _y + @y, @sprite_size * window.square_scale, @sprite_size * window.square_scale)
+            found = true
+            block.call(_x, _y, index, found) if block
+          end
+
+          break if index >= 255
+          index+=1
+        end
+      end
+    end
+
+    def button_up(id)
+      case id
+      when Gosu::MsLeft
+        if mouse_over?(self)
+          select_sprite
+        end
+      when Gosu::KbLeft
+        @page-=1
+        @page = (255/(@rows * @columns)) if @page < 0
+      when Gosu::KbRight
+        @page+=1
+        @page = 0 if @page > (255/(@rows * @columns))
+      end
+    end
+  end
+end

data/lib/author_engine/support.rb

@@ -0,0 +1,22 @@
+class AuthorEngine
+  module Support
+    def window
+      Window.instance
+    end
+
+    def code_editor
+      CodeEditor.instance
+    end
+
+    def sprite_editor
+      SpriteEditor.instance
+    end
+
+    def mouse_over?(object)
+      if window.mouse_x.between?(object.x, object.x + object.width) &&
+        window.mouse_y.between?( object.y, object.y + object.height)
+        true
+      end
+    end
+  end
+end

data/lib/author_engine/text.rb

@@ -0,0 +1,41 @@
+class AuthorEngine
+  class Text
+    include Support
+    FONT_DEFAULT = "assets/fonts/Connection.otf"
+    FONT_DEFAULT_BOLD = "assets/fonts/ConnectionBold.otf"
+
+    attr_accessor :message, :x, :y, :z, :color
+    attr_reader :size, :font
+    def initialize(message: "", size: nil, x: 0, y: 0, z: 0, color: Gosu::Color::WHITE, font: FONT_DEFAULT) # Consolas
+      @message = message
+      @size = size ? size : (8 * window.scale_y).floor
+      @x, @y, @z = x, y, z
+      @color, @font_name = color, font
+
+      @font = Gosu::Font.new(@size, name: @font_name)
+    end
+
+    def width
+      @font.text_width(@message)
+    end
+
+    def width_markup
+      @font.markup_width(@message)
+    end
+
+    def height
+      @font.height
+    end
+
+    def draw
+      @font.draw_text(@message, @x, @y, @z, 1, 1, @color)
+    end
+
+    def draw_markup
+      @font.draw_markup(@message, @x, @y, @z, 1, 1, @color)
+    end
+
+    def update
+    end
+  end
+end

data/lib/author_engine/version.rb

@@ -0,0 +1,3 @@
+class AuthorEngine
+  VERSION = "0.1.0"
+end

data/lib/author_engine/view.rb

@@ -0,0 +1,55 @@
+class AuthorEngine
+  class View
+    include Support
+    include AuthorEngine::Part::Colors
+
+    def self.instance
+      @instance
+    end
+
+    def self.instance=(klass)
+      @instance = klass
+    end
+
+    attr_reader :x, :y, :width, :height, :background
+    def initialize(x:, y:, width:, height:, background: Gosu::Color::BLACK)
+      @x, @y, @width, @height, @background = x, y, width, height, background
+
+      @x_padding = Button::PADDING * window.scale_x
+      @y_padding = Button::PADDING * window.scale_y
+
+      self.class.instance = self
+      setup
+    end
+
+    def setup
+    end
+
+    def focus
+    end
+
+    def blur
+    end
+
+    def draw
+      Gosu.draw_rect(@x, @y, @width, @height, @background)
+    end
+
+    def mouse_inside_view?
+      if window.mouse_x.between?(@x, @x+@width)
+        if window.mouse_y.between?(@y, @y+@height)
+          return true
+        end
+      end
+    end
+
+    def update
+    end
+
+    def button_down(id)
+    end
+
+    def button_up(id)
+    end
+  end
+end