amaze 0.2.0

data/lib/amaze/formatter/image/sigma.rb

@@ -0,0 +1,122 @@
+
+class Amaze::Formatter::Image::Sigma < Amaze::Formatter::Image
+  
+  def render_background
+    canvas.stroke_antialias true
+    canvas.stroke_linecap 'square'
+    canvas.stroke 'none'
+    grid.each_cell do |cell|
+      color = distance_color cell
+      next unless color
+      canvas.fill color
+      x1, x2, x3, x4, y1, y2, y3 = coord cell
+      canvas.polygon x2, y1, x3, y1, x4, y2, x3, y3, x2, y3, x1, y2
+    end
+  end
+  
+  def render_grid
+    canvas.stroke_antialias true
+    canvas.stroke_linecap 'round'
+    canvas.stroke_linejoin 'round'
+    canvas.stroke 'gray90'
+    canvas.stroke_width 1
+    canvas.fill 'none'
+
+    grid.each_cell do |cell|
+      x1, x2, x3, x4, y1, y2, y3 = coord cell
+      canvas.polygon x2, y1, x3, y1, x4, y2, x3, y3, x2, y3, x1, y2
+    end
+  end
+  
+  def render_wall
+    canvas.stroke_antialias true
+    canvas.stroke_linecap 'round'
+    canvas.stroke_linejoin 'round'
+    canvas.stroke wall_color
+    canvas.stroke_width wall_width
+    canvas.fill 'none'
+
+    grid.each_cell do |cell|
+      x1, x2, x3, x4, y1, y2, y3 = coord cell
+      
+      canvas.line x2, y1, x3, y1 unless cell.linked_to?(:north)
+      canvas.line x3, y1, x4, y2 unless cell.linked_to?(:northeast)
+      canvas.line x4, y2, x3, y3 unless cell.linked_to?(:southeast)
+      canvas.line x2, y3, x3, y3 unless cell.linked_to?(:south)
+      canvas.line x1, y2, x2, y3 unless cell.linked_to?(:southwest)
+      canvas.line x1, y2, x2, y1 unless cell.linked_to?(:northwest)
+    end
+  end
+  
+  def render_path
+    canvas.stroke_antialias true
+    canvas.stroke_linecap 'round'
+    canvas.stroke_linejoin 'round'
+    canvas.fill 'none'
+    canvas.stroke path_color
+    canvas.stroke_width path_width
+    
+    grid.each_cell do |cell|
+      next unless path_cell? cell
+
+      x1, y1 = center_coord cell
+      %i( northeast southeast south ).each do |direction|
+        next unless path?(direction, cell)
+        x2, y2 = center_coord cell.send(direction)
+        canvas.line x1, y1, x2, y2
+      end
+    end
+
+    # draw start and finish
+    canvas.stroke_antialias true
+    canvas.stroke_linecap 'round'
+    canvas.fill path_color
+    canvas.stroke 'none'
+    [path_start, path_finish].compact.each do |cell|
+      x, y = center_coord cell
+      canvas.ellipse x, y, path_width*2, path_width*2, 0, 360
+    end
+  end
+  
+  def coord cell
+    x, y = center_coord cell
+    
+    x1 = x - cell_width
+    x2 = x - cell_width / 2.0
+    x3 = x + cell_width / 2.0
+    x4 = x + cell_width
+    
+    y1 = y - pattern_height / 2.0
+    y2 = y
+    y3 = y + pattern_height / 2.0
+
+    [x1, x2, x3, x4, y1, y2, y3]
+  end
+  
+  def center_coord cell
+    row, column = cell.row, cell.column
+    
+    x = column * pattern_width + cell_width + cell_offset
+    # add half or full height to find center
+    row_offset = column.even? ? 0.5 : 1.0
+    y = (row+row_offset) * pattern_height  + cell_offset
+    
+    [x, y]
+  end
+  
+  def pattern_width
+    @pattern_width ||= cell_width * 3 / 2.0
+  end
+  
+  def pattern_height
+    @pattern_height ||= cell_width * Math.sqrt(3)
+  end
+  
+  def image_width
+    pattern_width * grid.columns + cell_width / 2.0 + wall_width + border_width * 2 + 1
+  end
+  
+  def image_height
+    pattern_height * grid.rows + pattern_height / 2.0 + wall_width + border_width * 2 + 1
+  end
+end

data/lib/amaze/formatter/image/upsilon.rb

