(defvar *menu-splash* " ▄████████ ▄█ ▄█ █▄ ▄████████ ▄████████ ▄████████ ███ ███ ███ ███ ███ ███ ███ ███ ███ ███ ███ ███ █▀ ███ ███ ███ ███ ███ ███ ███ ███ █▀ ███ ███ ███ ███ ███ ███ ▄███▄▄▄▄██▀ ███ ███ ███ ███ ███ ▀███████████ ▀▀███▀▀▀▀▀ ▀███████████ ███ █▄ ███ ███ ███ ███ ███ ▀███████████ ███ ███ ███ ███▌ ▄ ███ ▄█▄ ███ ███ ███ ███ ███ ▄█ ███ ████████▀ █████▄▄██ ▀███▀███▀ ███ █▀ ███ ███ ▄████████▀ ▀ ███ ███ ") (defvar *intro-ship* " ┈ ┅ ▂▂╶╴▁▂ ▐▊╌▏▅▐╻ ▕▄▄▟▊▁▅█▝▍▂▍╲ ▗▅██▐▃▂█▋─▇█▇▊ ▐█▀▔▜████╎███▉ ▁ ╷ ▕█▃▃█▟█▆██╸████▆▆▖ ▁ ┒▄▅▅▂▁▄▟▆▆▇━▀▝▀▔▂▔▔▔▔ ━██▏ ▁▃┒ ▖ ▗ ╴ ▂▃▟▅┰▐▜▜▀▀▘▔▔▁▂▄▅▄▅▉▐▙▆▁ ▃▔▐▆█▎ ▁ ╾─╴▆▟▜▜▇▅▉▟╹▀▔ ▁▂▁▄━▇█▇▀▘▜▃▃▅▆██▛█▖▃ ▃▃▃▊▕███▍ ╴▁ ─╍▁▂▇▃╶▁ ▝▜▀▀▀▂▟▁▂▃▄▅▛▜▇▛▀▀▃▜▄▇▟██████████▇▆██▛▀▜▐███▘ ╺▆▇▛▀▀▔▔ ▂▃▄▅▆▇▛▜███▇▛▜▀▃▜▇▟▆███████████████████▔ ▜▀▔▔ ─╼┙▀▅▅▆▆▆▇▇▇██████▆█████▃█▟▇██████████████████████▀▔ ▁▂▃╼┶┻▛▊┷██▃▅████████████████████████▀▀███████▛▀▜▀▀▔ ╼╵▘▔ ▁▃▇███████████████████████████▜▔▔ ▕▏ ▔▔ ╶━▝└╼┙▘▔▕██████┬┳███████████▜▌▀▀ ▌ ▏ ▁▁▅▛▔▔ ▂ ▟▟███████▎▝ ╹ ▁▃─┶▂▟██▘▃▅▆▀▘ ▁ ▔▀█████▀▀▏ ▁▂╶╼▀▀▀▇▀ ▔▁▃▄▆▛▃▃▖━▀▀▔ ▔ ▕▅▅▅▆████▛▔▔▔ ╺▛▀▔▔ ") ;; Used for archeotech art generation (defvar *ascii-chars* "█*|")