REM 1996 * E^
REM
REM THE MOST "DIFFERENT" METHOD FOR THE SIERPINSKI'S TRIANGLE

SCREEN 2
DIM B(3534)
DO: FOR Z% = 0 TO 180
    IF INKEY$ <> "" THEN EXIT DO
    PSET (1, Z%)
    GET (1, 186)-(606, 1), B
    PUT (2, 1), B
    NEXT
    LOOP