UK:tape winder? Atlas Autocode charset (flexowriter) conversion?

here is something I wrote to decode some pdp-1 tapes note that not all characters have ASCII equivalents. #include <stdio.h> char cvt[] = { ' ', '"', 0x27, '~', '.', '.', '.', '<', /* 00 - 07 */ '>', '^', '.', '.', '.', '.', '.', '.', /* 10 - 17 */ '.', '?', 'S', 'T', 'U', 'V', 'W', 'X', /* 20 - 27 */ 'Y', 'Z', '.', '=', '.', '.', '\t', '.', /* 30 - 37 */ '.', 'J', 'K', 'L', 'M', 'N', 'O', 'P', /* 40 - 47 */ 'Q', 'R', '.', '.', '+', ']', '|', '[', /* 50 - 57 */ '.', 'A', 'B', 'C', 'D', 'E', 'F', 'G', /* 60 - 67 */ 'H', 'I', '.', 'x', '.', '.', '.', '\n' /* 70 - 77 */ }; char cvtl[] ={ ' ', '1', '2', '3', '4', '5', '6', '7', /* 00 - 07 */ '8', '9', '.', '.', '.', '.', '.', '.', /* 10 - 17 */ '0', '/', 's', 't', 'u', 'v', 'w', 'x', /* 20 - 27 */ 'y', 'z', '.', ',', '.', '.', '\t', '.', /* 30 - 37 */ '.', 'j', 'k', 'l', 'm', 'n', 'o', 'p', /* 40 - 47 */ 'q', 'r', '.', '.', '-', ')', '.', '(', /* 50 - 57 */ '.', 'a', 'b', 'c', 'd', 'e', 'f', 'g', /* 60 - 67 */ 'h', 'i', '.', '.', '.', '.', '.', '\n' /* 70 - 77 */ }; main() { char c; int state = 0; while(!feof(stdin)){ c = getchar() & 0x3f; if (c == 072) {state = 0; continue;} /* lower case */ if (c == 074) {state = 1; continue;} /* upper case */ if(state){ if(cvt[c] == '.') { printf(">>%02o<<",c); continue;} putchar(cvt[c]); } else{ if(c != 073) {if(cvtl[c] == '.') {printf(">>%02o<<",c); continue;}} putchar(cvtl[c]); } } }