Two Unrelated questions.

Example of loading/saving data to a file (add your own error handling etc) :-

Function SavePalette()
	Local f:TStream = WriteStream( "palette.dat" )
	If f
		f.WriteFloat( r )
		f.WriteFloat( g )
		f.WriteFloat( b )
		CloseStream f
	EndIf
EndFunction

Function LoadPalette()
	Local f:TStream = ReadStream( "palette.dat" )
	If f
		r = f.ReadFloat()
		g = f.ReadFloat()
		b = f.ReadFloat()	
		CloseStream f
	EndIf
EndFunction