LTCD_060719.ISO

LT/DEMO/Sound.CPZ

@@ -0,0 +1,15 @@
+//Practice your ASCII knowledge ;-)
+
+void Organ()
+{
+  U1 ch;
+  coutln "Press keys to make sounds";
+  coutln "and press ESC to exit.";
+  do {
+    ch=GetKey;
+    Sound((ch-28)*25);
+  } while (ch!=CH_ESC);
+  Sound(0);
+}
+
+Organ;