How to access COM ports 1-4 using Peek & Out statements??

[BobTheMad]

I have been successful in the past accessing the LPT1 port using the following type of statements. What are the Hex addresses for Com ports 1, 2, 3, 4 ??

Thanks in advance

-=-=-=- BEGIN CODE EXAMPLE -=-=-=-
DIM DATAPORT
DEF SEG = 0
DATAPORT = PEEK(&H408 + (1 - 1) * 2) + PEEK(&H408 + (1 - 1) * 2 + 1) * 256
DEF SEG

OUT DATAPORT, &H11
-=-=-=- END CODE EXAMPLE -=-=-=- Thought for the day: Beware of Gods who cannot laugh...

 

[Guest_imported]

http://www.geocities.com/gstumpff/comio.txt

 

[BobTheMad]

Thanks for posting that site, but I had already found it. It looks like that is exactly what I needed to know. Thought for the day: Beware of Gods who cannot laugh...