vamp 0.1.3 → 0.1.4

data/lib/vamp/graphic/transfer5.rb

@@ -0,0 +1,217 @@
+module Vamp
+  module Graphic
+    # Transfer dotter data into ASCII
+    class Transfer5
+
+      attr_reader :char_width
+      attr_reader :char_height
+      attr_reader :context
+      attr_reader :mapping
+
+      SPACE = <<-'END'
+_____
+_____
+_____
+_____
+_____
+      END
+
+      SLASH = <<-'END'
+___X_
+__X__
+_X___
+X____
+_____
+      END
+
+      BACKSLASH = <<-'END'
+X____
+_X___
+__X__
+___X_
+_____
+      END
+
+      BACKTICK = <<-'END'
+_X___
+_____
+_____
+_____
+_____
+      END
+
+      PIPE = <<-'END'
+__X__
+__X__
+__X__
+__X__
+_____
+      END
+
+      MINUS = <<-'END'
+_____
+_____
+XXXX_
+_____
+_____
+      END
+
+      UNDERSCORE = <<-'END'
+_____
+_____
+_____
+_____
+XXXXX
+      END
+
+      FULLSTOP = <<-'END'
+_____
+_____
+_____
+__X__
+_____
+      END
+
+      DOUBLEQUOTES = <<-'END'
+_X_X_
+_____
+_____
+_____
+_____
+      END
+
+      SINGLEQUOTE = <<-'END'
+__X__
+_____
+_____
+_____
+_____
+      END
+
+      STAR = <<-'END'
+_____
+__X__
+_XXX_
+__X__
+_____
+      END
+
+      HASH = <<-'END'
+_____
+_XXX_
+_XXX_
+_XXX_
+_____
+      END
+
+      def initialize(context)
+        @context = context
+        @char_width = 5
+        @char_height = 5
+        @mapping = {
+            " "  => create_pattern(SPACE),
+            "/"  => create_pattern(SLASH),
+            "\\" => create_pattern(BACKSLASH),
+            "`"  => create_pattern(BACKTICK),
+            "|"  => create_pattern(PIPE),
+            "-"  => create_pattern(MINUS),
+            "_"  => create_pattern(UNDERSCORE),
+            "."  => create_pattern(FULLSTOP),
+            "\"" => create_pattern(DOUBLEQUOTES),
+            "'"  => create_pattern(SINGLEQUOTE),
+            "*"  => create_pattern(STAR),
+            "\#" => create_pattern(HASH),
+        }
+      end
+
+      def create_data(pattern)
+        a = pattern.split("\n")
+        fail "pattern has wrong height" if a.size != char_height
+        char_height.times do |dy|
+          fail "pattern has wrong width" if a[dy].size != char_width
+        end
+        a
+      end
+
+      def create_pattern(pattern)
+        char = TextDotter.new(char_width, char_height)
+        a = create_data(pattern)
+        char_height.times do |y|
+          char_width.times do |x|
+            char.dot(x, y) if a[y][x] == "X"
+          end
+        end
+        char
+      end
+
+      def get_pattern(x, y)
+        pattern = ""
+        char_height.times do |dy|
+          char_width.times do |dx|
+            if context.in?(x + dx, y + dy)
+              pattern += (context.dot?(x + dx, y + dy) ? "X" : "_")
+            else
+              pattern += "_"
+            end
+          end
+          pattern += "\n"
+        end
+        create_pattern(pattern.strip)
+      end
+
+      def difference(pattern1, pattern2)
+        m = 0
+        char_width.times do |dx|
+          char_height.times do |dy|
+            m += 1 if pattern1.dot?(dx, dy) != pattern2.dot?(dx, dy)
+          end
+        end
+        m
+      end
+
+      def get_matching(pattern, without_blank = false)
+        ranking = {}
+        mapping.each do |k, v|
+          next if without_blank and v == " "
+          r = difference(pattern, v)
+          ranking[k] = r
+        end
+        match = ranking.min_by{|k, v| v}
+        # require "pp"
+        # pp match
+        match[0..1]
+      end
+
+
+      def ascii
+        a = ""
+        (context.height / char_height).times do |y|
+          (context.width / char_width).times do |x|
+            m = get_matching(get_pattern(x * char_width, y * char_height))
+            if (m[1] > 0)
+              n = []
+              n << get_matching(get_pattern(x * char_width + 1, y * char_height), true)
+              n << get_matching(get_pattern(x * char_width - 1, y * char_height), true)
+              n << get_matching(get_pattern(x * char_width, y * char_height + 1), true)
+              n << get_matching(get_pattern(x * char_width, y * char_height - 1), true)
+=begin
+              n << get_matching(get_pattern(x * char_width + 2, y * char_height), true)
+              n << get_matching(get_pattern(x * char_width - 2, y * char_height), true)
+              n << get_matching(get_pattern(x * char_width, y * char_height + 2), true)
+              n << get_matching(get_pattern(x * char_width, y * char_height - 2), true)
+=end
+              n.each do |v|
+                if v[1] < m[1]
+                  m = v
+                end
+              end
+            end
+            a += m[0]
+          end
+          a += "\n"
+        end
+        a.chomp
+      end
+    end
+  end
+end

