From cccb99226d3951fd9dfe1c4cf1c43126a1309d51 Mon Sep 17 00:00:00 2001
From: WlodekM <wlodzio.maly@gmail.com>
Date: Mon, 31 Mar 2025 19:47:54 +0300
Subject: move to pc-thing/

---
 code/bootloader.a | 109 ------------------------------------------------------
 1 file changed, 109 deletions(-)
 delete mode 100644 code/bootloader.a

(limited to 'code/bootloader.a')

diff --git a/code/bootloader.a b/code/bootloader.a
deleted file mode 100644
index 66a221c..0000000
--- a/code/bootloader.a
+++ /dev/null
@@ -1,109 +0,0 @@
-.offset 0x6000 ; bootloader is in 0x6000, copied there by another script
-start:
-    mov a 0
-    str a [gottenNZ]
-    ; currSector -> A
-    mov a [currSector]
-    ld a a
-    str a 0x7cff
-
-    mov b 512
-    mul
-    str c [sectorOffset]
-
-    mov a 0
-    str a [bytePointer]
-
-    mov a 0
-    str a [ptrThing]
-
-    copySector:
-        mov a [sectorOffset]
-        ld a a
-        mov b [bytePointer]
-        ld b b
-        add c a b
-        ;
-        swp a c
-        mov b 0x8000 ; default code position
-        add c a b
-        str c [targetPointer]
-
-        ; ld a [sectorOffset]
-        mov a 0x7d00
-        ; add
-        ; swp c a
-        mov b [ptrThing]
-        ld b b
-        add c a b
-        mov b [targetPointer]
-        ld b b
-        ; swp c b
-        ; a <- $b
-        ld a b
-        push a ; push b
-        ld a c
-        ; push c ; push c
-        str b a ; $b <- c
-        pop a
-        ; $c <- b
-        str c a
-        ; swpm c b
-
-        ld a c
-        mov b 0
-        cmr a a b
-        mov b 1
-        xor c a b
-        swp a c
-        mov b [gottenNZ]
-        ld b b
-        or c a b
-        mov a [gottenNZ]
-        str c a
-
-        ;continue loop
-        ; pointer to 8xxx
-        mov a [ptrThing]
-        ld a a
-        mov b 1
-        add c a b
-        mov a [ptrThing]
-        str c a
-
-        ; pointer offset for sector thing
-        mov a [bytePointer]
-        ld a a
-        mov b 1
-        add
-        str c [bytePointer]
-
-        ; offset == 513
-        cmp c 513
-        jz copySector
-    ; continue main loop
-    mov a [currSector]
-    ld a a
-    mov b 1
-    add c a b
-    mov a [currSector]
-    str c a
-    mov a [gottenNZ]
-    ld a a
-    cmp a 0
-    jz start
-    ;escaped
-    jmp 0x8001
-
-ptrThing:
-.hex 0
-currSector:
-.hex 0
-sectorOffset:
-.hex 0
-bytePointer:
-.hex 0
-gottenNZ:
-.hex 0
-targetPointer:
-.hex 0
\ No newline at end of file
-- 
cgit 1.4.1-2-gfad0