From 357df0bbfac05fa0a28173fbe15b6d59adaacb9b Mon Sep 17 00:00:00 2001 From: "Skylar \"The Cobra\" Widulski" Date: Thu, 21 Dec 2023 23:43:18 -0500 Subject: [PATCH] Add bitrate option Signed-off-by: Skylar "The Cobra" Widulski --- config.example.scm | 1 + yammer.scm | 4 +++- 2 files changed, 4 insertions(+), 1 deletion(-) mode change 100644 => 100755 yammer.scm 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)