SolarStrike Software

Code: Select all

  function attackelementalincave()

  local chests = {}
	local objectList = CObjectList();
	objectList:update();
	local objSize = objectList:size()
	for i = 0,objSize do
		local obj = objectList:getObject(i);
		obj:update()
   print(obj.HP)
		if obj.Name == "Possessed Water Elemental" and obj.Attackable then
			obj.Dist = distance(player.X,player.Z,obj.X,obj.Z)
      if 200 > obj.Dist then
			   table.insert(chests, table.copy(obj))
      end
		end
	end
	table.sort(chests,function(a,b) return b.Dist>a.Dist end)
	table.print(chests)
	for k,v in ipairs(chests) do
		player:target(v)
    keyboardPress( key.VK_2 )
		yrest(3200) -- 2 seconds
    keyboardPress( key.VK_2 )
		yrest(3200) -- 2 seconds
    yrest(2000)
    break
  end
   
  end

Code: Select all

           
player:fight()
player:cast("MAGE_FLAME");

Code: Select all

	<option name="AUTO_ELITE_FACTOR"    value="5" />			<!-- (value * your max HP) to designate a mob as "elite" -->

Code: Select all

function myfight(target)
	target = CPawn(target.Address)

	-- Kill any aggro mobs before going back to target
	player:update()
	if player.Battling then
		repeat
			local _enemy = findaggroenemy()
			if _enemy then
				player:target(_enemy);
				player:fight()
			end
		until _enemy == nil or player.HP < 1 or player.Alive == false
	end

	-- Attack target
	target:update()
	player:aimAt(target)
	while target.Id ~= 0 and target.HP > 4 do
		player:target(target)
		if aoefound == false and (player.Class1 == CLASS_WARRIOR or player.Class1 == CLASS_CHAMPION) then Attack() end
		-- Check skills
		for i,v in pairs(settings.profile.skills) do
			if v.AutoUse and v:canUse(false, target) and
			   (v.Type == STYPE_DOT or v.Type == STYPE_DAMAGE) and
			   AllowSkillCastTime >= v.CastTime then
				local oldHP = target.HP -- Remember HP for extra check
				player:cast(v) -- Cast attack skill
				repeat yrest(50) player:update() until not player.Casting
				player:checkSkills(true) -- Friendly skills only.
				-- Wait a bit of time for damage to register, avoids casting another skill needlessly.
				local starttime = os.clock()
				yrest(150)
				repeat
					yrest(50)
					target:update()
				until target.Id == 0 or 5 > target.HP or target.HP < oldHP or aoefound or (os.clock()-starttime) >= 1
				-- End checking skills if target dead or if using AOE
				local damage = memoryReadInt(getProc(), target.Address + 0x1D0)
				if target.Id == 0 or 5 > target.HP or damage == oldHP or aoefound then
					break
				end
			end
		end
		target:update()
		player:update()
		-- player dead?
		if (player.HP < 1 or player.Alive == false) then break end
		player:checkPotions()
	end
	player:resetSkills()
end

Code: Select all

   if player.Battling then
      repeat
         local _enemy = findaggroenemy()
         if _enemy then
            player:target(_enemy);
            player:fight()
         end
      until _enemy == nil or player.HP < 1 or player.Alive == false
   end