xref: /freebsd/stand/forth/shortcuts.4th (revision 69d94f4c7608e41505996559367450706e91fbb8)
1\ Copyright (c) 2008-2011 Devin Teske <dteske@FreeBSD.org>
2\ All rights reserved.
3\
4\ Redistribution and use in source and binary forms, with or without
5\ modification, are permitted provided that the following conditions
6\ are met:
7\ 1. Redistributions of source code must retain the above copyright
8\    notice, this list of conditions and the following disclaimer.
9\ 2. Redistributions in binary form must reproduce the above copyright
10\    notice, this list of conditions and the following disclaimer in the
11\    documentation and/or other materials provided with the distribution.
12\
13\ THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
14\ ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
15\ IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
16\ ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
17\ FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
18\ DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
19\ OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
20\ HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
21\ LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
22\ OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
23\ SUCH DAMAGE.
24\
25\ $FreeBSD$
26
27\ FICL words intended to be used as shortcuts for carrying out common tasks or
28\ producing common results. Generally, words defined here are simply groupings
29\ of other custom words that pull from multiple libraries (for example, if you
30\ want to define a custom word that uses words defined in three different
31\ libraries, this is a good place to define such a word).
32\
33\ This script should be included after you have included any/all other
34\ libraries. This will prevent calling a word defined here before any required
35\ words have been defined.
36
37marker task-shortcuts.4th
38
39\ This "shortcut" word will not be used directly, but is defined here to
40\ offer the user a quick way to get back into the interactive PXE menu
41\ after they have escaped to the shell (perhaps by accident).
42\
43: menu ( -- )
44	clear           \ Clear the screen (in screen.4th)
45	print_version   \ print version string (bottom-right; see version.4th)
46	draw-beastie    \ Draw FreeBSD logo at right (in beastie.4th)
47	draw-brand      \ Draw FIS logo at top (in brand.4th)
48	menu-init       \ Initialize menu and draw bounding box (in menu.4th)
49	menu-display    \ Launch interactive menu (in menu.4th)
50;
51