From 58df814cd6dc4b4d10218c5d5bdd081614628891 Mon Sep 17 00:00:00 2001
From: "stephan.com" <stephan@stephan.com>
Date: Mon, 7 Feb 2022 17:13:30 -0800
Subject: [PATCH] 06-Banner: ruby

---
 06_Banner/ruby/banner.rb | 92 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 92 insertions(+)
 create mode 100755 06_Banner/ruby/banner.rb

diff --git a/06_Banner/ruby/banner.rb b/06_Banner/ruby/banner.rb
new file mode 100755
index 00000000..53136dbd
--- /dev/null
+++ b/06_Banner/ruby/banner.rb
@@ -0,0 +1,92 @@
+#!/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 }