migrated to ACME assembler
commit 145d64aa6e78838ed07cefed372f0ad6a4687e97 Author: FeralChild64 <you@example.com> Date: Sun Sep 20 20:16:57 2020 +0200 ACME adaptation commit 885209d7822286744ea53232ae7461472a01d5d6 Author: FeralChild64 <you@example.com> Date: Sun Sep 20 19:57:25 2020 +0200 ACME adaptation commit 334d84486bc603551887e7cbeb59d329f2224cc7 Author: FeralChild64 <you@example.com> Date: Sun Sep 20 18:29:15 2020 +0200 ACME adaptation commit b5966f49bcd8f0ca79cbec93819a31238924707e Author: FeralChild64 <you@example.com> Date: Sun Sep 20 18:09:31 2020 +0200 ACME adaptation commit 786536a93a5eab5e676fca99625b4eb094a554e7 Author: FeralChild64 <you@example.com> Date: Sun Sep 20 17:24:48 2020 +0200 ACME adaptation commit 704c70dfb1f5d68775d6f3da220803b8a3990f56 Author: FeralChild64 <you@example.com> Date: Sun Sep 20 15:07:12 2020 +0200 ACME adaptation commit 136874964c9083b375f151475310f9636871fc72 Author: FeralChild64 <you@example.com> Date: Sun Sep 20 14:45:14 2020 +0200 ACME adaptation commit 8eca0d5700b72d04336e72c5cd3a68e18b85f96d Author: FeralChild64 <you@example.com> Date: Sun Sep 20 14:06:52 2020 +0200 ACME adaptation commit 11d29eb7ee318239d782f85498b6d0524624d5c4 Author: FeralChild64 <you@example.com> Date: Sun Sep 20 13:56:45 2020 +0200 ACME apaptation commit c9b5e5e04cceb92c66bc027e6440bc0f7c5a499f Author: FeralChild64 <you@example.com> Date: Sun Sep 20 13:49:04 2020 +0200 ACME adaptation commit f5cc254cbc921f07863807468cb3fe26b410b409 Author: FeralChild64 <you@example.com> Date: Sun Sep 20 13:01:18 2020 +0200 ACME adaptation commit e135a27bf9c30cc0965379c954564e06406303b1 Author: FeralChild64 <you@example.com> Date: Sat Sep 19 21:55:01 2020 +0200 ACME adaptation commit e9dfddf90d9e2795e88b7da40ae050d733faeb56 Author: FeralChild64 <you@example.com> Date: Sat Sep 19 21:48:47 2020 +0200 Makefile fix commit 07030104c65cf5e5beeacf6d629ccb9245e58657 Author: FeralChild64 <you@example.com> Date: Sat Sep 19 21:42:00 2020 +0200 ACME adaptation commit f824362ee5bcfbffca86c430b57773b2ffd65655 Author: FeralChild64 <you@example.com> Date: Sat Sep 19 20:14:56 2020 +0200 ACME adaptation commit 3a3c59007dcd4940d89b8669f34ca56b61c25fdf Author: FeralChild64 <you@example.com> Date: Fri Sep 18 21:51:45 2020 +0200 ACME adaptation commit 6790ef7bc88a41de2881c69b7524dd4ab8c74b5d Author: FeralChild64 <you@example.com> Date: Fri Sep 18 20:35:23 2020 +0200 ACME adaptation commit 38ad18b90e9ec713aa7ca49576b3388ce1733357 Author: FeralChild64 <you@example.com> Date: Fri Sep 18 18:46:20 2020 +0200 ACME adaptation commit 541340371122a9702f7b2d9771c298223cffd0e9 Author: FeralChild64 <you@example.com> Date: Fri Sep 18 16:49:46 2020 +0200 ACME adaptation commit 25cfd5e186459be1a260d3eb8cfff767838de370 Author: FeralChild64 <you@example.com> Date: Thu Sep 17 20:13:33 2020 +0200 ACME adaptation commit f61599444d5b1d03d8fd8e4a6a7c3b85069bedb3 Author: FeralChild64 <you@example.com> Date: Thu Sep 17 19:29:23 2020 +0200 ACME adaptation commit b290be31ec7bb2e5723607697da1bbc621c84429 Author: FeralChild64 <you@example.com> Date: Thu Sep 17 17:20:14 2020 +0200 ACME adaptation commit 877be9e856880d98fd4bcb25b42aaaacda9dc463 Author: FeralChild64 <you@example.com> Date: Wed Sep 16 21:47:38 2020 +0200 ACME adaptation commit bb20edaf85d386e41d5c2f715b745b68fbd3362e Author: FeralChild64 <you@example.com> Date: Wed Sep 16 21:31:30 2020 +0200 ACME adaptation commit c5d31bd8685abce37c8e254d15aac20bd1570d9f Author: FeralChild64 <you@example.com> Date: Wed Sep 16 18:40:49 2020 +0200 ACME adaptation commit 29349826b38f8a89649171559dc8cf24c560aff1 Author: FeralChild64 <you@example.com> Date: Mon Sep 14 23:35:47 2020 +0200 ACME adaptation commit 8bcd6a621c4b11766d0cf34f79858ba90a67248e Author: FeralChild64 <you@example.com> Date: Mon Sep 14 22:52:25 2020 +0200 ACME adaptation commit e87a69edc2ce4bfcc460c31e08dcc352a985f88d Author: FeralChild64 <you@example.com> Date: Mon Sep 14 22:43:27 2020 +0200 ACME adaptation commit f49a097bd52e96d00b866c02bda7121e4543233c Author: FeralChild64 <you@example.com> Date: Mon Sep 14 19:02:07 2020 +0200 ACME adaptation commit fa0e9214a633b8e8f867cc70925b390940dcd426 Author: FeralChild64 <you@example.com> Date: Mon Sep 14 17:47:19 2020 +0200 ACME adaptation commit 1b763b91e7a03e426227129c7f22f0ce57a4c197 Author: FeralChild64 <you@example.com> Date: Mon Sep 14 17:17:10 2020 +0200 ACME adaptation commit e92a4b57b232cd85eb1e71090b8a89c7c8461ebc Author: FeralChild64 <you@example.com> Date: Mon Sep 14 17:15:37 2020 +0200 ACME adaptation commit de3c693e8a7e73ea5289198946058e3240894e6a Author: FeralChild64 <you@example.com> Date: Mon Sep 14 17:10:05 2020 +0200 ACME adaptation commit f9bd7ae0f04e932d613be9ed5cb19af9be5d338e Author: FeralChild64 <you@example.com> Date: Sun Sep 13 14:34:44 2020 +0200 ACME adaptation commit 694dee52555dbfc2b1f7f452a9671ff51106c057 Author: FeralChild64 <you@example.com> Date: Sun Sep 13 14:16:14 2020 +0200 ACME adaptation commit 0af2c55edfcd22942d9f25417eb0d35f55b71604 Author: FeralChild64 <you@example.com> Date: Fri Sep 11 17:38:09 2020 +0200 ACME adaptation commit 2015e17334bd56a1e8a13a5abc098d9c2e7ea44f Author: FeralChild64 <you@example.com> Date: Fri Sep 11 16:46:05 2020 +0200 ACME adaptation commit b1e972162798d60f4483cd6cc261e856c20c2c8c Author: FeralChild64 <you@example.com> Date: Fri Sep 11 16:24:31 2020 +0200 ACME adaptation commit 9d027e868466901ba53bf074a79ec8cf16273021 Author: FeralChild64 <you@example.com> Date: Fri Sep 11 15:04:31 2020 +0200 ACME adaptation commit 957186deddd1aa4f3b4f1aa1f421e4239a584e57 Author: FeralChild64 <you@example.com> Date: Thu Sep 10 22:49:07 2020 +0200 ACME adaptation commit b8060f67a455cfac109f08d96b62c360d693b931 Author: FeralChild64 <you@example.com> Date: Wed Sep 9 23:07:28 2020 +0200 ACME adaptation commit e54d004568f44bbfe5c070ef1d7cf3544112e497 Author: FeralChild64 <you@example.com> Date: Wed Sep 9 22:58:20 2020 +0200 ACME adaptation commit f90b77f073c5a605cb31c6ee451f65c8a8aff7d8 Author: FeralChild64 <you@example.com> Date: Wed Sep 9 22:12:09 2020 +0200 ACME adaptation commit b211bb4afcd9c58fe1f5c92f3007717d611cd531 Author: FeralChild64 <you@example.com> Date: Wed Sep 9 22:01:40 2020 +0200 ACME adaptation commit 8d7ea343b07e9e08e5f77f3c414758a6cffd0440 Author: FeralChild64 <you@example.com> Date: Wed Sep 9 21:38:34 2020 +0200 ACME adaptation commit 46413eb0d92d6400aba0ff8dfe556e61e8a44d78 Author: FeralChild64 <you@example.com> Date: Wed Sep 9 21:07:47 2020 +0200 ACME adaptation commit 9f98f69ecc21f7b74a5eb89e247f5a2c6fcb655d Author: FeralChild64 <you@example.com> Date: Wed Sep 9 20:05:03 2020 +0200 ACME adaptation commit 7bb9f1cadc682c7e0a4a6796739d860d473ca110 Author: FeralChild64 <you@example.com> Date: Wed Sep 9 19:55:12 2020 +0200 ACME adaptation commit 5fc115392b5bdca6b56f67ad866b1884d2d2bdf8 Author: FeralChild64 <you@example.com> Date: Wed Sep 9 19:31:10 2020 +0200 ACME adaptation commit b7940fc60e568d859df9e3156f6bacc6d685b2cc Author: FeralChild64 <you@example.com> Date: Wed Sep 9 19:16:09 2020 +0200 ACME adaptation commit 56288cb97197561afa0816b29c134ec1190e8eab Author: FeralChild64 <you@example.com> Date: Wed Sep 9 18:48:23 2020 +0200 ACME adaptation commit 10401a60fc7922a53d782120ef6795d889140218 Author: FeralChild64 <you@example.com> Date: Wed Sep 9 16:34:16 2020 +0200 ACME adaptation commit 8ce76e4d2b56837a691ae84b1a412a2ae32a157b Author: FeralChild64 <you@example.com> Date: Wed Sep 9 16:20:44 2020 +0200 ACME adaptation commit 33fade899fa6172ea6b5b5f6683bb61f544429fd Author: FeralChild64 <you@example.com> Date: Wed Sep 9 15:28:46 2020 +0200 ACME adaptation commit a416f04734402fcfbc57a933731376df2e0180a1 Author: FeralChild64 <you@example.com> Date: Wed Sep 9 12:40:03 2020 +0200 ACME adaptation commit f8daee005b1d29f6912723be2ac94bc5fbeb0508 Author: FeralChild64 <you@example.com> Date: Mon Sep 7 23:29:54 2020 +0200 ACME adaptation commit 83fe6bdd0b08a44fdbfc6eefe323a4b194ccaf5b Author: FeralChild64 <you@example.com> Date: Mon Sep 7 22:23:16 2020 +0200 ACME adaptation commit cb1f75620b9c83000a15c9c7f7acefdfee79a979 Author: FeralChild64 <you@example.com> Date: Mon Sep 7 19:23:12 2020 +0200 ACME adaptation commit e524d517c933ae1f0aeb49764d307fadb4845025 Author: FeralChild64 <you@example.com> Date: Sun Sep 6 08:24:25 2020 +0200 ACME adaptation - replaced comments commit 2ab572c3a21f4a78a7312d0e684bc11d91d1717a Author: FeralChild64 <you@example.com> Date: Sat Sep 5 17:59:10 2020 +0200 ACME adaptation - replaced the assembler
This commit is contained in:
1 parent
bfc8291e41
commit
c8d255130c
685 files changed
+15835
-16296
No files matched your search
@@ -1,9 +1,9 @@
|
||||
// #LAYOUT# STD * #TAKE
|
||||
// #LAYOUT# X16 BASIC_0 #TAKE-OFFSET 2000
|
||||
// #LAYOUT# * BASIC_0 #TAKE
|
||||
// #LAYOUT# * * #IGNORE
|
||||
;; #LAYOUT# STD * #TAKE
|
||||
;; #LAYOUT# X16 BASIC_0 #TAKE-OFFSET 2000
|
||||
;; #LAYOUT# * BASIC_0 #TAKE
|
||||
;; #LAYOUT# * * #IGNORE
|
||||
|
||||
|
||||
// Computes Mapping the C64 p88
|
||||
; Computes Mapping the C64 p88
|
||||
|
||||
.word basic_cold_start
|
||||
!word basic_cold_start
|
||||
@@ -1,9 +1,9 @@
|
||||
// #LAYOUT# STD * #TAKE
|
||||
// #LAYOUT# X16 BASIC_0 #TAKE-OFFSET 2000
|
||||
// #LAYOUT# * BASIC_0 #TAKE
|
||||
// #LAYOUT# * * #IGNORE
|
||||
;; #LAYOUT# STD * #TAKE
|
||||
;; #LAYOUT# X16 BASIC_0 #TAKE-OFFSET 2000
|
||||
;; #LAYOUT# * BASIC_0 #TAKE
|
||||
;; #LAYOUT# * * #IGNORE
|
||||
|
||||
|
||||
// Computes Mapping the C64 p88
|
||||
; Computes Mapping the C64 p88
|
||||
|
||||
.word basic_warm_start
|
||||
!word basic_warm_start
|
||||
@@ -1,48 +1,48 @@
|
||||
// #LAYOUT# STD * #TAKE
|
||||
// #LAYOUT# * BASIC_0 #TAKE
|
||||
// #LAYOUT# * * #IGNORE
|
||||
;; #LAYOUT# STD * #TAKE
|
||||
;; #LAYOUT# * BASIC_0 #TAKE
|
||||
;; #LAYOUT# * * #IGNORE
|
||||
|
||||
//
|
||||
// Continuation of the BASIC cold start routine
|
||||
//
|
||||
;
|
||||
; Continuation of the BASIC cold start routine
|
||||
;
|
||||
|
||||
|
||||
basic_cold_start_internal:
|
||||
|
||||
// Setup vectors at $300
|
||||
; Setup vectors at $300
|
||||
ldy #$0B
|
||||
!:
|
||||
@1:
|
||||
lda basic_vector_defaults_1, y
|
||||
sta IERROR, y
|
||||
dey
|
||||
bpl !-
|
||||
bpl @1
|
||||
|
||||
// Setup misc vectors
|
||||
; Setup misc vectors
|
||||
ldy #$04
|
||||
!:
|
||||
@2:
|
||||
lda basic_vector_defaults_2, y
|
||||
sta ADRAY1, y
|
||||
dey
|
||||
bpl !-
|
||||
bpl @2
|
||||
|
||||
// Setup USRPOK
|
||||
lda #$4C // JMP opcode
|
||||
; Setup USRPOK
|
||||
lda #$4C ; JMP opcode
|
||||
sta USRPOK
|
||||
lda #<do_ILLEGAL_QUANTITY_error
|
||||
sta USRADD+0
|
||||
lda #>do_ILLEGAL_QUANTITY_error
|
||||
sta USRADD+1
|
||||
|
||||
// Clear the BRK location address
|
||||
; Clear the BRK location address
|
||||
lda #$00
|
||||
sta CMP0+0
|
||||
sta CMP0+1
|
||||
|
||||
// Print startup messages
|
||||
; Print startup messages
|
||||
jsr INITMSG
|
||||
|
||||
// Initialize other variables by performing NEW
|
||||
; Initialize other variables by performing NEW
|
||||
jsr do_new
|
||||
|
||||
// jump into warm start loop
|
||||
; jump into warm start loop
|
||||
jmp basic_warm_start
|
||||
@@ -1,23 +1,23 @@
|
||||
// #LAYOUT# STD * #TAKE
|
||||
// #LAYOUT# * BASIC_0 #TAKE
|
||||
// #LAYOUT# * * #IGNORE
|
||||
;; #LAYOUT# STD * #TAKE
|
||||
;; #LAYOUT# * BASIC_0 #TAKE
|
||||
;; #LAYOUT# * * #IGNORE
|
||||
|
||||
//
|
||||
// Continuation of the BASIC cold start routine
|
||||
//
|
||||
;
|
||||
; Continuation of the BASIC cold start routine
|
||||
;
|
||||
|
||||
basic_warm_start_real:
|
||||
|
||||
#if CONFIG_MEMORY_MODEL_60K
|
||||
// We need our helpers to get to filenames under ROMs or IO area
|
||||
!ifdef CONFIG_MEMORY_MODEL_60K {
|
||||
; We need our helpers to get to filenames under ROMs or IO area
|
||||
jsr install_ram_routines
|
||||
#endif
|
||||
}
|
||||
|
||||
// If warm start caused by BRK, print it address
|
||||
// XXX sys 58235 also triggers this - to be fixed
|
||||
; If warm start caused by BRK, print it address
|
||||
; XXX sys 58235 also triggers this - to be fixed
|
||||
lda CMP0
|
||||
ora CMP0+1
|
||||
beq !+
|
||||
beq @1
|
||||
|
||||
ldx #IDX__STR_BRK_AT
|
||||
jsr print_packed_misc_str
|
||||
@@ -26,5 +26,5 @@ basic_warm_start_real:
|
||||
jsr print_hex_byte
|
||||
lda CMP0+0
|
||||
jsr print_hex_byte
|
||||
!:
|
||||
@1:
|
||||
jmp shell_main_loop
|
||||
@@ -1,31 +1,30 @@
|
||||
// #LAYOUT# STD * #TAKE
|
||||
// #LAYOUT# * BASIC_0 #TAKE
|
||||
// #LAYOUT# * * #IGNORE
|
||||
;; #LAYOUT# STD * #TAKE
|
||||
;; #LAYOUT# * BASIC_0 #TAKE
|
||||
;; #LAYOUT# * * #IGNORE
|
||||
|
||||
|
||||
// BASIC Cold start entry point
|
||||
// Computes Mapping the 64 p211
|
||||
; BASIC Cold start entry point
|
||||
; Computes Mapping the 64 p211
|
||||
|
||||
basic_cold_start:
|
||||
|
||||
#if ROM_LAYOUT_STD // skip on non-sgtandard ROM layouts - they produce single image nevertheless
|
||||
!ifdef ROM_LAYOUT_STD { ; skip on non-sgtandard ROM layouts - they produce single image nevertheless
|
||||
|
||||
// Before doing anything, check if we have a compatible BASIC/KERNAL pair
|
||||
; Before doing anything, check if we have a compatible BASIC/KERNAL pair
|
||||
|
||||
ldy #(__rom_revision_basic_end - rom_revision_basic - 1)
|
||||
!:
|
||||
@1:
|
||||
lda rom_revision_basic, y
|
||||
cmp rom_revision_kernal, y
|
||||
beq !+
|
||||
beq @2
|
||||
|
||||
panic #P_ERR_ROM_MISMATCH
|
||||
+panic P_ERR_ROM_MISMATCH
|
||||
|
||||
!:
|
||||
@2:
|
||||
dey
|
||||
bpl !--
|
||||
bpl @1
|
||||
}
|
||||
|
||||
#endif
|
||||
|
||||
// Remaining part would not fit here
|
||||
; Remaining part would not fit here
|
||||
|
||||
jmp basic_cold_start_internal
|
||||
@@ -1,9 +1,9 @@
|
||||
// #LAYOUT# STD * #TAKE
|
||||
// #LAYOUT# * BASIC_0 #TAKE
|
||||
// #LAYOUT# * * #IGNORE
|
||||
;; #LAYOUT# STD * #TAKE
|
||||
;; #LAYOUT# * BASIC_0 #TAKE
|
||||
;; #LAYOUT# * * #IGNORE
|
||||
|
||||
|
||||
// Clear screen etc, show READY prompt.
|
||||
; Clear screen etc, show READY prompt.
|
||||
|
||||
basic_warm_start:
|
||||
|
||||
|
||||
@@ -1,32 +1,35 @@
|
||||
// #LAYOUT# STD * #TAKE
|
||||
// #LAYOUT# * BASIC_0 #TAKE
|
||||
// #LAYOUT# * * #IGNORE
|
||||
;; #LAYOUT# STD * #TAKE
|
||||
;; #LAYOUT# * BASIC_0 #TAKE
|
||||
;; #LAYOUT# * * #IGNORE
|
||||
|
||||
//
|
||||
// Well-known BASIC routine, described in:
|
||||
//
|
||||
// - [CM64] Computes Mapping the Commodore 64 - page 212
|
||||
//
|
||||
// Prints the start-up messages
|
||||
//
|
||||
;
|
||||
; Well-known BASIC routine, described in:
|
||||
;
|
||||
; - [CM64] Computes Mapping the Commodore 64 - page 212
|
||||
;
|
||||
; Prints the start-up messages
|
||||
;
|
||||
|
||||
INITMSG:
|
||||
|
||||
#if ROM_LAYOUT_M65
|
||||
!ifdef CONFIG_MB_M65 {
|
||||
|
||||
jsr map_BASIC_1
|
||||
jsr_ind VB1__INITMSG
|
||||
!:
|
||||
jsr (VB1__INITMSG)
|
||||
|
||||
; FALLTROUGH
|
||||
|
||||
INITMSG_end:
|
||||
|
||||
jmp map_NORMAL
|
||||
|
||||
INITMSG_autoswitch:
|
||||
|
||||
jsr map_BASIC_1
|
||||
jsr_ind VB1__INITMSG_autoswitch
|
||||
bra !-
|
||||
jsr (VB1__INITMSG_autoswitch)
|
||||
bra INITMSG_end
|
||||
|
||||
#else
|
||||
} else {
|
||||
|
||||
jmp initmsg_real
|
||||
|
||||
#endif
|
||||
}
|
||||
@@ -1,61 +1,61 @@
|
||||
// #LAYOUT# STD * #TAKE
|
||||
// #LAYOUT# M65 BASIC_1 #TAKE
|
||||
// #LAYOUT# X16 BASIC_0 #TAKE
|
||||
// #LAYOUT# * * #IGNORE
|
||||
;; #LAYOUT# STD * #TAKE
|
||||
;; #LAYOUT# M65 BASIC_1 #TAKE
|
||||
;; #LAYOUT# X16 BASIC_0 #TAKE
|
||||
;; #LAYOUT# * * #IGNORE
|
||||
|
||||
//
|
||||
// Print out the amount of free bytes - for the startup banner
|
||||
//
|
||||
;
|
||||
; Print out the amount of free bytes - for the startup banner
|
||||
;
|
||||
|
||||
|
||||
initmsg_bytes_free:
|
||||
|
||||
// Setup pointers to BASIC memory storage
|
||||
; Setup pointers to BASIC memory storage
|
||||
|
||||
lda #<$0801
|
||||
sta TXTTAB+0
|
||||
lda #>$0801
|
||||
sta TXTTAB+1
|
||||
|
||||
// Get top of memory.
|
||||
// If a cart is present, then it is $7FFF,
|
||||
// if not, then it is $F7FF, since we support having
|
||||
// programs and variables under ROM.
|
||||
// i.e., we support 56KB RAM for BASIC, keeping some space
|
||||
// free for some optimisation structures, e.g., FOR/NEXT loop
|
||||
// records (without them going on the stack), GOSUB stack
|
||||
// (same story), expression value cache?
|
||||
; Get top of memory.
|
||||
; If a cart is present, then it is $7FFF,
|
||||
; if not, then it is $F7FF, since we support having
|
||||
; programs and variables under ROM.
|
||||
; i.e., we support 56KB RAM for BASIC, keeping some space
|
||||
; free for some optimisation structures, e.g., FOR/NEXT loop
|
||||
; records (without them going on the stack), GOSUB stack
|
||||
; (same story), expression value cache?
|
||||
|
||||
sec // Read, not write value
|
||||
sec ; Read, not write value
|
||||
jsr JMEMTOP
|
||||
cpx #$80
|
||||
beq !+
|
||||
#if CONFIG_MEMORY_MODEL_60K
|
||||
beq @1
|
||||
!ifdef CONFIG_MEMORY_MODEL_60K {
|
||||
lda #>$F7FF
|
||||
#elif CONFIG_MEMORY_MODEL_50K
|
||||
} else ifdef CONFIG_MEMORY_MODEL_50K {
|
||||
lda #>$D000
|
||||
#elif CONFIG_MEMORY_MODEL_46K
|
||||
} else ifdef CONFIG_MEMORY_MODEL_46K {
|
||||
lda #>$C000
|
||||
#else // CONFIG_MEMORY_MODEL_38K
|
||||
} else { ; CONFIG_MEMORY_MODEL_38K
|
||||
lda #>$A000
|
||||
#endif
|
||||
skip_2_bytes_trash_nvz
|
||||
!:
|
||||
}
|
||||
+skip_2_bytes_trash_nvz
|
||||
@1:
|
||||
lda #>$8000
|
||||
sta MEMSIZ+1
|
||||
#if CONFIG_MEMORY_MODEL_60K
|
||||
!ifdef CONFIG_MEMORY_MODEL_60K {
|
||||
cpx #$80
|
||||
beq !+
|
||||
beq @2
|
||||
lda #$FF
|
||||
skip_2_bytes_trash_nvz
|
||||
!:
|
||||
+skip_2_bytes_trash_nvz
|
||||
@2:
|
||||
lda #<$00
|
||||
#else // CONFIG_MEMORY_MODEL_38K || CONFIG_MEMORY_MODEL_46K || CONFIG_MEMORY_MODEL_50K
|
||||
} else { ; CONFIG_MEMORY_MODEL_38K || CONFIG_MEMORY_MODEL_46K || CONFIG_MEMORY_MODEL_50K
|
||||
lda #<$00
|
||||
#endif
|
||||
}
|
||||
sta MEMSIZ+0
|
||||
|
||||
// Print number of bytes free
|
||||
; Print number of bytes free
|
||||
|
||||
sec
|
||||
lda MEMSIZ+0
|
||||
|
||||
@@ -1,22 +1,22 @@
|
||||
// #LAYOUT# M65 BASIC_1 #TAKE
|
||||
// #LAYOUT# * * #IGNORE
|
||||
;; #LAYOUT# M65 BASIC_1 #TAKE
|
||||
;; #LAYOUT# * * #IGNORE
|
||||
|
||||
|
||||
// Routine is too long to fit in the original location
|
||||
; Routine is too long to fit in the original location
|
||||
|
||||
// XXX banner-related code needs cleanup, move MEGA65 stuff to a separate file
|
||||
; XXX banner-related code needs cleanup, move MEGA65 stuff to a separate file
|
||||
|
||||
|
||||
INITMSG:
|
||||
|
||||
jsr INITMSG_main_banner
|
||||
|
||||
// Display additional information, depending on the mode
|
||||
; Display additional information, depending on the mode
|
||||
|
||||
jsr M65_MODEGET
|
||||
bcc !+
|
||||
bcc @1
|
||||
|
||||
// Legacy C64 compatibility mode
|
||||
; Legacy C64 compatibility mode
|
||||
|
||||
jsr INITMSG_partial
|
||||
|
||||
@@ -24,8 +24,8 @@ INITMSG:
|
||||
jsr print_packed_misc_str
|
||||
|
||||
bra INITMSG_end
|
||||
!:
|
||||
// Native mode
|
||||
@1:
|
||||
; Native mode
|
||||
|
||||
ldx #48
|
||||
ldy #0
|
||||
@@ -39,7 +39,7 @@ INITMSG:
|
||||
jsr print_sysinfo_banner
|
||||
jsr M65_SETWIN_N
|
||||
|
||||
// Native mode - display revision and available memory
|
||||
; Native mode - display revision and available memory
|
||||
|
||||
ldx #$05
|
||||
ldy #$00
|
||||
@@ -53,7 +53,7 @@ INITMSG:
|
||||
jsr print_return
|
||||
jsr print_return
|
||||
|
||||
// FALLTROUGH
|
||||
; FALLTROUGH
|
||||
|
||||
INITMSG_end:
|
||||
|
||||
@@ -65,18 +65,18 @@ INITMSG_end:
|
||||
|
||||
INITMSG_main_banner:
|
||||
|
||||
// Clear the screen first, some cartridges (like IEEE-488) are leaving a mess on the screen
|
||||
; Clear the screen first, some cartridges (like IEEE-488) are leaving a mess on the screen
|
||||
|
||||
lda #147
|
||||
jsr JCHROUT
|
||||
|
||||
// Display main banner
|
||||
; Display main banner
|
||||
|
||||
lda #<startup_banner
|
||||
ldy #>startup_banner
|
||||
jmp STROUT
|
||||
|
||||
INITMSG_autoswitch: // entry point for 'SYS command'
|
||||
INITMSG_autoswitch: ; entry point for 'SYS command'
|
||||
|
||||
jsr INITMSG_main_banner
|
||||
jsr INITMSG_partial
|
||||
@@ -89,7 +89,7 @@ INITMSG_partial:
|
||||
ldx #IDX__STR_ORS_LEGACY_1
|
||||
jsr print_packed_misc_str
|
||||
|
||||
// FALLTROUGH
|
||||
; FALLTROUGH
|
||||
|
||||
INITMSG_revision:
|
||||
|
||||
|
||||
@@ -1,24 +1,24 @@
|
||||
// #LAYOUT# STD * #TAKE
|
||||
// #LAYOUT# X16 BASIC_0 #TAKE
|
||||
// #LAYOUT# * * #IGNORE
|
||||
;; #LAYOUT# STD * #TAKE
|
||||
;; #LAYOUT# X16 BASIC_0 #TAKE
|
||||
;; #LAYOUT# * * #IGNORE
|
||||
|
||||
|
||||
// Routine is too long to fit in the original location
|
||||
; Routine is too long to fit in the original location
|
||||
|
||||
|
||||
initmsg_real:
|
||||
|
||||
// Clear the screen first, some cartridges (like IEEE-488) are leaving a mess on the screen
|
||||
; Clear the screen first, some cartridges (like IEEE-488) are leaving a mess on the screen
|
||||
lda #147
|
||||
jsr JCHROUT
|
||||
|
||||
#if CONFIG_BANNER_SIMPLE
|
||||
!ifdef CONFIG_BANNER_SIMPLE {
|
||||
|
||||
lda #<startup_banner
|
||||
ldy #>startup_banner
|
||||
jsr STROUT
|
||||
|
||||
#if !CONFIG_BRAND_CUSTOM_BUILD
|
||||
!ifndef CONFIG_BRAND_CUSTOM_BUILD {
|
||||
|
||||
ldx #$01
|
||||
ldy #$04
|
||||
@@ -28,32 +28,32 @@ initmsg_real:
|
||||
ldy #>rom_revision_basic_string
|
||||
jsr STROUT
|
||||
|
||||
#endif // no CONFIG_BRAND_CUSTOM_BUILD
|
||||
} ; no CONFIG_BRAND_CUSTOM_BUILD
|
||||
|
||||
#if !CONFIG_BRAND_CUSTOM_BUILD
|
||||
!ifndef CONFIG_BRAND_CUSTOM_BUILD {
|
||||
ldx #$03
|
||||
#else
|
||||
} else {
|
||||
ldx #$02
|
||||
#endif
|
||||
}
|
||||
ldy #$04
|
||||
jsr plot_set
|
||||
|
||||
jsr initmsg_bytes_free
|
||||
|
||||
#if !CONFIG_BRAND_CUSTOM_BUILD
|
||||
!ifndef CONFIG_BRAND_CUSTOM_BUILD {
|
||||
ldx #$06
|
||||
#else
|
||||
} else {
|
||||
ldx #$05
|
||||
#endif
|
||||
}
|
||||
ldy #$00
|
||||
#if CONFIG_SHOW_FEATURES
|
||||
!ifdef CONFIG_SHOW_FEATURES {
|
||||
jsr plot_set
|
||||
jmp print_features
|
||||
#else
|
||||
} else {
|
||||
jmp plot_set
|
||||
#endif
|
||||
}
|
||||
|
||||
#elif CONFIG_BANNER_FANCY
|
||||
} else ifdef CONFIG_BANNER_FANCY {
|
||||
|
||||
lda #<rainbow_logo
|
||||
ldy #>rainbow_logo
|
||||
@@ -67,7 +67,7 @@ initmsg_real:
|
||||
ldy #>startup_banner
|
||||
jsr STROUT
|
||||
|
||||
#if !CONFIG_BRAND_CUSTOM_BUILD
|
||||
!ifndef CONFIG_BRAND_CUSTOM_BUILD {
|
||||
|
||||
ldx #$01
|
||||
ldy #$0A
|
||||
@@ -80,29 +80,29 @@ initmsg_real:
|
||||
ldy #>rom_revision_basic_string
|
||||
jsr STROUT
|
||||
|
||||
#endif // no CONFIG_BRAND_CUSTOM_BUILD
|
||||
} ; no CONFIG_BRAND_CUSTOM_BUILD
|
||||
|
||||
#if !CONFIG_BRAND_CUSTOM_BUILD
|
||||
!ifndef CONFIG_BRAND_CUSTOM_BUILD {
|
||||
ldx #$03
|
||||
#else
|
||||
} else {
|
||||
ldx #$02
|
||||
#endif
|
||||
}
|
||||
ldy #$0A
|
||||
jsr plot_set
|
||||
|
||||
jsr initmsg_bytes_free
|
||||
|
||||
#if !CONFIG_BRAND_CUSTOM_BUILD
|
||||
!ifndef CONFIG_BRAND_CUSTOM_BUILD {
|
||||
ldx #$06
|
||||
#else
|
||||
} else {
|
||||
ldx #$05
|
||||
#endif
|
||||
}
|
||||
ldy #$00
|
||||
#if CONFIG_SHOW_FEATURES
|
||||
!ifdef CONFIG_SHOW_FEATURES {
|
||||
jsr plot_set
|
||||
jmp print_features
|
||||
#else
|
||||
} else {
|
||||
jmp plot_set
|
||||
#endif
|
||||
}
|
||||
|
||||
#endif
|
||||
}
|
||||
Reference in new issue
Block a user