source: golgotha/src/golg/editor/commands/file_stuff.cc

Last change on this file was 80, checked in by Sam Hocevar, 11 years ago
  • Adding the Golgotha source code. Not sure what's going to be interesting in there, but since it's all public domain, there's certainly stuff to pick up.
File size: 1.2 KB
Line 
1/********************************************************************** <BR>
2  This file is part of Crack dot Com's free source code release of
3  Golgotha. <a href="http://www.crack.com/golgotha_release"> <BR> for
4  information about compiling & licensing issues visit this URL</a>
5  <PRE> If that doesn't help, contact Jonathan Clark at
6  golgotha_source@usa.net (Subject should have "GOLG" in it)
7***********************************************************************/
8
9#include "lisp/li_init.hh"
10#include "lisp/lisp.hh"
11#include "map.hh"
12#include "map_man.hh"
13
14li_object *g1_reload_map(li_object *o, li_environment *env)
15{
16  i4_str *fname=new i4_str(g1_get_map()->get_filename());
17 
18  g1_load_level(*fname, 0, G1_MAP_VIEW_POSITIONS);
19  delete fname;
20
21  li_call("redraw_all");
22
23  return 0;
24}
25
26
27li_object *g1_full_reload_map(li_object *o, li_environment *env)
28{
29  i4_str *fname=new i4_str(g1_get_map()->get_filename());
30 
31  g1_load_level(*fname, 1, G1_MAP_VIEW_POSITIONS);
32  delete fname;
33
34  li_call("redraw_all");
35
36  return 0;
37}
38
39
40li_automatic_add_function(g1_reload_map, "reload_level");
41li_automatic_add_function(g1_full_reload_map, "full_reload_level");
Note: See TracBrowser for help on using the repository browser.