sf_fade_in            Neat fade in routine
------------------------------------------------------------------------------

    procedure sf_fade_in prototype
      parameters value int color_register,;
             value int palette_type

    These procedures allow the fading of individual color_registers.  Fade
    out fades to black, and fade in fades up to the given palette_type.
    ( Either SF_FADE_STANDARD or SF_FADE_CUA )  See SF_SET_PALETTE() in
    SF_CUA.HDR for register defines and SF_FADE_IN() for palette_type
    defines.

    sf_fade_out( &REG_SEVEN )
    wait ""
    sf_fade_in( &REG_SEVEN, &SF_FADE_STANDARD )