ruby-processing 2.4.3 → 2.4.4

data/samples/external_library/ruby_gem/README

@@ -7,6 +7,6 @@ The absolute belt and brace way to use external ruby libraries ie gems:
 4. Run ruby-processing starting from jruby
    jruby -S rp5 run sketch.rb
 
-See worked perlin_force and mdarray_test in this folder 
+See worked ai4r and mdarray_test in this folder 
 NB: library will need to work with jruby this excludes most native libraries
 but pure ruby libraries (+java) should be fine

data/samples/external_library/ruby_gem/data/data.json

@@ -0,0 +1,8 @@
+{"TRIANGLE":[[0,0,0,0,0,0,0,127,127,0,0,0,0,0,0,0],[0,0,0,0,0,0,25,229,229,25,0,0,0,0,0,0],[0,0,0,0,0,0,127,127,127,127,0,0,0,0,0,0],[0,0,0,0,0,25,229,25,25,229,25,0,0,0,0,0],[0,0,0,0,0,127,127,0,0,127,127,0,0,0,0,0],[0,0,0,0,25,229,25,0,0,25,229,25,0,0,0,0],[0,0,0,0,127,127,0,0,0,0,127,127,0,0,0,0],[0,0,0,25,229,25,0,0,0,0,25,229,25,0,0,0],[0,0,0,127,127,0,0,0,0,0,0,127,127,0,0,0],[0,0,25,229,25,0,0,0,0,0,0,25,229,25,0,0],[0,0,127,127,0,0,0,0,0,0,0,0,127,127,0,0],[0,25,229,25,0,0,0,0,0,0,0,0,25,229,25,0],[0,127,127,0,0,0,0,0,0,0,0,0,0,127,127,0],[25,229,25,0,0,0,0,0,0,0,0,0,0,25,229,25],[127,127,0,0,0,0,0,0,0,0,0,0,0,0,127,127],[255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255]]
+,"SQUARE":[[255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255],[255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255],[255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255],[255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255],[255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255],[255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255],[255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255],[255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255],[255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255],[255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255],[255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255],[255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255],[255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255],[255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255],[255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255],[255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255]]
+,"CROSS":[[0,0,0,0,0,0,0,127,127,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,127,127,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,127,127,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,127,127,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,127,127,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,127,127,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,127,127,0,0,0,0,0,0,0],[127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127],[127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127],[0,0,0,0,0,0,0,127,127,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,127,127,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,127,127,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,127,127,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,127,127,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,127,127,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,127,127,0,0,0,0,0,0,0]]
+,"CIRCLE":[[0,0,0,0,32,64,64,80,80,64,64,32,0,0,0,0],[0,0,32,64,96,103,64,64,64,64,96,96,64,32,0,0],[0,32,96,128,96,32,0,0,0,0,32,89,128,96,32,0],[0,64,128,96,18,0,0,0,0,0,0,0,64,128,64,0],[32,96,96,18,0,0,0,0,0,0,0,0,0,82,101,32],[64,103,32,0,0,0,0,0,0,0,0,0,0,32,96,64],[64,64,0,0,0,0,0,0,0,0,0,0,0,0,64,68],[80,64,0,0,0,0,0,0,0,0,0,0,0,0,64,104],[80,64,0,0,0,0,0,0,0,0,0,0,0,0,64,106],[64,64,0,0,0,0,0,0,0,0,0,0,0,0,64,70],[64,96,32,0,0,0,0,0,0,0,0,0,0,32,96,64],[32,96,88,0,0,0,0,0,0,0,0,0,0,64,119,32],[0,64,128,64,0,0,0,0,0,0,0,0,32,113,70,0],[0,32,96,128,81,32,0,0,0,0,32,64,113,96,32,0],[0,0,32,64,102,96,64,64,64,64,96,119,70,32,0,0],[0,0,0,0,32,64,69,105,106,70,64,32,0,0,0,0]]
+,"TRIANGLE_WITH_NOISE":[[25,0,0,0,0,0,0,25,127,0,0,25,0,0,0,0],[0,0,0,0,76,0,25,229,229,25,0,0,0,0,76,0],[0,76,0,0,0,0,127,25,127,76,0,0,0,0,0,178],[0,0,0,178,0,25,229,25,25,229,25,0,0,0,76,0],[0,0,0,0,0,76,127,0,76,127,127,0,0,0,0,0],[0,25,0,0,25,229,25,0,25,25,229,25,0,0,0,0],[25,0,0,0,127,127,0,0,0,0,127,127,178,0,0,76],[0,0,76,76,229,25,0,0,25,0,25,229,25,0,0,0],[0,0,0,127,127,0,76,178,0,0,0,127,127,0,0,0],[0,0,25,229,25,0,0,0,0,0,0,25,229,25,0,0],[0,0,127,127,0,0,0,0,76,0,0,0,127,127,0,0],[0,25,229,25,0,0,0,0,0,0,0,0,25,229,25,0],[0,127,127,0,76,0,0,76,0,0,0,0,0,127,127,0],[25,229,25,0,0,76,0,0,0,25,0,0,0,25,229,25],[127,127,0,0,0,0,0,0,0,0,0,0,0,0,127,127],[255,255,255,255,25,255,255,255,255,255,25,255,255,255,255,255]]
+,"SQUARE_WITH_NOISE":[[255,76,255,255,255,153,255,255,255,255,255,102,255,255,255,255],[255,0,0,0,0,178,0,0,0,0,0,0,0,0,0,255],[255,0,76,0,0,0,0,178,0,153,25,0,0,0,0,0],[255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255],[255,0,102,0,102,0,0,0,25,0,76,0,0,102,0,255],[255,0,0,0,0,0,0,25,0,0,0,0,0,0,0,0],[255,0,0,0,76,153,0,0,25,0,0,0,0,0,0,255],[255,0,0,0,0,0,0,102,0,0,0,0,178,0,0,255],[255,102,102,0,0,0,0,0,0,0,0,0,0,0,0,255],[255,0,178,0,0,76,0,0,0,0,0,0,0,0,0,255],[255,0,0,0,0,0,0,0,76,0,0,0,0,0,178,255],[255,0,76,0,102,0,0,0,0,153,0,0,0,0,0,255],[255,0,0,0,0,0,0,0,0,0,0,0,25,0,0,255],[255,0,0,153,0,0,0,178,0,0,0,178,0,0,0,255],[255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255],[255,255,255,255,76,255,255,255,255,0,255,255,25,255,25,255]]
+,"CROSS_WITH_NOISE":[[0,0,0,0,0,0,76,76,127,0,76,0,0,0,25,0],[0,25,0,0,0,25,0,127,127,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,127,127,0,0,0,76,0,0,0],[0,0,25,204,0,0,0,127,127,0,102,0,0,0,25,0],[0,0,0,0,0,76,0,127,0,0,0,0,25,0,0,0],[0,0,0,204,0,0,0,127,127,0,0,0,0,0,0,25],[0,0,0,0,0,0,0,127,127,0,76,0,0,0,0,0],[127,127,127,204,127,76,127,127,127,127,127,127,127,127,0,5],[127,127,127,127,127,127,127,127,25,127,127,127,127,25,0,0],[0,0,0,204,0,0,0,102,127,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,127,127,102,0,0,0,0,0,0],[0,0,0,0,0,102,0,127,127,0,0,0,0,0,0,0],[102,0,0,102,0,0,0,127,127,0,0,0,25,0,0,0],[0,0,0,0,0,25,0,127,102,102,76,0,0,0,0,0],[0,0,0,0,0,0,0,127,127,0,0,0,255,0,0,0],[0,0,0,0,0,0,0,127,127,0,0,0,0,0,0,0]]
+,"CIRCLE_WITH_NOISE":[[0,0,0,0,21,0,21,128,128,21,0,21,0,0,0,0],[0,0,8,17,128,128,110,0,0,21,128,128,98,21,0,0],[0,8,21,128,21,21,0,0,0,0,21,21,128,21,21,0],[0,0,128,21,0,0,0,0,0,0,0,0,21,128,2,0],[21,128,21,0,0,0,0,0,0,0,0,0,0,21,128,21],[0,128,42,0,0,0,0,0,0,0,0,0,0,31,128,0],[0,25,0,0,0,0,0,0,0,0,0,0,0,0,21,21],[128,0,0,0,0,0,0,0,0,0,0,0,0,0,89,128],[23,0,0,0,0,0,0,0,0,0,0,0,0,0,0,128],[21,24,12,0,0,0,0,0,0,0,0,0,0,0,128,21],[0,128,21,0,0,0,0,0,0,0,0,0,0,32,128,0],[21,42,21,21,0,0,0,0,0,0,0,0,0,21,128,27],[0,13,128,21,21,0,0,0,0,0,0,0,21,128,86,0],[0,3,21,128,21,31,0,0,0,0,21,21,128,21,0,0],[0,0,0,88,128,128,128,3,89,128,128,128,21,0,0,0],[0,0,0,0,21,0,21,128,128,21,0,21,0,0,0,0]]}

