delve 0.0.7

data/lib/delve/widgets/text.rb

@@ -0,0 +1,37 @@
+class TextWidget
+  def initialize(x, y, text)
+    raise 'Cannot initialize text widget when x is nil' unless x
+    raise 'Cannot initialize text widget when y is nil' unless y
+    raise 'Cannot initialize text widget when text is nil' unless text
+
+    @x = x
+    @y = y
+    @text = text
+  end
+
+  def draw(display)
+    raise 'Cannot draw text when display is nil' unless display
+
+    x = determine_x(display)
+    y = determine_y(display)
+    @text.each_char do |c|
+      display.draw x, y, c
+      x += 1
+    end
+  end
+
+  private
+  def determine_x display
+    if @x == :center
+      return (display.width / 2.0).ceil - (@text.length / 2.0).floor
+    end
+    @x
+  end
+
+  def determine_y display
+    if @y == :center
+      return ((display.height / 2.0).ceil)
+    end
+    @y
+  end
+end

data/lib/delve/widgets/viewport.rb

@@ -0,0 +1,67 @@
+class ViewportWidget
+  def initialize(x, y, width, height, world)
+    raise 'Cannot initialize text widget when x is nil' unless x
+    raise 'Cannot initialize text widget when y is nil' unless y
+    raise 'Cannot initialize text widget when width is nil' unless width
+    raise 'Cannot initialize text widget when height is nil' unless height
+    raise 'Cannot initialize text widget when text is nil' unless world
+
+    @x = x
+    @y = y
+    @width = width
+    @height = height
+    @world = world
+    @rx = 0
+    @ry = 0
+  end
+
+  def width
+    @width
+  end
+
+  def height
+    @height
+  end
+
+  def focus(x, y)
+    raise 'Cannot focus viewport out of world' if x < 0 || y < 0 || x >= @world.width || y >= @world.height
+
+    @rx = x - (@width/2).floor
+    @ry = y - (@height/2).floor
+
+    @rx = 0 if @rx < 0
+    @ry = 0 if @ry < 0
+    
+    far_east = @world.width - @width
+    far_south = @world.height - @height
+    @rx = far_east if @rx > far_east
+    @ry = far_south if @ry > far_south
+  end
+
+  def draw(display)
+    raise 'Cannot draw text when display is nil' unless display
+
+    dx = 0
+    (@x..(@x+@width-1)).each do |x|
+      dy = 0
+      (@y..(@y+@height-1)).each do |y|
+        tile = @world.at(@rx+dx, @ry+dy)
+        tile = { :char => '?', :color => :red } unless tile
+
+        if tile.respond_to?(:has?)
+          symbol = tile.get(:symbol).symbol
+          symbol[:walkable] = tile.get(:walkable).walkable
+          tile = symbol
+        end
+
+        display.draw x, y, tile[:char], tile[:color]
+        dy += 1
+      end
+      dx += 1
+    end
+  end
+
+  def top_left
+    { x: @rx, y: @ry }
+  end
+end

data/rot.js.LICENSE

@@ -0,0 +1,25 @@
+Copyright (c) 2012-now(), Ondrej Zara
+All rights reserved.
+
+Redistribution and use in source and binary forms, with or without modification, 
+are permitted provided that the following conditions are met:
+
+  * Redistributions of source code must retain the above copyright notice, 
+    this list of conditions and the following disclaimer.
+  * Redistributions in binary form must reproduce the above copyright notice, 
+    this list of conditions and the following disclaimer in the documentation 
+    and/or other materials provided with the distribution.
+  * Neither the name of Ondrej Zara nor the names of its contributors may be used 
+    to endorse or promote products derived from this software without specific 
+    prior written permission.
+      
+THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND 
+ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED 
+WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 
+IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, 
+INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, 
+BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 
+DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY 
+OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING 
+NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, 
+EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

data/templates/Gemfile.erb

@@ -0,0 +1,4 @@
+source 'https://rubygems.org'
+
+# Specify your gem's dependencies in <%= @name %>.gemspec
+gemspec

data/templates/README.md.erb

@@ -0,0 +1,22 @@
+## <%= @name.upcase %>
+
+TODO: Write a game description
+
+## Installation
+
+Add this line to your application's Gemfile:
+
+    gem '<%= @name %>'
+
+And then execute:
+
+    $ bundle
+
+Or install it yourself as:
+
+    $ gem install <%= @name %>
+
+## Usage
+
+TODO: Write usage instructions here
+

