Раздел:
Документация0 ...
38 39 40 41 42 43 44 ...
55 mov Ы,ch ,-OUTBYTE
MET: mov bl,byte ptr [si]
OUTBYTE; Байт в Ы
inc si
loop MET
pop ds pop es pop bp
PROGRAM ends
end START
runS34.bas
els
ИНИЦИАЛИЗАЦИЯ RS232C
Установка скорости OUT &H3FB,S;H80
OUT &H3F8,1 Мл.б.=:1-115200,2-57600,12-9600 бод. OUT &H3F9,0 Ст.б.=0
Установка режима
OUT &H3FB,&H07 1 стоп,8бит,нет паритета
Установка запрета прерываний по СОМ-порту out &h3f9,0 1 Прерывания запрещены
Инициализация микроконтроллера
OUT &H3FB,&H47 Установка линии TxD - разрешение передачи out uh3f8,S;h0d
out &h3fc,0 Установка DTR=-9b., RTS=-9b. Сброс микроконтроллера, delay .2
print "3fc=0" input a
out &h3fc,l Установка DTR=9b., RTS=-9b. Запуск микроконтроллера
OUT &H3FB,&H4 7 1 Установка линии TxD - разрешение передачи print"3fc=l. Запуск" delay .2 input a
inl:
1 input a
E:
out Sh3fc,0 Установка DTR=-9b., RTS=-9b.Сброс микроконтроллера. print"KoHe4" delay .2
end
down834.сla
Программа программирования файла file.tsk в ADUC8XX.
PROGRAM
! Определение переменных
CER | string( | <07h,Oeh,01h,41h,beh>1) | !Строка с командой ERASE. |
MER | | byte, dim(5) ,over(CER) | (Массив для передачи ERASE. |
C115 | string( | 1<07h,Oeh,03h,42h,81h,2dh,Odh>1) !Строка с командой 115 кбод |
M115 | | byte,dim(7) ,over(C115) | •Массив для передачи 115 кбод. |
Ml | | byte,dim(25) | •Массив принимаемых байт. |
SI | | string(14),over(Ml) | !Строка идентификации ADUC. |
SN | | string(3) | |
LEND | | byte | !Длина строки данных. |
NB | | byte | •Количество байт в массиве вьюода. |
L | | ushort | !Длина файла в байтах. |
LOST | | byte | •Длина остатка L%16 в байтах. |
D | | byte,dim(16) | •Массив данных для программирования |
so | string (16) ,over(D) | !Строка данных для программирования. |
SD | ushort | !Сумма данных. |
ADR | ushort | {Двухбайтный адрес. |
AD KMAX | ushort | (Максимальный адрес. |
M | byte,dim(25) | •Массив для вывода OUTBYTE. |
MRS | byte,dim(21) | •Массив для расчета контрольной суммы |
SUM | ushort | •Сумма байт данных. |
К SUM | byte | •Контрольная сумма. |
N | ushort | |
к | ushort | |
В | byte | |
i | ushort | |
YOOh | byte(OOh) | |
YOlh | byte(Olh) | |
Y02h | byte(02h) | |
Y03h | byte (03h) | |
Y04h | byte(04h) | |
Y06h | byte(06h) | |
Y07h | byte(07h) | |
Y12 | byte(12) | |
Y47h | byte (07h) | |
Y80h | byte (80h) | |
YOfh | byte (Of h) | |
BINARY | FILE,PRE(BIN),DRIVER(1 DOS 1),NAME(file.tsk) |
RECORD | RECORD | |
STR | string(65000) | [Строка с прочитанным файлом |
| CODE | |
blank | | |
show(20,10, | 1 Вставьте микросхему | ! ! ! ) |
show(21,10, | Для выхода нажмиte | Ctrl+Break1) |
Прием информации из ADUC
do INIT Инициализация RS232 и микроконтроллера.
0 ...
38 39 40 41 42 43 44 ...
55