NCFSMPで録音したDATデータを使い遊んでいて ふと録音データの内容はどうなっているのか気になりました NCFSMPを改造してTXTで保存しようとしてみましたができませんでした また録音データを読み込んで使うことはできますがPRINTはできませんでした ①録音データは必ずDATで保存するしかないですか？ ②DATデータの中身を見ることはできませんか？ どちらか分かりましたら回答お願いします

2.DATの中身は配列変数、変数はPRINTできる、つまりそういうこと。

回答ありがとうございます DATの中身は配列変数なんですね 配列用のPRINTを試してみます

VAR A[100]またはDIM A[100]と なっていた場合、 While I<100 For I=0 to 1 step 1 ？A[I] Wend とすれば多分いけます。

1→しようと思えば出来ますが、 DIM A[100] A0$=STR$(A[0]) A1$=STR$(A[1]) A2$=STR$(A[2]) という風に一つずつ代入していくしかないですね。 大変時間がかかります。

たぶんいけないかも…

録音して波形描かなかったらもったいないオバケともったいない爺さんが鍋パーティー開くレベル。 8bit 録音だったら for i = 0 to len(dat)-1 gline i, 120, i, 120-dat[i] next 16bit 録音だったら for i = 0 to len(dat)-1 gline i, 120, i, 120-dat[i]/256 next

☆Tatsukin★さん 録音データはDATで保存するのが効率的なんですね 具体的なプログラム例をありがとうございます 試したのですがエラーが出てしまいました！

でんぺんさん やっぱり難しいようですね MIKIさん 上のプログラムを実行したところ録音データの波形が表示されました まだ写しただけで理解していないので 内容についてこれから考えます

MIKIさん 白い部分が録音データの内容だとわかりました(たぶん) 録音データは波形を配列変数にして保存されているんですね！ 回答ありがとうございました! 分からないことが多いので公式ガイドを買おうかな…

よかったです。 そしたら次は FFT して周波数成分も表示しないと、もったいないばあさんが阿波踊り始めるレベル。

コメントが適当で（？）すいませんでした。 ☆Tatsukin★さんのサンプルがそのままでは動かないという意味だったんですが、とりあえずエラーが出たところだけ修正すると、ただ配列の内容を表示したいだけなら、５行目のWHILEは不要というか５行目以降はこんな感じです。 FOR I=0 TO 16384-1 ?A[I] NEXT 数字のところをあえて-1と書いたのは用意した配列のサイズをFORで回すときは０から数えるんで実際は配列のサイズー１になるから、それをわかりやすいように書いただけで、始めから１引いた値にしても大丈夫です。 一応そんな感じです！

MIKIさん 高速フーリエ変換を検索してみたのですが 検索しただけでは全く理解できませんでした 追加コンテンツの高度サウンドユニットにもFFT命令があるようですね もうしばらく調べて考えてみます

でんぺんさん 詳しくありがとうございます 中身を表示して見ることができました！ 自分でもエラーを直せるよう勉強します

FFT ライブラリ公開しています。 ・FFT4G_H [43SEAXMD] 使い方 var n=256, z#[n*2] ' n は 2 のべき乗(2,4,8,16,32,64,128,256,512,1024,...) であること for i = 0 to n - 1 z#[i * 2] = dat[i]: z#[i * 2 + 1] = 0 next fft n, z# for i = 0 to n - 1 var k = i * 2 var r# = log(max(0.001, sqr(z#[k] * z#[k] + z#[k + 1] * z#[k + 1]))) * 20 gpset i, 239-r#, #green next

MIKIさん 丁寧にありがとうございます！ 実行してみたところ左右対称の緑の点が表示されました これが周波数成分なんですね (今のところ式の内容は理解できていません)

>これが周波数成分なんですね そうです。 まあ必要なければ使わなくていいと思います。 FFT は複素数の配列から複素数の配列へ変換するので、 最初のループは実数配列である dat[n] を複素数配列 z#[n * 2] にしてるとこです。この FFT ライブラリでは z#[i*2] が i 番目の複素数の実部 z#[i*2+1] が i 番目の複素数の虚部 を表すという約束です。 二番目のループは、各複素数の絶対値 = √(実部の2乗 + 虚部の2乗) の対数をとりプロットしています。 対数を取るのは小さい値を見やすくするためです。 横軸も対数表示(1Hz, 10Hz, 100Hz, 1000Hz,... を等間隔に表示)することが多いですね。(このプログラムはそうなってません)