New audio upload: Music Player Library for BASIC Programs

All aspects of programming on the Commander X16.
User avatar
DusanStrakl
Posts: 130
Joined: Sun Apr 26, 2020 9:15 pm
Location: Bay Area, California
Contact:

New audio upload: Music Player Library for BASIC Programs

Post by DusanStrakl »




Music Player Library for BASIC Programs




View File






I wrote a library to enable BASIC programs play music in the background.

It is compatible with Simplest Effects Sound library I released a while ago.

To demo the library I included two BASIC programs:

PLAY.BAS - Playing Twinkle Twinkle Little Star - it demonstrates the BASIC program doing other stuff including calling simple Effects 

HOUSE.BAS - Playing House of the Rising Sun - it demonstrates a bit more complex music

 

Full Tutorial and source code is available from my blog:

https://www.8bitcoding.com/p/music-player-library-for-basic-programs.html






 
User avatar
kliepatsch
Posts: 247
Joined: Thu Oct 08, 2020 9:54 pm

New audio upload: Music Player Library for BASIC Programs

Post by kliepatsch »


Pretty cool! Very easy to use, once one read the documentation on your page.

And the example songs are a good starting point to experiment and make our own ?

I hope someone will use this for their games written in BASIC

User avatar
kliepatsch
Posts: 247
Joined: Thu Oct 08, 2020 9:54 pm

New audio upload: Music Player Library for BASIC Programs

Post by kliepatsch »


I have noticed that there seems to be a bug that the end of the song data is not used during playback.

See as an example the attached song, where I have the same four notes played twice in a row. However, only the first time, all four notes are played, whereas the second time only the first three notes are played.

Or am I doing something wrong? (Simply Ctrl+C, Ctrl+V the source into the emulator).


MYSONG.TXT
User avatar
DusanStrakl
Posts: 130
Joined: Sun Apr 26, 2020 9:15 pm
Location: Bay Area, California
Contact:

New audio upload: Music Player Library for BASIC Programs

Post by DusanStrakl »



12 hours ago, kliepatsch said:




I have noticed that there seems to be a bug that the end of the song data is not used during playback.



See as an example the attached song, where I have the same four notes played twice in a row. However, only the first time, all four notes are played, whereas the second time only the first three notes are played.



Or am I doing something wrong? (Simply Ctrl+C, Ctrl+V the source into the emulator).



MYSONG.TXT 746 B · 4 downloads



Thank you for compliments.

You made just a minor error. You are not loading all the data to memory. 64 bytes of music plus 9 bytes of header data so you have to change the FOR loop to read total of 73 bytes.

User avatar
kliepatsch
Posts: 247
Joined: Thu Oct 08, 2020 9:54 pm

New audio upload: Music Player Library for BASIC Programs

Post by kliepatsch »



14 hours ago, DusanStrakl said:




You made just a minor error. You are not loading all the data to memory. 64 bytes of music plus 9 bytes of header data so you have to change the FOR loop to read total of 73 bytes.



Ah silly me ?

Here's a short song made for the Music Player Library. Again simply  Ctrl+C  Ctrl+V  it into the emulator. Feel free to modify and use it everyone if you see fit.


DANDELION.TXT
User avatar
DusanStrakl
Posts: 130
Joined: Sun Apr 26, 2020 9:15 pm
Location: Bay Area, California
Contact:

New audio upload: Music Player Library for BASIC Programs

Post by DusanStrakl »



12 hours ago, kliepatsch said:




Ah silly me ?



Here's a short song made for the Music Player Library. Again simply  Ctrl+C  Ctrl+V  it into the emulator. Feel free to modify and use it everyone if you see fit.



DANDELION.TXT 2.76 kB · 4 downloads



Wow, this is great tune. Can I include it on my blog (of course with full credits)? Perhaps there will be more that I could add and build a little library of songs for the player.

User avatar
kliepatsch
Posts: 247
Joined: Thu Oct 08, 2020 9:54 pm

New audio upload: Music Player Library for BASIC Programs

Post by kliepatsch »


Yes, no problem!

