home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / E / TFF-A32R.LZX / AmigaE3.2a / ModulesSrc / devices / prtgfx.e < prev    next >
Encoding:
Text File  |  1996-08-29  |  1.7 KB  |  63 lines
  1. OPT MODULE
  2. OPT EXPORT
  3.  
  4. MODULE 'graphics/rastport'
  5.  
  6. CONST PCMYELLOW=0,
  7.       PCMMAGENTA=1,
  8.       PCMCYAN=2,
  9.       PCMBLACK=3,
  10.       PCMBLUE=0,
  11.       PCMGREEN=1,
  12.       PCMRED=2,
  13.       PCMWHITE=3
  14.  
  15. OBJECT colorentry
  16. -> a) next four CHARs are unioned as "colorlong:LONG"
  17. -> b) also unioned as "colorsbyte[4]:ARRAY", which is signed CHARs
  18.   colorbyte[4]:ARRAY
  19. ENDOBJECT     /* SIZEOF=4 */
  20.  
  21. OBJECT prtinfo
  22.   render:LONG
  23.   rp:PTR TO rastport
  24.   temprp:PTR TO rastport
  25.   rowbuf:PTR TO INT  -> Target is unsigned
  26.   hambuf:PTR TO INT  -> Target is unsigned
  27.   colormap:PTR TO colorentry
  28.   colorint:PTR TO colorentry
  29.   hamint:PTR TO colorentry
  30.   dest1int:PTR TO colorentry
  31.   dest2int:PTR TO colorentry
  32.   scalex:PTR TO INT  -> Target is unsigned
  33.   scalexalt:PTR TO INT  -> Target is unsigned
  34.   dmatrix:PTR TO CHAR
  35.   topbuf:PTR TO INT  -> Target is unsigned
  36.   botbuf:PTR TO INT  -> Target is unsigned
  37.   rowbufsize:INT  -> This is unsigned
  38.   hambufsize:INT  -> This is unsigned
  39.   colormapsize:INT  -> This is unsigned
  40.   colorintsize:INT  -> This is unsigned
  41.   hamintsize:INT  -> This is unsigned
  42.   dest1intsize:INT  -> This is unsigned
  43.   dest2intsize:INT  -> This is unsigned
  44.   scalexsize:INT  -> This is unsigned
  45.   scalexaltsize:INT  -> This is unsigned
  46.   prefsflags:INT  -> This is unsigned
  47.   special:LONG
  48.   xstart:INT  -> This is unsigned
  49.   ystart:INT  -> This is unsigned
  50.   width:INT  -> This is unsigned
  51.   height:INT  -> This is unsigned
  52.   pc:LONG
  53.   pr:LONG
  54.   ymult:INT  -> This is unsigned
  55.   ymod:INT  -> This is unsigned
  56.   ety:INT
  57.   xpos:INT  -> This is unsigned
  58.   threshold:INT  -> This is unsigned
  59.   tempwidth:INT  -> This is unsigned
  60.   flags:INT  -> This is unsigned
  61. ENDOBJECT     /* SIZEOF=114 */
  62.  
  63.