local Message = game.ReplicatedStorage:WaitForChild("Message")
local Image = Message:WaitForChild("SpeakerImage")
local PlayerImage = Message:WaitForChild("PlayerImage")
local Speaker = Message:WaitForChild("SpeakerName")
local PlayerName = Message:WaitForChild("PlayerName")
local HideDialogueEvent = Message:WaitForChild("HideDialogueEvent")

local player = game.Players.LocalPlayer
local DialogueFrame = player.PlayerGui:WaitForChild("DialogueGui").DialogueFrame

-- Create a camera instance and attach it to the DialogueFrame
local camera = Instance.new("Camera")
camera.Parent = DialogueFrame

-- Function to update the character display (only head and accessories)
local function UpdateCharacter(character)
	local worldModel = DialogueFrame.PlayerImage.Icon.WorldModel

	-- Clear existing parts in the WorldModel
	for _, child in pairs(worldModel:GetChildren()) do
		if child:IsA("BasePart") or child:IsA("Accessory") then
			child:Destroy()
		end
	end

	-- Clone only the head and accessories from the character
	for _, child in pairs(character:GetChildren()) do
		if child:IsA("Accessory") or (child:IsA("BasePart") and child.Name == "Head") then
			local clonedChild = child:Clone()
			clonedChild.Parent = worldModel
		end
	end

	-- Set the camera to focus on the head
	local head = worldModel:FindFirstChild("Head")
	if head then
		camera.CFrame = head.CFrame * CFrame.new(0, 0.2, -2) * CFrame.Angles(0, math.rad(180), 0)
		DialogueFrame.PlayerImage.Icon.CurrentCamera = camera
	else
		warn("Head not found in character!")
	end
end

-- Hide the dialogue frame when the event is triggered
HideDialogueEvent.OnClientEvent:Connect(function()
	DialogueFrame:TweenPosition(UDim2.new(0.55, 0, -1, 0))
end)

-- Update the dialogue text when the message changes
Message:GetPropertyChangedSignal("Value"):Connect(function()
	DialogueFrame.Dialogue.Text = Message.Value
	script.DialogueSound:Play()
end)

-- Update the speaker and character display when the speaker changes
Speaker:GetPropertyChangedSignal("Value"):Connect(function()
	DialogueFrame:TweenPosition(UDim2.new(0.55, 0, 0.139, 0))
	print("New Speaker: " .. Speaker.Value)

	local character = workspace:FindFirstChild(Image.Value)
	if character then
		UpdateCharacter(character)
	else
		warn("Character not found in workspace: " .. Image.Value)
	end
	DialogueFrame.PlayerImage.Icon.Visible = true
	DialogueFrame.PlayerImage.PlayerIcon.Visible = false
	DialogueFrame.PlayerImage.Icon.nameLabel.Visible = true
	DialogueFrame.PlayerImage.PlayerIcon.nameLabel.Visible = false
	DialogueFrame.PlayerImage.Icon.nameLabel.Text = Speaker.Value
end)

PlayerName:GetPropertyChangedSignal("Value"):Connect(function()
	DialogueFrame:TweenPosition(UDim2.new(0.55, 0, 0.139, 0))
	print("New Speaker: " .. PlayerName.Value)
	
	DialogueFrame.PlayerImage.Icon.Visible = false
	DialogueFrame.PlayerImage.PlayerIcon.Visible = true
	DialogueFrame.PlayerImage.Icon.nameLabel.Visible = false
	DialogueFrame.PlayerImage.PlayerIcon.nameLabel.Visible = true
	DialogueFrame.PlayerImage.PlayerIcon.Image = PlayerImage.Value
	DialogueFrame.PlayerImage.PlayerIcon.nameLabel.Text = PlayerName.Value
end)