For "fade out" to a black screen, type in your .sqs file : titlecut ["","BLACK OUT",X]
"X" is the length (in seconds) for screen getting black.
"Some time later" : use "~X" (X : in seconds) in your script in order to make a "pause" before the "fade in" .
For "fade in", I presume (never tried
) it's : titlecut ["","BLACK IN",X]