essytas 0.0.1

data/lib/states/menus/equip.rb

@@ -0,0 +1,79 @@
+
+module Core::States
+  
+  class EquipMenu < State
+    include Core::GUI
+    include Core
+    def initialize(window, previous, party)
+      super(window)
+      @previous = previous
+      @party = party
+      @background = Core.sprite("menu/ingame_background")
+      @w = Core::GUI::Window.new(0, 0, 1024, 768, Trans.menu(:equipment))
+      @w.add(:charselect, CharSelector.new(32, 32, party))
+      @w.add(:inventory, Inventory.new(32, 96, 256, 360, @party.members[@w.get(:charselect).index], [:pants, :melee, :armor, :cloth, :ranged, :boots, :ammo]))
+      @w.add(:iteminfo, ItemInfo.new(320, 32))
+      @w.add(:itemdrop, ImageButton.new(32, 464, "gui/drop_item", lambda { drop_item }, 96, 96))
+      @w.get(:itemdrop).disable
+      @w.add(:equip, CharEquip.new(320, 224, @party.members[0]))
+    end
+    def update
+      super
+      if @window.pressed?(Gosu::KbEscape) or @w.remove?
+        @window.advance(@previous)
+      end
+      @w.update
+      if @w.get(:charselect).changed?
+        @w.get(:inventory).inventory = @party.members[@w.get(:charselect).index].inventory
+        @w.get(:iteminfo).item = nil
+        @w.get(:itemdrop).disable
+        @w.get(:equip).char = @party.members[@w.get(:charselect).index]
+        @w.get(:equip).reset_slots
+        @cursor.clear
+      end
+      if @w.get(:inventory).changed?
+        @w.get(:iteminfo).item = @w.get(:inventory).selected
+        @w.get(:itemdrop).enable
+        ary = Core::Game.itemtype_to_locations(@w.get(:inventory).selected.type, @party.members[@w.get(:charselect).index].equipment)
+        @w.get(:equip).highlight_slots(ary)
+        @cursor.attach(@w.get(:inventory).selected.icon)
+      end
+      if @w.get(:equip).changed?
+        @w.get(:inventory).assemble_items
+        ary = Core::Game.itemtype_to_locations(@w.get(:inventory).selected.type, @party.members[@w.get(:charselect).index].equipment)
+        @w.get(:equip).reset_slots
+        if !@cursor.empty?
+          @w.get(:equip).highlight_slots(ary)
+        end
+        @w.get(:equip).setup_equipment
+      end
+      if @w.get(:equip).equip?
+        loc = @w.get(:equip).slot
+        inv = @party.members[@w.get(:charselect).index].inventory
+        equip = @party.members[@w.get(:charselect).index].equipment
+        equip.equip(@w.get(:inventory).selected, loc, inv)
+        @w.get(:iteminfo).item = nil
+        @w.get(:itemdrop).disable
+        @w.get(:equip).reset_slots
+        @w.get(:equip).setup_equipment
+        @w.get(:inventory).assemble_items
+        @cursor.clear
+      end
+    end
+    def draw
+      @background.draw(0, 0, 0)
+      @w.draw
+      draw_cursor
+    end
+    # TODO ask for amount, right now it drops only one
+    def drop_item
+      @party.members[@w.get(:charselect).index].inventory.remove(@w.get(:inventory).selected)
+      @w.get(:inventory).assemble_items
+      @w.get(:iteminfo).item = nil
+      @cursor.clear
+      @w.get(:equip).reset_slots
+      @w.get(:itemdrop).disable
+    end
+  end
+  
+end

data/lib/states/menus/ingame.rb

