home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 13 / CDA13.ISO / cdactual / demobin / share / program / Pascal / BGI256.ZIP / WRMODE.PAS < prev   
Encoding:
Pascal/Delphi Source File  |  1993-04-24  |  3.5 KB  |  86 lines

  1.  
  2. { WRMODE.PAS - BGI256 write mode definitions }
  3. { Written by Michael Day as of 24 Apr 93 }
  4.  
  5. {Usage:    SetWriteMode(Selection+Function); }
  6. {Example:  SetWriteMode(FloodFillMode+SeedFill); }
  7.  
  8. unit WRMODE;
  9. interface
  10.  
  11.       {graphics mode selections available}
  12. const Mode200  = 0;  {320x200x256}
  13.       Mode400  = 1;  {640x400x256}
  14.       Mode480  = 2;  {640x480x256}
  15.       Mode600  = 3;  {800x600x256}
  16.       Mode768  = 4;  {1024x768x256}
  17.       Mode1024 = 5;  {1280x1024x256}
  18.  
  19.       {SetWriteMode selection commands}
  20. const LineMode      = $00;  {line drawing write style} 
  21.       PixelMode     = $20;  {pixel drawing write style}
  22.       FillMode      = $40;  {fill write style}
  23.       FloodFillType = $60;  {floodfill option selection}
  24.       TextMode      = $80;  {bitmapped text write style}
  25.       GetImageMode  = $C0;  {GetImage write style}
  26.       MiscCommand   = $E0;  {misc BGI driver commands}
  27.  
  28.       {Write mode functions}
  29.       MoveWrite    = 0;         {foreground and background drawing}
  30.       XorWrite     = 1;
  31.       OrWrite      = 2;
  32.       AndWrite     = 3;
  33.       NotMoveWrite = 4;
  34.       NotXorWrite  = 5;
  35.       NotOrWrite   = 6;
  36.       NotAndWrite  = 7;
  37.       ForeMoveWrite    = 8;     {foreground only drawing}
  38.       ForeXorWrite     = 9;
  39.       ForeOrWrite      = 10;
  40.       ForeAndWrite     = 11;
  41.       ForeNotMoveWrite = 12;
  42.       ForeNotXorWrite  = 13;
  43.       ForeNotOrWrite   = 14;
  44.       ForeNotAndWrite  = 15;
  45.       BackMoveWrite     = 16;   {background only drawing}
  46.       BackXorWrite      = 17;
  47.       BackOrWrite       = 18;
  48.       BackAndWrite      = 19;
  49.       BackNotMoveWrite  = 20;
  50.       BackNotXorWrite   = 21;
  51.       BackNotOrWrite    = 22;
  52.       BackNotAndWrite   = 23;
  53.       SetBackColor    = 24; {set the background color for draw method}
  54.       GetWriteMode    = 30; {return selected write mode on GetMaxMode call}
  55.       GetBackColor    = 31; {return background color on GetMaxMode call}
  56.  
  57.       {FloodFillType functions}
  58.       BorderFill      = 0;  {use border floodfill method - default}
  59.       SeedFill        = 1;  {use seed floodfill method}
  60.       AutoFill        = 8;  {auto-select simplex or complex fill - default}
  61.       ComplexFill     = 9;  {force complex floodfill always}
  62.       FillCompressOff = 10; {use standard floodfill stack - default}
  63.       FillCompressOn  = 11; {use compressed floodfill stack}
  64.       FillDelayOff    = 12; {fill area while searching - default}
  65.       FillDelayOn     = 13; {delay fill to after search, not active in simplex}
  66.       FillTracerOff   = 14; {no tracing of search path - default}
  67.       FillTracerOn    = 15; {show search path as it is processed}
  68.       GetFloodFillOpt = 31; {ret FF option flags in next GetMaxMode call}
  69.  
  70.       {Misc Command functions}
  71.       SetGetPixelReadOnly  = 0;  {set GetPixel to read monly mode}
  72.       SetGetPixelReadWrite = 1;  {set GetPixel to write after read mode}
  73.       SetGetImageReadOnly  = 2;  {set GetImage to read only mode}
  74.       SetGetImageReadWrite = 3;  {set GetImage to write after read mode}
  75.       SetPutImgBackColor   = 24; {set new putimage background color}
  76.  
  77.       {These misc cmd functions modify return value of next GetMaxMode call}
  78.       GetCurrentMode     = 25; {ret actual graph mode in use}
  79.       GetXYStackPeak     = 26; {ret last peak val of fill XYstack}
  80.       GetXYStackFree     = 27; {ret last val of free XYstack space}
  81.       GetPutImgWriteMode = 30; {ret last write mode used by PutImage}
  82.       GetPutImgBackColor = 31; {ret background color used by PutImage}
  83.  
  84. implementation
  85. end.
  86.