From d801f0fbf3d97aa43a17e3ac6563dd6f3631a2a0 Mon Sep 17 00:00:00 2001 From: dimitrit Date: Tue, 19 Jan 2021 09:58:40 +0000 Subject: [PATCH] figforth can be built using uz80as --- README.md | 19 +++++++++++-------- figforth.asm | 6 +++--- 2 files changed, 14 insertions(+), 11 deletions(-) diff --git a/README.md b/README.md index ec03d0a..31770ac 100644 --- a/README.md +++ b/README.md @@ -8,7 +8,9 @@ A fig-FORTH2 implementation for the Z80 that can be built using TASM< $ tasm -80 -b figforth.asm forth.com forth.lst ``` -The resulting `forth.com` executable can be run in CP/M. For example4: +Alternatively, non-Windows users can use the `uz80as`4 Z80 compiler. + +The resulting `forth.com` executable can be run in CP/M. For example5: ``` A>FORTH ↵ @@ -25,7 +27,7 @@ A> ``` ## Custom Words -This fig-FORTH implementation includes the following custom words5: +This fig-FORTH implementation includes the following custom words6: `(OF)`    ` n1 n2 --- n1 ` _(if no match)_       ` n1 n2 --- ` _(if there is a match)_ @@ -108,7 +110,7 @@ the next `ENDOF`. ## RomWBW extensions -Support for RomWBW HBIOS features6 is included when fig-FORTH +Support for RomWBW HBIOS features7 is included when fig-FORTH is built with the `-DROMWBW` flag: `.B`    ` n -- ` @@ -148,7 +150,7 @@ YMDHMS. Each byte is BCD encoded. ## fig-FORTH Editor -The fig-FORTH EDITOR7 is included in the `SCREENS.FTH` file: +The fig-FORTH EDITOR8 is included in the `SCREENS.FTH` file: ``` FILE SCREENS ↵ ok 7 12 INDEX ↵ @@ -213,7 +215,8 @@ easy to create illegal instructions, resulting in systems hangs or crashes. 1. C. H. Ting, _Systems Guide to figForth_, 3rd Edn (San Mateo, CA: Offete Enterprises, 2013), p. vi 2. William Ragsdale, _'fig-FORTH INSTALLATION MANUAL'_ (San Carlos, CA: FORTH INTEREST GROUP, 1980) 3. Thomas Anderson, _The Telemark Assembler (TASM) User's Manual (1998)_, Vintagecomputer [Accessed 14 December 2020] -4. John James, _‘What Is Forth? A Tutorial Introduction’_, in BYTE, 5.8 (1980), 100–26 -5. Charles Eaker, _'JUST IN CASE'_ in FORTH DIMENSIONS, II/3 (1980), 37-40 -6. Wayne Warthen, _RomWBW Architecture_, (RetroBrew Computers Group, 2020) -7. Bill Stoddart, _'EDITOR USER MANUAL'_, (London, UK: FIG United Kingdom, ND) +4. Jorge Giner, _uz80as - Micro Z80 Assembler_, Github [Accessed 19 January 2021] +5. John James, _‘What Is Forth? A Tutorial Introduction’_, in BYTE, 5.8 (1980), 100–26 +6. Charles Eaker, _'JUST IN CASE'_ in FORTH DIMENSIONS, II/3 (1980), 37-40 +7. Wayne Warthen, _RomWBW Architecture_, (RetroBrew Computers Group, 2020) +8. Bill Stoddart, _'EDITOR USER MANUAL'_, (London, UK: FIG United Kingdom, ND) diff --git a/figforth.asm b/figforth.asm index b6fc636..5fcb13f 100644 --- a/figforth.asm +++ b/figforth.asm @@ -3272,12 +3272,12 @@ PTSTO: .WORD $+2 JNEXT ; .EJECT -#INCLUDE DISCIO.ASM +#INCLUDE "DISCIO.ASM" .EJECT -#INCLUDE CONPRTIO.ASM +#INCLUDE "CONPRTIO.ASM" .EJECT #IFDEF ROMWBW -#INCLUDE ROMWBW.ASM +#INCLUDE "ROMWBW.ASM" PREVNFA .EQU BCD-5 #ELSE PREVNFA .EQU ARROW-6