util.cpp

#include "stdafx.h"
#include <time.h>
#include <string>
#include <map>
#include <iostream>
/*
Èññëåäîâàòü:
+) Ïîÿâëåíèå îáåëèñêîâ
) Ðåñïàâíû þíèòîâ
+.) Ñâîéñòâà ñòåí
+) Áàôôû îðóæèÿ/áðîíè (èññëåäîâàë íî íå ìîãó ïðèìåíÿòü)

Eùå ïîïðàâêè
+1) ×òîáû þíèò ìîæíî áûëî äâèãàòü
+2) ×òáû þíèò ìîæíî áûëî ïíóòü â ñòîðîíó
) îïðåäåëåíèå òèïà è ñàáòèïà
+3) äîáàâèòü ôóíêöèþ äëÿ êàðòû, âåäóùóþ â þíèìîä
4) ÷òîáû îíà ìîãëà ÷èòàòü/ïèñàòü ïåðåìåííûå ïî èìåíàì
+5) ñåòåâîé ïàêåò

-) ñäåëàòü â êîíñîëè áîëüøå ìåñòî äëÿ èíôû, à òî ïîñëå ñêàíà âñå è íå íàéäåøü, ïîòåðÿåòüñÿ
-) ñäåëàòü òàê ÷òî áû ïðè íàïèñàíèè òåñòà â êîíñîëè áûëè êîïèïàñò õîòÿ áû)
+) ÷òî áû ïî ýòîìó òåêñòó ìîæíî áûëî ïåðìåùàòüñÿ ñòðåëîñêàìè, à òî óäàëÿëÿòü 300 ñèìáîëîâ ÷òî áû èñïðàâèòü 1 îøèáêó íå óäîáíî...

*/

#define AddCodeLine(a,b) conPrintI(a)

typedef unsigned int u_int;
void *(__cdecl *noxCAlloc)(int NumElements,int Size);
void *(__cdecl *noxAlloc)(int Size);
void (__cdecl *noxFree)(void *Ptr);

int (__cdecl *consolePrint)(int Color, wchar_t *Text);
extern bool serverUpdate();
extern char authSendWelcomeMsg[0x20];
extern void netSendChatMessage(char *sendChat, int sendTo, short sendFrom=0, bool fakeSystemMessage=false);
extern byte authorisedState[0x20];
extern bool specialAuthorisation; //Îòêëþ÷åíèå àëüòåðíàòèâíîé àâòîðèçàöèè

u_int hostIdx = 0x1F;

extern void replayEachFrame();

char* gameDirectory;

int (__cdecl *initWindowedModeNox)(int param1, int param2, int param3);

float* frameLimiterSetting;

int (__cdecl *j_time)();

void(__cdecl *consoleTokenCipher)(wchar_t* source, wchar_t* dest);

using namespace std;

wchar_t* tokenParseFixup(wchar_t* Dest, wchar_t* Source)
{
	return wcsncpy(Dest, Source, 31);
}

void tokenParseCipherFixup(wchar_t* Source, wchar_t* Dest)
{
	wchar_t adjustedToken[32];
	adjustedToken[31] = L'\0';
	tokenParseFixup(adjustedToken, Source);
	consoleTokenCipher(adjustedToken, Dest);
}

int frameLimiter(lua_State* L)
{
	byte* bt = (byte*)(0x0043E2F3+1);
	byte* bt2 = (byte*)(0x004AB609+1);
	if(lua_type(L,1)==LUA_TNUMBER)
	{
		float limiterFPS = (float)lua_tonumber(L,1);
		*frameLimiterSetting = 1000 / limiterFPS;
		// Begin of Black Shaman
		float* frameLimiterSetting2 = (float*)0x00594498;
		*frameLimiterSetting2 = *frameLimiterSetting/1000;
		int *frameCounterTest=(int*)0x0062F1D0;
		int *frameCounterTest2=(int*)0x0084EA04;
		int *frameCounterTest3=(int*)0x0062F1C8;
		*frameCounterTest = *frameCounterTest2;
		*frameCounterTest3 = j_time();

		DWORD OldProtect;
		VirtualProtect(bt,1,PAGE_EXECUTE_READWRITE,&OldProtect);
		*bt=(byte)limiterFPS;
		VirtualProtect(bt,1,OldProtect,&OldProtect);

		VirtualProtect(bt2,1,PAGE_EXECUTE_READWRITE,&OldProtect);
		*bt2=(byte)limiterFPS;
		VirtualProtect(bt2,1,OldProtect,&OldProtect);
		
		// End of Black Shaman
	}
	lua_pushnumber(L, *bt);
	return 1;
}

string getGameDirectory()
{
	u_int size = GetFullPathName(gameDirectory, 0, NULL, NULL);
	char* buf = new char[size];
	GetFullPathName(gameDirectory, size, buf, NULL);
	string result = buf;
	return result;
}

int getGameDirectoryL(lua_State *L)
{
	lua_pushstring(L, getGameDirectory().c_str());
	return 1;
}

string getNormalizedPath(const char* path)
{
	u_int size = GetFullPathName(path, 0, NULL, NULL);
	char* buf = new char[size];
	SetCurrentDirectory(getGameDirectory().c_str());
	GetFullPathName(path, size, buf, NULL);
	string result = buf;
	delete [] buf;
	return result;
}

int getNormalizedPathL(lua_State *L)
{
	if (lua_type(L,1)==LUA_TSTRING)
	{
		lua_pushstring(L, getNormalizedPath(lua_tostring(L, 1)).c_str());
		return 1;
	}
	else
	{
		lua_pushstring(L,"wrong args!");
		lua_error_(L);
	}
}

bool isDirectory(string dirName)
{
	DWORD attribs = GetFileAttributes(dirName.c_str());
	if (attribs == INVALID_FILE_ATTRIBUTES)
	{
		return false;
	}
	return (attribs & FILE_ATTRIBUTE_DIRECTORY);
}

map<int,WIN32_FIND_DATA> getDirectoryListing(const char* path)
{
	//string directoryPath = getNormalizedPath(path);
	string directoryPath = path;
	map<int,WIN32_FIND_DATA> results;
	if(isDirectory(directoryPath))
	{
		string directoryPathSearch = directoryPath;
		WIN32_FIND_DATA ffd;
		HANDLE hFind = INVALID_HANDLE_VALUE;
		directoryPathSearch.append("\\*");
		directoryPathSearch=getNormalizedPath(directoryPathSearch.c_str());
		hFind = FindFirstFile(directoryPathSearch.c_str(), &ffd);
		do
		{
			/*string filePath = directoryPath;
			filePath.append("\\");
			filePath.append(ffd.cFileName);
			bool directory = isDirectory(getNormalizedPath(filePath.c_str()));*/
			results.insert(pair<int,WIN32_FIND_DATA>(results.size()+1, ffd));
		}
		while(FindNextFile(hFind, &ffd) != 0);
	}
	return results;
}

