| 1 |
2 |
wd5gnr |
#ifndef CODEOFFSET
|
| 2 |
|
|
#define CODEOFFSET 0
|
| 3 |
|
|
#endif
|
| 4 |
|
|
|
| 5 |
|
|
uart: equ 0xFFE
|
| 6 |
|
|
swreg: equ 0xFF0
|
| 7 |
|
|
|
| 8 |
|
|
#define DEFSTACK lds 0xEA0
|
| 9 |
|
|
#define PRSTRING(string) ldx string | call print_msgx
|
| 10 |
|
|
#define LDIM(b,v) ldi b | sta v
|
| 11 |
|
|
#define JMPIF(mem,add) cmp mem | snz | jmp add
|
| 12 |
|
|
#define SKIP jmp _location_+2+CODEOFFSET
|
| 13 |
|
|
|
| 14 |
|
|
#ifdef BLUEMON
|
| 15 |
|
|
/* Need to include equates for all the monitor symbols here
|
| 16 |
|
|
after relocation (EDO)
|
| 17 |
|
|
*/
|
| 18 |
|
|
BLUEMONBASE: equ 0xED0
|
| 19 |
|
|
bluemon: equ BLUEMONBASE+1
|
| 20 |
|
|
printchar: equ BLUEMONBASE+0x00e5
|
| 21 |
|
|
hexsep: equ BLUEMONBASE+0x008f
|
| 22 |
|
|
cr: equ BLUEMONBASE+0x010c
|
| 23 |
|
|
_con_13: equ BLUEMONBASE+0x010c
|
| 24 |
|
|
hexin4: equ BLUEMONBASE+0x0095
|
| 25 |
|
|
print_msgx: equ BLUEMONBASE+0x00f3
|
| 26 |
|
|
waitcharecho: equ BLUEMONBASE+0x010e
|
| 27 |
|
|
prompt: equ BLUEMONBASE+0x000c
|
| 28 |
|
|
colon: equ BLUEMONBASE+0x0082
|
| 29 |
|
|
hexinct: equ BLUEMONBASE+0x0097
|
| 30 |
|
|
numin: equ BLUEMONBASE+0x008c
|
| 31 |
|
|
hexnib: equ BLUEMONBASE+0x008a
|
| 32 |
|
|
_con_15: equ BLUEMONBASE+0x008a
|
| 33 |
|
|
bs: equ BLUEMONBASE+0x0090
|
| 34 |
|
|
_con_8: equ BLUEMONBASE+0x0090
|
| 35 |
|
|
lf: equ BLUEMONBASE+0x010d
|
| 36 |
|
|
ten: equ BLUEMONBASE+0x010d
|
| 37 |
|
|
_con_10: equ BLUEMONBASE+0x010d
|
| 38 |
|
|
zero: equ BLUEMONBASE+0x0085
|
| 39 |
|
|
_con_48: equ BLUEMONBASE+0x0085
|
| 40 |
|
|
bits3: equ BLUEMONBASE+0x008b
|
| 41 |
|
|
hexct: equ BLUEMONBASE+0x0091
|
| 42 |
|
|
hexzero: equ BLUEMONBASE+0x0086
|
| 43 |
|
|
_con_0: equ BLUEMONBASE+0x0086
|
| 44 |
|
|
hextmp: equ BLUEMONBASE+0x008d
|
| 45 |
|
|
cmdi: equ BLUEMONBASE+0x0081
|
| 46 |
|
|
hextmp2: equ BLUEMONBASE+0x008e
|
| 47 |
|
|
escape: equ BLUEMONBASE+0x0083
|
| 48 |
|
|
print_msg: equ BLUEMONBASE+0x00ee
|
| 49 |
|
|
ff: equ BLUEMONBASE+0x010b
|
| 50 |
|
|
_con_255: equ BLUEMONBASE+0x010b
|
| 51 |
|
|
cmdg: equ BLUEMONBASE+0x0080
|
| 52 |
|
|
hexout1: equ BLUEMONBASE+0x00d9
|
| 53 |
|
|
xmitwait: equ BLUEMONBASE+0x0100
|
| 54 |
|
|
crlf: equ BLUEMONBASE+0x00e2
|
| 55 |
|
|
icount: equ BLUEMONBASE+0x0093
|
| 56 |
|
|
waitchar: equ BLUEMONBASE+0x0106
|
| 57 |
|
|
hexout4: equ BLUEMONBASE+0x00a0
|
| 58 |
|
|
limit: equ BLUEMONBASE+0x011d
|
| 59 |
|
|
nine: equ BLUEMONBASE+0x0087
|
| 60 |
|
|
_con_57: equ BLUEMONBASE+0x0087
|
| 61 |
|
|
mask3: equ BLUEMONBASE+0x0092
|
| 62 |
|
|
hexout2: equ BLUEMONBASE+0x00d2
|
| 63 |
|
|
makelower: equ BLUEMONBASE+0x0084
|
| 64 |
|
|
space: equ BLUEMONBASE+0x0094
|
| 65 |
|
|
_con_32: equ BLUEMONBASE+0x0094
|
| 66 |
|
|
hexmask: equ BLUEMONBASE+0x0089
|
| 67 |
|
|
print_msgcr: equ BLUEMONBASE+0x00e8
|
| 68 |
|
|
hexa: equ BLUEMONBASE+0x0088
|
| 69 |
|
|
cmdd: equ BLUEMONBASE+0x007f
|
| 70 |
|
|
#endif
|
