Skip to content

Commit 568dba0

Browse files
committed
moved to own folder
1 parent 60e3f3e commit 568dba0

File tree

2 files changed

+16
-0
lines changed

2 files changed

+16
-0
lines changed

forth/blinky/blink-variable.fs

+10
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,10 @@
1+
led import
2+
3+
: blink ( n-- ) \ n = the amount of ms led is on
4+
begin
5+
dup
6+
green toggle-led
7+
ms
8+
key? until ;
9+
10+

forth/blinky/blinky.fs

+6
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,6 @@
1+
led import
2+
3+
: blink
4+
begin green toggle-led 300 ms key? until ;
5+
6+

0 commit comments

Comments
 (0)