@@ -0,0 +1,135 @@
+
+class Amaze::Formatter::Image::Upsilon < Amaze::Formatter::Image
+  
+  def render_background
+    canvas.stroke_antialias true
+    canvas.stroke_linecap 'round'
+    canvas.stroke_linejoin 'round'
+    canvas.stroke 'none'
+    grid.each_cell do |cell|
+      color = distance_color cell
+      next unless color
+      canvas.fill color
+      canvas.polygon *coord(cell)
+    end
+  end
+  
+  def render_grid
+    canvas.stroke_antialias true
+    canvas.stroke_linecap 'round'
+    canvas.stroke_linejoin 'round'
+    canvas.stroke 'gray90'
+    canvas.stroke_width 1
+    canvas.fill 'none'
+
+    grid.each_cell do |cell|
+      canvas.polygon *coord(cell)
+    end
+  end
+  
+  def render_wall
+    canvas.stroke_antialias true
+    canvas.stroke_linecap 'round'
+    canvas.stroke_linejoin 'round'
+    canvas.stroke wall_color
+    canvas.stroke_width wall_width
+    canvas.fill 'none'
+
+    grid.each_cell do |cell|
+      ax, ay, bx, by, cx, cy, dx, dy, ex, ey, fx, fy, gx, gy, hx, hy = coord cell
+      
+      if (cell.row + cell.column).even?
+        # octo cells
+        canvas.line ax, ay, bx, by unless cell.linked_to?(:north)
+        canvas.line bx, by, cx, cy unless cell.linked_to?(:northeast)
+        canvas.line cx, cy, dx, dy unless cell.linked_to?(:east)
+        canvas.line dx, dy, ex, ey unless cell.linked_to?(:southeast)
+        canvas.line ex, ey, fx, fy unless cell.linked_to?(:south)
+        canvas.line fx, fy, gx, gy unless cell.linked_to?(:southwest)
+        canvas.line gx, gy, hx, hy unless cell.linked_to?(:west)
+        canvas.line hx, hy, ax, ay unless cell.linked_to?(:northwest)
+      else
+        # square cells
+        canvas.line ax, ay, bx, by unless cell.linked_to?(:north)
+        canvas.line bx, by, cx, cy unless cell.linked_to?(:east)
+        canvas.line cx, cy, dx, dy unless cell.linked_to?(:south)
+        canvas.line dx, dy, ax, ay unless cell.linked_to?(:west)
+      end
+    end
+  end
+  
+  def render_path
+    canvas.stroke_antialias true
+    canvas.stroke_linecap 'round'
+    canvas.stroke_linejoin 'round'
+    canvas.fill 'none'
+    canvas.stroke path_color
+    canvas.stroke_width path_width
+    
+    grid.each_cell do |cell|
+      next unless path_cell? cell
+
+      x1, y1 = center_coord cell
+      %i( north northeast east southeast ).each do |direction|
+        # square cells don't respond to northeast and southeast
+        next unless cell.respond_to? direction
+        next unless path?(direction, cell)
+        x2, y2 = center_coord cell.send(direction)
+        canvas.line x1, y1, x2, y2
+      end
+    end
+
+    # draw start and finish
+    canvas.stroke_antialias true
+    canvas.stroke_linecap 'round'
+    canvas.fill path_color
+    canvas.stroke 'none'
+    [path_start, path_finish].compact.each do |cell|
+      x, y = center_coord cell
+      canvas.ellipse x, y, path_width*2, path_width*2, 0, 360
+    end
+  end
+  
+  def coord cell
+    row, column = cell.row, cell.column
+    
+    x1 = column * pattern_width + cell_offset
+    x2 = x1 + partial_cell
+    x3 = x2 + cell_width
+    x4 = x3 + partial_cell
+    
+    y1 = row * pattern_width + cell_offset
+    y2 = y1 + partial_cell
+    y3 = y2 + cell_width
+    y4 = y3 + partial_cell
+
+    if (row+column).even?
+      [x2, y1, x3, y1, x4, y2, x4, y3, x3, y4, x2, y4, x1, y3, x1, y2]
+    else
+      [x2, y2, x3, y2, x3, y3, x2, y3]
+    end
+  end
+  
+  def center_coord cell
+    row, column = cell.row, cell.column
+    
+    d = partial_cell + cell_width / 2.0
+    x = column * pattern_width + d + cell_offset
+    y = row * pattern_width + d + cell_offset
+    [x, y]
+  end
+  
+  def partial_cell
+    @partial_cell ||= cell_width * Math.sqrt(2) / 2.0
+  end
+  
+  def pattern_width
+    @pattern_width ||= cell_width + partial_cell
+  end
+  
+  def image_width
+    pattern_width * (grid.columns) + partial_cell + wall_width + border_width * 2 + 1
+  end
+  
+  alias_method :image_height, :image_width
+end

data/lib/amaze/grid.rb

