TempleOSCDV4.12.ISO
This commit is contained in:
1 parent
93ca216483
commit
b84bbff6db
381 files changed
+18356
-18798
No files matched your search
@@ -20,7 +20,7 @@ U0 TourPutTask()
|
||||
DocCursor(FALSE,doc);
|
||||
"$$WW+H,1$$";
|
||||
while (TRUE) {
|
||||
WinMgrSync;
|
||||
Refresh;
|
||||
if (ScanMsg(&ch,,1<<MSG_KEY_DOWN) && (ch==CH_ESC||ch==CH_SHIFT_ESC)) {
|
||||
Kill(tour_task->parent_task,FALSE);
|
||||
break;
|
||||
@@ -61,7 +61,7 @@ U0 TourPut(U8 *st,Bool wait_okay=FALSE)
|
||||
DocFormBwd(doc);
|
||||
old_focus_task=sys_focus_task;
|
||||
tour_okay_pressed=FALSE;
|
||||
do WinMgrSync;
|
||||
do Refresh;
|
||||
while (!tour_okay_pressed);
|
||||
WinFocus(old_focus_task);
|
||||
DocClear(doc);
|
||||
@@ -111,7 +111,7 @@ U0 TourMenu()
|
||||
if (i>0) {
|
||||
if (!LBts(&tour_put->display_flags,DISPLAYf_SHOW))
|
||||
WinZBufUpdate;
|
||||
StrPrint(buf,"Tour%X.AUT",i);
|
||||
StrPrint(buf,"Tour%X.IN",i);
|
||||
ExeFile(buf);
|
||||
} else
|
||||
break;
|
||||
@@ -120,7 +120,7 @@ U0 TourMenu()
|
||||
}
|
||||
|
||||
"DocClear;WinMax;\n";
|
||||
WinMgrSync(2);
|
||||
Refresh(2);
|
||||
TourMenu;
|
||||
Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN|SCF_CTRL);
|
||||
"Cd;Dir;\n";
|
||||
@@ -8,11 +8,11 @@ TourPut("Press $$GREEN$$<F1>$$FG$$ for the main help index.\n"
|
||||
"the editor and at the command line.\n"
|
||||
"\n"
|
||||
"You can find the $LK+PU,"Demo Index",A="FI:::/Doc/DemoIndex.DD"$ on the help index.\n");
|
||||
AFGetKey(SC_F1);
|
||||
InGetKey(SC_F1);
|
||||
|
||||
TourPut(
|
||||
"Press $$GREEN$$<SHIFT-ESC>$$FG$$ to abort and exit.\n");
|
||||
AFGetChar(CH_SHIFT_ESC);
|
||||
InGetChar(CH_SHIFT_ESC);
|
||||
|
||||
U0 RevealPopUpHelp(I64 scf)
|
||||
{
|
||||
@@ -10,14 +10,14 @@ TourPut(
|
||||
"\n"
|
||||
"Type \"$$GREEN$$Dir;$$FG$$\" and press $$GREEN$$<ENTER>$$FG$$.\n\n"
|
||||
"You must remember the semicolon.\n");
|
||||
AFGetStr("Dir;\n");
|
||||
InGetStr("Dir;\n");
|
||||
|
||||
TourPut(
|
||||
"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");
|
||||
|
||||
AFGetChar(CH_CTRLM);
|
||||
InGetChar(CH_CTRLM);
|
||||
TourPut(
|
||||
"You can also get to your PersonalMenu by clicking on the word "
|
||||
"\"$$GREEN$$MENU$$FG$$\" in the title bar.\n",TRUE);
|
||||
@@ -29,7 +29,7 @@ Msg(MSG_KEY_DOWN,0,SC_CURSOR_UP|SCF_CTRL);
|
||||
|
||||
I64 i;
|
||||
for (i=0;i<9;i++)
|
||||
AFGetKey(SC_CURSOR_DOWN);
|
||||
InGetKey(SC_CURSOR_DOWN);
|
||||
|
||||
TourPut(
|
||||
"Keyboard commands are:\n\n"
|
||||
@@ -42,7 +42,7 @@ TourPut(
|
||||
"The cursor is now on top of a macro we wish to run.\n"
|
||||
"\n"
|
||||
"Press $$GREEN$$<SPACE>$$FG$$.\n");
|
||||
AFGetStr(" ");
|
||||
InGetStr(" ");
|
||||
|
||||
TourPut(
|
||||
"The macro changed directories and did a $$GREEN$$Dir;$$FG$$ command. "
|
||||
@@ -56,13 +56,13 @@ TourPut(
|
||||
TourPut(
|
||||
"Press $$GREEN$$<CTRL-t>$$FG$$ to toggle to plain text mode.\n\n"
|
||||
"These are \"DolDoc\" commands.");
|
||||
AFGetChar(CH_CTRLT);
|
||||
InGetChar(CH_CTRLT);
|
||||
|
||||
TourPut(
|
||||
"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);
|
||||
InGetChar(CH_CTRLT);
|
||||
Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN|SCF_CTRL);
|
||||
|
||||
@@ -12,8 +12,8 @@ TourPut(
|
||||
"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");
|
||||
InPrint(25,"Cd(\"::/Demo/Games\");Dir;");
|
||||
InGetStr("\n");
|
||||
|
||||
TourPut(
|
||||
"Now, we're going to edit a file. Normally, "
|
||||
@@ -22,8 +22,8 @@ TourPut(
|
||||
"type it on the command line.\n\n"
|
||||
"$$GREEN$$<ENTER>$$FG$$ to complete the command.\n");
|
||||
|
||||
AFPrint(25,"Ed(\"CastleFrankenstein.HC.Z\");");
|
||||
AFGetStr("\n");
|
||||
InPrint(25,"Ed(\"CastleFrankenstein.HC.Z\");");
|
||||
InGetStr("\n");
|
||||
Msg(MSG_KEY_DOWN_UP,0,SC_CURSOR_UP|SCF_CTRL);
|
||||
|
||||
Sleep(1000);
|
||||
@@ -40,29 +40,29 @@ TourPut(
|
||||
|
||||
TourPut("Press $$GREEN$$<SHIFT-ESC>$$FG$$ to abort the editor.\n");
|
||||
|
||||
AFGetChar(CH_ESC,CH_SHIFT_ESC);
|
||||
InGetChar(CH_ESC,CH_SHIFT_ESC);
|
||||
|
||||
TourPut(
|
||||
"Now, run the CastleFrankenstein.HC.Z program. Press $$GREEN$$<ENTER>$$FG$$.\n");
|
||||
|
||||
AFPrint(25,"#include \"CastleFrankenstein\";");
|
||||
AFGetStr("\n");
|
||||
InPrint(25,"#include \"CastleFrankenstein\";");
|
||||
InGetStr("\n");
|
||||
TourPut(
|
||||
"Move around with cursor keys and press $$GREEN$$<SHIFT-ESC>$$FG$$ when you "
|
||||
"are done.\n");
|
||||
AFUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
InUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
|
||||
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");
|
||||
InPrint(25,"CastleFrankenstein;");
|
||||
InGetStr("\n");
|
||||
TourPut(
|
||||
"Move around with cursor keys and press $$GREEN$$<SHIFT-ESC>$$FG$$ when you "
|
||||
"are done.\n");
|
||||
AFUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
InUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
|
||||
TourPut(
|
||||
"$$GREEN$$<CTRL-ALT-a>$$FG$$\tExtended ASCII.\n"
|
||||
@@ -72,11 +72,11 @@ TourPut(
|
||||
"$$GREEN$$<CTRL-ALT-t>$$FG$$\tTerminal window.\n"
|
||||
"$$GREEN$$<CTRL-ALT-x>$$FG$$\tKill task (window).\n",TRUE);
|
||||
|
||||
AFPrint(50,"Ed(\"CastleFrankenstein.HC.Z\");\n");
|
||||
InPrint(50,"Ed(\"CastleFrankenstein.HC.Z\");\n");
|
||||
|
||||
TourPut("Press $$GREEN$$<F5>$$FG$$ in the editor to run the file being edited.\n");
|
||||
|
||||
AFGetKey(SC_F5);
|
||||
InGetKey(SC_F5);
|
||||
Sleep(1000);
|
||||
CTask *task=sys_focus_task;
|
||||
|
||||
@@ -88,7 +88,7 @@ DeathWait(&task);
|
||||
|
||||
TourPut("Press $$GREEN$$<SHIFT-ESC>$$FG$$ to abort the editor.\n");
|
||||
|
||||
AFUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
InUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
|
||||
TourPut(
|
||||
"Explore the $$RED$$$TX+L+PU+UL,"DemoIndex",A="FI:::/Doc/DemoIndex.DD"$$$FG$$. "
|
||||
@@ -6,13 +6,13 @@ TourPut(
|
||||
"Now, we're going to add the CastleFrankenstein.HC.Z program "
|
||||
"to your PersonalMenu.\n\n"
|
||||
"Press $$GREEN$$<CTRL-m>$$FG$$ to get to your PersonalMenu.\n");
|
||||
AFGetChar(CH_CTRLM);
|
||||
InGetChar(CH_CTRLM);
|
||||
Msg(MSG_KEY_DOWN,0,SC_CURSOR_UP|SCF_CTRL);
|
||||
|
||||
TourPut(
|
||||
"Press $$GREEN$$<CTRL-l>$$FG$$ to invoke the insert text widgets wizard.\n\n"
|
||||
"(Pressing $$GREEN$$<CTRL-r>$$FG$$ invokes the graphic sprite resource editor.)\n");
|
||||
AFGetChar(CH_CTRLL);
|
||||
InGetChar(CH_CTRLL);
|
||||
|
||||
Sleep(500);
|
||||
WinToTop;//Kludge
|
||||
@@ -20,35 +20,35 @@ WinToTop;//Kludge
|
||||
TourPut("$$GREEN$$<CURSOR-DOWN>$$FG$$ until you reach \"Macro\".\n");
|
||||
I64 i;
|
||||
for (i=0;i<6;i++)
|
||||
AFGetKey(SC_CURSOR_DOWN);
|
||||
InGetKey(SC_CURSOR_DOWN);
|
||||
|
||||
TourPut("Press $$GREEN$$<SPACE>$$FG$$.\n");
|
||||
AFGetStr(" ");
|
||||
InGetStr(" ");
|
||||
|
||||
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");
|
||||
InPrint(,"Click Here");
|
||||
|
||||
Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN);
|
||||
AFPrint(,"Cd(\"::/Demo/Games\");;#include \"CastleFrankenstein\";\\n");
|
||||
InPrint(,"Cd(\"::/Demo/Games\");;#include \"CastleFrankenstein\";\\n");
|
||||
|
||||
TourPut("Press $$GREEN$$<ESC>$$FG$$ to exit the form.\n");
|
||||
AFGetChar(CH_ESC);
|
||||
InGetChar(CH_ESC);
|
||||
|
||||
TourPut(
|
||||
"Press $$GREEN$$<CTRL-SHIFT-ENTER>$$FG$$ to insert a line feed. "
|
||||
"($$GREEN$$<CTRL-ENTER>$$FG$$ does a page break. "
|
||||
"$$GREEN$$<ENTER>$$FG$$ would execute the macro.)\n");
|
||||
AFGetKey(SC_ENTER|SCF_CTRL|SCF_SHIFT);
|
||||
InGetKey(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(" ");
|
||||
InGetStr(" ");
|
||||
TourPut(
|
||||
"Move around with cursor keys and press $$GREEN$$<SHIFT-ESC>$$FG$$ when you "
|
||||
"are done.\n");
|
||||
AFUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
InUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
|
||||
TourPut(
|
||||
"Now, we'll do a fancier macro that pops-up a new window which dies when "
|
||||
@@ -58,29 +58,29 @@ 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");
|
||||
InPrint(," Click here for Pop-up version");
|
||||
Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN);
|
||||
AFPrint(,"Cd(\"::/Demo/Games\");;#include \"CastleFrankenstein\";\\n");
|
||||
InPrint(,"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);
|
||||
InGetKey(SC_CURSOR_DOWN);
|
||||
TourPut(
|
||||
"Press $$GREEN$$<SPACE>$$FG$$ to check the box.\n");
|
||||
AFGetStr(" ");
|
||||
InGetStr(" ");
|
||||
|
||||
TourPut("Press $$GREEN$$<ESC>$$FG$$ to exit the form.\n");
|
||||
AFGetChar(CH_ESC);
|
||||
InGetChar(CH_ESC);
|
||||
|
||||
TourPut("Press $$GREEN$$<CTRL-SHIFT-ENTER>$$FG$$ to insert a line feed.\n");
|
||||
AFGetKey(SC_ENTER|SCF_CTRL|SCF_SHIFT);
|
||||
InGetKey(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(" ");
|
||||
InGetStr(" ");
|
||||
|
||||
Sleep(500);
|
||||
WinToTop;//Kludge
|
||||
@@ -88,7 +88,7 @@ WinToTop;//Kludge
|
||||
TourPut(
|
||||
"Move around with cursor keys and press $$GREEN$$<SHIFT-ESC>$$FG$$ when you "
|
||||
"are done.\n");
|
||||
AFUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
InUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
|
||||
TourPut(
|
||||
"$$GREEN$$<CTRL-S>$$FG$$ to save your PersonalMenu file, if you wish. "
|
||||
@@ -2,7 +2,7 @@
|
||||
|
||||
//Puts the cursor at the bottom.
|
||||
Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN|SCF_CTRL);
|
||||
"\nEd(\"::/Misc/Tour/Tour5.AUT.Z\");\n";
|
||||
"\nEd(\"::/Misc/Tour/Tour5.IN.Z\");\n";
|
||||
Msg(MSG_KEY_DOWN,0,SC_CURSOR_UP|SCF_CTRL);
|
||||
Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN);
|
||||
"//";
|
||||
@@ -23,12 +23,12 @@ Sleep(1500);
|
||||
TourPut(
|
||||
"Press $$GREEN$$<F4>$$FG$$ for the file chooser. Then, "
|
||||
"pick a file and press $$GREEN$$<ESC>$$FG$$.");
|
||||
AFGetKey(SC_F4);
|
||||
InGetKey(SC_F4);
|
||||
Sleep(5000);
|
||||
TourPut("Press $$GREEN$$<ESC>$$FG$$ to exit the form.\n");
|
||||
AFGetChar(CH_ESC);
|
||||
InGetChar(CH_ESC);
|
||||
|
||||
TourPut("Press $$GREEN$$<SHIFT-ESC>$$FG$$ to abort.\n");
|
||||
AFGetChar(CH_SHIFT_ESC);
|
||||
InGetChar(CH_SHIFT_ESC);
|
||||
|
||||
TourPut("Use $$GREEN$$<SHIFT F4>$$FG$$ to pick directories.\n",TRUE);
|
||||
@@ -20,15 +20,15 @@ TourPut(
|
||||
"window. Notice it is underlined. This means a source code link is "
|
||||
"available.\n\n"
|
||||
"Press $$GREEN$$<CTRL-SHIFT-F1>$$FG$$ to jump to source code.\n");
|
||||
AFGetKey(SC_F1|SCF_CTRL|SCF_SHIFT);
|
||||
InGetKey(SC_F1|SCF_CTRL|SCF_SHIFT);
|
||||
Sleep(500);
|
||||
WinToTop;//Kludge
|
||||
|
||||
TourPut("Press $$GREEN$$<SHIFT-ESC>$$FG$$ to abort the source code.\n");
|
||||
AFUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
InUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
|
||||
TourPut("Press $$GREEN$$<CTRL-F1>$$FG$$ to autocomplete.\n");
|
||||
AFGetKey(SC_F1|SCF_CTRL);
|
||||
InGetKey(SC_F1|SCF_CTRL);
|
||||
Sleep(500);
|
||||
|
||||
Msg(MSG_KEY_DOWN,'\n',SCF_CTRL|SCF_SHIFT);
|
||||
@@ -42,9 +42,9 @@ TourPut(
|
||||
"You can also use the $$GREEN$$Man()$$FG$$ function to jump to source code. "
|
||||
"(I use AutoComplete.) The $$GREEN$$Man()$$FG$$ is good for short symbol "
|
||||
"names or when inside the debugger.\n",TRUE);
|
||||
AFPrint(,"Man(\"U\");");
|
||||
InPrint(,"Man(\"U\");");
|
||||
Sleep(1500);
|
||||
"\n";
|
||||
|
||||
TourPut("Press $$GREEN$$<SHIFT-ESC>$$FG$$ to abort the source code.\n");
|
||||
AFUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
InUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
@@ -10,7 +10,7 @@ Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN|SCF_CTRL);
|
||||
"\n";
|
||||
|
||||
"F(\"RED\");";
|
||||
AFGetStr("\n");
|
||||
InGetStr("\n");
|
||||
Sleep(2000);
|
||||
|
||||
TourPut("Notice the number of matches.\n",TRUE);
|
||||
@@ -26,7 +26,7 @@ Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN|SCF_CTRL);
|
||||
"\n";
|
||||
|
||||
"F(\"RED\",\"+l\");";
|
||||
AFGetStr("\n");
|
||||
InGetStr("\n");
|
||||
Sleep(2000);
|
||||
|
||||
TourPut("Notice the number of matches.\n",TRUE);
|
||||
@@ -42,7 +42,7 @@ Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN|SCF_CTRL);
|
||||
"\n";
|
||||
|
||||
"F(\"RED\",\"+l-i\");";
|
||||
AFGetStr("\n");
|
||||
InGetStr("\n");
|
||||
Sleep(2000);
|
||||
|
||||
TourPut("Notice the number of matches.\n",TRUE);
|
||||
@@ -59,10 +59,10 @@ Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN|SCF_CTRL);
|
||||
"\n";
|
||||
|
||||
"Ed(\"~/HomeWrappers.HC.Z\");";
|
||||
AFGetStr("\n");
|
||||
InGetStr("\n");
|
||||
|
||||
TourPut("Press $$GREEN$$<SHIFT-ESC>$$FG$$ to abort the source code.\n");
|
||||
AFUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
InUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
|
||||
TourPut(
|
||||
"$$GREEN$$+lb$$FG$$ is whole label just before.\n"
|
||||
@@ -3,23 +3,23 @@ TourPut(
|
||||
"Let's list files in the $$GREEN$$/Kernel$$FG$$ and sub directories.\n\n"
|
||||
"TempleOS masks have one base directory and multiple filename masks.\n\n"
|
||||
"Press $$GREEN$$<ENTER>$$FG$$.\n");
|
||||
AFGetStr("\n");
|
||||
InGetStr("\n");
|
||||
|
||||
"FF(\"/Kernel/*\",\"-r\");";
|
||||
TourPut(
|
||||
"The recurse $$GREEN$$+r$$FG$$ flag is usually set. Let's turn it off.\n\n"
|
||||
"Press $$GREEN$$<ENTER>$$FG$$.\n");
|
||||
AFGetStr("\n");
|
||||
InGetStr("\n");
|
||||
|
||||
"FF(\"/Kernel/St*;*.HH*\");";
|
||||
TourPut(
|
||||
"Let's have two mask of $$GREEN$$St*$$FG$$ plus $$GREEN$$*.HH*$$FG$$\n\n"
|
||||
"Press $$GREEN$$<ENTER>$$FG$$.\n");
|
||||
AFGetStr("\n");
|
||||
InGetStr("\n");
|
||||
|
||||
"FF(\"/Kernel/St*;*.HH*;!*Print*\");";
|
||||
TourPut(
|
||||
"Let's unsel $$GREEN$$*Print*$$FG$$.\n\n"
|
||||
"Press $$GREEN$$<ENTER>$$FG$$.\n");
|
||||
AFGetStr("\n");
|
||||
InGetStr("\n");
|
||||
TourPut("There is no way to include multiple base directories.\n",TRUE);
|
||||
@@ -1,22 +1,22 @@
|
||||
"Ed(\"::/Misc/Bible.TXT.Z\");\n";
|
||||
TourPut("Press $$GREEN$$<CTRL-F>$$FG$$ to find.\n");
|
||||
AFGetChar(CH_CTRLF);
|
||||
InGetChar(CH_CTRLF);
|
||||
|
||||
AFPrint(150,"new song");
|
||||
InPrint(150,"new song");
|
||||
|
||||
TourPut("Cursor down 8 times.\n");
|
||||
I64 i;
|
||||
for (i=0;i<8;i++)
|
||||
AFGetKey(SC_CURSOR_DOWN);
|
||||
InGetKey(SC_CURSOR_DOWN);
|
||||
|
||||
TourPut("Press '$$GREEN$$2$$FG$$' to show all lines within 2 of a match.\n");
|
||||
AFGetStr("2");
|
||||
InGetStr("2");
|
||||
|
||||
TourPut("Press $$GREEN$$<ESC>$$FG$$ to exit the form.\n");
|
||||
AFGetChar(CH_ESC);
|
||||
InGetChar(CH_ESC);
|
||||
|
||||
TourPut("Look around and press $$GREEN$$<ESC>$$FG$$ to turn off filter.\n");
|
||||
AFUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
InUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
|
||||
TourPut("You can combine filters to effectively do AND searches.\n",TRUE);
|
||||
|
||||
@@ -1,27 +1,27 @@
|
||||
TourPut("Press $$GREEN$$<ENTER>$$FG$$.");
|
||||
"Ed(\"HI:Debugging\");";
|
||||
AFGetStr("\n");
|
||||
InGetStr("\n");
|
||||
TourPut("Press $$GREEN$$<SHIFT-ESC>$$FG$$ to abort.\n");
|
||||
AFUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
InUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
|
||||
TourPut(
|
||||
"We will now use $$RED$$$$TX+L+PU+UL,\"Uf\",A=\"MN:Uf\"$$$$FG$$() to "
|
||||
"unassemble a function. It takes the function name as a string arg.\n\n"
|
||||
"Press $$GREEN$$<ENTER>$$FG$$.\n");
|
||||
"WinBorder;WinMax;\nUf(\"CAlloc\");";
|
||||
AFGetStr("\n");
|
||||
InGetStr("\n");
|
||||
|
||||
TourPut("Press $$GREEN$$<CURSOR-UP>$$FG$$ eight times..");
|
||||
I64 i;
|
||||
for (i=0;i<8;i++)
|
||||
AFGetKey(SC_CURSOR_UP);
|
||||
InGetKey(SC_CURSOR_UP);
|
||||
|
||||
TourPut(
|
||||
"Press $$GREEN$$<SPACE>$$FG$$.\n");
|
||||
AFGetStr(" ");
|
||||
InGetStr(" ");
|
||||
|
||||
TourPut("Press $$GREEN$$<SHIFT-ESC>$$FG$$ when finished.\n");
|
||||
AFUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
InUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
|
||||
//Puts the cursor at the bottom.
|
||||
Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN|SCF_CTRL);
|
||||
@@ -31,7 +31,7 @@ TourPut(
|
||||
"$$RED$$$$TX+L+PU+UL,\"U\",A=\"MN:U\"$$$$FG$$().\n\n"
|
||||
"Press $$GREEN$$<ENTER>$$FG$$.\n");
|
||||
"U(&CAlloc);";
|
||||
AFGetStr("\n");
|
||||
InGetStr("\n");
|
||||
|
||||
TourPut("The opcodes are slightly nonstandard.\n",TRUE);
|
||||
"Ed(\"::/Compiler/OpCodes.DD.Z\");\n";
|
||||
@@ -41,4 +41,4 @@ Msg(MSG_KEY_DOWN,CH_CTRLF,0x42100000421);
|
||||
Msg(MSG_KEY_DOWN,CH_ESC,0x100000001);
|
||||
|
||||
TourPut("Press $$GREEN$$<SHIFT-ESC>$$FG$$ to abort.\n");
|
||||
AFUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
InUntilChar(CH_ESC,CH_SHIFT_ESC);
|
||||
@@ -10,12 +10,12 @@ Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN|SCF_CTRL);
|
||||
"\n";
|
||||
|
||||
"Type(\"~/PersonalMenu.DD\");";
|
||||
AFGetStr("\n");
|
||||
InGetStr("\n");
|
||||
|
||||
Sleep(1500);
|
||||
AFPrint(250,"Dir;\n");
|
||||
InPrint(250,"Dir;\n");
|
||||
|
||||
Sleep(1500);
|
||||
TourPut(
|
||||
"$$GREEN$$Type()$$FG$$ can also be used on $$GREEN$$.BMP$$FG$$ or $$GREEN$$.GRA$$FG$$ "
|
||||
"$$GREEN$$Type()$$FG$$ can also be used on $$GREEN$$.BMP$$FG$$ or $$GREEN$$.GR$$FG$$ "
|
||||
"files!",TRUE);
|
||||
@@ -4,7 +4,7 @@ TourPut(
|
||||
"Press $$GREEN$$<ENTER>$$FG$$.\n");
|
||||
|
||||
"#include \"::/Misc/OSTestSuite\";";
|
||||
AFGetStr("\n");
|
||||
InGetStr("\n");
|
||||
|
||||
if (LBtr(&tour_put->display_flags,DISPLAYf_SHOW))
|
||||
WinZBufUpdate;
|
||||
Reference in new issue
Block a user