lacci 0.2.1 → 0.3.0

data/examples/legacy/not_checked/simple/accordion.rb

@@ -1,81 +0,0 @@
-# encoding: UTF-8
-module Accordion
-  def open_page stack
-    active = app.slot.contents.map { |x| x.contents[1] }.
-      detect { |x| x.height > 0 }
-    return if active == stack
-    a = animate 60 do
-      stack.height += 20
-      active.height = 240 - stack.height if active
-      a.stop if stack.height == 240
-    end
-  end
-  def page title, text
-    @pages ||= []
-    @pages <<
-      stack do
-        page_text = nil
-        stack :width => "100%" do
-          background "#fff".."#eed"
-          hi = background "#ddd".."#ba9", :hidden => true
-          para link(title) {}, :size => 26
-          hover { hi.show }
-          leave { hi.hide }
-          click { open_page page_text }
-        end
-        page_text =
-          stack :width => "100%", :height => (@pages.empty? ? 240 : 0) do
-            stack :margin => 10 do
-              text.split(/\n{2,}/).each do |pg|
-                para pg
-              end
-            end
-          end
-      end
-  end
-end
-
-Shoes.app do
-  extend Accordion
-  if RUBY_VERSION == '1.9.1'
-    Shoes::Link = Link
-    Shoes::LinkHover = LinkHover
-  end
-  #style(Link,  :stroke => black, :underline => nil, :weight => "strong")
-  #style(LinkHover, :stroke => black, :fill => nil, :underline => nil)
-  style(Shoes::Link,  :stroke => black, :underline => nil, :weight => "strong")
-  style(Shoes::LinkHover, :stroke => black, :fill => nil, :underline => nil)
-  page "0.0", <<-'END'
-There is a thought
-I have just had
-Which I don’t care to pass to
-Anyone at all at this time.
-
-I have even forgotten it now,
-But kept only the pleasures
-Of my property
-And of my controlled mental slippage.
-END
-  page "0.1", <<-'END'
-My eyes have blinked again
-And I have just realized
-This upright world
-I have been in.
-
-My eyelids wipe
-My eyes hundreds of times
-Reseting and renovating
-The scenery.
-END
-  page "0.2", <<-'END'
-Sister, without you,
-The universe would
-Have such a hole through it,
-Where infinity has been shot.
-
-This cannot be, though.
-There will always be room
-For you—all of us are
-Holding the way open.
-END
-end

data/examples/legacy/not_checked/simple/anim-shapes.rb

@@ -1,17 +0,0 @@
-Shoes.app do
-  background rgb(0, 0, 0)
-  fill rgb(255, 255, 255)
-  rects = [
-    rect(0, 0, 50, 50),
-    rect(0, 0, 100, 100),
-    rect(0, 0, 75, 75)
-  ] 
-  animate(24) do |i|
-    rects.each do |r|
-      r.move((0..400).rand, (0..400).rand)
-    end
-  end
-  button "OK", :top => 0.5, :left => 0.5 do
-    Shoes.quit unless confirm "You ARE sure you're OK??"
-  end
-end

data/examples/legacy/not_checked/simple/anim-text.rb

@@ -1,13 +0,0 @@
-Shoes.app do
-  stack :top => 0.5, :left => 0.5 do
-    para "Counting up:"
-    l = para "0"
-    animate(24) do |i|
-      f = ['Arial 14px', 'Serif 34px', 'Monospace 18px', 'Arial 48px'][rand(3)]
-      l.replace "#{i}", :font => f
-    end
-    motion do |x, y|
-      Shoes.p [x, y]
-    end
-  end
-end

data/examples/legacy/not_checked/simple/arc.rb

