cprintf(cli.pink, "\n\n\nWaypoint create by Kuripot\n\n\n") loadProfile("Main") setwindow(206879) changeProfileOption("INV_AUTOSELL_FROMSLOT", 1) changeProfileOption("INV_AUTOSELL_TOSLOT", 30) changeProfileOption("EGGPET_ENABLE_ASSIST", "true") changeProfileOption("INV_AUTOSELL_ENABLE", "true") changeProfileOption("AUTO_ELITE_FACTOR", 1000) settings.profile.friends = {"Incomplete Bloody Beast"} dura = 0.9 Magic_Tambourine = true Magic_Guitar = true __WPL:setWaypointIndex(__WPL:findWaypointTag("start")) Count = 0 Zid = 0 BuffCount = 0 srun = 1 if not eventparty then function eventparty() checkeventparty() end end function Cooldown() item = inventory:findItem(instrumentID) if item then if item.SlotNumber > 60 then _slot = item.SlotNumber - 60 func = "GetBagItemCooldown" elseif 51 > item.SlotNumber then _slot = item.SlotNumber func = "GetGoodsItemCooldown" else error("There is no cooldown function for the magic box. Take the item out of the box.") end end repeat local maxCD, CurrentCD = RoMScript(func.."(".._slot..");") yrest(1000) -- 1 second rest until CurrentCD == 0 end function CleanBagDOD() for i, item in pairs(inventory.BagSlot) do if item.SlotNumber >= settings.profile.options.INV_AUTOSELL_FROMSLOT + 60 and settings.profile.options.INV_AUTOSELL_TOSLOT + 60 >= item.SlotNumber then if item:isType("Materials") then item:delete() end if item:isType("Arrows") then item:delete() end if item:isType("Projectiles") then item:delete() end if ( item:isType("Weapons") or item:isType("Armor") ) and (1000 > item.Worth and 5 > item.Quality)then item:delete() end if item:isType("Equipment Enhancement") then item:delete() end if item.Name == "Wild Boar Meat" then item:delete() end if item:isType("Potions") then item:delete() end end end end function Boss_buff() if Magic_Tambourine == true then if inventory:itemTotalCount(204463) >= 1 then inventory:useItem(204463) -- 3 days yrest(5500) elseif inventory:itemTotalCount(204571) >= 1 then inventory:useItem(204571) -- 7 days yrest(5500) elseif inventory:itemTotalCount(206420) >= 1 then inventory:useItem(206420) -- 30 days yrest(5500) end elseif Magic_Tambourine == party_true then yrest(5500) end if Magic_Guitar == true then if inventory:itemTotalCount(204461) >= 1 then inventory:useItem(204461) -- 3 days yrest(5500) elseif inventory:itemTotalCount(206418) >= 1 then inventory:useItem(206418) -- 7 days yrest(5500) elseif inventory:itemTotalCount(204569) >= 1 then inventory:useItem(204569) -- 30 days yrest(5500) end elseif Magic_Tambourine == party_true then yrest(5500) end changeProfileSkill("MAGE_FLAME", "AutoUse", true); changeProfileSkill("MAGE_FIREBALL", "AutoUse", true); changeProfileSkill("MAGE_FLAME", "Priority", 90); changeProfileSkill("MAGE_FIREBALL", "Priority", 100); useGoodie("matt"); useGoodie("mdmg2"); useGoodie("mdmg"); useGoodie("matt3"); useGoodie("casting"); useGoodie("speed"); useGoodie("defense"); useGoodie("luck"); player:cast("MAGE_ESSENCE_OF_MAGIC"); player:cast("PRIEST_MAGIC_BARRIER"); player:cast("MAGE_ENERGY_INFLUX"); player:cast("MAGE_ELECTROSTATIC_CHARGE"); player:cast("MAGE_INTENSIFICATION"); player:cast("MAGE_ELEMENTAL_CATALYSIS"); player:cast("PRIEST_REGENERATE"); end function Memoscount() Memosbeforeloot = inventory:getItemCount(206879) end function trash_boss() local target = player:getTarget() local _tb = false local spawnboss = player:findNearestNameOrId("Okander \"Mad Man\" Mallen") if spawnboss then Boss_buff() player:target(spawnboss) if target.HP > 0 then player:update(); player:cast("MAGE_FLAME"); yrest(1000); cprintf(cli.pink, "Kame Hame Wave!!!\n") if( arg1.Name == "MAGE_FLAME" ) then player:cast("MAGE_FLAME"); cprintf(cli.pink, "Kame Hame Wave!!!!!\n") yrest(1000); end player:cast("MAGE_FLAME"); yrest(1000); cprintf(cli.pink, "Kame Hame Wave!!!\n") player:cast("MAGE_FLAME"); yrest(1000); _tb = false else _tb = true end else _tb = true end return _tb end function Countround() Count = Count+1; cprintf(cli.pink, "Round Number: %s\n\n", Count) end function checkdura() if dura > inventory:getMainHandDurability() then __WPL:setWaypointIndex(__WPL:findWaypointTag("mech")) end local bcount = inventory:getItemCount(0) if( 5 > bcount ) then __WPL:setWaypointIndex(__WPL:findWaypointTag("mech")) end end function findzi() local getinlvl = sendMacro('GetInstanceLevel("normal")') if getinlvl == ("easy") then zid = 128 elseif getinlvl == ("normal") then zid = 127 elseif getinlvl == ("hard") then zid = RoMScript("GetZoneID()"); sendMacro('SetInstanceLevel("easy")'); cprint(cli.blue, "Instance Lvl change to easy\n") end keyboardHold( settings.hotkeys.MOVE_FORWARD.key ) yrest(400) keyboardPress(settings.hotkeys.JUMP.key) yrest(1000) keyboardRelease( settings.hotkeys.MOVE_FORWARD.key ) waitForLoadingScreen(30) yrest(500) end function ireset() SlashCommand("rdd") yrest(500) SlashCommand("rdi") yrest(1000) SlashCommand("aid normal") end checkdura() ireset() findzi() --player:update local zoneid = RoMScript("GetZoneID()") if zoneid == 209 then __WPL:setWaypointIndex(__WPL:findWaypointTag("enter")) else __WPL:setWaypointIndex(__WPL:findWaypointTag("instance")) end Countround() fly() __WPL:setForcedWaypointType("TRAVEL") teleportToWP() teleportToWP() teleportToWP() flyoff() teleportToWP() __WPL:setForcedWaypointType("NORMAL") trash_boss() player:lootAll() settings.profile.friends = {"Incomplete Bloody Beast"} useGoodie("godspeed"); CleanBagDOD() fly() teleportToWP() teleportToWP() teleportToWP() teleportToWP() flyoff() findzi() local zoneid = RoMScript("GetZoneID()") if zoneid == zid then ireset() waitForLoadingScreen() __WPL:setWaypointIndex(__WPL:findWaypointTag("return")) else __WPL:setWaypointIndex(__WPL:findWaypointTag("start")) end local bcount = inventory:getItemCount(0) player:update() player:merchant(115536) --== no more works on Chapter IV ==-- yrest(500) local cbcount = inventory:getItemCount(0) if bcount == cbcount then if player:openStore(115536) then for i, item in pairs(inventory.BagSlot) do if item.SlotNumber >= settings.profile.options.INV_AUTOSELL_FROMSLOT +60 and settings.profile.options.INV_AUTOSELL_TOSLOT +60 >= item.SlotNumber then item:use() -- sells it to the store end end end end __WPL:setWaypointIndex(__WPL:findWaypointTag("start")) player:update() flyoff() __WPL:setForcedWaypointType("TRAVEL") if not player.Mounted then player:mount() end yrest(6000) waitForLoadingScreen() player:dismount() yrest(1000) player:target_NPC("Jake Wallanda") sendMacro("ChoiceOption(1);") waitForLoadingScreen() __WPL:setWaypointIndex(__WPL:findWaypointTag("start"))