29 lines
412 B
Plaintext
29 lines
412 B
Plaintext
" Fibocci
|
|
0;fibonacci;=;4;0;0
|
|
1;20;0;0;0;0
|
|
" Fibocci call
|
|
3;8;0;n;=;0
|
|
0;ret;=;0;0;0
|
|
1;return;0;0;0
|
|
3;11;0;n;=;1
|
|
0;ret;=;1;0;0
|
|
1;return;0;0;0
|
|
0;n;=;n;-;1
|
|
1;fibonacci;1;0;0;0
|
|
0;n;=;n;+;1
|
|
0;buf-n;=;ret;0;0
|
|
0;n;=;n;-;2
|
|
1;fibonacci;1;0;0;0
|
|
0;n;=;n;+;2
|
|
0;ret;=;buf-n;+;ret
|
|
1;return;0;0;0
|
|
" Call
|
|
0;n;=;0;0;0
|
|
1;fibonacci;1;0;0;0
|
|
0;f-n;=;ret;0;0;0
|
|
0;n;=;n;+;1
|
|
3;22;0;n;=;10
|
|
1;return;0;0;0
|
|
" 0 1 1 2 3
|
|
" 5 8 13 21 34
|