processing 0.5.32 → 0.5.33

data/lib/processing/graphics_context.rb

@@ -25,6 +25,14 @@ module Processing
     #
     TAU        = PI * 2
 
+    # Processing mode for renderMode().
+    #
+    PROCESSING = :processing
+
+    # p5.js mode for renderMode().
+    #
+    P5JS       = :p5js
+
     # RGBA format for createImage().
     #
     RGBA = :rgba
@@ -267,28 +275,42 @@ module Processing
 
     # @private
     def init__(image, painter)
-      @drawing__     = false
-      @colorMode__   = nil
-      @hsbColor__    = false
-      @colorMaxes__  = [1.0] * 4
-      @angleMode__   = nil
-      @angleScale__  = 1.0
-      @rectMode__    = nil
-      @ellipseMode__ = nil
-      @imageMode__   = nil
-      @shapeMode__   = nil
-      @blendMode__   = nil
-      @textAlignH__  = nil
-      @textAlignV__  = nil
-      @textFont__    = nil
-      @tint__        = nil
-      @filter__      = nil
-      @pixels__      = nil
-      @matrixStack__ = []
-      @styleStack__  = []
+      @drawing__        = false
+      @renderMode__     = nil
+      @p5jsMode__       = false
+      @colorMode__      = nil
+      @hsbColor__       = false
+      @colorMaxes__     = [1.0] * 4
+      @angleMode__      = nil
+      @toRad__          = 1.0
+      @toDeg__          = 1.0
+      @fromRad__        = 1.0
+      @fromDeg__        = 1.0
+      @rectMode__       = nil
+      @ellipseMode__    = nil
+      @imageMode__      = nil
+      @shapeMode__      = nil
+      @blendMode__      = nil
+      @curveDetail__    = nil
+      @curveTightness__ = nil
+      @bezierDetail__   = nil
+      @textAlignH__     = nil
+      @textAlignV__     = nil
+      @textFont__       = nil
+      @tint__           = nil
+      @filter__         = nil
+      @pixels__         = nil
+      @random__         = nil
+      @nextGaussian__   = nil
+      @noiseSeed__      = nil
+      @noiseOctaves__   = nil
+      @noiseFallOff__   = nil
+      @matrixStack__    = []
+      @styleStack__     = []
 
       updateCanvas__ image, painter
 
+      renderMode  PROCESSING
       colorMode   RGB, 255
       angleMode   RADIANS
       rectMode    CORNER
@@ -303,10 +325,16 @@ module Processing
       textureMode IMAGE
       textureWrap CLAMP
 
-      fill 255
-      stroke 0
-      strokeWeight 1
+      fill           255
+      stroke         0
+      strokeWeight   1
       noTint
+      curveDetail    20
+      curveTightness 0
+      bezierDetail   20
+      randomSeed     Random.new_seed
+      noiseSeed      Random.new_seed
+      noiseDetail    4, 0.5
     end
 
     # @private
@@ -322,6 +350,26 @@ module Processing
       @matrixStack__.clear
       @styleStack__.clear
       @drawing__ = true
+      setupMatrix__
+    end
+
+    # @private
+    def setupMatrix__()
+      w, h = width.to_f, height.to_f
+      x, y = w / 2.0, h / 2.0
+
+      fov, z = nil
+      if @p5jsMode__
+        z   = 800
+        fov = degrees Math.atan(y / z) * 2.0
+      else
+        fov = 60
+        z   = y / Math.tan(radians(fov) / 2.0)
+      end
+
+      @painter__.matrix =
+        Rays::Matrix.perspective(fov, w / h, z / 10.0, z * 10.0) *
+        Rays::Matrix.look_at(x, y, z, x, y, 0)
     end
 
     # @private
@@ -370,6 +418,20 @@ module Processing
       @painter__.pixel_density
     end
 
+    # Sets render mode.
+    #
+    # @param mode [PROCESSING, P5JS] compatible to Processing or p5.js
+    #
+    # @return [PROCESSING, P5JS] current mode
+    #
+    def renderMode(mode = nil)
+      if mode
+        @renderMode__ = mode
+        @p5jsMode__   = mode == P5JS
+      end
+      @renderMode__
+    end
+
     # Sets color mode and max color values.
     #
     # @overload colorMode(mode)
