Keyless
Multifunction Script

neutral 7 months ago 1.2K views 3
Run it
Copy the script and paste it into your executor.
Multifunction Script.lua · 675 lines
 Players = :()
 ReplicatedStorage = :()
 RunService = :()
 Workspace = :()
 UserInputService = :()
 VirtualInputManager = :()
 GuiService = :()

 LocalPlayer = Players.LocalPlayer
 PlayerGui = LocalPlayer:()
 SystemGui = PlayerGui:()
 EventHandler = SystemGui:()
 Inventory = SystemGui.MenuObject:()
 Slots = Inventory:()
 BagValue = SystemGui:()
 ShopGui = SystemGui:()
 RequestAttack = ReplicatedStorage:():()
 SellRemote = EventHandler:()
 SellCountRemote = ReplicatedStorage:():():()

 TargetSelector = (
	ReplicatedStorage
		.D8ClientFramework
		.Services
		.TargetSelectorService
		.Client_TargetSelectorService
)

 ItemList = (ReplicatedStorage.D8ClientFramework.Services.ItemObjectService.Modules.ItemList)

 Character = LocalPlayer.Character  LocalPlayer.CharacterAdded:()
LocalPlayer.CharacterAdded:((NewCharacter)
	Character = NewCharacter
)

 TargetEnabled = 
 ShortcutEnabled = 
 PickupEnabled = 
 ShortcutRunning = 
 CurrentTargetData
 CurrentTargetName = 
 PickupCooldown = 

 SellSelection = {}
 AllItemNames = {}
 SellLoopEnabled = 
 SellCycleRunning = 
 LastSoldCount = 
 SellStatusText = 

 SlotsPerBag = 
 BagTimeout = 
 SellCheckDelay = 
 SlotLoopDelay = 
 SellCycleDelay = 
 MaxListRows = 

  (Value)
	 .((Value  ):(, ):(, ))


  ()
	VirtualInputManager:(, .KeyCode.G, , )
	.()
	VirtualInputManager:(, .KeyCode.G, , )


 Index, UiName  ({ , ,  }) 
	 Old = PlayerGui:(UiName)
	 Old 
		Old:()
	


 AutomationUi = .()
AutomationUi.Name = 
AutomationUi.ResetOnSpawn = 
AutomationUi.Parent = PlayerGui

 AutoFrame = .()
AutoFrame.Size = .(, )
AutoFrame.Position = .(, , , )
AutoFrame.BackgroundColor3 = .(, , )
AutoFrame.BackgroundTransparency = 
AutoFrame.BorderSizePixel = 
AutoFrame.Active = 
AutoFrame.Draggable = 
AutoFrame.Parent = AutomationUi

 AutoTitle = .()
AutoTitle.Size = .(, -, , )
AutoTitle.Position = .(, )
AutoTitle.BackgroundTransparency = 
AutoTitle.Font = .Font.GothamBold
AutoTitle.TextSize = 
AutoTitle.TextXAlignment = .TextXAlignment.Left
AutoTitle.TextColor3 = .(, , )
AutoTitle.Text = 
AutoTitle.Parent = AutoFrame

 TargetLabel = .()
TargetLabel.Size = .(, -, , )
TargetLabel.Position = .(, )
TargetLabel.BackgroundTransparency = 
TargetLabel.Font = .Font.Gotham
TargetLabel.TextSize = 
TargetLabel.TextXAlignment = .TextXAlignment.Left
TargetLabel.Parent = AutoFrame

 ShortcutLabel = .()
ShortcutLabel.Size = .(, -, , )
ShortcutLabel.Position = .(, )
ShortcutLabel.BackgroundTransparency = 
ShortcutLabel.Font = .Font.Gotham
ShortcutLabel.TextSize = 
ShortcutLabel.TextXAlignment = .TextXAlignment.Left
ShortcutLabel.Parent = AutoFrame

 PickupLabel = .()
PickupLabel.Size = .(, -, , )
PickupLabel.Position = .(, )
PickupLabel.BackgroundTransparency = 
PickupLabel.Font = .Font.Gotham
PickupLabel.TextSize = 
PickupLabel.TextXAlignment = .TextXAlignment.Left
PickupLabel.Parent = AutoFrame

 AutoHint = .()
AutoHint.Size = .(, -, , )
AutoHint.Position = .(, )
AutoHint.BackgroundTransparency = 
AutoHint.Font = .Font.Gotham
AutoHint.TextSize = 
AutoHint.TextXAlignment = .TextXAlignment.Left
AutoHint.TextColor3 = .(, , )
AutoHint.Text = 
AutoHint.Parent = AutoFrame

 SellUi = .()
SellUi.Name = 
SellUi.ResetOnSpawn = 
SellUi.Parent = PlayerGui

 SellFrame = .()
