My animation recorder script(read description on scriptblox)

 Players = :()
 LocalPlayer = Players.LocalPlayer
 HttpService = :()
 RunService = :()

()

 PlayerGui = LocalPlayer:(, )
  PlayerGui   

 successClear = (()
	 PlayerGui:()  PlayerGui.DeltaCFrameRecorder:() 
	 :():()  :().DeltaCFrameRecorder:() 
)

 targetParent = PlayerGui
 successCore, coreGui = (()  :() )
 successCore  coreGui  targetParent = coreGui 

 ScreenGui = .()
ScreenGui.Name = 
ScreenGui.ResetOnSpawn = 
ScreenGui.Parent = targetParent

 MainFrame = .()
MainFrame.Name = 
MainFrame.BackgroundColor3 = .(, , )
MainFrame.BorderSizePixel = 
MainFrame.Position = .(, , , )
MainFrame.Size = .(, , , ) 
MainFrame.Active = 
MainFrame.Draggable =  
MainFrame.Parent = ScreenGui

 TitleLabel = .()
TitleLabel.Size = .(, , , )
TitleLabel.BackgroundColor3 = .(, , )
TitleLabel.Text = 
TitleLabel.TextColor3 = .(, , )
TitleLabel.Font = .Font.SourceSansBold
TitleLabel.TextSize = 
TitleLabel.TextXAlignment = .TextXAlignment.Left
TitleLabel.Parent = MainFrame

 UIListLayout = .()
UIListLayout.HorizontalAlignment = .HorizontalAlignment.Center
UIListLayout.SortOrder = .SortOrder.LayoutOrder
UIListLayout.Padding = .(, )
UIListLayout.Parent = MainFrame

  (text, order, color, customParent)
	 btn = .()
	btn.Size = .(, , , )
	btn.Text = text
	btn.Font = .Font.SourceSansBold
	btn.TextSize = 
	btn.TextColor3 = .(, , )
	btn.BackgroundColor3 = color  .(, , )
	btn.BorderSizePixel = 
	btn.LayoutOrder = order
	btn.Parent = customParent  MainFrame
	 btn


 selectedFile = 
 animSpeed = 
 isLooping = 
 savedData = {}
 isRecording = 
 isPlaying = 
 forceStopPlayback = 
 tempFrames = {}
 frameCount = 
 recordConnection = 
 startRootCF =  

 RecordBtn = (, , .(, , ))


 SpeedFrame = .()
SpeedFrame.Size = .(, , , )
SpeedFrame.BackgroundTransparency = 
SpeedFrame.LayoutOrder = 
SpeedFrame.Parent = MainFrame

 SpeedLabel = .()
SpeedLabel.Size = .(, , , )
SpeedLabel.Text = 
SpeedLabel.TextColor3 = .(, , )
SpeedLabel.Font = .Font.SourceSansBold
SpeedLabel.TextSize = 
SpeedLabel.TextXAlignment = .TextXAlignment.Left
SpeedLabel.Parent = SpeedFrame

 SpeedInput = .()
SpeedInput.Size = .(, , , )
SpeedInput.Position = .(, , , )
SpeedInput.BackgroundColor3 = .(, , )
SpeedInput.BorderSizePixel = 
SpeedInput.Text = 
SpeedInput.TextColor3 = .(, , )
SpeedInput.Font = .Font.SourceSansBold
SpeedInput.TextSize = 
SpeedInput.Parent = SpeedFrame

SpeedInput.FocusLost:(()
	 num = (SpeedInput.Text)
	 num  num >   animSpeed = num SpeedLabel.Text =  .. num ..   SpeedInput.Text = (animSpeed) 
)

 LoopBtn = (, , .(, , ))
LoopBtn.MouseButton1Click:(()
	isLooping =  isLooping
	LoopBtn.Text = isLooping    
	LoopBtn.BackgroundColor3 = isLooping  .(, , )  .(, , )
)


 DropdownBtn = (, , .(, , ))
 DropdownContainer = .()
DropdownContainer.Size = .(, , , )
DropdownContainer.BackgroundColor3 = .(, , )
DropdownContainer.BorderSizePixel = 
DropdownContainer.Visible = 
DropdownContainer.LayoutOrder = 
DropdownContainer.CanvasSize = .(, , , )
DropdownContainer.Parent = MainFrame

 DropdownList = .()