@@ -463,15 +525,48 @@ module Processing
       ((color >> 24) & 0xff) / 255.0 * @colorMaxes__[3]
     end
 
+    # Returns the hue value of the color.
+    #
+    # @param color [Numeric] color value
+    #
+    # @return [Numeric] the hue value
+    #
+    def hue(color)
+      h, = toRawColor__(color).to_hsv
+      h * (@hsbColor__ ? @colorMaxes__[0] : 1)
+    end
+
+    # Returns the saturation value of the color.
+    #
+    # @param color [Numeric] color value
+    #
+    # @return [Numeric] the saturation value
+    #
+    def saturation(color)
+      _, s, = toRawColor__(color).to_hsv
+      s * (@hsbColor__ ? @colorMaxes__[1] : 1)
+    end
+
+    # Returns the brightness value of the color.
+    #
+    # @param color [Numeric] color value
+    #
+    # @return [Numeric] the brightness value
+    #
+    def brightness(color)
+      _, _, b = toRawColor__(color).to_hsv
+      b * (@hsbColor__ ? @colorMaxes__[2] : 1)
+    end
+
     # @private
     private def toRGBA__(*args)
       a, b = args
       return parseColor__(a, b || alphaMax__) if a.kind_of?(String)
-      toRaysColor__(*args).to_a
+      rawColor__(*args).to_a
     end
 
     # @private
-    def toRaysColor__(*args)
+    def rawColor__(*args)
       a, b, c, d = args
       rgba = case args.size
         when 1, 2 then [a, a, a, b || alphaMax__]
@@ -496,6 +591,15 @@ module Processing
       @colorMaxes__[3]
     end
 
+    # @private
+    private def toRawColor__(color)
+      Rays::Color.new(
+        ((color >> 16) & 0xff) / 255.0,
+        ((color >> 8)  & 0xff) / 255.0,
+        ( color        & 0xff) / 255.0,
+        ((color >> 24) & 0xff) / 255.0)
+    end
+
     # Sets angle mode.
     #
     # @param mode [RADIANS, DEGREES] RADIANS or DEGREES
@@ -505,37 +609,34 @@ module Processing
     def angleMode(mode = nil)
       if mode != nil
         @angleMode__  = mode
-        @angleScale__ =
+        @toRad__, @toDeg__, @fromRad__, @fromDeg__ =
           case mode.downcase.to_sym
-          when RADIANS then RAD2DEG__
-          when DEGREES then 1.0
+          when RADIANS then [1.0,      RAD2DEG__, 1.0,       DEG2RAD__]
+          when DEGREES then [DEG2RAD__, 1.0,      RAD2DEG__, 1.0]
           else raise ArgumentError, "invalid angle mode: #{mode}"
           end
       end
       @angleMode__
     end
 
+    # @private
+    def toRadians__(angle)
+      angle * @toRad__
+    end
+
     # @private
     def toDegrees__(angle)
-      angle * @angleScale__
+      angle * @toDeg__
     end
 
     # @private
     def fromRadians__(radians)
-      case @angleMode__
-      when RADIANS then radians
-      when DEGREES then radians * RAD2DEG__
-      else raise "invalid angle mode: #{mode}"
-      end
+      radians * @fromRad__
     end
 
     # @private
     def fromDegrees__(degrees)
-      case @angleMode__
-      when RADIANS then degrees * DEG2RAD__
-      when DEGREES then degrees
-      else raise "invalid angle mode: #{mode}"
-      end
+      degrees * @fromDeg__
     end
 
     # Sets rect mode. Default is CORNER.
@@ -723,6 +824,52 @@ module Processing
       nil
     end
 
