Magic 8 Ball Gear||Roblox||Void Script Builder

print("-- It Actully Works Just Tell It A Question In Real life And Shake It In Game :D"
) -- Converted using Mokiros's Model to Script plugin
-- Converted string size: 1023

local Scripts = {	function()
a=game:service("RunService")local h=script.Parent local i=0 local j=nil function b()if not h.Enabled then return end h.Enabled=false c=a.Stepped:wait()if(c-i<0.6)then j=h.Parent:FindFirstChild("Humanoid")if j~=nil then d()end else e()end i=c h.Enabled=true end function e()h.Handle.Shake:Play()local k=h.Parent local l=game.Players:playerFromCharacter(k)f=h:FindFirstChild("ScreenGui")if f~=nil then f=h:FindFirstChild("ScreenGui"):clone()f.Parent=l.PlayerGui end h.GripPos=Vector3.new(0.3,-0.4,0)wait(.1)h.GripPos=Vector3.new(-0.3,-0.4,0)wait(.1)h.GripPos=Vector3.new(0.3,-0.4,0)wait(.1)h.GripPos=Vector3.new(-0.3,-0.4,0)wait(.1)h.GripPos=Vector3.new(0,-0.4,0)h.Handle.Shake:Stop()end function d()h.Parent=game.Workspace local k=j.Parent local l=k.Head.CFrame.lookVector h.Handle.Velocity=l*100 end h.Activated:connect(b)while true do g=game.Players:getChildren()if g~=nil then wait(math.random(1,#g))if#g>0 then math.random(1,#g)end end wait(1)end
	end;	function()
if script.Parent.Parent.Name=="PlayerGui"then script.Parent.TextBox.Visible=false local a="Always ask yourself, would a noob do this?"local b="Yes"local c="No"local d="Looks like it!"local e="Maybe"local f="Signs point to yes"local g="As I see it, yes"local h="It is certain"local i="It is decidedly so"local j="Reply hazy, try again"local k="Better not tell you..."local l="Very doubtful"local m="Don't count on it"local n="Sources say no..."local o="The future is uncertain right now"local p="I have no idea"local q="j00R PhU7UR3 15 L337"local r="I'm pretty tired"local s="Blame John"local t="ZOMG HAX!"local u="it's OVAR 9000!!!111"local v={a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u}script.Parent.TextBox.Text=v[math.random(1,#v)]script.Parent.TextBox.Visible=true wait(3)script.Parent:remove()end
	end;}local ActualScripts = {}
function s(var)
	local func = table.remove(Scripts,1)
	setfenv(func,setmetatable({script=var},{
		__index = getfenv(func),
	}))
	table.insert(ActualScripts,coroutine.wrap(func))
end

local Decode = function(str,t,props,classes,values,ICList,Model,CurPar,LastIns,split,RemoveAndSplit,InstanceList)
    local tonum,table_remove,inst,parnt,comma,table_foreach = tonumber,table.remove,Instance.new,"Parent",",",
	function(t,f)
		for a,b in pairs(t) do
			f(a,b)
		end
	end
	local Types = {
		Color3 = Color3.new,
		Vector3 = Vector3.new,
		Vector2 = Vector2.new,
		UDim = UDim.new,
		UDim2 = UDim2.new,
		CFrame = CFrame.new,
		Rect = Rect.new,
		NumberRange = NumberRange.new,
		NumberSequence = function(...)
			local a = {...}
			local t = {}
			repeat
				t[#t+1] = NumberSequenceKeypoint.new(table_remove(a,1),table_remove(a,1),table_remove(a,1))
			until #a==0
			return NumberSequence.new(t)
		end,
		ColorSequence = function(...)
			local a = {...}
			local t = {}
			repeat
				t[#t+1] = ColorSequenceKeypoint.new(table_remove(a,1),Color3.new(table_remove(a,1),table_remove(a,1),table_remove(a,1)))
			until #a==0
			return ColorSequence.new(t)
		end,
		number = tonumber,
		boolean = function(a)
			return a=="1"
		end
	}
    split = function(str,sep)
		if not str then return end
		local fields = {}
		local ConcatNext = false
		str:gsub(("([^%s]+)"):format(sep),function(c)
			if ConcatNext == true then
				fields[#fields] = fields[#fields]..sep..c
				ConcatNext = false
			else
				fields[#fields+1] = c
			end
			if c:sub(#c)=="\\" then
				c = fields[#fields]
				fields[#fields] = c:sub(1,#c-1)
				ConcatNext = true
			end
		end)
		return fields
    end
 	RemoveAndSplit = function(t)
		return split(table_remove(t,1),comma)
	end
    t = split(str,";")
    props = RemoveAndSplit(t)
    classes = RemoveAndSplit(t)
	values = split(table_remove(t,1),'|')
	ICList = RemoveAndSplit(t)
	InstanceList = {}
    Model = inst"Model"
    CurPar = Model
    table_foreach(t,function(ct,c)
        if c=="n" or c=="p" then
            CurPar = c=="n" and LastIns or CurPar[parnt]
        else
            ct = split(c,"|")
			local class = classes[tonum(table_remove(ct,1))]
			if class=="UnionOperation" then
				LastIns = {Locked="true",Anchored="true",UsePartColor="true"}
			else
            	LastIns = inst(class)
				if LastIns:IsA"Script" then
					s(LastIns)
	            end
			end

			local function SetProperty(LastIns,p,str,s)
				s = Types[typeof(LastIns[p])]
				LastIns[p] = s and s(unpack(split(str,comma))) or str
			end

			local UnionData
            table_foreach(ct,function(s,p,a,str)
                a = p:find":"
                p,str = props[tonum(p:sub(1,a-1))],values[tonum(p:sub(a+1))]
				if p=="UnionData" then
					UnionData = split(str," ")
					return
				end
				if class=="UnionOperation" then
					LastIns[p] = str
					return
				end
				SetProperty(LastIns,p,str)
            end)

			if UnionData then
				local LI_Data = LastIns
				LastIns = DecodeUnion(UnionData)
				table_foreach(LI_Data,function(p,str)
					SetProperty(LastIns,p,str)
				end)
			end
			table.insert(InstanceList,LastIns)
            LastIns[parnt] = CurPar
        end
    end)
	table_remove(ICList,1)
	table_foreach(ICList,function(a,b)
		b = split(b,">")
		InstanceList[tonum(b[1])][props[tonum(b[2])]] = InstanceList[tonum(b[3])]
	end)

    return Model:GetChildren()
end

local Objects = Decode('Name,TextureId,Grip,GripPos,GripForward,GripUp,Position,Size,BackgroundColor3,BackgroundTransparency,BorderSizePixel,ZIndex,Text,TextColor3,TextWrapped,TextYAlignment,Active,Image,Color,Shape,BottomSu'
..'rface,TopSurface,SoundId,MeshId,MeshType;Part,Tool,Script,ScreenGui,TextLabel,ImageLabel,Sound,SpecialMesh;Part|Magic8Ball|http://www.roblox.com/asset/?id=25677656|0,-0.401,0,1,0,-0,0,0,-1,0,1,-0|0,-0'
..'.401,0|0,1,0|0,0,1|8BallScript|GuiScript|TextBox|0.452,0,0.15,0|0.12,0,0.189,0|0.694,0.69,0.701|1|0|2|Magic 8 Ball|1,1,1|0|0.36,0,0.1,0|0.3,0,0.419,0|0.69,0.686,0.698|http://www.roblox.com/asset/?id= '
..'25594296|Handle|0.105,0.164,0.207|12.5,0.5,17.5|Shake|http://www.roblox.com/asset/?id=25596918|http://www.roblox.com/asset/?id=25674043|http://www.roblox.com/asset/?id=27763356|5;0;2|1:2|2:3|3:4|4:5|5'
..':6|6:7;n;3|1:8;4;n;3|1:9;5|1:10|7:11|8:12|9:13|10:14|11:15|12:16|13:17|14:18|15:14|16:19;6|7:20|8:21|17:14|9:22|10:14|11:15|18:23;p;1|1:24|19:25|7:26|8:18|20:19|21:19|22:19|19:25|19:25;n;7|1:27|23:28;'
..'8|24:29|2:30|25:31;p;p;')
for _,Object in pairs(Objects) do
	Object.Parent = script and script.Parent==workspace and script or workspace
end
for _,f in pairs(ActualScripts) do f() end