サクラトップ 掲示板トップ ログイン

そんな彼はコンピュータ作曲家 - サクラ曲掲示板6

曲掲示板6にエディタ機能が追加されました！気軽に曲を作成してみましょう！
spark.K

そんな彼はコンピュータ作曲家

spark.K
MML先頭 2000 文字だけ表示していますダウンロード全文を見る
  1. /*
  2.  
  3. ---------------------------------
  4. ～そんな彼はコンピュータ作曲家～
  5. Ver.09999999999999129387918724094
  6. ---------------------------------
  8. /~~~~~~~~~~~/
  9. | . . | ～♪
  10. | v |
  11. / ~~~~~~~~~~~/ written in 2010
  12. /============/ by spark.K
  13. /============/ last modified in 2011/01/27
  14.  
  15. 　Ｅ　　　　く　改　ど　　　　ん　｜　｜　を　じ　　　　て　ま　曲　　　
  16. 　ｎ　　　　い　造　ん　作　　で　ド　の　リ　め　伴　　い　す　名　こ
  17. 　ｄ　　　　け　も　ど　曲　　い　に　生　ズ　定　奏　　る　。　や　れ
  18. 　　　　　　ど　自　ん　の　　る　含　成　ム　義　や　　と　　　｀　は
  19. 　Ｏ　　　　。　由　使　参　　だ　ま　は　に　し　ド　　思　と　作　自
  20. 　ｆ　　　　　　で　っ　考　　け　れ　｀　用　て　ラ　　い　り　者　動
  21. 　　　　　　　　す　て　に　　。　る　か　い　あ　ム　　ま　あ　も　作
  22. 　説　　　　　　。　も　な　　∪　音　な　ま　る　パ　　す　え　ラ　曲
  23. 　明　　　　　　ソ　構　る　　　　を　り　す　リ　｜　　。　ず　ン　シ
  24. 　　　　　　　　｜　い　と　　　　ラ　適　。　ズ　ト　　　　｀　ダ　ス
  25. 　　　　　　　　ス　ま　思　　　　ン　当　　　ム　は　　　　曲　ム　テ
  26. 　　　　　　　　が　せ　っ　　　　ダ　で　メ　パ　｀　　　　に　に　ム
  27. 　　　　　　　　読　ん　た　　　　ム　す　ロ　タ　あ　　　　は　生　で
  28. 　　　　　　　　み　し　ら　　　　に　∩　デ　｜　ら　　　　な　成　す
  29. 　　　　　　　　に　｀　｀　　　　選　コ　ィ　ン　か　　　　っ　し　。
  30.  
  31. ホームページ　→　http://user.freespace.jp/sparkk/
  32. MIDI素材はじめました。4ヶ月前に。
  33. */
  34.  
  35. Int WithCHORD=Random(3);
  36. Int NUM;
  37. Array Normal = ({rrrrrrrr},{-+-+-+-+},{+-+-+-+-},{-++-++-+},{--+--+--},
  38. {+---+---},{++-+++-+},{--+---+-},{---+---+},{-+++-+++},{+--+--++},
  39. {-+-Div{++}-+-Div{++}},{+++++-++},{+------+},{+---+--+},{-------+},
  40. {++------},{+++r+^^^},{++r+^^^^},{Div{++}Div{++}rrrrrr},{+r+r+r++},
  41. {rr+^r+r+},{+r+r+rStretch{+++}^})
  42. Array Three = ({---+--},{------},{+--+--},{-++-++},{-+++--},{-+--+-},
  43. {++--++},{+-+-++},{+^++++})
  44.  
  45. Array Ptn = Normal;
  46. Int MAX=SizeOf(Ptn);
  47.  
  48. // 曲の長さ（というか繰り返し）
  49. Int LLL = 4 * RandomSelect(1,2,2,4);
  50.  
  51. TR(1) CH(10) @(RandomSelect(1,17,25,26)) p(Random(128))
  52. Tempo=RandomSelect(60,92,112,120,138)
  53. UseKeyShift(off)
  54.  
  55. NUM=Random(MAX);
  56. Sub{
  57. #a = Replace(Ptn(NUM),{+},{n46},on)
  58. #a = Replace(#a,{-},{n42},on)
  59. l16 [(LLL) #a ]
  60. }
  61.  
  62. NUM=Random(MAX)
  63. #a = Replace(Ptn(NUM),{+},{n40},on)
  64. #a = Replace(#a,
作者からのコメント
再生ボタンを押すたびに異なる世界を奏でる自動作曲です。
作曲者
彼
ライセンス
🌐パブリックドメイン↗商用利用 ○改変 ○改変も転載も自由
転載
許可
推奨音源
パソコン内蔵音源
ピコサクラ対応
未対応
ピコサクラバージョン
0.2.3
動画
なし
投稿日時
2011-01-27 02:10
更新日時
2011-01-27 21:43
お気に入り
ゴロニャ～ゴH゛
ダウンロード数
508
タグ
→この曲(id:411)に問題がある場合こちらへ

感謝のコメント

スコーラ2011/01/29
そんなシュールなあなたを食べられてしまいそう・・・じゃなかった。
なかなか、いいかんじに壊れた自動題名も含めて、おもしろい試みだと思います。
shimada82011/03/08
あ　な　た　は　天　才　で　す！＼（＾ ＾）／
♪
この曲に「ありがとう」を伝えませんか？
ひとことの感想が、作った人にとって何よりの励みになります。
定型文のボタンもあるので、キーボードが苦手でも大丈夫です。
ログインしてコメントする はじめての方はこちら（無料登録）