@@ -1,23 +0,0 @@
-#
-# a translation from a processing example
-# http://vormplus.be/weging/an-introduction-to-processing/
-#
-Shoes.app :width => 420, :height => 420, :resizable => false do
-  rotation = -(Shoes::HALF_PI / 3)
-  step = 20 
-
-  background gray(240)
-  stroke gray(127)
-  cap :curve
-  nofill
-
-  10.times do |i|
-    strokewidth i
-    size = 200 + (step * i)
-    shape do
-      arc self.width / 2, self.height / 2,
-          size, size,
-          rotation * i, rotation * i + Shoes::TWO_PI - Shoes::HALF_PI
-    end
-  end
-end

data/examples/legacy/not_checked/simple/bounce.rb

@@ -1,24 +0,0 @@
-xspeed, yspeed = 8.4, 6.6
-xdir, ydir = 1, 1
-
-Shoes.app do
-  background "#DFA"
-  border black, :strokewidth => 6
-
-  nostroke
-  @icon = image "#{DIR}/static/shoes-icon.png", :left => 100, :top => 100 do
-    alert "You're soooo quick."
-  end
-
-  x, y = self.width / 2, self.height / 2
-  size = @icon.size
-  animate(30) do
-    x += xspeed * xdir
-    y += yspeed * ydir
-    
-    xdir *= -1 if x > self.width - size[0] or x < 0
-    ydir *= -1 if y > self.height - size[1] or y < 0
-
-    @icon.move x.to_i, y.to_i
-  end
-end

data/examples/legacy/not_checked/simple/chipmunk.rb

@@ -1,26 +0,0 @@
-# simple-chipmunk.rb
-require 'shoes/chipmunk'
-
-Shoes.app title: 'A Tiny Chipmunk Physics Demo' do
-  extend ChipMunk
-  space = cp_space
-  balls = []
-  
-  nofill
-  cp_line 0, 180, 200, 280, stroke: gold
-  cp_line 200, 280, 300, 270, stroke: gold
-  cp_line 250, 350, 350, 330
-  cp_line 170, 370, 220, 380
-  cp_line 100, 450, 300, 430, stroke: lightslategray
-  cp_line 300, 430, 500, 450, stroke: lightslategray
-
-  nostroke
-  oval(10, 30, 40, fill: blue).click{balls << cp_oval(30, 50, 20, stroke: blue, strokewidth: 2)}
-  oval(70, 40, 20, fill: green).click{balls << cp_oval(80, 50, 10, fill: green)}
-  oval(105, 45, 10, fill: red).click{balls << cp_oval(110, 50, 5, fill: red)}
-  
-  every do
-    6.times{space.step 1.0/60}
-    balls.each{|ball| ball.cp_move}
-  end
-end

data/examples/legacy/not_checked/simple/control-sizes.rb

@@ -1,24 +0,0 @@
-Shoes.app :width => 360, :height => 600, :resizable => false do
-  stroke "#dde"
-  background "#f1f5ff"
-  13.times { |x| line 20, 142 + (30 * x), 320, 142 + (30 * x) }
-  11.times { |x| line 20 + (30 * x), 142, 20 + (30 * x), 502 }
-
-  stack :margin => 20 do
-    title "Control Sizes", :size => 16
-    para "This app measures various controls against a grid of lines, to be sure they size appropriately despite the platform."
-    stack :top => 122, :left => 30 do
-      button "Standard"
-      button "Margin: 2, Height: 30", :margin => 2, :height => 30
-      edit_line "Standard", :margin => 1
-      edit_line "Margin: 4, Height: 30", :height => 30, :margin => 4
-      list_box :items => ["Standard"], :choose => "Standard"
-      list_box :items => ["Margin: 4, Height: 32"],
-        :choose => "Margin: 4, Height: 32",
-        :height => 32, :margin => 4
-      progress
-      progress :height => 32, :margin => 4
-      edit_box
-    end
-  end
-end

data/examples/legacy/not_checked/simple/curve-control-points.rb

