Nyerk

Code: Select all

--[[

	--------------------------------------------------
	Copyright (C) 2011 Blastradius, macrokor, rellis

    This program is free software: you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation, either version 3 of the License, or
    (at your option) any later version.

    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.
	--------------------------------------------------
	
]]--

--[[
KNOWN STATE ID'S 
- State Name = Stunning Shot II - State ID = 679
- State Name = Stunned - State ID = 8217
- State Name = Entangling Shot III - State ID = 676
- State Name = No Name (Godstone: Deltras's Loyalty) State ID = 8540
- State Name = Shackle Arrow I - State ID = 672
- State Name = Sleep Arrow I - State ID = 695
]]--

function CountMobs( EntityTarget, Distance )

	local i = 0;
	
	-- Iterate through all entities
	for ID, Entity in DictionaryIterator( EntityList:GetList()) do
		-- Check if the entiy is valid.
		if Entity ~= nil then
			-- Retrieve the entity state.
			local EntityState = Entity:GetState();
			-- Check if the entity state is valid.
			if EntityState ~= nil then
				-- Check if this is a living monster that is in range.
				if Entity:IsMonster() and not Entity:IsDead() and Entity:IsHostile() and EntityTarget:GetPosition():DistanceToPosition( Entity:GetPosition()) <= Distance then
					-- Check if this entity is sleeping
					if EntityState:GetState( Helper:CheckName( "Sleep Arro" )) ~= nil then
						return 0;
					-- Increment the number.
					else
						i = i + 1;
					end
				end
			end
		end
	end
	
	return i;
	
end

function SleepMultipleAttacker( EntityTarget, AttackRange )
	-- Check if we have stored a target.
	if self._SleepTarget ~= nil then
		-- Check if the current target is the stored target.
		if self._SleepTarget:GetID() == Player:GetTargetID() then
			-- Check if Sleep Arrow is available.
			if Helper:CheckAvailable( "Sleep Arro" ) then
				-- Shoot the Sleep Arrow.
				Helper:CheckExecute( "Sleep Arro" );
				-- Indicate we cannot continue attacking.
				return false;
			else
				-- Set the target.
				Player:SetTarget( self._SleepTargetRestore );
				-- Indicate we cannot continue attacking.
				return false;
			end
		-- Check if the current target is the original target.
		elseif not Helper:CheckAvailable( "Sleep Arro" ) and self._SleepTargetRestore:GetID() == EntityTarget:GetID() then
			-- Clear the sleep target.
			self._SleepTarget = nil;
			-- Indicate we cannot continue attacking.
			return true;
		else
			-- Set the target.
			Player:SetTarget( self._SleepTarget );
			-- Indicate we cannot continue attacking.
			return false;
		end
	end
	-- Check if Sleep Arrow is available.
	if Helper:CheckAvailable( "Sleep Arro" ) then
		-- Loop through the entities.
		for ID, Entity in DictionaryIterator( EntityList:GetList()) do
			-- Check if this entity is a monster, is not friendly and decided to attack me (and obviously is not my current target).
			if not Entity:IsDead() and Entity:IsMonster() and not Entity:IsFriendly() and Entity:GetTargetID() == Player:GetID() and Entity:GetID() ~= EntityTarget:GetID() then
				-- Check if the entity that is attacking us is within range.
				if Entity:GetPosition():DistanceToPosition( Player:GetPosition()) <= AttackRange then
					-- Store the sleep target.
					self._SleepTarget = Entity;
					-- Store the restore target.
					self._SleepTargetRestore = EntityTarget;
					-- Set the target.
					Player:SetTarget( Entity );
					-- Indicate we cannot continue attacking.
					return false;
				end
			end
		end
	end
	-- Indicate we can continue attacking.
	return true;
end

--- Perform the attack routine on the selected target.
--
-- @param	Entity	Contains the entity we have targeted.
-- @param	double	Contains the distance to the target
-- @param	bool	Indicates whether or not the target is stunned.
-- @return	bool

function Attack( Entity, Range, Stunned, SkipFocusedEvasion )

	local TripeedFruit = InventoryList["Tripeed Fruit"];
	local TripeedSeed = InventoryList["Tripeed Seed"];
	local AttackRange = Player:GetAttackRange();
	
	-- Correct the attack range when using Bestial Fury.
	if Player:GetState():GetState( Helper:CheckName( "Parting Sho" )) then
		AttackRange = AttackRange - 5;
	end

	-- Check if we are allowed to sleep attackers.
	if Settings.Ranger.AllowSleep and not self:SleepMultipleAttacker( Entity, AttackRange ) then
		return false;
	end
	
	
	--------------------------------------------------
	--     I N I T I A L   A T T A C K (S) (I)      --
	--------------------------------------------------
	
	-- Initial Attack 1: Automatic Attack
	if self.AttackStarted ~= Entity:GetID() then
		self.AttackStarted = Entity:GetID();
		Helper:CheckExecute( "Attack/Chat" );
		return false;
	end
	
	--------------------------------------------------
	--        N O R M A L   A T T A C K (S)         --
	--------------------------------------------------
	
	-- Demonstration of using the multicast mechanism on a muse.
--
-- ~ By Blastradius
--

-- Contains the multicast level.
local Level = 0
-- Contains the previous identifier.
local PreviousId = 0

--
-- Perform a begin to end attack routine.
--
function OnRun()
	-- Find the selected target entity.
	local Target = EntityList:GetEntity(Player:GetTargetId())
	-- Check if a selected target is available and is alive.
	if Target ~= nil and not Target:IsDead() then
		-- Retrieve the skill identifier.
		local Id = Player:GetSkillId()
		-- Check if the skill identifier has not been set.
		if Id == 0 then
			-- Initialize the multicast level.
			Level = 0
			-- Initialize the previous identifier.
			PreviousId = 0
			-- Begin with the Incendiary Shell ability.
			Do("Incendiary Shell");
		-- Otherwise check if the previous identifier is invalid.
		elseif PreviousId == 0 then
			-- Initialize the multicast level.
			Level = 1
			-- Set the previous identifier.
			PreviousId = Id
		-- Otherwise check if the identifier has increased.
		elseif Id > PreviousId then
			-- Increment the multicast level.
			Level = Level + 1
			-- Set the previous identifier.
			PreviousId = Id
			-- Check if the desired multicast level has been achieved.
			if Level == 3 then
				-- End with the Incendiary Shell ability.
				Do("Incendiary Shell");
			end
		end
	end
end

--
-- Perform an ability without condition checking.
--
function Do(Name)
	-- Find the ability with the specified name.
	local Ability = AbilityList:GetAbility(Name)
	-- Check if the ability is valid.
	if Ability ~= nil then
		-- Input the command to do the ability.
		PlayerInput:Console("/Skill " .. Ability:GetName())
	end
end

		if Helper:CheckAvailable( "Steal Health" ) then
		Helper:CheckExecute( "Steal Health" );
		return false;
		elseif Helper:CheckAvailable( "Remove Shock" ) then 
		Helper:CheckExecute( "Remove Shock" );
		return false;
		end
    	
    	if Helper:CheckAvailable( "Spend Success" ) and Player:GetDP() >= 2000 then
		    Helper:CheckExecute( "Spend Success" );
		   	return false;
		end
		
		if Helper:CheckAvailable( "Bulletproof" ) then
	    	Helper:CheckExecute( "Bulletproof", Player );
	    	return false;
    	end
		
		if Helper:CheckAvailable( "Bullet Resistance" )  and Player:GetHealth() <= 70 then
		    Helper:CheckExecute( "Bullet Resistance" );
	    	return false;
	    end
		
	
		if Helper:CheckAvailable( "Autoload" ) and Player:GetManaCurrent() < Player:GetManaMaximum() - 3000 then
		Helper:CheckExecute( "Autoload", Entity );
		return false;
		end 
		
	    if Helper:CheckAvailable( "Nature's Favor" ) then
	    	Helper:CheckExecute( "Nature's Favor", Player );
	    	return false;
    	end
    	if Helper:CheckAvailable( "Aion's Favor" ) then
	    	Helper:CheckExecute( "Aion's Favor", Player );
	    	return false;
	    end
		if Helper:CheckAvailable( "Pressurized Chamber" ) then
			Helper:CheckExecute( "Pressurized Chamber", Player );
			return false;
		end
		
		-- Skills starts
		
		if Helper:CheckAvailable( "Hot Shot" ) then                
                Helper:CheckExecute( "Hot Shot" )                
                return false;
        end
		
		if Helper:CheckAvailable( "Green Grenade" ) then                
                Helper:CheckExecute( "Green Grenade" )                
                return false;
        end
		
        if Helper:CheckAvailable( "Direct Shot" ) then                
                Helper:CheckExecute( "Direct Shot" )                
                return false;
        end
		
        if Helper:CheckAvailable( "Hemorrhage Shot" ) then
                Helper:CheckExecute( "Hemorrhage Shot" )
                return false;
        end
		
		-- Chain Attack 1: Crosstrigger
		if Helper:CheckAvailable( "Crosstrigger" ) then
		Helper:CheckExecute( "Crosstrigger" );
		end        
		
		if Helper:CheckAvailable( "Reload" ) then
	    	Helper:CheckExecute( "Reload" );
	    	return false;
    	end	
		
		if Helper:CheckAvailable( "Spinning Fire" ) then
	    	Helper:CheckExecute( "Spinning Fire" );
	    	return false;
    	end	
		
        if Helper:CheckAvailable( "Wing Clip" ) then                
                Helper:CheckExecute( "Wing Clip" )                
                return false;
        end
		
     	if Helper:CheckAvailable( "Pulverizer Cannon" ) then
				Helper:CheckExecute( "Pulverizer Cannon" );
		end 
		
        if Helper:CheckAvailable( "Quieting Gale" ) then
                Helper:CheckExecute( "Quieting Gale" )                
                return false;
        end	
		               
        if Helper:CheckAvailable( "Autoload" ) then
			Helper:CheckExecute( "Autoload" );
			return false;
		end
		
        if Helper:CheckAvailable( "Steady Fire" ) then
            Helper:CheckExecute( "Steady Fire" )
            return false;
        end	
		
		if Helper:CheckAvailable( "Anti-Enemy Fire " ) then
            Helper:CheckExecute( "Anti-Enemy Fire " )
            return false;
        end	
      	    
end

--- Perform healing checks both in and our of combat.
--
-- @param	bool	Indicates whether or not the function is running before force checks.
-- @return	bool

function Heal( BeforeForce )

	-- Nothing was executed, continue with other functions.
	return true;
	
end

--- Perform the safety checks before moving to the next target.
--
-- @return	bool

function Pause()
	
	-- Nothing was executed, continue with other functions.
	return true;
	
end

Code: Select all

-- Contains the maximum distance of the area in which to search for targets (Requires AllowTargetSearch).
	self.TargetSearchDistance = 15;

Code: Select all

function SleepMultipleAttacker( EntityTarget, AttackRange )

Code: Select all

local TripeedFruit = InventoryList["Tripeed Fruit"]; local TripeedSeed = InventoryList["Tripeed Seed"];

Code: Select all

function CountMobs( EntityTarget, Distance )