4cade/src/demo/agent.u.s.a.a
2022-09-30 20:04:02 -04:00

49 lines
937 B
Plaintext

;license:MIT
;(c) 2021-2022 by Frank M., qkumba
!cpu 6502
!to "build/DEMO/AGENT.U.S.A#060300",plain
*=$300
!source "src/constants.a" ; no code in these
!source "src/macros.a"
+LOAD_XSINGLE title
lda #$60
sta $36D3
jsr $366D ; decompress
ldx #5
- lda $100,x
sta $300,x
dex
bpl -
sec
rol $3F3 ; point to $300 instead
jsr $FB6F
ldx #3-1
- lda #$EA
sta $15DD,x ; disable button press on main menu
lda patch,x
sta $0A06,x
sta $1605,x ; set exits
dex
bpl -
lda #$D0
sta $AC64 ; disable sound
jmp $837
patch !byte $4C,$00,$01
title !byte x_e-x_b
x_b !text "AGENT.U.S.A"
x_e
!if * > $3F0 {
!error "code is too large, ends at ", *
}