LTCD_070816.ISO

LT/Apps/MusicOrgan/Examples/architects.CPZ

@@ -0,0 +1,23 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  try {
+  while (!ScanKey) {
+	Play("3sFGFGetBFFDARqEC2G3FC");
+	Play("sFGFGetBFFDARqEC2G3FC");
+	Play("2eG3GetDB2G3qFDAReECsCRCR");
+	Play("2eG3GetDB2G3qFDAReECsCRCR");
+  }
+  } catch
+    Fs->catch_except=TRUE;
+  Sound(0);
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/blinded.CPZ

@@ -0,0 +1,36 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  TssStruct *tss;
+  Fs->end_task_cb=&EndTsk;
+  tss=PopUpViewStr(
+    "$$LK-A,\"BF:Acts,9:3\"$$\r\n"
+    );
+  WaitTskIdle(tss);
+  tss->win_right=Fs->win_right;
+  tss->win_left=Fs->win_left;
+  tss->win_top=Fs->win_bottom+3;
+  tss->win_bottom=tss->win_top+12;
+  music_tempo=2.5;
+  try {
+  while (!ScanKey) {
+    Play("3qEeACA2G3qCEC2G3E",
+	"Now... \0 \0 \0 \0 \0I \0see \0the \0light.\r\n\0 \0");
+    Play("EeACA2G3qCEC2G3E",
+	"Now... \0 \0 \0 \0 \0I \0see \0the \0light.\r\n\0 \0");
+    Play("GCGBEeDFCAqD",
+	"It's \0 \0quite \0 \0bright.\r\n\0 \0 \0 \0 \0 \0");
+    Play("GCGBEeDFCAqD",
+	    "It's \0 \0quite \0 \0bright.\r\n\0 \0 \0 \0 \0 \0");
+  }
+  } catch
+    Fs->catch_except=TRUE;
+  Sound(0);
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/depending.CPZ

@@ -0,0 +1,36 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  TssStruct *tss;
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  try {
+  tss=PopUpViewStr(
+    "$$LK-A,\"BF:Luke,12:16\"$$\r\n"
+    );
+  WaitTskIdle(tss);
+  tss->win_right=Fs->win_right;
+  tss->win_left=Fs->win_left;
+  tss->win_top=Fs->win_bottom+3;
+  tss->win_bottom=tss->win_top+12;
+  while (!ScanKey) {
+	Play("3etGREqDDBRGCB",
+		"It \0 \0de\0pends \0 \0on \0 \0the \0wea\0ther.\r\n\0");
+	Play("etGREqDDBRGCB",
+		"If \0 \0we \0reach \0 \0the \0 \0end \0ev\0er.\r\n\0");
+	Play("2sG3E2G3EqGsGBGBqDsFCFCqBRsCBCB",
+		"Hand \0 \0of \0 \0God, \0 \0just \0 \0might, \0 \0in\0 \0ter\0 \0cedes.\r\n\0 \0 \0 \0 \0 \0");
+	Play("2G3E2G3EqGsGBGBqDsFCFCqBRsCBCB",
+		"If \0 \0it's \0 \0not \0 \0deemed \0 \0right, \0 \0won't \0 \0suc\0 \0ceed.\r\n\0 \0 \0 \0 \0 \0");
+  }
+  } catch
+    Fs->catch_except=TRUE;
+  Sound(0);
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/discerning.CPZ

@@ -0,0 +1,20 @@
+//star
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  while (TRUE) {
+    Play("etCCBetGGDetBBFeGCetBABeAAqEqF");
+    Play("etCCBetGGDetBBFeGCetBABeAAqEqF");
+    Play("eCGqFqDqDqCeDGqCqB");
+    Play("eCGqFqDqDqCeDGqCqB");
+  }
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/downfall.CPZ

