IBM 5150 Technical Reference page 144

LaC OBJ
LINE SOURCE
1585
OCCURRED.
1586 (AH)=3
RETURN THE caMMO PORT STATUS IN (AX)
1587
AH CONTAINS THE LINE STATUS
1588
BIT 7
1:
TIME OUT
1589
BIT 6
=
TRANS SHIFT REGISTER EMPTY
1590
BIT 5
=
TRAN HOLDING REGISTER EMPTY
1591
BIT 4
=
BREAK DETECT
1592
BIT 3
=
FRAMING ERROR
,~ 1593
1594
BIT 2
=
PARITY ERROR
BIT 1
=
OVERRUN ERROR
1595
BIT 0
=
DATA READY
1596
Al CONTAINS THE HeDEH STATUS
1597
BIT 7
1:
RECEIVED LINE SIGNAL DETECT
1598
BIT 6
1:
RING INDICATOR
1599
BIT 5
1:
QATA SET READY
1600
BIT 4
1:
CLEAR TO SEND
1601 BIT 3
=
DELTA RECEIVE LINE SIGNAL DETECT
1602
BIT 2
=
TRAILING EDGE RWG DETECTOR
1603
BIT 1
1:
DELTA DATA SET READY
1604
BIT 0
1:
DELTA CLEAR TO SEND
1605
1606 (OX) ';: PARAMETER INDICATING WHICH RSZ32 CARD (Dol ALLOWED)
1607
,
1606 1 DATA AREA RS232_BASE CONTAINS THE BASE ADDRESS OF THE 8250 ON THE
1609
CARD LOCATION 400H c:aHTAINS UP TO 4 RSZ32 ADDRESSES POSSIBLE
1610 DATA AREA LABEL RSZ32_TIM_OUT (BYTE) CONTAINS OUTER LOOP COUHT
1611 VALUE FOR TIMEOUT (DEFAULT=I)
161Z ; OUTPUT
1613 AX MODIFIED ACCORDING TO PARMS OF CALL
1614
ALL OTHERS UNCHANGED
1615
j-----------------------------------------------------------------------­
1616 ASSUtlE CS :CODE ,DS:OATA
E7Z9
1617 OR. OE729H
E7U 1618
Al LABEL WORD
; TABLE OF INlT VALUE
E729 1704 1619
OW 1047 I 110 BAUD
E72B 0003 16Z0
OW 766
j
150
E72D 8001 1621 OW 364 ; 300
E72F COOO
1622 OW 192
i
600
"'"
Enl 6000
E733 3000
1623
16Z4
OW
OW
%
46
; 1200
I 2400
E735 1800
1625 OW
24
j
4800
En7 OCOO
1626 OW 12 I 9600
1627
E739 1628
RS232_IO
""OC
FAR
1629
1630
j - - - - -
VECTOR TO APPROPRIATE ROUTINE
1631
E739 FB
1632
sn
I INTERRUPTS BACK ON
E73A IE
1633
PUSH
OS
j
SAVE SEGMENT
E73B 52
1634 PUSH
OX
E73C 56
1635 PUSH
51
E73D 57 1636
PUSH 01
E73E 51 1637 PUSH
cx
E73F 53 1638
PUSH
ex
E740 8BF2
1639
MOV
SI,OX
I RS232 VALUE TO 51
E742 8BFA 1640
HOV
DI,OX
E744 DIE6 1641
SHL
SI'! I WORD OFFSET
E746 E8FS17
1642 CALL DDS
E749 8B14 1643
MOV
OX, RS232_BASE [SI I ; GET BASE ADDRESS
E748 OBD2
1644
OR OX,OX
I TEST FOR 0 BASE ADDRESS
E74D 7413
1645
JZ A3
I RETURN
E74F OAE/'t
1646
OR AH,AH
; TEST FOR I AH 1=0
E751 7416
1647
JZ
A4
i
COMHUH INIT
E753 FECC
1648
DEC AH
I TEST FOR (AH )=1
E755 7445
1649
JZ A.
I SEND AL
E757 FEec
1650
DEC AH
i
TEST FOR I AH )=2
E759 746A
1651 JZ
A12 ; RECEIVE INTO AL
E75B
1652 A2 :
"'"
E75B FEte
E750 7503
1653
1654
DEC
JHZ
AH
A3
; TEST FOR (AHI=3
E75F E98300
1655
JHP A16
I COl1MUNICATION STAnJS
E762
1656 A3:
J RETURN FROM RS232
E762 58
1657
pop
6X
E763 59
1658
pop
CX
E764 5F
1659 POP
01
E76S 5E 1660
POP 51
E766 SA
1661
POP
ox
System BIOS 5-51