--[[ Set Options ]]-- options = {} optionDescriptions = { "Choose destination after finishing script...\n\t0 = Nowhere (stay) || 1 = Recall || 2 = Heffner Camp\nChoice: ", "Log out after finishing script?\n\t0 = No || 1 = Yes\nChoice: " } function set_options() for i,v in ipairs(optionDescriptions) do cprintf(cli.lightblue, optionDescriptions[i]) while not options[i] do options[i] = io.stdin:read() options[i] = tonumber(options[i]) end end end set_options() --[[ Give Options a Variable Name for code readability ]]-- portAway = options[1] exitGame = options[2] --[[ Process Options ]]-- function doOption_portAway() if portAway == 1 then cprintn(cli.lightred,"You chose to cast Recall.") RoMScript('CastSpellByName("Recall")') waitForLoadingScreen() elseif portAway == 2 then cprintn(cli.lightred,"You chose to cast Heffner Camp Transport Spell.") RoMScript('CastSpellByName("Heffner Camp Transport Spell")') waitForLoadingScreen() else cprintn(cli.lightred,"You chose to stay.") end end function doOption_exitGame() if exitGame == 0 then cprintn(cli.lightred,"You chose to stay logged in after script finish.") elseif exitGame == 1 then cprintn(cli.lightred,"You chose to log out after script finish. Have a great day!") player:logout() end error(" Script finish - 10 daily quests complete!") end --[[ Objects by ID ]]-- snoop = GetIdName(118002) -- NPC "Snoop the Stubborn" fiona = GetIdName(118070) -- NPC "Fiona Andus" defenses = GetIdName(424176) -- Quest "The Elves' Defenses" vine = 118193 -- Object "Protector Vine" --[[ Other Functions ]]-- function cprintn(color, string) cprintf(color, string.."\n") end function goto_wp(waypointTag) __WPL:setWaypointIndex(__WPL:findWaypointTag(waypointTag)) end function take_snoop(snoopname, destination, _next) player:target_NPC(snoopname) if _next == 1 then ChoiceOptionByName("Next Page") end ChoiceOptionByName(destination) local acceptCost = RoMScript("StaticPopup_Visible('SET_REQUESTDIALOG')") if acceptCost then RoMScript("StaticPopup_EnterPressed("..acceptCost..");") end cprintn(cli.lightblue, "Transporting via "..snoopname.." to "..destination) waitForLoadingScreen() end player:mount() if player:findNearestNameOrId(snoop) then take_snoop(snoop, "Transport to: Jinners Camp") else cprintn(cli.yellow, "Cannot find Snoop, maybe you broke it!") player:sleep() end player:mount() player:target_NPC(fiona) if getQuestStatus(defenses) == "complete" then CompleteQuestByName(defenses) end if RoMScript("Daily_count()") == 10 then changeProfileOption("HARVEST_DISTANCE", 120) doOption_portAway() doOption_exitGame() else if getQuestStatus(defenses) == "not accepted" then AcceptQuestByName(defenses) end end if 200 > settings.profile.options.HARVEST_DISTANCE then changeProfileOption("HARVEST_DISTANCE", 200) end while getQuestStatus(defenses) == "incomplete" do player:target_Object(vine, 500) end goto_wp("fiona")