text2048 0.5.0 → 0.6.0

data/lib/text2048/curses_view/colorize.rb

@@ -0,0 +1,53 @@
+# encoding: utf-8
+
+require 'curses'
+
+# This module smells of :reek:UncommunicativeModuleName
+module Text2048
+  class CursesView
+    # Colorize characters.
+    module Colorize
+      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 color(number)
+        COLORS[number]
+      end
+
+      def colorize(color, &block)
+        maybe_init_colors
+        attron color_pair(color), &block
+      end
+
+      private
+
+      def maybe_init_colors
+        return if @colors_initialized
+        init_colors
+        @colors_initialized = true
+      end
+
+      def init_colors
+        start_color
+        COLORS.each_pair do |_key, value|
+          init_pair value, COLOR_BLACK, value
+          init_pair value + 100, value, value
+        end
+      end
+    end
+  end
+end

data/lib/text2048/curses_view/keyboard.rb

@@ -0,0 +1,35 @@
+# encoding: utf-8
+
+require 'curses'
+
+# This module smells of :reek:UncommunicativeModuleName
+module Text2048
+  class CursesView
+    # Handles user inputs in curses
+    class Keyboard
+      include Curses
+
+      KEYS = {
+        'h' => :left, 'l' => :right, 'k' => :up, 'j' => :down,
+        Key::LEFT => :left, Key::RIGHT => :right,
+        Key::UP => :up, Key::DOWN => :down,
+        '+' => :larger, '-' => :smaller,
+        'q' => :quit
+      }
+
+      def read
+        maybe_init
+        KEYS[getch]
+      end
+
+      private
+
+      def maybe_init
+        return if @initialized
+        noecho
+        stdscr.keypad(true)
+        @initialized = true
+      end
+    end
+  end
+end

data/lib/text2048/curses_view/tile.rb

@@ -0,0 +1,135 @@
+# encoding: utf-8
+
+require 'curses'
+require 'text2048/curses_view/colorize'
+
+# This module smells of :reek:UncommunicativeModuleName
+module Text2048
+  class CursesView
+    # Shows tiles in curses.
+    class Tile
+      attr_reader :width
+      attr_reader :height
+      attr_reader :color
+
+      include Curses
+      include Colorize
+
+      DEFAULT_HEIGHT = 3
+      DEFAULT_WIDTH = 5
+
+      def self.width(scale)
+        @width = (DEFAULT_WIDTH * scale).to_i
+      end
+
+      def self.height(scale)
+        (DEFAULT_HEIGHT * scale).to_i
+      end
+
+      def initialize(value, row, col, color, scale = 1)
+        klass = self.class
+        @value = value.to_i
+        @height = klass.height(scale)
+        @width = klass.width(scale)
+        @row = (@height + 1) * row + 2
+        @col = (@width + 1) * col + 1
+        @color = color
+      end
+
+      def show
+        draw_box
+        fill_tile_color
+        draw_number
+        self
+      end
+
+      def pop
+        colorize(@color + 100) do
+          draw_box
+        end
+      end
+
+      def draw_box
+        draw_square
+        [box_upper_left, box_upper_right,
+         box_lower_left, box_lower_right].each do |row, col|
+          setpos(row, col)
+          addstr('+')
+        end
+      end
+
+      def fill_tile_color
+        colorize(@color + 100) { fill }
+      end
+
+      def fill_black
+        colorize(COLOR_BLACK + 100) { fill }
+        refresh
+      end
+
+      def draw_number
+        return if @value == 0
+        setpos(@row + @height / 2, @col)
+        colorize(@color) do
+          addstr @value.to_s.center(@width)
+        end
+      end
+
+      private
+
+      def box_upper_left
+        [@row - 1, @col - 1]
+      end
+
+      def box_upper_right
+        [@row - 1, @col + @width]
+      end
+
+      def box_lower_left
+        [@row + @height, @col - 1]
+      end
+
+      def box_lower_right
+        [@row + @height, @col + @width]
+      end
+
+      def box_height
+        @height + 2
+      end
+
+      def box_width
+        @width + 2
+      end
+
+      def draw_square
+        draw_horizonal_line(*box_upper_left, box_width)
+        draw_vertical_line(*box_upper_left, box_height)
+        draw_vertical_line(*box_upper_right, box_height)
+        draw_horizonal_line(*box_lower_left, box_width)
+      end
+
+      def draw_horizonal_line(row, col, length)
+        setpos(row, col)
+        addstr('-' * length)
+      end
+
+      def draw_vertical_line(row, col, length)
+        (0..(length - 1)).each do |each|
+          setpos(row + each, col)
+          addstr('|')
+        end
+      end
+
+      def fill
+        (0..(@height - 1)).each do |each|
+          setpos(@row + each, @col)
+          if @value != 0 && each == @height / 2
+            addstr @value.to_s.center(@width)
+          else
+            addstr('.' * @width)
+          end
+        end
+      end
+    end
+  end
+end