@@ -1,24 +0,0 @@
-# https://github.com/casparjones/First-Ruby-Steps/blob/master/shoes-samples/simple-curve.rb
-# http://www.cairographics.org/samples/curve_to/
-
-# curve_to with visible control points.
-# The ovals represent the control points.
-Shoes.app(title: "curve_to control points", width: 256, height: 256) do
-   x, y = 25.6, 128.0
-   x1 = 102.4; y1 = 230.4
-   x2 = 153.6; y2 = 25.6
-   x3 = 230.4; y3 = 128.0
-
-   fill green(0.2)
-   move_to x, y
-   oval(:left => x, :top => y, :radius => 10, :center => true)
-   oval(:left => x1, :top => y1, :radius => 10, :center => true)
-   oval(:left => x2, :top => y2, :radius => 10, :center => true)
-   oval(:left => x3, :top => y3, :radius => 10, :center => true)
-   
-   fill red(0.2)   
-   shape do
-      move_to x, y
-      curve_to x1, y1, x2, y2, x3, y3
-   end
-end

data/examples/legacy/not_checked/simple/curve.rb

@@ -1,26 +0,0 @@
-#
-# based on the cairo curve_to example
-# http://www.cairographics.org/samples/curve_to/
-#
-Shoes.app do  
-  x, y = 25.6, 128.0
-  x1 = 102.4; y1 = 230.4
-  x2 = 153.6; y2 = 25.6
-  x3 = 230.4; y3 = 128.0
-
-  nofill
-  strokewidth 10.0
-  shape do
-    move_to x, y
-    curve_to x1, y1, x2, y2, x3, y3
-  end
-
-  strokewidth 6.0
-  stroke rgb(1.0, 0.2, 0.2, 0.6)
-  shape do
-    move_to x, y
-    line_to x1, y1
-    move_to x2, y2
-    line_to x3, y3
-  end
-end

data/examples/legacy/not_checked/simple/dialogs.rb

@@ -1,29 +0,0 @@
-Shoes.app :width => 300, :height => 150, :margin => 10 do
-  def answer(v)
-    @answer.replace v.inspect
-  end
-
-  button "Ask" do
-    answer ask("What is your name?")
-  end
-  button "Confirm" do
-    answer confirm("Would you like to proceed?")
-  end
-  button "Open File..." do
-    answer ask_open_file
-  end
-  button "Save File..." do
-    answer ask_save_file
-  end
-  button "Open Folder..." do
-    answer ask_open_folder
-  end
-  button "Save Folder..." do
-    answer ask_save_folder
-  end
-  button "Color" do
-    answer ask_color("Pick a Color")
-  end
-
-  @answer = para "Answers appear here"
-end

data/examples/legacy/not_checked/simple/downloader.rb

@@ -1,40 +0,0 @@
-Shoes.app do
-  background "#eee"
-  @list = stack do
-    para "Enter a URL to download:", :margin => [10, 8, 10, 0]
-    flow :margin => 10 do
-      @url = edit_line :width => -120
-      @url.text ='http://walkabout.mvmanila.com/public/share/Ytm-2.exe'
-      st_time = 0
-      end_time = 0
-      totalsz = 0
-      button "Download", :width => 120 do
-        st_time = Time.now
-        @list.append do
-          stack do
-            background "#eee".."#ccd"
-            stack :margin => 10 do
-              dld = nil
-              para @url.text, " [", link("cancel") { @dld.abort }, "]", :margin => 0
-              d = inscription "Beginning transfer.", :margin => 0
-              p = progress :width => 1.0, :height => 14
-              @dld = download @url.text, :save => File.basename(@url.text),
-                :pause => 0.02,
-                :progress => proc { |dl| 
-                  d.text = "Transferred #{dl.transferred} of #{dl.length} bytes (#{dl.percent.to_s[0..6]}%)"
-                  p.fraction = dl.percent
-                 },
-                :finish => proc { |dl|
-                     end_time = Time.now
-                     secs = (end_time.to_i - st_time.to_i)
-                     kb = dl.length < 1024 ? 1: dl.length / 1024
-                     d.text = "Download completed KB/s: #{kb/secs} seconds:#{secs}"
-                  }
-              para "Should appear after button press"
-            end
-          end
-        end
-      end
-    end
-  end
-end

