feat: implemented encoding up to 7th order

Alexander Nguyen

15 hours ago d6bb375789821f4e4e175465f50e77e8a6b1aaf7

 sources/utilities.lisp

@@ -366,7 +366,7 @@
                                                for gainitem in (cdr subgainlist) do
                                                (unless (< gainitem -150)   ;it would be better to catch 'nil' instead of a very small value (depends on float precision)
                                                  (setf substr (string+ substr (format nil ",~dp~d" channelitem gainitem))))
                                                finally return substr)
                                                finally (return substr))
                                          )))))
    outstr))