visual programming
Sometimes the tools I use either use a lot of memory or is very slow (or both) so why not make my own. What could go wrong, right?
(def width 1280)
(def height 720)
(canvas width height)
;; str -> image
;; (img-load path)
;; image -> Method -> num -> num -> image
;; Method: 'bilinear 'nearest
;; (img-resize image method w h)
;; image -> image -> Method
;; Method: 'normal 'multiply 'overlay 'screen
;; (img-mix bg fg method)
;; image -> nil
;; (img-render image)
(def gradient
(-> (img-load "examples/assets/grad_b2w_100x100.png")
(img-resize 'bilinear width height)
))
(def image
(-> (img-load "examples/assets/azur_atramenta.jpg")
(img-resize 'bilinear width height)
(img-mix gradient 'multiply)
))
(img-render image)
This project is under GPL-3.0, although the output (files, data, or visual media generated by the software) doesn't have to be covered by the GPL. You may use the output of this software for any purpose, including commercial projects, regardless of the license used for this code.
Image examples are licensed separately:
Prefix | From | License |
---|---|---|
azur_* | Azur1s | CC BY-NC 4.0 |
mh_* | Morten Rieger Hannemose | "...which you can use to your hearts content." |
anything else | CC0 |