data/examples/legacy/not_checked/simple/downloader1.rb

@@ -1,31 +0,0 @@
-Shoes.app do
-  background "#eee"
-  @list = stack do
-    para "Enter a URL to download:", :margin => [10, 8, 10, 0]
-    flow :margin => 10 do
-      @url = edit_line :width => -120
-      @url.text ='http://shoes.mvmanila.com'
-      button "Download", :width => 120 do
-        @list.append do
-          stack do
-            background "#eee".."#ccd"
-            stack :margin => 10 do
-              dld = nil
-              download @url.text do |r| 
-                para "Status: #{r.response.status}\nHeaders:"
-                r.response.headers.each {|k,v| para "#{k}: #{v}\n"}
-                sz = r.response.body.size
-                para "Body size: #{sz}\n"
-                if sz > 0
-                  lines = r.response.body.split
-                  para "First: #{lines[0]}\n"
-                  para "Last:  #{lines[-1]}\n"
-                end
-              end
-            end
-          end
-        end
-      end
-    end
-  end
-end

data/examples/legacy/not_checked/simple/draw.rb

@@ -1,13 +0,0 @@
-Shoes.app do
-  background "#999"
-  stroke "#000"
-  x, y = nil, nil
-  motion do |_x, _y|
-    if x and y and (x != _x or y != _y)
-      append do
-        line x, y, _x, _y
-      end
-    end
-    x, y = _x, _y
-  end
-end

data/examples/legacy/not_checked/simple/editor.rb

@@ -1,28 +0,0 @@
-str, t = "", nil
-Shoes.app :height => 500, :width => 450 do
-  background rgb(77, 77, 77)
-  stack :margin => 10 do
-    para span("TEXT EDITOR", :stroke => red, :fill => white), " * USE ALT-Q TO QUIT", :stroke => white
-  end
-  stack :margin => 10 do
-    t = para "", :font => "Monospace 12px", :stroke => white
-    t.cursor = -1
-  end
-  keypress do |k|
-    case k
-    when String
-      str += k
-    when :backspace
-      str.slice!(-1)
-    when :tab
-      str += "  "
-    when :alt_q
-      Shoes.quit
-    when :alt_c
-      self.clipboard = str
-    when :alt_v
-      str += self.clipboard
-    end
-    t.replace str
-  end
-end

data/examples/legacy/not_checked/simple/form.rb

@@ -1,30 +0,0 @@
-Shoes.app :width => 320, :height => 420 do
-  background "../static/menu-gray.png"
-  background "../static/menu-top.png", :height => 50
-  background "../static/menu-left.png", :top => 50, :width => 55
-  background "../static/menu-right.png", :right => 0, :top => 50, :width => 55
-  image "../static/menu-corner1.png", :top => 0, :left => 0
-  # image "../static/menu-corner2.png", :right => 0, :top => 0
-  # list_box :items => ["Phyllis", "Ronald", "Wyatt"]
-  list_box(items: ["Phyllis", "Ronald", "Wyatt"])
-
-  stack :margin => 40 do
-    stack :margin => 10 do
-      para "Name"
-      @name = list_box :items => ["Phyllis", "Ronald", "Wyatt"]
-    end
-    stack :margin => 10 do
-      para "Address"
-      @address = edit_line
-    end
-    stack :margin => 10 do
-      para "Phone"
-      @phone = edit_line
-    end
-    stack :margin => 10 do
-      button "Save" do
-        Shoes.p [@name.text, @address.text, @phone.text]
-      end
-    end
-  end
-end

data/examples/legacy/not_checked/simple/image.rb

