швидкості на 2
0106 75 98 50 movSCON, # 50h; 8 біт, швидкість від таймера
0109 75 A8 82 movIE, # 10000010b; переривання від таймера Т0
010C C2 97 clrVkl_PC; відключення ПК від лінії
010E 75 26 14 movFonVr, # Ch_Pause; час фонової завдання
0111 1 грудня 97 callNach_Opros
0114 75 20 00 movNumDat, # 0; опитуємо 0-й датчик
0117 75 24 лютого movChPovtMax, # ChPovtMaxWork; макс. число повторень
011A 75 21 жовтня movN_Ind, # NDMax; початкове зміщення коду помилки
011D MetWork:
011D 75 21 FF movN_Ind, # FFh; якщо помилок немає, на індикаторі FF
0120 12 лютого 3B callIndikac; висновок на індикатор FF
0123 1 грудня F6 callWork
0126 75 A8 92 movIE, # 10010010b; дозволяємо переривання від ПК і від Т0
0129 D2 BC setbPS; пріоритет у ПК
012B D2 97 setbVkl_PC; підключення до лінії
; настройка остан. каналу
012D 43 87 80 orlPCON, # 10000000b; дільник швидкості на 2 откл.
87 0130 SerTime0FFh; 57600 бот
0130 75 8D FF movTH1, # 0FFh
0133 75 8B FF movTL1, # 0FFh
0136 C2 8F clrTF1
0138 D2 8E setbTR1
013A ENDM
013A 75 26 14 movFonVr, # Ch_Pause; час фонової завдання
94 013D TimeTime_Pause; очікування запиту ПК
95 013D 75 8C 3C movTH0, #> Time_Pause
0140 75 8A B0 movTL0, #
0143 C2 8D clrTF0
0145 D2 8C setbTR0
0147 ENDM
0147 20 97 FD jbVkl_PC, $; фонова завдання
014A C2 8D clrTF0
014C C2 8C clrTR0
Thu Nov 20 2011 15:24 Page 3
014E 75 A8 82 movIE, # 10000010b; забороняємо переривання від ПК
0151 53 87 3F anlPCON, # 0111111b; дільник швидкості на 2 вкл.
107 0154 SerTime0FAh; 4800 бот
0154 75 8D FA movTH1, # 0FAh
0157 75 8B FA movTL1, # 0FAh
015A C2 8F clrTF1
015C D2 8E setbTR1
015E
015E A8 20 movR0, NumDat
0160 21 1D jmpMetWork; опитування наступного датчика
115
; = ---------------------------------------- ------
; Список подпрограм.
; = ------------------------...