SellFrame.Size = .(, )
SellFrame.Position = .(, , , )
SellFrame.BackgroundColor3 = .(, , )
SellFrame.BorderSizePixel = 
SellFrame.Active = 
SellFrame.Draggable = 
SellFrame.Parent = SellUi

 SellTitle = .()
SellTitle.Size = .(, -, , )
SellTitle.Position = .(, )
SellTitle.BackgroundTransparency = 
SellTitle.TextXAlignment = .TextXAlignment.Left
SellTitle.Font = .Font.GothamBold
SellTitle.TextSize = 
SellTitle.TextColor3 = .(, , )
SellTitle.Text = 
SellTitle.Parent = SellFrame

 SellStatusLabel = .()
SellStatusLabel.Size = .(, -, , )
SellStatusLabel.Position = .(, )
SellStatusLabel.BackgroundTransparency = 
SellStatusLabel.TextXAlignment = .TextXAlignment.Left
SellStatusLabel.Font = .Font.Gotham
SellStatusLabel.TextSize = 
SellStatusLabel.TextColor3 = .(, , )
SellStatusLabel.Parent = SellFrame

 SellToggleButton = .()
SellToggleButton.Size = .(, )
SellToggleButton.Position = .(, )
SellToggleButton.Font = .Font.GothamBold
SellToggleButton.TextSize = 
SellToggleButton.TextColor3 = .(, , )
SellToggleButton.BorderSizePixel = 
SellToggleButton.Parent = SellFrame

 SellClearButton = .()
SellClearButton.Size = .(, )
SellClearButton.Position = .(, )
SellClearButton.Font = .Font.GothamBold
SellClearButton.TextSize = 
SellClearButton.Text = 
SellClearButton.TextColor3 = .(, , )
SellClearButton.BackgroundColor3 = .(, , )
SellClearButton.BorderSizePixel = 
SellClearButton.Parent = SellFrame

 SearchBox = .()
SearchBox.Size = .(, -, , )
SearchBox.Position = .(, )
SearchBox.Font = .Font.Gotham
SearchBox.TextSize = 
SearchBox.TextColor3 = .(, , )
SearchBox.PlaceholderColor3 = .(, , )
SearchBox.PlaceholderText = 
SearchBox.Text = 
SearchBox.ClearTextOnFocus = 
SearchBox.BackgroundColor3 = .(, , )
SearchBox.BorderSizePixel = 
SearchBox.Parent = SellFrame

 SellInfoLabel = .()
SellInfoLabel.Size = .(, -, , )
SellInfoLabel.Position = .(, )
SellInfoLabel.BackgroundTransparency = 
SellInfoLabel.TextXAlignment = .TextXAlignment.Left
SellInfoLabel.Font = .Font.Gotham
SellInfoLabel.TextSize = 
SellInfoLabel.TextColor3 = .(, , )
SellInfoLabel.Parent = SellFrame

 ItemListFrame = .()
ItemListFrame.Size = .(, -, , -)
ItemListFrame.Position = .(, )
ItemListFrame.BackgroundColor3 = .(, , )
ItemListFrame.BorderSizePixel = 
ItemListFrame.ScrollBarThickness = 
ItemListFrame.CanvasSize = .(, )
ItemListFrame.Parent = SellFrame

 ItemListLayout = .()
ItemListLayout.Padding = .(, )
ItemListLayout.Parent = ItemListFrame

