日記

Attractor II（COBOLで音楽を生成 -3-）

初版 2019/08/18 00:35

改訂 2019/08/30 03:18

COBOLは事務処理用の言語と言われていますが、テキストデータの処理はけっこうできるので、他のアプリと連携すればたいていのことは出来てしまいます。

この作品は２枚の翼と呼ばれるアトラクターをプロットするためのデータをCOBOLで生成し、グラフィック処理と音楽生成処理を別のアプリで行った例です。

グラフのプロットは「gunplot」音楽データ（MML）への変換にはスクリプト言語「awk」を使っています。

Attractor II

[データ生成プログラム]

program-id. attractor2.

data division.

working-storage section.

01 i pic 9(6).

01 a pic s9v999999.

01 b pic s9v999999.

01 x0 comp-2.

01 x1 comp-2.

01 y0 comp-2.

01 y1 comp-2.

01 ad pic x(20).

procedure division.

display '2mai no tsubasa' upon syserr

display 'a=' upon syserr no advancing accept ad compute a = function numval(ad)

display 'b=' upon syserr no advancing accept ad compute b = function numval(ad)

compute x0 = 0.1 compute y0 = 0

perform varying i from 1 by 1 until i > 10000

compute x1 = y0 + a * x0 + (5 * x0 ** 2) / (1 + x0 ** 2) + 1 - 0.2 * function exp(-y0 ** 2)

compute y1 = -b * x0 + 5 * (-1 ** i)

display x1 ' ' y1

compute x0 = x1 compute y0 = y1

end-perform

exit program.

10000個のデータがプロットされる様子。こちらは「processing」で書きました。

#プログラミング #COBOL

« 前の Labログへ

次の Labログへ »

Author

実験音楽工房（A･COMPANY）

様々なプログラミング言語を使って、音楽を自動作曲しています。

使用している言語

・awk
・COBOL
・JavaScript
・R
・サクラ
・ドリトル
・なでしこ

山澤昭彦音楽関係プロフィール

山形県鶴岡市出身。1946年生まれ。尺八を学生時代に青木静夫（二代青木鈴募）・横山勝也の各氏から学ぶ。退職後にリコーダーを細岡ゆきに師事。
ブログラム言語を使って音楽を生成する「Generative Music」のアルバムを多数制作、近年はコンビュータを使った映像作品と生成音楽を組み合わせた「実験音楽工房展」を東京などて開催したほか、尺八古典本曲の演奏や多ジャンルのミュージシャンやダンサーとのコラボレーションなど、複合的なアート活動にも取り組んている。

2011年「実験音楽工房 A･COMPANY」プログラムによる生成音楽制作開始
2012年「音系・メディアミックス同人即売会 M3」出展（2012 - 2015年）
2015年「厚木リコーダーオーケストラ」入団（2019年退会）
2015年「実験音楽工房展 2015」東京・山形
2016年「実験音楽工房展 2016」東京・山形・鶴岡
2017年「実験音楽工房展 2017」東京・鶴岡
2018年「県立鶴岡南高等学校吹奏楽研究会 50周年記念コンサート」企画開催
2018年「大人のリコーダーアンサンブル」（NHK文化センター庄内教室）講師
2019年「鶴岡水上の音楽祭」芸術監督
2019年「尺八と生成映像による観音」ライブシリーズを開始
2020年「佳興の会」をプロデュース現在も年4回の邦楽ライブを開催中
2020年「アンサンブル・チコーニア」結成活動開始
2020年「K×I×Y 三人展 vol.1 - 時の断片 -」SoundScape 2020
2021年「酒井家庄内入部400年記念事業七絃琴復興プロジェクト」代表
2022年「K×I×Y 三人展 vol.2 - 時の戯れ -」フラクタルの樹・家具の音楽
2022年「酒井家庄内入部400年記念事業芸術祭参加」音楽絵巻その2
2023年「K×I×Y 三人展 vol.3 - 時の覚醒 -」四字熟語・ピアノのための響
2023年「鈴木順子×山澤昭彦二人展 MindScape」@ 鶴岡アートフォーラム
2023年「山澤昭彦とその界隈」@ TACTおとアート2023
2024年「鈴木順子×山澤昭彦二人展 CosmicEgg」@ 御茶ノ水 Gallery 蔵
2024年「Sa･Kura Music Week 2024」@ 御茶ノ水 Gallery 蔵
2025年「祈りの残照：尺八古典本曲演奏会」@ 東京大学東洋文化研究所

https://yamazawa.bandcamp.com/

Timeline

17人がフォロー中

Items

1,163
Lab Logs

100
Likes

780

Since August 2019