simh-testsetgenerator/PDP8/tests/diags/maindec-8e-d0eb-pb.pal
2020-01-01 16:03:54 -08:00

644 lines
39 KiB
Text

TITLE "AUTOMATIC DISASSEMBLY OF maindec-8e-d0eb-pb.bin BY D8TAPE"
////////////////////////////////////////////////////////////////////////////////
/
/ Automatic Disassembly of maindec-8e-d0eb-pb.bin
/ Generated 2010 02 19 00:10:30
/ Generated by d8tape version 0.351
/ Visit http://www.pdp12.org/pdp8/software/index.html for updates
/
/ Symbol format:
/ AIx -- Auto-index variables (address range 001x)
/ Caaaa -- Constants (non-unique)
/ Daaaa -- Data (read/write variables)
/ Kvvvv -- Program-wide unique constants
/ Laaaa -- Labels for control flow targets
/ Saaaa -- Subroutines
/
/ Where:
/ aaaa is the definition address
/ vvvv is the value of the constant
/ x is the last digit of the address 001x for auto-index variables
/
/ 0714 locations used, 0570 code and 0124 data
////////////////////////////////////////////////////////////////////////////////
*0200
*0000
L0000,
D0000, 0000 / AND L0000
L0001,
D0001, 5001 / JMP L0001
D0002, 0002 / AND D0002
D0003, 0003 / AND D0003
D0004, 0000 / AND L0000
AND L0000 / @@0005=0000
*0200
C0200, 6007 / 6007
JMP I C0202 / long jump to L6600 @@0201=5602
C0202,
C0202, 6600 / 6600
*6600
L6600,
CLA CLL / AC = 0000 @@6600=7300
DCA D6776 / @@6601=3376
L6602,
LAS / @@6602=7604
AND C6771 / @@6603=0371
SZA CLA / @@6604=7640
JMP L6624 / @@6605=5224
JMS I C6746 / long call to S7000 @@6606=4746
DCA D6755 / @@6607=3355
CMA / @@6610=7040
AND L0001 / @@6611=0001
DCA D6753 / @@6612=3353
CMA / @@6613=7040
AND D0002 / @@6614=0002
DCA D6754 / @@6615=3354
CMA / @@6616=7040
AND D0003 / @@6617=0003
DCA D6756 / @@6620=3356
CMA / @@6621=7040
AND D0004 / @@6622=0004
DCA D6757 / @@6623=3357
L6624,
LAS / @@6624=7604
AND C6772 / @@6625=0372
SZA CLA / @@6626=7640
JMP L6634 / @@6627=5234
CMA / @@6630=7040
AND D6760 / @@6631=0360
JMS I C6752 / long call to S7430 @@6632=4752
DCA D6760 / @@6633=3360
L6634,
LAS / @@6634=7604
AND C6773 / @@6635=0373
SZA CLA / @@6636=7640
JMP L6644 / @@6637=5244
CMA / @@6640=7040
AND D6761 / @@6641=0361
JMS I C6752 / long call to S7430 @@6642=4752
DCA D6761 / @@6643=3361
L6644,
CLA CLL CMA / AC = 7777 (-0001) @@6644=7340
AND D6753 / @@6645=0353
DCA I D6754 / @@6646=3754
CMA / @@6647=7040
AND D6755 / @@6650=0355
SNA CLA / @@6651=7650
JMP L6702 / @@6652=5302
CMA / @@6653=7040
AND D6756 / @@6654=0356
AND C6767 / @@6655=0367
SZA CLA / @@6656=7640
JMP L6676 / @@6657=5276
CMA / @@6660=7040
AND D6756 / @@6661=0356
AND C6775 / @@6662=0375
SNA CLA / @@6663=7650
JMP L6676 / @@6664=5276
CMA / @@6665=7040
AND D6757 / @@6666=0357
CIA / @@6667=7041
CMA / @@6670=7040
DCA I D6756 / @@6671=3756
L6672,
CMA / @@6672=7040
AND D6760 / @@6673=0360
DCA I D6757 / @@6674=3757
JMP L6705 / @@6675=5305
L6676,
CMA / @@6676=7040
AND D6757 / @@6677=0357
DCA I D6756 / @@6700=3756
JMP L6672 / @@6701=5272
L6702,
CMA / @@6702=7040
AND D6760 / @@6703=0360
DCA I D6756 / @@6704=3756
L6705,
CLA CLL CMA / AC = 7777 (-0001) @@6705=7340
AND D6760 / @@6706=0360
MQL / @@6707=7421
CMA / @@6710=7040
AND D6761 / @@6711=0361
JMS I C6751 / long call to S7200 @@6712=4751
DCA D6763 / @@6713=3363
RAR / @@6714=7010
DCA D6762 / @@6715=3362
CMA / @@6716=7040
AND C6747 / @@6717=0347
DCA L0000 / @@6720=3000
CMA / @@6721=7040
AND D6754 / @@6722=0354
IAC / @@6723=7001
SNA / @@6724=7450
JMP L6602 / @@6725=5202
DCA D6745 / @@6726=3345
CMA / @@6727=7040
AND C6766 / @@6730=0366
DCA I D6745 / @@6731=3745
CLL CMA / @@6732=7140
AND D6761 / @@6733=0361
JMP I D6754 / long jump to L0000 @@6734=5754
DCA D6764 / @@6735=3364
RAR / @@6736=7010
DCA D6765 / @@6737=3365
JMS I C6774 / long call to S7313 @@6740=4774
ISZ D6776 / @@6741=2376
JMP L6602 / @@6742=5202
JMS I C6750 / long call to S7442 @@6743=4750
JMP L6602 / @@6744=5202
D6745, 0000 / AND L0000
C6746,
C6746, 7000 / NOP
C6747, 6735 / 6735
C6750,
C6750, 7442 / SZA HLT
C6751,
C6751, 7200 / CLA
C6752,
C6752, 7430 / SZL
D6753, 0000 / AND L0000
D6754, 0000 / AND L0000
D6755, 0000 / AND L0000
D6756, 0000 / AND L0000
D6757, 0000 / AND L0000
D6760, 0021 / AND C0021
D6761, 0037 / AND C0037
D6762, 0000 / AND L0000
D6763, 0000 / AND L0000
D6764, 0000 / AND L0000
D6765, 0000 / AND L0000
C6766, 5400 / JMP I L0000
C6767, 7760 / SMA SZA SNL CLA
SPA SNA SZL CLA / @@6770=7770
C6771, 0001 / AND L0001
C6772, 0002 / AND D0002
C6773, 0004 / AND D0004
C6774,
C6774, 7313 / CLA CLL IAC RTR
C6775, 0010 / AND AI0
D6776, 0000 / AND L0000
*7000
////////////////////////////////////////////////////////////////////////////////
/
/ SUBROUTINE: S7000
/
/ Called from:
/ 6606
/ Total 0001 (1) calls
////////////////////////////////////////////////////////////////////////////////
S7000,
0 / return area
L7001,
C7001, 7040 / CMA
AND D7150 / @@7002=0350
JMS I C7162 / long call to S7430 @@7003=4762
DCA D7150 / @@7004=3350
CMA / @@7005=7040
AND D7150 / @@7006=0350
MQL / @@7007=7421
CMA / @@7010=7040
AND C7165 / @@7011=0365
MQA / @@7012=7501
AND C7152 / @@7013=0352
DCA L0001 / @@7014=3001
CMA / @@7015=7040
AND L0001 / @@7016=0001
AND C7155 / @@7017=0355
DCA D7161 / @@7020=3361
L7021,
CMA / @@7021=7040
AND D7153 / @@7022=0353
JMS I C7162 / long call to S7430 @@7023=4762
DCA D7153 / @@7024=3353
CMA / @@7025=7040
AND D7153 / @@7026=0353
JMS I C7177 / long call to S7303 @@7027=4777
JMP L7021 / @@7030=5221
CMA / @@7031=7040
AND D7153 / @@7032=0353
AND C7154 / @@7033=0354
SZA CLA / @@7034=7640
JMP L7044 / @@7035=5244
CMA / @@7036=7040
AND D7153 / @@7037=0353
L7040,
JMS I C7176 / long call to S7474 @@7040=4776
SMA CLA / @@7041=7700
JMP L7021 / @@7042=5221
JMP L7055 / @@7043=5255
L7044,
CMA / @@7044=7040
AND L0001 / @@7045=0001
AND C7157 / @@7046=0357
SNA CLA / @@7047=7650
JMP L7055 / @@7050=5255
CMA / @@7051=7040
AND D7153 / @@7052=0353
AND C7155 / @@7053=0355
JMP L7040 / @@7054=5240
L7055,
CMA / @@7055=7040
AND D7161 / @@7056=0361
SNA CLA / @@7057=7650
JMP L7001 / @@7060=5201
CMA / @@7061=7040
AND D7153 / @@7062=0353
DCA D0002 / @@7063=3002
CMA / @@7064=7040
AND L0001 / @@7065=0001
AND C7157 / @@7066=0357
SNA CLA / @@7067=7650
JMP L7107 / @@7070=5307
CMA / @@7071=7040
AND D0002 / @@7072=0002
AND C7154 / @@7073=0354
MQL / @@7074=7421
CMA / @@7075=7040
AND D7161 / @@7076=0361
MQA / @@7077=7501
DCA D0003 / @@7100=3003
L7101,
CMA / @@7101=7040
AND L0001 / @@7102=0001
AND C7156 / @@7103=0356
SZA CLA / @@7104=7640
JMP L7113 / @@7105=5313
JMP I S7000 / return @@7106=5600
L7107,
CMA / @@7107=7040
AND D7161 / @@7110=0361
DCA D0003 / @@7111=3003
JMP L7101 / @@7112=5301
L7113,
CMA / @@7113=7040
AND D7160 / @@7114=0360
JMS I C7162 / long call to S7430 @@7115=4762
DCA D7160 / @@7116=3360
CMA / @@7117=7040
AND D7160 / @@7120=0360
JMS I C7177 / long call to S7303 @@7121=4777
JMP L7113 / @@7122=5313
CMA / @@7123=7040
AND D0002 / @@7124=0002
JMS I C7175 / long call to S7507 @@7125=4775
SMA CLA / @@7126=7700
JMP L7113 / @@7127=5313
CMA / @@7130=7040
AND D0003 / @@7131=0003
JMS I C7175 / long call to S7507 @@7132=4775
SMA CLA / @@7133=7700
JMP L7113 / @@7134=5313
CMA / @@7135=7040
AND D7160 / @@7136=0360
CIA / @@7137=7041
CMA / @@7140=7040
SNA CLA / @@7141=7650
JMP L7113 / @@7142=5313
CMA / @@7143=7040
AND D7160 / @@7144=0360
DCA D0004 / @@7145=3004
CMA / @@7146=7040
JMP I S7000 / return @@7147=5600
D7150, 0001 / AND L0001
AND D0003 / @@7151=0003
C7152, 1777 / TAD I C7177
D7153, 0005 / AND C0005
C7154, 7600 / 7600
C7155, 0177 / AND C0177
C7156, 0400 / AND I L0000
C7157, 0200 / AND S7000
D7160, 0015 / AND AI5
D7161, 0000 / AND L0000
C7162,
C7162, 7430 / SZL
CLA / @@7163=7200
C7164, 1201 / TAD L7001
C7165, 1000 / TAD L0000
*7175
C7175,
C7175, 7507 / MQA DVI +
C7176,
C7176, 7474 / SNA SZL OSR
C7177,
C7177, 7303 / CLA CLL IAC
*7200
////////////////////////////////////////////////////////////////////////////////
/
/ SUBROUTINE: S7200
/
/ Called from:
/ 6712 7307 7437 7501 7514
/ Total 0005 (5) calls
////////////////////////////////////////////////////////////////////////////////
S7200,
0 / return area
DCA D7344 / @@7201=3344
MQA / @@7202=7501
DCA D7343 / @@7203=3343
CLA CLL CMA / AC = 7777 (-0001) @@7204=7340
AND D7343 / @@7205=0343
MQL / @@7206=7421
CMA / @@7207=7040
AND D7344 / @@7210=0344
MQA / @@7211=7501
DCA D7345 / @@7212=3345
MQA / @@7213=7501
CMA / @@7214=7040
AND D7344 / @@7215=0344
MQL / @@7216=7421
CMA / @@7217=7040
AND D7344 / @@7220=0344
CMA / @@7221=7040
AND D7343 / @@7222=0343
MQA / @@7223=7501
DCA D7346 / @@7224=3346
DCA D7347 / @@7225=3347
CMA / @@7226=7040
AND D7343 / @@7227=0343
AND D7344 / @@7230=0344
SNA / @@7231=7450
JMP L7274 / @@7232=5274
MQL / @@7233=7421
L7234,
MQA MQL / @@7234=7521
AND D7345 / @@7235=0345
SNA / @@7236=7450
JMP L7244 / @@7237=5244
CLL RAL / @@7240=7104
MQA MQL / @@7241=7521
MQA / @@7242=7501
JMP L7234 / @@7243=5234
L7244,
MQA / @@7244=7501
AND D7345 / @@7245=0345
AND C7350 / @@7246=0350
SNA / @@7247=7450
JMP L7253 / @@7250=5253
DCA D7347 / @@7251=3347
JMP L7260 / @@7252=5260
L7253,
CLL CML RAR / @@7253=7130
AND D7343 / @@7254=0343
AND D7344 / @@7255=0344
SZA / @@7256=7440
DCA D7347 / @@7257=3347
L7260,
MQA / @@7260=7501
DCA D7351 / @@7261=3351
MQA / @@7262=7501
CMA / @@7263=7040
AND D7346 / @@7264=0346
MQL / @@7265=7421
CMA / @@7266=7040
AND D7346 / @@7267=0346
CMA / @@7270=7040
AND D7351 / @@7271=0351
MQA / @@7272=7501
DCA D7346 / @@7273=3346
L7274,
CLA CLL CMA / AC = 7777 (-0001) @@7274=7340
AND D7347 / @@7275=0347
SZA CLA / @@7276=7640
CML / @@7277=7020
CMA / @@7300=7040
AND D7346 / @@7301=0346
JMP I S7200 / return @@7302=5600
////////////////////////////////////////////////////////////////////////////////
/
/ SUBROUTINE: S7303
/
/ Called from:
/ 7027 7121
/ Total 0002 (2) calls
////////////////////////////////////////////////////////////////////////////////
S7303,
0 / return area
MQL / @@7304=7421
CMA / @@7305=7040
AND I C7377 / @@7306=0777
JMS S7200 / @@7307=4200
SNL CLA / @@7310=7620
ISZ S7303 / @@7311=2303
JMP I S7303 / return @@7312=5703
////////////////////////////////////////////////////////////////////////////////
/
/ SUBROUTINE: S7313
/
/ Called from:
/ 6740
/ Total 0001 (1) calls
////////////////////////////////////////////////////////////////////////////////
S7313,
0 / return area
CLA CLL CMA / AC = 7777 (-0001) @@7314=7340
AND I C7376 / @@7315=0776
SZA CLA / @@7316=7640
CML / @@7317=7020
CMA / @@7320=7040
AND I C7375 / @@7321=0775
SZA CLA / @@7322=7640
CML / @@7323=7020
SZL / @@7324=7430
JMP L7341 / @@7325=5341
CLA CLL CMA / AC = 7777 (-0001) @@7326=7340
AND I C7374 / @@7327=0774
CMA / @@7330=7040
AND I C7373 / @@7331=0773
SZA / @@7332=7440
JMP L7341 / @@7333=5341
CMA / @@7334=7040
AND I C7373 / @@7335=0773
CMA / @@7336=7040
AND I C7374 / @@7337=0774
SZA CLA / @@7340=7640
L7341,
JMS I C7352 / long call to S7400 @@7341=4752
JMP I S7313 / return @@7342=5713
D7343, 0000 / AND L0000
D7344, 0000 / AND L0000
D7345, 0000 / AND L0000
D7346, 0000 / AND L0000
D7347, 0000 / AND L0000
C7350, 4000 / JMS L0000
D7351, 0000 / AND L0000
C7352,
C7352, 7400 /
*7373
C7373, 6763 / 6763
C7374, 6764 / DTXA
C7375, 6765 / 6765
C7376, 6762 / DCTA
C7377, 7164 / CLL CMA CML RAL
*7400
////////////////////////////////////////////////////////////////////////////////
/
/ SUBROUTINE: S7400
/
/ Called from:
/ 7341
/ Total 0001 (1) calls
////////////////////////////////////////////////////////////////////////////////
S7400,
0 / return area
LAS / @@7401=7604
AND C7467 / @@7402=0267
SZA CLA / @@7403=7640
JMP I S7400 / return @@7404=5600
STA / AC = 7777 (-0001) @@7405=7240
AND I C7577 / @@7406=0777
HLT / @@7407=7402
STA / AC = 7777 (-0001) @@7410=7240
AND I C7576 / @@7411=0776
HLT / @@7412=7402
STA / AC = 7777 (-0001) @@7413=7240
AND I C7575 / @@7414=0775
HLT / @@7415=7402
STA / AC = 7777 (-0001) @@7416=7240
AND I C7574 / @@7417=0774
HLT / @@7420=7402
STA / AC = 7777 (-0001) @@7421=7240
AND I C7573 / @@7422=0773
HLT / @@7423=7402
STA / AC = 7777 (-0001) @@7424=7240
AND I C7572 / @@7425=0772
HLT / @@7426=7402
JMP I S7400 / return @@7427=5600
////////////////////////////////////////////////////////////////////////////////
/
/ SUBROUTINE: S7430
/
/ Called from:
/ 6632 6642 7003 7023 7115
/ Total 0005 (5) calls
////////////////////////////////////////////////////////////////////////////////
S7430,
0 / return area
CLL RAL / @@7431=7104
SNL / @@7432=7420
JMP L7440 / @@7433=5240
MQL / @@7434=7421
CMA / @@7435=7040
AND C7441 / @@7436=0241
JMS I C7571 / long call to S7200 @@7437=4771
L7440,
JMP I S7430 / return @@7440=5630
C7441, 0003 / AND D0003
////////////////////////////////////////////////////////////////////////////////
/
/ SUBROUTINE: S7442
/
/ Called from:
/ 6743
/ Total 0001 (1) calls
////////////////////////////////////////////////////////////////////////////////
S7442,
0 / return area
LAS / @@7443=7604
AND C7470 / @@7444=0270
SZA CLA / @@7445=7640
JMP I S7442 / return @@7446=5642
CMA / @@7447=7040
AND C7471 / @@7450=0271
JMS S7461 / @@7451=4261
CMA / @@7452=7040
AND C7472 / @@7453=0272
JMS S7461 / @@7454=4261
CMA / @@7455=7040
AND C7473 / @@7456=0273
JMS S7461 / @@7457=4261
JMP I S7442 / return @@7460=5642
////////////////////////////////////////////////////////////////////////////////
/
/ SUBROUTINE: S7461
/
/ Called from:
/ 7451 7454 7457
/ Total 0003 (3) calls
////////////////////////////////////////////////////////////////////////////////
S7461,
0 / return area
TLS / Load the TTO from the content of AC4 @@7462=6046
L7463,
TSF / Skip if teleprinter flag is a 1. @@7463=6041
JMP L7463 / @@7464=5263
CLA / @@7465=7200
JMP I S7461 / return @@7466=5661
C7467, 4000 / JMS L0000
C7470, 0400 / AND I L0000
C7471, 0215 / AND C7415
C7472, 0212 / AND C7412
C7473, 0324 / AND C7524
////////////////////////////////////////////////////////////////////////////////
/
/ SUBROUTINE: S7474
/
/ Called from:
/ 7040
/ Total 0001 (1) calls
////////////////////////////////////////////////////////////////////////////////
S7474,
0 / return area
CIA / @@7475=7041
MQL / @@7476=7421
CMA / @@7477=7040
AND I C7570 / @@7500=0770
JMS I C7571 / long call to S7200 @@7501=4771
SMA / @@7502=7500
CIA / @@7503=7041
IAC / @@7504=7001
IAC / @@7505=7001
JMP I S7474 / return @@7506=5674
////////////////////////////////////////////////////////////////////////////////
/
/ SUBROUTINE: S7507
/
/ Called from:
/ 7125 7132
/ Total 0002 (2) calls
////////////////////////////////////////////////////////////////////////////////
S7507,
0 / return area
CIA / @@7510=7041
MQL / @@7511=7421
CMA / @@7512=7040
AND I C7567 / @@7513=0767
JMS I C7571 / long call to S7200 @@7514=4771
SMA / @@7515=7500
CIA / @@7516=7041
IAC / @@7517=7001
IAC / @@7520=7001
JMP I S7507 / return @@7521=5707
*7567
C7567, 7160 / CLL CMA CML
C7570, 7161 / CLL CMA CML IAC
C7571,
C7571, 7200 / CLA
C7572, 6757 / 6757
C7573, 6756 / 6756
C7574, 6754 / 6754
C7575, 6753 / 6753
C7576, 6761 / DTRA
C7577, 6760 / 6760
$