essytas 0.0.1

data/lib/gui/button.rb

@@ -0,0 +1,93 @@
+
+module Core::GUI
+  # Button to be used in menus.
+  # Executes the given lambda when clicked
+  class Button < Element
+    attr_accessor :background, :proc
+    @@sound = Core::Sample.new("click1")
+    @@error = Core::Sample.new("error1")
+    def initialize(x, y, w, h, text, proc, bg=true, align=:center, text_height=h)
+      super(x, y, w, h)
+      if bg
+        @bg = Core.sprite("gui/button_background")
+      end
+      @hi = Core.sprite("gui/button_highlight", true)
+      @font = Core.font(Core::DEFAULT_FONT, text_height)
+      @text = text
+      @proc = proc
+      @selected = false
+      @background = bg
+      @align = align
+      @enabled = true
+      @fw = @font.text_width(@text)
+    end
+    def hovered?
+      return @selected
+    end
+    def toggle
+      @enabled = !@enabled
+    end
+    def disable
+      @enabled = false
+    end
+    def enable
+      @enabled = true
+    end
+    def update
+      @selected = Core.inside?(Core.window.mouse_x, Core.window.mouse_y, @x+@xoff, @y+@yoff, @x+@w+@xoff, @y+@h+@yoff)
+      if @selected and Core.window.pressed?(Gosu::MsLeft)
+        if @enabled
+          @@sound.play(0.25)
+          @proc.call
+        else
+          @@error.play
+        end
+      end
+    end
+    def draw
+      case @align
+      when :center
+        @font.draw(@text, @x + @xoff + (@w/2) - (@fw/2), @y + @yoff + (@h/9), Core::GUI_Z + 10 + @zoff, 1, 1, Gosu::Color::BLACK)
+      when :left
+        @font.draw(@text, @x + @xoff + 4, @y + @yoff + (@h/9), Core::GUI_Z + 10 + @zoff, 1, 1, Gosu::Color::BLACK)
+      when :right
+        @font.draw(@text, @x + @xoff + (@w-@fw), @y + @yoff + (@h/9), Core::GUI_Z + 10 + @zoff, 1, 1, Gosu::Color::BLACK)
+      end
+      if @background
+        color = Gosu::Color.new(255, 255, 255, 255)
+        if !@enabled
+          color.saturation = 125
+        end
+        @bg.draw(@x + @xoff, @y + @yoff, Core::GUI_Z + 9 + @zoff, @w/@bg.width.to_f, @h/@bg.height.to_f, color)
+      end
+      if @selected and @enabled
+        @hi.draw(@x + @xoff, @y + @yoff, Core::GUI_Z + 11 + @zoff, @w/@hi.width.to_f, @h/@hi.height.to_f, 0xff999999, :additive)
+      end
+    end
+  end
+  
+  # Same as Button, but draws an image instead of text
+  class ImageButton < Button
+    attr_reader :bg
+    def initialize(x, y, file, proc, w=-1, h=-1)
+      @bg = Core.sprite(file.to_s)
+      if w < 0
+        @w = w = @bg.width
+      end
+      if h < 0
+        @h = h = @bg.height
+      end
+      super(x, y, w, h, "", proc, false)
+    end
+    def draw
+      color = Gosu::Color.new(255, 255, 255, 255)
+      if !@enabled
+        color.saturation = 125
+      end
+      @bg.draw(@x+@xoff, @y+@yoff, Core::GUI_Z + 10 + @zoff, @w/@bg.width.to_f, @h/@bg.height.to_f, color)
+      if @selected and @enabled
+        @hi.draw(@x+@xoff, @y+@yoff, Core::GUI_Z + 11 + @zoff, @w/@hi.width.to_f, @h/@hi.height.to_f, 0xff999999, :additive)
+      end
+    end
+  end
+end

data/lib/gui/char_equip.rb

