bad at Lexpr

Dec 31, 2006 at 4:03pm

bad at Lexpr

I guess this is question for Karlheinz or Peter Elsea .-)

Lexpr syntax is terribly obsfuscated for me. How could i achieve what
follows, but with Lexpr ?

#P window setfont “Sans Serif” 10.;
#P message 64 512 192 9109514;
#P window linecount 1;
#P newex 64 476 14 9109514 _;
#P newex 64 443 36 9109514 thresh;
#P window linecount 3;
#P comment 111 338 100 9109514 just an example where tempo = 120 & div = 4;
#P window linecount 1;
#P newex 79 339 27 9109514 125;
#P newex 49 124 123 9109514 t l 0;
#P message 49 55 158 9109514 1 0 0 1 1 1 0 1 0 1 1 0 0 1 0 1 0;
#P newex 64 407 40 9109514 accum;
#P newex 49 223 40 9109514 t i b b;
#P newex 49 181 23 9109514 iter;
#P connect 5 0 2 1;
#P connect 1 2 5 0;
#P connect 8 0 9 0;
#P connect 7 0 8 0;
#P connect 2 0 7 0;
#P connect 1 1 2 0;
#P fasten 4 1 2 0 167 393 69 393;
#P connect 0 0 1 0;
#P fasten 4 0 0 0 54 144;
#P connect 3 0 4 0;
#P window clipboard copycount 10;

Thanks in advance for your advices, all.

cheers

f.e

f.e chanfrault | aka | personal computer music
> >>>>>> http://www.personal-computer-music.com
> >>>>>> |sublime music for a desperate people|

#29444
Dec 31, 2006 at 6:16pm

#92132
Dec 31, 2006 at 7:16pm

#92133
Dec 31, 2006 at 7:40pm

#92134
Jan 3, 2007 at 8:08pm

f.e wrote:
> I guess this is question for Karlheinz or Peter Elsea .-)
>
> Lexpr syntax is terribly obsfuscated for me. How could i achieve what
> follows, but with Lexpr ?

Why would you want to use Lexpr? In your example none of the list
members is used for the result, only the length of the list determines
the length of the result, the rest is simple arithmatic:

#P window setfont “Sans Serif” 9.;
#P window linecount 1;
#P newex 235 119 26 196617 t b i;
#P window linecount 3;
#P message 152 238 195 196617 0. 125. 250. 375. 500. 625. 750. 875.
1000. 1125. 1250. 1375. 1500. 1625. 1750. 1875. 2000. 2125.;
#P window linecount 1;
#P newex 152 215 62 196617 prepend set;
#P newex 152 193 50 196617 zl group;
#P newex 97 119 76 196617 t b i 0.;
#P newex 97 96 37 196617 zl len;
#P window setfont “Sans Serif” 10.;
#P message 97 56 182 196618 1 0 0 1 1 1 0 1 0 1 1 0 0 1 0 1 0;
#P window setfont “Sans Serif” 9.;
#P number 235 99 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 179 99 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 152 167 37 196617 * 1.;
#P newex 130 145 32 196617 uzi;
#P comment 178 82 41 196617 BPM;
#P comment 234 83 41 196617 divison;
#P newex 179 119 54 196617 !/ 60000.;
#P newex 179 145 82 196617 / 1.;
#P connect 4 2 5 0;
#P fasten 10 0 11 0 102 188 157 188;
#P connect 9 0 10 0;
#P connect 10 1 4 0;
#P connect 10 2 11 0;
#P connect 11 0 12 0;
#P connect 5 0 11 0;
#P connect 14 1 0 1;
#P fasten 14 0 0 0 240 140 184 140;
#P connect 7 0 14 0;
#P connect 12 0 13 0;
#P connect 8 0 9 0;
#P connect 6 0 1 0;
#P connect 0 0 5 1;
#P connect 1 0 0 0;
#P window clipboard copycount 15;


Stefan Tiedje————x——-
–_____———–|————–
–(_|_ —-|—–|—–()——-
– _|_)—-|—–()————–
———-()——–www.ccmix.com

#92135

You must be logged in to reply to this topic.