DropdownList.SortOrder = .SortOrder.LayoutOrder
DropdownList.Parent = DropdownContainer

  ()
	 _, child  (DropdownContainer:())   child:()  child:()  child:()  
	 listfiles 
		 files = {} (() files = () )
		 itemOrder, totalHeight = , 
		 _, file  (files) 
			 file:()  file:(-) ==  
				 itemBtn = .()
				itemBtn.Size = .(, , , )
				itemBtn.BackgroundColor3 = .(, , )
				itemBtn.Text = file
				itemBtn.TextColor3 = .(, , )
				itemBtn.Font = .Font.SourceSans
				itemBtn.TextSize = 
				itemBtn.BorderSizePixel = 
				itemBtn.LayoutOrder = itemOrder
				itemBtn.Parent = DropdownContainer
				
				totalHeight = totalHeight + 
				itemOrder = itemOrder + 
				
				 deleteBtn = .()
				deleteBtn.Size = .(, , , )
				deleteBtn.BackgroundColor3 = .(, , )
				deleteBtn.Text = 
				deleteBtn.TextColor3 = .(, , )
				deleteBtn.Font = .Font.SourceSansBold
				deleteBtn.TextSize = 
				deleteBtn.BorderSizePixel = 
				deleteBtn.LayoutOrder = itemOrder
				deleteBtn.Visible = 
				deleteBtn.Parent = DropdownContainer
				itemOrder = itemOrder + 
				
				 holding = 
				itemBtn.MouseButton1Down:(()
					holding =  .()
					 holding 
						deleteBtn.Visible =  deleteBtn.Visible
						DropdownContainer.CanvasSize = .(, , , DropdownContainer.CanvasSize.Y.Offset + (deleteBtn.Visible    -))
					
				)
				itemBtn.MouseButton1Up:(() holding =  )
				
				itemBtn.MouseButton1Click:(()
					 deleteBtn.Visible   
					selectedFile = file DropdownBtn.Text =  .. file DropdownContainer.Visible = 
					 readfile  (file) 
						 success, decoded = (()  HttpService:((file)) )
						 success  savedData = decoded 
					
				)
				
				deleteBtn.MouseButton1Click:(()
					(()  delfile  (file)  (file)  odfdelfile  (file)  )
					 selectedFile == file  selectedFile =  savedData = {} DropdownBtn.Text =  
					()
				)
			
		
		DropdownContainer.CanvasSize = .(, , , totalHeight)
	 DropdownBtn.Text =  


DropdownBtn.MouseButton1Click:(()
	DropdownContainer.Visible =  DropdownContainer.Visible
	 DropdownContainer.Visible  () 
)

  ()
	 highestNum = 
	 listfiles 
		 files = {} (() files = () )
		 _, file  (files) 
			 match = file:()
			 match   num = (match)  num  num > highestNum  highestNum = num  
		
	
	  .. (highestNum + ) .. 


 ActionRowFrame = .()
ActionRowFrame.Size = .(, , , )
ActionRowFrame.BackgroundTransparency = 
ActionRowFrame.LayoutOrder = 
ActionRowFrame.Parent = MainFrame

 ActionRowLayout = .()
ActionRowLayout.FillDirection = .FillDirection.Horizontal
ActionRowLayout.HorizontalAlignment = .HorizontalAlignment.Center
ActionRowLayout.SortOrder = .SortOrder.LayoutOrder
ActionRowLayout.Padding = .(, )
ActionRowLayout.Parent = ActionRowFrame

 PlayBtn = (, , .(, , ), ActionRowFrame)
PlayBtn.Size = .(, , , )

 StopBtn = (, , .(, , ), ActionRowFrame)
StopBtn.Size = .(, , , )

 CopyBtn = (, )
 ClearBtn = (, , .(, , ))
 DeleteAllBtn = (, , .(, , ))


  (cf)
	 {cf:()}


  (t)  .((t)) 


RecordBtn.MouseButton1Click:(()
	 char = LocalPlayer.Character
	 root = char  char:()
	  char   root   

	  isRecording 
		isRecording = 
		tempFrames = {}
		frameCount = 
		startRootCF = root.CFrame 
		RecordBtn.Text = 
		RecordBtn.BackgroundColor3 = .(, , )
		
		 joints = {}
		 _, v  (char:())   v:()  .(joints, v)  
		
		recordConnection = RunService.Heartbeat:((dt)
			  root   root.Parent   
			 currentFrame = {}
			 hasJoints = 
			
			currentFrame[] = (startRootCF:(root.CFrame))
			currentFrame[] = dt 
			
			 _, joint  (joints) 
				 joint  joint.Parent 
					currentFrame[joint.Name] = (joint.Transform)
					hasJoints = 
				
			
			 hasJoints 
				tempFrames[(frameCount)] = currentFrame
				frameCount = frameCount + 
			
		)
	
		isRecording = 
		 recordConnection  recordConnection:() recordConnection =  
		savedData = tempFrames
		 writefile 
			 calculatedName = ()
			(() (calculatedName, HttpService:(savedData)) )
			selectedFile = calculatedName DropdownBtn.Text =  .. calculatedName
		
		RecordBtn.Text = 
		RecordBtn.BackgroundColor3 = .(, , )
		()
	
)


