lacci 0.2.1 → 0.3.0

data/examples/legacy/not_checked/shoes-contrib/elements/common-styles.rb

@@ -1,13 +0,0 @@
-Shoes.app do
-  stack do
-    # background, text and a button: both are elements!
-    @back = background blue
-    @text = banner "This quick brown fox"
-    @press = button "Jumps over the lazy dog"
-
-    # And so, both can be styled.
-    @text.style :size => 24, :stroke => red, :margin => 10
-    @press.style :width => 400
-    @back.style :height => 10
-  end
-end

data/examples/legacy/not_checked/shoes-contrib/elements/displace-animation.rb

@@ -1,13 +0,0 @@
-Shoes.app do
-  flow :margin => 12 do
-    # Set up three buttons
-    button "One"
-    @two = button "Two"
-    button "Three"
-
-    # Bounce the second butotn
-    animate do |i|
-      @two.displace(0, (Math.sin(i) * 6).to_i)
-    end
-  end
-end

data/examples/legacy/not_checked/shoes-contrib/elements/edit_box-character-count.rb

@@ -1,7 +0,0 @@
-Shoes.app do
-  edit_box do |e|
-    @counter.text = e.text.size
-  end
-  @counter = strong("0")
-  para @counter, " characters"
-end

data/examples/legacy/not_checked/shoes-contrib/elements/edit_line-character-count.rb

@@ -1,7 +0,0 @@
-Shoes.app do
-  edit_line do |e|
-    @counter.text = e.text.size
-  end
-  @counter = strong("0")
-  para @counter, " characters"
-end

data/examples/legacy/not_checked/shoes-contrib/elements/image-icon.rb

@@ -1,3 +0,0 @@
-Shoes.app do
-  image "http://shoesrb.com/images/shoes-icon.png"
-end

data/examples/legacy/not_checked/shoes-contrib/elements/list_box-select-class.rb

@@ -1,13 +0,0 @@
-Shoes.app do
-  para "Choose your class:"
-  list_box :items => ["Wizard", "Warrior", "Rogue"],
-    :width => 120, :choose => "Rogue" do |list|
-      if list.text == "Wizard"
-        @player.text = "I put on my robe and wizard hat."
-      else
-        @player.text = list.text
-      end 
-  end
-
-  @player = para "No class selected."
-end

data/examples/legacy/not_checked/shoes-contrib/elements/list_box.rb

@@ -1,6 +0,0 @@
-Shoes.app do
-  stack :margin => 10 do
-    para "Pick a card:"
-    list_box :items => ["Jack", "Ace", "Joker"]
-  end
-end

data/examples/legacy/not_checked/shoes-contrib/elements/move-flow-animate.rb

@@ -1,13 +0,0 @@
-Shoes.app do
-  flow :margin => 12 do
-    # Set up three buttons
-    button "One"
-    @two = button "Two"
-    button "Three"
-
-    # Bounce the second button
-    animate do |i|
-      @two.move(40, 40 + (Math.sin(i) * 6).to_i)
-    end
-  end
-end

data/examples/legacy/not_checked/shoes-contrib/elements/phat-button.rb

@@ -1,7 +0,0 @@
-Shoes.app do
-  # A button which takes up the whole page
-  @b = button "WAT DO", :width => 1.0, :height => 1.0
-
-  # When clicked, show the styles
-  @b.click { alert(@b.style.inspect) }
-end

data/examples/legacy/not_checked/shoes-contrib/elements/popup.rb

@@ -1,7 +0,0 @@
-Shoes.app :title => "The Owner" do
-  button "Pop up?" do
-    window do
-      para "Okay, popped up from #{owner}"
-    end
-  end
-end

data/examples/legacy/not_checked/shoes-contrib/elements/progress-bar.rb

