scarpe 0.1.0 → 0.2.0

data/examples/legacy/not_checked/shoes-contrib/simple/simple-chipmunk.rb

@@ -0,0 +1,26 @@
+# 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/shoes-contrib/simple/simple-control-sizes.rb

@@ -0,0 +1,24 @@
+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 => 40 do
+      button "Standard"
+      button "Margin: 2, Height: 28", :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/shoes-contrib/simple/simple-curve.rb

@@ -0,0 +1,26 @@
+#
+# 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/shoes-contrib/simple/simple-dialogs.rb

@@ -0,0 +1,29 @@
+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/shoes-contrib/simple/simple-downloader.rb

@@ -0,0 +1,27 @@
+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
+      button "Download", :width => 120 do
+        @list.append do
+          stack do
+            background "#eee".."#ccd"
+            stack :margin => 10 do
+              dl = nil
+              para @url.text, " [", link("cancel") { dl.abort }, "]", :margin => 0
+              d = inscription "Beginning transfer.", :margin => 0
+              p = progress :width => 1.0, :height => 14
+              dl = download @url.text, :save => File.basename(@url.text),
+                :progress => proc { |dl| 
+                  d.text = "Transferred #{dl.transferred} of #{dl.length} bytes (#{dl.percent}%)"
+                  p.fraction = dl.percent * 0.01 },
+                :finish => proc { |dl| d.text = "Download completed" }
+            end
+          end
+        end
+      end
+    end
+  end
+end

data/examples/legacy/not_checked/shoes-contrib/simple/simple-draw.rb

@@ -0,0 +1,13 @@
+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/shoes-contrib/simple/simple-editor.rb

@@ -0,0 +1,28 @@
+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
+      quit
+    when :alt_c
+      self.clipboard = str
+    when :alt_v
+      str += self.clipboard
+    end
+    t.replace str
+  end
+end

data/examples/legacy/not_checked/shoes-contrib/simple/simple-form.rb

@@ -0,0 +1,28 @@
+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
+
+  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/shoes-contrib/simple/simple-mask.rb

@@ -0,0 +1,21 @@
+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/shoes-contrib/simple/simple-menu.rb

