HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2008
1126
××音声ファイルを波形にしたい3解決


××

リンク

2008/11/26(Wed) 22:25:07|NO.21059

タイトルのとおりです

横軸を時間軸、縦軸を周波数で波形にして表示したいのですが
周波数とか振幅とかを音声ファイルから抽出する方法が分かりません

どうしたらよいでしょうか



この記事に返信する


××

リンク

2008/11/27(Thu) 21:06:56|NO.21082

過去ログを読み、さくらさんのexmp3dll.asを使うといいというところまで分かりました
includeしてみたところ、exmp3dll.asの次の行に文法のミスがあるという
エラーメッセージが出て困ってます

[285行目]  null="" : lstrcpy varptr(ref),varptr(null)

このエラーはどうすれば直りますか?
VBMP3.dllはきちんと入れました



××

リンク

2008/11/27(Thu) 21:45:19|NO.21083

すいません自己解決しました
オシロスコープではなくスペクトラムですが・・・

以下、今日以降同じ悩みを持った人のために


#include "sysval.as" #include "gblconst.as" #include "winapi32.as" #include "exmp3dll.as" onexit *quit screen 0,640,150 initmp3 25,25,25 dim info,32 dim Lch,256 dim Rch,256 dim oldL,256 dim oldR,256 dialog "mp3",16,"MPEG Layer-3 Audio File" if stat=0:end playmp3 info,refstr r=128 g=0 b=0 ;========= repeat color 0,255,0 redraw 0 color 0,0,0:boxf getSpectrum Lch,Rch temp=0 repeat 255 temp=temp+Lch(cnt)+Rch(cnt)-oldL(cnt)-oldR(cnt) oldL(cnt)=Lch(cnt):oldR(cnt)=Rch(cnt) loop if temp>1000:r=255:else:r=r-5 if r<0:r=0 color r,g,b repeat 16 boxf cnt*16+1,150,cnt*16+15,150-Lch(cnt*16) loop repeat 16 boxf cnt*16+301,150,cnt*16+315,150-Rch(cnt*16) loop redraw 1 wait 1 loop ;========= *quit stopmp3 closemp3 end




f(浮気中)

リンク

2008/11/27(Thu) 22:05:43|NO.21084

・・・。
見事。



ONION software Copyright 1997-2023(c) All rights reserved.