local part = script.Parent

-- Maak een ClickDetector zodat we kunnen zien wanneer het deel wordt geklikt
local cd = Instance.new("ClickDetector", part)

-- Deze functie werkt bij hoe het deel eruit ziet op basis van de verankerde staat
local function updateVisuals()
	if part.Anchored then
		-- Wanneer het deel verankerd is...
		part.BrickColor = BrickColor.new("Heldere rood")
		part.Material = Enum.Material.DiamondPlate
	else
		-- Wanneer het deel niet verankerd is...
		part.BrickColor = BrickColor.new("Heldere geel")
		part.Material = Enum.Material.Wood
	end
end

local function onToggle()
	-- Wissel de verankerde eigenschap
	part.Anchored = not part.Anchored

	-- Werk de visuele staat van de baksteen bij
	updateVisuals()
end

-- Werk bij, en begin dan met luisteren naar klikken
updateVisuals()
cd.MouseClick:Connect(onToggle)

-- Plak in een Script binnen een hoog onderdeel
local part = script.Parent

local OPEN_TIME = 1

-- Kan de deur op dit moment geopend worden?
local debounce = false

local function open()
	part.CanCollide = false
	part.Transparency = 0.7
	part.BrickColor = BrickColor.new("Zwart")
end

local function close()
	part.CanCollide = true
	part.Transparency = 0
	part.BrickColor = BrickColor.new("Helder blauw")
end

local function onTouch(otherPart)
	-- Als de deur al open was, doe niets
	if debounce then
		print("D")
		return
	end

	-- Controleer of aangeraakt door een Humanoid
	local human = otherPart.Parent:FindFirstChildOfClass("Humanoid")
	if not human then
		print("geen mens")
		return
	end

	-- Voer de deur open sequentie uit
	debounce = true
	open()
	task.wait(OPEN_TIME)
	close()
	debounce = false
end

part.Touched:Connect(onTouch)
close()

local part = script.Parent:WaitForChild("Part")
local otherPart = script.Parent:WaitForChild("OtherPart")

-- Reset de CFrame van de part naar (0, 0, 0) zonder rotatie.
-- Dit wordt soms de "identiteit" CFrame genoemd
part.CFrame = CFrame.new()

-- Stel in op een specifieke positie (X, Y, Z)
part.CFrame = CFrame.new(0, 25, 10)

-- Hetzelfde als hierboven, maar gebruik een Vector3 in plaats daarvan
local point = Vector3.new(0, 25, 10)
part.CFrame = CFrame.new(point)

-- Stel de CFrame van de part in op één punt, kijkend naar een ander
local lookAtPoint = Vector3.new(0, 20, 15)
part.CFrame = CFrame.lookAt(point, lookAtPoint)

-- Draai de CFrame van de part met pi/2 radialen op de lokale X-as
part.CFrame = part.CFrame * CFrame.Angles(math.pi / 2, 0, 0)
-- Draai de CFrame van de part met 45 graden op de lokale Y-as
part.CFrame = part.CFrame * CFrame.Angles(0, math.rad(45), 0)
-- Draai de CFrame van de part met 180 graden op de globale Z-as (let op de volgorde!)
part.CFrame = CFrame.Angles(0, 0, math.pi) * part.CFrame -- Pi radialen is gelijk aan 180 graden

-- Het samenstellen van twee CFrames gebeurt met * (de vermenigvuldigingsoperator)
part.CFrame = CFrame.new(2, 3, 4) * CFrame.new(4, 5, 6) --> gelijk aan CFrame.new(6, 8, 10)

-- In tegenstelling tot algebraïsche vermenigvuldiging is CFrame-samenstelling NIET commutatief: a * b is niet noodzakelijk b * a!
-- Stel je * voor als een GEORDENDE reeks acties. Bijvoorbeeld, de volgende regels produceren verschillende CFrames:
-- 1) Verschuif de part 5 eenheden op X.
-- 2) Draai de part 45 graden rond zijn Y-as.
part.CFrame = CFrame.new(5, 0, 0) * CFrame.Angles(0, math.rad(45), 0)
-- 1) Draai de part 45 graden rond zijn Y-as.
-- 2) Verschuif de part 5 eenheden op X.
part.CFrame = CFrame.Angles(0, math.rad(45), 0) * CFrame.new(5, 0, 0)

-- Er is geen "CFrame deling", maar in plaats daarvan gewoon "de inverse operatie uitvoeren".
part.CFrame = CFrame.new(4, 5, 6) * CFrame.new(4, 5, 6):Inverse() --> is gelijk aan CFrame.new(0, 0, 0)
part.CFrame = CFrame.Angles(0, 0, math.pi) * CFrame.Angles(0, 0, math.pi):Inverse() --> gelijk aan CFrame.Angles(0, 0, 0)

-- Positioneer een part relatief ten opzichte van een andere (in dit geval, zet onze part bovenop otherPart)
part.CFrame = otherPart.CFrame * CFrame.new(0, part.Size.Y / 2 + otherPart.Size.Y / 2, 0)

local Workspace = game:GetService("Workspace")