int getDirectoryListingL(lua_State *L)
{
	if (lua_type(L,1)==LUA_TSTRING)
	{
		string directoryPath = getNormalizedPath(lua_tostring(L, 1));
		map<int,WIN32_FIND_DATA> listing = getDirectoryListing(directoryPath.c_str());
		if(listing.size()>0)
		{
			lua_settop(L,2);
			lua_newtable(L);
			for (map<int,WIN32_FIND_DATA>::const_iterator iter = listing.begin(); iter != listing.end(); ++iter)
			{
				string filePath = directoryPath;
				filePath.append("\\");
				filePath.append(iter->second.cFileName);
				bool directory = isDirectory(getNormalizedPath(filePath.c_str()));
				LARGE_INTEGER filesize;
				filesize.HighPart=iter->second.nFileSizeHigh;
				filesize.LowPart=iter->second.nFileSizeLow;
				lua_newtable(L);

				lua_pushstring(L,iter->second.cFileName);
				lua_setfield(L,-2,"name");
				lua_pushboolean(L,directory);
				lua_setfield(L,-2,"directory");
				lua_pushinteger(L,filesize.QuadPart);
				lua_setfield(L,-2,"size");
				
				lua_pushinteger(L,iter->first);
				lua_pushvalue(L,-2);
				lua_settable(L,3);
				lua_settop(L,3);
			}
			return 1;
		}
		else
		{
			lua_pushstring(L,"not a directory!");
			lua_error_(L);
		}
		
	}
	else
	{
		lua_pushstring(L,"wrong args!");
		lua_error_(L);
	}
}


char *copyString(const char *Str)
{
	if (Str==NULL)
		return NULL;
	char *Ret=(char*)noxAlloc(strlen(Str)+1);
	strcpy(Ret,Str);
	return Ret;
}
wchar_t *copyStringW(const char *Str)
{
	if (Str==NULL)
		return NULL;
	wchar_t *Ret=(wchar_t *)noxAlloc(2*(strlen(Str)+1));
	mbstowcs(Ret,Str,strlen(Str)+1);
	return Ret;
}
namespace
{
	int lastConColor=2;
}
void conSetNextColor(int C)
{
	lastConColor=C;
}
void conPrintI(const char *S)
{
	wchar_t Buf[200];
	if(200==mbstowcs(Buf,S,200))
		return;
	consolePrint(lastConColor,Buf);//3-white
	if (lastConColor!=2)
		lastConColor=2;
};
int (__cdecl *printCentered)(wchar_t *Text);
void printI(const char *S)
{
	wchar_t Buf[200];
	if(200==mbstowcs(Buf,S,200))
		return;
	printCentered(Buf);
};
DWORD *GameFlags=(DWORD*)0x5D53A4;
int setGameFlagsL(lua_State *L)
{
	DWORD Old=*GameFlags;
	if(lua_type(L,1)==LUA_TNUMBER)
		*GameFlags=(DWORD)lua_tointeger(L,1);
	lua_pushnumber(L,Old);
	return 1;
}
int bitOrL(lua_State *L)
{
	unsigned int R;
	if(lua_type(L,1)!=LUA_TNUMBER)
		return 0;
	if(lua_type(L,2)!=LUA_TNUMBER)
		return 0;
	R=(lua_tointeger(L,1) | lua_tointeger(L,2)) ;
	lua_pushinteger(L,R);
	return 1;
}
int bitAndL(lua_State *L)
{
	unsigned int R;
	if(lua_type(L,1)!=LUA_TNUMBER)
		return 0;
	if(lua_type(L,2)!=LUA_TNUMBER)
		return 0;
	R=lua_tointeger(L,1) & lua_tointeger(L,2) ;
	lua_pushnumber(L,R);
	return 1;
}

int bitXorL(lua_State *L)
{
	unsigned int R;
	if(lua_type(L,1)!=LUA_TNUMBER)
		return 0;
	if(lua_type(L,2)!=LUA_TNUMBER)
		return 0;
	R=lua_tointeger(L,1) ^ lua_tointeger(L,2) ;
	lua_pushnumber(L,R);
	return 1;
}


int printL(lua_State *L)
{
	int n=lua_gettop(L);
	int i=0;
	TString Rz;
	const char *c;
//	WCHAR Char;
	for(i=1;i<=n;i++)
	{
		lua_pushvalue(L,i);
		c=lua_tostring(L,-1);
		lua_pop(L,1);
/*		if(c!=NULL)
		{
			while(*c!=0)
			{
				mbtowc(&Char,c,1);
				Rz+=Char;
				c++;
			}
		}*/
		if(c!=NULL)
			Rz.append(c);

		//Rz+=mbstowcs
		//Rz
	}
	lua_Debug ar;
	if (0==lua_getstack (L, 1, &ar))  /// Äîñòàåì ïðîøëóþ ïåðåìåííóþ îêðóæåíèÿ, ÷òîáû ÷èòàòü äàííûå îòòóäà
		lua_pushnil(L);
	else
		lua_getinfo(L, "f", &ar);
    if (!lua_isnil(L, -1)) 
		lua_getfenv(L,-1);
	if (lua_type(L,-1)==LUA_TTABLE)
	{
		lua_getfield(L,-1,"conOutput");
	}
	if (lua_type(L,-1)==LUA_TNIL)
	{
		printI(Rz.c_str());
	}
	else if(lua_type(L,-1)==LUA_TFUNCTION)
	{
		lua_pushlstring(L,Rz.c_str(),Rz.size());
		if (0!=lua_pcall(L,1,0,0))
		{
			Rz.assign("Error in print:");
			Rz.append(lua_tostring(L,-1));
			printI(Rz.c_str());
		}
	}
	else
	{
		lua_getfield(L,-1,"print");
		lua_pushlstring(L,Rz.c_str(),Rz.size());
		if (0!=lua_pcall(L,1,0,0))
		{
			Rz.assign("Error in print:");
			Rz.append(lua_tostring(L,-1));
			printI(Rz.c_str());
		}
	}
	return 0;
}
void InjectJumpTo(DWORD Addr,void *Fn)// Ïèøåì ïî äàííîìó àäðåñó ïåðåõîä íà íàøó ôóíêöèþ
{
	BYTE *To=(BYTE *)Addr; 
	DWORD *Dw=(DWORD*)(To+1);
	DWORD Delta=(DWORD)Fn;
	Delta-=4+(DWORD)Dw;
	DWORD OldProtect;
	VirtualProtect(To,5,PAGE_EXECUTE_READWRITE,&OldProtect);
	*Dw=Delta;
	*(To++)=0xE9;
	VirtualProtect(To,5,OldProtect,&OldProtect);
};
void InjectOffs(DWORD Addr,void *Fn)// Ïèøåì ïî äàííîìó àäðåñó - àäðåñ íàøåé ôóíêöèè c âû÷èñëåíèåì
{
	DWORD *Dw=(DWORD*)(Addr);
	DWORD Delta=(DWORD)Fn;
	Delta-=4+(DWORD)Dw;
	DWORD OldProtect;
	VirtualProtect(Dw,4,PAGE_EXECUTE_READWRITE,&OldProtect);
	*Dw=Delta;
	VirtualProtect(Dw,4,OldProtect,&OldProtect);
}
void InjectAddr(DWORD Addr,void *Fn)// Ïèøåì ïî äàííîìó àäðåñó - àäðåñ íàøåé ôóíêöèè
{
	DWORD *Dw=(DWORD*)(Addr);
	DWORD Delta=(DWORD)Fn;
	DWORD OldProtect;
	VirtualProtect(Dw,4,PAGE_EXECUTE_READWRITE,&OldProtect);
	*Dw=Delta;
	VirtualProtect(Dw,4,OldProtect,&OldProtect);
}
void InjectData(DWORD offset, byte* buff, size_t size)
{
	byte *addr = (byte*)(offset);
	DWORD OldProtect;
	VirtualProtect(addr, size, PAGE_EXECUTE_READWRITE, &OldProtect);
	memcpy(addr, buff, size);
	VirtualProtect(addr, 4, OldProtect, &OldProtect);
}

