SHOW:
|
|
- or go back to the newest paste.
1 | ---Add name wear says personsadminlol line4 4--- | |
2 | local modelname="DeLoreanTimeMachine" | |
3 | pcall(function() workspace.Base.CFrame=CFrame.new(0,-2,0) end) | |
4 | - | local plr=game:service("Players")["ace28545"] |
4 | + | |
5 | local plr=game:service("Players")["personsadminlol"] | |
6 | local char=plr.Character | |
7 | local T=char.Torso | |
8 | local c=function(f) coroutine.resume(coroutine.create(f)) end | |
9 | local pc=pcall | |
10 | pc(function() workspace:findFirstChild(modelname):remove() end) | |
11 | local mouse=nil | |
12 | local pi=math.pi | |
13 | local rd=math.rad | |
14 | local sn=math.sin | |
15 | local cs=math.cos | |
16 | local rn=math.random | |
17 | local ti=table.insert | |
18 | local tr=table.remove | |
19 | local inf=math.huge | |
20 | local cn=CFrame.new | |
21 | local vc=Vector3.new | |
22 | local ca=CFrame.Angles | |
23 | local delorean=Instance.new("Model", workspace) delorean.Name=modelname | |
24 | local screengui=Instance.new("ScreenGui") screengui.Name=modelname | |
25 | part=function(par, a, c, s, col, t, cf, ms) | |
26 | local p=Instance.new("Part", par) pcall(function() p.TopSurface="Smooth" p.BottomSurface="Smooth" p.formFactor="Custom" p.Anchored=a p.CanCollide=c p.Size=s p.BrickColor=BrickColor.new(col) p.Transparency=t p.CFrame=cf or cn() end) | |
27 | local m=Instance.new("BlockMesh", p) pcall(function() m.Scale=ms or Vector3.new(1, 1, 1) end) | |
28 | return p | |
29 | end | |
30 | cylinder=function(par, a, c, s, col, t, cf, ms) | |
31 | local p=Instance.new("Part", par) pcall(function() p.TopSurface="Smooth" p.BottomSurface="Smooth" p.formFactor="Custom" p.Anchored=a p.CanCollide=c p.Size=s p.BrickColor=BrickColor.new(col) p.Transparency=t p.CFrame=cf or cn() end) | |
32 | local m=Instance.new("CylinderMesh", p) pcall(function() m.Scale=ms or Vector3.new(1, 1, 1) end) | |
33 | return p | |
34 | end | |
35 | wedge=function(par, a, c, s, col, t, cf, ms) | |
36 | local p=Instance.new("Part", par) pcall(function() p.TopSurface="Smooth" p.BottomSurface="Smooth" p.formFactor="Custom" p.Anchored=a p.CanCollide=c p.Size=s p.BrickColor=BrickColor.new(col) p.Transparency=t p.CFrame=cf or cn() end) | |
37 | local m=Instance.new("SpecialMesh", p) pcall(function() m.Scale=ms or Vector3.new(1, 1, 1) m.MeshType="Wedge" end) | |
38 | return p | |
39 | end | |
40 | gui=function(ins, par, bc, bg, tc, fs, text, t, s, pos) | |
41 | local g=Instance.new(ins, par) g.BorderColor=BrickColor.new(bc) g.BackgroundColor=BrickColor.new(bg) g.TextColor=BrickColor.new(tc) g.FontSize=fs g.Font="ArialBold" g.Text=text g.BackgroundTransparency=t g.Size=s g.Position=pos | |
42 | return g | |
43 | end | |
44 | weld=function(par, p1, cf) | |
45 | local w=Instance.new("Weld", par) pcall(function() w.Part0=w.Parent or par w.Part1=p1 w.C1=cf or cn() end) | |
46 | return w | |
47 | end | |
48 | mesh=function(ins, par, s, t, id, tid, of) | |
49 | pcall(function() for i, v in pairs(par:children()) do if v:isA("BlockMesh") or v:isA("CylinderMesh") or v:isA("SpecialMesh") then v:remove() end end end) | |
50 | local m=Instance.new(ins, par) pcall(function() m.Scale=s or Vector3.new(1, 1, 1) m.Offset=of or Vector3.new() m.MeshId=id or "" m.TextureId=tid or "" m.MeshType=t end) | |
51 | return m | |
52 | end | |
53 | sound=function(parent, id, pitch, volume) | |
54 | local s=Instance.new("Sound", parent) pcall(function() s.SoundId=id s.Volume=volume or 1 s.Pitch=pitch or 1 end) | |
55 | return s | |
56 | end | |
57 | function stick(from, to) | |
58 | local stickW=weld(from, to, to.CFrame:inverse()*from.CFrame) | |
59 | stickW.C0=from.CFrame:inverse()*from.CFrame | |
60 | return stickW | |
61 | end | |
62 | bp=Instance.new("BodyPosition") bp.D=200 bp.maxForce=vc(inf,inf,inf) | |
63 | base=part(delorean, false, true, vc(5, .5, 14), "Really Really red", 0, cn(0, 200, 0)) | |
64 | wait() | |
65 | bp.Parent=base | |
66 | bp.position=(T.CFrame+T.CFrame.lookVector*20).p | |
67 | base.Name="BASE" | |
68 | bc=part(delorean, false, true, vc(7, .5, 6), "Really Really red") | |
69 | bcw=weld(bc, base, cn()) | |
70 | bf=part(delorean, false, true, vc(7, .5, 2), "Really Really red") | |
71 | bfw=weld(bf, base, cn(0, 0, -7)) | |
72 | local bb=part(delorean, false, true, vc(7, .5, 2), "Really Really red") | |
73 | local bbw=weld(bb, base, cn(0, 0, 7)) | |
74 | local bf2=part(delorean, false, true, vc(6.8, 1, 1.5), "Really Really red") | |
75 | local bf2w=weld(bf2, bf, cn(0, .5, 0)) | |
76 | local bc2=part(delorean, false, true, vc(5, 1, 5), "Really Really red") | |
77 | local bc2w=weld(bc2, base, cn(0, .75, -4.5)) | |
78 | local bf3=part(delorean, false, true, vc(7, .5, 3), "Really Really red") | |
79 | local bf3w=weld(bf3, bf2, cn(0, .5, -.5)) | |
80 | local enginesmoke=cylinder(delorean, false, true, vc(.5, 2, .5), "Really red") | |
81 | local enginesmokew=weld(enginesmoke, bb, cn(2, 0, .75)*ca(-rd(90), 0, 0)) | |
82 | local enginesmoke=cylinder(delorean, false, true, vc(.5, 2, .5), "Really red") | |
83 | local enginesmokew=weld(enginesmoke, bb, cn(-2, 0, .75)*ca(-rd(90), 0, 0)) | |
84 | local bf4=part(delorean, false, true, vc(7, .7, 3.5), "Really red") | |
85 | local bf4w=weld(bf4, bf3, cn(0, .6, .75)) | |
86 | local bf5=part(delorean, false, true, vc(6, .7, 3), "Really red") | |
87 | local bf5w=weld(bf5, bf4, cn(0, 0, 3)) | |
88 | local mprt=part(delorean, false, true, vc(7, 1, .5), "Really red", 0, cn(), vc(1, .1, 1)) | |
89 | local mprtw=weld(mprt, bf4, cn(0, -.3, -2)) | |
90 | local mprt=part(delorean, false, true, vc(7, 1, .35), "Really red", 0, cn(), vc(1, .1, 1)) | |
91 | local mprtw=weld(mprt, bf4, cn(0, .3, -1.9)) | |
92 | local mprt=part(delorean, false, true, vc(.2, .65, .5), "Really red", 0, cn(), vc(1, 1, 1)) | |
93 | local mprtw=weld(mprt, bf4, cn(3.4, -.03, -1.9)*ca(rd(15), 0, 0)) | |
94 | local mprt=part(delorean, false, true, vc(.2, .65, .5), "Really red", 0, cn(), vc(1, 1, 1)) | |
95 | local mprtw=weld(mprt, bf4, cn(-3.4, -.03, -1.9)*ca(rd(15), 0, 0)) | |
96 | local dmc=part(delorean, false, true, vc(2, .65, .5), "Really Really red", 0, cn(), vc(1, 1, 1)) | |
97 | local dmcw=weld(dmc, bf4, cn(0, -.03, -1.9)*ca(rd(15), 0, 0)) | |
98 | decal=Instance.new("Decal", dmc) | |
99 | decal.Texture="http://www.roblox.com/asset/?id=28924870" | |
100 | decal.Face="Front" | |
101 | local prt=part(delorean, false, true, vc(.5, 2, 1), "Really Really red") | |
102 | local prtw=weld(prt, bc, cn(3.25, 1.25, -2.5)*ca(0, 0, 0)) | |
103 | local w=wedge(delorean, false, false, vc(.5, 1, .5), "Really Really red") | |
104 | local w2=weld(w, prt, cn(0, -.5, .75)*ca(0,pi,0)) | |
105 | local prt=part(delorean, false, true, vc(.5, 2, 1), "Really Really red") | |
106 | local prtw=weld(prt, bc, cn(3.25, 1.25, -3)*ca(rd(-45), 0, 0)) | |
107 | local prt=part(delorean, false, true, vc(.5, 2, 1), "Really Really red") | |
108 | local prtw=weld(prt, bc, cn(-3.25, 1.25, -2.5)*ca(0, 0, 0)) | |
109 | local w=wedge(delorean, false, false, vc(.5, 1, .5), "Really Really red") | |
110 | local w2=weld(w, prt, cn(0, -.5, .75)*ca(0,pi,0)) | |
111 | local prt=part(delorean, false, true, vc(.5, 2, 1), "Really Really red") | |
112 | local prtw=weld(prt, bc, cn(-3.25, 1.25, -3)*ca(rd(-45), 0, 0)) | |
113 | local prt=part(delorean, false, true, vc(.5, 2, 1), "Really Really red") | |
114 | local prtw=weld(prt, bc, cn(3.25, 1.25, 2.5)*ca(0, 0, 0)) | |
115 | local prt2=part(delorean, false, true, vc(.5, 2.2, 1.5), "Really Really red") | |
116 | local prt2w=weld(prt2, prt, cn(-.25, 1.85, .25)*ca(0, 0, rd(10))) | |
117 | local w=wedge(delorean, false, false, vc(.5, 2, 1), "Really Really red") | |
118 | local w2=weld(w, prt, cn(0, 0, -1)) | |
119 | local prt=part(delorean, false, true, vc(.5, 2, 1), "Really Really red") | |
120 | local prtw=weld(prt, bc, cn(3.25, 1.25, 3)*ca(rd(45), 0, 0)) | |
121 | local prt=part(delorean, false, true, vc(.5, 2, 1), "Really Really red") | |
122 | local prtw=weld(prt, bc, cn(-3.25, 1.25, 2.5)*ca(0, 0, 0)) | |
123 | local prt2=part(delorean, false, true, vc(.5, 2.2, 1.5), "Really Really red") | |
124 | local prt2w=weld(prt2, prt, cn(.25, 1.85, .25)*ca(0, 0, rd(-10))) | |
125 | local w=wedge(delorean, false, false, vc(.5, 2, 1), "Really Really red") | |
126 | local w2=weld(w, prt, cn(0, 0, -1)) | |
127 | local prt=part(delorean, false, true, vc(.5, 2, 1), "Really Really red") | |
128 | local prtw=weld(prt, bc, cn(-3.25, 1.25, 3)*ca(rd(45), 0, 0)) | |
129 | local main=part(delorean, false, true, vc(6, .5, 1.5), "Really Really red") | |
130 | local mainw=weld(main, base, cn(0, 4, 2.75)) | |
131 | local stand=part(delorean, false, true, vc(.5, .5, 5.5), "Really Really red") | |
132 | local standw=weld(stand, base, cn(3,3,5.5)*ca(rd(22),rd(5),0)) | |
133 | local stand=part(delorean, false, true, vc(.5, .5, 5.5), "Really Really red") | |
134 | local standw=weld(stand, base, cn(-3,3,5.5)*ca(rd(22),rd(-5),0)) | |
135 | local backprt=part(delorean, false, true, vc(6, 2, .5), "Really red") | |
136 | local backprt=weld(backprt, base, cn(0, 3, 2)) | |
137 | local window=part(delorean, false, true, vc(5, 2.5, .25), "Really red", .5) | |
138 | local windoww=weld(window, base, cn(0, 3, -1.25)*ca(rd(45), 0, 0)) | |
139 | local border=part(delorean, false, false, vc(5, .5, .5), "Really Really red") | |
140 | local borderw=weld(border, window, cn(0, 1.5, 0)) | |
141 | local border=part(delorean, false, false, vc(.5, 3, .5), "Really Really red") | |
142 | local borderw=weld(border, window, cn(2.5, 0, 0)*ca(0, 0, rd(10))) | |
143 | local border=part(delorean, false, false, vc(.5, 3, .5), "Really Really red") | |
144 | local borderw=weld(border, window, cn(-2.5, 0, 0)*ca(0, 0, rd(-10))) | |
145 | local prt=weld() | |
146 | local mainjoint=part(delorean, false, true, vc(2, .5, 2), "Really Really red") | |
147 | local mainjointw=weld(mainjoint, base, cn(0, 4, 1)) | |
148 | local seat=part(delorean, false, false, vc(2, .5, 2), "Really red") | |
149 | local seatw=weld(seat, base, cn(1.5, .25, 1)) | |
150 | local backseat=part(delorean, false, false, vc(2, 2, .5), "Really red") | |
151 | local backseatw=weld(backseat, seat, cn(0, 1, 1)*ca(rd(10), 0, 0)) | |
152 | local headseat=part(delorean, false, false, vc(1.5, 1.25, .5), "Really red") | |
153 | local headseatw=weld(headseat, seat, cn(0, 2.5, 1.15)) | |
154 | local seat=part(delorean, false, false, vc(2, .5, 2), "Really red") | |
155 | local seatw=weld(seat, base, cn(-1.5, .25, 1)) | |
156 | local backseat=part(delorean, false, false, vc(2, 2, .5), "Really red") | |
157 | local backseatw=weld(backseat, seat, cn(0, 1, 1)*ca(rd(10), 0, 0)) | |
158 | local headseat=part(delorean, false, false, vc(1.5, 1.25, .5), "Really red") | |
159 | local headseatw=weld(headseat, seat, cn(0, 2.5, 1.15)) | |
160 | local line=part(delorean, false, false, vc(1, 1, 14), "Really red") | |
161 | local linew=weld(line, base, cn(0, .5, 0)) | |
162 | local back=part(delorean, false, true, vc(5, 1.5, 6), "Really Really red") | |
163 | local backw=weld(back, base, cn(0, 1, 5)) | |
164 | local bb33s=part(delorean, false, true, vc(7, 1.5, 2), "Really Really red") | |
165 | local bb33sw=weld(bb33s, base, cn(0, 1, 7)) | |
166 | local bbs=part(delorean, false, true, vc(7, .5, 1), "Really Really red") | |
167 | local bbsw=weld(bbs, base, cn(0, .25, 8.25)*ca(-rd(35), 0, 0)) | |
168 | local bbs=part(delorean, false, true, vc(7, 1.5, .5), "Really Really red") | |
169 | local bbsw=weld(bbs, base, cn(0, 1, 8.25)) | |
170 | local bb3s=part(delorean, false, true, vc(7, .5, .5), "Really red") | |
171 | local bb3sw=weld(bb3s, bb33s, cn(0, 1, 1.25)) | |
172 | local bb3s=part(delorean, false, true, vc(7, .5, 6), "Really Really red") | |
173 | local bb3sw=weld(bb3s, bb33s, cn(0, 1, -2)) | |
174 | decal=Instance.new("Decal", bb3s) | |
175 | decal.Texture="http://www.roblox.com/asset/?id=27893351" | |
176 | decal.Face="Top" | |
177 | rocket=wedge(delorean, false, true, vc(2,2,4), "Really red") | |
178 | rocketw=weld(rocket, bb3s, cn(2,1,1.5)) | |
179 | r2=wedge(delorean, false, true, vc(2,1,2), "Really Really red") | |
180 | r2w=weld(r2,rocket,cn(0,0,2.5)*ca(pi/2,pi,0)) | |
181 | rocket=wedge(delorean, false, true, vc(2,2,4), "Really red") | |
182 | rocketw=weld(rocket, bb3s, cn(-2,1,1.5)) | |
183 | r2=wedge(delorean, false, true, vc(2,1,2), "Really Really red") | |
184 | r2w=weld(r2,rocket,cn(0,0,2.5)*ca(pi/2,pi,0)) | |
185 | pp=part(delorean, false, true, vc(2,1,5), "Really red") | |
186 | ppw=weld(pp,bb3s,cn(0,.5,0)) | |
187 | reactor=part(delorean, false, true, vc(2,1.5,2), "Really red") | |
188 | reactorw=weld(reactor,pp,cn(0,-.25,1.5)) | |
189 | reactorm=mesh("SpecialMesh", reactor, vc(.4,.1,.4), "FileMesh", "http://www.roblox.com/Asset/?id=10207677") | |
190 | cyl=cylinder(delorean,false,true,vc(.8,1.5,.8),"White") | |
191 | cylw=weld(cyl,reactor,cn(0,1.5,0)) | |
192 | decal=Instance.new("Decal", cyl) | |
193 | decal.Texture="http://www.roblox.com/asset/?id=37389443" | |
194 | decal.Face="Front" | |
195 | decal=Instance.new("Decal", cyl) | |
196 | decal.Texture="http://www.roblox.com/asset/?id=37389443" | |
197 | decal.Face="Back" | |
198 | decal=Instance.new("Decal", cyl) | |
199 | decal.Texture="http://www.roblox.com/asset/?id=37389443" | |
200 | decal.Face="Right" | |
201 | decal=Instance.new("Decal", cyl) | |
202 | decal.Texture="http://www.roblox.com/asset/?id=37389319" | |
203 | decal.Face="Left" | |
204 | cyl2=cylinder(delorean,false,true,vc(.5,.5,.5),"Really Really red") | |
205 | cyl2w=weld(cyl2,cyl,cn(0,.75,0)) | |
206 | but=part(delorean,false,true,vc(.4,.3,1),"Bright red") | |
207 | butw=weld(but,cyl,cn(0,-.5,.5)) | |
208 | local wed=wedge(delorean, false, true, vc(7, .5, 3), "Really Really red") | |
209 | local wedw=weld(wed, bf2, cn(0, 0, -.5)*ca(0, 0, pi)) | |
210 | local trunk=wedge(delorean, false, true, vc(7, .5, 6.35), "Really Really red") | |
211 | local trunkw=weld(trunk, bf4, cn(0, .6, 1.5)) | |
212 | --TIRE | |
213 | local prts=6 | |
214 | local rad=1.6 | |
215 | local tfr=cylinder(delorean, false, true, vc(2.5, 1, 2.5), "Really red") | |
216 | local tfrw=weld(tfr, base, cn(3,.25,-4.5)*ca(0,0,pi/2)) | |
217 | local met=cylinder(delorean, false, true, vc(1.5, 1.1, 1.5), "Really Really red") | |
218 | local metw=weld(met, tfr, cn()) | |
219 | for i=0,pi,pi/prts do | |
220 | local p=part(delorean, false, false, vc(1.1,1.1,.5), "Really Really red") | |
221 | p.CFrame=tfr.CFrame*cn(rad*sn(i), 0, rad*cs(i)) | |
222 | p.CFrame=CFrame.new(p.CFrame.p, tfr.CFrame.p) | |
223 | stick(p, base) | |
224 | end | |
225 | local tfl=cylinder(delorean, false, true, vc(2.5, 1, 2.5), "Really red") | |
226 | local tflw=weld(tfl, base, cn(-3,.25,-4.5)*ca(0,0,pi/2)) | |
227 | local met=cylinder(delorean, false, true, vc(1.5, 1.1, 1.5), "Really Really red") | |
228 | local metw=weld(met, tfl, cn()) | |
229 | for i=0,pi,pi/prts do | |
230 | local p=part(delorean, false, false, vc(1.1,1.1,.5), "Really Really red") | |
231 | p.CFrame=tfl.CFrame*cn(rad*sn(i), 0, rad*cs(i)) | |
232 | p.CFrame=CFrame.new(p.CFrame.p, tfl.CFrame.p) | |
233 | stick(p, base) | |
234 | end | |
235 | local tbr=cylinder(delorean, false, true, vc(2.5, 1, 2.5), "Really red") | |
236 | local tbrw=weld(tbr, base, cn(3,.25,4.5)*ca(0,0,pi/2)) | |
237 | local met=cylinder(delorean, false, true, vc(1.5, 1.1, 1.5), "Really Really red") | |
238 | local metw=weld(met, tbr, cn()) | |
239 | for i=0,pi,pi/prts do | |
240 | local p=part(delorean, false, false, vc(1.1,1.1,.5), "Really Really red") | |
241 | p.CFrame=tbr.CFrame*cn(rad*sn(i), 0, rad*cs(i)) | |
242 | p.CFrame=CFrame.new(p.CFrame.p, tbr.CFrame.p) | |
243 | stick(p, base) | |
244 | end | |
245 | local tbl=cylinder(delorean, false, true, vc(2.5, 1, 2.5), "Really red") | |
246 | local tblw=weld(tbl, base, cn(-3,.25,4.5)*ca(0,0,pi/2)) | |
247 | local met=cylinder(delorean, false, true, vc(1.5, 1.1, 1.5), "Really Really red") | |
248 | local metw=weld(met, tbl, cn()) | |
249 | for i=0,pi,pi/prts do | |
250 | local p=part(delorean, false, false, vc(1.1,1.1,.5), "Really Really red") | |
251 | p.CFrame=tbl.CFrame*cn(rad*sn(i), 0, rad*cs(i)) | |
252 | p.CFrame=CFrame.new(p.CFrame.p, tbl.CFrame.p) | |
253 | stick(p, base) | |
254 | end | |
255 | atfr=function(cf) | |
256 | tfrw.C1=cn(3,.25,-4.5)*ca(0,0,pi/2)*cf | |
257 | end | |
258 | atfl=function(cf) | |
259 | tflw.C1=cn(-3,.25,-4.5)*ca(0,0,pi/2)*cf | |
260 | end | |
261 | atbr=function(cf) | |
262 | tblw.C1=cn(3,.25,4.5)*ca(0,0,pi/2)*cf | |
263 | end | |
264 | atbl=function(cf) | |
265 | tblw.C1=cn(-3,.25,4.5)*ca(0,0,pi/2)*cf | |
266 | end | |
267 | local trunkw=weld(trunk, bf4, cn(0, .6, 1.25)) | |
268 | --SEATS | |
269 | --DOOR | |
270 | local DoorRight=Instance.new("Model", delorean) | |
271 | local djr=part(DoorRight, false, false, vc(1, 1, 1), "Really Really red", 1) | |
272 | local djrw=weld(djr, mainjoint, cn(1,0,0)*ca(0,0,0)) | |
273 | local dp=part(DoorRight, false, true, vc(2, .5, 2), "Really Really red") | |
274 | local dpw=weld(dp, djr, cn(1, 0, 0)) | |
275 | local dp2=part(DoorRight, false, true, vc(.5, .5, 3.25), "Really Really red") | |
276 | local dp2w=weld(dp2, dp, cn(1, -1, -2)*ca(rd(-45),rd(-10),0)) | |
277 | local dp3=part(DoorRight, false, true, vc(.5, 2.2, .5), "Really Really red") | |
278 | local dp3w=weld(dp3, dp, cn(1, -.85, .75)*ca(0, 0, rd(15))) | |
279 | local dw=wedge(DoorRight, false, true, vc(.5, 2, 1), "Really Really red") | |
280 | local dww=weld(dw, dp, cn(1.25, -2.75, .5)*ca(pi,0,0)) | |
281 | local dw=wedge(DoorRight, false, true, vc(.5,1,.5), "Really Really red") | |
282 | local dww=weld(dw, dp, cn(1.25, -3.25, -2.75)*ca(pi, pi, 0)) | |
283 | local dp4=part(DoorRight, false, true, vc(.5,1,.5), "Really Really red") | |
284 | local dp4w=weld(dp4, dp, cn(1.25, -2.25, -2.75)) | |
285 | local dp5=part(DoorRight, false, true, vc(.5,2,2.5), "Really Really red") | |
286 | local dp5w=weld(dp5, dp, cn(1.25, -2.75, -1.25)) | |
287 | local dwindow=wedge(DoorRight, false, true, vc(.25, 2, 2), "Really Really red", .5) | |
288 | local dwindoww=weld(dwindow, dp, cn(1, -1, -1.75)*ca(0, 0, rd(15))) | |
289 | local dwindow=part(DoorRight, false, true, vc(.25, 2, 1.5), "Really Really red", .5) | |
290 | local dwindoww=weld(dwindow, dp, cn(1, -1, 0)*ca(0, 0, rd(15))) | |
291 | local glass=part(DoorRight, false, true, vc(1, .5, .2), "Really Really red") | |
292 | local glassw=weld(glass, dp, cn(1.5, -1.5, -2)*ca(0, rd(-35), 0)) | |
293 | local actr=false | |
294 | local debr=false | |
295 | function clickr() | |
296 | if actr==false then | |
297 | if debr==false then | |
298 | debr=true | |
299 | for i=0, 1, .1 do | |
300 | djrw.C1=cn(1,0,0)*ca(0,0,rd(90)*i) | |
301 | wait() | |
302 | end | |
303 | debr=false | |
304 | actr=true | |
305 | end | |
306 | elseif actr==true then | |
307 | if debr==false then | |
308 | debr=true | |
309 | for i=1, 0, -.1 do | |
310 | djrw.C1=cn(1,0,0)*ca(0,0,rd(90)*i) | |
311 | wait() | |
312 | end | |
313 | debr=false | |
314 | actr=false | |
315 | end | |
316 | end | |
317 | end | |
318 | for i, v in pairs(DoorRight:children()) do | |
319 | local cdetector=Instance.new("ClickDetector", v) | |
320 | cdetector.MouseClick:connect(clickr) | |
321 | end | |
322 | local DoorLeft=Instance.new("Model", delorean) | |
323 | local djl=part(DoorLeft, false, false, vc(1, 1, 1), "Really Really red", 1) | |
324 | local djlw=weld(djl, mainjoint, cn(-1,0,0)) | |
325 | local dp=part(DoorLeft, false, true, vc(2, .5, 2), "Really Really red") | |
326 | local dpw=weld(dp, djl, cn(-1, 0, 0)) | |
327 | local dp2=part(DoorLeft, false, true, vc(.5, .5, 3.25), "Really Really red") | |
328 | local dp2w=weld(dp2, dp, cn(-1, -1, -2)*ca(rd(-45),rd(10),0)) | |
329 | local dp3=part(DoorLeft, false, true, vc(.5, 2.2, .5), "Really Really red") | |
330 | local dp3w=weld(dp3, dp, cn(-1, -.85, .75)*ca(0, 0, rd(-15))) | |
331 | local dw=wedge(DoorLeft, false, true, vc(.5, 2, 1), "Really Really red") | |
332 | local dww=weld(dw, dp, cn(-1.25, -2.75, .5)*ca(pi,0,0)) | |
333 | local dw=wedge(DoorLeft, false, true, vc(.5,1,.5), "Really Really red") | |
334 | local dww=weld(dw, dp, cn(-1.25, -3.25, -2.75)*ca(pi, pi, 0)) | |
335 | local dp4=part(DoorLeft, false, true, vc(.5,1,.5), "Really Really red") | |
336 | local dp4w=weld(dp4, dp, cn(-1.25, -2.25, -2.75)) | |
337 | local dp5=part(DoorLeft, false, true, vc(.5,2,2.5), "Really Really red") | |
338 | local dp5w=weld(dp5, dp, cn(-1.25, -2.75, -1.25)) | |
339 | local dwindow=wedge(DoorLeft, false, true, vc(.25, 2, 2), "Really Really red", .5) | |
340 | local dwindoww=weld(dwindow, dp, cn(-1, -1, -1.75)*ca(0, 0, rd(-15))) | |
341 | local dwindow=part(DoorLeft, false, true, vc(.25, 2, 1.5), "Really Really red", .5) | |
342 | local dwindoww=weld(dwindow, dp, cn(-1, -1, 0)*ca(0, 0, rd(-15))) | |
343 | local glass=part(DoorLeft, false, true, vc(1, .5, .2), "Really Really red") | |
344 | local glassw=weld(glass, dp, cn(-1.5, -1.5, -2)*ca(0, rd(35), 0)) | |
345 | local actl=false | |
346 | local debl=false | |
347 | function clickl() | |
348 | if actl==false then | |
349 | if debl==false then | |
350 | debl=true | |
351 | for i=0, 1, .1 do | |
352 | djlw.C1=cn(-1,0,0)*ca(0,0,rd(-90)*i) | |
353 | wait() | |
354 | end | |
355 | debl=false | |
356 | actl=true | |
357 | end | |
358 | elseif actl==true then | |
359 | if debl==false then | |
360 | debl=true | |
361 | for i=1, 0, -.1 do | |
362 | djlw.C1=cn(-1,0,0)*ca(0,0,rd(-90)*i) | |
363 | wait() | |
364 | end | |
365 | debl=false | |
366 | actl=false | |
367 | end | |
368 | end | |
369 | end | |
370 | for i, v in pairs(DoorLeft:children()) do | |
371 | local cdetector=Instance.new("ClickDetector", v) | |
372 | cdetector.MouseClick:connect(clickl) | |
373 | end | |
374 | local bf=Instance.new("BodyForce") | |
375 | local bav=Instance.new("BodyAngularVelocity") bav.angularvelocity=vc(0,0,0) bav.maxTorque=vc(math.huge,math.huge,math.huge) | |
376 | local vs=Instance.new("VehicleSeat", delorean) | |
377 | vs.HeadsUpDisplay=false | |
378 | vs.CanCollide=false | |
379 | vs.Transparency=1 | |
380 | vs.Size=Vector3.new(2, .5, 2) | |
381 | weld(vs, base, cn(-1.5, 0, 1)) | |
382 | local ps=Instance.new("VehicleSeat", delorean) | |
383 | ps.HeadsUpDisplay=false | |
384 | ps.CanCollide=false | |
385 | ps.Size=Vector3.new(2, .5, 2) | |
386 | ps.Transparency=1 | |
387 | weld(ps, base, cn(1.5, 0, 1)) | |
388 | torsos={} | |
389 | ps.ChildAdded:connect(function(w) | |
390 | if w.Name=="SeatWeld" then | |
391 | torso=w.Part1 | |
392 | if torso then | |
393 | for i, v2 in pairs(torso.Parent:children()) do | |
394 | if v2:isA("BasePart") then | |
395 | for i, v3 in pairs(v2:children()) do | |
396 | if v3:isA("CFrameValue") then | |
397 | v3:remove() | |
398 | end | |
399 | end | |
400 | end | |
401 | end | |
402 | end | |
403 | table.insert(torsos, torso) | |
404 | w.C1=w.C1*CFrame.new(0, 0, .5) | |
405 | end | |
406 | end) | |
407 | running=false | |
408 | vs.ChildAdded:connect(function(w) | |
409 | if w.Name=="SeatWeld" then | |
410 | torso=w.Part1 | |
411 | w.C1=w.C1*CFrame.new(0, 0, .5) | |
412 | if torso then | |
413 | for i, v2 in pairs(torso.Parent:children()) do | |
414 | if v2:isA("BasePart") then | |
415 | for i, v3 in pairs(v2:children()) do | |
416 | if v3:isA("CFrameValue") then | |
417 | v3:remove() | |
418 | end | |
419 | end | |
420 | end | |
421 | end | |
422 | table.insert(torsos, torso) | |
423 | local player=game.Players:getPlayerFromCharacter(torso.Parent) | |
424 | screengui=Instance.new("ScreenGui", player.PlayerGui) screengui.Name=modelname | |
425 | speedometer=gui("TextLabel", screengui, "Really red", "Really red", "Really Really red", "Size48", "0", 1, UDim2.new(0, 100, 0, 100), UDim2.new(0, 50, .85, 0)) | |
426 | hourlabel=gui("TextLabel", screengui, "Really red", "Really red", "Really Really red", "Size48", "HH", 1, UDim2.new(0, 100, 0, 50), UDim2.new(.7, 0, .8, 0)) | |
427 | minutelabel=gui("TextLabel", hourlabel, "Really red", "Really red", "Really Really red", "Size48", "MM", 1, UDim2.new(1, 0, 1, 0), UDim2.new(1, 0, 0, 0)) | |
428 | secondlabel=gui("TextLabel", minutelabel, "Really red", "Really red", "Really Really red", "Size48", "SS", 1, UDim2.new(1, 0, 1, 0), UDim2.new(1, 0, 0, 0)) | |
429 | hourbox=gui("TextBox", hourlabel, "Really red", "Really red", "Really red", "Size48", "24", 1, UDim2.new(1, 0, 1, 0), UDim2.new(0, 0, 1, 0)) | |
430 | minutebox=gui("TextBox", minutelabel, "Really red", "Really red", "Really red", "Size48", "00", 1, UDim2.new(1, 0, 1, 0), UDim2.new(0, 0, 1, 0)) | |
431 | secondbox=gui("TextBox", secondlabel, "Really red", "Really red", "Really red", "Size48", "00", 1, UDim2.new(1, 0, 1, 0), UDim2.new(0, 0, 1, 0)) | |
432 | running=true | |
433 | run() | |
434 | end | |
435 | end | |
436 | end) | |
437 | vs.ChildRemoved:connect(function(w) | |
438 | if w.Name=="SeatWeld" then | |
439 | torso=w.Part1 | |
440 | if torso then | |
441 | for i, v in pairs(torsos) do | |
442 | if v==torso then | |
443 | table.remove(torsos,i) | |
444 | end | |
445 | end | |
446 | local player=game.Players:getPlayerFromCharacter(torso.Parent) | |
447 | player.PlayerGui[modelname]:remove() | |
448 | running=false | |
449 | end | |
450 | end | |
451 | end) | |
452 | ps.ChildRemoved:connect(function(w) | |
453 | if w.Name=="SeatWeld" then | |
454 | torso=w.Part1 | |
455 | if torso then | |
456 | for i, v in pairs(torsos) do | |
457 | if v==torso then | |
458 | table.remove(torsos,i) | |
459 | end | |
460 | end | |
461 | end | |
462 | end | |
463 | end) | |
464 | c(function()wait(.5) bp:remove()end) | |
465 | function makelightning(from, to, thick, col) | |
466 | local magnitude=(from.p-to.p).magnitude | |
467 | local distance=(from.p+to.p)/2 | |
468 | local pattern=part(workspace, true, false, vc(.2, .2, magnitude), "White", 1, cn(distance, from.p)) | |
469 | local fromPosProx=from.p | |
470 | for i=1, 4 do | |
471 | local fromPosProx2=fromPosProx | |
472 | local random=vc(rn(-1, 1), rn(-1, 1), rn(-1, 1)) | |
473 | local findSize=pattern.Size.z/3 | |
474 | local findOffSet=pattern.CFrame.lookVector*-1 | |
475 | local compute=i*findSize*findOffSet | |
476 | local newfromPos=from.p | |
477 | local newEndPos=cn(random+compute+newfromPos).p | |
478 | local magnitude=(fromPosProx2-newEndPos).magnitude | |
479 | local distance=(fromPosProx2+newEndPos)/2 | |
480 | local lightning=part(workspace, true, false, vc(1, 1, 1), col or "Bright yellow", 0, cn(distance, fromPosProx2), vc(thick, thick, magnitude)) | |
481 | fromPosProx=newEndPos | |
482 | game.Debris:addItem(lightning, .5) | |
483 | end | |
484 | pattern:remove() | |
485 | end | |
486 | function play(soundid, pitch, volume) | |
487 | local sound=sound(workspace, soundid, pitch, volume) | |
488 | sound:play() | |
489 | c(function() wait(5) sound:remove() end) | |
490 | end | |
491 | trm=Instance.new("Model", delorean) | |
492 | function trail(prt, cf, thick, col) | |
493 | local old=(prt.CFrame*(cf or cn())).p | |
494 | local trail=part(trm, true, false, vc(1, 1, 1), col or "White", 0, cn(old)*ca(rn(-360, 360),rn(-360, 360),rn(-360, 360)), vc(thick, thick, thick)) | |
495 | c(function() | |
496 | for i=1, 0, -.001 do pc(function() trail.Mesh.Scale=trail.Mesh.Scale*vc(i, i, i) end) wait() end | |
497 | trail:remove() | |
498 | end) | |
499 | end | |
500 | Targets={} | |
501 | timedeb=false | |
502 | num=0 | |
503 | maxnum=400 | |
504 | origin=0 | |
505 | function stick(from, to) | |
506 | local stickW=weld(from, to, to.CFrame:inverse()*from.CFrame) | |
507 | stickW.C0=from.CFrame:inverse()*from.CFrame | |
508 | return stickW | |
509 | end | |
510 | local bp=Instance.new("BodyPosition") bp.D=100 bp.maxForce=vc(inf,inf,inf) | |
511 | timedeb=false | |
512 | function run() | |
513 | num=0 | |
514 | c(function() | |
515 | for i, v in pairs(workspace:children()) do | |
516 | if v:isA("Model") then | |
517 | for i, v2 in pairs(v:children()) do | |
518 | if v2:isA("BasePart") then | |
519 | for i, v3 in pairs(v2:children()) do | |
520 | if v3:isA("CFrameValue") then | |
521 | v3:remove() | |
522 | end | |
523 | end | |
524 | end | |
525 | end | |
526 | end | |
527 | end | |
528 | timedeb=true | |
529 | while true do | |
530 | --TimeContinium----------------------------- | |
531 | if num<=0 and timedeb==true then | |
532 | for i, v in pairs(workspace:children()) do | |
533 | if v:isA("BasePart") then | |
534 | if v.Anchored==false then | |
535 | table.insert(Targets, v) | |
536 | local Origin = Instance.new("CFrameValue") | |
537 | Origin.Parent = v | |
538 | Origin.Name = "Origin CFrame" | |
539 | Origin.Value = v.CFrame | |
540 | end | |
541 | end | |
542 | for i, t in pairs(torsos) do | |
543 | if v:isA("Model") and v~=t.Parent and v~=delorean then | |
544 | for i, v2 in pairs(v:children()) do | |
545 | if v2:isA("BasePart") then | |
546 | table.insert(Targets, v2) | |
547 | local Origin = Instance.new("CFrameValue") | |
548 | Origin.Parent = v2 | |
549 | Origin.Name = "Origin CFrame" | |
550 | Origin.Value = v2.CFrame | |
551 | end | |
552 | end | |
553 | end | |
554 | end | |
555 | end | |
556 | --------- | |
557 | while num<maxnum and timedeb==true do ---print(num) | |
558 | for i, v in pairs(workspace:children()) do | |
559 | if v:isA("BasePart") and v:findFirstChild("Origin CFrame")==nil then | |
560 | if v.Anchored==false then | |
561 | table.insert(Targets, v) | |
562 | local Origin = Instance.new("CFrameValue") | |
563 | Origin.Parent = v | |
564 | Origin.Name = "Origin CFrame" | |
565 | Origin.Value = v.CFrame | |
566 | end | |
567 | end | |
568 | for i, t in pairs(torsos) do | |
569 | if v:isA("Model") and v~=t.Parent and v~=delorean then | |
570 | for i, v2 in pairs(v:children()) do | |
571 | if v2:isA("BasePart") and v2:findFirstChild("Origin CFrame")==nil then | |
572 | table.insert(Targets, v2) | |
573 | local Origin = Instance.new("CFrameValue") | |
574 | Origin.Parent = v2 | |
575 | Origin.Name = "Origin CFrame" | |
576 | Origin.Value = v2.CFrame | |
577 | end | |
578 | end | |
579 | end | |
580 | end | |
581 | end | |
582 | for i, v in pairs(Targets) do | |
583 | local History = Instance.new("CFrameValue") | |
584 | History.Parent = v | |
585 | History.Name = num | |
586 | History.Value = v.CFrame | |
587 | end | |
588 | num = num + 1 | |
589 | wait() | |
590 | end | |
591 | end | |
592 | wait() | |
593 | end | |
594 | end) | |
595 | while running do | |
596 | local speed=base.Velocity.magnitude | |
597 | speedometer.Text=math.floor(speed) | |
598 | if speed>65 and speed<88 then play("http://www.roblox.com/asset/?id=2800815", 1, .5) | |
599 | makelightning(base.CFrame*CFrame.new(0,0,10), base.CFrame*CFrame.new(rn(-10,10),rn(-10,10),rn(-2,10)), 1) | |
600 | trail(tbr,cn(-1.5, 0, -10),2.5,"Bright orange") | |
601 | trail(tbl,cn(-1.9, 0, -10),2.5,"Bright orange") | |
602 | end | |
603 | if speed>88 and speed<90 then play("http://roblox.com/asset/?id=10209481") | |
604 | local trm2=trm:clone() trm2.Parent=workspace | |
605 | origin=base.Position | |
606 | print(origin) | |
607 | game.Debris:addItem(trm2, 5) | |
608 | bp.position=vc(0,0,-99999) | |
609 | bp.Parent=base | |
610 | timedeb=false | |
611 | c(function() | |
612 | for i=0,1,.005 do | |
613 | game.Lighting.TimeOfDay=math.floor(hourbox.Text*i)..":"..math.floor(minutebox.Text*i)..":"..math.floor(secondbox.Text*i) | |
614 | wait() | |
615 | end | |
616 | end) | |
617 | while num > 0 do --print(num) | |
618 | wait() | |
619 | num = num - 1 | |
620 | for i, v in pairs(Targets) do | |
621 | v.Anchored=true | |
622 | local History = v:findFirstChild(num) | |
623 | if History ~= nil then | |
624 | v.CFrame = History.Value | |
625 | History:remove() | |
626 | end | |
627 | end | |
628 | end | |
629 | for i, v in pairs(Targets) do | |
630 | local Origin = v:findFirstChild("Origin CFrame") | |
631 | if Origin ~= nil then | |
632 | v.CFrame = Origin.Value | |
633 | v:makeJoints() | |
634 | Origin:remove() | |
635 | end | |
636 | end | |
637 | for i, v in pairs(Targets) do | |
638 | v.Anchored=false | |
639 | end | |
640 | play("http://www.roblox.com/asset/?id=2101148", 1, 1) | |
641 | exp=Instance.new("Explosion", workspace) | |
642 | exp.BlastPressure=0 | |
643 | exp.Position=origin | |
644 | Targets = {} | |
645 | timedeb=true | |
646 | bp.position=origin | |
647 | origin=0 | |
648 | base.Velocity=vc(0,0,0) | |
649 | bf.force=base.CFrame.lookVector*0 | |
650 | wait(1) | |
651 | bp:remove() | |
652 | end | |
653 | if vs.Steer==0 then bav.angularvelocity=vc(0,0,0) atfr(ca(0, 0, 0)) atfl(ca(0, 0, 0)) end | |
654 | if vs.Steer==1 then atfr(ca(rd(-25), 0, 0)) atfl(ca(rd(-25), 0, 0)) end | |
655 | if vs.Steer==-1 then atfr(ca(rd(25), 0, 0)) atfl(ca(rd(25), 0, 0)) end | |
656 | if vs.Throttle==1 then bav.Parent=base bf.Parent=base | |
657 | if vs.Steer==1 then bav.angularvelocity=vc(0,-2,0) end | |
658 | if vs.Steer==-1 then bav.angularvelocity=vc(0,2,0) end | |
659 | bf.force=base.CFrame.lookVector*40000 | |
660 | end | |
661 | if vs.Throttle==0 then bav.Parent=base bf.Parent=base | |
662 | bf.force=base.CFrame.lookVector*0 | |
663 | end | |
664 | if vs.Throttle==-1 then bav.Parent=base bf.Parent=base | |
665 | if vs.Steer==1 then bav.angularvelocity=vc(0,2,0) end | |
666 | if vs.Steer==-1 then bav.angularvelocity=vc(0,-2,0) end | |
667 | bf.force=base.CFrame.lookVector*-40000 | |
668 | end | |
669 | wait() | |
670 | end | |
671 | end |