Procedure GetDefaultPalette (Var Palette : PaletteType) ;
Returns the current palette in Palette.
None.
GetColor, GetBkColor