NameDD = 'Nickhere';
SendInvIfBufferInRange = 800;
----------------------------------------------------------------
WhoToInv = nil;
repeat
WhoToInv = GetUserByName(NameDD);

if		(WhoToInv:IsMyPartyMember() == false) and
		(GetMe():GetRangeTo(WhoToInv) < SendInvIfBufferInRange)
then
		Sleep(800);
		Command("/invite "..NameDD);

		Sleep(5000);
end;
until false