+    # Sets the resolution at which curves display.
+    # The default value is 20 while the minimum value is 3.
+    #
+    # @param detail [Numeric] resolution of the curves
+    #
+    # @return [nil] nil
+    #
+    # @see https://processing.org/reference/curveDetail_.html
+    # @see https://p5js.org/reference/#/p5/curveDetail
+    #
+    def curveDetail(detail)
+      detail = 3 if detail < 3
+      @curveDetail__ = detail
+      nil
+    end
+
+    # Sets the quality of curve forms.
+    #
+    # @param tightness [Numeric] determines how the curve fits to the vertex points
+    #
+    # @return [nil] nil
+    #
+    # @see https://processing.org/reference/curveTightness_.html
+    # @see https://p5js.org/reference/#/p5/curveTightness
+    #
+    def curveTightness(tightness)
+      @curveTightness__ = tightness
+      nil
+    end
+
+    # Sets the resolution at which Bezier's curve is displayed.
+    # The default value is 20.
+    #
+    # @param detail [Numeric] resolution of the curves
+    #
+    # @return [nil] nil
+    #
+    # @see https://processing.org/reference/bezierDetail_.html
+    # @see https://p5js.org/reference/#/p5/bezierDetail
+    #
+    def bezierDetail(detail)
+      detail = 1 if detail < 1
+      @bezierDetail__ = detail
+      nil
+    end
+
     # Sets fill color for drawing images.
     #
     # @overload tint(rgb)
@@ -786,30 +933,32 @@ module Processing
     end
 
     # Sets text font.
-    #
     # (Passing a font name as the first parameter is deprecated)
     #
+    # @overload textFont()
     # @overload textFont(font)
-    # @overload textFont(name)
+    # @overload textFont(name) [DEPRECATED]
     # @overload textFont(font, size)
-    # @overload textFont(name, size)
+    # @overload textFont(name, size) [DEPRECATED]
     #
     # @param font [Font]    font
     # @param name [String]  font name
     # @param size [Numeric] font size (max 256)
     #
-    # @return [nil] nil
+    # @return [Font] current font
     #
-    def textFont(font, size = nil)
-      size = FONT_SIZE_MAX__ if size && size > FONT_SIZE_MAX__
-      if font.nil? || font.kind_of?(String)
-        font = createFont font, size
-      elsif size
-        font.setSize__ size
+    def textFont(font = nil, size = nil)
+      if font != nil || size != nil
+        size = FONT_SIZE_MAX__ if size && size > FONT_SIZE_MAX__
+        if font.nil? || font.kind_of?(String)
+          font = createFont font, size
+        elsif size
+          font.setSize__ size
+        end
+        @painter__.font = font.getInternal__
+        @textFont__     = font
       end
-      @textFont__     = font
-      @painter__.font = font.getInternal__
-      nil
+      @textFont__
     end
 
     # Sets text size.
@@ -839,6 +988,20 @@ module Processing
       @textAlignV__ = vertical
     end
 
+    # Sets the spacing between lines of text in units of pixels.
+    #
+    # @overload textLeading()
+    # @overload textLeading(leading)
+    #
+    # @param leading [Numeric] the size in pixels for spacing between lines
+    #
+    # @return [Numeric] current spacing
+    #
+    def textLeading(leading = nil)
+      @painter__.line_height = leading if leading
+      @painter__.line_height
+    end
+
     def texture(image)
       @painter__.texture image&.getInternal__
       nil
@@ -961,7 +1124,7 @@ module Processing
     #
     def point(x, y)
       assertDrawing__
-      @painter__.line x, y, x, y
+      @painter__.point x, y
       nil
     end
 
@@ -1144,7 +1307,9 @@ module Processing
     #
     def curve(cx1, cy1, x1, y1, x2, y2, cx2, cy2)
       assertDrawing__
+      @painter__.nsegment = @curveDetail__
       @painter__.curve cx1, cy1, x1, y1, x2, y2, cx2, cy2
+      @painter__.nsegment = 0
       nil
     end
 
@@ -1165,7 +1330,9 @@ module Processing
     #
     def bezier(x1, y1, cx1, cy1, cx2, cy2, x2, y2)
       assertDrawing__
+      @painter__.nsegment = @bezierDetail__
       @painter__.bezier x1, y1, cx1, cy1, cx2, cy2, x2, y2
