|
|
1.1 root 1: /*
2: * ibm characters
3: */
4: #define KEY_N '8': case 'A'
5: #define KEY_E '6': case 'C'
6: #define KEY_S '5': case '2': case 'B'
7: #define KEY_W '4': case 'D'
8: #define KEY_C '0': case '*': case '+': case '@'
9:
10: #define curs(r,c) {caddr=(80*(r)+(c))*2;}
11: int caddr;
12:
13: #define P_HALF 1
14: #define P_GFLP 0
15:
16: char p_c[3][4][2][3][2] = {
17: 7, '\333', 7, '\333', 7, '\333', 7, '\333', 7, '\333', 7, '\040',
18: 7, '\333', 7, '\333', 7, '\333', 7, '\337', 7, '\337', 7, '\337',
19: 7, '\333', 7, '\333', 7, '\333', 7, '\040', 7, '\333', 7, '\333',
20: 7, '\333', 7, '\333', 7, '\333', 7, '\334', 7, '\334', 7, '\334',
21: 7, '\334', 7, '\334', 7, '\334', 7, '\334', 7, '\334', 7, '\040',
22: 7, '\334', 7, '\334', 7, '\334', 7, '\334', 7, '\334', 7, '\334',
23: 7, '\334', 7, '\334', 7, '\334', 7, '\040', 7, '\334', 7, '\334',
24: 7, '\334', 7, '\334', 7, '\334', 7, '\040', 7, '\040', 7, '\040',
25: 7, '\337', 7, '\337', 7, '\337', 7, '\337', 7, '\337', 7, '\040',
26: 7, '\337', 7, '\337', 7, '\337', 7, '\040', 7, '\040', 7, '\040',
27: 7, '\337', 7, '\337', 7, '\337', 7, '\040', 7, '\337', 7, '\337',
28: 7, '\337', 7, '\337', 7, '\337', 7, '\337', 7, '\337', 7, '\337'
29: };
30: char p_cc[2][3][2] = {
31: 7, '\333', 7, '\333', 7, '\333',
32: 7, ' ', 7, ' ', 7, ' '
33: };
34: char g_c[4][4][3][3][2] = {
35: 120, '\020', 120, '\137', 120, '\020', 10, '\020', 10, '\026', 10, '\020',
36: 10, '\020', 10, '\040', 10, '\020',
37: 120, '\037', 120, '\137', 120, '\037', 10, '\037', 10, '\026', 10, '\037',
38: 10, '\037', 10, '\040', 10, '\037',
39: 120, '\021', 120, '\137', 120, '\021', 10, '\021', 10, '\026', 10, '\021',
40: 10, '\021', 10, '\040', 10, '\021',
41: 120, '\036', 120, '\137', 120, '\036', 10, '\036', 10, '\026', 10, '\036',
42: 10, '\036', 10, '\040', 10, '\036',
43: 120, '\020', 120, '\137', 120, '\020', 10, '\020', 10, '\026', 10, '\020',
44: 10, '\020', 10, '\040', 10, '\020',
45: 120, '\037', 120, '\137', 120, '\037', 10, '\037', 10, '\026', 10, '\037',
46: 10, '\037', 10, '\040', 10, '\037',
47: 120, '\021', 120, '\137', 120, '\021', 10, '\021', 10, '\026', 10, '\021',
48: 10, '\021', 10, '\040', 10, '\021',
49: 120, '\036', 120, '\137', 120, '\036', 10, '\036', 10, '\026', 10, '\036',
50: 10, '\036', 10, '\040', 10, '\036',
51: 120, '\020', 120, '\137', 120, '\020', 10, '\020', 10, '\026', 10, '\020',
52: 10, '\020', 10, '\040', 10, '\020',
53: 120, '\037', 120, '\137', 120, '\037', 10, '\037', 10, '\026', 10, '\037',
54: 10, '\037', 10, '\040', 10, '\037',
55: 120, '\021', 120, '\137', 120, '\021', 10, '\021', 10, '\026', 10, '\021',
56: 10, '\021', 10, '\040', 10, '\021',
57: 120, '\036', 120, '\137', 120, '\036', 10, '\036', 10, '\026', 10, '\036',
58: 10, '\036', 10, '\040', 10, '\036',
59: 120, '\020', 120, '\137', 120, '\020', 10, '\020', 10, '\026', 10, '\020',
60: 10, '\020', 10, '\040', 10, '\020',
61: 120, '\037', 120, '\137', 120, '\037', 10, '\037', 10, '\026', 10, '\037',
62: 10, '\037', 10, '\040', 10, '\037',
63: 120, '\021', 120, '\137', 120, '\021', 10, '\021', 10, '\026', 10, '\021',
64: 10, '\021', 10, '\040', 10, '\021',
65: 120, '\036', 120, '\137', 120, '\036', 10, '\036', 10, '\026', 10, '\036',
66: 10, '\036', 10, '\040', 10, '\036'
67: };
68: int g_i[4] = {2, 3, 3, 3};
69: char e_c[2][2] = {10, '\4', 10, ' '};
70: char f_c[2] = {10, '\7'};
71: char b_c[2] = {7, ' '};
72: char w_c[2] = {10, '\333'};
73: char d_c[2] = {10, '\304'};
74: char r_c[2] = {10};
75: char s_a = 10;
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.