Turbo Pascal 6.0 Source Code

*** You should be able to compile with Borland/Turbo Pascal 7 as well. ***
Other compilers may require modification of the source code.

Download all files here (one ZIP).

Directory Last Updated Brief description
ANSI 01/01/94 Unit for displaying ANSI files. ANSI files are just special text files that contain ANSI escape sequences for manipulating the text screen. They usually contain 'graphic' images. This unit can handle most, but not all, of the possible ANSI commands. Originally written for my cousin's use.
CRCCHECK 01/01/94 Shows a useful way to utilize a 32-bit CRC for file protection. When run, it calculates the 32-bit CRC of every file in the current directory and compares this against a previously stored CRC file. The implementation is rather primitive, but this was never meant to be a full featured commercial product, either!
DEEP_P 05/11/93 This is a text game which I originally found in a computer magazine back in the early '80s. It was written in BASIC for the IBM PC. This Pascal program is my translation of my COBOL version of this program, so it is very rough around the edges. I include it in 3 different stages so you can see how I translate Pascal programs into pure assembler.
DNAGRAPH 01/01/94 Displays a graphical representation of a DNA sequence contained in an external file, which can be generated by this program. Allows vertical scrolling of the double-helix structure. Originally written for my cousin for a high school project. Good example program for showing how to use the BGI features, and also shows how to include the BGI file into the EXE file.
EMS 07/24/96 Unit for accessing all of the EMS 4.0 functions from Turbo Pascal, including the operating system functions 59xxH, 5BxxH and 5DxxH. All functions return a status code, even for those functions where the actual EMS function does not.
INTEREST 04/19/93 A program I wrote when I was helping my brother shop for a car. Not the best in the world, but it works OK for car loans and such. Allows you to enter three of the four variables (out of length of loan, amount of loan, interest rate and monthly payment) and it computes the fourth for you.
JOYSTICK 07/23/96 Unit to provide joystick support to your Pascal program. Although there is a standard BIOS call for joystick support, many machines either don't support it or support it only partially. This unit reads the hardware directly, so you don't need the BIOS support. This unit also provides an interface to emulate digital joysticks. See the assembler section for a joystick driver TSR.
NUM2STR 06/15/96 Converts numeric input into a string containing the number in English (e.g. 1254 --> 'One Thousand Two Hundred and Fifty-Four'. I wrote this for someone who was writing a check-printing application. It's extremely easy to convert to another language, and it's also easy to remove the 'and's. Currently works with longints, but should be easy to modify for reals.
T2G 01/01/94 Interesting little program which converts a text screen into a graphics screen. It reads the text from the screen, changes to a graphic mode, then draws the original text onto the screen. This working example shows you how you can write programs which display text in a graphics mode without using the BGI routines.
T2G_VESA 01/01/94 Same as above, except draws in a 256 color VESA mode instead of a 16 color VGA mode. Requires VESA support.
XMS 07/20/97 Unit for accessing all of the XMS 3.0 functions from Turbo Pascal, including the optional UMB functions and the extended 32-bit functions. Written such that all functions return an error code and a status code, even for those functions where the actual XMS function does not. Includes a demonstration program and an XMS speed testing program.

Have a suggestion or request for something you want to see here? Let me know! I only put up some of my stuff here.  I have lots of other stuff that I've written over the years.


Download all files here (one ZIP).


Top Return to top of page

Mail Talk to me: wdecorie@yahoo.com

Back Back to Home Page

This page was last modified on June 25, 2002.

1