author_engine 0.1.0

data/lib/author_engine/code_editor/cursor.rb

@@ -0,0 +1,339 @@
+class AuthorEngine
+  class CodeEditor < View
+    class Cursor
+      include AuthorEngine::Support
+      include AuthorEngine::Part::Colors
+
+      attr_reader :active_line, :line_x
+      def initialize(view:, text_input:, text:)
+        @view = view
+        @text_input = text_input
+        @text = text
+
+        @x, @y = 0, 0
+
+        @last_blink = Gosu.milliseconds
+        @blink_interval = 250
+        @show = false
+
+        @newline_data = {}
+        @active_line  = 0
+        @active_line_history_size  = 2
+        @active_line_history_index = 0
+        @active_line_history = []
+
+        @highlight_color = Gosu::Color.rgba(dark_gray.red, dark_gray.green, dark_gray.blue, 100)
+        @selection_color = window.lighten(Gosu::Color.rgba(@view.background.red, @view.background.green, @view.background.blue, 100), 100)
+
+        @repeatable_keys = [
+          {
+            key: Gosu::KbUp,
+            down: false,
+            repeat_delay: 50,
+            last_repeat: 0,
+            action: proc {move(:up)}
+          },
+          {
+            key: Gosu::KbDown,
+            down: false,
+            repeat_delay: 50,
+            last_repeat: 0,
+            action: proc {move(:down)}
+          }
+        ]
+
+        caret_stay_left_of_last_newline
+      end
+
+      def draw
+        highlight_activeline
+        highlight_selection
+        Gosu.draw_rect(@text.x + @x, @y, 1, @text.height, light_gray) if @show
+      end
+
+      def update
+        if (Gosu.milliseconds - @last_blink) > @blink_interval
+          @last_blink = Gosu.milliseconds
+          @show = !@show
+        end
+
+        update_caret
+
+        update_active_line_history
+
+        @repeatable_keys.each do |key|
+          if key[:down]
+            if Gosu.milliseconds > key[:last_repeat] + key[:repeat_delay]
+              key[:action].call
+              key[:last_repeat] = Gosu.milliseconds
+            end
+          end
+        end
+      end
+
+      def button_down(id)
+        @repeatable_keys.detect do |key|
+          if key[:key] == id
+            key[:down] = true
+            key[:last_repeat] = Gosu.milliseconds + key[:repeat_delay]
+            return true
+          end
+        end
+
+        case id
+        when Gosu::KbA
+          select_all if window.control_button_down?
+        end
+      end
+
+      def button_up(id)
+        @repeatable_keys.detect do |key|
+          if key[:key] == id
+            key[:down] = false
+            return true
+          end
+        end
+
+        # FIXME: Can't seem to get cursor position before it's set to 0...
+        # CAUTION: This randomly started working!
+        #          And then stopped...?
+
+        caret_stay_left_of_last_newline
+
+        case id
+        when Gosu::MsLeft
+          return unless @view.mouse_inside_view?
+
+          index = row_at(window.mouse_y)
+          line  = @newline_data.dig(index)
+          return unless line # no line at index
+          right_offset = column_at((window.mouse_x + @view.x_offset.abs) - @text.x, window.mouse_y)
+          pos = (line[:position_end_of_line] - line[:text_length]) + right_offset
+
+          set_position(pos)
+
+        # TODO: move to button_down? to fix popping to the top and back
+        when Gosu::KbHome
+          line = @newline_data[last_active_line(0)]
+          pos  = line[:position_end_of_line] - line[:text_length]
+
+          set_position(pos)
+
+        # TODO: move to button_down? to fix popping to the bottom and back
+        when Gosu::KbEnd
+          line = @newline_data[last_active_line(@newline_data.size-1)]
+          pos  = line[:position_end_of_line]
+
+          set_position(pos)
+        end
+      end
+
+      # returns the line of lines from the top that y is at
+      def row_at(y)
+        return (((y.to_f - window.container.header_height.to_f) - @view.y_offset.to_f) / @text.height).floor
+      end
+
+      # returns the column for x on line y
+      def column_at(x, y, y_is_line = false)
+        x = @text.x if x < x-@text.x
+        line  = @newline_data.dig(row_at(y)) unless y_is_line
+        line  = @newline_data.dig(y) if y_is_line
+        column= 0
+        return unless line
+
+        text  = line[:text]
+        buffer= ""
+        local_x=0
+
+        text.size.times do |i|
+          local_x = @text.font.text_width(buffer)
+
+          break if local_x >= x
+          column+=1
+          buffer+=text.chars[i]
+        end
+
+        return column
+      end
+
+      def build_newline_data
+        i = 0
+        virt_caret = 0
+
+        @text_input.text.each_line do |line|
+          virt_caret += line.length
+          @newline_data[i] = {position_end_of_line: virt_caret-1, text: line.chomp, text_length: line.chomp.length} # go behind newline
+
+          i+=1
+        end
+
+      end
+
+      def calculate_active_line
+        sub_text = @text_input.text[0..position]
+        @active_line = sub_text.lines.size-1
+      end
+
+      def calculate_x_and_y
+        @y = @text.y + (@active_line * @text.height)
+
+        if position == 0
+          @x = 0
+          return
+        end
+
+        line = @text_input.text[0..position-1].lines[@active_line]
+        sub_text = ""
+        if line
+          sub_text = line[0..position-1]
+        end
+
+        @x = @text.font.markup_width(sub_text)
+      end
+
+      def calculate_x_offset
+        two_zeros = @text.font.text_width("00")
+        if @x + two_zeros > @view.width - @text.x
+          @view.x_offset = (@view.width - @text.x) - (@x + two_zeros)
+        else
+          @view.x_offset = 0
+        end
+      end
+
+      def update_caret
+        build_newline_data
+        calculate_active_line
+
+        calculate_x_and_y
+        calculate_x_offset
+        calculate_y_offset
+      end
+
+      def caret_stay_left_of_last_newline
+        @text_input.text+="\n" unless @text_input.text.end_with?("\n")
+
+        eof = @text_input.text.chomp.length
+        set_position(eof) if position > eof
+      end
+
+      def calculate_y_offset
+        y_offset = @view.height - ((@text.y - (window.container.header_height - (@text.height*2))) + (@active_line * @text.height))
+
+        if y_offset > 0 # top is visible, reset to 0 to prevent inverse scrolling
+          y_offset = 0
+        else
+          # FIXME
+          top    = (@text.y + @view.y_offset.abs) + @text.height
+          bottom = (@text.y + @view.y_offset.abs + @view.height) - @text.height * 2
+
+          if (@y).between?(top, bottom) # don't follow cursor up if not at top of screen
+            y_offset = @view.y_offset
+          elsif @y < top && y_offset <= 0
+            y_offset = @view.y_offset + @text.height
+          end
+        end
+
+        @view.y_offset = y_offset
+      end
+
+      def update_active_line_history
+        @active_line_history_index = 0 unless @active_line_history_index < @active_line_history_size
+
+        unless @active_line_history[@active_line_history_index-1] == @active_line
+          @active_line_history[@active_line_history_index] = @active_line
+          @active_line_history_index+=1
+        end
+
+      end
+
+      # poison: line index at which home is 0 and end is @newline_data.size-1
+      def last_active_line(poison)
+        candidate = @active_line
+
+        # p poison
+
+        list = @active_line_history.reject{|l| l == poison}
+        return candidate unless list
+
+        # p @active_line_history,list
+
+        candidate = list.reverse.first if list.size > 0
+
+        return candidate
+      end
+
+      def highlight_activeline
+        Gosu.draw_rect(0 - @view.x_offset, @y, @view.width, @text.height, @highlight_color)
+      end
+
+      def highlight_selection
+        return if @text_input.selection_start == position
+
+        line      = @newline_data[@active_line]
+        selection_x = 0
+        if @text_input.selection_start < position
+          selection_x = @text.font.text_width(@text_input.text[@text_input.selection_start..position-1])
+
+          Gosu.draw_rect((@x + @text.x) - selection_x, @text.y + (@active_line * @text.height), selection_x, @text.height, @selection_color)
+        else
+          selection_x = @text.font.text_width(@text_input.text[position..@text_input.selection_start-1])
+
+          Gosu.draw_rect((@x + @text.x), @text.y + (@active_line * @text.height), selection_x, @text.height, @selection_color)
+        end
+
+      end
+
+      def position
+        @text_input.caret_pos
+      end
+
+      def set_position(int)
+        @text_input.caret_pos = int
+        @text_input.selection_start = int # See: https://github.com/gosu/gosu/issues/228
+      end
+
+      def select_all
+        @text_input.selection_start = 0
+        @text_input.caret_pos = @text_input.text.length-1
+      end
+
+      def move(direction)
+        pos = @text_input.caret_pos
+        line = nil
+
+        if direction == :up
+          return if @active_line == 0
+          line  = @newline_data.dig(@active_line-1)
+          return unless line # no line at index
+          # current_offset = column_at(@x, (@active_line), true) # current line offset
+          above_offset = column_at(@x, (@active_line-1), true) # line up offset
+
+          # right_offset = current_offset
+          # right_offset = above_offset if current_offset >= above_offset
+          right_offset = above_offset
+
+          pos = (line[:position_end_of_line] - line[:text_length]) + right_offset
+
+        elsif direction == :down
+          return if @text_input.caret_pos == @text_input.text.size
+          return unless @newline_data[@active_line+1]
+          line  = @newline_data.dig(@active_line+1)
+          return unless line # no line at index
+          # current_offset = column_at(@x, (@active_line), true) # current line offset
+          below_offset = column_at(@x, (@active_line+1), true) # line down offset
+
+          # right_offset = current_offset
+          # right_offset = below_offset if current_offset >= below_offset
+          right_offset = below_offset
+
+          pos = (line[:position_end_of_line] - line[:text_length]) + right_offset
+
+        else
+          raise ":up or :down please."
+        end
+
+        set_position(pos)
+      end
+    end
+  end
+end

