initial concept of ROM versioning, still needs quite some work
This commit is contained in:
1 parent
5b69467dc1
commit
890558213a
20 files changed
+191
-11
No files matched your search
@@ -0,0 +1,48 @@
|
||||
|
||||
// Routine is too long to fit in the original location
|
||||
|
||||
|
||||
initmsg_real:
|
||||
|
||||
// Print startup banner, up to 255 characters
|
||||
ldx #$00
|
||||
!:
|
||||
lda startup_banner, x
|
||||
beq !+ // 0 means end of banner
|
||||
jsr JCHROUT
|
||||
inx
|
||||
bne !-
|
||||
|
||||
!:
|
||||
// Print ROM revision
|
||||
lda #<rom_revision_basic_string
|
||||
ldy #>rom_revision_basic_string
|
||||
jsr STROUT
|
||||
|
||||
// Print PAL/NTSC, if configured
|
||||
|
||||
#if CONFIG_BANNER_PAL_NTSC
|
||||
jsr print_pal_ntsc
|
||||
#endif
|
||||
|
||||
jsr initmsg_double_return
|
||||
jsr print_return
|
||||
|
||||
// Work out free bytes, display them
|
||||
jsr basic_do_new
|
||||
sec
|
||||
lda MEMSIZ+0
|
||||
sbc TXTTAB+0
|
||||
tax
|
||||
lda MEMSIZ+1
|
||||
sbc TXTTAB+1
|
||||
|
||||
jsr print_integer
|
||||
|
||||
// Print rest of the start up message
|
||||
ldx #34
|
||||
jsr print_packed_message
|
||||
|
||||
initmsg_double_return:
|
||||
jsr print_return
|
||||
jmp print_return
|
||||
Reference in new issue
Block a user