\r
\r
public hwinit,?init,?ldccp,?rlccp\r
-\r
+ public signon\r
public f_cpu\r
\r
extrn boot,?conin\r
extrn @civec,@covec,@aivec,@aovec,@lovec\r
extrn @cbnk,?move,?xmove\r
\r
- include version.inc\r
- include config.inc\r
- include z180reg.inc\r
+ maclib z180reg.inc\r
+ maclib config.inc\r
+ maclib version.inc\r
\r
\r
ccpsize equ 0c80h\r
call cpu_frq\r
ld (f_cpu),hl\r
ld (f_cpu+2),de\r
+ call intinit ; setup interrupts and vectors\r
ret\r
\r
?init:\r
; ld hl,1000000000000000b ; assign console to AVRCON:\r
- ld hl,0100000000000000b ; assign console to ASCI0:\r
+ ld hl,0010000000000000b ; assign console to ASCI1:\r
ld (@civec),hl\r
ld (@covec),hl\r
ld hl,0000000000000000b ; assign printer to nothing:\r
ld (@aovec),hl\r
\r
\r
- call intinit ; setup interrupts and vectors\r
call prt0ini ; init timer\r
ei\r
ld c,2\r
ld (@cbnk),a ; right now in bank 0\r
\r
call pr.inln ; print signon message\r
+signon:\r
db 13,10,13,10,'CP/M Version 3.0, Z180-Stamp BIOS v'\r
defvers\r
db 13,10\r