--[[
-----------------------------
Controls:

F3 to farm Racetrack

J to farm Construction

K to farm Farm

L to farm Classic

B to farm Boat

N to farm Space

M to farm Desert

P to farm Prison

G to farm Castle

H to farm Towers

f4 to stop
-----------------------------
Game:
https://www.roblox.com/games/2248408710/NEW-Destruction-Simulator
-----------------------------
Description:
Depending on what you hit, this will tp you to the location and autosell + auto destroy everything.
-----------------------------
Credit:
Original: @Verm - brianops16
-----------------------------
--]]
waitT = 0 --Change this for a higherwait time if this lags you
function codeW()
local S = game.workspace.Areas[Place]:FindFirstChild("Spawns")
game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = S.Spawn1.CFrame
for i,a in pairs(game.workspace.Areas[Place]:GetChildren()) do
    if a.ClassName == "Model" and on == 1 then
        for i,v in pairs(a:GetChildren()) do
            if v.ClassName == "Part" and on == 1 then
            local plrN = game.Players.LocalPlayer.Name
            local A_1 = 15353659219.5737
            local A_2 = game:GetService("Workspace")[plrN].Launcher.Stats
            local A_3 = v.Position
            local A_4 = game:GetService("Workspace")[plrN].Launcher.Assets.Rocket.Boom
            local Event = game:GetService("ReplicatedStorage").Remotes.explodeRocket
            Event:FireServer(A_1, A_2, A_3, A_4)
            local Event = game:GetService("ReplicatedStorage").Remotes.sellBricks
            Event:FireServer()
            wait(waitT)
            end
        end
    end
end
end
function codeB()
local S = game.workspace.Areas[Place]:FindFirstChild("Spawns")
game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = S.Spawn1.CFrame
for i,a in pairs(game.workspace.Areas[Place]:GetChildren()) do
    if a.ClassName == "Model" and on == 1 then
        for i,v in pairs(a:GetChildren()) do
            if v.ClassName == "Part" and on == 1 then
            local plrN = game.Players.LocalPlayer.Name
            local A_1 = 15353659219.5737
            local A_2 = game:GetService("Players")[plrN].Backpack.Launcher.Stats
            local A_3 = v.Position
            local A_4 = game:GetService("Players")[plrN].Backpack.Launcher.Assets.Rocket.Boom
            local Event = game:GetService("ReplicatedStorage").Remotes.explodeRocket
            Event:FireServer(A_1, A_2, A_3, A_4)
            local Event = game:GetService("ReplicatedStorage").Remotes.sellBricks
            Event:FireServer()
            wait(waitT)
            end
        end
    end
end
end
----

on = 1

