REM PROGRAMMED BY: TRAVIS SCHULTZ


DEFINT A-Z
SCREEN 13
FOR col = 0 TO 63
    PALETTE col, col
NEXT
COLOR 63
DO
LOCATE 15, 18: PRINT "TRAVIS"
FOR y = 103 TO 111
    FOR x = 136 TO 222
        col = (POINT(x - 1, y) + POINT(x, y + 1)) / 2 - RND * 5
        IF col < 0 THEN col = 0
        PSET (x, y), col
    NEXT
NEXT
LOOP