1 while (PR <5)// передаємо преамбулу
1 {ACC = PREAMBLE;// для контролю парності
100 2 TB8 = P;
2 SBUF = PREAMBLE;
2 while (TI == 0) {}
103 2 TI = 0;
2 PR + +;
2}
1
1 ACC = STRT;// для контролю парності
1 TB8 = P;
1 SBUF = STRT;// передаємо STRT
110 1 while (TI == 0) {}
1 TI = 0;
1
113 1 ACC = ADDR;
114 1 TB8 = P;
1 SBUF = ADDR;// передаємо адресу
116 1 while (TI == 0) {}
1 TI = 0; COMPILER V9.50a STARTUP 12/27/2012 1:05:46 PAGE 3
1
1 ACC = COM;
1 TB8 = P;
1 SBUF = COM;//
1 while (TI == 0) {}
1 TI = 0;
1
1 ACC = BCNT;
126 1 TB8 = P;
1 SBUF = BCNT;// кількість залишилися байт
128 1 while (TI == 0) {}
1 TI = 0;
1
1 ACC = STATUS [0];
1 TB8 = P;
1 SBUF = STATUS [0];//
1 while (TI == 0) {}
1 TI = 0;
1
1 ACC = STATUS [1];
1 TB8 = P;
1 SBUF = STATUS [1];//
1 while (TI == 0) {}
141 1 TI = 0;
142 1 ACC = CHK;
1 TB8 = P;
1 SBUF = CHK;// контрольна сума
145 1 while (TI == 0) {}
1 TI = 0;
1
1
1///---------- ЦАП ------------////
1 I_mA [ADDR] = 0.64 * I [ADDR] +4;//
1 kod_DAC [ADDR] = I_mA [ADDR] * kod_na_1mA;// передається код ЦАП
152 1
1// початок передачі
1 CLOCK = 0;
1 DATA = 0;
1 LATCH = 0;
1
1 LATCH = 1;
1 DATA = (kod_DAC [ADDR]>> sdvig) &1;// виділяємо старших біт
160 1 P3 = DATA;//
1
1 LATCH = 0;
1 CLOCK = 1;
1 CLOCK = 0;
1 sdvig -;
1
1 while (sdvi...