src/scripting/wrapper.cpp

   1 /**
   2  * WARNING: This file is automatically generated from:
   3  *  'src/scripting/wrapper.interface.hpp'
   4  * DO NOT CHANGE
   5  */
   6 #include <config.h>
   7
   8 #include <new>
   9 #include <assert.h>
  10 #include <string>
  11 #include <sstream>
  12 #include <squirrel.h>
  13 #include "squirrel_error.hpp"
  14 #include "wrapper.interface.hpp"
  15
  16 namespace Scripting
  17 {
  18 namespace Wrapper
  19 {
  20
  21 static int DisplayEffect_release_hook(SQUserPointer ptr, int )
  22 {
  23   Scripting::DisplayEffect* _this = reinterpret_cast<Scripting::DisplayEffect*> (ptr);
  24   delete _this;
  25   return 0;
  26 }
  27
  28 static int DisplayEffect_fade_out_wrapper(HSQUIRRELVM vm)
  29 {
  30   Scripting::DisplayEffect* _this;
  31   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
  32     sq_throwerror(vm, _SC("'fade_out' called without instance"));
  33     return SQ_ERROR;
  34   }
  35   float arg0;
  36   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
  37     sq_throwerror(vm, _SC("Argument 1 not a float"));
  38     return SQ_ERROR;
  39   }
  40
  41   try {
  42     _this->fade_out(arg0);
  43
  44     return 0;
  45
  46   } catch(std::exception& e) {
  47     sq_throwerror(vm, e.what());
  48     return SQ_ERROR;
  49   } catch(...) {
  50     sq_throwerror(vm, _SC("Unexpected exception while executing function 'fade_out'"));
  51     return SQ_ERROR;
  52   }
  53
  54 }
  55
  56 static int DisplayEffect_fade_in_wrapper(HSQUIRRELVM vm)
  57 {
  58   Scripting::DisplayEffect* _this;
  59   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
  60     sq_throwerror(vm, _SC("'fade_in' called without instance"));
  61     return SQ_ERROR;
  62   }
  63   float arg0;
  64   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
  65     sq_throwerror(vm, _SC("Argument 1 not a float"));
  66     return SQ_ERROR;
  67   }
  68
  69   try {
  70     _this->fade_in(arg0);
  71
  72     return 0;
  73
  74   } catch(std::exception& e) {
  75     sq_throwerror(vm, e.what());
  76     return SQ_ERROR;
  77   } catch(...) {
  78     sq_throwerror(vm, _SC("Unexpected exception while executing function 'fade_in'"));
  79     return SQ_ERROR;
  80   }
  81
  82 }
  83
  84 static int DisplayEffect_set_black_wrapper(HSQUIRRELVM vm)
  85 {
  86   Scripting::DisplayEffect* _this;
  87   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
  88     sq_throwerror(vm, _SC("'set_black' called without instance"));
  89     return SQ_ERROR;
  90   }
  91   SQBool arg0;
  92   if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
  93     sq_throwerror(vm, _SC("Argument 1 not a bool"));
  94     return SQ_ERROR;
  95   }
  96
  97   try {
  98     _this->set_black(arg0);
  99
 100     return 0;
 101
 102   } catch(std::exception& e) {
 103     sq_throwerror(vm, e.what());
 104     return SQ_ERROR;
 105   } catch(...) {
 106     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_black'"));
 107     return SQ_ERROR;
 108   }
 109
 110 }
 111
 112 static int DisplayEffect_is_black_wrapper(HSQUIRRELVM vm)
 113 {
 114   Scripting::DisplayEffect* _this;
 115   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 116     sq_throwerror(vm, _SC("'is_black' called without instance"));
 117     return SQ_ERROR;
 118   }
 119
 120   try {
 121     bool return_value = _this->is_black();
 122
 123     sq_pushbool(vm, return_value);
 124     return 1;
 125
 126   } catch(std::exception& e) {
 127     sq_throwerror(vm, e.what());
 128     return SQ_ERROR;
 129   } catch(...) {
 130     sq_throwerror(vm, _SC("Unexpected exception while executing function 'is_black'"));
 131     return SQ_ERROR;
 132   }
 133
 134 }
 135
 136 static int DisplayEffect_sixteen_to_nine_wrapper(HSQUIRRELVM vm)
 137 {
 138   Scripting::DisplayEffect* _this;
 139   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 140     sq_throwerror(vm, _SC("'sixteen_to_nine' called without instance"));
 141     return SQ_ERROR;
 142   }
 143   float arg0;
 144   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
 145     sq_throwerror(vm, _SC("Argument 1 not a float"));
 146     return SQ_ERROR;
 147   }
 148
 149   try {
 150     _this->sixteen_to_nine(arg0);
 151
 152     return 0;
 153
 154   } catch(std::exception& e) {
 155     sq_throwerror(vm, e.what());
 156     return SQ_ERROR;
 157   } catch(...) {
 158     sq_throwerror(vm, _SC("Unexpected exception while executing function 'sixteen_to_nine'"));
 159     return SQ_ERROR;
 160   }
 161
 162 }
 163
 164 static int DisplayEffect_four_to_three_wrapper(HSQUIRRELVM vm)
 165 {
 166   Scripting::DisplayEffect* _this;
 167   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 168     sq_throwerror(vm, _SC("'four_to_three' called without instance"));
 169     return SQ_ERROR;
 170   }
 171   float arg0;
 172   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
 173     sq_throwerror(vm, _SC("Argument 1 not a float"));
 174     return SQ_ERROR;
 175   }
 176
 177   try {
 178     _this->four_to_three(arg0);
 179
 180     return 0;
 181
 182   } catch(std::exception& e) {
 183     sq_throwerror(vm, e.what());
 184     return SQ_ERROR;
 185   } catch(...) {
 186     sq_throwerror(vm, _SC("Unexpected exception while executing function 'four_to_three'"));
 187     return SQ_ERROR;
 188   }
 189
 190 }
 191
 192 static int Camera_release_hook(SQUserPointer ptr, int )
 193 {
 194   Scripting::Camera* _this = reinterpret_cast<Scripting::Camera*> (ptr);
 195   delete _this;
 196   return 0;
 197 }
 198
 199 static int Camera_shake_wrapper(HSQUIRRELVM vm)
 200 {
 201   Scripting::Camera* _this;
 202   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 203     sq_throwerror(vm, _SC("'shake' called without instance"));
 204     return SQ_ERROR;
 205   }
 206   float arg0;
 207   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
 208     sq_throwerror(vm, _SC("Argument 1 not a float"));
 209     return SQ_ERROR;
 210   }
 211   float arg1;
 212   if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
 213     sq_throwerror(vm, _SC("Argument 2 not a float"));
 214     return SQ_ERROR;
 215   }
 216   float arg2;
 217   if(SQ_FAILED(sq_getfloat(vm, 4, &arg2))) {
 218     sq_throwerror(vm, _SC("Argument 3 not a float"));
 219     return SQ_ERROR;
 220   }
 221
 222   try {
 223     _this->shake(arg0, arg1, arg2);
 224
 225     return 0;
 226
 227   } catch(std::exception& e) {
 228     sq_throwerror(vm, e.what());
 229     return SQ_ERROR;
 230   } catch(...) {
 231     sq_throwerror(vm, _SC("Unexpected exception while executing function 'shake'"));
 232     return SQ_ERROR;
 233   }
 234
 235 }
 236
 237 static int Camera_set_pos_wrapper(HSQUIRRELVM vm)
 238 {
 239   Scripting::Camera* _this;
 240   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 241     sq_throwerror(vm, _SC("'set_pos' called without instance"));
 242     return SQ_ERROR;
 243   }
 244   float arg0;
 245   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
 246     sq_throwerror(vm, _SC("Argument 1 not a float"));
 247     return SQ_ERROR;
 248   }
 249   float arg1;
 250   if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
 251     sq_throwerror(vm, _SC("Argument 2 not a float"));
 252     return SQ_ERROR;
 253   }
 254
 255   try {
 256     _this->set_pos(arg0, arg1);
 257
 258     return 0;
 259
 260   } catch(std::exception& e) {
 261     sq_throwerror(vm, e.what());
 262     return SQ_ERROR;
 263   } catch(...) {
 264     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_pos'"));
 265     return SQ_ERROR;
 266   }
 267
 268 }
 269
 270 static int Camera_set_mode_wrapper(HSQUIRRELVM vm)
 271 {
 272   Scripting::Camera* _this;
 273   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 274     sq_throwerror(vm, _SC("'set_mode' called without instance"));
 275     return SQ_ERROR;
 276   }
 277   const char* arg0;
 278   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
 279     sq_throwerror(vm, _SC("Argument 1 not a string"));
 280     return SQ_ERROR;
 281   }
 282
 283   try {
 284     _this->set_mode(arg0);
 285
 286     return 0;
 287
 288   } catch(std::exception& e) {
 289     sq_throwerror(vm, e.what());
 290     return SQ_ERROR;
 291   } catch(...) {
 292     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_mode'"));
 293     return SQ_ERROR;
 294   }
 295
 296 }
 297
 298 static int Camera_scroll_to_wrapper(HSQUIRRELVM vm)
 299 {
 300   Scripting::Camera* _this;
 301   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 302     sq_throwerror(vm, _SC("'scroll_to' called without instance"));
 303     return SQ_ERROR;
 304   }
 305   float arg0;
 306   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
 307     sq_throwerror(vm, _SC("Argument 1 not a float"));
 308     return SQ_ERROR;
 309   }
 310   float arg1;
 311   if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
 312     sq_throwerror(vm, _SC("Argument 2 not a float"));
 313     return SQ_ERROR;
 314   }
 315   float arg2;
 316   if(SQ_FAILED(sq_getfloat(vm, 4, &arg2))) {
 317     sq_throwerror(vm, _SC("Argument 3 not a float"));
 318     return SQ_ERROR;
 319   }
 320
 321   try {
 322     _this->scroll_to(arg0, arg1, arg2);
 323
 324     return 0;
 325
 326   } catch(std::exception& e) {
 327     sq_throwerror(vm, e.what());
 328     return SQ_ERROR;
 329   } catch(...) {
 330     sq_throwerror(vm, _SC("Unexpected exception while executing function 'scroll_to'"));
 331     return SQ_ERROR;
 332   }
 333
 334 }
 335
 336 static int Level_release_hook(SQUserPointer ptr, int )
 337 {
 338   Scripting::Level* _this = reinterpret_cast<Scripting::Level*> (ptr);
 339   delete _this;
 340   return 0;
 341 }
 342
 343 static int Level_finish_wrapper(HSQUIRRELVM vm)
 344 {
 345   Scripting::Level* _this;
 346   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 347     sq_throwerror(vm, _SC("'finish' called without instance"));
 348     return SQ_ERROR;
 349   }
 350   SQBool arg0;
 351   if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
 352     sq_throwerror(vm, _SC("Argument 1 not a bool"));
 353     return SQ_ERROR;
 354   }
 355
 356   try {
 357     _this->finish(arg0);
 358
 359     return 0;
 360
 361   } catch(std::exception& e) {
 362     sq_throwerror(vm, e.what());
 363     return SQ_ERROR;
 364   } catch(...) {
 365     sq_throwerror(vm, _SC("Unexpected exception while executing function 'finish'"));
 366     return SQ_ERROR;
 367   }
 368
 369 }
 370
 371 static int Level_spawn_wrapper(HSQUIRRELVM vm)
 372 {
 373   Scripting::Level* _this;
 374   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 375     sq_throwerror(vm, _SC("'spawn' called without instance"));
 376     return SQ_ERROR;
 377   }
 378   const char* arg0;
 379   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
 380     sq_throwerror(vm, _SC("Argument 1 not a string"));
 381     return SQ_ERROR;
 382   }
 383   const char* arg1;
 384   if(SQ_FAILED(sq_getstring(vm, 3, &arg1))) {
 385     sq_throwerror(vm, _SC("Argument 2 not a string"));
 386     return SQ_ERROR;
 387   }
 388
 389   try {
 390     _this->spawn(arg0, arg1);
 391
 392     return 0;
 393
 394   } catch(std::exception& e) {
 395     sq_throwerror(vm, e.what());
 396     return SQ_ERROR;
 397   } catch(...) {
 398     sq_throwerror(vm, _SC("Unexpected exception while executing function 'spawn'"));
 399     return SQ_ERROR;
 400   }
 401
 402 }
 403
 404 static int Level_flip_vertically_wrapper(HSQUIRRELVM vm)
 405 {
 406   Scripting::Level* _this;
 407   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 408     sq_throwerror(vm, _SC("'flip_vertically' called without instance"));
 409     return SQ_ERROR;
 410   }
 411
 412   try {
 413     _this->flip_vertically();
 414
 415     return 0;
 416
 417   } catch(std::exception& e) {
 418     sq_throwerror(vm, e.what());
 419     return SQ_ERROR;
 420   } catch(...) {
 421     sq_throwerror(vm, _SC("Unexpected exception while executing function 'flip_vertically'"));
 422     return SQ_ERROR;
 423   }
 424
 425 }
 426
 427 static int ScriptedObject_release_hook(SQUserPointer ptr, int )
 428 {
 429   Scripting::ScriptedObject* _this = reinterpret_cast<Scripting::ScriptedObject*> (ptr);
 430   delete _this;
 431   return 0;
 432 }
 433
 434 static int ScriptedObject_set_action_wrapper(HSQUIRRELVM vm)
 435 {
 436   Scripting::ScriptedObject* _this;
 437   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 438     sq_throwerror(vm, _SC("'set_action' called without instance"));
 439     return SQ_ERROR;
 440   }
 441   const char* arg0;
 442   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
 443     sq_throwerror(vm, _SC("Argument 1 not a string"));
 444     return SQ_ERROR;
 445   }
 446
 447   try {
 448     _this->set_action(arg0);
 449
 450     return 0;
 451
 452   } catch(std::exception& e) {
 453     sq_throwerror(vm, e.what());
 454     return SQ_ERROR;
 455   } catch(...) {
 456     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_action'"));
 457     return SQ_ERROR;
 458   }
 459
 460 }
 461
 462 static int ScriptedObject_get_action_wrapper(HSQUIRRELVM vm)
 463 {
 464   Scripting::ScriptedObject* _this;
 465   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 466     sq_throwerror(vm, _SC("'get_action' called without instance"));
 467     return SQ_ERROR;
 468   }
 469
 470   try {
 471     std::string return_value = _this->get_action();
 472
 473     sq_pushstring(vm, return_value.c_str(), return_value.size());
 474     return 1;
 475
 476   } catch(std::exception& e) {
 477     sq_throwerror(vm, e.what());
 478     return SQ_ERROR;
 479   } catch(...) {
 480     sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_action'"));
 481     return SQ_ERROR;
 482   }
 483
 484 }
 485
 486 static int ScriptedObject_move_wrapper(HSQUIRRELVM vm)
 487 {
 488   Scripting::ScriptedObject* _this;
 489   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 490     sq_throwerror(vm, _SC("'move' called without instance"));
 491     return SQ_ERROR;
 492   }
 493   float arg0;
 494   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
 495     sq_throwerror(vm, _SC("Argument 1 not a float"));
 496     return SQ_ERROR;
 497   }
 498   float arg1;
 499   if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
 500     sq_throwerror(vm, _SC("Argument 2 not a float"));
 501     return SQ_ERROR;
 502   }
 503
 504   try {
 505     _this->move(arg0, arg1);
 506
 507     return 0;
 508
 509   } catch(std::exception& e) {
 510     sq_throwerror(vm, e.what());
 511     return SQ_ERROR;
 512   } catch(...) {
 513     sq_throwerror(vm, _SC("Unexpected exception while executing function 'move'"));
 514     return SQ_ERROR;
 515   }
 516
 517 }
 518
 519 static int ScriptedObject_set_pos_wrapper(HSQUIRRELVM vm)
 520 {
 521   Scripting::ScriptedObject* _this;
 522   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 523     sq_throwerror(vm, _SC("'set_pos' called without instance"));
 524     return SQ_ERROR;
 525   }
 526   float arg0;
 527   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
 528     sq_throwerror(vm, _SC("Argument 1 not a float"));
 529     return SQ_ERROR;
 530   }
 531   float arg1;
 532   if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
 533     sq_throwerror(vm, _SC("Argument 2 not a float"));
 534     return SQ_ERROR;
 535   }
 536
 537   try {
 538     _this->set_pos(arg0, arg1);
 539
 540     return 0;
 541
 542   } catch(std::exception& e) {
 543     sq_throwerror(vm, e.what());
 544     return SQ_ERROR;
 545   } catch(...) {
 546     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_pos'"));
 547     return SQ_ERROR;
 548   }
 549
 550 }
 551
 552 static int ScriptedObject_get_pos_x_wrapper(HSQUIRRELVM vm)
 553 {
 554   Scripting::ScriptedObject* _this;
 555   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 556     sq_throwerror(vm, _SC("'get_pos_x' called without instance"));
 557     return SQ_ERROR;
 558   }
 559
 560   try {
 561     float return_value = _this->get_pos_x();
 562
 563     sq_pushfloat(vm, return_value);
 564     return 1;
 565
 566   } catch(std::exception& e) {
 567     sq_throwerror(vm, e.what());
 568     return SQ_ERROR;
 569   } catch(...) {
 570     sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_pos_x'"));
 571     return SQ_ERROR;
 572   }
 573
 574 }
 575
 576 static int ScriptedObject_get_pos_y_wrapper(HSQUIRRELVM vm)
 577 {
 578   Scripting::ScriptedObject* _this;
 579   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 580     sq_throwerror(vm, _SC("'get_pos_y' called without instance"));
 581     return SQ_ERROR;
 582   }
 583
 584   try {
 585     float return_value = _this->get_pos_y();
 586
 587     sq_pushfloat(vm, return_value);
 588     return 1;
 589
 590   } catch(std::exception& e) {
 591     sq_throwerror(vm, e.what());
 592     return SQ_ERROR;
 593   } catch(...) {
 594     sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_pos_y'"));
 595     return SQ_ERROR;
 596   }
 597
 598 }
 599
 600 static int ScriptedObject_set_velocity_wrapper(HSQUIRRELVM vm)
 601 {
 602   Scripting::ScriptedObject* _this;
 603   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 604     sq_throwerror(vm, _SC("'set_velocity' called without instance"));
 605     return SQ_ERROR;
 606   }
 607   float arg0;
 608   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
 609     sq_throwerror(vm, _SC("Argument 1 not a float"));
 610     return SQ_ERROR;
 611   }
 612   float arg1;
 613   if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
 614     sq_throwerror(vm, _SC("Argument 2 not a float"));
 615     return SQ_ERROR;
 616   }
 617
 618   try {
 619     _this->set_velocity(arg0, arg1);
 620
 621     return 0;
 622
 623   } catch(std::exception& e) {
 624     sq_throwerror(vm, e.what());
 625     return SQ_ERROR;
 626   } catch(...) {
 627     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_velocity'"));
 628     return SQ_ERROR;
 629   }
 630
 631 }
 632
 633 static int ScriptedObject_get_velocity_x_wrapper(HSQUIRRELVM vm)
 634 {
 635   Scripting::ScriptedObject* _this;
 636   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 637     sq_throwerror(vm, _SC("'get_velocity_x' called without instance"));
 638     return SQ_ERROR;
 639   }
 640
 641   try {
 642     float return_value = _this->get_velocity_x();
 643
 644     sq_pushfloat(vm, return_value);
 645     return 1;
 646
 647   } catch(std::exception& e) {
 648     sq_throwerror(vm, e.what());
 649     return SQ_ERROR;
 650   } catch(...) {
 651     sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_velocity_x'"));
 652     return SQ_ERROR;
 653   }
 654
 655 }
 656
 657 static int ScriptedObject_get_velocity_y_wrapper(HSQUIRRELVM vm)
 658 {
 659   Scripting::ScriptedObject* _this;
 660   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 661     sq_throwerror(vm, _SC("'get_velocity_y' called without instance"));
 662     return SQ_ERROR;
 663   }
 664
 665   try {
 666     float return_value = _this->get_velocity_y();
 667
 668     sq_pushfloat(vm, return_value);
 669     return 1;
 670
 671   } catch(std::exception& e) {
 672     sq_throwerror(vm, e.what());
 673     return SQ_ERROR;
 674   } catch(...) {
 675     sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_velocity_y'"));
 676     return SQ_ERROR;
 677   }
 678
 679 }
 680
 681 static int ScriptedObject_set_visible_wrapper(HSQUIRRELVM vm)
 682 {
 683   Scripting::ScriptedObject* _this;
 684   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 685     sq_throwerror(vm, _SC("'set_visible' called without instance"));
 686     return SQ_ERROR;
 687   }
 688   SQBool arg0;
 689   if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
 690     sq_throwerror(vm, _SC("Argument 1 not a bool"));
 691     return SQ_ERROR;
 692   }
 693
 694   try {
 695     _this->set_visible(arg0);
 696
 697     return 0;
 698
 699   } catch(std::exception& e) {
 700     sq_throwerror(vm, e.what());
 701     return SQ_ERROR;
 702   } catch(...) {
 703     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_visible'"));
 704     return SQ_ERROR;
 705   }
 706
 707 }
 708
 709 static int ScriptedObject_is_visible_wrapper(HSQUIRRELVM vm)
 710 {
 711   Scripting::ScriptedObject* _this;
 712   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 713     sq_throwerror(vm, _SC("'is_visible' called without instance"));
 714     return SQ_ERROR;
 715   }
 716
 717   try {
 718     bool return_value = _this->is_visible();
 719
 720     sq_pushbool(vm, return_value);
 721     return 1;
 722
 723   } catch(std::exception& e) {
 724     sq_throwerror(vm, e.what());
 725     return SQ_ERROR;
 726   } catch(...) {
 727     sq_throwerror(vm, _SC("Unexpected exception while executing function 'is_visible'"));
 728     return SQ_ERROR;
 729   }
 730
 731 }
 732
 733 static int ScriptedObject_get_name_wrapper(HSQUIRRELVM vm)
 734 {
 735   Scripting::ScriptedObject* _this;
 736   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 737     sq_throwerror(vm, _SC("'get_name' called without instance"));
 738     return SQ_ERROR;
 739   }
 740
 741   try {
 742     std::string return_value = _this->get_name();
 743
 744     sq_pushstring(vm, return_value.c_str(), return_value.size());
 745     return 1;
 746
 747   } catch(std::exception& e) {
 748     sq_throwerror(vm, e.what());
 749     return SQ_ERROR;
 750   } catch(...) {
 751     sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_name'"));
 752     return SQ_ERROR;
 753   }
 754
 755 }
 756
 757 static int Text_release_hook(SQUserPointer ptr, int )
 758 {
 759   Scripting::Text* _this = reinterpret_cast<Scripting::Text*> (ptr);
 760   delete _this;
 761   return 0;
 762 }
 763
 764 static int Text_set_text_wrapper(HSQUIRRELVM vm)
 765 {
 766   Scripting::Text* _this;
 767   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 768     sq_throwerror(vm, _SC("'set_text' called without instance"));
 769     return SQ_ERROR;
 770   }
 771   const char* arg0;
 772   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
 773     sq_throwerror(vm, _SC("Argument 1 not a string"));
 774     return SQ_ERROR;
 775   }
 776
 777   try {
 778     _this->set_text(arg0);
 779
 780     return 0;
 781
 782   } catch(std::exception& e) {
 783     sq_throwerror(vm, e.what());
 784     return SQ_ERROR;
 785   } catch(...) {
 786     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_text'"));
 787     return SQ_ERROR;
 788   }
 789
 790 }
 791
 792 static int Text_set_font_wrapper(HSQUIRRELVM vm)
 793 {
 794   Scripting::Text* _this;
 795   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 796     sq_throwerror(vm, _SC("'set_font' called without instance"));
 797     return SQ_ERROR;
 798   }
 799   const char* arg0;
 800   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
 801     sq_throwerror(vm, _SC("Argument 1 not a string"));
 802     return SQ_ERROR;
 803   }
 804
 805   try {
 806     _this->set_font(arg0);
 807
 808     return 0;
 809
 810   } catch(std::exception& e) {
 811     sq_throwerror(vm, e.what());
 812     return SQ_ERROR;
 813   } catch(...) {
 814     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_font'"));
 815     return SQ_ERROR;
 816   }
 817
 818 }
 819
 820 static int Text_fade_in_wrapper(HSQUIRRELVM vm)
 821 {
 822   Scripting::Text* _this;
 823   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 824     sq_throwerror(vm, _SC("'fade_in' called without instance"));
 825     return SQ_ERROR;
 826   }
 827   float arg0;
 828   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
 829     sq_throwerror(vm, _SC("Argument 1 not a float"));
 830     return SQ_ERROR;
 831   }
 832
 833   try {
 834     _this->fade_in(arg0);
 835
 836     return 0;
 837
 838   } catch(std::exception& e) {
 839     sq_throwerror(vm, e.what());
 840     return SQ_ERROR;
 841   } catch(...) {
 842     sq_throwerror(vm, _SC("Unexpected exception while executing function 'fade_in'"));
 843     return SQ_ERROR;
 844   }
 845
 846 }
 847
 848 static int Text_fade_out_wrapper(HSQUIRRELVM vm)
 849 {
 850   Scripting::Text* _this;
 851   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 852     sq_throwerror(vm, _SC("'fade_out' called without instance"));
 853     return SQ_ERROR;
 854   }
 855   float arg0;
 856   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
 857     sq_throwerror(vm, _SC("Argument 1 not a float"));
 858     return SQ_ERROR;
 859   }
 860
 861   try {
 862     _this->fade_out(arg0);
 863
 864     return 0;
 865
 866   } catch(std::exception& e) {
 867     sq_throwerror(vm, e.what());
 868     return SQ_ERROR;
 869   } catch(...) {
 870     sq_throwerror(vm, _SC("Unexpected exception while executing function 'fade_out'"));
 871     return SQ_ERROR;
 872   }
 873
 874 }
 875
 876 static int Text_set_visible_wrapper(HSQUIRRELVM vm)
 877 {
 878   Scripting::Text* _this;
 879   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 880     sq_throwerror(vm, _SC("'set_visible' called without instance"));
 881     return SQ_ERROR;
 882   }
 883   SQBool arg0;
 884   if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
 885     sq_throwerror(vm, _SC("Argument 1 not a bool"));
 886     return SQ_ERROR;
 887   }
 888
 889   try {
 890     _this->set_visible(arg0);
 891
 892     return 0;
 893
 894   } catch(std::exception& e) {
 895     sq_throwerror(vm, e.what());
 896     return SQ_ERROR;
 897   } catch(...) {
 898     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_visible'"));
 899     return SQ_ERROR;
 900   }
 901
 902 }
 903
 904 static int Text_set_centered_wrapper(HSQUIRRELVM vm)
 905 {
 906   Scripting::Text* _this;
 907   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 908     sq_throwerror(vm, _SC("'set_centered' called without instance"));
 909     return SQ_ERROR;
 910   }
 911   SQBool arg0;
 912   if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
 913     sq_throwerror(vm, _SC("Argument 1 not a bool"));
 914     return SQ_ERROR;
 915   }
 916
 917   try {
 918     _this->set_centered(arg0);
 919
 920     return 0;
 921
 922   } catch(std::exception& e) {
 923     sq_throwerror(vm, e.what());
 924     return SQ_ERROR;
 925   } catch(...) {
 926     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_centered'"));
 927     return SQ_ERROR;
 928   }
 929
 930 }
 931
 932 static int Player_release_hook(SQUserPointer ptr, int )
 933 {
 934   Scripting::Player* _this = reinterpret_cast<Scripting::Player*> (ptr);
 935   delete _this;
 936   return 0;
 937 }
 938
 939 static int Player_add_bonus_wrapper(HSQUIRRELVM vm)
 940 {
 941   Scripting::Player* _this;
 942   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 943     sq_throwerror(vm, _SC("'add_bonus' called without instance"));
 944     return SQ_ERROR;
 945   }
 946   const char* arg0;
 947   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
 948     sq_throwerror(vm, _SC("Argument 1 not a string"));
 949     return SQ_ERROR;
 950   }
 951
 952   try {
 953     _this->add_bonus(arg0);
 954
 955     return 0;
 956
 957   } catch(std::exception& e) {
 958     sq_throwerror(vm, e.what());
 959     return SQ_ERROR;
 960   } catch(...) {
 961     sq_throwerror(vm, _SC("Unexpected exception while executing function 'add_bonus'"));
 962     return SQ_ERROR;
 963   }
 964
 965 }
 966
 967 static int Player_add_coins_wrapper(HSQUIRRELVM vm)
 968 {
 969   Scripting::Player* _this;
 970   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 971     sq_throwerror(vm, _SC("'add_coins' called without instance"));
 972     return SQ_ERROR;
 973   }
 974   int arg0;
 975   if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) {
 976     sq_throwerror(vm, _SC("Argument 1 not an integer"));
 977     return SQ_ERROR;
 978   }
 979
 980   try {
 981     _this->add_coins(arg0);
 982
 983     return 0;
 984
 985   } catch(std::exception& e) {
 986     sq_throwerror(vm, e.what());
 987     return SQ_ERROR;
 988   } catch(...) {
 989     sq_throwerror(vm, _SC("Unexpected exception while executing function 'add_coins'"));
 990     return SQ_ERROR;
 991   }
 992
 993 }
 994
 995 static int Player_make_invincible_wrapper(HSQUIRRELVM vm)
 996 {
 997   Scripting::Player* _this;
 998   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
 999     sq_throwerror(vm, _SC("'make_invincible' called without instance"));
1000     return SQ_ERROR;
1001   }
1002
1003   try {
1004     _this->make_invincible();
1005
1006     return 0;
1007
1008   } catch(std::exception& e) {
1009     sq_throwerror(vm, e.what());
1010     return SQ_ERROR;
1011   } catch(...) {
1012     sq_throwerror(vm, _SC("Unexpected exception while executing function 'make_invincible'"));
1013     return SQ_ERROR;
1014   }
1015
1016 }
1017
1018 static int Player_deactivate_wrapper(HSQUIRRELVM vm)
1019 {
1020   Scripting::Player* _this;
1021   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1022     sq_throwerror(vm, _SC("'deactivate' called without instance"));
1023     return SQ_ERROR;
1024   }
1025
1026   try {
1027     _this->deactivate();
1028
1029     return 0;
1030
1031   } catch(std::exception& e) {
1032     sq_throwerror(vm, e.what());
1033     return SQ_ERROR;
1034   } catch(...) {
1035     sq_throwerror(vm, _SC("Unexpected exception while executing function 'deactivate'"));
1036     return SQ_ERROR;
1037   }
1038
1039 }
1040
1041 static int Player_activate_wrapper(HSQUIRRELVM vm)
1042 {
1043   Scripting::Player* _this;
1044   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1045     sq_throwerror(vm, _SC("'activate' called without instance"));
1046     return SQ_ERROR;
1047   }
1048
1049   try {
1050     _this->activate();
1051
1052     return 0;
1053
1054   } catch(std::exception& e) {
1055     sq_throwerror(vm, e.what());
1056     return SQ_ERROR;
1057   } catch(...) {
1058     sq_throwerror(vm, _SC("Unexpected exception while executing function 'activate'"));
1059     return SQ_ERROR;
1060   }
1061
1062 }
1063
1064 static int Player_walk_wrapper(HSQUIRRELVM vm)
1065 {
1066   Scripting::Player* _this;
1067   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1068     sq_throwerror(vm, _SC("'walk' called without instance"));
1069     return SQ_ERROR;
1070   }
1071   float arg0;
1072   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
1073     sq_throwerror(vm, _SC("Argument 1 not a float"));
1074     return SQ_ERROR;
1075   }
1076
1077   try {
1078     _this->walk(arg0);
1079
1080     return 0;
1081
1082   } catch(std::exception& e) {
1083     sq_throwerror(vm, e.what());
1084     return SQ_ERROR;
1085   } catch(...) {
1086     sq_throwerror(vm, _SC("Unexpected exception while executing function 'walk'"));
1087     return SQ_ERROR;
1088   }
1089
1090 }
1091
1092 static int Player_set_visible_wrapper(HSQUIRRELVM vm)
1093 {
1094   Scripting::Player* _this;
1095   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1096     sq_throwerror(vm, _SC("'set_visible' called without instance"));
1097     return SQ_ERROR;
1098   }
1099   SQBool arg0;
1100   if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
1101     sq_throwerror(vm, _SC("Argument 1 not a bool"));
1102     return SQ_ERROR;
1103   }
1104
1105   try {
1106     _this->set_visible(arg0);
1107
1108     return 0;
1109
1110   } catch(std::exception& e) {
1111     sq_throwerror(vm, e.what());
1112     return SQ_ERROR;
1113   } catch(...) {
1114     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_visible'"));
1115     return SQ_ERROR;
1116   }
1117
1118 }
1119
1120 static int Player_get_visible_wrapper(HSQUIRRELVM vm)
1121 {
1122   Scripting::Player* _this;
1123   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1124     sq_throwerror(vm, _SC("'get_visible' called without instance"));
1125     return SQ_ERROR;
1126   }
1127
1128   try {
1129     bool return_value = _this->get_visible();
1130
1131     sq_pushbool(vm, return_value);
1132     return 1;
1133
1134   } catch(std::exception& e) {
1135     sq_throwerror(vm, e.what());
1136     return SQ_ERROR;
1137   } catch(...) {
1138     sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_visible'"));
1139     return SQ_ERROR;
1140   }
1141
1142 }
1143
1144 static int FloatingImage_release_hook(SQUserPointer ptr, int )
1145 {
1146   Scripting::FloatingImage* _this = reinterpret_cast<Scripting::FloatingImage*> (ptr);
1147   delete _this;
1148   return 0;
1149 }
1150
1151 static int FloatingImage_constructor_wrapper(HSQUIRRELVM vm)
1152 {
1153   const char* arg0;
1154   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
1155     sq_throwerror(vm, _SC("Argument 1 not a string"));
1156     return SQ_ERROR;
1157   }
1158
1159   try {
1160     Scripting::FloatingImage* _this = new Scripting::FloatingImage(arg0);
1161   if(SQ_FAILED(sq_setinstanceup(vm, 1, _this))) {
1162     sq_throwerror(vm, _SC("Couldn't setup instance of 'FloatingImage' class"));
1163     return SQ_ERROR;
1164   }
1165   sq_setreleasehook(vm, 1, FloatingImage_release_hook);
1166
1167     return 0;
1168
1169   } catch(std::exception& e) {
1170     sq_throwerror(vm, e.what());
1171     return SQ_ERROR;
1172   } catch(...) {
1173     sq_throwerror(vm, _SC("Unexpected exception while executing function 'constructor'"));
1174     return SQ_ERROR;
1175   }
1176
1177 }
1178
1179 static int FloatingImage_set_layer_wrapper(HSQUIRRELVM vm)
1180 {
1181   Scripting::FloatingImage* _this;
1182   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1183     sq_throwerror(vm, _SC("'set_layer' called without instance"));
1184     return SQ_ERROR;
1185   }
1186   int arg0;
1187   if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) {
1188     sq_throwerror(vm, _SC("Argument 1 not an integer"));
1189     return SQ_ERROR;
1190   }
1191
1192   try {
1193     _this->set_layer(arg0);
1194
1195     return 0;
1196
1197   } catch(std::exception& e) {
1198     sq_throwerror(vm, e.what());
1199     return SQ_ERROR;
1200   } catch(...) {
1201     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_layer'"));
1202     return SQ_ERROR;
1203   }
1204
1205 }
1206
1207 static int FloatingImage_get_layer_wrapper(HSQUIRRELVM vm)
1208 {
1209   Scripting::FloatingImage* _this;
1210   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1211     sq_throwerror(vm, _SC("'get_layer' called without instance"));
1212     return SQ_ERROR;
1213   }
1214
1215   try {
1216     int return_value = _this->get_layer();
1217
1218     sq_pushinteger(vm, return_value);
1219     return 1;
1220
1221   } catch(std::exception& e) {
1222     sq_throwerror(vm, e.what());
1223     return SQ_ERROR;
1224   } catch(...) {
1225     sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_layer'"));
1226     return SQ_ERROR;
1227   }
1228
1229 }
1230
1231 static int FloatingImage_set_pos_wrapper(HSQUIRRELVM vm)
1232 {
1233   Scripting::FloatingImage* _this;
1234   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1235     sq_throwerror(vm, _SC("'set_pos' called without instance"));
1236     return SQ_ERROR;
1237   }
1238   float arg0;
1239   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
1240     sq_throwerror(vm, _SC("Argument 1 not a float"));
1241     return SQ_ERROR;
1242   }
1243   float arg1;
1244   if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
1245     sq_throwerror(vm, _SC("Argument 2 not a float"));
1246     return SQ_ERROR;
1247   }
1248
1249   try {
1250     _this->set_pos(arg0, arg1);
1251
1252     return 0;
1253
1254   } catch(std::exception& e) {
1255     sq_throwerror(vm, e.what());
1256     return SQ_ERROR;
1257   } catch(...) {
1258     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_pos'"));
1259     return SQ_ERROR;
1260   }
1261
1262 }
1263
1264 static int FloatingImage_get_pos_x_wrapper(HSQUIRRELVM vm)
1265 {
1266   Scripting::FloatingImage* _this;
1267   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1268     sq_throwerror(vm, _SC("'get_pos_x' called without instance"));
1269     return SQ_ERROR;
1270   }
1271
1272   try {
1273     float return_value = _this->get_pos_x();
1274
1275     sq_pushfloat(vm, return_value);
1276     return 1;
1277
1278   } catch(std::exception& e) {
1279     sq_throwerror(vm, e.what());
1280     return SQ_ERROR;
1281   } catch(...) {
1282     sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_pos_x'"));
1283     return SQ_ERROR;
1284   }
1285
1286 }
1287
1288 static int FloatingImage_get_pos_y_wrapper(HSQUIRRELVM vm)
1289 {
1290   Scripting::FloatingImage* _this;
1291   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1292     sq_throwerror(vm, _SC("'get_pos_y' called without instance"));
1293     return SQ_ERROR;
1294   }
1295
1296   try {
1297     float return_value = _this->get_pos_y();
1298
1299     sq_pushfloat(vm, return_value);
1300     return 1;
1301
1302   } catch(std::exception& e) {
1303     sq_throwerror(vm, e.what());
1304     return SQ_ERROR;
1305   } catch(...) {
1306     sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_pos_y'"));
1307     return SQ_ERROR;
1308   }
1309
1310 }
1311
1312 static int FloatingImage_set_anchor_point_wrapper(HSQUIRRELVM vm)
1313 {
1314   Scripting::FloatingImage* _this;
1315   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1316     sq_throwerror(vm, _SC("'set_anchor_point' called without instance"));
1317     return SQ_ERROR;
1318   }
1319   int arg0;
1320   if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) {
1321     sq_throwerror(vm, _SC("Argument 1 not an integer"));
1322     return SQ_ERROR;
1323   }
1324
1325   try {
1326     _this->set_anchor_point(arg0);
1327
1328     return 0;
1329
1330   } catch(std::exception& e) {
1331     sq_throwerror(vm, e.what());
1332     return SQ_ERROR;
1333   } catch(...) {
1334     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_anchor_point'"));
1335     return SQ_ERROR;
1336   }
1337
1338 }
1339
1340 static int FloatingImage_get_anchor_point_wrapper(HSQUIRRELVM vm)
1341 {
1342   Scripting::FloatingImage* _this;
1343   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1344     sq_throwerror(vm, _SC("'get_anchor_point' called without instance"));
1345     return SQ_ERROR;
1346   }
1347
1348   try {
1349     int return_value = _this->get_anchor_point();
1350
1351     sq_pushinteger(vm, return_value);
1352     return 1;
1353
1354   } catch(std::exception& e) {
1355     sq_throwerror(vm, e.what());
1356     return SQ_ERROR;
1357   } catch(...) {
1358     sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_anchor_point'"));
1359     return SQ_ERROR;
1360   }
1361
1362 }
1363
1364 static int FloatingImage_set_visible_wrapper(HSQUIRRELVM vm)
1365 {
1366   Scripting::FloatingImage* _this;
1367   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1368     sq_throwerror(vm, _SC("'set_visible' called without instance"));
1369     return SQ_ERROR;
1370   }
1371   SQBool arg0;
1372   if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
1373     sq_throwerror(vm, _SC("Argument 1 not a bool"));
1374     return SQ_ERROR;
1375   }
1376
1377   try {
1378     _this->set_visible(arg0);
1379
1380     return 0;
1381
1382   } catch(std::exception& e) {
1383     sq_throwerror(vm, e.what());
1384     return SQ_ERROR;
1385   } catch(...) {
1386     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_visible'"));
1387     return SQ_ERROR;
1388   }
1389
1390 }
1391
1392 static int FloatingImage_get_visible_wrapper(HSQUIRRELVM vm)
1393 {
1394   Scripting::FloatingImage* _this;
1395   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1396     sq_throwerror(vm, _SC("'get_visible' called without instance"));
1397     return SQ_ERROR;
1398   }
1399
1400   try {
1401     bool return_value = _this->get_visible();
1402
1403     sq_pushbool(vm, return_value);
1404     return 1;
1405
1406   } catch(std::exception& e) {
1407     sq_throwerror(vm, e.what());
1408     return SQ_ERROR;
1409   } catch(...) {
1410     sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_visible'"));
1411     return SQ_ERROR;
1412   }
1413
1414 }
1415
1416 static int display_wrapper(HSQUIRRELVM vm)
1417 {
1418   return Scripting::display(vm);
1419 }
1420
1421 static int print_stacktrace_wrapper(HSQUIRRELVM vm)
1422 {
1423   HSQUIRRELVM arg0 = vm;
1424
1425   try {
1426     Scripting::print_stacktrace(arg0);
1427
1428     return 0;
1429
1430   } catch(std::exception& e) {
1431     sq_throwerror(vm, e.what());
1432     return SQ_ERROR;
1433   } catch(...) {
1434     sq_throwerror(vm, _SC("Unexpected exception while executing function 'print_stacktrace'"));
1435     return SQ_ERROR;
1436   }
1437
1438 }
1439
1440 static int get_current_thread_wrapper(HSQUIRRELVM vm)
1441 {
1442   return Scripting::get_current_thread(vm);
1443 }
1444
1445 static int display_text_file_wrapper(HSQUIRRELVM vm)
1446 {
1447   const char* arg0;
1448   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
1449     sq_throwerror(vm, _SC("Argument 1 not a string"));
1450     return SQ_ERROR;
1451   }
1452
1453   try {
1454     Scripting::display_text_file(arg0);
1455
1456     return 0;
1457
1458   } catch(std::exception& e) {
1459     sq_throwerror(vm, e.what());
1460     return SQ_ERROR;
1461   } catch(...) {
1462     sq_throwerror(vm, _SC("Unexpected exception while executing function 'display_text_file'"));
1463     return SQ_ERROR;
1464   }
1465
1466 }
1467
1468 static int load_worldmap_wrapper(HSQUIRRELVM vm)
1469 {
1470   const char* arg0;
1471   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
1472     sq_throwerror(vm, _SC("Argument 1 not a string"));
1473     return SQ_ERROR;
1474   }
1475
1476   try {
1477     Scripting::load_worldmap(arg0);
1478
1479     return 0;
1480
1481   } catch(std::exception& e) {
1482     sq_throwerror(vm, e.what());
1483     return SQ_ERROR;
1484   } catch(...) {
1485     sq_throwerror(vm, _SC("Unexpected exception while executing function 'load_worldmap'"));
1486     return SQ_ERROR;
1487   }
1488
1489 }
1490
1491 static int load_level_wrapper(HSQUIRRELVM vm)
1492 {
1493   const char* arg0;
1494   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
1495     sq_throwerror(vm, _SC("Argument 1 not a string"));
1496     return SQ_ERROR;
1497   }
1498
1499   try {
1500     Scripting::load_level(arg0);
1501
1502     return 0;
1503
1504   } catch(std::exception& e) {
1505     sq_throwerror(vm, e.what());
1506     return SQ_ERROR;
1507   } catch(...) {
1508     sq_throwerror(vm, _SC("Unexpected exception while executing function 'load_level'"));
1509     return SQ_ERROR;
1510   }
1511
1512 }
1513
1514 static int wait_wrapper(HSQUIRRELVM vm)
1515 {
1516   HSQUIRRELVM arg0 = vm;
1517   float arg1;
1518   if(SQ_FAILED(sq_getfloat(vm, 2, &arg1))) {
1519     sq_throwerror(vm, _SC("Argument 1 not a float"));
1520     return SQ_ERROR;
1521   }
1522
1523   try {
1524     Scripting::wait(arg0, arg1);
1525
1526     return sq_suspendvm(vm);
1527
1528   } catch(std::exception& e) {
1529     sq_throwerror(vm, e.what());
1530     return SQ_ERROR;
1531   } catch(...) {
1532     sq_throwerror(vm, _SC("Unexpected exception while executing function 'wait'"));
1533     return SQ_ERROR;
1534   }
1535
1536 }
1537
1538 static int wait_for_screenswitch_wrapper(HSQUIRRELVM vm)
1539 {
1540   HSQUIRRELVM arg0 = vm;
1541
1542   try {
1543     Scripting::wait_for_screenswitch(arg0);
1544
1545     return sq_suspendvm(vm);
1546
1547   } catch(std::exception& e) {
1548     sq_throwerror(vm, e.what());
1549     return SQ_ERROR;
1550   } catch(...) {
1551     sq_throwerror(vm, _SC("Unexpected exception while executing function 'wait_for_screenswitch'"));
1552     return SQ_ERROR;
1553   }
1554
1555 }
1556
1557 static int exit_screen_wrapper(HSQUIRRELVM vm)
1558 {
1559   (void) vm;
1560
1561   try {
1562     Scripting::exit_screen();
1563
1564     return 0;
1565
1566   } catch(std::exception& e) {
1567     sq_throwerror(vm, e.what());
1568     return SQ_ERROR;
1569   } catch(...) {
1570     sq_throwerror(vm, _SC("Unexpected exception while executing function 'exit_screen'"));
1571     return SQ_ERROR;
1572   }
1573
1574 }
1575
1576 static int fadeout_screen_wrapper(HSQUIRRELVM vm)
1577 {
1578   float arg0;
1579   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
1580     sq_throwerror(vm, _SC("Argument 1 not a float"));
1581     return SQ_ERROR;
1582   }
1583
1584   try {
1585     Scripting::fadeout_screen(arg0);
1586
1587     return 0;
1588
1589   } catch(std::exception& e) {
1590     sq_throwerror(vm, e.what());
1591     return SQ_ERROR;
1592   } catch(...) {
1593     sq_throwerror(vm, _SC("Unexpected exception while executing function 'fadeout_screen'"));
1594     return SQ_ERROR;
1595   }
1596
1597 }
1598
1599 static int shrink_screen_wrapper(HSQUIRRELVM vm)
1600 {
1601   float arg0;
1602   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
1603     sq_throwerror(vm, _SC("Argument 1 not a float"));
1604     return SQ_ERROR;
1605   }
1606   float arg1;
1607   if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
1608     sq_throwerror(vm, _SC("Argument 2 not a float"));
1609     return SQ_ERROR;
1610   }
1611   float arg2;
1612   if(SQ_FAILED(sq_getfloat(vm, 4, &arg2))) {
1613     sq_throwerror(vm, _SC("Argument 3 not a float"));
1614     return SQ_ERROR;
1615   }
1616
1617   try {
1618     Scripting::shrink_screen(arg0, arg1, arg2);
1619
1620     return 0;
1621
1622   } catch(std::exception& e) {
1623     sq_throwerror(vm, e.what());
1624     return SQ_ERROR;
1625   } catch(...) {
1626     sq_throwerror(vm, _SC("Unexpected exception while executing function 'shrink_screen'"));
1627     return SQ_ERROR;
1628   }
1629
1630 }
1631
1632 static int translate_wrapper(HSQUIRRELVM vm)
1633 {
1634   const char* arg0;
1635   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
1636     sq_throwerror(vm, _SC("Argument 1 not a string"));
1637     return SQ_ERROR;
1638   }
1639
1640   try {
1641     std::string return_value = Scripting::translate(arg0);
1642
1643     sq_pushstring(vm, return_value.c_str(), return_value.size());
1644     return 1;
1645
1646   } catch(std::exception& e) {
1647     sq_throwerror(vm, e.what());
1648     return SQ_ERROR;
1649   } catch(...) {
1650     sq_throwerror(vm, _SC("Unexpected exception while executing function 'translate'"));
1651     return SQ_ERROR;
1652   }
1653
1654 }
1655
1656 static int import_wrapper(HSQUIRRELVM vm)
1657 {
1658   HSQUIRRELVM arg0 = vm;
1659   const char* arg1;
1660   if(SQ_FAILED(sq_getstring(vm, 2, &arg1))) {
1661     sq_throwerror(vm, _SC("Argument 1 not a string"));
1662     return SQ_ERROR;
1663   }
1664
1665   try {
1666     Scripting::import(arg0, arg1);
1667
1668     return 0;
1669
1670   } catch(std::exception& e) {
1671     sq_throwerror(vm, e.what());
1672     return SQ_ERROR;
1673   } catch(...) {
1674     sq_throwerror(vm, _SC("Unexpected exception while executing function 'import'"));
1675     return SQ_ERROR;
1676   }
1677
1678 }
1679
1680 static int save_state_wrapper(HSQUIRRELVM vm)
1681 {
1682   (void) vm;
1683
1684   try {
1685     Scripting::save_state();
1686
1687     return 0;
1688
1689   } catch(std::exception& e) {
1690     sq_throwerror(vm, e.what());
1691     return SQ_ERROR;
1692   } catch(...) {
1693     sq_throwerror(vm, _SC("Unexpected exception while executing function 'save_state'"));
1694     return SQ_ERROR;
1695   }
1696
1697 }
1698
1699 static int add_key_wrapper(HSQUIRRELVM vm)
1700 {
1701   int arg0;
1702   if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) {
1703     sq_throwerror(vm, _SC("Argument 1 not an integer"));
1704     return SQ_ERROR;
1705   }
1706
1707   try {
1708     Scripting::add_key(arg0);
1709
1710     return 0;
1711
1712   } catch(std::exception& e) {
1713     sq_throwerror(vm, e.what());
1714     return SQ_ERROR;
1715   } catch(...) {
1716     sq_throwerror(vm, _SC("Unexpected exception while executing function 'add_key'"));
1717     return SQ_ERROR;
1718   }
1719
1720 }
1721
1722 static int debug_collrects_wrapper(HSQUIRRELVM vm)
1723 {
1724   SQBool arg0;
1725   if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
1726     sq_throwerror(vm, _SC("Argument 1 not a bool"));
1727     return SQ_ERROR;
1728   }
1729
1730   try {
1731     Scripting::debug_collrects(arg0);
1732
1733     return 0;
1734
1735   } catch(std::exception& e) {
1736     sq_throwerror(vm, e.what());
1737     return SQ_ERROR;
1738   } catch(...) {
1739     sq_throwerror(vm, _SC("Unexpected exception while executing function 'debug_collrects'"));
1740     return SQ_ERROR;
1741   }
1742
1743 }
1744
1745 static int debug_draw_fps_wrapper(HSQUIRRELVM vm)
1746 {
1747   SQBool arg0;
1748   if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
1749     sq_throwerror(vm, _SC("Argument 1 not a bool"));
1750     return SQ_ERROR;
1751   }
1752
1753   try {
1754     Scripting::debug_draw_fps(arg0);
1755
1756     return 0;
1757
1758   } catch(std::exception& e) {
1759     sq_throwerror(vm, e.what());
1760     return SQ_ERROR;
1761   } catch(...) {
1762     sq_throwerror(vm, _SC("Unexpected exception while executing function 'debug_draw_fps'"));
1763     return SQ_ERROR;
1764   }
1765
1766 }
1767
1768 static int debug_draw_solids_only_wrapper(HSQUIRRELVM vm)
1769 {
1770   SQBool arg0;
1771   if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
1772     sq_throwerror(vm, _SC("Argument 1 not a bool"));
1773     return SQ_ERROR;
1774   }
1775
1776   try {
1777     Scripting::debug_draw_solids_only(arg0);
1778
1779     return 0;
1780
1781   } catch(std::exception& e) {
1782     sq_throwerror(vm, e.what());
1783     return SQ_ERROR;
1784   } catch(...) {
1785     sq_throwerror(vm, _SC("Unexpected exception while executing function 'debug_draw_solids_only'"));
1786     return SQ_ERROR;
1787   }
1788
1789 }
1790
1791 static int play_music_wrapper(HSQUIRRELVM vm)
1792 {
1793   const char* arg0;
1794   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
1795     sq_throwerror(vm, _SC("Argument 1 not a string"));
1796     return SQ_ERROR;
1797   }
1798
1799   try {
1800     Scripting::play_music(arg0);
1801
1802     return 0;
1803
1804   } catch(std::exception& e) {
1805     sq_throwerror(vm, e.what());
1806     return SQ_ERROR;
1807   } catch(...) {
1808     sq_throwerror(vm, _SC("Unexpected exception while executing function 'play_music'"));
1809     return SQ_ERROR;
1810   }
1811
1812 }
1813
1814 static int play_sound_wrapper(HSQUIRRELVM vm)
1815 {
1816   const char* arg0;
1817   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
1818     sq_throwerror(vm, _SC("Argument 1 not a string"));
1819     return SQ_ERROR;
1820   }
1821
1822   try {
1823     Scripting::play_sound(arg0);
1824
1825     return 0;
1826
1827   } catch(std::exception& e) {
1828     sq_throwerror(vm, e.what());
1829     return SQ_ERROR;
1830   } catch(...) {
1831     sq_throwerror(vm, _SC("Unexpected exception while executing function 'play_sound'"));
1832     return SQ_ERROR;
1833   }
1834
1835 }
1836
1837 static int grease_wrapper(HSQUIRRELVM vm)
1838 {
1839   (void) vm;
1840
1841   try {
1842     Scripting::grease();
1843
1844     return 0;
1845
1846   } catch(std::exception& e) {
1847     sq_throwerror(vm, e.what());
1848     return SQ_ERROR;
1849   } catch(...) {
1850     sq_throwerror(vm, _SC("Unexpected exception while executing function 'grease'"));
1851     return SQ_ERROR;
1852   }
1853
1854 }
1855
1856 static int invincible_wrapper(HSQUIRRELVM vm)
1857 {
1858   (void) vm;
1859
1860   try {
1861     Scripting::invincible();
1862
1863     return 0;
1864
1865   } catch(std::exception& e) {
1866     sq_throwerror(vm, e.what());
1867     return SQ_ERROR;
1868   } catch(...) {
1869     sq_throwerror(vm, _SC("Unexpected exception while executing function 'invincible'"));
1870     return SQ_ERROR;
1871   }
1872
1873 }
1874
1875 static int mortal_wrapper(HSQUIRRELVM vm)
1876 {
1877   (void) vm;
1878
1879   try {
1880     Scripting::mortal();
1881
1882     return 0;
1883
1884   } catch(std::exception& e) {
1885     sq_throwerror(vm, e.what());
1886     return SQ_ERROR;
1887   } catch(...) {
1888     sq_throwerror(vm, _SC("Unexpected exception while executing function 'mortal'"));
1889     return SQ_ERROR;
1890   }
1891
1892 }
1893
1894 static int shrink_wrapper(HSQUIRRELVM vm)
1895 {
1896   (void) vm;
1897
1898   try {
1899     Scripting::shrink();
1900
1901     return 0;
1902
1903   } catch(std::exception& e) {
1904     sq_throwerror(vm, e.what());
1905     return SQ_ERROR;
1906   } catch(...) {
1907     sq_throwerror(vm, _SC("Unexpected exception while executing function 'shrink'"));
1908     return SQ_ERROR;
1909   }
1910
1911 }
1912
1913 static int kill_wrapper(HSQUIRRELVM vm)
1914 {
1915   (void) vm;
1916
1917   try {
1918     Scripting::kill();
1919
1920     return 0;
1921
1922   } catch(std::exception& e) {
1923     sq_throwerror(vm, e.what());
1924     return SQ_ERROR;
1925   } catch(...) {
1926     sq_throwerror(vm, _SC("Unexpected exception while executing function 'kill'"));
1927     return SQ_ERROR;
1928   }
1929
1930 }
1931
1932 static int restart_wrapper(HSQUIRRELVM vm)
1933 {
1934   (void) vm;
1935
1936   try {
1937     Scripting::restart();
1938
1939     return 0;
1940
1941   } catch(std::exception& e) {
1942     sq_throwerror(vm, e.what());
1943     return SQ_ERROR;
1944   } catch(...) {
1945     sq_throwerror(vm, _SC("Unexpected exception while executing function 'restart'"));
1946     return SQ_ERROR;
1947   }
1948
1949 }
1950
1951 static int whereami_wrapper(HSQUIRRELVM vm)
1952 {
1953   (void) vm;
1954
1955   try {
1956     Scripting::whereami();
1957
1958     return 0;
1959
1960   } catch(std::exception& e) {
1961     sq_throwerror(vm, e.what());
1962     return SQ_ERROR;
1963   } catch(...) {
1964     sq_throwerror(vm, _SC("Unexpected exception while executing function 'whereami'"));
1965     return SQ_ERROR;
1966   }
1967
1968 }
1969
1970 static int gotoend_wrapper(HSQUIRRELVM vm)
1971 {
1972   (void) vm;
1973
1974   try {
1975     Scripting::gotoend();
1976
1977     return 0;
1978
1979   } catch(std::exception& e) {
1980     sq_throwerror(vm, e.what());
1981     return SQ_ERROR;
1982   } catch(...) {
1983     sq_throwerror(vm, _SC("Unexpected exception while executing function 'gotoend'"));
1984     return SQ_ERROR;
1985   }
1986
1987 }
1988
1989 static int camera_wrapper(HSQUIRRELVM vm)
1990 {
1991   (void) vm;
1992
1993   try {
1994     Scripting::camera();
1995
1996     return 0;
1997
1998   } catch(std::exception& e) {
1999     sq_throwerror(vm, e.what());
2000     return SQ_ERROR;
2001   } catch(...) {
2002     sq_throwerror(vm, _SC("Unexpected exception while executing function 'camera'"));
2003     return SQ_ERROR;
2004   }
2005
2006 }
2007
2008 static int quit_wrapper(HSQUIRRELVM vm)
2009 {
2010   (void) vm;
2011
2012   try {
2013     Scripting::quit();
2014
2015     return 0;
2016
2017   } catch(std::exception& e) {
2018     sq_throwerror(vm, e.what());
2019     return SQ_ERROR;
2020   } catch(...) {
2021     sq_throwerror(vm, _SC("Unexpected exception while executing function 'quit'"));
2022     return SQ_ERROR;
2023   }
2024
2025 }
2026
2027 } // end of namespace Wrapper
2028
2029 void create_squirrel_instance(HSQUIRRELVM v, Scripting::DisplayEffect* object, bool setup_releasehook)
2030 {
2031   using namespace Wrapper;
2032
2033   sq_pushroottable(v);
2034   sq_pushstring(v, "DisplayEffect", -1);
2035   if(SQ_FAILED(sq_get(v, -2))) {
2036     std::ostringstream msg;
2037     msg << "Couldn't resolved squirrel type 'DisplayEffect'";
2038     throw SquirrelError(v, msg.str());
2039   }
2040
2041   if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) {
2042     std::ostringstream msg;
2043     msg << "Couldn't setup squirrel instance for object of type 'DisplayEffect'";
2044     throw SquirrelError(v, msg.str());
2045   }
2046   sq_remove(v, -2); // remove object name
2047
2048   if(setup_releasehook) {
2049     sq_setreleasehook(v, -1, DisplayEffect_release_hook);
2050   }
2051
2052   sq_remove(v, -2); // remove root table
2053 }
2054
2055 void create_squirrel_instance(HSQUIRRELVM v, Scripting::Camera* object, bool setup_releasehook)
2056 {
2057   using namespace Wrapper;
2058
2059   sq_pushroottable(v);
2060   sq_pushstring(v, "Camera", -1);
2061   if(SQ_FAILED(sq_get(v, -2))) {
2062     std::ostringstream msg;
2063     msg << "Couldn't resolved squirrel type 'Camera'";
2064     throw SquirrelError(v, msg.str());
2065   }
2066
2067   if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) {
2068     std::ostringstream msg;
2069     msg << "Couldn't setup squirrel instance for object of type 'Camera'";
2070     throw SquirrelError(v, msg.str());
2071   }
2072   sq_remove(v, -2); // remove object name
2073
2074   if(setup_releasehook) {
2075     sq_setreleasehook(v, -1, Camera_release_hook);
2076   }
2077
2078   sq_remove(v, -2); // remove root table
2079 }
2080
2081 void create_squirrel_instance(HSQUIRRELVM v, Scripting::Level* object, bool setup_releasehook)
2082 {
2083   using namespace Wrapper;
2084
2085   sq_pushroottable(v);
2086   sq_pushstring(v, "Level", -1);
2087   if(SQ_FAILED(sq_get(v, -2))) {
2088     std::ostringstream msg;
2089     msg << "Couldn't resolved squirrel type 'Level'";
2090     throw SquirrelError(v, msg.str());
2091   }
2092
2093   if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) {
2094     std::ostringstream msg;
2095     msg << "Couldn't setup squirrel instance for object of type 'Level'";
2096     throw SquirrelError(v, msg.str());
2097   }
2098   sq_remove(v, -2); // remove object name
2099
2100   if(setup_releasehook) {
2101     sq_setreleasehook(v, -1, Level_release_hook);
2102   }
2103
2104   sq_remove(v, -2); // remove root table
2105 }
2106
2107 void create_squirrel_instance(HSQUIRRELVM v, Scripting::ScriptedObject* object, bool setup_releasehook)
2108 {
2109   using namespace Wrapper;
2110
2111   sq_pushroottable(v);
2112   sq_pushstring(v, "ScriptedObject", -1);
2113   if(SQ_FAILED(sq_get(v, -2))) {
2114     std::ostringstream msg;
2115     msg << "Couldn't resolved squirrel type 'ScriptedObject'";
2116     throw SquirrelError(v, msg.str());
2117   }
2118
2119   if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) {
2120     std::ostringstream msg;
2121     msg << "Couldn't setup squirrel instance for object of type 'ScriptedObject'";
2122     throw SquirrelError(v, msg.str());
2123   }
2124   sq_remove(v, -2); // remove object name
2125
2126   if(setup_releasehook) {
2127     sq_setreleasehook(v, -1, ScriptedObject_release_hook);
2128   }
2129
2130   sq_remove(v, -2); // remove root table
2131 }
2132
2133 void create_squirrel_instance(HSQUIRRELVM v, Scripting::Text* object, bool setup_releasehook)
2134 {
2135   using namespace Wrapper;
2136
2137   sq_pushroottable(v);
2138   sq_pushstring(v, "Text", -1);
2139   if(SQ_FAILED(sq_get(v, -2))) {
2140     std::ostringstream msg;
2141     msg << "Couldn't resolved squirrel type 'Text'";
2142     throw SquirrelError(v, msg.str());
2143   }
2144
2145   if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) {
2146     std::ostringstream msg;
2147     msg << "Couldn't setup squirrel instance for object of type 'Text'";
2148     throw SquirrelError(v, msg.str());
2149   }
2150   sq_remove(v, -2); // remove object name
2151
2152   if(setup_releasehook) {
2153     sq_setreleasehook(v, -1, Text_release_hook);
2154   }
2155
2156   sq_remove(v, -2); // remove root table
2157 }
2158
2159 void create_squirrel_instance(HSQUIRRELVM v, Scripting::Player* object, bool setup_releasehook)
2160 {
2161   using namespace Wrapper;
2162
2163   sq_pushroottable(v);
2164   sq_pushstring(v, "Player", -1);
2165   if(SQ_FAILED(sq_get(v, -2))) {
2166     std::ostringstream msg;
2167     msg << "Couldn't resolved squirrel type 'Player'";
2168     throw SquirrelError(v, msg.str());
2169   }
2170
2171   if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) {
2172     std::ostringstream msg;
2173     msg << "Couldn't setup squirrel instance for object of type 'Player'";
2174     throw SquirrelError(v, msg.str());
2175   }
2176   sq_remove(v, -2); // remove object name
2177
2178   if(setup_releasehook) {
2179     sq_setreleasehook(v, -1, Player_release_hook);
2180   }
2181
2182   sq_remove(v, -2); // remove root table
2183 }
2184
2185 void create_squirrel_instance(HSQUIRRELVM v, Scripting::FloatingImage* object, bool setup_releasehook)
2186 {
2187   using namespace Wrapper;
2188
2189   sq_pushroottable(v);
2190   sq_pushstring(v, "FloatingImage", -1);
2191   if(SQ_FAILED(sq_get(v, -2))) {
2192     std::ostringstream msg;
2193     msg << "Couldn't resolved squirrel type 'FloatingImage'";
2194     throw SquirrelError(v, msg.str());
2195   }
2196
2197   if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) {
2198     std::ostringstream msg;
2199     msg << "Couldn't setup squirrel instance for object of type 'FloatingImage'";
2200     throw SquirrelError(v, msg.str());
2201   }
2202   sq_remove(v, -2); // remove object name
2203
2204   if(setup_releasehook) {
2205     sq_setreleasehook(v, -1, FloatingImage_release_hook);
2206   }
2207
2208   sq_remove(v, -2); // remove root table
2209 }
2210
2211 void register_supertux_wrapper(HSQUIRRELVM v)
2212 {
2213   using namespace Wrapper;
2214
2215   sq_pushstring(v, "KEY_BRASS", -1);
2216   sq_pushinteger(v, 1);
2217   if(SQ_FAILED(sq_createslot(v, -3))) {
2218     throw SquirrelError(v, "Couldn't register constant 'KEY_BRASS'");
2219   }
2220
2221   sq_pushstring(v, "KEY_IRON", -1);
2222   sq_pushinteger(v, 2);
2223   if(SQ_FAILED(sq_createslot(v, -3))) {
2224     throw SquirrelError(v, "Couldn't register constant 'KEY_IRON'");
2225   }
2226
2227   sq_pushstring(v, "KEY_BRONZE", -1);
2228   sq_pushinteger(v, 4);
2229   if(SQ_FAILED(sq_createslot(v, -3))) {
2230     throw SquirrelError(v, "Couldn't register constant 'KEY_BRONZE'");
2231   }
2232
2233   sq_pushstring(v, "KEY_SILVER", -1);
2234   sq_pushinteger(v, 8);
2235   if(SQ_FAILED(sq_createslot(v, -3))) {
2236     throw SquirrelError(v, "Couldn't register constant 'KEY_SILVER'");
2237   }
2238
2239   sq_pushstring(v, "KEY_GOLD", -1);
2240   sq_pushinteger(v, 16);
2241   if(SQ_FAILED(sq_createslot(v, -3))) {
2242     throw SquirrelError(v, "Couldn't register constant 'KEY_GOLD'");
2243   }
2244
2245   sq_pushstring(v, "ANCHOR_TOP", -1);
2246   sq_pushinteger(v, 16);
2247   if(SQ_FAILED(sq_createslot(v, -3))) {
2248     throw SquirrelError(v, "Couldn't register constant 'ANCHOR_TOP'");
2249   }
2250
2251   sq_pushstring(v, "ANCHOR_BOTTOM", -1);
2252   sq_pushinteger(v, 32);
2253   if(SQ_FAILED(sq_createslot(v, -3))) {
2254     throw SquirrelError(v, "Couldn't register constant 'ANCHOR_BOTTOM'");
2255   }
2256
2257   sq_pushstring(v, "ANCHOR_LEFT", -1);
2258   sq_pushinteger(v, 1);
2259   if(SQ_FAILED(sq_createslot(v, -3))) {
2260     throw SquirrelError(v, "Couldn't register constant 'ANCHOR_LEFT'");
2261   }
2262
2263   sq_pushstring(v, "ANCHOR_RIGHT", -1);
2264   sq_pushinteger(v, 2);
2265   if(SQ_FAILED(sq_createslot(v, -3))) {
2266     throw SquirrelError(v, "Couldn't register constant 'ANCHOR_RIGHT'");
2267   }
2268
2269   sq_pushstring(v, "ANCHOR_MIDDLE", -1);
2270   sq_pushinteger(v, 0);
2271   if(SQ_FAILED(sq_createslot(v, -3))) {
2272     throw SquirrelError(v, "Couldn't register constant 'ANCHOR_MIDDLE'");
2273   }
2274
2275   sq_pushstring(v, "ANCHOR_TOP_LEFT", -1);
2276   sq_pushinteger(v, 17);
2277   if(SQ_FAILED(sq_createslot(v, -3))) {
2278     throw SquirrelError(v, "Couldn't register constant 'ANCHOR_TOP_LEFT'");
2279   }
2280
2281   sq_pushstring(v, "ANCHOR_TOP_RIGHT", -1);
2282   sq_pushinteger(v, 18);
2283   if(SQ_FAILED(sq_createslot(v, -3))) {
2284     throw SquirrelError(v, "Couldn't register constant 'ANCHOR_TOP_RIGHT'");
2285   }
2286
2287   sq_pushstring(v, "ANCHOR_BOTTOM_LEFT", -1);
2288   sq_pushinteger(v, 33);
2289   if(SQ_FAILED(sq_createslot(v, -3))) {
2290     throw SquirrelError(v, "Couldn't register constant 'ANCHOR_BOTTOM_LEFT'");
2291   }
2292
2293   sq_pushstring(v, "ANCHOR_BOTTOM_RIGHT", -1);
2294   sq_pushinteger(v, 34);
2295   if(SQ_FAILED(sq_createslot(v, -3))) {
2296     throw SquirrelError(v, "Couldn't register constant 'ANCHOR_BOTTOM_RIGHT'");
2297   }
2298
2299   sq_pushstring(v, "display", -1);
2300   sq_newclosure(v, &display_wrapper, 0);
2301   if(SQ_FAILED(sq_createslot(v, -3))) {
2302     throw SquirrelError(v, "Couldn't register function 'display'");
2303   }
2304
2305   sq_pushstring(v, "print_stacktrace", -1);
2306   sq_newclosure(v, &print_stacktrace_wrapper, 0);
2307   if(SQ_FAILED(sq_createslot(v, -3))) {
2308     throw SquirrelError(v, "Couldn't register function 'print_stacktrace'");
2309   }
2310
2311   sq_pushstring(v, "get_current_thread", -1);
2312   sq_newclosure(v, &get_current_thread_wrapper, 0);
2313   if(SQ_FAILED(sq_createslot(v, -3))) {
2314     throw SquirrelError(v, "Couldn't register function 'get_current_thread'");
2315   }
2316
2317   sq_pushstring(v, "display_text_file", -1);
2318   sq_newclosure(v, &display_text_file_wrapper, 0);
2319   if(SQ_FAILED(sq_createslot(v, -3))) {
2320     throw SquirrelError(v, "Couldn't register function 'display_text_file'");
2321   }
2322
2323   sq_pushstring(v, "load_worldmap", -1);
2324   sq_newclosure(v, &load_worldmap_wrapper, 0);
2325   if(SQ_FAILED(sq_createslot(v, -3))) {
2326     throw SquirrelError(v, "Couldn't register function 'load_worldmap'");
2327   }
2328
2329   sq_pushstring(v, "load_level", -1);
2330   sq_newclosure(v, &load_level_wrapper, 0);
2331   if(SQ_FAILED(sq_createslot(v, -3))) {
2332     throw SquirrelError(v, "Couldn't register function 'load_level'");
2333   }
2334
2335   sq_pushstring(v, "wait", -1);
2336   sq_newclosure(v, &wait_wrapper, 0);
2337   if(SQ_FAILED(sq_createslot(v, -3))) {
2338     throw SquirrelError(v, "Couldn't register function 'wait'");
2339   }
2340
2341   sq_pushstring(v, "wait_for_screenswitch", -1);
2342   sq_newclosure(v, &wait_for_screenswitch_wrapper, 0);
2343   if(SQ_FAILED(sq_createslot(v, -3))) {
2344     throw SquirrelError(v, "Couldn't register function 'wait_for_screenswitch'");
2345   }
2346
2347   sq_pushstring(v, "exit_screen", -1);
2348   sq_newclosure(v, &exit_screen_wrapper, 0);
2349   if(SQ_FAILED(sq_createslot(v, -3))) {
2350     throw SquirrelError(v, "Couldn't register function 'exit_screen'");
2351   }
2352
2353   sq_pushstring(v, "fadeout_screen", -1);
2354   sq_newclosure(v, &fadeout_screen_wrapper, 0);
2355   if(SQ_FAILED(sq_createslot(v, -3))) {
2356     throw SquirrelError(v, "Couldn't register function 'fadeout_screen'");
2357   }
2358
2359   sq_pushstring(v, "shrink_screen", -1);
2360   sq_newclosure(v, &shrink_screen_wrapper, 0);
2361   if(SQ_FAILED(sq_createslot(v, -3))) {
2362     throw SquirrelError(v, "Couldn't register function 'shrink_screen'");
2363   }
2364
2365   sq_pushstring(v, "translate", -1);
2366   sq_newclosure(v, &translate_wrapper, 0);
2367   if(SQ_FAILED(sq_createslot(v, -3))) {
2368     throw SquirrelError(v, "Couldn't register function 'translate'");
2369   }
2370
2371   sq_pushstring(v, "import", -1);
2372   sq_newclosure(v, &import_wrapper, 0);
2373   if(SQ_FAILED(sq_createslot(v, -3))) {
2374     throw SquirrelError(v, "Couldn't register function 'import'");
2375   }
2376
2377   sq_pushstring(v, "save_state", -1);
2378   sq_newclosure(v, &save_state_wrapper, 0);
2379   if(SQ_FAILED(sq_createslot(v, -3))) {
2380     throw SquirrelError(v, "Couldn't register function 'save_state'");
2381   }
2382
2383   sq_pushstring(v, "add_key", -1);
2384   sq_newclosure(v, &add_key_wrapper, 0);
2385   if(SQ_FAILED(sq_createslot(v, -3))) {
2386     throw SquirrelError(v, "Couldn't register function 'add_key'");
2387   }
2388
2389   sq_pushstring(v, "debug_collrects", -1);
2390   sq_newclosure(v, &debug_collrects_wrapper, 0);
2391   if(SQ_FAILED(sq_createslot(v, -3))) {
2392     throw SquirrelError(v, "Couldn't register function 'debug_collrects'");
2393   }
2394
2395   sq_pushstring(v, "debug_draw_fps", -1);
2396   sq_newclosure(v, &debug_draw_fps_wrapper, 0);
2397   if(SQ_FAILED(sq_createslot(v, -3))) {
2398     throw SquirrelError(v, "Couldn't register function 'debug_draw_fps'");
2399   }
2400
2401   sq_pushstring(v, "debug_draw_solids_only", -1);
2402   sq_newclosure(v, &debug_draw_solids_only_wrapper, 0);
2403   if(SQ_FAILED(sq_createslot(v, -3))) {
2404     throw SquirrelError(v, "Couldn't register function 'debug_draw_solids_only'");
2405   }
2406
2407   sq_pushstring(v, "play_music", -1);
2408   sq_newclosure(v, &play_music_wrapper, 0);
2409   if(SQ_FAILED(sq_createslot(v, -3))) {
2410     throw SquirrelError(v, "Couldn't register function 'play_music'");
2411   }
2412
2413   sq_pushstring(v, "play_sound", -1);
2414   sq_newclosure(v, &play_sound_wrapper, 0);
2415   if(SQ_FAILED(sq_createslot(v, -3))) {
2416     throw SquirrelError(v, "Couldn't register function 'play_sound'");
2417   }
2418
2419   sq_pushstring(v, "grease", -1);
2420   sq_newclosure(v, &grease_wrapper, 0);
2421   if(SQ_FAILED(sq_createslot(v, -3))) {
2422     throw SquirrelError(v, "Couldn't register function 'grease'");
2423   }
2424
2425   sq_pushstring(v, "invincible", -1);
2426   sq_newclosure(v, &invincible_wrapper, 0);
2427   if(SQ_FAILED(sq_createslot(v, -3))) {
2428     throw SquirrelError(v, "Couldn't register function 'invincible'");
2429   }
2430
2431   sq_pushstring(v, "mortal", -1);
2432   sq_newclosure(v, &mortal_wrapper, 0);
2433   if(SQ_FAILED(sq_createslot(v, -3))) {
2434     throw SquirrelError(v, "Couldn't register function 'mortal'");
2435   }
2436
2437   sq_pushstring(v, "shrink", -1);
2438   sq_newclosure(v, &shrink_wrapper, 0);
2439   if(SQ_FAILED(sq_createslot(v, -3))) {
2440     throw SquirrelError(v, "Couldn't register function 'shrink'");
2441   }
2442
2443   sq_pushstring(v, "kill", -1);
2444   sq_newclosure(v, &kill_wrapper, 0);
2445   if(SQ_FAILED(sq_createslot(v, -3))) {
2446     throw SquirrelError(v, "Couldn't register function 'kill'");
2447   }
2448
2449   sq_pushstring(v, "restart", -1);
2450   sq_newclosure(v, &restart_wrapper, 0);
2451   if(SQ_FAILED(sq_createslot(v, -3))) {
2452     throw SquirrelError(v, "Couldn't register function 'restart'");
2453   }
2454
2455   sq_pushstring(v, "whereami", -1);
2456   sq_newclosure(v, &whereami_wrapper, 0);
2457   if(SQ_FAILED(sq_createslot(v, -3))) {
2458     throw SquirrelError(v, "Couldn't register function 'whereami'");
2459   }
2460
2461   sq_pushstring(v, "gotoend", -1);
2462   sq_newclosure(v, &gotoend_wrapper, 0);
2463   if(SQ_FAILED(sq_createslot(v, -3))) {
2464     throw SquirrelError(v, "Couldn't register function 'gotoend'");
2465   }
2466
2467   sq_pushstring(v, "camera", -1);
2468   sq_newclosure(v, &camera_wrapper, 0);
2469   if(SQ_FAILED(sq_createslot(v, -3))) {
2470     throw SquirrelError(v, "Couldn't register function 'camera'");
2471   }
2472
2473   sq_pushstring(v, "quit", -1);
2474   sq_newclosure(v, &quit_wrapper, 0);
2475   if(SQ_FAILED(sq_createslot(v, -3))) {
2476     throw SquirrelError(v, "Couldn't register function 'quit'");
2477   }
2478
2479   // Register class DisplayEffect
2480   sq_pushstring(v, "DisplayEffect", -1);
2481   if(sq_newclass(v, SQFalse) < 0) {
2482     std::ostringstream msg;
2483     msg << "Couldn't create new class 'DisplayEffect'";
2484     throw SquirrelError(v, msg.str());
2485   }
2486   sq_pushstring(v, "fade_out", -1);
2487   sq_newclosure(v, &DisplayEffect_fade_out_wrapper, 0);
2488   if(SQ_FAILED(sq_createslot(v, -3))) {
2489     throw SquirrelError(v, "Couldn't register function 'fade_out'");
2490   }
2491
2492   sq_pushstring(v, "fade_in", -1);
2493   sq_newclosure(v, &DisplayEffect_fade_in_wrapper, 0);
2494   if(SQ_FAILED(sq_createslot(v, -3))) {
2495     throw SquirrelError(v, "Couldn't register function 'fade_in'");
2496   }
2497
2498   sq_pushstring(v, "set_black", -1);
2499   sq_newclosure(v, &DisplayEffect_set_black_wrapper, 0);
2500   if(SQ_FAILED(sq_createslot(v, -3))) {
2501     throw SquirrelError(v, "Couldn't register function 'set_black'");
2502   }
2503
2504   sq_pushstring(v, "is_black", -1);
2505   sq_newclosure(v, &DisplayEffect_is_black_wrapper, 0);
2506   if(SQ_FAILED(sq_createslot(v, -3))) {
2507     throw SquirrelError(v, "Couldn't register function 'is_black'");
2508   }
2509
2510   sq_pushstring(v, "sixteen_to_nine", -1);
2511   sq_newclosure(v, &DisplayEffect_sixteen_to_nine_wrapper, 0);
2512   if(SQ_FAILED(sq_createslot(v, -3))) {
2513     throw SquirrelError(v, "Couldn't register function 'sixteen_to_nine'");
2514   }
2515
2516   sq_pushstring(v, "four_to_three", -1);
2517   sq_newclosure(v, &DisplayEffect_four_to_three_wrapper, 0);
2518   if(SQ_FAILED(sq_createslot(v, -3))) {
2519     throw SquirrelError(v, "Couldn't register function 'four_to_three'");
2520   }
2521
2522   if(SQ_FAILED(sq_createslot(v, -3))) {
2523     throw SquirrelError(v, "Couldn't register class 'DisplayEffect'");
2524   }
2525
2526   // Register class Camera
2527   sq_pushstring(v, "Camera", -1);
2528   if(sq_newclass(v, SQFalse) < 0) {
2529     std::ostringstream msg;
2530     msg << "Couldn't create new class 'Camera'";
2531     throw SquirrelError(v, msg.str());
2532   }
2533   sq_pushstring(v, "shake", -1);
2534   sq_newclosure(v, &Camera_shake_wrapper, 0);
2535   if(SQ_FAILED(sq_createslot(v, -3))) {
2536     throw SquirrelError(v, "Couldn't register function 'shake'");
2537   }
2538
2539   sq_pushstring(v, "set_pos", -1);
2540   sq_newclosure(v, &Camera_set_pos_wrapper, 0);
2541   if(SQ_FAILED(sq_createslot(v, -3))) {
2542     throw SquirrelError(v, "Couldn't register function 'set_pos'");
2543   }
2544
2545   sq_pushstring(v, "set_mode", -1);
2546   sq_newclosure(v, &Camera_set_mode_wrapper, 0);
2547   if(SQ_FAILED(sq_createslot(v, -3))) {
2548     throw SquirrelError(v, "Couldn't register function 'set_mode'");
2549   }
2550
2551   sq_pushstring(v, "scroll_to", -1);
2552   sq_newclosure(v, &Camera_scroll_to_wrapper, 0);
2553   if(SQ_FAILED(sq_createslot(v, -3))) {
2554     throw SquirrelError(v, "Couldn't register function 'scroll_to'");
2555   }
2556
2557   if(SQ_FAILED(sq_createslot(v, -3))) {
2558     throw SquirrelError(v, "Couldn't register class 'Camera'");
2559   }
2560
2561   // Register class Level
2562   sq_pushstring(v, "Level", -1);
2563   if(sq_newclass(v, SQFalse) < 0) {
2564     std::ostringstream msg;
2565     msg << "Couldn't create new class 'Level'";
2566     throw SquirrelError(v, msg.str());
2567   }
2568   sq_pushstring(v, "finish", -1);
2569   sq_newclosure(v, &Level_finish_wrapper, 0);
2570   if(SQ_FAILED(sq_createslot(v, -3))) {
2571     throw SquirrelError(v, "Couldn't register function 'finish'");
2572   }
2573
2574   sq_pushstring(v, "spawn", -1);
2575   sq_newclosure(v, &Level_spawn_wrapper, 0);
2576   if(SQ_FAILED(sq_createslot(v, -3))) {
2577     throw SquirrelError(v, "Couldn't register function 'spawn'");
2578   }
2579
2580   sq_pushstring(v, "flip_vertically", -1);
2581   sq_newclosure(v, &Level_flip_vertically_wrapper, 0);
2582   if(SQ_FAILED(sq_createslot(v, -3))) {
2583     throw SquirrelError(v, "Couldn't register function 'flip_vertically'");
2584   }
2585
2586   if(SQ_FAILED(sq_createslot(v, -3))) {
2587     throw SquirrelError(v, "Couldn't register class 'Level'");
2588   }
2589
2590   // Register class ScriptedObject
2591   sq_pushstring(v, "ScriptedObject", -1);
2592   if(sq_newclass(v, SQFalse) < 0) {
2593     std::ostringstream msg;
2594     msg << "Couldn't create new class 'ScriptedObject'";
2595     throw SquirrelError(v, msg.str());
2596   }
2597   sq_pushstring(v, "set_action", -1);
2598   sq_newclosure(v, &ScriptedObject_set_action_wrapper, 0);
2599   if(SQ_FAILED(sq_createslot(v, -3))) {
2600     throw SquirrelError(v, "Couldn't register function 'set_action'");
2601   }
2602
2603   sq_pushstring(v, "get_action", -1);
2604   sq_newclosure(v, &ScriptedObject_get_action_wrapper, 0);
2605   if(SQ_FAILED(sq_createslot(v, -3))) {
2606     throw SquirrelError(v, "Couldn't register function 'get_action'");
2607   }
2608
2609   sq_pushstring(v, "move", -1);
2610   sq_newclosure(v, &ScriptedObject_move_wrapper, 0);
2611   if(SQ_FAILED(sq_createslot(v, -3))) {
2612     throw SquirrelError(v, "Couldn't register function 'move'");
2613   }
2614
2615   sq_pushstring(v, "set_pos", -1);
2616   sq_newclosure(v, &ScriptedObject_set_pos_wrapper, 0);
2617   if(SQ_FAILED(sq_createslot(v, -3))) {
2618     throw SquirrelError(v, "Couldn't register function 'set_pos'");
2619   }
2620
2621   sq_pushstring(v, "get_pos_x", -1);
2622   sq_newclosure(v, &ScriptedObject_get_pos_x_wrapper, 0);
2623   if(SQ_FAILED(sq_createslot(v, -3))) {
2624     throw SquirrelError(v, "Couldn't register function 'get_pos_x'");
2625   }
2626
2627   sq_pushstring(v, "get_pos_y", -1);
2628   sq_newclosure(v, &ScriptedObject_get_pos_y_wrapper, 0);
2629   if(SQ_FAILED(sq_createslot(v, -3))) {
2630     throw SquirrelError(v, "Couldn't register function 'get_pos_y'");
2631   }
2632
2633   sq_pushstring(v, "set_velocity", -1);
2634   sq_newclosure(v, &ScriptedObject_set_velocity_wrapper, 0);
2635   if(SQ_FAILED(sq_createslot(v, -3))) {
2636     throw SquirrelError(v, "Couldn't register function 'set_velocity'");
2637   }
2638
2639   sq_pushstring(v, "get_velocity_x", -1);
2640   sq_newclosure(v, &ScriptedObject_get_velocity_x_wrapper, 0);
2641   if(SQ_FAILED(sq_createslot(v, -3))) {
2642     throw SquirrelError(v, "Couldn't register function 'get_velocity_x'");
2643   }
2644
2645   sq_pushstring(v, "get_velocity_y", -1);
2646   sq_newclosure(v, &ScriptedObject_get_velocity_y_wrapper, 0);
2647   if(SQ_FAILED(sq_createslot(v, -3))) {
2648     throw SquirrelError(v, "Couldn't register function 'get_velocity_y'");
2649   }
2650
2651   sq_pushstring(v, "set_visible", -1);
2652   sq_newclosure(v, &ScriptedObject_set_visible_wrapper, 0);
2653   if(SQ_FAILED(sq_createslot(v, -3))) {
2654     throw SquirrelError(v, "Couldn't register function 'set_visible'");
2655   }
2656
2657   sq_pushstring(v, "is_visible", -1);
2658   sq_newclosure(v, &ScriptedObject_is_visible_wrapper, 0);
2659   if(SQ_FAILED(sq_createslot(v, -3))) {
2660     throw SquirrelError(v, "Couldn't register function 'is_visible'");
2661   }
2662
2663   sq_pushstring(v, "get_name", -1);
2664   sq_newclosure(v, &ScriptedObject_get_name_wrapper, 0);
2665   if(SQ_FAILED(sq_createslot(v, -3))) {
2666     throw SquirrelError(v, "Couldn't register function 'get_name'");
2667   }
2668
2669   if(SQ_FAILED(sq_createslot(v, -3))) {
2670     throw SquirrelError(v, "Couldn't register class 'ScriptedObject'");
2671   }
2672
2673   // Register class Text
2674   sq_pushstring(v, "Text", -1);
2675   if(sq_newclass(v, SQFalse) < 0) {
2676     std::ostringstream msg;
2677     msg << "Couldn't create new class 'Text'";
2678     throw SquirrelError(v, msg.str());
2679   }
2680   sq_pushstring(v, "set_text", -1);
2681   sq_newclosure(v, &Text_set_text_wrapper, 0);
2682   if(SQ_FAILED(sq_createslot(v, -3))) {
2683     throw SquirrelError(v, "Couldn't register function 'set_text'");
2684   }
2685
2686   sq_pushstring(v, "set_font", -1);
2687   sq_newclosure(v, &Text_set_font_wrapper, 0);
2688   if(SQ_FAILED(sq_createslot(v, -3))) {
2689     throw SquirrelError(v, "Couldn't register function 'set_font'");
2690   }
2691
2692   sq_pushstring(v, "fade_in", -1);
2693   sq_newclosure(v, &Text_fade_in_wrapper, 0);
2694   if(SQ_FAILED(sq_createslot(v, -3))) {
2695     throw SquirrelError(v, "Couldn't register function 'fade_in'");
2696   }
2697
2698   sq_pushstring(v, "fade_out", -1);
2699   sq_newclosure(v, &Text_fade_out_wrapper, 0);
2700   if(SQ_FAILED(sq_createslot(v, -3))) {
2701     throw SquirrelError(v, "Couldn't register function 'fade_out'");
2702   }
2703
2704   sq_pushstring(v, "set_visible", -1);
2705   sq_newclosure(v, &Text_set_visible_wrapper, 0);
2706   if(SQ_FAILED(sq_createslot(v, -3))) {
2707     throw SquirrelError(v, "Couldn't register function 'set_visible'");
2708   }
2709
2710   sq_pushstring(v, "set_centered", -1);
2711   sq_newclosure(v, &Text_set_centered_wrapper, 0);
2712   if(SQ_FAILED(sq_createslot(v, -3))) {
2713     throw SquirrelError(v, "Couldn't register function 'set_centered'");
2714   }
2715
2716   if(SQ_FAILED(sq_createslot(v, -3))) {
2717     throw SquirrelError(v, "Couldn't register class 'Text'");
2718   }
2719
2720   // Register class Player
2721   sq_pushstring(v, "Player", -1);
2722   if(sq_newclass(v, SQFalse) < 0) {
2723     std::ostringstream msg;
2724     msg << "Couldn't create new class 'Player'";
2725     throw SquirrelError(v, msg.str());
2726   }
2727   sq_pushstring(v, "add_bonus", -1);
2728   sq_newclosure(v, &Player_add_bonus_wrapper, 0);
2729   if(SQ_FAILED(sq_createslot(v, -3))) {
2730     throw SquirrelError(v, "Couldn't register function 'add_bonus'");
2731   }
2732
2733   sq_pushstring(v, "add_coins", -1);
2734   sq_newclosure(v, &Player_add_coins_wrapper, 0);
2735   if(SQ_FAILED(sq_createslot(v, -3))) {
2736     throw SquirrelError(v, "Couldn't register function 'add_coins'");
2737   }
2738
2739   sq_pushstring(v, "make_invincible", -1);
2740   sq_newclosure(v, &Player_make_invincible_wrapper, 0);
2741   if(SQ_FAILED(sq_createslot(v, -3))) {
2742     throw SquirrelError(v, "Couldn't register function 'make_invincible'");
2743   }
2744
2745   sq_pushstring(v, "deactivate", -1);
2746   sq_newclosure(v, &Player_deactivate_wrapper, 0);
2747   if(SQ_FAILED(sq_createslot(v, -3))) {
2748     throw SquirrelError(v, "Couldn't register function 'deactivate'");
2749   }
2750
2751   sq_pushstring(v, "activate", -1);
2752   sq_newclosure(v, &Player_activate_wrapper, 0);
2753   if(SQ_FAILED(sq_createslot(v, -3))) {
2754     throw SquirrelError(v, "Couldn't register function 'activate'");
2755   }
2756
2757   sq_pushstring(v, "walk", -1);
2758   sq_newclosure(v, &Player_walk_wrapper, 0);
2759   if(SQ_FAILED(sq_createslot(v, -3))) {
2760     throw SquirrelError(v, "Couldn't register function 'walk'");
2761   }
2762
2763   sq_pushstring(v, "set_visible", -1);
2764   sq_newclosure(v, &Player_set_visible_wrapper, 0);
2765   if(SQ_FAILED(sq_createslot(v, -3))) {
2766     throw SquirrelError(v, "Couldn't register function 'set_visible'");
2767   }
2768
2769   sq_pushstring(v, "get_visible", -1);
2770   sq_newclosure(v, &Player_get_visible_wrapper, 0);
2771   if(SQ_FAILED(sq_createslot(v, -3))) {
2772     throw SquirrelError(v, "Couldn't register function 'get_visible'");
2773   }
2774
2775   if(SQ_FAILED(sq_createslot(v, -3))) {
2776     throw SquirrelError(v, "Couldn't register class 'Player'");
2777   }
2778
2779   // Register class FloatingImage
2780   sq_pushstring(v, "FloatingImage", -1);
2781   if(sq_newclass(v, SQFalse) < 0) {
2782     std::ostringstream msg;
2783     msg << "Couldn't create new class 'FloatingImage'";
2784     throw SquirrelError(v, msg.str());
2785   }
2786   sq_pushstring(v, "constructor", -1);
2787   sq_newclosure(v, &FloatingImage_constructor_wrapper, 0);
2788   if(SQ_FAILED(sq_createslot(v, -3))) {
2789     throw SquirrelError(v, "Couldn't register function 'constructor'");
2790   }
2791
2792   sq_pushstring(v, "set_layer", -1);
2793   sq_newclosure(v, &FloatingImage_set_layer_wrapper, 0);
2794   if(SQ_FAILED(sq_createslot(v, -3))) {
2795     throw SquirrelError(v, "Couldn't register function 'set_layer'");
2796   }
2797
2798   sq_pushstring(v, "get_layer", -1);
2799   sq_newclosure(v, &FloatingImage_get_layer_wrapper, 0);
2800   if(SQ_FAILED(sq_createslot(v, -3))) {
2801     throw SquirrelError(v, "Couldn't register function 'get_layer'");
2802   }
2803
2804   sq_pushstring(v, "set_pos", -1);
2805   sq_newclosure(v, &FloatingImage_set_pos_wrapper, 0);
2806   if(SQ_FAILED(sq_createslot(v, -3))) {
2807     throw SquirrelError(v, "Couldn't register function 'set_pos'");
2808   }
2809
2810   sq_pushstring(v, "get_pos_x", -1);
2811   sq_newclosure(v, &FloatingImage_get_pos_x_wrapper, 0);
2812   if(SQ_FAILED(sq_createslot(v, -3))) {
2813     throw SquirrelError(v, "Couldn't register function 'get_pos_x'");
2814   }
2815
2816   sq_pushstring(v, "get_pos_y", -1);
2817   sq_newclosure(v, &FloatingImage_get_pos_y_wrapper, 0);
2818   if(SQ_FAILED(sq_createslot(v, -3))) {
2819     throw SquirrelError(v, "Couldn't register function 'get_pos_y'");
2820   }
2821
2822   sq_pushstring(v, "set_anchor_point", -1);
2823   sq_newclosure(v, &FloatingImage_set_anchor_point_wrapper, 0);
2824   if(SQ_FAILED(sq_createslot(v, -3))) {
2825     throw SquirrelError(v, "Couldn't register function 'set_anchor_point'");
2826   }
2827
2828   sq_pushstring(v, "get_anchor_point", -1);
2829   sq_newclosure(v, &FloatingImage_get_anchor_point_wrapper, 0);
2830   if(SQ_FAILED(sq_createslot(v, -3))) {
2831     throw SquirrelError(v, "Couldn't register function 'get_anchor_point'");
2832   }
2833
2834   sq_pushstring(v, "set_visible", -1);
2835   sq_newclosure(v, &FloatingImage_set_visible_wrapper, 0);
2836   if(SQ_FAILED(sq_createslot(v, -3))) {
2837     throw SquirrelError(v, "Couldn't register function 'set_visible'");
2838   }
2839
2840   sq_pushstring(v, "get_visible", -1);
2841   sq_newclosure(v, &FloatingImage_get_visible_wrapper, 0);
2842   if(SQ_FAILED(sq_createslot(v, -3))) {
2843     throw SquirrelError(v, "Couldn't register function 'get_visible'");
2844   }
2845
2846   if(SQ_FAILED(sq_createslot(v, -3))) {
2847     throw SquirrelError(v, "Couldn't register class 'FloatingImage'");
2848   }
2849
2850 }
2851
2852 } // end of namespace Scripting
2853