namespace Wrapper
{
-static int DisplayEffect_release_hook(SQUserPointer ptr, int )
+static SQInteger DisplayEffect_release_hook(SQUserPointer ptr, int )
{
Scripting::DisplayEffect* _this = reinterpret_cast<Scripting::DisplayEffect*> (ptr);
delete _this;
return 0;
}
-static int DisplayEffect_fade_out_wrapper(HSQUIRRELVM vm)
+static SQInteger DisplayEffect_fade_out_wrapper(HSQUIRRELVM vm)
{
Scripting::DisplayEffect* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'fade_out' called without instance"));
return SQ_ERROR;
}
- float arg0;
+ SQFloat arg0;
if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a float"));
return SQ_ERROR;
}
try {
- _this->fade_out(arg0);
+ _this->fade_out(static_cast<float> (arg0));
return 0;
}
-static int DisplayEffect_fade_in_wrapper(HSQUIRRELVM vm)
+static SQInteger DisplayEffect_fade_in_wrapper(HSQUIRRELVM vm)
{
Scripting::DisplayEffect* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'fade_in' called without instance"));
return SQ_ERROR;
}
- float arg0;
+ SQFloat arg0;
if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a float"));
return SQ_ERROR;
}
try {
- _this->fade_in(arg0);
+ _this->fade_in(static_cast<float> (arg0));
return 0;
}
-static int DisplayEffect_set_black_wrapper(HSQUIRRELVM vm)
+static SQInteger DisplayEffect_set_black_wrapper(HSQUIRRELVM vm)
{
Scripting::DisplayEffect* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
try {
- _this->set_black(arg0);
+ _this->set_black(arg0 == SQTrue);
return 0;
}
-static int DisplayEffect_is_black_wrapper(HSQUIRRELVM vm)
+static SQInteger DisplayEffect_is_black_wrapper(HSQUIRRELVM vm)
{
Scripting::DisplayEffect* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
-static int DisplayEffect_sixteen_to_nine_wrapper(HSQUIRRELVM vm)
+static SQInteger DisplayEffect_sixteen_to_nine_wrapper(HSQUIRRELVM vm)
{
Scripting::DisplayEffect* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'sixteen_to_nine' called without instance"));
return SQ_ERROR;
}
- float arg0;
+ SQFloat arg0;
if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a float"));
return SQ_ERROR;
}
try {
- _this->sixteen_to_nine(arg0);
+ _this->sixteen_to_nine(static_cast<float> (arg0));
return 0;
}
-static int DisplayEffect_four_to_three_wrapper(HSQUIRRELVM vm)
+static SQInteger DisplayEffect_four_to_three_wrapper(HSQUIRRELVM vm)
{
Scripting::DisplayEffect* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'four_to_three' called without instance"));
return SQ_ERROR;
}
- float arg0;
+ SQFloat arg0;
if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a float"));
return SQ_ERROR;
}
try {
- _this->four_to_three(arg0);
+ _this->four_to_three(static_cast<float> (arg0));
return 0;
}
-static int Camera_release_hook(SQUserPointer ptr, int )
+static SQInteger Camera_release_hook(SQUserPointer ptr, int )
{
Scripting::Camera* _this = reinterpret_cast<Scripting::Camera*> (ptr);
delete _this;
return 0;
}
-static int Camera_shake_wrapper(HSQUIRRELVM vm)
+static SQInteger Camera_shake_wrapper(HSQUIRRELVM vm)
{
Scripting::Camera* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'shake' called without instance"));
return SQ_ERROR;
}
- float arg0;
+ SQFloat arg0;
if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a float"));
return SQ_ERROR;
}
- float arg1;
+ SQFloat arg1;
if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
sq_throwerror(vm, _SC("Argument 2 not a float"));
return SQ_ERROR;
}
- float arg2;
+ SQFloat arg2;
if(SQ_FAILED(sq_getfloat(vm, 4, &arg2))) {
sq_throwerror(vm, _SC("Argument 3 not a float"));
return SQ_ERROR;
}
try {
- _this->shake(arg0, arg1, arg2);
+ _this->shake(static_cast<float> (arg0), static_cast<float> (arg1), static_cast<float> (arg2));
return 0;
}
-static int Camera_set_pos_wrapper(HSQUIRRELVM vm)
+static SQInteger Camera_set_pos_wrapper(HSQUIRRELVM vm)
{
Scripting::Camera* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'set_pos' called without instance"));
return SQ_ERROR;
}
- float arg0;
+ SQFloat arg0;
if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a float"));
return SQ_ERROR;
}
- float arg1;
+ SQFloat arg1;
if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
sq_throwerror(vm, _SC("Argument 2 not a float"));
return SQ_ERROR;
}
try {
- _this->set_pos(arg0, arg1);
+ _this->set_pos(static_cast<float> (arg0), static_cast<float> (arg1));
return 0;
}
-static int Camera_set_mode_wrapper(HSQUIRRELVM vm)
+static SQInteger Camera_set_mode_wrapper(HSQUIRRELVM vm)
{
Scripting::Camera* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'set_mode' called without instance"));
return SQ_ERROR;
}
- const char* arg0;
+ const SQChar* arg0;
if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a string"));
return SQ_ERROR;
}
-static int Camera_scroll_to_wrapper(HSQUIRRELVM vm)
+static SQInteger Camera_scroll_to_wrapper(HSQUIRRELVM vm)
{
Scripting::Camera* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'scroll_to' called without instance"));
return SQ_ERROR;
}
- float arg0;
+ SQFloat arg0;
if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a float"));
return SQ_ERROR;
}
- float arg1;
+ SQFloat arg1;
if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
sq_throwerror(vm, _SC("Argument 2 not a float"));
return SQ_ERROR;
}
- float arg2;
+ SQFloat arg2;
if(SQ_FAILED(sq_getfloat(vm, 4, &arg2))) {
sq_throwerror(vm, _SC("Argument 3 not a float"));
return SQ_ERROR;
}
try {
- _this->scroll_to(arg0, arg1, arg2);
+ _this->scroll_to(static_cast<float> (arg0), static_cast<float> (arg1), static_cast<float> (arg2));
return 0;
}
-static int Level_release_hook(SQUserPointer ptr, int )
+static SQInteger Level_release_hook(SQUserPointer ptr, int )
{
Scripting::Level* _this = reinterpret_cast<Scripting::Level*> (ptr);
delete _this;
return 0;
}
-static int Level_finish_wrapper(HSQUIRRELVM vm)
+static SQInteger Level_finish_wrapper(HSQUIRRELVM vm)
{
Scripting::Level* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
try {
- _this->finish(arg0);
+ _this->finish(arg0 == SQTrue);
return 0;
}
-static int Level_spawn_wrapper(HSQUIRRELVM vm)
+static SQInteger Level_spawn_wrapper(HSQUIRRELVM vm)
{
Scripting::Level* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'spawn' called without instance"));
return SQ_ERROR;
}
- const char* arg0;
+ const SQChar* arg0;
if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a string"));
return SQ_ERROR;
}
- const char* arg1;
+ const SQChar* arg1;
if(SQ_FAILED(sq_getstring(vm, 3, &arg1))) {
sq_throwerror(vm, _SC("Argument 2 not a string"));
return SQ_ERROR;
}
-static int Level_flip_vertically_wrapper(HSQUIRRELVM vm)
+static SQInteger Level_flip_vertically_wrapper(HSQUIRRELVM vm)
{
Scripting::Level* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
-static int ScriptedObject_release_hook(SQUserPointer ptr, int )
+static SQInteger Level_toggle_pause_wrapper(HSQUIRRELVM vm)
+{
+ Scripting::Level* _this;
+ if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
+ sq_throwerror(vm, _SC("'toggle_pause' called without instance"));
+ return SQ_ERROR;
+ }
+
+ try {
+ _this->toggle_pause();
+
+ return 0;
+
+ } catch(std::exception& e) {
+ sq_throwerror(vm, e.what());
+ return SQ_ERROR;
+ } catch(...) {
+ sq_throwerror(vm, _SC("Unexpected exception while executing function 'toggle_pause'"));
+ return SQ_ERROR;
+ }
+
+}
+
+static SQInteger ScriptedObject_release_hook(SQUserPointer ptr, int )
{
Scripting::ScriptedObject* _this = reinterpret_cast<Scripting::ScriptedObject*> (ptr);
delete _this;
return 0;
}
-static int ScriptedObject_set_action_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_set_action_wrapper(HSQUIRRELVM vm)
{
Scripting::ScriptedObject* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'set_action' called without instance"));
return SQ_ERROR;
}
- const char* arg0;
+ const SQChar* arg0;
if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a string"));
return SQ_ERROR;
}
-static int ScriptedObject_get_action_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_get_action_wrapper(HSQUIRRELVM vm)
{
Scripting::ScriptedObject* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
-static int ScriptedObject_move_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_move_wrapper(HSQUIRRELVM vm)
{
Scripting::ScriptedObject* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'move' called without instance"));
return SQ_ERROR;
}
- float arg0;
+ SQFloat arg0;
if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a float"));
return SQ_ERROR;
}
- float arg1;
+ SQFloat arg1;
if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
sq_throwerror(vm, _SC("Argument 2 not a float"));
return SQ_ERROR;
}
try {
- _this->move(arg0, arg1);
+ _this->move(static_cast<float> (arg0), static_cast<float> (arg1));
return 0;
}
-static int ScriptedObject_set_pos_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_set_pos_wrapper(HSQUIRRELVM vm)
{
Scripting::ScriptedObject* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'set_pos' called without instance"));
return SQ_ERROR;
}
- float arg0;
+ SQFloat arg0;
if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a float"));
return SQ_ERROR;
}
- float arg1;
+ SQFloat arg1;
if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
sq_throwerror(vm, _SC("Argument 2 not a float"));
return SQ_ERROR;
}
try {
- _this->set_pos(arg0, arg1);
+ _this->set_pos(static_cast<float> (arg0), static_cast<float> (arg1));
return 0;
}
-static int ScriptedObject_get_pos_x_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_get_pos_x_wrapper(HSQUIRRELVM vm)
{
Scripting::ScriptedObject* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
-static int ScriptedObject_get_pos_y_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_get_pos_y_wrapper(HSQUIRRELVM vm)
{
Scripting::ScriptedObject* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
-static int ScriptedObject_set_velocity_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_set_velocity_wrapper(HSQUIRRELVM vm)
{
Scripting::ScriptedObject* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'set_velocity' called without instance"));
return SQ_ERROR;
}
- float arg0;
+ SQFloat arg0;
if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a float"));
return SQ_ERROR;
}
- float arg1;
+ SQFloat arg1;
if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
sq_throwerror(vm, _SC("Argument 2 not a float"));
return SQ_ERROR;
}
try {
- _this->set_velocity(arg0, arg1);
+ _this->set_velocity(static_cast<float> (arg0), static_cast<float> (arg1));
return 0;
}
-static int ScriptedObject_get_velocity_x_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_get_velocity_x_wrapper(HSQUIRRELVM vm)
{
Scripting::ScriptedObject* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
-static int ScriptedObject_get_velocity_y_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_get_velocity_y_wrapper(HSQUIRRELVM vm)
{
Scripting::ScriptedObject* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
-static int ScriptedObject_set_visible_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_set_visible_wrapper(HSQUIRRELVM vm)
{
Scripting::ScriptedObject* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
try {
- _this->set_visible(arg0);
+ _this->set_visible(arg0 == SQTrue);
return 0;
}
-static int ScriptedObject_is_visible_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_is_visible_wrapper(HSQUIRRELVM vm)
{
Scripting::ScriptedObject* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
-static int ScriptedObject_get_name_wrapper(HSQUIRRELVM vm)
+static SQInteger ScriptedObject_get_name_wrapper(HSQUIRRELVM vm)
{
Scripting::ScriptedObject* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
-static int Sound_release_hook(SQUserPointer ptr, int )
-{
- Scripting::Sound* _this = reinterpret_cast<Scripting::Sound*> (ptr);
- delete _this;
- return 0;
-}
-
-static int Sound_play_music_wrapper(HSQUIRRELVM vm)
-{
- Scripting::Sound* _this;
- if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
- sq_throwerror(vm, _SC("'play_music' 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"));
- return SQ_ERROR;
- }
-
- try {
- _this->play_music(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 'play_music'"));
- return SQ_ERROR;
- }
-
-}
-
-static int Sound_play_wrapper(HSQUIRRELVM vm)
-{
- Scripting::Sound* _this;
- if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
- sq_throwerror(vm, _SC("'play' 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"));
- return SQ_ERROR;
- }
-
- try {
- _this->play(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 'play'"));
- return SQ_ERROR;
- }
-
-}
-
-static int Text_release_hook(SQUserPointer ptr, int )
+static SQInteger Text_release_hook(SQUserPointer ptr, int )
{
Scripting::Text* _this = reinterpret_cast<Scripting::Text*> (ptr);
delete _this;
return 0;
}
-static int Text_set_text_wrapper(HSQUIRRELVM vm)
+static SQInteger Text_set_text_wrapper(HSQUIRRELVM vm)
{
Scripting::Text* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'set_text' called without instance"));
return SQ_ERROR;
}
- const char* arg0;
+ const SQChar* arg0;
if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a string"));
return SQ_ERROR;
}
-static int Text_set_font_wrapper(HSQUIRRELVM vm)
+static SQInteger Text_set_font_wrapper(HSQUIRRELVM vm)
{
Scripting::Text* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'set_font' called without instance"));
return SQ_ERROR;
}
- const char* arg0;
+ const SQChar* arg0;
if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a string"));
return SQ_ERROR;
}
-static int Text_fade_in_wrapper(HSQUIRRELVM vm)
+static SQInteger Text_fade_in_wrapper(HSQUIRRELVM vm)
{
Scripting::Text* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'fade_in' called without instance"));
return SQ_ERROR;
}
- float arg0;
+ SQFloat arg0;
if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a float"));
return SQ_ERROR;
}
try {
- _this->fade_in(arg0);
+ _this->fade_in(static_cast<float> (arg0));
return 0;
}
-static int Text_fade_out_wrapper(HSQUIRRELVM vm)
+static SQInteger Text_fade_out_wrapper(HSQUIRRELVM vm)
{
Scripting::Text* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'fade_out' called without instance"));
return SQ_ERROR;
}
- float arg0;
+ SQFloat arg0;
if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a float"));
return SQ_ERROR;
}
try {
- _this->fade_out(arg0);
+ _this->fade_out(static_cast<float> (arg0));
return 0;
}
-static int Text_set_visible_wrapper(HSQUIRRELVM vm)
+static SQInteger Text_set_visible_wrapper(HSQUIRRELVM vm)
{
Scripting::Text* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
try {
- _this->set_visible(arg0);
+ _this->set_visible(arg0 == SQTrue);
return 0;
}
-static int Text_set_centered_wrapper(HSQUIRRELVM vm)
+static SQInteger Text_set_centered_wrapper(HSQUIRRELVM vm)
{
Scripting::Text* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
try {
- _this->set_centered(arg0);
+ _this->set_centered(arg0 == SQTrue);
return 0;
}
-static int Player_release_hook(SQUserPointer ptr, int )
+static SQInteger Player_release_hook(SQUserPointer ptr, int )
{
Scripting::Player* _this = reinterpret_cast<Scripting::Player*> (ptr);
delete _this;
return 0;
}
-static int Player_add_bonus_wrapper(HSQUIRRELVM vm)
+static SQInteger Player_add_bonus_wrapper(HSQUIRRELVM vm)
{
Scripting::Player* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'add_bonus' called without instance"));
return SQ_ERROR;
}
- const char* arg0;
+ const SQChar* arg0;
if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a string"));
return SQ_ERROR;
}
-static int Player_add_coins_wrapper(HSQUIRRELVM vm)
+static SQInteger Player_add_coins_wrapper(HSQUIRRELVM vm)
{
Scripting::Player* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'add_coins' called without instance"));
return SQ_ERROR;
}
- int arg0;
+ SQInteger arg0;
if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not an integer"));
return SQ_ERROR;
}
try {
- _this->add_coins(arg0);
+ _this->add_coins(static_cast<int> (arg0));
return 0;
}
-static int Player_make_invincible_wrapper(HSQUIRRELVM vm)
+static SQInteger Player_make_invincible_wrapper(HSQUIRRELVM vm)
{
Scripting::Player* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
-static int Player_deactivate_wrapper(HSQUIRRELVM vm)
+static SQInteger Player_deactivate_wrapper(HSQUIRRELVM vm)
{
Scripting::Player* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
-static int Player_activate_wrapper(HSQUIRRELVM vm)
+static SQInteger Player_activate_wrapper(HSQUIRRELVM vm)
{
Scripting::Player* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
-static int Player_walk_wrapper(HSQUIRRELVM vm)
+static SQInteger Player_walk_wrapper(HSQUIRRELVM vm)
{
Scripting::Player* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'walk' called without instance"));
return SQ_ERROR;
}
- float arg0;
+ SQFloat arg0;
if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a float"));
return SQ_ERROR;
}
try {
- _this->walk(arg0);
+ _this->walk(static_cast<float> (arg0));
return 0;
}
-static int Player_set_visible_wrapper(HSQUIRRELVM vm)
+static SQInteger Player_set_visible_wrapper(HSQUIRRELVM vm)
{
Scripting::Player* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
try {
- _this->set_visible(arg0);
+ _this->set_visible(arg0 == SQTrue);
return 0;
}
-static int Player_get_visible_wrapper(HSQUIRRELVM vm)
+static SQInteger Player_get_visible_wrapper(HSQUIRRELVM vm)
{
Scripting::Player* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
-static int FloatingImage_release_hook(SQUserPointer ptr, int )
+static SQInteger Player_kill_wrapper(HSQUIRRELVM vm)
+{
+ Scripting::Player* _this;
+ if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
+ sq_throwerror(vm, _SC("'kill' called without instance"));
+ return SQ_ERROR;
+ }
+ SQBool arg0;
+ if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
+ sq_throwerror(vm, _SC("Argument 1 not a bool"));
+ return SQ_ERROR;
+ }
+
+ try {
+ _this->kill(arg0 == SQTrue);
+
+ return 0;
+
+ } catch(std::exception& e) {
+ sq_throwerror(vm, e.what());
+ return SQ_ERROR;
+ } catch(...) {
+ sq_throwerror(vm, _SC("Unexpected exception while executing function 'kill'"));
+ return SQ_ERROR;
+ }
+
+}
+
+static SQInteger FloatingImage_release_hook(SQUserPointer ptr, int )
{
Scripting::FloatingImage* _this = reinterpret_cast<Scripting::FloatingImage*> (ptr);
delete _this;
return 0;
}
-static int FloatingImage_constructor_wrapper(HSQUIRRELVM vm)
+static SQInteger FloatingImage_constructor_wrapper(HSQUIRRELVM vm)
{
- const char* arg0;
+ const SQChar* arg0;
if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a string"));
return SQ_ERROR;
}
-static int FloatingImage_set_layer_wrapper(HSQUIRRELVM vm)
+static SQInteger FloatingImage_set_layer_wrapper(HSQUIRRELVM vm)
{
Scripting::FloatingImage* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'set_layer' called without instance"));
return SQ_ERROR;
}
- int arg0;
+ SQInteger arg0;
if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not an integer"));
return SQ_ERROR;
}
try {
- _this->set_layer(arg0);
+ _this->set_layer(static_cast<int> (arg0));
return 0;
}
-static int FloatingImage_get_layer_wrapper(HSQUIRRELVM vm)
+static SQInteger FloatingImage_get_layer_wrapper(HSQUIRRELVM vm)
{
Scripting::FloatingImage* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
-static int FloatingImage_set_pos_wrapper(HSQUIRRELVM vm)
+static SQInteger FloatingImage_set_pos_wrapper(HSQUIRRELVM vm)
{
Scripting::FloatingImage* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'set_pos' called without instance"));
return SQ_ERROR;
}
- float arg0;
+ SQFloat arg0;
if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a float"));
return SQ_ERROR;
}
- float arg1;
+ SQFloat arg1;
if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
sq_throwerror(vm, _SC("Argument 2 not a float"));
return SQ_ERROR;
}
try {
- _this->set_pos(arg0, arg1);
+ _this->set_pos(static_cast<float> (arg0), static_cast<float> (arg1));
return 0;
}
-static int FloatingImage_get_pos_x_wrapper(HSQUIRRELVM vm)
+static SQInteger FloatingImage_get_pos_x_wrapper(HSQUIRRELVM vm)
{
Scripting::FloatingImage* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
-static int FloatingImage_get_pos_y_wrapper(HSQUIRRELVM vm)
+static SQInteger FloatingImage_get_pos_y_wrapper(HSQUIRRELVM vm)
{
Scripting::FloatingImage* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
-static int FloatingImage_set_anchor_point_wrapper(HSQUIRRELVM vm)
+static SQInteger FloatingImage_set_anchor_point_wrapper(HSQUIRRELVM vm)
{
Scripting::FloatingImage* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
sq_throwerror(vm, _SC("'set_anchor_point' called without instance"));
return SQ_ERROR;
}
- int arg0;
+ SQInteger arg0;
if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not an integer"));
return SQ_ERROR;
}
try {
- _this->set_anchor_point(arg0);
+ _this->set_anchor_point(static_cast<int> (arg0));
return 0;
}
-static int FloatingImage_get_anchor_point_wrapper(HSQUIRRELVM vm)
+static SQInteger FloatingImage_get_anchor_point_wrapper(HSQUIRRELVM vm)
{
Scripting::FloatingImage* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
-static int FloatingImage_set_visible_wrapper(HSQUIRRELVM vm)
+static SQInteger FloatingImage_set_visible_wrapper(HSQUIRRELVM vm)
{
Scripting::FloatingImage* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
try {
- _this->set_visible(arg0);
+ _this->set_visible(arg0 == SQTrue);
return 0;
}
-static int FloatingImage_get_visible_wrapper(HSQUIRRELVM vm)
+static SQInteger FloatingImage_get_visible_wrapper(HSQUIRRELVM vm)
{
Scripting::FloatingImage* _this;
if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
}
-static int display_wrapper(HSQUIRRELVM vm)
+static SQInteger FloatingImage_set_action_wrapper(HSQUIRRELVM vm)
+{
+ Scripting::FloatingImage* _this;
+ if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
+ sq_throwerror(vm, _SC("'set_action' called without instance"));
+ return SQ_ERROR;
+ }
+ const SQChar* arg0;
+ if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
+ sq_throwerror(vm, _SC("Argument 1 not a string"));
+ return SQ_ERROR;
+ }
+
+ try {
+ _this->set_action(arg0);
+
+ return 0;
+
+ } catch(std::exception& e) {
+ sq_throwerror(vm, e.what());
+ return SQ_ERROR;
+ } catch(...) {
+ sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_action'"));
+ return SQ_ERROR;
+ }
+
+}
+
+static SQInteger FloatingImage_get_action_wrapper(HSQUIRRELVM vm)
+{
+ Scripting::FloatingImage* _this;
+ if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
+ sq_throwerror(vm, _SC("'get_action' called without instance"));
+ return SQ_ERROR;
+ }
+
+ try {
+ std::string return_value = _this->get_action();
+
+ sq_pushstring(vm, return_value.c_str(), return_value.size());
+ return 1;
+
+ } catch(std::exception& e) {
+ sq_throwerror(vm, e.what());
+ return SQ_ERROR;
+ } catch(...) {
+ sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_action'"));
+ return SQ_ERROR;
+ }
+
+}
+
+static SQInteger display_wrapper(HSQUIRRELVM vm)
{
return Scripting::display(vm);
}
-static int print_stacktrace_wrapper(HSQUIRRELVM vm)
+static SQInteger print_stacktrace_wrapper(HSQUIRRELVM vm)
{
HSQUIRRELVM arg0 = vm;
}
-static int get_current_thread_wrapper(HSQUIRRELVM vm)
+static SQInteger get_current_thread_wrapper(HSQUIRRELVM vm)
{
return Scripting::get_current_thread(vm);
}
-static int display_text_file_wrapper(HSQUIRRELVM vm)
+static SQInteger display_text_file_wrapper(HSQUIRRELVM vm)
{
- const char* arg0;
+ const SQChar* arg0;
if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a string"));
return SQ_ERROR;
}
-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;
}
-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;
}
-static int wait_wrapper(HSQUIRRELVM vm)
+static SQInteger wait_wrapper(HSQUIRRELVM vm)
{
HSQUIRRELVM arg0 = vm;
- float arg1;
+ SQFloat arg1;
if(SQ_FAILED(sq_getfloat(vm, 2, &arg1))) {
sq_throwerror(vm, _SC("Argument 1 not a float"));
return SQ_ERROR;
}
try {
- Scripting::wait(arg0, arg1);
+ Scripting::wait(arg0, static_cast<float> (arg1));
return sq_suspendvm(vm);
}
-static int wait_for_screenswitch_wrapper(HSQUIRRELVM vm)
+static SQInteger wait_for_screenswitch_wrapper(HSQUIRRELVM vm)
{
HSQUIRRELVM arg0 = vm;
}
-static int exit_screen_wrapper(HSQUIRRELVM vm)
+static SQInteger exit_screen_wrapper(HSQUIRRELVM vm)
{
(void) vm;
}
-static int fadeout_screen_wrapper(HSQUIRRELVM vm)
+static SQInteger fadeout_screen_wrapper(HSQUIRRELVM vm)
{
- float arg0;
+ SQFloat arg0;
if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a float"));
return SQ_ERROR;
}
try {
- Scripting::fadeout_screen(arg0);
+ Scripting::fadeout_screen(static_cast<float> (arg0));
return 0;
}
-static int shrink_screen_wrapper(HSQUIRRELVM vm)
+static SQInteger shrink_screen_wrapper(HSQUIRRELVM vm)
{
- float arg0;
+ SQFloat arg0;
if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
sq_throwerror(vm, _SC("Argument 1 not a float"));
return SQ_ERROR;
}
- float arg1;
+ SQFloat arg1;
if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
sq_throwerror(vm, _SC("Argument 2 not a float"));
return SQ_ERROR;
}
- float arg2;
+ SQFloat arg2;
if(SQ_FAILED(sq_getfloat(vm, 4, &arg2))) {
sq_throwerror(vm, _SC("Argument 3 not a float"));
return SQ_ERROR;
}
try {
- Scripting::shrink_screen(arg0, arg1, arg2);
+ Scripting::shrink_screen(static_cast<float> (arg0), static_cast<float> (arg1), static_cast<float> (arg2));
return 0;
}
-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;
}
-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;
}
-static int save_state_wrapper(HSQUIRRELVM vm)
+static SQInteger save_state_wrapper(HSQUIRRELVM vm)
{
(void) vm;
}
-static int add_key_wrapper(HSQUIRRELVM vm)
-{
- int arg0;
- if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) {
- sq_throwerror(vm, _SC("Argument 1 not an integer"));
- return SQ_ERROR;
- }
-
- try {
- Scripting::add_key(arg0);
-
- return 0;
-
- } catch(std::exception& e) {
- sq_throwerror(vm, e.what());
- return SQ_ERROR;
- } catch(...) {
- sq_throwerror(vm, _SC("Unexpected exception while executing function 'add_key'"));
- return SQ_ERROR;
- }
-
-}
-
-static int debug_collrects_wrapper(HSQUIRRELVM vm)
+static SQInteger debug_collrects_wrapper(HSQUIRRELVM vm)
{
SQBool arg0;
if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
}
try {
- Scripting::debug_collrects(arg0);
+ Scripting::debug_collrects(arg0 == SQTrue);
return 0;
}
-static int debug_draw_fps_wrapper(HSQUIRRELVM vm)
+static SQInteger debug_draw_fps_wrapper(HSQUIRRELVM vm)
{
SQBool arg0;
if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
}
try {
- Scripting::debug_draw_fps(arg0);
+ Scripting::debug_draw_fps(arg0 == SQTrue);
return 0;
}
-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))) {
}
try {
- Scripting::debug_draw_solids_only(arg0);
+ Scripting::debug_draw_solids_only(arg0 == SQTrue);
return 0;
}
-static int grease_wrapper(HSQUIRRELVM vm)
+static SQInteger play_music_wrapper(HSQUIRRELVM vm)
{
- (void) 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 {
- Scripting::grease();
+ Scripting::play_music(arg0);
return 0;
sq_throwerror(vm, e.what());
return SQ_ERROR;
} catch(...) {
- sq_throwerror(vm, _SC("Unexpected exception while executing function 'grease'"));
+ sq_throwerror(vm, _SC("Unexpected exception while executing function 'play_music'"));
return SQ_ERROR;
}
}
-static int invincible_wrapper(HSQUIRRELVM vm)
+static SQInteger play_sound_wrapper(HSQUIRRELVM vm)
{
- (void) 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 {
- Scripting::invincible();
+ Scripting::play_sound(arg0);
return 0;
sq_throwerror(vm, e.what());
return SQ_ERROR;
} catch(...) {
- sq_throwerror(vm, _SC("Unexpected exception while executing function 'invincible'"));
+ sq_throwerror(vm, _SC("Unexpected exception while executing function 'play_sound'"));
return SQ_ERROR;
}
}
-static int mortal_wrapper(HSQUIRRELVM vm)
+static SQInteger grease_wrapper(HSQUIRRELVM vm)
{
(void) vm;
try {
- Scripting::mortal();
+ Scripting::grease();
return 0;
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 'grease'"));
return SQ_ERROR;
}
}
-static int shrink_wrapper(HSQUIRRELVM vm)
+static SQInteger invincible_wrapper(HSQUIRRELVM vm)
{
(void) vm;
try {
- Scripting::shrink();
+ Scripting::invincible();
return 0;
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 'invincible'"));
return SQ_ERROR;
}
}
-static int kill_wrapper(HSQUIRRELVM vm)
+static SQInteger mortal_wrapper(HSQUIRRELVM vm)
{
(void) vm;
try {
- Scripting::kill();
+ Scripting::mortal();
return 0;
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 'mortal'"));
return SQ_ERROR;
}
}
-static int restart_wrapper(HSQUIRRELVM vm)
+static SQInteger restart_wrapper(HSQUIRRELVM vm)
{
(void) vm;
}
-static int whereami_wrapper(HSQUIRRELVM vm)
+static SQInteger whereami_wrapper(HSQUIRRELVM vm)
{
(void) vm;
}
-static int gotoend_wrapper(HSQUIRRELVM vm)
+static SQInteger gotoend_wrapper(HSQUIRRELVM vm)
{
(void) vm;
}
-static int camera_wrapper(HSQUIRRELVM vm)
+static SQInteger camera_wrapper(HSQUIRRELVM vm)
{
(void) vm;
}
-static int quit_wrapper(HSQUIRRELVM vm)
+static SQInteger quit_wrapper(HSQUIRRELVM vm)
{
(void) vm;
}
+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)
sq_remove(v, -2); // remove root table
}
-void create_squirrel_instance(HSQUIRRELVM v, Scripting::Sound* object, bool setup_releasehook)
-{
- using namespace Wrapper;
-
- sq_pushroottable(v);
- sq_pushstring(v, "Sound", -1);
- if(SQ_FAILED(sq_get(v, -2))) {
- std::ostringstream msg;
- msg << "Couldn't resolved squirrel type 'Sound'";
- 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 'Sound'";
- throw SquirrelError(v, msg.str());
- }
- sq_remove(v, -2); // remove object name
-
- if(setup_releasehook) {
- sq_setreleasehook(v, -1, Sound_release_hook);
- }
-
- sq_remove(v, -2); // remove root table
-}
-
void create_squirrel_instance(HSQUIRRELVM v, Scripting::Text* object, bool setup_releasehook)
{
using namespace Wrapper;
{
using namespace Wrapper;
- sq_pushstring(v, "KEY_BRASS", -1);
- sq_pushinteger(v, 1);
- if(SQ_FAILED(sq_createslot(v, -3))) {
- throw SquirrelError(v, "Couldn't register constant 'KEY_BRASS'");
- }
-
- sq_pushstring(v, "KEY_IRON", -1);
- sq_pushinteger(v, 2);
- if(SQ_FAILED(sq_createslot(v, -3))) {
- throw SquirrelError(v, "Couldn't register constant 'KEY_IRON'");
- }
-
- sq_pushstring(v, "KEY_BRONZE", -1);
- sq_pushinteger(v, 4);
- if(SQ_FAILED(sq_createslot(v, -3))) {
- throw SquirrelError(v, "Couldn't register constant 'KEY_BRONZE'");
- }
-
- sq_pushstring(v, "KEY_SILVER", -1);
- sq_pushinteger(v, 8);
- if(SQ_FAILED(sq_createslot(v, -3))) {
- throw SquirrelError(v, "Couldn't register constant 'KEY_SILVER'");
- }
-
- sq_pushstring(v, "KEY_GOLD", -1);
- sq_pushinteger(v, 16);
- if(SQ_FAILED(sq_createslot(v, -3))) {
- throw SquirrelError(v, "Couldn't register constant 'KEY_GOLD'");
- }
-
sq_pushstring(v, "ANCHOR_TOP", -1);
sq_pushinteger(v, 16);
if(SQ_FAILED(sq_createslot(v, -3))) {
throw SquirrelError(v, "Couldn't register function 'save_state'");
}
- sq_pushstring(v, "add_key", -1);
- sq_newclosure(v, &add_key_wrapper, 0);
- if(SQ_FAILED(sq_createslot(v, -3))) {
- throw SquirrelError(v, "Couldn't register function 'add_key'");
- }
-
sq_pushstring(v, "debug_collrects", -1);
sq_newclosure(v, &debug_collrects_wrapper, 0);
if(SQ_FAILED(sq_createslot(v, -3))) {
throw SquirrelError(v, "Couldn't register function 'debug_draw_solids_only'");
}
+ sq_pushstring(v, "play_music", -1);
+ sq_newclosure(v, &play_music_wrapper, 0);
+ if(SQ_FAILED(sq_createslot(v, -3))) {
+ throw SquirrelError(v, "Couldn't register function 'play_music'");
+ }
+
+ sq_pushstring(v, "play_sound", -1);
+ sq_newclosure(v, &play_sound_wrapper, 0);
+ if(SQ_FAILED(sq_createslot(v, -3))) {
+ throw SquirrelError(v, "Couldn't register function 'play_sound'");
+ }
+
sq_pushstring(v, "grease", -1);
sq_newclosure(v, &grease_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);
- if(SQ_FAILED(sq_createslot(v, -3))) {
- throw SquirrelError(v, "Couldn't register function 'shrink'");
- }
-
- sq_pushstring(v, "kill", -1);
- sq_newclosure(v, &kill_wrapper, 0);
- if(SQ_FAILED(sq_createslot(v, -3))) {
- throw SquirrelError(v, "Couldn't register function 'kill'");
- }
-
sq_pushstring(v, "restart", -1);
sq_newclosure(v, &restart_wrapper, 0);
if(SQ_FAILED(sq_createslot(v, -3))) {
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) {
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'");
}
throw SquirrelError(v, "Couldn't register class 'ScriptedObject'");
}
- // Register class Sound
- sq_pushstring(v, "Sound", -1);
- if(sq_newclass(v, SQFalse) < 0) {
- std::ostringstream msg;
- msg << "Couldn't create new class 'Sound'";
- throw SquirrelError(v, msg.str());
- }
- sq_pushstring(v, "play_music", -1);
- sq_newclosure(v, &Sound_play_music_wrapper, 0);
- if(SQ_FAILED(sq_createslot(v, -3))) {
- throw SquirrelError(v, "Couldn't register function 'play_music'");
- }
-
- sq_pushstring(v, "play", -1);
- sq_newclosure(v, &Sound_play_wrapper, 0);
- if(SQ_FAILED(sq_createslot(v, -3))) {
- throw SquirrelError(v, "Couldn't register function 'play'");
- }
-
- if(SQ_FAILED(sq_createslot(v, -3))) {
- throw SquirrelError(v, "Couldn't register class 'Sound'");
- }
-
// Register class Text
sq_pushstring(v, "Text", -1);
if(sq_newclass(v, SQFalse) < 0) {
throw SquirrelError(v, "Couldn't register function 'get_visible'");
}
+ sq_pushstring(v, "kill", -1);
+ sq_newclosure(v, &Player_kill_wrapper, 0);
+ if(SQ_FAILED(sq_createslot(v, -3))) {
+ throw SquirrelError(v, "Couldn't register function 'kill'");
+ }
+
if(SQ_FAILED(sq_createslot(v, -3))) {
throw SquirrelError(v, "Couldn't register class 'Player'");
}
throw SquirrelError(v, "Couldn't register function 'get_visible'");
}
+ sq_pushstring(v, "set_action", -1);
+ sq_newclosure(v, &FloatingImage_set_action_wrapper, 0);
+ if(SQ_FAILED(sq_createslot(v, -3))) {
+ throw SquirrelError(v, "Couldn't register function 'set_action'");
+ }
+
+ sq_pushstring(v, "get_action", -1);
+ sq_newclosure(v, &FloatingImage_get_action_wrapper, 0);
+ if(SQ_FAILED(sq_createslot(v, -3))) {
+ throw SquirrelError(v, "Couldn't register function 'get_action'");
+ }
+
if(SQ_FAILED(sq_createslot(v, -3))) {
throw SquirrelError(v, "Couldn't register class 'FloatingImage'");
}