mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-11-16 23:20:43 +00:00
45 lines
773 B
ArmAsm
45 lines
773 B
ArmAsm
|
;=====================================
|
||
|
|
; print the title screen
|
||
|
|
;=====================================
|
||
|
|
|
||
|
|
show_title:
|
||
|
|
|
||
|
|
; clear text screen
|
||
|
|
|
||
|
|
jsr clear_all
|
||
|
|
|
||
|
|
; print non-inverse
|
||
|
|
|
||
|
|
jsr set_normal
|
||
|
|
|
||
|
|
; print messages
|
||
|
|
lda #<title_text
|
||
|
|
sta OUTL
|
||
|
|
lda #>title_text
|
||
|
|
sta OUTH
|
||
|
|
|
||
|
|
; print the text
|
||
|
|
|
||
|
|
ldx #8
|
||
|
|
title_loop:
|
||
|
|
|
||
|
|
jsr move_and_print
|
||
|
|
|
||
|
|
dex
|
||
|
|
bne title_loop
|
||
|
|
|
||
|
|
jsr set_inverse
|
||
|
|
|
||
|
|
rts
|
||
|
|
|
||
|
|
; 01234567890123456789012345678901234567890
|
||
|
|
title_text:
|
||
|
|
.byte 0, 0,"LOADING 2ND_REALITY V0.01 (15 AUG 2023)",0
|
||
|
|
.byte 0, 5," APPLE II CODE: VINCE WEAVER",0
|
||
|
|
.byte 0, 6," DISK : QKUMBA",0
|
||
|
|
.byte 0, 7," ZX02 : DMSC",0
|
||
|
|
.byte 0, 8," MUSIC: Z00M",0
|
||
|
|
.byte 0,16," ______",0
|
||
|
|
.byte 0,17," A \/\/\/ SOFTWARE PRODUCTION",0
|
||
|
|
.byte 0,19," HTTP://WWW.DEATER.NET/WEAVE/VMWPROD",0
|