Important Notice

The pages on this site contain documentation for very old MS-DOS software, purely for historical purposes. If you're looking for up-to-date documentation, particularly for programming, you should not rely on the information found here, as it will be woefully out of date.

                       ◄Example►                 ◄Contents►  ◄Index►  ◄Back►
──────────────────────────────────────────────────────────────────────────────
'This example uses the PSET and PRESET statements to draw a line 20 pixels
'long, then to move the line across the screen from left to right.
 
SCREEN 1 : COLOR 1,1 : CLS
FOR I = 0 TO 299 STEP 3
    FOR J = I TO 20 + I
        PSET (J, 50), 2         'Draw the line in new location.
    NEXT
    FOR J = I TO 20 + I
        PRESET (J, 50)          'Erase the line.
    NEXT
NEXT