data/lib/author_engine/code_editor/highlighting.rb

@@ -0,0 +1,49 @@
+class AuthorEngine
+  class CodeEditor < View
+    class Highlighting
+      include AuthorEngine::Part::Colors
+
+      def initialize
+        @highlight_colors = {
+          instance_variable: xml_color(green),
+          keyword: xml_color(red),
+          method: xml_color(yellow),
+          ident: xml_color(yellow),
+          comment: xml_color(dark_gray),
+          constant: xml_color(orange),
+
+          delimiter: xml_color(blue),
+          content: xml_color(blue),
+          integer: xml_color(blue),
+          float: xml_color(blue),
+          symbol: xml_color(blue),
+        }
+
+        @last_text = ""
+      end
+
+      def highlight(string:, text:)
+        return unless @last_text != string
+        @last_text = string
+
+        buffer = ""
+
+        tokens = CodeRay.scan(string, :ruby).tokens
+        tokens.each_with_index do |token, index|
+          buffer = "#{buffer}#{style(text: token, token: tokens[index+1])}" if token.is_a?(String)
+        end
+
+        text.message = buffer
+      end
+
+      def style(text:, token:)
+        color = @highlight_colors.dig(token)
+        if color
+          return "<c=#{color}>#{text}</c>"
+        else
+          return text
+        end
+      end
+    end
+  end
+end

