World of Warcraft - stora tråden om botar och fusk

objectdef oToon inherits oToonBase
{
/****************************************************************************************************  ********************************************************************************************
							Vars
****************************************************************************************************  ********************************************************************************************/
	variable int LastBuffCast = ${LavishScript.RunningTime}
	variable int PetPulled = 1
	variable int MaxCombatRange = 28
	variable guidlist ShardList
	variable guidlist Aggro
	variable string MyPet="Imp"
	variable int CorruCast = 1
	variable int AmpCast = 1
	variable int CoACast = 1
	variable int SLCast = 1
	variable int FearCast=1
	variable int ImmoCast = 1
	variable int UACast = 1
	variable int PetSummon = 1
	variable int HSCreated = 1
	variable int MaxPullRange = 28
	variable int MinPullRange = 10
	variable int Pull = 1
	variable string PullSpell = "Shadow Bolt"
	variable int MinMana = 50
	variable int MinHealth = 60
	variable int HSHealth = 40
	variable int WandHealth = 0
	variable int PanicHealth = 20			/* Health % that I Deathcoil & Fear */
	variable int ComDPMyMana = 85			/* Minimum mana I have before I combat dark pact */
	variable int ComDPPetMana = 15			/* Minimum mana pet has before combat dark pact */
	variable int ComLTHealth = 50			/* Minimum health before I won't life tap in combat */
	variable int ComLTMana = 80			/* Minimum mana before I life tap in combat */
	variable int DrainSoulHP = 30			/* Health amount I begin drain soul if needed */
	variable int DrainLifeHP = 90			/* Minimum health I have before I drain life instead of nuke */
	variable int FunnelPetHP = 50			/* Health Funnel pet if below this during rest */
	variable int FunnelMyHP = 70			/* Minimum health I have in order to health funnel during rest */
	variable int RestDPMyMana = 85			/* Minimum mana I have before I rest dark pact */
	variable int RestDPPetMana = 15			/* Minimum mana pet has before rest dark pact */
	variable int RestLTHealth = 50			/* Minimum health before I won't life tap in rest */
	variable int RestLTMana = 80			/* Minimum mana before I life tap in rest */
	variable int PetWait = 5000
	variable bool useCorruption = TRUE
	variable bool useAmp = TRUE
	variable bool FearJuggle = FALSE
	variable bool useCoA = TRUE
	variable bool useSiphonLife = TRUE
	variable bool useUnstableAffliction = TRUE
	variable bool useImmolate = TRUE
	variable bool useSearingPain = TRUE
	variable bool useIncinerate = TRUE
	variable bool useDrainLife = TRUE
	variable bool FearElites = FALSE
	variable bool usePull = TRUE
	variable bool useRestBoth = TRUE
	variable bool WandNoNuke = FALSE
	variable int TankRating = 2
	variable int DpsRating = 10
	variable int HealRating = 0
/****************************************************************************************************  ********************************************************************************************
							Main
****************************************************************************************************  ********************************************************************************************/
	method Routine()
	{
		This:SetDistances
		if ${Target.Distance}<=${This.MaxCombatRange}
		{
			move -stop
		}
		if ${Me.PctHPs} < ${This.HSHealth}
		{
			if ${Item[Healthstone](exists)} && !${This.AmWanding} && !${Me.Action[Shoot].Cooldown}
			{
				Item[Healthstone]:Use
			}
		}
		if ${Target.Distance}<=7 && ${Me.PctHPs} < ${This.PanicHealth}
		{
			if ${Me.Action[Death Coil].Usable} && ${Spell[Death Coil](exists)}
			{
				if !${This.AmWanding} && !${Me.Action[Shoot].Cooldown}
				{
					This:CastInstantSpell[Death Coil]
					return
				}
				return
			}
			elseif ${Spell[Fear](exists)}&&${Me.Action[Fear].Usable} && ${FearCast} < ${LavishScript.RunningTime}
			{
				if !${This.AmWanding} && !${Me.Action[Shoot].Cooldown}
				{
					This:CastSpell[Fear]
					return
				}
				return
			}
		}
		if ${WoWScript[UnitCastingInfo("player")].Equal[Drain Soul]} && ${Target.PctHPs} > ${This.DrainSoulHP}
		{
			WoWScript SpellStopCasting()
			return
		}
     	  	if ${Me.Pet(exists)} && !${Me.Pet.Target(exists)}
        	{
        			wowscript PetAttack()
		}
		if !${Me.InCombat}
		{
			PetPulled:Set[${LavishScript.RunningTime} + ${PetWait}]
		}
		if ${Me.Casting} || ${Me.GlobalCooldown} > 0 || ${Target.Distance}>${This.MaxCombatRange} || ${PetWait} && ${PetPulled} > ${LavishScript.RunningTime}
		{
			return
		}
		if !${Me.Attacking} && !${Me.Action[Shoot].AutoRepeat} && !${This.WandHealth}
		{
			WoWScript AttackTarget()
		}
		if ${Me.Pet(exists)} && ${Spell[Dark Pact](exists)}
		{
			if ${Me.Pet.PctMana} > ${This.ComDPPetMana} && ${Me.PctMana} < ${This.ComDPMyMana}
			{
				if !${This.AmWanding} && !${Me.Action[Shoot].Cooldown}
				{
					This:CastInstantSpell[Dark Pact]
					return
				}
				return
			}
		}
		if ${Me.PctHPs} > ${ComLTHealth} && ${Me.PctMana} < ${ComLTMana} && ${Spell[Life Tap](exists)}
		{
			if !${This.AmWanding} && !${Me.Action[Shoot].Cooldown}
			{
				This:CastInstantSpell[Life Tap]
				return
			}
			return
		}
		ShardList:Search[-items,-inventory,Soul Shard]
		if ${ShardList.Count}< ${This.NumShards} && ${Target.PctHPs} < ${This.DrainSoulHP} &&${Spell[Drain Soul](exists)}
		{
			if !${This.AmWanding} && !${Me.Action[Shoot].Cooldown}
			{
				This:CastSpell[Drain Soul]
				return
			}
			return
		}
		elseif ${Me.Buff[Shadow Trance](exists)}&&${Me.Action[Shadow Bolt].Usable}&&${Target(exists)}
		{
			if !${This.AmWanding} && !${Me.Action[Shoot].Cooldown}
			{
				This:CastInstantSpell[Shadow Bolt]
				return
			}
			return
		}
		elseif ${Me.Pet(exists)} && ${Me.Pet.PctHPs}<= ${This.FunnelPetHP} && ${Me.PctHPs} >= ${This.FunnelMyHP}
		{
			This:CastSpell[Health Funnel]
		}
		elseif ${Target.PctHPs} < ${This.WandHealth} && ${Me.Equip[ranged](exists)} && ${Target.Distance}<=30
		{
			if  !${Me.Action[Shoot].AutoRepeat} && !${Me.Action[Shoot].Cooldown}
			{
				Me.Action[Shoot]:Use
				This:Wait[100]
			}
			return
		}
		if ${FearJuggle} && ${Me.Action[Fear].Usable} && !${Target.Buff[Fear](exists)} && ${FearCast} < ${LavishScript.RunningTime}
		{
			This:CastSpell[Fear]
			return
		}
		if ${FearElites} && (${Target.Classification.Equal["Elite"]} || ${Target.Classification.Equal["RareElite"]}) && ${Spell[Fear](exists)}&&${Me.Action[Fear].Usable} && ${FearCast} < ${LavishScript.RunningTime} && !${Target.Buff[Fear](exists)}
		{
			This:CastSpell[Fear]
			return
		}
		if ${useAmp} && ${Me.Action[Amplify Curse].Usable} && !${Target.Buff[Curse of Agony](exists)}
		{
			This:CastInstantSpell[Amplify Curse]
			return
		}
		elseif ${useCoA} && !${Target.Buff[Curse of Agony](exists)}&&${Me.Action[Curse of Agony].Usable}&&${CoACast} < ${LavishScript.RunningTime}&&${AmpCast} < ${LavishScript.RunningTime}
		{
			This:CastInstantSpell[Curse of Agony]
			return
		}
		if ${useCorruption} && !${Target.Buff[Corruption](exists)}&&${Me.Action[Corruption].Usable}&&${CorruCast} < ${LavishScript.RunningTime}
		{
			This:CastSpell[Corruption]
			return
		}
		if ${useSiphonLife} && !${Target.Buff[Siphon Life](exists)}&&${Me.Action[Siphon Life].Usable}&&${SLCast} < ${LavishScript.RunningTime}
		{
			This:CastInstantSpell[Siphon Life]
			return
		}
		if ${useUnstableAffliction} && !${Target.Buff[Unstable Affliction](exists)}&&${Me.Action[Unstable Affliction].Usable}&&${UACast} < ${LavishScript.RunningTime}
		{
			This:CastSpell[Unstable Affliction]
			return
		}
		if ${useImmolate} && !${Target.Buff[Immolate](exists)}  && ${Me.Action[Immolate].Usable}&&${ImmoCast} < ${LavishScript.RunningTime}
		{
			This:CastSpell[Immolate]
			return
		}
		if ${FearJuggle}
		{
			return
		}
		if ${useDrainLife} && ${Me.Action[Drain Life].Usable} && ${Me.PctHPs} < ${This.DrainLifeHP}
		{
			This:CastSpell[Drain Life]
			return
		}
		if ${WandNoNuke} && ${Me.Equip[ranged](exists)}  && ${Target.Distance}<=30
		{
			if  !${Me.Action[Shoot].AutoRepeat} && !${Me.Action[Shoot].Cooldown}
			{
				Me.Action[Shoot]:Use
				This:Wait[100]
			}
			return
		}
		if ${useIncinerate} && ${Me.Action[Incinerate].Usable}
		{
			This:CastSpell[Incinerate]
			return
		}
		elseif  ${useSearingPain} && ${Me.Action[Searing Pain].Usable}
		{
			This:CastSpell[Searing Pain]
			return
		}
		elseif ${Me.Action[Shadow Bolt].Usable}
		{
			This:CastSpell[Shadow Bolt]
			return
		}
	}
/****************************************************************************************************  ********************************************************************************************
							Buff Pulse and Need
****************************************************************************************************  ********************************************************************************************/
	member NeedBuff()
	{
		ShardList:Search[-items,-inventory,Soul Shard]
		if !${Me.Pet(exists)} && ${Spell[Summon ${MyPet}](exists)}
		{
			if ${This.MyPet.Equal["Imp"]}
			{
				return TRUE
			}
			elseif ${Item[Soul Shard](exists)}
			{
				return TRUE
			}
		}
		if !${Item[Healthstone](exists)} && ${Spell[Create Healthstone](exists)}
		{
			if ${ShardList.Count} >= 1 && ${Inventory.FreeBagSlots} >= 2
			{
				return TRUE
			}
		}
		if ${Me.Pet(exists)} && ${Me.Pet.PctHPs}<=${This.FunnelPetHP} && ${Spell[Health Funnel](exists)} && ${Me.