.TITLE M .NLIST .INCLUDE /ASCII.MAC/ .INCLUDE /HWDF.MAC/ .DSABL GBL .LIST .ASECT .BLKW ^O<40000> RETURN N00002: RETURN N00004: CALL N27110 EMT 50 .WORD L05207 MOV @#L77054, -(SP) MOV @#L77716, -(SP) MOV SP, @#11616 JMP @#N61260 BIC #300, @#11512 EMT 50 .WORD B05200 MOV @#26052, R5 CALL N00062 RETURN N00060: RETURN N00062: MOV #177764, R0 CALL N00652 RETURN N00074: JSR R5, N71472 .WORD 11660 .WORD 2044 N00104: TST @#L77702 MOV #N73440, @#300 MOV #200, @#302 MOV #N73742, @#324 MOV #200, @#326 BIS #1, @#L77076 CALL N00422 CALL N00226 MOV #11772, @#11706 CALL N36104 MOV #200, @#11750 MOV #600, @#11752 MOV #1, @#11654 INC @#11514 MOV #2, @#11756 RETURN N00226: MOV #11772, R3 MOV #4, R4 N00236: MOV #103432, R1 MOV #62, R2 N00246: MOVB (R1)+, (R3)+ INC R3 SOB R2, N00246 SOB R4, N00236 CALL N00314 JSR R5, N03014 .WORD L03524 MOV #103631, @#13412 N00276: MOV #26540, @#36540 N00304: MOV @#36540, @#36544 N00312: RETURN N00314: MOV #10, R4 BR N00332 N00322: MOV #13012, R3 MOV #4, R4 N00332: MOV #40, R2 CLR R0 BISB (R1)+, R0 N00342: MOV R0, (R3)+ INC R0 SOB R2, N00342 SOB R4, N00332 RETURN N00354: COM @#11766 BEQ N00312 N00362: TST @#11512 BNE N00420 TST @#11516 BNE N00420 EMT 50 .WORD L05171 MOV SP, @#11764 N00406: TST @#11764 BGT N00406 EMT 50 .WORD L05135 N00420: RETURN N00422: MOV #3200, @#11660 MOV #3200, @#11662 MOV #3000, @#11670 MOV #3000, @#11672 CLR @#11472 CLR @#11674 RETURN N00464: MOV #11700, R0 TSTB (R0)+ BNE N00510 MOV #11701, R0 TSTB (R0)+ BMI N00510 TSTB (R0)+ BEQ N00530 N00510: SUB #11474, R0 MOVB R0, @11662 INC @#11662 CALL N01034 N00530: RETURN N00532: INC @#11502 BR N00546 N00540: BIS #100001, 20(SP) N00546: TST @#11674 BNE N00556 TRAP 0 N00556: TRAP 2 ADD @#11572, PC BR N00600 MOV R0, 2(SP) CLRB 3(SP) RETURN N00600: TST 20(SP) BPL N00546 BIC #100001, 20(SP) RETURN N00616: MOV R0, @11672 ADD #2, @#11672 BIC #200, @#11672 INC @#11674 ADD @#11572, PC TRAP 2 RETURN N00652: MOV #70000, @#L77010 TST @#L77014 BNE N00652 BIS #400, R0 MOV R0, @#L77014 RETURN N00700: MTPS #200 CMP R1, @#11662 BNE N01026 MOV #3200, R3 MOV R3, R0 SUB R3, R1 BEQ N00734 N00724: MOVB (R0)+, (R3)+ BNE N00732 DEC R3 N00732: SOB R1, N00724 N00734: CLRB @#11472 MOV R3, @#11662 CMP R3, #3200 BEQ N00766 TST @#11742 BLE N00772 MOV #3200, R3 BR N00772 N00766: CLR @#11742 N00772: MOV R3, R1 N00774: MOV R1, @#11660 MOV R2, @#11672 MTPS #0 ADD @#11570, PC RETURN ADD @#11572, PC TRAP 2 RETURN N01026: MTPS #0 BR N01056 N01034: TSTB @#11473 BEQ N01046 JMP N06306 N01046: MOV @#11660, R1 MOV @#11672, R2 N01056: CMP R1, @#11662 BEQ N00700 MOVB (R1)+, R4 BMI N01302 MOVB 103232(R4), R4 TST @#11704 BEQ N01130 CMP R4, #5 BCS N01130 CMP R4, #7 BHI N01130 MOVB 101117(R4), R4 BR N01222 ROR (R0)+ .WORD 26 N01130: ASL R4 BMI N01220 SUB #144, R4 BPL N01154 ADD #144, R4 ADD @#11706, R4 BR N01164 N01154: ADD 126(R5), R4 ADD 134(R5), R4 N01164: MOV (R4), R4 BNE N01176 CLRB 177777(R1) BR N01056 N01176: MOV R4, R3 SWAB R3 BEQ N01234 ASRB R3 BNE N01234 ADD #177405, R4 ASL R4 BR N01222 N01220: COM R4 N01222: CLRB 177777(R1) CALL @101520(R4) BR N01056 N01234: TST @#11742 BNE N01250 MOV @#11744, @#11742 N01250: TST @#11754 BNE N00774 CMP @#11674, #100 BHI N00774 MOV R4, (R2)+ BIC #200, R2 INC @#11674 BR N01056 N01302: CLRB 177777(R1) CMPB R4, #207 BHI N01330 MOV R4, R0 SUB #177605, R0 MOVB 11700(R0), R3 BNE N01364 N01330: BIC #177760, R4 MOV R1, R3 DEC R3 N01340: CMP R3, #3200 BEQ N01056 MOVB -(R3), R0 BIC #177760, R0 CMP R4, R0 BNE N01340 CLRB (R3) BR N01056 N01364: CLRB 11700(R0) JSR R5, N73700 ASR R0 BCS N01430 BEQ N01416 TST R3 BMI N01056 N01406: CALL N01454 N01412: JMP N01056 N01416: EMT 50 .WORD 6 CALL N01466 BR N01412 N01430: TST R3 BMI N01406 MOV 156(R5), R4 BEQ N01412 BPL N01444 N01444: ADD R5, R3 SWAB (R3) JMP N02166 N01454: NEGB @#11702 MOV 130(R5), 126(R5) N01466: EMT 50 .WORD 5 MOV #11772, @#11706 INC @#11514 CLR @#11704 MOV 136(R5), 134(R5) RETURN .WORD N01550 .WORD N01672 .WORD N01732 .WORD N02060 .WORD N02106 .WORD N02636 .WORD N02646 .WORD N02740 .WORD N02670 .WORD N00362 .WORD N75376 .WORD N52056 N01550: TSTB @#11701 BMI N01664 MOVB @#11702, R0 BLE N01570 CALL N01454 N01570: INCB @#11700 ASLB @#25640 ADC @#25640 EMT 50 .WORD B05306 MOV #12136, @#11706 INC @#11514 N01622: MOV 134(R5), 136(R5) BNE N01646 MOV #100, 134(R5) EMT 50 .WORD B05342 BR N01656 N01646: CLR 134(R5) EMT 50 .WORD B05333 N01656: TST R0 BNE N01752 RETURN N01664: MOV SP, @#11704 RETURN N01672: TSTB @#11702 BNE N02056 TSTB @#11700 BNE N01664 COMB @#11701 EMT 50 .WORD B05315 MOV #12302, @#11706 MOV #13412, R0 BR N02026 N01732: MOVB @#11701, R0 BLE N01744 CLR 156(R5) N01744: TSTB @#11700 BEQ N01770 N01752: MOV 134(R5), 136(R5) MOV 176(R5), 216(R5) MOV R5, R0 N01770: TST R0 BNE N02056 INCB @#11702 ASR @#25640 ADC @#25640 EMT 50 .WORD B05324 MOV #12446, @#11706 MOV #13512, R0 N02026: MOV 126(R5), 130(R5) MOV R0, 126(R5) MOV 134(R5), 136(R5) CLR 134(R5) INC @#11514 N02056: RETURN N02060: MOVB 152(R5), R4 MOVB 153(R5), R0 MOV #152, R3 CMP 126(R5), #13212 BNE N02132 BR N02116 N02106: MOVB 154(R5), R4 ADD #105376, R4 N02116: MOVB 155(R5), R0 ADD #105376, R0 MOV #154, R3 N02132: MOVB R3, @#11701 ADD R5, R3 SWAB (R3) TSTB @#11702 BEQ N02160 BMI N02156 CALL N01454 N02156: CLR R0 N02160: MOV R0, 156(R5) TST (SP)+ N02166: TSTB @#11634 BNE N02200 JMP N01250 N02200: CLR R0 CMP R4, #17 BCS N02230 BEQ N02224 CMP R4, #105376 BEQ N02222 INC R0 N02222: INC R0 N02224: INC R0 ASL R0 N02230: MOV R1, -(SP) MOV R2, -(SP) CALL @L02250(R0) MOV (SP)+, R2 MOV (SP)+, R1 JMP N01056 L02250: .WORD N02306 .WORD N02370 .WORD N02516 .WORD N02602 N02260: TSTB @#11634 BNE N02476 TST 11736 BNE N02476 JSR R5, N15272 .WORD 4100 .WORD 17372 .WORD 100 N02306: TST @#11770 BEQ N02320 JMP N10020 N02320: MOV #7017, 152(R5) MOV #B05361, 200(R5) MOV #13012, R3 BR N02422 N02342: TSTB @#11634 BNE N02476 TST 11736 BNE N02476 JSR R5, N15272 .WORD 1300 .WORD 17372 .WORD 100 N02370: TST @#11770 BEQ N02402 JMP N07754 N02402: MOV #7416, 152(R5) MOV #105352, 200(R5) MOV #12612, R3 N02422: MOV #1400, R0 TSTB @#11701 BPL N02450 TSTB @#11702 BLE N02450 MOV R3, 130(R5) BR N02464 N02450: MOV R3, 126(R5) MOV R3, 130(R5) MOV R0, 154(R5) N02464: BIS #200, 160(R5) MOV SP, @#11504 N02476: RETURN N02500: TSTB @#11634 BEQ N02516 MOV #40, @#11646 RETURN N02516: CMP #B05370, 200(R5) BEQ N02476 MOV #3, R0 MOV 200(R5), 220(R5) MOV #B05370, 200(R5) MOV #13212, R3 MOV 126(R5), 132(R5) SWAB 152(R5) BR N02450 N02566: TSTB @#11634 BEQ N02602 CLR @#11646 RETURN N02602: CMP 200(R5), #B05370 BNE N02476 MOV #1400, R0 MOV 132(R5), R3 MOV 220(R5), 200(R5) SWAB 152(R5) BR N02450 N02636: RETURN N02640: CLR @#11570 N02644: RETURN N02646: TST @#11512 BNE N02644 TST @#26050 BNE N02644 COM @#11516 BR N02640 N02670: TST @#11512 BNE N02726 TST @#26050 BNE N02644 TST @#25704 BNE N02726 MOV #426, @#25704 EMT 50 .WORD B05243 RETURN N02726: CLR @#25704 EMT 50 .WORD 3 RETURN N02740: CMP R5, #35430 BEQ N02644 TST @#11516 BNE N02644 COM @#11506 BR N02640 N02762: CLR -(SP) MOV (R5)+, R4 TST -(R4) BEQ N03170 CLR (R4)+ BR N03020 N02776: MOV #4, -(SP) MOV (R5)+, R4 TST -(R4) BNE N03170 MOV SP, (R4)+ BR N03020 N03014: MOV #6, -(SP) N03020: MOV (R5)+, R0 N03022: CLR R3 MOVB (R0)+, R1 BMI N03154 N03030: ASL R1 MOV L03200(R1), R1 BEQ N03164 MOVB (R0)+, R2 BMI N03102 ASL R2 ADD R2, R1 CLR R2 BISB (R0)+, R2 BIS R3, R2 BR N03066 N03060: CLR R2 BISB (R0)+, R2 BEQ N03022 N03066: ADD (SP), PC MOV (R4)+, (R1)+ BR N03060 MOV (R1), (R4)+ MOV R2, (R1)+ BR N03060 N03102: COM R2 ASL R2 ADD R2, R1 TST R3 BNE N03134 ADD (SP), PC MOV (R4)+, (R1)+ BR N03126 MOV (R1), (R4)+ MOV R0, (R1) N03126: TSTB (R0)+ BNE N03126 BR N03022 N03134: MOV (R0)+, R2 BEQ N03022 ADD (SP), PC MOV (R4)+, (R1)+ BR N03134 MOV (R1), (R4)+ MOV R2, (R1)+ BR N03134 N03154: COM R1 MOV #400, R3 BR N03030 N03164: TST (SP)+ RTS R5 N03170: TST (R5)+ TST (SP)+ SEC RTS R5 L03200: .WORD 11772 .WORD 12136 .WORD 12302 .WORD 12446 .WORD 12612 .WORD 12712 .WORD 13012 .WORD 13112 .WORD 13212 .WORD 13312 .WORD 13412 .WORD 13512 .WORD 0 .WORD 0 .WORD 0 .WORD 27411 .WORD 11412 .WORD 400 .WORD 13402 .WORD 2003 .WORD 15432 .WORD 0 .WORD 0 .WORD 27000 .WORD 36013 .WORD 12424 .WORD 33426 .WORD 14430 .WORD 47515 .WORD 0 .WORD 0 .WORD 0 .WORD 34376 .WORD 43465 .WORD 41075 .WORD 34500 .WORD 33076 .WORD 0 .WORD 0 L03316: .WORD 0 .WORD 41773 .WORD 44513 .WORD 35463 .WORD 40504 .WORD 31064 .WORD 0 .WORD 0 .WORD 177400 .WORD 176774 .WORD 42520 .WORD 11077 .WORD 45106 .WORD 21020 .WORD 0 .WORD 0 .WORD 25000 .WORD 22043 .WORD 26447 .WORD 10414 .WORD 20417 .WORD 44116 .WORD 0 .WORD 0 .WORD 25400 .WORD 22460 .WORD 3450 .WORD 6406 .WORD 50416 .WORD 46072 .WORD 0 .WORD 0 .WORD 26000 .WORD 23061 .WORD 4051 .WORD 17405 .WORD 17040 .WORD 16035 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 4433 .WORD 6577 .WORD 0 .WORD 0 .WORD 35440 .WORD 31061 .WORD 32063 .WORD 33065 .WORD 34067 .WORD 30071 .WORD 27455 .WORD 27072 .WORD 30054 .WORD 31061 .WORD 32063 .WORD 33065 .WORD 34067 .WORD 25471 .WORD 26055 .WORD 6456 .WORD 60100 .WORD 40140 .WORD 40140 .WORD 40000 L03524: .BYTE 1, 23 .ASCII |+!"#$%&'()0=?*><| .BYTE 0, 1 .ASCIZ |-*/| .WORD 6401 .WORD 12 .WORD 171002 .WORD 5015 .WORD 1000 .WORD 15722 .WORD 120 .WORD 150402 .WORD 50433 .WORD 1000 .WORD 15720 .WORD 122 .WORD 3376 .WORD 1 .WORD 7376 .WORD 2 .WORD 7776 .WORD 2 .WORD 26776 .WORD 5 .WORD 11374 .WORD 4 .WORD 14 .BYTE 0 L03633: .BYTE 6 .WORD 117000 .ASCII <200> .ASCII <201> .ASCII <226> .ASCII <204> .ASCII <205> .ASCII <224> .ASCII <203> .ASCII <225> .ASCII <210> .ASCII <211> .ASCII <212> .ASCII <213> .ASCII <214> .ASCII <215> .ASCII <216> .ASCII <217> .ASCII <237> .ASCII <220> .ASCII <221> .ASCII <222> .ASCII <223> .ASCII <206> .ASCII <202> .ASCII <234> .ASCII <233> .ASCII <207> .ASCII <230> .ASCII <235> .ASCII <231> .ASCII <227> .ASCII <232> .ASCII |î| .ASCII <240> .ASCII <241> .ASCII |æ| .ASCII <244> .ASCII <245> .ASCII |ä| .ASCII |£| .ASCII |å| .ASCII <250> .ASCII <251> .ASCII <252> .ASCII <253> .ASCII <254> .ASCII <255> .ASCII <256> .ASCII <257> .ASCII |ï| .ASCII |à| .ASCII |á| .ASCII |â| .ASCII |ã| .ASCII <246> .ASCII <242> .ASCII |ì| .ASCII |ë| .ASCII <247> .ASCII |è| .ASCII |í| .ASCII |é| .ASCII |ç| .ASCII |ê| .ASCII <260> .ASCII <261> .ASCII <262> .ASCII |³| .ASCII <264> .ASCII <265> .ASCII <266> .ASCII <267> .ASCII <270> .ASCII <271> .ASCII <272> .ASCII <273> .ASCII <274> .ASCII <275> .ASCII <276> .ASCII <277> .ASCII |À| .ASCII |Á| .ASCII |Â| .ASCII |Ã| .ASCII |Ä| .ASCII |Å| .ASCII |Æ| .ASCII |Ç| .ASCII |È| .ASCII |É| .ASCII |Ê| .ASCII |Ë| .ASCII |Ì| .ASCII |Í| .ASCII |Î| .ASCII |Ï| .ASCII |Ð| .ASCII |Ñ| .ASCII |Ò| .ASCII |Ó| .ASCII |Ô| .ASCII |Õ| .ASCII |Ö| .ASCII |×| .ASCII |Ø| .ASCII |Ù| .ASCII |Ú| .ASCII |Û| .ASCII |Ü| .ASCII |Ý| .ASCII |Þ| .ASCII |ß| .ASCII |ð| .ASCII |ñ| .ASCII |ò| .ASCII |ó| .ASCII |ô| .ASCII |õ| .ASCII |ö| .ASCII |÷| .ASCII |ø| .ASCII |ù| .ASCII |ú| .ASCII |û| .ASCII |ü| .ASCII |ý| .ASCII |þ| .ASCII |ÿ| .BYTE 0 .BYTE 14 L04037: .BYTE 6 .WORD 147000 .WORD 130660 .WORD 132306 .WORD 142265 .WORD 142663 .WORD 134670 .WORD 135672 .WORD 136674 .WORD 137676 .WORD 140317 .WORD 141301 .WORD 133303 .WORD 146262 .WORD 133713 .WORD 146710 .WORD 143711 .WORD 167312 .WORD 150720 .WORD 152346 .WORD 162325 .WORD 162723 .WORD 154730 .WORD 155732 .WORD 156734 .WORD 157736 .WORD 160357 .WORD 161341 .WORD 153343 .WORD 166322 .WORD 153753 .WORD 166750 .WORD 163751 .WORD 100352 .WORD 101201 .WORD 102203 .WORD 103205 .WORD 104207 .WORD 105211 .WORD 106213 .WORD 107215 .WORD 110217 .WORD 111221 .WORD 112223 .WORD 113225 .WORD 114227 .WORD 115231 .WORD 116233 .WORD 117235 .WORD 120237 .WORD 121241 .WORD 122243 .WORD 123245 .WORD 124247 .WORD 125251 .WORD 126253 .WORD 127255 .WORD 170257 .WORD 171361 .WORD 172363 .WORD 173365 .WORD 174367 .WORD 175371 .WORD 176373 .WORD 177375 .WORD 377 .BYTE 14 L04243: .BYTE 6 .WORD 117000 .WORD 100600 .WORD 102226 .WORD 112205 .WORD 112603 .WORD 104610 .WORD 105612 .WORD 106614 .WORD 107616 .WORD 110237 .WORD 111221 .WORD 103223 .WORD 116202 .WORD 103633 .WORD 116630 .WORD 113631 .WORD 137232 .WORD 120640 .WORD 122266 .WORD 132245 .WORD 132643 .WORD 124650 .WORD 125652 .WORD 126654 .WORD 127656 .WORD 130277 .WORD 131261 .WORD 123263 .WORD 136242 .WORD 123673 .WORD 136670 .WORD 133671 .ASCII <272> .ASCII |À| .ASCII |Á| .ASCII |Â| .ASCII |Ã| .ASCII |Ä| .ASCII |Å| .ASCII |Æ| .ASCII |Ç| .ASCII |È| .ASCII |É| .ASCII |Ê| .ASCII |Ë| .ASCII |Ì| .ASCII |Í| .ASCII |Î| .ASCII |Ï| .ASCII |Ð| .ASCII |Ñ| .ASCII |Ò| .ASCII |Ó| .ASCII |Ô| .ASCII |Õ| .ASCII |Ö| .ASCII |×| .ASCII |Ø| .ASCII |Ù| .ASCII |Ú| .ASCII |Û| .ASCII |Ü| .ASCII |Ý| .ASCII |Þ| .ASCII |ß| .ASCII |à| .ASCII |á| .ASCII |â| .ASCII |ã| .ASCII |ä| .ASCII |å| .ASCII |æ| .ASCII |ç| .ASCII |è| .ASCII |é| .ASCII |ê| .ASCII |ë| .ASCII |ì| .ASCII |í| .ASCII |î| .ASCII |ï| .ASCII |ð| .ASCII |ñ| .ASCII |ò| .ASCII |ó| .ASCII |ô| .ASCII |õ| .ASCII |ö| .ASCII |÷| .ASCII |ø| .ASCII |ù| .ASCII |ú| .ASCII |û| .ASCII |ü| .ASCII |ý| .ASCII |þ| .ASCII |ÿ| .BYTE 0 .WORD 14 .BYTE 0 .BYTE 361 .ASCIZ |A| .EVEN .BYTE 360 .ASCIZ |B| .BYTE 0, 357 .ASCIZ |D| .EVEN .BYTE 356 .ASCIZ |C| .BYTE 0, 367 .ASCIZ |J| .BYTE 1 .BYTE 367 .ASCIZ |H| .WORD 167776 .WORD 104464 .WORD 104471 .WORD 0 .WORD 170775 .WORD 104503 .WORD 104476 .WORD 104552 .WORD 104547 .WORD 0 .WORD 170774 .WORD 104452 .WORD 104457 .WORD 104464 .WORD 104471 .WORD 0 .WORD 15414 .WORD 113 .WORD 15 .WORD 7000 .WORD 16434 .WORD 14432 .WORD 400 .WORD 12020 .WORD 23 .WORD 7002 .WORD 17434 .WORD 5425 .WORD 1400 .WORD 16016 .WORD 15035 .WORD 31 .WORD 4000 .WORD 14 .WORD 4001 .WORD 10 .WORD 14 L04620: .WORD 156377 .WORD 104663 .WORD 104667 .WORD 104673 .WORD 104677 .WORD 104703 .WORD 104707 .WORD 104713 .WORD 104717 .WORD 104723 .WORD 104727 .WORD 104733 .WORD 104736 .WORD 104741 .WORD 104747 .WORD 104753 .WORD 0 .BYTE 14 .ASCIZ |?p| .ASCIZ |?q| .ASCIZ |?r| .ASCIZ |?s| .ASCIZ |?t| .ASCIZ |?u| .ASCIZ |?v| .ASCIZ |?w| .ASCIZ |?x| .ASCIZ |?y| .ASCIZ |P| .ASCIZ |Q| .ASCIZ |R| .ASCIZ |S| .ASCIZ |?n| .ASCIZ |?M| L04757: .BYTE 0 .WORD 177443 .WORD 176776 .WORD 175774 .WORD 174772 .WORD 173770 .WORD 366 .WORD 12000 .WORD 176776 .WORD 175774 .WORD 174772 .WORD 173770 .WORD 177766 .WORD 0 .WORD 172414 .WORD 167764 .WORD 166756 .WORD 161754 .WORD 0 .WORD 170405 .WORD 0 .WORD 171007 .WORD 363 .WORD 030400 .BYTE 364 L05037: .BYTE 0 .WORD 7001 .WORD 165353 .WORD 164351 .WORD 001000 .WORD 163416 .WORD 162746 .WORD 344 .WORD 1004 .WORD 156342 .WORD 2000 .WORD 160422 .WORD 157740 .WORD 2000 .WORD 157014 .WORD 335 .WORD 10004 .WORD 333 .WORD 4 .WORD 360 .BYTE 14 L05107: .BYTE 0 .WORD 3414 .WORD 10 .WORD 7000 .WORD 1001 .WORD 2003 .WORD 400 .WORD 2420 .WORD 6 .BYTE 14 L05131: .BYTE 0 .ASCII |K| .BYTE 0 L05135: .BYTE 0 .ASCIZ | | .BYTE 0 .ASCIZ | õóô | .BYTE 0 .ASCIZ | á÷ô | .BYTE 0 .ASCIZ | òåä | L05171: .BYTE 0 .ASCIZ |ðáõúá| B05200: .ASCIZ <1>| | L05207: .BYTE 1 .ASCIZ | ðð | .ASCIZ <1>| ãð | B05225: .ASCIZ <1>| úáí | B05234: .ASCIZ <1>| ÷óô | B05243: .ASCIZ <3>|éõðò | B05252: .ASCIZ <4>| | B05261: .ASCIZ <4>| äëì | B05270: .ASCIZ <4>| ãéæò| .ASCIZ <5>| | B05306: .ASCIZ <5>| îò | B05315: .ASCIZ <5>| õðò | B05324: .ASCIZ <5>|æéëó | B05333: .ASCIZ <6>|úáçì | B05342: .ASCIZ <6>| | B05351: .ASCIZ | | L05360: .BYTE 7 B05361: .ASCII | | .ASCIZ |òõó | .BYTE 7 B05370: .ASCIZ | çòáæ| .ASCIZ |F| .ASCIZ |G| N05404: MOV #106012, @#310 MOV #200, @#312 MOV #105720, @#200 MOV #200, @#202 MOV #3300, @#11664 MOV #3300, @#11666 MOV @#4, -(SP) MOV SP, R0 MOV #105536, @#4 MOV #20, @#L77320 TST @#L77322 TST @#L77324 CLR @#L77324 N05506: TST @#L77334 BIT #40, @#L77330 BNE N05506 MOV #400, @#L77330 INC @#11770 BR N05554 MOV #105554, @#4 TST @#L77750 INC @#11770 N05554: MOV R0, SP MOV (SP)+, @#4 N05562: MOV #13612, R3 MOV #4, R4 N05572: MOV #111070, R1 MOV #55, R2 N05602: MOVB (R1)+, (R3)+ INC R3 SOB R2, N05602 SOB R4, N05572 MOV #5, R4 N05616: MOV #111145, R1 MOV #60, R2 N05626: MOVB (R1)+, (R3)+ INC R3 SOB R2, N05626 SOB R4, N05616 MOV #40, R0 MOV #14556, R1 N05646: MOV #36, R2 N05652: ADD R0, (R1)+ SOB R2, N05652 TST R0 BMI N05674 MOV #177700, R0 MOV #15216, R1 BR N05646 N05674: JSR R5, N10470 .WORD L12272 JSR R5, N10470 .WORD L11225 MOV #13612, @#11710 RETURN MOV R0, -(SP) MOV @#L77750, R0 COMB R0 TST @#11760 BEQ N05742 CALL N06136 N05742: TSTB R0 BMI N05762 CLR @#11764 CMP @#11666, #3340 BCC N06006 N05762: INCB @#11473 CMP @#11666, #3400 BCC N06006 MOVB R0, @11666 INC @#11666 N06006: MOV (SP)+, R0 RTI MOV R0, -(SP) MOVB @#L77324, R0 TST @#11760 BEQ N06032 CALL N06136 N06032: TSTB R0 BMI N06052 CLR @#11764 CMP @#11666, #3340 BCC N06076 N06052: INCB @#11473 CMP @#11666, #3400 BCC N06076 MOVB R0, @11666 INC @#11666 N06076: MOV (SP)+, R0 TST @#L77324 TST @#L77324 TST @#L77324 TST @#L77324 N06120: TST @#L77334 BIT #40, @#L77330 BNE N06120 RTI N06136: TST @#11754 BNE N06150 MOV R0, @#L77070 N06150: RETURN N06152: MTPS #200 CMP R1, @#11666 BNE N06300 MOV #3300, R3 MOV R3, R0 SUB R3, R1 BEQ N06206 N06176: MOVB (R0)+, (R3)+ BNE N06204 DEC R3 N06204: SOB R1, N06176 N06206: CLRB @#11473 MOV R3, @#11666 CMP R3, #3300 BEQ N06240 TST @#11742 BLE N06244 MOV #3300, R3 BR N06244 N06240: CLR @#11742 N06244: MOV R3, R1 MOV R1, @#11664 MOV R2, @#11672 MTPS #0 ADD @#11570, PC RETURN ADD @#11572, PC TRAP 2 RETURN N06300: MTPS #0 BR N06316 N06306: MOV @#11664, R1 MOV @#11672, R2 N06316: CMP R1, @#11666 BEQ N06152 MOVB (R1), R4 CLRB (R1)+ TSTB R4 BMI N06566 TST @#11734 BEQ N06414 BMI N06400 CLR @#11734 CMPB R4, #52 BEQ N06316 CMPB R4, #65 BCC N06406 CMPB R4, #34 BNE N06414 MOV #54, R4 BR N06420 N06400: COM @#11734 BR N06316 N06406: MOVB 110744(R4), R4 BR N06420 N06414: MOVB 110700(R4), R4 N06420: ASL R4 BMI N06550 SUB #132, R4 BPL N06510 ADD #132, R4 TST @#11716 BEQ N06502 TST @#11714 BEQ N06466 CMPB R4, #36 BHI N06502 N06460: CALL N06730 BR N06316 N06466: CMPB R4, #36 BNE N06502 MOV #40, R4 BR N06460 N06502: ADD @#11710, R4 BR N06520 N06510: ADD 140(R5), R4 ADD 146(R5), R4 N06520: MOV (R4), R4 BNE N06526 BR N06316 N06526: MOV R4, R3 SWAB R3 BEQ N06560 ASRB R3 BNE N06560 ADD #177406, R4 ASL R4 BR N06552 N06550: COM R4 N06552: CALL @L07156(R4) BR N06316 N06560: CALL N06670 BR N06316 N06566: BIC #177600, R4 CMP R4, #140 BCS N06612 ASR R4 ROR R4 MOV R4, @#11734 BR N06316 N06612: TST @#11734 BEQ N06650 BPL N06630 CMP R4, #35 BEQ N06316 N06630: CLR @#11734 CMP R4, #35 BEQ N06650 CMP R4, #70 BNE N06316 N06650: MOVB L10700(R4), R4 BPL N06316 ASL R4 COM R4 CALL @L07174(R4) BR N06316 N06670: TST @#11754 BNE N06726 TST @#11760 BNE N06726 CMP @#11674, #100 BHI N06726 MOV R4, (R2)+ BIC #200, R2 INC @#11674 N06726: RETURN N06730: MOV R4, R0 ASR R0 CMP R0, #20 BEQ N06754 N06742: MOV R0, @#L77072 CALL @L07004(R4) RETURN N06754: TST @#26044 BEQ N06742 MOV (SP), @#26044 MOV #L07000, R4 CALL N06670 RETURN L07000: .WORD 5003 .WORD 0 L07004: .WORD N07046 .WORD N52056 .WORD N02646 .WORD N02670 .WORD N07050 .WORD N07046 .WORD N07046 .WORD N07046 .WORD N07046 .WORD N07046 .WORD N07046 .WORD N07154 .WORD N52056 .WORD N02646 .WORD N02670 .WORD N07050 .WORD N07046 N07046: RETURN N07050: TST @#11516 BNE N07046 CALL N02726 CALL N07374 CALL N07574 TST @#35320 BNE N07106 MOV #4, @#35324 N07106: MOV #L07152, R3 MOV #1, R4 N07116: CLR R0 N07120: DEC R0 BEQ N07150 BIT #20, @#L77076 BEQ N07120 MOV @(R3)+, @#L77072 SOB R4, N07116 MOV #N57304, @#16762 N07150: RETURN L07152: .WORD 25720 N07154: RETURN L07156: .WORD N07210 .WORD N07210 .WORD N07464 .WORD N07640 .WORD N10126 .WORD N10330 .WORD N00354 L07174: .WORD N07374 .WORD N07374 .WORD N07574 .WORD N10042 .WORD N10322 .WORD N10326 N07210: TST @#11714 BNE N07372 TST @#11716 BEQ N07232 MOV (SP), @#11714 RETURN N07232: TST 11736 BEQ N07250 INC @#11714 JMP @#N07654 N07250: TST @#11732 BEQ N07300 TST @#11722 BEQ N07300 CALL N07720 MOV (SP), @#11714 JMP N10230 N07300: INC @#11714 MOV #13744, @#11710 MOV 146(R5), 150(R5) BNE N07332 MOV #140, 146(R5) BR N07336 N07332: CLR 146(R5) N07336: COM @#11712 BNE N07360 TST @#11760 BNE N07372 EMT 50 .WORD B05333 RETURN N07360: TST @#11760 BNE N07372 EMT 50 .WORD B05342 N07372: RETURN N07374: TST 11736 BEQ N07412 CLR @#11714 JMP @#N10056 N07412: TST @#11714 BGT N07426 CLR @#11714 RETURN N07426: CLR @#11714 MOV #13612, R0 TST @#11720 BEQ N07450 MOV #14230, R0 N07450: MOV R0, @#11710 MOV 150(R5), 146(R5) BR N07336 N07464: TST 11736 BNE N07514 TST @#11720 BEQ N07514 INC @#11730 N07504: MOV #177777, @#11716 N07512: RETURN N07514: TST @#11714 BNE N07504 TST @#11716 BNE N07512 INC @#11716 MOV #14076, @#11710 MOV #15162, R0 MOV 140(R5), 142(R5) MOV R0, 140(R5) MOV 146(R5), 150(R5) CLR 146(R5) RETURN N07574: TST @#11716 BGT N07610 CLR @#11716 RETURN N07610: CLR @#11716 MOV 142(R5), 140(R5) MOV 150(R5), 146(R5) MOV #13612, @#11710 RETURN N07640: TST 11736 BNE N07372 TST @#11732 BNE N07372 N07654: TST @#11720 BNE N07372 TST @#11716 BLE N07700 CALL N07610 INC @#11730 N07700: INC @#11720 TST @#11714 BNE N07720 MOV #14230, @#11710 N07720: COM @#11726 BNE N07776 TSTB @#11634 BNE N07754 TST 11736 BNE N07754 MOV #17, R4 N07746: CALL N06670 RETURN N07754: MOV #14362, 140(R5) TST @#11760 BNE N07774 EMT 50 .WORD B05351 N07774: RETURN N07776: TSTB @#11634 BNE N10020 TST 11736 BNE N10020 MOV #16, R4 BR N07746 N10020: MOV #14662, 140(R5) TST @#11760 BNE N10040 EMT 50 .WORD L05360 N10040: RETURN N10042: TST 11736 BNE N10326 TST @#11732 BNE N10326 N10056: TST @#11720 BEQ N10326 CLR @#11720 MOV #13612, R0 TST @#11714 BEQ N10106 MOV #13744, R0 N10106: MOV R0, @#11710 TST @#11730 BEQ N07720 CLR @#11730 RETURN N10126: TST @#11722 BNE N10326 INC @#11722 TST 11736 BEQ N10204 MOV R1, -(SP) MOV R2, -(SP) TST @#11726 BEQ N10170 JSR R5, N10470 .WORD L11342 BR N10176 N10170: JSR R5, N10470 .WORD L11415 N10176: MOV (SP)+, R2 MOV (SP)+, R1 BR N07720 N10204: TST @#11732 BEQ N10230 TST @#11714 BEQ N07720 CALL N07374 MOV (SP), @#11714 N10230: CALL N07336 N10234: MOV R1, -(SP) MOV R2, -(SP) MOV #110300, R1 N10244: MOV (R1)+, R3 BEQ N10272 MOV (R1)+, R2 MOV R3, R4 ADD #140, R4 N10260: MOV (R3), R0 MOV (R4), (R3)+ MOV R0, (R4)+ SOB R2, N10260 BR N10244 N10272: MOV (SP)+, R2 MOV (SP)+, R1 RETURN .WORD 14416 .WORD 12 .WORD 14446 .WORD 11 .WORD 14474 .WORD 7 .WORD 14716 .WORD 41 .WORD 0 N10322: CLR @#11722 N10326: RETURN N10330: COM @#11724 N10334: MOV R1, -(SP) MOV R2, -(SP) TST @#11724 BEQ N10360 JSR R5, N10450 .WORD 15364 .WORD L14100 BR N10272 N10360: TST @#26026 BEQ N10422 CMP @#25720, #1 BNE N10410 JSR R5, N10450 .WORD 15364 .WORD L13032 BR N10272 N10410: JSR R5, N10450 .WORD 15364 .WORD L13452 BR N10272 N10422: JSR R5, N10434 .WORD 15364 .WORD L14100 BR N10272 N10434: CLR -(SP) MOV (R5)+, R4 TST -(R4) BEQ N10644 CLR (R4)+ BR N10474 N10450: MOV #4, -(SP) MOV (R5)+, R4 TST -(R4) BNE N10466 MOV SP, (R4)+ BR N10474 N10466: TST (SP)+ N10470: MOV #6, -(SP) N10474: MOV (R5)+, R0 N10476: CLR R3 MOVB (R0)+, R1 BMI N10630 N10504: ASL R1 MOV L10654(R1), R1 BEQ N10640 MOVB (R0)+, R2 BMI N10556 ASL R2 ADD R2, R1 CLR R2 BISB (R0)+, R2 BIS R3, R2 BR N10542 N10534: CLR R2 BISB (R0)+, R2 BEQ N10476 N10542: ADD (SP), PC MOV (R4)+, (R1)+ BR N10534 MOV (R1), (R4)+ MOV R2, (R1)+ BR N10534 N10556: COM R2 ASL R2 ADD R2, R1 TST R3 BNE N10610 ADD (SP), PC MOV (R4)+, (R1)+ BR N10602 MOV (R1), (R4)+ MOV R0, (R1) N10602: TSTB (R0)+ BNE N10602 BR N10476 N10610: MOV (R0)+, R2 BEQ N10476 ADD (SP), PC MOV (R4)+, (R1)+ BR N10610 MOV (R1), (R4)+ MOV R2, (R1)+ BR N10610 N10630: COM R1 MOV #400, R3 BR N10504 N10640: TST (SP)+ RTS R5 N10644: TST (R5)+ TST (SP)+ SEC RTS R5 L10654: .WORD 13612 .WORD 13744 .WORD 14076 .WORD 14230 .WORD 14362 .WORD 14522 .WORD 14662 .WORD 15022 .WORD 15162 .WORD 0 L10700: .WORD 000000 .ASCII |.| .ASCII |/| .ASCII |0| .ASCII |1| .ASCII |2| .ASCII |3| .ASCII |4| .ASCII |5| .ASCII |6| .ASCII |7| .ASCII |8| .ASCII |9| .ASCII <21> .ASCII <20> .ASCII |;| .ASCII |<| .ASCII |=| .ASCII |>| .ASCII |?| .ASCII |@| .ASCII |A| .ASCII |B| .ASCII |C| .ASCII |D| .ASCII |E| .ASCII |F| .ASCII <22> .ASCII |ý| .ASCII |G| .ASCII |H| .ASCII |I| .ASCII |J| .ASCII |K| .ASCII |L| .ASCII |M| .ASCII |N| .ASCII |O| .ASCII |P| .ASCII |Q| .ASCII |-| .ASCII |ÿ| .ASCII |:| .ASCII |R| .ASCII |S| .ASCII |T| .ASCII |U| .ASCII |V| .ASCII |W| .ASCII |X| .ASCII |Y| .ASCII |Z| .ASCII |[| .ASCII |þ| .ASCII |)| .ASCII |ü| .ASCII |\| .ASCII |û| .ASCII <1> .ASCII <2> .ASCII <3> .WORD 2404 .ASCII <6> .ASCII .ASCII .ASCII .ASCII .ASCII |ú| .ASCII .ASCII |%| .ASCII |&| .ASCII |'| .ASCII |*| .ASCII |"| .WORD 22043 .ASCII |+| .ASCII <37> .ASCII | | .ASCII |!| .ASCII <36> .ASCII <35> .WORD 0 .WORD 5400 .WORD 24014 .WORD 6400 .WORD 374 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 7400 .WORD 12417 .WORD 13431 .WORD 15400 .WORD 16000 .WORD 13000 .WORD 14032 .WORD 12023 .WORD 33 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 4011 .WORD 15 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 27000 .WORD 30460 .WORD 31462 .WORD 32464 .WORD 33466 .WORD 34470 .WORD 25057 .WORD 25455 .WORD 60015 .WORD 31061 .WORD 32063 .WORD 33065 .WORD 34067 .WORD 30071 .WORD 36455 .WORD 50534 .WORD 42527 .WORD 52122 .WORD 52531 .WORD 47511 .WORD 55520 .WORD 40535 .WORD 42123 .WORD 43506 .WORD 45110 .WORD 46113 .WORD 23473 .WORD 54132 .WORD 53103 .WORD 47102 .WORD 26115 .WORD 27456 .BYTE 40 L11225: .BYTE 377 .WORD 17 .WORD 4000 .WORD 17006 .WORD 4000 .WORD 17413 .WORD 4000 .WORD 16015 .WORD 4000 .WORD 35043 .WORD 42 .WORD 26010 .WORD 37074 .WORD 77 .WORD 5 .WORD 20576 .WORD 21500 .WORD 22444 .WORD 23136 .WORD 24052 .WORD 57451 .WORD 76053 .WORD 2400 .WORD 35043 .WORD 42 .WORD 26005 .WORD 37074 .WORD 77 .WORD 6 .WORD 51 .WORD 7 .WORD 20450 .WORD 27442 .WORD 35044 .WORD 27054 .WORD 37473 .WORD 57445 .WORD 76053 .WORD 4400 L11342: .WORD 4 .WORD 30451 .WORD 31462 .WORD 32464 .WORD 33466 .WORD 34470 .WORD 26460 .WORD 56075 .WORD 2000 .WORD 27456 .WORD 3000 .WORD 24000 .WORD 40041 .WORD 22043 .WORD 57045 .WORD 25046 .WORD 24450 .WORD 25537 .WORD 134 .WORD 27006 .WORD 77 .BYTE 11 L11415: .BYTE 6 .WORD 24400 .WORD 31061 .WORD 32063 .WORD 33065 .WORD 34067 .WORD 30071 .WORD 36455 .WORD 134 .WORD 27006 .WORD 57 .WORD 4 .WORD 20450 .WORD 27442 .WORD 35044 .WORD 27054 .WORD 37473 .WORD 57445 .WORD 56053 .WORD 2000 .WORD 37456 .WORD 4400 L11470: .WORD 166400 .WORD 5015 .WORD 0 .WORD 6723 .WORD 12 .BYTE 11 L11503: .BYTE 0 .WORD 6422 .WORD 0 .WORD 6454 .WORD 4400 L11514: .WORD 7006 .WORD 61552 .WORD 65565 .WORD 67145 .WORD 75547 .WORD 75175 .WORD 77550 .WORD 74546 .WORD 60567 .WORD 71160 .WORD 66157 .WORD 73144 .WORD 70574 .WORD 71576 .WORD 64555 .WORD 74164 .WORD 60142 .WORD 260 .WORD 7007 .WORD 41512 .WORD 45525 .WORD 47105 .WORD 55507 .WORD 55135 .WORD 57510 .WORD 54506 .WORD 40527 .WORD 51120 .WORD 46117 .WORD 53104 .WORD 50534 .WORD 51536 .WORD 44515 .WORD 54124 .WORD 40102 .WORD 261 .BYTE 11 L11625: .BYTE 6 .WORD 165016 .WORD 172743 .WORD 162753 .WORD 163756 .WORD 176773 .WORD 164372 .WORD 163377 .WORD 173771 .WORD 170341 .WORD 167762 .WORD 162354 .WORD 176366 .WORD 177361 .WORD 166763 .WORD 172351 .WORD 161370 .WORD 130340 .WORD 3400 .WORD 145016 .WORD 152703 .WORD 142713 .WORD 143716 .WORD 156733 .WORD 144332 .WORD 143337 .WORD 153731 .WORD 150301 .WORD 147722 .WORD 142314 .WORD 156326 .WORD 157321 .WORD 146723 .WORD 152311 .WORD 141330 .WORD 130700 .WORD 4400 .WORD 7006 .WORD 113211 .WORD 105223 .WORD 106605 .WORD 114203 .WORD 103631 .WORD 115225 .WORD 115624 .WORD 100202 .WORD 110217 .WORD 105616 .WORD 103204 .WORD 117635 .WORD 110627 .WORD 104214 .WORD 116222 .WORD 117201 .WORD 360 .WORD 7007 .WORD 163251 .WORD 125343 .WORD 126645 .WORD 164243 .WORD 123751 .WORD 165345 .WORD 165744 .WORD 120242 .WORD 160257 .WORD 125656 .WORD 123244 .WORD 167755 .WORD 160747 .WORD 124254 .WORD 166342 .WORD 167241 .WORD 361 .BYTE 11 L12047: .BYTE 6 .WORD 134416 .WORD 141706 .WORD 132672 .WORD 131675 .WORD 144710 .WORD 142667 .WORD 142312 .WORD 131313 .WORD 137660 .WORD 137300 .WORD 132273 .WORD 146666 .WORD 143717 .WORD 136301 .WORD 141270 .WORD 130714 .WORD 170316 .WORD 3400 .WORD 154416 .WORD 161746 .WORD 152732 .WORD 151735 .WORD 164750 .WORD 162727 .WORD 162352 .WORD 151353 .WORD 157720 .WORD 157340 .WORD 152333 .WORD 166726 .WORD 163757 .WORD 156341 .WORD 161330 .WORD 150754 .WORD 170756 .WORD 4400 L12160: .WORD 7006 .WORD 113211 .WORD 105223 .WORD 106605 .WORD 114203 .WORD 103631 .WORD 115225 .WORD 115624 .WORD 100202 .WORD 110217 .WORD 105616 .WORD 103204 .WORD 117635 .WORD 110627 .WORD 104214 .WORD 116222 .WORD 117201 .WORD 360 .WORD 7007 .WORD 133251 .WORD 125263 .WORD 126645 .WORD 134243 .WORD 123671 .WORD 135265 .WORD 135664 .WORD 120242 .WORD 130257 .WORD 125656 .WORD 123244 .WORD 137675 .WORD 130667 .WORD 124254 .WORD 136262 .WORD 137241 .WORD 361 .WORD 11 L12272: .WORD 177377 .WORD 175674 .WORD 175700 .WORD 175704 .WORD 175710 .WORD 175714 .WORD 175720 .WORD 175724 .WORD 175730 .WORD 175734 .WORD 175740 .WORD 175744 .WORD 175750 .WORD 0 .WORD 177376 .WORD 175754 .WORD 175760 .WORD 175764 .WORD 175770 .WORD 175774 .WORD 176000 .WORD 176004 .WORD 176010 .WORD 176014 .WORD 176020 .WORD 176024 .WORD 176030 .WORD 0 .WORD 177375 .WORD 176034 .WORD 176040 .WORD 176044 .WORD 176050 .WORD 176054 .WORD 176060 .WORD 176064 .WORD 176070 .WORD 176074 .WORD 176100 .WORD 176104 .WORD 176110 .WORD 0 .WORD 177374 .WORD 176114 .WORD 176120 .WORD 176124 .WORD 176130 .WORD 176134 .WORD 176140 .WORD 176144 .WORD 176150 .WORD 176154 .WORD 176160 .WORD 176164 .WORD 176170 .WORD 0 .WORD 167776 .WORD 175667 .WORD 0 .WORD 166377 .WORD 176237 .WORD 176315 .WORD 176273 .WORD 176243 .WORD 176303 .WORD 176253 .WORD 176277 .WORD 176247 .WORD 176257 .WORD 176267 .WORD 0 .WORD 166376 .WORD 176237 .WORD 176315 .WORD 176273 .WORD 176243 .WORD 176303 .WORD 176253 .WORD 176277 .WORD 176247 .WORD 176257 .WORD 176267 .WORD 0 .WORD 166375 .WORD 176237 .WORD 176315 .WORD 176273 .WORD 176243 .WORD 176303 .WORD 176253 .WORD 176277 .WORD 176247 .WORD 176257 .WORD 176267 .WORD 0 .WORD 166374 .WORD 176237 .WORD 176315 .WORD 176273 .WORD 176243 .WORD 176303 .WORD 176253 .WORD 176277 .WORD 176247 .WORD 176257 .WORD 176267 .WORD 0 .WORD 161377 .WORD 176315 .WORD 176237 .WORD 176243 .WORD 176247 .WORD 176253 .WORD 176257 .WORD 176263 .WORD 176267 .WORD 176273 .WORD 176277 .WORD 176303 .WORD 0 .WORD 24000 .WORD 25057 .WORD 25455 .WORD 15 .WORD 161376 .WORD 176315 .WORD 176237 .WORD 176243 .WORD 176247 .WORD 176253 .WORD 176257 .WORD 176263 .WORD 176267 .WORD 176273 .WORD 176277 .WORD 176303 .WORD 0 .WORD 24000 .WORD 25057 .WORD 25455 .WORD 15 .WORD 161375 .WORD 176315 .WORD 176237 .WORD 176243 .WORD 176247 .WORD 176253 .WORD 176257 .WORD 176263 .WORD 176267 .WORD 176273 .WORD 176277 .WORD 176303 .WORD 0 .WORD 24000 .WORD 25057 .WORD 25455 .WORD 15 .WORD 161374 .WORD 176315 .WORD 176237 .WORD 176243 .WORD 176247 .WORD 176253 .WORD 176257 .WORD 176263 .WORD 176267 .WORD 176273 .WORD 176277 .WORD 176303 .WORD 0 .WORD 24000 .WORD 25057 .WORD 25455 .WORD 15 .WORD 11 L13032: .WORD 161377 .WORD 176563 .WORD 176473 .WORD 176477 .WORD 176503 .WORD 176507 .WORD 176513 .WORD 176517 .WORD 176523 .WORD 176527 .WORD 176533 .WORD 176537 .WORD 176543 .WORD 176547 .WORD 176553 .WORD 176557 .WORD 176567 .WORD 0 .WORD 11 L13100: .WORD 166377 .WORD 176237 .WORD 176315 .WORD 176273 .WORD 176243 .WORD 176303 .WORD 176253 .WORD 104452 .WORD 104457 .WORD 104464 .WORD 104471 .WORD 0 .WORD 166376 .WORD 176237 .WORD 176315 .WORD 176273 .WORD 176243 .WORD 176303 .WORD 176253 .WORD 104452 .WORD 104457 .WORD 104464 .WORD 104471 .WORD 0 .WORD 166375 .WORD 176237 .WORD 176315 .WORD 176273 .WORD 176243 .WORD 176303 .WORD 176253 .WORD 104452 .WORD 104457 .WORD 104464 .WORD 104471 .WORD 0 .WORD 166374 .WORD 176237 .WORD 176315 .WORD 176273 .WORD 176243 .WORD 176303 .WORD 176253 .WORD 104452 .WORD 104457 .WORD 104464 .WORD 104471 .WORD 0 .WORD 161377 .WORD 176315 .WORD 176237 .WORD 176243 .WORD 104457 .WORD 176253 .WORD 104464 .WORD 176263 .WORD 104471 .WORD 176273 .WORD 104452 .WORD 176303 .WORD 0 .WORD 24000 .WORD 25057 .WORD 25455 .WORD 15 .WORD 161376 .WORD 176315 .WORD 176237 .WORD 176243 .WORD 104457 .WORD 176253 .WORD 104464 .WORD 176263 .WORD 104471 .WORD 176273 .WORD 104452 .WORD 176303 .WORD 0 .WORD 24000 .WORD 25057 .WORD 25455 .WORD 15 .WORD 161375 .WORD 176315 .WORD 176237 .WORD 176243 .WORD 104457 .WORD 176253 .WORD 104464 .WORD 176263 .WORD 104471 .WORD 176273 .WORD 104452 .WORD 176303 .WORD 0 .WORD 24000 .WORD 25057 .WORD 25455 .WORD 15 .WORD 161374 .WORD 176315 .WORD 176237 .WORD 176243 .WORD 104457 .WORD 176253 .WORD 104464 .WORD 176263 .WORD 104471 .WORD 176273 .WORD 104452 .WORD 176303 .WORD 0 .WORD 24000 .WORD 25057 .WORD 25455 .WORD 15 .WORD 11 L13452: .WORD 161377 .WORD 104747 .WORD 104663 .WORD 104667 .WORD 104673 .WORD 104677 .WORD 104703 .WORD 104707 .WORD 104713 .WORD 104717 .WORD 104723 .WORD 104727 .WORD 104733 .WORD 104736 .WORD 104741 .WORD 104744 .WORD 104753 .WORD 0 .WORD 11 L13520: .WORD 172000 .WORD 35002 .WORD 0 .WORD 1363 .WORD 73 .WORD 177001 .WORD 50002 .WORD 400 .WORD 1375 .WORD 121 .WORD 176001 .WORD 51002 .WORD 400 .WORD 1373 .WORD 123 .WORD 175001 .WORD 52002 .WORD 400 .WORD 1371 .WORD 125 .WORD 174001 .WORD 53002 .WORD 400 .WORD 1367 .WORD 127 .WORD 173001 .WORD 54002 .WORD 400 .WORD 1365 .WORD 131 .WORD 172001 .WORD 55002 .WORD 400 .WORD 1363 .WORD 133 .WORD 177002 .WORD 20002 .WORD 1000 .WORD 1375 .WORD 41 .WORD 176002 .WORD 21002 .WORD 1000 .WORD 1373 .WORD 43 .WORD 175002 .WORD 22002 .WORD 1000 .WORD 1371 .WORD 45 .WORD 174002 .WORD 23002 .WORD 1000 .WORD 1367 .WORD 47 .WORD 173002 .WORD 24002 .WORD 1000 .WORD 1365 .WORD 51 .WORD 172002 .WORD 25002 .WORD 1000 .WORD 1363 .WORD 53 .WORD 10000 .WORD 4011 .WORD 15 .WORD 166000 .WORD 42402 .WORD 0 .WORD 1353 .WORD 110 .WORD 165000 .WORD 43002 .WORD 0 .WORD 1351 .WORD 111 .WORD 164000 .WORD 43402 .WORD 0 .WORD 1347 .WORD 112 .WORD 14400 .WORD 5013 .WORD 3025 .WORD 400 .WORD 15020 .WORD 1000 .WORD 4420 .WORD 6577 .WORD 1000 .WORD 1354 .WORD 170 .WORD 165402 .WORD 74402 .WORD 1000 .WORD 1352 .WORD 167 .WORD 164402 .WORD 72402 .WORD 1000 .WORD 1350 .WORD 172 .WORD 163402 .WORD 73002 .WORD 1000 .WORD 13431 .WORD 6026 .WORD 22 .WORD 16400 .WORD 146752 .WORD 145310 .WORD 146354 .WORD 164716 .WORD 145711 .WORD 27753 .WORD 26452 .WORD 6453 .WORD 4400 L14100: .WORD 16400 .ASCII |.| .ASCII |0| .ASCII |1| .ASCII |2| .ASCII |3| .ASCII |4| .ASCII |5| .ASCII |6| .ASCII |7| .ASCII |8| .ASCII |9| .ASCII |/| .ASCII |*| .ASCII |-| .ASCII |+| .ASCII .WORD 4400 .WORD 17000 .WORD 177377 .WORD 176375 .WORD 175373 .WORD 174371 .WORD 173367 .WORD 2000 .WORD 177001 .WORD 176375 .WORD 175373 .WORD 174371 .WORD 173367 .WORD 377 .WORD 27404 .WORD 343 .WORD 10400 .WORD 171365 .WORD 0 .WORD 167431 .WORD 166756 .WORD 354 .WORD 6400 .WORD 360 .WORD 26000 .WORD 362 .WORD 14401 .WORD 165353 .WORD 164351 .WORD 1000 .WORD 163431 .WORD 162746 .WORD 344 .WORD 24404 .WORD 342 .WORD 23404 .WORD 334 .WORD 21004 .WORD 336 .WORD 25404 .WORD 335 .WORD 13404 .WORD 333 .WORD 10404 .WORD 157741 .WORD 2000 .WORD 160033 .WORD 4400 L14262: .WORD 23400 .WORD 4007 .WORD 0 .WORD 457 .WORD 1402 .WORD 4 .WORD 30401 .WORD 3005 .WORD 4400 .WORD 4567 .WORD 55162 .WORD 15770 .WORD 10267 N14314: MOV #0, @#L77026 CLR @#L77020 CLR @#L77022 CLR R0 MOV #177010, R1 MOV #100000, (R1) MOV #100000, R2 MOV #177024, R3 N14354: MOV R0, (R3) INC (R1) SOB R2, N14354 MOV #174214, @#320 MOV #200, @#322 BIS #1, @#L77066 MOV #2000, @#25572 MOV #2000, @#25574 CALL N14770 JSR R5, N15604 .WORD L15642 .WORD 36074 .WORD 26136 MOV #36316, R0 MOV #36074, R1 MOV #333, R2 N14452: MOV -(R0), -(R1) SOB R2, N14452 JSR R5, N15604 .WORD L16012 .WORD 35652 .WORD 26134 JSR R5, N15604 .WORD L16076 .WORD 35430 .WORD 26132 JSR R5, N15604 .WORD 116202 .WORD 35206 .WORD 26060 JSR R5, N15314 .WORD L20042 CALL N34520 JSR R5, N15250 .WORD 17172 MOV #2, @#25714 MOVB #12, @#25702 MOV #2, @#25630 MOV #2, @#25632 COM @#25706 MOV #13, @#25636 CLR @#11630 CALL N25012 CALL N00002 CLRB @#25707 MOV #20, @#26030 MOV #35206, R5 CLR R0 CALL N30610 N14636: CALL N15424 MOV 46(R5), @#L77026 MOV 102(R5), @#25620 MOV 104(R5), @#25622 INC @#11502 MOV #100000, @#11504 N14676: MOV R5, @#26052 MOV 106(R5), @#25624 MOV 110(R5), @#25626 N14716: MOV 32(R5), @#L77016 N14724: MOVB 34(R5), R0 N14730: ASL R0 MOV L14750(R0), @#L77020 MOV L14750(R0), @#L77022 RETURN L14750: .WORD 104210 .WORD 114631 .WORD 125252 .WORD 135673 .WORD 146314 .WORD 156735 .WORD 167356 .WORD 177777 N14770: MOV #1161, R2 MOV #10304, R1 MOV R1, @#10306 N15004: MOV R1, -(R1) TST -(R1) SOB R2, N15004 JSR R5, N15226 .WORD 177030 .WORD 3520 .WORD 12 .WORD 50 MOV R0, @#3574 MOV #177650, @#3604 JSR R5, N15226 .WORD 100000 .WORD 3610 .WORD 454 .WORD 120 MOV #177710, @#6154 JSR R5, N15226 .WORD 177710 .WORD 6164 .WORD 25 .WORD 0 JSR R5, N15226 .WORD 155000 .WORD 6310 .WORD 334 .WORD 50 JSR R5, N15226 .WORD 177710 .WORD 10070 .WORD 26 .WORD 0 MOV #177650, @#10224 JSR R5, N15226 .WORD 176140 .WORD 10234 .WORD 13 .WORD 50 MOV #2, R0 MOV #6, R1 BIS R0, @#3476 BIS R1, @#3506 BIS R0, @#3566 BIS R1, @#3576 MOV #3610, @#5776 BIS R1, @#6156 MOV #10226, @#10216 BIS R0, @#10226 RETURN N15226: MOV (R5)+, R0 MOV (R5)+, R1 MOV (R5)+, R2 MOV (R5)+, R3 N15236: MOV R0, (R1)+ ADD R3, R0 TST (R1)+ SOB R2, N15236 RTS R5 N15250: MOV #177777, R0 MOV (R5)+, R1 MOV #40, R2 N15262: MOV R0, (R1)+ DEC R0 SOB R2, N15262 RTS R5 N15272: MOV (R5)+, R0 MOV (R5)+, R1 MOV (R5)+, R2 MOV #13, R3 N15304: MOV R0, (R1)+ ADD R3, R0 SOB R2, N15304 RTS R5 N15314: MOV (R5)+, R0 BR N15324 N15320: MOV (R0)+, 15770(R1) N15324: MOV (R0)+, R1 BNE N15320 RTS R5 N15332: CMP R5, #35206 BNE N15424 CLR @#25634 MOV @#25652, R0 MOV R0, 177776(R0) MOV @#25650, R0 MOV R0, @25654 MOV R0, @25646 MOV R0, 26(R5) ADD @#25662, R0 MOV R0, @#25652 MOV #10226, -(R0) JSR R5, N15226 .WORD 100000 .WORD 3610 .WORD 454 .WORD 120 N15424: CMP R5, #35652 BCC N15522 N15432: TST @#25634 BNE N15432 MOV R4, -(SP) MOV 26(R5), R0 MOV 4(R5), R2 MOV 16(R5), R3 CLR R1 MOV #2, R4 ADD @#25666, PC BR N15502 MOV R2, R1 DEC R1 ASL R1 NEG R4 N15502: ADD #10310, R1 N15506: MOV (R0)+, (R1) ADD R3, (R1) ADD R4, R1 MOV (R0), R0 SOB R2, N15506 MOV (SP)+, R4 N15522: RETURN MOV #177010, R3 MOV #177024, R4 CLR R5 TST R2 BMI N15560 N15542: MOV R0, (R3) TST (R4) MOV R1, (R3) MOV R5, (R4) CMPB (R0)+, (R1)+ SOB R2, N15542 BR N15576 N15560: NEG R2 N15562: CMPB -(R0), -(R1) MOV R0, (R3) TST (R4) MOV R1, (R3) MOV R5, (R4) SOB R2, N15562 N15576: MOV @#26052, R5 RETURN N15604: MOV (R5)+, R0 MOV (R5)+, R1 MOV (R0)+, R2 N15612: MOV (R0)+, R3 ADD R1, R3 MOV (R0)+, (R3) SOB R2, N15612 MOV (R0)+, @44(R1) MOV (R0)+, @40(R1) MOV (R0)+, @42(R1) MOV R1, @(R5)+ RTS R5 L15642: .WORD 30 .WORD 0 .WORD 176140 .WORD 2 .WORD 50 .WORD 6 .WORD 50 .WORD 10 .WORD 1 .WORD 4 .WORD 13 .WORD 12 .WORD 50 .WORD 14 .WORD 1 .WORD 22 .WORD 10234 .WORD 24 .WORD 10310 .WORD 26 .WORD 10234 .WORD 30 .WORD 10234 .WORD 46 .WORD 0 .WORD 32 .WORD 3006 .WORD 40 .WORD 10220 .WORD 42 .WORD 10222 .WORD 44 .WORD 10232 .WORD 102 .WORD 10231 .WORD 104 .WORD 10230 .WORD 106 .WORD 1405 .WORD 110 .WORD 30040 .WORD 126 .WORD 12612 .WORD 140 .WORD 14362 .WORD 152 .WORD 7416 .WORD 154 .WORD 1400 .WORD 27 .WORD 135230 .WORD 177334 L16012: .WORD 13 .WORD 0 .WORD 177030 .WORD 4 .WORD 14 .WORD 22 .WORD 3520 .WORD 24 .WORD 16554 .WORD 26 .WORD 3520 .WORD 30 .WORD 3520 .WORD 40 .WORD 3510 .WORD 42 .WORD 3512 .WORD 44 .WORD 3502 .WORD 102 .WORD 3501 .WORD 104 .WORD 3500 .WORD 27 .WORD 135230 .WORD 177334 L16076: .WORD 17 .WORD 0 .WORD 155000 .WORD 10 .WORD 24 .WORD 4 .WORD 334 .WORD 14 .WORD 24 .WORD 22 .WORD 6310 .WORD 24 .WORD 10070 .WORD 26 .WORD 6310 .WORD 30 .WORD 6310 .WORD 32 .WORD 3407 .WORD 40 .WORD 6160 .WORD 42 .WORD 6162 .WORD 44 .WORD 6152 .WORD 102 .WORD 6151 .WORD 104 .WORD 6150 .WORD 112 .WORD 2 .WORD 27 .WORD 135230 .WORD 177334 .WORD 27 .WORD 0 .WORD 100000 .WORD 2 .WORD 120 .WORD 6 .WORD 120 .WORD 12 .WORD 120 .WORD 14 .WORD 30 .WORD 22 .WORD 3610 .WORD 24 .WORD 6000 .WORD 26 .WORD 3610 .WORD 30 .WORD 3610 .WORD 32 .WORD 3407 .WORD 40 .WORD 3600 .WORD 42 .WORD 3602 .WORD 44 .WORD 3572 .WORD 102 .WORD 3571 .WORD 104 .WORD 3570 .WORD 112 .WORD 2 .WORD 124 .WORD 2 .WORD 116 .WORD 2 .WORD 120 .WORD 100000 .WORD 122 .WORD 10 .WORD 176 .WORD 105334 .WORD 200 .WORD 105352 .WORD 160 .WORD 300 .WORD 7 L16342: .WORD 135230 L16344: .WORD 177334 .WORD 5237 .WORD 11610 .WORD 5000 .WORD 157700 .WORD 73230 .WORD 207 N16362: CALL N16432 MOV R0, 2(SP) RETURN MOV #N72244, -(SP) MOV SP, @#11602 MOV @#26052, R5 MOV #600, R1 MOV (R1)+, R2 ADD R2, R1 ASR R2 N16422: MOV -(R1), -(SP) SOB R2, N16422 INC @#11476 N16432: ADD @#11606, PC DEC @#11476 BNE N16476 TST @#11612 BNE N16570 MOV #7777, R1 N16456: ADD @#11574, PC TRAP 6 TST @#11476 BNE N16476 SOB R1, N16456 BR N16570 N16476: MOVB @25572, R0 INC @#25572 BIC #1000, @#25572 BIC #177400, R0 CMP R0, #40 BCC N16532 ADD @#25716, PC N16532: RETURN ADD @#25714, PC RETURN CMP R0, #33 BEQ N16564 ASL R0 MOV #2, R4 CALL @15770(R0) BR N16432 N16564: JMP N24672 N16570: MOV @#11470, R0 MOV #116374, 30(R0) MOV #600, R1 MOV @#11602, R2 SUB SP, R2 MOV R2, (R1)+ ASR R2 N16620: MOV (SP)+, (R1)+ SOB R2, N16620 RETURN N16626: MOV SP, @#11602 CLR @#25600 MOV @#26052, R5 CALL N50156 CALL N14716 N16652: CLR R0 BISB @25572, R0 INC @#25572 BIC #1000, @#25572 CALL N16734 DEC @#11476 BEQ N16714 TST @#11472 BEQ N16652 RETURN N16714: ADD @#11574, PC TRAP 4 INC @#11502 RETURN .WORD 47721 .WORD 0 N16734: ASL R0 MOV 17172(R0), R1 BPL N17002 COM R1 MOV R1, R0 N16750: ADD @#25704, PC N16754: MOV #2, R4 ASL R0 JMP @15770(R0) N16766: CMP R0, #40 BCC N16776 BCS N16750 N16776: MUL #13, R0 N17002: ADD @#17170, R1 MOV 6(R5), R0 MOV #177010, R2 MOV #177024, R3 MOV (R5), (R2) N17024: ADD 74(R5), PC MOVB (R1)+, R4 MOV R4, (R3) ADD R0, (R2) MOVB (R1)+, R4 MOV R4, (R3) ADD R0, (R2) MOVB (R1)+, R4 MOV R4, (R3) ADD R0, (R2) MOVB (R1)+, R4 MOV R4, (R3) ADD R0, (R2) MOVB (R1)+, R4 MOV R4, (R3) ADD R0, (R2) MOVB (R1)+, R4 MOV R4, (R3) ADD R0, (R2) MOVB (R1)+, R4 MOV R4, (R3) ADD R0, (R2) MOVB (R1)+, R4 MOV R4, (R3) ADD R0, (R2) MOVB (R1)+, R4 MOV R4, (R3) ADD R0, (R2) MOVB (R1)+, R4 MOV R4, (R3) ADD R0, (R2) MOVB (R1)+, R4 MOV R4, (R3) N17130: INC (R5) DEC 12(R5) BGT N17216 ADD 124(R5), PC BR N17220 MOV 16(R5), (R5) MOV 2(R5), 12(R5) N17160: ADD #54, 30(R5) CMP 30(R5), 24(R5) BNE N17204 MOV 22(R5), 30(R5) N17204: ADD @30(R5), (R5) DEC 14(R5) BEQ N17500 N17216: RETURN N17220: TST 12(R5) BMI N17254 CMP 74(R5), #236 BEQ N17216 MOV 74(R5), 76(R5) MOV #236, 74(R5) RETURN N17254: DEC (R5) INC 12(R5) BMI N17254 RETURN TST 12(R5) BLE N17216 MOV 76(R5), 74(R5) BR N17024 MOV #13, R0 DEC R0 CLR R2 TSTB 100(R5) BNE N17326 MOV #2, R2 N17326: MOVB (R1)+, R4 ADD R2, PC COM R4 MOV R4, (R3) ADD 6(R5), @#L77010 SOB R0, N17326 MOVB (R1)+, R4 BISB 101(R5), R4 ADD R2, PC COM R4 MOV R4, (R3) BR N17130 CMP R0, #33 BEQ N17376 JMP N16776 N17376: JMP N16754 MOV R0, -(SP) TST 12(R5) BLE N17464 MOV 74(R5), -(SP) MOV #254, 74(R5) COMB 100(R5) ADD #100, R0 CALL N16776 COMB 100(R5) TST 12(R5) BGT N17460 MOV (SP)+, 76(R5) BR N17464 N17460: MOV (SP)+, 74(R5) N17464: CMPB (SP)+, @#25702 BNE N17476 CALL N25642 N17476: RETURN N17500: TST @#25636 BEQ N17646 MOV #13, -(SP) CMP R5, #35206 BNE N17652 INC 14(R5) ADD #54, 26(R5) CMP 26(R5), @#25656 BNE N17550 MOV @#25650, 26(R5) N17550: CMP R5, #35206 BNE N17652 MOV @#25634, R0 BEQ N17614 BPL N17570 NEG R0 N17570: CMP R0, @#25642 BLOS N17622 ADD @#11574, PC TRAP 4 TRAP 0 MOV @#26052, R5 BR N17550 N17614: MOV @#25636, @#25640 N17622: MOVB #177, @25620 CALL N27136 CALL N50166 ADD (SP)+, @#25634 RETURN N17646: JMP N25704 N17652: TST (SP) BMI N17662 CALL N25442 N17662: TST @#25666 BEQ N17672 NEG (SP) N17672: MOV R5, -(SP) MOV 2(R5), -(SP) MOV 4(R5), -(SP) CMP 10(R5), #1 BEQ N20030 MOV #177010, R3 MOV #177024, R4 CLR R5 TST 6(SP) BPL N17740 MOV (SP), R5 ASL R5 N17740: ADD #10310, R5 SUB #13, (SP) N17750: MOV R5, R1 TST 6(SP) BPL N17772 MOV -(R5), R0 SUB #26, R1 MOV -(R1), R1 BR N20002 N17772: MOV (R5)+, R0 ADD #26, R1 MOV (R1), R1 N20002: MOV 2(SP), R2 N20006: MOV R1, (R3) TST (R4) MOV R0, (R3) CLR (R4) INC R0 INC R1 SOB R2, N20006 DEC (SP) BNE N17750 N20030: CMP (SP)+, (SP)+ MOV (SP)+, R5 TST (SP)+ JMP N27136 L20042: .WORD 16 .WORD N24574 .WORD 20 .WORD N25650 .WORD 22 .WORD N24612 .WORD 24 .WORD N25634 .WORD 26 .WORD N25634 .WORD 30 .WORD N25634 .WORD 32 L20074: .WORD N25724 .WORD 34 .WORD N02260 .WORD 36 .WORD N02342 .WORD 60 .WORD N24656 .WORD 66 .WORD N24676 .WORD 102 .WORD N27110 .WORD 106 .WORD N23226 .WORD 112 .WORD N24734 .WORD 170 .WORD N20700 .WORD 172 .WORD N25106 .WORD 174 .WORD N25174 .WORD 200 .WORD N26504 .WORD 202 .WORD N25442 .WORD 204 .WORD N25606 .WORD 206 .WORD N17130 .WORD 210 .WORD N25650 .WORD 214 .WORD N02500 .WORD 216 .WORD N02566 .WORD 220 .WORD N27054 .WORD 222 .WORD N25436 .WORD 224 .WORD N27456 .WORD 226 .WORD N27540 .WORD 234 .WORD N25776 .WORD 236 .WORD N25772 .WORD 240 .WORD N26646 .WORD 262 .WORD N27562 .WORD 264 .WORD N25220 .WORD 270 .WORD N23210 .WORD 300 .WORD N30044 .WORD 302 .WORD N30104 .WORD 304 .WORD N30142 .WORD 306 .WORD N30176 .WORD 310 .WORD N30322 .WORD 312 .WORD N30400 .WORD 314 .WORD N30432 .WORD 316 .WORD N30506 .WORD 320 .WORD N31116 .WORD 322 .WORD N31554 .WORD 324 .WORD N32064 .WORD 326 .WORD N32662 .WORD 330 .WORD N32776 .WORD 332 .WORD N33040 .WORD 334 .WORD N33056 .WORD 336 .WORD N33114 .WORD 340 .WORD N33202 .WORD 342 .WORD N33326 .WORD 344 .WORD N33340 .WORD 346 .WORD N33362 .WORD 350 .WORD N33374 .WORD 352 .WORD N34276 .WORD 354 .WORD N34552 .WORD 356 .WORD N34564 .WORD 360 .WORD N34572 .WORD 362 .WORD N35764 .WORD 364 .WORD N36026 .WORD 366 .WORD N36034 .WORD 370 .WORD N36042 .WORD 372 .WORD N36122 .WORD 374 .WORD N36170 .WORD 376 .WORD N36214 .WORD 760 .WORD N36236 .WORD 762 .WORD N36250 .WORD 764 .WORD N36344 .WORD 770 .WORD N32064 .WORD 772 .WORD N57304 .WORD 774 .WORD N36354 .WORD 776 .WORD N36214 .WORD 1000 .WORD N21214 .WORD 1002 .WORD N21232 .WORD 1004 .WORD N21250 .WORD 1006 .WORD N21264 .WORD 1010 .WORD N21300 .WORD 1012 .WORD N21316 .WORD 1014 .WORD N21324 .WORD 1020 .WORD N21332 .WORD 1024 .WORD N21372 .WORD 1026 .WORD N21506 .WORD 1030 .WORD N21560 .WORD 1032 .WORD N21574 .WORD 1040 .WORD N21610 .WORD 1042 .WORD N21626 .WORD 1046 .WORD N21626 .WORD 1050 .WORD N21642 .WORD 1060 .WORD N21656 .WORD 1064 .WORD N21744 .WORD 1100 .WORD N22012 .WORD 1102 .WORD N21264 .WORD 1110 .WORD N22034 .WORD 1112 .WORD N21250 .WORD 1114 .WORD N21332 .WORD 1116 .WORD N22056 .WORD 1120 .WORD N22074 .WORD 1122 .WORD N22402 .WORD 1130 .WORD N22102 .WORD 1132 .WORD N22422 .WORD 1140 .WORD N23160 .WORD 1142 .WORD N23174 .WORD 0 N20700: MOV #1, @#25720 MOV #240, @#L77010 CLR @#L77014 JSR R5, N03014 .WORD 176346 COM @#26024 CALL N75376 JSR R5, N10470 .WORD L12272 CLR @#15362 CALL N10334 MOVB 32(R5), 33(R5) N20762: JSR R5, N71472 .WORD 15770 .WORD 400 JSR R5, N15314 .WORD L20042 MOV #121010, @#16256 RETURN MOV #25724, -(SP) N21014: CALL N16432 CMP R0, #100 BCC N21036 MOVB R0, @0(SP) INC (SP) BR N21014 N21036: MOV (SP)+, R1 CLRB (R1)+ CLRB (R1) ASLB R0 JMP @16570(R0) N21052: MOV #25724, R1 N21056: CLR R3 N21060: MOVB (R1)+, R0 BEQ N21110 SUB #60, R0 BMI N21122 CMP R0, #11 BHI N21114 MUL #12, R3 ADD R0, R3 BR N21060 N21110: TST R3 RETURN N21114: CMP R0, #13 BEQ N21110 N21122: SEC RETURN N21126: MOV (R5)+, R0 MOV (R5)+, R1 N21132: TSTB (R1) BEQ N21144 CMPB (R0)+, (R1)+ BEQ N21132 SEC N21144: RTS R5 MOV #177777, R2 N21152: CALL N21052 BCS N21210 BNE N21164 INC R3 N21164: MOV R3, -(SP) CMP R3, R2 BLOS N21176 MOV R2, (SP) BEQ N21206 N21176: CALL @2(SP) DEC (SP) BNE N21176 N21206: TST (SP)+ N21210: TST (SP)+ N21212: RETURN N21214: CALL N21052 BCS N21212 BNE N21226 INC R3 N21226: JMP N26652 N21232: MOV #125442, -(SP) MOV 10(R5), R2 SUB 14(R5), R2 BR N21152 N21250: MOV #N25606, -(SP) MOV 14(R5), R2 DEC R2 BR N21152 N21264: MOV #N17130, -(SP) MOV 12(R5), R2 DEC R2 BR N21152 N21300: MOV #N25650, -(SP) MOV 2(R5), R2 SUB 12(R5), R2 BR N21152 N21316: CALL N25744 BR N21250 N21324: CALL N25724 BR N21232 N21332: CALL N21052 BCS N21212 DEC R3 BPL N21346 CLR R3 N21346: MOV R3, -(SP) CALL N21056 DEC R3 BPL N21362 CLR R3 N21362: SWAB R3 BIS (SP)+, R3 JMP N27732 N21372: CALL N21052 BNE N21404 JMP N27456 N21404: ROR R3 BCC N21466 CALL N30002 MOV R3, -(SP) MOV #1, R3 CALL N21520 MOV 10(R5), R4 SUB 14(R5), R4 BEQ N21500 MOV R4, -(SP) CALL N27054 N21446: CALL N27136 CALL N25606 DEC (SP) BNE N21446 TST (SP)+ BR N21500 N21466: CALL N30002 MOV R3, -(SP) CALL N27110 N21500: MOV (SP)+, R3 JMP N27732 N21506: CALL N21052 BNE N21520 JMP N27540 N21520: MOV 2(R5), R2 ROR R3 BCC N21544 TST 12(R5) BEQ N21544 SUB 12(R5), R2 INC R2 N21544: MOV @30(R5), R1 ADD 16(R5), R1 JMP N27550 N21560: MOV #125776, -(SP) MOV 14(R5), R2 JMP N21152 N21574: MOV #125772, -(SP) MOV 14(R5), R2 JMP N21152 N21610: CALL N21052 BCS N21742 BNE N21622 INC R3 N21622: JMP N26510 N21626: MOV #127030, -(SP) MOV 10(R5), R2 JMP N21152 N21642: MOV #127004, -(SP) MOV 10(R5), R2 JMP N21152 N21656: CALL N21052 BCS N21742 BNE N21670 INC R3 N21670: CMP R3, 12(R5) BCC N21702 MOV 12(R5), R3 N21702: MOV R3, -(SP) BEQ N21740 CALL N30002 MOV R3, -(SP) N21714: MOV #40, R0 CALL N16776 DEC 2(SP) BNE N21714 MOV (SP)+, R3 CALL N27732 N21740: TST (SP)+ N21742: RETURN N21744: CALL N21052 BCS N21742 MOV R3, R2 BNE N21760 INC R2 N21760: CALL N30002 SWAB R3 N21766: DECB R3 BPL N21774 INCB R3 N21774: BIC #7, R3 SOB R2, N21766 SWAB R3 CALL N27732 RETURN N22012: CALL N21052 BCS N21742 DEC R3 BPL N22026 CLR R3 N22026: MOV R3, R0 JMP N27612 N22034: CALL N21052 BCS N21742 DEC R3 BPL N22050 CLR R3 N22050: MOV R3, R0 JMP N27646 N22056: CALL N21052 BCS N21742 MOV R3, R0 CALL N16776 RETURN N22074: MOV #2, R4 BR N22104 N22102: CLR R4 N22104: MOV #25724, R1 N22110: TSTB (R1) BEQ N22330 CMPB (R1), #77 BNE N22126 COM R4 INC R1 N22126: CALL N21056 BCS N22330 COM R4 BPL N22146 COM R4 ADD #12, R3 N22146: CMP R3, #16 BLOS N22166 CMP R3, #36 BNE N22126 MOV #17, R3 N22166: ASL R3 MOV R1, -(SP) TST R4 CALL @L22204(R3) MOV (SP)+, R1 BR N22110 L22204: .WORD 0 .WORD 0 .WORD N22244 .WORD 0 .WORD 0 .WORD N22332 .WORD 0 .WORD N33340 .WORD 0 .WORD 0 .WORD N23562 .WORD N24270 .WORD N36026 .WORD 0 .WORD 0 .WORD N22354 N22244: BNE N22330 CLR @#25720 JSR R5, N15314 .WORD L20042 CLR @#16256 CALL N25174 CALL N25012 CALL N75472 EMT 50 .WORD B05252 JSR R5, N10470 .WORD L13100 CLR @#15362 CALL N10334 CLR R0 CALL N34606 N22330: RETURN N22332: BEQ N22340 JMP @#N23650 N22340: JMP @#N23700 N22344: MOV #2, R4 BR N22354 N22352: CLR R4 N22354: MOV R4, @#26042 BNE N22372 JSR R5, N10470 .WORD L11503 RETURN N22372: JSR R5, N10470 .WORD L11470 RETURN N22402: CALL N21052 BCS N22330 CMPB R3, #5 BNE N22330 JMP N74550 N22422: MOV #25724, R1 TSTB (R1) BEQ N22640 N22432: TSTB (R1) BEQ N22330 CALL N21056 BCS N22330 CMP R3, #57 BHI N22432 CMP R3, #34 BHI N22474 ASL R3 MOV R1, -(SP) CALL @L22546(R3) MOV (SP)+, R1 BR N22432 N22474: MOV R1, R3 DEC R3 MOVB -(R3), R0 CMPB -(R3), #63 BNE N22522 CALL N30054 CALL N30054 BR N22432 N22522: CMPB (R3), #64 BNE N22432 CALL N30152 MOVB R0, 34(R5) CALL N30114 BR N22432 L22546: .WORD N22640 .WORD N22656 .WORD N22666 .WORD N22734 .WORD N30326 .WORD N22770 .WORD 0 .WORD N23032 .WORD N23074 .WORD 0 .WORD N23144 .WORD 0 .WORD N23104 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD N23022 .WORD 0 .WORD 0 .WORD N30342 .WORD N23016 .WORD 0 .WORD N23060 .WORD N23022 N22640: CALL N23016 CALL N23060 CALL N30342 RETURN N22656: MOV #5, R0 JMP N30064 N22666: CALL N21056 MOV R3, R0 CALL N30054 CALL N30054 CALL N21056 MOV R3, R0 CALL N30152 MOVB R0, 34(R5) CALL N30114 N22726: MOV R1, 2(SP) RETURN N22734: CALL N21056 BCS N22726 BNE N22760 CLR @#26030 MOV @#26034, @26032 BR N22726 N22760: MOV #20, @#26030 BR N22726 N22770: MOV #2, R0 MOV R0, @#26036 TSTB 100(R5) BNE N23012 JMP N30064 N23012: JMP N30124 N23016: CLR @#26036 N23022: CALL N30076 JMP N30134 N23032: CALL N30404 MOVB 32(R5), 36(R5) N23044: TST @#26036 BEQ N23142 CALL N23022 BR N22770 N23060: CALL N30420 MOVB 34(R5), 36(R5) BR N23044 N23074: MOVB 34(R5), R0 JMP N30064 N23104: JSR R5, N15272 .WORD 2600 .WORD 17332 .WORD 60 JSR R5, N15272 .WORD 2600 .WORD 17472 .WORD 20 JSR R5, N15272 .WORD 3620 .WORD 17532 .WORD 20 N23142: RETURN N23144: JSR R5, N15272 .WORD 1020 .WORD 17332 .WORD 120 RETURN N23160: CALL N21052 BCS N23142 MOV R3, @#26046 RETURN N23174: CALL N21052 BCS N23142 MOV R3, @#11732 RETURN N23210: CALL N25326 .WORD 2 BCS N23142 MOV R0, @#26046 RETURN N23226: CALL N25326 .WORD 1 BCS N23142 MOV R0, @#11732 RETURN L23244: .WORD 16 .WORD N24574 .WORD 20 .WORD N25650 .WORD 22 .WORD N24612 .WORD 24 .WORD N25634 .WORD 32 .WORD N25724 .WORD 34 .WORD N02260 .WORD 36 .WORD N02342 .WORD 66 .WORD N24676 .WORD 26 .WORD N25442 .WORD 54 .WORD N25606 .WORD 52 .WORD N25650 .WORD 14 .WORD N17130 .WORD 104 .WORD N23634 .WORD 106 .WORD N23640 .WORD 120 .WORD N23032 .WORD 122 .WORD N23060 .WORD 124 .WORD N23650 .WORD 126 .WORD N23700 .WORD 130 .WORD N23716 .WORD 132 .WORD N23722 .WORD 134 .WORD N24440 .WORD 140 .WORD N24010 .WORD 142 .WORD N24566 .WORD 144 .WORD N24556 .WORD 146 .WORD N22656 .WORD 150 .WORD N23022 .WORD 160 .WORD N22344 .WORD 162 .WORD N22352 .WORD 164 .WORD N74544 .WORD 170 .WORD N20700 .WORD 202 .WORD N25442 .WORD 204 .WORD N25606 .WORD 206 .WORD N17130 .WORD 210 .WORD N25650 .WORD 212 .WORD N27110 .WORD 220 .WORD N27054 .WORD 222 .WORD N25436 .WORD 224 .WORD N27456 .WORD 226 .WORD N27540 .WORD 240 .WORD N26646 .WORD 242 .WORD N26504 .WORD 246 .WORD N25776 .WORD 250 .WORD N25772 .WORD 256 .WORD N74550 .WORD 262 .WORD N27562 .WORD 264 .WORD N34572 .WORD 270 .WORD N23210 .WORD 304 .WORD N23562 .WORD 352 .WORD N24566 .WORD 354 .WORD N24556 .WORD 374 .WORD N24002 .WORD 0 N23562: BNE N23632 MOV #2, @#25720 CALL N25174 JSR R5, N10470 .WORD L13520 CLR @#15362 CALL N10334 N23614: JSR R5, N71472 .WORD 15770 .WORD 400 JSR R5, N15314 .WORD L23244 N23632: RETURN N23634: CLR R4 BR N23644 N23640: MOV #2, R4 N23644: JMP N36026 N23650: MOV @#L23674, @#3600 MOV @#L23676, @#3602 N23664: MOV @#3600, @#26034 RETURN L23674: .WORD 146757 L23676: .WORD 104653 N23700: MOV @#L16342, @#3600 MOV @#L16344, @#3602 BR N23664 N23716: CALL N22640 N23722: CALL N16432 SUB #60, R0 BLE N23766 BIC #177740, R0 MOV R0, R4 CLR R3 BR N23754 N23746: BEQ N23766 N23750: ADD #2, R3 N23754: ASR R4 BCC N23746 CALL @123770(R3) BR N23750 N23766: RETURN .WORD 122656 .WORD 122770 .WORD 123032 .WORD 130326 .WORD 123074 N24002: MOV #2, R4 BR N24012 N24010: CLR R4 N24012: JMP N33340 L24016: .WORD 66 .WORD N24676 .WORD 170 .WORD N24336 .WORD 16 .WORD N24574 .WORD 74 .WORD N27054 .WORD 26 .WORD N25442 .WORD 30 .WORD N17130 .WORD 20 .WORD N25650 .WORD 24 .WORD N25634 .WORD 324 .WORD N25436 .WORD 32 .WORD N25724 .WORD 76 .WORD N25642 .WORD 172 .WORD N27562 .WORD 22 .WORD N24612 .WORD 222 .WORD N21744 .WORD 64 .WORD N27110 .WORD 124 .WORD N27110 .WORD 250 .WORD N27540 .WORD 350 .WORD N27540 .WORD 262 .WORD N27456 .WORD 362 .WORD N27456 .WORD 212 .WORD N25776 .WORD 244 .WORD N25772 .WORD 256 .WORD N26504 .WORD 242 .WORD N26646 .WORD 216 .WORD N24346 .WORD 206 .WORD N22656 .WORD 122 .WORD N23022 .WORD 304 .WORD N23650 .WORD 310 .WORD N23700 .WORD 252 .WORD N24556 .WORD 260 .WORD N24566 .WORD 352 .WORD N24566 .WORD 134 .WORD N24440 .WORD 300 .WORD N74550 .WORD 160 .WORD N22344 .WORD 162 .WORD N22352 .WORD 106 .WORD N23640 .WORD 104 .WORD N23634 .WORD 140 .WORD N24010 .WORD 374 .WORD N24002 .WORD 360 .WORD N34572 .WORD 270 .WORD N23210 .WORD 0 N24270: BNE N24334 MOV #3, @#25720 MOV #240, @#L77010 MOV SP, @#L77014 CALL N35770 N24316: JSR R5, N71472 .WORD 15770 .WORD 400 JSR R5, N15314 .WORD L24016 N24334: RETURN N24336: CALL N36012 JMP N20700 N24346: CALL N22640 CALL N16432 MOV #100, R4 XOR R4, R0 BIC #177660, R0 MOV R0, R4 ASL R4 CLR R3 BR N24406 N24400: BEQ N24334 N24402: ADD #2, R3 N24406: ASLB R4 BCC N24400 CALL @L24422(R3) BR N24402 RETURN L24422: .WORD N22656 .WORD N24334 .WORD N24334 .WORD N30326 .WORD N23032 .WORD N22770 .WORD N23074 N24440: CALL N25326 .WORD 6 BCS N24334 CLR R4 ASL R0 ADD R0, PC BR N24552 BR N24512 BR N24520 BR N24472 BR N24500 BR N24512 N24472: MOV #30040, R1 BR N24504 N24500: MOV #77400, R1 N24504: MOV #3, R0 BR N24530 N24512: MOV #30040, R1 BR N24524 N24520: MOV #77400, R1 N24524: MOV #2, R0 N24530: MOV R1, 110(R5) MOV 110(R5), @#25626 CALL N33212 MOV #2, R4 N24552: JMP N33326 N24556: MOV #410, @#25704 RETURN N24566: CLR @#25704 RETURN N24574: BIS @#11752, @#L77716 MOV #20, @#11420 RETURN N24612: CALL N30002 MOV 2(R5), R0 SWAB R0 BIC #3400, R3 ADD #4000, R3 CMP R3, R0 BCS N24650 SUB #400, R0 BISB R3, R0 MOV R0, R3 N24650: CALL N27732 RETURN N24656: ADD @#25716, PC RETURN MOV @#11600, SP RETURN N24672: MOV @#11600, SP N24676: MOV SP, @#11600 MOV #2, @#25716 CALL N16432 ASL R0 MOV #2, R4 CALL @15770(R0) CLR @#25716 RETURN N24734: CALL N16432 CMPB R0, #41 BNE N24764 CALL N16432 BIC #177774, R0 ASL R0 CALL @L24766(R0) N24764: RETURN L24766: .WORD N24776 .WORD N25012 .WORD N25012 .WORD N25012 N24776: CALL N15424 MOV #100002, @#16242 RETURN N25012: JSR R5, N03014 TRAP 50 JSR R5, N15314 .WORD L25030 RETURN L25030: .WORD 20 .WORD N25650 .WORD 26 .WORD N25634 .WORD 30 .WORD N25634 .WORD 252 .WORD 0 .WORD 0 JSR R5, N03014 TRAP 154 JSR R5, N15314 .WORD L25070 RETURN L25070: .WORD 20 .WORD N27054 .WORD 26 .WORD N27540 .WORD 30 .WORD N27110 .WORD 0 N25106: TST @#11512 BNE N25154 CMP @#25720, #1 BNE N25136 JSR R5, N02776 .WORD 15324 .WORD L76430 BR N25146 N25136: JSR R5, N02776 .WORD 15324 .WORD L04620 N25146: BCS N25154 EMT 50 .WORD B05261 N25154: INC @#26026 N25160: TST @#11770 BEQ N25172 CALL N10334 N25172: RETURN N25174: JSR R5, N02762 .WORD 15324 .WORD L04620 BCS N25212 EMT 50 .WORD 4 N25212: CLR @#26026 BR N25160 N25220: MOV #125232, R0 CALL N00616 RETURN .WORD 27433 .WORD 62 MOV R5, -(SP) MOV @#26052, R5 MOV 4(SP), R0 BMI N25262 SWAB 32(R5) MOVB R0, 32(R5) N25262: MOV 6(SP), R0 BMI N25300 SWAB 34(R5) MOVB R0, 34(R5) N25300: MOV 10(SP), R0 BMI N25316 SWAB 36(R5) MOVB R0, 36(R5) N25316: CALL N14676 MOV (SP)+, R5 RETURN N25326: MOV @0(SP), R0 ADD #2, (SP) N25336: MOV R0, -(SP) BR N25344 N25342: CLR -(SP) N25344: CALL N16432 MOVB R0, R0 SUB #60, R0 MOV (SP)+, R1 BEQ N25412 TST R0 BPL N25400 SWAB R1 BPL N25404 CMPB R0, R1 BCC N25412 BR N25404 N25400: CMPB R0, R1 BLOS N25412 N25404: MOVB R1, R0 SEC RETURN N25412: TST R0 RETURN N25416: CALL N16432 MOV R0, -(SP) CALL N16432 SWAB R0 BIS (SP)+, R0 RETURN N25436: MOV SP, R0 BR N25444 N25442: CLR R0 N25444: CMP 14(R5), 10(R5) BNE N25502 TST R0 BNE N25466 ADD 124(R5), PC RETURN N25466: TST @#25636 BEQ N25602 CMP R5, #35206 BNE N25562 N25502: SUB @30(R5), (R5) SUB #54, 30(R5) CMP 30(R5), 22(R5) BCC N25540 MOV 24(R5), 30(R5) SUB #54, 30(R5) N25540: ADD @30(R5), (R5) CMP 14(R5), 10(R5) BNE N25574 MOV 30(R5), 26(R5) N25562: MOV #13, -(SP) NEG (SP) JMP N17550 N25574: INC 14(R5) RETURN N25602: JMP N25712 N25606: CMP 14(R5), #1 BNE N25624 ADD 124(R5), PC RETURN N25624: SUB @30(R5), (R5) JMP N17160 N25634: TST @#26042 BEQ N25624 N25642: CALL N25724 BR N25624 N25650: CMP 12(R5), 2(R5) BEQ N25670 DEC (R5) INC 12(R5) RETURN N25670: ADD 124(R5), PC RETURN .WORD 4767 .WORD 42 .WORD 657 N25704: CLR R0 JMP N27646 N25712: MOV 10(R5), R0 DEC R0 JMP N27646 N25724: MOV 16(R5), (R5) ADD @30(R5), (R5) MOV 2(R5), 12(R5) RETURN N25744: MOV 2(R5), (R5) ADD 16(R5), (R5) DEC (R5) ADD @30(R5), (R5) MOV #1, 12(R5) RETURN N25772: CLR -(SP) BR N26000 N25776: MOV PC, -(SP) N26000: TST @#25634 BNE N26000 CALL N30002 MOV R3, -(SP) MOVB R3, R3 INC R3 MOV 10(R5), R1 SUB R3, R1 BEQ N26302 MUL #13, R1 MOV R1, -(SP) MOV #177010, R3 MOV #177024, R4 TST 4(SP) BNE N26100 MOV 30(R5), -(SP) CALL N25606 MOV 30(R5), -(SP) CMP R5, #35206 BEQ N26332 BR N26130 N26100: CALL N25712 MOV 30(R5), R0 MOV R0, R1 ADD #54, R1 CMP R5, #35206 BEQ N26406 INC (SP) BR N26216 N26130: MOV @2(SP), R0 ADD 16(R5), R0 MOV @0(SP), R1 ADD 16(R5), R1 MOV 2(R5), R2 N26154: MOV R1, (R3) TST (R4) MOV R0, (R3) CLR (R4) INC R0 INC R1 SOB R2, N26154 MOV (SP)+, R0 MOV (SP)+, R1 TST 4(SP) BNE N26216 MOV 2(R1), -(SP) MOV 2(R0), -(SP) BR N26262 N26216: SUB #4, R1 CMP R1, 22(R5) BCC N26236 MOV 24(R5), R1 BR N26216 N26236: MOV R1, -(SP) N26240: SUB #4, R0 CMP R0, 22(R5) BCC N26260 MOV 24(R5), R0 BR N26240 N26260: MOV R0, -(SP) N26262: DEC 4(SP) BNE N26130 ADD #6, SP TST 2(SP) BNE N26312 N26302: CALL N25712 CALL N27136 N26312: MOV (SP)+, R3 CALL N27732 TST (SP)+ BEQ N26330 CALL N27136 N26330: RETURN N26332: MOV (SP)+, R4 MOV (SP)+, R3 MOV (SP)+, R2 MOV (R3), R1 N26342: MOV (R4)+, (R3)+ MOV (R3), R3 MOV (R4), R4 SOB R2, N26342 MOV R1, -(SP) MOV R3, -(SP) N26356: CALL N27146 MOV (SP)+, R3 MOV (SP)+, R1 MOV #13, R2 N26372: MOV R1, (R3)+ ADD 6(R5), R1 MOV (R3), R3 SOB R2, N26372 BR N26312 N26406: MOV (SP)+, R3 CLR R2 DIV #13, R2 MOV (R0), -(SP) N26420: MOV #13, R4 N26424: CMP -(R1), -(R1) CMP R1, 22(R5) BCC N26442 MOV 24(R5), R1 BR N26424 N26442: CMP -(R0), -(R0) CMP R0, 22(R5) BCC N26464 MOV 24(R5), R0 BR N26442 N26460: CMP -(R1), -(R1) CMP -(R0), -(R0) N26464: MOV (R0), (R1) SOB R4, N26460 SOB R2, N26420 MOV (SP), R1 MOV R0, -(SP) CLR 6(SP) BR N26356 N26504: MOV #1, R3 N26510: MOV 12(R5), R0 BLE N26330 SUB R3, R0 BGT N26534 BEQ N26626 MOV 12(R5), R3 CLR R0 BR N26626 N26534: MOV (R5), R1 ADD R3, R1 MOV R1, -(SP) MOV R0, -(SP) MOV #13, -(SP) MOV R3, R1 INC R1 MOV #177010, R0 MOV #177024, R4 N26564: MOV 4(SP), (R0) MOV 2(SP), R2 N26574: TST (R4) SUB R3, (R0) CLR (R4) ADD R1, (R0) SOB R2, N26574 ADD 6(R5), 4(SP) DEC (SP) BNE N26564 TST (SP)+ MOV (SP)+, R0 TST (SP)+ N26626: MOV (R5), R1 ADD R0, R1 MOV R3, R2 MOV #13, R3 CLR R0 JMP N27224 N26646: MOV #1, R3 N26652: MOV 12(R5), R0 BLE N26330 SUB R3, R0 BGT N26674 BEQ N26766 MOV 12(R5), R3 BR N26766 N26674: MOV (R5), R1 ADD R0, R1 DEC R1 MOV R1, -(SP) MOV R0, -(SP) MOV #13, -(SP) MOV R3, R1 INC R1 MOV #177010, R0 MOV #177024, R4 N26726: MOV 4(SP), (R0) MOV 2(SP), R2 N26736: TST (R4) ADD R3, (R0) CLR (R4) SUB R1, (R0) SOB R2, N26736 ADD 6(R5), 4(SP) DEC (SP) BNE N26726 ADD #6, SP N26766: MOV (R5), R1 MOV R3, R2 MOV #13, R3 CLR R0 JMP N27224 CALL N30002 MOV R3, -(SP) CALL N25704 CALL N25436 MOV (SP)+, R3 JMP N27732 CALL N30002 MOV R3, -(SP) CALL N25712 CALL N25624 MOV (SP)+, R3 JMP N27732 N27054: MOV 26(R5), 30(R5) MOV 16(R5), (R5) ADD @30(R5), (R5) MOV 2(R5), 12(R5) MOV 10(R5), 14(R5) RETURN N27110: CALL N27364 CALL N15332 CALL N27156 CALL N27432 CALL N27054 RETURN N27136: MOV @30(R5), R1 ADD 16(R5), R1 N27146: MOV #13, R3 CLR R0 BR N27220 N27156: MOV 4(R5), R3 MOV #10310, R0 MOV (R0), R1 CMP R5, #35206 BCS N27220 BHI N27204 MOV #440, R3 N27204: CLR R0 MOV @26(R5), R1 MOV 6(R5), R2 BR N27224 N27220: MOV 2(R5), R2 N27224: MOVB 36(R5), R4 ASL R4 MOV L14750(R4), @#L77020 MOV L14750(R4), @#L77022 MOV #177010, R4 MOV R1, (R4) MOV #177024, R1 CMP R5, #35652 BCC N27272 TST R0 BNE N27326 N27272: CMP R2, 6(R5) BEQ N27350 MOV R2, R0 BR N27314 N27304: MOV R0, R2 SUB R2, (R4) ADD 6(R5), (R4) N27314: CLR (R1) INC (R4) SOB R2, N27314 SOB R3, N27304 BR N27360 N27326: MOV R2, -(SP) N27330: MOV (R0)+, (R4) MOV (SP), R2 N27334: CLR (R1) INC (R4) SOB R2, N27334 SOB R3, N27330 TST (SP)+ BR N27360 N27350: MUL R2, R3 N27352: CLR (R1) INC (R4) SOB R3, N27352 N27360: JMP N14724 N27364: CMP R5, #35206 BNE N27430 MOVB 36(R5), R0 ASL R0 MOV 114750(R0), R0 MOV @40(R5), @#25674 MOV @42(R5), @#25676 MOV R0, @40(R5) MOV R0, @42(R5) N27430: RETURN N27432: CMP R5, #35206 BNE N27454 MOV @#25674, @40(R5) MOV @#25676, @42(R5) N27454: RETURN N27456: CALL N27540 MOV 14(R5), -(SP) MOV 30(R5), R1 BR N27530 N27474: ADD #54, R1 CMP R1, 24(R5) BCS N27512 MOV 22(R5), R1 N27512: MOV R1, -(SP) MOV (R1), R1 ADD 16(R5), R1 CALL N27146 MOV (SP)+, R1 N27530: DEC (SP) BNE N27474 TST (SP)+ N27536: RETURN N27540: MOV (R5), R1 MOV 12(R5), R2 BLE N27536 N27550: MOV #13, R3 CLR R0 JMP N27224 N27562: CALL N16432 SUB #40, R0 BMI N27600 CALL N27646 N27600: CALL N16432 SUB #40, R0 BMI N27644 N27612: CMP R0, 2(R5) BHI N27644 MOV 2(R5), 12(R5) SUB R0, 12(R5) ADD @30(R5), R0 ADD 16(R5), R0 MOV R0, (R5) N27644: RETURN N27646: CMP R0, 10(R5) BCC N27730 SUB @30(R5), (R5) MOV 10(R5), 14(R5) SUB R0, 14(R5) MUL #54, R0 ADD 26(R5), R1 CMP R5, #35206 BHI N27722 CMP R1, @#25656 BCS N27722 SUB @#25660, R1 N27722: MOV R1, 30(R5) ADD (R1), (R5) N27730: RETURN N27732: MOVB R3, R0 CALL N27646 SWAB R3 MOVB R3, R0 CALL N27612 SWAB R3 INC @#11502 RETURN MOVB (R4)+, R0 CALL N27646 MOVB (R4)+, R0 CALL N27612 INC @#11502 RTS R4 N30002: MOV (R5), R3 MOV 30(R5), R1 SUB (R1), R3 SUB 16(R5), R3 SWAB R3 SUB 26(R5), R1 BPL N30032 ADD @#25660, R1 N30032: CLR R0 DIV #54, R0 BISB R0, R3 RETURN N30044: ADD R4, PC BR N30076 CALL N16432 N30054: BIC #177770, R0 SWAB 32(R5) N30064: MOVB R0, 32(R5) MOV R0, @#L77016 RETURN N30076: MOVB 33(R5), R0 BR N30064 N30104: ADD R4, PC BR N30134 CALL N16432 N30114: BIC #177770, R0 SWAB 34(R5) N30124: MOVB R0, 34(R5) JMP N14730 N30134: MOVB 35(R5), R0 BR N30124 N30142: ADD R4, PC BR N30170 CALL N16432 N30152: BIC #177770, R0 SWAB 36(R5) N30162: MOVB R0, 36(R5) RETURN N30170: MOVB 37(R5), R0 BR N30162 N30176: MOV @#25714, -(SP) CLR @#25714 CALL N25326 .WORD 4 BCS N30276 MOV R0, -(SP) CALL N25416 MOV R0, -(SP) CALL N25416 MOV (SP)+, R1 MOV #4, R4 MOV (SP)+, R2 BEQ N30254 DEC R2 ASL R2 MOV #1, R4 N30254: MOV 130312(R2), R3 MOV R1, @40(R3) MOV R0, @42(R3) ADD #2, R2 SOB R4, N30254 N30276: MOV (SP)+, @#25714 MOV @40(R5), @#26034 RETURN .WORD 35206 .WORD 35430 .WORD 35652 .WORD 36074 N30322: ADD R4, PC BR N30342 N30326: MOV #254, R1 MOVB #377, 101(R5) BR N30354 N30342: BIC #177400, 100(R5) BNE N30404 N30352: CLR R1 N30354: CMP 74(R5), #236 BEQ N30372 MOV R1, 74(R5) RETURN N30372: MOV R1, 76(R5) RETURN N30400: ADD R4, PC BR N30420 N30404: MOV #254, R1 MOVB #377, 100(R5) BR N30354 N30420: BIC #377, 100(R5) BNE N30326 BR N30352 N30432: CALL N25326 .WORD 3 BCS N30474 MOVB L30476(R0), @35252 MOVB L30502(R0), @#25632 MOV @#25632, @#25630 MOVB R0, @#11632 MOVB R0, @#11633 N30474: RETURN L30476: .WORD 10000 .WORD 30040 L30502: .WORD 2006 .WORD 2 N30506: ADD R4, PC BR N30602 CALL N25326 .WORD 2 BCS N30600 N30522: SWAB @#11650 MOVB R0, @#11650 CMPB R0, @#11651 BEQ N30600 EMT 54 .WORD L05131 CALL N50166 MOV #6010, R1 MOV #441, R2 N30560: MOV R1, -(R1) TST -(R1) SOB R2, N30560 CALL N30610 MOV @#25644, @#272 N30600: RETURN N30602: MOVB @#11651, R0 BR N30522 N30610: MOVB R0, 11650 ASL R0 MOV L31000(R0), R0 MOV #L30746, R1 MOV (R1)+, R2 N30630: MOV (R0)+, @(R1)+ SOB R2, N30630 MOV #3610, @#25650 MOV #3610, @25654 MOV @#25652, R0 MOV #10226, -(R0) MOV #3612, @#25612 MOV #3614, @#25614 MOV #35206, R5 CALL N31610 JSR R5, N71472 .WORD 26062 .WORD 24 MOV #35206, @#36542 CALL N27110 CALL N00002 MOV #100000, @#11504 INC @#11502 RETURN L30746: .WORD 14 .WORD 25576 .WORD 25644 .WORD 25646 .WORD 25652 .WORD 25654 .WORD 25656 .WORD 25662 .WORD 25660 .WORD 25642 .WORD 25664 .WORD 35216 .WORD 35212 L31000: .WORD L31006 .WORD L31036 .WORD L31066 L31006: .WORD 30 .WORD 3400 .WORD 3606 .WORD 5650 .WORD 5776 .WORD 6000 .WORD 2040 .WORD 2170 .WORD 16 .WORD 0 .WORD 30 .WORD 410 L31036: .WORD 31 .WORD 3400 .WORD 3606 .WORD 5724 .WORD 5776 .WORD 6000 .WORD 2114 .WORD 2170 .WORD 3 .WORD 54 .WORD 31 .WORD 423 L31066: .WORD 32 .WORD 3454 .WORD 3606 .WORD 6000 .WORD 5776 .WORD 6000 .WORD 2170 .WORD 2170 .WORD 0 .WORD 54 .WORD 32 .WORD 436 N31116: ADD R4, PC N31120: RETURN CALL N25326 .WORD 24 BCS N31120 ASL R0 MOV 26060(R0), R1 BNE N31170 MOV @#36542, R1 SUB #222, R1 CMP R1, @#36540 BLOS N31546 MOV R1, @#36542 MOV R1, 26060(R0) N31170: CMP R1, #35206 BHI N31546 MOV #35206, R3 MOV #111, R2 MOV R1, R5 N31210: MOV (R3)+, (R1)+ SOB R2, N31210 MOV @#26052, -(SP) MOV R5, @#26052 MOV @#25576, R0 DEC R0 CALL N25336 CMP R5, #35206 BEQ N31250 MOV R0, 20(R5) N31250: CALL N25326 JMP (PC) MOV R0, 16(R5) MOV @#25576, R0 DEC R0 CALL N25336 SUB 20(R5), R0 BPL N31304 CLR R0 N31304: INC R0 CMP R5, #35206 BEQ N31330 MOV R0, 10(R5) MUL #13, R0 MOV R1, 4(R5) N31330: CALL N25326 JMP (PC) SUB 16(R5), R0 BPL N31346 CLR R0 N31346: INC R0 MOV R0, 2(R5) CALL N25326 IOT CMP R5, #35206 BNE N31372 CLR R0 N31372: CMP R0, #2 BLOS N31456 SUB #2, R0 CMP 10(R5), #2 BLOS N31434 INC 20(R5) SUB #2, 10(R5) SUB #26, 4(R5) N31434: CMP 16(R5), #2 BLOS N31456 INC 16(R5) SUB #2, 2(R5) N31456: MOV R0, 50(R5) CALL N25326 MFPT MOV R0, 52(R5) CALL N25326 MFPT ASL R0 MOV L14750(R0), 54(R5) CALL N27054 CALL N00002 CMP (SP), R5 BEQ N31534 CLR 14(R5) BR N31542 N31534: CLR R3 CALL N31732 N31542: MOV (SP)+, @#26052 N31546: MOV @#26052, R5 RETURN N31554: ADD R4, PC BR N32026 CALL N25326 .WORD 27 BCS N32024 ASL R0 MOV 26060(R0), R0 BEQ N32024 MOV R0, -(SP) CALL N00464 MOV (SP)+, R5 N31610: MOV @#26054, @#26056 MOV @#26052, @#26054 N31624: MOV 46(R5), @#L77026 CMP R5, #35430 BHI N32000 BNE N31676 CMP @#3606, #6150 BCC N32000 MOV @#3606, @#25670 MOV #3604, @#3576 MOV #6152, @#3606 BR N32000 N31676: CMP @#3606, #6150 BCS N31726 MOV #3606, @#3576 MOV @#25670, @#3606 CLR @#25712 N31726: CALL N30002 N31732: MOV R3, -(SP) MOV 20(R5), R0 MUL #54, R0 ADD @#3606, R1 CMP R1, @#25656 BCS N31762 SUB @#25660, R1 N31762: MOV R1, 26(R5) CALL N32174 MOV (SP)+, R3 CALL N27732 N32000: CLR @#25630 CMP R5, #35206 BHI N32020 MOV @#25632, @#25630 N32020: JMP N14636 N32024: RETURN N32026: CALL N00464 MOV @#26054, R5 MOV @#26056, @#26054 CMP @#26052, #35430 BHI N32000 BNE N31624 INC @#11514 BR N31624 N32064: ADD R4, PC BR N32134 N32070: CALL N00464 MOV #35430, R5 CALL N27110 TST @#25712 BNE N32172 TST @#11512 BEQ N31610 MOV @#3606, @#25672 MOV SP, @#25712 BR N31610 N32134: CLR @#25712 CMP R5, #35430 BNE N32172 TST @#11512 BEQ N32026 MOV #3606, @#3576 MOV @#25672, @#3606 BR N32026 N32172: RETURN N32174: MOV 50(R5), R4 BEQ N32172 MOV 74(R5), -(SP) CLR 74(R5) MOV 52(R5), @#L77016 MOV 54(R5), @#L77020 MOV 54(R5), @#L77022 MOV #132572, R1 ASR R4 BCS N32250 MOV #132620, R1 N32250: MOV #26, R2 CLR -(SP) N32256: CLR -(SP) MOVB (R1)+, (SP) SOB R2, N32256 MOV 2(R5), R0 MOV R0, 10(SP) MOV R0, 44(SP) MOV 10(R5), R1 MOV R1, 20(SP) MOV R1, 34(SP) NEG 4(SP) MOV SP, R3 MOV #120, -(SP) SUB R0, (SP) MOV 16(R5), -(SP) SUB (SP), 2(SP) MOV @#25576, -(SP) SUB R1, (SP) MOV 20(R5), -(SP) SUB (SP), 2(SP) MOV #132646, R1 MOV #4, R2 N32366: MOV #3, R4 TST (SP)+ BNE N32410 N32376: MOVB (R1)+, R0 ADD R3, R0 NEG (R0) SOB R4, N32376 BR N32412 N32410: ADD R4, R1 N32412: SOB R2, N32366 N32414: TSTB 2(SP) BMI N32520 BNE N32452 CALL N27054 ADD SP, 12(R5) ADD SP, 14(R5) CALL N25442 CALL N25650 BR N32550 N32452: NEGB 2(SP) N32456: CALL N25650 CALL N25606 TST (SP) BPL N32502 CALL N17130 INC (SP) BR N32514 N32502: MOV 2(SP), R0 CALL N16766 DEC (SP) N32514: BNE N32456 BR N32550 N32520: TST (SP) BPL N32534 CALL N17130 INC (SP) BR N32546 N32534: MOV 2(SP), R0 CALL N16766 DEC (SP) N32546: BNE N32520 N32550: CMP (SP)+, (SP)+ TST (SP) BNE N32414 TST (SP)+ CALL N14716 MOV (SP)+, 74(R5) RETURN .WORD 651 .WORD 224 .WORD 560 .WORD 175 .WORD 652 .WORD 400 .WORD 175 .WORD 617 .WORD 224 .WORD 652 .WORD 400 .WORD 614 .WORD 235 .WORD 550 .WORD 166 .WORD 631 .WORD 400 .WORD 166 .WORD 613 .WORD 235 .WORD 631 .WORD 400 .WORD 4030 .WORD 20014 .WORD 24044 .WORD 16030 .WORD 6040 .WORD 24020 N32662: CALL N25326 .WORD 4 BCS N32774 MOV R0, -(SP) CALL N25342 MOV #30, R2 MOV (SP)+, R1 BEQ N32740 MOV #25, R2 DEC R1 BEQ N32744 ASL R1 MOV 130312(R1), R4 MOV R0, 46(R4) CMP R4, R5 BEQ N32770 RETURN N32740: MOV R0, @#L77026 N32744: MOV #26060, R3 N32750: MOV (R3)+, R4 BEQ N32760 MOV R0, 46(R4) N32760: SOB R2, N32750 CMP R5, #35206 BHI N32774 N32770: MOV R0, @#L77026 N32774: RETURN N32776: MOV #35652, R0 MOV #25706, R1 MOV #100000, @#11504 N33014: MOVB R4, (R1) MOV R5, -(SP) MOV R0, R5 CALL N27156 CALL N27054 MOV (SP)+, R5 JMP N14724 N33040: MOV #36074, R0 MOV #25707, R1 MOV SP, @#11514 BR N33014 N33056: CALL N25326 .WORD 4 BCS N33104 MOVB 133106(R0), @#25636 MOVB R0, @#11630 MOVB R0, @#11631 N33104: RETURN .WORD 2013 .WORD 402 .WORD 0 N33114: CALL N30002 MOV R3, -(SP) ADD R4, PC BR N33176 CALL N25326 JMP (R0)+ N33134: ADD #100000, R0 MOV #3610, R1 MOV #440, R2 MOV #120, R3 N33154: MOV R0, (R1)+ TST (R1)+ ADD R3, R0 SOB R2, N33154 CALL N15424 MOV (SP)+, R3 JMP N27732 N33176: CLR R0 BR N33134 N33202: CALL N25326 .WORD 3 BCS N33324 N33212: MOV R0, 116(R5) CALL N50156 CLR 114(R5) CLR @#25600 CLR 120(R5) CLR 122(R5) MOV 116(R5), R0 BEQ N33324 CMP R0, #2 BCS N33316 BHI N33266 MOV #10, 122(R5) N33266: MOV #100000, 120(R5) MOVB #177, @25620 CALL N50166 MOV #4, @#25600 RETURN N33316: MOV #76, 114(R5) N33324: RETURN N33326: MOV R4, 112(R5) MOV R4, @#25600 RETURN N33340: MOV R4, 124(R5) BEQ N33360 TST 12(R5) BGT N33360 JMP N17130 N33360: RETURN N33362: MOV R4, @#25666 CALL N15424 RETURN N33374: TST @#11770 BNE N33722 ADD R4, PC BR N33660 MOV @#25714, -(SP) CLR @#25714 MOV #11772, -(SP) CALL N25326 L33426: .WORD 13 BCS N33642 MOV #144, R2 CMP R0, #4 BCS N33460 ADD #620, (SP) SUB #4, R0 MOV #100, R2 N33460: MUL R2, R0 ADD R1, (SP) CALL N25326 .WORD 61 BCS N33642 ASL R0 ADD R0, (SP) CALL N16432 MOV R0, -(SP) CALL N16432 MOV R0, -(SP) MOV @#36540, -(SP) MOV (SP), -(SP) N33522: CMP 10(SP), #13612 BCC N33632 N33532: CALL N16432 CMP R0, 6(SP) BEQ N33632 CMP R0, 4(SP) BEQ N33570 MOVB R0, @0(SP) INC (SP) CMP (SP), @#36542 BCS N33532 BR N33632 N33570: CMP (SP), 2(SP) BNE N33602 CLR 2(SP) N33602: MOV 2(SP), @10(SP) ADD #2, 10(SP) CLRB @0(SP) INC (SP) MOV (SP), 2(SP) BR N33522 N33632: TST (SP)+ MOV (SP)+, @#36540 CMP (SP)+, (SP)+ N33642: TST (SP)+ MOV (SP)+, @#25714 INC @#11514 JMP N00304 N33660: CALL N25342 BNE N33700 JSR R5, N71472 .WORD 11772 .WORD 710 RETURN N33700: CALL N00464 JSR R5, N71472 .WORD 11772 .WORD 710 CALL N00074 RETURN N33722: MOV R4, -(SP) CALL N07374 TST @#11712 BEQ N33742 CALL N10234 N33742: ADD (SP)+, PC BR N34222 .WORD 13746 CMP @-(PC), (R4) CLR @#25714 MOV #13612, -(SP) CALL N25326 .WORD 10 BCS N34202 MOV #132, R2 CMP R0, #4 BCS N34020 ADD #550, (SP) SUB #4, R0 MOV #140, R2 N34020: MUL R2, R0 ADD R1, (SP) CALL N25326 .WORD 57 BCS N34202 ASL R0 ADD R0, (SP) CALL N16432 MOV R0, -(SP) CALL N16432 MOV R0, -(SP) MOV @#36540, -(SP) MOV (SP), -(SP) N34062: CMP 10(SP), #15322 BCC N34172 N34072: CALL N16432 CMP R0, 6(SP) BEQ N34172 CMP R0, 4(SP) BEQ N34130 MOVB R0, @0(SP) INC (SP) CMP (SP), @#36542 BCS N34072 BR N34172 N34130: CMP (SP), 2(SP) BNE N34142 CLR 2(SP) N34142: MOV 2(SP), @10(SP) ADD #2, 10(SP) CLRB @0(SP) INC (SP) MOV (SP), 2(SP) BR N34062 N34172: TST (SP)+ MOV (SP)+, @#36540 CMP (SP)+, (SP)+ N34202: TST (SP)+ MOV (SP)+, @#25714 INC @#11514 CALL N00304 BR N34262 N34222: CALL N25342 BNE N34242 JSR R5, N71472 .WORD 13612 .WORD 644 BR N34256 N34242: JSR R5, N71472 .WORD 13612 .WORD 644 CALL N05562 N34256: CALL N00276 N34262: TST @#11712 BEQ N34274 CALL N10234 N34274: RETURN N34276: ADD R4, PC BR N34512 .WORD 4767 .WORD 171020 .WORD 5 .WORD 103771 N34312: SWAB @#11656 CLRB @#11656 MOV #136364, @#17170 ASR R0 BCC N34346 INCB @#11656 MOV #20172, @#17170 N34346: ASR R0 BCS N34354 BEQ N34274 N34354: MOV @#25714, -(SP) CLR @#25714 MOV R0, -(SP) CALL N16432 MOV R0, -(SP) CALL N16432 TST R0 BNE N34410 MOV #400, R0 N34410: MOV (SP)+, R3 ADD R3, R0 CMP R0, #400 BLOS N34426 MOV #400, R0 N34426: SUB R3, R0 MUL #13, R3 ADD #20172, R3 MUL #13, R0 TST (SP)+ BEQ N34456 CALL N34536 BR N34504 N34456: MOV R3, -(SP) MOV R1, -(SP) N34462: CALL N16432 MOVB R0, @2(SP) INC 2(SP) DEC (SP) BNE N34462 CMP (SP)+, (SP)+ N34504: MOV (SP)+, @#25714 RETURN N34512: MOVB @#11657, R0 BR N34312 N34520: MOV #136364, @#17170 MOV #20172, R3 MOV #5400, R1 N34536: MOV R3, R0 ADD #116172, R0 N34544: MOVB (R0)+, (R3)+ SOB R1, N34544 RETURN N34552: MOV @#25714, -(SP) MOV (SP)+, @#25714 RETURN N34564: MOV R4, @#25714 N34570: RETURN N34572: ADD R4, PC BR N34666 CALL N25326 .WORD 6 BCS N34570 N34606: SWAB @#11634 N34612: MOVB R0, @#11634 CALL N07374 TST @#11712 BEQ N34634 CALL N10234 N34634: CLR @#11736 MOVB @#11634, R0 ASL R0 ADD R0, PC BR N34740 BR N34754 BR N35130 BR N35216 BR N34736 BR N35064 BR N34674 N34666: MOVB @#11635, R0 BR N34612 N34674: CLRB @#11634 INC @#11736 CLR @#11712 CALL N34740 JSR R5, N10470 .WORD 111342 JSR R5, N15272 .WORD 4640 .WORD 17472 .WORD 40 RETURN N34736: BR N35272 N34740: JSR R5, N10470 .WORD L11514 MOV #135360, R1 BR N34766 N34754: JSR R5, N10470 .WORD L11625 MOV #135364, R1 N34766: CALL N00322 JSR R5, N15272 .WORD 540 .WORD 17272 .WORD 140 JSR R5, N15250 .WORD 17572 JSR R5, N15272 .WORD 540 .WORD 17672 .WORD 40 JSR R5, N15272 .WORD 4100 .WORD 17772 .WORD 100 JSR R5, N15272 .WORD 3620 .WORD 17732 .WORD 2 N35050: N35052 =: .+2 TST @#11712 BEQ N35062 CALL N10234 N35062: RETURN N35064: JSR R5, N10470 .WORD L11625 MOV #L35364, R1 CALL N00322 JSR R5, N15272 .WORD 2600 .WORD 17572 .WORD 200 JSR R5, N71506 .WORD L35730 .WORD 17736 .WORD 16 BR N35050 N35130: JSR R5, N03014 .WORD L03633 N35136: JSR R5, N10470 .WORD 111736 N35144: JSR R5, N71506 .WORD L35370 .WORD 17572 .WORD 60 JSR R5, N15272 .WORD 2600 .WORD 17732 .WORD 60 JSR R5, N71506 .WORD L35530 .WORD 20072 .WORD 20 JSR R5, N15272 .WORD 3620 .WORD 20132 .WORD 20 BR N35050 N35216: JSR R5, N03014 .WORD L04037 JSR R5, N10470 .WORD L12047 JSR R5, N71506 .WORD L35570 .WORD 17572 .WORD 60 JSR R5, N71506 L35250: .WORD L35370 .WORD 17732 .WORD 100 JSR R5, N15272 .WORD 3620 .WORD 20132 .WORD 20 BR N35050 N35272: JSR R5, N03014 .WORD L04243 JSR R5, N10470 .WORD L12160 JSR R5, N71506 .WORD 135370 .WORD 17572 .WORD 100 JSR R5, N15272 .WORD 3060 .WORD 17772 .WORD 40 JSR R5, N15272 .WORD 2600 CMP R0, @20(R2) JSR R5, N15272 .WORD 3620 .WORD 20132 .WORD 20 BR N35050 .WORD 40140 .WORD 60100 L35364: .WORD 140340 .WORD 60100 L35370: .WORD 4653 L35372: .WORD 4666 .WORD 5235 .WORD 4755 .WORD 4714 .WORD 4727 .WORD 5222 .WORD 5276 .WORD 5003 .WORD 5016 .WORD 5031 .WORD 5044 .WORD 5057 .WORD 5072 .WORD 5105 .WORD 5120 .WORD 5146 .WORD 5161 .WORD 5174 .WORD 5207 .WORD 4742 .WORD 4770 .WORD 4701 .WORD 5352 .WORD 5311 .WORD 5337 .WORD 5365 .WORD 5263 .WORD 5250 .WORD 5324 .WORD 4640 .WORD 5133 .WORD 4113 .WORD 4126 .WORD 4475 .WORD 4215 .WORD 4154 .WORD 4167 .WORD 4462 .WORD 4536 .WORD 4243 .WORD 4256 .WORD 4271 .WORD 4304 .WORD 4317 .WORD 4332 .WORD 4345 .WORD 4360 L35530: .WORD 4406 .WORD 4421 .WORD 4434 .WORD 4447 .WORD 4202 .WORD 4230 .WORD 4141 .WORD 4612 .WORD 4551 .WORD 4577 .WORD 4625 .WORD 4523 .WORD 4510 .WORD 4564 .WORD 4100 .WORD 4373 L35570: .WORD 3325 .WORD 3340 .WORD 3353 .WORD 2667 .WORD 2702 .WORD 2715 .WORD 2730 .WORD 3366 .WORD 3401 .WORD 3414 .WORD 3427 .WORD 3017 .WORD 3032 .WORD 3162 .WORD 3175 .WORD 3442 .WORD 3223 .WORD 2771 .WORD 3004 .WORD 3210 .WORD 3277 .WORD 2756 .WORD 3251 .WORD 2743 .WORD 3236 .WORD 3264 .WORD 3312 .WORD 2600 .WORD 2613 .WORD 2626 .WORD 3455 .WORD 3470 .WORD 3516 .WORD 3045 .WORD 3503 .WORD 3060 .WORD 3134 .WORD 2641 .WORD 3106 .WORD 2654 .WORD 3073 .WORD 3121 .WORD 3147 .WORD 3531 .WORD 3544 .WORD 3557 .WORD 3572 .WORD 3605 L35730: .WORD 5706 .WORD 5721 .WORD 5734 .WORD 5747 .WORD 5762 .WORD 5775 .WORD 6010 .WORD 3340 .WORD 2756 .WORD 6051 .WORD 6064 .WORD 6077 .WORD 6112 .WORD 3251 N35764: ADD R4, PC BR N36012 N35770: BIC #1, @#L77076 MOV #144, @#11760 CALL N00422 RETURN N36012: CLR @#11760 BIS #1, @#L77076 RETURN N36026: MOV R4, @#11754 RETURN N36034: MOV R4, @#11756 RETURN N36042: ADD R4, PC BR N36104 CALL N25342 BEQ N36060 BIS #100000, R0 N36060: MOV R0, @#11744 CALL N25342 BEQ N36076 BIS #400, R0 N36076: MOV R0, @#11746 RETURN N36104: MOV #100030, @#11744 MOV #402, @#11746 RETURN N36122: CLR R1 MOV R4, R0 BEQ N36134 CALL N25342 N36134: MOV R0, @#11654 ROR R0 RORB R1 MOV R1, @#11750 CLR R1 ROR R0 BCC N36162 MOV #600, R1 N36162: MOV R1, @#11752 RETURN N36170: JSR R5, N03014 .WORD 175514 CALL N20700 MOV #1, R0 CALL N34606 RETURN N36214: CALL N16432 CMP R0, #33 BEQ N36214 ASL R0 CLR R4 JMP @15770(R0) N36236: CLR @#11556 TST @#L77062 RETURN N36250: ADD R4, PC BR N36276 BIS #401, @#11512 BIS #20, @#L77716 CLR @#11754 RETURN N36276: BIC #1, @#11512 BIC #20, @#L77716 CLR @#11500 MOV SP, @#11516 CLR @#11754 MOV #73721, @#L77010 CLR @#L77014 JMP N00422 N36344: BIS #700, @#11512 RETURN N36354: MTPS #200 JMP @L60000 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 100576 .WORD 100645 .WORD 114675 .WORD 77201 .WORD 0 .WORD 77000 .WORD 155777 .WORD 141777 .WORD 177747 .WORD 176 .WORD 0 .WORD 66000 .WORD 177376 .WORD 76376 .WORD 10070 .WORD 0 .WORD 0 .WORD 34020 .WORD 177174 .WORD 34174 .WORD 20 .WORD 0 .WORD 34070 .WORD 153020 .WORD 153376 .WORD 34020 .WORD 0 .WORD 10000 .WORD 76070 .WORD 177376 .WORD 10174 .WORD 70 .WORD 0 .WORD 0 .WORD 36030 .WORD 14074 .WORD 0 .WORD 0 .WORD 177777 .WORD 163777 .WORD 141703 .WORD 177747 .WORD 177777 .WORD 377 .WORD 36000 .WORD 41146 .WORD 63102 .WORD 74 .WORD 0 .WORD 177777 .WORD 114703 .WORD 136675 .WORD 141631 .WORD 177777 .WORD 377 .WORD 140340 .WORD 16240 .WORD 21042 .WORD 16042 .WORD 0 .WORD 34000 .WORD 42104 .WORD 34104 .WORD 76020 .WORD 20 .WORD 0 .WORD 4370 .WORD 4370 .WORD 4010 .WORD 3016 .WORD 0 .WORD 176000 .WORD 176204 .WORD 102204 .WORD 162204 .WORD 1547 .WORD 0 .WORD 10020 .WORD 24326 .WORD 24356 .WORD 10326 .WORD 20 .WORD 0 .WORD 3002 .WORD 77036 .WORD 3036 .WORD 2 .WORD 0 .WORD 40000 .WORD 74140 .WORD 74176 .WORD 40140 .WORD 0 .WORD 10000 .WORD 76070 .WORD 10020 .WORD 34174 .WORD 20 .WORD 0 .WORD 21042 .WORD 21042 .WORD 21042 .WORD 21000 .WORD 0 .WORD 100000 .WORD 25174 .WORD 24050 .WORD 24050 .WORD 104 .WORD 34000 .WORD 2104 .WORD 42070 .WORD 34104 .WORD 42100 .WORD 70 .WORD 0 .WORD 0 .WORD 0 .WORD 77000 .WORD 176 .WORD 0 .WORD 34020 .WORD 10174 .WORD 76020 .WORD 10070 .WORD 174 .WORD 10000 .WORD 52070 .WORD 10020 .WORD 10020 .WORD 20 .WORD 0 .WORD 10020 .WORD 10020 .WORD 52020 .WORD 10070 .WORD 0 .WORD 0 .WORD 20000 .WORD 177500 .WORD 20100 .WORD 0 .WORD 0 .WORD 0 .WORD 1004 .WORD 1377 .WORD 4 .WORD 0 .WORD 0 .WORD 1000 .WORD 1002 .WORD 376 .WORD 0 .WORD 0 .WORD 0 .WORD 63044 .WORD 63377 .WORD 44 .WORD 0 .WORD 0 .WORD 10000 .WORD 76070 .WORD 376 .WORD 0 .WORD 0 .WORD 0 .WORD 76376 .WORD 10070 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 10000 .WORD 0 .WORD 22000 .WORD 11044 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 22000 .WORD 77044 .WORD 77044 .WORD 22044 .WORD 0 .WORD 10000 .WORD 111174 .WORD 76022 .WORD 111220 .WORD 10174 .WORD 0 .WORD 103000 .WORD 20106 .WORD 4020 .WORD 141304 .WORD 0 .WORD 14000 .WORD 22044 .WORD 12030 .WORD 41242 .WORD 274 .WORD 0 .WORD 10060 .WORD 10 .WORD 0 .WORD 0 .WORD 0 .WORD 20000 .WORD 4020 .WORD 4010 .WORD 10010 .WORD 40 .WORD 0 .WORD 10010 .WORD 20040 .WORD 20040 .WORD 4020 .WORD 0 .WORD 0 .WORD 10000 .WORD 34124 .WORD 10124 .WORD 0 .WORD 0 .WORD 10000 .WORD 10020 .WORD 10376 .WORD 10020 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 14000 .WORD 10030 .WORD 10 .WORD 0 .WORD 0 .WORD 176 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 14000 .WORD 30 .WORD 0 .WORD 100000 .WORD 20100 .WORD 4020 .WORD 1004 .WORD 0 .WORD 36000 .WORD 61102 .WORD 45122 .WORD 41106 .WORD 74 .WORD 0 .WORD 14020 .WORD 10024 .WORD 10020 .WORD 76020 .WORD 0 .WORD 36000 .WORD 41102 .WORD 10040 .WORD 42010 .WORD 176 .WORD 0 .WORD 20176 .WORD 34020 .WORD 40100 .WORD 36102 .WORD 0 .WORD 20000 .WORD 24060 .WORD 21044 .WORD 20176 .WORD 40 .WORD 0 .WORD 1176 .WORD 37002 .WORD 40100 .WORD 36102 .WORD 0 .WORD 36000 .WORD 1102 .WORD 41076 .WORD 41102 .WORD 74 .WORD 0 .WORD 41176 .WORD 10040 .WORD 2010 .WORD 1002 .WORD 0 .WORD 36000 .WORD 41102 .WORD 41074 .WORD 41102 .WORD 74 .WORD 0 .WORD 41074 .WORD 41102 .WORD 40174 .WORD 36102 .WORD 0 .WORD 0 .WORD 14000 .WORD 30 .WORD 14000 .WORD 30 .WORD 0 .WORD 0 .WORD 14030 .WORD 0 .WORD 14030 .WORD 4020 .WORD 0 .WORD 10040 .WORD 2010 .WORD 10010 .WORD 40 .WORD 0 .WORD 0 .WORD 77000 .WORD 77000 .WORD 0 .WORD 0 .WORD 0 .WORD 4004 .WORD 20020 .WORD 4020 .WORD 4 .WORD 0 .WORD 42070 .WORD 20100 .WORD 10020 .WORD 10000 .WORD 0 .WORD 0 .WORD 41074 .WORD 116200 .WORD 111222 .WORD 154 .WORD 0 .WORD 22030 .WORD 41102 .WORD 41176 .WORD 41102 .WORD 0 .WORD 37000 .WORD 41102 .WORD 41076 .WORD 41102 .WORD 76 .WORD 0 .WORD 41074 .WORD 1002 .WORD 1002 .WORD 36102 .WORD 0 .WORD 37000 .WORD 102104 .WORD 102204 .WORD 42204 .WORD 76 .WORD 0 .WORD 1176 .WORD 37002 .WORD 1002 .WORD 77002 .WORD 0 .WORD 77000 .WORD 1002 .WORD 1076 .WORD 1002 .WORD 2 .WORD 0 .WORD 41074 .WORD 1002 .WORD 41162 .WORD 36102 .WORD 0 .WORD 41000 .WORD 41102 .WORD 77102 .WORD 41102 .WORD 102 .WORD 0 .WORD 10070 .WORD 10020 .WORD 10020 .WORD 34020 .WORD 0 .WORD 34000 .WORD 10020 .WORD 10020 .WORD 11020 .WORD 14 .WORD 0 .WORD 21102 .WORD 7022 .WORD 21022 .WORD 101102 .WORD 0 .WORD 1000 .WORD 1002 .WORD 1002 .WORD 1002 .WORD 176 .WORD 0 .WORD 143202 .WORD 111252 .WORD 101202 .WORD 101202 .WORD 0 .WORD 41000 .WORD 43102 .WORD 51112 .WORD 41142 .WORD 102 .WORD 0 .WORD 41074 .WORD 41102 .WORD 41102 L40140: .WORD 036102 .WORD 0 .WORD 37000 .WORD 41102 .WORD 37102 .WORD 1002 .WORD 2 .WORD 0 .WORD 41074 .WORD 41102 .WORD 41102 .WORD 36122 .WORD 100 .WORD 37000 .WORD 41102 .WORD 37102 .WORD 21022 .WORD 102 .WORD 0 .WORD 41074 .WORD 36002 .WORD 40100 .WORD 36102 .WORD 0 .WORD 177000 .WORD 10222 .WORD 10020 .WORD 10020 .WORD 20 .WORD 0 .WORD 41102 .WORD 41102 .WORD 41102 .WORD 36102 .WORD 0 .WORD 101000 .WORD 101202 .WORD 101202 .WORD 24104 .WORD 20 .WORD 0 .WORD 101202 .WORD 111202 .WORD 111222 .WORD 66222 .WORD 0 .WORD 41000 .WORD 22102 .WORD 14030 .WORD 41044 .WORD 102 .WORD 0 .WORD 101202 .WORD 24104 .WORD 10020 .WORD 10020 .WORD 0 .WORD 77000 .WORD 20100 .WORD 4020 .WORD 1004 .WORD 176 .WORD 0 .WORD 4070 .WORD 4010 .WORD 4010 .WORD 34010 .WORD 0 .WORD 0 .WORD 2002 .WORD 10010 .WORD 40040 .WORD 200 .WORD 0 .WORD 20070 .WORD 20040 .WORD 20040 .WORD 34040 .WORD 0 .WORD 10000 .WORD 42050 .WORD 0 .WORD 0 L40406: .WORD 000000 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 177400 .WORD 14000 .WORD 20020 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 40074 .WORD 41174 .WORD 136102 .WORD 0 .WORD 1000 .WORD 35002 .WORD 41106 .WORD 43102 .WORD 72 .WORD 0 .WORD 0 .WORD 41074 .WORD 1002 .WORD 36102 .WORD 0 .WORD 40000 .WORD 56100 .WORD 41142 .WORD 61102 .WORD 134 .WORD 0 .WORD 0 .WORD 41074 .WORD 77102 .WORD 76002 .WORD 0 .WORD 30000 .WORD 4110 .WORD 4034 .WORD 4010 .WORD 10 .WORD 0 .WORD 0 .WORD 61134 .WORD 41102 .WORD 56142 .WORD 36100 .WORD 1000 .WORD 35002 .WORD 41106 .WORD 41102 .WORD 102 .WORD 0 .WORD 20 .WORD 10030 .WORD 10020 .WORD 34020 .WORD 0 .WORD 10000 .WORD 10000 .WORD 10020 .WORD 10020 .WORD 11020 .WORD 14 .WORD 1002 .WORD 11042 .WORD 11016 .WORD 41042 .WORD 0 .WORD 14000 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 70 .WORD 0 .WORD 0 .WORD 111156 .WORD 111222 .WORD 111222 .WORD 0 .WORD 0 .WORD 35000 .WORD 41106 .WORD 41102 .WORD 102 .WORD 0 .WORD 0 .WORD 41074 .WORD 41102 .WORD 36102 .WORD 0 .WORD 0 .WORD 35000 .WORD 41106 .WORD 43102 .WORD 1072 .WORD 2 .WORD 0 .WORD 61134 .WORD 41102 .WORD 56142 .WORD 40100 .WORD 0 .WORD 35000 .WORD 1106 .WORD 1002 .WORD 2 .WORD 0 .WORD 0 .WORD 1074 .WORD 40074 .WORD 36102 .WORD 0 .WORD 4000 .WORD 16010 .WORD 4010 .WORD 44010 .WORD 60 .WORD 0 .WORD 0 .WORD 41102 .WORD 41102 .WORD 56142 .WORD 0 .WORD 0 .WORD 101000 .WORD 101202 .WORD 24104 .WORD 20 .WORD 0 .WORD 0 .WORD 101202 .WORD 111202 .WORD 66222 .WORD 0 .WORD 0 .WORD 41000 .WORD 14044 .WORD 22030 .WORD 102 .WORD 0 .WORD 0 .WORD 41102 .WORD 22102 .WORD 4030 .WORD 1004 .WORD 0 .WORD 77000 .WORD 10040 .WORD 2010 .WORD 176 .WORD 0 .WORD 60000 .WORD 10020 .WORD 10014 .WORD 60020 .WORD 0 .WORD 10000 .WORD 10020 .WORD 0 .WORD 10020 .WORD 20 .WORD 0 .WORD 6000 .WORD 10020 .WORD 10140 .WORD 6020 .WORD 0 .WORD 146000 .WORD 63 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 77176 .WORD 77176 .WORD 77176 .WORD 77176 .WORD 0 .WORD 21210 .WORD 21210 .WORD 21210 .WORD 21210 .WORD 21210 .WORD 125210 .WORD 125125 .WORD 125125 .WORD 125125 .WORD 125125 .WORD 125125 .WORD 125125 .WORD 125125 .WORD 125125 .WORD 125125 .WORD 125125 .WORD 10125 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 17420 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 17420 .WORD 17420 .WORD 10020 .WORD 10020 .WORD 24050 .WORD 24050 .WORD 27450 .WORD 24050 .WORD 24050 .WORD 50 .WORD 0 .WORD 0 .WORD 24077 .WORD 24050 .WORD 24050 .WORD 0 .WORD 0 .WORD 10037 .WORD 10037 .WORD 10020 .WORD 24020 .WORD 24050 .WORD 27450 .WORD 27440 .WORD 24050 .WORD 24050 .WORD 24050 .WORD 24050 .WORD 24050 .WORD 24050 .WORD 24050 .WORD 50 .WORD 0 .WORD 37400 .WORD 27440 .WORD 24050 .WORD 24050 .WORD 24050 .WORD 24050 .WORD 20057 .WORD 77 .WORD 0 .WORD 24000 .WORD 24050 .WORD 24050 .WORD 77 .WORD 0 .WORD 0 .WORD 10020 .WORD 10020 .WORD 10037 .WORD 37 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 10037 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 170020 .WORD 0 .WORD 0 .WORD 10000 .WORD 10020 .WORD 10020 .WORD 377 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 177400 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 10360 .WORD 10020 .WORD 10020 .WORD 0 .WORD 0 .WORD 177400 .WORD 0 .WORD 0 .WORD 10000 .WORD 10020 .WORD 10020 .WORD 10377 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 10360 .WORD 10360 .WORD 10020 .WORD 24020 .WORD 24050 .WORD 24050 .WORD 24350 .WORD 24050 .WORD 24050 .WORD 24050 .WORD 24050 .WORD 4350 .WORD 370 .WORD 0 .WORD 0 .WORD 0 .WORD 174000 .WORD 164010 .WORD 24050 .WORD 24050 .WORD 24050 .WORD 24050 .WORD 357 .WORD 377 .WORD 0 .WORD 0 .WORD 0 .WORD 177400 .WORD 167400 .WORD 24050 .WORD 24050 .WORD 24050 .WORD 24050 .WORD 4350 .WORD 24350 .WORD 24050 .WORD 50 .WORD 0 .WORD 177400 .WORD 177400 .WORD 0 .WORD 0 .WORD 24050 .WORD 24050 .WORD 357 .WORD 24357 .WORD 24050 .WORD 10050 .WORD 10020 .WORD 177420 .WORD 177400 .WORD 0 .WORD 0 .WORD 24050 .WORD 24050 .WORD 177450 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 177400 .WORD 177400 .WORD 10020 .WORD 10020 .WORD 0 .WORD 0 .WORD 177400 .WORD 24050 .WORD 24050 .WORD 24050 .WORD 24050 .WORD 24050 .WORD 370 .WORD 0 .WORD 0 .WORD 10020 .WORD 10020 .WORD 10360 .WORD 360 .WORD 0 .WORD 0 .WORD 0 .WORD 170000 .WORD 170020 .WORD 10020 .WORD 10020 .WORD 0 .WORD 0 .WORD 174000 .WORD 24050 .WORD 24050 .WORD 24050 .WORD 24050 .WORD 24050 .WORD 24357 .WORD 24050 .WORD 24050 .WORD 10020 .WORD 10020 .WORD 377 .WORD 10377 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 37 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 170000 .WORD 10020 .WORD 10020 .WORD 177420 .WORD 177777 .WORD 177777 .WORD 177777 .WORD 177777 .WORD 177777 .WORD 0 .WORD 0 .WORD 177400 .WORD 177777 .WORD 177777 .WORD 7777 .WORD 7417 .WORD 7417 .WORD 7417 .WORD 7417 .WORD 7417 .WORD 170360 .WORD 170360 .WORD 170360 .WORD 170360 .WORD 170360 L42170: .WORD 177760 .WORD 177777 .WORD 177777 .WORD 0 .WORD 0 .WORD 0 .WORD 44 .WORD 1176 .WORD 37002 .WORD 1002 .WORD 176 .WORD 0 .WORD 44 .WORD 41074 .WORD 77102 .WORD 76002 .WORD 0 .WORD 40200 .WORD 10040 .WORD 2010 .WORD 402 .WORD 0 .WORD 400 .WORD 2002 .WORD 10010 .WORD 40040 .WORD 200 .WORD 0 .WORD 0 .WORD 100000 .WORD 20100 .WORD 4020 .WORD 1004 .WORD 1 .WORD 0 .WORD 1001 .WORD 4004 .WORD 20020 .WORD 100100 .WORD 0 .WORD 20000 .WORD 177500 .WORD 20100 .WORD 0 .WORD 0 .WORD 0 .WORD 1004 .WORD 1377 .WORD 4 .WORD 0 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 34124 .WORD 10020 .WORD 52070 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 0 .WORD 14030 .WORD 77000 .WORD 14000 .WORD 30 .WORD 10000 .WORD 10020 .WORD 10376 .BYTE 20 L42403: .BYTE 20 .WORD 177000 .WORD 0 .WORD 150400 .WORD 10721 .WORD 12423 .WORD 10431 .WORD 21 .WORD 0 .WORD 41000 .WORD 41074 .WORD 41102 .WORD 41074 .WORD 0 .WORD 0 .WORD 77000 .WORD 77176 .WORD 77176 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 61000 .WORD 111222 .WORD 111236 .WORD 142 .WORD 0 .WORD 0 .WORD 40074 .WORD 41174 .WORD 136102 .WORD 0 .WORD 40000 .WORD 1074 .WORD 41076 .WORD 41102 .WORD 74 .WORD 0 .WORD 0 .WORD 21042 .WORD 21042 .WORD 77042 .WORD 100 .WORD 0 .WORD 70000 .WORD 42110 .WORD 42104 .WORD 101376 .WORD 0 .WORD 0 .WORD 41074 .WORD 77102 .WORD 76002 .WORD 0 .WORD 0 .WORD 10000 .WORD 111174 .WORD 111222 .WORD 10174 .WORD 20 .WORD 0 .WORD 41176 .WORD 1002 .WORD 1002 .WORD 0 .WORD 0 .WORD 41000 .WORD 14044 .WORD 22030 .WORD 102 .WORD 0 .WORD 0 .WORD 61102 .WORD 45122 .WORD 41106 .WORD 0 .WORD 14000 .WORD 41000 .WORD 51142 .WORD 43112 .WORD 102 .WORD 0 .WORD 0 .WORD 21102 .WORD 17022 .WORD 41042 .WORD 0 .WORD 0 .WORD 70000 .WORD 42110 .WORD 42104 .WORD 102 .WORD 0 .WORD 0 .WORD 143202 .WORD 111252 .WORD 101202 .WORD 0 .WORD 0 .WORD 41000 .WORD 41102 .WORD 41176 .WORD 102 .WORD 0 .WORD 0 .WORD 41074 .WORD 41102 .WORD 36102 .WORD 0 .WORD 0 .WORD 77000 .WORD 41102 .WORD 41102 .WORD 102 .WORD 0 .WORD 0 .WORD 41174 .WORD 76102 .WORD 41104 .WORD 0 .WORD 0 .WORD 35000 .WORD 41106 .WORD 43102 .WORD 1072 .WORD 2 .WORD 0 .WORD 41074 .WORD 1002 .WORD 36102 .WORD 0 .WORD 0 .WORD 177000 .WORD 10020 .WORD 10020 .WORD 20 .WORD 0 .WORD 0 .WORD 41102 .WORD 22102 .WORD 4030 .WORD 1004 .WORD 0 .WORD 111000 .WORD 34124 .WORD 52070 .WORD 222 .WORD 0 .WORD 0 .WORD 41076 .WORD 41076 .WORD 37102 .WORD 0 .WORD 0 .WORD 1000 .WORD 37002 .WORD 41102 .WORD 76 .WORD 0 .WORD 0 .WORD 101202 .WORD 121236 .WORD 117242 .WORD 0 .WORD 0 .WORD 36000 .WORD 34100 .WORD 40100 .WORD 74 .WORD 0 .WORD 0 .WORD 111222 .WORD 111222 .WORD 177222 .WORD 0 .WORD 0 .WORD 37000 .WORD 40100 .WORD 40174 .WORD 76 .WORD 0 .WORD 0 .WORD 111222 .WORD 111222 .WORD 177222 .WORD 100200 .WORD 0 .WORD 41000 .WORD 41102 .WORD 40174 .WORD 100 .WORD 0 .WORD 0 .WORD 2407 .WORD 102174 .WORD 76204 .WORD 0 .WORD 61000 .WORD 111222 .WORD 117222 .WORD 111222 .WORD 142 .WORD 0 .WORD 22030 .WORD 41102 .WORD 41176 .WORD 41102 .WORD 0 .WORD 77000 .WORD 1002 .WORD 41076 .WORD 41102 .WORD 76 .WORD 0 .WORD 41102 .WORD 41102 .WORD 41102 .WORD 177102 .WORD 200 .WORD 70000 .WORD 42110 .WORD 42104 .WORD 42104 .WORD 101376 .WORD 0 .WORD 1176 .WORD 37002 .WORD 1002 .WORD 77002 .WORD 0 .WORD 10000 .WORD 111174 .WORD 111222 .WORD 76222 .WORD 10020 .WORD 0 .WORD 41176 .WORD 1002 .WORD 1002 .WORD 1002 .WORD 0 .WORD 41000 .WORD 22102 .WORD 14030 .WORD 41044 .WORD 102 .WORD 0 .WORD 41102 .WORD 51142 .WORD 43112 .WORD 41102 .WORD 0 .WORD 41030 .WORD 61102 .WORD 45122 .WORD 41106 .WORD 102 .WORD 0 .WORD 21102 .WORD 7022 .WORD 21022 .WORD 101102 .WORD 0 .WORD 70000 .WORD 42110 .WORD 42104 .WORD 42104 .WORD 102 .WORD 0 .WORD 143202 .WORD 111252 .WORD 101202 .WORD 101202 .WORD 0 .WORD 41000 .WORD 41102 .WORD 41176 .WORD 41102 .WORD 102 .WORD 0 .WORD 41074 .WORD 41102 .WORD 41102 .WORD 36102 .WORD 0 .WORD 77000 .WORD 41102 .WORD 41102 .WORD 41102 .WORD 102 .WORD 0 .WORD 41174 .WORD 41102 .WORD 44174 .WORD 41104 .WORD 0 .WORD 37000 .WORD 41102 .WORD 37102 .WORD 1002 .WORD 2 .WORD 0 .WORD 41074 .WORD 1002 .WORD 1002 .WORD 36102 .WORD 0 .WORD 177000 .WORD 10222 .WORD 10020 .WORD 10020 .WORD 20 .WORD 0 .WORD 41102 .WORD 41102 .WORD 40174 .WORD 36102 .WORD 0 .WORD 111000 .WORD 52222 .WORD 52070 .WORD 111222 .WORD 222 .WORD 0 .WORD 41076 .WORD 37102 .WORD 41102 .WORD 37102 .WORD 0 .WORD 1000 .WORD 1002 .WORD 41076 .WORD 41102 .WORD 76 .WORD 0 .WORD 101202 .WORD 117202 .WORD 121242 .WORD 117242 .WORD 0 .WORD 36000 .WORD 40102 .WORD 40070 .WORD 41100 .WORD 74 .WORD 0 .WORD 111222 .WORD 111222 .WORD 111222 .WORD 177222 .WORD 0 .WORD 36000 .WORD 100102 .WORD 174200 .WORD 41200 .WORD 74 .WORD 0 .WORD 111222 .WORD 111222 .WORD 111222 .WORD 177222 .WORD 100200 .WORD 41000 .WORD 41102 .WORD 76102 .WORD 40100 .WORD 100 .WORD 0 .WORD 2407 .WORD 76004 .WORD 102204 .WORD 76204 .WORD 0 .WORD 100000 .WORD 100200 .WORD 26100 .WORD 25022 .WORD 304 .WORD 0 .WORD 41074 .WORD 37102 .WORD 41102 .WORD 1076 .WORD 402 .WORD 100400 .WORD 42202 .WORD 10050 .WORD 24050 .WORD 20 .WORD 0 .WORD 76200 .WORD 24052 .WORD 24050 .WORD 42050 .WORD 0 .WORD 41176 .WORD 2002 .WORD 2030 .WORD 41002 .WORD 176 .WORD 0 .WORD 100000 .WORD 21174 .WORD 21042 .WORD 16042 .WORD 0 .WORD 0 .WORD 42000 .WORD 42104 .WORD 136104 .WORD 2004 .WORD 2 .WORD 146000 .WORD 10062 .WORD 10020 .WORD 10020 .WORD 0 .WORD 76000 .WORD 76020 .WORD 101202 .WORD 10174 .WORD 174 .WORD 34000 .WORD 101104 .WORD 135202 .WORD 101202 .WORD 34104 .WORD 0 .WORD 34000 .WORD 101104 .WORD 101202 .WORD 42104 .WORD 306 .WORD 0 .WORD 2070 .WORD 40070 .WORD 42070 .WORD 34104 .WORD 0 .WORD 0 .WORD 43000 .WORD 110651 .WORD 43251 .WORD 0 .WORD 0 .WORD 40000 .WORD 51074 .WORD 36112 .WORD 2 .WORD 0 .WORD 2070 .WORD 1002 .WORD 1076 .WORD 2002 .WORD 70 .WORD 0 .WORD 41074 .WORD 41102 .WORD 41102 .WORD 41102 .WORD 0 .WORD 0 .WORD 77000 .WORD 77000 .WORD 77000 .WORD 0 .WORD 0 .WORD 10020 .WORD 10174 .WORD 20 .WORD 76000 .WORD 0 .WORD 4000 .WORD 20020 .WORD 4020 .WORD 0 .WORD 174 .WORD 0 .WORD 4020 .WORD 4004 .WORD 20 .WORD 37000 .WORD 0 .WORD 60000 .WORD 10220 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 10020 .WORD 6022 .WORD 0 .WORD 0 .WORD 14030 .WORD 77000 .WORD 14000 .WORD 30 .WORD 0 .WORD 0 .WORD 31114 .WORD 46000 .WORD 62 .WORD 0 .WORD 14000 .WORD 22044 .WORD 30 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 14000 .WORD 30 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 20 .WORD 0 .WORD 0 .WORD 0 .WORD 10360 .WORD 10020 .WORD 11420 .WORD 14024 .WORD 0 .WORD 36000 .WORD 42104 .WORD 42104 .WORD 0 .WORD 0 .WORD 0 .WORD 22030 .WORD 14040 .WORD 36004 .WORD 0 .WORD 0 .WORD 0 .WORD 77000 .WORD 77176 .WORD 77176 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 N44524: MOVB R0, @25574 INC @#25574 BIC #1000, @#25574 INC @#11476 TRAP 0 RETURN N44552: MOV @16(SP), R1 ADD #2, 16(SP) N44564: MOV @#25574, R0 N44570: CMP @#11476, #777 BCC N44616 MOVB (R1)+, (R0)+ BEQ N44632 BIC #1000, R0 INC @#11476 BR N44570 N44616: MOV R0, -(SP) MOV R1, -(SP) TRAP 0 MOV (SP)+, R1 MOV (SP)+, R0 BR N44570 N44632: DEC R0 MOV R0, @#25574 TRAP 0 RETURN N44644: MOV @#26052, R5 MOV @16(SP), R1 CMP R1, #7 BHI N44700 MOV R1, R0 MOV R1, R2 ASL R0 ADD R0, R5 MOV 202(R5), R1 BR N44724 N44700: MOVB (R1)+, R0 MOV R0, R2 ASL R0 ADD R0, R5 CMP R1, 162(R5) BEQ N44724 MOV 162(R5), 202(R5) N44724: MOV R1, 162(R5) ASL R0 ADD R2, R0 ADD #2, 16(SP) N44742: TSTB @#25706 BEQ N45112 MOV #35652, R5 CMP R5, @#26052 BEQ N45116 N44762: MOV @30(R5), (R5) MOV 2(R5), 12(R5) MOVB R0, R2 ADD R2, (R5) SUB R2, 12(R5) SWAB R0 N45006: MOV @#L77026, -(SP) MOV 46(R5), @#L77026 MOV R0, -(SP) CALL N14716 MOV R1, @#11610 BNE N45042 MOV #105136, @#11610 N45042: MOV #177710, @#11606 N45050: CLR R0 BISB @11610, R0 BEQ N45074 CALL N16766 INC @#11610 DECB (SP) BNE N45050 N45074: TST (SP)+ MOV (SP)+, @#L77026 MOV @#26052, R5 CALL N14716 N45112: CLR @#11606 N45116: RETURN N45120: MOV @16(SP), R1 ADD #2, 16(SP) MOVB (R1)+, R0 N45134: TSTB @#25707 BEQ N45112 MOV #36074, R5 BR N44762 N45150: MOV @16(SP), R2 ADD #2, 16(SP) MOVB (R2)+, R0 MOVB (R2)+, R1 SWAB R1 BISB (R2)+, R1 SWAB R1 N45174: ASL R0 MOV 26060(R0), R0 BEQ N45262 MOV R0, R5 MOV 74(R5), -(SP) MOV R1, R4 CALL N30002 MOV R3, -(SP) MOV R5, -(SP) MOV R4, R3 CALL N27732 CLR R0 MOV R2, R1 CALL N45006 MOV (SP)+, R5 MOV (SP)+, R3 CALL N27732 MOV (SP)+, 74(R5) MOV @#26052, R5 N45262: RETURN N45264: CLR R2 N45266: MOV @#25716, -(SP) CLR @#25716 MOV R0, R1 ADD R2, PC CALL N63426 BR N45314 .WORD 4767 .WORD 16036 N45314: MOV (SP)+, @#25716 RETURN N45322: MOV #6, R2 BR N45266 N45330: MOV #70001, @#L77010 MOV @#L77014, R1 BNE N45366 ADD #4, (SP) RETURN N45352: MOV #70001, @#L77010 CLR @#L77014 RETURN N45366: MOV R1, R0 SWAB R1 BEQ N45420 CLR R1 ROR R0 MOV R0, @#L77010 N45404: MOV @#L77014, R0 BCC N45420 COMB R1 N45414: SWAB R0 BEQ N45352 N45420: CMP @#11476, #777 BCC N45470 MOVB R0, @25574 BEQ N45352 INC @#25574 BIC #1000, @#25574 INC @#11476 COMB R1 BNE N45414 INC @#L77010 CLC BR N45404 N45470: MOV R0, -(SP) MOV R1, -(SP) MOV @#L77010, -(SP) TRAP 0 MOV (SP)+, @#L77010 MOV (SP)+, R1 MOV (SP)+, R0 BR N45420 N45514: MOV @#L77054, -(SP) MOV (SP)+, @#L77054 CLR @#11510 RETURN N45532: CLR @#11570 CALL N46010 CALL N02726 CALL N00422 JSR R5, N02776 .WORD 15426 .WORD L04757 N45562: TST @#25634 BNE N45562 N45570: MOVB @#11512, R0 BEQ N45734 BIT #300, R0 BNE N45702 ASR R0 BNE N45652 MOV SP, @#11500 TST @#2 BEQ N45632 CLR @#2 CALL N00062 N45632: TRAP 0 TRAP 2 ADD @#11572, PC BR N45570 CALL N00652 BR N45632 N45652: ASR R0 BNE N45674 CALL N71454 CALL N00060 CLR @#2 BR N45570 N45674: CALL N50242 BR N45570 N45702: MOV @#L77054, -(SP) MOV @#L77716, -(SP) CALL N71454 CALL N00004 MOV (SP)+, @#L77716 MOV (SP)+, @#L77054 BR N45570 N45734: CALL N00422 JSR R5, N02762 MOV @-(R4), (SP)+ TRAP 357 CLR @#11512 N45754: TST @#11516 BNE N46002 MOV #2, @#11570 CLR @#11572 CLR @#11574 TRAP 4 N46002: INC @#11502 RETURN N46010: TRAP 0 TST @#25716 BEQ N46030 CLR @#11530 CLR @#25716 N46030: RETURN N46032: CALL N46010 DEC @#11516 BPL N46076 MOV #105153, R1 MOVB (R1)+, R0 EMT 52 CLR @#11754 N46060: TST @#11516 BPL N46076 EMT 24 BCC N46060 EMT 42 BR N46060 N46076: CLR R0 CLR R1 EMT 52 CLR @#11516 MOV @#26052, R5 BR N45754 N46116: MOV SP, @#11506 CALL N00464 MOV @#26052, -(SP) MOV @#25704, -(SP) MOV #426, @#25704 MOVB @#25702, -(SP) CLRB @#25702 MOV #36316, R0 MOV R0, R1 MOV #111, R2 N46166: MOV (R5)+, (R1)+ SOB R2, N46166 MOV #147414, R1 MOV #10, R2 N46202: MOV -(R1), @-(R1) SOB R2, N46202 MOV R0, R5 MOV R5, @#26052 MOVB #105, @11662 INC @#11662 MOV #6010, 26(R5) MOV #14, 4(R5) MOV #2, 112(R5) CALL N27156 MOV #6014, 26(R5) MOV 26(R5), 30(R5) MOV @#25652, R0 SUB @#25664, R0 CMP R0, @#25650 BHI N46312 ADD @#25660, R0 N46312: MOV -(R0), -(SP) MOV R0, -(SP) MOV #6010, (R0) JSR R5, N02776 .WORD 15726 .WORD L05107 JSR R5, N10450 .WORD 15750 .WORD L14262 MOV #105162, R1 MOVB (R1)+, R0 EMT 52 TST @#11762 BEQ N46366 EMT 50 INCB (R5)+ BR N46372 N46366: EMT 50 INCB @(R4)+ N46372: MOV @#36544, R4 CLRB (R4) MOV R4, R5 N46402: MOV #26540, R1 MOV #376, R2 MOV R4, R3 MOV R4, R5 CLR -(R1) N46420: CMP R3, #36540 BNE N46432 MOV #36542, R3 N46432: MOVB -(R3), R0 BEQ N46454 CMPB R0, #15 BEQ N46450 MOVB R0, -(R1) SOB R2, N46420 N46450: TSTB (R1) BEQ N46420 N46454: INC R3 MOV R3, R4 MOV #26537, R3 N46464: MOV @36344, @#36316 MOV #120, @#36330 EMT 46 CLR @#25704 EMT 44 COMB @(R2)+ MOV #426, @#25704 BR N46616 N46522: MOV #26140, R1 MOV #376, R2 MOV R5, R3 MOV R3, R4 N46536: CMP R3, #36542 BNE N46550 MOV #36540, R3 N46550: MOVB (R3)+, R0 BEQ N46566 CMPB R0, #15 BEQ N46570 MOVB R0, (R1)+ SOB R2, N46536 N46566: DEC R3 N46570: MOV R3, R5 CLRB (R1) MOV R1, R3 MOV #26140, R1 CMP R1, R3 BNE N46464 TSTB (R5) BEQ N46464 BR N46522 N46614: BR N46402 N46616: TST @#11506 BMI N46700 TST @#11512 BNE N46700 TST @#11516 BNE N46700 EMT 24 BCC N46616 CMP R0, #10 BHI N46702 DEC R0 ASL R0 ADD R0, PC BR N46614 .WORD 717 .WORD 536 .WORD 542 .WORD 544 .WORD 550 .WORD 554 .WORD 555 N46700: BR N47264 N46702: TST R2 BMI N46740 CMP R1, #26140 BEQ N46726 MOV #26140, R3 N46720: MOVB (R1)+, (R3)+ BNE N46720 DEC R3 N46726: MOV #26260, R1 CMP R3, R1 BHI N46740 MOV R3, R1 N46740: MOV R1, R3 TST R0 BLE N46764 CMP R3, #26257 BCC N47154 CMP R0, #1 BGT N47020 BEQ N47122 N46764: CMP R3, #26140 BEQ N47154 TST R0 BMI N47136 N46776: MOVB (R3)+, 177776(R3) BNE N46776 DEC R1 DEC @#36316 INC @#36330 BR N47062 N47020: TST @#11762 BEQ N47040 TSTB (R3)+ BNE N47034 CLRB (R3) N47034: MOVB R0, -(R3) BR N47052 N47040: MOVB (R3), R2 MOVB R0, (R3)+ BEQ N47052 MOV R2, R0 BR N47040 N47052: MOV #1, R0 CLR @#26536 N47062: MOV @#36316, -(SP) MOV @#36330, -(SP) EMT 46 CLR @#25704 EMT 44 COMB @(R2)+ MOV #426, @#25704 MOV (SP)+, @#36330 MOV (SP)+, @#36316 N47122: TSTB (R1) BEQ N47150 CMP @#36330, #1 BEQ N47146 N47136: ADD R0, @#36316 SUB R0, @#36330 N47146: ADD R0, R1 N47150: MOV PC, R2 N47152: BR N46616 N47154: CALL N24574 BR N47150 MOV #177777, R0 N47166: INC @#11502 BR N46702 MOV #1, R0 BR N47166 INC @#11762 EMT 50 .WORD B05225 BR N46616 CLR @#11762 EMT 50 .WORD B05234 BR N47152 CLR R0 BR N46702 TST R2 BPL N47242 MOV #26140, R1 N47242: TSTB (R1) BEQ N47264 MOV R1, R0 CALL N00616 MOV #15, R0 CALL N00616 N47264: CALL N00464 MOV (SP)+, R0 MOV (SP)+, (R0) CLR @#11506 CLR R0 CLR R1 EMT 52 EMT 50 INCB R0 MOVB (SP)+, @#25702 MOV (SP)+, @#25704 MOV (SP)+, R5 MOV R5, @#26052 JSR R5, N02762 .WORD 15726 .WORD L05107 JSR R5, N10434 .WORD 15750 .WORD L14262 JMP N45754 .WORD 36320 .WORD 120 .WORD 36324 .WORD 120 .WORD 36326 .WORD 1 .WORD 36330 .WORD 120 .WORD 36332 .WORD 1 .WORD 36340 .WORD 6010 .WORD 36342 .WORD 6150 .WORD 36442 .WORD 0 N47414: TSTB @#25706 BEQ N47550 MOV @#26052, R5 CMP R5, #35652 BEQ N47550 TST @#11504 BPL N47460 MOV #105131, R1 MOVB (R1)+, R0 EMT 52 MOV #377, 160(R5) N47460: MOV 160(R5), R2 CLR 160(R5) CLR R0 MOV #162, R3 ADD R5, R3 BR N47516 N47502: MOV (R3), R1 BEQ N47510 EMT 52 N47510: ADD #5, R0 TST (R3)+ N47516: ASR R2 BCS N47502 BNE N47510 TST @#11512 BNE N47550 TST @#11516 BEQ N47550 MOV #105153, R1 MOVB (R1)+, R0 EMT 52 N47550: CLR @#11504 RETURN N47556: TSTB @#25707 BEQ N47754 CMP R5, #36074 BEQ N47754 MOV @#25704, -(SP) CLR @#25704 MOVB @#25702, -(SP) CLRB @#25702 MOV @#25636, -(SP) CLR @#25636 TST @#25710 BEQ N47646 MOV #L05131, R1 MOVB (R1)+, R0 CALL @L60056 CLR @#25710 N47646: MOV #426, @#25704 MOV #4, -(SP) MOV #3441, -(SP) N47664: MOV (SP), R0 MOV 2(SP), R2 ASL R2 ADD @#11706, R2 MOV (R2), R1 BEQ N47724 BIT #177400, R1 BNE N47714 MOV R2, R1 N47714: CALL @L60056 MOV SP, @#25710 N47724: SUB #10, (SP) DEC 2(SP) BPL N47664 CMP (SP)+, (SP)+ MOV (SP)+, @#25636 MOVB (SP)+, @#25702 MOV (SP)+, @#25704 N47754: CLR @#11514 RETURN N47762: TST @#25634 BNE N50020 MOV 120(R5), @#25604 BMI N50022 MOV 114(R5), @#25602 MOV 112(R5), @#25600 N50014: CLR @#11502 N50020: RETURN N50022: MOVB #177, @25620 MOV #4, @#25600 TST 112(R5) BEQ N50014 ASL @#11502 BEQ N50070 MOV @#25626, @#25610 MOVB #1, @#25610 BR N50014 N50070: COM @#25606 MOV 6(R5), R0 MOV #177010, R2 MOV #177024, R3 MOV (R5), (R2) MOV 122(R5), R4 BNE N50130 MOV R0, R1 MUL #11, R1 ADD R1, (R2) N50130: ADD #2, R4 N50134: MOV (R3), R1 COM @#L77020 COM @#L77022 MOV R1, (R3) ADD R0, (R2) SOB R4, N50134 BR N50014 N50156: TST @#25606 BNE N50070 RETURN N50166: CLR @#25600 BIC #1, @25612 BIC #1, @25614 RETURN N50210: MOV #100000, @#11520 CALL @11566 CLR @#11520 RETURN N50230: MOV R0, @#11566 INC @#11520 RETURN N50242: ASR R0 BCC N50252 JMP N71522 N50252: CALL N55672 RETURN N50260: MOV (R5)+, @#11556 MOV (R5)+, @#11564 MOV #1, @#11560 RTS R5 N50300: MOV R0, @#11556 MOV R0, @#11562 MOV R1, @#11564 MOV R2, @#11560 RETURN N50322: CLR @#L77712 MOV #1, @#L77710 RETURN MOV R0, -(SP) MOV @#36550, R0 BMI N50422 CMP R0, #2 BCC N50372 MOVB @#L77064, 36546(R0) N50362: INC @#36550 N50366: MOV (SP)+, R0 RTI N50372: BNE N50410 TSTB @#L77064 BNE N50362 COM @#36550 BR N50366 N50410: INC @#11474 N50414: CLR @#36550 BR N50366 N50422: TSTB @#L77064 BEQ N50366 BR N50414 N50432: MOV @#36546, R0 CLC ROR R0 MOV R0, @#36546 MOV R0, @#L77010 MOV @#L77014, @#36556 INC @#L77010 MOV @#L77014, R1 MOVB R1, R0 MOV R0, R5 ASH #177775, R0 CMP R0, #5 BHI N50526 ASL R0 CALL @L50542(R0) N50514: DEC @#11474 ADD #2, (SP) RETURN N50526: MOVB #377, @#36556 CALL N50562 BR N50514 L50542: .WORD N50622 .WORD N50624 .WORD N50626 .WORD N51160 .WORD N51772 .WORD N52054 L50556: .WORD L05037 .WORD 36556 N50562: MOV @#36546, @#L77010 MOV @#36556, @#L77014 N50576: TST @#L77064 RETURN MOVB #15, @#36556 BR N50562 N50614: MOVB R0, @#36556 BR N50562 N50622: RETURN N50624: RETURN N50626: MTPS #200 MOV @#L77054, -(SP) MOV @#L77716, -(SP) BIC #37, @#L77054 BIS #10, @#L77716 MOV @#4, -(SP) MOV #151064, @#4 MOV #5, R0 MOV #36556, R1 CALL N51110 CLRB @#36556 MOVB @#36557, R0 BITB #10, R0 BEQ N51070 MOV @#36562, R1 BIC #1, R1 MOV @#36564, R2 ROR R0 ROR R2 MOV @#36566, R3 BITB #1, @#36561 BEQ N50764 BIS #10, @#L77054 N50764: CLR R0 DIV #20000, R0 ASL R0 BIS R0, @#L77054 ADD #100000, R1 N51004: MOV R2, @#L77010 MOV (R1)+, @#L77014 CMP R1, #120000 BNE N51034 ADD #2, @#L77054 MOV #100000, R1 N51034: INC R2 SOB R3, N51004 N51040: MOV (SP)+, @#4 MOV (SP)+, @#L77716 MOV (SP)+, @#L77054 MTPS #0 JMP N50562 CMP (SP)+, (SP)+ BR N51074 N51070: INCB @#36556 N51074: INCB @#36556 BR N51040 N51102: MOV @#36546, 2(SP) N51110: MOV @#36546, @#L77010 BR N51124 N51120: INC @#L77010 N51124: MOV @#L77014, (R1)+ SOB R0, N51120 RETURN N51134: MOV @#36546, @#L77010 BR N51150 N51144: INC @#L77010 N51150: MOV (R1)+, @#L77014 SOB R0, N51144 RETURN N51160: MOV #5, R0 MOV #36556, R1 CALL N51110 CLRB @#36556 CMP R5, #32 BNE N51242 MOVB @#36557, R0 MOV R0, R5 ASH #177775, R0 CMP R0, #3 BHI N51242 ASL R0 ADD R0, PC BR N51252 BR N51354 BR N51400 BR N51424 N51242: JMP N50626 N51246: JMP N50576 N51252: MOV @#36562, R1 MOV @#36564, R0 ASL R0 ASR R5 BCC N51342 CALL N51504 ASR R0 CMP R0, @#36564 BCC N51312 MOVB #377, @#36556 N51312: MOV R0, @#36564 MOV R1, @#36562 MOV #4, R0 MOV #36556, R1 CALL N51134 JMP N50576 N51342: CALL N51662 BMI N51242 JMP N50562 N51354: CALL N51440 BEQ N51242 BR N51370 N51364: INC @#L77010 N51370: MOV (R1)+, @#L77014 SOB R0, N51364 BR N51246 N51400: CALL N51440 BEQ N51242 BR N51414 N51410: INC @#L77010 N51414: MOV @#L77014, (R1)+ SOB R0, N51410 BR N51246 N51424: MOV @#36562, @#11566 INC @#11520 BR N51246 N51440: MOV @#36562, R1 MOV @#36564, R0 CLC ROR R0 MOV R0, @#L77010 MOV @#36566, R0 RETURN N51466: CALL N51504 MOV R0, 2(SP) MOV R1, 4(SP) RETURN N51504: MOV R0, R1 BMI N51514 ROR R1 ADC R0 N51514: MOV R2, -(SP) CLR R2 CLR -(SP) N51522: MOV #36744, R1 N51526: TST (R1)+ BEQ N51550 TST (R1)+ N51534: ADD (R1)+, R1 BPL N51526 TST R2 BNE N51522 CLR R0 BR N51654 N51550: TST (R1)+ CMP R0, (R1) BLOS N51600 CMP R1, R2 BEQ N51574 CMP (R1), (SP) BLOS N51534 MOV R1, R2 MOV (R1), (SP) BR N51534 N51574: MOV (SP), R0 BR N51604 N51600: INC 177774(R1) N51604: MOV (R1)+, R2 SUB #6, R2 CMP R0, R2 BCC N51654 MOV R1, R2 ADD R0, R2 MOV R2, -(SP) CLR (R2)+ MOV R1, (R2) SUB #6, (R2)+ MOV -(R1), (R2) SUB R0, (R2) SUB #6, (R2) MOV R0, (R1)+ ADD (R2)+, R2 MOV (SP)+, 2(R2) N51654: TST (SP)+ MOV (SP)+, R2 RETURN N51662: TST R1 BPL N51672 JMP N71302 N51672: MOV #36744, R0 N51676: ADD #6, R0 BMI N51770 CMP R0, R1 BEQ N51724 ADD 177776(R0), R0 BR N51676 N51716: MOV (R1), R1 ADD #6, R1 N51724: CLR 177772(R1) TST -(R1) MOV R1, R0 ADD (R0)+, R0 TST (R0) BNE N51752 ADD 4(R0), (R1) ADD #6, (R1) N51752: TST @-(R1) BEQ N51716 MOV R1, R0 TST (R0)+ ADD (R0)+, R0 CMP -(R1), (R0)+ MOV R1, (R0) N51770: RETURN N51772: DEC @#L77010 MOV @#L77014, R0 SWAB R0 DEC R0 CALL N52016 JMP L50556 N52016: TSTB R0 BNE N52036 BIC #1000, @#L77054 CLR @#11640 RETURN N52036: BIS #1000, @#L77054 MOV #401, @#11640 RETURN N52054: RETURN N52056: MOV #152176, R0 MOV #65077, @#L77010 MOV #1636, R4 N52074: MOV (R0)+, @#L77014 INC @#L77010 SOB R4, N52074 MOV #70074, @#L77010 MOV @#L77014, -(SP) MOV #N52176, @#L77014 INC @#L77010 MOV @#L77014, -(SP) MOV #0, @#L77014 BIS #20, @#L77716 BIC #20, @#L77716 MOV (SP)+, @#L77014 DEC @#L77010 MOV (SP)+, @#L77014 RETURN N52176: MOV #1000, SP MOV #6, @#4 MOV #2, @#6 CLR @#L77560 TST @#L77562 CLR @#L77564 CLR @#L76664 CLR @#B76570 TST @#B76572 CLR @#L76574 N52252: JSR R5, N53560 BISB -(R1), R4 JSR R5, N53664 .WORD B54366 .WORD L55666 BEQ N52306 MOV @#L55666, R0 ASL R0 CALL @L52320(R0) BR N52252 N52306: JSR R5, N53560 .WORD B54575 JMP @#1000 L52320: .WORD N52330 .WORD N52402 .WORD N52714 .WORD N53104 N52330: JSR R5, N53560 .WORD B54633 N52336: CALL N53530 CMP R0, #15 BEQ N52400 CALL N53544 MOV R0, -(SP) JSR R5, N53560 .WORD B55663 MOV (SP)+, R0 CALL N53610 CALL N53600 BR N52336 N52400: RETURN N52402: JSR R5, N53560 .WORD B54607 MOV #62, R2 N52414: MOV #40, R0 MOV #140, R1 N52424: CALL N53544 TSTB @#L77560 BMI N52450 INC R0 SOB R1, N52424 SOB R2, N52414 CALL N52552 N52450: TSTB @#L77562 JSR R5, N53560 .WORD B54753 N52462: CALL N53530 CMP R0, #15 BEQ N52510 CMP R0, #40 BCS N52462 CALL N52520 BR N52462 N52510: JSR R5, N53560 .WORD B55065 RETURN N52520: MOV R0, R1 JSR R5, N53560 .WORD B54750 MOV #4040, R2 N52534: TSTB @#L77564 BPL N52534 MOV R1, @#L77566 SOB R2, N52534 RETURN N52552: JSR R5, N53560 .WORD B55047 MOV #4, R1 N52564: SOB R0, N52564 SOB R1, N52564 MOV #176640, R1 MOV #176642, R2 MOV #401, R0 MOV #100000, R5 MOV #24, R4 N52614: MOV R5, (R1) MOV #436, R3 N52622: MOV R0, (R2) ADD #120, (R1) SOB R3, N52622 ADD #4, R5 SOB R4, N52614 TST R0 BMI N52656 MOV #100200, R0 INC R4 DEC R5 BR N52614 N52656: MOV #177777, R0 MOV #20, R4 MOV #100000, (R1) N52672: MOV #120, R3 N52676: MOV R0, (R2) INC (R1) SOB R3, N52676 ADD #2640, (R1) SOB R4, N52672 RETURN N52714: JSR R5, N53560 .WORD B55074 MOV #12, R0 CALL N53050 BCS N53004 CLR R2 COM R0 N52740: TSTB R0 BPL N52756 MOV #40, R0 MOV #137, R1 BR N52766 N52756: MOV #300, R0 MOV #77, R1 N52766: CALL N53050 BCS N53004 INC R0 INC R2 SOB R1, N52766 BR N52740 N53004: CMP R2, #10 BCS N53040 MOV #33, R0 CALL N53050 BCS N53040 MOV #100, R0 CALL N53050 BCS N53040 RETURN N53040: JSR R5, N53560 .WORD B55153 RETURN N53050: TSTB @#L77560 BMI N53074 TSTB @#L76664 BPL N53050 MOVB R0, @#L76666 CLC RETURN N53074: TSTB @#L77562 SEC RETURN N53104: JSR R5, N53560 .WORD B55156 MOV @#100, -(SP) MOV #153434, @#100 CLR R0 MOV #1000, R1 CLR @#L55670 N53136: CLR R2 N53140: TSTB @#L77560 BMI N53310 DEC R2 BEQ N53274 TSTB @#L76574 BPL N53140 MOVB R0, @#L76576 CLR R2 N53166: TSTB @#L77560 BMI N53310 DEC R2 BEQ N53274 TSTB @#B76570 BPL N53166 CMPB R0, @#B76572 BNE N53274 INC R0 SOB R1, N53136 JSR R5, N53560 .WORD B55227 MOV @#L55670, R2 MOV #153442, R1 MOV #153476, R3 N53242: MOV (R1)+, R0 BEQ N53264 CMP R2, (R3)+ BCS N53242 JSR R5, N53562 JSR R5, N53560 .WORD B55405 N53264: JSR R5, N53560 .WORD B55414 BR N53302 N53274: JSR R5, N53560 .WORD B55453 N53302: TSTB @#L77560 BPL N53302 N53310: TSTB @#L77562 N53314: JSR R5, N53560 .WORD B55552 CALL N53530 CMP R0, #15 BEQ N53426 MOV #3720, R2 N53340: CLR R1 N53342: DEC R1 BEQ N53274 TSTB @#L77560 BPL N53364 CMPB @#L77562, #15 BEQ N53310 N53364: TSTB @#L76574 BPL N53342 MOVB R0, @#L76576 CLR R1 N53400: DEC R1 BEQ N53274 TSTB @#B76570 BPL N53400 MOVB @#B76572, R0 CALL N53544 SOB R2, N53340 BR N53314 N53426: MOV (SP)+, @#100 RETURN INC @#L55670 RTI .WORD B55313 .WORD B55316 .WORD B55321 .WORD B55325 .WORD B55331 .WORD B55335 .WORD B55341 .WORD B55345 .WORD B55352 .WORD B55357 .WORD B55364 .WORD B55371 .WORD B55377 .WORD 0 .WORD 11000 .WORD 6000 .WORD 4000 .WORD 3000 .WORD 2000 .WORD 1000 .WORD 400 .WORD 200 .WORD 100 .WORD 50 .WORD 24 .WORD 12 .WORD 0 N53530: TSTB @#L77560 BPL N53530 MOV @#L77562, R0 RETURN N53544: TSTB @#L77564 BPL N53544 MOV R0, @#L77566 RETURN N53560: MOV (R5)+, R0 N53562: TSTB @#L77564 BPL N53562 MOVB (R0)+, @#L77566 BNE N53562 RTS R5 N53600: JSR R5, N53560 .WORD B54621 RETURN N53610: MOV R0, R1 MOV #3, R2 CLR R0 BR N53630 N53622: CLR R0 ROLB R1 ROLB R0 N53630: ROLB R1 ROLB R0 ROLB R1 ROLB R0 ADD #60, R0 CALL N53544 SOB R2, N53622 MOV #40, R0 CALL N53544 RETURN N53664: MOV (R5)+, R1 MOVB (R1)+, R2 MOV R2, R4 CLR R3 N53674: CMP R3, @0(R5) BNE N53710 JSR R5, N53560 .WORD B54600 N53710: MOV R1, R0 JSR R5, N53562 MOV R0, R1 CMP R3, @0(R5) BNE N53734 JSR R5, N53560 .WORD B54603 N53734: INC R3 SOB R2, N53674 N53740: CALL N53530 CMP R0, #60 BCS N54000 SUB #60, R0 BNE N53762 MOV R4, R0 N53762: DEC R0 CMP R0, R4 BCC N53740 MOV R0, @0(R5) N53774: TST -(R5) BR N53664 N54000: CMP R0, #15 BEQ N54076 CMP R0, #33 BNE N53740 N54014: CALL N53530 CMP R0, #133 BEQ N54014 CMP R0, #101 BNE N54050 N54034: DEC @0(R5) BPL N53774 MOV R4, @0(R5) BR N54034 N54050: CMP R0, #102 BNE N53740 INC @0(R5) CMP @0(R5), R4 BNE N53774 CLR @0(R5) BR N53774 N54076: DEC R4 CMP @(R5)+, R4 RTS R5 .ASCII |<||!||n1||x0||r||Y#,ô å ó ô ï ÷ ù ê í ï î é ô ï ò ô å ò í é î á ì á| .ASCII |Y$,===================================================||Y':î á â ï ò ô å ó ô ï ÷| .ASCIZ |Y(:-----------------------| B54366: .ASCIZ <5>|Y*; 1 - ÔÅÓÔ ËÌÁ×ÉÁÔÕÒÙ | .ASCIZ |Y+; 2 - ÔÅÓÔ ÄÉÓÐÌÅÑ | .ASCIZ |Y,; 3 - ÔÅÓÔ ÐÒÉÎÔÅÒÁ | .ASCIZ |Y-; 4 - ÔÅÓÔ ÌÉÎÉÉ | .ASCIZ |Y/; 0 - ×ÙÈÏÄ ||Y)<| B54575: .ASCIZ |þ| B54600: .ASCIZ |e| B54603: .ASCIZ |e| B54607: .ASCIZ |!| .ASCIZ <32>| |<32> .ASCIZ |K| B54621: .ASCIZ .ASCIZ |y| .ASCIZ |y| B54633: .ASCII |!||Y7 ôÅÓÔ ËÌÁ×ÉÁÔÕÒÙ: îÁÖÉÍÁÊÔÅ ÎÁ ËÌÁ×ÉÛÉ. ( "÷÷ïä" - ×ÙÈÏÄ )| B54750: .ASCIZ |H| B54753: .ASCII |Y7&ôÅÓÔ ÄÉÓÐÌÅÑ:||Y7=| B55000: .ASCIZ |÷×ÅÄÉÔÅ ÓÉÍ×ÏÌ.||Y7W( "÷÷ïä" - ×ÙÈÏÄ ) | B55047: .ASCIZ |b1||g2||Y7!||n4| B55065: .ASCIZ |g1||b0| B55074: .ASCIZ |Y64ôÅÓÔ ÐÒÉÎÔÅÒÁ. ( "÷÷ïä" - ×ÙÈÏÄ ) | B55153: .ASCIZ |"| B55156: .ASCIZ |Y6 ôÅÓÔ ÌÉÎÉÉ: éÄÅÔ ÐÒÏ×ÅÒËÁ | B55227: .ASCIZ |Y64ðÒÏ×ÅÒËÁ ÚÁËÏÎÞÅÎÁ. óËÏÒÏÓÔØ ÏÂÍÅÎÁ - | B55313: .ASCIZ |50| B55316: .ASCIZ |75| B55321: .ASCIZ |100| B55325: .ASCIZ |150| B55331: .ASCIZ |200| B55335: .ASCIZ |300| B55341: .ASCIZ |600| B55345: .ASCIZ |1200| B55352: .ASCIZ |2400| B55357: .ASCIZ |4800| B55364: .ASCIZ |9600| B55371: .ASCIZ |19200| B55377: .ASCIZ |57600| B55405: .ASCIZ | ÂÏÄ.| B55414: .ASCIZ |Y84( "ðòïâåì" - ÐÒÏÄÏÌÖÉÔØ )| B55453: .ASCIZ |Y84*** ïûéâëá *** ( "ðòïâåì" - ÐÒÏÄÏÌÖÉÔØ ) | B55552: .ASCII |Y7 ||J||Y84||n4÷×ÅÄÉÔÅ ÓÉÍ×ÏÌ | B55620: .ASCIZ | ( "÷÷ïä" - ×ÙÈÏÄ ) ||H| B55663: .ASCIZ | | L55666: .BYTE 0 L55667: .BYTE 0 L55670: .WORD 000000 N55672: BIC #10, @#11512 BIC #1, @#L77066 TST @#L77060 MOV #6, @#L77026 MOV #174370, @#6160 MOV #174370, @#6161 MOV #N56214, @#100 MOV #62, @#104 JSR R5, N71506 .WORD B56530 .WORD 36622 .WORD 7 MOV #N55776, @#11566 INC @#11520 RETURN N55776: EMT 44 BISB N62773, R2 NOP MOV #54433, @#36606 N56014: CALL N56546 CALL N56366 CALL N70670 TST R0 BEQ N56040 INC @#36572 N56040: CALL N56366 JSR R5, N65472 .WORD 300 .WORD 100000 ADD R0, @#36576 CALL N65414 MOV R0, -(SP) CALL N56172 BIS (SP)+, R0 ASR R0 ADC @#36574 ASR R0 ADC @#36600 ASR R0 ADC @#36602 CALL N56172 MOV L56136(R0), @#36604 INC @#36570 BR N56014 L56136: .WORD 0 .WORD 62 .WORD 113 .WORD 144 .WORD 226 .WORD 310 .WORD 454 .WORD 1130 .WORD 2260 .WORD 4540 .WORD 11300 .WORD 22600 .WORD 45400 .WORD 160400 N56172: CALL N56366 BIT #10, @#L77066 BEQ N56172 MOV @#L77060, R0 RETURN N56214: DEC @#104 BNE N56244 MOV #62, @#104 INC @#106 ADC @#110 INC @#36620 N56244: RTI MOV #50, R1 MOV #1, R3 JSR R5, N56326 .WORD B55000 .WORD 5 JSR R5, N56326 .WORD 175320 .WORD 5 MOV R3, R1 MOV #50, R3 JSR R5, N56326 .WORD B55620 .WORD 144 JSR R5, N56326 .WORD L55667 .WORD 144 RETURN N56326: MOV (R5)+, @#L77010 MOV (R5)+, R4 N56334: MOV #63, R0 N56340: MOV R1, R2 N56342: MOV R0, @#L77024 ADD R3, @#L77010 SOB R2, N56342 ASLB R0 ASLB R0 BMI N56340 SOB R4, N56334 RTS R5 N56366: TST @#36620 BEQ N56514 CLR @#36620 MOV #156516, R4 MOV #36626, R3 MOV #5, R2 N56414: MOV @#106, R1 MOV @#110, R0 ROR R0 ROR R1 ROR R5 N56432: DIV (R4)+, R0 CMP R0, #11 BLOS N56454 CLR @#106 CLR @#110 BR N56414 N56454: ADD #60, R0 MOVB R0, (R3)+ CMPB (R3), #72 BNE N56472 N56470: INC R3 N56472: CLR R0 SOB R2, N56432 ASL R5 ROL R1 ADD #60, R1 MOVB R1, (R3) EMT 44 .WORD 36622 N56514: RETURN .WORD 43120 .WORD 3410 .WORD 454 .WORD 36 .WORD 5 B56530: .ASCIZ |Y2:00:00:00| .EVEN N56546: MOV #36570, R3 MOV #7, R4 MOV (R3), -(SP) NEG (SP) MOV L20074(R3), @#36610 MOV (R3)+, R1 CMP R4, #1 BLOS N56602 ADD R1, (SP) N56602: CALL N56626 EMT 44 .WORD 36606 .WORD 77415 TST (SP)+ BEQ N56624 EMT 44 .WORD B57235 N56624: RETURN N56626: MOV #5, R2 MOV R3, -(SP) MOV #36617, R3 N56640: CLR R0 DIV #12, R0 ADD #60, R1 MOVB R1, -(R3) MOV R0, R1 SOB R2, N56640 MOV (SP)+, R3 RETURN .ASCII |$:(;);*;+;,;.;||j||Y"-||dôåóô ôåòíéîáìá||d||Y$)þÉÓÌÏ ÐÒÏÈÏÄÏ×:| .ASCII |Y&(õÓÔÒÏÊÓÔ×Ï ÏÛÉÂËÉ||Y'(------------------------||Y((ðúõ:||Y)(ï| B57063: .ASCII |úõ ãð:||Y*(ïúõ ðð:||Y+(÷ÉÄ| B57113: .ASCII |ÅÏ-ïúõ:||Y,(ëÁÎÁÌ Ó×ÑÚÉ:||Y.| B57145: .ASCII |&ÓËÏÒÏÓÔØ ÏÂÍÅÎÁ - 00000 ÂÏÄ||Y2&÷ÒÅÍÑ| B57215: .ASCIZ | ÔÅÓÔÉÒÏ×ÁÎÉÑ:| .BYTE 0 B57235: .ASCII |Y0&||e *** ïÂÎÁÒÕÖÅÎÙ ÏÛÉÂËÉ! | B57273: .ASCIZ |*** ||e| .EVEN N57304: ADD R4, PC BR N57342 INC @#26050 CALL N35770 CALL N20762 MOV #1, R0 CALL N34606 CALL N32070 RETURN N57342: MOV @#25714, -(SP) CLR @#25714 CALL N32134 CALL N36012 CLR R1 MOV #1, R2 CLR -(SP) N57372: MOV R2, -(SP) MOV R1, -(SP) CALL N16432 MOV (SP), R1 CMPB R0, @107152(R1) BEQ N57416 CALL @157472(R1) N57416: MOV (SP)+, R1 MOV (SP)+, R2 TST (R1)+ SOB R2, N57372 MOV (SP)+, R0 BNE N57460 MOV @#25720, R0 SUB #2, R0 BMI N57460 BEQ N57454 CALL N24316 BR N57460 N57454: CALL N23614 N57460: MOV (SP)+, @#25714 CLR @#26050 RETURN .WORD 157522 .WORD 134606 .WORD 130522 .WORD 133066 .WORD 157550 .WORD 157562 .WORD 157574 .WORD 136134 .WORD 130054 .WORD 130114 .WORD 130152 .WORD 157624 INC 6(SP) ASL R0 SEZ CALL @157540(R0) RETURN .WORD N22244 .WORD N20700 .WORD N23562 .WORD N24270 ASL R0 MOVB R0, R4 CALL N33340 RETURN ASL R0 MOVB R0, R4 CALL N22354 RETURN CMPB R0, #4 N57600: BNE N57606 CLR R4 BR N57616 N57606: CALL N33212 MOV #2, R4 N57616: CALL N33326 RETURN TST R0 N57626: BEQ N57634 MOV #410, R0 N57634: MOV R0, @#25704 RETURN .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 L57776: .WORD 0 L60000: .WORD START L60002: .WORD 000200 L60004: .WORD N63276 .WORD 400 .WORD N63276 .WORD 600 L60014: .WORD 0 .WORD 0 .WORD 0 .WORD N00532 .WORD N00540 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD N44524 .WORD N44552 .WORD N44564 L60050: .WORD N44644 .WORD N44742 .WORD N45120 L60056: .WORD N45134 .WORD N45150 .WORD N45174 .WORD 0 .WORD N16362 .WORD N45264 .WORD N45322 .WORD 0 .WORD 0 L60100: .WORD 0 .WORD 0 .WORD 0 L60106: .WORD 0 .WORD 0 L60112: .WORD 0 .WORD 0 .WORD 0 .WORD N51102 .WORD N50614 .WORD N51466 .WORD N51662 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD N50300 .WORD N50230 .WORD 0 .WORD 0 L60150: .WORD N70656 .WORD 0 .WORD 0 .WORD 0 .WORD N72346 .WORD N73716 .WORD N74176 .WORD N74156 .WORD N60256 .WORD 600 .WORD N60300 .WORD 600 N60200: MOV R4, R1 MOV #50, R2 N60206: CLR (R1)+ SOB R2, N60206 SUB #50, R1 MOV #4, R2 N60222: COM (R1)+ SOB R2, N60222 MOV @#L70172, 14(R4) MOV #200, 20(R4) COM 24(R4) MOV #125252, 46(R4) RETURN N60256: MOV #167375, @L70162 N60264: JMP @#N60320 L60270: .WORD 000000 .WORD 0 .WORD N60310 .WORD 600 N60300: MOV #167352, @L70162 BR N60264 N60310: MOV #167402, @L70162 BR N60264 N60320: CLR @L70164 MOV R0, @L70156 MOV @#L70156, R0 TST (R0)+ MOV R1, (R0)+ MOV R2, (R0)+ MOV R3, (R0)+ MOV R4, (R0)+ MOV R5, (R0)+ MOV SP, (R0)+ MOV R0, R1 .WORD 22 MOV R0, (R1)+ MOV R0, R3 .WORD 24 MOV R0, (R1)+ MOV @#L70156, R1 MOV R1, R4 BPL N60402 MOV R3, 30(R4) N60402: ADD 42(R4), PC MOV #4, R2 SUB #2, R3 N60416: MOV 50(R1), R0 CMP R0, #160000 BCC N60444 MOV 60(R1), (R0) CMP R3, R0 BNE N60444 MOV R3, 16(R4) N60444: TST (R1)+ SOB R2, N60416 CMP 16(R4), #20 BNE N60504 CMP 24(R4), #177777 BEQ N60504 MOV (SP)+, 16(R4) MOV (SP)+, 20(R4) MOV SP, 14(R4) N60504: MOV @#L70156, R4 MOV R4, SP BPL N60562 CLR @#L60000 CLR @#L60002 MOV #125252, @#L67644 N60532: MOV #177564, R5 .WORD 21 TSTB R0 BPL N60532 CLR R0 MOV #177570, R5 .WORD 31 JSR R4, N62722 .WORD B67126 N60562: MOV #70, 34(R4) ADD R4, 34(R4) MTPS @#L70170 MOV R4, SP BPL N60644 CLR R0 MOV #176646, R5 CALL N64214 TST 40(R4) N60622: BMI N60644 JMP N64246 N60630: JSR R4, N62722 .WORD B67140 INC @#L67642 BR N60656 N60644: CALL N64032 TST @#L67642 BEQ N60662 N60656: CALL N62762 N60662: CALL N62524 BPL N60704 CMP R0, #4 BEQ N60704 TST @#L67642 BEQ N60630 N60704: TST R4 CALL @160716(R0) BR N60662 BR N60656 .WORD N61002 .WORD N61002 .WORD N61020 .WORD N61242 .WORD N61272 .WORD N61352 .WORD N61356 .WORD N61360 .WORD N61470 .WORD N61516 .WORD N61524 .WORD N61532 .WORD N61550 .WORD N61654 .WORD N61572 .WORD N61654 .WORD N61600 .WORD N61014 .WORD N62434 .WORD N62134 .WORD N62720 .WORD N62230 .WORD N62254 .WORD N62270 .WORD N62470 .WORD N62510 N61002: JSR R4, N62722 .WORD B67334 MOV R4, SP BR N60656 N61014: MOV #154, R3 N61020: TST 44(R4) BEQ N61030 RETURN N61030: TST R2 BEQ N61044 ADD 22(R4), R1 MOV R1, 16(R4) N61044: MOV R3, 42(R4) BNE N61170 MOV R4, R3 BPL N61132 JSR R4, N62722 .WORD B67252 CALL N64416 MOV 24(R4), R0 CMP R0, #177777 BEQ N61132 MOV #16, R2 CLR (R2) MOV R2, -(R2) MOV #176650, R5 CALL N64214 MOV #415, R0 CALL N64214 N61132: MOV #4, R2 N61136: MOV 50(R3), R0 CMP R0, #160000 BCC N61164 MOV (R0), 60(R3) CMP 16(R4), R0 BEQ N61164 CLR (R0) N61164: TST (R3)+ SOB R2, N61136 N61170: MTPS #600 MOV 20(R4), R0 .WORD 34 MOV 16(R4), R0 .WORD 32 MOV R4, SP MOV (SP)+, R0 MOV (SP)+, R1 MOV (SP)+, R2 MOV (SP)+, R3 MOV (SP)+, R4 MOV (SP)+, R5 MOV (SP)+, SP TST @L70166 BNE L61240 .WORD 12 L61240: .WORD 16 N61242: JSR R4, N62722 .WORD B67437 CALL N70106 JMP N61002 N61260: MOV #600, -(SP) MOV #N60504, -(SP) RTI N61272: BPL N61306 JSR R4, N62722 .WORD L61346 JMP N60656 N61306: MOV @#11616, SP MOV (SP)+, @#L77716 MOV (SP)+, @#L77054 CLR 44(R4) MTPS #600 CLR R0 .WORD 34 MOV #100034, R0 .WORD 32 .WORD 12 L61346: .WORD 175033 HALT N61352: DEC R3 BR N61360 N61356: INC R3 N61360: TST R2 BEQ N61446 MOV R1, R0 MOV 30(R4), R5 ADD 36(R4), PC BR N61706 BR N61436 MOV #177400, R2 BIC R2, R1 SWAB R1 ASR R5 BCS N61422 SWAB R1 SWAB R2 N61422: ASL R5 CALL N64160 BIC R2, R0 BIS R1, R0 BR N61442 N61436: ADD #2, R5 N61442: CALL N64214 N61446: ADD 36(R4), PC BR N61706 ASL R3 ADD R3, 30(R4) CALL N63000 RETURN N61470: TST R2 BEQ N61512 ADD 22(R4), R1 MOV R1, 30(R4) TST 36(R4) BNE N61446 N61512: JMP N62766 N61516: MOV #177760, R3 BR N61446 N61524: MOV #20, R3 BR N61446 N61532: TST 116(R4) BNE N61512 MOV #160, 116(R4) BR N61446 N61550: MOV #2, R0 ADD 36(R4), PC BR N61564 .WORD 6300 N61564: MOV R0, 36(R4) BR N61446 N61572: MOV #2, R3 BR N61602 N61600: CLR R3 N61602: MOV 30(R4), @34(R4) ADD #2, 34(R4) BIC #30, 34(R4) MOV 32(R4), R0 TST R3 BNE N61642 MOV R0, 30(R4) BR N61512 N61642: ADD R3, R0 ADD R0, 30(R4) CLR R3 BR N61512 N61654: MOV 34(R4), R0 SUB #2, R0 BIS #40, R0 BIC #30, R0 MOV (R0), 30(R4) MOV R0, 34(R4) BR N61512 N61706: TST R2 BEQ N62006 MOV R1, -(SP) MOV #7, R2 MOV 42(R4), R0 CMP R0, R2 BNE N61734 ADD 22(R4), R1 N61734: ASL R0 MOV 40(R4), R5 ADD 4(R5), R0 ADD R4, R0 TSTB 1(R5) BPL N61770 CMP R1, #177777 BEQ N61770 ADD 22(R4), R1 N61770: MOV R1, (R0) JSR R4, N62742 .WORD B67315 MOV (SP)+, R1 CALL N63426 N62006: ADD R3, 42(R4) MOV 40(R4), R1 MOVB 1(R1), R0 BPL N62026 NEG R0 N62026: ADD R0, PC BR N62132 BR N62302 N62034: JSR R4, N62722 .WORD B67144 MOV 40(R4), R1 MOVB 2(R1), R0 MOV 42(R4), R2 BPL N62064 MOVB (R1), R2 BR N62072 N62064: CMPB R2, (R1) BLOS N62076 CLR R2 N62072: MOV R2, 42(R4) N62076: ADD R2, R0 CALL N70126 MOVB 3(R1), R0 CALL N70126 ASL R2 ADD 4(R1), R2 ADD R4, R2 MOV (R2), 32(R4) N62130: RETURN N62132: BR N62446 N62134: TST 44(R4) BNE N62130 MOV #B67157, R1 MOV PC, R3 BR N62160 .WORD 2010 .WORD 40440 HALT N62160: JSR R4, N70142 CALL N70106 COMB R0 CMP R0, #37 BNE N62202 COM R0 N62202: TST (R3)+ MOV R3, 40(R4) MOV R0, 42(R4) JSR R4, N62722 .WORD B67313 CLR 36(R4) BR N62034 N62230: TST 44(R4) BNE N62130 MOV #167164, R1 MOV PC, R3 BR N62160 .WORD L76003 .WORD 40452 .WORD 50 N62254: BPL N62130 MOV PC, R3 BR N62202 .WORD B76000 .WORD 40457 .WORD 24 N62270: MOV PC, R3 BR N62202 .WORD 1000 .WORD 40461 .WORD 26 N62302: MOV 30(R4), R5 MOV 26(R4), R1 MOV #2, R2 TST R3 BPL N62370 TST 44(R4) BNE N62336 CMP R5, @#L70200 BHI N62426 N62336: TST R5 BEQ N62356 SUB R2, R5 CALL N64160 SUB R2, R5 CMP R1, R0 BNE N62336 N62356: MOV R5, 30(R4) CALL N63000 BR N62034 N62370: BEQ N62356 ADD R2, R5 N62374: CMP R5, @#L70200 BCC N62420 N62402: CALL N64160 BEQ N62414 CMP R1, R0 BNE N62374 N62414: SUB R2, R5 BR N62356 N62420: TST 44(R4) BNE N62402 N62426: MOV @#L70200, R5 BR N62356 N62434: MOV PC, R3 BR N62202 .WORD 0 .WORD 40463 .WORD 22 N62446: BIC #1, 22(R4) CALL N63516 CALL N62774 JMP N62034 N62470: BMI N62504 MOV #4, 44(R4) EMT 50 INCB (SP) N62504: JMP N61002 N62510: BMI N62504 CLR 44(R4) EMT 50 INCB PC BR N62504 N62524: MOV R4, R3 ADD #100, R3 CLR R2 N62534: CALL N70106 COMB R0 CMP R0, #12 BEQ N62612 BHI N62632 TST @#L67642 BEQ N62632 CMP R0, #10 BCC N62534 CMP R2, #6 BEQ N62534 MOVB R0, (R3)+ INC R2 ADD #60, R0 CALL N70126 BR N62534 N62612: TST R2 BEQ N62534 CLRB -(R3) DEC R2 JSR R4, N62722 .WORD B67313 BR N62534 N62632: MOV R0, -(SP) CLR R1 SUB R2, R3 MOV R2, -(SP) BEQ N62666 JSR R4, N62742 .WORD B67313 N62652: MOVB (R3)+, R0 ASL R1 ASL R1 ASL R1 ADD R0, R1 SOB R2, N62652 N62666: MOV (SP)+, R2 MOV (SP)+, R0 CLR R3 CMP R0, #45 BCS N62710 MOV #24, R0 BR N62714 N62710: SUB #13, R0 N62714: ASL R0 TST R4 N62720: RETURN N62722: MOV (R4)+, R1 JMP N70142 N62730: MOV #100, R1 ADD (SP), R1 JMP N70142 N62742: MOV R1, -(SP) MOV R2, R0 MOV (R4)+, R1 N62750: JSR R4, N70142 SOB R0, N62750 MOV (SP)+, R1 RTS R4 N62762: CALL N63516 N62766: N62773 =: .+5 MOV #2, 36(R4) N62774: CLR 116(R4) N63000: JSR R4, N62722 .WORD B67147 MOV R3, -(SP) MOV #7, R3 MOV #2, -(SP) MOV #2, -(SP) MOV #177762, -(SP) ADD 36(R4), PC BR N63050 BR N63050 ASR 2(SP) ASR (SP) BR N63056 N63050: BIC #1, 30(R4) N63056: ADD 30(R4), (SP) BR N63100 N63064: CALL N64150 N63070: CALL N64150 ADD 2(SP), (SP) N63100: MOV (SP), R1 SUB 22(R4), R1 CALL N63410 MOV #20057, 106(R4) ADD 116(R4), PC MOV (SP), R5 CALL N64160 MOV R0, R1 MOV R0, -(SP) ADD 36(R4), PC BR N63210 BR N63210 ASR R5 BCC N63154 SWAB R1 N63154: MOV R1, (SP) CALL N63364 JSR R4, N62722 .WORD B67331 MOV #40, R0 CMPB (SP), R0 BCS N63202 MOV (SP), R0 N63202: CALL N70126 BR N63220 N63210: MOV #110, R0 CALL N63422 N63220: MOV (SP)+, R0 N63222: SOB R3, N63070 DEC 4(SP) BMI N63260 BEQ N63240 INC R3 BR N63064 N63240: MOV R0, 32(R4) JSR R4, N62722 .WORD B67323 MOV #13, R3 BR N63070 N63260: ADD #6, SP MOV (SP)+, R3 JSR R4, N62722 .WORD B67171 RETURN N63276: CMP (SP)+, #161446 BLOS N63324 CLR 110(R4) JSR R4, N62730 JSR R4, N62722 .WORD B67325 BR N63222 N63324: MOV 36(R4), -(SP) MOV #167337, 36(R4) CALL N64032 MOV (SP)+, 36(R4) JMP @#N61446 CLR -(SP) MOV R3, -(SP) MOV @#L70160, R3 BR N63376 N63364: CLR -(SP) MOV R3, -(SP) MOV #110, R3 ADD R4, R3 N63376: CLR R0 SWAB R1 MOV #3, R2 BR N63456 N63410: MOV @#L70160, R0 MOV #10, -(SP) BR N63434 N63422: ADD R4, R0 BR N63432 N63426: MOV @#L70160, R0 N63432: CLR -(SP) N63434: MOV R3, -(SP) MOV R0, R3 N63440: CLR R0 N63442: MOV #6, R2 BR N63462 N63450: CLR R0 ROL R1 ROL R0 N63456: ROL R1 ROL R0 N63462: ROL R1 ROL R0 ADD #60, R0 MOVB R0, (R3)+ SOB R2, N63450 CLRB (R3) MOV (SP)+, R3 ADD (SP)+, PC MOV @#L70160, R1 JSR R4, N70142 RETURN N63516: CLR -(SP) TST 44(R4) BNE N63676 MOV #163736, R0 MOV #100, R1 ADD R4, R1 MOV #4, R2 N63544: MOV (R0)+, (R1)+ SOB R2, N63544 MOV R4, R3 MOV #10, R0 SUB 22(R4), 16(R4) CALL N63746 ADD 22(R4), 16(R4) MOVB #123, 105(R4) INC R0 CALL N63746 MOV #30124, 104(R4) INCB 102(R4) ADD #26, R3 MOV #4, R0 MOV 22(R4), (SP) CALL N63746 TST R4 BPL N63676 JSR R4, N62722 .WORD B67216 MOV 24(R4), R1 CMP R1, #177777 BEQ N63672 SUB (SP), R1 N63672: CALL N63426 N63676: JSR R4, N62722 .WORD B67234 MOV 26(R4), R1 CALL N63426 JSR R4, N62722 .WORD B67200 MOV 22(R4), R1 CALL N63426 TST (SP)+ RETURN .ASCIZ |Y 7R0=| N63746: MOV R0, -(SP) N63750: MOV (R3)+, R1 MOV 4(SP), R0 BEQ N63770 CMP R1, #177777 BEQ N63770 SUB R0, R1 N63770: MOV #107, R0 CALL N63422 TST R4 BPL N64012 N64004: TST @#L60002 BNE N64004 N64012: INCB 102(R4) INCB 105(R4) DEC (SP) BNE N63750 MOV (SP)+, R0 RETURN N64032: TST 30(R4) BNE N64046 MOV 16(R4), 30(R4) N64046: MOV @L70162, R2 BPL N64146 JSR R4, N62722 .WORD B67263 MOV R2, R1 JSR R4, N70142 JSR R4, N62722 .WORD B67274 CMP R2, #167375 BNE N64140 MOV 30(R4), R1 CALL N63426 JSR R4, N62722 .WORD B67317 MOV 30(R4), R5 CALL N64160 MOV R0, R1 CALL N63426 N64140: JSR R4, N62722 .WORD B67257 N64146: RETURN N64150: JSR R4, N62722 .WORD B67310 RETURN N64160: ADD 44(R4), PC .WORD 21 RETURN MOV R5, R0 CLC ROR R0 MOV R0, @#L77010 MOV @#L77014, R0 ADD #2, R5 RETURN N64214: ADD 44(R4), PC .WORD 31 RETURN CLC ROR R5 DEC R5 MOV R5, @#L77010 MOV R0, @#L77014 ASL R5 RETURN N64246: COM 40(R4) N64252: TST @#L67640 BEQ N64252 MOV @#L60270, R2 BEQ N64276 CMP R2, #160000 BCS N64362 CALL (R2) N64276: MOV #163276, @#L60004 MOV #165544, R0 MOV #1000, R1 MOV #571, R2 N64320: MOV (R0)+, (R1)+ SOB R2, N64320 JSR R5, N64336 .WORD N64440 BR N64440 .WORD 0 N64336: MOV #156700, R0 N64342: MOV (R5)+, R1 BEQ N64356 MOV (R5)+, R2 N64350: MOV (R1)+, (R0)+ SOB R2, N64350 BR N64342 N64356: MOV #156700, R2 N64362: CALL N64416 MOV #177562, R5 .WORD 21 MOV #200, R0 .WORD 34 MOV R2, R0 .WORD 32 MOV #1000, SP MOV R3, R0 .WORD 12 N64416: INC @#L67642 JSR R4, N62722 .WORD B67131 N64430: TST @#L67642 BNE N64430 RETURN N64440: MOV L64516, R0 BPL N64452 JMP N65124 N64452: MOV #157002, R1 CALL N64500 ASL R0 MOV 156760(R0), R1 CALL N64500 JMP @#1000 N64500: TSTB @#L77564 BPL N64500 MOVB (R1)+, @#L77566 BNE N64500 RETURN L64516: .WORD 000002 .WORD B57063 .WORD B57273 .WORD B57215 .WORD B57145 .WORD B57145 .WORD B57113 .WORD B57113 .WORD B57113 .WORD B57113 .ASCIZ |(C) 1993 Ç., "úÅÌÁËÓ+", Ô.534-16-81, ÔÅÒÍÉÎÁÌ | .ASCIZ |úåìáëó-ðòéíá, V 4.2 | .ASCIZ |úåìáëó-óåëõîäá, V 4.2 | .ASCIZ |úåìáëó-óåëõîäá, V 4.2 /PICK||x4||[?10l| .ASCIZ |úåìáëó-óåëõîäá, V 4.2 /PC Term||x2||r||[?11l| .ASCIZ |úåìáëó-óåëõîäá, V 4.2 /ëïé7 0/1||t0A! || !||t1A! || !||x6| .EVEN N65124: JSR R5, N65472 HALT .WORD N57600 CALL N65374 CALL N65174 CALL N65160 MOV R1, R0 CALL N65160 BR N65124 N65160: TSTB @#L77564 BPL N65160 MOVB R0, @#L77566 RETURN N65174: MOV #N57626, @#100 TST @#B76572 MTPS #0 CLR R1 MOV #62, (R1) CLR R2 CLR R3 N65224: TST (R1) BEQ N65274 TSTB @#L76574 BPL N65224 MOVB R3, @#L76576 N65242: TST (R1) BEQ N65274 TSTB @#B76570 BPL N65242 CMPB @#B76572, R3 BEQ N65266 BIS #4, R0 N65266: INC R2 INC R3 BR N65224 N65274: TST R2 BEQ N65326 MOV #157572, R1 N65304: MOV (R1)+, R3 BEQ N65326 CMP R2, R3 BHI N65304 SUB #157572, R1 N65320: MTPS #200 RETURN N65326: CLR R1 BR N65320 .WORD 5 .WORD 7 .WORD 12 .WORD 17 .WORD 24 .WORD 36 .WORD 74 .WORD 170 .WORD 360 .WORD 740 .WORD 1700 .WORD 3600 .WORD 13200 .WORD 0 .WORD 5337 .WORD 0 .WORD 2 N65374: MOV #176640, R1 MOV #176642, R3 BIC #100000, N65444 BR N65426 N65414: MOV #177010, R1 MOV #177012, R3 CLR R0 N65426: MOV R5, -(SP) MOV #100000, R2 MOV R2, (R1) CLR R5 N65440: MOV (R3), R4 N65442: MOV R5, (R3) N65444: CMPB R5, (R3) BEQ N65454 BIS #2, R0 N65454: COM R5 BMI N65442 MOV R4, (R3) INC (R1) SOB R2, N65440 MOV (SP)+, R5 RETURN N65472: MOV (R5)+, R1 MOV (R5)+, R2 SUB R1, R2 ROR R2 CLR R0 N65504: MOV (R1), R4 CLR R3 N65510: MOV R3, (R1) CMP R3, (R1) BEQ N65522 MOV #1, R0 N65522: COM R3 BMI N65510 BNE N65536 MOV #52525, R3 BR N65510 N65536: MOV R4, (R1)+ SOB R2, N65504 RTS R5 MOV #776, SP MOV #6, @#4 MOV #2, @#6 MOV #12, @#10 MOV #2, @#12 MOV #102, @#100 MOV #2, @#102 BR N65714 .WORD 200 L65620: .WORD L77560 L65622: .WORD L77562 L65624: .WORD L77564 L65626: .WORD L77566 .WORD 176664 .WORD 176666 L65634: .WORD L77564 L65636: .WORD L77566 L65640: .WORD 000060 L65642: .WORD B76570 L65644: .WORD B76572 L65646: .WORD L76574 L65650: .WORD L76576 L65652: .WORD 000370 L65654: .WORD 002346 L65656: .WORD 000000 L65660: .WORD 000000 L65662: .WORD 000000 L65664: .WORD 000000 L65666: .WORD 000000 .WORD 0 .WORD 0 L65674: .WORD 002346 L65676: .WORD 002346 L65700: .WORD 000000 L65702: .WORD 000000 L65704: .WORD 000000 L65706: .WORD 000000 L65710: .WORD 000000 L65712: .WORD 000000 N65714: MOV #L57776, R0 MOV R0, L65662 SUB L65654, R0 ASR R0 BIC #100001, R0 CLC MOV R0, R3 SUB #200, R3 MOV R3, R2 MOV #200, R3 CLC ADD L65654, R0 MOV R0, L65656 MOV R0, L65660 MOV R0, L65702 MOV R0, L65704 CLR @L65620 CLR @L65624 CLR @L65642 CLR @L65646 CLR L65700 CLR L65706 MOV L65640, R0 MOV #2054, (R0)+ MOV #340, (R0) MOV L65652, R0 MOV #2126, (R0)+ MOV #340, (R0)+ MOV #1570, (R0)+ MOV #340, (R0) MOV #1552, @#100 MOV #340, @#102 MOV #460, R0 MOV #1410, (R0)+ MOV #340, (R0) BIS #100, @L65620 BIS #100, @L65642 BIS #100, @#L76660 MTPS #0 JMP N66510 MOV R5, -(SP) CLR @#L76660 MOVB @#L76662, R5 CMPB R5, #20 BEQ N66206 MOV (SP)+, R5 MOV #100, @#L76660 RTI N66206: MOV (SP)+, R5 BIS #100, @#L76660 MOV #1676, (SP) CLR 2(SP) RTI N66230: MOVB R5, L66313 MOV #1546, R5 N66240: TSTB N63440 BPL N66240 MOVB R5, N63442 SWAB R5 N66254: TSTB N63440 BPL N66254 MOVB R5, N63442 MOV #2, R5 N66272: TSTB N63440 BPL N66272 MOVB #1, N63442 SOB R5, N66272 RETURN .BYTE 0 L66313: .BYTE 1 .WORD 41 TST L66332 BEQ N66330 DEC L66332 N66330: RTI L66332: .WORD 000000 TST L65700 BEQ N66376 DEC L65700 MOVB @L65676, @L65650 INC L65676 CMP L65676, L65660 BCS N66376 MOV L65654, L65676 N66376: RTI N66400: TST @#500 BNE N66424 MOV #21, L65710 MOV #23, L65712 RETURN N66424: MOV #145, L65710 MOV #147, L65712 RETURN MOV #1, R5 CALL N66230 MOV #5, L66332 MOV #1, @#L76574 N66466: TST L66332 BNE N66466 CLR @#L76574 MOV #0, R5 CALL N66230 N66510: CALL N66400 TST L65706 BEQ N66510 TSTB @L65624 BMI N66534 JMP N66510 N66534: TST L65666 BEQ N66554 CMP L65706, R3 BCC N66554 CALL N67050 N66554: DEC L65706 MOVB @L65704, @L65626 INC L65704 CMP L65704, L65662 BCC N66606 JMP N66510 N66606: MOV L65656, L65704 JMP N66510 MOVB @L65622, @L65674 INC L65700 INC L65674 CMP L65674, L65660 BCS N66654 MOV L65654, L65674 N66654: BIC #100, @L65646 BIS #100, @L65646 RTI MOVB @L65644, @L65702 INC L65706 CMP L65706, R2 BCS N66716 CALL N66774 N66716: INC L65702 CMP L65702, L65662 BCS N66740 MOV L65656, L65702 N66740: RTI TST L65664 BNE N66772 N66750: TSTB @L65634 BPL N66750 MOVB L65712, @L65636 MOV #1, L65664 N66772: RETURN N66774: TST L65666 BNE N67024 N67002: TSTB @L65646 BPL N67002 MOVB L65712, @L65650 MOV #1, L65666 N67024: RETURN N67026: TSTB @L65634 BPL N67026 MOVB L65710, @L65636 CLR L65664 RETURN N67050: TSTB @L65646 BPL N67050 MOVB L65710, @L65650 CLR L65666 RETURN N67072: TSTB @L65634 BPL N67072 MOVB (R5)+, @L65636 BNE N67072 RETURN .WORD 7 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 177777 B67126: .ASCIZ |ù| B67131: .ASCIZ |ÿü||ÿù| B67140: .ASCIZ |ü| B67144: .ASCIZ |Y| B67147: .ASCIZ |q||Y | B67157: .ASCIZ |Y 5| .ASCIZ |Y*5| B67171: .ASCIZ |Y(/||q| B67200: .ASCIZ |Y31âÁÚÁ: | B67216: .ASCIZ |Y/1ìÏ×ÕÛËÁ: | B67234: .ASCIZ |Y11íÏÄÅÌØ: | B67252: .ASCII .ASCII |i| .ASCII |G| .ASCII .ASCII |!| B67257: .ASCII .ASCIZ |i| B67263: .ASCIZ |iG||*** | B67274: .ASCIZ | ***||K | B67310: .ASCIZ B67313: .ASCII | | B67315: .ASCIZ B67317: .ASCIZ |/ | .BYTE 0 B67323: .ASCII | | B67325: .ASCII | | B67331: .ASCIZ | | B67334: .ASCIZ |!| .ASCIZ |úá÷éóáîéå| .ASCIZ |ä÷ïêîïå úá÷éóáîéå| .ASCIZ |óôïð| .ASCIZ |úá÷éóáîéå ðòé ðòéåíå á.÷.ð.| B67437: .ASCII |@||Y (||dð õ ì ø ô||d||ÁËÔÉ×ÎÙÅ ËÌÁ×ÉÛÉ:||- 0|<226> .ASCII |7,úâ,|<234>|,|<235>|,|<236>|,|<237>|- îò/(|<234>|,|<235>|,|<236>|,|<237>|),õðò/(|<234>|,|<235>|,|<236> .ASCIZ |,|<237>|)||- R,T,L,M,B,éóð,ðòïâåì,óâòïó| .EVEN L67640: .WORD 000000 L67642: .WORD 000001 L67644: .WORD 000001 START: MOV @#L70156, R4 CLR R0 MOV R4, SP BMI N67756 JSR R5, N71472 .WORD 0 .WORD 200 MOV #46, @#272 MOV #40, @#L77716 CALL N70370 MOV #70047, @#L77010 MOV 46(R4), @#L77014 CLR @#L77716 MOV #10, R2 N67734: SOB R2, N67734 MOV #100000, @#L77716 CALL N71454 CALL N70670 BR N67756 N67756: CALL N70010 MOV SP, R4 BPL N70002 MOV #102, @#100 MOV #2, @#102 N70002: CALL N60200 BR N70204 N70010: MOV (SP), R4 MOV @#L70174, R5 MOV @#L70176, R3 MOV R5, R1 MOV R3, R2 N70026: MOV R1, (R1)+ SOB R2, N70026 MOV R5, R1 MOV R3, R2 N70036: CMP R1, (R1)+ BNE N70076 SOB R2, N70036 MOV R3, R2 N70046: COM -(R1) SOB R2, N70046 MOV R3, R2 COM R5 MOV #177776, R3 N70062: CMP R5, (R1) BNE N70076 ADD R3, R5 CLR (R1)+ SOB R2, N70062 BR N70102 N70076: BIS #2, R0 N70102: MOV R4, (SP) RETURN N70106: EMT 22 RETURN .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 N70126: EMT 42 RETURN .WORD 0 .WORD 0 .WORD 0 .WORD 0 N70142: EMT 46 RTS R4 .WORD 0 .WORD 0 .WORD 0 .WORD 0 L70156: .WORD 000460 L70160: .WORD 000560 L70162: .WORD 000516 L70164: .WORD 000510 L70166: .WORD 000522 L70170: .WORD 000400 L70172: .WORD 077700 L70174: .WORD 000400 L70176: .WORD 037600 L70200: .WORD 177000 .WORD 414 N70204: MOV #1400, SP ASLB R0 ASLB R0 ASLB R0 MOV R0, -(SP) CALL N70762 MOV (SP)+, R2 BIT #10, @#L77066 BNE N70244 BIS #4, R2 BR N70260 N70244: MOV @#L77060, R0 CMP R0, #3 BHI N70260 BIS R0, R2 N70260: MOV R2, @#11414 BEQ N70274 BIS #4, @#11512 N70274: BIT #20, @#L77101 BEQ N70320 BIS #10, @#11512 MOV #177777, R0 BR N70334 N70320: MOV @#L77704, R0 ASL R0 SWAB R0 BIC #177760, R0 N70334: MOV #72247, @#L77010 MOV R0, @#L77014 BNE N70356 MOV #100, @#L77700 N70356: MOV @#25644, @#272 JMP N72164 N70370: JSR R5, N70466 .WORD 70000 .WORD 160000 .WORD 4043 JSR R5, N70466 .WORD 74043 .WORD 170546 .WORD 44 MOV #170446, R1 N70420: MOV (R1)+, @#L77010 MOV #600, @#L77014 TST (R1) BNE N70420 MOV @#L77716, @#L77014 RETURN .WORD 70001 .WORD 70003 .WORD 70005 .WORD 70075 .WORD 70077 .WORD 70137 .WORD 74107 .WORD 0 N70466: MOV (R5)+, @#L77010 MOV (R5)+, R1 MOV (R5), R2 N70476: MOV (R1)+, @#L77014 INC @#L77010 SOB R2, N70476 CMP -(R5), -(R5) MOV (R5)+, @#L77010 MOV (R5)+, R1 MOV (R5)+, R2 N70522: CMP (R1)+, @#L77014 BNE N70540 INC @#L77010 SOB R2, N70522 RTS R5 N70540: BIS #4, R0 RTS R5 N70546: MOV @#L60000, R0 BEQ N70546 BIC #177400, R0 CLR @#L60000 RETURN N70566: TST @#L60002 BNE N70566 MOVB R0, @#L60002 RETURN N70602: TST @#L60002 BNE N70602 MOV R1, @#L60002 RTS R4 .WORD L60050 .WORD L60150 .WORD L60106 .WORD L60100 .WORD L60112 .WORD 200 .WORD 1000 .WORD 0 .WORD 70000 .WORD L60000 .WORD L60014 MOV #177570, R5 .WORD 31 JMP @#N60504 N70656: CALL N70670 MOV R0, 2(SP) RETURN N70670: MOV @#L77054, -(SP) CALL N71454 MOV #4, R5 MOV #176776, R1 MOV #7377, R2 CLR R0 N70716: CLR R3 N70720: ADD -(R1), R3 ADC R3 SOB R2, N70720 ASL R5 CMP R3, L76766(R5) BEQ N70740 INCB R0 N70740: ASR R5 MOV #10000, R2 ASLB R0 SOB R5, N70716 SWAB R0 MOV (SP)+, @#L77054 RETURN N70762: MOV #207, @#0 MOV #207, @#240 MOV #200, R0 MOV #172136, @#4 MOV R0, @#6 MOV #172146, @#10 MOV R0, @#12 MOV #172156, @#24 MOV R0, @#26 MOV #172362, @#30 MOV #172442, @#34 MOV R0, @#36 MOV #172452, @#100 MOV R0, @#102 MOV #310, @#304 MOV R0, @#306 MOV #2, @#310 MOV #150336, @#340 MOV R0, @#342 BIS #4, @#L77066 CLR @#36550 MOV #174274, @#314 MOV R0, @#316 JSR R5, N71506 .WORD 172074 MOV (R4), (SP)+ .WORD 21 CALL N14314 CALL N00104 CALL N75276 CALL N74340 MOV SP, @#11410 MOV #171214, @#4 MOV #177777, @#11412 MOV #172136, @#4 CALL N71454 MOV #73720, @#L77010 MOV @#11412, @#L77014 CALL N71400 MOV #2, @#11570 MOV #2, @#11754 BIC #1400, @#L77054 CALL N50322 N71302: MOV #36744, R0 CLR (R0)+ CLR (R0)+ MOV #41020, (R0) SUB @#77776, (R0) ADD (R0)+, R0 INC (R0) MOV @#77776, 4(R0) RETURN MOV #70134, @#L77010 MOV #40, R0 MOV (R0), @#L77014 BNE N71360 COM R0 N71360: CLR @#40 TST @#42 BEQ N71376 INC @#11510 N71376: RETURN N71400: MOV @#L77102, R0 BIC #177760, R0 MOVB L71434(R0), @#L77704 BIS #400, @#L77700 BIC #400, @#L77700 RETURN L71434: .WORD 7011 .WORD 6017 .WORD 1015 .WORD 3 .WORD 3001 .WORD 2007 .WORD 7405 .WORD 7417 N71454: BIC #37, @#L77054 BIS #1, @#L77054 RETURN N71472: CLR R0 MOV (R5)+, R1 MOV (R5)+, R2 N71500: MOV R0, (R1)+ SOB R2, N71500 RTS R5 N71506: MOV (R5)+, R0 MOV (R5)+, R1 MOV (R5)+, R2 N71514: MOV (R0)+, (R1)+ SOB R2, N71514 RTS R5 N71522: CALL N32070 EMT 44 .WORD 171644 MOV @#11414, R2 MOV #L71614, R3 BR N71546 N71544: EMT 46 N71546: MOV (R3)+, R1 ASRB R2 BCS N71544 BNE N71546 MOV #L71630, R3 MOV (R3)+, R1 SWAB R2 BNE N71544 MOV #17, R1 N71574: SOB R0, N71574 SOB R1, N71574 CALL N32134 BIC #4, @#11512 RETURN L71614: .WORD L72053 .WORD B71700 .WORD B71722 .WORD L72053 .WORD B71744 .WORD B71766 L71630: .WORD B72035 .WORD B72054 .WORD B72057 .WORD B72062 .WORD B72065 .WORD B72070 .ASCIZ | ||dóôáòôï÷ùê ôåóô||d| B71700: .ASCIZ |- ÏÛÉÂËÁ ïúõ ãð| B71722: .ASCIZ |- ÎÅ ÚÁÐÕÝÅÎ ãð| B71744: .ASCIZ |- ÏÛÉÂËÁ ïúõ ðð| B71766: .ASCIZ |- ÏÛÉÂËÁ ÐÒÉ ÚÁÇÒÕÚËÅ ÐÕÌØÔ.ÍÏÎÉÔÏÒÁ| B72035: .ASCII |- ÏÛÉÂËÁ ðúõ | .ASCII | | L72053: .BYTE 0 B72054: .ASCIZ |0 | B72057: .ASCIZ |1 | B72062: .ASCIZ |2 | B72065: .ASCIZ |3 | B72070: .ASCIZ |4 | .EVEN .BYTE 0 .ASCIZ |*** óÂÏÊ ðð ÐÏ ×ÅËÔÏÒÕ | .EVEN .WORD 25040 .WORD 25052 .WORD 45433 .WORD 7 .WORD 12737 .WORD 32040 .WORD 11456 .WORD 407 .WORD 12737 .WORD 30061 .WORD 11456 .WORD 403 .WORD 12737 .WORD 32062 .WORD 11456 N72164: MOV #1400, SP JSR R5, N71472 .WORD 11524 .WORD 15 MOV SP, @#11522 MOV #172306, @#11554 CLR @#25716 MTPS #0 TST @#11456 BEQ N72240 EMT 54 MOV (R4), (SP)+ CLR @#11456 N72240: MOV @#26052, R5 N72244: MOV #11472, R0 N72250: TST (R0)+ BEQ N72250 MOV R0, @#11470 MOV 30(R0), R1 BNE N72300 CALL @N60622(R0) BR N72244 BR N72240 BR N72250 N72300: CLR 30(R0) JMP (R1) N72306: MOV #N72306, @#11554 BR N72244 .WORD N01034 .WORD N50432 .WORD N16626 .WORD N45330 .WORD N47762 .WORD N47414 .WORD N46116 .WORD N45514 .WORD N45532 .WORD N47556 .WORD N46032 .WORD N50210 N72346: MOV @#11470, R0 MOV (SP)+, 30(R0) MTPS (SP)+ BR N72244 MOV R5, -(SP) MOV R4, -(SP) MOV R3, -(SP) MOV R2, -(SP) MOV R1, -(SP) MOV R0, -(SP) N72376: INC @#11612 MOV @#26052, R5 MOV 14(SP), R4 MOV -(R4), R4 CALL @54000(R4) DEC @#11612 MOV (SP)+, R0 MOV (SP)+, R1 MOV (SP)+, R2 MOV (SP)+, R3 MOV (SP)+, R4 MOV (SP)+, R5 RTI MOV (SP), R0 MOV -(R0), R0 JMP @53560(R0) TST @#25634 BEQ N72744 BPL N72612 MOV R0, -(SP) MOV R1, -(SP) MOV @#25640, R1 NEG R1 SUB R1, @#25634 BLE N72516 ADD R1, @#25634 MOV @#25634, R1 CLR @#25634 N72516: NEG R1 ASL R1 ASL R1 MOV @25646, R0 SUB R1, R0 CMP R0, @#25650 BCC N72544 ADD @#25660, R0 N72544: MOV R0, @25646 MOV @#25652, R0 MOV R0, 177776(R0) CMP R0, @#25656 BNE N72574 MOV @#25650, @25654 N72574: SUB R1, R0 CMP R0, @#25650 BHI N72726 ADD @#25660, R0 BR N72726 N72612: MOV R0, -(SP) MOV R1, -(SP) MOV @#25640, R1 SUB R1, @#25634 BPL N72644 ADD R1, @#25634 MOV @#25634, R1 CLR @#25634 N72644: ASL R1 ASL R1 MOV @25646, R0 ADD R1, R0 CMP R0, @#25656 BCS N72670 SUB @#25660, R0 N72670: MOV R0, @25646 MOV @#25652, R0 MOV R0, 177776(R0) ADD R1, R0 CMP R0, @#25656 BLOS N72726 MOV @#25650, @25654 SUB @#25660, R0 N72726: MOV R0, @#25652 MOV #10226, -(R0) MOV (SP)+, R1 MOV (SP)+, R0 BR N73234 N72744: ADD @#25600, PC BR N73014 BR N73032 DECB @#25610 BGT N73234 SWAB @#25610 BGT N73212 MOV @#25626, @#25610 MOVB @#25625, @25622 ADD @#25604, @#11502 BR N73234 N73014: MOVB #177, @25620 MOV #264, @#25600 BR N73234 N73032: MOV R0, -(SP) MOV R5, -(SP) BIC #1, @25612 BIC #1, @25614 MOV @#26052, R5 MOV 30(R5), R5 MOV R5, R0 ADD #54, R5 ADD @#25602, PC CMP (R0)+, -(R5) N73076: BIS #1, (R0) MOV R0, @#25612 BIS #1, (R5) MOV R5, @#25614 MOV @#26052, R5 MOV (R5), R0 SUB @30(R5), R0 ADD @#25630, PC ASL R0 MOV R0, @#25616 MOV #4, @#25600 MOV @#25626, @#25610 MOVB #1, @#25610 MOV (SP)+, R5 MOV (SP)+, R0 BR N73234 MOV R5, R0 MOV -(R0), R5 BIT #2, R5 BNE N73206 TST (R5)+ N73206: BR N73076 BR N73076 N73212: MOVB @#25624, @25622 MOVB @#25616, @25620 ADD @#25604, @#11502 N73234: DEC @#11420 BNE N73250 BIC #17600, @#L77716 N73250: TST @#11742 BEQ N73312 DECB @#11742 BNE N73312 MOV @#11746, @#11742 TSTB @#11472 BNE N73312 INC @#11472 JSR R5, N73672 .WORD 1 N73312: TST @#26030 BEQ N73360 DEC @#26030 BNE N73360 COM @#26040 BEQ N73344 BIS #7400, @26032 BR N73352 N73344: MOV @#26034, @26032 N73352: MOV #20, @#26030 N73360: TST @#11556 BEQ N73436 DEC @#11556 BNE N73436 MOV #173436, @#100 CALL @11564 MOV #172452, @#100 TST @#11560 BEQ N73430 DEC @#11560 BEQ N73436 N73430: MOV @#11562, @#11556 N73436: RTI N73440: ADD @#11760, PC MOV R0, -(SP) TST @#11764 BNE N73626 MOVB @#L77702, R0 BMI N73504 JSR R5, N73700 CMPB R0, #4 BEQ N73534 CMP @#11662, #3240 BCC N73530 N73504: INC @#11472 CMP @#11662, #3300 BCC N73530 MOVB R0, @11662 INC @#11662 N73530: MOV (SP)+, R0 RTI N73534: TST @#11704 BEQ N73504 MOV #20, R0 MOV R0, @#2 TST @#11512 BNE N73530 TST @#11520 BMI N73600 BIS R0, @#L77716 BIC R0, @#L77716 BR N73530 N73600: CLR @#11520 JMP N72164 MOVB @#L77702, @#L77070 BMI N73624 JSR R5, N73700 N73624: RTI N73626: MOVB @#L77702, R0 BMI N73530 CMPB R0, #113 BNE N73652 COM @#11764 BPL N73504 BR N73530 N73652: MOVB #207, @11662 INC @#11662 CLR @#11764 BR N73504 N73672: MOV (R5)+, @#11420 BR N73706 N73700: MOV #2, @#11420 N73706: BIS @#11750, @#L77716 RTS R5 N73716: MOV #2, @#11572 ADD @#11570, PC BR N73742 BIT #10, @#L77076 BEQ N74074 N73742: MOV R4, -(SP) MOV R5, -(SP) MOV @#11670, R5 DEC @#11674 BMI N74076 TSTB 1(R5) BEQ N74044 ADD @#11570, PC BR N74014 MOVB @0(R5), R4 CALL N74110 MOV #177, R4 N74010: SOB R4, N74010 BR N74020 N74014: MOVB @0(R5), R0 N74020: INC (R5) TSTB @0(R5) BNE N74102 TST (R5)+ BR N74036 N74034: MOV (R5)+, R0 N74036: BIC #177400, R0 BR N74060 N74044: ADD @#11570, PC BR N74034 MOV (R5)+, R4 CALL N74110 N74060: BIC #200, R5 MOV R5, @#11670 N74070: MOV (SP)+, R5 MOV (SP)+, R4 N74074: RTI N74076: CLR @#11572 N74102: INC @#11674 BR N74070 N74110: BIC #177400, R4 MOV R4, @#L77070 ADD @#11756, PC BR N74154 MOVB R4, @36544 INC @#36544 CMP @#36544, @#36542 BCS N74154 MOV @#36540, @#36544 N74154: RETURN N74156: MOV #2, @#11574 BIT #10, @#L77066 BNE N74222 RTI N74176: MOV #2, @#11574 BIT #10, @#L77066 BEQ N74264 ADD @#11570, PC BR N74266 N74222: CMP @#11476, #777 BCC N74266 MOVB @#L77060, @25574 BNE N74246 CALL N74276 N74246: INC @#25574 BIC #1000, @#25574 INC @#11476 N74264: RTI N74266: CLR @#11574 RTI RTI N74276: MOV @#L77010, -(SP) MOV #73722, @#L77010 CMP @#L77014, #125252 BNE N74332 CLR @#L77014 BIS #1, @#11512 N74332: MOV (SP)+, @#L77010 RETURN N74340: MOV #174420, @#330 MOV #200, @#332 MOV #174, @#L77103 BIC #200, @#L77102 BIS #20, @#L77102 BIC #20, @#L77102 BIS #2, @#L77066 RETURN N74414: MOV PC, -(SP) BR N74422 CLR -(SP) N74422: MOV R0, -(SP) MOV #77, R0 N74430: BIT #200, @#L77101 BNE N74444 SOB R0, N74430 BR N74532 N74444: MOV @#L77062, R0 CMP @#26046, #1 BEQ N74462 COM R0 N74462: MOV R0, @#L77100 BIS #200, @#L77102 TST @#26046 BEQ N74512 N74502: BIT #200, @#L77101 BNE N74502 N74512: BIC #200, @#L77102 N74520: MOV (SP)+, R0 TST (SP)+ BNE N74530 RTI N74530: RETURN N74532: JSR R5, @#N50260 .WORD 1 .WORD N74414 BR N74520 N74544: MOV PC, -(SP) BR N74552 N74550: CLR -(SP) N74552: INC @#26044 MOV @#25714, -(SP) CLR @#25714 EMT 50 .WORD L75210 N74572: CALL N16432 CMPB R0, #33 BEQ N74612 N74604: CALL N75024 BR N74572 N74612: CALL N16432 CMPB R0, #370 BEQ N74772 MOV @#25720, R1 CMPB R0, 175011(R1) BEQ N74670 CMP R1, #2 BNE N74652 CMPB R0, #73 BEQ N74772 N74652: MOV R0, R1 MOV #33, R0 CALL N75024 MOV R1, R0 BR N74604 N74670: CMPB R0, #133 BNE N74772 MOV #25724, -(SP) N74702: CALL N16432 MOVB R0, @0(SP) INC (SP) CMPB R0, #100 BCS N74702 CLRB @(SP)+ JSR R5, N21126 .WORD 25724 .WORD L75016 .WORD L03316 JSR R5, N21126 .WORD 25724 .WORD L75021 BCC N74772 MOV #25722, R1 MOV #55433, (R1) N74760: MOVB (R1)+, R0 BEQ N74572 CALL N75024 BR N74760 N74772: MOV (SP)+, @#25714 TST (SP)+ CLR @#26044 EMT 50 .WORD L75254 RETURN .WORD 54133 .WORD 35541 L75016: .WORD 64465 .BYTE 0 L75021: .BYTE 64 .WORD 151 N75024: MOV R1, -(SP) MOV R0, -(SP) N75030: TRAP 0 TST @#26044 BMI N75202 BIT #10, @#L77101 BEQ N75056 EMT 50 .WORD 175232 BR N75062 N75056: EMT 50 .WORD 175210 N75062: MOV #77, R0 N75066: BIT #200, @#L77101 BNE N75102 SOB R0, N75066 BR N75030 N75102: CMP @#26046, #1 BEQ N75114 COM (SP) N75114: MOV (SP), @#L77100 BIS #200, @#L77102 TST @#26046 BEQ N75144 N75134: BIT #200, @#L77101 BNE N75134 N75144: BIC #200, @#L77102 TST 10(SP) BEQ N75202 MOV (SP), R0 COM R0 CMP R0, #33 BNE N75176 MOV #44, R0 N75176: CALL N16734 N75202: MOV (SP)+, R0 MOV (SP)+, R1 RETURN L75210: .BYTE 0 .ASCIZ |òÅÖÉÍ ÐÅÞÁÔÉ | .BYTE 0 .ASCIZ |ðÒÉÎÔÅÒ ÎÅ ÇÏÔÏ×| L75254: .BYTE 0 .ASCIZ | | N75276: CALL N05404 MOV SP, R0 CALL N01622 MOV #405, @#11746 JSR R5, N03014 .WORD 175514 CALL N20700 COM @#11712 CALL N10234 MOV #1, R0 CALL N34606 MOV #1, R0 CALL N30522 MOV 40(R5), @#26032 MOV @40(R5), @#26034 N75374: RETURN N75376: TST @#11512 BNE N75374 TST @#25720 BEQ N75374 MOV R1, -(SP) MOV R2, -(SP) CALL N25174 COM @#26024 BNE N75436 CALL N75450 BR N75442 N75436: CALL N75472 N75442: MOV (SP)+, R2 MOV (SP)+, R1 RETURN N75450: TST @#11512 BNE N75470 JSR R5, N03014 .WORD 176174 EMT 50 .WORD B05252 N75470: RETURN N75472: TST @#11512 BNE N75512 JSR R5, N03014 .WORD 176322 EMT 50 .WORD B05270 N75512: RETURN ROR R0 .WORD 10 .WORD 177777 .WORD B75674 .WORD B75700 .WORD B75704 .WORD B75710 .WORD B75714 .WORD B75720 .WORD B75724 .WORD B75730 .WORD B75734 .WORD B75740 HALT .WORD 177776 .WORD B75754 .WORD B75760 .WORD B75764 .WORD B75770 .WORD B75774 .WORD B76000 .WORD B76004 .WORD B76010 .WORD B76014 .WORD B76020 .WORD 0 .WORD N72376 .WORD B75667 .WORD 0 .WORD 177775 .WORD B76034 .WORD B76040 .WORD B76044 .WORD B76050 .WORD B76054 .WORD B76060 .WORD B76064 .WORD B76070 .WORD B76074 .WORD B76100 .WORD 0 .WORD 177774 .WORD B76114 .WORD B76120 .WORD B76124 .WORD B76130 .WORD B76134 .WORD B76140 .WORD B76144 .WORD B76150 .WORD B76154 .WORD B76160 .WORD 0 .BYTE 14 B75667: .ASCIZ |[1Z| B75674: .ASCIZ |[M| B75700: .ASCIZ |[N| B75704: .ASCIZ |[O| B75710: .ASCIZ |[P| B75714: .ASCIZ |[Q| B75720: .ASCIZ |[R| B75724: .ASCIZ |[S| B75730: .ASCIZ |[T| B75734: .ASCIZ |[U| B75740: .ASCIZ |[V| .ASCIZ |[W| .ASCIZ |[X| B75754: .ASCIZ |[Y| B75760: .ASCIZ |[Z| B75764: .ASCIZ |[a| B75770: .ASCIZ |[b| B75774: .ASCIZ |[c| B76000: .ASCII |[| .ASCII |d| L76003: .BYTE 0 B76004: .ASCIZ |[e| B76010: .ASCIZ |[f| B76014: .ASCIZ |[g| B76020: .ASCIZ |[h| .ASCIZ |[i| .ASCIZ |[j| B76034: .ASCIZ |[k| B76040: .ASCIZ |[l| B76044: .ASCIZ |[m| B76050: .ASCIZ |[n| B76054: .ASCIZ |[o| B76060: .ASCIZ |[p| B76064: .ASCIZ |[q| B76070: .ASCIZ |[r| B76074: .ASCIZ |[s| B76100: .ASCIZ |[t| .ASCIZ |[u| .ASCIZ |[v| B76114: .ASCIZ |[w| B76120: .ASCIZ |[x| B76124: .ASCIZ |[y| B76130: .ASCIZ |[z| B76134: .ASCIZ |[@| B76140: .ASCIZ |[[| B76144: .ASCIZ |[\| B76150: .ASCIZ |[]| B76154: .ASCIZ |[^| B76160: .ASCIZ |[_| .ASCIZ |[`| .ASCIZ |[{| .WORD 156377 .WORD B76237 .WORD B76243 .WORD B76247 .WORD B76253 .WORD B76257 .WORD B76263 .WORD B76267 .WORD B76273 .WORD B76277 .WORD B76303 .WORD B76307 .WORD B76311 .WORD B76313 .WORD B76315 .WORD B76317 .WORD 0 .BYTE 14 B76237: .ASCIZ |[L| B76243: .ASCIZ |[F| B76247: .ASCIZ |[B| B76253: .ASCIZ |[G| B76257: .ASCIZ |[D| B76263: .ASCIZ |[E| B76267: .ASCIZ |[C| B76273: .ASCIZ |[H| B76277: .ASCIZ |[A| B76303: .ASCIZ |[I| B76307: .ASCIZ |+| B76311: .ASCIZ |-| B76313: .ASCIZ |,| B76315: .ASCIZ B76317: .ASCIZ .EVEN .BYTE 0 .ASCIZ |#0123456789+-,.| .WORD 14 .WORD 170777 .WORD B76277 .WORD B76247 .WORD B76257 .WORD B76267 .WORD 0 .WORD 170776 .WORD B76277 .WORD B76247 .WORD B76257 .WORD B76267 .WORD 0 .WORD 170775 .WORD B76277 .WORD B76247 .WORD B76257 .WORD B76267 .WORD 0 .WORD 170774 .WORD B76277 .WORD B76247 .WORD B76257 .WORD B76267 .WORD 0 .WORD 14 L76430: .WORD 156377 .WORD B76473 .WORD B76477 .WORD B76503 .WORD B76507 .WORD B76513 .WORD B76517 .WORD B76523 .WORD B76527 .WORD B76533 .WORD B76537 .WORD B76543 .WORD B76547 .WORD B76553 .WORD B76563 .WORD B76567 .WORD 0 .BYTE 14 B76473: .ASCIZ |Op| B76477: .ASCIZ |Oq| B76503: .ASCIZ |Or| B76507: .ASCIZ |Os| B76513: .ASCIZ |Ot| B76517: .ASCIZ |Ou| B76523: .ASCIZ |Ov| B76527: .ASCIZ |Ow| B76533: .ASCIZ |Ox| B76537: .ASCIZ |Oy| B76543: .ASCIZ |OP| B76547: .ASCIZ |OQ| B76553: .ASCIZ |OR| .ASCIZ |OS| B76563: .ASCIZ |On| B76567: .ASCII B76570: .ASCII |OM| B76572: .ASCII <0> .EVEN L76574: .WORD 000000 L76576: .WORD 000000 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 L76660: .WORD 000000 L76662: .WORD 000000 L76664: .WORD 000000 L76666: .WORD 000000 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 L76766: .WORD 0 .WORD 33334 .WORD 61637 .WORD 75050 .WORD 13217 .WORD 0 .WORD 0 .WORD 0 .WORD 0 L77010: .WORD 000000 .WORD 0 L77014: .WORD 000000 L77016: .WORD 000000 L77020: .WORD 000000 L77022: .WORD 000000 L77024: .WORD 000000 L77026: .WORD 000000 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 L77054: .WORD 000000 .WORD 0 L77060: .WORD 000000 L77062: .WORD 000000 L77064: .WORD 000000 L77066: .WORD 000000 L77070: .WORD 000000 L77072: .WORD 000000 .WORD 0 L77076: .WORD 000000 L77100: .BYTE 0 L77101: .BYTE 0 L77102: .BYTE 0 L77103: .BYTE 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 L77320: .WORD 000000 L77322: .WORD 000000 L77324: .WORD 000000 .WORD 0 L77330: .WORD 000000 .WORD 0 L77334: .WORD 000000 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 L77560: .WORD 000000 L77562: .WORD 000000 L77564: .WORD 000000 L77566: .WORD 000000 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 L77700: .WORD 000000 L77702: .WORD 000000 L77704: .WORD 000000 .WORD 0 L77710: .WORD 000000 L77712: .WORD 000000 .WORD 0 L77716: .WORD 000000 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 L77750: .WORD 000000 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .WORD 0 .END START