text2048 0.1.0

data/lib/text2048/curses_view.rb

@@ -0,0 +1,123 @@
+# encoding: utf-8
+
+require 'curses'
+require 'text2048/curses_tile'
+
+module Text2048
+  # Curses UI
+  class CursesView
+    include Curses
+
+    COLORS = {
+      0 => COLOR_BLACK,
+      2 => COLOR_WHITE,
+      4 => COLOR_GREEN,
+      8 => COLOR_GREEN,
+      16 => COLOR_CYAN,
+      32 => COLOR_CYAN,
+      64 => COLOR_BLUE,
+      128 => COLOR_BLUE,
+      256 => COLOR_YELLOW,
+      512 => COLOR_YELLOW,
+      1024 => COLOR_MAGENTA,
+      2048 => COLOR_RED
+    }
+
+    def initialize
+      @tiles = Array.new(4) { Array.new(4) }
+      @scale = 2
+      @scale_min = 1
+      @scale_step = 0.5
+    end
+
+    def start
+      init_screen
+      curs_set(0)
+      start_color
+      stdscr.keypad(true)
+      noecho
+      init_color_pairs
+      at_exit { close_screen }
+    end
+
+    def update(tiles, score)
+      draw_score(score)
+      tiles.each_with_index do |row, y|
+        draw_row(row, y)
+      end
+    end
+
+    def larger!(tiles, score)
+      return if @scale > scale_max
+      @scale += @scale_step
+      clear
+      update(tiles, score)
+    end
+
+    def smaller!(tiles, score)
+      return if @scale <= @scale_min
+      @scale -= @scale_step
+      clear
+      update(tiles, score)
+    end
+
+    def pop_tiles(list)
+      list.each do |y, x|
+        attron(color_pair(@tiles[y][x].color + 100)) do
+          @tiles[y][x].pop1
+        end
+      end
+      refresh
+      sleep 0.1
+
+      list.each do |y, x|
+        @tiles[y][x].pop2
+      end
+    end
+
+    def zoom_tiles(list)
+      [:zoom1, :zoom2, :zoom3].each do |each|
+        list.each do |y, x|
+          @tiles[y][x].__send__ each
+        end
+        sleep 0.05
+      end
+    end
+
+    def game_over
+      width = (@tiles[0][0].width + 1) * 4 + 1
+      height = (@tiles[0][0].height + 1) * 4 + 2
+
+      setpos(height / 2, width / 2 - 4)
+      attron(color_pair(COLOR_RED)) { addstr('GAME OVER') }
+    end
+
+    private
+
+    def init_color_pairs
+      COLORS.each_pair do |_key, value|
+        init_pair value, COLOR_BLACK, value
+        init_pair value + 100, value, value
+      end
+    end
+
+    def scale_max
+      w = (CursesTile::DEFAULT_WIDTH + 1) * 4 + 1
+      h = (CursesTile::DEFAULT_HEIGHT + 1) * 4 + 2
+      (cols - 1) / w < lines / h ? (cols - 1) / w : lines / h
+    end
+
+    def draw_score(score)
+      setpos(0, 0)
+      addstr("Score: #{score}")
+    end
+
+    def draw_row(tiles, y)
+      tiles.each_with_index do |each, x|
+        @tiles[y][x] =
+          CursesTile.new(each, y, x, COLORS[each.to_i], @scale).show
+      end
+      refresh
+    end
+  end
+end

data/lib/text2048/game.rb

@@ -0,0 +1,81 @@
+# encoding: utf-8
+
+require 'forwardable'
+require 'text2048/board'
+
+module Text2048
+  # A class responsible of handling all the command line interface
+  # logic.
+  class Game
+    attr_reader :score
+
+    extend Forwardable
+
+    def initialize(view, tiles = nil)
+      @score = 0
+      @board = Board.new(tiles)
+      @view = view
+    end
+
+    def start
+      @view.start
+    end
+
+    def draw
+      @view.update(@board.tiles, @score)
+      @view.pop_tiles(@board.merged_tiles)
+      @view.zoom_tiles(@board.generated_tiles)
+    end
+
+    def lose?
+      b = @board.dup
+      b.right!
+      b.left!
+      b.up!
+      b.down!
+      b.numbers.size == 4 * 4
+    end
+
+    def input(command)
+      @last = @board.tiles.dup
+      __send__ command
+    end
+
+    def left!
+      @score += @board.left!
+    end
+
+    def right!
+      @score += @board.right!
+    end
+
+    def up!
+      @score += @board.up!
+    end
+
+    def down!
+      @score += @board.down!
+    end
+
+    def generate
+      return if @last == @board.tiles
+      @board.generate
+    end
+
+    def larger!
+      @view.larger!(@board.tiles, @score)
+    end
+
+    def smaller!
+      @view.smaller!(@board.tiles, @score)
+    end
+
+    def game_over
+      @view.game_over
+    end
+
+    def quit
+      exit 0
+    end
+  end
+end