@@ -1,21 +0,0 @@
-Shoes.app do
-  background "#eee"
-  @list = stack do
-    @img = image '../static/man-builds.png'
-    para "Enter a image URL to download:", :margin => [10, 8, 10, 0]
-    flow :margin => 10 do
-      @url = edit_line :width => -120
-      @url.text ='http://shoes.mvmanila.com/public/images/dino.jpg'
-      button "Download", :width => 120 do
-        @list.append do
-          stack do
-            background "#eee".."#ccd"
-            stack :margin => 10 do
-               image  @url.text
-            end
-          end
-        end
-      end
-    end
-  end
-end

data/examples/legacy/not_checked/simple/info.rb

@@ -1,78 +0,0 @@
-Shoes.app height: 800, width: 800 do
-  para "Startup info\n"
-  para "Ruby Version: #{RUBY_VERSION} on #{RUBY_PLATFORM}\n"
-  para "Shoes Release: #{Shoes::RELEASE_NAME}\n"
-  para "    built on #{Shoes::RELEASE_BUILD_DATE}\n"
-  para "    Fit: #{Shoes::RELEASE_TYPE}\n"
-  para "Gems Version #{Gem::RubyGemsVersion}"
-  if defined?(ShoesGemJailBreak)
-   para "Jailbreak == #{ShoesGemJailBreak}"
-  else
-   para "Cannot determine JailBreak status?"
-  end
-  stack do
-      para "Env Variables"
-      @env = edit_box height: 150, width: 0.95, margin: 8
-	  ct = ["ENV vars:\n"]
-	  ENV.each_key do |i|
-	    ct <<  "#{i}=#{ENV[i]}\n"
-	  end
-	  @env.text = ct.join
-	  
-	  ct = ["$: Array of ext/gem dirs:\n"]
-	  para ct[0].rstrip
-	  @edir = edit_box height: 150, width: 0.95, margin: 8
-	  $:.each do |gdir|
-	    ct << "#{gdir}\n"
-	  end
-	  @edir.text = ct.join
-	  
-	  ct = ["RbConfig::CONFIG\n"]
-	  para ct[0].strip
-	  @rbc = edit_box height: 150, width: 0.95, margin: 8
-	  RbConfig::CONFIG.each_key do |j|
-	     ct << "'#{j}' = #{RbConfig::CONFIG[j]}\n"
-	  end
-	  @rbc.text = ct.join
-	  
-	  hsh = {}
-	  ct =  ["$\" before require\n"]
-	  para ct[0].rstrip
-	  @ld1 = edit_box height: 150, width: 0.95, margin: 8
-	  $".each do |k| 
-	    ct << "#{k}\n"
-	    hsh[k] = true
-	  end
-	  @ld1.text = ct.join
-	  
-	  ct = ["$\" additions after require\n"]
-	  para ct[0].rstrip
-	  @ld2 = edit_box height: 150, width: 0.95, margin: 8
-      require 'bigdecimal'
-      require 'nokogiri'
-      if ShoesGemJailBreak
-        #require 'nokogiri'
-      end
-	  $".each do |f|
-	    ct << "#{f}\n" unless hsh[f]
-	  end
-	  @ld2.text =ct.join
-	  flow do
-	    button "Save to file..." do
-	      fn = ask_save_file
-	      if fn && f=File.open(fn,"w")
-	         f.puts @env.text
-	         f.puts ("\n")
-	         f.puts @edir.text
-	         f.puts ("\n")
-	         f.puts @rbc.text
-	         f.puts ("\n")
-	         f.puts @ld1.text
-	         f.puts ("\n")
-	         f.puts @ld2.text
-	         f.close
-	      end
-	    end
-	  end
-  end
-end

data/examples/legacy/not_checked/simple/mask.rb

