Flashing LEDS

Hi,

I just started with SwiftX and am trying to write a flashing leds demo.

As I understand it, it should be enough easy to do and yet
the code I wrote does not exactly what I want; the leds go on but
they don't flash.

Did some of you write such a demo?
Then maybe you can tell me what's wrong with
my code?

\ CODE FOR FLASHING LEDS

: DOFLASH $FF DDRB C! \ Set PORTB for output
           BEGIN $00 PORTB C! 1000 MS $FF PORTB C! AGAIN ;

Thanks in advance,
Viviane Beullens
----------------------------------------------------------------------
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 Mon Aug 04 2003 - 14:44:57 PDT