Как подключиться в процессу Warcraft'a 3, через Visual Studio.

#include <windows.h>

typedef int LongBool;
typedef void *Pointer;
typedef char *PChar;
typedef bool Boolean;
typedef int Integer;
typedef char* String;
typedef float Single;
typedef void procedure;
typedef long longword;
typedef float *PSingle;

const wchar_t JASS_API_DLL_NAME[] = L"JassApi.dll";

typedef void *PJassString;
typedef longword TJassStringHandle;
typedef longword TJassObjectHandle;
typedef longword TJassFunctionHandle;

typedef longword TJassHandle;

typedef Pointer TCode;
typedef TJassHandle HAGENT;
typedef HAGENT HEVENT;
typedef HAGENT HPLAYER;
typedef HAGENT HWIDGET;
typedef HWIDGET HUNIT;

typedef Pointer (__stdcall *pGetJassNative)(PChar Name);
typedef LongBool (__stdcall *pRegisterJassNative) (PChar Name, PChar Signature, Pointer Address);

HUNIT CreateUnit(HPLAYER id, Integer unitid, Single x, Single y, Single face);
HPLAYER Player(Integer number);

pGetJassNative GetJassNative = NULL;
pRegisterJassNative RegisterJassNative = NULL;

bool fRegistrJassApi();
bool fRegistrNatives();

void fTest_Debug();

// Наша функция
void fTest_Debug()
{
	int vvi;
	HPLAYER vRedPlayer = Player(0);// Берём id игрока
	Integer vId_Unit;
	vId_Unit = 'hpea';//1096173142;	// Пристваеваем id юнита(рабочего)
	CreateUnit(vRedPlayer,vId_Unit,0,0,0);
	CreateUnit(Player(1),vId_Unit,1400,1400,0);
	// Делаем квадрат из юнитов по координатам x и y
	for (vvi = 0; vvi < 12; vvi++)
	{
		CreateUnit(vRedPlayer,vId_Unit,-200+vvi*32,200,0);//слева на право
	}
	for (vvi = 0; vvi < 12; vvi++)
	{
		CreateUnit(vRedPlayer,vId_Unit,200,200-vvi*32,0);//сверху вниз
	}
	for (vvi = 12; vvi > 0; vvi--)
	{
		CreateUnit(vRedPlayer,vId_Unit,200-vvi*32,-200,0);//справо на лево
	}
	for (vvi = 12; vvi > 0; vvi--)
	{
		CreateUnit(vRedPlayer,vId_Unit,-200,-200+vvi*32,0);//снизу вверх
	}
}

// Функция кторая будет запускаться при запуске варкрафта
BOOL APIENTRY DllMain(HMODULE hModule, DWORD  ul_reason_for_call, LPVOID lpReserved)
{
	if (ul_reason_for_call != DLL_PROCESS_ATTACH) return TRUE;
	DisableThreadLibraryCalls(hModule);

	if (fRegistrJassApi() == FALSE) return TRUE;
	if (fRegistrNatives() == FALSE) return TRUE;

	RegisterJassNative("fTest_Debug", "()V",(void *)fTest_Debug);// Регистрация нативки в варкрафте

	return TRUE;
}

bool fRegistrJassApi()
{
	HMODULE hJassApi = GetModuleHandle(JASS_API_DLL_NAME);
	if(!hJassApi) return FALSE;

	GetJassNative = (pGetJassNative)GetProcAddress(hJassApi, "GetJassNative");
	if(!GetJassNative) return FALSE;

	RegisterJassNative = (pRegisterJassNative)GetProcAddress(hJassApi, "RegisterJassNative");
	if(!RegisterJassNative) return FALSE;

	return TRUE;
}

HUNIT (__cdecl *_CreateUnit) (HPLAYER id, Integer unitid, PSingle x, PSingle y, PSingle face);
HPLAYER (__cdecl *_Player) (Integer number);

bool fRegistrNatives()
{
	*((int*)&_CreateUnit) = (int)GetJassNative("CreateUnit");
	*((int*)&_Player) = (int)GetJassNative("Player");

	return TRUE;
}

HUNIT CreateUnit(HPLAYER id, Integer unitid, Single x, Single y, Single face)
{
	return _CreateUnit(id, unitid, &x, &y, &face);
}

HPLAYER Player(Integer number)
{
	return _Player(number);
}