fibonacci.asm

计算 Fibonacci数 本程序特点 不受机器寄存器字长的限制

.MODEL SMALL
.DATA

RESULTS DB 0,0,0,0,0,0,"$"  
TEMP DB 0,0,0,0,0,0,"$"    

.STACK 100H
.CODE

START:

    	MOV AX,@DATA
    	MOV DS,AX
	MOV DI, OFFSET TEMP+5
	MOV SI, OFFSET RESULTS+5
	MOV BYTE PTR [DI],1
	MOV BYTE PTR [SI],1
	MOV CX,23
XUNHUAN:
	MOV BX,CX

	MOV CX,6
	MOV DI, OFFSET TEMP+5
	MOV SI, OFFSET RESULTS+5
JIA:
	MOV AL,[DI]
	ADD AL,[SI]
	CMP AL,10
	JB NEXT
	DEC DI
	MOV AH,[DI]
	INC AH
	MOV [DI],AH
	INC DI
	SUB AL,10
NEXT:
	MOV [DI],AL
	DEC SI
	DEC DI
	LOOP JIA
	
	MOV CX,6
	MOV SI, OFFSET TEMP
	MOV DI, OFFSET RESULTS
CHAGE:
	MOV AL,[SI]
	XCHG [DI],AL
	MOV [SI],AL
	INC DI
	INC SI
	LOOP CHAGE
	MOV CX,BX
	LOOP XUNHUAN

	MOV CX,6
	MOV DI, OFFSET RESULTS
N2S:	
	MOV AL,[DI]
	ADD AL,48
	MOV [DI],AL
	INC DI
	LOOP N2S

	MOV CX,6
	MOV DI ,OFFSET RESULTS
LOP2:
    CMP BYTE PTR [DI],'0'
    JE LOP3
    MOV DX,DI
    MOV AH,9   
    INT 21H 
    MOV AX,4C00H
    INT 21H   
LOP3:
    INC DI
    LOOP LOP2 
    END START