From 58cd139c6e3f70e93c0735a2112c7aaafba7f0d8 Mon Sep 17 00:00:00 2001 From: izydorst Date: Mon, 23 Dec 2002 00:13:53 +0000 Subject: [PATCH] emd drivers for RamCart 64/128KB git-svn-id: svn://svn.cc65.org/cc65/trunk@1828 b7a2c559-68d2-44c3-8de9-860c34a00d81 --- libsrc/c128/Makefile | 2 +- libsrc/c128/c128-ramcart.s | 291 +++++++++++++++++++++++++++++++++++++ libsrc/c64/Makefile | 2 +- libsrc/c64/c64-ramcart.s | 291 +++++++++++++++++++++++++++++++++++++ 4 files changed, 584 insertions(+), 2 deletions(-) create mode 100644 libsrc/c128/c128-ramcart.s create mode 100644 libsrc/c64/c64-ramcart.s diff --git a/libsrc/c128/Makefile b/libsrc/c128/Makefile index 11e936a60..7d2cdf421 100644 --- a/libsrc/c128/Makefile +++ b/libsrc/c128/Makefile @@ -47,7 +47,7 @@ OBJS = _scrsize.o \ #-------------------------------------------------------------------------- # Drivers -EMDS = c128-georam.emd c128-ram.emd c128-reu.emd c128-vdc.emd +EMDS = c128-georam.emd c128-ram.emd c128-ramcart.emd c128-reu.emd c128-vdc.emd JOYS = c128-stdjoy.joy diff --git a/libsrc/c128/c128-ramcart.s b/libsrc/c128/c128-ramcart.s new file mode 100644 index 000000000..194fec871 --- /dev/null +++ b/libsrc/c128/c128-ramcart.s @@ -0,0 +1,291 @@ +; +; Extended memory driver for the RamCart 64/128KB cartridge +; (based on GEORAM code by Ullrich von Bassewitz) +; Maciej 'YTM/Elysium' Witkowiak +; 06,22.12.2002 +; + + + .include "zeropage.inc" + + .include "em-kernel.inc" + .include "em-error.inc" + + + .macpack generic + + +; ------------------------------------------------------------------------ +; Header. Includes jump table + +.segment "JUMPTABLE" + +; Driver signature + + .byte $65, $6d, $64 ; "emd" + .byte $00 ; EM API version number + +; Jump table. + + .word INSTALL + .word DEINSTALL + .word PAGECOUNT + .word MAP + .word USE + .word COMMIT + .word COPYFROM + .word COPYTO + +; ------------------------------------------------------------------------ +; Constants + +RAMC_WINDOW = $DF00 ; Address of RamCart window +RAMC_PAGE_LO = $DE00 ; Page register low +RAMC_PAGE_HI = $DE01 ; Page register high (only for RC128) + +; ------------------------------------------------------------------------ +; Data. + +.data + +pagecount: .word 512 ; default for RC128 + +.code + +; ------------------------------------------------------------------------ +; INSTALL routine. Is called after the driver is loaded into memory. If +; possible, check if the hardware is present and determine the amount of +; memory available. +; Must return an EM_ERR_xx code in a/x. +; + +INSTALL: + ldx RAMC_WINDOW + cpx RAMC_WINDOW + bne @notpresent + + lda #0 + sta RAMC_PAGE_LO + sta RAMC_PAGE_HI + ldx RAMC_WINDOW + cpx RAMC_WINDOW + bne @notpresent + lda #2 + sta RAMC_WINDOW + cmp RAMC_WINDOW + beq @cont + cpx RAMC_WINDOW + beq @readonly +@cont: ldy #1 + sty RAMC_PAGE_HI + sty RAMC_WINDOW + dey + sty RAMC_PAGE_HI + iny + cpy RAMC_WINDOW + beq @rc64 + ; we're on rc128 + ldx #>512 + bne @setsize +@rc64: ldx #>256 +@setsize: + lda #0 + sta pagecount + stx pagecount+1 + lda #EM_ERR_OK + rts +@notpresent: +@readonly: + lda #EM_ERR_NO_DEVICE + rts + +; ------------------------------------------------------------------------ +; DEINSTALL routine. Is called before the driver is removed from memory. +; Can do cleanup or whatever. Must not return anything. +; + +DEINSTALL: + rts + + +; ------------------------------------------------------------------------ +; PAGECOUNT: Return the total number of available pages in a/x. +; + +PAGECOUNT: + lda pagecount + ldx pagecount+1 + rts + +; ------------------------------------------------------------------------ +; USE: Tell the driver that the window is now associated with a given page. +; The RamCart cartridge does not copy but actually map the window, so USE is +; identical to MAP. + +USE = MAP + + +; ------------------------------------------------------------------------ +; MAP: Map the page in a/x into memory and return a pointer to the page in +; a/x. The contents of the currently mapped page (if any) may be discarded +; by the driver. +; + +MAP: sta RAMC_PAGE_LO + stx RAMC_PAGE_HI + lda #RAMC_WINDOW + +; Use the RTS from COMMIT below to save a precious byte of storage + +; ------------------------------------------------------------------------ +; COMMIT: Commit changes in the memory window to extended storage. + +COMMIT: rts + +; ------------------------------------------------------------------------ +; COPYFROM: Copy from extended into linear memory. A pointer to a structure +; describing the request is passed in a/x. +; The function must not return anything. +; + +COPYFROM: + jsr setup + +; Setup is: +; +; - ptr1 contains the struct pointer +; - ptr2 contains the linear memory buffer +; - ptr3 contains -(count-1) +; - tmp1 contains the low page register value +; - tmp2 contains the high page register value +; - X contains the page offset +; - Y contains zero + + jmp @L5 + +@L1: lda RAMC_WINDOW,x + sta (ptr2),y + iny + bne @L2 + inc ptr2+1 +@L2: inx + beq @L4 + +; Bump count and repeat + +@L3: inc ptr3 + bne @L1 + inc ptr3+1 + bne @L1 + rts + +; Bump page register + +@L4: inc tmp1 + bne @L5 + inc tmp2 +@L5: lda tmp1 + sta RAMC_PAGE_LO + lda tmp2 + sta RAMC_PAGE_HI + jmp @L3 + +; ------------------------------------------------------------------------ +; COPYTO: Copy from linear into extended memory. A pointer to a structure +; describing the request is passed in a/x. +; The function must not return anything. +; + +COPYTO: + jsr setup + +; Setup is: +; +; - ptr1 contains the struct pointer +; - ptr2 contains the linear memory buffer +; - ptr3 contains -(count-1) +; - tmp1 contains the low page register value +; - tmp2 contains the high page register value +; - X contains the page offset +; - Y contains zero + + jmp @L5 + +@L1: lda (ptr2),y + sta RAMC_WINDOW,x + iny + bne @L2 + inc ptr2+1 +@L2: inx + beq @L4 + +; Bump count and repeat + +@L3: inc ptr3 + bne @L1 + inc ptr3+1 + bne @L1 + rts + +; Bump page register + +@L4: inc tmp1 + bne @L5 + inc tmp2 +@L5: lda tmp1 + sta RAMC_PAGE_LO + lda tmp2 + sta RAMC_PAGE_HI + jmp @L3 + +; ------------------------------------------------------------------------ +; Helper function for COPYFROM and COPYTO: Store the pointer to the request +; structure and prepare data for the copy + +setup: sta ptr1 + stx ptr1+1 ; Save passed pointer + +; Get the page number from the struct and adjust it so that it may be used +; with the hardware. That is: lower 6 bits in tmp1, high bits in tmp2. + + ldy #EM_COPY_PAGE+1 + lda (ptr1),y + sta tmp2 + dey + lda (ptr1),y + sta tmp1 + +; Get the buffer pointer into ptr2 + + ldy #EM_COPY_BUF + lda (ptr1),y + sta ptr2 + iny + lda (ptr1),y + sta ptr2+1 + +; Get the count, calculate -(count-1) and store it into ptr3 + + ldy #EM_COPY_COUNT + lda (ptr1),y + eor #$FF + sta ptr3 + iny + lda (ptr1),y + eor #$FF + sta ptr3+1 + +; Get the page offset into X and clear Y + + ldy #EM_COPY_OFFS + lda (ptr1),y + tax + ldy #$00 + +; Done + + rts + diff --git a/libsrc/c64/Makefile b/libsrc/c64/Makefile index ccbe9ec78..54b6ecb50 100644 --- a/libsrc/c64/Makefile +++ b/libsrc/c64/Makefile @@ -48,7 +48,7 @@ OBJS = _scrsize.o \ #-------------------------------------------------------------------------- # Drivers -EMDS = c64-georam.emd c64-ram.emd c64-reu.emd c64-vdc.emd +EMDS = c64-georam.emd c64-ram.emd c64-ramcart.emd c64-reu.emd c64-vdc.emd JOYS = c64-stdjoy.joy diff --git a/libsrc/c64/c64-ramcart.s b/libsrc/c64/c64-ramcart.s new file mode 100644 index 000000000..194fec871 --- /dev/null +++ b/libsrc/c64/c64-ramcart.s @@ -0,0 +1,291 @@ +; +; Extended memory driver for the RamCart 64/128KB cartridge +; (based on GEORAM code by Ullrich von Bassewitz) +; Maciej 'YTM/Elysium' Witkowiak +; 06,22.12.2002 +; + + + .include "zeropage.inc" + + .include "em-kernel.inc" + .include "em-error.inc" + + + .macpack generic + + +; ------------------------------------------------------------------------ +; Header. Includes jump table + +.segment "JUMPTABLE" + +; Driver signature + + .byte $65, $6d, $64 ; "emd" + .byte $00 ; EM API version number + +; Jump table. + + .word INSTALL + .word DEINSTALL + .word PAGECOUNT + .word MAP + .word USE + .word COMMIT + .word COPYFROM + .word COPYTO + +; ------------------------------------------------------------------------ +; Constants + +RAMC_WINDOW = $DF00 ; Address of RamCart window +RAMC_PAGE_LO = $DE00 ; Page register low +RAMC_PAGE_HI = $DE01 ; Page register high (only for RC128) + +; ------------------------------------------------------------------------ +; Data. + +.data + +pagecount: .word 512 ; default for RC128 + +.code + +; ------------------------------------------------------------------------ +; INSTALL routine. Is called after the driver is loaded into memory. If +; possible, check if the hardware is present and determine the amount of +; memory available. +; Must return an EM_ERR_xx code in a/x. +; + +INSTALL: + ldx RAMC_WINDOW + cpx RAMC_WINDOW + bne @notpresent + + lda #0 + sta RAMC_PAGE_LO + sta RAMC_PAGE_HI + ldx RAMC_WINDOW + cpx RAMC_WINDOW + bne @notpresent + lda #2 + sta RAMC_WINDOW + cmp RAMC_WINDOW + beq @cont + cpx RAMC_WINDOW + beq @readonly +@cont: ldy #1 + sty RAMC_PAGE_HI + sty RAMC_WINDOW + dey + sty RAMC_PAGE_HI + iny + cpy RAMC_WINDOW + beq @rc64 + ; we're on rc128 + ldx #>512 + bne @setsize +@rc64: ldx #>256 +@setsize: + lda #0 + sta pagecount + stx pagecount+1 + lda #EM_ERR_OK + rts +@notpresent: +@readonly: + lda #EM_ERR_NO_DEVICE + rts + +; ------------------------------------------------------------------------ +; DEINSTALL routine. Is called before the driver is removed from memory. +; Can do cleanup or whatever. Must not return anything. +; + +DEINSTALL: + rts + + +; ------------------------------------------------------------------------ +; PAGECOUNT: Return the total number of available pages in a/x. +; + +PAGECOUNT: + lda pagecount + ldx pagecount+1 + rts + +; ------------------------------------------------------------------------ +; USE: Tell the driver that the window is now associated with a given page. +; The RamCart cartridge does not copy but actually map the window, so USE is +; identical to MAP. + +USE = MAP + + +; ------------------------------------------------------------------------ +; MAP: Map the page in a/x into memory and return a pointer to the page in +; a/x. The contents of the currently mapped page (if any) may be discarded +; by the driver. +; + +MAP: sta RAMC_PAGE_LO + stx RAMC_PAGE_HI + lda #RAMC_WINDOW + +; Use the RTS from COMMIT below to save a precious byte of storage + +; ------------------------------------------------------------------------ +; COMMIT: Commit changes in the memory window to extended storage. + +COMMIT: rts + +; ------------------------------------------------------------------------ +; COPYFROM: Copy from extended into linear memory. A pointer to a structure +; describing the request is passed in a/x. +; The function must not return anything. +; + +COPYFROM: + jsr setup + +; Setup is: +; +; - ptr1 contains the struct pointer +; - ptr2 contains the linear memory buffer +; - ptr3 contains -(count-1) +; - tmp1 contains the low page register value +; - tmp2 contains the high page register value +; - X contains the page offset +; - Y contains zero + + jmp @L5 + +@L1: lda RAMC_WINDOW,x + sta (ptr2),y + iny + bne @L2 + inc ptr2+1 +@L2: inx + beq @L4 + +; Bump count and repeat + +@L3: inc ptr3 + bne @L1 + inc ptr3+1 + bne @L1 + rts + +; Bump page register + +@L4: inc tmp1 + bne @L5 + inc tmp2 +@L5: lda tmp1 + sta RAMC_PAGE_LO + lda tmp2 + sta RAMC_PAGE_HI + jmp @L3 + +; ------------------------------------------------------------------------ +; COPYTO: Copy from linear into extended memory. A pointer to a structure +; describing the request is passed in a/x. +; The function must not return anything. +; + +COPYTO: + jsr setup + +; Setup is: +; +; - ptr1 contains the struct pointer +; - ptr2 contains the linear memory buffer +; - ptr3 contains -(count-1) +; - tmp1 contains the low page register value +; - tmp2 contains the high page register value +; - X contains the page offset +; - Y contains zero + + jmp @L5 + +@L1: lda (ptr2),y + sta RAMC_WINDOW,x + iny + bne @L2 + inc ptr2+1 +@L2: inx + beq @L4 + +; Bump count and repeat + +@L3: inc ptr3 + bne @L1 + inc ptr3+1 + bne @L1 + rts + +; Bump page register + +@L4: inc tmp1 + bne @L5 + inc tmp2 +@L5: lda tmp1 + sta RAMC_PAGE_LO + lda tmp2 + sta RAMC_PAGE_HI + jmp @L3 + +; ------------------------------------------------------------------------ +; Helper function for COPYFROM and COPYTO: Store the pointer to the request +; structure and prepare data for the copy + +setup: sta ptr1 + stx ptr1+1 ; Save passed pointer + +; Get the page number from the struct and adjust it so that it may be used +; with the hardware. That is: lower 6 bits in tmp1, high bits in tmp2. + + ldy #EM_COPY_PAGE+1 + lda (ptr1),y + sta tmp2 + dey + lda (ptr1),y + sta tmp1 + +; Get the buffer pointer into ptr2 + + ldy #EM_COPY_BUF + lda (ptr1),y + sta ptr2 + iny + lda (ptr1),y + sta ptr2+1 + +; Get the count, calculate -(count-1) and store it into ptr3 + + ldy #EM_COPY_COUNT + lda (ptr1),y + eor #$FF + sta ptr3 + iny + lda (ptr1),y + eor #$FF + sta ptr3+1 + +; Get the page offset into X and clear Y + + ldy #EM_COPY_OFFS + lda (ptr1),y + tax + ldy #$00 + +; Done + + rts + -- 2.39.5