----
local UIS = game:GetService("UserInputService")
UIS.InputBegan:connect(function(Input)
  local KeyCode = Input.KeyCode
  if KeyCode == Enum.KeyCode.F3 then
    on = 1
    wait(.2)
    while on == 1 do
      game:GetService('RunService').Stepped:wait(waitT)
  Place = "Area1"
      local good,bad = pcall(codeW)
      if good and on == 1 then
        codeW()
      else
        local good,bad = pcall(codeB)
        if good and on == 1 then
        codeB()
        else
        print(bad)
    end
  end
end
end
end)
local UIS = game:GetService("UserInputService")
UIS.InputBegan:connect(function(Input)
  local KeyCode = Input.KeyCode
  if KeyCode == Enum.KeyCode.J then
    on = 1
    wait(.2)
    while on == 1 do
      game:GetService('RunService').Stepped:wait(waitT)
  Place = "Area2"
      local good,bad = pcall(codeW)
      if good and on == 1 then
        codeW()
      else
        local good,bad = pcall(codeB)
        if good and on == 1 then
        codeB()
        else
        print(bad)
    end
  end
end
end
end)
UIS.InputBegan:connect(function(Input)
  local KeyCode = Input.KeyCode
  if KeyCode == Enum.KeyCode.K then
    on = 1
    wait(.2)
    while on == 1 do
      game:GetService('RunService').Stepped:wait(waitT)
  Place = "Area3"
      local good,bad = pcall(codeW)
      if good and on == 1 then
        codeW()
      else
        local good,bad = pcall(codeB)
        if good and on == 1 then
        codeB()
        else
        print(bad)
    end
  end
end
end
end)
UIS.InputBegan:connect(function(Input)
  local KeyCode = Input.KeyCode
  if KeyCode == Enum.KeyCode.L then
    on = 1
    wait(.2)
    while on == 1 do
      game:GetService('RunService').Stepped:wait(waitT)
  Place = "Area4"
      local good,bad = pcall(codeW)
      if good and on == 1 then
        codeW()
      else
        local good,bad = pcall(codeB)
        if good and on == 1 then
        codeB()
        else
        print(bad)
    end
  end
end
end
end)
UIS.InputBegan:connect(function(Input)
  local KeyCode = Input.KeyCode
  if KeyCode == Enum.KeyCode.B then
    on = 1
    wait(.2)
    while on == 1 do
      game:GetService('RunService').Stepped:wait(waitT)
  Place = "Area5"
      local good,bad = pcall(codeW)
      if good and on == 1 then
        codeW()
      else
        local good,bad = pcall(codeB)
        if good and on == 1 then
        codeB()
        else
        print(bad)
    end
  end
end
end
end)
UIS.InputBegan:connect(function(Input)
  local KeyCode = Input.KeyCode
  if KeyCode == Enum.KeyCode.N then
    on = 1
    wait(.2)
    while on == 1 do
      game:GetService('RunService').Stepped:wait(waitT)
  Place = "Area6"
      local good,bad = pcall(codeW)
      if good and on == 1 then
        codeW()
      else
        local good,bad = pcall(codeB)
        if good and on == 1 then
        codeB()
        else
        print(bad)
    end
  end
end
end
end)
UIS.InputBegan:connect(function(Input)
  local KeyCode = Input.KeyCode
  if KeyCode == Enum.KeyCode.M then
    on = 1
    wait(.2)
    while on == 1 do
      game:GetService('RunService').Stepped:wait(waitT)
  Place = "Area7"
      local good,bad = pcall(codeW)
      if good and on == 1 then
        codeW()
      else
        local good,bad = pcall(codeB)
        if good and on == 1 then
        codeB()
        else
        print(bad)
    end
  end
end
end
end)
UIS.InputBegan:connect(function(Input)
  local KeyCode = Input.KeyCode
  if KeyCode == Enum.KeyCode.P then
    on = 1
    wait(.2)
    while on == 1 do
      game:GetService('RunService').Stepped:wait(waitT)
  Place = "Area8"
      local good,bad = pcall(codeW)
      if good and on == 1 then
        codeW()
      else
        local good,bad = pcall(codeB)
        if good and on == 1 then
        codeB()
        else
        print(bad)
    end
  end
end
end
end)
UIS.InputBegan:connect(function(Input)
  local KeyCode = Input.KeyCode
  if KeyCode == Enum.KeyCode.G then
    on = 1
    wait(.2)
    while on == 1 do
      game:GetService('RunService').Stepped:wait(waitT)
  Place = "Area8"
      local good,bad = pcall(codeW)
      if good and on == 1 then
        codeW()
      else
        local good,bad = pcall(codeB)
        if good and on == 1 then
        codeB()
        else
        print(bad)
    end
  end
end
end
end)
UIS.InputBegan:connect(function(Input)
  local KeyCode = Input.KeyCode
  if KeyCode == Enum.KeyCode.H then
    on = 1
    wait(.2)
    while on == 1 do
      game:GetService('RunService').Stepped:wait(waitT)
  Place = "Area9"
      local good,bad = pcall(codeW)
      if good and on == 1 then
        codeW()
      else
        local good,bad = pcall(codeB)
        if good and on == 1 then
        codeB()
        else
        print(bad)
    end
  end
end
end
end)


UIS.InputBegan:connect(function(Input)
  local KeyCode = Input.KeyCode
  if KeyCode == Enum.KeyCode.F4 then
    on = 0
  end
end)
--Description and controls at the top