diff --git a/config.example.scm b/config.example.scm index 871f55f..8e60b73 100644 --- a/config.example.scm +++ b/config.example.scm @@ -1,4 +1,5 @@ (define fifo-file "/tmp/mpd.fifo") +(define bitrate 44100) (define fps 30) (define resolution 1) (define scale 1) diff --git a/yammer.scm b/yammer.scm old mode 100644 new mode 100755 index 6d2a1ea..9555f18 --- a/yammer.scm +++ b/yammer.scm @@ -1,3 +1,5 @@ +#!/usr/bin/env -S guile +!# ;;; ;;; Copyright (C) 2023 Skylar Widulski ;;; @@ -43,7 +45,7 @@ ;; Define widely used constants in relation to config values (define recip-fps (/ 1 fps)) -(define sample-size (* 4 (round (* 3 (* (/ 44100 4) recip-fps))))) +(define sample-size (* 4 (round (* 3 (* (/ bitrate 4) recip-fps))))) ;; Plan definition (if using fft) (define plan #f)