#include <list>
int (__cdecl *noxGetUnitsInRect)(FloatRect *Rect, void (__cdecl *SomeFn)(void *Unit, void *Arg), void *Arg);

DWORD *frameCounter=(DWORD*)0x0084EA04;
DWORD *idGold=(DWORD*)0x00750714;

#include <vector>
int *scriptStackSize=(int *)0x0075AE40;
std::vector<void *> scriptValues;

int (__cdecl *noxThingTypeByName)(char const *Name);
const char *(__cdecl *noxThingNameByType)(int Type);

namespace 
{

	void (__cdecl *oldCreateAtPart)();
	void __cdecl noxMyCreateAt(unitBigStructPtr Obj,unitBigStructPtr Parent, float X,float Y)
	{
		__asm{   
			push Y
			push X
			push Parent
			push Obj
			push offset l1
			mov eax,0x00750714
			mov eax,[eax]
			jmp oldCreateAtPart
	l1:
			add esp,16 // 4-å ïàðàìåòðà
		}
		lua_getglobal(L,"noxOnCreateAt");
		if(lua_type(L,-1)!=LUA_TFUNCTION)
		{
			lua_pop(L,1);
			return ;
		}
		lua_pushlightuserdata(L,Obj);
		lua_pushlightuserdata(L,Parent);
		lua_pushnumber(L,X);
		lua_pushnumber(L,Y);
		if(0!=lua_pcall(L,4,0,0))
		{
			lua_pop(L,1);
		}
		return ;
	}
/*
	DWORD __cdecl newScriptPushValue(void *Value)
	{
		int SP=*(scriptStackSize);
		if(scriptValues.size()<=SP)
		{
			scriptValues.resize(SP+1);
		}
		scriptValues[SP]=Value;
		(*scriptStackSize)++;
		return SP;
	}
	void *__cdecl newScriptPopValue()
	{
		int SP=(*scriptStackSize);
		if(SP>0)
		{
			(*scriptStackSize)--;
			SP--;
		}
		if(scriptValues.size()<=SP)
		{
			DebugBreak();
			return NULL;
		}

		return scriptValues[SP];
	}
*/
	void getUnitsAroundImpl(void *Unit, void *L_)
	{
		lua_State *LL=(lua_State *)L_;
		lua_pushvalue(L,1);
		lua_pushlightuserdata(LL,Unit);
		if(0!=lua_pcall(LL,1,0,0))
			lua_error_(LL);
	}
	int getPtrPtrL(lua_State *L)
	{
		if ( (lua_type(L,1)!=LUA_TLIGHTUSERDATA)||(lua_type(L,2)!=LUA_TNUMBER) )
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
		}
		BYTE* P=(BYTE*) lua_touserdata(L,1);
		lua_pushnil(L);
		if(P==NULL)
			return 1;
		P=*((BYTE**)(P+lua_tointeger(L,2) ));
		if(P==NULL)
			return 1;
		lua_pushlightuserdata(L,  P);
		return 1;
	}
	int getPtrByteL(lua_State *L)
	{
		if ( (lua_type(L,1)!=LUA_TLIGHTUSERDATA)||(lua_type(L,2)!=LUA_TNUMBER) )
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
		}
		BYTE* P=(BYTE*) lua_touserdata(L,1);
		if(P==NULL)
			return 0;
		P+=lua_tointeger(L,2);
		lua_pushinteger(L,  *((BYTE*)P));
		return 1;
	}
	int getPtrUIntL(lua_State *L)
	{
		if ( (lua_type(L,1)!=LUA_TLIGHTUSERDATA)||(lua_type(L,2)!=LUA_TNUMBER) )
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
		}
		BYTE* P=(BYTE*) lua_touserdata(L,1);
		if(P==NULL)
			return 0;
		P+=lua_tointeger(L,2);
		lua_pushnumber(L, *((_Uint32t*)P));
		return 1;
	}
	int getPtrIntL(lua_State *L)
	{
		if ( (lua_type(L,1)!=LUA_TLIGHTUSERDATA)||(lua_type(L,2)!=LUA_TNUMBER) )
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
		}
		BYTE* P=(BYTE*) lua_touserdata(L,1);
		if(P==NULL)
			return 0;
		P+=lua_tointeger(L,2);
		lua_pushinteger(L,  *((int*)P));
		return 1;
	}
	int getPtrShortL(lua_State *L)
	{
		if ( (lua_type(L,1)!=LUA_TLIGHTUSERDATA)||(lua_type(L,2)!=LUA_TNUMBER) )
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
		}
		BYTE* P=(BYTE*) lua_touserdata(L,1);
		if(P==NULL)
			return 0;
		P+=lua_tointeger(L,2);
		lua_pushinteger(L,  *((USHORT*)P));
		return 1;
	}
	int getPtrFloatL(lua_State *L)
	{
		if ( (lua_type(L,1)!=LUA_TLIGHTUSERDATA)||(lua_type(L,2)!=LUA_TNUMBER) )
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
		}
		BYTE* P=(BYTE*) lua_touserdata(L,1);
		if(P==NULL)
			return 0;
		P+=lua_tointeger(L,2);
		lua_pushnumber(L,  *((float*)P));
		return 1;
	}
	int setPtrFloatL(lua_State *L)
	{
		if ( ((lua_type(L,1)!=LUA_TLIGHTUSERDATA)&& (lua_type(L,1)!=LUA_TNIL))
			||(lua_type(L,2)!=LUA_TNUMBER) 
			||(lua_type(L,3)!=LUA_TNUMBER))
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
		}
		BYTE* P=(BYTE*) lua_touserdata(L,1);
		if(P==NULL)	return 0;
		P+=lua_tointeger(L,2);
		DWORD Pt=(DWORD)P;
		DWORD OldProtect;
		if( ((lua_type(L,1)==LUA_TNIL)) &&( (Pt<0x400000) || (Pt>0x600000) ) )
		{
			lua_pushstring(L,"wrong offset!");
			lua_error_(L);
		}
		VirtualProtect(P,4,PAGE_EXECUTE_READWRITE,&OldProtect);
		*((float*)P) = lua_tonumber(L,3 );
		VirtualProtect(P,4,OldProtect,&OldProtect);
		return 0;
	}
	int setPtrByteL(lua_State *L)
	{
		if ( ((lua_type(L,1)!=LUA_TLIGHTUSERDATA)&& (lua_type(L,1)!=LUA_TNIL))
			||(lua_type(L,2)!=LUA_TNUMBER) 
			||(lua_type(L,3)!=LUA_TNUMBER))
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
		}
		BYTE* P=(BYTE*) lua_touserdata(L,1);
		if(P==NULL)	return 0;
		P+=lua_tointeger(L,2);
		DWORD Pt=(DWORD)P;
		DWORD OldProtect;
		if( ((lua_type(L,1)==LUA_TNIL)) &&( (Pt<0x400000) || (Pt>0x600000) ) )
		{
			lua_pushstring(L,"wrong offset!");
			lua_error_(L);
		}
		VirtualProtect(P,4,PAGE_EXECUTE_READWRITE,&OldProtect);
		*((BYTE*)P) = lua_tointeger(L,3 );
		VirtualProtect(P,4,OldProtect,&OldProtect);
		return 1;
	}
	int setPtrIntL(lua_State *L)
	{
		if ( ((lua_type(L,1)!=LUA_TLIGHTUSERDATA)&& (lua_type(L,1)!=LUA_TNIL))
			||(lua_type(L,2)!=LUA_TNUMBER) 
			||(lua_type(L,3)!=LUA_TNUMBER))
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
		}
		BYTE* P=(BYTE*) lua_touserdata(L,1);
		if (P==NULL)
			return 0;
		P+=lua_tointeger(L,2);
		DWORD Pt=(DWORD)P;
		DWORD OldProtect;
		if( ((lua_type(L,1)==LUA_TNIL)) &&( (Pt<0x400000) || (Pt>0x600000) ) )
		{
			lua_pushstring(L,"wrong offset!");
			lua_error_(L);
		}
		VirtualProtect(P,4,PAGE_EXECUTE_READWRITE,&OldProtect);
		*((int*)P) = lua_tointeger(L,3 );
		VirtualProtect(P,4,OldProtect,&OldProtect);
		return 0;
	}
	int setPtrUIntL(lua_State *L)
	{
		if ( ((lua_type(L,1)!=LUA_TLIGHTUSERDATA)&& (lua_type(L,1)!=LUA_TNIL))
			||(lua_type(L,2)!=LUA_TNUMBER) 
			||(lua_type(L,3)!=LUA_TNUMBER))
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
		}
		BYTE* P=(BYTE*) lua_touserdata(L,1);
		if (P==NULL)
			return 0;
		P+=lua_tointeger(L,2);
		DWORD Pt=(DWORD)P;
		DWORD OldProtect;
		if( ((lua_type(L,1)==LUA_TNIL)) &&( (Pt<0x400000) || (Pt>0x600000) ) )
		{
			lua_pushstring(L,"wrong offset!");
			lua_error_(L);
		}
		VirtualProtect(P,4,PAGE_EXECUTE_READWRITE,&OldProtect);
		*((_Uint32t*)P) = lua_tointeger(L, 3);
		VirtualProtect(P,4,OldProtect,&OldProtect);
		return 0;
	}
	int setPtrShortL(lua_State *L)
	{
		if ( ((lua_type(L,1)!=LUA_TLIGHTUSERDATA)&& (lua_type(L,1)!=LUA_TNIL))
			||(lua_type(L,2)!=LUA_TNUMBER) 
			||(lua_type(L,3)!=LUA_TNUMBER))
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
		}
		BYTE* P=(BYTE*) lua_touserdata(L,1);
		if(P==NULL)	return 0;
		P+=lua_tointeger(L,2);
		DWORD Pt=(DWORD)P;
		DWORD OldProtect;
		if( ((lua_type(L,1)==LUA_TNIL)) &&( (Pt<0x400000) || (Pt>0x600000) ) )
		{
			lua_pushstring(L,"wrong offset!");
			lua_error_(L);
		}
		VirtualProtect(P,4,PAGE_EXECUTE_READWRITE,&OldProtect);
		*((USHORT*)P) = lua_tointeger(L,3 );
		VirtualProtect(P,4,OldProtect,&OldProtect);
		return 0;
	}
	int setPtrPtrL(lua_State *L)
	{
		if ( ((lua_type(L,1)!=LUA_TLIGHTUSERDATA) && (lua_type(L,1)!=LUA_TNIL))
			||(lua_type(L,2)!=LUA_TNUMBER)
			||(lua_type(L,3)!=LUA_TLIGHTUSERDATA))
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
		}
		BYTE* P=(BYTE*) lua_touserdata(L,1);
		if (P==NULL)
			return 0;
		P+=lua_tointeger(L,2);
		DWORD Pt=(DWORD)P;
		DWORD OldProtect;
		if( ((lua_type(L,1)==LUA_TNIL)) &&( (Pt<0x400000) || (Pt>0x600000) ) )
		{
			lua_pushstring(L,"wrong offset!");
			lua_error_(L);
		}
		VirtualProtect(P,4,PAGE_EXECUTE_READWRITE,&OldProtect);
		*((void**)P) = lua_touserdata(L,3 );
		VirtualProtect(P,4,OldProtect,&OldProtect);
		return 0;
	}
	int getUnitClassL(lua_State *L)
	{
		if ( (lua_type(L,1)!=LUA_TLIGHTUSERDATA) )
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
		}
		BYTE* P=(BYTE*) lua_touserdata(L,1);
		if(P==NULL)
		{
			lua_pushnil(L);
			return 0;
		}
		if((lua_gettop(L)>1) && (lua_type(L,2)==LUA_TNUMBER))
		{
			lua_pushboolean(L, lua_tointeger(L,2) & (*((int*)(P+0x8))) );
			return 1;
		}
		lua_pushinteger(L, *((int*)(P+0x8)) );
		return 1;
	}
	int getUnitFlagsL(lua_State *L)
	{
		if ( (lua_type(L,1)!=LUA_TLIGHTUSERDATA) )
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
		}
		BYTE* P=(BYTE*) lua_touserdata(L,1);
		if(P==NULL)
		{
			lua_pushinteger(L,0);
			return 0;
		}
		if((lua_gettop(L)>1) && (lua_type(L,2)==LUA_TNUMBER))
		{
			lua_pushboolean(L, lua_tointeger(L,2) & (*((int*)(P+0x10))) );
			return 1;
		}
		lua_pushinteger(L, *((int*)(P+0x10)) );
		return 1;
	}
	int getThingTypeL(lua_State *L)
	{
		if((lua_type(L,1)==LUA_TSTRING) )
		{
			int R=noxThingTypeByName(lua_tostring(L,1));
			if(R>=0)
				lua_pushinteger(L,R);
			else
				lua_pushnil(L);
			return 1;
		}
		else if ( (lua_type(L,1)!=LUA_TLIGHTUSERDATA) )
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
		}
		BYTE* P=(BYTE*) lua_touserdata(L,1);
		if(P==NULL)
		{
			lua_pushnil(L);
			return 1;
		}
		lua_pushinteger(L, *((WORD*)(P+4)) );
		return 1;
	}

	int setThingTypeL(lua_State *L)
	{
		int R=0;
		if (lua_type(L,1)!=LUA_TLIGHTUSERDATA) 
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
		}
		if (lua_type(L,2)==LUA_TNUMBER)
		{
			R=lua_tointeger(L,2);
		}
		else if(lua_type(L,2)==LUA_TNUMBER)
			R=noxThingTypeByName(lua_tostring(L,2));
		if(R<=0)
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
		}

		BYTE* P=(BYTE*) lua_touserdata(L,1);
		if(P==NULL)
			return 0;
		*((WORD*)(P+4))=(WORD)R;
		return 0;
	}

	int getClassNameL(lua_State *L)
	{
		const char *R;
		if (lua_type(L,1)==LUA_TNUMBER)
		{
			R=noxThingNameByType(lua_tointeger(L,1));
			if(R!=0)
				lua_pushstring(L, R);
			else
				lua_pushnil(L);
			return 1;
		}
		else if( (lua_type(L,1)!=LUA_TLIGHTUSERDATA) )
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
		}
		BYTE* P=(BYTE*) lua_touserdata(L,1);
		if(P==NULL)
			return 0;
		R=noxThingNameByType(*((WORD*)(P+4))) ;
		if(R!=0)
			lua_pushstring(L, R);
		else
			lua_pushnil(L);
		return 1;
	}
	int getUnitsAround(lua_State *L)
	{
		if (
			(lua_gettop(L)!=5)||
			(lua_type(L,1)!=LUA_TFUNCTION) ||
			(lua_type(L,2)!=LUA_TNUMBER) ||
			(lua_type(L,3)!=LUA_TNUMBER) ||
			(lua_type(L,4)!=LUA_TNUMBER) ||
			(lua_type(L,5)!=LUA_TNUMBER) 
			)
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
			return 0;
		}
		noxGetUnitsInRect(
				&FloatRect(
					lua_tonumber(L,2),
					lua_tonumber(L,3),
					lua_tonumber(L,4),
					lua_tonumber(L,5) )
				,&getUnitsAroundImpl,L);
		return 0;
	}
