PC9801MML言語で映画「アイス・キャッスル」のテーマ曲を演奏してみた

Last Updated on 2024年2月28日

1978年のアメリカ映画。少女の成功・恋・挫折・再起を描いた青春ドラマ。これをＰＣ９８０１のＭＭＬ言語でコーディングして演奏してみました。

映画「アイス・キャッスル」

古い映画になります。原曲はスローテンポで繊細な曲です。その曲をアップテンポに変えて、曲の最後は急激に盛り上がるようにアレンジしました。

ＭＭＬ言語で演奏してみると、荒いですね。電子共鳴が原因なのか分かりませんが、雑音がプチプチと入り、楽器の音色設定を変えた時はポンと大きな雑音が入る。ハードウェアの設計上、仕方がないこととして受け流します。

音源とＭＭＬデータを公開いたします。なお、音源は1990年ぐらいのものですので、音質がよくありませんのでご勘弁を。

音源

それでは 聴いてみましょう。映画「アイスキャッスル」より。演奏はPC-9801RA。

ＭＭＬデータ

ＦＭ音源３声とＰＳＧ１声を使用してます。１行目はヘッダですので、実際の音楽データは２行目以降になります。
いろいろな音色を使ってます。
・＠３　　「丸みを持ったエレクトリックピアノ」
・＠１２　「ベル」
・＠１３　「アコースティック・ピアノ」
・＠２５　「高音域の弦楽器」
・＠２８　「丸みを持ったエレクトリックピアノ」
・＠３０　「シンセサイザー・ベース」
・＠３６　「フルート」
・＠４１　「ビブラフォン」
・＠５２　「ティンパニー」
・＠５７　「ホルン」
・＠５８　「スネアドラム」
・＠７７　「チャイム」

