SolarStrike Software

Code: Select all

<?xml version="1.0" encoding="utf-8"?><waypoints>
	<onLoad>
		local partymember={}
		local partymemberName={}
		local partymemberObj={}
		local noofpartymembers
		local i	

		
--********************************************************
--get all partymembers
--********************************************************
	if RoMScript("UnitExists('party1')") then
		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
		
		noofpartymembers = #partymemberName
		
		for i,v in ipairs(partymemberName) do
			table.insert(partymemberObj,i,player:findNearestNameOrId(partymemberName[i]))
			table.insert(partymember,i,CPawn(partymemberObj[i].Address))
		end
	end
--********************************************************
--Look at partymember health and heal if necessary 	
--********************************************************
	while(true) do
		for i,v in ipairs(partymember) do
			partymember[i]:update()

			if (90 > partymember[i].HP/partymember[i].MaxHP*100 and partymember[i].HP/partymember[i].MaxHP*100 > 50) then
				player:target(partymember[i])
			--**********Put year casts here*********************
				yrest(300)
			elseif (50 > partymember[i].HP/partymember[i].MaxHP*100) then
				player:target(partymember[i])
			--**********and here*********************
				yrest(300)
			--**********and so on*********************
			end
		end
		
		yrest(100)
		RoMScript("FollowUnit('party1');");
	end
	</onLoad>
</waypoints>

Code: Select all

player:cast("MAGE_PURGATORY_FIRE"); yrest(1000); 

Code: Select all

		lootBodies()
		yrest(100)
		
		partyleader:update()
		if ( distance(player.X, player.Z, partyleader.X, partyleader.Z) > 200) then
				player:moveTo(CWaypoint(partyleader.X, partyleader.Z), true)
		end
		RoMScript("FollowUnit('party1');");