Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

funkcija

[es] :: Pascal / Delphi / Kylix :: funkcija

[ Pregleda: 3927 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

blackadder

Član broj: 244
Poruke: 1
*.infosky.net



Profil

icon funkcija17.04.2001. u 13:08 - pre 279 meseci
Da li je sve u redu sa ovim funkcijama, i ako jeste, zasto ne 'funkcionisu'?

procedure SetPort(spa,spv:Word);
var spvalue:byte;
begin
spvalue:=trunc(spv);
asm
mov dx,spa
mov AL,spvalue
out DX,AL
end;

function GetPort(gpa:Word):word;
var gpvalue:byte;
begin
asm
mov dx,gpa
in aL,dx
mov gpvalue,aL
end;
gpv:=gpvalue;
end;

p.s. email je [email protected]

 
Odgovor na temu

Gojko Vujovic
Amsterdam, NL

Administrator
Član broj: 1
Poruke: 13651



+165 Profil

icon Re: funkcija17.04.2001. u 14:21 - pre 279 meseci
Citat:
blackadder wrote:
Da li je sve u redu sa ovim funkcijama, i ako jeste, zasto ne 'funkcionisu'?

procedure SetPort(spa,spv:Word);
var spvalue:byte;
begin
spvalue:=trunc(spv);
asm
mov dx,spa
mov AL,spvalue
out DX,AL
end;
ovde ti fali jos jedno end; - moras da imas i za begin i za asm po jedan end;


A za ovaj asm kod ne znam to ce morati neko drugi da ti kaze..
 
Odgovor na temu

morlic
Milos Orlic
Beograd

Član broj: 6081
Poruke: 735
*.9.eunet.yu.



+1 Profil

icon Re: funkcija09.06.2006. u 10:08 - pre 217 meseci
Imas i nepoznatu promenjivu (gpv).

Inace, ako pokusavas ovaj kod pod Windows NT,XP ili 2000 sistemima to nece raditi, koliko me sluzi secanje naredbe in i out spadaju u one koje se ne mogu direktno pozivati, neka me neko ispravi.
 
Odgovor na temu

Nemanja Avramović
Engineering Manager
MENU Technologies
Beograd, Srbija

Član broj: 32202
Poruke: 4391
195.252.99.*

Sajt: https://avramovic.info


+46 Profil

icon Re: funkcija09.06.2006. u 14:09 - pre 217 meseci
ot: Zašto teme iz 2001. godine iskaču na prvu stranu a niko ih nije dirao? :/
Laravel Srbija.

[NE PRUŽAM PODRŠKU ZA PHP PREKO PRIVATNIH PORUKA!]
 
Odgovor na temu

morlic
Milos Orlic
Beograd

Član broj: 6081
Poruke: 735
*.41.eunet.yu.



+1 Profil

icon Re: funkcija09.06.2006. u 15:58 - pre 217 meseci
Ha, ha... nisam ni video koji je datum u pitanju...cccc
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: funkcija

[ Pregleda: 3927 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.