"1103","アイス・キャッスル",66,4,0
01 "MBT120Q7@36@V110O5L4C.Q3L8CQ7L2C","MB@57RRRR","MB@41@V95O5Q8RRRL4C","MBL4R4R4R4R4"
02 "O4L4B.Q3L8BQ7L2B","RRRR","RRR<B>","RRRR"
03 "O5L2CDQ8","RRRR","RCRD","RRRR"
04 "@V98L2CQ8R8@77@V95O5L8GAB","@30@V110O4R4R4Q4L8C.L16CL8CC","@3@V108O4L2O4C@58@V102Q4L8C.L16CL8CC","RRRR"
05 "O6Q7L4C.L8CQ8<L8B-AGF","@57@V98Q8L1O4F","@V95Q5L4RCRC","R4R4R4R4"
06 ">Q7L4C.L8CQ8<L8B-AGF","E","RCRC","RRRR"
07 ">Q7L4C.L8CQ8<L8B-AB->C","E-","RCRC","RRRR"
08 "Q7L4C.<L8FL2F","L2DL4FE","RCRL8CC","RRRR"
09 "R4L8Q8B-AQ7L4G>D","L2DL4DC","L4RCRC","RRRR"
10 "Q8L2C<F","L2CL4DC","RCRC","RRRR"
11 "R4L8Q8B-AQ7L4G>E","L2DL4DC","RCRC","RRRR"
12 "Q6L2C.Q8<L4F","L2CC","RCRL8CC","RRRR"
13 "@V97Q8>L32C#L4D...L2E","<L2B-L4>DD-","L4RCRL8CC","RRRR"
14 "L4FFFL8<AF","L4CCL2D","L4CCCR4","RRRR"
15 "Q6L8B-B-B->C<Q7L16AGL4FQ8L8F","L2DD","L4RCRC","RRRR"
16 "@V95L1G","@V103Q6L4DQ8DB->D","@V95CL8CCCCCC","RRRR"
17 "@25@V100O6Q7L4C.L8CQ8<L8B-AGF","@V103O3L4Q7FO4Q8FL2A","R4@V102L4CRC","V11O6Q7L4C.L8CQ8<L8B-AGF"
18 ">Q7L4C.L8CQ8<L8B-AGF","O3L4Q7EO4Q8EL2G","RCRC",">Q7L4C.Q8L8C<B-AGF"
19 ">Q7L4C.L8CQ8<L8B-AB->C","O3L4Q7E-O4Q8E-L2G","RCRC",">Q7L4C.Q8L8C<B-AB->C"
20 "Q7L4C.<L8FL2F","O3Q7L4DQ8O4L2FL4A","RCRL8CCL4O2","Q7L4C.<L8FL2F"
21 "R4L8Q8B-AQ7L4G>D","O4Q8L2GL4FG","Q7@57@V103B-@58O4@V102Q4L4CRC","R4L8Q8B-AQ7L4G>D"
22 "Q8L2C<F","L8E.L32FF#L2GL4F","RCRL8CCL4O2","Q8L2C<F"
23 "R4L8B-AQ7L4G>E","O4Q8L2GL4FG","Q7@57@V103B-@58O4@V102Q4L4CRC","R4L8B-AQ7L4G>E"
24 "Q6L2C.Q8<L4F","L8E.L32FF#L2GL8FL24F#GG#","L4RCRL8CC","Q6L2C.Q8<L4F"
25 "@V103Q8>L2DE","@V105Q8L4AQ6GO5Q8DQ6D-","L4RCRL8CC","V12Q8>L2DE"
26 "@V106L4FFFL8@V102<AF","@V107Q8L2CD","L4CCCR","L4FFFL8@V11<AF"
27 "Q6L8B-B-B->C<Q7L16AG@V100L4FQ8L8F","@V105Q8L2G@V103D","L4RCRC","Q6L8B-B-B->C<Q7L16AGL4FQ8L8F"
28 "@V96Q6L2F.R8Q5O4@48@V110L8F","R4Q4@30@V102O4L16CCCCL8CR8R4","C@V100Q4L16CCCCL8CR8R4","Q6L2F.R4"
29 "@V110Q7L2D.R8L8F","L4R4RRR","@52@V94Q5L4D.L8DDL4DL8D","L4R4RRR"
30 "L4E.L8CL4D.L8F","RRRR","L4C.L8CCL4CL8C","RRRR"
31 "L8Q8EQ4DQ8EQ4CQ8DQ4CQ8<B->C","R4R4R4R4","L4C.L8CCL4CL8C","RRRR"
32 "L2C..R8","R4R4R4R4","L4C.L8CQ2C.L16CL8CC","RRRR"
33 "Q7<L4G.L8B-L4A.>L8C","R4R4R4R4","Q5L4D.L8DDL4DL8D","RRRR"
34 "<L8B-L4>D.L4FL8Q8DQ4C","R4R4R4R4","L4D.L8DDL4DL8C","RRRR"
35 "Q8DQ4C@V105L2C.","R4R4R4R4","L4C.L8CL4CC","RRRR"
36 "@28@V105Q8O4L2E@V107F@77@V95","@28O4@V105Q8L2C@30@V102O4Q4L8C.L16CL8CC","@58@V100L4CR4Q4L8C.L16CL8CC","RRRR"
37 "O6Q7L4C.L8CQ8<L8B-AGF","@57@V98Q8L1O4F","@V95Q5L4RCRC","R4R4R4R4"
38 ">Q7L4C.L8CQ8<L8B-AGF","E","RCRC","RRRR"
39 ">Q7L4C.L8CQ8<L8B-AB->C","E-","RCRC","RRRR"
40 "Q7L4C.<L8FL2F","L2DL4FE","RCRL8CC","RRRR"
41 "R4L8Q8B-AQ7L4G>D","L2DL4DC","L4RCRC","RRRR"
42 "Q8L2C<F","L2CL4DC","RCRC","RRRR"
43 "R4L8Q8B-AQ7L4G>E","L2DL4DC","RCRC","RRRR"
44 "Q6L2C.Q8<L4F","L2CC","RCRL8CC","RRRR"
45 "@V97Q8>L32C#L4D...L2E","<L2B-L4>DD-","L4RCRL8CC","RRRR"
46 "L4FFFL8<AF","L4CCL2D","L4CCCR4","RRRR"
47 "Q6L8B-B-B->C<Q7L16AGL4FQ8L8F","L2DD","L4RCRC","RRRR"
48 "@V95L1G","@V103Q6L4DQ8DB->D","@V95CL8CCCCCC","RRRR"
49 "@25@V100O6Q7L4C.L8CQ8<L8B-AGF","@V103O3L4Q7FO4Q8FL2A","R4@V102L4CRC","V11O6Q7L4C.L8CQ8<L8B-AGF"
50 ">Q7L4C.L8CQ8<L8B-AGF","O3L4Q7EO4Q8EL2G","RCRC",">Q7L4C.Q8L8C<B-AGF"
51 ">Q7L4C.L8CQ8<L8B-AB->C","O3L4Q7E-O4Q8E-L2G","RCRC",">Q7L4C.Q8L8C<B-AB->C"
52 "Q7L4C.<L8FL2F","O3Q7L4DQ8O4L2FL4A","RCRL8CCL4O2","Q7L4C.<L8FL2F"
53 "R4L8Q8B-AQ7L4G>D","O4Q8L2GL4FG","Q7@57@V103B-@58O4@V102Q4L4CRC","R4L8Q8B-AQ7L4G>D"
54 "Q8L2C<F","L8E.L32FF#L2GL4F","RCRL8CCL4O2","Q8L2C<F"
55 "R4L8B-AQ7L4G>E","O4Q8L2GL4FG","Q7@57@V103B-@58O4@V102Q4L4CRC","R4L8B-AQ7L4G>E"
56 "Q6L2C.Q8<L4F","L8E.L32FF#L2GL8FL24F#GG#","L4RCRL8CC","Q6L2C.Q8<L4F"
57 "T115@V103Q8>L2D@V106E","@V105Q8L4AQ6GO5Q8DQ6D-","@V100L8CCCL16CC@V105L8CCCL16CC","V12Q8>L2DE"
58 "Q8T110@V110L4FFQ8@V105L1F","Q8@V105L4ccL2d@30@V100O4Q8L4CR4","@V110L8CCCL16CCL8CC@V115L16CCCCL4CR4","Q8L4FFQ8L1F"
59 "@28@V110R4L8@V102<AFQ7L8B-B-B->C<Q7L16AG@V100L4F.","Q8@13@V95R2L2GD","R1R2","R1R2"
60 "T110@23@V105R2Q8L16O4CDEFL32CDEFGAB>C","@30@V110O4L4CL8CC@V115CC@V120L16CCCC","@V100L4CL8CC@V105CCL16CCCC","V10R2L2C>"
61 "@V107Q7L4C.L8CQ8<L8B-AGF","@V114L4CL8CCL6CCC","Q8@12@V105O5L1C","V12Q7L4C.L8CQ8<L8B-AGF"
62 ">Q7L4C.L8CQ8<L8B-AGF","L4CL8CCL12CCCL24CCCCCC","C",">Q7L4C.L8CQ8<L8B-AGF"
63 ">Q7L4C.L8CQ8<L8B-AGF","L4CL8CCL6CCC","C",">Q7L4.CL8C<Q8L8B-AGF"
64 ">L2C.L4F>","L4CL8CCL12CCCL24CCCCCC","L2C.R4",">L2C.L32<<CDEFGAB>C"
65 "L2E>E","@V118L12CCCL24CCCCCCT100L12CCCL24CCCCCC","L1E","L16CCCCCCCCCCCCCCCC"
66 "R8Q6L8C","R8Q6L8F","R8Q6L8A","R8Q6L8C"

まとめ

テンポや音量の指定は面倒ですが、その代わりに自由度があります。
音楽を言語化表現できる言語がＭＭＬです。

こんな感じで、ほかのオリジナル作品やプログラムしたものなど、ソースを公開していきます。