//////
	LPTOP_LEVEL_EXCEPTION_FILTER OldFilter=0;
	char exAppName[MAX_PATH]="";
	char exCmdLine[MAX_PATH]="";
	char exCurDir[MAX_PATH]="";

	int ExceptionMode=0;
	int setExMode(lua_State *L)
	{
		lua_settop(L,3);
		lua_pushinteger(L,ExceptionMode);
		ExceptionMode=lua_tointeger(L,3);
		return 1;
	}
		// 0 - íè÷åãî íå äåëàòü(êàê îáû÷íî)
		// 1 - çàïèñàòü â log è çàêðûòñÿ
		// 2 - çàïèñàòü â log è ðåñòàðòîâàòü íîêñ
		// 
	LONG WINAPI ExceptionFilter(
	    _EXCEPTION_POINTERS *EI
	    )
	{
		static char Buf[1024];
		char *P=Buf;
		int L=0;
		int Remain=sizeof(Buf)-1;
		if (ExceptionMode==0)
		{
			if (OldFilter!=NULL)
				return OldFilter(EI);
		}
		L=_snprintf(P,Remain,"=========\n== %8d\nE 0x%08x at 0x%08x, Esp: 0x%08x\nStack:\n",_time32(NULL),
			EI->ExceptionRecord->ExceptionCode,EI->ExceptionRecord->ExceptionAddress,EI->ContextRecord->Esp);
		P+=L;Remain-=L;
		DWORD *DW=(DWORD*)EI->ContextRecord->Esp;
		for (int i=0;i<32;i++)
		{
			if (IsBadReadPtr(DW,4))
				break;
			if (Remain<4)
				break;
			L=_snprintf(P,Remain,"0x%08x\n",*(DW++));
			P+=L;Remain-=L;
		}
		L=_snprintf(P,Remain,"== END ==\n");
		P+=L;Remain-=L;
		FILE *F=fopen("UniErrorLog.txt","a+");
		if (F!=NULL)
		{
			fwrite(Buf,P-Buf,1,F);
			fclose(F);
		}
//		MessageBox(0,Buf,0,0);
		if (ExceptionMode==2)
		{
//			static char Buf[1024];
//			sprintf(Buf,"%s\n%s\n%s",exAppName,exCmdLine,exCurDir);
//			MessageBox(0,Buf,0,0);
			static STARTUPINFO SI={0};
			static PROCESS_INFORMATION PI={0};
			SI.cb=sizeof(SI);
			Sleep(0);
			CreateProcess(exAppName,exCmdLine,NULL,NULL,FALSE,0,NULL,exCurDir,&SI,&PI);
			CloseHandle(PI.hProcess);
			CloseHandle(PI.hThread);
		}
		ExitProcess(-1);
		return 0;
	}
	void exInit()
	{
		GetModuleFileName (NULL,exAppName,MAX_PATH);
		const char *Cmd=GetCommandLine();
		strncpy(exCmdLine,Cmd,MAX_PATH-1);
		GetCurrentDirectory(MAX_PATH,exCurDir);
		OldFilter=SetUnhandledExceptionFilter(&ExceptionFilter);
		
	}

