2185
|
1 ********************************************************************
|
|
2 * CallDBG - Calls the debugger
|
|
3 *
|
|
4 * $Id$
|
|
5 *
|
|
6 * Edt/Rev YYYY/MM/DD Modified by
|
|
7 * Comment
|
|
8 * ------------------------------------------------------------------
|
|
9 * 1 2005/04/04 Boisy G. Pitre
|
|
10 * Created.
|
|
11
|
|
12 nam CallDBG
|
|
13 ttl Calls the debugger
|
|
14
|
|
15 ifp1
|
|
16 use defsfile
|
|
17 endc
|
|
18
|
|
19 tylg set Prgrm+Objct
|
|
20 atrv set ReEnt+rev
|
|
21 rev set $00
|
|
22 edition set 1
|
|
23
|
|
24 mod eom,name,tylg,atrv,start,size
|
|
25
|
|
26 org 0
|
|
27 rmb 450
|
|
28 size equ .
|
|
29
|
|
30 name fcs /CallDBG/
|
|
31 fcb edition
|
|
32
|
|
33 start
|
|
34 ldb #$01
|
|
35 lda #$02
|
2199
|
36 os9 F$Debug call debugger
|
|
37 * swi
|
2185
|
38 lda #$03
|
|
39 ldb #$04
|
|
40 leax start,pcr
|
|
41
|
|
42 exit clrb
|
|
43 os9 F$Exit
|
|
44
|
|
45 emod
|
|
46 eom equ *
|
|
47 end
|
|
48
|