@@ -0,0 +1,118 @@
+
+module Core::GUI
+  
+  class CharEquip < Element
+    attr_reader :slot
+    @@positions = {
+      :head => [144, 72],
+      :torso => [144, 160],
+      :rarm => [80, 256],
+      :larm => [208, 256],
+      :legs => [144, 320],
+      :feet => [144, 416],
+      :back => [208, 96],
+    }
+    def initialize(x, y, c)
+      super(x, y, 320, 512)
+      @bg = Core.sprite("gui/charequip_background")
+      @body = Core.sprite("gui/equip_#{c.race}")
+      @font = Core.font(Core::DEFAULT_FONT, 24)
+      @equipped = {}
+      reset_slots
+      @char = c
+      @equip = false
+      @changed = false
+      setup_equipment
+    end
+    def char=(c)
+      @char = c
+      @body = Core.sprite("gui/equip_#{c.race}")
+      setup_equipment
+    end
+    def reset_slots
+      @slots = {}
+      @colors = {}
+      @@positions.each { |loc, pos|
+        @slots.store(loc, ImageButton.new(@x+pos[0], @y+pos[1], "gui/equipslot_background", lambda {}))
+      }
+      @slots.each { |k, v|
+        @colors.store(v, Gosu::Color.new(255, 255, 255, 255))
+      }
+    end
+    def highlight_slots(ary)
+      @colors = {}
+      red = @slots
+      green = {}
+      ary.each { |loc|
+        green.store(loc, red[loc])
+        green[loc].proc = lambda { equip(loc) }
+        red.delete(loc)
+      }
+      red.each_value { |img|
+        color = Gosu::Color.new(255, 255, 0, 0)
+        @colors.store(img, color)
+      }
+      green.each_value { |img|
+        color = Gosu::Color.new(255, 0, 255, 0)
+        @colors.store(img, color)
+      }
+      @slots = red.merge(green)
+    end
+    def setup_equipment
+      equip = @char.equipment
+      @equipped = {}
+      equip.each { |loc, item|
+        if item
+          @equipped.store(loc, ImageButton.new(@x+@@positions[loc][0], @y+@@positions[loc][1], "#{item.icon_file}", lambda { unequip(loc) }, 32, 32))
+        end          
+      }
+    end
+    def equip(location)
+      @equip = true
+      @slot = location
+    end
+    def equip?
+      if @equip
+        @equip = false
+        return true
+      else
+        return false
+      end
+    end
+    def unequip(location)
+      # TODO weight/capacity check
+      @char.inventory.add(@char.equipment.remove_at(location))
+      setup_equipment
+      @changed = true
+    end
+    def update
+      super
+      @equipped.each_value { |el|
+        el.update
+      }
+      @slots.each_value { |but|
+        but.update
+      }
+    end
+    def draw
+      super
+      @bg.draw(@x, @y, Core::GUI_Z + 5, @w/@bg.width.to_f, @h/@bg.height.to_f)
+      @body.draw(@x+32, @y+32, Core::GUI_Z + 6, (@w-64)/@body.width.to_f, (@h-64)/@body.height.to_f)
+      @slots.each_value { |but|
+        but.bg.draw(but.x, but.y, Core::GUI_Z + 10, 1, 1, @colors[but])
+      }
+      @equipped.each_value { |el|
+        el.draw
+      }
+    end
+    def changed?
+      if @changed
+        @changed = false
+        return true
+      else
+        return false
+      end
+    end
+  end
+  
+end

data/lib/gui/char_selector.rb

@@ -0,0 +1,54 @@
+
+require_relative "base.rb"
+
+module Core::GUI
+  
+  class CharSelector < Element
+    attr_reader :index
+    def initialize(x, y, party, w=256, h=32)
+      super(x, y, w, h)
+      @index = 0
+      @changed = false
+      @party = party
+      @background = Core.sprite("gui/charselect_background")
+      @font = Core.font(Core::DEFAULT_FONT, 24)
+      @left = Button.new(x, y, 32, 32, "<", lambda {left}, false)
+      @right = Button.new(x+w-32, y, 32, 32, ">", lambda {right}, false)
+    end
+    def update
+      @left.xoff = @right.xoff = @xoff
+      @left.yoff = @right.yoff = @yoff
+      @left.update
+      @right.update
+    end
+    def left
+      @index -= 1
+      if @index < 0
+        @index = @party.members.size-1
+      end
+      @changed = true
+    end
+    def right
+      @index += 1
+      if @index >= @party.members.size
+        @index = 0
+      end
+      @changed = true
+    end
+    def changed?
+      if @changed
+        @changed = false
+        return true
+      else
+        return false
+      end
+    end
+    def draw
+      @background.draw(@x+@xoff, @y+@yoff, Core::GUI_Z + 9, @w/@background.width, @h/@background.height)
+      @font.draw(@party.members[@index].name, @x+@xoff+(@w/2)-(@font.text_width(@party.members[@index].name)/2), @y+@yoff+(@h/6), Core::GUI_Z + 10, 1, 1, Gosu::Color::BLACK)
+      @left.draw
+      @right.draw
+    end
+  end
+  
+end