@@ -0,0 +1,34 @@
+
+module Core::States
+  
+  class IngameMenu < State
+    include Core::GUI
+    include Core
+    def initialize(window, party)
+      super(window)
+      @background = Core.sprite("menu/ingame_background")
+      @w = Core::GUI::Window.new(0, 0, 1024, 768, Trans.menu(:menu))
+      @w.add(:items, Button.new(32, 32, 224, 32, Trans.menu(:items), lambda {}))
+      @w.add(:equip, Button.new(32, 96, 224, 32, Trans.menu(:equipment), lambda { @window.advance(EquipMenu.new(@window, self, party)) }))
+      @w.add(:skills, Button.new(32, 160, 224, 32, Trans.menu(:skills), lambda {}))
+      @w.add(:alchemy, Button.new(32, 224, 224, 32, Trans.menu(:botany), lambda { @window.advance(AlchemyMenu.new(@window, self, party)) }))
+      @w.add(:magic, Button.new(32, 284, 224, 32, Trans.menu(:magic), lambda { @window.advance(MagicMenu.new(@window, self, party)) }))
+      @w.add(:save, Button.new(32, 552, 224, 32, Trans.menu(:save), lambda { Core.save_game }))
+      @w.add(:load, Button.new(32, 616, 224, 32, Trans.menu(:load), lambda { Core.load_game }))
+      @w.add(:options, Button.new(32, 680, 224, 32, Trans.menu(:options), lambda {}))
+    end
+    def update
+      if @window.pressed?(Gosu::KbEscape) or @w.remove?
+        @window.load
+      end
+      update_cursor
+      @w.update
+    end
+    def draw
+      @background.draw(0, 0, 0)
+      @w.draw
+      draw_cursor
+    end
+  end
+  
+end

data/lib/states/menus/magic.rb

@@ -0,0 +1,31 @@
+
+module Core::States
+  
+  class MagicMenu < State
+    include Core::GUI
+    include Core
+    def initialize(window, previous, party)
+      super(window)
+      @previous = previous
+      @party = party
+      @background = Core.sprite("menu/ingame_background")
+      @w = Core::GUI::Window.new(0, 0, 1024, 768, Trans.menu(:magic))
+      @w.add(:charselect, CharSelector.new(32, 32, party))
+    end
+    def update
+      super
+      if @window.pressed?(Gosu::KbEscape) or @w.remove?
+        @window.advance(@previous)
+      end
+      @w.update
+      if @w.get(:charselect).changed?
+      end
+    end
+    def draw
+      @background.draw(0, 0, 0)
+      @w.draw
+      draw_cursor
+    end
+  end
+  
+end

data/lib/states/menus/options.rb

@@ -0,0 +1,54 @@
+
+module Core::States
+    
+  class OptionMenu < State
+    include Core::GUI
+    include Core
+    def initialize(window)
+      super(window)
+      @background = Core.sprite("menu/ingame_background")
+      @restart = false
+      @w = Core::GUI::Window.new(0, 0, 1024, 768, Trans.menu(:options))
+      @w.add(:details, Window.new(288, 56, 704, 128, Trans.menu(:options_details), false, "gui/options_details"))
+      @w.add(:language, Button.new(32, 32, 224, 32, Trans.menu(:language), lambda {swap(:language)}, true, :left))
+      @w.add(:volume, Button.new(32, 80, 224, 32, Trans.menu(:volume), lambda {swap(:volume)}, true, :left))
+    end
+    def swap(sym)
+      detail = @w[:details]
+      detail.empty
+      case sym
+      when :language
+        detail.add(:en, Button.new(16, 16, 96, 24, Trans.menu(:lang_english), lambda {language(:en)}, true, :left))
+        detail.add(:de, Button.new(16, 48, 96, 24, Trans.menu(:lang_german), lambda {language(:de)}, true, :left))
+        detail[Core.config[:language].to_sym].disable
+      when :volume
+        detail.add(:slider, Slider.new(16, 16, 128, 32))
+      end
+    end
+    def language(sym)
+      Core.config[:language] = sym.to_s
+      swap(:language)
+      @restart = true
+    end
+    def update
+      if @window.pressed?(Gosu::KbEscape) or @w.remove?
+        if @restart
+          Core.exit(0)
+        else
+          Core.window.advance(StartMenu.new(Core.window))
+        end
+      end
+      @w.update
+      if @restart and !@w[:details].include?(:warning)
+        @w[:details].add(:warning, Textfield.new(384, 16, 320, 96, Trans.menu(:restart_warning)))
+      end
+      update_cursor
+    end
+    def draw
+      @background.draw(0, 0, 0)
+      @w.draw
+      draw_cursor
+    end
+  end
+  
+end

