empty then if Too_Many_Shells == "pause" then -- Wait for user to use some shells. cprintf(cli.yellow,"Reaching the maximum number of Phirius Shells ("..(shells+empty).."). Please spend some before continuing.\n") player:sleep() numshells = getCurrency("shell") elseif Too_Many_Shells == "skip" then print("Too many Phirius Shells.") logentry = "Too many Phirius Shells." checkRelog() return elseif Too_Many_Shells == "continue" then -- Do nothing and continue. else error("Wrong value used for 'Too_Many_Shells' option.") end end local empties = inventory:itemTotalCount(0) local emptylimit = tonumber(Bag_Space_Limit) or 20 if emptylimit > empties then if Not_Enough_Bag_Space == "pause" then -- Wait for user to make some space in inventory. cprintf(cli.yellow,"Not much space left in inventory. Are you sure you want to continue with only %d spaces left?\n",empties) player:sleep() elseif Not_Enough_Bag_Space == "skip" then print("Not enough bag space.") logentry = "Not enough bag space." checkRelog() return elseif Not_Enough_Bag_Space == "continue" then -- Do nothing and continue. else error("Wrong value used for 'Not_Enough_Bag_Space' option.") end end --=== user options ===-- if(inventory:itemTotalCount(241648) >= inventory:itemTotalCount(241647) or autobalance == false)then whichgame = 1 else whichgame = 2 requiredscore = requiredscore2; settings.profile.options.FORCE_BETTER_AOE_TARGETING = true; end -- Move to Kate Wesker and enter if getZoneId() == 2 then repeat yrest(100) until player:target_NPC(id_kate) ChoiceOptionByName(getTEXT("SKWERL_MOBIUS_24")) yrest(1000) waitForLoadingScreen() end -- Move to Magelly Basac repeat yrest(100) until player:target_NPC(id_magelly) -- Check if we already completed if RoMScript("GetNumSpeakOption()") > 1 then if(whichgame == 1) then ChoiceOptionByName(getTEXT("SKWERL_MOBIUS_14")) yrest(1000) ChoiceOptionByName(getTEXT("SKWERL_MOBIUS_25")) yrest(1000) ChoiceOptionByName(getTEXT("SYS_OKAY")) yrest(1000) --(might be wrong) else sendMacro("ChoiceOption(2);"); yrest(1000) sendMacro("ChoiceOption(1);"); yrest(1000) ChoiceOptionByName(getTEXT("SYS_OKAY")) end local round = 0 local score = 0 function tort() local function one(ID) local objectList = CObjectList(); objectList:update(); local objSize = objectList:size() for i = 0,objSize do obj = objectList:getObject(i) obj:update() if (obj ~= nil and obj.Id == ID or obj.Id == 106885) and checkclicked(obj.Address) then player:target(obj) RoMScript("UseExtraAction(1)") player:target(obj) RoMScript("UseExtraAction(1)") if ID == 106883 then -- yrest(10) player:target(obj) RoMScript("UseExtraAction(1)") end end end end local function two(NumExtraButton) local turtleobj = player:findNearestNameOrId({106881,106883,106884},nil, checkclicked); if(turtleobj ~= nil)then local turtlepawn = CPawn(turtleobj.Address) --table.print(turtlepawn); local mobcount, x, z = turtlepawn:findBestClickPoint(50, 300, false, pawnevalfunc) print("found "..mobcount.." enemys \n") if(mobcount >= 3)then RoMScript("UseExtraAction("..NumExtraButton..")") player:aimAt({X=x, Z=z, Y=turtlepawn.Y}) player.LastSkill.AimedAt = {X=x, Z=z, Y=turtlepawn.Y} player:clickToCast() else one(106882) one(106882) one(106881) one(106883) one(106884) return 0; end else one(106882) one(106882) one(106885) return 0; end return -1; end if player:findNearestNameOrId({106881,106882,106883,106884}) then --== monitor chat EventMonitorStart("Tortevent", "SYSTEM_MESSAGE"); local time, moreToCome, name, msg, _go repeat time, moreToCome, name, msg = EventMonitorCheck("Tortevent",1) yrest(10) if name and string.find(name,goMessage) then _go = true end until _go == true EventMonitorStop("Tortevent") round = round + 1 print("Wave: "..round..", Score: "..score) if(whichgame == 2)then player:updateBuffs() local icon; local found = false; local slow = false; local AoeBuff, SlowBuff, Ecount, AoEcount; AoeBuff,AoEcount = player:hasBuff(622646); SlowBuff,Ecount = player:hasBuff(622647); local button = 1; repeat icon = RoMScript("GetExtraActionInfo("..button..")"); if(icon and string.find(icon,"skill_boss_skill_42.dds") and AoeBuff)then found = true; break; end if(icon and string.find(icon,"skill_boss_skill_26") and SlowBuff)then found = true; slow = true; break; end button = button + 1; until icon == nil if(Ecount > 0 and slow)then AoEcount = Ecount end repeat --print("found buffs: "..AoEcount.." \n") if(AoEcount <= 0 or not found)then one(106882) one(106882) one(106881) one(106883) one(106884) else one(106882) one(106882) AoEcount = two(button) + AoEcount; end player:updateBuffs() until (not player:findNearestNameOrId({106881,106882,106883,106884,106885}) ) else repeat one(106882) one(106882) one(106881) one(106883) one(106884) until not player:findNearestNameOrId({106881,106882,106883,106884,106885}) end end end repeat yrest(100) until player:findNearestNameOrId(106881) print("OK event has started") repeat tort() player:update() buffed = player:getBuff(622402) if buffed then score = buffed.Level end until not player:hasBuff(622402) or ( buffed and buffed.Level > requiredscore ) printf("Event finished, end score was "..score); checkRelog(); else repeat sendMacro("ChoiceOption(1);"); if(RoMScriptNoCheck ~= nil)then local info = nil; repeat yrest(100); info = RoMScriptNoCheck("StaticPopup_OnClick(StaticPopup1, 1);"); until info == nil or info ~= -1 else RoMScript("StaticPopup_OnClick(StaticPopup1, 1);") end until waitForLoadingScreen(30) loadPaths(When_Finished) end ]]>