1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-27 14:58:06 +11:00

z80a: de-variable-ize

Use straight VARIABLE instead of Z80MEM+. Initially, I used this
system to allow z80a to be embedded in a system binary, but now
I don't think it's worth it. Compiled, z80a is 2.5k. Sure, it's a
sizeable amount of RAM, but I think that even with it in RAM, I'll
manage a bootstrap within my most constrained machine, the SMS with
8K.
This commit is contained in:
Virgil Dupras 2020-05-14 15:22:32 -04:00
parent 3fbae082f4
commit bf289b0a67
4 changed files with 5 additions and 9 deletions

View File

@ -5,7 +5,7 @@ RAMSTART FUTURE USES +3c BLK(*
+08 C<* override +53 (emit) override +08 C<* override +53 (emit) override
+0a NLPTR +55 (key) override +0a NLPTR +55 (key) override
+0c C<* +57 FUTURE USES +0c C<* +57 FUTURE USES
+0e WORDBUF +5b z80a's variables +0e WORDBUF
+2e BOOT C< PTR +5d adev's variables +2e BOOT C< PTR +5d adev's variables
+30 IN> +5f FUTURE USES +30 IN> +5f FUTURE USES
+32 IN(* +70 DRIVERS +32 IN(* +70 DRIVERS

View File

@ -1,2 +1 @@
1 LOAD+ Z80A$ 1 37 LOADR+
3 37 LOADR+

View File

@ -1,9 +1,6 @@
: Z80AMEM+ 0x5b RAM+ @ + ; VARIABLE ORG
: ORG 0 Z80AMEM+ ; VARIABLE BIN( 0 BIN( !
: BIN( 2 Z80AMEM+ ; VARIABLE L1 VARIABLE L2 VARIABLE L3 VARIABLE L4
: L1 4 Z80AMEM+ ; : L2 6 Z80AMEM+ ;
: L3 8 Z80AMEM+ ; : L4 10 Z80AMEM+ ;
: Z80A$ H@ 0x5b RAM+ ! 12 ALLOT 0 BIN( ! ;
: A 7 ; : B 0 ; : C 1 ; : D 2 ; : A 7 ; : B 0 ; : C 1 ; : D 2 ;
: E 3 ; : H 4 ; : L 5 ; : (HL) 6 ; : E 3 ; : H 4 ; : L 5 ; : (HL) 6 ;
: BC 0 ; : DE 1 ; : HL 2 ; : AF 3 ; : SP AF ; : BC 0 ; : DE 1 ; : HL 2 ; : AF 3 ; : SP AF ;

Binary file not shown.