another try
[supertux.git] / src / scripting / wrapper.cpp
index d28de47..bd1353a 100644 (file)
@@ -18,28 +18,28 @@ namespace Scripting
 namespace Wrapper
 {
 
-static int DisplayEffect_release_hook(SQUserPointer ptr, int )
+static SQInteger DisplayEffect_release_hook(SQUserPointer ptr, int )
 {
   Scripting::DisplayEffect* _this = reinterpret_cast<Scripting::DisplayEffect*> (ptr);
   delete _this;
   return 0;
 }
 
-static int DisplayEffect_fade_out_wrapper(HSQUIRRELVM vm)
+static SQInteger DisplayEffect_fade_out_wrapper(HSQUIRRELVM vm)
 {
   Scripting::DisplayEffect* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'fade_out' called without instance"));
     return SQ_ERROR;
   }
-  float arg0;
+  SQFloat arg0;
   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a float"));
     return SQ_ERROR;
   }
   
   try {
-    _this->fade_out(arg0);
+    _this->fade_out(static_cast<float> (arg0));
   
     return 0;
   
@@ -53,21 +53,21 @@ static int DisplayEffect_fade_out_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int DisplayEffect_fade_in_wrapper(HSQUIRRELVM vm)
+static SQInteger DisplayEffect_fade_in_wrapper(HSQUIRRELVM vm)
 {
   Scripting::DisplayEffect* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'fade_in' called without instance"));
     return SQ_ERROR;
   }
-  float arg0;
+  SQFloat arg0;
   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a float"));
     return SQ_ERROR;
   }
   
   try {
-    _this->fade_in(arg0);
+    _this->fade_in(static_cast<float> (arg0));
   
     return 0;
   
@@ -81,7 +81,7 @@ static int DisplayEffect_fade_in_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int DisplayEffect_set_black_wrapper(HSQUIRRELVM vm)
+static SQInteger DisplayEffect_set_black_wrapper(HSQUIRRELVM vm)
 {
   Scripting::DisplayEffect* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -95,7 +95,7 @@ static int DisplayEffect_set_black_wrapper(HSQUIRRELVM vm)
   }
   
   try {
-    _this->set_black(arg0);
+    _this->set_black(arg0 == SQTrue);
   
     return 0;
   
@@ -109,7 +109,7 @@ static int DisplayEffect_set_black_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int DisplayEffect_is_black_wrapper(HSQUIRRELVM vm)
+static SQInteger DisplayEffect_is_black_wrapper(HSQUIRRELVM vm)
 {
   Scripting::DisplayEffect* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -133,21 +133,21 @@ static int DisplayEffect_is_black_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int DisplayEffect_sixteen_to_nine_wrapper(HSQUIRRELVM vm)
+static SQInteger DisplayEffect_sixteen_to_nine_wrapper(HSQUIRRELVM vm)
 {
   Scripting::DisplayEffect* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'sixteen_to_nine' called without instance"));
     return SQ_ERROR;
   }
-  float arg0;
+  SQFloat arg0;
   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a float"));
     return SQ_ERROR;
   }
   
   try {
-    _this->sixteen_to_nine(arg0);
+    _this->sixteen_to_nine(static_cast<float> (arg0));
   
     return 0;
   
@@ -161,21 +161,21 @@ static int DisplayEffect_sixteen_to_nine_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int DisplayEffect_four_to_three_wrapper(HSQUIRRELVM vm)
+static SQInteger DisplayEffect_four_to_three_wrapper(HSQUIRRELVM vm)
 {
   Scripting::DisplayEffect* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'four_to_three' called without instance"));
     return SQ_ERROR;
   }
-  float arg0;
+  SQFloat arg0;
   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a float"));
     return SQ_ERROR;
   }
   
   try {
-    _this->four_to_three(arg0);
+    _this->four_to_three(static_cast<float> (arg0));
   
     return 0;
   
@@ -189,38 +189,38 @@ static int DisplayEffect_four_to_three_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int Camera_release_hook(SQUserPointer ptr, int )
+static SQInteger Camera_release_hook(SQUserPointer ptr, int )
 {
   Scripting::Camera* _this = reinterpret_cast<Scripting::Camera*> (ptr);
   delete _this;
   return 0;
 }
 
-static int Camera_shake_wrapper(HSQUIRRELVM vm)
+static SQInteger Camera_shake_wrapper(HSQUIRRELVM vm)
 {
   Scripting::Camera* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'shake' called without instance"));
     return SQ_ERROR;
   }
-  float arg0;
+  SQFloat arg0;
   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a float"));
     return SQ_ERROR;
   }
-  float arg1;
+  SQFloat arg1;
   if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
     sq_throwerror(vm, _SC("Argument 2 not a float"));
     return SQ_ERROR;
   }
-  float arg2;
+  SQFloat arg2;
   if(SQ_FAILED(sq_getfloat(vm, 4, &arg2))) {
     sq_throwerror(vm, _SC("Argument 3 not a float"));
     return SQ_ERROR;
   }
   
   try {
-    _this->shake(arg0, arg1, arg2);
+    _this->shake(static_cast<float> (arg0), static_cast<float> (arg1), static_cast<float> (arg2));
   
     return 0;
   
@@ -234,26 +234,26 @@ static int Camera_shake_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int Camera_set_pos_wrapper(HSQUIRRELVM vm)
+static SQInteger Camera_set_pos_wrapper(HSQUIRRELVM vm)
 {
   Scripting::Camera* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'set_pos' called without instance"));
     return SQ_ERROR;
   }
-  float arg0;
+  SQFloat arg0;
   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a float"));
     return SQ_ERROR;
   }
-  float arg1;
+  SQFloat arg1;
   if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
     sq_throwerror(vm, _SC("Argument 2 not a float"));
     return SQ_ERROR;
   }
   
   try {
-    _this->set_pos(arg0, arg1);
+    _this->set_pos(static_cast<float> (arg0), static_cast<float> (arg1));
   
     return 0;
   
@@ -267,14 +267,14 @@ static int Camera_set_pos_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int Camera_set_mode_wrapper(HSQUIRRELVM vm)
+static SQInteger Camera_set_mode_wrapper(HSQUIRRELVM vm)
 {
   Scripting::Camera* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'set_mode' called without instance"));
     return SQ_ERROR;
   }
-  const char* arg0;
+  const SQChar* arg0;
   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a string"));
     return SQ_ERROR;
@@ -295,31 +295,31 @@ static int Camera_set_mode_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int Camera_scroll_to_wrapper(HSQUIRRELVM vm)
+static SQInteger Camera_scroll_to_wrapper(HSQUIRRELVM vm)
 {
   Scripting::Camera* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'scroll_to' called without instance"));
     return SQ_ERROR;
   }
-  float arg0;
+  SQFloat arg0;
   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a float"));
     return SQ_ERROR;
   }
