00000: jsb 00137
00001: delayed select rom 5
00002: goto 00117
00003: delayed select rom 2
00004: goto 00173
00005: 1 -> s 5
00006: 12 -> p
00007: rom 2
00010: c + 1 -> c[p]
00011: jsb 00231
00012: 12 -> p
00013: load 5
00014: load 0
00015: if p # 14
00016: goto 00013
00017: a <-> c[w]
00020: shift left a[w]
00021: 12 -> p
00022: load 2
00023: load 3
00024: 11 -> p
00025: goto 00043
00026: jsb 00134
00027: if s6 = 0
00030: goto 00005
00031: 1 -> s 5
00032: 1 -> s 10
00033: 1 -> s 9
00034: 12 -> p
00035: delayed select rom 2
00036: goto 00002
00037: jsb 00134
00040: if s6 = 0
00041: goto 00006
00042: goto 00032
00043: c + 1 -> c[x]
00044: c -> data address
00045: a <-> c[w]
00046: goto 00334
00047: c -> stack
00050: 1 -> s 5
00051: jsb 00330
00052: goto 00176
00053: 0 -> s 1
00054: 0 -> s 2
00055: 12 -> p
00056: 0 -> b[w]
00057: rom 6
00060: a -> b[w]
00061: goto 00270
00062: delayed select rom 5
00063: goto 00021
00064: jsb 00144
00065: jsb 00134
00066: if s4 = 0
00067: goto 00204
00070: c -> a[w]
00071: jsb 00001
00072: goto 00207
00073: 6 -> p
00074: c <-> m
00075: return
00076: delayed select rom 2
00077: goto 00140
00100: jsb 00073
00101: load 9
00102: goto 00274
00103: delayed select rom 2
00104: goto 00150
00105: no operation
00106: jsb 00144
00107: if s7 = 0
00110: goto 00112
00111: c -> stack
00112: jsb 00224
00113: goto 00207
00114: c -> a[w]
00115: 0 -> c[w]
00116: 12 -> p
00117: c - 1 -> c[p]
00120: c + 1 -> c[x]
00121: goto 00310
00122: no operation
00123: goto 00064
00124: jsb 00230
00125: goto 00207
00126: no operation
00127: 0 - c -> c[p]
00130: 0 - c -> c[p]
00131: goto 00250
00132: c <-> m
00133: goto 00201
00134: rom 2
00135: delayed select rom 5
00136: goto 00035
00137: jsb 00226
00140: 1 -> s 6
00141: jsb 00230
00142: 12 -> p
00143: goto 00010
00144: rom 5
00145: 0 -> s 5
00146: 1 -> s 4
00147: stack -> a
00150: jsb 00306
00151: jsb 00062
00152: goto 00060
00153: c <-> m
00154: 6 -> p
00155: c + 1 -> c[p]
00156: c - 1 -> c[p]
00157: goto 00127
00160: c <-> m
00161: a - 1 -> a[x]
00162: a - 1 -> a[x]
00163: jsb 00253
00164: jsb 00224
00165: jsb 00001
00166: jsb 00062
00167: c -> stack
00170: jsb 00103
00171: stack -> a
00172: c -> stack
00173: a <-> c[w]
00174: 1 -> s 9
00175: goto 00050
00176: c -> a[w]
00177: if s4 = 0
00200: goto 00153
00201: jsb 00330
00202: jsb 00003
00203: goto 00342
00204: if c[s] >= 1
00205: goto 00376
00206: jsb 00053
00207: rom 1
00210: if s5 = 0
00211: goto 00207
00212: if s10 = 0
00213: goto 00145
00214: 0 -> s 10
00215: stack -> a
00216: c -> stack
00217: a -> b[w]
00220: goto 00270
00221: jsb 00073
00222: load 0
00223: goto 00274
00224: delayed select rom 2
00225: goto 00216
00226: clear s
00227: clearregs
00230: 0 -> c[w]
00231: c + 1 -> c[x]
00232: 12 -> p
00233: if s6 = 0
00234: goto 00236
00235: c + 1 -> c[p]
00236: 11 -> p
00237: c -> data address
00240: b <-> c[w]
00241: c -> data
00242: c -> stack
00243: b <-> c[w]
00244: c + 1 -> c[p]
00245: goto 00237
00246: b -> c[w]
00247: return
00250: c <-> m
00251: jsb 00114
00252: jsb 00135
00253: jsb 00312
00254: jsb 00001
00255: jsb 00062
00256: goto 00201
00257: jsb 00134
00260: if s4 = 0
00261: goto 00263
00262: 0 - c - 1 -> c[s]
00263: 0 -> s 4
00264: 1 -> s 5
00265: 1 -> s 10
00266: no operation
00267: b <-> c[w]
00270: delayed select group 1
00271: rom 2
00272: jsb 00073
00273: load 1
00274: c <-> m
00275: delayed select rom 2
00276: goto 00023
00277: jsb 00144
00300: if s7 = 0
00301: goto 00303
00302: c -> stack
00303: jsb 00312
00304: c + c -> c[w]
00305: goto 00207
00306: delayed select rom 5
00307: goto 00230
00310: rom 1
00311: no operation
00312: 0 -> s 1
00313: rom 6
00314: jsb 00330
00315: if s10 = 0
00316: goto 00324
00317: if s9 = 0
00320: goto 00164
00321: jsb 00224
00322: jsb 00001
00323: no operation
00324: c -> stack
00325: 0 -> s 9
00326: jsb 00103
00327: goto 00207
00330: 1 -> s 3
00331: 0 -> s 11
00332: 1 -> s 8
00333: return
00334: c -> data
00335: a <-> c[w]
00336: c + 1 -> c[p]
00337: goto 00044
00340: clearregs
00341: goto 00370
00342: stack -> a
00343: 1 -> s 1
00344: if s9 = 0
00345: goto 00350
00346: goto 00054
00347: rom 4
00350: a <-> c[w]
00351: 0 -> c[x]
00352: 0 -> p
00353: load 5
00354: 0 - c -> c[x]
00355: a <-> c[w]
00356: if c[xs] = 0
00357: goto 00054
00360: if a >= c[x]
00361: goto 00363
00362: goto 00054
00363: c -> a[w]
00364: if s4 = 0
00365: goto 00314
00366: delayed select rom 3
00367: goto 00215
00370: 10 -> p
00371: load 1
00372: 7 -> p
00373: load 2
00374: delayed select rom 2
00375: goto 00066
00376: delayed select rom 3
00377: goto 00302
00400: 1 -> s 1
00401: goto 00471
00402: 0 -> c[xs]
00403: jsb 00776
00404: no operation
00405: c - 1 -> c[p]
00406: goto 00674
00407: jsb 00540
00410: if s8 = 0
00411: goto 00667
00412: b -> c[w]
00413: goto 00671
00414: delayed select rom 2
00415: goto 00603
00416: delayed select rom 5
00417: goto 00535
00420: c - 1 -> c[p]
00421: goto 00435
00422: c <-> m
00423: if c[s] >= 1
00424: goto 00545
00425: c <-> m
00426: goto 00475
00427: if s3 = 0
00430: goto 00537
00431: if s11 = 0
00432: goto 00653
00433: delayed select rom 5
00434: goto 00716
00435: c <-> m
00436: if c[s] = 0
00437: goto 00441
00440: jsb 00757
00441: c <-> m
00442: c - 1 -> c[p]
00443: goto 00460
00444: jsb 00644
00445: goto 00573
00446: if s1 = 0
00447: goto 00416
00450: a <-> c[w]
00451: c <-> m
00452: 8 -> p
00453: 0 - c -> c[xs]
00454: goto 00716
00455: load 1
00456: goto 00717
00457: no operation
00460: c - 1 -> c[p]
00461: goto 00502
00462: jsb 00644
00463: goto 00771
00464: b -> c[w]
00465: goto 00613
00466: delayed select rom 5
00467: goto 00421
00470: c <-> m
00471: jsb 00537
00472: if s9 = 0
00473: goto 00464
00474: goto 00613
00475: jsb 00723
00476: if s2 = 0
00477: goto 00446
00500: delayed select rom 3
00501: goto 00766
00502: c - 1 -> c[p]
00503: goto 00517
00504: jsb 00644
00505: jsb 00754
00506: jsb 00760
00507: c <-> m
00510: 0 -> c[xs]
00511: c + 1 -> c[xs]
00512: 1 -> s 2
00513: goto 00470
00514: delayed select rom 2
00515: goto 00573
00516: rom 5
00517: c - 1 -> c[p]
00520: goto 00657
00521: jsb 00644
00522: 0 -> b[w]
00523: jsb 00723
00524: clear s
00525: goto 00471
00526: if s7 = 0
00527: goto 00532
00530: b <-> c[w]
00531: c -> stack
00532: 1 -> s 9
00533: goto 00563
00534: rom 2
00535: c - 1 -> c[p]
00536: goto 00405
00537: 0 -> s 8
00540: 0 -> s 3
00541: 0 -> s 11
00542: return
00543: no operation
00544: rom 5
00545: c - 1 -> c[s]
00546: if c[s] = 0
00547: goto 00725
00550: a <-> c[w]
00551: c <-> m
00552: 0 -> p
00553: c -> a[p]
00554: c + c -> c[p]
00555: goto 00707
00556: a <-> c[p]
00557: c <-> m
00560: a <-> c[w]
00561: jsb 00757
00562: goto 00423
00563: 0 -> c[w]
00564: 0 -> a[w]
00565: 12 -> p
00566: c - 1 -> c[wp]
00567: c + 1 -> c[s]
00570: c + 1 -> c[s]
00571: b <-> c[w]
00572: goto 00765
00573: jsb 00544
00574: jsb 00534
00575: jsb 00723
00576: stack -> a
00577: a <-> c[w]
00600: c -> stack
00601: c - 1 -> c[x]
00602: c - 1 -> c[x]
00603: jsb 00516
00604: goto 00610
00605: stack -> a
00606: c -> stack
00607: return
00610: clear s
00611: jsb 00466
00612: 1 -> s 7
00613: delayed select group 1
00614: goto 00601
00615: delayed select rom 5
00616: goto 00627
00617: if s4 = 0
00620: goto 00623
00621: if c[m] >= 1
00622: goto 00747
00623: c <-> m
00624: c -> a[x]
00625: 1 -> p
00626: shift left a[w]
00627: p + 1 -> p
00630: if p # 4
00631: goto 00626
00632: a <-> c[wp]
00633: 12 -> p
00634: if c[p] = 0
00635: goto 00637
00636: c - 1 -> c[m]
00637: c <-> m
00640: goto 00747
00641: if s11 = 0
00642: goto 00721
00643: goto 00656
00644: 0 -> p
00645: c - 1 -> c[p]
00646: c - 1 -> c[p]
00647: goto 00651
00650: rom 4
00651: c - 1 -> c[p]
00652: goto 00654
00653: rom 2
00654: c - 1 -> c[p]
00655: goto 00535
00656: rom 3
00657: a <-> c[w]
00660: c <-> m
00661: a <-> c[x]
00662: 0 -> s 8
00663: goto 00733
00664: if s4 = 0
00665: goto 00623
00666: goto 00742
00667: jsb 00544
00670: jsb 00760
00671: c <-> m
00672: delayed select group 1
00673: rom 2
00674: c - 1 -> c[p]
00675: goto 00433
00676: jsb 00754
00677: if s2 = 0
00700: goto 00762
00701: jsb 00414
00702: 2 -> p
00703: load 2
00704: if a >= c[xs]
00705: goto 00761
00706: a + c -> a[xs]
00707: jsb 00414
00710: goto 00471
00711: if s8 = 0
00712: goto 00427
00713: if s3 = 0
00714: goto 00650
00715: goto 00641
00716: load 0
00717: delayed select rom 2
00720: goto 00554
00721: delayed select rom 0
00722: goto 00730
00723: 0 -> s 8
00724: rom 3
00725: a <-> c[w]
00726: c <-> m
00727: shift left a[wp]
00730: 0 -> p
00731: c -> a[p]
00732: a <-> c[w]
00733: c <-> m
00734: a <-> c[w]
00735: jsb 00544
00736: jsb 00514
00737: jsb 00605
00740: if s6 = 0
00741: goto 00664
00742: jsb 00615
00743: if s6 = 0
00744: goto 00617
00745: if c[s] = 0
00746: goto 00623
00747: jsb 00605
00750: a <-> c[w]
00751: jsb 00767
00752: delayed select rom 2
00753: goto 00423
00754: 0 -> s 8
00755: rom 3
00756: no operation
00757: 0 -> c[s]
00760: rom 3
00761: jsb 00414
00762: jsb 00760
00763: if s9 = 0
00764: goto 00526
00765: 1 -> s 7
00766: goto 00471
00767: delayed select rom 2
00770: goto 00550
00771: c <-> m
00772: if s6 = 0
00773: goto 00402
00774: 0 -> c[xs]
00775: c + 1 -> c[xs]
00776: c <-> m
00777: jsb 00760
01000: jsb 01064
01001: goto 01375
01002: if c[m] = 0
01003: goto 01111
01004: if c[s] >= 1
01005: goto 01111
01006: if s9 = 0
01007: goto 01072
01010: 1 -> s 2
01011: c -> a[w]
01012: if s10 = 0
01013: goto 01074
01014: 0 -> a[w]
01015: a - c -> a[m]
01016: shift right a[w]
01017: c - 1 -> c[s]
01020: rom 7
01021: delayed select rom 5
01022: goto 01230
01023: jsb 01254
01024: jsb 01360
01025: b <-> c[w]
01026: goto 01070
01027: c -> stack
01030: a <-> c[w]
01031: 1 -> s 10
01032: 12 -> p
01033: goto 01010
01034: rom 5
01035: jsb 01144
01036: jsb 01324
01037: stack -> a
01040: c -> stack
01041: a <-> c[w]
01042: goto 01207
01043: delayed select group 1
01044: goto 01270
01045: jsb 01144
01046: jsb 01135
01047: jsb 01324
01050: stack -> a
01051: if a[s] >= 1
01052: goto 01115
01053: if a[m] >= 1
01054: goto 01027
01055: goto 01002
01056: 0 -> c[w]
01057: 12 -> p
01060: load 4
01061: c + 1 -> c[x]
01062: return
01063: goto 01035
01064: delayed select rom 5
01065: goto 01117
01066: c <-> m
01067: clear s
01070: rom 1
01071: no operation
01072: a <-> c[w]
01073: goto 01207
01074: if s5 = 0
01075: goto 01101
01076: delayed select rom 7
01077: goto 01011
01100: no operation
01101: rom 7
01102: b -> c[w]
01103: 0 - c - 1 -> c[s]
01104: jsb 01023
01105: jsb 01360
01106: 1 -> s 4
01107: goto 01070
01110: no operation
01111: if s9 = 0
01112: goto 01115
01113: 0 -> s 9
01114: goto 01120
01115: a <-> c[w]
01116: c -> stack
01117: a <-> c[w]
01120: delayed select rom 3
01121: goto 01302
01122: jsb 01324
01123: jsb 01360
01124: if s9 = 0
01125: goto 01102
01126: a <-> c[w]
01127: if s10 = 0
01130: goto 01200
01131: 0 - c - 1 -> c[xs]
01132: c -> a[w]
01133: delayed select rom 5
01134: goto 01152
01135: 0 -> s 1
01136: 0 -> s 2
01137: goto 01220
01140: jsb 01254
01141: jsb 01203
01142: 0 -> p
01143: goto 01325
01144: rom 5
01145: delayed select rom 0
01146: goto 01053
01147: no operation
01150: 1 -> s 1
01151: goto 01217
01152: delayed select rom 5
01153: goto 01021
01154: shift left a[w]
01155: p - 1 -> p
01156: if p # 0
01157: goto 01154
01160: 7 -> p
01161: a <-> c[p]
01162: c <-> m
01163: a <-> c[w]
01164: jsb 01254
01165: jsb 01144
01166: goto 01023
01167: no operation
01170: no operation
01171: delayed select rom 5
01172: goto 01227
01173: 1 -> s 1
01174: goto 01136
01175: a <-> c[w]
01176: delayed select rom 0
01177: goto 01047
01200: 0 - c - 1 -> c[s]
01201: c -> a[w]
01202: goto 01070
01203: c <-> m
01204: a <-> c[w]
01205: c <-> m
01206: goto 01310
01207: rom 1
01210: if s4 = 0
01211: goto 01214
01212: jsb 01064
01213: goto 01207
01214: jsb 01034
01215: goto 01207
01216: 0 -> s 1
01217: 1 -> s 2
01220: b <-> c[w]
01221: 0 -> c[w]
01222: c + 1 -> c[x]
01223: 12 -> p
01224: load 2
01225: if s1 = 0
01226: goto 01230
01227: load 1
01230: c -> data address
01231: if s2 = 0
01232: goto 01311
01233: data -> c
01234: if s1 = 0
01235: goto 01310
01236: a <-> c[w]
01237: stack -> a
01240: a <-> c[w]
01241: data -> c
01242: c -> stack
01243: b -> c[w]
01244: goto 01310
01245: jsb 01034
01246: c -> stack
01247: c - 1 -> c[xs]
01250: if c[xs] = 0
01251: goto 01275
01252: goto 01261
01253: no operation
01254: 1 -> s 3
01255: 0 -> s 11
01256: 0 -> s 8
01257: return
01260: no operation
01261: 0 - c - 1 -> c[xs]
01262: if c[xs] = 0
01263: goto 01270
01264: c - 1 -> c[xs]
01265: if c[xs] >= 1
01266: goto 01271
01267: c - 1 -> c[xs]
01270: jsb 01064
01271: 0 -> c[w]
01272: c + 1 -> c[p]
01273: jsb 01021
01274: jsb 01145
01275: 0 -> a[s]
01276: jsb 01216
01277: jsb 01064
01300: stack -> a
01301: c -> stack
01302: a <-> c[w]
01303: jsb 01152
01304: delayed select rom 0
01305: goto 01201
01306: b -> c[w]
01307: c -> data
01310: rom 1
01311: if s1 = 0
01312: goto 01306
01313: b -> c[w]
01314: a -> b[w]
01315: stack -> a
01316: a <-> c[w]
01317: c -> data
01320: c -> stack
01321: a <-> b[w]
01322: goto 01243
01323: no operation
01324: rom 3
01325: c -> a[p]
01326: jsb 01203
01327: jsb 01144
01330: jsb 01135
01331: b <-> c[w]
01332: m -> c
01333: 0 -> a[w]
01334: 0 -> p
01335: c -> a[p]
01336: 0 -> c[w]
01337: a - 1 -> a[x]
01340: goto 01043
01341: b -> c[w]
01342: jsb 01173
01343: stack -> a
01344: 1 -> s 10
01345: if s4 = 0
01346: goto 01175
01347: if c[w] >= 1
01350: goto 01245
01351: if a[w] >= 1
01352: goto 01355
01353: c -> stack
01354: goto 01207
01355: a -> b[w]
01356: delayed select rom 3
01357: goto 01210
01360: rom 3
01361: a <-> b[w]
01362: if s5 = 0
01363: goto 01210
01364: jsb 01056
01365: jsb 01021
01366: 0 -> c[w]
01367: 12 -> p
01370: load 1
01371: load 8
01372: if s4 = 0
01373: goto 01000
01374: jsb 01034
01375: jsb 01056
01376: jsb 01171
01377: goto 01207
01400: goto 01775
01401: a <-> c[w]
01402: 12 -> p
01403: load 1
01404: c + 1 -> c[x]
01405: c -> data address
01406: c <-> m
01407: a <-> c[w]
01410: c <-> m
01411: jsb 01544
01412: c <-> m
01413: c - 1 -> c[xs]
01414: goto 01603
01415: c <-> m
01416: c -> data
01417: goto 01607
01420: jsb 01657
01421: jsb 01544
01422: delayed select group 1
01423: goto 01477
01424: jsb 01544
01425: jsb 01725
01426: down rotate
01427: goto 01607
01430: jsb 01761
01431: if s9 = 0
01432: goto 01647
01433: b <-> c[w]
01434: if a[m] >= 1
01435: goto 01465
01436: 12 -> p
01437: 0 -> a[w]
01440: 0 -> c[w]
01441: a + 1 -> a[p]
01442: c - 1 -> c[wp]
01443: load 2
01444: goto 01465
01445: goto 01571
01446: c - 1 -> c[p]
01447: c + 1 -> c[p]
01450: goto 01711
01451: c <-> m
01452: jsb 01731
01453: jsb 01723
01454: jsb 01461
01455: jsb 01457
01456: goto 01712
01457: delayed select rom 5
01460: goto 01435
01461: delayed select rom 0
01462: goto 01712
01463: goto 01424
01464: no operation
01465: 0 -> c[x]
01466: 1 -> s 10
01467: b <-> c[w]
01470: rom 1
01471: c - 1 -> c[xs]
01472: goto 01476
01473: jsb 01740
01474: jsb 01723
01475: goto 01551
01476: c <-> m
01477: if c[w] = 0
01500: goto 01702
01501: jsb 01741
01502: jsb 01457
01503: goto 01551
01504: no operation
01505: goto 01746
01506: 0 -> a[w]
01507: 0 -> p
01510: c -> a[p]
01511: shift left a[w]
01512: p + 1 -> p
01513: if p # 12
01514: goto 01511
01515: a <-> c[w]
01516: c -> data address
01517: a <-> c[w]
01520: return
01521: no operation
01522: if s6 = 0
01523: goto 01430
01524: jsb 01544
01525: jsb 01534
01526: delayed select group 1
01527: rom 2
01530: delayed select rom 5
01531: goto 01630
01532: delayed select rom 2
01533: goto 01550
01534: rom 2
01535: if s1 = 0
01536: goto 01540
01537: 0 -> s 9
01540: if s2 = 0
01541: goto 01655
01542: goto 01607
01543: no operation
01544: rom 5
01545: c - 1 -> c[xs]
01546: goto 01667
01547: jsb 01740
01550: jsb 01530
01551: jsb 01674
01552: data -> c
01553: a <-> c[w]
01554: c -> data
01555: a <-> c[w]
01556: goto 01607
01557: delayed select rom 2
01560: goto 01616
01561: c - 1 -> c[xs]
01562: goto 01545
01563: jsb 01506
01564: c <-> m
01565: if s7 = 0
01566: goto 01606
01567: c -> stack
01570: goto 01606
01571: jsb 01544
01572: jsb 01534
01573: jsb 01725
01574: if c[w] = 0
01575: goto 01702
01576: 0 -> a[w]
01577: 12 -> p
01600: a + 1 -> a[p]
01601: jsb 01457
01602: goto 01607
01603: c - 1 -> c[xs]
01604: goto 01663
01605: goto 01564
01606: data -> c
01607: rom 1
01610: jsb 01657
01611: jsb 01461
01612: if b[s] = 0
01613: goto 01615
01614: c - 1 -> c[s]
01615: jsb 01657
01616: c -> stack
01617: c -> a[w]
01620: jsb 01532
01621: if s10 = 0
01622: goto 01634
01623: jsb 01557
01624: if c[s] = 0
01625: goto 01634
01626: jsb 01461
01627: c + c -> c[w]
01630: if a[s] >= 1
01631: goto 01633
01632: c - 1 -> c[s]
01633: jsb 01530
01634: a <-> c[w]
01635: c -> a[w]
01636: c <-> m
01637: 6 -> p
01640: c + 1 -> c[p]
01641: c - 1 -> c[p]
01642: goto 01446
01643: c <-> m
01644: a + 1 -> a[x]
01645: a + 1 -> a[x]
01646: jsb 01454
01647: if s7 = 0
01650: goto 01653
01651: b <-> c[w]
01652: c -> stack
01653: 1 -> s 9
01654: goto 01436
01655: delayed select rom 1
01656: goto 01711
01657: 1 -> s 3
01660: 1 -> s 11
01661: 1 -> s 8
01662: return
01663: c - 1 -> c[xs]
01664: goto 01561
01665: jsb 01506
01666: goto 01415
01667: c - 1 -> c[xs]
01670: goto 01471
01671: jsb 01740
01672: jsb 01736
01673: goto 01551
01674: delayed select rom 5
01675: goto 01421
01676: no operation
01677: jsb 01657
01700: jsb 01532
01701: jsb 01557
01702: c <-> m
01703: 12 -> p
01704: 0 -> c[p]
01705: c <-> m
01706: clear s
01707: 1 -> s 5
01710: goto 01467
01711: c <-> m
01712: jsb 01674
01713: 0 -> s 9
01714: if s10 = 0
01715: goto 01607
01716: stack -> a
01717: c -> stack
01720: 0 -> a[s]
01721: a <-> c[w]
01722: goto 01607
01723: delayed select rom 5
01724: goto 01517
01725: if s4 = 0
01726: goto 01756
01727: rom 0
01730: no operation
01731: delayed select rom 0
01732: goto 01514
01733: if s2 = 0
01734: goto 01535
01735: goto 01537
01736: delayed select rom 5
01737: goto 01627
01740: c <-> m
01741: c -> a[w]
01742: data -> c
01743: a <-> c[w]
01744: c -> data
01745: return
01746: jsb 01725
01747: jsb 01761
01750: c <-> m
01751: 0 -> c[xs]
01752: 1 -> s 2
01753: c <-> m
01754: goto 01470
01755: no operation
01756: if s6 = 0
01757: goto 01655
01760: goto 01727
01761: 0 -> s 6
01762: 0 -> s 2
01763: 0 -> s 4
01764: 0 -> s 1
01765: goto 01655
01766: jsb 01657
01767: c <-> m
01770: a <-> c[w]
01771: c <-> m
01772: 0 -> p
01773: c -> a[p]
01774: a <-> c[w]
01775: shift left a[w]
01776: p + 1 -> p
01777: if p # 11
02000: return
02001: jsb 02232
02002: jsb 02116
02003: stack -> a
02004: jsb 02227
02005: c -> stack
02006: jsb 02061
02007: jsb 02270
02010: c -> a[w]
02011: jsb 02116
02012: jsb 02271
02013: jsb 02137
02014: jsb 02103
02015: jsb 02267
02016: jsb 02226
02017: if s6 = 0
02020: goto 02246
02021: jsb 02141
02022: jsb 02117
02023: jsb 02135
02024: jsb 02061
02025: jsb 02264
02026: c -> a[w]
02027: jsb 02270
02030: jsb 02116
02031: jsb 02117
02032: jsb 02061
02033: jsb 02266
02034: c -> a[w]
02035: jsb 02267
02036: jsb 02116
02037: stack -> a
02040: jsb 02226
02041: jsb 02271
02042: jsb 02103
02043: c -> stack
02044: goto 02210
02045: delayed select rom 5
02046: goto 02054
02047: if s7 = 0
02050: goto 02310
02051: c - 1 -> c[xs]
02052: if c[xs] >= 1
02053: goto 02310
02054: jsb 02243
02055: jsb 02266
02056: jsb 02117
02057: jsb 02243
02060: goto 02206
02061: a <-> c[w]
02062: goto 02243
02063: jsb 02144
02064: 0 -> s 4
02065: 1 -> s 7
02066: jsb 02134
02067: jsb 02135
02070: goto 02006
02071: if s4 = 0
02072: goto 02112
02073: 0 -> s 4
02074: jsb 02243
02075: jsb 02271
02076: 0 -> a[w]
02077: a + 1 -> a[p]
02100: goto 02321
02101: delayed select rom 5
02102: goto 02021
02103: delayed select rom 5
02104: goto 02035
02105: jsb 02234
02106: 1 -> s 6
02107: goto 02262
02110: delayed select rom 3
02111: goto 02325
02112: c -> stack
02113: jsb 02230
02114: goto 02260
02115: goto 02047
02116: rom 5
02117: stack -> a
02120: c -> stack
02121: return
02122: goto 02255
02123: jsb 02240
02124: jsb 02266
02125: 1 -> s 7
02126: goto 02321
02127: jsb 02232
02130: jsb 02243
02131: jsb 02270
02132: 1 -> s 4
02133: goto 02321
02134: rom 2
02135: delayed select rom 2
02136: goto 02173
02137: if c[s] >= 1
02140: goto 02276
02141: if c[m] = 0
02142: goto 02276
02143: return
02144: rom 5
02145: 0 -> a[w]
02146: a + 1 -> a[p]
02147: jsb 02226
02150: jsb 02376
02151: jsb 02117
02152: jsb 02135
02153: jsb 02061
02154: jsb 02266
02155: c -> a[w]
02156: jsb 02116
02157: jsb 02271
02160: jsb 02103
02161: jsb 02265
02162: jsb 02226
02163: jsb 02117
02164: goto 02006
02165: jsb 02270
02166: jsb 02117
02167: jsb 02230
02170: a -> b[w]
02171: jsb 02117
02172: b -> c[w]
02173: a <-> c[w]
02174: jsb 02103
02175: if s4 = 0
02176: goto 02201
02177: 0 -> c[s]
02200: jsb 02236
02201: jsb 02101
02202: if s7 = 0
02203: goto 02207
02204: 0 -> s 7
02205: goto 02166
02206: jsb 02270
02207: rom 1
02210: jsb 02061
02211: jsb 02270
02212: c -> a[w]
02213: jsb 02266
02214: jsb 02116
02215: jsb 02271
02216: jsb 02103
02217: jsb 02264
02220: jsb 02226
02221: if s7 = 0
02222: goto 02001
02223: jsb 02117
02224: a <-> c[w]
02225: goto 02166
02226: 0 - c - 1 -> c[s]
02227: rom 5
02230: delayed select rom 2
02231: goto 02150
02232: delayed select rom 2
02233: goto 02216
02234: delayed select rom 3
02235: goto 02361
02236: delayed select rom 0
02237: goto 02053
02240: stack -> a
02241: a <-> c[w]
02242: c -> stack
02243: c -> a[w]
02244: 12 -> p
02245: return
02246: if s4 = 0
02247: goto 02343
02250: goto 02166
02251: 0 -> s 3
02252: 0 -> s 11
02253: 1 -> s 8
02254: return
02255: jsb 02144
02256: jsb 02110
02257: c -> stack
02260: b <-> c[w]
02261: clear s
02262: delayed select rom 1
02263: goto 02071
02264: c - 1 -> c[p]
02265: c - 1 -> c[p]
02266: c - 1 -> c[p]
02267: c - 1 -> c[p]
02270: c - 1 -> c[p]
02271: a - c -> c[w]
02272: c -> data address
02273: no operation
02274: data -> c
02275: return
02276: rom 3
02277: if s7 = 0
02300: goto 02071
02301: 0 -> s 7
02302: jsb 02232
02303: jsb 02243
02304: jsb 02264
02305: a <-> c[w]
02306: stack -> a
02307: goto 02317
02310: jsb 02135
02311: 0 -> s 7
02312: 1 -> s 10
02313: jsb 02240
02314: jsb 02265
02315: a <-> c[w]
02316: c -> a[w]
02317: jsb 02116
02320: data -> c
02321: a <-> c[w]
02322: if s6 = 0
02323: goto 02325
02324: 0 - c - 1 -> c[s]
02325: jsb 02227
02326: jsb 02101
02327: c -> data
02330: if s10 = 0
02331: goto 02277
02332: if s7 = 0
02333: goto 02123
02334: if s4 = 0
02335: goto 02127
02336: jsb 02232
02337: jsb 02243
02340: jsb 02267
02341: 0 -> s 10
02342: goto 02315
02343: jsb 02141
02344: if s7 = 0
02345: goto 02371
02346: 0 -> s 7
02347: goto 02024
02350: jsb 02251
02351: jsb 02144
02352: jsb 02134
02353: jsb 02135
02354: 1 -> s 7
02355: jsb 02061
02356: jsb 02271
02357: if s6 = 0
02360: goto 02145
02361: jsb 02137
02362: jsb 02117
02363: jsb 02135
02364: jsb 02061
02365: jsb 02266
02366: jsb 02117
02367: jsb 02061
02370: goto 02165
02371: stack -> a
02372: jsb 02103
02373: c -> stack
02374: jsb 02230
02375: goto 02207
02376: if c[s] = 0
02377: goto 02276
02400: c - 1 -> c[w]
02401: if p # 3
02402: goto 02404
02403: goto 02410
02404: if s7 = 0
02405: goto 02407
02406: p - 1 -> p
02407: shift right c[wp]
02410: 0 -> a[x]
02411: b <-> c[w]
02412: goto 02532
02413: 0 -> c[wp]
02414: c - 1 -> c[wp]
02415: 0 -> c[xs]
02416: a + b -> a[x]
02417: goto 02722
02420: 0 -> c[w]
02421: c -> a[w]
02422: 12 -> p
02423: a -> b[x]
02424: c -> a[x]
02425: if c[xs] = 0
02426: goto 02432
02427: 0 - c -> c[x]
02430: c - 1 -> c[xs]
02431: goto 02413
02432: a <-> c[x]
02433: c -> a[w]
02434: goto 02710
02435: 12 -> p
02436: 0 -> b[w]
02437: 0 -> s 1
02440: 0 -> s 2
02441: delayed select rom 6
02442: goto 02646
02443: c + c -> c[w]
02444: goto 02710
02445: jsb 02605
02446: if s2 = 0
02447: goto 02573
02450: if c[xs] >= 1
02451: goto 02573
02452: load 7
02453: goto 02531
02454: jsb 02716
02455: jsb 02545
02456: 0 -> s 7
02457: if s2 = 0
02460: goto 02511
02461: 1 -> s 7
02462: goto 02511
02463: jsb 02605
02464: if s2 = 0
02465: goto 02475
02466: if c[xs] >= 1
02467: goto 02475
02470: load 6
02471: goto 02531
02472: 1 -> s 8
02473: delayed select group 1
02474: rom 1
02475: c <-> m
02476: jsb 02545
02477: jsb 02603
02500: jsb 02534
02501: stack -> a
02502: jsb 02517
02503: goto 02602
02504: no operation
02505: jsb 02605
02506: goto 02663
02507: c -> a[p]
02510: goto 02552
02511: 0 -> s 4
02512: jsb 02534
02513: m -> c
02514: jsb 02515
02515: delayed select rom 4
02516: goto 02651
02517: 0 - c -> c[x]
02520: 3 -> p
02521: goto 02436
02522: jsb 02605
02523: goto 02612
02524: no operation
02525: c -> a[wp]
02526: b <-> c[w]
02527: goto 02766
02530: load 4
02531: c <-> m
02532: delayed select rom 1
02533: goto 02471
02534: rom 2
02535: 1 -> p
02536: if s9 = 0
02537: goto 02752
02540: if s10 = 0
02541: goto 02525
02542: shift left a[wp]
02543: 0 -> p
02544: goto 02507
02545: if s9 = 0
02546: goto 02704
02547: 1 -> s 7
02550: 0 -> s 9
02551: 0 -> s 10
02552: a <-> c[w]
02553: if c[m] = 0
02554: goto 02420
02555: c -> a[w]
02556: if c[xs] = 0
02557: goto 02561
02560: rom 6
02561: 0 -> b[x]
02562: a <-> b[x]
02563: 13 -> p
02564: if b[p] = 0
02565: goto 02677
02566: a - 1 -> a[x]
02567: p - 1 -> p
02570: if p # 2
02571: goto 02657
02572: goto 02713
02573: c <-> m
02574: jsb 02545
02575: jsb 02534
02576: if c[w] = 0
02577: goto 02610
02600: stack -> a
02601: jsb 02435
02602: rom 4
02603: delayed select rom 3
02604: goto 02756
02605: 2 -> p
02606: c <-> m
02607: return
02610: delayed select rom 3
02611: goto 02702
02612: if s2 = 0
02613: goto 02616
02614: if c[xs] = 0
02615: goto 02625
02616: c <-> m
02617: jsb 02545
02620: jsb 02603
02621: jsb 02534
02622: stack -> a
02623: jsb 02627
02624: goto 02602
02625: load 5
02626: goto 02531
02627: 0 - c - 1 -> c[s]
02630: 0 -> s 1
02631: 0 -> s 2
02632: 12 -> p
02633: 0 -> b[w]
02634: a + 1 -> a[xs]
02635: a + 1 -> a[xs]
02636: c + 1 -> c[xs]
02637: c + 1 -> c[xs]
02640: if a >= c[x]
02641: goto 02643
02642: a <-> c[w]
02643: a <-> c[m]
02644: if c[m] = 0
02645: goto 02647
02646: a <-> c[w]
02647: b <-> c[m]
02650: if a >= c[x]
02651: goto 02676
02652: shift right b[w]
02653: a + 1 -> a[x]
02654: if b[w] = 0
02655: goto 02676
02656: goto 02650
02657: if c[p] >= 1
02660: goto 02713
02661: shift left a[m]
02662: goto 02566
02663: if s2 = 0
02664: goto 02667
02665: if c[xs] = 0
02666: goto 02530
02667: c <-> m
02670: jsb 02545
02671: jsb 02603
02672: jsb 02534
02673: stack -> a
02674: jsb 02630
02675: goto 02602
02676: rom 6
02677: p - 1 -> p
02700: if c[p] >= 1
02701: goto 02711
02702: shift left a[m]
02703: goto 02564
02704: b <-> c[w]
02705: if c[m] >= 1
02706: goto 02710
02707: 0 -> c[w]
02710: rom 1
02711: if b[p] = 0
02712: goto 02733
02713: a + c -> a[x]
02714: a <-> c[w]
02715: goto 02736
02716: 1 -> s 3
02717: 1 -> s 11
02720: 0 -> s 8
02721: return
02722: c <-> m
02723: 0 -> c[p]
02724: c <-> m
02725: goto 02421
02726: if s1 = 0
02727: goto 02443
02730: rom 6
02731: 12 -> p
02732: goto 02726
02733: a + 1 -> a[x]
02734: p - 1 -> p
02735: goto 02711
02736: a <-> b[x]
02737: 0 -> b[x]
02740: if s9 = 0
02741: goto 02421
02742: if c[xs] = 0
02743: goto 02532
02744: 0 - c -> c[x]
02745: if c[xs] = 0
02746: goto 02532
02747: jsb 02716
02750: jsb 02547
02751: goto 02602
02752: b <-> c[w]
02753: 1 -> s 9
02754: if s7 = 0
02755: goto 02760
02756: 0 -> s 7
02757: c -> stack
02760: a <-> b[wp]
02761: 0 -> a[s]
02762: 0 -> c[w]
02763: c - 1 -> c[w]
02764: 0 - c -> c[s]
02765: c + 1 -> c[s]
02766: c + 1 -> c[w]
02767: if c[p] >= 1
02770: goto 02400
02771: shift left a[wp]
02772: p + 1 -> p
02773: goto 02767
02774: jsb 02716
02775: jsb 02545
02776: b <-> c[w]
02777: goto 02472
03000: goto 03363
03001: a <-> b[w]
03002: jsb 03050
03003: stack -> a
03004: jsb 03050
03005: stack -> a
03006: if s9 = 0
03007: goto 03011
03010: a <-> c[w]
03011: if s5 = 0
03012: goto 03022
03013: 0 -> c[s]
03014: jsb 03246
03015: c -> stack
03016: jsb 03245
03017: jsb 03230
03020: jsb 03045
03021: stack -> a
03022: jsb 03246
03023: if s4 = 0
03024: goto 03164
03025: 0 -> a[w]
03026: a + 1 -> a[p]
03027: a -> b[m]
03030: a <-> c[m]
03031: c - 1 -> c[x]
03032: shift right b[wp]
03033: if c[xs] = 0
03034: goto 03031
03035: shift right a[wp]
03036: c + 1 -> c[x]
03037: goto 03035
03040: shift right a[w]
03041: shift right b[w]
03042: c -> stack
03043: b <-> c[w]
03044: goto 03101
03045: b <-> c[w]
03046: 4 -> p
03047: goto 03336
03050: c -> stack
03051: a <-> c[w]
03052: if c[p] = 0
03053: goto 03055
03054: 0 - c -> c[w]
03055: c -> a[w]
03056: b -> c[x]
03057: goto 03313
03060: c -> a[w]
03061: if s1 = 0
03062: goto 03045
03063: if s4 = 0
03064: goto 03166
03065: if s5 = 0
03066: goto 03025
03067: 0 - c - 1 -> c[s]
03070: a <-> c[s]
03071: goto 03015
03072: shift right b[wp]
03073: a - 1 -> a[s]
03074: goto 03072
03075: c + 1 -> c[s]
03076: a <-> b[wp]
03077: a + c -> c[wp]
03100: a <-> b[w]
03101: a -> b[w]
03102: a - c -> a[wp]
03103: goto 03073
03104: stack -> a
03105: shift right a[w]
03106: a <-> c[wp]
03107: a <-> b[w]
03110: shift left a[wp]
03111: c -> stack
03112: a + 1 -> a[s]
03113: a + 1 -> a[s]
03114: goto 03043
03115: 0 -> c[w]
03116: 0 -> b[x]
03117: shift right a[ms]
03120: jsb 03262
03121: c - 1 -> c[p]
03122: stack -> a
03123: a <-> c[w]
03124: 4 -> p
03125: jsb 03244
03126: 6 -> p
03127: jsb 03233
03130: 8 -> p
03131: jsb 03233
03132: 2 -> p
03133: load 8
03134: 10 -> p
03135: jsb 03233
03136: jsb 03216
03137: jsb 03233
03140: jsb 03314
03141: shift left a[w]
03142: jsb 03233
03143: b -> c[w]
03144: jsb 03313
03145: jsb 03314
03146: c + c -> c[w]
03147: jsb 03246
03150: if s9 = 0
03151: goto 03154
03152: 0 - c - 1 -> c[s]
03153: jsb 03230
03154: jsb 03314
03155: c + c -> c[w]
03156: jsb 03245
03157: delayed select rom 3
03160: goto 03215
03161: 0 - c -> c[x]
03162: delayed select rom 7
03163: goto 03016
03164: delayed select rom 0
03165: goto 03314
03166: jsb 03314
03167: c + c -> c[w]
03170: c + c -> c[w]
03171: jsb 03225
03172: c + c -> c[w]
03173: jsb 03353
03174: jsb 03314
03175: 10 -> p
03176: jsb 03234
03177: jsb 03216
03200: 8 -> p
03201: jsb 03235
03202: 2 -> p
03203: load 8
03204: 6 -> p
03205: jsb 03234
03206: 4 -> p
03207: jsb 03234
03210: jsb 03234
03211: a <-> b[w]
03212: shift right c[w]
03213: 13 -> p
03214: load 5
03215: goto 03373
03216: 6 -> p
03217: load 8
03220: load 6
03221: load 5
03222: load 2
03223: load 4
03224: load 9
03225: if s1 = 0
03226: goto 03332
03227: return
03230: 0 -> a[w]
03231: a + 1 -> a[p]
03232: rom 5
03233: rom 7
03234: shift left a[w]
03235: shift right b[ms]
03236: b <-> c[w]
03237: goto 03241
03240: c + 1 -> c[s]
03241: a - b -> a[w]
03242: goto 03240
03243: a + b -> a[w]
03244: rom 7
03245: rom 7
03246: a - c -> c[x]
03247: rom 7
03250: c + 1 -> c[p]
03251: a - c -> a[w]
03252: goto 03250
03253: a + c -> a[w]
03254: shift left a[w]
03255: p - 1 -> p
03256: shift right c[wp]
03257: if p # 0
03260: goto 03251
03261: goto 03055
03262: c + 1 -> c[p]
03263: a - b -> a[ms]
03264: goto 03262
03265: a + b -> a[ms]
03266: shift left a[ms]
03267: p - 1 -> p
03270: if p # 0
03271: goto 03263
03272: goto 03055
03273: p - 1 -> p
03274: a + b -> a[ms]
03275: goto 03333
03276: rom 3
03277: c - 1 -> c[xs]
03300: c - 1 -> c[xs]
03301: 0 -> a[x]
03302: a - c -> a[s]
03303: if a[s] >= 1
03304: goto 03306
03305: rom 7
03306: if a >= b[m]
03307: goto 03312
03310: 0 - c - 1 -> c[s]
03311: a <-> b[w]
03312: a - b -> a[w]
03313: rom 7
03314: 0 -> c[w]
03315: 11 -> p
03316: load 7
03317: load 8
03320: load 5
03321: load 3
03322: load 9
03323: load 8
03324: load 1
03325: load 6
03326: load 3
03327: load 5
03330: rom 5
03331: return
03332: rom 3
03333: a + b -> a[x]
03334: goto 03336
03335: c - 1 -> c[p]
03336: c + 1 -> c[s]
03337: if p # 0
03340: goto 03273
03341: a <-> c[x]
03342: 0 -> a[x]
03343: if c[p] >= 1
03344: goto 03346
03345: shift right a[w]
03346: shift right c[w]
03347: b <-> c[x]
03350: 0 -> c[x]
03351: 12 -> p
03352: goto 03256
03353: rom 7
03354: shift right b[wp]
03355: shift right b[wp]
03356: c - 1 -> c[s]
03357: goto 03354
03360: a + c -> c[wp]
03361: a - b -> a[wp]
03362: b <-> c[wp]
03363: b -> c[w]
03364: a - 1 -> a[s]
03365: goto 03356
03366: a <-> c[wp]
03367: stack -> a
03370: if b[s] = 0
03371: goto 03001
03372: shift left a[w]
03373: a <-> c[wp]
03374: c -> stack
03375: shift right b[wp]
03376: c - 1 -> c[s]
03377: b <-> c[s]
03400: no operation
03401: a <-> b[s]
03402: a + 1 -> a[s]
03403: shift right c[ms]
03404: shift left a[wp]
03405: goto 03422
03406: stack -> a
03407: jsb 03646
03410: rom 2
03411: jsb 03766
03412: 0 -> b[w]
03413: jsb 03646
03414: c -> a[w]
03415: goto 03502
03416: c - 1 -> c[xs]
03417: delayed select rom 5
03420: goto 03561
03421: c + 1 -> c[s]
03422: a -> b[w]
03423: jsb 03626
03424: a - 1 -> a[p]
03425: goto 03421
03426: a <-> b[wp]
03427: a + b -> a[s]
03430: goto 03401
03431: 7 -> p
03432: jsb 03555
03433: 8 -> p
03434: jsb 03635
03435: 9 -> p
03436: jsb 03634
03437: jsb 03776
03440: 10 -> p
03441: jsb 03634
03442: jsb 03575
03443: 11 -> p
03444: jsb 03634
03445: jsb 03737
03446: jsb 03634
03447: jsb 03671
03450: jsb 03634
03451: jsb 03766
03452: a <-> c[w]
03453: a - c -> c[w]
03454: if b[xs] = 0
03455: goto 03457
03456: a - c -> c[w]
03457: a <-> b[w]
03460: p - 1 -> p
03461: shift left a[w]
03462: if p # 1
03463: goto 03460
03464: a <-> c[w]
03465: if c[s] = 0
03466: goto 03470
03467: 0 - c - 1 -> c[m]
03470: c + 1 -> c[x]
03471: 11 -> p
03472: jsb 03705
03473: if s9 = 0
03474: goto 03406
03475: if s5 = 0
03476: goto 03624
03477: jsb 03766
03500: jsb 03647
03501: goto 03624
03502: jsb 03766
03503: jsb 03754
03504: jsb 03671
03505: 11 -> p
03506: jsb 03633
03507: jsb 03737
03510: 10 -> p
03511: jsb 03633
03512: jsb 03575
03513: 9 -> p
03514: jsb 03633
03515: jsb 03776
03516: 8 -> p
03517: jsb 03633
03520: jsb 03633
03521: jsb 03633
03522: 6 -> p
03523: 0 -> a[wp]
03524: 13 -> p
03525: b <-> c[w]
03526: a <-> c[w]
03527: load 6
03530: goto 03616
03531: if s2 = 0
03532: goto 03536
03533: a + 1 -> a[x]
03534: if a[xs] >= 1
03535: goto 03702
03536: a - b -> a[ms]
03537: goto 03531
03540: a + b -> a[ms]
03541: shift left a[w]
03542: c - 1 -> c[x]
03543: goto 03534
03544: shift right a[w]
03545: 0 -> c[wp]
03546: a <-> c[x]
03547: if c[s] = 0
03550: goto 03554
03551: a <-> b[w]
03552: a - b -> a[w]
03553: 0 - c - 1 -> c[w]
03554: shift right a[w]
03555: b <-> c[w]
03556: 0 -> c[w]
03557: c - 1 -> c[m]
03560: if s2 = 0
03561: goto 03566
03562: load 4
03563: c + 1 -> c[m]
03564: goto 03571
03565: load 6
03566: if p # 1
03567: goto 03565
03570: shift right c[w]
03571: shift right c[w]
03572: if s2 = 0
03573: goto 03624
03574: return
03575: 7 -> p
03576: load 3
03577: load 3
03600: load 0
03601: load 8
03602: load 5
03603: load 0
03604: load 9
03605: goto 03752
03606: jsb 03626
03607: a + 1 -> a[p]
03610: a -> b[w]
03611: c - 1 -> c[s]
03612: goto 03606
03613: shift right a[wp]
03614: a <-> c[w]
03615: shift left a[ms]
03616: a <-> c[w]
03617: a - 1 -> a[s]
03620: goto 03610
03621: a <-> b[w]
03622: a + 1 -> a[p]
03623: jsb 03714
03624: rom 6
03625: shift right a[wp]
03626: a - 1 -> a[s]
03627: goto 03625
03630: 0 -> a[s]
03631: a + b -> a[w]
03632: return
03633: rom 6
03634: shift right a[w]
03635: b <-> c[w]
03636: goto 03640
03637: a + b -> a[w]
03640: c - 1 -> c[s]
03641: goto 03637
03642: a <-> c[w]
03643: shift left a[ms]
03644: a <-> c[w]
03645: goto 03555
03646: 3 -> p
03647: a + c -> c[x]
03650: a - c -> c[s]
03651: goto 03653
03652: 0 - c -> c[s]
03653: a <-> b[m]
03654: 0 -> a[w]
03655: if p # 12
03656: goto 03705
03657: if c[m] >= 1
03660: goto 03666
03661: 0 -> c[wp]
03662: c - 1 -> c[wp]
03663: 0 -> c[xs]
03664: goto 03733
03665: no operation
03666: b <-> c[wp]
03667: a <-> c[m]
03670: rom 6
03671: 0 -> s 10
03672: load 6
03673: load 9
03674: load 3
03675: load 1
03676: load 4
03677: load 7
03700: load 1
03701: goto 03746
03702: a + 1 -> a[m]
03703: goto 03544
03704: a + b -> a[w]
03705: c - 1 -> c[p]
03706: goto 03704
03707: shift right a[w]
03710: p + 1 -> p
03711: if p # 13
03712: goto 03705
03713: c + 1 -> c[x]
03714: 0 -> a[s]
03715: 12 -> p
03716: 0 -> b[w]
03717: if a[p] >= 1
03720: goto 03726
03721: shift left a[w]
03722: c - 1 -> c[x]
03723: if a[w] >= 1
03724: goto 03717
03725: 0 -> c[w]
03726: a -> b[x]
03727: a + b -> a[w]
03730: if a[s] >= 1
03731: goto 03707
03732: a <-> c[m]
03733: c -> a[w]
03734: 0 -> b[w]
03735: 12 -> p
03736: goto 03572
03737: 9 -> p
03740: load 3
03741: load 1
03742: load 0
03743: load 1
03744: load 7
03745: load 9
03746: load 8
03747: load 0
03750: load 5
03751: load 5
03752: load 3
03753: goto 03735
03754: a <-> c[w]
03755: a -> b[w]
03756: c -> a[m]
03757: c + c -> c[xs]
03760: goto 03536
03761: c + 1 -> c[xs]
03762: shift right a[w]
03763: c + 1 -> c[x]
03764: goto 03762
03765: goto 03547
03766: 0 -> c[w]
03767: 12 -> p
03770: load 2
03771: load 3
03772: load 0
03773: load 2
03774: load 5
03775: goto 03601
03776: 5 -> p
03777: goto 03576
04000: rom 1
04001: c + 1 -> c[p]
04002: c + 1 -> c[p]
04003: c + 1 -> c[p]
04004: c + 1 -> c[p]
04005: no operation
04006: c + 1 -> c[p]
04007: goto 04102
04010: c <-> m
04011: goto 04030
04012: c + 1 -> c[p]
04013: c + 1 -> c[p]
04014: c + 1 -> c[p]
04015: no operation
04016: c + 1 -> c[p]
04017: goto 04100
04020: delayed select rom 1
04021: goto 04343
04022: c + 1 -> c[p]
04023: c + 1 -> c[p]
04024: c + 1 -> c[p]
04025: goto 04032
04026: load 8
04027: goto 04100
04030: delayed select rom 1
04031: goto 04143
04032: c + 1 -> c[p]
04033: c + 1 -> c[p]
04034: c + 1 -> c[p]
04035: goto 04103
04036: load 8
04037: goto 04101
04040: no operation
04041: c + 1 -> c[p]
04042: goto 04001
04043: goto 04041
04044: goto 04103
04045: no operation
04046: load 8
04047: goto 04102
04050: 1 -> s 5
04051: goto 04000
04052: c + 1 -> c[p]
04053: c + 1 -> c[p]
04054: c + 1 -> c[p]
04055: no operation
04056: c + 1 -> c[p]
04057: goto 04101
04060: shift right a[m]
04061: jsb 04214
04062: c + 1 -> c[p]
04063: c + 1 -> c[p]
04064: c + 1 -> c[p]
04065: goto 04022
04066: load 8
04067: goto 04077
04070: c + 1 -> c[p]
04071: no operation
04072: c + 1 -> c[p]
04073: c + 1 -> c[p]
04074: no operation
04075: no operation
04076: c + 1 -> c[p]
04077: c + 1 -> c[xs]
04100: c + 1 -> c[xs]
04101: c + 1 -> c[xs]
04102: c + 1 -> c[xs]
04103: 1 -> p
04104: if s3 = 0
04105: goto 04256
04106: c -> a[x]
04107: c <-> m
04110: if c[s] = 0
04111: goto 04350
04112: c - 1 -> c[s]
04113: if c[s] = 0
04114: goto 04020
04115: c <-> m
04116: 0 -> c[x]
04117: load 5
04120: if a >= c[x]
04121: goto 04347
04122: a + c -> a[x]
04123: a - c -> c[x]
04124: shift right a[ms]
04125: shift left a[x]
04126: shift left a[w]
04127: c -> a[x]
04130: 0 -> c[w]
04131: c - 1 -> c[ms]
04132: c - 1 -> c[p]
04133: no operation
04134: a - 1 -> a[xs]
04135: 5 -> p
04136: load 0
04137: load 2
04140: 0 -> a[s]
04141: b <-> c[w]
04142: 11 -> p
04143: c <-> m
04144: 0 -> c[p]
04145: 0 -> s 0
04146: p - 1 -> p
04147: if p # 11
04150: goto 04146
04151: display off
04152: if c[p] = 0
04153: goto 04167
04154: if s5 = 0
04155: goto 04157
04156: goto 04220
04157: c <-> m
04160: if s9 = 0
04161: goto 04165
04162: 1 -> p
04163: 0 -> c[x]
04164: key -> rom
04165: b <-> c[w]
04166: goto 04162
04167: display toggle
04170: if s0 = 0
04171: goto 04173
04172: goto 04145
04173: 0 -> c[p]
04174: c + 1 -> c[p]
04175: 0 -> s 3
04176: 0 -> s 11
04177: rom addr -> buffer; 65
04200: if s5 = 0
04201: goto 04351
04202: p - 1 -> p
04203: if p # 11
04204: goto 04200
04205: c + 1 -> c[s]
04206: goto 04200
04207: goto 04167
04210: a + c -> a[wp]
04211: a - c -> a[wp]
04212: goto 04341
04213: 13 -> p
04214: a + 1 -> a[x]
04215: goto 04060
04216: goto 04266
04217: no operation
04220: 0 -> c[s]
04221: c <-> m
04222: clear s
04223: 1 -> s 7
04224: if s9 = 0
04225: goto 04230
04226: 0 -> s 8
04227: goto 04142
04230: c -> a[w]
04231: m -> c
04232: a -> b[w]
04233: 1 -> s 9
04234: 8 -> p
04235: p - 1 -> p
04236: shift right c[w]
04237: if p # 1
04240: goto 04235
04241: if c[p] >= 1
04242: goto 04263
04243: if a[xs] >= 1
04244: goto 04210
04245: if a[p] >= 1
04246: goto 04341
04247: 13 -> p
04250: p - 1 -> p
04251: a - 1 -> a[x]
04252: goto 04250
04253: goto 04266
04254: 0 -> s 9
04255: goto 04226
04256: shift right c[x]
04257: rom 1
04260: if s8 = 0
04261: goto 04170
04262: goto 04220
04263: 0 -> s 9
04264: 0 -> c[p]
04265: 12 -> p
04266: 0 -> c[ms]
04267: c + 1 -> c[p]
04270: c + 1 -> c[p]
04271: p - 1 -> p
04272: if p # 2
04273: goto 04305
04274: 0 -> c[x]
04275: a <-> c[w]
04276: if s9 = 0
04277: goto 04330
04300: a - 1 -> a[x]
04301: jsb 04330
04302: c + 1 -> c[p]
04303: goto 04374
04304: goto 04314
04305: c - 1 -> c[x]
04306: goto 04271
04307: 0 -> c[wp]
04310: c - 1 -> c[wp]
04311: a <-> c[w]
04312: c + c -> c[p]
04313: goto 04374
04314: p + 1 -> p
04315: if p # 13
04316: goto 04302
04317: p - 1 -> p
04320: 0 -> c[m]
04321: c + 1 -> c[p]
04322: if s9 = 0
04323: goto 04326
04324: shift right a[ms]
04325: a - 1 -> a[x]
04326: c + 1 -> c[x]
04327: a + 1 -> a[x]
04330: c + 1 -> c[xs]
04331: goto 04336
04332: 0 - c -> c[x]
04333: a <-> c[w]
04334: b <-> c[w]
04335: goto 04254
04336: c - 1 -> c[xs]
04337: if c[xs] = 0
04340: goto 04333
04341: a <-> b[w]
04342: m -> c
04343: 8 -> p
04344: load 1
04345: load 9
04346: goto 04232
04347: c <-> m
04350: rom 1
04351: if s11 = 0
04352: goto 04355
04353: jsb 04362
04354: rom 3
04355: if s3 = 0
04356: goto 04260
04357: if s8 = 0
04360: goto 04371
04361: goto 04170
04362: 0 -> c[s]
04363: c <-> m
04364: if s9 = 0
04365: goto 04367
04366: return
04367: b <-> c[w]
04370: return
04371: jsb 04362
04372: delayed select group 0
04373: rom 5
04374: if s9 = 0
04375: goto 04327
04376: 0 -> c[xs]
04377: jsb 04330
04400: no operation
04401: c <-> m
04402: if s3 = 0
04403: goto 04437
04404: c -> a[w]
04405: 0 -> c[w]
04406: c + 1 -> c[m]
04407: 4 -> p
04410: if s5 = 0
04411: goto 04417
04412: 0 -> s 5
04413: a + c -> a[wp]
04414: a <-> c[w]
04415: c <-> m
04416: goto 04475
04417: a - c -> a[wp]
04420: jsb 04414
04421: 1 -> p
04422: a <-> c[w]
04423: if c[p] = 0
04424: goto 04427
04425: 0 - c - 1 -> c[x]
04426: 0 -> c[xs]
04427: c -> a[x]
04430: goto 04517
04431: shift right c[w]
04432: p - 1 -> p
04433: goto 04655
04434: shift right c[w]
04435: p - 1 -> p
04436: goto 04477
04437: if s5 = 0
04440: goto 04641
04441: 0 -> s 5
04442: goto 04635
04443: a - c -> a[wp]
04444: goto 04735
04445: 12 -> p
04446: 0 -> c[wp]
04447: c - 1 -> c[wp]
04450: 4 -> p
04451: goto 04663
04452: no operation
04453: 0 -> c[x]
04454: if p # 1
04455: goto 04463
04456: if c[x] = 0
04457: goto 04467
04460: c - 1 -> c[x]
04461: p + 1 -> p
04462: goto 04456
04463: c + 1 -> c[x]
04464: shift left a[w]
04465: p - 1 -> p
04466: goto 04454
04467: data -> c
04470: a <-> c[p]
04471: p - 1 -> p
04472: a <-> c[p]
04473: c -> data
04474: jsb 04777
04475: jsb 04762
04476: data -> c
04477: if p # 1
04500: goto 04434
04501: goto 04571
04502: c -> a[x]
04503: 0 -> c[x]
04504: 1 -> p
04505: load 5
04506: 0 -> a[xs]
04507: a - c -> a[x]
04510: goto 04516
04511: a + c -> a[x]
04512: shift right c[x]
04513: if a >= c[p]
04514: goto 04421
04515: goto 04517
04516: a - 1 -> a[xs]
04517: m -> c
04520: c -> a[m]
04521: shift left a[m]
04522: 0 -> c[w]
04523: c - 1 -> c[ms]
04524: c + 1 -> c[x]
04525: if s11 = 0
04526: goto 04530
04527: 0 -> c[x]
04530: c - 1 -> c[x]
04531: c <-> m
04532: 0 -> c[s]
04533: c <-> m
04534: rom 0
04535: 0 -> c[s]
04536: 0 -> s 6
04537: 0 -> s 4
04540: 0 -> s 2
04541: 0 -> s 1
04542: return
04543: 0 -> c[s]
04544: c + 1 -> c[s]
04545: c + 1 -> c[s]
04546: c <-> m
04547: if s3 = 0
04550: goto 04574
04551: m -> c
04552: c + 1 -> c[m]
04553: c -> a[m]
04554: 4 -> p
04555: c + c -> c[p]
04556: goto 04562
04557: load 0
04560: load 0
04561: goto 04752
04562: shift left a[m]
04563: 0 -> c[w]
04564: c - 1 -> c[w]
04565: 0 -> c[xs]
04566: 0 -> a[xs]
04567: a - 1 -> a[xs]
04570: jsb 04534
04571: if s11 = 0
04572: goto 04760
04573: goto 04502
04574: jsb 04540
04575: if s9 = 0
04576: goto 04600
04577: goto 04601
04600: b <-> c[w]
04601: c <-> m
04602: 12 -> p
04603: if s8 = 0
04604: goto 04615
04605: 11 -> p
04606: 0 -> s 0
04607: if s0 = 0
04610: goto 04627
04611: if c[p] >= 1
04612: goto 04630
04613: 12 -> p
04614: goto 04623
04615: if c[p] = 0
04616: goto 04623
04617: c + 1 -> c[m]
04620: c + 1 -> c[p]
04621: c - 1 -> c[p]
04622: goto 04605
04623: 0 -> c[p]
04624: c <-> m
04625: delayed select rom 0
04626: goto 04624
04627: 0 -> c[p]
04630: display toggle
04631: c <-> m
04632: if s9 = 0
04633: goto 04646
04634: goto 04647
04635: 12 -> p
04636: load 9
04637: c <-> m
04640: goto 04647
04641: jsb 04535
04642: 4 -> p
04643: 0 -> c[wp]
04644: c <-> m
04645: goto 04575
04646: b <-> c[w]
04647: jsb 04762
04650: if s11 = 0
04651: goto 04654
04652: delayed select group 0
04653: goto 04407
04654: data -> c
04655: if p # 1
04656: goto 04431
04657: jsb 04777
04660: 1 -> p
04661: delayed select group 0
04662: goto 04420
04663: a <-> c[wp]
04664: c -> a[wp]
04665: 15 -> p
04666: p - 1 -> p
04667: p - 1 -> p
04670: c + 1 -> c[m]
04671: goto 04666
04672: shift right c[w]
04673: c + 1 -> c[s]
04674: c + 1 -> c[s]
04675: shift right c[w]
04676: 0 -> c[x]
04677: c + 1 -> c[x]
04700: c -> data address
04701: 0 -> c[x]
04702: c - 1 -> c[x]
04703: c - 1 -> c[x]
04704: c - 1 -> c[x]
04705: a <-> c[w]
04706: shift left a[x]
04707: 0 -> a[xs]
04710: shift left a[w]
04711: shift left a[w]
04712: a <-> c[w]
04713: c - 1 -> c[s]
04714: c - 1 -> c[s]
04715: c - 1 -> c[s]
04716: goto 04724
04717: a + 1 -> a[m]
04720: c <-> m
04721: a <-> c[w]
04722: c <-> m
04723: return
04724: a + c -> a[m]
04725: goto 04715
04726: a <-> c[wp]
04727: 3 -> p
04730: load 7
04731: 4 -> p
04732: a - 1 -> a[m]
04733: c + 1 -> c[s]
04734: c + 1 -> c[s]
04735: c + 1 -> c[s]
04736: goto 04443
04737: a <-> c[w]
04740: 0 -> c[wp]
04741: c -> a[m]
04742: goto 04766
04743: c <-> m
04744: if a[xs] >= 1
04745: goto 04750
04746: shift left a[x]
04747: shift right a[w]
04750: c <-> m
04751: c + 1 -> c[m]
04752: c <-> m
04753: shift right a[x]
04754: jsb 04762
04755: if s11 = 0
04756: goto 04453
04757: goto 04475
04760: jsb 04777
04761: goto 04502
04762: 0 -> s 11
04763: c <-> m
04764: a <-> c[w]
04765: c <-> m
04766: 0 -> c[w]
04767: 4 -> p
04770: a <-> c[wp]
04771: if c[m] >= 1
04772: goto 04726
04773: a <-> c[wp]
04774: 1 -> s 11
04775: goto 04720
04776: no operation
04777: rom 2
05000: c <-> m
05001: 5 -> p
05002: c - 1 -> c[p]
05003: delayed select rom 1
05004: goto 05322
05005: c + 1 -> c[x]
05006: shift right a[w]
05007: 0 -> b[w]
05010: a -> b[x]
05011: a + b -> a[w]
05012: if a[s] >= 1
05013: goto 05005
05014: goto 05344
05015: if b[xs] = 0
05016: goto 05314
05017: goto 05323
05020: a - 1 -> a[x]
05021: goto 05147
05022: load 4
05023: load 5
05024: load 3
05025: load 5
05026: load 9
05027: load 2
05030: load 3
05031: load 7
05032: goto 05070
05033: a - 1 -> a[x]
05034: goto 05020
05035: load 1
05036: load 0
05037: load 5
05040: load 5
05041: load 0
05042: load 5
05043: load 5
05044: load 8
05045: load 5
05046: load 3
05047: 0 -> p
05050: load 3
05051: goto 05071
05052: 12 -> p
05053: a - 1 -> a[x]
05054: goto 05033
05055: load 1
05056: load 7
05057: load 4
05060: load 5
05061: load 3
05062: load 2
05063: load 9
05064: load 2
05065: load 5
05066: load 2
05067: c - 1 -> c[x]
05070: c - 1 -> c[x]
05071: delayed select group 0
05072: goto 05361
05073: a - 1 -> a[x]
05074: goto 05102
05075: load 2
05076: load 5
05077: load 4
05100: c + 1 -> c[x]
05101: goto 05071
05102: a - 1 -> a[x]
05103: goto 05365
05104: load 3
05105: load 0
05106: load 4
05107: load 8
05110: goto 05070
05111: a - 1 -> a[x]
05112: goto 05073
05113: 1 -> s 5
05114: goto 05071
05115: c - 1 -> c[p]
05116: if c[p] = 0
05117: goto 05124
05120: load 9
05121: goto 05124
05122: 1 -> s 8
05123: load 1
05124: delayed select rom 1
05125: goto 05202
05126: no operation
05127: no operation
05130: 12 -> p
05131: if c[s] >= 1
05132: goto 05177
05133: if c[xs] >= 1
05134: goto 05177
05135: c -> a[w]
05136: a -> b[w]
05137: shift left a[ms]
05140: if a[wp] >= 1
05141: goto 05210
05142: a + 1 -> a[x]
05143: if a >= c[x]
05144: goto 05213
05145: c + 1 -> c[xs]
05146: goto 05254
05147: a - 1 -> a[x]
05150: goto 05111
05151: load 4
05152: load 4
05153: load 4
05154: load 8
05155: load 2
05156: load 2
05157: load 1
05160: load 6
05161: load 1
05162: load 5
05163: goto 05071
05164: load 6
05165: delayed select rom 0
05166: goto 05221
05167: no operation
05170: no operation
05171: no operation
05172: no operation
05173: c <-> m
05174: 8 -> p
05175: load 0
05176: goto 05164
05177: delayed select group 0
05200: goto 05120
05201: if b[w] = 0
05202: goto 05317
05203: 12 -> p
05204: b -> c[x]
05205: goto 05310
05206: delayed select group 0
05207: rom 0
05210: a - 1 -> a[x]
05211: goto 05136
05212: goto 05177
05213: 0 -> c[w]
05214: c + 1 -> c[p]
05215: shift right c[w]
05216: c + 1 -> c[s]
05217: b <-> c[w]
05220: if b[p] = 0
05221: goto 05224
05222: shift right b[wp]
05223: c + 1 -> c[x]
05224: 0 -> a[w]
05225: a - c -> a[p]
05226: goto 05232
05227: shift left a[w]
05230: a + b -> a[w]
05231: goto 05230
05232: a - c -> a[s]
05233: goto 05241
05234: shift right a[wp]
05235: a + 1 -> a[w]
05236: c + 1 -> c[x]
05237: a + b -> a[w]
05240: goto 05237
05241: a <-> b[wp]
05242: c - 1 -> c[p]
05243: goto 05220
05244: c - 1 -> c[s]
05245: goto 05220
05246: shift left a[w]
05247: a -> b[x]
05250: a + b -> a[wp]
05251: 0 -> c[ms]
05252: a + c -> a[w]
05253: a <-> c[ms]
05254: delayed select group 0
05255: goto 05207
05256: shift right c[wp]
05257: a + c -> c[wp]
05260: c -> a[wp]
05261: shift right c[wp]
05262: c + c -> c[wp]
05263: c + c -> c[wp]
05264: a - c -> c[wp]
05265: if s4 = 0
05266: goto 05303
05267: return
05270: a - 1 -> a[x]
05271: goto 05052
05272: 1 -> s 7
05273: goto 05201
05274: 12 -> p
05275: if c[p] = 0
05276: goto 05122
05277: if s8 = 0
05300: goto 05115
05301: 0 -> s 8
05302: goto 05124
05303: a + c -> a[wp]
05304: shift right c[wp]
05305: if c[wp] >= 1
05306: goto 05303
05307: return
05310: c + 1 -> c[x]
05311: c + 1 -> c[x]
05312: if c[xs] >= 1
05313: goto 05015
05314: p - 1 -> p
05315: if p # 0
05316: goto 05321
05317: b -> c[w]
05320: goto 05206
05321: c - 1 -> c[x]
05322: goto 05314
05323: 0 -> c[w]
05324: b -> c[m]
05325: if s4 = 0
05326: goto 05346
05327: p + 1 -> p
05330: p + 1 -> p
05331: jsb 05260
05332: p - 1 -> p
05333: p - 1 -> p
05334: jsb 05260
05335: c -> a[w]
05336: b -> c[w]
05337: 12 -> p
05340: if a[p] >= 1
05341: goto 05344
05342: c - 1 -> c[x]
05343: shift left a[w]
05344: a <-> c[m]
05345: goto 05206
05346: 0 -> a[w]
05347: jsb 05256
05350: p + 1 -> p
05351: p + 1 -> p
05352: jsb 05256
05353: shift left a[w]
05354: a + c -> c[w]
05355: 0 -> a[w]
05356: c -> a[x]
05357: a + c -> a[w]
05360: b -> c[w]
05361: if a[s] >= 1
05362: goto 05005
05363: goto 05344
05364: no operation
05365: load 3
05366: load 7
05367: load 8
05370: load 5
05371: load 4
05372: load 1
05373: load 1
05374: load 7
05375: load 8
05376: load 4
05377: goto 05071
05400: goto 05471
05401: goto 05620
05402: goto 05471
05403: goto 05471
05404: goto 05471
05405: goto 05407
05406: goto 05471
05407: goto 05411
05410: goto 05471
05411: goto 05415
05412: goto 05471
05413: goto 05471
05414: goto 05471
05415: goto 05425
05416: goto 05471
05417: if s6 = 0
05420: goto 05401
05421: goto 05540
05422: goto 05474
05423: goto 05575
05424: goto 05577
05425: goto 05431
05426: goto 05471
05427: load 9
05430: goto 05711
05431: goto 05435
05432: goto 05601
05433: goto 05762
05434: goto 05764
05435: goto 05441
05436: goto 05471
05437: load 8
05440: goto 05711
05441: goto 05445
05442: goto 05610
05443: goto 05471
05444: goto 05766
05445: goto 05447
05446: goto 05471
05447: goto 05451
05450: goto 05471
05451: goto 05455
05452: goto 05471
05453: goto 05471
05454: goto 05471
05455: goto 05461
05456: goto 05471
05457: load 7
05460: goto 05711
05461: goto 05465
05462: goto 05427
05463: goto 05437
05464: goto 05457
05465: goto 05646
05466: goto 05471
05467: 1 -> s 6
05470: 0 -> a[w]
05471: jsb 05417
05472: goto 05614
05473: goto 05471
05474: load 6
05475: goto 05711
05476: goto 05471
05477: 0 -> b[w]
05500: c -> a[w]
05501: 0 -> c[w]
05502: c - 1 -> c[m]
05503: 8 -> p
05504: load 6
05505: load 0
05506: if p # 4
05507: goto 05504
05510: load 0
05511: b <-> c[ms]
05512: b -> c[ms]
05513: c + 1 -> c[s]
05514: shift right c[ms]
05515: c + 1 -> c[x]
05516: if a[s] >= 1
05517: goto 05467
05520: if a[xs] >= 1
05521: goto 05751
05522: a - 1 -> a[x]
05523: goto 05742
05524: shift right a[w]
05525: shift right a[w]
05526: shift right a[w]
05527: shift right a[w]
05530: shift right a[wp]
05531: shift right a[wp]
05532: 7 -> p
05533: if a >= c[p]
05534: goto 05467
05535: 5 -> p
05536: if a >= c[p]
05537: goto 05467
05540: 1 -> s 6
05541: jsb 05770
05542: 0 -> s 8
05543: 0 -> s 0
05544: p - 1 -> p
05545: if p # 11
05546: goto 05544
05547: if s0 = 0
05550: goto 05603
05551: if s8 = 0
05552: goto 05543
05553: key -> rom
05554: jsb 05622
05555: a -> b[w]
05556: 0 -> c[p]
05557: c -> data address
05560: a <-> c[w]
05561: data -> c
05562: a <-> c[w]
05563: jsb 05622
05564: a <-> c[w]
05565: c -> data
05566: a <-> c[w]
05567: c + 1 -> c[p]
05570: goto 05557
05571: b -> c[w]
05572: rom 2
05573: jsb 05775
05574: goto 05651
05575: load 5
05576: goto 05711
05577: load 4
05600: goto 05711
05601: load 3
05602: goto 05711
05603: 1 -> s 8
05604: 0 -> s 11
05605: if s11 = 0
05606: goto 05554
05607: goto 05543
05610: if s6 = 0
05611: goto 05540
05612: clear s
05613: goto 05405
05614: b <-> c[w]
05615: 0 - c - 1 -> c[x]
05616: b <-> c[w]
05617: if s6 = 0
05620: goto 05573
05621: goto 05540
05622: 12 -> p
05623: if a[w] >= 1
05624: goto 05627
05625: 11 -> p
05626: return
05627: if a[p] >= 1
05630: goto 05625
05631: 3 -> p
05632: shift left a[wp]
05633: shift left a[wp]
05634: shift left a[w]
05635: shift left a[w]
05636: a + 1 -> a[x]
05637: 12 -> p
05640: shift left a[m]
05641: if a[p] >= 1
05642: goto 05625
05643: a - 1 -> a[x]
05644: display off
05645: goto 05640
05646: goto 05704
05647: c -> data
05650: a <-> c[w]
05651: 1 -> p
05652: a + 1 -> a[wp]
05653: goto 05760
05654: 4 -> p
05655: a + 1 -> a[p]
05656: goto 05405
05657: 5 -> p
05660: a + 1 -> a[p]
05661: if a >= c[p]
05662: goto 05664
05663: goto 05431
05664: 0 -> a[p]
05665: 6 -> p
05666: a + 1 -> a[p]
05667: goto 05445
05670: 7 -> p
05671: a + 1 -> a[p]
05672: if a >= c[p]
05673: goto 05675
05674: goto 05465
05675: 0 -> a[p]
05676: 8 -> p
05677: a + 1 -> a[p]
05700: goto 05734
05701: 9 -> p
05702: a + 1 -> a[p]
05703: jsb 05737
05704: if s7 = 0
05705: goto 05723
05706: 11 -> p
05707: clear s
05710: key -> rom
05711: c -> data address
05712: a <-> c[w]
05713: if s6 = 0
05714: goto 05647
05715: data -> c
05716: 12 -> p
05717: if c[p] >= 1
05720: goto 05500
05721: a <-> c[w]
05722: goto 05540
05723: 0 -> s 0
05724: if s0 = 0
05725: goto 05732
05726: if s8 = 0
05727: goto 05741
05730: 1 -> s 7
05731: goto 05401
05732: 1 -> s 8
05733: goto 05741
05734: 10 -> p
05735: p - 1 -> p
05736: if p # 8
05737: goto 05735
05740: goto 05401
05741: goto 05740
05742: shift left a[ms]
05743: a - 1 -> a[x]
05744: goto 05467
05745: goto 05524
05746: if a[ms] >= 1
05747: goto 05751
05750: goto 05470
05751: shift right a[ms]
05752: a + 1 -> a[x]
05753: goto 05746
05754: goto 05524
05755: delayed select group 0
05756: goto 05420
05757: no operation
05760: jsb 05770
05761: goto 05431
05762: load 2
05763: goto 05711
05764: load 1
05765: goto 05711
05766: load 0
05767: goto 05711
05770: 9 -> p
05771: if a[p] >= 1
05772: goto 05776
05773: b <-> c[p]
05774: b -> c[p]
05775: return
05776: 0 -> b[p]
05777: goto 05775