summaryrefslogtreecommitdiff
path: root/programs/fib.pal
diff options
context:
space:
mode:
Diffstat (limited to 'programs/fib.pal')
-rw-r--r--programs/fib.pal10
1 files changed, 4 insertions, 6 deletions
diff --git a/programs/fib.pal b/programs/fib.pal
index 4d3fb1b..941b949 100644
--- a/programs/fib.pal
+++ b/programs/fib.pal
@@ -3,17 +3,15 @@
3*200 3*200
4 4
5LOOP, CLA 5LOOP, CLA
6 TAD N
7 TAD NPLUS1
8 DCA NPLUS2
9 TAD NPLUS1 6 TAD NPLUS1
10 DCA N 7 MQL
11 TAD NPLUS2 8 TAD N
12 DCA NPLUS1 9 DCA NPLUS1
10 MQA
11 DCA N
13 JMP LOOP 12 JMP LOOP
14 13
15*300 14*300
16 15
17N, 0 16N, 0
18NPLUS1, 1 17NPLUS1, 1
19NPLUS2, 0