data/lib/author_engine/container.rb

@@ -0,0 +1,24 @@
+class AuthorEngine
+  class Container
+    include Support
+    include AuthorEngine::Part::Colors
+
+    def initialize
+    end
+
+    def setup
+    end
+
+    def draw
+    end
+
+    def update
+    end
+
+    def button_down(id)
+    end
+
+    def button_up(id)
+    end
+  end
+end

data/lib/author_engine/containers/editor.rb

@@ -0,0 +1,97 @@
+class AuthorEngine
+  class Editor < Container
+    attr_reader :header_height, :savefile
+
+    def initialize(savefile)
+      @savefile = savefile
+
+      @scale_x = window.scale_x
+      @scale_y = window.scale_y
+
+      @active_view  = nil
+      @header_height= (16 * @scale_y)+(@scale_y*2)
+      @header_color = Gosu::Color.rgba(dark_green.red, dark_green.green, dark_green.blue, 100)#Gosu::Color.rgba(25, 255, 25, 100)
+      @title = Text.new(message: "AuthorEngine", x: (1.0*@scale_x))
+      @title.y = @header_height/2 - @title.height/2
+      @views = []
+      @buttons = []
+
+      @locked = false
+    end
+
+    def setup
+      add_buttons
+    end
+
+    def add_buttons
+      @play_viewer   = PlayViewer.new(x: 0, y: @header_height+1, width: window.width, height: window.height-@header_height, background: dark_purple)
+      @sprite_editor = SpriteEditor.new(x: 0, y: @header_height+1, width: window.width, height: window.height-@header_height, background: indigo)
+      @level_editor  = LevelEditor.new(x: 0, y: @header_height+1, width: window.width, height: window.height-@header_height, background: brown)
+      @code_editor   = CodeEditor.new(x: 0, y: @header_height+1, width: window.width, height: window.height-@header_height, background: black)
+
+      @buttons << Button.new(image: "assets/ui/play_icon.png", tooltip: "Play", tag: :play_viewer, color: @header_color) {@active_view = @play_viewer; @active_view.focus; @code_editor.blur}
+      @buttons << Button.new(image: "assets/ui/sprite_icon.png", tooltip: "Sprite Editor", tag: :sprite_editor, color: @header_color) {@active_view = @sprite_editor; @active_view.focus; @code_editor.blur}
+      @buttons << Button.new(image: "assets/ui/level_icon.png", tooltip: "Level Editor", tag: :level_editor, color: @header_color) {@active_view = @level_editor; @active_view.focus; @code_editor.blur}
+      @buttons << Button.new(image: "assets/ui/code_icon.png", tooltip: "Code Editor", tag: :code_editor, color: @header_color) {@active_view = @code_editor; @active_view.focus}
+
+      @active_view = @play_viewer
+      # @active_view.focus
+      position_buttons
+    end
+
+    def position_buttons
+      total_width = 0
+      @buttons.each do |b|
+        total_width+=b.width
+      end
+      raise "Header buttons are to wide (#{total_width})" if total_width > window.width
+
+
+      origin = window.width - total_width
+      x_offset = 0
+      @buttons.each_with_index do |b, i|
+        b.x = origin + x_offset
+        x_offset+=b.width
+      end
+    end
+
+    def lock; @locked = true; end
+    def unlock; @locked = false; end
+
+    def draw
+      unless @locked
+        Gosu.draw_rect(0, 0, window.width, @header_height, @header_color)
+        @title.draw
+        @buttons.each(&:draw)
+      end
+
+      @active_view.draw if @active_view
+    end
+
+    def update
+      @active_view.update if @active_view
+    end
+
+    def close
+      @savefile.save
+
+      window.close!
+    end
+
+    def button_down(id)
+      @savefile.save if window.control_button_down? && id == Gosu::KbS
+      if window.control_button_down? && id == Gosu::KbO
+        @savefile.save
+        window.container = Loader.new
+      end
+
+      @active_view.button_down(id) if @active_view
+    end
+
+    def button_up(id)
+      @buttons.each {|b| b.button_up(id)} unless @locked
+
+      @active_view.button_up(id) if @active_view
+    end
+  end
+end

