Документ взят из кэша поисковой машины. Адрес оригинального документа : http://www.naic.edu/~phil/hardware/vertex/sharemegsvertex/lcu/pcr/user/v2_0d/MONI1.LST Дата изменения: Tue Mar 6 22:39:14 2001 Дата индексирования: Thu Jan 15 13:36:45 2009 Кодировка: Поисковые слова: m 80



CP581 PAGE 1
moni1 12-28-99
09:36:48

Line# Source Line Microsoft C Compiler Version 6.00A

1 #include "prog.h"
2 #include "extern.c"
3 void moni1(void)
4 {
5 unsigned int i; /* unsigned*/
6 char tpa0f[15];
7 outram(1,1,1,1,0x1100,0x0010,1," "); /* Clear Display */
8 outram(1,25,1,80,0x1100,0,1,"ш");
9 outram(1,1,20,20,0x1f00,0,42,"V E R T E X A N T E N N E N T E C H N I
K");
10 outram(2,2,1,80,0x1c00,0,1,"д");
11 outram(22,22,1,80,0x1c00,0,1,"д");
12 outram(3,3,30,30,0x1e00,0,22,"GREGORIAN DRIVE SYSTEM");
13
14 outram(23,23,51,51,0x3f00,0,9," F6 ");
15 outram(24,24,51,51,0x3f00,0,9,"I/O TABLE");
16
17 outram(7,7,3,3,0x1700,0,35,"MEASURED POSITION AZ deg.");
18 outram(8,8,3,3,0x1700,0,35,"MEASURED POSITION GD deg.");
19 outram(9,9,3,3,0x1700,0,35,"MEASURED POSITION CH deg.");
20 outram(10,10,3,3,0x1700,0,35,"READOUT ENCODER AZ 1 ");
21 outram(11,11,3,3,0x1700,0,35,"READOUT ENCODER AZ 2 ");
22 outram(13,13,3,3,0x1700,0,35,"MEASURED TORQUE AZ 11 ftlb");
23 outram(14,14,3,3,0x1700,0,35,"MEASURED TORQUE AZ 12 ftlb");
24 outram(15,15,3,3,0x1700,0,35,"MEASURED TORQUE AZ 51 ftlb");
25 outram(16,16,3,3,0x1700,0,35,"MEASURED TORQUE AZ 52 ftlb");
26 outram(17,17,3,3,0x1700,0,35,"MEASURED TORQUE AZ 41 ftlb");
27 outram(18,18,3,3,0x1700,0,35,"MEASURED TORQUE AZ 42 ftlb");
28 outram(19,19,3,3,0x1700,0,35,"MEASURED TORQUE AZ 81 ftlb");
29 outram(20,20,3,3,0x1700,0,35,"MEASURED TORQUE AZ 82 ftlb");
30
31 outram(13,13,42,42,0x1700,0,35,"MEASURED TORQUE GD 11 ftlb");
32 outram(14,14,42,42,0x1700,0,35,"MEASURED TORQUE GD 12 ftlb");
33 outram(15,15,42,42,0x1700,0,35,"MEASURED TORQUE GD 21 ftlb");
34 outram(16,16,42,42,0x1700,0,35,"MEASURED TORQUE GD 22 ftlb");
35 outram(17,17,42,42,0x1700,0,35,"MEASURED TORQUE GD 31 ftlb");
36 outram(18,18,42,42,0x1700,0,35,"MEASURED TORQUE GD 32 ftlb");
37 outram(19,19,42,42,0x1700,0,35,"MEASURED TORQUE GD 41 ftlb");
38 outram(20,20,42,42,0x1700,0,35,"MEASURED TORQUE GD 42 ftlb");
39 outram(10,10,42,42,0x1700,0,35,"MEASURED TORQUE CH 1 ftlb");
40 outram(11,11,42,42,0x1700,0,35,"MEASURED TORQUE CH 2 ftlb");
41
42
43 A:
44 taste();
45
46
47
48 ftext(m_pos[0],8,4,1,tpa0f);
49 outram(7,7,25,25,0x1700,0,8,tpa0f);
50
51 ftext(m_pos[1],8,4,1,tpa0f);
52 outram(8,8,25,25,0x1700,0,8,tpa0f);
53
54 ftext(m_pos[2],8,4,1,tpa0f);
55 outram(9,9,25,25,0x1700,0,8,tpa0f);


CP581 PAGE 2
moni1 12-28-99
09:36:48

Line# Source Line Microsoft C Compiler Version 6.00A

56
57 ftext(m_pos[3],9,0,10,tpa0f);
58 outram(10,10,25,25,0x1700,0,8,tpa0f);
59
60 ftext(m_pos[4],9,0,10,tpa0f);
61 outram(11,11,25,25,0x1700,0,8,tpa0f);
62
63 for(i=0;i<8;i++){
64 ftext1(m_torque[i],8,4,2,tpa0f);
65 outram(13+i,13+i,25,25,0x1700,0,8,tpa0f);
66 }
67
68 for(i=0;i<8;i++){
69 ftext1(m_torque[i+8],8,4,3,tpa0f);
70 outram(13+i,13+i,64,64,0x1700,0,8,tpa0f);
71 }
72
73 for(i=0;i<2;i++){
74 ftext1(m_torque[i+16],8,4,3,tpa0f);
75 outram(10+i,10+i,64,64,0x1700,0,8,tpa0f);
76 }
77
78
79
80 if(itaste==27) /* Taste ESC */
81 goto E;
82
83 if(itaste == 160){ /* Taste F6 */
84 io();
85 goto E;
86 }
87
88 goto A;
89 E: cursor(0); /* Cursor ausschalten */
90 return;
91 }


moni1 Local Symbols

Name Class Type Size Offset Register

tpa0f . . . . . . . . . . auto -0012
i . . . . . . . . . . . . auto -0002


Global Symbols

Name Class Type Size Offset

cursor. . . . . . . . . . extern far function *** ***
ftext . . . . . . . . . . extern far function *** ***
ftext1. . . . . . . . . . extern far function *** ***
io. . . . . . . . . . . . extern far function *** ***
itaste. . . . . . . . . . extern int 2 ***
m_pos . . . . . . . . . . extern struct/array 20 ***


CP581 PAGE 3
moni1 12-28-99
09:36:48

Microsoft C Compiler Version 6.00A


Global Symbols

Name Class Type Size Offset

m_torque. . . . . . . . . extern struct/array 36 ***
moni1 . . . . . . . . . . global far function *** 0000
outram. . . . . . . . . . extern far function *** ***
taste . . . . . . . . . . extern far function *** ***

Code size = 05a4 (1444)
Data size = 03a0 (928)
Bss size = 0000 (0)

No errors detected