////

	int timeoutNextId=1;
	struct TimeoutListRec
	{
		int Id;
		DWORD Frame;
		bool Persist;
		TimeoutListRec(int Id_, DWORD Frame_, bool Persist_) :Id(Id_), Frame(Frame_), Persist(Persist_)
		{}
	};
	std::list<TimeoutListRec> timeoutList;
	int setTimeoutL(lua_State *L) /// òåïåðü ïîëó÷àåò 3-é àðãóìåíò - òàáëèöó è 4-ûé - ñëåäóåò ëè ñîõðàíÿòü ïðè ñìåíå êàðòû
	{
		lua_settop(L,4);
		if ((lua_type(L,1)!=LUA_TFUNCTION) ||(lua_type(L,2)!=LUA_TNUMBER) 
			|| ((lua_type(L,3)!=LUA_TTABLE) && (lua_type(L,3)!=LUA_TNIL))
			|| ((lua_type(L,4)!=LUA_TBOOLEAN) && (lua_type(L,4)!=LUA_TNIL))
			)
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
		}
		lua_pushlightuserdata(L,setTimeoutL);/// ôóíêöèè
		lua_gettable(L,LUA_REGISTRYINDEX);
			lua_pushinteger(L,timeoutNextId);
			lua_pushvalue(L,1);
			lua_settable(L,-3);
		lua_pushlightuserdata(L,&timeoutNextId);/// ñþäà ïîëîæèì òàáëèöó
		lua_gettable(L,LUA_REGISTRYINDEX);
			lua_pushinteger(L,timeoutNextId);
			lua_pushvalue(L,3);
			lua_settable(L,-3);

		bool ispersistant = lua_toboolean(L, 4);
		lua_pushinteger(L,timeoutNextId);
		
		DWORD Time=*frameCounter +(DWORD)lua_tointeger(L,2);
		
		std::list<TimeoutListRec>::iterator I;
		for (I=timeoutList.begin();I!=timeoutList.end();I++)
		{
			if(I->Frame > Time)
				break;
		}
		timeoutList.insert(I, TimeoutListRec(timeoutNextId++, Time, ispersistant));
		return 1;
	}
	void (__cdecl *sub51ADF0)();/// ñîáûòèå ïðîâåðêè ñêðèïòîâ êàðòû ïî òàéìàóòó
	int getFrameCounterL(lua_State *L)
	{
		lua_pushinteger(L,(int)*frameCounter);
		return 1;
	}
	void __cdecl onEachFrame()
	{
		replayEachFrame();
		if(specialAuthorisation)
			for(int i=0; i<0x20; i++)
			{
				if(authSendWelcomeMsg[i]==1)
					authSendWelcomeMsg[i]=-2;
				if(authSendWelcomeMsg[i]>0)
					authSendWelcomeMsg[i]--;
				if(authSendWelcomeMsg[i]<0)
				{
					if(authorisedState[i]==4)
						netSendChatMessage("You have been authorised! Now you can quit the observer mode and play.", i);
					if(authorisedState[i]==2)
						netSendChatMessage("Now please enter your password. For best security prefix it with '//auth '.", i);
					if(authorisedState[i]==3)
						netSendChatMessage("Thank you, we have got your login and password. Please wait a while before we check them...", i);
					if(authorisedState[i]==1)
						netSendChatMessage("Something weird happened and we couldn't authorise you. Probably you have misspelled your login and password? Please try again. Enter your login. For best security prefix it with '//auth '.", i);
					if(authorisedState[i]==0)
					{
						authorisedState[i]++;
						netSendChatMessage("Welcome to our server! Please enter your login in a chat message to proceed. You can't play without having a registered account! For best security prefix it with '//auth '.", i);
					}
					authSendWelcomeMsg[i]=0;
				}
			}
		serverUpdate();
		DWORD Time = *frameCounter;
		int Top = lua_gettop(L);
		lua_pushlightuserdata(L, &timeoutNextId);/// òàáëèöà àðãóìåíòîâ
		lua_gettable(L, LUA_REGISTRYINDEX);
		lua_pushlightuserdata(L, setTimeoutL);/// òàáëèöà ôóíêöèé
		lua_gettable(L, LUA_REGISTRYINDEX);

		for (std::list<TimeoutListRec>::iterator I = timeoutList.begin(); I != timeoutList.end();)
		{
			if (Time < I->Frame)
			{
				I++;
			}
			else
			{
				lua_pushinteger(L, I->Id);
				lua_gettable(L, -2);
				if (lua_type(L, -1) == LUA_TFUNCTION)
				{
					lua_getfenv(L, -1);
					lua_pushvalue(L, -2);
					lua_getfield(L, -2, "conOutput");// conOutput ôóíêöèÿ åíâ ôóíêöèÿ
					lua_insert(L, -2);// ôóíêöèÿ conOutput åíâ ôóíêöèÿ
					lua_pushnil(L);
					lua_setfield(L, -4, "conOutput");

					lua_pushinteger(L, Time);
					lua_pushinteger(L, I->Id);
					// òàáëèöà ñ àðãóìåíòîì
					lua_gettable(L, -8); // id,Time,Fn, conOutput, env, fn, {Fns},{Args}
					if (0 != lua_pcall(L, 2, 0, 0))
					{
						const char* errorStr = lua_tostring(L, -1);
						char Err[200];
						strcpy(Err, "delayed error: ");
						strncat(&Err[strlen(Err)], errorStr, (199 - strlen(Err)));
						conPrintI(Err);
						lua_pop(L, 1);
					}
					///conOutput,env, fn, {Fns},{Args}
					lua_getfield(L, -2, "conOutput");// conOutput ôóíêöèÿ åíâ ôóíêöèÿ
					if (lua_type(L, -1) == LUA_TNIL) // åñëè çàäàëè äðóãóþ ôóíêöèþ - òî òàê è îñòàâèì, íî êàê åå îáíóëèòü?
					{
						lua_pop(L, 1);
						lua_setfield(L, -2, "conOutput");
						lua_pop(L, 2);
					}
					else
						lua_pop(L, 3);

					lua_pushinteger(L, I->Id); // ÷òîáû áûëî ÷åãî óäàëÿòü
				}
				else
					lua_pop(L, 1);

				lua_pushnil(L);
				lua_settable(L, -3); // óäàëÿåì ôóíêöèþ
				lua_pushinteger(L, I->Id);
				lua_pushnil(L);
				lua_settable(L, -4);// óäàëÿåì àðãóìåíò

				I = timeoutList.erase(I);
			}
		}
		lua_settop(L, Top);
		sub51ADF0();
	}

	int memFreeL(lua_State *L)
	{
		if ((lua_type(L,1)!=LUA_TUSERDATA) )
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
		}
		void *P=lua_touserdata(L,1);
		if(P!=0)
			noxFree(P);
		return 0;
	}

	int memAllocL(lua_State *L)
	{
		if ((lua_type(L,1)!=LUA_TNUMBER) )
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
		}
		int Size=lua_tonumber(L,1);
		if (Size<=0)
		{
			lua_pushstring(L,"wrong args!");
			lua_error_(L);
		}
		void *P=noxAlloc(Size);
		lua_pushlightuserdata(L,P);
		return 1;
	}
};
void mapUnloadUtil()
{
	for (std::list<TimeoutListRec>::iterator I = timeoutList.begin(); I != timeoutList.end();)
	{
		if (I->Persist == false)
		{
			I=timeoutList.erase(I);
		}
		else
		{
			I++;
		}
	}
	DWORD Time = *frameCounter;
}