-  float arg1;
+  SQFloat arg1;
   if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
     sq_throwerror(vm, _SC("Argument 2 not a float"));
     return SQ_ERROR;
   }
-  float arg2;
+  SQFloat arg2;
   if(SQ_FAILED(sq_getfloat(vm, 4, &arg2))) {
     sq_throwerror(vm, _SC("Argument 3 not a float"));
     return SQ_ERROR;
   }
   
   try {
-    _this->scroll_to(arg0, arg1, arg2);
+    _this->scroll_to(static_cast<float> (arg0), static_cast<float> (arg1), static_cast<float> (arg2));
   
     return 0;
   
@@ -333,14 +333,14 @@ static int Camera_scroll_to_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int Level_release_hook(SQUserPointer ptr, int )
+static SQInteger Level_release_hook(SQUserPointer ptr, int )
 {
   Scripting::Level* _this = reinterpret_cast<Scripting::Level*> (ptr);
   delete _this;
   return 0;
 }
 
-static int Level_finish_wrapper(HSQUIRRELVM vm)
+static SQInteger Level_finish_wrapper(HSQUIRRELVM vm)
 {
   Scripting::Level* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -354,7 +354,7 @@ static int Level_finish_wrapper(HSQUIRRELVM vm)
   }
   
   try {
-    _this->finish(arg0);
+    _this->finish(arg0 == SQTrue);
   
     return 0;
   
@@ -368,19 +368,19 @@ static int Level_finish_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int Level_spawn_wrapper(HSQUIRRELVM vm)
+static SQInteger Level_spawn_wrapper(HSQUIRRELVM vm)
 {
   Scripting::Level* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'spawn' called without instance"));
     return SQ_ERROR;
   }
-  const char* arg0;
+  const SQChar* arg0;
   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a string"));
     return SQ_ERROR;
   }
-  const char* arg1;
+  const SQChar* arg1;
   if(SQ_FAILED(sq_getstring(vm, 3, &arg1))) {
     sq_throwerror(vm, _SC("Argument 2 not a string"));
     return SQ_ERROR;
@@ -401,7 +401,7 @@ static int Level_spawn_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int Level_flip_vertically_wrapper(HSQUIRRELVM vm)
+static SQInteger Level_flip_vertically_wrapper(HSQUIRRELVM vm)
 {
   Scripting::Level* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -424,21 +424,44 @@ static int Level_flip_vertically_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int ScriptedObject_release_hook(SQUserPointer ptr, int )
+static SQInteger Level_toggle_pause_wrapper(HSQUIRRELVM vm)
+{
+  Scripting::Level* _this;
+  if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
+    sq_throwerror(vm, _SC("'toggle_pause' called without instance"));
+    return SQ_ERROR;
+  }
+  
+  try {
+    _this->toggle_pause();
+  
+    return 0;
+  
+  } catch(std::exception& e) {
+    sq_throwerror(vm, e.what());
+    return SQ_ERROR;
+  } catch(...) {
+    sq_throwerror(vm, _SC("Unexpected exception while executing function 'toggle_pause'"));
+    return SQ_ERROR;
+  }
+  
+}
+
+static SQInteger ScriptedObject_release_hook(SQUserPointer ptr, int )
 {
   Scripting::ScriptedObject* _this = reinterpret_cast<Scripting::ScriptedObject*> (ptr);
   delete _this;
   return 0;
 }
 
-static int ScriptedObject_set_action_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_set_action_wrapper(HSQUIRRELVM vm)
 {
   Scripting::ScriptedObject* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'set_action' called without instance"));
     return SQ_ERROR;
   }
-  const char* arg0;
+  const SQChar* arg0;
   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a string"));
     return SQ_ERROR;
@@ -459,7 +482,7 @@ static int ScriptedObject_set_action_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int ScriptedObject_get_action_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_get_action_wrapper(HSQUIRRELVM vm)
 {
   Scripting::ScriptedObject* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -483,26 +506,26 @@ static int ScriptedObject_get_action_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int ScriptedObject_move_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_move_wrapper(HSQUIRRELVM vm)
 {
   Scripting::ScriptedObject* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'move' called without instance"));
     return SQ_ERROR;
   }
-  float arg0;
+  SQFloat arg0;
   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a float"));
     return SQ_ERROR;
   }
-  float arg1;
+  SQFloat arg1;
   if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
     sq_throwerror(vm, _SC("Argument 2 not a float"));
     return SQ_ERROR;
   }
   
   try {
-    _this->move(arg0, arg1);
+    _this->move(static_cast<float> (arg0), static_cast<float> (arg1));
   
     return 0;
   
@@ -516,26 +539,26 @@ static int ScriptedObject_move_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int ScriptedObject_set_pos_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_set_pos_wrapper(HSQUIRRELVM vm)
 {
   Scripting::ScriptedObject* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'set_pos' called without instance"));
     return SQ_ERROR;
   }
-  float arg0;
+  SQFloat arg0;
   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a float"));
     return SQ_ERROR;
   }
-  float arg1;
+  SQFloat arg1;
   if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
     sq_throwerror(vm, _SC("Argument 2 not a float"));
     return SQ_ERROR;
   }
   
   try {
-    _this->set_pos(arg0, arg1);
+    _this->set_pos(static_cast<float> (arg0), static_cast<float> (arg1));
   
     return 0;
   
@@ -549,7 +572,7 @@ static int ScriptedObject_set_pos_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int ScriptedObject_get_pos_x_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_get_pos_x_wrapper(HSQUIRRELVM vm)
 {
   Scripting::ScriptedObject* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -573,7 +596,7 @@ static int ScriptedObject_get_pos_x_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int ScriptedObject_get_pos_y_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_get_pos_y_wrapper(HSQUIRRELVM vm)
 {
   Scripting::ScriptedObject* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -597,26 +620,26 @@ static int ScriptedObject_get_pos_y_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int ScriptedObject_set_velocity_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_set_velocity_wrapper(HSQUIRRELVM vm)
 {
   Scripting::ScriptedObject* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'set_velocity' called without instance"));
     return SQ_ERROR;
   }
-  float arg0;
+  SQFloat arg0;
   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a float"));
     return SQ_ERROR;
   }
-  float arg1;
+  SQFloat arg1;
   if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
     sq_throwerror(vm, _SC("Argument 2 not a float"));
     return SQ_ERROR;
   }
   
   try {
-    _this->set_velocity(arg0, arg1);
+    _this->set_velocity(static_cast<float> (arg0), static_cast<float> (arg1));
   
     return 0;
   
@@ -630,7 +653,7 @@ static int ScriptedObject_set_velocity_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int ScriptedObject_get_velocity_x_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_get_velocity_x_wrapper(HSQUIRRELVM vm)
 {
   Scripting::ScriptedObject* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -654,7 +677,7 @@ static int ScriptedObject_get_velocity_x_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int ScriptedObject_get_velocity_y_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_get_velocity_y_wrapper(HSQUIRRELVM vm)
 {
   Scripting::ScriptedObject* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -678,7 +701,7 @@ static int ScriptedObject_get_velocity_y_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int ScriptedObject_set_visible_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_set_visible_wrapper(HSQUIRRELVM vm)
 {
   Scripting::ScriptedObject* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -692,7 +715,7 @@ static int ScriptedObject_set_visible_wrapper(HSQUIRRELVM vm)
   }
   
   try {
-    _this->set_visible(arg0);
+    _this->set_visible(arg0 == SQTrue);
   
     return 0;
   
@@ -706,7 +729,7 @@ static int ScriptedObject_set_visible_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int ScriptedObject_is_visible_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_is_visible_wrapper(HSQUIRRELVM vm)
 {
   Scripting::ScriptedObject* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -730,7 +753,7 @@ static int ScriptedObject_is_visible_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int ScriptedObject_get_name_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_get_name_wrapper(HSQUIRRELVM vm)
 {
   Scripting::ScriptedObject* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -754,21 +777,21 @@ static int ScriptedObject_get_name_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int Text_release_hook(SQUserPointer ptr, int )
+static SQInteger Text_release_hook(SQUserPointer ptr, int )
 {
   Scripting::Text* _this = reinterpret_cast<Scripting::Text*> (ptr);
   delete _this;
   return 0;
 }
 
-static int Text_set_text_wrapper(HSQUIRRELVM vm)
+static SQInteger Text_set_text_wrapper(HSQUIRRELVM vm)
 {
   Scripting::Text* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'set_text' called without instance"));
     return SQ_ERROR;
   }
-  const char* arg0;
+  const SQChar* arg0;
   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a string"));
     return SQ_ERROR;
@@ -789,14 +812,14 @@ static int Text_set_text_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int Text_set_font_wrapper(HSQUIRRELVM vm)
+static SQInteger Text_set_font_wrapper(HSQUIRRELVM vm)
 {
   Scripting::Text* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'set_font' called without instance"));
     return SQ_ERROR;
   }
-  const char* arg0;
+  const SQChar* arg0;
   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a string"));
     return SQ_ERROR;
@@ -817,21 +840,21 @@ static int Text_set_font_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int Text_fade_in_wrapper(HSQUIRRELVM vm)
+static SQInteger Text_fade_in_wrapper(HSQUIRRELVM vm)
 {
   Scripting::Text* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'fade_in' called without instance"));
     return SQ_ERROR;
   }
-  float arg0;
+  SQFloat arg0;
   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a float"));
     return SQ_ERROR;
   }
   
   try {
-    _this->fade_in(arg0);
+    _this->fade_in(static_cast<float> (arg0));
   
     return 0;
   
@@ -845,21 +868,21 @@ static int Text_fade_in_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int Text_fade_out_wrapper(HSQUIRRELVM vm)
+static SQInteger Text_fade_out_wrapper(HSQUIRRELVM vm)
 {
   Scripting::Text* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'fade_out' called without instance"));
     return SQ_ERROR;
   }
-  float arg0;
+  SQFloat arg0;
   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a float"));
     return SQ_ERROR;
   }
   
   try {
-    _this->fade_out(arg0);
+    _this->fade_out(static_cast<float> (arg0));
   
     return 0;
   
@@ -873,7 +896,7 @@ static int Text_fade_out_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int Text_set_visible_wrapper(HSQUIRRELVM vm)
+static SQInteger Text_set_visible_wrapper(HSQUIRRELVM vm)
 {
   Scripting::Text* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -887,7 +910,7 @@ static int Text_set_visible_wrapper(HSQUIRRELVM vm)
   }
   
   try {
-    _this->set_visible(arg0);
+    _this->set_visible(arg0 == SQTrue);
   
     return 0;
   
@@ -901,7 +924,7 @@ static int Text_set_visible_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int Text_set_centered_wrapper(HSQUIRRELVM vm)
+static SQInteger Text_set_centered_wrapper(HSQUIRRELVM vm)
 {
   Scripting::Text* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -915,7 +938,7 @@ static int Text_set_centered_wrapper(HSQUIRRELVM vm)
   }
   
   try {
-    _this->set_centered(arg0);
+    _this->set_centered(arg0 == SQTrue);
   
     return 0;
   
@@ -929,21 +952,21 @@ static int Text_set_centered_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int Player_release_hook(SQUserPointer ptr, int )
+static SQInteger Player_release_hook(SQUserPointer ptr, int )
 {
   Scripting::Player* _this = reinterpret_cast<Scripting::Player*> (ptr);
   delete _this;
   return 0;
 }
 
-static int Player_add_bonus_wrapper(HSQUIRRELVM vm)
+static SQInteger Player_add_bonus_wrapper(HSQUIRRELVM vm)
 {
   Scripting::Player* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'add_bonus' called without instance"));
     return SQ_ERROR;
   }
-  const char* arg0;
+  const SQChar* arg0;
   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a string"));
     return SQ_ERROR;
@@ -964,21 +987,21 @@ static int Player_add_bonus_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int Player_add_coins_wrapper(HSQUIRRELVM vm)
+static SQInteger Player_add_coins_wrapper(HSQUIRRELVM vm)
 {
   Scripting::Player* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'add_coins' called without instance"));
     return SQ_ERROR;
   }
-  int arg0;
+  SQInteger arg0;
   if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not an integer"));
     return SQ_ERROR;
   }
   
   try {
-    _this->add_coins(arg0);
+    _this->add_coins(static_cast<int> (arg0));
   
     return 0;
   
@@ -992,7 +1015,7 @@ static int Player_add_coins_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int Player_make_invincible_wrapper(HSQUIRRELVM vm)
+static SQInteger Player_make_invincible_wrapper(HSQUIRRELVM vm)
 {
   Scripting::Player* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -1015,7 +1038,7 @@ static int Player_make_invincible_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int Player_deactivate_wrapper(HSQUIRRELVM vm)
+static SQInteger Player_deactivate_wrapper(HSQUIRRELVM vm)
 {
   Scripting::Player* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -1038,7 +1061,7 @@ static int Player_deactivate_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int Player_activate_wrapper(HSQUIRRELVM vm)
+static SQInteger Player_activate_wrapper(HSQUIRRELVM vm)
 {
   Scripting::Player* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -1061,21 +1084,21 @@ static int Player_activate_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int Player_walk_wrapper(HSQUIRRELVM vm)
+static SQInteger Player_walk_wrapper(HSQUIRRELVM vm)
 {
   Scripting::Player* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'walk' called without instance"));
     return SQ_ERROR;
   }
-  float arg0;
+  SQFloat arg0;
   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a float"));
     return SQ_ERROR;
   }
   
   try {
-    _this->walk(arg0);
+    _this->walk(static_cast<float> (arg0));
   
     return 0;
   
@@ -1089,7 +1112,7 @@ static int Player_walk_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int Player_set_visible_wrapper(HSQUIRRELVM vm)
+static SQInteger Player_set_visible_wrapper(HSQUIRRELVM vm)
 {
   Scripting::Player* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -1103,7 +1126,7 @@ static int Player_set_visible_wrapper(HSQUIRRELVM vm)
   }
   
   try {
-    _this->set_visible(arg0);
+    _this->set_visible(arg0 == SQTrue);
   
     return 0;
   
@@ -1117,7 +1140,7 @@ static int Player_set_visible_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int Player_get_visible_wrapper(HSQUIRRELVM vm)
+static SQInteger Player_get_visible_wrapper(HSQUIRRELVM vm)
 {
   Scripting::Player* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -1141,16 +1164,44 @@ static int Player_get_visible_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int FloatingImage_release_hook(SQUserPointer ptr, int )
+static SQInteger Player_kill_wrapper(HSQUIRRELVM vm)
+{
+  Scripting::Player* _this;
+  if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
+    sq_throwerror(vm, _SC("'kill' called without instance"));
+    return SQ_ERROR;
+  }
+  SQBool arg0;
+  if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
+    sq_throwerror(vm, _SC("Argument 1 not a bool"));
+    return SQ_ERROR;
+  }
+  
+  try {
+    _this->kill(arg0 == SQTrue);
+  
+    return 0;
+  
+  } catch(std::exception& e) {
+    sq_throwerror(vm, e.what());
+    return SQ_ERROR;
+  } catch(...) {
+    sq_throwerror(vm, _SC("Unexpected exception while executing function 'kill'"));
+    return SQ_ERROR;
+  }
+  
+}
+
+static SQInteger FloatingImage_release_hook(SQUserPointer ptr, int )
 {
   Scripting::FloatingImage* _this = reinterpret_cast<Scripting::FloatingImage*> (ptr);
   delete _this;
   return 0;
 }
 
-static int FloatingImage_constructor_wrapper(HSQUIRRELVM vm)
+static SQInteger FloatingImage_constructor_wrapper(HSQUIRRELVM vm)
 {
-  const char* arg0;
+  const SQChar* arg0;
   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a string"));
     return SQ_ERROR;
@@ -1176,21 +1227,21 @@ static int FloatingImage_constructor_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int FloatingImage_set_layer_wrapper(HSQUIRRELVM vm)
+static SQInteger FloatingImage_set_layer_wrapper(HSQUIRRELVM vm)
 {
   Scripting::FloatingImage* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'set_layer' called without instance"));
     return SQ_ERROR;
   }
-  int arg0;
+  SQInteger arg0;
   if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not an integer"));
     return SQ_ERROR;
   }
   
   try {
-    _this->set_layer(arg0);
+    _this->set_layer(static_cast<int> (arg0));
   
     return 0;
   
@@ -1204,7 +1255,7 @@ static int FloatingImage_set_layer_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int FloatingImage_get_layer_wrapper(HSQUIRRELVM vm)
+static SQInteger FloatingImage_get_layer_wrapper(HSQUIRRELVM vm)
 {
   Scripting::FloatingImage* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -1228,26 +1279,26 @@ static int FloatingImage_get_layer_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int FloatingImage_set_pos_wrapper(HSQUIRRELVM vm)
+static SQInteger FloatingImage_set_pos_wrapper(HSQUIRRELVM vm)
 {
   Scripting::FloatingImage* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'set_pos' called without instance"));
     return SQ_ERROR;
   }
-  float arg0;
+  SQFloat arg0;
   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a float"));
     return SQ_ERROR;
   }
-  float arg1;
+  SQFloat arg1;
   if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
     sq_throwerror(vm, _SC("Argument 2 not a float"));
     return SQ_ERROR;
   }
   
   try {
-    _this->set_pos(arg0, arg1);
+    _this->set_pos(static_cast<float> (arg0), static_cast<float> (arg1));
   
     return 0;
   
@@ -1261,7 +1312,7 @@ static int FloatingImage_set_pos_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int FloatingImage_get_pos_x_wrapper(HSQUIRRELVM vm)
+static SQInteger FloatingImage_get_pos_x_wrapper(HSQUIRRELVM vm)
 {
   Scripting::FloatingImage* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -1285,7 +1336,7 @@ static int FloatingImage_get_pos_x_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int FloatingImage_get_pos_y_wrapper(HSQUIRRELVM vm)
+static SQInteger FloatingImage_get_pos_y_wrapper(HSQUIRRELVM vm)
 {
   Scripting::FloatingImage* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -1309,21 +1360,21 @@ static int FloatingImage_get_pos_y_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int FloatingImage_set_anchor_point_wrapper(HSQUIRRELVM vm)
+static SQInteger FloatingImage_set_anchor_point_wrapper(HSQUIRRELVM vm)
 {
   Scripting::FloatingImage* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
     sq_throwerror(vm, _SC("'set_anchor_point' called without instance"));
     return SQ_ERROR;
   }
-  int arg0;
+  SQInteger arg0;
   if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not an integer"));
     return SQ_ERROR;
   }
   
   try {
-    _this->set_anchor_point(arg0);
+    _this->set_anchor_point(static_cast<int> (arg0));
   
     return 0;
   
@@ -1337,7 +1388,7 @@ static int FloatingImage_set_anchor_point_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int FloatingImage_get_anchor_point_wrapper(HSQUIRRELVM vm)
+static SQInteger FloatingImage_get_anchor_point_wrapper(HSQUIRRELVM vm)
 {
   Scripting::FloatingImage* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -1361,7 +1412,7 @@ static int FloatingImage_get_anchor_point_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int FloatingImage_set_visible_wrapper(HSQUIRRELVM vm)
+static SQInteger FloatingImage_set_visible_wrapper(HSQUIRRELVM vm)
 {
   Scripting::FloatingImage* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -1375,7 +1426,7 @@ static int FloatingImage_set_visible_wrapper(HSQUIRRELVM vm)
   }
   
   try {
-    _this->set_visible(arg0);
+    _this->set_visible(arg0 == SQTrue);
   
     return 0;
   
@@ -1389,7 +1440,7 @@ static int FloatingImage_set_visible_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int FloatingImage_get_visible_wrapper(HSQUIRRELVM vm)
+static SQInteger FloatingImage_get_visible_wrapper(HSQUIRRELVM vm)
 {
   Scripting::FloatingImage* _this;
   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
@@ -1413,12 +1464,64 @@ static int FloatingImage_get_visible_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int display_wrapper(HSQUIRRELVM vm)
+static SQInteger FloatingImage_set_action_wrapper(HSQUIRRELVM vm)
+{
+  Scripting::FloatingImage* _this;
+  if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
+    sq_throwerror(vm, _SC("'set_action' called without instance"));
+    return SQ_ERROR;
+  }
+  const SQChar* arg0;
+  if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
+    sq_throwerror(vm, _SC("Argument 1 not a string"));
+    return SQ_ERROR;
+  }
+  
+  try {
+    _this->set_action(arg0);
+  
+    return 0;
+  
+  } catch(std::exception& e) {
+    sq_throwerror(vm, e.what());
+    return SQ_ERROR;
+  } catch(...) {
+    sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_action'"));
+    return SQ_ERROR;
+  }
+  
+}
+
+static SQInteger FloatingImage_get_action_wrapper(HSQUIRRELVM vm)
+{
+  Scripting::FloatingImage* _this;
+  if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
+    sq_throwerror(vm, _SC("'get_action' called without instance"));
+    return SQ_ERROR;
+  }
+  
+  try {
+    std::string return_value = _this->get_action();
+  
+    sq_pushstring(vm, return_value.c_str(), return_value.size());
+    return 1;
+  
+  } catch(std::exception& e) {
+    sq_throwerror(vm, e.what());
+    return SQ_ERROR;
+  } catch(...) {
+    sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_action'"));
+    return SQ_ERROR;
+  }
+  
+}
+
+static SQInteger display_wrapper(HSQUIRRELVM vm)
 {
   return Scripting::display(vm);
 }
 
-static int print_stacktrace_wrapper(HSQUIRRELVM vm)
+static SQInteger print_stacktrace_wrapper(HSQUIRRELVM vm)
 {
   HSQUIRRELVM arg0 = vm;
   
@@ -1437,14 +1540,14 @@ static int print_stacktrace_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int get_current_thread_wrapper(HSQUIRRELVM vm)
+static SQInteger get_current_thread_wrapper(HSQUIRRELVM vm)
 {
   return Scripting::get_current_thread(vm);
 }
 
-static int display_text_file_wrapper(HSQUIRRELVM vm)
+static SQInteger display_text_file_wrapper(HSQUIRRELVM vm)
 {
-  const char* arg0;
+  const SQChar* arg0;
   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a string"));
     return SQ_ERROR;
@@ -1465,9 +1568,9 @@ static int display_text_file_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int load_worldmap_wrapper(HSQUIRRELVM vm)
+static SQInteger load_worldmap_wrapper(HSQUIRRELVM vm)
 {
-  const char* arg0;
+  const SQChar* arg0;
   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a string"));
     return SQ_ERROR;
@@ -1488,9 +1591,9 @@ static int load_worldmap_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int load_level_wrapper(HSQUIRRELVM vm)
+static SQInteger load_level_wrapper(HSQUIRRELVM vm)
 {
-  const char* arg0;
+  const SQChar* arg0;
   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a string"));
     return SQ_ERROR;
@@ -1511,17 +1614,17 @@ static int load_level_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int wait_wrapper(HSQUIRRELVM vm)
+static SQInteger wait_wrapper(HSQUIRRELVM vm)
 {
   HSQUIRRELVM arg0 = vm;
-  float arg1;
+  SQFloat arg1;
   if(SQ_FAILED(sq_getfloat(vm, 2, &arg1))) {
     sq_throwerror(vm, _SC("Argument 1 not a float"));
     return SQ_ERROR;
   }
   
   try {
-    Scripting::wait(arg0, arg1);
+    Scripting::wait(arg0, static_cast<float> (arg1));
   
     return sq_suspendvm(vm);
   
@@ -1535,7 +1638,7 @@ static int wait_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int wait_for_screenswitch_wrapper(HSQUIRRELVM vm)
+static SQInteger wait_for_screenswitch_wrapper(HSQUIRRELVM vm)
 {
   HSQUIRRELVM arg0 = vm;
   
@@ -1554,7 +1657,7 @@ static int wait_for_screenswitch_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int exit_screen_wrapper(HSQUIRRELVM vm)
+static SQInteger exit_screen_wrapper(HSQUIRRELVM vm)
 {
   (void) vm;
   
@@ -1573,16 +1676,16 @@ static int exit_screen_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int fadeout_screen_wrapper(HSQUIRRELVM vm)
+static SQInteger fadeout_screen_wrapper(HSQUIRRELVM vm)
 {
-  float arg0;
+  SQFloat arg0;
   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a float"));
     return SQ_ERROR;
   }
   
   try {
-    Scripting::fadeout_screen(arg0);
+    Scripting::fadeout_screen(static_cast<float> (arg0));
   
     return 0;
   
@@ -1596,26 +1699,26 @@ static int fadeout_screen_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int shrink_screen_wrapper(HSQUIRRELVM vm)
+static SQInteger shrink_screen_wrapper(HSQUIRRELVM vm)
 {
-  float arg0;
+  SQFloat arg0;
   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a float"));
     return SQ_ERROR;
   }
-  float arg1;
+  SQFloat arg1;
   if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
     sq_throwerror(vm, _SC("Argument 2 not a float"));
     return SQ_ERROR;
   }
-  float arg2;
+  SQFloat arg2;
   if(SQ_FAILED(sq_getfloat(vm, 4, &arg2))) {
     sq_throwerror(vm, _SC("Argument 3 not a float"));
     return SQ_ERROR;
   }
   
   try {
-    Scripting::shrink_screen(arg0, arg1, arg2);
+    Scripting::shrink_screen(static_cast<float> (arg0), static_cast<float> (arg1), static_cast<float> (arg2));
   
     return 0;
   
@@ -1629,9 +1732,9 @@ static int shrink_screen_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int translate_wrapper(HSQUIRRELVM vm)
+static SQInteger translate_wrapper(HSQUIRRELVM vm)
 {
-  const char* arg0;
+  const SQChar* arg0;
   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a string"));
     return SQ_ERROR;
@@ -1653,10 +1756,10 @@ static int translate_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int import_wrapper(HSQUIRRELVM vm)
+static SQInteger import_wrapper(HSQUIRRELVM vm)
 {
   HSQUIRRELVM arg0 = vm;
-  const char* arg1;
+  const SQChar* arg1;
   if(SQ_FAILED(sq_getstring(vm, 2, &arg1))) {
     sq_throwerror(vm, _SC("Argument 1 not a string"));
     return SQ_ERROR;
@@ -1677,7 +1780,7 @@ static int import_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int save_state_wrapper(HSQUIRRELVM vm)
+static SQInteger save_state_wrapper(HSQUIRRELVM vm)
 {
   (void) vm;
   
@@ -1696,30 +1799,7 @@ static int save_state_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int add_key_wrapper(HSQUIRRELVM vm)
-{
-  int arg0;
-  if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) {
-    sq_throwerror(vm, _SC("Argument 1 not an integer"));
-    return SQ_ERROR;
-  }
-  
-  try {
-    Scripting::add_key(arg0);
-  
-    return 0;
-  
-  } catch(std::exception& e) {
-    sq_throwerror(vm, e.what());
-    return SQ_ERROR;
-  } catch(...) {
-    sq_throwerror(vm, _SC("Unexpected exception while executing function 'add_key'"));
-    return SQ_ERROR;
-  }
-  
-}
-
-static int debug_collrects_wrapper(HSQUIRRELVM vm)
+static SQInteger debug_collrects_wrapper(HSQUIRRELVM vm)
 {
   SQBool arg0;
   if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
@@ -1728,7 +1808,7 @@ static int debug_collrects_wrapper(HSQUIRRELVM vm)
   }
   
   try {
-    Scripting::debug_collrects(arg0);
+    Scripting::debug_collrects(arg0 == SQTrue);
   
     return 0;
   
@@ -1742,7 +1822,7 @@ static int debug_collrects_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int debug_draw_fps_wrapper(HSQUIRRELVM vm)
+static SQInteger debug_draw_fps_wrapper(HSQUIRRELVM vm)
 {
   SQBool arg0;
   if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
@@ -1751,7 +1831,7 @@ static int debug_draw_fps_wrapper(HSQUIRRELVM vm)
   }
   
   try {
-    Scripting::debug_draw_fps(arg0);
+    Scripting::debug_draw_fps(arg0 == SQTrue);
   
     return 0;
   
@@ -1765,7 +1845,7 @@ static int debug_draw_fps_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int debug_draw_solids_only_wrapper(HSQUIRRELVM vm)
+static SQInteger debug_draw_solids_only_wrapper(HSQUIRRELVM vm)
 {
   SQBool arg0;
   if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
@@ -1774,7 +1854,7 @@ static int debug_draw_solids_only_wrapper(HSQUIRRELVM vm)
   }
   
   try {
-    Scripting::debug_draw_solids_only(arg0);
+    Scripting::debug_draw_solids_only(arg0 == SQTrue);
   
     return 0;
   
@@ -1788,9 +1868,9 @@ static int debug_draw_solids_only_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int play_music_wrapper(HSQUIRRELVM vm)
+static SQInteger play_music_wrapper(HSQUIRRELVM vm)
 {
-  const char* arg0;
+  const SQChar* arg0;
   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a string"));
     return SQ_ERROR;
@@ -1811,9 +1891,9 @@ static int play_music_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int play_sound_wrapper(HSQUIRRELVM vm)
+static SQInteger play_sound_wrapper(HSQUIRRELVM vm)
 {
-  const char* arg0;
+  const SQChar* arg0;
   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
     sq_throwerror(vm, _SC("Argument 1 not a string"));
     return SQ_ERROR;
@@ -1834,7 +1914,7 @@ static int play_sound_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int grease_wrapper(HSQUIRRELVM vm)
+static SQInteger grease_wrapper(HSQUIRRELVM vm)
 {
   (void) vm;
   
@@ -1853,7 +1933,7 @@ static int grease_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int invincible_wrapper(HSQUIRRELVM vm)
+static SQInteger invincible_wrapper(HSQUIRRELVM vm)
 {
   (void) vm;
   
@@ -1872,7 +1952,7 @@ static int invincible_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int mortal_wrapper(HSQUIRRELVM vm)
+static SQInteger mortal_wrapper(HSQUIRRELVM vm)
 {
   (void) vm;
   
@@ -1891,31 +1971,12 @@ static int mortal_wrapper(HSQUIRRELVM vm)
   
 }
 
-static int shrink_wrapper(HSQUIRRELVM vm)
-{
-  (void) vm;
-  
-  try {
-    Scripting::shrink();
-  
-    return 0;
-  
-  } catch(std::exception& e) {
-    sq_throwerror(vm, e.what());
-    return SQ_ERROR;
-  } catch(...) {
-    sq_throwerror(vm, _SC("Unexpected exception while executing function 'shrink'"));
-    return SQ_ERROR;
-  }
-  
-}
-
-static int kill_wrapper(HSQUIRRELVM vm)
+static SQInteger restart_wrapper(HSQUIRRELVM vm)
 {
   (void) vm;
   
   try {
-    Scripting::kill();
+    Scripting::restart();
   
     return 0;
   
@@ -1923,18 +1984,18 @@ static int kill_wrapper(HSQUIRRELVM vm)
     sq_throwerror(vm, e.what());
     return SQ_ERROR;
   } catch(...) {
-    sq_throwerror(vm, _SC("Unexpected exception while executing function 'kill'"));
+    sq_throwerror(vm, _SC("Unexpected exception while executing function 'restart'"));
     return SQ_ERROR;
   }
   
 }
 
-static int restart_wrapper(HSQUIRRELVM vm)
+static SQInteger whereami_wrapper(HSQUIRRELVM vm)
 {
   (void) vm;
   
   try {
-    Scripting::restart();
+    Scripting::whereami();
   
     return 0;
   
@@ -1942,18 +2003,18 @@ static int restart_wrapper(HSQUIRRELVM vm)
     sq_throwerror(vm, e.what());
     return SQ_ERROR;
   } catch(...) {
-    sq_throwerror(vm, _SC("Unexpected exception while executing function 'restart'"));
+    sq_throwerror(vm, _SC("Unexpected exception while executing function 'whereami'"));
     return SQ_ERROR;
   }
   
 }
 
-static int whereami_wrapper(HSQUIRRELVM vm)
+static SQInteger gotoend_wrapper(HSQUIRRELVM vm)
 {
   (void) vm;
   
   try {
-    Scripting::whereami();
+    Scripting::gotoend();
   
     return 0;
   
@@ -1961,18 +2022,18 @@ static int whereami_wrapper(HSQUIRRELVM vm)
     sq_throwerror(vm, e.what());
     return SQ_ERROR;
   } catch(...) {
-    sq_throwerror(vm, _SC("Unexpected exception while executing function 'whereami'"));
+    sq_throwerror(vm, _SC("Unexpected exception while executing function 'gotoend'"));
     return SQ_ERROR;
   }
   
 }
 
-static int gotoend_wrapper(HSQUIRRELVM vm)
+static SQInteger camera_wrapper(HSQUIRRELVM vm)
 {
   (void) vm;
   
   try {
-    Scripting::gotoend();
+    Scripting::camera();
   
     return 0;
   
@@ -1980,18 +2041,18 @@ static int gotoend_wrapper(HSQUIRRELVM vm)
     sq_throwerror(vm, e.what());
     return SQ_ERROR;
   } catch(...) {
-    sq_throwerror(vm, _SC("Unexpected exception while executing function 'gotoend'"));
+    sq_throwerror(vm, _SC("Unexpected exception while executing function 'camera'"));
     return SQ_ERROR;
   }
   
 }
 
-static int camera_wrapper(HSQUIRRELVM vm)
+static SQInteger quit_wrapper(HSQUIRRELVM vm)
 {
   (void) vm;
   
   try {
-    Scripting::camera();
+    Scripting::quit();
   
     return 0;
   
@@ -1999,26 +2060,26 @@ static int camera_wrapper(HSQUIRRELVM vm)
     sq_throwerror(vm, e.what());
     return SQ_ERROR;
   } catch(...) {
-    sq_throwerror(vm, _SC("Unexpected exception while executing function 'camera'"));
+    sq_throwerror(vm, _SC("Unexpected exception while executing function 'quit'"));
     return SQ_ERROR;
   }
   
 }
 
-static int quit_wrapper(HSQUIRRELVM vm)
+static SQInteger rand_wrapper(HSQUIRRELVM vm)
 {
-  (void) vm;
   
   try {
-    Scripting::quit();
+    int return_value = Scripting::rand();
   
-    return 0;
+    sq_pushinteger(vm, return_value);
+    return 1;
   
   } catch(std::exception& e) {
     sq_throwerror(vm, e.what());
     return SQ_ERROR;
   } catch(...) {
-    sq_throwerror(vm, _SC("Unexpected exception while executing function 'quit'"));
+    sq_throwerror(vm, _SC("Unexpected exception while executing function 'rand'"));
     return SQ_ERROR;
   }
   
@@ -2212,36 +2273,6 @@ void register_supertux_wrapper(HSQUIRRELVM v)
 {
   using namespace Wrapper;
 
-  sq_pushstring(v, "KEY_BRASS", -1);
-  sq_pushinteger(v, 1);
-  if(SQ_FAILED(sq_createslot(v, -3))) {
-    throw SquirrelError(v, "Couldn't register constant 'KEY_BRASS'");
-  }
-
-  sq_pushstring(v, "KEY_IRON", -1);
-  sq_pushinteger(v, 2);
-  if(SQ_FAILED(sq_createslot(v, -3))) {
-    throw SquirrelError(v, "Couldn't register constant 'KEY_IRON'");
-  }
-
-  sq_pushstring(v, "KEY_BRONZE", -1);
-  sq_pushinteger(v, 4);
-  if(SQ_FAILED(sq_createslot(v, -3))) {
-    throw SquirrelError(v, "Couldn't register constant 'KEY_BRONZE'");
-  }
-
-  sq_pushstring(v, "KEY_SILVER", -1);
-  sq_pushinteger(v, 8);
-  if(SQ_FAILED(sq_createslot(v, -3))) {
-    throw SquirrelError(v, "Couldn't register constant 'KEY_SILVER'");
-  }
-
-  sq_pushstring(v, "KEY_GOLD", -1);
-  sq_pushinteger(v, 16);
-  if(SQ_FAILED(sq_createslot(v, -3))) {
-    throw SquirrelError(v, "Couldn't register constant 'KEY_GOLD'");
-  }
-
   sq_pushstring(v, "ANCHOR_TOP", -1);
   sq_pushinteger(v, 16);
   if(SQ_FAILED(sq_createslot(v, -3))) {
@@ -2380,12 +2411,6 @@ void register_supertux_wrapper(HSQUIRRELVM v)
     throw SquirrelError(v, "Couldn't register function 'save_state'");
   }
 
-  sq_pushstring(v, "add_key", -1);
-  sq_newclosure(v, &add_key_wrapper, 0);
-  if(SQ_FAILED(sq_createslot(v, -3))) {
-    throw SquirrelError(v, "Couldn't register function 'add_key'");
-  }
-
   sq_pushstring(v, "debug_collrects", -1);
   sq_newclosure(v, &debug_collrects_wrapper, 0);
   if(SQ_FAILED(sq_createslot(v, -3))) {
@@ -2434,18 +2459,6 @@ void register_supertux_wrapper(HSQUIRRELVM v)
     throw SquirrelError(v, "Couldn't register function 'mortal'");
   }
 
-  sq_pushstring(v, "shrink", -1);
-  sq_newclosure(v, &shrink_wrapper, 0);
-  if(SQ_FAILED(sq_createslot(v, -3))) {
-    throw SquirrelError(v, "Couldn't register function 'shrink'");
-  }
-
-  sq_pushstring(v, "kill", -1);
-  sq_newclosure(v, &kill_wrapper, 0);
-  if(SQ_FAILED(sq_createslot(v, -3))) {
-    throw SquirrelError(v, "Couldn't register function 'kill'");
-  }
-
   sq_pushstring(v, "restart", -1);
   sq_newclosure(v, &restart_wrapper, 0);
   if(SQ_FAILED(sq_createslot(v, -3))) {
@@ -2476,6 +2489,12 @@ void register_supertux_wrapper(HSQUIRRELVM v)
     throw SquirrelError(v, "Couldn't register function 'quit'");
   }
 
+  sq_pushstring(v, "rand", -1);
+  sq_newclosure(v, &rand_wrapper, 0);
+  if(SQ_FAILED(sq_createslot(v, -3))) {
+    throw SquirrelError(v, "Couldn't register function 'rand'");
+  }
+
   // Register class DisplayEffect
   sq_pushstring(v, "DisplayEffect", -1);
   if(sq_newclass(v, SQFalse) < 0) {
@@ -2583,6 +2602,12 @@ void register_supertux_wrapper(HSQUIRRELVM v)
     throw SquirrelError(v, "Couldn't register function 'flip_vertically'");
   }
 
+  sq_pushstring(v, "toggle_pause", -1);
+  sq_newclosure(v, &Level_toggle_pause_wrapper, 0);
+  if(SQ_FAILED(sq_createslot(v, -3))) {
+    throw SquirrelError(v, "Couldn't register function 'toggle_pause'");
+  }
+
   if(SQ_FAILED(sq_createslot(v, -3))) {
     throw SquirrelError(v, "Couldn't register class 'Level'");
   }
@@ -2772,6 +2797,12 @@ void register_supertux_wrapper(HSQUIRRELVM v)
     throw SquirrelError(v, "Couldn't register function 'get_visible'");
   }
 
+  sq_pushstring(v, "kill", -1);
+  sq_newclosure(v, &Player_kill_wrapper, 0);
+  if(SQ_FAILED(sq_createslot(v, -3))) {
+    throw SquirrelError(v, "Couldn't register function 'kill'");
+  }
+
   if(SQ_FAILED(sq_createslot(v, -3))) {
     throw SquirrelError(v, "Couldn't register class 'Player'");
   }
@@ -2843,6 +2874,18 @@ void register_supertux_wrapper(HSQUIRRELVM v)
     throw SquirrelError(v, "Couldn't register function 'get_visible'");
   }
 
+  sq_pushstring(v, "set_action", -1);
+  sq_newclosure(v, &FloatingImage_set_action_wrapper, 0);
+  if(SQ_FAILED(sq_createslot(v, -3))) {
+    throw SquirrelError(v, "Couldn't register function 'set_action'");
+  }
+
+  sq_pushstring(v, "get_action", -1);
+  sq_newclosure(v, &FloatingImage_get_action_wrapper, 0);
+  if(SQ_FAILED(sq_createslot(v, -3))) {
+    throw SquirrelError(v, "Couldn't register function 'get_action'");
+  }
+
   if(SQ_FAILED(sq_createslot(v, -3))) {
     throw SquirrelError(v, "Couldn't register class 'FloatingImage'");
   }