data/templates/binfile.erb

@@ -0,0 +1,21 @@
+#!/usr/bin/env ruby
+require 'delve/display/curses_renderer'
+require '<%= @renderer_import %>'
+require 'delve/display/display'
+require 'delve/input/input'
+require '<%= @input_import %>'
+require 'delve/screen_manager'
+require 'delve/game'
+
+require '<%= @name %>/screens/title'
+
+display = Display.new <%= @new_renderer_statement %>
+screen_manager = ScreenManager.new
+title_screen = TitleScreen.new screen_manager
+screen_manager.push_screen title_screen
+input = Input.new <%= @new_input_statement %>
+
+game = Game.new display, screen_manager, input
+game.start
+
+display.exit

data/templates/game_screen.rb.erb

@@ -0,0 +1,51 @@
+require 'delve/widgets/border'
+require 'delve/widgets/viewport'
+
+class GameScreen
+
+  def initialize(world, player, screen_manager)
+    @world = world
+    @manager = screen_manager
+    @player = player
+    @boundary = nil
+    @game_border = nil
+    @viewport = nil
+
+    @world.add_entity @player
+  end
+
+  def render(display)
+    @boundary ||= BorderWidget.new(0, 0, display.width, display.height)
+    @game_border ||= BorderWidget.new(0, 0, display.width - 25, display.height, '<%= @name %>', :white, :black)
+    @viewport ||= ViewportWidget.new 2, 1, display.width - 28, display.height - 2, @world
+
+    @boundary.draw display
+    @game_border.draw display
+
+    x = @player.get(:position).x
+    y = @player.get(:position).y
+    @viewport.focus(x, y)
+    @viewport.draw display
+  end
+
+  def partial?
+    false
+  end
+
+  def update(input)
+    input = input.wait_for_input
+    move = @player.get(:movement)
+
+    move.north if input == 'k'
+    move.south if input == 'j'
+    move.east if input == 'l'
+    move.west if input == 'h'
+    move.north_east if input == 'u'
+    move.north_west if input == 'y'
+    move.south_east if input == 'n'
+    move.south_west if input == 'b'
+
+    input == 'x'
+  end
+
+end

data/templates/gemspec.erb

@@ -0,0 +1,27 @@
+# coding: utf-8
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+
+Gem::Specification.new do |spec|
+  spec.name          = "<%= @name %>"
+  spec.version       = '0.0.1'
+  spec.authors       = ["roguelike-developer"]
+  spec.description   = %q{A roguelike named <%= @name %>}
+  spec.summary       = %q{<%= @name %>}
+
+  spec.files         = %w(
+bin/<%= @name %>
+lib/<%= @name %>/world.rb
+lib/<%= @name %>/factory/player.rb
+lib/<%= @name %>/screens/game.rb
+lib/<%= @name %>/screens/loading.rb
+lib/<%= @name %>/screens/title.rb
+  )
+  spec.executables   = spec.files.grep(%r{^bin/}) { |f| File.basename(f) }
+  spec.require_paths = ["lib"]
+
+  spec.add_development_dependency "bundler"
+  spec.add_development_dependency "rake"
+  spec.add_runtime_dependency     "delve"
+end
+

data/templates/loading_screen.rb.erb

@@ -0,0 +1,46 @@
+require 'delve/widgets/text'
+require '<%= @generator_import %>'
+
+require '<%= @name %>/world'
+require '<%= @name %>/factory/player'
+require '<%= @name %>/screens/game'
+
+class LoadingScreen
+
+  def initialize(screen_manager)
+    @manager = screen_manager
+    @text = TextWidget.new :center, :center, 'Creating world (this may take a while)'
+    @player_factory = PlayerFactory.new
+    @player = nil
+    @world = nil
+  end
+
+  def render(display)
+    @text.draw display
+  end
+
+  def partial?
+    false
+  end
+
+  def update(input)
+    @world = World.new(<%= @new_generator %>)
+    @player = @player_factory.create @world
+    @manager.push_screen GameScreen.new(@world, @player, @manager)
+    false
+  end
+
+  private
+  def randomize_player_location
+    rx = (rand * @world.width).floor
+    ry = (rand * @world.height).floor
+
+    while !@world.free(rx, ry)
+      rx = (rand * @world.width).floor
+      ry = (rand * @world.height).floor
+    end
+
+    @player.get(:position).set(rx, ry)
+  end
+
+end

