Files
TempleOS-Rijn/Misc/Tour/Tour7.AUT
T
2018-09-08 21:47:50 +02:00

70 lines
1.7 KiB
Plaintext

TourPut(
"$$RED$$$$TX+L+PU+UL,\"F\",A=\"MN:F\"$$$$FG$$() is a handy function. "
"It is a wrapper around $$RED$$$$TX+L+PU+UL,\"Find\",A=\"MN:Find\"$$$$FG$$(). "
"It searches for a sym.\n",TRUE);
TourPut("Press $$GREEN$$<ENTER>$$FG$$.\n");
//Puts the cursor at the bottom.
Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN|SCF_CTRL);
"\n";
"F(\"RED\");";
AFGetStr("\n");
Sleep(2000);
TourPut("Notice the number of matches.\n",TRUE);
TourPut(
"Try it with the $$GREEN$$+l$$FG$$ flag. This limits to whole labels, not "
"partials.\n",TRUE);
TourPut("Press $$GREEN$$<ENTER>$$FG$$.\n");
//Puts the cursor at the bottom.
Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN|SCF_CTRL);
"\n";
"F(\"RED\",\"+l\");";
AFGetStr("\n");
Sleep(2000);
TourPut("Notice the number of matches.\n",TRUE);
TourPut(
"Try it with the $$GREEN$$+l-i$$FG$$ flag. This does not ignore case and "
"limits to whole labels, not partials.\n",TRUE);
TourPut("Press $$GREEN$$<ENTER>$$FG$$.\n");
//Puts the cursor at the bottom.
Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN|SCF_CTRL);
"\n";
"F(\"RED\",\"+l-i\");";
AFGetStr("\n");
Sleep(2000);
TourPut("Notice the number of matches.\n",TRUE);
TourPut(
"The wrapper function is in your $$RED$$~/HomeWrappers.HC.Z$$FG$$ file. "
"There is a function $$RED$$$$TX+L+PU+UL,\"R\",A=\"MN:R\"$$$$FG$$() for "
"find and replace. Feel free to customize.\n",TRUE);
TourPut("Press $$GREEN$$<ENTER>$$FG$$.\n");
//Puts the cursor at the bottom.
Msg(MSG_KEY_DOWN,0,SC_CURSOR_DOWN|SCF_CTRL);
"\n";
"Ed(\"~/HomeWrappers.HC.Z\");";
AFGetStr("\n");
TourPut("Press $$GREEN$$<SHIFT-ESC>$$FG$$ to abort the source code.\n");
AFUntilChar(CH_ESC,CH_SHIFT_ESC);
TourPut(
"$$GREEN$$+lb$$FG$$ is whole label just before.\n"
"$$GREEN$$+la$$FG$$ is whole label just after.\n",TRUE);