Added old tape routines and started with cload
This commit is contained in:
@@ -26,6 +26,7 @@ TX_BUSY .equ WORKSPACE+006h
|
||||
TX_BUF .equ WORKSPACE+007h
|
||||
RX_BUF .equ TX_BUF+BUF_SIZE
|
||||
SYSREG_VALUE .equ RX_BUF+BUF_SIZE
|
||||
END_OF_BIOS_WS .equ SYSREG_VALUE+001h
|
||||
|
||||
; -------------------------------------------------------
|
||||
; entry
|
||||
@@ -99,6 +100,12 @@ boot_copy:
|
||||
jp setrom
|
||||
.ORG BIOS_BANK
|
||||
jp bank
|
||||
.ORG BIOS_CAS_READ_BLOCK
|
||||
jp read_block
|
||||
.ORG BIOS_CAS_WAIT_SILENCE
|
||||
jp wait_silence
|
||||
.ORG BIOS_CAS_READ_BLOCK_DRY
|
||||
jp read_block_dry
|
||||
|
||||
; -------------------------------------------------------
|
||||
; BIOS ENTRY
|
||||
@@ -137,9 +144,30 @@ init:
|
||||
|
||||
; Enter bios
|
||||
jp BASIC_RAM_START
|
||||
; 100$
|
||||
; ld hl,msg_start
|
||||
; call BIOS_PUTS
|
||||
; call BIOS_FLUSH
|
||||
; call read_block
|
||||
; jr c,101$ ; error
|
||||
; ; block received correctly
|
||||
; ld hl,BLOCK_BUFFER
|
||||
; call BIOS_PUTS
|
||||
; call BIOS_FLUSH
|
||||
; jp 100$
|
||||
; 101$:
|
||||
; add '0' ; get error number
|
||||
; call BIOS_PUTC
|
||||
; ld a, 0ah
|
||||
; call BIOS_PUTC
|
||||
; ld a, 0dh
|
||||
; call BIOS_PUTC
|
||||
; call BIOS_FLUSH
|
||||
; jp 100$
|
||||
|
||||
; Shouldnt come here
|
||||
; just to be safe an endless loop
|
||||
ei
|
||||
0$:
|
||||
call getc
|
||||
call putc
|
||||
@@ -524,3 +552,8 @@ bank:
|
||||
; Strings
|
||||
; -------------------------------------------------------
|
||||
msg_header: .db "BIOS v1.0 - Joppe Blondel",00dh,00ah,000h
|
||||
|
||||
; -------------------------------------------------------
|
||||
; Other files
|
||||
; -------------------------------------------------------
|
||||
#include "tape.asm"
|
||||
Reference in New Issue
Block a user