data/lib/text2048/curses_view/tile_effects.rb

@@ -0,0 +1,35 @@
+# encoding: utf-8
+
+require 'curses'
+
+# This module smells of :reek:UncommunicativeModuleName
+module Text2048
+  class CursesView
+    # Curses tile effects
+    module TileEffects
+      include Curses
+
+      def pop_tiles(list)
+        [:pop, :draw_box].each do |each|
+          list_do each, list
+          refresh
+          sleep 0.1
+        end
+      end
+
+      def zoom_tiles(list)
+        [:fill_black, :draw_number, :show].each do |each|
+          list_do each, list
+          refresh
+          sleep 0.05
+        end
+      end
+
+      private
+
+      def list_do(name, list)
+        list.each { |each| @tiles[each].__send__ name }
+      end
+    end
+  end
+end

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

@@ -6,7 +6,7 @@ module Text2048
     module Array
       # 2048 related methods
       module Tile
-        def rmerge
+        def right
           shrink
           score = (size - 1).downto(1).reduce(0) do |memo, each|
             memo + (self[each] == self[each - 1] ? merge_left(each) : 0)

data/lib/text2048/monkey_patch/hash.rb

@@ -0,0 +1,8 @@
+# encoding: utf-8
+
+require 'text2048/monkey_patch/hash/converter'
+
+# Monkey-patched standard Hash class.
+class Hash
+  include Text2048::MonkeyPatch::Hash::Converter
+end

data/lib/text2048/monkey_patch/hash/converter.rb

@@ -0,0 +1,17 @@
+# encoding: utf-8
+
+# This module smells of :reek:UncommunicativeModuleName
+module Text2048
+  module MonkeyPatch
+    module Hash
+      # For 1.9 backword compatibility
+      module Converter
+        if RUBY_VERSION < '2.0'
+          def to_h
+            self
+          end
+        end
+      end
+    end
+  end
+end

data/lib/text2048/version.rb

@@ -3,5 +3,5 @@
 # This module smells of :reek:UncommunicativeModuleName
 module Text2048
   # gem version.
-  VERSION = '0.5.0'.freeze
+  VERSION = '0.6.0'.freeze
 end

data/spec/array_spec.rb

@@ -10,8 +10,8 @@ describe Array do
   context '[0, 0, 0, 0]' do
     Given(:tiles) { tiles_with([0, 0, 0, 0]) }
 
-    describe '#rmerge' do
-      When(:score) { tiles.rmerge[1] }
+    describe '#right' do
+      When(:score) { tiles.right[1] }
 
       Then { tiles == [0, 0, 0, 0] }
       And { score == 0 }
@@ -25,8 +25,8 @@ describe Array do
   context '[2, 0, 0, 0]' do
     Given(:tiles) { tiles_with([2, 0, 0, 0]) }
 
-    describe '#rmerge' do
-      When(:score) { tiles.rmerge[1] }
+    describe '#right' do
+      When(:score) { tiles.right[1] }
 
       Then { tiles == [0, 0, 0, 2] }
       And { score == 0 }
@@ -40,8 +40,8 @@ describe Array do
   context '[0, 2, 0, 0]' do
     Given(:tiles) { tiles_with([0, 2, 0, 0]) }
 
-    describe '#rmerge' do
-      When(:score) { tiles.rmerge[1] }
+    describe '#right' do
+      When(:score) { tiles.right[1] }
 
       Then { tiles == [0, 0, 0, 2] }
       And { score == 0 }
