Back to home page

DOS ain't dead

Forum index page

Log in | Register

Search:  
Back to the forum
Board view  Mix view

DOS Game - Galactic Conquest v9.00 test (Announce)

posted by Arjay, 11.12.2009, 13:59

Hi Jason,

Ok I have quickly checked re my TP7 fixed font code. Looks a pretty straight forward for me to release it as there are only 3 units involved with this one:

29/12/1997 10,523 win3font.pas - FON/FNT file definition in TP7 format
18/01/1998 2,616 rjmem.pas - Basically my own malloc code (used widely)
30/12/1997 3,121 loadres.pas - Wrapper (calls other units-I will drop out)

In short this is an basic example of my using my library from within TP:
-----------------------------------------------------------------------------
Write('# Resources - LoadFont(GrubFont) status : ');
If GrubFnt=nil then
Begin
Writeln('Failed!!!');
HALT(1);
End
else
Begin
Writeln('Successful!');
End;
GrubCharFnt:=LoadFont('GRUBCHAR.FNT', 0);{GRUBCHAR}
Write('# Resources - LoadFont(GrubCharFont) status : ');
If GrubCharFnt=nil then
Begin
If GrubFnt<>nil then LoseFont(GrubFnt);
Writeln('Failed!!!');
HALT(1);
End
else
Begin
Writeln('Successful!');
End;
-----------------------------------------------------------------------------

And an example of a Game's startup screen where I am calling that code:
-------------------------------------------------------------------------------
Please wait, initialising....

# Version - GrubWorm v0.01a (BETA - DO NOT DISTRIBUTE!)
# Monitor - Colour VGA
# CPU - 80486 (or above)
# DOS - v5.0 (Windows not loaded)
# Resources - LoadFont(GrubFont) status : Successful!
# Resources - LoadFont(GrubCharFont) status : Successful!

Please wait loading the amazing BGI graphics drivers.................... :-)
-------------------------------------------------------------------------------

I'm happy to release a modified version of my code if you feel it would help?

Regards Richard

Post reply
 

Complete thread:

Back to the forum
Board view  Mix view
22762 Postings in 2122 Threads, 402 registered users (0 online)
DOS ain't dead | Admin contact
RSS Feed
powered by my little forum