| 1 |
2 |
wd5gnr |
@ 000
|
| 2 |
|
|
a114 // (000)start: jmp reload
|
| 3 |
|
|
cea0 // (001) lds 0xEA0
|
| 4 |
|
|
8fb8 // (002) call print_msgcr+0xED0
|
| 5 |
|
|
426c // (003) ds "Blue Monitor 0.4\xFF"
|
| 6 |
|
|
7565 // (004)
|
| 7 |
|
|
204d // (005)
|
| 8 |
|
|
6f6e // (006)
|
| 9 |
|
|
6974 // (007)
|
| 10 |
|
|
6f72 // (008)
|
| 11 |
|
|
2030 // (009)
|
| 12 |
|
|
2e34 // (00a)
|
| 13 |
|
|
ff20 // (00b)
|
| 14 |
|
|
8fbe // (00c)prompt: call print_msg+0xED0
|
| 15 |
|
|
0d0d // (00d) ds "\r\r\nBLUE> \xFF"
|
| 16 |
|
|
0a42 // (00e)
|
| 17 |
|
|
4c55 // (00f)
|
| 18 |
|
|
453e // (010)
|
| 19 |
|
|
20ff // (011)
|
| 20 |
|
|
8fde // (012) call waitcharecho+0xED0
|
| 21 |
|
|
5fdd // (013) cmp lf+0xED0
|
| 22 |
|
|
001a // (014) snz
|
| 23 |
|
|
aee2 // (015) jmp prompt0+0xED0
|
| 24 |
|
|
5f64 // (016) cmp space+0xED0
|
| 25 |
|
|
001a // (017) snz
|
| 26 |
|
|
aee2 // (018) jmp prompt0+0xED0
|
| 27 |
|
|
4f54 // (019) ior makelower+0xED0
|
| 28 |
|
|
5f4e // (01a) cmp cmdl+0xED0
|
| 29 |
|
|
001a // (01b) snz
|
| 30 |
|
|
aef9 // (01c) jmp load+0xED0
|
| 31 |
|
|
5f4f // (01d) cmp cmdd+0xED0
|
| 32 |
|
|
001a // (01e) snz
|
| 33 |
|
|
af04 // (01f) jmp dump+0xED0
|
| 34 |
|
|
5f50 // (020) cmp cmdg+0xED0
|
| 35 |
|
|
001a // (021) snz
|
| 36 |
|
|
af1e // (022) jmp go+0xED0
|
| 37 |
|
|
5f51 // (023) cmp cmdi+0xED0
|
| 38 |
|
|
001a // (024) snz
|
| 39 |
|
|
af25 // (025) jmp intel+0xED0
|
| 40 |
|
|
8fb8 // (026) call print_msgcr+0xED0
|
| 41 |
|
|
3fff // (027) ds "?\xFF"
|
| 42 |
|
|
aedc // (028) jmp prompt+0xED0
|
| 43 |
|
|
8f65 // (029)load: call hexin4+0xED0
|
| 44 |
|
|
0009 // (02a) ldxa
|
| 45 |
|
|
8f65 // (02b) call hexin4+0xED0
|
| 46 |
|
|
6f5c // (02c) lda numin+0xED0
|
| 47 |
|
|
f000 // (02d) stax
|
| 48 |
|
|
0030 // (02e) incx
|
| 49 |
|
|
6f5f // (02f) lda hexsep+0xED0
|
| 50 |
|
|
5f53 // (030) cmp escape+0xED0
|
| 51 |
|
|
001a // (031) snz
|
| 52 |
|
|
aedc // (032) jmp prompt+0xED0
|
| 53 |
|
|
aefb // (033) jmp load1+0xED0
|
| 54 |
|
|
8f65 // (034) call hexin4+0xED0
|
| 55 |
|
|
0009 // (035) ldxa
|
| 56 |
|
|
0032 // (036) stx
|
| 57 |
|
|
3f5b // (037) and bits3+0xED0
|
| 58 |
|
|
0012 // (038) sz
|
| 59 |
|
|
af0e // (039) jmp dump2+0xED0
|
| 60 |
|
|
6fff // (03a) lda uart+1
|
| 61 |
|
|
0021 // (03b) spos
|
| 62 |
|
|
aedc // (03c) jmp prompt+0xED0
|
| 63 |
|
|
8f15 // (03d) call hexaddr+0xED0
|
| 64 |
|
|
e000 // (03e) ldax
|
| 65 |
|
|
8f9e // (03f) call hexout4+0xED0
|
| 66 |
|
|
0025 // (040) ldi ' '
|
| 67 |
|
|
0020 // (041)
|
| 68 |
|
|
8fb5 // (042) call printchar+0xED0
|
| 69 |
|
|
0030 // (043) incx
|
| 70 |
|
|
af06 // (044) jmp dump1+0xED0
|
| 71 |
|
|
8fb2 // (045) call crlf+0xED0
|
| 72 |
|
|
0032 // (046) stx
|
| 73 |
|
|
8f9e // (047) call hexout4+0xED0
|
| 74 |
|
|
0025 // (048) ldi ':'
|
| 75 |
|
|
003a // (049)
|
| 76 |
|
|
8fb5 // (04a) call printchar+0xED0
|
| 77 |
|
|
0025 // (04b) ldi ' '
|
| 78 |
|
|
0020 // (04c)
|
| 79 |
|
|
afb5 // (04d) jmp printchar+0xED0
|
| 80 |
|
|
8f65 // (04e)go: call hexin4+0xED0
|
| 81 |
|
|
6f5f // (04f) lda hexsep+0xED0
|
| 82 |
|
|
5f53 // (050) cmp escape+0xED0
|
| 83 |
|
|
001a // (051) snz
|
| 84 |
|
|
aedc // (052) jmp prompt+0xED0
|
| 85 |
|
|
6f5c // (053) lda numin+0xED0
|
| 86 |
|
|
0033 // (054) jmpa
|
| 87 |
|
|
8fde // (055)intel: call waitcharecho+0xED0
|
| 88 |
|
|
5f53 // (056) cmp escape+0xED0
|
| 89 |
|
|
001a // (057) snz
|
| 90 |
|
|
aedc // (058) jmp prompt+0xED0
|
| 91 |
|
|
5f52 // (059) cmp colon+0xED0
|
| 92 |
|
|
0012 // (05a) sz
|
| 93 |
|
|
af25 // (05b) jmp intel+0xED0
|
| 94 |
|
|
0025 // (05c) ldi 2
|
| 95 |
|
|
0002 // (05d)
|
| 96 |
|
|
8f67 // (05e) call hexinct+0xED0
|
| 97 |
|
|
0007 // (05f) rar
|
| 98 |
|
|
3f5a // (060) and hexnib+0xED0
|
| 99 |
|
|
7f63 // (061) sta icount+0xED0
|
| 100 |
|
|
0025 // (062) ldi 4
|
| 101 |
|
|
0004 // (063)
|
| 102 |
|
|
8f67 // (064) call hexinct+0xED0
|
| 103 |
|
|
0007 // (065) rar
|
| 104 |
|
|
0050 // (066) push
|
| 105 |
|
|
0042 // (067) popx
|
| 106 |
|
|
0025 // (068) ldi 2
|
| 107 |
|
|
0002 // (069)
|
| 108 |
|
|
8f67 // (06a) call hexinct+0xED0
|
| 109 |
|
|
1f56 // (06b) add hexzero+0xED0
|
| 110 |
|
|
0012 // (06c) sz
|
| 111 |
|
|
af49 // (06d) jmp inteldone+0xED0
|
| 112 |
|
|
0025 // (06e) ldi 4
|
| 113 |
|
|
0004 // (06f)
|
| 114 |
|
|
8f67 // (070) call hexinct+0xED0
|
| 115 |
|
|
f000 // (071) stax
|
| 116 |
|
|
0030 // (072) incx
|
| 117 |
|
|
6f63 // (073) lda icount+0xED0
|
| 118 |
|
|
0006 // (074) deca
|
| 119 |
|
|
7f63 // (075) sta icount+0xED0
|
| 120 |
|
|
0012 // (076) sz
|
| 121 |
|
|
af3e // (077) jmp intelloop+0xED0
|
| 122 |
|
|
af25 // (078) jmp intel+0xED0
|
| 123 |
|
|
8fde // (079) call waitcharecho+0xED0
|
| 124 |
|
|
5fdd // (07a) cmp lf+0xED0
|
| 125 |
|
|
0012 // (07b) sz
|
| 126 |
|
|
af49 // (07c) jmp inteldone+0xED0
|
| 127 |
|
|
aedc // (07d) jmp prompt+0xED0
|
| 128 |
|
|
006c // (07e)cmdl: dw 'l'
|
| 129 |
|
|
0064 // (07f)cmdd: dw 'd'
|
| 130 |
|
|
0067 // (080)cmdg: dw 'g'
|
| 131 |
|
|
0069 // (081)cmdi: dw 'i'
|
| 132 |
|
|
003a // (082)colon: dw ':'
|
| 133 |
|
|
001b // (083)escape: dw 0x1b
|
| 134 |
|
|
0020 // (084)makelower: dw 0x20
|
| 135 |
|
|
0030 // (085)zero: dw '0'
|
| 136 |
|
|
0000 // (086)hexzero: dw 0
|
| 137 |
|
|
0039 // (087)nine: dw '9'
|
| 138 |
|
|
0061 // (088)hexa: dw 'a'
|
| 139 |
|
|
fff0 // (089)hexmask: dw 0xFFF0
|
| 140 |
|
|
000f // (08a)hexnib: dw 0xF
|
| 141 |
|
|
0007 // (08b)bits3: dw 0x7
|
| 142 |
|
|
0000 // (08c)numin: dw 0
|
| 143 |
|
|
0000 // (08d)hextmp: dw 0
|
| 144 |
|
|
0000 // (08e)hextmp2: dw 0
|
| 145 |
|
|
0000 // (08f)hexsep: dw 0
|
| 146 |
|
|
0008 // (090)bs: dw 8
|
| 147 |
|
|
0004 // (091)hexct: dw 4
|
| 148 |
|
|
0fff // (092)mask3: dw 0xFFF
|
| 149 |
|
|
0000 // (093)icount: dw 0
|
| 150 |
|
|
0020 // (094)space: dw ' '
|
| 151 |
|
|
0025 // (095)hexin4: ldi 0xFFFF
|
| 152 |
|
|
ffff // (096)
|
| 153 |
|
|
7f61 // (097) sta hexct+0xED0
|
| 154 |
|
|
0025 // (098) ldi 0
|
| 155 |
|
|
0000 // (099)
|
| 156 |
|
|
7f5c // (09a) sta numin+0xED0
|
| 157 |
|
|
8fde // (09b) call waitcharecho+0xED0
|
| 158 |
|
|
5f64 // (09c) cmp space+0xED0
|
| 159 |
|
|
001a // (09d) snz
|
| 160 |
|
|
af6b // (09e) jmp hexinl+0xED0
|
| 161 |
|
|
af71 // (09f) jmp _location_+2+0xED0
|
| 162 |
|
|
8fde // (0a0)hexinl2: call waitcharecho+0xED0
|
| 163 |
|
|
5f60 // (0a1) cmp bs+0xED0
|
| 164 |
|
|
001a // (0a2) snz
|
| 165 |
|
|
af96 // (0a3) jmp hexbs+0xED0
|
| 166 |
|
|
5f55 // (0a4) cmp zero+0xED0
|
| 167 |
|
|
001a // (0a5) snz
|
| 168 |
|
|
af84 // (0a6) jmp hexin09+0xED0
|
| 169 |
|
|
0014 // (0a7) sc
|
| 170 |
|
|
af93 // (0a8) jmp hexin4done+0xED0
|
| 171 |
|
|
5f57 // (0a9) cmp nine+0xED0
|
| 172 |
|
|
0014 // (0aa) sc
|
| 173 |
|
|
af84 // (0ab) jmp hexin09+0xED0
|
| 174 |
|
|
001a // (0ac) snz
|
| 175 |
|
|
af84 // (0ad) jmp hexin09+0xED0
|
| 176 |
|
|
4f54 // (0ae) ior makelower+0xED0
|
| 177 |
|
|
9f58 // (0af) sub hexa+0xED0
|
| 178 |
|
|
0014 // (0b0) sc
|
| 179 |
|
|
af93 // (0b1) jmp hexin4done+0xED0
|
| 180 |
|
|
1fdd // (0b2) add lf+0xED0
|
| 181 |
|
|
af85 // (0b3) jmp _location_+2+0xED0
|
| 182 |
|
|
9f55 // (0b4) sub zero+0xED0
|
| 183 |
|
|
7f5d // (0b5) sta hextmp+0xED0
|
| 184 |
|
|
6f5c // (0b6) lda numin+0xED0
|
| 185 |
|
|
0003 // (0b7) ral
|
| 186 |
|
|
0003 // (0b8) ral
|
| 187 |
|
|
0003 // (0b9) ral
|
| 188 |
|
|
0003 // (0ba) ral
|
| 189 |
|
|
3f59 // (0bb) and hexmask+0xED0
|
| 190 |
|
|
4f5d // (0bc) ior hextmp+0xED0
|
| 191 |
|
|
7f5c // (0bd) sta numin+0xED0
|
| 192 |
|
|
6f61 // (0be) lda hexct+0xED0
|
| 193 |
|
|
0006 // (0bf) deca
|
| 194 |
|
|
7f61 // (0c0) sta hexct+0xED0
|
| 195 |
|
|
0012 // (0c1) sz
|
| 196 |
|
|
af70 // (0c2) jmp hexinl2+0xED0
|
| 197 |
|
|
7f5f // (0c3) sta hexsep+0xED0
|
| 198 |
|
|
6f5c // (0c4) lda numin+0xED0
|
| 199 |
|
|
0041 // (0c5) ret
|
| 200 |
|
|
6f5c // (0c6)hexbs: lda numin+0xED0
|
| 201 |
|
|
0007 // (0c7) rar
|
| 202 |
|
|
0007 // (0c8) rar
|
| 203 |
|
|
0007 // (0c9) rar
|
| 204 |
|
|
0007 // (0ca) rar
|
| 205 |
|
|
3f62 // (0cb) and mask3+0xED0
|
| 206 |
|
|
7f5c // (0cc) sta numin+0xED0
|
| 207 |
|
|
af70 // (0cd) jmp hexinl2+0xED0
|
| 208 |
|
|
7f5d // (0ce)hexout4: sta hextmp+0xED0
|
| 209 |
|
|
0034 // (0cf) swap
|
| 210 |
|
|
8fa2 // (0d0) call hexout2+0xED0
|
| 211 |
|
|
6f5d // (0d1) lda hextmp+0xED0
|
| 212 |
|
|
7f5e // (0d2)hexout2: sta hextmp2+0xED0
|
| 213 |
|
|
0007 // (0d3) rar
|
| 214 |
|
|
0007 // (0d4) rar
|
| 215 |
|
|
0007 // (0d5) rar
|
| 216 |
|
|
0007 // (0d6) rar
|
| 217 |
|
|
8fa9 // (0d7) call hexout1+0xED0
|
| 218 |
|
|
6f5e // (0d8) lda hextmp2+0xED0
|
| 219 |
|
|
3f5a // (0d9)hexout1: and hexnib+0xED0
|
| 220 |
|
|
5fdd // (0da) cmp lf+0xED0
|
| 221 |
|
|
001c // (0db) snc
|
| 222 |
|
|
afaf // (0dc) jmp hexouta+0xED0
|
| 223 |
|
|
1f55 // (0dd) add zero+0xED0
|
| 224 |
|
|
afb5 // (0de) jmp printchar+0xED0
|
| 225 |
|
|
9fdd // (0df)hexouta: sub lf+0xED0
|
| 226 |
|
|
1f58 // (0e0) add hexa+0xED0
|
| 227 |
|
|
afb5 // (0e1) jmp printchar+0xED0
|
| 228 |
|
|
6fdc // (0e2) lda cr+0xED0
|
| 229 |
|
|
8fb5 // (0e3) call printchar+0xED0
|
| 230 |
|
|
6fdd // (0e4) lda lf+0xED0
|
| 231 |
|
|
8fd0 // (0e5) call xmitwait+0xED0
|
| 232 |
|
|
7fff // (0e6) sta uart+1
|
| 233 |
|
|
0041 // (0e7) ret
|
| 234 |
|
|
0042 // (0e8) popx
|
| 235 |
|
|
8fc3 // (0e9) call print_msgx+0xED0
|
| 236 |
|
|
8fb2 // (0ea) call crlf+0xED0
|
| 237 |
|
|
0030 // (0eb) incx
|
| 238 |
|
|
0052 // (0ec) pushx
|
| 239 |
|
|
0041 // (0ed) ret
|
| 240 |
|
|
0042 // (0ee) popx
|
| 241 |
|
|
8fc3 // (0ef) call print_msgx+0xED0
|
| 242 |
|
|
0030 // (0f0) incx
|
| 243 |
|
|
0052 // (0f1) pushx
|
| 244 |
|
|
0041 // (0f2) ret
|
| 245 |
|
|
e000 // (0f3) ldax 0
|
| 246 |
|
|
0021 // (0f4) spos
|
| 247 |
|
|
0041 // (0f5) ret
|
| 248 |
|
|
0034 // (0f6) swap
|
| 249 |
|
|
8fb5 // (0f7) call printchar+0xED0
|
| 250 |
|
|
e000 // (0f8) ldax 0
|
| 251 |
|
|
0034 // (0f9) swap
|
| 252 |
|
|
0021 // (0fa) spos
|
| 253 |
|
|
0041 // (0fb) ret
|
| 254 |
|
|
0034 // (0fc) swap
|
| 255 |
|
|
8fb5 // (0fd) call printchar+0xED0
|
| 256 |
|
|
0030 // (0fe) incx
|
| 257 |
|
|
afc3 // (0ff) jmp print_msgx+0xED0
|
| 258 |
|
|
0050 // (100) push
|
| 259 |
|
|
6ffe // (101) lda uart
|
| 260 |
|
|
0020 // (102) sneg
|
| 261 |
|
|
afd1 // (103) jmp xmitwait+1+0xED0
|
| 262 |
|
|
0040 // (104) pop
|
| 263 |
|
|
0041 // (105) ret
|
| 264 |
|
|
6fff // (106) lda uart+1
|
| 265 |
|
|
0020 // (107) sneg
|
| 266 |
|
|
afd6 // (108) jmp waitchar+0xED0
|
| 267 |
|
|
3fdb // (109) and ff+0xED0
|
| 268 |
|
|
0041 // (10a) ret
|
| 269 |
|
|
00ff // (10b)ff: dw 0xFF
|
| 270 |
|
|
000d // (10c)cr: dw 0x0d
|
| 271 |
|
|
000a // (10d)lf: dw 0x0a
|
| 272 |
|
|
8fd6 // (10e) call waitchar+0xED0
|
| 273 |
|
|
8fb5 // (10f) call printchar+0xED0
|
| 274 |
|
|
5fdc // (110) cmp cr+0xED0
|
| 275 |
|
|
001a // (111) snz
|
| 276 |
|
|
8fb2 // (112) call crlf+0xED0
|
| 277 |
|
|
0041 // (113) ret
|
| 278 |
|
|
b000 // (114)reload: ldx 0
|
| 279 |
|
|
e000 // (115) ldax 0
|
| 280 |
|
|
fed0 // (116) stax 0xED0
|
| 281 |
|
|
0030 // (117) incx
|
| 282 |
|
|
0032 // (118) stx
|
| 283 |
|
|
911d // (119) sub limit
|
| 284 |
|
|
0012 // (11a) sz
|
| 285 |
|
|
a115 // (11b) jmp reloadx
|
| 286 |
|
|
aed1 // (11c) jmp 0xED1
|
| 287 |
|
|
0114 // (11d)limit: dw reload
|
| 288 |
|
|
// Symbols
|
| 289 |
|
|
// printchar: 00e5
|
| 290 |
|
|
// uart: 0ffe
|
| 291 |
|
|
// hexsep: 008f
|
| 292 |
|
|
// hexaddr: 0045
|
| 293 |
|
|
// cr: 010c
|
| 294 |
|
|
// swreg: 0ff0
|
| 295 |
|
|
// load: 0029
|
| 296 |
|
|
// hexin4: 0095
|
| 297 |
|
|
// print_msgx: 00f3
|
| 298 |
|
|
// load1: 002b
|
| 299 |
|
|
// hexin4done: 00c3
|
| 300 |
|
|
// waitcharecho: 010e
|
| 301 |
|
|
// prompt: 000c
|
| 302 |
|
|
// colon: 0082
|
| 303 |
|
|
// hexbs: 00c6
|
| 304 |
|
|
// cmdl: 007e
|
| 305 |
|
|
// start: 0000
|
| 306 |
|
|
// hexinct: 0097
|
| 307 |
|
|
// numin: 008c
|
| 308 |
|
|
// hexnib: 008a
|
| 309 |
|
|
// inteldone: 0079
|
| 310 |
|
|
// bs: 0090
|
| 311 |
|
|
// reloadx: 0115
|
| 312 |
|
|
// zero: 0085
|
| 313 |
|
|
// dump1: 0036
|
| 314 |
|
|
// lf: 010d
|
| 315 |
|
|
// hexouta: 00df
|
| 316 |
|
|
// bits3: 008b
|
| 317 |
|
|
// hexct: 0091
|
| 318 |
|
|
// hexin09: 00b4
|
| 319 |
|
|
// hexzero: 0086
|
| 320 |
|
|
// hextmp: 008d
|
| 321 |
|
|
// cmdi: 0081
|
| 322 |
|
|
// hextmp2: 008e
|
| 323 |
|
|
// escape: 0083
|
| 324 |
|
|
// print_msg: 00ee
|
| 325 |
|
|
// ff: 010b
|
| 326 |
|
|
// cmdg: 0080
|
| 327 |
|
|
// dump2: 003e
|
| 328 |
|
|
// hexout1: 00d9
|
| 329 |
|
|
// xmitwait: 0100
|
| 330 |
|
|
// crlf: 00e2
|
| 331 |
|
|
// icount: 0093
|
| 332 |
|
|
// waitchar: 0106
|
| 333 |
|
|
// hexinl2: 00a0
|
| 334 |
|
|
// dump: 0034
|
| 335 |
|
|
// hexout4: 00ce
|
| 336 |
|
|
// reload: 0114
|
| 337 |
|
|
// intelloop: 006e
|
| 338 |
|
|
// prompt0: 0012
|
| 339 |
|
|
// hexinl: 009b
|
| 340 |
|
|
// limit: 011d
|
| 341 |
|
|
// nine: 0087
|
| 342 |
|
|
// intel: 0055
|
| 343 |
|
|
// mask3: 0092
|
| 344 |
|
|
// hexout2: 00d2
|
| 345 |
|
|
// makelower: 0084
|
| 346 |
|
|
// space: 0094
|
| 347 |
|
|
// hexmask: 0089
|
| 348 |
|
|
// go: 004e
|
| 349 |
|
|
// print_msgcr: 00e8
|
| 350 |
|
|
// hexa: 0088
|
| 351 |
|
|
// cmdd: 007f
|
| 352 |
|
|
// End Symbols
|
