driven: work on hooking up Atrus parts

also make his message slightly less cynical
This commit is contained in:
Vince Weaver
2024-11-12 13:25:06 -05:00
parent 9bfa4d4036
commit 08f697e47a
8 changed files with 62 additions and 54 deletions

View File

@@ -32,16 +32,16 @@ Mem usage plan:
Disk1 Map (disk has 35 tracks, each 4k in size)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
T 0 = Qboot / SAVES
T 1 = QLOAD 1244 bytes 1T ( 4096) 3k free
T 0 = Qboot
T 1 = QLOAD 1518 bytes 1T ( 4096) 3k free
T 2 = MUSIC 8645 bytes 3T (12288) 3k free
T 5 = INTRO 9779 bytes 3T (12288) 3k free
T 8 = CREDITS 7583 bytes 2T ( 8192) 500B free
T 5 = INTRO 9704 bytes 3T (12288) 3k free
T 8 = CREDITS 7487 bytes 2T ( 8192) 500B free
T 11 = DNI 2133 bytes 1T (4096) 2k free
T 12 = ATRUS 9506 bytes 3T (12288) 3k free
T 15 = GRAPHICS 18570 bytes 6T (24576) 2k free
T 15 = GRAPHICS 21967 bytes 6T (24576) 2k free
T 21 = MAGLEV 32000 bytes 8T (32768) 0k free
DISK HAS 29..34 free = 20k free
DISK HAS 10,29..34 free = 24k free
note: below is not accurate

View File

@@ -1,50 +1,37 @@
global:
sync up sound
load some things to AUX memory
print detection at beginning
can have music player do some slow memory copy from
language card 4k area?
count down as loaded
merge music+dni
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Loading: Demosplash logo? Count down as loaded?
Print "Needs Apple IIe / 128k"
Intro:
auto-progress animation
Loading:
Demosplash logo? Count down as loaded?
Number Counting:
figure out what to do
Intro:
re-time animation?
ATRUS:
+ fix centering of book
+ at end have it grow out of book
Talk1
Talk2 (TODO: have him look up?)
Scrolll text
Faster Scrolll text
Smoother scroll text (page flip?)
Plasma (have plasma expand to fill screen?)
Maglev:
Mine-cart / Circles
Mine-cart / Circles effect:
Didn't have time :(
Images
Spiky
233
????Catherine?
Atrus standing by the rift saying to go for it?
White
Guy in void
Fade out?
Perhaps the ending has not yet been written...
Seriously, how is it mid November already...
Or perhaps we ran out of time before the deadline...
Images:
different wipe?
CREDITS:
+ Make the music people look like Atrus and Moiety?

View File

@@ -30,8 +30,9 @@ atrus_opener:
bit PAGE1
;=================================
; intro
; atrus greetings
;=================================
; TODO: a wipe of some sort?
lda #<atrus03_graphics
sta zx_src_l+1
@@ -44,33 +45,42 @@ atrus_opener:
sta OUTL
lda #>atrus_text
sta OUTH
jsr move_and_print
jsr move_and_print
jsr move_and_print
jsr wait_until_keypress
jsr move_and_print ; Thank....
lda #1
jsr wait_seconds
jsr move_and_print ; I need...
lda #1
jsr wait_seconds
jsr move_and_print ; try again...
lda #1
jsr wait_seconds
; jsr wait_until_keypress
;=================================
; scroller
;=================================
bit FULLGR
lda #<atrus10_graphics
sta zx_src_l+1
lda #>atrus10_graphics
sta zx_src_h+1
lda #$40 ; on both pages
jsr zx02_full_decomp
jsr do_scroll
jsr wait_until_keypress
; jsr wait_until_keypress
;=================================
; book start
;=================================
lda #<atrus10_graphics
sta zx_src_l+1
lda #>atrus10_graphics
sta zx_src_h+1
lda #$40 ; on both pages
jsr zx02_full_decomp
lda #<atrus10_graphics
sta zx_src_l+1
lda #>atrus10_graphics
@@ -78,7 +88,10 @@ atrus_opener:
lda #$20
jsr zx02_full_decomp
jsr wait_until_keypress
lda #2
jsr wait_seconds
; jsr wait_until_keypress
;=================================
; plasma
@@ -100,10 +113,9 @@ atrus_opener:
lda #$40
jsr zx02_full_decomp
jsr plasma_debut
jsr wait_until_keypress
; jsr wait_until_keypress
rts

View File

@@ -127,7 +127,7 @@ skip_first_col:
lda KEYPRESS
bmi do_scroll_done
lda #200
lda #150
jsr wait
lda #$1
@@ -137,7 +137,7 @@ skip_first_col:
inc SCROLL_START
lda SCROLL_START
cmp #80
cmp #193
beq do_scroll_done
jmp_scroll_again:
jmp do_scroll_again
@@ -147,6 +147,15 @@ do_scroll_done:
rts
scroll_text: ;0123456789012345678901234567890123456789
.byte "@@@@@@@@@@@@@@@@@@@@\]^_THE@QUICK@BROWN@"
.byte "FOX@JUMPED@OVER@THE@LAZY@DOG@PACK@MY@BOX"
.byte "@WITH@FIVE@DOZEN@LIQOUR@JUGS"
; .byte "@@@@@@@@@@@@@@@@@@@@\]^_THE@QUICK@BROWN@"
; .byte "FOX@JUMPED@OVER@THE@LAZY@DOG@PACK@MY@BOX"
; .byte "@WITH@FIVE@DOZEN@LIQOUR@JUGS"
;0123456789012345678901234567890123456789
.byte "@@@@@@@@@@@@@@@@@@@@\]^_@I@HAVE@FOUND@A@W"
.byte "AY@TO@GET@YOU@HOME[@YOU@MUST@TRAVEL@TO@R"
.byte "IVENQ@FREE@THE@PEOPLEQ@SAVE@MY@WIFEQ@AND"
.byte "@TRAP@MY@DAD[@OH@ALSO@RIVEN@IS@IMPLODING"
.byte "[@SIGNAL@ME@WHEN@YOU@ARE@DONE[@@@@@@@@@@"
.byte "@@@@@@@@@@@@@@"

Binary file not shown.

Before

Width:  |  Height:  |  Size: 9.2 KiB

After

Width:  |  Height:  |  Size: 9.3 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 9.2 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 9.2 KiB

View File

@@ -154,7 +154,7 @@ load_program_loop:
.endif
.if 1
.if 0
;=======================
;=======================
; Run intro