4f2592e2052ec46393f2b520f18bfd78e704f0ed
[supertux.git] / 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 Sound_release_hook(SQUserPointer ptr, int )
758 {
759   Scripting::Sound* _this = reinterpret_cast<Scripting::Sound*> (ptr);
760   delete _this;
761   return 0;
762 }
763
764 static int Sound_play_music_wrapper(HSQUIRRELVM vm)
765 {
766   Scripting::Sound* _this;
767   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
768     sq_throwerror(vm, _SC("'play_music' 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->play_music(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 'play_music'"));
787     return SQ_ERROR;
788   }
789   
790 }
791
792 static int Sound_play_wrapper(HSQUIRRELVM vm)
793 {
794   Scripting::Sound* _this;
795   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
796     sq_throwerror(vm, _SC("'play' 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->play(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 'play'"));
815     return SQ_ERROR;
816   }
817   
818 }
819
820 static int Text_release_hook(SQUserPointer ptr, int )
821 {
822   Scripting::Text* _this = reinterpret_cast<Scripting::Text*> (ptr);
823   delete _this;
824   return 0;
825 }
826
827 static int Text_set_text_wrapper(HSQUIRRELVM vm)
828 {
829   Scripting::Text* _this;
830   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
831     sq_throwerror(vm, _SC("'set_text' called without instance"));
832     return SQ_ERROR;
833   }
834   const char* arg0;
835   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
836     sq_throwerror(vm, _SC("Argument 1 not a string"));
837     return SQ_ERROR;
838   }
839   
840   try {
841     _this->set_text(arg0);
842   
843     return 0;
844   
845   } catch(std::exception& e) {
846     sq_throwerror(vm, e.what());
847     return SQ_ERROR;
848   } catch(...) {
849     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_text'"));
850     return SQ_ERROR;
851   }
852   
853 }
854
855 static int Text_set_font_wrapper(HSQUIRRELVM vm)
856 {
857   Scripting::Text* _this;
858   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
859     sq_throwerror(vm, _SC("'set_font' called without instance"));
860     return SQ_ERROR;
861   }
862   const char* arg0;
863   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
864     sq_throwerror(vm, _SC("Argument 1 not a string"));
865     return SQ_ERROR;
866   }
867   
868   try {
869     _this->set_font(arg0);
870   
871     return 0;
872   
873   } catch(std::exception& e) {
874     sq_throwerror(vm, e.what());
875     return SQ_ERROR;
876   } catch(...) {
877     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_font'"));
878     return SQ_ERROR;
879   }
880   
881 }
882
883 static int Text_fade_in_wrapper(HSQUIRRELVM vm)
884 {
885   Scripting::Text* _this;
886   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
887     sq_throwerror(vm, _SC("'fade_in' called without instance"));
888     return SQ_ERROR;
889   }
890   float arg0;
891   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
892     sq_throwerror(vm, _SC("Argument 1 not a float"));
893     return SQ_ERROR;
894   }
895   
896   try {
897     _this->fade_in(arg0);
898   
899     return 0;
900   
901   } catch(std::exception& e) {
902     sq_throwerror(vm, e.what());
903     return SQ_ERROR;
904   } catch(...) {
905     sq_throwerror(vm, _SC("Unexpected exception while executing function 'fade_in'"));
906     return SQ_ERROR;
907   }
908   
909 }
910
911 static int Text_fade_out_wrapper(HSQUIRRELVM vm)
912 {
913   Scripting::Text* _this;
914   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
915     sq_throwerror(vm, _SC("'fade_out' called without instance"));
916     return SQ_ERROR;
917   }
918   float arg0;
919   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
920     sq_throwerror(vm, _SC("Argument 1 not a float"));
921     return SQ_ERROR;
922   }
923   
924   try {
925     _this->fade_out(arg0);
926   
927     return 0;
928   
929   } catch(std::exception& e) {
930     sq_throwerror(vm, e.what());
931     return SQ_ERROR;
932   } catch(...) {
933     sq_throwerror(vm, _SC("Unexpected exception while executing function 'fade_out'"));
934     return SQ_ERROR;
935   }
936   
937 }
938
939 static int Text_set_visible_wrapper(HSQUIRRELVM vm)
940 {
941   Scripting::Text* _this;
942   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
943     sq_throwerror(vm, _SC("'set_visible' called without instance"));
944     return SQ_ERROR;
945   }
946   SQBool arg0;
947   if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
948     sq_throwerror(vm, _SC("Argument 1 not a bool"));
949     return SQ_ERROR;
950   }
951   
952   try {
953     _this->set_visible(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 'set_visible'"));
962     return SQ_ERROR;
963   }
964   
965 }
966
967 static int Text_set_centered_wrapper(HSQUIRRELVM vm)
968 {
969   Scripting::Text* _this;
970   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
971     sq_throwerror(vm, _SC("'set_centered' called without instance"));
972     return SQ_ERROR;
973   }
974   SQBool arg0;
975   if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
976     sq_throwerror(vm, _SC("Argument 1 not a bool"));
977     return SQ_ERROR;
978   }
979   
980   try {
981     _this->set_centered(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 'set_centered'"));
990     return SQ_ERROR;
991   }
992   
993 }
994
995 static int Player_release_hook(SQUserPointer ptr, int )
996 {
997   Scripting::Player* _this = reinterpret_cast<Scripting::Player*> (ptr);
998   delete _this;
999   return 0;
1000 }
1001
1002 static int Player_add_bonus_wrapper(HSQUIRRELVM vm)
1003 {
1004   Scripting::Player* _this;
1005   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1006     sq_throwerror(vm, _SC("'add_bonus' called without instance"));
1007     return SQ_ERROR;
1008   }
1009   const char* arg0;
1010   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
1011     sq_throwerror(vm, _SC("Argument 1 not a string"));
1012     return SQ_ERROR;
1013   }
1014   
1015   try {
1016     _this->add_bonus(arg0);
1017   
1018     return 0;
1019   
1020   } catch(std::exception& e) {
1021     sq_throwerror(vm, e.what());
1022     return SQ_ERROR;
1023   } catch(...) {
1024     sq_throwerror(vm, _SC("Unexpected exception while executing function 'add_bonus'"));
1025     return SQ_ERROR;
1026   }
1027   
1028 }
1029
1030 static int Player_add_coins_wrapper(HSQUIRRELVM vm)
1031 {
1032   Scripting::Player* _this;
1033   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1034     sq_throwerror(vm, _SC("'add_coins' called without instance"));
1035     return SQ_ERROR;
1036   }
1037   int arg0;
1038   if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) {
1039     sq_throwerror(vm, _SC("Argument 1 not an integer"));
1040     return SQ_ERROR;
1041   }
1042   
1043   try {
1044     _this->add_coins(arg0);
1045   
1046     return 0;
1047   
1048   } catch(std::exception& e) {
1049     sq_throwerror(vm, e.what());
1050     return SQ_ERROR;
1051   } catch(...) {
1052     sq_throwerror(vm, _SC("Unexpected exception while executing function 'add_coins'"));
1053     return SQ_ERROR;
1054   }
1055   
1056 }
1057
1058 static int Player_make_invincible_wrapper(HSQUIRRELVM vm)
1059 {
1060   Scripting::Player* _this;
1061   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1062     sq_throwerror(vm, _SC("'make_invincible' called without instance"));
1063     return SQ_ERROR;
1064   }
1065   
1066   try {
1067     _this->make_invincible();
1068   
1069     return 0;
1070   
1071   } catch(std::exception& e) {
1072     sq_throwerror(vm, e.what());
1073     return SQ_ERROR;
1074   } catch(...) {
1075     sq_throwerror(vm, _SC("Unexpected exception while executing function 'make_invincible'"));
1076     return SQ_ERROR;
1077   }
1078   
1079 }
1080
1081 static int Player_deactivate_wrapper(HSQUIRRELVM vm)
1082 {
1083   Scripting::Player* _this;
1084   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1085     sq_throwerror(vm, _SC("'deactivate' called without instance"));
1086     return SQ_ERROR;
1087   }
1088   
1089   try {
1090     _this->deactivate();
1091   
1092     return 0;
1093   
1094   } catch(std::exception& e) {
1095     sq_throwerror(vm, e.what());
1096     return SQ_ERROR;
1097   } catch(...) {
1098     sq_throwerror(vm, _SC("Unexpected exception while executing function 'deactivate'"));
1099     return SQ_ERROR;
1100   }
1101   
1102 }
1103
1104 static int Player_activate_wrapper(HSQUIRRELVM vm)
1105 {
1106   Scripting::Player* _this;
1107   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1108     sq_throwerror(vm, _SC("'activate' called without instance"));
1109     return SQ_ERROR;
1110   }
1111   
1112   try {
1113     _this->activate();
1114   
1115     return 0;
1116   
1117   } catch(std::exception& e) {
1118     sq_throwerror(vm, e.what());
1119     return SQ_ERROR;
1120   } catch(...) {
1121     sq_throwerror(vm, _SC("Unexpected exception while executing function 'activate'"));
1122     return SQ_ERROR;
1123   }
1124   
1125 }
1126
1127 static int Player_walk_wrapper(HSQUIRRELVM vm)
1128 {
1129   Scripting::Player* _this;
1130   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1131     sq_throwerror(vm, _SC("'walk' called without instance"));
1132     return SQ_ERROR;
1133   }
1134   float arg0;
1135   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
1136     sq_throwerror(vm, _SC("Argument 1 not a float"));
1137     return SQ_ERROR;
1138   }
1139   
1140   try {
1141     _this->walk(arg0);
1142   
1143     return 0;
1144   
1145   } catch(std::exception& e) {
1146     sq_throwerror(vm, e.what());
1147     return SQ_ERROR;
1148   } catch(...) {
1149     sq_throwerror(vm, _SC("Unexpected exception while executing function 'walk'"));
1150     return SQ_ERROR;
1151   }
1152   
1153 }
1154
1155 static int Player_set_visible_wrapper(HSQUIRRELVM vm)
1156 {
1157   Scripting::Player* _this;
1158   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1159     sq_throwerror(vm, _SC("'set_visible' called without instance"));
1160     return SQ_ERROR;
1161   }
1162   SQBool arg0;
1163   if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
1164     sq_throwerror(vm, _SC("Argument 1 not a bool"));
1165     return SQ_ERROR;
1166   }
1167   
1168   try {
1169     _this->set_visible(arg0);
1170   
1171     return 0;
1172   
1173   } catch(std::exception& e) {
1174     sq_throwerror(vm, e.what());
1175     return SQ_ERROR;
1176   } catch(...) {
1177     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_visible'"));
1178     return SQ_ERROR;
1179   }
1180   
1181 }
1182
1183 static int Player_get_visible_wrapper(HSQUIRRELVM vm)
1184 {
1185   Scripting::Player* _this;
1186   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1187     sq_throwerror(vm, _SC("'get_visible' called without instance"));
1188     return SQ_ERROR;
1189   }
1190   
1191   try {
1192     bool return_value = _this->get_visible();
1193   
1194     sq_pushbool(vm, return_value);
1195     return 1;
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 'get_visible'"));
1202     return SQ_ERROR;
1203   }
1204   
1205 }
1206
1207 static int FloatingImage_release_hook(SQUserPointer ptr, int )
1208 {
1209   Scripting::FloatingImage* _this = reinterpret_cast<Scripting::FloatingImage*> (ptr);
1210   delete _this;
1211   return 0;
1212 }
1213
1214 static int FloatingImage_constructor_wrapper(HSQUIRRELVM vm)
1215 {
1216   const char* arg0;
1217   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
1218     sq_throwerror(vm, _SC("Argument 1 not a string"));
1219     return SQ_ERROR;
1220   }
1221   
1222   try {
1223     Scripting::FloatingImage* _this = new Scripting::FloatingImage(arg0);
1224   if(SQ_FAILED(sq_setinstanceup(vm, 1, _this))) {
1225     sq_throwerror(vm, _SC("Couldn't setup instance of 'FloatingImage' class"));
1226     return SQ_ERROR;
1227   }
1228   sq_setreleasehook(vm, 1, FloatingImage_release_hook);
1229   
1230     return 0;
1231   
1232   } catch(std::exception& e) {
1233     sq_throwerror(vm, e.what());
1234     return SQ_ERROR;
1235   } catch(...) {
1236     sq_throwerror(vm, _SC("Unexpected exception while executing function 'constructor'"));
1237     return SQ_ERROR;
1238   }
1239   
1240 }
1241
1242 static int FloatingImage_set_layer_wrapper(HSQUIRRELVM vm)
1243 {
1244   Scripting::FloatingImage* _this;
1245   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1246     sq_throwerror(vm, _SC("'set_layer' called without instance"));
1247     return SQ_ERROR;
1248   }
1249   int arg0;
1250   if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) {
1251     sq_throwerror(vm, _SC("Argument 1 not an integer"));
1252     return SQ_ERROR;
1253   }
1254   
1255   try {
1256     _this->set_layer(arg0);
1257   
1258     return 0;
1259   
1260   } catch(std::exception& e) {
1261     sq_throwerror(vm, e.what());
1262     return SQ_ERROR;
1263   } catch(...) {
1264     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_layer'"));
1265     return SQ_ERROR;
1266   }
1267   
1268 }
1269
1270 static int FloatingImage_get_layer_wrapper(HSQUIRRELVM vm)
1271 {
1272   Scripting::FloatingImage* _this;
1273   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1274     sq_throwerror(vm, _SC("'get_layer' called without instance"));
1275     return SQ_ERROR;
1276   }
1277   
1278   try {
1279     int return_value = _this->get_layer();
1280   
1281     sq_pushinteger(vm, return_value);
1282     return 1;
1283   
1284   } catch(std::exception& e) {
1285     sq_throwerror(vm, e.what());
1286     return SQ_ERROR;
1287   } catch(...) {
1288     sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_layer'"));
1289     return SQ_ERROR;
1290   }
1291   
1292 }
1293
1294 static int FloatingImage_set_pos_wrapper(HSQUIRRELVM vm)
1295 {
1296   Scripting::FloatingImage* _this;
1297   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1298     sq_throwerror(vm, _SC("'set_pos' called without instance"));
1299     return SQ_ERROR;
1300   }
1301   float arg0;
1302   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
1303     sq_throwerror(vm, _SC("Argument 1 not a float"));
1304     return SQ_ERROR;
1305   }
1306   float arg1;
1307   if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
1308     sq_throwerror(vm, _SC("Argument 2 not a float"));
1309     return SQ_ERROR;
1310   }
1311   
1312   try {
1313     _this->set_pos(arg0, arg1);
1314   
1315     return 0;
1316   
1317   } catch(std::exception& e) {
1318     sq_throwerror(vm, e.what());
1319     return SQ_ERROR;
1320   } catch(...) {
1321     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_pos'"));
1322     return SQ_ERROR;
1323   }
1324   
1325 }
1326
1327 static int FloatingImage_get_pos_x_wrapper(HSQUIRRELVM vm)
1328 {
1329   Scripting::FloatingImage* _this;
1330   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1331     sq_throwerror(vm, _SC("'get_pos_x' called without instance"));
1332     return SQ_ERROR;
1333   }
1334   
1335   try {
1336     float return_value = _this->get_pos_x();
1337   
1338     sq_pushfloat(vm, return_value);
1339     return 1;
1340   
1341   } catch(std::exception& e) {
1342     sq_throwerror(vm, e.what());
1343     return SQ_ERROR;
1344   } catch(...) {
1345     sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_pos_x'"));
1346     return SQ_ERROR;
1347   }
1348   
1349 }
1350
1351 static int FloatingImage_get_pos_y_wrapper(HSQUIRRELVM vm)
1352 {
1353   Scripting::FloatingImage* _this;
1354   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1355     sq_throwerror(vm, _SC("'get_pos_y' called without instance"));
1356     return SQ_ERROR;
1357   }
1358   
1359   try {
1360     float return_value = _this->get_pos_y();
1361   
1362     sq_pushfloat(vm, return_value);
1363     return 1;
1364   
1365   } catch(std::exception& e) {
1366     sq_throwerror(vm, e.what());
1367     return SQ_ERROR;
1368   } catch(...) {
1369     sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_pos_y'"));
1370     return SQ_ERROR;
1371   }
1372   
1373 }
1374
1375 static int FloatingImage_set_anchor_point_wrapper(HSQUIRRELVM vm)
1376 {
1377   Scripting::FloatingImage* _this;
1378   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1379     sq_throwerror(vm, _SC("'set_anchor_point' called without instance"));
1380     return SQ_ERROR;
1381   }
1382   int arg0;
1383   if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) {
1384     sq_throwerror(vm, _SC("Argument 1 not an integer"));
1385     return SQ_ERROR;
1386   }
1387   
1388   try {
1389     _this->set_anchor_point(arg0);
1390   
1391     return 0;
1392   
1393   } catch(std::exception& e) {
1394     sq_throwerror(vm, e.what());
1395     return SQ_ERROR;
1396   } catch(...) {
1397     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_anchor_point'"));
1398     return SQ_ERROR;
1399   }
1400   
1401 }
1402
1403 static int FloatingImage_get_anchor_point_wrapper(HSQUIRRELVM vm)
1404 {
1405   Scripting::FloatingImage* _this;
1406   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1407     sq_throwerror(vm, _SC("'get_anchor_point' called without instance"));
1408     return SQ_ERROR;
1409   }
1410   
1411   try {
1412     int return_value = _this->get_anchor_point();
1413   
1414     sq_pushinteger(vm, return_value);
1415     return 1;
1416   
1417   } catch(std::exception& e) {
1418     sq_throwerror(vm, e.what());
1419     return SQ_ERROR;
1420   } catch(...) {
1421     sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_anchor_point'"));
1422     return SQ_ERROR;
1423   }
1424   
1425 }
1426
1427 static int FloatingImage_set_visible_wrapper(HSQUIRRELVM vm)
1428 {
1429   Scripting::FloatingImage* _this;
1430   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1431     sq_throwerror(vm, _SC("'set_visible' called without instance"));
1432     return SQ_ERROR;
1433   }
1434   SQBool arg0;
1435   if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
1436     sq_throwerror(vm, _SC("Argument 1 not a bool"));
1437     return SQ_ERROR;
1438   }
1439   
1440   try {
1441     _this->set_visible(arg0);
1442   
1443     return 0;
1444   
1445   } catch(std::exception& e) {
1446     sq_throwerror(vm, e.what());
1447     return SQ_ERROR;
1448   } catch(...) {
1449     sq_throwerror(vm, _SC("Unexpected exception while executing function 'set_visible'"));
1450     return SQ_ERROR;
1451   }
1452   
1453 }
1454
1455 static int FloatingImage_get_visible_wrapper(HSQUIRRELVM vm)
1456 {
1457   Scripting::FloatingImage* _this;
1458   if(SQ_FAILED(sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer*> (&_this), 0))) {
1459     sq_throwerror(vm, _SC("'get_visible' called without instance"));
1460     return SQ_ERROR;
1461   }
1462   
1463   try {
1464     bool return_value = _this->get_visible();
1465   
1466     sq_pushbool(vm, return_value);
1467     return 1;
1468   
1469   } catch(std::exception& e) {
1470     sq_throwerror(vm, e.what());
1471     return SQ_ERROR;
1472   } catch(...) {
1473     sq_throwerror(vm, _SC("Unexpected exception while executing function 'get_visible'"));
1474     return SQ_ERROR;
1475   }
1476   
1477 }
1478
1479 static int display_wrapper(HSQUIRRELVM vm)
1480 {
1481   return Scripting::display(vm);
1482 }
1483
1484 static int display_text_file_wrapper(HSQUIRRELVM vm)
1485 {
1486   const char* arg0;
1487   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
1488     sq_throwerror(vm, _SC("Argument 1 not a string"));
1489     return SQ_ERROR;
1490   }
1491   
1492   try {
1493     Scripting::display_text_file(arg0);
1494   
1495     return 0;
1496   
1497   } catch(std::exception& e) {
1498     sq_throwerror(vm, e.what());
1499     return SQ_ERROR;
1500   } catch(...) {
1501     sq_throwerror(vm, _SC("Unexpected exception while executing function 'display_text_file'"));
1502     return SQ_ERROR;
1503   }
1504   
1505 }
1506
1507 static int load_worldmap_wrapper(HSQUIRRELVM vm)
1508 {
1509   const char* arg0;
1510   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
1511     sq_throwerror(vm, _SC("Argument 1 not a string"));
1512     return SQ_ERROR;
1513   }
1514   
1515   try {
1516     Scripting::load_worldmap(arg0);
1517   
1518     return 0;
1519   
1520   } catch(std::exception& e) {
1521     sq_throwerror(vm, e.what());
1522     return SQ_ERROR;
1523   } catch(...) {
1524     sq_throwerror(vm, _SC("Unexpected exception while executing function 'load_worldmap'"));
1525     return SQ_ERROR;
1526   }
1527   
1528 }
1529
1530 static int load_level_wrapper(HSQUIRRELVM vm)
1531 {
1532   const char* arg0;
1533   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
1534     sq_throwerror(vm, _SC("Argument 1 not a string"));
1535     return SQ_ERROR;
1536   }
1537   
1538   try {
1539     Scripting::load_level(arg0);
1540   
1541     return 0;
1542   
1543   } catch(std::exception& e) {
1544     sq_throwerror(vm, e.what());
1545     return SQ_ERROR;
1546   } catch(...) {
1547     sq_throwerror(vm, _SC("Unexpected exception while executing function 'load_level'"));
1548     return SQ_ERROR;
1549   }
1550   
1551 }
1552
1553 static int wait_wrapper(HSQUIRRELVM vm)
1554 {
1555   HSQUIRRELVM arg0 = vm;
1556   float arg1;
1557   if(SQ_FAILED(sq_getfloat(vm, 2, &arg1))) {
1558     sq_throwerror(vm, _SC("Argument 1 not a float"));
1559     return SQ_ERROR;
1560   }
1561   
1562   try {
1563     Scripting::wait(arg0, arg1);
1564   
1565     return sq_suspendvm(vm);
1566   
1567   } catch(std::exception& e) {
1568     sq_throwerror(vm, e.what());
1569     return SQ_ERROR;
1570   } catch(...) {
1571     sq_throwerror(vm, _SC("Unexpected exception while executing function 'wait'"));
1572     return SQ_ERROR;
1573   }
1574   
1575 }
1576
1577 static int wait_for_screenswitch_wrapper(HSQUIRRELVM vm)
1578 {
1579   HSQUIRRELVM arg0 = vm;
1580   
1581   try {
1582     Scripting::wait_for_screenswitch(arg0);
1583   
1584     return sq_suspendvm(vm);
1585   
1586   } catch(std::exception& e) {
1587     sq_throwerror(vm, e.what());
1588     return SQ_ERROR;
1589   } catch(...) {
1590     sq_throwerror(vm, _SC("Unexpected exception while executing function 'wait_for_screenswitch'"));
1591     return SQ_ERROR;
1592   }
1593   
1594 }
1595
1596 static int exit_screen_wrapper(HSQUIRRELVM vm)
1597 {
1598   (void) vm;
1599   
1600   try {
1601     Scripting::exit_screen();
1602   
1603     return 0;
1604   
1605   } catch(std::exception& e) {
1606     sq_throwerror(vm, e.what());
1607     return SQ_ERROR;
1608   } catch(...) {
1609     sq_throwerror(vm, _SC("Unexpected exception while executing function 'exit_screen'"));
1610     return SQ_ERROR;
1611   }
1612   
1613 }
1614
1615 static int fadeout_screen_wrapper(HSQUIRRELVM vm)
1616 {
1617   float arg0;
1618   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
1619     sq_throwerror(vm, _SC("Argument 1 not a float"));
1620     return SQ_ERROR;
1621   }
1622   
1623   try {
1624     Scripting::fadeout_screen(arg0);
1625   
1626     return 0;
1627   
1628   } catch(std::exception& e) {
1629     sq_throwerror(vm, e.what());
1630     return SQ_ERROR;
1631   } catch(...) {
1632     sq_throwerror(vm, _SC("Unexpected exception while executing function 'fadeout_screen'"));
1633     return SQ_ERROR;
1634   }
1635   
1636 }
1637
1638 static int shrink_screen_wrapper(HSQUIRRELVM vm)
1639 {
1640   float arg0;
1641   if(SQ_FAILED(sq_getfloat(vm, 2, &arg0))) {
1642     sq_throwerror(vm, _SC("Argument 1 not a float"));
1643     return SQ_ERROR;
1644   }
1645   float arg1;
1646   if(SQ_FAILED(sq_getfloat(vm, 3, &arg1))) {
1647     sq_throwerror(vm, _SC("Argument 2 not a float"));
1648     return SQ_ERROR;
1649   }
1650   float arg2;
1651   if(SQ_FAILED(sq_getfloat(vm, 4, &arg2))) {
1652     sq_throwerror(vm, _SC("Argument 3 not a float"));
1653     return SQ_ERROR;
1654   }
1655   
1656   try {
1657     Scripting::shrink_screen(arg0, arg1, arg2);
1658   
1659     return 0;
1660   
1661   } catch(std::exception& e) {
1662     sq_throwerror(vm, e.what());
1663     return SQ_ERROR;
1664   } catch(...) {
1665     sq_throwerror(vm, _SC("Unexpected exception while executing function 'shrink_screen'"));
1666     return SQ_ERROR;
1667   }
1668   
1669 }
1670
1671 static int translate_wrapper(HSQUIRRELVM vm)
1672 {
1673   const char* arg0;
1674   if(SQ_FAILED(sq_getstring(vm, 2, &arg0))) {
1675     sq_throwerror(vm, _SC("Argument 1 not a string"));
1676     return SQ_ERROR;
1677   }
1678   
1679   try {
1680     std::string return_value = Scripting::translate(arg0);
1681   
1682     sq_pushstring(vm, return_value.c_str(), return_value.size());
1683     return 1;
1684   
1685   } catch(std::exception& e) {
1686     sq_throwerror(vm, e.what());
1687     return SQ_ERROR;
1688   } catch(...) {
1689     sq_throwerror(vm, _SC("Unexpected exception while executing function 'translate'"));
1690     return SQ_ERROR;
1691   }
1692   
1693 }
1694
1695 static int import_wrapper(HSQUIRRELVM vm)
1696 {
1697   HSQUIRRELVM arg0 = vm;
1698   const char* arg1;
1699   if(SQ_FAILED(sq_getstring(vm, 2, &arg1))) {
1700     sq_throwerror(vm, _SC("Argument 1 not a string"));
1701     return SQ_ERROR;
1702   }
1703   
1704   try {
1705     Scripting::import(arg0, arg1);
1706   
1707     return 0;
1708   
1709   } catch(std::exception& e) {
1710     sq_throwerror(vm, e.what());
1711     return SQ_ERROR;
1712   } catch(...) {
1713     sq_throwerror(vm, _SC("Unexpected exception while executing function 'import'"));
1714     return SQ_ERROR;
1715   }
1716   
1717 }
1718
1719 static int save_state_wrapper(HSQUIRRELVM vm)
1720 {
1721   (void) vm;
1722   
1723   try {
1724     Scripting::save_state();
1725   
1726     return 0;
1727   
1728   } catch(std::exception& e) {
1729     sq_throwerror(vm, e.what());
1730     return SQ_ERROR;
1731   } catch(...) {
1732     sq_throwerror(vm, _SC("Unexpected exception while executing function 'save_state'"));
1733     return SQ_ERROR;
1734   }
1735   
1736 }
1737
1738 static int add_key_wrapper(HSQUIRRELVM vm)
1739 {
1740   int arg0;
1741   if(SQ_FAILED(sq_getinteger(vm, 2, &arg0))) {
1742     sq_throwerror(vm, _SC("Argument 1 not an integer"));
1743     return SQ_ERROR;
1744   }
1745   
1746   try {
1747     Scripting::add_key(arg0);
1748   
1749     return 0;
1750   
1751   } catch(std::exception& e) {
1752     sq_throwerror(vm, e.what());
1753     return SQ_ERROR;
1754   } catch(...) {
1755     sq_throwerror(vm, _SC("Unexpected exception while executing function 'add_key'"));
1756     return SQ_ERROR;
1757   }
1758   
1759 }
1760
1761 static int debug_collrects_wrapper(HSQUIRRELVM vm)
1762 {
1763   SQBool arg0;
1764   if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
1765     sq_throwerror(vm, _SC("Argument 1 not a bool"));
1766     return SQ_ERROR;
1767   }
1768   
1769   try {
1770     Scripting::debug_collrects(arg0);
1771   
1772     return 0;
1773   
1774   } catch(std::exception& e) {
1775     sq_throwerror(vm, e.what());
1776     return SQ_ERROR;
1777   } catch(...) {
1778     sq_throwerror(vm, _SC("Unexpected exception while executing function 'debug_collrects'"));
1779     return SQ_ERROR;
1780   }
1781   
1782 }
1783
1784 static int debug_draw_fps_wrapper(HSQUIRRELVM vm)
1785 {
1786   SQBool arg0;
1787   if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
1788     sq_throwerror(vm, _SC("Argument 1 not a bool"));
1789     return SQ_ERROR;
1790   }
1791   
1792   try {
1793     Scripting::debug_draw_fps(arg0);
1794   
1795     return 0;
1796   
1797   } catch(std::exception& e) {
1798     sq_throwerror(vm, e.what());
1799     return SQ_ERROR;
1800   } catch(...) {
1801     sq_throwerror(vm, _SC("Unexpected exception while executing function 'debug_draw_fps'"));
1802     return SQ_ERROR;
1803   }
1804   
1805 }
1806
1807 static int debug_draw_solids_only_wrapper(HSQUIRRELVM vm)
1808 {
1809   SQBool arg0;
1810   if(SQ_FAILED(sq_getbool(vm, 2, &arg0))) {
1811     sq_throwerror(vm, _SC("Argument 1 not a bool"));
1812     return SQ_ERROR;
1813   }
1814   
1815   try {
1816     Scripting::debug_draw_solids_only(arg0);
1817   
1818     return 0;
1819   
1820   } catch(std::exception& e) {
1821     sq_throwerror(vm, e.what());
1822     return SQ_ERROR;
1823   } catch(...) {
1824     sq_throwerror(vm, _SC("Unexpected exception while executing function 'debug_draw_solids_only'"));
1825     return SQ_ERROR;
1826   }
1827   
1828 }
1829
1830 static int grease_wrapper(HSQUIRRELVM vm)
1831 {
1832   (void) vm;
1833   
1834   try {
1835     Scripting::grease();
1836   
1837     return 0;
1838   
1839   } catch(std::exception& e) {
1840     sq_throwerror(vm, e.what());
1841     return SQ_ERROR;
1842   } catch(...) {
1843     sq_throwerror(vm, _SC("Unexpected exception while executing function 'grease'"));
1844     return SQ_ERROR;
1845   }
1846   
1847 }
1848
1849 static int invincible_wrapper(HSQUIRRELVM vm)
1850 {
1851   (void) vm;
1852   
1853   try {
1854     Scripting::invincible();
1855   
1856     return 0;
1857   
1858   } catch(std::exception& e) {
1859     sq_throwerror(vm, e.what());
1860     return SQ_ERROR;
1861   } catch(...) {
1862     sq_throwerror(vm, _SC("Unexpected exception while executing function 'invincible'"));
1863     return SQ_ERROR;
1864   }
1865   
1866 }
1867
1868 static int mortal_wrapper(HSQUIRRELVM vm)
1869 {
1870   (void) vm;
1871   
1872   try {
1873     Scripting::mortal();
1874   
1875     return 0;
1876   
1877   } catch(std::exception& e) {
1878     sq_throwerror(vm, e.what());
1879     return SQ_ERROR;
1880   } catch(...) {
1881     sq_throwerror(vm, _SC("Unexpected exception while executing function 'mortal'"));
1882     return SQ_ERROR;
1883   }
1884   
1885 }
1886
1887 static int shrink_wrapper(HSQUIRRELVM vm)
1888 {
1889   (void) vm;
1890   
1891   try {
1892     Scripting::shrink();
1893   
1894     return 0;
1895   
1896   } catch(std::exception& e) {
1897     sq_throwerror(vm, e.what());
1898     return SQ_ERROR;
1899   } catch(...) {
1900     sq_throwerror(vm, _SC("Unexpected exception while executing function 'shrink'"));
1901     return SQ_ERROR;
1902   }
1903   
1904 }
1905
1906 static int kill_wrapper(HSQUIRRELVM vm)
1907 {
1908   (void) vm;
1909   
1910   try {
1911     Scripting::kill();
1912   
1913     return 0;
1914   
1915   } catch(std::exception& e) {
1916     sq_throwerror(vm, e.what());
1917     return SQ_ERROR;
1918   } catch(...) {
1919     sq_throwerror(vm, _SC("Unexpected exception while executing function 'kill'"));
1920     return SQ_ERROR;
1921   }
1922   
1923 }
1924
1925 static int restart_wrapper(HSQUIRRELVM vm)
1926 {
1927   (void) vm;
1928   
1929   try {
1930     Scripting::restart();
1931   
1932     return 0;
1933   
1934   } catch(std::exception& e) {
1935     sq_throwerror(vm, e.what());
1936     return SQ_ERROR;
1937   } catch(...) {
1938     sq_throwerror(vm, _SC("Unexpected exception while executing function 'restart'"));
1939     return SQ_ERROR;
1940   }
1941   
1942 }
1943
1944 static int whereami_wrapper(HSQUIRRELVM vm)
1945 {
1946   (void) vm;
1947   
1948   try {
1949     Scripting::whereami();
1950   
1951     return 0;
1952   
1953   } catch(std::exception& e) {
1954     sq_throwerror(vm, e.what());
1955     return SQ_ERROR;
1956   } catch(...) {
1957     sq_throwerror(vm, _SC("Unexpected exception while executing function 'whereami'"));
1958     return SQ_ERROR;
1959   }
1960   
1961 }
1962
1963 static int gotoend_wrapper(HSQUIRRELVM vm)
1964 {
1965   (void) vm;
1966   
1967   try {
1968     Scripting::gotoend();
1969   
1970     return 0;
1971   
1972   } catch(std::exception& e) {
1973     sq_throwerror(vm, e.what());
1974     return SQ_ERROR;
1975   } catch(...) {
1976     sq_throwerror(vm, _SC("Unexpected exception while executing function 'gotoend'"));
1977     return SQ_ERROR;
1978   }
1979   
1980 }
1981
1982 static int camera_wrapper(HSQUIRRELVM vm)
1983 {
1984   (void) vm;
1985   
1986   try {
1987     Scripting::camera();
1988   
1989     return 0;
1990   
1991   } catch(std::exception& e) {
1992     sq_throwerror(vm, e.what());
1993     return SQ_ERROR;
1994   } catch(...) {
1995     sq_throwerror(vm, _SC("Unexpected exception while executing function 'camera'"));
1996     return SQ_ERROR;
1997   }
1998   
1999 }
2000
2001 static int quit_wrapper(HSQUIRRELVM vm)
2002 {
2003   (void) vm;
2004   
2005   try {
2006     Scripting::quit();
2007   
2008     return 0;
2009   
2010   } catch(std::exception& e) {
2011     sq_throwerror(vm, e.what());
2012     return SQ_ERROR;
2013   } catch(...) {
2014     sq_throwerror(vm, _SC("Unexpected exception while executing function 'quit'"));
2015     return SQ_ERROR;
2016   }
2017   
2018 }
2019
2020 } // end of namespace Wrapper
2021
2022 void create_squirrel_instance(HSQUIRRELVM v, Scripting::DisplayEffect* object, bool setup_releasehook)
2023 {
2024   using namespace Wrapper;
2025
2026   sq_pushroottable(v);
2027   sq_pushstring(v, "DisplayEffect", -1);
2028   if(SQ_FAILED(sq_get(v, -2))) {
2029     std::ostringstream msg;
2030     msg << "Couldn't resolved squirrel type 'DisplayEffect'";
2031     throw SquirrelError(v, msg.str());
2032   }
2033
2034   if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) {
2035     std::ostringstream msg;
2036     msg << "Couldn't setup squirrel instance for object of type 'DisplayEffect'";
2037     throw SquirrelError(v, msg.str());
2038   }
2039   sq_remove(v, -2); // remove object name
2040
2041   if(setup_releasehook) {
2042     sq_setreleasehook(v, -1, DisplayEffect_release_hook);
2043   }
2044
2045   sq_remove(v, -2); // remove root table
2046 }
2047
2048 void create_squirrel_instance(HSQUIRRELVM v, Scripting::Camera* object, bool setup_releasehook)
2049 {
2050   using namespace Wrapper;
2051
2052   sq_pushroottable(v);
2053   sq_pushstring(v, "Camera", -1);
2054   if(SQ_FAILED(sq_get(v, -2))) {
2055     std::ostringstream msg;
2056     msg << "Couldn't resolved squirrel type 'Camera'";
2057     throw SquirrelError(v, msg.str());
2058   }
2059
2060   if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) {
2061     std::ostringstream msg;
2062     msg << "Couldn't setup squirrel instance for object of type 'Camera'";
2063     throw SquirrelError(v, msg.str());
2064   }
2065   sq_remove(v, -2); // remove object name
2066
2067   if(setup_releasehook) {
2068     sq_setreleasehook(v, -1, Camera_release_hook);
2069   }
2070
2071   sq_remove(v, -2); // remove root table
2072 }
2073
2074 void create_squirrel_instance(HSQUIRRELVM v, Scripting::Level* object, bool setup_releasehook)
2075 {
2076   using namespace Wrapper;
2077
2078   sq_pushroottable(v);
2079   sq_pushstring(v, "Level", -1);
2080   if(SQ_FAILED(sq_get(v, -2))) {
2081     std::ostringstream msg;
2082     msg << "Couldn't resolved squirrel type 'Level'";
2083     throw SquirrelError(v, msg.str());
2084   }
2085
2086   if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) {
2087     std::ostringstream msg;
2088     msg << "Couldn't setup squirrel instance for object of type 'Level'";
2089     throw SquirrelError(v, msg.str());
2090   }
2091   sq_remove(v, -2); // remove object name
2092
2093   if(setup_releasehook) {
2094     sq_setreleasehook(v, -1, Level_release_hook);
2095   }
2096
2097   sq_remove(v, -2); // remove root table
2098 }
2099
2100 void create_squirrel_instance(HSQUIRRELVM v, Scripting::ScriptedObject* object, bool setup_releasehook)
2101 {
2102   using namespace Wrapper;
2103
2104   sq_pushroottable(v);
2105   sq_pushstring(v, "ScriptedObject", -1);
2106   if(SQ_FAILED(sq_get(v, -2))) {
2107     std::ostringstream msg;
2108     msg << "Couldn't resolved squirrel type 'ScriptedObject'";
2109     throw SquirrelError(v, msg.str());
2110   }
2111
2112   if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) {
2113     std::ostringstream msg;
2114     msg << "Couldn't setup squirrel instance for object of type 'ScriptedObject'";
2115     throw SquirrelError(v, msg.str());
2116   }
2117   sq_remove(v, -2); // remove object name
2118
2119   if(setup_releasehook) {
2120     sq_setreleasehook(v, -1, ScriptedObject_release_hook);
2121   }
2122
2123   sq_remove(v, -2); // remove root table
2124 }
2125
2126 void create_squirrel_instance(HSQUIRRELVM v, Scripting::Sound* object, bool setup_releasehook)
2127 {
2128   using namespace Wrapper;
2129
2130   sq_pushroottable(v);
2131   sq_pushstring(v, "Sound", -1);
2132   if(SQ_FAILED(sq_get(v, -2))) {
2133     std::ostringstream msg;
2134     msg << "Couldn't resolved squirrel type 'Sound'";
2135     throw SquirrelError(v, msg.str());
2136   }
2137
2138   if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) {
2139     std::ostringstream msg;
2140     msg << "Couldn't setup squirrel instance for object of type 'Sound'";
2141     throw SquirrelError(v, msg.str());
2142   }
2143   sq_remove(v, -2); // remove object name
2144
2145   if(setup_releasehook) {
2146     sq_setreleasehook(v, -1, Sound_release_hook);
2147   }
2148
2149   sq_remove(v, -2); // remove root table
2150 }
2151
2152 void create_squirrel_instance(HSQUIRRELVM v, Scripting::Text* object, bool setup_releasehook)
2153 {
2154   using namespace Wrapper;
2155
2156   sq_pushroottable(v);
2157   sq_pushstring(v, "Text", -1);
2158   if(SQ_FAILED(sq_get(v, -2))) {
2159     std::ostringstream msg;
2160     msg << "Couldn't resolved squirrel type 'Text'";
2161     throw SquirrelError(v, msg.str());
2162   }
2163
2164   if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) {
2165     std::ostringstream msg;
2166     msg << "Couldn't setup squirrel instance for object of type 'Text'";
2167     throw SquirrelError(v, msg.str());
2168   }
2169   sq_remove(v, -2); // remove object name
2170
2171   if(setup_releasehook) {
2172     sq_setreleasehook(v, -1, Text_release_hook);
2173   }
2174
2175   sq_remove(v, -2); // remove root table
2176 }
2177
2178 void create_squirrel_instance(HSQUIRRELVM v, Scripting::Player* object, bool setup_releasehook)
2179 {
2180   using namespace Wrapper;
2181
2182   sq_pushroottable(v);
2183   sq_pushstring(v, "Player", -1);
2184   if(SQ_FAILED(sq_get(v, -2))) {
2185     std::ostringstream msg;
2186     msg << "Couldn't resolved squirrel type 'Player'";
2187     throw SquirrelError(v, msg.str());
2188   }
2189
2190   if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) {
2191     std::ostringstream msg;
2192     msg << "Couldn't setup squirrel instance for object of type 'Player'";
2193     throw SquirrelError(v, msg.str());
2194   }
2195   sq_remove(v, -2); // remove object name
2196
2197   if(setup_releasehook) {
2198     sq_setreleasehook(v, -1, Player_release_hook);
2199   }
2200
2201   sq_remove(v, -2); // remove root table
2202 }
2203
2204 void create_squirrel_instance(HSQUIRRELVM v, Scripting::FloatingImage* object, bool setup_releasehook)
2205 {
2206   using namespace Wrapper;
2207
2208   sq_pushroottable(v);
2209   sq_pushstring(v, "FloatingImage", -1);
2210   if(SQ_FAILED(sq_get(v, -2))) {
2211     std::ostringstream msg;
2212     msg << "Couldn't resolved squirrel type 'FloatingImage'";
2213     throw SquirrelError(v, msg.str());
2214   }
2215
2216   if(SQ_FAILED(sq_createinstance(v, -1)) || SQ_FAILED(sq_setinstanceup(v, -1, object))) {
2217     std::ostringstream msg;
2218     msg << "Couldn't setup squirrel instance for object of type 'FloatingImage'";
2219     throw SquirrelError(v, msg.str());
2220   }
2221   sq_remove(v, -2); // remove object name
2222
2223   if(setup_releasehook) {
2224     sq_setreleasehook(v, -1, FloatingImage_release_hook);
2225   }
2226
2227   sq_remove(v, -2); // remove root table
2228 }
2229
2230 void register_supertux_wrapper(HSQUIRRELVM v)
2231 {
2232   using namespace Wrapper;
2233
2234   sq_pushstring(v, "KEY_BRASS", -1);
2235   sq_pushinteger(v, 1);
2236   if(SQ_FAILED(sq_createslot(v, -3))) {
2237     throw SquirrelError(v, "Couldn't register constant 'KEY_BRASS'");
2238   }
2239
2240   sq_pushstring(v, "KEY_IRON", -1);
2241   sq_pushinteger(v, 2);
2242   if(SQ_FAILED(sq_createslot(v, -3))) {
2243     throw SquirrelError(v, "Couldn't register constant 'KEY_IRON'");
2244   }
2245
2246   sq_pushstring(v, "KEY_BRONZE", -1);
2247   sq_pushinteger(v, 4);
2248   if(SQ_FAILED(sq_createslot(v, -3))) {
2249     throw SquirrelError(v, "Couldn't register constant 'KEY_BRONZE'");
2250   }
2251
2252   sq_pushstring(v, "KEY_SILVER", -1);
2253   sq_pushinteger(v, 8);
2254   if(SQ_FAILED(sq_createslot(v, -3))) {
2255     throw SquirrelError(v, "Couldn't register constant 'KEY_SILVER'");
2256   }
2257
2258   sq_pushstring(v, "KEY_GOLD", -1);
2259   sq_pushinteger(v, 16);
2260   if(SQ_FAILED(sq_createslot(v, -3))) {
2261     throw SquirrelError(v, "Couldn't register constant 'KEY_GOLD'");
2262   }
2263
2264   sq_pushstring(v, "ANCHOR_TOP", -1);
2265   sq_pushinteger(v, 16);
2266   if(SQ_FAILED(sq_createslot(v, -3))) {
2267     throw SquirrelError(v, "Couldn't register constant 'ANCHOR_TOP'");
2268   }
2269
2270   sq_pushstring(v, "ANCHOR_BOTTOM", -1);
2271   sq_pushinteger(v, 32);
2272   if(SQ_FAILED(sq_createslot(v, -3))) {
2273     throw SquirrelError(v, "Couldn't register constant 'ANCHOR_BOTTOM'");
2274   }
2275
2276   sq_pushstring(v, "ANCHOR_LEFT", -1);
2277   sq_pushinteger(v, 1);
2278   if(SQ_FAILED(sq_createslot(v, -3))) {
2279     throw SquirrelError(v, "Couldn't register constant 'ANCHOR_LEFT'");
2280   }
2281
2282   sq_pushstring(v, "ANCHOR_RIGHT", -1);
2283   sq_pushinteger(v, 2);
2284   if(SQ_FAILED(sq_createslot(v, -3))) {
2285     throw SquirrelError(v, "Couldn't register constant 'ANCHOR_RIGHT'");
2286   }
2287
2288   sq_pushstring(v, "ANCHOR_MIDDLE", -1);
2289   sq_pushinteger(v, 0);
2290   if(SQ_FAILED(sq_createslot(v, -3))) {
2291     throw SquirrelError(v, "Couldn't register constant 'ANCHOR_MIDDLE'");
2292   }
2293
2294   sq_pushstring(v, "ANCHOR_TOP_LEFT", -1);
2295   sq_pushinteger(v, 17);
2296   if(SQ_FAILED(sq_createslot(v, -3))) {
2297     throw SquirrelError(v, "Couldn't register constant 'ANCHOR_TOP_LEFT'");
2298   }
2299
2300   sq_pushstring(v, "ANCHOR_TOP_RIGHT", -1);
2301   sq_pushinteger(v, 18);
2302   if(SQ_FAILED(sq_createslot(v, -3))) {
2303     throw SquirrelError(v, "Couldn't register constant 'ANCHOR_TOP_RIGHT'");
2304   }
2305
2306   sq_pushstring(v, "ANCHOR_BOTTOM_LEFT", -1);
2307   sq_pushinteger(v, 33);
2308   if(SQ_FAILED(sq_createslot(v, -3))) {
2309     throw SquirrelError(v, "Couldn't register constant 'ANCHOR_BOTTOM_LEFT'");
2310   }
2311
2312   sq_pushstring(v, "ANCHOR_BOTTOM_RIGHT", -1);
2313   sq_pushinteger(v, 34);
2314   if(SQ_FAILED(sq_createslot(v, -3))) {
2315     throw SquirrelError(v, "Couldn't register constant 'ANCHOR_BOTTOM_RIGHT'");
2316   }
2317
2318   sq_pushstring(v, "display", -1);
2319   sq_newclosure(v, &display_wrapper, 0);
2320   if(SQ_FAILED(sq_createslot(v, -3))) {
2321     throw SquirrelError(v, "Couldn't register function 'display'");
2322   }
2323
2324   sq_pushstring(v, "display_text_file", -1);
2325   sq_newclosure(v, &display_text_file_wrapper, 0);
2326   if(SQ_FAILED(sq_createslot(v, -3))) {
2327     throw SquirrelError(v, "Couldn't register function 'display_text_file'");
2328   }
2329
2330   sq_pushstring(v, "load_worldmap", -1);
2331   sq_newclosure(v, &load_worldmap_wrapper, 0);
2332   if(SQ_FAILED(sq_createslot(v, -3))) {
2333     throw SquirrelError(v, "Couldn't register function 'load_worldmap'");
2334   }
2335
2336   sq_pushstring(v, "load_level", -1);
2337   sq_newclosure(v, &load_level_wrapper, 0);
2338   if(SQ_FAILED(sq_createslot(v, -3))) {
2339     throw SquirrelError(v, "Couldn't register function 'load_level'");
2340   }
2341
2342   sq_pushstring(v, "wait", -1);
2343   sq_newclosure(v, &wait_wrapper, 0);
2344   if(SQ_FAILED(sq_createslot(v, -3))) {
2345     throw SquirrelError(v, "Couldn't register function 'wait'");
2346   }
2347
2348   sq_pushstring(v, "wait_for_screenswitch", -1);
2349   sq_newclosure(v, &wait_for_screenswitch_wrapper, 0);
2350   if(SQ_FAILED(sq_createslot(v, -3))) {
2351     throw SquirrelError(v, "Couldn't register function 'wait_for_screenswitch'");
2352   }
2353
2354   sq_pushstring(v, "exit_screen", -1);
2355   sq_newclosure(v, &exit_screen_wrapper, 0);
2356   if(SQ_FAILED(sq_createslot(v, -3))) {
2357     throw SquirrelError(v, "Couldn't register function 'exit_screen'");
2358   }
2359
2360   sq_pushstring(v, "fadeout_screen", -1);
2361   sq_newclosure(v, &fadeout_screen_wrapper, 0);
2362   if(SQ_FAILED(sq_createslot(v, -3))) {
2363     throw SquirrelError(v, "Couldn't register function 'fadeout_screen'");
2364   }
2365
2366   sq_pushstring(v, "shrink_screen", -1);
2367   sq_newclosure(v, &shrink_screen_wrapper, 0);
2368   if(SQ_FAILED(sq_createslot(v, -3))) {
2369     throw SquirrelError(v, "Couldn't register function 'shrink_screen'");
2370   }
2371
2372   sq_pushstring(v, "translate", -1);
2373   sq_newclosure(v, &translate_wrapper, 0);
2374   if(SQ_FAILED(sq_createslot(v, -3))) {
2375     throw SquirrelError(v, "Couldn't register function 'translate'");
2376   }
2377
2378   sq_pushstring(v, "import", -1);
2379   sq_newclosure(v, &import_wrapper, 0);
2380   if(SQ_FAILED(sq_createslot(v, -3))) {
2381     throw SquirrelError(v, "Couldn't register function 'import'");
2382   }
2383
2384   sq_pushstring(v, "save_state", -1);
2385   sq_newclosure(v, &save_state_wrapper, 0);
2386   if(SQ_FAILED(sq_createslot(v, -3))) {
2387     throw SquirrelError(v, "Couldn't register function 'save_state'");
2388   }
2389
2390   sq_pushstring(v, "add_key", -1);
2391   sq_newclosure(v, &add_key_wrapper, 0);
2392   if(SQ_FAILED(sq_createslot(v, -3))) {
2393     throw SquirrelError(v, "Couldn't register function 'add_key'");
2394   }
2395
2396   sq_pushstring(v, "debug_collrects", -1);
2397   sq_newclosure(v, &debug_collrects_wrapper, 0);
2398   if(SQ_FAILED(sq_createslot(v, -3))) {
2399     throw SquirrelError(v, "Couldn't register function 'debug_collrects'");
2400   }
2401
2402   sq_pushstring(v, "debug_draw_fps", -1);
2403   sq_newclosure(v, &debug_draw_fps_wrapper, 0);
2404   if(SQ_FAILED(sq_createslot(v, -3))) {
2405     throw SquirrelError(v, "Couldn't register function 'debug_draw_fps'");
2406   }
2407
2408   sq_pushstring(v, "debug_draw_solids_only", -1);
2409   sq_newclosure(v, &debug_draw_solids_only_wrapper, 0);
2410   if(SQ_FAILED(sq_createslot(v, -3))) {
2411     throw SquirrelError(v, "Couldn't register function 'debug_draw_solids_only'");
2412   }
2413
2414   sq_pushstring(v, "grease", -1);
2415   sq_newclosure(v, &grease_wrapper, 0);
2416   if(SQ_FAILED(sq_createslot(v, -3))) {
2417     throw SquirrelError(v, "Couldn't register function 'grease'");
2418   }
2419
2420   sq_pushstring(v, "invincible", -1);
2421   sq_newclosure(v, &invincible_wrapper, 0);
2422   if(SQ_FAILED(sq_createslot(v, -3))) {
2423     throw SquirrelError(v, "Couldn't register function 'invincible'");
2424   }
2425
2426   sq_pushstring(v, "mortal", -1);
2427   sq_newclosure(v, &mortal_wrapper, 0);
2428   if(SQ_FAILED(sq_createslot(v, -3))) {
2429     throw SquirrelError(v, "Couldn't register function 'mortal'");
2430   }
2431
2432   sq_pushstring(v, "shrink", -1);
2433   sq_newclosure(v, &shrink_wrapper, 0);
2434   if(SQ_FAILED(sq_createslot(v, -3))) {
2435     throw SquirrelError(v, "Couldn't register function 'shrink'");
2436   }
2437
2438   sq_pushstring(v, "kill", -1);
2439   sq_newclosure(v, &kill_wrapper, 0);
2440   if(SQ_FAILED(sq_createslot(v, -3))) {
2441     throw SquirrelError(v, "Couldn't register function 'kill'");
2442   }
2443
2444   sq_pushstring(v, "restart", -1);
2445   sq_newclosure(v, &restart_wrapper, 0);
2446   if(SQ_FAILED(sq_createslot(v, -3))) {
2447     throw SquirrelError(v, "Couldn't register function 'restart'");
2448   }
2449
2450   sq_pushstring(v, "whereami", -1);
2451   sq_newclosure(v, &whereami_wrapper, 0);
2452   if(SQ_FAILED(sq_createslot(v, -3))) {
2453     throw SquirrelError(v, "Couldn't register function 'whereami'");
2454   }
2455
2456   sq_pushstring(v, "gotoend", -1);
2457   sq_newclosure(v, &gotoend_wrapper, 0);
2458   if(SQ_FAILED(sq_createslot(v, -3))) {
2459     throw SquirrelError(v, "Couldn't register function 'gotoend'");
2460   }
2461
2462   sq_pushstring(v, "camera", -1);
2463   sq_newclosure(v, &camera_wrapper, 0);
2464   if(SQ_FAILED(sq_createslot(v, -3))) {
2465     throw SquirrelError(v, "Couldn't register function 'camera'");
2466   }
2467
2468   sq_pushstring(v, "quit", -1);
2469   sq_newclosure(v, &quit_wrapper, 0);
2470   if(SQ_FAILED(sq_createslot(v, -3))) {
2471     throw SquirrelError(v, "Couldn't register function 'quit'");
2472   }
2473
2474   // Register class DisplayEffect
2475   sq_pushstring(v, "DisplayEffect", -1);
2476   if(sq_newclass(v, SQFalse) < 0) {
2477     std::ostringstream msg;
2478     msg << "Couldn't create new class 'DisplayEffect'";
2479     throw SquirrelError(v, msg.str());
2480   }
2481   sq_pushstring(v, "fade_out", -1);
2482   sq_newclosure(v, &DisplayEffect_fade_out_wrapper, 0);
2483   if(SQ_FAILED(sq_createslot(v, -3))) {
2484     throw SquirrelError(v, "Couldn't register function 'fade_out'");
2485   }
2486
2487   sq_pushstring(v, "fade_in", -1);
2488   sq_newclosure(v, &DisplayEffect_fade_in_wrapper, 0);
2489   if(SQ_FAILED(sq_createslot(v, -3))) {
2490     throw SquirrelError(v, "Couldn't register function 'fade_in'");
2491   }
2492
2493   sq_pushstring(v, "set_black", -1);
2494   sq_newclosure(v, &DisplayEffect_set_black_wrapper, 0);
2495   if(SQ_FAILED(sq_createslot(v, -3))) {
2496     throw SquirrelError(v, "Couldn't register function 'set_black'");
2497   }
2498
2499   sq_pushstring(v, "is_black", -1);
2500   sq_newclosure(v, &DisplayEffect_is_black_wrapper, 0);
2501   if(SQ_FAILED(sq_createslot(v, -3))) {
2502     throw SquirrelError(v, "Couldn't register function 'is_black'");
2503   }
2504
2505   sq_pushstring(v, "sixteen_to_nine", -1);
2506   sq_newclosure(v, &DisplayEffect_sixteen_to_nine_wrapper, 0);
2507   if(SQ_FAILED(sq_createslot(v, -3))) {
2508     throw SquirrelError(v, "Couldn't register function 'sixteen_to_nine'");
2509   }
2510
2511   sq_pushstring(v, "four_to_three", -1);
2512   sq_newclosure(v, &DisplayEffect_four_to_three_wrapper, 0);
2513   if(SQ_FAILED(sq_createslot(v, -3))) {
2514     throw SquirrelError(v, "Couldn't register function 'four_to_three'");
2515   }
2516
2517   if(SQ_FAILED(sq_createslot(v, -3))) {
2518     throw SquirrelError(v, "Couldn't register class 'DisplayEffect'");
2519   }
2520
2521   // Register class Camera
2522   sq_pushstring(v, "Camera", -1);
2523   if(sq_newclass(v, SQFalse) < 0) {
2524     std::ostringstream msg;
2525     msg << "Couldn't create new class 'Camera'";
2526     throw SquirrelError(v, msg.str());
2527   }
2528   sq_pushstring(v, "shake", -1);
2529   sq_newclosure(v, &Camera_shake_wrapper, 0);
2530   if(SQ_FAILED(sq_createslot(v, -3))) {
2531     throw SquirrelError(v, "Couldn't register function 'shake'");
2532   }
2533
2534   sq_pushstring(v, "set_pos", -1);
2535   sq_newclosure(v, &Camera_set_pos_wrapper, 0);
2536   if(SQ_FAILED(sq_createslot(v, -3))) {
2537     throw SquirrelError(v, "Couldn't register function 'set_pos'");
2538   }
2539
2540   sq_pushstring(v, "set_mode", -1);
2541   sq_newclosure(v, &Camera_set_mode_wrapper, 0);
2542   if(SQ_FAILED(sq_createslot(v, -3))) {
2543     throw SquirrelError(v, "Couldn't register function 'set_mode'");
2544   }
2545
2546   sq_pushstring(v, "scroll_to", -1);
2547   sq_newclosure(v, &Camera_scroll_to_wrapper, 0);
2548   if(SQ_FAILED(sq_createslot(v, -3))) {
2549     throw SquirrelError(v, "Couldn't register function 'scroll_to'");
2550   }
2551
2552   if(SQ_FAILED(sq_createslot(v, -3))) {
2553     throw SquirrelError(v, "Couldn't register class 'Camera'");
2554   }
2555
2556   // Register class Level
2557   sq_pushstring(v, "Level", -1);
2558   if(sq_newclass(v, SQFalse) < 0) {
2559     std::ostringstream msg;
2560     msg << "Couldn't create new class 'Level'";
2561     throw SquirrelError(v, msg.str());
2562   }
2563   sq_pushstring(v, "finish", -1);
2564   sq_newclosure(v, &Level_finish_wrapper, 0);
2565   if(SQ_FAILED(sq_createslot(v, -3))) {
2566     throw SquirrelError(v, "Couldn't register function 'finish'");
2567   }
2568
2569   sq_pushstring(v, "spawn", -1);
2570   sq_newclosure(v, &Level_spawn_wrapper, 0);
2571   if(SQ_FAILED(sq_createslot(v, -3))) {
2572     throw SquirrelError(v, "Couldn't register function 'spawn'");
2573   }
2574
2575   sq_pushstring(v, "flip_vertically", -1);
2576   sq_newclosure(v, &Level_flip_vertically_wrapper, 0);
2577   if(SQ_FAILED(sq_createslot(v, -3))) {
2578     throw SquirrelError(v, "Couldn't register function 'flip_vertically'");
2579   }
2580
2581   if(SQ_FAILED(sq_createslot(v, -3))) {
2582     throw SquirrelError(v, "Couldn't register class 'Level'");
2583   }
2584
2585   // Register class ScriptedObject
2586   sq_pushstring(v, "ScriptedObject", -1);
2587   if(sq_newclass(v, SQFalse) < 0) {
2588     std::ostringstream msg;
2589     msg << "Couldn't create new class 'ScriptedObject'";
2590     throw SquirrelError(v, msg.str());
2591   }
2592   sq_pushstring(v, "set_action", -1);
2593   sq_newclosure(v, &ScriptedObject_set_action_wrapper, 0);
2594   if(SQ_FAILED(sq_createslot(v, -3))) {
2595     throw SquirrelError(v, "Couldn't register function 'set_action'");
2596   }
2597
2598   sq_pushstring(v, "get_action", -1);
2599   sq_newclosure(v, &ScriptedObject_get_action_wrapper, 0);
2600   if(SQ_FAILED(sq_createslot(v, -3))) {
2601     throw SquirrelError(v, "Couldn't register function 'get_action'");
2602   }
2603
2604   sq_pushstring(v, "move", -1);
2605   sq_newclosure(v, &ScriptedObject_move_wrapper, 0);
2606   if(SQ_FAILED(sq_createslot(v, -3))) {
2607     throw SquirrelError(v, "Couldn't register function 'move'");
2608   }
2609
2610   sq_pushstring(v, "set_pos", -1);
2611   sq_newclosure(v, &ScriptedObject_set_pos_wrapper, 0);
2612   if(SQ_FAILED(sq_createslot(v, -3))) {
2613     throw SquirrelError(v, "Couldn't register function 'set_pos'");
2614   }
2615
2616   sq_pushstring(v, "get_pos_x", -1);
2617   sq_newclosure(v, &ScriptedObject_get_pos_x_wrapper, 0);
2618   if(SQ_FAILED(sq_createslot(v, -3))) {
2619     throw SquirrelError(v, "Couldn't register function 'get_pos_x'");
2620   }
2621
2622   sq_pushstring(v, "get_pos_y", -1);
2623   sq_newclosure(v, &ScriptedObject_get_pos_y_wrapper, 0);
2624   if(SQ_FAILED(sq_createslot(v, -3))) {
2625     throw SquirrelError(v, "Couldn't register function 'get_pos_y'");
2626   }
2627
2628   sq_pushstring(v, "set_velocity", -1);
2629   sq_newclosure(v, &ScriptedObject_set_velocity_wrapper, 0);
2630   if(SQ_FAILED(sq_createslot(v, -3))) {
2631     throw SquirrelError(v, "Couldn't register function 'set_velocity'");
2632   }
2633
2634   sq_pushstring(v, "get_velocity_x", -1);
2635   sq_newclosure(v, &ScriptedObject_get_velocity_x_wrapper, 0);
2636   if(SQ_FAILED(sq_createslot(v, -3))) {
2637     throw SquirrelError(v, "Couldn't register function 'get_velocity_x'");
2638   }
2639
2640   sq_pushstring(v, "get_velocity_y", -1);
2641   sq_newclosure(v, &ScriptedObject_get_velocity_y_wrapper, 0);
2642   if(SQ_FAILED(sq_createslot(v, -3))) {
2643     throw SquirrelError(v, "Couldn't register function 'get_velocity_y'");
2644   }
2645
2646   sq_pushstring(v, "set_visible", -1);
2647   sq_newclosure(v, &ScriptedObject_set_visible_wrapper, 0);
2648   if(SQ_FAILED(sq_createslot(v, -3))) {
2649     throw SquirrelError(v, "Couldn't register function 'set_visible'");
2650   }
2651
2652   sq_pushstring(v, "is_visible", -1);
2653   sq_newclosure(v, &ScriptedObject_is_visible_wrapper, 0);
2654   if(SQ_FAILED(sq_createslot(v, -3))) {
2655     throw SquirrelError(v, "Couldn't register function 'is_visible'");
2656   }
2657
2658   sq_pushstring(v, "get_name", -1);
2659   sq_newclosure(v, &ScriptedObject_get_name_wrapper, 0);
2660   if(SQ_FAILED(sq_createslot(v, -3))) {
2661     throw SquirrelError(v, "Couldn't register function 'get_name'");
2662   }
2663
2664   if(SQ_FAILED(sq_createslot(v, -3))) {
2665     throw SquirrelError(v, "Couldn't register class 'ScriptedObject'");
2666   }
2667
2668   // Register class Sound
2669   sq_pushstring(v, "Sound", -1);
2670   if(sq_newclass(v, SQFalse) < 0) {
2671     std::ostringstream msg;
2672     msg << "Couldn't create new class 'Sound'";
2673     throw SquirrelError(v, msg.str());
2674   }
2675   sq_pushstring(v, "play_music", -1);
2676   sq_newclosure(v, &Sound_play_music_wrapper, 0);
2677   if(SQ_FAILED(sq_createslot(v, -3))) {
2678     throw SquirrelError(v, "Couldn't register function 'play_music'");
2679   }
2680
2681   sq_pushstring(v, "play", -1);
2682   sq_newclosure(v, &Sound_play_wrapper, 0);
2683   if(SQ_FAILED(sq_createslot(v, -3))) {
2684     throw SquirrelError(v, "Couldn't register function 'play'");
2685   }
2686
2687   if(SQ_FAILED(sq_createslot(v, -3))) {
2688     throw SquirrelError(v, "Couldn't register class 'Sound'");
2689   }
2690
2691   // Register class Text
2692   sq_pushstring(v, "Text", -1);
2693   if(sq_newclass(v, SQFalse) < 0) {
2694     std::ostringstream msg;
2695     msg << "Couldn't create new class 'Text'";
2696     throw SquirrelError(v, msg.str());
2697   }
2698   sq_pushstring(v, "set_text", -1);
2699   sq_newclosure(v, &Text_set_text_wrapper, 0);
2700   if(SQ_FAILED(sq_createslot(v, -3))) {
2701     throw SquirrelError(v, "Couldn't register function 'set_text'");
2702   }
2703
2704   sq_pushstring(v, "set_font", -1);
2705   sq_newclosure(v, &Text_set_font_wrapper, 0);
2706   if(SQ_FAILED(sq_createslot(v, -3))) {
2707     throw SquirrelError(v, "Couldn't register function 'set_font'");
2708   }
2709
2710   sq_pushstring(v, "fade_in", -1);
2711   sq_newclosure(v, &Text_fade_in_wrapper, 0);
2712   if(SQ_FAILED(sq_createslot(v, -3))) {
2713     throw SquirrelError(v, "Couldn't register function 'fade_in'");
2714   }
2715
2716   sq_pushstring(v, "fade_out", -1);
2717   sq_newclosure(v, &Text_fade_out_wrapper, 0);
2718   if(SQ_FAILED(sq_createslot(v, -3))) {
2719     throw SquirrelError(v, "Couldn't register function 'fade_out'");
2720   }
2721
2722   sq_pushstring(v, "set_visible", -1);
2723   sq_newclosure(v, &Text_set_visible_wrapper, 0);
2724   if(SQ_FAILED(sq_createslot(v, -3))) {
2725     throw SquirrelError(v, "Couldn't register function 'set_visible'");
2726   }
2727
2728   sq_pushstring(v, "set_centered", -1);
2729   sq_newclosure(v, &Text_set_centered_wrapper, 0);
2730   if(SQ_FAILED(sq_createslot(v, -3))) {
2731     throw SquirrelError(v, "Couldn't register function 'set_centered'");
2732   }
2733
2734   if(SQ_FAILED(sq_createslot(v, -3))) {
2735     throw SquirrelError(v, "Couldn't register class 'Text'");
2736   }
2737
2738   // Register class Player
2739   sq_pushstring(v, "Player", -1);
2740   if(sq_newclass(v, SQFalse) < 0) {
2741     std::ostringstream msg;
2742     msg << "Couldn't create new class 'Player'";
2743     throw SquirrelError(v, msg.str());
2744   }
2745   sq_pushstring(v, "add_bonus", -1);
2746   sq_newclosure(v, &Player_add_bonus_wrapper, 0);
2747   if(SQ_FAILED(sq_createslot(v, -3))) {
2748     throw SquirrelError(v, "Couldn't register function 'add_bonus'");
2749   }
2750
2751   sq_pushstring(v, "add_coins", -1);
2752   sq_newclosure(v, &Player_add_coins_wrapper, 0);
2753   if(SQ_FAILED(sq_createslot(v, -3))) {
2754     throw SquirrelError(v, "Couldn't register function 'add_coins'");
2755   }
2756
2757   sq_pushstring(v, "make_invincible", -1);
2758   sq_newclosure(v, &Player_make_invincible_wrapper, 0);
2759   if(SQ_FAILED(sq_createslot(v, -3))) {
2760     throw SquirrelError(v, "Couldn't register function 'make_invincible'");
2761   }
2762
2763   sq_pushstring(v, "deactivate", -1);
2764   sq_newclosure(v, &Player_deactivate_wrapper, 0);
2765   if(SQ_FAILED(sq_createslot(v, -3))) {
2766     throw SquirrelError(v, "Couldn't register function 'deactivate'");
2767   }
2768
2769   sq_pushstring(v, "activate", -1);
2770   sq_newclosure(v, &Player_activate_wrapper, 0);
2771   if(SQ_FAILED(sq_createslot(v, -3))) {
2772     throw SquirrelError(v, "Couldn't register function 'activate'");
2773   }
2774
2775   sq_pushstring(v, "walk", -1);
2776   sq_newclosure(v, &Player_walk_wrapper, 0);
2777   if(SQ_FAILED(sq_createslot(v, -3))) {
2778     throw SquirrelError(v, "Couldn't register function 'walk'");
2779   }
2780
2781   sq_pushstring(v, "set_visible", -1);
2782   sq_newclosure(v, &Player_set_visible_wrapper, 0);
2783   if(SQ_FAILED(sq_createslot(v, -3))) {
2784     throw SquirrelError(v, "Couldn't register function 'set_visible'");
2785   }
2786
2787   sq_pushstring(v, "get_visible", -1);
2788   sq_newclosure(v, &Player_get_visible_wrapper, 0);
2789   if(SQ_FAILED(sq_createslot(v, -3))) {
2790     throw SquirrelError(v, "Couldn't register function 'get_visible'");
2791   }
2792
2793   if(SQ_FAILED(sq_createslot(v, -3))) {
2794     throw SquirrelError(v, "Couldn't register class 'Player'");
2795   }
2796
2797   // Register class FloatingImage
2798   sq_pushstring(v, "FloatingImage", -1);
2799   if(sq_newclass(v, SQFalse) < 0) {
2800     std::ostringstream msg;
2801     msg << "Couldn't create new class 'FloatingImage'";
2802     throw SquirrelError(v, msg.str());
2803   }
2804   sq_pushstring(v, "constructor", -1);
2805   sq_newclosure(v, &FloatingImage_constructor_wrapper, 0);
2806   if(SQ_FAILED(sq_createslot(v, -3))) {
2807     throw SquirrelError(v, "Couldn't register function 'constructor'");
2808   }
2809
2810   sq_pushstring(v, "set_layer", -1);
2811   sq_newclosure(v, &FloatingImage_set_layer_wrapper, 0);
2812   if(SQ_FAILED(sq_createslot(v, -3))) {
2813     throw SquirrelError(v, "Couldn't register function 'set_layer'");
2814   }
2815
2816   sq_pushstring(v, "get_layer", -1);
2817   sq_newclosure(v, &FloatingImage_get_layer_wrapper, 0);
2818   if(SQ_FAILED(sq_createslot(v, -3))) {
2819     throw SquirrelError(v, "Couldn't register function 'get_layer'");
2820   }
2821
2822   sq_pushstring(v, "set_pos", -1);
2823   sq_newclosure(v, &FloatingImage_set_pos_wrapper, 0);
2824   if(SQ_FAILED(sq_createslot(v, -3))) {
2825     throw SquirrelError(v, "Couldn't register function 'set_pos'");
2826   }
2827
2828   sq_pushstring(v, "get_pos_x", -1);
2829   sq_newclosure(v, &FloatingImage_get_pos_x_wrapper, 0);
2830   if(SQ_FAILED(sq_createslot(v, -3))) {
2831     throw SquirrelError(v, "Couldn't register function 'get_pos_x'");
2832   }
2833
2834   sq_pushstring(v, "get_pos_y", -1);
2835   sq_newclosure(v, &FloatingImage_get_pos_y_wrapper, 0);
2836   if(SQ_FAILED(sq_createslot(v, -3))) {
2837     throw SquirrelError(v, "Couldn't register function 'get_pos_y'");
2838   }
2839
2840   sq_pushstring(v, "set_anchor_point", -1);
2841   sq_newclosure(v, &FloatingImage_set_anchor_point_wrapper, 0);
2842   if(SQ_FAILED(sq_createslot(v, -3))) {
2843     throw SquirrelError(v, "Couldn't register function 'set_anchor_point'");
2844   }
2845
2846   sq_pushstring(v, "get_anchor_point", -1);
2847   sq_newclosure(v, &FloatingImage_get_anchor_point_wrapper, 0);
2848   if(SQ_FAILED(sq_createslot(v, -3))) {
2849     throw SquirrelError(v, "Couldn't register function 'get_anchor_point'");
2850   }
2851
2852   sq_pushstring(v, "set_visible", -1);
2853   sq_newclosure(v, &FloatingImage_set_visible_wrapper, 0);
2854   if(SQ_FAILED(sq_createslot(v, -3))) {
2855     throw SquirrelError(v, "Couldn't register function 'set_visible'");
2856   }
2857
2858   sq_pushstring(v, "get_visible", -1);
2859   sq_newclosure(v, &FloatingImage_get_visible_wrapper, 0);
2860   if(SQ_FAILED(sq_createslot(v, -3))) {
2861     throw SquirrelError(v, "Couldn't register function 'get_visible'");
2862   }
2863
2864   if(SQ_FAILED(sq_createslot(v, -3))) {
2865     throw SquirrelError(v, "Couldn't register class 'FloatingImage'");
2866   }
2867
2868 }
2869
2870 } // end of namespace Scripting
2871