@@ -0,0 +1,22 @@
+//has words,star,star
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  while (TRUE) {
+    Play("et2G32G3Gq2G3qCq2G3sFAFAq2G3etGDAqA",
+      "Don't \0 \0need \0 \0help.  \0 \0Got \0 \0it \0 \0all \0figured \0 \0 \0out.\r\n\0");
+    Play("et2G32G3Gq2G3qCq2G3sFAFAq2G3etGDAqA",
+      "Don't \0 \0need \0 \0help.  \0 \0Got \0 \0it \0 \0all \0figured \0 \0 \0out.\r\n\0");
+    Play("etCCCq2G3qDeDFetCF2G3qBeGFsAGAG");
+    Play("etCCCq2G3qDeDFetCF2G3qBeGFsAGAG");
+  }
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/fairness.CPZ

@@ -0,0 +1,41 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  TssStruct *tss;
+  Fs->end_task_cb=&EndTsk;
+  tss=PopUpViewStr(
+    "$$LK-A,\"BF:Luke,7:42\"$$\r\n"
+    "\r\n"
+    "Prodigal Son\r\n"
+    "$$LK-A,\"BF:Luke,15:21\"$$\r\n"
+    );
+  WaitTskIdle(tss);
+  tss->win_right=Fs->win_right;
+  tss->win_left=Fs->win_left;
+  tss->win_top=Fs->win_bottom+3;
+  tss->win_bottom=tss->win_top+12;
+  music_tempo=2.5;
+  try {
+  PutS("$$WW+H,1$$");
+  while (!ScanKey) {
+	Play("3qGGsEAEAqAsF2G3F2G3qCeEFqD",
+		"Life, \0life, \0isn't \0 \0 \0 \0fair.  \0Isn't \0 \0 \0 \0fair.\r\n\0 \0 \0 \0");
+	Play("GGsEAEAqAsF2G3F2G3qCeEFqD",
+		"Life, \0life, \0isn't \0 \0 \0 \0fair.  \0Isn't \0 \0 \0 \0fair.\r\n\0 \0 \0 \0");
+	Play("eFCqEBDBE2eG3EsFEFE",
+		" \0 \0I \0 \0ne\0ver \0sin.\r\n\0 \0 \0 \0 \0 \0 \0");
+	Play("eFCqEBDBE2eG3EsFEFE",
+		" \0 \0I \0 \0ne\0ver \0win.\r\n\0 \0 \0 \0 \0 \0 \0");
+	PutS("$$FG,GREEN$$(A warning on presumption. 'Who loves more man -- forgiven big debt or little?'  See prodigal son.)$$FG$$\r\n");
+  }
+  } catch
+    Fs->catch_except=TRUE;
+  Sound(0);
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/fishermen.CPZ

