1 \ Copyright (c) 2003 Scott Long <scottl@FreeBSD.org>
   2 \ Copyright (c) 2003 Aleksander Fafula <alex@fafula.com>
   3 \ Copyright (c) 2006-2015 Devin Teske <dteske@FreeBSD.org>
   4 \ All rights reserved.
   5 \ Copyright 2018 Nexenta Systems, Inc. All rights reserved.
   6 \
   7 \ Redistribution and use in source and binary forms, with or without
   8 \ modification, are permitted provided that the following conditions
   9 \ are met:
  10 \ 1. Redistributions of source code must retain the above copyright
  11 \    notice, this list of conditions and the following disclaimer.
  12 \ 2. Redistributions in binary form must reproduce the above copyright
  13 \    notice, this list of conditions and the following disclaimer in the
  14 \    documentation and/or other materials provided with the distribution.
  15 \ 
  16 \ THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  17 \ ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  18 \ IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  19 \ ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  20 \ FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  21 \ DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  22 \ OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  23 \ HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  24 \ LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  25 \ OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  26 \ SUCH DAMAGE.
  27 \ 
  28 \ $FreeBSD$
  29 
  30 39 logoX ! 1 logoY ! \ Initialize logo placement defaults
  31 
  32 : logo+ ( x y c-addr/u -- x y' )
  33         2swap 2dup at-xy 2swap \ position the cursor
  34         [char] @ escc! \ replace @ with Esc
  35         type \ print to the screen
  36         1+ \ increase y for next time we're called
  37 ;
  38 
  39 : logo ( x y -- ) \ color nexenta logo
  40       
  41        s" /boot/nexenta.png" fb-putimage if 2drop exit then
  42         
  43        s"                                     " logo+ 
  44        s"                                     " logo+ 
  45        s"                                     " logo+     
  46        s"       `         ````                " logo+ 
  47        s"      `:/`    `-/+ooooo++/-.         " logo+ 
  48        s"    `/o+`   `/oooooooooooooo+:`      " logo+ 
  49        s"   .+oo/   `+oooooooooooooooooo:`    " logo+ 
  50        s"  .+ooo+   .oooooooooooooooooooo+`   " logo+ 
  51        s"  +ooooo:   :oooooooooo+//::/+ooo+`  " logo+ 
  52        s" .ooooooo+.  `-:///:-.`       `-/o:  " logo+ 
  53        s" .ooooooooo/-         .:///:.    -/  " logo+ 
  54        s" `+oooooooooo+-     `+ooooooo/    .  " logo+ 
  55        s"  -oooooooooooo/   `+ooooooooo-      " logo+ 
  56        s"   :oooooooooooo-  -oooooooooo:      " logo+ 
  57        s"    .+ooooooooo+.  +oooooooooo-      " logo+ 
  58        s"      .:+ooooo/.  -oooooooooo/       " logo+ 
  59        s"         ``.`    -+ooooooooo/`       " logo+ 
  60        s"               ./ooooooooo/.         " logo+ 
  61        s"         .-::/ooooooooo+:`           " logo+ 
  62        s"           `.-::::::-.`              " logo+ 
  63 
  64         2drop
  65 ;