Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2024-11-29 02:49:54 +00:00
Code Issues Projects Releases Wiki Activity
38cbd00f7e
A2osX/ProDOS.FX/ProDOS.S.NCLK.txt

127 lines
2.0 KiB
Plaintext
Raw Normal View History

Kernel 0.93+
2019-11-04 07:21:40 +00:00
NEW
AUTO 3,1
*--------------------------------------
* Driver For DS1216E
*--------------------------------------
Kernel 0.94++
2021-05-30 20:34:03 +00:00
* we can safely use $200 (used by TCLK)
*--------------------------------------
DS1216E.DATA .EQ $200 Reverted YY MM DD Day HH mm SS CS
*--------------------------------------
IRQ, NSC, ACOS, CIFS, SRW
2021-06-22 18:59:02 +00:00
NCLK.START php
Kernel 0.94++
2021-05-30 20:34:03 +00:00
sei NO IRQ !!!
IRQ, NSC, ACOS, CIFS, SRW
2021-06-22 18:59:02 +00:00
lda RDCXROM
php
Kernel 0.94++
2021-06-06 19:06:49 +00:00
sta SETCXROM
Kernel 0.94++
2021-05-30 20:34:03 +00:00
ProDOS.FX:Added DCLK support and //c related Fixes NSC: Reverted to $C3xx I/O space
2021-07-26 12:33:08 +00:00
sta NSC.IOBASE
KERNEL 0.94-2
2021-07-24 20:42:23 +00:00
* lda $C00B Workaround for Ultrawarp bug
Kernel 0.94++
2021-06-06 19:06:49 +00:00
ProDOS.FX:Added DCLK support and //c related Fixes NSC: Reverted to $C3xx I/O space
2021-07-26 12:33:08 +00:00
lda NSC.IOBASE+4 Reset DS1216E comparison register with READ A2=1
Kernel 0.93+
2019-11-04 07:21:40 +00:00
IRQ, NSC, ACOS, CIFS, SRW
2021-06-22 18:59:02 +00:00
ldy #8 Read 8 bytes...
Kernel 0.94++
2021-05-30 20:34:03 +00:00
ProDOS.FX:Added DCLK support and //c related Fixes NSC: Reverted to $C3xx I/O space
2021-07-26 12:33:08 +00:00
.1 lda DS1216E.SIG-1,y
IRQ, NSC, ACOS, CIFS, SRW
2021-06-22 18:59:02 +00:00
phy
Kernel 0.94++
2021-05-30 20:34:03 +00:00
IRQ, NSC, ACOS, CIFS, SRW
2021-06-22 18:59:02 +00:00
ldy #8 ....of 8 bits
Kernel 0.94++
2021-05-30 20:34:03 +00:00
IRQ, NSC, ACOS, CIFS, SRW
2021-06-22 18:59:02 +00:00
.2 ldx #0
lsr
bcc .3
inx
ProDOS.FX:Added DCLK support and //c related Fixes NSC: Reverted to $C3xx I/O space
2021-07-26 12:33:08 +00:00
.3 bit NSC.IOBASE,x Write Pattern bit in A0, with A2=0
Kernel 0.94++
2021-05-30 20:34:03 +00:00
IRQ, NSC, ACOS, CIFS, SRW
2021-06-22 18:59:02 +00:00
dey
Kernel 0.93+
2019-11-04 07:21:40 +00:00
bne .2
IRQ, NSC, ACOS, CIFS, SRW
2021-06-22 18:59:02 +00:00
ply
dey
Kernel 0.94++
2021-05-30 20:34:03 +00:00
bne .1
Kernel 0.93+
2019-11-04 07:21:40 +00:00
Kernel 0.94++
2021-05-30 20:34:03 +00:00
ldx #8
Kernel 0.93+
2019-11-04 07:21:40 +00:00
.4 ldy #8
Kernel 0.94++
2021-05-30 20:34:03 +00:00
.5 pha
ProDOS.FX:Added DCLK support and //c related Fixes NSC: Reverted to $C3xx I/O space
2021-07-26 12:33:08 +00:00
lda NSC.IOBASE+4 Read Byte...
Kernel 0.93+
2019-11-04 07:21:40 +00:00
lsr
Kernel 0.94++
2021-05-30 20:34:03 +00:00
pla
ror
Kernel 0.93+
2019-11-04 07:21:40 +00:00
dey
bne .5
pha
lsr
lsr
lsr
lsr
tay
pla
and #$0F
clc
.HS 2C Bit Absolute to skip adc #$0A
.6 adc #$0A
dey
Kernel 0.94++
2021-05-30 20:34:03 +00:00
bpl .6
Kernel 0.93+
2019-11-04 07:21:40 +00:00
Kernel 0.94++
2021-05-30 20:34:03 +00:00
sta DS1216E.DATA-1,x
Kernel 0.93+
2019-11-04 07:21:40 +00:00
dex
Kernel 0.94++
2021-05-30 20:34:03 +00:00
bne .4
pha DS1216E.DATA
Kernel 0.93+
2019-11-04 07:21:40 +00:00
lda DS1216E.DATA+1 Get MM
asl
asl
asl
asl
asl
ora DS1216E.DATA+2 Get DD
sta DATELO
Kernel 0.94++
2021-05-30 20:34:03 +00:00
* lda DS1216E.DATA Get YY
pla
rol
sta DATELO+1
lda DS1216E.DATA+5 Get mm
sta TIMELO
lda DS1216E.DATA+4 Get HH
sta TIMELO+1
Kernel 0.93+
2019-11-04 07:21:40 +00:00
plp
Kernel 0.94++
2021-06-03 17:43:28 +00:00
bmi .8
Kernel 0.94++
2021-05-30 20:34:03 +00:00
Kernel 0.94++
2021-06-03 17:43:28 +00:00
sta CLRCXROM
Kernel 0.94++
2021-05-30 20:34:03 +00:00
IRQ, NSC, ACOS, CIFS, SRW
2021-06-22 18:59:02 +00:00
.8 plp
rts
Kernel 0.93+
2019-11-04 07:21:40 +00:00
*--------------------------------------
ProDOS.FX:Added DCLK support and //c related Fixes NSC: Reverted to $C3xx I/O space
2021-07-26 12:33:08 +00:00
DS1216E.SIG .HS 5CA33AC55CA33AC5 Reverted 7->0
Kernel 0.93+
2019-11-04 07:21:40 +00:00
*--------------------------------------
Kernel 0.94++
2021-05-30 20:34:03 +00:00
.LIST ON
Kernel 0.93+
2019-11-04 07:21:40 +00:00
NCLK.LEN .EQ *-NCLK.START
Kernel 0.94++
2021-05-30 20:34:03 +00:00
.LIST OFF
*--------------------------------------
* CONTROL SECTION :
*--------------------------------------
.DO NCLK.LEN>125
ERROR:NCLK Driver too big
.FIN
Kernel 0.93+
2019-11-04 07:21:40 +00:00
*--------------------------------------
MAN
Kernel 0.94
2020-08-30 17:50:57 +00:00
SAVE usr/src/prodos.fx/prodos.s.nclk
LOAD usr/src/prodos.fx/prodos.s
Kernel 0.93+
2019-11-04 07:21:40 +00:00
ASM
Reference in New Issue Copy Permalink