the power of http://w1.awave.or.jp/home/workarea/sakura/

BUYO-BUYO-IGOR still can't do iit by myself..is here

this originally was a reply to a friend i found on csound list
and he introduced me about this list...
but he..he..i already was a ROM-oriented person from the far east...here..talaaah!

things i wrote in the message
may "do not work" on non-japanese machines...but
couldn't wait until making sure if it does..
so am fwd-ing this thing anyway..
hope it does work?..will some one try?

------8<----

> Yeah on the microtonality.-- There's a growing number of us
> electronic-microtuning musicians using csound because it's totally open.

i also wanna create music with
microtuned-sco 4 microtuned-orc
the latter micro seems to be the super hard thing for a
"making footprints at the entrance" kind of person like me to write
is there any good SIMPLE micro-oriented-example
for me to start from?

> are you on
> tuning@egroups.com ?

yes i am!
and now preparing to post a great thing
my friend and his supporter had done recently
a person called mine-san
programmed a script2midi(=MML) oriented app. named "SAKURA"
it's windows-jp based so
i didn't have a chance to try it out
but
another guy
turned it web-based!!!

http://w1.awave.or.jp/home/workarea/sakura/

it's still jp-based so..am asking them to turn it english oriented..
but the gui is super simple
just put the script(things like "abde..." also works)
and push the button on the left
and the site will give you the "as the result"-MIDI-file

great thing about "SAKURA" is that
it can do micro-thangs

mine-san
already wrote some scripts 4 my
"SaRiGaMa's Oil Vending Orchestra" project
http://i.am/sarigama
and some of the result turned into
browser instruments @:
http://mybrowser.ismad.com
intruments "Ri","Ga","Pa","Da",&"Ni"
4
"song no.5"
are what i'm talking about