data/lib/states/menus/start.rb

@@ -0,0 +1,38 @@
+
+module Core::States
+  
+  class StartMenu < State
+    
+    include Core
+
+    def initialize(window)
+      super(window)
+      @background = Core.sprite("menu/start_background") # FIXME use window background
+      @w = Core::GUI::Window.new(0, 0, 1024, 768, Trans.menu(:titlescreen_title), false)
+      @w.add(:newgame, Core::GUI::Button.new(160, 544, 256, 64, Trans.menu(:newgame), lambda { Core.window.advance(GameState.new(Core.window)); @song.stop }, false))
+      #@w.add(:loadgame, Core::GUI::Button.new(608, 544, 256, 64, Trans.menu(:loadgame), lambda { Core.window.advance(LoadMenu.new(Core.window)) }, false))
+      @w.add(:loadgame, Core::GUI::Button.new(608, 544, 256, 64, Trans.menu(:loadgame), lambda { Core.load_game }))
+      @w.add(:options, Core::GUI::Button.new(160, 640, 256, 64, Trans.menu(:options), lambda { Core.window.advance(OptionMenu.new(Core.window)) }, false))
+      @w.add(:update, Core::GUI::Button.new(608, 640, 256, 64, Trans.menu(:update), lambda { Core.window.advance(UpdateMenu.new(Core.window)) }, false))
+      @leaves = Core::Particles.new(:title_leaves, 512, 0)
+      @song = Core::Song.new("Greendjohn - Rebirth")
+      @song.play(true)
+      @w.get(:loadgame).disable if Dir.entries("#{Core::SAVE_DIR}").join == "..."
+    end
+
+    def update
+      update_cursor
+      @w.update
+      @leaves.update
+    end
+
+    def draw
+      @background.draw(0, 0, 0)
+      @w.draw
+      @leaves.draw
+      draw_cursor
+    end
+
+  end
+  
+end

data/lib/states/states.rb

