local plrs = game:GetService("Players")
local uis = game:GetService("UserInputService")
local cg = game:GetService("CoreGui")
local rs = game:GetService("ReplicatedStorage")

local lplr = plrs.LocalPlayer

local gui = Instance.new("ScreenGui")
gui.Name = "Gui"
gui.ResetOnSpawn = false
pcall(function()
	gui.Parent = cg
end)
if not gui.Parent then
	gui.Parent = lplr:WaitForChild("PlayerGui")
end

local frm = Instance.new("Frame")
frm.Size = UDim2.new(0, 180, 0, 90)
frm.Position = UDim2.new(0.5, -90, 0.2, 0)
frm.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
frm.BorderSizePixel = 0
frm.Parent = gui

local crn = Instance.new("UICorner")
crn.CornerRadius = UDim.new(0, 10)
crn.Parent = frm

local drag = Instance.new("TextButton")
drag.Size = UDim2.new(1, 0, 0, 45)
drag.BackgroundTransparency = 1
drag.Text = ""
drag.Parent = frm

local lbl = Instance.new("TextLabel")
lbl.Size = UDim2.new(1, -60, 0, 45)
lbl.Position = UDim2.new(0, 0, 0, 0)
lbl.BackgroundTransparency = 1
lbl.Text = " COMBAT"
lbl.TextColor3 = Color3.fromRGB(180, 180, 180)
lbl.TextSize = 12
lbl.Font = Enum.Font.SourceSansBold
lbl.TextXAlignment = Enum.TextXAlignment.Left
lbl.Parent = frm

local minb = Instance.new("TextButton")
minb.Size = UDim2.new(0, 25, 0, 25)
minb.Position = UDim2.new(1, -58, 0, 10)
minb.BackgroundColor3 = Color3.fromRGB(60, 60, 60)
minb.Text = "-"
minb.TextColor3 = Color3.fromRGB(255, 255, 255)
minb.TextSize = 14
minb.Font = Enum.Font.SourceSansBold
minb.Parent = frm

local minc = Instance.new("UICorner")
minc.CornerRadius = UDim.new(0, 6)
minc.Parent = minb

local cls = Instance.new("TextButton")
cls.Size = UDim2.new(0, 25, 0, 25)
cls.Position = UDim2.new(1, -28, 0, 10)
cls.BackgroundColor3 = Color3.fromRGB(180, 40, 40)
cls.Text = "X"
cls.TextColor3 = Color3.fromRGB(255, 255, 255)
cls.TextSize = 12
cls.Font = Enum.Font.SourceSansBold
cls.Parent = frm

local clsc = Instance.new("UICorner")
clsc.CornerRadius = UDim.new(0, 6)
clsc.Parent = cls

local tgl = Instance.new("TextButton")
tgl.Size = UDim2.new(0.9, 0, 0, 35)
tgl.Position = UDim2.new(0.05, 0, 0, 48)
tgl.BackgroundColor3 = Color3.fromRGB(45, 45, 45)
tgl.Text = "OFF"
tgl.TextColor3 = Color3.fromRGB(255, 80, 80)
tgl.TextSize = 14
tgl.Font = Enum.Font.SourceSansBold
tgl.Parent = frm

local tglc = Instance.new("UICorner")
tglc.CornerRadius = UDim.new(0, 8)
tglc.Parent = tgl

local drg, dst, sps

drag.InputBegan:Connect(function(inp)
	if inp.UserInputType == Enum.UserInputType.MouseButton1 or inp.UserInputType == Enum.UserInputType.Touch then
		drg = true
		dst = inp.Position
		sps = frm.Position
		inp.Changed:Connect(function()
			if inp.UserInputState == Enum.UserInputState.End then
				drg = false
			end
		end)
	end
end)

uis.InputChanged:Connect(function(inp)
	if inp.UserInputType == Enum.UserInputType.MouseMovement or inp.UserInputType == Enum.UserInputType.Touch then
		if drg then
			local dlt = inp.Position - dst
			frm.Position = UDim2.new(sps.X.Scale, sps.X.Offset + dlt.X, sps.Y.Scale, sps.Y.Offset + dlt.Y)
		end
	end
end)

local minm = false
minb.MouseButton1Click:Connect(function()
	minm = not minm
	if minm then
		tgl.Visible = false
		frm.Size = UDim2.new(0, 180, 0, 45)
		minb.Text = "+"
	else
		tgl.Visible = true
		frm.Size = UDim2.new(0, 180, 0, 90)
		minb.Text = "-"
	end
end)

cls.MouseButton1Click:Connect(function()
	gui:Destroy()
end)

local act = false
tgl.MouseButton1Click:Connect(function()
	act = not act
	if act then
		tgl.Text = "ON"
		tgl.TextColor3 = Color3.fromRGB(80, 255, 80)
	else
		tgl.Text = "OFF"
		tgl.TextColor3 = Color3.fromRGB(255, 80, 80)
	end
end)

task.spawn(function()
	local mmod
	pcall(function()
		local cst = rs:WaitForChild("Assets"):WaitForChild("CharacterStorage")
		local jm1 = cst:FindFirstChild("Jun") and cst.Jun:FindFirstChild("M1")
		if jm1 then
			mmod = require(jm1)
		else
			for _, fld in ipairs(cst:GetChildren()) do
				if fld:FindFirstChild("M1") then
					mmod = require(fld.M1)
					break
				end
			end
		end
	end)

	local wks = workspace
	local wsc = wks:WaitForChild("Characters")
	local twait = task.wait
	local ssin = setmetatable({},{__mode="k"})

	while true do
		twait(0.1)
		if act and mmod and mmod.M1 then
			local chr = lplr.Character
			if chr and chr:FindFirstChild("HumanoidRootPart") and chr:FindFirstChild("Network") then
				local hrp = chr.HumanoidRootPart
				local hpos = hrp.Position
				local kids = wsc:GetChildren()
				for i = 1, #kids do
					local tgt = kids[i]
					if tgt ~= chr and tgt.ClassName == "Model" then
						local thp = tgt:FindFirstChild("HumanoidRootPart")
						local hum = tgt:FindFirstChildOfClass("Humanoid")
						if thp and hum and hum.Health > 0 then
							if (thp.Position - hpos).Magnitude <= 13 then
								pcall(function()
									mmod.M1(chr, 1, chr.Network)
								end)
								break
							end
						end
					end
				end
			end
		end
	end
end)