From: "DeHackEd" <notgiven AT out DOT com>
Newsgroups: comp.os.msdos.djgpp
References: <36435c09 DOT 5006295 AT news DOT algonet DOT se>
Subject: Re: Wait_retrace function?
Lines: 41
X-Newsreader: Microsoft Outlook Express 4.72.3110.5
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Message-ID: <M_N02.524$q%3.524203@cabot.ops.attcanada.net>
Date: Sat, 07 Nov 1998 02:10:52 GMT
NNTP-Posting-Host: 142.194.222.12
NNTP-Posting-Date: Sat, 07 Nov 1998 02:10:52 GMT
To: djgpp AT delorie DOT com
DJ-Gateway: from newsgroup comp.os.msdos.djgpp
Reply-To: djgpp AT delorie DOT com

#include <stdio.h>
#include <allegro.h>

volatile int retr=0;

void ret_proc()
{
   retr++;
}
END_OF_FUNCTION(ret_proc)


int main()
{
   allegro_init();
   install_timer();
   install_keyboard();
   LOCK_VARIABLE(retr);
   LOCK_FUNCTION(ret_proc);
   retrace_proc = ret_proc;
   set_gfx_mode(GFX_AUTODETECT, 640, 480, 0, 0);
   while (!keypressed())
      textprintf(screen, font, 0, 0, 5, "%d", retr);
   allegro_exit();
   return 0;

}


// This should make a small number go in the corner of you screen.
// Any key makes it exit. Should work on any computer (did for mine).

--
"DeHackEd"

My Email address in the header is fake (spammers). Email me at this address:

http://www.geocities.com/cgi-bin/homestead/mail.pl?dehacked