Shoes.app :width => 600, :height => 800 do
  fill steelblue
  stroke peru
  strokewidth 6
  rect 3, 3, 595, 795
  stack do
    fill white
    strokewidth 0
    rect 15, 15, 570, 640
    @scribble_area = stack(:margin => 20){ }
    @code_area = edit_box(:top => 670, :left => 10, :width => 0.70)
    button "scribble!", :top => 750, :left => 480 do
      @scribble_area.clear { eval @code_area.text }
    end
  end
end