-- Roblox Blox Fruits Özel Test Makrosu (PC / Xeno Uyumlu)
--
-- TEST KOMBOSU:
-- 1. Portal Z (Slot 2)
-- 2. Spikey Trident Z -> X (Slot 3)
--------------------------------------------------
-- SERVİSLER
--------------------------------------------------
local Players = game:GetService("Players")
local UserInputService = game:GetService("UserInputService")
local VirtualInputManager = game:GetService("VirtualInputManager")
local LocalPlayer = Players.LocalPlayer
local ParentGui = (gethui and gethui()) or game:GetService("CoreGui") or LocalPlayer:WaitForChild("PlayerGui")
--------------------------------------------------
-- AYARLAR VE DİZİ
--------------------------------------------------
local MacroActive = false
local MacroThread = nil
local MacroSequence = {
-- 1. PORTAL Z (2. Slot)
{ Name = "Portal Equip", Wait = 0.00, SlotKey = "Two", Key = nil },
{ Name = "Portal Z", Wait = 0.05, SlotKey = nil, Key = "Z" },
-- 2. SPIKEY TRIDENT Z -> X (3. Slot)
{ Name = "Spikey Equip", Wait = 0.60, SlotKey = "Three", Key = nil },
{ Name = "Spikey Z", Wait = 0.05, SlotKey = nil, Key = "Z" },
{ Name = "Spikey X", Wait = 0.30, SlotKey = nil, Key = "X" },
-- BEKLEME SÜRESİ
{ Name = "Son Bekleme", Wait = 0.60, SlotKey = nil, Key = nil }
}
--------------------------------------------------
-- PC TUŞ BASMA FONKSİYONU
--------------------------------------------------
local function PressKey(KeyName)
if not KeyName then return end
pcall(function()
local KeyCode = Enum.KeyCode[KeyName]
if not KeyCode then return end
if keypress and keyrelease then
keypress(KeyCode.Value)
task.wait(0.03)
keyrelease(KeyCode.Value)
else
VirtualInputManager:SendKeyEvent(true, KeyCode, false, nil)
task.wait(0.03)
VirtualInputManager:SendKeyEvent(false, KeyCode, false, nil)
end
end)
end
--------------------------------------------------
-- DÖNGÜ
--------------------------------------------------
local function RunMacro()
while MacroActive do
for _, Step in ipairs(MacroSequence) do
if not MacroActive then break end
if Step.Wait and Step.Wait > 0 then
task.wait(Step.Wait)
end
if not MacroActive then break end
-- Slot seç (2 veya 3)
if Step.SlotKey then
PressKey(Step.SlotKey)
task.wait(0.03)
end
-- Tuşa bas (Z veya X)
if Step.Key then
PressKey(Step.Key)
task.wait(0.03)
end
end
end
end
--------------------------------------------------
-- GUI (40x40 Sürüklenebilir Buton)
--------------------------------------------------
if ParentGui:FindFirstChild("XenoTestMacroGui") then
ParentGui.XenoTestMacroGui:Destroy()
end
local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Name = "XenoTestMacroGui"
ScreenGui.ResetOnSpawn = false
ScreenGui.DisplayOrder = 999
ScreenGui.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
ScreenGui.Parent = ParentGui
local MacroButton = Instance.new("TextButton")
MacroButton.Name = "MacroButton"
MacroButton.Size = UDim2.new(0, 40, 0, 40)
MacroButton.Position = UDim2.new(0.5, -20, 0.82, 0)
MacroButton.BackgroundColor3 = Color3.fromRGB(220, 40, 40)
MacroButton.BorderSizePixel = 0
MacroButton.Text = "OFF"
MacroButton.TextColor3 = Color3.fromRGB(255, 255, 255)
MacroButton.TextSize = 12
MacroButton.Font = Enum.Font.SourceSansBold
MacroButton.AutoButtonColor = false
MacroButton.Parent = ScreenGui
local UICorner = Instance.new("UICorner")
UICorner.CornerRadius = UDim.new(1, 0)
UICorner.Parent = MacroButton
local UIStroke = Instance.new("UIStroke")
UIStroke.Thickness = 1.5
UIStroke.Color = Color3.fromRGB(255, 255, 255)
UIStroke.Parent = MacroButton
--------------------------------------------------
-- AÇ / KAPAT & SÜRÜKLEME
--------------------------------------------------
local function ToggleMacro()
MacroActive = not MacroActive
if MacroActive then
MacroButton.BackgroundColor3 = Color3.fromRGB(40, 200, 40)
MacroButton.Text = "ON"
if not MacroThread then
MacroThread = task.spawn(function()
RunMacro()
MacroThread = nil
end)
end
else
MacroButton.BackgroundColor3 = Color3.fromRGB(220, 40, 40)
MacroButton.Text = "OFF"
MacroThread = nil
end
end
local Dragging, DragStart, StartPosition, DragMoved = false, nil, nil, false
local DRAG_THRESHOLD = 5
MacroButton.InputBegan:Connect(function(Input)
if Input.UserInputType == Enum.UserInputType.MouseButton1 then
Dragging = true
DragMoved = false
DragStart = Input.Position
StartPosition = MacroButton.Position
Input.Changed:Connect(function()
if Input.UserInputState == Enum.UserInputState.End then
Dragging = false
if not DragMoved then
ToggleMacro()
end
end
end)
end
end)
UserInputService.InputChanged:Connect(function(Input)
if not Dragging or Input.UserInputType ~= Enum.UserInputType.MouseMovement then return end
local Delta = Input.Position - DragStart
if math.abs(Delta.X) > DRAG_THRESHOLD or math.abs(Delta.Y) > DRAG_THRESHOLD then
DragMoved = true
end
if DragMoved then
MacroButton.Position = UDim2.new(
StartPosition.X.Scale, StartPosition.X.Offset + Delta.X,
StartPosition.Y.Scale, StartPosition.Y.Offset + Delta.Y
)
end
end)
print("Güncellendi: Portal (Slot 2) -> Spikey Trident (Slot 3)")⚠️Content was pasted as plain text and auto-formatted as a code block. Use the Code Block button in the editor for proper formatting.