@@ -55,8 +55,8 @@ describe Array do
   context '[0, 0, 2, 0]' do
     Given(:tiles) { tiles_with([0, 0, 2, 0]) }
 
-    describe '#rmerge' do
-      When(:score) { tiles.rmerge[1] }
+    describe '#right' do
+      When(:score) { tiles.right[1] }
 
       Then { tiles == [0, 0, 0, 2] }
       And { score == 0 }
@@ -70,8 +70,8 @@ describe Array do
   context '[0, 0, 0, 2]' do
     Given(:tiles) { tiles_with([0, 0, 0, 2]) }
 
-    describe '#rmerge' do
-      When(:score) { tiles.rmerge[1] }
+    describe '#right' do
+      When(:score) { tiles.right[1] }
 
       Then { tiles == [0, 0, 0, 2] }
       And { score == 0 }
@@ -85,8 +85,8 @@ describe Array do
   context '[0, 2, 0, 2]' do
     Given(:tiles) { tiles_with([0, 2, 0, 2]) }
 
-    describe '#rmerge' do
-      When(:score) { tiles.rmerge[1] }
+    describe '#right' do
+      When(:score) { tiles.right[1] }
 
       Then { tiles == [0, 0, 0, 4] }
       And { score == 4 }
@@ -100,8 +100,8 @@ describe Array do
   context '[2, 2, 0, 0]' do
     Given(:tiles) { tiles_with([2, 2, 0, 0]) }
 
-    describe '#rmerge' do
-      When(:score) { tiles.rmerge[1] }
+    describe '#right' do
+      When(:score) { tiles.right[1] }
 
       Then { tiles == [0, 0, 0, 4] }
       And { score == 4 }
@@ -115,8 +115,8 @@ describe Array do
   context '[2, 2, 2, 0]' do
     Given(:tiles) { tiles_with([2, 2, 2, 0]) }
 
-    describe '#rmerge' do
-      When(:score) { tiles.rmerge[1] }
+    describe '#right' do
+      When(:score) { tiles.right[1] }
 
       Then { tiles == [0, 0, 2, 4] }
       And { score == 4 }
@@ -130,8 +130,8 @@ describe Array do
   context '[2, 2, 2, 2]' do
     Given(:tiles) { tiles_with([2, 2, 2, 2]) }
 
-    describe '#rmerge' do
-      When(:score) { tiles.rmerge[1] }
+    describe '#right' do
+      When(:score) { tiles.right[1] }
 
       Then { tiles == [0, 0, 4, 4] }
       And { score == 8 }
@@ -145,8 +145,8 @@ describe Array do
   context '[4, 4, 2, 2]' do
     Given(:tiles) { tiles_with([4, 4, 2, 2]) }
 
-    describe '#rmerge' do
-      When(:score) { tiles.rmerge[1] }
+    describe '#right' do
+      When(:score) { tiles.right[1] }
 
       Then { tiles == [0, 0, 8, 4] }
       And { score == 12 }
@@ -160,8 +160,8 @@ describe Array do
   context '[0, 4, 0, 2]' do
     Given(:tiles) { tiles_with([0, 4, 0, 2]) }
 
-    describe '#rmerge' do
-      When(:score) { tiles.rmerge[1] }
+    describe '#right' do
+      When(:score) { tiles.right[1] }
 
       Then { tiles == [0, 0, 4, 2] }
       And { score == 0 }
@@ -175,8 +175,8 @@ describe Array do
   context 'with [16, 8, 4, 2]' do
     Given(:tiles) { tiles_with([16, 8, 4, 2]) }
 
-    describe '#rmerge' do
-      When(:score) { tiles.rmerge[1] }
+    describe '#right' do
+      When(:score) { tiles.right[1] }
 
       Then { tiles == [16, 8, 4, 2] }
       And { score == 0 }

data/spec/spec_helper.rb

@@ -2,6 +2,9 @@
 
 $LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..', 'lib')
 
+require 'codeclimate-test-reporter'
+CodeClimate::TestReporter.start
+
 require 'coveralls'
 Coveralls.wear_merged!