some vecmath examples

Author: monkstone

processing_app/library/fastmath/clock.rb

@@ -0,0 +1,60 @@
+#!/usr/bin/env jruby -v -W2
+# frozen_string_literal: true
+require 'propane'
+# The current local time can be read with the Time.now
+# the seconds Time.now.sec, minutes Time.now.min etc...
+# functions. In this example, DegLut.sin() and DegLut.cos() values are used to
+# set the position of the hands, perfect for degree precision Lookup Table.
+class Clock < Propane::App
+
+  def setup
+    sketch_title 'Clock'
+    stroke 255
+    @font = create_font 'Roman', 20
+    text_font @font
+  end
+
+  def draw
+    background 0
+    fill 80
+    no_stroke
+    # adj factor to map 0-60 to 0-360 (sec/min) & 0-12 to 0-360 (hours)
+    # since angles for DegLut.sin() and DegLut.cos() start at 3 o'clock we
+    # subtract 90 degrees to make them start at the top.
+    clock_x = lambda do |val, adj, length|
+      DegLut.cos((val * adj).to_i - 90) * length + width / 2
+    end
+    clock_y = lambda do |val, adj, length|
+      DegLut.sin((val * adj).to_i - 90) * length + height / 2
+    end
+    ellipse 100, 100, 160, 160
+    stroke 220
+    stroke_weight 6
+    t = Time.now
+    line(100, 100, clock_x.call(t.hour % 12 + (t.min / 60.0), 30, 50),
+    clock_y.call(t.hour % 12 + (t.min / 60.0), 30, 50))
+    stroke_weight 3
+    line(100, 100, clock_x.call(t.min + (t.sec / 60.0), 6, 60),
+    clock_y.call(t.min + (t.sec / 60.0), 6, 60))
+    stroke 255, 0, 0
+    stroke_weight 1
+    line(100, 100, clock_x.call(t.sec, 6, 72), clock_y.call(t.sec, 6, 72))
+    # Draw the minute ticks
+    stroke_weight 2
+    stroke 255
+    (0..360).step(6) do |a|
+      x = 100 + DegLut.cos(a) * 72
+      y = 100 + DegLut.sin(a) * 72
+      point x, y
+    end
+    fill 200
+    text t.strftime('%H:%M:%S'), 50, 200
+  end
+
+  def settings
+    size 200, 220, P2D
+    smooth 8
+  end
+end
+
+Clock.new

processing_app/library/vecmath/arcball/Rakefile

@@ -0,0 +1,30 @@
+# Simple demo Rakefile to autorun samples in current directory
+# adjust path to rp5 executable, and or opts as required
+
+SAMPLES_DIR = './'
+
+desc 'run demo'
+task default: [:demo]
+
+desc 'demo'
+task :demo do
+  samples_list.shuffle.each{ |sample| run_sample sample }
+end
+
+def samples_list
+  files = []
+  Dir.chdir(SAMPLES_DIR)
+  Dir.glob('*.rb').each do |file|
+    files << File.join(SAMPLES_DIR, file)
+  end
+  return files
+end
+
+def run_sample(sample_name)
+  puts "Running #{sample_name}...quit to run next sample"
+  open("|jruby #{sample_name}", 'r') do |io|
+    while l = io.gets
+      puts(l.chop)
+    end      
+  end
+end

processing_app/library/vecmath/arcball/arcball_box.rb

@@ -0,0 +1,33 @@
+#!/usr/bin/env jruby -v -W2
+# frozen_string_literal: true
+require 'propane'
+require 'arcball'
+# The current local time can be read with the Time.now
+# the seconds Time.now.sec, minutes Time.now.min etc...
+# functions. In this example, DegLut.sin() and DegLut.cos() values are used to
+# set the position of the hands, perfect for degree precision Lookup Table.
+class ArcBallBox < Propane::App
+  ############################
+  # Use mouse drag to rotate
+  # the arcball. Use mousewheel
+  # to zoom. Hold down x, y, z
+  # to constrain rotation axis.
+  ############################
+  def setup
+    sketch_title 'Arcball Box'
+    Processing::ArcBall.init self, 300, 300
+    fill 180
+  end
+
+  def draw
+    background 50
+    box 300, 300, 300
+  end
+
+  def settings
+    size 600, 600, P3D
+    smooth 8
+  end
+end
+
+ArcBallBox.new

processing_app/library/vecmath/arcball/arcball_shape.rb

@@ -0,0 +1,38 @@
+#!/usr/bin/env jruby -v -W2
+# frozen_string_literal: true
+require 'propane'
+require 'arcball'
+
+class ArcBallShape < Propane::App
+  attr_reader :my_cube
+
+  def setup
+    sketch_title 'Arcball Shape'
+    Processing::ArcBall.init(self)
+    @my_cube = create_shape BOX, 400, 400, 400
+    my_cube.set_fill(color(100, 10, 100))
+  end
+
+  def draw
+    background(50, 50, 100)
+    define_lights
+    lights
+    stroke(0)
+    shape(my_cube)
+  end
+
+  def define_lights
+    ambient(20, 20, 20)
+    ambient_light(50, 50, 50)
+    point_light(30, 30, 30, 200, -150, 0)
+    directional_light(0, 30, 50, 1, 0, 0)
+    spot_light(30, 30, 30, 0, 40, 200, 0, -0.5, -0.5, PI / 2, 2)
+  end
+
+  def settings
+    size 600, 600, P3D
+    smooth 8
+  end
+end
+
+ArcBallShape.new

processing_app/library/vecmath/arcball/constrain.rb

@@ -0,0 +1,31 @@
+#!/usr/bin/env jruby -v -W2
+# frozen_string_literal: true
+require 'propane'
+require 'arcball'
+
+############################
+# Use mouse drag to rotate
+# the arcball. Use mousewheel
+# to zoom. Constrained to
+# rotation around y-axis.
+############################
+class Constrain < Propane::App
+
+  def setup
+    sketch_title 'Arcball Box'
+    Processing::ArcBall.constrain self
+    fill 180
+  end
+
+  def draw
+    background 50
+    box 300, 300, 300
+  end
+
+  def settings
+    size 600, 600, P3D
+    smooth 8
+  end
+end
+
+Constrain.new

processing_app/library/vecmath/arcball/custom_constrain.rb

@@ -0,0 +1,31 @@
+#!/usr/bin/env jruby -v -W2
+# frozen_string_literal: true
+require 'propane'
+require 'arcball'
+
+############################
+# Use mouse drag to rotate
+# the arcball. Use mousewheel
+# to zoom. Constrained to
+# rotation around z-axis
+############################
+class Constrain < Propane::App
+
+  def setup
+    sketch_title 'Arcball Box'
+    Processing::ArcBall.constrain self, :zaxis
+    fill 180
+  end
+
+  def draw
+    background 50
+    box 300, 300, 300
+  end
+
+  def settings
+    size 600, 600, P3D
+    smooth 8
+  end
+end
+
+Constrain.new