TempleOSTS_130707.ISO

This commit is contained in:
Terry A. Davis authored and minexew committed 2018-09-08 21:45:45 +02:00
1 parent 17b71f1a2d
commit 1343005a29
617 files changed
+14399 -25130

No files matched your search

+5 -3
View File
@@ -5,7 +5,7 @@ public I64 PopUpTourPart()
DocPutS(doc,"$$FG,PURPLE$$TempleOS Tours$$FG$$\n\n"
"$$CM+LX,4,4$$$$BT,\"Part 1: The basics\",1$$"
"$$CM+LX,4,4$$$$BT,\"Part 2: Editing and running programs\",2$$"
"$$CM+LX,4,4$$$$BT,\"Part 3: Adding macros to your personal menu\",3$$"
"$$CM+LX,4,4$$$$BT,\"Part 3: Adding macros to personal menu\",3$$"
"$$CM+LX,4,4$$$$BT,\"Part 4: Choose filename, choose dir\",4$$"
"$$CM+LX,4,4$$$$BT,\"Part 5: WordStat\",5$$"
"$$CM+LX,4,4$$$$BT,\"Part 6: Search (Grep)\",6$$"
@@ -15,7 +15,7 @@ public I64 PopUpTourPart()
"$$CM+LX,4,4$$$$BT,\"Part 10: Test Suite\",10$$"
"$$CM+LX,4,4$$$$BT,\"Done\",DOCM_CANCEL$$\n");
doc->flags|=DOCF_FORM;
i=ServantUser("WinMax;DocMenuDo(0x%X,0);",doc);
i=SrvUser("WinMax;DocMenuDo(0x%X,0);",doc);
DocDel(doc);
return i;
}
@@ -35,5 +35,7 @@ U0 TourMenu()
}
"DocClear;WinMax;\n";
WinMgrSync(2);
TourMenu;
"Cd(\"HOME\");\n";
Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN|SCF_CTRL);
"Cd(\"HOME\");Dir;\n";
+16 -27
View File
@@ -23,7 +23,7 @@ PopUpOk(
"Press $$FG,GREEN$$<CTRL-M>$$FG$$.\n\n"
"This will access your personal menu.\n"
"You can customize it. It's like your\n"
"START menu.\n");
"START menu and desktop.\n");
AFGetChar(CH_CTRLM);
Sleep(1000);
@@ -32,27 +32,6 @@ PopUpOk(
"by clicking on the word \"$$FG,GREEN$$MENU$$FG$$\" in the\n"
"title bar.\n");
PopUpOk(
"$$FG,LTPURPLE$$Keyboard$$FG$$\n"
"$$UL,1$$$$FG,LTBLUE$$Blue Underlined Text are Macros$$FG$$$$UL,0$$\n"
"\t$$FG,GREEN$$<SPACE BAR>$$FG$$\tExecute Macro\n"
"$$UL,1$$$$FG,LTRED$$Red Underlined Text are Links$$FG$$$$UL,0$$\n"
"\t$$FG,GREEN$$<SPACE BAR>$$FG$$\tEdit (view)\n"
"\t$$FG,GREEN$$<ENTER>$$FG$$\t\tRight-click menu\n\n"
"\t$$FG,GREEN$$<ESC>$$FG$$\t\tSave and exit\n"
"\t$$FG,GREEN$$<SHIFT-ESC>$$FG$$\tAbort\n"
"\n"
"$$FG,LTPURPLE$$Mouse$$FG$$\n"
"$$UL,1$$$$FG,LTBLUE$$Blue Underlined Text are Macros$$FG$$$$UL,0$$\n"
"\t$$FG,GREEN$$Left-Click$$FG$$\tExecute Macro\n"
"$$UL,1$$$$FG,LTRED$$Red Underlined Text are Links$$FG$$$$UL,0$$\n"
"\t$$FG,GREEN$$Left-Click$$FG$$\tEdit (view)\n"
"\t$$FG,GREEN$$Right-Click$$FG$$\tRight-click menu\n\n"
"\t$$FG,GREEN$$Double-Left$$FG$$\tSave and exit\n"
"\t$$FG,GREEN$$Double-Right$$FG$$\tAbort\n"
"\n"
);
PopUpOk(
"After clicking $$FG,GREEN$$[OKAY]$$FG$$, you will be back at\n"
"the personal menu.\n\n"
@@ -65,6 +44,14 @@ I64 i;
for (i=0;i<9;i++)
AFGetKey(SC_CURSOR_DOWN);
PopUpOk(
"Keyboard commands are:\n\n"
"$$FG,GREEN$$<SPACE BAR>$$FG$$\tLeft-action\n"
"$$FG,GREEN$$<ENTER>$$FG$$\t\tRight-action\n"
"$$FG,GREEN$$<ESC>$$FG$$\t\tSave and exit\n"
"$$FG,GREEN$$<SHIFT-ESC>$$FG$$\tAbort\n"
);
PopUpOk(
"After clicking $$FG,GREEN$$[OKAY]$$FG$$, the cursor will be\n"
"on top of a macro we wish to run.\n"
@@ -89,12 +76,13 @@ PopUpOk(
"different from the personal menu.\n"
"Both use the same commands and have the same\n"
"'widgets' available.\n\n"
"Both utilize the same underlying document format.\n"
"It is similar to $$FG,GREEN$$html$$FG$$ because it has ASCII\n"
"behind it. TempleOS documents can include graphics.\n\n"
"Both utilize the same underlying document\n"
"format. It is similar to $$FG,GREEN$$html$$FG$$ because\n"
"it has ASCII behind it. TempleOS documents\n"
"can include graphics.\n\n"
"\"$$FG,GREEN$$<CTRL-T>$$FG$$\" after clicking $$FG,GREEN$$[OKAY]$$FG$$ to toggle\n"
"to plain text mode.\n");
AFGetChar(20);
AFGetChar(CH_CTRLT);
Sleep(1000);
PopUpOk(
@@ -103,6 +91,7 @@ PopUpOk(
"stands for \"macro\".\n\n"
"Now, \"$$FG,GREEN$$<CTRL-T>$$FG$$\" to toggle back to\n"
"regular mode.\n");
AFGetChar(20);
AFGetChar(CH_CTRLT);
Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN|SCF_CTRL);
Sleep(1000);
+22 -34
View File
@@ -4,15 +4,15 @@ Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN|SCF_CTRL);
PopUpOk(
"Now, we're going to demonstrate how to work\n"
"with programs. We'll change to the $$FG,GREEN$$/TempleOS/Demo/Snd$$FG$$ \n"
"directory.\n\n"
"with programs. We'll change to the\n"
"$$FG,GREEN$$/TempleOS/Demo/Games$$FG$$ directory.\n\n"
"Note, that directories are specified with\n"
"a forward slash, not a backslash.\n"
"Drives can be specified in a $$FG,GREEN$$Cd()$$FG$$ command\n"
"and the boot drive is specified with \"$$FG,GREEN$$::$$FG$$\".\n\n"
"$$FG,GREEN$$<ENTER>$$FG$$ to complete the command.\n");
AFDelayedPutS("Cd(\"::/TempleOS/Demo/Snd\");Dir;",25);
AFDelayedPutS("Cd(\"::/TempleOS/Demo/Games\");Dir;",25);
AFPmtStr("\n");
PopUpOk(
@@ -22,53 +22,48 @@ PopUpOk(
"type it on the command line.\n\n"
"$$FG,GREEN$$<ENTER>$$FG$$ to complete the command.\n");
AFDelayedPutS("Ed(\"ASCIIOrgan.CPP.Z\");",25);
AFDelayedPutS("Ed(\"CastleFrankenstein.CPP.Z\");",25);
AFPmtStr("\n");
Msg(MSG_KEY_DOWN_UP,0,SC_CURSOR_UP|SCF_CTRL);
Sleep(1000);
Msg(MSG_KEY_DOWN_UP,0,SC_CURSOR_DOWN|SCF_CTRL);
PopUpOk(
"This program gets keys and plays frequencies.\n"
"This is a first-person-shooter.\n"
"It quits when you press $$FG,GREEN$$<SHIFT-ESC>$$FG$$.\n\n"
"There is no \"$$FG,GREEN$$main()$$FG$$\" function in TempleOS\n"
"programs. Any program statements outside\n"
"functions get executed when you $$FG,GREEN$$#include$$FG$$\n"
"them at the command line.\n\n"
"The \"$$FG,GREEN$$ASCIIOrgan;$$FG$$\" statement at the bottom\n"
"will run the program when we $$FG,GREEN$$#include$$FG$$ it.\n");
"The \"$$FG,GREEN$$CastleFrankenstein;$$FG$$\" statement at the\n"
"bottom will run the program when we\n"
"$$FG,GREEN$$#include$$FG$$ it.\n");
PopUpOk(
"The editor and most things exit when you press\n"
"$$FG,GREEN$$<ESC>$$FG$$. $$FG,GREEN$$<SHIFT-ESC>$$FG$$ will abort (cancel) most things.\n\n"
"The $$FG,GREEN$$<ESC>$$FG$$ key can be simulated with a left\n"
"double-click, while the $$FG,GREEN$$<SHIFT-ESC>$$FG$$ key can be\n"
"simulated with a right double-click. When\n"
"you browse documentation, you'll left-click\n"
"on links and right double-click to go back,\n"
"unless you want to save changes to documents\n"
"using left double-click.\n\n"
"$$FG,GREEN$$<SHIFT-ESC>$$FG$$ to abort the editor.\n"
);
AFGetChar(CH_SHIFT_ESC,CH_ESC);
PopUpOk(
"Now, we'll run the ASCIIOrgan.CPP.Z program.\n"
"$$FG,GREEN$$<ENTER>$$FG$$ at the command line to\n"
"$$FG,GREEN$$#include$$FG$$ it. Then press keys to\n"
"cause sounds and $$FG,GREEN$$<SHIFT-ESC>$$FG$$ when\n"
"you are done.\n");
"Now, we'll run the CastleFrankenstein.CPP.Z\n"
"program. Press $$FG,GREEN$$<ENTER>$$FG$$. Then, move around\n"
"with cursor keys and $$FG,GREEN$$<SHIFT-ESC>$$FG$$\n"
"when you are done.\n");
AFDelayedPutS("#include \"ASCIIOrgan\";",25);
AFDelayedPutS("#include \"CastleFrankenstein\";",25);
AFPmtStr("\n");
AFUntilChar(CH_SHIFT_ESC,CH_ESC);
PopUpOk(
"The program is still in memory and we\n"
"can start it again by typing \"$$FG,GREEN$$ASCIIOrgan;$$FG$$\".\n\n"
"can start it again by typing\n"
"\"$$FG,GREEN$$CastleFrankenstein;$$FG$$\".\n\n"
"$$FG,GREEN$$<ENTER>$$FG$$ at the command line to\n"
"run it again.\n");
AFDelayedPutS("ASCIIOrgan;",25);
AFDelayedPutS("CastleFrankenstein;",25);
AFPmtStr("\n");
AFUntilChar(CH_SHIFT_ESC,CH_ESC);
@@ -79,20 +74,14 @@ PopUpOk(
"$$FG,GREEN$$<CTRL-ALT-D>$$FG$$\tEnter debugger\n"
"$$FG,GREEN$$<CTRL-ALT-E>$$FG$$\tSpawn new user terminal window\n"
"$$FG,GREEN$$<CTRL-ALT-F>$$FG$$\tFlush screen VGA cache\n"
"$$FG,GREEN$$<CTRL-ALT-D>$$FG$$\tEnter debugger\n"
"$$FG,GREEN$$<CTRL-ALT-M>$$FG$$\tMutes sound\n"
"$$FG,GREEN$$<CTRL-ALT-T>$$FG$$\tSwitch tasks\n"
"$$FG,GREEN$$<CTRL-ALT-V>$$FG$$\tSound volume +\n"
"$$FG,GREEN$$<CTRL-ALT-v>$$FG$$\tSound volume -\n"
"$$FG,GREEN$$<CTRL-ALT-X>$$FG$$\tKill task (window)\n"
);
AFDelayedPutS("Ed(\"ASCIIOrgan.CPP.Z\");\n",50);
AFDelayedPutS("Ed(\"CastleFrankenstein.CPP.Z\");\n",50);
PopUpOk(
"$$FG,GREEN$$<F5>$$FG$$\t\t'#include' the current file link\n"
"or the file you are currently editing.\n"
"$$FG,GREEN$$<SHIFT-F5>$$FG$$\t'Adam Include' the current file.\n\n\n"
"$$FG,GREEN$$<F5>$$FG$$ in the editor to run the file being edited.\n"
);
@@ -114,9 +103,8 @@ PopUpOk(
AFUntilChar(CH_SHIFT_ESC,CH_ESC);
PopUpOk(
"Explore the $$LK,\"DemoIndex\",\"FI:::/TempleOS/Doc/DemoIndex.TXT\"$$.\n"
"You'll find it on your menu.\n"
"It's arranged by increasing difficulty.\n"
"Explore the $$LK+PU,\"DemoIndex\",\"FI:::/TempleOS/Doc/DemoIndex.TXT\"$$. You'll find it\n"
"on your menu. It's arranged by difficulty.\n"
"Hit $$FG,GREEN$$<SPACE BAR>$$FG$$ on a demo index listing\n"
"and $$FG,GREEN$$<F5>$$FG$$ to run from the editor.\n"
);
+9 -8
View File
@@ -1,10 +1,11 @@
//This puts the cursor at the bottom
Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN|SCF_CTRL);
"\nCd(\"::/TempleOS/Demo/Snd\");Dir;\n";
"\nCd(\"::/TempleOS/Demo/Games\");Dir;\n";
PopUpOk(
"Now, we're going to add the ASCIIOrgan.CPP.Z\n"
"program to your personal menu.\n\n"
"Now, we're going to add the\n"
"CastleFrankenstein.CPP.Z program\n"
"to your personal menu.\n\n"
"Press $$FG,GREEN$$<CTRL-M>$$FG$$\n"
"to get to your personal menu.\n");
AFGetChar(CH_CTRLM);
@@ -41,7 +42,7 @@ AFDelayedPutS("Click Here");
Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN);
PopUpOk("Now, we'll fill-in the macro text.\n");
AFDelayedPutS("Cd(\"::/TempleOS/Demo/Snd\");;#include \"ASCIIOrgan\";\\n");
AFDelayedPutS("Cd(\"::/TempleOS/Demo/Games\");;#include \"CastleFrankenstein\";\\n");
PopUpOk("$$FG,GREEN$$<ESC>$$FG$$ to exit the form.\n");
AFGetChar(CH_ESC);
@@ -51,7 +52,7 @@ PopUpOk(
"Press $$FG,GREEN$$<CTRL-SHIFT-ENTER>$$FG$$ to insert a line feed.\n"
"($$FG,GREEN$$<CTRL-ENTER>$$FG$$ does a page break and $$FG,GREEN$$<ENTER>$$FG$$\n"
"would execute the macro.)\n");
AFGetKey(SC_CARRIAGE_RETURN|SCF_CTRL|SCF_SHIFT);
AFGetKey(SC_ENTER|SCF_CTRL|SCF_SHIFT);
Sleep(1000);
Msg(MSG_KEY_DOWN,0,SC_CURSOR_UP|SCF_CTRL);
@@ -71,7 +72,7 @@ for (i=0;i<6;i++)
Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN);
AFDelayedPutS(" Click here for Pop-up version");
Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN);
AFDelayedPutS("Cd(\"::/TempleOS/Demo/Snd\");;#include \"ASCIIOrgan\";\\n");
AFDelayedPutS("Cd(\"::/TempleOS/Demo/Games\");;#include \"CastleFrankenstein\";\\n");
Msg(MSG_KEY_DOWN,0,SC_CURSOR_LEFT|SCF_CTRL);
PopUpOk(
@@ -90,14 +91,14 @@ AFGetChar(CH_ESC);
Sleep(500);
PopUpOk("$$FG,GREEN$$<CTRL-SHIFT-ENTER>$$FG$$ to insert a line feed.\n");
AFGetKey(SC_CARRIAGE_RETURN|SCF_CTRL|SCF_SHIFT);
AFGetKey(SC_ENTER|SCF_CTRL|SCF_SHIFT);
Sleep(500);
Msg(MSG_KEY_DOWN,0,SC_CURSOR_UP|SCF_CTRL);
PopUpOk(
"$$FG,GREEN$$<SPACE BAR>$$FG$$ to test it.\n");
AFPmtStr(" ");
Sleep(5000);
Sleep(3000);
PopUpOk(
"$$FG,GREEN$$<CTRL-S>$$FG$$ to save your\n"
+1 -1
View File
@@ -52,7 +52,7 @@ PopUpOk(
PopUpOk(
"You can also use the $$FG,GREEN$$Man()$$FG$$ function\n"
"to jump to source code. (I use WordStat.)\n"
"The $$FG,GREEN$$Man()$$FG$$ is good for short symbols\n"
"The $$FG,GREEN$$Man()$$FG$$ is good for short symbol names\n"
"or when inside the debugger.\n");
AFDelayedPutS("Man(\"MakeOSInstallPrtBootLoader\");");
Sleep(1000);
+5 -5
View File
@@ -1,4 +1,4 @@
"Ed(\"::/TempleOS/Misc/Tour/Tour7.AUT.Z\");\n";
"Ed(\"::/TempleOS/Misc/Bible.TXT.Z\");\n";
Sleep(1000);
PopUpOk(
@@ -7,7 +7,7 @@ PopUpOk(
AFGetChar(CH_CTRLF);
"<SHIFT-ESC>";
AFDelayedPutS("new song",150);
PopUpOk("Cursor down 8 times.\n");
I64 i;
@@ -15,9 +15,9 @@ for (i=0;i<8;i++)
AFGetKey(SC_CURSOR_DOWN);
PopUpOk(
"Press '$$FG,GREEN$$1$$FG$$' to show\n"
"all lines within 1 of a match.\n");
AFPmtStr("1");
"Press '$$FG,GREEN$$2$$FG$$' to show\n"
"all lines within 2 of a match.\n");
AFPmtStr("2");
Sleep(1000);
PopUpOk("Press $$FG,GREEN$$<ESC>$$FG$$.\n");