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) if(obj)then obj:update() if (obj ~= nil and obj.Id == ID or obj.Id == 106885 or obj.Id == 106882) and checkclicked(obj.Address) then player:target(obj) RoMScript("UseExtraAction(1)") player:target(obj) RoMScript("UseExtraAction(1)") if ID == 106883 then player:target(obj) RoMScript("UseExtraAction(1)") end end end end end local function two(NumExtraButton,targetmode) local turtleobj = player:findNearestNameOrId({106881,106883},nil, checkclicked); if(turtleobj ~= nil)then local turtlepawn = CPawn(turtleobj.Address) local mobcount, x, z if(targetmode)then mobcount, x, z = turtlepawn:findBestClickPoint(20, 300, false, pawnevalfunc) else mobcount, x, z = turtlepawn:findBestClickPoint(20, 300, false, pawnevalfunc, myexclude) end if(mobcount >= 3)then if(targetmode)then print("We using slowing-AoE on :"..mobcount.." enemys") else print("We using dmg-AoE on :"..mobcount.." enemys") end 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 return false; end else return false; end return true; end if player:findNearestNameOrId({106881,106882,106883,106884,106885}) 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) 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; if(whichgame == 2 or useinbothmods)then repeat button = 1 repeat icon = RoMScript("GetExtraActionInfo("..button..")"); if(icon and string.find(icon,"skill_boss_skill_42.dds")and round < 8)then found = true; slow = false; break; end if(icon and string.find(icon,"skill_boss_skill_26") and round < 8)then found = true; slow = true; break; end button = button + 1; until icon == nil if(slow and found)then two(button,slow) end --bugs while( player:findNearestNameOrId(106883,nil, checkclicked))do one(106883) end --bunnys while( player:findNearestNameOrId(106884,nil, checkclicked) )do one(106884) end --newt while( player:findNearestNameOrId(106882,nil, checkclicked) )do one(106882) end --turtle while( player:findNearestNameOrId(106881,nil, checkclicked))do if( found == true )then two(button, slow) local newicon = RoMScript("GetExtraActionInfo("..button..")") if(newicon == nil or (string.find(newicon,"skill_boss_skill_26") and round >= 8) )then found = false; end end one(106881) end until (not player:findNearestNameOrId({106881,106882,106883,106884,106885}) ) else repeat button = 1 repeat icon = RoMScript("GetExtraActionInfo("..button..")"); if(icon and string.find(icon,"skill_boss_skill_42.dds")and round < 8)then found = true; slow = false; break; end if(icon and string.find(icon,"skill_boss_skill_26") and round < 8)then found = true; slow = true; break; end button = button + 1; until icon == nil if(slow and found)then two(button,slow) end while( player:findNearestNameOrId(106883,nil, checkclicked))do one(106883) end while( player:findNearestNameOrId(106882,nil, checkclicked) )do one(106882) end while( player:findNearestNameOrId(106881,nil, checkclicked))do if( found == true )then two(button, slow) local newicon = RoMScript("GetExtraActionInfo("..button..")") if(newicon == nil or (string.find(newicon,"skill_boss_skill_26") and round >= 8) )then found = false; end end one(106881) end while( player:findNearestNameOrId(106884,nil, checkclicked) )do one(106884) end 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; yrest(100); info = RoMScriptNoCheck("StaticPopup_OnClick(StaticPopup1, 1);"); else RoMScript("StaticPopup_OnClick(StaticPopup1, 1);") end until waitForLoadingScreen(30) loadPaths(When_Finished) end ]]>