Replaced more lisp::Lisp/lisp::Writer with Reader/Writer

[supertux.git] / data / scripts / default.nut

diff --git a/data/scripts/default.nut b/data/scripts/default.nut
index f3a262e..8667057 100644 (file)
--- a/data/scripts/default.nut
+++ b/data/scripts/default.nut
@@ -2,9 +2,20 @@
  * This script gets loaded into the squirrel root vm in supertux. So functions
  * and variables you define here can be used in all threads
  */
+
+//Create Level table
+Level <- {
+  finish=Level_finish,
+  spawn=Level_spawn,
+  flip_vertically=Level_flip_vertically,
+  toggle_pause=Level_toggle_pause,
+  edit=Level_edit
+};
+
+
 function end_level()
 {
-  Sound.play_music("music/leveldone.ogg");
+  play_music("music/leveldone.ogg");
   Tux.deactivate();
   wait(6);
   Effect.fade_out(2);
@@ -26,3 +37,6 @@ function println(val)
        print("\n");
 }
 
+if(! ("state" in this))
+  state <- {};
+