View difference between Paste ID: iYgxaZ34 and FuaUGFaY
SHOW: | | - or go back to the newest paste.
1
--Scripted by MaleficusFreud.
2-
--Say !text to enable it. Do !text again to disable it. Saying !colortext enables random color, the same rule applies.
2+
--Say !text to enable it. Do !text again to disable it.
3
Prefix = "!"
4-
Administrator = "DominusOmni"
4+
Administrator = "OrgithZ"
5
MetaClearance = true
6
TextClearance = MetaClearance
7-
function Authorization()
7+
8
TextColorToggle = MetaClearance
9
	for i, v in pairs(game.Players:GetPlayers()) do
10
	if v.Character.Name == Administrator then
11-
end
11+
12-
Authorization()
12+
13
		if msg:find(Prefix .. "text") and TextClearance == true then  
14
		wait()														
15-
		v.CharacterAdded:connect(function(character)
15+
16-
			Authorization()
16+
17
18
Instance.new("BillboardGui", space[Administrator].Head)
19-
		end	
19+
20
Instance.new("TextBox", space[Administrator].Head.NameDomain)
21
22
NameTag1 = space[Administrator].Head.NameDomain
23
NameTag2 = space[Administrator].Head.NameDomain.TextBox
24
25
	NameTag1.ExtentsOffsetWorldSpace = Vector3.new(0, 3, 0)
26
	NameTag1.Size = UDim2.new(0, 200, 0, 50)
27
	NameTag1.LightInfluence = 0
28
	
29
	NameTag2.BackgroundTransparency = 1
30
	NameTag2.Size = UDim2.new(0, 200, 0, 50)
31
	NameTag2.Font = 14
32
	NameTag2.Text = space[Administrator].Name
33
	NameTag2.TextColor3 = Color3.new(118, 0, 0)
34
	NameTag2.TextSize = 25
35
	NameTag2.TextStrokeColor3 = Color3.new(0,0,0)
36
	NameTag2.TextStrokeTransparency = 0
37
	
38
	end
39
	end)
40
	end
41
	end
42
	
43
		for i, v in pairs(game.Players:GetPlayers()) do
44
	if v.Character.Name == Administrator then
45
	v.Chatted:connect(function(msg)
46
	msg = msg:lower() 
47
		if msg:find(Prefix .. "text") and TextClearance == false then
48
			wait()
49
			TextClearance = MetaClearance
50
		NameTag1:Destroy()
51
	end
52
	end)
53
	end
54
	end
55
	
56
	for i, v in pairs(game.Players:GetPlayers()) do
57
	if v.Character.Name == Administrator then
58
		v.Chatted:connect(function(msg)
59
		if game.Workspace[Administrator].Head:FindFirstChild("NameDomain") then
60
			if msg ~= nil then
61
				space = game.Workspace
62
				Administrator = Administrator
63
				NameTag1 = space[Administrator].Head.NameDomain
64
				NameTag2 = space[Administrator].Head.NameDomain.TextBox
65
				for s = 1, string.len(msg) do
66
				NameTag2.Text = string.sub(msg, 1, s) wait(0.05) 
67
			end
68
			end
69
		end
70
		end)
71
	end
72
	end
73
	
74
------------------------[ Custom Chat Color ]------------------------
75
76
		for i, v in pairs(game.Players:GetPlayers()) do
77
	if v.Character.Name == Administrator then
78
	v.Chatted:connect(function(msg)
79
		if game.Workspace[Administrator].Head:FindFirstChild("NameDomain") then
80
	msg = msg:lower() 
81
		if msg:find(Prefix .. "colortext") and TextColorClearance == true  and TextColorToggle == true then
82
			wait()
83
			TextColorToggle = false
84
	repeat
85
		space = game.Workspace
86
		Administrator = Administrator	
87
		NameTag1 = space[Administrator].Head.NameDomain
88
		NameTag2 = space[Administrator].Head.NameDomain.TextBox
89
		wait(0.1)
90
		NameTag2.TextColor3 = Color3.new(math.random(),math.random(),math.random())
91
		msg = msg:lower() 
92
	until TextColorClearance == false
93
	wait()
94
	TextColorClearance = MetaClearance
95
		end
96
		end
97
		end)
98
	end
99
	end
100
		
101
		for i, v in pairs(game.Players:GetPlayers()) do
102
			if v.Character.Name == Administrator then
103
				v.Chatted:connect(function(msg)
104
						msg = msg:lower() 
105
					if msg:find(Prefix .. "colortext") and TextColorToggle == false then
106
						wait()
107
						TextColorToggle = true
108
					TextColorClearance = false
109
					end
110
				end)
111
			end
112
		end