>>> Continued from previous message
    UseCR = %TRUE
    IF CanUseSuppressCR THEN
        SELECT CASE SuppressCR%
            CASE %TRUE
                UseCR = %FALSE
            CASE ELSE
        END SELECT
    END IF
    TextToPrint$ = ""
    IF CanUseTextString THEN
        TextToPrint$ = Text$
    END IF
    '   In a real PrintToFile SUB, the following PRINT's would
    '   be PRINT #x, TextToPrint$... etc.  I've used screen prints
    '   for the purposes of this explanation code....
    SELECT CASE UseCR
        CASE %TRUE
            PRINT TextToPrint$
        CASE %FALSE
            PRINT TextToPrint$;     ' note the semicolon to suppress
                                    ' the CR
    END SELECT
END SUB
--- Maximus/2 2.01wb
---------------