Revise paste MainScript 4

local CreateDialogueEvent = game.ReplicatedStorage.CreateDialogueEvent
local HideDialogueEvent = game.ReplicatedStorage.CreateDialogueEvent.HideDialogueEvent
local TopTextValue = game.ReplicatedStorage.TopText
local ObjectiveValue = game.ReplicatedStorage.TopText.Objective
local ItemsFound = game.ReplicatedStorage.ItemsFound

-- Other Useful Functions

local randomPlayer
local randomPlayerName
local randomPlayerId

local function getPlayerImage(player_id)
	local content, isReady = game:GetService("Players"):GetUserThumbnailAsync(player_id, Enum.ThumbnailType.HeadShot, Enum.ThumbnailSize.Size420x420)
	return content
end

local function getRandomPlayer()
	local players = game.Players:getPlayers()
	local number = math.random(1,#players)
	randomPlayer = players[number]
	randomPlayerName = randomPlayer.Name
	randomPlayerId = randomPlayer.UserId
end

function BroadCastMessage(name, Id, Message)
	CreateDialogueEvent:FireAllClients(name, Id, Message)
end

function HideCastMessage()
	HideDialogueEvent:FireAllClients()
end

function TopText(Text, Time)
	for i = Time, 0, -1 do
		TopTextValue.Value = Text.."("..i..")"
		wait(1)
	end
	TopTextValue.Value = "None"
end

function SetObjectives(Objective)
	ObjectiveValue.Value = Objective
end

function ClearObjectives()
	ObjectiveValue.Value = "None"
end

function SetItemsFound(Text)
	ItemsFound.Value = Text
end

function ClearItemsFound()
	ItemsFound.Value = "None"
end

--- NPCImages ---

local NPC_Image = "rbxassetid://16918435393"
local NPC_Angry = "rbxassetid://17421682251"
local NPC_Sad = "rbxassetid://17047446364"
local NPC_Image2 = "rbxassetid://17047444939"
local Monster_Image = "rbxassetid://17022795013"

---- MainScript of Story ----