Einstieg.cpp 929 B

1234567891011121314151617181920212223242526272829303132333435363738394041
  1. #include "KSGScriptObj.h"
  2. #include "../Editor/Editor.h"
  3. #include "../Befehl/KSGSKlasse.h"
  4. #include "../Klassen/KSGSBild.h"
  5. #include "../Main/KSGSExpressionEvaluator.h"
  6. using namespace KSGScript;
  7. extern "C"
  8. {
  9. __declspec( dllexport ) KSGScriptObj *GetNewKSGScriptObj()
  10. {
  11. return new KSGScriptO();
  12. }
  13. __declspec( dllexport ) KSGScriptEditor *GetNewKSGEditorObj()
  14. {
  15. return new Editor();
  16. }
  17. __declspec( dllexport ) KSGSVariable *GetNewKSGSVariable( KSGScriptObj *zObj, KSGSVariableDef *def )
  18. {
  19. return KSGSKlasseInstanz::erstellVariable( zObj, def );
  20. }
  21. __declspec( dllexport ) KSGSExpressionEvaluator *GetNewKSGSExpressionEvaluator()
  22. {
  23. return new KSGSExpressionEvaluatorImpl();
  24. }
  25. __declspec( dllexport ) void SetKSGSBildVariable( KSGSVariable *zBv, Bild *b )
  26. {
  27. if( !b )
  28. return;
  29. if( zBv->getTyp() != KSGS_BILD )
  30. {
  31. b->release();
  32. return;
  33. }
  34. ( (KSGSBildKlasse*)zBv )->set( b );
  35. }
  36. }