mirror of
https://github.com/a2-4am/passport.git
synced 2024-05-28 21:41:27 +00:00
shave some bytes
This commit is contained in:
parent
86692918e7
commit
f7de3777ee
|
@ -123,7 +123,7 @@ CreateFileOnHardDisk
|
||||||
; in: @HardDiskImagePath is populated and has non-zero length
|
; in: @HardDiskImagePath is populated and has non-zero length
|
||||||
; out: all registers and flags clobbered
|
; out: all registers and flags clobbered
|
||||||
;-------------------------------
|
;-------------------------------
|
||||||
PrintHardDiskImagePath
|
!macro PrintHardDiskImagePath {
|
||||||
lda HardDiskImagePath
|
lda HardDiskImagePath
|
||||||
sta @volumelen
|
sta @volumelen
|
||||||
ldx #0
|
ldx #0
|
||||||
|
@ -135,4 +135,5 @@ PrintHardDiskImagePath
|
||||||
cpx #$FD ; SMC
|
cpx #$FD ; SMC
|
||||||
bcc -
|
bcc -
|
||||||
lda #$8D
|
lda #$8D
|
||||||
jmp PrintA
|
jsr PrintA
|
||||||
|
}
|
||||||
|
|
|
@ -40,16 +40,13 @@ VERBOSE = $00 ; set to $01 to display API label addresses
|
||||||
!to "../build/PASSPORT.TMP",plain
|
!to "../build/PASSPORT.TMP",plain
|
||||||
!ct "lcase.ct"
|
!ct "lcase.ct"
|
||||||
|
|
||||||
; no code in these
|
|
||||||
!source "apidefs.a"
|
|
||||||
!source "prefs.save.a"
|
|
||||||
|
|
||||||
Relocatable
|
Relocatable
|
||||||
jmp MainMenu
|
jmp MainMenu
|
||||||
|
|
||||||
!bin "../build/t00only.pak"
|
!bin "../build/t00only.pak"
|
||||||
|
|
||||||
NonRelocatable
|
NonRelocatable
|
||||||
|
!source "apidefs.a"
|
||||||
!source "strings/en.a"
|
!source "strings/en.a"
|
||||||
!source "id/inspect0.a"
|
!source "id/inspect0.a"
|
||||||
!source "id/precheck.a"
|
!source "id/precheck.a"
|
||||||
|
@ -98,6 +95,7 @@ NonRelocatable
|
||||||
!source "harddisk.a"
|
!source "harddisk.a"
|
||||||
!source "slots.a"
|
!source "slots.a"
|
||||||
!source "prefs.a"
|
!source "prefs.a"
|
||||||
|
!source "prefs.save.a"
|
||||||
!source "keys.a"
|
!source "keys.a"
|
||||||
!source "cffa.a"
|
!source "cffa.a"
|
||||||
!source "progress.a"
|
!source "progress.a"
|
||||||
|
|
|
@ -183,7 +183,7 @@ WriteTrackNA ; entry point used by Special Delivery trac
|
||||||
beq @maybeWritingToRAMDisk
|
beq @maybeWritingToRAMDisk
|
||||||
; we are writing to a file on a hard disk, so print the
|
; we are writing to a file on a hard disk, so print the
|
||||||
; full pathname of that file
|
; full pathname of that file
|
||||||
jsr PrintHardDiskImagePath
|
+PrintHardDiskImagePath
|
||||||
bvc @doneSaidWriting ; always branches
|
bvc @doneSaidWriting ; always branches
|
||||||
|
|
||||||
@maybeWritingToRAMDisk
|
@maybeWritingToRAMDisk
|
||||||
|
|
Loading…
Reference in New Issue
Block a user