SolarStrike Software

Code: Select all

Swimhack ACTIVATED!
Player Teleported to X: 4081    Z: 3586 Y: 75
Player Teleported to X: 3947    Z: 3810 Y: 75
Player Teleported to X: 3948    Z: 3810 Y: 57
We found Treasure Key and will harvest it.
Engaging enemy [Clown Spirit] in combat.
Use MACRO: MAGE_THUNDERSTORM   =>   Clown Spirit (19808/19808)
Use MACRO: MAGE_PURGATORY_FIRE =>   Clown Spirit (13267/19808)
Use MACRO: MAGE_FIREBALL       =>   * aborted *
Fight finished. Killed 1 Clown Spirit. (fight #1 / runtime 23173063 minutes)
Clearing target.
Player Teleported to X: 3961    Z: 3786 Y: 75
Player Teleported to X: 4013    Z: 3948 Y: 75
Player Teleported to X: 4014    Z: 3948 Y: 57
The game client did not crash.
7:43pm - [string "..."]:66: attempt to index local 'clown' (a nil value)

Code: Select all

function checkaggro()
		repeat
			player:update()
			if player.Battling then
				local clown = player:findEnemy(true)
				player.X = clown.X player.Z = clown.Z -- Temporarily change player coords so we can find nearest seal to mob
				local seal = player:findNearestNameOrId(102384)
				player:target(seal) -- kills the summoning portal and not the ghost clown.
				player:fight()
				yrest(2000) -- give a couple of seconds for the clown to disappear.
				player:update()
			end
		until not player.Battling
	end

Code: Select all

function checkaggro()
		repeat
			player:update()
			if player.Battling then
				local clown = player:findEnemy(true)
				if(clown)then
					player.X = clown.X 
					player.Z = clown.Z -- Temporarily change player coords so we can find nearest seal to mob
				end
				local seal = player:findNearestNameOrId(102384)
				player:target(seal) -- kills the summoning portal and not the ghost clown.
				player:fight()
				yrest(2000) -- give a couple of seconds for the clown to disappear.
				player:update()
			end
		until not player.Battling
	end

Code: Select all

function checkaggro()
		repeat
			player:update()
			if player.Battling then
				local clown = player:findEnemy(true)
				if(clown)then
					player.X = clown.X 
					player.Z = clown.Z -- Temporarily change player coords so we can find nearest seal to mob
					local seal = player:findNearestNameOrId(102384)
					player:target(seal) -- kills the summoning portal and not the ghost clown.
					player:fight()
					yrest(2000) -- give a couple of seconds for the clown to disappear.
					player:update()
				end
			end
		until not player.Battling
	end

Code: Select all

function getfragments()
		local sealAddress = 113111
		local queststatus = getQuestStatus(424717)
		
		
		local seal = player:findNearestNameOrId(sealAddress)
		if seal then
				-- goto seal
			teleport(nil,nil,75)            -- go up to height if 75
			teleport(seal.X, seal.Z, 75)	-- teleport to above seal
			teleport(seal.X + 1, seal.Z, 57)	-- teleport in range to click seal

				-- click seal
			repeat
				player:target(seal)
				yrest(100)
				Attack()
				yrest(1000)
				player:update()
			until player:findNearestNameOrId(113108) -- until portal appears
			yrest(2000)
			repeat
				player:update()
				if player.Battling then
					local enemy = player:findNearestNameOrId("Clowngeist")
					player:fight(enemy.Address)
					player:loot()
					yrest(2000) -- give a couple of seconds for the clown to disappear.
					player:update()
				end
				yrest(2000)
				queststatus = getQuestStatus(424717)
			until queststatus == "complete"
			checkaggro()
                        --local sum = player:findNearestNameOrId(113108)
			--player:fight(sum.Address)
		end
				
	end

Code: Select all

When_Finished         = "end"
		-- "end" to end script, "relog" to log next character, "charlist" to use the charlist and "waypointfilename" to load that waypointfile.

Code: Select all

	function getallkeys()
		local tileList = {113108,113109,113110,113111,113113,} -- all other objects in cot
		local seals	= {113112,112959} -- seal tile and killed seal
		local lastSealAddress = 0
		repeat
			local tile = player:findNearestNameOrId(tileList)
			if tile then
				repeat
					player:target(tile)
					yrest(300)
					player:cast("MAGE_THUNDERSTORM")
				until not tile
			end
			
			player:update()
			local seal = player:findNearestNameOrId(seals, lastSealAddress)
			if seal then
				-- click seal
				local keys = inventory:itemTotalCount(203027)
				repeat
					player:target(seal)
					yrest(100)
					Attack()
					yrest(1000)
					player:update()
				until player:findNearestNameOrId(113106) or inventory:itemTotalCount(203027) == keys + 1 -- until a key appears

				-- Remember last seal
				lastSealAddress = seal.Address

				if not inventory:itemTotalCount(203027) == keys + 1 then
					repeat
						player:target_Object(113106,nil,nil,true) -- harvests key
					until inventory:itemTotalCount(203027) == keys + 1
					yrest(500)
				end
			end
		until gotAllKeys()
	end