data/lib/text2048/monkey_patch/array/tile.rb

@@ -0,0 +1,30 @@
+# encoding: utf-8
+
+module Text2048
+  module MonkeyPatch
+    module Array
+      # 2048 related methods
+      module Tile
+        def rmerge
+          score = 0
+          tiles = dup
+          (size - 1).downto(1) do |each|
+            if tiles[each - 1] == tiles[each]
+              tiles[each] = Text2048::Tile.new(tiles[each].to_i * 2, :merged)
+              tiles[each - 1] = Text2048::Tile.new(0)
+              score += tiles[each].to_i
+            end
+          end
+          [tiles, score]
+        end
+
+        def rshrink
+          tiles = dup
+          orig_size = tiles.size
+          tiles.select! { |each| each != 0 }
+          ::Array.new(orig_size - tiles.size) { Text2048::Tile.new(0) } + tiles
+        end
+      end
+    end
+  end
+end

data/lib/text2048/monkey_patch/array.rb

@@ -0,0 +1,8 @@
+# encoding: utf-8
+
+require 'text2048/monkey_patch/array/tile'
+
+# Monkey-patched standard Array class.
+class Array
+  include Text2048::MonkeyPatch::Array::Tile
+end

data/lib/text2048/text_view.rb

@@ -0,0 +1,23 @@
+module Text2048
+  # Simple text view.
+  class TextView
+    def initialize(output)
+      @output = output
+    end
+
+    def update(layout, _score)
+      string = layout.map do |row|
+        row.map { |num| num != 0 ? num : '_' }.join(' ')
+      end.join("\n")
+      @output.puts string
+    end
+
+    def pop_tiles(_list)
+      # noop
+    end
+
+    def zoom_tiles(_list)
+      # noop
+    end
+  end
+end

data/lib/text2048/tile.rb

@@ -0,0 +1,23 @@
+# encoding: utf-8
+
+require 'forwardable'
+
+module Text2048
+  # 2048 tile
+  class Tile
+    attr_reader :status
+
+    extend Forwardable
+
+    def initialize(value, status = nil)
+      @value = value.to_i
+      @status = status
+    end
+
+    def ==(other)
+      @value == other.to_i
+    end
+
+    def_delegators :@value, :to_i, :to_s
+  end
+end

data/lib/text2048/tiles.rb

@@ -0,0 +1,32 @@
+# encoding: utf-8
+
+require 'forwardable'
+require 'text2048/monkey_patch/array'
+require 'text2048/tile'
+
+module Text2048
+  # Each row or column of a game board.
+  class Tiles
+    extend Forwardable
+
+    def initialize(list)
+      @list = list.map { |each| Tile.new(each) }
+    end
+
+    def right
+      list, score = @list.rshrink.rmerge
+      [list.rshrink, score]
+    end
+
+    def left
+      list, score = @list.reverse.rshrink.rmerge
+      [list.rshrink.reverse, score]
+    end
+
+    def ==(other)
+      rshrink == other.rshrink
+    end
+
+    def_delegators :@list, :map, :rshrink
+  end
+end

data/lib/text2048/version.rb

@@ -0,0 +1,7 @@
+# encoding: utf-8
+
+# Base module.
+module Text2048
+  # gem version.
+  VERSION = '0.1.0'.freeze
+end

data/lib/text2048.rb

@@ -0,0 +1,4 @@
+require 'text2048/board'
+require 'text2048/curses_view'
+require 'text2048/game'
+require 'text2048/text_view'

data/spec/spec_helper.rb

@@ -0,0 +1,6 @@
+# encoding: utf-8
+
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..', 'lib')
+
+require 'rspec'
+require 'rspec/given'

data/spec/text2048/board_spec.rb

