Toddy Forth - a new ZX81 forth implementation
Re: Toddy Forth - a new ZX81 forth implementation
I have uploaded details of all this software now onto my page at: http://www.rwapsoftware.co.uk/zx81/zx81_software.html
I have probably made some errors about the hardware requirements - please let me know and I will correct them.
I have probably made some errors about the hardware requirements - please let me know and I will correct them.
Rich Mellor
RWAP Software
RWAP Adventures
SellMyRetro
Retro-Printer Module
Also Involved in:
Icephorm
RWAP Software
RWAP Adventures
SellMyRetro
Retro-Printer Module
Also Involved in:
Icephorm
Re: Toddy Forth - a new ZX81 forth implementation
Ok, follow the list:RWAP wrote:I can see that I need to update the page on the forums listing all the programs which use hi-res graphics
Can you clarify which scheme your software adaptations support please - see the definitions at the start of that topic.
Airport HR - UDG card mapped at 3000h
HiRes Galaxian - UDG card mapped at 3000h
HR PICTURES - this pack has two groups of programs.Those named HRLPTR*.p are intended to zx printer. The others (NU*.p) use the WRX scheme and needs a modified RAM pack.
Cartoons - use the WRX scheme and needs a modified RAM pack.
ZX81 Music Interpreter - standard zx81 (sound generated by sync pulses)
Clock - standard zx81
Pink Panther - zonx81 compatible sound board
Dancing Demon - zonx81 compatible sound board
QuickSilva games - UDG card with chr$128 scheme mapped at 3000h and zonx81 compatible sound board
Panic HR - UDG card with chr$128 scheme mapped at 3000h
Poker HR - UDG card mapped at 3000h
ZX81 Toddy Forth (and the others forths at page) - UDG card mapped at 3000h
Programs included in the Toddy Forth package:
tforth10-std - Toddy Forth for use with standard zx81, without UDG card
3DMAZE - UDG card with chr$128 scheme mapped at 3000h and zonx81 compatible sound board
Acemines - UDG card mapped at 3000h and zonx81 compatible sound board
Breakout - UDG card mapped at 3000h and zonx81 compatible sound board
Breakout-std - zonx81 compatible sound board
Calendar - standard zx81
Divn - standard zx81
Dump - standard zx81
Factorial - standard zx81
Hanoi - standard zx81
Mancala - standard zx81
Millipede - UDG card mapped at 3000h and zonx81 compatible sound board
Plot-test - standard zx81
Rotsom - standard zx81 (sound generated by sync pulses)
Sokoban - UDG card mapped at 3000h and zonx81 compatible sound board
Sudoku - UDG card mapped at 3000h and zonx81 compatible sound board
1 x ZX81, 2 x TK85 , 1 TK82C, 1 TK95, 1 x Alphacom 32 printer, 1 x ZXpand
ZeXtender board, Joy81 - Programmable Joystick Controller, Turbo Sound 81
http://zx81.eu5.org
https://toddysoftware.itch.io/
ZeXtender board, Joy81 - Programmable Joystick Controller, Turbo Sound 81
http://zx81.eu5.org
https://toddysoftware.itch.io/
Re: Toddy Forth - a new ZX81 forth implementation
1 x ZX81, 2 x TK85 , 1 TK82C, 1 TK95, 1 x Alphacom 32 printer, 1 x ZXpand
ZeXtender board, Joy81 - Programmable Joystick Controller, Turbo Sound 81
http://zx81.eu5.org
https://toddysoftware.itch.io/
ZeXtender board, Joy81 - Programmable Joystick Controller, Turbo Sound 81
http://zx81.eu5.org
https://toddysoftware.itch.io/
Re: Toddy Forth - a new ZX81 forth implementation
Hi,
the Artic Forth and the french book :
"Introduction au ZX Forth" de Marc Petreman et Michel Rousseau
are also available on http://zx81.ordi5.free.fr/k7/
Docs:
http://zx81.ordi5.free.fr/k7/download/Z ... anual.djvu
http://zx81.ordi5.free.fr/k7/download/Z ... anual.djvu
H4th rom docs.
http://zx81.ordi5.free.fr/dominique/dow ... h-h4th.pdf
Forth site :http://forthretro.new.fr
the Artic Forth and the french book :
"Introduction au ZX Forth" de Marc Petreman et Michel Rousseau
are also available on http://zx81.ordi5.free.fr/k7/
Docs:
http://zx81.ordi5.free.fr/k7/download/Z ... anual.djvu
http://zx81.ordi5.free.fr/k7/download/Z ... anual.djvu
H4th rom docs.
http://zx81.ordi5.free.fr/dominique/dow ... h-h4th.pdf
Forth site :http://forthretro.new.fr
Xavier ...on the Facebook groupe : "Zx81 France"(fr)
Re: Toddy Forth - a new ZX81 forth implementation
Brilliant work Kmurta!!kmurta wrote:I updates the page with more informations, take a look:
http://zx81.eu5.org/toddysofte.html
Especially the maths routines as that is where my interest lies.
If You ever write a prime number routine please please publish as I am only just getting to grips with this language.
Hi ZavsnapXavSnap wrote:Hi,
the Artic Forth and the french book :
"Introduction au ZX Forth" de Marc Petreman et Michel Rousseau
are also available on http://zx81.ordi5.free.fr/k7/
Docs:
http://zx81.ordi5.free.fr/k7/download/Z ... anual.djvu
http://zx81.ordi5.free.fr/k7/download/Z ... anual.djvu
H4th rom docs.
http://zx81.ordi5.free.fr/dominique/dow ... h-h4th.pdf
Forth site :http://forthretro.new.fr
The Artic Forth on Your site seems to be missing the editor screens, I tried the ones on zx81stuff.org but they don't work. is there a workaround for this?
Regards Moggy
Re: Toddy Forth - a new ZX81 forth implementation
Hi Kmurta
The two programs I am really interested in DIVN and FACTORALS have a FTH extention not p how do You load these into Eighty One??
Regards Moggy
EDIT TO POST
Sorry Kmurta just opened My eyes and seen the light I get it now!!!
A very dumb Moggy![Sad :(](./images/smilies/icon_e_sad.gif)
The two programs I am really interested in DIVN and FACTORALS have a FTH extention not p how do You load these into Eighty One??
Regards Moggy
EDIT TO POST
Sorry Kmurta just opened My eyes and seen the light I get it now!!!
A very dumb Moggy
![Sad :(](./images/smilies/icon_e_sad.gif)
Re: Toddy Forth - a new ZX81 forth implementation
Take a look at this code: http://rosettacode.org/wiki/Sieve_of_Eratosthenes#ForthMoggy wrote: If You ever write a prime number routine please please publish as I am only just getting to grips with this language.
To test it in the Toddy Forth, define the word ERASE:
Code: Select all
: ERASE ( addr n -- )
?DUP IF OVER + SWAP
DO 0 I C! LOOP
ELSE DROP
THEN
;
Oh, theres a problem with this code on Toddy Forth: the sieve table conflict with the PAD, so the prime number 67 isn't listed on output. To correct this, change the word HERE by PAD or, if you has more than 32K (not a problem with Eightyone), by 32768.
The changed code is:
Code: Select all
\ Sieve of Eratosthenes
\ Roseta Code - http://rosettacode.org/wiki/Sieve_of_Eratosthenes#Forth
: ERASE ( addr n -- )
?DUP IF OVER + SWAP
DO 0 I C! LOOP
ELSE DROP
THEN
;
: PRIME? ( N -- ? ) PAD + C@ 0= ;
: COMPOSITE! ( N -- ) PAD + 1 SWAP C! ;
: SIEVE ( N -- )
PAD OVER ERASE
2
BEGIN
2DUP DUP * >
WHILE
DUP PRIME? IF
2DUP DUP * DO
I COMPOSITE!
DUP +LOOP
THEN
1+
REPEAT
DROP
." PRIMES: " 2 DO I PRIME? IF I . THEN LOOP ;
1 x ZX81, 2 x TK85 , 1 TK82C, 1 TK95, 1 x Alphacom 32 printer, 1 x ZXpand
ZeXtender board, Joy81 - Programmable Joystick Controller, Turbo Sound 81
http://zx81.eu5.org
https://toddysoftware.itch.io/
ZeXtender board, Joy81 - Programmable Joystick Controller, Turbo Sound 81
http://zx81.eu5.org
https://toddysoftware.itch.io/
Re: Toddy Forth - a new ZX81 forth implementation
Hi Kmurta
Compiler , prime number and maths routines converted to run on real 81
This is really great work Kmurta and a very fast version of forth, just two questions though, 1) will a screen editor ever be written?
2) Is there a way to alter keyboard repeat rate? On a real 81 a single keypress produces 4 or 5 repeats of same character and a lot of time is spent deleting.
Many thanks in advance.
Regards Moggy
Compiler , prime number and maths routines converted to run on real 81
![Very Happy :D](./images/smilies/icon_e_biggrin.gif)
This is really great work Kmurta and a very fast version of forth, just two questions though, 1) will a screen editor ever be written?
2) Is there a way to alter keyboard repeat rate? On a real 81 a single keypress produces 4 or 5 repeats of same character and a lot of time is spent deleting.
Many thanks in advance.
Regards Moggy
Re: Toddy Forth - a new ZX81 forth implementation
Great! I'm glad to know that you are able to use it on real the ZX81Moggy wrote:Hi Kmurta
Compiler , prime number and maths routines converted to run on real 81![]()
Yes, I believe that it is the fastest forth for zx81, thanks to the DTC threading technique used. But this has a price: you can not define words beyond 32K, unles you have a ZX81 with M1NOT circuit.This is really great work Kmurta and a very fast version of forth
I have not thought about writing a screen editor because I think more convenient to edit and compile the software with the PC and Eightyone emulator.just two questions though, 1) will a screen editor ever be written?
Of course! Change the 16 bits value at address 17710, where the default is 768.2) Is there a way to alter keyboard repeat rate? On a real 81 a single keypress produces 4 or 5 repeats of same character and a lot of time is spent deleting.
1 x ZX81, 2 x TK85 , 1 TK82C, 1 TK95, 1 x Alphacom 32 printer, 1 x ZXpand
ZeXtender board, Joy81 - Programmable Joystick Controller, Turbo Sound 81
http://zx81.eu5.org
https://toddysoftware.itch.io/
ZeXtender board, Joy81 - Programmable Joystick Controller, Turbo Sound 81
http://zx81.eu5.org
https://toddysoftware.itch.io/
Re: Toddy Forth - a new ZX81 forth implementation
Hi Kmurta
Thanks for quick reply,
I get Your point about editor ( do the work and compilation in EO then port the finished work to real 81,so much easier).
I altered key repeat rate by compiling the 2@ and 2! words from the library file and using them to alter then check address 17710 ,so simple an answer and the end result works great.![Very Happy :D](./images/smilies/icon_e_biggrin.gif)
Thanks again Kmurta for Your time and effort it is much appreciated.
Regards
Moggy
Thanks for quick reply,
I get Your point about editor ( do the work and compilation in EO then port the finished work to real 81,so much easier).
I altered key repeat rate by compiling the 2@ and 2! words from the library file and using them to alter then check address 17710 ,so simple an answer and the end result works great.
![Very Happy :D](./images/smilies/icon_e_biggrin.gif)
Thanks again Kmurta for Your time and effort it is much appreciated.
Regards
Moggy