scarpe 0.1.0 → 0.2.0

data/examples/legacy/not_checked/shoes-dep-samples/good-reminder.rb

@@ -0,0 +1,174 @@
+require 'yaml'
+
+Shoes.app :title => "A Gentle Reminder", 
+  :width => 370, :height => 560, :resizable => false do
+
+  background white
+  background tan, :height => 40
+  
+  caption "A Gentle Reminder", :margin => 8, :stroke => white
+  
+  stack :margin => 10, :margin_top => 50 do    
+    para "You need to", :stroke => red, :fill => yellow
+    
+    stack :margin_left => 5, :margin_right => 10, :width => 1.0, :height => 200, :scroll => true do
+      background white
+      border white, :strokewidth => 3
+      @gui_todo = para
+    end
+
+    flow :margin_top => 10 do
+      para "Remember to"
+      @add = edit_line(:margin_left => 10, :width => 180)
+      button("Add", :margin_left => 5)  { add_todo(@add.text); @add.text = '' }
+    end
+  end
+  
+  stack :margin_top => 10 do
+    background darkgray
+    para strong('Completed'), :stroke => white
+  end
+
+  @gui_completed = stack :width => 1.0, :height => 207, :margin_right => 20
+
+
+  def data_path
+    if RUBY_PLATFORM =~ /win32/
+      if ENV['USERPROFILE']
+        if File.exist?(File.join(File.expand_path(ENV['USERPROFILE']), "Application Data"))
+          user_data_directory = File.join File.expand_path(ENV['USERPROFILE']), "Application Data", "GentleReminder"
+        else
+          user_data_directory = File.join File.expand_path(ENV['USERPROFILE']), "GentleReminder"
+        end
+      else
+        user_data_directory = File.join File.expand_path(Dir.getwd), "data"
+      end
+    else
+      user_data_directory = File.expand_path(File.join("~", ".gentlereminder"))
+    end
+    
+    unless File.exist?(user_data_directory)
+      Dir.mkdir(user_data_directory)
+    end
+    
+    return File.join(user_data_directory, "data.yaml")
+  end
+  
+
+  def refresh_todo
+    @gui_todo.replace *(
+      @todo.map { |item|
+        [ item, '  ' ] + [ link('Done') { complete_todo item } ] + [ '  ' ] + 
+            [ link('Forget it') { forget_todo item } ] + [ "\n" ]
+      }.flatten
+    )
+  end
+
+
+  def refresh
+    refresh_todo
+    
+    @gui_completed.clear
+    
+    @gui_completed.append do
+      background white
+      
+      @completed.keys.sort.reverse.each { |day|
+        stack do
+          background lightgrey
+          para strong(Time.at(day).strftime('%B %d, %Y')), :stroke => white
+        end
+
+        stack do
+          inscription *(
+            @completed[day].map { |item|
+              [ item ] + [ '  ' ] + [ link('Not Done') { undo_todo day, item } ] + 
+                  (@completed[day].index(item) == @completed[day].length - 1 ? [ '' ] : [ "\n" ])
+            }.flatten
+          )
+        end    
+        
+      }
+    end
+  end
+
+
+  def complete_todo(item)
+    day = Time.today.to_i
+    
+    if @completed.keys.include? day
+      @completed[day] << item
+    else
+      @completed[day] = [ item ]
+    end
+    
+    @todo.delete(item)
+    
+    save
+    
+    refresh
+  end
+
+
+  def undo_todo(day, item)
+    @completed[day].delete item
+    
+    @completed.delete(day) if @completed[day].empty?
+    
+    @todo << item unless @todo.include? item
+
+    save
+    
+    refresh
+  end
+
+
+  def add_todo(item)
+    item = item.strip
+    
+    return if item == ''
+    
+    if @todo.include? item
+      alert('You have already added that to the list!')
+      return
+    end
+    
+    @todo << item
+    
+    save
+    
+    refresh_todo
+  end
+  
+  
+  def forget_todo(item)
+    @todo.delete item
+    
+    save
+    
+    refresh_todo
+  end
+
+  
+  def load
+    if File.exist?(data_path)
+      @todo, @completed = YAML::load(File.open(data_path, 'r'))
+    else
+      @todo = []
+      @completed = {}
+    end
+    
+    refresh
+  end
+  
+  
+  def save
+    File.open(data_path, 'w') { |f|
+      f.write [ @todo, @completed ].to_yaml
+    }
+  end
+
+
+  load
+
+end

