Lexicon MPX-1 Technical Manual page 20

LISTING OF STANDARD SOFTWARE SUPPLIED WITH THE MPX-l
jMPX PROM VERSION 1.0
jWRITT£N 1-7-82 BY
~~RK
GARETZ
jCDPYRIGHT 1982 BY GODBOUT ELECTRONICS
Multiple command linking bug fixed-Ilo jVERSlON 1.1
jEQUATES
8000
INTCLA EQU
8001 1NTCLB EQU
8004 ...
m1ALO EQU
8005
=
DMAH1 EQU
8007
INTRSP EQU
OOCO ...
WINDOW EQU
0000
=
CMNDTBL EQU
0080 ...
1NTTBL EQU
OOAD CMNDBUF EQU
00A2 STRTAD EQU
00A5
ENDAD EQU
00A8
DESTAD EQU
OOAB
LlNKAD
EQU
OOAE ...
RESULT1 EQU
OOAF ...
RESULT2 EQU
OOBO
...
CURRENT EQU
DOFF STACK EQU
0100 ...
BUFFER EQU
0030
S1M EQU
8000H
8001H
8004H
8005H
8007H
oeOH
OOOOH
0080H
OOAOH
CMNDBUF+2
STRTAD+3
ENDAD+3
DESTAD+3
LlNKAD+3
RESULT 1+1
OOBOH
OOFFH
0100H
30H
jInterrupt Controller
jDHA Addr. Bits A8-15
jDMA Addr. Bits A16-23
jlnterrupt Response Byte Reg.
jExternal Window
jCommand Jump Table
jInterrupt Response Jump Table
jTemporary Command Buffer
jStarting Address, 3 bytes
jEnding Address, 3 bytes
jDestination Address, 3 bytes
jLink Address, 3 bytes
jResult byte 1
;Result byte 2
;Current Command Address, 3 bytes
;Stack Space
;Fast Block Move Buffer
;S1M INSTRUCTION
;Beginning of Code
4000
OR'G 4000H
4000 C33140
JMP START ;3 Init Bytes
4003 564552532E
DB
'VERSo
1.0'
400e 434F505952
DB 'COPYRIGHT 1982 BY GODBOUT ELECTRONICS'
4031 3E9E START: MVI A,9EH ;ICW1
4033 320080 STA INTCLA
4036 3EOO MVI A,O
jICW2
4038 320180
STA 1NTCLB
403B 320180 STA INTCLB
jICW3 too
403E 3EFF
MVI A,OFFH jOCWI Mask all interrupts
4040 320180 STA INTCLB jDone with interrupt controllers
jTbe following code initializes the Command Jump Table and
;Interrupt Jump Table. Unused entries jump to DU}lliY
;Note: all entries are first initialized to DUMMY, then
jpatched for commands and ATTN.
4043 210000
4046 117B42
4049 0100e3
404C 7D
LXI
LXI
LOOPl: LXI
!'lOV
H,CMNDTBL
D,DUHMY
B.OC300H
A,L
21
jD gets DU}lliY addr.
jJUMP and a NOP