data/samples/external_library/ruby_gem/draw_test.rb

@@ -0,0 +1,171 @@
+#####################################################################
+# Using the ai4r gem in ruby-processing.
+# A simple example that demonstrates using
+# a backpropagation neural network. Use the drop box menu to
+# select a prebuilt shape. To draw a test shape tick drawing checkbox,
+# release the mouse when drawing a discontinous shape eg cross.
+# Clear the sketch with clear button. 
+# Press evaluate and result is printed to the console....
+####################################################################
+
+require 'ai4r'
+require 'json'
+
+load_library :vecmath, :control_panel
+
+attr_reader  :img, :img_pixels, :ci_input, :cr_input, :tr_input, :sq_input, :net, :points, :panel, :hide, :drawing, :source_string
+
+def setup
+  size(320, 320)
+  control_panel do |c|
+    c.title = "control"
+    c.look_feel "Nimbus"
+    c.checkbox :drawing
+    c.button :clear
+    c.button :evaluate
+    c.menu :shape, ['CIRCLE', 'CROSS', 'CROSS_WITH_NOISE', 'SQUARE', 'SQUARE_WITH_NOISE', 'TRIANGLE', 'DEFAULT']
+    @panel = c
+  end
+  @hide = false
+  @source_string = open("data/data.json", "r"){ |file| file.read }
+  triangle = JSON.parse(source_string)["TRIANGLE"]
+  square = JSON.parse(source_string)["SQUARE"]
+  cross = JSON.parse(source_string)["CROSS"]
+  circle = JSON.parse(source_string)["CIRCLE"]
+  @points = []
+  srand 1
+  @net = Ai4r::NeuralNetwork::Backpropagation.new([256, 3])
+  @tr_input = triangle.flatten.collect { |input| input.to_f / 127.0}
+  @sq_input = square.flatten.collect { |input| input.to_f / 127.0}
+  @cr_input = cross.flatten.collect { |input| input.to_f / 127.0}
+  @ci_input = circle.flatten.collect { |input| input.to_f / 127.0}
+  train  
+  background 255
+end
+
+
+def draw
+  # only make control_panel visible once, or again when hide is false
+  unless hide
+    @hide = true
+    panel.set_visible(hide)    
+  end
+  if drawing
+    stroke_weight 32	
+    stroke 127
+    points.each_cons(2) { |ps, pe| line ps.x, ps.y, pe.x, pe.y}
+  else    
+    no_fill
+    stroke_weight(32)
+    stroke(127)
+    case @shape
+    when 'CIRCLE'
+      background(255)
+      draw_circle
+      @shape = 'DEFAULT'
+    when 'CROSS'
+      background(255)
+      draw_cross      
+      @shape = 'DEFAULT'
+    when 'CROSS_WITH_NOISE','SQUARE_WITH_NOISE'
+      background(255)
+      draw_shape @shape
+      @shape = 'DEFAULT'
+    when 'SQUARE'
+      background(255)
+      draw_square
+      @shape = 'DEFAULT'
+    when 'TRIANGLE'
+      background(255)
+      draw_triangle
+      @shape = 'DEFAULT'
+    end
+  end
+end
+
+def draw_shape shp
+  shape = JSON.parse(source_string)[shp]
+  background(255)
+  no_stroke
+  (0  ... width / 20).each do |i|
+    (0  ... height / 20).each do |j|
+      col = 255 - shape[i][j]
+      fill(col)
+      rect(i * 20, j * 20,  20,  20)
+    end
+  end
+end
+
+def train
+  puts "Training Network Please Wait"
+  101.times do |i|
+    error = net.train(tr_input, [1.0, 0, 0])
+    error = net.train(sq_input, [0, 1.0, 0])
+    error = net.train(cr_input, [0, 0, 1.0])
+    error = net.train(ci_input, [0, 1.0, 1.0])
+    puts "Error after iteration #{i}:\t#{format("%.5f", error)}" if i%20 == 0
+  end
+end
+
+def result_label(result)
+  if result.inject(0, :+).between?(1.9, 2.1)
+    if result[0] < 0.01 && result[1].between?(0.99, 1.0) && result[2].between?(0.99, 1.0)
+      return "CIRCLE"
+    else
+      return "UNKNOWN"
+    end
+  elsif result.inject(0, :+).between?(0.95, 1.1)
+    if result[0].between?(0.95, 1.0) && (result[1] + result[2]) < 0.01
+      return "TRIANGLE"
+    elsif result[1].between?(0.95, 1.0) && (result[0] + result[2]) < 0.01
+      return "SQUARE"
+    elsif result[2].between?(0.95, 1.0) && (result[1] + result[0]) < 0.01
+      return "CROSS"
+    else
+      return "UNKNOWN"	  
+    end
+  end
+  return "UNKNOWN"
+end
+
+def mouse_dragged
+  points << Vec2D.new(mouse_x, mouse_y)
+end
+
+def mouse_released
+  points.clear
+end
+
+def draw_circle
+  ellipse(width / 2, height / 2, 320 - 32, 320 - 32)
+end
+
+def draw_square
+  rect(16, 16, 320 - 32, 320 - 32)
+end
+
+def draw_cross
+  line(width / 2, 0, width / 2, 320)
+  line(0, height / 2,  320 , height / 2)
+end
+
+def draw_triangle
+  triangle(width / 2, 32, 24, height - 16,  width - 24, height - 16)
+end
+
+def clear
+  background 255
+end
+
+def evaluate    
+  load_pixels
+  img_pixels = []
+  (0...height).step(20) do |y|
+    row = []
+    (0...width).step(20) do |x|
+      row << 255 - brightness(pixels[(y + 10) * width + x + 10])
+    end
+    img_pixels << row
+  end  	
+  puts "#{net.eval(img_pixels.flatten).inspect} => #{result_label(net.eval(img_pixels.flatten))}"   	
+end

