beastie.4th (115434) | beastie.4th (115451) |
---|---|
1\ Copyright (c) 2003 Scott Long <scottl@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. --- 8 unchanged lines hidden (view full) --- 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\ | 1\ Copyright (c) 2003 Scott Long <scottl@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. --- 8 unchanged lines hidden (view full) --- 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: head/sys/boot/forth/beastie.4th 115434 2003-05-31 11:19:11Z scottl $ | 25\ $FreeBSD: head/sys/boot/forth/beastie.4th 115451 2003-05-31 16:07:00Z scottl $ |
26 27marker task-beastie.4th 28 29include /boot/screen.4th 30include /boot/frames.4th 31 32hide 33 --- 12 unchanged lines hidden (view full) --- 46variable rebootkey 47 4846 constant dot 49 50\ The BSD Daemon. He is 19 rows high and 34 columns wide 51: print-beastie ( x y -- ) 52 2dup at-xy ." , ," 1+ 53 2dup at-xy ." /( )`" 1+ | 26 27marker task-beastie.4th 28 29include /boot/screen.4th 30include /boot/frames.4th 31 32hide 33 --- 12 unchanged lines hidden (view full) --- 46variable rebootkey 47 4846 constant dot 49 50\ The BSD Daemon. He is 19 rows high and 34 columns wide 51: print-beastie ( x y -- ) 52 2dup at-xy ." , ," 1+ 53 2dup at-xy ." /( )`" 1+ |
54 2dup at-xy ." \\ \\___ / |" 1+ | 54 2dup at-xy ." \ \___ / |" 1+ |
55 2dup at-xy ." /- _ `-/ '" 1+ | 55 2dup at-xy ." /- _ `-/ '" 1+ |
56 2dup at-xy ." (/\\/ \\ \\ /\\" 1+ 57 2dup at-xy ." / / | ` \\" 1+ | 56 2dup at-xy ." (/\/ \ \ /\" 1+ 57 2dup at-xy ." / / | ` \" 1+ |
58 2dup at-xy ." O O ) / |" 1+ 59 2dup at-xy ." `-^--'`< '" 1+ 60 2dup at-xy ." (_.) _ ) /" 1+ 61 2dup at-xy ." `.___/` /" 1+ 62 2dup at-xy ." `-----' /" 1+ | 58 2dup at-xy ." O O ) / |" 1+ 59 2dup at-xy ." `-^--'`< '" 1+ 60 2dup at-xy ." (_.) _ ) /" 1+ 61 2dup at-xy ." `.___/` /" 1+ 62 2dup at-xy ." `-----' /" 1+ |
63 2dup at-xy ." <----. __ / __ \\" 1+ 64 2dup at-xy ." <----|====O)))==) \\) /====" 1+ 65 2dup at-xy ." <----' `--' `.__,' \\" 1+ | 63 2dup at-xy ." <----. __ / __ \" 1+ 64 2dup at-xy ." <----|====O)))==) \) /====" 1+ 65 2dup at-xy ." <----' `--' `.__,' \" 1+ |
66 2dup at-xy ." | |" 1+ | 66 2dup at-xy ." | |" 1+ |
67 2dup at-xy ." \\ / /\\" 1+ 68 2dup at-xy ." ______( (_ / \\______/" 1+ | 67 2dup at-xy ." \ / /\" 1+ 68 2dup at-xy ." ______( (_ / \______/" 1+ |
69 2dup at-xy ." ,' ,-----' |" 1+ 70 at-xy ." `--{__________)" 71; 72 73: acpienabled? ( -- flag ) 74 s" acpi_load" getenv 75 dup -1 = if 76 drop false exit --- 132 unchanged lines hidden --- | 69 2dup at-xy ." ,' ,-----' |" 1+ 70 at-xy ." `--{__________)" 71; 72 73: acpienabled? ( -- flag ) 74 s" acpi_load" getenv 75 dup -1 = if 76 drop false exit --- 132 unchanged lines hidden --- |