local collisionGroupBall = "CollisionGroupBall"
local collisionGroupDoor = "CollisionGroupDoor"

-- Registreer botsingsgroepen in Workspace
Workspace:RegisterCollisionGroup(collisionGroupBall)
Workspace:RegisterCollisionGroup(collisionGroupDoor)

-- Wijs onderdelen toe aan botsingsgroepen
script.Parent.BallPart.CollisionGroup = collisionGroupBall
script.Parent.DoorPart.CollisionGroup = collisionGroupDoor

-- Stel groepen in als niet-botsend met elkaar en controleer het resultaat
Workspace:CollisionGroupSetCollidable(collisionGroupBall, collisionGroupDoor, false)
print(Workspace:CollisionGroupsAreCollidable(collisionGroupBall, collisionGroupDoor)) --> false

-- Plak dit in een Script binnen StarterCharacterScripts
-- Speel vervolgens het spel en speel met de gezondheid van je personage
local char = script.Parent
local human = char.Humanoid

local colorHealthy = Color3.new(0.4, 1, 0.2)
local colorUnhealthy = Color3.new(1, 0.4, 0.2)

local function setColor(color)
	for _, child in pairs(char:GetChildren()) do
		if child:IsA("BasePart") then
			child.Color = color
			while child:FindFirstChildOfClass("Decal") do
				child:FindFirstChildOfClass("Decal"):Destroy()
			end
		elseif child:IsA("Accessory") then
			child.Handle.Color = color
			local mesh = child.Handle:FindFirstChildOfClass("SpecialMesh")
			if mesh then
				mesh.TextureId = ""
			end
		elseif child:IsA("Shirt") or child:IsA("Pants") then
			child:Destroy()
		end
	end
end

local function update()
	local percentage = human.Health / human.MaxHealth

	-- Maak een kleur door te tweenen op basis van het percentage van je gezondheid
	-- De kleur gaat van colorHealthy (100%) ----- > colorUnhealthy (0%)
	local color = Color3.new(
		colorHealthy.R * percentage + colorUnhealthy.r * (1 - percentage),
		colorHealthy.G * percentage + colorUnhealthy.g * (1 - percentage),
		colorHealthy.B * percentage + colorUnhealthy.b * (1 - percentage)
	)
	setColor(color)
end

update()
human.HealthChanged:Connect(update)

local part = script.Parent

-- Dit maakt het onderdeel licht en veerkrachtig!
local DENSITY = 0.3
local FRICTION = 0.1
local ELASTICITY = 1
local FRICTION_WEIGHT = 1
local ELASTICITY_WEIGHT = 1

local physProperties = PhysicalProperties.new(DENSITY, FRICTION, ELASTICITY, FRICTION_WEIGHT, ELASTICITY_WEIGHT)
part.CustomPhysicalProperties = physProperties

-- Plak dit in een Script binnen een Model dat je wilt ontgrendelen
local model = script.Parent

-- Deze functie doorloopt de hiërarchie van een model en ontgrendelt
-- elk onderdeel dat het tegenkomt.
local function recursiveUnlock(object)
	if object:IsA("BasePart") then
		object.Locked = false
	end

	-- Roep dezelfde functie aan op de kinderen van het object
	-- Het recursieve proces stopt als een object geen kinderen heeft
	for _, child in pairs(object:GetChildren()) do
		recursiveUnlock(child)
	end
end

recursiveUnlock(model)

local part = script.Parent

local INCREMENT = 360 / 20

-- Roteer het deel continu
while true do
	for degrees = 0, 360, INCREMENT do
		-- Stel alleen de Y-as rotatie in
		part.Rotation = Vector3.new(0, degrees, 0)
		-- Een betere manier om dit te doen zou zijn om CFrame in te stellen
		--part.CFrame = CFrame.new(part.Position) * CFrame.Angles(0, math.rad(degrees), 0)
		task.wait()
	end
end

local function resetPivot(model)
	local boundsCFrame = model:GetBoundingBox()
	if model.PrimaryPart then
		model.PrimaryPart.PivotOffset = model.PrimaryPart.CFrame:ToObjectSpace(boundsCFrame)
	else
		model.WorldPivot = boundsCFrame
	end
end

resetPivot(script.Parent)

local function createHand(length, width, yOffset)
	local part = Instance.new("Part")
	part.Size = Vector3.new(width, 0.1, length)
	part.Material = Enum.Material.Neon
	part.PivotOffset = CFrame.new(0, -(yOffset + 0.1), length / 2)
	part.Anchored = true
	part.Parent = workspace
	return part
end

local function positionHand(hand, fraction)
	hand:PivotTo(CFrame.fromEulerAnglesXYZ(0, -fraction * 2 * math.pi, 0))
end

