mirror of
https://github.com/a2-4am/4sports.git
synced 2024-06-30 04:29:34 +00:00
59 lines
1.1 KiB
Plaintext
59 lines
1.1 KiB
Plaintext
|
;license:MIT
|
||
|
;(c) 2022 by Frank M.
|
||
|
|
||
|
!cpu 6502
|
||
|
!to "build/DEMO/AUTOBAHN#060200",plain
|
||
|
*=$200
|
||
|
|
||
|
!source "src/constants.a" ; no code in these
|
||
|
!source "src/macros.a"
|
||
|
|
||
|
+ENABLE_ACCEL_LC
|
||
|
+LOAD_XSINGLE title
|
||
|
lda #<callback
|
||
|
sta $2037
|
||
|
lda #>callback
|
||
|
sta $2038
|
||
|
jmp $2000 ; decompress
|
||
|
|
||
|
callback
|
||
|
lda #<miles
|
||
|
sta $1216
|
||
|
lda #>miles
|
||
|
sta $1217
|
||
|
|
||
|
lda #$4C
|
||
|
sta $0B40
|
||
|
lda #<keychk
|
||
|
sta $0B41
|
||
|
lda #>keychk
|
||
|
sta $0B42
|
||
|
|
||
|
lda $60
|
||
|
sta $1BE0 ; kill joystick button
|
||
|
|
||
|
lda #$D0
|
||
|
sta $BBB
|
||
|
sta $1BBA ; kill sound
|
||
|
|
||
|
+DISABLE_ACCEL
|
||
|
jmp $1FD6
|
||
|
|
||
|
keychk lda $C000
|
||
|
bmi +
|
||
|
jmp $10E0
|
||
|
|
||
|
miles lda $D0
|
||
|
cmp #$15 ; stop at 15 miles/roughly 1.5 minutes/includes tunnel
|
||
|
beq +
|
||
|
jmp $10E0
|
||
|
+ jmp $100
|
||
|
|
||
|
title !byte x_e-x_b
|
||
|
x_b !text "AUTOBAHN"
|
||
|
x_e
|
||
|
|
||
|
!if * > $280 {
|
||
|
!error "code is too large, ends at ", *
|
||
|
}
|