[ ADVANCED ] GUI arrow won't follow a part in workspace?

Asked by

2 years ago

Edited 2 years ago

Hello, my goal is self-explanatory, have a Ui arrow point in the direction of a part that is in the workspace.

The issue is that I cannot figure out how to make the Ui arrow move freely on the Frame, it sticks to the side of the Frame, making it look "janky" by constantly teleporting around the Frame from side to side.

Here is a video example of what I am trying to achieve and what I have so far.

imgur.com/a/MmHyoe4 https://imgur.com/a/MmHyoe4

And here is the LocalScript which makes my version work like it does.

001local Markers = {}
002local Screen = script.Parent.Holder.AbsoluteSize
003local T = game:GetService("TweenService")
004 
005for i,v in pairs(game.ReplicatedStorage.Markers:GetChildren()) do
006    local Marker = script.Sample:Clone()
007    Marker.Parent = script.Parent.Holder
008    Marker.ImageColor3 = v.Config.MarkerColor.Value
009    Marker.RotateLabel.Arrow.ImageColor3 = v.Config.MarkerColor.Value
010    Marker.Icon.Image = v.Config.Icon.Value
011    table.insert(Markers,{Marker,v})
012end
013 
014function ClampMarkerToBorder(X,Y,Absolute)
015    X = Screen.X - X
016    Y = Screen.Y - Y
017 
018    local DistanceToXBorder = math.min(X,Screen.X-X)
019    local DistanceToYBorder = math.min(Y,Screen.Y-Y)
020 
021    if DistanceToYBorder < DistanceToXBorder then
022        if Y < (Screen.Y-Y) then
023            return math.clamp(X,0,Screen.X-Absolute.X),0
024        else
025            return math.clamp(X,0,Screen.X-Absolute.X),Screen.Y - Absolute.Y
026        end
027    else
028        if X < (Screen.X-X) then
029            return 0,math.clamp(Y,0,Screen.Y-Absolute.Y)
030        else
031            return Screen.X - Absolute.X,math.clamp(Y,0,Screen.Y-Absolute.Y)
032        end
033    end
034end
035 
036game:GetService("RunService").Heartbeat:Connect(function()
037    for i,Stat in pairs(Markers) do
038        local Marker = Stat[1]
039        local Location = Stat[2]
040        Marker.Visible = Location.Config.Enabled.Value
041 
042        if Location.Config.Enabled.Value then
043            local MarkerPosition , MarkerVisible = game.Workspace.CurrentCamera:WorldToScreenPoint(Location.Position)
044            local MarkerRotation = game.Workspace.CurrentCamera.CFrame:Inverse()*Location.CFrame
045            local MarkerAbsolute = Marker.AbsoluteSize
046 
047            local MarkerPositionX = MarkerPosition.X - MarkerAbsolute.X/2
048            local MarkerPositionY = MarkerPosition.Y - MarkerAbsolute.Y/2
049 
050            if MarkerPosition.Z < 0  then
051                MarkerPositionX,MarkerPositionY = ClampMarkerToBorder(MarkerPositionX,MarkerPositionY,MarkerAbsolute)
052            else
053                if MarkerPositionX < 0 then
054                    MarkerPositionX = 0
055                elseif MarkerPositionX > (Screen.X - MarkerAbsolute.X) then
056                    MarkerPositionX = Screen.X - MarkerAbsolute.X
057                end
058                if MarkerPositionY < 0 then
059                    MarkerPositionY = 0
060                elseif MarkerPositionY > (Screen.Y - MarkerAbsolute.Y) then
061                    MarkerPositionY = Screen.Y - MarkerAbsolute.Y
062                end
063            end
064 
065            Marker.RotateLabel.Visible = not MarkerVisible
066            Marker.Visible = not MarkerVisible
067            Marker.RotateLabel.Rotation = 90 + math.deg(math.atan2(MarkerRotation.Z,MarkerRotation.X))
068            Marker.Position = UDim2.new(0,MarkerPositionX,0,MarkerPositionY)
069 
070            T:Create(Marker,TweenInfo.new(.5),{ImageColor3 = Location.Config.MarkerColor.Value}):Play()
071            T:Create(Marker.RotateLabel.Arrow,TweenInfo.new(.5),{ImageColor3 = Location.Config.MarkerColor.Value}):Play()
072            local CurrentTime = tick()
073            if Location.Config.BurstType.Value == "Normal" then
074                if math.floor((CurrentTime%1.5)*100)/100 <= .01 then
075                    local Burst = script.BurstRings:Clone()
076                    Burst.ImageColor3 = Location.Config.MarkerColor.Value
077                    Burst.Parent = Marker
078                    T:Create(Burst,TweenInfo.new(1),{Size = UDim2.new(2,0,2,0),ImageTransparency = 1}):Play()
079                    game.Debris:AddItem(Burst,1)
080                end
081            elseif Location.Config.BurstType.Value == "Police" then
082                if math.floor((CurrentTime%1.5)*100)/100 <= .01 then
083                    warn("Blue")
084                    local Burst = script.BurstRings:Clone()
085                    Burst.ImageColor3 = Color3.fromRGB(82,124,174)
086                    Burst.Parent = Marker
087                    T:Create(Burst,TweenInfo.new(1),{Size = UDim2.new(2,0,2,0),ImageTransparency = 1}):Play()
088                    game.Debris:AddItem(Burst,1)
089                elseif math.floor((CurrentTime%.75)*100)/100 <= .01 then
090                    warn("Red")
091                    local Burst = script.BurstRings:Clone()
092                    Burst.ImageColor3 = Color3.fromRGB(255,89,89)
093                    Burst.Parent = Marker
094                    T:Create(Burst,TweenInfo.new(1),{Size = UDim2.new(2,0,2,0),ImageTransparency = 1}):Play()
095                    game.Debris:AddItem(Burst,1)
096                end
097            end
098        end
099    end
100end)
 View all 100 lines...

[ ADVANCED ] GUI arrow won't follow a part in workspace?

Answer this question