include("addresses.lua");
include("database.lua");
include("classes/player.lua");
include("classes/inventory.lua");
include("classes/camera.lua");
include("classes/node.lua");
include("settings.lua");
include("functions.lua");

settings.load();

function main()

	cprintf(cli.turquoise, "POS.LUA - For displaying the current position.\n")

	local forcedProfile = nil;

	for i = 2,#args do
		local foundpos = string.find(args[i], ":", 1, true);
		if( foundpos ) then
			local var = string.sub(args[i], 1, foundpos-1);
			local val = string.sub(args[i], foundpos+1);

			if( var == "profile" ) then
				forcedProfile = val;
			else
				-- invalid option
				local msg = printf(language[61], args[i]);
				error(msg, 0 );
			end
		end

		-- check the options
		if(not foundpos  and  args[i] ~= "update" ) then
			local msg = sprintf(language[61], args[i]);
			error(msg, 0 );
		end;

	end

	database.load();
	attach(getWin());

	local playerAddress = memoryReadIntPtr(getProc(), addresses.staticbase_char, addresses.charPtr_offset);
	player = CPlayer(playerAddress);
	player:initialize();
	player:update();

	posx= math.floor(player.X); posz= math.floor(player.Z)
	print("x=\"".. posx .."\" z=\"".. posz .."\"")
	while(true) do
		player:update()
		if posx ~= math.floor(player.X) or posz ~= math.floor(player.Z) then
			posx= math.floor(player.X); posz= math.floor(player.Z)
			print("x=\"".. posx .."\" z=\"".. posz .."\"")
		end
		yrest(1000)
	end

end

startMacro(main,true);