 
 (defn load-pixels [] (.loadPixels *applet*))
 
-;; $$loadStrings
+(defn load-shape
+	"Load a geometry from a file as a PShape."
+	[filename]
+	(.loadShape *applet* filename))
+
+(defn load-strings 
+	"Load data from a file and shove it into a String array."
+	[filename]
+	(.loadStrings *applet* filename))
+
 ;; $$log
 
 (defn start-loop [] (.loop *applet*))


(defn no-loop [] (.noLoop *applet*))

(defn norm [val start stop] (PApplet/norm (float val) (float start) (float stop)))

(defn normal [nx ny nz] (.normal *applet* (float nx) (float ny) (float nz)))


  ([x1 y1 z1 x2 y2 z2] (.line *applet* (float x1) (float y1) (float z1) (float x2) (float y2) (float z2))))

;; $$link

(defn load-bytes [filename] (PApplet/loadBytes filename))

(defn load-font [filename] (.loadFont *applet* filename))

(defn load-image [filename] (.loadImage *applet* filename))

