>Procedure Out32(Addrs: LongWord; Data: LongWord); register; >asm > xchg EAX,EDX > out dx,eax >end; > >Function In32(Addrs: LongWord): LongWord; register; >asm > mov edx,eax > in EAX,dx >end; Tehat enged gepi kodban programozni. Koszi szepen az OK lesz. P.H. agrizli