Obsługa portów w Free Pascal
: 22 lis 2010, 23:29
Witam
Zacząłem programować w Free Pascalu i gdy kompiluje program mam błąd "Error: Identifier not found "port"" wiem że chodzi o to że kompilator nie może rozpoznać tego polecenia:(. Robię program do obsługi portu LPT. W Turbo Pascalu nie wyskakiwał taki błąd:)
To jest kod programu:
uses
crt;
const
d0=1;
d1=2;
d2=4;
d3=8;
d4=16;
d5=32;
d6=64;
d7=128;
var
lpt:word;
begin
lpt:=$378
port[lpt]:=d0 or d4;
end;
Co mam zrobić aby obsługiwało ten port??
Proszę o ewentualne poprawki i o szybką odpowiedź.
To jest taki prymitywny program;), do testu.
Z góry dzięki.
Zacząłem programować w Free Pascalu i gdy kompiluje program mam błąd "Error: Identifier not found "port"" wiem że chodzi o to że kompilator nie może rozpoznać tego polecenia:(. Robię program do obsługi portu LPT. W Turbo Pascalu nie wyskakiwał taki błąd:)
To jest kod programu:
uses
crt;
const
d0=1;
d1=2;
d2=4;
d3=8;
d4=16;
d5=32;
d6=64;
d7=128;
var
lpt:word;
begin
lpt:=$378
port[lpt]:=d0 or d4;
end;
Co mam zrobić aby obsługiwało ten port??
Proszę o ewentualne poprawki i o szybką odpowiedź.
To jest taki prymitywny program;), do testu.
Z góry dzięki.