home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The C Users' Group Library 1994 August
/
wc-cdrom-cusersgrouplibrary-1994-08.iso
/
vol_300
/
340_01
/
ufc033.c
< prev
next >
Wrap
C/C++ Source or Header
|
1991-01-09
|
843b
|
37 lines
/*
Lattice C
ufc033.c
*/
/* variable fields */
#include "_UFC03.h"
#include "order.h"
main() {
/* save screen */
FKZ = 0;
_UNIF (&FKZ, FMT, FMT, &RET, &SM, Daten);
/* clear screen and display new format */
FKZ = 1;
ORDER:
memcpy(FMT, "order ", 8);
#include "order.i"
_UNIF (&FKZ, FMT, order.product, &RET, &SM, Daten);
/* same format when ESC */
if(RET == 99)
{ FKZ = 3; goto ORDER; }
/* program end when F10 */
if(RET == 110) goto ENDE;
/* display empty format */
FKZ = 4;
memcpy(FMT, "message ", 8);
#include "message.i"
_UNIF (&FKZ, FMT, FMT, &RET, &SM, Daten);
/* display new format without clear screen */
FKZ = 2;
goto ORDER;
/* display saved screen */
ENDE:
FKZ = 5;
_UNIF (&FKZ, FMT, FMT, &RET, &SM, Daten);
}