+      @painter__.nsegment = 0
       nil
     end
 
@@ -1478,9 +1645,16 @@ module Processing
     #
     # @return [nil] nil
     #
-    def updatePixels()
-      return unless @pixels__
-      getInternal__.pixels = @pixels__
+    def updatePixels(&block)
+      return if !block && !@pixels__
+      if block
+        loadPixels
+        block.call pixels
+      end
+      getInternal__.tap do |img|
+        img.pixels = @pixels__
+        img.paint {} # update texture and set modifiied
+      end
       @pixels__ = nil
     end
 
@@ -1548,6 +1722,42 @@ module Processing
       nil
     end
 
+    def rotateX(angle)
+      assertDrawing__
+      @painter__.rotate toDegrees__(angle), 1, 0, 0
+      nil
+    end
+
+    def rotateY(angle)
+      assertDrawing__
+      @painter__.rotate toDegrees__(angle), 0, 1, 0
+      nil
+    end
+
+    def rotateZ(angle)
+      assertDrawing__
+      @painter__.rotate toDegrees__(angle), 0, 0, 1
+      nil
+    end
+
+    def shearX(angle)
+      t = Math.tan toRadians__(angle)
+      @painter__.matrix *= Rays::Matrix.new(
+        1, t, 0, 0,
+        0, 1, 0, 0,
+        0, 0, 1, 0,
+        0, 0, 0, 1)
+    end
+
+    def shearY(angle)
+      t = Math.tan toRadians__(angle)
+      @painter__.matrix *= Rays::Matrix.new(
+        1, 0, 0, 0,
+        t, 1, 0, 0,
+        0, 0, 1, 0,
+        0, 0, 0, 1)
+    end
+
     # Pushes the current transformation matrix to stack.
     #
     # @return [Object] result of the expression at the end of the block
@@ -1571,6 +1781,51 @@ module Processing
       nil
     end
 
+    # Reset current transformation matrix with 2x3, or 4x4 matrix.
+    #
+    # @overload applyMatrix(array)
+    # @overload applyMatrix(a, b, c, d, e, f)
+    # @overload applyMatrix(a, b, c, d, e, f, g, h, i, j, k, l, m, n, o, p)
+    #
+    # @param array [Array]   6 or 16 numbers which define the matrix
+    # @param a     [Numeric] number which defines the matrix
+    # @param b     [Numeric] number which defines the matrix
+    # @param c     [Numeric] number which defines the matrix
+    # @param d     [Numeric] number which defines the matrix
+    # @param e     [Numeric] number which defines the matrix
+    # @param f     [Numeric] number which defines the matrix
+    # @param g     [Numeric] number which defines the matrix
+    # @param h     [Numeric] number which defines the matrix
+    # @param i     [Numeric] number which defines the matrix
+    # @param j     [Numeric] number which defines the matrix
+    # @param k     [Numeric] number which defines the matrix
+    # @param l     [Numeric] number which defines the matrix
+    # @param m     [Numeric] number which defines the matrix
+    # @param n     [Numeric] number which defines the matrix
+    # @param o     [Numeric] number which defines the matrix
+    # @param p     [Numeric] number which defines the matrix
+    #
+    # @return [nil] nil
+    #
+    def applyMatrix(*args)
+      assertDrawing__
+      args = args.first if args.first.kind_of?(Array)
+      if args.size == 6
+        a, b, c, d, e, f = args
+        args = [
+          a, b, 0, 0,
+          c, d, 0, 0,
+          0, 0, 1, 0,
+          e, f, 0, 1
+        ]
+      end
+      raise ArgumentError unless args.size == 16
+      m = Rays::Matrix.new(*args)
+      m.transpose! if @p5jsMode__
+      @painter__.matrix *= m
+      nil
+    end
+
     # Reset current transformation matrix with identity matrix.
     #
     # @return [nil] nil
@@ -1581,6 +1836,17 @@ module Processing
       nil
     end
 
+    # Prints matrix elements to console.
+    #
+    # @return [nil] nil
+    #
+    def printMatrix()
+      m = @painter__.matrix
+      m.transpose! if @p5jsMode__
+      print "%f %f %f %f\n%f %f %f %f\n%f %f %f %f\n%f %f %f %f\n" % m.to_a
+      nil
+    end
+
     # Save current style values to the style stack.
     #
     # @return [Object] result of the expression at the end of the block
@@ -1593,6 +1859,8 @@ module Processing
         @painter__.stroke_width,
         @painter__.stroke_cap,
         @painter__.stroke_join,
+        @painter__.miter_limit,
+        @painter__.line_height!,
         @painter__.clip,
         @painter__.blend_mode,
         @painter__.font,
@@ -1600,13 +1868,22 @@ module Processing
         @painter__.texcoord_mode,
         @painter__.texcoord_wrap,
         @painter__.shader,
+        @colorMode__,
         @hsbColor__,
         @colorMaxes__,
-        @angleScale__,
+        @angleMode__,
+        @toRad__,
+        @toDeg__,
+        @fromRad__,
+        @fromDeg__,
         @rectMode__,
         @ellipseMode__,
         @imageMode__,
         @shapeMode__,
+        @blendMode__,
+        @curveDetail__,
+        @curveTightness__,
+        @bezierDetail__,
         @textAlignH__,
         @textAlignV__,
         @textFont__,
@@ -1629,6 +1906,8 @@ module Processing
       @painter__.stroke_width,
       @painter__.stroke_cap,
       @painter__.stroke_join,
+      @painter__.miter_limit,
+      @painter__.line_height,
       @painter__.clip,
       @painter__.blend_mode,
       @painter__.font,
@@ -1636,13 +1915,22 @@ module Processing
       @painter__.texcoord_mode,
       @painter__.texcoord_wrap,
       @painter__.shader,
+      @colorMode__,
       @hsbColor__,
       @colorMaxes__,
-      @angleScale__,
+      @angleMode__,
+      @toRad__,
+      @toDeg__,
+      @fromRad__,
+      @fromDeg__,
       @rectMode__,
       @ellipseMode__,
       @imageMode__,
       @shapeMode__,
+      @blendMode__,
+      @curveDetail__,
+      @curveTightness__,
+      @bezierDetail__,
       @textAlignH__,
       @textAlignV__,
       @textFont__,
@@ -1678,10 +1966,10 @@ module Processing
     end
 
     # @private
-    def drawImage__(painter, *args, **states)
+    def drawImage__(painter, *args, image__: getInternal__, **states)
       shader = painter.shader || @filter__&.getInternal__
       painter.push shader: shader, **states do |_|
-        painter.image getInternal__, *args
+        painter.image image__, *args
       end
     end
 
@@ -2024,6 +2312,98 @@ module Processing
       Math.atan2 y, x
     end
 
