rsb.Initialize
rs.Initialize("{R}{T}{Blue}{U}Fruit{R}{T}{Blue}{U}{R}{T}{Blue}{U}Aisle{U}{Blue}{T}{R}")
rs.Color2(Colors.Blue,"{Blue}")
rs.RelativeSize2(1.5, "{R}")
rs.Typeface2("serif", "{T}")
rs.Underscore2("{U}")
rs.Color2(Colors.Red, "{Red}")
rs.Style2(rs.STYLE_BOLD_ITALIC, "{BI}")
rsb.Append(rs)
Text1 = SpinnerFruit.selectedItem
outFile.Initialize(File.OpenOutput(File.DirRootExternal, "Text1.txt", True))
outFile.WriteLine(rs)
outFile.Close