@@ -0,0 +1,74 @@
+require 'text2048'
+
+describe Text2048::Board, '.new' do
+  context 'with no numbers' do
+    Given(:board) do
+      Text2048::Board.new([[0, 0, 0, 0],
+                           [0, 0, 0, 0],
+                           [0, 0, 0, 0],
+                           [0, 0, 0, 0]])
+    end
+
+    describe '#right' do
+      When { board.right! }
+
+      Then do
+        board.layout == [[0, 0, 0, 0],
+                         [0, 0, 0, 0],
+                         [0, 0, 0, 0],
+                         [0, 0, 0, 0]]
+      end
+    end
+  end
+
+  context 'with four 2s' do
+    Given(:board) do
+      Text2048::Board.new([[2, 0, 0, 0],
+                           [0, 2, 0, 0],
+                           [0, 0, 2, 0],
+                           [0, 0, 0, 2]])
+    end
+
+    describe '#right' do
+      When { board.right! }
+
+      Then do
+        board.layout == [[0, 0, 0, 2],
+                         [0, 0, 0, 2],
+                         [0, 0, 0, 2],
+                         [0, 0, 0, 2]]
+      end
+    end
+
+    describe '#==' do
+      When(:result) do
+        board == Text2048::Board.new([[0, 0, 0, 2],
+                                      [0, 0, 2, 0],
+                                      [0, 2, 0, 0],
+                                      [2, 0, 0, 0]])
+      end
+
+      Then { result == true }
+    end
+  end
+
+  context 'with six 2s that can be merged' do
+    Given(:board) do
+      Text2048::Board.new([[2, 0, 2, 0],
+                           [0, 2, 0, 0],
+                           [0, 2, 0, 2],
+                           [0, 0, 0, 2]])
+    end
+
+    describe '#right' do
+      When { board.right! }
+
+      Then do
+        board.layout == [[0, 0, 0, 4],
+                         [0, 0, 0, 2],
+                         [0, 0, 0, 4],
+                         [0, 0, 0, 2]]
+      end
+    end
+  end
+end

data/spec/text2048/tiles_spec.rb

@@ -0,0 +1,115 @@
+# encoding: utf-8
+
+require 'text2048'
+
+describe Text2048::Tiles, '.new' do
+  context 'with [0, 0, 0, 0]' do
+    Given(:tiles) { Text2048::Tiles.new([0, 0, 0, 0]) }
+
+    describe '#right' do
+      When(:result) { tiles.right }
+
+      Then { result[0] == [0, 0, 0, 0] }
+    end
+  end
+
+  context 'with [2, 0, 0, 0]' do
+    Given(:tiles) { Text2048::Tiles.new([2, 0, 0, 0]) }
+
+    describe '#right' do
+      When(:result) { tiles.right }
+
+      Then { result[0] == [0, 0, 0, 2] }
+    end
+  end
+
+  context 'with [0, 2, 0, 0]' do
+    Given(:tiles) { Text2048::Tiles.new([0, 2, 0, 0]) }
+
+    describe '#right' do
+      When(:result) { tiles.right }
+
+      Then { result[0] == [0, 0, 0, 2] }
+    end
+  end
+
+  context 'with [0, 0, 2, 0]' do
+    Given(:tiles) { Text2048::Tiles.new([0, 0, 2, 0]) }
+
+    describe '#right' do
+      When(:result) { tiles.right }
+
+      Then { result[0] == [0, 0, 0, 2] }
+    end
+  end
+
+  context 'with [0, 0, 0, 2]' do
+    Given(:tiles) { Text2048::Tiles.new([0, 0, 0, 2]) }
+
+    describe '#right' do
+      When(:result) { tiles.right }
+
+      Then { result[0] == [0, 0, 0, 2] }
+    end
+  end
+
+  context 'with [2, 2, 0, 0]' do
+    Given(:tiles) { Text2048::Tiles.new([2, 2, 0, 0]) }
+
+    describe '#right' do
+      When(:result) { tiles.right }
+
+      Then { result[0] == [0, 0, 0, 4] }
+    end
+  end
+
+  context 'with [2, 2, 2, 0]' do
+    Given(:tiles) { Text2048::Tiles.new([2, 2, 2, 0]) }
+
+    describe '#right' do
+      When(:result) { tiles.right }
+
+      Then { result[0] == [0, 0, 2, 4] }
+    end
+  end
+
+  context 'with [2, 2, 2, 2]' do
+    Given(:tiles) { Text2048::Tiles.new([2, 2, 2, 2]) }
+
+    describe '#right' do
+      When(:result) { tiles.right }
+
+      Then { result[0] == [0, 0, 4, 4] }
+    end
+  end
+
+  context 'with [4, 4, 2, 2]' do
+    Given(:tiles) { Text2048::Tiles.new([4, 4, 2, 2]) }
+
+    describe '#right' do
+      When(:result) { tiles.right }
+
+      Then { result[0] == [0, 0, 8, 4] }
+    end
+  end
+
+  context 'with [0, 4, 0, 2]' do
+    Given(:tiles) { Text2048::Tiles.new([0, 4, 0, 2]) }
+
+    describe '#right' do
+      When(:result) { tiles.right }
+
+      Then { result[0] == [0, 0, 4, 2] }
+    end
+  end
+
+  context 'with [16, 8, 4, 2]' do
+    Given(:tiles) { Text2048::Tiles.new([16, 8, 4, 2]) }
+
+    describe '#right' do
+      When(:result) { tiles.right }
+
+      Then { result[0] == [16, 8, 4, 2] }
+    end
+  end
+end

