logo_demo: get last part hooked up
This commit is contained in:
parent
2d26e1e638
commit
828b599800
|
@ -11,7 +11,7 @@ LZSA = ~/research/lzsa/lzsa/lzsa
|
||||||
|
|
||||||
all: logo_demo.dsk
|
all: logo_demo.dsk
|
||||||
|
|
||||||
logo_demo.dsk: LOGO3 MUSIC DEMO MAP
|
logo_demo.dsk: LOGO3 MUSIC DEMO MAP MA2E.PT3
|
||||||
cp ../../logo/dsks/apple_logo_ii.dsk ./logo_demo.dsk
|
cp ../../logo/dsks/apple_logo_ii.dsk ./logo_demo.dsk
|
||||||
$(PRODOS) -y logo_demo.dsk -t BIN -a 0x2000 SAVE LOGO3
|
$(PRODOS) -y logo_demo.dsk -t BIN -a 0x2000 SAVE LOGO3
|
||||||
$(PRODOS) -y logo_demo.dsk DELETE FORMAT
|
$(PRODOS) -y logo_demo.dsk DELETE FORMAT
|
||||||
|
@ -29,7 +29,7 @@ logo_demo.dsk: LOGO3 MUSIC DEMO MAP
|
||||||
# $(PRODOS) -y logo_demo.dsk DELETE SAMPLES/LOGO.SINGS
|
# $(PRODOS) -y logo_demo.dsk DELETE SAMPLES/LOGO.SINGS
|
||||||
$(PRODOS) -y logo_demo.dsk -t BIN -a 0x4C00 SAVE MUSIC
|
$(PRODOS) -y logo_demo.dsk -t BIN -a 0x4C00 SAVE MUSIC
|
||||||
$(PRODOS) -y logo_demo.dsk -t BIN -a 0xE000 SAVE MAP
|
$(PRODOS) -y logo_demo.dsk -t BIN -a 0xE000 SAVE MAP
|
||||||
$(PRODOS) -y logo_demo.dsk -t BIN -a 0x2000 SAVE ./music/mA2E_-_Apple_2_for_Demosplash_2021.pt3 MA2E.PT3
|
$(PRODOS) -y logo_demo.dsk -t BIN -a 0x1000 SAVE MA2E.PT3
|
||||||
$(PRODOS) -y logo_demo.dsk SAVE -t TXT DEMO
|
$(PRODOS) -y logo_demo.dsk SAVE -t TXT DEMO
|
||||||
# printf '\xa9\x0d' | dd of=logo_demo.dsk bs=1 seek=9873 count=2 conv=notrunc
|
# printf '\xa9\x0d' | dd of=logo_demo.dsk bs=1 seek=9873 count=2 conv=notrunc
|
||||||
# printf '\xea\xea\xea' | dd of=logo_demo.dsk bs=1 seek=9905 count=3 conv=notrunc
|
# printf '\xea\xea\xea' | dd of=logo_demo.dsk bs=1 seek=9905 count=3 conv=notrunc
|
||||||
|
@ -54,6 +54,20 @@ music.o: music.s \
|
||||||
|
|
||||||
####
|
####
|
||||||
|
|
||||||
|
MA2E.PT3: STAGGERED ./music/mA2E_-_Apple_2_for_Demosplash_2021.pt3
|
||||||
|
cp ./music/mA2E_-_Apple_2_for_Demosplash_2021.pt3 MA2E.PT3
|
||||||
|
cat STAGGERED >> MA2E.PT3
|
||||||
|
|
||||||
|
####
|
||||||
|
|
||||||
|
STAGGERED: staggered.o
|
||||||
|
ld65 -o STAGGERED staggered.o -C $(LINKER_SCRIPTS)/apple2_1de5.inc
|
||||||
|
|
||||||
|
staggered.o: staggered.s
|
||||||
|
ca65 -o staggered.o staggered.s -l staggered.lst
|
||||||
|
|
||||||
|
####
|
||||||
|
|
||||||
DEMO: demo.logo
|
DEMO: demo.logo
|
||||||
$(TEXT_TO_PRODOS) < demo.logo > DEMO
|
$(TEXT_TO_PRODOS) < demo.logo > DEMO
|
||||||
|
|
||||||
|
|
|
@ -140,12 +140,12 @@ REPEAT 4 [PRINT "]
|
||||||
SETCURSOR [1 21] PRINT [CODE: DEATER]
|
SETCURSOR [1 21] PRINT [CODE: DEATER]
|
||||||
SETCURSOR [28 21] PRINT [MUSIC: mA2E]
|
SETCURSOR [28 21] PRINT [MUSIC: mA2E]
|
||||||
SETCURSOR [12 23] PRINT [APPLE II FOREVER]
|
SETCURSOR [12 23] PRINT [APPLE II FOREVER]
|
||||||
WAIT 600
|
.CALL 7653
|
||||||
END
|
END
|
||||||
|
|
||||||
TO DEMO
|
TO DEMO
|
||||||
CS FS
|
CS FS
|
||||||
PRINT [.BLOAD "MA2E.PT3 4096]
|
.BLOAD "MA2E.PT3 4096
|
||||||
.BLOAD "MUSIC 19456
|
.BLOAD "MUSIC 19456
|
||||||
PRINT [.CALL 19456]
|
PRINT [.CALL 19456]
|
||||||
.BLOAD "MAP 2048
|
.BLOAD "MAP 2048
|
||||||
|
@ -154,7 +154,7 @@ PRINT "OCEAN
|
||||||
PRINT "WARGAMES
|
PRINT "WARGAMES
|
||||||
PRINT "PLASMA
|
PRINT "PLASMA
|
||||||
PRINT "POLY
|
PRINT "POLY
|
||||||
MYST
|
PRINT "MYST
|
||||||
PRINT "CS
|
PRINT "CS
|
||||||
PRINT [REPEAT 5 [ CTREE ]]
|
PRINT [REPEAT 5 [ CTREE ]]
|
||||||
CREDITS
|
CREDITS
|
||||||
|
|
|
@ -3,13 +3,13 @@
|
||||||
|
|
||||||
; D0+ used by HGR routines
|
; D0+ used by HGR routines
|
||||||
|
|
||||||
HGR_COLOR = $E4
|
;HGR_COLOR = $E4
|
||||||
HGR_PAGE = $E6
|
;HGR_PAGE = $E6
|
||||||
|
|
||||||
GBASL = $26
|
GBASL = $26
|
||||||
GBASH = $27
|
GBASH = $27
|
||||||
|
|
||||||
COUNT = $FE
|
;COUNT = $FE
|
||||||
FRAME = $FF
|
FRAME = $FF
|
||||||
|
|
||||||
; soft-switches
|
; soft-switches
|
||||||
|
@ -28,9 +28,20 @@ SETGR = $FB40 ; set graphics and clear LO-RES screen
|
||||||
BELL2 = $FBE4
|
BELL2 = $FBE4
|
||||||
WAIT = $FCA8 ; delay 1/2(26+27A+5A^2) us
|
WAIT = $FCA8 ; delay 1/2(26+27A+5A^2) us
|
||||||
|
|
||||||
wires:
|
staggered:
|
||||||
|
|
||||||
|
; jsr HGR2
|
||||||
|
|
||||||
|
lda GBASL
|
||||||
|
sta save1
|
||||||
|
|
||||||
|
lda GBASH
|
||||||
|
sta save2
|
||||||
|
|
||||||
|
lda FRAME
|
||||||
|
sta save3
|
||||||
|
|
||||||
|
|
||||||
jsr HGR2
|
|
||||||
|
|
||||||
; pulse loop horizontal
|
; pulse loop horizontal
|
||||||
|
|
||||||
|
@ -38,9 +49,10 @@ wires:
|
||||||
tay
|
tay
|
||||||
tax
|
tax
|
||||||
sta GBASL
|
sta GBASL
|
||||||
|
sta FRAME
|
||||||
|
|
||||||
outer_loop:
|
outer_loop:
|
||||||
lda #$40
|
lda #$20
|
||||||
sta GBASH
|
sta GBASH
|
||||||
inner_loop:
|
inner_loop:
|
||||||
|
|
||||||
|
@ -67,12 +79,40 @@ inner_loop:
|
||||||
bne inner_loop
|
bne inner_loop
|
||||||
|
|
||||||
; lda #100
|
; lda #100
|
||||||
jsr WAIT
|
jsr wait
|
||||||
|
|
||||||
inx
|
inx
|
||||||
|
|
||||||
jmp outer_loop
|
; jmp outer_loop
|
||||||
|
|
||||||
|
inc FRAME
|
||||||
|
lda FRAME
|
||||||
|
cmp #32
|
||||||
|
bne outer_loop
|
||||||
|
|
||||||
|
lda save1
|
||||||
|
sta GBASL
|
||||||
|
|
||||||
|
lda save2
|
||||||
|
sta GBASH
|
||||||
|
|
||||||
|
lda save3
|
||||||
|
sta FRAME
|
||||||
|
|
||||||
|
rts
|
||||||
|
|
||||||
|
|
||||||
|
wait:
|
||||||
|
sec
|
||||||
|
wait2:
|
||||||
|
pha
|
||||||
|
wait3:
|
||||||
|
sbc #$01
|
||||||
|
bne wait3
|
||||||
|
pla
|
||||||
|
sbc #$01
|
||||||
|
bne wait2
|
||||||
|
rts
|
||||||
|
|
||||||
|
|
||||||
even_lookup:
|
even_lookup:
|
||||||
|
@ -80,3 +120,8 @@ even_lookup:
|
||||||
odd_lookup:
|
odd_lookup:
|
||||||
.byte $AA,$AA,$AA,$AB, $AB,$AE,$BA,$EA
|
.byte $AA,$AA,$AA,$AB, $AB,$AE,$BA,$EA
|
||||||
|
|
||||||
|
save1: .byte $00
|
||||||
|
save2: .byte $00
|
||||||
|
save3: .byte $00
|
||||||
|
|
||||||
|
|
||||||
|
|
|
@ -0,0 +1,12 @@
|
||||||
|
MEMORY {
|
||||||
|
ZP: start = $00, size = $1A, type = rw;
|
||||||
|
RAM: start = $1de5, size = $4800, file = %O;
|
||||||
|
}
|
||||||
|
|
||||||
|
SEGMENTS {
|
||||||
|
CODE: load = RAM, type = ro, align=$1;
|
||||||
|
RODATA: load = RAM, type = ro;
|
||||||
|
DATA: load = RAM, type = rw;
|
||||||
|
BSS: load = RAM, type = bss, define = yes;
|
||||||
|
ZEROPAGE: load = ZP, type = zp;
|
||||||
|
}
|
Loading…
Reference in New Issue