 
 (defn create-image [w h format] (.createImage *applet* (int w) (int h) (int format)))
 
-;; $$createInput
-;; $$createInputRaw
-;; $$createOutput
+(defn create-input [filename]
+	(PApplet/createInput (java.io.File. filename)))
+
+(defn create-input-raw
+	"Call openStream() without automatic gzip decompression."
+	[filename]
+	(.createInputRaw *applet* filename))
+
+(defn create-output [filename]
+	(PApplet/createOutput (java.io.File. filename)))
 
 (defn create-path [filename] (PApplet/createPath filename))
 
-;; $$createReader
-;; $$createWriter
+(defn create-reader [filename] (.createReader *applet* filename))
+
+(defn create-writer [filename] (.createWriter *applet* filename))
 
 (defn cursor
   ([] (.cursor *applet*))


(defn load-pixels [] (.loadPixels *applet*))

;; $$loadStrings
;; $$log

(defn start-loop [] (.loop *applet*))

  ([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))