ItemListLayout:():(()
	ItemListFrame.CanvasSize = .(, ItemListLayout.AbsoluteContentSize.Y + )
)

  ()
	TargetLabel.Text = ():(TargetEnabled    , CurrentTargetName)
	TargetLabel.TextColor3 = TargetEnabled  .(, , )  .(, , )

	ShortcutLabel.Text = ():(ShortcutEnabled    , ShortcutRunning    )
	ShortcutLabel.TextColor3 = ShortcutEnabled  .(, , )  .(, , )

	PickupLabel.Text = ():(PickupEnabled    )
	PickupLabel.TextColor3 = PickupEnabled  .(, , )  .(, , )


  ()
	 Count = 
	 Key  (SellSelection) 
		Count += 
	
	 Count


  (Note)
	 Note 
		SellStatusText = Note
	
	SellStatusLabel.Text = ():(SellLoopEnabled    , LastSoldCount, SellStatusText)
	SellToggleButton.Text = SellLoopEnabled    
	SellToggleButton.BackgroundColor3 = SellLoopEnabled  .(, , )  .(, , )


  ()
	 Index, Child  (ItemListFrame:()) 
		 Child:()  Child:() 
			Child:()
		
	

	 Query = (SearchBox.Text)
	 Matched = 
	 Shown = 

	 Index, ItemName  (AllItemNames) 
		 Key = (ItemName)
		 Query ==   .(Key, Query, , ) 
			Matched += 
			 Shown < MaxListRows 
				Shown += 
				 Row = .()
				Row.Size = .(, -, , )
				Row.Position = .(, )
				Row.Font = .Font.Gotham
				Row.TextSize = 
				Row.TextXAlignment = .TextXAlignment.Left
				Row.TextColor3 = .(, , )
				Row.BorderSizePixel = 
				Row.AutoButtonColor = 
				Row.Text = (SellSelection[Key]    ) .. ItemName
				Row.BackgroundColor3 = SellSelection[Key]  .(, , )  .(, , )
				Row.Parent = ItemListFrame

				Row.MouseButton1Click:(()
					 SellSelection[Key] 
						SellSelection[Key] = 
					
						SellSelection[Key] = 
					
					()
				)
			
		
	

	 Matched > MaxListRows 
		 More = .()
		More.Size = .(, -, , )
		More.Position = .(, )
		More.BackgroundTransparency = 
		More.TextXAlignment = .TextXAlignment.Left
		More.Font = .Font.Gotham
		More.TextSize = 
		More.TextColor3 = .(, , )
		More.Text = ():(Matched, MaxListRows)
		More.Parent = ItemListFrame
	

	SellInfoLabel.Text = ():((), Matched, #AllItemNames)



	 Seen = {}
	  (Name)
		 (Name) ~=    
		 Raw = (Name:(, ):(, ))
		 Raw ==    
		 Key = (Raw)
		 Seen[Key]   
		Seen[Key] = 
		.(AllItemNames, Raw)
	

	 Visited = {}
	  (Node)
		 (Node) ~=   Visited[Node]   
		Visited[Node] = 

		 (Node.Name) ==  
			(Node.Name)
		

		 Key, Value  (Node) 
			 (Value) ==  
				 (Value.Name) ==  
					(Value.Name)
				 (Key) ==   (Value.Class ~=   Value.Type ~=   Value.ID ~=   Value.LvReq ~=   Value.Grade ~= ) 
					(Key)
				
				(Value)
			 Key ==   (Value) ==  
				(Value)
			
		
	

	(ItemList)
	.(AllItemNames, (A, B)
		 (A) < (B)
	)


SellToggleButton.MouseButton1Click:(()
	SellLoopEnabled =  SellLoopEnabled
	(SellLoopEnabled    )
)

SellClearButton.MouseButton1Click:(()
	.(SellSelection)
	()
	()
)

SearchBox:():(RenderSellList)

  (Enemy, EnemyHumanoid, DataValue)
	  Enemy   Enemy.Parent    
	 Enemy:()    
	 EnemyHumanoid  (EnemyHumanoid.Health <=   EnemyHumanoid:() == .HumanoidStateType.Dead)    
	 DataValue  DataValue:()    
	 


  ()
	 HadTarget = CurrentTargetData ~=   CurrentTargetName ~= 
	CurrentTargetData = 
	CurrentTargetName = 
	 HadTarget  TargetSelector.CancelTargetSelection 
		TargetSelector:()
	
	 HadTarget 
		()
	


  (DataValue)
	  DataValue    
	 Cam = Workspace.CurrentCamera
	  Cam    
	 Index, Enemy  (Cam:()) 
		 Enemy:() 
			 Data = Enemy:()
			 Data  Data.Value == DataValue 
				 Enemy
			
		
	
	 


  ()
	 Index = ,  
		  ShortcutEnabled   
		EventHandler.onShortCut:((Index))
		.()
	


  ()
	  TargetEnabled 
		()
		
	

	  Character   Character.Parent 
		()
		
	

	 MyRoot = Character:()
	 MyHumanoid = Character:()
	  MyRoot   MyHumanoid  MyHumanoid.Health <=  
		()
		
	

	  TargetSelector.PlayerDataTarget   TargetSelector.PlayerAttacking 
		
	

	 CurrentTargetData 
		 CurrentRender = (CurrentTargetData)
		  CurrentRender 
			()
		
			 CurrentHumanoid = CurrentRender:()
			 CurrentRender:()  CurrentRender:() 
				()
			 (CurrentRender, CurrentHumanoid, CurrentTargetData) 
				()
			
		
	

	 Cam = Workspace.CurrentCamera
	  Cam   

	 BestEnemy = 
	 BestData = 
	 BestDistance = 

	 Index, Enemy  (Cam:()) 
		  Enemy:()   
		 .(.(Enemy.Name), , , )   
		 Enemy:()   
		 Enemy:()   

		 Data = Enemy:()
		 EnemyRoot = Enemy:()  Enemy:()
		 EnemyHumanoid = Enemy:()
		 DataValue = Data  Data.Value  

		  Data   EnemyRoot   EnemyHumanoid   DataValue   
		 (Enemy, EnemyHumanoid, DataValue)   

		 Distance = (MyRoot.Position - EnemyRoot.Position).Magnitude
		 Distance < BestDistance 
			BestDistance = Distance
			BestEnemy = Enemy
			BestData = DataValue
		
	

	  BestEnemy   BestData 
		()
		
	

	 CurrentTargetData == BestData 
		
	

	CurrentTargetData = BestData
	CurrentTargetName = BestEnemy.Name
	()

	TargetSelector:(BestEnemy, , BestData)
	TargetSelector:(BestEnemy, , BestData)
	RequestAttack:({ { BestData,  } })


  (Delta)
	  PickupEnabled   
	PickupCooldown += Delta
	 PickupCooldown <    
	PickupCooldown = 
	()
	EventHandler.onLootAllClicked:()


  (Button)
	 Inset = GuiService:()
	 Center = Button.AbsolutePosition + (Button.AbsoluteSize / ) + Inset
	VirtualInputManager:(Center.X, Center.Y, )
	RunService.Heartbeat:()
	VirtualInputManager:(Center.X, Center.Y, , , , )
	RunService.Heartbeat:()
	VirtualInputManager:(Center.X, Center.Y, , , , )


  (Button)
	  Button   Button.Visible   
	(() (Button.Activated) )
	(() (Button.MouseButton1Down) )
	(() (Button.MouseButton1Click) )
	(() (Button.MouseButton1Up) )
	(Button)
	(() Button:() )


  (BagIndex)
	 BagValue.Value == BagIndex    
	 BagButton = Inventory:( .. (BagIndex))
	  BagButton    
	(BagButton)
	 StartTime = ()
	 () - StartTime < BagTimeout 
		 BagValue.Value == BagIndex 
			 
		
		RunService.Heartbeat:()
	
	 


  (ObjectValue)
	 NameKey = (ObjectValue:())
	 NameKey ==     
	 SellSelection[NameKey] == 


  (SlotGui, BagIndex, SlotNumber)
	 ObjectValue = SlotGui:()
	  ObjectValue    
	  (ObjectValue)    

	 BeforeName = ObjectValue:()
	 BeforeCount = (ObjectValue:())  
	 GlobalSlot = ((BagIndex - ) * SlotsPerBag) + SlotNumber

	  (SlotIndex)
		SellRemote:(SlotIndex)

		 CountNow = (ObjectValue:())
		 CountNow  CountNow >  
			SellCountRemote:((.(CountNow)))
		
	

	(GlobalSlot)
	.(SellCheckDelay)

	 AfterName = ObjectValue:()
	 AfterCount = (ObjectValue:())  
	 AfterName ~= BeforeName  AfterCount < BeforeCount 
		 
	

	(SlotNumber)
	.(SellCheckDelay)

	AfterName = ObjectValue:()
	AfterCount = (ObjectValue:())  
	 AfterName ~= BeforeName  AfterCount < BeforeCount


  (BagIndex)
	 SoldCount = 
	 SlotNumber = , SlotsPerBag 
		  SellLoopEnabled 
			
		
		 SlotGui = Slots:((SlotNumber))
		 SlotGui  (SlotGui, BagIndex, SlotNumber) 
			SoldCount += 
		
		.(SlotLoopDelay)
	
	 SoldCount


UserInputService.InputBegan:((Input, GameProcessed)
	 GameProcessed   

	 Input.KeyCode == .KeyCode.E 
		TargetEnabled =  TargetEnabled
		  TargetEnabled 
			()
		
		()
	 Input.KeyCode == .KeyCode.T 
		ShortcutEnabled =  ShortcutEnabled
		()
	 Input.KeyCode == .KeyCode.Y 
		PickupEnabled =  PickupEnabled
		  PickupEnabled 
			PickupCooldown = 
		
		()
	
)

RunService.RenderStepped:((Delta)
	()
	(Delta)

	 ShortcutEnabled   ShortcutRunning 
		ShortcutRunning = 
		()
		.(()
			()
			ShortcutRunning = 
			()
		)
	
)

.(()
	 .(SellCycleDelay) 
		  SellLoopEnabled  SellCycleRunning 
			
		

		  ShopGui.Visible 
			LastSoldCount = 
			()
			
		

		SellCycleRunning = 
		 TotalSold = 

		 Bag = ,  
			  SellLoopEnabled 
				
			
			 (Bag) 
				TotalSold += (Bag)
			
			.()
		

		 SellLoopEnabled 
			LastSoldCount = TotalSold
			()
		
			()
		

		SellCycleRunning = 
	
)

()
()
()
Features

Auto sell
Auto Skill
Auto Target
Auto Pickup