home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Columbia Kermit
/
kermit.zip
/
archives
/
scribe.zip
/
cyrgot-sample.c
< prev
next >
Wrap
C/C++ Source or Header
|
1992-06-01
|
1KB
|
36 lines
int u[] = {
129,130,140,141,160,161,162,163,164,165,166,167,169,170,175,
176,180,181,182,185,187,188,189,191,193,194,196,197,198,199,
200,207,214,218,219,220,221,222,223,224,225,230,235,237,238,
239,240,241,243,247,250,251
};
int nu = sizeof u / sizeof(int);
main() {
int i, x;
printf("@make(text)\n");
printf("@device(postscript)\n");
printf("@style(fontfamily=timescyrillic)\n");
printf("@define(X,facecode X,tabexport)\n");
printf("@define(Y,facecode Y,tabexport)\n");
printf("@heading(Cyrillic Gothic Character Table)\n");
printf("@begin(verbatim)\n");
for (i = 32; i < 127; i++) {
if (i == 64)
printf(" 64. @@x(@@) @x(@@)\n");
else if (i == 40 || i == 41)
printf("%3d. @@x<%c> @x<%c>\n",i,i,i);
else
printf("%3d. @@x(%c) @x(%c)\n",i,i,i);
}
for (i = 0; i < nu; i++) {
if (i < 26) x = 65;
else x = 71;
printf("%3d. @@y(%c) @y(%c)\n",u[i], i+x, i+x);
}
printf("@end(verbatim)\n");
}