\ Copyright (c) 2003 Scott Long \ Copyright (c) 2003 Aleksander Fafula \ Copyright (c) 2006-2015 Devin Teske \ All rights reserved. \ \ Redistribution and use in source and binary forms, with or without \ modification, are permitted provided that the following conditions \ are met: \ 1. Redistributions of source code must retain the above copyright \ notice, this list of conditions and the following disclaimer. \ 2. Redistributions in binary form must reproduce the above copyright \ notice, this list of conditions and the following disclaimer in the \ documentation and/or other materials provided with the distribution. \ \ THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND \ ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE \ IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE \ ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE \ FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL \ DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS \ OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) \ HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT \ LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY \ OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF \ SUCH DAMAGE. \ 46 logoX ! 4 logoY ! \ Initialize logo placement defaults : logo+ ( x y c-addr/u -- x y' ) 2swap 2dup at-xy 2swap \ position the cursor [char] @ escc! \ replace @ with Esc type \ print to the screen 1+ \ increase y for next time we're called ; : logo ( x y -- ) \ color illumos logo framebuffer? if s" term-putimage" sfind if >r over 0 swap ( x y 0 x ) 12 0 22 ( x y 0 x 12 0 22 ) s" /boot/illumos-logo.png" r> execute if 2drop exit then else drop then then s" @[33m,@[m " logo+ s" @[33m,./% @[31m&@[m " logo+ s" @[33m(****@[31m*(@[m " logo+ s" @[33m*/*@[31m//@[m " logo+ s" @[33m*,//@[31m/((@[m " logo+ s" @[33m,*/@[31m/((/%@[m " logo+ s" @[33m//@[31m/((((%@[m " logo+ s" @[33m,*@[31m/(((((%@[m @[33m&@[31m#///((&@[m" logo+ s" @[33m./@[31m//((((((%@[m @[31m%/(((/@[m " logo+ s" @[33m./@[31m///(((((///((,@[m " logo+ s" @[33m.*//@[31m//((((((((((@[m " logo+ s" @[31m./((((((((/@[m " logo+ s" @[31m(/(((((((@[m " logo+ s" @[31m,,((((((/@[m " logo+ s" @[31m/((((@[m " logo+ s" @[31m%/((((@[m " logo+ s" @[33m&@[31m%#/((((.@[m " logo+ s" @[33m,@[31m(@[m @[31m,/@[m @[31m/(/@[m " logo+ s" @[31m,/@[m " logo+ 2drop ;