data/lib/gui/context_menu.rb

@@ -0,0 +1,115 @@
+
+module Core::GUI
+  
+  # Small menu available by rightclicking on the map
+  class ContextMenu < Element
+    def initialize(x, y, obj=nil)
+      super(x, y, 128, items(obj) * 24)
+      @zoff = 10000
+      if @x + @w > 1024
+        @x = 1024 - @w
+      end
+      @buttons = {}
+      setup_defaults(obj)
+      @buttons.each_value { |but|
+        but.zoff = @zoff
+      }
+    end
+    def update
+      super
+      @buttons.each_value { |but|
+        but.update
+      }
+    end
+    def draw
+      @buttons.each_value { |but|
+        but.draw
+      }
+    end
+    
+    private
+    
+    def items(obj)
+      if obj
+        return 3
+      else
+        return 2
+      end
+    end
+    
+    def in_window?
+      Core.window.state.osd.each_value { |w|
+        if Core.inside?(@x, @y, w.x, w.y, w.x+w.w, w.y+w.h)
+          return true
+        end
+      }
+      return false
+    end
+    
+    def magic_window(p)
+      Core.window.state.osd.store(:magic, Core::Game::OSD::Magic.new(@x-320, @y-240, p, p));
+    end
+    
+    def setup_defaults(obj)
+      if in_window?
+        return
+      end
+      npc = player = false
+      if obj
+        if obj.class == Core::Game::MapNPC
+          label = obj.gamename
+          npc = true
+        elsif obj.class == Core::Game::Player
+          player = true
+          label = Core::Trans.menu(:you)
+        else
+          label = obj.name
+        end
+      else
+        label = Core::Trans.menu(:ground)
+      end
+      
+      p = Core.window.state.player
+      
+      @buttons.store(:label, Textfield.new(@x, @y, @w, 24, label, 24))
+      
+      x = @x - Core.window.state.map.xoff
+      y = @y - Core.window.state.map.yoff
+      
+      if !player
+        if npc
+          @buttons.store(:talk_to,
+            Button.new(@x, @y+(@buttons.size*24), @w, 24, Core::Trans.menu(:talk_to),
+              lambda { puts("STUB: talk_to"); p.find_path_to(x.to_i/32, (y.to_i/32) - (p.y < obj.y ? 1 : -1)); @remove = true }, true, :left))
+        else
+          @buttons.store(:move,
+            Button.new(@x, @y+(@buttons.size*24), @w, 24, Core::Trans.menu(:walk_here),
+              lambda { p.find_path_to(x.to_i/32, y.to_i/32); @remove = true }, true, :left))
+          if !Core.window.state.map.current.passable?(x, y) or (obj and !obj.through)
+            # TODO left/right
+            if !obj
+              obj = [x, y] # i <3 ruby
+            end
+            # a* cant find a path to a blocked tile, so shift the position away a bit
+            @buttons[:move].proc = lambda { p.find_path_to(x.to_i/32, (y.to_i/32) - (p.y < obj.y ? 1 : -1)); @remove = true }
+            # TODO check again if it works, the player *must* move
+          end
+        end
+      end
+      if !Core.window.state.osd.has_key?(:magic)
+        @buttons.store(:magic,
+          Button.new(@x, @y+(@buttons.size*24), @w, 24, Core::Trans.menu(:magic),
+            lambda { magic_window(p); @remove = true}, true, :left))
+        if npc
+          @buttons[:magic].proc = lambda { puts("STUB: othermagic"); @remove = true }
+        end
+      end
+      if $DEBUG and obj
+        @buttons.store(:debug_inspect,
+          Button.new(@x, @y+(@buttons.size*24), @w, 24, "inspect", lambda { awesome_print(obj); @remove = true }, true, :left))
+      end
+    end
+      
+  end
+    
+end

data/lib/gui/draggable.rb

