;
;	This routine will set the video attributes
;	to black and white only for use with a mono
;	display and a color card.
;
;
sc n wk
sc h Wk
;
label ask
ask  Do you want to save this fix on STD (Y/N) ? 
if -yn ju ask
if n ju save-no
sa std.xtk/e
label save-no
lo
end