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