Universal saveinstance V2

  (s, pattern)
	 .(s, pattern, , )


  (t, hydridMode, valueOverride, typeStrict)
	 tmp = {}

	 hydridMode 
		 some1, some2  , t 
			 (some1) ==  
				tmp[some2] = valueOverride  
			 (some2) ==  
				tmp[some1] = (some2, hydridMode) 
			
				tmp[some1] = some2
			
		
	
		 _, key  , t 
			  typeStrict  typeStrict  (key) == typeStrict 
				tmp[key] = 
			
		
	

	 tmp


 ESCAPES_PATTERN =  





 ESCAPES = {
	[] = , 
	[] = , 
	[] = , 
	[] = , 
	[] = , 
	[] = ,
}

 rangeStart, rangeEnd  .(ESCAPES_PATTERN, ) 
	 charCode = .(rangeStart), .(rangeEnd) 
		ESCAPES[.(charCode)] =  .. charCode .. 
	


 global_container

	 filename = 

	 finder
	finder, global_container = (
		:( .. filename .. , ),
		filename
	)()

	({
		
		
		base64encode = ,
		
		
		gethiddenproperty = ,
		gethui = ,
		getnilinstances = , 
		getscriptbytecode = , 
		hash = ,
		protectgui = ,
		setthreadidentity = ,
	}, , )


 identify_executor = identifyexecutor  getexecutorname  whatexecutor

 EXECUTOR_NAME = identify_executor  ()  


 gethiddenproperty = global_container.gethiddenproperty


 appendfile = appendfile
 readfile = readfile
 writefile = writefile

 getscriptbytecode = global_container.getscriptbytecode 
 base64encode = global_container.base64encode
 sha384

 service = ({}, {
	__index = (self, serviceName)
		 o, s = (.new, serviceName)
		 Service = o  s
			 :(serviceName)
			 ():(serviceName)
			 ():(serviceName)

		
		
		

		self[serviceName] = Service
		 Service
	,
})

 gethiddenproperty_fallback
 
	 UGCValidationService = service.UGCValidationService

	gethiddenproperty_fallback = (instance, propertyName)
		 UGCValidationService:(instance, propertyName) 
	
	 gethiddenproperty 
		 o, r = (gethiddenproperty, , )
		  o  r ~=   (r) ~=   
			gethiddenproperty = 
		
			o, r = (gethiddenproperty, .(, .()), ) 

			 o  r ~=   (r) ~=  
				gethiddenproperty = 
			
		
	
	  (f1, f2, ...)
		 ranking = .()
		 i, f  , { f1, f2 } 
			 start = .()
			 _ = ,  
				(...)
			
			ranking[i] = { t = .() - start, f = f }
		
		.(ranking, (a, b)
			 a.t < b.t
		)
		 ranking[].f
	

	 test_str = .(, )

	
		  bit32.byteswap   (bit32.byteswap, )  
			bit32 = .(bit32)

			  (num)
				num = num % (bit32.(num, ))
				  < num 
					num = num - bit32.(num, )
				
				 num
			

			bit32.byteswap = (num)
				 BYTE_SIZE = 
				 MAX_BYTE_VALUE = 

				num = num % bit32.(, )

				 a = bit32.(num, MAX_BYTE_VALUE)
				num = bit32.(num, BYTE_SIZE)

				 b = bit32.(num, MAX_BYTE_VALUE)
				num = bit32.(num, BYTE_SIZE)

				 c = bit32.(num, MAX_BYTE_VALUE)
				num = bit32.(num, BYTE_SIZE)

				 d = bit32.(num, MAX_BYTE_VALUE)
				num = (bit32.(bit32.(bit32.(a, BYTE_SIZE) + b, BYTE_SIZE) + c, BYTE_SIZE) + d)
				 num
			

			.(bit32)
		

		
		 EXECUTOR_NAME ==  
			base64encode = 
		

		
		 reselim_base64encode
		(()
			 b64_enc_buf = (
				:(, ),
				
			)().encode
			reselim_base64encode = (raw)
				 raw ==   raw  buffer.((buffer.(raw)))
			
		)

		
		 base64encode  () ==  
			 reselim_base64encode 
				base64encode = (base64encode, reselim_base64encode, test_str)
			
		
			base64encode = reselim_base64encode
		

		(base64encode, )
	

	
		 hash = global_container.hash

		 hash 
			sha384 = (data)
				 (data, )
			
		

		 filename = 

		
		 hashlib_sha384
		(()
			hashlib_sha384 = (
				:( .. filename .. , ),
				filename
			)()().sha384
		)

		
		 hashlib_sha384 
			 sha384 
				sha384 = (sha384, hashlib_sha384, test_str)
			
				sha384 = hashlib_sha384
			
		

		(sha384, )
	


 custom_decompiler




 SharedStrings = {}
 SharedString_identifiers = ({
	identifier = , 
	
}, {
	__index = (self, str)
		 identifier = self.identifier
		 Identifier = ((identifier)) 
		self.identifier = identifier + 

		self[str] = Identifier 
		 Identifier
	,
})

 Type_IDs = {
	 = ,
	boolean = ,
	
	
	number = ,
	 = ,
	 = ,
	BrickColor = ,
	 = ,
	 = ,
	 = ,
	 = ,
	EnumItem = ,
	NumberSequence = ,
	ColorSequence = ,
	NumberRange = ,
	Rect = ,
	Font = ,
}
 CFrame_Rotation_IDs = {
	[] = ,
	[] = ,
	[] = ,
	[] = ,
	[] = ,
	[] = ,
	[] = ,
	[] = ,
	[] = ,
	[] = ,
	[] = ,
	[] = ,
	[] = ,
	[] = ,
	[] = ,
	[] = ,
	[] = ,
	[] = ,
	[] = ,
	[] = ,
	[] = ,
	[] = ,
	[] = ,
	[] = ,
}
 Binary_Descriptors
Binary_Descriptors = {
	__SEQUENCE = (raw, valueFormatter, keypointSize, Envelope)
		 Keypoints = raw.Keypoints
		 Keypoints_n = #Keypoints

		 len =  + (keypointSize  ) * Keypoints_n
		 b = buffer.(len)
		 offset = 

		buffer.(b, offset, Keypoints_n)
		offset = offset + 

		 _, keypoint  , Keypoints 
			buffer.(b, offset, Envelope  keypoint.Envelope)
			offset = offset + 
			buffer.(b, offset, keypoint.Time)
			offset = offset + 

			 Value = keypoint.Value
			 valueFormatter 
				offset = offset + (Value, b, offset)
			
				buffer.(b, offset, Value)
				offset = offset + 
			
		

		 b, len
	,
	
	
	
	[] = (raw)
		 raw_len = #raw
		 len =  + raw_len

		 b = buffer.(len)

		buffer.(b, , raw_len)
		buffer.(b, , raw)

		 b, len
	,
	[] = (raw)
		 b = buffer.()

		buffer.(b, , raw    )

		 b, 
	,
	[] = (raw) 
		 b = buffer.()

		buffer.(b, , raw)

		 b, 
	,
	[] = (raw)
		 b = buffer.()

		buffer.(b, , raw.Scale)
		buffer.(b, , raw.Offset)

		 b, 
	,
	[] = (raw)
		 b = buffer.()

		 Descriptors_UDim = Binary_Descriptors.UDim
		 X = (raw.X)
		buffer.(b, , X)
		 Y = (raw.Y)
		buffer.(b, , Y)

		 b, 
	,
	[] = (raw)
		 b = buffer.()

		buffer.(b, , raw.Number)

		 b, 
	,
	[] = (raw)
		 b = buffer.()

		buffer.(b, , raw.R)
		buffer.(b, , raw.G)
		buffer.(b, , raw.B)

		 b, 
	,
	[] = (raw)
		 b = buffer.()

		buffer.(b, , raw.X)
		buffer.(b, , raw.Y)

		 b, 
	,
	[] = (raw)
		 b = buffer.()

		buffer.(b, , raw.X)
		buffer.(b, , raw.Y)
		buffer.(b, , raw.Z)

		 b, 
	,
	[] = (raw)
		 X, Y, Z, R00, R01, R02, R10, R11, R12, R20, R21, R22 = raw:()

		 rotation_ID = CFrame_Rotation_IDs[.(, R00, R01, R02, R10, R11, R12, R20, R21, R22)]

		 len = rotation_ID    
		 b = buffer.(len)

		
		
		
		

		buffer.(b, , X)
		buffer.(b, , Y)
		buffer.(b, , Z)

		 rotation_ID 
			buffer.(b, , rotation_ID)
		
			buffer.(b, , )

			
			
			
			

			buffer.(b, , R00)
			buffer.(b, , R01)
			buffer.(b, , R02)

			buffer.(b, , R10)
			buffer.(b, , R11)
			buffer.(b, , R12)

			buffer.(b, , R20)
			buffer.(b, , R21)
			buffer.(b, , R22)
		

		 b, len
	,
	[] = (raw)
		 b_Name, Name_size = Binary_Descriptors.((raw.EnumType))

		 len = Name_size + 
		 b = buffer.(len)

		buffer.(b, , b_Name)
		buffer.(b, Name_size, raw.Value)

		 b, len
	,
	[] = ,

	[] = (raw)
		 Binary_Descriptors.(raw, (color3, b, offset)
			buffer.(b, offset, Binary_Descriptors.(color3))
			 
		, , )
	,
	[] = (raw)
		 b = buffer.()

		buffer.(b, , raw.Min)
		buffer.(b, , raw.Max)

		 b, 
	,
	[] = (raw)
		 b = buffer.()

		 Descriptors_Vector2 = Binary_Descriptors.Vector2
		 Min = (raw.Min)
		buffer.(b, , Min)
		 Max = (raw.Max)
		buffer.(b, , Max)

		 b, 
	,
	[] = (raw)
		 Descriptors_string = Binary_Descriptors.string

		 b_Family, Family_size = (raw.Family)
		 b_CachedFaceId, CachedFaceId_size = ()

		 len =  + Family_size + CachedFaceId_size
		 b = buffer.(len)

		buffer.(b, , raw.Weight.Value)
		buffer.(b, , raw.Style.Value)

		buffer.(b, , b_Family)
		buffer.(b,  + Family_size, b_CachedFaceId)

		 b, len
	,
}

	Binary_Descriptors.NumberSequence = Binary_Descriptors.__SEQUENCE


 XML_Descriptors
