Calcolatori elettronici - #301

DIM EQU 20

.MODEL SMALL
.STACK
.DATA

FIBONACCI DW 0, 1, DIM-2 DUP(?)

.CODE
.STARTUP

MOV SI, 2*2
FIBO:      MOV AX, FIBONACCI[SI-(1*2)]
           ADD AX, FIBONACCI[SI-(2*2)]
           MOV FIBONACCI[SI], AX
           ADD SI, 2
           CMP SI, 20*2
           JNE FIBO

.EXIT
END