data/text2048.gemspec

@@ -0,0 +1,36 @@
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'text2048/version'
+
+Gem::Specification.new do |gem|
+  gem.name = 'text2048'
+  gem.version = Text2048::VERSION
+  gem.summary = 'Text mode 2048 game.'
+  gem.description = 'Text mode 2048 game in Ruby.'
+
+  gem.license = 'GPL3'
+
+  gem.authors = ['Yasuhito Takamiya']
+  gem.email = ['yasuhito@gmail.com']
+  gem.homepage = 'http://github.com/yasuhito/text2048'
+
+  gem.files = %w(LICENSE Rakefile text2048.gemspec)
+  gem.files += Dir.glob('lib/**/*.rb')
+  gem.files += Dir.glob('bin/**/*')
+  gem.files += Dir.glob('spec/**/*')
+
+  gem.executables = ['2048']
+  gem.require_paths = ['lib']
+
+  gem.extra_rdoc_files =
+    [
+      'CONTRIBUTING.md',
+      'README.md',
+      'LICENSE'
+    ]
+  gem.test_files = Dir.glob('spec/**/*')
+  gem.test_files += Dir.glob('features/**/*')
+
+  gem.required_ruby_version = '>= 1.9.3'
+  gem.add_development_dependency 'bundler', '~> 1.6.2'
+end

metadata

@@ -0,0 +1,98 @@
+--- !ruby/object:Gem::Specification
+name: text2048
+version: !ruby/object:Gem::Version
+  version: 0.1.0
+platform: ruby
+authors:
+- Yasuhito Takamiya
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2014-05-02 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: 1.6.2
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: 1.6.2
+description: Text mode 2048 game in Ruby.
+email:
+- yasuhito@gmail.com
+executables:
+- '2048'
+extensions: []
+extra_rdoc_files:
+- CONTRIBUTING.md
+- README.md
+- LICENSE
+files:
+- CONTRIBUTING.md
+- LICENSE
+- README.md
+- Rakefile
+- bin/2048
+- features/move_down.feature
+- features/move_left.feature
+- features/move_right.feature
+- features/move_up.feature
+- features/step_definitions/2048_steps.rb
+- features/support/env.rb
+- lib/text2048.rb
+- lib/text2048/board.rb
+- lib/text2048/curses_tile.rb
+- lib/text2048/curses_view.rb
+- lib/text2048/game.rb
+- lib/text2048/monkey_patch/array.rb
+- lib/text2048/monkey_patch/array/tile.rb
+- lib/text2048/text_view.rb
+- lib/text2048/tile.rb
+- lib/text2048/tiles.rb
+- lib/text2048/version.rb
+- spec/spec_helper.rb
+- spec/text2048/board_spec.rb
+- spec/text2048/tiles_spec.rb
+- text2048.gemspec
+homepage: http://github.com/yasuhito/text2048
+licenses:
+- GPL3
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - '>='
+    - !ruby/object:Gem::Version
+      version: 1.9.3
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.2.2
+signing_key: 
+specification_version: 4
+summary: Text mode 2048 game.
+test_files:
+- spec/spec_helper.rb
+- spec/text2048/board_spec.rb
+- spec/text2048/tiles_spec.rb
+- features/move_down.feature
+- features/move_left.feature
+- features/move_right.feature
+- features/move_up.feature
+- features/step_definitions/2048_steps.rb
+- features/support/env.rb
+has_rdoc: