<?xml version="1.0" encoding="utf-8"?><waypoints>
<onLoad>

		local maxBattleDistToLeader = 250	--Change to your needs 
		local maxDistToLeader = 100	--Change to your needs (for example if you want use lootBodies)
		local partymember={}
		local partymemberName={}
		local partymemberObj={}
		local partyleaderIndex
		local partyleader
		local partyleaderName
		local partyleaderObj
		local noofpartymembers
		local i

		changeProfileOption("AUTO_TARGET", "false");
		changeProfileOption("DEBUG_TARGET", "true");
		changeProfileOption("ANTI_KS", "false")
--********************************************************
--get all partymembers
--********************************************************
	if RoMScript("UnitExists('party1')") then
	
		partyleaderIndex = RoMScript("GetPartyLeaderIndex()")
		if partyleaderIndex~=nil then
			printf("Found partyleaderIndex: %d \n",partyleaderIndex)
			partyleaderName = RoMScript("UnitName('party"..partyleaderIndex.."')")
			printf("Partyleader: %s \n",partyleaderName)
			partyleaderObj = player:findNearestNameOrId(partyleaderName)
			partyleader = CPawn(partyleaderObj.Address)
		end
					
	
		table.insert(partymemberName, RoMScript("UnitName('player')"))

		i = 1
		while not(i >= 7 ) do
			if RoMScript("UnitIsPlayer('party"..i.."');") then
				table.insert(partymemberName,i+1, RoMScript("UnitName('party"..i.."')"))

			end
			i = i + 1

		end
		
		--show table
		for i,v in ipairs(partymemberName) do print(i,v) end

		noofpartymembers = #partymemberName
		--print(noofpartymembers)
		
		for i,v in ipairs(partymemberName) do
			table.insert(partymemberObj,i,player:findNearestNameOrId(partymemberName[i]))
			table.insert(partymember,i,CPawn(partymemberObj[i].Address))
		end
		
		--****DEBUGGING
		--for i,v in ipairs(partymemberObj) do print(i,v) end
		--for i,v in ipairs(partymember) do print(i,v) end

		--*************
	end
--********************************************************************	

--********************************************************
--Main loop	
--********************************************************
	while(true) do
		local leaderTargetGUID = getGUIDfromServer();
		-- printf("leaderTargetGUID",leaderTargetGUID);
		
		--*************
		if leaderTargetGUID then
				local target = findEnemyByGUID(leaderTargetGUID);
				if target then
					memoryWriteInt(getProc(), player.Address + addresses.pawnTargetPtr_offset, target);
					player:update()
					if player.TargetPtr ~= 0 then
							target = CPawn(player.TargetPtr);
							if player.Battling then
								if distance(player.X, player.Z, target.X, target.Z) > settings.profile.options.COMBAT_DISTANCE then
									player:moveInRange(target, settings.profile.options.COMBAT_DISTANCE, true);
								end
								

								player:fight();

							end
					end
				end
		end
		--*************
		
		
		lootBodies();
		yrest(500);
		RoMScript("FollowUnit('party"..partyleaderIndex.."');");
	end
</onLoad>
</waypoints>
