mirror of
https://github.com/coding-horror/basic-computer-games.git
synced 2025-12-22 07:10:42 -08:00
93 lines
3.1 KiB
Ruby
Executable File
93 lines
3.1 KiB
Ruby
Executable File
#!/usr/bin/env ruby
|
|
|
|
# Banner
|
|
# reinterpreted from BASIC by stephan.com
|
|
|
|
# this implementation diverges from the original in some notable
|
|
# ways, but maintains the same font definition as before as well
|
|
# as the same somewhat bizarre way of interpreting it. It would
|
|
# be more efficient to redesign the font to allow `"%09b" % row`
|
|
# and then some substitutions.
|
|
|
|
FONT = {
|
|
' ' => [0, 0, 0, 0, 0, 0, 0].freeze,
|
|
'!' => [1, 1, 1, 384, 1, 1, 1].freeze,
|
|
'*' => [69, 41, 17, 512, 17, 41, 69].freeze,
|
|
'.' => [1, 1, 129, 449, 129, 1, 1].freeze,
|
|
'0' => [57, 69, 131, 258, 131, 69, 57].freeze,
|
|
'1' => [0, 0, 261, 259, 512, 257, 257].freeze,
|
|
'2' => [261, 387, 322, 290, 274, 267, 261].freeze,
|
|
'3' => [66, 130, 258, 274, 266, 150, 100].freeze,
|
|
'4' => [33, 49, 41, 37, 35, 512, 33].freeze,
|
|
'5' => [160, 274, 274, 274, 274, 274, 226].freeze,
|
|
'6' => [194, 291, 293, 297, 305, 289, 193].freeze,
|
|
'7' => [258, 130, 66, 34, 18, 10, 8].freeze,
|
|
'8' => [69, 171, 274, 274, 274, 171, 69].freeze,
|
|
'9' => [263, 138, 74, 42, 26, 10, 7].freeze,
|
|
'=' => [41, 41, 41, 41, 41, 41, 41].freeze,
|
|
'?' => [5, 3, 2, 354, 18, 11, 5].freeze,
|
|
'a' => [505, 37, 35, 34, 35, 37, 505].freeze,
|
|
'b' => [512, 274, 274, 274, 274, 274, 239].freeze,
|
|
'c' => [125, 131, 258, 258, 258, 131, 69].freeze,
|
|
'd' => [512, 258, 258, 258, 258, 131, 125].freeze,
|
|
'e' => [512, 274, 274, 274, 274, 258, 258].freeze,
|
|
'f' => [512, 18, 18, 18, 18, 2, 2].freeze,
|
|
'g' => [125, 131, 258, 258, 290, 163, 101].freeze,
|
|
'h' => [512, 17, 17, 17, 17, 17, 512].freeze,
|
|
'i' => [258, 258, 258, 512, 258, 258, 258].freeze,
|
|
'j' => [65, 129, 257, 257, 257, 129, 128].freeze,
|
|
'k' => [512, 17, 17, 41, 69, 131, 258].freeze,
|
|
'l' => [512, 257, 257, 257, 257, 257, 257].freeze,
|
|
'm' => [512, 7, 13, 25, 13, 7, 512].freeze,
|
|
'n' => [512, 7, 9, 17, 33, 193, 512].freeze,
|
|
'o' => [125, 131, 258, 258, 258, 131, 125].freeze,
|
|
'p' => [512, 18, 18, 18, 18, 18, 15].freeze,
|
|
'q' => [125, 131, 258, 258, 322, 131, 381].freeze,
|
|
'r' => [512, 18, 18, 50, 82, 146, 271].freeze,
|
|
's' => [69, 139, 274, 274, 274, 163, 69].freeze,
|
|
't' => [2, 2, 2, 512, 2, 2, 2].freeze,
|
|
'u' => [128, 129, 257, 257, 257, 129, 128].freeze,
|
|
'v' => [64, 65, 129, 257, 129, 65, 64].freeze,
|
|
'w' => [256, 257, 129, 65, 129, 257, 256].freeze,
|
|
'x' => [388, 69, 41, 17, 41, 69, 388].freeze,
|
|
'y' => [8, 9, 17, 481, 17, 9, 8].freeze,
|
|
'z' => [386, 322, 290, 274, 266, 262, 260].freeze
|
|
}.freeze
|
|
|
|
puts 'horizontal'
|
|
x = gets.strip.to_i
|
|
puts 'vertical'
|
|
y = gets.strip.to_i
|
|
puts 'centered'
|
|
centered = gets.strip.downcase.chars.first == 'y'
|
|
puts 'character ("all" for character being printed)'
|
|
fill = gets.strip.downcase
|
|
puts 'statement'
|
|
statement = gets.strip.downcase
|
|
|
|
all = (fill.downcase == 'all')
|
|
lenxs = all ? 1 : fill.length
|
|
start = 1
|
|
start += (63 - 4.5 * y) / lenxs if centered
|
|
|
|
statement.each_char do |char|
|
|
next puts "\n" * 7 * x if char == ' '
|
|
|
|
xs = all ? char : fill
|
|
FONT[char].each do |su|
|
|
print ' ' * start
|
|
8.downto(0) do |k|
|
|
if (1 << k) < su
|
|
print xs * y
|
|
su -= (1 << k)
|
|
else
|
|
print ' ' * (y * lenxs)
|
|
end
|
|
end
|
|
puts
|
|
end
|
|
|
|
(2 * x).times { puts }
|
|
end
|
|
75.times { puts }
|