СОВРЕМЕННАЯ ЭЛЕКТРОНИКА №4/2012

ПРОГРАММИРОВАНИЕ Далее будут приведены программа на турбо бейсике (TESTRS.BAS) и две подключаемые подпрограммы на ас семблере – p86wr.asm (вывод строки байтов по RS 232 из компьютера в мик роконтроллер) и p86rd.asm (приём строки байтов по RS 232 из микро контроллера). Программа TESTRS.BAS содержит оттранслированные про граммы p86wr.com и p86rd.com как подключаемые подпрограммы в *.com формате. С текстами этих программ и *.bat файлами, предназначенными для их трансляции с целью получения *.com и *.lst форматов этих программ, можно ознакомиться на интернет странице журнала. После запуска оттранслированной программы TESTRS.EXE на экран мо нитора выводится окно, показанное на рисунке 8. Перед запуском этой программы следует запустить про грамму portmon.exe и провести с ней необходимые манипуляции [1], что бы разрешить прямой ввод/вывод в COM порт. Сравнив окна, показанные на рисунках 7 и 8, можно сделать вывод, что программа TESTRS.BAS работает аналогично программе testRS232.clw. Проанализируем файл листинг под программыp86rd.asm–файлP86RD.LST в той его части, которая касается мак роса INBYTE. Ниже приведёнфрагмент листинга программы с этиммакросом: 62 00000124 INBYTE ;в al находит ся считанный байт 1 63 00000124 B6 03 mov dh,03h 1 64 00000126 B2 FE mov dl,0feh ; Итого: dx=3feh 1 65 00000128 EC in al,dx ; Очистка регистра 3feh 1 66 00000129 B2 FB mov dl,0fbh ; Итого: dx=3fbh. 1 67 0000012B B0 47 mov al,47h ; Установка линии TxD 1 68 0000012D EE out dx,al ; (pазpешение пеpедачи байта). 1 69 0000012E B2 FE mov dl,0feh ; Итого: dx=3feh 1 70 00000130 EC in al,dx ; Ожи дание 1 71 00000131 A8 02 test al,02h ; старт бита 1 72 00000133 74 FB jz $ 3 ; 1 73 00000135 33 C9 xor ecx,ecx ;32 разрядный режим. 1 74 00000137 B1 14 mov cl,20 ;В cx/ecx число, определяющее заде ржку. 1 75 00000139 EC in al,dx 1 76 0000013A E2 FD loop $ 1 1 77 0000013C B2 FB mov dl,0fbh ; Итого: dx=3fbh. 1 78 0000013E B0 07 mov al,07h ; 71 WWW.SOEL.RU СОВРЕМЕННАЯ ЭЛЕКТРОНИКА ◆ № 4 2012 Рис. 8. Результат работы программы TESTRS.EXE © СТА-ПРЕСС