data/lib/author_engine/containers/loader.rb

@@ -0,0 +1,105 @@
+class AuthorEngine
+  class Loader < Container
+    Project = Struct.new(:name, :block)
+    def setup
+      @root_directory = Dir.pwd#"#{Dir.home}/AuthorEngineProjects"
+      Dir.mkdir(@root_directory) unless File.exists?(@root_directory)
+
+      @list = []
+      @files = Dir.glob(@root_directory+"/*.authorengine")
+      @font = Gosu::Font.new((6 * window.square_scale).floor, name: AuthorEngine::Text::FONT_DEFAULT)
+
+      @files.each do |file|
+        @list << Project.new(file, proc {load(file)})
+      end
+
+      @index = ((@list.size)/2.0).floor
+      @list.rotate!(@index)
+      @height = (@list.size-1)*@font.height
+
+      @last_index = @index
+      @entering_name = false
+
+      @header_color = Gosu::Color.rgba(dark_green.red, dark_green.green, dark_green.blue, 100)
+      @new_button   = Button.new(label: "New Project", color: @header_color) do
+        window.text_input = Gosu::TextInput.new
+        @entering_name = true
+      end
+      @new_button.x = window.width - @new_button.width
+    end
+
+    def load(filename)
+      p filename
+      savefile = SaveFile.new(filename)
+      window.container = Editor.new(savefile)
+    end
+
+    def draw
+      Gosu.draw_rect(0, 0, window.width, window.height, window.darken(dark_gray, 50))
+
+      if @entering_name
+        draw_inputter
+      else
+        draw_loader
+      end
+    end
+
+    def draw_inputter
+      x = window.width/2 - @font.text_width(window.text_input.text+".authorengine")/2
+      y = window.height/2 - @font.height/2
+      @font.draw_text(window.text_input.text+".authorengine", x, y, 0)
+    end
+
+    def draw_loader
+      Gosu.draw_rect(0, @new_button.y, window.width, @new_button.height, @header_color)
+      @font.draw_text("AuthorEngine", 1*window.square_scale,@font.height/2,0)
+      @new_button.draw
+      @font.draw_text(@list[@index].name, 0, 0, 0) if @list[@index]
+
+      Gosu.clip_to(0, @font.height*2, window.width, window.height-(@font.height*4)) do
+        y = (window.height/2-@font.height) - (@height/2)
+
+        @list.each_with_index do |project, index|
+          label = project.name.sub(@root_directory+"/", '')
+          x = window.width/2 - @font.text_width(label)/2
+          if project == @list[@index]
+            Gosu.draw_rect(0, y, window.width, @font.height, red)
+          end
+          @font.draw_text(label, x, y, 0)
+          y+=@font.height
+        end
+      end
+    end
+
+    def update
+    end
+
+    def close
+      window.close!
+    end
+
+    def button_up(id)
+      @new_button.button_up(id)
+
+      case id
+      when Gosu::KbUp
+        # @list.rotate!(-1)
+        # @index-=1
+        # @index = (@index % @list.size-1)*-1
+        # p @index
+      when Gosu::KbDown
+        @list.rotate!(1)
+        @index+=1
+        @index = 0 if @list.size == 0
+        @index = @index % @list.size-1 if @list.size != 0
+      when Gosu::KbEnter, Gosu::KbReturn
+        if @entering_name
+          SaveFile.create(window.text_input.text.strip+".authorengine")
+          load(window.text_input.text.strip+".authorengine")
+        else
+          @list[@index].block.call if @list[@index]&.block
+        end
+      end
+    end
+  end
+end