@@ -1,10 +0,0 @@
-Shoes.app do
-  stack :margin => 0.1 do
-    title "Progress example"
-    @p = progress :width => 1.0
-
-    animate do |i|
-      @p.fraction = (i % 100) / 100.0
-    end
-  end
-end

data/examples/legacy/not_checked/shoes-contrib/elements/radio-dreamcast-favs.rb

@@ -1,17 +0,0 @@
-Shoes.app do
-  stack do
-    para "Among these dreamcast games, which do you prefer?"
-    flow do
-      radio :dreamcast
-      para "Shenmue"
-    end
-    flow do
-      radio :dreamcast
-      para "Phantasy Star Online"
-    end
-    flow do
-      radio :dreamcast
-      para "Marvel Vs. Capcom II"
-    end
-  end
-end

data/examples/legacy/not_checked/shoes-contrib/elements/timer.rb

@@ -1,6 +0,0 @@
-Shoes.app do
-  timer(5) do
-    alert("Your five seconds are up.")
-  end
-end
-

data/examples/legacy/not_checked/shoes-contrib/elements/width-introspec.rb

@@ -1,8 +0,0 @@
-Shoes.app do
-  stack :width => 120 do
-    @b = button "Click me", :width => "100%" do
-      alert "button.width = #{@b.width}\n" +
-        "button.style[:width] = #{@b.style[:width]}"
-    end
-  end
-end

data/examples/legacy/not_checked/shoes-contrib/events/background-hover.rb

@@ -1,11 +0,0 @@
-Shoes.app do
-  s = stack :width => 200, :height => 200 do
-    background red
-    hover do
-      s.clear { background indigo }
-    end
-    leave do
-      s.clear { background red }
-    end
-  end
-end

data/examples/legacy/not_checked/shoes-contrib/events/motion-detect.rb

@@ -1,9 +0,0 @@
-Shoes.app :width => 200, :height => 200 do
-  background black
-  fill white
-  @circ = oval 0, 0, 100, 100
-
-  motion do |top, left|
-    @circ.move top - 50, left -50
-  end
-end

data/examples/legacy/not_checked/shoes-contrib/events/pressed-key.rb

@@ -1,6 +0,0 @@
-Shoes.app do
-  @info = para "NO KEY is PRESSED."
-  keypress do |k|
-    @info.replace "#{k.inspect} was PRESSED."
-  end
-end

data/examples/legacy/not_checked/shoes-contrib/expert/expert-funnies.rb

@@ -1,51 +0,0 @@
-require 'hpricot'
-
-class Comic
-  attr_reader :rss, :title
-
-  def initialize(body)
-    @rss = Hpricot.XML(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://feedproxy.google.com/DilbertDailyStrip?format=xml",
-    "http://www.smbc-comics.com/rss.php",
-    "http://www.daybydaycartoon.com/index.xml",
-    "http://www.questionablecontent.net/QCRSS.xml",
-    "http://indexed.blogspot.com/feeds/posts/default?alt=rss"
-    ]
-
-  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|
-        stack :width => "100%", :margin => 10, :border => 1 do
-          c = Comic.new dl.response.body
-          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

data/examples/legacy/not_checked/shoes-contrib/expert/expert-irb.rb

@@ -1,112 +0,0 @@
-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
-    unless l = lex
-      raise Empty if @line == ''
-    else
-      case l.strip
-      when "reset"
-        @line = ""
-      when "time"
-        @line = "puts %{You started \#{IRBalike.started.since} ago.}"
-      else
-        @line << l << "\n"
-        if @ltype or @continue or @indent > 0
-          raise Continue
-        end
-      end
-    end
-    unless @line.empty?
-      obj = eval @line, TOPLEVEL_BINDING, "(irb)", @line_no
-    end
-    @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
-    case e when Empty, Continue
-    else @line = ""
-    end
-    raise e
-  ensure
-    set_input(StringIO.new)
-  end
-
-end
-
-CURSOR = ">>"
-IRBalike = MimickIRB.new
-$stdout = StringIO.new
-
-Shoes.app do
-  @str, @cmd = [CURSOR + " "], ""
-  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
-      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 += self.clipboard
-    end
-    @console.replace *(@str + [@cmd])
-    @scroll.scroll_top = @scroll.scroll_max
-  end
-end

