Annotation of researchv10no/cmd/2500/status.c, revision 1.1

1.1     ! root        1: #include       "hdr.h"
        !             2: 
        !             3: static char *msg[13][8][2] =
        !             4: {
        !             5: /* 0 */        0, 0,                           0, 0,
        !             6:        "tape mounted", "no tape",      "servo ref ok", "servo ref missing",
        !             7:        "tape ok", "tape trouble",      0, "hard error",
        !             8:        0, 0,                           "remote", "local",
        !             9: /* 1 */        0, "standby",                   0, 0,
        !            10:        0, "stop",                      0, 0,
        !            11:        0, "rew",                       0, "ff",
        !            12:        0, "rec",                       0, "play",
        !            13: /* 2 */        0, "servo lock",                0, "tso mode",
        !            14:        0, "shuttle",                   0, "jog",
        !            15:        0, "var",                       "tape fwd", "tape rev",
        !            16:        0, "still",                     0, "cue up",
        !            17: /* 3 */        0, "auto mode",                 0, 0,
        !            18:        0, 0,                           0, 0,
        !            19:        0, "a out",                     0, "a in",
        !            20:        0, "out",                       0, "in",
        !            21: /* 4 */        0, "select e-e on",             0, "full e-e on",
        !            22:        0, "search to cue",             0, "edit",
        !            23:        0, "review",                    0, "auto edit",
        !            24:        0, "preview",                   0, "preroll",
        !            25: /* 5 */        0, 0,                           0, "insert",
        !            26:        0, "assemble",                  0, "video",
        !            27:        0, "sync/a4",                   0, "a3",
        !            28:        0, "a2",                        0, "a1",
        !            29: /* 6 */        0, 0,                           0, "lamp still",
        !            30:        0, "lamp fwd",                  0, "lamp rew",
        !            31:        0, "search led 8",              0, "search led 4",
        !            32:        0, "search led 2",              0, "search led 1",
        !            33: /* 7 */        0, "variable memory mode",      0, "var mem active",
        !            34:        0, "audio split mode",          0, 0,
        !            35:        0, "display hold",              0, "spot erase",
        !            36:        0, 0,                           0, "in-out status",
        !            37: /* 8 */        0, "BUZZER ALARM",              0, "LOST LOCK",
        !            38:        0, "near eot",                  0, "eot",
        !            39:        0, "color frame lock",          0, "SERVO ALARM",
        !            40:        0, "SYSTEM ALARM",              0, "rec inhibit",
        !            41: /* 9 */        0, "function abort",            0, 0,
        !            42:        0, 0,                           0, "video dropout",
        !            43:        0, "sync dropout",              0, 0,
        !            44:        0, 0,                           0, 0,
        !            45: /* a */        0, "rev step",                  0, "fwd step",
        !            46:        0, "dt step execute",           0, "dt preview",
        !            47:        0, "dt rec ready",              0, "slow rec",
        !            48:        0, "step rec",                  0, "still rec",
        !            49: /* b */        "dt rec field", "dt rec frame", "dt rec step field", "dt rec step frame",
        !            50:        "DT field", "DT frame",         "PB step field", "PB step frame",
        !            51:        0, "color field detect",        0, "cf addr 4",
        !            52:        0, "cf addr 2",                 0, "cf addr 1",
        !            53: /* c */        0, 0,                           0, 0,
        !            54:        0, 0,                           0, 0,
        !            55:        0, 0,                           0, 0,
        !            56:        0, "data-2",                    0, "data-1",
        !            57: };
        !            58: 
        !            59: status(full)
        !            60: {
        !            61:        char buf[64];
        !            62:        register i, j;
        !            63:        int hi, lo;
        !            64:        char *s;
        !            65: 
        !            66:        if(cmd(0xD, "status", buf, "%c%c%c", 0x61, 0x20, BYTE(0, 0xD)))
        !            67:                return;
        !            68:        if(full)
        !            69:                lo = 0, hi = 0xD;
        !            70:        else
        !            71:                lo = 0, hi = 2;
        !            72:        for(j = lo; j < hi; j++){
        !            73:                Fprint(1, "%x:[%2.2x] ", j, buf[j+2]&0xFF);
        !            74:                for(i = 7; i >= 0; i--){
        !            75:                        if(s = msg[j][7-i][(buf[j+2]>>i)&1])
        !            76:                                Fwrite(1, s, strlen(s));
        !            77:                        Fputc(1, ',');
        !            78:                }
        !            79:                Fputc(1, '\n');
        !            80:        }
        !            81:        Fflush(1);
        !            82: }
        !            83: 
        !            84: status1(start)
        !            85: {
        !            86:        char buf[64];
        !            87: 
        !            88:        if(cmd(1, "status1", buf, "%c%c%c", 0x61, 0x20, BYTE(start, 1)))
        !            89:                buf[2] = 0;
        !            90:        return(buf[2]);
        !            91: }

unix.superglobalmegacorp.com

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