shoes 4.0.0.pre11 → 4.0.0.pre12

data/samples/class_book.rb

@@ -0,0 +1,46 @@
+# frozen_string_literal: true
+require 'yaml'
+
+class Book < Shoes
+  url '/', :index
+  url '/incidents/(\d+)', :incident
+
+  def index
+    incident 0
+  end
+
+  INCIDENTS = YAML.load_file File.expand_path(File.join(__FILE__, '../class-book.yaml'))
+
+  def table_of_contents
+    toc = []
+    INCIDENTS.each_with_index do |(title, _story), i|
+      toc.push "(#{i + 1}) ",
+               link(title) { visit "/incidents/#{i}" },
+               " / "
+    end
+    toc[0...-1] << "\n" * 5
+  end
+
+  def incident(num)
+    self.scroll_top = 0
+    num = num.to_i
+    stack margin_left: 200 do
+      banner "Incident", margin: [0, 10, 0, 30]
+      para strong("No. #{num + 1}: #{INCIDENTS[num][0]}"), margin_bottom: 5
+    end
+
+    flow do
+      flow width: 180, margin_left: 10 do
+        para(*table_of_contents, size: 8)
+      end
+
+      stack width: width - 180, margin: [20, 0, 10, 0] do
+        INCIDENTS[num][1].split(/\n\n+/).each do |p|
+          para p
+        end
+      end
+    end
+  end
+end
+
+Shoes.app width: 640, height: 700, title: "Incidents, a Book"

data/samples/expert_definr.rb

