   []
   (PApplet/month))
 
-;; $$mouseClicked
-;; $$mouseDragged
+
 ;; $$mouseEntered
 ;; $$mouseExited
-;; $$mouseMoved
-;; $$mousePressed
-;; $$mouseReleased
+
 ;; $$nf
 ;; $$nfc
 ;; $$nfp

    (.ellipseMode *applet* (int mode))))

(defn emissive-float
  ([gray] (.emissive *applet* (float gray)))
  ([x y z] (.emissive *applet* (float x) (float y) (float z))))

(defn emissive-int
  [gray] (.emissive *applet* (int gray)))

(def emissive emissive-float)

(defn end-camera [] (.endCamera *applet*))

(defn end-raw [] (.endRaw *applet*))


             (float x3) (float y3) (float z3)
             (float x4) (float y4) (float z4))))

(defn curve-detail
  "Sets the resolution at which curves display. The default value is
  20. This function is only useful when using the P3D or OPENGL
  renderer as the default (JAVA2D) renderer does not use this
  information."
  [detail]
  (.curveDetail *applet* (int detail)))

(defn curve-point
  "Evalutes the curve at point t for points a, b, c, d. The parameter
  t varies between 0 and 1, a and d are points on the curve, and b and
  c are the control points. This can be done once with the x
  coordinates and a second time with the y coordinates to get the
  location of a curve at t."
  [a b c d t]
  (.bezierPoint *applet* (float a) (float b) (float c) (float d) (float t)))

(defn curve-tangent
  "Calculates the tangent of a point on a curve.
  See: http://en.wikipedia.org/wiki/Tangent"
  [a b c d t]
  (.curveTangent *applet* (float a) (float b) (float c) (float d) (float t)))

(defn curve-tightness
  "Modifies the quality of forms created with curve and
  curve-vertex. The parameter squishy determines how the curve fits
  to the vertex points. The value 0.0 is the default value for
  squishy (this value defines the curves to be Catmull-Rom splines)
  and the value 1.0 connects all the points with straight
  lines. Values within the range -5.0 and 5.0 will deform the curves
  but will leave them recognizable and as values increase in
  magnitude, they will continue to deform."
  [ti]
  (.curveTightness *applet* (float ti)))

(defn curve-vertex
