You should be automatically redirected . If not, visit
http://newlisper.wordpress.com
and update your bookmarks.

22/12/2006

A message

Here's a message from (newlisper) headquarters to all of you out there:

(set 's1 '(112 104 117 117 124 35 
102 107 117 108 118 119 112 100 
118 35 100 113 103 35 100 35 107 
100 115 115 124 35 113 104 122 35 
124 104 100 117))
(set 's2 
  (slice (flat (dup '(110 101 119 108 105 115 112) 20 )) 0 (length s1)))
(dolist (i (randomize (sequence 0 (length s2))))
    (for (j 40 (s1 i))
        (nth-set i s2 (- j 3))
        (println "\027[H\027[2J" (join (map char s2)))
        (sleep (+ 30 (- (length s2) i)))))
    (exit)

I hope you can run it OK...

2 Comments:

At 11:42, Anonymous Anonymous said...

Very very nice done !!!

Happy new year to you too...
Keep it running in 2007...

newdep.

 
At 21:51, Blogger don Lucio said...

Thanks for all the interesting and entertaining posts this year and all the best for you in 2007.

 

Post a Comment

Links to this post:

Create a Link

<< Home