@@ -0,0 +1,24 @@
+# frozen_string_literal: true
+Shoes.app title: "Dictionary, powered by Definr", width: 370, height: 320 do
+  stack do
+    background red, height: 60
+    flow margin: 20 do
+      caption "Define: ", stroke: white
+      @lookup = edit_line
+      button "Go" do
+        download "http://definr.com/definr/show/#{@lookup.text}" do |dl|
+          doc = dl.response.body.gsub(' ', ' ')
+                  .gsub(%r{(</a>|<br />|<a href.+?>)}, '')
+                  .gsub(%r{\(http://.+?\)}, '').strip
+          title, doc = doc.split(/\n+/, 2)
+          @deft.replace title
+          @defn.replace doc
+        end
+      end
+    end
+    stack margin: 20 do
+      @deft = subtitle "", margin: 10
+      @defn = para ""
+    end
+  end
+end

data/samples/expert_funnies.rb

@@ -0,0 +1,60 @@
+# frozen_string_literal: true
+# This example tries Nokogiri (used in Shoes 4), but falls back to
+# Hpricot for Shoes 3 compatibility
+begin
+  require 'nokogiri'
+rescue LoadError
+  require 'hpricot'
+end
+
+class Comic
+  attr_reader :rss, :title
+
+  def initialize(body)
+    @rss = defined?(Nokogiri) ? Nokogiri::XML(body) : Hpricot(body)
+    @title = @rss.at("//channel/title").inner_text
+  end
+
+  def items
+    @rss.search("//channel/item")
+  end
+
+  def latest_image
+    @rss.search("//channel/item").first.inner_html.scan(/src="([^"]+\.\w+)"/).first
+  end
+end
+
+Shoes.app width: 800, height: 600 do
+  background "#555"
+
+  @title = "Web Funnies"
+  @feeds = [
+    "http://xkcd.com/rss.xml",
+    "http://www.smbc-comics.com/rss.php",
+    "http://www.daybydaycartoon.com/feed/",
+    "http://www.questionablecontent.net/QCRSS.xml",
+    "http://thisisindexed.com/feed/",
+  ]
+
+  stack margin: 10 do
+    title strong(@title), align: "center", stroke: "#DFA", margin: 0
+    para "(loaded from RSS feeds)", align: "center", stroke: "#DFA", margin: 0
+
+    @feeds.each do |feed|
+      download feed do |dl|
+        # Fall back to Shoes 3 syntax if necessary
+        body = dl.respond_to?(:read) ? dl.read : dl.response.body
+        c = Comic.new body
+        if c.latest_image
+          stack width: "100%", margin: 10, border: 1 do
+            stack margin_right: gutter do
+              background "#333", curve: 4
+              caption c.title, stroke: "#CD9", margin: 4
+            end
+            image c.latest_image.first, margin: 8
+          end
+        end
+      end
+    end
+  end
+end

data/samples/expert_game_of_life.rb

@@ -0,0 +1,224 @@
+# frozen_string_literal: true
+# Simple Game of Life with Shoes
+# by fuksito
+# vitaliy@yanchuk.me
+
+class Cell
+  WIDTH = 15
+  attr_accessor :live, :next_state, :y, :x, :neighbours, :live_neighbours, :app, :shoes_cell
+
+  def initialize(y, x, app, world)
+    @live = false
+    @next_state = false
+    @y = y
+    @x = x
+    @app = app
+    @world = world
+    @shoes_cell = @app.rect(left: WIDTH * y, top: WIDTH * x, width: WIDTH)
+    @shoes_cell.click { toggle_state }
+  end
+
+  def live?
+    @live
+  end
+
+  def dead?
+    !@live
+  end
+
+  def die!
+    @next_state = false
+    @world.changed_cells.push(self)
+  end
+
+  def alive!
+    @next_state = true
+    @world.changed_cells.push(self)
+  end
+
+  def toggle_state
+    @next_state = !@live
+    set_next_state
+    draw
+  end
+
+  def set_next_state
+    @live = @next_state
+    if @live
+      @world.live_cells.push(self)
+    else
+      cell_index = @world.live_cells.index(self)
+      @world.live_cells.delete_at(cell_index) if cell_index
+    end
+  end
+
+  def draw
+    @shoes_cell.style(fill: live? ? '#000' : '#fff')
+  end
+
+  def iterate
+    live_cells_count = @neighbours.count(&:live?)
+    if live? && live_cells_count < 2 || live_cells_count > 3
+      die!
+    elsif live_cells_count == 3
+      alive!
+    end
+  end
+end
+
+class World
+  attr_accessor :board, :width, :height, :live_cells, :changed_cells
+
+  def initialize(width, height, app)
+    @board = []
+    @width = width
+    @height = height
+    @app = app
+    @live_cells = []
+    @changed_cells = []
+    create_board
+  end
+
+  def create_board
+    @height.times do |y|
+      @board[y] = []
+      @width.times do |x|
+        @board[y][x] = Cell.new(y, x, @app, self)
+      end
+    end
+    cells.each do |cell|
+      cell.neighbours = cell_neighbours(cell.y, cell.x)
+    end
+    draw
+  end
+
+  def cells
+    @cells ||= @board.flatten
+  end
+
+  def actual_cells
+    (@live_cells.map(&:neighbours).flatten + @live_cells).uniq
+  end
+
+  def draw
+    cells.each(&:draw)
+  end
+
+  def tick
+    @changed_cells = []
+    actual_cells.each(&:iterate).each(&:set_next_state)
+    @changed_cells.each(&:draw)
+  end
+
+  def clear
+    live_cells.each do |cell|
+      cell.live = false
+      cell.next_state = false
+      cell.draw
+    end
+  end
+
+  def cell_neighbours(y, x)
+    result = []
+    top_row = y - 1
+    left_col = x - 1
+    right_col = x + 1
+    bottom_row = y + 1
+
+    result << @board[y - 1][x - 1] if top_row >= 0 && left_col >= 0
+
+    result << @board[y - 1][x] if top_row >= 0
+
+    result << @board[y - 1][x + 1] if top_row >= 0 && right_col < @width
+
+    result << @board[y][x - 1] if left_col >= 0
+
+    result << @board[y][x + 1] if right_col < @width
+
+    result << @board[y + 1][x - 1] if bottom_row < @height && left_col >= 0
+
+    result << @board[y + 1][x] if bottom_row < @height
+
+    result << @board[y + 1][x + 1] if bottom_row < @height && right_col < @width
+
+    result.compact
+  end
+
+  def add_species(*cells)
+    cells.each do |y, x|
+      @board[y][x].toggle_state
+    end
+  end
+
+  def add_glider
+    add_species [4, 2], [4, 3], [4, 4], [3, 4], [2, 3]
+  end
+
+  def add_spaceship
+    add_species [12, 3], [12, 6], [13, 7], [14, 3], [14, 7], [15, 4], [15, 5], [15, 6], [15, 7]
+  end
+
+  def add_diehard
+    add_species [18, 12], [12, 13], [13, 13], [13, 14], [17, 14], [18, 14], [19, 14]
+  end
+end
+
+Shoes.app(title: "The Game of Life", width: 800, height: 620, resizable: false) do
+  background white
+  @running = false
+  stack(margin: 10) do
+    @new_world = World.new(40, 40, self)
+    animate(10) do
+      @new_world.tick if @running
+    end
+  end
+
+  def run
+    @running = true
+    @run_stop_button.text = 'Stop'
+  end
+
+  def stop
+    @running = false
+    @run_stop_button.text = 'Run'
+  end
+
+  def toggle_run_stop
+    if @running
+      stop
+    else
+      run
+    end
+  end
+
+  def clear
+    stop
+    @new_world.clear
+  end
+
+  flow(displace_left: 650) do
+    @run_stop_button = button('Run', displace_top: 0, width: 100) { toggle_run_stop }
+  end
+
+  stack(displace_left: 650) do
+    button('Clear', width: 100) do
+      clear
+    end
+
+    para "Species"
+    button('Glider', width: 100) do
+      clear
+      @new_world.add_glider
+    end
+
+    button('Spaceship', width: 100) do
+      clear
+      @new_world.add_spaceship
+    end
+
+    button('Diehard', width: 100) do
+      clear
+      @new_world.add_diehard
+    end
+  end
+end

data/samples/expert_irb.rb

@@ -0,0 +1,109 @@
+# frozen_string_literal: true
+require 'irb/ruby-lex'
+require 'stringio'
+
+class MimickIRB < RubyLex
+  attr_accessor :started
+
+  class Continue < StandardError; end
+  class Empty < StandardError; end
+
+  def initialize
+    super
+    set_input(StringIO.new)
+  end
+
+  def run(str)
+    obj = nil
+    @io << str
+    @io.rewind
+    l = lex
+    if l
+      case l.strip
+      when "reset"
+        @line = ""
+      when "time"
+        @line = "puts %{You started \#{IRBalike.started.since} ago.}"
+      else
+        @line = @line + l + "\n"
+        raise Continue if @ltype || @continue || @indent.positive?
+      end
+    elsif @line == ''
+      raise Empty
+    end
+    obj = eval @line, TOPLEVEL_BINDING, "(irb)", @line_no unless @line.empty?
+    @line_no += @line.scan(/\n/).length
+    @line = ''
+    @exp_line_no = @line_no
+
+    @indent = 0
+    @indent_stack = []
+
+    $stdout.rewind
+    output = $stdout.read
+    $stdout.truncate(0)
+    $stdout.rewind
+    [output, obj]
+  rescue Object => e
+    @line = "" unless e.is_a?(Empty) || e.is_a?(Continue)
+    raise e
+  ensure
+    set_input(StringIO.new)
+  end
+end
+
+CURSOR = ">>"
+IRBalike = MimickIRB.new
+$stdout = StringIO.new
+
+Shoes.app do
+  @str = [CURSOR + " "]
+  @cmd = ""
+  stack width: 1.0, height: 1.0 do
+    background "#555"
+    stack width: 1.0, height: 50 do
+      para "Interactive Ruby ready.", fill: white, stroke: red
+    end
+    @scroll =
+      stack width: 1.0, height: -50, scroll: true do
+        background "#555"
+        @console = para(*@str, font: "Monospace 12px", stroke: "#dfa")
+        @console.cursor = -1
+      end
+  end
+  keypress do |k|
+    case k
+    when "\n"
+      begin
+        out, obj = IRBalike.run(@cmd + ';')
+        @str += ["#{@cmd}\n",
+                 span("#{out}=> #{obj.inspect}\n", stroke: "#fda"),
+                 "#{CURSOR} "]
+        @cmd = ""
+      rescue MimickIRB::Empty
+        @cmd = ""
+      rescue MimickIRB::Continue
+        @str += ["#{@cmd}\n.. "]
+        @cmd = ""
+      rescue Object => e
+        @str += ["#{@cmd}\n", span("#{e.class}: #{e.message}\n", stroke: "#fcf"),
+                 "#{CURSOR} "]
+        @cmd = ""
+      end
+    when String
+      @cmd += k
+    when :backspace
+      @cmd.slice!(-1)
+    when :tab
+      @cmd += "  "
+    when :alt_q
+      quit
+    when :alt_c
+      self.clipboard = @cmd
+    when :alt_v
+      @cmd += clipboard
+    end
+    @console.replace(*(@str + [@cmd]))
+    @scroll.scroll_top = @scroll.scroll_max
+  end
+end