So drucken fibonacci-Reihe in der Montage?

Habe ich versucht zu bekommen, der fibonnacci-Reihe, bis zu einer bestimmten Anzahl. Aber nicht richtig gedruckt.
Hier ist mein code. num ist die gegebene Zahl.

proc getFibo
        mov al,num

        mov cl,0
        mov bl,1

        mov dl,cl
        add dl,48
        mov ah,02h
        int 21h


        getNext:
            mov dl,bl
            add dl,48
            mov ah,02h
            int 21h

            add cl,bl

            mov dl,cl
            add dl,48
            mov ah,02h
            int 21h

            add bl,cl

            mov cl,bl
            add bl,1
            cmp bl,num
            jl getNext


        ret
    endp

Mir bitte jemand helfen.Vielen Dank im Voraus..!

int 21h, heißt das noch Arbeit? Sind Sie mit einem Buch aus dem Jahr 1983 oder so etwas?
Welche Ausgabe erwarten Sie und was ist der eigentliche Ausgang ? Haben Sie versucht, schrittweise durch den code in Ihrem debugger ?
Wenn ich geben Sie 3 als die Zahl es gibt mir die 001, die die ersten drei Fibonacci. Aber wenn ich geben Sie 4 als die Zahl es gibt mir 01135,aber die Antwort sollte sein, 0112. Ja, ich habe versucht, aber ich weiß nicht, was da passiert ist.

InformationsquelleAutor MaDu_LK | 2013-06-10

1

Wird die Schleifenbedingung am Ende ist falsch:
```
mov cl,bl   # this is skipping a value in the F-series. F(i-2) == F(i-1)
add bl,1    # this is just wrong for the F-series. F(i) = F(i-1) + 1 + F(i-2)

cmp bl,num  # ok - `bl` is the next value printed if < num.
jl getNext
```
Die ersten beiden Zeilen gehen sollte. Wenn Ihre Absicht war, Schleife, wenn <= num, Verwendung: jle.
Da sind Sie nur drucken, einen Charakter, dieser wird nicht funktionieren ordnungsgemäß nach: 0112358
- thank u. Ich habe es gelöst.
InformationsquelleAutor Brett Hale

Wird nicht lange dauern, zu laufen, out-of-register Speicherplatz auf einem 16 bit system...

Habe ich aktualisiert meine Antwort, es ist noch nicht perfekt aber

 mov bp,sp                                 
 mov ax,1                        
 mov bx,2                        

 .again     ;fibonacci bit                      
 add ax,bx                       
 push ax                         
 add bx,ax                       
 jc putnumsonstack  ;finishes when the fibonacci number bigger than the register
 push bx                         
 jmp again                       

 .putnumsonstack  ;Turns hex into decimal                
 mov bx,A         ;and puts individual decimal numbers onto stack               
 .again2                          
 cmp ax,0         ;tells you the division by A is finished               
 jz print         ;and the decimal number is ready to print 
 div bx           ;divide a hex num by hex-A and the dx carry gets the decimal 
 add dl,30        ;The dx carry is what we print out, so we add hex-30              
 push dx          ;and put it on the stack for printing              
 mov dx,0         ;then clear dx for the next DIV bx               
 jmp again2                      


 .print           ;prints out the decimal numbers               
 pop ax           ;strips the stack back towards the next hex number
 cmp ah,0                 ;tells you the decimals are all printed       
 jnz putnumsonstack       ;jumps to the next decimal numbers stackload       
 ;PRINT OUT AL HERE              
 cmp sp,bp                                  
 jae finished                             
 jmp print                       

 .finished

Dies ist nicht wirklich eine Antwort.
Ich aktualisiert es für die Division durch Einen
danke und ich habe es gelöst

InformationsquelleAutor ady

proc getFibo
        mov al,f1
        mov bl,f2

    ;mov cl,count
    ;cmp cl,num
    ;je exitFibo

    mov dl,al
    add dl,48
    mov ah,02h
    int 21h

    mov cl,count
    add cl,1
    mov count,cl

    mov dl,bl
    add dl,48
    mov ah,02h
    int 21h

    mov cl,count
    add cl,1
    mov count,cl

    calcFibo:
        mov al,f1
        add al,f2
        mov f1,al

        mov dl,f1
        add dl,48
        mov ah,02h
        int 21h

        mov cl,count
        add cl,1
        mov count,cl

        mov cl,count
        cmp cl,num
        je exitFibo

        mov bl,f2
        add bl,f1
        mov f2,bl

        mov dl,f2
        add dl,48
        mov ah,02h
        int 21h

        mov cl,count
        add cl,1
        mov count,cl

        mov cl,count
        cmp cl,num
        je exitFibo

        jmp calcFibo

    exitFibo:
    ret
endp

Habe ich die Antwort gefunden. Danke, dass u alle.

InformationsquelleAutor MaDu_LK

Schreibe einen Kommentar

Du musst angemeldet sein, um einen Kommentar abzugeben.