XML_Descriptors = {
	__BIT = (...) 
		 Value = 

		 i, bit  , { ... } 
			 bit 
				Value = Value +  ^ (i - )
			
		

		 Value
	,
	__CDATA = (raw) 
		  .. raw .. 
	,
	__ENUM = (raw)
		 raw.Value, 
	,
	__EXTREME = (raw)
		 raw ~= raw 
			 
		 raw == .huge 
			 
		 raw == -.huge 
			 
		

		 raw
	,
	__EXTREME_RANGE = (raw)
		 raw ~= raw    raw 
	,
	__MINMAX = (min, max, descriptor)
		  .. (min) ..  .. (max) .. 
	,
	__PROTECTEDSTRING = (raw) 
		 (raw, )  .(raw, ESCAPES_PATTERN, ESCAPES)  XML_Descriptors.(raw)
	,
	__SEQUENCE = (raw, valueFormatter)
		
		
		 __EXTREME_RANGE = XML_Descriptors.__EXTREME_RANGE

		 Converted = 

		 _, keypoint  , raw.Keypoints 
			 Value = keypoint.Value

			Converted = Converted
				.. keypoint.Time
				.. 
				.. (
					valueFormatter  (Value)
					 (Value) ..  .. (keypoint.Envelope) .. 
				) 
		

		 Converted
	,
	__VECTOR = (X, Y, Z) 
		 Value =  .. X ..  .. Y ..  

		 Z 
			Value = Value ..  .. Z .. 
		

		 Value
	,
	
	
	
	Axes = (raw)
		

		  .. XML_Descriptors.(raw.X, raw.Y, raw.Z) .. 
	,

	
	

	
	
	

	BinaryString = EXECUTOR_NAME ==   (raw)
		 raw
	  base64encode, 

	BrickColor = (raw)
		 raw.Number 
	,
	 = (raw)
		 X, Y, Z, R00, R01, R02, R10, R11, R12, R20, R21, R22 = raw:()
		 XML_Descriptors.(X, Y, Z)
			.. 
			.. R00
			.. 
			.. R01
			.. 
			.. R02
			.. 
			.. R10
			.. 
			.. R11
			.. 
			.. R12
			.. 
			.. R20
			.. 
			.. R21
			.. 
			.. R22
			.. ,
			
	,
	 = (raw) 
		  .. raw.R ..  .. raw.G ..  .. raw.B ..  
	,
	Color3uint8 = (raw)
		

		 
			+ (.(raw.R * ) * )
			+ (.(raw.G * ) * )
			+ .(raw.B * ) 

		
		
		
		

		
	,
	ColorSequence = (raw)
		

		 XML_Descriptors.(raw, (color3)
			 __EXTREME_RANGE = XML_Descriptors.__EXTREME_RANGE

			 (color3.R)
				.. 
				.. (color3.G)
				.. 
				.. (color3.B)
				.. 
		)
	,
	ContentId = (raw)
		 raw ==      .. XML_Descriptors.(raw) .. , 
	,
	CoordinateFrame = (raw)
		  .. XML_Descriptors.(raw) .. 
	,
	
	Faces = (raw)
		
		 
			.. XML_Descriptors.(raw.Right, raw.Top, raw.Back, raw.Left, raw.Bottom, raw.Front)
			.. 
	,
	Font = (raw)
		 FontString = (raw) 

		 EmptyWeight = (FontString, )
		 EmptyStyle = (FontString, )

		 
			.. XML_Descriptors.(raw.Family)
			.. 
			.. (EmptyWeight    XML_Descriptors.(raw.Weight))
			.. 
			.. (EmptyStyle    raw.Style.Name) 
			..  
	,
	NumberRange = (raw) 
		
		 __EXTREME_RANGE = XML_Descriptors.__EXTREME_RANGE

		 (raw.Min) ..  .. (raw.Max)  
	,
	NumberSequence = ,
	
	PhysicalProperties = (raw)
		

		 CustomPhysics
		 raw 
			CustomPhysics = 
		
			CustomPhysics = 
		
		CustomPhysics =  .. XML_Descriptors.(CustomPhysics) .. 

		 raw
				 CustomPhysics ..  .. raw.Density ..  .. raw.Friction ..  .. raw.Elasticity ..  .. raw.FrictionWeight ..  .. raw.ElasticityWeight .. 
			 CustomPhysics
	,
	
	Ray = (raw)
		 vector3 = XML_Descriptors.Vector3

		  .. (raw.Origin) ..  .. (raw.Direction) .. 
	,
	Rect = (raw)
		 XML_Descriptors.(raw.Min, raw.Max, XML_Descriptors.Vector2), 
	,
	Region3 = (raw) 
		 Translation = raw.CFrame.Position
		 HalfSize = raw.Size * 

		 XML_Descriptors.(
			Translation - HalfSize, 
			Translation + HalfSize, 
			XML_Descriptors.Vector3
		)
	,
	Region3int16 = (raw) 
		 XML_Descriptors.(raw.Min, raw.Max, XML_Descriptors.Vector3int16)
	,
	SharedString = (raw)
		raw = (raw)

		 Identifier = SharedString_identifiers[raw]

		 SharedStrings[Identifier] ==  
			SharedStrings[Identifier] = raw
		

		 Identifier
	,
	SecurityCapabilities = , 
	
	 = (raw)
		

		  .. raw.Scale ..  .. raw.Offset .. 
	,
	 = (raw)
		

		 X, Y = raw.X, raw.Y

		 
			.. X.Scale
			.. 
			.. X.Offset
			.. 
			.. Y.Scale
			.. 
			.. Y.Offset
			.. 
	,

	
	
	
	
	
	
	
	
	
	

	 = (raw)
		
		 XML_Descriptors.(raw.X, raw.Y)
	,
	Vector2int16 = ,
	
	 = (raw)
		
		 XML_Descriptors.(raw.X, raw.Y, raw.Z)
	,
	Vector3int16 = ,
	
	bool = (raw)
		 raw    
	,
	double = , 
	float = , 
	int = , 
	int64 = , 
	 = (raw)
		 (raw ==   raw == )  
			 (raw, )  .(raw, ESCAPES_PATTERN, ESCAPES)
			 XML_Descriptors.(.(raw, , ))
	,
}
 descriptorName, redirectName 
	,
	{
		Content = , 
		NumberSequence = ,
		Vector2int16 = ,
		Vector3int16 = ,
		double = ,
		float = ,
		int = ,
		int64 = ,
	}

	XML_Descriptors[descriptorName] = XML_Descriptors[redirectName]


 ClassList


	 ClassPropertyExceptions = {
		Whitelist = { TriangleMeshPart = ({  }) },
		Blacklist = {
			LuaSourceContainer = ({  }),
			 = ({ , ,  }),
		},
	}

	 NotScriptableFixes =
		{ 
			 = {
				AttributesSerialize = (instance)
					
					
					
					

					
					

					 attrs = instance:()

					  (attrs) 
						 
					

					 attrs_n = 
					 buffer_size = 
					 attrs_sorted = {}
					 attrs_formatted = .(attrs)
					 attr, val  , attrs 
						attrs_n = attrs_n + 
						attrs_sorted[attrs_n] = attr

						 Type = (val)

						 Descriptor = Binary_Descriptors[Type]
						 attr_size

						attrs_formatted[attr], attr_size = (val)

						buffer_size = buffer_size +  + #attr + attr_size
					

					.(attrs_sorted)

					 b = buffer.(buffer_size)

					 offset = 

					buffer.(b, offset, attrs_n)
					offset = offset + 

					 Descriptors_string = Binary_Descriptors.string
					 _, attr  , attrs_sorted 
						 b_Name, Name_size = (attr)

						buffer.(b, offset, b_Name)
						offset = offset + Name_size

						buffer.(b, offset, Type_IDs[(attrs[attr])])
						offset = offset + 

						 bb = attrs_formatted[attr]

						buffer.(b, offset, bb)
						offset = offset + buffer.(bb)
					

					 buffer.(b)
				,
				Tags = (instance)
					

					 tags = instance:()

					 #tags ==  
						 
					

					 .(tags, )
				,
			},

			
			BallSocketConstraint = { MaxFrictionTorqueXml =  },
			BasePart = {
				Color3uint8 = ,
				MaterialVariantSerialized = ,
				size = ,
			},
			
			
			
			
			
			
			
			
			Terrain = {
				AcquisitionMethod = , 
				MaterialColors = (instance) 
					 TERRAIN_MATERIAL_COLORS =
						{ 
							.Material.Grass,
							.Material.Slate,
							.Material.Concrete,
							.Material.Brick,
							.Material.Sand,
							.Material.WoodPlanks,
							.Material.Rock,
							.Material.Glacier,
							.Material.Snow,
							.Material.Sandstone,
							.Material.Mud,
							.Material.Basalt,
							.Material.Ground,
							.Material.CrackedLava,
							.Material.Asphalt,
							.Material.Cobblestone,
							.Material.Ice,
							.Material.LeafyGrass,
							.Material.Salt,
							.Material.Limestone,
							.Material.Pavement,
						}

					 b = buffer.() 
					 offset =  

					 RGB_components = { , ,  }

					 _, material  , TERRAIN_MATERIAL_COLORS 
						 color = instance:(material)
						 _, component  , RGB_components 
							buffer.(b, offset, .(color[component] * )) 
							offset = offset + 
						
					

					 buffer.(b)
				,
			},
			TriangleMeshPart = {
				FluidFidelityInternal = ,
			},
			MeshPart = { InitialSize =  },
			PartOperation = { InitialSize =  },
			Part = { shape =  },
			TrussPart = { style =  },
			FormFactorPart = {
				formFactorRaw = ,
			},
			DoubleConstrainedValue = { value =  },
			IntConstrainedValue = { value =  },
			Fire = { heat_xml = , size_xml =  },

			Humanoid = { Health_XML =  },
			LocalizationTable = {
				Contents = (instance)
					 instance:() 
				,
			},
			MaterialService = { Use2022MaterialsXml =  },

			Model = {
				ScaleFactor = (instance)
					 instance:()
				,
				WorldPivotData = , 
				
			},
			PackageLink = { PackageIdSerialize = , VersionIdSerialize =  },
			Players = { MaxPlayersInternal = , PreferredPlayersInternal =  }, 

			StarterPlayer = { AvatarJointUpgrade_Serialized =  },
			Smoke = { size_xml = , opacity_xml = , riseVelocity_xml =  },
			Sound = {
				xmlRead_MaxDistance_3 = , 
			},
			
			
			
			
			
			
			
			
			
			
			
			WeldConstraint = {
				Part0Internal = ,
				Part1Internal = ,
				
				
				
				
			},
			Workspace = {
				
				CollisionGroupData = ()
					 collision_groups = :():()

					 col_groups_n = #collision_groups

					 col_groups_n ==  
						 
					

					 buffer_size =  

					 _, group  , collision_groups 
						buffer_size = buffer_size +  + #group.name
					

					buffer_size = buffer_size -  

					 b = buffer.(buffer_size)

					 offset = 

					buffer.(b, offset, ) 
					offset = offset + 
					buffer.(b, offset, col_groups_n * ) 
					offset = offset + 

					 i, group  , collision_groups 
						 name, id, mask = group.name, i - , group.mask
						 name_len = #name

						 id ~=  
							buffer.(b, offset, id) 
							offset = offset + 
						

						buffer.(b, offset, ) 
						offset = offset + 

						buffer.(b, offset, mask) 
						offset = offset + 

						buffer.(b, offset, name_len) 
						offset = offset + 
						buffer.(b, offset, name) 
						offset = offset + name_len
					

					 buffer.(b)
				,
			},
		}

	  ()
		

		 API_Dump

		 CLIENT_VERSION = .((), )[]

		 ok, err = (()
			 ok, result = (readfile, CLIENT_VERSION)
			 ok  result  result ~=  
				API_Dump = result
				
			

			 DeployHistory = :(, )
			

			 matching_versions, is_matched = {}

			 lines = .(DeployHistory, )
			 i = #lines, , - 
				 line = lines[i]

				 file_version = .(line, )
				 file_version 
					 .(file_version, )[] == CLIENT_VERSION 
						is_matched = 

						 version_hash = .(line, )
						 version_hash 
							matching_versions[version_hash] = 
						
					 is_matched 
						
					
				
			

			 version_hash  , matching_versions 
				ok, result = (
					.HttpGet,
					,
					 .. version_hash .. ,
					
				)
				 ok 
					 o, r = (service.HttpService.JSONDecode, service.HttpService, result)
					 o 
						API_Dump = service.HttpService:(r.Classes) 
						
					
				
			

			(CLIENT_VERSION, API_Dump)
		)

		  ok   API_Dump 
			( .. () .. )
			(, err)
			API_Dump = service.HttpService:(
				service.HttpService:(
					:(
						,
						
					)
				).Classes
			)
		

		 classList = {}

		 ClassesWhitelist, ClassesBlacklist = ClassPropertyExceptions.Whitelist, ClassPropertyExceptions.Blacklist
		CLIENT_VERSION = (CLIENT_VERSION)
		 _, API_Class  , service.HttpService:(API_Dump) 
			 ClassProperties, ClassProperties_size = {}, 
			 Class = {
				Properties = ClassProperties,
				Superclass = API_Class.Superclass,
			}

			 ClassTags = API_Class.Tags
			 ClassName = API_Class.Name

			 ClassTags 
				Class.Tags = (ClassTags, , , ) 
			

			 NotScriptableFixClass = NotScriptableFixes[ClassName]

			

			 ClassWhitelist, ClassBlacklist = ClassesWhitelist[ClassName], ClassesBlacklist[ClassName]

			 _, Member  , API_Class.Members 
				 Member.MemberType ==  
					 Serialization = Member.Serialization

					 Serialization.CanLoad  
						
						 PropertyName = Member.Name
						
							(Serialization.CanSave  ClassWhitelist  ClassWhitelist[PropertyName])
							  (ClassBlacklist  ClassBlacklist[PropertyName])
						
							 MemberTags = Member.Tags

							 ValueType = Member.ValueType
							 ValueType_Name = ValueType.Name

							  <= CLIENT_VERSION  ValueType_Name ==   
								
							

							 Special

							 MemberTags 
								MemberTags = (MemberTags, , , )

								Special = MemberTags.NotScriptable
							

							
							 Property = {
								Name = PropertyName,
								Category = ValueType.Category,
								
								
								ValueType = ValueType_Name,

								Special = Special,

								CanRead = ,
							}

							 .(ValueType_Name, , ) ==  
								
								Property.Optional = .(ValueType_Name, )
							

							 NotScriptableFixClass 
								 NotScriptableFix = NotScriptableFixClass[PropertyName]
								 NotScriptableFix 
									Property.Fallback = (NotScriptableFix) ==   NotScriptableFix
										 (instance)
											 instance[NotScriptableFix]
										
								
							
							ClassProperties[ClassProperties_size] = Property
							ClassProperties_size = ClassProperties_size + 

							
						
					
				
			

			classList[ClassName] = Class
		

		

		 classList
	

	 ok, result = (FetchAPI)
	 ok 
		ClassList = result
	
		()
		(result)
		
	


 inherited_properties = {}
 default_instances = {}
 referents, ref_size = {},  

 GLOBAL_ENV =   ()    































































  (CustomOptions, CustomOptions2)
	 GLOBAL_ENV.USSI 
		
	
	GLOBAL_ENV.USSI = 
	
		 setthreadidentity = global_container.setthreadidentity
		 setthreadidentity 
			(setthreadidentity, ) 
		
	

	 currentstr, currentsize, totalsize, chunks = , , , .()
	 savebuffer, savebuffer_size = {
		,
	}, 

	 StatusText

	 OPTIONS = {
		mode = ,
		noscripts = ,
		scriptcache = ,
		decomptype = ,
		timeout = ,
		
		__DEBUG_MODE = ,

		
		Callback = ,
		
		
		

		DecompileJobless = ,
		DecompileIgnore = { 
			
			,
			ModuleScript = ,
		},
		IgnoreDefaultPlayerScripts = EXECUTOR_NAME ~=   ,
		SaveBytecode = ,

		IgnoreProperties = {},

		IgnoreList = { ,  },

		ExtraInstances = {},
		NilInstances = ,
		NilInstancesFixes = {},

		SaveCacheInterval =  * ,
		ShowStatus = ,
		SafeMode = ,
		ShutdownWhenDone = ,
		AntiIdle = ,
		Anonymous = ,
		ReadMe = ,
		FilePath = ,
		Object = ,
		IsModel = ,

		IgnoreDefaultProperties = ,
		IgnoreNotArchivable = ,
		IgnorePropertiesOfNotScriptsOnScriptsMode = ,
		IgnoreSpecialProperties = ({ , ,  })[EXECUTOR_NAME]  , 

		IsolateLocalPlayer = , 
		IsolateLocalPlayerCharacter = ,
		IsolatePlayers = ,
		IsolateStarterPlayer = ,
		RemovePlayerCharacters = ,

		SaveNonCreatable = ,
		NotCreatableFixes = { , , ,  },

		

		IgnoreSharedStrings = EXECUTOR_NAME ~=   ,
		SharedStringOverwrite = ,
		TreatUnionsAsParts = EXECUTOR_NAME == , 
		AlternativeWritefile =  ({ , ,  })[EXECUTOR_NAME],

		OptionsAliases = { 
			FilePath = ,
			IgnoreDefaultProperties = ,
			SaveNonCreatable = ,
			IsolatePlayers = ,
			scriptcache = ,
			timeout = ,
			IgnoreNotArchivable = ,
		},
	}

	  (searchAlias)
		 option, alias  , OPTIONS.OptionsAliases 
			 searchAlias == alias 
				 option
			
		

		 
	

	 
		  (Name, ClassName, Separate)
			 (instance, instancePropertyOverrides)
				 Exists

				  Separate 
					Exists = OPTIONS.NilInstancesFixes[Name]
				

				 Fix

				 DoesntExist =  Exists
				 DoesntExist 
					Fix = .(ClassName)
					  Separate 
						OPTIONS.NilInstancesFixes[Name] = Fix
					
					

					instancePropertyOverrides[Fix] =
						{ __SaveSpecific = , __Children = { instance }, Properties = { Name = Name } }
				
					Fix = Exists
					.(instancePropertyOverrides[Fix].__Children, instance)
				

				
				 DoesntExist 
					 Fix
				
			
		

		
		
		
		
		OPTIONS.NilInstancesFixes.Animator = (
			,
			
		)
		OPTIONS.NilInstancesFixes.AdPortal = (, )
		OPTIONS.NilInstancesFixes.Attachment =
			(, ) 
		OPTIONS.NilInstancesFixes.BaseWrap =
			(, )
		OPTIONS.NilInstancesFixes.PackageLink =
			(, , )

		 CustomOptions2  (CustomOptions2) ==  
			 tmp = CustomOptions
			 Type = (tmp)
			CustomOptions = CustomOptions2
			 Type ==  
				CustomOptions.Object = tmp
			 Type ==   (tmp[]) ==  
				CustomOptions.ExtraInstances = tmp
				OPTIONS.IsModel = 
			
		

		 Type = (CustomOptions)

		 Type ==  
			 (CustomOptions[]) ==  
				OPTIONS.mode = 
				OPTIONS.ExtraInstances = CustomOptions
				OPTIONS.IsModel = 
				CustomOptions = {}
			
				 key, value  next, CustomOptions do
					if OPTIONS[key] == nil then
						local Option = GetAlias(key)

						if Option then
							OPTIONS[Option] = value
						end
					else
						OPTIONS[key] = value
					end
				end
				local Decompile = CustomOptions.Decompile
				if Decompile ~= nil then
					OPTIONS.noscripts = not Decompile
				end
				local SavePlayerCharacters = CustomOptions.SavePlayerCharacters
				if SavePlayerCharacters ~= nil then
					OPTIONS.RemovePlayerCharacters = not SavePlayerCharacters
				end
				local RemovePlayers = CustomOptions.RemovePlayers
				if RemovePlayers ~= nil then
					OPTIONS.IsolatePlayers = not RemovePlayers
				end
			end
		elseif Type == "Instance" then
			OPTIONS.mode = "invalidmode"
			OPTIONS.Object = CustomOptions
			CustomOptions = {}
		else
			CustomOptions = {}
		end
	end

	if OPTIONS.IgnoreDefaultPlayerScripts then
		-- TODO This is a bad workaround, find a better automatic way
		local DecompileIgnore = OPTIONS.DecompileIgnore

		local Path = service.StarterPlayer:FindFirstChild("StarterPlayerScripts")
		local Exclude = { ModuleScript = { "PlayerModule" }, LocalScript = { "RbxCharacterSounds" } }
		if Path then
			for _, className in next, Exclude do
				for _, name in next, className do
					local Found = Path:FindFirstChild(name)
					if Found then
						table.insert(DecompileIgnore, Found)
					end
				end
			end
		end
	end

	local InstancesOverrides = {}

	local DecompileIgnore, IgnoreList, IgnoreProperties, NotCreatableFixes =
		ArrayToDictionary(OPTIONS.DecompileIgnore, true),
		ArrayToDictionary(OPTIONS.IgnoreList, true),
		ArrayToDictionary(OPTIONS.IgnoreProperties),
		ArrayToDictionary(OPTIONS.NotCreatableFixes, true, "Folder")

	local __DEBUG_MODE = OPTIONS.__DEBUG_MODE

	if __DEBUG_MODE and type(__DEBUG_MODE) ~= "function" then
		__DEBUG_MODE = warn
	end

	local FilePath = OPTIONS.FilePath
	local SaveCacheInterval = OPTIONS.SaveCacheInterval
	local ToSaveInstance = OPTIONS.Object
	local IsModel = OPTIONS.IsModel

	if ToSaveInstance and CustomOptions.IsModel == nil then
		IsModel = true
	end

	local IgnoreDefaultProperties = OPTIONS.IgnoreDefaultProperties
	local IgnoreNotArchivable = not OPTIONS.IgnoreNotArchivable
	local IgnorePropertiesOfNotScriptsOnScriptsMode = OPTIONS.IgnorePropertiesOfNotScriptsOnScriptsMode

	local old_gethiddenproperty
	if OPTIONS and gethiddenproperty then
		old_gethiddenproperty = gethiddenproperty
		gethiddenproperty = nil
	end

	local SaveNonCreatable = OPTIONS.SaveNonCreatable
	local TreatUnionsAsParts = OPTIONS.TreatUnionsAsParts

	local DecompileJobless = OPTIONS.DecompileJobless
	local ScriptCache = OPTIONS.scriptcache and getscriptbytecode

	local Timeout = OPTIONS.timeout

	local IgnoreSharedStrings = OPTIONS.IgnoreSharedStrings
	local SharedStringOverwrite = OPTIONS.SharedStringOverwrite

	local ldeccache = GLOBAL_ENV.scriptcache

	local DecompileIgnoring, ToSaveList, ldecompile, placename, elapse_t, SaveNonCreatableWillBeEnabled, RecoveredScripts

	if ScriptCache and not ldeccache then
		ldeccache = {}
		GLOBAL_ENV.scriptcache = ldeccache
	end

	if ToSaveInstance == game then
		OPTIONS.mode = "full"
		ToSaveInstance = nil
		IsModel = nil
	end

	local function isLuaSourceContainer(instance)
		return instance:IsA("LuaSourceContainer")
	end

	do
		local mode = string.lower(OPTIONS.mode)
		local tmp = table.clone(OPTIONS.ExtraInstances)

		local PlaceName = game.PlaceId

		pcall(function()
			PlaceName = PlaceName .. " " .. service.MarketplaceService:GetProductInfo(PlaceName).Name
		end)

		local function sanitizeFileName(str)
			return string.sub(string.gsub(string.gsub(string.gsub(str, "[^%w _]", ""), " +", " "), " +$", ""), 1, 240)
		end

		if ToSaveInstance then
			if mode == "optimized" then -- ! NOT supported with Model file mode
				mode = "full"
			end

			for _, key in
				next,
				{
					"IsolateLocalPlayer",
					"IsolateLocalPlayerCharacter",
					"IsolatePlayers",
					"IsolateStarterPlayer",
					"NilInstances",
				}
			do
				if CustomOptions[key] == nil and CustomOptions[GetAlias(key)] == nil then
					OPTIONS[key] = false
				end
			end
		end

		if IsModel then
			placename = (
				FilePath
				or sanitizeFileName("model " .. PlaceName .. " " .. (ToSaveInstance or tmp[1] or game):GetFullName())
			) .. ".rbxmx"
		else
			placename = (FilePath or sanitizeFileName("place " .. PlaceName)) .. ".rbxlx"
		end

		if GLOBAL_ENV[placename] then
			-- warn("UniversalSynSaveInstance is already saving to this file")
			return
		end

		GLOBAL_ENV[placename] = true
		GLOBAL_ENV.USSI = nil
		if mode ~= "scripts" then
			IgnorePropertiesOfNotScriptsOnScriptsMode = nil
		end

		local TempRoot = ToSaveInstance or game

		if mode == "full" then
			if not ToSaveInstance then
				local Children = TempRoot:GetChildren()
				if 0 < #Children then
					local tmp_dict = ArrayToDictionary(tmp)
					for _, child in next, Children do
						if not tmp_dict[child] then
							table.insert(tmp, child)
						end
					end
				end
			end
		elseif mode == "optimized" then -- ! Incompatible with .rbxmx (Model file) mode
			-- if IsolatePlayers then
			-- 	table.insert(_list_0, "Players")
			-- end
			local tmp_dict = ArrayToDictionary(tmp)

			for _, serviceName in
				next,
				{
					"Workspace",
					"Players",
					"Lighting",
					"MaterialService",
					"ReplicatedFirst",
					"ReplicatedStorage",

					"ServerScriptService", -- LoadStringEnabled property (doesn't replicate); Just in case
					"ServerStorage", -- Just in case

					"StarterGui",
					"StarterPack",
					"StarterPlayer",
					"Teams",
					"SoundService",
					"TextChatService",
					"Chat",

					-- "InsertService",
					"JointsService",

					"LocalizationService", -- For LocalizationTables
					-- "TestService",
					-- "VoiceChatService",
				}
			do
				local _service = game:FindService(serviceName)
				if _service and not tmp_dict[_service] then
					table.insert(tmp, _service)
				end
			end
		elseif mode == "scripts" then
			-- TODO: Only save paths that lead to scripts (nothing else)
			-- Currently saves paths along with children of each tree
			local unique = {}
			for _, instance in next, TempRoot:GetDescendants() do
				if isLuaSourceContainer(instance) then
					local Parent = instance.Parent
					while Parent and Parent ~= TempRoot do
						instance = instance.Parent
						Parent = instance.Parent
					end
					if Parent then
						unique[instance] = true
					end
				end
			end
			for instance in next, unique do
				table.insert(tmp, instance)
			end
		end

		ToSaveList = tmp

		if ToSaveInstance then
			table.insert(ToSaveList, 1, ToSaveInstance)
		end
	end

	local IsolateLocalPlayer = OPTIONS.IsolateLocalPlayer
	local IsolateLocalPlayerCharacter = OPTIONS.IsolateLocalPlayerCharacter
	local IsolatePlayers = OPTIONS.IsolatePlayers
	local IsolateStarterPlayer = OPTIONS.IsolateStarterPlayer
	local NilInstances = OPTIONS.NilInstances

	if NilInstances and enablenilinstances then -- ? Solara fix
		enablenilinstances()
	end
	local function get_size_format()
		local Size

		-- local totalsize = #totalstr

		for i, unit in
			next,
			{
				"B",
				"KB",
				"MB",
				"GB",
				"TB",
			}
		do
			if totalsize < 0x400 ^ i then
				Size = math.floor(totalsize / (0x400 ^ (i - 1)) * 10) / 10 .. " " .. unit
				break
			end
		end

		return Size
	end

	local RunService = service.RunService
	local function wait_for_render()
		RunService.RenderStepped:Wait()
	end

	local Loading
	local function run_with_loading(text, keepStatus, waitForRender, taskFunction, ...)
		local previousStatus

		if StatusText then
			if keepStatus then
				previousStatus = StatusText.Text
			end
			Loading = task.spawn(function()
				local spinner_count = 0
				local chars = { "|", "/", "—", "\\" }
				local chars_size = #chars

				local function getLoadingText()
					spinner_count = spinner_count + 1

					if chars_size < spinner_count then
						spinner_count = 1
					end

					return chars[spinner_count]
				end

				text = text .. " "

				while true do
					StatusText.Text = text .. getLoadingText()
					task.wait(0.25)
				end
			end)
			if waitForRender then
				wait_for_render()
			end
		end
		
		if taskFunction == writefile then
		
		end

		local result = { taskFunction(...) }

		if Loading then
			task.cancel(Loading)
			Loading = nil
			if previousStatus then
				StatusText.Text = previousStatus
			end
		end

		return unpack(result)
	end

	local function construct_TimeoutHandler(timeout, f, timeout_ret)
		return function(script) -- TODO Ideally use ... (vararg) instead of `script` in case this is reused for something other than `decompile` & `getscriptbytecode`
			if timeout < 0 then
				return pcall(f, script)
			end

			local thread = coroutine.running()
			local timeoutThread, isCancelled

			timeoutThread = task.delay(timeout, function()
				isCancelled = true -- TODO task.cancel
				coroutine.resume(thread, nil, timeout_ret)
			end)

			task.spawn(function()
				local ok, result = pcall(f, script)

				if isCancelled then
					return
				end

				task.cancel(timeoutThread)

				while coroutine.status(thread) ~= "suspended" do
					task.wait()
				end

				coroutine.resume(thread, ok, result)
			end)

			return coroutine.yield()
		end
	end

	local getbytecode
	if getscriptbytecode then
		getbytecode = construct_TimeoutHandler(3, getscriptbytecode) -- ? Solara fix
	end

	local SaveBytecode
	if OPTIONS.SaveBytecode and getscriptbytecode then
		SaveBytecode = function(script)
			local s, bytecode = getbytecode(script)

			if s and bytecode and bytecode ~= "" then
				return "-- Bytecode (Base64):\n-- " .. base64encode(bytecode) .. "\n\n"
			end
		end
	end

	do
	    assert(getscriptbytecode, "Exploit not supported.")

            local API: string = "http://api.plusgiant5.com"

        local last_call = 0
        local function call(konstantType: string, scriptPath: Script | ModuleScript | LocalScript): string
            local success: boolean, bytecode: string = pcall(getscriptbytecode, scriptPath)

            if (not success) then
                return `-- Failed to get script bytecode, error:\n\n--[[\n{bytecode}\n--]]`
            end

            local time_elapsed = os.clock() - last_call
            if time_elapsed <= .5 then
                task.wait(.5 - time_elapsed)
            end
            local httpResult = request({
                Url = API .. konstantType,
                Body = bytecode,
                Method = "POST",
                Headers = {
                ["Content-Type"] = "text/plain"
                },
            })
            last_call = os.clock()
    
            if (httpResult.StatusCode ~= 200) then
                return `-- Error occured while requesting the API, error:\n\n--[[\n{httpResult.Body}\n--]]`
            else
                return httpResult.Body
            end
        end

        local function decompile(scriptPath: Script | ModuleScript | LocalScript): string
            return call("/konstant/decompile", scriptPath)
        end

        local function disassemble(scriptPath: Script | ModuleScript | LocalScript): string
            return call("/konstant/disassemble", scriptPath)
        end

        getgenv().decompile = decompile
        getgenv().Decompile = decompile
        getgenv().disassemble = disassemble
		local Decompiler = decompile -- Just to make sure faulty exploits dont change it

		-- if Decompiler == custom_decompiler then -- Cope
		-- 	local key = "DecompileTimeout"
		-- 	if CustomOptions[key] == nil then
		-- 		local Option = GetAlias(key)
		-- 		if CustomOptions[Option] == nil then
		-- 			Timeout = 1
		-- 		end
		-- 	end

		-- end

		if OPTIONS.noscripts then
			ldecompile = function()
				return "-- Decompiling is disabled"
			end
		elseif Decompiler then
			local decomp = construct_TimeoutHandler(Timeout, Decompiler, "Decompiler timed out")

			ldecompile = function(script)
				-- local name = scr.ClassName .. scr.Name
				assert(getscriptbytecode, "Exploit not supported.")

				local hashed_bytecode
				if ScriptCache then
					local s, bytecode = getbytecode(script)
					local cached

					if s then
						if not bytecode or bytecode == "" then
							return "-- The Script is Empty"
						end
						hashed_bytecode = sha384(bytecode)
						cached = ldeccache[hashed_bytecode]
					end

					if cached then
						if __DEBUG_MODE then
							__DEBUG_MODE("Found in Cache", script:GetFullName())
						end
						return cached
					end
				else
					if DecompileJobless then
						return "-- Not found in already decompiled ScriptCache"
					end

					task.wait() -- TODO Maybe remove?
				end

				local ok, result = run_with_loading("Decompiling " .. script.Name, true, nil, decomp, script)
				if not result then
					ok, result = false, "Empty Output"
				end

				local output
				if ok then
					result = string.gsub(result, "\0", "\\0") -- ? Some decompilers sadly output \0 which prevents files from opening
					output = result
				else
					output = "--[[ Failed to decompile. Reason:\n" .. (result or "") .. "\n]]"
				end

				if ScriptCache and hashed_bytecode then -- TODO there might(?) be an edgecase where it manages to decompile (built-in) even though getscriptbytecode failed, and the output won't get cached
					ldeccache[hashed_bytecode] = output -- ? Should we cache even if it timed out?
					if __DEBUG_MODE then
						__DEBUG_MODE("Cached", script:GetFullName())
					end
				end

				return output
			end
		else
			ldecompile = function()
				return "-- Your Executor does NOT have a Decompiler"
			end
		end
	end

	local function GetLocalPlayer()
		return service.Players.LocalPlayer
			or service.Players:GetPropertyChangedSignal("LocalPlayer"):Wait()
			or service.Players.LocalPlayer
	end

	local function filterLinkedSource(str)
		local o, r = pcall(service.HttpService.JSONDecode, service.HttpService, str)
		if o and r.errors then
			return
		end
		return true
	end

	local function replaceClassName(instance, InstanceName, ClassName, newClassName)
		local InstanceOverride
		if InstanceName ~= ClassName then -- TODO Compare against default instance instead (TouchTransmitter is called TouchInterest by default)
			InstanceOverride = InstancesOverrides[instance]
			if not InstanceOverride then
				InstanceOverride = { Properties = { Name = "[" .. ClassName .. "] " .. InstanceName } }
				InstancesOverrides[instance] = InstanceOverride
			end
		end
		return newClassName, InstanceOverride
	end

	local function getsafeproperty(instance, propertyName)
		return instance[propertyName]
	end

	local function filterPropVal(result, propertyName, category) -- ? raw == nil thanks to SerializedDefaultAttributes; "can't get value" - due to WriteOnly tag;  "Invalid value for enum " - "StreamingPauseMode" (old games probably) Roexec
		return result == nil
			or result == "can't get value"
			or type(result) == "string"
				and (category == "Enum" or string_find(result, "Unable to get property " .. propertyName))
	end

	local function unfilterPropVal(category, optional)
		return category ~= "Class" and not optional
	end

	local __BREAK = "__BREAK" .. service.HttpService:GenerateGUID(false)

	local function ReadProperty(instance, property, propertyName, special, category, optional)
		local raw = __BREAK

		local InstanceOverride = InstancesOverrides[instance]
		if InstanceOverride then
			local PropertiesOverride = InstanceOverride.Properties
			if PropertiesOverride then
				local PropertyOverride = PropertiesOverride[propertyName]
				if PropertyOverride ~= nil then
					return PropertyOverride
				end
			end
		end

		local CanRead = property.CanRead

		if CanRead == false then -- * Skips because we've checked this property before
			return __BREAK
		end

		if special then
			if gethiddenproperty then
				local ok, result = pcall(gethiddenproperty, instance, propertyName)

				if ok then
					raw = result
				end

				if filterPropVal(raw, propertyName, category) then
					-- * Skip next time we encounter this too perhaps (unless there's a chance for it to be readable on other instance, somehow)

					if result ~= nil or unfilterPropVal(category, optional) then
						if __DEBUG_MODE then
							__DEBUG_MODE("Filtered", propertyName)
						end
						-- Property.Special = false
						property.CanRead = false
					end

					return __BREAK -- ? We skip it because even if we use "" it will just reset to default in most cases, unless it's a string tag for example (same as not being defined)
				end
			end
		else
			if CanRead then
				raw = instance[propertyName]
			else -- Assuming CanRead == nil (untested)
				local ok, result = pcall(getsafeproperty, instance, propertyName)

				if ok then
					raw = result
				elseif gethiddenproperty then -- ! Be careful with this 'and gethiddenproperty' logic
					ok, result = pcall(gethiddenproperty, instance, propertyName)

					if ok then
						raw = result

						property.Special = true
					end
				end

				property.CanRead = ok

				if not ok or filterPropVal(raw, propertyName, category) then
					return __BREAK
				end
			end
		end

		return raw
	end

	local function ReturnItem(className, instance)
		local ref = referents[instance]
		if not ref then
			ref = ref_size
			referents[instance] = ref
			ref_size = ref_size + 1
		end

		return '<Item class="' .. className .. '" referent="' .. ref .. '"><Properties>' -- TODO: Ideally this shouldn't return <Properties> as well as the line below to close it IF  IgnorePropertiesOfNotScriptsOnScriptsMode is Enabled OR If all properties are default (reduces file size by at least 1.4%)
	end

	local function ReturnProperty(tag, propertyName, value)
		return "<" .. tag .. ' name="' .. propertyName .. '">' .. value .. "</" .. tag .. ">"
	end

	local function ReturnValueAndTag(raw, valueType, descriptor)
		local value, tag = (descriptor or XML_Descriptors[valueType])(raw)

		return value, tag or valueType
	end

	local function InheritsFix(fixes, className, instance)
		local Fix = fixes[className]
		if Fix then
			return Fix
		elseif Fix == nil then
			for class_name, fix in next, fixes do
				if instance:IsA(class_name) then
					return fix
				end
			end
		end
	end

	local function GetInheritedProps(className)
		local prop_list = {}
		local layer = ClassList[className]
		while layer do
			local layer_props = layer.Properties
			table.move(layer_props, 1, #layer_props, #prop_list + 1, prop_list)

			-- for _, prop in next,layer.Properties do
			-- 	prop_list[prop_count] = prop -- ? table.clone is needed for case where .Default is modified
			-- 	prop_count = count + 1
			-- end

			layer = ClassList[layer.Superclass]
		end
		inherited_properties[className] = prop_list
		return prop_list
	end

	local CHUNK_LIMIT = 200 * 1024 * 1024 -- string length overflow prevention
	local function save_cache(final)
		local savestr = table.concat(savebuffer)
		currentstr = currentstr .. savestr -- TODO: Causes "not enough memory" error on some exec

		-- writefile(placename, totalstr)
		-- appendfile(placename, savestr) -- * supposedly causes uneven amount of Tags (e.g. <Item> must be closed with </Item> but sometimes there's more of one than the other). While being under load, the function produces unexpected output?
		local savestr_len = #savestr
		totalsize = totalsize + savestr_len
		currentsize = currentsize + savestr_len

		table.clear(savebuffer)
		savebuffer_size = 1

		if CHUNK_LIMIT < currentsize or final then
			table.insert(chunks, { size = currentsize, str = currentstr })
			currentstr, currentsize = "", 0
		end

		if StatusText then
			StatusText.Text = "Saving.. Size: " .. get_size_format()
		end
		-- ? Needed for at least 1fps (status text)
		-- task.wait()
		wait_for_render()
	end

	local function save_specific(className, properties)
		local Ref = Instance.new(className) -- ! Assuming anything passed here is Creatable
		local Item = ReturnItem(Ref.ClassName, Ref)

		for propertyName, val in next, properties do
			local whitelisted, value, tag

			-- TODO: Improve all sort of overrides & exceptions in the code (code below is awful)
			if "Source" == propertyName then
				tag = "ProtectedString"
				value = XML_Descriptors.__PROTECTEDSTRING(val)
				whitelisted = true
			elseif "Name" == propertyName then
				whitelisted = true
				value, tag = ReturnValueAndTag(val, "string") -- * Doubt ValueType will change
			end

			if whitelisted then
				Item = Item .. ReturnProperty(tag, propertyName, value)
			end
		end
		Item = Item .. "</Properties>"
		return Item
	end

	local function save_hierarchy(hierarchy)
		for _, instance in next, hierarchy do
			repeat
				if IgnoreNotArchivable and not instance.Archivable then
					break
				end

				local SkipEntirely = IgnoreList[instance]
				if SkipEntirely then
					break
				end

				local ClassName = instance.ClassName

				local InstanceName = instance.Name

				do
					local OnIgnoredList = IgnoreList[ClassName]
					if OnIgnoredList and (OnIgnoredList == true or OnIgnoredList[InstanceName]) then
						break
					end
				end

				if not DecompileIgnoring then
					DecompileIgnoring = DecompileIgnore[instance]

					if DecompileIgnoring == nil then
						local DecompileIgnored = DecompileIgnore[ClassName]
						if DecompileIgnored then
							DecompileIgnoring = DecompileIgnored == true or DecompileIgnored[InstanceName]
						end
					end

					if DecompileIgnoring then
						DecompileIgnoring = instance
					elseif DecompileIgnoring == false then
						DecompileIgnoring = 1 -- Ignore one instance
					end
				end

				local InstanceOverride, ClassNameOverride, ClassTagOverride

				do
					local Fix = NotCreatableFixes[ClassName]

					if Fix then
						if SaveNonCreatable then
						ClassName, InstanceOverride = replaceClassName(instance, InstanceName, ClassName, Fix)
						else
							break -- They won't show up in Studio anyway (Enable SaveNonCreatable if you wish to bypass this)
						end
					else -- ! Assuming nothing that is a PartOperation or inherits from it is in NotCreatableFixes
						if TreatUnionsAsParts and instance:IsA("PartOperation") then
						ClassName, InstanceOverride = replaceClassName(instance, InstanceName, ClassName, "Part")
							ClassNameOverride = "BasePart" -- * Mutual Superclass for PartOperation and Part; For properties only
						elseif not ClassList[ClassName] then -- ? API Dump is outdated then
							if __DEBUG_MODE then
								__DEBUG_MODE("Class not Found", ClassName)
							end

							ClassTagOverride = ClassName -- ? To at least retain .ClassName unlike the rest of the class-specific properties
							ClassName = "Folder" -- ? replaceClassName is not needed because of the ClassTagOverride
						end
					end
				end

				if not InstanceOverride then
					InstanceOverride = InstancesOverrides[instance]
				end
				if ClassName == "" then -- * FilteredSelection
					ClassName = "Folder"
				end

				-- ? The reason we only save .Name (and few other props in save_specific) is because
				-- ? we can be sure this is a custom container (ex. NilInstancesFixes)
				-- ? However, in case of NotCreatableFixes, the Instance might have Tags, Attributes etc. that can potentially be saved (even though it's a Folder)
				if InstanceOverride and InstanceOverride.__SaveSpecific then
					savebuffer[savebuffer_size] = save_specific(ClassName, InstanceOverride.Properties) -- ! Assuming anything that has __SaveSpecific will have .Properties
					savebuffer_size = savebuffer_size + 1
				else
					-- local Properties =
					savebuffer[savebuffer_size] = ReturnItem(ClassTagOverride or ClassName, instance) -- TODO: Ideally this shouldn't return <Properties> as well as the line below to close it IF  IgnorePropertiesOfNotScriptsOnScriptsMode is ENABLED
					savebuffer_size = savebuffer_size + 1
					if not (IgnorePropertiesOfNotScriptsOnScriptsMode and not isLuaSourceContainer(instance)) then
						local default_instance, new_def_inst

						if IgnoreDefaultProperties then
							default_instance = default_instances[ClassName]
							if not default_instance then
								local ClassTags = ClassList[ClassName].Tags
								if not (ClassTags and ClassTags.NotCreatable) then -- __api_dump_class_not_creatable__ also indicates this
									new_def_inst = Instance.new(ClassName) -- ! Assuming anything that doesn't have NotCreatable is possible to create (therefore no pcall)

									default_instance = {}

									default_instances[ClassName] = default_instance
								elseif __DEBUG_MODE then
									__DEBUG_MODE("Unable to create default Instance", ClassName)
								end
							end
						end
						local proplist = inherited_properties[ClassNameOverride or ClassName]
						if not proplist then
							proplist = GetInheritedProps(ClassNameOverride or ClassName)
							inherited_properties[ClassNameOverride or ClassName] = proplist
						end
						for _, Property in next, proplist do
							repeat
								local PropertyName = Property.Name

								if IgnoreProperties[PropertyName] then
									break
								end

								local ValueType = Property.ValueType

								if IgnoreSharedStrings and ValueType == "SharedString" then -- ? More info in Options
									break
								end

								local Category, Optional, Special =
									Property.Category, Property.Optional, Property.Special

								local raw = ReadProperty(instance, Property, PropertyName, Special, Category, Optional)

								if raw == __BREAK then -- ! Assuming __BREAK is always returned when there's a failure to read a property
									local ok, result = pcall(gethiddenproperty_fallback, instance, PropertyName) -- * This helps in reading: Vector3int16, OptionalCoordinateFrame DataTypes. It also acts as an almost entire fallback for gethiddenproperty in case it is missing

							if result == nil and unfilterPropVal(Category, Optional) then
										ok = nil
									end

									if ok then
										raw = result
									else
										local Fallback = Property.Fallback

										if Fallback then
											ok, result = pcall(Fallback, instance)

											if ok then
												raw = result
											else
												if __DEBUG_MODE then
													-- TODO Maybe remove the fix during runtime if it fails to avoid re-trying
													__DEBUG_MODE("Fix Failed", PropertyName)
												end
												break
											end
										else
											break
										end
									end
								end

								if SharedStringOverwrite and ValueType == "BinaryString" then -- TODO: Convert this to table if more types are added
									ValueType = "SharedString"
								end

								-- Special = Property.Special -- ? Read TODO below (must be updated if it's used frequently afterwards)

								if
									default_instance
									and not Property.Special -- TODO: .Special is checked more than once (because it might be updated during ReadProperty)
									and not (PropertyName == "Source" and isLuaSourceContainer(instance))
								then -- ? Could be not just "Source" in the future
									if new_def_inst then
										default_instance[PropertyName] = getsafeproperty(new_def_inst, PropertyName)
									end
									if default_instance[PropertyName] == raw then
										break
									end
									-- local ok, IsModified = pcall(IsPropertyModified, instance, PropertyName) -- ? Not yet enabled lol (580)
								end

								-- Serialization start

								local tag, value
								if Category == "Class" then
									tag = "Ref"
									if raw then
										if SaveNonCreatableWillBeEnabled then
											local Fix = NotCreatableFixes[raw.ClassName]
											if
												Fix
												and (
													PropertyName == "PlayerToHideFrom"
													or ValueType ~= "Instance" and ValueType ~= Fix
												)
											then
												-- * To avoid errors
												break
											end
										end

										value = referents[raw]
										if not value then
											value = ref_size
											referents[raw] = value
											ref_size = ref_size + 1
										end
									else
										value = "null"
									end
								elseif Category == "Enum" then -- ! We do this order (Enums before Descriptors) specifically because Font Enum might get a Font Descriptor despite having Enum Category, unlike Font DataType which that Descriptor is meant for
									value, tag = XML_Descriptors.__ENUM(raw)
								else
									local Descriptor = XML_Descriptors[ValueType]

									if Descriptor then
										value, tag = ReturnValueAndTag(raw, ValueType, Descriptor)
									elseif "ProtectedString" == ValueType then -- TODO: Try fitting this inside Descriptors
										tag = ValueType

										if PropertyName == "Source" then
											if DecompileIgnoring then -- ? Should this really prevent extraction of the original source if present ?
												if DecompileIgnoring == 1 then
													DecompileIgnoring = nil
												end
												value = "-- Ignored"
											else
												local should_decompile = true
												local LinkedSource
												local LinkedSource_Url = instance.LinkedSource -- ! Assuming every Class that has ProtectedString Source property also has a LinkedSource property
												local hasLinkedSource = LinkedSource_Url ~= ""
												local LinkedSource_type
												if hasLinkedSource then
													local Path = instance:GetFullName()
													if RecoveredScripts then
														table.insert(RecoveredScripts, Path)
													else
														RecoveredScripts = { Path }
													end

													LinkedSource = string.match(LinkedSource_Url, "%w+$") -- TODO: No sure if this pattern matches all possible cases. Example is: 'rbxassetid://0&hash=cd73dd2fe5e5013137231c227da3167e'
													if LinkedSource then
														local cached = ldeccache[LinkedSource]

														if cached then
															value = cached
															should_decompile = nil
														elseif DecompileJobless then
															value = "-- Not found in already decompiled ScriptCache"
															should_decompile = nil
														end

												LinkedSource_type = string.find(LinkedSource, "%a") and "hash" or "id"

														local asset = LinkedSource_type .. "=" .. LinkedSource

														local source
														local ok = pcall(function()
															-- Credits @halffalse
															source = game:HttpGet(
																"https://assetdelivery.roproxy.com/v1/asset/?" .. asset
															)
														end)

												if ok and filterLinkedSource(source) then
															ldeccache[LinkedSource] = source

															value = source

															should_decompile = nil
														end
													else --if __DEBUG_MODE then -- * We print this anyway because very important
														warn(
															"FAILED TO EXTRACT ORIGINAL SCRIPT SOURCE (OPEN A GITHUB ISSUE): ",
															instance:GetFullName(),
															LinkedSource_Url
														)
													end
												end

												if should_decompile then
													local isLocalScript = instance:IsA("LocalScript")
													if
														isLocalScript
															and instance.RunContext == Enum.RunContext.Server
														or not isLocalScript
															and instance:IsA("Script")
															and instance.RunContext ~= Enum.RunContext.Client
													then
														value =
															"-- [FilteringEnabled] Server Scripts are IMPOSSIBLE to save" --TODO: Could be not just server scripts in the future
													else
														value = ldecompile(instance)
														if SaveBytecode then
															local output = SaveBytecode(instance)
															if output then
																value = output .. value
															end
														end
													end
												end

												value = "-- Saved by UniversalSynSaveInstance (Join to Copy Games) https://discord.gg/wx4ThpAsmw\n\n"
													.. (hasLinkedSource and "-- Original Source: https://assetdelivery.roblox.com/v1/asset/?" .. (LinkedSource_type or "id") .. "=" .. (LinkedSource or LinkedSource_Url) .. "\n\n" or "")
													.. value
											end
										end
										value = XML_Descriptors.__PROTECTEDSTRING(value)
									else
										--OptionalCoordinateFrame and so on, we make it dynamic

										if Optional then
											Descriptor = XML_Descriptors[Optional]

											if Descriptor then
												if raw == nil then
													-- * It can be empty, because it's optional
													-- ? Though why even save it if it's empty considering it's optional
													break
												-- value, tag = "", ValueType
												else
													value, tag = ReturnValueAndTag(raw, ValueType, Descriptor)
												end
											end
										end
									end
								end

								if tag then
									savebuffer[savebuffer_size] = ReturnProperty(tag, PropertyName, value)
									savebuffer_size = savebuffer_size + 1
								else --if __DEBUG_MODE then -- * We print this anyway because very important
									warn("UNSUPPORTED TYPE (OPEN A GITHUB ISSUE): ", ValueType, ClassName, PropertyName)
								end
							until true
						end
					end
					savebuffer[savebuffer_size] = "</Properties>"
					savebuffer_size = savebuffer_size + 1

					if SaveCacheInterval < savebuffer_size then
						save_cache()
					end
				end

				if SkipEntirely ~= false then -- ? We save instance without it's descendants in this case (== false)
					local Children = InstanceOverride and InstanceOverride.__Children or instance:GetChildren()

					if #Children ~= 0 then
						save_hierarchy(Children)
					end
				end

				if DecompileIgnoring and DecompileIgnoring == instance then
					DecompileIgnoring = nil
				end

				savebuffer[savebuffer_size] = "</Item>"
				savebuffer_size = savebuffer_size + 1
			until true
		end
	end

	local function save_extra(name, hierarchy, customClassName, source)
		savebuffer[savebuffer_size] = save_specific((customClassName or "Folder"), { Name = name, Source = source })
		savebuffer_size = savebuffer_size + 1
		if hierarchy then
			save_hierarchy(hierarchy)
		end
		savebuffer[savebuffer_size] = "</Item>"
		savebuffer_size = savebuffer_size + 1
	end

	local function save_game()
		writefile(placename, "")

		if IsModel then
			savebuffer[savebuffer_size] = '<Meta name="ExplicitAutoJoints">true</Meta>'
			savebuffer_size = savebuffer_size + 1
		end
		--[[
			-- ? Roblox encodes the following additional attributes. These are not required. Moreover, any defined schemas are ignored, and not required for a file to be valid: xmlns:xmime="http://www.w3.org/2005/05/xmlmime" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:noNamespaceSchemaLocation="http://www.roblox.com/roblox.xsd"  
			Also http can be converted to https but not sure if Roblox would decide to detect that
			-- ? <External>null</External><External>nil</External>  - <External> is a legacy concept that is no longer used.
		]]

		-- TODO Find a better solution for this
		SaveNonCreatableWillBeEnabled = SaveNonCreatable
			or (IsolateLocalPlayer or IsolateLocalPlayerCharacter) and IsolateLocalPlayer
			or IsolatePlayers
			or NilInstances and global_container.getnilinstances -- ! Make sure this accurately reflects everything below

		save_hierarchy(ToSaveList)

		if IsolateLocalPlayer or IsolateLocalPlayerCharacter then
			local LocalPlayer = service.Players.LocalPlayer
			if LocalPlayer then
				if IsolateLocalPlayer then
					SaveNonCreatable = true
					save_extra("LocalPlayer", LocalPlayer:GetChildren())
				end
				if IsolateLocalPlayerCharacter then
					local LocalPlayerCharacter = LocalPlayer.Character
					if LocalPlayerCharacter then
						save_extra("LocalPlayer Character", LocalPlayerCharacter:GetChildren())
					end
				end
			end
		end

		if IsolateStarterPlayer then
			-- SaveNonCreatable = true -- TODO: Enable if StarterPlayerScripts or StarterCharacterScripts stop showing up in isolated folder in Studio
			save_extra("StarterPlayer", service.StarterPlayer:GetChildren())
		end

		if IsolatePlayers then
			SaveNonCreatable = true
			save_extra("Players", service.Players:GetChildren())
		end

		if NilInstances and global_container.getnilinstances then
			local nil_instances, nil_instances_size = {}, 1

			local NilInstancesFixes = OPTIONS.NilInstancesFixes

			for _, instance in next, global_container.getnilinstances() do
				if instance == game then
					instance = nil
					-- break
				else
					local ClassName = instance.ClassName

					local Fix = InheritsFix(NilInstancesFixes, ClassName, instance)

					if Fix then
						instance = Fix(instance, InstancesOverrides)
						-- continue
					end

					local Class = ClassList[ClassName]
					if Class then
						local ClassTags = Class.Tags
						if ClassTags and ClassTags.Service then -- For CSGDictionaryService, NonReplicatedCSGDictionaryService, LogService, ProximityPromptService, TestService & more
							-- instance.Parent = game
							instance = nil
							-- continue
						end
					end
				end
				if instance then
					nil_instances[nil_instances_size] = instance
					nil_instances_size = nil_instances_size + 1
				end
			end
			SaveNonCreatable = true
			save_extra("Nil Instances", nil_instances)
		end

		if OPTIONS.ReadMe then
			save_extra(
				"README",
				nil,
				"Script",
				"--[[\n"
					.. (RecoveredScripts and "\t\tIMPORTANT: Original Source of these Scripts was Recovered: " .. service.HttpService:JSONEncode(
						RecoveredScripts
					) .. "\n" or "")
					.. [[
		Thank you for using UniversalSynSaveInstance (Join to Copy Games) https://discord.gg/wx4ThpAsmw.

		If you didn't save in Binary (rbxl) - it's recommended to save the game right away to take advantage of the binary format & to preserve values of certain properties if you used IgnoreDefaultProperties setting (as they might change in the future).
		You can do that by going to FILE -> Save to File As -> Make sure File Name ends with .rbxl -> Save

		ServerStorage, ServerScriptService and Server Scripts are IMPOSSIBLE to save because of FilteringEnabled.

		If your player cannot spawn into the game, please move the scripts in StarterPlayer somewhere else. Then run `game:GetService("Players").CharacterAutoLoads = true`.
		And use "Play Here" to start game instead of "Play" to spawn your Character where your Camera currently is.

		If the chat system does not work, please use the explorer and delete everything inside the TextChatService/Chat service(s). 
		Or run `game:GetService("Chat"):ClearAllChildren() game:GetService("TextChatService"):ClearAllChildren()`
				
		If Union and MeshPart collisions don't work, run the script below in the Studio Command Bar:
				
				
		local C = game:GetService("CoreGui")
		local D = Enum.CollisionFidelity.Default
				
		for _, v in game:GetDescendants() do
			if v:IsA("TriangleMeshPart") and not v:IsDescendantOf(C) then
				v.CollisionFidelity = D
			end
		end
		print("Done")
				
		If you can't move the Camera, run this script in the Studio Command Bar:
			
		workspace.CurrentCamera.CameraType = Enum.CameraType.Fixed
		
		Or Destroy the Camera.

		This file was generated with the following settings:
				]]
					.. service.HttpService:JSONEncode(OPTIONS)
					.. "\n\n\t\tElapsed time: "
					.. os.clock() - elapse_t
					.. " PlaceId: "
					.. game.PlaceId
					.. " Executor: "
					.. (identify_executor and table.concat({ identify_executor() }, " ") or "Unknown")
					.. "\n]]"
			)
		end
		do
			local tmp = { "<SharedStrings>" }
			for identifier, value in next, SharedStrings do
				table.insert(tmp, '<SharedString md5="' .. identifier .. '">' .. value .. "</SharedString>")
			end

			if 1 < #tmp then -- TODO: This sucks so much because we try to iterate a table just to check this (check above)
				savebuffer[savebuffer_size] = table.concat(tmp)
				savebuffer_size = savebuffer_size + 1
				savebuffer[savebuffer_size] = "</SharedStrings>"
				savebuffer_size = savebuffer_size + 1
			end
		end

		savebuffer[savebuffer_size] =
			"</roblox><!-- Saved by UniversalSynSaveInstance (Join to Copy Games) https://discord.gg/wx4ThpAsmw -->"
		savebuffer_size = savebuffer_size + 1
		save_cache(true)
		do
			-- ! Assuming we only write to file once hence why we only filter once
			-- TODO This might cause issues on non-unique Usernames (ex. "Cake" if game is about cakes then everything supposedly related to your name will be replaced with "Roblox"); Certain UserIds might also affect numbers, like if your UserId is 2481848 and there is some number that goes like "1.248184818837" then that the matched part will be replaced with 1, potentially making the number incorrect.
			-- TODO So for now it's best to keep this disabled by default
			-- TODO It's also not smart to filter entire file string at the end as this might also affect decompiled scripts content, which has no way of containing any user-related information. It would be better to use gsub in string Descriptor and such
			if OPTIONS.Anonymous then
				local LocalPlayer = service.Players.LocalPlayer
				if LocalPlayer then
					local function gsubCaseInsensitive(input, search, replacement) -- * Credits to friends
						local inputLower = string.lower(input)

						search = string.lower(search)

						local lastFinish = 0
						local subStrings = {}
						local search_len = #search
						local input_len = #input
						while search_len <= input_len - lastFinish do
							local init = lastFinish + 1

							local start, finish = string.find(inputLower, search, init, true)

							if start == nil then
								break
							end

							table.insert(subStrings, string.sub(input, init, start - 1))

							lastFinish = finish
						end

						if lastFinish == 0 then
							return input
						end

						table.insert(subStrings, string.sub(input, lastFinish + 1))

						return table.concat(subStrings, replacement)
					end

					local Anonymous = type(OPTIONS.Anonymous) == "table" and OPTIONS.Anonymous
						or { UserId = "1", Name = "Roblox" }

					for _, chunk in next, chunks do
						chunk.str = gsubCaseInsensitive(
							string.gsub(chunk.str, LocalPlayer.UserId, Anonymous.UserId),
							LocalPlayer.Name,
							Anonymous.Name
						)
					end
				end
			end

			local Callback = OPTIONS.Callback
			if Callback then
				local totalstr = ""
				for _, chunk in next, chunks do
					totalstr = totalstr .. chunk.str
				end
				Callback(totalstr, chunks, totalsize)
			elseif OPTIONS.AlternativeWritefile and appendfile then
				local SEGMENT_SIZE = 4145728 -- Celery has an arbitrary savefile/appendfile size limit of ~4MB for reasons unknown. This is a workaround to save the file in segments.

				local totallen, currentlen = math.ceil(totalsize / SEGMENT_SIZE), 1

				for _, chunk in next, chunks do
					local length = math.ceil(chunk.size / SEGMENT_SIZE)
					for i = 1, length do
						local savestr = string.sub(chunk.str, (i - 1) * SEGMENT_SIZE + 1, i * SEGMENT_SIZE)

						run_with_loading(
							"Writing to File " .. math.round(currentlen / totallen * 100) .. "% (Depends on Exec)",
							nil,
							true,
							appendfile,
							placename,
							savestr
						)
						currentlen = currentlen + 1

						if i ~= length then
							task.wait()
						end
					end
				end
			else
				local totalstr = ""
				for _, chunk in next, chunks do
					totalstr = totalstr .. chunk.str
				end
				run_with_loading(
					"Writing " .. get_size_format() .. " to File (Depends on Exec)",
					nil,
					true,
					writefile,
					placename,
					totalstr
				)
			end
		end
		table.clear(SharedStrings)
	end

	local Connections
	do
		local Players = service.Players

		if IgnoreList.Model ~= true then
			Connections = {}
			local function ignoreCharacter(player)
				table.insert(
					Connections,
					player.CharacterAdded:Connect(function(character)
						IgnoreList[character] = true
					end)
				)

				local Character = player.Character
				if Character then
					IgnoreList[Character] = true
				end
			end

			if OPTIONS.RemovePlayerCharacters then
				table.insert(
					Connections,
					Players.PlayerAdded:Connect(function(player)
						ignoreCharacter(player)
					end)
				)
				for _, player in next, Players:GetPlayers() do
					ignoreCharacter(player)
				end
			else
				IgnoreNotArchivable = false -- TODO Bad solution (Characters are NotArchivable); Also make sure the next solution is compatible with IsolateLocalPlayerCharacter
				if IsolateLocalPlayerCharacter then
					task.spawn(function()
						ignoreCharacter(GetLocalPlayer())
					end)
				end
			end
		end
		if IsolateLocalPlayer and IgnoreList.Player ~= true then
			task.spawn(function()
				IgnoreList[GetLocalPlayer()] = true
			end)
		end
	end

	if IsolateStarterPlayer then
		IgnoreList.StarterPlayer = false
	end

	if IsolatePlayers then
		IgnoreList.Players = false
	end

	if OPTIONS.ShowStatus then
		do
			local Exists = GLOBAL_ENV._statustext
			if Exists then
				Exists:Destroy()
			end
		end

		local StatusGui = Instance.new("ScreenGui")

		GLOBAL_ENV._statustext = StatusGui

		StatusGui.DisplayOrder = 2e9
		pcall(function() -- ? Compatibility with level 2
			StatusGui.OnTopOfCoreBlur = true
		end)

		StatusText = Instance.new("TextLabel")

		StatusText.Text = "Saving..."

		StatusText.BackgroundTransparency = 1
		StatusText.Font = Enum.Font.Code
		StatusText.AnchorPoint = Vector2.new(1)
		StatusText.Position = UDim2.new(1)
		StatusText.Size = UDim2.new(0.3, 0, 0, 20)

		StatusText.TextColor3 = Color3.new(1, 1, 1)
		StatusText.TextScaled = true
		StatusText.TextStrokeTransparency = 0.7
		StatusText.TextXAlignment = Enum.TextXAlignment.Right
		StatusText.TextYAlignment = Enum.TextYAlignment.Top

		StatusText.Parent = StatusGui

		local function randomString()
			local length = math.random(10, 20)
			local randomarray = table.create(length)
			for i = 1, length do
				randomarray[i] = string.char(math.random(32, 126))
			end
			return table.concat(randomarray)
		end

		if global_container.gethui then
			StatusGui.Name = randomString()
			StatusGui.Parent = global_container.gethui()
		else
			if global_container.protectgui then
				StatusGui.Name = randomString()
				global_container.protectgui(StatusGui)
				StatusGui.Parent = game:GetService("CoreGui")
			else
				local RobloxGui = game:GetService("CoreGui"):FindFirstChild("RobloxGui")
				if RobloxGui then
					StatusGui.Parent = RobloxGui
				else
					StatusGui.Name = randomString()
					StatusGui.Parent = game:GetService("CoreGui")
				end
			end
		end
	end
	
	do
	    OPTIONS.SafeMode = true
	end

	do
		local SafeMode = OPTIONS.SafeMode
		if SafeMode then
			task.spawn(function()
				local LocalPlayer = GetLocalPlayer()

				local PlayerScripts = LocalPlayer:FindFirstChild("PlayerScripts")
				if PlayerScripts then
					local function construct_InstanceOverride(instance)
						local children = instance:GetChildren()
						InstancesOverrides[instance] = {
							__Children = children,
						}
						for _, child in next, children do
							construct_InstanceOverride(child)
						end
					end
					construct_InstanceOverride(PlayerScripts)

					InstancesOverrides[LocalPlayer] = {
						__Children = LocalPlayer:GetChildren(),
						Properties = { Name = "[" .. LocalPlayer.ClassName .. "] " .. LocalPlayer.Name },
					}
				end

				LocalPlayer:Kick("\n[SAFEMODE] Saving in Progress..\nPlease do NOT leave")
				wait_for_render()
				task.delay(10, service.GuiService.ClearError, service.GuiService)
			end)

			service.RunService:Set3dRenderingEnabled(false)
		end

		local anti_idle
		if OPTIONS.AntiIdle then
			task.spawn(function()
				anti_idle = GetLocalPlayer().Idled:Connect(function()
					service.VirtualInputManager:SendMouseWheelEvent(
						service.UserInputService:GetMouseLocation().X,
						service.UserInputService:GetMouseLocation().Y,
						true,
						game
					)
				end)
			end)
		end

		elapse_t = os.clock()

		local ok, err = xpcall(save_game, function(err)
			return debug.traceback(err)
		end)

		if SafeMode then
			service.GuiService:ClearError()
			service.RunService:Set3dRenderingEnabled(true)
		end

		if old_gethiddenproperty then
			gethiddenproperty = old_gethiddenproperty
		end

		if anti_idle then
			anti_idle:Disconnect()
		end
		if Connections then
			for _, connection in next, Connections do
				connection:Disconnect()
			end
		end
		GLOBAL_ENV[placename] = nil
		if StatusText then
			task.spawn(function()
				elapse_t = os.clock() - elapse_t
				local Log10 = math.log10(elapse_t)
				local ExtraTime = 10
				if ok then
					StatusText.Text = string.format("Saved! Time %.3f seconds; Size %s", elapse_t, get_size_format())
					StatusText.TextColor3 = Color3.new(0, 1)
					task.wait(Log10 * 2 + ExtraTime)
				else
					if Loading then
						task.cancel(Loading)
						Loading = nil
					end
					StatusText.Text = "Failed! Check F9 console for more info"
					StatusText.TextColor3 = Color3.new(1)
					warn("Error found while saving:")
					warn(err)
					task.wait(Log10 + ExtraTime)
				end
				StatusText:Destroy()
			end)
		end

		if OPTIONS.ShutdownWhenDone and ok then
			game:Shutdown()
		end
	end
end

getgenv().synsaveinstance = synsaveinstance
getgenv().saveinstance = synsaveinstance