Examples demonstrating use of noise_mode.

Author: monkstone

CHANGELOG.md

@@ -1 +1,3 @@
+**3.0** Simplex Noise examples
+
 **v1.8** Update examples for hemesh-6.0.1, update pixelflow examples add more gui examples including skatolo

contributed/decagon_grid.rb

@@ -0,0 +1,58 @@
+#!/usr/bin/env jruby
+require 'propane'
+# Example of a grid of decagons with perlin noise after Lenny Herzog
+class DecagonGrid < Propane::App
+  load_library :pdf
+  NOISE_STRENGTH = 80.0
+  THETA = 36
+  attr_reader :version, :save, :noise_generator
+
+  def setup
+    sketch_title 'Decagon Grid'
+    frame_rate 24
+    @version = 0
+    @save = false
+    @noise_generator = lambda do |x, y, seed|
+      NOISE_STRENGTH * noise(
+        x / 150.0,
+        y / 150.0 + seed * 2,
+        seed
+      ) - 100
+    end
+  end
+
+  def draw
+    begin_record(PDF, data_path("Line_#{version}.pdf")) if save
+    background(255)
+    no_fill
+    stroke(0)
+    stroke_weight(1)
+    grid(height + 100, width + 100, 50, 50) do |cy, cx|
+      begin_shape
+      (0..360).step(THETA) do |angle|
+        x = (DegLut.cos(angle) * 60) + cx
+        y = (DegLut.sin(angle) * 60) + cy
+        noise_value = noise_generator.call(x, y, millis / 5_000.0)
+        x += noise_value
+        y += noise_value
+        vertex(x, y)
+      end
+      end_shape(CLOSE)
+    end
+    return unless save
+
+    end_record
+    @version += 1
+    @save = false
+  end
+
+  def mouse_pressed
+    @save = true
+  end
+
+  def settings
+    size(1000, 1000)
+  end
+end
+
+DecagonGrid.new

contributed/terrain.rb

@@ -8,7 +8,7 @@ def eql?(key)
     key.x == x
   end
 end
-# The propane sketch
+# The propane sketch press mouse to use SimpleNoise
 class Terrain < Propane::App
   WIDTH = 1400
   HEIGHT = 1100
@@ -43,7 +43,7 @@ def draw
     stroke 235, 69, 129
     translate width / 2, height / 2
     rotate_x PI / 3
-    translate(-WIDTH / 2, -HEIGHT / 2)    
+    translate(-WIDTH / 2, -HEIGHT / 2)
     (0...rows).each do |y|
       begin_shape(TRIANGLE_STRIP)
       (0..columns).each do |x|
@@ -54,6 +54,18 @@ def draw
     end
   end
 
+  def mouse_pressed
+    mode = Propane::SIMPLEX
+    noise_mode mode
+    sketch_title "#{mode}"
+  end
+
+  def mouse_released
+    mode = Propane::VALUE
+    noise_mode(mode)
+    sketch_title "#{mode}"
+  end
+
   private
 
   def renderer

external_library/gem/toxiclibs/geometry/circle_resolution.rb

@@ -0,0 +1,31 @@
+#!/usr/bin/env jruby -w
+require 'propane'
+require 'toxiclibs'
+java_import 'toxi.geom.Circle'
+
+class CircleResolution < Propane::App
+  attr_reader :gfx
+  def setup
+    sketch_title 'Circle Resolution'
+    @gfx = Gfx::ToxiclibsSupport.new(self)
+  end
+
+  def draw
+    background(0)
+    no_stroke
+    fill(255)
+    res = map1d(mouse_x, 0..width, 3..72)
+    poly = Circle.new(TVec2D.new(width / 2, height / 2), 200).toPolygon2D(res)
+    gfx.polygon2D(poly)
+    fill(255, 0, 0)
+    poly.each { |vertex| gfx.circle(vertex, 5) }
+    text(res, 20, 20)
+  end
+
+  def settings
+    size(600, 600)
+    smooth 8
+  end
+end
+
+CircleResolution.new

external_library/gem/toxiclibs/geometry/voronoi1.rb

@@ -21,7 +21,7 @@ def draw
     smooth
     stroke_weight 1
     stroke 255
-    voronoi.get_regions.each {  |polygon| gfx.polygon2D(polygon) }
+    voronoi.get_regions.each { |polygon| gfx.polygon2D(polygon) }
     save_frame(data_path('voronoi-001.png'))
   end
 

processing_app/basics/math/demo_noise.rb

@@ -0,0 +1,52 @@
+require 'propane'
+
+class DemoNoise < Propane::App
+  attr_reader :z
+
+  def setup
+    sketch_title 'Demo noise_mode'
+    stroke(255, 64)
+    @z = 0
+  end
+
+  def draw
+    noise_scale = 0.01
+    background(0)
+    grid(width, height, 10, 10) do |x, y|
+      arrow(x, y, noise(x * noise_scale, y * noise_scale, z * noise_scale) * TWO_PI * 2)
+    end
+    @z += 1
+  end
+
+  def mouse_pressed
+    mode = Propane::SIMPLEX
+    noise_mode mode
+    sketch_title "#{mode}"
+  end
+
+  def mouse_released
+    mode = Propane::VALUE
+    noise_mode(mode)
+    sketch_title "#{mode}"
+  end
+
+
+  def arrow(x, y, ang)
+    pushMatrix()
+    translate(x, y)
+    rotate(ang)
+    line(0, 0, 20, 0)
+    translate(20, 0)
+    rotate(PI + 0.4)
+    line(0, 0, 5, 0)
+    rotate(-0.8)
+    line(0, 0, 5, 0)
+    popMatrix()
+  end
+
+  def settings
+    size(600, 400, P2D)
+  end
+end
+
+DemoNoise.new

