home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Vectronix 2
/
VECTRONIX2.iso
/
FILES_07
/
LATTIC_3.ZIP
/
EXAMPLES
/
TESTAUT.C
< prev
next >
Wrap
C/C++ Source or Header
|
1990-05-04
|
815b
|
50 lines
/*
* testaut.c - A simple auto detection testing program
*
* This program is built using the auto-detecting startup stubs, caut.o:
*
* lc -Lag -v -td testaut
*
* Started 4/5/90 Alex G. Kiernan
*
* Copyright (c) 1990 HiSoft
*/
#include <aes.h>
int main(void)
{
extern int _XMODE;
short msg[8];
switch(_XMODE)
{
case 0:
appl_init();
form_alert(1,"[1][I am a GEM Program][OK]");
appl_exit();
break;
case 1:
puts("I'm a TOS proggy");
getch();
break;
case 2:
menu_register(appl_init()," My DA Entry");
for (;;)
{
evnt_mesag(msg);
if (msg[0]==AC_OPEN)
form_alert(1,"[1][I am a Desk Accessory][OK]");
}
break;
case 3:
puts("I'm an auto folder proggy");
getch();
break;
}
return 0;
}