added examples (fib,69420/fizzbuzz)
This commit is contained in:
18
examples/fib.zorth
Normal file
18
examples/fib.zorth
Normal file
@@ -0,0 +1,18 @@
|
||||
: fib
|
||||
0 1
|
||||
begin
|
||||
rot
|
||||
dup 0>
|
||||
while
|
||||
1-
|
||||
rot rot
|
||||
dup
|
||||
dup .
|
||||
rot
|
||||
+
|
||||
repeat
|
||||
;
|
||||
|
||||
15 fib
|
||||
|
||||
ret
|
||||
Reference in New Issue
Block a user