-
吉野の山
「吉野の山」は1664年刊行の『糸竹初心集』に載っている曲で、江戸時代の初期に大流行した歌のようです。復元された演奏を参考に、箏が伴奏する歌と木管楽器による三声のカノンにしてみました。歌っているのは、Sinsy( sinsy.jp )の香鈴です。 https://youtu.be/uTXLpWK3CZU // 吉野の山 Tempo=64 Lyric={"吉野の山を 雪かと見れば 雪ではあらで 花の吹雪よの"} #Uta="q=90 e4g4d4e8d8|e4g4g2 a4g4a4g4|d8e8g4g2 a4>c4d4d4|c4e4g4d4|c2<a2 >c4d4<a2|g1 a4g8e8g4a4|>c4d4<a4g4|e2d2 e4g4a4g8e8|d1" TR(1) P(64-00) Time(01:1:0) @Koto #Uta TR(2) P(64-00) Time(01:1:0) @VoiceOohs #Uta TR(3) P(64-32) Time(15:1:0) @Flute #Uta TR(4) P(64-00) Time(15:1:0) @Oboe r1 #Uta TR(5) P(64+32) Time(15:1:0) @Bassoon r1r1 #Uta
実験音楽 2021mugen
-
SoundSacpe 2020 #1
SoundScape 2020(Piano Version) https://youtu.be/wuN38GKMJvE プログラム(サクラ掲示板) https://sakuramml.com/mmlbbs6/post.php?mml_id=2137
実験音楽 2020mugen
-
SoundSacpe 2019 #3
SoundSacpe 2019(MT-32 version) SoundScape 2019 4トラック版 https://soundcloud.com/a_company/soundscape-2019-0003 音源:MuntVSTi (MT-32 emurator) CH-2:Taiko CH-3:Harp 2 CH-4:Marimba 1 CH-5:Vibe 1
実験音楽 2019mugen
-
丑の舞
新型コロナウイルス終息祈願の曲を作っててみました。厄を払う大太鼓と鳥の声、能の地謡のような祈りの歌。 // 丑の舞(新型コロナウイルス終息祈願) System.RandomSeed=2021 Tempo=30 Array fushi=("dg","dg","gd","ga","a>c<",">cd<",">de-<",">cd<",">cd<",">d<a",">d<g","gd") Array haku=("l8","l8","l8","l4","l2","l4.","l4.","l4.") Array Chant=("","","","") Array T_int=("@124 q=100 r1^1 o5 ","@48 q=100 r2 o2 ","@53 q=102 o3 ","@53 q=102 o3") Array T_pan=(127,0,34,94) Array T_vrn=(60,60,60,60) Array T_trn=(99,99,09,09) Int i=0 [4 [(8*4) Chant(i)=Chant(i)+haku(Random(SizeOf(haku)))+fushi(Random(SizeOf(fushi))) ] #MML=T_int(i)+Chant(i) TR(i+1) v.Random(T_vrn(i)) t.Random(T_trn(i)) P(T_pan(i)) #MML i++ ] 丑の舞 - 新型コロナウイルス終息祈願 https://youtu.be/xk8saRj-KA8
実験音楽 2021mugen
-
BWV772によるファンタジア
バッハの2声のインヴェンション第1番の音の並びをデフォルメしてみました。前半は音の長さをランダムに、後半は音の出現順序と長さをランダムにしています。 曲名{"BWV772によるファンタジア"} System.RandomSeed=2018 Array p1=(,60,62,64,65,62,64,60,67,72,72,71,72,71,72,74,67,69,71,72,69,71,67,74,79,79,77,79,77,79,76,81,79,77,76,79,77,81,79,77,76,74,72,76,74,77,76,74,72,71,69,72,71,74,72,71,69,67,66,69,67,71,69,62,72,71,72,74,71,69,67,66,64,67,66,69,67,71,69,72,71,74,72,76,74,71,72,74,79,72,71,72,71,69,67,67,67,69,71,72,69,71,67,67,66,67,66,69,71,72,74,71,72,69,71,74,72,71,69,72,71,74,72,76,74,72,71,74,73,76,74,73,74,76,77,69,71,73,74,66,68,69,71,72,74,64,66,68,69,66,68,64,76,74,72,76,74,72,71,74,72,81,80,83,81,76,77,74,68,77,76,74,72,71,69,69,81,79,77,76,79,77,81,79,76,77,79,81,77,79,76,77,79,77,76,74,77,76,79,77,74,76,77,79,76,77,74,76,72,74,76,77,74,76,72,74,76,77,79,81,77,79,76,77,79,81,83,84,81,83,79,84,79,76,74,72,72,70,69,67,65,69,67,70,69,71,72,64,62,72,65,71,64,67,72) Array p2=(,48,50,52,53,50,52,48,55,43,55,57,59,60,57,59,55,60,59,60,62,64,55,57,59,60,52,54,55,57,59,60,50,52,54,55,52,54,50,55,47,48,50,52,54,55,52,47,48,50,38,43,45,47,48,45,47,43,50,55,54,55,57,50,52,54,55,52,54,50,57,62,60,62,55,67,65,64,62,65,64,67,65,64,65,62,64,69,67,65,64,67,65,69,67,65,67,64,65,70,69,67,65,69,67,70,69,67,65,64,62,65,64,67,65,64,62,60,59,62,60,64,62,60,59,57,56,59,57,60,59,52,62,60,62,64,60,59,57,55,54,57,56,59,57,60,59,62,60,64,62,65,64,57,64,52,57,45,64,62,60,59,62,61,64,62,57,59,60,62,59,60,57,59,62,60,59,57,60,59,62,60,55,57,58,60,57,58,55,57,58,57,55,53,62,60,58,57,65,64,62,64,50,52,53,55,52,53,50,52,48,50,52,53,50,52,53,55,43,36,48) Int i Tempo=80 TR(1) P(64-32) i=1 [(SizeOf(p1)-1) l(RandomSelect(2,4,8,8,8)) n(p1(i)) i++] i=1 TR(2) P(64+32) r1 [(SizeOf(p2)-1) l(RandomSelect(2,4,4,8)) n(p2(i)) i++] TrackSync Tempo=160 TR(1) P(64-32) [(SizeOf(p1)-1) l(RandomSelect(2,4,8,8,8)) n(p1(Random(1,SizeOf(p1))))] TR(2) P(64+32) r1 [(SizeOf(p2)-1) l(RandomSelect(2,4,4,8)) n(p2(Random(1,SizeOf(p2))))] BWV772によるファンタジア https://soundcloud.com/a_company/bwv772f
実験音楽 2018mugen
-
SoundScape 2020
K×I×Y 三人展 vol.1のための曲生成スクリプトです。 // SoundScape 2020 Int rsd=Random(2020) // 乱数の種 Int tpo=Random(20,40) // テンポ Int trk=Random(1,9) // トラック数 Int nlw=Random(36,60) // 音程の下限 Int nup=Random(48,86) // 音程の上限 Array PC=(1) // 音色配列 Piano Solo version //Array PC=(1,1,5,7,9,12,13,25,42,47,48,49,50,51,52,53,58,61,69,71,72,74,78,107,108,117) // GMの例 Print("Seed="+rsd,"Tempo="+tpo,"Trk="+trk,"Note="+nlw,nup,"PC="+PC) System.RandomSeed=rsd ResetGM; Int i=1 TempoChange(tpo) [(trk) TR(i) // CH(1) for no multi timbre @(RandomSelect(PC)) v.Random=24 t.Random=240 q(Random(90,160)) [(16*(16/trk)) Time(Random(16)+1:Random(4)+1:0) n(Random(nlw,nup)) ] i++ ] Time(17:1:0) l1r Int TM=Time/TimeBase*(600000/Tempo)/10000 Print("演奏は "+TM/60+" 分 "+ TM%60+" 秒) HTML版 COBOLで500曲(100×5パターン)の SAKURA 用のソースコードを自動生成、MIDIにコンパイルして録音したものを、今では多くのモダンブラウザで動くHTML5オーディオで再生します。曲は100個並んだ再生ボタンで選択できますが、そのまま流しておけばランダムに曲を選んで再生を続けます。曲の開始に合わせて用意された背景画像(1000枚)がランダムに切り替わります。画面はブラウザのサイズに自動でフィットするように作ってありますのでスマホでも大丈夫です。画面のサイズを変更した場合は再読込してください。PCなら全画面(F11)モードで流しておけばアートな環境音楽として使えます。 SoundScape 2020 https://etext-music.com/SS2020/ K×I×Y 三人展 vol.1 - 時の断片 - https://koten-navi.com/node/120679 Piano Version https://youtu.be/wuN38GKMJvE
実験音楽 2020mugen
-
SoundScape 2018
一行(280文字以内)のプログラムで曲を生成する「One-Liner-Music」シリーズ(2018年版)の試作作品。録音はピアノ音源になっていますが、シンセなど様々な音源で演奏できます。 曲名{SoundScape 2018} System.RandomSeed=2018 Tempo=30 v.Random=24 t.Random=240 q(Random(90,160)) [(16*16) Time(Random(16)+1:Random(4)+1:0)n(Random(24,96))] /* 曲名{SoundScape 2018} System.RandomSeed=2018 Tempo=30 v.Random=24 t.Random=240 q(Random(90,160)) [(16*16) Time(Random(16)+1:Random(4)+1:0)n(Random(24,96)) ] */ SoundScape 2018 https://soundcloud.com/a_company/soundscape-2018
実験音楽 2018mugen
-
SoundScape 2020(SVG版)
SoundScape 2020 - 時の断片 - https://etext-music.com/SS2020/FDT/ 演奏される曲は全部で500曲。スマホでも鑑賞可能。PCならフルスクリーン表示(F11)がお勧めです。 キーボードで下記の操作ができます。 音源関係 [0] ピアノ バージョン(初期値) [1] 1 Track バージョン [2] 2 Track バージョン [4] 4 Track バージョン [8] Multi Track バージョン オーディオプレイヤー関係 [z] 一時停止 [ ] 再生(スペースキー) [+] 次の曲 [-] 前の曲 [r] 曲をランダムに選ぶ デジタルカウンタ表示関係 [s] 表示(初期値) [d] 消去 背景アート画像関係 [n] 非表示(初期値) [c] カラー画像で表示 [m] モノクロ画像で表示 マウスで下記の操作ができます。 Click(Tap) 音楽再生(ランダム選曲) Dbl Click 音楽停止
実験音楽 2020mugen
-
SoundScape 2020(再生ボタン版)
100個のプレイボタン付き SoundScape 2020(時の断片 III) https://etext-music.com/SS2020/ COBOLで500曲(100×5パターン)の SAKURA 用のソースコードを自動生成、MIDIにコンパイルして録音したものを、今では多くのモダンブラウザで動くHTML5オーディオで再生します。曲は100個並んだ再生ボタンで選択できますが、そのまま流しておけばランダムに曲を選んで再生を続けます。曲の開始に合わせて用意された背景画像(1000枚)がランダムに切り替わります。画面はブラウザのサイズに自動でフィットするように作ってありますのでスマホでも大丈夫です。画面のサイズを変更した場合は再読込してください。PCなら全画面(F11)モードで流しておけばアートな環境音楽として使えます。
実験音楽 2020mugen
-
SoundScape 2020 音楽プログラム
SoundScape 2020(Piano Version) https://youtu.be/wuN38GKMJvE // SoundScape 2020 生成プログラム Int rsd=Random(2020) // 乱数の種 Int tpo=Random(20,40) // テンポ Int trk=Random(1,9) // トラック数 Int nlw=Random(36,60) // 音程の下限 Int nup=Random(48,86) // 音程の上限 Array PC=(1) // 音色配列 Piano Solo version //Array PC=(1,1,5,7,9,12,13,25,42,47,48,49,50,51,52,53,58,61,69,71,72,74,78,107,108,117) // GMの例 Print("Seed="+rsd,"Tempo="+tpo,"Trk="+trk,"Note="+nlw,nup,"PC="+PC) System.RandomSeed=rsd ResetGM; Int i=1 TempoChange(tpo) [(trk) TR(i) // CH(1) for no multi timbre @(RandomSelect(PC)) v.Random=24 t.Random=240 q(Random(90,160)) [(16*(16/trk)) Time(Random(16)+1:Random(4)+1:0) n(Random(nlw,nup)) ] i++ ] Time(17:1:0) l1r Int TM=Time/TimeBase*(600000/Tempo)/10000 Print("演奏は "+TM/60+" 分 "+ TM%60+" 秒)
実験音楽 2020mugen
-
Techno Classical
アルバムを聴く https://yamazawa.bandcamp.com/album/techno-classical
実験音楽 2015mugen
-
RnA
アルバムを聴く https://yamazawa.bandcamp.com/album/rna
実験音楽 2014mugen
-
Percusión
アルバムを聴く https://yamazawa.bandcamp.com/album/percusi-n
実験音楽 2013mugen
-
Palindrome
アルバムを聴く https://yamazawa.bandcamp.com/album/palindrome
実験音楽 2011mugen
-
Le quattro stagioni
アルバムを聴く https://yamazawa.bandcamp.com/album/le-quattro-stagioni-2
実験音楽 2015mugen