reference: Add the missing images (#205)

* reference: Add test

Signed-off-by: Ce Gao <ce.gao@outlook.com>

* reference: Add height

Signed-off-by: Ce Gao <ce.gao@outlook.com>

* reference: Add cursor code

Signed-off-by: Ce Gao <ce.gao@outlook.com>

* reference: Add frameRate code

Signed-off-by: Ce Gao <ce.gao@outlook.com>

* reference: Fix the stntax in height

Signed-off-by: Ce Gao <ce.gao@outlook.com>

* reference: Add example

Signed-off-by: Ce Gao <ce.gao@outlook.com>

* reference: Add createShape example

Signed-off-by: Ce Gao <ce.gao@outlook.com>

Author: gaocegege

examples/reference/createShape/createShape1/createShape1.rpde

@@ -0,0 +1,14 @@
+settings <- function() {
+    size(100, 100)
+}
+
+setup <- function() {
+    # Creating the PShape as a square. The numeric arguments are similar to rect().
+    square = createShape(RECT, 0, 0, 50, 50)
+    square$setFill(color(0, 0, 255))
+    square$setStroke(FALSE)
+}
+
+draw <- function() {
+    shape(square, 25, 25)
+}

examples/reference/createShape/createShape2/createShape2.rpde

@@ -0,0 +1,20 @@
+settings <- function() {
+    size(100, 100)
+}
+
+setup <- function() {
+    # Creating the PShape as a square. The numeric arguments are similar to rect().
+    s = createShape()
+    s$beginShape()
+    s$fill(0, 0, 255)
+    s$noStroke()
+    s$vertex(0, 0)
+    s$vertex(0, 50)
+    s$vertex(50, 50)
+    s$vertex(50, 0)
+    s$endShape(CLOSE)
+}
+
+draw <- function() {
+    shape(s, 25, 25)
+}

examples/reference/createShape/createShape3/createShape3.rpde

@@ -0,0 +1,21 @@
+settings <- function() {
+    size(100, 100)
+}
+
+setup <- function() {
+    # Creating the PShape as a square. The numeric arguments are similar to rect().
+    s = createShape()
+    s$beginShape(TRIANGLE_STRIP)
+    s$vertex(30, 75)
+    s$vertex(40, 20)
+    s$vertex(50, 75)
+    s$vertex(60, 20)
+    s$vertex(70, 75)
+    s$vertex(80, 20)
+    s$vertex(90, 75)
+    s$endShape()
+}
+
+draw <- function() {
+    shape(s, 0, 0)
+}

examples/reference/createShape/createShape4/createShape4.rpde

@@ -0,0 +1,24 @@
+settings <- function() {
+    size(1000, 1000)
+}
+
+setup <- function() {
+    # Create the shape group
+    alien = createShape(GROUP)
+    
+    # Make two shapes
+    head = createShape(ELLIPSE, -25, 0, 50, 50)
+    head$setFill(color(255))
+    body = createShape(RECT, -25, 45, 50, 40)
+    body$setFill(color(0))
+    
+    # Add the two 'child' shapes to the parent group
+    alien$addChild(body)
+    alien$addChild(head)
+}
+
+draw <- function() {
+    background(204)
+    translate(50, 15)
+    shape(alien)
+}

examples/reference/cursor/cursor1/cursor1.rpde

@@ -0,0 +1,10 @@
+# Move the mouse left and right across the image to see the cursor change from a
+# cross to a hand
+
+draw <- function() {
+    if (mouseX < 50) {
+        cursor(CROSS)
+    } else {
+        cursor(HAND)
+    }
+}

examples/reference/frameRate/frameRate1/frameRate1.rpde

@@ -0,0 +1,8 @@
+setup <- function() {
+    frameRate(30)
+}
+
+draw <- function() {
+    line(0, 0, width, height)
+    println(frameCount)
+}

examples/reference/height/.property.yml

@@ -3,7 +3,7 @@ subcategory:
 description: "
 System variable that stores the height of the display window. This value is set by the second parameter of the <b>size()</b> function. For example, the function call <b>size(320, 240)</b> sets the <b>height</b> variable to the value 240. The value of <b>height</b> defaults to 100 if <b>size()</b> is not used in a program.
 "
-syntax: "	rect(40, 0, 20, height)"
+syntax: "rect(40, 0, 20, height)"
 related:
   - width
   - size

examples/reference/height/height1/.test.yml

@@ -0,0 +1,2 @@
+test:
+  reference: https://processing.org/reference/images/height.png

examples/reference/height/height1/height1.rpde

@@ -0,0 +1,4 @@
+noStroke()
+background(0)
+rect(40, 0, 20, height)
+rect(60, 0, 20, height/2)

examples/reference/rotateX/rotateX1/.test.yml

@@ -0,0 +1,2 @@
+test:
+  reference: https://processing.org/reference/images/rotateX_1.png