Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.11.21;
Скачать: CL | DM;

Вниз

Как электрикой правильно выставить значение на LPT   Найти похожие ветки 

 
dimon_programmer ©   (2004-10-09 22:02) [0]

Здраствуйте!
Помогите с такой проблемой: как писать на LPT порт я нашел/сделал :-), а вот как на LPT
выставлять какое-то значение(читать с него), чето не въезжаю-может так:
плюс 3..3.5 V к земле а минус черес резистор к DataIn, или как? Не охота материку сжечь!


 
dimon_programmer ©   (2004-10-10 07:26) [1]

???


 
Jel ©   (2004-10-10 08:43) [2]

Минус к земле, плюс через токоограничительный резистор на DataIn. Номинал резистрора выбирать исходя из принципа чем больше, тем лучше. Как минимум 1 кОм.


 
magdelphi   (2004-10-10 16:49) [3]

Зайди на magdelphi.boom.ru там найдёшь схему и программу.


 
now_aleks ©   (2004-10-10 20:10) [4]

Установи http://ln.ua/~real/avreal/p95nt.zip

импорт процедур из DLL

implementation

{$R *.dfm}

Function DlPortReadPortUchar (Port:LongWord):Byte;    stdcall;external "dlportio.dll";
Function DlPortReadPortUshort(Port:LongWord):Word;    stdcall;external "dlportio.dll";
Function DlPortReadPortUlong (Port:LongWord):LongWord;stdcall;external "dlportio.dll";

procedure DlPortWritePortUchar (Port:LongWord;Value:Byte);    stdcall;external "dlportio.dll";
procedure DlPortWritePortUshort(Port:LongWord;Value:Word);    stdcall;external "dlportio.dll";
procedure DlPortWritePortUlong (Port:LongWord;Value:LongWord);stdcall;external "dlportio.dll";


пример использования :

Edit1.Text:=IntToStr(DlPortReadPortUchar($378));// $378 номер LPT порта

подключение как писал Jel , но лучше использовать шинный формирователь н.п. LS244.
(посмотри Схема переходника программирования "STK200/300" на
http://ln.ua/~real/avreal/adapters.html )



Страницы: 1 вся ветка

Текущий архив: 2004.11.21;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.025 c
6-1095340446
ИванКа
2004-09-16 17:14
2004.11.21
Как передать звук по сети?


14-1099397598
R.O.O.T
2004-11-02 15:13
2004.11.21
Из-за чего перегружается компьютер


1-1099698525
Лёха
2004-11-06 02:48
2004.11.21
Jpeg -> TFileStream


10-1053603853
Aleksandr
2003-05-22 15:44
2004.11.21
Как избежать подвисания клиента при попытке сконнектиться?


4-1097522199
Пастор
2004-10-11 23:16
2004.11.21
Как имея хендл чужого окна узнать о его закрытии ?