*START 4001 001002 *STACK 7777 000000 *SYM 000641 SEG. # TYPE LOW HIGH TOP 4001 PROC 000100 177775 177775 4002 PROC 000100 177775 177775 4003 PROC 000100 047270 047267 *BASE 004001 000100 000354 000777 000777 *BASE 004002 000100 000313 000777 000777 *BASE 004003 000100 000104 000777 000777 ROUTINE ECB PROCEDURE ST. SIZE LINK FR. #### 4001 001002 4001 001000 000042 000022 4001 000402 P3 4001 002220 4001 001024 000046 000132 4001 001566 P10 4001 004514 4001 002320 000046 000226 4001 004014 P31 4001 005070 4001 004642 000046 000064 4001 004454 P30 4001 005624 4001 005140 000046 000110 4001 005204 P40 4001 010152 4001 005714 000046 000176 4001 007472 P54 4001 010714 4001 010270 000046 000130 4001 010264 P66 4001 011222 4001 011014 000046 000062 4001 010610 P71 4001 012432 4001 011272 000046 000150 4001 011756 P62 4001 024622 4001 012526 000046 000454 4001 023722 P307 4001 025216 4001 024776 000046 000070 4001 024604 P314 4001 026330 4001 025274 000046 000134 4001 025672 P326 4001 026742 4001 026426 000046 000074 4001 026322 P337 4001 030262 4001 027016 000046 000156 4001 027610 P364 4001 031212 4001 030366 000046 000102 4001 030564 P375 4001 032276 4001 031266 000046 000126 4001 031640 P409 4001 032574 4001 032366 000046 000072 4001 032160 P412 4001 032770 4001 032652 000046 000054 4001 032356 P415 4001 034070 4001 033032 000046 000112 4001 033430 P418 4001 035674 4001 034142 000046 000136 4001 035216 P423 4001 041414 4001 035754 000046 000260 4001 040674 P455 4001 042102 4001 041554 000046 000100 4001 041460 P460 4001 045402 4001 042160 000046 000200 4001 044712 P496 4001 045770 4001 045512 000046 000072 4001 045354 P502 4001 046360 4001 046046 000046 000074 4001 045740 P510 4001 053076 4001 046434 000046 000272 4001 052342 P546 4001 062160 4001 053234 000046 000356 4001 061346 P509 4001 072356 4001 062324 000046 000424 4001 071512 P670 4001 073406 4001 072536 000046 000122 4001 072762 P675 4001 073566 4001 073504 000046 000042 4001 073156 P678 4001 075154 4001 073620 000046 000164 4001 074506 P693 4001 076536 4001 075272 000046 000150 4001 076100 P704 4001 101012 4001 076650 000046 000216 4001 100326 P724 4001 104572 4001 101144 000046 000272 4001 104060 P758 4001 115056 4001 104752 000046 000414 4001 114206 P757 4001 123762 4001 115222 000046 000372 4001 123144 P884 4001 124340 4001 124136 000046 000070 4001 123724 P888 4001 124564 4001 124414 000046 000056 4001 124152 P892 4001 125112 4001 124630 000046 000106 4001 124472 P896 4001 126162 4001 125200 000046 000144 4001 125524 P903 4001 127560 4001 126270 000046 000152 4001 127114 P912 4001 130670 4001 127666 000046 000126 4001 130236 P942 4001 131300 4001 130764 000046 000070 4001 130662 P949 4001 131732 4001 131352 000046 000116 4001 131310 P953 4001 132700 4001 132026 000046 000132 4001 132250 P959 4001 133642 4001 133002 000046 000132 4001 133210 P965 4001 135560 4001 133742 000046 000200 4001 135102 P975 4001 136320 4001 135702 000046 000126 4001 135674 P979 4001 137330 4001 136422 000046 000134 4001 136674 P1004 4001 140414 4001 137430 000046 000132 4001 137766 P1022 4001 141552 4001 140520 000046 000142 4001 141112 P1049 4001 142354 4001 141654 000046 000122 4001 141730 P1055 4001 143144 4001 142452 000046 000116 4001 142520 P1061 4001 143672 4001 143236 000046 000114 4001 143246 P1065 4001 146410 4001 143762 000046 000224 4001 145712 P1081 4001 147120 4001 146536 000046 000110 4001 146474 P1088 4001 147600 4001 147204 000046 000112 4001 147152 P1097 4001 150066 4001 147664 000046 000074 4001 147450 P1104 4001 150336 4001 150144 000046 000062 4001 147722 P1108 4001 151056 4001 150404 000046 000070 4001 150440 P1116 4001 157600 4001 151130 000046 000416 4001 156746 P1197 4001 160274 4001 157764 000046 000102 4001 157656 P1202 4001 163372 4001 160360 000046 000264 4001 162670 P1235 4001 164062 4001 163554 000046 000110 4001 163442 P1240 4001 164676 4001 164152 000046 000124 4001 164250 P1249 4001 167672 4001 164774 000046 000246 4001 167156 P1284 4001 174754 4001 170024 000046 000334 4001 174170 P1340 4001 176560 4001 175124 000046 000144 4001 176116 P1358 4001 176724 4002 001000 000046 000144 4001 176262 P1376 4001 177110 4002 002372 000046 000200 4001 176426 P1401 4001 177566 4001 177226 000046 000110 4001 177146 P1407 4001 177676 4002 004406 000046 000110 4001 177256 P1413 4002 005430 4002 004726 000046 000116 4002 005004 P1422 4002 006030 4002 005522 000046 000072 4002 005412 P1430 4002 006414 4002 006104 000046 000072 4002 005776 P1438 4002 006720 4002 006470 000046 000070 4002 006302 P1443 4002 007222 4002 006772 000046 000070 4002 006604 P1448 4002 007510 4002 007274 000046 000070 4002 007074 P1453 4002 010062 4002 007564 000046 000072 4002 007442 P1460 4002 010500 4002 010134 000046 000074 4002 010064 P1467 4002 011512 4002 010560 000046 000136 4002 011054 P1478 4002 015712 4002 011612 000046 000302 4002 015156 P1196 4002 017754 4002 016060 000046 000246 4002 017266 P1595 4002 020372 4002 020134 000046 000100 4002 017754 P1594 4002 022034 4002 020454 000046 000150 4002 021376 P1614 4002 022412 4002 022146 000046 000072 4002 021774 P1619 4002 023022 4002 022466 000046 000102 4002 022400 P1593 4002 031050 4002 023102 000046 000416 4002 030216 P1592 4002 033736 4002 031234 000046 000214 4002 033244 P1591 4002 037124 4002 034060 000046 000224 4002 036424 P1103 4002 042606 4002 037250 000046 000266 4002 042066 P1836 4002 044544 4002 042754 000046 000220 4002 044062 P1867 4002 046046 4002 044702 000046 000164 4002 045376 P1882 4002 046572 4002 046162 000046 000120 4002 046144 P1890 4002 047470 4002 046664 000046 000120 4002 047044 P1897 4002 054016 4002 047564 000046 000332 4002 053250 P1934 4002 054460 4002 054202 000046 000100 4002 054040 P1938 4002 055462 4002 054540 000046 000126 4002 055032 P1949 4002 056346 4002 055560 000046 000140 4002 055722 P1954 4002 062132 4002 056462 000046 000252 4002 061424 P1984 4002 064330 4002 062276 000046 000222 4002 063642 P1101 4002 066512 4002 064464 000046 000240 4002 066024 P883 4002 100162 4002 066664 000046 000514 4002 077240 P422 4002 101662 4002 100354 000046 000160 4002 101214 P2144 4002 103614 4002 101774 000046 000204 4002 103126 P2170 4002 106640 4002 103732 000046 000136 4002 106146 P2173 4002 110414 4002 106704 000046 000116 4002 107752 P2176 4002 117736 4002 110470 000046 000276 4002 117150 P2193 4002 122402 4002 120046 000046 000142 4002 121724 P2196 4002 124152 4002 122466 000046 000176 4002 123440 P2201 4002 124716 4002 124236 000046 000064 4002 124270 P2205 4002 130422 4002 124754 000046 000142 4002 127726 P2208 4002 144354 4002 130470 000046 000633 4002 143354 P2213 4002 151110 4002 144610 000046 000100 4002 150452 P2216 4002 152450 4002 151152 000046 000076 4002 152026 P2223 4002 154676 4002 152524 000046 000120 4002 154222 P2226 4002 161064 4002 154742 000046 000174 4002 160332 P2229 4002 164266 4002 161126 000046 000112 4002 163630 P2240 4002 174114 4002 164342 000046 000104 4002 173454 P2204 4002 174350 4002 174160 000046 000062 4002 173740 P$MAIN 4002 174614 4003 001000 000046 000356 4002 174022 MAIN 4003 006604 4002 175000 000046 031504 4003 006200 P$ADI 4002 175076 4002 175060 000042 000026 4002 174476 P$AND 4002 175144 4002 175124 000042 000026 4002 174544 P$CHK 4002 175276 4002 175172 000052 000032 4002 174674 P$CHKA 4002 175426 4002 175326 000052 000034 4002 175024 P$DAT 4002 175532 4002 175460 000064 000030 4002 175130 P$DEC 4002 175572 4002 175560 000050 000024 4002 175172 P$DIF 4002 175656 4002 175616 000044 000030 4002 175254 P$DVI 4002 175724 4002 175704 000042 000026 4002 175324 P$ELN 4002 176030 4002 175752 000046 000024 4002 175430 P$ENT 4002 176142 4002 176054 000050 000032 4002 175542 P$EOF 4002 176226 4002 176174 000044 000024 4002 175626 P$EQU 4002 176372 4002 176252 000054 000040 4002 175764 P$GEQ 4002 176620 4002 176424 000054 000046 4002 176212 P$GRT 4002 177042 4002 176660 000054 000042 4002 176436 P$INC 4002 177112 4002 177100 000050 000024 4002 176512 P$IND 4002 177220 4002 177136 000052 000032 4002 176616 P$INN 4002 177326 4002 177250 000046 000130 4002 176724 P$IOR 4002 177476 4002 177454 000042 000026 4002 177076 P$IXA 4002 177550 4002 177524 000046 000026 4002 177150 P$LAO 4002 177612 4002 177576 000046 000024 4002 177212 P$LCA 4002 177652 4002 177636 000046 000024 4002 177252 P$LDA 4002 177716 4002 177676 000050 000026 4002 177316 P$LDC 4002 177746 4003 040304 000052 000030 4002 177344 P$LDO 4003 040410 4003 040356 000050 000030 4003 040006 P$LDOS 4003 040556 4003 040436 000052 000026 4003 040154 P$LEQ 4003 041006 4003 040602 000054 000050 4003 040376 P$LES 4003 041224 4003 041046 000052 000044 4003 040616 P$LOD 4003 041306 4003 041262 000050 000026 4003 040706 P$LODA 4003 041360 4003 041334 000050 000026 4003 040760 P$LODS 4003 041424 4003 041406 000052 000024 4003 041024 P$MOD 4003 041470 4003 041450 000042 000026 4003 041070 P$MOV 4003 041566 4003 041516 000052 000026 4003 041166 P$MPI 4003 041634 4003 041614 000042 000026 4003 041234 P$MST 4003 041716 4003 041662 000046 000040 4003 041314 P$NEQ 4003 042072 4003 041754 000052 000040 4003 041464 P$NEW 4003 042202 4003 042124 000044 000034 4003 041602 P$NGI 4003 042236 4001 177766 000042 000024 4003 041636 P$NOT 4003 042304 4003 042262 000042 000024 4003 041704 P$PAG 4003 042416 4003 042330 000044 000030 4003 042014 P$RDC 4003 042616 4003 042444 000046 000032 4003 042214 P$RST 4003 042664 4003 042646 000042 000026 4003 042264 P$SAV 4003 042736 4003 042712 000044 000026 4003 042336 P$SBI 4003 043002 4003 042764 000042 000026 4003 042402 P$SGS 4003 043204 4003 043030 000046 000130 4003 042602 P$SRO 4003 043366 4003 043332 000050 000030 4003 042764 P$SROS 4003 043602 4003 043414 000056 000030 4003 043200 P$STO 4003 043702 4003 043630 000050 000034 4003 043300 P$STP 4003 043734 4002 177774 000042 000022 4003 043334 P$STR 4003 044004 4003 043756 000052 000026 4003 043404 P$STRA 4003 044060 4003 044032 000052 000026 4003 043460 P$STRS 4003 044124 4003 044106 000052 000024 4003 043524 P$UJC 4003 044172 4003 044150 000042 000022 4003 043572 P$UNI 4003 044260 4003 044214 000046 000032 4003 043656 P$WLN 4003 044360 4003 044310 000044 000030 4003 043756 P$WRC 4003 044502 4003 044406 000046 000036 4003 044100 P$WRI 4003 044612 4003 044536 000050 000034 4003 044212 P$WRS 4003 045024 4003 044646 000054 000040 4003 044422 P$BASE 4003 045114 4003 045062 000052 000024 4003 044514 P$COMP 4003 045420 4003 045140 000066 000032 4003 045016 P$INIT 4003 045540 4003 045450 000050 000050 4003 045134 P$FJP 4003 046036 4003 045604 000022 000236 4003 045436 P$XJP 4003 046056 4003 045625 000022 000236 4003 045436 P$CUP 4003 046076 4003 045644 000022 000236 4003 045436 P$RET 4003 046116 4003 045656 000022 000236 4003 045436 P$BOMB 4003 046136 4003 045704 000022 000236 4003 045436 P$SPC 4003 046202 4003 045741 000022 000236 4003 045436 P$LPC 4003 046222 4003 045777 000022 000236 4003 045436 P$WALK 4003 046457 4003 046274 000050 000000 4001 177376 MOVE2S 4003 046632 4003 046502 000024 000020 4003 046232 F$LT71 4003 047040 4003 046702 000020 000000 4001 177376 F$RT71 4003 047060 4003 046725 000020 000000 4001 177376 F$LT77 4003 047100 4003 047004 000020 000000 4001 177376 F$RT77 4003 047120 4003 047011 000020 000000 4001 177376 F$OR77 4003 047154 4003 047140 000020 000020 4003 046554 F$ERX 4003 047222 4003 047174 000020 000026 4003 046622 DIRECT ENTRY LINKS SWT 4003 046652 PRINT 4003 046656 DATE 4003 046662 GETCH 4003 046666 REMARK 4003 046672 PUTCH 4003 046676 EXIT 4003 047250 TNOU 4003 047254 TNOUA 4003 047260 GCHAR 4003 047264 COMMON BLOCKS MP 4000 000700 SP 4000 000701 EP 4000 000702 NP 4000 000703 CSTORE 4004 000000 OTHER SYMBOLS SWT$TP 2030 120000 F192QFP5 4001 177776 SWT$CM 4040 010000