lacci 0.2.1

data/examples/legacy/not_checked/shoes-dep-samples/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-dep-samples/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-dep-samples/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-dep-samples/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-dep-samples/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-dep-samples/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-dep-samples/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/shoes3-tests/button/button.rb

@@ -0,0 +1,53 @@
+Shoes.app width: 600, height: 500 do
+  stack do
+    para "Quick fun"
+    flow do
+      button "Button", font: "Menlo Bold 14",width: 200, stroke: red,
+          tooltip: "Menlo Bold 14" do
+        para "menlo bold button"
+      end
+      button "icon", width: 80, height: 30, icon: "#{DIR}/static/icon-info.png",
+          tooltip: "default right", stroke: blue do
+      end
+    end
+    para "What is normal?"
+    flow do
+      button "Normal", tooltip: "Normal" do para "normal 1" end
+      button "Normal", tooltip: "Arial 12", font: "Arial 12" do para "normal 2" end
+    end
+    para "try some font names"
+    flow do
+      button "Curry", font: "Courier New Italic 12",
+        tooltip: "Courier New Italic 12" do end
+      button "Short", font: "Monaco 17", tooltip: "Monaco 17" do end
+    end
+    para "testing icon/title interactions"
+    flow do
+      button "left", width: 80, icon: "#{DIR}/static/icon-info.png",
+          icon_pos: "left", tooltip: "title left" do
+        para "left image"
+      end
+      button  width: 80, icon: "#{DIR}/static/icon-info.png",
+          tooltip: "just icon" do
+        para "icon only"
+      end
+      button "right", width: 80, icon: "#{DIR}/static/icon-info.png",
+          icon_pos: "right" do
+          para "right image"
+      end
+      button "top", width: 80, height: 45, icon: "#{DIR}/static/icon-info.png",
+          icon_pos: "top" do
+        para "top image"
+      end
+      button "bottom", width: 80, height: 45, icon: "#{DIR}/static/icon-info.png",
+          icon_pos: "bottom" do
+        para "bottom image"
+      end
+    end
+    para "testing defaults"
+    flow do
+      button "Fail 1", tooltip: "size missing", font: "Monaco" do end
+      button "Fail 2", tooltip: "unknown font", font: "missing font 12" do end
+    end
+  end
+end

data/examples/legacy/not_checked/shoes3-tests/cache/cache.rb

@@ -0,0 +1,41 @@
+Shoes.app do
+  require 'shoes/data'
+  require 'shoes/image'
+  stack do
+    flow do
+      #@el = edit_line "#{DIR}/static/shoes-icon-walkabout.png"
+      @el = edit_line "https://shoes.mvmanila.com/public/images/dino.jpg"
+      @cb = check; para "Cached?"
+      button "(Re)load" do
+        @img.clear
+        @img.append do
+          image @el.text, cache: @cb.checked
+        end
+      end
+      button "Show external cache" do
+        @cview.clear
+        @cview.append do
+          eb = edit_box width: 400
+          DATABASE.each do |key, value|
+            eb.append "#{key} -> #{value}"
+          end
+        end
+      end
+      button "clear all caches" do
+        app.cache_clear :all
+        quit if confirm "Please restart Shoes for best results"
+      end
+      para "Global cache: " 
+      @sw = switch width: 80 do |n|
+        app.cache = n.active?
+        @cb.checked = n.active?
+      end
+    end
+    @img = flow {} 
+    @cview = flow {}
+  end
+  start do
+    @sw.active = app.cache
+    @cb.checked = app.cache
+  end
+end

data/examples/legacy/not_checked/shoes3-tests/combo/combo.rb

@@ -0,0 +1,24 @@
+Shoes.app height: 200, width: 300 do
+  stack do
+    flow do
+      para "Normal "
+      list_box :items => ["one", "two", "three"], choose: "two", tooltip: 
+        "normal combo"
+    end
+    flow do 
+      para "Font  "
+      list_box items: ["Alpha", "Bravo", "Charlie"], font: "Monaco 9",
+        choose: "Bravo", tooltip: "monaco 9 font"
+    end
+    flow do
+      para "Stroke "
+      list_box items: ["Ask", "your", "mother!"], choose: "your", stroke: red,
+        tooltip: "stroke red"
+    end
+    flow do
+      para "Both  "
+      list_box items: ["Quoth", "the", "Raven"], font: "Helvitica Italic 16", stroke: blue,
+        tooltip: "blue Helvetica Italic 16", choose: "Quoth"
+    end
+  end
+end

data/examples/legacy/not_checked/shoes3-tests/curl/bare.rb

