1000: 02            idiv          ;Integer Divide 16 by 16
1001: 03            fdiv          ;Fractional Divide 16 by 16
1002: 06            tap           ;Transfer A to CC Register
1003: 07            tpa           ;Transfer CC Register to A
1004: 16            tab           ;Transfer A to B
1005: 2F   88       ble   $0F8F   ;Branch if <= Zero to the address $1005 + $0F8F = $1F94
				  ;  or to $1000 + $0F8F = $1F8F both of which are operands not instructions?
				  ;  or could mean acualy $0F8F which would start the whole loop over?
1007: C9   44       adcb  #$44    ;Add with cary to B IMM value 68
1009: EB   46       addb  $46,X   ;Add Memory to B
100B: EC   40       ldad  $40,X   ;Load Double Accumulator D