start tok64 d64-AZNQUG
1 SYS49152
10 :1v15
20 :1@w64:1@p5:1@g80:1@a3:1@d1:1@s7:1@r1
30 :2@w64:2@p3:2@g255:3@a7:2@d2:2@s2:2@r0
40 :3@w64:2@p0:2@g155:3@a5:2@d4:2@s11:2@r11
50 POKE53280,6:PRINT"{clear}{down}{right}** music expansion demo **
90 :1l5:1a2:1a
100 :1l10:1a2:2l10:2a5:3l80:3e5:1a:2a:1l20:1a:2b:2a:1a:2e:2a:1l10:1a:2a:1a:2a
102 :1l10:1a2:2l10:2a5:3l80:3e5:1a:2a:1l20:1a:2b:2a:1a:2e:2a:1l10:1a:2a:1a:2a
105 :1a:2c:1l20:1a:2b:2a:1l40:1a:2g4:2e5:2b:2c:1l5:1a:3l5:3d:1b:3c
110 :1l10:1c:2l10:2g4:3l10:3d:1c:2g:3e:1l20:1c:2a5:2c:1c:2d:2b:1l10:1c:2e5:1c:2g
115 :1c:2c:3g:1l20:1c:2b:3e:2a:1l40:1c:2g4:3d:2e5:2a:3c:2b:2c:3l80:3d:1l5:1c:1c
120 :1l10:1d2:2f#4:1d:2f#:1l20:1d:2g:2f#:1d:2a5:2d4:1l10:1d:2f#:1d:2f#:1d:2d
125 :1l20:1d:2e:2f#:1l40:1d:2g:2a5:2b:2c:3l10:3d:2d4:3e:1l5:1d:1d
130 :1l10:1f1:2f4:3f:1f:2a5:1l20:1f:2c:3e:2f:1f:2f4:3d:2a5
135 :1l10:1f:2c:3c:1f:2f:3d:1g:2f4
140 :1l20:1g:2a5:3g:2c:1g:2f:3c:2g4:3b:1l10:1g:2b5:1g:2d:3a:2g:1l5:1g:1g:GOTO100
stop tok64
(bastext 1.0)