Script – MeepCity

				
					local meepcity_id = 370731277
local meepcity_halloween_map = 82245126165127

function teleport_to_game(place_id)
    local teleport_service = game:GetService("TeleportService")
    teleport_service:Teleport(place_id)
end

function meepcity_initialiser()
    if game.PlaceId ~= meepcity_halloween_map then
        teleport_to_game(meepcity_halloween_map)
        return
    end

    local houses = game.Workspace.VW:GetChildren()
    local progressTitle = game.Players.LocalPlayer.PlayerGui:WaitForChild("HalloweenBasketGui").Container.HeaderContainer.BackgroundContainer.Container.ProgressContainer.Title

    local current_trick_or_treats = tonumber(string.match(progressTitle.Text, "^%d+"))

    while current_trick_or_treats and current_trick_or_treats < 100 do
        for _, house in ipairs(houses) do
            local candy_mesh = house:FindFirstChild("CandyMesh")
            if candy_mesh then
                local candy_pos = candy_mesh.Position
                game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = CFrame.new(candy_pos)

                task.wait(2)
                game.Players.LocalPlayer.Character:WaitForChild("Humanoid").Sit = true
                game:GetService("ReplicatedStorage"):WaitForChild("FunctionConnections"):WaitForChild("RequestHalloweenTrickOrTreat"):InvokeServer(tonumber(house.Name))

                repeat
                    task.wait(1)
                until tonumber(game.Players.LocalPlayer.PlayerGui.HalloweenBasketGui.Container.UIScale.Scale) == 1

                repeat
                    task.wait(1)
                until tonumber(game.Players.LocalPlayer.PlayerGui.HalloweenBasketGui.Container.UIScale.Scale) < 0.91
            end
        end
    end
end

meepcity_initialiser()