We’ve updated our Terms of Use to reflect our new entity name and address. You can review the changes here.
We’ve updated our Terms of Use. You can review the changes here.
a・company
/
  • Streaming + Download

    Purchasable with gift card

     

about

音楽生成スクリプト

// Kotekan

System.RandomSeed=(2018-1)
Array SC=("c","e","f","g","b")
Str S_H="10100100100100100100100100100100"
Str S_L="01001001001001001010010010010010"
Str P_H="00010010010010010001001001001001"
Str P_L="10100100100100100100100100100100"
Int i Int Gm_1 Int Gm_2

[8
 #M1="l16 o6" #M2="l16 o5" #M3="l16 o5" #M4="l16 o4"
 i=1
 [32
  IF (MID(S_H,i,1)="1") {#W=SC(Random(SizeOf(SC)))} ELSE {#W="r"} #M1=#M1+#W
  IF (MID(S_L,i,1)="1") {#W=SC(Random(SizeOf(SC)))} ELSE {#W="r"} #M2=#M2+#W
  IF (MID(P_H,i,1)="1") {#W=SC(Random(SizeOf(SC)))} ELSE {#W="r"} #M3=#M3+#W
  IF (MID(P_L,i,1)="1") {#W=SC(Random(SizeOf(SC)))} ELSE {#W="r"} #M4=#M4+#W
  i++
 ]
 Gm_1=RandomSelect(10,12,13,14) Gm_2=RandomSelect(10,12,13,14)
 Tempo=RandomSelect(30,45,60,75,90)
 TR=1 @(Gm_1) P(64-48) v.Random(40) q(200) [4 #M1] "r4"
 TR=2 @(Gm_1) P(64+16) v.Random(40) q(200) [4 #M2] "r4"
 TR=3 @(Gm_2) P(64-16) v.Random(40) q(200) [4 #M3] "r4"
 TR=4 @(Gm_2) P(64+48) v.Random(40) q(200) [4 #M4] "r4
]

credits

from 実​験​音​楽​工​房, released November 24, 2013

license

all rights reserved

tags

about

YAMAZAWA Japan

作曲:山澤昭彦
録音:山澤昭彦

実験音楽工房
[ A・COMPANY ]

Produced numerous albums for "Generative Music", composed in the programming language. In recent years, the 'Experimental Music Workshop Exhibition' in Tokyo and other places, combined visual works and generated music. Also worked on the performance of the shakuhachi classical music and collaboration with musicians and dances of many genre.
... more

contact / help

Contact YAMAZAWA

Streaming and
Download help

Report this track or account

If you like YAMAZAWA, you may also like: