]> cloudbase.mooo.com Git - z180-stamp-cpm3.git/blobdiff - cbios/boot.180
WIP
[z180-stamp-cpm3.git] / cbios / boot.180
index 5b55c2933d8e183fae235ec09e9d3c9a5a9e2a01..8e41728b90e26eb3ff8bd45f129ad6126fe9ed9b 100644 (file)
@@ -3,7 +3,7 @@
 \r
 \r
        public  hwinit,?init,?ldccp,?rlccp\r
-\r
+       public  signon\r
        public  f_cpu\r
 \r
        extrn   boot,?conin\r
@@ -13,9 +13,9 @@
        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
@@ -54,11 +54,12 @@ hwini_skip:
        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
@@ -68,7 +69,6 @@ hwini_skip:
        ld      (@aovec),hl\r
 \r
 \r
-       call    intinit                 ; setup interrupts and vectors\r
        call    prt0ini                 ; init timer\r
        ei\r
        ld      c,2\r
@@ -78,6 +78,7 @@ hwini_skip:
        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
@@ -155,7 +156,7 @@ hwini_tab:
        db      dcntl,CWAITIO   ;wait states\r
        db      ccr,M_NCD       ;No Clock Divide\r
        db      cmr,PHI_X2      ;X2 Clock Multiplier\r
-;TODO: db      omr,    ;Operation Mode Control Register\r
+       db      omcr,~M_IOC     ;Operation Mode Control Register\r
 hwini0_e:\r
        db      0               ;stop mark\r
 \r