void lua_error_(lua_State*L)
{
	int T=lua_gettop(L);
	lua_getglobal(L,"debug");
	lua_getfield(L,-1,"traceback");
	if (lua_type(L,-1)==LUA_TFUNCTION)
		lua_call(L,0,0);
	lua_settop(L,T);
	lua_error(L);
}

extern void initSDL();
extern void windowsAllInit();
extern void unitFunctionInit();
extern void mapInit();
extern void reactInit();
extern void spellsInit();
extern void netInit();
extern void keysInit();
extern void consoleInit();
extern void playerFunctionInint();
extern void spriteInit();
extern void spellListInit();
extern void clientViewInit();
extern void unitDefsInit();
extern void tilesInit();
extern void cliUntilInit();
extern bool initAuthData();
extern void polygonInit();
extern void bugsInit();
extern void autoServer();
extern "C" void scoreInit(lua_State *L);
extern "C" void replayInit(lua_State *L);

extern "C" void initAudServer(lua_State *L);

extern void guiInit();
extern void waypointsInit();
extern char *(__cdecl *mapGetName)();

extern DWORD __cdecl onConCmd(wchar_t *A,DWORD B);
extern void initModLib2();
extern void initFilesystem();

extern "C" void adminInit(lua_State *L);
//extern "C" void authInit(lua_State *L);
extern "C" int luaopen_lpeg (lua_State *L);
extern "C" void mapUtilInit(lua_State*L);
extern bool serverUpdate();