@@ -0,0 +1,154 @@
+
+# Superclass for game states
+
+require_relative "../cursor.rb"
+
+module Core::States
+  
+  # Skeleton for game states
+  # 
+  # Provides a cursor
+  class State
+    attr_reader :window, :x, :y
+    def initialize(window)
+      @window = Core.window = window
+      @x = @y = 0
+      @cursor = Core::Cursor.new
+    end
+    def update
+      update_cursor
+    end
+    def update_cursor
+      @x, @y = @window.mouse_x, @window.mouse_y
+      @cursor.update(@x, @y)
+    end
+    def draw
+      draw_cursor
+    end
+    def draw_cursor
+      @cursor.draw
+    end
+    def finish
+    end
+  end
+  
+  require_relative "../game/map/map_loader.rb"
+  require_relative "../game/map/events.rb"
+  require_relative "../game/party.rb"
+  require_relative "../game/osd/magic.rb"
+  # Runs the map and basic game logic
+  class GameState < State
+    
+    attr_reader :map, :party, :osd
+    
+    def initialize(window)
+      super(window)
+      Core.window.state = self
+      Core::Game.items = Core::Parse.items
+      Core::Game.skills = Core::Parse.skills
+      Core::Game.spells = Core::Parse.spells
+      Core::Game.weapons = Core::Parse.weapons
+      Core::Game.enemies = Core::Parse.enemies # needs the weapons
+      Core::Game.characters = Core::Parse.characters
+      Core::Game::Alchemy.recipies = Core::Parse.recipies
+      Core::Trans.parse_items
+      Core::Trans.parse_skills
+      Core::Trans.parse_spells
+      Core::Trans.parse_dialogues
+      Core::Trans.parse_enemies
+      @party = Core::Game::Party.new
+      @map = Core::Game::MapLoader.new
+      @map.load("test") # TODO fetch from init.def
+      @setup = false
+      @context = nil
+      @osd = {}
+    end
+    
+    def update
+      if @window.pressed?(Gosu::KbEscape)
+        @window.save
+        @window.advance(IngameMenu.new(Core.window, @party))
+        return
+      end
+      if @window.pressed?(Gosu::MsRight) and @context ? !Core.inside?(@window.mouse_x, @window.mouse_y, @context.x, @context.y, @context.x+@context.w, @context.y+@context.h) : true
+        obj = find_object(@window.mouse_x.to_i - @map.xoff, @window.mouse_y.to_i - @map.yoff)
+        @context = Core::GUI::ContextMenu.new(@window.mouse_x, @window.mouse_y, obj)
+      end
+      if @context
+        @context.update
+        # TODO fade context menu
+        if (@window.pressed?(Gosu::MsLeft) and !Core.inside?(@window.mouse_x, @window.mouse_y, @context.x, @context.y, @context.x+@context.w, @context.y+@context.h)) or @context.remove?
+          #@context.fade
+          @context = nil
+        end
+        #if @context.faded?
+        #end
+      end
+      @party.update
+      @map.update
+      @osd.each_value { |w|
+        w.update
+        if w.remove?
+          @osd.delete(@osd.key(w))
+        end
+      }
+      update_cursor
+      @window.unpress
+      @setup = true
+      #battle([Core::Game.enemies.first], "white_ties_grass", Core::Game::Combat::Control.new(:test))
+    end
+    
+    def draw
+      @map.draw
+      @osd.each_value { |w|
+        w.draw
+      }
+      @context.draw if @context
+      draw_cursor
+    end
+    
+    # Looks for an objects on the current map at the given screen coordinates
+    # 
+    # Returns +nil+ if nothing was found
+    def find_object(x, y)
+      #puts("looking for object at #{x/32}|#{y/32} (#{x}|#{y})")
+      @map.objects.each { |obj|
+        if obj.x/32 == x/32 and obj.y/32 == y/32
+          #puts("found #{obj.inspect}")
+          return obj
+        end
+      }
+      return nil
+    end
+    
+    def player
+      @map.objects.each { |obj|
+        if obj.class == Core::Game::Player
+          return obj
+        end
+      }
+    end
+    
+    def battle(enemies, bg, ctrl)
+      Core.window.save
+      Core.window.advance(BattleState.new(@party, enemies, bg, ctrl))
+    end
+    
+  end
+  
+  class BattleState < State
+    def initialize(party, enemies, bg, ctrl)
+      super(Core.window)
+      @battle = Core::Game::Combat::Battle.new(party, enemies, bg, ctrl)
+    end
+    def update
+      super
+      @battle.update
+    end
+    def draw
+      super
+      @battle.draw
+    end
+  end
+  
+end

data/lib/tileset.rb

@@ -0,0 +1,42 @@
+
+require_relative "game/map/tile.rb"
+
+module Core
+  class Tileset
+    @@tilesets = {}
+    attr_reader :first, :name, :tiles, :props, :filename
+    def initialize(fgid, name, filename, props)
+      @first = fgid
+      @name = name
+      if !@@tilesets[filename]
+        @@tilesets[filename] = Gosu::Image.load_tiles(Core.window, "#{Core::LIBRARY_PATH}/#{filename}", 32, 32, true)
+      end
+      @tiles = @@tilesets[filename].dup
+      @props = props
+      @props.default = {}
+      @filename = filename
+      @filled = []
+    end
+    def create_tiles
+      @filled = []
+      i = 0
+      @tiles.each { |tile|
+        @filled.push(Core::Game::Tile.new(tile, 0, 0, 0, @props[i]))
+        i += 1
+      }
+      return @filled
+    end
+    def tile(gid, x, y, z)
+      if gid < 0
+        return nil
+      end
+      if @filled.empty?
+        create_tiles
+      end
+      tile = @filled[gid].dup
+      tile.x, tile.y = x, y
+      tile.z = z
+      return tile
+    end
+  end
+end

