tortoise 0.8.0

data/.gitignore

@@ -0,0 +1,6 @@
+*.swp
+.DS_Store
+*.gem
+.bundle
+Gemfile.lock
+pkg/*

data/.travis.yml

@@ -0,0 +1,5 @@
+language: ruby
+rvm:
+  - 1.8.7
+  - 1.9.2
+  - 1.9.3

data/Gemfile

@@ -0,0 +1,4 @@
+source "http://rubygems.org"
+
+# Specify your gem's dependencies in tortoise.gemspec
+gemspec

data/README.markdown

@@ -0,0 +1,136 @@
+Tortoise [![Build Status](https://secure.travis-ci.org/huntca/tortoise.png)](http://travis-ci.org/huntca/tortoise)
+========
+[logo]: http://en.wikipedia.org/wiki/Logo_(programming_language) "Logo Programming Language"
+[rubygems]: https://rubygems.org/ "Rubygems"
+
+Tortoise is a [Logo][logo] interpreter for Ruby. To demonstrate the
+awesomeness of Logo, we'll draw a ruby! This example can be found in the
+repository at `spec/data/simple.logo`.
+
+    > Tortoise::Interpreter.new <<-LOGO
+        61
+        RT 135
+        FD 5
+        REPEAT 2 [ RT 90 FD 15 ]
+        RT 90
+        FD 5
+        RT 45
+        FD 20
+      LOGO
+
+      . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+      . . . . . . X X X X X X X X X X X X X X X X X X X X X . . . . . .
+      . . . . . X . . . . . . . . . . . . . . . . . . . . . X . . . . .
+      . . . . X . . . . . . . . . . . . . . . . . . . . . . . X . . . .
+      . . . X . . . . . . . . . . . . . . . . . . . . . . . . . X . . .
+      . . X . . . . . . . . . . . . . . . . . . . . . . . . . . . X . .
+      . X . . . . . . . . . . . . . . . . . . . . . . . . . . . . . X .
+      . . X . . . . . . . . . . . . . . . . . . . . . . . . . . . X . .
+      . . . X . . . . . . . . . . . . . . . . . . . . . . . . . X . . .
+      . . . . X . . . . . . . . . . . . . . . . . . . . . . . X . . . .
+      . . . . . X . . . . . . . . . . . . . . . . . . . . . X . . . . .
+      . . . . . . X . . . . . . . . . . . . . . . . . . . X . . . . . .
+      . . . . . . . X . . . . . . . . . . . . . . . . . X . . . . . . .
+      . . . . . . . . X . . . . . . . . . . . . . . . X . . . . . . . .
+      . . . . . . . . . X . . . . . . . . . . . . . X . . . . . . . . .
+      . . . . . . . . . . X . . . . . . . . . . . X . . . . . . . . . .
+      . . . . . . . . . . . X . . . . . . . . . X . . . . . . . . . . .
+      . . . . . . . . . . . . X . . . . . . . X . . . . . . . . . . . .
+      . . . . . . . . . . . . . X . . . . . X . . . . . . . . . . . . .
+      . . . . . . . . . . . . . . X . . . X . . . . . . . . . . . . . .
+      . . . . . . . . . . . . . . . X . X . . . . . . . . . . . . . . .
+      . . . . . . . . . . . . . . . . X . . . . . . . . . . . . . . . .
+      . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+
+Installation
+------------
+Tortoise is available on [rubygems.org][rubygems]. To install, add
+`gem tortoise` to your `Gemfile` or install manually with:
+
+    gem install tortoise
+
+Usage
+-----
+To use Tortoise, create an instance of `Tortoise::Interpreter` and execute
+any of the supported Logo commands.
+
+    # specify canvas size for this drawing
+    canvas_size = 11
+    interpreter = Tortoise::Interpreter.new(canvas_size)
+
+    # execute any supported commands
+    interpreter.rt(90)
+    interpreter.fd(3)
+    interpreter.lt(45)
+    interpreter.bk(4)
+
+Tortoise also accepts commands as an input string:
+
+    interpreter = Tortoise::Interpreter.new(11)
+    interpreter.draw "RT 90"
+    interpreter.draw "FD 3"
+    interpreter.draw "LT 45"
+    interpreter.draw "BK 4"
+
+You can execute entire blocks of commands at once:
+
+    interpreter = Tortoise::Interpreter.new(61)
+
+    interpreter.draw <<-STEPS
+      RT 135
+      FD 5
+      REPEAT 2 [ RT 90 FD 15 ]
+      RT 90
+      FD 5
+      RT 45
+      FD 20
+    STEPS
+
+Finally, commands can be executed when a `Tortoise::Interpreter` is
+instantiated. The command string must contain the canvas size in the
+first line. This is most useful when reading commands from a file.
+Assume we have the file `drawing.logo`:
+
+    61
+    RT 135
+    FD 5
+    REPEAT 2 [ RT 90 FD 15 ]
+    RT 90
+    FD 5
+    RT 45
+    FD 20
+
+We can load and execute `drawing.logo` with:
+
+    file = File.new('drawing.logo')
+    tortoise = Tortoise::Interpreter.new(file.read)
+
+Command Line Usage
+------------------
+Tortoise can be used on the command line to render logo command files. The
+output is rendered to standard out.
+
+    Usage: tortoise [FILE]
+
+For example, if you'd like to render `drawing.logo` to `drawing.txt`:
+
+    $ tortoise drawing.logo > drawing.txt
+
+Rendering The Canvas
+--------------------
+Tortoise can currently render its canvas to a string. Html export is planned
+soon (which will allow a very high resolution canvas). To get a string
+representation of the current canvas:
+
+    interpreter = Tortoise::Interpreter.new(5)
+    interpreter.to_s
+
+Supported Commands
+------------------
+Tortoise only supports a small subset of all [Logo][logo] commands.
+
+- `RT x`: Turn the tortoise `x` degrees to the right (increments of 45)
+- `LT x`: Turn the tortoise `x` degrees to the right (increments of 45)
+- `FD x`: Move the tortoise `x` steps forward
+- `BK x`: Move the tortoise `x` steps backward
+- `REPEAT n [ x ]`: Repeat commands `x` a total of `n` times

data/Rakefile

@@ -0,0 +1,10 @@
+require 'bundler/gem_tasks'
+require 'rspec/core/rake_task'
+
+desc 'Default: Run all specs'
+task :default => :spec
+
+desc 'Run all specs'
+RSpec::Core::RakeTask.new do |t|
+  t.rspec_opts = ['--color']
+end

data/bin/tortoise

@@ -0,0 +1,11 @@
+#!/usr/bin/env ruby
+$:.push File.expand_path("../../lib", __FILE__)
+require 'tortoise/interpreter'
+
+if ARGV.size < 1
+  puts "Usage: tortoise [FILE]"
+  raise Exception.new("Missing filename")
+end
+
+commands = File.new(ARGV.first).read
+puts Tortoise::Interpreter.new(commands).to_s

data/lib/tortoise/interpreter.rb

@@ -0,0 +1,123 @@
+module Tortoise
+  class Interpreter
+    attr_reader :size, :position, :direction, :canvas
+
+    def initialize(instructions)
+      lines = instructions.to_s.split("\n")
+
+      @size = lines.shift.to_i
+      @canvas = new_canvas
+      @direction = 0
+      center = (@size - @size/2) - 1
+
+      update_position(center, center)
+      draw(lines)
+    end
+
+    def rt(degrees)
+      rotate(degrees)
+    end
+
+    def lt(degrees)
+      rotate(-degrees)
+    end
+
+    def fd(steps)
+      walk(steps)
+    end
+
+    def bk(steps)
+      walk(-steps)
+    end
+
+    def draw(commands)
+      commands = commands.split("\n") if commands.respond_to?(:split)
+      commands.each { |command| execute(command) }
+    end
+
+    def to_s
+      s = ''
+      oriented_canvas.each do |column|
+        column.each do |pixel|
+          char = pixel ? 'X' : '.'
+          s += "#{char} "
+        end
+        s = s.strip + "\n"
+      end
+      s
+    end
+
+    private
+
+    def new_canvas
+      Array.new(@size) { Array.new(@size) {false} }
+    end
+
+    def update_position(x, y)
+      @position = place_in_canvas_bounds(x, y)
+      update_canvas
+    end
+
+    def rotate(degrees)
+      @direction += degrees
+      @direction += 360 while @direction < 0
+      @direction -= 360 while @direction >= 360
+    end
+
+    def execute(command)
+      words = command.split(' ')
+      if words.size == 2
+        method, param = words
+        self.send(method.downcase, param.to_i)
+      else
+        1.upto(words[1].to_i) do
+          commands = words[3..words.size-2]
+          execute(commands.shift(2).join(' ')) while commands.size > 0
+        end
+      end
+    end
+
+    def walk(steps)
+      x, y  = @position
+      step  = steps < 0 ? -1 : 1
+      steps = steps < 0 ? -steps : steps
+
+      1.upto(steps) do
+        x, y = case direction
+          when 0;   [x,        y + step]
+          when 45;  [x + step, y + step]
+          when 90;  [x + step, y       ]
+          when 135; [x + step, y - step]
+          when 180; [x,        y - step]
+          when 225; [x - step, y - step]
+          when 270; [x - step, y       ]
+          when 315; [x - step, y + step]
+        end
+        update_position(x, y)
+      end
+    end
+
+    def update_canvas
+      x, y = @position
+      @canvas[x][y] = true
+    end
+
+    def place_in_canvas_bounds(x, y)
+      x = 0 if x < 0
+      y = 0 if y < 0
+      x = @size - 1 if x >= @size
+      y = @size - 1 if y >= @size
+      [x, y]
+    end
+
+    def oriented_canvas
+      oriented = new_canvas
+      @canvas.each_with_index do |column, i|
+        column.each_with_index do |pixel, j|
+          oriented[@size-1-j][i] = pixel
+        end
+      end
+      oriented
+    end
+  end
+end

data/lib/tortoise/version.rb

@@ -0,0 +1,3 @@
+module Tortoise
+  VERSION = "0.8.0"
+end

data/lib/tortoise.rb

@@ -0,0 +1,2 @@
+require 'tortoise/interpreter'
+require 'tortoise/version'

data/spec/data/complex.logo

@@ -0,0 +1,3 @@
+1001
+
+REPEAT 4 [ FD 200 LT 45 FD 100 LT 45 FD 50 LT 45 FD 25 LT 45 FD 12 LT 45 FD 6 LT 45 RT 90 LT 45 BK 6 RT 90 FD 6 LT 45 RT 90 LT 45 BK 6 LT 45 BK 12 RT 90 FD 12 LT 45 FD 6 LT 45 RT 90 LT 45 BK 6 RT 90 FD 6 LT 45 RT 90 LT 45 BK 6 LT 45 BK 12 LT 45 BK 25 RT 90 FD 25 LT 45 FD 12 LT 45 FD 6 LT 45 RT 90 LT 45 BK 6 RT 90 FD 6 LT 45 RT 90 LT 45 BK 6 LT 45 BK 12 RT 90 FD 12 LT 45 FD 6 LT 45 RT 90 LT 45 BK 6 RT 90 FD 6 LT 45 RT 90 LT 45 BK 6 LT 45 BK 12 LT 45 BK 25 LT 45 BK 50 RT 90 FD 50 LT 45 FD 25 LT 45 FD 12 LT 45 FD 6 LT 45 RT 90 LT 45 BK 6 RT 90 FD 6 LT 45 RT 90 LT 45 BK 6 LT 45 BK 12 RT 90 FD 12 LT 45 FD 6 LT 45 RT 90 LT 45 BK 6 RT 90 FD 6 LT 45 RT 90 LT 45 BK 6 LT 45 BK 12 LT 45 BK 25 RT 90 FD 25 LT 45 FD 12 LT 45 FD 6 LT 45 RT 90 LT 45 BK 6 RT 90 FD 6 LT 45 RT 90 LT 45 BK 6 LT 45 BK 12 RT 90 FD 12 LT 45 FD 6 LT 45 RT 90 LT 45 BK 6 RT 90 FD 6 LT 45 RT 90 LT 45 BK 6 LT 45 BK 12 LT 45 BK 25 LT 45 BK 50 LT 45 BK 100 RT 90 FD 100 LT 45 FD 50 LT 45 FD 25 LT 45 FD 12 LT 45 FD 6 LT 45 RT 90 LT 45 BK 6 RT 90 FD 6 LT 45 RT 90 LT 45 BK 6 LT 45 BK 12 RT 90 FD 12 LT 45 FD 6 LT 45 RT 90 LT 45 BK 6 RT 90 FD 6 LT 45 RT 90 LT 45 BK 6 LT 45 BK 12 LT 45 BK 25 RT 90 FD 25 LT 45 FD 12 LT 45 FD 6 LT 45 RT 90 LT 45 BK 6 RT 90 FD 6 LT 45 RT 90 LT 45 BK 6 LT 45 BK 12 RT 90 FD 12 LT 45 FD 6 LT 45 RT 90 LT 45 BK 6 RT 90 FD 6 LT 45 RT 90 LT 45 BK 6 LT 45 BK 12 LT 45 BK 25 LT 45 BK 50 RT 90 FD 50 LT 45 FD 25 LT 45 FD 12 LT 45 FD 6 LT 45 RT 90 LT 45 BK 6 RT 90 FD 6 LT 45 RT 90 LT 45 BK 6 LT 45 BK 12 RT 90 FD 12 LT 45 FD 6 LT 45 RT 90 LT 45 BK 6 RT 90 FD 6 LT 45 RT 90 LT 45 BK 6 LT 45 BK 12 LT 45 BK 25 RT 90 FD 25 LT 45 FD 12 LT 45 FD 6 LT 45 RT 90 LT 45 BK 6 RT 90 FD 6 LT 45 RT 90 LT 45 BK 6 LT 45 BK 12 RT 90 FD 12 LT 45 FD 6 LT 45 RT 90 LT 45 BK 6 RT 90 FD 6 LT 45 RT 90 LT 45 BK 6 LT 45 BK 12 LT 45 BK 25 LT 45 BK 50 LT 45 BK 100 LT 45 BK 200 RT 90 ]

data/spec/data/simple.logo

@@ -0,0 +1,9 @@
+61
+
+RT 135
+FD 5
+REPEAT 2 [ RT 90 FD 15 ]
+RT 90
+FD 5
+RT 45
+FD 20

data/spec/data/simple_out.txt

@@ -0,0 +1,61 @@
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . X X X X X X X X X X X X X X X X X X X X X . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . X . . . . . . . . . . . . . . . . . . . . . X . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . X . . . . . . . . . . . . . . . . . . . . . . . X . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . X . . . . . . . . . . . . . . . . . . . . . . . . . X . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . X . . . . . . . . . . . . . . . . . . . . . . . . . . . X . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . X . . . . . . . . . . . . . . . . . . . . . . . . . . . . . X . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . X . . . . . . . . . . . . . . . . . . . . . . . . . . . X . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . X . . . . . . . . . . . . . . . . . . . . . . . . . X . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . X . . . . . . . . . . . . . . . . . . . . . . . X . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . X . . . . . . . . . . . . . . . . . . . . . X . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . X . . . . . . . . . . . . . . . . . . . X . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . X . . . . . . . . . . . . . . . . . X . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . X . . . . . . . . . . . . . . . X . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . X . . . . . . . . . . . . . X . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . X . . . . . . . . . . . X . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . X . . . . . . . . . X . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . X . . . . . . . X . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . X . . . . . X . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . X . . . X . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . X . X . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . X . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .

data/spec/integration/tortoise_integration_spec.rb

@@ -0,0 +1,10 @@
+require 'tortoise'
+
+describe Tortoise::Interpreter do
+  it 'produces the expected string output' do
+    input  = File.new('./spec/data/simple.logo').read
+    output = File.new('./spec/data/simple_out.txt').read
+
+    Tortoise::Interpreter.new(input).to_s.should == output
+  end
+end

data/spec/tortoise/interpreter_spec.rb

@@ -0,0 +1,467 @@
+require 'tortoise/interpreter'
+
+describe Tortoise::Interpreter do
+  let(:tortoise) { Tortoise::Interpreter.new(11) }
+
+  it 'can be initialized with a canvas size' do
+    tortoise = Tortoise::Interpreter.new(11)
+    tortoise.size.should == 11
+  end
+
+  it 'can be initialized with instructions' do
+    instructions = <<-STEPS
+      5
+
+      REPEAT 2 [ RT 45 ]
+      FD 1
+    STEPS
+
+    tortoise = Tortoise::Interpreter.new(instructions)
+    tortoise.size.should == 5
+    tortoise.direction.should == 90
+    tortoise.position.should == [3, 2]
+  end
+
+  it 'starts with a single marked pixel on the canvas' do
+    count = 0
+    tortoise.canvas.each do |column|
+      column.each { |pixel| count += 1 if pixel }
+    end
+    count.should == 1
+  end
+
+  it 'defaults tortoise position to the center of the canvas' do
+    tortoise.position.should == [5, 5]
+  end
+
+  it 'defaults tortoise direction to zero degrees (up)' do
+    tortoise.direction.should == 0
+  end
+
+  describe '#draw' do
+    it 'draws the image on the canvas when given a string' do
+      tortoise = Tortoise::Interpreter.new(5)
+      tortoise.draw <<-STEPS
+        RT 90
+        FD 1
+        REPEAT 2 [ RT 45 ]
+        FD 2
+        REPEAT 2 [ LT 45 ]
+        FD 1
+        RT 180
+        FD 2
+      STEPS
+
+      tortoise.canvas.should == [
+        [false, false, false, false, false],
+        [false, false, false, false, false],
+        [true , false, true , false, false],
+        [true , true , true , false, false],
+        [true , false, false, false, false]]
+    end
+
+    it 'draws the image on the canvas when given an array' do
+      tortoise = Tortoise::Interpreter.new(5)
+      tortoise.draw([
+        'RT 90',
+        'FD 1',
+        'REPEAT 2 [ RT 45 ]',
+        'FD 2',
+        'REPEAT 2 [ LT 45 ]',
+        'FD 1',
+        'RT 180',
+        'FD 2'])
+      tortoise.canvas.should == [
+        [false, false, false, false, false],
+        [false, false, false, false, false],
+        [true , false, true , false, false],
+        [true , true , true , false, false],
+        [true , false, false, false, false]]
+    end
+  end
+
+  describe '#to_s' do
+    it 'renders canvas to string' do
+      tortoise = Tortoise::Interpreter.new(5)
+      tortoise.draw <<-STEPS
+        RT 90
+        FD 1
+        REPEAT 2 [ RT 45 ]
+        FD 2
+        REPEAT 2 [ LT 45 ]
+        FD 1
+        RT 180
+        FD 2
+      STEPS
+
+      tortoise.to_s.should == "" +
+       ". . . . .\n" +
+       ". . . . .\n" +
+       ". . X X .\n" +
+       ". . . X .\n" +
+       ". . X X X\n"
+    end
+  end
+
+  describe '#rt' do
+    it 'can rotate the tortoise 45 degrees to the right' do
+      tortoise.rt(45)
+      tortoise.direction.should == 45
+    end
+
+    it 'can rotate the tortoise 360 degrees to the right' do
+      tortoise.rt(360)
+      tortoise.direction.should == 0
+    end
+
+    it 'can rotate the tortoise 495 degrees to the right' do
+      tortoise.rt(495)
+      tortoise.direction.should == 135
+    end
+
+    it 'can rotate the tortoise 810 degrees to the right' do
+      tortoise.rt(810)
+      tortoise.direction.should == 90
+    end
+
+    it 'can rotate the tortoise multiple times' do
+      tortoise.rt(90)
+      tortoise.rt(45)
+      tortoise.direction.should == 135
+    end
+  end
+
+  describe '#lt' do
+    it 'can rotate the tortoise 45 degrees to the left' do
+      tortoise.lt(45)
+      tortoise.direction.should == 315
+    end
+
+    it 'can rotate the tortoise 360 degrees to the left' do
+      tortoise.lt(360)
+      tortoise.direction.should == 0
+    end
+
+    it 'can rotate the tortoise 495 degrees to the left' do
+      tortoise.lt(495)
+      tortoise.direction.should == 225
+    end
+
+    it 'can rotate the tortoise 810 degrees to the left' do
+      tortoise.lt(810)
+      tortoise.direction.should == 270
+    end
+
+    it 'can rotate the tortoise multiple times' do
+      tortoise.lt(90)
+      tortoise.lt(45)
+      tortoise.direction.should == 225
+    end
+  end
+
+  describe '#rotate' do
+    it 'can rotate the tortoise 45 degrees' do
+      tortoise.send(:rotate, 45)
+      tortoise.direction.should == 45
+    end
+
+    it 'can rotate the tortoise 90 degrees' do
+      tortoise.send(:rotate, 90)
+      tortoise.direction.should == 90
+    end
+
+    it 'can rotate the tortoise 360 degrees' do
+      tortoise.send(:rotate, 360)
+      tortoise.direction.should == 0
+    end
+
+    it 'can rotate the tortoise 495 degrees' do
+      tortoise.send(:rotate, 495)
+      tortoise.direction.should == 135
+    end
+
+    it 'can rotate the tortoise 810 degrees' do
+      tortoise.send(:rotate, 810)
+      tortoise.direction.should == 90
+    end
+
+    it 'can rotate the tortoise -45 degrees' do
+      tortoise.send(:rotate, -45)
+      tortoise.direction.should == 315
+    end
+
+    it 'can rotate the tortoise -90 degrees' do
+      tortoise.send(:rotate, -90)
+      tortoise.direction.should == 270
+    end
+
+    it 'can rotate the tortoise -360 degrees' do
+      tortoise.send(:rotate, -360)
+      tortoise.direction.should == 0
+    end
+
+    it 'can rotate the tortoise -495 degrees' do
+      tortoise.send(:rotate, -495)
+      tortoise.direction.should == 225
+    end
+
+    it 'can rotate the tortoise -810 degrees' do
+      tortoise.send(:rotate, -810)
+      tortoise.direction.should == 270
+    end
+
+    it 'can rotate the tortoise multiple times' do
+      tortoise.send(:rotate, 90)
+      tortoise.send(:rotate, 45)
+      tortoise.direction.should == 135
+    end
+  end
+
+  describe '#fd' do
+    it 'moves the tortoise forward when facing 0 degress' do
+      x, y = tortoise.position
+      tortoise.fd(2)
+      tortoise.position.should == [x, y + 2]
+    end
+
+    it 'moves the tortoise forward when facing 45 degress' do
+      x, y = tortoise.position
+      tortoise.rt(45)
+      tortoise.fd(2)
+      tortoise.position.should == [x + 2, y + 2]
+    end
+
+    it 'moves the tortoise forward when facing 90 degress' do
+      x, y = tortoise.position
+      tortoise.rt(90)
+      tortoise.fd(2)
+      tortoise.position.should == [x + 2, y]
+    end
+
+    it 'moves the tortoise forward when facing 135 degress' do
+      x, y = tortoise.position
+      tortoise.rt(135)
+      tortoise.fd(2)
+      tortoise.position.should == [x + 2, y - 2]
+    end
+
+    it 'moves the tortoise forward when facing 180 degress' do
+      x, y = tortoise.position
+      tortoise.rt(180)
+      tortoise.fd(2)
+      tortoise.position.should == [x, y - 2]
+    end
+
+    it 'moves the tortoise forward when facing 225 degress' do
+      x, y = tortoise.position
+      tortoise.rt(225)
+      tortoise.fd(2)
+      tortoise.position.should == [x - 2, y - 2]
+    end
+
+    it 'moves the tortoise forward when facing 270 degress' do
+      x, y = tortoise.position
+      tortoise.rt(270)
+      tortoise.fd(2)
+      tortoise.position.should == [x - 2, y]
+    end
+
+    it 'moves the tortoise forward when facing 315 degress' do
+      x, y = tortoise.position
+      tortoise.rt(315)
+      tortoise.fd(2)
+      tortoise.position.should == [x - 2, y + 2]
+    end
+
+    it 'stops when it reaches the top of the canvas' do
+      tortoise.fd(100)
+      x, y = tortoise.position
+      y.should < tortoise.size
+    end
+
+    it 'stops when it reaches the bottom of the canvas' do
+      tortoise.rt(180)
+      tortoise.fd(100)
+      x, y = tortoise.position
+      y.should >= 0
+    end
+
+    it 'stops when it reaches the right of the canvas' do
+      tortoise.rt(90)
+      tortoise.fd(100)
+      x, y = tortoise.position
+      x.should < tortoise.size
+    end
+
+    it 'stops when it reaches the left of the canvas' do
+      tortoise.rt(270)
+      tortoise.fd(100)
+      x, y = tortoise.position
+      x.should >= 0
+    end
+
+    it 'draws on traveled areas of the canvas' do
+      tortoise = Tortoise::Interpreter.new(5)
+      tortoise.rt(90)
+      tortoise.fd(1)
+      tortoise.rt(90)
+      tortoise.fd(2)
+      tortoise.lt(90)
+      tortoise.fd(1)
+      tortoise.rt(180)
+      tortoise.fd(2)
+      tortoise.canvas.should == [
+        [false, false, false, false, false],
+        [false, false, false, false, false],
+        [true , false, true , false, false],
+        [true , true , true , false, false],
+        [true , false, false, false, false]]
+    end
+  end
+
+  describe '#bk' do
+    it 'moves the tortoise forward when facing 0 degress' do
+      x, y = tortoise.position
+      tortoise.bk(2)
+      tortoise.position.should == [x, y - 2]
+    end
+
+    it 'moves the tortoise forward when facing 45 degress' do
+      x, y = tortoise.position
+      tortoise.rt(45)
+      tortoise.bk(2)
+      tortoise.position.should == [x - 2, y - 2]
+    end
+
+    it 'moves the tortoise forward when facing 90 degress' do
+      x, y = tortoise.position
+      tortoise.rt(90)
+      tortoise.bk(2)
+      tortoise.position.should == [x - 2, y]
+    end
+
+    it 'moves the tortoise forward when facing 135 degress' do
+      x, y = tortoise.position
+      tortoise.rt(135)
+      tortoise.bk(2)
+      tortoise.position.should == [x - 2, y + 2]
+    end
+
+    it 'moves the tortoise forward when facing 180 degress' do
+      x, y = tortoise.position
+      tortoise.rt(180)
+      tortoise.bk(2)
+      tortoise.position.should == [x, y + 2]
+    end
+
+    it 'moves the tortoise forward when facing 225 degress' do
+      x, y = tortoise.position
+      tortoise.rt(225)
+      tortoise.bk(2)
+      tortoise.position.should == [x + 2, y + 2]
+    end
+
+    it 'moves the tortoise forward when facing 270 degress' do
+      x, y = tortoise.position
+      tortoise.rt(270)
+      tortoise.bk(2)
+      tortoise.position.should == [x + 2, y]
+    end
+
+    it 'moves the tortoise forward when facing 315 degress' do
+      x, y = tortoise.position
+      tortoise.rt(315)
+      tortoise.bk(2)
+      tortoise.position.should == [x + 2, y - 2]
+    end
+
+    it 'stops when it reaches the bottom of the canvas' do
+      tortoise.bk(100)
+      x, y = tortoise.position
+      y.should >= 0
+    end
+
+    it 'stops when it reaches the top of the canvas' do
+      tortoise.rt(180)
+      tortoise.bk(100)
+      x, y = tortoise.position
+      y.should < tortoise.size
+    end
+
+    it 'stops when it reaches the left of the canvas' do
+      tortoise.rt(90)
+      tortoise.bk(100)
+      x, y = tortoise.position
+      x.should >= 0
+    end
+
+    it 'stops when it reaches the right of the canvas' do
+      tortoise.rt(270)
+      tortoise.bk(100)
+      x, y = tortoise.position
+      x.should < tortoise.size
+    end
+
+    it 'draws on traveled areas of the canvas' do
+      tortoise = Tortoise::Interpreter.new(5)
+      tortoise.lt(90)
+      tortoise.bk(1)
+      tortoise.rt(90)
+      tortoise.bk(2)
+      tortoise.lt(90)
+      tortoise.bk(1)
+      tortoise.rt(180)
+      tortoise.bk(2)
+      tortoise.canvas.should == [
+        [false, false, false, false, false],
+        [false, false, false, false, false],
+        [true , false, true , false, false],
+        [true , true , true , false, false],
+        [true , false, false, false, false]]
+    end
+  end
+
+  describe '#execute' do
+    it 'can execute lowercase commands' do
+      tortoise.send(:execute, 'rt 90')
+      tortoise.direction.should == 90
+    end
+
+    it 'can execute right turns' do
+      tortoise.send(:execute, 'RT 90')
+      tortoise.direction.should == 90
+    end
+
+    it 'can execute left turns' do
+      tortoise.send(:execute, 'LT 90')
+      tortoise.direction.should == 270
+    end
+
+    it 'can execute forward steps' do
+      x, y = tortoise.position
+      tortoise.send(:execute, 'FD 3')
+      tortoise.position.should == [x, y + 3]
+    end
+
+    it 'can execute backward steps' do
+      x, y = tortoise.position
+      tortoise.send(:execute, 'BK 2')
+      tortoise.position.should == [x, y - 2]
+    end
+
+    it 'can execute single item repeat blocks' do
+      tortoise.send(:execute, 'REPEAT 2 [ RT 45 ]')
+      tortoise.direction.should == 90
+    end
+
+    it 'can execute multi-item repeat blocks' do
+      tortoise.send(:execute, 'REPEAT 2 [ RT 45 LT 90 ]')
+      tortoise.direction.should == 270
+    end
+
+    it 'can execute commands with extra whitespace' do
+      tortoise.send(:execute, ' RT 90 ')
+      tortoise.direction.should == 90
+    end
+  end
+end

data/tortoise.gemspec

@@ -0,0 +1,26 @@
+# -*- encoding: utf-8 -*-
+$:.push File.expand_path("../lib", __FILE__)
+require "tortoise/version"
+
+Gem::Specification.new do |s|
+  s.name        = "tortoise"
+  s.version     = Tortoise::VERSION
+  s.authors     = ["Chris Hunt"]
+  s.email       = ["huntca@gmail.com"]
+  s.homepage    = "https://github.com/huntca/tortoise"
+  s.summary     = %q{Tortoise is a Logo interpreter for ruby.}
+  s.description = %q{Tortoise is a Logo interpreter for ruby.}
+
+  s.rubyforge_project = "tortoise"
+
+  s.files         = `git ls-files`.split("\n")
+  s.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
+  s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
+  s.require_paths = ["lib"]
+
+  # specify any dependencies here; for example:
+  # s.add_runtime_dependency "rest-client"
+
+  s.add_development_dependency "rake"
+  s.add_development_dependency "rspec"
+end

metadata

@@ -0,0 +1,88 @@
+--- !ruby/object:Gem::Specification
+name: tortoise
+version: !ruby/object:Gem::Version
+  version: 0.8.0
+  prerelease: 
+platform: ruby
+authors:
+- Chris Hunt
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-02-22 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: &70316818801540 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *70316818801540
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: &70316818793360 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *70316818793360
+description: Tortoise is a Logo interpreter for ruby.
+email:
+- huntca@gmail.com
+executables:
+- tortoise
+extensions: []
+extra_rdoc_files: []
+files:
+- .gitignore
+- .travis.yml
+- Gemfile
+- README.markdown
+- Rakefile
+- bin/tortoise
+- lib/tortoise.rb
+- lib/tortoise/interpreter.rb
+- lib/tortoise/version.rb
+- spec/data/complex.logo
+- spec/data/simple.logo
+- spec/data/simple_out.txt
+- spec/integration/tortoise_integration_spec.rb
+- spec/tortoise/interpreter_spec.rb
+- tortoise.gemspec
+homepage: https://github.com/huntca/tortoise
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: tortoise
+rubygems_version: 1.8.10
+signing_key: 
+specification_version: 3
+summary: Tortoise is a Logo interpreter for ruby.
+test_files:
+- spec/data/complex.logo
+- spec/data/simple.logo
+- spec/data/simple_out.txt
+- spec/integration/tortoise_integration_spec.rb
+- spec/tortoise/interpreter_spec.rb