Radio Shack 26-1145 - Page 28

0009b 507 C 28F5 JR Z.RSX
00099 50 7
E DBEB IN A. (DATA)
00
1 00
5080
C9
RET
00102 5081 DBEA RSWR IN A. (CTRL)
00 1 03
5083 DD7 705
LD
I IX+5), A
00 1 04 5086 CB77
BIT 6.
A
00105 5088
28F7
JR Z ,
RSWR
00 1 0t- 508M 79
LD A, C
00107 508B D3EB
OUT
(DATA).
oo l oy 5oaD L9
RET
00 1 1
00E8
MR
EQU OESH
00111
O0E8 MODEM
EQU 0E8H
00112
00E9 CONF
1
G
EQU
0E9H
00 1
1
3
OOEm CTRL EQU OEaH
00 1 1
4
OOEB DATA
EGU OEBH
; IF NOT
i
GET DATUM DO
NOT STRIP
PARITY POSH
GET
UART
STATUS
REG
CONTENTS
IMAGE TO
IICB.
IS XMIT
HOLDING REG EMPTY?
IF NOT, WAIT
i
OUTPUT BrTE
001 lo INITIALIZE
RS-232-C
HARDWARE USING
CONFIG
SWITCHES
00 1 1
8
508E
D3E8
00119
5090 DBE9
00120
5092 DD7703
00 1 2
1
5095 EfcFS
00
1 22 5097 F605
00123 5099
DD7
7(.
7
00124
509C D3EA
001 2 c- 509E DBE9
00127
50A0 E*07
00 128
50A2
21B150
00129 50A5 0600
00 1 30 50a 7
4F
00 1 3
1
50aS 09
00 132 50A9
7E
00 1 33 50«h
DD7
7< >4
0O134 50AD D3E9
001 35 50AF
AF
00 1 3c 50B0
C9
I
UART
I BRG
OUT
(
MR )
,
A
IN A, (CONF
IG)
LD ( 1
x+3)
,
A
AND 0F8H
OR
05H
LD
(
I
x+7
) ,
A
OUT (CTRL),
A
IN A.
(CONFIG)
AND
07
H
LD HL. BAUDTB
LD B, O
LD C. A
ADD HL
, BC
LD A, iHL)
LD
(IX
+
4),A
OUT (CONFIG), f
xuR H
RET
RESET
UART WITH
ANY
OUT
DATA
GEI TERM CONFIG SWITCHES STATE
SAVE
IMAGE.
MASK
OFF
BAUD PATE INFO
SET BRK, RESET
DTP. SET PTS
SAVE IMAGE OF CTRL REG
AND PUT IN CTRL. REG
:GET BAUD RATE
SWITCH
STATE
i BAUD RATE BITS
ONLY
HL
=>
BAUD
PATE CODE
GET
BAUD RATE CODE.
SAVE
IMAGE IN
MCB
LOhCi
BAUD
RATE
GEN
BAUD RATE
CODE TABLE
00140
50B1 22 BAUDTB Br TE 22H
00141
50B2
44
Br IE 44H
00142 5oB3
55 BrTE 55H
00143
50B4
66 BrTE 66H
00144
50B5
7
?
BrTE 77H
00145
50B6 AA
BrTE OAAH
00 1
46 SOB? CL
BrTE OCCH
00147
SOBS EE
BrTE OEEH
1
1
BAUD
150 BAUD
300 BAUD
c-00 BAUD
1 200
2400
4800
9,300
0014'i
TABLE OF SPECIAL CODES
('0151
50B9 03 SPECTE; BrTE 03H
00152 50BA IB
Bi TE
1BH
00153
50BB 7C BYTE
7CH
00154 50BC 7F
BrTE 7FH
SCALARS
CIO* 0046
CONFIG
-
00E9
KBDt
002B
MODEM
—
00E8
>.T0
(DEFAULT)
SEC T
1 ON
(
50BD
BAUDTB
-
50B1
1BRG
509E
NOSPEC
-
503D
OUTS 502A
RSX
5073
SIN 504F
TERM
5000
DEFAULT
DEFAULT
DEFAULT
DEFAUL
T
EOT
-
CTRL
"A"
ESC
-
CMTRL"B"
VERT
BAP
-
CNTPI "C
DEL
-
CTRL"D"
ALSO
"ATTN"
CTRL
-
MR
OOEA
00E8
DATA
'OEB
INS
——
5012
RS232
—
506V
S0U1
-
—
504c
I UART
—
5.
•SE
RSRD
51
IT'S
SFECTB
-
CJ,
B>
156
SOURCE LINES
156
ASSEMBLED LINES
25