# File karel/world_maker.rb, line 22
 def initialize(size)
  super()

  $dialog = TkToplevel.new(self){
    title  ' World Creator '
  }
  $dialog.raise_window $window
  $world = Robota::World
  geometry_string = '200x' + '300' + "+900+25"
  $dialog.geometry(newGeometry = geometry_string)

  TkGrid.rowconfigure($dialog, 2, :weight => 1)
  TkGrid.columnconfigure($dialog, 0, :weight => 1)

  get_file = TkButton.new($dialog, :text => "Get File", :command => lambda{open_file})
  get_file.grid(:row => 0, :column => 0)
  @show_file = TkEntry.new($dialog, :state => :disabled)
  @show_file.grid(:row => 1, :column => 0, :sticky => "ew")
  put_file = TkButton.new($dialog, :text => "Save File", :command => lambda{save_file})
  put_file.grid(:row => 2, :column => 0, :sticky => 'n')
  @text = TkLabel.new($dialog, :text => "Tool")
  @text.grid(:row => 3, :column => 0)
  @beeper = TkButton.new($dialog, :text => "Beeper", :command => lambda{place_beeper}, :activeforeground => 'red')
  @beeper.grid(:row => 4, :column => 0)
  horizontal_wall = TkButton.new($dialog, :text => "EW Wall", :command => lambda{east_west_wall})
  horizontal_wall.grid(:row => 5, :column => 0)
  vertical_wall = TkButton.new($dialog, :text => "NS Wall", :command => lambda{north_south_wall})
  vertical_wall.grid(:row => 6, :column => 0)

 rescue
  puts e.to_s
  puts e.backtrace
 end