example of Ryu syntax (all built-in APIs are unstable)

sketch-jan5.ryu

; a loop utility
(fn loop (n iter) (do
  (var i 0)
  (while (< i n) (do
    (iter i)
    (set i (+ 1 i))
  ))
))

(var BG 0xff)
(var FG 0x00)

(random/seed 5)

(canvas/fill BG)
(var count 20)
(loop count (fn (i) (do
  (var y (random 0 width))
  (var x (random 0 height))
  (var len (random 0 (* 0.25 width)))
  (var x2 (+ x len))
  (var y2 (+ y len))
  (canvas/line x y x2 y2 FG)
)))

; finally emit the canvas
(canvas/draw)