deleted: 16/lib/MODEX.PAS

	deleted:    16/lib/x0.7z

diff --git a/16/lib/MODEX.PAS b/16/lib/MODEX.PAS
deleted file mode 100644 (file)
index 7d9d26e..0000000
--- a/16/lib/MODEX.PAS
+++ /dev/null
@@ -1,194 +0,0 @@
-(*\r
-   Turbo Pascal interface to the MODEX library\r
-   Copyright (c) 1993,1994 by Alessandro Scotti\r
-*)\r
-unit ModeX;\r
-interface\r
-\r
-const\r
-  (* Video modes *)\r
-  MX_TEXT       = 0;\r
-  MX_320x175    = 1;\r
-  MX_320x200    = 2;\r
-  MX_320x240    = 3;\r
-  MX_320x350    = 4;\r
-  MX_320x400    = 5;\r
-  MX_320x480    = 6;\r
-  MX_360x175    = 7;\r
-  MX_360x200    = 8;\r
-  MX_360x240    = 9;\r
-  MX_360x350    = 10;\r
-  MX_360x400    = 11;\r
-  MX_360x480    = 12;\r
-  MX_400x600    = 13;\r
-\r
-  (* Fade effects *)\r
-  MX_FADEIN     = 0;\r
-  MX_FADEOUT    = 1;\r
-\r
-  (* Raster ops *)\r
-  OP_SET        = 0;\r
-  OP_AND        = 1;\r
-  OP_OR         = 2;\r
-  OP_XOR        = 3;\r
-  OP_TRANS      = 4;\r
-  OP_ADD        = 5;\r
-  OP_MOVE       = 0;                    (* Alias for OP_SET *)\r
-\r
-procedure mxBitBlt( SX, SY: integer; Width, Height: word; DX, DY: integer );\r
-procedure mxCircle( CX, CY: integer; Radius: word; Color: byte );\r
-procedure mxChangeMode( Mode: word );\r
-procedure mxColorToGray( ColorPalette, GrayPalette: pointer; Count: word );\r
-procedure mxFadePalette( Palette: pointer; Cmd, Start, Count, R, G, B: word );\r
-procedure mxFillBox( X, Y: integer; Width, Height: word; Color: byte; Op: word );\r
-procedure mxGammaCorrect( ColorPalette, GammaPalette: pointer; Count: word );\r
-procedure mxGetAspect( var AspectX, AspectY: word );\r
-function  mxGetClipRegion( var X1, Y1, Width, Height: word ): boolean;\r
-function  mxGetClip: boolean;\r
-procedure mxGetImage( Image: pointer; X, Y: integer; Width, Height: word );\r
-procedure mxGetPalette( Palette: pointer; Start, Count: word );\r
-function  mxGetPixel( X, Y: word ): byte;\r
-procedure mxGetScreenSize( var Width, Height: word );\r
-procedure mxGetTextStep( var DeltaX, DeltaY: integer );\r
-function  mxGetVersion: word;\r
-procedure mxGetVirtualScreen( var Width, Height: word );\r
-procedure mxInit;\r
-procedure mxLine( X1, Y1, X2, Y2: integer; Color, Op: word );\r
-procedure mxOutChar( X, Y: integer; C: char );\r
-procedure mxOutText( X, Y: integer; S: pointer );\r
-procedure mxPan( X, Y: word );\r
-procedure mxPutImage( Image: pointer; X, Y: integer; Width, Height, Op: word );\r
-procedure mxPutPixel( X, Y: word; C: byte );\r
-procedure mxPutTile( Tile: pointer; X, Y: integer; Width, Height: word );\r
-procedure mxReadPlane( Plane: byte );\r
-procedure mxRotatePalette( Palette: pointer; Count: word; Step: integer );\r
-procedure mxRowAddress( RowAddress: byte );\r
-function  mxSetClip( Clip: boolean ): boolean;\r
-procedure mxSetClipRegion( X1, Y1, Width, Height: word );\r
-procedure mxSetColor( Index, R, G, B: word );\r
-procedure mxSetFont( Font: pointer; Width, Height: word );\r
-procedure mxSetMode( Mode: word );\r
-procedure mxSetPalette( Palette: pointer; Start, Count: word );\r
-procedure mxSetTextColor( Color, Op: word );\r
-procedure mxSetTextStep( DeltaX, DeltaY: integer );\r
-procedure mxSetVirtualScreen( Width, Height: word );\r
-procedure mxStretchImage( Image: pointer; X, Y: integer; Width, Height, NewWidth, NewHeight, Op: word );\r
-procedure mxSplitScreen( Line: word );\r
-procedure mxStartAddress( StartAddress: word );\r
-procedure mxStartLine( Line: word );\r
-procedure mxTerm;\r
-procedure mxTransPutTile( Tile: pointer; X, Y: integer; Width, Height: word );\r
-procedure mxWaitDisplay;\r
-procedure mxWaitRetrace;\r
-procedure mxWriteMode( Mode: byte );\r
-procedure mxWritePlane( Plane: byte );\r
-\r
-procedure mxFillPoly( Count: word; var Map, Points; Color: word );\r
-procedure mxGouraudPoly( Count: word; var Map, Points, Colors; BaseColor: word );\r
-procedure mxTexturePoly( Count: word; var Map, Points, ImgPoints, Texture; Width: word );\r
-\r
-procedure mxOutStr( X, Y: integer; S: string );\r
-\r
-implementation\r
-\r
-procedure mxBitBlt;                                             external;\r
-procedure mxChangeMode( Mode: word );                           external;\r
-procedure mxCircle;                                             external;\r
-procedure mxColorToGray;                                        external;\r
-procedure mxFadePalette;                                        external;\r
-procedure mxFillBox;                                            external;\r
-procedure mxGammaCorrect;                                       external;\r
-procedure mxGetAspect( var AspectX, AspectY: word );            external;\r
-function  mxGetClipRegion;                                      external;\r
-function  mxGetClip: boolean;                                   external;\r
-procedure mxGetImage;                                           external;\r
-procedure mxGetPalette( Palette: pointer; Start, Count: word ); external;\r
-function  mxGetPixel( X, Y: word ): byte;                       external;\r
-procedure mxGetScreenSize( var Width, Height: word );           external;\r
-procedure mxGetTextStep( var DeltaX, DeltaY: integer );         external;\r
-function  mxGetVersion: word;                                   external;\r
-procedure mxGetVirtualScreen( var Width, Height: word );        external;\r
-procedure mxInit;                                               external;\r
-procedure mxLine( X1, Y1, X2, Y2: integer; Color, Op: word );   external;\r
-procedure mxOutChar( X, Y: integer; C: char );                  external;\r
-procedure mxOutText( X, Y: integer; S: pointer );               external;\r
-procedure mxPan( X, Y: word );                                  external;\r
-procedure mxPutImage;                                           external;\r
-procedure mxPutPixel( X, Y: word; C: byte );                    external;\r
-procedure mxPutTile;                                            external;\r
-procedure mxReadPlane( Plane: byte );                           external;\r
-procedure mxRotatePalette;                                      external;\r
-procedure mxRowAddress( RowAddress: byte );                     external;\r
-function  mxSetClip( Clip: boolean ): boolean;                  external;\r
-procedure mxSetClipRegion( X1, Y1, Width, Height: word );       external;\r
-procedure mxSetColor( Index, R, G, B: word );                   external;\r
-procedure mxSetFont( Font: pointer; Width, Height: word );      external;\r
-procedure mxSetMode( Mode: word );                              external;\r
-procedure mxSetPalette( Palette: pointer; Start, Count: word ); external;\r
-procedure mxSetTextColor( Color, Op: word );                    external;\r
-procedure mxSetTextStep( DeltaX, DeltaY: integer );             external;\r
-procedure mxSetVirtualScreen( Width, Height: word );            external;\r
-procedure mxSplitScreen( Line: word );                          external;\r
-procedure mxStartAddress( StartAddress: word );                 external;\r
-procedure mxStartLine;                                          external;\r
-procedure mxStretchImage;                                       external;\r
-procedure mxTerm;                                               external;\r
-procedure mxTransPutTile;                                       external;\r
-procedure mxWaitDisplay;                                        external;\r
-procedure mxWaitRetrace;                                        external;\r
-procedure mxWriteMode( Mode: byte );                            external;\r
-procedure mxWritePlane( Plane: byte );                          external;\r
-\r
-procedure mxFillPoly;                                           external;\r
-procedure mxGouraudPoly;                                        external;\r
-procedure mxTexturePoly;                                        external;\r
-{$L MXPB}\r
-{$L MXPF}\r
-{$L MXPG}\r
-{$L MXPT}\r
-\r
-{$L MXBB}\r
-{$L MXCC}\r
-{$L MXCG}\r
-{$L MXCL}\r
-{$L MXCR}\r
-{$L MXFB}\r
-{$L MXFP}\r
-{$L MXGI}\r
-{$L MXGM}\r
-{$L MXGP}\r
-{$L MXGV}\r
-{$L MXHL}\r
-{$L MXIT}\r
-{$L MXLN}\r
-{$L MXOT}\r
-{$L MXPI}\r
-{$L MXPN}\r
-{$L MXPP}\r
-{$L MXRA}\r
-{$L MXRP}\r
-{$L MXSA}\r
-{$L MXSC}\r
-{$L MXSI}\r
-{$L MXSL}\r
-{$L MXSM}\r
-{$L MXSP}\r
-{$L MXSS}\r
-{$L MXTL}\r
-{$L MXVS}\r
-{$L MXWD}\r
-{$L MXWM}\r
-{$L MXWP}\r
-{$L MXWR}\r
-\r
-(*\r
-   Prints a Turbo Pascal string.\r
-   Note: BP 7.0 supports ASCIIZ strings (PChar type).\r
-*)\r
-procedure mxOutStr;\r
-begin\r
-  S := S + #0;\r
-  mxOutText( X, Y, @S[1] );\r
-end;\r
-\r
-end.\r

diff --git a/16/lib/x0.7z b/16/lib/x0.7z
deleted file mode 100644 (file)
index 29e0fa5..0000000
Binary files a/16/lib/x0.7z and /dev/null differ