@@ -0,0 +1,66 @@
+
+class Amaze::Grid
+  autoload :Ortho, 'amaze/grid/ortho'
+  autoload :Delta, 'amaze/grid/delta'
+  autoload :Sigma, 'amaze/grid/sigma'
+  autoload :Upsilon, 'amaze/grid/upsilon'
+  autoload :Polar, 'amaze/grid/polar'
+  
+  # The dimension of the amaze
+  attr_reader :rows, :columns
+  
+  # The grid
+  attr_reader :grid
+    
+  def initialize rows, columns
+    @rows = rows
+    @columns = columns
+    
+    prepare_grid
+    configure_cell
+  end
+  
+  def prepare_grid
+    raise NotImplementedError
+  end
+  
+  def configure_cell
+    raise NotImplementedError
+  end
+  
+  def [](row, column)
+    return nil unless row.between?(0, rows-1)
+    return nil unless column.between?(0, columns-1)
+    grid[row][column]
+  end
+  
+  def each_row
+    grid.each do |row|
+      yield row
+    end
+  end
+  
+  def each_cell
+    each_row do |row|
+      row.each do |cell|
+        yield cell if cell
+      end
+    end
+  end
+
+  def random_cell
+    self[rand(rows), rand(columns)]
+  end
+  
+  def deadends
+    list = []
+    each_cell do |cell|
+      list << cell if cell.links.size == 1
+    end
+    list
+  end
+
+  def size
+    rows * columns
+  end
+end

data/lib/amaze/grid/delta.rb

@@ -0,0 +1,87 @@
+
+class Amaze::Grid::Delta < Amaze::Grid
+
+  def prepare_grid
+    @grid = Array.new(rows) do |row|
+      Array.new(columns) do |column|
+        # Use the square cells, since the neighbors are the same
+        Amaze::Cell::Square.new row, column
+      end
+    end
+  end
+  
+  def configure_cell
+    each_cell do |cell|
+      row, column = cell.row, cell.column
+      
+      cell.east = self[row, column+1]
+      cell.west = self[row, column-1]
+      
+      if (row+column).even?
+        cell.north = self[row-1, column]
+      else
+        cell.south = self[row+1, column]
+      end
+    end
+  end
+end
+
+__END__
+
+ __  __
+\* /\  /\
+ \/__\/__\
+ /\  /\  /
+/__\/__\/
+\  /\  /\
+ \/__\/__\
+ /\  /\  /
+/__\/__\/
+  
+ ______  ______  ______ 
+\      /\      /\      /
+ \ *  /  \    /  \    /
+  \  / *  \  /    \  /
+   \/______\/______\/
+   /\      /\      /\
+  /  \    /  \    /  \
+ /    \  /    \  /    \
+/______\/______\/______\
+\      /\      /\      /
+ \    /  \    /  \    /
+  \  /    \  /    \  /
+   \/______\/______\/
+   /\      /\      /\
+  /  \    /  \    /  \
+ /    \  /    \  /    \
+/______\/______\/______\
+\      /\      /\      /
+ \    /  \    /  \    /
+  \  /    \  /    \  /
+   \/______\/______\/
+
+ __________  __________  __________
+\          /\          /\          /
+ \        /  \        /  \        /
+  \  *   /    \      /    \      /
+   \    /  *   \    /      \    /
+    \  /        \  /        \  /
+     \/__________\/__________\/
+     /\          /\          /\     
+    /  \        /  \        /  \    
+   /    \      /    \      /    \   
+  /      \    /      \    /      \  
+ /        \  /        \  /        \ 
+/__________\/__________\/__________\
+\          /\          /\          /
+ \        /  \        /  \        /
+  \      /    \      /    \      /
+   \    /      \    /      \    /
+    \  /        \  /        \  /
+     \/__________\/__________\/
+     /\          /\          /\     
+    /  \        /  \        /  \    
+   /    \      /    \      /    \   
+  /      \    /      \    /      \  
+ /        \  /        \  /        \ 
+/__________\/__________\/__________\

data/lib/amaze/grid/ortho.rb

@@ -0,0 +1,38 @@
+
+class Amaze::Grid::Ortho < Amaze::Grid
+
+  def prepare_grid
+    @grid = Array.new(rows) do |row|
+      Array.new(columns) do |column|
+        Amaze::Cell::Square.new row, column
+      end
+    end
+  end
+  
+  def configure_cell
+    each_cell do |cell|
+      row, column = cell.row, cell.column
+      
+      cell.north = self[row-1, column] 
+      cell.east  = self[row, column+1]
+      cell.south = self[row+1, column]
+      cell.west  = self[row, column-1]
+    end
+  end
+end
+
+__END__
+
++---+---+
+|   |   |
++---+---+
+|   |   |
++---+---+
+
++------+------+
+|      |      |
+|      |      |
++------+------+
+|      |      |
+|      |      |
++------+------+