TempleOSCDV3.11.ISO

This commit is contained in:
Terry A. Davis authored and minexew committed 2018-09-08 21:46:29 +02:00
1 parent f8c05f98f4
commit ed64d7e3b8
549 files changed
+10643 -12855

No files matched your search

+47 -78
View File
@@ -3,97 +3,66 @@ Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN|SCF_CTRL);
"\n";
TourPut(
"Now, we're going to demonstrate how to work "
"with programs. We'll change to the "
"$$GREEN$$/Demo/Games$$FG$$ directory.\n\n"
"Note that directories are specified with "
"a forward slash, not a backslash. "
"Drives can be specified in a $$GREEN$$Cd()$$FG$$ command "
"and the boot drive is specified with \"$$GREEN$$::$$FG$$\".\n\n"
"$$GREEN$$<ENTER>$$FG$$ to complete the command.\n");
AFPrint(25,"Cd(\"::/Demo/Games\");Dir;");
AFGetStr("\n");
"You are now at the command line.\n"
"\n"
"The syntax is like $$GREEN$$C/C++$$FG$$ except you don't need $$GREEN$$()$$FG$$ "
"if there are no args.\n"
"\n"
"Type \"$$GREEN$$Dir;$$FG$$\" and press $$GREEN$$<ENTER>$$FG$$.\n\n"
"You must remember the semicolon.\n");
AFGetStr("Dir;\n");
TourPut(
"Now, we're going to edit a file. Normally, "
"you'll probably left-click on a directory "
"listing to edit a file, but we're going to "
"type it on the command line.\n\n"
"$$GREEN$$<ENTER>$$FG$$ to complete the command.\n");
"Press $$GREEN$$<CTRL-m>$$FG$$.\n\n"
"This will access your PersonalMenu. You can customize it. "
"It's like your START menu and desktop.\n");
AFPrint(25,"Ed(\"CastleFrankenstein.CPP.Z\");");
AFGetStr("\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);
AFGetChar(CH_CTRLM);
TourPut(
"This is a first-person-shooter.\n\n"
"There is no \"$$GREEN$$main()$$FG$$\" function in TempleOS "
"programs. Any program statements outside "
"functions get executed when you $$GREEN$$#include$$FG$$ "
"them at the command line.\n\n"
"The \"$$GREEN$$CastleFrankenstein;$$FG$$\" statement at the "
"bottom will run the program when we "
"$$GREEN$$#include$$FG$$ it.\n",TRUE);
"You can also get to your PersonalMenu by clicking on the word "
"\"$$GREEN$$MENU$$FG$$\" in the title bar.\n",TRUE);
TourPut("Press $$GREEN$$<SHIFT-ESC>$$FG$$ to abort the editor.\n");
TourPut("Press $$GREEN$$<CURSOR-DOWN>$$FG$$ nine times.\n");
AFGetChar(CH_ESC,CH_SHIFT_ESC);
//Puts the cursor at the top
Msg(MSG_KEY_DOWN,0,SC_CURSOR_UP|SCF_CTRL);
I64 i;
for (i=0;i<9;i++)
AFGetKey(SC_CURSOR_DOWN);
TourPut(
"Now, run the CastleFrankenstein.CPP.Z program. Press $$GREEN$$<ENTER>$$FG$$.\n");
AFPrint(25,"#include \"CastleFrankenstein\";");
AFGetStr("\n");
TourPut(
"Move around with cursor keys and press $$GREEN$$<SHIFT-ESC>$$FG$$ when you "
"are done.\n");
AFUntilChar(CH_ESC,CH_SHIFT_ESC);
"Keyboard commands are:\n\n"
"$$GREEN$$<SPACE>$$FG$$\t\tLeft-action\n"
"$$GREEN$$<ENTER>$$FG$$\t\tRight-action\n"
"$$GREEN$$<ESC>$$FG$$\t\tSave and exit\n"
"$$GREEN$$<SHIFT-ESC>$$FG$$\tAbort and exit\n",TRUE);
TourPut(
"The program is still in memory and we can start it again by typing "
"\"$$GREEN$$CastleFrankenstein;$$FG$$\".\n\n"
"Press $$GREEN$$<ENTER>$$FG$$ at the command line to run it again.\n");
AFPrint(25,"CastleFrankenstein;");
AFGetStr("\n");
TourPut(
"Move around with cursor keys and press $$GREEN$$<SHIFT-ESC>$$FG$$ when you "
"are done.\n");
AFUntilChar(CH_ESC,CH_SHIFT_ESC);
"The cursor is now on top of a macro we wish to run.\n"
"\n"
"Press $$GREEN$$<SPACE>$$FG$$.\n");
AFGetStr(" ");
TourPut(
"$$GREEN$$<CTRL-ALT-a>$$FG$$\tExtended ASCII.\n"
"$$GREEN$$<CTRL-ALT-c>$$FG$$\tBreak(interrupt) program.\n"
"$$GREEN$$<CTRL-ALT-e>$$FG$$\tSpawn new user terminal window.\n"
"$$GREEN$$<CTRL-ALT-m>$$FG$$\tMutes sound.\n"
"$$GREEN$$<CTRL-ALT-t>$$FG$$\tSwitch tasks.\n"
"$$GREEN$$<CTRL-ALT-x>$$FG$$\tKill task (window).\n",TRUE);
AFPrint(50,"Ed(\"CastleFrankenstein.CPP.Z\");\n");
TourPut("Press $$GREEN$$<F5>$$FG$$ in the editor to run the file being edited.\n");
AFGetKey(SC_F5);
Sleep(1000);
CTask *task=sys_focus_task;
"The macro changed directories and did a $$GREEN$$Dir;$$FG$$ command. "
"The $$RED$$RED$$FG$$ filenames listed are file links. Left-clicking will "
"edit/view them. Right-clicking or pressing $$GREEN$$<ENTER>$$FG$$ when the "
"cursor is on top will bring-up a menu of options.\n\n"
"The $$LTBLUE$$BLUE$$FG$$ underline entries \"$$LTBLUE$$.$$FG$$\" "
"and \"$$LTBLUE$$..$$FG$$\""
"are macros and will change directories.\n",TRUE);
TourPut(
"Press $$GREEN$$<SHIFT-ESC>$$FG$$ to abort the application. "
"Then, press $$GREEN$$<CTRL-ALT-x>$$FG$$ to kill the task.\n");
WinToTop(task);
while (TaskValidate(task))
Sleep(10);
TourPut("Press $$GREEN$$<SHIFT-ESC>$$FG$$ to abort the editor.\n");
AFUntilChar(CH_ESC,CH_SHIFT_ESC);
"Press $$GREEN$$<CTRL-t>$$FG$$ to toggle to plain text mode.\n\n"
"These are \"DolDoc\" commands.");
AFGetChar(CH_CTRLT);
TourPut(
"Explore the $$RED$$$TX+L+PU+UL,"DemoIndex",A="FI:::/Doc/DemoIndex.TXT"$$$FG$$. "
"You'll find it on your menu. It's arranged by difficulty. "
"Hit $$GREEN$$<SPACE>$$FG$$ on a demo index listing "
"and $$GREEN$$<F5>$$FG$$ to run from the editor.\n",TRUE);
"The DolDoc widgets are bracketed with dollar sign characters.\n\n"
"\"LK\" stands \"link\".\n"
"\"MA\" stands for \"macro\".\n\n"
"Now, $$GREEN$$<CTRL-t>$$FG$$ to toggle back to regular mode.\n");
AFGetChar(CH_CTRLT);
Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN|SCF_CTRL);