Re: [Flashforth-devel] Flashfort and UNO-TFT display/ili9341

[Mikael N. <mik...@fl...>]

I added do..loop for the Atmega2560 (Arduino MEGA) and 0if 0until 1until 
to the FF5 distribution.

BR Mikael

On 2024-08-22 07:27, Mikael Nordman wrote:

> Here you have the 0if and 0until. I found them in bitflipser/optiforth.
> 
> \ 0if and 0until for Atmega
> 
> : 0if ( -- addr) $f009 i, ['] if #8 + execute ; immediate
> : 0until ( addr -- ) $f009 i, postpone again ; immediate
> 
> Mikael
> 
> On 2024-08-22 06:15, Mikael Nordman wrote:
> 
> On 2024-08-21 21:58, Peter Höhne via Flashforth-devel wrote:
> 
> I can't offer more at the moment, because in Flashforth there are the 
> commands:
> 0until, 0if, do, loop and pick unfortunately not!
> 
> https://sourceforge.net/p/flashforth/code/ci/master/tree/avr/forth/pick.fs
> 
> https://sourceforge.net/p/flashforth/code/ci/master/tree/avr/forth/doloop.fs
> 
> Unfortunately the DO..LOOP is not for ATMEGA256 if you plan to use 
> that, but I could create it.
> 
> 0until and 0if could be created, but could you give  a reference to 
> those words.
> Google could not find it immediately.

-- 
--
Mikael