im really frustrated on this script can some one help me?

im not sure if anyone can help me on this. but this script is for the dragon ball flaming path im making and i cant crack the scouter script. it wont work to read the person's stats and the model wont go on to the character. Heres the script the parents this works with: Scouter Scouter2, Scouter3 all made of blocks in workspace the Scouter frame which is suppost to be in a screen gui. Then the scouter script which is script u see now, its a local script and its put into the starter gui

s = script.Parent
Font= 'Arial'
pd = script.Parent.Parent
TextStrokeTransparency = 0
TextColor = Color3.new(1,1,1)
TextStrokeColor = Color3.new(0,0,0)
ui = s.GameplayGui.Scouter.Target1
ui2 = s.GameplayGui.Scouter.Target2
ui3 = s.GameplayGui.Scouter.Target3
ui4 = s.GameplayGui.Scouter.Target4
ui5 = s.GameplayGui.Scouter.Target5
ui6 = s.GameplayGui.Scouter.Target6
ui7 = s.GameplayGui.Scouter.Target7
ui8 = s.GameplayGui.Scouter.Target8
gamepass =296185594
GPS = game:GetService("GamePassService")

local player = game.Players.LocalPlayer
local mouse = player:GetMouse() --Getting the player's mouse

mouse.Move:connect(function() --When the mouse moves
	local target = mouse.Target
		if target == nil then return end
			local human = target.Parent:findFirstChild("Humanoid")
			local human2 = target.Parent.Parent:findFirstChild("Humanoid")
			local human3 = target.Parent.Parent.Parent:findFirstChild("Humanoid")
		if human then
			local charName = target.Parent.Name
			p = game.Players:GetPlayerFromCharacter(target.Parent)
			ui.Text = charName
			ui3.Text = "Power Level: " .. p.Data.PowerLevel.Value
			on = true
				if GPS:PlayerHasPass(pd, gamepass) then
					ui5.Text = "Strength Level: " .. p.Data.Strength
					ui6.Text = "Strength Level: " .. p.Data.Agility
					ui7.Text = "Strength Level: " .. p.Data.Energy
					ui8.Text = "Strength Level: " .. p.Data.Rage
				end
				while on == true do
					wait(.1)
					ui2.Text = target.Parent.Humanoid.Health .. " / " .. target.Parent.Humanoid.MaxHealth
						if p.Data.CRace.Value == 1 then
							ui4.Text = "Race: Human"
						elseif p.Data.CRace.Value == 2 then
							ui4.Text = "Race: Namekian"
						elseif p.Data.CRace.Value == 3 then
							ui4.Text = "Race: Android"
						elseif p.Data.CRace.Value == 4 then
							ui4.Text = "Race: Saiyan"
						elseif p.Data.CRace.Value == 5 then
							ui4.Text = "Race: Bio-Anroid"
						elseif p.Data.CRace.Value == 6 then
							ui4.Text = "Race: Majin"
						else
							ui4.Text = "Race: N/A"
						end
				end
		elseif human2 then
			local charName = target.Parent.Parent.Name
			p = game.Players:GetPlayerFromCharacter(target.Parent.Parent)
			ui.Text = charName
			ui3.Text = "Power Level: " .. p.Data.PowerLevel.Value
			on = true
				while on == true do
					wait(.1)
					ui2.Text = target.Parent.Parent.Humanoid.Health .. " / " .. target.Parent.Parent.Humanoid.MaxHealth
						if p.Data.CRace.Value == 1 then
							ui4.Text = "Race: Human"
						elseif p.Data.CRace.Value == 2 then
							ui4.Text = "Race: Namekian"
						elseif p.Data.CRace.Value == 3 then
							ui4.Text = "Race: Android"
						elseif p.Data.CRace.Value == 4 then
							ui4.Text = "Race: Saiyan"
						elseif p.Data.CRace.Value == 5 then
							ui4.Text = "Race: Bio-Anroid"
						elseif p.Data.CRace.Value == 6 then
							ui4.Text = "Race: Majin"
						else
							ui4.Text = "Race: N/A"
						end
				end
		elseif human3 then
			local charName = target.Parent.Parent.Parent.Name
			p = game.Players:GetPlayerFromCharacter(target.Parent.Parent.Parent)
			ui.Text = charName
			ui3.Text = "Power Level: " .. p.Data.PowerLevel.Value
			on = true
				while on == true do
					wait(.1)
					ui2.Text = target.Parent.Parent.Parent.Humanoid.Health .. " / " .. target.Parent.Parent.Parent.Humanoid.MaxHealth
						if p.Data.CRace.Value == 1 then
							ui4.Text = "Race: Human"
						elseif p.Data.CRace.Value == 2 then
							ui4.Text = "Race: Namekian"
						elseif p.Data.CRace.Value == 3 then
							ui4.Text = "Race: Android"
						elseif p.Data.CRace.Value == 4 then
							ui4.Text = "Race: Saiyan"
						elseif p.Data.CRace.Value == 5 then
							ui4.Text = "Race: Bio-Anroid"
						elseif p.Data.CRace.Value == 6 then
							ui4.Text = "Race: Majin"
						else
							ui4.Text = "Race: N/A"
						end
				end
		else
			on = false
			ui.Text = "[No TargetFound]"
			ui2.Text = "0/0"
			ui3.Text = "Power Level: N/A"
			ui4.Text = "Race: N/A"
			ui5.Text = ""
			ui6.Text = ""
			ui7.Text = ""
			ui8.Text = ""
		end

end)

--[[local playerFinder = game.Players:GetChildren()
	for i = 1, #playerFinder do
		if playerFinder[i].ClassName == "Player" then
			local playergui=playerFinder[i].PlayerGui
			if playergui:FindFirstChild(playerFinder[i].Name..'Tracker') then 
				playergui[playerFinder[i].Name..'Tracker']:Destroy() 
			end
			local bb=Instance.new('BillboardGui',playergui)
			local Part=playerFinder[i].Character.Torso
				bb.Name= playerFinder[i].Name..'Tracker'
				bb.Adornee=playerFinder[i].Character.Head
				bb.AlwaysOnTop=true
				bb.StudsOffset=Vector3.new(0,2,0)
				bb.Size=UDim2.new(0,100,0,40)
			local f=Instance.new('Frame',bb)
				f.BackgroundTransparency=1
				f.Size=UDim2.new(1,0,1,0)
			local name=Instance.new('TextLabel',f)
				name.Text= playerFinder[i].Name
				name.BackgroundTransparency=1
				name.Font= Font
				name.TextColor3= TextColor
				name.TextStrokeColor3= TextStrokeColor
				name.TextStrokeTransparency= TextStrokeTransparency
				name.Size=UDim2.new(1,0,0,20)
				name.TextScaled=true
				name.TextWrapped=true
			local arrow=name:clone()
				arrow.Parent=f
				arrow.Position=UDim2.new(0,0,0,20)
				arrow.Text='V'
			bb:Destroy()
		end
	end]]