TempleOSCDV3.11.ISO
This commit is contained in:
Terry A. Davis authored and minexew committed
1 parent
f8c05f98f4
commit
ed64d7e3b8
549 files changed
+10643
-12855
No files matched your search
+72
-71
@@ -1,98 +1,99 @@
|
||||
//Puts the cursor at the bottom.
|
||||
Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN|SCF_CTRL);
|
||||
"\nCd(\"::/Demo/Games\");Dir;\n";
|
||||
"\n";
|
||||
|
||||
TourPut(
|
||||
"Now, we're going to add the CastleFrankenstein.CPP.Z program "
|
||||
"to your PersonalMenu.\n\n"
|
||||
"Press $$GREEN$$<CTRL-m>$$FG$$ to get to your PersonalMenu.\n");
|
||||
AFGetChar(CH_CTRLM);
|
||||
Msg(MSG_KEY_DOWN,0,SC_CURSOR_UP|SCF_CTRL);
|
||||
"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");
|
||||
|
||||
TourPut(
|
||||
"Press $$GREEN$$<CTRL-l>$$FG$$ to invoke the text-widget resource editor.\n\n"
|
||||
"(Press $$GREEN$$<CTRL-r>$$FG$$ invokes the graphic resource editor.)\n");
|
||||
AFGetChar(CH_CTRLL);
|
||||
"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");
|
||||
|
||||
Sleep(500);
|
||||
WinToTop;//Kludge
|
||||
AFPrint(25,"Ed(\"CastleFrankenstein.CPP.Z\");");
|
||||
AFGetStr("\n");
|
||||
Msg(MSG_KEY_DOWN_UP,0,SC_CURSOR_UP|SCF_CTRL);
|
||||
|
||||
TourPut("$$GREEN$$<CURSOR-DOWN>$$FG$$ until you reach \"Macro\".\n");
|
||||
I64 i;
|
||||
for (i=0;i<6;i++)
|
||||
AFGetKey(SC_CURSOR_DOWN);
|
||||
Sleep(1000);
|
||||
Msg(MSG_KEY_DOWN_UP,0,SC_CURSOR_DOWN|SCF_CTRL);
|
||||
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);
|
||||
|
||||
TourPut("Press $$GREEN$$<SPACE>$$FG$$.\n");
|
||||
AFGetStr(" ");
|
||||
TourPut("Press $$GREEN$$<SHIFT-ESC>$$FG$$ to abort the editor.\n");
|
||||
|
||||
AFGetChar(CH_ESC,CH_SHIFT_ESC);
|
||||
|
||||
TourPut(
|
||||
"Now, we'll fill-in the visible tag of the macro. Then, "
|
||||
"we'll fill-in the macro text.\n",TRUE);
|
||||
AFPrint(,"Click Here");
|
||||
"Now, run the CastleFrankenstein.CPP.Z program. Press $$GREEN$$<ENTER>$$FG$$.\n");
|
||||
|
||||
Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN);
|
||||
AFPrint(,"Cd(\"::/Demo/Games\");;#include \"CastleFrankenstein\";\\n");
|
||||
|
||||
TourPut("Press $$GREEN$$<ESC>$$FG$$ to exit the form.\n");
|
||||
AFGetChar(CH_ESC);
|
||||
|
||||
TourPut(
|
||||
"Press $$GREEN$$<CTRL-SHIFT-ENTER>$$FG$$ to insert a line feed.\n"
|
||||
"$$GREEN$$<CTRL-ENTER>$$FG$$ does a page break.\n"
|
||||
"$$GREEN$$<ENTER>$$FG$$ would execute the macro.\n");
|
||||
AFGetKey(SC_ENTER|SCF_CTRL|SCF_SHIFT);
|
||||
|
||||
Msg(MSG_KEY_DOWN,0,SC_CURSOR_UP|SCF_CTRL);
|
||||
TourPut("Press $$GREEN$$<SPACE>$$FG$$ to test it.\n");
|
||||
AFGetStr(" ");
|
||||
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);
|
||||
|
||||
TourPut(
|
||||
"Now, we'll do a fancier macro that pops-up a new window which dies when "
|
||||
"finished, returning mem to the system.\n",TRUE);
|
||||
Msg(MSG_KEY_DOWN,CH_CTRLM,0x43200000432);
|
||||
Msg(MSG_KEY_DOWN,0,SC_CURSOR_UP|SCF_CTRL);
|
||||
Msg(MSG_KEY_DOWN,CH_CTRLL,0x42600000426);
|
||||
for (i=0;i<6;i++)
|
||||
Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN);
|
||||
AFPrint(," Click here for Pop-up version");
|
||||
Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN);
|
||||
AFPrint(,"Cd(\"::/Demo/Games\");;#include \"CastleFrankenstein\";\\n");
|
||||
Msg(MSG_KEY_DOWN,0,SC_CURSOR_LEFT|SCF_CTRL);
|
||||
|
||||
TourPut(
|
||||
"Press $$GREEN$$<CURSOR-DOWN>$$FG$$ until you reach the \"Pop-Up\" check-box.\n");
|
||||
for (i=0;i<2;i++)
|
||||
AFGetKey(SC_CURSOR_DOWN);
|
||||
TourPut(
|
||||
"Press $$GREEN$$<SPACE>$$FG$$ to check the box.\n");
|
||||
AFGetStr(" ");
|
||||
|
||||
TourPut("Press $$GREEN$$<ESC>$$FG$$ to exit the form.\n");
|
||||
AFGetChar(CH_ESC);
|
||||
|
||||
TourPut("Press $$GREEN$$<CTRL-SHIFT-ENTER>$$FG$$ to insert a line feed.\n");
|
||||
AFGetKey(SC_ENTER|SCF_CTRL|SCF_SHIFT);
|
||||
|
||||
Msg(MSG_KEY_DOWN,0,SC_CURSOR_UP|SCF_CTRL);
|
||||
TourPut(
|
||||
"Press $$GREEN$$<SPACE>$$FG$$ to test it.\n");
|
||||
AFGetStr(" ");
|
||||
|
||||
Sleep(500);
|
||||
WinToTop;//Kludge
|
||||
"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);
|
||||
|
||||
TourPut(
|
||||
"$$GREEN$$<CTRL-S>$$FG$$ to save your PersonalMenu file, if you wish. "
|
||||
"Your PersonalMenu is special and does not save on $$GREEN$$<ESC>$$FG$$.\n",TRUE);
|
||||
"$$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);
|
||||
|
||||
'' CH_SHIFT_ESC; //exit menu
|
||||
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;
|
||||
|
||||
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);
|
||||
|
||||
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);
|
||||
|
||||
Reference in new issue
Block a user