dos-tpdemos

KO | EN

gitlite — search

#javascript #react #ai #android #rust #docker #macos #windows #awesome #awesome-list #pytorch #ios #mcp #openai

(★ 40)

Retro programming in Borland Turbo Pascal 7

dos-tpdemos Latest Version Download

Download Latest Version (.zip)

// repository documentation

Was this content helpful?

★ 0 (0 ratings)

# dos-tpdemos

Retro programming in Borland Turbo Pascal 7

![Screenshot](https://raw.githubusercontent.com/johangardhage/dos-tpdemos/master/screenshots/tp.png "Turbo Pascal IDE")

## Prerequisites

To build and run the Borland Turbo Pascal demos, you must first install the following tools:

- [DOSBox](https://www.dosbox.com/download.php)
- [Borland Turbo Pascal](https://winworldpc.com/product/turbo-pascal/7x)

### Install DOSBox

#### openSUSE

`$ sudo zypper install dosbox mtools p7zip-full`

#### Ubuntu

`$ sudo apt install dosbox mtools p7zip-full`

#### Configuration

When starting `dosbox` the first time, the configuration file `~/.dosbox/dosbox-0.74-2.conf` will be generated

### Install Borland Turbo Pascal

1. Download `Borland Turbo Pascal 7.1 (3.5).7z`

1. Create a directory which will contain the DOS C: drive
   ```
   $ mkdir ~/DOSBox
   ```

1. Extract the downloaded Turbo Pascal archive
   ```
   $ 7z x "Borland Turbo Pascal 7.1 (3.5).7z"
   ```

1. Extract the Borland Turbo Pascal disk images
   ```
   $ cd "Borland Turbo Pascal 7.1 (3.5)"/
   $ mkdir tpsetup
   $ for i in *.img; do echo $i; mcopy -m -i $i :: tpsetup; done
   ```

1. Move the extracted files to the DOS C: drive
   ```
   $ mv tpsetup ~/DOSBox/
   ```

1. Configure DOSBox

Edit `~/.dosbox/dosbox-0.74-2.conf` and add the following autoexec options
   ```
   [autoexec]
   mount c ~/DOSBox
   path %PATH%;C:\TP\BIN
   c:
   ```

1. Start `dosbox`and execute the Borland Turbo Pascal installation program
   ```
   $ dosbox
   C:\> cd tpsetup
   C:\TPSETUP> install.exe
   ```
   In the installation program, select the following options
   ```
   Enter the SOURCE drive to use: C
   Enter the SOURCE Path: \TPSETUP
   Install Turbo Pascal on a Hard Drive
   Start Installation
   ```

## Build demos

Link the `dos-tpdemos` git repository to the DOS C: drive
```
$ ln -s ~/git/github/dos-tpdemos ~/DOSBox/tpdemos
```

#### Build demos from DOS terminal

1. Execute build script
   ```
   C:\TPDEMOS> buildall.bat
   ```
   The demos will be located in the `C:\TPDEMOS\BUILD` directory

1. Run demo
   ```
   C:\TPDEMOS> build\demo01.exe
   ```

#### Build demos from Borland Turbo Pascal IDE

1. Start Borland Turbo Pascal IDE
   ```
   C:\TPDEMOS> turbo
   ```

1. Configure Borland Turbo Pascal

Press `ALT+O` for options

Select `Directories` and type in the following directories
   ```
   EXE & TPU directory: C:\TPDEMOS\BUILD
   Include directories: C:\TPDEMOS\ASSETS
   Unit directories: C:\TP\UNITS;C:\TPDEMOS\SRC\LIB
   ```

Select `Compiler` and the following options
   ```
   [X] 286 instructions
   ```

Select `Environment`, `Preferences` and the following options
   ```
   [ ] Auto save
   [ ] Change dir on open
   ```

Select `Environment`, `Editor` and the following options
   ```
   [ ] Create backup files
   ```

Select `Save`

1. Open demo source file

Press `F3` to open file

1. Build demo source file

Press `F9` to build file

1. Run demo

Press `ALT+R` and `R` to run demo

## License

Licensed under MIT license. See [LICENSE](LICENSE) for more information.

## Authors

* Johan Gardhage

## Screenshots

![Screenshot](https://raw.githubusercontent.com/johangardhage/dos-tpdemos/master/screenshots/demo01.png "Dot cube")
![Screenshot](https://raw.githubusercontent.com/johangardhage/dos-tpdemos/master/screenshots/demo02.png "Dot torus with z light source")
![Screenshot](https://raw.githubusercontent.com/johangardhage/dos-tpdemos/master/screenshots/demo03.png "Dot ball with z light source")
![Screenshot](https://raw.githubusercontent.com/johangardhage/dos-tpdemos/master/screenshots/demo04.png "Dot tunnel with z light source")
![Screenshot](https://raw.githubusercontent.com/johangardhage/dos-tpdemos/master/screenshots/demo05.png "Starfield with z light source")
![Screenshot](https://raw.githubusercontent.com/johangardhage/dos-tpdemos/master/screenshots/demo06.png "Rotating starfield with z light source")
![Screenshot](https://raw.githubusercontent.com/johangardhage/dos-tpdemos/master/screenshots/demo07.png "Morphing dot objects with z light source")
![Screenshot](https://raw.githubusercontent.com/johangardhage/dos-tpdemos/master/screenshots/demo08.png "Wireframe cube")
![Screenshot](https://raw.githubusercontent.com/johangardhage/dos-tpdemos/master/screenshots/demo09.png "Hiddenline wireframe cube")
![Screenshot](https://raw.githubusercontent.com/johangardhage/dos-tpdemos/master/screenshots/demo10.png "Flat shaded object with z light source")
![Screenshot](https://raw.githubusercontent.com/johangardhage/dos-tpdemos/master/screenshots/demo11.png "Flat shaded cube with z light source")
![Screenshot](https://raw.githubusercontent.com/johangardhage/dos-tpdemos/master/screenshots/demo12.png "Flat shaded cube with real light source")
![Screenshot](https://raw.githubusercontent.com/johangardhage/dos-tpdemos/master/screenshots/demo13.png "Flat shaded cube on fire with z light source")
![Screenshot](https://raw.githubusercontent.com/johangardhage/dos-tpdemos/master/screenshots/demo14.png "Gouraud shaded object")
![Screenshot](https://raw.githubusercontent.com/johangardhage/dos-tpdemos/master/screenshots/demo15.png "Gouraud shaded cube with z light source")
![Screenshot](https://raw.githubusercontent.com/johangardhage/dos-tpdemos/master/screenshots/demo16.png "Gouraud shaded cube with real light source")
![Screenshot](https://raw.githubusercontent.com/johangardhage/dos-tpdemos/master/screenshots/demo17.png "Glenzvector object")
![Screenshot](https://raw.githubusercontent.com/johangardhage/dos-tpdemos/master/screenshots/demo18.png "Glenzvector cube with z light source")
![Screenshot](https://raw.githubusercontent.com/johangardhage/dos-tpdemos/master/screenshots/demo19.png "Texture mapped cube")
![Screenshot](https://raw.githubusercontent.com/johangardhage/dos-tpdemos/master/screenshots/demo20.png "Vector balls")

dos-tpdemos

dos-tpdemos Latest Version Download

Today's picks

Was this content helpful?

Recent Feedback

dos-tpdemos

dos-tpdemos Latest Version Download

Today's picks

Was this content helpful?

Recent Feedback

Download README