--== User Option ==--
RunningSpeed = 100 -- The speed the character runs when not teleporting. 50 is normal. Recommended 100.
UseTeleporter = true -- Use Jduratedj's teleport userfunction. Please make sure you have it installed to use this option.
useGoodie("speed") -- Unbridled Enthusiasm
-- Apply speed hack
local playerAddress = memoryReadIntPtr(getProc(), addresses.staticbase_char, addresses.charPtr_offset);
if playerAddress ~= 0 then
memoryWriteFloat(getProc(), playerAddress + 0x40, RunningSpeed);
end
-- local teleport function checker
function portTo(_x, _z, notWaypoint)
-- Is Teleporter is enabled?
if not UseTeleporter then
return
end
-- Close enough. Don't teleport (when feeding hens)
if notWaypoint then
local dist = distance(player.X, player.Z, _x, _z)
if 19 > dist then
return
end
end
teleport(_x, _z)
end
function hammerTime()
local __, __,time = EventMonitorCheck("Hammertooth")
if time ~= nil then
time=math.floor(time/60)
printf("time="..tostring(time).."\n");
if time>16 then
printf("There is no Hammertooth.\n")
HammertoothIsInTheHouse=false;
else
printf("Hammertooth is here. Hurry up and get a reward!\n")
HammertoothIsInTheHouse=true;
end
end
end
if fly == nil or teleport == nil then
error("You have to install the 'swimhack' and/or 'teleport' userfunction")
end
function inventory_check()
player:update()
local zoneid = RoMScript("GetZoneID()")
if zoneid == 4 then
if 1 > inventory:itemTotalCount(0) then
cprintf(cli.yellow,"You should get empty inventory spaces.")
player:sleep()
end
if 30 > inventory:itemTotalCount(203038) then
print("You need to have 30 Phirius Tokens to enter Goblin Mines")
player:sleep()
end
end
end
function settings.profile.events.onUnstickFailure()
logInfo("Goblins_Stuck", "We got stuck", true, nil, add)
RoMScript("LeaveParty()")
waitForLoadingScreen()
__WPL:setWaypointIndex(__WPL:findWaypointTag("start"));
end
teleport_SetStepSize(25)
local function evalClickable(address)
local chest = memoryReadRepeat("byte", getProc(), address + 0x2F0) or 0
if chest ~= 0 then
return true
else
return false
end
end
function chest()
local chest
repeat
chest = player:findNearestNameOrId(113164,nil,evalClickable)
if chest then
yrest(300)
teleport(chest.X,chest.Z,chest.Y-40)
keyboardPress(settings.hotkeys.STRAFF_RIGHT.key)
keyboardPress(settings.hotkeys.STRAFF_LEFT.key)
repeat
player:target_Object(chest.Id, nil, nil, true, evalClickable);
until evalClickable(chest.Address) ~= true
end
until chest == nil
if chest == nil then
teleport(nil, nil, -50, false)
yrest(300)
end
end
function speed_buff()
if Speed then
if not player:hasBuff("506684") then
inventory:useItem(207200);
end
yrest(250)
RoMScript("SetTitleRequest(530427)")
yrest(250)
end
end
--This code below is copid from cot_tele waypoin
numshells = inventory:getItemCount(240181);
if numshells > 950 then
-- Wait for user to use some shells.
cprintf(cli.yellow,"Reaching the maximum number of Phirius Shells (1000). Please spend some before continuing.\n")
player:sleep()
numshells = inventory:getItemCount(240181);
end
--Some of the code here is copied from Botromka's script
zoneid=nil;
repeat zoneid=RoMScript("GetZoneID()"); until zoneid;
npcname=nil;
repeat npcname=RoMScript("TEXT('Sys112651_name')"); until npcname;
if math.fmod(zoneid,1000) == 4 then
-- inventory_check()
-- speed_buff()
-- player:target_NPC(npcname); yrest(1000);
-- RoMScript("ChoiceOption(1);"); yrest(1000);
-- RoMScript("StaticPopup_OnClick(StaticPopup1, 1);");
-- waitForLoadingScreen(15);
end
if zoneid==352 then fly(); end
function UpThroughFloor()
local rightheight = 71.5
local dir = 3.14
repeat
if dir == 0 then dir = 3.14 else dir = 0 end -- Alternate direction
teleport(nil,nil,rightheight) yrest(700)
player:faceDirection(dir,-1.3) yrest(300)
keyboardHold(settings.hotkeys.MOVE_FORWARD.key) yrest(300)
keyboardRelease(settings.hotkeys.MOVE_FORWARD.key) yrest(1000)
player:update()
until player.Y > rightheight
end
EventMonitorStop("Hammertooth");
EventMonitorStart("Hammertooth", "TIMEKEEPER_START");
changeProfileOption("TARGET_LEVELDIF_BELOW",50)
changeProfileOption("LOOT_ALL",true);
inventory_check()
speed_buff()
repeat
player:target_NPC("112651"); -- Mahler Palo
yrest(1000)
sendMacro("ChoiceOption(1);");
yrest(1000)
RoMScript("StaticPopup_OnClick(StaticPopup1, 1);");
waitForLoadingScreen(15)
local zoneid = RoMScript("GetZoneID()")
until zoneid == 352
fly();
fly()
yrest(100)
teleportToWP()
yrest(300)
teleportToWP()
yrest(300)
teleportToWP()
yrest(300)
teleportToWP()
yrest(300)
teleportToWP()
yrest(500)
hammerTime()
repeat
yrest(1000)
until RoMScript("TimeKeeperFrame:IsVisible()")
chest()
hammerTime()
chest()
hammerTime()
chest()
chest()
chest()
UpThroughFloor()
UpThroughFloor()
EventMonitorStop("Hammertooth");
loadPaths("Mini_gobsEnd");
__WPL:setWaypointIndex(__WPL:findWaypointTag("start"));