diff options
Diffstat (limited to 'z180/r3init.180')
| -rw-r--r-- | z180/r3init.180 | 21 |
1 files changed, 15 insertions, 6 deletions
diff --git a/z180/r3init.180 b/z180/r3init.180 index 8599349..7ba9a0c 100644 --- a/z180/r3init.180 +++ b/z180/r3init.180 @@ -269,7 +269,7 @@ wstart: call prt0_init
- call bufferinit
+;;; call bufferinit
call $coninit
@@ -294,10 +294,6 @@ wstart: ;----------------------------------------------------------------------
;
- extrn msginit,msg.sout,msg_fifo
- extrn tx.buf,rx.buf
-
-
;TODO: Make a ringbuffer module.
global buf.init
@@ -310,6 +306,12 @@ buf.init: ;----------------------------------------------------------------------
+.comment *
+
+ extrn msginit,msg.sout,msg_fifo
+ extrn tx.buf,rx.buf
+
+
bufferinit:
call msginit
@@ -355,6 +357,8 @@ bufdat: db 0
inimsg_e:
+ *
+
;
;----------------------------------------------------------------------
;
@@ -389,6 +393,7 @@ ivt_i1: djnz ivt_i1
ret
+;----------------------------------------------------------------------
prt0_init:
ld a,i
@@ -412,6 +417,7 @@ prt0itab: db M_TIE0+M_TDE0 ;enable timer 0 interrupt and down count.
prt0it_e:
+
;
;----------------------------------------------------------------------
;
@@ -518,6 +524,8 @@ checkcrc_alv: pop hl ;041e
ret ;041f
+;----------------------------------------------------------------------
+
;
; alloc
;
@@ -703,7 +711,7 @@ bnk2phys: ;
; OP: ahl = (a<<12) + (d<<8) + e
;
-;out ehl: Phys. (linear) Address
+;out ahl: Phys. (linear) Address
log2phys:
@@ -786,6 +794,7 @@ jphl: ; ---------------------------------------------------------
+
iprt0:
push af
push hl
|