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