Apple-2-SW/contiki
1
0
Fork 0
mirror of https://github.com/oliverschmidt/contiki.git synced 2024-11-19 03:05:14 +00:00
Code Issues Projects Releases Wiki Activity
fec41a0f44
contiki/cpu/6502/net/cs8900a.S

377 lines
8.0 KiB
ArmAsm
Raw Normal View History

Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
;
; Copyright (c) 2007, Adam Dunkels and Oliver Schmidt
; All rights reserved.
;
; Redistribution and use in source and binary forms, with or without
; modification, are permitted provided that the following conditions
; are met:
; 1. Redistributions of source code must retain the above copyright
; notice, this list of conditions and the following disclaimer.
; 2. Redistributions in binary form must reproduce the above copyright
; notice, this list of conditions and the following disclaimer in the
; documentation and/or other materials provided with the distribution.
; 3. Neither the name of the Institute nor the names of its contributors
; may be used to endorse or promote products derived from this software
; without specific prior written permission.
;
; THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
; ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
; IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
; ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
; FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
; DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
; OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
; HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
; LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
; OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
; SUCH DAMAGE.
;
; This file is part of the Contiki operating system.
;
; Author: Adam Dunkels <adam@sics.se>, Oliver Schmidt <ol.sc@web.de>
;
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
; $Id: cs8900a.S,v 1.4 2007/12/08 21:05:48 oliverschmidt Exp $
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
;
;---------------------------------------------------------------------
.segment "JUMPTABLE"
; Driver signature
.byte $65, $74, $68 ; "eth"
.byte $01 ; Ethernet driver API version number
; Ethernet address
mac: .byte $00, $0E, $3A ; OUI of Cirrus Logic
.byte $11, $11, $11
; Buffer attributes
bufaddr:.res 2 ; Address
bufsize:.res 2 ; Size
; Jump table.
.addr init
.addr poll
.addr send
.addr exit
;---------------------------------------------------------------------
.zeropage
sp: .res 2 ; Stack pointer (Do not trash !)
reg: .res 2 ; Address of rxtxreg
ptr: .res 2 ; Indirect addressing pointer
len: .res 2 ; Frame length
cnt: .res 2 ; Frame length counter
;---------------------------------------------------------------------
.segment "EXTZP": zeropage
; Empty segment to avoid linker warnings
;---------------------------------------------------------------------
.rodata
fixup: .byte fixup02-fixup01, fixup03-fixup02, fixup04-fixup03
.byte fixup05-fixup04, fixup06-fixup05, fixup07-fixup06
.byte fixup08-fixup07, fixup09-fixup08, fixup10-fixup09
.byte fixup11-fixup10, fixup12-fixup11, fixup13-fixup12
.byte fixup14-fixup13, fixup15-fixup14, fixup16-fixup15
.byte fixup17-fixup16, fixup18-fixup17, fixup19-fixup18
.byte fixup20-fixup19, fixup21-fixup20, fixup22-fixup21
.byte fixup23-fixup22, fixup24-fixup23, fixup25-fixup24
.byte fixup26-fixup25, fixup27-fixup26, fixup28-fixup27
.byte fixup29-fixup28, fixup30-fixup29, fixup31-fixup30
.byte fixup32-fixup31, fixup33-fixup32, fixup34-fixup33
.byte fixup35-fixup34, fixup36-fixup35, fixup37-fixup36
.byte fixup38-fixup37, fixup39-fixup38, fixup40-fixup39
.byte fixup41-fixup40, fixup42-fixup41, fixup43-fixup42
.byte fixup44-fixup43, fixup45-fixup44, fixup46-fixup45
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
.byte fixup47-fixup46, fixup48-fixup47
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
fixups = * - fixup
;---------------------------------------------------------------------
rxtxreg := $FF00 ; High byte patched at runtime
txcmd := $FF04 ; High byte patched at runtime
txlen := $FF06 ; High byte patched at runtime
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
isq := $FF08 ; High byte patched at runtime
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
packetpp := $FF0A ; High byte patched at runtime
ppdata := $FF0C ; High byte patched at runtime
.data
;---------------------------------------------------------------------
init:
; Save address of rxtxreg
sta reg
stx reg+1
; Start with first fixup location
lda #<(fixup01+1)
ldx #>(fixup01+1)
sta ptr
stx ptr+1
ldx #$FF
ldy #$00
; Fixup address at location
: lda reg
Minor change in comment.
2007-11-24 12:57:09 +00:00
eor (ptr),y ; Use XOR to support C64 RR-Net
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
sta (ptr),y
iny
lda reg+1
sta (ptr),y
dey
; Advance to next fixup location
inx
cpx #fixups
bcs :+
lda ptr
clc
adc fixup,x
sta ptr
bcc :-
inc ptr+1
bcs :- ; Always
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
: Activate C64 RR clockport in order to operate RR-Net
; - RR config register overlays CS8900A ISQ register
; - No need to distinguish as ISQ access doesn't hurt
:
fixup01:lda isq+1
ora #$01 ; Set clockport bit
fixup02:sta isq+1
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
; Turn on transmission and reception of frames
; PACKETPP = $0112, PPDATA = $00C0
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
lda #$12
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
ldx #$01
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup03:sta packetpp
fixup04:stx packetpp+1
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
lda #$C0
ldx #$00
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup05:sta ppdata
fixup06:stx ppdata+1
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
; Accept valid unicast + broadcast frames
; PACKETPP = $0104, PPDATA = $0D05
lda #$04
ldx #$01
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup07:sta packetpp
fixup08:stx packetpp+1
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
lda #$05
ldx #$0D
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup09:sta ppdata
fixup10:stx ppdata+1
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
; Set MAC address
; PACKETPP = $0158, PPDATA = MAC[0], MAC[1]
lda #$58
ldx #$01
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup11:sta packetpp
fixup12:stx packetpp+1
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
lda mac
ldx mac+1
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup13:sta ppdata
fixup14:stx ppdata+1
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
; PACKETPP = $015A, PPDATA = MAC[2], MAC[3]
lda #$5A
ldx #$01
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup15:sta packetpp
fixup16:stx packetpp+1
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
lda mac+2
ldx mac+3
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup17:sta ppdata
fixup18:stx ppdata+1
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
; PACKETPP = 0x015C, PPDATA = MAC[4], MAC[5]
lda #$5C
ldx #$01
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup19:sta packetpp
fixup20:stx packetpp+1
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
lda mac+4
ldx mac+5
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup21:sta ppdata
fixup22:stx ppdata+1
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
rts
;---------------------------------------------------------------------
poll:
; Check receiver event register to see if there
; are any valid unicast frames avaliable
; PACKETPP = $0124, PPDATA & $0D00 ?
lda #$24
ldx #$01
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup23:sta packetpp
fixup24:stx packetpp+1
fixup25:lda ppdata+1
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
and #$0D
bne :+
; No frame ready
tax
rts
; Process the incoming frame
; --------------------------
; Read receiver event and discard it
; RXTXREG
:
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup26:ldx rxtxreg+1
fixup27:lda rxtxreg
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
; Read frame length
; cnt = len = RXTXREG
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup28:ldx rxtxreg+1
fixup29:lda rxtxreg
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
sta len
stx len+1
sta cnt
stx cnt+1
; Adjust odd frame length
lsr
bcc :+
inc cnt
bne :+
inc cnt+1
; Is cnt > bufsize ?
: sec
lda cnt
sbc bufsize
lda cnt+1
sbc bufsize+1
bcc :+
; Yes, skip frame
; PACKETPP = $0102, PPDATA = PPDATA | $0040
lda #$02
ldx #$01
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup30:sta packetpp
fixup31:stx packetpp+1
fixup32:lda ppdata
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
ora #$40
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup33:sta ppdata
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
; No frame ready
lda #$00
tax
rts
; Read bytes into buffer
: lda bufaddr
ldx bufaddr+1
sta ptr
stx ptr+1
Minor optimization.
2007-11-29 21:56:55 +00:00
ldx cnt+1
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
ldy #$00
read:
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup34:lda rxtxreg
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
sta (ptr),y
iny
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup35:lda rxtxreg+1
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
sta (ptr),y
iny
bne :+
inc ptr+1
: cpy cnt
bne read
Minor optimization.
2007-11-29 21:56:55 +00:00
dex
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
bpl read
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
; Return frame length
lda len
ldx len+1
rts
;---------------------------------------------------------------------
send:
; Save frame length
sta cnt
stx cnt+1
; Transmit command
lda #$C0
ldx #$00
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup36:sta txcmd
fixup37:stx txcmd+1
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
lda cnt
ldx cnt+1
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup38:sta txlen
fixup39:stx txlen+1
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
; Adjust odd frame length
lsr
bcc :+
inc cnt
bne :+
inc cnt+1
; 8 retries
: ldy #$08
; Check for avaliable buffer space
; PACKETPP = $0138, PPDATA & $0100 ?
: lda #$38
ldx #$01
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup40:sta packetpp
fixup41:stx packetpp+1
fixup42:lda ppdata+1
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
and #$01
bne :+
; No space avaliable, skip a received frame
; PACKETPP = $0102, PPDATA = PPDATA | $0040
lda #$02
ldx #$01
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup43:sta packetpp
fixup44:stx packetpp+1
fixup45:lda ppdata
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
ora #$40
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup46:sta ppdata
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
; And try again
dey
bne :-
rts
; Send the frame
; --------------
; Write bytes from buffer
: lda bufaddr
ldx bufaddr+1
sta ptr
stx ptr+1
Minor optimization.
2007-11-29 21:56:55 +00:00
ldx cnt+1
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
ldy #$00
write: lda (ptr),y
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup47:sta rxtxreg
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
iny
lda (ptr),y
Take in account that the C64 Retro Replay clockport needs to be activated in order to work with the RR-Net Ethernet card.
2007-12-08 21:05:48 +00:00
fixup48:sta rxtxreg+1
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
iny
bne :+
inc ptr+1
: cpy cnt
bne write
Minor optimization.
2007-11-29 21:56:55 +00:00
dex
Generic Cirrus Logic CS8900A driver for cc65 targets. The driver is intended to be loaded dynamically as relocatable module. It modifies itself to accomodate different Ethernet IO address locations: - C64 TFE ($DE00) - C64 RRNet ($DE08) - Apple2 Uther ($C0x0)
2007-11-19 23:14:14 +00:00
bpl write
rts
;---------------------------------------------------------------------
exit:
rts
;---------------------------------------------------------------------
Reference in New Issue Copy Permalink