X-Git-Url: https://git.verplant.org/?a=blobdiff_plain;f=src%2Fscripting%2Fwrapper.cpp;h=6ee9ab6f8062d1403319cfcc7e1605a676751599;hb=c38774eb23527f0e99a3d90e023ade6074100144;hp=6f1f202807265336b7d684a5177f829e6b10e8f4;hpb=d963f8dc3d2c4e432d3eeecd15351169e10243da;p=supertux.git diff --git a/src/scripting/wrapper.cpp b/src/scripting/wrapper.cpp index 6f1f20280..6ee9ab6f8 100644 --- a/src/scripting/wrapper.cpp +++ b/src/scripting/wrapper.cpp @@ -18,28 +18,29 @@ namespace Scripting namespace Wrapper { -static int DisplayEffect_release_hook(SQUserPointer ptr, int ) +static SQInteger DisplayEffect_release_hook(SQUserPointer ptr, SQInteger ) { Scripting::DisplayEffect* _this = reinterpret_cast (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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'fade_out' called without instance")); return SQ_ERROR; } - float arg0; + Scripting::DisplayEffect* _this = reinterpret_cast (data); + 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 (arg0)); return 0; @@ -53,21 +54,22 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'fade_in' called without instance")); return SQ_ERROR; } - float arg0; + Scripting::DisplayEffect* _this = reinterpret_cast (data); + 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 (arg0)); return 0; @@ -81,13 +83,14 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'set_black' called without instance")); return SQ_ERROR; } + Scripting::DisplayEffect* _this = reinterpret_cast (data); SQBool arg0; if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) { sq_throwerror(vm, _SC("Argument 1 not a bool")); @@ -95,7 +98,7 @@ static int DisplayEffect_set_black_wrapper(HSQUIRRELVM vm) } try { - _this->set_black(arg0); + _this->set_black(arg0 == SQTrue); return 0; @@ -109,13 +112,14 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'is_black' called without instance")); return SQ_ERROR; } + Scripting::DisplayEffect* _this = reinterpret_cast (data); try { bool return_value = _this->is_black(); @@ -133,21 +137,22 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'sixteen_to_nine' called without instance")); return SQ_ERROR; } - float arg0; + Scripting::DisplayEffect* _this = reinterpret_cast (data); + 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 (arg0)); return 0; @@ -161,21 +166,22 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'four_to_three' called without instance")); return SQ_ERROR; } - float arg0; + Scripting::DisplayEffect* _this = reinterpret_cast (data); + 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 (arg0)); return 0; @@ -189,38 +195,39 @@ static int DisplayEffect_four_to_three_wrapper(HSQUIRRELVM vm) } -static int Camera_release_hook(SQUserPointer ptr, int ) +static SQInteger Camera_release_hook(SQUserPointer ptr, SQInteger ) { Scripting::Camera* _this = reinterpret_cast (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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'shake' called without instance")); return SQ_ERROR; } - float arg0; + Scripting::Camera* _this = reinterpret_cast (data); + 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 (arg0), static_cast (arg1), static_cast (arg2)); return 0; @@ -234,26 +241,27 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'set_pos' called without instance")); return SQ_ERROR; } - float arg0; + Scripting::Camera* _this = reinterpret_cast (data); + 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 (arg0), static_cast (arg1)); return 0; @@ -267,14 +275,15 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'set_mode' called without instance")); return SQ_ERROR; } - const char* arg0; + Scripting::Camera* _this = reinterpret_cast (data); + 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 +304,32 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'scroll_to' called without instance")); return SQ_ERROR; } - float arg0; + Scripting::Camera* _this = reinterpret_cast (data); + 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 (arg0), static_cast (arg1), static_cast (arg2)); return 0; @@ -333,20 +343,21 @@ static int Camera_scroll_to_wrapper(HSQUIRRELVM vm) } -static int Level_release_hook(SQUserPointer ptr, int ) +static SQInteger Level_release_hook(SQUserPointer ptr, SQInteger ) { Scripting::Level* _this = reinterpret_cast (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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'finish' called without instance")); return SQ_ERROR; } + Scripting::Level* _this = reinterpret_cast (data); SQBool arg0; if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) { sq_throwerror(vm, _SC("Argument 1 not a bool")); @@ -354,7 +365,7 @@ static int Level_finish_wrapper(HSQUIRRELVM vm) } try { - _this->finish(arg0); + _this->finish(arg0 == SQTrue); return 0; @@ -368,19 +379,20 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'spawn' called without instance")); return SQ_ERROR; } - const char* arg0; + Scripting::Level* _this = reinterpret_cast (data); + 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,13 +413,14 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'flip_vertically' called without instance")); return SQ_ERROR; } + Scripting::Level* _this = reinterpret_cast (data); try { _this->flip_vertically(); @@ -424,21 +437,46 @@ static int Level_flip_vertically_wrapper(HSQUIRRELVM vm) } -static int ScriptedObject_release_hook(SQUserPointer ptr, int ) +static SQInteger Level_toggle_pause_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'toggle_pause' called without instance")); + return SQ_ERROR; + } + Scripting::Level* _this = reinterpret_cast (data); + + 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, SQInteger ) { Scripting::ScriptedObject* _this = reinterpret_cast (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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'set_action' called without instance")); return SQ_ERROR; } - const char* arg0; + Scripting::ScriptedObject* _this = reinterpret_cast (data); + const SQChar* arg0; if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) { sq_throwerror(vm, _SC("Argument 1 not a string")); return SQ_ERROR; @@ -459,13 +497,14 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'get_action' called without instance")); return SQ_ERROR; } + Scripting::ScriptedObject* _this = reinterpret_cast (data); try { std::string return_value = _this->get_action(); @@ -483,26 +522,27 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'move' called without instance")); return SQ_ERROR; } - float arg0; + Scripting::ScriptedObject* _this = reinterpret_cast (data); + 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 (arg0), static_cast (arg1)); return 0; @@ -516,26 +556,27 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'set_pos' called without instance")); return SQ_ERROR; } - float arg0; + Scripting::ScriptedObject* _this = reinterpret_cast (data); + 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 (arg0), static_cast (arg1)); return 0; @@ -549,13 +590,14 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'get_pos_x' called without instance")); return SQ_ERROR; } + Scripting::ScriptedObject* _this = reinterpret_cast (data); try { float return_value = _this->get_pos_x(); @@ -573,13 +615,14 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'get_pos_y' called without instance")); return SQ_ERROR; } + Scripting::ScriptedObject* _this = reinterpret_cast (data); try { float return_value = _this->get_pos_y(); @@ -597,26 +640,27 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'set_velocity' called without instance")); return SQ_ERROR; } - float arg0; + Scripting::ScriptedObject* _this = reinterpret_cast (data); + 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 (arg0), static_cast (arg1)); return 0; @@ -630,13 +674,14 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'get_velocity_x' called without instance")); return SQ_ERROR; } + Scripting::ScriptedObject* _this = reinterpret_cast (data); try { float return_value = _this->get_velocity_x(); @@ -654,13 +699,14 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'get_velocity_y' called without instance")); return SQ_ERROR; } + Scripting::ScriptedObject* _this = reinterpret_cast (data); try { float return_value = _this->get_velocity_y(); @@ -678,13 +724,14 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'set_visible' called without instance")); return SQ_ERROR; } + Scripting::ScriptedObject* _this = reinterpret_cast (data); SQBool arg0; if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) { sq_throwerror(vm, _SC("Argument 1 not a bool")); @@ -692,7 +739,7 @@ static int ScriptedObject_set_visible_wrapper(HSQUIRRELVM vm) } try { - _this->set_visible(arg0); + _this->set_visible(arg0 == SQTrue); return 0; @@ -706,13 +753,14 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'is_visible' called without instance")); return SQ_ERROR; } + Scripting::ScriptedObject* _this = reinterpret_cast (data); try { bool return_value = _this->is_visible(); @@ -730,13 +778,68 @@ static int ScriptedObject_is_visible_wrapper(HSQUIRRELVM vm) } -static int ScriptedObject_get_name_wrapper(HSQUIRRELVM vm) +static SQInteger ScriptedObject_set_solid_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'set_solid' called without instance")); + return SQ_ERROR; + } + Scripting::ScriptedObject* _this = reinterpret_cast (data); + SQBool arg0; + if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) { + sq_throwerror(vm, _SC("Argument 1 not a bool")); + return SQ_ERROR; + } + + try { + _this->set_solid(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 'set_solid'")); + return SQ_ERROR; + } + +} + +static SQInteger ScriptedObject_is_solid_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'is_solid' called without instance")); + return SQ_ERROR; + } + Scripting::ScriptedObject* _this = reinterpret_cast (data); + + try { + bool return_value = _this->is_solid(); + + sq_pushbool(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 'is_solid'")); + return SQ_ERROR; + } + +} + +static SQInteger ScriptedObject_get_name_wrapper(HSQUIRRELVM vm) { - Scripting::ScriptedObject* _this; - if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'get_name' called without instance")); return SQ_ERROR; } + Scripting::ScriptedObject* _this = reinterpret_cast (data); try { std::string return_value = _this->get_name(); @@ -754,21 +857,22 @@ static int ScriptedObject_get_name_wrapper(HSQUIRRELVM vm) } -static int Text_release_hook(SQUserPointer ptr, int ) +static SQInteger Text_release_hook(SQUserPointer ptr, SQInteger ) { Scripting::Text* _this = reinterpret_cast (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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'set_text' called without instance")); return SQ_ERROR; } - const char* arg0; + Scripting::Text* _this = reinterpret_cast (data); + 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 +893,15 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'set_font' called without instance")); return SQ_ERROR; } - const char* arg0; + Scripting::Text* _this = reinterpret_cast (data); + 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 +922,22 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'fade_in' called without instance")); return SQ_ERROR; } - float arg0; + Scripting::Text* _this = reinterpret_cast (data); + 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 (arg0)); return 0; @@ -845,21 +951,22 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'fade_out' called without instance")); return SQ_ERROR; } - float arg0; + Scripting::Text* _this = reinterpret_cast (data); + 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 (arg0)); return 0; @@ -873,13 +980,14 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'set_visible' called without instance")); return SQ_ERROR; } + Scripting::Text* _this = reinterpret_cast (data); SQBool arg0; if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) { sq_throwerror(vm, _SC("Argument 1 not a bool")); @@ -887,7 +995,7 @@ static int Text_set_visible_wrapper(HSQUIRRELVM vm) } try { - _this->set_visible(arg0); + _this->set_visible(arg0 == SQTrue); return 0; @@ -901,13 +1009,14 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'set_centered' called without instance")); return SQ_ERROR; } + Scripting::Text* _this = reinterpret_cast (data); SQBool arg0; if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) { sq_throwerror(vm, _SC("Argument 1 not a bool")); @@ -915,7 +1024,7 @@ static int Text_set_centered_wrapper(HSQUIRRELVM vm) } try { - _this->set_centered(arg0); + _this->set_centered(arg0 == SQTrue); return 0; @@ -929,30 +1038,32 @@ static int Text_set_centered_wrapper(HSQUIRRELVM vm) } -static int Player_release_hook(SQUserPointer ptr, int ) +static SQInteger Player_release_hook(SQUserPointer ptr, SQInteger ) { Scripting::Player* _this = reinterpret_cast (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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'add_bonus' called without instance")); return SQ_ERROR; } - const char* arg0; + Scripting::Player* _this = reinterpret_cast (data); + 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->add_bonus(arg0); + bool return_value = _this->add_bonus(arg0); - return 0; + sq_pushbool(vm, return_value); + return 1; } catch(std::exception& e) { sq_throwerror(vm, e.what()); @@ -964,21 +1075,22 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'add_coins' called without instance")); return SQ_ERROR; } - int arg0; + Scripting::Player* _this = reinterpret_cast (data); + 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 (arg0)); return 0; @@ -992,13 +1104,14 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'make_invincible' called without instance")); return SQ_ERROR; } + Scripting::Player* _this = reinterpret_cast (data); try { _this->make_invincible(); @@ -1015,13 +1128,14 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'deactivate' called without instance")); return SQ_ERROR; } + Scripting::Player* _this = reinterpret_cast (data); try { _this->deactivate(); @@ -1038,13 +1152,14 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'activate' called without instance")); return SQ_ERROR; } + Scripting::Player* _this = reinterpret_cast (data); try { _this->activate(); @@ -1061,21 +1176,22 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'walk' called without instance")); return SQ_ERROR; } - float arg0; + Scripting::Player* _this = reinterpret_cast (data); + 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 (arg0)); return 0; @@ -1089,13 +1205,14 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'set_visible' called without instance")); return SQ_ERROR; } + Scripting::Player* _this = reinterpret_cast (data); SQBool arg0; if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) { sq_throwerror(vm, _SC("Argument 1 not a bool")); @@ -1103,7 +1220,7 @@ static int Player_set_visible_wrapper(HSQUIRRELVM vm) } try { - _this->set_visible(arg0); + _this->set_visible(arg0 == SQTrue); return 0; @@ -1117,13 +1234,14 @@ 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 (&_this), 0))) { + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { sq_throwerror(vm, _SC("'get_visible' called without instance")); return SQ_ERROR; } + Scripting::Player* _this = reinterpret_cast (data); try { bool return_value = _this->get_visible(); @@ -1141,28 +1259,22 @@ static int Player_get_visible_wrapper(HSQUIRRELVM vm) } -static int FloatingImage_release_hook(SQUserPointer ptr, int ) -{ - Scripting::FloatingImage* _this = reinterpret_cast (ptr); - delete _this; - return 0; -} - -static int FloatingImage_constructor_wrapper(HSQUIRRELVM vm) +static SQInteger Player_kill_wrapper(HSQUIRRELVM vm) { - const char* arg0; - if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) { - sq_throwerror(vm, _SC("Argument 1 not a string")); + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'kill' called without instance")); return SQ_ERROR; } - - try { - Scripting::FloatingImage* _this = new Scripting::FloatingImage(arg0); - if(SQ_FAILED(sq_setinstanceup(vm, 1, _this))) { - sq_throwerror(vm, _SC("Couldn't setup instance of 'FloatingImage' class")); + Scripting::Player* _this = reinterpret_cast (data); + SQBool arg0; + if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) { + sq_throwerror(vm, _SC("Argument 1 not a bool")); return SQ_ERROR; } - sq_setreleasehook(vm, 1, FloatingImage_release_hook); + + try { + _this->kill(arg0 == SQTrue); return 0; @@ -1170,27 +1282,28 @@ static int FloatingImage_constructor_wrapper(HSQUIRRELVM vm) sq_throwerror(vm, e.what()); return SQ_ERROR; } catch(...) { - sq_throwerror(vm, _SC("Unexpected exception while executing function 'constructor'")); + sq_throwerror(vm, _SC("Unexpected exception while executing function 'kill'")); return SQ_ERROR; } } -static int FloatingImage_set_layer_wrapper(HSQUIRRELVM vm) +static SQInteger Player_set_ghost_mode_wrapper(HSQUIRRELVM vm) { - Scripting::FloatingImage* _this; - if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast (&_this), 0))) { - sq_throwerror(vm, _SC("'set_layer' called without instance")); + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'set_ghost_mode' called without instance")); return SQ_ERROR; } - int arg0; - if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) { - sq_throwerror(vm, _SC("Argument 1 not an integer")); + Scripting::Player* _this = reinterpret_cast (data); + SQBool arg0; + if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) { + sq_throwerror(vm, _SC("Argument 1 not a bool")); return SQ_ERROR; } try { - _this->set_layer(arg0); + _this->set_ghost_mode(arg0 == SQTrue); return 0; @@ -1198,56 +1311,48 @@ static int FloatingImage_set_layer_wrapper(HSQUIRRELVM vm) sq_throwerror(vm, e.what()); return SQ_ERROR; } catch(...) { - sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_layer'")); + sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_ghost_mode'")); return SQ_ERROR; } } -static int FloatingImage_get_layer_wrapper(HSQUIRRELVM vm) +static SQInteger Player_get_ghost_mode_wrapper(HSQUIRRELVM vm) { - Scripting::FloatingImage* _this; - if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast (&_this), 0))) { - sq_throwerror(vm, _SC("'get_layer' called without instance")); + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'get_ghost_mode' called without instance")); return SQ_ERROR; } + Scripting::Player* _this = reinterpret_cast (data); try { - int return_value = _this->get_layer(); + bool return_value = _this->get_ghost_mode(); - sq_pushinteger(vm, return_value); + sq_pushbool(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 'get_layer'")); + sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_ghost_mode'")); return SQ_ERROR; } } -static int FloatingImage_set_pos_wrapper(HSQUIRRELVM vm) +static SQInteger Player_do_cheer_wrapper(HSQUIRRELVM vm) { - Scripting::FloatingImage* _this; - if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast (&_this), 0))) { - sq_throwerror(vm, _SC("'set_pos' called without instance")); - return SQ_ERROR; - } - float arg0; - if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) { - sq_throwerror(vm, _SC("Argument 1 not a float")); - return SQ_ERROR; - } - float arg1; - if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) { - sq_throwerror(vm, _SC("Argument 2 not a float")); + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'do_cheer' called without instance")); return SQ_ERROR; } + Scripting::Player* _this = reinterpret_cast (data); try { - _this->set_pos(arg0, arg1); + _this->do_cheer(); return 0; @@ -1255,75 +1360,71 @@ static int FloatingImage_set_pos_wrapper(HSQUIRRELVM vm) sq_throwerror(vm, e.what()); return SQ_ERROR; } catch(...) { - sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_pos'")); + sq_throwerror(vm, _SC("Unexpected exception while executing function 'do_cheer'")); return SQ_ERROR; } } -static int FloatingImage_get_pos_x_wrapper(HSQUIRRELVM vm) +static SQInteger Player_do_duck_wrapper(HSQUIRRELVM vm) { - Scripting::FloatingImage* _this; - if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast (&_this), 0))) { - sq_throwerror(vm, _SC("'get_pos_x' called without instance")); + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'do_duck' called without instance")); return SQ_ERROR; } + Scripting::Player* _this = reinterpret_cast (data); try { - float return_value = _this->get_pos_x(); + _this->do_duck(); - sq_pushfloat(vm, return_value); - return 1; + return 0; } catch(std::exception& e) { sq_throwerror(vm, e.what()); return SQ_ERROR; } catch(...) { - sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_pos_x'")); + sq_throwerror(vm, _SC("Unexpected exception while executing function 'do_duck'")); return SQ_ERROR; } } -static int FloatingImage_get_pos_y_wrapper(HSQUIRRELVM vm) +static SQInteger Player_do_standup_wrapper(HSQUIRRELVM vm) { - Scripting::FloatingImage* _this; - if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast (&_this), 0))) { - sq_throwerror(vm, _SC("'get_pos_y' called without instance")); + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'do_standup' called without instance")); return SQ_ERROR; } + Scripting::Player* _this = reinterpret_cast (data); try { - float return_value = _this->get_pos_y(); + _this->do_standup(); - sq_pushfloat(vm, return_value); - return 1; + return 0; } catch(std::exception& e) { sq_throwerror(vm, e.what()); return SQ_ERROR; } catch(...) { - sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_pos_y'")); + sq_throwerror(vm, _SC("Unexpected exception while executing function 'do_standup'")); return SQ_ERROR; } } -static int FloatingImage_set_anchor_point_wrapper(HSQUIRRELVM vm) +static SQInteger Player_do_backflip_wrapper(HSQUIRRELVM vm) { - Scripting::FloatingImage* _this; - if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast (&_this), 0))) { - sq_throwerror(vm, _SC("'set_anchor_point' called without instance")); - return SQ_ERROR; - } - int arg0; - if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) { - sq_throwerror(vm, _SC("Argument 1 not an integer")); + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'do_backflip' called without instance")); return SQ_ERROR; } + Scripting::Player* _this = reinterpret_cast (data); try { - _this->set_anchor_point(arg0); + _this->do_backflip(); return 0; @@ -1331,51 +1432,57 @@ static int FloatingImage_set_anchor_point_wrapper(HSQUIRRELVM vm) sq_throwerror(vm, e.what()); return SQ_ERROR; } catch(...) { - sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_anchor_point'")); + sq_throwerror(vm, _SC("Unexpected exception while executing function 'do_backflip'")); return SQ_ERROR; } } -static int FloatingImage_get_anchor_point_wrapper(HSQUIRRELVM vm) +static SQInteger Player_do_jump_wrapper(HSQUIRRELVM vm) { - Scripting::FloatingImage* _this; - if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast (&_this), 0))) { - sq_throwerror(vm, _SC("'get_anchor_point' called without instance")); + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'do_jump' called without instance")); + return SQ_ERROR; + } + Scripting::Player* _this = reinterpret_cast (data); + SQFloat arg0; + if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) { + sq_throwerror(vm, _SC("Argument 1 not a float")); return SQ_ERROR; } try { - int return_value = _this->get_anchor_point(); + _this->do_jump(static_cast (arg0)); - sq_pushinteger(vm, return_value); - return 1; + return 0; } catch(std::exception& e) { sq_throwerror(vm, e.what()); return SQ_ERROR; } catch(...) { - sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_anchor_point'")); + sq_throwerror(vm, _SC("Unexpected exception while executing function 'do_jump'")); return SQ_ERROR; } } -static int FloatingImage_set_visible_wrapper(HSQUIRRELVM vm) +static SQInteger Player_trigger_sequence_wrapper(HSQUIRRELVM vm) { - Scripting::FloatingImage* _this; - if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast (&_this), 0))) { - sq_throwerror(vm, _SC("'set_visible' called without instance")); + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'trigger_sequence' 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")); + Scripting::Player* _this = reinterpret_cast (data); + 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_visible(arg0); + _this->trigger_sequence(arg0); return 0; @@ -1383,51 +1490,63 @@ static int FloatingImage_set_visible_wrapper(HSQUIRRELVM vm) sq_throwerror(vm, e.what()); return SQ_ERROR; } catch(...) { - sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_visible'")); + sq_throwerror(vm, _SC("Unexpected exception while executing function 'trigger_sequence'")); return SQ_ERROR; } } -static int FloatingImage_get_visible_wrapper(HSQUIRRELVM vm) +static SQInteger FloatingImage_release_hook(SQUserPointer ptr, SQInteger ) { - Scripting::FloatingImage* _this; - if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast (&_this), 0))) { - sq_throwerror(vm, _SC("'get_visible' called without instance")); + Scripting::FloatingImage* _this = reinterpret_cast (ptr); + delete _this; + return 0; +} + +static SQInteger FloatingImage_constructor_wrapper(HSQUIRRELVM vm) +{ + const SQChar* arg0; + if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) { + sq_throwerror(vm, _SC("Argument 1 not a string")); return SQ_ERROR; } try { - bool return_value = _this->get_visible(); + Scripting::FloatingImage* _this = new Scripting::FloatingImage(arg0); + if(SQ_FAILED(sq_setinstanceup(vm, 1, _this))) { + sq_throwerror(vm, _SC("Couldn't setup instance of 'FloatingImage' class")); + return SQ_ERROR; + } + sq_setreleasehook(vm, 1, FloatingImage_release_hook); - sq_pushbool(vm, return_value); - return 1; + return 0; } catch(std::exception& e) { sq_throwerror(vm, e.what()); return SQ_ERROR; } catch(...) { - sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_visible'")); + sq_throwerror(vm, _SC("Unexpected exception while executing function 'constructor'")); return SQ_ERROR; } } -static int FloatingImage_set_action_wrapper(HSQUIRRELVM vm) +static SQInteger FloatingImage_set_layer_wrapper(HSQUIRRELVM vm) { - Scripting::FloatingImage* _this; - if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast (&_this), 0))) { - sq_throwerror(vm, _SC("'set_action' called without instance")); + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'set_layer' called without instance")); return SQ_ERROR; } - const char* arg0; - if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) { - sq_throwerror(vm, _SC("Argument 1 not a string")); + Scripting::FloatingImage* _this = reinterpret_cast (data); + 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_action(arg0); + _this->set_layer(static_cast (arg0)); return 0; @@ -1435,254 +1554,1129 @@ static int FloatingImage_set_action_wrapper(HSQUIRRELVM vm) sq_throwerror(vm, e.what()); return SQ_ERROR; } catch(...) { - sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_action'")); + sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_layer'")); return SQ_ERROR; } } -static int FloatingImage_get_action_wrapper(HSQUIRRELVM vm) +static SQInteger FloatingImage_get_layer_wrapper(HSQUIRRELVM vm) { - Scripting::FloatingImage* _this; - if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast (&_this), 0))) { - sq_throwerror(vm, _SC("'get_action' called without instance")); + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'get_layer' called without instance")); return SQ_ERROR; } + Scripting::FloatingImage* _this = reinterpret_cast (data); try { - std::string return_value = _this->get_action(); + int return_value = _this->get_layer(); - sq_pushstring(vm, return_value.c_str(), return_value.size()); + 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 'get_action'")); + sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_layer'")); return SQ_ERROR; } } -static int RandomGenerator_release_hook(SQUserPointer ptr, int ) +static SQInteger FloatingImage_set_pos_wrapper(HSQUIRRELVM vm) { - Scripting::RandomGenerator* _this = reinterpret_cast (ptr); - delete _this; - return 0; -} - -static int RandomGenerator_srand_wrapper(HSQUIRRELVM vm) -{ - Scripting::RandomGenerator* _this; - if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast (&_this), 0))) { - sq_throwerror(vm, _SC("'srand' called without instance")); + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'set_pos' called without instance")); return SQ_ERROR; } - int arg0; - if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) { - sq_throwerror(vm, _SC("Argument 1 not an integer")); + Scripting::FloatingImage* _this = reinterpret_cast (data); + SQFloat arg0; + if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) { + sq_throwerror(vm, _SC("Argument 1 not a float")); + return SQ_ERROR; + } + SQFloat arg1; + if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) { + sq_throwerror(vm, _SC("Argument 2 not a float")); return SQ_ERROR; } try { - int return_value = _this->srand(arg0); + _this->set_pos(static_cast (arg0), static_cast (arg1)); - sq_pushinteger(vm, return_value); - return 1; + return 0; } catch(std::exception& e) { sq_throwerror(vm, e.what()); return SQ_ERROR; } catch(...) { - sq_throwerror(vm, _SC("Unexpected exception while executing function 'srand'")); + sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_pos'")); return SQ_ERROR; } } -static int RandomGenerator_rand_wrapper(HSQUIRRELVM vm) +static SQInteger FloatingImage_get_pos_x_wrapper(HSQUIRRELVM vm) { - Scripting::RandomGenerator* _this; - if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast (&_this), 0))) { - sq_throwerror(vm, _SC("'rand' called without instance")); + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'get_pos_x' called without instance")); return SQ_ERROR; } + Scripting::FloatingImage* _this = reinterpret_cast (data); try { - int return_value = _this->rand(); + float return_value = _this->get_pos_x(); - sq_pushinteger(vm, return_value); + sq_pushfloat(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 'rand'")); + sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_pos_x'")); return SQ_ERROR; } } -static int RandomGenerator_rand1i_wrapper(HSQUIRRELVM vm) +static SQInteger FloatingImage_get_pos_y_wrapper(HSQUIRRELVM vm) { - Scripting::RandomGenerator* _this; - if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast (&_this), 0))) { - sq_throwerror(vm, _SC("'rand1i' called without instance")); - return SQ_ERROR; - } - int arg0; - if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) { - sq_throwerror(vm, _SC("Argument 1 not an integer")); + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'get_pos_y' called without instance")); return SQ_ERROR; } + Scripting::FloatingImage* _this = reinterpret_cast (data); try { - int return_value = _this->rand1i(arg0); + float return_value = _this->get_pos_y(); - sq_pushinteger(vm, return_value); + sq_pushfloat(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 'rand1i'")); + sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_pos_y'")); return SQ_ERROR; } } -static int RandomGenerator_rand2i_wrapper(HSQUIRRELVM vm) +static SQInteger FloatingImage_set_anchor_point_wrapper(HSQUIRRELVM vm) { - Scripting::RandomGenerator* _this; - if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast (&_this), 0))) { - sq_throwerror(vm, _SC("'rand2i' called without instance")); + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'set_anchor_point' called without instance")); return SQ_ERROR; } - int arg0; + Scripting::FloatingImage* _this = reinterpret_cast (data); + SQInteger arg0; if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) { sq_throwerror(vm, _SC("Argument 1 not an integer")); return SQ_ERROR; } - int arg1; - if(SQ_FAILED(sq_getinteger(vm, 3, &arg1))) { - sq_throwerror(vm, _SC("Argument 2 not an integer")); - return SQ_ERROR; - } try { - int return_value = _this->rand2i(arg0, arg1); + _this->set_anchor_point(static_cast (arg0)); - sq_pushinteger(vm, return_value); - return 1; + return 0; } catch(std::exception& e) { sq_throwerror(vm, e.what()); return SQ_ERROR; } catch(...) { - sq_throwerror(vm, _SC("Unexpected exception while executing function 'rand2i'")); + sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_anchor_point'")); return SQ_ERROR; } } -static int RandomGenerator_rand1f_wrapper(HSQUIRRELVM vm) +static SQInteger FloatingImage_get_anchor_point_wrapper(HSQUIRRELVM vm) { - Scripting::RandomGenerator* _this; - if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast (&_this), 0))) { - sq_throwerror(vm, _SC("'rand1f' called without instance")); - return SQ_ERROR; - } - float arg0; - if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) { - sq_throwerror(vm, _SC("Argument 1 not a float")); + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'get_anchor_point' called without instance")); return SQ_ERROR; } + Scripting::FloatingImage* _this = reinterpret_cast (data); try { - float return_value = _this->rand1f(arg0); + int return_value = _this->get_anchor_point(); - sq_pushfloat(vm, return_value); + 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 'rand1f'")); + sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_anchor_point'")); return SQ_ERROR; } } -static int RandomGenerator_rand2f_wrapper(HSQUIRRELVM vm) +static SQInteger FloatingImage_set_visible_wrapper(HSQUIRRELVM vm) { - Scripting::RandomGenerator* _this; - if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast (&_this), 0))) { - sq_throwerror(vm, _SC("'rand2f' called without instance")); - return SQ_ERROR; - } - float arg0; - if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) { - sq_throwerror(vm, _SC("Argument 1 not a float")); + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'set_visible' called without instance")); return SQ_ERROR; } - float arg1; - if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) { - sq_throwerror(vm, _SC("Argument 2 not a float")); + Scripting::FloatingImage* _this = reinterpret_cast (data); + SQBool arg0; + if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) { + sq_throwerror(vm, _SC("Argument 1 not a bool")); return SQ_ERROR; } try { - float return_value = _this->rand2f(arg0, arg1); + _this->set_visible(arg0 == SQTrue); - sq_pushfloat(vm, return_value); - return 1; + return 0; } catch(std::exception& e) { sq_throwerror(vm, e.what()); return SQ_ERROR; } catch(...) { - sq_throwerror(vm, _SC("Unexpected exception while executing function 'rand2f'")); + sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_visible'")); return SQ_ERROR; } } -static int display_wrapper(HSQUIRRELVM vm) -{ - return Scripting::display(vm); -} - -static int print_stacktrace_wrapper(HSQUIRRELVM vm) +static SQInteger FloatingImage_get_visible_wrapper(HSQUIRRELVM vm) { - HSQUIRRELVM arg0 = vm; + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'get_visible' called without instance")); + return SQ_ERROR; + } + Scripting::FloatingImage* _this = reinterpret_cast (data); try { - Scripting::print_stacktrace(arg0); + bool return_value = _this->get_visible(); - return 0; + sq_pushbool(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 'print_stacktrace'")); + sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_visible'")); return SQ_ERROR; } } -static int get_current_thread_wrapper(HSQUIRRELVM vm) +static SQInteger FloatingImage_set_action_wrapper(HSQUIRRELVM vm) { - return Scripting::get_current_thread(vm); -} + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'set_action' called without instance")); + return SQ_ERROR; + } + Scripting::FloatingImage* _this = reinterpret_cast (data); + 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) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'get_action' called without instance")); + return SQ_ERROR; + } + Scripting::FloatingImage* _this = reinterpret_cast (data); + + 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 FloatingImage_fade_in_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'fade_in' called without instance")); + return SQ_ERROR; + } + Scripting::FloatingImage* _this = reinterpret_cast (data); + 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(static_cast (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 'fade_in'")); + return SQ_ERROR; + } + +} + +static SQInteger FloatingImage_fade_out_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'fade_out' called without instance")); + return SQ_ERROR; + } + Scripting::FloatingImage* _this = reinterpret_cast (data); + 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(static_cast (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 'fade_out'")); + return SQ_ERROR; + } + +} + +static SQInteger Platform_release_hook(SQUserPointer ptr, SQInteger ) +{ + Scripting::Platform* _this = reinterpret_cast (ptr); + delete _this; + return 0; +} + +static SQInteger Platform_goto_node_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'goto_node' called without instance")); + return SQ_ERROR; + } + Scripting::Platform* _this = reinterpret_cast (data); + SQInteger arg0; + if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) { + sq_throwerror(vm, _SC("Argument 1 not an integer")); + return SQ_ERROR; + } + + try { + _this->goto_node(static_cast (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 'goto_node'")); + return SQ_ERROR; + } + +} + +static SQInteger Platform_start_moving_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'start_moving' called without instance")); + return SQ_ERROR; + } + Scripting::Platform* _this = reinterpret_cast (data); + + try { + _this->start_moving(); + + return 0; + + } catch(std::exception& e) { + sq_throwerror(vm, e.what()); + return SQ_ERROR; + } catch(...) { + sq_throwerror(vm, _SC("Unexpected exception while executing function 'start_moving'")); + return SQ_ERROR; + } + +} + +static SQInteger Platform_stop_moving_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'stop_moving' called without instance")); + return SQ_ERROR; + } + Scripting::Platform* _this = reinterpret_cast (data); + + try { + _this->stop_moving(); + + return 0; + + } catch(std::exception& e) { + sq_throwerror(vm, e.what()); + return SQ_ERROR; + } catch(...) { + sq_throwerror(vm, _SC("Unexpected exception while executing function 'stop_moving'")); + return SQ_ERROR; + } + +} + +static SQInteger Candle_release_hook(SQUserPointer ptr, SQInteger ) +{ + Scripting::Candle* _this = reinterpret_cast (ptr); + delete _this; + return 0; +} + +static SQInteger Candle_get_burning_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'get_burning' called without instance")); + return SQ_ERROR; + } + Scripting::Candle* _this = reinterpret_cast (data); + + try { + bool return_value = _this->get_burning(); + + sq_pushbool(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 'get_burning'")); + return SQ_ERROR; + } + +} + +static SQInteger Candle_set_burning_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'set_burning' called without instance")); + return SQ_ERROR; + } + Scripting::Candle* _this = reinterpret_cast (data); + SQBool arg0; + if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) { + sq_throwerror(vm, _SC("Argument 1 not a bool")); + return SQ_ERROR; + } + + try { + _this->set_burning(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 'set_burning'")); + return SQ_ERROR; + } + +} + +static SQInteger Wind_release_hook(SQUserPointer ptr, SQInteger ) +{ + Scripting::Wind* _this = reinterpret_cast (ptr); + delete _this; + return 0; +} + +static SQInteger Wind_start_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'start' called without instance")); + return SQ_ERROR; + } + Scripting::Wind* _this = reinterpret_cast (data); + + try { + _this->start(); + + return 0; + + } catch(std::exception& e) { + sq_throwerror(vm, e.what()); + return SQ_ERROR; + } catch(...) { + sq_throwerror(vm, _SC("Unexpected exception while executing function 'start'")); + return SQ_ERROR; + } + +} + +static SQInteger Wind_stop_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'stop' called without instance")); + return SQ_ERROR; + } + Scripting::Wind* _this = reinterpret_cast (data); + + try { + _this->stop(); + + return 0; + + } catch(std::exception& e) { + sq_throwerror(vm, e.what()); + return SQ_ERROR; + } catch(...) { + sq_throwerror(vm, _SC("Unexpected exception while executing function 'stop'")); + return SQ_ERROR; + } + +} + +static SQInteger AmbientSound_release_hook(SQUserPointer ptr, SQInteger ) +{ + Scripting::AmbientSound* _this = reinterpret_cast (ptr); + delete _this; + return 0; +} + +static SQInteger AmbientSound_set_pos_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'set_pos' called without instance")); + return SQ_ERROR; + } + Scripting::AmbientSound* _this = reinterpret_cast (data); + SQFloat arg0; + if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) { + sq_throwerror(vm, _SC("Argument 1 not a float")); + return SQ_ERROR; + } + 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(static_cast (arg0), static_cast (arg1)); + + 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_pos'")); + return SQ_ERROR; + } + +} + +static SQInteger AmbientSound_get_pos_x_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'get_pos_x' called without instance")); + return SQ_ERROR; + } + Scripting::AmbientSound* _this = reinterpret_cast (data); + + try { + float return_value = _this->get_pos_x(); + + sq_pushfloat(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 'get_pos_x'")); + return SQ_ERROR; + } + +} + +static SQInteger AmbientSound_get_pos_y_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'get_pos_y' called without instance")); + return SQ_ERROR; + } + Scripting::AmbientSound* _this = reinterpret_cast (data); + + try { + float return_value = _this->get_pos_y(); + + sq_pushfloat(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 'get_pos_y'")); + return SQ_ERROR; + } + +} + +static SQInteger Thunderstorm_release_hook(SQUserPointer ptr, SQInteger ) +{ + Scripting::Thunderstorm* _this = reinterpret_cast (ptr); + delete _this; + return 0; +} + +static SQInteger Thunderstorm_start_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'start' called without instance")); + return SQ_ERROR; + } + Scripting::Thunderstorm* _this = reinterpret_cast (data); + + try { + _this->start(); + + return 0; + + } catch(std::exception& e) { + sq_throwerror(vm, e.what()); + return SQ_ERROR; + } catch(...) { + sq_throwerror(vm, _SC("Unexpected exception while executing function 'start'")); + return SQ_ERROR; + } + +} + +static SQInteger Thunderstorm_stop_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'stop' called without instance")); + return SQ_ERROR; + } + Scripting::Thunderstorm* _this = reinterpret_cast (data); + + try { + _this->stop(); + + return 0; + + } catch(std::exception& e) { + sq_throwerror(vm, e.what()); + return SQ_ERROR; + } catch(...) { + sq_throwerror(vm, _SC("Unexpected exception while executing function 'stop'")); + return SQ_ERROR; + } + +} + +static SQInteger Thunderstorm_thunder_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'thunder' called without instance")); + return SQ_ERROR; + } + Scripting::Thunderstorm* _this = reinterpret_cast (data); + + try { + _this->thunder(); + + return 0; + + } catch(std::exception& e) { + sq_throwerror(vm, e.what()); + return SQ_ERROR; + } catch(...) { + sq_throwerror(vm, _SC("Unexpected exception while executing function 'thunder'")); + return SQ_ERROR; + } + +} + +static SQInteger Thunderstorm_lightning_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'lightning' called without instance")); + return SQ_ERROR; + } + Scripting::Thunderstorm* _this = reinterpret_cast (data); + + try { + _this->lightning(); + + return 0; + + } catch(std::exception& e) { + sq_throwerror(vm, e.what()); + return SQ_ERROR; + } catch(...) { + sq_throwerror(vm, _SC("Unexpected exception while executing function 'lightning'")); + return SQ_ERROR; + } + +} + +static SQInteger Thunderstorm_flash_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'flash' called without instance")); + return SQ_ERROR; + } + Scripting::Thunderstorm* _this = reinterpret_cast (data); + + try { + _this->flash(); + + return 0; + + } catch(std::exception& e) { + sq_throwerror(vm, e.what()); + return SQ_ERROR; + } catch(...) { + sq_throwerror(vm, _SC("Unexpected exception while executing function 'flash'")); + return SQ_ERROR; + } + +} + +static SQInteger Thunderstorm_electrify_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'electrify' called without instance")); + return SQ_ERROR; + } + Scripting::Thunderstorm* _this = reinterpret_cast (data); + + try { + _this->electrify(); + + return 0; + + } catch(std::exception& e) { + sq_throwerror(vm, e.what()); + return SQ_ERROR; + } catch(...) { + sq_throwerror(vm, _SC("Unexpected exception while executing function 'electrify'")); + return SQ_ERROR; + } + +} + +static SQInteger TileMap_release_hook(SQUserPointer ptr, SQInteger ) +{ + Scripting::TileMap* _this = reinterpret_cast (ptr); + delete _this; + return 0; +} + +static SQInteger TileMap_goto_node_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'goto_node' called without instance")); + return SQ_ERROR; + } + Scripting::TileMap* _this = reinterpret_cast (data); + SQInteger arg0; + if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) { + sq_throwerror(vm, _SC("Argument 1 not an integer")); + return SQ_ERROR; + } + + try { + _this->goto_node(static_cast (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 'goto_node'")); + return SQ_ERROR; + } + +} + +static SQInteger TileMap_start_moving_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'start_moving' called without instance")); + return SQ_ERROR; + } + Scripting::TileMap* _this = reinterpret_cast (data); + + try { + _this->start_moving(); + + return 0; + + } catch(std::exception& e) { + sq_throwerror(vm, e.what()); + return SQ_ERROR; + } catch(...) { + sq_throwerror(vm, _SC("Unexpected exception while executing function 'start_moving'")); + return SQ_ERROR; + } + +} + +static SQInteger TileMap_stop_moving_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'stop_moving' called without instance")); + return SQ_ERROR; + } + Scripting::TileMap* _this = reinterpret_cast (data); + + try { + _this->stop_moving(); + + return 0; + + } catch(std::exception& e) { + sq_throwerror(vm, e.what()); + return SQ_ERROR; + } catch(...) { + sq_throwerror(vm, _SC("Unexpected exception while executing function 'stop_moving'")); + return SQ_ERROR; + } + +} + +static SQInteger SSector_release_hook(SQUserPointer ptr, SQInteger ) +{ + Scripting::SSector* _this = reinterpret_cast (ptr); + delete _this; + return 0; +} + +static SQInteger SSector_set_ambient_light_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'set_ambient_light' called without instance")); + return SQ_ERROR; + } + Scripting::SSector* _this = reinterpret_cast (data); + SQFloat arg0; + if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) { + sq_throwerror(vm, _SC("Argument 1 not a float")); + return SQ_ERROR; + } + SQFloat arg1; + if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) { + sq_throwerror(vm, _SC("Argument 2 not a float")); + return SQ_ERROR; + } + SQFloat arg2; + if(SQ_FAILED(sq_getfloat(vm, 4, &arg2))) { + sq_throwerror(vm, _SC("Argument 3 not a float")); + return SQ_ERROR; + } + + try { + _this->set_ambient_light(static_cast (arg0), static_cast (arg1), static_cast (arg2)); + + 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_ambient_light'")); + return SQ_ERROR; + } + +} + +static SQInteger SSector_get_ambient_red_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'get_ambient_red' called without instance")); + return SQ_ERROR; + } + Scripting::SSector* _this = reinterpret_cast (data); + + try { + float return_value = _this->get_ambient_red(); + + sq_pushfloat(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 'get_ambient_red'")); + return SQ_ERROR; + } + +} + +static SQInteger SSector_get_ambient_green_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'get_ambient_green' called without instance")); + return SQ_ERROR; + } + Scripting::SSector* _this = reinterpret_cast (data); + + try { + float return_value = _this->get_ambient_green(); + + sq_pushfloat(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 'get_ambient_green'")); + return SQ_ERROR; + } + +} + +static SQInteger SSector_get_ambient_blue_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'get_ambient_blue' called without instance")); + return SQ_ERROR; + } + Scripting::SSector* _this = reinterpret_cast (data); + + try { + float return_value = _this->get_ambient_blue(); + + sq_pushfloat(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 'get_ambient_blue'")); + return SQ_ERROR; + } + +} + +static SQInteger LevelTime_release_hook(SQUserPointer ptr, SQInteger ) +{ + Scripting::LevelTime* _this = reinterpret_cast (ptr); + delete _this; + return 0; +} + +static SQInteger LevelTime_start_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'start' called without instance")); + return SQ_ERROR; + } + Scripting::LevelTime* _this = reinterpret_cast (data); + + try { + _this->start(); + + return 0; + + } catch(std::exception& e) { + sq_throwerror(vm, e.what()); + return SQ_ERROR; + } catch(...) { + sq_throwerror(vm, _SC("Unexpected exception while executing function 'start'")); + return SQ_ERROR; + } + +} + +static SQInteger LevelTime_stop_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'stop' called without instance")); + return SQ_ERROR; + } + Scripting::LevelTime* _this = reinterpret_cast (data); + + try { + _this->stop(); + + return 0; + + } catch(std::exception& e) { + sq_throwerror(vm, e.what()); + return SQ_ERROR; + } catch(...) { + sq_throwerror(vm, _SC("Unexpected exception while executing function 'stop'")); + return SQ_ERROR; + } + +} + +static SQInteger LevelTime_get_time_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'get_time' called without instance")); + return SQ_ERROR; + } + Scripting::LevelTime* _this = reinterpret_cast (data); + + try { + float return_value = _this->get_time(); + + sq_pushfloat(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 'get_time'")); + return SQ_ERROR; + } + +} + +static SQInteger LevelTime_set_time_wrapper(HSQUIRRELVM vm) +{ + SQUserPointer data; + if(SQ_FAILED(sq_getinstanceup(vm, 1, &data, 0))) { + sq_throwerror(vm, _SC("'set_time' called without instance")); + return SQ_ERROR; + } + Scripting::LevelTime* _this = reinterpret_cast (data); + SQFloat arg0; + if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) { + sq_throwerror(vm, _SC("Argument 1 not a float")); + return SQ_ERROR; + } + + try { + _this->set_time(static_cast (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_time'")); + return SQ_ERROR; + } + +} + +static SQInteger display_wrapper(HSQUIRRELVM vm) +{ + return Scripting::display(vm); +} + +static SQInteger print_stacktrace_wrapper(HSQUIRRELVM vm) +{ + HSQUIRRELVM arg0 = vm; + + try { + Scripting::print_stacktrace(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 'print_stacktrace'")); + return SQ_ERROR; + } + +} + +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; @@ -1703,9 +2697,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; @@ -1726,9 +2720,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; @@ -1749,17 +2743,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 (arg1)); return sq_suspendvm(vm); @@ -1773,7 +2767,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; @@ -1792,7 +2786,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; @@ -1811,16 +2805,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 (arg0)); return 0; @@ -1834,26 +2828,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 (arg0), static_cast (arg1), static_cast (arg2)); return 0; @@ -1867,9 +2861,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; @@ -1891,10 +2885,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; @@ -1915,7 +2909,7 @@ static int import_wrapper(HSQUIRRELVM vm) } -static int save_state_wrapper(HSQUIRRELVM vm) +static SQInteger save_state_wrapper(HSQUIRRELVM vm) { (void) vm; @@ -1934,7 +2928,7 @@ static int save_state_wrapper(HSQUIRRELVM vm) } -static int debug_collrects_wrapper(HSQUIRRELVM vm) +static SQInteger debug_collrects_wrapper(HSQUIRRELVM vm) { SQBool arg0; if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) { @@ -1943,7 +2937,7 @@ static int debug_collrects_wrapper(HSQUIRRELVM vm) } try { - Scripting::debug_collrects(arg0); + Scripting::debug_collrects(arg0 == SQTrue); return 0; @@ -1957,7 +2951,7 @@ static int debug_collrects_wrapper(HSQUIRRELVM vm) } -static int debug_draw_fps_wrapper(HSQUIRRELVM vm) +static SQInteger debug_show_fps_wrapper(HSQUIRRELVM vm) { SQBool arg0; if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) { @@ -1966,7 +2960,7 @@ static int debug_draw_fps_wrapper(HSQUIRRELVM vm) } try { - Scripting::debug_draw_fps(arg0); + Scripting::debug_show_fps(arg0 == SQTrue); return 0; @@ -1974,13 +2968,13 @@ static int debug_draw_fps_wrapper(HSQUIRRELVM vm) sq_throwerror(vm, e.what()); return SQ_ERROR; } catch(...) { - sq_throwerror(vm, _SC("Unexpected exception while executing function 'debug_draw_fps'")); + sq_throwerror(vm, _SC("Unexpected exception while executing function 'debug_show_fps'")); return SQ_ERROR; } } -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))) { @@ -1989,7 +2983,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; @@ -2003,9 +2997,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; @@ -2026,9 +3020,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; @@ -2049,7 +3043,7 @@ static int play_sound_wrapper(HSQUIRRELVM vm) } -static int grease_wrapper(HSQUIRRELVM vm) +static SQInteger grease_wrapper(HSQUIRRELVM vm) { (void) vm; @@ -2068,7 +3062,7 @@ static int grease_wrapper(HSQUIRRELVM vm) } -static int invincible_wrapper(HSQUIRRELVM vm) +static SQInteger invincible_wrapper(HSQUIRRELVM vm) { (void) vm; @@ -2087,12 +3081,12 @@ static int invincible_wrapper(HSQUIRRELVM vm) } -static int mortal_wrapper(HSQUIRRELVM vm) +static SQInteger ghost_wrapper(HSQUIRRELVM vm) { (void) vm; try { - Scripting::mortal(); + Scripting::ghost(); return 0; @@ -2100,18 +3094,18 @@ static int mortal_wrapper(HSQUIRRELVM vm) sq_throwerror(vm, e.what()); return SQ_ERROR; } catch(...) { - sq_throwerror(vm, _SC("Unexpected exception while executing function 'mortal'")); + sq_throwerror(vm, _SC("Unexpected exception while executing function 'ghost'")); return SQ_ERROR; } } -static int shrink_wrapper(HSQUIRRELVM vm) +static SQInteger mortal_wrapper(HSQUIRRELVM vm) { (void) vm; try { - Scripting::shrink(); + Scripting::mortal(); return 0; @@ -2119,18 +3113,18 @@ static int shrink_wrapper(HSQUIRRELVM vm) sq_throwerror(vm, e.what()); return SQ_ERROR; } catch(...) { - sq_throwerror(vm, _SC("Unexpected exception while executing function 'shrink'")); + sq_throwerror(vm, _SC("Unexpected exception while executing function 'mortal'")); return SQ_ERROR; } } -static int kill_wrapper(HSQUIRRELVM vm) +static SQInteger restart_wrapper(HSQUIRRELVM vm) { (void) vm; try { - Scripting::kill(); + Scripting::restart(); return 0; @@ -2138,18 +3132,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; @@ -2157,18 +3151,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; @@ -2176,18 +3170,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; @@ -2195,18 +3189,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; @@ -2214,236 +3208,418 @@ 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 SQInteger rand_wrapper(HSQUIRRELVM vm) +{ + + try { + int return_value = Scripting::rand(); + + 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 'rand'")); + return SQ_ERROR; + } + +} + +} // end of namespace Wrapper + +void create_squirrel_instance(HSQUIRRELVM v, Scripting::DisplayEffect* object, bool setup_releasehook) +{ + using namespace Wrapper; + + sq_pushroottable(v); + sq_pushstring(v, "DisplayEffect", -1); + if(SQ_FAILED(sq_get(v, -2))) { + std::ostringstream msg; + msg << "Couldn't resolved squirrel type 'DisplayEffect'"; + throw SquirrelError(v, msg.str()); + } + + if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) { + std::ostringstream msg; + msg << "Couldn't setup squirrel instance for object of type 'DisplayEffect'"; + throw SquirrelError(v, msg.str()); + } + sq_remove(v, -2); // remove object name + + if(setup_releasehook) { + sq_setreleasehook(v, -1, DisplayEffect_release_hook); + } + + sq_remove(v, -2); // remove root table +} + +void create_squirrel_instance(HSQUIRRELVM v, Scripting::Camera* object, bool setup_releasehook) +{ + using namespace Wrapper; + + sq_pushroottable(v); + sq_pushstring(v, "Camera", -1); + if(SQ_FAILED(sq_get(v, -2))) { + std::ostringstream msg; + msg << "Couldn't resolved squirrel type 'Camera'"; + throw SquirrelError(v, msg.str()); + } + + if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) { + std::ostringstream msg; + msg << "Couldn't setup squirrel instance for object of type 'Camera'"; + throw SquirrelError(v, msg.str()); + } + sq_remove(v, -2); // remove object name + + if(setup_releasehook) { + sq_setreleasehook(v, -1, Camera_release_hook); + } + + sq_remove(v, -2); // remove root table +} + +void create_squirrel_instance(HSQUIRRELVM v, Scripting::Level* object, bool setup_releasehook) +{ + using namespace Wrapper; + + sq_pushroottable(v); + sq_pushstring(v, "Level", -1); + if(SQ_FAILED(sq_get(v, -2))) { + std::ostringstream msg; + msg << "Couldn't resolved squirrel type 'Level'"; + throw SquirrelError(v, msg.str()); + } + + if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) { + std::ostringstream msg; + msg << "Couldn't setup squirrel instance for object of type 'Level'"; + throw SquirrelError(v, msg.str()); + } + sq_remove(v, -2); // remove object name + + if(setup_releasehook) { + sq_setreleasehook(v, -1, Level_release_hook); + } + + sq_remove(v, -2); // remove root table +} + +void create_squirrel_instance(HSQUIRRELVM v, Scripting::ScriptedObject* object, bool setup_releasehook) +{ + using namespace Wrapper; + + sq_pushroottable(v); + sq_pushstring(v, "ScriptedObject", -1); + if(SQ_FAILED(sq_get(v, -2))) { + std::ostringstream msg; + msg << "Couldn't resolved squirrel type 'ScriptedObject'"; + throw SquirrelError(v, msg.str()); + } + + if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) { + std::ostringstream msg; + msg << "Couldn't setup squirrel instance for object of type 'ScriptedObject'"; + throw SquirrelError(v, msg.str()); + } + sq_remove(v, -2); // remove object name + + if(setup_releasehook) { + sq_setreleasehook(v, -1, ScriptedObject_release_hook); + } + + sq_remove(v, -2); // remove root table +} + +void create_squirrel_instance(HSQUIRRELVM v, Scripting::Text* object, bool setup_releasehook) +{ + using namespace Wrapper; + + sq_pushroottable(v); + sq_pushstring(v, "Text", -1); + if(SQ_FAILED(sq_get(v, -2))) { + std::ostringstream msg; + msg << "Couldn't resolved squirrel type 'Text'"; + throw SquirrelError(v, msg.str()); + } + + if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) { + std::ostringstream msg; + msg << "Couldn't setup squirrel instance for object of type 'Text'"; + throw SquirrelError(v, msg.str()); + } + sq_remove(v, -2); // remove object name + + if(setup_releasehook) { + sq_setreleasehook(v, -1, Text_release_hook); + } + + sq_remove(v, -2); // remove root table +} + +void create_squirrel_instance(HSQUIRRELVM v, Scripting::Player* object, bool setup_releasehook) +{ + using namespace Wrapper; + + sq_pushroottable(v); + sq_pushstring(v, "Player", -1); + if(SQ_FAILED(sq_get(v, -2))) { + std::ostringstream msg; + msg << "Couldn't resolved squirrel type 'Player'"; + throw SquirrelError(v, msg.str()); + } + + if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) { + std::ostringstream msg; + msg << "Couldn't setup squirrel instance for object of type 'Player'"; + throw SquirrelError(v, msg.str()); + } + sq_remove(v, -2); // remove object name + + if(setup_releasehook) { + sq_setreleasehook(v, -1, Player_release_hook); + } + + sq_remove(v, -2); // remove root table +} + +void create_squirrel_instance(HSQUIRRELVM v, Scripting::FloatingImage* object, bool setup_releasehook) +{ + using namespace Wrapper; + + sq_pushroottable(v); + sq_pushstring(v, "FloatingImage", -1); + if(SQ_FAILED(sq_get(v, -2))) { + std::ostringstream msg; + msg << "Couldn't resolved squirrel type 'FloatingImage'"; + throw SquirrelError(v, msg.str()); } - -} -static int quit_wrapper(HSQUIRRELVM vm) -{ - (void) vm; - - try { - Scripting::quit(); - - return 0; - - } catch(std::exception& e) { - sq_throwerror(vm, e.what()); - return SQ_ERROR; - } catch(...) { - sq_throwerror(vm, _SC("Unexpected exception while executing function 'quit'")); - return SQ_ERROR; + if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) { + std::ostringstream msg; + msg << "Couldn't setup squirrel instance for object of type 'FloatingImage'"; + throw SquirrelError(v, msg.str()); } - -} + sq_remove(v, -2); // remove object name -} // end of namespace Wrapper + if(setup_releasehook) { + sq_setreleasehook(v, -1, FloatingImage_release_hook); + } -void create_squirrel_instance(HSQUIRRELVM v, Scripting::DisplayEffect* object, bool setup_releasehook) + sq_remove(v, -2); // remove root table +} + +void create_squirrel_instance(HSQUIRRELVM v, Scripting::Platform* object, bool setup_releasehook) { using namespace Wrapper; sq_pushroottable(v); - sq_pushstring(v, "DisplayEffect", -1); + sq_pushstring(v, "Platform", -1); if(SQ_FAILED(sq_get(v, -2))) { std::ostringstream msg; - msg << "Couldn't resolved squirrel type 'DisplayEffect'"; + msg << "Couldn't resolved squirrel type 'Platform'"; throw SquirrelError(v, msg.str()); } if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) { std::ostringstream msg; - msg << "Couldn't setup squirrel instance for object of type 'DisplayEffect'"; + msg << "Couldn't setup squirrel instance for object of type 'Platform'"; throw SquirrelError(v, msg.str()); } sq_remove(v, -2); // remove object name if(setup_releasehook) { - sq_setreleasehook(v, -1, DisplayEffect_release_hook); + sq_setreleasehook(v, -1, Platform_release_hook); } sq_remove(v, -2); // remove root table } -void create_squirrel_instance(HSQUIRRELVM v, Scripting::Camera* object, bool setup_releasehook) +void create_squirrel_instance(HSQUIRRELVM v, Scripting::Candle* object, bool setup_releasehook) { using namespace Wrapper; sq_pushroottable(v); - sq_pushstring(v, "Camera", -1); + sq_pushstring(v, "Candle", -1); if(SQ_FAILED(sq_get(v, -2))) { std::ostringstream msg; - msg << "Couldn't resolved squirrel type 'Camera'"; + msg << "Couldn't resolved squirrel type 'Candle'"; throw SquirrelError(v, msg.str()); } if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) { std::ostringstream msg; - msg << "Couldn't setup squirrel instance for object of type 'Camera'"; + msg << "Couldn't setup squirrel instance for object of type 'Candle'"; throw SquirrelError(v, msg.str()); } sq_remove(v, -2); // remove object name if(setup_releasehook) { - sq_setreleasehook(v, -1, Camera_release_hook); + sq_setreleasehook(v, -1, Candle_release_hook); } sq_remove(v, -2); // remove root table } -void create_squirrel_instance(HSQUIRRELVM v, Scripting::Level* object, bool setup_releasehook) +void create_squirrel_instance(HSQUIRRELVM v, Scripting::Wind* object, bool setup_releasehook) { using namespace Wrapper; sq_pushroottable(v); - sq_pushstring(v, "Level", -1); + sq_pushstring(v, "Wind", -1); if(SQ_FAILED(sq_get(v, -2))) { std::ostringstream msg; - msg << "Couldn't resolved squirrel type 'Level'"; + msg << "Couldn't resolved squirrel type 'Wind'"; throw SquirrelError(v, msg.str()); } if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) { std::ostringstream msg; - msg << "Couldn't setup squirrel instance for object of type 'Level'"; + msg << "Couldn't setup squirrel instance for object of type 'Wind'"; throw SquirrelError(v, msg.str()); } sq_remove(v, -2); // remove object name if(setup_releasehook) { - sq_setreleasehook(v, -1, Level_release_hook); + sq_setreleasehook(v, -1, Wind_release_hook); } sq_remove(v, -2); // remove root table } -void create_squirrel_instance(HSQUIRRELVM v, Scripting::ScriptedObject* object, bool setup_releasehook) +void create_squirrel_instance(HSQUIRRELVM v, Scripting::AmbientSound* object, bool setup_releasehook) { using namespace Wrapper; sq_pushroottable(v); - sq_pushstring(v, "ScriptedObject", -1); + sq_pushstring(v, "AmbientSound", -1); if(SQ_FAILED(sq_get(v, -2))) { std::ostringstream msg; - msg << "Couldn't resolved squirrel type 'ScriptedObject'"; + msg << "Couldn't resolved squirrel type 'AmbientSound'"; throw SquirrelError(v, msg.str()); } if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) { std::ostringstream msg; - msg << "Couldn't setup squirrel instance for object of type 'ScriptedObject'"; + msg << "Couldn't setup squirrel instance for object of type 'AmbientSound'"; throw SquirrelError(v, msg.str()); } sq_remove(v, -2); // remove object name if(setup_releasehook) { - sq_setreleasehook(v, -1, ScriptedObject_release_hook); + sq_setreleasehook(v, -1, AmbientSound_release_hook); } sq_remove(v, -2); // remove root table } -void create_squirrel_instance(HSQUIRRELVM v, Scripting::Text* object, bool setup_releasehook) +void create_squirrel_instance(HSQUIRRELVM v, Scripting::Thunderstorm* object, bool setup_releasehook) { using namespace Wrapper; sq_pushroottable(v); - sq_pushstring(v, "Text", -1); + sq_pushstring(v, "Thunderstorm", -1); if(SQ_FAILED(sq_get(v, -2))) { std::ostringstream msg; - msg << "Couldn't resolved squirrel type 'Text'"; + msg << "Couldn't resolved squirrel type 'Thunderstorm'"; throw SquirrelError(v, msg.str()); } if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) { std::ostringstream msg; - msg << "Couldn't setup squirrel instance for object of type 'Text'"; + msg << "Couldn't setup squirrel instance for object of type 'Thunderstorm'"; throw SquirrelError(v, msg.str()); } sq_remove(v, -2); // remove object name if(setup_releasehook) { - sq_setreleasehook(v, -1, Text_release_hook); + sq_setreleasehook(v, -1, Thunderstorm_release_hook); } sq_remove(v, -2); // remove root table } -void create_squirrel_instance(HSQUIRRELVM v, Scripting::Player* object, bool setup_releasehook) +void create_squirrel_instance(HSQUIRRELVM v, Scripting::TileMap* object, bool setup_releasehook) { using namespace Wrapper; sq_pushroottable(v); - sq_pushstring(v, "Player", -1); + sq_pushstring(v, "TileMap", -1); if(SQ_FAILED(sq_get(v, -2))) { std::ostringstream msg; - msg << "Couldn't resolved squirrel type 'Player'"; + msg << "Couldn't resolved squirrel type 'TileMap'"; throw SquirrelError(v, msg.str()); } if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) { std::ostringstream msg; - msg << "Couldn't setup squirrel instance for object of type 'Player'"; + msg << "Couldn't setup squirrel instance for object of type 'TileMap'"; throw SquirrelError(v, msg.str()); } sq_remove(v, -2); // remove object name if(setup_releasehook) { - sq_setreleasehook(v, -1, Player_release_hook); + sq_setreleasehook(v, -1, TileMap_release_hook); } sq_remove(v, -2); // remove root table } -void create_squirrel_instance(HSQUIRRELVM v, Scripting::FloatingImage* object, bool setup_releasehook) +void create_squirrel_instance(HSQUIRRELVM v, Scripting::SSector* object, bool setup_releasehook) { using namespace Wrapper; sq_pushroottable(v); - sq_pushstring(v, "FloatingImage", -1); + sq_pushstring(v, "SSector", -1); if(SQ_FAILED(sq_get(v, -2))) { std::ostringstream msg; - msg << "Couldn't resolved squirrel type 'FloatingImage'"; + msg << "Couldn't resolved squirrel type 'SSector'"; throw SquirrelError(v, msg.str()); } if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) { std::ostringstream msg; - msg << "Couldn't setup squirrel instance for object of type 'FloatingImage'"; + msg << "Couldn't setup squirrel instance for object of type 'SSector'"; throw SquirrelError(v, msg.str()); } sq_remove(v, -2); // remove object name if(setup_releasehook) { - sq_setreleasehook(v, -1, FloatingImage_release_hook); + sq_setreleasehook(v, -1, SSector_release_hook); } sq_remove(v, -2); // remove root table } -void create_squirrel_instance(HSQUIRRELVM v, Scripting::RandomGenerator* object, bool setup_releasehook) +void create_squirrel_instance(HSQUIRRELVM v, Scripting::LevelTime* object, bool setup_releasehook) { using namespace Wrapper; sq_pushroottable(v); - sq_pushstring(v, "RandomGenerator", -1); + sq_pushstring(v, "LevelTime", -1); if(SQ_FAILED(sq_get(v, -2))) { std::ostringstream msg; - msg << "Couldn't resolved squirrel type 'RandomGenerator'"; + msg << "Couldn't resolved squirrel type 'LevelTime'"; throw SquirrelError(v, msg.str()); } if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) { std::ostringstream msg; - msg << "Couldn't setup squirrel instance for object of type 'RandomGenerator'"; + msg << "Couldn't setup squirrel instance for object of type 'LevelTime'"; throw SquirrelError(v, msg.str()); } sq_remove(v, -2); // remove object name if(setup_releasehook) { - sq_setreleasehook(v, -1, RandomGenerator_release_hook); + sq_setreleasehook(v, -1, LevelTime_release_hook); } sq_remove(v, -2); // remove root table @@ -2597,10 +3773,10 @@ void register_supertux_wrapper(HSQUIRRELVM v) throw SquirrelError(v, "Couldn't register function 'debug_collrects'"); } - sq_pushstring(v, "debug_draw_fps", -1); - sq_newclosure(v, &debug_draw_fps_wrapper, 0); + sq_pushstring(v, "debug_show_fps", -1); + sq_newclosure(v, &debug_show_fps_wrapper, 0); if(SQ_FAILED(sq_createslot(v, -3))) { - throw SquirrelError(v, "Couldn't register function 'debug_draw_fps'"); + throw SquirrelError(v, "Couldn't register function 'debug_show_fps'"); } sq_pushstring(v, "debug_draw_solids_only", -1); @@ -2633,22 +3809,16 @@ void register_supertux_wrapper(HSQUIRRELVM v) throw SquirrelError(v, "Couldn't register function 'invincible'"); } - sq_pushstring(v, "mortal", -1); - sq_newclosure(v, &mortal_wrapper, 0); - if(SQ_FAILED(sq_createslot(v, -3))) { - throw SquirrelError(v, "Couldn't register function 'mortal'"); - } - - sq_pushstring(v, "shrink", -1); - sq_newclosure(v, &shrink_wrapper, 0); + sq_pushstring(v, "ghost", -1); + sq_newclosure(v, &ghost_wrapper, 0); if(SQ_FAILED(sq_createslot(v, -3))) { - throw SquirrelError(v, "Couldn't register function 'shrink'"); + throw SquirrelError(v, "Couldn't register function 'ghost'"); } - sq_pushstring(v, "kill", -1); - sq_newclosure(v, &kill_wrapper, 0); + sq_pushstring(v, "mortal", -1); + sq_newclosure(v, &mortal_wrapper, 0); if(SQ_FAILED(sq_createslot(v, -3))) { - throw SquirrelError(v, "Couldn't register function 'kill'"); + throw SquirrelError(v, "Couldn't register function 'mortal'"); } sq_pushstring(v, "restart", -1); @@ -2681,6 +3851,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) { @@ -2788,6 +3964,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'"); } @@ -2865,6 +4047,18 @@ void register_supertux_wrapper(HSQUIRRELVM v) throw SquirrelError(v, "Couldn't register function 'is_visible'"); } + sq_pushstring(v, "set_solid", -1); + sq_newclosure(v, &ScriptedObject_set_solid_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'set_solid'"); + } + + sq_pushstring(v, "is_solid", -1); + sq_newclosure(v, &ScriptedObject_is_solid_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'is_solid'"); + } + sq_pushstring(v, "get_name", -1); sq_newclosure(v, &ScriptedObject_get_name_wrapper, 0); if(SQ_FAILED(sq_createslot(v, -3))) { @@ -2977,6 +4171,60 @@ 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'"); + } + + sq_pushstring(v, "set_ghost_mode", -1); + sq_newclosure(v, &Player_set_ghost_mode_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'set_ghost_mode'"); + } + + sq_pushstring(v, "get_ghost_mode", -1); + sq_newclosure(v, &Player_get_ghost_mode_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'get_ghost_mode'"); + } + + sq_pushstring(v, "do_cheer", -1); + sq_newclosure(v, &Player_do_cheer_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'do_cheer'"); + } + + sq_pushstring(v, "do_duck", -1); + sq_newclosure(v, &Player_do_duck_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'do_duck'"); + } + + sq_pushstring(v, "do_standup", -1); + sq_newclosure(v, &Player_do_standup_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'do_standup'"); + } + + sq_pushstring(v, "do_backflip", -1); + sq_newclosure(v, &Player_do_backflip_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'do_backflip'"); + } + + sq_pushstring(v, "do_jump", -1); + sq_newclosure(v, &Player_do_jump_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'do_jump'"); + } + + sq_pushstring(v, "trigger_sequence", -1); + sq_newclosure(v, &Player_trigger_sequence_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'trigger_sequence'"); + } + if(SQ_FAILED(sq_createslot(v, -3))) { throw SquirrelError(v, "Couldn't register class 'Player'"); } @@ -3060,55 +4308,270 @@ void register_supertux_wrapper(HSQUIRRELVM v) throw SquirrelError(v, "Couldn't register function 'get_action'"); } + sq_pushstring(v, "fade_in", -1); + sq_newclosure(v, &FloatingImage_fade_in_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'fade_in'"); + } + + sq_pushstring(v, "fade_out", -1); + sq_newclosure(v, &FloatingImage_fade_out_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'fade_out'"); + } + if(SQ_FAILED(sq_createslot(v, -3))) { throw SquirrelError(v, "Couldn't register class 'FloatingImage'"); } - // Register class RandomGenerator - sq_pushstring(v, "RandomGenerator", -1); + // Register class Platform + sq_pushstring(v, "Platform", -1); if(sq_newclass(v, SQFalse) < 0) { std::ostringstream msg; - msg << "Couldn't create new class 'RandomGenerator'"; + msg << "Couldn't create new class 'Platform'"; throw SquirrelError(v, msg.str()); } - sq_pushstring(v, "srand", -1); - sq_newclosure(v, &RandomGenerator_srand_wrapper, 0); + sq_pushstring(v, "goto_node", -1); + sq_newclosure(v, &Platform_goto_node_wrapper, 0); if(SQ_FAILED(sq_createslot(v, -3))) { - throw SquirrelError(v, "Couldn't register function 'srand'"); + throw SquirrelError(v, "Couldn't register function 'goto_node'"); } - sq_pushstring(v, "rand", -1); - sq_newclosure(v, &RandomGenerator_rand_wrapper, 0); + sq_pushstring(v, "start_moving", -1); + sq_newclosure(v, &Platform_start_moving_wrapper, 0); if(SQ_FAILED(sq_createslot(v, -3))) { - throw SquirrelError(v, "Couldn't register function 'rand'"); + throw SquirrelError(v, "Couldn't register function 'start_moving'"); + } + + sq_pushstring(v, "stop_moving", -1); + sq_newclosure(v, &Platform_stop_moving_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'stop_moving'"); + } + + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register class 'Platform'"); + } + + // Register class Candle + sq_pushstring(v, "Candle", -1); + if(sq_newclass(v, SQFalse) < 0) { + std::ostringstream msg; + msg << "Couldn't create new class 'Candle'"; + throw SquirrelError(v, msg.str()); + } + sq_pushstring(v, "get_burning", -1); + sq_newclosure(v, &Candle_get_burning_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'get_burning'"); + } + + sq_pushstring(v, "set_burning", -1); + sq_newclosure(v, &Candle_set_burning_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'set_burning'"); + } + + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register class 'Candle'"); + } + + // Register class Wind + sq_pushstring(v, "Wind", -1); + if(sq_newclass(v, SQFalse) < 0) { + std::ostringstream msg; + msg << "Couldn't create new class 'Wind'"; + throw SquirrelError(v, msg.str()); + } + sq_pushstring(v, "start", -1); + sq_newclosure(v, &Wind_start_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'start'"); + } + + sq_pushstring(v, "stop", -1); + sq_newclosure(v, &Wind_stop_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'stop'"); + } + + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register class 'Wind'"); + } + + // Register class AmbientSound + sq_pushstring(v, "AmbientSound", -1); + if(sq_newclass(v, SQFalse) < 0) { + std::ostringstream msg; + msg << "Couldn't create new class 'AmbientSound'"; + throw SquirrelError(v, msg.str()); + } + sq_pushstring(v, "set_pos", -1); + sq_newclosure(v, &AmbientSound_set_pos_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'set_pos'"); + } + + sq_pushstring(v, "get_pos_x", -1); + sq_newclosure(v, &AmbientSound_get_pos_x_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'get_pos_x'"); + } + + sq_pushstring(v, "get_pos_y", -1); + sq_newclosure(v, &AmbientSound_get_pos_y_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'get_pos_y'"); + } + + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register class 'AmbientSound'"); } - sq_pushstring(v, "rand1i", -1); - sq_newclosure(v, &RandomGenerator_rand1i_wrapper, 0); + // Register class Thunderstorm + sq_pushstring(v, "Thunderstorm", -1); + if(sq_newclass(v, SQFalse) < 0) { + std::ostringstream msg; + msg << "Couldn't create new class 'Thunderstorm'"; + throw SquirrelError(v, msg.str()); + } + sq_pushstring(v, "start", -1); + sq_newclosure(v, &Thunderstorm_start_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'start'"); + } + + sq_pushstring(v, "stop", -1); + sq_newclosure(v, &Thunderstorm_stop_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'stop'"); + } + + sq_pushstring(v, "thunder", -1); + sq_newclosure(v, &Thunderstorm_thunder_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'thunder'"); + } + + sq_pushstring(v, "lightning", -1); + sq_newclosure(v, &Thunderstorm_lightning_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'lightning'"); + } + + sq_pushstring(v, "flash", -1); + sq_newclosure(v, &Thunderstorm_flash_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'flash'"); + } + + sq_pushstring(v, "electrify", -1); + sq_newclosure(v, &Thunderstorm_electrify_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'electrify'"); + } + + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register class 'Thunderstorm'"); + } + + // Register class TileMap + sq_pushstring(v, "TileMap", -1); + if(sq_newclass(v, SQFalse) < 0) { + std::ostringstream msg; + msg << "Couldn't create new class 'TileMap'"; + throw SquirrelError(v, msg.str()); + } + sq_pushstring(v, "goto_node", -1); + sq_newclosure(v, &TileMap_goto_node_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'goto_node'"); + } + + sq_pushstring(v, "start_moving", -1); + sq_newclosure(v, &TileMap_start_moving_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'start_moving'"); + } + + sq_pushstring(v, "stop_moving", -1); + sq_newclosure(v, &TileMap_stop_moving_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'stop_moving'"); + } + + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register class 'TileMap'"); + } + + // Register class SSector + sq_pushstring(v, "SSector", -1); + if(sq_newclass(v, SQFalse) < 0) { + std::ostringstream msg; + msg << "Couldn't create new class 'SSector'"; + throw SquirrelError(v, msg.str()); + } + sq_pushstring(v, "set_ambient_light", -1); + sq_newclosure(v, &SSector_set_ambient_light_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'set_ambient_light'"); + } + + sq_pushstring(v, "get_ambient_red", -1); + sq_newclosure(v, &SSector_get_ambient_red_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'get_ambient_red'"); + } + + sq_pushstring(v, "get_ambient_green", -1); + sq_newclosure(v, &SSector_get_ambient_green_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'get_ambient_green'"); + } + + sq_pushstring(v, "get_ambient_blue", -1); + sq_newclosure(v, &SSector_get_ambient_blue_wrapper, 0); + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register function 'get_ambient_blue'"); + } + + if(SQ_FAILED(sq_createslot(v, -3))) { + throw SquirrelError(v, "Couldn't register class 'SSector'"); + } + + // Register class LevelTime + sq_pushstring(v, "LevelTime", -1); + if(sq_newclass(v, SQFalse) < 0) { + std::ostringstream msg; + msg << "Couldn't create new class 'LevelTime'"; + throw SquirrelError(v, msg.str()); + } + sq_pushstring(v, "start", -1); + sq_newclosure(v, &LevelTime_start_wrapper, 0); if(SQ_FAILED(sq_createslot(v, -3))) { - throw SquirrelError(v, "Couldn't register function 'rand1i'"); + throw SquirrelError(v, "Couldn't register function 'start'"); } - sq_pushstring(v, "rand2i", -1); - sq_newclosure(v, &RandomGenerator_rand2i_wrapper, 0); + sq_pushstring(v, "stop", -1); + sq_newclosure(v, &LevelTime_stop_wrapper, 0); if(SQ_FAILED(sq_createslot(v, -3))) { - throw SquirrelError(v, "Couldn't register function 'rand2i'"); + throw SquirrelError(v, "Couldn't register function 'stop'"); } - sq_pushstring(v, "rand1f", -1); - sq_newclosure(v, &RandomGenerator_rand1f_wrapper, 0); + sq_pushstring(v, "get_time", -1); + sq_newclosure(v, &LevelTime_get_time_wrapper, 0); if(SQ_FAILED(sq_createslot(v, -3))) { - throw SquirrelError(v, "Couldn't register function 'rand1f'"); + throw SquirrelError(v, "Couldn't register function 'get_time'"); } - sq_pushstring(v, "rand2f", -1); - sq_newclosure(v, &RandomGenerator_rand2f_wrapper, 0); + sq_pushstring(v, "set_time", -1); + sq_newclosure(v, &LevelTime_set_time_wrapper, 0); if(SQ_FAILED(sq_createslot(v, -3))) { - throw SquirrelError(v, "Couldn't register function 'rand2f'"); + throw SquirrelError(v, "Couldn't register function 'set_time'"); } if(SQ_FAILED(sq_createslot(v, -3))) { - throw SquirrelError(v, "Couldn't register class 'RandomGenerator'"); + throw SquirrelError(v, "Couldn't register class 'LevelTime'"); } }