600 FOR I%=YMAX% TO YMIN% STEP -4	:REM SAVE SCREEN
602 FOR J%=XMIN% TO XMAX% STEP 2
604 PRINT ESC$;"V";			:REM CURSOR HOME
606 PRINT USING "### ";J%;I%
610 CALL GETGW(J%,I%,C%)
620 SCREEN%(INT(J%/2),INT(I%/4))=C%
630 NEXT J% : NEXT I%
640 RETURN
650 FOR I%=YMAX% TO YMIN% STEP -4	:REM RESTORE SCREEN
652 FOR J%=XMIN% TO XMAX% STEP 2
654 PRINT ESC$;"V";			:REM CURSOR HOME
656 PRINT USING "### ";J%;I%
660 C%=SCREEN%(INT(J%/2),INT(I%/4))
670 CALL PUTGW(J%,I%,C%)
680 NEXT J% : NEXT I%
690 RETURN
