#include <windows.h>

signed long  _stdcall StdVar_Byte    (unsigned char     ByValValue,    unsigned char    *ByRefValue);
signed long  _stdcall StdVar_Integer (signed short int  ByValValue,    signed short int *ByRefValue);
signed long  _stdcall StdVar_Long    (signed long       ByValValue,    signed long      *ByRefValue);
signed long  _stdcall StdVar_Double  (double		    ByValValue,    double           *ByRefValue);
signed long  _stdcall StdVar_String  (char			    ByValValue[]);
signed long  _stdcall StdVar_Struktur(struct Struktur  *ByRefValue);
signed long  _stdcall Field_Byte     (unsigned char	    Field[],       signed long       nCount);
signed long  _stdcall Field_Integer  (signed short int  Field[],       signed long       nCount);
signed long  _stdcall Field_Long     (signed long 	    Field[],       signed long       nCount);
signed long  _stdcall CheckLicense   (signed long p1,signed long p2,char strP[]);

struct Struktur
{
	long x;
	char y;
};

//------------------------------------------------------------------------
// Die folgende Funktion unverändert belassen

BOOL WINAPI DllEntryPoint ( HINSTANCE hDLL, DWORD dwREASON, LPVOID Reserved )
{
	switch (dwREASON)
    { 
		case DLL_PROCESS_ATTACH: {
									break; 
								 }
		
		case DLL_PROCESS_DETACH: {
									break; 
								 } 		 
    }
	return TRUE;
}

//------------------------------------------------------------------------

signed long _stdcall StdVar_Byte (unsigned char ByValValue, char *ByRefValue)
{
	ByValValue++;
	*ByRefValue = *ByRefValue + 2;
	return (ByValValue);
}

//------------------------------------------------------------------------

signed long _stdcall StdVar_Integer (signed short int    ByValValue,    short int *ByRefValue)
{
	ByValValue++;
	*ByRefValue = *ByRefValue + 2;
	return (ByValValue);
}

//------------------------------------------------------------------------

signed long _stdcall StdVar_Long (signed long ByValValue, long *ByRefValue)
{
	ByValValue++;
	*ByRefValue = *ByRefValue + 2;
	return (ByValValue);
}

//------------------------------------------------------------------------

signed long _stdcall StdVar_Double (double ByValValue, double *ByRefValue)
{
	ByValValue++;
	*ByRefValue = *ByRefValue + 0.01;
	return (ByValValue);
}

//------------------------------------------------------------------------

signed long _stdcall StdVar_String  (char ByValValue[])
{
	
	int x;
		
		x=0;
		do
		{
			ByValValue[x]++;
			x++;
		}
		while (ByValValue[x]);

		return (x);
}

//------------------------------------------------------------------------


signed long  _stdcall StdVar_Struktur (struct Struktur *ByRefValue)
{
	(*ByRefValue).x += 11;
	(*ByRefValue).y += 1;
	return((*ByRefValue).x + (*ByRefValue).y);
}

//------------------------------------------------------------------------


signed long _stdcall Field_Byte (unsigned char Field[], long nCount)
{
	signed long Sum, z;

		Sum = 0;
		
		for (z = 0;z <= nCount; z++)
		{
			Field[z] +=1;
			Sum += Field[z];
		}
		
		return (Sum);
}

//------------------------------------------------------------------------

signed long _stdcall Field_Integer (signed short int Field[], long nCount)
{
	signed long Sum, z;

		Sum = 0;
		
		for (z = 0; z <= nCount; z++)
		{
			Field[z] += 1;
			Sum += Field[z];
		}
		
		return (Sum);
}

//------------------------------------------------------------------------

signed long _stdcall Field_Long (signed long Field[], long nCount)
{
	signed long Sum, z;

		Sum = 0;
		
		for (z = 0;z <= nCount; z++)
		{
			Field[z] += 1;
			Sum += Field[z];
		}
		
		return (Sum);
}
signed long _stdcall CheckLicense (signed long p1,signed long p2,char strP[])
{
short int x;
        //  ;))
	x=1;
	return (x);
}