Apple-2-SW/mcs-player
1
0
Fork 0
mirror of https://github.com/cybernesto/mcs-player.git synced 2025-01-15 15:34:01 +00:00
Code Issues Projects Releases Wiki Activity

Added simple Applesoft music player and disk image

Browse Source 
The disk image contain the sources in Merlin format, assembled binaries
and some songs in BSAVEd format.
This commit is contained in:
cybernesto 2017-04-29 10:19:00 +02:00
parent 74e253b113
commit 97079842da
2 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
dsk/mcs-player.dsk Executable file
View File

Binary file not shown.

10
src/PLAYER.bas Normal file
View File

@ -0,0 +1,10 @@
10 HOME
20 PRINT CHR$(4)"BLOAD MCS"
30 PRINT CHR$(4)"BLOAD JAM,A$8900
34 REM SLOT 4
35 POKE 206,0: POKE 207,196
40 POKE 34066,4: CALL 34051
51 PRINT : PRINT "Press any key to STOP->";: GET A$
53 CALL 34060
55 PRINT : PRINT
57 HOME