@@ -0,0 +1,34 @@
+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/test-csv.tgz'
+      @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
+              dld = download @url.text, :save => File.basename(@url.text), 
+                :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} secs: #{secs}"
+                  }
+            end
+          end
+        end
+      end
+    end
+  end
+end

data/examples/legacy/not_checked/shoes3-tests/curl/downloader.rb

@@ -0,0 +1,40 @@
+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/shoes3-tests/curl/m1.rb

@@ -0,0 +1,11 @@
+ Shoes.app do
+   stack do
+     title "Searching Google", :size => 16
+     @status = para "One moment..."
+
+     # Search Google for 'shoes' and print the HTTP headers
+     download "http://www.google.com/search?q=shoes" do |goog|
+       @status.text = "Headers: " + goog.response.headers.inspect
+     end
+   end
+ end

data/examples/legacy/not_checked/shoes3-tests/curl/m2.rb

@@ -0,0 +1,12 @@
+ Shoes.app do
+   stack do
+     title "Downloading Google image", :size => 16
+     @status = para "One moment..."
+
+     download "http://www.google.com/logos/nasa50th.gif",
+       :save => "nasa50th.gif" do
+         @status.text = "Okay, is downloaded."
+     end
+   end
+ end
+

data/examples/legacy/not_checked/shoes3-tests/curl/m3.rb

@@ -0,0 +1,11 @@
+ Shoes.app do
+   stack do
+     title "GET Google", :size => 16
+     @status = para "One moment..."
+
+     download "http://www.google.com/search?q=shoes", 
+         :method => "GET" do |dump|
+       @status.text = dump.response.body
+     end
+   end
+ end

data/examples/legacy/not_checked/shoes3-tests/curl/m4.rb

@@ -0,0 +1,5 @@
+ Shoes.app do
+   button "Red Shoes" do
+     image "http://shoesrb.com/img/shoes-icon.png"
+   end
+ end

data/examples/legacy/not_checked/shoes3-tests/curl/typ.rb

@@ -0,0 +1,30 @@
+require 'typhoeus'
+Shoes.app do
+  button "typheous" do
+    st_time = Time.now
+    filesz = 0
+    downloaded_file = File.open 'huge.iso', 'wb'
+    @th = Thread.new do
+      request = Typhoeus::Request.new("http://walkabout.mvmanila.com/public/share/Ytm-2.exe")
+      request.on_headers do |response|
+        if response.code != 200
+          raise "Request failed"
+        end
+        puts "length #{response.headers['Content-Length']}"
+        filesz = response.headers['Content-Length'].to_i
+      end
+      request.on_body do |chunk|
+        $stdout.puts "."
+        downloaded_file.write(chunk)
+      end
+      request.on_complete do |response|
+        downloaded_file.close
+        end_time = Time.now
+        elapsed = end_time.to_i - st_time.to_i
+        $stderr.puts "Finished in #{elapsed} secs #{(filesz/1024)/elapsed} KB/s"
+        @th.join
+      end
+      request.run
+    end
+  end
+end

data/examples/legacy/not_checked/shoes3-tests/cursor/c1.rb

@@ -0,0 +1,21 @@
+Shoes.app do
+  stack do
+    para "Change cursor to"
+    flow do
+      button "arrow" do
+        app.cursor = :arrow_cursor
+      end
+      button "text" do
+        app.cursor = :text_cursor
+      end
+      button "watch" do
+        app.cursor = :watch_cursor
+      end
+      button "hand" do
+        app.cursor = :hand_cursor
+      end
+    end
+    para "app is #{app.class}"
+    para "Cursor is #{app.cursor.inspect}"
+  end
+end

data/examples/legacy/not_checked/shoes3-tests/decoration.rb

@@ -0,0 +1,14 @@
+Shoes.app do
+  stack do
+    para "Test decorations - title bar, resize controls"
+    button "remove" do
+      app.decorated = false
+      @p.text = app.decorated? ? "True" : "False"
+    end
+    button "restore" do
+      app.decorated = true
+      @p.text = app.decorated? ? "True" : "False"
+    end
+    @p = para "True"
+  end
+end

data/examples/legacy/not_checked/shoes3-tests/dialogs/ask.rb

@@ -0,0 +1,6 @@
+Shoes.app do
+  button "ask" do
+    ans = ask "Feeling lucky?"
+    para ans
+  end
+end

data/examples/legacy/not_checked/shoes3-tests/dialogs/confirm.rb

@@ -0,0 +1,6 @@
+Shoes.app do
+  button "confirm" do
+    ans = confirm "Feeling lucky?"
+    para ans
+  end
+end

data/examples/legacy/not_checked/shoes3-tests/editbox/editbox.rb

