Mercurial > hg > Members > kono > nitros9-code

annotate level2/cmds/smap.asm @ 1500:b00cf13c9f61

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Major changes for new NitrOS-9 manual
author boisy
date Mon, 05 Jan 2004 00:51:19 +0000
parents 2bd57e595948
children 457765ff46f9
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
965
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
1 ********************************************************************
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
2 * SMap - Show System Memory Map
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
3 *
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
4 * $Id$
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
5 *
1255
bf6f854a4299 Changed revisions to 0
boisy
parents: 965
diff changeset
6 * Edt/Rev YYYY/MM/DD Modified by
bf6f854a4299 Changed revisions to 0
boisy
parents: 965
diff changeset
7 * Comment
965
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
8 * ------------------------------------------------------------------
1255
bf6f854a4299 Changed revisions to 0
boisy
parents: 965
diff changeset
9 * 1 ????/??/??
bf6f854a4299 Changed revisions to 0
boisy
parents: 965
diff changeset
10 * Original version.
965
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
11
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
12 nam SMap
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
13 ttl Show System Memory Map
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
14
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
15 * Disassembled 02/05/12 22:05:11 by Disasm v1.6 (C) 1988 by RML
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
16
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
17 ifp1
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
18 use defsfile
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
19 endc
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
20
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
21 tylg set Prgrm+Objct
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
22 atrv set ReEnt+rev
1255
bf6f854a4299 Changed revisions to 0
boisy
parents: 965
diff changeset
23 rev set $00
965
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
24 edition set 1
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
25
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
26 mod eom,name,tylg,atrv,start,size
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
27
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
28 u0000 rmb 1
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
29 u0001 rmb 3
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
30 u0004 rmb 1
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
31 u0005 rmb 1
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
32 u0006 rmb 1
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
33 u0007 rmb 1
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
34 u0008 rmb 6
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
35 u000E rmb 1
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
36 u000F rmb 456
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
37 size equ .
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
38
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
39 name fcs /SMap/
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
40 fcb edition
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
41
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
42 H1 fcc " 0 1 2 3 4 5 6 7 8 9 A B C D E F"
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
43 fcb C$CR
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
44 H1L equ *-H1
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
45 H2 fcc " # = = = = = = = = = = = = = = = ="
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
46 fcb C$CR
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
47 H2L equ *-H2
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
48 L005A fcb $00,$00,$00,$00
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
49
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
50 start lbsr L0170
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
51 leax >H1,pcr
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
52 lda #$01
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
53 ldy #H1L
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
54 os9 I$WritLn
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
55 leax >H2,pcr
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
56 ldy #H2L
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
57 os9 I$Write
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
58 leax >L005A,pcr
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
59 tfr x,d
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
60 ldx #$004E
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
61 ldy #$0002
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
62 pshs u
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
63 leau u000F,u
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
64 os9 F$CpyMem
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
65 puls u
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
66 lbcs L013F
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
67 ldx u000F,u
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
68 ldy #$0100
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
69 pshs u
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
70 leau u000F,u
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
71 os9 F$CpyMem
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
72 puls u
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
73 lbcs L013F
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
74 clr <u000E
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
75 clr <u0004
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
76 leax u000F,u
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
77 lda #$30
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
78 sta <u0005
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
79 clr ,-s
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
80 L00B2 lda ,s
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
81 bita #$0F
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
82 bne L00DF
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
83 pshs x
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
84 lbsr L0170
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
85 leax u0006,u
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
86 ldy #$0004
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
87 lda <u0005
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
88 cmpa #$3A
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
89 bne L00CD
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
90 lda #$41
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
91 sta <u0005
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
92 L00CD sta <u0007
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
93 inc <u0005
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
94 ldd #$2020
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
95 sta <u0006
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
96 std <u0008
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
97 lda #$01
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
98 os9 I$Write
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
99 puls x
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
100 L00DF ldb ,x+
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
101 beq L00ED
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
102 bmi L00E9
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
103 ldb #$55
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
104 bra L00F1
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
105 L00E9 ldb #$2E
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
106 bra L00F1
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
107 L00ED ldb #$5F
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
108 inc <u0004
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
109 L00F1 stb <u0007
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
110 ldb #$20
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
111 stb <u0008
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
112 pshs x
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
113 leax u0007,u
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
114 ldy #$0002
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
115 lda #$01
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
116 os9 I$Write
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
117 puls x
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
118 dec ,s
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
119 lbhi L00B2
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
120 puls a
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
121 bsr L0170
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
122 bsr L0170
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
123 leax >FreePgs,pcr
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
124 ldy #FreePgsL
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
125 lda #$01
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
126 os9 I$Write
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
127 ldb <u0004
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
128 clra
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
129 lbsr L0194
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
130 bsr L0170
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
131 leax >FreeRAM,pcr
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
132 ldy #FreeRAML
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
133 lda #$01
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
134 os9 I$Write
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
135 ldb <u0004
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
136 clra
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
137 lsrb
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
138 lsrb
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
139 lbsr L0194
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
140 bsr L0170
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
141 clrb
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
142 L013F os9 F$Exit
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
143
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
144 FreePgs fcc " Number of Free Pages: "
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
145 FreePgsL equ *-FreePgs
1385
2bd57e595948 Ram changed to RAM
boisy
parents: 1255
diff changeset
146 FreeRAM fcc " RAM Free in KBytes: "
965
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
147 FreeRAML equ *-FreeRAM
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
148
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
149 L0170 pshs x,a
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
150 lda #C$CR
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
151 sta <u0007
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
152 leax u0007,u
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
153 ldy #$0001
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
154 lda #$01
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
155 os9 I$WritLn
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
156 puls pc,x,a
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
157 L0183 sta <u0007
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
158 pshs x
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
159 leax u0007,u
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
160 ldy #$0001
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
161 lda #$01
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
162 os9 I$Write
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
163 L0192 puls pc,x
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
164 L0194 leax u0001,u
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
165 clr <u0000
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
166 clr ,x
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
167 clr $01,x
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
168 clr $02,x
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
169 L019E inc ,x
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
170 subd #$0064
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
171 bcc L019E
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
172 addd #$0064
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
173 L01A8 inc $01,x
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
174 subd #$000A
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
175 bcc L01A8
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
176 L01AF addd #$000A
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
177 incb
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
178 stb $02,x
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
179 bsr L01BF
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
180 bsr L01BF
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
181 L01B9 lda ,x+
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
182 adda #$2F
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
183 bra L0183
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
184 L01BF tst <u0000
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
185 bne L01B9
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
186 ldb ,x
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
187 inc <u0000
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
188 decb
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
189 bne L01B9
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
190 clr <u0000
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
191 lda #C$SPAC
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
192 leax 1,x
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
193 bra L0183
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
194
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
195 emod
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
196 eom equ *
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
197 end
53553cdc265c New commands added to standard CMDS
boisy
parents:
diff changeset
198