DIM F AS INTEGER
F = FREEFILE
OPEN "MAZE.PIC" FOR OUTPUT AS #F
PRINT #F, "BM0,0";
RANDOMIZE TIMER
DIM R AS INTEGER
DIM C AS INTEGER
FOR R = 0 TO 59
    FOR C = 0 TO 79
        IF INT(RND + .5) = 0 THEN
            PRINT #F, "F8BU8";
        ELSE
            PRINT #F, "BD8E8";
        END IF
    NEXT C
    PRINT #F, "BD8BL640";
NEXT R
CLOSE #F