TempleOSCDV5.00.ISO

Demo/Snd/MorseCode.HC

@@ -92,7 +92,7 @@ I64 MorseWaitKey()
     if (m_start) {
       GetMsg(NULL,NULL,1<<MSG_KEY_UP);
       m_end=tS;
-      Snd(0);
+      Snd;
       dt_down=m_end-m_start;
       m_start=0;
       space_sent=FALSE;
@@ -113,11 +113,11 @@ I64 MorseWaitKey()
       } else
 	ch=GetChar(,FALSE);
       m_start=tS;
-      Snd(1000);
+      Snd(74);
       if (ch==CH_SHIFT_ESC || ch==CH_ESC) {
 	'\n';
-	Snd(0);
-	ThrowBreak; //exit program
+	Snd;
+	throw; //exit program
       }
       dt_up=m_start-m_end;
       if (!space_sent && dt_up>=M_SPACE_THRESHOLD) {
@@ -170,7 +170,7 @@ U0 Morse()
       }
     }
   }
-  Snd(0);
+  Snd;
 }
 
 Morse;

Demo/Snd/OhGreat.HC

@@ -4,38 +4,38 @@ U0 Song()
   MusicSettingsRst;
   try //Catch <CTRL-ALT-c> exit
     while (!ScanChar) {
-      Play("4hEqDCBCDhE",
+      Play("6hEqDC5B6CDhE",
 	    "God \0is \0a \0g\0od \0of \0love.\n\0");
-      Play("3GqFEFhG4E",
+      Play("5GqFEFhG6E",
 	    " \0 \0 \0 \0 \0He \0");
-      Play("qDCBCDhE3G",
+      Play("6qDC5B6CDhE5G",
 	    "wat\0ches \0us \0from \0a\0bove.\n\0 \0");
-      Play("qFEFhG4BqC",
+      Play("5qFEFhGB6qC",
 	    " \0 \0 \0 \0Our \0world \0");
-      Play("DhCeDChB3G",
+      Play("6DhCeDC5hBG",
 	    "is\0n't \0al\0ways \0nice.\n\0 \0");
-      Play("qFEFhG4EqD",
+      Play("5qFEFhG6EqD",
 	    " \0 \0 \0 \0Be\0fore \0");
-      Play("CBCDhE3G",
+      Play("6C5B6CDhE5G",
 	    "you \0gr\0ipe \0think \0twice.\n\0 \0");
-      Play("qFEFhG4EqD",
+      Play("5qFEFhG6EqD",
 	    " \0 \0 \0 \0He \0wat\0");
-      Play("CBCDhE3G",
+      Play("6C5B6CDhE5G",
 	    "ches \0us \0from \0a\0bove.\n\0 \0");
-      Play("qFEFhG4EqD",
+      Play("5qFEFhG6EqD",
 	    " \0 \0 \0 \0He'll \0smack \0");
-      Play("CBCDhE3G",
+      Play("6C5B6CDhE5G",
 	    "you \0with \0out \0a \0glove.\n\0 \0");
-      Play("qFEFhG4BqC",
+      Play("5qFEFhGB6qC",
 	    " \0 \0 \0 \0Our \0world \0");
-      Play("DhCeDChB3G",
+      Play("6DhCeDC5hBG",
 	    "is\0n't \0al\0ways \0nice.\n\0 \0");
-      Play("qFEFhG");
+      Play("5qFEFhG");
     }
   catch
     PutExcept;
   '\n';
-  Snd(0);
+  Snd;
 }
 
 Song;