Cleanup

apps/basic/basic.asm

@@ -4663,6 +4663,7 @@ CLOADB: inc     hl              ; skip #
         pop     hl
         inc     hl
         inc     hl              ; get filename
+        ; TODO filename always null terminated?
         call    PRS             ; print filename
         ; de contains the nr of blocks to load
         ; TODO check de>0
@@ -4678,7 +4679,7 @@ CLOADB: inc     hl              ; skip #
         exx
         pop     hl              ; get stored data back
         pop     de              ; get destination
-        ld      bc,64           ; block size
+        ld      bc,128          ; block size
         ldir                    ; copy data to memory
         push    de              ; store destination address
         exx

bios.asm

@@ -144,26 +144,6 @@ 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

scripts/encode.py

@@ -8,7 +8,7 @@ import os
 import math
 from pathlib import Path
 
-BLOCK_SIZE = 64
+BLOCK_SIZE = 128
 TYPE_RAW = 0
 TYPE_HEADER = 1
 

tape.asm

@@ -1,4 +1,4 @@
-BLOCK_SIZE                  .equ 1+64+2 ; type + 64 bytes + crc-16
+BLOCK_SIZE                  .equ 1+128+2 ; type + 64 bytes + crc-16
 BLOCK_ERROR_CALIBRATION     .equ 1
 BLOCK_ERROR_SYNC            .equ 2
 BLOCK_ERROR_READ            .equ 3