SolarStrike Software

Code: Select all

local icon_path,active,autoCastAllowed = GetPetActionInfo(6)

Code: Select all

local fairy_db = {
[CLASS_WARRIOR]	= {PetId = 102104, PetSummon = 493267, Buff = 503455}, -- Fire Fairy - Accuracy Halo
[CLASS_SCOUT]	= {PetId = 102105, PetSummon = 493268, Buff = 503736}, -- Water Fairy - Frost Halo
[CLASS_ROGUE]	= {PetId = 102106, PetSummon = 493269, Buff = 503459}, -- Shadow Fairy - Wraith Halo
[CLASS_MAGE]	= {PetId = 102107, PetSummon = 493270, Buff = 503461}, -- Wind Fairy - WindRider Halo
[CLASS_KNIGHT]	= {PetId = 102108, PetSummon = 493271, Buff = 503507}, -- Light Fairy - Devotion Halo
}

Code: Select all

	local fairy = fairy_db[player.Class2]

	if player.Class1 ~= CLASS_PRIEST or fairy == nil then
		return -- can't have a water fairy if class is wrong
	end

	if  player.Mounted then
		return
	end

	petupdate()
	if pet.Id ~= fairy.PetId then -- Fairy
		if PetWaitTimer == nil or PetWaitTimer == 0 then -- Start timer
			PetWaitTimer = os.time()
			return false
		elseif os.time() - PetWaitTimer < 15 then -- Wait longer
			return false
		end

		keyboardRelease(settings.hotkeys.MOVE_FORWARD.key); yrest(500)
		sendMacro("CastSpellByName(\""..GetIdName(fairy.PetSummon).."\")")
		print("Summoning "..GetIdName(fairy.PetId))
		repeat
			yrest(1000)
		until not (memoryReadRepeat("int", getProc(), player.Address + addresses.pawnCasting_offset) ~= 0);

		petupdate()
		local icon,active,autoCastAllowed = RoMScript("GetPetActionInfo(4)")
		if active == true then
			sendMacro("UsePetAction(4)")
		end
		player.LastDistImprove = os.time();   -- global, because we reset it while skill use
	else
		PetWaitTimer = 0
	end

	if not pet:hasBuff(fairy.Buff) then -- Frost Halo, Accuracy Halo...
		sendMacro("UsePetAction(5)")
		yrest(500)
	end
	if not pet:hasBuff(503753) then -- Conceal
		sendMacro("UsePetAction(6)")
		yrest(500)
	end