data/samples/processing_app/basics/form/icosahedra.rb

@@ -0,0 +1,39 @@
+load_libraries :icosahedron, :vecmath
+
+def setup
+  size 640, 360, P3D
+  @ico1 = Icosahedron.new 75.0
+  @ico2 = Icosahedron.new 75.0
+  @ico3 = Icosahedron.new 75.0
+end
+
+def draw
+  background 0
+  lights
+  translate width/2, height/2
+  push_matrix
+  translate -width/3.5, 0
+  rotate_x frame_count * PI / 185
+  rotate_y frame_count * PI / -200
+  stroke 170, 0, 0
+  no_fill
+  @ico1.draw
+  pop_matrix
+  push_matrix
+  rotate_x frame_count * PI / 200
+  rotate_y frame_count * PI / 300
+  stroke 170, 0, 180
+  fill 170, 170, 0
+  @ico2.draw
+  pop_matrix
+  push_matrix
+  translate width/3.5, 0
+  rotate_x frame_count * PI / -200
+  rotate_y frame_count * PI / 200
+  no_stroke
+  fill 0, 0, 185
+  @ico3.draw
+  pop_matrix
+end
+
+

data/samples/processing_app/basics/form/library/icosahedron/icosahedron.rb

@@ -0,0 +1,60 @@
+class Icosahedron
+  include Processing::Proxy   # mixin Processing::Proxy
+  attr_reader :r 
+  
+  def initialize(radius)
+    @r = radius
+  end
+  
+  ##
+  # Draw an icosahedron defined by a radius r.
+  #
+  def draw
+    # Calculate the vertex data for an icosahedron inscribed by a sphere radius 'r'.
+    # Use 4 Golden Ratio rectangles as the basis.
+    phi = (1.0 + Math.sqrt(5.0)) / 2.0
+    h = r / Math.sqrt(1.0 + phi * phi)
+    v =
+      [
+    Vec3D.new(0, -h, h * phi), Vec3D.new(0, -h, -h * phi), Vec3D.new(0, h, -h * phi), Vec3D.new(0, h, h * phi),
+    Vec3D.new(h, -h * phi, 0), Vec3D.new(h, h * phi, 0), Vec3D.new(-h, h * phi, 0), Vec3D.new(-h, -h * phi, 0),
+    Vec3D.new(-h * phi, 0, h), Vec3D.new(-h * phi, 0, -h), Vec3D.new(h * phi, 0, -h), Vec3D.new(h * phi, 0, h)
+    ]
+    
+    begin_shape(TRIANGLES)
+      
+      draw_triangle(v[0], v[7],v[4])
+      draw_triangle(v[0], v[4], v[11])
+      draw_triangle(v[0], v[11], v[3])
+      draw_triangle(v[0], v[3], v[8])
+      draw_triangle(v[0], v[8], v[7])
+      
+      draw_triangle(v[1], v[4], v[7])
+      draw_triangle(v[1], v[10], v[4])
+      draw_triangle(v[10], v[11], v[4])
+      draw_triangle(v[11], v[5], v[10])
+      draw_triangle(v[5], v[3], v[11])
+      draw_triangle(v[3], v[6], v[5])
+      draw_triangle(v[6], v[8], v[3])
+      draw_triangle(v[8], v[9], v[6])
+      draw_triangle(v[9], v[7], v[8])
+      draw_triangle(v[7], v[1], v[9])
+      
+      draw_triangle(v[2], v[1], v[9])
+      draw_triangle(v[2], v[10], v[1])
+      draw_triangle(v[2], v[5], v[10])
+      draw_triangle(v[2], v[6], v[5])
+      draw_triangle(v[2], v[9], v[6])
+      
+    end_shape
+  end
+  
+  def draw_triangle(p1, p2, p3)
+    
+    vertex(p1.x, p1.y, p1.z)
+    vertex(p2.x, p2.y, p2.z)
+    vertex(p3.x, p3.y, p3.z)
+    
+  end
+  
+end

