From 5922161d2c781604cb2ed7f196314288797653d7 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?R=C3=A9my=20GIBERT?= Date: Mon, 8 Jul 2019 14:56:54 +0200 Subject: [PATCH] Kernel 0.93 --- ProDOS.203/ProDOS.S.CCLK.txt | 5 +-- ProDOS.203/ProDOS.S.DiskII.txt | 5 +-- ProDOS.203/ProDOS.S.GP.txt | 4 +- ProDOS.203/ProDOS.S.IRQ.txt | 4 +- ProDOS.203/ProDOS.S.LDR.txt | 8 ++-- ProDOS.203/ProDOS.S.RAM.txt | 4 +- ProDOS.203/ProDOS.S.RAMI.txt | 73 ++++++++++++++++++---------------- ProDOS.203/ProDOS.S.RAMX.txt | 4 +- ProDOS.203/ProDOS.S.SEL0.txt | 4 +- ProDOS.203/ProDOS.S.SEL1.txt | 4 +- ProDOS.203/ProDOS.S.SEL2.txt | 4 +- ProDOS.203/ProDOS.S.TCLK.txt | 4 +- ProDOS.203/ProDOS.S.XDOS.txt | 6 +-- 13 files changed, 65 insertions(+), 64 deletions(-) diff --git a/ProDOS.203/ProDOS.S.CCLK.txt b/ProDOS.203/ProDOS.S.CCLK.txt index a784f9ba..7a9c16f8 100644 --- a/ProDOS.203/ProDOS.S.CCLK.txt +++ b/ProDOS.203/ProDOS.S.CCLK.txt @@ -65,7 +65,6 @@ cclk_end .EQ * end of obj cclock_0. LONGI OFF *-------------------------------------- MAN -LOAD USR/SRC/PRODOS.203/PRODOS.S.CCLK -SAVE USR/SRC/PRODOS.203/PRODOS.S +SAVE USR/SRC/PRODOS.203/PRODOS.S.CCLK +LOAD USR/SRC/PRODOS.203/PRODOS.S ASM - diff --git a/ProDOS.203/ProDOS.S.DiskII.txt b/ProDOS.203/ProDOS.S.DiskII.txt index 40ae5b11..1d666498 100644 --- a/ProDOS.203/ProDOS.S.DiskII.txt +++ b/ProDOS.203/ProDOS.S.DiskII.txt @@ -954,7 +954,6 @@ spunit .EQ *-ofsD ref pathbuf-$10 * pathname buffer starts at this page boundary (pathbuf = $D700) *-------------------------------------- MAN -LOAD USR/SRC/PRODOS.203/PRODOS.S.DISKII -SAVE USR/SRC/PRODOS.203/PRODOS.S +SAVE USR/SRC/PRODOS.203/PRODOS.S.DISKII +LOAD USR/SRC/PRODOS.203/PRODOS.S ASM - diff --git a/ProDOS.203/ProDOS.S.GP.txt b/ProDOS.203/ProDOS.S.GP.txt index 23954741..6cadc228 100644 --- a/ProDOS.203/ProDOS.S.GP.txt +++ b/ProDOS.203/ProDOS.S.GP.txt @@ -187,6 +187,6 @@ kversion .EQ *-ofsG kernal version * end of obj mli_1 *-------------------------------------- MAN -LOAD USR/SRC/PRODOS.203/PRODOS.S.GP -SAVE USR/SRC/PRODOS.203/PRODOS.S +SAVE USR/SRC/PRODOS.203/PRODOS.S.GP +LOAD USR/SRC/PRODOS.203/PRODOS.S ASM diff --git a/ProDOS.203/ProDOS.S.IRQ.txt b/ProDOS.203/ProDOS.S.IRQ.txt index aa5f36b1..404d1164 100644 --- a/ProDOS.203/ProDOS.S.IRQ.txt +++ b/ProDOS.203/ProDOS.S.IRQ.txt @@ -72,6 +72,6 @@ irqv .EQ *-ofsR2 * end of obj mli_3 *-------------------------------------- MAN -LOAD USR/SRC/PRODOS.203/PRODOS.S.IRQ -SAVE USR/SRC/PRODOS.203/PRODOS.S +SAVE USR/SRC/PRODOS.203/PRODOS.S.IRQ +LOAD USR/SRC/PRODOS.203/PRODOS.S ASM diff --git a/ProDOS.203/ProDOS.S.LDR.txt b/ProDOS.203/ProDOS.S.LDR.txt index 7a20b303..491870bf 100644 --- a/ProDOS.203/ProDOS.S.LDR.txt +++ b/ProDOS.203/ProDOS.S.LDR.txt @@ -1654,7 +1654,8 @@ patch101 .OP 65C816 * copy of the code that goes in the handle -L2C4D lda $01,s +L2C4D .OP 65816 + lda $01,s sta $07,s lda $02,s sta $08,s @@ -1668,7 +1669,6 @@ L2C4D lda $01,s .BS $2C80-* *-------------------------------------- MAN -LOAD USR/SRC/PRODOS.203/PRODOS.S.LDR -SAVE USR/SRC/PRODOS.203/PRODOS.S +SAVE USR/SRC/PRODOS.203/PRODOS.S.LDR +LOAD USR/SRC/PRODOS.203/PRODOS.S ASM - diff --git a/ProDOS.203/ProDOS.S.RAM.txt b/ProDOS.203/ProDOS.S.RAM.txt index bf7537fe..533ca723 100644 --- a/ProDOS.203/ProDOS.S.RAM.txt +++ b/ProDOS.203/ProDOS.S.RAM.txt @@ -88,6 +88,6 @@ r2_end .EQ * ds $D9B-(r2_end-H2000) fill to lanirq ($FF9B see note below) *-------------------------------------- MAN -LOAD USR/SRC/PRODOS.203/PRODOS.S.RAM -SAVE USR/SRC/PRODOS.203/PRODOS.S +SAVE USR/SRC/PRODOS.203/PRODOS.S.RAM +LOAD USR/SRC/PRODOS.203/PRODOS.S ASM diff --git a/ProDOS.203/ProDOS.S.RAMI.txt b/ProDOS.203/ProDOS.S.RAMI.txt index 106eb2e2..5317f93a 100644 --- a/ProDOS.203/ProDOS.S.RAMI.txt +++ b/ProDOS.203/ProDOS.S.RAMI.txt @@ -5,41 +5,46 @@ NEW * /RAM installer - transfer part of the driver to the aux bank * and front part of the driver to the main bank (language card). -H2C80 ldy #$99 move $9A bytesfrom lcsrc to lcdest. -H2C82 lda lcsrc,y transfer main bank portion of driver - sta lcdest,y - dey - cpy #$FF - bne H2C82 - ldx #ramsrc - stx A1L+1 - inx - stx A2L+1 - lda #ramdest ramsrc to ramdest - sta A4L+1 - sec direction = to aux bank. - jsr auxmove move aux bank portion of driver. - lda #lcdest - sta drivertbl2+7 - inc numdevs count (-1) active devices - ldx numdevs - lda #$BF unit num of /RAM - sta devlist,x - rts end of obj ram_1 +RAM_1 .BS $2C80-* -r1_end .EQ * end of /RAM installer - ds $D00-(r1_end-H2000) pad 0's to page boundary + ldy #$99 move $9A bytesfrom lcsrc to lcdest. + +.1 lda lcsrc,y transfer main bank portion of driver + sta lcdest,y + dey + cpy #$FF + bne .1 + + ldx #ramsrc set up to move aux portion of driver + stx A1L + dex + stx A2L + ldx ramsrc + stx A1L+1 + inx + stx A2L+1 + lda #ramdest + sta A4L + lda /ramdest ramsrc to ramdest + sta A4L+1 + sec irection = to aux bank. + jsr auxmove move aux bank portion of driver. + + lda #lcdest put driver address into + sta drivertbl2+6 slot 3, drive 2. + lda /lcdest + sta drivertbl2+7 + + inc numdevs count (-1) active devices + ldx numdevs + lda #$BF unit num of /RAM + sta devlist,x + rts end of obj ram_1 + +RAM_1_END .EQ * end of /RAM installer + .BS #256-* pad 0's to page boundary *-------------------------------------- MAN -LOAD USR/SRC/PRODOS.203/PRODOS.S.RAMI -SAVE USR/SRC/PRODOS.203/PRODOS.S +SAVE USR/SRC/PRODOS.203/PRODOS.S.RAMI +LOAD USR/SRC/PRODOS.203/PRODOS.S ASM - diff --git a/ProDOS.203/ProDOS.S.RAMX.txt b/ProDOS.203/ProDOS.S.RAMX.txt index 2f56bd5c..225410e7 100644 --- a/ProDOS.203/ProDOS.S.RAMX.txt +++ b/ProDOS.203/ProDOS.S.RAMX.txt @@ -343,6 +343,6 @@ ex1 .EQ *-ofsR0 * end of obj ram_0 *-------------------------------------- MAN -LOAD USR/SRC/PRODOS.203/PRODOS.S.RAMI -SAVE USR/SRC/PRODOS.203/PRODOS.S +SAVE USR/SRC/PRODOS.203/PRODOS.S.RAMX +LOAD USR/SRC/PRODOS.203/PRODOS.S ASM diff --git a/ProDOS.203/ProDOS.S.SEL0.txt b/ProDOS.203/ProDOS.S.SEL0.txt index 68f527ed..9b10f7f5 100644 --- a/ProDOS.203/ProDOS.S.SEL0.txt +++ b/ProDOS.203/ProDOS.S.SEL0.txt @@ -319,6 +319,6 @@ disp1end .EQ * * end of obj sel_0 *-------------------------------------- MAN -LOAD USR/SRC/PRODOS.203/PRODOS.S.SEL0 -SAVE USR/SRC/PRODOS.203/PRODOS.S +SAVE USR/SRC/PRODOS.203/PRODOS.S.SEL0 +LOAD USR/SRC/PRODOS.203/PRODOS.S ASM diff --git a/ProDOS.203/ProDOS.S.SEL1.txt b/ProDOS.203/ProDOS.S.SEL1.txt index 9192e432..ef395909 100644 --- a/ProDOS.203/ProDOS.S.SEL1.txt +++ b/ProDOS.203/ProDOS.S.SEL1.txt @@ -426,6 +426,6 @@ dhdr_len .EQ *-ofsB directory header length * end of obj sel_1 *-------------------------------------- MAN -LOAD USR/SRC/PRODOS.203/PRODOS.S.SEL1 -SAVE USR/SRC/PRODOS.203/PRODOS.S +SAVE USR/SRC/PRODOS.203/PRODOS.S.SEL1 +LOAD USR/SRC/PRODOS.203/PRODOS.S ASM diff --git a/ProDOS.203/ProDOS.S.SEL2.txt b/ProDOS.203/ProDOS.S.SEL2.txt index e34df768..a62ca080 100644 --- a/ProDOS.203/ProDOS.S.SEL2.txt +++ b/ProDOS.203/ProDOS.S.SEL2.txt @@ -462,6 +462,6 @@ button2 .EQ *-ofsQ * end of obj sel_2 (must be < GQdisp+$300) *-------------------------------------- MAN -LOAD USR/SRC/PRODOS.203/PRODOS.S.SEL2 -SAVE USR/SRC/PRODOS.203/PRODOS.S +SAVE USR/SRC/PRODOS.203/PRODOS.S.SEL2 +LOAD USR/SRC/PRODOS.203/PRODOS.S ASM diff --git a/ProDOS.203/ProDOS.S.TCLK.txt b/ProDOS.203/ProDOS.S.TCLK.txt index 43176020..90dd7626 100644 --- a/ProDOS.203/ProDOS.S.TCLK.txt +++ b/ProDOS.203/ProDOS.S.TCLK.txt @@ -102,6 +102,6 @@ tclk_end .EQ * end of obj tclock_0. dc h'000000' pad *-------------------------------------- MAN -LOAD USR/SRC/PRODOS.203/PRODOS.S.TCLK -SAVE USR/SRC/PRODOS.203/PRODOS.S +SAVE USR/SRC/PRODOS.203/PRODOS.S.TCLK +LOAD USR/SRC/PRODOS.203/PRODOS.S ASM diff --git a/ProDOS.203/ProDOS.S.XDOS.txt b/ProDOS.203/ProDOS.S.XDOS.txt index a53bbab2..7a2541df 100644 --- a/ProDOS.203/ProDOS.S.XDOS.txt +++ b/ProDOS.203/ProDOS.S.XDOS.txt @@ -4336,8 +4336,6 @@ cortflag .EQ *-ofsX cortland flag. 1 = Cortland system * end of obj mli_2 *-------------------------------------- MAN -LOAD USR/SRC/PRODOS.203/PRODOS.S.XDOS -SAVE USR/SRC/PRODOS.203/PRODOS.S +SAVE USR/SRC/PRODOS.203/PRODOS.S.XDOS +LOAD USR/SRC/PRODOS.203/PRODOS.S ASM - - \ No newline at end of file