@@ -1,21 +0,0 @@
-Shoes.app do
-  background black
-
-  stack :top => 0.4, :left => 0.2 do
-    @stripes = stack
-
-    mask do
-      title "Shoes", :weight => "bold", :size => 82
-    end
-  end
-  
-  animate 10 do
-    @stripes.clear do
-      20.times do |i|
-        strokewidth 4
-        stroke rgb((0.0..0.5).rand, (0.0..1.0).rand, (0.0..0.3).rand)
-        line 0, i * 5, 400, i * 8
-      end
-    end
-  end
-end

data/examples/legacy/not_checked/simple/mask2.rb

@@ -1,27 +0,0 @@
-xspeed, yspeed = 8.4, 6.6
-xdir, ydir = 1, 1
-
-Shoes.app do
-  background "#{DIR}/static/stripe.png"
-
-  mask do
-    @icon = image "#{DIR}/static/shoes-icon.png", :left => 100, :top => 100 do
-      alert "You're soooo quick."
-    end
-    title "STATIC !", weight: "ultrabold", :left => 150, :top => 150
-    @s = star 230,100,7, 50, 25
-  end
-
-  x, y = self.width / 2, self.height / 2
-  size = @icon.size
-  animate(30) do |f|
-    x += xspeed * xdir
-    y += yspeed * ydir
-
-    xdir *= -1 if x > self.width - size[0] or x < 0
-    ydir *= -1 if y > self.height - size[1] or y < 0
-
-    @icon.move x.to_i, y.to_i
-    @s.toggle if f % 10 == 0
-  end
-end

data/examples/legacy/not_checked/simple/menu.rb

@@ -1,31 +0,0 @@
-class MenuPanel < Shoes::Widget
-  @@boxes = []
-  def initialize(color, args)
-    @@boxes << self
-    background color
-    para link("Box #{@@boxes.length}", :stroke => white, :fill => nil).
-      click { visit "/" },
-        :margin => 18, :align => "center", :size => 20
-    hover { expand }
-  end
-  def expand
-    if self.width < 170
-      a = animate 30 do
-        @@boxes.each do |b|
-          b.width -= 5 if b != self and b.width > 140
-        end
-        self.width += 5
-        a.stop if self.width >= 170
-      end
-    end
-  end
-end
-
-Shoes.app :width => 400, :height => 130 do
-  style(Shoes::Link, :underline => nil)
-  style(Shoes::LinkHover, :fill => nil, :underline => nil)
-  menu_panel green,  :width => 170, :height => 120, :margin => 4
-  menu_panel blue,   :width => 140, :height => 120, :margin => 4
-  menu_panel red,    :width => 140, :height => 120, :margin => 4
-  menu_panel purple, :width => 140, :height => 120, :margin => 4
-end

data/examples/legacy/not_checked/simple/menu1.rb

@@ -1,35 +0,0 @@
-class MenuPanel < Shoes::Widget
-  $boxes = []
-  def initialize(color, args)
-    $boxes << self
-    background color
-    para link("Box #{$boxes.length}", :stroke => white, :fill => nil).
-      click { visit "/" },
-        :margin => 18, :align => "center", :size => 20
-    yield
-  end
-end
-
-Shoes.app :width => 600, :height => 130 do
-  style(Shoes::Link, :underline => nil)
-  style(Shoes::LinkHover, :fill => nil, :underline => nil)
-  
-  expand = proc do
-    hover do |box|
-      if box.width < 170
-        a = animate 30 do
-          $boxes.each do |b|
-            b.width -= 5 if b != box and b.width > 140
-          end
-          box.width += 5
-          a.stop if box.width >= 170
-        end
-      end
-    end
-  end
-    
-  menu_panel green,  :width => 170, :height => 120, :margin => 4, &expand
-  menu_panel blue,   :width => 140, :height => 120, :margin => 4, &expand
-  menu_panel red,    :width => 140, :height => 120, :margin => 4, &expand
-  menu_panel purple, :width => 140, :height => 120, :margin => 4, &expand
-end