data/samples/processing_app/basics/form/toroid.rb

@@ -16,112 +16,98 @@
 # 	'w' key _________ toggle wireframe/solid shading 
 # 	'h' key _________ toggle sphere/helix 
 
+load_library :vecmath
 
-
-
-def setup
-    
-    size 640, 360, P3D
-    
-    @pts = 40
-    @angle = 0.0
-    @radius = 60.0
-    @segments = 60.0
-    @lathe_angle = 0.0
-    @lathe_radius = 100.0
-    @is_wireframe = false
-    @is_helix = false
-    @helix_offset = 5.0
-    
+def setup  
+  size 640, 360, P3D  
+  @pts = 40
+  @angle = 0.0
+  @radius = 60.0
+  @segments = 60.0
+  @lathe_angle = 0.0
+  @lathe_radius = 100.0
+  @is_wireframe = false
+  @is_helix = false
+  @helix_offset = 5.0  
 end
 
-def draw
+def draw  
+  background 50, 64, 42  
+  lights  
+  if @is_wireframe
+    stroke 255, 255, 150
+    no_fill
+  else
+    no_stroke
+    fill 150, 195, 125
+  end
+  
+  translate width/2, height/2, -100
+  
+  rotate_x frame_count * PI / 150
+  rotate_y frame_count * PI / 170
+  rotate_z frame_count * PI / 90
+  
+  vertices = []
+  vertices2 = []
+  
+  0.upto(@pts) do |i|
     
