如何解码mp3文件

raj*_*ive 2 lisp mp3 id3 common-lisp

如何使用lisp获取mp3文件的艺术家

(let ((in (open "test.mp3" :direction 
        :input 
        :element-type '(unsigned-byte 8))))
 (when in
   (loop for line =  (read-byte 'utf-8 in)

      while line do (format t "~a" line ))
    (close in)))
Run Code Online (Sandbox Code Playgroud)

Fre*_*Foo 5

完整的ID3(MP3标签)解析器在Practical Common Lisp,第25章中有所描述.