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.
 
' To try this example:
' 1. Choose New Project from the File menu
' 2. Copy the code example below to the code window
' 3. Press F5 to run the example
 
 CLS                         ' Clear the screen
 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
         SLEEP 1
         FOR J = i TO 20 + i
                  PRESET (J, 50)     ' Erase the line
         NEXT
 NEXT