maybe you can try this script written by him?
(hope it's not too long for the web-baed version)

//<--from here
/*
微分テープル関数
VAL = 128 ~ 256
*/
Function MT(Val){
IF(Val==128){#RET={ p%0; n60 }}
IF(Val==129){#RET={ p%552; n60 }}
IF(Val==130){#RET={ p%1099; n60 }}
IF(Val==131){#RET={ p%1643; n60 }}
IF(Val==132){#RET={ p%2182; n60 }}
IF(Val==133){#RET={ p%2717; n60 }}
IF(Val==134){#RET={ p%3248; n60 }}
IF(Val==135){#RET={ p%3776; n60 }}
IF(Val==136){#RET={ p%203; n61 }}
IF(Val==137){#RET={ p%722; n61 }}
IF(Val==138){#RET={ p%1238; n61 }}
IF(Val==139){#RET={ p%1750; n61 }}
IF(Val==140){#RET={ p%2259; n61 }}
IF(Val==141){#RET={ p%2763; n61 }}
IF(Val==142){#RET={ p%3264; n61 }}
IF(Val==143){#RET={ p%3762; n61 }}
IF(Val==144){#RET={ p%160; n62 }}
IF(Val==145){#RET={ p%651; n62 }}
IF(Val==146){#RET={ p%1138; n62 }}
IF(Val==147){#RET={ p%1622; n62 }}
IF(Val==148){#RET={ p%2103; n62 }}
IF(Val==149){#RET={ p%2581; n62 }}
IF(Val==150){#RET={ p%3055; n62 }}
IF(Val==151){#RET={ p%3526; n62 }}
IF(Val==152){#RET={ p%3994; n62 }}
IF(Val==153){#RET={ p%363; n63 }}
IF(Val==154){#RET={ p%825; n63 }}
IF(Val==155){#RET={ p%1284; n63 }}
IF(Val==156){#RET={ p%1740; n63 }}
IF(Val==157){#RET={ p%2193; n63 }}
IF(Val==158){#RET={ p%2643; n63 }}
IF(Val==159){#RET={ p%3091; n63 }}
IF(Val==160){#RET={ p%3535; n63 }}
IF(Val==161){#RET={ p%3977; n63 }}
IF(Val==162){#RET={ p%320; n64 }}
IF(Val==163){#RET={ p%757; n64 }}
IF(Val==164){#RET={ p%1190; n64 }}
IF(Val==165){#RET={ p%1621; n64 }}
IF(Val==166){#RET={ p%2050; n64 }}
IF(Val==167){#RET={ p%2476; n64 }}
IF(Val==168){#RET={ p%2899; n64 }}
IF(Val==169){#RET={ p%3320; n64 }}
IF(Val==170){#RET={ p%3738; n64 }}
IF(Val==171){#RET={ p%58; n65 }}
IF(Val==172){#RET={ p%472; n65 }}
IF(Val==173){#RET={ p%883; n65 }}
IF(Val==174){#RET={ p%1292; n65 }}
IF(Val==175){#RET={ p%1698; n65 }}
IF(Val==176){#RET={ p%2102; n65 }}
IF(Val==177){#RET={ p%2504; n65 }}
IF(Val==178){#RET={ p%2903; n65 }}
IF(Val==179){#RET={ p%3301; n65 }}
IF(Val==180){#RET={ p%3696; n65 }}
IF(Val==181){#RET={ p%4088; n65 }}
IF(Val==182){#RET={ p%383; n66 }}
IF(Val==183){#RET={ p%772; n66 }}
IF(Val==184){#RET={ p%1158; n66 }}
IF(Val==185){#RET={ p%1542; n66 }}
IF(Val==186){#RET={ p%1925; n66 }}
IF(Val==187){#RET={ p%2305; n66 }}
IF(Val==188){#RET={ p%2683; n66 }}
IF(Val==189){#RET={ p%3059; n66 }}
IF(Val==190){#RET={ p%3434; n66 }}
IF(Val==191){#RET={ p%3806; n66 }}
IF(Val==192){#RET={ p%80; n67 }}
IF(Val==193){#RET={ p%448; n67 }}
IF(Val==194){#RET={ p%815; n67 }}
IF(Val==195){#RET={ p%1179; n67 }}
IF(Val==196){#RET={ p%1542; n67 }}
IF(Val==197){#RET={ p%1903; n67 }}
IF(Val==198){#RET={ p%2262; n67 }}
IF(Val==199){#RET={ p%2619; n67 }}
IF(Val==200){#RET={ p%2975; n67 }}
IF(Val==201){#RET={ p%3328; n67 }}
IF(Val==202){#RET={ p%3680; n67 }}
IF(Val==203){#RET={ p%4031; n67 }}
IF(Val==204){#RET={ p%283; n68 }}
IF(Val==205){#RET={ p%630; n68 }}
IF(Val==206){#RET={ p%975; n68 }}
IF(Val==207){#RET={ p%1318; n68 }}
IF(Val==208){#RET={ p%1660; n68 }}
IF(Val==209){#RET={ p%2000; n68 }}
IF(Val==210){#RET={ p%2339; n68 }}
IF(Val==211){#RET={ p%2675; n68 }}
IF(Val==212){#RET={ p%3011; n68 }}
IF(Val==213){#RET={ p%3344; n68 }}
IF(Val==214){#RET={ p%3677; n68 }}
IF(Val==215){#RET={ p%4007; n68 }}
IF(Val==216){#RET={ p%240; n69 }}
IF(Val==217){#RET={ p%568; n69 }}
IF(Val==218){#RET={ p%894; n69 }}
IF(Val==219){#RET={ p%1218; n69 }}
IF(Val==220){#RET={ p%1541; n69 }}
IF(Val==221){#RET={ p%1863; n69 }}
IF(Val==222){#RET={ p%2183; n69 }}
IF(Val==223){#RET={ p%2502; n69 }}
IF(Val==224){#RET={ p%2819; n69 }}
IF(Val==225){#RET={ p%3135; n69 }}
IF(Val==226){#RET={ p%3449; n69 }}
IF(Val==227){#RET={ p%3763; n69 }}
IF(Val==228){#RET={ p%4074; n69 }}
IF(Val==229){#RET={ p%289; n70 }}
IF(Val==230){#RET={ p%598; n70 }}
IF(Val==231){#RET={ p%905; n70 }}
IF(Val==232){#RET={ p%1211; n70 }}
IF(Val==233){#RET={ p%1516; n70 }}
IF(Val==234){#RET={ p%1820; n70 }}
IF(Val==235){#RET={ p%2123; n70 }}
IF(Val==236){#RET={ p%2424; n70 }}
IF(Val==237){#RET={ p%2724; n70 }}
IF(Val==238){#RET={ p%3022; n70 }}
IF(Val==239){#RET={ p%3319; n70 }}
IF(Val==240){#RET={ p%3615; n70 }}
IF(Val==241){#RET={ p%3910; n70 }}
IF(Val==242){#RET={ p%108; n71 }}
IF(Val==243){#RET={ p%400; n71 }}
IF(Val==244){#RET={ p%692; n71 }}
IF(Val==245){#RET={ p%982; n71 }}
IF(Val==246){#RET={ p%1270; n71 }}
IF(Val==247){#RET={ p%1558; n71 }}
IF(Val==248){#RET={ p%1845; n71 }}
IF(Val==249){#RET={ p%2130; n71 }}
IF(Val==250){#RET={ p%2414; n71 }}
IF(Val==251){#RET={ p%2697; n71 }}
IF(Val==252){#RET={ p%2979; n71 }}
IF(Val==253){#RET={ p%3260; n71 }}
IF(Val==254){#RET={ p%3540; n71 }}
IF(Val==255){#RET={ p%3818; n71 }}
IF(Val==256){#RET={ p%0; n72 }}
}

BR(1);//ベンドレンジ
//---------------Rnd
#Phrase={}
[16
IF(Random(8)==0){ #Phrase=#Phrase+{r}; }ELSE{
l16 q100 MT(Random(128,256));#Phrase=#Phrase+#RET;
}
]
[8 #Phrase ]
//<---to here

BUYO-BUYO-IGOR---------------------------------------

what's coolweired now in Japan ?
http://hello.to/coolweirdjapan

tokyopeople@egroups.com=ml 4 people living in Tokyo
http://i.am/gaijin