@@ -0,0 +1,31 @@
+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(Link, :underline => nil)
+  style(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/shoes-contrib/simple/simple-menu1.rb

@@ -0,0 +1,35 @@
+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(Link, :underline => nil)
+  style(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

data/examples/legacy/not_checked/shoes-contrib/simple/simple-rubygems.rb

@@ -0,0 +1,29 @@
+#
+# The setup block will install gems before launching the 
+# rest of the app below it.
+#
+Shoes.setup do
+  gem 'bluecloth =2.0.6'
+  gem 'metaid'
+end
+
+require 'bluecloth'
+require 'metaid'
+
+Shoes.app :width => 300, :height => 400, :resizable => false do
+  background "#eed"
+
+  stack :margin => 40 do
+    tagline "Loaded Gems:", :align => "center", :underline => "single"
+    Gem.loaded_specs.each do |name, spec|
+      para "#{name}\n#{spec.version}", :align => "center"
+    end
+
+    caption "Total Gems: #{Gem.source_index.length}", :align => "center", :margin_bottom => 0
+    para "(includes unloaded gems)", :align => "center", :margin_top => 0
+    button "OK", :bottom => 30, :left => 0.4 do
+      self.close
+    end
+  end
+
+end

data/examples/legacy/not_checked/shoes-contrib/simple/simple-slide.rb

@@ -0,0 +1,45 @@
+#
+# mimicking the mootools demo for Fx.Slide
+# http://demos.mootools.net/Fx.Slide
+#
+Shoes.app do
+  def stop_anim
+    @anim.stop
+    @anim = nil
+  end
+  def slide_anim &blk
+    stop_anim if @anim
+    @anim = animate 30, &blk
+  end
+  def slide_out slot
+    slide_anim do |i|
+      slot.height = 150 - (i * 3)
+      slot.contents[0].top = -i * 3
+      if slot.height == 0
+        stop_anim
+        slot.hide
+      end
+    end
+  end
+  def slide_in slot
+    slot.show
+    slide_anim do |i|
+      slot.height = i * 6
+      slot.contents[0].top = slot.height - 150
+      stop_anim if slot.height == 150
+    end
+  end
+
+  background white
+  stack :margin => 10 do
+    para link("slide out") { slide_out @lipsum }, " | ",
+      link("slide in") { slide_in @lipsum }
+    @lipsum = stack :width => 1.0, :height => 150 do
+      stack do
+        background "#ddd"
+        border "#eee", :strokewidth => 5
+        para "Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua. Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris nisi ut aliquip ex ea commodo consequat. Duis aute irure dolor in reprehenderit in voluptate velit esse cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat cupidatat non proident, sunt in culpa qui officia deserunt mollit anim id est laborum.", :margin => 10
+      end
+    end
+  end
+end

data/examples/legacy/not_checked/shoes-contrib/simple/simple-sphere.rb

@@ -0,0 +1,28 @@
+Shoes.app :width => 500, :height => 500, :resizable => false do
+  image 400, 470, :top => 30, :left => 50 do
+    nostroke
+    fill "#127"
+    image :top => 230, :left => 0 do
+      oval 70, 130, 260, 40
+      blur 30
+    end
+    oval 10, 10, 380, 380
+    image :top => 0, :left => 0 do
+      fill "#46D"
+      oval 30, 30, 338, 338
+      blur 10
+    end
+    fill gradient(rgb(1.0, 1.0, 1.0, 0.7), rgb(1.0, 1.0, 1.0, 0.0))
+    oval 80, 14, 240, 176
+    image :top => 0, :left => 0 do
+      fill "#79F"
+      oval 134, 134, 130, 130
+      blur 40
+    end
+    image :top => 150, :left => 40, :width => 320, :height => 260 do
+      fill gradient(rgb(0.7, 0.9, 1.0, 0.0), rgb(0.7, 0.9, 1.0, 0.6))
+      oval 60, 60, 200, 136
+      blur 20
+    end
+  end
+end

data/examples/legacy/not_checked/shoes-contrib/simple/simple-sqlite3.rb

@@ -0,0 +1,13 @@
+require 'sqlite3'
+Shoes.app :width => 350, :height => 130 do
+  db = SQLite3::Database.new "simple-sqlite3.db"
+  db.execute "create table t1 (t1key INTEGER PRIMARY KEY,data " \
+    "TEXT,num double,timeEnter DATE)"
+  db.execute "insert into t1 (data,num) values ('This is sample data',3)"
+  db.execute "insert into t1 (data,num) values ('More sample data',6)"
+  db.execute "insert into t1 (data,num) values ('Aurélio, Küng, Stärk, Uña, Łuksza',6)"
+  db.execute "insert into t1 (data,num) values ('And a little more',9)"
+  rows = db.execute "select * from t1"
+  rows.each{|k, d, n| para "#{k} : #{d} : #{n}\n"}
+end
+

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

@@ -0,0 +1,13 @@
+Shoes.app :height => 150, :width => 250 do
+  background rgb(240, 250, 208)
+  stack :margin => 10 do
+    button "Start" do
+      @time = Time.now
+      @label.replace "Stop watch started at #@time"
+    end
+    button "Stop" do
+      @label.replace "Stopped, ", strong("#{Time.now - @time}"), " seconds elapsed."
+    end
+    @label = para "Press ", strong("start"), " to begin timing."
+  end
+end

data/examples/legacy/not_checked/shoes-contrib/simple/simple-video.rb

@@ -0,0 +1,13 @@
+Shoes.app :width => 408, :height => 346, :resizable => false do
+  background "#eee"
+  stack :margin => 4 do
+    @vid = video "http://www.rin-shun.com/shoes/AdventureTimewithFinnandJakeFinnTime.mp4"
+  end
+  para "controls: ",
+    link("play")  { @vid.play }, ", ",
+    link("pause") { @vid.pause }, ", ",
+    link("stop")  { @vid.stop }, ", ",
+    link("hide")  { @vid.hide }, ", ",
+    link("show")  { @vid.show }, ", ",
+    link("+5 sec") { @vid.time += 5000 }
+end

data/examples/legacy/not_checked/shoes-contrib/styles/alignment.rb

@@ -0,0 +1,4 @@
+Shoes.app :title => "A Styling Sample" do
+  @text = para "Rightly aligned"
+  @text.style(:align => "right")
+end

data/examples/legacy/not_checked/shoes-contrib/styles/attachment.rb

@@ -0,0 +1,5 @@
+Shoes.app do
+  stack :top => 10, :left => 10, :attach => Window do
+    para "I'm attached to the top left."
+  end
+end

data/examples/legacy/not_checked/shoes-contrib/styles/emphasis.rb

@@ -0,0 +1,3 @@
+Shoes.app do
+  para "Say it like you mean it!", :emphasis => "oblique"
+end

data/examples/legacy/not_checked/shoes-contrib/styles/gradient-angle.rb

@@ -0,0 +1,3 @@
+Shoes.app do
+  background gradient purple, red, :angle => 45
+end

data/examples/legacy/not_checked/shoes-contrib/styles/para-methods.rb

@@ -0,0 +1,5 @@
+Shoes.app :title => "A Styling Sample" do
+  @text = para "Red with an underline"
+  @text.stroke = red
+  @text.underline = "single"
+end

data/examples/legacy/not_checked/shoes-contrib/styles/para-red-underlined.rb

@@ -0,0 +1,3 @@
+Shoes.app :title => "A Styling Sample" do
+  para "Red with an underline", :stroke => red, :underline => "single"
+end

data/examples/legacy/not_checked/shoes-contrib/styles/para-style-method.rb

@@ -0,0 +1,4 @@
+Shoes.app :title => "A Style Sample" do
+  @text = para "Red with an underline"
+  @text.style(:stroke=>red, :underline=>"single")
+end