From: Michael Brand <michael.ch.brand@gmail.com>
To: Paul Sexton <psexton@xnet.co.nz>
Cc: emacs-orgmode@gnu.org
Subject: Re: Audio/video file playback in org mode
Date: Fri, 10 Jun 2011 10:28:01 +0200 [thread overview]
Message-ID: <BANLkTikSJQAYxQfSsQeRvb3QXADWerQVaA@mail.gmail.com> (raw)
In-Reply-To: <loom.20110609T232702-277@post.gmane.org>
Hi Paul
Thank you very much for sharing this, I will benefit a lot and the
interactivity from within Emacs seems extremely useful. My recent
searches for how to play an Org link to an audio file didn't find any
result and I was about to work out something with mpg123. I planned to
define a new link type for this but your solution with "file:" looks
to me more like it should be and is also backwards compatible with
links already made with "file:".
And even better if "file:" could also cover my requirement to have an
optional link search part that lets the player start and stop at a
specified time. Let me define the format like this:
- start to play in file at 00:03:21, stop at 00:06:54:
[[file:some_podcast.mp3::00:03:21-00:06:54]]
- start to play in file at 00:03:21, play until end of file:
[[file:some_podcast.mp3::00:03:21]]
- play the whole file:
[[file:some_podcast.mp3]]
I would like to explicitly not allow [[file:some_podcast.mp3::03:21]]
as a shorter option with MM:SS because I would like to see XX:XX being
reserved for HH:MM without exception in Org. There was a recent
discussion covering this in the context of time calculation:
http://thread.gmane.org/gmane.emacs.orgmode/39487/focus=39840
Michael
On Thu, Jun 9, 2011 at 23:55, Paul Sexton <psexton@xnet.co.nz> wrote:
> I have spent a few hours figuring this out so I thought I would post it for
> the benefit of others.
>
> I am learning a language, and wanted to include hyperlinks to audio files
> within my org document, and be able to play each file by clicking on the
> link.
>
> I eventually discovered the variable 'org-file-apps' which allows you to
> associate particular applications with particular file types.
>
> I am using Bongo (https://github.com/dbrock/bongo) as the media player.
> EMMS is another actively developed media player, but setup looked too
> complicated at first glance.
>
> I am using MPlayer as the actual media player. This supports almost all
> audio and video file formats. Most importantly, it works on Windows as well
> as on Linux (VLC has a Windows port but it doesn't work with Bongo as the
> 'fake-tty' interface is not implemented on Windows.)
>
> My current setup means that clicking on a link such as [[file:song.mp3]]
> adds it to the active Bongo playlist (in another buffer) and immediately
> starts playing it. Playback can be paused, fast-forwarded etc using
> Bongo.
>
> When Bongo plays a file it puts some icons in the modeline that
> resemble the 'play', 'stop' etc symbols, and can be used to control
> playback using the mouse. I found these worked erratically outside
> the actual Bongo playlist buffer, so I have instead bound some
> org-mode keys (ctrl + numpad keys) to the relevant functions.
> This is optional of course.
>
> I have only tested this with mp3 files, but it ought to work with
> video as well.
>
>
> My setup follows:
> -------------------
>
> ;;; Part 1. Bongo setup
>
> (add-to-list 'load-path "/path/to/bongo"))
> (autoload 'bongo "bongo"
> "Start Bongo by switching to a Bongo buffer." t)
>
> (setq bongo-mplayer-program-name
> (case system-type
> ((windows-nt cygwin) "c:\\Program Files\\MPlayer for Windows\\MPlayer.exe")
> (t "mplayer")))
>
> (setq bongo-enabled-backends '(mplayer))
>
> ;;; Part 2. Org setup
>
> (defvar av-file-regex
> (concat "\\." (regexp-opt
> (append bongo-audio-file-name-extensions
> bongo-video-file-name-extensions)) "$"))
>
> (add-to-list 'org-file-apps
> (cons av-file-regex '(org-play-media-file file)))
>
> (defun org-play-media-file (filename)
> (with-bongo-buffer
> (bongo-insert-file filename)
> (backward-char)
> (bongo-play)))
>
> ;;; Part 3. Keybindings to allow control of playback within Org buffer
> ;;; (optional)
>
> ;; Numpad Ctrl-0: pause/resume
> (define-key org-mode-map (kbd "<C-kp-0>") 'bongo-pause/resume)
> (define-key org-mode-map (kbd "<C-kp-insert>") 'bongo-pause/resume)
> ;; Numpad Ctrl-.: stop current track, or restart from beginning if stopped
> (define-key org-mode-map (kbd "<C-kp-decimal>") 'bongo-start/stop)
> (define-key org-mode-map (kbd "<C-kp-delete>") 'bongo-start/stop)
> ;; Numpad Ctrl-PgUp, Ctrl-PgDn: raise/lower volume
> (define-key org-mode-map (kbd "<C-kp-prior>") 'bongo-volume-raise)
> (define-key org-mode-map (kbd "<C-kp-next>") 'bongo-volume-lower)
> (define-key org-mode-map (kbd "<C-kp-9>") 'bongo-volume-raise)
> (define-key org-mode-map (kbd "<C-kp-3>") 'bongo-volume-lower)
> ;; Numpad Ctrl-left, Ctrl-right: skip back/forward 10 seconds
> (define-key org-mode-map (kbd "<C-kp-left>") 'bongo-seek-backward-10)
> (define-key org-mode-map (kbd "<C-kp-right>") 'bongo-seek-forward-10)
> (define-key org-mode-map (kbd "<C-kp-4>") 'bongo-seek-backward-10)
> (define-key org-mode-map (kbd "<C-kp-6>") 'bongo-seek-forward-10)
next prev parent reply other threads:[~2011-06-10 8:28 UTC|newest]
Thread overview: 11+ messages / expand[flat|nested] mbox.gz Atom feed top
2011-06-09 21:55 Audio/video file playback in org mode Paul Sexton
2011-06-09 22:22 ` Eric Schulte
2011-06-10 8:28 ` Michael Brand [this message]
2011-06-10 16:10 ` brian powell
2011-06-11 4:57 ` Paul Sexton
2011-06-11 14:00 ` Memnon Anon
2011-06-11 23:55 ` Alan E. Davis
2011-06-12 8:23 ` Christian Moe
2011-06-12 9:34 ` Michael Brand
2011-06-11 4:53 ` Paul Sexton
[not found] ` <4DF2F3B6.2030400@xnet.co.nz>
2011-06-11 6:23 ` Michael Brand
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.orgmode.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=BANLkTikSJQAYxQfSsQeRvb3QXADWerQVaA@mail.gmail.com \
--to=michael.ch.brand@gmail.com \
--cc=emacs-orgmode@gnu.org \
--cc=psexton@xnet.co.nz \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).