解決しているみたいですが気になったので、
>HSP上で音質などを制御するのは難しいでしょうか。win32？とかを調べているのですが
HSPはWindowsのdllやcomを呼び出せますので、Windowsで出来ることはある程度出来るかと思います。
私、信号処理を趣味で長年やっているのですが、HSPというよりEQ,COMP,REVERBなどの信号処理を理解する方が敷居が高いかもですね。
GENKIさんが超便利なRIFFフォーマット(wav)読み込むモジュール紹介されてますので、
まず、Rawデータをそれで信号処理して波形描画などしてみて、
それが出来たら再生はHSPからwinmm.as読み込んでwaveOutOpen関数を調べてみてそのデータを再生がと良いと思います。
HSPに限った事ではなく、他の言語でもローレベルな事をしたいと思うと、コアな部分をプログラムしていく必要が出てきます。
もし、さっくり行いたいなら、誰かがフリーで配布している自分がやりたいことに近いライブラリdllを探すのも手かと思います。
（なかなか自分に都合の良いライブラリが無いので結局作るはめになるのですが、それが楽しかったりもするので。）
ですから、HSPでは難しいというより、オーディオの信号処理が専門的なので学習コストが高いかもです。
>サウンドデバイスのマスター音量がレベルメーターのように動いていますが
>レベルメーターの最大値のリアルタイム取得とHSP上で音量制御ができれば・・・。
サウンドデバイスはWindowのAPIを使っているわけですから、HSPで出来なくはないと思います。
win32が理解できないと少し難しいかもしれませんが、一例としてCOM機能でcoreaudioを使うとできます。
実行して、デバイスのマスターミキサーのメーターと音量触ってみてくださいませ。HSPの画面が連動します。
また、コメント外すと、ピークをみてできる限り0.5(-6dBfs)の出力になるようマスターの音量が動きます。
※個人的にはマスターを動的に触るのは、もし音声ツールを作られたいなら個人環境により（アンプ等）
事故があるのであまりお勧めしないです。
ゲームであればオーサリングの段階で音量を揃えたら良いと思います。
また、機械的に音量をそろえることは周波数帯によって聴感が変わりますし音は時間の芸術ですからなかなか難しいです。
#module
; sprocketさんのモジュール
#defcfunc tofloat double p1
temp = p1
return lpeek(temp) >> 29 & 7 | (p1 < 0) << 31 |lpeek(temp, 4) - (p1 ! 0) * 0x38000000 << 3
#defcfunc todouble int p1
temp = 0.0
lpoke temp, 4, (p1 & 0x80000000) | (((p1 & 0x7fffffff) >> 3) + ((p1 & 0x7fffffff) ! 0) * 0x38000000)
lpoke temp, 0, p1 << 29
return temp
#global
;参考：https://docs.microsoft.com/en-us/windows/win32/api/_coreaudio/
#define CLSID_IMMDeviceEnumerator "{BCDE0395-E52F-467C-8E3D-C4579291692E}"
#define IID_IMMDeviceEnumerator "{A95664D2-9614-4F35-A746-DE8DB63617E6}"
#define IID_IMMDevice "{D666063F-1587-4E43-81F1-B948E807363F}"
#define IID_IAudioEndpointVolume "{5CDF2C82-841E-4546-9722-0CF74078229A}"
#define IID_IAudioMeterInformation "{C02216F6-8C67-4B5B-9D00-D008E73E0064}"
#usecom IMMDeviceEnumerator IID_IMMDeviceEnumerator CLSID_IMMDeviceEnumerator
#comfunc IMMDeviceEnumerator_GetDefaultAudioEndpoint 4 int,int,var
#usecom IMMDevice IID_IMMDevice CLSID_IMMDeviceEnumerator
#comfunc IMMDevice_Activate 3 var,int,int,var
#usecom IAudioEndpointVolume IID_IAudioEndpointVolume CLSID_IMMDeviceEnumerator
#comfunc IAudioEndpointVolume_SetMasterVolumeLevel 6 int,int
#comfunc IAudioEndpointVolume_SetMasterVolumeLevelScalar 7 int,int
#comfunc IAudioEndpointVolume_GetMasterVolumeLevel 8 var
#comfunc IAudioEndpointVolume_GetMasterVolumeLevelScalar 9 var
#usecom IAudioMeterInformation IID_IAudioMeterInformation CLSID_IMMDeviceEnumerator
#comfunc IAudioMeterInformation_GetPeakValue 3 var
newcom devEnum, IMMDeviceEnumerator
IMMDeviceEnumerator_GetDefaultAudioEndpoint devEnum, 0, 0, p
newcom dev, IMMDevice, -1, p
iid = 0xC02216F6, 0x4B5B8C67, 0x08D0009D, 0x64003EE7
IMMDevice_Activate dev, iid, 1, 0, p
newcom ami,IAudioMeterInformation,-1,p
newcom aev, IAudioEndpointVolume, -1, p
;threshold = 0.5 : attackTime = 0.05 : autogain = 0.0
*MAIN
IAudioMeterInformation_GetPeakValue ami, res : peak = todouble(res)
IAudioEndpointVolume_GetMasterVolumeLevelScalar aev, res : vol = todouble(res)
IAudioEndpointVolume_GetMasterVolumeLevel aev, res : voldb = todouble(res)
;autogain = limitf( autogain+((threshold-peak*vol)*attackTime), 0.0, 1.0)
;IAudioEndpointVolume_SetMasterVolumeLevelScalar aev, tofloat(autogain), 0
rgbcolor $C0C0C0 : boxf 0, ginfo_winy - double(ginfo_winy)*peak, 32, ginfo_winy
rgbcolor $00FF00 : boxf 0, ginfo_winy - double(ginfo_winy)*peak*vol, 32, ginfo_winy
rgbcolor $0000FF : p = ginfo_winy - vol*ginfo_winy: line 0, p, 32, p
color : pos 0,0 : mes strf("peak:%f(%f) vol:%f(%fdB)",peak, peak*vol, vol, voldb)
redraw 1 : await 16 : redraw 0 : rgbcolor $FFFFFF : boxf
goto *MAIN
音量の取得・音質の調整