@@ -0,0 +1,18 @@
+
+module Core::GUI
+  
+  class Draggable < Element
+    def initialize(x, y, w, h, type, sprite)
+      super(x, y, w, h)
+      @type = type
+      @sprite = sprite
+    end
+    def update(window)
+      super
+    end
+    def draw
+      @sprite.img.draw(@x, @y, Core::GUI_Z + 20, @w/@sprite.width, @h/@sprite.height)
+    end
+  end
+  
+end

data/lib/gui/grid.rb

@@ -0,0 +1,118 @@
+
+module Core::GUI
+  
+  # Allows EH::GUI::Elements to be placed into a 32x32 px grid.
+  # Elements can be selected and dragged
+  class Grid < Element
+    
+    attr_reader :selected
+    
+    def initialize(x, y, tx, ty, in_classes=[])
+      super(x, y, tx*32, ty*32)
+      @classes = in_classes
+      @grid = Array.new(tx) { Array.new(ty) }
+      @bg = Core.sprite("gui/container_background")
+      @tile = Core.sprite("gui/tile_32")
+      @hl = Core.sprite("gui/tile_32_highlight")
+      @selected = nil
+      @highlight = nil
+      @hovered = nil
+    end
+    
+    def update
+      if Core.mouse_inside?(@x+@xoff, @y+@yoff, @x+@xoff+@w, @y+@yoff+@h)
+        if Core.window.pressed?(Gosu::MsLeft)
+          @highlight = mouse_to_tile(Core.window.mouse_x, Core.window.mouse_y)
+          @selected = get_at(@highlight.x, @highlight.y)
+        else
+          @hovered = mouse_to_tile(Core.window.mouse_x, Core.window.mouse_y)
+        end
+      else
+        @hovered = nil
+        if Core.window.button_down?(Gosu::MsLeft)
+          @selected = nil
+          @highlight = nil
+        end
+      end
+    end
+    
+    def draw
+      x = @x + @xoff
+      y = @y + @yoff
+      @bg.draw(x, y, Core::GUI_Z + @zoff, @w/@bg.width.to_f, @h/@bg.height.to_f)
+      @grid.each { |col|
+        col.each { |tile|
+          tile.icon.draw(x, y, Core::GUI_Z + @zoff + 1) if tile
+          @tile.draw(x, y, Core::GUI_Z + @zoff + 1)
+          y += 32
+        }
+        x += 32
+        y = @y + @yoff
+      }
+      if @selected and @highlight
+        @hl.draw(@x+@xoff+@highlight.x*32, @y+@yoff+@highlight.y*32, Core::GUI_Z + @zoff + 2)
+      end
+      if @hovered and (!@highlight or !(@hovered.x == @highlight.x and @hovered.y == @highlight.y))
+        @hl.draw(@x+@xoff+@hovered.x*32, @y+@yoff+@hovered.y*32, Core::GUI_Z + @zoff + 2)
+      end
+    end
+    
+    # Adds obj to the grid at the next free position
+    # Returns the position where obj was inserted
+    def add(obj)
+      if @classes.include?(obj.class)
+        x = 0
+        @grid.each { |col|
+          y = 0
+          col.each { |tile|
+            if tile == nil
+              @grid[x][y] = obj
+              return [x, y]
+            end
+            y += 1
+          }
+          x += 1
+        }
+      end
+      return [0, 0]
+    end
+    
+    # Adds obj at the given position, overwriting any other value
+    # Calls add() if the given position is invalid
+    def add_at(obj, tx, ty)
+      if @classes.include?(obj.class)
+        @grid[tx][ty] = obj
+      end
+    rescue NoMethodError
+      warn("WARNING: Tried to insert element at invalid index (#{obj}, #{tx}|#{ty})")
+      add(obj)
+    end
+    
+    def get_at(tx, ty)
+      return @grid[tx][ty]
+    rescue NoMethodError
+      return nil
+    end
+    
+    def mouse_to_tile(mx, my)
+      x = (mx - @x - @xoff).to_i / 32
+      y = (my - @y - @yoff).to_i / 32
+      return [x, y]
+    end
+    
+    def empty?
+      @grid.each { |col|
+        col.each { |tile|
+          return false if tile
+        }
+      }
+      return true
+    end
+    
+    def clear
+      @grid = Array.new(@w/32) { Array.new(@h/32) }
+    end
+    
+  end
+  
+end