Replace BIT with LDA

This commit is contained in:
Florian Reitz 2021-08-25 00:28:34 +02:00
parent 99eebeb89f
commit b13ed9077f
7 changed files with 11 additions and 11 deletions

Binary file not shown.

Binary file not shown.

View File

@ -1,7 +1,7 @@
;******************************* ;*******************************
; ;
; Apple][Sd Firmware ; Apple][Sd Firmware
; Version 1.2.2 ; Version 1.2.3
; Defines ; Defines
; ;
; (c) Florian Reitz, 2017 - 2021 ; (c) Florian Reitz, 2017 - 2021

View File

@ -1,7 +1,7 @@
;******************************* ;*******************************
; ;
; Apple][Sd Firmware ; Apple][Sd Firmware
; Version 1.2.2 ; Version 1.2.3
; Main source ; Main source
; ;
; (c) Florian Reitz, 2017 - 2021 ; (c) Florian Reitz, 2017 - 2021
@ -86,7 +86,7 @@
LDA #197 LDA #197
JSR $FCA8 ; wait for 100 ms JSR $FCA8 ; wait for 100 ms
@OAPPLE: BIT OAPPLE ; check for OA key @OAPPLE: LDA OAPPLE ; check for OA key
BPL @INIT ; and skip boot if pressed BPL @INIT ; and skip boot if pressed
@NEXTSLOT: LDA CURSLOT ; skip boot when no card @NEXTSLOT: LDA CURSLOT ; skip boot when no card

View File

@ -1,7 +1,7 @@
;******************************* ;*******************************
; ;
; Apple][Sd Firmware ; Apple][Sd Firmware
; Version 1.2.2 ; Version 1.2.3
; Helper functions ; Helper functions
; ;
; (c) Florian Reitz, 2017 - 2021 ; (c) Florian Reitz, 2017 - 2021
@ -36,7 +36,7 @@ SDCMD: PHY
LDY #0 LDY #0
@LOOP: LDA (CMDLO),Y @LOOP: LDA (CMDLO),Y
STA DATA,X STA DATA,X
@WAIT: BIT CTRL,X ; TC is in N @WAIT: LDA CTRL,X ; TC is in N
BPL @WAIT BPL @WAIT
INY INY
CPY #6 CPY #6
@ -54,7 +54,7 @@ SDCMD: PHY
GETR1: LDA #DUMMY GETR1: LDA #DUMMY
STA DATA,X STA DATA,X
@WAIT: BIT CTRL,X @WAIT: LDA CTRL,X
BPL @WAIT BPL @WAIT
LDA DATA,X ; get response LDA DATA,X ; get response
BMI GETR1 ; wait for MSB=0 BMI GETR1 ; wait for MSB=0
@ -79,7 +79,7 @@ GETR3: JSR GETR1 ; get R1 first
JMP @WAIT ; first byte is already there JMP @WAIT ; first byte is already there
@LOOP: LDA #DUMMY ; send dummy @LOOP: LDA #DUMMY ; send dummy
STA DATA,X STA DATA,X
@WAIT: BIT CTRL,X @WAIT: LDA CTRL,X
BPL @WAIT BPL @WAIT
LDA DATA,X LDA DATA,X
PHA PHA
@ -128,7 +128,7 @@ GETBLOCK: PHX ; save X
LDA #2 ; it is a phantom slot LDA #2 ; it is a phantom slot
STA R31,X STA R31,X
@DRIVE: BIT DSNUMBER ; drive number @DRIVE: LDA DSNUMBER ; drive number
BPL @SDHC ; D1 BPL @SDHC ; D1
LDA R31,X ; D2 LDA R31,X ; D2
INC A INC A

View File

@ -1,7 +1,7 @@
;******************************* ;*******************************
; ;
; Apple][Sd Firmware ; Apple][Sd Firmware
; Version 1.2.2 ; Version 1.2.3
; ProDOS functions ; ProDOS functions
; ;
; (c) Florian Reitz, 2017 - 2021 ; (c) Florian Reitz, 2017 - 2021

View File

@ -1,7 +1,7 @@
;******************************* ;*******************************
; ;
; Apple][Sd Firmware ; Apple][Sd Firmware
; Version 1.2.2 ; Version 1.2.3
; Smartport functions ; Smartport functions
; ;
; (c) Florian Reitz, 2017 - 2021 ; (c) Florian Reitz, 2017 - 2021
@ -95,7 +95,7 @@ SMARTPORT: LDY #SMZPSIZE-1 ; save zeropage area for Smarport
BCC @RESTZP BCC @RESTZP
TXA TXA
;warum feste anzahl an bytes für return wert? ;warum feste anzahl an bytes f<EFBFBD>r return wert?
LDY #2 ; highbyte of # bytes transferred LDY #2 ; highbyte of # bytes transferred
LDX #0 ; low byte of # bytes transferred LDX #0 ; low byte of # bytes transferred
;warum wird mit #1 verglichen? ;warum wird mit #1 verglichen?