Return to bcd.c CVS log

Up to [Research Unix] / researchv10no / games

Annotation of researchv10no/games/bcd.c, revision 1.1.1.1

1.1       root        1: #include <stdio.h>
                      2: 
                      3: int chtab[] = {
                      4: 00000, /*   */
                      5: 03004, /* ! */
                      6: 02404, /* " */
                      7: 02040, /* sharp */
                      8: 02042, /* $ */
                      9: 02104, /* % */
                     10: 00001, /* & */
                     11: 03002, /* ' */
                     12: 02201, /* ( */
                     13: 02202, /* ) */
                     14: 02102, /* * */
                     15: 00005, /* + */
                     16: 02044, /* , */
                     17: 00002, /* - */
                     18: 02041, /* . */
                     19: 00014, /* / */
                     20: 00004, /* 0 */
                     21: 00010, /* 1 */
                     22: 00020, /* 2 */
                     23: 00040, /* 3 */
                     24: 00100, /* 4 */
                     25: 00200, /* 5 */
                     26: 00400, /* 6 */
                     27: 01000, /* 7 */
                     28: 02000, /* 8 */
                     29: 04000, /* 9 */
                     30: 02200, /* : */
                     31: 02402, /* ; */
                     32: 02401, /* < */
                     33: 02204, /* = */
                     34: 02400, /* > */
                     35: 03000, /* ? */
                     36: 02100, /* at */
                     37:  011,
                     38:  021,
                     39:  041,
                     40: 0101,
                     41: 0201,
                     42: 0401,
                     43: 01001,
                     44: 02001,
                     45: 04001,
                     46: 012,
                     47: 022,
                     48: 042,
                     49: 0102,
                     50: 0202,
                     51: 0402,
                     52: 01002,
                     53: 02002,
                     54: 04002,
                     55: 024,
                     56: 044,
                     57: 0104,
                     58: 0204,
                     59: 0404,
                     60: 01004,
                     61: 02004,
                     62: 04004,
                     63: 02020, /* [ */
                     64: 03001, /* \ */
                     65: 02101, /* ] */
                     66: 00006, /* ^ */
                     67: 02024 /* _ */
                     68: };
                     69:        char s[128];
                     70: 
                     71: char *sp = s;
                     72: 
                     73: main(argc, argv)
                     74: char *argv[];
                     75: {
                     76:        char *spp;
                     77:        int i;
                     78:        int j;
                     79:        int c;
                     80:        int l;
                     81: 
                     82:        if (argc<2) {
                     83:                puts("$ ");
                     84:                while ((c = getchar()) != EOF && c != '\n')
                     85:                        *sp++ = c;
                     86:                *sp = 0;
                     87:                sp = &s[0];
                     88:        } else
                     89:                sp = *++argv;
                     90:        puts("\n\n\n\n");
                     91:        puts(" ________________________________");
                     92:        puts("________________\n");
                     93:        spp = sp;
                     94:        while(*spp++);
                     95:        spp--;
                     96:        l = spp - sp;
                     97:        putchar('/');
                     98:        puts(sp);
                     99:        i = 49 - l;
                    100:        while(--i>0) putchar(' ');
                    101:        puts("|\n");
                    102:        j = 0;
                    103:        spp = sp;
                    104:        while (j++<12) {
                    105:                putchar('|');
                    106:                i = 0;
                    107:                spp = sp;
                    108:                while (i<48) {
                    109:                        c = *spp++ - 040;
                    110:                        i++;
                    111:                        if (c>='a'-040) c = c - 040;
                    112:                        if (i>l) c = 0;
                    113:                        if (c<0 || c>137) c = 0;
                    114:                        if ((chtab[c]>>(j-1))&1) 
                    115:                                puts("[\b]");
                    116:                        else
                    117:                                putchar(j>3?'0'+j-3:' ');
                    118:                }
                    119:                puts("|\n");
                    120:        }
                    121:        putchar('|');
                    122:        puts("____________");
                    123:        puts("____________________________________");
                    124:        puts("|\n");
                    125:        puts("\n\n\n\n");
                    126: }
                    127: 
                    128: puts(ss) char *ss; {
                    129:        char t;
                    130:        while(t = *ss++) {
                    131:                if(t >= 'a' && t <= 'z')
                    132:                        t += 'A'-'a';
                    133:                putchar(t);
                    134:        }
                    135: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.