home *** CD-ROM | disk | FTP | other *** search
/ EDUCORP 8 / Educorp2Compilation.sit / educorp2 / Programming (2300, 7000) / 2307 Programming v.5 / XLisp / XLisp 1.6 Interpreter / XLISP Graphics < prev   
Encoding:
Text File  |  1985-10-25  |  1.3 KB  |  58 lines
  1.  
  2.  
  3. Macintosh Quickdraw Graphics Functions:
  4.  
  5. (show-graphics)  SHOW THE GRAPHICS WINDOW
  6.     returnsnil
  7.  
  8. (hide-graphics)  HIDE THE GRAPHICS WINDOW
  9.     returnsnil
  10.  
  11. (clear-graphics)  CLEAR THE GRAPHICS WINDOW
  12.     returnsnil
  13.  
  14. (showpen)  SHOW THE DRAWING PEN
  15.     returnsnil
  16.  
  17. (hidepen)  HIDE THE DRAWING PEN
  18.     returnsnil
  19.  
  20. (getpen)  GET THE LOCATION OF THE DRAWING PEN
  21.     returnslocation of the pen as a dotted pair
  22.  
  23. (pensize <w> <h>)  SET THE PEN SIZE
  24.     <w>the width of the pen (integer)
  25.     <h>the height of the pen (integer)
  26.     returnsnil
  27.  
  28. (penmode <mode>)  SET THE DRAWING MODE
  29.     <mode>drawing mode (integer)
  30.     returnsnil
  31.  
  32. (penpat <pat>)  SET THE PEN PATTERN
  33.     <pat>pattern (list of integers)
  34.     returnsnil
  35.  
  36. (pennormal)  SET THE PEN BACK TO NORMAL
  37.     returnsnil
  38.  
  39. (move <dh> <dv>)  MOVE THE PEN (RELATIVE)
  40.     <dh>change in horizontal position (integer)
  41.     <dv>change in vertical position (integer)
  42.     returnsnil
  43.  
  44. (moveto <h> <v>)  MOVE THE PEN (ABSOLUTE)
  45.     <h>horizontal position (integer)
  46.     <v>vertical position (integer)
  47.     returnsnil
  48.  
  49. (line <dh> <dv>)  DRAW A LINE (RELATIVE)
  50.     <dh>change in horizontal position (integer)
  51.     <dv>change in vertical position (integer)
  52.     returnsnil
  53.  
  54. (lineto <h> <v>)  DRAW A LINE (ABSOLUTE)
  55.     <h>horizontal position (integer)
  56.     <v>vertical position (integer)
  57.     returnsnil
  58.