@@ -0,0 +1,38 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  TssStruct *tss;
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  try {
+  tss=PopUpViewStr(
+    "$$LK-A,\"BF:Matthew,4:19\"$$\r\n"
+    "$$LK-A,\"BF:Luke,5:4\"$$\r\n"
+    );
+  WaitTskIdle(tss);
+  tss->win_right=Fs->win_right;
+  tss->win_left=Fs->win_left;
+  tss->win_top=Fs->win_bottom+3;
+  tss->win_bottom=tss->win_top+12;
+
+  while (!ScanKey) {
+	Play("3qEsGEGEeF2G3BCqCeDEqBsERER",
+		"$$FG$$Lord, \0I \0 \0am \0 \0feel\0ing \0just \0a \0bit \0un\0in\0spired.\r\n\0With \0 \0 \0 \0");
+	Play("qEsGEGEeF2G3BCqCeDEqBsERER",
+		"net \0or \0 \0with \0 \0reel\0ing \0 \0I \0keep \0get\0ting \0mired.\r\n\0 \0 \0 \0 \0");
+	Play("qDetRAFqDGetFC2G3sBCBCqDF",
+		"$$FG,PURPLE$$Throw \0 \0out \0your \0net.\r\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("DetRAFqDGetFC2G3sBCBCqDF",
+		"Make \0 \0you \0a \0bet.\r\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+  }
+  } catch
+    Fs->catch_except=TRUE;
+  Sound(0);
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/forgive.CPZ

@@ -0,0 +1,20 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  try {
+  while (!ScanKey) {
+	Play("eGFqCqAqCqAetFDBetDBGeAFeGFqCqAqCqAetFDBetDBGeAFsDEDEetAGEsARARqDsARARqAetRFEqBsDEDEetAGEsARARqDsARARqAetRFEqB");
+  }
+  } catch
+    Fs->catch_except=TRUE;
+  Sound(0);
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/forstress.CPZ

@@ -0,0 +1,20 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  try {
+  while (!ScanKey) {
+	Play("eEEeGGeRReRCetABCeEDsABABe2G3GeEEeGGeRReRCetABCeEDsABABe2G3GqRqFetFFDeCRqEeFCqFet2G3RFqRqFetFFDeCRqEeFCqFet2G3RF");
+  }
+  } catch
+    Fs->catch_except=TRUE;
+  Sound(0);
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/good.CPZ

@@ -0,0 +1,27 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  try {
+  while (!ScanKey) {
+	Play("3qFeRRqAeRAqGDetBACeCB",
+		"God \0 \0 \0is \0 \0a \0good \0God.  \0(Thank \0 \0 \0God!!)\r\n\0 \0");
+	Play("qFeRRqAeRAqGDetBACeCB",
+		"God \0 \0 \0is \0 \0a \0good \0God.  \0(Thank \0 \0 \0God!!)\r\n\0 \0");
+	Play("qGsCECEeC2GqR3FeEDqEF",
+		" \0 \0 \0 \0 \0 \0 \0 \0He \0is \0a \0good \0God.\r\n\0");
+	Play("GsCECEeC2GqR3FeEDqEF",
+		" \0 \0 \0 \0 \0 \0 \0 \0He \0is \0a \0good \0God.\r\n\0");
+  }
+  } catch
+    Fs->catch_except=TRUE;
+  Sound(0);
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/heldest.CPZ

@@ -0,0 +1,27 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  try {
+  while (!ScanKey) {
+	Play("3eGCBEqDAEetFECqED",
+		"Do \0an \0act \0of \0kind\0ness.\r\n\0 \0 \0 \0 \0 \0 \0");
+	Play("eGCBEqDAEetFECqED",
+		"Do \0an \0act \0of \0kind\0ness.\r\n\0 \0 \0 \0 \0 \0 \0");
+	Play("GFEEeAAqDFF",
+		" \0 \0 \0 \0Hold \0 \0a \0hand.\r\n\0 \0");
+	Play("GFEEeAAqDFF",
+		" \0 \0 \0 \0Hold \0 \0a \0hand.\r\n\0 \0");
+  }
+  } catch
+    Fs->catch_except=TRUE;
+  Sound(0);
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/job.CPZ

@@ -0,0 +1,27 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  try {
+  while (!ScanKey) {
+	Play("3qGGGGsGGGGetFFFeEFsGGGG",
+		"I've \0been \0pat\0ient; \0Grant \0 \0 \0 \0me \0 \0 \0jus\0 \0tice.\r\n\0 \0 \0 \0");
+	Play("qGGGGsGGGGetFFFeEFsGGGG",
+		"Not \0comp\0lan\0cient; \0You \0 \0 \0 \0are \0 \0 \0whit\0 \0ness.\r\n\0 \0 \0 \0");
+	Play("BBBBeCCqDDA2G3etAAAqB",
+		"All \0 \0 \0 \0my \0 \0foes \0 \0re\0joice \0o\0ver \0 \0me.\r\n\0");
+	Play("sBBBBeCCqDDA2G3etAAAqB",
+		"See \0 \0 \0 \0their \0 \0throes; \0 \0Now, \0it's \0they \0that \0are \0stoned.\r\n\0");
+  }
+  } catch
+    Fs->catch_except=TRUE;
+  Sound(0);
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/kept.CPZ

@@ -0,0 +1,37 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  TssStruct *tss;
+  Fs->end_task_cb=&EndTsk;
+  try {
+  tss=PopUpViewStr(
+    "$$LK-A,\"BF:Matthew,19:16\"$$\r\n"
+    );
+  WaitTskIdle(tss);
+  tss->win_right=Fs->win_right;
+  tss->win_left=Fs->win_left;
+  tss->win_top=Fs->win_bottom+3;
+  tss->win_bottom=tss->win_top+12;
+  PutS("$$WW+H,1$$");
+  while (!ScanKey) {
+	Play("3eGAetCCCFFDqAeAAFAAFqG",
+		"I \0 \0have \0 \0 \0kept \0 \0 \0 \0 \0 \0the \0 \0 \0com\0mands.\r\n\0");
+	Play("eGAetCCCFFDqAeAAFAAFqG",
+		"I \0 \0have \0 \0 \0kept \0 \0 \0 \0 \0 \0the \0 \0 \0com\0mands.\r\n\0");
+	Play("EeEGqEeEEqDBetCCGqC",
+		"What \0 \0 \0else \0 \0 \0must \0I \0do?\r\n\0 \0 \0 \0");
+	Play("EeEGqEeEEqDBetCCGqC",
+		"What \0 \0 \0else \0 \0 \0must \0I \0do?\r\n\0 \0 \0 \0");
+	PutS("$$FG,GREEN$$(Christ said sell all and follow me.)\r\n$$FG$$");
+  }
+  } catch
+    Fs->catch_except=TRUE;
+  Sound(0);
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/knewest.CPZ

@@ -0,0 +1,20 @@
+//star
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  while (TRUE) {
+    Play("qCqFeDEetDCCetCCCqDqAqC");
+    Play("qCqFeDEetDCCetCCCqDqAqC");
+    Play("qFqEetFAFqAqDeGAqEeBC");
+    Play("qFqEetFAFqAqDeGAqEeBC");
+  }
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/leaving.CPZ

@@ -0,0 +1,38 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  TssStruct *tss;
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  try {
+  tss=PopUpViewStr(
+    "$$LK-A,\"BF:John,16:28\"$$\r\n"
+    );
+  WaitTskIdle(tss);
+  tss->win_right=Fs->win_right;
+  tss->win_left=Fs->win_left;
+  tss->win_top=Fs->win_bottom+3;
+  tss->win_bottom=tss->win_top+12;
+  PutS("$$WW+H,1$$");
+  while (!ScanKey) {
+    Play("3qBBDsDGDGqFeFAFAqB",
+	"Now, \0I \0go \0 \0 \0 \0 \0to \0the \0 \0Fa\0th\0er.\r\n\0");
+    Play("BBDsDGDGqFeFAFAqB",
+	"Now, \0I \0go \0 \0 \0 \0 \0to \0the \0 \0Fa\0th\0er.\r\n\0");
+    Play("EDetBEA2eG3CsECECqGDeDD",
+	"Don't \0worry. \0 \0 \0 \0 \0 \0I'll \0 \0 \0 \0be \0back.\r\n\0 \0 \0");
+    Play("qEDetBEA2eG3CsECECqGDeDD",
+	    "Don't \0worry. \0 \0 \0 \0 \0 \0I'll \0 \0 \0 \0be \0back.\r\n\0 \0 \0");
+    PutS("$$FG,GREEN$$(Christ promised to return.)\r\n$$FG$$");
+  }
+  } catch
+    Fs->catch_except=TRUE;
+  Sound(0);
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/limit.CPZ

@@ -0,0 +1,37 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  try {
+  while (!ScanKey) {
+    Play("3qBDAGFFeBAsD2G3D2G",
+	"Do \0not \0push \0your \0luck.\r\n\0 \0 \0 \0 \0 \0 \0 \0");
+    Play("3qBDAGFFeBAsD2G3D2G",
+	"Do \0not \0push \0your \0luck.\r\n\0 \0 \0 \0 \0 \0 \0 \0");
+    Play("3qGFCeCGqFetAAFqEF",
+	"God \0is \0not \0 \0a \0schmuck.\r\n\0 \0 \0 \0 \0 \0");
+    Play("GFCeCGqFetAAFqEF",
+	"God \0is \0not \0 \0a \0schmuck.\r\n\0 \0 \0 \0 \0 \0");
+
+    Play("3qBDAGFFeBAsD2G3D2G",
+	"\r\nDo \0not \0tell \0the \0Lord\r\n\0 \0 \0 \0 \0 \0 \0 \0");
+    Play("3qBDAGFFeBAsD2G3D2G",
+	"that \0you're \0feel\0ing \0bored.\r\n\0 \0 \0 \0 \0 \0 \0 \0");
+    Play("3qGFCeCGqFetAAFqEF",
+	"He \0will \0send \0 \0the \0sword.\r\n\0 \0 \0 \0 \0 \0");
+    Play("GFCeCGqFetAAFqEF",
+	"He \0will \0send \0 \0the \0sword.\r\n\r\n\0 \0 \0 \0 \0 \0");
+
+  }
+  } catch
+    Fs->catch_except=TRUE;
+  Sound(0);
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/littleton.CPZ

@@ -0,0 +1,24 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  music_stacatto_factor=0.8;
+  try {
+  while (!ScanKey) {
+	Play("3eEEqCGGeGBDGEBsG2G3G2G");
+	Play("3eEEqCGGeGBDGEBsG2G3G2G");
+	Play("3qFDetB2GGsGGGG3eEEetBEGqGeDA");
+	Play("qFDetB2GGsGGGG3eEEetBEGqGeDA");
+  }
+  } catch
+    Fs->catch_except=TRUE;
+  Sound(0);
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/meekness.CPZ

@@ -0,0 +1,28 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  try {
+  while (!ScanKey) {
+	Play("3qBeGDetCBCqGAeGCqDC",
+		" \0I \0 \0don't \0 \0 \0mind, \0 \0 \0 \0you \0de\0");
+	Play("BeGDetCBCqGAeGCqDC",
+		"cide.\r\n\0I \0 \0don't \0 \0 \0mind.\r\n\0 \0 \0 \0 \0 \0");
+	Play("etDFGqEeDGqFEetDFFqBetBDB",
+		"I \0trust \0God \0 \0 \0 \0to \0 \0look-out \0for \0me.\r\n\0 \0 \0 \0 \0");
+	Play("DFGqEeDGqFEetDFFqBetBDB",
+		"I \0trust \0God \0 \0 \0 \0to \0 \0look-out \0for \0me.\r\n\0 \0 \0 \0 \0");
+	Play("qC");
+  }
+  } catch
+    Fs->catch_except=TRUE;
+  Sound(0);
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/mildly.CPZ

@@ -0,0 +1,36 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  Fs->end_task_cb=&EndTsk;
+  TssStruct *tss;
+  tss=PopUpViewStr(
+    "$$LK-A,\"BF:Mark,4:37\"$$\r\n"
+    );
+  WaitTskIdle(tss);
+  tss->win_right=Fs->win_right;
+  tss->win_left=Fs->win_left;
+  tss->win_top=Fs->win_bottom+3;
+  tss->win_bottom=tss->win_top+12;
+  music_tempo=2.5;
+  try {
+  while (!ScanKey) {
+	Play("3qEsGEGEqDsCCCCqBsDEDEqFG",
+		"Lord, \0there's \0 \0a \0 \0storm \0u\0 \0 \0 \0pon \0the \0 \0 \0 \0sea.\r\n\0 \0");
+	Play("EsGEGEqDsCCCCqBsDEDEqFG",
+		"Lord, \0there's \0 \0a \0 \0storm \0u\0 \0 \0 \0pon \0the \0 \0 \0 \0sea.\r\n\0 \0");
+	Play("GEC2G3etB2G3FGGEDBBeBE",
+		"$$FG,PURPLE$$Re\0lax \0fel\0las.$$FG$$\r\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("qGEC2G3etB2G3FGGEDBBeBE",
+		"$$FG,GREEN$$(Sea \0be\0came \0glass.)$$FG$$\r\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+  }
+  } catch
+    Fs->catch_except=TRUE;
+  Sound(0);
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/multiple.CPZ

@@ -0,0 +1,36 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  TssStruct *tss;
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  tss=PopUpViewStr(
+    "$$LK-A,\"BF:Matthew,14:19\"$$\r\n"
+    );
+  WaitTskIdle(tss);
+  tss->win_right=Fs->win_right;
+  tss->win_left=Fs->win_left;
+  tss->win_top=Fs->win_bottom+3;
+  tss->win_bottom=tss->win_top+12;
+  try {
+  while (!ScanKey) {
+	Play("3etGCECAFqFFAFBD",
+		"We \0 \0don't \0 \0have \0e\0nough.\r\n\0 \0 \0 \0 \0 \0");
+	Play("etGCECAFqFFAFBD",
+		"$$FG,PURPLE$$You \0 \0don't \0 \0halve \0e\0nough.\r\n\0 \0 \0 \0 \0 \0");
+	Play("AeGFGDqEAeCEGAetFAF",
+		" \0Try \0 \0 \0 \0to \0share.\r\n\0 \0 \0 \0 \0 \0 \0 \0");
+	Play("qAeGFGDqEAeCEGAetFAF",
+		" \0Try \0 \0 \0 \0to \0share.$$FG$$\r\n\0 \0 \0 \0 \0 \0 \0 \0");
+  }
+  } catch
+    Fs->catch_except=TRUE;
+  Sound(0);
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/proponent.CPZ

@@ -0,0 +1,22 @@
+//has words,star,star,star
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  while (TRUE) {
+    Play("qCqAqAsEDEDqBqBetGGEs2G3C2G3C");
+    Play("qCqAqAsEDEDqBqBetGGEs2G3C2G3C");
+    Play("etCD2G3etEE2G3qFqFqAsACACsAFAFetECC",
+      "In \0my \0 \0corn\0 \0 \0er? \0 \0 \0 \0 \0 \0 \0Hope \0we're \0right.\r\n\0");
+    Play("etCD2G3etEE2G3qFqFqAsACACsAFAFetECC",
+      "In \0my \0 \0corn\0 \0 \0er? \0 \0 \0 \0 \0 \0 \0Hope \0we're \0right.\r\n\0");
+  }
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/regarded.CPZ

@@ -0,0 +1,27 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  try {
+  while (!ScanKey) {
+	Play("3qB2G3DsBABABDBDqDeAD2sG3A2G3A",
+		"All \0seeing \0eye.\r\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("qB2G3DsBABABDBDqDeAD2sG3A2G3A",
+		"It's \0no \0lie.\r\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("qEGC2sG3B2G3B2G3B2G3BqDetBGAsGGGG",
+		"God \0sees \0you.\r\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("qEGC2sG3B2G3B2G3B2G3BqDetBGAsGGGG",
+		"Yes, \0it's \0true.\r\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+  }
+  } catch
+    Fs->catch_except=TRUE;
+  Sound(0);
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/riddle.CPZ

@@ -0,0 +1,29 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  try {
+  PutS("$$WW+H,1$$");
+  while (!ScanKey) {
+	Play("qR3eG2G3qDsCCCCqDeCCetDDBsR2GRG",
+		" \0Be\0ing \0rid \0of \0 \0 \0 \0sin \0is \0a \0bit\0ter \0 \0 \0pill.\r\n\0 \0 \0");
+	Play("qR3eG2G3qDsCCCCqDeCCetDDBsR2GRG",
+		" \0Be\0ing \0rid \0of \0 \0 \0 \0sin \0is \0a \0bit\0ter \0 \0 \0pill.\r\n\0 \0 \0");
+	Play("3eCDqFAAeA2G3etA2G3AeCCAR",
+		" \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("CDqFAAeA2G3etA2G3AeCCAR");
+	PutS("$$FG,GREEN$$(This isn't a riddle, oddly enough.)$$FG$$\r\n");
+
+  }
+  } catch
+    Fs->catch_except=TRUE;
+  Sound(0);
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/servant.CPZ

@@ -0,0 +1,36 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  TssStruct *tss;
+  tss=PopUpViewStr(
+    "$$LK-A,\"BF:Matthew,25:15\"$$"
+  );
+  WaitTskIdle(tss);
+  tss->win_right=Fs->win_right;
+  tss->win_left=Fs->win_left;
+  tss->win_top=Fs->win_bottom+3;
+  tss->win_bottom=tss->win_top+12;
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  try {
+  while (!ScanKey) {
+	Play("3qDetBAReGEqCCA2G3etFAC",
+		"Ma\0as\0ter!  \0 \0I \0made \0more \0for \0you.\r\n\0 \0 \0 \0 \0");
+	Play("qDetBAReGEqCCA2G3etFAC",
+		"Ma\0as\0ter!  \0 \0I \0made \0more \0for \0you!\r\n\0 \0 \0 \0 \0");
+	Play("eCB2qG3EFFG2G3etCFG",
+		" \0 \0 \0Got \0some\0thing \0else?\r\n\0 \0 \0 \0 \0");
+	Play("eCB2qG3EFFG2G3etCFG",
+		" \0 \0 \0Got \0some\0thing \0else?\r\n\0 \0 \0 \0 \0");
+  }
+  } catch
+    Fs->catch_except=TRUE;
+  Sound(0);
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/sings.CPZ

@@ -0,0 +1,21 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  while (TRUE) {
+    Play("qGsCECEsGAGAsEBEBqFeFFeDEqF",
+      "Shout! \0 \0 \0Let \0 \0your \0 \0voice \0 \0be \0 \0heard.\r\n\0");
+    Play("qGsCECEsGAGAsEBEBqFeFFeDEqF",
+      "Shout! \0 \0 \0Let \0 \0your \0 \0voice \0 \0be \0 \0heard.\r\n\0");
+    Play("e2G3CetDAAetFBEsD2G3D2G3qDqCetBEEsAFAF");
+    Play("e2G3CetDAAetFBEsD2G3D2G3qDqCetBEEsAFAF");
+  }
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/soothed.CPZ

@@ -0,0 +1,25 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  try {
+  while (!ScanKey) {
+	Play("3eDRetAAAsBCBCeEGqF2GsG3B2G3BeDF",
+		"Good!  \0 \0Now, \0 \0 \0I \0 \0don't \0 \0have \0to \0wor\0ry.\r\n\0 \0 \0 \0 \0 \0 \0");
+	Play("DRetAAAsBCBCeEGqF2GsG3B2G3BeDF",
+		"Good!  \0 \0Now, \0 \0 \0I \0 \0don't \0 \0have \0to \0wor\0ry.\r\n\0 \0 \0 \0 \0 \0 \0");
+	Play("qFRAetACEqEG2G3sBRBR");
+	Play("qFRAetACEqEG2G3sBRBR");
+  }
+  } catch
+    Fs->catch_except=TRUE;
+  Sound(0);
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/stores.CPZ

@@ -0,0 +1,23 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  while (TRUE) {
+    Play("qAqBqFqFqDeEGeFDeDE",
+      "Show \0some \0love.\r\n\0");
+    Play("qAqBqFqFqDeEGeFDeDE",
+      "Show \0some \0love.\r\n\0");
+    Play("eABeFAqFeFDetDBBqGeCGqA",
+      "As \0 \0you \0 \0mea\0 \0sure \0 \0 \0out...\r\n\0");
+    Play("eABeFAqFeFDetDBBqGeCGqA",
+      "As \0 \0you \0 \0mea\0 \0sure \0 \0 \0out...\r\n\0");
+  }
+}
+
+Song;

LT/Apps/MusicOrgan/Examples/struggles.CPZ

@@ -0,0 +1,27 @@
+void EndTsk()
+{
+  Sound(0);
+  Exit;
+}
+
+void Song()
+{
+  Fs->end_task_cb=&EndTsk;
+  music_tempo=2.5;
+  try {
+  while (!ScanKey) {
+	Play("3sFGFGetDCFqD2G3DGDetDFB",
+		"God, \0 \0 \0 \0please \0 \0 \0help \0me.\r\n\0 \0 \0 \0 \0 \0 \0");
+	Play("sFGFGetDCFqD2G3DGDetDFB",
+		"God, \0 \0 \0 \0please \0 \0 \0help \0me.\r\n\0 \0 \0 \0 \0 \0 \0");
+	Play("qACADetF2G3B2sG3F2G3FetCDFsDFDF",
+		"Thy \0will \0be \0done.\r\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("qACADetF2G3B2sG3F2G3FetCDFsDFDF",
+		"Thy \0will \0be \0done.\r\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+  }
+  } catch
+    Fs->catch_except=TRUE;
+  Sound(0);
+}
+
+Song;