Music

Radio Garden

这是一个从 Radio Garden 电台搜集过来的列表，然后通过我在写的一个 elisp/radio-garden.el 包在 emacs 里进行 收听，同时我还惊喜的发现 emacs 调用 mpv 还可以解析 icy 标签知道电台正在播放歌曲的元信息（作家、歌名），这样就 可以方便再写一个函数自动插入到当前的文件中进行收集：

论 Emacs 的易折腾性

(defun my/insert-radio-current-play ()
  (interactive)
  (with-current-buffer (find-file-noselect (org-roam-node-file (org-roam-node-from-title-or-alias "Music")))
    (goto-char (point-max))
    ;; - [ ] 用任务语法来记录我是否加入到网易云歌单里，或者我也可以通过 api 自动加入……？
    (insert (concat "- [ ] ")
        (cdr (assoc 'info-title (emms-playlist-current-selected-track))))
    (save-buffer)))

80s80s

现在听的大部分都是 80s80s - Real 80s Radio | 80s80s 电台的老歌：

• Sydney Youngblood - Sit and Wait
• Talking Heads - Once In a Lifetime
• Michael Jackson - Smooth Criminal
• The Cure - Boys Don’t Cry
• Men At Work - Who Can It Be Now?
• ABC - When Smokey Sings
• Wham! - Freedom
• Ultravox - Vienna
• Kool & The Gang - Celebration
• Madonna - Open Your Heart
• Falco - Rock Me Amadeus
• Katrina and the Waves - Walking On Sunshine
• Wham! - The Edge of Heaven
• a-ha - The Sun Always Shines On TV
• Pretenders - Don’t Get Me Wrong
• A Flock of Seagulls - Space Age Love Song
• Heaven 17 - Let Me Go
• Michael Jackson - Thriller
• Tears for Fears - Everybody Wants to Rule the World
• Depeche Mode - Everything Counts
• Prefab Sprout - When Love Breaks Down