data/lib/author_engine/game/game.rb

@@ -0,0 +1,26 @@
+class AuthorEngine
+  class Game
+    include AuthorEngine::Part::Common
+    include AuthorEngine::Part::Colors
+    include AuthorEngine::Part::Graphics
+    include AuthorEngine::Part::Input
+
+    def initialize(code:)
+      @background_color = Gosu::Color::BLACK
+      self.instance_eval(code)
+    end
+
+    def draw_background
+      Gosu.draw_rect(0, 0, Window::VIEW_WIDTH, Window::VIEW_HEIGHT, @background_color)
+    end
+
+    def init
+    end
+
+    def draw
+    end
+
+    def update
+    end
+  end
+end

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

@@ -0,0 +1,59 @@
+class AuthorEngine
+  class Part
+    module Colors
+      COLORS = {
+        0 => Gosu::Color.rgb(0,0,0),
+        1 => Gosu::Color.rgb(29, 43, 83),
+        2 => Gosu::Color.rgb(126, 37, 83),
+        3 => Gosu::Color.rgb(0, 135, 81),
+
+        4 => Gosu::Color.rgb(171, 82, 54),
+        5 => Gosu::Color.rgb(95, 87, 79),
+        6 => Gosu::Color.rgb(194, 195, 199),
+        7 => Gosu::Color.rgb(255, 241, 232),
+
+        8  => Gosu::Color.rgb(255, 0, 77),
+        9  => Gosu::Color.rgb(255, 163, 0),
+        10 => Gosu::Color.rgb(225, 236, 39),
+        11 => Gosu::Color.rgb(0, 228, 54),
+
+        12 => Gosu::Color.rgb(41, 173, 255),
+        13 => Gosu::Color.rgb(131, 118, 156),
+        14 => Gosu::Color.rgb(225, 119, 168),
+        15 => Gosu::Color.rgb(255, 204, 170)
+      }
+
+      def black;       COLORS.dig(0); end
+      def dark_blue;   COLORS.dig(1); end
+      def dark_purple; COLORS.dig(2); end
+      def dark_green;  COLORS.dig(3); end
+
+      def brown;       COLORS.dig(4); end
+      def dark_gray;   COLORS.dig(5); end
+      def light_gray;  COLORS.dig(6); end
+      def white;       COLORS.dig(7); end
+
+      def red;         COLORS.dig(8); end
+      def orange;      COLORS.dig(9); end
+      def yellow;      COLORS.dig(10); end
+      def green;       COLORS.dig(11); end
+
+      def blue;        COLORS.dig(12); end
+      def indigo;      COLORS.dig(13); end
+      def pink;        COLORS.dig(14); end
+      def peach;       COLORS.dig(15); end
+
+      def xml_color(color)
+        red   = color.red.to_s(16)
+        green = color.green.to_s(16)
+        blue  = color.blue.to_s(16)
+
+        red   = "0#{red}"   if color.red < 10
+        green = "0#{green}" if color.green < 10
+        blue  = "0#{blue}"  if color.blue < 10
+
+        return "#{red}#{green}#{blue}"
+      end
+    end
+  end
+end