.TITLE REFERENCE .GLOBL $RESR6,$RESR5,$VER .GLOBL $BEGIN,$FILE,$END .RADIX 10 .GLOBL SUSPND L2: JSR %7,$B126 .GLOBL $B126 STFPS -(6) JSR %7,SUSPND LDFPS (6)+ MOV $RESR5,%5 MOV (6),2(6) ADD #2,%6 RTS %7 .GLOBL SPWNIT L3: JSR %7,$B126 STFPS -(6) JSR %7,SPWNIT LDFPS (6)+ MOV $RESR5,%5 MOV (6),2(6) ADD #2,%6 RTS %7 L4: JSR %7,$B127 .GLOBL $B127 MOV #133,@2(6) L6: DEC @2(6) MOV @2(6),%0 CMP %0,#1 BLT L7 CMP %0,#132 BLE L8 L7: JSR %7,$B125 .GLOBL $B125 L8: ADD %5,%0 CMPB 191(0),#32 BNE L9 JMP L6 L9: L5: MOV (6),2(6) ADD #2,%6 RTS %7 L0: .WORD 21059 .WORD 16709 .WORD 17748 .WORD 8260 .WORD 22850 .WORD 0 L1: .WORD 8224 .WORD 8224 .WORD 8224 .WORD 0 .GLOBL DETACH L11: JSR %7,$B126 STFPS -(6) JSR %7,DETACH LDFPS (6)+ MOV $RESR5,%5 MOV (6),2(6) ADD #2,%6 RTS %7 L12: SUB #6,%6 JSR %7,$B127 MOVB #1,444(5) MOVB #1,445(5) CLRB 446(5) CLRB 447(5) CLRB 448(5) MOVB #1,449(5) CLRB 450(5) MOV #L13,-(6) MOV #32,-(6) MOV #32,-(6) JSR %7,$B32 .GLOBL $B32 JSR %7,$B36 .GLOBL $B36 MOV #42,-(6) CLR -(6) JSR %7,$B20 .GLOBL $B20 MOV %5,%0 ADD #192,%0 MOV %0,-(6) MOV #132,-(6) JSR %7,$B12 .GLOBL $B12 JSR %7,$B16 .GLOBL $B16 MOV #1,@%6 L15: MOV @%6,%0 CMP %0,#1 BLT L16 CMP %0,#132 BLE L17 L16: JSR %7,$B125 L17: ADD %5,%0 CMPB 191(0),#61 BNE L18 JMP L19 L18: MOV @%6,%0 CMP %0,#1 BLT L20 CMP %0,#30 BLE L21 L20: JSR %7,$B125 L21: ADD %5,%0 MOV @%6,%1 CMP %1,#1 BLT L22 CMP %1,#132 BLE L23 L22: JSR %7,$B125 L23: ADD %5,%1 MOVB 191(1),161(0) INC @%6 JMP L15 L19: L14: INC @%6 MOV #1,2(6) L25: MOV @%6,%0 CMP %0,#1 BLT L26 CMP %0,#132 BLE L27 L26: JSR %7,$B125 L27: ADD %5,%0 CMPB 191(0),#32 BNE L28 CLR %0 BR L29 L28: MOV #1,%0 L29: MOV @%6,%1 CMP %1,#1 BLT L30 CMP %1,#132 BLE L31 L30: JSR %7,$B125 L31: ADD %5,%1 CMPB 191(1),#47 BNE L32 CLR %1 BR L33 L32: MOV #1,%1 L33: COMB %1 BICB %1,%0 BNE L34 JMP L35 L34: MOV 2(6),%0 CMP %0,#1 BLT L36 CMP %0,#30 BLE L37 L36: JSR %7,$B125 L37: ADD %5,%0 MOV @%6,%1 CMP %1,#1 BLT L38 CMP %1,#132 BLE L39 L38: JSR %7,$B125 L39: ADD %5,%1 MOVB 191(1),131(0) INC @%6 INC 2(6) JMP L25 L35: L24: L41: MOV @%6,%0 CMP %0,#1 BLT L42 CMP %0,#132 BLE L43 L42: JSR %7,$B125 L43: ADD %5,%0 CMPB 191(0),#47 BEQ L44 JMP L45 L44: INC @%6 MOVB #1,4(6) MOV @%6,%0 CMP %0,#1 BLT L46 CMP %0,#132 BLE L47 L46: JSR %7,$B125 L47: ADD %5,%0 CMPB 191(0),#45 BEQ L48 JMP L49 L48: INC @%6 CLRB 4(6) L49: MOV @%6,%0 CMP %0,#1 BLT L50 CMP %0,#132 BLE L51 L50: JSR %7,$B125 L51: ADD %5,%0 MOV #L52,-(6) JSR %7,$B52 .GLOBL $B52 CLR -(6) MOVB 191(0),(6) SUB #32,(6) JSR %7,$B40 .GLOBL $B40 BNE L53 JMP L54 L53: MOV @%6,%0 CMP %0,#1 BLT L55 CMP %0,#132 BLE L56 L55: JSR %7,$B125 L56: ADD %5,%0 MOVB 191(0),%0 SUB #L59,%0 BGE .+6 JMP L57 CMP #L60,%0 BGE .+6 JMP L57 ASL %0 JMP @L61(0) L62: MOVB 4(6),%0 BICB #65534,%0 MOVB %0,444(5) JMP L58 L63: MOVB 4(6),%0 BICB #65534,%0 MOVB %0,449(5) JMP L58 L64: MOVB 4(6),%0 BICB #65534,%0 MOVB %0,445(5) JMP L58 L65: MOVB 4(6),%0 BICB #65534,%0 MOVB %0,447(5) JMP L58 L66: MOVB 4(6),%0 BICB #65534,%0 MOVB %0,446(5) JMP L58 L67: MOVB 4(6),%0 BICB #65534,%0 MOVB %0,448(5) JMP L58 L68: MOVB 4(6),%0 BICB #65534,%0 MOVB %0,450(5) JMP L58 L57: JMP L58 L59=36 L61: L65 L57 L57 L57 L57 L57 L57 L57 L57 L57 L57 L57 L57 L57 L57 L57 L57 L57 L57 L57 L57 L57 L57 L57 L57 L57 L57 L57 L57 L57 L57 L62 L63 L57 L57 L57 L57 L57 L57 L57 L57 L57 L57 L68 L57 L57 L64 L66 L67 L60=48 L58: JMP L69 L54: MOV #L70,-(6) MOV #17,-(6) MOV #17,-(6) JSR %7,$B32 MOV @%6,%0 CMP %0,#1 BLT L71 CMP %0,#132 BLE L72 L71: JSR %7,$B125 L72: ADD %5,%0 CLR -(6) MOVB 191(0),(6) CLR -(6) JSR %7,$B20 MOV #L73,-(6) MOV #24,-(6) MOV #24,-(6) JSR %7,$B32 JSR %7,$B36 JMP L40 L69: L75: INC @%6 MOV @%6,%0 CMP %0,#1 BLT L76 CMP %0,#132 BLE L77 L76: JSR %7,$B125 L77: ADD %5,%0 MOV #L78,-(6) JSR %7,$B52 CLR -(6) MOVB 191(0),(6) SUB #32,(6) JSR %7,$B40 BNE L79 JMP L75 L79: L74: JMP L41 L45: L40: ADD #6,%6 RTS %7 L13: .WORD 27719 .WORD 25199 .WORD 27745 .WORD 21024 .WORD 26213 .WORD 29285 .WORD 28261 .WORD 25955 .WORD 20512 .WORD 28530 .WORD 29287 .WORD 28001 .WORD 8224 .WORD 8224 .WORD 12630 .WORD 12334 .WORD 0 L70: .WORD 20041 .WORD 16726 .WORD 18764 .WORD 8260 .WORD 22355 .WORD 21577 .WORD 18499 .WORD 14880 .WORD 32 L73: .WORD 11808 .WORD 23328 .WORD 11331 .WORD 11332 .WORD 11346 .WORD 11347 .WORD 11300 .WORD 11348 .WORD 23887 .WORD 20256 .WORD 19534 .WORD 11865 .WORD 0 L78: .WORD 32769,0,0,0 L52: .WORD 16,0,32792,28 L81: JSR %7,$B127 CMP 452(5),#1 BNE L82 JMP L83 L82: MOV 400(5),$FILE CLR -(6) MOVB 464(5),(6) CLR -(6) JSR %7,$B22 .GLOBL $B22 L83: MOV 400(5),$FILE MOV %5,%0 ADD #324,%0 MOV %0,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 .GLOBL $B34 MOV #L84,-(6) MOV #34,-(6) MOV #34,-(6) JSR %7,$B34 MOV 400(5),$FILE MOV #L1,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 MOV #L1,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 MOV #L1,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 MOV #L85,-(6) MOV #4,-(6) MOV #4,-(6) JSR %7,$B34 MOV 452(5),-(6) MOV #7,-(6) JSR %7,$B26 .GLOBL $B26 JSR %7,$B38 .GLOBL $B38 MOV 400(5),$FILE JSR %7,$B38 MOV 400(5),$FILE JSR %7,$B38 MOV 400(5),$FILE MOV #L86,-(6) MOV #31,-(6) MOV #31,-(6) JSR %7,$B34 JSR %7,$B38 MOV 400(5),$FILE MOV %5,-(6) MOV #132,-(6) MOV #132,-(6) JSR %7,$B34 JSR %7,$B38 INC 452(5) MOV #5,454(5) RTS %7 L84: .WORD 8224 .WORD 19527 .WORD 16975 .WORD 19521 .WORD 21024 .WORD 17989 .WORD 21061 .WORD 20037 .WORD 17731 .WORD 17199 .WORD 20306 .WORD 21331 .WORD 21024 .WORD 17989 .WORD 21061 .WORD 20037 .WORD 17731 .WORD 0 L85: .WORD 16720 .WORD 17735 .WORD 0 L86: .WORD 22867 .WORD 16973 .WORD 19535 .WORD 8224 .WORD 8224 .WORD 8224 .WORD 8224 .WORD 8224 .WORD 8224 .WORD 17746 .WORD 17734 .WORD 17746 .WORD 17230 .WORD 21317 .WORD 11822 .WORD 46 L87: CMP -(6),-(6) JSR %7,$B127 MOV %6,%0 MOV %0,-(6) MOV #1,-(6) MOV #6,-(6) MOV 2(6),@4(6) L89: CMP @4(6),(6) BLE .+6 JMP L90 MOV @14(6),%0 DEC %0 ADD 6(6),%0 MOV %0,8(6) MOV 8(6),%0 CMP %0,#1 BLT L91 CMP %0,#132 BLE L92 L91: JSR %7,$B125 L92: ADD %6,%0 MOV #L93,-(6) JSR %7,$B52 CLR -(6) MOVB 15(0),(6) SUB #32,(6) JSR %7,$B40 BNE L94 JMP L95 L94: MOV 12(6),%0 MOV 6(6),%1 CMP %1,#1 BLT L96 CMP %1,#6 BLE L97 L96: JSR %7,$B125 L97: ADD %0,%1 MOV 8(6),%0 CMP %0,#1 BLT L98 CMP %0,#132 BLE L99 L98: JSR %7,$B125 L99: ADD %6,%0 MOVB 15(0),65535(1) JMP L100 L95: MOV 12(6),%0 MOV 6(6),%1 CMP %1,#1 BLT L101 CMP %1,#6 BLE L102 L101: JSR %7,$B125 L102: ADD %0,%1 MOVB #32,65535(1) L100: INC @4(6) BVS .+6 JMP L89 L90: ADD #6,%6 L88: MOV 2(6),%0 INC %0 MOV %0,@8(6) MOV 4(6),140(6) ADD #140,%6 RTS %7 L93: .WORD 16401,1023,65534,2047 L103: SUB #28,%6 JSR %7,$B127 MOVB 445(5),%0 BISB 444(5),%0 CMPB %0,#1 BEQ L109 JMP L110 L109: CLR 26(6) MOV 386(5),$FILE MOV %6,%0 ADD #12,%0 MOV %0,-(6) MOV #6,-(6) JSR %7,$B14 .GLOBL $B14 MOV %6,%0 ADD #18,%0 MOV %0,-(6) MOV #6,-(6) JSR %7,$B14 JSR %7,$B18 .GLOBL $B18 MOV 372(5),$FILE MOV %6,%0 MOV %0,-(6) MOV #6,-(6) JSR %7,$B14 MOV %6,%0 ADD #6,%0 MOV %0,-(6) MOV #6,-(6) JSR %7,$B14 JSR %7,$B18 L112: MOV %6,%0 MOV (0)+,330(5) MOV (0)+,332(5) MOV (0)+,334(5) MOV 400(5),$FILE MOV %5,%0 ADD #330,%0 MOV %0,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 TSTB 445(5) BNE L113 JMP L114 L113: MOV 400(5),$FILE MOV #L104,-(6) MOV #12,-(6) MOV #12,-(6) JSR %7,$B34 L114: L116: TSTB 445(5) BNE L117 JMP L118 L117: MOV %5,%0 ADD #330,%0 MOV %6,%1 ADD #6,%1 MOV #6,%2 CMPB (0)+,(1)+ BNE .+4 SOB %2,.-4 BNE L119 JMP L120 L119: MOV 400(5),$FILE MOV #L108,-(6) MOV #4,-(6) MOV #4,-(6) JSR %7,$B34 MOV %6,%0 ADD #6,%0 MOV %0,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 INC 26(6) L120: CMP 26(6),#10 BEQ L121 JMP L122 L121: MOV 400(5),$FILE JSR %7,$B38 INC 454(5) MOV 400(5),$FILE MOV #L107,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 MOV #L107,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 MOV #L107,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 CLR 26(6) L122: L118: MOV 372(5),$FILE MOV %6,%0 MOV %0,-(6) MOV #6,-(6) JSR %7,$B14 MOV %6,%0 ADD #6,%0 MOV %0,-(6) MOV #6,-(6) JSR %7,$B14 JSR %7,$B18 MOV 372(5),%0 BIT #32768,2(0) BNE L125 JMP L126 L125: MOV #L107,%0 MOV %6,%1 MOV (0)+,(1)+ MOV (0)+,(1)+ MOV (0)+,(1)+ L126: MOV %5,%0 ADD #330,%0 MOV %6,%1 MOV #6,%2 CMPB (0)+,(1)+ BNE .+4 SOB %2,.-4 BNE L127 JMP L116 L127: L115: TSTB 445(5) BNE L129 JMP L130 L129: MOV 400(5),$FILE JSR %7,$B38 INC 454(5) TST 26(6) BNE L131 JMP L132 L131: MOV 400(5),$FILE JSR %7,$B38 INC 454(5) L132: CLR 26(6) L130: MOV 386(5),%0 BIT #32768,2(0) BEQ L135 JMP L136 L135: MOV %5,%0 ADD #330,%0 MOV %6,%1 ADD #12,%1 MOV #6,%2 CMPB (0)+,(1)+ BNE .+4 SOB %2,.-4 BEQ L137 JMP L138 L137: TSTB 444(5) BNE L139 JMP L140 L139: MOV 400(5),$FILE MOV #L107,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 MOV 400(5),$FILE MOV #L105,-(6) MOV #12,-(6) MOV #12,-(6) JSR %7,$B34 L142: MOV %5,%0 ADD #330,%0 MOV %6,%1 ADD #18,%1 MOV #6,%2 CMPB (0)+,(1)+ BNE .+4 SOB %2,.-4 BNE L143 JMP L144 L143: MOV 400(5),$FILE MOV #L108,-(6) MOV #4,-(6) MOV #4,-(6) JSR %7,$B34 MOV %6,%0 ADD #18,%0 MOV %0,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 INC 26(6) L144: CMP 26(6),#10 BEQ L145 JMP L146 L145: MOV 400(5),$FILE JSR %7,$B38 INC 454(5) MOV 400(5),$FILE MOV #L107,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 MOV #L107,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 MOV #L107,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 CLR 26(6) L146: MOV 386(5),$FILE MOV %6,%0 ADD #12,%0 MOV %0,-(6) MOV #6,-(6) JSR %7,$B14 MOV %6,%0 ADD #18,%0 MOV %0,-(6) MOV #6,-(6) JSR %7,$B14 JSR %7,$B18 MOV 386(5),%0 BIT #32768,2(0) BNE L149 JMP L150 L149: MOV #L107,%0 MOV (0)+,12(6) MOV (0)+,14(6) MOV (0)+,16(6) L150: MOV %5,%0 ADD #330,%0 MOV %6,%1 ADD #12,%1 MOV #6,%2 CMPB (0)+,(1)+ BNE .+4 SOB %2,.-4 BNE L151 JMP L142 L151: L141: MOV 400(5),$FILE JSR %7,$B38 INC 454(5) L140: MOV 400(5),$FILE MOV %5,-(6) MOV #132,-(6) MOV #132,-(6) JSR %7,$B34 JSR %7,$B38 INC 454(5) CLR 26(6) JMP L153 L138: TSTB 444(5) BNE L154 JMP L155 L154: MOV 400(5),$FILE MOV #L107,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 MOV #L106,-(6) MOV #47,-(6) MOV #47,-(6) JSR %7,$B34 JSR %7,$B38 INC 454(5) L155: MOV 400(5),$FILE MOV %5,-(6) MOV #132,-(6) MOV #132,-(6) JSR %7,$B34 JSR %7,$B38 INC 454(5) L153: L136: MOV 454(5),%0 ADD #8,%0 CMP %0,#64 BGT L156 JMP L157 L156: JSR %7,L81 L157: MOV 372(5),%0 BIT #32768,2(0) BNE L160 JMP L112 L160: L111: L110: ADD #28,%6 RTS %7 L104: .WORD 8224 .WORD 16707 .WORD 19532 .WORD 8275 .WORD 8224 .WORD 8224 .WORD 0 L105: .WORD 8224 .WORD 16707 .WORD 19532 .WORD 17477 .WORD 16928 .WORD 8281 .WORD 0 L106: .WORD 16717 .WORD 20041 .WORD 20512 .WORD 20306 .WORD 21063 .WORD 19777 .WORD 20256 .WORD 8274 .WORD 20053 .WORD 17746 .WORD 17734 .WORD 17746 .WORD 17230 .WORD 17477 .WORD 21280 .WORD 19801 .WORD 20290 .WORD 12108 .WORD 20037 .WORD 21076 .WORD 11609 .WORD 20304 .WORD 20041 .WORD 84 L107: .WORD 8224 .WORD 8224 .WORD 8224 .WORD 0 L108: .WORD 8224 .WORD 8224 .WORD 0 L162: CLR -(6) JSR %0,$B74 .GLOBL $B74 MOVB #1,36(6) TSTB 447(5) BEQ L163 JMP L164 L163: MOV #L165,%0 MOV %6,%1 ADD #30,%1 MOV #6,%2 CMPB (0)+,(1)+ BNE .+4 SOB %2,.-4 BNE L166 JMP L167 L166: MOV %6,%0 ADD #26,%0 MOV %0,-(6) MOV #1,-(6) MOV #6,-(6) MOV 2(6),@4(6) L169: CMP @4(6),(6) BLE .+6 JMP L170 MOV 32(6),%0 CMP %0,#1 BLT L171 CMP %0,#6 BLE L172 L171: JSR %7,$B125 L172: ADD %6,%0 MOV #L173,-(6) JSR %7,$B52 CLR -(6) MOVB 35(0),(6) SUB #32,(6) JSR %7,$B40 BNE L174 JMP L175 L174: CLRB 42(6) L175: INC @4(6) BVS .+6 JMP L169 L170: ADD #6,%6 L168: L167: L164: JSR %0,$B76 .GLOBL $B76 MOV 2(6),8(6) ADD #8,%6 RTS %7 L165: .WORD 19758 .WORD 18753 .WORD 11854 .WORD 0 L173: .WORD 16400,0,0,0 $VER=12. $BEGIN: MOV #470,-(6) .GLOBL $B70 JSR %7,$B70 MOV (6)+,%5 MOV (6),(5)+ MOV 2(6),(5)+ MOV %5,$RESR5 MOV #0,-(6) MOV %6,%4 JSR %7,L11 CLRB 443(5) MOVB #1,442(5) JSR %7,L12 MOV %5,%0 ADD #358,%0 MOV %0,$FILE MOV #65535,-(6) MOV %5,%0 ADD #132,%0 MOV %0,-(6) MOV #30,-(6) MOV #L176,-(6) MOV #4,-(6) CLR -(6) JSR %7,$B66 .GLOBL $B66 MOV %5,%0 ADD #372,%0 MOV %0,$FILE MOV #65535,-(6) MOV #L177,-(6) MOV #12,-(6) CLR -(6) CLR -(6) CLR -(6) JSR %7,$B64 .GLOBL $B64 MOV %5,%0 ADD #386,%0 MOV %0,$FILE MOV #65535,-(6) MOV #L178,-(6) MOV #12,-(6) CLR -(6) CLR -(6) CLR -(6) JSR %7,$B64 MOV %5,%0 ADD #400,%0 MOV %0,$FILE MOV #65535,-(6) MOV %5,%0 ADD #162,%0 MOV %0,-(6) MOV #30,-(6) MOV #L179,-(6) MOV #4,-(6) CLR -(6) JSR %7,$B64 MOV %5,%0 ADD #460,%0 MOV %0,-(6) MOV #1,-(6) MOV #132,-(6) MOV 2(6),@4(6) L181: CMP @4(6),(6) BLE .+6 JMP L182 MOV 460(5),%0 CMP %0,#1 BLT L183 CMP %0,#132 BLE L184 L183: JSR %7,$B125 L184: ADD %5,%0 MOVB #45,65535(0) INC @4(6) BVS .+6 JMP L181 L182: ADD #6,%6 L180: MOV #1,452(5) JSR %7,L81 L186: MOV 358(5),$FILE MOV %5,%0 ADD #192,%0 MOV %0,-(6) MOV #132,-(6) JSR %7,$B14 JSR %7,$B18 MOV 358(5),%0 BIT #32768,2(0) BEQ L189 JMP L190 L189: CMPB 204(5),#67 BEQ L191 JMP L192 L191: MOV %5,%0 ADD #460,%0 MOV %0,-(6) MOV #1,-(6) MOV #10,-(6) MOV 2(6),@4(6) L194: CMP @4(6),(6) BLE .+6 JMP L195 MOV 460(5),%0 ADD #12,%0 MOV %0,458(5) MOV 460(5),%0 CMP %0,#1 BLT L196 CMP %0,#10 BLE L197 L196: JSR %7,$B125 L197: ADD %5,%0 MOV 458(5),%1 CMP %1,#1 BLT L198 CMP %1,#132 BLE L199 L198: JSR %7,$B125 L199: ADD %5,%1 MOVB 191(1),347(0) INC @4(6) BVS .+6 JMP L194 L195: ADD #6,%6 L193: MOV #L0,%0 MOV %5,%1 ADD #348,%1 MOV #10,%2 CMPB (0)+,(1)+ BNE .+4 SOB %2,.-4 BEQ L200 JMP L201 L200: MOVB #1,443(5) MOV %5,%0 ADD #460,%0 MOV %0,-(6) MOV #1,-(6) MOV #6,-(6) MOV 2(6),@4(6) L203: CMP @4(6),(6) BLE .+6 JMP L204 MOV 460(5),%0 INC %0 MOV %0,458(5) MOV 460(5),%0 CMP %0,#1 BLT L205 CMP %0,#6 BLE L206 L205: JSR %7,$B125 L206: ADD %5,%0 MOV 458(5),%1 CMP %1,#1 BLT L207 CMP %1,#132 BLE L208 L207: JSR %7,$B125 L208: ADD %5,%1 MOVB 191(1),323(0) INC @4(6) BVS .+6 JMP L203 L204: ADD #6,%6 L202: L201: L192: JMP L209 L190: CLRB 442(5) MOVB #1,443(5) L209: TSTB 443(5) BNE L210 JMP L186 L210: L185: MOVB 442(5),%0 COMB %0 BICB #-2,%0 BNE L212 JMP L213 L212: MOV #L214,-(6) MOV #24,-(6) MOV #24,-(6) JSR %7,$B32 JSR %7,$B36 JMP L215 L213: MOVB #12,464(5) MOV %5,%0 ADD #460,%0 MOV %0,-(6) MOV #1,-(6) MOV #2,-(6) MOV 2(6),@4(6) L217: CMP @4(6),(6) BLE .+6 JMP L218 MOV 358(5),$FILE JSR %7,$B18 INC @4(6) BVS .+6 JMP L217 L218: ADD #6,%6 L216: CLRB 443(5) L220: MOVB 443(5),%0 COMB %0 BICB #-2,%0 BNE L221 JMP L222 L221: MOV 358(5),$FILE MOV %5,%0 ADD #192,%0 MOV %0,-(6) MOV #132,-(6) JSR %7,$B14 JSR %7,$B18 MOV 358(5),%0 BIT #32768,2(0) BNE L225 JMP L226 L225: MOVB #1,443(5) L226: CMPB 192(5),464(5) BEQ L227 JMP L228 L227: MOV 358(5),$FILE MOV %5,%0 ADD #192,%0 MOV %0,-(6) MOV #132,-(6) JSR %7,$B14 JSR %7,$B18 CMPB 192(5),#83 BEQ L229 JMP L230 L229: MOVB #1,443(5) L230: MOV 358(5),$FILE MOV %5,%0 ADD #192,%0 MOV %0,-(6) MOV #132,-(6) JSR %7,$B14 JSR %7,$B18 MOV 358(5),$FILE MOV %5,%0 ADD #192,%0 MOV %0,-(6) MOV #132,-(6) JSR %7,$B14 JSR %7,$B18 L228: MOVB 443(5),%0 COMB %0 BICB #-2,%0 BNE L231 JMP L232 L231: MOV %5,%0 ADD #456,%0 MOV %0,-(6) JSR %7,L4 MOV #1,458(5) SUB #132,%6 MOV %5,%0 ADD #192,%0 MOV %6,%1 MOV #66,%2 MOV (0)+,(1)+ SOB %2,.-2 MOV %5,%0 ADD #458,%0 MOV %0,-(6) MOV %5,%0 ADD #330,%0 MOV %0,-(6) JSR %7,L87 MOV #L1,%0 MOV %5,%1 ADD #330,%1 MOV #6,%2 CMPB (0)+,(1)+ BNE .+4 SOB %2,.-4 BEQ L233 JMP L234 L233: ADD #10,458(5) JMP L235 L234: ADD #9,458(5) MOV 330(5),336(5) MOV 332(5),338(5) MOV 334(5),340(5) L235: ADD #4,458(5) SUB #132,%6 MOV %5,%0 ADD #192,%0 MOV %6,%1 MOV #66,%2 MOV (0)+,(1)+ SOB %2,.-2 MOV %5,%0 ADD #458,%0 MOV %0,-(6) MOV %5,%0 ADD #342,%0 MOV %0,-(6) JSR %7,L87 CLR -(6) SUB #6,%6 MOV %6,%0 MOV 336(5),(0)+ MOV 338(5),(0)+ MOV 340(5),(0)+ JSR %7,L162 TSTB (6)+ BNE L236 JMP L237 L236: MOV 386(5),$FILE MOV %5,%0 ADD #336,%0 MOV %0,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 MOV %5,%0 ADD #336,%0 MOV %0,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 JSR %7,$B38 MOV 372(5),$FILE MOV %5,%0 ADD #336,%0 MOV %0,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 MOV %5,%0 ADD #336,%0 MOV %0,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 JSR %7,$B38 L237: L239: CLR -(6) SUB #6,%6 MOV %6,%0 MOV 336(5),(0)+ MOV 338(5),(0)+ MOV 340(5),(0)+ JSR %7,L162 CLR -(6) SUB #6,%6 MOV %6,%0 MOV 342(5),(0)+ MOV 344(5),(0)+ MOV 346(5),(0)+ JSR %7,L162 MOVB (6)+,%0 COM %0 BICB %0,@%6 TSTB (6)+ BNE L240 JMP L241 L240: MOV 386(5),$FILE MOV %5,%0 ADD #336,%0 MOV %0,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 MOV %5,%0 ADD #342,%0 MOV %0,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 JSR %7,$B38 MOV 372(5),$FILE MOV %5,%0 ADD #342,%0 MOV %0,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 MOV %5,%0 ADD #336,%0 MOV %0,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 JSR %7,$B38 L241: ADD #4,458(5) CMP 458(5),#128 BLT L242 JMP L243 L242: SUB #132,%6 MOV %5,%0 ADD #192,%0 MOV %6,%1 MOV #66,%2 MOV (0)+,(1)+ SOB %2,.-2 MOV %5,%0 ADD #458,%0 MOV %0,-(6) MOV %5,%0 ADD #342,%0 MOV %0,-(6) JSR %7,L87 L243: CMP 458(5),456(5) BGT L244 JMP L239 L244: L238: L232: JMP L220 L222: L219: MOV %5,%0 ADD #372,%0 MOV %0,$FILE JSR %7,$B68 .GLOBL $B68 MOV %5,%0 ADD #386,%0 MOV %0,$FILE JSR %7,$B68 MOV #30,462(5) L247: MOV 462(5),%0 CMP %0,#1 BLT L248 CMP %0,#30 BLE L249 L248: JSR %7,$B125 L249: ADD %5,%0 TSTB 161(0) BEQ L250 JMP L251 L250: DEC 462(5) JMP L247 L251: L246: MOV %5,%0 ADD #428,%0 MOV %0,$FILE MOV #65535,-(6) MOV #L252,-(6) MOV #12,-(6) CLR -(6) CLR -(6) CLR -(6) JSR %7,$B64 MOV 428(5),$FILE MOV #L253,-(6) MOV #13,-(6) MOV #13,-(6) JSR %7,$B34 JSR %7,$B38 MOV 428(5),$FILE MOV #L254,-(6) MOV #49,-(6) MOV #49,-(6) JSR %7,$B34 JSR %7,$B38 MOV 428(5),$FILE MOV #L255,-(6) MOV #9,-(6) MOV #9,-(6) JSR %7,$B34 JSR %7,$B38 MOV 428(5),$FILE MOV #L256,-(6) MOV #49,-(6) MOV #49,-(6) JSR %7,$B34 JSR %7,$B38 MOV 428(5),$FILE MOV #L257,-(6) MOV #9,-(6) MOV #9,-(6) JSR %7,$B34 JSR %7,$B38 MOV 428(5),$FILE MOV #L258,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 JSR %7,$B38 MOVB 448(5),%0 BISB 450(5),%0 BNE L259 JMP L260 L259: MOV 428(5),$FILE MOV #L261,-(6) MOV #5,-(6) MOV #5,-(6) JSR %7,$B34 JSR %7,$B38 MOV 428(5),$FILE MOV #L262,-(6) MOV #4,-(6) MOV #4,-(6) JSR %7,$B34 JSR %7,$B38 MOV 428(5),$FILE MOV #L263,-(6) MOV #5,-(6) MOV #5,-(6) JSR %7,$B34 JSR %7,$B38 MOVB 448(5),%0 BISB 450(5),%0 BNE L264 JMP L265 L264: MOV 428(5),$FILE MOV #L266,-(6) MOV #4,-(6) MOV #4,-(6) JSR %7,$B34 MOV %5,%0 ADD #460,%0 MOV %0,-(6) MOV #1,-(6) MOV 462(5),-(6) MOV 2(6),@4(6) L268: CMP @4(6),(6) BLE .+6 JMP L269 MOV 428(5),$FILE MOV 460(5),%0 CMP %0,#1 BLT L270 CMP %0,#30 BLE L271 L270: JSR %7,$B125 L271: ADD %5,%0 CLR -(6) MOVB 161(0),(6) CLR -(6) JSR %7,$B22 INC @4(6) BVS .+6 JMP L268 L269: ADD #6,%6 L267: MOV 428(5),$FILE MOV #L272,-(6) MOV #20,-(6) MOV #20,-(6) JSR %7,$B34 JSR %7,$B38 L265: TSTB 450(5) BNE L273 JMP L274 L273: MOV 428(5),$FILE MOV #L275,-(6) MOV #4,-(6) MOV #4,-(6) JSR %7,$B34 MOV %5,%0 ADD #460,%0 MOV %0,-(6) MOV #1,-(6) MOV 462(5),-(6) MOV 2(6),@4(6) L277: CMP @4(6),(6) BLE .+6 JMP L278 MOV 428(5),$FILE MOV 460(5),%0 CMP %0,#1 BLT L279 CMP %0,#30 BLE L280 L279: JSR %7,$B125 L280: ADD %5,%0 CLR -(6) MOVB 161(0),(6) CLR -(6) JSR %7,$B22 INC @4(6) BVS .+6 JMP L277 L278: ADD #6,%6 L276: MOV 428(5),$FILE MOV #L281,-(6) MOV #20,-(6) MOV #20,-(6) JSR %7,$B34 JSR %7,$B38 L274: L260: TSTB 446(5) BNE L282 JMP L283 L282: MOV 428(5),$FILE MOV #L284,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 MOV %5,%0 ADD #460,%0 MOV %0,-(6) MOV #1,-(6) MOV 462(5),-(6) MOV 2(6),@4(6) L286: CMP @4(6),(6) BLE .+6 JMP L287 MOV 428(5),$FILE MOV 460(5),%0 CMP %0,#1 BLT L288 CMP %0,#30 BLE L289 L288: JSR %7,$B125 L289: ADD %5,%0 CLR -(6) MOVB 161(0),(6) CLR -(6) JSR %7,$B22 INC @4(6) BVS .+6 JMP L286 L287: ADD #6,%6 L285: MOV 428(5),$FILE MOV #L290,-(6) MOV #4,-(6) MOV #4,-(6) JSR %7,$B34 JSR %7,$B38 MOV 428(5),$FILE MOV #L291,-(6) MOV #9,-(6) MOV #9,-(6) JSR %7,$B34 JSR %7,$B38 MOVB 448(5),%0 BISB 450(5),%0 BNE L292 JMP L293 L292: MOV 428(5),$FILE MOV #L294,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 MOV %5,%0 ADD #460,%0 MOV %0,-(6) MOV #1,-(6) MOV 462(5),-(6) MOV 2(6),@4(6) L296: CMP @4(6),(6) BLE .+6 JMP L297 MOV 428(5),$FILE MOV 460(5),%0 CMP %0,#1 BLT L298 CMP %0,#30 BLE L299 L298: JSR %7,$B125 L299: ADD %5,%0 CLR -(6) MOVB 161(0),(6) CLR -(6) JSR %7,$B22 INC @4(6) BVS .+6 JMP L296 L297: ADD #6,%6 L295: MOV 428(5),$FILE MOV #L300,-(6) MOV #4,-(6) MOV #4,-(6) JSR %7,$B34 JSR %7,$B38 MOV 428(5),$FILE MOV #L301,-(6) MOV #9,-(6) MOV #9,-(6) JSR %7,$B34 JSR %7,$B38 L293: TSTB 450(5) BNE L302 JMP L303 L302: MOV 428(5),$FILE MOV #L304,-(6) MOV #6,-(6) MOV #6,-(6) JSR %7,$B34 MOV %5,%0 ADD #460,%0 MOV %0,-(6) MOV #1,-(6) MOV 462(5),-(6) MOV 2(6),@4(6) L306: CMP @4(6),(6) BLE .+6 JMP L307 MOV 428(5),$FILE MOV 460(5),%0 CMP %0,#1 BLT L308 CMP %0,#30 BLE L309 L308: JSR %7,$B125 L309: ADD %5,%0 CLR -(6) MOVB 161(0),(6) CLR -(6) JSR %7,$B22 INC @4(6) BVS .+6 JMP L306 L307: ADD #6,%6 L305: MOV 428(5),$FILE MOV #L310,-(6) MOV #4,-(6) MOV #4,-(6) JSR %7,$B34 JSR %7,$B38 MOV 428(5),$FILE MOV #L311,-(6) MOV #9,-(6) MOV #9,-(6) JSR %7,$B34 JSR %7,$B38 L303: L283: TSTB 449(5) BNE L312 JMP L313 L312: MOV 428(5),$FILE MOV #L314,-(6) MOV #33,-(6) MOV #33,-(6) JSR %7,$B34 JSR %7,$B38 L313: MOVB 444(5),%0 COM %0 MOVB 445(5),%1 BICB %0,%1 BEQ L315 JMP L316 L315: MOV 428(5),$FILE MOV #L317,-(6) MOV #4,-(6) MOV #4,-(6) JSR %7,$B34 MOV %5,%0 ADD #460,%0 MOV %0,-(6) MOV #1,-(6) MOV 462(5),-(6) MOV 2(6),@4(6) L319: CMP @4(6),(6) BLE .+6 JMP L320 MOV 428(5),$FILE MOV 460(5),%0 CMP %0,#1 BLT L321 CMP %0,#30 BLE L322 L321: JSR %7,$B125 L322: ADD %5,%0 CLR -(6) MOVB 161(0),(6) CLR -(6) JSR %7,$B22 INC @4(6) BVS .+6 JMP L319 L320: ADD #6,%6 L318: MOV 428(5),$FILE MOV #L323,-(6) MOV #9,-(6) MOV #9,-(6) JSR %7,$B34 JSR %7,$B38 L316: MOV 428(5),$FILE MOV #L324,-(6) MOV #18,-(6) MOV #18,-(6) JSR %7,$B34 JSR %7,$B38 MOV %5,%0 ADD #428,%0 MOV %0,$FILE JSR %7,$B68 MOV #0,-(6) MOV %6,%4 JSR %7,L3 MOV #0,-(6) MOV %6,%4 JSR %7,L2 MOV %5,%0 ADD #372,%0 MOV %0,$FILE MOV #65535,-(6) MOV #L325,-(6) MOV #12,-(6) CLR -(6) CLR -(6) CLR -(6) JSR %7,$B66 MOV %5,%0 ADD #386,%0 MOV %0,$FILE MOV #65535,-(6) MOV #L326,-(6) MOV #12,-(6) CLR -(6) CLR -(6) CLR -(6) JSR %7,$B66 JSR %7,L103 MOV %5,%0 ADD #400,%0 MOV %0,$FILE JSR %7,$B68 JSR %7,$B36 MOVB 445(5),%0 BISB 444(5),%0 CMPB %0,#1 BEQ L327 JMP L328 L327: MOV 452(5),%0 DEC %0 MOV %0,-(6) MOV #7,-(6) JSR %7,$B24 .GLOBL $B24 MOV #L329,-(6) MOV #30,-(6) MOV #30,-(6) JSR %7,$B32 JSR %7,$B36 L328: MOVB 448(5),%0 BISB 450(5),%0 BNE L330 JMP L331 L330: JSR %7,$B36 MOV #L332,-(6) MOV #41,-(6) MOV #41,-(6) JSR %7,$B32 JSR %7,$B36 L331: L215: JMP $END L176: .WORD 19758 .WORD 20545 .WORD 0 L177: .WORD 22867 .WORD 23098 .WORD 21082 .WORD 17989 .WORD 21038 .WORD 20564 .WORD 0 L178: .WORD 22867 .WORD 23098 .WORD 21082 .WORD 17989 .WORD 17198 .WORD 20564 .WORD 0 L179: .WORD 21038 .WORD 17989 .WORD 0 L214: .WORD 20302 .WORD 17184 .WORD 17746 .WORD 8262 .WORD 20294 .WORD 20053 .WORD 8260 .WORD 20047 .WORD 19744 .WORD 20545 .WORD 18758 .WORD 17740 .WORD 0 L252: .WORD 22867 .WORD 23098 .WORD 21082 .WORD 17989 .WORD 17198 .WORD 17485 .WORD 0 L253: .WORD 17710 .WORD 16718 .WORD 19522 .WORD 8261 .WORD 21841 .WORD 17737 .WORD 84 L254: .WORD 21075 .WORD 8276 .WORD 22867 .WORD 23098 .WORD 21082 .WORD 17989 .WORD 17198 .WORD 20564 .WORD 21309 .WORD 14937 .WORD 23130 .WORD 17746 .WORD 11846 .WORD 21571 .WORD 12112 .WORD 20294 .WORD 17978 .WORD 22601 .WORD 17477 .WORD 12602 .WORD 12082 .WORD 17739 .WORD 12602 .WORD 12590 .WORD 50 L255: .WORD 22318 .WORD 18753 .WORD 8276 .WORD 21075 .WORD 84 L256: .WORD 21075 .WORD 8276 .WORD 22867 .WORD 23098 .WORD 21082 .WORD 17989 .WORD 21038 .WORD 20564 .WORD 21309 .WORD 14937 .WORD 23130 .WORD 17746 .WORD 11846 .WORD 21586 .WORD 12112 .WORD 20294 .WORD 17978 .WORD 22601 .WORD 17477 .WORD 12602 .WORD 12082 .WORD 17739 .WORD 12602 .WORD 12590 .WORD 50 L257: .WORD 22318 .WORD 18753 .WORD 8276 .WORD 21075 .WORD 84 L258: .WORD 17746 .WORD 21843 .WORD 17741 .WORD 0 L261: .WORD 22318 .WORD 18753 .WORD 84 L262: .WORD 21076 .WORD 17733 .WORD 0 L263: .WORD 22318 .WORD 18753 .WORD 84 L266: .WORD 18768 .WORD 8272 .WORD 0 L272: .WORD 21550 .WORD 17746 .WORD 20015 .WORD 12118 .WORD 17746 .WORD 23101 .WORD 21082 .WORD 17989 .WORD 21550 .WORD 17746 .WORD 0 L275: .WORD 18768 .WORD 8272 .WORD 0 L281: .WORD 20270 .WORD 19524 .WORD 20015 .WORD 12118 .WORD 17746 .WORD 23101 .WORD 21082 .WORD 17989 .WORD 20270 .WORD 19524 .WORD 0 L284: .WORD 21072 .WORD 20041 .WORD 8276 .WORD 0 L290: .WORD 21038 .WORD 17989 .WORD 0 L291: .WORD 22318 .WORD 18753 .WORD 8276 .WORD 21072 .WORD 73 L294: .WORD 21072 .WORD 20041 .WORD 8276 .WORD 0 L300: .WORD 21550 .WORD 17746 .WORD 0 L301: .WORD 22318 .WORD 18753 .WORD 8276 .WORD 21072 .WORD 73 L304: .WORD 21072 .WORD 20041 .WORD 8276 .WORD 0 L310: .WORD 20270 .WORD 19524 .WORD 0 L311: .WORD 22318 .WORD 18753 .WORD 8276 .WORD 21072 .WORD 73 L314: .WORD 18768 .WORD 8272 .WORD 23130 .WORD 17746 .WORD 11846 .WORD 21571 .WORD 15184 .WORD 12074 .WORD 17732 .WORD 23084 .WORD 21082 .WORD 17989 .WORD 21038 .WORD 20564 .WORD 10811 .WORD 17455 .WORD 69 L317: .WORD 18768 .WORD 8272 .WORD 0 L323: .WORD 21038 .WORD 17989 .WORD 12347 .WORD 17455 .WORD 69 L324: .WORD 18768 .WORD 8272 .WORD 23130 .WORD 17746 .WORD 11846 .WORD 19779 .WORD 15172 .WORD 12074 .WORD 17732 .WORD 0 L325: .WORD 22867 .WORD 23098 .WORD 21082 .WORD 17989 .WORD 21038 .WORD 20564 .WORD 0 L326: .WORD 22867 .WORD 23098 .WORD 21082 .WORD 17989 .WORD 17198 .WORD 20564 .WORD 0 L329: .WORD 8224 .WORD 16720 .WORD 17735 .WORD 21288 .WORD 8233 .WORD 17999 .WORD 21024 .WORD 17989 .WORD 21061 .WORD 20037 .WORD 17731 .WORD 20256 .WORD 21589 .WORD 21840 .WORD 11860 .WORD 0 L332: .WORD 21072 .WORD 17231 .WORD 21317 .WORD 18771 .WORD 18254 .WORD 21536 .WORD 17746 .WORD 11845 .WORD 11822 .WORD 11822 .WORD 11822 .WORD 11822 .WORD 10286 .WORD 16727 .WORD 21577 .WORD 17952 .WORD 21071 .WORD 15392 .WORD 20293 .WORD 15942 .WORD 41 .END