RosettaCodeData/Task/Fibonacci-sequence/8080-Assembly/fibonacci-sequence-1.8080

11 lines
317 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
FIBNCI: MOV C, A ; C will store the counter
DCR C ; decrement, because we know f(1) already
MVI A, 1
MVI B, 0
LOOP: MOV D, A
ADD B ; A := A + B
MOV B, D
DCR C
JNZ LOOP ; jump if not zero
RET ; return from subroutine