FYI2 (in case you forgot email)

Hello, in case you forgot email, here is FYI2 for your information. Feel free to use the engine to whatever you want. You can even sell it for big money (if someone wants to buy it :-) Look at line 3 ('tekst). First version was using [...to-string first text...] but that produces strange results in draw (some strange chars are printed on screen - instead of "f" it produces something like f=A2=B0 . And printing one char (#"f") does not work in draw). Bye, REBOL/DEMO Team -----------8<-cut-copy-and-paste-here-----8<---------------------- view layout [ b: box 350x150 with [ tekst: ["r" "e" "b" "o" "l" "d" "e" "m" "o" "@" "s" "e" "z" "n" "a" m "." "c" "z"] rate: 20 edge: none image: make image! 350x150 font: make font [color: red shadow: 1x1 size: 15 style: 'bold] feel: make feel [ engage: func [f a e][ switch a [ time [ f/effect: compose/deep [ crop 1x3 347x142 fit blur contrast 3 luma -28 draw [ pen (200.200.200 + random 55.55.55) font make font [size: (18 + random 12)] text (make pair! reduce [((14 + random 2) * index? f/tekst) 40 + random 15]) (first f/tekst) ] ] f/image: to-image f show f f/tekst: next f/tekst if tail? f/tekst [f/tekst: head f/tekst] ] ] ] ] ] ] --- Odchoz=ED zpr=E1va neobsahuje viry. Zkontrolov=E1no antivirov=FDm syst=E9mem AVG (http://www.grisoft.cz). Verze: 6.0.231 / Virov=E1 b=E1ze: 112 - datum vyd=E1n=ED: 12.2.2001