Moon hopper

-- Full Moon Finder Script with Stealth Enhancements

-- Configurations
local WebhookURL = "https://discord.com/api/webhooks/1291821412188819516/d5kzcxW1RI9dSiXBmlwEiduyJalAjSFREm8lu0viDOospXitP5QQyTIAu8g3m0jWaAkk"
local VisitedFileName = "VisitedServers.txt" -- File to save visited servers
local hopDelay = math.random(5, 15) -- Randomized delay before hopping
local recheckDelay = math.random(45, 90) -- Randomized delay between moon checks

-- Services
local Lighting = game:GetService("Lighting")
local Players = game:GetService("Players")
local TeleportService = game:GetService("TeleportService")
local HttpService = game:GetService("HttpService")

local PlaceId = game.PlaceId
local CurrentJobId = game.JobId

-- GUI Setup (Minimal Impact)
local moonLabel = Instance.new("TextLabel")
moonLabel.Size = UDim2.new(0, 300, 0, 50)
moonLabel.Position = UDim2.new(0.5, -150, 0, 10)
moonLabel.TextSize = 18
moonLabel.TextColor3 = Color3.fromRGB(200, 200, 200)
moonLabel.BackgroundTransparency = 1
moonLabel.Text = "MOON: Waiting..."
moonLabel.Visible = false -- Make GUI invisible to avoid detection
moonLabel.Parent = game.CoreGui

-- Moon Phases
local MoonPhases = {
    ["1"] = {Icon = "🌔", TextureId = "http://www.roblox.com/asset/?id=9709149680"},
    ["2"] = {Icon = "🌓", TextureId = "http://www.roblox.com/asset/?id=9709150086"},
    ["3"] = {Icon = "🌒", TextureId = "http://www.roblox.com/asset/?id=9709139597"},
    ["4"] = {Icon = "🌑", TextureId = "http://www.roblox.com/asset/?id=9709135895"},
    ["5"] = {Icon = "🌘", TextureId = "http://www.roblox.com/asset/?id=9709150401"},
    ["6"] = {Icon = "🌗", TextureId = "http://www.roblox.com/asset/?id=9709143733"},
    ["7"] = {Icon = "🌖", TextureId = "http://www.roblox.com/asset/?id=9709149052"},
    ["8"] = {Icon = "🌕", TextureId = "http://www.roblox.com/asset/?id=9709149431"}
}

-- Save server data
local function ReadVisitedServers()
    local visited = {}
    pcall(function()
        local content = readfile(VisitedFileName)
        for jobId in string.gmatch(content, "[^\n]+") do
            visited[jobId] = true
        end
    end)
    return visited
end

local function SaveVisitedServer(jobId)
    pcall(function()
        appendfile(VisitedFileName, jobId .. "\n")
    end)
end

-- Detect moon phase
local function GetMoonPhase()
    local Sky = Lighting:FindFirstChild("Sky")
    if Sky then
        for phase, data in pairs(MoonPhases) do
            if Sky.MoonTextureId == data.TextureId then
                return tonumber(phase), data.Icon
            end
        end
    end
    return nil
end

-- Server hop logic
local function AutoServerHop()
    local visitedServers = ReadVisitedServers()
    local foundServer = false

    local success, servers = pcall(function()
        return HttpService:JSONDecode(game:HttpGet("https://games.roblox.com/v1/games/" .. PlaceId .. "/servers/Public?sortOrder=Asc&limit=100"))
    end)

    if success and servers and servers.data then
        for _, server in ipairs(servers.data) do
            if not visitedServers[server.id] and server.id ~= CurrentJobId and server.playing < server.maxPlayers then
                if server.friendsPlaying and #server.friendsPlaying > 0 then
                    continue
                end
                foundServer = true
                SaveVisitedServer(server.id)
                TeleportService:TeleportToPlaceInstance(PlaceId, server.id)
                break
            end
        end
    else
        warn("Failed to retrieve servers.")
    end

    if not foundServer then
        warn("No valid server found. Rejoining.")
        SaveVisitedServer(CurrentJobId)
        TeleportService:Teleport(PlaceId)
    end
end

-- Check and hop if needed
local function CheckMoonPhaseAndHop()
    local moonPhase, moonIcon = GetMoonPhase()
    if moonPhase then
        moonLabel.Text = "MOON: " .. moonIcon
        if moonPhase ~= 7 and moonPhase ~= 8 then
            wait(math.random(1, 5)) -- Random wait to avoid predictable behavior
            AutoServerHop()
        end
    else
        moonLabel.Text = "MOON: Unknown"
    end
end

-- Stealth enhancements
local function AntiAFK()
    local VirtualUser = game:GetService("VirtualUser")
    Players.LocalPlayer.Idled:Connect(function()
        VirtualUser:CaptureController()
        VirtualUser:ClickButton2(Vector2.new())
    end)
end

-- Main loop
AntiAFK() -- Prevent AFK detection
while true do
    CheckMoonPhaseAndHop()
    wait(recheckDelay)
end