@@ -0,0 +1,36 @@
+Shoes.app height: 500, width: 300 do
+  stack do
+    flow do
+      para "Normal "
+       @eb1 = edit_box "Normal", tooltip: "normal"
+    end
+    flow do 
+      para "Font  "
+      @eb2 = edit_box "Font Is?", font: "Monaco 9", tooltip: "monaco 9",
+         width: 300
+    end
+    flow do
+      para "Stroke "
+      @eb3 = edit_box "Stroke", stroke: red, tooltip: "red"
+    end
+    flow do
+      para "Both   "
+      @eb4 = edit_box "Font and Stroke", font: "Monaco 14", stroke: green,
+        tooltip: "14pt fixed & green"
+    end
+    flow do
+      button "Append to" do
+        @eb1.append "\nAppended"
+        @eb2.append "\nAppended"
+        @eb3.append "\nAppended"
+        @eb4.append "\nAppended"
+      end
+      button "change all" do
+        @eb1.text = "I've been reset1"
+        @eb2.text = "I've been reset1"
+        @eb3.text = "I've been reset1"
+        @eb4.text = "I've been reset1"
+      end
+    end
+  end
+end

data/examples/legacy/not_checked/shoes3-tests/editline/editline.rb

@@ -0,0 +1,27 @@
+Shoes.app height: 300, width: 300 do
+  stack do
+    flow do
+      para "Normal "
+       @el1 = edit_line "Normal", tooltip: "Normal"
+    end
+    flow do 
+      para "Font  "
+      @el2 = edit_line "Font Is?", font: "Monaco 9", tooltip: "monaco 9"
+    end
+    flow do
+      para "Stroke "
+      @el3 = edit_line "Stroke", stroke: red, tooltip: "red"
+    end
+    flow do
+      para "Both"
+      @el4 = edit_line "Stroke and Font", stroke: green, font: "Arial 14",
+       tooltip: "green arial 14"
+    end
+    button "change contents" do
+      @el1.text = "Changed!"
+      @el2.text = "Changed!"
+      @el3.text = "Changed!"
+      @el4.text = "Changed!"
+    end
+  end
+end

data/examples/legacy/not_checked/shoes3-tests/events/button.rb

@@ -0,0 +1,32 @@
+Shoes.app do
+ 
+  stack do
+    para "Native button test"
+    flow do 
+      @btn1 = button "button 1", width: 75 do
+        @eb.append "button 1 clicked\n"
+      end
+      @btn2 = button "button 2" do
+        @eb.append "button 2 clicked\n"
+      end
+      flow do
+        @ck2 = check checked: true do
+          @eb.append "Happy: "
+          @eb.append "feeling good\n" if @r1.checked?
+          @eb.append "feeling something\n" if @r2.checked?
+          @eb.append "feeling low\n" if @r3.checked?
+        end
+        para "Happy?"
+      end
+      stack do
+        flow {@r1 = radio :happy; para "Estatic"}
+        flow {@r2 = radio :happy; para "So-So"}
+        flow {@r3 = radio :happy; para "Not really"}
+      end
+    end
+    @eb = edit_box width: 500, height: 350
+  end
+  click do |btn,x,y,mods|
+    @eb.append "click #{btn}, x: #{x}, y: #{y}. mods: #{mods}\n"
+  end
+end

data/examples/legacy/not_checked/shoes3-tests/events/button.yaml

@@ -0,0 +1,40 @@
+---
+:context:
+  :app: "/home/ccoupe/Projects/shoes3/Tests/events/button.rb"
+  :time: 2017-12-18 23:46:58.596135799 -07:00
+:events:
+- :time: 2.380615873
+  :button: 1
+  :x: 0
+  :y: 35
+  :modifiers: 
+  :object: !ruby/object:Shoes::Types::Button {}
+  :type: :btn_activate
+- :time: 3.780337516
+  :button: 1
+  :x: 75
+  :y: 35
+  :modifiers: 
+  :object: !ruby/object:Shoes::Types::Button {}
+  :type: :btn_activate
+- :time: 6.24463253
+  :button: 1
+  :x: 0
+  :y: 100
+  :modifiers: 
+  :object: !ruby/object:Shoes::Types::Radio {}
+  :type: :btn_activate
+- :time: 6.244678214
+  :button: 1
+  :x: 0
+  :y: 135
+  :modifiers: 
+  :object: !ruby/object:Shoes::Types::Radio {}
+  :type: :btn_activate
+- :time: 8.060630508
+  :button: 1
+  :x: 0
+  :y: 65
+  :modifiers: 
+  :object: !ruby/object:Shoes::Types::Check {}
+  :type: :btn_activate