User avatar
kliepatsch
Posts: 247
Joined: Thu Oct 08, 2020 9:54 pm

New audio upload: Music Player Library for BASIC Programs

Post by kliepatsch »


Hi Dusan,

I've come around to trying out the possibility to create custom instruments. I am having a couple of issues.


  • The Volume setting seems to be at the position of what's called "sustain", and the "Volume" setting doesn't seem to change anything


  • For the ADSR, are the parameters doing what they should?


  • What is the additional sustain parameter supposed to do? How long continuous notes are held?


I'm utterly perplexed by the result the attached test file is giving me.

Also, in your blog you say there's 5 predefined instruments, but actually there are 6, so I guess it's only 2 free slots (but it doesn't matter since we can poke into existing ones).

Thanks in advance

Edit: To clarify what I was trying to do with that file. Basically I wanted a short, percussive envelope (an Attack-Decay envelope so-to-say). Because that wasn't turning out how I expected, I began messing around, setting the volume to 0 and making the sound "continuous" which both didn't happen.

TEST_2.TXT

User avatar
DusanStrakl
Posts: 130
Joined: Sun Apr 26, 2020 9:15 pm
Location: Bay Area, California
Contact:

New audio upload: Music Player Library for BASIC Programs

Post by DusanStrakl »


Hmm this is indeed unusual result but also parameters are a bit unusual and it would require some time to debug to understand what exactly is happening.

To achieve a short percussive envelope I would use setting like this:

Triangle wave

AD = $10                          - very short attack, no decay

SR = $08                          - no sustain, medium long 200ms release

Not continuous

Max Volume = 63

Sustain Volume = 63

LR = 3                              - my documentation should state that 11 is binary for left and right channel so decimal 3, will update my post

 

or in code:

10 LOAD"PLAY.PRG",8,1,$9000

20 FOR N=0 TO 64+8

30 READ A

40 POKE $6000+N,A

50 NEXT N

100 REM SETUP CUSTOM INTRUMENTS

110 SYS $9006

120 M=PEEK(4)+PEEK(5)*256+6*8

130 POKE   M,128

140 POKE M+1,$10

150 POKE M+2,$08

160 POKE M+3,0

165 POKE M+4,63

170 POKE M+5,63

190 POKE M+6,3

800 REM PLAY SONG

810 POKE 2,$00

820 POKE 3,$60

830 SYS $9000

840 END

999 REM

1000 REM ===== HEADER DATA =====

1001 REM

1010 DATA 4        :REM NUMBER OF VOICES

1020 DATA 9        :REM TEMPO

1030 DATA 64,0     :REM LENGTH (16 BITS)

1040 DATA 1        :REM AUTOREPEAT ON

1049 REM

1050 REM ===== INSTRUMENTS =====

1051 REM

1060 DATA 6,0,0,0 : REM CUSTOM INSTRUMENT

1099 REM

1100 REM ===== MUSIC DATA =====

1101 REM

1110 DATA 40, 0, 0, 0,    0, 0, 0, 0,    0, 0, 0, 0,    0, 0, 0, 0

1120 DATA  0, 0, 0, 0,    0, 0, 0, 0,    0, 0, 0, 0,    0, 0, 0, 0

1130 DATA 40, 0, 0, 0,    0, 0, 0, 0,    0, 0, 0, 0,    0, 0, 0, 0

1140 DATA  0, 0, 0, 0,    0, 0, 0, 0,    0, 0, 0, 0,    0, 0, 0, 0

 

Please let me know if this creates the effect you were going for? I will try to find some time over the Weekend to investigate strange result your settings created.

 

User avatar
kliepatsch
Posts: 247
Joined: Thu Oct 08, 2020 9:54 pm

New audio upload: Music Player Library for BASIC Programs

Post by kliepatsch »


Thanks. Yes, that is giving me what I want.

I need to apologize because yesterday, I haven't properly looked at your documentation. Now I understand that the two ADSR bytes give four durations, and the sustain level parameter is the extra one. That is useful to know, and I will try again with that knowledge. But the "looping" I was observing yesterday seems to be a bug.

Post Reply