1 10^-50 * 1 10^-50 underflow display "0" 00330: ..11.1.... keys -> rom address A=10000000009500 B=02999999999000 C=01000000000950 D=01000000000950 M=00000000000000 P=c S=0.......8... * 00036: ..11..11.. l00036: 3 -> p A=10000000009500 B=02999999999000 C=01000000000950 D=01000000000950 M=00000000000000 P=3 S=0.......8... 00037: ..1.1.1.1. 0 - c -> c[x] A=10000000009500 B=02999999999000 C=01000000000050 D=01000000000950 M=00000000000000 P=3 S=0.......8... 00040: .11.1.1... l00040: stack -> a A=01000000000950 B=02999999999000 C=01000000000050 D=00000000000000 M=00000000000000 P=3 S=0.......8... 00041: ...1....11 -> 00020 go to l00020 A=01000000000950 B=02999999999000 C=01000000000050 D=00000000000000 M=00000000000000 P=3 S=0.......8... 00020: ....1.111. l00020: 0 -> b[w] A=01000000000950 B=00000000000000 C=01000000000050 D=00000000000000 M=00000000000000 P=3 S=0.......8... 00021: ..1..1.... -> 01022 select rom 1 ; -> asn12 A=01000000000950 B=00000000000000 C=01000000000050 D=00000000000000 M=00000000000000 P=3 S=0.......8... 01022: 1.1..11..1 -> 01246 asn12: jsb div11 A=01000000000950 B=00000000000000 C=01000000000050 D=00000000000000 M=00000000000000 P=3 S=0.......8... 01246: .1.1..1.1. div11: a - c -> c[x] A=01000000000950 B=00000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=3 S=0.......8... 01247: .1...1.... -> 02250 select rom 2 ; -> l02250 A=01000000000950 B=00000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=3 S=0.......8... 02250: .1.1.1111. a - c -> c[s] A=01000000000950 B=00000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=3 S=0.......8... 02251: 1.1.1.1111 -> 02253 if no carry go to div22 A=01000000000950 B=00000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=3 S=0.......8... 02253: 11..1..11. div22: a exchange b[m] A=00000000000950 B=01000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=3 S=0.......8... 02254: 1.111.111. 0 -> a[w] A=00000000000000 B=01000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=3 S=0.......8... 02255: 11..1.11.. if p # 12 A=00000000000000 B=01000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=3 S=0.......8... 02256: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=01000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=3 S=0.......8... 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=01000000000000 C=01000000009900 D=00000000000000 M=00000000000000 P=3 S=0.......8... 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=01000000000000 C=01000000009900 D=00000000000000 M=00000000000000 P=3 S=0.......8... 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=01000000000000 C=01000000009900 D=00000000000000 M=00000000000000 P=3 S=0.......8... 02310: ....1111.. p + 1 -> p A=00000000000000 B=01000000000000 C=01000000009900 D=00000000000000 M=00000000000000 P=4 S=0.......8... 02311: 11.11.11.. if p # 13 A=00000000000000 B=01000000000000 C=01000000009900 D=00000000000000 M=00000000000000 P=4 S=0.......8... 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=01000000000000 C=01000000009900 D=00000000000000 M=00000000000000 P=4 S=0.......8... 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=01000000000000 C=01000000099900 D=00000000000000 M=00000000000000 P=4 S=0.......8... 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=01000000000000 C=01000000099900 D=00000000000000 M=00000000000000 P=4 S=0.......8... 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=01000000000000 C=01000000099900 D=00000000000000 M=00000000000000 P=4 S=0.......8... 02310: ....1111.. p + 1 -> p A=00000000000000 B=01000000000000 C=01000000099900 D=00000000000000 M=00000000000000 P=5 S=0.......8... 02311: 11.11.11.. if p # 13 A=00000000000000 B=01000000000000 C=01000000099900 D=00000000000000 M=00000000000000 P=5 S=0.......8... 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=01000000000000 C=01000000099900 D=00000000000000 M=00000000000000 P=5 S=0.......8... 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=01000000000000 C=01000000999900 D=00000000000000 M=00000000000000 P=5 S=0.......8... 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=01000000000000 C=01000000999900 D=00000000000000 M=00000000000000 P=5 S=0.......8... 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=01000000000000 C=01000000999900 D=00000000000000 M=00000000000000 P=5 S=0.......8... 02310: ....1111.. p + 1 -> p A=00000000000000 B=01000000000000 C=01000000999900 D=00000000000000 M=00000000000000 P=6 S=0.......8... 02311: 11.11.11.. if p # 13 A=00000000000000 B=01000000000000 C=01000000999900 D=00000000000000 M=00000000000000 P=6 S=0.......8... 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=01000000000000 C=01000000999900 D=00000000000000 M=00000000000000 P=6 S=0.......8... 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=01000000000000 C=01000009999900 D=00000000000000 M=00000000000000 P=6 S=0.......8... 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=01000000000000 C=01000009999900 D=00000000000000 M=00000000000000 P=6 S=0.......8... 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=01000000000000 C=01000009999900 D=00000000000000 M=00000000000000 P=6 S=0.......8... 02310: ....1111.. p + 1 -> p A=00000000000000 B=01000000000000 C=01000009999900 D=00000000000000 M=00000000000000 P=7 S=0.......8... 02311: 11.11.11.. if p # 13 A=00000000000000 B=01000000000000 C=01000009999900 D=00000000000000 M=00000000000000 P=7 S=0.......8... 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=01000000000000 C=01000009999900 D=00000000000000 M=00000000000000 P=7 S=0.......8... 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=01000000000000 C=01000099999900 D=00000000000000 M=00000000000000 P=7 S=0.......8... 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=01000000000000 C=01000099999900 D=00000000000000 M=00000000000000 P=7 S=0.......8... 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=01000000000000 C=01000099999900 D=00000000000000 M=00000000000000 P=7 S=0.......8... 02310: ....1111.. p + 1 -> p A=00000000000000 B=01000000000000 C=01000099999900 D=00000000000000 M=00000000000000 P=8 S=0.......8... 02311: 11.11.11.. if p # 13 A=00000000000000 B=01000000000000 C=01000099999900 D=00000000000000 M=00000000000000 P=8 S=0.......8... 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=01000000000000 C=01000099999900 D=00000000000000 M=00000000000000 P=8 S=0.......8... 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=01000000000000 C=01000999999900 D=00000000000000 M=00000000000000 P=8 S=0.......8... 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=01000000000000 C=01000999999900 D=00000000000000 M=00000000000000 P=8 S=0.......8... 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=01000000000000 C=01000999999900 D=00000000000000 M=00000000000000 P=8 S=0.......8... 02310: ....1111.. p + 1 -> p A=00000000000000 B=01000000000000 C=01000999999900 D=00000000000000 M=00000000000000 P=9 S=0.......8... 02311: 11.11.11.. if p # 13 A=00000000000000 B=01000000000000 C=01000999999900 D=00000000000000 M=00000000000000 P=9 S=0.......8... 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=01000000000000 C=01000999999900 D=00000000000000 M=00000000000000 P=9 S=0.......8... 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=01000000000000 C=01009999999900 D=00000000000000 M=00000000000000 P=9 S=0.......8... 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=01000000000000 C=01009999999900 D=00000000000000 M=00000000000000 P=9 S=0.......8... 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=01000000000000 C=01009999999900 D=00000000000000 M=00000000000000 P=9 S=0.......8... 02310: ....1111.. p + 1 -> p A=00000000000000 B=01000000000000 C=01009999999900 D=00000000000000 M=00000000000000 P=a S=0.......8... 02311: 11.11.11.. if p # 13 A=00000000000000 B=01000000000000 C=01009999999900 D=00000000000000 M=00000000000000 P=a S=0.......8... 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=01000000000000 C=01009999999900 D=00000000000000 M=00000000000000 P=a S=0.......8... 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=01000000000000 C=01099999999900 D=00000000000000 M=00000000000000 P=a S=0.......8... 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=01000000000000 C=01099999999900 D=00000000000000 M=00000000000000 P=a S=0.......8... 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=01000000000000 C=01099999999900 D=00000000000000 M=00000000000000 P=a S=0.......8... 02310: ....1111.. p + 1 -> p A=00000000000000 B=01000000000000 C=01099999999900 D=00000000000000 M=00000000000000 P=b S=0.......8... 02311: 11.11.11.. if p # 13 A=00000000000000 B=01000000000000 C=01099999999900 D=00000000000000 M=00000000000000 P=b S=0.......8... 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=01000000000000 C=01099999999900 D=00000000000000 M=00000000000000 P=b S=0.......8... 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=01000000000000 C=01999999999900 D=00000000000000 M=00000000000000 P=b S=0.......8... 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=01000000000000 C=01999999999900 D=00000000000000 M=00000000000000 P=b S=0.......8... 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=01000000000000 C=01999999999900 D=00000000000000 M=00000000000000 P=b S=0.......8... 02310: ....1111.. p + 1 -> p A=00000000000000 B=01000000000000 C=01999999999900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02311: 11.11.11.. if p # 13 A=00000000000000 B=01000000000000 C=01999999999900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=01000000000000 C=01999999999900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=01000000000000 C=00999999999900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=01000000000000 C=00999999999900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02304: 111...111. myp26: a + b -> a[w] A=01000000000000 B=01000000000000 C=00999999999900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02305: .1.11...1. mpy27: c - 1 -> c[p] A=01000000000000 B=01000000000000 C=09999999999900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02306: 11...1..11 -> 02304 if no carry go to myp26 A=01000000000000 B=01000000000000 C=09999999999900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02307: 1.11..111. mpy28: shift right a[w] A=00100000000000 B=01000000000000 C=09999999999900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02310: ....1111.. p + 1 -> p A=00100000000000 B=01000000000000 C=09999999999900 D=00000000000000 M=00000000000000 P=d S=0.......8... 02311: 11.11.11.. if p # 13 A=00100000000000 B=01000000000000 C=09999999999900 D=00000000000000 M=00000000000000 P=d S=0.......8... 02312: 11...1.111 -> 02305 then go to mpy27 A=00100000000000 B=01000000000000 C=09999999999900 D=00000000000000 M=00000000000000 P=d S=0.......8... 02313: .1111.1.1. c + 1 -> c[x] A=00100000000000 B=01000000000000 C=09999999999901 D=00000000000000 M=00000000000000 P=d S=0.......8... 02314: 1.1111111. nrm21: 0 -> a[s] A=00100000000000 B=01000000000000 C=09999999999901 D=00000000000000 M=00000000000000 P=d S=0.......8... 02315: 11....11.. 12 -> p A=00100000000000 B=01000000000000 C=09999999999901 D=00000000000000 M=00000000000000 P=c S=0.......8... 02316: ....1.111. 0 -> b[w] A=00100000000000 B=00000000000000 C=09999999999901 D=00000000000000 M=00000000000000 P=c S=0.......8... 02317: 1..11...1. nrm23: if a[p] >= 1 A=00100000000000 B=00000000000000 C=09999999999901 D=00000000000000 M=00000000000000 P=c S=0.......8... 02320: 11.1.11.11 -> 02326 then go to nrm24 A=00100000000000 B=00000000000000 C=09999999999901 D=00000000000000 M=00000000000000 P=c S=0.......8... 02321: .1....111. shift left a[w] A=01000000000000 B=00000000000000 C=09999999999901 D=00000000000000 M=00000000000000 P=c S=0.......8... 02322: .1.11.1.1. c - 1 -> c[x] A=01000000000000 B=00000000000000 C=09999999999900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02323: 1..11.111. if a[w] >= 1 A=01000000000000 B=00000000000000 C=09999999999900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02324: 11..111111 -> 02317 then go to nrm23 A=01000000000000 B=00000000000000 C=09999999999900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02317: 1..11...1. nrm23: if a[p] >= 1 A=01000000000000 B=00000000000000 C=09999999999900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02320: 11.1.11.11 -> 02326 then go to nrm24 A=01000000000000 B=00000000000000 C=09999999999900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02326: .1..1.1.1. nrm24: a -> b[x] A=01000000000000 B=00000000000000 C=09999999999900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02327: 111...111. a + b -> a[w] A=01000000000000 B=00000000000000 C=09999999999900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02330: 1..111111. if a[s] >= 1 A=01000000000000 B=00000000000000 C=09999999999900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02331: 11...11111 -> 02307 then go to mpy28 A=01000000000000 B=00000000000000 C=09999999999900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02332: 111.1..11. a exchange c[m] A=09999999999000 B=00000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02333: .11...111. c -> a[w] A=01000000000900 B=00000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02334: ....1.111. 0 -> b[w] A=01000000000900 B=00000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02335: 11....11.. nrm27: 12 -> p A=01000000000900 B=00000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02336: .1111.1.11 -> 02172 go to nrm26 A=01000000000900 B=00000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02172: ..1..1.1.. nrm26: if s2 = 0 A=01000000000900 B=00000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02173: 1..1.1..11 -> 02224 then go to rtn21 A=01000000000900 B=00000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=c S=0.......8... 02224: ..1..1.... -> 01225 rtn21: select rom 1 ; -> rtn11 A=01000000000900 B=00000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=c S=0.......8... 01225: ...1.1.1.. rtn11: if s1 = 0 A=01000000000900 B=00000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=c S=0.......8... 01226: 11.11.1.11 -> 01332 then go to rtn12 A=01000000000900 B=00000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=c S=0.......8... 01332: .....1.... -> 00333 rtn12: select rom 0 ; -> l00333 A=01000000000900 B=00000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=c S=0.......8... return form "*" result is 1 10^-0 (exp 900) 00333: .1.111.1.1 -> 00135 l00333: jsb of13 A=01000000000900 B=00000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=c S=0.......8... 00135: ....11.1.. of13: clear status A=01000000000900 B=00000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=c S=............ 00136: .11...111. c -> a[w] A=01000000000900 B=00000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=c S=............ 00137: 11....11.. of14: 12 -> p A=01000000000900 B=00000000000000 C=01000000000900 D=00000000000000 M=00000000000000 P=c S=............ 00140: .1..1.1.1. a -> b[x] A=01000000000900 B=00000000000900 C=01000000000900 D=00000000000000 M=00000000000000 P=c S=............ 00141: .11...1.1. c -> a[x] A=01000000000900 B=00000000000900 C=01000000000900 D=00000000000000 M=00000000000000 P=c S=............ 00142: .11.111.1. if c[xs] = 0 A=01000000000900 B=00000000000900 C=01000000000900 D=00000000000000 M=00000000000000 P=c S=............ 00143: .11.1...11 -> 00150 then go to of15 A=01000000000900 B=00000000000900 C=01000000000900 D=00000000000000 M=00000000000000 P=c S=............ 00144: ..1.1.1.1. 0 - c -> c[x] A=01000000000900 B=00000000000900 C=01000000000100 D=00000000000000 M=00000000000000 P=c S=............ 00145: .1.1111.1. c - 1 -> c[xs] A=01000000000900 B=00000000000900 C=01000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00146: .1.1.11111 -> 00127 if no carry go to of11 A=01000000000900 B=00000000000900 C=01000000000000 D=00000000000000 M=00000000000000 P=c S=............ underfow 00127: ..11.1..1. of11: 0 -> c[wp] A=01000000000900 B=00000000000900 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00130: .1.111..1. c - 1 -> c[wp] A=01000000000900 B=00000000000900 C=09999999999999 D=00000000000000 M=00000000000000 P=c S=............ 00131: ..11.11.1. 0 -> c[xs] A=01000000000900 B=00000000000900 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00132: 111...1.1. a + b -> a[x] A=01000000000800 B=00000000000900 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00133: .1.111.111 -> 00135 if no carry go to of13 A=01000000000800 B=00000000000900 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00134: ..11..111. of12: 0 -> c[w] A=01000000000800 B=00000000000900 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00135: ....11.1.. of13: clear status A=01000000000800 B=00000000000900 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00136: .11...111. c -> a[w] A=00000000000000 B=00000000000900 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00137: 11....11.. of14: 12 -> p A=00000000000000 B=00000000000900 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00140: .1..1.1.1. a -> b[x] A=00000000000000 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00141: .11...1.1. c -> a[x] A=00000000000000 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00142: .11.111.1. if c[xs] = 0 A=00000000000000 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00143: .11.1...11 -> 00150 then go to of15 A=00000000000000 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00150: 111.1.1.1. of15: a exchange c[x] A=00000000000000 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00151: .1...1.1.. if s4 = 0 A=00000000000000 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00152: .1....1.11 -> 00102 then go to l00102 A=00000000000000 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00102: .1..1.111. l00102: a -> b[w] A=00000000000000 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00103: 1.11111.1. 0 -> a[xs] A=00000000000000 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00104: .1...1.11. shift left a[ms] A=00000000000000 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00105: 11.11.1.1. l00105: a - 1 -> a[x] A=00000000000999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00106: 111.....11 -> 00340 if no carry go to l00340 A=00000000000999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00107: .11.111.1. if c[xs] = 0 A=00000000000999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00110: 111..11.11 -> 00346 then go to l00346 A=00000000000999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00346: 1.1111.11. l00346: 0 -> a[ms] A=00000000000999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00347: 11111...1. a + 1 -> a[p] A=01000000000999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00350: 11111...1. a + 1 -> a[p] A=02000000000999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00351: ..1...11.. 2 -> p A=02000000000999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=2 S=............ 00352: ....1111.. l00352: p + 1 -> p A=02000000000999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=3 S=............ 00353: 11.11...1. a - 1 -> a[p] A=02000000009999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=3 S=............ 00354: 111.111111 -> 00357 if no carry go to l00357 A=02000000009999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=3 S=............ 00355: ........1. if b[p] = 0 A=02000000009999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=3 S=............ 00356: 111.1.1.11 -> 00352 then go to l00352 A=02000000009999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=3 S=............ 00352: ....1111.. l00352: p + 1 -> p A=02000000009999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=4 S=............ 00353: 11.11...1. a - 1 -> a[p] A=02000000099999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=4 S=............ 00354: 111.111111 -> 00357 if no carry go to l00357 A=02000000099999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=4 S=............ 00355: ........1. if b[p] = 0 A=02000000099999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=4 S=............ 00356: 111.1.1.11 -> 00352 then go to l00352 A=02000000099999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=4 S=............ 00352: ....1111.. l00352: p + 1 -> p A=02000000099999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=5 S=............ 00353: 11.11...1. a - 1 -> a[p] A=02000000999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=5 S=............ 00354: 111.111111 -> 00357 if no carry go to l00357 A=02000000999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=5 S=............ 00355: ........1. if b[p] = 0 A=02000000999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=5 S=............ 00356: 111.1.1.11 -> 00352 then go to l00352 A=02000000999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=5 S=............ 00352: ....1111.. l00352: p + 1 -> p A=02000000999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=6 S=............ 00353: 11.11...1. a - 1 -> a[p] A=02000009999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=6 S=............ 00354: 111.111111 -> 00357 if no carry go to l00357 A=02000009999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=6 S=............ 00355: ........1. if b[p] = 0 A=02000009999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=6 S=............ 00356: 111.1.1.11 -> 00352 then go to l00352 A=02000009999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=6 S=............ 00352: ....1111.. l00352: p + 1 -> p A=02000009999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=7 S=............ 00353: 11.11...1. a - 1 -> a[p] A=02000099999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=7 S=............ 00354: 111.111111 -> 00357 if no carry go to l00357 A=02000099999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=7 S=............ 00355: ........1. if b[p] = 0 A=02000099999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=7 S=............ 00356: 111.1.1.11 -> 00352 then go to l00352 A=02000099999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=7 S=............ 00352: ....1111.. l00352: p + 1 -> p A=02000099999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=8 S=............ 00353: 11.11...1. a - 1 -> a[p] A=02000999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=8 S=............ 00354: 111.111111 -> 00357 if no carry go to l00357 A=02000999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=8 S=............ 00355: ........1. if b[p] = 0 A=02000999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=8 S=............ 00356: 111.1.1.11 -> 00352 then go to l00352 A=02000999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=8 S=............ 00352: ....1111.. l00352: p + 1 -> p A=02000999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=9 S=............ 00353: 11.11...1. a - 1 -> a[p] A=02009999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=9 S=............ 00354: 111.111111 -> 00357 if no carry go to l00357 A=02009999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=9 S=............ 00355: ........1. if b[p] = 0 A=02009999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=9 S=............ 00356: 111.1.1.11 -> 00352 then go to l00352 A=02009999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=9 S=............ 00352: ....1111.. l00352: p + 1 -> p A=02009999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=a S=............ 00353: 11.11...1. a - 1 -> a[p] A=02099999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=a S=............ 00354: 111.111111 -> 00357 if no carry go to l00357 A=02099999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=a S=............ 00355: ........1. if b[p] = 0 A=02099999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=a S=............ 00356: 111.1.1.11 -> 00352 then go to l00352 A=02099999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=a S=............ 00352: ....1111.. l00352: p + 1 -> p A=02099999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=b S=............ 00353: 11.11...1. a - 1 -> a[p] A=02999999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=b S=............ 00354: 111.111111 -> 00357 if no carry go to l00357 A=02999999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=b S=............ 00355: ........1. if b[p] = 0 A=02999999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=b S=............ 00356: 111.1.1.11 -> 00352 then go to l00352 A=02999999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=b S=............ 00352: ....1111.. l00352: p + 1 -> p A=02999999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00353: 11.11...1. a - 1 -> a[p] A=01999999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00354: 111.111111 -> 00357 if no carry go to l00357 A=01999999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00357: 11111...1. l00357: a + 1 -> a[p] A=02999999999999 B=00000000000000 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00360: 11..1.111. a exchange b[w] A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00361: ....11.... return A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00334: .111...1.. 1 -> s7 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......7.... 00335: 1111.111.1 -> 00367 fst2zx: jsb dsp1 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......7.... 00367: 1.1.1..1.. dsp1: 0 -> s10 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......7.... 00370: 11....1111 -> 00303 go to dsp7 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......7.... 00303: .11..1111. dsp7: c -> a[s] A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......7.... 00304: 1...1..1.. l00304: 0 -> s8 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......7.... 00305: 11..111111 -> 00317 go to dsp8 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......7.... 00317: ....1..1.. dsp8: 0 -> s0 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......7.... 00320: .....111.. dsp6: p - 1 -> p A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=b S=.......7.... 00321: 11..1.11.. if p # 12 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=b S=.......7.... 00322: 11.1....11 -> 00320 then go to dsp6 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=b S=.......7.... 00320: .....111.. dsp6: p - 1 -> p A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=a S=.......7.... 00321: 11..1.11.. if p # 12 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=a S=.......7.... 00322: 11.1....11 -> 00320 then go to dsp6 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=a S=.......7.... 00320: .....111.. dsp6: p - 1 -> p A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=9 S=.......7.... 00321: 11..1.11.. if p # 12 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=9 S=.......7.... 00322: 11.1....11 -> 00320 then go to dsp6 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=9 S=.......7.... 00320: .....111.. dsp6: p - 1 -> p A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=8 S=.......7.... 00321: 11..1.11.. if p # 12 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=8 S=.......7.... 00322: 11.1....11 -> 00320 then go to dsp6 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=8 S=.......7.... 00320: .....111.. dsp6: p - 1 -> p A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=7 S=.......7.... 00321: 11..1.11.. if p # 12 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=7 S=.......7.... 00322: 11.1....11 -> 00320 then go to dsp6 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=7 S=.......7.... 00320: .....111.. dsp6: p - 1 -> p A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=6 S=.......7.... 00321: 11..1.11.. if p # 12 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=6 S=.......7.... 00322: 11.1....11 -> 00320 then go to dsp6 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=6 S=.......7.... 00320: .....111.. dsp6: p - 1 -> p A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=5 S=.......7.... 00321: 11..1.11.. if p # 12 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=5 S=.......7.... 00322: 11.1....11 -> 00320 then go to dsp6 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=5 S=.......7.... 00320: .....111.. dsp6: p - 1 -> p A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=4 S=.......7.... 00321: 11..1.11.. if p # 12 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=4 S=.......7.... 00322: 11.1....11 -> 00320 then go to dsp6 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=4 S=.......7.... 00320: .....111.. dsp6: p - 1 -> p A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=3 S=.......7.... 00321: 11..1.11.. if p # 12 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=3 S=.......7.... 00322: 11.1....11 -> 00320 then go to dsp6 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=3 S=.......7.... 00320: .....111.. dsp6: p - 1 -> p A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=2 S=.......7.... 00321: 11..1.11.. if p # 12 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=2 S=.......7.... 00322: 11.1....11 -> 00320 then go to dsp6 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=2 S=.......7.... 00320: .....111.. dsp6: p - 1 -> p A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=1 S=.......7.... 00321: 11..1.11.. if p # 12 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=1 S=.......7.... 00322: 11.1....11 -> 00320 then go to dsp6 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=1 S=.......7.... 00320: .....111.. dsp6: p - 1 -> p A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=0 S=.......7.... 00321: 11..1.11.. if p # 12 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=0 S=.......7.... 00322: 11.1....11 -> 00320 then go to dsp6 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=0 S=.......7.... 00320: .....111.. dsp6: p - 1 -> p A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=f S=.......7.... 00321: 11..1.11.. if p # 12 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=f S=.......7.... 00322: 11.1....11 -> 00320 then go to dsp6 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=f S=.......7.... 00320: .....111.. dsp6: p - 1 -> p A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=e S=.......7.... 00321: 11..1.11.. if p # 12 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=e S=.......7.... 00322: 11.1....11 -> 00320 then go to dsp6 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=e S=.......7.... 00320: .....111.. dsp6: p - 1 -> p A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=d S=.......7.... 00321: 11..1.11.. if p # 12 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=d S=.......7.... 00322: 11.1....11 -> 00320 then go to dsp6 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=d S=.......7.... 00320: .....111.. dsp6: p - 1 -> p A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......7.... 00321: 11..1.11.. if p # 12 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......7.... 00322: 11.1....11 -> 00320 then go to dsp6 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......7.... 00323: 1...1.1... display off A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......7.... 00324: 1....1.1.. if s8 = 0 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......7.... 00325: 11..11..11 -> 00314 then go to dsp4 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......7.... 00314: ....1.1... dsp4: display toggle A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......7.... 00315: .....1.1.. dsp5: if s0 = 0 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......7.... 00316: 11...11111 -> 00307 then go to dsp3 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......7.... 00307: 1......1.. dsp3: 1 -> s8 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......78... 00310: .1.1.1.1.. if s5 = 0 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......78... 00311: 11..11.111 -> 00315 then go to dsp5 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......78... 00315: .....1.1.. dsp5: if s0 = 0 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......78... 00316: 11...11111 -> 00307 then go to dsp3 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......78... 00307: 1......1.. dsp3: 1 -> s8 A=00000000000000 B=02999999999999 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=.......78... 1 10^50 * 1^50 00330: ..11.1.... keys -> rom address A=10000000000500 B=02999999999000 C=01000000000050 D=01000000000050 M=00000000000000 P=c S=0.......8... "*" 00036: ..11..11.. l00036: 3 -> p A=10000000000500 B=02999999999000 C=01000000000050 D=01000000000050 M=00000000000000 P=3 S=0.......8... 00037: ..1.1.1.1. 0 - c -> c[x] A=10000000000500 B=02999999999000 C=01000000000950 D=01000000000050 M=00000000000000 P=3 S=0.......8... 00040: .11.1.1... l00040: stack -> a A=01000000000050 B=02999999999000 C=01000000000950 D=00000000000000 M=00000000000000 P=3 S=0.......8... 00041: ...1....11 -> 00020 go to l00020 A=01000000000050 B=02999999999000 C=01000000000950 D=00000000000000 M=00000000000000 P=3 S=0.......8... 00020: ....1.111. l00020: 0 -> b[w] A=01000000000050 B=00000000000000 C=01000000000950 D=00000000000000 M=00000000000000 P=3 S=0.......8... 00021: ..1..1.... -> 01022 select rom 1 ; -> asn12 A=01000000000050 B=00000000000000 C=01000000000950 D=00000000000000 M=00000000000000 P=3 S=0.......8... 01022: 1.1..11..1 -> 01246 asn12: jsb div11 A=01000000000050 B=00000000000000 C=01000000000950 D=00000000000000 M=00000000000000 P=3 S=0.......8... 01246: .1.1..1.1. div11: a - c -> c[x] A=01000000000050 B=00000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=3 S=0.......8... 01247: .1...1.... -> 02250 select rom 2 ; -> l02250 A=01000000000050 B=00000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=3 S=0.......8... 02250: .1.1.1111. a - c -> c[s] A=01000000000050 B=00000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=3 S=0.......8... 02251: 1.1.1.1111 -> 02253 if no carry go to div22 A=01000000000050 B=00000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=3 S=0.......8... 02253: 11..1..11. div22: a exchange b[m] A=00000000000050 B=01000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=3 S=0.......8... 02254: 1.111.111. 0 -> a[w] A=00000000000000 B=01000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=3 S=0.......8... 02255: 11..1.11.. if p # 12 A=00000000000000 B=01000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=3 S=0.......8... 02256: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=01000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=3 S=0.......8... 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=01000000000000 C=01000000009100 D=00000000000000 M=00000000000000 P=3 S=0.......8... 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=01000000000000 C=01000000009100 D=00000000000000 M=00000000000000 P=3 S=0.......8... 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=01000000000000 C=01000000009100 D=00000000000000 M=00000000000000 P=3 S=0.......8... 02310: ....1111.. p + 1 -> p A=00000000000000 B=01000000000000 C=01000000009100 D=00000000000000 M=00000000000000 P=4 S=0.......8... 02311: 11.11.11.. if p # 13 A=00000000000000 B=01000000000000 C=01000000009100 D=00000000000000 M=00000000000000 P=4 S=0.......8... 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=01000000000000 C=01000000009100 D=00000000000000 M=00000000000000 P=4 S=0.......8... 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=01000000000000 C=01000000099100 D=00000000000000 M=00000000000000 P=4 S=0.......8... 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=01000000000000 C=01000000099100 D=00000000000000 M=00000000000000 P=4 S=0.......8... 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=01000000000000 C=01000000099100 D=00000000000000 M=00000000000000 P=4 S=0.......8... 02310: ....1111.. p + 1 -> p A=00000000000000 B=01000000000000 C=01000000099100 D=00000000000000 M=00000000000000 P=5 S=0.......8... 02311: 11.11.11.. if p # 13 A=00000000000000 B=01000000000000 C=01000000099100 D=00000000000000 M=00000000000000 P=5 S=0.......8... 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=01000000000000 C=01000000099100 D=00000000000000 M=00000000000000 P=5 S=0.......8... 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=01000000000000 C=01000000999100 D=00000000000000 M=00000000000000 P=5 S=0.......8... 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=01000000000000 C=01000000999100 D=00000000000000 M=00000000000000 P=5 S=0.......8... 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=01000000000000 C=01000000999100 D=00000000000000 M=00000000000000 P=5 S=0.......8... 02310: ....1111.. p + 1 -> p A=00000000000000 B=01000000000000 C=01000000999100 D=00000000000000 M=00000000000000 P=6 S=0.......8... 02311: 11.11.11.. if p # 13 A=00000000000000 B=01000000000000 C=01000000999100 D=00000000000000 M=00000000000000 P=6 S=0.......8... 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=01000000000000 C=01000000999100 D=00000000000000 M=00000000000000 P=6 S=0.......8... 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=01000000000000 C=01000009999100 D=00000000000000 M=00000000000000 P=6 S=0.......8... 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=01000000000000 C=01000009999100 D=00000000000000 M=00000000000000 P=6 S=0.......8... 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=01000000000000 C=01000009999100 D=00000000000000 M=00000000000000 P=6 S=0.......8... 02310: ....1111.. p + 1 -> p A=00000000000000 B=01000000000000 C=01000009999100 D=00000000000000 M=00000000000000 P=7 S=0.......8... 02311: 11.11.11.. if p # 13 A=00000000000000 B=01000000000000 C=01000009999100 D=00000000000000 M=00000000000000 P=7 S=0.......8... 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=01000000000000 C=01000009999100 D=00000000000000 M=00000000000000 P=7 S=0.......8... 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=01000000000000 C=01000099999100 D=00000000000000 M=00000000000000 P=7 S=0.......8... 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=01000000000000 C=01000099999100 D=00000000000000 M=00000000000000 P=7 S=0.......8... 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=01000000000000 C=01000099999100 D=00000000000000 M=00000000000000 P=7 S=0.......8... 02310: ....1111.. p + 1 -> p A=00000000000000 B=01000000000000 C=01000099999100 D=00000000000000 M=00000000000000 P=8 S=0.......8... 02311: 11.11.11.. if p # 13 A=00000000000000 B=01000000000000 C=01000099999100 D=00000000000000 M=00000000000000 P=8 S=0.......8... 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=01000000000000 C=01000099999100 D=00000000000000 M=00000000000000 P=8 S=0.......8... 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=01000000000000 C=01000999999100 D=00000000000000 M=00000000000000 P=8 S=0.......8... 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=01000000000000 C=01000999999100 D=00000000000000 M=00000000000000 P=8 S=0.......8... 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=01000000000000 C=01000999999100 D=00000000000000 M=00000000000000 P=8 S=0.......8... 02310: ....1111.. p + 1 -> p A=00000000000000 B=01000000000000 C=01000999999100 D=00000000000000 M=00000000000000 P=9 S=0.......8... 02311: 11.11.11.. if p # 13 A=00000000000000 B=01000000000000 C=01000999999100 D=00000000000000 M=00000000000000 P=9 S=0.......8... 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=01000000000000 C=01000999999100 D=00000000000000 M=00000000000000 P=9 S=0.......8... 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=01000000000000 C=01009999999100 D=00000000000000 M=00000000000000 P=9 S=0.......8... 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=01000000000000 C=01009999999100 D=00000000000000 M=00000000000000 P=9 S=0.......8... 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=01000000000000 C=01009999999100 D=00000000000000 M=00000000000000 P=9 S=0.......8... 02310: ....1111.. p + 1 -> p A=00000000000000 B=01000000000000 C=01009999999100 D=00000000000000 M=00000000000000 P=a S=0.......8... 02311: 11.11.11.. if p # 13 A=00000000000000 B=01000000000000 C=01009999999100 D=00000000000000 M=00000000000000 P=a S=0.......8... 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=01000000000000 C=01009999999100 D=00000000000000 M=00000000000000 P=a S=0.......8... 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=01000000000000 C=01099999999100 D=00000000000000 M=00000000000000 P=a S=0.......8... 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=01000000000000 C=01099999999100 D=00000000000000 M=00000000000000 P=a S=0.......8... 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=01000000000000 C=01099999999100 D=00000000000000 M=00000000000000 P=a S=0.......8... 02310: ....1111.. p + 1 -> p A=00000000000000 B=01000000000000 C=01099999999100 D=00000000000000 M=00000000000000 P=b S=0.......8... 02311: 11.11.11.. if p # 13 A=00000000000000 B=01000000000000 C=01099999999100 D=00000000000000 M=00000000000000 P=b S=0.......8... 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=01000000000000 C=01099999999100 D=00000000000000 M=00000000000000 P=b S=0.......8... 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=01000000000000 C=01999999999100 D=00000000000000 M=00000000000000 P=b S=0.......8... 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=01000000000000 C=01999999999100 D=00000000000000 M=00000000000000 P=b S=0.......8... 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=01000000000000 C=01999999999100 D=00000000000000 M=00000000000000 P=b S=0.......8... 02310: ....1111.. p + 1 -> p A=00000000000000 B=01000000000000 C=01999999999100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02311: 11.11.11.. if p # 13 A=00000000000000 B=01000000000000 C=01999999999100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=01000000000000 C=01999999999100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=01000000000000 C=00999999999100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=01000000000000 C=00999999999100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02304: 111...111. myp26: a + b -> a[w] A=01000000000000 B=01000000000000 C=00999999999100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02305: .1.11...1. mpy27: c - 1 -> c[p] A=01000000000000 B=01000000000000 C=09999999999100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02306: 11...1..11 -> 02304 if no carry go to myp26 A=01000000000000 B=01000000000000 C=09999999999100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02307: 1.11..111. mpy28: shift right a[w] A=00100000000000 B=01000000000000 C=09999999999100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02310: ....1111.. p + 1 -> p A=00100000000000 B=01000000000000 C=09999999999100 D=00000000000000 M=00000000000000 P=d S=0.......8... 02311: 11.11.11.. if p # 13 A=00100000000000 B=01000000000000 C=09999999999100 D=00000000000000 M=00000000000000 P=d S=0.......8... 02312: 11...1.111 -> 02305 then go to mpy27 A=00100000000000 B=01000000000000 C=09999999999100 D=00000000000000 M=00000000000000 P=d S=0.......8... 02313: .1111.1.1. c + 1 -> c[x] A=00100000000000 B=01000000000000 C=09999999999101 D=00000000000000 M=00000000000000 P=d S=0.......8... 02314: 1.1111111. nrm21: 0 -> a[s] A=00100000000000 B=01000000000000 C=09999999999101 D=00000000000000 M=00000000000000 P=d S=0.......8... 02315: 11....11.. 12 -> p A=00100000000000 B=01000000000000 C=09999999999101 D=00000000000000 M=00000000000000 P=c S=0.......8... 02316: ....1.111. 0 -> b[w] A=00100000000000 B=00000000000000 C=09999999999101 D=00000000000000 M=00000000000000 P=c S=0.......8... 02317: 1..11...1. nrm23: if a[p] >= 1 A=00100000000000 B=00000000000000 C=09999999999101 D=00000000000000 M=00000000000000 P=c S=0.......8... 02320: 11.1.11.11 -> 02326 then go to nrm24 A=00100000000000 B=00000000000000 C=09999999999101 D=00000000000000 M=00000000000000 P=c S=0.......8... 02321: .1....111. shift left a[w] A=01000000000000 B=00000000000000 C=09999999999101 D=00000000000000 M=00000000000000 P=c S=0.......8... 02322: .1.11.1.1. c - 1 -> c[x] A=01000000000000 B=00000000000000 C=09999999999100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02323: 1..11.111. if a[w] >= 1 A=01000000000000 B=00000000000000 C=09999999999100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02324: 11..111111 -> 02317 then go to nrm23 A=01000000000000 B=00000000000000 C=09999999999100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02317: 1..11...1. nrm23: if a[p] >= 1 A=01000000000000 B=00000000000000 C=09999999999100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02320: 11.1.11.11 -> 02326 then go to nrm24 A=01000000000000 B=00000000000000 C=09999999999100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02326: .1..1.1.1. nrm24: a -> b[x] A=01000000000000 B=00000000000000 C=09999999999100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02327: 111...111. a + b -> a[w] A=01000000000000 B=00000000000000 C=09999999999100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02330: 1..111111. if a[s] >= 1 A=01000000000000 B=00000000000000 C=09999999999100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02331: 11...11111 -> 02307 then go to mpy28 A=01000000000000 B=00000000000000 C=09999999999100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02332: 111.1..11. a exchange c[m] A=09999999999000 B=00000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02333: .11...111. c -> a[w] A=01000000000100 B=00000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02334: ....1.111. 0 -> b[w] A=01000000000100 B=00000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02335: 11....11.. nrm27: 12 -> p A=01000000000100 B=00000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02336: .1111.1.11 -> 02172 go to nrm26 A=01000000000100 B=00000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02172: ..1..1.1.. nrm26: if s2 = 0 A=01000000000100 B=00000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02173: 1..1.1..11 -> 02224 then go to rtn21 A=01000000000100 B=00000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=c S=0.......8... 02224: ..1..1.... -> 01225 rtn21: select rom 1 ; -> rtn11 A=01000000000100 B=00000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=c S=0.......8... 01225: ...1.1.1.. rtn11: if s1 = 0 A=01000000000100 B=00000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=c S=0.......8... 01226: 11.11.1.11 -> 01332 then go to rtn12 A=01000000000100 B=00000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=c S=0.......8... 01332: .....1.... -> 00333 rtn12: select rom 0 ; -> l00333 A=01000000000100 B=00000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=c S=0.......8... return from "*" overfow C = 1 exp 100 00333: .1.111.1.1 -> 00135 l00333: jsb of13 A=01000000000100 B=00000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=c S=0.......8... 00135: ....11.1.. of13: clear status A=01000000000100 B=00000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=c S=............ 00136: .11...111. c -> a[w] A=01000000000100 B=00000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=c S=............ 00137: 11....11.. of14: 12 -> p A=01000000000100 B=00000000000000 C=01000000000100 D=00000000000000 M=00000000000000 P=c S=............ 00140: .1..1.1.1. a -> b[x] A=01000000000100 B=00000000000100 C=01000000000100 D=00000000000000 M=00000000000000 P=c S=............ 00141: .11...1.1. c -> a[x] A=01000000000100 B=00000000000100 C=01000000000100 D=00000000000000 M=00000000000000 P=c S=............ 00142: .11.111.1. if c[xs] = 0 A=01000000000100 B=00000000000100 C=01000000000100 D=00000000000000 M=00000000000000 P=c S=............ 00143: .11.1...11 -> 00150 then go to of15 A=01000000000100 B=00000000000100 C=01000000000100 D=00000000000000 M=00000000000000 P=c S=............ 00144: ..1.1.1.1. 0 - c -> c[x] A=01000000000100 B=00000000000100 C=01000000000900 D=00000000000000 M=00000000000000 P=c S=............ 00145: .1.1111.1. c - 1 -> c[xs] A=01000000000100 B=00000000000100 C=01000000000800 D=00000000000000 M=00000000000000 P=c S=............ 00146: .1.1.11111 -> 00127 if no carry go to of11 A=01000000000100 B=00000000000100 C=01000000000800 D=00000000000000 M=00000000000000 P=c S=............ 00127: ..11.1..1. of11: 0 -> c[wp] A=01000000000100 B=00000000000100 C=00000000000000 D=00000000000000 M=00000000000000 P=c S=............ 00130: .1.111..1. c - 1 -> c[wp] A=01000000000100 B=00000000000100 C=09999999999999 D=00000000000000 M=00000000000000 P=c S=............ 00131: ..11.11.1. 0 -> c[xs] A=01000000000100 B=00000000000100 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00132: 111...1.1. a + b -> a[x] A=01000000000200 B=00000000000100 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00133: .1.111.111 -> 00135 if no carry go to of13 A=01000000000200 B=00000000000100 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00135: ....11.1.. of13: clear status A=01000000000200 B=00000000000100 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00136: .11...111. c -> a[w] A=09999999999099 B=00000000000100 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00137: 11....11.. of14: 12 -> p A=09999999999099 B=00000000000100 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00140: .1..1.1.1. a -> b[x] A=09999999999099 B=00000000000099 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00141: .11...1.1. c -> a[x] A=09999999999099 B=00000000000099 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00142: .11.111.1. if c[xs] = 0 A=09999999999099 B=00000000000099 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00143: .11.1...11 -> 00150 then go to of15 A=09999999999099 B=00000000000099 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00150: 111.1.1.1. of15: a exchange c[x] A=09999999999099 B=00000000000099 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00151: .1...1.1.. if s4 = 0 A=09999999999099 B=00000000000099 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00152: .1....1.11 -> 00102 then go to l00102 A=09999999999099 B=00000000000099 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00102: .1..1.111. l00102: a -> b[w] A=09999999999099 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00103: 1.11111.1. 0 -> a[xs] A=09999999999099 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00104: .1...1.11. shift left a[ms] A=99999999990099 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00105: 11.11.1.1. l00105: a - 1 -> a[x] A=99999999990098 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00106: 111.....11 -> 00340 if no carry go to l00340 A=99999999990098 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00340: 1.11.1.11. l00340: shift right a[ms] A=09999999999098 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00341: .....111.. p - 1 -> p A=09999999999098 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=b S=............ 00342: ..1.1.11.. if p # 2 A=09999999999098 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=b S=............ 00343: .1...1.111 -> 00105 then go to l00105 A=09999999999098 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=b S=............ 00105: 11.11.1.1. l00105: a - 1 -> a[x] A=09999999999097 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=b S=............ 00106: 111.....11 -> 00340 if no carry go to l00340 A=09999999999097 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=b S=............ 00340: 1.11.1.11. l00340: shift right a[ms] A=00999999999097 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=b S=............ 00341: .....111.. p - 1 -> p A=00999999999097 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=a S=............ 00342: ..1.1.11.. if p # 2 A=00999999999097 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=a S=............ 00343: .1...1.111 -> 00105 then go to l00105 A=00999999999097 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=a S=............ 00105: 11.11.1.1. l00105: a - 1 -> a[x] A=00999999999096 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=a S=............ 00106: 111.....11 -> 00340 if no carry go to l00340 A=00999999999096 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=a S=............ 00340: 1.11.1.11. l00340: shift right a[ms] A=00099999999096 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=a S=............ 00341: .....111.. p - 1 -> p A=00099999999096 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=9 S=............ 00342: ..1.1.11.. if p # 2 A=00099999999096 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=9 S=............ 00343: .1...1.111 -> 00105 then go to l00105 A=00099999999096 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=9 S=............ 00105: 11.11.1.1. l00105: a - 1 -> a[x] A=00099999999095 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=9 S=............ 00106: 111.....11 -> 00340 if no carry go to l00340 A=00099999999095 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=9 S=............ 00340: 1.11.1.11. l00340: shift right a[ms] A=00009999999095 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=9 S=............ 00341: .....111.. p - 1 -> p A=00009999999095 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=8 S=............ 00342: ..1.1.11.. if p # 2 A=00009999999095 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=8 S=............ 00343: .1...1.111 -> 00105 then go to l00105 A=00009999999095 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=8 S=............ 00105: 11.11.1.1. l00105: a - 1 -> a[x] A=00009999999094 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=8 S=............ 00106: 111.....11 -> 00340 if no carry go to l00340 A=00009999999094 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=8 S=............ 00340: 1.11.1.11. l00340: shift right a[ms] A=00000999999094 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=8 S=............ 00341: .....111.. p - 1 -> p A=00000999999094 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=7 S=............ 00342: ..1.1.11.. if p # 2 A=00000999999094 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=7 S=............ 00343: .1...1.111 -> 00105 then go to l00105 A=00000999999094 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=7 S=............ 00105: 11.11.1.1. l00105: a - 1 -> a[x] A=00000999999093 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=7 S=............ 00106: 111.....11 -> 00340 if no carry go to l00340 A=00000999999093 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=7 S=............ 00340: 1.11.1.11. l00340: shift right a[ms] A=00000099999093 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=7 S=............ 00341: .....111.. p - 1 -> p A=00000099999093 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=6 S=............ 00342: ..1.1.11.. if p # 2 A=00000099999093 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=6 S=............ 00343: .1...1.111 -> 00105 then go to l00105 A=00000099999093 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=6 S=............ 00105: 11.11.1.1. l00105: a - 1 -> a[x] A=00000099999092 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=6 S=............ 00106: 111.....11 -> 00340 if no carry go to l00340 A=00000099999092 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=6 S=............ 00340: 1.11.1.11. l00340: shift right a[ms] A=00000009999092 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=6 S=............ 00341: .....111.. p - 1 -> p A=00000009999092 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=5 S=............ 00342: ..1.1.11.. if p # 2 A=00000009999092 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=5 S=............ 00343: .1...1.111 -> 00105 then go to l00105 A=00000009999092 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=5 S=............ 00105: 11.11.1.1. l00105: a - 1 -> a[x] A=00000009999091 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=5 S=............ 00106: 111.....11 -> 00340 if no carry go to l00340 A=00000009999091 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=5 S=............ 00340: 1.11.1.11. l00340: shift right a[ms] A=00000000999091 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=5 S=............ 00341: .....111.. p - 1 -> p A=00000000999091 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=4 S=............ 00342: ..1.1.11.. if p # 2 A=00000000999091 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=4 S=............ 00343: .1...1.111 -> 00105 then go to l00105 A=00000000999091 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=4 S=............ 00105: 11.11.1.1. l00105: a - 1 -> a[x] A=00000000999090 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=4 S=............ 00106: 111.....11 -> 00340 if no carry go to l00340 A=00000000999090 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=4 S=............ 00340: 1.11.1.11. l00340: shift right a[ms] A=00000000099090 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=4 S=............ 00341: .....111.. p - 1 -> p A=00000000099090 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=3 S=............ 00342: ..1.1.11.. if p # 2 A=00000000099090 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=3 S=............ 00343: .1...1.111 -> 00105 then go to l00105 A=00000000099090 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=3 S=............ 00105: 11.11.1.1. l00105: a - 1 -> a[x] A=00000000099089 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=3 S=............ 00106: 111.....11 -> 00340 if no carry go to l00340 A=00000000099089 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=3 S=............ 00340: 1.11.1.11. l00340: shift right a[ms] A=00000000009089 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=3 S=............ 00341: .....111.. p - 1 -> p A=00000000009089 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=2 S=............ 00342: ..1.1.11.. if p # 2 A=00000000009089 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=2 S=............ 00343: .1...1.111 -> 00105 then go to l00105 A=00000000009089 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=2 S=............ 00344: 11....11.. 12 -> p A=00000000009089 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00345: 1.111.111. 0 -> a[w] A=00000000000000 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00346: 1.1111.11. l00346: 0 -> a[ms] A=00000000000000 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00347: 11111...1. a + 1 -> a[p] A=01000000000000 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00350: 11111...1. a + 1 -> a[p] A=02000000000000 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=c S=............ 00351: ..1...11.. 2 -> p A=02000000000000 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=2 S=............ 00352: ....1111.. l00352: p + 1 -> p A=02000000000000 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=3 S=............ 00353: 11.11...1. a - 1 -> a[p] A=02000000009000 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=3 S=............ 00354: 111.111111 -> 00357 if no carry go to l00357 A=02000000009000 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=3 S=............ 00355: ........1. if b[p] = 0 A=02000000009000 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=3 S=............ 00356: 111.1.1.11 -> 00352 then go to l00352 A=02000000009000 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=3 S=............ 00357: 11111...1. l00357: a + 1 -> a[p] A=02000000000000 B=09999999999099 C=09999999999099 D=00000000000000 M=00000000000000 P=3 S=............ 00360: 11..1.111. a exchange b[w] A=09999999999099 B=02000000000000 C=09999999999099 D=00000000000000 M=00000000000000 P=3 S=............ 00361: ....11.... return A=09999999999099 B=02000000000000 C=09999999999099 D=00000000000000 M=00000000000000 P=3 S=............ 00334: .111...1.. 1 -> s7 A=09999999999099 B=02000000000000 C=09999999999099 D=00000000000000 M=00000000000000 P=3 S=.......7.... 00335: 1111.111.1 -> 00367 fst2zx: jsb dsp1 A=09999999999099 B=02000000000000 C=09999999999099 D=00000000000000 M=00000000000000 P=3 S=.......7.... 00367: 1.1.1..1.. dsp1: 0 -> s10 A=09999999999099 B=02000000000000 C=09999999999099 D=00000000000000 M=00000000000000 P=3 S=.......7.... 00370: 11....1111 -> 00303 go to dsp7 A=09999999999099 B=02000000000000 C=09999999999099 D=00000000000000 M=00000000000000 P=3 S=.......7.... 00303: .11..1111. dsp7: c -> a[s] A=09999999999099 B=02000000000000 C=09999999999099 D=00000000000000 M=00000000000000 P=3 S=.......7.... 00304: 1...1..1.. l00304: 0 -> s8 A=09999999999099 B=02000000000000 C=09999999999099 D=00000000000000 M=00000000000000 P=3 S=.......7.... 00305: 11..111111 -> 00317 go to dsp8 A=09999999999099 B=02000000000000 C=09999999999099 D=00000000000000 M=00000000000000 P=3 S=.......7.... 00317: ....1..1.. dsp8: 0 -> s0 A=09999999999099 B=02000000000000 C=09999999999099 D=00000000000000 M=00000000000000 P=3 S=.......7.... 00320: .....111.. dsp6: p - 1 -> p A=09999999999099 B=02000000000000 C=09999999999099 D=00000000000000 M=00000000000000 P=2 S=.......7.... 00321: 11..1.11.. if p # 12 A=09999999999099 B=02000000000000 C=09999999999099 D=00000000000000 M=00000000000000 P=2 S=.......7....