Re: Buttons - AVR ATMega128

I encountered this once. I was not used to cross-compiling. ' seems to work
well only in the interpreter not in the downloaded code. Try ['] instead.

Cheers,
Noel

On Saturday 09 August 2003 11:57 am, you wrote:
> Hi,
>
> I wrote a little program that lets the leds
> sequentially flash (see code below).
>
> I'd like now to stop, to start and to reset the
> flashing leds after pushing several switches.
> Normally I would create a table and store execution tokens
> in it. The usually way to do it is with the ' (tick),
> for instance:
> ' stop buttonstable !
>
> But tick seems not to work. Does anyone know how it can be done?
>
> Thanks in advance,
> Viviane Beullens
>
> |U| |S| |R| BACKGROUND TESTER
>
> \ ACTION
>
> : SEQBITFLASH ( -- )
>
> 1
> BEGIN
> PORTB C@ 2DUP SWAP - AND
> PORTB C! 100 MS 2*
> PORTB C@ 127 = IF DROP 1 CR
> THEN
> 255 PORTB C! 100 MS
> AGAIN ; \ For in task
>
> : /TESTER ( -- )
>
> $FF DDRB C! \ Set PORTB as OUTPUT
> $FF PORTB C! \ set leds off at start up
> TESTER BUILD TESTER ACTIVATE
> BEGIN PAUSE SEQBITFLASH
> AGAIN ;
>
>
>
> ----------------------------------------------------------------------
> swiftx_at_forth.com The SwiftX programming discussion email list
> To unsubscribe, send subject "unsubscribe" to swiftx-request_at_forth.com
> For list command help, send subject "help" to swiftx-request_at_forth.com
> Message archives are located at http://www.forth.com/archive/swiftx
> ----------------------------------------------------------------------
> This list is a forum for SwiftX users. For product support and bug
> reports, please send email to support_at_forth.com
> ----------------------------------------------------------------------

----------------------------------------------------------------------
swiftx_at_forth.com The SwiftX programming discussion email list
To unsubscribe, send subject "unsubscribe" to swiftx-request_at_forth.com
For list command help, send subject "help" to swiftx-request_at_forth.com
Message archives are located at http://www.forth.com/archive/swiftx
----------------------------------------------------------------------
This list is a forum for SwiftX users. For product support and bug
reports, please send email to support_at_forth.com
----------------------------------------------------------------------
Received on Sat Aug 09 2003 - 13:03:00 PDT