Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- local Players = game:GetService("Players")
- local UIS = game:GetService("UserInputService")
- local VIM = game:GetService("VirtualInputManager")
- local RunService = game:GetService("RunService")
- local localPlayer = Players.LocalPlayer
- local detecting = false
- local wordQueue = {}
- local targetCount = 3 -- Nombre de mots par défaut
- -- GUI V13 - INDUSTRIAL STYLE
- local gui = Instance.new("ScreenGui", game:GetService("CoreGui"))
- gui.Name = "MohaHub_V13"
- local frame = Instance.new("Frame", gui)
- frame.Size = UDim2.new(0, 320, 0, 220)
- frame.Position = UDim2.new(0.5, -160, 0.5, -110)
- frame.BackgroundColor3 = Color3.fromRGB(18, 18, 20)
- frame.BorderSizePixel = 0
- Instance.new("UICorner", frame).CornerRadius = UDim.new(0, 4)
- -- Dragging fluide
- local dr, ds, dp = false, nil, nil
- frame.InputBegan:Connect(function(i) if i.UserInputType == Enum.UserInputType.MouseButton1 then dr=true ds=i.Position dp=frame.Position end end)
- UIS.InputChanged:Connect(function(i) if dr and i.UserInputType == Enum.UserInputType.MouseMovement then local d=i.Position-ds frame.Position=dp+UDim2.new(0,d.X,0,d.Y) end end)
- UIS.InputEnded:Connect(function(i) if i.UserInputType == Enum.UserInputType.MouseButton1 then dr=false end end)
- -- Header
- local head = Instance.new("Frame", frame)
- head.Size = UDim2.new(1, 0, 0, 30)
- head.BackgroundColor3 = Color3.fromRGB(25, 25, 30)
- Instance.new("TextLabel", head).Text = "MOHA COMMAND CENTER"
- head.TextLabel.Size = UDim2.new(1, 0, 1, 0)
- head.TextLabel.TextColor3 = Color3.fromRGB(0, 255, 200)
- -- Stats & Controls
- local status = Instance.new("TextLabel", frame)
- status.Size = UDim2.new(1, 0, 0, 30)
- status.Position = UDim2.new(0, 0, 0, 40)
- status.Text = "SYSTEM: STANDBY"
- status.BackgroundTransparency = 1
- status.TextColor3 = Color3.fromRGB(200, 200, 200)
- local inputField = Instance.new("TextBox", frame)
- inputField.Size = UDim2.new(0, 80, 0, 30)
- inputField.Position = UDim2.new(0.5, -40, 0, 80)
- inputField.PlaceholderText = "Mots requis"
- inputField.Text = "3"
- inputField.BackgroundColor3 = Color3.fromRGB(30, 30, 35)
- inputField.TextColor3 = Color3.fromRGB(255, 255, 255)
- local startBtn = Instance.new("TextButton", frame)
- startBtn.Size = UDim2.new(0, 140, 0, 40)
- startBtn.Position = UDim2.new(0.5, -70, 0, 130)
- startBtn.Text = "ACTIVER SCAN"
- startBtn.BackgroundColor3 = Color3.fromRGB(0, 120, 100)
- startBtn.TextColor3 = Color3.fromRGB(255, 255, 255)
- local panicBtn = Instance.new("TextButton", frame)
- panicBtn.Size = UDim2.new(0, 40, 0, 30)
- panicBtn.Position = UDim2.new(1, -50, 1, -40)
- panicBtn.Text = "PANIC"
- panicBtn.BackgroundColor3 = Color3.fromRGB(150, 0, 0)
- -- Logic
- inputField:GetPropertyChangedSignal("Text"):Connect(function() targetCount = tonumber(inputField.Text) or 3 end)
- local function triggerEnter()
- VIM:SendKeyEvent(true, Enum.KeyCode.Return, false, game)
- VIM:SendKeyEvent(false, Enum.KeyCode.Return, false, game)
- end
- startBtn.MouseButton1Click:Connect(function()
- detecting = not detecting
- startBtn.Text = detecting and "SCAN ACTIF" or "ACTIVER SCAN"
- startBtn.BackgroundColor3 = detecting and Color3.fromRGB(200, 50, 50) or Color3.fromRGB(0, 120, 100)
- end)
- panicBtn.MouseButton1Click:Connect(function() gui:Destroy() end)
- -- Detection Engine
- game:GetService("Workspace").DescendantAdded:Connect(function(o)
- if o:IsA("TextBox") then
- o:GetPropertyChangedSignal("Text"):Connect(function()
- if detecting and o.Text ~= "" then
- table.insert(wordQueue, o.Text)
- status.Text = "DETECTED: " .. #wordQueue .. "/" .. targetCount
- if #wordQueue >= targetCount then
- triggerEnter()
- wordQueue = {}
- end
- end
- end)
- end
- end)
Advertisement
Add Comment
Please, Sign In to add comment