TITLE "AUTOMATIC DISASSEMBLY OF decus-5-1.1.bin BY D8TAPE" //////////////////////////////////////////////////////////////////////////////// / / Automatic Disassembly of decus-5-1.1.bin / Generated 2010 02 19 00:10:20 / 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 / / 0201 locations used, 0146 code and 0033 data //////////////////////////////////////////////////////////////////////////////// *0000 C0000, 7763 / CLA MQA SCA MQL SCL + *7600 C7600, 0177 / AND C0177 L7601, HLT / @@7601=7402 C7602, 7606 / CLA OSR HLT DCA D7713 / @@7603=3313 CLA OSR HLT / @@7604=7606 DCA D7710 / @@7605=3310 L7606, LAS / @@7606=7604 AND C7706 / @@7607=0306 STL / @@7610=7120 TAD C7776 / @@7611=1376 DCA D7613 / @@7612=3213 D7613, 5221 / JMP C7621 JMP L7601 / @@7614=5201 JMP L7623 / @@7615=5223 JMP L7644 / @@7616=5244 JMP L7630 / @@7617=5230 JMP L7633 / @@7620=5233 JMP L7643 / @@7621=5243 TAD C7626 / @@7622=1226 L7623, TAD C7627 / @@7623=1227 DCA L7753 / @@7624=3353 JMP L7722 / @@7625=5322 C7626, 3265 / DCA L7665 C7627, 3713 / DCA I D7713 L7630, TAD D7711 / @@7630=1311 CLL / @@7631=7100 C7632, 4272 / JMS D7672 L7633, TAD C7602 / @@7633=1202 DCA D7714 / @@7634=3314 L7635, TAD C7700 / @@7635=1300 C7636, 4263 / JMS D7663 ISZ D7714 / @@7637=2314 JMP L7635 / @@7640=5235 DCA D7711 / @@7641=3311 JMP L7601 / @@7642=5201 L7643, CLA CLL CMA CML / @@7643=7360 L7644, DCA D7714 / @@7644=3314 TAD D7713 / @@7645=1313 C7646, 4272 / JMS D7672 L7647, TAD I D7713 / @@7647=1713 CLL / @@7650=7100 C7651, 4272 / JMS D7672 TAD D7710 / @@7652=1310 CIA / @@7653=7041 TAD D7713 / @@7654=1313 ISZ D7713 / @@7655=2313 SNA CLA / @@7656=7650 JMP L7601 / @@7657=5201 ISZ D7714 / @@7660=2314 JMP L7647 / @@7661=5247 JMP L7643 / @@7662=5243 D7663, 7705 / CLA MQA MUY + TLS / Load the TTO from the content of AC4 @@7664=6046 L7665, TSF / Skip if teleprinter flag is a 1. @@7665=6041 JMP L7665 / @@7666=5265 TAD D7711 / @@7667=1311 DCA D7711 / @@7670=3311 JMP I D7663 / long jump to L7705 @@7671=5663 D7672, 7647 / CLA SCA DVI + DCA D7712 / @@7673=3312 TAD D7712 / @@7674=1312 RTR / @@7675=7012 RTR / @@7676=7012 RTR / @@7677=7012 C7700, 0200 / AND C7600 C7701, 4263 / JMS D7663 TAD D7712 / @@7702=1312 AND C7707 / @@7703=0307 C7704, 4263 / JMS D7663 JMP I D7672 / long jump to L7647 @@7705=5672 C7706, 0007 / AND C0007 C7707, 0077 / AND C0077 D7710, 7777 / CLA MQA SCA MQL LSR + D7711, 6247 / 6247 D7712, 7712 / SPA CLA HLT D7713, 7713 / CLA MQA SHL + D7714, 7777 / CLA MQA SCA MQL LSR + RFC / Clear reader flag and reader buffer, @@7715=6014 L7716, RSF / Skip if reader flag is a 1. @@7716=6011 JMP L7716 / @@7717=5316 RFB / Read the content of the reader buffe @@7720=6012 JMP I D7714 / long jump to L7777 @@7721=5714 L7722, C7722, 4314 / JMS D7714 AND C7700 / @@7723=0300 SZA CLA / @@7724=7640 JMP L7722 / @@7725=5322 L7726, DCA D7712 / @@7726=3312 RFB / Read the content of the reader buffe @@7727=6012 DCA D7663 / @@7730=3263 TAD D7663 / @@7731=1263 CLL RTL / @@7732=7106 RTL / @@7733=7006 RTL / @@7734=7006 C7735, 4314 / JMS D7714 DCA D7672 / @@7736=3272 RFB / Read the content of the reader buffe @@7737=6012 TAD D7663 / @@7740=1263 DCA D7663 / @@7741=3263 L7742, C7742, 4314 / JMS D7714 AND C7700 / @@7743=0300 SZA CLA / @@7744=7640 JMP L7760 / @@7745=5360 TAD D7672 / @@7746=1272 SNL / @@7747=7420 JMP L7753 / @@7750=5353 DCA D7713 / @@7751=3313 JMP L7755 / @@7752=5355 L7753, D7753, 7200 / CLA ISZ D7713 / @@7754=2313 L7755, TAD D7663 / @@7755=1263 TAD D7712 / @@7756=1312 JMP L7726 / @@7757=5326 L7760, RFB / Read the content of the reader buffe @@7760=6012 AND C7707 / @@7761=0307 SZA CLA / @@7762=7640 JMP L7742 / @@7763=5342 L7764, DCA D7713 / @@7764=3313 RFC / Clear reader flag and reader buffer, @@7765=6014 L7766, RSF / Skip if reader flag is a 1. @@7766=6011 SKP / @@7767=7410 JMP L7764 / @@7770=5364 ISZ D7713 / @@7771=2313 JMP L7766 / @@7772=5366 TAD D7712 / @@7773=1312 CIA / @@7774=7041 TAD D7672 / @@7775=1272 C7776, 5214 / JMP C7614 JMP L7606 / @@7777=5206 $