Homemade something

ROOTS = {.CampA, .Campers}


 propertyMap = {
	BasePart = {
		, , , , , , , , ,
		, , , , , ,
		
	},
	MeshPart = {
		, 
	},
	Decal = {
		, , , 
	},
	Texture = {
		, , , ,
		, , , 
	},
	SpecialMesh = {
		, , , , , 
	},
	ParticleEmitter = {
		, , , , , , , 
	},
	Smoke = {
		, , 
	},
	Fire = {
		, , 
	},
	Sparkles = {
		, 
	},

	Seat = {
		,
	},
	VehicleSeat = {
		, , , , , , 
	},

	Model = {
		
	},
	ValueBase = {
		
	},

	

	Humanoid = {
		, , , ,
		, , , , 
	},
	BodyColors = {
		, , , , , 
	},
	Shirt = {
		, 
	},
	Pants = {
		, 
	},
	ShirtGraphic = {
		, 
	},
	Tool = {
		, , , , , , 
	},
	HopperBin = {
		, , 
	},
	Sound = {
		, , , , 
	},


	

	ScreenGui = {},
	BillboardGui = {},
	SurfaceGui = {},

	GuiObject = {
		, , , , , ,
		, , , , ,
	},
	TextButton = {
		,
		, , , , , , , ,
	},
	TextLabel = {
		,
		, , , , , , , ,
	},
	ImageButton = {
		, , 
	},
	ImageLabel = {
		, , 
	},
}


  (num)
	 .(num*)/



  (instance)
	 data = {
		Name = instance.Name,
		ClassName = instance.ClassName,
		Properties = {},
		Children = {}
	}

	
	 className, properties  (propertyMap) 
		 instance:(className) 
			 _, property  (properties) 
				 success, value = (()
					 instance[property]
				)
				 success 
					
					 (value) ==  
						value = (value)
					 (value) ==  
						value = value.Name
					 (value) ==  
						value = { R = (value.R), G = (value.G), B = (value.B) }
					 (value) ==  
						value = { X = (value.X), Y = (value.Y), Z = (value.Z) }
					 (value) ==  
						value = { value:() }
					 (value) ==  
						value = { Keypoints = value.Keypoints }
					 (value) ==  
						value = { Keypoints = value.Keypoints }
					 (value) ==  
						value = { Min = (value.Min), Max = (value.Max) }
					 (value) ==  
						value = { 
							X = {Scale = (value.X.Scale), Offset = (value.X.Offset)},
							Y = {Scale = (value.Y.Scale), Offset = (value.Y.Offset)}
						}
					
					data.Properties[property] = value
				
			
		
	

	
	 _, child  (instance:()) 
		
		 className, properties  (propertyMap) 
			 instance:(className) 
				.(data.Children, (child))
				
			
		
	

	 data





 serializedData = {}
 _,ROOT  (ROOTS) 
	 _,instance  (ROOT:()) 
		
		 className, properties  (propertyMap) 
			 instance:(className) 
				.(serializedData, (instance))
			
		
	



 HttpService = :()
 jsonData = HttpService:(serializedData)







CREATE_GUI = 
DEPTH_LIMIT = 



 plrGui = :().LocalPlayer:()
 CREATE_GUI 
	GUI = plrGui:()
	 GUI  GUI:() 
	GUI = .()
	GUI.Name = 
	GUI.DisplayOrder = 
	GUI.Parent = plrGui

	 guis = plrGui:()
	GUI = guis[.(,#guis)]


SCROLL = .()
SCROLL.Name = 
SCROLL.Size = .(,,,)
SCROLL.Position = .(,,,)
SCROLL.BackgroundColor3 = .(,,)
SCROLL.BackgroundTransparency = 
SCROLL.ScrollingDirection = .ScrollingDirection.Y
SCROLL.CanvasSize = .(,,,) 
SCROLL.Parent = GUI

GRID = .()
GRID.CellPadding = .(,,,)
GRID.CellSize = .(,- , ,)
GRID.SortOrder = .SortOrder.LayoutOrder
GRID.Parent = SCROLL





 (num, txt)
	 txtbox = .()
	txtbox.Name =  .. num
	
	txtbox.BackgroundColor3 = .(,,)
	txtbox.TextSize = 
	txtbox.ClearTextOnFocus = 
	txtbox.TextWrapped = 
	txtbox.Text = txt
	txtbox.Parent = SCROLL

	 pagenum = .()
	pagenum.BackgroundColor3 = .(,,)
	pagenum.BackgroundTransparency = 
	pagenum.TextScaled = 
	pagenum.TextColor3 = .(,,)
	pagenum.TextStrokeTransparency = 
	pagenum.Size = .(,,,)
	pagenum.Position = .(,,,-)
	pagenum.Text = num
	pagenum.Parent = txtbox


 (inputString, chunkLength)
	 result = {}
	 length = #inputString

	 i = , length, chunkLength 
		 chunk = inputString:(i, i + chunkLength - )
		.(result, chunk)
	

	 result



 pages = (jsonData, ^-)
 num,data  (pages) 
	(num,data)


SCROLL.CanvasSize = .(,,, .(#pages / ) * GRID.CellSize.Y.Offset)