SolarStrike Software

Code: Select all

Pseudo code for mage:
if(mopscount >=2)then
 repeat    
     if(discharge == ready) then
       cast:discharge
     end
      cast:purgatory-fire
    until(all mops dead in 50 range)

  if( player.live < 90%)then
    use:heal
  end
  if( no attack) then
     repeat 
      pause
    until discharge == ready
  end
end

Code: Select all

<onSkillCast><![CDATA[
	repeat zoneid = RoMScript("GetZoneID()"); until zoneid
	if( zoneid == 352)then
		--- timedelay reduce the time to wait for MAGE_DISCHARGE
		local timedelay = 8  -- reasonable value 1 to 15, suggest less good equiped characters 5 to 8 , good equiped 10 to 15
		-- var fire decrease stress for the bot with the CountTarget function
		local fire = 3   -- reasonable value 1 to 14, l suggest 5 to 8 less good equiped characters 3 to 5 , better equiped 1 to 3
		function CountTargets()
			local counter = 0
			local objectList = CObjectList();
			objectList:update();
				for i = 0,objectList:size() do
					local obj = objectList:getObject(i);
					if( obj ~= nil ) then
						local dist = distance(player.X, player.Z, obj.X, obj.Z)
						if( obj.Type == PT_MONSTER and  dist <= 50)then
							local pawn = CPawn(obj.Address);
							if( pawn.Alive == true)then
								counter = counter +1;
							end
						end
					end
				end
			return counter
		end
		if( CountTargets() >= 2) then
			local skillt = "MAGE_DISCHARGE"
			for i,v in pairs(settings.profile.skills) do
				if( v.Name == skillt ) then
					skillt = v;
					break;
				end
			end
			repeat
				if(skillt:getRemainingCooldown() == 0)then
					player:cast("MAGE_DISCHARGE")
				end
				local counter = 0;
				repeat
					player:cast("MAGE_PURGATORY_FIRE")
					counter = counter + 1;
				until counter >= fire
				
			until CountTargets() == 0

			remain = skillt:getRemainingCooldown()
			if( remain > timedelay)then
				releaseKeys(); -- bot runs too much against walls
				-- timedelay + 1 is because the bot react slowly so we start sooner
                                 
				player:sleep(remain - (timedelay + 1));
			end
			releaseKeys(); -- bot runs too much against walls
		end
	end
	 
	 ]]>
	</onSkillCast>

Code: Select all

  function domimic()
     while player:findNearestNameOrId("Mimic") do
           print("Mimic!")

           mim = player:findNearestNameOrId("Mimic")
           if mim then
             if distance(player.X, player.Z, mim.X, mim.Z) > 100 then
               player:moveTo(CWaypoint(mim.X, mim.Z, mim.Y),true)
             end
           end

           while player.Battling do
                player:fight()
                player:update()
           end 
           
           player:target_Object("Mimic")
           yrest(50)
           player:target_Object("Mimic")
           yrest(250)
     end
  end

Code: Select all

function domimic()
     while player:findNearestNameOrId(122390) do
           print("Mimic!")

           mim = player:findNearestNameOrId(122390)
           if mim then
             if distance(player.X, player.Z, mim.X, mim.Z) > 100 then
               player:moveTo(CWaypoint(mim.X, mim.Z, mim.Y),true)
             end
           end

           while player.Battling do
                player:fight()
                player:update()
           end
           
           player:target_Object(122390)
           yrest(50)
           player:target_Object(122390)
           yrest(250)
     end
  end