chris/open-roms
1
0 Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

migrated to ACME assembler

Browse Source 
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:
FeralChild64 committed 2020-09-20 20:22:36 +02:00
1 parent bfc8291e41
commit c8d255130c
685 files changed
+15835 -16296
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

src/aliases/,aliases_config.s
+321 -281
View File
@@ -1,375 +1,415 @@
//
// Various configuration dependent aliases/macros/checks
//
.encoding "petscii_upper"
;
; Configuration dependent aliases/macros/checks
;
// Check that platform configuration is correct
{
.var selected = 0;
; Check that platform is specified
#if CONFIG_PLATFORM_COMMODORE_64
.eval selected++
#endif
#if CONFIG_PLATFORM_COMMANDER_X16
.eval selected++
#endif
!set counter = 0
!ifdef CONFIG_PLATFORM_COMMODORE_64 { !set counter = counter + 1 }
!ifdef CONFIG_PLATFORM_COMMANDER_X16 { !set counter = counter + 1 }
.if (selected != 1) .error "Please select exactly one CONFIG_PLATFORM_* option"
!if (counter != 1) { !error "Please select exactly one CONFIG_PLATFORM_* option" }
; Check that motherboard configuration is correct
!set counter = 0
!ifdef CONFIG_MB_M65 { !set counter = counter + 1 }
!ifdef CONFIG_MB_U64 { !set counter = counter + 1 }
!if (counter > 1) { !error "Please select at most one CONFIG_MB_* option" }
!ifdef ROM_LAYOUT_M65 { !ifndef CONFIG_MB_M65 { !error "ROM layout requires CONFIG_MB_M65 option" } }
!ifdef ROM_LAYOUT_U16 { !ifndef CONFIG_MB_U64 { !error "ROM layout requires CONFIG_MB_U64 option" } }
!ifdef CONFIG_MB_M65 { !ifndef ROM_LAYOUT_M65 { !error "CONFIG_MB_M65 can only be used with appropriate ROM layout" } }
; !ifdef CONFIG_MB_U64 { !ifndef ROM_LAYOUT_U64 { !error "CONFIG_MB_U64 can only be used with appropriate ROM layout" } }
!ifdef CONFIG_MB_M65 { !ifndef CONFIG_PLATFORM_COMMODORE_64 { !error "CONFIG_MB_M65 can only be used with CONFIG_PLATFORM_COMMODORE_64" } }
!ifdef CONFIG_MB_U64 { !ifndef CONFIG_PLATFORM_COMMODORE_64 { !error "CONFIG_MB_U64 can only be used with CONFIG_PLATFORM_COMMODORE_64" } }
; Check that brand configuration is correct
!set counter = 0
!ifdef CONFIG_BRAND_CUSTOM_BUILD { !set counter = counter + 1 }
!ifdef CONFIG_BRAND_GENERIC { !set counter = counter + 1 }
!ifdef CONFIG_BRAND_TESTING { !set counter = counter + 1 }
!ifndef CONFIG_PLATFORM_COMMODORE_64 {
!if (counter != 0) { !error "Do not use CONFIG_BRAND_* options for non-C64 platforms" }
} else ifdef CONFIG_MB_M65 {
!if (counter != 0) { !error "Do not use CONFIG_BRAND_* options for the MEGA65 motherboard" }
} else ifdef CONFIG_MB_U64 {
!if (counter != 0) { !error "Do not use CONFIG_BRAND_* options for the Ultimate 64 motherboard" }
} else if (counter != 1) {
!error "Please select exactly one CONFIG_BRAND_* option"
}
// Check that motherboard extras configuration is correct
{
.var selected = 0;
; Check that processor configuration is correct
#if CONFIG_MB_MEGA_65
.eval selected++
#endif
#if CONFIG_MB_ULTIMATE_64
.eval selected++
#endif
!set counter = 0
!ifdef CONFIG_CPU_MOS_6502 { !set counter = counter + 1 }
!ifdef CONFIG_CPU_DTV_6502 { !set counter = counter + 1 }
!ifdef CONFIG_CPU_RCW_65C02 { !set counter = counter + 1 }
!ifdef CONFIG_CPU_WDC_65C02 { !set counter = counter + 1 }
!ifdef CONFIG_CPU_WDC_65816 { !set counter = counter + 1 }
!ifdef CONFIG_CPU_CSG_65CE02 { !set counter = counter + 1 }
.if (selected > 1) .error "Please select at most one CONFIG_MB_* option"
#if !CONFIG_PLATFORM_COMMODORE_64 && CONFIG_BRAND_MEGA_65 &&
.error "CONFIG_BRAND_MEGA_65 can only be used with CONFIG_PLATFORM_COMMODORE_64"
#endif
#if !CONFIG_PLATFORM_COMMODORE_64 && CONFIG_BRAND_ULTIMATE_64 &&
.error "CONFIG_BRAND_ULTIMATE_64 can only be used with CONFIG_PLATFORM_COMMODORE_64"
#endif
#if CONFIG_MB_MEGA_65 && (CONFIG_SID_2ND || CONFIG_SID_3RD || CONFIG_SID_D4XX || CONFIG_SID_D5XX)
.error "CONFIG_MB_MEGA_65 cannot be used with CONFIG_SID_*"
#endif
!ifdef CONFIG_PLATFORM_COMMANDER_X16 {
!if (counter != 0) { !error "Do not use CONFIG_CPU_* options for Commander X16 platform" }
} else ifdef CONFIG_MB_M65 {
!if (counter != 0) { !error "Do not use CONFIG_CPU_* options for MEGA65 motherboard" }
} else ifdef CONFIG_MB_U64 {
!if (counter != 0) { !error "Do not use CONFIG_CPU_* options for Ultimate 64 motherboard" }
} else if (counter != 1) {
!error "Please select exactly one CONFIG_CPU_* option"
}
// Check that brand configuration is correct
{
.var selected = 0;
; Check that memory model configuration is correct
#if CONFIG_BRAND_CUSTOM_BUILD
.eval selected++
#endif
#if CONFIG_BRAND_GENERIC
.eval selected++
#endif
#if CONFIG_BRAND_TESTING
.eval selected++
#endif
#if CONFIG_BRAND_ULTIMATE_64
.eval selected++
#endif
!set counter = 0
!ifdef CONFIG_MEMORY_MODEL_38K { !set counter = counter + 1 }
!ifdef CONFIG_MEMORY_MODEL_46K { !set counter = counter + 1 }
!ifdef CONFIG_MEMORY_MODEL_50K { !set counter = counter + 1 }
!ifdef CONFIG_MEMORY_MODEL_60K { !set counter = counter + 1 }
#if !CONFIG_MB_MEGA_65
.if (selected != 1) .error "Please select exactly one CONFIG_BRAND_* option"
#endif
#if CONFIG_MB_MEGA_65
.if (selected != 0) .error "Do not use CONFIG_BRAND_* options for MEGA65"
#endif
#if CONFIG_MB_MEGA_65 && CONFIG_SHOW_FEATURES
.if (selected != 0) .error "Do not use CONFIG_SHOW_FEATURES options for MEGA65"
#endif
#if CONFIG_MB_ULTIMATE_64 && !(CONFIG_BRAND_ULTIMATE_64 || CONFIG_BRAND_TESTING || CONFIG_BRAND_CUSTOM_BUILD)
.error "Please select brand either matching the CONFIG_MB_*, or a testing/custom one"
#endif
!ifdef CONFIG_MB_M65 {
!ifdef CONFIG_MEMORY_MODEL_60K { !error "Do not use CONFIG_MEMORY_MODEL_60K options for MEGA65 motherboard" }
}
!ifdef CONFIG_PLATFORM_COMMANDER_X16 {
!ifndef CONFIG_MEMORY_MODEL_38K { !error "Select CONFIG_MEMORY_MODEL_38K options for Commander X16 platform" }
}
!if (counter != 1) {
!error "Please select exactly one CONFIG_MEMORY_MODEL_* option"
}
// Check that processor configuration is correct
{
.var selected = 0;
; Check that IEC configuration is correct
#if CONFIG_CPU_MOS_6502
.eval selected++
#endif
#if CONFIG_CPU_WDC_65C02
.eval selected++
#endif
#if CONFIG_CPU_CSG_65CE02
.eval selected++
#endif
#if CONFIG_CPU_M65_45GS02
.eval selected++
#endif
#if CONFIG_CPU_WDC_65816
.eval selected++
#endif
.if (selected != 1) .error "Please select exactly one CONFIG_CPU_* option"
!ifdef CONFIG_PLATFORM_COMMANDER_X16 {
!ifdef CONFIG_IEC { !error "Do not use CONFIG_IEC options for Commander X16 platform, it is not implemented" }
}
!ifdef CONFIG_MB_MEGA65 {
!ifdef CONFIG_IEC_BURST_CIA1 { !error "Do not use CONFIG_IEC_BURST_CIA1 options for MEGA65 motherboard, CONFIG_IEC_BURST_M65 instead" }
!ifdef CONFIG_IEC_BURST_CIA2 { !error "Do not use CONFIG_IEC_BURST_CIA2 options for MEGA65 motherboard, CONFIG_IEC_BURST_M65 instead" }
}
!ifndef CONFIG_MB_MEGA65 {
!ifdef CONFIG_IEC_BURST_M65 { !error "CONFIG_IEC_BURST_M65 is only possible for MEGA65 motherboard" }
}
!ifdef CONFIG_IEC_BURST_CIA1 {
!ifndef CONFIG_IEC { !error "CONFIG_IEC_BURST_CIA1 requires CONFIG_IEC" }
}
!ifdef CONFIG_IEC_BURST_CIA2 {
!ifndef CONFIG_IEC { !error "CONFIG_IEC_BURST_CIA2 requires CONFIG_IEC" }
}
!ifdef CONFIG_IEC_BURST_CIA1 {
!ifdef CONFIG_IEC_BURST_CIA2 { !error "CONFIG_IEC_BURST_CIA1 and CONFIG_IEC_BURST_CIA2 are mutually exclusive" }
}
!ifdef CONFIG_IEC_BURST_M65 {
!ifndef CONFIG_IEC { !error "CONFIG_IEC_BURST_M65 requires CONFIG_IEC" }
}
!ifdef CONFIG_IEC_DOLPHINDOS {
!ifndef CONFIG_IEC { !error "CONFIG_IEC_DOLPHINDOS requires CONFIG_IEC" }
}
!ifdef CONFIG_IEC_DOLPHINDOS_FAST {
!ifndef CONFIG_IEC_DOLPHINDOS { !error "CONFIG_IEC_DOLPHINDOS_FAST requires CONFIG_IEC_DOLPHINDOS" }
}
!ifdef CONFIG_IEC_JIFFYDOS {
!ifndef CONFIG_IEC { !error "CONFIG_IEC_JIFFYDOS requires CONFIG_IEC" }
}
!ifdef CONFIG_IEC_JIFFYDOS_BLANK {
!ifndef CONFIG_IEC_JIFFYDOS { !error "CONFIG_IEC_JIFFYDOS_BLANK requires CONFIG_IEC_JIFFYDOS" }
}
// Check that memory model and ROM layout configurations is correct
{
#if ROM_LAYOUT_M65 && !CONFIG_CPU_M65_45GS02
.error "MEGA65 ROM layout requires CONFIG_CPU_M65_45GS02"
#endif
#if ROM_LAYOUT_M65 && !CONFIG_MB_MEGA_65
.error "MEGA65 ROM layout requires CONFIG_MB_MEGA_65"
#endif
; Check that tape deck configuration is correct
.var selected = 0;
!set counter = 0
!ifdef CONFIG_TAPE_NORMAL { !set counter = counter + 1 }
!ifdef CONFIG_TAPE_TURBO { !set counter = counter + 1 }
#if CONFIG_MEMORY_MODEL_38K
.eval selected++
#endif
#if CONFIG_MEMORY_MODEL_46K
.eval selected++
#endif
#if CONFIG_MEMORY_MODEL_50K
.eval selected++
#endif
#if CONFIG_MEMORY_MODEL_60K
.eval selected++
#endif
.if (selected != 1) .error "Please select exactly one CONFIG_MEMORY_MODEL_* option"
!ifdef CONFIG_PLATFORM_COMMANDER_X16 {
!ifdef CONFIG_TAPE_NORMAL { !error "Do not use CONFIG_TAPE_NORMAL options for Commander X16 platform, it is not implemented" }
!ifdef CONFIG_TAPE_TURBO { !error "Do not use CONFIG_TAPE_TURBO options for Commander X16 platform, it is not implemented" }
}
!ifdef CONFIG_TAPE_AUTODETECT { !ifndef CONFIG_TAPE_NORMAL { !ifndef CONFIG_TAPE_TURBO {
!error "CONFIG_TAPE_AUTODETECT requires both CONFIG_TAPE_NORMAL and CONFIG_TAPE_TURBO"
} } }
!ifdef CONFIG_TAPE_HEAD_ALIGN {
!ifndef CONFIG_TAPE_WEDGE { !error "CONFIG_TAPE_HEAD_ALIGN requires CONFIG_TAPE_WEDGE" }
}
!ifdef CONFIG_TAPE_WEDGE {
!if (counter = 0) { !error "CONFIG_TAPE_WEDGE requires CONFIG_TAPE_TURBO or CONFIG_TAPE_NORMAL"}
}
// Check that IEC configuration is correct
{
#if CONFIG_IEC_JIFFYDOS && !CONFIG_IEC
.error "CONFIG_IEC_JIFFYDOS requires CONFIG_IEC"
#endif
; Check that RS-232 configuration is correct
#if CONFIG_IEC_JIFFYDOS_BLANK && !CONFIG_IEC_JIFFYDOS
.error "CONFIG_IEC_JIFFYDOS_BLANK requires CONFIG_IEC_JIFFYDOS"
#endif
!set counter = 0
!ifdef CONFIG_RS232_ACIA { !set counter = counter + 1 }
!ifdef CONFIG_RS232_UP2400 { !set counter = counter + 1 }
!ifdef CONFIG_RS232_UP9600 { !set counter = counter + 1 }
#if CONFIG_IEC_DOLPHINDOS && !CONFIG_IEC
.error "CONFIG_IEC_DOLPHINDOS requires CONFIG_IEC"
#endif
!ifdef CONFIG_PLATFORM_COMMANDER_X16 {
!if (counter != 0) { !error "Do not use CONFIG_RS232_* options for Commander X16 platform, it is not implemented" }
}
!ifdef CONFIG_RS232_UP9600 {
!ifdef CONFIG_TAPE_NORMAL { !error "CONFIG_RS232_UP9600 is not compatible with CONFIG_TAPE_NORMAL" }
!ifdef CONFIG_TAPE_TURBO { !error "CONFIG_RS232_UP9600 is not compatible with CONFIG_TAPE_TURBO" }
}
!if (counter > 1) { !error "Please select at most one CONFIG_RS232_* option" }
#if CONFIG_IEC_DOLPHINDOS_FAST && !CONFIG_IEC_DOLPHINDOS
.error "CONFIG_IEC_DOLPHINDOS_FAST requires CONFIG_IEC_DOLPHINDOS"
#endif
#if (CONFIG_IEC_BURST_CIA1 || CONFIG_IEC_BURST_CIA1 || CONFIG_IEC_BURST_MEGA_65) && !CONFIG_IEC
.error "CONFIG_IEC_BURST_* requires CONFIG_IEC"
#endif
#if CONFIG_IEC_BURST_MEGA_65 && !CONFIG_MB_MEGA_65
.error "CONFIG_IEC_BURST_MEGA_65 requires CONFIG_MB_MEGA_65"
#endif
; Check that sound support configuration is correct
.var selected_iec_burst = 0;
!set counter = 0
!ifdef CONFIG_SID_2ND_ADDRESS { !set counter = counter + 1 }
!ifdef CONFIG_SID_3RD_ADDRESS { !set counter = counter + 1 }
!ifdef CONFIG_SID_D4XX { !set counter = counter + 1 }
!ifdef CONFIG_SID_D5XX { !set counter = counter + 1 }
#if CONFIG_IEC_BURST_CIA1
.eval selected_iec_burst++
#endif
#if CONFIG_IEC_BURST_CIA2
.eval selected_iec_burst++
#endif
#if CONFIG_IEC_BURST_MEGA_65
.eval selected_iec_burst++
#endif
!ifdef CONFIG_PLATFORM_COMMANDER_X16 {
!if (counter != 0) { !error "Do not use CONFIG_SID_* options for Commander X16 platform" }
}
!ifdef CONFIG_MB_M65 {
!if (counter != 0) { !error "Do not use CONFIG_SID_* options for MEGA65 motherboard" }
}
!ifdef CONFIG_SID_2ND_ADDRESS {
!if (CONFIG_SID_2ND_ADDRESS = $D400) { !error "CONFIG_SID_2ND_ADDRESS points to the 1st SID" }
}
!ifdef CONFIG_SID_3RD_ADDRESS {
!if (CONFIG_SID_3RD_ADDRESS = $D400) { !error "CONFIG_SID_3RD_ADDRESS points to the 1st SID" }
}
!ifdef CONFIG_SID_2ND_ADDRESS { !ifdef CONFIG_SID_3RD_ADDRESS {
!if (CONFIG_SID_2ND_ADDRESS = CONFIG_SID_3RD_ADDRESS) { !error "Configured SIDs have the same addresses" }
} }
.if (selected_iec_burst > 1) .error "Please select at most one CONFIG_IEC_BURST_* option"
; Check that keyboard settings are correct
!ifdef CONFIG_LEGACY_SCNKEY {
!ifdef CONFIG_RS232_UP2400 { !error "CONFIG_LEGACY_SCNKEY is not compatible with CONFIG_RS232_UP2400" }
!ifdef CONFIG_RS232_UP9600 { !error "CONFIG_LEGACY_SCNKEY is not compatible with CONFIG_RS232_UP9600" }
!ifdef CONFIG_TAPE_NORMAL { !error "CONFIG_LEGACY_SCNKEY is not compatible with CONFIG_TAPE_NORMAL" }
!ifdef CONFIG_KEYBOARD_C128 { !error "CONFIG_LEGACY_SCNKEY is not compatible with CONFIG_KEYBOARD_C128" }
!ifdef CONFIG_KEYBOARD_C128_CAPS_LOCK { !error "CONFIG_LEGACY_SCNKEY is not compatible with CONFIG_KEYBOARD_C128_CAPS_LOCK" }
!ifdef CONFIG_KEYBOARD_C65 { !error "CONFIG_LEGACY_SCNKEY is not compatible with CONFIG_KEYBOARD_C65" }
!ifdef CONFIG_KEYBOARD_C65_CAPS_LOCK { !error "CONFIG_LEGACY_SCNKEY is not compatible with CONFIG_KEYBOARD_C65_CAPS_LOCK" }
}
!ifdef CONFIG_MB_M65 {
!ifdef CONFIG_KEYBOARD_C128 { !error "MEGA65 motherboard is not compatible with CONFIG_KEYBOARD_C128" }
!ifdef CONFIG_KEYBOARD_C128_CAPS_LOCK { !error "MEGA65 motherboard is not compatible with CONFIG_KEYBOARD_C128_CAPS_LOCK" }
!ifdef CONFIG_LEGACY_SCNKEY { !error "MEGA65 motherboard is not compatible with CONFIG_LEGACY_SCNKEY" }
}
!ifdef CONFIG_MB_U64 {
!ifdef CONFIG_KEYBOARD_C128 { !error "Ultimate 64 motherboard is not compatible with CONFIG_KEYBOARD_C128" }
!ifdef CONFIG_KEYBOARD_C128_CAPS_LOCK { !error "Ultimate 64 motherboard is not compatible with CONFIG_KEYBOARD_C128_CAPS_LOCK" }
!ifdef CONFIG_KEYBOARD_C65 { !error "Ultimate 64 motherboard is not compatible with CONFIG_KEYBOARD_C65" }
!ifdef CONFIG_KEYBOARD_C65_CAPS_LOCK { !error "Ultimate 64 motherboard is not compatible with CONFIG_KEYBOARD_C65_CAPS_LOCK" }
}
// Check that tape configuration is correct
{
#if (!CONFIG_TAPE_NORMAL || !CONFIG_TAPE_TURBO) && CONFIG_TAPE_AUTODETECT
.error "CONFIG_TAPE_AUTODETECT requires both CONFIG_TAPE_NORMAL and CONFIG_TAPE_TURBO"
#endif
; Check that startup banner configuration is correct
!set counter = 0
!ifdef CONFIG_BANNER_SIMPLE { !set counter = counter + 1 }
!ifdef CONFIG_BANNER_FANCY { !set counter = counter + 1 }
!ifdef CONFIG_MB_M65 {
!if (counter > 0) { !error "Do not use CONFIG_BANNER_* options for MEGA65" }
!ifdef CONFIG_COLORS_BRAND { !errror "Do not use CONFIG_COLORS_BRAND options for MEGA65" }
!ifdef CONFIG_SHOW_FEATURES { !errror "Do not use CONFIG_SHOW_FEATURES options for MEGA65" }
} else {
!if (counter != 1) { !error "Please select exactly one CONFIG_BANNER_* option" }
}
// Check that RS-232 configuration is correct
{
#if CONFIG_RS232_UP9600 && (CONFIG_TAPE_NORMAL || CONFIG_TAPE_TURBO)
.error "CONFIG_RS232_UP9600 is not compatible with CONFIG_TAPE_*"
#endif
;
; Define some macros depending on the configuration
;
.var selected_rs232 = 0;
#if CONFIG_RS232_UP2400
.eval selected_rs232++
#endif
#if CONFIG_RS232_UP9600
.eval selected_rs232++
#endif
.if (selected_rs232 > 1) .error "Please select at most one CONFIG_RS232_* option"
; Handle CPU configuration
!ifdef CONFIG_BCD_SAFE_INTERRUPTS { !set HAS_BCD_SAFE_INTERRUPTS = 1 }
!ifdef CONFIG_CPU_MOS_6502 {
!cpu 6502
}
!ifdef CONFIG_CPU_DTV_6502 {
!cpu c64dtv2
!set HAS_OPCODE_BRA = 1
; XXX
}
!ifdef CONFIG_CPU_RCW_65C02 {
!cpu r65c02
!set HAS_BCD_SAFE_INTERRUPTS = 1
!set HAS_OPCODE_BRA = 1
!set HAS_OPCODES_65C02 = 1
}
!ifdef CONFIG_PLATFORM_COMMANDER_X16 {
!cpu w65c02
!set HAS_BCD_SAFE_INTERRUPTS = 1
!set HAS_OPCODE_BRA = 1
!set HAS_OPCODES_65C02 = 1
}
!ifdef CONFIG_CPU_WDC_65C02 {
!cpu w65c02
!set HAS_BCD_SAFE_INTERRUPTS = 1
!set HAS_OPCODE_BRA = 1
!set HAS_OPCODES_65C02 = 1
}
!ifdef CONFIG_CPU_WDC_65816 {
!cpu 65816
!set HAS_BCD_SAFE_INTERRUPTS = 1
!set HAS_OPCODE_BRA = 1
!set HAS_OPCODES_65C02 = 1
!set HAS_OPCODES_65816 = 1
}
!ifdef CONFIG_CPU_CSG_65CE02 {
!cpu 65ce02
!set HAS_BCD_SAFE_INTERRUPTS = 1
!set HAS_OPCODE_BRA = 1
!set HAS_OPCODES_65C02 = 1
!set HAS_OPCODES_65CE02 = 1
}
!ifdef CONFIG_MB_M65 {
!cpu m65
!set HAS_BCD_SAFE_INTERRUPTS = 1
!set HAS_OPCODE_BRA = 1
!set HAS_OPCODES_65C02 = 1
!set HAS_OPCODES_65CE02 = 1
}
// Check that startup banner configuration is correct
{
.var selected = 0;
; Handle memory model
#if CONFIG_BANNER_SIMPLE
.eval selected++
#endif
#if CONFIG_BANNER_FANCY
.eval selected++
#endif
#if !CONFIG_MB_MEGA_65
.if (selected != 1) .error "Please select exactly one CONFIG_BANNER_* option"
#endif
#if CONFIG_MB_MEGA_65
.if (selected != 0) .error "Do not use CONFIG_BANNER_* options for MEGA65"
#endif
#if CONFIG_MB_MEGA_65 && CONFIG_COLORS_BRAND
.error "Do not use CONFIG_COLORS_BRAND options for MEGA65"
#endif
}
!ifdef CONFIG_MEMORY_MODEL_46K { !set CONFIG_MEMORY_MODEL_46K_OR_50K = 1 }
!ifdef CONFIG_MEMORY_MODEL_50K { !set CONFIG_MEMORY_MODEL_46K_OR_50K = 1 }
// Check if keyboard options are correct
.function CHECK_KEYCMD(keycmd)
{
.if (keycmd.size() > 0) .return 1
.return 0
}
{
#if CONFIG_LEGACY_SCNKEY && CONFIG_RS232_UP9600
.error "CONFIG_LEGACY_SCNKEY is not compatible with CONFIG_RS232_UP9600"
#endif
#if CONFIG_LEGACY_SCNKEY && CONFIG_TAPE_NORMAL
.error "CONFIG_LEGACY_SCNKEY is not compatible with CONFIG_TAPE_NORMAL"
#endif
#if CONFIG_LEGACY_SCNKEY && (CONFIG_KEYBOARD_C128 || CONFIG_KEYBOARD_C128_CAPS_LOCK || CONFIG_KEYBOARD_C65 || CONFIG_KEYBOARD_C65_CAPS_LOCK)
.error "CONFIG_LEGACY_SCNKEY and CONFIG_KEYBOARD_C128* / CONFIG_KEYBOARD_C65* are mutually exclusive"
#endif
; Handle IEC configuration
#if (CONFIG_MB_MEGA_65 || CONFIG_MB_ULTIMATE_64) && (CONFIG_KEYBOARD_C128 || CONFIG_KEYBOARD_C128_CAPS_LOCK)
.error "Selected CONFIG_MB_* is not compatible with CONFIG_KEYBOARD_C128*"
#endif
#if CONFIG_MB_ULTIMATE_64 && (CONFIG_KEYBOARD_C65 || CONFIG_KEYBOARD_C65_CAPS_LOCK)
.error "Selected CONFIG_MB_* is not compatible with CONFIG_KEYBOARD_C65*"
#endif
!ifdef CONFIG_IEC_BURST_CIA1 { !set HAS_IEC_BURST = 1 }
!ifdef CONFIG_IEC_BURST_CIA2 { !set HAS_IEC_BURST = 1 }
!ifdef CONFIG_IEC_BURST_M65 { !set HAS_IEC_BURST = 1 }
.var num_pkeys_base = 0
.var num_pkeys_ext1 = 0
.var num_pkeys_ext2 = 0
.eval num_pkeys_base += CHECK_KEYCMD(CONFIG_KEYCMD_RUN)
.eval num_pkeys_base += CHECK_KEYCMD(CONFIG_KEYCMD_F1)
.eval num_pkeys_base += CHECK_KEYCMD(CONFIG_KEYCMD_F2)
.eval num_pkeys_base += CHECK_KEYCMD(CONFIG_KEYCMD_F3)
.eval num_pkeys_base += CHECK_KEYCMD(CONFIG_KEYCMD_F4)
.eval num_pkeys_base += CHECK_KEYCMD(CONFIG_KEYCMD_F5)
.eval num_pkeys_base += CHECK_KEYCMD(CONFIG_KEYCMD_F6)
.eval num_pkeys_base += CHECK_KEYCMD(CONFIG_KEYCMD_F7)
.eval num_pkeys_base += CHECK_KEYCMD(CONFIG_KEYCMD_F8)
.eval num_pkeys_ext1 += CHECK_KEYCMD(CONFIG_KEYCMD_HELP)
.eval num_pkeys_ext2 += CHECK_KEYCMD(CONFIG_KEYCMD_F9)
.eval num_pkeys_ext2 += CHECK_KEYCMD(CONFIG_KEYCMD_F10)
.eval num_pkeys_ext2 += CHECK_KEYCMD(CONFIG_KEYCMD_F11)
.eval num_pkeys_ext2 += CHECK_KEYCMD(CONFIG_KEYCMD_F12)
.eval num_pkeys_ext2 += CHECK_KEYCMD(CONFIG_KEYCMD_F13)
.eval num_pkeys_ext2 += CHECK_KEYCMD(CONFIG_KEYCMD_F14)
.var num_pkeys = num_pkeys_base
#if !CONFIG_LEGACY_SCNKEY && (CONFIG_KEYBOARD_C128 || CONFIG_KEYBOARD_C65)
.eval num_pkeys += num_pkeys_ext1
#endif
#if !CONFIG_LEGACY_SCNKEY && CONFIG_KEYBOARD_C65
.eval num_pkeys += num_pkeys_ext2
#endif
#if CONFIG_PROGRAMMABLE_KEYS
.if (num_pkeys == 0) .error "CONFIG_PROGRAMMABLE_KEYS requires at least one defined key"
#endif
}
!ifdef CONFIG_IEC_JIFFYDOS { !set CONFIG_IEC_JIFFYDOS_OR_DOLPHINDOS = 1 }
!ifdef CONFIG_IEC_DOLPHINDOS { !set CONFIG_IEC_JIFFYDOS_OR_DOLPHINDOS = 1 }
// Check that features are configured correctly
{
#if CONFIG_TAPE_WEDGE && !CONFIG_TAPE_TURBO && !CONFIG_TAPE_NORMAL
.error "CONFIG_TAPE_WEDGE requires CONFIG_TAPE_TURBO or CONFIG_TAPE_NORMAL"
#endif
#if !CONFIG_TAPE_WEDGE && CONFIG_TAPE_HEAD_ALIGN
.error "CONFIG_TAPE_HEAD_ALIGN requires CONFIG_TAPE_WEDGE"
#endif
}
; Handle tape configuration
!ifdef CONFIG_TAPE_NORMAL { !set HAS_TAPE = 1 }
!ifdef CONFIG_TAPE_TURBO { !set HAS_TAPE = 1 }
!ifdef CONFIG_TAPE_NORMAL { !set HAS_TAPE_OR_IEC = 1 }
!ifdef CONFIG_TAPE_TURBO { !set HAS_TAPE_OR_IEC = 1 }
!ifdef CONFIG_IEC { !set HAS_TAPE_OR_IEC = 1 }
!ifdef CONFIG_DOS_WEDGE { !set HAS_WEDGE = 1 }
!ifdef CONFIG_TAPE_WEDGE { !set HAS_WEDGE = 1 }
// Handle I/O configuration
; Handle RS-232 configuration
#if CONFIG_RS232_UP2400 || CONFIG_RS232_UP9600
#define HAS_RS232
#endif
!ifdef CONFIG_RS232_ACIA { !set HAS_RS232 = 1 }
!ifdef CONFIG_RS232_UP2400 { !set HAS_RS232 = 1 }
!ifdef CONFIG_RS232_UP9600 { !set HAS_RS232 = 1 }
// Handle configuration of various features
; Handle sound configuration
#if CONFIG_BCD_SAFE_INTERRUPTS
#define HAS_BCD_SAFE_INTERRUPTS
#endif
!ifdef CONFIG_SID_D4XX { !set CONFIG_SID_D4XX_OR_D5XX = 1 }
!ifdef CONFIG_SID_D5XX { !set CONFIG_SID_D4XX_OR_D5XX = 1 }
// Handle configuration of debug infrastructure
; Handle keyboard configuration
.macro STUB_IMPLEMENTATION_RTS() {
!ifdef CONFIG_KEYBOARD_C128 { !set CONFIG_KEYBOARD_C128_OR_C65 = 1 }
!ifdef CONFIG_KEYBOARD_C65 { !set CONFIG_KEYBOARD_C128_OR_C65 = 1 }
!ifdef CONFIG_KEYBOARD_C65 { !set CONFIG_KEYBOARD_C65_OR_CAPS_LOCK = 1 }
!ifdef CONFIG_KEYBOARD_C65_CAPS_LOCK { !set CONFIG_KEYBOARD_C65_OR_CAPS_LOCK = 1 }
!ifdef CONFIG_KEYBOARD_C128_CAPS_LOCK { !set CONFIG_KEYBOARD_CAPS_LOCK = 1 }
!ifdef CONFIG_KEYBOARD_C65_CAPS_LOCK { !set CONFIG_KEYBOARD_CAPS_LOCK = 1 }
!ifdef CONFIG_JOY1_CURSOR { !set CONFIG_JOY1_OR_JOY2_CURSOR = 1 }
!ifdef CONFIG_JOY2_CURSOR { !set CONFIG_JOY1_OR_JOY2_CURSOR = 1 }
; Handle debug configuration
!macro STUB_IMPLEMENTATION_RTS {
rts
}
.macro STUB_IMPLEMENTATION_BRK() {
.break
!macro STUB_IMPLEMENTATION_BRK {
; XXX set VICE breakpoint
brk
brk
jmp *-2
}
.macro STUB_IMPLEMENTATION()
{
#if CONFIG_DBG_STUBS_BRK
STUB_IMPLEMENTATION_BRK()
#else
STUB_IMPLEMENTATION_RTS()
#endif
!ifdef CONFIG_DBG_STUBS_BRK {
!macro STUB_IMPLEMENTATION { +STUB_IMPLEMENTATION_BRK }
} else {
!macro STUB_IMPLEMENTATION { +STUB_IMPLEMENTATION_RTS }
}
// Setup colors
; Handle colors
#if CONFIG_COLORS_BRAND && CONFIG_BRAND_ULTIMATE_64
!set CONFIG_COLOR_BG = $06
!set CONFIG_COLOR_TXT = $01
.const CONFIG_COLOR_BG = $00
.const CONFIG_COLOR_TXT = $01
#else
.const CONFIG_COLOR_BG = $06
.const CONFIG_COLOR_TXT = $01
#endif
!ifdef CONFIG_COLORS_BRAND {
!ifdef CONFIG_MB_U64 {
!set CONFIG_COLOR_BG = $00
!set CONFIG_COLOR_TXT = $01
}
}
// Determine if we need space-savings in BASIC code
#if !ROM_LAYOUT_M65
#define HAS_SMALL_BASIC
#endif
; Determine if we need space-savings in BASIC code
!ifndef CONFIG_MB_M65 {
!set HAS_SMALL_BASIC = 1
}
; Defines for multi-segment ROMs
!ifdef CONFIG_MB_M65 {
!ifdef SEGMENT_BASIC_0 { !set SEGMENT_M65_BASIC_0 = 1 }
!ifdef SEGMENT_BASIC_1 { !set SEGMENT_M65_BASIC_1 = 1 }
!ifdef SEGMENT_KERNAL_0 { !set SEGMENT_M65_KERNAL_0 = 1 }
}
src/aliases/,aliases_cpu.s
+101 -509
View File
@@ -1,546 +1,138 @@
//
// Provide pseudocommands (and other goodies) to make CPU optimizations easier
//
#if CONFIG_CPU_WDC_65C02 || CONFIG_CPU_CSG_65CE02 || CONFIG_CPU_CSG_4510 || CONFIG_CPU_M65_45GS02 || CONFIG_CPU_WDC_65816
.cpu _65c02
#define HAS_OPCODES_65C02
#define HAS_BCD_SAFE_INTERRUPTS
#endif
#if CONFIG_CPU_CSG_65CE02 || CONFIG_CPU_CSG_4510 || CONFIG_CPU_M65_45GS02
#define HAS_OPCODES_65CE02
#endif
#if CONFIG_CPU_CSG_4510 || CONFIG_CPU_M65_45GS02
#define HAS_OPCODES_4510
#endif
#if CONFIG_CPU_M65_45GS02
#define HAS_OPCODES_45GS02
#endif
#if CONFIG_CPU_WDC_65816
#define HAS_OPCODES_65816
#endif
;
; Various macros - mainly for making CPU-specific optimizations easier
;
//
// These are not exactly for optimization - but to encourage proper usage of panic screen
//
.pseudocommand panic code
{
// If case no panic screen is used, we can skip providing error codes within Kernal
#if CONFIG_PANIC_SCREEN
lda code
#endif
!macro panic @code {
; If case no panic screen is used, we can skip providing error codes within Kernal
!ifdef CONFIG_PANIC_SCREEN { lda #@code }
jmp ($E4B7)
}
//
// Macros for generating jumptables
//
.macro put_jumptable_lo(list)
{
.for (var i = 0; i < list.size(); i++)
{
.byte mod((list.get(i) - 1), $100)
}
!macro skip_2_bytes_trash_nvz {
; Trick to skip a 2-byte instruction
!byte $2C
}
.macro put_jumptable_hi(list)
{
.for (var i = 0; i < list.size(); i++)
{
.byte floor((list.get(i) - 1) / $100)
}
}
#if HAS_OPCODES_65C02
.macro put_jumptable(list)
{
.for (var i = 0; i < list.size(); i++)
{
.word list.get(i)
}
}
#endif
//
// Trick to skip a 2-byte instruction
//
.pseudocommand skip_2_bytes_trash_nvz { .byte $2C }
//
// Memory mapping for C65 and MEGA65
//
#if HAS_OPCODES_4510
.pseudocommand map { .byte $5C }
.pseudocommand eom { .byte $EA }
#endif
//
// Some additional 65C02 instructions
//
#if HAS_OPCODES_65C02
.pseudocommand inc_a { .byte $1A }
.pseudocommand dec_a { .byte $3A }
#endif
//
// Some additional 65CE02 instructions
//
#if HAS_OPCODES_65CE02
// CPU flags support
.pseudocommand cle { .byte $02 }
.pseudocommand see { .byte $03 }
// .B register support
.pseudocommand tab { .byte $5B }
.pseudocommand tba { .byte $7B }
// .Z register support
.pseudocommand inz { .byte $1B }
.pseudocommand dez { .byte $3B }
.pseudocommand phz { .byte $DB }
.pseudocommand plz { .byte $FB }
.pseudocommand taz { .byte $4B }
.pseudocommand tza { .byte $6B }
// 16-bit data processing
.pseudocommand dew addr
{
.var arg = addr.getValue()
.if (arg > $FF) .error "DEW requires zeropage address"
.byte $C3, arg
}
.pseudocommand inw addr
{
.var arg = addr.getValue()
.if (arg > $FF) .error "INW requires zeropage address"
.byte $E3, arg
}
// Zero page bit handling
.pseudocommand rmb0 addr
{
.var arg = addr.getValue()
.if (arg > $FF) .error "RMB0 requires zeropage address"
.byte $07, arg
}
.pseudocommand rmb1 addr
{
.var arg = addr.getValue()
.if (arg > $FF) .error "RMB1 requires zeropage address"
.byte $17, arg
}
.pseudocommand rmb2 addr
{
.var arg = addr.getValue()
.if (arg > $FF) .error "RMB2 requires zeropage address"
.byte $27, arg
}
.pseudocommand rmb3 addr
{
.var arg = addr.getValue()
.if (arg > $FF) .error "RMB3 requires zeropage address"
.byte $37, arg
}
.pseudocommand rmb4 addr
{
.var arg = addr.getValue()
.if (arg > $FF) .error "RMB4 requires zeropage address"
.byte $47, arg
}
.pseudocommand rmb5 addr
{
.var arg = addr.getValue()
.if (arg > $FF) .error "RMB5 requires zeropage address"
.byte $57, arg
}
.pseudocommand rmb6 addr
{
.var arg = addr.getValue()
.if (arg > $FF) .error "RMB6 requires zeropage address"
.byte $67, arg
}
.pseudocommand rmb7 addr
{
.var arg = addr.getValue()
.if (arg > $FF) .error "RMB7 requires zeropage address"
.byte $77, arg
}
.pseudocommand smb0 addr
{
.var arg = addr.getValue()
.if (arg > $FF) .error "SMB0 requires zeropage address"
.byte $87, arg
}
.pseudocommand smb1 addr
{
.var arg = addr.getValue()
.if (arg > $FF) .error "SMB1 requires zeropage address"
.byte $97, arg
}
.pseudocommand smb2 addr
{
.var arg = addr.getValue()
.if (arg > $FF) .error "SMB2 requires zeropage address"
.byte $A7, arg
}
.pseudocommand smb3 addr
{
.var arg = addr.getValue()
.if (arg > $FF) .error "SMB3 requires zeropage address"
.byte $B7, arg
}
.pseudocommand smb4 addr
{
.var arg = addr.getValue()
.if (arg > $FF) .error "SMB4 requires zeropage address"
.byte $C7, arg
}
.pseudocommand smb5 addr
{
.var arg = addr.getValue()
.if (arg > $FF) .error "SMB5 requires zeropage address"
.byte $D7, arg
}
.pseudocommand smb6 addr
{
.var arg = addr.getValue()
.if (arg > $FF) .error "SMB6 requires zeropage address"
.byte $E7, arg
}
.pseudocommand smb7 addr
{
.var arg = addr.getValue()
.if (arg > $FF) .error "SMB7 requires zeropage address"
.byte $F7, arg
}
// Additional addressing modes
.pseudocommand jsr_ind addr
{
.var arg = addr.getValue()
.byte $22, mod(arg, $100), floor(arg / $100)
}
.pseudocommand jsr_ind_x addr
{
.var arg = addr.getValue()
.byte $23, mod(arg, $100), floor(arg / $100)
}
// Others, taken from https://github.com/smnjameson/M65_KickAsm_PseudoCommands
.const z = -999 // allows (base page),z addressing mode
.const sy = -998 // allows (base page, s),y addressing mode
.const AT_IZEROPAGEZ = 13 // adds a pseudo addressing mode
.const AT_INDIRECTX = -5 // adds a pseudo addressing mode
.function GetAdressingModeType(arg) {
.if(arg == AT_NONE) .return "AT_NONE"
.if(arg == AT_IMMEDIATE) .return "AT_IMMEDIATE"
.if(arg == AT_INDIRECT) .return "AT_INDIRECT"
.if(arg == AT_INDIRECTX) .return "AT_INDIRECTX"
.if(arg == AT_ABSOLUTE) .return "AT_ABSOLUTE"
.if(arg == AT_ABSOLUTEX) .return "AT_ABSOLUTEX"
.if(arg == AT_ABSOLUTEY) .return "AT_ABSOLUTEY"
.if(arg == AT_IZEROPAGEX) .return "AT_IZEROPAGEX"
.if(arg == AT_IZEROPAGEY) .return "AT_IZEROPAGEY"
.if(arg == AT_IZEROPAGEZ) .return "AT_IZEROPAGEZ"
.return arg
}
.pseudocommand cpz arg {
.var value = arg.getValue()
.var type = arg.getType()
.if(type == AT_IMMEDIATE) {
.byte $C2, value
} else .if(type == AT_ABSOLUTE) {
.if(value <= $FF ) {
.byte $D4, value
} else {
.byte $DC, <value, >value
}
!macro lda_zero {
; WARNING: this one can be dangerous in soem cases, use with care!
!ifdef HAS_OPCODES_65CE02 {
tba
} else {
.error "Invalid adressingmode. 'cpz' doesn't support "+GetAdressingModeType(type)+" mode"
lda #$00
}
}
.pseudocommand lda arg {
.var value = arg.getValue()
.var type = arg.getType()
.if(type != AT_IZEROPAGEZ) .error "':lda' only accepts AT_IZEROPAGEZ"
.if(value > $FF ) .error "':lda ($nn),z' requires zeropage address"
.byte $B2, value
}
.pseudocommand ldz arg
{
.var value = arg.getValue()
.var type = arg.getType()
.if(type == AT_IMMEDIATE) {
.byte $A3, value
} else .if(type == AT_ABSOLUTE) {
.byte $AB, <value, >value
} else .if(type == AT_ABSOLUTEX) {
.byte $BB, <value, >value
; Stack manipulation - some CPUs will leave .A unchanged, some will use it as temporary storage, so consider .A trashed
!macro phx_trash_a { !ifdef HAS_OPCODES_65C02 {
phx
} else {
.error "Invalid adressingmode. 'ldz' doesn't support "+GetAdressingModeType(type)+" mode"
}
}
txa
pha
} }
.pseudocommand sta arg {
.var value = arg.getValue()
.var type = arg.getType()
.if(type != AT_IZEROPAGEZ) .error "':sta' only accepts AT_IZEROPAGEZ"
.if(value > $FF ) .error "':sta ($nn),z' requires zeropage address"
.byte $92, value
}
!macro phy_trash_a { !ifdef HAS_OPCODES_65C02 {
phy
} else {
tya
pha
} }
// Flat memory access support
!macro plx_trash_a { !ifdef HAS_OPCODES_65C02 {
plx
} else {
pla
tax
} }
.pseudocommand lda_lp arg {
.var value = arg.getValue()
.var type = arg.getType()
.if(type != AT_IZEROPAGEZ) .error "'lda_lp' only accepts AT_IZEROPAGEZ"
.if(value > $FF ) .error "'lda_lp' requires zeropage address"
nop
.byte $B2, value
}
.pseudocommand sta_lp arg {
.var value = arg.getValue()
.var type = arg.getType()
.if(type != AT_IZEROPAGEZ) .error "'sta_lp' only accepts AT_IZEROPAGEZ"
.if(value > $FF ) .error "'sta_lp' requires zeropage address"
nop
.byte $92, value
}
#endif
!macro ply_trash_a { !ifdef HAS_OPCODES_65C02 {
ply
} else {
pla
tay
} }
//
// Calculation shortcuts
//
; Near jump, on some CPUs can be substituted with shorter instruction
.pseudocommand lda_zero // WARNING: do not use within interrupts
{
#if HAS_OPCODES_65CE02
tba
#else
lda #$00
#endif
}
!macro bra @dst { !ifdef HAS_OPCODE_BRA {
bra @dst
} else {
jmp @dst
} }
//
// Stack manipulation - some CPUs will leave .A unchanged, some will use it as temporary storage, so consider .A trashed
//
; NOP definition, MEGA65 CPU uses EOM instead
.pseudocommand phx_trash_a
{
#if HAS_OPCODES_65C02
phx
#else
txa
pha
#endif
}
.pseudocommand phy_trash_a
{
#if HAS_OPCODES_65C02
phy
#else
tya
pha
#endif
}
.pseudocommand plx_trash_a
{
#if HAS_OPCODES_65C02
plx
#else
pla
tax
#endif
}
.pseudocommand ply_trash_a
{
#if HAS_OPCODES_65C02
ply
#else
pla
tay
#endif
}
!macro nop { !ifdef CONFIG_MB_M65 {
eom
} else {
nop
} }
//
// Branches with far offsets, substitutes by Bxx + JMP for CPUs not supporting the instruction
//
; Branches with far offsets, substitutes by Bxx + JMP for CPUs not supporting the instruction
.pseudocommand bcs_16 dst
{
#if HAS_OPCODES_65CE02
.var offset = mod($10000 + dst.getValue() - *, $10000) -2
.byte $B3, mod(offset, $100), floor(offset / $100)
#else
bcc __l
jmp dst
__l:
#endif
}
!macro bcs @dst { !ifdef HAS_OPCODES_65CE02 {
lbcs @dst
} else {
bcc *+5
jmp @dst
} }
.pseudocommand bcc_16 dst
{
#if HAS_OPCODES_65CE02
.var offset = mod($10000 + dst.getValue() - *, $10000) -2
.byte $93, mod(offset, $100), floor(offset / $100)
#else
bcs __l
jmp dst
__l:
#endif
}
!macro bcc @dst { !ifdef HAS_OPCODES_65CE02 {
lbcc @dst
} else {
bcs *+5
jmp @dst
} }
.pseudocommand beq_16 dst
{
#if HAS_OPCODES_65CE02
.var offset = mod($10000 + dst.getValue() - *, $10000) -2
.byte $F3, mod(offset, $100), floor(offset / $100)
#else
bne __l
jmp dst
__l:
#endif
}
!macro beq @dst { !ifdef HAS_OPCODES_65CE02 {
lbeq @dst
} else {
bne *+5
jmp @dst
} }
.pseudocommand bne_16 dst
{
#if HAS_OPCODES_65CE02
.var offset = mod($10000 + dst.getValue() - *, $10000) -2
.byte $D3, mod(offset, $100), floor(offset / $100)
#else
beq __l
jmp dst
__l:
#endif
}
!macro bne @dst { !ifdef HAS_OPCODES_65CE02 {
lbne @dst
} else {
beq *+5
jmp @dst
} }
.pseudocommand bmi_16 dst
{
#if HAS_OPCODES_65CE02
.var offset = mod($10000 + dst.getValue() - *, $10000) -2
.byte $33, mod(offset, $100), floor(offset / $100)
#else
bpl __l
jmp dst
__l:
#endif
}
!macro bmi @dst { !ifdef HAS_OPCODES_65CE02 {
lbmi @dst
} else {
bpl *+5
jmp @dst
} }
.pseudocommand bpl_16 dst
{
#if HAS_OPCODES_65CE02
.var offset = mod($10000 + dst.getValue() - *, $10000) -2
.byte $13, mod(offset, $100), floor(offset / $100)
#else
bmi __l
jmp dst
__l:
#endif
}
!macro bpl @dst { !ifdef HAS_OPCODES_65CE02 {
lbpl @dst
} else {
bmi *+5
jmp @dst
} }
.pseudocommand bvc_16 dst
{
#if HAS_OPCODES_65CE02
.var offset = mod($10000 + dst.getValue() - *, $10000) -2
.byte $53, mod(offset, $100), floor(offset / $100)
#else
bvs __l
jmp dst
__l:
#endif
}
!macro bvc @dst { !ifdef HAS_OPCODES_65CE02 {
lbvc @dst
} else {
bvs *+5
jmp @dst
} }
.pseudocommand bvs_16 dst
{
#if HAS_OPCODES_65CE02
.var offset = mod($10000 + dst.getValue() - *, $10000) -2
.byte $73, mod(offset, $100), floor(offset / $100)
#else
bvc __l
jmp dst
__l:
#endif
}
//
// Near jump, on some CPUs can be substituted with shorter instruction
//
.pseudocommand jmp_8 dst
{
#if HAS_OPCODES_65C02
bra dst
#else
jmp dst
#endif
}
!macro bvs @dst { !ifdef HAS_OPCODES_65CE02 {
lbvs @dst
} else {
bvc *+5
jmp @dst
} }
src/aliases/,aliases_error_codes.s
+61 -61
View File
@@ -1,69 +1,69 @@
// Error codes for 'panic' pseudocommand
; Error codes for 'panic' pseudocommand
.const P_ERR_NONE = $00
.const P_ERR_ROM_MISMATCH = $01 // this value has to be stable as long as possible
!set P_ERR_NONE = $00
!set P_ERR_ROM_MISMATCH = $01 ; this value has to be stable as long as possible
// Kernal error codes - returned in the A register
// Described in 'Commodore 64 Programmer's Reference Guide', page 306
; Kernal error codes - returned in the A register
; Described in 'Commodore 64 Programmer's Reference Guide', page 306
.const K_ERR_ROUTINE_TERMINATED = $00
.const K_ERR_TOO_MANY_OPEN_FILES = $01
.const K_ERR_FILE_ALREADY_OPEN = $02
.const K_ERR_FILE_NOT_OPEN = $03
.const K_ERR_FILE_NOT_FOUND = $04
.const K_ERR_DEVICE_NOT_FOUND = $05
.const K_ERR_FILE_NOT_INPUT = $06
.const K_ERR_FILE_NOT_OUTPUT = $07
.const K_ERR_FILE_NAME_MISSING = $08
.const K_ERR_ILLEGAL_DEVICE_NUMBER = $09
.const K_ERR_TOP_MEM_RS232 = $F0
!set K_ERR_ROUTINE_TERMINATED = $00
!set K_ERR_TOO_MANY_OPEN_FILES = $01
!set K_ERR_FILE_ALREADY_OPEN = $02
!set K_ERR_FILE_NOT_OPEN = $03
!set K_ERR_FILE_NOT_FOUND = $04
!set K_ERR_DEVICE_NOT_FOUND = $05
!set K_ERR_FILE_NOT_INPUT = $06
!set K_ERR_FILE_NOT_OUTPUT = $07
!set K_ERR_FILE_NAME_MISSING = $08
!set K_ERR_ILLEGAL_DEVICE_NUMBER = $09
!set K_ERR_TOP_MEM_RS232 = $F0
// Kernal status codes for READST routine (IOSTATUS)
// Described in 'Commodore 64 Programmer's Reference Guide', page 292
; Kernal status codes for READST routine (IOSTATUS)
; Described in 'Commodore 64 Programmer's Reference Guide', page 292
// For IEC devices
.const K_STS_TIMEOUT_WRITE = $01
.const K_STS_TIMEOUT_READ = $02
.const K_STS_EOI = $40
.const K_STS_DEVICE_NOT_FOUND = $80
// For tape deck
.const K_STS_SHORT_BLOCK = $04
.const K_STS_LONG_BLOCK = $08
.const K_STS_READ_ERROR = $10
.const K_STS_CHECKSUM_ERROR = $20
.const K_STS_END_OF_FILE = $40
.const K_STS_END_OF_TAPE = $80
; For IEC devices
!set K_STS_TIMEOUT_WRITE = $01
!set K_STS_TIMEOUT_READ = $02
!set K_STS_EOI = $40
!set K_STS_DEVICE_NOT_FOUND = $80
; For tape deck
!set K_STS_SHORT_BLOCK = $04
!set K_STS_LONG_BLOCK = $08
!set K_STS_READ_ERROR = $10
!set K_STS_CHECKSUM_ERROR = $20
!set K_STS_END_OF_FILE = $40
!set K_STS_END_OF_TAPE = $80
// BASIC error codes, taken from http://sta.c64.org/cbm64baserr.html
.const B_ERR_TOO_MANY_FILES = $01
.const B_ERR_FILE_OPEN = $02
.const B_ERR_FILE_NOT_OPEN = $03
.const B_ERR_FILE_NOT_FOUND = $04
.const B_ERR_DEVICE_NOT_PRESENT = $05
.const B_ERR_NOT_INPUT_FILE = $06
.const B_ERR_NOT_OUTPUT_FILE = $07
.const B_ERR_MISSING_FILENAME = $08
.const B_ERR_ILLEGAL_DEVICE_NUMBER = $09
.const B_ERR_NEXT_WITHOUT_FOR = $0A
.const B_ERR_SYNTAX = $0B
.const B_ERR_RETURN_WITHOUT_GOSUB = $0C
.const B_ERR_OUT_OF_DATA = $0D
.const B_ERR_ILLEGAL_QUANTITY = $0E
.const B_ERR_OVERFLOW = $0F
.const B_ERR_OUT_OF_MEMORY = $10
.const B_ERR_UNDEFD_STATEMENT = $11
.const B_ERR_BAD_SUBSCRIPT = $12
.const B_ERR_REDIMD_ARRAY = $13
.const B_ERR_DIVISION_BY_ZERO = $14
.const B_ERR_ILLEGAL_DIRECT = $15
.const B_ERR_TYPE_MISMATCH = $16
.const B_ERR_STRING_TOO_LONG = $17
.const B_ERR_FILE_DATA = $18
.const B_ERR_FORMULA_TOO_COMPLEX = $19
.const B_ERR_CANT_CONTINUE = $1A
.const B_ERR_UNDEFD_FUNCTION = $1B
.const B_ERR_VERIFY = $1C
.const B_ERR_LOAD = $1D
.const B_ERR_BREAK = $1E
; BASIC error codes, taken from http://sta.c64.org/cbm64baserr.html
!set B_ERR_TOO_MANY_FILES = $01
!set B_ERR_FILE_OPEN = $02
!set B_ERR_FILE_NOT_OPEN = $03
!set B_ERR_FILE_NOT_FOUND = $04
!set B_ERR_DEVICE_NOT_PRESENT = $05
!set B_ERR_NOT_INPUT_FILE = $06
!set B_ERR_NOT_OUTPUT_FILE = $07
!set B_ERR_MISSING_FILENAME = $08
!set B_ERR_ILLEGAL_DEVICE_NUMBER = $09
!set B_ERR_NEXT_WITHOUT_FOR = $0A
!set B_ERR_SYNTAX = $0B
!set B_ERR_RETURN_WITHOUT_GOSUB = $0C
!set B_ERR_OUT_OF_DATA = $0D
!set B_ERR_ILLEGAL_QUANTITY = $0E
!set B_ERR_OVERFLOW = $0F
!set B_ERR_OUT_OF_MEMORY = $10
!set B_ERR_UNDEFD_STATEMENT = $11
!set B_ERR_BAD_SUBSCRIPT = $12
!set B_ERR_REDIMD_ARRAY = $13
!set B_ERR_DIVISION_BY_ZERO = $14
!set B_ERR_ILLEGAL_DIRECT = $15
!set B_ERR_TYPE_MISMATCH = $16
!set B_ERR_STRING_TOO_LONG = $17
!set B_ERR_FILE_DATA = $18
!set B_ERR_FORMULA_TOO_COMPLEX = $19
!set B_ERR_CANT_CONTINUE = $1A
!set B_ERR_UNDEFD_FUNCTION = $1B
!set B_ERR_VERIFY = $1C
!set B_ERR_LOAD = $1D
!set B_ERR_BREAK = $1E
src/aliases/,aliases_hardware.s
+141 -160
View File
@@ -1,198 +1,179 @@
//
// Names of hardware registers - names from C64 Programmer's Reference Guide, sometimes slightly modified
//
;
; Names of hardware registers - names from C64 Programmer's Reference Guide, sometimes slightly modified
;
#if CONFIG_PLATFORM_COMMODORE_64
!ifdef CONFIG_PLATFORM_COMMODORE_64 {
// CPU memory registers
; CPU memory registers
.label CPU_D6510 = $00
.label CPU_R6510 = $01
!addr CPU_D6510 = $00
!addr CPU_R6510 = $01
// VIC-II registers
; VIC-II registers
.label __VIC_BASE = $D000 // base address of the chip
!addr __VIC_BASE = $D000 ; base address of the chip
.label VIC_SP0X = $D000
.label VIC_SP0Y = $D001
.label VIC_SP1X = $D002
.label VIC_SP1Y = $D003
.label VIC_SP2X = $D004
.label VIC_SP2Y = $D005
.label VIC_SP3X = $D006
.label VIC_SP3Y = $D007
.label VIC_SP4X = $D008
.label VIC_SP4Y = $D009
.label VIC_SP5X = $D00A
.label VIC_SP5Y = $D00B
.label VIC_SP6X = $D00C
.label VIC_SP6Y = $D00D
.label VIC_SP7X = $D00E
.label VIC_SP7Y = $D00F
!addr VIC_SP0X = $D000
!addr VIC_SP0Y = $D001
!addr VIC_SP1X = $D002
!addr VIC_SP1Y = $D003
!addr VIC_SP2X = $D004
!addr VIC_SP2Y = $D005
!addr VIC_SP3X = $D006
!addr VIC_SP3Y = $D007
!addr VIC_SP4X = $D008
!addr VIC_SP4Y = $D009
!addr VIC_SP5X = $D00A
!addr VIC_SP5Y = $D00B
!addr VIC_SP6X = $D00C
!addr VIC_SP6Y = $D00D
!addr VIC_SP7X = $D00E
!addr VIC_SP7Y = $D00F
.label VIC_MSIGX = $D010
.label VIC_SCROLY = $D011
.label VIC_RASTER = $D012
.label VIC_LPENX = $D013
.label VIC_LPENY = $D014
.label VIC_SPENA = $D015
.label VIC_SCROLX = $D016
.label VIC_YXPAND = $D017
.label VIC_YMCSB = $D018
.label VIC_IRQ = $D019
.label VIC_IRQMSK = $D01A
.label VIC_SPBGPR = $D01B
.label VIC_SPMC = $D01C
.label VIC_XXPAND = $D01D
.label VIC_SPSPCL = $D01E
.label VIC_SPBGCL = $D01F
!addr VIC_MSIGX = $D010
!addr VIC_SCROLY = $D011
!addr VIC_RASTER = $D012
!addr VIC_LPENX = $D013
!addr VIC_LPENY = $D014
!addr VIC_SPENA = $D015
!addr VIC_SCROLX = $D016
!addr VIC_YXPAND = $D017
!addr VIC_YMCSB = $D018
!addr VIC_IRQ = $D019
!addr VIC_IRQMSK = $D01A
!addr VIC_SPBGPR = $D01B
!addr VIC_SPMC = $D01C
!addr VIC_XXPAND = $D01D
!addr VIC_SPSPCL = $D01E
!addr VIC_SPBGCL = $D01F
.label VIC_EXTCOL = $D020
.label VIC_BGCOL0 = $D021
.label VIC_BGCOL1 = $D022
.label VIC_BGCOL2 = $D023
.label VIC_BGCOL3 = $D024
.label VIC_SPMC0 = $D025
.label VIC_SPMC1 = $D026
.label VIC_SP0COL = $D027
.label VIC_SP1COL = $D028
.label VIC_SP2COL = $D029
.label VIC_SP3COL = $D02A
.label VIC_SP4COL = $D02B
.label VIC_SP5COL = $D02C
.label VIC_SP6COL = $D02D
.label VIC_SP7COL = $D02E
!addr VIC_EXTCOL = $D020
!addr VIC_BGCOL0 = $D021
!addr VIC_BGCOL1 = $D022
!addr VIC_BGCOL2 = $D023
!addr VIC_BGCOL3 = $D024
!addr VIC_SPMC0 = $D025
!addr VIC_SPMC1 = $D026
!addr VIC_SP0COL = $D027
!addr VIC_SP1COL = $D028
!addr VIC_SP2COL = $D029
!addr VIC_SP3COL = $D02A
!addr VIC_SP4COL = $D02B
!addr VIC_SP5COL = $D02C
!addr VIC_SP6COL = $D02D
!addr VIC_SP7COL = $D02E
#if !CONFIG_MB_MEGA_65 && !CONFIG_MB_ULTIMATE_64
!ifndef CONFIG_MB_M65 { !ifndef CONFIG_MB_U64 {
.label VIC_XSCAN = $D02F // C128 only
.label VIC_CLKRATE = $D030 // C128 only
!addr VIC_XSCAN = $D02F ; C128 only
!addr VIC_CLKRATE = $D030 ; C128 only
} }
#endif
; SID registers
// SID registers
!addr __SID_BASE = $D400 ; base address of the chip
.label __SID_BASE = $D400 // base address of the chip
!addr SID_FRELO1 = $D400
!addr SID_FREHI1 = $D401
!addr SID_PWLO1 = $D402
!addr SID_PWHI1 = $D403
!addr SID_VCREG1 = $D404
!addr SID_ATDCY1 = $D405
!addr SID_SUREL1 = $D406
#if CONFIG_MB_MEGA_65
!addr SID_FRELO2 = $D407
!addr SID_FREHI2 = $D408
!addr SID_PWLO2 = $D409
!addr SID_PWHI2 = $D40A
!addr SID_VCREG2 = $D40B
!addr SID_ATDCY2 = $D40C
!addr SID_SUREL2 = $D40D
.label __SID_R1_OFFSET = $00 // right SID 1, $D400
.label __SID_R2_OFFSET = $20 // right SID 2, $D420
.label __SID_L1_OFFSET = $40 // left SID 1, $D440
.label __SID_L2_OFFSET = $60 // left SID 2, $D460
!addr SID_FRELO3 = $D40E
!addr SID_FREHI3 = $D40F
!addr SID_PWLO3 = $D410
!addr SID_PWHI3 = $D411
!addr SID_VCREG3 = $D412
!addr SID_ATDCY3 = $D413
!addr SID_SUREL3 = $D414
#endif
!addr SID_CUTLO = $D415
!addr SID_CUTHI = $D416
!addr SID_RESON = $D417
!addr SID_SIGVOL = $D418
!addr SID_POTX = $D419
!addr SID_POTY = $D41A
!addr SID_RANDOM = $D41B
!addr SID_ENV3 = $D41C
.label SID_FRELO1 = $D400
.label SID_FREHI1 = $D401
.label SID_PWLO1 = $D402
.label SID_PWHI1 = $D403
.label SID_VCREG1 = $D404
.label SID_ATDCY1 = $D405
.label SID_SUREL1 = $D406
; Color COLOR_RAM
.label SID_FRELO2 = $D407
.label SID_FREHI2 = $D408
.label SID_PWLO2 = $D409
.label SID_PWHI2 = $D40A
.label SID_VCREG2 = $D40B
.label SID_ATDCY2 = $D40C
.label SID_SUREL2 = $D40D
!addr COLOR_RAM = $D800
.label SID_FRELO3 = $D40E
.label SID_FREHI3 = $D40F
.label SID_PWLO3 = $D410
.label SID_PWHI3 = $D411
.label SID_VCREG3 = $D412
.label SID_ATDCY3 = $D413
.label SID_SUREL3 = $D414
; CIA #1 registers
.label SID_CUTLO = $D415
.label SID_CUTHI = $D416
.label SID_RESON = $D417
.label SID_SIGVOL = $D418
.label SID_POTX = $D419
.label SID_POTY = $D41A
.label SID_RANDOM = $D41B
.label SID_ENV3 = $D41C
!addr __CIA1_BASE = $DC00 ; base address of the chip
// Color COLOR_RAM
!addr CIA1_PRA = $DC00
!addr CIA1_PRB = $DC01
!addr CIA1_DDRA = $DC02
!addr CIA1_DDRB = $DC03
.label COLOR_RAM = $D800
!addr CIA1_TIMALO = $DC04
!addr CIA1_TIMAHI = $DC05
!addr CIA1_TIMBLO = $DC06
!addr CIA1_TIMBHI = $DC07
// CIA #1 registers
!addr CIA1_TODTEN = $DC08
!addr CIA1_TODSEC = $DC09
!addr CIA1_TODMIN = $DC0A
!addr CIA1_TODHRS = $DC0B
.label __CIA1_BASE = $DC00 // base address of the chip
!addr CIA1_SDR = $DC0C
!addr CIA1_ICR = $DC0D
!addr CIA1_CRA = $DC0E
!addr CIA1_CRB = $DC0F
.label CIA1_PRA = $DC00
.label CIA1_PRB = $DC01
.label CIA1_DDRA = $DC02
.label CIA1_DDRB = $DC03
; CIA #2 registers
.label CIA1_TIMALO = $DC04
.label CIA1_TIMAHI = $DC05
.label CIA1_TIMBLO = $DC06
.label CIA1_TIMBHI = $DC07
!addr __CIA2_BASE = $DD00 ; base address of the chip
.label CIA1_TODTEN = $DC08
.label CIA1_TODSEC = $DC09
.label CIA1_TODMIN = $DC0A
.label CIA1_TODHRS = $DC0B
!addr CIA2_PRA = $DD00 ; VIC bank switching and IEC port
!addr CIA2_PRB = $DD01
!addr CIA2_DDRA = $DD02
!addr CIA2_DDRB = $DD03
.label CIA1_SDR = $DC0C
.label CIA1_ICR = $DC0D
.label CIA1_CRA = $DC0E
.label CIA1_CRB = $DC0F
!addr CIA2_TIMALO = $DD04
!addr CIA2_TIMAHI = $DD05
!addr CIA2_TIMBLO = $DD06
!addr CIA2_TIMBHI = $DD07
// CIA #2 registers
!addr CIA2_TODTEN = $DD08
!addr CIA2_TODSEC = $DD09
!addr CIA2_TODMIN = $DD0A
!addr CIA2_TODHRS = $DD0B
.label __CIA2_BASE = $DD00 // base address of the chip
!addr CIA2_SDR = $DD0C
!addr CIA2_ICR = $DD0D
!addr CIA2_CRA = $DD0E
!addr CIA2_CRB = $DD0F
.label CIA2_PRA = $DD00 // VIC bank switching and IEC port
.label CIA2_PRB = $DD01
.label CIA2_DDRA = $DD02
.label CIA2_DDRB = $DD03
.label CIA2_TIMALO = $DD04
.label CIA2_TIMAHI = $DD05
.label CIA2_TIMBLO = $DD06
.label CIA2_TIMBHI = $DD07
.label CIA2_TODTEN = $DD08
.label CIA2_TODSEC = $DD09
.label CIA2_TODMIN = $DD0A
.label CIA2_TODHRS = $DD0B
.label CIA2_SDR = $DD0C
.label CIA2_ICR = $DD0D
.label CIA2_CRA = $DD0E
.label CIA2_CRB = $DD0F
// CIA #2 helper bits - IEC bus
; CIA #2 helper bits - IEC bus
.const BIT_CIA2_PRA_ATN_OUT = $08 // 1 - low (pulled), 0 - high (released)
.const BIT_CIA2_PRA_CLK_OUT = $10 // 1 - low (pulled), 0 - high (released)
.const BIT_CIA2_PRA_DAT_OUT = $20 // 1 - low (pulled), 0 - high (released)
.const BIT_CIA2_PRA_CLK_IN = $40 // 0 - low (pulled), 1 - high (released)
.const BIT_CIA2_PRA_DAT_IN = $80 // 0 - low (pulled), 1 - high (released)
!set BIT_CIA2_PRA_ATN_OUT = $08 ; 1 - low (pulled), 0 - high (released)
!set BIT_CIA2_PRA_CLK_OUT = $10 ; 1 - low (pulled), 0 - high (released)
!set BIT_CIA2_PRA_DAT_OUT = $20 ; 1 - low (pulled), 0 - high (released)
!set BIT_CIA2_PRA_CLK_IN = $40 ; 0 - low (pulled), 1 - high (released)
!set BIT_CIA2_PRA_DAT_IN = $80 ; 0 - low (pulled), 1 - high (released)
#if CONFIG_MB_MEGA_65
; SuperCPU registers
.label C65_EXTKEYS_PR = $D607
.label C65_EXTKEYS_DDR = $D608
!ifndef CONFIG_MB_M65 {
#endif
!addr SCPU_SPEED_NORMAL = $D07A
!addr SCPU_SPEED_TURBO = $D07B
}
#if !CONFIG_MB_MEGA_65
// SuperCPU registers
.label SCPU_SPEED_NORMAL = $D07A
.label SCPU_SPEED_TURBO = $D07B
#endif
#endif
}
src/aliases/,aliases_hardware_cx16.s
+51 -52
View File
@@ -1,73 +1,72 @@
//
// Names of hardware registers
//
;
; Names of hardware registers
;
#if CONFIG_PLATFORM_COMMANDER_X16
!ifdef CONFIG_PLATFORM_COMMANDER_X16 {
// VERA registers
; VERA registers
.label __VERA_BASE = $9F20 // base address of the chip
!addr __VERA_BASE = $9F20 ; base address of the chip
.label VERA_ADDR_LO = $9F20
.label VERA_ADDR_MID = $9F21
.label VERA_ADDR_HI = $9F22
!addr VERA_ADDR_LO = $9F20
!addr VERA_ADDR_MID = $9F21
!addr VERA_ADDR_HI = $9F22
.label VERA_DATA0 = $9F23
.label VERA_DATA1 = $9F24
!addr VERA_DATA0 = $9F23
!addr VERA_DATA1 = $9F24
.label VERA_CTRL = $9F25
!addr VERA_CTRL = $9F25
.label VERA_IEN = $9F26
.label VERA_ISR = $9F27
!addr VERA_IEN = $9F26
!addr VERA_ISR = $9F27
// VIA #1 registers
; VIA #1 registers
.label __VIA1_BASE = $9F60 // base address of the chip
!addr __VIA1_BASE = $9F60 ; base address of the chip
.label VIA1_PRB = $9F60
.label VIA1_PRA = $9F61
.label VIA1_DDRB = $9F62
.label VIA1_DDRA = $9F63
!addr VIA1_PRB = $9F60
!addr VIA1_PRA = $9F61
!addr VIA1_DDRB = $9F62
!addr VIA1_DDRA = $9F63
.label VIA1_T1C_L = $9F64
.label VIA1_T1C_H = $9F65
.label VIA1_T1L_L = $9F66
.label VIA1_T1L_H = $9F67
.label VIA1_T2C_L = $9F68
.label VIA1_T2C_H = $9F69
!addr VIA1_T1C_L = $9F64
!addr VIA1_T1C_H = $9F65
!addr VIA1_T1L_L = $9F66
!addr VIA1_T1L_H = $9F67
!addr VIA1_T2C_L = $9F68
!addr VIA1_T2C_H = $9F69
.label VIA1_SR = $9F6A
.label VIA1_ACR = $9F6B
.label VIA1_PCR = $9F6C
.label VIA1_IFR = $9F6D
.label VIA1_IER = $9F6E
!addr VIA1_SR = $9F6A
!addr VIA1_ACR = $9F6B
!addr VIA1_PCR = $9F6C
!addr VIA1_IFR = $9F6D
!addr VIA1_IER = $9F6E
.label VIA1_PRA_NH = $9F6F
!addr VIA1_PRA_NH = $9F6F
// VIA #2 registers
; VIA #2 registers
.label __VIA2_BASE = $9F70 // base address of the chip
!addr __VIA2_BASE = $9F70 ; base address of the chip
.label VIA2_PRB = $9F70
.label VIA2_PRA = $9F71
.label VIA2_DDRB = $9F72
.label VIA2_DDRA = $9F73
!addr VIA2_PRB = $9F70
!addr VIA2_PRA = $9F71
!addr VIA2_DDRB = $9F72
!addr VIA2_DDRA = $9F73
.label VIA2_T1C_L = $9F74
.label VIA2_T1C_H = $9F75
.label VIA2_T1L_L = $9F76
.label VIA2_T1L_H = $9F77
.label VIA2_T2C_L = $9F78
.label VIA2_T2C_H = $9F79
!addr VIA2_T1C_L = $9F74
!addr VIA2_T1C_H = $9F75
!addr VIA2_T1L_L = $9F76
!addr VIA2_T1L_H = $9F77
!addr VIA2_T2C_L = $9F78
!addr VIA2_T2C_H = $9F79
.label VIA2_SR = $9F7A
.label VIA2_ACR = $9F7B
.label VIA2_PCR = $9F7C
.label VIA2_IFR = $9F7D
.label VIA2_IER = $9F7E
!addr VIA2_SR = $9F7A
!addr VIA2_ACR = $9F7B
!addr VIA2_PCR = $9F7C
!addr VIA2_IFR = $9F7D
!addr VIA2_IER = $9F7E
.label VIA2_PRA_NH = $9F7F
#endif
!addr VIA2_PRA_NH = $9F7F
}
src/aliases/,aliases_hardware_m65.s
+40 -29
View File
@@ -1,45 +1,56 @@
//
// Names of hardware registers
//
// See https://github.com/MEGA65/mega65-core/blob/master/iomap.txt
//
;
; Names of hardware registers
;
; See https://github.com/MEGA65/mega65-core/blob/master/iomap.txt
;
#if CONFIG_MB_MEGA_65
!ifdef CONFIG_MB_M65 {
// VIC-IV registers
; VIC-IV registers
.label VIC_KEY = $D02F
.label VIC_CTRLA = $D030
.label VIC_CTRLB = $D031
!addr VIC_KEY = $D02F
!addr VIC_CTRLA = $D030
!addr VIC_CTRLB = $D031
.label VIC_XPOS = $D050
!addr VIC_XPOS = $D050
.label VIC_CTRLC = $D054
!addr VIC_CTRLC = $D054
.label VIC_CHARSTEP = $D058 // 2 bytes - logical characters per line
!addr VIC_CHARSTEP = $D058 ; 2 bytes - logical characters per line
.label VIC_SRH = $D05D // - various flags, bit 7 = hot registers
!addr VIC_SRH = $D05D ; - various flags, bit 7 = hot registers
.label VIC_SCRNPTR = $D060 // 4 bytes - pointer to start of screen memory
.label VIC_COLPTR = $D064 // 2 bytes - pointer to start of color memory
!addr VIC_SCRNPTR = $D060 ; 4 bytes - pointer to start of screen memory
!addr VIC_COLPTR = $D064 ; 2 bytes - pointer to start of color memory
.label VIC_CHARPTR = $D068 // 3 bytes - pointer to start of character generator
!addr VIC_CHARPTR = $D068 ; 3 bytes - pointer to start of character generator
// DMAgic
; Keyboard
.label DMA_ADDRLSBTRIG = $D700
.label DMA_ADDRMSB = $D701
.label DMA_ADDRBANK = $D702
.label DMA_EN018B = $D703
.label DMA_ADDRMB = $D704
.label DMA_ETRIG = $D705
.label DMA_ADDRLSB = $D70E
!addr C65_EXTKEYS_PR = $D607
!addr C65_EXTKEYS_DDR = $D608
// MISC registers
; DMAgic
.label MISC_BOARDID = $D629 // board identification byte
.label MISC_EMU = $D710 // to enable badlines and slow interrupts
!addr DMA_ADDRLSBTRIG = $D700
!addr DMA_ADDRMSB = $D701
!addr DMA_ADDRBANK = $D702
!addr DMA_EN018B = $D703
!addr DMA_ADDRMB = $D704
!addr DMA_ETRIG = $D705
!addr DMA_ADDRLSB = $D70E
#endif
; MISC registers
!addr MISC_BOARDID = $D629 ; board identification byte
!addr MISC_EMU = $D710 ; to enable badlines and slow interrupts
; SID offsets
!set __SID_R1_OFFSET = $00 ; right SID 1, $D400
!set __SID_R2_OFFSET = $20 ; right SID 2, $D420
!set __SID_L1_OFFSET = $40 ; left SID 1, $D440
!set __SID_L2_OFFSET = $60 ; left SID 2, $D460
}
src/aliases/,aliases_petscii_codes.s
+162 -147
View File
@@ -1,176 +1,191 @@
//
// PETSCII codes for all the supported keys, for all the keyboards
//
// - [CM64] Compute's Mapping the Commodore 64
// - [CM128] Compute's Mapping the Commodore 128
// - https://github.com/MEGA65/c65-specifications/blob/master/c65manualupdated.txt
// - https://en.wikipedia.org/wiki/PETSCII
//
;
; PETSCII codes for all the supported keys, for all the keyboards
;
; - [CM64] Compute's Mapping the Commodore 64
; - [CM128] Compute's Mapping the Commodore 128
; - https://github.com/MEGA65/c65-specifications/blob/master/c65manualupdated.txt
; - https://en.wikipedia.org/wiki/PETSCII
;
// Not really PETSCII codes, but bitmask values for SHFLAG variable
// [CM64] page 68, [CM128] page 212
; First determine what to define
.const KEY_FLAG_SHIFT = %00000001
.const KEY_FLAG_VENDOR = %00000010
.const KEY_FLAG_CTRL = %00000100
#if CONFIG_KEYBOARD_C128 || CONFIG_KEYBOARD_C65 || ROM_LAYOUT_M65
.const KEY_FLAG_ALT = %00001000
#if CONFIG_KEYBOARD_C128_CAPS_LOCK || CONFIG_KEYBOARD_C65_CAPS_LOCK
.const KEY_CAPS_LOCK = %00010000
#endif
.const KEY_FLAG_NO_SCRL = %00100000 // Open ROMs unofficial
#endif
// Note - the following PETSCII codes are currently unassigned, can be used for further extensions: $01, $04, $06, ($80 ?)
.const KEY_NA = $00 // to indicate that no key is presed
!ifdef CONFIG_KEYBOARD_C128 { !set _NEED_EXTENDED = 1 }
!ifdef CONFIG_KEYBOARD_C128_CAPS_LOCK { !set _NEED_CAPS_LOCK = 1 }
!ifdef CONFIG_KEYBOARD_C65 { !set _NEED_EXTENDED = 1 }
!ifdef CONFIG_KEYBOARD_C65_CAPS_LOCK { !set _NEED_CAPS_LOCK = 1 }
!ifdef CONFIG_MB_M65 { !set _NEED_EXTENDED = 1 }
!ifdef CONFIG_KEYBOARD_C65 { !set _NEED_C65KB = 1 }
!ifdef CONFIG_MB_M65 { !set _NEED_C65KB = 1 }
// PETSCII codes for our extended screen editor
; Not really PETSCII codes, but bitmask values for SHFLAG variable
; [CM64] page 68, [CM128] page 212
.const KEY_C64_TAB_FW = $8F // CTRL+>, TAB - Open ROMs unofficial, original TAB conflicts with C64 PETSCII, XXX remove?
.const KEY_C64_TAB_BW = $80 // CTRL+<, SHIFT+TAB - Open ROMs unofficial, original TAB conflicts with C64 PETSCII, XXX remove?
!set KEY_FLAG_SHIFT = %00000001
!set KEY_FLAG_VENDOR = %00000010
!set KEY_FLAG_CTRL = %00000100
!ifdef _NEED_EXTENDED {
!set KEY_FLAG_ALT = %00001000
!set KEY_FLAG_NO_SCRL = %00100000
}
!ifdef _NEED_CAPS_LOCK {
!set KEY_CAPS_LOCK = %00010000
}
// PETSCII codes for certain C128 and C65 functionalities
#if CONFIG_KEYBOARD_C128 || CONFIG_KEYBOARD_C65 || ROM_LAYOUT_M65
.const KEY_BELL = $07 // no key, originally CTRL+G // XXX implement, add to C65 keyboard matrix
.const KEY_ESC = $1B
#endif
#if CONFIG_KEYBOARD_C65 || ROM_LAYOUT_M65
.const KEY_TAB = $09 // XXX add to C65 keyboard matrix
.const KEY_LINE_FEED = $0A // XXX add to C65 keyboard matrix
.const KEY_TAB_SET_CLR = $18 // XXX add to C65 keyboard matrix
.const KEY_UNDERLINE_ON = $02 // XXX add to C65 keyboard matrix
.const KEY_UNDERLINE_OFF = $82 // XXX add to C65 keyboard matrix
.const KEY_FLASHING_ON = $0F // XXX add to C65 keyboard matrix
.const KEY_FLASHING_OFF = $8F // XXX add to C65 keyboard matrix
#endif
// PETSCII codes for programmable keys
.const KEY_STOP = $03
.const KEY_RUN = $83
.const KEY_F1 = $85
.const KEY_F2 = $89
.const KEY_F3 = $86
.const KEY_F4 = $8A
.const KEY_F5 = $87
.const KEY_F6 = $8B
.const KEY_F7 = $88
.const KEY_F8 = $8C
#if CONFIG_KEYBOARD_C65 || ROM_LAYOUT_M65
.const KEY_F9 = $10
.const KEY_F10 = $15
.const KEY_F11 = $16
.const KEY_F12 = $17
.const KEY_F13 = $19
.const KEY_F14 = $1A
#endif
#if CONFIG_KEYBOARD_C128 || CONFIG_KEYBOARD_C65 || ROM_LAYOUT_M65
.const KEY_HELP = $84
#endif
; Note - the following PETSCII codes are currently unassigned, can be used for further extensions: $01, $04, $06, ($80 ?)
// PETSCII codes for cursor keys
.const KEY_CRSR_UP = $91
.const KEY_CRSR_DOWN = $11
.const KEY_CRSR_LEFT = $9D
.const KEY_CRSR_RIGHT = $1D
!set KEY_NA = $00 ; to indicate that no key is presed
// PETSCII codes for colors
; PETSCII codes for our extended screen editor
.const KEY_RVS_ON = $12 // CTRL+9
.const KEY_RVS_OFF = $92 // CTRL+0
.const KEY_BLACK = $90 // CTRL+1
.const KEY_WHITE = $05 // CTRL+2
.const KEY_RED = $1C // CTRL+3
.const KEY_CYAN = $9F // CTRL+4
.const KEY_PURPLE = $9C // CTRL+5
.const KEY_GREEN = $1E // CTRL+6
.const KEY_BLUE = $1F // CTRL+7
.const KEY_YELLOW = $9E // CTRL+8
.const KEY_ORANGE = $81 // VENDOR+1
.const KEY_BROWN = $95 // VENDOR+2
.const KEY_LT_RED = $96 // VENDOR+3
.const KEY_GREY_1 = $97 // VENDOR+4
.const KEY_GREY_2 = $98 // VENDOR+5
.const KEY_LT_GREEN = $99 // VENDOR+6
.const KEY_LT_BLUE = $9A // VENDOR+7
.const KEY_GREY_3 = $9B // VENDOR+8
!set KEY_C64_TAB_FW = $8F ; CTRL+>, TAB - Open ROMs unofficial, original TAB conflicts with C64 PETSCII, XXX remove?
!set KEY_C64_TAB_BW = $80 ; CTRL+<, SHIFT+TAB - Open ROMs unofficial, original TAB conflicts with C64 PETSCII, XXX remove?
// PETSCII codes for case toggle
; PETSCII codes for certain C128 and C65 functionalities
.const KEY_C64_SHIFT_ON = $09 // no key
.const KEY_C64_SHIFT_OFF = $08 // no key
#if CONFIG_KEYBOARD_C65 || ROM_LAYOUT_M65
.const KEY_C65_SHIFT_OFF = $0B // no key
.const KEY_C65_SHIFT_ON = $0C // no key
#endif
.const KEY_TXT = $0E // no key
.const KEY_GFX = $8E // no key
!ifdef _NEED_EXTENDED {
!set KEY_BELL = $07 ; no key, originally CTRL+G ; XXX implement, add to C65 keyboard matrix
!set KEY_ESC = $1B
}
!ifdef _NEED_C65KB {
!set KEY_TAB = $09 ; XXX add to C65 keyboard matrix
!set KEY_LINE_FEED = $0A ; XXX add to C65 keyboard matrix
!set KEY_TAB_SET_CLR = $18 ; XXX add to C65 keyboard matrix
!set KEY_UNDERLINE_ON = $02 ; XXX add to C65 keyboard matrix
!set KEY_UNDERLINE_OFF = $82 ; XXX add to C65 keyboard matrix
!set KEY_FLASHING_ON = $0F ; XXX add to C65 keyboard matrix
!set KEY_FLASHING_OFF = $8F ; XXX add to C65 keyboard matrix
}
// PETSCII codes for other non-printable characters
; PETSCII codes for programmable keys
.const KEY_RETURN = $0D
.const KEY_CLR = $93
.const KEY_HOME = $13
.const KEY_INS = $94
.const KEY_DEL = $14
!set KEY_STOP = $03
!set KEY_RUN = $83
!set KEY_F1 = $85
!set KEY_F2 = $89
!set KEY_F3 = $86
!set KEY_F4 = $8A
!set KEY_F5 = $87
!set KEY_F6 = $8B
!set KEY_F7 = $88
!set KEY_F8 = $8C
!ifdef _NEED_C65KB {
!set KEY_F9 = $10
!set KEY_F10 = $15
!set KEY_F11 = $16
!set KEY_F12 = $17
!set KEY_F13 = $19
!set KEY_F14 = $1A
}
!ifdef _NEED_EXTENDED {
!set KEY_HELP = $84
}
// PETSCII codes for printable characters
; PETSCII codes for cursor keys
.const KEY_SPACE = $20
.const KEY_EXCLAMATION = $21
.const KEY_QUOTE = $22
.const KEY_HASH = $23
.const KEY_DOLLAR = $24
.const KEY_PERCENT = $25
.const KEY_AMPERSAND = $26
.const KEY_APOSTROPHE = $27
.const KEY_R_BRACKET_L = $28
.const KEY_R_BRACKET_R = $29
.const KEY_ASTERISK = $2A
.const KEY_PLUS = $2B
.const KEY_COMA = $2C
.const KEY_MINUS = $2D
.const KEY_FULLSTOP = $2E
.const KEY_SLASH = $2F
.const KEY_0 = $30
.const KEY_1 = $31
.const KEY_2 = $32
.const KEY_3 = $33
.const KEY_4 = $34
.const KEY_5 = $35
.const KEY_6 = $36
.const KEY_7 = $37
.const KEY_8 = $38
.const KEY_9 = $39
.const KEY_COLON = $3A
.const KEY_SEMICOLON = $3B
.const KEY_LT = $3C
.const KEY_EQ = $3D
.const KEY_GT = $3E
.const KEY_QUESTION = $3F
!set KEY_CRSR_UP = $91
!set KEY_CRSR_DOWN = $11
!set KEY_CRSR_LEFT = $9D
!set KEY_CRSR_RIGHT = $1D
// XXX finish this: $4x, $5x, $6x, $7x, $Ax, $Bx, $Cx, $Dx, $Ex, $Fx
; PETSCII codes for colors
!set KEY_RVS_ON = $12 ; CTRL+9
!set KEY_RVS_OFF = $92 ; CTRL+0
!set KEY_BLACK = $90 ; CTRL+1
!set KEY_WHITE = $05 ; CTRL+2
!set KEY_RED = $1C ; CTRL+3
!set KEY_CYAN = $9F ; CTRL+4
!set KEY_PURPLE = $9C ; CTRL+5
!set KEY_GREEN = $1E ; CTRL+6
!set KEY_BLUE = $1F ; CTRL+7
!set KEY_YELLOW = $9E ; CTRL+8
!set KEY_ORANGE = $81 ; VENDOR+1
!set KEY_BROWN = $95 ; VENDOR+2
!set KEY_LT_RED = $96 ; VENDOR+3
!set KEY_GREY_1 = $97 ; VENDOR+4
!set KEY_GREY_2 = $98 ; VENDOR+5
!set KEY_LT_GREEN = $99 ; VENDOR+6
!set KEY_LT_BLUE = $9A ; VENDOR+7
!set KEY_GREY_3 = $9B ; VENDOR+8
; PETSCII codes for case toggle
!set KEY_C64_SHIFT_ON = $09 ; no key
!set KEY_C64_SHIFT_OFF = $08 ; no key
!ifdef _NEED_C65KB {
!set KEY_C65_SHIFT_OFF = $0B ; no key
!set KEY_C65_SHIFT_ON = $0C ; no key
}
!set KEY_TXT = $0E ; no key
!set KEY_GFX = $8E ; no key
; PETSCII codes for other non-printable characters
!set KEY_RETURN = $0D
!set KEY_CLR = $93
!set KEY_HOME = $13
!set KEY_INS = $94
!set KEY_DEL = $14
; PETSCII codes for printable characters
!set KEY_SPACE = $20
!set KEY_EXCLAMATION = $21
!set KEY_QUOTE = $22
!set KEY_HASH = $23
!set KEY_DOLLAR = $24
!set KEY_PERCENT = $25
!set KEY_AMPERSAND = $26
!set KEY_APOSTROPHE = $27
!set KEY_R_BRACKET_L = $28
!set KEY_R_BRACKET_R = $29
!set KEY_ASTERISK = $2A
!set KEY_PLUS = $2B
!set KEY_COMA = $2C
!set KEY_MINUS = $2D
!set KEY_FULLSTOP = $2E
!set KEY_SLASH = $2F
!set KEY_0 = $30
!set KEY_1 = $31
!set KEY_2 = $32
!set KEY_3 = $33
!set KEY_4 = $34
!set KEY_5 = $35
!set KEY_6 = $36
!set KEY_7 = $37
!set KEY_8 = $38
!set KEY_9 = $39
!set KEY_COLON = $3A
!set KEY_SEMICOLON = $3B
!set KEY_LT = $3C
!set KEY_EQ = $3D
!set KEY_GT = $3E
!set KEY_QUESTION = $3F
; XXX finish this: $4x, $5x, $6x, $7x, $Ax, $Bx, $Cx, $Dx, $Ex, $Fx
src/aliases/,aliases_ram_lowmem.s
+287 -290
View File
@@ -1,329 +1,326 @@
//
// Names of ZP and low memory locations:
// - Computes Mapping the Commodore 64
// - https://www.c64-wiki.com/wiki/Zeropage
// - http://unusedino.de/ec64/technical/project64/memory_maps.html
//
;
; Names of ZP and low memory locations:
; - Computes Mapping the Commodore 64
; - https://www.c64-wiki.com/wiki/Zeropage
; - http://unusedino.de/ec64/technical/project64/memory_maps.html
;
// $00-$01 - 6502 CPU registers are here
; $00-$01 - 6502 CPU registers are here
//
// Page 0 - BASIC area ($02-$8F)
//
;
; Page 0 - BASIC area ($02-$8F)
;
// $02 -- UNUSED -- free for user software
.label ADRAY1 = $03 // $03-$04
.label ADRAY2 = $05 // $05-$06
.label CHARAC = $07 // [!] our implementation might be different XXX give more details
.label ENDCHR = $08 // [!] our implementation might be different XXX give more details
.label TRMPOS = $09 // -- NOT IMPLEMENTED --
.label VERCKB = $0A // flag used by BASIC, 0 - LOAD, 1 - VERIFY
.label COUNT = $0B // [!] our implementation might be different XXX give more details
.label DIMFLG = $0C // [!] our implementation might be different XXX give more details
.label VALTYP = $0D // expression eveluation result; $00 - float, $FF - string
.label INTFLG = $0E // -- NOT IMPLEMENTED --
.label GARBFL = $0F // [!] our implementation might be different XXX give more details
.label SUBFLG = $10 // -- NOT IMPLEMENTED --
.label INPFLG = $11 // -- NOT IMPLEMENTED --
.label TANSGN = $12 // -- NOT IMPLEMENTED --
.label CHANNL = $13 // -- NOT IMPLEMENTED --
.label LINNUM = $14 // $14-$15 BASIC line number, [!] also used by DOS Wedge
.label TEMPPT = $16 // pointer to the first available slot in the temporary string descriptor stack
.label LASTPT = $17 // $17-$18 pointer to the last used slot in the temporary string descriptor
.label TEMPST = $19 // $19-$21 temporary string stack descriptors
.label INDEX = $22 // $22-$25 temporary variables, [!] our usage might be different
.label RESHO = $26 // $26-$2A temporary variables, [!] our usage might be different
.label TXTTAB = $2B // $2B-$2C start of BASIC code
.label VARTAB = $2D // $2D-$2E end of BASIC code, start of variables
.label ARYTAB = $2F // $2F-$30 pointer to start of array storage
.label STREND = $31 // $31-$32 pointer to start of free RAM
.label FRETOP = $33 // $33-$34 pointer to bottom of strings area
.label FRESPC = $35 // $35-$36 [!] our implementation uses this as temporary string pointer
.label MEMSIZ = $37 // $37-$38 highest address of BASIC memory + 1
.label CURLIN = $39 // $39-$3A current BASIC line number
.label OLDLIN = $3B // $3B-$3C previous BASIC line number
.label OLDTXT = $3D // $3D-$3E current BASIC line pointer
.label DATLIN = $3F // $3F-$40 -- NOT IMPLEMENTED --
.label DATPTR = $41 // $41-$42 pointer for READ/DATA copmmands
.label INPPTR = $43 // $43-$44 -- NOT IMPLEMENTED --
.label VARNAM = $45 // $45-$46 current variable name
.label VARPNT = $47 // $47-$48 current variable/descriptor pointer
.label FORPNT = $49 // $49-$4A -- NOT IMPLEMENTED --
.label OPPTR = $4B // $4B-$4C helper variable for expression computation, [!] our usage details are different
.label OPMASK = $4D // -- NOT IMPLEMENTED --
.label DEFPNT = $4E // $4E-$4F -- NOT IMPLEMENTED --
.label DSCPNT = $50 // $50-$52 temporary area fro string handling, [!] our usage might differ
.label FOUR6 = $53 // size of variable content (float = 5, integer = 2, string descriptor = 3)
.label JMPER = $54 // $54-$56 -- NOT IMPLEMENTED --
.label TEMPF1 = $57 // $57-$5B BASIC numeric work area
.label TEMPF2 = $5C // $5C-$60 BASIC numeric work area
; $02 -- UNUSED -- free for user software
!addr ADRAY1 = $03 ; $03-$04
!addr ADRAY2 = $05 ; $05-$06
!addr CHARAC = $07 ; [!] our implementation might be different XXX give more details
!addr ENDCHR = $08 ; [!] our implementation might be different XXX give more details
!addr TRMPOS = $09 ; -- NOT IMPLEMENTED --
!addr VERCKB = $0A ; flag used by BASIC, 0 - LOAD, 1 - VERIFY
!addr COUNT = $0B ; [!] our implementation might be different XXX give more details
!addr DIMFLG = $0C ; [!] our implementation might be different XXX give more details
!addr VALTYP = $0D ; expression eveluation result; $00 - float, $FF - string
!addr INTFLG = $0E ; -- NOT IMPLEMENTED --
!addr GARBFL = $0F ; [!] our implementation might be different XXX give more details
!addr SUBFLG = $10 ; -- NOT IMPLEMENTED --
!addr INPFLG = $11 ; -- NOT IMPLEMENTED --
!addr TANSGN = $12 ; -- NOT IMPLEMENTED --
!addr CHANNL = $13 ; -- NOT IMPLEMENTED --
!addr LINNUM = $14 ; $14-$15 BASIC line number, [!] also used by DOS Wedge
!addr TEMPPT = $16 ; pointer to the first available slot in the temporary string descriptor stack
!addr LASTPT = $17 ; $17-$18 pointer to the last used slot in the temporary string descriptor
!addr TEMPST = $19 ; $19-$21 temporary string stack descriptors
!addr INDEX = $22 ; $22-$25 temporary variables, [!] our usage might be different
!addr RESHO = $26 ; $26-$2A temporary variables, [!] our usage might be different
!addr TXTTAB = $2B ; $2B-$2C start of BASIC code
!addr VARTAB = $2D ; $2D-$2E end of BASIC code, start of variables
!addr ARYTAB = $2F ; $2F-$30 pointer to start of array storage
!addr STREND = $31 ; $31-$32 pointer to start of free RAM
!addr FRETOP = $33 ; $33-$34 pointer to bottom of strings area
!addr FRESPC = $35 ; $35-$36 [!] our implementation uses this as temporary string pointer
!addr MEMSIZ = $37 ; $37-$38 highest address of BASIC memory + 1
!addr CURLIN = $39 ; $39-$3A current BASIC line number
!addr OLDLIN = $3B ; $3B-$3C previous BASIC line number
!addr OLDTXT = $3D ; $3D-$3E current BASIC line pointer
!addr DATLIN = $3F ; $3F-$40 -- NOT IMPLEMENTED --
!addr DATPTR = $41 ; $41-$42 pointer for READ/DATA copmmands
!addr INPPTR = $43 ; $43-$44 -- NOT IMPLEMENTED --
!addr VARNAM = $45 ; $45-$46 current variable name
!addr VARPNT = $47 ; $47-$48 current variable/descriptor pointer
!addr FORPNT = $49 ; $49-$4A -- NOT IMPLEMENTED --
!addr OPPTR = $4B ; $4B-$4C helper variable for expression computation, [!] our usage details are different
!addr OPMASK = $4D ; -- NOT IMPLEMENTED --
!addr DEFPNT = $4E ; $4E-$4F -- NOT IMPLEMENTED --
!addr DSCPNT = $50 ; $50-$52 temporary area fro string handling, [!] our usage might differ
!addr FOUR6 = $53 ; size of variable content (float = 5, integer = 2, string descriptor = 3)
!addr JMPER = $54 ; $54-$56 -- NOT IMPLEMENTED --
!addr TEMPF1 = $57 ; $57-$5B BASIC numeric work area
!addr TEMPF2 = $5C ; $5C-$60 BASIC numeric work area
.label __FAC1 = $61 // $61-$66 floating point accumulator 1
.label FAC1_exponent = $61
.label FAC1_mantissa = $62 // $62 - $65
.label FAC1_sign = $66
!addr __FAC1 = $61 ; $61-$66 floating point accumulator 1
!addr FAC1_exponent = $61
!addr FAC1_mantissa = $62 ; $62 - $65
!addr FAC1_sign = $66
.label SGNFLG = $67 // -- NOT IMPLEMENTED --
.label BITS = $68 // FAC1 overflow
!addr SGNFLG = $67 ; -- NOT IMPLEMENTED --
!addr BITS = $68 ; FAC1 overflow
.label __FAC2 = $69 // $69-$6E floating point accumulator 2 [!] also used for memory move pointers
.label FAC2_exponent = $69
.label FAC2_mantissa = $6A // $6A - $6D
.label FAC2_sign = $6E
!addr __FAC2 = $69 ; $69-$6E floating point accumulator 2 [!] also used for memory move pointers
!addr FAC2_exponent = $69
!addr FAC2_mantissa = $6A ; $6A - $6D
!addr FAC2_sign = $6E
.label ARISGN = $6F // -- NOT IMPLEMENTED --
.label FACOV = $70 // FAC1 low order mantissa
.label FBUFPT = $71 // $71-$72 -- NOT IMPLEMENTED --
.label CHRGET = $73 // $73-$8A -- NOT IMPLEMENTED --
.label TXTPTR = $7A // $7A-$7B current BASIC statement pointer
.label RNDX = $8B // $8B-$8F random number seed
!addr ARISGN = $6F ; -- NOT IMPLEMENTED --
!addr FACOV = $70 ; FAC1 low order mantissa
!addr FBUFPT = $71 ; $71-$72 -- NOT IMPLEMENTED --
!addr CHRGET = $73 ; $73-$8A -- NOT IMPLEMENTED --
!addr TXTPTR = $7A ; $7A-$7B current BASIC statement pointer
!addr RNDX = $8B ; $8B-$8F random number seed
//
// Page 0 - Kernal area ($90-$FF)
//
;
; Page 0 - Kernal area ($90-$FF)
;
.label IOSTATUS = $90
.label STKEY = $91 // keys down clears bits. STOP - bit 7, C= - bit 6, SPACE - bit 4, CTRL - bit 2
.label SVXT = $92 // tape reading constant [!] our tape routines use it differently
.label VERCKK = $93 // 0 = LOAD, 1 = VERIFY
.label C3PO = $94 // flag - is BSOUR content valid
.label BSOUR = $95 // serial bus buffered output byte
.label SYNO = $96 // temporary tape routines storage, [!] our usage differs
.label XSAV = $97 // temporary register storage for ASCII/tape related routines [!] usage details might differ
.label LDTND = $98 // number of entries in LAT / FAT / SAT tables
.label DFLTN = $99 // default input device
.label DFLTO = $9A // default output device
.label PRTY = $9B // tape storage for parity/checksum
#if !CONFIG_TAPE_NORMAL && !CONFIG_TAPE_TURBO
.label DPSW = $9C // -- NOT IMPLEMENTED --
#else
.label COLSTORE = $9C // [!] screen border storage for tape routines
#endif
.label MSGFLG = $9D // bit 6 = error messages, bit 7 = control message
.label PTR1 = $9E // for tape support, counter of errorneous bytes
.label PTR2 = $9F // for tape support, counter for errorneous bytes correction
.label TIME = $A0 // $A0-$A2 jiffy clock
.label IECPROTO = $A3 // [!] IEC or pseudo-IEC protocol, >= $80 for unknown; originally named TSFCNT
.label TBTCNT = $A4 // temporary variable for tape and IEC, [!] our usage probably differs in details
.label CNTDN = $A5 // -- NOT IMPLEMENTED --
.label BUFPNT = $A6 // -- NOT IMPLEMENTED --
.label INBIT = $A7 // temporary storage for tape / RS-232 received bits
#if !CONFIG_LEGACY_SCNKEY
.label BITCI = $A8 // -- NOT IMPLEMENTED --
.label RINONE = $A9 // -- WIP -- (UP9600 only) RS-232 check for start bit flag
.label RIDDATA = $AA // -- NOT IMPLEMENTED --
.label RIPRTY = $AB // -- WIP -- checksum while reading tape
#endif
.label SAL = $AC // $AC-$AD -- XXX: describe -- (implemented screen part)
.label EAL = $AE // $AE-$AF -- XXX: describe -- [!] used also by screen editor, for temporary color storage when scrolling
.label CMP0 = $B0 // $B0-$B1 temporary tape storage, [!] here used for BRK instruction address
.label TAPE1 = $B2 // $B2-$B3 tape buffer pointer
#if !CONFIG_LEGACY_SCNKEY
.label BITTS = $B4 // -- NOT IMPLEMENTED --
#endif
.label NXTBIT = $B5 // -- NOT IMPLEMENTED --
#if !CONFIG_LEGACY_SCNKEY
.label RODATA = $B6 // -- NOT IMPLEMENTED --
#endif
!addr IOSTATUS = $90
!addr STKEY = $91 ; keys down clears bits. STOP - bit 7, C= - bit 6, SPACE - bit 4, CTRL - bit 2
!addr SVXT = $92 ; tape reading constant [!] our tape routines use it differently
!addr VERCKK = $93 ; 0 = LOAD, 1 = VERIFY
!addr C3PO = $94 ; flag - is BSOUR content valid
!addr BSOUR = $95 ; serial bus buffered output byte
!addr SYNO = $96 ; temporary tape routines storage, [!] our usage differs
!addr XSAV = $97 ; temporary register storage for ASCII/tape related routines [!] usage details might differ
!addr LDTND = $98 ; number of entries in LAT / FAT / SAT tables
!addr DFLTN = $99 ; default input device
!addr DFLTO = $9A ; default output device
!addr PRTY = $9B ; tape storage for parity/checksum
!ifndef HAS_TAPE {
!addr DPSW = $9C ; -- NOT IMPLEMENTED --
} else {
!addr COLSTORE = $9C ; [!] screen border storage for tape routines
}
!addr MSGFLG = $9D ; bit 6 = error messages, bit 7 = control message
!addr PTR1 = $9E ; for tape support, counter of errorneous bytes
!addr PTR2 = $9F ; for tape support, counter for errorneous bytes correction
!addr TIME = $A0 ; $A0-$A2 jiffy clock
!addr IECPROTO = $A3 ; [!] IEC or pseudo-IEC protocol, >= $80 for unknown; originally named TSFCNT
!addr TBTCNT = $A4 ; temporary variable for tape and IEC, [!] our usage probably differs in details
!addr CNTDN = $A5 ; -- NOT IMPLEMENTED --
!addr BUFPNT = $A6 ; -- NOT IMPLEMENTED --
!addr INBIT = $A7 ; temporary storage for tape / RS-232 received bits
!ifndef CONFIG_LEGACY_SCNKEY {
!addr BITCI = $A8 ; -- NOT IMPLEMENTED --
!addr RINONE = $A9 ; -- WIP -- (UP9600 only) RS-232 check for start bit flag
!addr RIDDATA = $AA ; -- NOT IMPLEMENTED --
!addr RIPRTY = $AB ; -- WIP -- checksum while reading tape
}
!addr SAL = $AC ; $AC-$AD -- XXX: describe -- (implemented screen part)
!addr EAL = $AE ; $AE-$AF -- XXX: describe -- [!] used also by screen editor, for temporary color storage when scrolling
!addr CMP0 = $B0 ; $B0-$B1 temporary tape storage, [!] here used for BRK instruction address
!addr TAPE1 = $B2 ; $B2-$B3 tape buffer pointer
!ifndef CONFIG_LEGACY_SCNKEY {
!addr BITTS = $B4 ; -- NOT IMPLEMENTED --
}
!addr NXTBIT = $B5 ; -- NOT IMPLEMENTED --
!ifndef CONFIG_LEGACY_SCNKEY {
!addr RODATA = $B6 ; -- NOT IMPLEMENTED --
}
!addr FNLEN = $B7 ; current file name length
!addr LA = $B8 ; current logical_file number
!addr SA = $B9 ; current secondary address
!addr FA = $BA ; current device number
!addr FNADDR = $BB ; $BB-$BC current file name pointer
!addr ROPRTY = $BD ; -- NOT IMPLEMENTED -- tape / RS-232 temporary storage
!addr FSBLK = $BE ; -- NOT IMPLEMENTED -- tape / RS-232 temporary storage
!addr MYCH = $BF ; -- NOT IMPLEMENTED --
!addr CAS1 = $C0 ; tape motor interlock
!addr STAL = $C1 ; $C1-$C2 LOAD/SAVE start address
!addr MEMUSS = $C3 ; $C3-$C4 temporary address for tape LOAD/SAVE
!addr LSTX = $C5 ; last key matrix position [!] our usage probably differs in details
!addr NDX = $C6 ; number of chars in keyboard buffer
!addr RVS = $C7 ; flag, whether to print reversed characters
!addr INDX = $C8 ; end of logical line (column, 0-79)
!addr LSXP = $C9 ; $C9-$CA start of input, X/Y position (typo in Mapping the C64, fixed in Mapping the C128)
!addr SFDX = $CB ; -- NOT IMPLEMENTED --
!addr BLNSW = $CC ; cursor blink disable flag
!addr BLNCT = $CD ; cursor blink countdown
!addr GDBLN = $CE ; cursor saved character
!addr BLNON = $CF ; cursor visibility flag
!addr CRSW = $D0 ; whether to input from screen or keyboard (if from screen, stores input offset)
!addr PNT = $D1 ; $D1-$D2 pointer to the current screen line
!addr PNTR = $D3 ; current screen X position (logical column), 0-79
!addr QTSW = $D4 ; quote mode flag
!addr LNMX = $D5 ; logical line length, 39 or 79
!addr TBLX = $D6 ; current screen Y position (row), 0-24
!addr SCHAR = $D7 ; ASCII value of the last printed character
!addr INSRT = $D8 ; insert mode flag/counter
!addr LDTB1 = $D9 ; $D9-$F2 screen line link table, [!] our usage is different XXX give more details
!addr USER = $F3 ; $F3-$F4 pointer to current color RAM location
!addr KEYTAB = $F5 ; $F5-$F6 pointer to keyboard lookup table
!addr RIBUF = $F7 ; $F7-$F8 -- WIP -- RS-232 receive buffer pointer
!addr ROBUF = $F9 ; $F9-$FA -- WIP -- RS-232 send buffer pointer
; $FB $FB-$FE -- UNUSED -- free for user software
!addr BASZPT = $FF ; -- NOT IMPLEMENTED --
.label FNLEN = $B7 // current file name length
.label LA = $B8 // current logical_file number
.label SA = $B9 // current secondary address
.label FA = $BA // current device number
.label FNADDR = $BB // $BB-$BC current file name pointer
.label ROPRTY = $BD // -- NOT IMPLEMENTED -- tape / RS-232 temporary storage
.label FSBLK = $BE // -- NOT IMPLEMENTED -- tape / RS-232 temporary storage
.label MYCH = $BF // -- NOT IMPLEMENTED --
.label CAS1 = $C0 // tape motor interlock
.label STAL = $C1 // $C1-$C2 LOAD/SAVE start address
.label MEMUSS = $C3 // $C3-$C4 temporary address for tape LOAD/SAVE
.label LSTX = $C5 // last key matrix position [!] our usage probably differs in details
.label NDX = $C6 // number of chars in keyboard buffer
.label RVS = $C7 // flag, whether to print reversed characters
.label INDX = $C8 // end of logical line (column, 0-79)
.label LSXP = $C9 // $C9-$CA start of input, X/Y position (typo in Mapping the C64, fixed in Mapping the C128)
.label SFDX = $CB // -- NOT IMPLEMENTED --
.label BLNSW = $CC // cursor blink disable flag
.label BLNCT = $CD // cursor blink countdown
.label GDBLN = $CE // cursor saved character
.label BLNON = $CF // cursor visibility flag
.label CRSW = $D0 // whether to input from screen or keyboard (if from screen, stores input offset)
.label PNT = $D1 // $D1-$D2 pointer to the current screen line
.label PNTR = $D3 // current screen X position (logical column), 0-79
.label QTSW = $D4 // quote mode flag
.label LNMX = $D5 // logical line length, 39 or 79
.label TBLX = $D6 // current screen Y position (row), 0-24
.label SCHAR = $D7 // ASCII value of the last printed character
.label INSRT = $D8 // insert mode flag/counter
.label LDTB1 = $D9 // $D9-$F2 screen line link table, [!] our usage is different XXX give more details
.label USER = $F3 // $F3-$F4 pointer to current color RAM location
.label KEYTAB = $F5 // $F5-$F6 pointer to keyboard lookup table
.label RIBUF = $F7 // $F7-$F8 -- WIP -- RS-232 receive buffer pointer
.label ROBUF = $F9 // $F9-$FA -- WIP -- RS-232 send buffer pointer
// $FB $FB-$FE -- UNUSED -- free for user software
.label BASZPT = $FF // -- NOT IMPLEMENTED --
;
; Page 1
;
//
// Page 1
//
!addr STACK = $100 ; $100-$1FF, processor stack
.label STACK = $100 // $100-$1FF, processor stack
//
// Pages 2 & 3
//
;
; Pages 2 & 3
;
.label BUF = $200 // $200-$250, BASIC line editor input buffer (81 bytes)
!addr BUF = $200 ; $200-$250, BASIC line editor input buffer (81 bytes)
// $250-$258 is the 81st - 88th characters in BASIC input, a carry over from VIC-20
// and not used on C64 - they are used if CONFIG_LEGACY_SCNKEY is enabled.
; $250-$258 is the 81st - 88th characters in BASIC input, a carry over from VIC-20
; and not used on C64 - they are used if CONFIG_LEGACY_SCNKEY is enabled.
// [!] XXX document $251-$258 usage
.label LAT = $259 // $259-$262, logical file numbers (table, 10 bytes)
.label FAT = $263 // $263-$26C, device numbers (table, 10 bytes)
.label SAT = $26D // $26D-$276, secondary addresses (table, 10 bytes)
.label KEYD = $277 // $277-$280, keyboard buffer
.label MEMSTR = $281 // $281-$282, start of BASIC memory
.label MEMSIZK = $283 // $283-$284, NOTE: Mapping the 64 erroneously has the hex as $282 (DEC is correct)
.label TIMOUT = $285 // IEEE-488 timeout
.label COLOR = $286 // current text foreground color
.label GDCOL = $287 // color of character under cursor
.label HIBASE = $288 // high byte of start of screen
.label XMAX = $289 // max keyboard buffer size
.label RPTFLG = $28A // whether to repeat keys (highest bit set = repeat)
.label KOUNT = $28B // key repeat counter
.label DELAY = $28C // -- NOT IMPLEMENTED --
.label SHFLAG = $28D // bucky keys (SHIFT/CTRL/C=) flags
.label LSTSHF = $28E // last bucky key flags
.label KEYLOG = $28F // $28F-$290 routine to setup keyboard decoding
.label MODE = $291 // flag, is case switch allowed
.label AUTODN = $292 // -- NOT IMPLEMENTED -- screen scroll disable
#if !CONFIG_LEGACY_SCNKEY
.label M51CRT = $293 // -- NOT IMPLEMENTED -- mock 6551
.label M51CDR = $294 // -- NOT IMPLEMENTED -- mock 6551
.label M51AJB = $295 // $295-$296 -- NOT IMPLEMENTED -- mock 6551
.label RSSTAT = $297 // -- WIP -- (UP9600 only) mock 6551, RS-232 status
.label BITNUM = $298 // -- NOT IMPLEMENTED --
.label BAUDOF = $299 // $299-$29A -- NOT IMPLEMENTED --
#endif
.label RIDBE = $29B // -- WIP -- write pointer into RS-232 receive buffer
.label RIDBS = $29C // -- WIP -- read pointer into RS-232 receive buffer
.label RODBS = $29D // -- WIP -- read pointer into RS-232 send buffer
.label RODBE = $29E // -- WIP -- write pointer into RS-232 send buffer
.label IRQTMP = $29F // $29F-$2A0 temporary IRQ vector storage [!] we use it for tape speed calibration instead
.label ENABL = $2A1 // -- NOT IMPLEMENTED --
.label TODSNS = $2A2 // -- NOT IMPLEMENTED --
.label TRDTMP = $2A3 // -- NOT IMPLEMENTED --
.label TD1IRQ = $2A4 // -- NOT IMPLEMENTED --
.label TLNIDX = $2A5 // -- NOT IMPLEMENTED --
.label TVSFLG = $2A6 // 0 = NTSC, 1 = PAL
; [!] XXX document $251-$258 usage
!addr LAT = $259 ; $259-$262, logical file numbers (table, 10 bytes)
!addr FAT = $263 ; $263-$26C, device numbers (table, 10 bytes)
!addr SAT = $26D ; $26D-$276, secondary addresses (table, 10 bytes)
!addr KEYD = $277 ; $277-$280, keyboard buffer
!addr MEMSTR = $281 ; $281-$282, start of BASIC memory
!addr MEMSIZK = $283 ; $283-$284, NOTE: Mapping the 64 erroneously has the hex as $282 (DEC is correct)
!addr TIMOUT = $285 ; IEEE-488 timeout
!addr COLOR = $286 ; current text foreground color
!addr GDCOL = $287 ; color of character under cursor
!addr HIBASE = $288 ; high byte of start of screen
!addr XMAX = $289 ; max keyboard buffer size
!addr RPTFLG = $28A ; whether to repeat keys (highest bit set = repeat)
!addr KOUNT = $28B ; key repeat counter
!addr DELAY = $28C ; -- NOT IMPLEMENTED --
!addr SHFLAG = $28D ; bucky keys (SHIFT/CTRL/C=) flags
!addr LSTSHF = $28E ; last bucky key flags
!addr KEYLOG = $28F ; $28F-$290 routine to setup keyboard decoding
!addr MODE = $291 ; flag, is case switch allowed
!addr AUTODN = $292 ; -- NOT IMPLEMENTED -- screen scroll disable
!ifndef CONFIG_LEGACY_SCNKEY {
!addr M51CRT = $293 ; -- NOT IMPLEMENTED -- mock 6551
!addr M51CDR = $294 ; -- NOT IMPLEMENTED -- mock 6551
!addr M51AJB = $295 ; $295-$296 -- NOT IMPLEMENTED -- mock 6551
!addr RSSTAT = $297 ; -- WIP -- (UP9600 only) mock 6551, RS-232 status
!addr BITNUM = $298 ; -- NOT IMPLEMENTED --
!addr BAUDOF = $299 ; $299-$29A -- NOT IMPLEMENTED --
}
!addr RIDBE = $29B ; -- WIP -- write pointer into RS-232 receive buffer
!addr RIDBS = $29C ; -- WIP -- read pointer into RS-232 receive buffer
!addr RODBS = $29D ; -- WIP -- read pointer into RS-232 send buffer
!addr RODBE = $29E ; -- WIP -- write pointer into RS-232 send buffer
!addr IRQTMP = $29F ; $29F-$2A0 temporary IRQ vector storage [!] we use it for tape speed calibration instead
!addr ENABL = $2A1 ; -- NOT IMPLEMENTED --
!addr TODSNS = $2A2 ; -- NOT IMPLEMENTED --
!addr TRDTMP = $2A3 ; -- NOT IMPLEMENTED --
!addr TD1IRQ = $2A4 ; -- NOT IMPLEMENTED --
!addr TLNIDX = $2A5 ; -- NOT IMPLEMENTED --
!addr TVSFLG = $2A6 ; 0 = NTSC, 1 = PAL
// [!] $2A7-$2FF is normally free, but in our case some extra functionality uses it
; [!] $2A7-$2FF is normally free, but in our case some extra functionality uses it
#if CONFIG_MEMORY_MODEL_60K
!ifdef CONFIG_MEMORY_MODEL_60K {
// IRQs are disabled when doing such accesses, and a default NMI handler only increments
// a counter, so that if an NMI occurs, it does not crash the machine, but can be captured.
; IRQs are disabled when doing such accesses, and a default NMI handler only increments
; a counter, so that if an NMI occurs, it does not crash the machine, but can be captured.
.label missed_nmi_flag = $2A7
.label tiny_nmi_handler = $2A8
.label peek_under_roms = tiny_nmi_handler + peek_under_roms_routine - tiny_nmi_handler_routine
.label poke_under_roms = tiny_nmi_handler + poke_under_roms_routine - tiny_nmi_handler_routine
.label memmap_allram = tiny_nmi_handler + memmap_allram_routine - tiny_nmi_handler_routine
.label memmap_normal = tiny_nmi_handler + memmap_normal_routine - tiny_nmi_handler_routine
#if SEGMENT_BASIC
.label shift_mem_up_internal = tiny_nmi_handler + shift_mem_up_routine - tiny_nmi_handler_routine
.label shift_mem_down_internal = tiny_nmi_handler + shift_mem_down_routine - tiny_nmi_handler_routine
#endif
!addr missed_nmi_flag = $2A7
!addr tiny_nmi_handler = $2A8
!addr peek_under_roms = tiny_nmi_handler + peek_under_roms_routine - tiny_nmi_handler_routine
!addr poke_under_roms = tiny_nmi_handler + poke_under_roms_routine - tiny_nmi_handler_routine
!addr memmap_allram = tiny_nmi_handler + memmap_allram_routine - tiny_nmi_handler_routine
!addr memmap_normal = tiny_nmi_handler + memmap_normal_routine - tiny_nmi_handler_routine
!ifdef SEGMENT_BASIC {
!addr shift_mem_up_internal = tiny_nmi_handler + shift_mem_up_routine - tiny_nmi_handler_routine
!addr shift_mem_down_internal = tiny_nmi_handler + shift_mem_down_routine - tiny_nmi_handler_routine
}
#endif // CONFIG_MEMORY_MODEL_60K
} ; CONFIG_MEMORY_MODEL_60K
// BASIC vectors
.label IERROR = $300 // $300-$301
.label IMAIN = $302 // $302-$303
.label ICRNCH = $304 // $304-$305
.label IQPLOP = $306 // $306-$307
.label IGONE = $308 // $308-$309
.label IEVAL = $30A // $30A-$30B
; BASIC vectors
!addr IERROR = $300 ; $300-$301
!addr IMAIN = $302 ; $302-$303
!addr ICRNCH = $304 ; $304-$305
!addr IQPLOP = $306 ; $306-$307
!addr IGONE = $308 ; $308-$309
!addr IEVAL = $30A ; $30A-$30B
.label SAREG = $30C // .A storage, for SYS call
.label SXREG = $30D // .X storage, for SYS call
.label SYREG = $30E // .Y storage, for SYS call
.label SPREG = $30F // .P storage, for SYS call
!addr SAREG = $30C ; .A storage, for SYS call
!addr SXREG = $30D ; .X storage, for SYS call
!addr SYREG = $30E ; .Y storage, for SYS call
!addr SPREG = $30F ; .P storage, for SYS call
.label USRPOK = $310 // -- NOT IMPLEMENTED -- JMP instruction
.label USRADD = $311 // $311-$312 -- NOT IMPLEMENTED --
// $313 -- UNUSED -- free for user software
!addr USRPOK = $310 ; -- NOT IMPLEMENTED -- JMP instruction
!addr USRADD = $311 ; $311-$312 -- NOT IMPLEMENTED --
; $313 -- UNUSED -- free for user software
// Kernal vectors - interrupts
.label CINV = $314 // $314-$315
.label CBINV = $316 // $316-$317
.label NMINV = $318 // $318-$319
; Kernal vectors - interrupts
!addr CINV = $314 ; $314-$315
!addr CBINV = $316 ; $316-$317
!addr NMINV = $318 ; $318-$319
// Kernal vectors - routines
.label IOPEN = $31A // $31A-$31B
.label ICLOSE = $31C // $31C-$31D
.label ICHKIN = $31E // $31E-$31F
.label ICKOUT = $320 // $320-$321
.label ICLRCH = $322 // $322-$323
.label IBASIN = $324 // $324-$325
.label IBSOUT = $326 // $326-$327
.label ISTOP = $328 // $328-$329
.label IGETIN = $32A // $32A-$32B
.label ICLALL = $32C // $32C-$32D
.label USRCMD = $32E // $32E-$32F
.label ILOAD = $330 // $330-$331
.label ISAVE = $332 // $332-$333
; Kernal vectors - routines
!addr IOPEN = $31A ; $31A-$31B
!addr ICLOSE = $31C ; $31C-$31D
!addr ICHKIN = $31E ; $31E-$31F
!addr ICKOUT = $320 ; $320-$321
!addr ICLRCH = $322 ; $322-$323
!addr IBASIN = $324 ; $324-$325
!addr IBSOUT = $326 ; $326-$327
!addr ISTOP = $328 ; $328-$329
!addr IGETIN = $32A ; $32A-$32B
!addr ICLALL = $32C ; $32C-$32D
!addr USRCMD = $32E ; $32E-$32F
!addr ILOAD = $330 ; $330-$331
!addr ISAVE = $332 ; $332-$333
// $314 $334-$33B -- UNUSED -- free for user software
; $314 $334-$33B -- UNUSED -- free for user software
#if !CONFIG_RS232_UP9600
.label TBUFFR = $33C // $33C-$3FB [!] tape buffer, our usage details differ
#else
.label REVTAB = $37C // $37C-$3FB -- WIP -- [!] RS-232 precalculated data
#endif
!ifndef CONFIG_RS232_UP9600 {
!addr TBUFFR = $33C ; $33C-$3FB [!] tape buffer, our usage details differ
} else {
!addr REVTAB = $37C ; $37C-$3FB -- WIP -- [!] RS-232 precalculated data
}
// $3FC $3FC-$3FF -- UNUSED -- free for user software
; $3FC $3FC-$3FF -- UNUSED -- free for user software
//
// Definitions for extended IEC functionality
//
;
; Definitions for extended IEC functionality
;
.const IEC_NORMAL = 0 // has to be 0, always!
#if CONFIG_IEC_JIFFYDOS
.const IEC_JIFFY = 1 // has to be 1, always!
#endif
#if CONFIG_IEC_DOLPHINDOS
.const IEC_DOLPHIN = 2
#endif
#if CONFIG_IEC_BURST_CIA1 || CONFIG_IEC_BURST_CIA2 || ROM_LAYOUT_M65
.const IEC_BURST = 3
#endif
#if ROM_LAYOUT_M65
.const IEC_ROMDOS = 4
#endif
!set IEC_NORMAL = 0 ; has to be 0, always!
!ifdef CONFIG_IEC_JIFFYDOS {
!set IEC_JIFFY = 1 ; has to be 1, always!
}
!ifdef CONFIG_IEC_DOLPHINDOS {
!set IEC_DOLPHIN = 2
}
!ifdef HAS_IEC_BURST {
!set IEC_BURST = 3
}
!ifdef CONFIG_MB_M65 {
!set IEC_ROMDOS = 4
}
//
// Definitions for tape functionality
//
;
; Definitions for tape functionality
;
#if CONFIG_TAPE_NORMAL || CONFIG_TAPE_TURBO
!ifdef HAS_TAPE {
.label __normal_time_S = IRQTMP+0 // duration of the short pulse
.label __normal_time_M = IRQTMP+1 // duration of the medium pulse
!addr __normal_time_S = IRQTMP+0 ; duration of the short pulse
!addr __normal_time_M = IRQTMP+1 ; duration of the medium pulse
.label __turbo_half_S = IRQTMP+0 // half-duration of the short pulse
.label __turbo_half_L = IRQTMP+1 // half-duration of the long pulse
!addr __turbo_half_S = IRQTMP+0 ; half-duration of the short pulse
!addr __turbo_half_L = IRQTMP+1 ; half-duration of the long pulse
.label __pulse_threshold = SVXT // pulse classification threshold
.label __pulse_threshold_ML = SYNO // M/L pulse classification threshold, for normal only
!addr __pulse_threshold = SVXT ; pulse classification threshold
!addr __pulse_threshold_ML = SYNO ; M/L pulse classification threshold, for normal only
}
#endif
!ifdef CONFIG_TAPE_TURBO {
#if CONFIG_TAPE_TURBO
.label __tape_turbo_bytestore = STACK // location of byte storage helper routine
#endif
!addr __tape_turbo_bytestore = STACK ; location of byte storage helper routine
}
src/aliases/,aliases_ram_lowmem_m65.s
+61 -61
View File
@@ -1,76 +1,76 @@
// #LAYOUT# M65 * #TAKE
// #LAYOUT# * * #IGNORE
;; #LAYOUT# M65 * #TAKE
;; #LAYOUT# * * #IGNORE
//
// Names of ZP and low memory locations for the native MEGA65 mode
//
;
; Names of ZP and low memory locations for the native MEGA65 mode
;
//
// Page 0 - reused LDTB1 and USER
//
;
; Page 0 - reused LDTB1 and USER
;
.label M65_TMP__K1 = $D9 // $D9 -- UNUSED -- temporary value for various Kernal routines
.label M65_LPNT_BAS1 = $DA // $DA-$DD 4-byte pointer for temporary usage within BASIC
.label M65_LPNT_BAS2 = $DE // $DE-$E1 4-byte pointer for temporary usage within BASIC
.label M65_LPNT_SCR = $E2 // $E2-$E5 4-byte pointer for temporary usage within BASIC and screen editor
// E6 reserved for BASIC error handling routines, also in native mode
.label M65_MAGICSTR = $E7 // $E7-$E9 if equals 'M65' it means we are in native mode
// EA reserved for BASIC error handling routines, also in native mode
.label M65_LPNT_IRQ = $EB // $EB-$EE 4-byte pointer for temporary usage within interrupts
.label M65_LPNT_KERN = $EF // $EF-$F3 4-byte pointer for temporary usage by KERNAL
.label M65_TMP__K2 = $F4 // $F4 -- UNUSED -- temporary value for various Kernal routines
!addr M65_TMP__K1 = $D9 ; $D9 -- UNUSED -- temporary value for various Kernal routines
!addr M65_LPNT_BAS1 = $DA ; $DA-$DD 4-byte pointer for temporary usage within BASIC
!addr M65_LPNT_BAS2 = $DE ; $DE-$E1 4-byte pointer for temporary usage within BASIC
!addr M65_LPNT_SCR = $E2 ; $E2-$E5 4-byte pointer for temporary usage within BASIC and screen editor
; E6 reserved for BASIC error handling routines, also in native mode
!addr M65_MAGICSTR = $E7 ; $E7-$E9 if equals 'M65' it means we are in native mode
; EA reserved for BASIC error handling routines, also in native mode
!addr M65_LPNT_IRQ = $EB ; $EB-$EE 4-byte pointer for temporary usage within interrupts
!addr M65_LPNT_KERN = $EF ; $EF-$F3 4-byte pointer for temporary usage by KERNAL
!addr M65_TMP__K2 = $F4 ; $F4 -- UNUSED -- temporary value for various Kernal routines
//
// Page 0 - other reused values
//
;
; Page 0 - other reused values
;
.label M65__TXTROW = TBLX // screen row
.label M65__TXTCOL = PNTR // screen column
.label M65__SCRINPUT = LSXP // pointer to the screen input, within the screen segment
!addr M65__TXTROW = TBLX ; screen row
!addr M65__TXTCOL = PNTR ; screen column
!addr M65__SCRINPUT = LSXP ; pointer to the screen input, within the screen segment
//
// Pages 4-7 - reused screen memory
//
;
; Pages 4-7 - reused screen memory
;
// $400-$57F - reserved for BASIC
; $400-$57F - reserved for BASIC
// $400-$57F -- UNUSED -- reserved for BASIC
; $400-$57F -- UNUSED -- reserved for BASIC
// $580-$5FF - reserved for KERNAL
; $580-$5FF - reserved for KERNAL
.label M65_SCRSEG = $580 // $580-$581 segment address (2 higher bytes) of the screen memory
.label M65_SCRBASE = $582 // $582-$583 first byte of screen memory
.label M65_SCRGUARD = $584 // $584-$585 last byte of screen memory + 1 XXX is it needed?
.label M65_COLGUARD = $586 // $586-$587 last byte of colour memory + 1
.label M65_COLVIEW = $588 // $588-$589 first byte of color memory viewport
.label M65_COLVIEWMAX = $58A // $58A-$58B largest allowed value of M65_COLVIEW
.label M65_SCRMODE = $58C // 0 = 40x25, 1 = 80x25, 2 = 80x50
.label M65_SCRWINMODE = $58D // $00 = normal mode, $FF = window enabled
.label M65_TXTWIN_X0 = $58E // text window - top-left X coordinate, starting from 0
.label M65_TXTWIN_Y0 = $58F // text window - top-left Y coordinate, starting from 0
.label M65_TXTWIN_X1 = $590 // text window - bottom-right X coordinate + 1
.label M65_TXTWIN_Y1 = $591 // text window - bottom-right Y coordinate + 1
.label M65_TXTROW_OFF = $592 // $592-$593 offset to the current text row from the viewport start
.label M65_SCRCOLMAX = $594 // maximum allowed column
// $595-$5EB -- UNUSED --
.label M65_DMAGIC_LIST = $5EF // $5EF-$5FF reserved for DMAgic list, 17 bytes
.label M65_RS232_INBUF = $600 // $600-$6FF -- reserved for RS-232 input buffer --
.label M65_RS232_OUTBUF = $700 // $700-$7FF -- reserved for RS-232 output buffer --
!addr M65_SCRSEG = $580 ; $580-$581 segment address (2 higher bytes) of the screen memory
!addr M65_SCRBASE = $582 ; $582-$583 first byte of screen memory
!addr M65_SCRGUARD = $584 ; $584-$585 last byte of screen memory + 1 XXX is it needed?
!addr M65_COLGUARD = $586 ; $586-$587 last byte of colour memory + 1
!addr M65_COLVIEW = $588 ; $588-$589 first byte of color memory viewport
!addr M65_COLVIEWMAX = $58A ; $58A-$58B largest allowed value of M65_COLVIEW
!addr M65_SCRMODE = $58C ; 0 = 40x25, 1 = 80x25, 2 = 80x50
!addr M65_SCRWINMODE = $58D ; $00 = normal mode, $FF = window enabled
!addr M65_TXTWIN_X0 = $58E ; text window - top-left X coordinate, starting from 0
!addr M65_TXTWIN_Y0 = $58F ; text window - top-left Y coordinate, starting from 0
!addr M65_TXTWIN_X1 = $590 ; text window - bottom-right X coordinate + 1
!addr M65_TXTWIN_Y1 = $591 ; text window - bottom-right Y coordinate + 1
!addr M65_TXTROW_OFF = $592 ; $592-$593 offset to the current text row from the viewport start
!addr M65_SCRCOLMAX = $594 ; maximum allowed column
; $595-$5EB -- UNUSED --
!addr M65_DMAGIC_LIST = $5EF ; $5EF-$5FF reserved for DMAgic list, 17 bytes
!addr M65_RS232_INBUF = $600 ; $600-$6FF -- reserved for RS-232 input buffer --
!addr M65_RS232_OUTBUF = $700 ; $700-$7FF -- reserved for RS-232 output buffer --
//
// Addresses for configuring the DMA job
//
;
; Addresses for configuring the DMA job
;
.label M65_DMAJOB_SIZE_0 = M65_DMAGIC_LIST + 7
.label M65_DMAJOB_SIZE_1 = M65_DMAGIC_LIST + 8
!addr M65_DMAJOB_SIZE_0 = M65_DMAGIC_LIST + 7
!addr M65_DMAJOB_SIZE_1 = M65_DMAGIC_LIST + 8
.label M65_DMAJOB_SRC_0 = M65_DMAGIC_LIST + 9
.label M65_DMAJOB_SRC_1 = M65_DMAGIC_LIST + 10
.label M65_DMAJOB_SRC_2 = M65_DMAGIC_LIST + 11
.label M65_DMAJOB_SRC_3 = M65_DMAGIC_LIST + 2
!addr M65_DMAJOB_SRC_0 = M65_DMAGIC_LIST + 9
!addr M65_DMAJOB_SRC_1 = M65_DMAGIC_LIST + 10
!addr M65_DMAJOB_SRC_2 = M65_DMAGIC_LIST + 11
!addr M65_DMAJOB_SRC_3 = M65_DMAGIC_LIST + 2
.label M65_DMAJOB_DST_0 = M65_DMAGIC_LIST + 12
.label M65_DMAJOB_DST_1 = M65_DMAGIC_LIST + 13
.label M65_DMAJOB_DST_2 = M65_DMAGIC_LIST + 14
.label M65_DMAJOB_DST_3 = M65_DMAGIC_LIST + 4
!addr M65_DMAJOB_DST_0 = M65_DMAGIC_LIST + 12
!addr M65_DMAJOB_DST_1 = M65_DMAGIC_LIST + 13
!addr M65_DMAJOB_DST_2 = M65_DMAGIC_LIST + 14
!addr M65_DMAJOB_DST_3 = M65_DMAGIC_LIST + 4
src/aliases/,aliases_ram_over64K_m65.s
+17 -17
View File
@@ -1,24 +1,24 @@
// #LAYOUT# M65 * #TAKE
// #LAYOUT# * * #IGNORE
;; #LAYOUT# M65 * #TAKE
;; #LAYOUT# * * #IGNORE
// XXX target High RAM memory map concept - TODO: update current code
; XXX target High RAM memory map concept - TODO: update current code
// $10000-$17FFF (32KB) - reserved for DOS
// $18000-$18FFF (4KB) - chargen copied to RAM, to allow character redefinition
; $10000-$17FFF (32KB) - reserved for DOS
; $18000-$18FFF (4KB) - chargen copied to RAM, to allow character redefinition
.const MEMCONF_CHRBASE = $8000
!set MEMCONF_CHRBASE = $8000
// $19000-$1B7FF (10KB) - reserved for virtual text screen, 80x128
; $19000-$1B7FF (10KB) - reserved for virtual text screen, 80x128
.const MEMCONF_SCRBASE = $9000
.const MEMCONF_SCRROWS = 128
!set MEMCONF_SCRBASE = $9000
!set MEMCONF_SCRROWS = 128
// $1B800-$1DFFF (10KB) - reserved for a color RAM backup when switchin between text/graphics modes
// (4KB) - reserved for sprites
// (2KB) - reserved for future use
// (2KB) - color RAM mirror, not useable
// $20000-$2FFFF (64KB) - ROM, the essential part
// $30000-$4FFFF (64KB) - ROM, additions
// $50000-$57FFF (32KB) - reserved for graphics screen
// $58000-... - extended BASIC variables, RAM disk, etc.
; $1B800-$1DFFF (10KB) - reserved for a color RAM backup when switchin between text/graphics modes
; (4KB) - reserved for sprites
; (2KB) - reserved for future use
; (2KB) - color RAM mirror, not useable
; $20000-$2FFFF (64KB) - ROM, the essential part
; $30000-$4FFFF (64KB) - ROM, additions
; $50000-$57FFF (32KB) - reserved for graphics screen
; $58000-... - extended BASIC variables, RAM disk, etc.
src/aliases/,aliases_rom_basic.s
+8 -9
View File
@@ -1,15 +1,14 @@
// BASIC startup vectors
; BASIC startup vectors
#if ROM_LAYOUT_X16
!ifdef CONFIG_PLATFORM_COMMANDER_X16 {
.label IBASIC_COLD_START = $C000
.label IBASIC_WARM_START = $C002
!addr IBASIC_COLD_START = $C000
!addr IBASIC_WARM_START = $C002
#else
} else {
.label IBASIC_COLD_START = $A000
.label IBASIC_WARM_START = $A002
#endif
!addr IBASIC_COLD_START = $A000
!addr IBASIC_WARM_START = $A002
}
src/aliases/,aliases_rom_cart.s
+6 -7
View File
@@ -1,10 +1,9 @@
#if CONFIG_PLATFORM_COMMODORE_64
!ifdef CONFIG_PLATFORM_COMMODORE_64 {
// Cartridge ROM locations
; Cartridge ROM locations
.label ICART_COLD_START = $8000 // $8000-$8001, cartridge cold start vector
.label ICART_WARM_START = $8002 // $8002-$8003, cartridge warm start vector (RESTORE key)
.label CART_SIG = $8004 // $8004-$8008, signature for cartridge detection
#endif
!addr ICART_COLD_START = $8000 ; $8000-$8001, cartridge cold start vector
!addr ICART_WARM_START = $8002 ; $8002-$8003, cartridge warm start vector (RESTORE key)
!addr CART_SIG = $8004 ; $8004-$8008, signature for cartridge detection
}
src/aliases/,aliases_rom_kernal.s
+42 -42
View File
@@ -1,44 +1,44 @@
// #LAYOUT# * BASIC_1 #IGNORE
// #LAYOUT# * * #TAKE
;; #LAYOUT# * BASIC_1 #IGNORE
;; #LAYOUT# * * #TAKE
// Kernal jump table
; Kernal jump table
.label JCINT = $FF81
.label JIOINIT = $FF84
.label JRAMTAS = $FF87
.label JRESTOR = $FF8A
.label JVECTOR = $FF8D
.label JSETMSG = $FF90
.label JSECOND = $FF93
.label JTKSA = $FF96
.label JMEMTOP = $FF99
.label JMEMBOT = $FF9C
.label JSCNKEY = $FF9F
.label JSETTMO = $FFA2
.label JACPTR = $FFA5
.label JCIOUT = $FFA8
.label JUNTLK = $FFAB
.label JUNLSN = $FFAE
.label JLISTEN = $FFB1
.label JTALK = $FFB4
.label JREADST = $FFB7
.label JSETFLS = $FFBA
.label JSETNAM = $FFBD
.label JOPEN = $FFC0
.label JCLOSE = $FFC3
.label JCHKIN = $FFC6
.label JCKOUT = $FFC9
.label JCLRCHN = $FFCC
.label JCHRIN = $FFCF
.label JCHROUT = $FFD2
.label JLOAD = $FFD5
.label JSAVE = $FFD8
.label JSETTIM = $FFDB
.label JRDTIM = $FFDE
.label JSTOP = $FFE1
.label JGETIN = $FFE4
.label JCLALL = $FFE7
.label JUDTIM = $FFEA
.label JSCREEN = $FFED
.label JPLOT = $FFF0
.label JIOBASE = $FFF3
!addr JCINT = $FF81
!addr JIOINIT = $FF84
!addr JRAMTAS = $FF87
!addr JRESTOR = $FF8A
!addr JVECTOR = $FF8D
!addr JSETMSG = $FF90
!addr JSECOND = $FF93
!addr JTKSA = $FF96
!addr JMEMTOP = $FF99
!addr JMEMBOT = $FF9C
!addr JSCNKEY = $FF9F
!addr JSETTMO = $FFA2
!addr JACPTR = $FFA5
!addr JCIOUT = $FFA8
!addr JUNTLK = $FFAB
!addr JUNLSN = $FFAE
!addr JLISTEN = $FFB1
!addr JTALK = $FFB4
!addr JREADST = $FFB7
!addr JSETFLS = $FFBA
!addr JSETNAM = $FFBD
!addr JOPEN = $FFC0
!addr JCLOSE = $FFC3
!addr JCHKIN = $FFC6
!addr JCKOUT = $FFC9
!addr JCLRCHN = $FFCC
!addr JCHRIN = $FFCF
!addr JCHROUT = $FFD2
!addr JLOAD = $FFD5
!addr JSAVE = $FFD8
!addr JSETTIM = $FFDB
!addr JRDTIM = $FFDE
!addr JSTOP = $FFE1
!addr JGETIN = $FFE4
!addr JCLALL = $FFE7
!addr JUDTIM = $FFEA
!addr JSCREEN = $FFED
!addr JPLOT = $FFF0
!addr JIOBASE = $FFF3