Advertisement
0 0 1 9 2 1 0 C I O
:
c u r s
0 0 1 7
0 6 0 8
AF
0 0 1 9
:
c l s l
0 D 1 A
56
0 0 1 3
77
Q01C
23
ODIO
5E
0 0 1 3
77
0D 1F
23
0D2 0 96
0 0 2 1
23
7A
0 0 2 2
0 0 2 3
33
0 0 2 9 C A 29 0 D
0 0 2 7 78
0 0 2 8 12
05
CL2 :
0 0 2 9
0 0 2 A C 2 1 9 0 D
0 0 2 0 C9
COME MERE WHEN WE H I T A BREAKPOINT
;
0 D 2 E
2 2 0 8 1 0
8 R K P :
0 0 3 1 E l
0 0 3 2 2B
0D3 3 2 2 0 A 1 0
0 0 3 5
F5
0 0 3 7
£1
0 0 3 8
2 2 0 0 1 0
0 0 3 B 2 1 0 0 0 0
0 0 3 E 39
0 D 3 r
3 1 0 8 1 0
0 0 9 2
E5
0 D 9 3
05
0 D 9 9
C5
2F
0 0 9 5
0 0 9 5
03 FF
0 D 9 8
3 1 B 2 1 0
0 0 9 8
2A 0A 10
0D 9E
E3
0D 9F
2 IOC 10
0 D 5 2
0 5 0 8
0 D 5 9
7E
B u l
:
0D5 5 23
0 0 5 6
3A
0D5 7 C25FOO
0 0 5A 7E
0D5B
83
CA680D
0D5C
0 D 5 F
23
B U 2 :
0 0 6 0
23
0 0 6 1
05
0 0 6 2
C A5A 09
C 3 5 9 0 D
0 0 6 5
0 0 6 8
23
B U 3 :
0 0 6 9
7E
0 D6A
12
0 0 6 3
AF
00 6C
28
0 0 6 0
77
0D 6E
28
0 0 6 F
7 7
0 0 7 0
CD0E01
0 0 7 3
3 A 0 3 1 0
CD3A02
0 0 7 6
H , 3 R T
U X I
; GE T TABUE ADDRESS
MV I
3 , N8 R
; GET NUMBER OF BREAKPOINTS
XRA
A
; GET A ZERO
D,M
; G E T H I - B Y T E OF ENTRY
MOV
MOV
M, A
H
IN X
E ,M
; GET UO-B Y TE OF ENTRY
MOV
MOV
M, A
H
IN X
B,M
> GET IN S T BYTE
MOV
INX
H
A , D
MOV
;WAS T H IS A NUUU ENTRY
ORA
E
; BRANCH I F
dZ
CU2
A , 8
MOV
STAX
0
; E U S E ,
B
; BUMP COUNT
DCR
JNZ
CU8U
; GO 0 0 N E XT ONE
RET
; RETURN WHEN DONE
SHUD
HOUD+8
; SAVE H , U
H
;G E T PC
POP
OCX
' H
; AOdUST I T
SHUD
HOUD+IO
SAVE I T
;
PUSH
PSW
SAVE FUAGS
;
POP
H
GET THEM IN T O HU
;
SHUD
HOUO
;NCW STORE THEM FOR USER
H , 0
U X I
DAD
SP
GET STACK POINTER
;
SP,H O U D + 8
SET NEW SP
UXI
;
H
PUSH
; SAVE OUD SP
PUSH
0
} SAVE D , E
PUSH
B
; SAVE B, C
CMA
jCOMPUEMENT ACC
OUT
OFFH
; D ISPUAY
S P , A R £ A + 1 8 ; 5 E T
U X I
HOUO+IO
GET PC
UHUD
;
XCHG
IN T O 0 , E
;
U X I
. H ,B R T
GET AODR OF TA8UE
;
M V I
B ,N 8 R
jA N D NUMBER OF E N T R IE S
MOV
A , M
GET AN ENTRY FROM THE TABU
;
H
IN X
CMP
D
DOES I T MATCH
;
BRANCH I F
JNZ
8U2
;
EUSE GET NEXT BYTE
MOV
A ,M
>
CMP
/CH ECK I T
e
JZ
; I T
MATCHES!
BU3
IN X
H
;BUMP AROUND T H IS ENTRY
IN X
H
; BUMP COUNT
DCR
3
WHAT
dZ
;N O T
dMP
B U I
I N X
H
MOV
A , M
; GET INSTR
STAX
0
; PUT I T BACK
XRA
A
;CUEAR ENTRY
DCX
H
MOV
M, A
DCX
H
MOV
M, A
CAUU
CRUF
RESTORE THE CARRIAGE
;
UDA
H O U D + 11
GE T H I - 8 Y T E
;
HOUT
CAUU
TY PE I T
;
I T WAS
PUUG
IN S T BACK I N
I T
I N THE U IG H TS
SP AGAIN
NOT
IN OUR TABUE!
BYTE
IN TABUE
OF PC
Advertisement
