$A9C4/43460:   Assign Integer

A9C4: 20 1B BC  JSR $BC1B     ; Round FAC#1
A9C7: 20 BF B1  JSR $B1BF     ; FAC#1 to Positive Integer
A9CA: A0 00     LDY #$00
A9CC: A5 64     LDA $64       ; FAC Mantissa
A9CE: 91 49     STA ($49),Y   ; Pointer: Index Variable for FOR/NEXT loop
A9D0: C8        INY
A9D1: A5 65     LDA $65       ; FAC Mantissa
A9D3: 91 49     STA ($49),Y   ; Pointer: Index Variable for FOR/NEXT loop
A9D5: 60        RTS

    Previous Page / Next Page