data/levels/world1/world.nut

   1 if(! ("intro_displayed" in state)) {
   2         println("Display intro");
   3         load_level("levels/world1/intro.stl");
   4         println("Wait for screenswitch");
   5         wait_for_screenswitch();
   6         println("ok1");
   7         wait_for_screenswitch();
   8         println("ok2");
   9         state.intro_displayed <- true;
  10         save_state();
  11 }
  12
  13 if(! ("world" in state)) {
  14         println("No worldfound");
  15         state.world <- "levels/world1/worldmap.stwm";
  16         save_state();
  17 }
  18
  19 // load worldmap and wait till it is displayed
  20 load_worldmap(state.world);
  21 wait_for_screenswitch();
  22 save_state();
  23
  24 worldthread <- get_current_thread();
  25 // wait for worldchanges
  26 while(true) {
  27         ::suspend();
  28         exit_screen();
  29         load_worldmap(state.world);
  30         save_state();
  31 }
  32