;; xmms.tf <v0.1> - XMMS shell extensions
;; Copyright (c)2000 Sander Klein Lebbink <Mephistopheles@utopiamoo.net>

;; Note: You'll need xmms-shell for this package!

;; Set your xmms-command-output-prefix here.
;; Defaults to a yellow *.
/set xmms_command_prefix=@{Cyellow}*@{n}

;; The magic macro.
/def xmms = /quote -dexec -S /echo -p %xmms_command_prefix !xmms-shell -e %*

;; Sing with xmms. Sing-command itself defaults to: zi
;; NOTE: You'll need perl and the xmms-shell plugin for this one!
/def zing = /quote -w -S %{*-zi} !\
   xmms-shell -e status |\
   perl -e 'print (<STDIN> =~ /^Playing: (.*) \\(.*\\)\$/)'

/def sing = /zing %*