home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Pascal / MAXONPASCAL2.DMS / in.adf / INCLUDE / intuition / preferences.h < prev    next >
Encoding:
Text File  |  1994-07-25  |  4.5 KB  |  202 lines
  1. {$if not def INTUITION_PREFERENCES_H} CONST INTUITION_PREFERENCES_H=0;
  2.  
  3. { *************************************************************************
  4.   ** KickPascal-Include-Datei "intuition/preferences.h" zu Kickstart 3.0 **
  5.   ************************************************************************* }
  6.  
  7.  
  8. TYPE p_Preferences = ^Preferences;
  9.  
  10. {$if not def DEVICES_TIMER_H;incl "devices/timer.h";endif}
  11.  
  12. CONST FILENAME_SIZE = 30;
  13.       DEVNAME_SIZE  = 16;
  14.  
  15. CONST POINTERSIZE = (1+16+1)*2;
  16.  
  17. CONST
  18.  TOPAZ_EIGHTY = 8;
  19.  TOPAZ_SIXTY  = 9;
  20.  
  21. TYPE Preferences = RECORD
  22.  FontHeight       : Short;
  23.  PrinterPort      : Byte;
  24.  BaudRate         : Word;
  25.  KeyRptSpeed      : timeval;
  26.  KeyRptDelay      : timeval;
  27.  DoubleClick      : timeval;
  28.  PointerMatrix    : ARRAY[0..POINTERSIZE-1] OF Word;
  29.  XOffset          : Short;
  30.  YOffset          : Short;
  31.  color17          : Word;
  32.  color18          : Word;
  33.  color19          : Word;
  34.  PointerTicks     : Word;
  35.  color0           : Word;
  36.  color1           : Word;
  37.  color2           : Word;
  38.  color3           : Word;
  39.  ViewXOffset      : Short;
  40.  ViewYOffset      : Short;
  41.  ViewInitX        : Integer;
  42.  ViewInitY        : Integer;
  43.  EnableCLI        : Boolean;
  44.  PrinterType      : Word;
  45.  PrinterFilename  : String[FILENAME_SIZE];
  46.  PrintPitch       : Word;
  47.  PrintQuality     : Word;
  48.  PrintSpacing     : Word;
  49.  PrintLeftMargin  : Word;
  50.  PrintRightMargin : Word;
  51.  PrintImage       : Word;
  52.  PrintAspect      : Word;
  53.  PrintShade       : Word;
  54.  PrintThreshold   : Integer;
  55.  PaperSize        : Word;
  56.  PaperLength      : Word;
  57.  PaperType        : Word;
  58.  SerRWBits        : Byte;
  59.  SerStopBuf       : Byte;
  60.  SerParShk        : Byte;
  61.  LaceWB           : Byte;
  62.  WorkName         : String[FILENAME_SIZE];
  63.  RowSizeChange    : Short;
  64.  ColumnSizeChange : Short;
  65.  PrintFlags       : Word;
  66.  PrintMaxWidth    : Word;
  67.  PrintMaxHeight   : Word;
  68.  PrintDensity     : Byte;
  69.  PrintXOffset     : Byte;
  70.  wb_Width         : Word;
  71.  wb_Height        : Word;
  72.  wb_Depth         : Byte;
  73.  ext_size         : Byte;
  74. END;
  75.  
  76. CONST
  77.  LACEWB      = $1;
  78.  LW_RESERVED = 1;
  79.  
  80.  SCREEN_DRAG = $4000;    
  81.  MOUSE_ACCEL = $8000;
  82.  
  83.  PARALLEL_PRINTER = $00;
  84.  SERIAL_PRINTER   = $01;
  85.  
  86.  BAUD_110   = $00;
  87.  BAUD_300   = $01;
  88.  BAUD_1200  = $02;
  89.  BAUD_2400  = $03;
  90.  BAUD_4800  = $04;
  91.  BAUD_9600  = $05;
  92.  BAUD_19200 = $06;
  93.  BAUD_MIDI  = $07;
  94.  
  95.  FANFOLD = $00;
  96.  SINGLE  = $80;
  97.  
  98.  PICA  = $000;
  99.  ELITE = $400;
  100.  FINE  = $800;
  101.  
  102.  DRAFT  = $000;
  103.  LETTER = $100;
  104.  
  105.  SIX_LPI   = $000;
  106.  EIGHT_LPI = $200;
  107.  
  108.  IMAGE_POSITIVE = $00;
  109.  IMAGE_NEGATIVE = $01;
  110.  
  111.  ASPECT_HORIZ = $00;
  112.  ASPECT_VERT  = $01;
  113.  
  114.  SHADE_BW        = $00;
  115.  SHADE_GREYSCALE = $01;
  116.  SHADE_COLOR     = $02;
  117.  
  118.  US_LETTER = $00;
  119.  US_LEGAL  = $10;
  120.  N_TRACTOR = $20;
  121.  W_TRACTOR = $30;
  122.  _CUSTOM   = $40; { "_" ergänzt }
  123.  
  124.  
  125.  EURO_A0        = $50; (* European size A0: 841 x 1189 *)
  126.  EURO_A1        = $60; (* European size A1: 594 x  841 *)
  127.  EURO_A2        = $70; (* European size A2: 420 x  594 *)
  128.  EURO_A3        = $80; (* European size A3: 297 x  420 *)
  129.  EURO_A4        = $90; (* European size A4: 210 x  297 *)
  130.  EURO_A5        = $A0; (* European size A5: 148 x  210 *)
  131.  EURO_A6        = $B0; (* European size A6: 105 x  148 *)
  132.  EURO_A7        = $C0; (* European size A7:  74 x  105 *)
  133.  EURO_A8        = $D0; (* European size A8:  52 x   74 *)
  134.  
  135.  
  136.  CUSTOM_NAME      = $00;
  137.  ALPHA_P_101      = $01;
  138.  BROTHER_15XL     = $02;
  139.  CBM_MPS1000      = $03;
  140.  DIAB_630         = $04;
  141.  DIAB_ADV_D25     = $05;
  142.  DIAB_C_150       = $06;
  143.  EPSON            = $07;
  144.  EPSON_JX_80      = $08;
  145.  OKIMATE_20       = $09;
  146.  QUME_LP_20       = $0A;
  147.  HP_LASERJET      = $0B;
  148.  HP_LASERJET_PLUS = $0C;
  149.  
  150.  SBUF_512   = $00;
  151.  SBUF_1024  = $01;
  152.  SBUF_2048  = $02;
  153.  SBUF_4096  = $03;
  154.  SBUF_8000  = $04;
  155.  SBUF_16000 = $05;
  156.  
  157.  SREAD_BITS  = $F0;
  158.  SWRITE_BITS = $0F;
  159.  
  160.  SSTOP_BITS    = $F0;
  161.  SBUFSIZE_BITS = $0F;
  162.  
  163.  SPARITY_BITS  = $F0;
  164.  SHSHAKE_BITS  = $0F;
  165.  
  166.  SPARITY_NONE = 0;
  167.  SPARITY_EVEN = 1;
  168.  SPARITY_ODD  = 2;
  169.  SPARITY_MARK = 3;
  170.  SPARITY_SPACE= 4;
  171.  
  172.  SHSHAKE_XON  = 0;
  173.  SHSHAKE_RTS  = 1;
  174.  SHSHAKE_NONE = 2;
  175.  
  176.  
  177.  CORRECT_RED   = $0001;
  178.  CORRECT_GREEN = $0002;
  179.  CORRECT_BLUE  = $0004;
  180.  
  181.  CENTER_IMAGE  = $0008;
  182.  
  183.  IGNORE_DIMENSIONS   = $0000;
  184.  BOUNDED_DIMENSIONS  = $0010;
  185.  ABSOLUTE_DIMENSIONS = $0020;
  186.  PIXEL_DIMENSIONS    = $0040;
  187.  MULTIPLY_DIMENSIONS = $0080;
  188.  INTEGER_SCALING     = $0100;
  189.  
  190.  ORDERED_DITHERING  = $0000;
  191.  HALFTONE_DITHERING = $0200;
  192.  FLOYD_DITHERING    = $0400;
  193.  
  194.  ANTI_ALIAS  = $0800;
  195.  GREY_SCALE2 = $1000;
  196.  
  197.  CORRECT_RGB_MASK = (CORRECT_RED or CORRECT_GREEN or CORRECT_BLUE);
  198.  DIMENSIONS_MASK  = (BOUNDED_DIMENSIONS or ABSOLUTE_DIMENSIONS or PIXEL_DIMENSIONS or MULTIPLY_DIMENSIONS);
  199.  DITHERING_MASK   = (HALFTONE_DITHERING or FLOYD_DITHERING);
  200.  
  201. {$endif}
  202.