一次无聊的尝试——蜂鸣器播放音频 借助Mathematica生成数据

好吧其实是个代码备份

代码不求优雅 完全是能用的标准

audio=Audio["D:\\Users\\flaribbit\\Desktop\\Untitled.wav"]
audio=UnitStep[# - 0.2] &[audio]
data=Floor[Partition[AudioData[audio][[1]], 8]];
StringRiffle["0x" <> IntegerString[FromDigits[#, 2], 16, 2] & /@ data, ", "]

高位优先

然后直接贴到.h文件里面弄个数组编译就行了