another demo

blk: copy [backdrop black space 2 across] repeat y 10 [ repeat x 10 [ append blk compose/deep [ box 22x22 rate 48 effect [draw [line 10x10 10x10]] feel [ angle: (y * 7 + x * 4) tick: 1 engage: func [face action event][ if action = 'time [ diff: event/offset - face/offset tmp1: 180 * cosine diff/x tmp2: 180 * sine diff/y angle: tmp1 + tmp2 + tick // 360 face/effect/2/2: to-pair reduce [ 10 + to-integer 10 * cosine angle 10 + to-integer 10 * sine angle ] tick: tick + 8 // 1000000 show face ] ] ] ] ] append blk [return] ] view center-face layout blk Anton.

Just a habit. Theoretically, the script could later be put in a loop or a function called more than once and then the block would grow. eg. loop 3 [ blk: [hello] repeat n 4 [append blk n] ] ;== [hello 1 2 3 4 1 2 3 4 1 2 3 4] Anton.