data/examples/legacy/not_checked/shoes-dep-samples/good-vjot.rb

@@ -0,0 +1,56 @@
+NOTES = [['Welcome to the vJot Clone', <<-'END']]
+This sample app is a notetaker, a clone of PJ Hyett's vjot.com.
+
+Creating
+----------
+Click "Add a New Note" and the jot will be loaded into the editor for reading or editing.
+
+Editing
+---------
+Click a jot's title to load it.
+
+Saving
+--------
+There is no save button, the jot is saved as you edit.
+
+END
+
+Shoes.app :title => "vJot", 
+  :width => 420, :height => 560, :resizable => false do
+
+  @note = NOTES.first
+  background "#C7EAFB"
+  stack :width => 400, :margin => 20 do
+    background "#eee", :curve => 12
+    border "#00D0FF", :strokewidth => 3, :curve => 12
+    stack :margin => 20 do
+      caption "vJot"
+      @title = edit_line @note[0], :width => 1.0 do
+        @note[0] = @title.text
+        load_list
+      end
+      stack :width => 1.0, :height => 200, :scroll => true do
+        @list = para
+      end
+      @jot = edit_box @note[1], :width => 1.0, :height => 200, :margin_bottom => 20 do
+        @note[1] = @jot.text
+      end
+    end
+  end
+
+  def load_list
+    @list.replace *(NOTES.map { |note|
+      [link(note.first) { @note = load_note(note); load_list }, "\n"] 
+    }.flatten +
+      [link("+ Add a new Note") { NOTES << (@note = load_note); load_list }])
+  end
+
+  def load_note(note = ['New Note', ''])
+    @note = note
+    @title.text = note[0]
+    @jot.text = note[1]
+    note
+  end
+
+  load_list
+end

data/examples/legacy/not_checked/shoes-dep-samples/simple-accordion.rb

@@ -0,0 +1,75 @@
+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
+  style(Link, :stroke => black, :underline => nil, :weight => "strong")
+  style(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/shoes-dep-samples/simple-anim-shapes.rb

@@ -0,0 +1,17 @@
+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
+    quit unless confirm "You ARE sure you're OK??"
+  end
+end

data/examples/legacy/not_checked/shoes-dep-samples/simple-anim-text.rb

@@ -0,0 +1,13 @@
+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/shoes-dep-samples/simple-arc.rb

@@ -0,0 +1,23 @@
+#
+# 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/shoes-dep-samples/simple-bounce.rb

@@ -0,0 +1,24 @@
+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/shoes-dep-samples/simple-calc.rb

@@ -0,0 +1,70 @@
+class Calc
+  def initialize
+    @number = 0
+    @previous = nil
+    @op = nil
+  end
+
+  def to_s
+    @number.to_s
+  end
+  
+  (0..9).each do |n|
+    define_method "press_#{n}" do
+      @number = @number.to_i * 10 + n
+    end
+  end
+
+  def press_clear
+    @number = 0
+  end
+
+  {'add' => '+', 'sub' => '-', 'times' => '*', 'div' => '/'}.each do |meth, op|
+    define_method "press_#{meth}" do
+      if @op
+        press_equals
+      end
+      @op = op
+      @previous, @number = @number, nil
+    end
+  end
+
+  def press_equals
+    @number = @previous.send(@op, @number.to_i)
+    @op = nil
+  end
+
+end
+
+number_field = nil
+number = Calc.new
+Shoes.app :height => 250, :width => 200, :resizable => false do
+  background "#EEC".."#996", :curve => 5, :margin => 2
+
+  stack :margin => 2 do
+
+    stack :margin => 8 do
+      number_field = para strong(number)
+    end
+
+    flow :width => 218, :margin => 4 do
+      %w(7 8 9 / 4 5 6 * 1 2 3 - 0 Clr = +).each do |btn|
+        button btn, :width => 46, :height => 46 do
+          method = case btn
+            when /[0-9]/; 'press_'+btn
+            when 'Clr'; 'press_clear'
+            when '='; 'press_equals'
+            when '+'; 'press_add'
+            when '-'; 'press_sub'
+            when '*'; 'press_times'
+            when '/'; 'press_div'
+          end
+          
+          number.send(method)
+          number_field.replace strong(number)
+        end
+      end
+    end
+  end
+
+end

data/examples/legacy/not_checked/shoes-dep-samples/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-dep-samples/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-dep-samples/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-dep-samples/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-dep-samples/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-dep-samples/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-dep-samples/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-dep-samples/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-dep-samples/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