View difference between Paste ID: RzVkxphn and 8JKu02Na
SHOW: | | - or go back to the newest paste.
1
local chatting = false
2
local currentgui
3
local currentline = 2
4
BillboardGui0 = Instance.new("BillboardGui")
5
Frame1 = Instance.new("Frame")
6
Frame2 = Instance.new("Frame")
7
ImageLabel3 = Instance.new("ImageLabel")
8
TextLabel4 = Instance.new("TextLabel")
9
TextLabel5 = Instance.new("TextLabel")
10
BillboardGui0.Parent = mas
11
BillboardGui0.Size = UDim2.new(15, 0, 4.5, 0)
12
BillboardGui0.ClipsDescendants = true
13
BillboardGui0.Adornee = nil
14
BillboardGui0.AlwaysOnTop = true
15
BillboardGui0.MaxDistance = 35
16
BillboardGui0.SizeOffset = Vector2.new(0, 1)
17
Frame1.Name = "White"
18
Frame1.Parent = BillboardGui0
19
Frame1.Size = UDim2.new(1, 0, 1, 0)
20
Frame1.BackgroundColor = BrickColor.new("Institutional white")
21
Frame1.BackgroundColor3 = Color3.new(1, 1, 1)
22
Frame1.BorderSizePixel = 0
23
Frame2.Name = "Black"
24
Frame2.Parent = Frame1
25
Frame2.Position = UDim2.new(0, 5, 0, 5)
26
Frame2.Size = UDim2.new(1, -10, 1, -10)
27
Frame2.BackgroundColor = BrickColor.new("Really black")
28
Frame2.BackgroundColor3 = Color3.new(0, 0, 0)
29
Frame2.BorderColor = BrickColor.new("Pastel violet")
30
Frame2.BorderColor3 = Color3.new(0.588235, 0.588235, 1)
31
Frame2.BorderSizePixel = 4
32
ImageLabel3.Name = "Portrait"
33
ImageLabel3.Parent = Frame2
34
ImageLabel3.Position = UDim2.new(0.0195086356, 0, 0.0609827824, 0)
35
ImageLabel3.Size = UDim2.new(0.227539942, 0, 0.870999992, 0)
36
ImageLabel3.BackgroundColor = BrickColor.new("Institutional white")
37
ImageLabel3.BackgroundColor3 = Color3.new(1, 1, 1)
38
ImageLabel3.BackgroundTransparency = 9
39
ImageLabel3.BorderSizePixel = 0
40
ImageLabel3.Image = "rbxassetid://2537357477"
41
TextLabel4.Name = "Shadow"
42
TextLabel4.Parent = Frame2
43
TextLabel4.Position = UDim2.new(0.277011365, 0, 0.0826922357, 0)
44
TextLabel4.Size = UDim2.new(0.716000021, 0, 0.870999992, 0)
45
TextLabel4.BackgroundColor = BrickColor.new("Really black")
46
TextLabel4.BackgroundColor3 = Color3.new(0, 0, 0)
47
TextLabel4.BackgroundTransparency = 9
48
TextLabel4.Font = Enum.Font.Arcade
49
TextLabel4.FontSize = Enum.FontSize.Size60
50
TextLabel4.Text = "* "
51
TextLabel4.TextColor = BrickColor.new("Medium lilac")
52
TextLabel4.TextColor3 = Color3.new(0.215686, 0.215686, 0.392157)
53
TextLabel4.TextSize = 50
54
TextLabel4.TextTruncate = Enum.TextTruncate.AtEnd
55
TextLabel4.TextWrap = true
56
TextLabel4.TextWrapped = true
57
TextLabel4.TextXAlignment = Enum.TextXAlignment.Left
58
TextLabel5.Name = "Msg"
59
TextLabel5.Parent = Frame2
60
TextLabel5.Position = UDim2.new(0.275019109, 0, 0.0744685978, 0)
61
TextLabel5.Size = UDim2.new(0.716000021, 0, 0.870531261, 0)
62
TextLabel5.BackgroundColor = BrickColor.new("Institutional white")
63
TextLabel5.BackgroundColor3 = Color3.new(1, 1, 1)
64
TextLabel5.BackgroundTransparency = 9
65
TextLabel5.Font = Enum.Font.Arcade
66
TextLabel5.FontSize = Enum.FontSize.Size60
67
TextLabel5.Text = "* "
68
TextLabel5.TextColor = BrickColor.new("Institutional white")
69
TextLabel5.TextColor3 = Color3.new(1, 1, 1)
70
TextLabel5.TextSize = 50
71
TextLabel5.TextTruncate = Enum.TextTruncate.AtEnd
72
TextLabel5.TextWrap = true
73
TextLabel5.TextWrapped = true
74
TextLabel5.TextXAlignment = Enum.TextXAlignment.Left
75
wait()
76
function saymsg(player,mes,style)
77
pcall(function()
78
local gui = BillboardGui0:Clone()
79
gui.Parent = player.Character:WaitForChild("Head")
80
local white = gui:WaitForChild("White")
81
local blk = white:WaitForChild("Black")
82
local msg = blk:WaitForChild("Msg")
83
local shd = blk:WaitForChild("Shadow")
84
local img = blk:WaitForChild("Portrait")
85
local ms
86
if style == "normal" then
87
    img.Image = "rbxassetid://2537357477"
88
elseif style == "happy" then
89
    img.Image = "rbxassetid://2537357477"
90
elseif style == "angry" then
91
    img.Image = "rbxassetid://2537357477"
92
elseif style == "blush" then
93
    img.Image = "rbxassetid://2537357477"
94
elseif style == "sincere" then
95
    img.Image = "rbxassetid://2537357477"
96
elseif style == "sarcasm" then
97
    img.Image = "rbxassetid://2537357477"
98
end
99
 
100
ms = "* "..mes
101
 
102
if string.len(ms) > 25 then
103
    msg.TextYAlignment = Enum.TextYAlignment.Top
104
    shd.TextYAlignment = Enum.TextYAlignment.Top
105
end
106
if string.len(ms) > 58 then
107
    msg.TextSize = 40
108
    shd.TextSize = 40
109
end
110
if string.len(ms) > 108 then
111
    msg.TextSize = 30
112
    shd.TextSize = 30
113
end
114
 
115
white.Visible = true
116
local sound = Instance.new("Sound")
117
    sound.SoundId = "rbxassetid://2545012765"
118
        sound.Volume = 1
119
        sound.Looped = false
120
        sound.Parent = player.Character
121
for i = 1, #ms do
122
    msg.Text = string.sub(ms, 1, i)
123
    shd.Text = string.sub(ms, 1, i)
124
    if string.sub(msg.Text, string.len(msg.Text) - 1) ~= " " and string.sub(msg.Text, string.len(msg.Text) - 1) ~= "," and string.sub(msg.Text, string.len(msg.Text) - 1) ~= "." then
125
      if not sound then
126
        local sound = Instance.new("Sound")
127
        sound.SoundId = "rbxassetid://2545012765"
128
        sound.Volume = 1
129
        sound.Looped = false
130
        sound.Parent = player.Character
131
      end
132
        sound:Play()
133
    elseif string.sub(msg.Text, string.len(msg.Text) - 1) == "," or string.sub(msg.Text, string.len(msg.Text) - 1) == "." then
134
        wait(0.26)
135
    end
136
    wait(0.1)
137
end
138
wait(3)
139
gui:Remove()
140
end)
141-
end
141+
142
143
function findplayer(speaker,plr)
144
    local plrs = {}
