danishkirel-turtle 0.0.1

data/LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2009 danishkirel
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.rdoc

@@ -0,0 +1,7 @@
+= turtle
+
+A turtle crouching on the floor.
+
+== Copyright
+
+Copyright (c) 2009 danishkirel. See LICENSE for details.

data/Rakefile

@@ -0,0 +1,57 @@
+require 'rubygems'
+require 'rake'
+
+begin
+  require 'jeweler'
+  Jeweler::Tasks.new do |gem|
+    gem.name = "turtle"
+    gem.summary = %Q{A turtle crouching on the floor}
+    gem.email = "danishkirel@gmail.com"
+    gem.homepage = "http://github.com/danishkirel/turtle"
+    gem.authors = ["danishkirel"]
+
+    # gem is a Gem::Specification... see http://www.rubygems.org/read/chapter/20 for additional settings
+    gem.add_dependency('ruby-opengl', '>= 0.60.1')
+  end
+rescue LoadError
+  puts "Jeweler not available. Install it with: sudo gem install technicalpickles-jeweler -s http://gems.github.com"
+end
+
+require 'rake/testtask'
+Rake::TestTask.new(:test) do |test|
+  test.libs << 'lib' << 'test'
+  test.pattern = 'test/**/*_test.rb'
+  test.verbose = true
+end
+
+begin
+  require 'rcov/rcovtask'
+  Rcov::RcovTask.new do |test|
+    test.libs << 'test'
+    test.pattern = 'test/**/*_test.rb'
+    test.verbose = true
+  end
+rescue LoadError
+  task :rcov do
+    abort "RCov is not available. In order to run rcov, you must: sudo gem install spicycode-rcov"
+  end
+end
+
+
+task :default => :test
+
+require 'rake/rdoctask'
+Rake::RDocTask.new do |rdoc|
+  if File.exist?('VERSION.yml')
+    config = YAML.load(File.read('VERSION.yml'))
+    version = "#{config[:major]}.#{config[:minor]}.#{config[:patch]}"
+  else
+    version = ""
+  end
+
+  rdoc.rdoc_dir = 'rdoc'
+  rdoc.title = "turtle #{version}"
+  rdoc.rdoc_files.include('README*')
+  rdoc.rdoc_files.include('lib/**/*.rb')
+end
+

data/VERSION.yml

@@ -0,0 +1,4 @@
+--- 
+:major: 0
+:minor: 0
+:patch: 1

data/examples/figures.rb

@@ -0,0 +1,14 @@
+require 'turtle'
+
+runner
+20.times do
+  wohin rand(640)-320, rand(480)-240
+  l,h = rand(100), rand(100)
+  36.times do
+    [l,h,l,h].each do |k|
+      vor k
+      rechts 90
+    end
+    rechts 10
+  end   
+end

data/lib/turtle.rb

