123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178 |
- $config_file = File.expand_path("~/.flexlay/supertux.rb")
- def find_supertux_datadir()
-
- possible_locations = [
- "~/cvs/supertux/supertux/data/",
- "~/cvs/supertux/data/",
- "/usr/share/games/supertux/",
- "/usr/local/share/games/supertux/",
- "/opt/supertux/data/",
- "~/projects/supertux/data/",
- "~/projects/supertux/svn/trunk/supertux/data/",
- ]
-
- end
- if File.exist?($config_file) then
- require $config_file
- end
- BACKGROUND_LAYER = 1
- INTERACTIVE_LAYER = 2
- FOREGROUND_LAYER = 3
- require "flexlay_wrap"
- include Flexlay_wrap
- require "flexlay.rb"
- require "sexpr.rb"
- require_relative "gameobj.rb"
- flexlay = Flexlay.new()
- width = 1024
- height = 768
- fullscreen = false
- resizeable = true
- flexlay.init("SuperTux Editor", width, height, fullscreen, resizeable)
- $tilemap_paint_tool = TileMapPaintTool.new()
- $tilemap_select_tool = TileMapSelectTool.new()
- $zoom_tool = ZoomTool.new()
- $zoom2_tool = Zoom2Tool.new()
- $workspace_move_tool = WorkspaceMoveTool.new()
- $objmap_select_tool = ObjMapSelectTool.new()
- $mysprite = make_sprite("../data/images/icons16/stock_paste-16.png")
- require_relative "gui.rb"
- class SuperTuxConfig
- attr_accessor :datadir, :recent_files
- def initialize()
- @recent_files = []
- end
- def save(filename)
- dir = File.expand_path("~/.flexlay/")
- if not File.exists?(dir) then
- Dir.mkdir(dir)
- end
- f = File.new(filename, "w")
- f.write("# Autogenerated Script, don't edit by hand!\n\n")
- f.write("$datadir = " + $datadir.inspect() + "\n")
- f.write("$recent_files = " + $recent_files.inspect() + "\n")
- f.write("\n# EOF #\n")
- end
- end
- $config = SuperTuxConfig.new()
- if !$datadir then
- $datadir = File.expand_path("~/projects/supertux/trunk/supertux/data/")+"/"
- end
- require_relative "data.rb"
- require_relative "WorldMap.rb"
- require_relative "WorldMapObject.rb"
- require_relative "TileMap.rb"
- require_relative "LispWriter.rb"
- require_relative "tileset.rb"
- require_relative "level.rb"
- require_relative "sector.rb"
- require_relative "sprite.rb"
- require_relative "util.rb"
- $tileset = Tileset.new(32)
- $tileset.load($datadir + "images/tiles.strf")
- $tileset.create_ungrouped_tiles_group()
- $gui = SuperTuxGUI.new(width, height)
- if !$recent_files then
- $recent_files = []
- end
- $recent_files.each do |filename|
- $gui.recent_files_menu.add_item($mysprite, filename, proc{ supertux_load_level(filename) })
- end
- if ARGV == []
- Level.new(100, 50).activate($gui.workspace)
- else
- supertux_load_level(ARGV[0])
- end
- $gui.gui_toggle_minimap()
- $gui.gui_toggle_minimap()
- $gui.gui_show_interactive()
- $gui.gui_show_current()
- $gui.set_tilemap_paint_tool()
- if not File.exist?($datadir) then
- dialog = GenericDialog.new("Specify the SuperTux data directory and restart", $gui.gui.get_component())
- dialog.add_label("You need to specify the datadir where SuperTux is located")
- dialog.add_string("Datadir:", $datadir)
-
- dialog.set_block { |datadir|
- $datadir = datadir
- }
- end
- $gui.run()
- $config.save($config_file)
- puts "Cleanup"
- $gui = nil
- $config = nil
- $tilemap_paint_tool = nil
- $tilemap_select_tool = nil
- $zoom_tool = nil
- $zoom2_tool = nil
- $workspace_move_tool = nil
- $objmap_select_tool = nil
- $game_objects = nil
- GC.start
- GC.start
- GC.start
- GC.start
- puts "Cleanup done"
- at_exit{flexlay.deinit()}
|