data/lib/vamp/graphic.rb

@@ -0,0 +1,17 @@
+require_relative "graphic/context"
+
+module Vamp
+  module Graphic
+  end
+end
+
+if __FILE__ == $0
+  g = Vamp::Graphic::Context.new(Vamp::Graphic::TextDotter.new(80, 20))
+  g.dot(10, 10)
+  g.line 1, 2, 70, 9
+
+  g.draw 40, 10, 100, 1
+  puts g.screen
+  puts "now we get an error:"
+  g.line 1, 1, 100, 100
+end

data/lib/vamp/version.rb

@@ -1,3 +1,3 @@
 module Vamp
-  VERSION = "0.1.3"
+  VERSION = "0.1.4"
 end

data/lib/vamp.rb

@@ -1,21 +1,13 @@
 require_relative "vamp/animator"
+require_relative "vamp/art"
 require_relative "vamp/colorize"
 require_relative "vamp/ply"
 require_relative "vamp/version"
 
 module Vamp
 
-  # ascii art vampire by the queen of ascii art: Joan Stark
-  #   https://en.wikipedia.org/wiki/Joan_Stark
-  VAMPIRE = <<-END
-        =/\\                 /\\=
-        / \\'._   (\\_/)   _.'/ \\
-       / .''._'--(o.o)--'_.''. \\
-      /.' _/ |`'=/ " \\='`| \\_ `.\\
-     /` .' `\\;-,'\\___/',-;/` '. '\\
-    /.-' jgs   `\\(-V-)/`       `-.\\
-    `            "   "            `
-  END
+  # ascii art: vampire
+  VAMPIRE = Vamp::Art::VAMPIRE
 
   # return random quote
   def quote
@@ -69,7 +61,8 @@ module Vamp
       "Only those prepared to die will find eternal life.",
       "I remember everything. It's a burden.",
       "I am teaching you something you don't want to know.",
-      "Death is not the worst. There are things more horrible than death."
+      "Death is not the worst. There are things more horrible than death.",
+      "I'll protect you from the hooded claw; Keep the vampires from your door."
     ].sample
   end
 end

data/sample/gui.rb