-    background 50, 64, 42
+    vertices2[i] = Vec3D.new
+    vertices[i] = Vec3D.new
     
-    lights
+    vertices[i].x = @lathe_radius + sin( radians( @angle ) ) * @radius
     
-    if @is_wireframe
-        stroke 255, 255, 150
-        no_fill
+    if @is_helix
+      vertices[i].z = cos( radians( @angle ) ) * @radius - (@helix_offset * @segments) / 2
     else
-        no_stroke
-        fill 150, 195, 125
+      vertices[i].z = cos( radians( @angle ) ) * @radius
     end
     
-    translate width/2, height/2, -100
-    
-    rotate_x frame_count * PI / 150
-    rotate_y frame_count * PI / 170
-    rotate_z frame_count * PI / 90
-    
-    vertices = []
-    vertices2 = []
-    
-    0.upto(@pts) { |i|
-        
-        vertices2[i] = PVector.new
-        vertices[i] = PVector.new
+    @angle += 360.0 / @pts
+  end
+  
+  @lathe_angle = 0
+  
+  0.upto(@segments) do |i|
+    begin_shape QUAD_STRIP
+      (0..@pts).each do |j|
+        vertex_for_vector vertices2[j] if i > 0
         
-        vertices[i].x = @lathe_radius + sin( radians( @angle ) ) * @radius
+        vertices2[j].x = cos( radians( @lathe_angle ) ) * vertices[j].x
+        vertices2[j].y = sin( radians( @lathe_angle )
+          ) * vertices[j].x
+        vertices2[j].z = vertices[j].z
         
-        if @is_helix
-            vertices[i].z = cos( radians( @angle ) ) * @radius - (@helix_offset * @segments) / 2
-        else
-            vertices[i].z = cos( radians( @angle ) ) * @radius
-        end
+        vertices[j].z += @helix_offset if @is_helix
         
-        @angle += 360.0 / @pts
-    }
-    
-    @lathe_angle = 0
-    
-    0.upto(@segments) { |i|
-        begin_shape QUAD_STRIP
-            (0..@pts).each { |j|
-                vertex_for_pvector vertices2[j] if i > 0
-                
-                vertices2[j].x = cos( radians( @lathe_angle ) ) * vertices[j].x
-                vertices2[j].y = sin( radians( @lathe_angle )
-                    ) * vertices[j].x
-                vertices2[j].z = vertices[j].z
-                
-                vertices[j].z += @helix_offset if @is_helix
-                
-                vertex_for_pvector vertices2[j]
-            }
-            
-            @lathe_angle += (@is_helix ? 720 : 360) / @segments
-            end_shape
-    }
-    
+        vertex_for_vector vertices2[j]
+      end
+      
+      @lathe_angle += (@is_helix ? 720 : 360) / @segments
+      end_shape
+  end
+  
 end
 
