Ballista Script | AUTO PARRY AND SILENT AIM

Uploaded on July 23, 2022

FEATURE:

Auto-Parry,
Silent aim,
Buggy ESP
.
NOTE:
USE RIGHT CTRL

SCRIPT:

local a=game:GetService'Players'local b=game:GetService'RunService'local c=game:
GetService'ReplicatedStorage'local d=game:GetService'Workspace'local e=game:
GetService'ContextActionService'local f=game:GetService'UserInputService'local g
=game:GetService'CoreGui'local h=
[[https://raw.githubusercontent.com/wally-rblx/LinoriaLib/main/]]local i=
loadstring(game:HttpGet(h..'Library.lua'))()local j=loadstring(game:HttpGet(h..
'addons/SaveManager.lua'))()local k=loadstring(game:HttpGet(h..
'addons/ThemeManager.lua'))()local l=syn and syn.protect_gui or function(l)end
local m=a.LocalPlayer local n=d.CurrentCamera local o=getrenv()._G.Knit local p=
o.GetController'TeamController'local q=o.GetController'MouseController'local r=
Drawing.new'Circle'local s={}local t=0 local u local v=function(v,w,x)end local
w=function(w,x,y)end local x=function(x)if x and x:IsA'Model'then local y=x:
FindFirstChildWhichIsA'Humanoid'if y and y.Health>0 then local z=x.PrimaryPart
if z then return true end end end return false end local y=function(y,z)local A,
B=pcall(function()return y:GetTimeOfKeyframe(z)end)if A then return B end return
nil end local z=function(z)local A local B=math.huge local C=false for D,E in
ipairs(a:GetPlayers())do local F=E.Character if p:GetPlayerTeam(E)~=p:
GetPlayerTeam(m)then if x(F)then local G=F.HumanoidRootPart local H=n:
WorldToViewportPoint(G.Position)if H.Z>0 then H=Vector2.new(H.X,H.Y)local I=(H-z
).Magnitude if I<Options.Aimbot_FOV.Value then local J=(G.Position-n.CFrame.
Position).Magnitude if J<B then A=E B=J end end end end end end return A end
local A=function(A)local B=Instance.new'Highlight's[A]=B local C=function(C)
local D=C:WaitForChild('Humanoid',15)assert(D,A.Name..' has no humanoid')local E
=C:WaitForChild('HumanoidRootPart',15)assert(E,A.Name..
' has no humanoid root part')local F=D:WaitForChild('Animator',15)assert(F,A.
Name..' has no animator')local G=function(G)local H=G.Animation if p:
GetPlayerTeam(A)==p:GetPlayerTeam(m)then return end if Toggles.Parry_Enabled.
Value and Options.Parry_Keybind:GetState()then if y(G,'SwingBegin')and x(m.
Character)then local I=(E.Position-m.Character.HumanoidRootPart.CFrame.Position)
.Magnitude if I<=20 then t+=1 w('Block',Enum.UserInputState.Begin,nil)if Toggles
.Parry_Notify.Value then i:Notify('Parrying'..A.Name)end do local J=G:
GetTimeOfKeyframe'SwingEnd'-0.05 repeat task.wait()if not G.IsPlaying then t-=1
return end until G.TimePosition>=J t-=1 end if t==0 then w('Block',Enum.
UserInputState.End,nil)end end end end end F.AnimationPlayed:Connect(G)B.Adornee
=C B.FillColor=p:GetTeamColor(p:GetPlayerTeam(A))end A.CharacterAdded:Connect(C)
local D=A.Character if D then C(D)end B.Enabled=Toggles.Player_Chams.Value B.
DepthMode=Enum.HighlightDepthMode.AlwaysOnTop B.RobloxLocked=true l(B)B.Parent=g
end local B=function(B)local C=s[B]if C then C:Destroy()s[B]=nil end end do i:
SetWatermark'Linoria Community (OminousVibes)'i:Notify'Loading UI...'local C=i:
CreateWindow'Ballista'do local D=C:AddTab'Gameplay'do local E=D:AddLeftTabbox
'Silent Aim'local F=E:AddTab'Silent Aim'F:AddToggle('Aimbot_Enabled',{Text=
'Enabled',Default=false}):AddKeyPicker('Aimbot_Keybind',{Text='Silent Aim',
Default='F'})F:AddToggle('Aimbot_Circle',{Text='Show Circle',Default=false}):
AddColorPicker('Aimbot_Color',{Title='Circle Color',Default=Color3.new(1,1,1)})F
:AddSlider('Aimbot_FOV',{Text='Circle Radius',Min=25,Max=500,Default=100,
Rounding=0,Suffix='px'})local G=E:AddTab'Advanced'G:AddSlider(
'Aimbot_Thicknesss',{Text='Circle Thickness',Min=0,Max=10,Default=1,Rounding=1,
Suffix='px'})G:AddDropdown('Aimbot_Mode',{Text='Bow Mode',Tooltip=
[[Uses different aim prediction values to adapt for different bows.]],Values={
'Basic Bow','Crossbow'},Default=1,Multi=false})end do local E=D:AddLeftTabbox
'Auto Parry'local F=E:AddTab'Auto Parry'F:AddToggle('Parry_Enabled',{Text=
'Enabled',Default=false}):AddKeyPicker('Parry_Keybind',{Text='Auto Parry',
Default='G'})local G=E:AddTab'Advanced'G:AddToggle('Parry_Notify',{Text=
'Notifications',Default=false})end end do local D=C:AddTab'Visuals'do local E=D:
AddLeftTabbox'Visuals'local F=E:AddTab'Player'F:AddToggle('Player_Chams',{Text=
'ESP',Default=true})local G=E:AddTab'World'end do local E=D:AddRightGroupbox
'World Render'E:AddLabel'Work in progress'end end do local D=C:AddTab'Settings'k
:SetLibrary(i)j:SetLibrary(i)k:SetFolder'OminousVibes'j:SetFolder
'OminousVibes/Ballista'j:IgnoreThemeSettings()j:SetIgnoreIndexes{'MenuKeybind'}j
:BuildConfigSection(D)k:ApplyToTab(D)local E=D:AddLeftGroupbox'Menu'E:AddButton(
'Unload',function()i:Unload()end)E:AddLabel'Menu bind':AddKeyPicker(
'MenuKeybind',{Default='End',NoUI=true,Text='Menu keybind'})E:AddToggle(
'Keybinds',{Text='Show Keybinds Menu',Default=true}):OnChanged(function()i.
KeybindFrame.Visible=Toggles.Keybinds.Value end)E:AddToggle('Watermark',{Text=
'Show Watermark',Default=true}):OnChanged(function()i:SetWatermarkVisibility(
Toggles.Watermark.Value)end)end i:Notify'UI Loaded'end b.RenderStepped:Connect(
function()local C=f:GetMouseLocation()if Toggles.Aimbot_Enabled.Value and
Options.Aimbot_Keybind:GetState()then local D=z(C)if D then u=D.Character end
else u=nil end if r.Visible then r.Position=C end end)a.PlayerAdded:Connect(A)a.
PlayerRemoving:Connect(B)do Toggles.Aimbot_Enabled:OnChanged(function()r.Visible
=Toggles.Aimbot_Enabled.Value and Toggles.Aimbot_Circle.Value end)Toggles.
Aimbot_Circle:OnChanged(function()r.Visible=Toggles.Aimbot_Enabled.Value and
Toggles.Aimbot_Circle.Value end)Options.Aimbot_Color:OnChanged(function()r.Color
=Options.Aimbot_Color.Value end)Options.Aimbot_FOV:OnChanged(function()r.Radius=
Options.Aimbot_FOV.Value end)end local C C=hookmetamethod(game,'__namecall',
function(D,...)if not checkcaller()then local E={...}local F=getnamecallmethod()
if D==e then if F=='BindAction'then if E[1]=='MeleeAttack'then v=E[2]elseif E[1]
=='Block'then w=E[2]end elseif F=='UnbindAction'then if E[1]=='MeleeAttack'then
v=function()end elseif E[1]=='Block'then w=function()end end end end if F==
'Calculate'then print(getcallingscript().Name)end end return C(D,...)end)local D
=require(c.Knit.Util.Projectile)local E=D.Calculate D.Calculate=function(F,G,...
)local H=G.Target or u if H and G.Owner==m then local I=G.CFrame.Position local
J=(H.Head.Position-I).Magnitude if J<=20 then G.Direction=(H.Head.Position-I).
Unit end end return E(F,G,...)end local F=q.CastNoRay q.CastNoRay=function(G,H)
if u then local I=u.Head.Position local J=n.CFrame.Position local K=(u.
HumanoidRootPart.Position-J).Magnitude if Options.Aimbot_Mode.Value=='Basic Bow'
then local L=(u.PrimaryPart.AssemblyLinearVelocity*Vector3.new((1.05^(K/20))/100
,0,(1.05^(K/20))/100))local M=Vector3.new(0,1.05^(K/20),0)I=u.Head.Position+L+M
else local L=(u.PrimaryPart.AssemblyLinearVelocity*Vector3.new((1.02^(K/40))/100
,0,(1.02^(K/40))/100))local M=Vector3.new(0,1.02^(K/40),0)I=u.Head.Position+L+M
end return Ray.new(J,(I-J).Unit)end return F(G,H)end r.Transparency=0.9 r.
NumSides=25 r.Thickness=Options.Aimbot_Thicknesss.Value r.Color=Options.
Aimbot_Color.Value for G,H in ipairs(a:GetPlayers())do if H~=m then task.defer(A
,H)end end