Here is the latest source release of my 3D Graphics Demo, ported into Complete Pascal for the Apple IIgs. This program was originally written around 1995 in C++ on a Unix machine whilst I was still at University. The program demonstrates basic 3D geometry functions, fixed point mathematics using the IIgs Toolbox (IntMath) to vastly improve performance (even though it is still fairly slow), loading resources, and some advanced Pascal usage including structures, pointers, and memory allocation.
My original program supported Gouraud shading, but I have scaled this program back to wireframe and filled polygons to take into consideration the difference in CPU power. I have left some of the former functions in the code even though (at this stage) they are not utilised.
Anyway, I hope the code isn't too messy - as it is still a work in progress.
Last Updated: 18th Sept 2007 |