2019-04-29 20:36:58 +00:00
|
|
|
|
NEW
|
|
|
|
|
|
AUTO 3,1
|
|
|
|
|
|
* object code = ram_1
|
|
|
|
|
|
*
|
|
|
|
|
|
* /RAM installer - transfer part of the driver to the aux bank
|
|
|
|
|
|
* and front part of the driver to the main bank (language card).
|
|
|
|
|
|
|
2019-09-10 20:53:18 +00:00
|
|
|
|
RAM_1 .BS $2C80-*
|
2019-04-29 20:36:58 +00:00
|
|
|
|
|
2019-07-08 12:56:54 +00:00
|
|
|
|
ldy #$99 move $9A bytesfrom lcsrc to lcdest.
|
|
|
|
|
|
|
2019-09-10 20:53:18 +00:00
|
|
|
|
.1 lda lcsrc,y transfer main bank portion of driver
|
|
|
|
|
|
sta lcdest,y
|
2019-07-08 12:56:54 +00:00
|
|
|
|
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
|
2019-09-10 20:53:18 +00:00
|
|
|
|
lda /ramdest ramsrc to ramdest
|
2019-07-08 12:56:54 +00:00
|
|
|
|
sta A4L+1
|
2019-09-10 20:53:18 +00:00
|
|
|
|
sec irection = to aux bank.
|
2019-07-08 12:56:54 +00:00
|
|
|
|
jsr auxmove move aux bank portion of driver.
|
2019-09-10 20:53:18 +00:00
|
|
|
|
|
2019-07-08 12:56:54 +00:00
|
|
|
|
lda #lcdest put driver address into
|
2019-09-10 20:53:18 +00:00
|
|
|
|
sta drivertbl2+6 slot 3, drive 2.
|
2019-07-08 12:56:54 +00:00
|
|
|
|
lda /lcdest
|
|
|
|
|
|
sta drivertbl2+7
|
|
|
|
|
|
|
2019-09-10 20:53:18 +00:00
|
|
|
|
inc numdevs count (-1) active devices
|
2019-09-10 15:46:56 +00:00
|
|
|
|
ldx numdevs
|
2019-09-10 20:53:18 +00:00
|
|
|
|
lda #$BF unit num of /RAM
|
2019-07-08 12:56:54 +00:00
|
|
|
|
sta devlist,x
|
2019-09-10 20:53:18 +00:00
|
|
|
|
rts end of obj ram_1
|
2019-07-08 12:56:54 +00:00
|
|
|
|
|
|
|
|
|
|
RAM_1_END .EQ * end of /RAM installer
|
2019-09-11 15:53:33 +00:00
|
|
|
|
.BS 256-* pad 0's to page boundary
|
2019-04-29 20:36:58 +00:00
|
|
|
|
*--------------------------------------
|
|
|
|
|
|
MAN
|
2019-07-08 12:56:54 +00:00
|
|
|
|
SAVE USR/SRC/PRODOS.203/PRODOS.S.RAMI
|
|
|
|
|
|
LOAD USR/SRC/PRODOS.203/PRODOS.S
|
2019-04-29 20:36:58 +00:00
|
|
|
|
ASM
|
