]> cloudbase.mooo.com Git - avrcpm.git/blobdiff - avrcpm/cpm/ipl.asm
Merge softuart/cpm back into trunk:
[avrcpm.git] / avrcpm / cpm / ipl.asm
index 4d229f2b741aa82914fe0d4323e17e4f88c0b805..46572cda0b7cb83cdbc650c3d876dc47c1bcbdaa 100644 (file)
@@ -18,12 +18,17 @@ org $2000
        ; IPL for the CP/M-emu in an AVR. Loads CPM from the 'disk' from
        ; track 0 sector 2 to track 1 sector 26.
 
+READ_FUNC:  equ        7
+WRITE_FUNC: equ        6
+BOOT_FUNC:  equ 5
+HOME_FUNC:  equ 4
+
        ld sp,$1000
        
        call printipl
 
 
-       ld b,49
+       ld b,51
        ld de,$0001
        ld hl,$3400+$A800
 loadloop:
@@ -35,7 +40,7 @@ loadloop:
        out (20),a
        ld a,h ;dma H
        out (21),a
-       ld a,1
+       ld a,1<<READ_FUNC
        out (22),a
 
        push bc
@@ -71,4 +76,4 @@ printipl:
        out (2),a
        ret
 
-end
\ No newline at end of file
+end