+    # Evaluates the curve at point t for points a, b, c, d.
+    #
+    # @param a [Numeric] coordinate of first control point
+    # @param b [Numeric] coordinate of first point on the curve
+    # @param c [Numeric] coordinate of second point on the curve
+    # @param d [Numeric] coordinate of second control point
+    # @param t [Numeric] value between 0.0 and 1.0
+    #
+    # @return [Numeric] interpolated value
+    #
+    # @see https://processing.org/reference/curvePoint_.html
+    # @see https://p5js.org/reference/#/p5/curvePoint
+    #
+    def curvePoint(a, b, c, d, t)
+      s  = @curveTightness__
+      t3 = t * t * t
+      t2 = t * t
+      f1 = ( s - 1.0) / 2.0 * t3 + ( 1.0 - s)       * t2 + (s - 1.0) / 2.0 * t
+      f2 = ( s + 3.0) / 2.0 * t3 + (-5.0 - s) / 2.0 * t2 +  1.0
+      f3 = (-3.0 - s) / 2.0 * t3 + ( s + 2.0)       * t2 + (1.0 - s) / 2.0 * t
+      f4 = ( 1.0 - s) / 2.0 * t3 + ( s - 1.0) / 2.0 * t2
+      a * f1 + b * f2 + c * f3 + d * f4
+    end
+
+    # Calculates the tangent of a point on a curve.
+    #
+    # @param a [Numeric] coordinate of first control point
+    # @param b [Numeric] coordinate of first point on the curve
+    # @param c [Numeric] coordinate of second point on the curve
+    # @param d [Numeric] coordinate of second control point
+    # @param t [Numeric] value between 0.0 and 1.0
+    #
+    # @return [Numeric] tangent value
+    #
+    # @see https://processing.org/reference/curveTangent_.html
+    # @see https://p5js.org/reference/#/p5/curveTangent
+    #
+    def curveTangent(a, b, c, d, t)
+      s = @curveTightness__
+      tt3 = t * t * 3.0
+      t2  = t * 2.0
+      f1  = ( s - 1.0) / 2.0 * tt3 + ( 1.0 - s)       * t2 + (s - 1.0) / 2.0
+      f2  = ( s + 3.0) / 2.0 * tt3 + (-5.0 - s) / 2.0 * t2
+      f3  = (-3.0 - s) / 2.0 * tt3 + ( s + 2.0)       * t2 + (1.0 - s) / 2.0
+      f4  = ( 1.0 - s) / 2.0 * tt3 + ( s - 1.0) / 2.0 * t2
+      a * f1 + b * f2 + c * f3 + d * f4
+    end
+
+    # Evaluates the Bezier at point t for points a, b, c, d.
+    #
+    # @param a [Numeric] coordinate of first point on the curve
+    # @param b [Numeric] coordinate of first control point
+    # @param c [Numeric] coordinate of second control point
+    # @param d [Numeric] coordinate of second point on the curve
+    # @param t [Numeric] value between 0.0 and 1.0
+    #
+    # @return [Numeric] interpolated value
+    #
+    # @see https://processing.org/reference/bezierPoint_.html
+    # @see https://p5js.org/reference/#/p5/bezierPoint
+    #
+    def bezierPoint(a, b, c, d, t)
+      tt = 1.0 - t
+      tt ** 3.0 * a +
+      tt ** 2.0 * b * 3.0 * t +
+      t  ** 2.0 * c * 3.0 * tt +
+      t  ** 3.0 * d
+    end
+
+    # Calculates the tangent of a point on a Bezier curve.
+    #
+    # @param a [Numeric] coordinate of first point on the curve
+    # @param b [Numeric] coordinate of first control point
+    # @param c [Numeric] coordinate of second control point
+    # @param d [Numeric] coordinate of second point on the curve
+    # @param t [Numeric] value between 0.0 and 1.0
+    #
+    # @return [Numeric] tangent value
+    #
+    # @see https://processing.org/reference/bezierTangent_.html
+    # @see https://p5js.org/reference/#/p5/bezierTangent
+    #
+    def bezierTangent(a, b, c, d, t)
+      tt = 1.0 - t
+      3.0 * d * t  ** 2.0 -
+      3.0 * c * t  ** 2.0 +
+      6.0 * c * tt *  t   -
+      6.0 * b * tt *  t   +
+      3.0 * b * tt ** 2.0 -
+      3.0 * a * tt ** 2.0
+    end
+
     # Returns the perlin noise value.
     #
     # @overload noise(x)
@@ -2036,13 +2416,52 @@ module Processing
     #
     # @return [Numeric] noise value (0.0..1.0)
     #
+    # @see https://processing.org/reference/noise_.html
+    # @see https://p5js.org/reference/#/p5/noise
+    #
     def noise(x, y = 0, z = 0)
