Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- --Nhấp vào gui sẽ đổi màu script:
- PLMain = Main
- PLCgui = TextButton
- if PLMain.BackgroundTransparency == 0 then
- PLMain.BackgroundTransparency = 0.5
- elseif
- PLMain.BackgroundTransparency == 0.5 then
- PLMain.BackgroundTransparency = 0
- end
- if PLCgui.BackgroundTransparency == 0 then
- PLCgui.BackgroundTransparency = 0.5
- elseif
- PLCgui.BackgroundTransparency == 0.5 then
- PLCgui.BackgroundTransparency = 0
- end
- end)
- Open New
- Main.Visible = true
- Main:TweenPosition(UDim2.new(0.345, 0,0.204, 0), 'Out', 'Bounce', 3)
- end)
- Execute sẽ có chữ hiện lên xong tự tắt
- wait(0.5)
- Dino.Visible = true
- Dino.TextTransparency = 0.8
- Dino.TextStrokeTransparency = 0.8
- wait(0.1)
- Dino.TextTransparency = 0.7
- Dino.TextStrokeTransparency = 0.7
- wait(0.1)
- Dino.TextTransparency = 0.6
- Dino.TextStrokeTransparency = 0.6
- wait(0.1)
- Dino.TextTransparency = 0.5
- Dino.TextStrokeTransparency = 0.5
- wait(0.1)
- Dino.TextTransparency = 0.4
- Dino.TextStrokeTransparency = 0.4
- wait(0.1)
- Dino.TextTransparency = 0.3
- Dino.TextStrokeTransparency = 0.3
- wait(0.1)
- Dino.TextTransparency = 0.2
- Dino.TextStrokeTransparency = 0.2
- wait(0.1)
- Dino.TextTransparency = 0.1
- Dino.TextStrokeTransparency = 0.1
- wait(5)
- Dino.TextTransparency = 0.1
- Dino.TextStrokeTransparency = 0.1
- wait(0.1)
- Dino.TextTransparency = 0.2
- Dino.TextStrokeTransparency = 0.2
- wait(0.1)
- Dino.TextTransparency = 0.3
- Dino.TextStrokeTransparency = 0.3
- wait(0.1)
- Dino.TextTransparency = 0.4
- Dino.TextStrokeTransparency = 0.4
- wait(0.1)
- Dino.TextTransparency = 0.5
- Dino.TextStrokeTransparency = 0.5
- wait(0.1)
- Dino.TextTransparency = 0.6
- Dino.TextStrokeTransparency = 0.6
- wait(0.1)
- Dino.TextTransparency = 0.7
- Dino.TextStrokeTransparency = 0.7
- wait(0.1)
- Dino.TextTransparency = 0.8
- Dino.TextStrokeTransparency = 0.8
- wait(0.1)
- Dino.Visible = false
- Move gui new
- function dragify(Main)
- dragToggle = nil
- dragSpeed = .20 -- You can edit this.
- dragInput = nil
- dragStart = nil
- dragPos = nil
- function updateInput(input)
- Delta = input.Position - dragStart
- Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + Delta.X, startPos.Y.Scale, startPos.Y.Offset + Delta.Y)
- game:GetService("TweenService"):Create(Main, TweenInfo.new(.25), {Position = Position}):Play()
- end
- Main.InputBegan:Connect(function(input)
- if (input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch) then
- dragToggle = true
- dragStart = input.Position
- startPos = Main.Position
- input.Changed:Connect(function()
- if (input.UserInputState == Enum.UserInputState.End) then
- dragToggle = false
- end
- end)
- end
- end)
- Main.InputChanged:Connect(function(input)
- if (input.UserInputType == Enum.UserInputType.MouseMovement or input.UserInputType == Enum.UserInputType.Touch) then
- dragInput = input
- end
- end)
- game:GetService("UserInputService").InputChanged:Connect(function(input)
- if (input == dragInput and dragToggle) then
- updateInput(input)
- end
- end)
- end
- dragify(Main)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement