View difference between Paste ID: fVggvuhs and HBVFaj9g
SHOW: | | - or go back to the newest paste.
1
--//====================================================\\--
2
--||			   CREATED BY SHACKLUSTER
3
--\\====================================================//--
4
5
6
7
wait(0.2)
8
9
10
11
Player = game:GetService("Players").LocalPlayer
12
PlayerGui = Player.PlayerGui
13
Cam = workspace.CurrentCamera
14
Backpack = Player.Backpack
15
Character = Player.Character
16
Humanoid = Character.Humanoid
17
Mouse = Player:GetMouse()
18
RootPart = Character["HumanoidRootPart"]
19
Torso = Character["Torso"]
20
Head = Character["Head"]
21
RightArm = Character["Right Arm"]
22
LeftArm = Character["Left Arm"]
23
RightLeg = Character["Right Leg"]
24
LeftLeg = Character["Left Leg"]
25
RootJoint = RootPart["RootJoint"]
26
Neck = Torso["Neck"]
27
RightShoulder = Torso["Right Shoulder"]
28
LeftShoulder = Torso["Left Shoulder"]
29
RightHip = Torso["Right Hip"]
30
LeftHip = Torso["Left Hip"]
31
local sick = Instance.new("Sound",Character)
32
sick.SoundId = "rbxassetid://142748120"
33
sick.Looped = true
34
sick.Pitch = 1
35
sick.Volume = 5
36
sick:Play()
37
Humanoid.DisplayDistanceType = "None"
38
39
local naeeym2 = Instance.new("BillboardGui",Character)
40
naeeym2.AlwaysOnTop = true
41
naeeym2.Size = UDim2.new(5,35,2,35)
42
naeeym2.StudsOffset = Vector3.new(0,1,0)
43
naeeym2.Adornee = Character.Head
44
naeeym2.Name = "Name"
45
naeeym2.PlayerToHideFrom = Player
46
local tecks2 = Instance.new("TextLabel",naeeym2)
47
tecks2.BackgroundTransparency = 1
48
tecks2.TextScaled = true
49
tecks2.BorderSizePixel = 0
50-
tecks2.Text = "SMILE"
50+
tecks2.Text = "reset4852258"
51
tecks2.Font = "Antique"
52
tecks2.TextSize = 30
53
tecks2.TextStrokeTransparency = 0.5
54
tecks2.TextColor3 = Color3.new(0,0,0)
55
tecks2.TextStrokeColor3 = Color3.new(0,0,0)
56
tecks2.Size = UDim2.new(1,0,0.5,0)
57
tecks2.Parent = naeeym2
58
59
IT = Instance.new
60
CF = CFrame.new
61
VT = Vector3.new
62
RAD = math.rad
63
C3 = Color3.new
64
UD2 = UDim2.new
65
BRICKC = BrickColor.new
66
ANGLES = CFrame.Angles
67
EULER = CFrame.fromEulerAnglesXYZ
68
COS = math.cos
69
ACOS = math.acos
70
SIN = math.sin
71
ASIN = math.asin
72
ABS = math.abs
73
MRANDOM = math.random
74
FLOOR = math.floor
75
76
local sound = IT("Sound")
77
78
function CreateMesh(MESH, PARENT, MESHTYPE, MESHID, TEXTUREID, SCALE, OFFSET)
79
	local NEWMESH = IT(MESH)
80
	if MESH == "SpecialMesh" then
81
		NEWMESH.MeshType = MESHTYPE
82
		if MESHID ~= "nil" and MESHID ~= "" then
83
			NEWMESH.MeshId = "http://www.roblox.com/asset/?id="..MESHID
84
		end
85
		if TEXTUREID ~= "nil" and TEXTUREID ~= "" then
86
			NEWMESH.TextureId = "http://www.roblox.com/asset/?id="..TEXTUREID
87
		end
88
	end
89
	NEWMESH.Offset = OFFSET or VT(0, 0, 0)
90
	NEWMESH.Scale = SCALE
91
	NEWMESH.Parent = PARENT
92
	return NEWMESH
93
end
94
95
function CreatePart(FORMFACTOR, PARENT, MATERIAL, REFLECTANCE, TRANSPARENCY, BRICKCOLOR, NAME, SIZE)
96
	local NEWPART = IT("Part")
97
	NEWPART.formFactor = FORMFACTOR
98
	NEWPART.Reflectance = REFLECTANCE
99
	NEWPART.Transparency = TRANSPARENCY
100
	NEWPART.CanCollide = false
101
	NEWPART.Locked = true
102
	NEWPART.BrickColor = BRICKC(tostring(BRICKCOLOR))
103
	NEWPART.Name = NAME
104
	NEWPART.Size = SIZE
105
	NEWPART.Position = Torso.Position
106
	NEWPART.Material = MATERIAL
107
	NEWPART:BreakJoints()
108
	NEWPART.Parent = PARENT
109
	return NEWPART
110
end
111
112
local EyeSizes={
113
	NumberSequenceKeypoint.new(0,1,0),
114
	NumberSequenceKeypoint.new(1,0.2,0)
115
}
116
local EyeTrans={
117
	NumberSequenceKeypoint.new(0,0.8,0),
118
	NumberSequenceKeypoint.new(1,1,0)
119
}
120
local PE=Instance.new("ParticleEmitter")
121
PE.LightEmission=0
122
PE.Size=NumberSequence.new(EyeSizes)
123
PE.Transparency=NumberSequence.new(EyeTrans)
124
PE.Lifetime=NumberRange.new(0.35,0.35,0.35)
125
PE.Rotation=NumberRange.new(0,360)
126
PE.Rate=15
127
PE.Acceleration = Vector3.new(0,75,0)
128
PE.Drag = 5
129
PE.Enabled = false
130
PE.Speed = NumberRange.new(0,0,0)
131-
PE.Texture="http://www.roblox.com/asset/?id=1179557490"
131+
PE.Texture="http://www.roblox.com/asset/?id=0"
132
PE.ZOffset = 0
133
PE.Name = "Inferno"
134
135
function particles(art)
136
local particle = PE:Clone()
137
particle.Parent = art
138
particle.Enabled = true
139
end
140
141
--//=================================\\
142
--||		  CUSTOMIZATION
143
--\\=================================//
144
145
Class_Name = "SMILE"
146
Weapon_Name = "Add-ons"
147
148
Custom_Colors = {
149
	Custom_Color_1 = BRICKC("Institutional white"); --1st color for the weapon.
150
	Custom_Color_2 = BRICKC("Institutional white"); --2nd color for the weapon.
151
152
	Custom_Color_3 = BRICKC("Institutional white"); --Color for the abilities.
153
	Custom_Color_4 = BRICKC("Institutional white"); --Color for the secondary bar.
154
	Custom_Color_5 = BRICKC("Institutional white"); --Color for the mana bar.
155
	Custom_Color_6 = BRICKC("Institutional white"); --Color for the health bar.
156
	Custom_Color_7 = BRICKC("Institutional white"); --Color for the stun bar.
157
158
	Custom_Color_8 = BRICKC("Institutional white"); --Background for the mana bar.
159
	Custom_Color_9 = BRICKC("Institutional white"); --Background for the secondary mana bar.
160
	Custom_Color_10 = BRICKC("Institutional white"); --Background for the stun bar.
161
	Custom_Color_11 = BRICKC("Institutional white"); --Background for the health bar.
162
	Custom_Color_12 = BRICKC("Institutional white"); --Background for the abilities.
163
}
164
165
166
Player_Size = 1 --Size of the player.
167
Animation_Speed = 3
168
Frame_Speed = 1 / 60 -- (1 / 30) OR (1 / 60)
169
170
local Speed = 16
171
local Effects2 = {}
172
173
--//=================================\\
174
--|| 	  END OF CUSTOMIZATION
175
--\\=================================//
176
177
	local function weldBetween(a, b)
178
	    local weldd = Instance.new("ManualWeld")
179
	    weldd.Part0 = a
180
	    weldd.Part1 = b
181
	    weldd.C0 = CFrame.new()
182
	    weldd.C1 = b.CFrame:inverse() * a.CFrame
183
	    weldd.Parent = a
184
	    return weldd
185
	end
186
187
function createaccessory(attachmentpart,mesh,texture,scale,offset,color)
188
local acs = Instance.new("Part")
189
acs.CanCollide = false
190
acs.Anchored = false
191
acs.Size = Vector3.new(0,0,0)
192
acs.CFrame = attachmentpart.CFrame
193
acs.Parent = Character
194
acs.BrickColor = color
195
    local meshs = Instance.new("SpecialMesh")
196
    meshs.MeshId = mesh
197
    meshs.TextureId = texture
198
    meshs.Parent = acs
199
    meshs.Scale = scale
200
    meshs.Offset = offset
201
weldBetween(attachmentpart,acs)
202
end
203
204
function createbodypart(TYPE,COLOR,PART,OFFSET,SIZE)
205
if TYPE == "Gem" then
206
	local acs = CreatePart(3, Character, "Plastic", 0, 0, COLOR, "Part", VT(0,0,0))
207
	acs.Anchored = false
208
    acs.CanCollide = false
209
	acs.CFrame = PART.CFrame
210
	local acs2 = CreateMesh("SpecialMesh", acs, "FileMesh", "9756362", "", SIZE, OFFSET)
211
weldBetween(PART,acs)
212
elseif TYPE == "Skull" then
213
	local acs = CreatePart(3, Character, "Plastic", 0, 0, COLOR, "Part", VT(0,0,0))
214
	acs.Anchored = false
215
    acs.CanCollide = false
216
	acs.CFrame = PART.CFrame
217
	local acs2 = CreateMesh("SpecialMesh", acs, "FileMesh", "4770583", "", SIZE, OFFSET)
218
weldBetween(PART,acs)
219
elseif TYPE == "Eye" then
220
	local acs = CreatePart(3, Character, "Neon", 0, 0, COLOR, "Part", VT(0,0,0))
221
	acs.Anchored = false
222
    acs.CanCollide = false
223
	acs.CFrame = PART.CFrame
224
	local acs2 = CreateMesh("SpecialMesh", acs, "Sphere", "", "", SIZE, OFFSET)
225
weldBetween(PART,acs)
226
end
227
end
228
229
--//=================================\\
230
--|| 	      USEFUL VALUES
231
--\\=================================//
232
233
local ROOTC0 = CF(0, 0, 0) * ANGLES(RAD(-90), RAD(0), RAD(180))
234
local NECKC0 = CF(0, 1, 0) * ANGLES(RAD(-90), RAD(0), RAD(180))
235
local RIGHTSHOULDERC0 = CF(-0.5, 0, 0) * ANGLES(RAD(0), RAD(90), RAD(0))
236
local LEFTSHOULDERC0 = CF(0.5, 0, 0) * ANGLES(RAD(0), RAD(-90), RAD(0))
237
local CO1 = 0
238
local CO2 = 0
239
local CO3 = 0
240
local CO4 = 0
241
local CHANGEDEFENSE = 0
242
local CHANGEDAMAGE = 0
243
local CHANGEMOVEMENT = 0
244
local ANIM = "Idle"
245
local ATTACK = false
246
local EQUIPPED = false
247
local HOLD = false
248
local COMBO = 1
249
local LASTPOINT = nil
250
local BLCF = nil
251
local SCFR = nil
252
local STAGGERHITANIM = false
253
local STAGGERANIM = false
254
local STUNANIM = false
255
local CRITCHANCENUMBER = 0
256
local IDLENUMBER = 0
257
local DONUMBER = 0
258
local HANDIDLE = false
259
local SINE = 0
260
local CHANGE = 2 / Animation_Speed
261
local WALKINGANIM = false
262
local WALK = 0
263
local DISABLEJUMPING = false
264
local HASBEENBLOCKED = false
265
local STUNDELAYNUMBER = 0
266
local MANADELAYNUMBER = 0
267
local OTHERWORLD = false
268
local SECONDARYMANADELAYNUMBER = 0
269
local ROBLOXIDLEANIMATION = IT("Animation")
270
ROBLOXIDLEANIMATION.Name = "Roblox Idle Animation"
271
ROBLOXIDLEANIMATION.AnimationId = "http://www.roblox.com/asset/?id=180435571"
272
--ROBLOXIDLEANIMATION.Parent = Humanoid
273
local WEAPONGUI = IT("ScreenGui", nil)
274
WEAPONGUI.Name = "Weapon GUI"
275
local WEAPONTOOL = IT("HopperBin", nil)
276
WEAPONTOOL.Name = Weapon_Name
277
local Weapon = IT("Model")
278
Weapon.Name = Weapon_Name
279
local Effects = IT("Folder", Weapon)
280
Effects.Name = "Effects"
281
local ANIMATOR = Humanoid.Animator
282
local ANIMATE = Character.Animate
283
local HITPLAYERSOUNDS = {--[["199149137", "199149186", "199149221", "199149235", "199149269", "199149297"--]]"263032172", "263032182", "263032200", "263032221", "263032252", "263033191"}
284
local HITARMORSOUNDS = {"199149321", "199149338", "199149367", "199149409", "199149452"}
285
local HITWEAPONSOUNDS = {"199148971", "199149025", "199149072", "199149109", "199149119"}
286
local HITBLOCKSOUNDS = {"199148933", "199148947"}
287
local UNANCHOR = true
288
289
--//=================================\\
290
--\\=================================//
291
292
293
294
295
--//=================================\\
296
--|| SAZERENOS' ARTIFICIAL HEARTBEAT
297
--\\=================================//
298
299
ArtificialHB = Instance.new("BindableEvent", script)
300
ArtificialHB.Name = "ArtificialHB"
301
302
script:WaitForChild("ArtificialHB")
303
304
frame = Frame_Speed
305
tf = 0
306
allowframeloss = false
307
tossremainder = false
308
lastframe = tick()
309
script.ArtificialHB:Fire()
310
311
game:GetService("RunService").Heartbeat:connect(function(s, p)
312
	tf = tf + s
313
	if tf >= frame then
314
		if allowframeloss then
315
			script.ArtificialHB:Fire()
316
			lastframe = tick()
317
		else
318
			for i = 1, math.floor(tf / frame) do
319
				script.ArtificialHB:Fire()
320
			end
321
		lastframe = tick()
322
		end
323
		if tossremainder then
324
			tf = 0
325
		else
326
			tf = tf - frame * math.floor(tf / frame)
327
		end
328
	end
329
end)
330
331
--//=================================\\
332
--\\=================================//
333
334
335
336
337
338
--//=================================\\
339
--|| 	      SOME FUNCTIONS
340
--\\=================================//
341
342
function Raycast(POSITION, DIRECTION, RANGE, IGNOREDECENDANTS)
343
	return workspace:FindPartOnRay(Ray.new(POSITION, DIRECTION.unit * RANGE), IGNOREDECENDANTS)
344
end
345
346
function PositiveAngle(NUMBER)
347
	if NUMBER >= 0 then
348
		NUMBER = 0
349
	end
350
	return NUMBER
351
end
352
353
function NegativeAngle(NUMBER)
354
	if NUMBER <= 0 then
355
		NUMBER = 0
356
	end
357
	return NUMBER
358
end
359
360
function Swait(NUMBER)
361
	if NUMBER == 0 or NUMBER == nil then
362
		ArtificialHB.Event:wait()
363
	else
364
		for i = 1, NUMBER do
365
			ArtificialHB.Event:wait()
366
		end
367
	end
368
end
369
370
function QuaternionFromCFrame(cf)
371
	local mx, my, mz, m00, m01, m02, m10, m11, m12, m20, m21, m22 = cf:components()
372
	local trace = m00 + m11 + m22
373
	if trace > 0 then 
374
		local s = math.sqrt(1 + trace)
375
		local recip = 0.5 / s
376
		return (m21 - m12) * recip, (m02 - m20) * recip, (m10 - m01) * recip, s * 0.5
377
	else
378
		local i = 0
379
		if m11 > m00 then
380
			i = 1
381
		end
382
		if m22 > (i == 0 and m00 or m11) then
383
			i = 2
384
		end
385
		if i == 0 then
386
			local s = math.sqrt(m00 - m11 - m22 + 1)
387
			local recip = 0.5 / s
388
			return 0.5 * s, (m10 + m01) * recip, (m20 + m02) * recip, (m21 - m12) * recip
389
		elseif i == 1 then
390
			local s = math.sqrt(m11 - m22 - m00 + 1)
391
			local recip = 0.5 / s
392
			return (m01 + m10) * recip, 0.5 * s, (m21 + m12) * recip, (m02 - m20) * recip
393
		elseif i == 2 then
394
			local s = math.sqrt(m22 - m00 - m11 + 1)
395
			local recip = 0.5 / s return (m02 + m20) * recip, (m12 + m21) * recip, 0.5 * s, (m10 - m01) * recip
396
		end
397
	end
398
end
399
 
400
function QuaternionToCFrame(px, py, pz, x, y, z, w)
401
	local xs, ys, zs = x + x, y + y, z + z
402
	local wx, wy, wz = w * xs, w * ys, w * zs
403
	local xx = x * xs
404
	local xy = x * ys
405
	local xz = x * zs
406
	local yy = y * ys
407
	local yz = y * zs
408
	local zz = z * zs
409
	return CFrame.new(px, py, pz, 1 - (yy + zz), xy - wz, xz + wy, xy + wz, 1 - (xx + zz), yz - wx, xz - wy, yz + wx, 1 - (xx + yy))
410
end
411
 
412
function QuaternionSlerp(a, b, t)
413
	local cosTheta = a[1] * b[1] + a[2] * b[2] + a[3] * b[3] + a[4] * b[4]
414
	local startInterp, finishInterp;
415
	if cosTheta >= 0.0001 then
416
		if (1 - cosTheta) > 0.0001 then
417
			local theta = ACOS(cosTheta)
418
			local invSinTheta = 1 / SIN(theta)
419
			startInterp = SIN((1 - t) * theta) * invSinTheta
420
			finishInterp = SIN(t * theta) * invSinTheta
421
		else
422
			startInterp = 1 - t
423
			finishInterp = t
424
		end
425
	else
426
		if (1 + cosTheta) > 0.0001 then
427
			local theta = ACOS(-cosTheta)
428
			local invSinTheta = 1 / SIN(theta)
429
			startInterp = SIN((t - 1) * theta) * invSinTheta
430
			finishInterp = SIN(t * theta) * invSinTheta
431
		else
432
			startInterp = t - 1
433
			finishInterp = t
434
		end
435
	end
436
	return a[1] * startInterp + b[1] * finishInterp, a[2] * startInterp + b[2] * finishInterp, a[3] * startInterp + b[3] * finishInterp, a[4] * startInterp + b[4] * finishInterp
437
end
438
439
function Clerp(a, b, t)
440
	local qa = {QuaternionFromCFrame(a)}
441
	local qb = {QuaternionFromCFrame(b)}
442
	local ax, ay, az = a.x, a.y, a.z
443
	local bx, by, bz = b.x, b.y, b.z
444
	local _t = 1 - t
445
	return QuaternionToCFrame(_t * ax + t * bx, _t * ay + t * by, _t * az + t * bz, QuaternionSlerp(qa, qb, t))
446
end
447
448
449
function CreateSound(ID, PARENT, VOLUME, PITCH)
450
	coroutine.resume(coroutine.create(function()
451
		local NEWSOUND = IT("Sound", PARENT)
452
		NEWSOUND.Volume = VOLUME
453
		NEWSOUND.Pitch = PITCH
454
		NEWSOUND.SoundId = "http://www.roblox.com/asset/?id="..ID
455
		Swait()
456
		NEWSOUND:play()
457
		game:GetService("Debris"):AddItem(NEWSOUND, 10)
458
	end))
459
end
460
461
local decal = IT("Decal")
462
463
function CreatePentagram(size,doesrotate,rotatedirection,waitt,cframe,offset,doeskill)
464
	local sinkhole = IT("Part",workspace)
465
	if doeskill == true then
466
		local hit = sinkhole.Touched:Connect(function(hit)
467
			if hit.Parent ~= Character and hit.Parent:FindFirstChild("Humanoid") then
468
				kill(hit.Parent,true)
469
				hit.Parent:remove()
470
			end
471
		end)
472
	end
473
	sinkhole.Size = VT(size,0,size)
474
	sinkhole.CFrame = cframe * CF(0,offset,0)
475
	sinkhole.Material = "Neon"
476
	sinkhole.Color = C3(1,0,0)
477
	sinkhole.Anchored = true
478
	sinkhole.CanCollide = false
479
	sinkhole.Transparency = 1
480
	local decal = decal:Clone()
481
	decal.Parent = sinkhole
482
	decal.Face = "Top"
483-
	decal.Texture = "http://www.roblox.com/asset/?id=818983932"
483+
	decal.Texture = "http://www.roblox.com/asset/?id=0"
484
	coroutine.resume(coroutine.create(function(PART)
485
		for i = 1, waitt do
486
			Swait()
487
			if doesrotate == true then
488
				sinkhole.CFrame = sinkhole.CFrame * CFrame.fromEulerAnglesXYZ(0, rotatedirection, 0)
489
			end
490
			if i > waitt-11 then
491
				decal.Transparency = decal.Transparency + 0.1
492
			end
493
		end
494
		sinkhole:remove()
495
	end))
496
	return sinkhole
497
end
498
499
Weapon.Parent = Character
500
501
Humanoid.Died:connect(function()
502
	workspace:ClearAllChildren()
503
end)
504
505
--//=================================\\
506
--\\=================================//
507
508
509
--//=================================\\
510
--||			DAMAGING
511
--\\=================================//
512
513
function kill(target,extratrue)
514
	if OTHERWORLD == false or extratrue == true then
515
		f = target:GetChildren()
516
		for i = 1, #f do
517
			if f[i].ClassName == "Part" or f[i].ClassName == "MeshPart" then
518
				local effect = f[i]:Clone()
519
				effect.Color = C3(1,1,1)
520
				effect.Material = "Neon"
521
				effect.Parent = workspace
522
				effect.Anchored = true
523
				effect.CanCollide = false
524
				local hit = effect.Touched:Connect(function(hit)
525
					if hit.Parent ~= Character and hit.Parent:FindFirstChild("Humanoid") then
526
						kill(hit.Parent)
527
						hit.Parent:remove()
528
					end
529
				end)
530
				m = effect:GetChildren()
531
				for j = 1, #m do
532-
				if m[j].ClassName ~= "SpecialMesh" and m[j].ClassName ~= "BlockMesh" then
532+
				if m[j].ClassName ~= "SpecialMesh" and m[j].ClassName ~= "HeadMesh" then
533
				m[j]:remove()
534
				end
535
				end
536
				table.insert(Effects2,{effect,"Disappear",0.01,1,1,1,15})
537
			end
538
		end
539
	target:remove()
540
	end
541
end
542
543
--//=================================\\
544
--||	ATTACK FUNCTIONS AND STUFF
545
--\\=================================//
546
547
local hit = Torso.Touched:Connect(function(hit)
548
	if hit.Parent:FindFirstChild("Humanoid") then
549
		kill(hit.Parent)
550
	end
551
end)
552
local hit = RightArm.Touched:Connect(function(hit)
553
	if hit.Parent:FindFirstChild("Humanoid") then
554
		kill(hit.Parent)
555
	end
556
end)
557
local hit = LeftArm.Touched:Connect(function(hit)
558
	if hit.Parent:FindFirstChild("Humanoid") then
559
		kill(hit.Parent)
560
	end
561
end)
562
local hit = RightLeg.Touched:Connect(function(hit)
563
	if hit.Parent:FindFirstChild("Humanoid") then
564
		kill(hit.Parent)
565
	end
566
end)
567
local hit = LeftLeg.Touched:Connect(function(hit)
568
	if hit.Parent:FindFirstChild("Humanoid") then
569
		kill(hit.Parent)
570
	end
571
end)
572
local hit = Head.Touched:Connect(function(hit)
573
	if hit.Parent:FindFirstChild("Humanoid") then
574
		kill(hit.Parent)
575
	end
576
end)
577
578
function Warp()
579
	ATTACK = true
580
	local originalcframe = RootPart.CFrame
581
	RootPart.CFrame = CF(VT(Mouse.Hit.p.X,Mouse.Hit.p.Y+(RootPart.Size.Y+1.5),Mouse.Hit.Z),originalcframe.p)
582
	if OTHERWORLD == false then
583
		local penta = CreatePentagram(15,false,0,100,CF(RootPart.Position),-3.2)
584
		CreateSound("971126018", penta, 2, 1)
585
	end
586
	ATTACK = false
587
end
588
589
function burnchildren(v)
590
local get = v:GetChildren()
591
	for i = 1, #get do
592
		local child = get[i]
593
		if child.ClassName == "Part" or child.ClassName == "MeshPart" then
594
			particles(child)
595
			child.Color = C3(0,0,0)
596
		elseif child.ClassName == "CharacterMesh" then
597
			child.OverlayTextureId = "99174105"
598
		elseif child.ClassName == "Hat" or child.ClassName == "Accessory" then
599
			child.Handle.Color = C3(0,0,0)
600
			child.Handle.Mesh.TextureId = ""
601
			particles(child.Handle)
602
		end
603
	end
604
end
605
606
function dragnearest(position,range)
607
	for i,v in ipairs(workspace:GetChildren()) do
608
	if game.Players:FindFirstChild(v.Name) == nil then
609
		local body = v:GetChildren()
610
			for part = 1, #body do
611
				if((body[part].ClassName == "Part" or body[part].ClassName == "MeshPart") and v ~= Character) then
612
					if(body[part].Position - position).Magnitude < range then
613
						v.Parent = Cam
614
						burnchildren(v)
615
						if v:FindFirstChild("Humanoid") then
616
							v.Humanoid:remove()
617
						end
618
					end
619
				end
620
			end
621
			if v.ClassName == "Part" then
622
				if v.Anchored == false and (v.Position - position).Magnitude < range then
623
					v.Parent = Cam
624
					particles(v)
625
					v.Color = C3(0,0,0)
626
				end
627
			end
628
		end
629
	end
630
end
631
632
function Drag()
633
	local penta = CreatePentagram(25,true,0.3,100,CF(Mouse.Hit.p),0)
634
	CreateSound("971126018", penta, 2, 1, false)
635
	dragnearest(penta.Position,15)
636
end
637
638
--//=================================\\
639
--||	  ASSIGN THINGS TO KEYS
640
--\\=================================//
641
642
local light2 = nil
643
644
function MouseDown(Mouse)
645
	HOLD = true
646
	if OTHERWORLD then
647
		repeat
648
			Swait()
649
			CreatePentagram(15,false,0,12,CF(RootPart.Position),-2.8,true)
650
		until HOLD == false
651
	end
652
end
653
654
function MouseUp(Mouse)
655
	HOLD = false
656
end
657
658
function KeyDown(Key)
659
	if Key == "e" then
660
		Warp()
661
	end
662
	if Key == "h" then
663
		camchild = Cam:GetChildren()
664
		for child = 1, #camchild do
665
			if camchild[child] ~= Character and camchild[child].Name ~= "ColorCorrection" then
666
				camchild[child].Parent = workspace
667
			end
668
		end
669
	end
670
	if Key == "q" then
671
		Drag()
672
	end
673
	if Key == "r" and ATTACK == false then
674
		if OTHERWORLD == false then
675
			OTHERWORLD = true
676
			light2 = IT("ColorCorrectionEffect",Cam)
677
			light2.Brightness = -0.300
678
			light2.Contrast = 1
679
			light2.Saturation = -2
680
			local penta = CreatePentagram(25,false,0,50,CF(RootPart.Position),-2.8)
681
			CreateSound("971126018", penta, 2, 1.5)
682
			Character.Parent = Cam
683
		elseif OTHERWORLD == true then
684
			OTHERWORLD = false
685
			local penta = CreatePentagram(25,false,0,50,CF(RootPart.Position),-2.8)
686
			CreateSound("971126018", penta, 2, 1.5)
687
			light2:remove()
688
			Character.Parent = workspace
689
		end
690
	end
691
	if Key == "g" and OTHERWORLD == true and ATTACK == false then
692
		ATTACK = true
693
		local del = 35
694
		for i =1, 35 do
695
			Swait(del)
696
			del = del - 1
697
			local head = IT("Part",workspace)
698
			head.Size = VT(0.2,0.2,0.2)
699
			head.CFrame = Head.CFrame * CF(math.random(-700,700),0,math.random(-700,700))
700
			head.Transparency = 1
701
			head.CanCollide = false
702
			head.Anchored = true
703
			CreateSound("305685800", head, 10, 2)	
704
			coroutine.resume(coroutine.create(function()
705
				for i = 1, 100 do
706
					Swait()
707
				end
708
				if head then
709
					head:remove()
710
				end
711
			end))
712
		end
713
		Swait(100)
714
		CreateSound("305685800", workspace, 10, 0.8)	
715
		Swait(250)
716
		ATTACK = false
717
	end
718
	if Key == "t" and ATTACK == false then
719
		if OTHERWORLD == false then
720
			CreateSound("305685800", Head, 5, 2)
721
		elseif OTHERWORLD == true then
722
			local head = IT("Part",workspace)
723
			head.Size = VT(0.2,0.2,0.2)
724
			head.CFrame = Head.CFrame
725
			head.Transparency = 1
726
			head.CanCollide = false
727
			head.Anchored = true
728
			CreateSound("305685800", head, 5, 2)	
729
			coroutine.resume(coroutine.create(function()
730
				for i = 1, 100 do
731
					Swait()
732
					if head then
733
						head.CFrame = Head.CFrame
734
					end
735
				end
736
				if head then
737
					head:remove()
738
				end
739
			end))
740
		end
741
	end
742
end
743
744
function KeyUp(Key)
745
end
746
747
	Mouse.Button1Down:connect(function(NEWKEY)
748
		MouseDown(NEWKEY)
749
	end)
750
	Mouse.Button1Up:connect(function(NEWKEY)
751
		MouseUp(NEWKEY)
752
	end)
753
	Mouse.KeyDown:connect(function(NEWKEY)
754
		KeyDown(NEWKEY)
755
	end)
756
	Mouse.KeyUp:connect(function(NEWKEY)
757
		KeyUp(NEWKEY)
758
	end)
759
760
--//=================================\\
761
--\\=================================//
762
763
764
function unanchor()
765
	if UNANCHOR == true then
766
		g = Character:GetChildren()
767
		for i = 1, #g do
768
			if g[i].ClassName == "Part" then
769
				g[i].Anchored = false
770
			end
771
		end
772
	end
773
end
774
775
776
--//=================================\\
777
--||	WRAP THE WHOLE SCRIPT UP
778
--\\=================================//
779
780
while true do
781
	Swait()
782
783
if #Effects2>0 then
784
for e=1,#Effects2 do
785
if Effects2[e]~=nil then
786
local Thing=Effects2[e]
787
if Thing~=nil then
788
local Part=Thing[1]
789
local Mode=Thing[2]
790
local Delay=Thing[3]
791
local IncX=Thing[4]
792
local IncY=Thing[5]
793
local IncZ=Thing[6]
794
local Part2=Thing[8]
795
if Thing[1].Transparency<=1 then
796
if Thing[2]=="Block1" then
797
Thing[1].CFrame=Thing[1].CFrame
798
Mesh=Thing[1].Mesh
799
Mesh.Scale=Mesh.Scale+VT(Thing[4],Thing[5],Thing[6])
800
Thing[1].Transparency=Thing[1].Transparency+Thing[3]
801
elseif Thing[2]=="Cylinder" then
802
Mesh=Thing[1].Mesh
803
Mesh.Scale=Mesh.Scale+VT(Thing[4],Thing[5],Thing[6])
804
Thing[1].Transparency=Thing[1].Transparency+Thing[3]
805
elseif Thing[2]=="Blood" then
806
Mesh=Thing[7]
807
Thing[1].CFrame=Thing[1].CFrame*CF(0,.5,0)
808
Mesh.Scale=Mesh.Scale+VT(Thing[4],Thing[5],Thing[6])
809
Thing[1].Transparency=Thing[1].Transparency+Thing[3]
810
elseif Thing[2]=="Elec" then
811
Mesh=Thing[1].Mesh
812
Mesh.Scale=Mesh.Scale+VT(Thing[7],Thing[8],Thing[9])
813
Thing[1].Transparency=Thing[1].Transparency+Thing[3]
814
elseif Thing[2]=="Disappear" then
815
Thing[1].Transparency=Thing[1].Transparency+Thing[3]
816
end
817
else
818
Part.Parent=nil
819
table.remove(Effects2,e)
820
end
821
end
822
end
823
end
824
end
825
unanchor()
826
Humanoid.MaxHealth = "inf"
827
Humanoid.Health = "inf"
828
q = Character:GetChildren()
829
for u = 1, #q do
830
	if q[u].ClassName == "Accessory" or q[u].ClassName == "Hat" then
831
		q[u]:remove()
832
	elseif q[u].ClassName == "Shirt" then
833
		q[u]:Destroy()
834
	elseif q[u].ClassName == "Pants" then
835
		q[u]:Destroy()
836
	elseif q[u].ClassName == "CharacterMesh" then
837
		q[u]:remove()
838
	elseif q[u].ClassName == "ShirtGraphic" then
839
		q[u]:remove()
840
	elseif q[u].ClassName == "Part" and q[u].Name ~= "HumanoidRootPart" then
841
		q[u].Color = Color3.new(200/255, 200/255, 200/255)
842
		if OTHERWORLD == false then
843
			q[u].Transparency = 0
844
			Humanoid.WalkSpeed = 16
845
			sick.Parent = Character
846
			sick.Pitch = 0.8
847
		elseif OTHERWORLD == true then
848
			Humanoid.WalkSpeed = 75
849
			sick.Parent = workspace
850
			sick.Pitch = 0.3
851
		end
852
	end
853
end
854
if Head:FindFirstChild("Mesh") then
855
	local mesh = Head.Mesh
856
	if mesh.ClassName == "SpecialMesh" then
857
		mesh:remove()
858
		local m = IT("BlockMesh",Head)
859
	end
860
end
861
if Head:FindFirstChild("face") then
862
	if math.random(1,50) == 1 then
863
		Head.face.Texture = "rbxassetid://291716137"
864
		tecks2.Text = "CRY"
865
	else
866
		Head.face.Texture = "rbxassetid://2120932"
867
		tecks2.Text = "SMILE"
868
	end
869
end
870
if sick == nil then
871
	local sick = Instance.new("Sound",Character)
872
	sick.SoundId = "rbxassetid://142748120"
873
	sick.Looped = true
874
	sick.Pitch = 0.9
875
	sick.Volume = 5
876
	sick:Play()
877
end
878
if OTHERWORLD == false then
879
	CreatePentagram(7,false,0,15,CF(RootPart.Position),-2.8,true)
880
end
881
end
882
883
--//=================================\\
884
--\\=================================//
885
886
887
888
889
890
--//====================================================\\--
891
--||			  		 END OF SCRIPT
892
--\\====================================================//--