18.28.1  Example 

                                  example
     CALL TDSETS('SIZE 10 BY 8')
This sets the size of the plot.  This is the same as the command:
     TD:SET SIZE 10 BY 8
     CALL TDSETS('COLOR BLUE')
Now everything is plotted in blue.
          or....
     character*10 string
     data string/'COLOR BLUE'/
     CALL TDSETS(string)

     CALL TDSETS('DEVICE VERSATEC')
Sets the current device to be the Versatek printer/plotter.