PlayBtn.MouseButton1Click:(()
	 char = LocalPlayer.Character
	 root = char  char:()
	  char   root  isPlaying   savedData  (savedData) ==    
	
	isPlaying = 
	forceStopPlayback = 
	PlayBtn.Text = 
	
	 joints = {}
	 _, v  (char:())   v:()  joints[v.Name] = v  
	
	 totalFrames = 
	 k, _  (savedData)   n = (k)    n > totalFrames  totalFrames = n  
	
	.(()
		 humanoid = char:()
		 animator = humanoid  humanoid:()
		 animatorParent = animator  animator.Parent
		 animator  animator.Parent =  
		
		
			 elapsedTime = 
			 initialPlaybackCF = root.CFrame 
			
			
			 timelineMarks = {}
			 currentTotalTime = 
			 i = , totalFrames 
				 frameData = savedData[(i)]
				 fTime = frameData  frameData[]  (/)
				timelineMarks[i] = currentTotalTime
				currentTotalTime = currentTotalTime + fTime
			
			 totalAnimDuration = currentTotalTime
			
			 elapsedTime < totalAnimDuration   forceStopPlayback 
				 dt = RunService.Heartbeat:()
				elapsedTime = elapsedTime + (dt * animSpeed)
				
				 frameA_Index = 
				 frameB_Index = 
				
				
				 i = , totalFrames -  
					 elapsedTime >= timelineMarks[i]  elapsedTime <= timelineMarks[i+] 
						frameA_Index = i
						frameB_Index = i + 
						
					
				
				 elapsedTime >= timelineMarks[totalFrames] 
					frameA_Index = totalFrames
					frameB_Index = totalFrames
				
				
				 dataA = savedData[(frameA_Index)]
				 dataB = savedData[(frameB_Index)]
				
				 dataA  dataB 
					 timeA = timelineMarks[frameA_Index]
					 timeB = timelineMarks[frameB_Index]
					 alpha = 
					 timeB - timeA >  
						alpha = (elapsedTime - timeA) / (timeB - timeA)
					
					alpha = .(alpha, , )
					
					
					 dataA[]  dataB[]  root 
						 cfA = (dataA[])
						 cfB = (dataB[])
						root.CFrame = initialPlaybackCF * cfA:(cfB, alpha)
					
					
					
					 jName, jointInstance  (joints) 
						 tA = dataA[jName]
						 tB = dataB[jName]
						 tA  tB 
							jointInstance.Transform = (tA):((tB), alpha)
						 tA 
							jointInstance.Transform = (tA)
						
					
				
			
		  isLooping  forceStopPlayback
		
		 animator  animator.Parent = animatorParent 
		isPlaying = 
		forceStopPlayback = 
		PlayBtn.Text = 
	)
)

StopBtn.MouseButton1Click:(()  isPlaying  forceStopPlayback =   )
CopyBtn.MouseButton1Click:(()
	  savedData  (savedData) ==    
	 dataString = HttpService:(savedData)
	 setclipboard  (dataString) CopyBtn.Text =  .() CopyBtn.Text =  
)

ClearBtn.MouseButton1Click:(()
	savedData = {}  selectedFile  writefile  (() (selectedFile, ) ) 
	ClearBtn.Text =  .() ClearBtn.Text =  ()
)

 confirmWipeState = 
DeleteAllBtn.MouseButton1Click:(()
	  confirmWipeState 
		confirmWipeState =  DeleteAllBtn.Text =  DeleteAllBtn.BackgroundColor3 = .(, , )
		.(, ()  confirmWipeState  confirmWipeState =  DeleteAllBtn.Text =  DeleteAllBtn.BackgroundColor3 = .(, , )  )
	
		confirmWipeState =  DeleteAllBtn.Text = 
		 listfiles 
			 files = {} (() files = () )
			 _, file  (files) 
				 file:()  file:(-) ==   (()  delfile  (file)  odfdelfile  (file)  ) 
			
		
		selectedFile =  savedData = {} DropdownBtn.Text =  .()
		DeleteAllBtn.Text =  DeleteAllBtn.BackgroundColor3 = .(, , ) ()
	
)

(refreshDropdown)
()