data/templates/player_factory.rb.erb

@@ -0,0 +1,19 @@
+require 'delve/entity'
+require 'delve/component/position'
+require 'delve/component/movement'
+require 'delve/component/symbol'
+require 'delve/component/collision'
+
+class PlayerFactory
+
+  def create(world)
+    player = Entity.new
+    player.add PositionComponent.new(player)
+    player.add CollisionComponent.new(player, world)
+    player.add MovementComponent.new(player, :eightway)
+    player.add SymbolComponent.new(player, '@')
+    player
+  end
+
+end
+

data/templates/title_screen.rb.erb

@@ -0,0 +1,42 @@
+require 'delve/widgets/menu'
+require 'delve/widgets/text'
+
+require '<%= @name %>/screens/loading'
+
+class TitleScreen
+
+  def initialize(screen_manager)
+    @title = TextWidget.new :center, 1, '<%= @name %> - the roguelike'
+    
+    @menu = MenuWidget.new 1, 15, {
+      'n' => 'New game',
+      'x' => 'Exit'
+    }
+    @manager = screen_manager
+  end
+
+  def render(display)
+    @title.draw display
+    @menu.draw display
+  end
+
+  def partial?
+    false
+  end
+
+  def update(input)
+    input = input.wait_for_input
+
+    @menu.next if input == :down_arrow
+    @menu.prev if input == :up_arrow
+
+    @menu.select(input)
+
+    if @menu.selected_item == 'New game'
+      @manager.push_screen LoadingScreen.new(@manager)
+    end
+
+    @menu.selected_item == 'Exit'
+  end
+
+end

data/templates/world.rb.erb

@@ -0,0 +1,63 @@
+class World
+
+  def initialize(generator)
+    raise 'Cannot create world when generator is nil' unless generator
+
+    @world = Hash.new
+    @entities = Array.new
+    @width = generator.width
+    @height = generator.height
+    generator.generate do |x, y, height|
+      @world[key_for(x.floor, y.floor)] = tile_for_height(height)
+    end
+  end
+
+  def at(x, y)
+    key = key_for(x, y)
+    # This is super inefficient
+    found = @entities.select { |e| e.get(:position).x == x and e.get(:position).y == y }
+    entity = found.first
+    if entity and entity.has?(:symbol)
+      return entity.get(:symbol).symbol
+    else
+      return @world[key_for(x, y)]
+    end
+  end
+
+  def entities
+    @entities
+  end
+
+  def add_entity(entity)
+    raise 'Cannot add entity that doesnt have a position' unless entity.has? :position
+    @entities << entity
+  end
+
+  def width
+    @width
+  end
+
+  def height
+    @height
+  end
+
+  def free(x, y)
+    at(x, y)[:walkable]
+  end
+
+  private
+  def key_for(x, y)
+    "#{x},#{y}"
+  end
+
+  def tile_for_height(height)
+    v = (height).floor
+    t = '.'
+    t = '#' if v == 1
+
+    c = :white
+
+    { char: t, color: c, walkable: (t == '.') }
+  end
+
+end

data/test/component/collision_test.rb

@@ -0,0 +1,39 @@
+require 'minitest'
+require 'minitest/autorun'
+require 'delve/component/collision'
+require 'mocha/setup'
+
+class CollisionComponentTest < Minitest::Test
+
+  def setup
+    @parent = mock('object')
+    @detector = mock('object')
+    @collision = CollisionComponent.new @parent, @detector
+  end
+
+  def test_initialize_component_with_nil_parent_fails
+    assert_raises RuntimeError do
+      CollisionComponent.new nil, @detector
+    end
+  end
+
+  def test_initialize_component_with_nil_world_fails
+    assert_raises RuntimeError do
+      CollisionComponent.new @parent, nil
+    end
+  end
+
+  def test_id
+    assert_equal :collision, @collision.id
+  end
+
+  def test_free_returns_true_if_world_tile_is_free
+    @detector.expects(:free).with(1, 2).returns(true)
+    assert @collision.free?(1, 2)
+  end
+
+  def test_free_returns_false_if_world_tile_is_not_free
+    @detector.expects(:free).with(2, 1).returns(false)
+    assert !@collision.free?(2, 1)
+  end
+end