Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search

a bloated one-liner

 [1/3] from: anton::lexicon::net at: 24-Nov-2002 15:26

It can be in one line :) but I've added some newlines to survive email posting. So paste this into your console: do s: {view center-face layout repeat n 10 [ append [backdrop black size 320x320 space 0] compose/deep [ h1 form pick "HelloWorld" (n) (random white) rate 50 with [ n: (n * 10)] feel [engage: func [f a e][if a = 'time [ f/n: f/n + 1 f/offset/x: 150 + to-integer 140 * sine f/n * f/n * 0.001 + f/n show f]]]]]} length? replace/all s form newline "" ; (length without newlines) Anton.

 [2/3] from: gerardcote:sympatico:ca at: 24-Nov-2002 10:49

Hi Anton, What a beautiful and relaxing feeling... With this one you could easily compete with those artificial gelatinous waves enclosed in aquariums and selled at 70 $ CDN a piece or compete with OLD mirror balls that were used ( in the 70s) when I danced my first slows in darkened rooms otherwise lighted only by blacklights... Imagine this (and other appropriate) patterns displayed on a giant waterfall screen backlighted by some projector driven by a REBOL script and synchronized by some OLD SONGS or NEW AGE music (Kitaro or Vangelis do you remember old timers ??? or any other submission from recent chores or artists I don't know of yet!) somewhere in some RAVE party or theatre (for romantics) or simply in my living (since I can't afford any of those) ... I am not always dreaming but ... Cheers, Gerard P.S. For this one I prefer not to ask for the DOCs and delight myself with my eyes. Thanks. It's a pleasure to contemplate with!

 [3/3] from: lennart:nylen:biz at: 25-Nov-2002 7:17

2002-11-24 05:26:41, "Anton" <[anton--lexicon--net]> wrote:
>do s: {view center-face layout repeat n 10 [ >append [backdrop black size 320x320 space 0] compose/deep [
<<quoted lines omitted: 4>>
>show f]]]]]} >length? replace/all s form newline "" ; (length without newlines)
Thanks for ruining my day Anton. I had my mind set on working on my philosophy essay and typing some C and Java, but it looks like I'll be spending the day trying out some new REBOL ideas you just gave me. :-P BTW, nice little proto-demo you've got there...;-) /Lennart Fridén ([lennart--nylen--biz]) The World is not sane so why should I be?

  • Quoted lines have been omitted from some messages.
    View the message alone to see the lines that have been omitted