145
    if tostring(plr) then
146
        if plr == "me" then
147
            return speaker
148
        elseif plr == "random" then
149
            for i,v in pairs(game:GetService("Players"):GetPlayers()) do
150
                if v ~= speaker then
151
                    table.insert(plrs,v)
152
                end
153
            end
154
            return plrs[math.random(1,#plrs)]
155
        end        
156
         for i,v in pairs(game:GetService("Players"):GetPlayers()) do
157
            if string.sub(v.Name, 1, #plr) == plr then
158
                table.insert(plrs,v)
159
            end
160
        end
161
        return plrs[math.random(1,#plrs)]
162
    end
163
end
164
local tb = {}
165
local style = "normal"
166
owner.Chatted:Connect(function(msg)
167
    local mes = msg
168
    if string.sub(msg,1,3) == "/e " or string.sub(msg,1,3) == "/w " then
169
        mes = string.sub(msg,4)
170
        if string.sub(mes, 1,6) == "style:" then
171
            style = getstyle(tonumber(string.sub(mes,7)))
172
        elseif string.sub(mes, 1,7) == "pacify:" then
173
            local a = findplayer(owner,string.sub(mes,8))
174
            if not a then return end
175
            pcall(function()
176
            a.Character:FindFirstChildOfClass("Humanoid").Health = 0
177
            end)
178
        elseif string.sub(mes, 1, 5) == "heal:" then
179
            local a = findplayer(owner,string.sub(m,6))
180
            if not a then return end
181
            pcall(function()
182
            a.Character:FindFirstChildOfClass("Humanoid").Health = a.Character:FindFirstChildOfClass("Humanoid").MaxHealth
183
            end)   
184
        end
185
        return
186
    end
187
    saymsg(owner,mes,style)
188
end)
189
function play(human)
190
    spawn(function()
191
    local sound = Instance.new("Sound")
192
    sound.Parent = human
193
    sound.Volume = 1
194
    sound.SoundId = "rbxassetid://2545012765"
195
    sound:Play()
196
    end)
197
end
198
199
owner.CharacterAdded:Connect(function()
200
    wait(0.5)
201
202
 
203
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
204
v.Chatted:Connect(function(msg)
205
for i,a in pairs(tb) do
206
if v.UserId == a then
207
local mes = msg
208
if string.sub(msg,1,3) == "/e " or string.sub(msg,1,3) == "/w " then
209
        mes = string.sub(msg,4)
210
        if string.sub(mes, 1,7) == "pacify:" then
211
            local a = findplayer(owner,string.sub(mes,8))
212
            if not a then return end
213
            pcall(function()
214
            a.Character:FindFirstChildOfClass("Humanoid").Health = 0
215
            end)
216
        elseif string.sub(mes, 1, 5) == "heal:" then
217
            local a = findplayer(owner,string.sub(m,6))
218
            if not a then return end
219
            pcall(function()
220
            a.Character:FindFirstChildOfClass("Humanoid").Health = a.Character:FindFirstChildOfClass("Humanoid").MaxHealth
221
            end)   
222
        end
223
        return
224
    end
225
    saymsg(v,mes,style)
226
end
227
end
228
end)