diff --git a/dsk/mcs-player.dsk b/dsk/mcs-player.dsk
new file mode 100755
index 0000000..36ff739
Binary files /dev/null and b/dsk/mcs-player.dsk differ
diff --git a/src/PLAYER.bas b/src/PLAYER.bas
new file mode 100644
index 0000000..96d8956
--- /dev/null
+++ b/src/PLAYER.bas
@@ -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 
\ No newline at end of file