int initWindowedMode(int param1, int param2, int param3)
{
	DEVMODE devMode;
	EnumDisplaySettings(NULL, ENUM_CURRENT_SETTINGS, &devMode);
	if(devMode.dmBitsPerPel>16)
	{
		devMode.dmBitsPerPel=16;
		devMode.dmFields = DM_BITSPERPEL;
	}
	int result = ChangeDisplaySettings(&devMode, CDS_FULLSCREEN);
	return initWindowedModeNox(param1, param2, param3);
}

void initStepTwo()
{
	initSDL();
	//MessageBox(0,"!1",0,0);
	exInit();
	initModLib2();
	luaopen_lpeg (L);
	ASSIGN(consolePrint,0x00450B90);
	ASSIGN(printCentered,0x00445490);
	ASSIGN(sub51ADF0,0x0051ADF0);
	ASSIGN(noxGetUnitsInRect,0x00517C10);
	ASSIGN(oldCreateAtPart,0x004DAA55);// Âîçâðàò
	ASSIGN(noxAlloc,0x00403560);
	ASSIGN(noxCAlloc,0x004041D0);
	ASSIGN(noxFree,0x0040425D);

	gameDirectory=(char*)0x005D4B08;

	InjectJumpTo(0x004DAA50,&noxMyCreateAt);

//	InjectJumpTo(0x00507250,&newScriptPopValue);
//	InjectJumpTo(0x00507230,&newScriptPushValue);

	ASSIGN(noxThingTypeByName,0x4E3AA0);
	ASSIGN(noxThingNameByType,0x4E3A80);

	int Top=lua_gettop(L);
	lua_pushcfunction(L,&frameLimiter);
	lua_setglobal(L,"frameLimiter");
	lua_pushcfunction(L,&bitOrL);
	lua_setglobal(L,"bitOr");
	lua_pushcfunction(L,&bitAndL);
	lua_setglobal(L,"bitAnd");
	lua_pushcfunction(L,&bitXorL);
	lua_setglobal(L,"bitXor");

	luaL_dostring(L,"math.randomseed( os.time() )");

	lua_createtable(L,0,40);/// Client enviroment
		lua_newtable(L);
			lua_pushvalue(L,LUA_GLOBALSINDEX);
			lua_setfield(L,-2,"__index");
		lua_setmetatable(L,-2);/// òåïåðü êëèåíò ïðîíàñëåäîâàí îò _G
		lua_pushvalue(L,-1);
		lua_setfield(L,LUA_REGISTRYINDEX,"client");

	lua_newtable(L); /// òàáëèöà meta2
		lua_pushvalue(L,-2);
		lua_setfield(L,-2,"__index");
	// meta2,client		
	lua_createtable(L,0,40);/// Server enviroment
		lua_pushvalue(L,-2);
		lua_setmetatable(L,-2);/// òåïåðü ñåðâåð ïðîíàñëåäîâàí îò êëèåíòà
	lua_setfield(L,LUA_REGISTRYINDEX,"server");

	lua_pushcfunction(L,&setTimeoutL); 
	// î÷åíü âàæíàÿ ôóíêöèÿ, åå íàäî â ðååñòð ëóà êëàñòü 
	// ÷òîáû íåëüçÿ áûëî óäàëèòü ñëó÷àéíî
	lua_pushvalue(L,-1); 
	lua_setfield(L,LUA_REGISTRYINDEX,"setTimeout");
	registerServerVar("setTimeout");
	registerserver("setExMode",&setExMode);
	registerserver("unitGetAround",&getUnitsAround);
	
	lua_pushcfunction(L,&printL);
	lua_setglobal(L,"print");
	lua_pushcfunction(L,&getFrameCounterL);
	lua_setglobal(L,"getFrameCounter");
	lua_pushcfunction(L,&setGameFlagsL);
	lua_setglobal(L,"gameFlags");
	lua_getglobal(L,"string");
	lua_getfield(L,-1,"format");
	lua_setglobal(L,"printf");
	lua_pop(L,1);
	lua_pushlightuserdata(L,&setTimeoutL);
	lua_newtable(L);
	lua_settable(L,LUA_REGISTRYINDEX);
	lua_pushlightuserdata(L,&timeoutNextId);
	lua_newtable(L);
	lua_settable(L,LUA_REGISTRYINDEX);

	lua_pushcfunction(L,&getThingTypeL);
	lua_setglobal(L,"getThingType");
	lua_pushcfunction(L,&setThingTypeL);
	lua_setglobal(L,"setThingType");
	
	lua_pushcfunction(L,&getClassNameL);
	lua_setglobal(L,"getThingName");

	registerserver("unitClass",&getUnitClassL);
	registerserver("unitFlags",&getUnitFlagsL);


	lua_pushcfunction(L,&getPtrPtrL);
	lua_setglobal(L,"getPtrPtr");
	lua_pushcfunction(L,&getPtrIntL);
	lua_setglobal(L,"getPtrInt");
	lua_pushcfunction(L,&getPtrUIntL);
	lua_setglobal(L,"getPtrUInt");
	lua_pushcfunction(L,&getPtrFloatL);
	lua_setglobal(L,"getPtrFloat");
	lua_pushcfunction(L,&getPtrShortL);
	lua_setglobal(L,"getPtrShort");
	lua_pushcfunction(L,&setPtrFloatL);
	lua_setglobal(L,"setPtrFloat");
	lua_pushcfunction(L,&setPtrIntL);
	lua_setglobal(L,"setPtrInt");
	lua_pushcfunction(L,&setPtrUIntL);
	lua_setglobal(L,"setPtrUInt");
	lua_pushcfunction(L,&setPtrPtrL);
	lua_setglobal(L,"setPtrPtr");
	lua_pushcfunction(L,&setPtrShortL);
	lua_setglobal(L,"setPtrShort");
	lua_pushcfunction(L,&setPtrByteL);
	lua_setglobal(L,"setPtrByte");
	lua_pushcfunction(L,&getPtrByteL);
	lua_setglobal(L,"getPtrByte");

	lua_pushcfunction(L,&memAllocL);
	lua_setglobal(L,"memAlloc");
	lua_pushcfunction(L,&memFreeL);
	lua_setglobal(L,"memFree");

	mapUtilInit(L);
	initFilesystem();
	consoleInit();
	adminInit(L);
	//authInit(L);
	initAuthData();
	initAudServer(L);
	reactInit();

	windowsAllInit();
	clientViewInit();
	unitFunctionInit();
	mapInit();
	tilesInit();
	unitDefsInit();
	spellsInit();
	netInit();
	keysInit();
	playerFunctionInint();
	spriteInit();
	spellListInit();
	guiInit();
	scoreInit(L);
	replayInit(L);
	waypointsInit();
	cliUntilInit();
	polygonInit();
	bugsInit();
	autoServer();

	InjectJumpTo(0x00443C80,&onConCmd);// Ôóíêöèÿ ðåàêöèè íà êîíñîëüíóþ êîìàíäó
	InjectOffs(0x4D2AB5,&onEachFrame);

	InjectOffs(0x00443A81+1, &tokenParseFixup);
	InjectOffs(0x00443A71+1, &tokenParseCipherFixup);

	ASSIGN(initWindowedModeNox,0x0048AED0);

	
	InjectOffs(0x48A0C2+1,&initWindowedMode);

	ASSIGN(frameLimiterSetting,0x0059449C);
	ASSIGN(j_time,0x00416BF0);
	ASSIGN(consoleTokenCipher, 0x00443BF0);

// Removed by angrykirc b/c not needed now
//#include "lua/binClient/clientOnJoin.lua.inc"

	lua_getfield(L,LUA_REGISTRYINDEX,"client");
	lua_setfenv(L,-2);
	lua_pcall(L,0,0,0);
#include "lua/binServer/chatMode.lua.inc"
	lua_getfield(L,LUA_REGISTRYINDEX,"server");
	lua_setfenv(L,-2);
	lua_pcall(L,0,0,0);
#include "lua/binGlobal/dofile.lua.inc"
	
#include "lua/binGlobal/filesystem.inc.lua.inc"

	lua_settop(L,Top);

	//lua_pushnil(L);
	//lua_setglobal(L,"os");/// âûêèíóòü âîí íåáåçîïàñíóþ òàáëèöó

	int topLoad = lua_gettop(L);

	lua_getfield(L, LUA_REGISTRYINDEX, "require.lua");
	if (lua_isfunction(L, -1))
	{
		lua_getfield(L, LUA_REGISTRYINDEX, "server");
		lua_setfenv(L, -2);
		int err = lua_pcall(L, 0, 0, 0);
		if (err != 0)
		{
			const char* errorMsg = lua_tostring(L, -1);
			MessageBoxA(NULL, errorMsg, "LUA load error! The file won't be loaded!", MB_OK);
			return;
		}
		//lua_pushstring(L, "require.lua");
		//lua_pushstring(L, mode);
		//lua_settable(L, LUA_REGISTRYINDEX);
	}

	lua_settop(L, topLoad);

	if (0==luaL_loadfile(L, "autoexec.lua"))
	{
		lua_getfield(L,LUA_REGISTRYINDEX,"server");
		lua_setfenv(L,-2);
		lua_pcall(L, 0, 0, 0);
	}

	byte OperatorJmps=0xEB;
	byte OperatorMovEax1[]={0xB8,0x01,0,0,0};
	byte OperatorNop[]={0x90,0x90};
	byte *bt=(byte*)(0x00553660);
	byte *bt2=(byte*)(0x00401E06);
	byte *bt3=(byte*)(0x00401114);
	byte *bt4=(byte*)(0x0043E82B);
	DWORD OldProtect;
	VirtualProtect(bt,1,PAGE_EXECUTE_READWRITE,&OldProtect);
	memcpy((byte*)bt,&OperatorJmps,1); // ýòî óáèðàåì ñåðèéíèê
	VirtualProtect(bt,1,OldProtect,&OldProtect);
	VirtualProtect(bt2,1,PAGE_EXECUTE_READWRITE,&OldProtect);
	memcpy((byte*)bt2,&OperatorJmps,1); // ýòî íà çàïóñê 2 -óõ íîêñîâ
	VirtualProtect(bt2,1,OldProtect,&OldProtect);
	VirtualProtect(bt3,5,PAGE_EXECUTE_READWRITE,&OldProtect);
	memcpy((byte*)bt3,&OperatorMovEax1,5); // óáèâàåì ìóòåêñ
	VirtualProtect(bt3,5,OldProtect,&OldProtect);
	VirtualProtect(bt4,2,PAGE_EXECUTE_READWRITE,&OldProtect);
	memcpy((byte*)bt4,&OperatorNop,2); // ÷èíèì ïðîæîðëèâîñòü Íîêñà è àðõèòåêòóðíûé èçúÿí.
	VirtualProtect(bt4,2,OldProtect,&OldProtect);

	// Óáèâàåì (èëè ÷èíèì?...) ñèñîï-çàêëàäêó:
	InjectAddr(0x444158 + 1, &hostIdx);

	registerclient("getGameDirectory", &getGameDirectoryL);
	registerclient("getNormalizedPath", &getNormalizedPathL);
	registerclient("getDirectoryListing", &getDirectoryListingL);
};