-      Rays.perlin(x, y, z) / 2.0 + 0.5
+      seed, falloff = @noiseSeed__, @noiseFallOff__
+      amp           = 0.5
+      @noiseOctaves__.times.reduce(0) do |sum|
+        value = (Rays.perlin(x, y, z, seed) / 2.0 + 0.5) * amp
+        x    *= 2
+        y    *= 2
+        z    *= 2
+        amp  *= falloff
+        sum + value
+      end
+    end
+
+    # Sets the seed value for noise()
+    #
+    # @param seed [Numeric] seed value
+    #
+    # @return [nil] nil
+    #
+    # @see https://processing.org/reference/noiseSeed_.html
+    # @see https://p5js.org/reference/#/p5/noiseSeed
+    #
+    def noiseSeed(seed)
+      @noiseSeed__ = Random.new(seed).rand 0.0..1.0
+    end
+
+    # Adjusts the character and level of detail produced by the Perlin noise function.
+    #
+    # @param lod     [Numeric] number of octaves to be used by the noise
+    # @param falloff [Numeric] falloff factor for each octave
+    #
+    # @return [nil] nil
+    #
+    # @see https://processing.org/reference/noiseDetail_.html
+    # @see https://p5js.org/reference/#/p5/noiseDetail
+    #
+    def noiseDetail(lod, falloff = nil)
+      @noiseOctaves__ = lod     if lod     && lod > 0
+      @noiseFallOff__ = falloff if falloff && falloff > 0
     end
 
     # Returns a random number in range low...high
     #
-    # @overload random()
     # @overload random(high)
     # @overload random(low, high)
     # @overload random(choices)
@@ -2053,10 +2472,60 @@ module Processing
     #
     # @return [Float] random number
     #
+    # @see https://processing.org/reference/random_.html
+    # @see https://p5js.org/reference/#/p5/random
+    #
     def random(*args)
-      return args.first.sample if args.first.kind_of? Array
-      high, low = args.reverse
-      rand (low || 0).to_f...(high || 1).to_f
+      if args.first.kind_of? Array
+        a = args.first
+        a.empty? ? nil : a[@random__.rand a.size]
+      else
+        high, low = args.reverse
+        @random__.rand (low || 0).to_f...(high || 1).to_f
+      end
+    end
+
+    # Sets the seed value for random()
+    #
+    # @param seed [Numeric] seed value
+    #
+    # @return [nil] nil
+    #
+    # @see https://processing.org/reference/randomSeed_.html
+    # @see https://p5js.org/reference/#/p5/randomSeed
+    #
+    def randomSeed(seed)
+      @random__       = Random.new seed
+      @nextGaussian__ = nil
+    end
+
+    # Returns a random number fitting a Gaussian, or normal, distribution.
+    #
+    # @param mean [Numeric] mean
+    # @param sd   [Numeric] standard deviation
+    #
+    # @return [Float] random number
+    #
+    # @see https://processing.org/reference/randomGaussian_.html
+    # @see https://p5js.org/reference/#/p5/randomGaussian
+    #
+    def randomGaussian(mean = 0, sd = 1)
+      value =
+        if @nextGaussian__
+          x, @nextGaussian__ = @nextGaussian__, nil
+          x
+        else
+          a, b, w = 0, 0, 1
+          until w < 1
+            a = random(2) - 1
+            b = random(2) - 1
+            w = a ** 2 + b ** 2
+          end
+          w = Math.sqrt(-2 * Math.log(w) / w)
+          @randomGaussian__ = a * w
+          b * w
+        end
+      value * sd + mean
     end
 
     # Creates a new vector object.
@@ -2235,7 +2704,7 @@ module Processing
       raise "unsupported font type -- '#{ext}'" unless ext =~ /^\.?(ttf|otf)$/i
 
       filename = httpGet__ filename, ext if filename =~ %r|^https?://|
-      Font.new Rays::Font.load p filename
+      Font.new Rays::Font.load filename
     end
 
     # Loads image.
@@ -2299,15 +2768,10 @@ module Processing
       path   = path.sub_ext ext
 
       unless path.file?
-        URI.open uri do |input|
-          input.set_encoding nil# disable default_internal
+        Net::HTTP.get_response URI.parse(uri) do |res|
+          res.value # raise an error unless successful
           tmpdir.mkdir unless tmpdir.directory?
-          path.open('w') do |output|
-            output.set_encoding Encoding::ASCII_8BIT
-            while buf = input.read(2 ** 16)
-              output.write buf
-            end
-          end
+          path.open('wb') {|file| res.read_body {|body| file.write body}}
         end
       end
       path.to_s