KSG-Script/ksgScript/Main/Einstieg.cpp

#include "KSGScriptObj.h"
#include "../Editor/Editor.h"
#include "../Befehl/KSGSKlasse.h"
#include "../Klassen/KSGSBild.h"

using namespace KSGScript;

extern "C"
{
	__declspec( dllexport ) KSGScriptObj *GetNewKSGScriptObj()
	{
		return new KSGScriptO();
	}

    __declspec( dllexport ) KSGScriptEditor *GetNewKSGEditorObj()
    {
        return new Editor();
    }

	__declspec( dllexport ) KSGSVariable *GetNewKSGSVariable( KSGScriptObj *zObj, KSGSVariableDef *def )
	{
		return KSGSKlasseInstanz::erstellVariable( zObj, def );
	}

	__declspec( dllexport ) void SetKSGSBildVariable( KSGSVariable *zBv, Bild *b )
	{
		if( !b )
			return;
		if( zBv->getTyp() != KSGS_BILD )
		{
			b->release();
			return;
		}
		( (KSGSBildKlasse*)zBv )->set( b );
	}
}