diff --git a/gui/demos/audio.py b/gui/demos/audio.py
new file mode 100644
index 0000000..0534aa6
--- /dev/null
+++ b/gui/demos/audio.py
@@ -0,0 +1,214 @@
+# audio.py 
+
+# Released under the MIT License (MIT). See LICENSE.
+# Copyright (c) 2021 Peter Hinch
+
+import hardware_setup  # Create a display instance
+from gui.core.ugui import Screen, ssd
+from machine import I2S
+from machine import Pin
+import pyb
+
+# Do allocations early
+BUFSIZE = 1024*25  # 5.8ms/KiB
+
+pyb.Pin("EN_3V3").on()  # provide 3.3V on 3V3 output pin
+
+# ======= I2S CONFIGURATION =======
+
+I2S_ID = 1
+# allocate sample array once
+wav_samples = bytearray(BUFSIZE)
+
+# The proper way is to parse the WAV file as per
+# https://github.com/miketeachman/micropython-i2s-examples/blob/master/examples/wavplayer.py
+# Here for simplicity we assume stereo files ripped from CD's.
+config = {
+    'sck' : Pin('W29'),
+    'ws' : Pin('W16'),
+    'sd' : Pin('Y4'),
+    'mode' : I2S.TX,
+    'bits' : 16,  # Sample size in bits/channel
+    'format' : I2S.STEREO,
+    'rate' : 44100,  # Sample rate in Hz
+    'ibuf' : BUFSIZE,  # Buffer size
+    }
+
+audio_out = I2S(I2S_ID, **config)
+
+# ======= GUI =======
+
+from gui.widgets.label import Label
+from gui.widgets.buttons import Button, CloseButton, CIRCLE
+from gui.widgets.sliders import HorizSlider
+from gui.widgets.listbox import Listbox
+from gui.core.writer import CWriter
+
+# Font for CWriter
+import gui.fonts.arial10 as arial10
+import gui.fonts.icons as icons
+from gui.core.colors import *
+
+import os
+import gc
+import uasyncio as asyncio
+
+class SelectScreen(Screen):
+    songs = []
+    album = ""
+    def __init__(self, wri):
+        super().__init__()
+        self.root = "/sd/music"
+        subdirs = [x[0] for x in os.ilistdir(self.root) if x[1] == 0x4000]
+        subdirs.sort()
+        Listbox(wri, 2, 2, elements = subdirs, dlines = 8, callback = self.lbcb)
+
+    def lbcb(self, lb):  # sort
+        directory = ''.join((self.root, '/', lb.textvalue()))
+        songs = [x[0] for x in os.ilistdir(directory) if x[1] != 0x4000]
+        songs.sort()
+        SelectScreen.songs = [''.join((directory, '/', x)) for x in songs]
+        SelectScreen.album = lb.textvalue()
+        Screen.back()
+        
+
+class BaseScreen(Screen):
+
+    def __init__(self):
+        self.swriter = asyncio.StreamWriter(audio_out)
+
+        args = {
+                'bdcolor' : RED,
+                'slotcolor' : BLUE,
+                'legends' : ('-48dB', '-24dB', '0dB'), 
+                'value' : 0.5,
+                'height' : 15,
+                }
+        buttons = {
+            'shape' : CIRCLE,
+            'fgcolor' : GREEN,
+            }
+        super().__init__()
+        # Audio status
+        self.playing = False  # Track is playing
+        self.stop_play = False  # Command
+        self.paused = False
+        self.songs = []  # Paths to songs in album
+        self.song_idx = 0  # Current index into .songs
+        self.offset = 0  # Offset into file
+        self.volume = -3
+
+        wri = CWriter(ssd, arial10, GREEN, BLACK, False)
+        wri_icons = CWriter(ssd, icons, WHITE, BLACK, False)
+        Button(wri_icons, 2, 2, text='E', callback=self.new, args=(wri,), **buttons)  # New
+        Button(wri_icons, row := 30, col := 2, text='D', callback=self.replay, **buttons)  # Replay
+        Button(wri_icons, row, col := col + 25, text='F', callback=self.play_cb, **buttons)  # Play
+        Button(wri_icons, row, col := col + 25, text='B', callback=self.pause, **buttons)  # Pause
+        Button(wri_icons, row, col := col + 25, text='A', callback=self.stop, **buttons)  # Stop
+        Button(wri_icons, row, col + 25, text='C', callback=self.skip, **buttons)  # Skip
+        row = 60
+        col = 2
+        self.lbl = Label(wri, row, col, 100)
+        row = 110
+        col = 14
+        HorizSlider(wri, row, col, callback=self.slider_cb, **args)
+        CloseButton(wri, callback=self.shutdown)  # Quit the application
+        self.reg_task(asyncio.create_task(self.report()))
+
+    async def report(self):
+        while True:
+            gc.collect()
+            print(gc.mem_free())
+            await asyncio.sleep(20)
+
+    def slider_cb(self, s):
+        self.volume = round(8 * (s.value() - 1))
+
+    def play_cb(self, _):
+        self.play_album()
+
+    def pause(self, _):
+        self.stop_play = True
+        self.paused = True
+
+    def stop(self, _):  # Abandon album
+        self.stop_play = True
+        self.paused = False
+        self.song_idx = 0
+
+    def replay(self, _):
+        self.stop_play = True
+        self.paused = False
+        #self.play_album()  # Play from same song_idx
+
+    def skip(self, _):
+        self.stop_play = True
+        self.paused = False
+        self.song_idx = min(self.song_idx + 1, len(self.songs) -1)
+        #self.play_album()
+
+    def new(self, _, wri):
+        Screen.change(SelectScreen, args=[wri,])
+
+    def play_album(self):
+        self.reg_task(asyncio.create_task(self.album_task()))
+
+    def shutdown(self, _):
+        audio_out.deinit()
+        print("==========  CLOSE AUDIO ==========")
+
+    def after_open(self):
+        self.songs = SelectScreen.songs
+        self.lbl.value(SelectScreen.album)
+        if self.songs:
+            self.song_idx = 0  # Start on track 0
+            #self.play_album()
+
+    async def album_task(self):
+        # Must ensure that only one instance of album_task is running
+        self.stop_play = True  # Stop the running instance
+        while self.playing:  # Wait for it to happen
+            await asyncio.sleep_ms(200)
+        self.playing = True  # Prevent other instances
+        self.stop_play = False
+        # Leave paused status unchanged
+        songs = self.songs[self.song_idx :]  # Start from current index
+        for song in songs:
+            await self.play_song(song)
+            if self.stop_play:
+                break  # A callback has stopped playback
+            self.song_idx += 1
+        self.playing = False
+            
+
+    # Open and play a binary wav file
+    async def play_song(self, song):
+        wav_samples_mv = memoryview(wav_samples)
+        size = len(wav_samples)
+        if not self.paused:
+            # advance to first byte of Data section in WAV file. This is not
+            # correct for all WAV files. See link above.
+            self.offset = 44
+        swriter = self.swriter
+        with open(song, "rb") as wav:
+            _ = wav.seek(self.offset)
+            while (num_read := wav.readinto(wav_samples_mv)) and not self.stop_play:
+                I2S.shift(buf=wav_samples_mv[:num_read], bits=16, shift=self.volume)
+                if swriter.out_buf != b"":
+                    print('Que?')  # This never happens
+                    await asyncio.sleep_ms(0)
+                #swriter.write(wav_samples_mv[:num_read])  # Occasional errors allocating entire buffer
+                swriter.out_buf = wav_samples_mv[:num_read]
+                await swriter.drain()
+                await asyncio.sleep_ms(0)
+                self.offset += size
+        for x in range(256):  # Neccessary for silence
+            wav_samples[x] = 0
+        swriter.write(wav_samples_mv[:256])
+        await swriter.drain()
+
+def test():
+    print('Audio demo.')
+    Screen.change(BaseScreen)  # A class is passed here, not an instance.
+
+test()
diff --git a/gui/fonts/icons.py b/gui/fonts/icons.py
new file mode 100644
index 0000000..3daf986
--- /dev/null
+++ b/gui/fonts/icons.py
@@ -0,0 +1,59 @@
+# Code generated by font_to_py.py.
+# Font: icofont.ttf Char set: ABCDEF
+# Cmd: /mnt/qnap2/data/Projects/MicroPython/micropython-font-to-py/font_to_py.py icofont.ttf 12 -x -c ABCDEF icons1.py
+version = '0.33'
+
+def height():
+    return 12
+
+def baseline():
+    return 12
+
+def max_width():
+    return 15
+
+def hmap():
+    return True
+
+def reverse():
+    return False
+
+def monospaced():
+    return False
+
+def min_ch():
+    return 65
+
+def max_ch():
+    return 70
+
+_font =\
+b'\x0f\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00'\
+b'\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x0f\x00\x00\x00\x3f\xe0'\
+b'\x3f\xe0\x3f\xe0\x3f\xe0\x3f\xe0\x3f\xe0\x3f\xe0\x3f\xe0\x3f\xe0'\
+b'\x00\x00\x00\x00\x0f\x00\x00\x00\x00\x00\x61\x80\x61\x80\x61\x80'\
+b'\x61\x80\x61\x80\x61\x80\x61\x80\x61\x80\x61\x80\x00\x00\x0f\x00'\
+b'\x00\x00\x70\x00\x7f\x00\x0f\xf0\x00\xfc\x00\x7c\x01\xf0\x0f\x80'\
+b'\x7e\x00\x70\x00\x40\x00\x00\x00\x0f\x00\x00\x06\x00\x3e\x01\xf8'\
+b'\x0f\xc0\x3e\x00\x78\x00\x7e\x00\x1f\xc0\x01\xfc\x00\x1e\x00\x00'\
+b'\x00\x00\x0f\x00\x00\x7c\x3f\xfc\x3f\xfc\x3c\x0c\x30\x0c\x30\x0c'\
+b'\x30\x0c\x30\x1c\x38\x1c\x38\x1c\x38\x00\x00\x00\x0f\x00\x00\x00'\
+b'\x70\x00\x7c\x00\x7f\x80\x7f\xe0\x7f\xfc\x7f\xf0\x7f\xc0\x7f\x00'\
+b'\x78\x00\x60\x00\x00\x00'
+
+_index =\
+b'\x00\x00\x1a\x00\x34\x00\x4e\x00\x68\x00\x82\x00\x9c\x00\xb6\x00'\
+
+_mvfont = memoryview(_font)
+_mvi = memoryview(_index)
+ifb = lambda l : l[0] | (l[1] << 8)
+
+def get_ch(ch):
+    oc = ord(ch)
+    ioff = 2 * (oc - 65 + 1) if oc >= 65 and oc <= 70 else 0
+    doff = ifb(_mvi[ioff : ])
+    width = ifb(_mvfont[doff : ])
+
+    next_offs = doff + 2 + ((width - 1)//8 + 1) * 12
+    return _mvfont[doff + 2:next_offs], 12, width
+