Fixed issue with pixels

2019-07-24 10:09:21 +09:00
parent a1af04063b
commit d78a610d80
4 changed files with 20 additions and 17 deletions
--- a/examples/archives/transform.lisp
+++ b/examples/archives/transform.lisp
--- a/examples/pixels/pixels.lisp
+++ b/examples/pixels/pixels.lisp
@@ -1,7 +1,8 @@
-; pixels
-
-(clear) 
-(import "../../PREVIEW.jpg" 
-  (frame)) 
+(clear)
+; drag an image on the window
+(open $path)
+;
 (pixels 
-  (rect 0 0 500 500) saturation 0.5)
+  (rect 100 100 400 400) saturation 0)
+(pixels 
+  (rect 300 300 400 400) contrast 0.5)