mirror of
https://github.com/a2-4am/passport.git
synced 2025-03-18 09:30:33 +00:00
refactor some redundant checks
This commit is contained in:
parent
00a11f87d4
commit
a183a67ac4
@ -775,8 +775,14 @@ _applyToT00
|
||||
jsr decrunch
|
||||
jsr $2000
|
||||
_applyToAll
|
||||
; run these modules in verify and crack mode
|
||||
!source "patchers/t11diskvol.a" ; T11 && gIsRWTS only
|
||||
!source "patchers/t02volumename.a" ; T02 && gIsBoot0 only
|
||||
bit gMode
|
||||
bmi +
|
||||
jmp .checkPatchCount
|
||||
+
|
||||
; only run these modules in crack mode
|
||||
!source "patchers/universale7.a"
|
||||
!source "patchers/c9ff.a"
|
||||
!source "patchers/a6bc95.a" ; gIsPascal only
|
||||
@ -832,6 +838,7 @@ _applyToAll
|
||||
!source "patchers/woodbury.a" ; gPossibleWoodbury only
|
||||
!source "patchers/leisure.a" ; gIsProDOS && T22 only
|
||||
|
||||
.checkPatchCount
|
||||
lda gPatchCount
|
||||
beq .nopatches
|
||||
clc
|
||||
@ -877,7 +884,9 @@ LastMover
|
||||
}
|
||||
} else {
|
||||
!if (HIGHPOINT - (LastMover - FirstMover)) < LOWPOINT {
|
||||
!serious "code end (", HIGHPOINT - (LastMover - FirstMover), ") is below minimum (", LOWPOINT, ")!"
|
||||
!serious "My spoon is too big (", HIGHPOINT - (LastMover - FirstMover), ") is below minimum (", LOWPOINT, ")!"
|
||||
} else {
|
||||
!warn "LowPoint=", HIGHPOINT - (LastMover - FirstMover)
|
||||
}
|
||||
|
||||
!warn "CleanExit=",CleanExit
|
||||
|
@ -5,8 +5,6 @@
|
||||
; e.g. Game Frame One, Game Frame Two
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsPascal ; only ever seen this protection
|
||||
bne .exit ; on Pascal disks
|
||||
|
||||
|
@ -4,8 +4,6 @@
|
||||
; e.g. The Secrets of Science Island
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsPascal ; only ever seen this protection
|
||||
bne .exit ; on Pascal disks
|
||||
|
||||
|
@ -7,9 +7,6 @@
|
||||
; Moebius (Origin)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
|
||||
lda #$0F
|
||||
sta gDisplayBytes
|
||||
.loop lda gDisplayBytes
|
||||
|
@ -9,8 +9,6 @@
|
||||
; module by qkumba
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .jmpexit
|
||||
lda gIsAdvent
|
||||
beq +
|
||||
.jmpexit
|
||||
|
@ -16,8 +16,6 @@
|
||||
; - SAGA6 - Strange Odyssey v2.1-119
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gAdventureInternational
|
||||
bne .exit
|
||||
ldy #$08
|
||||
|
@ -9,8 +9,6 @@
|
||||
; - Photar
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsRWTS
|
||||
bne .exit
|
||||
|
||||
|
@ -13,8 +13,6 @@
|
||||
; - Let's Go There: Beginning Map and Geography Skills (Troll Associates)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsRWTS ; if DOS 3.3 RWTS
|
||||
bne .exit
|
||||
lda #$03
|
||||
|
@ -11,8 +11,6 @@
|
||||
; - Dinosaur Days
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsRWTS ; if DOS 3.3 RWTS
|
||||
bne .exit
|
||||
lda #$03
|
||||
|
@ -22,8 +22,6 @@
|
||||
;-------------------------------
|
||||
!zone {
|
||||
sec
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .noButInYellow
|
||||
lda #$07 ; sector to check for David-DOS variant
|
||||
ldx gIsDavidDOS
|
||||
beq .maybe
|
||||
|
@ -16,8 +16,6 @@
|
||||
; 1-2-3 Sequence Me (1991)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsProDOS
|
||||
bne .exit
|
||||
ldy #$08
|
||||
|
@ -5,8 +5,6 @@
|
||||
; after a certain number of boots
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
ldx gTrack
|
||||
dex
|
||||
bne .exit
|
||||
|
@ -7,8 +7,6 @@
|
||||
; Border Software
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsBoot0 ; if DOS 3.3 boot0 loader
|
||||
ora gIsBoot1 ; and DOS 3.3 boot1 loader
|
||||
bne .exit
|
||||
|
@ -13,8 +13,6 @@
|
||||
; Swiss Family Robinson
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
ldy #$1A
|
||||
jsr SearchTrack
|
||||
!byte $A8 ; TAY
|
||||
|
@ -10,8 +10,6 @@
|
||||
; Super Huey
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gTrack
|
||||
cmp #$13
|
||||
bne .exit
|
||||
|
@ -14,8 +14,6 @@
|
||||
; NoteCard Maker (Pascal variant)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
;
|
||||
; always run on Pascal disks
|
||||
;
|
||||
|
@ -8,8 +8,6 @@
|
||||
; - Rings of Saturn
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsRWTS
|
||||
bne .exit
|
||||
lda #$00
|
||||
|
@ -4,8 +4,6 @@
|
||||
; e.g. Video Title Shop, Tomahawk //e
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsDatasoft
|
||||
bne .exit
|
||||
|
||||
|
@ -4,8 +4,6 @@
|
||||
; e.g. Canyon Climber, Fathom's 40
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsRWTS
|
||||
bne .exit
|
||||
|
||||
|
@ -14,8 +14,6 @@
|
||||
; - Word Attack Plus Spanish 1.2
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsDavidson
|
||||
bne .exit
|
||||
|
||||
|
@ -10,8 +10,6 @@
|
||||
; - Math and Me 1.0
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsDavidson
|
||||
bne .exit
|
||||
|
||||
|
@ -5,8 +5,6 @@
|
||||
; or even its own DOS
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsRWTS ; if DOS 3.3 RWTS
|
||||
bne .exit
|
||||
|
||||
|
@ -3,8 +3,6 @@
|
||||
; construct new bootloader and RWTS for converted DOS 3.2 disks
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsDOS32
|
||||
bne .exit
|
||||
lda gIsRDOS13
|
||||
|
@ -10,8 +10,6 @@
|
||||
; Dragon Mix (1982, DLM)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsDOS32
|
||||
bne .exit
|
||||
lda #$0b
|
||||
|
@ -6,8 +6,6 @@
|
||||
; Castle Wolfenstein (1981, MUSE)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsDOS32
|
||||
bne .exit
|
||||
ldx gTrack
|
||||
|
@ -19,8 +19,6 @@
|
||||
; - Reading and Writing with The Boars (McGraw-Hill)
|
||||
;------------------------------------------------------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsBoot0
|
||||
beq +
|
||||
lda gIsProDOS
|
||||
|
@ -30,13 +30,9 @@
|
||||
; - Skyfox
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .jmpexit
|
||||
lda gIsEA ; only ever seen this protection
|
||||
beq + ; on Electronic Arts titles
|
||||
jmp .dostitles
|
||||
.jmpexit
|
||||
jmp .exit
|
||||
|
||||
+ ldy #40
|
||||
jsr SearchTrack
|
||||
|
@ -15,8 +15,6 @@
|
||||
; Teddy Bearrels of Fun (1987, DLM)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsF7F6
|
||||
bne .exit
|
||||
|
||||
|
@ -90,8 +90,6 @@
|
||||
; - Zork Quest II
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
ldy #$14
|
||||
jsr SearchTrack
|
||||
!byte $BD,$89,$C0
|
||||
|
@ -15,15 +15,13 @@
|
||||
; Oo-Topos
|
||||
;
|
||||
; and several non-Polarware disks:
|
||||
; Clue Master Detective
|
||||
; Clue Master Detective (1989, Leisure Genius)
|
||||
; RISK (1988, Leisure Genius)
|
||||
; ESL Writer (1989, Scholastic)
|
||||
; Magic Spells v2.1 (1985, The Learning Company)
|
||||
;
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsProDOS ; only seen this protection on ProDOS disks
|
||||
bne .exit
|
||||
ldy #$06
|
||||
|
@ -12,8 +12,6 @@
|
||||
; Power Up! The Typewriter
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsPascal ; only seen this protection on Pascal disks
|
||||
bne .exit
|
||||
ldy #$14
|
||||
|
@ -5,8 +5,6 @@
|
||||
; e.g. Essential Grammar, Math Football
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
; [speed optimization: only ever seen this protection on disks with
|
||||
; a specific nibble sequence on track $22, or an unformatted T22 --
|
||||
; if this global variable is set in SkipTrack() after failing to read T22S0F,
|
||||
|
@ -7,8 +7,6 @@
|
||||
; Super Taxman II (HAL Labs)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsBoot0
|
||||
bne .exit
|
||||
ldx gTrack
|
||||
|
@ -7,8 +7,6 @@
|
||||
; Harvey by Primes (Queue)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsBoot0
|
||||
bne .exit
|
||||
ldx gTrack
|
||||
|
@ -15,8 +15,6 @@
|
||||
; - Good Thinking! Sequencing Events Level Two (Hoffman Educational Systems)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda #$0C
|
||||
sta gDisplayBytes
|
||||
ldx #$00
|
||||
|
@ -3,22 +3,20 @@
|
||||
; encrypted bootloader hides an evil RWTS
|
||||
;
|
||||
; tested on
|
||||
; - Sherwood Forest (Phoenix Software)
|
||||
; - Mad Rat (Phoenix Software)
|
||||
; - Masquerade (Phoenix Software)
|
||||
; - Bats in the Belfry (Phoenix Software)
|
||||
; - Bouncing Kamungas (Penguin Software)
|
||||
; - Crime Wave (Penguin Software)
|
||||
; - Mad Rat (Phoenix Software)
|
||||
; - Masquerade (Phoenix Software)
|
||||
; - Pensate (Penguin Software)
|
||||
; - Sherwood Forest (Phoenix Software)
|
||||
; - Thunder Bombs (Penguin Software)
|
||||
; - The Spy Strikes Back (Penguin Software)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bmi +
|
||||
- jmp .exit
|
||||
+ bvc - ; nothing to do here in demuffin mode
|
||||
lda gIsHolle
|
||||
bne -
|
||||
beq +
|
||||
jmp .exit
|
||||
+ lda gTrack
|
||||
bne +
|
||||
jmp .DecryptBootloader
|
||||
|
@ -11,8 +11,6 @@
|
||||
; - BackAid - The Start Disk (1987, BrainBank's Be Better Series)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gTrack
|
||||
cmp #$02
|
||||
bne .exit
|
||||
|
@ -5,8 +5,6 @@
|
||||
; e.g. Alien Addition
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsBoot0 ; if DOS 3.3 boot0 loader
|
||||
ora gIsBoot1 ; and DOS 3.3 boot1 loader
|
||||
bne .exit
|
||||
|
@ -14,8 +14,6 @@
|
||||
; Success With Math - Multiplying and Dividing Fractions (1984, Mindscape)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsBoot0
|
||||
bne .exit
|
||||
lda gTrack
|
||||
|
@ -11,8 +11,6 @@
|
||||
; America Coast to Coast (Mindscape release)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gTrack
|
||||
cmp #$02
|
||||
bne .exit
|
||||
|
@ -39,8 +39,6 @@
|
||||
; - Winged Samurai
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gTrack
|
||||
cmp #$02
|
||||
bne .exit
|
||||
|
@ -8,8 +8,6 @@
|
||||
; Starship Commander (1981, Voyager Software)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsRWTS ; if DOS 3.3-shaped RWTS
|
||||
bne .exit
|
||||
lda #$0C
|
||||
|
@ -6,8 +6,6 @@
|
||||
;-------------------------------
|
||||
!zone {
|
||||
_jmpb660
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsRWTS ; if DOS 3.3-shaped RWTS
|
||||
bne .exit
|
||||
lda #$02
|
||||
|
@ -7,8 +7,6 @@
|
||||
;-------------------------------
|
||||
!zone {
|
||||
_jmpb720
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsRWTS ; if DOS 3.3-shaped RWTS
|
||||
bne .exit
|
||||
lda #$0B
|
||||
|
@ -93,8 +93,6 @@
|
||||
;-------------------------------
|
||||
!zone {
|
||||
_jmpbbfe
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsBoot0 ; if DOS 3.3 boot0 loader
|
||||
bne .exit
|
||||
ldx #$4B
|
||||
|
@ -8,8 +8,6 @@
|
||||
;-------------------------------
|
||||
!zone {
|
||||
_jmpbcf0
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsRWTS ; if DOS 3.3 RWTS
|
||||
bne .exit
|
||||
lda #$03
|
||||
|
@ -31,8 +31,6 @@
|
||||
;-------------------------------
|
||||
!zone {
|
||||
_jmpbeb1
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsRWTS ; if DOS 3.3 RWTS
|
||||
bne .exit
|
||||
lda #$02
|
||||
|
@ -8,8 +8,6 @@
|
||||
; see jmpbeb1.a for compatibility list
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsRWTS ; if DOS 3.3 RWTS
|
||||
bne .exit
|
||||
lda #$02
|
||||
|
@ -12,8 +12,6 @@
|
||||
; First Steps to Reading: Phonics II (1985, Grolier)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsBoot0
|
||||
bne .exit
|
||||
lda #$0F
|
||||
|
@ -9,8 +9,6 @@
|
||||
; e.g. English Achievement I
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIs8b3
|
||||
bne .exit
|
||||
beq + ; passport-test-suite/Ardy the Aardvark.woz [Z=1] reaches here
|
||||
|
@ -4,8 +4,6 @@
|
||||
; but generally DOS-shaped
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsLaureate
|
||||
bne .exit
|
||||
beq + ; passport-test-suite/Sound Ideas- Word Attack - Disk 1 - Ending Consonants.woz [Z=1] reaches here
|
||||
|
@ -7,8 +7,6 @@
|
||||
; - Risk v1.4 (Leisure Genius)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsProDOS
|
||||
bne .exit
|
||||
lda gTrack
|
||||
|
@ -8,8 +8,6 @@
|
||||
; e.g. 4: A-201 Conquering Whole Numbers
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .jmpexit
|
||||
lda gMECCFastloadType
|
||||
cmp #ID_MECC1
|
||||
bcc .scaninfo
|
||||
|
@ -4,8 +4,6 @@
|
||||
; MECC Database Composer
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .jmpexit
|
||||
lda gTrack
|
||||
cmp #7
|
||||
bne .jmpexit
|
||||
|
@ -18,8 +18,6 @@
|
||||
; GeoWhiz (1990, Silver Burdett and Ginn)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsProDOS ; only if ProDOS
|
||||
bne .exit
|
||||
ldy #$0C
|
||||
|
@ -6,8 +6,6 @@
|
||||
; and others by Methods & Solutions
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsBoot0 ; if DOS 3.3 boot0 loader
|
||||
bne .exit
|
||||
lda #$08
|
||||
|
@ -11,8 +11,6 @@
|
||||
; - Short Circuit
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsRWTS ; if DOS 3.3-shaped RWTS
|
||||
bne .exit
|
||||
ldy #$09
|
||||
|
@ -6,8 +6,6 @@
|
||||
; - Crown Of Arthain
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsRWTS ; if DOS 3.3-shaped RWTS
|
||||
bne .exit
|
||||
lda #$02
|
||||
|
@ -10,8 +10,6 @@
|
||||
; Shapes and Patterns
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
ldy #$09
|
||||
jsr SearchTrack
|
||||
!byte $AD,$EC,$C0
|
||||
|
@ -7,8 +7,6 @@
|
||||
; The Writing Workshop, Math Sequences
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsMilliken1
|
||||
bne .exit
|
||||
lda #$01
|
||||
|
@ -7,8 +7,6 @@
|
||||
; - The Function Game (MUSE)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsMUSERWTS
|
||||
bne .exit
|
||||
lda #$06
|
||||
|
@ -6,8 +6,6 @@
|
||||
;-------------------------------
|
||||
!zone {
|
||||
_nibtable
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsRWTS ; if DOS 3.3 RWTS
|
||||
bne .exit
|
||||
lda #$02
|
||||
|
@ -7,8 +7,6 @@
|
||||
; module by qkumba
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .jmpexit1
|
||||
lda gIsOptimum
|
||||
bne .jmpexit1
|
||||
ldx gTrack
|
||||
|
@ -3,10 +3,19 @@
|
||||
; RWTS with per-file encryption keys
|
||||
;
|
||||
; module by qkumba
|
||||
;
|
||||
; tested on
|
||||
; - Agenda Files (Apple)
|
||||
; - Apple How To (Apple)
|
||||
; - Apple Music Theory: Music Fundamentals v1.0 (MECC)
|
||||
; - Bridge Tutor (Compu-Bridge)
|
||||
; - Diet Analysis Program (Tess)
|
||||
; - Geometry and Measurement Volume 1 & 2 (Charles Lund)
|
||||
; - MusiComp (Apple)
|
||||
; - Personal Finance Manager (Apple)
|
||||
; - Stepwise Multiple Regression (Belanger & Boyle)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsPanglosDOS ; only if PanglossianDOS
|
||||
bne .exit
|
||||
ldy #6
|
||||
|
@ -10,8 +10,6 @@
|
||||
; (Jupiter, Saturn, Uranus, Nepture)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsPascal
|
||||
bne .exit
|
||||
lda #$0D
|
||||
|
@ -11,8 +11,6 @@
|
||||
; - Leadsheeter Utilities
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsDiversi ; only if we found Diversi-DOS boot sector earlier
|
||||
bne .exit
|
||||
ldy #14
|
||||
|
@ -15,8 +15,6 @@
|
||||
;
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsProDOS ; only seen this protection on ProDOS disks
|
||||
bne .exit
|
||||
ldy #$06
|
||||
|
@ -5,11 +5,8 @@
|
||||
; [thanks LoGo]
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .jmpexit
|
||||
lda gIsProDOS
|
||||
beq +
|
||||
.jmpexit
|
||||
jmp .exit
|
||||
+
|
||||
ldy #$0E
|
||||
|
@ -5,8 +5,6 @@
|
||||
;-------------------------------
|
||||
!zone {
|
||||
_prodosrwts
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsProDOS
|
||||
bne .exit
|
||||
ldy #$14
|
||||
|
@ -9,8 +9,6 @@
|
||||
; Math Blaster, Moebius
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .jmpexit
|
||||
lda gIsProtDOS
|
||||
beq +
|
||||
.jmpexit
|
||||
|
@ -5,8 +5,6 @@
|
||||
; module by qkumba
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .jmpexit
|
||||
lda gIsRDOS13
|
||||
beq .okay ; passport-test-suite/Epidemic.woz [Z=1] branches
|
||||
.jmpexit
|
||||
|
@ -5,8 +5,6 @@
|
||||
; module by qkumba
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsRDOS13
|
||||
bne .exit
|
||||
|
||||
|
@ -1,12 +1,22 @@
|
||||
;-------------------------------
|
||||
; #ROL1E
|
||||
; RWTS stores timing bits in $1E
|
||||
; e.g. Spellicopter
|
||||
;
|
||||
; tested on
|
||||
; - CryptoCube (DesignWare)
|
||||
; - FasTrack Quizzer (DesignWare)
|
||||
; - PatternMaker (Scarborough)
|
||||
; - Remember (DesignWare)
|
||||
; - Spellagraph (DesignWare)
|
||||
; - Spellicopter (DesignWare)
|
||||
; - States and Traits (DesignWare)
|
||||
; - The Chambers of Vocab (Reader's Digest Services)
|
||||
; - The Grammar Examiner (DesignWare)
|
||||
; - The Story Machine (Spinnaker)
|
||||
; - Trickster Coyote (Reader's Digest Services)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
_rol1e
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda #$03
|
||||
ldx #$00
|
||||
ldy #$06
|
||||
|
@ -21,8 +21,6 @@
|
||||
; - Problem Solving in Algebra (Encyclopaedia Britannica)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsBoot1 ; and DOS 3.3 boot1 loader
|
||||
bne .exit
|
||||
|
||||
|
@ -3,12 +3,8 @@
|
||||
;-------------------------------
|
||||
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .jmpexit
|
||||
ldy gIsRWTS ; DOS 3.3-shaped RWTSen only
|
||||
beq .initmatch1
|
||||
|
||||
.jmpexit
|
||||
jmp .exit
|
||||
|
||||
; address prologue (read)
|
||||
|
@ -11,9 +11,7 @@
|
||||
; disk allows either $D4 or $D5 for the
|
||||
; first address prologue nibble
|
||||
;-------------------------------
|
||||
bit gMode ; nothing to do here in verify mode
|
||||
bmi +
|
||||
jmp .exit
|
||||
jmp +
|
||||
-
|
||||
ldy #$0A
|
||||
jsr compare
|
||||
|
@ -7,8 +7,6 @@
|
||||
; e.g. Puzzle Master
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsBoot0 ; if DOS 3.3 boot0 loader
|
||||
ora gIsBoot1 ; and DOS 3.3 boot1 loader
|
||||
bne .exit
|
||||
|
@ -8,8 +8,6 @@
|
||||
;-------------------------------
|
||||
!zone {
|
||||
_rwtsswap2
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsBoot0 ; if DOS 3.3 boot0 loader
|
||||
bne .exit
|
||||
lda #$04
|
||||
|
@ -4,9 +4,6 @@
|
||||
; various MECC disks
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
|
||||
lda gPossibleMECCSwapper
|
||||
beq +
|
||||
ldy #$08
|
||||
|
@ -6,8 +6,6 @@
|
||||
; - Crown of Arthain
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda #$06
|
||||
ldx #$56
|
||||
ldy #$05
|
||||
|
@ -4,14 +4,12 @@
|
||||
; and user disk for saved games
|
||||
;
|
||||
; Tested on
|
||||
; Arcade Boot Camp
|
||||
; Transylvania 48K (1982 release)
|
||||
; Transylvania 128K (1982 release)
|
||||
; Xyphus
|
||||
; - Arcade Boot Camp
|
||||
; - Transylvania 48K (1982 release)
|
||||
; - Transylvania 128K (1982 release)
|
||||
; - Xyphus
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
ldx gTrack ; and track 1
|
||||
dex
|
||||
bne .exit
|
||||
|
@ -5,28 +5,29 @@
|
||||
; disks in a way that doesn't trip the
|
||||
; tamper check that checksums the code
|
||||
;
|
||||
; Apple Cider Spider
|
||||
; Aquatron
|
||||
; BC's Quest For Tires
|
||||
; Cannonball Blitz
|
||||
; Crossfire
|
||||
; Dragon's Keep
|
||||
; Learning with Leeper
|
||||
; Marauder
|
||||
; Mr. Cool
|
||||
; Oil's Well
|
||||
; Sammy Lightfoot
|
||||
; Sierra Championship Boxing
|
||||
; Winnie the Pooh
|
||||
; Donald Duck
|
||||
; Mickey's Space Adventure
|
||||
; King's Quest I, II, III
|
||||
; Leisure Suit Larry
|
||||
; Space Quest I, II
|
||||
; The Black Cauldron
|
||||
; The Dark Crystal
|
||||
; Mixed Up Mother Goose
|
||||
; The Artist
|
||||
; tested on
|
||||
; - Apple Cider Spider
|
||||
; - Aquatron
|
||||
; - BC's Quest For Tires
|
||||
; - Cannonball Blitz
|
||||
; - Crossfire
|
||||
; - Dragon's Keep
|
||||
; - Learning with Leeper
|
||||
; - Marauder
|
||||
; - Mr. Cool
|
||||
; - Oil's Well
|
||||
; - Sammy Lightfoot
|
||||
; - Sierra Championship Boxing
|
||||
; - Winnie the Pooh
|
||||
; - Donald Duck
|
||||
; - Mickey's Space Adventure
|
||||
; - King's Quest I, II, III
|
||||
; - Leisure Suit Larry
|
||||
; - Space Quest I, II
|
||||
; - The Black Cauldron
|
||||
; - The Dark Crystal
|
||||
; - Mixed Up Mother Goose
|
||||
; - The Artist
|
||||
;
|
||||
; module by qkumba
|
||||
;-------------------------------
|
||||
|
@ -14,8 +14,6 @@
|
||||
; module by qkumba
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .jmpexit
|
||||
lda gIsDOS32
|
||||
bne .jmpexit
|
||||
|
||||
|
@ -11,8 +11,6 @@
|
||||
; - The Chalice of Mostania (Coastal)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsRWTS ; if DOS 3.3 RWTS
|
||||
bne .exit
|
||||
lda #$03
|
||||
|
@ -4,16 +4,14 @@
|
||||
; seen on 13- and 16-sector disks by Science Research Associates
|
||||
;
|
||||
; tested on
|
||||
; Decimals C-2 (1981, SRA)
|
||||
; Decimals C-3 (1981, SRA)
|
||||
; Fractions C-2 (1981, SRA)
|
||||
; Fractions C-3 (1981, SRA)
|
||||
; Multiplication B (1981, SRA)
|
||||
; Measurement D-1 (1983, SRA)
|
||||
; - Decimals C-2 (1981, SRA)
|
||||
; - Decimals C-3 (1981, SRA)
|
||||
; - Fractions C-2 (1981, SRA)
|
||||
; - Fractions C-3 (1981, SRA)
|
||||
; - Multiplication B (1981, SRA)
|
||||
; - Measurement D-1 (1983, SRA)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsDOS32
|
||||
bne +
|
||||
lda #$0C
|
||||
|
@ -6,8 +6,6 @@
|
||||
; module by qkumba/4am
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
ldy gIsRDOS13
|
||||
bne .exit
|
||||
|
||||
|
@ -3,21 +3,19 @@
|
||||
; nibble check hidden inside encrypted startup program SSPROT$$1
|
||||
;
|
||||
; tested on
|
||||
; Grammar Lab 1 (1986, Southwell)
|
||||
; Grammar Lab 2 (1986, Southwell)
|
||||
; Mathematics Activities Courseware Level 4 (1983, Houghton Mifflin)
|
||||
; Mathematics Activities Courseware Level 6 (1983, Houghton Mifflin)
|
||||
; Sailing Through Story Problems (1987, DLM)
|
||||
; Spanish Grammar Review - Future and Conditional Tenses of Regular and Irregular Verbs (1984, Gessler)
|
||||
; Spanish Grammar Review - Familiar and Formal Commands in the Affirmative and Negative (1984, Gessler)
|
||||
; Spanish Grammar Review - Por vs. Para (1984, Gessler)
|
||||
; Water in the Air Quiz (1985, EME)
|
||||
; Comic Strip Maker (1986, Walt Disney)
|
||||
; Wortgefecht (Word Attack German) (1984, Gessler)
|
||||
; - Grammar Lab 1 (1986, Southwell)
|
||||
; - Grammar Lab 2 (1986, Southwell)
|
||||
; - Mathematics Activities Courseware Level 4 (1983, Houghton Mifflin)
|
||||
; - Mathematics Activities Courseware Level 6 (1983, Houghton Mifflin)
|
||||
; - Sailing Through Story Problems (1987, DLM)
|
||||
; - Spanish Grammar Review - Future and Conditional Tenses of Regular and Irregular Verbs (1984, Gessler)
|
||||
; - Spanish Grammar Review - Familiar and Formal Commands in the Affirmative and Negative (1984, Gessler)
|
||||
; - Spanish Grammar Review - Por vs. Para (1984, Gessler)
|
||||
; - Water in the Air Quiz (1985, EME)
|
||||
; - Comic Strip Maker (1986, Walt Disney)
|
||||
; - Wortgefecht (Word Attack German) (1984, Gessler)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit0
|
||||
lda gIsF7F6
|
||||
bne .exit0
|
||||
lda #$0F
|
||||
|
@ -57,8 +57,6 @@
|
||||
; - Word Quest (1985)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
sec
|
||||
lda gIsRWTS ; if DOS 3.3 RWTS
|
||||
bne .exit
|
||||
|
@ -6,8 +6,6 @@
|
||||
; - Swordthrust
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda #$01
|
||||
ldx #$75
|
||||
ldy #(@end_swordthrust-@begin_swordthrust)
|
||||
|
@ -2,12 +2,10 @@
|
||||
; #TRILLIUM
|
||||
;
|
||||
; tested on
|
||||
; Rendezvous with Rama rev. 2
|
||||
; Fahrenheit 451 rev. 2
|
||||
; - Rendezvous with Rama rev. 2
|
||||
; - Fahrenheit 451 rev. 2
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsTrillium
|
||||
beq .search
|
||||
lda gTrack
|
||||
|
@ -2,12 +2,10 @@
|
||||
; #TRILLIUM2
|
||||
;
|
||||
; tested on
|
||||
; Nine Princes of Amber
|
||||
; Perry Mason
|
||||
; - Nine Princes of Amber
|
||||
; - Perry Mason
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gTrack
|
||||
cmp #$17
|
||||
bne .exit
|
||||
|
@ -9,8 +9,6 @@
|
||||
; - Theseus and the Minotaur
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsTSR
|
||||
bne .exit
|
||||
ldx gTrack
|
||||
|
@ -8,8 +8,6 @@
|
||||
;-------------------------------
|
||||
!zone {
|
||||
universale7
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda #BASEPAGE+$0F
|
||||
sta .sector+2
|
||||
.search ldx #$A0
|
||||
|
@ -8,8 +8,6 @@
|
||||
; - PlayWriter: Castles and Creatures (1985, Woodbury)
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gPossibleWoodbury
|
||||
bne .exit
|
||||
|
||||
|
@ -7,8 +7,6 @@
|
||||
; - Zoom Grafix (Phoenix Software) multiple versions
|
||||
;-------------------------------
|
||||
!zone {
|
||||
bit gMode ; nothing to do here in verify-only mode
|
||||
bpl .exit
|
||||
lda gIsPhoenix ; only if we found Phoenix boot sector earlier
|
||||
bne .exit
|
||||
ldy #$0C
|
||||
|
Loading…
x
Reference in New Issue
Block a user