data/examples/legacy/not_checked/shoes-contrib/expert/expert-othello.rb

@@ -1,319 +0,0 @@
-# Othello
-# by tieg
-# 1/13/08
-# with help: DeeJay, Ryan M. from mailing list
-#
-# FIXME bug if it memorizes it but it's not a valid move
-#
-module Othello
-
-  PIECE_WIDTH  = 62
-  PIECE_HEIGHT = 62
-  TOP_OFFSET = 47
-  LEFT_OFFSET = 12
-
-  class Game
-    BOARD_SIZE = [8,8]
-
-    attr_accessor :p1, :p2, :board, :board_history
-        
-    def initialize
-      @board_history = []
-      @p1            = Player.new(:black, pieces_per_player)
-      @p2            = Player.new(:white, pieces_per_player)
-      @board         = new_board
-      lay_initial_pieces
-    end
-
-    def next_turn(check_available_moves=true)
-      @current_player = next_player
-      if check_available_moves && skip_turn?
-        # FIXME Possible infinite loop if neither player has a good move?
-        next_turn
-        raise "Player #{@current_player.piece} (#{@current_player.color}) has no available moves. Player #{next_player.piece}'s (#{next_player.color}) turn."
-      end
-    end
-
-    def current_player
-      @current_player ||= @p1
-    end
-
-    def next_player
-      current_player == @p1 ? @p2 : @p1
-    end
-
-    # Build the array for the board, with zero-based arrays.
-    def new_board
-      Array.new(BOARD_SIZE[0]) do # build each cols L to R
-        Array.new(BOARD_SIZE[1]) do # insert cells in each col
-          0
-        end
-      end
-    end
-    
-    # Lay the initial 4 pieces in the middle
-    def lay_initial_pieces
-      lay_piece([4, 3], false)
-      next_turn(false)
-      lay_piece([3, 3], false)
-      next_turn(false)
-      lay_piece([3, 4], false)
-      next_turn(false)
-      lay_piece([4, 4], false)
-      next_turn(false)
-    end
-    
-    def lay_piece(c=[0,0], check_adjacent_pieces=true)
-      memorize_board
-      piece = current_player.piece
-      opp_piece = current_player.opp_piece
-      raise "Spot already taken." if board_at(c) != 0
-      if check_adjacent_pieces
-        pieces_to_change = []
-        pieces_to_change << check_direction(c, [ 0, 1], piece, opp_piece) # N
-        pieces_to_change << check_direction(c, [ 1, 1], piece, opp_piece) # NE
-        pieces_to_change << check_direction(c, [ 1, 0], piece, opp_piece) # E
-        pieces_to_change << check_direction(c, [ 1,-1], piece, opp_piece) # SE
-        pieces_to_change << check_direction(c, [ 0,-1], piece, opp_piece) # S
-        pieces_to_change << check_direction(c, [-1,-1], piece, opp_piece) # SW
-        pieces_to_change << check_direction(c, [-1, 0], piece, opp_piece) # W
-        pieces_to_change << check_direction(c, [-1, 1], piece, opp_piece) # NW
-        raise "You must move to a spot that will turn your opponent's piece." if pieces_to_change.compact.all? { |a| a.empty? }
-        pieces_to_change.compact.each { |direction| direction.each { |i| @board[i[0]][i[1]] = piece } }
-      end
-      current_player.pieces -= 1
-      @board[c[0]][c[1]] = piece
-      current_winner = calculate_current_winner
-      raise "Game over. Player #{current_winner.piece} wins with #{current_winner.pieces_on_board} pieces!" if @p1.pieces + @p2.pieces == 0
-    end
-    
-    def skip_turn?
-      possibles = []
-      @board.each_with_index { |col,col_index| 
-        col.each_with_index { |cell,row_index| 
-          return false if possible_move?([col_index,row_index])
-        } 
-      }
-      true
-    end
-    
-    def possible_move?(c=[0,0])
-      return nil if board_at(c) != 0
-      possible_moves = []
-      piece = current_player.piece
-      opp_piece = current_player.opp_piece
-      pieces_to_change = []
-      pieces_to_change << check_direction(c, [ 0, 1], piece, opp_piece) # N
-      pieces_to_change << check_direction(c, [ 1, 1], piece, opp_piece) # NE
-      pieces_to_change << check_direction(c, [ 1, 0], piece, opp_piece) # E
-      pieces_to_change << check_direction(c, [ 1,-1], piece, opp_piece) # SE
-      pieces_to_change << check_direction(c, [ 0,-1], piece, opp_piece) # S
-      pieces_to_change << check_direction(c, [-1,-1], piece, opp_piece) # SW
-      pieces_to_change << check_direction(c, [-1, 0], piece, opp_piece) # W
-      pieces_to_change << check_direction(c, [-1, 1], piece, opp_piece) # NW
-      return nil if pieces_to_change.compact.all? { |a| a.empty? }
-      true
-    end
-    
-    def memorize_board
-      dup_board = new_board
-      dup_board = []
-      @board.each do |col|
-        dup_board << col.dup
-      end
-      @board_history << { :player => current_player, :board => dup_board }
-    end
-
-    def undo!
-      last_move = @board_history.pop
-      @board = last_move[:board]
-      @current_player = last_move[:player]
-      @current_player.pieces += 1
-    end
-
-    def calculate_current_winner
-      @p1.pieces_on_board, @p2.pieces_on_board = 0, 0
-      @board.each { |row| 
-        row.each { |cell|
-          if cell == 1
-            @p1.pieces_on_board += 1
-          else 
-            @p2.pieces_on_board += 1
-          end
-        }
-      }
-      @p1.pieces_on_board > @p2.pieces_on_board ? @p1 : @p2
-    end
-
-    def check_direction(c, dir, piece, opp_piece)
-      c_adjacent = next_in_direction(c.dup, dir)
-      c_last = nil
-      pieces_in_between = []
-      # Find the last piece if there is one.
-      while(valid_location?(c_adjacent))
-        if board_at(c_adjacent) == opp_piece
-          pieces_in_between << c_adjacent.dup
-        elsif board_at(c_adjacent) == piece && pieces_in_between.size > 0
-          c_last = c_adjacent
-          break
-        else
-          break
-        end
-        c_adjacent = next_in_direction(c_adjacent, dir)
-      end
-
-      pieces_in_between.empty? || c_last.nil? ? nil : pieces_in_between
-    end
-    
-    # Find the value of the board at the given coordinate.
-    def board_at(c)
-      @board[c[0]][c[1]]
-    end
-
-    # Is this a valid location on board?
-    def valid_location?(c=[1,1])
-      c[0] >= 0 && c[1] >= 0 && c[0] < BOARD_SIZE[0] && c[1] < BOARD_SIZE[1]
-    end
-
-    # Perform the operations to get the next spot in the appropriate direction
-    def next_in_direction(c, dir)
-      c[0] += dir[0]
-      c[1] += dir[1]
-      c
-    end
-
-    private
-    def pieces_per_player
-      total_squares / 2
-    end
-    
-    # The total number of squares
-    def total_squares
-      BOARD_SIZE[0] * BOARD_SIZE[1]
-    end
-
-    class Player
-      attr_accessor :pieces, :color, :pieces_on_board
-
-      def initialize(color=:black,pieces=0)
-        @pieces = pieces
-        @pieces_on_board = 0 # used only in calculating winner
-        @color = color
-      end
-      
-      def piece
-        color == :black ? 1 : 2
-      end
-      
-      def opp_piece
-        color == :black ? 2 : 1
-      end
-    end 
-  end
-
-  def draw_player_1(first_turn=false)
-    stack :margin => 10 do
-      if GAME.current_player==GAME.p1
-        background yellow
-        para span("Player 1 (#{GAME.current_player.color}) turn", :stroke => black, :font => "Trebuchet 20px bold"), :margin => 4
-      else
-        background white
-        para span("Player 1", :stroke => black, :font => "Trebuchet 10px bold"), :margin => 4
-
-        button("Undo last move", :top => 0, :left => -150) { GAME.undo!; draw_board } unless GAME.board_history.empty?
-      end
-    end
-  end
-
-  def draw_player_2(first_turn=false)
-    stack :top => 550, :left => 0, :margin => 10 do
-      if GAME.current_player==GAME.p2 
-        background yellow
-        para span("Player 2's (#{GAME.current_player.color}) turn", :stroke => black, :font => "Trebuchet 20px bold"), :margin => 4
-      else
-        background white
-        para span("Player 2", :stroke => black, :font => "Trebuchet 10px bold"), :margin => 4
-
-        button("Undo last move", :top => 0, :left => -150) { GAME.undo!; draw_board } unless GAME.board_history.empty?
-      end
-    end
-  end
-
-
-  def draw_board
-    clear do
-      background black
-      draw_player_1
-      stack :margin => 10 do
-        fill rgb(0, 190, 0)
-        rect :left => 0, :top => 0, :width => 495, :height => 495
-
-        GAME.board.each_with_index do |col, col_index|
-          col.each_with_index do |cell, row_index|
-            left, top = left_top_corner_of_piece(col_index, row_index)
-            left = left - LEFT_OFFSET
-            top = top - TOP_OFFSET
-            fill rgb(0, 440, 0, 90)
-            strokewidth 1
-            stroke rgb(0, 100, 0)
-            rect :left => left, :top => top, :width => PIECE_WIDTH, :height => PIECE_HEIGHT
-
-            if cell != 0
-              strokewidth 0
-              fill (cell == 1 ? rgb(100,100,100) : rgb(155,155,155))
-              oval(left+3, top+4, PIECE_WIDTH-10, PIECE_HEIGHT-10)
-
-              fill (cell == 1 ? black : white)
-              oval(left+5, top+5, PIECE_WIDTH-10, PIECE_HEIGHT-10)
-            end
-          end
-        end
-      end
-      draw_player_2
-    end
-  end
-
-  def left_top_corner_of_piece(a,b)
-    [(a*PIECE_WIDTH+LEFT_OFFSET), (b*PIECE_HEIGHT+TOP_OFFSET)]
-  end
-
-  def right_bottom_corner_of_piece(a,b)
-    left_top_corner_of_piece(a,b).map { |coord| coord + PIECE_WIDTH }
-  end
-
-  def find_piece(x,y)
-    GAME.board.each_with_index { |row_array, row| 
-      row_array.each_with_index { |col_array, col| 
-        left, top = left_top_corner_of_piece(col, row).map { |i| i - 5}
-        right, bottom = right_bottom_corner_of_piece(col, row).map { |i| i -5 }
-        return [col, row] if x >= left && x <= right && y >= top && y <= bottom
-      } 
-    }
-    return false
-  end
-
-  GAME = Othello::Game.new
-end
-
-
-Shoes.app :width => 520, :height => 600 do
-  extend Othello
-
-  draw_board
-  
-  click { |button, x, y| 
-    if coords = find_piece(x,y)
-      begin
-        GAME.lay_piece(coords)
-        GAME.next_turn
-        draw_board
-      rescue => e
-        draw_board
-        alert(e.message)
-      end
-    else
-      # alert("Not a piece.")
-    end
-  }
-end
-