processing_app/basics/modules/euler_ball.rb renamed to processing_app/basics/math/modules/euler_ball.rb

@@ -1,24 +1,41 @@
-# Noise1D. 
-# 
-# Using 1D Perlin Noise to assign location. 
+#!/usr/bin/env jruby -v -W2
+# frozen_string_literal: true
+require 'propane'
 
-def setup
-  sketch_title 'Noise 1D'
-  @xoff = 0.0
-  @x_increment = 0.01  
-  background 0
-  no_stroke  
-end
+class Noise1D < Propane::App
 
-def draw  
-  fill 0, 10
-  rect 0, 0, width, height  
-  n = noise(@xoff) * width  
-  @xoff += @x_increment  
-  fill 200
-  ellipse n, height / 2, 64, 64  
-end
+  def setup
+    sketch_title 'Noise 1D'
+    @xoff = width / 2
+    @x_increment = 0.01
+    background 0
+    no_stroke
+  end
+
+  def draw
+    fill 0, 10
+    rect 0, 0, width, height
+    n = noise(@xoff) * width
+    @xoff += @x_increment
+    fill 200
+    ellipse n, height / 2, 64, 64
+  end
 
-def settings
-  size 640, 360
+  def mouse_pressed
+    mode = Propane::SIMPLEX
+    noise_mode mode
+    sketch_title "#{mode}"
+  end
+
+  def mouse_released
+    mode = Propane::VALUE
+    noise_mode(mode)
+    sketch_title "#{mode}"
+  end
+
+  def settings
+    size 640, 360
+  end
 end
+
+Noise1D.new

processing_app/basics/modules/euler_integration.rb renamed to processing_app/basics/math/modules/euler_integration.rb

@@ -1,38 +1,51 @@
 #!/usr/bin/env jruby -v -W2
 # frozen_string_literal: true
 require 'propane'
-# Noise3D. 
-# 
-# Using 3D noise to create simple animated texture. 
+# Noise3D.
+#
+# Using 3D noise to create simple animated texture.
 # Here, the third dimension ('z') is treated as time.
+# Press mouse to switch Noise Implementions.
 class Noise3D < Propane::App
   attr_reader :increment, :z_increment
-  
+
   def setup
     sketch_title 'Noise 3D'
-    frame_rate 30    
+    frame_rate 30
     @increment = 0.01
     @zoff = 0.0
-    @z_increment = 0.02    
+    @z_increment = 0.02
   end
-  
-  def draw    
-    background 0  	
-    load_pixels  	
-    xoff = 0.0  	
-    (0...width).each do |x|  	    
+
+  def draw
+    background 0
+    load_pixels
+    xoff = 0.0
+    (0...width).each do |x|
       xoff += increment
-      yoff = 0.0  		
-      (0...height).each do |y|  		    
-        yoff += increment  			
-        bright = noise(xoff, yoff, @zoff) * 255  			
+      yoff = 0.0
+      (0...height).each do |y|
+        yoff += increment
+        bright = noise(xoff, yoff, @zoff) * 255
         pixels[x + y * width] = color(bright, bright, bright)
       end
-    end  	
-    update_pixels  	
-    @zoff += z_increment  	
+    end
+    update_pixels
+    @zoff += z_increment
+  end
+
+  def mouse_pressed
+    mode = Propane::SIMPLEX
+    noise_mode mode
+    sketch_title "#{mode}"
   end
-  
+
+  def mouse_released
+    mode = Propane::VALUE
+    noise_mode(mode)
+    sketch_title "#{mode}"
+  end
+
   def settings
     size 640, 360
   end

processing_app/basics/modules/module.rb renamed to processing_app/basics/math/modules/module.rb

@@ -3,7 +3,6 @@
 require 'propane'
 
 class Noise < Propane::App
-  load_library :simplex_noise
 
   # by Martin Prout.
   # Using noise to create simple texture.
@@ -24,13 +23,25 @@ def draw
       yoff = 0.0
       (0...height).each do |y|
         yoff += @increment
-        bright = SimplexNoise.noise(x / x_val, y / x_val) * 255
+        bright = noise(x / x_val, y / x_val) * 255
         pixels[x + y * width] = color(bright)
       end
     end
     update_pixels
   end
 
+  def mouse_pressed
+    mode = Propane::SIMPLEX
+    noise_mode mode
+    sketch_title "#{mode}"
+  end
+
+  def mouse_released
+    mode = Propane::VALUE
+    noise_mode(mode)
+    sketch_title "#{mode}"
+  end
+
   def settings
     size 640, 360
   end