home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The C Users' Group Library 1994 August
/
wc-cdrom-cusersgrouplibrary-1994-08.iso
/
vol_300
/
309_01
/
test.c
< prev
next >
Wrap
Text File
|
1990-03-20
|
651b
|
27 lines
#include startup.h
#include headers\hercs.h
#include headers\acia.h
#include headers\dioboard.h
#code
main()
{
char ch, ch1;
initvideo();
initacia();
initdio();
ch1 = 0;
while( 1 ) {
writeattr("This is bold text",BOLD);
writeln(" ");
for( ch = 'a'; ch <= 'z'; ch++) {
writecharattr(ch, REVERSE);
writeleds(ch);
putchar(ch);
writeseg( ch1 ); ch1++;
if( ch1 > '9' ) ch1 = '0';
}
}
}