guile-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Simple picture language


From: Christopher Lemmer Webber
Subject: Re: Simple picture language
Date: Mon, 26 Mar 2018 20:18:54 -0500
User-agent: mu4e 0.9.18; emacs 25.3.1

Hey Ricardo!  Super cool that you were able to get this working so fast!
:)  I look forward to trying it when I get some spare cycles to breathe.


Ricardo Wurmus writes:

> Hi Guilers,
>
> I wrote a simple SVG-based picture language.  To try it:
>
>     wget https://elephly.net/downies/pict.scm
>
> Then start geiser in Emacs and load the module:
>
>     M-x run-guile
>     (add-to-load-path (getcwd))
>     ,use (pict)
>
> Let’s play!
>
>     (circle 100)
>     (colorize (circle 100) "red")
>
>     ,use (srfi srfi-1)
>     ,use (srfi srfi-26)
>     (apply hc-append (map (cut circle <>) (iota 10 2 4)))
>
>     (apply cc-superimpose (map (cut circle <>) (iota 10 2 4)))
>
>     (apply hc-append (map (cut rotate (rectangle 10 30) <>) (iota 36 0 10)))
>
>     (apply cc-superimpose (map (cut rotate (triangle 100 300) <>) (iota 36 0 
> 10)))
>
> And so on.
>
> There’s also “blur”, but it doesn’t show up right in Geiser; it seems
> that Emacs doesn’t render SVG filters.
>
> What do you think?



reply via email to

[Prev in Thread] Current Thread [Next in Thread]