讓程式產生數列  1,1,2,3,5,8,13,21,34 ......第三數以後是前兩數的和。

註解待續.....

BR main

cnt:     .BLOCK d#2     ;N
num1: .BLOCK d#2    
num2: .BLOCK d#2
num3: .BLOCK d#2
main:    DECI cnt,d
            LOADX cnt,d
            LOADA   d#1,i
            STOREA    num3,d
            COMPX   d#1,i
            BREQ      output3
            COMPX   d#2,i
            BREQ      output3   
            LOADA  d#1,i
            STOREA num1,d
            STOREA num2,d
            LOADA  d#2,i
            STOREA  num3,d
            SUBX     d#3,i      
            COMPX  d#0,i
            BREQ     output3
asubx:   LOADA  num2,d
              STOREA num1,d
              LOADA  num3,d
              STOREA  num2,d
              ADDA    num1,d
              STOREA  num3,d
              SUBX d#1,i
              COMPX  d#0,i
              BREQ   output3
             BR  asubx    
output3: CHARO C#/F/,i
              CHARO C#/=/,i
             DECO    num3,d
STOP
.END