00010* PROGRAM TO RUN MCE EXAMPLES FROM MANUAL
00020 PROG MCETESTS
0000310 00030 ORG 200
00040 ADMODE4
0000310 W 4260 00050 START CAM 60
00060*
0000312 W 1540001143000011+00430 LOOP LCA (TABPTR-3),FMTPTR
0000323 W 3500001153000011+00430 BS FOUR,TABPTR
0000334 W 1540001143000011+00430 LCA (TABPTR-3),INPPTR
0000345 W 3500001153000011+00430 BS FOUR,TABPTR
0000356 W 1540001143000011+00430 LCA (TABPTR-3),RESPTR
0000367 W 3500001153000011+00430 BS FOUR,TABPTR
0000400 W 6500000512 00430 B RUN1
0000405 W 6600001126110200 00420 PDT COL1,11,02,00
0000415 W 6400000415110200 00430 PCB *,11,02,00
0000425 W 6640001120110200 00420 PDT (RESPTR-3),11,02,00
0000435 W 6400000435110200 00430 PCB *,11,02,00
0000445 W 6600001130110202 00420 PDT EXPECT,11,02,02
0000455 W 6400000455110200 00430 PCB *,11,02,00
0000465 W 3700001152000011+00430 S ONE,TABCTR
0000476 W 650000051160 00430 BCT DONE,60
0000504 W 6500000312 00430 B LOOP
00060*
0000511 W 45 00440 DONE H
00450*
0000512 W 240000101570 00430 RUN1 SCR RUN1X,70
0000520 W 1540001110000010+00430 LCA (FMTPTR-3),FORMAT
0000531 W 240000110370 00430 SCR PRTPTR,70
0000537 W 3400001152000011+00430 BA ONE,PRTPTR
0000550 W 1540001114000010+00430 LCA (INPPTR-3),NUMFMT
0000561 W 240000110770 00430 SCR NUMPTR,70
0000567 W 3400001152000011+00430 BA ONE,NUMPTR
0000600 W 6600001126110200 00420 PDT COL1,11,02,00
0000610 W 6400000610110200 00430 PCB *,11,02,00
0000620 W 6640001100110200 00420 PDT (PRTPTR-3),11,02,00
0000630 W 6400000630110200 00430 PCB *,11,02,00
0000640 W 6600001124110200 00420 PDT COL3,11,02,00
0000650 W 6400000650110200 00430 PCB *,11,02,00
0000660 W 6640001104110200 00420 PDT (NUMPTR-3),11,02,00
0000670 W 6400000670110200 00430 PCB *,11,02,00
0000700 W 6600001126110201 00420 PDT COL1,11,02,01
0000710 W 6400000710110200 00430 PCB *,11,02,00
0000720 W 7400001076000010+00430 MCE NUMFMT,FORMAT TEST THE FORMAT
0000731 W 6600001126110200 00420 PDT COL1,11,02,00
0000741 W 6400000741110200 00430 PCB *,11,02,00
0000751 W 6640001100110200 00420 PDT (PRTPTR-3),11,02,00
0000761 W 6400000761110200 00430 PCB *,11,02,00
0000771 W 6600001126110201 00420 PDT COL1,11,02,01
0001001 W 6400001001110200 00430 PCB *,11,02,00
0001011 W 6500000000 00430 RUN1X B 0
00450*
0001016 0000000000000000+00460 FORMAT DC #32B0 SOMETHING DOESNT LIKE UNINITIALIZED SPACE
0001056 R 15 00460 F DC #1A
0001057 0000000000000000+00460 NUMFMT DC #16B0 SOMETHING DOESNT LIKE UNINITIALIZED SPACE
0001077 R 15 00460 F DC #1A
0001100 W 00000000 00460 PRTPTR DSA 0
0001104 W 00000000 00460 NUMPTR DSA 0
0001110 W 00000000 00460 FMTPTR DSA 0
0001114 W 00000000 00460 INPPTR DSA 0
0001120 W 00000000 00460 RESPTR DSA 0
0001124 R 14151467 00460 F COL3 DC @: :X@
0001126 00460 COL1 EQU *-2
0001130 R 1415256747252363+00460 F EXPECTDC @: EXPECTEDX@
0001143 W 00001762 00460 TABPTR DSA TABLE
0001147 W 000120 00460 TABCTR DCW +010
00450*
0001152 W 01 00460 ONE DCW #1B1
0001153 W 04 00460 FOUR DCW #1B4
00450*
0001154 W 00000000001151 00460 EX1NUM DCW -0000099
0001163 WR 1515157315150033+00470 MEX1FMT DCW @ , 0. ??-X@
0001201 R 1515151515151533+00000 F EX1RESDC @ .99 -X@
0001217 W 00000000001131 00460 EX1NUA DCW +0000099
0001226 R 1515151515151533+00000 F EX1READC @ .99 X@
00520*
0001244 W 0205040504111026 00530 EX2NUM DCW +25454986
0001254 WR 1515153715153715+00540 MEX2FMT DCW @ ? ? X@
0001267 R 0205041505041511+00000 F EX2RESDC @254 54 986X@
00570*
0001302 W 000000040520 00580 EX3NUM DCW +000450
0001310 WR 5315731515003315+00590 MEX3FMT DCW @$ , 0. ?©*X@
0001325 R 5315151515043305+00000 F EX3RESDC @$ 4.50 *X@
0001342 W 000000040540 00580 EX3NUA DCW -000450
0001350 R 5315151515043305+00000 F EX3READC @$ 4.50 ©*X@
00620*
0001365 W 0000101107040425 00630 EX4NUM DCW +00897445
0001375 WR 1515151573155300+00640 MEX4FMT DCW @ , $0. X@
0001411 R 1515531073110704+00000 F EX4RESDC @ $8,974.45X@
00670*
0001425 W 00000100040520 00680 EX5NUM DCW +0010450
0001434 WR 1515731554003315+00690 MEX5FMT DCW @ , *0. X@
0001446 R 5454540100043305+00000 F EX5RESDC @***104.50X@"
00670*
0001460 W 030423 00680 EX6NUM DCW +343
0001463 WR 15153315157567 00690 MEX6FMT DCW @ . ©X@
0001472 R 15033304031567 00000 F EX6RESDC @ 3.43 X@
00670*
0001501 W 1500000001030403 00680 EX7NUM DCW @ 0001343@
0001511 WR 1515151515530015+00690 MEX7FMT DCW @ $0 . ?©X@
0001527 R 1515151515530103+00000 F EX7RESDC @ $13.43 X@
0001545 W 1500000000000403 00680 EX7NUA DCW @ 0000043@
0001555 R 1515151515155300+00000 F EX7READC @ $0.43 X@
00720*
0001573 W 00001555 00680 DSA EX7REA
0001577 W 00001554 00680 DSA EX7NUA
0001603 W 00001525 00680 DSA EX7FMT-1
00720*
0001607 W 00001527 00680 DSA EX7RES
0001613 W 00001510 00680 DSA EX7NUM
0001617 W 00001525 00680 DSA EX7FMT-1
00720*
0001623 W 00001472 00680 DSA EX6RES
0001627 W 00001462 00680 DSA EX6NUM
0001633 W 00001470 00680 DSA EX6FMT-1
00720*
0001637 W 00001446 00680 DSA EX5RES
0001643 W 00001433 00680 DSA EX5NUM
0001647 W 00001444 00680 DSA EX5FMT-1
00720*
0001653 W 00001411 00680 DSA EX4RES
0001657 W 00001374 00680 DSA EX4NUM
0001663 W 00001407 00680 DSA EX4FMT-1
00720*
0001667 W 00001350 00680 DSA EX3REA
0001673 W 00001347 00680 DSA EX3NUA
0001677 W 00001323 00680 DSA EX3FMT-1
00720*
0001703 W 00001325 00680 DSA EX3RES
0001707 W 00001307 00680 DSA EX3NUM
0001713 W 00001323 00680 DSA EX3FMT-1
00720*
0001717 W 00001267 00680 DSA EX2RES
0001723 W 00001253 00680 DSA EX2NUM
0001727 W 00001265 00680 DSA EX2FMT-1
00720*
0001733 W 00001226 00680 DSA EX1REA
0001737 W 00001225 00680 DSA EX1NUA
0001743 W 00001177 00680 DSA EX1FMT-1
00720*
0001747 W 00001201 00680 DSA EX1RES
0001753 W 00001162 00680 DSA EX1NUM
0001757 W 00001177 00680 TABLE DSA EX1FMT-1
00720*
0000310 00730 END START
Symbol Table:
EX4FMT 0001410 EX6RES 0001472 EX5NUM 0001433 PRTPTR 0001103 RUN1 0000512 RUN1X 0001015 EX3RES 0001325
EX7RES 0001527 EX1REA 0001226 EX3FMT 0001324 EX2FMT 0001266 RESPTR 0001123 FOUR 0001153 FMTPTR 0001113
EX7NUM 0001510 EX6FMT 0001471 EX3NUA 0001347 EXPECT 0001130 TABLE 0001762 EX7REA 0001555 COL3 0001124
ONE 0001152 TABCTR 0001151 COL1 0001126 EX6NUM 0001462 EX1NUA 0001225 INPPTR 0001117 EX5FMT 0001445
NUMFMT 0001076 EX5RES 0001446 EX1NUM 0001162 EX7NUA 0001554 EX7FMT 0001526 EX3REA 0001350 DONE 0000511
EX4RES 0001411 LOOP 0000312 NUMPTR 0001107 START 0000310 TABPTR 0001146 EX1FMT 0001200 EX2NUM 0001253
FORMAT 0001055 EX1RES 0001201 EX4NUM 0001374 EX2RES 0001267 EX3NUM 0001307
: , 0. ??-: :000009R:
: .99 -:
: .99 -: EXPECTED
: , 0. ??-: :000009I:
: .99 :
: .99 : EXPECTED
: ? ? : :2545498F:
:254 54 986:
:254 54 986: EXPECTED
:$ , 0. ?©*: :00045+:
:$ 4.50 *:
:$ 4.50 *: EXPECTED
:$ , 0. ?©*: :00045-:
:$ 4.50 ©*:
:$ 4.50 ©*: EXPECTED
: , $0. : :0089744E:
: $8,974.45:
: $8,974.45: EXPECTED
: , *0. : :001045+:
:***104.50:
:***104.50: EXPECTED
: . ©: :34C:
: 3.43 :
: 3.43 : EXPECTED
: $0 . ?©: : 0001343:
: $13.43 :
: $13.43 : EXPECTED
: $0 . ?©: : 0000043:
: $0.43 :
: $0.43 : EXPECTED
Memory Dump: 0000310 - 0001762
0000200 1 2 3 4 5 6 7 0000300 1 2 3 4 5 6 7
K< -09L009=%009$009O -09L009&%009$009O -09L009C%009$009O
46140140011300150014140140011300150014140140012300150014
20500130013500130016500130017500130016500130013500130016
W W W W W W W
0000400 1 2 3 4 5 6 7 0000500 1 2 3 4 5 6 7
V005'W009F920U004 920W-09+920U004%920W009H922U004"920?009#009RV0059<V003'ND008 Y -098008"D0093Y)009#0093 -09:008□D0097Y)009#0097
60001600121006000110064012100600031006001310060005100300150015600016600014200117140110015200107300150010140110017200107300150010
50052600161204004512060010120400451206001012240045120700120011500510500325400050500100005400130400120013500140006400170400120017
W W W W W W W W W W WW W W W W W W
0000600 1 2 3 4 5 6 7 0000700 1 2 3 4 5 6 7
W009F920U0068920W-090920U006H920W009D920U006Q920W-094920U006Y920W009F921U0078920(008□008"W009F920U007J920W-090920U007/920W009F92
60012100600011006401010060003100600121006000510064010100600071006001210060001100700170015600121006000410064010100600061006001210
60016120400601206001012040060120600141204006012060014120400601206001612140070120400060005600161204007112060010120400711206001612
W W W W W W W W W W W W W W W W
0001000 1 2 3 4 5 6 7 0001100 1 2 3 4 5 6 7
1U0081920V00450000000000000000000 $0.43 00000000 0000043 008J008X00 E00 *00 ": :X: EXPECTEDX00 @00-14000009R , 0. ??-
06001010060000000000000000000000011111150300111000000001000000010014001600120015001511161126422622600170040000000151117110311334
14000112050045000000000000000000055555530343555000000005000004350001000700550054005545474557753354700520001400000115553550355770
W W W R W RW W W W W R RW W WWW W
0001200 1 2 3 4 5 6 7 0001300 1 2 3 4 5 6 7
X .99 -X000009I .99 X2545498F ? ? X254 54 986X00045+$ , 0. ?©*X$ 4.50 *X00045-$ 4.50 ©*X0089744E
61111111311114600000131111111311111600000112111311311160001001110600000251711031137565111103001156000004511110300175600110002111
75555555311550700000115555555311555725454106555755755572545545106700045035355035575473555543505547000450355554350554700017445555
R RW RW W R RW W R RW RW W
0001400 1 2 3 4 5 6 7 0001500 1 2 3 4 5 6 7
, $0. X $8,974.45X001045+ , *0. X***104.50X34C . ©X 3.43 X 0001343 $0 . ?©X $13.43 X 0000043 $0.43 X00 "0
17150311611517100300600000021171503116555000300600211311761030016100000001111150131137611111500300116100000001111115030011600150
53530355755303174345700104505535403557444104350734355355575334357500013435555530535575755555313343557500000435555553034355700550
R RW W R RW W R RW W R RW RW W
0001600 1 2 3 4 5 6 7 0001700 1 2 3 4 5 6 7
0 *00 E00 G00 800 E00:@00:S00:Y00:O00:.00:M00:900=(00:700=Q00=P00=C00=E00=700=C00'X00'$00'V00'F00'E009¢00'1009S009¢
0150012001200110012001700160017001400130014001100170010001500140012001200100012001600150016001200120017001000160017
0540055005700500055004200420040004600430044004100340047003000370033003500370033002700230025002600250017002100120017
W W W W W W W W W W W W W W W W W W W W W W W W W W W W