add Test Drive to the collection

This commit is contained in:
Peter Ferrie 2020-03-20 14:50:27 -07:00
parent 92a4f2a750
commit a57328633e
6 changed files with 41 additions and 2 deletions

File diff suppressed because one or more lines are too long

BIN
res/TITLE.DHGR/TEST.DRIVE Normal file

Binary file not shown.

View File

@ -23,6 +23,7 @@ SS.FOOTBALL=Type(06),AuxType(4000),Access(C3)
SS.SOCCER=Type(06),AuxType(4000),Access(C3)
SUMMER.EDITION=Type(06),AuxType(4000),Access(C3)
TECHNOCOP=Type(06),AuxType(4000),Access(C3)
TEST.DRIVE=Type(06),AuxType(4000),Access(C3)
TETRIS=Type(06),AuxType(4000),Access(C3)
THEXDER=Type(06),AuxType(4000),Access(C3)
VICTORY.ROAD=Type(06),AuxType(4000),Access(C3)

Binary file not shown.

View File

@ -60,7 +60,6 @@ Bandits
Injured Engine
Jawbreaker ][
Mating Zone [priority]
Test Drive [DHGR] [priority]
//other
Battle Chess [DHGR]

View File

@ -0,0 +1,39 @@
;license:MIT
;(c) 2020 by qkumba
!cpu 6502
!to "build/PRELAUNCH/TEST.DRIVE",plain
*=$106
!source "src/prelaunch/common.a"
+GET_MACHINE_STATUS
and #CHEATS_ENABLED
beq +
lda #$60
sta $A0A
+ jsr $800 ; load "DOS"
lda #$4C
sta $F858
lda #<callback1
sta $F859
lda #>callback2
sta $F85A
jmp $F800
callback1
lda #<callback2
sta $D039
lda #>callback2
sta $D03A
jmp $D000
callback2
jsr $E4FC
lda #$A5
sta $8213 ; patch - don't decrease lives
rts
!if * > $1C0 {
!error "code is too large, ends at ", *
}