-- Maak wijzerplaat
for i = 0, 11 do
	local dialPart = Instance.new("Part")
	dialPart.Size = Vector3.new(0.2, 0.2, 1)
	dialPart.TopSurface = Enum.SurfaceType.Smooth
	if i == 0 then
		dialPart.Size = Vector3.new(0.2, 0.2, 2)
		dialPart.Color = Color3.new(1, 0, 0)
	end
	dialPart.PivotOffset = CFrame.new(0, -0.1, 10.5)
	dialPart.Anchored = true
	dialPart:PivotTo(CFrame.fromEulerAnglesXYZ(0, (i / 12) * 2 * math.pi, 0))
	dialPart.Parent = workspace
end

-- Maak wijzers
local hourHand = createHand(7, 1, 0)
local minuteHand = createHand(10, 0.6, 0.1)
local secondHand = createHand(11, 0.2, 0.2)

-- Voer klok uit
while true do
	local components = os.date("*t")
	positionHand(hourHand, (components.hour + components.min / 60) / 12)
	positionHand(minuteHand, (components.min + components.sec / 60) / 60)
	positionHand(secondHand, components.sec / 60)
	task.wait()
end

local Workspace = game:GetService("Workspace")

local bluePart = Instance.new("Part")
bluePart.Name = "BluePart"
bluePart.Parent = Workspace

local part = Workspace.BluePart
local desiredPivotCFrameInWorldSpace = CFrame.new(0, 10, 0)
part.PivotOffset = part.CFrame:ToObjectSpace(desiredPivotCFrameInWorldSpace)

-- Plaats dit Script in verschillende soorten BasePart, zoals
-- Part, TrussPart, WedgePart, CornerWedgePart, enz.
local part = script.Parent

-- Maak een handvattenobject voor dit onderdeel
local handles = Instance.new("Handles")
handles.Adornee = part
handles.Parent = part

-- Specificeer handmatig de gezichten die van toepassing zijn voor dit handvat
handles.Faces = Faces.new(Enum.NormalId.Top, Enum.NormalId.Front, Enum.NormalId.Left)

-- Alternatief, gebruik de gezichten waarop het onderdeel kan worden aangepast.
-- Als het onderdeel een TrussPart is met slechts twee grootte dimensies
-- van lengte 2, dan zal ResizeableFaces alleen twee
-- ingeschakelde gezichten hebben. Voor andere onderdelen zullen alle gezichten ingeschakeld zijn.
handles.Faces = part.ResizeableFaces

local TOWER_BASE_SIZE = 30

local position = Vector3.new(50, 50, 50)

local hue = math.random()
local color0 = Color3.fromHSV(hue, 1, 1)
local color1 = Color3.fromHSV((hue + 0.35) % 1, 1, 1)

local model = Instance.new("Model")
model.Name = "Tower"

for i = TOWER_BASE_SIZE, 1, -2 do
	local part = Instance.new("Part")
	part.Size = Vector3.new(i, 2, i)
	part.Position = position
	part.Anchored = true
	part.Parent = model
	-- Tween van color0 en color1
	local perc = i / TOWER_BASE_SIZE
	part.Color = Color3.new(
		color0.R * perc + color1.R * (1 - perc),
		color0.G * perc + color1.G * (1 - perc),
		color0.B * perc + color1.B * (1 - perc)
	)

	position = position + Vector3.new(0, part.Size.Y, 0)
end
model.Parent = workspace

-- Plak in een Script binnen een hoog onderdeel
local part = script.Parent

local OPEN_TIME = 1

-- Kan de deur op dit moment geopend worden?
local debounce = false

local function open()
	part.CanCollide = false
	part.Transparency = 0.7
	part.BrickColor = BrickColor.new("Zwart")
end

local function close()
	part.CanCollide = true
	part.Transparency = 0
	part.BrickColor = BrickColor.new("Helder blauw")
end

local function onTouch(otherPart)
	-- Als de deur al open was, doe niets
	if debounce then
		print("D")
		return
	end

	-- Controleer of aangeraakt door een Humanoid
	local human = otherPart.Parent:FindFirstChildOfClass("Humanoid")
	if not human then
		print("geen mens")
		return
	end

	-- Voer de deur open sequentie uit
	debounce = true
	open()
	task.wait(OPEN_TIME)
	close()
	debounce = false
end

part.Touched:Connect(onTouch)
close()

local part = Instance.new("Part")
part.Parent = workspace

local angularVelocity = part.AssemblyAngularVelocity
local desiredAcceleration = Vector3.new(0, 10, 0)

-- Bereken het koppel dat nodig is om de gewenste versnelling te bereiken
local torque = part:AngularAccelerationToTorque(desiredAcceleration, angularVelocity)

local part = workspace:FindFirstChild("Part")

if part and part:IsA("BasePart") then
	local canSet, errorReason = part:CanSetNetworkOwnership()
	if canSet then
		print(part:GetFullName() .. "'s Netwerkbezit kan worden gewijzigd!")
	else
		warn("Kan het netwerkbezit van " .. part:GetFullName() .. " niet wijzigen omdat: " .. errorReason)
	end
end

local myPart = Instance.new("Part")
myPart.Size = Vector3.new(4, 6, 4)
myPart.Anchored = true
myPart.Parent = workspace

local myMass = myPart:GetMass()

print("De massa van mijn onderdeel is " .. myMass)