Раздел: Документация
0 ... 28 29 30 31 32 33 34 ... 55 2400 1200 232: 208: 232=25б-24=>57600/24 = 2400 208=256-48=>57600/48 = 1200 setb trl ;Запуск таймера !! clr p3.4 ; С ИРЗЗ clr p3.7 ; ЕО ИР38 ; Ввод байт по поел. порту 1 1 mov dptr,#0000h; Нач. адрес INBYTE mov rO,а ; Мл. байт длины INBYTE mov rl,а ; Ст. байт длины + смещение spin: INBYTE ; Байт в а Запись байта в память mov pi,dpi setb рЗ.4 clr р3.4 mov pl.dph clr p3.5 setb p3.5 mov pi,a clr p3.2 setb p3.2 Строб на С ИРЗЗ Строб на С ИР38 Защелкивание младшего байта адреса Г Защелкивание ! Старшего -1 байта адреса Запись принятого по RS232C байта в память (импульс WR) и Цикл по всему массиву. inc dptr mov a,rl cjne a,dph,spin mov a,rO cjne a,dpi,spin Заканчивание работы AT89C2051 mov p3,#0ffh /Перевод AT89C2051 C ИРЗЗ в 1 mov pl,#0ffh ;b Z-состояние.EO ИР38 в 1. nop/На всякий случай. clr рЗ . 3/Подача 0 на~\ ;RESET РСВ80С552, I /т.е. его запуск. - jmp $/Остановка работы АТ89С2051. end Программа на BASIC out &h3fc,0:Установка ОТК=-9вольт, КТЗ=-9вольт. Контрольный сброс els sub REC inline $inline "prgrsis.com" end sub Считывание файла с диска F$="inrs.tsk" open "b",#1,F$ C$=space$(0) L%=lof(1) get$ #1,L%,C$ close #1 print"Ha43ino программирования" 06 print "Программируется файл ";F$ Инициализация последовательного порта Установка скорости: 96- 1200,48- 2400,24- 4800,12 - 9600 6-19200, 3-38400, 2-57600, 1-115200 out Sh3fb,&h8 0 out &h3f8,2 -Коэффициент скорости out &h3f9,0 -Старший байт делителя 1 Установка режима out &h3fb,3 -1 стоп,8 бит,нет паритета out &h3f9,0 -Запрет всех прерываний по СОМ-порту out 6h3fс,01:Установка DTR—Эвольт, КТЗ=-9вольт. Контрольный сброс delay .5 out &h3fc,l DTR=+9b,RTS=-9b delay .3 Передача длины файла и файла в ассемблер I call REC(C$) print "Конец программирования" end 0 ... 28 29 30 31 32 33 34 ... 55
|
