home *** CD-ROM | disk | FTP | other *** search
- /* (c) Marietta Systems, Inc. 1987
- * All rights reserved
- *
- * Program to demonstrate use of accept function
- */
- #include "mtest.h"
- void main() {
- int x = 2;
- byte text[16];
- clr_scrn("Accept test - 1");
- display("Enter column of numbers, press function key to end",
- 1, 1, high);
- set_crsr(x, 5);
- while (INCHAR != QUIT) {accept(text, decimal, alt_reverse, 9, 2);
- set_crsr(++x, 5);}
- goodbye(0);
- }