Added normalize example

hundredrabbits · Mar 6, 2020 · a3122d6 · a3122d6
1 parent 754a242
commit a3122d6
Showing 1 changed file with 11 additions and 0 deletions.
diff --git a/examples/pixels/normalize.lisp b/examples/pixels/normalize.lisp
@@ -0,0 +1,11 @@
+; Render script for a6000
+(clear) 
+(def photo-rect 
+  (rect 0 0 
+    (div 4240 2) 
+    (div 2400 2)))
+(resize photo-rect:w photo-rect:h)
+(import $path photo-rect)
+(pixels normalize 
+  (pick photo-rect))
+(export "export" "image/jpeg" 0.9)