@@ -0,0 +1,98 @@
+require "green_shoes"
+
+=begin
+Shoes.app do
+  flow do
+    stack :width => 200 do
+      background lavender
+      caption "Column one"
+      para "is 200 pixels wide"
+    end
+    stack :width => -200 do
+      background bisque
+      caption "Column two"
+      para "is 100% minus 200 pixels wide"
+    end
+  end
+end
+=end
+
+=begin
+ Shoes.app do
+   fill black.push(0.1)
+   100.times do |i|
+     oval i, i, i * 2 if i > 0
+   end
+ end
+
+=end
+
+=begin
+Shoes.app width: 800, height:900, margin: 10, title: "VAMP GUI" do
+  stack width: 800, height: 200, margin: 10 do
+    border black, strokewidth: 2
+  end
+end
+=end
+
+=begin
+Shoes.app do
+  lb = list_box items: COLORS.keys.map(&:to_s), choose: 'red' do |s|
+    @o.style fill: eval(s.text)
+    @p.text = s.text
+  end.move(300, 0)
+  @p = para
+  nostroke
+  @o = oval 100, 100, 100, 100
+  i = 0
+  button('print'){para lb.text, top: 20*(i+=1)}.move(500, 0)
+end
+
+=end
+
+=begin
+Shoes.app do
+  background chocolate..black, angle: 130
+  strokewidth 20
+  border deeppink..forestgreen, curve: 30
+  nostroke
+  fill crimson..cyan
+  oval 100, 100, 100, 100, angle: 45
+  nofill
+  strokewidth 50
+  rect 200, 200, 300, 200, stroke: darkblue..ivory, angle: 90
+end
+
+=end
+
+=begin
+Shoes.app width: 400, height: 400 do
+  cap [:rect, :curve, :project][rand 3]
+  background lightgrey
+  rect 0, 0, 100, 100
+  rect 100, 100, 100, 100
+  rect 200, 200, 100, 100
+  rect 0, 200, 100, 100
+  rect 200, 0, 100, 100
+  stroke File.join(DIR, '../static/gshoes-icon.png')
+  strokewidth 10
+  line 355, 180, 5, 111, strokewidth: 20
+  stroke red
+  line 0, 0, 100, 0
+  line 0, 100, 0, 0
+  line 300, 200, 200, 200
+  line 100, 200, 200, 100
+  stroke white
+  line 200, 200, 200, 300
+  line 300, 200, 200, 100
+end
+=end
+
+Shoes.app width: 800, height: 600 do
+  background lightgrey
+  strokewidth 1
+  stroke black
+  d = 10
+  (height / d + 1).times { |i| line 0, i * d, width, i * d }
+  (width / d + 1).times { |i| line i * d, 0, i * d, height }
+end

data/spec/art_spec.rb

@@ -0,0 +1,56 @@
+require "spec_helper"
+
+describe Vamp::Art do
+  it "has a vampire" do
+    expect(subject::VAMPIRE).not_to be nil
+    puts "\n#{subject::VAMPIRE}"
+  end
+  it "has a colorful hobgoblin" do
+    expect(subject::HOBGOBLIN_COLOR).not_to be nil
+    puts "\n#{subject::HOBGOBLIN_COLOR}"
+  end
+  it "has a hobgoblin" do
+    expect(subject::HOBGOBLIN).not_to be nil
+    puts "\n#{subject::HOBGOBLIN}"
+  end
+  it "has a colorful shark" do
+    expect(subject::SHARK_COLOR).not_to be nil
+    puts "\n#{subject::SHARK_COLOR}"
+  end
+  it "has a shark" do
+    expect(subject::SHARK).not_to be nil
+    puts "\n#{subject::SHARK}"
+  end
+  it "has a colorful skull" do
+    expect(subject::SKULL_COLOR).not_to be nil
+    puts "\n#{subject::SKULL_COLOR}"
+  end
+  it "has a skull" do
+    expect(subject::SKULL).not_to be nil
+    puts "\n#{subject::SKULL}"
+  end
+  it "has a colorful lizard" do
+    expect(subject::LIZARD_COLOR).not_to be nil
+    puts "\n#{subject::LIZARD_COLOR}"
+  end
+  it "has a lizard" do
+    expect(subject::LIZARD).not_to be nil
+    puts "\n#{subject::LIZARD}"
+  end
+  it "has a colorful dragon" do
+    expect(subject::DRAGON_COLOR).not_to be nil
+    puts "\n#{subject::DRAGON_COLOR}"
+  end
+  it "has a dragon" do
+    expect(subject::DRAGON).not_to be nil
+    puts "\n#{subject::DRAGON}"
+  end
+  it "has a running man" do
+    expect(subject::RUNNING).not_to be nil
+    puts "\n#{subject::RUNNING}"
+  end
+  it "has a declaring woman" do
+    expect(subject::DECLARING).not_to be nil
+    puts "\n#{subject::DECLARING}"
+  end
+end