@@ -0,0 +1,128 @@
+require 'opengl'
+include Gl,Glu,Glut
+include Math
+
+module Turtle
+
+  @@r, @@g, @@b = 0.0, 0.0, 0.0
+  @@angle = 0.0
+  @@x, @@y = 0.0, 0.0
+  @@paint = false
+  @@actions = []
+  
+  def Turtle.run
+    @@actions.each { |action| action.call }
+  end
+  
+  ### Turtle 'dsl'
+      
+  # sin = y, cos = x
+  def vor l
+    @@actions << lambda do
+      dx = cos PI*@@angle/180
+      dy = sin PI*@@angle/180
+      if @@paint
+        glBegin GL_LINE_STRIP
+          glColor3f @@r, @@g, @@b
+          glVertex2f @@x,@@y
+          @@x += l*dx
+          @@y += l*dy
+          glVertex2f @@x,@@y
+        glEnd
+      else
+        @@x += l*dx
+        @@y += l*dy
+      end
+    end
+  end
+  
+  def rechts w
+    @@actions << lambda { @@angle -= w % 360 }
+  end
+
+  def links(w)
+    @@actions << lambda { rechts(-w) }
+  end
+
+  def ruff
+    @@actions << lambda { @@pait = false }
+  end
+
+  def runner
+    @@actions << lambda { @@paint = true }
+  end
+
+  def wohin x,y
+    @@actions << lambda { @@x,@@y = x,y }
+  end
+
+end
+
+module GLStuff
+
+  def self.init
+  	glClearColor(1.0,1.0,1.0,1.0)
+  	glMatrixMode(GL_PROJECTION)
+  	glLoadIdentity()
+  	gluOrtho2D(-319,320,240,-239)
+  	glMatrixMode(GL_MODELVIEW)
+  	glLoadIdentity
+  end
+
+  def self.run
+    # Keyboard handler to exit when ESC is typed
+    keyboard = lambda do |key, x, y|
+    	case(key)
+    		when ?\e
+    			exit(0)
+    	end
+    	glutPostRedisplay
+    end
+
+    reshape = lambda do |w,h|
+    	glMatrixMode(GL_PROJECTION)
+    	glViewport(0,0,w,h)
+    	glLoadIdentity()
+    	#width = 0.5
+    	#height = 0.5 * h/w;
+    	#glFrustum(-width,width,-height,height,1.0,2000.0)
+    	glMatrixMode(GL_MODELVIEW)
+    	#glViewport(0,0,w,h)
+    end
+
+    drawGLScene = lambda do # Draw The Scene
+    	glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
+    	glMatrixMode(GL_MODELVIEW)
+    	glLoadIdentity
+	
+    	Turtle.run ### Turtle is run here
+	 
+    	glutSwapBuffers()
+    end
+
+    idle = lambda do
+    	glutPostRedisplay()
+    end
+
+    # Main
+    glutInit()
+    glutInitDisplayMode(GLUT_RGB | GLUT_DOUBLE | GLUT_ALPHA | GLUT_DEPTH)
+    glutInitWindowPosition(100,100)
+    glutInitWindowSize(640,480)
+    glutCreateWindow("TurtleGl")
+    glutDisplayFunc(drawGLScene)
+    #glutIdleFunc(idle)
+    #glutReshapeFunc(reshape)
+    glutKeyboardFunc(keyboard)
+
+    init()
+
+    glutMainLoop()
+  end
+  
+end
+
+# make Turtle commands available
+include Turtle
+
+at_exit { GLStuff.run }

data/test/test_helper.rb

@@ -0,0 +1,10 @@
+require 'rubygems'
+require 'test/unit'
+require 'shoulda'
+
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+$LOAD_PATH.unshift(File.dirname(__FILE__))
+require 'turtle'
+
+class Test::Unit::TestCase
+end

data/test/turtle_test.rb

@@ -0,0 +1,7 @@
+require 'test_helper'
+
+class TurtleTest < Test::Unit::TestCase
+  should "probably rename this file and start testing for real" do
+    flunk "hey buddy, you should probably rename this file and start testing for real"
+  end
+end

metadata

@@ -0,0 +1,72 @@
+--- !ruby/object:Gem::Specification 
+name: danishkirel-turtle
+version: !ruby/object:Gem::Version 
+  version: 0.0.1
+platform: ruby
+authors: 
+- danishkirel
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-04-06 00:00:00 -07:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: ruby-opengl
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 0.60.1
+    version: 
+description: 
+email: danishkirel@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- LICENSE
+- README.rdoc
+files: 
+- LICENSE
+- README.rdoc
+- Rakefile
+- VERSION.yml
+- examples/figures.rb
+- lib/turtle.rb
+- test/test_helper.rb
+- test/turtle_test.rb
+has_rdoc: true
+homepage: http://github.com/danishkirel/turtle
+post_install_message: 
+rdoc_options: 
+- --charset=UTF-8
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.2.0
+signing_key: 
+specification_version: 2
+summary: A turtle crouching on the floor
+test_files: 
+- test/test_helper.rb
+- test/turtle_test.rb
+- examples/figures.rb