data/lib/tools/world.rb

@@ -0,0 +1,103 @@
+
+# This is kind of a database and not actually used by the game
+# Usage: ruby world.rb [tag 1] ... [tag n]
+# Returns all objects that have ALL of the given tags
+# If no arguments are given, returns all objects
+
+require 'rubygems'
+require 'awesome_print'
+
+module World
+
+  class WorldObject
+    attr_reader :name, :tags, :desc
+    def initialize(name, tags, desc='')
+      @name = name
+      @tags = tags
+      @desc = desc
+    end
+  end
+
+  @objects = []
+
+  def self.add(being)
+    @objects.push(being)
+  end
+
+  def self.setup(beings)
+    beings.each do |ary|
+      add(WorldObject.new(ary[0], ary[1], ary[2]))
+    end
+  end
+
+  def self.find_name(name)
+    @objects.each do |being|
+      return being if being.name == name
+    end
+  end
+
+  def self.find_tag(tag)
+    beings = []
+    @objects.each do |being|
+      beings.push(being) if being.tags.include?(tag)
+    end
+    return beings
+  end
+
+  def self.find_tags(tags)
+    return @objects if tags.empty?
+    beings = []
+    return @objects if tags.empty?
+    @objects.each do |being|
+      new = tags.clone
+      new.delete_if { |t| being.tags.include?(t) }
+      beings.push(being) if new.empty?
+    end
+    return beings
+  end
+
+end
+
+animals = [
+  ['Wolf', [:animal, :wild, :forest, :plains, :mountain], 'desc'],
+  ['Brown bear', [:animal, :wild, :aggressive, :forest, :mountain, :nocturnal], 'http://en.wikipedia.org/wiki/Brown_Bear'],
+  ['Deer', [:animal, :wild, :plains, :forest, :mountain], 'http://en.wikipedia.org/wiki/Deer'],
+  ['Rabbit', [:animal, :wild, :hunted, :small, :plains, :forest], 'desc'],
+  ['Crow', [:animal, :bird, :plains, :forest, :wild], 'desc'],
+  ['Lynx', [:animal, :wild, :forest, :nocturnal], 'http://en.wikipedia.org/wiki/Eurasian_Lynx'],
+  ['Wild boar', [:animal, :wild, :aggressive, :forest], 'http://en.wikipedia.org/wiki/Wild_boar'],
+  ['Roe deer', [:animal, :wild, :forest, :plains, :hunted], 'http://en.wikipedia.org/wiki/Roe_Deer'],
+  ['name', [], 'desc'],
+  ['name', [], 'desc'],
+  ['name', [], 'desc'],
+  ['name', [], 'desc'],
+  ['name', [], 'desc'],
+  ['name', [], 'desc'],
+  ['name', [], 'desc'],
+  ['name', [], 'desc'],
+  ['name', [], 'desc'],
+  ['name', [], 'desc'],
+  ['name', [], 'desc'],
+  ['name', [], 'desc'],
+  ['name', [], 'desc'],
+  ['name', [], 'desc'],
+  ['name', [], 'desc'],
+  ['name', [], 'desc'],
+  ['name', [], 'desc'],
+  ['name', [], 'desc'],
+  ['name', [], 'desc'],
+  ['name', [], 'desc'],
+  ['name', [], 'desc'],
+]
+
+plants = [
+  ['name', [], 'desc'],
+]
+
+places = [
+  ['Alduro', [:village, :forest], 'desc'],
+  ['Japyrol', [:city, :forest], 'desc'],
+]
+
+World.setup(animals + plants + places)
+ap World.find_tags(ARGV.map(&:to_sym))