Refactoring code for better readability

diff --git a/Graphics/Presentations/joulud.bas b/Graphics/Presentations/joulud.bas
index 7dec158..2d842c6 100755 (executable)
--- a/Graphics/Presentations/joulud.bas
+++ b/Graphics/Presentations/joulud.bas
@@ -128,14 +128,6 @@ SUB mo (x, y, an, s, w)
     depth = depth - 1\r
 END SUB\r
 \r
-SUB playsound (a$)\r
-    SHELL "c:\progra~1\winamp\winamp.exe " + a$\r
-    ' Temporarily switch to text mode\r
-    SCREEN 0\r
-    ' Switch back to graphics mode\r
-    SCREEN 7, , , 1\r
-END SUB\r
-\r
 SUB prn (x, y, msg$, siz, col1)\r
     IF x < 0 THEN GOTO prn1\r
     IF x > 319 THEN GOTO prn1\r
@@ -320,11 +312,6 @@ timer1:
 END SUB\r
 \r
 SUB turnon\r
-    ' Read user input\r
-    a$ = INPUT$(1)\r
-\r
-    ' Play sound\r
-    playsound "marine.mp3"\r
 \r
     SCREEN 7, , , 1\r
 \r