/MAINDEC-8E-D0GC-Random-DCA
*0200
*0000
0000 /FEXIT /00000-0000 @@
5001 /LTR 0000 /00001-5001 (A
0002 /FCLA /00002-0002 @B
0003 /FNEG /00003-0003 @C
0000 /FEXIT /00004-0000 @@
0000 /FEXIT /00005-0000 @@
7771 /FMULM% BASE+03X7+ /00006-7771 ?9
0400 /FLDA L X0 0 /00007-0400 D@
0000 / 0000 /00010-0000 @@
0000 /FEXIT /00011-0000 @@
0300 /FLDA BASE+300 /00012-0300 C@
0207 /FLDA BASE+025 /00013-0207 BG
0003 /FNEG /00014-0003 @C
*0020
1175 /RESERVED /00020-1175 I=
3010 /TRAP3 0 /00021-3010 XH
3410 / 3410 /00022-3410 \H
1010 /JGE 0 /00023-1010 HH
7041 / 7041 /00024-7041 8!
1174 /RESERVED /00025-1174 I<
7640 /FMULM% BASE+00X4 /00026-7640 >
5022 /LTR 0002 /00027-5022 (R
7604 /FMULM% BASE+14X0 /00030-7604 >D
7006 /LEMUL%BASE+22X0 /00031-7006 8F
7510 /FMULML X1+ 0 /00032-7510 =H
5052 / 5052 /00033-5052 (*
4154 /TRAP4 4 /00034-4154 !,
3167 / 3167 /00035-3167 Y7
1167 /RESERVED /00036-1167 I7
7510 /FMULML X1+ 0 /00037-7510 =H
5046 / 5046 /00040-5046 (&
7041 /LEMUL%BASE+03X4 /00041-7041 8!
1175 /RESERVED /00042-1175 I=
7710 /FMULM% BASE+00X1+ /00043-7710 ?H
5052 /LTR 0005 /00044-5052 (*
5034 /LTR 0003 /00045-5034 (\
7041 /LEMUL%BASE+03X4 /00046-7041 8!
1174 /RESERVED /00047-1174 I<
7710 /FMULM% BASE+00X1+ /00050-7710 ?H
5034 /LTR 0003 /00051-5034 (\
7604 /FMULM% BASE+14X0 /00052-7604 >D
7006 /LEMUL%BASE+22X0 /00053-7006 8F
7004 /LEMUL%BASE+14X0 /00054-7004 8D
7510 /FMULML X1+ 0 /00055-7510 =H
5075 / 5075 /00056-5075 (=
4154 /TRAP4 4 /00057-4154 !,
3166 / 3166 /00060-3166 Y6
1166 /RESERVED /00061-1166 I6
7510 /FMULML X1+ 0 /00062-7510 =H
5071 / 5071 /00063-5071 (9
7041 /LEMUL%BASE+03X4 /00064-7041 8!
1175 /RESERVED /00065-1175 I=
7710 /FMULM% BASE+00X1+ /00066-7710 ?H
5075 /LTR 0007 /00067-5075 (=
5057 /LTR 0005 /00070-5057 (/
7041 /LEMUL%BASE+03X4 /00071-7041 8!
1174 /RESERVED /00072-1174 I<
7710 /FMULM% BASE+00X1+ /00073-7710 ?H
5057 /LTR 0005 /00074-5057 (/
7604 /FMULM% BASE+14X0 /00075-7604 >D
7006 /LEMUL%BASE+22X0 /00076-7006 8F
7006 /LEMUL%BASE+22X0 /00077-7006 8F
7710 /FMULM% BASE+00X1+ /00100-7710 ?H
5104 /LTR 0010 /00101-5104 )D
4154 /TRAP4 4 /00102-4154 !,
3170 / 3170 /00103-3170 Y8
1167 /RESERVED /00104-1167 I7
7041 /LEMUL%BASE+03X4 /00105-7041 8!
1166 /RESERVED /00106-1166 I6
7450 /FMULML X5 0 /00107-7450 <(
5030 / 5030 /00110-5030 (X
7041 /LEMUL%BASE+03X4 /00111-7041 8!
7040 /LEMUL%BASE+00X4 /00112-7040 8
7650 /FMULM% BASE+00X5 /00113-7650 >(
5030 /LTR 0003 /00114-5030 (X
1171 /RESERVED /00115-1171 I9
3567 /FDIV L X6+ 7 /00116-3567 ]7
1167 / 1167 /00117-1167 I7
7001 /LEMUL%BASE+03X0 /00120-7001 8A
3173 /TRAP3 3 /00121-3173 Y;
1172 / 1172 /00122-1172 I:
3573 /FDIV L X7+ 3 /00123-3573 ];
1170 / 1170 /00124-1170 I8
7000 /LEMUL%BASE+00X0 /00125-7000 8@
5567 /FADDML X6+ 7 /00126-5567 -7
7402 / 7402 /00127-7402 <B
1566 /FADD L X6+ 6 /00130-1566 M6
7041 / 7041 /00131-7041 8!
1170 /RESERVED /00132-1170 I8
7640 /FMULM% BASE+00X4 /00133-7640 >
4577 /FMUL L X7+ 7 /00134-4577 %?
3566 / 3566 /00135-3566 ]6
3567 /FDIV L X6+ 7 /00136-3567 ]7
3573 / 3573 /00137-3573 ];
1011 /JGE 1 /00140-1011 HI
7001 / 7001 /00141-7001 8A
3011 /TRAP3 1 /00142-3011 XI
1011 / 1011 /00143-1011 HI
1012 /JGE 2 /00144-1012 HJ
7640 / 7640 /00145-7640 >
5030 /LTR 0003 /00146-5030 (X
3011 /TRAP3 1 /00147-3011 XI
2006 / 2006 /00150-2006 PF
5030 /LTR 0003 /00151-5030 (X
4407 /FMUL L X0 7 /00152-4407 $G
5030 / 5030 /00153-5030 (X
0000 /FEXIT /00154-0000 @@
7200 /FMULM BASE+000 /00155-7200 :@
1165 /RESERVED /00156-1165 I5
7104 /LEMUL%BASE+14X0+ /00157-7104 9D
7430 /FMULML X3 0 /00160-7430 <X
1014 / 1014 /00161-1014 HL
3165 /TRAP3 5 /00162-3165 Y5
1165 / 1165 /00163-1165 I5
5554 /FADDML X5+ 4 /00164-5554 -,
2525 / 2525 /00165-2525 UU
3000 /TRAP3 0 /00166-3000 X@
3001 / 3001 /00167-3001 XA
2525 /FSUB L X2+ 5 /00170-2525 UU
3566 / 3566 /00171-3566 ]6
5130 /LTR 0013 /00172-5130 )X
3002 /TRAP3 2 /00173-3002 XB
7600 / 7600 /00174-7600 >@
0410 /FLDA L X1 0 /00175-0410 DH
0000 / 0000 /00176-0000 @@
0201 /FLDA BASE+003 /00177-0201 BA
*0200
5020 /LTR 0002 /00200-5020 (P
0000 /FEXIT /00201-0000 @@
7604 /FMULM% BASE+14X0 /00202-7604 >D
7004 /LEMUL%BASE+14X0 /00203-7004 8D
7710 /FMULM% BASE+00X1+ /00204-7710 ?H
5601 /FADDM% BASE+03X0 /00205-5601 .A
4265 /FMUL BASE+237 /00206-4265 "5
1175 /RESERVED /00207-1175 I=
3010 /TRAP3 0 /00210-3010 XH
1410 / 1410 /00211-1410 LH
7640 /FMULM% BASE+00X4 /00212-7640 >
4233 /FMUL BASE+121 /00213-4233 "[
1010 /JGE 0 /00214-1010 HH
7041 / 7041 /00215-7041 8!
1174 /RESERVED /00216-1174 I<
7640 /FMULM% BASE+00X4 /00217-7640 >
5211 /FADDM BASE+033 /00220-5211 *I
1374 /FADD BASE+564 /00221-1374 K<
4351 /FMUL BASE+473 /00222-4351 #)
1375 /FADD BASE+567 /00223-1375 K=
4351 /FMUL BASE+473 /00224-4351 #)
1376 /FADD BASE+572 /00225-1376 K>
4351 /FMUL BASE+473 /00226-4351 #)
7604 /FMULM% BASE+14X0 /00227-7604 >D
7700 /FMULM% BASE+00X0+ /00230-7700 ?@
7402 /FMULML X0 2 /00231-7402 <B
5601 / 5601 /00232-5601 .A
0000 /FEXIT /00233-0000 @@
1010 /JGE 0 /00234-1010 HH
7041 / 7041 /00235-7041 8!
1167 /RESERVED /00236-1167 I7
7650 /FMULM% BASE+00X5 /00237-7650 >(
5633 /FADDM% BASE+11X3 /00240-5633 .[
1010 /JGE 0 /00241-1010 HH
7041 / 7041 /00242-7041 8!
1173 /RESERVED /00243-1173 I;
7650 /FMULM% BASE+00X5 /00244-7650 >(
5633 /FADDM% BASE+11X3 /00245-5633 .[
1372 /FADD BASE+556 /00246-1372 K:
4351 /FMUL BASE+473 /00247-4351 #)
1010 /JGE 0 /00250-1010 HH
4310 / 4310 /00251-4310 #H
1010 /JGE 0 /00252-1010 HH
3176 / 3176 /00253-3176 Y>
1373 /FADD BASE+561 /00254-1373 K;
4351 /FMUL BASE+473 /00255-4351 #)
1576 /FADD L X7+ 6 /00256-1576 M>
4310 / 4310 /00257-4310 #H
1375 /FADD BASE+567 /00260-1375 K=
4351 /FMUL BASE+473 /00261-4351 #)
1376 /FADD BASE+572 /00262-1376 K>
4351 /FMUL BASE+473 /00263-4351 #)
5633 /FADDM% BASE+11X3 /00264-5633 .[
0000 /FEXIT /00265-0000 @@
7200 /FMULM BASE+000 /00266-7200 :@
1367 /FADD BASE+545 /00267-1367 K7
4351 /FMUL BASE+473 /00270-4351 #)
1167 /RESERVED /00271-1167 I7
4310 /FMUL BASE+330 /00272-4310 #H
1371 /FADD BASE+553 /00273-1371 K9
4351 /FMUL BASE+473 /00274-4351 #)
1166 /RESERVED /00275-1166 I6
4310 /FMUL BASE+330 /00276-4310 #H
1377 /FADD BASE+575 /00277-1377 K?
4351 /FMUL BASE+473 /00300-4351 #)
1170 /RESERVED /00301-1170 I8
4310 /FMUL BASE+330 /00302-4310 #H
1375 /FADD BASE+567 /00303-1375 K=
4351 /FMUL BASE+473 /00304-4351 #)
1376 /FADD BASE+572 /00305-1376 K>
4351 /FMUL BASE+473 /00306-4351 #)
5665 /FADDM% BASE+17X6 /00307-5665 .5
5310 /FADDM BASE+330 /00310-5310 +H
3366 /FDIV BASE+542 /00311-3366 [6
1366 /FADD BASE+542 /00312-1366 K6
7012 /LEMUL%BASE+06X1 /00313-7012 8J
7010 /LEMUL%BASE+00X1 /00314-7010 8H
3365 /FDIV BASE+537 /00315-3365 [5
1365 /FADD BASE+537 /00316-1365 K5
7012 /LEMUL%BASE+06X1 /00317-7012 8J
7010 /LEMUL%BASE+00X1 /00320-7010 8H
3364 /FDIV BASE+534 /00321-3364 [4
1364 /FADD BASE+534 /00322-1364 K4
7012 /LEMUL%BASE+06X1 /00323-7012 8J
7010 /LEMUL%BASE+00X1 /00324-7010 8H
3363 /FDIV BASE+531 /00325-3363 [3
1370 /FADD BASE+550 /00326-1370 K8
4351 /FMUL BASE+473 /00327-4351 #)
1357 /FADD BASE+515 /00330-1357 K/
3360 /FDIV BASE+520 /00331-3360 [0
1363 /FADD BASE+531 /00332-1363 K3
0361 /FLDA BASE+523 /00333-0361 C1
1362 /FADD BASE+526 /00334-1362 K2
4351 /FMUL BASE+473 /00335-4351 #)
1364 /FADD BASE+534 /00336-1364 K4
3363 /FDIV BASE+531 /00337-3363 [3
1365 /FADD BASE+537 /00340-1365 K5
3364 /FDIV BASE+534 /00341-3364 [4
1366 /FADD BASE+542 /00342-1366 K6
3365 /FDIV BASE+537 /00343-3365 [5
2360 /FSUB BASE+520 /00344-2360 S0
5332 /FADDM BASE+416 /00345-5332 +Z
1370 /FADD BASE+550 /00346-1370 K8
4351 /FMUL BASE+473 /00347-4351 #)
5710 /FADDM% BASE+00X1+ /00350-5710 /H
0000 /FEXIT /00351-0000 @@
6046 /LEMUL X4 6 /00352-6046 0&
6041 / 6041 /00353-6041 0!
5353 /FADDM BASE+501 /00354-5353 ++
7200 /FMULM BASE+000 /00355-7200 :@
5751 /FADDM% BASE+03X5+ /00356-5751 /)
7774 /FMULM% BASE+14X7+ /00357-7774 ?<
0000 /FEXIT /00360-0000 @@
0007 /JAC /00361-0007 @G
0260 /FLDA BASE+220 /00362-0260 B0
0000 /FEXIT /00363-0000 @@
0000 /FEXIT /00364-0000 @@
0000 /FEXIT /00365-0000 @@
0000 /FEXIT /00366-0000 @@
0306 /FLDA BASE+322 /00367-0306 CF
0240 /FLDA BASE+140 /00370-0240 B
0301 /FLDA BASE+303 /00371-0301 CA
0314 /FLDA BASE+344 /00372-0314 CL
0303 /FLDA BASE+311 /00373-0303 CC
0305 /FLDA BASE+317 /00374-0305 CE
0215 /FLDA BASE+047 /00375-0215 BM
0212 /FLDA BASE+036 /00376-0212 BJ
0317 /FLDA BASE+355 /00377-0317 CO
*0400
0000 /FEXIT /00400-0000 @@
1207 /FADD BASE+025 /00401-1207 JG
3006 /TRAP3 6 /00402-3006 XF
1013 / 1013 /00403-1013 HK
6046 /LEMUL X4 6 /00404-6046 0&
7200 / 7200 /00405-7200 :@
5600 /FADDM% BASE+00X0 /00406-5600 .@
7771 /FMULM% BASE+03X7+ /00407-7771 ?9
0000 /FEXIT /00410-0000 @@
0000 /FEXIT /00411-0000 @@
0000 /FEXIT /00412-0000 @@
0000 /FEXIT /00413-0000 @@
0000 /FEXIT /00414-0000 @@
0000 /FEXIT /00415-0000 @@
0000 /FEXIT /00416-0000 @@
0000 /FEXIT /00417-0000 @@
0000 /FEXIT /00420-0000 @@
0000 /FEXIT /00421-0000 @@
0000 /FEXIT /00422-0000 @@
0000 /FEXIT /00423-0000 @@
0000 /FEXIT /00424-0000 @@
0000 /FEXIT /00425-0000 @@
0000 /FEXIT /00426-0000 @@
0000 /FEXIT /00427-0000 @@
0000 /FEXIT /00430-0000 @@
0000 /FEXIT /00431-0000 @@
0000 /FEXIT /00432-0000 @@
0000 /FEXIT /00433-0000 @@
0000 /FEXIT /00434-0000 @@
0000 /FEXIT /00435-0000 @@
0000 /FEXIT /00436-0000 @@
0000 /FEXIT /00437-0000 @@
0000 /FEXIT /00440-0000 @@
0000 /FEXIT /00441-0000 @@
0000 /FEXIT /00442-0000 @@
0000 /FEXIT /00443-0000 @@
0000 /FEXIT /00444-0000 @@
0000 /FEXIT /00445-0000 @@
0000 /FEXIT /00446-0000 @@
0000 /FEXIT /00447-0000 @@
0000 /FEXIT /00450-0000 @@
0000 /FEXIT /00451-0000 @@
0000 /FEXIT /00452-0000 @@
0000 /FEXIT /00453-0000 @@
0000 /FEXIT /00454-0000 @@
0000 /FEXIT /00455-0000 @@
0000 /FEXIT /00456-0000 @@
0000 /FEXIT /00457-0000 @@
0000 /FEXIT /00460-0000 @@
0000 /FEXIT /00461-0000 @@
0000 /FEXIT /00462-0000 @@
0000 /FEXIT /00463-0000 @@
0000 /FEXIT /00464-0000 @@
0000 /FEXIT /00465-0000 @@
0000 /FEXIT /00466-0000 @@
0000 /FEXIT /00467-0000 @@
0000 /FEXIT /00470-0000 @@
0000 /FEXIT /00471-0000 @@
0000 /FEXIT /00472-0000 @@
0000 /FEXIT /00473-0000 @@
0000 /FEXIT /00474-0000 @@
0000 /FEXIT /00475-0000 @@
0000 /FEXIT /00476-0000 @@
0000 /FEXIT /00477-0000 @@
0000 /FEXIT /00500-0000 @@
0000 /FEXIT /00501-0000 @@
0000 /FEXIT /00502-0000 @@
0000 /FEXIT /00503-0000 @@
0000 /FEXIT /00504-0000 @@
0000 /FEXIT /00505-0000 @@
0000 /FEXIT /00506-0000 @@
0000 /FEXIT /00507-0000 @@
0000 /FEXIT /00510-0000 @@
0000 /FEXIT /00511-0000 @@
0000 /FEXIT /00512-0000 @@
0000 /FEXIT /00513-0000 @@
0000 /FEXIT /00514-0000 @@
0000 /FEXIT /00515-0000 @@
0000 /FEXIT /00516-0000 @@
0000 /FEXIT /00517-0000 @@
0000 /FEXIT /00520-0000 @@
0000 /FEXIT /00521-0000 @@
0000 /FEXIT /00522-0000 @@
0000 /FEXIT /00523-0000 @@
0000 /FEXIT /00524-0000 @@
0000 /FEXIT /00525-0000 @@
0000 /FEXIT /00526-0000 @@
0000 /FEXIT /00527-0000 @@
0000 /FEXIT /00530-0000 @@
0000 /FEXIT /00531-0000 @@
0000 /FEXIT /00532-0000 @@
0000 /FEXIT /00533-0000 @@
0000 /FEXIT /00534-0000 @@
0000 /FEXIT /00535-0000 @@
0000 /FEXIT /00536-0000 @@
0000 /FEXIT /00537-0000 @@
0000 /FEXIT /00540-0000 @@
0000 /FEXIT /00541-0000 @@
0000 /FEXIT /00542-0000 @@
0000 /FEXIT /00543-0000 @@
0000 /FEXIT /00544-0000 @@
0000 /FEXIT /00545-0000 @@
0000 /FEXIT /00546-0000 @@
0000 /FEXIT /00547-0000 @@
0000 /FEXIT /00550-0000 @@
0000 /FEXIT /00551-0000 @@
0000 /FEXIT /00552-0000 @@
0000 /FEXIT /00553-0000 @@
0000 /FEXIT /00554-0000 @@
0000 /FEXIT /00555-0000 @@
0000 /FEXIT /00556-0000 @@
0000 /FEXIT /00557-0000 @@
0000 /FEXIT /00560-0000 @@
0000 /FEXIT /00561-0000 @@
0000 /FEXIT /00562-0000 @@
0000 /FEXIT /00563-0000 @@
0000 /FEXIT /00564-0000 @@
0000 /FEXIT /00565-0000 @@
0000 /FEXIT /00566-0000 @@
0000 /FEXIT /00567-0000 @@
0000 /FEXIT /00570-0000 @@
0000 /FEXIT /00571-0000 @@
0000 /FEXIT /00572-0000 @@
0000 /FEXIT /00573-0000 @@
0000 /FEXIT /00574-0000 @@
0000 /FEXIT /00575-0000 @@
0000 /FEXIT /00576-0000 @@
0000 /FEXIT /00577-0000 @@
0000 /FEXIT /00600-0000 @@
0000 /FEXIT /00601-0000 @@
0000 /FEXIT /00602-0000 @@
0000 /FEXIT /00603-0000 @@
0000 /FEXIT /00604-0000 @@
0000 /FEXIT /00605-0000 @@
0000 /FEXIT /00606-0000 @@
0000 /FEXIT /00607-0000 @@
0000 /FEXIT /00610-0000 @@
0000 /FEXIT /00611-0000 @@
0000 /FEXIT /00612-0000 @@
0000 /FEXIT /00613-0000 @@
0000 /FEXIT /00614-0000 @@
0000 /FEXIT /00615-0000 @@
0000 /FEXIT /00616-0000 @@
0000 /FEXIT /00617-0000 @@
0000 /FEXIT /00620-0000 @@
0000 /FEXIT /00621-0000 @@
0000 /FEXIT /00622-0000 @@
0000 /FEXIT /00623-0000 @@
0000 /FEXIT /00624-0000 @@
0000 /FEXIT /00625-0000 @@
0000 /FEXIT /00626-0000 @@
0000 /FEXIT /00627-0000 @@
0000 /FEXIT /00630-0000 @@
0000 /FEXIT /00631-0000 @@
0000 /FEXIT /00632-0000 @@
0000 /FEXIT /00633-0000 @@
0000 /FEXIT /00634-0000 @@
0000 /FEXIT /00635-0000 @@
0000 /FEXIT /00636-0000 @@
0000 /FEXIT /00637-0000 @@
0000 /FEXIT /00640-0000 @@
0000 /FEXIT /00641-0000 @@
0000 /FEXIT /00642-0000 @@
0000 /FEXIT /00643-0000 @@
| 377 RUBOUT