-def vertex_for_pvector ( pvec )
-    vertex( pvec.x, pvec.y, pvec.z )
+def vertex_for_vector ( pvec )
+  vertex( pvec.x, pvec.y, pvec.z )
 end
 
-def key_pressed
-    
-    if key == CODED
-        
-        @pts += 1 if keyCode == UP && @pts < 40
-        @pts -= 1 if keyCode == DOWN && @pts > 3
-        
-        @segments += 1 if keyCode == RIGHT && @segments < 80
-        @segments -= 1 if keyCode == LEFT && @segments > 3
-        
-    end
-    
-    @lathe_radius += 1 if key.eql? "s"
-    @lathe_radius -= 1 if key.eql? "a" #&& @lathe_radius > 0
-    
-    @radius += 1 if key.eql? "x"
-    @radius -= 1 if key.eql? "z" && @radius > 10
-    
-    @is_wireframe = !@is_wireframe if key.eql? "w"
-    
-    @is_helix = !@is_helix if key.eql? "h"
-    
-end
+def key_pressed 
+  
+  if key == CODED    
+    @pts += 1 if keyCode == UP && @pts < 40
+    @pts -= 1 if keyCode == DOWN && @pts > 3    
+    @segments += 1 if keyCode == RIGHT && @segments < 80
+    @segments -= 1 if keyCode == LEFT && @segments > 3    
+  end 
   
+  @lathe_radius += 1 if key == 's'
+  @lathe_radius -= 1 if key == 'a' #&& @lathe_radius > 0  
+  @radius += 1 if key == 'x'
+  @radius -= 1 if key == 'z' && @radius > 10  
+  @is_wireframe = !@is_wireframe if key == 'w'  
+  @is_helix = !@is_helix if key == 'h'  
+end
+