Advertisement
0 D 7 9
3AOA10
0D7C C D3A 02
0O7F
2 1 3 8 0 0
0D 8 2 C D 7A 02
0 0 8 5 C 3 6 7 0 0
0 0 8 8
BMES:
2 0 9 2 5 2 9 5
0D8C 9 1 9 8 0 0
i
ROUTINE PROCEEDS FROM A BREAKP OINT
• T H I S
0D 8F
3 A 7 E 1 0
:
p r o c
0D 9 2
37
0 0 9 3
CA9COO
2A 8 A 1 0
0 0 9 6
2 2 0 A 1 0
0 0 9 9
00 9C
3 1 0 0 1 0
:
p i
0 09 F
F I
OOAO C l
0DA1 01
0 OA 2 E l
0DA3 F9
0DA9
2A 0A 1 0
0 DA 7 E5
0DA8
2 A 0 8 1 0
ODAB C9
;
SYSTEM RAM
*
OOAC
; DEFINE BREAKPOINT REGION
0 0 08
NBR
1 0 0 0
HOLD:
100C
BRT :
AREA PARAMETERS
;
F I L E
0 0 0 6
M A X F I L
NMLEN
0 0 0 5
0 0 0 D
FELEN
1 0 2 9
F I L E O :
1 0 2 9
BOFP:
1 0 2 8
E C FP :
1 0 2D
MAXL :
1 0 3 1
F I L T B :
1 0 7 2
: -
i n s p
1 0 7 2
OELP
OOOO
ASCR
1 0 7 9
HCON:
1 0 7 9
ADOS
1 0 7 6
F8 U F :
1 0 7B
F R E A D :
1 0 7 D
F E F :
1 0 7D
FOCNT
10 7 E
ABUF :
108A
BBUF :
1 0 8E
SCNT:
1 0 8 F
D C N T :
0 0 0 3
NCOM
1 0 9 0
TABA:
1 0 9 2
:
a s p c
1 0 9 9
P A S I :
NCHR :
1 0 9 5
I 096
PNTR :
LDA
HOLD +IO
;G E T L 0 - 3 Y T E OF PC
HOUT
; TYEP
CALL
LX I
H,BMES
; TELL USER WHAT I T
CALL
SCRN
BMP
EOR
; GO BACK TO COMMAND LEVEL
1 BREAK1 ' , 1 3
D3
LOA
A8UF
; CHECK FOR ARG
ORA
A
P I
; JMP I F NO ARG
JZ
BBUF
LHLD
; E LS E ,
SHLD
HOLD +IO
; PLUG I T
LX I
S P, HO LD
; SET SP TO P O IN T AT R EG'S
PSW
POP
; RESTORE PSW
POP
B
; RESTORE 3 , C
0
; RESTORE D , E
POP
H
; GET OLD SP
POP
SPHL
; RESTORE
LHLD
; GET PC
HOLD+10
PUSH
H
} PUT I T
LHLD
+ 8
; RESTORE H , L
h o l d
RET
; ANO PROCEED
ORG
10 0 0 H
3
EQU
; NUM8ER OF BREAKPOINTS
DS
12
^R E GIS TE R HOLD AREA
}
DS
3 " NBR
b r e a k p o i n t
6
EQU
; MAX ä OF F I L E S
EQU
5
} NAME LENGTH
EQU
NMLEN+8
; D I RECTORY ENTRY LENGTH
DS
n m l e n
DS
2
DS
2
OS
9
DS
( M A X F I L - 1 ) " FELEN
DS
2
; IN S ER T L I N E
EQU
INSP
;D E L E T E L I N E
EQU
; A S C I I
13
DS
2
EQU
HCON
; F I NO ADDRESS
DS
' 'NMLEN
; F I LE NAME BUFFER
DS
2
;F R E E ADDRESS
DS
1
; FREE ENTRY FOUND FLAG
EQU
FEF
; OUTPUT COUNTER
OS
12
; A S C I 1
DS
9
; BINARY BUFFER
DS
1
DS
1
; DUMP ROU TINE COUNTER
EQU
11
;NUMBER OF COMMANDS
DS
2
; SYMBOL TABLE END AODRESS
DS
2
; ASSEMBLER PROGRAM COUNTER
DS
1
;PASS
DS
1
; LENGTH OF STRING FOR COMPARE
DS
2
; L I N E
I T
IS
GET ARG
IN TO PC SLOT
I T
ON STACK
t a b l e
P O S I T I O N
P O S I T I O N
CARRIAGE RETURN VALUE
-
I N
DIRECTORY
BUFFER
IND ICATO R
P OINTE R
STORAGE
12
- 53
Advertisement
