Кто Паскаль знает - помогите

den777555777 · 07.03.2012, 09:00

надо на 7 и 4 выводах COM порта менять полярность
вот статья
OS11 - Управление нагрузкой с помощью COM порта
я правильно написал коды?

вкл
program pr1;
uses crt;
var a:integer;
begin
clrscr;
a:=$3F8;
port[a+4]:=2;
end.

выкл
program pr1;
uses crt;
var a:integer;
begin
clrscr;
a:=$3F8;
port[a+4]:=0;
end.

den777555777 · 07.03.2012, 09:24

вот примерная схема подключения её тоже проверить надо
и какие резисторы ставить?

den777555777 · 07.03.2012, 19:10

закройте тему
проблема решена

07.03.2012, 09:00	#1 (permalink)
den777555777 Member Регистрация: 22.03.2011 Сообщений: 411 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 332	Кто Паскаль знает - помогите надо на 7 и 4 выводах COM порта менять полярность вот статья OS11 - Управление нагрузкой с помощью COM порта я правильно написал коды? вкл program pr1; uses crt; var a:integer; begin clrscr; a:=$3F8; port[a+4]:=2; end. выкл program pr1; uses crt; var a:integer; begin clrscr; a:=$3F8; port[a+4]:=0; end.

Опции темы
Версия для печати Отправить по электронной почте
Опции просмотра
Линейный вид Комбинированный вид Древовидный вид

07.03.2012, 09:24	#2 (permalink)
den777555777 Member Регистрация: 22.03.2011 Сообщений: 411 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 332	вот примерная схема подключения её тоже проверить надо и какие резисторы ставить?

07.03.2012, 19:10	#3 (permalink)
den777555777 Member Регистрация: 22.03.2011 Сообщений: 411 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 332	закройте тему проблема решена

Ads
Яндекс Member Регистрация: 31.10.2006 Сообщений: 40200 Записей в дневнике: 0 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 55070