[an error occurred while processing this directive]
[an error occurred while processing this directive]
Ответ:
(«Телесистемы»: Конференция «Микроконтроллеры и их применение»)
[an error occurred while processing this directive]
[an error occurred while processing this directive]
Отправлено
spectr 10 апреля 2002 г. 13:54
В ответ на: Ответ: отправлено
spectr 10 апреля 2002 г. 13:46
begin for s:=1 to 18 do begin b:=Byte(Ptr(Seg0040,$006C)^); repeat until b<>Byte(Ptr(Seg0040,$006C)^); end; end; Данная процедура отсчитывает 1 секунду. Как мне в течении этого времени опрашивать порт?