|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metricsIndex: / A B C D E F G I J L M O P R S T W X p ½
Length: 2611456 (0x27d900)
Description: Bits:30009667 Philips computer tape "600113"
Types: SimhTapContainer, ½" Magnetic Tape
| name | artifact |
|---|---|
| SAG | «none» |
| SAG//OBJCT.OB | ⟦3f35a4804⟧ pts_type |
| SAG/ASM.LM | ⟦ad13d624d⟧ pts_type |
| SAG/BUG.LM | ⟦11ce9a922⟧ pts_type |
| SAG/CASCOP.LM | ⟦d4747e311⟧ pts_type |
| SAG/CCI.LM | ⟦d1ff356c7⟧ pts_type |
| SAG/CPLGEN.LM | ⟦b89017890⟧ pts_type |
| SAG/CSEG1.LM | ⟦a58d950aa⟧ pts_type |
| SAG/CSEG2.LM | ⟦b5c13ed83⟧ pts_type |
| SAG/CSEG3.LM | ⟦c047e60ac⟧ pts_type |
| SAG/CSEG4.LM | ⟦120a4f2c0⟧ pts_type |
| SAG/CSEG5.LM | ⟦b799426eb⟧ pts_type |
| SAG/CSEG7.LM | ⟦7614571be⟧ pts_type |
| SAG/CSEG8.LM | ⟦6e44f7b7c⟧ pts_type |
| SAG/CSEG9.LM | ⟦b702adff1⟧ pts_type |
| SAG/CSEGA.LM | ⟦30a20d1f6⟧ pts_type |
| SAG/CSEGB.LM | ⟦067af9f3d⟧ pts_type |
| SAG/CSEGC.LM | ⟦669bd7add⟧ pts_type |
| SAG/CSEGD.LM | ⟦907d2cd46⟧ pts_type |
| SAG/CSEGE.LM | ⟦d72f59fb3⟧ pts_type |
| SAG/DKLD.LM | ⟦4ef2937cb⟧ pts_type |
| SAG/DMPGEF.LM | ⟦24b89225b⟧ pts_type |
| SAG/DMPGEN.LM | ⟦e7fbc1d71⟧ pts_type |
| SAG/DUMPA.LM | ⟦6d4fa9bbe⟧ pts_type |
| SAG/FLXCOP.LM | ⟦e9d9b4613⟧ pts_type |
| SAG/FLXCOP.UF | ⟦8479ec08a⟧ pts_type |
| SAG/INIMOD.SC | ⟦10c03603f⟧ pts_type |
| SAG/INTVMA.SC | ⟦f3131e676⟧ pts_type |
| SAG/JESPER.LM | ⟦08bb0d004⟧ pts_type |
| SAG/LED.LM | ⟦765eed2fc⟧ pts_type |
| SAG/LKE.LM | ⟦a2e2f03af⟧ pts_type |
| SAG/M:PROC.UF | ⟦15c79e145⟧ pts_type |
| SAG/MONCOP.LM | ⟦5fcd14a0c⟧ pts_type |
| SAG/MONFLX.LM | ⟦a2fdde199⟧ pts_type |
| SAG/MONFLX.UF | ⟦ebbd103c7⟧ pts_type |
| SAG/OBX.LM | ⟦223c69e8b⟧ pts_type |
| SAG/PM6800.LM | ⟦7de1b8dba⟧ pts_type |
| SAG/PRDUMP.LM | ⟦933104943⟧ pts_type |
| SAG/RUM.LM | ⟦c7da3ea3c⟧ pts_type |
| SAG/SUM.LM | ⟦7635e251b⟧ pts_type |
| SAG/SUP.LM | ⟦da6de7200⟧ pts_type |
| SAG/SYSGEN.LM | ⟦33adb699f⟧ pts_type |
| SAG/TDISP.SC | ⟦f7f883f3c⟧ pts_type |
| SAG/TLK.LM | ⟦f7a6bbb05⟧ pts_type |
| SAG/TRA.LM | ⟦5885fb0a0⟧ pts_type |
| SAG/XRF.LM | ⟦6334b6031⟧ pts_type |
| SCREEN | «none» |
| SCREEN/SCREEN.SC | ⟦f1b7de271⟧ pts_type |
| SCREEN/STRINP.SC | ⟦c8e34ee8c⟧ pts_type |
| SCREEN/STROUT.SC | ⟦020d99fb8⟧ pts_type |
| TOSSWORK | «none» |
| TOSSWORK//OBJCT.OB | ⟦20552b676⟧ pts_type |
| TOSSWORK/ADDMOD.SC | ⟦c99cd1d77⟧ pts_type |
| TOSSWORK/ATTACH.SC | ⟦c0d42505d⟧ pts_type |
| TOSSWORK/ATTACX.SC | ⟦4d8be7441⟧ pts_type |
| TOSSWORK/BLOK:S.SC | ⟦b4f064b13⟧ pts_type |
| TOSSWORK/CD:TAB.SC | ⟦1d0eedbba⟧ pts_type |
| TOSSWORK/CTABX.SC | ⟦95cf787ec⟧ pts_type |
| TOSSWORK/DC:TAB.SC | ⟦e953cde48⟧ pts_type |
| TOSSWORK/DFTAB.SC | ⟦b88fb52c2⟧ pts_type |
| TOSSWORK/DIVMOD.SC | ⟦591b725b9⟧ pts_type |
| TOSSWORK/DMBUF.SC | ⟦0d112c62d⟧ pts_type |
| TOSSWORK/DMFDB.SC | ⟦c2cdc5f27⟧ pts_type |
| TOSSWORK/DMINIT.SC | ⟦f972af533⟧ pts_type |
| TOSSWORK/DMRUTS.UF | ⟦7b03e4593⟧ pts_type |
| TOSSWORK/DMSUBR.SC | ⟦965ccce79⟧ pts_type |
| TOSSWORK/DMSUBX.SC | ⟦8a0f2d36e⟧ pts_type |
| TOSSWORK/DMTASK.SC | ⟦f859aa2aa⟧ pts_type |
| TOSSWORK/DMTASS.SC | ⟦ef40df694⟧ pts_type |
| TOSSWORK/DRCC01.SC | ⟦bdd50dbb7⟧ pts_type |
| TOSSWORK/DRCD01.SC | ⟦a41876635⟧ pts_type |
| TOSSWORK/DRCG01.SC | ⟦25ba3df14⟧ pts_type |
| TOSSWORK/DRCP01.SC | ⟦75bc9d57b⟧ pts_type |
| TOSSWORK/DRCR01.SC | ⟦1ff960111⟧ pts_type |
| TOSSWORK/DRDC07.SC | ⟦8f8535361⟧ pts_type |
| TOSSWORK/DRDC15.SC | ⟦5562129f7⟧ pts_type |
| TOSSWORK/DRDC17.SC | ⟦f26c3dafb⟧ pts_type |
| TOSSWORK/DRDC22.SC | ⟦6f91a4e0c⟧ pts_type |
| TOSSWORK/DRDC81.SC | ⟦585c13bfa⟧ pts_type |
| TOSSWORK/DRDI01.SC | ⟦0331341a7⟧ pts_type |
| TOSSWORK/DRDN01.SC | ⟦a5693cd5e⟧ pts_type |
| TOSSWORK/DRDU01.SC | ⟦3c5f3194f⟧ pts_type |
| TOSSWORK/DRDY01.SC | ⟦aedd2fbb8⟧ pts_type |
| TOSSWORK/DRFD01.SC | ⟦d5f7a6aa2⟧ pts_type |
| TOSSWORK/DRGP01.SC | ⟦12fec2df3⟧ pts_type |
| TOSSWORK/DRIC01.SC | ⟦c4f8e6f51⟧ pts_type |
| TOSSWORK/DRIC0X.SC | ⟦0f47c7a5d⟧ pts_type |
| TOSSWORK/DRKB01.SC | ⟦d5f1586c2⟧ pts_type |
| TOSSWORK/DRKB03.SC | ⟦5534b3dc5⟧ pts_type |
| TOSSWORK/DRLP01.SC | ⟦f374267e3⟧ pts_type |
| TOSSWORK/DRLT01.SC | ⟦6797c69c0⟧ pts_type |
| TOSSWORK/DRMS01.SC | ⟦69c93db9c⟧ pts_type |
| TOSSWORK/DRMT01.SC | ⟦3756ddec3⟧ pts_type |
| TOSSWORK/DROD01.SC | ⟦1ca5100bb⟧ pts_type |
| TOSSWORK/DRRT01.SC | ⟦73fa0664e⟧ pts_type |
| TOSSWORK/DRSOP1.SC | ⟦f642369e7⟧ pts_type |
| TOSSWORK/DRTC01.SC | ⟦782493f65⟧ pts_type |
| TOSSWORK/DRTP01.SC | ⟦2c063bdb5⟧ pts_type |
| TOSSWORK/DRTP02.SC | ⟦cad9a54c5⟧ pts_type |
| TOSSWORK/DRTP03.SC | ⟦6c6b57d84⟧ pts_type |
| TOSSWORK/DRTW01.SC | ⟦a5d5a2b7a⟧ pts_type |
| TOSSWORK/DSUMOD.SC | ⟦0e0293958⟧ pts_type |
| TOSSWORK/DVTCD.SC | ⟦8bff4850a⟧ pts_type |
| TOSSWORK/DVTCG.SC | ⟦d23e71c21⟧ pts_type |
| TOSSWORK/DVTDI.SC | ⟦0d3ddc887⟧ pts_type |
| TOSSWORK/DVTDN.SC | ⟦d1fbca1fb⟧ pts_type |
| TOSSWORK/DVTDY.SC | ⟦1a5e435a8⟧ pts_type |
| TOSSWORK/DVTGP.SC | ⟦9a34918a1⟧ pts_type |
| TOSSWORK/DVTKB.SC | ⟦63ba25f3a⟧ pts_type |
| TOSSWORK/DVTMS.SC | ⟦256424500⟧ pts_type |
| TOSSWORK/DVTOD.SC | ⟦45a269de1⟧ pts_type |
| TOSSWORK/DVTT1.SC | ⟦93dc3fa3f⟧ pts_type |
| TOSSWORK/DVTTP.SC | ⟦15559916e⟧ pts_type |
| TOSSWORK/DW0701.SC | ⟦cdc2cd1a4⟧ pts_type |
| TOSSWORK/DW1501.SC | ⟦7a6812457⟧ pts_type |
| TOSSWORK/DW2201.SC | ⟦65d104c31⟧ pts_type |
| TOSSWORK/DWCP01.SC | ⟦4b9b0d7e7⟧ pts_type |
| TOSSWORK/DWII01.SC | ⟦a8572c823⟧ pts_type |
| TOSSWORK/DWIO01.SC | ⟦ccddd0596⟧ pts_type |
| TOSSWORK/EBCDIC.SC | ⟦e1835624f⟧ pts_type |
| TOSSWORK/ECLASS.SC | ⟦00f0ff5ac⟧ pts_type |
| TOSSWORK/FUNCTN.SC | ⟦7f194b514⟧ pts_type |
| TOSSWORK/GRBUF.SC | ⟦fb5bda0d3⟧ pts_type |
| TOSSWORK/INIMOD.SC | ⟦10c03603f⟧ pts_type |
| TOSSWORK/INIMOM.SC | ⟦5c9a3020b⟧ pts_type |
| TOSSWORK/INIMON.SC | ⟦fac0dd38c⟧ pts_type |
| TOSSWORK/INPREO.SC | ⟦d6c5add11⟧ pts_type |
| TOSSWORK/INPRET.SC | ⟦9807f7ad8⟧ pts_type |
| TOSSWORK/INTLT1.SC | ⟦12f50c6f0⟧ pts_type |
| TOSSWORK/INTLT2.SC | ⟦d74fac011⟧ pts_type |
| TOSSWORK/INTLT3.SC | ⟦678639c87⟧ pts_type |
| TOSSWORK/INTLT4.SC | ⟦690d64779⟧ pts_type |
| TOSSWORK/INTRT1.SC | ⟦c797cd66d⟧ pts_type |
| TOSSWORK/INTRT2.SC | ⟦0c8b96d72⟧ pts_type |
| TOSSWORK/INTRT3.SC | ⟦998d69bb1⟧ pts_type |
| TOSSWORK/INTRT4.SC | ⟦3e331b25b⟧ pts_type |
| TOSSWORK/INTVMA.SC | ⟦f3131e676⟧ pts_type |
| TOSSWORK/INTVMD.SC | ⟦5c758d58c⟧ pts_type |
| TOSSWORK/INTVMO.SC | ⟦84646027a⟧ pts_type |
| TOSSWORK/JOSKB.UF | ⟦cf61a39d0⟧ pts_type |
| TOSSWORK/JOSKB1.UF | ⟦e411639bc⟧ pts_type |
| TOSSWORK/LARSEK.UF | ⟦3bd8087ca⟧ pts_type |
| TOSSWORK/LDTASK.SC | ⟦56d7a4234⟧ pts_type |
| TOSSWORK/LKMAL.SC | ⟦8bc466b7a⟧ pts_type |
| TOSSWORK/LOADER.SC | ⟦c5c099b36⟧ pts_type |
| TOSSWORK/LRPINT.SC | ⟦987923564⟧ pts_type |
| TOSSWORK/M:PROC.UF | ⟦e3fdb22b3⟧ pts_type |
| TOSSWORK/MONTAB.SC | ⟦0f84e3cb9⟧ pts_type |
| TOSSWORK/MONTIM.SC | ⟦e776636ef⟧ pts_type |
| TOSSWORK/MOXTAB.SC | ⟦9982862fe⟧ pts_type |
| TOSSWORK/MPYMOD.SC | ⟦65b77d57e⟧ pts_type |
| TOSSWORK/MSUBS.SC | ⟦6d9bfb81e⟧ pts_type |
| TOSSWORK/MULDIV.SC | ⟦7a36e8895⟧ pts_type |
| TOSSWORK/OBDIR.UF | ⟦c2758882d⟧ pts_type |
| TOSSWORK/PFTAB.SC | ⟦c742eb534⟧ pts_type |
| TOSSWORK/RELUP.UF | ⟦57289220a⟧ pts_type |
| TOSSWORK/SCLASS.SC | ⟦b281e1563⟧ pts_type |
| TOSSWORK/SHIFT.SC | ⟦44771d32f⟧ pts_type |
| TOSSWORK/TABORT.SC | ⟦f85045457⟧ pts_type |
| TOSSWORK/TASS.SC | ⟦08e453584⟧ pts_type |
| TOSSWORK/TC:TAB.SC | ⟦41dcf9ff3⟧ pts_type |
| TOSSWORK/TCLASS.SC | ⟦f3ac5d2c9⟧ pts_type |
| TOSSWORK/TDISP.SC | ⟦d13a86031⟧ pts_type |
| TOSSWORK/TDISPO.SC | ⟦88912c92e⟧ pts_type |
| TOSSWORK/TIMER.SC | ⟦08cc034f2⟧ pts_type |
| TOSSWORK/TIODM.SC | ⟦aceb139a2⟧ pts_type |
| TOSSWORK/TIODMX.SC | ⟦1c2d98a68⟧ pts_type |
| TOSSWORK/TPROC.SC | ⟦690d6409b⟧ pts_type |
| TOSSWORK/TTABD0.SC | ⟦a88a02bab⟧ pts_type |
| TOSSWORK/TTABD1.SC | ⟦93ffe9600⟧ pts_type |
| TOSSWORK/TTABD2.SC | ⟦182ac5a4d⟧ pts_type |
| TOSSWORK/TTABX.SC | ⟦68d133264⟧ pts_type |
| TOSSWORK/TTMJOB.SC | ⟦229928d09⟧ pts_type |
| TOSSWORK/WRITE.SC | ⟦55e4a1269⟧ pts_type |
0x000000…000ca0 (0, 0) DirGranule ((0, 0)) {
0x000000…000ca0 DirEnt {nam=»SAG «, typ=» «, f00=0x0000, f01=0x0000, f02=0x0008, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUP «, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0010, f03=0x4441}
0x000000…000ca0 DirEnt {nam=»CCI «, typ=»LM«, f00=0x3039, f01=0x3131, f02=0x0070, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»CSEG1 «, typ=»LM«, f00=0x434b, f01=0x204e, f02=0x0088, f03=0x203d}
0x000000…000ca0 DirEnt {nam=»CSEG2 «, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0090, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»CSEG3 «, typ=»LM«, f00=0xffff, f01=0xffff, f02=0x00a0, f03=0xffff}
0x000000…000ca0 DirEnt {nam=»CSEG4 «, typ=»LM«, f00=0xffff, f01=0xffff, f02=0x00b0, f03=0xffff}
0x000000…000ca0 DirEnt {nam=»CSEG5 «, typ=»LM«, f00=0xffff, f01=0xffff, f02=0x00b8, f03=0xffff}
0x000000…000ca0 DirEnt {nam=»LED «, typ=»LM«, f00=0xffff, f01=0xffff, f02=0x00c8, f03=0xffff}
0x000000…000ca0 DirEnt {nam=»CSEG7 «, typ=»LM«, f00=0xffff, f01=0xffff, f02=0x00d8, f03=0xffff}
0x000000…000ca0 DirEnt {nam=»CSEG8 «, typ=»LM«, f00=0xffff, f01=0xffff, f02=0x00e0, f03=0xffff}
0x000000…000ca0 DirEnt {nam=»CSEG9 «, typ=»LM«, f00=0x0008, f01=0x2020, f02=0x00e8, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»CSEGA «, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x00f0, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»CSEGB «, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x00f8, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»CSEGC «, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0100, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»CSEGD «, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0108, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»CSEGE «, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0110, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»PRDUMP«, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0120, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»DMPGEF«, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0130, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»XRF «, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0138, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»DMPGEN«, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0140, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»CPLGEN«, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0148, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»JESPER«, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0150, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x2020, f01=0x2020, f02=0x0158, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»TRA «, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0258, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»TLK «, typ=»LM«, f00=0x4c20, f01=0x3d20, f02=0x02a8, f03=0x4431}
0x000000…000ca0 DirEnt {nam=»LKE «, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x02d0, f03=0x4441}
0x000000…000ca0 DirEnt {nam=»ASM «, typ=»LM«, f00=0x3039, f01=0x3131, f02=0x02e8, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»OBX «, typ=»LM«, f00=0x434b, f01=0x204e, f02=0x0308, f03=0x203d}
0x000000…000ca0 DirEnt {nam=»M:PROC«, typ=»UF«, f00=0x2020, f01=0x2020, f02=0x0370, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»BUG «, typ=»LM«, f00=0x1e12, f01=0x5400, f02=0x0378, f03=0x948c}
0x000000…000ca0 DirEnt {nam=»SUM «, typ=»LM«, f00=0x8226, f01=0x3ae1, f02=0x0388, f03=0x0002}
0x000000…000ca0 DirEnt {nam=»RUM «, typ=»LM«, f00=0x5600, f01=0x1908, f02=0x0398, f03=0x1502}
0x000000…000ca0 DirEnt {nam=»DUMPA «, typ=»LM«, f00=0x9da0, f01=0x0001, f02=0x03a8, f03=0x5f28}
0x000000…000ca0 DirEnt {nam=»PM6800«, typ=»LM«, f00=0x4dc0, f01=0x5c04, f02=0x03d0, f03=0x001f}
0x000000…000ca0 DirEnt {nam=»MONFLX«, typ=»LM«, f00=0x855d, f01=0x0000, f02=0x03e8, f03=0x3d49}
0x000000…000ca0 DirEnt {nam=»FLXCOP«, typ=»LM«, f00=0x0009, f01=0x2020, f02=0x03f8, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»MONCOP«, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0408, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»CASCOP«, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0418, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»FLXCOP«, typ=»UF«, f00=0x2020, f01=0x2020, f02=0x0420, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»MONFLX«, typ=»UF«, f00=0x2020, f01=0x2020, f02=0x0428, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»SYSGEN«, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0430, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»DKLD «, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x04a0, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»INTVMA«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x04a8, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»INIMOD«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x04c8, f03=0x2020}
0x000000…000ca0 DirEnt {nam=»TDISP «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x04d0, f03=0x2020}
0x000000…000ca0 }
0x000ca0…000e34 (0, 1) Opaque[0x194]
0x000e34…000fc8 # DirEnt {nam=»SUP «, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0010, f03=0x4441}
0x000e34…000fc8 IdxSect {
0x000e34…000fc8 f00 = 0x0000 // 0xe34 @0x0
0x000e34…000fc8 f01 = 0x0018 // 0xe36 @0x2
0x000e34…000fc8 gno = [ // 0xe38 @0x4
0x000e34…000fc8 [0x00]: C0x0000.0x2.0
0x000e34…000fc8 [0x01]: C0x0000.0x3.0
0x000e34…000fc8 [0x02]: C0x0001.0x0.0
0x000e34…000fc8 [0x03]: C0x0001.0x1.0
0x000e34…000fc8 [0x04]: C0x0001.0x2.0
0x000e34…000fc8 [0x05]: C0x0001.0x3.0
0x000e34…000fc8 [0x06]: C0x0002.0x0.0
0x000e34…000fc8 [0x07]: C0x0002.0x1.0
0x000e34…000fc8 [0x08]: C0x0002.0x2.0
0x000e34…000fc8 [0x09]: C0x0002.0x3.0
0x000e34…000fc8 [0x0a]: C0x0003.0x0.0
0x000e34…000fc8 [0x0b]: C0x0003.0x1.0
0x000e34…000fc8 ]
0x000e34…000fc8 }
0x000fc8…00115c Dummy {f00=0x0000, f01=0x0190, f02=»[j A_ ,v, $^ P J ( ( l _ H 8 b - /
0x00115c…0012f0 Dummy {f00=0x0000, f01=0x0190, f02=»
0x0012f0…001484 Dummy {f00=0x0000, f01=0x0190, f02=» [jC j p j7$8 )P EP - (z' ?`7$DM& MC( HD% WM% RYH RDH AS&:AB(VPS(dRS( & TY JK0 PP 0 P * PR P LP M0
0x001484…001618 Dummy {f00=0x0000, f01=0x0190, f02=» h |CR POf 8FL 1 ZFL 1 @ ZFL ) 1 v ZFL 9 1 ZDK p DK (
0x001618…0017ac Dummy {f00=0x0000, f01=0x0190, f02=» j Lz ? ? ? ? ? ? ? V ? ? ? ? ? ? ? ? ? ? ? ? ? ? Nb B ( ? ? ? ? ? ? ? @ X, N ? ? ? ? ? ? ? h T
0x0017ac…001940 Dummy {f00=0x0000, f01=0x0190, f02=» @ 4 R 2 f R X f R ~ f T 0 R
0x001940…001ad4 (0, 2) Dummy {f00=0x0000, f01=0x0190, f02=» !V ? ? ? ? ? ? ? !V ? ? ? ? ? ? ? f !V I q q A A I A y J " @ I q q A A I A y J X v I q q A A I)A)y J I q q A A I9A9y J
0x001ad4…001c68 Dummy {f00=0x0000, f01=0x0190, f02=» 6 6 6 6
0x001c68…001dfc Dummy {f00=0x0000, f01=0x0190, f02=» 6 6 6 6 6
0x001dfc…001f90 Dummy {f00=0x0000, f01=0x0190, f02=»
0x001f90…002124 Dummy {f00=0x0000, f01=0x0190, f02=» T
0x002124…0022b8 Dummy {f00=0x0000, f01=0x0190, f02=»
[…0x1…]
0x00244c…0025e0 Dummy {f00=0x0000, f01=0x0190, f02=» .
0x0025e0…002774 (0, 3) Dummy {f00=0x0001, f01=0x0190, f02=»
[…0x1…]
0x002908…002a9c Dummy {f00=0x0001, f01=0x0190, f02=» f
0x002a9c…002c30 Dummy {f00=0x0001, f01=0x0190, f02=» @ _ @ P W C 0 t 0 T @ W @ R (
0x002c30…002dc4 Dummy {f00=0x0001, f01=0x0190, f02=» t E C @ ;a=a R @ =a V ;A , P = - - _F @ t L ' 0 0 @ PN 0=a @ ?a RT @ ?a VJ=A 0 (P< , T T 1W 1W T )W )W ( , _ C C _ T PT PJV P>V SH? V :!9 V
0x002dc4…002f58 Dummy {f00=0x0001, f01=0x0190, f02=» Ud Q4P P 9A?A:AV R Z _ P*R R P ;A [ [ : V X"Z(_( L _P S Q"R S P W S _ R Q _ ;A [ [ : Q S W S Q R S P W S _ R _ ;A
0x002f58…0030ec Dummy {f00=0x0001, f01=0x0190, f02=» ? ? n " " z I " P X Q $ Q G I J^ ? ? ? ? ? ? ? " (@ " ? ? ? ? ? ? ? " " I " J| X Q G I X Y L P W( L % P M M W M B % ?A ' B % B =e L "
0x0030ec…003280 Dummy {f00=0x0001, f01=0x0190, f02=»% $ =B M X M =B M X M L % TF L " * A {- A L " ! UJ ! Q L W DW6 T b # (@ T X " R I I M (% , ! R " T* L L W L W L L W L VA M W W =h C L % Ph L =c
0x003280…003414 (0, 4) Dummy {f00=0x0001, f01=0x0190, f02=» ? L #2 p P B L _ P B R ! _ B M & " M T: L T> P* M _~W C B % T L @ M M P, L P L 4 M L $ P <C M =C M !P I
0x003414…0035a8 Dummy {f00=0x0001, f01=0x0190, f02=» ^W L <AR A <B M P C M P C I L % I L ? I P L !# L !# Q $ P L $ x P "Z I M L =H =A^ 4` A"}=` M " ^W C I # ! I X M A" T * I X X
0x0035a8…00373c Dummy {f00=0x0001, f01=0x0190, f02=» V <a W X ' ?A q A# > > > > > > > # , 0W 0T _ l P$ X X ] X * A# J " * - X ( " = V X X G X I p(@(@ L % T6 L % T. L %?P& P" L % - A$ M T % T L T 4 L R % _P R
0x00373c…0038d0 Dummy {f00=0x0001, f01=0x0190, f02=» % ( "^ 5 % $ @% > 4T W F > H >P H @ _ A% %` A? 5 T6 @? P ? % %$ %( %, %0 @? A? A% C 5 4 X _8 %^ =H M: %r ( "^ % %~ " ER % H ! X M A" T X X
0x0038d0…003a64 Dummy {f00=0x0001, f01=0x0190, f02=»;A )P % 5 *X %` @ Q P P T Z %` W P %` $>H $ NOT W0 *X @ h ! $ jT lP Y %` C j C R ] % 0DKER UNIT CYLD STAT & ' I & ' W2 & ' X W$ & '( W & ( X
0x003a64…003bf8 Dummy {f00=0x0001, f01=0x0190, f02=» _ C _ P A @? P$ @' = ^ ] ] @' _ A? C (8 'h A _ = 0 0 9U A'z '~ [2 'j ( "^ (8 = 0 @ A @ !? -. A ? _* 5 @? %` @ A % 0 0 A( A( ( ( "^ @ A C X
0x003bf8…003d8c Dummy {f00=0x0001, f01=0x0190, f02=» "^ % %` )4 I/0 ERROR Q)L P T 1 A% A? A? ) A) A% % [2 9 , PP , X QD [2 * Y , [2 * Z H @? P : ) ` : % ISTAT [2 _* A) ) ( "^ : ; ;<A ' R `R Q Q%
0x003d8c…003f20 Dummy {f00=0x0001, f01=0x0190, f02=» X X X X $ P* * * + + % P Y Y Y >% X P Y _" Rr ^T Y _8 _T X _ X X T: X P4 0' P. 1R P _ 0$ XJ % XV Z _ % _d Q4 8 TYP, R Y _$ P Q X Q % _" Y
0x003f20…0040b4 (0, 5) Dummy {f00=0x0001, f01=0x0190, f02=»* ? ? ? ? ? ? ? A R2 @ A A R$ A A R A A R A @, > > > > > > > > ? ? ? ? ? ? ? U ^ ( H ( P ' _ Q 4&? ?R _ 5 H _ ^ ;j >P @ ( Q 9A D (P _ P A C @ Q A
0x0040b4…004248 Dummy {f00=0x0001, f01=0x0190, f02=» > > a @ E - @ ? ? > P P Q P ! P @ - ? ^T Y # P| ' PL .B ; R <a V 9A:A ; V ; V V W V < V < V H T P R ;H [ [ : _ T P ; R4 < S . _ _
0x004248…0043dc Dummy {f00=0x0001, f01=0x0190, f02=»< V @ < _,; RJ . P 0 9 T 0 T . V T , U J : R Q ;H [ [ : ._J @ _ X X X X P/ / / 06/ P $ Y Y Y Y > I Y 8 TPP" X R 8 TYX WH H/ Y _8 X X: X R X ( _$ _* $ XtRX
0x0043dc…004570 Dummy {f00=0x0001, f01=0x0190, f02=»Y$ X X X6 Y Z(P A0, ZrP Y _8 _< _@ Q P ! P @ A0 A0 A0 A0 A0 A0 A0 0 ,:j Z ( I ^ - ^ *@9J M 0 @0 @0 @0 @0 @0 @0 @0 0 ? ? ? ? ? ? ? 0 C 2 3H3H2 2 3H3H2 2 3 3 <
0x004570…004704 Dummy {f00=0x0001, f01=0x0190, f02=» 9 V M *9 U M * M .9a M ( B M &9 Jd B M 0 M L $' 1x ( )P J^ _ (% ?a' 1b X U U U @ @ @ 4 X Q = V M * M L 0 R _ M 2 X V M .W X M .=a M ( X % : 9h P Wf J^ W` M L .
0x004704…004898 Dummy {f00=0x0001, f01=0x0190, f02=» L & Q L ! T 3 1 L ! T (@ X " ! L 0 L 2T B P M 0 M & X L .P R"V M _J _x _ M .W 9a M ( X M . 4 M 2 L $ T $ > X X M Q> =b%0 X $ X $? P L , I L _ L 5 M 5 L P
0x004898…004a2c Dummy {f00=0x0001, f01=0x0190, f02=»T P M 4 P p T0 M T Q P = Q M > > > > > > > > P < M TJ Q Q M > > > > > > > > @ M M M > > > > > > > > M M M L $ P ? L 4 Q 9A Q P L 4 ? =A Q M 4 5 L T (@ I I L $ L
0x004a2c…004bc0 Dummy {f00=0x0001, f01=0x0190, f02=» 1 W. M * M L $ Q X Q Q 6 1 M * I 6 I L , L T W 6 1 X L *(@ M * G _D X Hm H 1P ] I (@ I 1 Q M * 6 1 M * M 6 1 0 M " L '? L U "T > WP T > WF
0x004bc0…004d54 (0, 6) Dummy {f00=0x0001, f01=0x0190, f02=» M L PH=GV L L 4 7 M 2 9> M L 9G L 4 L M L M M L 4 88 W M " ?. L L 9JR@ P P T ? 5 U P T Q P P W Q P T*(@ L Q L Q L ( L ! TNW P T P P W Q L ' "
0x004d54…004ee8 Dummy {f00=0x0001, f01=0x0190, f02=»T ? E $ I 4P _ 5 % E (@ L 2 ( P _ 4 ) % ] M (@ L 2 ? T jR Q @ j] ? > 9C 9C > ^ U j(@ L T U U U M L M L M M L 4 88 L ? ! :c:A ? L T V P T"
0x004ee8…00507c Dummy {f00=0x0001, f01=0x0190, f02=» L & P L E E M : 88 M M L L % T D V L ! P L ! XfWn L M L M M ;8 88 L :c:A L D V D M L ! T*_ L < ? < R M M "W ; M 4 9 L E M L "! ? L 2 L T L P L D Q
0x00507c…005210 Dummy {f00=0x0001, f01=0x0190, f02=» M , L X L U M W <d M 2 : L D L L 0U L 0 L (U L ( L L R $ 9 _ R $ 9 M , L M M M M M ( M ( M 0 M 0 L D L Z L L *R L * L P( ' P 5 R 5 _ T 5 M , M L L , U
0x005210…0053a4 Dummy {f00=0x0001, f01=0x0190, f02=» M . L 9 M L ? L L . Q L L L R 0 % _ M M L . P M . = M 2 : L U >4 M 2 : L L L & ) L $ I L M L L U ?. @ M L M M M W L ? @ M M ( L P(W L ? @ M ( L
0x0053a4…005538 Dummy {f00=0x0001, f01=0x0190, f02=» 0 W C L 4 5 L L " C m M ^ < 0 @ 9a:a R0 Q Q" ?A <P @ ? A _ C _ _ A ~(@ A v A? A A A A A? A? A? a ? @ ? ? > P :b" Q P T4 P Q Q @ @ @
0x005538…0056cc Dummy {f00=0x0001, f01=0x0190, f02=» "; V W # @ A A? @ ? ? > Q @ ? ? ? ? ? ? ? @ ' . = M A@ A@ A@ A@ AA AA AB AA A6W D U@ x ALW U, @@ x AfW @A AA ,P$ _: @@ @@ @@ @@ @A @A _ A@ A@ A
0x0056cc…005860 Dummy {f00=0x0001, f01=0x0190, f02=» L 4 5 AB AB AB" AB$ AB& AB( AB* B, =a @ >a V _ @ >a Y AB AB 4 T B ( "^ 5 U P" @B @B @B" @B$ @B& @B( @B* B, @B x @@ 8R P =A_ %_ XJ _ > < 0 B @ 9a:a R @ @B @ ? A ?
0x005860…0059f4 (0, 7) Dummy {f00=0x0002, f01=0x0190, f02=» D A _< U` AC @ , L ? ? , L L L L L L ? ? ? ? ? ? ? @ vPx @ > > > > > > > ; [ [ [ [ [ [ > > [ [ A @ v H t v ? A v > @ P ,V$ A C^ @ 9
0x0059f4…005b88 Dummy {f00=0x0002, f01=0x0190, f02=» P C # C _2 DL P H C _ :EOS :EOF J^ Jv JH @ !? ?R _ Eh I ' !? 0X A "! X6 R P H " L @ Q P ^^_ P Xb P R "R (@(@ ^ :j >Z ^ @ P _ A M (@ M M M B
0x005b88…005d1c Dummy {f00=0x0002, f01=0x0190, f02=» B Jd B Jd $? ED P R ED P R G EDP Pv P Pp $P &PN "P< /P :P ;P <P =P >P ?P 1 ED 8 EDWv G,W E>W G8W E8 W W GNW Wx 8 MTPp DYPj X T Y $ WZ GxWX $ # T
0x005d1c…005eb0 Dummy {f00=0x0002, f01=0x0190, f02=» H Y _ 1 X 1 H H W8 H& H X W* 8 AH T AH H (@( I I : 0 :R - Y PU,DNXX,STAT,RY H P R 5 *X ? %` Hm 1P H Y _ @% RDP A P 8 FL %` X X ! R V Y
0x005eb0…006044 Dummy {f00=0x0002, f01=0x0190, f02=» P ; Y (@ % P Q 1 % I X X ? ? ? ? ? ? ? I #2_ ? @ ? > X B AI B (@ C X X W W C # C C P L L m A , DKP L P L @ _ C C # C _@ _t _z _ _
0x006044…0061d8 Dummy {f00=0x0002, f01=0x0190, f02=» X I ! X Y T T Y Y Y Y Y U U X KT W L W Ld X I I R P8 X E8P E>T Y Y W x Y Y $ 0T W W /d X ? ? ? ? ? ? ? K " X #? P ? ? ? ? ? ? ? K " /d(@ " % ?
0x0061d8…00636c Dummy {f00=0x0002, f01=0x0190, f02=»(@_~ J^X R Y _ X D $! TR ? ? ? ? ? ? ? L " 8 M ? ? ? ? ? ? ? L " % > > > > > > > > ? ? ? ? ? ? ? L " P X " " M I 8 TRT X J| I L J^ Pl J^ X X X M M
0x00636c…006500 Dummy {f00=0x0002, f01=0x0190, f02=» X X X U 5 X E _ X 4 Y 5 X 4 Y ! 1P, 0P +P Q V W W Q Q R P Q 5 Y M> ? ? ? ? ? ? ? Nz " Qv N I " PF X Q< X P P ? ? ? ? ? ? ? N #2(@ Y G X X X R 5
0x006500…006694 (0, 8) Dummy {f00=0x0002, f01=0x0190, f02=» " > > > > > > > > J^R X X Q Y ( O` ? ? ? ? ? ? ? O #2 ? ? ? ? ? ? ? O " (@ " ? ? ? ? ? ? ? O " O I X M X ! Q " P2 O` X ? ? ? ? ? ? ? P #2(@ G X 4Q W 9AY T Q P &
0x006694…006828 Dummy {f00=0x0002, f01=0x0190, f02=»Qz 9AY Tn9ATj @Pb DQv @Pd $W 1 Y $ D ! P O Y 0 P :ET OFP OST Y Y X J X M _dQXQbQlABCDEFGHI JKLMNOPQR /STUVWXYZ Q|Q Q [.<(+^!$*);] ,%_>?" P X O ' Q X I X X R ( 5
0x006828…0069bc Dummy {f00=0x0002, f01=0x0190, f02=»Rb AQ AQ R @Q T AQ !St PTD !S8 S Q AQ P !Sl_ S !SHP Y !Sl !Sp AQ X _ (W x ! 9A Y _2 !STY@ 9 R !Sl !Sp AQ XT_ Q Y Y _^ !SX !T tW !SX !S ] ! X W !S` 9C^ W| !Sd_ !Sh Wn !Sl_ Q Y Y _ X r s W4
0x0069bc…006b50 Dummy {f00=0x0002, f01=0x0190, f02=» Q6{ X Y Q& X $ :ET D OSP OVT * W * W Y AQ Y I @Q J P T I O P @ T ; @Q U X @Q Q 4RhRhR R R R R R R R S R S"S S R S(S( &" 13468$$ :EOS:EOV' Q X "$&1368 AT T !? QT
0x006b50…006ce4 Dummy {f00=0x0002, f01=0x0190, f02=»V Y " @T !? 1P P !X Y !Wt HU U U U U U U W U|W WDW^W W W W W AX> !X " P* AU !X !X W !W " P P !X _ !Wj V V U I P Pj P P P @X: Y V D P X &Q Y W Y 4 X $;H D :ET $;H D OS
0x006ce4…006e78 Dummy {f00=0x0002, f01=0x0190, f02=» T "P R Q W 8T Y W, W< U V I X Q @X: Y _ X R Q @X: Y AT| Y @ , $ T D q # !X !Wt U T Y Y AXD AX> U !X !Wt U W W AW X 9c T DT ET 4 X B X :c HT % W !
0x006e78…00700c Dummy {f00=0x0002, f01=0x0190, f02=» _@ _D _H @T| @TzJ P* P8 AX: X Q I -W ,A W @T~ ;I U @T T 4A @T| I ^ <j >P _ =h Q[ P. ^ %x 8P ' X % !X %`X P % X. R" X>W % P T % XT <A P X^<a P @ p @ $ *P $^
0x00700c…0071a0 Dummy {f00=0x0002, f01=0x0190, f02=» [0 > > a[0 @[0 E @[" @[$ @[& @[( @[* @[, @[. [0(@ T W@ &_T@ H P P T ?f' W * H Wx *Wn & P >b& >AW >a& @T * X X T$W. * P X ` `T 8 P X 8 T . T
0x0071a0…007334 (0, 9) Dummy {f00=0x0002, f01=0x0190, f02=» 6 > ?f' _ 8 TzJ P* P8 ; ; ? 0 :R 9 Y 9 9 : : : @ P R ! R P L M Y #? @ P R P T T T Y" P T _ X D D E ] @ ? ? > ]> ( "^
0x007334…0074c8 Dummy {f00=0x0002, f01=0x0190, f02=»T W$ L #( "^ B P M @ !? L R ! _F PP I H P _ A [j A A A @ ~ ] A ~ @] A ~ @ _ ( "^ ? (@_& $ ( , 0 4 8 < ]J X X T W * P X ` `T 8 P X 8 T . T
0x0074c8…00765c Dummy {f00=0x0002, f01=0x0190, f02=» 6 > ?f' _ 8 TzJ P* P8 ; ; ? 0 :R 9 Y 9 9 : : : @ P R ! R P L M Y #? @ P R P T T T Y" P T _ X D D E ] DOS 6800 REL. 3.3 ^
0x00765c…0077f0 Dummy {f00=0x0002, f01=0x0190, f02=» > PW:OUB0 EQU W:INBF+136 DUMMY WORD FOR OUTPUT BUFFER ! @ PW:OUBF EQU W:OUB0+2 OUTPUT BUFFER ,136 CHARACTERS ! F P* ! L PW:NXCR EQU W:OUBF+136 POINTER TO NEXT CHAR,INITIALIZED TO W:INBF ! F PW:PARM EQU W:NXCR+2 PARAME
0x0077f0…007984 Dummy {f00=0x0002, f01=0x0190, f02=»T1 =1 DECIMAL OR HEXADECIMAL ! p J P* BIT2 =1 SPECIAL CHAR STRING /O,/L,/S,/U " $ : P* =0 IF ERRONOUS PARAMETER " r 2 P* 2ND WORD # OF CHARACTERS " 2 PW:PARL EQU W:PARM+2 LENG
0x007984…007b18 Dummy {f00=0x0002, f01=0x0190, f02=»RV EQU W:PARL+2 VALUE OF PAEAM " 6 PW:IDN1 EQU W:PARM+12 5WORDS OF 1ST IDENT # 0 6 PW:IDN2 EQU W:IDN1+10 5WORDS OF 2ND IDENT # j D PW:LSTA EQU W:IDN1 WORK AREA FOR I:LSTA ( 10 WORDS ) # . PW:ASBL EQU W:IDN2+10
0x007b18…007cac Dummy {f00=0x0002, f01=0x0190, f02=» NAME,FILE CODE,DSK FILE CODE,DSK FC # l J PW:ASB2 EQU W:ASB1+2 DEVICE ADDR,NONE,NONE,DSK DIRECTORY ADDR $ , : PW:ASB3 EQU W:ASB2+2 NONE,NONE,NONE,FILE NAME $ z PW:ASB4 EQU W:ASB3+2 $ PW:ASB5 EQU W:ASB4+2 $ : PW:ASB6 EQU
0x007cac…007e40 Dummy {f00=0x0002, f01=0x0190, f02=»B7+2 $ z PW:ASB9 EQU W:ASB8+2 % PW:ASBA EQU W:ASB9+2 % . B PW:ABMS EQU W:ASBL WORK AREA FOR I:ABMS (10 WORDS ) % P F PW:SEG EQU W:ASBA+2 CURRENT SEGMENT NUMBER(LAST IN CORE) % > PW:GR0 EQU W:SEG+2 NUMBER OF
0x007e40…007fd4 (0, 10) Dummy {f00=0x0002, f01=0x0190, f02=» ` @H ` " B !( 9 ! +b L * b dX B ,i p$ A j z dH&g S xzx j `@ ` `0 H q@% H @R z@u ` `@ : @ `H ja @ `H @ z@U x @ [ ` x d @8 U ! ` ` @Z @ @ ` @ @P ` `p ( ( ` @ ` `X ` @ X @ `
0x007fd4…008168 Dummy {f00=0x0002, f01=0x0190, f02=» @l p JGz S 3 f ` w @ 3 H! S d j Z S Q @ S H! 3 d 6 | @Bh ' 4 _{ N4`w l ` `PZ 4 P0 2 t0 ` @ c@ % @ @ bH @ @ D@ F ( C0 @ @ ` ` B @ ` d `[ `h C 4 4 @ ` @ { W E @ `P` E ` `X @Q ` E
0x008168…0082fc Dummy {f00=0x0002, f01=0x0190, f02=» ` @H ` " B !( 9 ! +b L * b dX B ,i p$ A j z dH&g S xzx j `@ ` `0 H q@% H @R z@u ` `@ : @ `H ja @ `H @ z@U x @ [ ` x d @8 U ! ` ` @Z @ @ ` @ @P ` `p ( ( ` @ ` `X ` @ X @ `
0x0082fc…008490 Dummy {f00=0x0002, f01=0x0190, f02=» @l p JGz S 3 f ` w @ 3 H! S d j Z S Q @ S H! 3 d 6 | @Bh ' 4 _{ N4`w l ` `PZ 4 P0 2 t0 ` @ c@ % @ @ bH @ @ D@ F ( C0 @ @ ` ` B @ ` d `[ `h C 4 4 @ ` @ { W E @ `P` E ` `X @Q ` E
0x008490…008624 Dummy {f00=0x0002, f01=0x0190, f02=» ` @H ` " B !( 9 ! +b L * b dX B ,i p$ A j z dH&g S xzx j `@ ` `0 H q@% H @R z@u ` `@ : @ `H ja @ `H @ z@U x @ [ ` x d @8 U ! ` ` @Z @ @ ` @ @P ` `p ( ( ` @ ` `X ` @ X @ `
0x008624…0087b8 Dummy {f00=0x0002, f01=0x0190, f02=» @l p JGz S 3 f ` w @ 3 H! S d j Z S Q @ S H! 3 d 6 | @Bh ' 4 _{ N4`w l ` `PZ 4 P0 2 t0 ` @ c@ % @ @ bH @ @ D@ F ( C0 @ @ ` ` B @ ` d `[ `h C 4 4 @ ` @ { W E @ `P` E ` `X @Q ` E
0x0087b8…00894c Dummy {f00=0x0002, f01=0x0190, f02=» ` @H ` " B !( 9 ! +b L * b dX B ,i p$ A j z dH&g S xzx j `@ ` `0 H q@% H @R z@u ` `@ : @ `H ja @ `H @ z@U x @ [ ` x d @8 U ! ` ` @Z @ @ ` @ @P ` `p ( ( ` @ ` `X ` @ X @ `
0x00894c…008ae0 Dummy {f00=0x0002, f01=0x0190, f02=» @l p JGz S 3 f ` w @ 3 H! S d j Z S Q @ S H! 3 d 6 | @Bh ' 4 _{ N4`w l ` `PZ 4 P0 2 t0 ` @ c@ % @ @ bH @ @ D@ F ( C0 @ @ ` ` B @ ` d `[ `h C 4 4 @ ` @ { W E @ `P` E ` `X @Q ` E
0x008ae0…008c74 (0, 11) Dummy {f00=0x0003, f01=0x0190, f02=» ` @H ` " B !( 9 ! +b L * b dX B ,i p$ A j z dH&g S xzx j `@ ` `0 H q@% H @R z@u ` `@ : @ `H ja @ `H @ z@U x @ [ ` x d @8 U ! ` ` @Z @ @ ` @ @P ` `p ( ( ` @ ` `X ` @ X @ `
0x008c74…008e08 Dummy {f00=0x0003, f01=0x0190, f02=» @l p JGz S 3 f ` w @ 3 H! S d j Z S Q @ S H! 3 d 6 | @Bh ' 4 _{ N4`w l ` `PZ 4 P0 2 t0 ` @ c@ % @ @ bH @ @ D@ F ( C0 @ @ ` ` B @ ` d `[ `h C 4 4 @ ` @ { W E @ `P` E ` `X @Q ` E
0x008e08…008f9c Dummy {f00=0x0003, f01=0x0190, f02=» ` @H ` " B !( 9 ! +b L * b dX B ,i p$ A j z dH&g S xzx j `@ ` `0 H q@% H @R z@u ` `@ : @ `H ja @ `H @ z@U x @ [ ` x d @8 U ! ` ` @Z @ @ ` @ @P ` `p ( ( ` @ ` `X ` @ X @ `
0x008f9c…009130 Dummy {f00=0x0003, f01=0x0190, f02=» @l p JGz S 3 f ` w @ 3 H! S d j Z S Q @ S H! 3 d 6 | @Bh ' 4 _{ N4`w l ` `PZ 4 P0 2 t0 ` @ c@ % @ @ bH @ @ D@ F ( C0 @ @ ` ` B @ ` d `[ `h C 4 4 @ ` @ { W E @ `P` E ` `X @Q ` E
0x009130…0092c4 Dummy {f00=0x0003, f01=0x0190, f02=» ` @H ` " B !( 9 ! +b L * b dX B ,i p$ A j z dH&g S xzx j `@ ` `0 H q@% H @R z@u ` `@ : @ `H ja @ `H @ z@U x @ [ ` x d @8 U ! ` ` @Z @ @ ` @ @P ` `p ( ( ` @ ` `X ` @ X @ `
0x0092c4…009458 Dummy {f00=0x0003, f01=0x0190, f02=» @l p JGz S 3 f ` w @ 3 H! S d j Z S Q @ S H! 3 d 6 | @Bh ' 4 _{ N4`w l ` `PZ 4 P0 2 t0 ` @ c@ % @ @ bH @ @ D@ F ( C0 @ @ ` ` B @ ` d `[ `h C 4 4 @ ` @ { W E @ `P` E ` `X @Q ` E
0x009458…0095ec Dummy {f00=0x0003, f01=0x0190, f02=» ` @H ` " B !( 9 ! +b L * b dX B ,i p$ A j z dH&g S xzx j `@ ` `0 H q@% H @R z@u ` `@ : @ `H ja @ `H @ z@U x @ [ ` x d @8 U ! ` ` @Z @ @ ` @ @P ` `p ( ( ` @ ` `X ` @ X @ `
0x0095ec…009780 Dummy {f00=0x0003, f01=0x0190, f02=» @l p JGz S 3 f ` w @ 3 H! S d j Z S Q @ S H! 3 d 6 | @Bh ' 4 _{ N4`w l ` `PZ 4 P0 2 t0 ` @ c@ % @ @ bH @ @ D@ F ( C0 @ @ ` ` B @ ` d `[ `h C 4 4 @ ` @ { W E @ `P` E ` `X @Q ` E
0x009780…009914 (0, 12) Dummy {f00=0x0003, f01=0x0190, f02=» ` @H ` " B !( 9 ! +b L * b dX B ,i p$ A j z dH&g S xzx j `@ ` `0 H q@% H @R z@u ` `@ : @ `H ja @ `H @ z@U x @ [ ` x d @8 U ! ` ` @Z @ @ ` @ @P ` `p ( ( ` @ ` `X ` @ X @ `
0x009914…009aa8 Dummy {f00=0x0003, f01=0x0190, f02=» @l p JGz S 3 f ` w @ 3 H! S d j Z S Q @ S H! 3 d 6 | @Bh ' 4 _{ N4`w l ` `PZ 4 P0 2 t0 ` @ c@ % @ @ bH @ @ D@ F ( C0 @ @ ` ` B @ ` d `[ `h C 4 4 @ ` @ { W E @ `P` E ` `X @Q ` E
0x009aa8…009c3c Dummy {f00=0x0003, f01=0x018e, f02=»CIEVED 7 2 P********************************************* 8 PADI120 EQU * 8 D P LDK A1,0 NEGATIVE RESPONSE 8 X P ST A1,DWTA4,A7 8 | P ABL INIDLE 8 P EJECT 8 0 P******************************************* 8 P* TCA BUSY 8 0 P******
0x009c3c…009dd0 Dummy {f00=0x0003, f01=0x0190, f02=» 8 l PADI900 EQU * 9 P LDR A2,A6 SAVE A6 9 P LDR A6,A7 9 6 P CF A15,TENDIO 9 H P LDR A6,A2 RESTORE A6 9 ^ P ABL LDISP GO TO DISPATCHER 9 | P EJECT 9 > P********************************************************** 9 P* 9 , P* DELAY RO
0x009dd0…009f64 Dummy {f00=0x0003, f01=0x018e, f02=»=2 NEGATIVE RESPONSE 9 P* : > P********************************************************** : ( PDELAYL LD* A2,4,A5 : j " P CF A5,ILABEL SET INPUT LABEL : P LDK A2,2 : P ADS A2,4,A5 : PDELAY EQU * : P LDK A2,0 : * P ST A2,READY,A6 CL
0x009f64…00a0f8 Dummy {f00=0x0003, f01=0x0190, f02=» : p P LDK A2,SYN ; P CF A5,WRITE ; P RB DEL100 ; 0 PDEL110 EQU * ; B P LDR A4,A2 ; V PDEL120 ADK A5,4 SKIP STACK ; h P ADK A4,0 SET CR ; P ABR* A5 ; P EJECT ; P* ; P* ; P* HALT INPUT SYLCU ; P* ; P* ; PHALTIN
0x00a0f8…00a28c Dummy {f00=0x0003, f01=0x0190, f02=» ; n P RTN A5 < P* < P* < " PHIDLE CF A5,HALTIN < , PINIDLE CF A5,READ < F P RB INIDLE < ` P EJECT < r P* < P* < P* DISCONNECT MODEMS < P* < P* < ( PDISCON LDR* A2,A6 GET DEVICE ADDRESS < . P ADKL A2,CIOH COMPUTE CI
0x00a28c…00a420 Dummy {f00=0x0003, f01=0x0190, f02=» < r PDISC20 HLT HALT INPUT SYLCU = P RTN A5 = , P* = < P* = F P* START OUTPUT SYLCU = P P* = l P* = v PSTOUT EQU * = " P LDR* A2,A6 GET DEVICE ADDRESS = P ADKL A2,CIOST = P ST A2,STO100 = P LDK A2,/60 = P INH = " PST
0x00a420…00a5b4 (0, 13) Opaque[0x194]
0x00a5b4…00a748 # DirEnt {nam=»CCI «, typ=»LM«, f00=0x3039, f01=0x3131, f02=0x0070, f03=0x2020}
0x00a5b4…00a748 IdxSect {
0x00a5b4…00a748 f00 = 0x0003 // 0xa5b4 @0x0
0x00a5b4…00a748 f01 = 0x0006 // 0xa5b6 @0x2
0x00a5b4…00a748 gno = [ // 0xa5b8 @0x4
0x00a5b4…00a748 [0x00]: C0x0003.0x2.0
0x00a5b4…00a748 [0x01]: C0x0003.0x3.0
0x00a5b4…00a748 [0x02]: C0x0004.0x0.0
0x00a5b4…00a748 ]
0x00a5b4…00a748 }
0x00a748…00a8dc Dummy {f00=0x0003, f01=0x0190, f02=» F " Z T 6 $ J X | N v @ ^ X h ` TDCU DLU LIC PRC RSU ` RDS RDO PRT LST RDA PRD LSD PCH POB PLD DUF INC MO
0x00a8dc…00aa70 Dummy {f00=0x0003, f01=0x0190, f02=»p FCL p BCL p FRT p FOR p LKE p LED DEB p EDT SVD ` SVU REW ULD FFS FBS RFS RBS WEF WES WEV SDM HSF p JOB END MES PSE WLB
0x00aa70…00ac04 Dummy {f00=0x0003, f01=0x0190, f02=»XRF P , . BUG p TLT p 0 * LKF p 2 N P 9B 9A R D P < N P N 9 V O O b N 9CV < N 9 R N 9AV < N 9 V O W $ j R (P R *PT _ O & V j
0x00ac04…00ad98 Dummy {f00=0x0003, f01=0x0190, f02=» , P^ PZ P R T TYT O , P T O , P4 P0 T O T O : W 0 V T _^ @ D H ;DRB I H P0 H P* " P _ D 4 # - ] (@ I H R ;A;i _X : F 0 1P T T
0x00ad98…00af2c Dummy {f00=0x0003, f01=0x0190, f02=» Y X , P P , P P C U T T U T P0 @ ( P _ , ) % ] U (@ T ;F^ N 4 T C R W:_ _ _ B , @ T * ,P 8g:k9A 4Y H % Y _ W _ @ @
0x00af2c…00b0c0 Dummy {f00=0x0003, f01=0x0190, f02=»_ B , ,P 8g9A *Y :k H % Y W YN R W _ _ _ W V V W V N C R W _ _ _ V W W V @ D * ( V ,P0R 9 :AW H - Q - 9a:K8G # P _8 Y> W V V : Y
0x00b0c0…00b254 (0, 14) Dummy {f00=0x0003, f01=0x0190, f02=» 8 X T Y T U Y N V , J 0 X 9 Q U Q U ^ . F M - W D V Z V V # f = Z V R W W W W ' C R W W W W V , X X V
0x00b254…00b3e8 Dummy {f00=0x0003, f01=0x0190, f02=»W W W W W W w _` . X. M - V W W W V XP W @ _ V P ;B L 8 W < B Q4 B V8 , Pr Pn T C , X C P W W P W ( B R.
0x00b3e8…00b57c Dummy {f00=0x0003, f01=0x0190, f02=» B < B , PX PN P RT T MTP TCP TKT2 ( B :ER ( B P ( & R W W W W W B < U T U U _& W W W V C B , X PD P QL QN T 9 R29 RJ T C R W W W W @ K V
0x00b57c…00b710 Dummy {f00=0x0003, f01=0x0190, f02=» < ( < _L W W V W V W < v W$W(W V <_x W W _, T TPX>_8 W C _ V B , P P P R W W W W W W ~ W2 $W W V V 5 W _* V P W V | W | V P V
0x00b710…00b8a4 Dummy {f00=0x0003, f01=0x0190, f02=»T 8 _ W W @ W ~ V W ~ V W ~ V 0R :R AR GV V | V P v | W | P ,P > : H $_ W V | W | : 8D R 0 P P 9H _ W _( W : L T P6_ L
0x00b8a4…00ba38 Dummy {f00=0x0003, f01=0x0190, f02=» L _( W 0 R _ 8H 0 dR _ 8H 0 d R _ 8H : : W j H # W | H W R WNW _*_, B B P B ) Y N 9 V" j * (XB R *P _ V : N :IV :BR 8 8 N 9 V O V _ _ JOB BY
0x00ba38…00bbcc Dummy {f00=0x0003, f01=0x0190, f02=» * 1 1 ZHW _4 N ! QPP: O V ~ P8 h H W*W W W W $ W W W W W J_ W W R W W W W V ~ : & 0 : D L R b l v |
0x00bbcc…00bd60 Dummy {f00=0x0003, f01=0x0190, f02=»OVERFLOW I/O TOO MANY COMMAND ALLOWED DEVICE NAME MISSING 2ND ADDRESS UNKNOWN FCT LFT ASSIGNED EQU ASSIGN CORE INPUT OUTPUT /L EMPTY PROGRAM CLOSED DIRECTORY SYSTEM SESSION NO OBJECT LOAD MODULE W N & >B >A
0x00bd60…00bef4 (0, 15) Dummy {f00=0x0004, f01=0x0190, f02=» &Wz N % T U O 0 W i _0 ]$ Z & W & < U Z & & W R W W W W X~ X Q Pv N 4 # l R W W W W T" $ ( - - N
0x00bef4…00c088 Dummy {f00=0x0004, f01=0x0190, f02=» = W | < , P V 8 W W V | W H R WnW WjWhWf f R *TP < , T W | < V 8 W R W W W W W V W V :IDENT W _ W G G G G F T G F # Q V W V : , T
0x00c088…00c21c Dummy {f00=0x0004, f01=0x0190, f02=» W _ _ _ W G W 6 W V F T W V P v Pd P &Qp T P _ V < 4T" < 5 W W Pp U _R _H W V V Px_ V T V W V 4 W V W ]<_ V T8 V 4 W W V W W V D W
0x00c21c…00c3b0 Dummy {f00=0x0004, f01=0x0190, f02=» V : 8 V : OPTION NOT AVAILABLE CSEG1 LMCSEG2 LMCSEG3 LMCSEG4 LMCSEG5 LMLED LMCSEG7 LMCSEG8 LMCSEG9 LMCSEGA LMCSEGB LMCSEGC LMCSEGD LMCSEGE LM +, 3, ` P69a:a R. ( G ** CORE OVERFLOW ** @ O N W
0x00c3b0…00c544 Dummy {f00=0x0004, f01=0x0190, f02=» Y N P N P : N P 9B 9A R H P W 6 T P : R HW W W W j R JW W W W 8h X R HW W W W j 0 R JW W W W B PL ( XB P R _L YR U " V l8h Xf t R _p
0x00c544…00c6d8 Dummy {f00=0x0004, f01=0x0190, f02=»_`W @ X 8<h 8# LP 8P W T X Y 6 R HW W W W j N R JW W W W B Pb b !YYTR B W | x R _VW _Z_ W2 V f 00 V R _x V 0 V PW !NN O : ( 8 5 Y N N V 2
0x00c6d8…00c86c Dummy {f00=0x0004, f01=0x0190, f02=» h R W W W W W 1 5 C R W W W W O : DATE : TIME : BATCH PROCESSING : LINES/PAGE ON LP : PROG ELAPSED TIME: 00H-00M-00S-000MS- W @ 4 4 " Y 8 QR F _& Q$ H 4 " 9
0x00c86c…00ca00 Dummy {f00=0x0004, f01=0x0190, f02=»EA NOT WIRED INSTRUCTION MEMORY PROTECT BUFFER AREA DESTROYED TOO MANY SCHEDULED LABELS OPERATOR ABORTED PSW=HEXA A1 =HEXA A2 =HEXA A3 =HEXA A4 =HEXA A5 =HEXA A6 =HEXA A7 =HEXA A8 =HEXA A9 =HEXA A10=HEXA A11=HEXA A12=HEXA A13=HEXA A14=HEXA
0x00ca00…00cb94 (0, 16) Opaque[0x194]
0x00cb94…00cd28 # DirEnt {nam=»CSEG1 «, typ=»LM«, f00=0x434b, f01=0x204e, f02=0x0088, f03=0x203d}
0x00cb94…00cd28 IdxSect {
0x00cb94…00cd28 f00 = 0x0004 // 0xcb94 @0x0
0x00cb94…00cd28 f01 = 0x0002 // 0xcb96 @0x2
0x00cb94…00cd28 gno = [ // 0xcb98 @0x4
0x00cb94…00cd28 [0x00]: C0x0004.0x1.0
0x00cb94…00cd28 ]
0x00cb94…00cd28 }
0x00cd28…00cebc Dummy {f00=0x0004, f01=0x0190, f02=» n N V ( R W W W W W V ~ W B R W W W W W V W R Q , Z Z F R 9AR R W W W W ' W V T V P V P 4 # R Wt_ _ _ B T V ,P6R 9 :AW H - 9a:K8G W
0x00cebc…00d050 Dummy {f00=0x0004, f01=0x0190, f02=» # V ' V R W _ _ _ V C R W _ _ _ V V < = V ] P> V R$ R WV_ _ _ C B P W = G $ R W$_ _ _ : W* W& W" W W W W W W $W (W , L j 8 :
0x00d050…00d1e4 Dummy {f00=0x0004, f01=0x0190, f02=» R W W W W , P P F R :AR , P P F 4 + ' Z R WtW W W V T Tj V N LMT` V HPZ PV K R WBW W W V 6;a 8 0 PT 0X W$ W W W W W W W W W /F0 *$ <H $Wf (
0x00d1e4…00d378 Dummy {f00=0x0004, f01=0x0190, f02=» ! % TOO BIG N R WXW WTWR W | R W W W W V U R Q , P P F =nT R W W W W W F P V B ) : R W W W W F 4 # ` R W W W W 8
0x00d378…00d50c Dummy {f00=0x0004, f01=0x0190, f02=» (W , P 8 : IN CATALOG B C @ R _^W W W 8I9A:l:A H B V % d R _ : : : : N V ~ R W(W&W$W W$ V R W W W W : V % _ W W P 8 : VALUE $W (
0x00d50c…00d6a0 Dummy {f00=0x0004, f01=0x0190, f02=» DATA W:INBF READ INTO W:INBF < P DATA 80 = 6 P ADR A2,A13 = R P MSR 3,A9 = r < P LD A1,S:PCFC,A13 OUTPUT FILE CODE VALUE = P MSR 3,A10 = @ P SUK A1,/D0
0x00d6a0…00d834 (0, 17) Opaque[0x194]
0x00d834…00d9c8 # DirEnt {nam=»CSEG2 «, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0090, f03=0x2020}
0x00d834…00d9c8 IdxSect {
0x00d834…00d9c8 f00 = 0x0004 // 0xd834 @0x0
0x00d834…00d9c8 f01 = 0x0004 // 0xd836 @0x2
0x00d834…00d9c8 gno = [ // 0xd838 @0x4
0x00d834…00d9c8 [0x00]: C0x0004.0x2.0
0x00d834…00d9c8 [0x01]: C0x0004.0x3.0
0x00d834…00d9c8 ]
0x00d834…00d9c8 }
0x00d9c8…00db5c Dummy {f00=0x0004, f01=0x0190, f02=» d l ^ $ R W*W(W&W P X 8 : V U R V W" _& _* W R W W W W W, V U Q W , P| Px R WrWpWnWl V Q R , P T 9IV OBW UFW SC V N 0 V P.
0x00db5c…00dcf0 Dummy {f00=0x0004, f01=0x0190, f02=»WPW W P @P @T ` 2( _> F K V U 5 W R WrWpW Wl_v V R P V X V Q W R FWF V ] R W4 V P R W : V YPZ( V Y , R FW : W V W 2 P L 8 : EOV ON INPUT FILE,MOUNT NEW
0x00dcf0…00de84 Dummy {f00=0x0004, f01=0x0190, f02=» 8 R @ : R W W W W W V R ' Q ' W 2 R WtWrWpW V W W V R^ ' QX V RR W b R WPWNWLWJWZ V | SC N N _ V | UF_ V U Q _ W W W W W < W V , X X P Rb T W A
0x00de84…00e018 Dummy {f00=0x0004, f01=0x0190, f02=» V V V W _6 V W F ; V F F );A F ( R ?U ) Y ) ( T Y W V K V QD R W W W W W W V V V ' ] W _ V R _ WNWvWf V K > R W W W W C V C c l R WjW
0x00e018…00e1ac Dummy {f00=0x0004, f01=0x0190, f02=» 8 W 2 : LINE NUMBER INPUT FILE CAN NOT BE ASSIGNED OUTPUT NOT ASSIGNED W f R WVWTWRW W V ~ R WFWDWBW@ P4 11 ) R W"W W W 0 O : W W 8 : 00 W
0x00e1ac…00e340 Dummy {f00=0x0004, f01=0x0190, f02=»ZZ # 4 C C F 9n ~ R _ _ _ _ B H K _ DL = ON = F ! " / = _ J K R W W W W k : , P T 9CQ 9FR T ! T~ N T # 4 R W _ _ _ H ( T P@ W D V P L
0x00e340…00e4d4 (0, 18) Dummy {f00=0x0004, f01=0x0190, f02=» R FW : W W W W W W P 8 : '( #( ( D N N OB DI R UF 0 V P 4 # h P R W W W W W 8 $ A H D A L D A P l
0x00e4d4…00e668 Dummy {f00=0x0004, f01=0x0190, f02=» **** SECTORS Q Q" & U W W W W , W R W 4 V W # R W W W W W V P V 6 V T @ =a V V 4 j @ , W (
0x00e668…00e7fc Dummy {f00=0x0004, f01=0x0190, f02=» j P _ A j ( PROGRAM NAME SECTOR STRT INIT ACTL DATE W 4 V V V & A h A j ( W W @ h @ j & W W W W W W W W W P 8 : (
0x00e7fc…00e990 Dummy {f00=0x0004, f01=0x0190, f02=» & j ( < ( % W P& j ( % P ( % W P _& W W j & ( W V W j : j , V P _* EXTRN A h A j CO MM N W A h A j EN TR Y @ h @ j ( W V W j
0x00e990…00eb24 Dummy {f00=0x0004, f01=0x0190, f02=» A A j V A _ A _ j A h A j EN D @ h @ j , (; V A A h A j v V % V % @ PB j j l V % V % j (P E E A W R %_J T V P j , P _
0x00eb24…00ecb8 Dummy {f00=0x0004, f01=0x0190, f02=»R , ( W V C , ( R W _ _ _ T < , ( 4 & C l , ( R W _ _ _ B , ,P 8g , ( ! 9A *Y :k H % Y W YN , ( A
0x00ecb8…00ee4c Dummy {f00=0x0004, f01=0x0190, f02=» R W _ _ _ V W W V , ( @ D * ( V $ , ( @ ,P R 9 :AW H - Q - T , ( 9a:K8G # P _8 Y> W , ( V V : Y R W _ _ _ I:ASG ( , ( ! _" _, W
0x00ee4c…00efe0 Dummy {f00=0x0004, f01=0x0190, f02=» 8 X T Y T U , ( Y V , 0 X 9 & , ( Q U Q U . V , ( M - W D V , ( V V # , ( ! f = Z V
0x00efe0…00f174 (0, 19) Opaque[0x194]
0x00f174…00f308 # DirEnt {nam=»CSEG3 «, typ=»LM«, f00=0xffff, f01=0xffff, f02=0x00a0, f03=0xffff}
0x00f174…00f308 IdxSect {
0x00f174…00f308 f00 = 0x0005 // 0xf174 @0x0
0x00f174…00f308 f01 = 0x0004 // 0xf176 @0x2
0x00f174…00f308 gno = [ // 0xf178 @0x4
0x00f174…00f308 [0x00]: C0x0005.0x0.0
0x00f174…00f308 [0x01]: C0x0005.0x1.0
0x00f174…00f308 ]
0x00f174…00f308 }
0x00f308…00f49c Dummy {f00=0x0005, f01=0x0190, f02=» W & R W W WDW W ^ 8 : _ _ $ _ !_ _& h_0 IDENT V 8 V /O W /LP /S V W : SC W R _ W>_~_ 4 # R _ W _ ( V X W V Z
0x00f49c…00f630 Dummy {f00=0x0005, f01=0x0190, f02=» : UF W _D F R, F T V LW W W R 4W W X N ! 4 V # R _* V 4 4Pl Tf V 9$ TH V V PP W N ! V # W N R _ W U V 6 W 6 V 5 U U U V
0x00f630…00f7c4 Dummy {f00=0x0005, f01=0x0190, f02=» # R W 6 0=a 08g9A:l @ . A .;` $ 9(@ 4 N ! # f R W* V T U V T W 2 : X W V , P8 PB W T W T 9 VH9 V # R W& V V P W !
0x00f7c4…00f958 Dummy {f00=0x0005, f01=0x0190, f02=» j W - Z N " N /OBJCTOB W 0 V P , W 0 V , W W 4 V # V P W j W R W W W W W V < NOT V > N X4 ( 2 W V T" W B U V T W V T C n R _f
0x00f958…00faec Dummy {f00=0x0005, f01=0x0190, f02=» C _( W ( W" C V J R _4 W _ W _" B U W 6 < R WNW W V T$ C X R W2 W U _: U W _D C | R W W W W W U _ T T Y T T W Z_( C 5 Z V j W (P. H
0x00faec…00fc80 Dummy {f00=0x0005, f01=0x0190, f02=» <A W 6 V 6 R 6 V Q J 4 % Y # R W _ _ _ , T 4<A $ % 4 % Y j W 4P6 T V W ZW4 V 5 Z B W V W P V W _R C , U F R _ V T@ V , T
0x00fc80…00fe14 (0, 20) Dummy {f00=0x0005, f01=0x0190, f02=» j V T V R * V _& O 8 : $_ MODULE O 8 F R @W : _H _P W V 4 V # V V # R W W _ W C _ V R _ _ W _ W V C C _N
0x00fe14…00ffa8 Dummy {f00=0x0005, f01=0x0190, f02=» 0 V P P W , W N UF 0 R @W~ W W 4 W W W W V D 9 W< '( 8 : ( 8 : 8 : $ 8 W 2 : W * R JWJWLWFW@ B W | B W R R
0x00ffa8…01013c Dummy {f00=0x0005, f01=0x0190, f02=» V W ( W W V V W B V V W , n B W W W _f 8 * 8 z R J_8WD_<_> " P P P 4 0 W " ?A W ?a B V
0x01013c…0102d0 Dummy {f00=0x0005, f01=0x0190, f02=» B T0 4 @ % V C j R W W W W W B 9 , V 9 V V 9 V 9 C R W(W&W$W" j j W | D W 8W, 2_ 8W _2 _: W 2 @ : V D
0x0102d0…010464 Dummy {f00=0x0005, f01=0x0190, f02=»W:W8W:W4 V P* W B 9 V P> W W _z V P$ " T W _ W _ W _ V $ Pl V PN C # P R W4W2W0W. B $ $ - $ X x R _ _ _ _ #_V B $ $ - $_r ?a V
0x010464…0105f8 Dummy {f00=0x0005, f01=0x0190, f02=» EQU W:ASB9+2 " B PW:ABMS EQU W:ASBL WORK AREA FOR I:ABMS (10 WORDS ) # F PW:SEG EQU W:ASBA+2 CURRENT SEGMENT NUMBER(LAST IN CORE) # ` > PW:GR0 EQU W:SEG+2 NUMBER OF ALLOCATED GRANULE # B PW:GR1 EQU W:GR0+2
0x0105f8…01078c Dummy {f00=0x0005, f01=0x018e, f02=» W:GR1+50 SEG TABLE OF USER PROG = 1STWORD=NB OF SEG # J PW:SEG1 EQU W:SEG0+2 ADDR OF 1ST SEG,FOLLOWED BY 39 WORDS =40 $ @ . P* SEGMENT MAX $ F PW:RDA1 EQU W:SEG1+80 SAVE AREA FOR RANDOM ACCESS ROUTINES $
0x01078c…010920 Dummy {f00=0x0005, f01=0x0190, f02=» PW:RDA6 EQU W:RDA5+2 % PW:RDA7 EQU W:RDA6+2 % & PW:RDA8 EQU W:RDA7+8 % H PW:RDA9 EQU W:RDA8+2 % j PW:RDAA EQU W:RDA9+2 % > PW:SQA1 EQU W:RDAA+2 SAVE AREA FOR SEQUENTIAL I/O % PW:SQA2 EQU W:SQA1
0x010920…010ab4 (0, 21) Opaque[0x194]
0x010ab4…010c48 # DirEnt {nam=»CSEG4 «, typ=»LM«, f00=0xffff, f01=0xffff, f02=0x00b0, f03=0xffff}
0x010ab4…010c48 IdxSect {
0x010ab4…010c48 f00 = 0x0005 // 0x10ab4 @0x0
0x010ab4…010c48 f01 = 0x0002 // 0x10ab6 @0x2
0x010ab4…010c48 gno = [ // 0x10ab8 @0x4
0x010ab4…010c48 [0x00]: C0x0005.0x2.0
0x010ab4…010c48 ]
0x010ab4…010c48 }
0x010c48…010ddc Dummy {f00=0x0005, f01=0x0190, f02=» V F ` @ R W W W W N 9 V N W F $ $ R$ Q $ W T D L ;FV 2 V R $V # _& Y: N 4 # R WP_ _ _ @ H * ( B T 4 Q W 4 ) Y P ) Y :WP W W P 8 :
0x010ddc…010f70 Dummy {f00=0x0005, f01=0x0190, f02=»9AV W 2 Y& N P( , P( P$ F 9AV 9A9b G N | @ D H ;AV ;A;b I H R ;H;h _ O : O R WbW W^W WZ V BYTP E TJ R WhW WdWbW2 V TX 00 V : R WF V 0 V T. @ O @ N T O T N 9B 9 O
0x010f70…011104 Dummy {f00=0x0005, f01=0x0190, f02=» v |>H W | v | W | W p : , P P P V U W 2 O : ( :SYSTEM USERID: , P> 0R R4 V. W T T 9FV W 0 O W 2 ]N N 9 Rh N 9DV. # P C C C R HW W W W #
0x011104…011298 Dummy {f00=0x0005, f01=0x0190, f02=» ' ' ' W H R *T N O O O W O : 8 N 9 Z # P C C C R HW W W W # j C C @ C 4 R JW W W W j B &P0 N ? O & O
0x011298…01142c Dummy {f00=0x0005, f01=0x0190, f02=» A ( O : 11CCI REL. 04 (PTS VERSION) & 2 " ERID: : P 0R R V W T T 9FV W 0 O W 2 ]N N 9 R N 9DV # P C C C R HW W W W #
0x01142c…0115c0 Dummy {f00=0x0005, f01=0x409c, f02=»( * XRF P , t , ( . BUG p TLT p 0 * LKF p 2 * & D T r . @ F p JOB , ( Q END MES PSE , ( q WLB PLB REF
0x0115c0…011754 (0, 22) Opaque[0x194]
0x011754…0118e8 # DirEnt {nam=»CSEG5 «, typ=»LM«, f00=0xffff, f01=0xffff, f02=0x00b8, f03=0xffff}
0x011754…0118e8 IdxSect {
0x011754…0118e8 f00 = 0x0005 // 0x11754 @0x0
0x011754…0118e8 f01 = 0x0004 // 0x11756 @0x2
0x011754…0118e8 gno = [ // 0x11758 @0x4
0x011754…0118e8 [0x00]: C0x0005.0x3.0
0x011754…0118e8 [0x01]: C0x0006.0x0.0
0x011754…0118e8 ]
0x011754…0118e8 }
0x0118e8…011a7c Dummy {f00=0x0005, f01=0x0190, f02=» ` * B J L H 8 v < r $ j D W" LKF W LKE A W W - Y ` O O R W W W W W V PVQ V CP P& P6 P8 Tv O W XD , W O W X^ ^_ _0 _6 V DEP T. O
0x011a7c…011c10 Dummy {f00=0x0005, f01=0x0190, f02=»V~ N N 0 V P2 8 R @W W 2 W 2 Y : V P& : D N N 0 V P H_Z N 9BVF D 0 V P _ V P : D 0 V P b_ , T 8_ X 4 R
0x011c10…011da4 Dummy {f00=0x0005, f01=0x0190, f02=» 8_8 N B N 9H _N COMMON VALUE REDUNDANT LIBRARY OPTION REDUNDANT DEBUG OPTION REDUNDANT MAP OPTION REDUNDANT START ADDR. REDUNDANT USER LIB ASSIGN ERR : /OBJCTOB SYSTEM LIB ASSIGN ERR : /O EMPTY /O CLOSE ERROR /L ASSIGN ERR : PROC
0x011da4…011f38 Dummy {f00=0x0005, f01=0x0190, f02=» OBDIR ASSIGN ERR : OLE LM j 4 4 = Y < Y N & Q O 8 = Y F O ( W W W W@ O _ _ W W W W O
0x011f38…0120cc Dummy {f00=0x0005, f01=0x0190, f02=»P& !RRTR W QP O _: W QF O _J W QP O _Z V /ST , P P _t Wz Wv Wr W & Wd D_ WZ WV WR 6_ V T , P P T 9IV. N OB 0 V P N P 8 : , T ! T~ N T #
0x0120cc…012260 Dummy {f00=0x0005, f01=0x0190, f02=»W V T& D F:ERMSUF 0 V P ` V V j N " N W 2 H W 2 N T N 9HR : W 2 : ( /S ASSIGN ERR : R OPTION ERR NL OPTION ERR D OPTION ERR /S EMPTY /O ASSIGN ERR :
0x012260…0123f4 (0, 23) Dummy {f00=0x0006, f01=0x0190, f02=»L LM BCL LM BEA LM BEB LM TRA LM XRF LM TCD LM HSF LMFX1 LMFX2 LMFX3 LMFX4 LMFX5 LMFX6 LMFX7 LMFX8 LMFX9 LMFXA LMFXB LMFXC LMFXD LMFXE LM R W W W W , P X 4 R WR R WH
0x0123f4…012588 Dummy {f00=0x0006, f01=0x0190, f02=» N N 9HZ W 0_( TLT W TLK A - Y ` O O R WpW WlWnWz V V` V !XXPJ MP& P6 P8 TH O W XD , W2 O W X^ ^_ _0 _6 O _z W P ( 8 : N 9AVL N N 0 V
0x012588…01271c Dummy {f00=0x0006, f01=0x0190, f02=»_V X 4 R W W _6 R _ N OB 0 V P$ 8 ( R @W W 2_ N OB 0 V P$ 8 h R @W W 2_N N OB 0 V P$ 8 R @W W 2_N
0x01271c…0128b0 Dummy {f00=0x0006, f01=0x0190, f02=» W 2 W 2 W 2 W 2 :W TLK A - Y ` O O R W W W W W V V V !XXP MP P P T O W XD , W O W X^ ^_ _0 _6 O _z W P 8 : N 9AV N N 0 V
0x0128b0…012a44 Dummy {f00=0x0006, f01=0x0190, f02=» PTS * P DATA TLKPRO * PTS * P DATA TLKPST * PTS * * P DATA XRFPRO * PTS * F P DATA XRFPST * PTS * b P DATA TLTPRO * PTS * ~ P DATA LKFPRO * PTS * P!!IL 458 L P******************************************************************
0x012a44…012bd8 Dummy {f00=0x0006, f01=0x0190, f02=»* L P* P* P* PLKFPRO EQU * ( P* < P* F P MLK 2 P P DATA 'LKF ' LINKER NAME ^ P RF LKEMOD GO MODIFY ~ P!!IL 460 P MLK 2 P DATA 'LKE ' LINKER NAME , PLKEMOD MS 2,LKESEG+2 MODIFY LINKER NAME P
0x012bd8…012d6c Dummy {f00=0x0006, f01=0x018e, f02=»BCLP P* PXRFPRO EQU * * PTS * P LDKL A4,XRFSEG 2 P RB BCLP J P!!IL 1305 Z P LD A5,S:SEG,A13 * PTS * l P CWK A5,XRFSEG XRF ? P RF(NE) ASM210 NO ! P & P LDKL A6,ASM450 ERR RET FOR LOADSG P ABL LOADSG *PTS*
0x012d6c…012f00 Dummy {f00=0x0006, f01=0x018e, f02=» P DATA 1 P DATA 'TRA LM' P* 0 P* : P* D PXRFSEG EQU * * PTS * N P DATA 1 j P DATA 'XRF LM' z P!!EN P$X PSCR PMES $ PMES CSEGB IS UPDATED TO HANDLE , PMES AN EXTENTION OF THE 'RUN'-
0x012f00…013094 (0, 24) Opaque[0x194]
0x013094…013228 # DirEnt {nam=»LED «, typ=»LM«, f00=0xffff, f01=0xffff, f02=0x00c8, f03=0xffff}
0x013094…013228 IdxSect {
0x013094…013228 f00 = 0x0006 // 0x13094 @0x0
0x013094…013228 f01 = 0x0004 // 0x13096 @0x2
0x013094…013228 gno = [ // 0x13098 @0x4
0x013094…013228 [0x00]: C0x0006.0x1.0
0x013094…013228 [0x01]: C0x0006.0x2.0
0x013094…013228 ]
0x013094…013228 }
0x013228…0133bc Dummy {f00=0x0006, f01=0x0190, f02=» D " W w @ D P 9aW W F R _ W W W W V | D N N SC v R W W W W W$ V /SP W V R Q UF W 0 V T R WjW W W W W W2 V UR QN , PF PB W R W6W W W0 !!W V R" V
0x0133bc…013550 Dummy {f00=0x0006, f01=0x0190, f02=» (P> R *P _& V n ! T$ JW R W W W W * JW N ; RF W W W W B X _ _, X _ W W W W W W P 8 N T N 9HV V W 2 W 2 W 2 : 8 j @W _L _ _T
0x013550…0136e4 Dummy {f00=0x0006, f01=0x0190, f02=» R W*W(W W _j R FW _x R W _ W : " 4 R W W W W 8 V R ' Q ' W R W W W W V R 8 z R W W~W|W Wx V Rr ' Ql V Rv W R WXWVWTW W W$ V RF ' Q@ R< W R W.W,W*W( V V P W V W 8
0x0136e4…013878 Dummy {f00=0x0006, f01=0x0190, f02=» D N N W R _ _ _ W _ V Z ' Y W W R _ _ _ W W V Z ' Y Z W R _ _ _ _ 0 V P V V Q A V V W W P W 0 W V W B W A V W 8 V Td d T V
0x013878…013a0c Dummy {f00=0x0006, f01=0x0190, f02=»_ W _ V Z ' Y" V W T V X@ V V =a=A T V Xb V @ V =a=A W V V P W l W V w V ) W _( w 8 V W T V X V j P ( + R W,W*W.
0x013a0c…013ba0 Dummy {f00=0x0006, f01=0x0190, f02=» W W V | V P v | W | W $$P 9H_ W : W : V | V :H v | W | Y $$ V :a V Q V % v % W Y j W | V V | V V | $ R * W | ^ _$ W V $V : D V_bW v W
0x013ba0…013d34 (0, 25) Dummy {f00=0x0006, f01=0x0190, f02=» V D V_ W W W j P ( V ) Y ( R WfWdWdWx V Q RH W 2 V j UUT PW " * ( x R W W W W W V V _ W V Z Qn R FW _( " ! T . R Wl p @ *
0x013d34…013ec8 Dummy {f00=0x0006, f01=0x0190, f02=»_ _ V j @ b ` NW V j P ~ R _L_NW W _P N ; " W W W W B Xz_h Xl_2 # , T TYT F C R HW W W W j W | P W P % Y P C R J B B B V 1 L: W
0x013ec8…01405c Dummy {f00=0x0006, f01=0x0190, f02=» , , V , ( h 00 ) J R W W W W ( <V # N < V # N < V O 00 ) L R W W W W , , P P P # z R W W W W :!!DL rIL ,EN vAB tJN CH VLS RE COMM
0x01405c…0141f0 Dummy {f00=0x0006, f01=0x0190, f02=»D DSK OUTPUT ERR,UPD ABORTED SYNTAX ERR,TRY AGAIN EOF,UPD TERMINATED INPUT FILE CAN NOT BE ASSIGNED /S CAN NOT BE ASSIGNED * AUX. INPUT CAN NOT BE ASSIGNED,TRY AGAIN ( CMND NOT ALLOWED IN EXE MODE,TRY AGAIN TABLE O'FLOW,TRY AGAIN EOF IN AUXI IN
0x0141f0…014384 Dummy {f00=0x0006, f01=0x0190, f02=» 8 P LDK A1,0 1ST LINE TO BE IGNORED j " P ST A1,S:NB,A13 j @ , P LDR A2,A2 LINE1=0 ? j f < P RF(0) JNP220 YES DO NOT IGNORE ANY LINE j 8 P SUK A2,1 LAST LINE TO BE SKIP
0x014384…014518 Dummy {f00=0x0006, f01=0x0190, f02=» j t P ABL SKIP k . P RF JNP230 EOF DETECTED k & PJNP220 EQU * k X : P LD A1,S:ANB2,A13 LAST LINE TO BE COPIED k t " P ST A1,S:NB1,A13 k P LDKL A6,JNP230 k 0 P ABL
0x014518…0146ac Dummy {f00=0x0006, f01=0x0190, f02=»A1,/1D9 RESTORE INSTRUCTION COPYFC k ~ P ST A1,COPYFC l . $ P LD A1,S:ANB1,A13 l R > P ST A1,S:NB,A13 RESTORE LINE # OF MAIN INPUT l z B P AB.L ILP700 INSERT LINES UP TO NEXT COMMAND l P
0x0146ac…014840 Dummy {f00=0x0006, f01=0x0190, f02=»* l 8 P* CHAR STRING TABLE (AT END OF THE WORK AREA) m P* USED AS FOLLOWS : m F P* m h D P* RETURN TO A6+2 IF EOF ON /DA FILE m r . P* 1WORD ENTRY LENGTH (2 STRINGS) m * P* 1WORD LENGTH OF
0x014840…0149d4 (0, 26) Opaque[0x194]
0x0149d4…014b68 # DirEnt {nam=»CSEG7 «, typ=»LM«, f00=0xffff, f01=0xffff, f02=0x00d8, f03=0xffff}
0x0149d4…014b68 IdxSect {
0x0149d4…014b68 f00 = 0x0006 // 0x149d4 @0x0
0x0149d4…014b68 f01 = 0x0002 // 0x149d6 @0x2
0x0149d4…014b68 gno = [ // 0x149d8 @0x4
0x0149d4…014b68 [0x00]: C0x0006.0x3.0
0x0149d4…014b68 ]
0x0149d4…014b68 }
0x014b68…014cfc Dummy {f00=0x0006, f01=0x0190, f02=» W ( R V W W PW _ W _ , P P j P X R W d R W ( V V F K R JW W WpW P* F 0 NOT P D T R JW W~_D_ _ F C P R P R W`W _h_j_l @TT R RWH x 2( _
0x014cfc…014e90 Dummy {f00=0x0006, f01=0x0190, f02=» R _J_L_NW W V W ( j P V ^| R W W W W B W | B W R W W W W W d R *T R W W W W W : R *Tx F K X P R P R W W8W W F K r R WvWtW W _>
0x014e90…015024 Dummy {f00=0x0006, f01=0x0190, f02=» RW :W bW P 8_4( ! ( ( MODULE /O /O CLOSE ILLEGAL EOS IN IDENT OBJECT LIB EOV ON OUTPUT FILE,MOUNT NEW TAPE THEN RESTART W R W W W W ` V d d , P h R W W W W W V
0x015024…0151b8 Dummy {f00=0x0006, f01=0x0190, f02=» n R W0W _H_J_L @T R RW x 2( _hW W W W W W.W R FW V _ R W W 2 : V | D N N UF R W W W6W W V W 0 V P 8 R @ V /STD SC_: V /ST , P W& W" W W W W
0x0151b8…01534c Dummy {f00=0x0006, f01=0x0190, f02=» ABI C:ASST,A12 PRINT THE CAUSE,THEN RETURN c PPCH170 LDK A6,/D9 d B P ABL PCH025 d b P* d & PPCH180 EQU * /S ? d $ P LD A7,W:PARV,A13 d P CWK A7,/2F53 d 2 P
0x01534c…0154e0 Dummy {f00=0x0006, f01=0x018e, f02=» d P EJECT e P* e P* e ( $ PPCH200 EQU * /S e 2 $ P LD A1,W:PARV,A13 e Z P CWK A1,/2F53 e P RF(4) PCHER1 e P LDK A3,/D4 e $ P CFI A14,C:FCSC,A12 e
0x0154e0…015674 (0, 27) Opaque[0x194]
0x015674…015808 # DirEnt {nam=»CSEG8 «, typ=»LM«, f00=0xffff, f01=0xffff, f02=0x00e0, f03=0xffff}
0x015674…015808 IdxSect {
0x015674…015808 f00 = 0x0007 // 0x15674 @0x0
0x015674…015808 f01 = 0x0002 // 0x15676 @0x2
0x015674…015808 gno = [ // 0x15678 @0x4
0x015674…015808 [0x00]: C0x0007.0x0.0
0x015674…015808 ]
0x015674…015808 }
0x015808…01599c Dummy {f00=0x0007, f01=0x0190, f02=» 2 FILE TYPE MISSING FILE TYPE ERROR : R W W W W W W b R W W W W@ W W V /LT LM W W, /S ( SC W W Z@ YF UF W R W W W W D W N N W W V W R W W W W Wd
0x01599c…015b30 Dummy {f00=0x0007, f01=0x0190, f02=»P$ V W W D W 8W _ 0 V P 8W@ R W W W W W _> N W 0 V P 8 R @Wx 4 ' ! + 2 R W^W W W D R WLW W W G K _. B $ V UFT F > & | R W
0x015b30…015cc4 Dummy {f00=0x0007, f01=0x0190, f02=» 8 W 2 : _ V P ! Ub _0 D N " N UF W 0 V P. 8 ^ R @W : V /OP /LP _b W W , T _ T _ R W W W W WZ _ T ! V W W R _._0_2W WZ Z> R
0x015cc4…015e58 Dummy {f00=0x0007, f01=0x0190, f02=» n R W W W WTW R W W W W W X V Z ] X P V ! V >R W _R W W( R W W W W W L_ F V_ SECTOR # B GRANTBID 4 W
0x015e58…015fec Dummy {f00=0x0007, f01=0x0190, f02=» X 4 _ W , W ( R W W W W : W W ' R `R Q Q / _" Q . V V : W W ? 0 :R 9 Y 9 V V : _ R W W W W W _ T ! V W W R _._0_2W W Z> R
0x015fec…016180 Dummy {f00=0x0007, f01=0x40f0, f02=»/0200 l ~ 2 P* FILE TYPE ERROR m P DATA /06FF m D P DATA /0200 m d P* m P DATA /1F06 m P DATA /0702 m P END SEG7 m @ m DATA /1E0E l P
0x016180…016314 (0, 28) Opaque[0x194]
0x016314…0164a8 # DirEnt {nam=»CSEG9 «, typ=»LM«, f00=0x0008, f01=0x2020, f02=0x00e8, f03=0x2020}
0x016314…0164a8 IdxSect {
0x016314…0164a8 f00 = 0x0007 // 0x16314 @0x0
0x016314…0164a8 f01 = 0x0002 // 0x16316 @0x2
0x016314…0164a8 gno = [ // 0x16318 @0x4
0x016314…0164a8 [0x00]: C0x0007.0x1.0
0x016314…0164a8 ]
0x016314…0164a8 }
0x0164a8…01663c Dummy {f00=0x0007, f01=0x0190, f02=» W R W W W W 8 V : _ v W N R _ _"W W D W N W N W v LM W 0 V P T _t _~ W , 4 Q ') * _ W W W W` V W Z WH V /L W , Xb Xf W W
0x01663c…0167d0 Dummy {f00=0x0007, f01=0x0190, f02=» W R &_ _ W W V 9oP V 8 A d V : W V < A h9a 4 48D 5 Z H W _j_lW W W W 4 V * +9A P X _ V V Q Q P A 9 W _ Z _$ 4 A : A <?A ?a
0x0167d0…016964 Dummy {f00=0x0007, f01=0x0190, f02=» W W R _ _ W W R FW R W @ * W 2 * R _"W W D W N W N W W IDENT PRNAME W , P W P T 9IR T W W N " OB 0 V T&_H R W W WlW 8 : _
0x016964…016af8 Dummy {f00=0x0007, f01=0x0190, f02=» x R _ W _ _ N ! W N W W V W W W R W W W W WH _ V Z Y , X X" F R 9AR V W W _B B V R F W /OBJCTOB W D W 0 V P ( R R W W W W W WF W
0x016af8…016c8c Dummy {f00=0x0007, f01=0x0190, f02=»T* W W B W ._ W 2 : V P W _ W $ R _ _ _ _|_ W V 4 V # V V # f R W W W W>W C _ V R _ _ W _ W V C C _N V V $_$ R W W W W 8 : _
0x016c8c…016e20 Dummy {f00=0x0007, f01=0x0190, f02=» V /ST , P , ( ! W W W W W W W W ( , ( A W $ P 8_ /S TYPE CA X , ( a N NOT BE ! H D ! T p W W W !W -P 1P G L MW
0x016e20…016fb4 (0, 29) Opaque[0x194]
0x016fb4…017148 # DirEnt {nam=»CSEGA «, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x00f0, f03=0x2020}
0x016fb4…017148 IdxSect {
0x016fb4…017148 f00 = 0x0007 // 0x16fb4 @0x0
0x016fb4…017148 f01 = 0x0002 // 0x16fb6 @0x2
0x016fb4…017148 gno = [ // 0x16fb8 @0x4
0x016fb4…017148 [0x00]: C0x0007.0x2.0
0x016fb4…017148 ]
0x016fb4…017148 }
0x017148…0172dc Dummy {f00=0x0007, f01=0x0190, f02=» R ` d W W N R^ %& 8 V : W W N R W W W W d 4 W _ W W W W W r R W W W W _n _v V Z , P T _ 4 # C C R W W W W 0 I V H R W
0x0172dc…017470 Dummy {f00=0x0007, f01=0x0190, f02=»W V PJ N ! 4 # R W W W W 0 I V H R W W W W Q: W % W R W W W W W _ W W W W N W N W r 8 V : V @ V A $ _ '( _. < W W R
0x017470…017604 Dummy {f00=0x0007, f01=0x0190, f02=» R W W W W V 6R 9BR PtQ ( V 8 V : R < W ( L R P % _ W W r R W W W W A V 69AV R _ W _ 0 A V : 0*********LIBRARY DIRECTORY********* 0****FILENAME****TYPE****ADDRES
0x017604…017798 Dummy {f00=0x0007, f01=0x0190, f02=» W j 0 A A 4 W W R W W W W R P* W _0 ( 4 <X2 T R V : TV < Y Z < " Y Y W W 8 R W W W W A A _ < Y Z < P2 Y
0x017798…01792c Dummy {f00=0x0007, f01=0x0190, f02=» ! P : R W W W W O :11 R < W R P % _ W W R W W W W A V 69AV R _ W _ 0 A V : 0*********LIBRARY DIRECTORY********* 0****FILENAME****TYPE****ADDRES
0x01792c…017ac0 Dummy {f00=0x0007, f01=0x4156, f02=» RB(4) TRMODA t 6 P HLT OTHERWISE ERROR u P* u T PTRMODD EQU * u ^ . P LD A1,S:OBJ,A13 WRITE EOS u z 8 P RB(4) TRMOD8 OK IF COPY /OBJCT u 6 P RB TRMOD9
0x017ac0…017c54 (0, 30) Opaque[0x194]
0x017c54…017de8 # DirEnt {nam=»CSEGB «, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x00f8, f03=0x2020}
0x017c54…017de8 IdxSect {
0x017c54…017de8 f00 = 0x0007 // 0x17c54 @0x0
0x017c54…017de8 f01 = 0x0002 // 0x17c56 @0x2
0x017c54…017de8 gno = [ // 0x17c58 @0x4
0x017c54…017de8 [0x00]: C0x0007.0x3.0
0x017c54…017de8 ]
0x017c54…017de8 }
0x017de8…017f7c Dummy {f00=0x0007, f01=0x0190, f02=» ` 2 8 V TY 0 W W : R W8W6W4W W2 V U. P* R R" V V W j R W W`W W W W W W V U Q V P W W R W W W W V 0! R @ : : V R P0 T V DKPx W R Wv W _n 00_"
0x017f7c…018110 Dummy {f00=0x0007, f01=0x0190, f02=» R W W W W N W _` | R W W W W WR V R Q , P P| F R 9AR V W V R R W W.W W~ D W D B V V PZ W UF W V NPTJ _, V NPT: _@ W2 W. W* W& W" W W W W $W (
0x018110…0182a4 Dummy {f00=0x0007, f01=0x0190, f02=»/OTh V B T^ W R WDWpWnWl N " N /O BJ CT OB V R4 V P$ W 8 : _ _ _ _( _0 " _: V YJ V W R _ _^W _V UFW$ V /O /ST SCW /L P LM W N " N
0x0182a4…018438 Dummy {f00=0x0007, f01=0x0190, f02=» DEL OBDIR j n W | W : W N " N /OBJCTOB W 0 V P4 l 8 R 0W : OBJECT LIBRARY W 4 # R W W W W W C _ W W v ( V R *Pp C V P W _X
0x018438…0185cc Dummy {f00=0x0007, f01=0x0190, f02=» W C _ C R _DW W W C C _$ DEL /OB W j n W | W : N N X R WbW W^W W LM 5 _" Pv ' N U ' 8 4 W 4PJ = W Y : G SEGMENT NBR. ' J
0x0185cc…018760 Dummy {f00=0x0007, f01=0x0190, f02=» Y ( | N N LM N O F T" V | ' O F P, R W$W"W W _ O _ O _ W W W P 8 :" ! " N P : ( EXIT CODE = N " W ( N 9I^D N 9H^L O :
0x018760…0188f4 (0, 31) Opaque[0x194]
0x0188f4…018a88 # DirEnt {nam=»CSEGC «, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0100, f03=0x2020}
0x0188f4…018a88 IdxSect {
0x0188f4…018a88 f00 = 0x0008 // 0x188f4 @0x0
0x0188f4…018a88 f01 = 0x0002 // 0x188f6 @0x2
0x0188f4…018a88 gno = [ // 0x188f8 @0x4
0x0188f4…018a88 [0x00]: C0x0008.0x0.0
0x0188f4…018a88 ]
0x0188f4…018a88 }
0x018a88…018c1c Dummy {f00=0x0008, f01=0x0190, f02=» " N R P 8 : . R W W W W W V U R Q , P P b R W W W W W V U P R~ Qz , Px Pt H <g$ Vj P F <g$ VX P U 4 # V 5 R _ _ _ _
0x018c1c…018db0 Dummy {f00=0x0008, f01=0x0190, f02=» > V 4 P C Y : C # R _ W W W # R _ W W W B ' 7 X:_6 FIRST SECOND TYPE ` & BUG W DEB A & R W W W W , P P T W( V | LM N N F P W v R W~W|WzWx
0x018db0…018f44 Dummy {f00=0x0008, f01=0x0190, f02=»W W W W W _ P 8 W 2 W 2 :_.W W W # B R _:W W W C _r B " W 2 , N O O T V O ( " ! " PROCESSOR SYSTEM USER # V 5 R _ _ _ _
0x018f44…0190d8 Dummy {f00=0x0008, f01=0x0190, f02=» DEL OBDIR j n W | W : W N " N /OBJCTOB W 0 V P4 l 8 R 0W : OBJECT LIBRARY W 4 # R W W W W W C _ W W v ( V R *Pp C V P W _X
0x0190d8…01926c Dummy {f00=0x0008, f01=0x0190, f02=» W C _ C R _DW W W C C _$ DEL /OB W j n W | W : N N X R WbW W^W W LM 5 _" Pv ' N U ' 8 4 W 4PJ = W Y : G SEGMENT NBR. ' J
0x01926c…019400 Dummy {f00=0x0008, f01=0x0190, f02=» Y ( | N N LM N O F T" V | ' O F P, R W$W"W W _ O _ O _ W W W P 8 :" ! " N P : ( EXIT CODE = N " W ( N 9I^D N 9H^L O :
0x019400…019594 (0, 32) Opaque[0x194]
0x019594…019728 # DirEnt {nam=»CSEGD «, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0108, f03=0x2020}
0x019594…019728 IdxSect {
0x019594…019728 f00 = 0x0008 // 0x19594 @0x0
0x019594…019728 f01 = 0x0002 // 0x19596 @0x2
0x019594…019728 gno = [ // 0x19598 @0x4
0x019594…019728 [0x00]: C0x0008.0x1.0
0x019594…019728 ]
0x019594…019728 }
0x019728…0198bc Dummy {f00=0x0008, f01=0x0190, f02=» " d ` , 2 : > B F P l Z T * R W~W WzWx W V W F R WfWdWbW Wr V RX QT W , P@ P< F R:=AR6 R W0W.W,W* F P W W$ W W W W W W P 8 : W V V # R W V ?D
0x0198bc…019a50 Dummy {f00=0x0008, f01=0x0190, f02=» ~ R WnW W2W W. V OBT$ G F >P _. B T V UFP Wn R W^W W W K _< W V R W W V P $ P 8 W 2 W 2 : ( 8 R @ ,_ 0_4 , U T W C L R _. C C l R _N $ 6
0x019a50…019be4 Dummy {f00=0x0008, f01=0x0190, f02=»_ R 4_ V T. ON V W 4 R 4W 4 " V C R R _R_ _ _ V * V K K K T R _ _ K V R$ R _ C B $ X _L =_R
0x019be4…019d78 Dummy {f00=0x0008, f01=0x0190, f02=» W x R W W W W W V W Q W Y , T W T : V P$ T MTP MLP TCP TKP TLP _F W R WBW W>W(WL W R4 W R* V ALT L T W _8 W R V _ W W W P P 8 : j P V V PlRv( B T6 V P W
0x019d78…019f0c Dummy {f00=0x0008, f01=0x0190, f02=»W> B C C c # R W W W W V # ( : NO LABEL W j j F R : : : : : t R W W W W " V W , T : V P ( ( ) Y VOL10000000 W v | W |
0x019f0c…01a0a0 Dummy {f00=0x0008, f01=0x0190, f02=» ' h R W ) Y z R _DW W W R _ Y ( : V P T MTP MLP TCP TKP TLP _F W R W W W W W W R W R V ALT L T W _8 W R V _ W W W P 8 : j P V V P R ( B T V P W
0x01a0a0…01a234 (0, 33) Opaque[0x194]
0x01a234…01a3c8 # DirEnt {nam=»CSEGE «, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0110, f03=0x2020}
0x01a234…01a3c8 IdxSect {
0x01a234…01a3c8 f00 = 0x0008 // 0x1a234 @0x0
0x01a234…01a3c8 f01 = 0x0004 // 0x1a236 @0x2
0x01a234…01a3c8 gno = [ // 0x1a238 @0x4
0x01a234…01a3c8 [0x00]: C0x0008.0x2.0
0x01a234…01a3c8 [0x01]: C0x0008.0x3.0
0x01a234…01a3c8 ]
0x01a234…01a3c8 }
0x01a3c8…01a55c Dummy {f00=0x0008, f01=0x0190, f02=» R W W W W W 8 : _ V V _" , T _6 f R W W W W _B _R V , X4 4 MT W R W W W W W8 _ V CK V W R W W W W W _ W 4 W W _ B ! P
0x01a55c…01a6f0 Dummy {f00=0x0008, f01=0x0190, f02=» W W ( V R ( V R V _0 (Q _* V , W ( V 0 P W ( V ZB W ( V ZV V W W ( ( V ( V 4 . , 0T ]V , x ( ERRONE
0x01a6f0…01a884 Dummy {f00=0x0008, f01=0x0190, f02=» p O X O . O t O 2 = V & >A O d O f &? O O O O O = V & >A O O K ; Z u v =h% E N ?P D " E > V _ P _F K ; Z u v " TB :e:C B N # P D 0 E > V _ P X$ _V " ;A # " :B*
0x01a884…01aa18 Dummy {f00=0x0008, f01=0x0190, f02=» V _ F N (@ , P P P V U W 2 O : N " N M:PROCUF W 0 V T W 4 P ) Y : R R @W j W | H W p
0x01aa18…01abac Dummy {f00=0x0008, f01=0x0190, f02=» R W W W W$W P W END 4 R *X _> QJ 0 V P : R @WF_ P 8W2 FILE M:PROC 8W W 2 W 2 O : 8_ 8_. PROCEDURE IN PROCEDURE DEFINITION z ) W r
0x01abac…01ad40 Dummy {f00=0x0008, f01=0x0190, f02=» ~ V r ( P 5 ^ W r 8 x 8 x TABLE N " UF W 0 R @W j W | H W 4 W t H W v H % Y j P ) Y j # R W W W WlW P W 4 H ( D R FWj_ n ~ h
0x01ad40…01aed4 (0, 34) Dummy {f00=0x0008, f01=0x0190, f02=» j 4 ( % Y _ _` IN PROCEDURE GENERATION 4 H ( j $ R *P W 4 R W @P D HW _ P _ V ~ L f W 4 4 v H_ Y V x R WJW6 =P _ R W R W,W R W R W W _ HW ,
0x01aed4…01b068 Dummy {f00=0x0008, f01=0x0190, f02=»W8_ T R W ^ R W W W" V t W t | H_ , < ( j C R _t_ _ _ ( R _ ( R _ W 2 , U O O : W p z ~ 4 T V p $T " R *P : :_2 : V p 4 P : V t V v
0x01b068…01b1fc Dummy {f00=0x0008, f01=0x0190, f02=» PROGRAM NA ~ * ( ME SECTOR STRT INIT ACTL , ( ! DATE W 4 L , ( A V V V & A T A V | , ( a ( W W @ T @ V & W W , ( W W W W W W W P
0x01b1fc…01b390 Dummy {f00=0x0008, f01=0x0190, f02=» l , ( % P _ V & ( % , ( ! & j ( < ( % W < , ( A P V ( % P ( % l , ( a W P _& W W V & , ( ( W V W V & , ( H j
0x01b390…01b524 Dummy {f00=0x0008, f01=0x0190, f02=» @ T @ V t , ( ( W V W V ( , ( / $ < R < R & W h 2 X D , ( O V % V % j t , ( @ o @ R R W A % @ , ( R S % A A V , ( H
0x01b524…01b6b8 Dummy {f00=0x0008, f01=0x0190, f02=» , ( * A T A V b V % V % @ , ( / P V V X V % V 4 , ( O % V (P E E A d , ( o W R %_J T V P PODPST , ( $ V P _ W , (
0x01b6b8…01b84c Dummy {f00=0x0008, f01=0x0190, f02=» L H D ! 4 8 < X H YQ ]Q" H D !t cU k R W W W W W | P T H D != T V ! % ) / _P k X P P P P V H D ! {W W W
0x01b84c…01b9e0 Dummy {f00=0x0008, f01=0x4066, f02=» R V r / r 1PB [P o r qW T P P R @ P@ b R W W W W W | P T H D != T V ! % ) / _P k X P P P P V H D ! {W W W
0x01b9e0…01bb74 (0, 35) Opaque[0x194]
0x01bb74…01bd08 # DirEnt {nam=»PRDUMP«, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0120, f03=0x2020}
0x01bb74…01bd08 IdxSect {
0x01bb74…01bd08 f00 = 0x0009 // 0x1bb74 @0x0
0x01bb74…01bd08 f01 = 0x0004 // 0x1bb76 @0x2
0x01bb74…01bd08 gno = [ // 0x1bb78 @0x4
0x01bb74…01bd08 [0x00]: C0x0009.0x0.0
0x01bb74…01bd08 [0x01]: C0x0009.0x1.0
0x01bb74…01bd08 ]
0x01bb74…01bd08 }
0x01bd08…01be9c Dummy {f00=0x0009, f01=0x0190, f02=» J " A @ D A D A @ J @ ZW @ J A J_ A j @ ZW b h @ A A . @ FLT T T W R T T @ @ j ZW A j_N @ A & T Y @ j @ Z_ r
0x01be9c…01c030 Dummy {f00=0x0009, f01=0x0190, f02=» @ @ J ^a : b 9 p i ,w z* { 5 R M[k 3 C zk 5 P Z;/ m c Q MASKF1N MASKF2 STAKM NEWSEL ARECTR GETARE & AREAST8 AREAEN REVLOP : DMP1M Z RET1 H LOCEOF DMP2M p RET2 h
0x01c030…01c1c4 Dummy {f00=0x0009, f01=0x0190, f02=»OP2 Z $ C C ( : $ - - Y : @ 4 Q $ ^ ~ @ 4 Y : FLT j 0 5 0 P R D U M P REL 2.2 5
0x01c1c4…01c358 Dummy {f00=0x0009, f01=0x0190, f02=»C 0 0 DATE OF PRINTING: : : 0 0 TIME: : : EDITDT EDLOOP DATFLD SLASK | CVALOP 8 TIMFLD TITECB TITLNO TITTABN TITLOP n PRTRT TXT1A TXT68 TXT7@ TXT11 TXT9 j TXT10 9
0x01c358…01c4ec Dummy {f00=0x0009, f01=0x0190, f02=» - Y - ( : P XLOOP n HEXDIG LINEI WXLOOP WXL001 WALOOP WADOT WASCR LINECB PRTFC @ A 8 ( : >( : P
0x01c4ec…01c680 Dummy {f00=0x0009, f01=0x0190, f02=» PNOFLD 8 PAGECB SPAECB > PRTR PAGTXT SPATXT J ; ; ; ; ; ; R Q @ 6 - WL @ 4 - A H R* X @ R X @ _ Q @ HX" A H T 6 - _0 D 6 - Z Z Z Z Z Z :- 0123456789 d ' A A @ A
0x01c680…01c814 (0, 36) Dummy {f00=0x0009, f01=0x0190, f02=» @ & T @ 4 - Z @ FLP ( 8( ( * ( : :ADOT 0END OF PRDUMP 0FINIS. ( 0THERE WAS
0x01c814…01c9a8 Dummy {f00=0x0009, f01=0x0190, f02=»TTE OR FLEXIBLE-DISC D 0REQUESTED MEMORY DUMP AREA NOT PRESENT ON CASSETTE/FLEXIBLE-DISC SKIP TO NEXT MEMORY DUMP AREA F 2 @ NOT A A A Wn YE D A A A @ @ U T W< @ O :
0x01c9a8…01cb3c Dummy {f00=0x0009, f01=0x0190, f02=» v_ S R R ZW _ @ A j F 2 @ YEP NO , Z [ : : C C ( : I : R W U Z [ :ADOT A r A t r L 0R, :R AR GV 0 P 9D_. Z [ :
0x01cb3c…01ccd0 Dummy {f00=0x0009, f01=0x0190, f02=» MEMORY DUMP AREA : 0NO MORE DUMP AREAS MORE AREAS WANTED ? & @ B UP @ FLP @ H C ( A H @ J A J @ FLT T>W R8 _T @ FLP @ H C ( A H @ J A JW 4 FW D : D @ FTV B
0x01ccd0…01ce64 Dummy {f00=0x0009, f01=0x0190, f02=» @ FLP &( B V @ @ J : @ H A H @ FLP &( : ( @ TKP FL B : 4 4 : I : R W U Z [ :ADOT A r A t r L 0R :R AR GV 0 P 9D_. Z [ :
0x01ce64…01cff8 Dummy {f00=0x0009, f01=0x0190, f02=» MEMORY B & 0NO MORE DUMP AREAS MORE AREAS WANTED ? @ U @ FLP @ C ( A @ A @ FLT T W R _T @ FLP @ C ( A @ A W W : @ T B
0x01cff8…01d18c Dummy {f00=0x0009, f01=0x0190, f02=»TBU 4 EOFCND F ACTBUF D GETRTNU CTEST2P R WAITF ERR2R V REWRTN ECB1 & REVRTN DEVECB DEVRTN: CAFLEX LINK1 2 BUFF2 4 BUF1 4 ECB22 4 LINK2 @ BUF21 B [ :ADOT A r A t r L 0R :R AR GV 0 P 9D_. Z [ :
0x01d18c…01d320 Dummy {f00=0x0009, f01=0x0190, f02=» U . U 0 T J U , T * T , ? ? U * T . T 0 T 2 T 4 T 8 T : < > @ B D F H T 6 > ?f' _ 8 * 2 _D X 3u ; ; ? 0 :R 9 Y 9 9 : : : @ P R ! R P L M Y #? @ P R P T T T
0x01d320…01d4b4 (0, 37) Opaque[0x194]
0x01d4b4…01d648 # DirEnt {nam=»DMPGEF«, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0130, f03=0x2020}
0x01d4b4…01d648 IdxSect {
0x01d4b4…01d648 f00 = 0x0009 // 0x1d4b4 @0x0
0x01d4b4…01d648 f01 = 0x0002 // 0x1d4b6 @0x2
0x01d4b4…01d648 gno = [ // 0x1d4b8 @0x4
0x01d4b4…01d648 [0x00]: C0x0009.0x2.0
0x01d4b4…01d648 ]
0x01d4b4…01d648 }
0x01d648…01d7dc Dummy {f00=0x0009, f01=0x0190, f02=» @ t ( @ P@ d 4 t 4 ( t R t R ( t( $ C C ( : 9 $ Y :0123456789ABCDEF Z% d z `" * : t ` `H F 4 Am `" ] 4 Zfg!{ * @ aNp
0x01d7dc…01d970 Dummy {f00=0x0009, f01=0x0190, f02=» b *p ^a : b 9 p i ,w z* { 5 R M[k 3 C zk 5 P Z;/ UU ' &P _ A. ~A I. A 9 Z F. " :D # P" Z = X = ` = J =W 6 = : = D = 2 TL
0x01d970…01db04 Dummy {f00=0x0009, f01=0x0190, f02=» Zfg!{ * @ aNp
0x01db04…01dc98 Dummy {f00=0x0009, f01=0x0190, f02=» " H : PW:ASB3 EQU W:ASB2+2 NONE,NONE,NONE,FILE NAME # PW:ASB4 EQU W:ASB3+2 # F PW:ASB5 EQU W:ASB4+2 # h : PW:ASB6 EQU W:ASB5+2 NONE,NONE,NONE,FILE TYPE # < PW:ASB7 EQU W:ASB6+2 STATUS OF ASSIGN OPERATION # P
0x01dc98…01de2c Dummy {f00=0x0009, f01=0x0190, f02=» AREA FOR I:ABMS (10 WORDS ) # n F PW:SEG EQU W:ASBA+2 CURRENT SEGMENT NUMBER(LAST IN CORE) $ $ > PW:GR0 EQU W:SEG+2 NUMBER OF ALLOCATED GRANULE $ n B PW:GR1 EQU W:GR0+2 ADDR OF FIRST ALLOCATED GRANULE $ J P*
0x01de2c…01dfc0 Dummy {f00=0x0009, f01=0x0190, f02=» J PW:SEG1 EQU W:SEG0+2 ADDR OF 1ST SEG,FOLLOWED BY 39 WORDS =40 % . P* SEGMENT MAX % R F PW:RDA1 EQU W:SEG1+80 SAVE AREA FOR RANDOM ACCESS ROUTINES % PW:RDA2 EQU W:RDA1+2 % PW:RDA3 EQU W:RDA2
0x01dfc0…01e154 (0, 38) Opaque[0x194]
0x01e154…01e2e8 # DirEnt {nam=»XRF «, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0138, f03=0x2020}
0x01e154…01e2e8 IdxSect {
0x01e154…01e2e8 f00 = 0x0009 // 0x1e154 @0x0
0x01e154…01e2e8 f01 = 0x0002 // 0x1e156 @0x2
0x01e154…01e2e8 gno = [ // 0x1e158 @0x4
0x01e154…01e2e8 [0x00]: C0x0009.0x3.0
0x01e154…01e2e8 ]
0x01e154…01e2e8 }
0x01e2e8…01e47c Dummy {f00=0x0009, f01=0x0190, f02=» F y P @ )I 2Z "z yR ); > } z $ | t >1 " R>fj +u &K w [ . d +b 'L @M 9"~ T 9 A1 R < R:R:L `i Z% |d z ` ' : t ` | `H > | , m `" T , R<^ s { " @ 7FF
0x01e47c…01e610 Dummy {f00=0x0009, f01=0x0190, f02=»1 CROSS REFERENCE LISTING OF MODULE: &&&&&& DATE: YYMMDD PAGE: 0 SYMBOL DEF REFERENCES NO MORE SPACE AVAILABLE P jW ( R ( @ R$ # " P A ( 0 : ! X 0_ ! 0 0 !'
0x01e610…01e7a4 Dummy {f00=0x0009, f01=0x0190, f02=» P : @ b! RP$ @ A9Q A1R Q 5 Q 0 V P ( Pb V _ Z Y$ PZ P ^0 Q _( W W 7 : V * J R K W _$ _4
0x01e7a4…01e938 Dummy {f00=0x0009, f01=0x0190, f02=» ( @ b' A b 1 ( ! b _ ID $ EN . T 8 ! > b _H ! P , ! P _ ! b V b W ! XF 0 ! XP_ !' T x ! Xb !, X" !+ X( !- X. 0_ 0( C
0x01e938…01eacc Dummy {f00=0x0009, f01=0x0190, f02=» Y$ : A ( @ A ( W A , . @ f V " @ A W A & R Q T W& *** . R Q + G TH r @ 0 A @ d A $ 0( C ( @ b' U A b_ gZj
0x01eacc…01ec60 Dummy {f00=0x0009, f01=0x0190, f02=» TH & r @ 0 A @ A $ h( C ( @ ' U A _ gZj &_t( !Z YJ R ) 0 !' X ! P !, P !+ P !- P !0 Z< !: YB_8 [ : d A fW ~ ( ( @ ' A ( 6 6 ! _
0x01ec60…01edf4 (0, 39) Opaque[0x194]
0x01edf4…01ef88 # DirEnt {nam=»DMPGEN«, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0140, f03=0x2020}
0x01edf4…01ef88 IdxSect {
0x01edf4…01ef88 f00 = 0x000a // 0x1edf4 @0x0
0x01edf4…01ef88 f01 = 0x0002 // 0x1edf6 @0x2
0x01edf4…01ef88 gno = [ // 0x1edf8 @0x4
0x01edf4…01ef88 [0x00]: C0x000a.0x0.0
0x01edf4…01ef88 ]
0x01edf4…01ef88 }
0x01ef88…01f11c Dummy {f00=0x000a, f01=0x0190, f02=» | y T @ > : 2Z "z yZ SC F z $ } F[ " R>n +u PK w [ 6Ad +b% L jM c"~ T c A9 '| ~ UU ' &P _ | B T 0 | ( ( ( $( ( (
0x01f11c…01f2b0 Dummy {f00=0x000a, f01=0x0190, f02=»( $ C C ( : 9 $ Y :0123456789ABCDEF z* { 5 R M[k 3 C zk 5 P Z;/ m c QiZ zk Z 9 4 6@Bh 0 ` % P | 0TK ERROR 0DMPGEN REL 3.2 STATUS WORD: H 'Z t
0x01f2b0…01f444 Dummy {f00=0x000a, f01=0x0190, f02=» z * y T A. A I. 9h! X F.! A P 8B T0 A K T$; V ^0W 8 Xh _@K 8 _rA K : ~ UU ' &P _ B ( ( ( ( ( (
0x01f444…01f5d8 Dummy {f00=0x000a, f01=0x0190, f02=» LABEL = CLHJ 2 DATE = 780126 PACK NBR = 001 f : V - P Y _( Y M : ] =IR E
[…0x2…]
0x01f900…01fa94 (0, 40) Opaque[0x194]
0x01fa94…01fc28 # DirEnt {nam=»CPLGEN«, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0148, f03=0x2020}
0x01fa94…01fc28 IdxSect {
0x01fa94…01fc28 f00 = 0x000a // 0x1fa94 @0x0
0x01fa94…01fc28 f01 = 0x0002 // 0x1fa96 @0x2
0x01fa94…01fc28 gno = [ // 0x1fa98 @0x4
0x01fa94…01fc28 [0x00]: C0x000a.0x1.0
0x01fa94…01fc28 ]
0x01fa94…01fc28 }
0x01fc28…01fdbc Dummy {f00=0x000a, f01=0x0190, f02=» d L f N( N ( N Z( N ( N( B T `T : ~ f ~ r f r Z( ( $ C C ( : 9 $ Y :0123456789ABCDEF] 4 Zfg!{ * @ aNp
0x01fdbc…01ff50 Dummy {f00=0x000a, f01=0x0190, f02=» 0TK ERROR 0CPLGEN REL 1.2 STATUS WORD: , A P UU ' &P _ b B A. m c QiZ zk Z 9 A I T PB 1 I T 0V X4 X 9A_ 9 V B. T B. _bX V z R:* d z H 'Z t
0x01ff50…0200e4 Dummy {f00=0x000a, f01=0x0190, f02=» h $ Y :0123456789ABCDEF DMPIPL 0 DUMPN DUMPL B , ( ]@ P X , ( w 0TK ERR , ( OR 0DMPGEN REL 3.2 STATUS WORD: H D ! Z
0x0200e4…020278 Dummy {f00=0x000a, f01=0x4014, f02=» @ Y :0123456789ABCDEF DMPIPL 0 DUMPN DUMPL B , ( ]@ P X , ( w 0TK ERR , ( OR 0DMPGEN REL 3.2 STATUS WORD: H D ! Z
0x020278…02040c Dummy {f00=0x000a, f01=0x418c, f02=» @ F IDENT DUMPER REL=3.2/CLHJ/780130 DUMPY DUMPL EXCOR H DUMPY d , ( A. A I. 9h! X F.! v , ( A P 8B T , ( A K T ; V ^0W
0x02040c…0205a0 Dummy {f00=0x000a, f01=0x2008, f02=»
0x0205a0…020734 (0, 41) Opaque[0x194]
0x020734…0208c8 # DirEnt {nam=»JESPER«, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0150, f03=0x2020}
0x020734…0208c8 IdxSect {
0x020734…0208c8 f00 = 0x000a // 0x20734 @0x0
0x020734…0208c8 f01 = 0x0002 // 0x20736 @0x2
0x020734…0208c8 gno = [ // 0x20738 @0x4
0x020734…0208c8 [0x00]: C0x000a.0x2.0
0x020734…0208c8 ]
0x020734…0208c8 }
0x0208c8…020a5c Dummy {f00=0x000a, f01=0x0190, f02=» t 0XX ERROR 0JESPER REL 1.2 STATUS WORD: M c"~ T c A9 '| < R:R:L `r Z% d z `" * : t ` `H F 4 Am `" ] 4 Zfg!{ * @ aNp
0x020a5c…020bf0 Dummy {f00=0x000a, f01=0x0190, f02=» b *p ^a : b 9 p i ,w z* { 5 R M[k 3 C zk 5 P Z;/ m c QiZ zk Z 9 4 6@Bh 0 ` % < 4` ` S O PZ# 0 > tB ./ J t z Z Z(p Z } n zF X V z R:* d z H 'Z t
0x020bf0…020d84 Dummy {f00=0x000a, f01=0x0190, f02=» z * 0XX ERROR 0JESPER REL 1.2 STATUS WORD: M c"~ T c A9 '| L ( x A & @ A @ A @ A 9a t t A 0=D )=G A A
0x020d84…020f18 Dummy {f00=0x000a, f01=0x0190, f02=»=K z A P ( P ?A_ ) @ % ( t ( % @ E A t A ( ( @ ` T( : @ & @ Q( ( @ $ T A & : TKW DKW FM A D p @ ( x @ 4 x ^ ( x ^ 4 x P C
0x020f18…0210ac Dummy {f00=0x000a, f01=0x0190, f02=» Y ^ 5 ) P U W C h P "Z Y _ *_ X4 @ XP L _B =a 9a Q - _ - > @ RPp A( ( . L . A. .H L @! , - M M M @! AM^ AM` @G G ;a H <a R IG IG _
0x0210ac…021240 Dummy {f00=0x000a, f01=0x0190, f02=»M^ @Mb U ::A AMf O , @G R YG P0 ,% T( M C ( B P T W ' Tf IMh XG =hP Y XG PX ,T( Y HMh! R W 9a IMh ^ W P ,! T T ( O : M @M^P M` $ ) 5 h AM^ AM AMb
0x021240…0213d4 (0, 42) Opaque[0x194]
0x0213d4…021568 # DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x2020, f01=0x2020, f02=0x0158, f03=0x2020}
0x0213d4…021568 IdxSect {
0x0213d4…021568 f00 = 0x000a // 0x213d4 @0x0
0x0213d4…021568 f01 = 0x0040 // 0x213d6 @0x2
0x0213d4…021568 gno = [ // 0x213d8 @0x4
0x0213d4…021568 [0x00]: C0x000a.0x3.0
0x0213d4…021568 [0x01]: C0x000b.0x0.0
0x0213d4…021568 [0x02]: C0x000b.0x1.0
0x0213d4…021568 [0x03]: C0x000b.0x2.0
0x0213d4…021568 [0x04]: C0x000b.0x3.0
0x0213d4…021568 [0x05]: C0x000c.0x0.0
0x0213d4…021568 [0x06]: C0x000c.0x1.0
0x0213d4…021568 [0x07]: C0x000c.0x2.0
0x0213d4…021568 [0x08]: C0x000c.0x3.0
0x0213d4…021568 [0x09]: C0x000d.0x0.0
0x0213d4…021568 [0x0a]: C0x000d.0x1.0
0x0213d4…021568 [0x0b]: C0x000d.0x2.0
0x0213d4…021568 [0x0c]: C0x000d.0x3.0
0x0213d4…021568 [0x0d]: C0x000e.0x0.0
0x0213d4…021568 [0x0e]: C0x000e.0x1.0
0x0213d4…021568 [0x0f]: C0x000e.0x2.0
0x0213d4…021568 [0x10]: C0x000e.0x3.0
0x0213d4…021568 [0x11]: C0x000f.0x0.0
0x0213d4…021568 [0x12]: C0x000f.0x1.0
0x0213d4…021568 [0x13]: C0x000f.0x2.0
0x0213d4…021568 [0x14]: C0x000f.0x3.0
0x0213d4…021568 [0x15]: C0x0010.0x0.0
0x0213d4…021568 [0x16]: C0x0010.0x1.0
0x0213d4…021568 [0x17]: C0x0010.0x2.0
0x0213d4…021568 [0x18]: C0x0010.0x3.0
0x0213d4…021568 [0x19]: C0x0011.0x0.0
0x0213d4…021568 [0x1a]: C0x0011.0x1.0
0x0213d4…021568 [0x1b]: C0x0011.0x2.0
0x0213d4…021568 [0x1c]: C0x0011.0x3.0
0x0213d4…021568 [0x1d]: C0x0012.0x0.0
0x0213d4…021568 [0x1e]: C0x0012.0x1.0
0x0213d4…021568 [0x1f]: C0x0012.0x2.0
0x0213d4…021568 ]
0x0213d4…021568 }
0x021568…0216fc Dummy {f00=0x000a, f01=0x40d2, f02=» 2 F IDENT DEFDOC T,3.2,78-09-15,870137140320 DEFDOCK : DEFDOCK L T:FDSP ` I:EVA0 r T:IO2 $ H @ P* , P BNZ SINERR UNSUCESSFUL MOVE FROM STRING
0x0216fc…021890 Dummy {f00=0x000a, f01=0x4138, f02=» 2 F IDENT FMOVE T,3.2,78-09-15,870137140320 FMOVE : FMOVE J I:EVA0 I:ERR2 n I:EVA5 , ( D #0 & + I:ER18 I:RT1 * & $ P _
0x021890…021a24 Dummy {f00=0x000a, f01=0x40ec, f02=» 2 F IDENT TYPET T,3.2,78-09-15,870137140320 TYPET : TYPET J I:EVA0 I:ERR2 n I:RT1 , ( B #03 ;d # + @ @ P _
0x021a24…021bb8 Dummy {f00=0x000a, f01=0x40f0, f02=» 2 F IDENT ICLEAR T,3.2,78-09-15,870137140320 ICLEARK : ICLEARK L I:EVA0 ` I:RT1 r , ( @ #0 0T ' ' _ T $ @ P _
0x021bb8…021d4c Dummy {f00=0x000a, f01=0x4110, f02=» 2 F IDENT EMPTYT T,3.2,78-09-15,870137140320 EMPTYTK : EMPTYTK L I:EVA0 ` , ( @ #0 0T & ! T r I:RT1 , ( P & ! X T C T T !P <
0x021d4c…021ee0 Dummy {f00=0x000a, f01=0x0190, f02=» 2 F IDENT T:STIN T,3.2,78-09-15,870137140320 STRIN1K : STRIN1K L T:STEV ` , ( @ X x & Y " X R W r T:RNOK I:EVA0 , ( P _ Y $ I:ER17
0x021ee0…022074 (0, 43) Dummy {f00=0x000b, f01=0x412a, f02=» u X $ X " R W V R , ( W V % _ " D $ D , I:MOV T:GRFC l T:ROK ~ * & $ X $ X y & @ < R W 'P W aP eP gW: kP R W V R W
0x022074…022208 Dummy {f00=0x000b, f01=0x0190, f02=» 2 F IDENT T:STOU T,3.2,78-09-15,870137140320 STROU1K : STROU1K L T:STEV ` I:EVA0 r , ( @ X x & Y " I:ER17 I:ERR2L , ( !0P ! P ! T , (
0x022208…02239c Dummy {f00=0x000b, f01=0x4116, f02=» h , ( R W V y & Y $ 8 " X X T:DUPX 8 T:GRFC J T:ROK T:RNOK l * & $ x ( y $ ~ < 8 -PL 3P 9T GT( MT SW$ cP oW yW P R W V,
0x02239c…022530 Dummy {f00=0x000b, f01=0x413e, f02=» 2 F IDENT T:STEV T,3.2,78-09-15,870137140320 T:STEVK : T:STEVK L T:GRFC ` I:EVA0 r * & H #0T Y Y , ( ! T # P & #0T ( I:ERR2 7 :
0x022530…0226c4 Dummy {f00=0x000b, f01=0x0190, f02=» 2 F IDENT T:EDFL T,3.2,78-09-15,870137140320 T:EDFLK : T:EDFLK L T:PM1 ` T:PM2 p T:CASP , ( I O ( n P O * , ( n o W N " T:DUPX , (
0x0226c4…022858 Dummy {f00=0x000b, f01=0x0190, f02=» C ( O v T:SCUW T:SVE ( , ( @ * N O , N 8 , ( N C & C C ( h T:RESTC , ( ( $ T:IOER , ( B P 9 R 9
0x022858…0229ec Dummy {f00=0x000b, f01=0x0190, f02=» M " T O _ _ B U C T:CLR1A . T:CLR2 @ , ( k Q C D R , ( N N * $" ~_> @ O N * , ( _R N !@XX o N # n V o , ( N N *P L - _ -
0x0229ec…022b80 Dummy {f00=0x000b, f01=0x415e, f02=» 1 1 r , ( C N !@T N $ " P o T:CLIT@ B T:EKEY` T , ( c _ n T N H f & " N N * , )$ P _ : H D !U P r )Wj 9 h QP i r uV Ph R^ PP 7P QT eU oQ y
0x022b80…022d14 (0, 44) Dummy {f00=0x000b, f01=0x0190, f02=» 2 F IDENT T:DYKI T,3.2,78-09-15,870137140320 J F " T:DYKIK T:PM1 T:PM2 T:CLR1 T:CLIT T:CLR2 T:IOER@ T:EKEY T:BELLC : T:DYKIK I:EVA3N , ( @ ' Y o , ( n C o N C C
0x022d14…022ea8 Dummy {f00=0x000b, f01=0x0190, f02=» { T B 9 R 9 N ! T T:CASP 0 T:CLRD` B , ( _ o C Q " T T , ( N ! N N ! n , ( Y O _ N "@P B R o , ( C B P 9 V _F9 V N
0x022ea8…02303c Dummy {f00=0x000b, f01=0x0190, f02=» T:IOER@ j , ( W @ o " o $ c C _$ T:CLR1 x L T:CLR2 ` T:SCUW t * & u _ o _6 n X@ N , ( N # C _. B , ( ]d P C Q X8_H n XD @ O
0x02303c…0231d0 Dummy {f00=0x000b, f01=0x0190, f02=»RN * & @ B C : + T:CLIT 4 8 I:EVA0 L , ( ' N ( ^ T:CLMI T:PM1 , ( ? ( : B C _> + . , ( ] N 9 V ! P @ O
0x0231d0…023364 Dummy {f00=0x000b, f01=0x4134, f02=» : x , ( " ( $ $ : ! P # P : F H D ! W }Tf R j T Q T H P R P V r H D ! VZ T GP KQ( { $ P Q8 H O X kV qP
0x023364…0234f8 Dummy {f00=0x000b, f01=0x0190, f02=» 2 F IDENT T:UPDF T,3.2,78-09-15,870137140320 T:UPDFK : T:UPDFK L I:ER14 ` I:EVA0 r , ( 2! O " I:ERR2@ I:MOV , ( @ !0
0x0234f8…02368c Dummy {f00=0x000b, f01=0x4012, f02=» R @ F T,3.2,78-09-15,870137140320 T:UPDFK : T:UPDFK L I:ER14 ` I:EVA0 r , ( 2! O " I:ERR2@ I:MOV , ( @ !0
0x02368c…023820 Dummy {f00=0x000b, f01=0x018e, f02=» 2 F IDENT T:DUPL T,3.2,78-09-15,870137140320 T:DUPLK T:DUPX : T:DUPLK T I:EVA0 h I:ERR2@ z T:RNOK , ( B !0 N T:ROK T:DUPX " , (
0x023820…0239b4 (0, 45) Dummy {f00=0x000b, f01=0x401a, f02=» @
0x0239b4…023b48 Dummy {f00=0x000b, f01=0x4168, f02=» 2 F IDENT T:GETC T,3.2,78-09-15,870137140320 T:GETCK : T:GETCK L I:ER14 ` I:EVA0 r , ( 2' I:ERR2 I:RT1 , ( " P # P R P P N ' ' ( $
0x023b48…023cdc Dummy {f00=0x000b, f01=0x413c, f02=» 2 F IDENT T:GETA T,3.2,78-09-15,870137140320 T:GETAK : T:GETAK L I:EVA0 ` I:ERR2 r , ( ! P # P N T:RNOK T:ROK T:RCR ( $ H ' N !
0x023cdc…023e70 Dummy {f00=0x000b, f01=0x411c, f02=» 2 F IDENT T:TSTC T,3.2,78-09-15,870137140320 T:TSTCK : T:TSTCK L , ( N " 9b! N :c 2" ` I:ER14 T:RTES , ( ! H @ = / 6
0x023e70…024004 Dummy {f00=0x000b, f01=0x018e, f02=» 2 F IDENT T:TFWD T,3.2,78-09-15,870137140320 D @ T:TLEFK T:TRIG T:TLDO T:TDOW T:TUP T:TFWD T:TBWD T:THOMC : T:TLEFK T:TRIG T:TLDO T:TDOW T:TUP T:TFWD T:TBWD
0x024004…024198 Dummy {f00=0x000b, f01=0x4110, f02=» T:TABE , ( ? 2 Y 69h Q X :h Y 0 W T:SCR2 F T:TABC X T:TABN j * & ] U X Q W Y 0 | w 8 4 W W W W W W !W IQ YW ]U eQ kW x
0x024198…02432c Dummy {f00=0x000b, f01=0x0190, f02=» 2 F IDENT T:DISP T,3.2,78-09-15,870137140320 T:PRINK T:DISP T:ERAS : T:PRINK T:FDSP p T:EDWIC T:GRFCC T:GTIP , ( D 9H Y * T:DISP T:ERAS "
0x02432c…0244c0 Dummy {f00=0x000b, f01=0x0190, f02=» I:ER14 , ( S @P P R P R Y +W T:TABD F , ( q Y + W T R X , ( W Q W Y + U , ( Q Y Q P W T:TABC , ( W
0x0244c0…024654 (0, 46) Dummy {f00=0x000b, f01=0x4172, f02=» X 0 Y 8 P Y 0 X 0 X 2 T:WRDY . , ( # ] X 8 Y 0 : X 0 :H* @ , ( A : X 2T Y 2 : C 1 B p T:EDIO a ] : H D ! c W !W 7T SP0 WP YR _P aR mWl q P } B WZ T
0x024654…0247e8 Dummy {f00=0x000b, f01=0x018e, f02=» 2 F IDENT T:GETF T,3.2,78-09-15,870137140320 T:GETFK T:GTIT T:GTIP : T:GETFK I:ER14L p T:TABC T:TABN * & H X +! T:GTIT T:GRFC T:GTIP ,
0x0247e8…02497c Dummy {f00=0x000b, f01=0x40a2, f02=» I:ER15 I:ERR2 , ( S 2 X 0 : ! P # T : ( q X ; b M b gP kT l r @ * & H X +! T:GTIT T:GRFC T:GTIP ,
0x02497c…024b10 Dummy {f00=0x000b, f01=0x0190, f02=» 2 F IDENT T:REWR T,3.2,78-09-15,870137140320 ! . * T:REWRK T:SCUW T:CLRD T:IOWR T:CASP ! : T:IOWR ! l T:SCUW ! , ( C ( C : C B ! T:CLRD " ! T:REWRK ( ! , ( ! _ _ N
0x024b10…024ca4 Dummy {f00=0x000b, f01=0x4100, f02=» + Q 2 P P ! , ( @ ( B N # V " $ I:EVA0 " T I:ECPY " f I:EVI " x , ( : _, " _: " 3 F 7P uP* yP4 V " " @ "
0x024ca4…024e38 Dummy {f00=0x000b, f01=0x0190, f02=» 2 F IDENT T:DEDT T,3.2,78-09-15,870137140320 # . * T:TABCK T:TABD T:TABE T:TABN T:SCR2 # : I:EVNO # l I:ESKIR # ~ I:EVA0 # I:EBRIr # I:EBRBa # I:EBR # , ( #
0x024e38…024fcc Dummy {f00=0x000b, f01=0x0190, f02=» # n T:DSL $ T:TABCK $ $ T:TABD ( $ 2 T:TABE , $ F , ( ! W W X 0Q $ Z T:EDWI $ I:EVT $ , ( = $ Y ( Y *P Y $ I:EDSK $ T:GRFC $ , ( Y $
0x024fcc…025160 Dummy {f00=0x000b, f01=0x0190, f02=» $W " $ r , ( P Y 0] Y (_t P P % T:EDWF % B , ( T " X _8 " P & X *# % T I:ER16L % , ( " P B 1 &W ( % T:SCR2 $ % , ( " P X X( C : X *! % ,
0x025160…0252f4 (0, 47) Dummy {f00=0x000c, f01=0x40e0, f02=» T:RCR % * & g X y 6 Y ( : X (;n , & H D ! 'W +W 3Q 7 $ ; " GP Q P PJ V PD T P` Wp P P & > < 8 P T0 P" P W P /P 5P ;T EP YW aT eW & & @ &
0x0252f4…025488 Dummy {f00=0x000c, f01=0x0190, f02=» 2 F IDENT T:ENLI T,3.2,78-09-15,870137140320 ' T:DNL T:DSL ' : I:EVNO ' P I:ECPY ' b I:EPIC ' t I:ETXTL ' I:ETAB ' I:EBRI ' I:EBRB ' I:EBR ' * & '
0x025488…02561c Dummy {f00=0x000c, f01=0x0190, f02=» ' T:DSL $ ( " T:GRFC ( 4 T:DNL 0 ( F , ( ! Y .W Y . X ( X , ( ; ( X ." P X 0R T Y *P ( T:WRDY ( I:ENL ( , ( [ U :H " K T (
0x02561c…0257b0 Dummy {f00=0x000c, f01=0x414a, f02=»:ER16 ( , ( P P T " T : " * ) T:ENINL ) > , ( Y . , Y ( ) P * & Y *P : " T ! 1 W ! ) ) ( : ) H D ! 0 # $ /W EPV KRz MT$ UP [U wT }W QP T2 P$ U P
0x0257b0…025944 Dummy {f00=0x000c, f01=0x018e, f02=» 2 F IDENT T:EINP T,3.2,78-09-15,870137140320 * " T:PKI T:PINP T:TKI T:TINP * : T:PKI * ` T:PINP * r T:GRFC` * I:ETAB * I:EVIN * , ( I Y *T : * I:ECTRN * T:EVOU
0x025944…025ad8 Dummy {f00=0x000c, f01=0x0190, f02=» * f , ( Q " Q Y +Q R " P W " Q W + I:ER16@ + 8 , ( q @ Y , " Q " X . X 0R + J , ( P X *:h P P ) + z , ( Y (W X *:h P P P + , ( P P W X + ,
0x025ad8…025c6c Dummy {f00=0x000c, f01=0x0190, f02=»:EXIT + , ( +" , W Y ( : X , , ( E *:h X , X 0P T X *:h , > , ( e X& X, X (!@T @ Y ( X , Y , n , ( V X 0 P _V P p , , ( P Y 8 X 8 X , T:WRDY
0x025c6c…025e00 Dummy {f00=0x000c, f01=0x0190, f02=» X (P , , ( 8 Y 0 X 2X X 0^ _h Y ( - " I:EVA0C - R , ( = $" T Y ( : 8 - d , ( Y 8 Y 8 : " P x & P : - , ( y : J "0P T " P W - , ( %T W
0x025e00…025f94 (0, 48) Dummy {f00=0x000c, f01=0x4176, f02=» , ( V Y : X $ X : : . H D !@@ T SQ [Q ]R cP eW kQ mW q 2 {Q R P" P PD W . 4 H D ! Pt Pn P P b P< WZ P< Q P2 R$ W b T$ . H D ! #W 1W QPD U b YT. sT P0 | Pr WV P T T8
0x025f94…026128 Dummy {f00=0x000c, f01=0x0190, f02=» 2 F IDENT T:ENIN T,3.2,78-09-15,870137140320 / T:ENINK T:ENI T:EVOU / : T:ENINK / Z T:ENI / n , ( X Y " X Y $ X Y & " / I:EGTB / , ( ! ! T W ! P / , ( ? =H
0x026128…0262bc Dummy {f00=0x000c, f01=0x0190, f02=» , ( @ W Y ( : X , Y X 0 , ( $ Y X &T Y Y Y W 0 4 I:EVA0C 0 d , ( $:H D Y D :H Y ! P 0 v I:EVA1 0 , ( @ W Y ! P W 0 I:ECPY 0 T:EVOU . 0
0x0262bc…026450 Dummy {f00=0x000c, f01=0x40bc, f02=»W 0 r O : $ : 1 H D ! -T 3W =P K WT" gT oW0 yW( P W P W W T W< P 1 2 $ W P W . 7P =T GW 1 ~ 1 @ 1 @ W Y ! P W 0 I:ECPY 0 T:EVOU . 0
0x026450…0265e4 Dummy {f00=0x000c, f01=0x4138, f02=» 2 F IDENT T:SETC T,3.2,78-09-15,870137140320 2 T:SETCK T:SCUR 2 : T:SETCK 2 T T:GRFC 2 h T:EDWI 2 z T:RCTS 2 T:SCUR 2 , ( A C 2 T:WRDY 2 X
0x0265e4…026778 Dummy {f00=0x000c, f01=0x40d6, f02=» 2 F IDENT T:CLMI T,3.2,78-09-15,870137140320 3 T:CLMIK 3 : T:CLMIK 3 L , ( "0P ' Q W ' 3 ` ! Y : 3 P Q W 3 ( 3 @ 3 2 T:WRDY 2 X
0x026778…02690c Dummy {f00=0x000c, f01=0x0190, f02=» 2 F IDENT T:ATTF T,3.2,78-09-15,870137140320 4 J F " T:ATTFK T:ROK T:RNOK T:RCR T:RCTS T:RTES T:GRFC@ T:WRDY T:CLDYC 4 : T:ATTFK 4 I:EVA6 4 T:ROK 4 T:RCR 4 I:RT1 4 , ( Y Y V E
0x02690c…026aa0 Dummy {f00=0x000c, f01=0x4092, f02=» : C 4 v T:EDIOA 5 T:CLDYC H 5 ( , ( = C : C : 5 < , 5 l X 5 |@ 5 4 I:EVA6 4 T:ROK 4 T:RCR 4 I:RT1 4 , ( Y Y V E
0x026aa0…026c34 (0, 49) Dummy {f00=0x000c, f01=0x4156, f02=» 2 F IDENT T:DC00 T,3.2,78-09-15,870137140320 6 & " WRITELK DCREAD DCWRTE DCEXCH 6 : T:FDS0 6 d DCREAD 6 v T:DCR1 6 DCWRTE 6 T:DCW1 6 DCEXCH 6 T:DCE1L 6 , ( I$
0x026c34…026dc8 Dummy {f00=0x000c, f01=0x416c, f02=» 2 F IDENT T:DMI0 T,3.2,78-09-15,870137140320 7 " IREAD IRNEXT IRWRIT IINSY 7 : IREAD 7 ` T:FDS0C 7 r T:IRE1 7 IRNEXT 7 T:IRN1 7 IRWRIT 7 T:IRW1@ 7 , ( I$
0x026dc8…026f5c Dummy {f00=0x000c, f01=0x409e, f02=» 2 F IDENT T:ASS0 T,3.2,78-09-15,870137140320 8 ASSIGNK 8 : ASSIGNK 8 L T:ASSI 8 ` @ 8 r 8 @ 8 T 7 T:IRN1 7 IRWRIT 7 T:IRW1@ 7 , ( I$
0x026f5c…0270f0 Dummy {f00=0x000c, f01=0x409e, f02=» 2 F IDENT T:IAS0 T,3.2,78-09-15,870137140320 9 IASSGNK 9 : IASSGNK 9 L T:IASS 9 ` @ 9 r 9 @ 9 T 7 T:IRN1 7 IRWRIT 7 T:IRW1@ 7 , ( I$
0x0270f0…027284 Dummy {f00=0x000c, f01=0x40ec, f02=» 2 F IDENT T:DMR0 T,3.2,78-09-15,870137140320 : RREAD RWRITE : : T:FDS0 : R RREAD : d T:RRE1 : v RWRITE : T:RWR1 : $ I : : @ : NTRY * 2 P*
0x027284…027418 Dummy {f00=0x000c, f01=0x409e, f02=» 2 F IDENT T:SWI0 T,3.2,78-09-15,870137140320 ; SWITCHK ; : T:SWIT ; L SWITCHK ; ^ @ ; r ; @ ; T:RWR1 : $ I : : @ : TINE ENTRY * 2 P*
0x027418…0275ac Dummy {f00=0x000c, f01=0x40ce, f02=» 2 F IDENT T:TEI0 T,3.2,78-09-15,870137140320 < TESTIOK ABORT < : T:TEST < R TESTIOK < d T:ABOR < x ABORT < H < < @ < : : @ : P* BIT VALUES P*
0x0275ac…027740 Dummy {f00=0x000c, f01=0x40d2, f02=» 2 F IDENT T:CLO0 T,3.2,78-09-15,870137140320 = SETTIMK GETTIM = : T:SETT = T SETTIMK = f T:GETT = z GETTIM = H = = @ = . P*****************************************
0x027740…0278d4 (0, 50) Dummy {f00=0x000c, f01=0x409a, f02=» 2 F IDENT T:DEL0 T,3.2,78-09-15,870137140320 > DELAY > : T:DELA > J DELAY > @ > n > @ > H = = @ = . P*****************************************
0x0278d4…027a68 Dummy {f00=0x000c, f01=0x409e, f02=» 2 F IDENT T:GTI0 T,3.2,78-09-15,870137140320 ? GETTIDK ? : T:GETI ? L GETTIDK ? ^ @ ? r ? @ ? H = = @ = . P*****************************************
0x027a68…027bfc Dummy {f00=0x000c, f01=0x0190, f02=» 2 F IDENT T:DC T,3.2,78-09-15,870137140320 @ 6 2 T:DCREK T:DCR1 T:DCWR T:DCW1 T:DCEX T:DCE1 @ : T:DCREK @ t T:FDSP @ T:DCR1 @ I:EVA0L @ , ( H #0T C @ T:DCWR @ T
0x027bfc…027d90 Dummy {f00=0x000c, f01=0x413a, f02=» 9 #0T / C @ T:IO4 A 0 , ( S H "!@P #0T A @ , ( m C #0 T P &R A p , ( &P C #0 T & C : A W A 4 0 X T x W0 ' d A d IT^
0x027d90…027f24 Dummy {f00=0x000c, f01=0x0190, f02=» 2 F IDENT T:DMI T,3.2,78-09-15,870137140320 B F B T:IREAK T:IRE1 T:IRNE T:IRN1 T:IRWR T:IRW1 T:IINSL T:INS1 B : T:IREAK B T:FDSPA B T:IRE1 B I:ERR B T:IO2 B , ( @ / "!@P B
0x027f24…0280b8 Dummy {f00=0x000c, f01=0x0190, f02=» T:STCW B , ( 7 / "!@P C T:IO1 C @ T:IINSL V C P T:INS1 Z C d I:EVA0 C x , ( Q #0 T C , ( i / "!@P C , ( @ #0 T &R &
0x0280b8…02824c Dummy {f00=0x000c, f01=0x4032, f02=» T: R: T T W C p D @ D .P C T:IO1 C @ T:IINSL V C P T:INS1 Z C d I:EVA0 C x , ( Q #0 T C , ( i / "!@P C , ( @ #0 T &R &
0x02824c…0283e0 Dummy {f00=0x000c, f01=0x0190, f02=» 2 F IDENT T:ASSI T,3.2,78-09-15,870137140320 E T:ASSIK E : , ( AB E L T:ASSIK . E | T:FDSP E , ( ! ( " A E I:EVA0 E , ( ? 2 #0 T ,
0x0283e0…028574 (0, 51) Dummy {f00=0x000d, f01=0x40d4, f02=»P V I @ , % ( E , ( @ & # T : Y _ F $ I:ERR F T $ ( F d 4 0 QT ]Tx i sUb wQ^ TR P T F F @ F
0x028574…028708 Dummy {f00=0x000d, f01=0x0190, f02=» 2 F IDENT T:IASS T,3.2,78-09-15,870137140320 G T:IASSK G : , ( AB G L T:IASSK $ G | T:FDSP G I:EVA0 G , ( ! ( " A #0 G , ( = T " #0T
0x028708…02889c Dummy {f00=0x000d, f01=0x40c6, f02=» " % ( & # G I:ERR H $ , ( T : Y _ ( H 4 H d 4 0 ?T KTz W _Tf k sTR P T H x H @ H " A #0 G , ( = T " #0T
0x02889c…028a30 Dummy {f00=0x000d, f01=0x0190, f02=» 2 F IDENT T:ASG0 T,3.2,78-09-15,870137140320 I ASSGN I : , ( AB I J ASSGN . I z T:FDSPA I , ( ! ( " A I I:EVA0 I , ( @ ? #0T 2
0x028a30…028bc4 Dummy {f00=0x000d, f01=0x40ca, f02=» @ , % ( I , ( & # T : Y _ J I:ERR J P ( J ` 4 0 GT S ]Ur aQn mTb u TL P T J | J @ J I:EVA0 I , ( @ ? #0T 2
0x028bc4…028d58 Dummy {f00=0x000d, f01=0x0190, f02=» 2 F IDENT T:DMR T,3.2,78-09-15,870137140320 K & " T:RREAK T:RRE1 T:RWRI T:RWR1 K : T:RREAK K d T:FDSP K x T:RRE1 K I:EVA0 K , ( A #0 T &R K T:STCW K I:ERR K T:I
0x028d58…028eec Dummy {f00=0x000d, f01=0x40a0, f02=» K j T:IO1 L , ( S #0T C : L m W L J X TX RX A X _T oW L f v L @ L I:EVA0 K , ( A #0 T &R K T:STCW K I:ERR K T:I
0x028eec…029080 Dummy {f00=0x000d, f01=0x40a0, f02=» 2 F IDENT T:SWI T,3.2,78-09-15,870137140320 M T:SWITK M : T:SWITK M L I:RT1 M ` ( M p M @ M I:EVA0 K , ( A #0 T &R K T:STCW K I:ERR K T:I
0x029080…029214 (0, 52) Dummy {f00=0x000d, f01=0x4114, f02=» 2 F IDENT T:TEI T,3.2,78-09-15,870137140320 N T:TESTK T:ABOR N : T:TESTK N T T:FDSP N h I:RT1 N z T:ABOR N * & @ "R V I N ( _ N R N *
0x029214…0293a8 Dummy {f00=0x000d, f01=0x415c, f02=» 2 F IDENT T:CLO T,3.2,78-09-15,870137140320 O T:SETTK T:GETT O : T:SETTK O T I:EVA0 O h I:RT1 O z T:GETT O , ( @H ( O ( _ O # R #0T : O I:E
0x0293a8…02953c Dummy {f00=0x000d, f01=0x40e8, f02=» 2 F IDENT T:DEL T,3.2,78-09-15,870137140320 P T:DELAK P : T:DELAK P L I:EVA0 P ` I:ERR P r I:RT1 P , ( @ #0 P ( P P P P @ P # R #0T : O I:E
0x02953c…0296d0 Dummy {f00=0x000d, f01=0x4118, f02=» 2 F IDENT T:MSK0 T,3.2,78-09-15,870137140320 Q MASKY Q : MASKY Q J I:EVA0 Q , ( @ #0 T #0 T V Q n I:RT1 Q Q I:ERR Q # Q T T Q
0x0296d0…029864 Dummy {f00=0x000d, f01=0x0190, f02=» 2 F IDENT T:SCD T,3.2,78-09-15,870137140320 R T:ACTVK T:PAUS T:RSTR R : T:ACTVK R T:BAT R p I:ERR4 R , ( 2 P ( R I:NTPA R T:RSTR " R I:EVA0 R , ( @
0x029864…0299f8 Dummy {f00=0x000d, f01=0x4010, f02=» B R @ S CD T,3.2,78-09-15,870137140320 R T:ACTVK T:PAUS T:RSTR R : T:ACTVK R T:BAT R p I:ERR4 R , ( 2 P ( R I:NTPA R T:RSTR " R I:EVA0 R , ( @
0x0299f8…029b8c Dummy {f00=0x000d, f01=0x0190, f02=» 2 F IDENT T:USE T,3.2,78-09-15,870137140320 T T:USE T : T:USE T J T:CAT T I:EVA0 T l * & 2 & P X P 2 ' T ~ , ( & X R 8 R P X 8 T , ( ; P X _ Q ?! V X T
0x029b8c…029d20 Dummy {f00=0x000d, f01=0x401e, f02=» T p z U @ U -09-15,870137140320 T T:USE T : T:USE T J T:CAT T I:EVA0 T l * & 2 & P X P 2 ' T ~ , ( & X R 8 R P X 8 T , ( ; P X _ Q ?! V X T
0x029d20…029eb4 (0, 53) Dummy {f00=0x000d, f01=0x408a, f02=» 2 F IDENT T:EXIT T,3.2,78-09-15,870137140320 V T:EXITK V : T:EXITK V L ( V ` V t@ V & P X P 2 ' T ~ , ( & X R 8 R P X 8 T , ( ; P X _ Q ?! V X T
0x029eb4…02a048 Dummy {f00=0x000d, f01=0x40e0, f02=» 2 F IDENT T:GTCW T,3.2,78-09-15,870137140320 W GETCW W : T:FDSP W J GETCW W I:EVA0 W n T:GTCW W I:RT1 W $ I W W @ W ; P X _ Q ?! V X T
0x02a048…02a1dc Dummy {f00=0x000d, f01=0x411c, f02=» 2 F IDENT T:GTID T,3.2,78-09-15,870137140320 X T:GETIK X : T:GETIK X L I:EVA0 X ` , ( @ #0T R W T V G 9h X r I:RT1 X I:ERR X ' W X T R W T 'W X
0x02a1dc…02a370 Dummy {f00=0x000d, f01=0x018e, f02=» 2 F IDENT T:IO T,3.2,78-09-15,870137140320 Y H D ! T:WRITK T:READ T:KIY T:NKI T:KIA T:NKIAA T:EDWR T:DSC0` T:DSC1 Y : H D ! T:EDWEN T:EDWF T:EDWIA T:EDIOA T:XSTA T:WAIT` T:IO1 T:IO2 T:IO3 Y B > T:IO4 T:FDS0 T:FDSP T:SVE T:REST T:STCW T:GDSP
0x02a370…02a504 Dummy {f00=0x000d, f01=0x0190, f02=» , ( ! ' ( ( $ Z T:WRITK X Z 4 , ( A P C C Z H T:READ h Z x I:EVA0 Z I:ER13 Z , ( a @ / W / "!@ Z T:DSC0` Z T:DSC1 Z , (
0x02a504…02a698 Dummy {f00=0x000d, f01=0x0190, f02=» @ C J C W Z , ( 781"&$ 39#$;< [ , T:XSTA [ , ( J C W /.!" B [ p T:WAIT` [ I:ER19 [ * & 'W ( W C C C " [ T:IO1 $ [
0x02a698…02a82c Dummy {f00=0x000d, f01=0x0190, f02=» P [ l , ( s B 5 P B % P C + , ( B P ! T B B B U B < I:RT1 l T:EDWR | , ( U ( 5 _ "( I:EDW T:EDWEN T:EDWF , (
0x02a82c…02a9c0 Dummy {f00=0x000d, f01=0x0190, f02=» V I C B :( , ( + ' P I : % ] . I:EVA3W ] ^ I:ERR5 ] p , ( K Y C & ] , ( gB C " ] T:SVE ] T:BPCB ] * &
0x02a9c0…02ab54 (0, 54) Dummy {f00=0x000d, f01=0x0190, f02=» V 6P $ - ] x , ( _ ( : B T ^ T:FDS0 ^ H T:FDSP ^ , ( T T V : 2 ' W ^ p T:GDSP ^ I:FML ^ , ( @ 2' 6 2 #? V H ^ I:ER1A ^ , (
0x02ab54…02ace8 Dummy {f00=0x000d, f01=0x0190, f02=» C : #0 ^ z , ( @T & C C : C C _ , ( V W V Q _ J , ( 0W Q W Q W _ z , ( 4 ! P T 0 _ , ( P W 8 C S W C C _ ,
0x02ace8…02ae7c Dummy {f00=0x000d, f01=0x0190, f02=» P _ j T:GTCW ` , ( ( z= #0 T ` , ( B 'W B B " ` N , ( P P ` ~ , ( L R R _ R ` , ( _ # Q R V > _V ' `
0x02ae7c…02b010 Dummy {f00=0x000d, f01=0x0190, f02=» ` n a H D !o{ W : , W : - 2 C GP W > [ _ h c L gW k o L a " H D !lo W W6 P W P WT h L a n H D ! W* W #W =P A KP QP& eW kP qPV }P P a H D !
0x02b010…02b1a4 Dummy {f00=0x000d, f01=0x406c, f02=»W 5P a R D @ ST T W | PP n R R Q -P 7P MP ]R b b V@ b h D !lo W W6 P W P WT h L a n H D ! W* W #W =P A KP QP& eW kP qPV }P P a H D !
0x02b1a4…02b338 Dummy {f00=0x000d, f01=0x0190, f02=» 2 F IDENT I:NTP T,3.2,78-09-15,870137140320 c 4 0 I:TRC I:NTP I:NTPA I:NTPR I:RT0 I:RT1 I:RT2 c : I:MOV c r I:ADD c I:SUB c I:CMP c I:MUL c * & T c I:DIV c * &
0x02b338…02b4cc Dummy {f00=0x000d, f01=0x0190, f02=» I:EDS c , ( / d A d > I:INIT d I:TRC P d n I:NTPA R d T:ATAB d , ( O @ , V P d I:NTP x d I:PRT d & " k V 7
0x02b4cc…02b660 Dummy {f00=0x000d, f01=0x0190, f02=»2 d , ( 9c D $ & Q e I:RT2 e : I:TRA e L I:RT1 e , ( W :aW @ PYPP ( e n I:TRB e I:RT0 e I:TRA0 e I:ERR e * & A @ P] * @ P]f ,_l
0x02b660…02b7f4 (0, 55) Dummy {f00=0x000e, f01=0x0190, f02=» R T P _l 8^: D e T:PAT f , ( O . ! P D 2P 6 7_* 2 f 0 T:CAT f ` , ( m # P L 4P $ 2" f p , ( &]P R W ^^ $! 6P Q f $ T P D 0P _z f , ( _j _ _
0x02b7f4…02b988 Dummy {f00=0x000e, f01=0x4110, f02=» D h ! h # | % | ' ) + | - | f H D ! = ? A C E G I K M cP w V VP Q W W, g F H D ! P P W P !P )P 9R =T AP WPn ]Ph sPR yPL P Q T g P P W W g g
0x02b988…02bb1c Dummy {f00=0x000e, f01=0x0190, f02=» 2 F IDENT I:EVA T,3.2,78-09-15,870137140320 h H D ! I:EVA0K I:EVA1 I:EVA2 I:EVA3 I:EVA5 I:EVA6 I:EVB I:EVI I:FML h : I:EVA2 h T:LIT h I:EVA1 h I:EVA3 h T:KPI h I:EVA6 h I:EVA5 h
0x02bb1c…02bcb0 Dummy {f00=0x000e, f01=0x0190, f02=» 9 W 6 2 " T v h , ( Y @ : " # i , I:ERR9 i , ( y @ ;b , (V i n , ( ; [ [ @ Z H (;A i I:ERRA i , ( R H & z ;AV Z H
0x02bcb0…02be44 Dummy {f00=0x000e, f01=0x018e, f02=» : i p , ( - Z ,P T 4W j , ( K P " 2@P j @ , ( k : [ [ @ & @ j p , ( @P Z [ 6 j , ( [ Z 7 Z 7 j I:FML
0x02be44…02bfd8 Dummy {f00=0x000e, f01=0x40a8, f02=» j f & " ;b ; : k H D ! L P: W W P( !P % ( 7 ?W> OT w V V: # 3P IW k 2 MP iP k ~ k @ k P Z [ 6 j , ( [ Z 7 Z 7 j I:FML
0x02bfd8…02c16c Dummy {f00=0x000e, f01=0x0190, f02=» 2 F IDENT I:ADS T,3.2,78-09-15,870137140320 l I:ADD I:SUB l : I:ADD l P I:SUB l b I:ERR2A l t I:ERR1 l * & @ W # l , ( " T & T + : * l I:CPA l , (
0x02c16c…02c300 Dummy {f00=0x000e, f01=0x414c, f02=» 4 V W Q l ~ , ( P $ P " P T R m , ( P R ` = <( ;_| V m N , ( P ^ `_ " P :" m ~ , ( # P * U P 1`! T 9e! m ! = K : m 8 4 W !T I
0x02c300…02c494 (0, 56) Dummy {f00=0x000e, f01=0x418a, f02=» 2 F IDENT I:CMP T,3.2,78-09-15,870137140320 n I:CMP n : I:CMP n J I:ERR1 n , ( #0 P " T * & n n , ( : * & !`P :J +_ +Q n I:CPA n , ( ? _0 , V W n
0x02c494…02c628 Dummy {f00=0x000e, f01=0x4166, f02=» 2 F IDENT I:CPA T,3.2,78-09-15,870137140320 o I:CPA o : I:CPA o J * & R W o , ( ( V W Q P W ! W V o , ( ? P , V W Q P W $ W V o * & _ P T V
0x02c628…02c7bc Dummy {f00=0x000e, f01=0x0190, f02=» 2 F IDENT I:MOV T,3.2,78-09-15,870137140320 p I:MOV I:MVC p : I:MOV p P I:MVC p b , ( $0#0;b P P P P p t , ( ! 0 - P V W Z _ p , ( A 4 V W Q P ) P 9_ &" p , (
0x02c7bc…02c950 Dummy {f00=0x000e, f01=0x018e, f02=» , ( V 4! P < S S q , ( S X 4 9d * & ! R + q 4 , ( : V W R 4 0R q d , ( ! Y 7 Y& P Z,;D 9_8 q , ( A 8 _< V W YL T 9 q I:ERR8 q , (
0x02c950…02cae4 Dummy {f00=0x000e, f01=0x4122, f02=» q f , ( V Q W Q 7 Y P _6 & Q r , ( 9d! )0 + P 7 Y Z $ r 8 _ : r h H D ! f P P PN P +P: MQ OP WP oP sQ { S S S r < 8 R R R 1P wP T P SZ P Q Q P. P r
0x02cae4…02cc78 Dummy {f00=0x000e, f01=0x0190, f02=» 2 F IDENT I:MUL T,3.2,78-09-15,870137140320 s I:MUL I:SH1L s : I:MUL s R I:ERR2 s d I:ERR1L s v , ( V ) 0 !0 s , ( " T *V &V : V s , ( = S W P 9 S W _
0x02cc78…02ce0c Dummy {f00=0x000e, f01=0x018e, f02=» [ [ $ [ [ s I:MOV I:NTFA t * , ( >h ; t B I:SUB t r , ( ( Z P [ 9a Z t I:ADD t , ( $" T 9d! P [ [ P t , ( V
0x02ce0c…02cfa0 Dummy {f00=0x000e, f01=0x4082, f02=» t f $ i P 9 59D_ ! :d" 5 : u 8 4 TV 9V GP WV cW PF P % ` 1R 9P KT iP u 0 u l@ u ~ ( Z P [ 9a Z t I:ADD t , ( $" T 9d! P [ [ P t , ( V
0x02cfa0…02d134 (0, 57) Dummy {f00=0x000e, f01=0x0190, f02=» 2 F IDENT I:DIV T,3.2,78-09-15,870137140320 v I:DIV I:SH1R v : I:DIV v R I:ERR2 v d I:ERR1 v v , ( 0 !0 " T v , ( *V &V P = v , ( ; ;@ R P
0x02d134…02d2c8 Dummy {f00=0x000e, f01=0x0190, f02=» 6 [ v , ( [ [ [ $ [ [ w * I:MOV I:NTFAL w Z I:SUB w r , ( w , ( P z " ! P ! R 2` w , ( + z " P ! R 2` { 1 ! {
0x02d2c8…02d45c Dummy {f00=0x000e, f01=0x0190, f02=» [ Q [ w x I:ADD x , ( gP { R [ _ x ( , ( Z ! Z $ x X * & P Z %_N [ Q x * & R [ Z { x , ( z 9e! W Z
0x02d45c…02d5f0 Dummy {f00=0x000e, f01=0x406a, f02=» UW aP iR qR yV T W P P ;Q x t Y aQ@ uR Q* R W y 0 y T@ y f Z ! Z $ x X * & P Z %_N [ Q x * & R [ Z { x , ( z 9e! W Z
0x02d5f0…02d784 Dummy {f00=0x000e, f01=0x40ce, f02=» 2 F IDENT I:NTF T,3.2,78-09-15,870137140320 z I:NTFAK z : I:NTFAK z L , ( Z H D & H z ` $ ! D % [ ( z 8 z @ z Z { x , ( z 9e! W Z
0x02d784…02d918 Dummy {f00=0x000e, f01=0x0190, f02=» 2 F IDENT I:EDT T,3.2,78-09-15,870137140320 { F B I:EDT I:EDW I:ED1 I:EDSK I:EVT I:EFLI I:ETABL I:EXIT I:ETXT { : F B I:ECPY I:ECTR I:ESL I:ENL I:EOR I:ECW I:ECWC` I:EFIL I:EPICN { , ( !! gg++ { , ( ! L
0x02d918…02daac Dummy {f00=0x000e, f01=0x0190, f02=» { I:EVI | I:EVA3 | I:EVA0 | * * & AUT | < I:EVNO! | j I:ESKI | | I:EBRI | I:EBRBR | I:EBR | , ( Q | I:EINH | I
0x02daac…02dc40 Dummy {f00=0x000e, f01=0x0190, f02=» : | l I:ED1 } I:EDW } I:EVA6 } 0 , ( @ R B } B , ( P 2 " T W } r , ( "@T '?W "? H " K :e } I:EFLI } , ( J J " J _T Z
0x02dc40…02ddd4 (0, 58) Dummy {f00=0x000e, f01=0x0190, f02=» } n I:ETXT d ~ I:ECPY d ~ " I:ECTR z ~ 6 , ( ] : P 4 ! T _ K ~ J I:ESL ~ z I:ENL ~ , ( } W K W +_ ~ I:EOR ~ T:EDWF- ~ I:ECW ~ , (
0x02ddd4…02df68 Dummy {f00=0x000e, f01=0x0190, f02=»V : J ~ n I:ERRD T & 1 I:EPICN @ + T [ [ r < , ( !AAP !TTT W !**T * [ R % !FFP !EET W 5 I 6
0x02df68…02e0fc Dummy {f00=0x000e, f01=0x0190, f02=» *X& n , ( W :P # U J & 1 T ! , ( 00 ;_ _ 9P F " X<# ; > W )0_@ n , ( J R Z R 4! P ;)0 I:ERREO , ( ( Z ] 49d_* , ( # _>U ; :
0x02e0fc…02e290 Dummy {f00=0x000e, f01=0x417c, f02=»Z z^. PT*AXYZ9 H D ! U d W Y d [ . e g F i k m s u W4 P T H D ! W T W AQ oPd wT^ WR WD W. W V T j H D ! ` P T W T #R )P /T 3W 7 g mP qWt uW@ w yWl H D ! }
0x02e290…02e424 Dummy {f00=0x000e, f01=0x018e, f02=» 2 F IDENT I:EDTE T,3.2,78-09-15,870137140320 D @ I:EKIHK I:EINH I:EVIN I:EBRI I:EBRB I:EBR I:ESKI I:EVNOC : I:EGTD I:EGTB I:EKIHK I:EINH I:ETAB I:EVIN , ( @ : ! P
0x02e424…02e5b8 Dummy {f00=0x000e, f01=0x4188, f02=» * & ; W : ! )P9H " I:EBR r 2 , ( W # T &W &" :I : D I:EBRB v t I:ESKI I:EVNOC I:ER11 I:EGTD I:EGTB , ( u : P & _ &X _ :
0x02e5b8…02e74c Dummy {f00=0x000e, f01=0x40de, f02=» 2 F IDENT I:EDS T,3.2,78-09-15,870137140320 I:EDS : I:EDS J I:EVS2 I:ED1 n , ( ~ : { : & @ B , ( u : P & _ &X _ :
0x02e74c…02e8e0 Dummy {f00=0x000e, f01=0x0190, f02=» 2 F IDENT I:STR T,3.2,78-09-15,870137140320 $ I:INS I:DLT I:MCH I:CPY I:XCP : I:DLT b I:EVS1 t , ( @ $0T P 9 I:MCH " * & _ $0T [ , ( ; $0T
0x02e8e0…02ea74 (0, 59) Dummy {f00=0x000f, f01=0x0190, f02=» h , ( R W R # P W ) V E I:EVS2 8 , ( $0T W W J I:ERR z I:CPY I:XCP , ( W [ , ( : Z !0 , !0P 0 > 4
0x02ea74…02ec08 Dummy {f00=0x000f, f01=0x408a, f02=» !@ T F Pb )T ?T UR$ ]P cT mTd oW TH R W R P W $ T Wp W W P2 R !W L N t@ I:CPY I:XCP , ( W [ , ( : Z !0 , !0P 0 > 4
0x02ec08…02ed9c Dummy {f00=0x000f, f01=0x0190, f02=» 2 F IDENT I:EVS T,3.2,78-09-15,870137140320 I:EVS1K I:EVS2 : I:EVA0 T , ( @ #03 T jP f , ( kT T : & 9! " : $ , ( = : T W V 9! , ( ] R W Q
0x02ed9c…02ef30 Dummy {f00=0x000f, f01=0x4076, f02=» I:ERR _^ W , ( T )T GT KW eQ< qQ0 }Q$ T W 0 `@ r #03 T jP f , ( kT T : & 9! " : $ , ( = : T W V 9! , ( ] R W Q
0x02ef30…02f0c4 Dummy {f00=0x000f, f01=0x0190, f02=» 2 F IDENT I:TRA T,3.2,78-09-15,870137140320 2 . I:NTR I:PRT I:TRA0 I:TRA I:TRB I:BUF I:ECB : I:ECB p I:BUF , ( *1 TID ADDR OP CR LVL MODIFI , ( - ED OPERAND CREDIT 2.1 TRAC
0x02f0c4…02f258 Dummy {f00=0x000f, f01=0x018e, f02=» , ( D A A ( p A ) P:BAS 4 I:HEX D * & Y V A V T I:HEXB I:TRA0 I:TRA , ( " v A : W I:EVA0 , ( @
0x02f258…02f3ec Dummy {f00=0x000f, f01=0x40fc, f02=» , ( R C A W V D ! )0 1 I:NTPRN 8 I:PRT ~ J , ( c 6 V 9 A " B@ ( ( ~ : 0 , @ p R T Wr =Q KW* y ~ @ @
0x02f3ec…02f580 Dummy {f00=0x000f, f01=0x0190, f02=» 2 F IDENT I:ERR T,3.2,78-09-15,870137140320 D @ I:ERR I:ERR0 I:ERR1 I:ERR2 I:ERR3 I:ERR4 I:ERR5 I:ERR6C : F B I:ERR7 I:ERR8 I:ERR9 I:ERRA I:ERRB I:ERRC I:ERRDC I:ERRE F B I:ERRF I:ER10 I:ER11 I:ER12 I:ER13R I:ER14 I:ER15K I
0x02f580…02f714 (0, 60) Dummy {f00=0x000f, f01=0x0190, f02=» I:ERR4 I:ERR5 I:ERR6C ( I:ERR7 < , ( W W W W W W W W P I:ERR8 I:ERR9 $ I:ERRA ( I:ERRB , I:ERRC 0 I:ERRDC 4 I:ERRE 8
0x02f714…02f8a8 Dummy {f00=0x000f, f01=0x0190, f02=»:ER13R L I:ER14 P I:ER15K T $ I:ER16 X 8 I:ER17 L , ( A W W W W W W W W ` I:ER18 ` I:ER19 d I:ER1A h a W W W I:ERR l I:NTR
0x02f8a8…02fa3c Dummy {f00=0x000f, f01=0x0190, f02=»:ECB * & @ R 4 4 A I:PRT : , ( " U 4 - _ J TC:ERR z I:NTPR , ( @ ILLEGA , ( L OPERATION MIXED ARITHMETIC , ( IL
0x02fa3c…02fbd0 Dummy {f00=0x000f, f01=0x0190, f02=» o HM OVERFLOW STACK OVERFLOW IN , ( DEX OVERFLOW ILL INDEX TYPE DI . , ( V BY ZERO EDIT BUFFER OVFL ED ^ , ( IT PICTURE OVERFLOW ALLOCATION , ( ERR AT INITIALIZATION ILLEGAL , ( INSTRUCTION ADDRES
0x02fbd0…02fd64 Dummy {f00=0x000f, f01=0x0190, f02=»ROL CODE ILLEGAL INDE ~ , ( X VALUE FORMAT CONDITIONS CHAN , ( GED ILLEGAL PARAMETER LENGTH N , ( ERROR DATASET BUSY ILLEGAL DA ~ TASET REFERENCE H D ! Wh Wd W` W WX WT WP WL #WH 'WD +W@ /W< 3W8
0x02fd64…02fef8 Dummy {f00=0x000f, f01=0x406e, f02=» " h 0 , # 9 S k $ X@ j LENGTH N , ( ERROR DATASET BUSY ILLEGAL DA ~ TASET REFERENCE H D ! Wh Wd W` W WX WT WP WL #WH 'WD +W@ /W< 3W8
0x02fef8…03008c Dummy {f00=0x000f, f01=0x40fc, f02=» 2 F IDENT I:HEX T,3.2,78-09-15,870137140320 I:HEXBK I:HEXW I:HEX : I:HEXBK Z I:HEXW n I:HEX , ( W 9 " R 0 1 Y ! : W " @ +W@ /W< 3W8
0x03008c…030220 Dummy {f00=0x000f, f01=0x4114, f02=» 2 F IDENT I:CHK T,3.2,78-09-15,870137140320 I:CHK : I:CHK J P:BAS P:END l TC:CHK | * & @ ;a <a R <a V I:ERR : R V $
0x030220…0303b4 (0, 61) Dummy {f00=0x000f, f01=0x0190, f02=» 2 F IDENT TRACHK T,3.2,78-09-15,870137140320 . * TC:CHKK TC:ABT TC:ERR TC:RDC TC:RMP : I:TRC l TC:RMP | TC:CHKK TT:HLT * & @ P ( _ @ TT:TON TT:TRP , (
0x0303b4…030548 Dummy {f00=0x000f, f01=0x0190, f02=»VER , ( Q W " @ P $ TT:VMM < TT:RON N , ( k B $P , D D E @ ` TT:REP TT:RMDR , ( P $ T D P T D , ( A a W : @ P A H A
0x030548…0306dc Dummy {f00=0x000f, f01=0x418c, f02=» TB:ABTL , ( ( A _ TB( TC:RDC @ TB:RDC T TC:ERR f TT:MSG z , ( H : TB( : A " A " E A , ( TB( ( ) A : H
0x0306dc…030870 Dummy {f00=0x000f, f01=0x018e, f02=» 2 F IDENT TRATAB T,3.2,78-09-15,870137140320 F B TT:TONK TT:TRP TT:LOP TT:VON TT:VER TT:VMM TT:RONL TT:REP : . * TT:RMD TT:HLT TT:PRC TT:TID TT:MSG TT:TONK TT:TRP , (
0x030870…030a04 Dummy {f00=0x000f, f01=0x0190, f02=» f , ( a TT:VMM @ 8 L TT:RONL h TT:REP | , ( , ( TT:LOP T
0x030a04…030b98 Dummy {f00=0x000f, f01=0x4020, f02=» ~ ^ @ TT:VMM @ 8 L TT:RONL h TT:REP | , ( , ( TT:LOP T
0x030b98…030d2c Dummy {f00=0x000f, f01=0x0190, f02=» 2 F IDENT TRABUG T,3.2,78-09-15,870137140320 TB:ENTK TB:ABT TB:RDC : P:BAS n , ( ~ TB:ABT TB:ENTK , ( ( ( (
0x030d2c…030ec0 Dummy {f00=0x000f, f01=0x0190, f02=» 9a : x TT:TID TT:MSG * , ( g @ P @ < TB:RDC l , ( A A "V # ( , ( D A P UW T A , ( P @ = W
0x030ec0…031054 (0, 62) Dummy {f00=0x000f, f01=0x0190, f02=» p , ( U ? A 2 A 4 A 6 A 8 A B , ( UT _ A : A < A > A @ A H A D A F @ , ( ( P A D A F , + - p , ( ; : ( X " , , ( P A F A D_@ X ,T , (
0x031054…0311e8 Dummy {f00=0x000f, f01=0x0190, f02=» B ? A 8_ A B " @ DT " @ F , ( E( _ @ HP A < A : " @ < 0 , ( T @ W @ < A W ` , ( W 0 W _2 , ( B P @ <& _8 , (
0x0311e8…03137c Dummy {f00=0x000f, f01=0x0190, f02=» A , ( _ ;a ]@ 1 _D 0 , ( J P 3P P , ( C @ :P @ < 1 "T @ W , ( @ @ < A 0 J P , ( R @ :P @ < 1
0x03137c…031510 Dummy {f00=0x000f, f01=0x0190, f02=»" 1 p , ( J ] P @ < @ > @ @ @ BT @ , ( @ { R *9l! P &9d! ) @ , ( W P &9d & _ p , ( & A , ( A @ Z " ! , ( @
0x031510…0316a4 Dummy {f00=0x000f, f01=0x0190, f02=» Y T @ :P @ <! 5 = TT:TRP 0 , ( Q( y P @ < W B TT:TON r , ( @ B A T @ W @ , ( < A " A A @ ( , ( A " @
0x0316a4…031838 Dummy {f00=0x000f, f01=0x0190, f02=» h TT:REP , ( R # @ < @ 2P @ 4P V TT:RMD J TT:RON , ( A@ R % ) @ B I I A n TC:RMP , ( [ W P R )W a , ( w A P @ < @ 2P @
0x031838…0319cc Dummy {f00=0x000f, f01=0x0190, f02=» TT:VON , ( $ I I A W * & @R I W P R )W F , ( A EQ GR t , ( LO NE NG NL R @ , ( ; < @ 4 @ 2P P , ( H
0x0319cc…031b60 Dummy {f00=0x000f, f01=0x0190, f02=» , ( T W #T P P , ( (T P ,T P )T 4 , ( T @ R ?aP * d , ( :l" T & W T C B B , ( 1 B B B " A A A , ( Q A A A
0x031b60…031cf4 (0, 63) Dummy {f00=0x0010, f01=0x0190, f02=» $ * , ( C " $ , ( _& A < V T T:ATAB , ( " A & & P , ( / W C " :T , ( O
0x031cf4…031e88 Dummy {f00=0x0010, f01=0x0190, f02=» A 0R 9Q 0 A :B , ( _" A " & , ( A 0R 9U AR FQ V , ( 0:D A _* 'T :H_ , ( / A " A A 4 , ( O T A A " ,
0x031e88…03201c Dummy {f00=0x0010, f01=0x0190, f02=» W W ? v , ( W / a A T " @ T , ( A ( @ F , ( A " ( A( v , ( / ( Y A " A @ , ( O P A ( A , (
0x03201c…0321b0 Dummy {f00=0x0010, f01=0x0190, f02=» O U ] a g q d d H D !t wP { d V P W P J d : H D ! p ` | l H D ! ' . + d } P d L D H D !
0x0321b0…032344 Dummy {f00=0x0010, f01=0x0190, f02=» P0 P H D ! G | : T W T W / 3 = H D ! A E I : M Q [ d _ b o y P P P T X H D !s W P P T T@ !P / = H D ! A IT OP aPp sT
0x032344…0324d8 Dummy {f00=0x0010, f01=0x0190, f02=» P p W T W d P . p !PJ +P0 1PN 7 d ;V H D ! A d ER: [W _P c d gR kW s Px P^ Px P6 d D H D !R& R^ d V d RD W, d R& W P d R W 3 d 7RD H D !4` EP OP, U d s d wR T W T
0x0324d8…03266c Dummy {f00=0x0010, f01=0x0190, f02=» R P2 WV PR R P WF PB t H D ! D )P 3W MT Q W ] q u } Q P P 0 H D !s WH R Q 8 R$ U R Q 8 | H D ! q %T ) 5 8 A ` E b K O ST W b [ ` i r yR U WN
0x03266c…032800 Dummy {f00=0x0010, f01=0x405e, f02=» = @ E l I p M Q ` ( $ SP W ] e i w H@ Z Q P P 0 H D !s WH R Q 8 R$ U R Q 8 | H D ! q %T ) 5 8 A ` E b K O ST W b [ ` i r yR U WN
0x032800…032994 (0, 64) Dummy {f00=0x0010, f01=0x0190, f02=» 2 F IDENT TRACON T,3.2,78-09-15,870137140320 I:INITK T:BPCB : T:BPCB T T:ATAB h , ( @ ( R z I:NTPA , ( * V *( Y , ( = _2( @ @
0x032994…032b28 Dummy {f00=0x0010, f01=0x0190, f02=» W W W @W | , ( A. @ P (@ >A K : , ( ( L 00 | , ( R ( -_ : d , ( 5 8# R _ ZY QY : A @ , ( ( U A A Z
0x032b28…032cbc Dummy {f00=0x0010, f01=0x0190, f02=»_. ` (9A @ A , ( B A @ ( B $ , ( V P Z 0>BX T , ( B $ =_ @ ( A , ( 1 A - @ , ( @ Q A A @ 8 X
0x032cbc…032e50 Dummy {f00=0x0010, f01=0x0190, f02=»P v A t , ( N ;B A R @ A , ( @ N P .P v D , ( " A A 4:AV @ U t , ( / T U T P P _ H , ( O U W A J YB @ .P , (
0x032e50…032fe4 Dummy {f00=0x0010, f01=0x018e, f02=» , ( A 4 5 B , ( C @ <A_H D $ 4 , ( " U A A R W A d , ( A / h @ (P , ( O @ P ,P A U:BTAB , (
0x032fe4…033178 Dummy {f00=0x0010, f01=0x0190, f02=» f , ( P * H I , ( ZXP _ P 8 I:INITK & h , ( " _ @ K _ | , ( - @ T A P " P A , ( M W 1 A 9h M P
0x033178…03330c Dummy {f00=0x0010, f01=0x0190, f02=»T l , ( 1 I T _,9 , ( T @ T A.(@ : < , ( [ ( ! T _ !AAT A W l , ( - !UUT @ P , @ T A , ( M @ P , W A a , ( m
0x03330c…0334a0 Dummy {f00=0x0010, f01=0x0190, f02=» W A a ( !,,P - , ( _ a Z , , ( : ( !;;P W , ( - ( !,,T 0 - : , ( M A.A I. C.9b! X 9 :A H , ( 0 m r r W
0x0334a0…033634 (0, 65) Dummy {f00=0x0010, f01=0x0190, f02=»SST $ )T : ) | , ( P P _ @ H ;H H ! T , ( ; T : T ` : L , ( - _d R | , ( @ M P @ _& : , ( m P T A I W :
0x033634…0337c8 Dummy {f00=0x0010, f01=0x0190, f02=»w E l , ( M % : D A R , ( W M A I X A < , ( - M % : =E t w l , ( M E M T 1 E _ M @ m : H D ! R. E S uV {S
0x0337c8…03395c Dummy {f00=0x0010, f01=0x0190, f02=» CP SW gP PB Q6 V U R EPP I & UP x H D !@ YP< g & T T P PL P P AP IP OW eP qR u wW P 4 H D ! D . WN D p T T 4 T l T l H D ! T %T +W 1Tz 7P ET [P aW e {P P WZ P
0x03395c…033af0 Dummy {f00=0x0010, f01=0x409e, f02=» T ]P o qP u 4 wT d H D ! } N W p 4 O R W R ) N C p M UT l ' @ p T T 4 T l T l H D ! T %T +W 1Tz 7P ET [P aW e {P P WZ P
0x033af0…033c84 Dummy {f00=0x0010, f01=0x0190, f02=» J F IDENT MONCON REL 8.2 78-09-15 870105040820 MONCONK BLOK:S BLOCKE R BLOK:S t BLOCKE MONCONK CVTMSZ CVTAPA` , ( UU ( ) ( ) A C
0x033c84…033e18 Dummy {f00=0x0010, f01=0x0190, f02=»S , ( [H , ( u : , ( A I I T W j , ( A I. 9h! X ! # , ( A. 0P P , ( _
0x033e18…033fac Dummy {f00=0x0010, f01=0x0190, f02=» P K P K ~ RECHANW , ( M P K P K P 0 , ( k K x P K x P K x P K ` , ( x K @ K =a S J , ( <P U % , ( "
0x033fac…034140 Dummy {f00=0x0010, f01=0x0190, f02=» T ENP T ] , ( I P T 4 ENP W : k ! E , ( i P P T T k K 4 S P , ( XF U k Z k K _^ DCEXT DM:TSK SCLASSA , ( H P W W @
0x034140…0342d4 (0, 66) Dummy {f00=0x0010, f01=0x0190, f02=» , ( , &P 9h TP P , ( @ : ;a G Z F 8 , ( = : : = W h , ( ] P R DCP IOP IIT R , ( { W _z T R , ( T
0x0342d4…034468 Dummy {f00=0x0010, f01=0x0190, f02=» DWREMU , ( P P P = COFILE J TCFILE , ( ] W " P = n , ( 1 _ * S * V lP * CDTAB , ( Q $ V lT K K
0x034468…0345fc Dummy {f00=0x0010, f01=0x018e, f02=» <P n , ( R 4 J ( -T , ( P W bP ( _ > , ( 5 J P - K 5 N n , ( / V N N , ( O N O O O O O O O TTMJOBO
0x0345fc…034790 Dummy {f00=0x0010, f01=0x0190, f02=» , ( 3 ( ` ( 9C x A BLOCKS 4 FREQUEW F , ( * J A , A . K A X INIM40W , ( R 1_ 1 bBUG , ( 0 2 2A K " G. , (
0x034790…034924 Dummy {f00=0x0010, f01=0x0190, f02=» h , ( w , ) P P _z " : , ( P 0R Q ; _ 0 ! 8 , ( ,,P @ !LLP !RRP < C "_ h , ( @ 4 @ U 5_ " F ;g , ( W W > !LLT U , ( U
0x034924…034ab8 Dummy {f00=0x0010, f01=0x0190, f02=»9L9A9l W 8 P KB , ( T V P 1 < C " ( , ( / !LLP ,;H / X , ( ,W ^ 9H / / N , ( CGP KBT , M M N " , ( P @ W " W "
0x034ab8…034c4c Dummy {f00=0x0010, f01=0x0190, f02=»RT6 CWTRT4R * & m 4 6 CWTRT2N L CWTLT4 ^ CWTLT3 p CWTLT2` CWTLT1 CWTRT7 CWTRT5 CWTRT3 , ( 8 : < > @ B D F
0x034c4c…034de0 Dummy {f00=0x0010, f01=0x0190, f02=»P$ N H D ! IP SP ]P iP$ sP }P P P U N P P T H D ! T + 5T ;Pn ?T IP` OT WPR [ iP mP qT0 yT( U P6 V H D ! l z $ P P P O L S D ]P$ kP qP wTP WH ` H D ! T8 T 8 T
0x034de0…034f74 (0, 67) Dummy {f00=0x0011, f01=0x40e0, f02=» ET WT aP sP P P P R Q P P P U * H D ! & T U: U0 U& %W /U 7U AU ]V cP kT o qP P T B 8 4 P P W P T& P /R @ WH ` H D ! T8 T 8 T
0x034f74…035108 Dummy {f00=0x0011, f01=0x018e, f02=» J F IDENT INTVMA REL 8.2 78-09-15 870105040820 D @ CVTMSZK CVTSTB CVTSBA CVTEBA CVTINP CVTDK CVTAPA CVTAPSC R < 8 CVTCLK LOOPY INIM40N CVTLSB FREPAR PARLEN@ NUMPAR NUMPAR IHPFARC IHLKM
0x035108…03529c Dummy {f00=0x0011, f01=0x0190, f02=» CHLT1 IHFDN CHRT1 $ , ( 4 CHRT2 d CHRT3 t CHRT4 IHCC1 IHCC2 IHCC3 , ( ! CHLT2 C
0x03529c…035430 Dummy {f00=0x0011, f01=0x0190, f02=» ( * IHDU2 $ IHMTN 4 , ( Q , . 0 D , ( a t IHINPT , ( q 2 CVTMSZK CVTSTB
0x035430…0355c4 Dummy {f00=0x0011, f01=0x0190, f02=» CVTDK FREPAR PARLEN@ 0 INIMON D , ( W W 4 V bBUG HALTN * & W 6 , ( @ 8A K " UU , (
0x0355c4…035758 Dummy {f00=0x0011, f01=0x4110, f02=» , ( ? @ : $ T $ T < PRUNN 8 TTB:ST H PFINIT Z , ( 5" Z A > 5 T @? ? B l LOOPY _ ( @ ( $ W W W +T E
0x035758…0358ec Dummy {f00=0x0011, f01=0x413a, f02=» J F IDENT INIMOD REL 8.2 78-09-15 870105040820 INIMONKdBUG DCEXT DM:TSK R INIMONK v tBUG DCEXT DM:TSK TTABD0A TTABD1A TTABD2 T
0x0358ec…035a80 Dummy {f00=0x0011, f01=0x2008, f02=» L = KMD16 DATE = 781208 PACK NBR = 001 f 0
0x035a80…035c14 (0, 68) Dummy {f00=0x0011, f01=0x0190, f02=» 2 F IDENT TRACHK T,3.2,78-09-15,870137140320 . * TC:CHKK TC:ABT TC:ERR TC:RDC TC:RMP : I:TRC l TC:RMP | TC:CHKK TT:HLT * & @ P ( _ @ TT:TON TT:TRP , (
0x035c14…035da8 Dummy {f00=0x0011, f01=0x0190, f02=»VER , ( Q W " @ P $ TT:VMM < TT:RON N , ( k B $P , D D E @ ` TT:REP TT:RMDR , ( P $ T D P T D , ( A a W : @ P A H A
0x035da8…035f3c Dummy {f00=0x0011, f01=0x418c, f02=» TB:ABTL , ( ( A _ TB( TC:RDC @ TB:RDC T TC:ERR f TT:MSG z , ( H : TB( : A " A " E A , ( TB( ( ) A : H
0x035f3c…0360d0 Dummy {f00=0x0011, f01=0x018e, f02=» 2 F IDENT TRATAB T,3.2,78-09-15,870137140320 F B TT:TONK TT:TRP TT:LOP TT:VON TT:VER TT:VMM TT:RONL TT:REP : . * TT:RMD TT:HLT TT:PRC TT:TID TT:MSG TT:TONK TT:TRP , (
0x0360d0…036264 Dummy {f00=0x0011, f01=0x0190, f02=» f , ( a TT:VMM @ 8 L TT:RONL h TT:REP | , ( , ( TT:LOP T
0x036264…0363f8 Dummy {f00=0x0011, f01=0x4020, f02=» ~ ^ @ TT:VMM @ 8 L TT:RONL h TT:REP | , ( , ( TT:LOP T
0x0363f8…03658c Dummy {f00=0x0011, f01=0x0190, f02=» 2 F IDENT TRABUG T,3.2,78-09-15,870137140320 TB:ENTK TB:ABT TB:RDC : P:BAS n , ( ~ TB:ABT TB:ENTK , ( ( ( (
0x03658c…036720 Dummy {f00=0x0011, f01=0x0190, f02=» 9a : x TT:TID TT:MSG * , ( g @ P @ < TB:RDC l , ( A A "V # ( , ( D A P UW T A , ( P @ = W
0x036720…0368b4 (0, 69) Dummy {f00=0x0011, f01=0x0190, f02=» p , ( U ? A 2 A 4 A 6 A 8 A B , ( UT _ A : A < A > A @ A H A D A F @ , ( ( P A D A F , + - p , ( ; : ( X " , , ( P A F A D_@ X ,T , (
0x0368b4…036a48 Dummy {f00=0x0011, f01=0x0190, f02=» B ? A 8_ A B " @ DT " @ F , ( E( _ @ HP A < A : " @ < 0 , ( T @ W @ < A W ` , ( W 0 W _2 , ( B P @ <& _8 , (
0x036a48…036bdc Dummy {f00=0x0011, f01=0x0190, f02=» A , ( _ ;a ]@ 1 _D 0 , ( J P 3P P , ( C @ :P @ < 1 "T @ W , ( @ @ < A 0 J P , ( R @ :P @ < 1
0x036bdc…036d70 Dummy {f00=0x0011, f01=0x0190, f02=»" 1 p , ( J ] P @ < @ > @ @ @ BT @ , ( @ { R *9l! P &9d! ) @ , ( W P &9d & _ p , ( & A , ( A @ Z " ! , ( @
0x036d70…036f04 Dummy {f00=0x0011, f01=0x0190, f02=» Y T @ :P @ <! 5 = TT:TRP 0 , ( Q( y P @ < W B TT:TON r , ( @ B A T @ W @ , ( < A " A A @ ( , ( A " @
0x036f04…037098 Dummy {f00=0x0011, f01=0x0190, f02=» h TT:REP , ( R # @ < @ 2P @ 4P V TT:RMD J TT:RON , ( A@ R % ) @ B I I A n TC:RMP , ( [ W P R )W a , ( w A P @ < @ 2P @
0x037098…03722c Dummy {f00=0x0011, f01=0x0190, f02=» TT:VON , ( $ I I A W * & @R I W P R )W F , ( A EQ GR t , ( LO NE NG NL R @ , ( ; < @ 4 @ 2P P , ( H
0x03722c…0373c0 Dummy {f00=0x0011, f01=0x0190, f02=» , ( T W #T P P , ( (T P ,T P )T 4 , ( T @ R ?aP * d , ( :l" T & W T C B B , ( 1 B B B " A A A , ( Q A A A
0x0373c0…037554 (0, 70) Dummy {f00=0x0011, f01=0x0190, f02=» LABEL = FIXED2 DATE = 78 10 16 PACK NBR = FX2 f 4 &: 4: V - P Y _( Y M : ] =IR E
[…0x7…]
0x038060…0381f4 (0, 71) Dummy {f00=0x0012, f01=0x0190, f02=» LABEL = FIXED2 DATE = 78 10 16 PACK NBR = FX2 f 4 &: 4: V - P Y _( Y M : ] =IR E
[…0x7…]
0x038d00…038e94 (0, 72) Dummy {f00=0x0012, f01=0x0190, f02=» LABEL = KMD16 DATE = 781208 PACK NBR = 001 f
[…0xf…]
0x03a640…03a7d4 (0, 74) Opaque[0x194]
0x03a7d4…03a968 # DirEnt {nam=»TRA «, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0258, f03=0x2020}
0x03a7d4…03a968 IdxSect {
0x03a7d4…03a968 f00 = 0x0012 // 0x3a7d4 @0x0
0x03a7d4…03a968 f01 = 0x0014 // 0x3a7d6 @0x2
0x03a7d4…03a968 gno = [ // 0x3a7d8 @0x4
0x03a7d4…03a968 [0x00]: C0x0012.0x3.0
0x03a7d4…03a968 [0x01]: C0x0013.0x0.0
0x03a7d4…03a968 [0x02]: C0x0013.0x1.0
0x03a7d4…03a968 [0x03]: C0x0013.0x2.0
0x03a7d4…03a968 [0x04]: C0x0013.0x3.0
0x03a7d4…03a968 [0x05]: C0x0014.0x0.0
0x03a7d4…03a968 [0x06]: C0x0014.0x1.0
0x03a7d4…03a968 [0x07]: C0x0014.0x2.0
0x03a7d4…03a968 [0x08]: C0x0014.0x3.0
0x03a7d4…03a968 [0x09]: C0x0015.0x0.0
0x03a7d4…03a968 ]
0x03a7d4…03a968 }
0x03a968…03aafc Dummy {f00=0x0012, f01=0x0190, f02=» Jk c~ B Ab b 9o Ab ` < @c Ac @c Ac @` Ac @` Ac >h Ac @` Ac c _ < ACp > A @b H z @b A A j @ P A Ab > A : Ab ACp C > @ P Ab A W _ J @ Ab Ab ATz A8 A/ A
0x03aafc…03ac90 Dummy {f00=0x0012, f01=0x0190, f02=» A' Ac P @ . @b <aX6 @b R @ <Q E H<_N?b U @b U Ab Ab @b$ Ab" @b Ab _v @ @%dP 0* @c R #t @b U P 1 @Bh * F F AZ ( R AZ ( 09 ( .. ( F F ( F R R F F R '' p F F ^ '' ^ F p
0x03ac90…03ae24 Dummy {f00=0x0012, f01=0x0190, f02=» : 9 P V Ac W* Ac U V @b T b 1 z J @ V4 R 9 U V z P Ab P @ V> @4 P pW ^ 9 IQb z T P @ IV2 ~ +R IP W + 9
0x03ae24…03afb8 Dummy {f00=0x0012, f01=0x0190, f02=» A : b' < : Q : D @ P R W W2 T @c R : @b Pz V V @b RH V X Px Yb ] TT @c T Ac c @ TL @%dP 0* : X Yb X c : YX Yb r : Ab V : c
0x03afb8…03b14c Dummy {f00=0x0012, f01=0x0190, f02=» @b = V 1 A @ T @b P 1 : b0 P : T 1j : _& @T:A000T:D000 *0 : CZUU AZ AZ 09 AZ AZ 09 .. ( AZ 09 .. )
0x03b14c…03b2e0 Dummy {f00=0x0012, f01=0x0190, f02=» A H A N9h A G A M b : & A9x 9x 9~ < 8 b b b b b A n A Z A : 8 @ n @b0 !DD b8 9 >HV V W U V 2 @b0 !CCP( !UUP @ n=d% < A 6 @b M ab @b Q Ab Ab R(
0x03b2e0…03b474 (0, 75) Dummy {f00=0x0013, f01=0x0190, f02=»b b A n : b8 9 >HV V ++W2 A f h 9 >HZ U V 2 V V ++ 9d! ab A b A d b < 0 ' R v A ` h b < b ` < b D: 0 @ f 6 G P _ G @ h 2 @b J A lW A j @c
0x03b474…03b608 Dummy {f00=0x0013, f01=0x0190, f02=» ' G b Ac A r A p @ n:H Cr <& 0 : D: P & X v ' G G P 0 ' : W W W W W W V : ( 09 (, )4 09 8)4 W W W ! @b ? W $ W " A4 A
0x03b608…03b79c Dummy {f00=0x0013, f01=0x0190, f02=» @b P 4 9 ! T >T_ 4 4V P A @b A Ab RR @ T U> @ >T $ P @ < _$ 4 4V X b @ Ab X@ V _H P @ ! Q V W V @b @b Q U @ Ab h n p ( @ P b| 1
0x03b79c…03b930 Dummy {f00=0x0013, f01=0x0190, f02=» @4 =L 9 Ab A p @ :H Cr <& : V _ W V _ ; Q R P =oT >BV U V W V : 4TRUE 4T @FALSE @F 8 @c l @c Rj b' n r ( 1 TD b8 =P$ 9J P =T . V W @b @c U
0x03b930…03bac4 Dummy {f00=0x0013, f01=0x0190, f02=»b' 2 R $@P ZT W @ Z9fT Z @ b' 1 @ Z:H Cr <& A Z A A ` A b A p A r A t A v b8 x 9J 9 PX $ >T& Ab Ab Ab Ab b < b < b G : W W W V _ W V _^ @ p <F Y A ]_x @ r ( ;
0x03bac4…03bc58 Dummy {f00=0x0013, f01=0x0190, f02=» @ (Pf @ (T @b Ab M A ( b8 9 >HR0 U V < b b G : V : V : b8 9 ; T = V V =A ab : V : l @ Rj n r ( TD =P$ INDS= OUTDS= @ T
0x03bc58…03bdec Dummy {f00=0x0013, f01=0x0190, f02=» @ &TR 2 RD$@P@ " A _d @ (T( 2 R $@P " A _ W W V _ 4 N (< r < '>< # f 4 ) c Q : 3 : b8 c c @b Ac Ac T 1 P S @c Ac Ac &
0x03bdec…03bf80 Dummy {f00=0x0013, f01=0x0190, f02=» 1 $@P WH $0T 9 V _ &<BV Ab T W &R <CV &<CV >T_ & T V @b Q @c Ab @%dT W RR @%dP T %f A%` Ac : =4 , ( , ) ) , , & , :FMTITEM 9 : V @c : V $ N
0x03bf80…03c114 (0, 76) Dummy {f00=0x0013, f01=0x0190, f02=» W V :JV Ac @b S Q $0P6 " T0 $ P P 9 <H^ S U S V $0T 9 V @P @b U @c T 9 2 V@ @c . $ . 2 R $@P T $ P $ P W @b T W @b P @%dP <CR< <HRl # P @
0x03c114…03c2a8 Dummy {f00=0x0013, f01=0x0190, f02=»T KW F R T2 R @b $ S W W V <H^( _0 @b P @c @c Ab @c P R A4 P T A4 4V P( @%dV R W @4 $ P 3 A:j : @b T @%d P( @b S @c Ab @%dQ P$ Ab P @b $ S L Ab @' T
0x03c2a8…03c43c Dummy {f00=0x0013, f01=0x0190, f02=» @:j M . M Ac @, P - @%` %fP T %f A%` A' L @b S <HR @b U <h @c S Ac T: b0 < 2 @b Q V 1 W T2 X S b8 0 =r @%dP " Tb P
0x03c43c…03c5d0 Dummy {f00=0x0013, f01=0x0190, f02=» p Pd T W V Rb WJ @^ @c % @%` W8< V 6 ! P T. @c 9hT" c W T < V Ab Ab S W V <H^ _* NW, NE, NEA, ! % P ! < !..T, 9J P .! _ ! _ )@_$ V 9 _4 9 @c P
0x03c5d0…03c764 Dummy {f00=0x0013, f01=0x0190, f02=» / H ! P A 0 0 M , , 2 @b Q V 1 W T2 X S @ 2<c S W V 2_4 @b U &! 9 @c @b @c ,$ T, L R - W - R Q @c @c Z. W Q L P M W F @c <" T< R
0x03c764…03c8f8 Dummy {f00=0x0013, f01=0x0190, f02=» 2 R @%dP Ac $@T $ P _D $ T^ T $ TP @b T WH $ P @b P< @' T @%dT( T FW& @%` %fP T %f A%` A' Ab F @b $ S $ P^ A $ P $0Pn $ Pd 9 <HRZ @c R" 2 R $pT> S . @ T 2 R $ P _$ @%d <E
0x03c8f8…03ca8c Dummy {f00=0x0013, f01=0x0190, f02=» P 9 ; P> A < E P4 ( @Cn Q V <D, ACp E Y : V : W @b ! Q Ab b8 < ! P @b Q Ab @b Q V : @b ! Y Ab b8 " ! T V : _ < c < bP c < : @ <" LIST L <
0x03ca8c…03cc20 Dummy {f00=0x0013, f01=0x0190, f02=»b @ J Ab Ab > V Ab : @b Q @b Q LF N N @ V 0 A 8 Ab n Cr < : LINES= vLITADR= b8 : 9J 9 Pv $ >T& : @b Ql Q^ <F TV RPX TF % P $4 Ab 6 Ac V Ac V Ac _V Q ; T R ZQ Ab _t
0x03cc20…03cdb4 (0, 77) Dummy {f00=0x0013, f01=0x0190, f02=» U V 2 V @b Q( 1 W. @b U($qP W W W V W V : @c R4P4 3 T( A b8 < =r @ T ( ) @ : V _ P ( ) W V _, $$! AZ!( ,! ! ! AZ!( 09!( ..!(@(!J ,! ! ! ,,!P )!> !
0x03cdb4…03cf48 Dummy {f00=0x0013, f01=0x0190, f02=» 2 VV 2 VL $ $ ac T @ $@P 9 <HR&;D+ @c c c 1 Ac >T& X : W V $0 ! 9 _$ V _& W W W ! )@ A"F @c P V W b8 ! 9 Ac c <HRx U V 2 Rd (! T "F @b PBW @"F# PJ ( @"F ) @b
0x03cf48…03d0dc Dummy {f00=0x0013, f01=0x0190, f02=» Ac b b @b < A1 b b P _ : 1 _@#~ O #| J Ac =r P P @< 9 < V Ac N @c R& 2 R $ $@P0 T` @b PZWr 2 V $ T 2 R @T8 $ @b P&$ T $ T2 $ T, F T2 RW T K @b
0x03d0dc…03d270 Dummy {f00=0x0013, f01=0x0190, f02=»< =r P P W V @b A9x A9x 9~ Ab b >T> Z> @b $h b b| 2 @TzR8 ATz @b Q @Tz )W0 # >U V > < # T~W W V : ! A <HRx U Rd (! T "F @ PBW @"F# PJ ( @"F ) @
0x03d270…03d404 Dummy {f00=0x0013, f01=0x0190, f02=»Q( b' b| < b| 2 @Tz ) : b' 2 @Tz UJ Ac %f A%` 0 : V _ V W 1 8 8z 2 A%b ARP A%d @TzZH ATz @b Q 8z_ 8z 2 @Tz UJ Ac %f A%` : O :FMTITEM 9 A%d A' b8 '
0x03d404…03d598 Dummy {f00=0x0013, f01=0x0190, f02=»R"$ $@XB $ T4 T @b P W( 2 R $ P @b S W W V _"*.APPL= * DUPL= +:NUM +JALPHA +bMINL= + MAXL= + REWRT + ME + NEOI , NCLR , CTAB ,8VERIF ,PSCHK=
0x03d598…03d72c Dummy {f00=0x0013, f01=0x0190, f02=»( T ( W& ( W V W ( 9J 9 P $ >T& W V _ @( Tn @( P Q @( A( W @( A( @( P& @( I( R @( I( R @( I( @( I( @( I( @( I( ( W$ ( @( P Q @( W W @( W W A( @( S @( P _ A(
0x03d72c…03d8c0 Dummy {f00=0x0013, f01=0x0190, f02=»( A( 9 2 Rx$ Tt ( 0T &0 )P 9 )Z ( & )Z 9 <HZ X& 2 R8$ P4 ( @( ! XF& XD 9 <HZN 2 R P ( _j W V _v @( )Z A( )P @( )Z A( @ A( )P @( )Z A( < =r T @V ( )P V )P @( )Z A
0x03d8c0…03da54 (0, 78) Dummy {f00=0x0013, f01=0x0190, f02=» A( @ A( )P @( )Z A( A( )P @( )Z A( A( )P @( )Z A( < =r ^ ( )P D K A , W , A, W , A, A%d Ac b8 < !==T 9 .: @, P S .: 9 A%d b8 ,| A, .6
0x03da54…03dbe8 Dummy {f00=0x0013, f01=0x0190, f02=», A, W , A, W , A, Wx , A, Wl , A, W` , A, WT , A, WH , A, W< , A, W0 , A, W$ , A, W , A, W , A, W A%d 9 S b8 , f @ P $ P b' 1 : @c Un 3 A.@ @TzRR ATz @b Q( b'
0x03dbe8…03dd7c Dummy {f00=0x0013, f01=0x0190, f02=»V WD A.@ @b P: 2 Rz $ P $ P V " @b ! P ** UJ @.B @.D >T ! r @b P ( UJ : @b " P @.@ A.@ .@ b| 1 : @c P 2 R $@P $ P $ P W W W V _ @b & <H @b ! P UJ_ 9 A%d A/ @b U 0
0x03dd7c…03df10 Dummy {f00=0x0013, f01=0x0190, f02=» 3 W b' 6 ! P V : 0 : b8 6 ! P V :END PDIV DDUM IDENT FRMT FMEND PEND ***GENERATED STATEMENT*** @b 9 V^ 0 ?C Cr # < R P Q W _ < Ab Cr E 0 < V E H< : @b ! V & P :
0x03df10…03e0a4 Dummy {f00=0x0013, f01=0x0190, f02=» 3p 4 2 R 1 W 1 3 @1 3p 4 2 Y P 1 _P b 9x 9~ < # P _ :n < @1 3T % = b A:X : : @1 Q" J T :n A:X_. :n *)@ + A:X_D 3, 3T 3p 4P Q P
0x03e0a4…03e238 Dummy {f00=0x0013, f01=0x0190, f02=» $ : 0 4T Y ::a Y : @c U4 b' 2 @b Q 9AR W 9CV V W : >U V > @%dP , @TzR ATz @b P T~ : V _ # C42 X42 W42 D42 '4B , 4 , @'4B 4 @'4J 4B , 4J : 9 A4 b P
0x03e238…03e3cc Dummy {f00=0x0013, f01=0x0190, f02=» 9x A9x 9~ < T2 @b P A4 >T_B 9 V W A:d A:b 4 T Q 4 P V b 4 T 4 T 8 @4 ! T A4 P @4 R P @4 P 7 P P P V @4 ! T P U
0x03e3cc…03e560 Dummy {f00=0x0013, f01=0x0190, f02=» < 8 P: 6 !+ P !- P P Q W % # T W @4 3 T <D P _ A9x A9x 9~ 9 _ P" 6 !0 R !9 Q % _D _L @4 T 4 W @4 A9x 9~ Q W. 6 !- P !+ T ; P P @4 Y =h 9 W
0x03e560…03e6f4 (0, 79) Dummy {f00=0x0014, f01=0x0190, f02=» @4 @4 ! T" 4 *>H J V >d _ K >h + P4 :d 9 V V 9 V V 9 V V 9 V V 4 b < A: : &0T 4J 9 P V A:b A:d : : P @?DR ?P @ : @b %V& @8 8 <& A8 8 8z < : : @8 8 <& A
0x03e6f4…03e888 Dummy {f00=0x0014, f01=0x0190, f02=» : T Y P _ : A9z A9| @9x9a @b :a R @b :a V @9z @9| : Ab V E H<( 9 d 9 9 <& : R _ >D : @9 T : . $ P R P R,P. P _ >hX> : Z ] _$
0x03e888…03ea1c Dummy {f00=0x0014, f01=0x0190, f02=» $ : :XW :r D D D D D D $ : [ [ [ [ ; Z [ Z [ : [ [ : ; Z ; Z Z Z Z Z Z Z Z : d ' 8 ;
0x03ea1c…03ebb0 Dummy {f00=0x0014, f01=0x0190, f02=» = : <D Q2 T W. 6 !0 R" !: R !A R !F Q $ =D _2 <D : T : _ T : ' _ b 9x 9~ b b T : _ XX= CC=H ''=P , @+< -< 09< < '= < 09= AF= '=4 < , ! A+<
0x03ebb0…03ed44 Dummy {f00=0x0014, f01=0x0190, f02=» R $ P W2 P, ; QrW" <F TbW T V !''T V @< $@T A< $0T A< _x < 9hP @( P" < : V W W W &0T 9 < : : @b Pn $ T < ! T` @b <aP @b Q E H< Jd U * Ab'X6 @c U V @b U
0x03ed44…03eed8 Dummy {f00=0x0014, f01=0x0190, f02=» : <D Q2 T W. 6 !0 R" !: R !A R !F Q $ =D _2 <D : T : _ T : ' _ 9x 9~ T : ? ? ? ? P @H P < -< 09< < ' < 09= AF= ' < , ! A+<
0x03eed8…03f06c Dummy {f00=0x0014, f01=0x0190, f02=» @ @ @ A TbW T V !''T V @< $@T A< $0T A< _x < 9hP @( P" < : W W W &0T 9 < : : @ Pn $ Ad Ap A| A| A * A X6 @ U @ U
0x03f06c…03f200 Dummy {f00=0x0014, f01=0x0190, f02=» : <D Q2 T W. 6 !0 R" !: R !A R !F Q $ =D _2 <D B~ B B B B 9x 9~ T : P P < -< 09< < ' R& R W T R =
0x03f200…03f394 (0, 80) Dummy {f00=0x0014, f01=0x0190, f02=» @Cq % - ACq< Rf @Cn @b V < < R0< V* n Cr A < n 2 CD ACn n Cr < : @Cn =a% @b R ZH 2 CD ACn_ 1 CD< R W - n A < n + CD ACl @Cl ` 9 @Cp?d'
0x03f394…03f528 Dummy {f00=0x0014, f01=0x0190, f02=» CD ACn C ; @b =aPb @VXT @b PJ @b PD< V @c Cr <&< V @b" C 9 @b U - AC < V T b' C < C n Cr < ;r : @b P @A^ P T : Cr R Q0 :H <& W Q @%dT # P # T X = = W8 E @%dT R _V 2_Z @c E Ac @b @%dP
0x03f528…03f6bc Dummy {f00=0x0014, f01=0x0190, f02=»N MULTIDEFINED UNDEFINED UNEXPECTED VALUE UNDEFINED TYPE UNEXPECTED TYPE ILLEGAL CONSTANT LIT POOL OVERFLOW LABEL MISSING ILLEGAL VALUE DEF ILLEGAL CONST LENGTHILLEGAL CONST TYPE TOO MANY BLOCKS TOO MANY DATA ITEMS
0x03f6bc…03f850 Dummy {f00=0x0014, f01=0x0190, f02=»UES OUT OF RANGE UNSPECIFIED PARAM PARAMETER LIST OVFL @b >aPJ @VXPB Cr ** ' F DVD& P _ < DVD& * ' E _H AVX : - # Cr < . ( @Cn Q , ACq C b Cr < @b C <& @VZ C 9 C - # Cr < C @VZPD 2
0x03f850…03f9e4 Dummy {f00=0x0014, f01=0x0190, f02=»T ADR KEY PRO d b b I D b b I : ACp P Cr < R Cr P :H <& R P IJ! P:W IZ! P0 P P 9 R _ Cr < W * 9AV MW 9AV U QCr nZ E _ P E : P b Q ? W ?
0x03f9e4…03fb78 Dummy {f00=0x0014, f01=0x0190, f02=» <E, # ! T = V AL :R L : @ F @L T @b - K K J =A?A P TZ : R T, ' Ab : R:W( T - W / =A>A?A ' Ab Ab R :AR K K AL :=A?A>A^ AL K K L : @ + K K K L" & @ @
0x03fb78…03fd0c Dummy {f00=0x0014, f01=0x0190, f02=» b J @b @b ALD AR( R* b P J _ J Ab @LDP b " K _ K @b ALD LD " K P K _ K @b K @ P @R( ab b J AR( R* P J
0x03fd0c…03fea0 Dummy {f00=0x0014, f01=0x0190, f02=» K _ K @b K b b b b b b A A ( : @b ! P b b P @b @b @b ] AR( b ANf J R* Ab P 2 K _ K @b Ab K @ jP A jW b P AR( b ANf_j @b Ab :U:BTABT:ATABV: U: T:A000
0x03fea0…040034 (0, 81) Dummy {f00=0x0014, f01=0x0190, f02=» MN _ 0 MN MN b < N b < Ab Ab Ab Ab Ab Ab b < N b < Ab Ab Ab Ab Ab b < N b < Ab Ab Ab Ab _ 2 AN 9h AN N b < Ab Ab O N J N J b b P J _ J N
0x040034…0401c8 Dummy {f00=0x0014, f01=0x0190, f02=» K b b P. K " K @N _4 K @b K N J AR( N R* b b P J _ J Ab K K P K _ K @b K @b Ab : : @b P, Ab @b U Q Q
0x0401c8…04035c Dummy {f00=0x0014, f01=0x0190, f02=»R( J J : Ac AA^ @%dTV @b Ac c c P* R E R S Y" E W E H< @c Ab A < : @RP Ac % c P 2 E ARP Y E W E H< A < @%b ARP : P @%dTN Ac Ac <C @b Q : R S8 R @c @c A9x
0x04035c…0404f0 Dummy {f00=0x0014, f01=0x0190, f02=» A%` A%b @S P( A%` A%b * Q U T Ac : @ @L T @b K T Ab ' AL FR P K L : : @c W : @b P * UJ : : : @b @c UJ : : <b$ $ P * @Tz W @b @c L AT|=N=b UJ @T| :
0x0404f0…040684 Dummy {f00=0x0014, f01=0x0190, f02=»%n UJ Ac A' : : : @ B U : : K K K :H K ?a + P4 %d R @' ; R @, P A, %jW b < : @ > :I/O ERROR FILE = STATUS = ":H U <& " U <& 2 Bv < & U Bv < (
0x040684…040818 Dummy {f00=0x0014, f01=0x0190, f02=» 0dEJECT JSPACE VLIST NLIST *DDIV DDUM OPTNS PEND 0BCON # FTABLE .FINCLUDE KTAB $jFRMT % FMEL , FMELI , FTEXT , FCTL '"FCOPY - FLINK -*FCW -6FILLR , FTAB -HFHIGH -`FLOW -lFUL -xFNUL
0x040818…0409ac Dummy {f00=0x0014, f01=0x0190, f02=». FNL - FKI ( FINP ( FEOR -TFMEND / ENTRY EXT ,EQU PROC !XPFRMT "HPKTAB "TPLIT "ZPEND #(TERM TWB UWB CWB DWB DSET START *STACK FMTCTL *BLK DBLK BIN BCD &BO
0x0409ac…040b40 Dummy {f00=0x0014, f01=0x0190, f02=» ] MOVE ] CMP ] SET A] CLEAR @] TEST C] XCOPY j^ COPY b] EDIT `^ EDSUB l^ INV B] SB P^ LB 8^ CB ^ TB H^(LIB 2^.IB 6_ B P_ BZ P_"BP Q_"BN R_"BOFL S_"BNZ T_"BNP U_"BNN V_"BE P_"BG Q
0x040b40…040cd4 (0, 82) Dummy {f00=0x0014, f01=0x0190, f02=»TBT I^*TBF H^*CBE ^"CBG "^"CBL $^"CBNE (^"CBNG *^"CBNL ,^"CALL 0^8PERF 1^^PERFI 3^dRET 4^@INSERT d^BINSRT d^BMATCH h^LDELETE f^XDLETE f^XEXIT 0^nPAUSE 0^rKI 0^ NKI 0^ KIA 0^ NKIA 0^ RSTRT 0^~USE 0^ READ 0^ WRIT
0x040cd4…040e68 Dummy {f00=0x0014, f01=0x0190, f02=» 0^ DCWRITE0^ DCEXCH 0^ SWITCH 0^nTESTIO 0^ ABORT 0^ DELAY 0_ SETTIME0_ GETTIME0_ GETID 0^~TFWD 0_,TBWD 0_,THOME 0_,TLEFT 0_,TRIGHT 0_,TLDOWN 0_,TDOWN 0_,TUP 0_,DUPL 0_zGETABX 0_0SETCUR 0_,GETCTL 0_4TSTCTL 0_:GETFLD 0_>DISPLAY0_FERASE 0_FPRINT 0_N
0x040e68…040ffc Dummy {f00=0x0014, f01=0x0190, f02=» O O F ' W 0 @ 5 U O U @ 5 Z Z Z Z Z Z Z$ Z* Z0 OZ6 Z< Z ZB ZH Z Z Z Z Z Z
0x040ffc…041190 Dummy {f00=0x0014, f01=0x0190, f02=» O Z Z Z ` `8`T`p` ` a a|a * CREDIT TRANSLATOR REL 1.1 761007 * * IDENT AAAAAA * DATE XXXXXX * PAGE 0000 * DATA DIVISION PROCEDURE DIVISION PROCEDURE LABELS DATA ITEM NAME
0x041190…041324 Dummy {f00=0x0014, f01=0x0190, f02=»OMMENT C ID h IX LINE LABEL OPCODE OPERANDS COMMENT C ID lNAME REF TYPE NAME REF TYPE NAME REF TYPE NAME REF TYPE IX TYPE
0x041324…0414b8 Dummy {f00=0x0014, f01=0x0190, f02=» O Z Z Z k@kLkXkdkpk|k k k k k k k k k k k k k k k k k k (STACKTOP * IDENT AAAAAA * DATE XXXXXX * PAGE 0000 * DATA DIVISION PMIDDLERE DIVISION PROCEDURE LABELS DATA ITEM NAME
0x0414b8…04164c Dummy {f00=0x0014, f01=0x0190, f02=»OMMENT REL 3.2 780824 * C ID h IX LINE LABEL OPCODE OPERANDS COMMENT C ID lNAME REF TYPE NAME REF TYPE NAME REF TYPE NAME REF TYPE IX TYPE
0x04164c…0417e0 Dummy {f00=0x0014, f01=0x0190, f02=» O Z Z Z (STACKTOP * IDENT AAAAAA * DATE XXXXXX * PAGE 0000 * DATA DIVISION PMIDDLERE DIVISION PROCEDURE LABELS DATA ITEM NAME
0x0417e0…041974 (0, 83) Dummy {f00=0x0015, f01=0x0190, f02=» B Q P W W ( B R.9 R89 R09 R"9 R, B H R&9AR 9AR W B W _ _ _ _ F 0 1P T T Y P : P X R : : @ T T P T R ?A?i _ : V g> T W : 0 Q Y X
0x041974…041b08 Dummy {f00=0x0015, f01=0x0190, f02=» g> h 5 W V 9D9kW V g> X X V V h 8X h XiX K W V # T g> 0V U V :SCOBUFLM _4 W _< W W W W W W w _` g X. M - V W ix W W V XP W
0x041b08…041c9c Dummy {f00=0x0015, f01=0x0190, f02=» V # i f W _ _ _ W G W W V F T W V P v Pd P &Qp T P _ V < 4T" < 5 W W Pp U _R _H W V V Px_ V T V W V W V W ]<_ V T8 V W W V
0x041c9c…041e30 Dummy {f00=0x0015, f01=0x0190, f02=»h6 V : g> 0V U V :SCOBUFLM _4 W _< W W W W W W w _` g X. M - V W W W V XP W
0x041e30…041fc4 Dummy {f00=0x0015, f01=0x0190, f02=»P N , ( O o < IOTC h V , ( i h IO:RELK , ( R R W T R , ( =
0x041fc4…042158 Dummy {f00=0x0015, f01=0x405e, f02=» U l Y x c x o k z o s } R& R W T R -T 5P @ H@ Z h V , ( i h IO:RELK , ( R R W T R , ( =
0x042158…0422ec Dummy {f00=0x0015, f01=0x4146, f02=» > F IDENT IO:WPR UPD 77-09-02/ZYGR IO:WPRK IO:WTY F IO:WPRK ` IOTPN t IO:PIO IO:REL IO:ERR@ , ( @H + IO:WTY " IOTCN
0x0422ec…042480 Dummy {f00=0x0015, f01=0x018e, f02=» > F IDENT IO:PRT UPD 77-09-20/ZYGR $ IO:PRTK IOPBI IONLIN IOVPRT F IONLIN n IOVPRT IOPBI ( ( ! ( A IO:PRTK t , ( a
0x042480…042614 (0, 84) Opaque[0x194]
0x042614…0427a8 # DirEnt {nam=»TLK «, typ=»LM«, f00=0x4c20, f01=0x3d20, f02=0x02a8, f03=0x4431}
0x042614…0427a8 IdxSect {
0x042614…0427a8 f00 = 0x0015 // 0x42614 @0x0
0x042614…0427a8 f01 = 0x000a // 0x42616 @0x2
0x042614…0427a8 gno = [ // 0x42618 @0x4
0x042614…0427a8 [0x00]: C0x0015.0x1.0
0x042614…0427a8 [0x01]: C0x0015.0x2.0
0x042614…0427a8 [0x02]: C0x0015.0x3.0
0x042614…0427a8 [0x03]: C0x0016.0x0.0
0x042614…0427a8 [0x04]: C0x0016.0x1.0
0x042614…0427a8 ]
0x042614…0427a8 }
0x0427a8…04293c Dummy {f00=0x0015, f01=0x0190, f02=» $3 @ D A j A h 3 :a A R A P D ( @ ` R T ? A 3 $ A)' A)3 A) A) 1 1 ) ,D b G ) ) ) @ ~P. @ v P v @ xX f x ~ WD ) ,D bP" @ j A h A
0x04293c…042ad0 Dummy {f00=0x0015, f01=0x0190, f02=» ' 9a @ b:a Q @ j M x G A h $ B <, $~ 4 Z Zz @ f @ ~ @ 9OV, 2 @ 9O @ j A h ) A) A) +P +R *:B H @ T @ | R fW H A @ |R f : * J : > A l @
0x042ad0…042c64 Dummy {f00=0x0015, f01=0x0190, f02=» A)' A)3 A | A | $ : 6 : 6 % PN @ ?HRF <P> & 8X 4P T X ] r r " C _2 " 1 " 1 A) A) ! & & & &
0x042c64…042df8 Dummy {f00=0x0015, f01=0x0190, f02=»"4 Z 4 * @ P . K W$ K "4 . "4 * . A 4 0 @ P F W F "4 ^WX (P4 # P # W "4 4 (P _4 : A A A : $ '< Z A)' A)3 ) )
0x042df8…042f8c Dummy {f00=0x0015, f01=0x0190, f02=» # ( C H C _2 ) ,D bP ? Rf *! P" ! T : 6 % : $L_@ ! X J % J J '< Zn 0 _ @ A J A L @ |P @ T > 2P. . A ( @ V A 2 $ % <
0x042f8c…043120 Dummy {f00=0x0015, f01=0x0190, f02=»W @ A @ A p r A * @ T # W @ A @ A r A 0 @ T # W$ W $P @ E # _ : @ @ A t @ A ( @ T ( W ^ A @ A * @ T ( W ^ A @ A 0 @ T ( W. ^W(
0x043120…0432b4 (0, 85) Dummy {f00=0x0015, f01=0x0190, f02=» @ P& * @ ) A A ( @ A * X Z 6 6 @ PJ @ ) A 0 A ( @ A 0 XW" $P 6 6 _ : & Z 6 6 V @ & ) + K K @ K @ N K
0x0432b4…043448 Dummy {f00=0x0015, f01=0x0190, f02=» T 00 TLK.ERR. @ 9HR @ |P c , W S+ A (P H P X ?m $ H P S A ! 9bT W2 D D A H ! P8 H T * W H z $ & _ @ R @ P A %V A %
0x043448…0435dc Dummy {f00=0x0015, f01=0x0190, f02=» ;h T U =H T 9A 9a A B P @ B P < < A @_ @ NP V H ( < ( J ! @ J J P J A J @ H K < J '< ) $ : f
0x0435dc…043770 Dummy {f00=0x0015, f01=0x0190, f02=» P T # P Q P P Q T V P Q ! < P W< X B_. " T A C _@ Q W _ @ 9HV ` " C H !0 , : _ _ , @ |Q P A | A | J @ JP
0x043770…043904 Dummy {f00=0x0015, f01=0x0190, f02=» @ h=a Q G !0 ( % _r @ P 4 ,P _ P D B (PB (T _ ,P L <a @ h?a Z <A P X* X._" I ( 9 5 ) 4 _B 8 @ h=a $PF D ;a Z _ , H T I $P D :a Z :A _ , : D $P D P (P4 H ?a @ h>a
0x043904…043a98 Dummy {f00=0x0015, f01=0x0190, f02=»X ,P L M _ $ 8 9 =_ 8 $P8 D :a @ h;a Z :A H E _ (X (P _ @ 0 1 )_ : < % 6 8 % *! 9B 6 @* F $P $ H - H M Z &_, & @ R A & @ 6 @ @ A @ % A 2 A 4 A A D A 6 @ j A h , : , @*
0x043a98…043c2c Dummy {f00=0x0015, f01=0x0190, f02=» , PF R $ R R !" P :H R [ [ [ , l , : , H $ | A V& $ , & " T @ l l A | A l ` A l @ C
0x043c2c…043dc0 Dummy {f00=0x0015, f01=0x0190, f02=» @ ZF P @ T A A A W: Z @ T = T # $W <X _B A W . 1P P : W F , : V$ +T _ V +P ! : : H T : D ^ N N N
0x043dc0…043f54 (0, 86) Dummy {f00=0x0015, f01=0x0190, f02=» , * . D B " A A " P m l C : R G 6 H !0 : @ H C C @ 2 # 2 : , @ | T4 W , W W , @ |R *" A @ R , : "?m $
0x043f54…0440e8 Dummy {f00=0x0015, f01=0x0190, f02=» C A _ 3 > P P : W F : V$ +T _ V +P ! : N N N
0x0440e8…04427c Dummy {f00=0x0015, f01=0x0190, f02=» D B " A A P m l C : R G : @ C C @ # : @ T W W W R *" A @ R : "?m
0x04427c…044410 Dummy {f00=0x0015, f01=0x0190, f02=»PIL T:BAT T:CAT T:PAT T:LIT P:BAS P:END T:KPI T:FMT : ( 1I/O ERROR FILE = STATUS = " A , , P z ^ z .( ( P W V W # C ( :
0x044410…0445a4 Dummy {f00=0x0015, f01=0x0190, f02=» $ n 2 A n , : @ =a% (R ZL 2 A _ 1 < R W - n +@ n + A @ 3 @ ?c' -& 3 $ n 3v +@ $ n 2 - n +@ n 2 0 @ ?A' -> " +@ $ 2 2
0x0445a4…044738 Dummy {f00=0x0015, f01=0x0190, f02=» ,D b : , b @ hW , @ h @ b @ V A ?a>a R* @ PV A P ?A>A A b A h , : A z @ h f Q : 4?d X 4' _"/0 :R # : ; &P _ # : : <P #_ : , ) < Rz @ @ T @ .
0x044738…0448cc Dummy {f00=0x0015, f01=0x0190, f02=» ?a >A + A A , : , "P _ P , : , " 'Q R , : , "PJ 9 C C 4P L 9lT 4 4 5_B 5 , : , #$ B TZ B PD PT T V PW T:
0x0448cc…044a60 Dummy {f00=0x0015, f01=0x0190, f02=» L d L L A z R W( ( P( !00X R !00P P % ( P _" % , : R _ 9D : @ A V & R 2 : A A A A A A A A A A A A A A A A A A A A
0x044a60…044bf4 (0, 87) Dummy {f00=0x0016, f01=0x0190, f02=»R> A =E- ' $ < V ' @ % A < R :R<W @ P2< < " + @ =a K < R W ) A : T : _ J # J !&&P @ @ F V @ nP* A n A : F n A F $ : , !. !. @ 0P ( 1 " P$ "
0x044bf4…044d88 Dummy {f00=0x0016, f01=0x0190, f02=» " P 8 TB C 9 P0 J P (P I _ : % K , : 8 9_ , PR @ PB B @ 9lT Q A _. @ T W @ T C _V , : , <P. F F , 1Q R W F T _, W
0x044d88…044f1c Dummy {f00=0x0016, f01=0x0190, f02=» )P ;M C , :#j#z# STR BIN BCD KEY PIC FMT FTB , (P H Z @ ?JVL T z H ?l?B #d $ z T <_p ]v -U - @ ?JV z < Z, 0 _
0x044f1c…0450b0 Dummy {f00=0x0016, f01=0x0190, f02=» : ; T : : " ' _ @ & <P Y R Q $ : C : , (P0W (P* P&Q %J P _ 5 ( 9 ) %J . , : _< <T 5 9 : , dR dR _ R _ , : I E I I W I E E E I E I E E E I E I E E , W , A%
0x0450b0…045244 Dummy {f00=0x0016, f01=0x0190, f02=» W&<bP W zW 4 C <bT C -J " % $ < 2 , : , & 8PF ^R <, @& X $ ( G X ) # _J P @& P < , : P8 R X X =m P , R R P X &_< ,
0x045244…0453d8 Dummy {f00=0x0016, f01=0x0190, f02=» _P 9 ( " # 7 _` , : , A ( ( @ ?KV z H V X W z z H V H D ?m $ WR $T P*WF D D X D ?m $ R $ < P _L < H V6 $ H D =m &
0x0453d8…04556c Dummy {f00=0x0016, f01=0x0190, f02=» )> F ) F <bT C " % $ < 2 : & 8PF ^R <, @& X $ ( G X ) # ) ) ) ) *: X =m P , R R P X &_< ,
0x04556c…045700 Dummy {f00=0x0016, f01=0x0190, f02=» * _` : A ( ( @ ?KV z H V X W z z H V H D ?m $ WR $T +H +T +` +` + R $ < P _L < H V6 $ H D =m &
0x045700…045894 (0, 88) Dummy {f00=0x0016, f01=0x0190, f02=» F F <bT C R& R W T R = ( B T B : : [ [ [ [ ; Z [ Z [ : [ [ : - Z Z - Z Z Z Z
0x045894…045a28 Dummy {f00=0x0016, f01=0x0190, f02=»1 1 1 1 2 2 2.2@2T2d2t2 2 LOAD MAP LB TABLE CALL TABLE PERFORM TABLE LITERAL POOL ADDR CROSS REF LISTING UNSATISFIED EXTERNALS PICTURE/KEYTABLE POOL LINKER STATI
0x045a28…045bbc Dummy {f00=0x0016, f01=0x0190, f02=» DEFINED IX TYPE LOC DATA *SYMBOL TYPE LOC DEFINED REFERENCES ALL VALUES DECIMAL END OF MEMORY SYMBOL TYPE CONFLICT ILLEGAL INPUT LOAD ADR INCORRECT UNREFERENCED LITERAL UNDEFINED LITERAL NO START ADR DBL DEF MODULES UNSATISFIE
0x045bbc…045d50 Dummy {f00=0x0016, f01=0x0190, f02=»VERFLOW TOO MANY LITERALS FORMAT LENGTH ERROR MULTI DEF ENTRY IDENT MISSING ADDRESSING MODE CONFLICT WRONG TRANSLATOR RELEASE CALL TABLE PERF TABLE LB TABLE LITERAL DESCRIPTOR TABLE PIC/KEY DESCRIPTOR TABLE FORMAT DESCRIPTOR TABLE LITERAL P
0x045d50…045ee4 Dummy {f00=0x0016, f01=0x0190, f02=»ED WORKSPACE IN PER CENT AVAILABLE WORKSPACE USED WORKSPACE UNUSED WORKSPACE NUMBER OF SYMBOLS NUMBER OF LRT NUMBER OF CLR NUMBER OF CCR NUMBER OF FRL MAX WORKSPACE PER MODULELINKAGE ERROR : : XXXXX BYTES, XXXXX ENTRIEST:D , +TF
0x045ee4…046078 Dummy {f00=0x0016, f01=0x0190, f02=» $ :* CREDIT CODE LINKER REL 3.2 780915 * * DATE XXXXXX * PAGE 0000 * SLATOR RELEASE CALL TABLE PERF TABLE LB TABLE LITERAL DESCRIPTOR TABLE PIC/KEY DESCRIPTOR TABLE FORMAT DESCRIPTOR TABLE LITERAL P
0x046078…04620c Dummy {f00=0x0016, f01=0x4190, f02=» > F IDENT CL:FMT REL 78-03-29 #3.1 CL:FMTA CL:FTB F CL:FMTA ` CL:FTB t S:ALL2 MPFOR * & J W J @ MVFOR MIFOR MCTTF1P ,
0x04620c…0463a0 Dummy {f00=0x0016, f01=0x018a, f02=» > F IDENT CL:FRF REL 78-03-29 #3.1 CL:FRFA F CL:FRFA X PUSH12 l S:FORM ~ , ( D P R S:MOV , ( R R !" P :H POP12
0x0463a0…046534 (0, 89) Opaque[0x194]
0x046534…0466c8 # DirEnt {nam=»LKE «, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x02d0, f03=0x4441}
0x046534…0466c8 IdxSect {
0x046534…0466c8 f00 = 0x0016 // 0x46534 @0x0
0x046534…0466c8 f01 = 0x0006 // 0x46536 @0x2
0x046534…0466c8 gno = [ // 0x46538 @0x4
0x046534…0466c8 [0x00]: C0x0016.0x2.0
0x046534…0466c8 [0x01]: C0x0016.0x3.0
0x046534…0466c8 [0x02]: C0x0017.0x0.0
0x046534…0466c8 ]
0x046534…0466c8 }
0x0466c8…04685c Dummy {f00=0x0016, f01=0x0190, f02=» @ ^a : b 9 i H e w z n{ p 3 mC c 2 z m H! P Z m c z m ZH! 3 d+ [ @Bh 9 F y{ 4` - ` O PZ 4 P0 l tB + / Z c t% z Z Z @ @ D Z Zz } n z `4 z R: ` d z $ ` Ct F z z
0x04685c…0469f0 Dummy {f00=0x0016, f01=0x0190, f02=» +uz K $ 4 @ Z " " R> . +uz K w [ d +b% L M S "~ T ~ S ^ A j ` e < zR:R:L ` Z Z% Z @d zu ` ` t L : t ` Z @ `H z@ zl m `" z8 U ! ) ` @ @ z z Z @b R: ` z R:: z 4 @, L `
0x0469f0…046b84 Dummy {f00=0x0016, f01=0x0190, f02=» A ^a : b 9 i H e w z n{ p 3 mC c 2 z m H! P Z m c z m ZH! 3 d+ [ @Bh 9 F y{ 4` - ` O PZ 4 P0 l tB + / Z c t% z Z Z @ @ D Z Zz } n z `4 z R: ` d z $ ` Ct F z z
0x046b84…046d18 Dummy {f00=0x0016, f01=0x0190, f02=» +uz K $ 4 @ Z " " R> . +uz K w [ d +b% L M S "~ T ~ S ^ A j ` e < zR:R:L ` Z Z% Z @d zu ` ` t L : t ` Z @ `H z@ zl m `" z8 U ! ) ` @ @ z z Z @b R: ` z R:: z 4 @, L `
0x046d18…046eac Dummy {f00=0x0016, f01=0x0190, f02=» A ^a : b 9 i H e w z n{ p 3 mC c 2 R P H c z m d [ @Bh 9 F y{ 4` - ` O PZ 4 P0 l tB + / Z c t% z Z Z @ @ D Z Zz } n z `4 z R: ` d z $ ` Ct F z z
0x046eac…047040 Dummy {f00=0x0016, f01=0x0190, f02=»TBL.OVL.INV.IDT.END.MIS.UNS.EXT.ERR.LKE.BLK.COM.NO STRT.PRG.OVL IDT.MIS.INV.STR. 9 R : ) Y : @ P %T _ $ 5Tv Pn Y %T P`_ $ 5 RN PH % P 5 _ 5 5 P P %T X $ 5_ : :
0x047040…0471d4 (0, 90) Dummy {f00=0x0016, f01=0x0190, f02=» _" @ lR0 @ @ P& T _ (;CZ A l A : @ lP. @ $" % A 0 H 5 @ P _* : @ lPb @ < < @ A < < V @ A R0 A p A H A F @ H @ F @ p= > A @ @ : = > < @ x $ A $" P $" : $
0x0471d4…047368 Dummy {f00=0x0016, f01=0x0190, f02=» @ p= @ B : @ lP @ @ PR $" % (% P A * PRG.OVL (% P A " 9 $) ) ,! P @ 1 _X : @ lPn @ @ Pd $" * % (% T A " P`_ ( =e T ( T , 0Q W ,& T 1 0Q _ A * & _ : A h @ lPj ` P P`
0x047368…0474fc Dummy {f00=0x0016, f01=0x0190, f02=» ( _ @ A D @ T ( @ A @ A @ A : H % : B 1( A B A J A Z A : $;e (<e P : 4 9P : Y : $;e (<e 4 9P Q : P Y : Y : @ | ?a @ ~=a UL?A $=KR W6 : $
0x0474fc…047690 Dummy {f00=0x0016, f01=0x0190, f02=» 0 A _4 A b : A @ A A p @ t @ vP 89D A 9A A A @ rP 8:GR _6 A p @ A A T A p V 8 A A A A N_ A A p @ A A : W W W W W W W
0x047690…047824 Dummy {f00=0x0016, f01=0x0190, f02=» @ @ : W A A @ ~ @ z:a Q. @ @ x @ v :b Q A @ _8 @ P @ ~ A ~ : @ z A z : @ x @ v 9a @ :a Q2 A 4 A 6 @ ~ @ z9b Q @ 6 A 6 @ 4_$ @ v @ A v : @ h Z A h @ x A z A l @
0x047824…0479b8 Dummy {f00=0x0016, f01=0x0190, f02=» A A I z ^ 00 A z : A @ A A p @ t @ vP 89D A 9A A A @ rP 8:GR _6 A p @ A A ` @ A t A v A | A ~9a?a A x A z A A A n A d A j A ` A $ $ A C A h @
0x0479b8…047b4c Dummy {f00=0x0016, f01=0x0190, f02=» @ T @ P6 A C A @ V6_ _ @ A CX0 @ a ` _F @ V 4 @ a @ ` T" @ ` T A A p A W A r Z % P A @ D PV P M A W` @ :B9C 9A 9A 9B A <a V :A A A @
0x047b4c…047ce0 Dummy {f00=0x0016, f01=0x0190, f02=»;E % 0 A @ T . A A A p @ A A A p @ A @ :a9a A @ ` P * @ dP L L ( @ t @ vT W : P A _ : ` @ P: @ @ $ ) Y $ ) :
0x047ce0…047e74 (0, 91) Dummy {f00=0x0017, f01=0x0190, f02=» :CR U = ** = = = W" A:AV C:AR R = $ @ vP& @ :a9a ^~ @ _ @ 0 = ** = ] ] @ 0 = START = = @ LENGTH = @ REGION = @ U _ : , 1
0x047e74…048008 Dummy {f00=0x0017, f01=0x0190, f02=» : , @ C ( @ A A R A A R ) : , "( : 6 @ A @ @ A 8 I ( @ A A A : W V( : <A 0 R ( ) : (_ @ x <a @ z=a @ v9b9A A x , ) Z A z : @ ~ @ z <a @ x=a :b:A
0x048008…04819c Dummy {f00=0x0017, f01=0x0190, f02=» A A A _| @ tP : P : $ P A A 8 $ ) 9 @ vP 9 : $<e :9C D @ 5 A | A : @ t @ v;a<a V $:CR E P : _& L( z ^ : @ `
0x04819c…048330 Dummy {f00=0x0017, f01=0x0190, f02=» jR< @ @ @ % @ 9a! :d x @ @ p : A _B A j : "( : 6 @ A @ @ A 8 I ( @ A A A : W V( : <A 0 R ( ) : (_ @ x <a @ z=a @ v9b9A A x , ) Z A z : @ ~ @ z <a @ x=a :b:A
0x048330…0484c4 Dummy {f00=0x0017, f01=0x0190, f02=» ( ( 1 @BFQ ( ( 1 @BFQ _ @B8 ^ 1 W ` 1 W AB8 B8 BF 2 % 0P % % @BFQ _& _, 2 % Z R Y 2 4 R _ 5 B| B 2 2 % Z 2 & % Y AB~ T 2 ~ AH
0x0484c4…048658 Dummy {f00=0x0017, f01=0x0190, f02=» ( B P ! W B Q ( , X "' P _F @H T R 6 R 1 Y AH AH @H AH @H AH AH @H AH AH AH AH @H P AH AH ( B Tj : 2 @H H Rt 0X R @H Z Y P M T6 1 Q H H AH @H AH ( @H P ! $W
0x048658…0487ec Dummy {f00=0x0017, f01=0x0190, f02=» : K r 8 P . P J K : : AH @H AH 2 C AH @H @H Y AH ( @H H 6 P J S T $ 1T P _ H XX_2 AH : @H T L @H K Q : H L @H O @H K @H K K K K K K K
0x0487ec…048980 Dummy {f00=0x0017, f01=0x0190, f02=» 2 R 1 % Y AH H ( @H L AH @H Y : AH @H Q* AH O O O ( O ( P" O @H 0 AP: PD PT H PY @H T Pb O P ( H @H : N T @H T : : AH AH J AH T6 L @H
0x048980…048b14 (0, 92) Opaque[0x194]
0x048b14…048ca8 # DirEnt {nam=»ASM «, typ=»LM«, f00=0x3039, f01=0x3131, f02=0x02e8, f03=0x2020}
0x048b14…048ca8 IdxSect {
0x048b14…048ca8 f00 = 0x0017 // 0x48b14 @0x0
0x048b14…048ca8 f01 = 0x0008 // 0x48b16 @0x2
0x048b14…048ca8 gno = [ // 0x48b18 @0x4
0x048b14…048ca8 [0x00]: C0x0017.0x1.0
0x048b14…048ca8 [0x01]: C0x0017.0x2.0
0x048b14…048ca8 [0x02]: C0x0017.0x3.0
0x048b14…048ca8 [0x03]: C0x0018.0x0.0
0x048b14…048ca8 ]
0x048b14…048ca8 }
0x048ca8…048e3c Dummy {f00=0x0017, f01=0x0190, f02=» H %L y T @ > : 2Z "z yZ SC F z $ } F[ " R>n +u PK w [ 6Ad +b% L jM c"~ xT c A9 '| < R:R:L ` z $ $ $ $ $ $ %L %L * @ @ . P aNp
0x048e3c…048fd0 Dummy {f00=0x0017, f01=0x0190, f02=» b *p ^a : b 9 p i ,w z* { 5 R M[k 3 C zk 5 P Z;/ m c QiZ zk Z 9 4 6@Bh 0 ` % < 4` ` S O PZ# 0 > t( B R Q : B | B p ( 0IO ERROR
0x048fd0…049164 Dummy {f00=0x0017, f01=0x0190, f02=» @ c A A ( & $( 4 :a;a : MW& XW" CW RW EW IW LW FW SW OW P @ A b * A a @ A @ A @ P a @ a x @ vP 8 ) A _ * I a ^ a A @ P A @ END A A E A A
0x049164…0492f8 Dummy {f00=0x0017, f01=0x0190, f02=» b *p ^a : b 9 p i a f A f : A f a f ` f : $:f:A $# Q $# P W WL $$ X $$ <A $# P _ ; $$ X, ; A $ 4 & X <a<A : : @ W @ AZQ4 > 09Q& ::Q ..Y
0x0492f8…04948c Dummy {f00=0x0017, f01=0x0190, f02=» &<E P" "$ T" 4 %T W _> W W @ @ $<E % @ $$ Q ) A : A W 09U ( 9 S = S 0 S _ : 2 A 09Q AFR ( 9Q R V =D _( : 2 ` A ''Q Y
0x04948c…049620 Dummy {f00=0x0017, f01=0x0190, f02=» + A ++Q --Q W W V . **Qx ''Qb //Q XXU ''Q Wl AZQf 09Q< 4W W> A ''R W& 09Q AF 2 A : W '' 2 W Z @ @ Wx Z A 6 T 2 $ P P A # P"#
0x049620…0497b4 (0, 93) Dummy {f00=0x0017, f01=0x0190, f02=» @ @ Q F 4 1 A : 2" P0 P, P( V P T * @ P . 60 FOR.O/R.1 SYMBOL TABLE0 UND.ENT.0 UND.LAB.0 ASS.ERR.1 ^ $ ) $ 0P P $ ) _ : d ' L R L _ 0 ) ^ : 9 R : ) Y : @
0x0497b4…049948 Dummy {f00=0x0017, f01=0x0190, f02=» @ T @ @ A A Z 9! D A _ _ A A @ @ :a;a R R : T T _( O @ T& P 4 l ^ ~ ^ ( l ^ ^ : W W d Pj a d @ Q4 P.
0x049948…049adc Dummy {f00=0x0017, f01=0x0190, f02=» @ @ Q @ 4 1 A : 2" P0 P, P( V P T * @ P D 60 FOR.O/R.1 SYMBOL TABLE0 UND.ENT.0 UND.LAB.0 ASS.ERR.1
0x049adc…049c70 Dummy {f00=0x0017, f01=0x0190, f02=» F @ 2P R A v H A A F 4 I >! A >!P H A I 0 @ tP ( A A _, A Q @ U ( D @ A $ U A : @ PH @ @ T 2 $" B $" P A t $ A A A ( A ) >C
0x049c70…049e04 Dummy {f00=0x0017, f01=0x0190, f02=» @ A @ A r I 0 ^ z A & . x A v **QX LRRQ 6 L J . T@ @$ P T P A R A W *W _ ( @ P P @ I @ T~ Ut A ( Ub A UT A @ PJ A @ $ T&
0x049e04…049f98 Dummy {f00=0x0017, f01=0x0190, f02=» 4 ( 0FATAL ERROR HAS OCCURRED,NO OBJECT CODE PRODUCED W W 1 @ B L J 1P A A ^_ @ TZ ,W @ TN ( @ T LU> 6 B ,,Y R , _ J @ T LU @ Q A a A
0x049f98…04a12c Dummy {f00=0x0017, f01=0x0190, f02=» J T ( % a A : $ B : W @ B T B L J 2 @ 0 A a P2 6 ,,RR F $" T @ = ," W A 2 = ] ] R * U Q P ;A_ ;a Y ==Q$ ::QZ P
0x04a12c…04a2c0 Dummy {f00=0x0017, f01=0x0190, f02=» P 9A Y T2 < = T$ P &T F T W R ,,Y W ,,Y F @ 2 P R ^ ` " a Qx T //Q J Y 9a 09R, YV D 4" Y^ E 4 9 E T ,,Q - = _4 ZN a Q D T _ A A$ @ B LV @
0x04a2c0…04a454 (0, 94) Dummy {f00=0x0017, f01=0x0190, f02=» A A J @ B LPLQ @ @ P8 $T % _ 6 R $ R % ,,Y" J LU4 * @ T( R" @ j 9a R 9 @ J @ B L J . P @ P @ ) $" % ]: @ P @
0x04a454…04a5e8 Dummy {f00=0x0017, f01=0x0190, f02=» T @ T P X ,,R> Z. R ''Q X A ( Y 4 A _ ''Y X* X< Y 4 _F Z~ A 0 A 2 Qx T //Q J Y 9a 09R, YV D 4" Y^ E 4 9 E T ,,Q - = _4 ZN a Q D T _ A $% P (
0x04a5e8…04a77c Dummy {f00=0x0017, f01=0x0190, f02=» T P T F ( _ R r T* P" P F 4 P @ G 4 @ P _> G 4 4 G T_ PX P @V P ,,Q R A W$ F P N N$ <c! 9A ( _P ((RL 07Q . * (
0x04a77c…04a910 Dummy {f00=0x0017, f01=0x0190, f02=» O O O _ 2! Q : F A 2 : ,,Q R A : Z J R R @ R : r P P * : 8 : 2 : 2' ?A 2&p r : @ P @ P P P R P 9 G T 4 N G 4 r P : LX Q : $" *
0x04a910…04aaa4 Dummy {f00=0x0017, f01=0x0190, f02=» LV _ J 1 A ^ A @ T @ B LU A A 6 A R 4 F A D z E ^ ( A I ^ @ A @ A A F ( A F @ @ P $ )_ ASM 04 J A L
0x04aaa4…04ac38 Dummy {f00=0x0017, f01=0x0190, f02=» A _, P ( @ @ A PT $ $# P $ ] T A A @ T A 0_Z ] A @ P W P @ % A @ P < j b P~ $Y $#
0x04ac38…04adcc Dummy {f00=0x0017, f01=0x0190, f02=» j P T j A ( 4 & ( 4 ^ j A P 0 IASS.ERR.Q D @ "1 I T A I D @ i DS A I U @ i US A I N @ i NS A I R @ i RS A I R
0x04adcc…04af60 Dummy {f00=0x0017, f01=0x0190, f02=» " Q L @ " I S A I C A I U @ I V @ I A @ I S ~ @ I X t A I M j A I L @ I S A i AD L @ ADS B A i SU 6 @ SUS , A i MU @ MUS A i DV @ DVS A i LD @ i ST A I L @ I S A P F
0x04af60…04b0f4 (0, 95) Dummy {f00=0x0018, f01=0x0190, f02=»S !h RR RRS !h FR h 1R h WR | h CR h CR z !h CR r p MR ! a h 2R ! 1RS !h TN p BR " H M 6 h NM . ` DK DKL 1 h DK DKL h UK UKL h NK NKL h RK ( RKL h RK 0 RKL
0x04b0f4…04b288 Dummy {f00=0x0018, f01=0x0190, f02=»NB(@ h LT h NH h KM ( ` IT > p LR h SR !h CR !p UR a ! h VR h AR h SR ` LK i CK ! a UK i VK b AK j SK ` LA8 h RA 8 h LL 8@h RL 8`h LC 8 h RC 8 p LN8 h RN 8 ` LA8
0x04b288…04b41c Dummy {f00=0x0018, f01=0x0190, f02=» h LR h SR ! ADR > ADRS 4 ! SUR * SURS ! MUR MURS ! DVR DVRS !h VF p h VB x VUS x VSU p STR ! LDR h LR h SR !h FL h FX DENT NTRY XTRN ATA ORG ORG IST d LIST h JE
0x04b41c…04b5b0 Dummy {f00=0x0018, f01=0x0190, f02=»8 8 X E X G X L 8 8 8 8 X A X R :P ZA1 ZA2 ZA3 ZA4 ZA5 ZA6 ZA7 ZA8 ZA9 zA10 zA11 zA12 zA13 zA14 zA15 b AK j SK ` LA8 h RA 8 h LL 8@h RL 8`h LC 8 h RC 8 p LN8 h RN 8 ` LA8
0x04b5b0…04b744 Dummy {f00=0x0018, f01=0x0190, f02=»11 z P SUK A4,1 P RF(0) DRLP02 ( P AB.L(1) E:SO11 H PDRLP1B LD A2,12,A6 h P LD A1,14,A6 PDRLP01 ANK.L A1,/FFF P ADR A2,A1 P SUK A2,1
0x04b744…04b8d8 Dummy {f00=0x0018, f01=0x018e, f02=» * FUNCTION CHARACTER OUTPUT l P LD A3,32,A6 & P********* MS 2,6,A3 H P ST A1,6,A3 h P ST A2,8,A3 P INH @ P LDKL A4,/FF7F RESET PROGRAMMED CHANNEL FLAG P
0x04b8d8…04ba6c Dummy {f00=0x0018, f01=0x0190, f02=» P STR A3,A15 P STR A4,A15 $ P STR A5,A15 D P STR A6,A15 d P STR A7,A15 P STR A8,A15 2 P LDK.L A3,*+8 * THE SEQUENCE D P AB.L
0x04ba6c…04bc00 Dummy {f00=0x0018, f01=0x0190, f02=» A1,A15 P STR A2,A15 P STR A3,A15 0 P STR A4,A15 P P STR A5,A15 p P STR A6,A15 P STR A7,A15 P STR A8,A15 F P LDK.L A3,*+8
0x04bc00…04bd94 (0, 96) Opaque[0x194]
0x04bd94…04bf28 # DirEnt {nam=»OBX «, typ=»LM«, f00=0x434b, f01=0x204e, f02=0x0308, f03=0x203d}
0x04bd94…04bf28 IdxSect {
0x04bd94…04bf28 f00 = 0x0018 // 0x4bd94 @0x0
0x04bd94…04bf28 f01 = 0x001a // 0x4bd96 @0x2
0x04bd94…04bf28 gno = [ // 0x4bd98 @0x4
0x04bd94…04bf28 [0x00]: C0x0018.0x1.0
0x04bd94…04bf28 [0x01]: C0x0018.0x2.0
0x04bd94…04bf28 [0x02]: C0x0018.0x3.0
0x04bd94…04bf28 [0x03]: C0x0019.0x0.0
0x04bd94…04bf28 [0x04]: C0x0019.0x1.0
0x04bd94…04bf28 [0x05]: C0x0019.0x2.0
0x04bd94…04bf28 [0x06]: C0x0019.0x3.0
0x04bd94…04bf28 [0x07]: C0x001a.0x0.0
0x04bd94…04bf28 [0x08]: C0x001a.0x1.0
0x04bd94…04bf28 [0x09]: C0x001a.0x2.0
0x04bd94…04bf28 [0x0a]: C0x001a.0x3.0
0x04bd94…04bf28 [0x0b]: C0x001b.0x0.0
0x04bd94…04bf28 [0x0c]: C0x001b.0x1.0
0x04bd94…04bf28 ]
0x04bd94…04bf28 }
0x04bf28…04c0bc Dummy {f00=0x0018, f01=0x0190, f02=» f d R p X T0 x F.F8mHmbm|m m m n n T0 * o 8 , @ | ~
0x04c0bc…04c250 Dummy {f00=0x0018, f01=0x0190, f02=»
[…0x13…]
0x04e04c…04e1e0 Dummy {f00=0x0018, f01=0x0190, f02=» ' '
0x04e1e0…04e374 (0, 99) Dummy {f00=0x0019, f01=0x0190, f02=»
[…0x1f…]
0x051460…0515f4 (0, 103) Dummy {f00=0x001a, f01=0x0190, f02=»
[…0x13…]
0x0533f0…053584 Dummy {f00=0x001a, f01=0x0190, f02=» 0 0 0 0 0 0" $ &
0x053584…053718 Dummy {f00=0x001a, f01=0x0190, f02=» MODULE(S) EXTRN DEFINED IN MODULE SYMBOL DEFINED REFERRED MODULE PART SYMBOL PART RUN STATISTICS E $ * 0 6 < B H J 0 ijk J 0 JB6B % _ _
0x053718…0538ac Dummy {f00=0x001a, f01=0x0190, f02=» P ED E E 0 X 0 1 0 1 4 FH@ ! F4 G FG GF4 G FG GF4 @@!B (E PEW[ VE V W W (DC PCWQ VC WD W W PV PW0 P Q P J Q R VP VP_ WP WP_& QA@4 P ED !B P EP P4 DP P4 # A R QR Q R R Q R Q _ J A A 4 P A% Q R
0x0538ac…053a40 Dummy {f00=0x001a, f01=0x0190, f02=» c&0 1 - ` 4 @` A`4 a a 4 I` ,`^ 4 0 1 ` @`4 @` T` T *T^ A`!a 4 UC F U J F @` ' U UD 4 G F(GA *4 G0G GA 4 Q G P Q(PA 4 p q r s t u v w x y z { , Q A PA"4 T P T P0P4 G F(GA )4 G0G GA 4 Q G P Q PA 0PA Q A S P
0x053a40…053bd4 (0, 106) Dummy {f00=0x001a, f01=0x0190, f02=» + S A R0R PA& RA*4 L v w|u o>oao o p o o o p pgp q q q@qqr/p qKq[q*q q q5q q r rL MODULESYMBOLNBR OF NO MODULESNO SYMBOLS* UNDEFINED *INPUT I/O ERROR* MULTIDEFINED ** UNREFERENCED *DOUBLE DEF MODULEINPUT FORMAT ERRORNAMES AREA OVERFLOWCHAIN
0x053bd4…053d68 Dummy {f00=0x001a, f01=0x0190, f02=» $ & S ob 0 S Q AVAIL. UNUSED LIST ITEM NAME ITEM IDENT J 1 OBX d . e ( f ) NO EXTERNAL REFERENCES NO ENTRIES IN THIS MODULE ! p # q + r 3 s ; t C u K v S w [ x c y p q r (
0x053d68…053efc Dummy {f00=0x001a, f01=0x0190, f02=» ! + 5 B Q a q 0 & , 2 8 > E L T d n x . ` uzr u s u s ( W W W > x6 x x % Y } C }: & R V C }: w ' ( vf( $ xj P C C
0x053efc…054090 Dummy {f00=0x001a, f01=0x0190, f02=» P C x" : x C W2 x | P C W $0 P C y JwZ C W4781"&$ 39#$;< x B }: 'W x ( W C C C ( ' Pl x I "%@T^ B P B PR B 5W B TD P B % P C + z B P ! T B B U ( 5 _
0x054090…054224 Dummy {f00=0x001a, f01=0x0190, f02=» $ V 6P $ - _ ( : B T T T V : 2 ' W 2' 6 2 #? ~ ;D:B : }: C : | #0 T & C C : C C V W V Q (W Q W Q W y y 4 ! P
0x054224…0543b8 Dummy {f00=0x001a, f01=0x0190, f02=» d P ( z= #0 T B 'W B B " Pz z PP Lz R R _ R _ # Q R V > _V ' P _d P & 1 P 1_ , @ - R T U :B@ ' d z { {
0x0543b8…05454c Dummy {f00=0x001a, f01=0x0190, f02=» {n @{<R V pVP 9c Dz }: | Q z W < :aW, @{<YPP J @{<] @{<]f D_l 4 2 P W _ 2 # P Lr P " 2 P V D ! R T P _l 8^: D{ ! Pn Dr Ph 6 7_* 2 # PR Lr PL
0x05454c…0546e0 Dummy {f00=0x001a, f01=0x0190, f02=» & { H{: 'W 'W '_6 P: u W u W P( u $P }" 6 2 # ~ W< 6 2 " T v }: : " # ~ ;b , (V ; [ }: Z H (;AR H & z ;AV: Z H # ~
0x0546e0…054874 (0, 107) Dummy {f00=0x001b, f01=0x0190, f02=» " 2@P : [ [ }: & @u P Z [ 6 [ Z 7 } Z 7 : 4 ( ; V Y : 2! : 2 6 " # ~ ;b ; : W # " T & T + : * & !@P `1`
0x054874…054a08 Dummy {f00=0x001b, f01=0x0190, f02=» R P* R ` = <( ;_| V P ^ `_ " P :" # P * U P 1`! T 9e! = K : #0 P8" T * & : * & !`P :J +_ +Q _0 , V W R V W R XV W 1 ^ _0
0x054a08…054b9c Dummy {f00=0x001b, f01=0x0190, f02=» P P PN P 0 - P: V W Z _ 4 V W Q P ) P 9_ &" ! 9 : & P Q ,^ , < # ; [ _n' d V W V 4! P < S S S X 4 9d * & ! R + :
0x054b9c…054d30 Dummy {f00=0x001b, f01=0x0190, f02=» & T 9d! T 7 V Y Pd_$ SZ Q V P V Q W Q 7 Y P._6 & Q 9d! )0 + P 7 Y Z $ _ : V ) 0 !0 " TV *V &V : V S W P 9 S W _ V P W T V E + : &
0x054d30…054ec4 Dummy {f00=0x001b, f01=0x0190, f02=» $" T 9d! P [ [ P V H )_ _N z R z ! P 1` { V (9h T I Z ! : 4 P 9 59D_ ! :d" 5 : 0 !0 " Tz *V &V PP= ;@ R P W ;a=a P " R & R
0x054ec4…055058 Dummy {f00=0x001b, f01=0x0190, f02=» : z " ! P ! R 2` + z " P ! R 2` { 1 ! { [ Q _ T { [ [ QB [ { R [ _ Z ! Z $ Z %_P [ Q* R [ Z { z 9e! W Z :
0x055058…0551ec Dummy {f00=0x001b, f01=0x0190, f02=» gg++ L 8| } ~ :~ } }: 2 t t > 0 V $ 6W4 K K K K : }: b R } $ P 2 " T W "@T '?W "? H " K :e J J " J _T Z
0x0551ec…055380 Dummy {f00=0x001b, f01=0x0190, f02=» WD +_ K W. _. Xj v W Xt & v J K : V : J T 1 + }: [ [ < !AAP !TTT W !**T * [ R !FFP !EET W I 6 * B Z 9 ! ; *X 8 ! D 0P Wt 0W@ Wl :T& *W4 FP . :T Z
0x055380…055514 (0, 108) Dummy {f00=0x001b, f01=0x0190, f02=»)0 Z ] 49d_* _>U ; :X _ _ z 9d! ) ^ _~ ,_ 8 _ : W 8W d 8 !++P !-- z ;$# + ^" _( Z z^. PT*AXYZ9 > : ! P ! P ! P ! P }: ! P } W : ! )P9H " # T &W &" :I :
0x055514…0556a8 Dummy {f00=0x001b, f01=0x0190, f02=» _ <$0T [ <$0T Z : R& P $ 1T Y TfW 5 _( : <$0TH $ R W R # P W ) V E T$0T Wp W W 4 < [ T : Z !0 , !0P2 0 > 4 R :d" 8 R ! :DW
0x0556a8…05583c Dummy {f00=0x001b, f01=0x0190, f02=» T W V 9! R W Q< R W Q0 R W Q$ : | #03 T $_X _^ W 4 p p *1 TID ADDR OP CR LVL MODIFIED OPERAND CREDIT 2.1 TRACE * A pT d ( A h A p( p
0x05583c…0559d0 Dummy {f00=0x001b, f01=0x0190, f02=» Q p A hW* V D ! )0 1 6 V 9 A h {n d ( : W` W WX WT WP WL WH WD W@ W< W8 W4 W0 W, W( W$ W W W W W W W W W ** A r A v ER A R A R 4 4
0x0559d0…055b64 Dummy {f00=0x001b, f01=0x0190, f02=»R MISSING ENTRY ILLEGAL REQUESTED LENGTH STACK UNDERFLOW ARITHM OVERFLOW STACK OVERFLOW INDEX OVERFLOW ILL INDEX TYPE DIV BY ZERO EDIT BUFFER OVFL EDIT PICTURE OVERFLOW "ALLOCATION ERR AT INITIALIZATION ILLEGAL INSTRUCTION ADDRESS ILLEGAL FORM
0x055b64…055cf8 Dummy {f00=0x001b, f01=0x0190, f02=»ONDITIONS CHANGED ILLEGAL PARAMETER LENGTH ERROR W 9 " R 0 1 Y : ;a o <a R u <a V : 4 P W W W W W W W W W W W W ** A r A v ERIDENT ( p }: J G '
0x055cf8…055e8c Dummy {f00=0x001b, f01=0x0190, f02=» pW~ | @ P Qp A _X @ %X F K $ )TB @ P8 K @ P( %X $ + @ P P % A pW A A @ ' { ( : ( B RBP T2! T>W4 @ ! P4 U ! T( A B A B A : A : A : p_^ }: &9! ' {
0x055e8c…056020 Dummy {f00=0x001b, f01=0x0190, f02=» V {dANGED ILLEGAL PARAMETER LENGTH ERROR W 9 " R 0 1 Y : ;a o <a R u <a V : 4 P W W W W W W W W W W W W ** A r A v ERIDENT ( }: J G '
0x056020…0561b4 (0, 109) Opaque[0x194]
0x0561b4…056348 # DirEnt {nam=»M:PROC«, typ=»UF«, f00=0x2020, f01=0x2020, f02=0x0370, f03=0x2020}
0x0561b4…056348 IdxSect {
0x0561b4…056348 f00 = 0x001b // 0x561b4 @0x0
0x0561b4…056348 f01 = 0x0002 // 0x561b6 @0x2
0x0561b4…056348 gno = [ // 0x561b8 @0x4
0x0561b4…056348 [0x00]: C0x001b.0x2.0
0x0561b4…056348 ]
0x0561b4…056348 }
0x056348…0564dc Dummy {f00=0x001b, f01=0x0190, f02=» P$PCAS PASG 3,@DA=TK0E PREW 3 ( PWEF 3 M=@M= 6 PRUN CPLGEN @M= J PMOV @M=,/L,@MU ` PRUN JESPER @M= v PWEF 3 @A= PMOV @A=,/L,@AU PRUN JESPER @A= 2 P$PCASC M=@M=,A=@A=,C=@C=,CU=@CU=,D=@D=,DU=@DU= * P$PCASC M
0x0564dc…056670 Dummy {f00=0x001b, f01=0x0190, f02=»,A=@A=,C=@C=,D=@D= P$PCASC M=@M=,A=@A=,C=@C= P$PCASF C=@C= : P$PCASF D=@D= N P$PCASF CU=@CU= b P$PCASF DU=@DU= x P$PCASE M=@M=,A=@A= P$PCASE M=@M= P$PCASE A=@A= PMES PARAMETER ?? PEND P$PCASC PWEF 3
0x056670…056804 Dummy {f00=0x001b, f01=0x011c, f02=» PMES @D= P$PCASE PEND " P$PCASF . * PMES ILLEGEL PARAMETER COMBINATION!!!! < 2 PMES M,M+A,A,M+A+C,M+A+C+D IS OK SO TRY AGAIN! j * PMES AND DON'T DO ANY MORE MISTAKES!!!! P$PCASE PEND P$PCASE PWEF 3,2 PUL
0x056804…056998 Dummy {f00=0x001b, f01=0x2008, f02=» @D= P$PCASE PEND " P$PCASF . * PMES ILLEGEL PARAMETER COMBINATION!!!! < 2 PMES M,M+A,A,M+A+C,M+A+C+D IS OK SO TRY AGAIN! j * PMES AND DON'T DO ANY MORE MISTAKES!!!! P$PCASE PEND P$PCASE PWEF 3,2 PUL
0x056998…056b2c Dummy {f00=0x001b, f01=0x0190, f02=» EMPTY COMP. FIELD FOUND & P TSTCTL 2 LOOK IF COMPULSORY FIELD P BZ KENT05 NO! J . P CALL EMPTYT,:FMTITEM LOOK IF EMPTY FIELD ` P BP KENT10 YES! PKENT05 4 P MOVE SPBINW2,='3' INDICATE ENTER KEY DEPRESSED P RET P* " P*
0x056b2c…056cc0 Dummy {f00=0x001b, f01=0x0190, f02=»RT * P CBE SPBINW2,='16',KEDIT JUMP IF EDIT * P CBE SPBINW2,='4',CANC JUMP IF CANCEL1 8 * P CBE SPBINW2,='5',CANC JUMP IF CANCEL2 f P* P* ERROR HANDLING P* PERRPRINT ( P EDWRT SPDSSCRN,BELL ACOUSTIC ALARM 0 P CBE SPBINW4
0x056cc0…056e54 (0, 110) Opaque[0x194]
0x056e54…056fe8 # DirEnt {nam=»BUG «, typ=»LM«, f00=0x1e12, f01=0x5400, f02=0x0378, f03=0x948c}
0x056e54…056fe8 IdxSect {
0x056e54…056fe8 f00 = 0x001b // 0x56e54 @0x0
0x056e54…056fe8 f01 = 0x0004 // 0x56e56 @0x2
0x056e54…056fe8 gno = [ // 0x56e58 @0x4
0x056e54…056fe8 [0x00]: C0x001b.0x3.0
0x056e54…056fe8 [0x01]: C0x001c.0x0.0
0x056e54…056fe8 ]
0x056e54…056fe8 }
0x056fe8…05717c Dummy {f00=0x001b, f01=0x0190, f02=» ( D P A & @ ~ A L 8 A ~ @ A D A @ A F A @ A H ( A @ A J A W 1 P < R:R:L `
0x05717c…057310 Dummy {f00=0x001b, f01=0x0190, f02=» A : N _ v r @ F T :a R T <a Z _ = :A F , >a ` l @ , F v A :P UW B r | @ x R = X / h M Q R S ^ T Y G P H L V I b X 6 r _v h (_ NO! A t
0x057310…0574a4 Dummy {f00=0x001b, f01=0x0190, f02=» r A p_B , @ pP A n1+Xz A n_ , @ x A t @ z A v_ , " @ l @ pT " r ( ^ @ nP A z A x " R @ z F T @ W @ z A ~W W 0 v l F _, W P0 @ z& ~_< l ` _* v T @
0x0574a4…057638 Dummy {f00=0x001b, f01=0x0190, f02=» , ~W 0 F r | P 3P R C @ xP @ z 1 "T @ W @ z A : ` A : A h r A x P 4 @ |_F R 4 T 0 P | &P _ @ z | R @ z @ v @ tP $ 1 Q
0x057638…0577cc Dummy {f00=0x001b, f01=0x0190, f02=» " R @ v ! T A @ @ z A <# A B > p RE RN ME MN P A : @ z A h j A d x( @ L A ~ @ D A @ F A @ H A @ J A > W R: ( T D V $ W ( W P Tz $ ; V ; Wb&~ P &`
0x0577cc…057960 Dummy {f00=0x001b, f01=0x0190, f02=» N ^ P _ " ^ NT @ .9J A 0T _ 1@ _ ^ 9 V >! D A A > > > > > > > > ^ _ ^ _ ? ? ? ? ? A ^ @ , ? ? : > > > > > > > > ? ? ? ?
0x057960…057af4 (0, 111) Dummy {f00=0x001c, f01=0x0190, f02=»R$ 9U AR FQ 0:D A _* A " A $ 4 l F T A & A $ " , R _U . " A ^: ` A ^ " ! R :W W W W ?W / A W ! A A PL _ @ _ I T " T
0x057af4…057c88 Dummy {f00=0x001c, f01=0x0190, f02=»1 T ` L P > @ L > B I R< A :P6 T @ 6T. @ 8P A 8W ` @ @ > @ <P @ B T x A 2P A 0< V A 0 A h x (@ b( @ x _ ? ? ? ? ? A ^ @ , ? ? > > > > > > > > ? ? ? ?
0x057c88…057e1c Dummy {f00=0x001c, f01=0x0190, f02=»P ( R| Pt Pl ) / H D !) ?PH _R( g mP u 6 W W P B H D ! T$ P T W ! % l 3 9 B IP, UT cT y z B 6 B H D ! ? P^ T T T TF P, D T2 U,
0x057e1c…057fb0 Dummy {f00=0x001c, f01=0x40f8, f02=» D U p {P P | R P R P* r H D !? T W # / 7 = C G K o yR . H D !J_ W R Q P( T* T" P z N 0 @ P, D T2 U,
0x057fb0…058144 Dummy {f00=0x001c, f01=0x0190, f02=» F IDENT TA:SK D @ TASKY TASK1 STAR TA:STP LTMAX RTMAX MAXTABK LEVELS LEVTABK TI:TAB h TA:STP ww z TASKY BRTL RTLON , ( 16 @ P @ P 2P 08 A RTRE BLTT
0x058144…0582d8 Dummy {f00=0x001c, f01=0x0190, f02=» S P : A A A A SAVE14 , LFCRN > DELIM N WRITE ^ , ( s$ N n TE:10 READ30 * & I W A @ BTCT , (
0x0582d8…05846c Dummy {f00=0x001c, f01=0x0190, f02=» Z P ww 7 TENBR , ( @ _8 ww 7 0 , ( A ` , ( # W A Z P W , ( A 7 7 CD a A INPERR2 SAV
0x05846c…058600 Dummy {f00=0x001c, f01=0x0190, f02=» M A r LENGTH READ $ , ( : (R & A 4 , ( ( _, : d , ( T @ $ a 62Q 51R ! 0 , ( R Q P A a _ A , ( ) @ a
0x058600…058794 (0, 112) Opaque[0x194]
0x058794…058928 # DirEnt {nam=»SUM «, typ=»LM«, f00=0x8226, f01=0x3ae1, f02=0x0388, f03=0x0002}
0x058794…058928 IdxSect {
0x058794…058928 f00 = 0x001c // 0x58794 @0x0
0x058794…058928 f01 = 0x0004 // 0x58796 @0x2
0x058794…058928 gno = [ // 0x58798 @0x4
0x058794…058928 [0x00]: C0x001c.0x1.0
0x058794…058928 [0x01]: C0x001c.0x2.0
0x058794…058928 ]
0x058794…058928 }
0x058928…058abc Dummy {f00=0x001c, f01=0x0190, f02=» D J y T @ > : 2Z "z yZ SC F z $ B @ | 6 6 A z V ` ~ T @ J D ' ;a<a R * r x t D L R L A L N W W x Z | @ z
0x058abc…058c50 Dummy {f00=0x001c, f01=0x0190, f02=» 0SUM 1.3 (780329) *** SAVED FILES WITH GRANULE ADDRESSES ************** DATE OF RUN: YYMMDD 0SAVE USER/DISC ONTO MAGTAPE STATISTICS TOTAL NUMBER OF SAVED USERS: SAVED FILES: SAVED GRANULES: A t V USERID:
0x058c50…058de4 Dummy {f00=0x001c, f01=0x0190, f02=» , TOTAL SIZE OF LIB: @ , A J A , z A & :$ A @ zV N N T V 9! A , zV z @ zV(W @ zV " T N ( Z2 @ zV @ V D V _ A * :
0x058de4…058f78 Dummy {f00=0x001c, f01=0x0190, f02=» 0SUM 1.3 (780329) *** SAVED FILES WITH GRANULE ADDRESSES ************** DATE OF RUN: YYMMDD 0SAVE USER/DISC ONTO MAGTAPE STATISTICS TOTAL NUMBER OF SAVED USERS: SAVED FILES: SAVED GRANULES: A t USERID:
0x058f78…05910c Dummy {f00=0x001c, f01=0x0190, f02=» " @ . " 0READING ERROR ON MT " STATUS WORD: ( W ?B?e + A A ( @ T2 : (W , A p A ~ ( Y : A ]B " 0TOO MANY I/O ERRORS ON DISC P . @ . "* XXXXING SE
0x05910c…0592a0 Dummy {f00=0x001c, f01=0x0190, f02=» A ( A A ! X !XXT ( ( @ ! : A A ( : V NP W A A ( ES O A o VW ! T _ !//T ( _ 0Z2 U ]@ YF< Y< ZT A x (
0x0592a0…059434 (0, 113) Dummy {f00=0x001c, f01=0x0190, f02=» ETC.? < $" = @ A A A : A W @ n A A A U t ( @ @ A A ( : U x BW @ #U. ~ A @ A p @ A : ; [ [ [ Z Z Z : : < , =
0x059434…0595c8 Dummy {f00=0x001c, f01=0x0190, f02=» Y : @ nY : @ U t : @ A R _ : d A : ( : V NP W A A ( ES O A VW ! T _ !//T 1 0Z2 U ]@ YF< Y< ZT A x (
0x0595c8…05975c Dummy {f00=0x001c, f01=0x0190, f02=» ETC.? < $" = @ A A A : A W @ Z V Z W Z R` P WX [ WD ; ZT L v : : W _" * 4X X [ Z _ * TV 4P P _ WJ U
0x05975c…0598f0 Dummy {f00=0x001c, f01=0x0190, f02=» _ L_ _ 1Y _ 1Y L P , 0^& Q (_8 , %Q R Y W W Z ' [ : ; [ [ [ [ [ R Q @ 6 - WJ @ 4 - A H R( X @ R X @ _ Q @ HX A H T 6 - _. D 6 - Z Z Z Z Z : :- 0123456789
0x0598f0…059a84 Dummy {f00=0x001c, f01=0x401e, f02=» N @ IDISPL " IDISPL 4 , ( ; [ [ [ [ [ R Q H , ( ! @ - W @ - A x , ( A R X R X _ Q @ X A , ( a T - _. D - Z Z Z , (
0x059a84…059c18 Dummy {f00=0x001c, f01=0x4058, f02=» F IDENT P:END P:END P:END 0 B@ T
0x059c18…059dac Dummy {f00=0x001c, f01=0x2008, f02=» ,
0x059dac…059f40 Dummy {f00=0x001c, f01=0x0190, f02=» d ^ PANS EQU * e P LDK.L A1,/FFC0 e $ P ANS A1,SEEK e F P ANS A1,CIO5 e h P ANS A1,CIO2 e P ANS A1,SEEK0 e P ANS A1,CIO3 e P ANS A1,VAL
0x059f40…05a0d4 (0, 114) Opaque[0x194]
0x05a0d4…05a268 # DirEnt {nam=»RUM «, typ=»LM«, f00=0x5600, f01=0x1908, f02=0x0398, f03=0x1502}
0x05a0d4…05a268 IdxSect {
0x05a0d4…05a268 f00 = 0x001c // 0x5a0d4 @0x0
0x05a0d4…05a268 f01 = 0x0004 // 0x5a0d6 @0x2
0x05a0d4…05a268 gno = [ // 0x5a0d8 @0x4
0x05a0d4…05a268 [0x00]: C0x001c.0x3.0
0x05a0d4…05a268 [0x01]: C0x001d.0x0.0
0x05a0d4…05a268 ]
0x05a0d4…05a268 }
0x05a268…05a3fc Dummy {f00=0x001c, f01=0x0190, f02=» l y T @ > : 2Z "z yZ SC F z $ } F[ " R>n +u PK w [ 6Ad +b% j @ ] d A V b @ D 4D;a<a * A A A R$S D L R(
0x05a3fc…05a590 Dummy {f00=0x001c, f01=0x0190, f02=» @Z b 8 8 8 @ 8Y,_ ERR. DIRECTORY ON MT ABNORMAL EXIT. W ( Z 9 0RUM 1.3 (780329) *** RESTORED FILES WITH GRANULE ADDRESSES ************** DATE OF RUN: YYMMDD 0RESTORE USER/DISC FROM MAG
0x05a590…05a724 Dummy {f00=0x001c, f01=0x0190, f02=» A A ( @ T2 : W A * A < 8 Y : A ]B 0TOO MANY I/O ERRORS ON DISC P l @ l * XXXXING SECTOR: XXXX, STATUS WORD: XXXX ( READWRIT A ( @ P P,QT
0x05a724…05a8b8 Dummy {f00=0x001c, f01=0x0190, f02=»G ERROR ON MT STATUS WORD: T& @ LENGTH ERROR _v ( : A Z A A T $ $ @ D H A P $W D * A " @ ZQ @ VT T A ZW A N A Z
0x05a8b8…05aa4c Dummy {f00=0x001c, f01=0x0190, f02=» @ @ V 8 T @ T @ V 8 @ A @ A @ : $ $ T : DISC OVFL W 0CATALOG OVFL @ WHEN CREATING USER UUUUUUUU NEW USERID: N:
0x05aa4c…05abe0 Dummy {f00=0x001c, f01=0x0190, f02=»G ERROR ON MT STATUS WORD: T& @ A p VT L T RW A N A A V6 , @ , | @ | | J @ N 9! A V P R P 0DISC OVFL W * V8 N 9!
0x05abe0…05ad74 (0, 115) Dummy {f00=0x001d, f01=0x0190, f02=» N W T P P @ NZ A : @ 3 @ D * WHEN RESTORING FFFFFFTT OF USER UUUUUUUU @ A @ J ]x _ W S UNEXPECTED TAPE MARK A RESTORED FILE NO GOOD _ < $" = " A A
0x05ad74…05af08 Dummy {f00=0x001d, f01=0x0190, f02=» X A T - _. D - Z Z Z Z Z : :- 0123456789 d ' A A ( A A ! X !XXT ( ( @ ! : A A ( : NP * W . A A ( ES O A W !
0x05af08…05b09c Dummy {f00=0x001d, f01=0x0190, f02=» Z : ?? DISC FILE CODE ? OK ? LISTING OF FILENAMES ETC.? < $" = @ A A T A : A W @ J n A A J A NU ( @ @ A A ( : R U W @ N #U. A L @ L A
0x05b09c…05b230 Dummy {f00=0x001d, f01=0x0190, f02=» " :d H V - " H V - :0123456789ABCDEF A w9h < _@ - Y : @ J nY : @ NU : @ J A JR D_ J : A J : ( : NP W A A ( ES O A W !
0x05b230…05b3c4 Dummy {f00=0x001d, f01=0x0190, f02=» PAGE: ?? DISC FILE CODE ? OK ? LISTING OF FILENAMES ETC.? < $" = @ A A A : A W @ Z V Z W Z R` P WX [ WD ; T : : W
0x05b3c4…05b558 Dummy {f00=0x001d, f01=0x0190, f02=» O O W O U W W b A x P @ x : _ _ _ 1Y _ 1Y P 0^& Q _8 , %Q R Y W W Z ' [ : V T(= @ N M P A N _ @ N V I P _ U * W @ N
0x05b558…05b6ec Dummy {f00=0x001d, f01=0x0190, f02=» PAGE: ?? DISC FILE CODE ? OK ? LISTING OF FILENAMES ETC.? < $" = @ A A A : A W @ Z V Z W Z R P W [ W ; T : : W
0x05b6ec…05b880 Dummy {f00=0x001d, f01=0x0190, f02=» < W H - 9W: H - 9W. ;c ` "Q( $ ,` A a <` @ "+ $ @ " : W _ 1Y P 0^& Q _8 , %Q R Y W W Z ' [ : V T(= @ N M P A N _ @ N V I P _ U * W @ N
0x05b880…05ba14 (0, 116) Opaque[0x194]
0x05ba14…05bba8 # DirEnt {nam=»DUMPA «, typ=»LM«, f00=0x9da0, f01=0x0001, f02=0x03a8, f03=0x5f28}
0x05ba14…05bba8 IdxSect {
0x05ba14…05bba8 f00 = 0x001d // 0x5ba14 @0x0
0x05ba14…05bba8 f01 = 0x000a // 0x5ba16 @0x2
0x05ba14…05bba8 gno = [ // 0x5ba18 @0x4
0x05ba14…05bba8 [0x00]: C0x001d.0x1.0
0x05ba14…05bba8 [0x01]: C0x001d.0x2.0
0x05ba14…05bba8 [0x02]: C0x001d.0x3.0
0x05ba14…05bba8 [0x03]: C0x001e.0x0.0
0x05ba14…05bba8 [0x04]: C0x001e.0x1.0
0x05ba14…05bba8 ]
0x05ba14…05bba8 }
0x05bba8…05bd3c Dummy {f00=0x001d, f01=0x0190, f02=» l !0* y T @ > : 2Z "z yZ SC F z $ } F[ " R>n +u PK w [ 6Ad +b% j , * @, @, d ~ @ v @ l FLT T W A h A nQ P A r_B v A pT A n : :'
0x05bd3c…05bed0 Dummy {f00=0x001d, f01=0x0190, f02=» r L ` ~ A r : 8 ` = r = R 0W 1 r Y Y ~ = YF> X ` F 0 NO DATA.W END OF VOLUME W END OF TAPE Wn BEGIN OF TAPE WL END OF SEGMENT A jW END OF FILE A l A j @ n
0x05bed0…05c064 Dummy {f00=0x001d, f01=0x0190, f02=»% PARITY ERRORW DUMP IN C F z BLOCK NO: SIZE: UNKNOWN STATUS WORD: BLOCKS SKIPPED. PRINTED: ' U8 ! T r ! T r 4 | 4 z# T . 9 Y< F " r ` " r Q ~ Yx
0x05c064…05c1f8 Dummy {f00=0x001d, f01=0x0190, f02=» @ A A A : A W @ n A A ( A U ( ( @ @ A A d ( : U d W @ #U. A @ . A p @ h ~ A : ; [ [ [ Z Z Z : : < , = = $ - Y
0x05c1f8…05c38c Dummy {f00=0x001d, f01=0x0190, f02=»U : @ A R _ : . A : SIZE: UNKNOWN STATUS WORD: BLOCKS SKIPPED. PRINTED: ' U8 ! T ! T 1 4 # T . 9 Y< F " " Q Yx
0x05c38c…05c520 Dummy {f00=0x001d, f01=0x0190, f02=» @ A A A : A W @ ! R ?U : : $ - - Y : @ 4 Q $ . ^ 1 ~ Y f ` x ` ~ $ ` ~ ~ T T ` ^ @, @, `
0x05c520…05c6b4 (0, 117) Dummy {f00=0x001d, f01=0x0190, f02=»: : FORMAT: R EDITDT EDLOOP DATFLD SLASK CVALOP TIMFLDN LOOPT TXT5E f TXT5:L8 TXT6U x TXT6:LT TXT1E TXT1:LE $ LOOOP 6 TXTAB LENTABN TXT4B TXT3 TXT2 TXT4:L TXT3:L TXT2:L@ A h @ l FLP 1 ( : ( *
0x05c6b4…05c848 Dummy {f00=0x001d, f01=0x0190, f02=» * : j( : - - Y : @ 4 Q $ ^ 1 ~ Y ` ` ~ ` ~ ~ T T ` ^ @ @ `
0x05c848…05c9dc Dummy {f00=0x001d, f01=0x0190, f02=»: : FORMAT: R EDITDT EDLOOP DATFLD SLASK CVALOP TIMFLDN LOOPT TXT5E f TXT5:L8 TXT6U x TXT6:LT TXT1E TXT1:LE $ LOOOP 6 TXTAB LENTABN TXT4B TXT3 TXT2 TXT4:L TXT3:L TXT2:L@ A @ FLP 1 ( : (
0x05c9dc…05cb70 Dummy {f00=0x001d, f01=0x0190, f02=» : ( : - - Y : @ 4 Q $ ^ 1 ~ Y ` ` ~ ` ~ ~ T T ` ^ @ @ `
0x05cb70…05cd04 Dummy {f00=0x001d, f01=0x0190, f02=»: : FORMAT: R EDITDT EDLOOP DATFLD SLASK CVALOP TIMFLDN LOOPT TXT5E f TXT5:L8 TXT6U x TXT6:LT TXT1E TXT1:LE $ LOOOP 6 TXTAB LENTABN TXT4B TXT3 TXT2 TXT4:L TXT3:L TXT2:L@ A @ FLP 1 ( : (
0x05cd04…05ce98 Dummy {f00=0x001d, f01=0x0190, f02=» : ( : - - Y : @ 4 Q $ ^ 1 ~ Y ` ` ~ ` ~ ~ T T ` ^ @ @ `
0x05ce98…05d02c Dummy {f00=0x001d, f01=0x0190, f02=»: : FORMAT: R EDITDT EDLOOP DATFLD SLASK CVALOP TIMFLDN LOOPT TXT5E f TXT5:L8 TXT6U x TXT6:LT TXT1E TXT1:LE $ LOOOP 6 TXTAB LENTABN TXT4B TXT3 TXT2 TXT4:L TXT3:L TXT2:L@ A @ FLP 1 ( : (
0x05d02c…05d1c0 Dummy {f00=0x001d, f01=0x0190, f02=» : ( : - - Y : @ 4 Q $ ^ 1 ~ Y ` ` ~ ` ~ ~ T T ` ^ @ @ `
0x05d1c0…05d354 (0, 118) Dummy {f00=0x001d, f01=0x0190, f02=»: : FORMAT: R EDITDT EDLOOP DATFLD SLASK CVALOP TIMFLDN LOOPT TXT5E f TXT5:L8 TXT6U x TXT6:LT TXT1E TXT1:LE $ LOOOP 6 TXTAB LENTABN TXT4B TXT3 TXT2 TXT4:L TXT3:L TXT2:L@ A @ FLP 1 ( : (
0x05d354…05d4e8 Dummy {f00=0x001d, f01=0x0190, f02=» : ( : - - Y : @ 4 Q $ ^ 1 ~ Y ` ` ~ ` ~ ~ T T ` ^ @ @ `
0x05d4e8…05d67c Dummy {f00=0x001d, f01=0x0190, f02=»: : FORMAT: R EDITDT EDLOOP DATFLD SLASK CVALOP TIMFLDN LOOPT TXT5E f TXT5:L8 TXT6U x TXT6:LT TXT1E TXT1:LE $ LOOOP 6 TXTAB LENTABN TXT4B TXT3 TXT2 TXT4:L TXT3:L TXT2:L@ A @ FLP 1 ( : (
0x05d67c…05d810 Dummy {f00=0x001d, f01=0x0190, f02=» : ( : - - Y : @ 4 Q $ ^ 1 ~ Y ` ` ~ ` ~ ~ T T ` ^ @ @ `
0x05d810…05d9a4 Dummy {f00=0x001d, f01=0x0190, f02=»: : FORMAT: R vDLOOP DATFLD SLASK CVALOP TIMFLDN LOOPT TXT5E f TXT5:L8 TXT6U x TXT6:LT TXT1E TXT1:LE $ LOOOP 6 TXTAB LENTABN TXT4B TXT3 TXT2 TXT4:L TXT3:L TXT2:L@ A @ FLP 1 ( : (
0x05d9a4…05db38 Dummy {f00=0x001d, f01=0x0190, f02=» : ( : - - Y : @ 4 Q $ ^ 1 ~ Y ` ` ~ ` ~ ~ T T ` ^ @ @ `
0x05db38…05dccc Dummy {f00=0x001d, f01=0x0190, f02=»: : FORMAT: R vDLOOP DATFLD SLASK CVALOP TIMFLDN LOOPT TXT5E f TXT5:L8 TXT6U x TXT6:LT TXT1E TXT1:LE $ LOOOP 6 TXTAB LENTABN TXT4B TXT3 TXT2 TXT4:L TXT3:L TXT2:L@ A @ FLP 1 ( : (
0x05dccc…05de60 Dummy {f00=0x001d, f01=0x0190, f02=» : ( : - - Y : @ 4 Q $ ^ 1 ~ Y ` ` ~ ` ~ ~ T T ` ^ @ @ `
0x05de60…05dff4 (0, 119) Dummy {f00=0x001e, f01=0x0190, f02=»: : FORMAT: R vDLOOP DATFLD SLASK CVALOP TIMFLDN LOOPT TXT5E f TXT5:L8 TXT6U x TXT6:LT TXT1E TXT1:LE $ LOOOP 6 TXTAB LENTABN TXT4B TXT3 TXT2 TXT4:L TXT3:L TXT2:L@ A @ FLP 1 ( : (
0x05dff4…05e188 Dummy {f00=0x001e, f01=0x0190, f02=» : ( : - - Y : @ 4 Q $ ^ 1 ~ Y ` ` ~ ` ~ ~ T T ` ^ @ @ `
0x05e188…05e31c Dummy {f00=0x001e, f01=0x0190, f02=»: : FORMAT: R vDLOOP DATFLD SLASK CVALOP TIMFLDN LOOPT TXT5E f TXT5:L8 TXT6U x TXT6:LT TXT1E TXT1:LE $ LOOOP 6 TXTAB LENTABN TXT4B TXT3 TXT2 TXT4:L TXT3:L TXT2:L@ A @ FLP 1 ( : (
0x05e31c…05e4b0 Dummy {f00=0x001e, f01=0x0190, f02=» : ( : - - Y : @ 4 Q $ ^ 1 ~ Y ` ` ~ ` ~ ~ T T ` ^ @ @ `
0x05e4b0…05e644 Dummy {f00=0x001e, f01=0x0190, f02=»: : FORMAT: R vDLOOP DATFLD SLASK CVALOP TIMFLDN LOOPT TXT5E f TXT5:L8 TXT6U x TXT6:LT TXT1E TXT1:LE $ LOOOP 6 TXTAB LENTABN TXT4B TXT3 TXT2 TXT4:L TXT3:L TXT2:L@ A @ FLP 1 ( : (
0x05e644…05e7d8 Dummy {f00=0x001e, f01=0x0190, f02=» : ( : - - Y : @ 4 Q $ ^ 1 ~ Y ` ` ~ ` ~ ~ T T ` ^ @ @ `
0x05e7d8…05e96c Dummy {f00=0x001e, f01=0x0190, f02=»: : FORMAT: R vDLOOP DATFLD SLASK CVALOP TIMFLDN LOOPT TXT5E f TXT5:L8 TXT6U x TXT6:LT TXT1E TXT1:LE $ LOOOP 6 TXTAB LENTABN TXT4B TXT3 TXT2 TXT4:L TXT3:L TXT2:L@ A @ FLP 1 ( : (
0x05e96c…05eb00 Dummy {f00=0x001e, f01=0x0190, f02=», A, +H !AAPN !EE , , 8 d Y A, /* A A/ A, , A, +H !HHPB !EE W A, , A, +H !HHP" !AA / A r A, A, A, A,3 + ,< A,: + : , ,@ : [ R 8 !--P # 0Z Y" W W 9H [ : T ` ^ @ @
0x05eb00…05ec94 (0, 120) Dummy {f00=0x001e, f01=0x0190, f02=», ( , A, A, , ( W : @, @, R 8 ! T Y : ,h( : ,t 0DUMPA REL 1.2 , , , ASCII OR EBCDIC ? ASCII OR HEXA/ASCII ? C: , Q1:LM yECB, QUEST1 , GETPARN+H HEXAQA * TABLEN MOVTABL
0x05ec94…05ee28 Dummy {f00=0x001e, f01=0x0190, f02=»,: PRMPTPX+ QUESTN , GETP ,@ SCANT+R EOLS +| HYPHS+x RETURS +~ STAKT+ INBUFF , EXITR+ SKIPP+ NOARG+ DIGSN+ yEOL+ HYPH2+ SETCTRK+ LKM3T+ PROMPT , PRPT:L IBF:L SPALOPT,( LOOPP,H L001 ,X L002L,Z CTWECB ,h TEXT1,t CODE1, CODE2, ASCII, ; [ [
0x05ee28…05efbc Dummy {f00=0x001e, f01=0x0190, f02=» Z Z Z : :- 0123456789 d ' ! @R @R @R L/ : : .<(+?& !$*); ??? &%->? :#@'=" ABCDEFGHI JKLMNOPQR STUVWXYZ 0123456789 ( R * / Y _ : z & P$ U ?V W _ rW 0
0x05efbc…05f150 Dummy {f00=0x001e, f01=0x0190, f02=» ( P* FUNCTION TO MOVE DATE AND TIME $ P* FROM CVT TO OUTPUT BUFFERS. 4 P* P* PARAMETERS: f P* A1 - POINTER TO CVT ~ * P* A3 - POINTER TO OUTPUT BUFFER P* P* WORKING REGS: P* PEDITDT EQU
0x05f150…05f2e4 Dummy {f00=0x001e, f01=0x0190, f02=»5,A3 P ADK A3,2 P ADK A1,2 P SUK A4,1 0 P RB(P) EDLOOP B P RETURN X P EJECT h P* v PTITLE EQU * P* * P* FIRST GET DATE AND TIME FROM CVT P* P LD A1,/82 CVT POINTER P ADK A1,28 P L
0x05f2e4…05f478 Dummy {f00=0x001e, f01=0x0190, f02=» P* P LDR A5,A1 CVT-POINTER TO A5 P ADK A5,4 SECONDS FIRST 2 P LDKL A6,SLASK+5 R P LDK A4,2 LOOP COUNTER j P* PCVALOP LDR* A1,A5 & P ADK A1,160 100 MORE TO MAKE SHURE ( P LDR A4,A4 IDISPL USES 3 POSITIONS. P RF(P)
0x05f478…05f60c Dummy {f00=0x001e, f01=0x0190, f02=»CVALOP P* P LDKL A1,SLASK+2 P LDKL A3,TIMFLD 0 P CALL EDITDT H P EJECT P CALL PRINTK j $ P DATA /0231 SKIP TO TOP OF FORM ~ P LDK LCTR,8 " PLOOP CALL SPACE 8 EMPTY LINES P SUK LCTR,1 P RB(P) LOOP P
0x05f60c…05f7a0 Dummy {f00=0x001e, f01=0x018e, f02=» P LDK LCTR,4 PLOOOP CALL PRTBUF P CALL SPACE 2 P LDK A2,25 F P CALL TAB X P LD A1,TXTAB,LCTR j P LD A2,LENTAB,LCTR P CALL OUTTXT P SUK LCTR,2 P RB(NN) LOOOP P* P LD A1,FMTID P LD A2,FMTID+2
0x05f7a0…05f934 (0, 121) Opaque[0x194]
0x05f934…05fac8 # DirEnt {nam=»PM6800«, typ=»LM«, f00=0x4dc0, f01=0x5c04, f02=0x03d0, f03=0x001f}
0x05f934…05fac8 IdxSect {
0x05f934…05fac8 f00 = 0x001e // 0x5f934 @0x0
0x05f934…05fac8 f01 = 0x0006 // 0x5f936 @0x2
0x05f934…05fac8 gno = [ // 0x5f938 @0x4
0x05f934…05fac8 [0x00]: C0x001e.0x2.0
0x05f934…05fac8 [0x01]: C0x001e.0x3.0
0x05f934…05fac8 [0x02]: C0x001f.0x0.0
0x05f934…05fac8 ]
0x05f934…05fac8 }
0x05fac8…05fc5c Dummy {f00=0x001e, f01=0x0190, f02=» ; :P _ , ) Y %? ~ =L=k ] z ] | 9BR " " 9B W$ :K T :A :A :a :i q r E x T 4 &: 4: V - P Y _( Y
0x05fc5c…05fdf0 Dummy {f00=0x001e, f01=0x0190, f02=»ATION OF PM6800 REL 2.4 - PREMARK FOR 1215-DISC NBR. OF CYLINDERS = NBR. OF TRACKS = NBR. OF SECTORS/TRACK = DISK TYPE : DISC FILE CODE = UNFORMATTED DISC. VOLUME LABEL MISSING DISC NOT OPERATIONAL OK ? -WRITING THE IDENTIFIERS CHECKI
0x05fdf0…05ff84 Dummy {f00=0x001e, f01=0x0190, f02=» -GRANULE 0 IS BAD NO SYSTEM USER POSSIBLE -NBR. OF BAD GRANULES = RUN AGAIN ? : END OF PM6800 LABEL = DATE = PACK NBR = x T 4 &: 4: V - P Y _( Y
0x05ff84…060118 Dummy {f00=0x001e, f01=0x0190, f02=» CATALOG
0x060118…0602ac Dummy {f00=0x001e, f01=0x0190, f02=» x T 4 &: 4: V - P Y _( Y
0x0602ac…060440 Dummy {f00=0x001e, f01=0x0190, f02=» CATALOG
0x060440…0605d4 (0, 122) Dummy {f00=0x001e, f01=0x0190, f02=» P _ 9g :I P 9A A CM A f A A h A j h 0 @ h F0Z8 F3Y> r 00 @ h H $_T T8 T P $$ A ( Wd $$ A > $$ A E T A h A j h 0 @ h NOT r_
0x0605d4…060768 Dummy {f00=0x001e, f01=0x0190, f02=» r 0 r 0 r @ @ @ @ A A A A 0 r @ NOT T UN KN OW N A A A A @ ! 9A q A A 8 A : A > @ ` $$ A I A X A A ^
0x060768…0608fc Dummy {f00=0x001e, f01=0x0190, f02=» T A XF I F P |! T A @ ! PX_| , @ @ @ t @ A A ` I A A ` A @ > @ @W @ > @ @ @ P& A A 9A: " @ :A A > A @ A O > @ @ > @ 9@ A 9@ O $$
0x0608fc…060a90 Dummy {f00=0x001e, f01=0x0190, f02=» T A XP @ # Td @ > @ @ A A 9A: " @ :A A > A @! T: A @ T @ > O > N A @ @ A _ $I F P |! TF @ @ T8 A @ ! P _ @ T @ > O > A d @ @ @ t @ A
0x060a90…060c24 Dummy {f00=0x001e, f01=0x0190, f02=» ` @ > @ 9@ A 9@ O @ 9AR r P ? A I F P | A @ T A A I F P | @ @ @ @ @ @ @ A A A A A A A @ ` @ b @ d @ f @ h @ j @ l n
0x060c24…060db8 Dummy {f00=0x001e, f01=0x0190, f02=» A A A A b A d A f A h A j A l A n p r t A ` A I F P | @ @ @ @ @ @ @ A ` A b A d A f A h A j A l n p r t A @ T A A I F P | @ @ @ @ @ @ @
0x060db8…060f4c Dummy {f00=0x001e, f01=0x0190, f02=» A r A T A A . A A A A A A A A $ A ^ A J A 2 A | < A h A j h 0 r NO @ hP YE @ h OK @ h D A A ( P $$ A (@( |I ! @ FT : A fY I B | > :I ! @ FP& CP.
0x060f4c…0610e0 Dummy {f00=0x001e, f01=0x0190, f02=»9B A SFY :I ! @ <9a q r @ @ T ! :A ! 9BA S Y : $$ A 2 A h Z A A @ h A A $$ A W H W J W L W N W P A A 9D: " @ :D R 0 P P 9H _4 W H_< W J V H V J V L V N V
0x0610e0…061274 (0, 123) Dummy {f00=0x001f, f01=0x0190, f02=» N V P V H V J V L V N V P W H W J W L W N W P H L T P*_ 0R" 9Q 0 P* 9C L _( V H V J V L V N V P W H V H V J V L V N V P 0 R _ A A 9H: " @ :H 0 dR _ A 9H: " @ :H 0 d R _ A 9H: " @
0x061274…061408 Dummy {f00=0x001f, f01=0x0190, f02=» $ @ ( : $( @ ( : A ( A & A $ A & A ((@ $( A & A ( $( @ ( :(@ A A A A A I @ (] @ " @ $ A @ " @ , Q @ Y @ @ & R , Q @ _ ( @ @ @ @ @ : @ J V L V N V
0x061408…06159c Dummy {f00=0x001f, f01=0x0190, f02=» N V P V H V # C C C (@( B : 0 "! #(@( B : 9C L _( V H V J V L V N V P W H V H V J V L V N V P 0 R _ A A 9H: " @ :H 0 dR _ A 9H: " @ :H 0 d R _ A 9H: " @
0x06159c…061730 Dummy {f00=0x001f, f01=0x0190, f02=» GET DISC UNIT FILE CODE ASSIGNMENT 0 P ST A1,DUPAD 1 , P ADS A1,SEEK 1 N P ADS A1,CIO5 1 p P ADS A1,CIO2 1 P ADS A1,SEEK0 1 P ADS A1,CIO4 1 P ADS
0x061730…0618c4 Dummy {f00=0x001f, f01=0x0190, f02=» A1,SST1 1 P ADS A1,CIOSEK 2 P ADS A1,CIO6 2 6 P ADS A1,WRTE 2 X P ADS A1,CIO7 2 z P ADS A1,READ 2 P ADS A1,CIO8 2 P ADS A1,CIO9 2 P
0x0618c4…061a58 Dummy {f00=0x001f, f01=0x0190, f02=» CF A14,ASROUT 'LABEL' * 2 2 P LDK.L A7,LABEL * 3 4 P LDK A6,8 3 j 2 P CF A14,ASRIN * 3 P CF A14,LPOUT 3 2 P LDK.L A7,MESS13
0x061a58…061bec Dummy {f00=0x001f, f01=0x0190, f02=» * 3 p P LDK A6,8 4 2 P CF A14,ASRIN * 4 ( P CF A14,LPOUT 4 ^ 2 P LDK.L A7,MESS14 * 4 P LDK A6,12 4 2 P CF A14,ASROUT 'PACK NBR.' * 4 2 P
0x061bec…061d80 Dummy {f00=0x001f, f01=0x0190, f02=» CF A14,LPOUT 4 P LD A1,MXONE-8 5 P LD A2,MXONE-6 5 B P LD A3,MXONE-4 5 f P LD A4,MXONE-2 5 P ST A1,USERID 5 " P ST A2,USERID+2 5 " P ST
0x061d80…061f14 (0, 124) Opaque[0x194]
0x061f14…0620a8 # DirEnt {nam=»MONFLX«, typ=»LM«, f00=0x855d, f01=0x0000, f02=0x03e8, f03=0x3d49}
0x061f14…0620a8 IdxSect {
0x061f14…0620a8 f00 = 0x001f // 0x61f14 @0x0
0x061f14…0620a8 f01 = 0x0004 // 0x61f16 @0x2
0x061f14…0620a8 gno = [ // 0x61f18 @0x4
0x061f14…0620a8 [0x00]: C0x001f.0x1.0
0x061f14…0620a8 [0x01]: C0x001f.0x2.0
0x061f14…0620a8 ]
0x061f14…0620a8 }
0x0620a8…06223c Dummy {f00=0x001f, f01=0x0190, f02=» j R n W W W A B. F A . P&
0x06223c…0623d0 Dummy {f00=0x001f, f01=0x0190, f02=»P T A. P Y(_8 _J Pd pU p xU x_ A 9a @ :a S @ :a U _n P _ 7 G. @ ' ?D A ' P G O . @ $ T $ T Z A 5 T ? N ? P ? r ? p_ ( @ 9H
0x0623d0…062564 Dummy {f00=0x001f, f01=0x0190, f02=» A > > > > > >W ? @ _ > > : ? ? ? ? T ? V_& @ P ^ 9j U Y >_` A ( ? ? ? ? ? ? ? > > H ( P c P : ? ? @ P A @ (V ( U P @ V L P U
0x062564…0626f8 Dummy {f00=0x001f, f01=0x0190, f02=» A A fQ A h ? ? ? ? ? ^ A _ _ ^ ? ? ? T $P E ^ 5 ) 2 W W T T. P L U U U U T U U z z 4 T - 1_& U T P 0 U
0x0626f8…06288c Dummy {f00=0x001f, f01=0x0190, f02=»T> ^W8 > _& @ 8 R" Y T ? X D ^T ^W > _& W > 8 X W ? ` @ @ P $X H W W W X P T R X P X T 4 Y X ^ X T X ^ Y Y X P$ - M Y X P P W > > > > > > > >
0x06288c…062a20 Dummy {f00=0x001f, f01=0x0190, f02=» c f t T 8PR 9WD P P B A dW B A d @ dA.W A I.9 :A X R C T A @ dA. X V 9_: ` @ b X ! Y & X * ! Y T &P P W P P: P P2 P P" P,
0x062a20…062bb4 (0, 125) Dummy {f00=0x001f, f01=0x0190, f02=» : ! # T X Y * X & 0 ! Y &# T X Y *_ Y HW Y H Y D Y F Y B S W W B C T Y _ * Y X T X Y Y X $P y $_F $ _V Y $ X * P Y : ! ! X # P Y *:A , X Y
0x062bb4…062d48 Dummy {f00=0x001f, f01=0x0190, f02=» ? ? K * X ;ARH;a X "P Y " P 7P( < <A $ <C ! 9 4 X > _ W B R: T P W U ] W : B R Q 9C B ! T 4 F P ;A _ 4 A &;D A & 4
0x062d48…062edc Dummy {f00=0x001f, f01=0x0190, f02=» P L _J ^ 4 _ z z @ d 1 A d _ P 9 t L * 0 6 < B H N T Z ` f l r x ~ N < $
0x062edc…063070 Dummy {f00=0x001f, f01=0x0190, f02=» P H T~ H Pn H Pr I Y # C C '? Y ^ X P Y W Y T # P W @ P L z Y x 8W T 8P Y ^ 5 ) P U W C P "Z Y _ V_ * X4 @ P L _B
0x063070…063204 Dummy {f00=0x001f, f01=0x0190, f02=»DWT v P EJECT P* P* $ P* SELECT RECORDER . P* H P* R & PTCDA30 LDKL A8,STB LOAD STACK BASE P CF A8,SELECT SELECT CASSETT P LDR A1,A2 SAVE STATUS , P LDK A4,RTRIES PRESET NUMBER OF RETRIES " P LDKL A2,0 GET F
0x063204…063398 Dummy {f00=0x001f, f01=0x0190, f02=»,TM,REWIND,LOAD,UNLOAD n P IFT REVER=1 P DATA REVERS,ERTAPE,OLOCK 2 P XIF T P EJECT ` P* n P* x P* RECOVERY AFTER POWER ON P* P* PTCDRON EQU * P CF A15,SAVE8 P LDKL A8,STB LOAD STACK BASE P L
0x063398…06352c Dummy {f00=0x001f, f01=0x018e, f02=»RY | P XIF P LDKL A4,0 GET ACTIVE DWT , PTCDADT EQU *-2 **ACTIVATED DWT ADDRESS** 8 $ P RF(Z) ENDIO NO REQUEST GOING ON h $ P LDR A6,A4 PUT DWT ADDRESS IN A6 " P LD A3,SEKBYT,A6 SEQ. COUNTING ( P RB(Z) TCDA30 YES; REACTIVATE ORDER *
0x06352c…0636c0 Dummy {f00=0x001f, f01=0x0190, f02=» P EJECT P* R E A D P* READ ONE RECORD & P* B PREAD EQU * L " PREAD10 CF A8,READR READ RECORD ^ P ANKL A1,/400 SAVE EOT-BIT P ORR A1,A2 P ANK A2,/0E P RF(Z) READ20 STATUS OK & PREAD15 SUK A4,1 RECOVERABLE
0x0636c0…063854 (0, 126) Opaque[0x194]
0x063854…0639e8 # DirEnt {nam=»FLXCOP«, typ=»LM«, f00=0x0009, f01=0x2020, f02=0x03f8, f03=0x2020}
0x063854…0639e8 IdxSect {
0x063854…0639e8 f00 = 0x001f // 0x63854 @0x0
0x063854…0639e8 f01 = 0x0004 // 0x63856 @0x2
0x063854…0639e8 gno = [ // 0x63858 @0x4
0x063854…0639e8 [0x00]: C0x001f.0x3.0
0x063854…0639e8 [0x01]: C0x0020.0x0.0
0x063854…0639e8 ]
0x063854…0639e8 }
0x0639e8…063b7c Dummy {f00=0x001f, f01=0x0190, f02=» p y L @ yR ); > } z $ | t >1 " R>fj +u &K w [ . d +b% L @M 9"~ T 9 A1 R < R:R:L `i Z% |d z ` : t ` | `H > | , m `" T , R<^ s { " @ 7FF
0x063b7c…063d10 Dummy {f00=0x001f, f01=0x0190, f02=» b h ^a : b 9 h i w z" { , J E1c 3 C zc ] , P Z3 m c 'a0 zc Z ]1o } , @Bh 6 4 4` i ` J O PZ p 0 6 tB ~ / B tw z Z | | Z F Z } n z> P N z R:" d z `@ 0 t
0x063d10…063ea4 Dummy {f00=0x001f, f01=0x0190, f02=» z " y L @ yR ); > } z $ | t >1 " R>fj +u &K w [ . d +b% L @M 9"~ T 9 A1 R < R:R:L `i Z% |d z ` : t ` | `H > | , m `" T , R<^ s { " @ 7FF
0x063ea4…064038 Dummy {f00=0x001f, f01=0x0190, f02=» b h ^a : b 9 h i w z" { , J E1c 3 C zc ] , P Z3 m c 'a0 zc Z ]1o } , @Bh 6 4 4` i ` J O PZ p 0 6 tB ~ / B tw z Z | | Z F Z } n z> P N z R:" d z `@ 0 t
0x064038…0641cc Dummy {f00=0x001f, f01=0x0190, f02=» z " y L @ yR ); > } z $ | t >1 " R>fj +u &K w [ . d +b% L @M 9"~ T 9 A1 R < R:R:L `i Z% |d z ` : t ` | `H > | , m `" T , R<^ s { " @ 7FF
0x0641cc…064360 Dummy {f00=0x001f, f01=0x0190, f02=» b h ^a : b 9 h i w z" { , J E1c 3 C zc ] , P Z3 m c 'a0 zc Z ]1o } , @Bh 6 4 4` i ` J O PZ p 0 6 tB ~ / B tw z Z | | Z F Z } n z> P N z R:" d z `@ 0 t
0x064360…0644f4 (0, 127) Dummy {f00=0x0020, f01=0x0190, f02=» z " y L @ yR ); > } z $ | t >1 " R>fj +u &K w [ . d +b% L @M 9"~ T 9 A1 R < R:R:L `i Z% |d z ` : t ` | `H > | , m `" T , R<^ s { " @ 7FF
0x0644f4…064688 Dummy {f00=0x0020, f01=0x0190, f02=» b h ^a : b 9 h i w z" { , J E1c 3 C zc ] , P Z3 m c 'a0 zc Z ]1o } , @Bh 6 4 4` i ` J O PZ p 0 6 tB ~ / B tw z Z | | Z F Z } n z> P N z R:" d z `@ 0 t
0x064688…06481c Dummy {f00=0x0020, f01=0x0190, f02=» z " y L @ yR ); > } z $ | t >1 " R>fj +u &K w [ . d +b% L @M 9"~ T 9 A1 R < R:R:L `i Z% SP( ~( n J @ Z F 4 4 4 B
0x06481c…0649b0 Dummy {f00=0x0020, f01=0x0190, f02=» F ( ( _ F B_(( @ T @ A : X: A ( @ T A A @ A _< Xp 5_& T( ( @ ( " @ * A * . : A $ 4T ( @ ( A " A * " $ @ * A *_B( B
0x0649b0…064b44 Dummy {f00=0x0020, f01=0x0190, f02=»W X ## Y "P Q W ! Y #" J _" B P& ! B , ! P ! Y !I B 9BV !J H B B , ! T _ V ! ! Y Y 4 R:Q " P4 _ " P -T& ! B ! !J Y Y U ! _ WB , ! T ,' HP ! R !__U !
0x064b44…064cd8 Dummy {f00=0x0020, f01=0x0190, f02=»R _ 4 Y " HF ,$ , ! 4!"$&;<>@^_K LLL Lb P P B P B L # +P ! R Q T _ Y " _ ! Y Y U P* T Y "_* P< X2 X6 R( Pj O]B V _J T Y Y " Z Y _b C _X " $ P X " X
0x064cd8…064e6c Dummy {f00=0x0020, f01=0x0190, f02=» R V P P ! Y R Q L< b -_ ? _ X # ! ^ Y _( X Z ! P0 P X _ X " K ! ! X " K L2M MHMZMt P P @ ! W& U ?P Q R ! _ C _$ 6 X Z <BR Y @
0x064e6c…065000 Dummy {f00=0x0020, f01=0x0190, f02=» 9 X 8"@P Y W: Y W2 X P y @ 9_. Y W Y Y W Y Y X Y 8# TJWj P <d R Q 1_ Y W C _. T> X $ T 8# P. P* X $ ( P B V *@ Y X _ N Q Q R4 Q ! 8! P
0x065000…065194 (0, 128) Opaque[0x194]
0x065194…065328 # DirEnt {nam=»MONCOP«, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0408, f03=0x2020}
0x065194…065328 IdxSect {
0x065194…065328 f00 = 0x0020 // 0x65194 @0x0
0x065194…065328 f01 = 0x0004 // 0x65196 @0x2
0x065194…065328 gno = [ // 0x65198 @0x4
0x065194…065328 [0x00]: C0x0020.0x1.0
0x065194…065328 [0x01]: C0x0020.0x2.0
0x065194…065328 ]
0x065194…065328 }
0x065328…0654bc Dummy {f00=0x0020, f01=0x0190, f02=» v W W W A K " UU ( ) ( ) A A A.
0x0654bc…065650 Dummy {f00=0x0020, f01=0x0190, f02=» b Fr ^a : 6 b 9 r i $ Hw z+ { 6&S Nwm 3 C 3 zl 6 P Z<K m c mjv z_ ( @ < @ PX ^ 9j U UL @ ? 4 A T T :J P@ ? ? , ? A >
0x065650…0657e4 Dummy {f00=0x0020, f01=0x0190, f02=» ? ? ? ? ? ? > > H ( P c P ? ? @ P A x @ (V ( U P @ &V L &P U < A A Q > A A ` 8X Q Z P 0 9 _ _& P H H A A Q
0x0657e4…065978 Dummy {f00=0x0020, f01=0x0190, f02=» W W T T. P L U U U U T U U < J 4 T - 1_& U T P 0 U tW" ? @ T 0 A 1 Q Q > Z 0 @ 1 A P P Z ? * 8 " R" Y T ? X D T> W8 > _& @ 8
0x065978…065b0c Dummy {f00=0x0020, f01=0x0190, f02=» X P X T 4 Y < X X T X Y Y X P$ - M Y X P P lW < > > > > > > > > @ 4V ? 4 > _ W ? _ > A. 0 c Q
0x065b0c…065ca0 Dummy {f00=0x0020, f01=0x0190, f02=» H n * * & b 8 Pr X XN# Y ) W` " P P _ :CV + W& T T $ _6#/ X T Y P ) Y C C Y A 8 8 A @ X T " P: A t X P W Y @
0x065ca0…065e34 (0, 129) Dummy {f00=0x0020, f01=0x0190, f02=» _ X<_J Y 8 M # C W _ _ _ _ _ _ _$ _( A J P( @ h P,Q R M -W ,E W M W ;I C X "A A A $ A ( A , A 0 4 # X( T X T :EV W X T Y :DV X Qx :EVp W
0x065e34…065fc8 Dummy {f00=0x0020, f01=0x0190, f02=»_ _ c N | T 8PR 9WD P P B A zW B A z @ zA.W A I.9 :A X R C A @ zA. X V 9_: v @ x X ! ( Y & X * ! Y T &P P W
0x065fc8…06615c Dummy {f00=0x0020, f01=0x0190, f02=» ! " . B B _H ! " P ! (# T X Y * X & F ! ( Y &# T X Y *_ Y HW Y H Y D Y F Y B S W W B C Y _ @ Y X T X Y Y X $P y $_F $ _V Y $ X * P Y : ! (
0x06615c…0662f0 Dummy {f00=0x0020, f01=0x0190, f02=» % % @ I D H FT B > > > > ? ? ? ? K @ X ;ARH;a X "P Y " P 7P( < <A $ <C ! 9 4 X T _ W B R: T P W U ] W : B R Q 9C B ! T 4 r P ;A _ 4 A <;D A < 4
0x0662f0…066484 Dummy {f00=0x0020, f01=0x0190, f02=» n <_0 @ P L t_J ^ 4 _ @ 1 A _ P 9 J " ( b B H N T Z ` f l r x ~
0x066484…066618 Dummy {f00=0x0020, f01=0x0190, f02=» P Y @ P@ X P2 X "P0 P( P H T~ H Pn H Pr I Y # C C '? Y X P Y W Y T # P W @ P L < Y x 8W T 8P Y ^ 5 ) P U W C < 4 P "Z Y _ _
0x066618…0667ac Dummy {f00=0x0020, f01=0x0190, f02=» NOT TIME OUT, GET NEXT IN QUEUE P RF(Z) CLK30 TIME OUT ( P F P LDR* A3,A4 RELEASE TIMER N P STR A3,A6 p P CF A15,FREBLK P LDR A4,A2 P CF A15,FREBLK P RB CLK20 P , PCLK30 CF A15,CLK40 CALL TIME OUT ROUTINE
0x0667ac…066940 Dummy {f00=0x0020, f01=0x0190, f02=» ABI 2,A2 GO TO TIME OUT ROUTINE P* ( P* 2 P* < PCOUNT DATA 0 100 MS SWITCH F P* h P* r P* T I M Q U E | P* . P* POINTER TO FIRST BLOCK IN TIMER QUEUE P* PTIMQUE EQU * P DATA 0 P EJECT
0x066940…066ad4 (0, 130) Opaque[0x194]
0x066ad4…066c68 # DirEnt {nam=»CASCOP«, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0418, f03=0x2020}
0x066ad4…066c68 IdxSect {
0x066ad4…066c68 f00 = 0x0020 // 0x66ad4 @0x0
0x066ad4…066c68 f01 = 0x0002 // 0x66ad6 @0x2
0x066ad4…066c68 gno = [ // 0x66ad8 @0x4
0x066ad4…066c68 [0x00]: C0x0020.0x3.0
0x066ad4…066c68 ]
0x066ad4…066c68 }
0x066c68…066dfc Dummy {f00=0x0020, f01=0x0190, f02=» < y L @ 2Z "z yR ); > } z $ | t >1 " R>fj +u &K w [ . d +b% L @M 9"~ T 9 A1 R < R:R:L `i Z% |d z ` : t ` | `H > | , m `" T , R<^ s { " @ 7FF
0x066dfc…066f90 Dummy {f00=0x0020, f01=0x0190, f02=» & T ` " A & T t A $ A & # C ( B Tl B C # T" ( B TH A $ @ RW ( B T( @ $T A $_p x # ( #( _ x 9H9h @ &T <j<FW <i<E t _D # C ( B : W
0x066f90…067124 Dummy {f00=0x0020, f01=0x0190, f02=» n <_0 @ P L t_J ^ 4 _ @ 1 A _ P 9 J & ` @ F L R X ^ d j p v |
0x067124…0672b8 Dummy {f00=0x0020, f01=0x0190, f02=»P Y @ P@ X P2 X "P0 P( P H T~ H Pn H Pr I Y # C C '? Y X P Y W Y T # P W @ P L < Y x 8W T 8P Y ^ 5 ) P U W C < 4 P "Z Y _ _ f
0x0672b8…06744c Dummy {f00=0x0020, f01=0x2008, f02=» r RES 10 STACK TCASTB EQU *-2 STACK BASE $ * F * P END Z@ f * n & ! DATA /8030,BUFGP,0,0,0,0,0,0,0,0 x EJECT * * * BUFKB RES 20 KEYBOARD ECB & "BUFDN RES 8 NUMERIC DISP
0x06744c…0675e0 Dummy {f00=0x0020, f01=0x018e, f02=» , ( A DUECB2K f 4 DUECB3 z H , ( a DUECB4 , ( CTECBI CTECBO , ( $
0x0675e0…067774 (0, 131) Opaque[0x194]
0x067774…067908 # DirEnt {nam=»FLXCOP«, typ=»UF«, f00=0x2020, f01=0x2020, f02=0x0420, f03=0x2020}
0x067774…067908 IdxSect {
0x067774…067908 f00 = 0x0021 // 0x67774 @0x0
0x067774…067908 f01 = 0x0002 // 0x67776 @0x2
0x067774…067908 gno = [ // 0x67778 @0x4
0x067774…067908 [0x00]: C0x0021.0x0.0
0x067774…067908 ]
0x067774…067908 }
0x067908…067a9c Dummy {f00=0x0021, f01=0x0012, f02=» PFLXCOP,SAG
0x067a9c…067c30 Dummy {f00=0x0021, f01=0x2008, f02=» OP,SAG
0x067c30…067dc4 Dummy {f00=0x0021, f01=0x0190, f02=» P**** PL:TED EQU * $ P LDK A5,/B PLUS SIGN IF DEFAULT ( P ANR A2,A2 P & P RF(Z) L:TED4 NO LENGTH BETWEEN '' b $ P LCR A5,A13 GET FIRST CHARACTER P CCK A5,/2B00 PLUS-SIGN? P RF(E) L:TED1 YES P CCK A5,/2D00 MINUS-SIGN?
0x067dc4…067f58 Dummy {f00=0x0021, f01=0x0190, f02=» P* P CWR A1,A2 P RF(G) LTED00 * P SUK A2,1 A1=A2, BUT SIGN NOT PRESENT 6 P ORKL A12,2 ILL LENGTH d P* PLTED00 EQU * P SUK A1,1 DECREMENT LENGTH P SUR A1,A2 P RF L:TED5 " PL:TED1 ANK A5,/F GET SIGN ONLY
0x067f58…0680ec Dummy {f00=0x0021, f01=0x0190, f02=» A3,1 TEST IF ODD NUMBER P RF(NZ) L:TED5 YES P LDK A1,1 GET ODD NUMBER : P RF L:TED5 Z P* l PL:TED4 EQU * v P SUK A1,1 P* PL:TED5 LDK A3,1 P LD A6,LITGEN P XRR A8,A8 ZERO INDICATOR P* * PL:TED6 X
0x0680ec…068280 Dummy {f00=0x0021, f01=0x0190, f02=»O LEFT t P* PL:TED7 ANR A1,A1 " P RF(Z) L:TED9 NO CHAR TO FILL 0 P* V P LDK A5,0 FILL-VALUE ` ( P SUK A1,1 DECREAS NR OF FILL FIGURES | P RB L:TED6 P* : PL:TED8 ORR A4,A5 GET NEW VALUE INTO LAST 4 BITS OF A4 P ST A6
0x068280…068414 (0, 132) Opaque[0x194]
0x068414…0685a8 # DirEnt {nam=»MONFLX«, typ=»UF«, f00=0x2020, f01=0x2020, f02=0x0428, f03=0x2020}
0x068414…0685a8 IdxSect {
0x068414…0685a8 f00 = 0x0021 // 0x68414 @0x0
0x068414…0685a8 f01 = 0x0002 // 0x68416 @0x2
0x068414…0685a8 gno = [ // 0x68418 @0x4
0x068414…0685a8 [0x00]: C0x0021.0x1.0
0x068414…0685a8 ]
0x068414…0685a8 }
0x0685a8…06873c Dummy {f00=0x0021, f01=0x0012, f02=» PMONFLX,SAG
0x06873c…0688d0 Dummy {f00=0x0021, f01=0x2008, f02=» LX,SAG
0x0688d0…068a64 Dummy {f00=0x0021, f01=0x0190, f02=» A0 _$ : @ P( H @ ) A0P / A0 @ A0V H 2 . % 6 0P #p 6 0V #p #p @ P( J @ ) A0R / A0 @ A0X J 2 @ % 6 0R #p 6 0X #p #p @ PF @ ) A0T P / @ A0Z P 2 W" $P 6 #p 6 #p_ #p : F %
0x068a64…068bf8 Dummy {f00=0x0021, f01=0x0190, f02=»LINKER PRL 3.0 780301 * * DATE XXXXXX * PAGE 0000 * @0V A r A B J @ T *6W 14 @ A0Z @0X A A B P @ T *6W$ 14W $P @ E *6_ : @ @0Z A @ A0P H @ T / W 1
0x068bf8…068d8c Dummy {f00=0x0021, f01=0x0190, f02=» @ A : p @ a : '| : @ fP @ P &H A A : J W J @ " A A f C @ b # b J L '| PF R +Z R R !" P :H R [ [ [ : L v . F H
0x068d8c…068f20 Dummy {f00=0x0021, f01=0x0190, f02=» @ A @ C @ h @ j A h C A l A j v P @ &0W< . . X P & =D _ R ' =D @ ZF v P @ T A A A &4W: Z @ T = T # $W <X _B A W .
0x068f20…0690b4 (0, 133) Opaque[0x194]
0x0690b4…069248 # DirEnt {nam=»SYSGEN«, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x0430, f03=0x2020}
0x0690b4…069248 IdxSect {
0x0690b4…069248 f00 = 0x0021 // 0x690b4 @0x0
0x0690b4…069248 f01 = 0x001c // 0x690b6 @0x2
0x0690b4…069248 gno = [ // 0x690b8 @0x4
0x0690b4…069248 [0x00]: C0x0021.0x2.0
0x0690b4…069248 [0x01]: C0x0021.0x3.0
0x0690b4…069248 [0x02]: C0x0022.0x0.0
0x0690b4…069248 [0x03]: C0x0022.0x1.0
0x0690b4…069248 [0x04]: C0x0022.0x2.0
0x0690b4…069248 [0x05]: C0x0022.0x3.0
0x0690b4…069248 [0x06]: C0x0023.0x0.0
0x0690b4…069248 [0x07]: C0x0023.0x1.0
0x0690b4…069248 [0x08]: C0x0023.0x2.0
0x0690b4…069248 [0x09]: C0x0023.0x3.0
0x0690b4…069248 [0x0a]: C0x0024.0x0.0
0x0690b4…069248 [0x0b]: C0x0024.0x1.0
0x0690b4…069248 [0x0c]: C0x0024.0x2.0
0x0690b4…069248 [0x0d]: C0x0024.0x3.0
0x0690b4…069248 ]
0x0690b4…069248 }
0x069248…0693dc Dummy {f00=0x0021, f01=0x0190, f02=» i @ (P" @_NP AXZ @_LP AX^W @XZT AXZ @ @ &)0!? A @ @ 0T @ @XzP p @XX AT$ A @XP AT* A @XR @XT AT0 A @Xz AT6 AT< A A ATB ATH ATN ATT ATZ AT` ATf ATlP @ 0T ATZW 1T AT` ATf ATlW 2T _
0x0693dc…069570 Dummy {f00=0x0021, f01=0x0190, f02=» AT @XZ AT AT @ 0P T AT @XV AT AT A @XzP b @ b T$ f D % @ A D W A @ 0T @ @Y P : TN * W @XzP T(W T$ A A @ 0 @ AT< ATB ATH ATN ATZ AT` AT AT AT
0x069570…069704 Dummy {f00=0x0021, f01=0x0190, f02=»AT A A A A A A A A A A A $ A 4 T$ T : N @ DATA ILLINT05605705805906006106206306406506606706806907007107207307407507607707807908008112212312412512612712812913013113213313413513613813914014114214514915
0x069704…069898 Dummy {f00=0x0021, f01=0x0190, f02=»7048049050051052053054055056057058059060061062063064065066067 LED INTVMALED PFTAB LED INITAB!!IL 63 !!CH $$ X:C$$ $$ !!CH $$IHINPT$$TRAP$$ !!DL 92 0T AT ATNW 1T AT AT AT : 2T _ 3T _ : @ PN @ ATB @ (P 2T @ ATH ATN
0x069898…069a2c Dummy {f00=0x0021, f01=0x0190, f02=» 128,$$ILLINT$$CHLT2$$ A A A A A A A A 122123124125126 129130131132133134135136138139140141142145149150155156159 N @ : *x T `T _ *x<c P > & @ d & @ @ 0 @ T T @ @X^T l @_N & @ & @
0x069a2c…069bc0 Dummy {f00=0x0021, f01=0x0190, f02=» @_ : *p T RpX 07P, 15P0 17P4 81P8 82P< T@ A _> _H _R _ _f _p _z 01 A A A A A A A : A 0 A / , A 2 A 1 cR A T ' @ @ , A 2 A 1 cR A T ' @
0x069bc0…069d54 (0, 134) Dummy {f00=0x0021, f01=0x0190, f02=» _p _z : A A @ : , A cR @ : T$ T( 0R 5 _ 5 *x T P ATF ATL T P ATR ATX T P AT: AT@ T P ATj ATp T P ATv AT| T P AT T P AT AT : ^ ^ 6 ^ ^ ^ ^ ^ ^ ^ ^!!IL 12 !!IL 40 A *
0x069d54…069ee8 Dummy {f00=0x0021, f01=0x0190, f02=»T1 14$$ILLINT 14$$!!CH $$IHFD 15$$ ILLINT 15$$!!CH $$CHRT3 18$$ILLINT 18$$!!CH $$CHRT4 19$$ILLINT 19$$!!CH $$IHCC1 20$$ILLINT 20$$!!CH $$IHCC2 21$$ILLINT 21$$!!CH $$IHCC3 23$$ILLINT 23$$!!CH $$C
0x069ee8…06a07c Dummy {f00=0x0021, f01=0x0190, f02=» 17PL 81PV 82P` T A D_: @ A D_J P A D_Z ` A D_j p A D_z A $ D_ A 4 D_ : A @ :!!CH $$ EXTRN CHLT1$$*$$!!CH $$ EXTRN IHFD$$*$$ !!CH $$ EXTRN CHRT3$$*$$!!CH $$ EXTRN CHRT4$$*$$!!CH $$ EXTRN IHCC1$
0x06a07c…06a210 Dummy {f00=0x0021, f01=0x0190, f02=» F n d Z T 5 _$ : 4P^R` < % ) ! P # T( @ T @ _f : AS A M A @_ 4R T M _ : 4R T M $X R _$ : A * 0 ) A *W W W W
0x06a210…06a3a4 Dummy {f00=0x0021, f01=0x0190, f02=» F 0 _x _ W @ v _ _ , _ _ 4 _ A " A & A * . @ :ASM /S @ F********************* P R D ! P ) _ _ : A b_, DTOSS TOSSWORK A A A A A A A
0x06a3a4…06a538 Dummy {f00=0x0021, f01=0x0190, f02=» b ( -R _ : b ( =R S _ b < )R S _ :P # T T _f : AS A M A _ 4R T _ MOV ,/S,TOSSWORKINC ,TOSSWORK KPF /S,0 ASG /E0,TY10!!EN
0x06a538…06a6cc Dummy {f00=0x0021, f01=0x0190, f02=»_ T A X4_" @ P DR A @ @ A A j A p A A A F -< ,z R @XpP DR A j @XrP DR A p %< ( @X T W T , @X@ A 0 @XB A AX@ AXB @ Pd +^ @ + @ @ CIT W6 @ 4 5 W ! T
0x06a6cc…06a860 Dummy {f00=0x0021, f01=0x0190, f02=»,n 1 @ NUT A @ REP Ar @ H DCP As @ DCP As @-j DCP As @%, DCP At @%. DCP At @"~ DCP At @" DCP At @#^ DCP At( @ r 1P A9b -T :DRKB01DRTP01DRGP01DRDN01DRDI01DRDY01DRLT01DRRT01DRCG01DRCD01DRMS01DROD01DRTP03DRTC01DRSOP1DRSOP1DRMT
0x06a860…06a9f4 (0, 135) Dummy {f00=0x0022, f01=0x0190, f02=»******** D R I V E R S ********************* r H $ $ $ $0% P ! "H" #( %0%0%0%0%0%0%0%0 %0 %0%0 %0%0%0%0%0 %0%0%0%0%0%0%0%0 RETURN CODE UPON RECOVERY : CUT/PERFORATE JOURNAL TAPE : SPECIAL CHARACTER /13
0x06a9f4…06ab88 Dummy {f00=0x0022, f01=0x0190, f02=»R UNIT OR PRINTER IS INACTIVE : ROOMLESS POINT CODES : WRITE TALLY ROLL : CUT/PERFORATE JOURNAL TAPE : SPECIAL CHARACTER /13 : SPECIAL CHARACTER /14 : COMPLETION OF REQUEST IF PRINT OBJECT IS REMOVED : INDICATION OF RECOVERY IN RETURN CODE (/
0x06ab88…06ad1c Dummy {f00=0x0022, f01=0x0190, f02=»UT : ECHO FUNCTION : STANDARD READ : NUMBER OF ZEROES FOR MULTIPLE ZERO KEY : COMPLETION OF READ REQUEST AT POWER ON : CIRCULAR INPUT BUFFER SIZE : CODE CONVERSION/8-BIT SETTING : NUMERIC SHIFT FUNCTION : KEYBOARD LOCK IF NO KEYLOCK ON :
0x06ad1c…06aeb0 Dummy {f00=0x0022, f01=0x0190, f02=»RACTERS : ECHO OF EOR KEY : SUPRESSION OF TRAILING BLANKS : END OF REQUEST WHEN SELECTOR UNIT OR PRINTER IS INACTIVE : ORDER,WRITE NUMERIC DISPLAY : ORDER,WRITE PROGRAM DISPLAY : FLASH FUNCTION : LOGG FUNCTION FOR INPUT/OUTOUT CHRS : NU
0x06aeb0…06b044 Dummy {f00=0x0022, f01=0x0190, f02=»RE TIMOUT HANDLING MISSING DATA REQUESTS FROM PRINTERS : 01 NUMBER OF CASSETTE DRIVES : ORDERS LOCK,ERASE AND REVERSE ONE BLOCK : LOGG FUNCTION FOR INPUT/OUTPUT CHRS : NUMBER OF LOCAL CHANNEL UNITS : ACKUMULATORS FOR NAK,RETRANSMISSION FAULT AND
0x06b044…06b1d8 Dummy {f00=0x0022, f01=0x0190, f02=» : COMPLETION OF READ REQUEST AT POWER ON : GRAPHIC MODE : ONLY PTS 6344 : LOWER CASE CHARACTERS : ECHO OF EOR-KEY : SUPRESSION OF TRAILING BLANKS : CURSOR STEADY ON 6386 (ELSE TWINKLING) : READ AFTER WRITE : NUMBER OF DISC UNITS : UN
0x06b1d8…06b36c Dummy {f00=0x0022, f01=0x0190, f02=»ENGTH : TRANSMITT BUFFER LENGTH : DC-TASK DATCOM FILE CODE : INTERRUPT LOGGING : POLL TIMEOUT VALUE : STATUS AND RVI HANDLING : READ COMMAND HANDLING : TRANSMIT BLOCK LENGTH : EBCDIC CODE ( IF NO ASCII ) : SPECIFIK POLL HANDLING : LINE SPEED
0x06b36c…06b500 Dummy {f00=0x0022, f01=0x0190, f02=»HANDLING : MESSAGE PASSING : IBM-3270 PACKAGE : RECEIVE BUFFER LENGTH : TRANSMIT BUFFER LENGTH : DC-TASK DATCOM FILE CODE : INTERRUPT LOGGING : POLL TIMEOUT VALUE : NUMBER OF RECEIVE BUFFERS (3-14) : FULL DUPLEX : PHYSICAL LINE NUMBER :
0x06b500…06b694 (0, 136) Dummy {f00=0x0022, f01=0x0190, f02=»Y : BID TIME OUT VALUE : LOGG AREA LENGTH PER LINE : PHYSICAL LINE NUMBER : 34 04 05 NUMBER OF LINES : POLL LIST LENGTH : P852 INSTRUCTION SET : MAX BLOCK LENGTH : INTERRUPT LOGGING : RETRY LIMIT : PHYSICAL LINE NUMBER : 34 04
0x06b694…06b828 Dummy {f00=0x0022, f01=0x0190, f02=»BLOCK LENGTH : INTERRUPT LOGGING : RETRY LIMIT : PHYSICAL LINE NUMBER : 34 04 05 06 07 32 33 35 36 37 38 RECEIVE BUFFER LENGTH : TRANSMITT BUFFER LENGTH : DC-TASK DATCOM FILE CODE : PHYSICAL LINE NUMBER : RECEIVE BUFFER LENGTH :
0x06b828…06b9bc Dummy {f00=0x0022, f01=0x0190, f02=» TRANSMIT BUFFER LENGTH : DC-TASK DATCOM FILE CODE : INTERRUPT LOGGING : POLL TIMEOUT VALUE : NUMBER OF RECEIVE BUFFERS (3-14) : SUPPRESS NULL CHARS. : PHYSICAL LINE NUMBER : LP ON PROGRAMMED CHANNEL(ELSE MUX) : FD ON PROGRAMMED CHANNEL
0x06b9bc…06bb50 Dummy {f00=0x0022, f01=0x0190, f02=»LETION OF READ REQUEST AT POWER ON : CIRCULAR INPUT BUFFER SIZE : CR ON PROGRAMMED CHANNEL(ELSE MUX) : DCDC A'p LW & 8 %0 & % A% 8R P &Pn d 4 F +h F 3 @8: P 0 X DCX: !SSP` B d d & ( & * A A+0 A
0x06bb50…06bce4 Dummy {f00=0x0022, f01=0x0190, f02=» P F &R d Z$T 5W _0 : & R R P @8: 5 P @8< U : _ 3 @&L D P )8 *X ! (& ($ @8::HV, !YYT 1;BV 8W !NNT 0;BV : A* _ P8: !00Z !99Y @8:_* 4R^ S A'h P ! P P A+X T A+Z +J
0x06bce4…06be78 Dummy {f00=0x0022, f01=0x0190, f02=»NN @&L I H & Y A8:_ H8: !,,T W. !00 & !FF & !99U !AA & & E+ J A'p _d TL PH QB A(l A(p A(t 89 8< ( - 0 8:R - _ & & ,J # @ P : ,p @ : A
0x06be78…06c00c Dummy {f00=0x0022, f01=0x0190, f02=» @ + @ : A* A* A* 8: ,,P <H & & * & A* @* Pn @* A* & X 17P 81P 82T @* & W @* _ @* _ <C *x X Q 0 a* @&L A* 9B A* @* T A* _ d &H @*x 5_ 9
0x06c00c…06c1a0 Dummy {f00=0x0022, f01=0x0190, f02=»062021 072223 322627 332829 353233 363637 373839 384243 394647 EBCDIC LED EBCDIC!!DL 34,65!!DL 75,91!!CH $$EQU X:B$$EQU 0$$ !!CH $$ X:A$$ $$ !!CH $$ X:A$$ $$!!CH $$ X:A$$ $$ LED DVTKB : !!CH $$/2122,/2426,/3B3C,/3E40,/5E5F$$/ ,/ ,/
0x06c1a0…06c334 (0, 137) Dummy {f00=0x0022, f01=0x0190, f02=» @ @ : A A A !!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ASM /S,NL @X T 03 A @X W T , R : @ r KEP( , @ A A+0 A+B A+T r ' :DRKB03 LED DRKB03 @ PB -2 @ + @ @$ CIT P W @$
0x06c334…06c4c8 Dummy {f00=0x0022, f01=0x0190, f02=». F 4 d d @-n A&F A&h @-p A&H / / . & 0N Z T 0bW 0j R @-r A&F A&h @-t A&H @j P G A/ TA A/& T A/ @ $P LO A/ @/ A/ @/2 A/8 / A R 0" / @ @ (P A/D / /N / /l A/ A/8 0 @ A A
0x06c4c8…06c65c Dummy {f00=0x0022, f01=0x0190, f02=»E S S O R S IMER GRBUF RBUF ADERTABORT MONTIM NTIM TASS 014015016017018019020021022023032033034035036037038039040041LED LKMAL r KEP( , DELAY/DELAY AND ACTIVATION : DYNAMIC BUFFER ALLOCATION : ABORT FUNCTION : GET/SET TI
0x06c65c…06c7f0 Dummy {f00=0x0022, f01=0x0190, f02=»P AX8 @X:P AX: @X>P AX> @ P 9 = 7W d 4 8 F 4 d d 9 = 4 = F Z PP 01 7 3 X4 8 A3 1 T _@ 7 @= = A= @,nR @2 7d_h @?TPV AN @= P = A?X A?T ?V E A= 01 A= @ T d
0x06c7f0…06c984 Dummy {f00=0x0022, f01=0x0190, f02=»Pb 4 7 d A3 (R> S A2L P" (P W T N 7 W F 3 d _D W W X 6 7 7 _ ? 4P 1 A2 @= 7 = 01 7 @? , 7 4 W V T1P TPT, 1 0P 1T W A3 / A2 @3 W A2
0x06c984…06cb18 Dummy {f00=0x0022, f01=0x0190, f02=» 8: D9 d 2 01 W ? @8: 3 R *Pr_ 7 4 P^ "T @ $ 1T V SIT TF P, L8< !,,T2 U, L8: L8;9H # 4 _4 # A? : 3t @8: 7 4 : V @8: P KB ? V MTT 0P 7 @ I 7 P& @8; !
0x06cb18…06ccac Dummy {f00=0x0022, f01=0x0190, f02=» T :h" P 0R U Q P <H9D_( : 3t 3t 4 3t @8: 4 9H @8< 4 A 5 3t V KBT$ bqP brP b6T ? @,nR @$ b6 bA 4 @ 1 4 20 4 V KBP DIP W @v =zR P _ = ( : : R _
0x06ccac…06ce40 Dummy {f00=0x0022, f01=0x0190, f02=» ; W : # +0 !99U :d" *0 !99U :H : T TWP6 DUP FDT @<W 7 V W V W 1 W W W 7 V W 01 W W ?l @ V A? A? V A? A? ?v @ G A? V A? A? 0 A? A? ?v @ : A6 ] A
0x06ce40…06cfd4 (0, 138) Dummy {f00=0x0022, f01=0x0190, f02=»SIT* @ $ 1T" 7 @? P @? W 02 W A? : DEFINE TERMINAL DEVICE CLASSES DEFINE ECHO DEVICE CLASSES 8 = = = > >h > = = = FILE C
0x06cfd4…06d168 Dummy {f00=0x0022, f01=0x0190, f02=»O KEY : ECHO DEVICE : KEYBOARD TIME-OUT : CODE CONVERSION : 3 4&5,5 5 5 5 4 5 5 6 6 T1
0x06d168…06d2fc Dummy {f00=0x0022, f01=0x0190, f02=»
0x06d2fc…06d490 Dummy {f00=0x0022, f01=0x0190, f02=» TAS T01 :
0x06d490…06d624 Dummy {f00=0x0022, f01=0x0190, f02=»20203000003010909090 000010100010101010 1010100020FILE CODE : DEVICE ADDRESS : FILE CODE : DEVICE ADDRESS : PTS NUMBER : FILE CODE : DEVICE ADDRESS : PTS NUMBER :
0x06d624…06d7b8 Dummy {f00=0x0022, f01=0x0190, f02=»DISPLAY FILE CODE : LEVEL: ********* : LED DRTW01!!CH $$ X:F$$ / $$ ? W @ 9& $ ! P ) _ :END OF RECORD KEY : TRIPLE ZERO KEY : A9x b6
0x06d7b8…06d94c Dummy {f00=0x0022, f01=0x0190, f02=»P @X:P @X>P @9RT : LX4R T _ : A @ zP V AD = E< 4 8R @A~V @?VPx A RZ O X *0 T1P DUP FDP TPP X X / O @A~Q A B @ zP W _b / AHZ_ / P Q$ AA~ F _ X AA AA~ Y G<_
0x06d94c…06dae0 Dummy {f00=0x0022, f01=0x0190, f02=»90R C H @ G @ G @ : ET$ @ zP G @ G @ G W : AD D @H 90R @ C H @ 0 AD AD X 00 FD X 10T G @W X AHj X AHl H @ X X !99U W 1 AD 40 C W C 8 DIT Hp : @HZ AH[P AD
0x06dae0…06dc74 (0, 139) Dummy {f00=0x0023, f01=0x0190, f02=»T !99U AD :h AD @ zP D @ : X AH 90Rf H WF AH W@ @H AH$ ! " R _ EH H @W H @ @H AH 9h AH : @H ! U 10 AH _Z @ 0Tf P P " 9U AH: H* @ P P8 ! " R _ EH P AH$ AHU AHV H @ H> @ A
0x06dc74…06de08 Dummy {f00=0x0023, f01=0x0190, f02=»$BCA$$ $$ !!CH $$ED0$$ $$
0x06de08…06df9c Dummy {f00=0x0023, f01=0x0190, f02=»
0x06df9c…06e130 Dummy {f00=0x0023, f01=0x0190, f02=» $$DATA /3F4F,/5F6F$$ $$!!CH $$0 CODE $$CTAB $$$!!CH $$8000$$8000$$ !!CH $$***$$ EXTRN CTABXX$$ !!CH $$/ABC$$/ $$ @ FLP 1P H @ :!!DL 22,23!!DL 5 EXTRN CTAB0 !!CH $$KBAD$$KBAD3$$!!CH $$0 CODE $$CTAB00 CODE $$ = 9a
0x06e130…06e2c4 Dummy {f00=0x0023, f01=0x0190, f02=»O IP d 4 N F 4 d d W A7h @3r AJr Nv A3r K 01 A= A= O 7 M d 4 @= AO = Z P d ww 7 N0 J 7d_8 Nv A3r @O ZF J ww 7 N, A3r d d W AJ N Z P N J W 7 7 CD aN, A3r
0x06e2c4…06e458 Dummy {f00=0x0023, f01=0x0190, f02=»3 d M _, : TJ @8: aN 62Q< 51R6 ! 0R. Q( P AN aN _ AN aN : d _ T K^ M$ O P 8; @8: !SSP !EEP !TT L L Q ( L R ( L R T <H W @8:$ 7 ( L T ( L R ( L V
0x06e458…06e5ec Dummy {f00=0x0023, f01=0x0190, f02=» T2 @8< L R&<H W @8:$ 7 L _p N. F :Wn !00R !99Q : !,,T : : : V L V RP @N(W @N*Q. V L 6 LN P _ LN"Q : 00 00P : K^ AK^ KR O2 AO0 $Pl Pl ww 7 `O0RZ AO0 W M$ T W& ST , 7
0x06e5ec…06e780 Dummy {f00=0x0023, f01=0x0190, f02=» @O A= AM$ I @ $P$ ww 7 LD W W 49 aN K> : T E SN"0000000000 * TASK IDENTIFICATION : TASK LEVEL : TASK CONFIGURATION LIST : J K K I I I I I I L L L L TASK DEFINITION COMMON DEVICES : N 8:$ 7 ( T ( R ( V
0x06e780…06e914 (0, 140) Dummy {f00=0x0023, f01=0x0190, f02=» T @8< R <H W @8:$ 7 _p
0x06e914…06eaa8 Dummy {f00=0x0023, f01=0x0190, f02=» ! R DQ :0008162432! R DQ :0004081216 4 W F 4
0x06eaa8…06ec3c Dummy {f00=0x0023, f01=0x0190, f02=» V2 X AT AT T W AT AT W AT AT Zh YXPW EX4 H !,,P Yb T AR E ARv ARp _ Y X4 $ XN P @XBT LT AX@ @ ( @ $P @X^T DU AXZ 1 AW R d @XzP @XpP S @ AY< @XrP$ 2 AW S @ A t Ay> Atn As As @Y<Ph A n
0x06ec3c…06edd0 Dummy {f00=0x0023, f01=0x0190, f02=» A F @X Q A F A : 0 ! P ! P ! P ! P ! P _& : FW P FW ^ : Z _ KB KEYBOARD TP TELLER TERMINAL PRINTER GP GENERAL PRINTER DN NUMERIC DISPLAY DI INDICATOR DISPLAY/KEYBOARD LAMPS DY VIDEO/PLASMA D
0x06edd0…06ef64 Dummy {f00=0x0023, f01=0x0190, f02=»MENT READER T1 TELLER TERMINAL PRINTER (TP71) TC TAPE CASSETTE SI SOP INPUT SO SOP OUTPUT MT MAGNETIC TAPE UNIT TW TYPEWRITER DU DISC UNIT LP LINE PRINTER FD FLEXIBLE DISC CR CARD READER II INTERTASK COMMU
0x06ef64…06f0f8 Dummy {f00=0x0023, f01=0x0190, f02=»DRDC15 D3 DATA COM DRIVER DRDC17 D4 DATA COM DRIVER DRDC81 D5 DATA COM DRIVER DRDC82 D6 USER OWN DATA COM DRIVER 1 D7 USER OWN DATA COM DRIVER 2 D8 DATA COM DRIVER DRDC22 CC CASSETTE CHANGER DEV
0x06f0f8…06f28c Dummy {f00=0x0023, f01=0x0190, f02=»D1D2D3D4D5D6D7D8CC X Z T AX W X Z P AX W AX :KEYBOARDS 6236/71/72 IN SYSTEM : ONLY KEYBOARD 6236 : Y Z P AY 01 A :MONITOR FOR PHILIPS 6805 : Xf $
0x06f28c…06f420 Dummy {f00=0x0023, f01=0x0190, f02=» : A1: _P P Z$ Y W* d 4 F 4 d d Z$ Y 0 7 :
0x06f420…06f5b4 (0, 141) Dummy {f00=0x0023, f01=0x0190, f02=»
0x06f5b4…06f748 Dummy {f00=0x0023, f01=0x0190, f02=»] ^>] ] ] ] ] ^ ^ ^ ] ] ] ]$ DEFINE SPECIAL DEVICE-CLASSES FILE CODE FIXED DISC : UNIT NUMBER : FILE CODE CARTRIDGE DISC : FILE CODE : UNIT NUMBER : FILE CODE : INPUT FI
0x06f748…06f8dc Dummy {f00=0x0023, f01=0x0190, f02=»FILE CODE : OUTPUT FILE CODE : FILE CODE LEFT DISC : DISC UNIT NUMBER : FILE CODE RIGHT DISC : FILE CODE : LINE NUMBER : INPUT FILE CODE : LINE NUMBER : OUTPUT F
0x06f8dc…06fa70 Dummy {f00=0x0023, f01=0x0190, f02=» Ab @ zT DW Ac> b @XzP @c( 4 a b @ cD @ 8RD X Ac@ KBT @b T, Ab CGT @b T Ab G<T cb T c, @ _H X P cB cR Ab Ab _d @b P d4 b @W b cR b @ 4^ T P _" @b P2 @XfT @XhT @XpT @XrT @ (T W b cR
0x06fa70…06fc04 Dummy {f00=0x0023, f01=0x0190, f02=»b TH Ab 0 Ac# Ac$ T d DV Ac" T Ac$ @c* Ac& @c( G<T cb c @ 4^ b @ Ab T T @b PB @Xz @ (P8 Ab b cR Ab Ab c* cR b @_ d b @ @c( F PN G<Pb E Ab F Ac( c* cR cB cR 00 Ab Ab Ab Ab F P Ac*
0x06fc04…06fd98 Dummy {f00=0x0023, f01=0x0190, f02=» 0715178182 22 ASM DC:TABLED TCLASS!!IL 11 DATA TC00TC00 DATA TC00E-* TC00E EQU * DATA E<00 EXTRN DV 00!!IL 6!!IL 12 $ !99R % : LPPR MTPL
0x06fd98…06ff2c Dummy {f00=0x0023, f01=0x0190, f02=»R _ FDP MTP DUT W X ! P Hb T Ib W : Ac% Ac& c @ : 00 AcB @XfP dt @XhP dz @XpP d @XrP d @XtP d e@ : 07W 15W @ nW @ tW 22W Ac@ c, @ : @XfP d @XhP d @XpP d @XrP d @XtP @#^ 22W. e : @ H 07
0x06ff2c…0700c0 Dummy {f00=0x0023, f01=0x0190, f02=» P et e @X^ Ac@P e : 02 AcB c, @ : 01_ @ (P @XZP< @ 0P4 P 0 F2 f 1 F3 f 01 fL 0 F0 f 1 F1 f @X^P> 01 fL FD AfH AfG 0 F8 f 1 F9 f 2 FA f 3 FB f : Ac$ /0 Ac" d f2 : f> @ : DATA DWDU02 AfJ AfI : O q
0x0700c0…070254 (0, 142) Dummy {f00=0x0023, f01=0x0190, f02=» u|W @ 0T Aq Aq Aq Aq W u| @ @ Ah : A @ N AN q 4 h Ah X Aq Aq CDP @h T a A q CDT r. @ m A5 X 4 m ! m X Aq Aq q @ 3t A5 q @ `N As4 s( @ AN Ax = X o TP
0x070254…0703e8 Dummy {f00=0x0023, f01=0x0190, f02=» 8R wwP l _ @h X CDT pp wB Aj Aj Aj Asb Asd Asj Aj g P A @ Ah 00 Av, Av* g a aYX AYX aYX r8 @ @ (P( s8 % t~W @ J @X^T 1T $$ AsT @ rB B Ai> 4 PP P @ B Ai> B 8R, q BP Ay. x @y.Q
0x0703e8…07057c Dummy {f00=0x0023, f01=0x0190, f02=» Ax _ Y 4 R< x @ @ Ar Ar Ar Ar r @ _B s @ s @ B $R _ s @ w @ (P vP : Amz 6R DUT V ! Ds`T Es`W FDT @sjT Asj MTT T Aj W: TWT Tr Aj W( T1T
0x07057c…070710 Dummy {f00=0x0023, f01=0x0190, f02=»Wf X 00 4 5 X RP q W r 9A 6 KBP( T1P" TPP GPP CGP MSP ODP V : V o 4 5 9B &T. 6 ' oV X X TP EP W 0 ov G : Amz / Ar 0 Ar Ar V Ar Ar 6 MTT V Ar DUP FDT V Ar T1
0x070710…0708a4 Dummy {f00=0x0023, f01=0x0190, f02=» 6^ : = X TP SP ?XW Y X 4 5 9A : X 00 X RP8 25V 17V 09V W ! U W X " P Hu Am k: 6 V $ <B P &T P F T R*W <h" R _ 9U <H :W Ac@ Ac$ AcB
0x0708a4…070a38 Dummy {f00=0x0023, f01=0x0190, f02=»oT oT @h oT Ly0 Ax Ax Ax Lx l T Lnb o MnbW 000000000000000000 Lx o Mx W Lx l P o Mx V W Lx l P o Mx l P x @x @x y0 v @y0 @x @x l Tn x< @x @x @x y0 v @y0 @x @x WH !99U ?0 Ax R Q W$ Ly0 aYX
0x070a38…070bcc Dummy {f00=0x0023, f01=0x0190, f02=» ) I @s$Z As& : X CD hj @Xz @ hj q @ Ax o q @ pp hj @ P r @ @XzPL @XfP 07 pZ @XhP 15 pZ @XpP s @ @XrP s @ @XtP 22 pZ : Asv Asu sl @ : @ P r @ r @ @XzPh @XfP sz @ s
0x070bcc…070d60 Dummy {f00=0x0023, f01=0x0190, f02=» LED TTABX !!CH $$TTABX$$TTAB $$!!IL 9!!IL 21 !!CH $$/EE$$ $$
0x070d60…070ef4 (0, 143) Dummy {f00=0x0024, f01=0x0190, f02=»AB DATA LED DC:TAB!!CH $$DWDC $$DWDC $$ !!CH $$/EE$$'00'$$ EXTRN DWREMU DATA /015 DATA DWREMULED BLOK:S!!IL 14 DATA *+6,0,0 -v-x!!CH $$/3C$$ $$!!CH $$TTMJOB$$TTMJOB,TTABD0,TTABD1$$ EXTRN DW0700 DATA /060 DATA DW0700 EXTRN D
0x070ef4…071088 Dummy {f00=0x0024, f01=0x0190, f02=»/064 DATA /065 DATA /066 DATA /067 DATA DW1500 DATA DW1700 DATA DW8100 DATA DW8200 DATA DWXX00 DATA DWYY00 DATA DW2200 @XZP6 @ J 1T @X^T t W, t %W$ @X^T u* %W uP ,W @X^P u :!!CH $$TTMJOB$$TTMJOB,TTABD0$$!!CH $$TTMJOB$$TTMJOB,TTABD0,TTABD2$$ !!CH
0x071088…07121c Dummy {f00=0x0024, f01=0x0190, f02=»" R Hu u u u u u : Aq Aq Aq Aq _ " R Hu u u u u u : Ar Ar Ar Ar&_ 41424344515253546162636471727374 IIT v* cR : IOT v, cR : V 0 :0000 IIT @v* : IOT @v, : V 0 : @v, 00P4 v @ @v, Av Av v @ v,
0x07121c…0713b0 Dummy {f00=0x0024, f01=0x0190, f02=»O00$$ $ !00Q % : @ (P, @ 9C @ " P s @ : X CDPD @ (P> @ tP8 @x T q @ @ tP"R 9B ! T R w @ Y : DATA 0,0,0,0,0,0,0,0 0102030405060708111213141516171821222324252627283132333435363738 # P w : :h H
0x0713b0…071544 Dummy {f00=0x0024, f01=0x0190, f02=»c$ Ac& c @ @x : nPnPn n n nPnPnP000000000000000000 X 07T Ay.W4 22X 15X W T Arx Ar A Ar Ar Ar Ar : Ay0 V $ Ay0 Ay0<C Ay0 V $ Ay0 @y0<A Py@ Ay0 : 071517818200002202040608101214161820222426 @}< Q p| T A}< A
0x071544…0716d8 Dummy {f00=0x0024, f01=0x0190, f02=»c, @ @ } Z 7 || @ P| |f 6R z {( { _ @z2U _ Az2_8 : P| Y 9a P} A| A}> Az 4 A| z A| W Az z Az _p 8P* A| @}> | V |6 W A| | @W @| P (X
0x0716d8…07186c Dummy {f00=0x0024, f01=0x0190, f02=»T V P 2W T W A| | @ U P T z@ 6P& { A| A| | @ | @ z^ z@ y y X y U 0 FQ : G 10 : 4 P T H X T R&W :h! R _ 9U :H :LED INTLT1!!IL 08
0x07186c…071a00 Dummy {f00=0x0024, f01=0x0190, f02=» DATA DW +1 q q q q r r r r&0010203040506070 L1L2L3L4R1R2R3R4!!IL 18 ~ A|( p| T A}B_" P| 4 8 ~ P| 9a P} A~ | ~ Am A `9h A _ ~ 8 A H A V A ^9h A U A ] X # P0 @?X = ;a 9h" ! P
0x071a00…071b94 (0, 144) Dummy {f00=0x0024, f01=0x0190, f02=»~ ~ D NPh E ,P _ GPT W ?B Am Amz mV V m A r A d @ v @ }l } }h }Z : D KBP" T1P TPP GPP ODP !99U AD D 90R :h*0 AD P| *0 Q 9U
0x071b94…071d28 Dummy {f00=0x0024, f01=0x0190, f02=»" R _ : X = " P @?X 9A $ 8 $P _ : -v $P _ D D Am Amz 0 A md V m A ~ LED DV !!CH $$DV $$DW $$ !!RE 07,$$ $$ $$!!RE 24,$$ $$ $$008822AA445566778899AABB00112233!!CH $$ECH$$DW $$ ODT 4 AD : P
0x071d28…071ebc Dummy {f00=0x0024, f01=0x0190, f02=» 3 d X H8: I { I { , Z P" A A A z R A A ,W 0 Z A $P8 LD A : O A 9 TD A IS A PO A M A A DW4 F Z P DW$ 2 Z P A , N Z P A &W O A A A @ zR V Z P A .W A Z P
0x071ebc…072050 Dummy {f00=0x0024, f01=0x0190, f02=» B R @ (P A Z RW A A d A D P d d @ _ @ @XzP @ @ .P @ @ *P @ @ (P @X^T A @XZP @ 0P P W A A A @XzP @ @ zT @N( @N* @Xz A
0x072050…0721e4 Dummy {f00=0x0024, f01=0x0190, f02=» @XdP d @ @X P P P W W @ @ zT $ @ @ @ z @ @ .P @ @ *P @ @ t S @ < @ A 8 F d d( d d Z P L 3 d
0x0721e4…072378 Dummy {f00=0x0024, f01=0x0190, f02=» L _ :Q z-v T0rYZ @ _lI fXy }@ S F 3 d T @8: !YYP NP :INTVMAINIMONINIMOD TDISPLRPINT TPROC MSUBSTTMJOBINPRET TASK PFTAB LKMAL DVTKB DVTTP DVTGP DVTDN DVTDI DVTDY DVTCG DVTCD DVTMS DVTOD DVTT1DWII01DWIO01DW0701DW1501DW2201 C
0x072378…07250c Dummy {f00=0x0024, f01=0x0190, f02=»AB @XdP @ @X P P P W W @ TIODMDMTASKDMINIT TASSDMTASS DMBUF DMFDB DFTABDMSUBXADDMODDSUMODMPYMODDIVMODDMSUBRTTABD0TTABD1TTABD2 @ S @ < @ A 8 DC:TABIN:LT1IN:LT2IN:LT3IN:LT4IN:RT1IN:RT2IN:RT3IN:RT4 ASM
0x07250c…0726a0 Dummy {f00=0x0024, f01=0x0190, f02=»MBLY LIST : ASG /02,NOSYSGEN ENDEDEXTRA MONITOR MODULES : MOV LED DWDC00 DEBUGGER : INC DEBUG,TOSSWORKKPF /O MONITOR AND APPL. ON SAME CAS. : MONITOR INITIALIZATION PROGRAM : INC INTVMAINC INIMONINC DEBUG LKE M AS
0x0726a0…072834 (0, 145) Dummy {f00=0x0024, f01=0x0190, f02=»UGGER$$ !!DL 19 !!RE 29,$$0$$1$$MEMORY MANAGEMENT : PROGRAM LOADING FROM DISC : MONITOR NAME : KPF /L, LED MONTAB!!CH $$MOX$$MON$$ 009010011012013014015016017 021022023024025026027028029030031032033 038039040041042043044045046 04905005105205305405
0x072834…0729c8 Dummy {f00=0x0024, f01=0x0190, f02=» 48 @X P P P W W A W @ zP | @W @XzX : p : @ x @ : TH # P P A V A U J @ _* : | H A G A < A : DATA CTABXX EXTRN CTABXX EXTRN ITADI DATA ITADI!!IL 47 ****!!IL 19 " R H
0x0729c8…072b5c Dummy {f00=0x0024, f01=0x0190, f02=»3333 023024025 031032033 L :0102030405060708091011121314151617181920 " L @ ( d 4 F 4 d d " 8 L " & @ 1R D & & & A @ @ p 16Q 02V 2 l @ @ A v @XZP" @ A J 1
0x072b5c…072cf0 Dummy {f00=0x0024, f01=0x0190, f02=» @ @W& v @ @W @X^T 2 @ : @ z < @ @ @ @ B" 9B : D @ B (R _ @ " @ $" 0 @ : @ zT2 N @ X @
0x072cf0…072e84 Dummy {f00=0x0024, f01=0x0190, f02=»:d 5 9C :' d !!CH $$ X:A$$ $$ MAX NUMBER OF DISC FILES : MAX NUMBER OF COMMON DISC-FILE FILE CODES : MAX NUMBER OF DISC BUFFERS : EXCLUSIVE ACCESS HANDLING : INDEXED ACCESS : LED DMBUF LED DFTAB !!CH $$F0F1,/F2F3$$F0F1$$ !!DL 2
0x072e84…073018 Dummy {f00=0x0024, f01=0x0190, f02=»2,37LED DMTASK!!DL 9,10 !!DL 22,29!!CH $$/F0F1,/F2F3$$ $$ @X^T * @ :!!DL 23 @ W 9h 0 ;C ! : B A @ @ b NUPF A A @ d" @ @ e! C A @ A A : @ @
0x073018…0731ac Dummy {f00=0x0024, f01=0x0190, f02=» @ F" 9a C A @ A A :LED TTABD0LED TTABD1LED TTABD2LED DMTASSMAX KEY LENGTH IN BYTES : NUMBER OF WORDS IN MASTER INDEX AREA : MAX NUMBER OF CURRENCY BUFFERS : MAX NUMBER OF RECORDS WITH EXCLUSIVE ACCESS : A
0x0731ac…073340 Dummy {f00=0x0024, f01=0x0190, f02=» @ r t A r ) : 22,29!!CH $$/F0F1,/F2F3$$ $$ @X^T * @ :!!DL 23 @ W 9h 0 ;C ! : MAX NUMBER OF LOCAL DISC-FILE FILE CODES : LOCAL DISC-FILE FILE CODES : @ @ MAP A @ A @ @ @ A @ B A
0x073340…0734d4 (0, 146) Dummy {f00=0x0024, f01=0x0190, f02=» P )P @8: < _( @ T @ b4P d Z T @ I A H P A d : !::T <h !00R !77Q @ T( A @ @= A 8 @ I . @ A D A N : H8< !,,T T> W& !00R4 !FFQ. !99U !AAR" P E V B <
0x0734d4…073668 Dummy {f00=0x0024, f01=0x0190, f02=»U 0$$C0 DATA /0000,/0000,/0000,/0000,/0000,/0000,/0000,/0000$$!!AB !!DL 23 @ W 9h 0 : @ $P` Z Y q ( H Z Y " : @ $P b @ x @ :PARTITION LENGTH IN BYTES ( HEXA ) : NUMBER O
0x073668…0737fc Dummy {f00=0x0024, f01=0x0190, f02=» 0 !00R !99Q - : 8<W 8= 8: $ ) ^ 0 P ) _ : I A H P A d : !::T <h !00R !77Q @ T A @ @= A @ I @ A A : H8< !,,T T W !00R !FFQ !99U !AAR P E B
0x0737fc…073990 Dummy {f00=0x0024, f01=0x0190, f02=». IF OLRC-CHAR LRC-POINTERS FOR ~ . P* DWT AND ACKUMULATOR IS UPDATED. ( P Z POUL500 EQU * b " P LDR* A3,A6 CHANNEL PARAMETER v P ANKL A3,/7E00 & POUL510 ORR A2,A3 OUTPUT WORD IN A2 P* P* P* POUL515 EX CWTO
0x073990…073b24 Dummy {f00=0x0024, f01=0x0190, f02=»WTADR,A6 ADDRESS TO ADDRESSBLOCK & P ABI 2,A2 GO TO INTERRUPT HANDLER ( POUL520 EQU * R P* f P IFT LOGING=1 p P* 0 P CF A15,LOGG ** LOGG OF OUTPUT CHARACTER ** P* P XIF P* P STR A6,A5 SET CHANNEL BUSY , P
0x073b24…073cb8 Dummy {f00=0x0024, f01=0x0190, f02=»UPDATE LRC-ACKUMULATOR ~ . P CF A15,RESTSY START OR RESTART SYNC-TIMER 4 POUL600 SC A2,DWTOCH,A6 SET LAST OUTPUT CHARACTER P POUL700 ABL IHRET8 P EJECT P* : P* NORMALLY DWT-ADDRESS IS PUT LAST IN OUTPUT QUEUE P* POUL800
0x073cb8…073e4c Dummy {f00=0x0024, f01=0x0190, f02=»R j P RF(E) OUL820 POUL810 CWR A6,A4 & P RB(E) OUL600 DWT ALREADY IN QUEUE 8 P LD A3,DWTOTQ,A4 b P RF(E) OUL830 z P LDR A4,A3 FOLLOW THE THREAD P RB OUL810 $ POUL820 ST A6,CWTEQ,A7 QUEUE DWT P RF OUL840 $ POUL830 S
0x073e4c…073fe0 Dummy {f00=0x0024, f01=0x0190, f02=» P* P* P* C H L T O N P* 4 > P* SUBROUTINE TO RESET CWT AND PERFORM CIO-START OF EVERY > @ P* CHLT IN SYSTEM. THE SUBROUTINE IS ENTERED FROM 'PFINIT' P* P* P* PCHLTON EQU * P LD A4,CHTAB "
0x073fe0…074174 (0, 147) Opaque[0x194]
0x074174…074308 # DirEnt {nam=»DKLD «, typ=»LM«, f00=0x2020, f01=0x2020, f02=0x04a0, f03=0x2020}
0x074174…074308 IdxSect {
0x074174…074308 f00 = 0x0025 // 0x74174 @0x0
0x074174…074308 f01 = 0x0002 // 0x74176 @0x2
0x074174…074308 gno = [ // 0x74178 @0x4
0x074174…074308 [0x00]: C0x0025.0x0.0
0x074174…074308 ]
0x074174…074308 }
0x074308…07449c Dummy {f00=0x0025, f01=0x0190, f02=» d * THERE ARE I FREE GRANULES. ( Dp$ A j z H&g ` ^ 1 [ L ` `0 H } % H @__z@u ` `L GH L `H ja @ `H z@b> > @ h> ` > d @8 U ! ` @Z @ @ @]> ` }> 5 ( - @ e> ` % e> @ `
0x07449c…074630 Dummy {f00=0x0025, f01=0x0190, f02=» " @x $0 ( p ? JT M ` w > @ 3 H!+ d Z ^ -5 > @ H! 3 d @Bh 4NA~ { N4` l ; ; ; ; ; ; R Q @ - WH @ - A R* X R X _ Q @ X" A T - _0 D - Z Z Z Z Z Z
0x074630…0747c4 Dummy {f00=0x0025, f01=0x0190, f02=»X !XXT ( ( @ *! : F A A " ( : NP W ` A A "( ES NO A , W ! T _ !//T ( _ 0Z2 U ]@ YF< Y< ZT A B l 0DISC LABEL IS LLLLLLLL
0x0747c4…074958 Dummy {f00=0x0025, f01=0x0190, f02=» < $" = @ A A A : A W @ n A A 0 A U 0 ( @ @ A A l ( : U l W @ #U. A @ A p @ p A : ; [ [ [ Z Z Z : : < , = = $ -
0x074958…074aec Dummy {f00=0x0025, f01=0x0190, f02=»Y : @ U : @ A R _ : A : ( W ` A A "( ES NO A , W ! T _ !//T ( _ 0Z2 U ]@ 1 Y< ZT A B 0DISC LABEL IS LLLLLLLL
0x074aec…074c80 Dummy {f00=0x0025, f01=0x0190, f02=» < $" = @ A A A : A W @ T 8 : 8 = V Y Y : , %Q R Y W W Z ' [ : W ?B?e + A A ( @ T2 : W A A & " Y : A ]B 0TOO MANY I/O ERRORS ON DISC P
0x074c80…074e14 (0, 148) Opaque[0x194]
0x074e14…074fa8 # DirEnt {nam=»INTVMA«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x04a8, f03=0x2020}
0x074e14…074fa8 IdxSect {
0x074e14…074fa8 f00 = 0x0025 // 0x74e14 @0x0
0x074e14…074fa8 f01 = 0x0008 // 0x74e16 @0x2
0x074e14…074fa8 gno = [ // 0x74e18 @0x4
0x074e14…074fa8 [0x00]: C0x0025.0x1.0
0x074e14…074fa8 [0x01]: C0x0025.0x2.0
0x074e14…074fa8 [0x02]: C0x0025.0x3.0
0x074e14…074fa8 [0x03]: C0x0026.0x0.0
0x074e14…074fa8 ]
0x074e14…074fa8 }
0x074fa8…07513c Dummy {f00=0x0025, f01=0x0190, f02=» 2 P IDENT INTVMA REL 8.2 78-09-15 870105040820 P : P* B 8 P*************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 4 P* INTVMA = INTERRUPT VECTORS AND SYSTEM START 4 P*
0x07513c…0752d0 Dummy {f00=0x0025, f01=0x0190, f02=»********* f P P P " P* * P* 4 8 P* THIS MODULE CONTAINS HARDWARE INTERRUPT VECTORS, > . P* COMMUNICATION VECTOR TABLE,STACK AREA z $ P* AND MONITOR INITIALIZATION. P* P* P P P P P
0x0752d0…075464 Dummy {f00=0x0025, f01=0x0190, f02=» ENTRY CVTSBA ADDRESS TO START OF BUFFER POOL 0 P ENTRY CVTEBA ADDRESS TO END OF BUFFER POOL 6 , P ENTRY CVTINP INTERPRETER ADDRESS TABLE j P ENTRY CVTDK START UP DISC & P ENTRY CVTAPA APPLICATION ADDRESS , P ENTRY CVTAPS APPLICATION START AD
0x075464…0755f8 Dummy {f00=0x0025, f01=0x018e, f02=»T LOAD BLOCK TABLE ADDRESS | ( P ENTRY FREPAR FREE PARTITION POINTER " " P ENTRY PARLEN PARTITION LENGTH N & P ENTRY NUMPAR NUMBER OF PARTITIONS t P , P EXTRN IHPFAR POWER FAIL / AUTO RESTART P EXTRN IHLKM LKM INTERRUPT P EXTRN IHRTC REA
0x0755f8…07578c Dummy {f00=0x0025, f01=0x0190, f02=» P** P** P** P** " P** , * P EXTRN CHRT1 REMOTE CHANNEL UNIT NO. 1 6 * P EXTRN CHRT2 REMOTE CHANNEL UNIT NO. 2 d P EXTRN CHRT3 P EXTRN CHRT4 ( P EXTRN IHCC1 CASSETTE CHANGER NO. 1 ( P EXTRN IHCC2
0x07578c…075920 Dummy {f00=0x0025, f01=0x0190, f02=»2 l P EXTRN CHLT3 P EXTRN CHLT4 P EXTRN IHFD FLOPPY DISCEN 2 P EXTRN IHLP LINE PRINTER T P EXTRN IHCR CARD-READER t P EXTRN IHDU1 DISC UNIT NO. 1 P EXTRN IHDU2 DISC UNIT NO. 2 P EXTRN IHMT MAG. TAPE $ P EXTRN ILLINT
0x075920…075ab4 (0, 149) Dummy {f00=0x0025, f01=0x018e, f02=»TB:ST TASK STATUS AND LEVEL ( P EXTRN PRUN TTAB FOR RUNNING PROGRAM $ 0 P EXTRN INIMON MONITOR INITIALIZATION ROUTINE P P EXTRN BUG BUGGER * P EXTRN PFINIT INIT AFTER MASTER CLEAR P EXTRN IHINPT TRAP HANDLER P* P P $ P
0x075ab4…075c48 Dummy {f00=0x0025, f01=0x0190, f02=» h PX:B EQU 0 ( PNUMPAR EQU X:B NUMBER OF PARTITIONS 8 P* BY SETTING X:A NOT EQUAL TO ZERO, UNLOAD IS NOT F < P* PERFORMED ON CASSETTE AFTER THE APPLICATION LOADING P* PX:C EQU 0 PUNLOAD EQU X:C P PREL0 EQU *
0x075c48…075ddc Dummy {f00=0x0025, f01=0x0190, f02=» P DATA IHRTC 2 P DATA ILLINT 3 P DATA ILLINT 4 < P DATA ILLINT 5 X P DATA ILLINT 6 t P DATA IHTW 7 P DATA IHTC 8 P DATA IHSOP 9 P DATA ILLINT 10 P DATA ILLINT
0x075ddc…075f70 Dummy {f00=0x0025, f01=0x0190, f02=»1 16 P DATA CHRT2 17 P DATA CHRT3 18 . P DATA CHRT4 19 J P DATA IHCC1 20 f P DATA IHCC2 21 P DATA ILLINT 22 P DATA IHCC3 23 P DATA CHLT1 24 P DATA CHLT2 25
0x075f70…076104 Dummy {f00=0x0025, f01=0x0190, f02=» ~ P DATA ILLINT 31 P DATA ILLINT 32 $ P DATA ILLINT 33 @ P DATA IHLP 34 P DATA IHCR 35 v P DATA ILLINT 36 P DATA ILLINT 37 P DATA ILLINT 38 P DATA ILLINT 39 P DATA IH
0x076104…076298 Dummy {f00=0x0025, f01=0x0190, f02=»ILLINT 45 P DATA ILLINT 46 P DATA ILLINT 47 2 P DATA ILLINT 48 N P DATA ILLINT 49 j P DATA ILLINT 50 P DATA ILLINT 51 P DATA ILLINT 52 P DATA ILLINT 53 P DATA ILLINT
0x076298…07642c Dummy {f00=0x0025, f01=0x0190, f02=» 59 P DATA ILLINT 60 P DATA ILLINT 61 * P DATA ILLINT 62 F P DATA IHINPT TRAP ROUTINE b P HLT P EJECT P P* P* SYSTEM HALTS P* P P HLT P HLT P P P P
0x07642c…0765c0 Dummy {f00=0x0025, f01=0x0190, f02=» & PCVTSBA DATA 0 START OF BUFFER AREA $ PCVTEBA DATA 0 END OF BUFFER AREA . , PCVTINP DATA 0 INTERPPRETER TABLE ADDRESS V P RF INIT P RF BUGG & PCVTAPA DATA 0 APPLICATION ADDRESS * PCVTAPS DATA 0 APPLICATON START ADDRESS " PCVTCLK DAT
0x0765c0…076754 (0, 150) Dummy {f00=0x0025, f01=0x0190, f02=» P* INIMON AND BUGGER ENTRIES P* ( P 2 2 PINIT LDKL A1,INIMON INITIALIZE AND START APPL : P RF BRANCH p P " PBUGG LDKL A13,/90 START BUGGER P LDKL A14,-8 P AD A14,CVTAPA P LDKL A1,BUG PBRANCH ABR(NZ) A1 P
0x076754…0768e8 Dummy {f00=0x0025, f01=0x0190, f02=»ND n P* P PCHCREX CIO A1,1,CHCR P SST A3,CHCR 8 P RB(NA) *-2 L P RTN A8 ` P EJECT p P ~ P* P* INITIALIZATION ENTRY P* P 4 PINIM LDK A6,CHCREX-REL0 LOAD CHCREX SUBR ADDRESS P LDR A8,P AND ST
0x0768e8…076a7c Dummy {f00=0x0025, f01=0x0190, f02=»* P* COMPUTE MEMORY SIZE P* ( P 2 P LDKL A1,/5555 : P LDKL A2,4094 P PINIM30 SUKL A2,4096 f P LDR* A3,A2 SAVE CONTENTS P STR A1,A2 CHECK IF MEMORY P CWR* A1,A2 P RB(NE) INIM30 P P STR A3,A2 RESTO
0x076a7c…076c10 Dummy {f00=0x0025, f01=0x0190, f02=» EJECT P P* P* LOAD APPLICATION P* : P D " P LDKL A1,/0400 IND LOAD ON SOP L P OTR A1,0,SOP r * P LDKL A12,INIM20 INSTRUCTION AFTER APL P ABR A2 PERFORM APL P PINIM20 EQU * P IFT UNLOAD=0 P LDK
0x076c10…076da4 Dummy {f00=0x0025, f01=0x0190, f02=»ART ADDRESS z P EJECT P " P* * P* INITIALIZE STACK 4 P* N P X ( PINIM40 LD A15,CVTSTB LOAD STACK BASE ` P LDKL A1,LOOP P STR A1,A15 P LDKL A1,/FC00 & P STR A1,A15 ADJUST STACK FOR LOOP P SUKL A15,28
0x076da4…076f38 Dummy {f00=0x0025, f01=0x018e, f02=»AB ADDRESS P LDR* A4,A1 TCTAB LENGTH PINIM50 ADK A1,2 2 P SUK A4,2 J P RF(NZ) INIM60 P HLT NO USER TASK FOUND r P " PINIM60 LDR* A5,A1 TTAB ADDRESS ( P LD A2,TTB:ID,A5 TASK IDENTIFICATION P RB(N) INIM50 MONITOR TASK
0x076f38…0770cc Dummy {f00=0x0025, f01=0x0190, f02=» P P* P* START SYSTEM P* 0 P : P LDKL A13,WAITIS B * P STR A13,A15 STORE USER START ADDRESS Z " P STR A7,A15 AND LEVEL ON STACK " P ABL PFINIT INITIALIZE DEVICES P RES 80 PSTB EQU *-2 STACK BASE P
0x0770cc…077260 Dummy {f00=0x0025, f01=0x406e, f02=» DATA 6 ( P LDK A1,0 EXIT PARAMETER = CASSETTE P ABI CVTAPS < P P P END INIM X@ jSER START ADDRESS Z " P STR A7,A15 AND LEVEL ON STACK " P ABL PFINIT INITIALIZE DEVICES P RES 80 PSTB EQU *-2 STACK BASE P
0x077260…0773f4 (0, 151) Dummy {f00=0x0026, f01=0x2008, f02=» P P END INIM @ & P EJECT 2 P @ P* H P* START SYSTEM R P* h P r P LD A13,CVTAPS z * P STR A13,A15 STORE USER START ADDRESS " P STR A7,A15 AND LEVEL ON STACK " P ABL PFINIT INITIALIZE DEVICES
0x0773f4…077588 Dummy {f00=0x0026, f01=0x0190, f02=» IH8124 DW8121 DW8122 , IH8121 @ IH8122 T DW8119 h DW8120 | IH8119 IH8120 DW8117 DW8118 IH8117 IH8118
0x077588…07771c Dummy {f00=0x0026, f01=0x0190, f02=» IH8114 DW8111 DW8112 , IH8111 @ IH8112 T DW8109 h DW8110 | IH8109 IH8110 DW8107 DW8108 IH8107 IH8108
0x07771c…0778b0 Dummy {f00=0x0026, f01=0x0190, f02=» IH8104 INTSAV ILLINT * DISIOE < DWTST N , ( { T A P X ^ TENDIO TDISP , ( ! T 8!@X " , ( @X ! @ @ Y ! _.
0x0778b0…077a44 Dummy {f00=0x0026, f01=0x0190, f02=» Y p SETIME , ( ) 2 Y 4 X ( ! ! Y " , ( G ! y W Y X ( ! ! R , ( g T Y ] X T 8 SETIMP , ( !@P ! ] _ 0 , ( @ d
0x077a44…077bd8 Dummy {f00=0x0026, f01=0x0190, f02=» P C X ! ECBCW ( * & X ( ! T B 8 ECBBA f , ( AR _: _@ b v DWTOR * & #@ X ! " Q R Y , ( = Y X ! 8X
0x077bd8…077d6c Dummy {f00=0x0026, f01=0x0190, f02=» h , ( @ _.$ X2 8 X ! " B X ( , ( 0P } _^ > X 8 , ( ( ] 2 ! X V h , ( ! ! ! ! ! * & X X4 %_< * * X * & !
0x077d6c…077f00 Dummy {f00=0x0026, f01=0x0190, f02=») ! ! R ! ^ ! , ( ! B # X " 6 ) X 2T $ , ( Y 2W ! Y ,ZD X 4T X " T , ( 6 Y 4 W ] & , ( ! ! X ] _ ! , ( ! X P y Y
0x077f00…078094 (0, 152) Opaque[0x194]
0x078094…078228 # DirEnt {nam=»INIMOD«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x04c8, f03=0x2020}
0x078094…078228 IdxSect {
0x078094…078228 f00 = 0x0026 // 0x78094 @0x0
0x078094…078228 f01 = 0x0002 // 0x78096 @0x2
0x078094…078228 gno = [ // 0x78098 @0x4
0x078094…078228 [0x00]: C0x0026.0x1.0
0x078094…078228 ]
0x078094…078228 }
0x078228…0783bc Dummy {f00=0x0026, f01=0x018e, f02=» 2 P IDENT INIMOD REL 8.2 78-09-15 870105040820 P : P* B " P****************************** L P* r $ P* PHILIPS TERMINAL SYSTEM PTS | P* D P* INIMOD= DUMMY MODULE HOLDING ADDRESSES BUG INIMON AND DCEXT " P* AND DATA MANAG
0x0783bc…078550 Dummy {f00=0x0026, f01=0x4182, f02=» ~ P* P* P ENTRY INIMON P ENTRY BUG 2 P ENTRY DCEXT D P ENTRY DM:TSK X P EXTRN TTABD0 n P EXTRN TTABD1 P EXTRN TTABD2 P* PINIMON EQU 0 INIMON PBUG EQU 0 DEBUGGER PDCEXT EQU 0 PDM:T
0x078550…0786e4 Dummy {f00=0x0026, f01=0x2008, f02=» NT INIMOD P* P* DUMMY MODULE $ P* < P* F P ENTRY INIMON P P ENTRY BUG f P* x P* PINIMON EQU 0 INIMON PBUG EQU 0 DEBUGGER P END @
0x0786e4…078878 Dummy {f00=0x0026, f01=0x0190, f02=»BRT ABORT INTERTASK REQUEST P EXTRN FREBLK FREE ONE BLOCK $ P H P P " PDWTECH EQU /22 ECHO DEVICE DWT X P* ~ P* CONDITIONAL ASSEMBLY P* > P* BY SETTING X:A=0 NO ACTIVATION (IF ANY) WILL TAKE PLACE @ P* IF X:A=1 I/O REQU
0x078878…078a0c Dummy {f00=0x0026, f01=0x0190, f02=»ORTED z PCREDIT EQU 0 P EJECT " P 0 P* 8 P* ABORT I/O REQUEST B P* ^ P h PTABORT LDR* A3,A8 p , P RF(N) TABOER REQUEST ALREADY COMPLETED P ( P CF A15,FNDDWT LOOK FOR DWT ADDRESS P LDR A8,A6 P RF(Z) T
0x078a0c…078ba0 Dummy {f00=0x0026, f01=0x0190, f02=»OER DEVICE NOT BUSY P P SLC A7,2 $ $ P RF(NN) TABO20 NOT ECHO REQUEST 6 " P LD A6,DWTECH,A6 GET ECHO DWT ^ $ P CF A15,TENDIO ABORT ECHO DEVICE P LDR A6,A8 RESTORE DWT PTABO20 EQU * . P CF A15,ITABRT ABORT IF INTERTASK REQUEST
0x078ba0…078d34 (0, 153) Opaque[0x194]
0x078d34…078ec8 # DirEnt {nam=»TDISP «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x04d0, f03=0x2020}
0x078d34…078ec8 IdxSect {
0x078d34…078ec8 f00 = 0x0026 // 0x78d34 @0x0
0x078d34…078ec8 f01 = 0x0004 // 0x78d36 @0x2
0x078d34…078ec8 gno = [ // 0x78d38 @0x4
0x078d34…078ec8 [0x00]: C0x0026.0x2.0
0x078d34…078ec8 [0x01]: C0x0026.0x3.0
0x078d34…078ec8 ]
0x078d34…078ec8 }
0x078ec8…07905c Dummy {f00=0x0026, f01=0x0190, f02=» 0 P IDENT TDISP REL 8.2 78-09-15 870105040820 P 8 P* @ 6 P************************************************** J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* TDISP = TERMINAL DISPATCHER P* P* P* P*
0x07905c…0791f0 Dummy {f00=0x0026, f01=0x0190, f02=»INAL DISPATCHER IN TOSS. | > P* ENTRY POINT IS 'TDISP' WITH 8 REGISTERS ON A15 STACK. > P* THE DISPATCHER CHECKS IF THERE IS A JOB IN DISPATCHER- b < P* QUEUE WITH HIGHER PRIORITY THAN INTERRUPTED PROGRAM. < P* - IF SO THE QUEUED PROGRAM IS ST
0x0791f0…079384 Dummy {f00=0x0026, f01=0x0190, f02=»TED PROGRAM VIA RETUR8. h P* @ P* AN ENTRYPOINT 'LKMDIS' IS ALSO INCLUDED IN THIS MODULE. * D P* THIS PART IS DISPATCHED AFTER EACH LKM-REQUEST.(NO REGISTERS n H P* ON STACK) A CHECK IS MADE IF THERE IS A JOB IN DISPATCHER QUEUE 6 P* WI
0x079384…079518 Dummy {f00=0x0026, f01=0x0190, f02=»OGRAM VIA RETU14. b P* P* $ > P* AN OPTIONALY ENTRYPOINT 'DISIOE' IS ALSO PROVIDED FOR . > P* ERRORS IN I/O DRIVERS. BIT 0 IS SET IN A1 AND THE SUB- p < P* ROUTINE 'TENDIO' IS CALLED BEFORE THE 'TDISP'-ENTRY P* IS ENTERED. @
0x079518…0796ac Dummy {f00=0x0026, f01=0x0190, f02=»********* P* " P ENTRY TDISP DISPATCHER ENTRY & P ENTRY LKMDIS DISPATCHED AFTER LKM B " P ENTRY DISIOE I/O ERROR ENTRY l & P ENTRY DISEND END I/O AND DISPATCH < P ENTRY DISQUE POINTER TO FIRST PLACE IN DISPATCHER-QUEUE 6 P ENTRY GBQUE
0x0796ac…079840 Dummy {f00=0x0026, f01=0x0190, f02=»RY RETU14 RESTORE REGISTER A14-A1 VIA A15 STACK P ENTRY RETU13 8 P ENTRY RETU12 N P ENTRY RETU11 d P ENTRY RETU10 z P ENTRY RETUR9 P ENTRY RETUR8 P ENTRY RETUR7 P ENTRY RETUR6 P ENTRY RETUR5 P ENTRY RET
0x079840…0799d4 (0, 154) Dummy {f00=0x0026, f01=0x0190, f02=» P EJECT $ P ENTRY DWTCHP CHANNEL PARAMETER P ENTRY DWTST STATUS > P ENTRY DWTECB ECB ADDRESS Z P ENTRY DWTOR ORDER | * P ENTRY DWTADR POINTER TO ADDRESS-BLOCK P ENTRY DWTTAB TTAB-ADDRESS * P ENTRY DWTWAT WAIT ACTIVATE INDICA
0x0799d4…079b68 Dummy {f00=0x0026, f01=0x0190, f02=»L VOLUME NAME P ENTRY ECBBA,ECBRL,ECBEL P ENTRY ECBRC,ECBCW 6 & P ENTRY SACT ACTIVE SEGMENT POINTER P 8 P ENTRY LRUNEW DUMMY FOR MEMORY MANAGEMENT (OVERLAY) z P EJECT P* P************* P* EXTERNALS * P*************
0x079b68…079cfc Dummy {f00=0x0026, f01=0x0190, f02=»D I/O P EXTRN EXIT PROGRAM EXIT & P EXTRN BLOK:S START OF BLOCK POOL . $ P EXTRN BLOCKE BLOCK POOL LENGTH X P EJECT P P* . P****************************************** P* & P* DWT-DISPLACEMENT DECLARATIONS P*
0x079cfc…079e90 Dummy {f00=0x0026, f01=0x0190, f02=» PDWTECB EQU 4 ECB-ADDRESS PDWTOR EQU 6 ORDER $ & PDWTADR EQU 8 ADDRESS BLOCK POINTER > PDWTTAB EQU 10 TTAB-ADDRESS h * PDWTWAT EQU 12 WAIT/ACTIVATE INDICATOR PDWTTQ EQU 14 TERMINAL QUEUE PDWTWA EQU 16 WORK AREA * PDWTTDM EQU 16
0x079e90…07a024 Dummy {f00=0x0026, f01=0x0190, f02=»PLACEMENTS P* " P****************************** P* B PECBBA EQU /02 L PECBRL EQU /04 b PECBEL EQU /06 x PECBRC EQU /08 PECBCW EQU /0A P EJECT P* P* D I S Q U E P* 2 P* POINTER TO FIRST
0x07a024…07a1b8 Dummy {f00=0x0026, f01=0x0190, f02=» OF RUNING PROGRAM P* PPRUN EQU * $ P DATA 0 6 P* F P* S R U N P P* d P* RUNNING SEGMENT POINTER n P* PSRUN EQU * P DATA 0 $ P******************************* P* P* S A C T P*
0x07a1b8…07a34c Dummy {f00=0x0026, f01=0x0190, f02=»EW EQU * P* P* G B Q U E P* 0 4 P* POINTER TO FIRST TASK TABLE IN BUFFER QUEUE : P* r PGBQUE EQU * | P DATA 0 PFREQUE DATA BLOK:S PBLOCKL DATA BLOCKE P* P EJECT P* P* D I S I O E
0x07a34c…07a4e0 Dummy {f00=0x0026, f01=0x0190, f02=»DE t P* PDISEND EQU * P CF A15,TENDIO ( P EJECT > P* L P* V P* T D I S P ` P* v $ P* THIS IS THE DISPATCHER ENTRY P* PTDISP EQU * P INH P LD A5,DISQUE " P RF(Z) RETUR8 NO QUEUE,RETURN
0x07a4e0…07b180 (1, 0) DirGranule ((1, 0)) {
0x07a4e0…07b180 DirEnt {nam=»TOSSWO«, typ=»RK«, f00=0x0000, f01=0x0000, f02=0x04e0, f03=0x0000}
0x07a4e0…07b180 DirEnt {nam=»DRTW01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x04e8, f03=0x4441}
0x07a4e0…07b180 DirEnt {nam=»DRTC01«, typ=»SC«, f00=0x3039, f01=0x3131, f02=0x0518, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»LRPINT«, typ=»SC«, f00=0x434b, f01=0x204e, f02=0x0558, f03=0x203d}
0x07a4e0…07b180 DirEnt {nam=»TPROC «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0578, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»TIMER «, typ=»SC«, f00=0xffff, f01=0xffff, f02=0x0598, f03=0xffff}
0x07a4e0…07b180 DirEnt {nam=»MSUBS «, typ=»SC«, f00=0xffff, f01=0xffff, f02=0x05b0, f03=0xffff}
0x07a4e0…07b180 DirEnt {nam=»GRBUF «, typ=»SC«, f00=0xffff, f01=0xffff, f02=0x05e8, f03=0xffff}
0x07a4e0…07b180 DirEnt {nam=»TABORT«, typ=»SC«, f00=0xffff, f01=0xffff, f02=0x05f8, f03=0xffff}
0x07a4e0…07b180 DirEnt {nam=»TDISP «, typ=»SC«, f00=0xffff, f01=0xffff, f02=0x0608, f03=0xffff}
0x07a4e0…07b180 DirEnt {nam=»MONTIM«, typ=»SC«, f00=0xffff, f01=0xffff, f02=0x0628, f03=0xffff}
0x07a4e0…07b180 DirEnt {nam=»INTLT1«, typ=»SC«, f00=0x0008, f01=0x2020, f02=0x0638, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»INTLT2«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0640, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»INTRT1«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0648, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»INTRT2«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0650, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»TC:TAB«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0658, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»BLOK:S«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0660, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»PFTAB «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0668, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»TTABX «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0670, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»LKMAL «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0678, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DVTKB «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0680, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DVTTP «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0688, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DVTGP «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0690, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DVTDI «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0698, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DVTDN «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x06a0, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DVTDY «, typ=»SC«, f00=0x4c20, f01=0x3d20, f02=0x06a8, f03=0x4431}
0x07a4e0…07b180 DirEnt {nam=»DRLT01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x06b0, f03=0x4441}
0x07a4e0…07b180 DirEnt {nam=»DRSOP1«, typ=»SC«, f00=0x3039, f01=0x3131, f02=0x0708, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»INPRET«, typ=»SC«, f00=0x434b, f01=0x204e, f02=0x0730, f03=0x203d}
0x07a4e0…07b180 DirEnt {nam=»DRDN01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0740, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DRDI01«, typ=»SC«, f00=0x1e12, f01=0x5400, f02=0x0758, f03=0x948c}
0x07a4e0…07b180 DirEnt {nam=»DRTP01«, typ=»SC«, f00=0x8226, f01=0x3ae1, f02=0x0778, f03=0x0002}
0x07a4e0…07b180 DirEnt {nam=»DRMT01«, typ=»SC«, f00=0x5600, f01=0x1908, f02=0x07b0, f03=0x1502}
0x07a4e0…07b180 DirEnt {nam=»DRLP01«, typ=»SC«, f00=0x9da0, f01=0x0001, f02=0x07e8, f03=0x5f28}
0x07a4e0…07b180 DirEnt {nam=»DRGP01«, typ=»SC«, f00=0x4dc0, f01=0x5c04, f02=0x0808, f03=0x001f}
0x07a4e0…07b180 DirEnt {nam=»DRKB01«, typ=»SC«, f00=0x855d, f01=0x0000, f02=0x0838, f03=0x3d49}
0x07a4e0…07b180 DirEnt {nam=»DRDY01«, typ=»SC«, f00=0x0009, f01=0x2020, f02=0x0878, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»INIMON«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x08d0, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»TTMJOB«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x08e8, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DRRT01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x08f0, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»INTVMA«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0998, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»INTVMO«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x09b8, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»INIMOD«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x09d8, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»SHIFT «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x09e0, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»WRITE «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x09f0, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x2020, f01=0x2020, f02=0x0a20, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»MULDIV«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0e90, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»FUNCTN«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0eb0, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»OBDIR «, typ=»UF«, f00=0x2020, f01=0x2020, f02=0x0ee0, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DRKB03«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0f18, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»MONTAB«, typ=»SC«, f00=0x4c20, f01=0x3d20, f02=0x0f58, f03=0x4431}
0x07a4e0…07b180 DirEnt {nam=»DC:TAB«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0f60, f03=0x4441}
0x07a4e0…07b180 DirEnt {nam=»DRDC07«, typ=»SC«, f00=0x3039, f01=0x3131, f02=0x0f68, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»MOXTAB«, typ=»SC«, f00=0x434b, f01=0x204e, f02=0x0fe8, f03=0x203d}
0x07a4e0…07b180 DirEnt {nam=»TCLASS«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0ff0, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»ECLASS«, typ=»SC«, f00=0x1e12, f01=0x5400, f02=0x0ff8, f03=0x948c}
0x07a4e0…07b180 DirEnt {nam=»SCLASS«, typ=»SC«, f00=0x8226, f01=0x3ae1, f02=0x1000, f03=0x0002}
0x07a4e0…07b180 DirEnt {nam=»DRTP02«, typ=»SC«, f00=0x5600, f01=0x1908, f02=0x1008, f03=0x1502}
0x07a4e0…07b180 DirEnt {nam=»DRCC01«, typ=»SC«, f00=0x9da0, f01=0x0001, f02=0x1048, f03=0x5f28}
0x07a4e0…07b180 DirEnt {nam=»CD:TAB«, typ=»SC«, f00=0x4dc0, f01=0x5c04, f02=0x10b0, f03=0x001f}
0x07a4e0…07b180 DirEnt {nam=»DRDU01«, typ=»SC«, f00=0x855d, f01=0x0000, f02=0x10b8, f03=0x3d49}
0x07a4e0…07b180 DirEnt {nam=»CTABX «, typ=»SC«, f00=0x000a, f01=0x2020, f02=0x10f0, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DRCG01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x10f8, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DRCD01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1130, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DVTCG «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1140, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DVTCD «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1148, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»ATTACH«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1150, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DRDC15«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1168, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»INIMOM«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1210, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»INPREO«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1230, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DMTASS«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1248, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»INTVMD«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1288, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»LOADER«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x12b0, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»LDTASK«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x12c0, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»RELUP «, typ=»UF«, f00=0x2020, f01=0x2020, f02=0x12e0, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»TDISPO«, typ=»SC«, f00=0x4c20, f01=0x3d20, f02=0x12f0, f03=0x4431}
0x07a4e0…07b180 DirEnt {nam=»TIODM «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1318, f03=0x4441}
0x07a4e0…07b180 DirEnt {nam=»DMTASK«, typ=»SC«, f00=0x3039, f01=0x3131, f02=0x1348, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»TASS «, typ=»SC«, f00=0x434b, f01=0x204e, f02=0x13d0, f03=0x203d}
0x07a4e0…07b180 DirEnt {nam=»DMINIT«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1400, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DMSUBX«, typ=»SC«, f00=0x1e12, f01=0x5400, f02=0x1410, f03=0x948c}
0x07a4e0…07b180 DirEnt {nam=»DMFDB «, typ=»SC«, f00=0x8226, f01=0x3ae1, f02=0x1440, f03=0x0002}
0x07a4e0…07b180 DirEnt {nam=»DFTAB «, typ=»SC«, f00=0x5600, f01=0x1908, f02=0x1450, f03=0x1502}
0x07a4e0…07b180 DirEnt {nam=»TTABD0«, typ=»SC«, f00=0x9da0, f01=0x0001, f02=0x1458, f03=0x5f28}
0x07a4e0…07b180 DirEnt {nam=»TTABD1«, typ=»SC«, f00=0x4dc0, f01=0x5c04, f02=0x1460, f03=0x001f}
0x07a4e0…07b180 DirEnt {nam=»M:PROC«, typ=»UF«, f00=0x855d, f01=0x0000, f02=0x1468, f03=0x3d49}
0x07a4e0…07b180 DirEnt {nam=»ATTACX«, typ=»SC«, f00=0x000b, f01=0x2020, f02=0x1470, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DRFD01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1478, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DMSUBR«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x14e0, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DRIC01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1518, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DRCP01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1538, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DWCP01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1548, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DRCR01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1550, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»TTABD2«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1578, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DRMS01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1580, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DVTMS «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x15a8, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DRIC0X«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x15b0, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DROD01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x15b8, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DVTOD «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x15e8, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»EBCDIC«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x15f0, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DMBUF «, typ=»SC«, f00=0x4c20, f01=0x3d20, f02=0x1600, f03=0x4431}
0x07a4e0…07b180 DirEnt {nam=»ADDMOD«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1620, f03=0x4441}
0x07a4e0…07b180 DirEnt {nam=»MPYMOD«, typ=»SC«, f00=0x3039, f01=0x3131, f02=0x1630, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DIVMOD«, typ=»SC«, f00=0x434b, f01=0x204e, f02=0x1640, f03=0x203d}
0x07a4e0…07b180 DirEnt {nam=»DSUMOD«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1650, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DMRUTS«, typ=»UF«, f00=0x1e12, f01=0x5400, f02=0x1660, f03=0x948c}
0x07a4e0…07b180 DirEnt {nam=»INTLT3«, typ=»SC«, f00=0x8226, f01=0x3ae1, f02=0x1668, f03=0x0002}
0x07a4e0…07b180 DirEnt {nam=»INTLT4«, typ=»SC«, f00=0x5600, f01=0x1908, f02=0x1670, f03=0x1502}
0x07a4e0…07b180 DirEnt {nam=»INTRT3«, typ=»SC«, f00=0x9da0, f01=0x0001, f02=0x1678, f03=0x5f28}
0x07a4e0…07b180 DirEnt {nam=»INTRT4«, typ=»SC«, f00=0x4dc0, f01=0x5c04, f02=0x1680, f03=0x001f}
0x07a4e0…07b180 DirEnt {nam=»DW1501«, typ=»SC«, f00=0x855d, f01=0x0000, f02=0x1688, f03=0x3d49}
0x07a4e0…07b180 DirEnt {nam=»DWII01«, typ=»SC«, f00=0x000c, f01=0x2020, f02=0x1690, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»TIODMX«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1698, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DWIO01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x16a0, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DW0701«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x16a8, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DRDC17«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x16b0, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DRDC81«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1730, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DRTP03«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1808, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DVTT1 «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1840, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DRDC22«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1848, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»DW2201«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x18d8, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»LARSEK«, typ=»UF«, f00=0x2020, f01=0x2020, f02=0x18e0, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»JOSKB «, typ=»UF«, f00=0x2020, f01=0x2020, f02=0x18e8, f03=0x2020}
0x07a4e0…07b180 DirEnt {nam=»JOSKB1«, typ=»UF«, f00=0x2020, f01=0x2020, f02=0x18f0, f03=0x2020}
0x07a4e0…07b180 }
0x07b180…07b314 (1, 1) Opaque[0x194]
0x07b314…07b4a8 # DirEnt {nam=»DRTW01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x04e8, f03=0x4441}
0x07b314…07b4a8 IdxSect {
0x07b314…07b4a8 f00 = 0x0027 // 0x7b314 @0x0
0x07b314…07b4a8 f01 = 0x000c // 0x7b316 @0x2
0x07b314…07b4a8 gno = [ // 0x7b318 @0x4
0x07b314…07b4a8 [0x00]: C0x0027.0x1.0
0x07b314…07b4a8 [0x01]: C0x0027.0x2.0
0x07b314…07b4a8 [0x02]: C0x0027.0x3.0
0x07b314…07b4a8 [0x03]: C0x0028.0x0.0
0x07b314…07b4a8 [0x04]: C0x0028.0x1.0
0x07b314…07b4a8 [0x05]: C0x0028.0x2.0
0x07b314…07b4a8 ]
0x07b314…07b4a8 }
0x07b4a8…07b63c Dummy {f00=0x0027, f01=0x0190, f02=» 2 P IDENT DRTW01 REL 8.2 78-09-15 870105040820 P : P INPUT WITHOUT READ B P REL 8.1 78-04-21 ` P | P* 6 P************************************************** P* $ P* PHILIPS TERMINAL SYSTE PTS P* , P*
0x07b63c…07b7d0 Dummy {f00=0x0027, f01=0x0190, f02=»****************** p P* < P* THIS DRIVER HANDLES INPUT AND OUTPUT TO TYPEWRITERS $ P* PTS 6862 d P* x P* P EJECT P* P* P*********** P* ENTRIES * P*********** P* P ENTRY TWAD ADDRESS
0x07b7d0…07b964 Dummy {f00=0x0027, f01=0x0190, f02=»******* P* P EXTRN DISIOE REQUEST ERROR P EXTRN TDISP DISPATCH > $ P EXTRN DISEND DISPATCH AND ENDIO * P EXTRN SETIME SET TIME BEFORE TIME-OUT . P EXTRN SAVE8 SAVE REGISTERS A1-A8 ON STACK P EXTRN DWTST DWT STATUS P EXT
0x07b964…07baf8 Dummy {f00=0x0027, f01=0x018e, f02=»********************* P* DWT-DISPLACEMENTS * P********************* < P* Z P* d PDWTA5 EQU /16 n PDWTHP EQU /28 PDWTTP EQU /20 PDWTBC EQU /3 PTWCLR EQU /25 PTWEOF EQU /26 PTWBSP EQU /24 PDW
0x07baf8…07bc8c Dummy {f00=0x0027, f01=0x0190, f02=» P* P******************** P* I/O-INSTRUCTIONS * P******************** D P* ` P* j PTWSTRT EQU /42C0 CIO-START t PTWHLT EQU /4280 CIO-HALT PTWINR EQU /4A00 INPUT PTWOTR EQU /4200 OUTPUT PTWSST EQU /4AC0 SENCE
0x07bc8c…07be20 Dummy {f00=0x0027, f01=0x0190, f02=» P* P* PCR EQU /0D CARRIAGE RETURN PLF EQU /0A LINE FEED > " PLNGERR EQU /8 INCORRECT LENGTH Z " PTPERR EQU /2 THROUGHPUT ERROR & PTIME EQU 300 TIME BEFORE TIME-OUT P* P* P************************ P* C
0x07be20…07bfb4 (1, 2) Dummy {f00=0x0027, f01=0x0190, f02=»:A PPOWUP EQU X:B P " PCREDIT EQU 0 * P* > P* H P* R PTWAD EQU * P DATA TWA ACTIVATION PART n P EJECT P* P* 2 P* ACTIVATION PART: CHECK VALIDITY OF ORDERS P* P* PTWA EQU *
0x07bfb4…07c148 Dummy {f00=0x0027, f01=0x0190, f02=» COPY ORDER P RF(NP) TWAERR REQUEST ERROR P SUK A2,4 8 P RF(Z) TWAERR REQUEST ERROR J P RF(N) TWAIN INPUT REQUEST n P SUK A2,2 " P RF(NP) TWAOUT OUTPUT REQUEST P* P* $ PTWAERR ABL DISIOE REQUEST ERROR P EJE
0x07c148…07c2dc Dummy {f00=0x0027, f01=0x0190, f02=»G ON THIS DEVICE z P LDR A1,A6 SAVE DWT-ADDRESS P CF A15,SETIME < P DATA TWTUT,TIME R , P ST A4,DWTTP,A6 SAVE TIMER BLOCK-ADDRESS j P XIF PTWA010 EQU * P IFT POWUP=1 " P LD A2,DWTST,A6 GET DWT-STATUS P ANKL A2,/200 0
0x07c2dc…07c470 Dummy {f00=0x0027, f01=0x0190, f02=»WER UP x P ABL IHTW35 PERFORM ENDIO P XIF 0 PTWA020 LDK A2,/21 < P* V P* ` ( PREAD CF A5,STRTIO EXECUTE CIO-START j P RF RED030 & PRED020 CF A5,STREG SAVE REGISTERS P EJECT P* P* RETURN AFTER INTERRUPT
0x07c470…07c604 Dummy {f00=0x0027, f01=0x018e, f02=» RF(P) RED050 ORDERS 02/03 P* " P* , 0 PRED035 CF A5,STORE STORE CHARACTER IN BUFFER 6 P CW A3,4,A8 j $ P RB(L) RED020 GET NEXT CHARACTER ~ P LDR A7,A7 P RF(Z) RED040 BASIC READ P* P* P LDK A1,LNGERR OVERFLOW
0x07c604…07c798 Dummy {f00=0x0027, f01=0x0190, f02=» P LD A7,DWTOR,A6 GET ORDER P ANK A7,/FF MASK ORDER & P CWK A7,4 D P RF(G) RED045 WRITE ORDER V " P LD A4,DWTTP,A6 TIMER POINTER x * P RF(Z) RED045 NO TIMIMG ON THIS DEVICE P CM* DWTTP,A6 RESET TIMER P XIF P PRED045
0x07c798…07c92c Dummy {f00=0x0027, f01=0x0190, f02=»DERS 02,03 P* P* PRED050 EQU * & " P LD A1,10,A8 GET CONTROL WORD : P RF(Z) RED080 NO KEYTABLE ` " P LCR A4,A1 GET NUMBER OF KEYS P ANK A4,/FF " P ADR A1,A4 ADDRESS TO LAST KEY P ADK A1,1 PRED060 SUK A4,1
0x07c92c…07cac0 Dummy {f00=0x0027, f01=0x0190, f02=» NOT IN KEYTABLE P ADR A4,A4 DOUBLE INDEX , P ST A4,10,A8 STORE INDEX IN CONTROL WORD 8 , PRED070 CF A5,STORE STORE KEY IN KEYTABLE h P RB RED040 EXECUTE CIO-HALT PRED080 CC A2,TWEOF,A6 " P RB(E) RED070 STANDARD EOR-KEY P CC A2,T
0x07cac0…07cc54 (1, 3) Dummy {f00=0x0027, f01=0x0190, f02=» CHARACTER NOT FOUND IN KEYTABLE P* * P* 4 P* > $ PRED090 LDR A4,A2 COPY CHARACTER H P ANK A4,/FF MASK p P LDR A1,A7 P SUK A1,1 P RF(Z) RED100 ORDER 02 P SUK A4,/30 ORDER 03 P RF(N) CODERR LESS THAN /30
0x07cc54…07cde8 Dummy {f00=0x0027, f01=0x0190, f02=»LESS THAN /20 P SUK A4,/3F $ P RF(NP) RED110 CORRECT CHARACTER * P* R P* $ PCODERR LDK A1,4 CODE CHECK ERROR f P ORS A1,8,A8 . P CF A5,STORE STORE CHARACTER IN ECB-BUFFER P RB RED040 EXECUTE CIO-HALT P* P*
0x07cde8…07cf7c Dummy {f00=0x0027, f01=0x0190, f02=»B(NE) RED035 P* P* P LDK A3,0 CLEAR ECB-BUFFER ( " P RB RED020 GET NEXT CHARACTER J P* p P* z PRED120 SUK A3,1 BACKSPACE & P RB(NN) RED020 GET NEXT CHARACTER P ADK A3,1 " P RB RED020 GET NEXT CHARACTER P
0x07cf7c…07d110 Dummy {f00=0x0027, f01=0x018e, f02=»D WRITE h P* P* PWRITE EQU * $ PTWAOUT EQU * 8 P INH L P LDK A4,0 X P LDK A2,0 j $ P CF A5,STRTIO EXECUTE CIO-START | P* P* P CWK A7,5 P RF(Z) WRT050 ORDER 05 P* P* " P LD A3,2,A8
0x07d110…07d2a4 Dummy {f00=0x0027, f01=0x0190, f02=» P* P* , P ST A4,DWTHP,A6 HEAD POSITION INDICATOR P LDK A4,2 H $ P LDK A2,CR SEND CARRIAGE RETURN Z P EJECT P* P* P* $ PWRT010 CF A5,OTR SEND CHARACTER P* P* P SUK A4,1 P RF(NP) WRT0
0x07d2a4…07d438 Dummy {f00=0x0027, f01=0x0190, f02=»3,1 P RF(NZ) WRT030 P LDK A2,/0C SEND FORM FEED $ P RB WRT010 F " PWRT030 LDK A3,2 BUFFER POINTER X P RF WRT050 GET CHARACTER ~ P* P* P* PWRT040 EQU * P CF A5,OTR SEND CHARACTER ( P IM DWTST,A6 INCREMENT
0x07d438…07d5cc Dummy {f00=0x0027, f01=0x0190, f02=» P RB(Z) RED040 LAST CHARACTER P CWK A7,5 , P RB(Z) WRT040 BASIC WRITE > P* ` P* j ( P LDR A1,A2 ORDER 06: STANDARD WRITE t P ANK A1,/FF P SUK A1,/07 P RB(Z) WRT040 BELL P* P SUK A1,/A P RF(E) WRT
0x07d5cc…07d760 Dummy {f00=0x0027, f01=0x0190, f02=» r P SUK A1,/20 " P RF(NP) WRT060 BETWEEN /60-/7F P* B P* L PERRCOD LDK A1,4 V P ORS A1,8,A8 n " P RB WRT050 GET NEXT CHARACTER P* P* PWRT060 SUK A2,/20 P RB WRT040 P* P* P EJECT
0x07d760…07d8f4 (1, 4) Dummy {f00=0x0028, f01=0x0190, f02=»CTER f P LDR A4,A2 COPY 4 P CF A5,GETCHR GET SECOND TAB. POSITION CHARACTER $ P ANK A2,/F P ANK A4,/F n P RF(Z) TAB020 PTAB010 ADK A2,/A P SUK A4,1 P RB(NZ) TAB010 P* PTAB020 SU A2,DWTHP,A6 4 P LC A4,DWT
0x07d8f4…07da88 Dummy {f00=0x0028, f01=0x0190, f02=» P LDR A4,A2 " PTAB030 LDK A2,/20 SEND BALNKS $ PTAB040 CF A5,OTR SEND CHARACTER < ( P IM DWTST,A6 INCREMENT BYTE COUNTER d P SUK A4,1 & P RB(NZ) TAB030 SEND ANOTHER SPACE P LDR A3,A3 P RB(NZ) WRT050 NOT RECOVERY & P SC A4
0x07da88…07dc1c Dummy {f00=0x0028, f01=0x0190, f02=»* P* RECOVERY ROUTINE P* & P* 0 P* : PTWON EQU * D P CF A15,SAVE8 V $ P LDKL A6,DWTW01 GET DWT-ADDRESS l P IFT POWUP=1 P LDKL A1,/200 & P ORS A1,DWTST,A6 INDICATE POWER UP P XIF P LD A1,DWTST,A6
0x07dc1c…07ddb0 Dummy {f00=0x0028, f01=0x0190, f02=»B,A6 ECB-ADDRESS P LDK A5,DWTSB2 P ADR A5,A6 GET STACK BASE . P SUK A7,4 P " P ABL(N) TWA010 ORDERS 01,02,03 b P SUK A7,1 P RF(Z) TWON20 ORDER 05 P INH P LDK A2,0 $ P CF A5,STRTIO EXECUTE CIO-START P LDK A2,CR
0x07ddb0…07df44 Dummy {f00=0x0028, f01=0x0190, f02=»R ORDER 05 ~ P ABL DISEND P* & P* 0 P EJECT : P* H P* R P* I H T W P* p 0 P* INTERRUPT HANDLER: PROCESS OF INTERRUPT z P* P* PIHTW EQU * $ P ST P,INTSAV SAVE LAST INTERRUPT P CF A15,SAVE
0x07df44…07e0d8 Dummy {f00=0x0028, f01=0x0190, f02=»DEVICE ADDRESS z P ORKL A2,TWSST P EXR A2 EXECUTE SST , P RF(A) IHTW30 ENDIO H P LD A7,DWTOR,A6 GET ORDER d P ANK A7,/FF P SUK A7,4 P RF(P) IHTW30 " P LDR* A2,A6 GET DEVICE ADDRESS P ORKL A2,TWINR P EXR A2
0x07e0d8…07e26c Dummy {f00=0x0028, f01=0x0190, f02=»TER r * P RF(Z) IHTW30 NO TIMING ON THIS DEVICE P LDKL A1,-TIME : P ST* A1,DWTTP,A6 P P XIF h P* t P* ~ PIHTW30 LDK A1,0 P RF LDREGE RESTORE REGISTERS P P PIHTW35 EQU * P IFT POWUP+TIMOUT=2 P
0x07e26c…07e400 Dummy {f00=0x0028, f01=0x0190, f02=»JECT P* P* PIHTW40 EQU * P* 4 P* > , PIHTW50 ST A3,6,A8 SAVE EFFECTIVE LENGTH H PIHTW55 SUK A7,4 x P RF(NP) IHTW60 READ ORDER P* P* $ P LC A3,DWTBC,A6 GET BYTE COUNTER * P ADS A3,DWTHP,A6 UPDATE HE
0x07e400…07e594 (1, 5) Dummy {f00=0x0028, f01=0x0190, f02=»A1,10,A8 CONVERT INDEX P ADK A1,2 P SRL A1,1 0 P ST A1,10,A8 B P XIF V P LDK A1,0 b P ABL DISEND PERFORM TENDIO t P* P* " PSKIP LDR* A2,A6 SKIP CHARACTER P ORKL A2,TWSST P EXR A2 SST P RF(A) EXIT
0x07e594…07e728 Dummy {f00=0x0028, f01=0x0190, f02=»I/O COMMANDS P* P* , PSTRTIO LDKL A1,TWSTRT EXECUTE CIO-START ( P RF EXECIO X ( PHLTIO LDKL A1,TWHLT CIO-HALT j P RF EXECIO " POTR LDKL A1,TWOTR OTR P* P* & PEXECIO ORR* A1,A6 GET I/O-COMMAND
0x07e728…07e8bc Dummy {f00=0x0028, f01=0x018e, f02=»LLOWED j $ P ST A3,DWTA3,A6 SAVE REGISTER A3 $ P ST A4,DWTA4,A6 A4 6 $ P ST A5,DWTA5,A6 A5 ^ PEXIT ABL TDISP PHALT ST A2,DWTA2,A6 " P CF A5,HLTIO EXECUTE CIO-HALT P LD A2,DWTA2,A6 P RB STRTIO RESTART
0x07e8bc…07ea50 Dummy {f00=0x0028, f01=0x018e, f02=» ( PSTORE LD A4,2,A8 GET BUFFER ADDRESS ! $ P ADR A4,A3 GET CHARACTER ADDRESS ! 4 P SCR A2,A4 STORE CHARACTER ! $ P ADK A3,1 INCREMENT BUFFER INDEX ! ~ P RTN A5 ! P* ! P* ! P* ! P IFT TIMOUT=1 ! P* ! P* ! P* TIMOUT
0x07ea50…07ebe4 Dummy {f00=0x0028, f01=0x0190, f02=» ! P* " P* " P EJECT " P* " * P* " 4 P* L D R E G E " > P* " V 8 P* RESTORE A3-A5 FROM DWT AND RETURN TO USER VIA A5 " ` P* " P* " PLDREGE EQU * " & P LD A3,DWTA3,A6 RELOAD REGISTER A3 " & P LD A4,DWTA4,A6
0x07ebe4…07ed78 Dummy {f00=0x0028, f01=0x0190, f02=»TURN VIA A5-STACK " P EJECT # P* # ( P* # 2 P* G E T C H R # < P* # T 8 P* SUBROUTINE TO GET ONE CHARACTER FROM ECB-BUFFER # ^ P* # P* ON ENTRY: # P* # P* A3 = BUFFER INDEX # P* A8 = ECB-ADDRESS # P* #
0x07ed78…07ef0c Dummy {f00=0x0028, f01=0x0190, f02=»CTER IS REACHED A3 IS STORED IN ECB EFFECTIVE LENGTH # ~ P* $ < P* $ F PGETCHR EQU * $ P P LD A1,4,A8 REQUESTED LENGTH $ d P SUR A1,A3 $ * P RF(NP) GCH010 LAST CHARACTER REACHED $ " P LD A1,2,A8 GET BUFFER ADDRESS $ P ADR A1,A3 $ P LCR A2,
0x07ef0c…07f0a0 Dummy {f00=0x0028, f01=0x0190, f02=»TH $ j P RTN A5 % P EJECT % P* % ( ( P* DEVICE WORK TABLE FOR TYPEWRITER % 2 P* % ^ P* % h PDWTW01 EQU * TABLE ENTRY % r " P DATA /0010 CHANNEL PARAMETER % 0 P DATA /8000 STATUS./8000 MEANS DEVICE READY % 0 P DATA 0,0 LAST OUTPUT, ORDER
0x07f0a0…07f234 (1, 6) Dummy {f00=0x0028, f01=0x0190, f02=» DATA 0 TERMINAL QUEUE % P DATA 0 OUTPUT QUEUE LINK & P DATA 0 SAVE AREA FOR A3 & @ P DATA 0 SAVE AREA FOR A4 & ` P DATA 0 SAVE AREA FOR A5 & P RES 4 STACK BASE & P DATA 1 TIMER POINTER & P DATA 0 ECHO DEVICE & ( P DATA /5F5E LEFT BYT
0x07f234…07f3c8 Dummy {f00=0x0028, f01=0x405c, f02=»A 0 HEAD POSITION POINETR & P DATA 0 SAVE AREA FOR A2 ' " P* ' B P END ' L@ ' X P DATA 0 SAVE AREA FOR A4 & ` P DATA 0 SAVE AREA FOR A5 & P RES 4 STACK BASE & P DATA 1 TIMER POINTER & P DATA 0 ECHO DEVICE & ( P DATA /5F5E LEFT BYT
0x07f3c8…07f55c Dummy {f00=0x0028, f01=0x2008, f02=» (
0x07f55c…07f6f0 Dummy {f00=0x0028, f01=0x0190, f02=» INTRT1 ,INTRT2 INTRT2 8BLOK:S BLOK:S BLOCKE x x *CTABX CTABX ,DCTBUF DCTBUF ,DCRBUF DCRBUF ,
0x07f6f0…07f884 Dummy {f00=0x0028, f01=0x0190, f02=» INIMOM INIMON TCTAB TTB:ST TTB:PP TTB:SA TTB:SP TTB:SS TTB:TDD CDTAB ITADI DWTADR ITADO DWTST DWTECB DWTTQ TIMQUE BLOCKL0 BLOCKSF FREQUE GBQUE ATT:CH2 LDPENDN LRUQUE$ CVTLSB0 NUMPAR
0x07f884…07fa18 Dummy {f00=0x0028, f01=0x0190, f02=» IHINPT PRUN SRUNN CVTINP CVTLSBK TTB:SA TTB:SP TTB:SS UPDLRI RETUR8 CVTAPA LKMDIS LD150 L LOADER LOADER TTB:SP TTB:SS TTB:SA QTJOB LD150 P GETBLK LDTASK TTABLD A
0x07fa18…07fbac Dummy {f00=0x0028, f01=0x0190, f02=»AD TTB:SS TTB:SP QTJOB CVTINP 4INIMOD INIMON tBUG TTMJOB TTMJOB TTB:ST TTB:ID TTB:PPK TTB:SSK TTB:SP TTB:SA TTB:TDK * , VCD:TAB CD:
0x07fbac…07fd40 Dummy {f00=0x0028, f01=0x0190, f02=» bTIO TWAIT TEXIT TACTOTK TPAUSE TIMER GETBUF RELBUF LOADERD TABORT GETTIM SETTIM TASSN IXTASS0 DMINIT DMINIT INIFLG QFDBFL FDBSTA FDBEND CRNQUE CRBUFL CRNEND CURBUF BUFDMI
0x07fd40…07fed4 (1, 7) Opaque[0x194]
0x07fed4…080068 # DirEnt {nam=»DRTC01«, typ=»SC«, f00=0x3039, f01=0x3131, f02=0x0518, f03=0x2020}
0x07fed4…080068 IdxSect {
0x07fed4…080068 f00 = 0x0028 // 0x7fed4 @0x0
0x07fed4…080068 f01 = 0x0010 // 0x7fed6 @0x2
0x07fed4…080068 gno = [ // 0x7fed8 @0x4
0x07fed4…080068 [0x00]: C0x0028.0x3.0
0x07fed4…080068 [0x01]: C0x0029.0x0.0
0x07fed4…080068 [0x02]: C0x0029.0x1.0
0x07fed4…080068 [0x03]: C0x0029.0x2.0
0x07fed4…080068 [0x04]: C0x0029.0x3.0
0x07fed4…080068 [0x05]: C0x002a.0x0.0
0x07fed4…080068 [0x06]: C0x002a.0x1.0
0x07fed4…080068 [0x07]: C0x002a.0x2.0
0x07fed4…080068 ]
0x07fed4…080068 }
0x080068…0801fc Dummy {f00=0x0028, f01=0x018e, f02=» 2 P IDENT DRTC01 REL 8.2 78-09-15 870105040820 P : P NO SELECT AT PGM LOADING B P FAST I/O, SHORT INH TIME f P REL 8.1 78-04-21 P P < P******************************************************* P* $ P* PHIL
0x0801fc…080390 Dummy {f00=0x0028, f01=0x0190, f02=» P* < P******************************************************* P* R P* > P* THIS DRIVER HANDLES ONE OR TWO TAPE CASSETTE RECORDERS f & P* CONNECTED TO CPU VIA CHCR-DCR P* > P* ONLY ONE RECORDER CAN BE BE OPERATED AT
0x080390…080524 Dummy {f00=0x0028, f01=0x0190, f02=»ARACTERS P* P EJECT DRTC01 P* 2 P* < 4 P* THE DRIVER CONSISTS OF THE FOLLOWING PARTS: F P* ~ " P* T C D A : ACTIVATION PART P* $ P* I H T C : INTERRUPT HANDLER P* & P* R C O V E R : RECOVERY ROU
0x080524…0806b8 Dummy {f00=0x0028, f01=0x0190, f02=» AND O R D E R P R O C E S S O R S P* . P* 8 * P* THE FOLLOWING ORDERS ARE TREATED: B P* p P* ORDER /00: TEST STATUS z P* /02: READ P* /05: WRITE P* /06: WRITE " P* /22: W
0x0806b8…08084c Dummy {f00=0x0028, f01=0x0190, f02=»ASE | P* /37: LOAD P* /38: UNLOAD ( P* F P EJECT DRTC01 P P* h P* r , P* THE FOLLOWING RETURN CODES ARE USED: | P* P* BIT 0 REQUEST ERROR P* 1 LEADER P* 2 BOT MISSING P
0x08084c…0809e0 Dummy {f00=0x0028, f01=0x0190, f02=»7 B-SIDE P* 9 REWIND TIME-OUT P* 11 SEQUENCE ERROR 2 P* -READ SEQUENCE ERROR R > P* -POSITION OF TAPE UNSUCCESSFULL AT WRITE RECOVERY v 6 P* -POWER RECOVERY WHEN SEQ. COUNTER NOT USED , P* -POWER RECOVER
0x0809e0…080b74 (1, 8) Dummy {f00=0x0029, f01=0x0190, f02=»PERABEL P* P EJECT DRTC01 P* 2 P* < " P* NORMAL USAGE OF REGISTERS: F P* l P* REGISTER A1: RETURN CODE v P* A2: SST STATUS * P* A3: DWT STATUS AFTER SST " P* A4: RETRY COUNT
0x080b74…080d08 Dummy {f00=0x0029, f01=0x0190, f02=»STACK t P* P* P* SYSTEM ADAPTATION: " P* @ : P* BY MEANS OF CONDITIONAL ASSEMBLY THE DRIVER CAN BE J P* REDUCED TO HANDLE: P* " P* -ONLY ONE CASSETTE RECORDER 0 P* -ORDERS REVERSE, ERASE AND LOCK EXCLUDED
0x080d08…080e9c Dummy {f00=0x0029, f01=0x0190, f02=» ENTRY IHTC INTERRUPT ADDRESS . P ENTRY DWTC01 DWT FOR CASSETTE RECORDER 01 & . P ENTRY DWTC02 DWT FOR CASSETTE RECORDER 02 X $ P ENTRY TCDRON POWER UP RECOVERY P P P P* P* $ P******************************** $ P*
0x080e9c…081030 Dummy {f00=0x0029, f01=0x0190, f02=» 4 P EXTRN SAVE8 DISPATCHER SAVE REGS 1-8 SUBROUTINE . P EXTRN RETUR8 DISPATCHER LOAD A1-A8 RETURN < , P EXTRN TENDIO GLOBAL END-OF-I/O ROUTINE n . P EXTRN DISEND GO TO DISPATCHER VIA TENDIO 4 P EXTRN DISIOE DISPATCHER I/O REQUEST ERROR ENTRY * P
0x081030…0811c4 Dummy {f00=0x0029, f01=0x0190, f02=»RN ECBRL REQUESTED LENGTH IN ECB ( P EXTRN ECBEL EFFECTIVE LENGTH IN ECB ( $ P EXTRN ECBCW CONTROL WORD IN ECB T P EJECT DRTC01 | P* P* P****************** P* DWT PARAMETERS * P****************** P* P* &
0x0811c4…081358 Dummy {f00=0x0029, f01=0x0190, f02=»T f , P* BIT #12 - REPOSITIONING AT RECOVERY " P* BIT #13 - WRITE PROTECTED : P* BIT #14 - A-SIDE ` * P BIT #15 - DEVICE LOCKED (OPERABLE) | P EXTRN DWTOR DWT ORDER " P EXTRN DWTECB DWT ECB ADDRESS P EJECT DRTC01 P*
0x081358…0814ec Dummy {f00=0x0029, f01=0x0190, f02=»ER CAN BE REDUCED TO HANDLE ONLY ONE CASSETTE " P* RECORDER BY SETTING X:A=1 6 P* PX:A EQU 1 f PDBCAS EQU X:A x P* 6 P* ORDERS REVERSE, ERASE AND LOCK MAY BE EXCLUDED P* BY SETTING X:B=0 P* PX:B EQU 0
0x0814ec…081680 Dummy {f00=0x0029, f01=0x0190, f02=»N ENTRY x " P DATA 0 ABORT ROUTINE ADDRESS P RES 4 SUBROUTINE STACK 6 PSTB EQU *-2 V P* j P* t $ PTAB DATA /0031,/2237,/3802,/0506 ~ P IFT REVER=1 P DATA /2633,/24FF P XIF PTABL EQU *-TAB P EJECT DRTC01
0x081680…081814 (1, 9) Dummy {f00=0x0029, f01=0x0190, f02=» P* P* DEVICE ADDRESS: P* , PCHCRDA EQU /0E 6 P* L P* V P************* ` P* CONSTANTS * v P************* P* P* " PRTRIES EQU 3 MAX NO OF RETRIES P* * PPSUBS EQU 5 POWER UP BACKSPACE NUM
0x081814…0819a8 Dummy {f00=0x0029, f01=0x018e, f02=» P IFT REVER=1 * PPERAS EQU 6 NO OF ERASE FOR ORDER /24 P XIF F P EJECT DRTC01 R P* j P* t P* T C D A ~ P* H P* ACTIVATION PART : CHECK VALIDITY OF ORDERS AND START PROCESSING P* P* PTCDA EQU *
0x0819a8…081b3c Dummy {f00=0x0029, f01=0x0190, f02=» t P SUK A4,1 P RB(NN) TCDA10 TRY NEXT P* : PTCDA15 EQU * D P ABL DISIOE ILLEGAL ORDER X P* z ( PTCDA20 ADR A4,A4 DOUBLE TO GET INDEX P ST A4,TCDAX SAVE INDEX ( P LD A5,ECBRL,A8 GET REQUESTED LENGTH ( P LD A3,SEKBY
0x081b3c…081cd0 Dummy {f00=0x0029, f01=0x018e, f02=» . P LDR A2,A3 RECOVERY/SEQUENCE ERROR STATUS P ANK A2,2 6 P RF(NZ) TCDR10 YES H P* b P ADK A5,1 l . P NGR A5,A5 MAKE REQUESTED LENGTH NEGATIVE ~ 0 P ST A5,HELPME SAVE IT FOR RECOVERY PURPOSES P SUK A7,/37 LOAD ? P RF(NE) TC
0x081cd0…081e64 Dummy {f00=0x0029, f01=0x0190, f02=» ( PTCDA22 LD A3,2,A8 GET BUFFER ADDRESS 0 P ST A3,BUFADR SAVE IT FOR RECOVERY PURPOSES 0 P SUK A4,14 d P RF(Z) TCDA23 WRITE v P ADK A4,2 P RF(NZ) TCDA25 NOT WRITE P* * PTCDA23 ADK A5,3 CHECK REQUESTED LENGTH ( P RB(P) TCDA1
0x081e64…081ff8 Dummy {f00=0x0029, f01=0x0190, f02=». COUNTING ? | P RF(NZ) TCDA25 NO , P LD A2,DWTBKC,A6 GET SEQUENCE CHARACTER . $ P SC A2,255,A3 STORE IT IN BUFFER ^ P* ( PTCDA25 ST A6,TCDADT SAVE ACTIVE DWT P EJECT DRTC01 P* P* P* SELECT RECORDER P*
0x081ff8…08218c Dummy {f00=0x0029, f01=0x0190, f02=» P LDR A1,A2 SAVE STATUS , P LDK A4,RTRIES PRESET NUMBER OF RETRIES " " P LDKL A2,0 GET FUNCTION INDEX R " PTCDAX EQU *-2 **ORDER INDEX** x P INH & P ABI TCDFUN,A2 BRANCH TO FUNCTION < PTCDFUN DATA ENDIO,REWIND,TM,LOAD,UNLOAD,READ,WRITE,W
0x08218c…082320 Dummy {f00=0x0029, f01=0x0190, f02=»COVERY AFTER POWER ON P* P* ( PTCDRON EQU * 2 P CF A15,SAVE8 F & P LD A1,INIFLG CHECK IF PGM LOADING $ P ABL(NZ) TDISP YES SKIP RECOVERY P LDKL A8,STB LOAD STACK BASE P LDKL A6,DWTC01 FIRST DWT P CF A8,RCOVER RECOVE
0x082320…0824b4 (1, 10) Dummy {f00=0x0029, f01=0x0190, f02=» , PTCDADT EQU *-2 **ACTIVATED DWT ADDRESS** $ P RF(Z) ENDIO NO REQUEST GOING ON 4 $ P LDR A6,A4 PUT DWT ADDRESS IN A6 " P LD A3,SEKBYT,A6 SEQ. COUNTING ( P RB(Z) TCDA30 YES; REACTIVATE ORDER P* * PTCDR10 ANK A3,1 JUSTIFY SEQ. INDICATOR
0x0824b4…082648 Dummy {f00=0x0029, f01=0x0190, f02=» P* R E A D P* PREAD CF A8,READR READ RECORD " P ANKL A1,/400 SAVE EOT BIT F P ORR A1,A2 h P ANK A2,/0E z P RF(Z) READ20 STATUS OK P* & PREAD15 SUK A4,1 RECOVERABLE ERROR P RF(Z) READ20 3 TRIALS DONE $ P C
0x082648…0827dc Dummy {f00=0x0029, f01=0x0190, f02=» RF(NN) READ30 NOT TAPE MARK P* $ ( PREAD25 ORK A3,/10 INDICATE TAPE MARK . $ P LDK A7,0 RESET EFFECTIVE LENGTH Z P RF READ35 P* PREAD30 LDR A2,A1 $ P LDKL A7,0 GET EFFECTIVE LENGTH ( PEFFLEN EQU *-2 **EFFECTIVE LENGTH**
0x0827dc…082970 Dummy {f00=0x0029, f01=0x0190, f02=»RIAL DONE ~ , P RB(NZ) READ15 NO; READ SAME BLOCK AGAIN & P LDK A4,1 SET NO OF RETRIES TO ONE B P RB READ TRY NEXT BLOCK l P* PREAD32 EQU * P ANK A3,/2F NOT TAPE MARK $ P LD A2,SEKBYT,A6 SEQ. COUNTING ? P RF(NE) READ35 NO
0x082970…082b04 Dummy {f00=0x0029, f01=0x018e, f02=»/10 SEQUENCE ERROR P* 2 PREAD35 IM DWTBKC,A6 INCREMENT SEQUENCE COUNTER $ P* Z * PREAD40 LD A8,DWTECB,A6 GET ECB ADDRESS d * P ST A7,ECBEL,A8 SAVE EFFECTIVE LENGTH P LDK A2,RTRIES . P SUR A2,A4 GET NUMBER OF RETRIES PERFORMED , P
0x082b04…082c98 Dummy {f00=0x0029, f01=0x0190, f02=» P* P* P* END OF I/O OPERATION P* 6 P* @ PENDIO EQU * J ( P CM TCDADT INDICATE NONE ACTIVE DWT ^ P IFT DBCAS=2 , P CF A15,SWLXY GIVE OTHER TASKS A CHANCE P LDR* A6,A6 GET OTHER DWT * P CF A15,TENDIO PERFORM T
0x082c98…082e2c Dummy {f00=0x0029, f01=0x0190, f02=»SPATCHER VIA TENDIO | P* P EJECT DRTC01 & P* > P* H P* WRITE TAPE MARK R P* n PTM LDKL A3,-1 x P ST A3,HELPME P* P* W R I T E P* P* WRITE ONE BLOCK P* P* , PWRITE LD A
0x082e2c…082fc0 Dummy {f00=0x0029, f01=0x0190, f02=»OF RETRIES 1ST BLOCK ~ P* $ PWRIT10 CF A8,WRITER WRITE RECORD & P ANKL A1,/400 SAVE EOT-BIT N P ORR A1,A2 p P ANK A2,/0E P RF(Z) WRIT30 STATUS OK P* , PWRIT12 ST A4,WRITA4 STORE RETRY COUNTER P LD A2,SEKBYT,A6 P
0x082fc0…083154 (1, 11) Dummy {f00=0x0029, f01=0x0190, f02=»4,0 ONE ERASE P RF WRIT20 P* ( $ PWRIT15 CF A8,REPOS POSITION TAPE 2 & P CM SEKBYT,A6 RESET SEQ. INDICATOR Z P LD A4,WRITA4 GET NO ... P LDR A2,A2 & P RF(NZ) WRIT40 POSITIONING NOT OK P SUK A4,RTRIES ... OF ERASE P*
0x083154…0832e8 Dummy {f00=0x0029, f01=0x0190, f02=»,0 GET RETRY COUNTER $ PWRITA4 EQU *-2 **RETRY COUNTER** P SUK A4,1 D P RB(NZ) WRIT10 TRY AGAIN V . P ORR A1,A2 3 TRIALS DONE,SET ERASE BIT #4 v P RF WRIT50 GIVE UP P* P EJECT DRTC01 P* P* PWRIT30 LD A2,TCD
0x0832e8…08347c Dummy {f00=0x0029, f01=0x018e, f02=» P RB(N) READ25 YES P RB WRIT12 NO P* 4 : PWRIT40 ORK A1,/10 POSITIONING FAILED = SEQUENCE ERROR > P* | , PWRIT50 LD A7,EFFLEN GET EFFECTIVE LENGTH P RB READ40 P* P EJECT DRTC01 P* P* P* L O A
0x08347c…083610 Dummy {f00=0x0029, f01=0x0190, f02=» p PLOAD10 LDR A1,A2 NO CASSETTE ! P RB READ50 ! , P* ! > P* ! H P* R E W I N D ! R P* ! j P* REWIND TAPE ! t P* ! P* ! , PREWIND CM DWTBKC,A6 CLEAR BLOCK COUNTER ! ( P CF A8,SBOT SEARCH BEGINNING OF TAPE ! PREW010 EQU *
0x083610…0837a4 Dummy {f00=0x0029, f01=0x0190, f02=»1 ! P* " P* " P* U N L O A D " P* " 6 P* UNLOAD CASSETTE " @ P* " P* " f $ PUNLOAD CM DWTST,A6 RESET STATUS " p P CF A8,UNLD UNLOAD CASSETTE " & PUNLO10 LDR A1,A2 SAVE RETURN CODE " P RB ENDIO " P IFT REVER=1 "
0x0837a4…083938 Dummy {f00=0x0029, f01=0x018e, f02=»E " v $ P LDKL A4,-1 DECREMENT BLOCK SEQ. # $ P ADS A4,DWTBKC,A6 COUNTER BY ONE # 2 P RB UNLO10 # Z P* # l P EJECT DRTC01 # v P* # P* # P* E R T A P E # P* # P* ERASE TAPE # P* # P* # ( PERTAPE LDK A4,PERAS SET NO
0x083938…083acc Dummy {f00=0x0029, f01=0x018e, f02=» # " P RB(NZ) ERT10 ERASE NOT READY $ P RB READ50 $ . P* $ @ P* $ J P* O L O C K $ T P* $ j P* ORDER LOCK CASSETTE $ t P* $ P* $ " POLOCK CF A8,LOCK LOCK CASSETTE $ " P RB(Z) REW010 CASSETTE LOCKED $ P RB LOAD10 $ P X
0x083acc…083c60 Dummy {f00=0x0029, f01=0x018e, f02=» PSELECT EQU * % P LDK A2,/FF LOAD MASK % " P ANS A2,DWTST,A6 SET DWT BUSY % 6 P IFT DBCAS=1 % P LDK A3,0 SELECT CODE % p P XIF % P IFT DBCAS=2 % P LDR* A3,A6 GET OTHER DWT % " P ANS A2,DWTST,A3 SET DWT BUSY % P ANK A3,1 GET SELE
0x083c60…083df4 (1, 12) Dummy {f00=0x002a, f01=0x018e, f02=» P* & PREADSQ EQU * & P LDK A3,/A & " , P ST A3,REQLEN MAKE REQUESTED LENGTH > 0 & 4 P RB CRCOM & d P* & v P EJECT DRTC01 & P* & P* READ ONE RECORD & P* & PREADR LDK A3,/A & , PREADR1 CM EFFLEN RESET EFFECTIVE LENGTH &
0x083df4…083f88 Dummy {f00=0x002a, f01=0x0190, f02=» PHELPME EQU *-2 **HELPME** ' P ST A2,REQLEN ' & P RB CRCOM ' < P* ' N P* WRITE ONE RECORD ' X P* ' r PWRITER LDK A3,/B ' | P RB READR1 ' P* ' P* ERASE ONE BLOCK ' P* ' PERASE LDK A3,9 ' P RB CRCOM ' P* ' P*
0x083f88…08411c Dummy {f00=0x002a, f01=0x018e, f02=»F TAPE ' | P* ( PSBOT LDK A3,8 ( P RB CRCOM ( . P* ( @ & P* REWIND TAPE AND UNLOCK CASSETTE ( J P* ( t PUNLD LDK A3,/F ( ~ P RB CRCOM ( P* ( P* BACKSPACE ONE BLOCK ( P* ( PBKSP LDK A3,/E ( P RB CRCOM ( P* (
0x08411c…0842b0 Dummy {f00=0x002a, f01=0x0190, f02=» P* ) PIHTC EQU * ) $ P ST P,INTSAV SAVE LAST INTERRUPT ) P STR A5,A15 SAVE A5 ON STACK ) H P SST A5,CHCRDA ) l P RF(A) SST SST ACCEPTED ) P IM REQLEN INCREMENT COUNTER ) P RF(Z) CIOHLT ) & P RF(P) INRSQ GET SEQUENCE COUNTER ) P S
0x0842b0…084444 Dummy {f00=0x002a, f01=0x0190, f02=»ER ADDRESS ) x 4 P LD A5,TCDAX GET FUNCTION SWITCH FOR READ/WRITE * P SUK A5,10 * J P RF(NZ) IHTC05 WRITE * P* * x & PIHTC02 INR A5,0,CHCRDA READ CHAR. * ( P SCR A5,A3 STORE CHARACTER IN BUFFER * P RF EXIT2 * P* * PIHTC05 EQU * * $ P
0x084444…0845d8 Dummy {f00=0x002a, f01=0x0190, f02=» * ~ * P IM EFFLEN INCREMENT EFFECTIVE LENGTH + . P LDR* A3,A15 RESTORE A3 AND A5 FROM STACK + 6 P* + h PEXIT3 LDR* A5,A15 + r P RTN A15 + P* + * PINRSQ INR A5,0,CHCRDA READ CHAR TO A5 + P ST A5,TCDA5 + P RB EXIT3 + P* + PSST
0x0845d8…08476c Dummy {f00=0x002a, f01=0x018e, f02=» P LDKL A4,0 , PTCDA4 EQU *-2 , P LDKL A5,0 , , PTCDA5 EQU *-2 , > P LDKL A6,0 , T PTCDA6 EQU *-2 , f P LDKL A8,0 , | PTCDA8 EQU *-2 , P EJECT DRTC01 , P* , P* , P LDKL A2,0 RESTORE STATUS , PTCDA2 EQU *-2 , P
0x08476c…084900 Dummy {f00=0x002a, f01=0x0190, f02=» , PIHTRTN EQU * - P RTN A8 - P* - , PCIOHLT EQU * - 6 P CIO A1,0,CHCRDA CIO-HALT - J P RB EXIT3 - l P* - ~ PEXIT ST A1,TCDA1 - P ST A4,TCDA4 - P ST A5,TCDA5 - P ST A6,TCDA6 - P ST A8,TCDA8 - P ABL TDISP GO TO DISPAT
0x084900…084a94 (1, 13) Dummy {f00=0x002a, f01=0x0190, f02=»F TAPE AT POWER ON - l P* . P* . $ PRCOVER EQU * . . P CF A8,SELECT SELECT . B P ANK A3,1 . ^ 2 P RB(Z) IHTRTN NOT LOCKED: RETURN FROM RECOVERY . p P CF A8,LOCK . P RF(NZ) REPER NO CASSETTE . , P LD A1,DWTBKC,A6 ANY BLOCK WRITTEN/READ .
0x084a94…084c28 Dummy {f00=0x002a, f01=0x0190, f02=»K . P* / ( PRC0050 LD A1,SEKBYT,A6 SEQ. COUNTING / P RF(NZ) REPER NO / @ P* / X P EJECT DRTC01 / b P* / z P* / P* R E P O S / P* / * P* REPOSITIONING OF TAPE AT POWER ON / P* AND WRITE RECOVERY / P* / 4 P*
0x084c28…084dbc Dummy {f00=0x002a, f01=0x0190, f02=»S EQU * / $ P LDK A4,8 SET REPOSITIONING BIT 0 " P ORS A4,DWTST,A6 STORE IN DWT 0 8 P* 0 ^ PREP005 EQU * 0 h & P LDK A4,PSUBS SET NO OF BACKSPACES 0 | P* 0 PREP010 CF A8,BKSP BACKSPACE 0 P SLL A2,4 0 P RF(NN) REP015 DATA FOUND 0 & P
0x084dbc…084f50 Dummy {f00=0x002a, f01=0x0190, f02=»E 0 h P SLL A2,5 1 P RF(NN) REPER BOT NOT FOUND 1 " P LDKL A5,-1 RESET SEQ. COUNTER 1 @ P RF REP020 READ SEQ. CHAR 1 f P* 1 P EJECT DRTC01 1 P* 1 P* 1 PREP015 EQU * 1 P SUK A4,1 1 " P RB(NZ) REP010 BACKSPACE AGAIN 1 $
0x084f50…0850e4 Dummy {f00=0x002a, f01=0x018e, f02=»,A7 1 P RF(Z) REP020 READ OK 2 P SUK A4,1 COUNT READ 2 * $ P RB(P) REP017 NOT ALL READ DONE 2 F P RF REP060 GIVE UP 2 n P* 2 * PREP020 LC A4,DWTBKC+1,A6 GET SEQ. CHAR 2 P SUR A4,A5 CALCULATE 2 P SUK A4,1 NO OF BLOCKS TO 2 P ANK A4,/F
0x0850e4…085278 Dummy {f00=0x002a, f01=0x018e, f02=» " PREP030 SUK A4,1 POSITION TAPE 3 P RF(N) REP040 READY 3 * " P CF A8,READSQ READ NEXT BLOCK 3 F P RB REP030 3 l P* 3 ~ ( PREP040 LDK A4,RTRIES SET NO OF RETRY 3 & PREP042 LDKL A7,/80F SET READ MASK 3 P TM A2,A7 CORRECT READ 3 P RF(Z) REP04
0x085278…08540c Dummy {f00=0x002a, f01=0x0190, f02=» 3 p P RB REP042 4 P* 4 P EJECT DRTC01 4 $ P* 4 < P* 4 F PREP045 SLC A2,3 4 P P RF(NN) REP050 NOT TAPE MARK 4 h P ANK A3,/10 4 * P RF(Z) REP060 SHOULD NOT BE TAPE MARK 4 P RF REPOK 4 P* 4 & PREP050 ADK A5,1 CHECK SEQ. NUM
0x08540c…0855a0 Dummy {f00=0x002a, f01=0x0190, f02=» 4 p P RF(Z) REPER NO 5 , P XRS A7,DWTST,A6 RESET REPOSITIONING BIT 5 P RB REP005 YES 5 P P* 5 f P* 5 p 6 PREPER LDK A2,2 IND RECOVERY/SEQUENCE ERROR STATUS 5 z " P ORS A2,SEKBYT,A6 SAVE IN DWT 5 P RTN A8 5 P* 5 ( PREPOK LDK A2,0 IND R
0x0855a0…085734 (1, 14) Dummy {f00=0x002a, f01=0x0190, f02=»CE WORK TABLE FOR CASSETTE RECORDER 02 5 P* 6 . P* 6 8 PDWTC02 EQU * TABLE ENTRY 6 B P IFT DBCAS=2 6 b P DATA DWTC01+1 DWT NO. 1 6 v 0 P DATA /8000 STATUS./8000 MEANS DEVICE READY 6 P DATA 0 ECB ADDRESS 6 P DATA 0 ORDER 6 ( P DATA TCAD P
0x085734…0858c8 Dummy {f00=0x002a, f01=0x0190, f02=»0 BLOCK COUNTER 6 P DATA 0 SEQ. INDICATOR 7 P XIF 7 6 P EJECT DRTC01 7 B P* 7 Z P* 7 d P* D W T C 0 1 7 n P* 7 2 P* DEVICE WORK TABLE FOR CASSETTE RECORDER 01 7 P* 7 P* 7 PDWTC01 EQU * TABLE ENTRY 7 P DATA DWTC02
0x0858c8…085a5c Dummy {f00=0x002a, f01=0x415a, f02=»ER TO ADDRESS BLOCK 7 P DATA 0 TTAB ADDRESS 8 $ P DATA 0 WAIT/ACTIVATE INDICATOR 8 8 P DATA 0 TERMINAL QUEUE 8 ` & PDWTBKC EQU *-DWTC01 BLOCK COUNTER 8 ~ P DATA 0 8 PSEKBYT EQU *-DWTC01 8 P DATA 0 SEQ. INDICATOR 8 P* 8 P* 8 " PRE
0x085a5c…085bf0 Dummy {f00=0x002a, f01=0x2008, f02=» 9 OCK - x P DATA 0 TTAB-ADDRESS . $ P DATA 0 WAIT/ACTIVATE INDICATOR . 0 P DATA 0 TERMINAL QUEUE . X & PDWTBKC EQU *-DWTC01 BLOCK COUNTER . v P DATA 0 . PSEKBYT EQU *-DWTC01 . P DATA 0 SEQ. INDICATOR . P* . P* . P END . @
0x085bf0…085d84 Dummy {f00=0x002a, f01=0x0190, f02=» LABEL = RL 8.1:1 DATE = 78-03-03 PACK NBR = 001 f : ] =IR E
[…0x3…]
0x086240…0863d4 (1, 15) Opaque[0x194]
0x0863d4…086568 # DirEnt {nam=»LRPINT«, typ=»SC«, f00=0x434b, f01=0x204e, f02=0x0558, f03=0x203d}
0x0863d4…086568 IdxSect {
0x0863d4…086568 f00 = 0x002a // 0x863d4 @0x0
0x0863d4…086568 f01 = 0x0008 // 0x863d6 @0x2
0x0863d4…086568 gno = [ // 0x863d8 @0x4
0x0863d4…086568 [0x00]: C0x002a.0x3.0
0x0863d4…086568 [0x01]: C0x002b.0x0.0
0x0863d4…086568 [0x02]: C0x002b.0x1.0
0x0863d4…086568 [0x03]: C0x002b.0x2.0
0x0863d4…086568 ]
0x0863d4…086568 }
0x086568…0866fc Dummy {f00=0x002a, f01=0x018e, f02=» 2 P IDENT LRPINT REL 8.2 78-09-15 870105040820 P : P* B 6 P************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P* LRPINT = INTERRUPT HANDLERS FOR LKM, RTC " P* AND P
0x0866fc…086890 Dummy {f00=0x002a, f01=0x0190, f02=» P* P* : P* THIS MODULE CONTAINS MANDATORY INTERRUPT HANDLERS P* FOR TOSS. THESE ARE: V P* v P* -IHLKM: LKM-INTERRUPT P* P* -IHRTC: RTC-INTERRUPT P* ( P* -IHPFAR: POWER FAILURE INTERRUPT P*
0x086890…086a24 Dummy {f00=0x002a, f01=0x0190, f02=»UE JOB AND DISPATCH v P* ( P* -LKMQDI: QUEUE JOB AND DISPATCH & P* R P EJECT P*********** j P* ENTRIES * ~ P*********** P* & P ENTRY IHLKM LKM INTERRUPT HANDLER $ P ENTRY LKMRQE LKM REQUEST ERROR $ P ENTRY
0x086a24…086bb8 Dummy {f00=0x002a, f01=0x0190, f02=»E ^ P ENTRY MONCLO MONITOR CLOCK 2 P ENTRY IHPFAR POWER FAILURE INTERRUPT HANDLER . & P ENTRY INIFLG INITIALIZATION FLAG d P* P************* P* EXTERNALS * P************* P* P EXTRN TDISP DISPATCHER : P EXT
0x086bb8…086d4c Dummy {f00=0x002a, f01=0x0190, f02=» $ P EXTRN SWL48 SWITCH TO LEVEL 48 2 P EXTRN TTB:SA FIRST WORD OF SAVE AREA IN TTAB , , P EXTRN TTB:TD START OF TERMINAL DEVICES b " P EXTRN LKMAL LKM REQUEST TABLE P EXTRN FREBLK SET BLOCK FREE " P EXTRN QMJOB QUEUE MONITOR JOB 6 P EXTRN
0x086d4c…086ee0 Dummy {f00=0x002a, f01=0x0190, f02=» SAVE8 SAVE 8 REGISTERS " P EXTRN PFTAB POWER FAIL TABLE P EXTRN HALT HALT-MODULE F P EXTRN SACT ACTIVE SEGMENT f , P EXTRN LRUNEW INSERT SEGMENT IN LRUQUEUE ( P EXTRN INTSAV INTERRUPT SAVE MODULE P EJECT P* P* 8 P*
0x086ee0…087074 (1, 16) Dummy {f00=0x002b, f01=0x0190, f02=»:A = 0 r P* PX:A EQU 1 PKLOCKA EQU X:A * P EJECT @ P* N P* X P* I H L K M b P* x P* 8 P* THIS IS THE LKM INTERRUPT HANDLER. THE FOLLOWING P* STEPS ARE CARRIED OUT: P* * P* - IF STACK OVERF
0x087074…087208 Dummy {f00=0x002b, f01=0x0190, f02=» 'LKMDIS' AND 8 REGISTERS ARE SET ON STACK z $ P* - TTB:SA IS UPDATED IN TTAB 2 : P* - EXIT CONDITIONS ARE SET AND A BRANCH IS MADE TO Z $ P* APPROPIATE LKM-PROCESSOR. P* P* EXIT CONDITIONS ARE: P* * P* A4 = LABLE ADDRE
0x087208…08739c Dummy {f00=0x002b, f01=0x0190, f02=»A2 AND A3 ARE LOST. : P* ALL OTHER REGISTERS REMAIN UNCHANGED FROM CALLING P* PROGRAM. Z P* n P* x P* PIHLKM EQU * P ST P,INTSAV P SAVE LAST INTERRUPT * P RIT /1D RESET INTERNAL INTERRUPT FLAG PLKM010 I
0x08739c…087530 Dummy {f00=0x002b, f01=0x0190, f02=» STR A14,A15 SAVE USERS REGISTERS, -A14 P STR A13,A15 -A13 0 P STR A12,A15 -A12 J P STR A11,A15 -A11 d P STR A10,A15 -A10 ~ P STR A9,A15 -A9 P STR A8,A15 -A8 P STR A7,A15 -A7 P STR A6,A15 -A6 P STR A5,A15 -A5
0x087530…0876c4 Dummy {f00=0x002b, f01=0x0190, f02=»INTER p PLKM020 EQU *-2 P* $ P* . . P* GET DISPATCH ADDRESS AND SWITCH LEVEL 8 P* j P LDR* A2,A15 t 4 P LDR* A2,A15 LOAD P.C. AND ADJUST STACK POINTER P LD A3,-2,A2 P CWK A3,/2804 P RF(E) LKM025 LKM P CWK
0x0876c4…087858 Dummy {f00=0x002b, f01=0x0190, f02=»KMDIS . P STR A3,A15 SET DISPATCH ADDRESS ON STACK P LDKL A3,/C000 @ P STR A3,A15 SET LEVEL 48 V . P SUKL A15,16 RESERVE SPACE FOR 8 REGISTERS v P LD A3,SACT ACTIVE SEGMENT P RF(E) LKM027 P CF A15,LRUNEW P CM SACT PLK
0x087858…0879ec Dummy {f00=0x002b, f01=0x0190, f02=»INDICATOR z $ P LDR* A3,A2 LOAD DATA DIRECTIVE P RF(NN) LKM030 NO LABLE : P* Z P* d P* LKM-REQUEST WITH LABLE n P* P ADK A2,2 P LDR* A4,A2 LOAD LABLE P NGR A3,A3 NEGATE DATA P* P* . P* UPDATE T
0x0879ec…087b80 Dummy {f00=0x002b, f01=0x0190, f02=»AB r " P ADR A3,A3 GET INDEX IN LKMAL ( P RF(Z) LKMQDI PROGRAM SWITCH REQUEST 0 P CW A3,LKMAL * P RF(NL) LKMRQE INVALID DATA DIRECTIVE p P LD A3,LKMAL,A3 & P RF(Z) LKMRQE ERROR IF NOT PRESENT P INH INHIBIT INTERRUPTS $ P ABR A3
0x087b80…087d14 (1, 17) Dummy {f00=0x002b, f01=0x0190, f02=» DISPATCH l P* P* A5 = TTAB-ADDRESS P* : P* D PLKMRQE EQU * N P LDKL A2,-1 b . P ST A2,TTB:SA+14,A5 SET -1 IN SAVE AREA A7 v P* P* P* L K M Q D I P* ( P* QUEUE TERMINAL JOB AND DISPATCH
0x087d14…087ea8 Dummy {f00=0x002b, f01=0x018e, f02=» P EJECT P* P* I H R T C P* 2 6 P* THIS IS THE REAL TIME CLOCK INTERRUPT HANDLER < 6 P* THE TIMER QUEUE WILL BE PROCESSED EACH 100 MS v P* PIHRTC EQU * $ P ST P,INTSAV SAVE LAST INTERRUPT " P RIT /1B RESET INT
0x087ea8…08803c Dummy {f00=0x002b, f01=0x0190, f02=» p " P LDKL A4,-4 SET 100 MS SWITCH P ST A4,COUNT . . P LDKL A2,CLOCK QUEUE CLOCK-ROUTINE AS MJOB B P CF A15,QMJOB t P* P IFT KLOCKA=1 P* P IM DINKAN 2 P RF(P) RTC025 UPDATE MONITOR CLOCK EACH SECOND P* P X
0x08803c…0881d0 Dummy {f00=0x002b, f01=0x0190, f02=»G ROUTINE STARTED EACH SECOND v P* & P* 0 PMCLOCK EQU * : ( PRTC025 LDKL A4,-9 SET SECOND SWITCH N P ST A4,DINKAN z P LDK A4,4 2 PMCLO10 LDK A3,60 NUMBER OF MINUTES AND SECONDS ( PMCLO20 IM MONCLO+2,A4 INCREMENT TIME 0 P XR
0x0881d0…088364 Dummy {f00=0x002b, f01=0x0190, f02=» A4,2 END ? P RF(N) MCLO30 MIDNIGTH CARRY P RB(P) MCLO10 UPDATE MINUTES 8 P LDK A3,24 UPDATE HOURS P RB MCLO20 | * PMCLO30 IM MONCLO UPDATE 24 HOUR CARRY P RB RTC020 GOTO DISPATCHER P* P* P XIF P* P
0x088364…0884f8 Dummy {f00=0x002b, f01=0x0190, f02=» DATA 0 SECOND P* PDINKAN DATA 0 SECOND SWITCH P* D P* N P XIF X P EJECT d P r P* z * P* CLOCK ROUTINE STARTED EACH 100 MS. P* P PCLOCK INH , P LDKL A4,TIMQUE LOAD FIRST TIMER ADDRESS PCL
0x0884f8…08868c Dummy {f00=0x002b, f01=0x0190, f02=» RB(N) CLK10 NOT TIME OUT, GET NEXT IN QUEUE P RF(Z) CLK30 TIME OUT 4 P R P LDR* A3,A4 RELEASE TIMER Z P STR A3,A6 | P CF A15,FREBLK P LDR A4,A2 P CF A15,FREBLK P RB CLK20 P , PCLK30 CF A15,CLK40 CALL TIME OUT R
0x08868c…088820 Dummy {f00=0x002b, f01=0x0190, f02=»TER z $ P ABI 2,A2 GO TO TIME OUT ROUTINE P* 4 P* > P* H PCOUNT DATA 0 100 MS SWITCH R P* t P* ~ P* T I M Q U E P* . P* POINTER TO FIRST BLOCK IN TIMER QUEUE P* PTIMQUE EQU * P DATA 0
0x088820…0889b4 (1, 18) Dummy {f00=0x002b, f01=0x0190, f02=»* P* P* 1. POWER OFF P* * : P* REGISTERS A1-A14 ARE SAVED ON INTERRUPT STACK AND 4 ( P* STACK POINTER IS SAVED IN CORE r P* THEN SYSTEM IS HALTED P* P* P* 2. POWER ON P* & P* STACK POINTER A
0x0889b4…088b48 Dummy {f00=0x002b, f01=0x0190, f02=»K X 4 P* AND RETURN IS GIVEN TO INTERRUPTED PROGRAM P* B P* L P* V P* WORK AREAS ` P* t P* ~ & PPFX DATA 1 POWER ON OFF INDICATOR P* P* & PINIFLG DATA 1 INITIALIZATION FLAG P* P EJECT P
0x088b48…088cdc Dummy {f00=0x002b, f01=0x0190, f02=»PT r & P RIT /17 RESET INTERNAL INTERRUPT & P C1S PFX INDICATE POWER ON OR OFF 4 P RF(P) PFA200 POWER ON ^ P* | P* POWER OFF P* ( P CF A15,SAVE8 SAVE A1 - A8 ON STACK & P STR A9,A15 SAVE A9 - A14 ON STACK P STR A10,A15
0x088cdc…088e70 Dummy {f00=0x002b, f01=0x413c, f02=»00 HLT HALT SYSTEM P* P* POWER ON & P* 8 PPFA200 EQU * B * P LDKL A15,0 RESTORE A15 STACK POINTER V PPFA210 EQU *-2 ( P CM INIFLG RESET INITIALIZATION FLAG * P CF A15,PFINIT RESTART COMMON DEVICES 4 P ABL RETU14 RESTORE
0x088e70…089004 Dummy {f00=0x002b, f01=0x2008, f02=» POINTER z PPFA210 EQU *-2 ( P CM INIFLG RESET INITIALIZATION FLAG . * P CF A15,PFINIT RESTART COMMON DEVICES Z 4 P ABL RETU14 RESTORE A1-A14 FROM INTERRUPT STACK P END @ 13,A15 P STR A14,A15 * P ST A15,PFA210 SAVE A1
0x089004…089198 Dummy {f00=0x002b, f01=0x0190, f02=» J F IDENT DRDN01 REL 8.1 78-04-21 870105040810 DNADY R DNADY b DISIOE t OUTPUT , ( D P P @ ! W GETCHR , ( U ?P Q R !
0x089198…08932c Dummy {f00=0x002b, f01=0x40f8, f02=» S R Y @ ! DWTECB , , ( m X2_n R P T @ ! > ECHRTN n D @ J v P P W& %U +P /Q 3R SR yR P T @ R !
0x08932c…0894c0 Dummy {f00=0x002b, f01=0x0190, f02=» J F IDENT DRDI01 REL 8.1 78-04-21 870105040810 DIADY R DIADY b , ( B 8# T $ # ;D P t DISIOE DWTST , ( ! P Y W Y X Y , ( = 8# T W
0x0894c0…089654 (1, 19) Opaque[0x194]
0x089654…0897e8 # DirEnt {nam=»TPROC «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0578, f03=0x2020}
0x089654…0897e8 IdxSect {
0x089654…0897e8 f00 = 0x002b // 0x89654 @0x0
0x089654…0897e8 f01 = 0x0008 // 0x89656 @0x2
0x089654…0897e8 gno = [ // 0x89658 @0x4
0x089654…0897e8 [0x00]: C0x002b.0x3.0
0x089654…0897e8 [0x01]: C0x002c.0x0.0
0x089654…0897e8 [0x02]: C0x002c.0x1.0
0x089654…0897e8 [0x03]: C0x002c.0x2.0
0x089654…0897e8 ]
0x089654…0897e8 }
0x0897e8…08997c Dummy {f00=0x002b, f01=0x0190, f02=» 0 P IDENT TPROC REL 8.2 78-09-15 870105040820 P 8 P* @ 6 P************************************************** J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* TPROC = TOSS LKM PROCESSORS . P* TIO,TWAIT,TEXIT,TACT
0x08997c…089b10 Dummy {f00=0x002b, f01=0x018e, f02=»* P* 6 P* THIS MODULE CONTAINS MANDATORY LKM PROCESSORS P* FOR TOSS. THESE ARE: N P* n P* -TIO INPUT/OUTPUT x P* P* -TWAIT WAIT P* P* -TEXIT EXIT P* * P* -TACTOT ACTIVATE/RESTAR
0x089b10…089ca4 Dummy {f00=0x002b, f01=0x018e, f02=» P*********** P* P* " P ENTRY TIO I/O PROCESSOR , P* L P ENTRY TWAIT WAIT PROCESSOR V P* z P ENTRY TEXIT EXIT PROCESSOR P* , P ENTRY TACTOT ACTIVATE/RESTART PROCESSOR P* " P ENTRY TPAUSE PAUSE PROCESSO
0x089ca4…089e38 Dummy {f00=0x002b, f01=0x0190, f02=» P EJECT P* P************* P* EXTERNALS * 6 P************* L P* b P* l , P EXTRN DWTADR DWT ADDRESS BLOCK POINTER v " P EXTRN DWTTAB DWT TTAB ADDRESS * P EXTRN DWTWAT WAIT/ACTIVATE INDICATOR & P EXTRN DWTTDM
0x089e38…089fcc Dummy {f00=0x002b, f01=0x0190, f02=»XTRN DWTECB ECB ADDRESS P EXTRN DWTST STATUS P EXTRN TDISP DISPATCHER < 2 P EXTRN SRUN POINTER TO RUNNING SEGMENT IN LSBT $ P EXTRN LKMRQE LKM REQUEST ERROR , P EXTRN GETBLK PUT BLOCK IN PENDING QUEUE 2 P EXTRN FREBLK RELEASE BLOCK FR
0x089fcc…08a160 Dummy {f00=0x002b, f01=0x018e, f02=»R l * P EXTRN TTB:ID TERMINAL IDENTIFICATION 0 P EXTRN FNDTID SEARCH TERMINAL IDENTIFICATION 8 $ P EXTRN ACTOT 'ACTIVATE' TERMINAL l ( P EXTRN TTB:ST TASK STATUS AND LEVEL P EXTRN TTB:SA SAVE AREA P EXTRN TIODM ENTRY ADDR P EXTRN A
0x08a160…08a2f4 (1, 20) Dummy {f00=0x002c, f01=0x0190, f02=» P************* P* B P* DISPLACEMENT IN DEVICE WORK TABLE AND EVENT CONTROL BLOCK $ P* j $ PDWTTQ EQU /0E TASK QUEUE IN DWT t & PDWTSB2 EQU /1E STACK BASE 2 IN DWT " PDWTECH EQU /22 ECHO-DEVICE DWT * PECBEL EQU /06 EFFECTIVE LENG
0x08a2f4…08a488 Dummy {f00=0x002c, f01=0x0190, f02=»* THIS MODULE IS ENTERED WHEN TERMINAL I/O 2 P* IS REQUIRED. IF A REQUEST CANNOT BE SERVICED 2 4 P* DUE TO E.G. BUSY DEVICE, THE REQUEST IS QUEUED h 2 P* AND THE TERMINAL PROGRAM SET IN WAIT STATE. 6 P* THIS MODULE IS CALLED BY THE LKM HANDLING MODULE
0x08a488…08a61c Dummy {f00=0x002c, f01=0x0190, f02=»RMAL I/O REQUEST ( P* NOT ZERO, I/O AND ACTIVATION P* D P* A5 = TTAB ADDRESS N P* j P* A7 = CODE t P* P* A8 = ECB ADDRESS P* P* < P* THE 'TIO'-ROUTINE EXITS TO REQUESTED ACTIVATION DRIVER * P* WITH
0x08a61c…08a7b0 Dummy {f00=0x002c, f01=0x018e, f02=» A7 = ORDER P* P* A8 = ECB-ADDRESS P* : P EJECT D P* R , P* THE FOLLOWING DWT FIELDS ARE UPDATED:- P* " P* -DWTOR DWT-INDEX AND ORDER P* -DWTECB ECB ADDRESS $ P* -DWTST READY AND ECHO FIELDS P* -DW
0x08a7b0…08a944 Dummy {f00=0x002c, f01=0x0190, f02=» " P* -BITS 0-7 IN THE FIRST WORD P* -ECBEL EFFECTIVE LENGTH . P* -ECBRC RETURN CODE R P* p P z P P P* 2 P* GET DWT ADDRESS AND CHECK IF DEVICE IS BUSY P* P P ( PTIO CF A15,FNDDWT SEARCH DWT
0x08a944…08aad8 Dummy {f00=0x002c, f01=0x0190, f02=»,A9 SAVE TASK STATUS P RF(N) TIO020 DMTASK CALLING $ P LDKL A9,/4000 REQUEST BUSY BIT @ P AN A9,DWTST,A6 h , P RF(NZ) TIOQ20 REQ BUSY,NOT DMTASK CALL PTIO020 EQU * P CCK A7,/BB00 P ABL(E) ATTACH ATTACH ORDER P CCK A7,/B
0x08aad8…08ac6c Dummy {f00=0x002c, f01=0x0190, f02=»A10,/0800 ATTACH BIT P AN A10,DWTST,A6 P RF(Z) TIO030 NOT ATTACHED 4 P CW A5,DWTTAB,A6 V * P RF(NE) TIOQ20 ATTACHED TO OTHER TASK n P AN A3,DWTST,A6 P RF(Z) TIOQ05 DEVICE BUSY PTIO030 EQU * P AN A3,DWTST,A6 P RF(Z)
0x08ac6c…08ae00 Dummy {f00=0x002c, f01=0x0190, f02=» P RF(Z) TIO100 NOT ECHO P LDKL A2,TIODM " P CW A2,DWTADR,A6 8 P RF(E) TIO090 DM-REQUEST P & P LD A2,DWTECH,A6 LOAD ECHO DEVICE p P RF(Z) TIO100 NO ECHO DEVICE & P LDKL A10,/100 BIT 7=INPUT DEVICE P ANR* A10,A6 ECHO ALLOWED?
0x08ae00…08af94 (1, 21) Dummy {f00=0x002c, f01=0x018e, f02=»A5,DWTTAB,A2 . P RF(NE) TIOQ10 ECHO ATTACHED TO OTHER TASK P AN A3,DWTST,A2 F " P RF(Z) TIOQ00 ECHO DEVICE BUSY ^ PTIO040 AN A3,DWTST,A2 " P RF(Z) TIOQ10 ECHO DEVICE BUSY P LDKL A3,/A000 0 P XRS A3,DWTST,A2 UPDATE BUSY AND ECHO IN D
0x08af94…08b128 Dummy {f00=0x002c, f01=0x0190, f02=» b P 6 PTIO100 XRS A3,DWTST,A6 UPDATE BUSY AND ECHO IN DWT P LDKL A3,/7FFF J , P ANRS A3,A8 RESET BIT 0 IN ECB FILE-CODE ` $ P CM ECBEL,A8 -EFFECTIVE LENGTH P CM ECBRC,A8 -RETURN CODE P LDR A3,A7 SAVE CODE P ANK A7,/3F (
0x08b128…08b2bc Dummy {f00=0x002c, f01=0x0190, f02=»,DWTTAB,A6 SAVE TTAB ADDRESS IN DWT P RF TIO120 , PTIO110 EQU * > 0 P ST A5,DWTTDM,A6 SAVE TTAB ADDRESS IN DWTTDM R PTIO120 EQU * " P ST A8,DWTECB,A6 -ECB ADDRESS P EJECT P P* , P* UPDATE DWTWAT (WAIT/ACTIVE INDICATOR)
0x08b2bc…08b450 Dummy {f00=0x002c, f01=0x0190, f02=»CK IF WAIT REQUESTED v P RF(Z) TIO220 NOT WAIT P LDK A4,1 INDICATE WAIT : P RF TIO230 Z $ PTIO200 LD A3,SRUN SEGM. POINTER l P RF(Z) TIO210 JUMP IF ROOT P SU A2,2,A3 RELATIVE ADDRESS P < PTIO210 CF A15,GETBLK SAVE PARAMETER AN
0x08b450…08b5e4 Dummy {f00=0x002c, f01=0x0190, f02=»OR ` * P LDK A5,DWTSB2 LOAD STACK BASE 2 IN A5 P ADR A5,A6 8 , P ABI* DWTADR,A6 GO TO DRIVER ACTIVATION J P EJECT z P* P* QUEUE ECHO DEVICE FIRST P* PTIOQ00 LDR A6,A2 P P* P* QUEUE DEVICE FIRST P
0x08b5e4…08b778 Dummy {f00=0x002c, f01=0x018e, f02=»UE r P & PTIOQ10 LDR A6,A2 QUEUE ECHO DEVICE P < ( PTIOQ20 ADK A6,DWTTQ GET QUEUE ANCHOR D P LC A1,TTB:ST+1,A5 GET LEVEL p PTIOQ30 LDR A2,A6 $ P LDR* A6,A6 FOLLOW QUEUE TO END P RF(Z) TIOQ40 END FOUND & P CC A1,TTB:ST+1,A6 C
0x08b778…08b90c Dummy {f00=0x002c, f01=0x0190, f02=» P SUK A3,4 " P LDR A4,A4 CHECK IF ACTIVATION P RF(Z) TIOQ50 NO < P SUK A3,2 YES T 4 PTIOQ50 ADS A3,TTB:SA,A5 UPDATE PC TO REPEAT LKM j P RF TPDIS P P P* P* ERROR FILE CODE UNKNOWN P* P 0 PTIOERR
0x08b90c…08baa0 Dummy {f00=0x002c, f01=0x0190, f02=»* P* P* W A I T P* & : P* THIS MODULE IS ENTERED WHEN THE APPLICATION PROGRAM 0 4 P* WANTS TO SYNCHRONIZE WITH A PARTICULAR EVENT. n 8 P* IT IS CALLED BY THE LKM HANDLER WITH THE FOLLOWING P* PARAMETERS:- P* P* A5
0x08baa0…08bc34 (1, 22) Dummy {f00=0x002c, f01=0x0190, f02=»ADDRESS v P LDR A6,A6 $ P RF(Z) TAC010 FILE CODE UNKNOWN " * P LDR* A1,A8 RETURN IF EVENT COMPLETED J P RB(N) TPQUE COMPLETED x , P IM DWTWAT,A6 SET WAIT INDICATOR IN DWT P RB TPDIS GO TO DISPATCHER P EJECT P* P*
0x08bc34…08bdc8 Dummy {f00=0x002c, f01=0x0190, f02=»HE h P* TERMINAL IT IS STARTED. . P* THIS MODULE IS CALLED BY THE LKM HANDLER , & P* WITH THE FOLLOWING PARAMETERS:- ^ P* P* A5 = TTAB ADDRESS P* P* PTEXIT EQU * " P CF A15,EXIT CALL PROGRAM EXIT P RB TPDIS GO
0x08bdc8…08bf5c Dummy {f00=0x002c, f01=0x0190, f02=»HANDLER j * P* WHEN A TERMINAL HAS TO BE ACTIVATED. P* > . P* THE FOLLOWING PARAMETERS ARE SUPPLIED:- H & P* A1 = PARAMETER WHEN A4 NOT ZERO z 2 P* A4 = START ADDRESS AT ACTIVATION, ELSE ZERO P* A5 = TTAB 8 P* A7 = IDENTIFICATION FOR
0x08bf5c…08c0f0 Dummy {f00=0x002c, f01=0x018e, f02=»10 EQU * * P ABL(Z) LKMRQE TERMINAL NOT IN SYSTEM 8 P CF A15,QTJOB QUEUE CALLING TERMINAL FOR DISPATCHING > P LDR A5,A2 z P LDR A2,A4 0 P RB(Z) TPQUE RESTART: QUEUE FOR DISPATCHING P LD A3,SRUN SEGMENT POINTER P RF(E) TAC020 JUMP
0x08c0f0…08c284 Dummy {f00=0x002c, f01=0x40b6, f02=» P RB TPDIS GO TO DISPACHER P EJECT & P* 4 P* > P* T P A U S E H P* ^ P* h & PTPAUSE EQU TPDIS GO TO DISPATCHER r P* P END @ EUE FOR DISPATCHING P LD A3,SRUN SEGMENT POINTER P RF(E) TAC020 JUMP
0x08c284…08c418 Dummy {f00=0x002c, f01=0x2008, f02=» TERMINAL NOT IN SYSTEM 8 P CF A15,QTJOB QUEUE CALLING TERMINAL FOR DISPATCHING ( P LDR A5,A2 d P LDR A2,A4 v 0 P RB(Z) TPQUE RESTART: QUEUE FOR DISPATCHING P CF A15,ACTOT ACTIVATION P RB TPDIS GO TO DISPACHER P EJECT
0x08c418…08c5ac Dummy {f00=0x002c, f01=0x0190, f02=» n , ( w Y : V ! _$ Y 4 ! , ( ! : Y 4 Y 0 X > , ( 2 X 0 ! P Y R ! n , ( _ Y 0 X 2 X 0 ! , ( @A ! Y 0 X 0 , ( 2
0x08c5ac…08c740 Dummy {f00=0x002c, f01=0x0190, f02=» w ! _& ! P U Y Z , ( U Y < P Y ` _0 X +T . , ( ! _j ! V X (R X D" T ! ! ^ , ( ZJ9 R Y < , Y +T _t X , ( D: Z|W ! ! _ = Y < , ( X + -P X (R
0x08c740…08c8d4 (1, 23) Opaque[0x194]
0x08c8d4…08ca68 # DirEnt {nam=»TIMER «, typ=»SC«, f00=0xffff, f01=0xffff, f02=0x0598, f03=0xffff}
0x08c8d4…08ca68 IdxSect {
0x08c8d4…08ca68 f00 = 0x002c // 0x8c8d4 @0x0
0x08c8d4…08ca68 f01 = 0x0006 // 0x8c8d6 @0x2
0x08c8d4…08ca68 gno = [ // 0x8c8d8 @0x4
0x08c8d4…08ca68 [0x00]: C0x002c.0x3.0
0x08c8d4…08ca68 [0x01]: C0x002d.0x0.0
0x08c8d4…08ca68 [0x02]: C0x002d.0x1.0
0x08c8d4…08ca68 ]
0x08c8d4…08ca68 }
0x08ca68…08cbfc Dummy {f00=0x002c, f01=0x0190, f02=» 0 P IDENT TIMER REL 8.2 78-09-15 870105040820 P 8 P* @ 8 P*************************************************** J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TIMER = TIMER FUNCTIONS P* P* P* P*
0x08cbfc…08cd90 Dummy {f00=0x002c, f01=0x0190, f02=» LKM PROCESSORS AND r " P* THE FOLLOWING SUBROUTINES: P* B * P* -SETIME: SET BLOCK IN TIMER QUEUE L . P* -SETIMP: SETIME + STORE TIMER POINTER z P* P* P EJECT P* P* P*********** P* ENTRIES *
0x08cd90…08cf24 Dummy {f00=0x002c, f01=0x0190, f02=»SETIME + STORE TIMER POINTER P* $ P* . P*********** 8 P* EXTRNALS * L P************ ` P* t P* ~ P EXTRN TDISP DISPATCHER 2 P EXTRN SRUN POINTER TO RUNNING SEGMENT IN LSBT . P EXTRN LKMQDI QUEUE TERMINAL AND DISPARCH
0x08cf24…08d0b8 Dummy {f00=0x002c, f01=0x0190, f02=»D FIND TTAB-ADDRESS $ P EXTRN QTJOB QUEUE TERMINAL JOB $ P EXTRN ACTOT ACTIVATE A TERMINAL D * P EXTRN SAVE8 SAVE 8 REGISTERS ON STACK l 8 P EXTRN TIMQUE POINTER TO FIRST BLOCK IN TIMER QUEUE 0 P EXTRN IHRET8 RESTORE 8 REGISTERS FROM STACK
0x08d0b8…08d24c Dummy {f00=0x002c, f01=0x0190, f02=»DLER WITH THE FOLLOWING n P* PARAMETERS: P* 8 P* 1. PROGRAM DELAY B P* ^ P* A4 = 0 h P* A5 = TTAB-ADDRESS z P* A8 = DELAY P* P* P* 2. TIMING AND ACTIVATION P* P* A1 = PARAMETER 8
0x08d24c…08d3e0 Dummy {f00=0x002c, f01=0x018e, f02=»CATION OF PROGRAM TO BE ACTIVATED v P* A8 = DELAY * P* @ P* J PTIMER EQU * T & P LDR A4,A4 TIMING AND ACTIVATION ? h P RF(NZ) TIM010 YES P* P* P* PROGRAM DELAY P* P LDR A1,A5 SET PARAMETER P ST
0x08d3e0…08d574 (1, 24) Dummy {f00=0x002d, f01=0x0190, f02=» P* P* TIMING AND ACTIVATION P* 0 PTIM010 EQU * : $ P CF A15,FNDTID FIND TTAB-ADDRESS N P LDR A2,A2 v " P ABL(Z) LKMRQE TTAB NOT FOUND ( P LDR A3,A2 IN BLOCK A3=TTAB-ADDRESS , P LDR A2,A4 A2=DISPATCH ADDRESS
0x08d574…08d708 Dummy {f00=0x002d, f01=0x0190, f02=»SETIME PPAR2 DATA TIMACT,0 P ABL LKMQDI ( P EJECT < P* J P* T P* RETURN AFTER TIME OUT ^ P* P* 1.PROGRAM DELAY P* PDELAY EQU * P LDR A5,A1 SET TTAB-ADDRESS , P CF A15,QTJOB AND QUEUE FOR DISP
0x08d708…08d89c Dummy {f00=0x002d, f01=0x0190, f02=»LOCK ADDRESS " P CF A15,FREBLK AND SET IT FREE P LDR A5,A3 SET TTAB-ADDRESS : . P LD A3,SRUN GET POINTER TO RUNNIG SEGMENT ^ $ P RF(Z) TIMA JMP IF ROOT SEGMENT 0 P SU A2,2,A3 ELSE CALCULATE RELATIVE ADDRESS PTIMA EQU * * P LDK A7,0
0x08d89c…08da30 Dummy {f00=0x002d, f01=0x0190, f02=»S E T I M E , S E T I M P P* " . P* SUBROUTINE TO SET BLOCK IN TIMER QUEUE , * P* AND IF SETIMP, STORE TIMER POINTER ^ P* ENTRY PARAMETERS:- P* P* A1 = PARAMETER . P* A4 = IF SETIMP: TIMER POINTER ADDRESS , P* P1 =
0x08da30…08dbc4 Dummy {f00=0x002d, f01=0x018e, f02=» P* EXIT PARAMETER:- P* $ P* A4 = ADDRESS TO TIMER . P* P P* Z PSETIME EQU * d P LDK A4,0 x PSETIMP EQU * P CF A15,SAVE8 * P LDR A6,A4 SAVE TIMER POINTER ADDRESS P LDR A3,A4 . P LD A5,20,A15 LOAD F
0x08dbc4…08dd58 Dummy {f00=0x002d, f01=0x0190, f02=» ( P ST A5,20,A15 ADJUST PROGRAM COUNTER $ P CF A15,GETBLK GET A FREE BLOCK 0 P LDR A2,A4 X P C1R A1,A8 j " P CF A15,GETBLK GET TIMER BLOCK | P LD A1,TIMQUE " P STR A1,A4 SET BLOCK IN QUEUE P ST A4,TIMQUE P ADK A4,4 0 P S
0x08dd58…08deec Dummy {f00=0x002d, f01=0x403e, f02=»R j PSETEND ABL IHRET8 P* $ P END .@ : GET A FREE BLOCK 0 P LDR A2,A4 X P C1R A1,A8 j " P CF A15,GETBLK GET TIMER BLOCK | P LD A1,TIMQUE " P STR A1,A4 SET BLOCK IN QUEUE P ST A4,TIMQUE P ADK A4,4 0 P S
0x08deec…08e080 Dummy {f00=0x002d, f01=0x2008, f02=» ST A4,TIMQUE P ADK A4,4 0 P ST A4,10,A15 SET TIMER ADDRESS A4 ON STACK 0 P LDR A6,A6 d P RF(Z) SETEND -SETIME v , P STR A4,A6 -SETIMP STORE TIMER POINTER PSETEND ABL IHRET8 P* P END @ GET A FREE BLOC
0x08e080…08e214 (1, 25) Dummy {f00=0x002d, f01=0x418a, f02=» ) + - X H D ! @ 5P CT OP WWv ]P cR iPd mW` sQ y T T P: T W0 P* H D ! T W& P" T W T P P< WH P R< T P T %W ) ` H D ! 1 ` 9R C b uW }T PX Q P PD P R T R T R P H D !@ %PN ) /P
0x08e214…08e3a8 Dummy {f00=0x002d, f01=0x408e, f02=» J F IDENT INTLT1 REL 8.1 78-04-21 870105040810 INTLT1 R INTLT1 d x@
0x08e3a8…08e53c Dummy {f00=0x002d, f01=0x408e, f02=» J F IDENT INTLT2 REL 8.1 78-04-21 870105040810 INTLT2 R INTLT2 d x@
0x08e53c…08e6d0 Dummy {f00=0x002d, f01=0x408e, f02=» J F IDENT INTLT3 REL 8.1 78-04-21 870105040810 INTLT3 R INTLT3 d x@
0x08e6d0…08e864 Dummy {f00=0x002d, f01=0x408e, f02=» J F IDENT INTLT4 REL 8.1 78-04-21 870105040810 INTLT4 R INTLT4 d x@
0x08e864…08e9f8 Dummy {f00=0x002d, f01=0x408e, f02=» J F IDENT INTRT1 REL 8.1 78-04-21 870105040810 INTRT1 R INTRT1 d x@
0x08e9f8…08eb8c Dummy {f00=0x002d, f01=0x408e, f02=» J F IDENT INTRT2 REL 8.1 78-04-21 870105040810 INTRT2 R INTRT2 d x@
0x08eb8c…08ed20 Dummy {f00=0x002d, f01=0x408e, f02=» J F IDENT INTRT3 REL 8.1 78-04-21 870105040810 INTRT3 R INTRT3 d x@
0x08ed20…08eeb4 (1, 26) Opaque[0x194]
0x08eeb4…08f048 # DirEnt {nam=»MSUBS «, typ=»SC«, f00=0xffff, f01=0xffff, f02=0x05b0, f03=0xffff}
0x08eeb4…08f048 IdxSect {
0x08eeb4…08f048 f00 = 0x002d // 0x8eeb4 @0x0
0x08eeb4…08f048 f01 = 0x000e // 0x8eeb6 @0x2
0x08eeb4…08f048 gno = [ // 0x8eeb8 @0x4
0x08eeb4…08f048 [0x00]: C0x002d.0x2.0
0x08eeb4…08f048 [0x01]: C0x002d.0x3.0
0x08eeb4…08f048 [0x02]: C0x002e.0x0.0
0x08eeb4…08f048 [0x03]: C0x002e.0x1.0
0x08eeb4…08f048 [0x04]: C0x002e.0x2.0
0x08eeb4…08f048 [0x05]: C0x002e.0x3.0
0x08eeb4…08f048 [0x06]: C0x002f.0x0.0
0x08eeb4…08f048 ]
0x08eeb4…08f048 }
0x08f048…08f1dc Dummy {f00=0x002d, f01=0x0190, f02=» 0 P IDENT MSUBS REL 8.2 78-09-15 870105040820 P 8 P SWLXY INCLUDED @ P REL 8.1 78-04-21 Z P v P* ~ 6 P************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* MSUBS
0x08f1dc…08f370 Dummy {f00=0x002d, f01=0x0190, f02=»**** b P* 2 P* THIS MODULE CONTAINS THE FOLLOWING MONITOR P* SUBROUTINES: L P* d , P* -SAVE8 SAVE 8 REGISTERS ON STACK n 4 P* -QTJOB QUEUE TERMINAL JOB FOR DISPATCHING 2 P* -QMJOB QUEUE MONITOR JOB FOF DISPATCHING
0x08f370…08f504 Dummy {f00=0x002d, f01=0x0190, f02=»T PROGRAM EXIT * P* -GETBLK GET A FREE MONITOR BLOCK * P* -FREBLK SET A MONITOR BLOCK FREE H " P* -FNDDWT FIND DWT ADDRESS v . P* -FNDTID FIND TERMINAL IDENTIFICATION , P* -TABIO ABORT I/O WITH ACTIVATION P* -TENDI
0x08f504…08f698 Dummy {f00=0x002d, f01=0x0190, f02=»* -HALT HALT MODULE P EJECT " P* 0 P*********** : P* ENTRIES * N P*********** b P* v P* " P ENTRY SAVE8 SAVE 8 REGISTERS $ P ENTRY QTJOB QUEUE TERMINAL JOB " P ENTRY QMJOB QUEUE MONITOR JOB " P ENTRY ACT
0x08f698…08f82c Dummy {f00=0x002d, f01=0x018e, f02=»NDDWT FIND DWT 0 P ENTRY FNDTID FIND TERMINAL INDENTIFICATION * P ENTRY TABIO ABORT I/O WITH ACTIVATION J P ENTRY TENDIO END I/O x P ENTRY PFINIT RESTART DEVICE $ P ENTRY SWL48 SWITCH TO LEVEL 48 $ P ENTRY SWLXY SWITCH TO LEVEL XY ,
0x08f82c…08f9c0 Dummy {f00=0x002d, f01=0x0190, f02=» P* P* 2 P* ENTRIES TO RESTORE REGISTERS A8-A1 WITHOUT P* ENEABLE INTERRUPTS R P* p P* z " P ENTRY IHRET8 RESTORE FROM A8 " P ENTRY IHRET7 A7 " P ENTRY IHRET6 A6 " P ENTRY IHRET5
0x08f9c0…08fb54 (1, 27) Dummy {f00=0x002d, f01=0x0190, f02=»NTRY IHRET1 A1 2 P ENTRY IHRTN RETURN WITHOUT ENABLE INTERRUPTS $ P EJECT Z P* h P************* r P* EXTERNALS * P************* P* P* < P EXTRN DISQUE POINTER TO FIRST PLACE IN DISPATCHER QUEUE & P
0x08fb54…08fce8 Dummy {f00=0x002d, f01=0x0190, f02=» j P EXTRN TTB:SA SAVE AREA * P EXTRN TTB:PP POINTER TO PENDING QUEUE ( ( P EXTRN TTB:TD TERMINAL DEVICE TABLE V P EXTRN RETUR8 6 P EXTRN FREQUE POINTER TO FIRST FREE MONITOR BLOCK P EXTRN DWTST DWT STATUS " P EXTRN DWTADR -DRIV
0x08fce8…08fe7c Dummy {f00=0x002d, f01=0x0190, f02=» ON QUEUE p " P EXTRN DWTTAB -TTAB ADDRESS & P EXTRN DWTTDM DM TASK TTAB ADDRESS 8 ( P EXTRN TCTAB TERMINAL CONTROL TABLE b $ P EXTRN CDTAB COMMON DEVICE TABLE 2 P EXTRN PFTAB TABLE OF DEVICES TO BE RESTARTED P EXTRN TTB:SP,TTB:SS $ P
0x08fe7c…090010 Dummy {f00=0x002d, f01=0x018e, f02=» r P EJECT P* P* P* S A V E 8 * P* @ 0 P* SUBROUTINE TO SAVE 8 REGISTERS ON STACK J $ P* WITHOUT ENABLING INTERRUPTS. ~ P* P* PSAVE8 EQU * P INH INHIBIT INTERRUPTS P STR A3,A15 P STR A
0x090010…0901a4 Dummy {f00=0x002d, f01=0x0190, f02=» f , P ST A3,SAVE81 AND MODIFY BRANCH ADDRESS P ST A2,14,A15 8 P ST A1,16,A15 N P LD A3,12,A15 RESTORE A3 d & P ABL 0 THIS IS USED TO BRANCH BACK PSAVE81 EQU *-2 P* P EJECT P* P* P* Q T J O B P*
0x0901a4…090338 Dummy {f00=0x002d, f01=0x0190, f02=»GRAM TO BE QUEUED. t P* 8 P* THE REQUESTED JOB IS PUT IN DISPATCHER QUEUE ON $ 8 P* PRIORITY BASIS. WITHIN ONE PRIORITY LEVEL JOB IS ` P* PUT LAST IN QUEUE. P* P* P* PQTJOB EQU * P INH $ P STR A1,A15 SAVE
0x090338…0904cc Dummy {f00=0x002d, f01=0x0190, f02=»D LEVEL TO BE QUEUED z & PQTJ010 LDR A2,A1 SAVE LAST ADDRESS " P LDR* A1,A1 FOLLOW THE THREAD F " P RF(Z) QTJ020 END QUEUE FOUND l & P CC A3,TTB:ST+1,A1 COMPARE LEVELS P RB(NL) QTJ010 TRY NEXT $ PQTJ020 STR A1,A5 INSET IN QUEUE P STR
0x0904cc…090660 Dummy {f00=0x002d, f01=0x0190, f02=» ON LEVEL 49 l P* ENTRY PARAMETERS:- P* 2 P* A1 = PARAMETER < P* V P* A2 = DISPATCH ADDRESS ` P* 8 P* A5 IS SET TO TTAB-ADDRESS OF MONITORJOBS AND THE < P* SUBROUTINE 'ACTOT' IS USED TO ACTIVATE AND QUEUE THE P
0x090660…0907f4 (1, 28) Dummy {f00=0x002e, f01=0x0190, f02=»0 P RF ACT02 AND GO TO ACTOT P EJECT , P* : P* D P* A C T O T , A C T O T P N P* r 2 P* SUBROUTINE TO ACTIVATE A TERMINAL PROGRAM. | P* ENTRY PARAMETERS:- P* P* A1 = PARAMETER P* A2 = DISPATCH AD
0x0907f4…090988 Dummy {f00=0x002e, f01=0x0190, f02=» < P* - IF REQUESTED PROGRAM IS NOT ACTIVE THE PROGRAM IS : P* PUT IN DISPATCHER QUEUE VIA SUBROUTINE 'QTJOB'. H @ P* - IF PROGRAM IS ACTIVE, THE REQUEST IS PUT IN A PENDING P* QUEUE. @ P* - ACTOT WILL PUT REQUEST IN PENDING QU
0x090988…090b1c Dummy {f00=0x002e, f01=0x0190, f02=»F A15,SAVE8 SAVE REGISTERS P LDK A6,1 INDICATE LIFO " P RF ACT03 B PACTOT EQU * T P CF A15,SAVE8 SAVE REGISTERS h 0 PACT02 LDK A6,0 INDICATE FIFO PENDING QUEUING PACT03 EQU * ( P LD A4,TTB:SA,A5 IS PROGRAM ACTIVE? , P RF(NZ)
0x090b1c…090cb0 Dummy {f00=0x002e, f01=0x0190, f02=»TB:SS,A5 LAST SEGMENT START * PACT05 ST A2,TTB:SA,A5 DISPATCH ADDRESS $ $ P ST A3,TTB:SP,A5 SEGMENT POINTER R $ P ST A1,TTB:SA+2,A5 AND PARAMETER z $ P LD A4,TTB:ID,A5 SET TERMINAL ID * P ST A4,TTB:SA+4,A5 TO A2 IN SAVE AREA * P ST A7,TTB:SA+14
0x090cb0…090e44 Dummy {f00=0x002e, f01=0x0190, f02=»T REQUEST IN PENDING QUEUE. P* $ * PACT020 CF A15,GETBLK GET A FREE BLOCK . P LDR A2,A4 P LDR A1,A7 ABORT PARAMETER n P CF A15,GETBLK P ADKL A5,TTB:PP " PACT030 LDR A3,A5 SAVE ADDRESS ( P LDR* A5,A5 FOLLOW THE QUEUE THREAD
0x090e44…090fd8 Dummy {f00=0x002e, f01=0x018e, f02=»T030 NO, TRY NEXT! PACT040 EQU * " P STR A4,A3 SET BLOCK IN QUEUE . P STR A5,A4 T P RB ACT010 f P EJECT x P* P* P* E X I T P* 8 P* SUBROUTINE TO SET A PROGRAM FREE AND QUEUE FIRST P* PENDING PROGRAM
0x090fd8…09116c Dummy {f00=0x002e, f01=0x0190, f02=» PEXIT EQU * P INH ( P CM TTB:SA,A5 RESET PROGRAM COUNTER " 0 P LD A4,TTB:PP,A5 GET PENDING PROGRAM POINTER N $ P RF(Z) EXT010 NO PENDING PROGRAM P LDR* A3,A4 GET QUEUE THREAD 0 P ST A3,TTB:PP,A5 AND SAVE IN PENDING POINTER 0 P CF A1
0x09116c…091300 Dummy {f00=0x002e, f01=0x0190, f02=»TIVATE TERMINAL PEXT010 RF GBL020 P EJECT 0 P* > P* H P* G E T B L K R P* j 4 P* SUBROUTINE TO GET A FREE BLOCK FROM MONITOR t 6 P* BLOCK POOL.REGISTERS A3-A1 ARE STORED IN FOUND P* FREE BLOCK. P* P
0x091300…091494 (1, 29) Dummy {f00=0x002e, f01=0x018e, f02=» P STR A5,A15 SAVE A5 0 P LD A4,FREQUE GET FIRST BLOCK IN FREE QUEUE $ P RF(NZ) GBL010 X P LDK A1,/B HALT PARAMETER n . P CF A15,HALT HALT IF ALL BLOCKS OCCUPIED PGBL010 LDR* A5,A4 . P ST A5,FREQUE TAKE BLOCK OUT OF FREE QUEUE
0x091494…091628 Dummy {f00=0x002e, f01=0x0190, f02=» ~ P EJECT P* P* P* F R E B L K * P* B : P* SUBROUTINE TO GET PARAMETERS FROM A MONITOR BLOCK L P* AND SET THIS BLOCK FREE. P* P* ENTRY PARAMETER:- P* P* A4 = BLOCKADDRESS P* P
0x091628…0917bc Dummy {f00=0x002e, f01=0x0190, f02=» " " P* P* $ PFREBLK EQU * . P INH B P LDR* A3,A4 UPDATE A3 N P LD A1,FREQUE l P STR A1,A4 P ST A4,FREQUE SET BLOCK FREE P LD A2,2,A4 P LD A1,4,A4 P ABL IHRTN P EJECT P P
0x0917bc…091950 Dummy {f00=0x002e, f01=0x0190, f02=»D FROM DATA MANAGEMENT t P* A8 = ECB ADDRESS P* 8 P* EXIT PARAMETERS:- B P* ^ P* A2 = DWT INDEX h & P* A6 = DWT ADDRESS IF FOUND ELSE 0 P* P PFNDDWT STR A1,A15 SAVE A1 P LDKL A6,TTB:TD 4 P ADR A6,A5 GET ADD
0x091950…091ae4 Dummy {f00=0x002e, f01=0x0190, f02=»ILE CODE FROM ECB ~ P PFND100 SUK A1,4 " ( P RF(N) FND110 FILE CODE NOT IN TTAB : & P CC A2,1,A6 SEARCH IN DEVICE TABLE f & P RF(NE) FND106 BRANCH IF NOT FOUND P STR A1,A15 P LD A1,2,A6 DWT ADDR " P LD A1,DWTADR,A1 DRIVER ENTRY
0x091ae4…091c78 Dummy {f00=0x002e, f01=0x0190, f02=» P LDR* A1,A15 PFND106 EQU * ( P ADK A6,4 ADDRESS TO NEXT FILE CODE , P RB FND100 TRY NEXT X P EJECT t P* $ P* SEARCH IN COMMON DEVICE TABLE P* P $ PFND110 LD A6,CDTAB CDTAB ADDRESS P LDR* A1,A6 CDTAB LENGTH
0x091c78…091e0c Dummy {f00=0x002e, f01=0x0190, f02=» & P RF(NE) FND126 FILE CODE NOT FOUND P STR A1,A15 . P LD A1,2,A6 B P LD A1,DWTADR,A1 V P CWK A1,TIODM n P RF(NE) FND200 NOT DM REQ $ P CF A15,CHKIND CHECK INDEX IN DM P RF FND200 INDEX OK P LDR* A1,A15 PFND126 EQU
0x091e0c…091fa0 Dummy {f00=0x002e, f01=0x018e, f02=»15 RESET STACK P LCR A2,A6 LOAD DWT INDEX P LD A6,2,A6 LOAD DWT ADDRESS 8 PFND210 RF IHRET1 P EJECT t P* P* P* F N D T I D P* P* B P* SUBROUTINE TO FIND TTAB ADDRESS FROM TERMINAL IDENTIFICATION P*
0x091fa0…092134 (1, 30) Dummy {f00=0x002e, f01=0x0190, f02=» P* P* A2 = TTAB ADDRESS . P* A2 = 0 INDICATES ILLEGAL IDENTIFICATION * P* P* f " PFNDTID STR A1,A15 SAVE REG. A1 p P LD* A1,TCTAB TCTAB LENGTH P AD A1,TCTAB P PFTI010 SUK A1,2 P CW A1,TCTAB $ P RF(E) F
0x092134…0922c8 Dummy {f00=0x002e, f01=0x0190, f02=»IONS l & P RB(NE) FTI010 NO MATCH. TRY NEXT P 6 PFTI020 RF IHRET1 > , PFTI030 SUR A2,A2 ILLEGAL IDENTIFICATION V P RF IHRET1 P EJECT P* P* $ P* T E N D I O , T A B I O P* P* . P* THIS MODULE IS C
0x0922c8…09245c Dummy {f00=0x002e, f01=0x0190, f02=»D TO START THE TASK ~ P* P* -IF NORMAL I/O WITH WAIT:- & P* J * P* QTJOB IS CALLED TO QUEUE THE TASK T 8 P* FOR DISPATCHING WITH THE FOLLOWING PARAMETERS:- P* P* A5 = TTAB-ADDRESS P* $ P* -IF NORMAL I/O WITH NO
0x09245c…0925f0 Dummy {f00=0x002e, f01=0x0190, f02=»THAT TASK IS PUT IN DISPATCHER QUEUE TO REPEAT THE LKM INSTRUCTION P* ! J 0 P* ENTRY PARAMETERS TO THIS SUBROUTINE ARE:- ! T P* ! P* A1 = RETURN CODE ! P* A6 = DWT ADDRESS ! P* NO REGISTERS ARE DESTROYED ! P* ! 6 P* N.B. THE ECB R
0x0925f0…092784 Dummy {f00=0x002e, f01=0x0190, f02=»EPT ABORT PARAMETER A7 ! d F P* WILL BE SET TO 1 BEFORE ACTOT IS CALLED IN CASE OF ACTIVATION. " , P* (FOR TENDIO THE ABORT PARAMETER = 0) " h P EJECT " P* " 4 P* CHECK IF ANY TERMINAL ON QUEUE FOR THIS DEVICE " P* " PTABIO EQU * " $ P C
0x092784…092918 Dummy {f00=0x002e, f01=0x0190, f02=» ON STACK " x . P LDK A7,0 ABORT PARAMETER=0 (NO ABORTION) # PTEN100 EQU * # D $ P LD A5,DWTTQ,A6 ANY TASK QUEUED? # X P RF(Z) TEN110 NO # P # P LD A2,2,A5 TASK STATUS # " P RF(N) TEN105 DM REQUEST NEXT # P LDKL A2,/800 ATTACH BIT 4 # P
0x092918…092aac Dummy {f00=0x002e, f01=0x0190, f02=»N'T QUEUE TASK # z PTEN105 EQU * $ 0 P LDR* A3,A5 YES: UPDATE QUEUE ANCHOR ADDRESS $ * P ST A3,DWTTQ,A6 $ ^ . P CF A15,QTJOB QUEUE TASK TO REPEAT REQUEST $ v P EJECT $ P* $ P* $ P* UPDATE ECB AND DWT $ P* $ P* $ P $ PTEN110
0x092aac…092c40 Dummy {f00=0x002e, f01=0x018e, f02=»ST $ v & P LD A5,DWTTDM,A6 GET TTAB ADDRESS % 0 P CF A15,REQEND RESET REQ BUSY FOR ALL FILES % 4 PTEN115 EQU * % h P LDKL A2,/8000 % | 2 P ORS A2,DWTST,A6 INDICATE DEVICE READY IN DWT % . P LDKL A3,/DBFF RESET ECHO-BIT AND BITS 5,6 % 2 P ANS A3,DWTST,
0x092c40…092dd4 (1, 31) Dummy {f00=0x002e, f01=0x0190, f02=» % X * P ORRS A2,A3 SET EVENT COMPLETED IN ECB & ( P ORS A1,8,A3 SET RETURN CODE IN ECB & 6 $ P CM DWTECB,A6 RESET ECB ADDRESS & b P EJECT & P* & " P* CHECK IF WAIT OR ACTIVATION & P* & 0 P LD A4,DWTWAT,A6 GET WAIT/ACTIVATE INDICATOR & ( P R
0x092dd4…092f68 Dummy {f00=0x002e, f01=0x0190, f02=»DR & ^ . P CF A15,ACTOTP ACTIVATE TASK ON LIFO BASIS ' P RF TEN130 RETURN ' < PTEN120 EQU * ' V 2 P CF A15,QTJOB WAIT: QUEUE TASK FOR DISPATCHING ' j PTEN130 EQU * ' P EJECT ' P* ' P* ' , P* RESTORE REGISTERS AND RETURN WITHOUT ' P*
0x092f68…0930fc Dummy {f00=0x002e, f01=0x0190, f02=»* A5,A15 ' PIHRET4 LDR* A4,A15 ( PIHRET3 LDR* A3,A15 ( * PIHRET2 LDR* A2,A15 ( D PIHRET1 LDR* A1,A15 ( ^ PIHRTN INH ( x $ P ADKL A15,4 ADJUST STACK POINTER ( P ABR* A15 AND RETURN ( P EJECT ( P* ( P* ( P* P F I N I T ( P
0x0930fc…093290 Dummy {f00=0x002e, f01=0x0190, f02=»GISTERS A1-A8 ARE AVAILABLE FOR THE RESTART ROUTINES. ( P* ) > P* ) H PPFINIT EQU * ) R ( P LDK A1,2 SET INDEX TO FIRST ROUTINE ) f $ PPFI100 CW A1,PFTAB CHECK IF LAST ) P RF(NL) PFI110 ALL RESTARTED ) P STR A1,A15 SAVE A1 ) * P CFI A15,PFTAB
0x093290…093424 Dummy {f00=0x002e, f01=0x0190, f02=»WHEN ALL STARTED ) x P EJECT * P* * & P* * 0 P* S W L 4 8 * : P* * P : P* SUBROUTINE TO SWITCH PROGRAM PRIORITY LEVEL TO 48. * Z P* * P* * PSWL48 EQU * * P INH * P STR A1,A15 * $ P LDKL A1,/C000 PSW FOR LEVEL 48 * & P
0x093424…0935b8 Dummy {f00=0x002e, f01=0x0190, f02=»JECT MSUBS * P* + P* + P* S W L X Y + ( P* + > 8 P* SUBROUTINE TO SWITCH PROGRAM PRIORITY LEVEL TO: + H ( P* :=48 IF LEVEL ON STACK IS >=48 + ( P* :=XY " " " " " XY<48 + P* + P* + PSWLXY EQU * + P INH
0x0935b8…09374c Dummy {f00=0x002e, f01=0x018e, f02=» + n P ANK A1,/FC , & P CWK A1,/C0 LEVEL IS IN BITS 8-13 , P RF(NL) LEV48 LEVEL >= 48? , F P ECR A1,A1 NO , h 8 P ORK A1,/C0 SET RUN AND ENABLE FLIP FLOPS (BITS 8&9) , ~ P* , PSETLEV EQU * , ( P ORS A1,4,A15 SET NEW LEVEL ON STACK , P LDR
0x09374c…0938e0 Dummy {f00=0x002e, f01=0x0190, f02=» , b P RB SETLEV - P* - P EJECT - $ P* - 2 ( P* INTERRUPT SAVE AND HALT MODULE - < P* - h PINTSAV DATA 0 - r PSAVA15 DATA 0 - " PILLINT LDK A1,5 HALT PARAMETER - P CF A15,HALT - PHALT EQU * - P CF A15,SAVE8 - P STR A9,
0x0938e0…093a74 (1, 32) Dummy {f00=0x002f, f01=0x4046, f02=»TR A1,0,SOP INDICATE TYPE OF HALT - P HLT . * P END . 6@ . B
0x093a74…093c08 Dummy {f00=0x002f, f01=0x2008, f02=» / 5 STACK " ~ P LDR* A1,A15 RESTORE A1 # P RTN A15 RETURN TO CALLER # 8 P* # Z P END # d@ # pN WHEN ALL STARTED " ` P EJECT " P* " P* " P* S W L 4 8 " P* " : P* SUBROUTINE TO SWITCH PROGRAM PRIORITY LEVEL TO 48. "
0x093c08…093d9c Dummy {f00=0x002f, f01=0x407e, f02=» W T sP wR4 ` H D !6 P P B T P T B W0 )T& / B AW IP mU P h@ z $ 1W $P e % v ECBRL , ( W D (@ H B Z D U ECBEL ECBBA , (
0x093d9c…093f30 Dummy {f00=0x002f, f01=0x40e4, f02=» J F IDENT DRIC0X REL 8.1 78-04-21 870105040810 ITABRT ITADI ITADO R ITADI p ITADO IHRTN ITABRT @ @
0x093f30…0940c4 Dummy {f00=0x002f, f01=0x018e, f02=» J F IDENT ATTACH REL 8.1 78-04-21 870105040810 ATTACH DETACH ATT:CH R ATTACH t TTB:ST , ( T C @ T P U W DWTST DWTTAB TIODM , ( "$ X
0x0940c4…094258 Dummy {f00=0x002f, f01=0x0190, f02=» , ( QD _ X X GETBLKK 4 , ( k T B Z T @_$ A @ F SETIMPK v TIOQ20B DETACH , ( 1 A N , ( X XT X Z Y
0x094258…0943ec Dummy {f00=0x002f, f01=0x0190, f02=» TTB:SAK TPQUE , ( $ ) U ATT:CH P IHRTN d , ( 0P P t FDBADF , ( - $ @ E R 0 , ( I P R I I W I
0x0943ec…094580 Dummy {f00=0x002f, f01=0x4080, f02=» GP i mT, uT } n < 8 t T 8 h T ( P ER IP MR WW _ h oP * j@ | 0P P t FDBADF , ( - $ @ E R 0 , ( I P R I I W I
0x094580…094714 (1, 33) Opaque[0x194]
0x094714…0948a8 # DirEnt {nam=»GRBUF «, typ=»SC«, f00=0xffff, f01=0xffff, f02=0x05e8, f03=0xffff}
0x094714…0948a8 IdxSect {
0x094714…0948a8 f00 = 0x002f // 0x94714 @0x0
0x094714…0948a8 f01 = 0x0004 // 0x94716 @0x2
0x094714…0948a8 gno = [ // 0x94718 @0x4
0x094714…0948a8 [0x00]: C0x002f.0x1.0
0x094714…0948a8 [0x01]: C0x002f.0x2.0
0x094714…0948a8 ]
0x094714…0948a8 }
0x0948a8…094a3c Dummy {f00=0x002f, f01=0x0190, f02=» 0 P IDENT GRBUF REL 8.2 78-09-15 870105040820 P 8 P* @ < P******************************************************* J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P* GRBUF = LKM-PROCESSOR FOR GET AND RELEASE P* P*
0x094a3c…094bd0 Dummy {f00=0x002f, f01=0x018e, f02=»LE CONTAINS LKM-PROCESSORS FOR GET AND P* RELEASE BUFFER. . P* J P* GET BUFFER : T : P* NUMBER OF REQUIRED BUFFERS ARE GIVEN n > P* IN A7. BUFFER ADDRESS IS RETURNED IN A8. P* P* RELEASE BUF
0x094bd0…094d64 Dummy {f00=0x002f, f01=0x0190, f02=» P*********** P* P* & P ENTRY GETBUF GET BUFFER 0 P ENTRY RELBUF RELEASE BUFFER P P* t P* ~ P************* P* EXTERNALS * P************* P* P* $ P EXTRN TTB:SA TERMINAL SAVE AREA P E
0x094d64…094ef8 Dummy {f00=0x002f, f01=0x0190, f02=»FIRST TTAB IN BUFFER QUEUE x P* " P* , P EJECT 6 P* D P* N PGETBUF EQU * X , P LDKL A1,GBQUE POINTER TO FIRST IN QUEUE l & PGET001 LDR* A2,A1 GET TTAB-ADDRESS P RF(Z) GET005 NO IN QUEUE P LD A3,TTB:SA,A2 P CW A4,-
0x094ef8…09508c Dummy {f00=0x002f, f01=0x018e, f02=» ALLOCATE BUFFERS x P LDR A4,A4 , P RF(NZ) REL060 BUFFER HAS BEEN ALLOCATED . P* ^ P* h & PGET030 LDKL A1,GBQUE QUEUE REQUEST r PGET040 LDR A2,A1 P LDR* A1,A1 $ P RB(NZ) GET040 NOT LAST IN CHAIN P STR A5,A2 P CMR A
0x09508c…095220 Dummy {f00=0x002f, f01=0x0190, f02=» t P LD A1,2,A4 BUFFER UNIT $ P ADK A1,2 ADD ONE WORD FOR CHAIN ( P LDR* A2,A8 P P XRK A2,1 d PREL010 LDR A3,A8 v P ADR A3,A1 P STR A3,A8 UPDATE CHAIN P LDR A8,A3 P CWR A3,A2 $ P RB(NE) REL010 UPDATE NEXT CHAIN
0x095220…0953b4 (1, 34) Dummy {f00=0x002f, f01=0x018e, f02=»DR* A5,A2 BUFFER ADDRESS P RF(Z) REL050 END OF QUEUE & P LDR* A6,A5 ADDRESS TO NEXT BUFFER B * P LD A1,TTB:SA,A5 GET DISPATCH ADDRESS l P CW A4,-2,A1 P RB(NE) REL020 NOT SAME POOL P STR A2,A15 P STR A4,A15 P STR A6,A15
0x0953b4…095548 Dummy {f00=0x002f, f01=0x0190, f02=» j P LDR A1,A4 P LDR* A6,A15 P LDR* A4,A15 0 P LDR* A2,A15 D P LDR A1,A1 X & P RF(Z) REL050 BUFFER NOT ALLOCATED j P CMR A5 TAKE OUT OF QUEUE P STR A6,A2 UPDATE CHAIN ( P CF A15,QTJOB QUEUE FOR DISPATCHING * P RB RE
0x095548…0956dc Dummy {f00=0x002f, f01=0x0190, f02=» EJECT P* P* < P* SUBROUTINE TO ALLOCATE BUFFERS TO REQUESTING PROGRAM " P* b P* l PGET LDK A6,1 v & P LDR* A4,A4 ADDRESS TO BUFFER-POOL $ PGET010 LDR A8,A4 BUFFER ADDRESS P LDR A2,A7 PGET020 LDR A1,A4 P
0x0956dc…095870 Dummy {f00=0x002f, f01=0x412a, f02=»1 P RB(NZ) GET020 P ANKL A8,/FFFE P* 6 P* @ P ORK A4,1 FREE BUFFER FOUND J $ P STR A4,A8 UPDATE BUFFER POINTER n & P ADKL A8,2 ADDRESS TO USER BUFFER , P ST A8,TTB:SA+16,A5 SAVE IT IN SAVE AREA PGET025 RTN A15 P*
0x095870…095a04 Dummy {f00=0x002f, f01=0x2008, f02=» RB(NZ) GET010 BUFFER NOT FREE P SUK A2,1 . P RB(NZ) GET020 @ P ANKL A8,/FFFE V P* l P* v P ORK A4,1 FREE BUFFER FOUND $ P STR A4,A8 UPDATE BUFFER POINTER & P ADKL A8,2 ADDRESS TO USER BUFFER , P ST A8,TTABSA+16,A
0x095a04…095b98 Dummy {f00=0x002f, f01=0x401a, f02=» @ T Y P LDREG 8 SAVE8 H , ( y P P P Y _@ X , ( D Y X Z8 _ B ( $ = > 0R Q W C > H D ! V H ( 8 P
0x095b98…095d2c Dummy {f00=0x002f, f01=0x40dc, f02=» J F IDENT DVTMS REL 8.1 78-04-21 870105040810 DVTMS R DVTMS b MSADN t & " ! ( @
0x095d2c…095ec0 Dummy {f00=0x002f, f01=0x40ce, f02=» J F IDENT DC:TAB REL 8.1 78-04-21 870105040810 DC:TAB DCTAB R DCTAB j DC:TAB | @
0x095ec0…096054 (1, 35) Opaque[0x194]
0x096054…0961e8 # DirEnt {nam=»TABORT«, typ=»SC«, f00=0xffff, f01=0xffff, f02=0x05f8, f03=0xffff}
0x096054…0961e8 IdxSect {
0x096054…0961e8 f00 = 0x002f // 0x96054 @0x0
0x096054…0961e8 f01 = 0x0004 // 0x96056 @0x2
0x096054…0961e8 gno = [ // 0x96058 @0x4
0x096054…0961e8 [0x00]: C0x002f.0x3.0
0x096054…0961e8 [0x01]: C0x0030.0x0.0
0x096054…0961e8 ]
0x096054…0961e8 }
0x0961e8…09637c Dummy {f00=0x002f, f01=0x0190, f02=» 2 P IDENT TABORT REL 8.2 78-09-15 870105040820 P : P* B 6 P************************************************* L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* " P* TABORT = ABORT I/O REQUEST P* P* P* P*
0x09637c…096510 Dummy {f00=0x002f, f01=0x0190, f02=»HE LKM HANDLER WITH THE FOLLOWING r P* PARAMETERS:- * P* B , P* A5 = TTAB-ADDRESS OF CALLING PROGRAM L P* | 6 P* A8 = ECB-ADDRESS OF I/O REQUEST TO BE ABORTED P* * P* A PENDING I/O REQUEST IS ABORTED. : P* THE ABORT RE
0x096510…0966a4 Dummy {f00=0x002f, f01=0x0190, f02=» EJECT P P P ENTRY TABORT P 4 P < " P EXTRN FNDDWT FIND DWT-ADDRESS D P EXTRN DWTST DWT STATUS j & P EXTRN DWTTAB TTAB-ADDRESS IN DWT 0 P EXTRN DWTWAT WAIT ACTIVATE INDICATOR IN DWT ( P EXTRN TABIO ABORT I/O AND ACTIV
0x0966a4…096838 Dummy {f00=0x002f, f01=0x0190, f02=»BRT ABORT INTERTASK REQUEST P EXTRN FREBLK FREE ONE BLOCK $ P H P P " PDWTECH EQU /22 ECHO DEVICE DWT X P* ~ P* CONDITIONAL ASSEMBLY P* > P* BY SETTING X:A=0 NO ACTIVATION (IF ANY) WILL TAKE PLACE @ P* IF X:A=1 I/O REQU
0x096838…0969cc Dummy {f00=0x002f, f01=0x0190, f02=»ORTED z PCREDIT EQU 0 P EJECT " P 0 P* 8 P* ABORT I/O REQUEST B P* ^ P h PTABORT LDR* A3,A8 p , P RF(N) TABOER REQUEST ALREADY COMPLETED P ( P CF A15,FNDDWT LOOK FOR DWT ADDRESS P LDR A8,A6 P RF(Z) T
0x0969cc…096b60 Dummy {f00=0x002f, f01=0x0190, f02=»OER DEVICE NOT BUSY P P SLC A7,2 $ $ P RF(NN) TABO20 NOT ECHO REQUEST 6 " P LD A6,DWTECH,A6 GET ECHO DWT ^ $ P CF A15,TENDIO ABORT ECHO DEVICE P LDR A6,A8 RESTORE DWT PTABO20 EQU * . P CF A15,ITABRT ABORT IF INTERTASK REQUEST
0x096b60…096cf4 (1, 36) Dummy {f00=0x0030, f01=0x4190, f02=»REDIT=1 P LD A4,DWTWAT,A6 P RF(Z) TABO30 I/O NOT WAIT ( 2 P CF A15,FREBLK I/O AND ACTIVATE FREE DISP BLK J P CM DWTWAT,A6 SET NOT WAIT PTABO30 EQU * P LDKL A1,/C000 RETURN CODE P CF A15,TENDIO ABORT P XIF 0 P ABL LKM
0x096cf4…096e88 Dummy {f00=0x0030, f01=0x2008, f02=»
0x096e88…09701c Dummy {f00=0x0030, f01=0x0190, f02=» ON QUEUE p " P EXTRN DWTTAB -TTAB ADDRESS & P EXTRN DWTTDM DM TASK TTAB ADDRESS 8 ( P EXTRN TCTAB TERMINAL CONTROL TABLE b $ P EXTRN CDTAB COMMON DEVICE TABLE 2 P EXTRN PFTAB TABLE OF DEVICES TO BE RESTARTED P EXTRN TTB:SP,TTB:SS $ P
0x09701c…0971b0 Dummy {f00=0x0030, f01=0x018e, f02=» r P EJECT P* P* P* S A V E 8 * P* @ 0 P* SUBROUTINE TO SAVE 8 REGISTERS ON STACK J $ P* WITHOUT ENABLING INTERRUPTS. ~ P* P* PSAVE8 EQU * P INH INHIBIT INTERRUPTS P STR A3,A15 P STR A
0x0971b0…097344 Dummy {f00=0x0030, f01=0x0190, f02=» f , P ST A3,SAVE81 AND MODIFY BRANCH ADDRESS P ST A2,14,A15 8 P ST A1,16,A15 N P LD A3,12,A15 RESTORE A3 d & P ABL 0 THIS IS USED TO BRANCH BACK PSAVE81 EQU *-2 P* P EJECT P* P* P* Q T J O B P*
0x097344…0974d8 Dummy {f00=0x0030, f01=0x0190, f02=»GRAM TO BE QUEUED. t P* 8 P* THE REQUESTED JOB IS PUT IN DISPATCHER QUEUE ON $ 8 P* PRIORITY BASIS. WITHIN ONE PRIORITY LEVEL JOB IS ` P* PUT LAST IN QUEUE. P* P* P* PQTJOB EQU * P INH $ P STR A1,A15 SAVE
0x0974d8…09766c Dummy {f00=0x0030, f01=0x0190, f02=»D LEVEL TO BE QUEUED z & PQTJ010 LDR A2,A1 SAVE LAST ADDRESS " P LDR* A1,A1 FOLLOW THE THREAD F " P RF(Z) QTJ020 END QUEUE FOUND l & P CC A3,TTB:ST+1,A1 COMPARE LEVELS P RB(NL) QTJ010 TRY NEXT $ PQTJ020 STR A1,A5 INSET IN QUEUE P STR
0x09766c…097800 Dummy {f00=0x0030, f01=0x0190, f02=» ON LEVEL 49 l P* ENTRY PARAMETERS:- P* 2 P* A1 = PARAMETER < P* V P* A2 = DISPATCH ADDRESS ` P* 8 P* A5 IS SET TO TTAB-ADDRESS OF MONITORJOBS AND THE < P* SUBROUTINE 'ACTOT' IS USED TO ACTIVATE AND QUEUE THE P
0x097800…097994 (1, 37) Opaque[0x194]
0x097994…097b28 # DirEnt {nam=»TDISP «, typ=»SC«, f00=0xffff, f01=0xffff, f02=0x0608, f03=0xffff}
0x097994…097b28 IdxSect {
0x097994…097b28 f00 = 0x0030 // 0x97994 @0x0
0x097994…097b28 f01 = 0x0008 // 0x97996 @0x2
0x097994…097b28 gno = [ // 0x97998 @0x4
0x097994…097b28 [0x00]: C0x0030.0x1.0
0x097994…097b28 [0x01]: C0x0030.0x2.0
0x097994…097b28 [0x02]: C0x0030.0x3.0
0x097994…097b28 [0x03]: C0x0031.0x0.0
0x097994…097b28 ]
0x097994…097b28 }
0x097b28…097cbc Dummy {f00=0x0030, f01=0x0190, f02=» 0 P IDENT TDISP REL 8.2 78-09-15 870105040820 P 8 P* @ 6 P************************************************** J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* TDISP = TERMINAL DISPATCHER P* P* P* P*
0x097cbc…097e50 Dummy {f00=0x0030, f01=0x0190, f02=»INAL DISPATCHER IN TOSS. | > P* ENTRY POINT IS 'TDISP' WITH 8 REGISTERS ON A15 STACK. > P* THE DISPATCHER CHECKS IF THERE IS A JOB IN DISPATCHER- b < P* QUEUE WITH HIGHER PRIORITY THAN INTERRUPTED PROGRAM. < P* - IF SO THE QUEUED PROGRAM IS ST
0x097e50…097fe4 Dummy {f00=0x0030, f01=0x0190, f02=»TED PROGRAM VIA RETUR8. h P* @ P* AN ENTRYPOINT 'LKMDIS' IS ALSO INCLUDED IN THIS MODULE. * D P* THIS PART IS DISPATCHED AFTER EACH LKM-REQUEST.(NO REGISTERS n H P* ON STACK) A CHECK IS MADE IF THERE IS A JOB IN DISPATCHER QUEUE 6 P* WI
0x097fe4…098178 Dummy {f00=0x0030, f01=0x0190, f02=»OGRAM VIA RETU14. b P* P* $ > P* AN OPTIONALY ENTRYPOINT 'DISIOE' IS ALSO PROVIDED FOR . > P* ERRORS IN I/O DRIVERS. BIT 0 IS SET IN A1 AND THE SUB- p < P* ROUTINE 'TENDIO' IS CALLED BEFORE THE 'TDISP'-ENTRY P* IS ENTERED. @
0x098178…09830c Dummy {f00=0x0030, f01=0x0190, f02=»********* P* " P ENTRY TDISP DISPATCHER ENTRY & P ENTRY LKMDIS DISPATCHED AFTER LKM B " P ENTRY DISIOE I/O ERROR ENTRY l & P ENTRY DISEND END I/O AND DISPATCH < P ENTRY DISQUE POINTER TO FIRST PLACE IN DISPATCHER-QUEUE 6 P ENTRY GBQUE
0x09830c…0984a0 Dummy {f00=0x0030, f01=0x0190, f02=»RY RETU14 RESTORE REGISTER A14-A1 VIA A15 STACK P ENTRY RETU13 8 P ENTRY RETU12 N P ENTRY RETU11 d P ENTRY RETU10 z P ENTRY RETUR9 P ENTRY RETUR8 P ENTRY RETUR7 P ENTRY RETUR6 P ENTRY RETUR5 P ENTRY RET
0x0984a0…098634 (1, 38) Dummy {f00=0x0030, f01=0x0190, f02=» P EJECT $ P ENTRY DWTCHP CHANNEL PARAMETER P ENTRY DWTST STATUS > P ENTRY DWTECB ECB ADDRESS Z P ENTRY DWTOR ORDER | * P ENTRY DWTADR POINTER TO ADDRESS-BLOCK P ENTRY DWTTAB TTAB-ADDRESS * P ENTRY DWTWAT WAIT ACTIVATE INDICA
0x098634…0987c8 Dummy {f00=0x0030, f01=0x0190, f02=»L VOLUME NAME P ENTRY ECBBA,ECBRL,ECBEL P ENTRY ECBRC,ECBCW 6 & P ENTRY SACT ACTIVE SEGMENT POINTER P 8 P ENTRY LRUNEW DUMMY FOR MEMORY MANAGEMENT (OVERLAY) z P EJECT P* P************* P* EXTERNALS * P*************
0x0987c8…09895c Dummy {f00=0x0030, f01=0x0190, f02=»D I/O P EXTRN EXIT PROGRAM EXIT & P EXTRN BLOK:S START OF BLOCK POOL . $ P EXTRN BLOCKE BLOCK POOL LENGTH X P EJECT P P* . P****************************************** P* & P* DWT-DISPLACEMENT DECLARATIONS P*
0x09895c…098af0 Dummy {f00=0x0030, f01=0x0190, f02=» PDWTECB EQU 4 ECB-ADDRESS PDWTOR EQU 6 ORDER $ & PDWTADR EQU 8 ADDRESS BLOCK POINTER > PDWTTAB EQU 10 TTAB-ADDRESS h * PDWTWAT EQU 12 WAIT/ACTIVATE INDICATOR PDWTTQ EQU 14 TERMINAL QUEUE PDWTWA EQU 16 WORK AREA * PDWTTDM EQU 16
0x098af0…098c84 Dummy {f00=0x0030, f01=0x0190, f02=»PLACEMENTS P* " P****************************** P* B PECBBA EQU /02 L PECBRL EQU /04 b PECBEL EQU /06 x PECBRC EQU /08 PECBCW EQU /0A P EJECT P* P* D I S Q U E P* 2 P* POINTER TO FIRST
0x098c84…098e18 Dummy {f00=0x0030, f01=0x0190, f02=» OF RUNING PROGRAM P* PPRUN EQU * $ P DATA 0 6 P* F P* S R U N P P* d P* RUNNING SEGMENT POINTER n P* PSRUN EQU * P DATA 0 $ P******************************* P* P* S A C T P*
0x098e18…098fac Dummy {f00=0x0030, f01=0x0190, f02=»EW EQU * P* P* G B Q U E P* 0 4 P* POINTER TO FIRST TASK TABLE IN BUFFER QUEUE : P* r PGBQUE EQU * | P DATA 0 PFREQUE DATA BLOK:S PBLOCKL DATA BLOCKE P* P EJECT P* P* D I S I O E
0x098fac…099140 Dummy {f00=0x0030, f01=0x0190, f02=»DE t P* PDISEND EQU * P CF A15,TENDIO ( P EJECT > P* L P* V P* T D I S P ` P* v $ P* THIS IS THE DISPATCHER ENTRY P* PTDISP EQU * P INH P LD A5,DISQUE " P RF(Z) RETUR8 NO QUEUE,RETURN
0x099140…0992d4 (1, 39) Dummy {f00=0x0030, f01=0x0190, f02=»NG) RETUR8 RETURN TO INTERRUPTED PROGRAM $ P STR A9,A15 SAVE A9-A14 ON STACK 0 P STR A10,A15 X P STR A11,A15 l P STR A12,A15 P STR A13,A15 P STR A14,A15 P LD A1,PRUN " P STR A1,A15 SAVE PRUN ON STACK " P AND DISPATCH QU
0x0992d4…099468 Dummy {f00=0x0030, f01=0x018e, f02=»ESS OF PROGRAM TO BE DISPATCHED ~ P* ( PDIS100 EQU * 2 0 P LDR* A1,A5 REMOVE JOB FROM DISPATCHER QUEUE F P ST A1,DISQUE z * P LD A1,TTB:SA,A5 LOAD DISPATCH ADDRESS " P LD A2,TTB:ST+1,A5 LOAD LEVEL P SLL A2,10 P CWK A2,/C000 MONI
0x099468…0995fc Dummy {f00=0x0030, f01=0x0190, f02=» . P ADK A3,14 SET ADDRESS TO A1 IN SAVE AREA P LDK A1,14 SET COUNTER : , PDIS110 LDR* A2,A3 SET UP A1-A14 ON STACK X P STR A2,A15 P ADK A3,2 P SUK A1,1 P RB(NZ) DIS110 : PDIS120 ST A5,PRUN SET TABB-ADDRES FOR DISPATCHED P
0x0995fc…099790 Dummy {f00=0x0030, f01=0x0190, f02=»RYPOINTS RETU14-RETUR1 :RELOAD REGISTERS FROM STACK P* AND RETURN VIA A15 < P* Z PRETU14 LDR* A14,A15 d PRETU13 LDR* A13,A15 PRETU12 LDR* A12,A15 PRETU11 LDR* A11,A15 PRETU10 LDR* A10,A15 PRETUR9 LDR* A9,A15
0x099790…099924 Dummy {f00=0x0030, f01=0x0190, f02=»R3 LDR* A3,A15 PRETUR2 LDR* A2,A15 P RF RETUR1 0 PRTNA15 STR A1,A15 B PRETUR1 LDK A1,/40 BIT 9 . P ORS A1,4,A15 SET PSW IN A15 STACK TO ENB | P LDR* A1,A15 P RTN A15 P EJECT P* P* P* MONITOR JOB DISP
0x099924…099ab8 Dummy {f00=0x0030, f01=0x0190, f02=»CK z ( P STR A2,A15 STORE LEVEL 48 ON STACK & P SUKL A15,16 ADJUST STACK POINTER 6 : P STR A1,A15 SET MONITOR JOB DISPATCH ADDRESS ON STACK ` P STR A2,A15 SET LEVEL , P LD A1,TTB:SA+2,A5 LOAD PARAMETER IN A1 P STR A1,A15 AND SET ON STACK
0x099ab8…099c4c Dummy {f00=0x0030, f01=0x0190, f02=»S P* 6 P* THIS PART IS DISPATCHED AFTER EACH LKM-REQUEST P* NO REGISTERS ON STACK N P* p P* z PLKMDIS EQU * P INH P LD A5,DISQUE " P RF(Z) DIS010 NO QUEUE,RETURN & P LD A1,32,A15 LOAD PSW FROM STACK
0x099c4c…099de0 Dummy {f00=0x0030, f01=0x4066, f02=»DR* A5,A15 , P RB DIS120 RETURN TO INTERRUPTED PROGRAM P* B P* L P END V@ bK N P* p P* z PLKMDIS EQU * P INH P LD A5,DISQUE " P RF(Z) DIS010 NO QUEUE,RETURN & P LD A1,32,A15 LOAD PSW FROM STACK
0x099de0…099f74 (1, 40) Dummy {f00=0x0031, f01=0x2008, f02=» p P* P* P END $@ 0K P* > P* H PLKMDIS EQU * R P INH f P LD A5,DISQUE r " P RF(Z) DIS010 NO QUEUE,RETURN & P LD A1,32,A15 LOAD PSW FROM STACK P SRL A1,10 GET LEVEL 4 P CC A1,TTABST+1,A5 A
0x099f74…09a108 Dummy {f00=0x0031, f01=0x0008, f02=»
0x09a108…09a29c Dummy {f00=0x0031, f01=0x018e, f02=» 2 P IDENT LRPINT REL 8.1 78-04-21 870105040810 P : P* B 6 P************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P* LRPINT = INTERRUPT HANDLERS FOR LKM, RTC " P* AND P
0x09a29c…09a430 Dummy {f00=0x0031, f01=0x0190, f02=» P* P* : P* THIS MODULE CONTAINS MANDATORY INTERRUPT HANDLERS P* FOR TOSS. THESE ARE: V P* v P* -IHLKM: LKM-INTERRUPT P* P* -IHRTC: RTC-INTERRUPT P* ( P* -IHPFAR: POWER FAILURE INTERRUPT P*
0x09a430…09a5c4 Dummy {f00=0x0031, f01=0x0190, f02=»UE JOB AND DISPATCH v P* ( P* -LKMQDI: QUEUE JOB AND DISPATCH & P* R P EJECT P*********** j P* ENTRIES * ~ P*********** P* & P ENTRY IHLKM LKM INTERRUPT HANDLER $ P ENTRY LKMRQE LKM REQUEST ERROR $ P ENTRY
0x09a5c4…09a758 Dummy {f00=0x0031, f01=0x0190, f02=»E ^ P ENTRY MONCLO MONITOR CLOCK 2 P ENTRY IHPFAR POWER FAILURE INTERRUPT HANDLER . & P ENTRY INIFLG INITIALIZATION FLAG d P* P************* P* EXTERNALS * P************* P* P EXTRN TDISP DISPATCHER : P EXT
0x09a758…09a8ec Dummy {f00=0x0031, f01=0x0190, f02=» $ P EXTRN SWL48 SWITCH TO LEVEL 48 2 P EXTRN TTB:SA FIRST WORD OF SAVE AREA IN TTAB , , P EXTRN TTB:TD START OF TERMINAL DEVICES b " P EXTRN LKMAL LKM REQUEST TABLE P EXTRN FREBLK SET BLOCK FREE " P EXTRN QMJOB QUEUE MONITOR JOB 6 P EXTRN
0x09a8ec…09aa80 Dummy {f00=0x0031, f01=0x0190, f02=» SAVE8 SAVE 8 REGISTERS " P EXTRN PFTAB POWER FAIL TABLE P EXTRN HALT HALT-MODULE F P EXTRN SACT ACTIVE SEGMENT f , P EXTRN LRUNEW INSERT SEGMENT IN LRUQUEUE ( P EXTRN INTSAV INTERRUPT SAVE MODULE P EJECT P* P* 8 P*
0x09aa80…09ac14 (1, 41) Opaque[0x194]
0x09ac14…09ada8 # DirEnt {nam=»MONTIM«, typ=»SC«, f00=0xffff, f01=0xffff, f02=0x0628, f03=0xffff}
0x09ac14…09ada8 IdxSect {
0x09ac14…09ada8 f00 = 0x0031 // 0x9ac14 @0x0
0x09ac14…09ada8 f01 = 0x0004 // 0x9ac16 @0x2
0x09ac14…09ada8 gno = [ // 0x9ac18 @0x4
0x09ac14…09ada8 [0x00]: C0x0031.0x1.0
0x09ac14…09ada8 [0x01]: C0x0031.0x2.0
0x09ac14…09ada8 ]
0x09ac14…09ada8 }
0x09ada8…09af3c Dummy {f00=0x0031, f01=0x0190, f02=» 2 P IDENT MONTIM REL 8.2 78-09-15 870105040820 P : P* B < P******************************************************* L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* * P* MONTIM = MONITOR CLOCK PROCESSORS P* P*
0x09af3c…09b0d0 Dummy {f00=0x0031, f01=0x0190, f02=»MODULE CONTAINS MONITOR CLOCK PROCESSORS P* 0 P* : 6 P* -GETTIM GET CURRENT VALUE OF MONITOR CLOCK D & P* -SETTIM SET MONITOR CLOCK ~ P EJECT P* P* P* $ P******************************** $ P* ENTRIES
0x09b0d0…09b264 Dummy {f00=0x0031, f01=0x0190, f02=»NTRY SETTIM SET MONITOR CLOCK P* & $ P******************************** 0 $ P* EXTERNALS * X $ P******************************** P* P EXTRN MONCLO MONITOR CLOCK P EXTRN TDISP DISPATCHER $ P EXTRN RTNA15 RETU
0x09b264…09b3f8 Dummy {f00=0x0031, f01=0x018e, f02=»* P* G E T T I M P* " , P* THIS IS THE GET TIME LKM PROCESSOR , P* , P* IT IS ENTERED FROM THE LKM HANDLER f 0 P* WITH ADDRESS TO THE USER TIMER CONTROL 2 P* BLOCK IN A8. MONITOR CLOCK IS COPIED INTO P* TIM
0x09b3f8…09b58c Dummy {f00=0x0031, f01=0x0190, f02=» P INH P LDR* A6,A7 SECONDS P STR A6,A15 SAVE ON STACK , P SUK A7,2 N P LDR* A6,A7 MINUTES ` P STR A6,A15 SAVE ON STACK | P SUK A7,2 P LDR* A6,A7 HOURS * PGETT10 CF A15,BYTASC CONVERT TO ASCII B P SC A6,1,A8 STOR
0x09b58c…09b720 Dummy {f00=0x0031, f01=0x0190, f02=» BLOCK h P SUK A3,2 P RF(E) GETT20 P ADKL A8,2 6 , P LDR* A6,A15 GET ACTUAL TIME FROM STACK H P RB GETT10 x P EJECT PGETT20 SUK A7,2 . P LDR* A6,A7 GET ACCUMULATED 24 HOUR CARRY 2 P ST A6,TTB:SA+14,A5 STORE IN TTAB SAVE
0x09b720…09b8b4 (1, 42) Dummy {f00=0x0031, f01=0x0190, f02=» , P* THIS IS THE SET TIME LKM PROCESSOR P* 8 0 P* IT IS ENTERED FROM THE LKM HANDLER WITH B 0 P* ADDRESS TO THE USER TIMER CONTROL BLOCK v 0 P* IN A8. VALUE IN TIMER CONTROL BLOCK IS " P* COPIED INTO MONITOR CLOCK P*
0x09b8b4…09ba48 Dummy {f00=0x0031, f01=0x0190, f02=»HAND CHARACTER OF TIME FROM TIMER CONTROL BLOCK v 0 P SLL A6,8 MAKE ROOM FOR THE RIGHT-HAND PART 8 4 P LC A6,1,A8 AND STORE IT IN TIMER CONTROL BLOCK l $ P CF A15,ASCTBY CONVERT TO BINARY P SUK A3,2 END ? P RF(E) SETT20 P ADKL A8,2
0x09ba48…09bbdc Dummy {f00=0x0031, f01=0x0190, f02=»CLOCK r P SUK A7,2 P LDR* A6,A15 ( P STR A6,A7 MINUTES TO MONITOR CLOCK 4 P SUK A7,2 ` P LDR* A6,A15 r & P STR A6,A7 HOURS TO MONITOR CLOCK P SUK A7,2 P CMR A7 RESET MIDNIGTH CARRY P RB TPDIS P EJECT P*
0x09bbdc…09bd70 Dummy {f00=0x0031, f01=0x0190, f02=» IN A6. | P* PBYTASC EQU * P LDK A4,0 . PBYTA10 SUK A6,/A @ P RF(N) BYTA20 X P ADKL A4,/100 n P RB BYTA10 PBYTA20 ADK A6,/A P ADR A6,A4 P ORKL A6,/3030 P RF ASCT20 P* P* 2 P* ASCTBY
0x09bd70…09bf04 Dummy {f00=0x0031, f01=0x40d8, f02=»BY EQU * P LDR A4,A6 P ANK A6,/F " P SRL A4,8 4 P ANK A4,/F F P RF(E) ASCT20 X PASCT10 ADK A6,/A n P SUK A4,1 P RB(NE) ASCT10 PASCT20 ABL RTNA15 P END @ F ASCT20 P* P* 2 P* ASCTBY
0x09bf04…09c098 Dummy {f00=0x0031, f01=0x2008, f02=» ASCT10 ADK A6,/A P SUK A4,1 P RB(NE) ASCT10 2 PASCT20 RTN A15 H P END ^@ j P RTN A15 p P* P* 2 P* ASCTBY = SUBROUTINE TO CONVERT A6-CONTENT ( P* FROM ASCII TO BINARY. P* RESU
0x09c098…09c22c Dummy {f00=0x0031, f01=0x0190, f02=»ESSAGE 3 x & P* IS EXPECTED FROM THE MASTER SIDE 4 P* 4 8 P* 4 B PBRM EQU * 4 L P LDKL A5,STB LOAD STACKBASE 4 ^ 2 P CF A5,HALTIN HALT RECEIVER AND UPDATE STATUS 4 PBRM010 EQU * 4 P IFF CODE=1 4 0 P LDKL A2,/100+LSPEED+SYN SPECIFY SYN PAT
0x09c22c…09c3c0 Dummy {f00=0x0031, f01=0x0190, f02=»ECEIVER 4 x PBRM100 EQU * 5 $ P CF A5,READP READ ONE CHARACTER 5 $ P RF(NZ) BRM150 PARITY ERROR 5 L P LDR A1,A2 5 p P SUK A1,STX 5 P RF(Z) BRM300 STX RECEIVED 5 P SUK A1,EOT-STX 5 P RF(Z) BRM200 EOT RECEIVED 5 P SUK A1,ENQ-EOT 5
0x09c3c0…09c554 (1, 43) Opaque[0x194]
0x09c554…09c6e8 # DirEnt {nam=»INTLT1«, typ=»SC«, f00=0x0008, f01=0x2020, f02=0x0638, f03=0x2020}
0x09c554…09c6e8 IdxSect {
0x09c554…09c6e8 f00 = 0x0031 // 0x9c554 @0x0
0x09c554…09c6e8 f01 = 0x0002 // 0x9c556 @0x2
0x09c554…09c6e8 gno = [ // 0x9c558 @0x4
0x09c554…09c6e8 [0x00]: C0x0031.0x3.0
0x09c554…09c6e8 ]
0x09c554…09c6e8 }
0x09c6e8…09c87c Dummy {f00=0x0031, f01=0x0190, f02=» 2 P IDENT INTLT1 REL 8.2 78-09-15 870105040820 P* : @ P* INTERRUPT TABLE FOR DEVICES CONNECTED TO CHANNEL UNIT NO.1 D P* FOR LOCAL TERMINALS D P* THIS TABLE CONTAINS POINTERS TO DEVICE WORK TABLES ASSOCIATED D P* WITH DEVICES CONNECTED T
0x09c87c…09ca10 Dummy {f00=0x0031, f01=0x40f8, f02=»TABLE ENTRY P* P* TERMINAL PARAMETERS P* > P* H , P* RIGHT BYTE = 2 * NUMBER OF DEVICES R P* P* P* P* PINTLT1 EQU * TABLE ENTRY P* P* P* P END @ ICES CONNECTED T
0x09ca10…09cba4 Dummy {f00=0x0031, f01=0x2008, f02=» NAL PARAMETERS 0 P* LEFT BYTE = 2 * NUMBER OF INPUT DEVICES 4 P* AND DEVICES WITH DATA REQUESTS R , P* RIGHT BYTE = 2 * NUMBER OF DEVICES P* 4 P* NOTE: PRINTERS ARE TREATED AS INPUT DEVICES P* P*
0x09cba4…09cd38 Dummy {f00=0x0031, f01=0x0190, f02=»ETURN CODE * x " P LDKL A3,BUF+2 BUFFER ADDRESS + P LDK A4,6 + 8 P + J P + R P + Z & PDUNA20 LDR* A7,A3 GET VOLUME NAME + b . P CWR* A7,A2 COMPARE WITH LAST VOLUME NAME + P RF(E) DUNA30 SAME DISC + P LDK A1,/80 NEW DISC LOADED + P +
0x09cd38…09cecc Dummy {f00=0x0031, f01=0x0190, f02=») DUNA20 GET NEXT WORD + P , P , & P LDR A1,A1 , . P RF(Z) DUNA40 VOLUME MATCH , @ P LC A2,DWTOR,A6 INDEX , b P ANK A2,1 , P ADR A2,A2 , P ADR A2,A6 , & P ST A1,DWTBSY,A2 NEW VOLUME LOADED , PDUNA40 EQU * , P , P , P LD
0x09cecc…09d060 Dummy {f00=0x0031, f01=0x0190, f02=»,DWTSAV,A6 GET OLD DWT CONTENTS , P ST A1,DWTOR,A6 SAVE IT - ( P LDKL A1,-1 - H P ST A1,DWTSAV,A6 - P LDKL A5,DWTSB1 - t P ADR A5,A6 STACK BASE - ( P LDK A1,1 RETURN CODE. NOT OPERABLE - P RTN A5 - P* - P* - P* TIMER POIN
0x09d060…09d1f4 (1, 44) Opaque[0x194]
0x09d1f4…09d388 # DirEnt {nam=»INTLT2«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0640, f03=0x2020}
0x09d1f4…09d388 IdxSect {
0x09d1f4…09d388 f00 = 0x0032 // 0x9d1f4 @0x0
0x09d1f4…09d388 f01 = 0x0002 // 0x9d1f6 @0x2
0x09d1f4…09d388 gno = [ // 0x9d1f8 @0x4
0x09d1f4…09d388 [0x00]: C0x0032.0x0.0
0x09d1f4…09d388 ]
0x09d1f4…09d388 }
0x09d388…09d51c Dummy {f00=0x0032, f01=0x0190, f02=» 2 P IDENT INTLT2 REL 8.2 78-09-15 870105040820 P* : @ P* INTERRUPT TABLE FOR DEVICES CONNECTED TO CHANNEL UNIT NO.1 D P* FOR LOCAL TERMINALS D P* THIS TABLE CONTAINS POINTERS TO DEVICE WORK TABLES ASSOCIATED D P* WITH DEVICES CONNECTED T
0x09d51c…09d6b0 Dummy {f00=0x0032, f01=0x40f8, f02=»TABLE ENTRY P* P* TERMINAL PARAMETERS P* > P* H , P* RIGHT BYTE = 2 * NUMBER OF DEVICES R P* P* P* P* PINTLT2 EQU * TABLE ENTRY P* P* P* P END @ ICES CONNECTED T
0x09d6b0…09d844 Dummy {f00=0x0032, f01=0x2008, f02=» NAL PARAMETERS 0 P* LEFT BYTE = 2 * NUMBER OF INPUT DEVICES 4 P* AND DEVICES WITH DATA REQUESTS R , P* RIGHT BYTE = 2 * NUMBER OF DEVICES P* 4 P* NOTE: PRINTERS ARE TREATED AS INPUT DEVICES P* P*
0x09d844…09d9d8 Dummy {f00=0x0032, f01=0x4124, f02=» 2 PDWTCYL EQU *-DWDU01 3 P DATA /FFFF CYLINDER NUMBER 3 $ P IFT TYPE1=0 3 H PDWTCMX EQU *-DWDU01 3 $ P DATA MAXCY5 MAX CYLINDER X/1215 3 x P XIF 3 P IFT TYPE1=1 3 PDWTCMX EQU *-DWDU01 3 ( P DATA MAXCY6 MAX CYLINDER NO X/1216 3 P
0x09d9d8…09db6c Dummy {f00=0x0032, f01=0x2008, f02=» 4 -DWDU01 2:ND WER INSTRUCTION - P WER A3,WER1+1 . , PDWTNAM EQU *-DWDU01 . B PDWTVOL EQU *-DWDU01 . ^ & P DATA 0,0,0 VOLUME NAME FIXED DISC . z * P DATA 0,0,0 VOLUME NAME CARTRIDGE DISC . PDWTSAV EQU *-DWDU01 . P DATA -1 . P END . @
0x09db6c…09dd00 Dummy {f00=0x0032, f01=0x0190, f02=» A4,A6 ADD DWT-ADDRESS P LDR A1,A6 P CF A15,SETIMP SET TIME 0 0 P DATA AKBTUT,TIME TIME OUT ROUTINE AND TIME P . P ST A4,DWTTP,A6 STORE TIMER ADDRESS IN DWT P* P XIF P* & PAKB210 LD A2,4,A8 REQUESTED LENGTH , PAKB220 R
0x09dd00…09de94 (1, 45) Opaque[0x194]
0x09de94…09e028 # DirEnt {nam=»INTRT1«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0648, f03=0x2020}
0x09de94…09e028 IdxSect {
0x09de94…09e028 f00 = 0x0032 // 0x9de94 @0x0
0x09de94…09e028 f01 = 0x0002 // 0x9de96 @0x2
0x09de94…09e028 gno = [ // 0x9de98 @0x4
0x09de94…09e028 [0x00]: C0x0032.0x1.0
0x09de94…09e028 ]
0x09de94…09e028 }
0x09e028…09e1bc Dummy {f00=0x0032, f01=0x0190, f02=» 2 P IDENT INTRT1 REL 8.2 78-09-15 870105040820 P* : @ P* INTERRUPT TABLE FOR DEVICES CONNECTED TO CHANNEL UNIT NO.1 D P* FOR REMOTE TERMINALS D P* THIS TABLE CONTAINS POINTERS TO DEVICE WORK TABLES ASSOCIATED D P* WITH DEVICES CONNECTED T
0x09e1bc…09e350 Dummy {f00=0x0032, f01=0x40f6, f02=»BLE ENTRY P* P* TERMINAL PARAMETERS P* < P* F , P* RIGHT BYTE = 2 * NUMBER OF DEVICES P P* P* P* P* PINTRT1 EQU * TABLE ENTRY P* P* P* P END @ EVICES CONNECTED T
0x09e350…09e4e4 Dummy {f00=0x0032, f01=0x2008, f02=» NAL PARAMETERS 0 P* LEFT BYTE = 2 * NUMBER OF INPUT DEVICES 4 P* AND DEVICES WITH DATA REQUESTS R , P* RIGHT BYTE = 2 * NUMBER OF DEVICES P* 4 P* NOTE: PRINTERS ARE TREATED AS INPUT DEVICES P* P*
0x09e4e4…09e678 Dummy {f00=0x0032, f01=0x0190, f02=» AWAY = POS ERR b z ( P DATA 0 DWTPIT PREV=ILL TM = 2 TRIES c . P DATA 0 DWTPIS PREV=ILL SEQ NO = 2 TRIES c D . P DATA 0 DWTPIE PREV =ILL DAT ERR = 2 TRIES c v & P DATA 0 DWTPDB ERROR AFTER 2 TRIES c P* c & P DATA 0 DWTTMK TAPE MARK INDICATOR c P*
0x09e678…09e80c Dummy {f00=0x0032, f01=0x404e, f02=»BUF3 RES 128 BUFFER FOR RDSEQN c P d & P d . P END d 6 P d B@ d JTPIS PREV=ILL SEQ NO = 2 TRIES c D . P DATA 0 DWTPIE PREV =ILL DAT ERR = 2 TRIES c v & P DATA 0 DWTPDB ERROR AFTER 2 TRIES c P* c & P DATA 0 DWTTMK TAPE MARK INDICATOR c P*
0x09e80c…09e9a0 Dummy {f00=0x0032, f01=0x2008, f02=» e THST HANDL STARTED FLAG 7 , ' WER A3,C1IOPL DWTWRL I/O INSTRUCTIONS 8 ( WER A4,C1IOPA DWTWRA 8 X RER A2,C1IOPA DWTRRA 8 v CIO A1,1,CHCC1 DWTIOS 8 CIO A1,0,CHCC1 DWTIOH 8 SST A1,CHCC1 DWTSST 8 ( # DATA CCBUF1 DWTBUF BUFFER
0x09e9a0…09eb34 (1, 46) Opaque[0x194]
0x09eb34…09ecc8 # DirEnt {nam=»INTRT2«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0650, f03=0x2020}
0x09eb34…09ecc8 IdxSect {
0x09eb34…09ecc8 f00 = 0x0032 // 0x9eb34 @0x0
0x09eb34…09ecc8 f01 = 0x0002 // 0x9eb36 @0x2
0x09eb34…09ecc8 gno = [ // 0x9eb38 @0x4
0x09eb34…09ecc8 [0x00]: C0x0032.0x2.0
0x09eb34…09ecc8 ]
0x09eb34…09ecc8 }
0x09ecc8…09ee5c Dummy {f00=0x0032, f01=0x0190, f02=» 2 P IDENT INTRT2 REL 8.2 78-09-15 870105040820 P* : @ P* INTERRUPT TABLE FOR DEVICES CONNECTED TO CHANNEL UNIT NO.1 D P* FOR REMOTE TERMINALS D P* THIS TABLE CONTAINS POINTERS TO DEVICE WORK TABLES ASSOCIATED D P* WITH DEVICES CONNECTED T
0x09ee5c…09eff0 Dummy {f00=0x0032, f01=0x40f6, f02=»BLE ENTRY P* P* TERMINAL PARAMETERS P* < P* F , P* RIGHT BYTE = 2 * NUMBER OF DEVICES P P* P* P* P* PINTRT2 EQU * TABLE ENTRY P* P* P* P END @ EVICES CONNECTED T
0x09eff0…09f184 Dummy {f00=0x0032, f01=0x2008, f02=» NAL PARAMETERS 0 P* LEFT BYTE = 2 * NUMBER OF INPUT DEVICES 4 P* AND DEVICES WITH DATA REQUESTS R , P* RIGHT BYTE = 2 * NUMBER OF DEVICES P* 4 P* NOTE: PRINTERS ARE TREATED AS INPUT DEVICES P* P*
0x09f184…09f318 Dummy {f00=0x0032, f01=0x018e, f02=»EYBOARD | P* ORDER 06: WRITE CARD P* ORDER 0A: READ CARD 0 P* ORDER 0B: PICK NOTES P P* ORDER 11: INSERT CARD p P* ORDER 22: FEED NOTES $ P* ORDER 26: FINISH TRANSACTION P* ORDER 31: RETURN CARD P* ORDER 33
0x09f318…09f4ac Dummy {f00=0x0032, f01=0x0190, f02=» P* P* A1 = RETURN CODE & P* A2 = INPUT OR OUTPUT CHARACTER * P* A3 = BUFFER INDEX T P* A4 = FUNCTION INDEX r P* A5 = STACK BASE P* A6 = DWT-ADDRESS P* A7 = ORDER P* A8 = ECB-ADDRESS P EJECT
0x09f4ac…09f640 Dummy {f00=0x0032, f01=0x0190, f02=» MOTOR VOLTAGE ERROR DISPENSER & P* BIT 3: TIMEOUT ERROR DISPENSER & ( P* BIT 4: SOLENOID ERROR DISPENSER P * P* BIT 5: ELECTRONICS ERROR DISPENSER | ( P* BIT 6: DETECTOR ERROR DISPENSER * P* BIT 7: FRONT SHUTTER DOESN'T CLOSE ( P*
0x09f640…09f7d4 (1, 47) Opaque[0x194]
0x09f7d4…09f968 # DirEnt {nam=»TC:TAB«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0658, f03=0x2020}
0x09f7d4…09f968 IdxSect {
0x09f7d4…09f968 f00 = 0x0032 // 0x9f7d4 @0x0
0x09f7d4…09f968 f01 = 0x0002 // 0x9f7d6 @0x2
0x09f7d4…09f968 gno = [ // 0x9f7d8 @0x4
0x09f7d4…09f968 [0x00]: C0x0032.0x3.0
0x09f7d4…09f968 ]
0x09f7d4…09f968 }
0x09f968…09fafc Dummy {f00=0x0032, f01=0x0190, f02=» 2 P IDENT TC:TAB REL 8.2 78-09-15 870105040820 P* : P* D P* N P* TERMINAL CONTROL TABLE X P* z P* P ENTRY TC:TAB TABLE ENTRY P ENTRY TCTABT P* P EXTRN TTMJOB MONITOR TABLE P* P* P
0x09fafc…09fc90 Dummy {f00=0x0032, f01=0x4018, f02=» P END @ .2 78-09-15 870105040820 P* : P* D P* N P* TERMINAL CONTROL TABLE X P* z P* P ENTRY TC:TAB TABLE ENTRY P ENTRY TCTABT P* P EXTRN TTMJOB MONITOR TABLE P* P* P
0x09fc90…09fe24 Dummy {f00=0x0032, f01=0x2008, f02=» NT TCTAB P* P* " P* , P* TERMINAL CONTROL TABLE 6 P* X P* b P ENTRY TCTAB TABLE ENTRY l P* P* P EXTRN TTMJOB MONITOR TABLE P* P* P* P* $ PTCTAB DATA TTABE-* TABLE LEN
0x09fe24…09ffb8 Dummy {f00=0x0032, f01=0x401e, f02=» EQU * 2 P END 3 @ 3 ANKL A3,/8FFF 2 P SRC A2,4 2 4 P ORR A3,A2 2 F P STR A3,A6 RESTORE 2 X P RTN A5 2 r P EJECT 2 P* 2 P* 2 * P* STINTA = STATUS INFORMATION TABLE 2 P* 2 PSTINTA EQU * 2 & P DATA STARP1,STOPP1,STAR
0x09ffb8…0a014c Dummy {f00=0x0032, f01=0x2008, f02=» 4 END I/O % h P EJECT & P* & & P* & 0 * P* STINTA = STATUS INFORMATION TABLE & : P* & h PSTINTA EQU * & r & P DATA STARP1,STOPP1,STARP2,STOPP2 & & P DATA STARP3,STOPP3,STARP4,STOPP4 & & P DATA TISWCA,TIANTC,TIPILO,TIBUZZ & P DAT
0x0a014c…0a02e0 Dummy {f00=0x0032, f01=0x0190, f02=»1 D P SUK A2,1 E P RB FDIX10 E PFDIX20 RTN A5 E . P EJECT E D P IFF DAMA+IBM=0 E R P****************** E j P* * E P* VOLADR * E P* * E P****************** E P* E P* INPUT: A6 DWT
0x0a02e0…0a0474 (1, 48) Opaque[0x194]
0x0a0474…0a0608 # DirEnt {nam=»BLOK:S«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0660, f03=0x2020}
0x0a0474…0a0608 IdxSect {
0x0a0474…0a0608 f00 = 0x0033 // 0xa0474 @0x0
0x0a0474…0a0608 f01 = 0x0002 // 0xa0476 @0x2
0x0a0474…0a0608 gno = [ // 0xa0478 @0x4
0x0a0474…0a0608 [0x00]: C0x0033.0x0.0
0x0a0474…0a0608 ]
0x0a0474…0a0608 }
0x0a0608…0a079c Dummy {f00=0x0033, f01=0x0190, f02=» 2 P IDENT BLOK:S REL 8.2 78-09-15 870105040820 P* : P* D P* MONITOR BLOCKS N P* h P* r & P ENTRY BLOK:S START OF BLOCK POOL | $ P ENTRY BLOCKE BLOCK POOL LENGTH P* P* P* PBLOK:S EQU * P*
0x0a079c…0a0930 Dummy {f00=0x0033, f01=0x4190, f02=» P DATA *+6,0,0 P DATA *+6,0,0 P DATA *+6,0,0 4 P DATA *+6,0,0 J P DATA *+6,0,0 ` P DATA *+6,0,0 v P DATA *+6,0,0 P DATA *+6,0,0 P DATA *+6,0,0 P DATA *+6,0,0 P DATA *+6,0,0 P DATA *+6,0,0
0x0a0930…0a0ac4 Dummy {f00=0x0033, f01=0x2008, f02=» P DATA *+6,0,0 P DATA *+6,0,0 ( P DATA *+6,0,0 > P DATA *+6,0,0 T P DATA *+6,0,0 j P DATA *+6,0,0 P DATA *+6,0,0 P DATA *+6,0,0 P DATA *+6,0,0 P DATA *+6,0,0 P DATA *+6,0,0 P DAT
0x0a0ac4…0a0c58 Dummy {f00=0x0033, f01=0x018e, f02=»S t P* P* P* SYSTEM ADAPTATION P* < P EJECT F P* T P* ^ P*********************** h P* ENTRIES * P*********************** P* P ENTRY CDAD P* * P************************
0x0a0c58…0a0dec Dummy {f00=0x0033, f01=0x018e, f02=» x P EXTRN TENDIO END I/O . P EXTRN DISEND PERFORM END I/O AND DISPATCH & " P EXTRN TDISP DISPATCHER ENTRY X P EXTRN OUTPUT OUTPUT CHAR. ~ * P EXTRN LDREG LOAD REGISTERS AND RETURN P EXTRN GETCHR GET CHARACTER $ P EXTRN DISIOE I/O REQU
0x0a0dec…0a0f80 Dummy {f00=0x0033, f01=0x018e, f02=» $ P******************************* $ P* CONSTANTS * , $ P******************************* T P* | PDWTBC EQU /3 P* P************************* P* TABLES * P*************************
0x0a0f80…0a1114 (1, 49) Opaque[0x194]
0x0a1114…0a12a8 # DirEnt {nam=»PFTAB «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0668, f03=0x2020}
0x0a1114…0a12a8 IdxSect {
0x0a1114…0a12a8 f00 = 0x0033 // 0xa1114 @0x0
0x0a1114…0a12a8 f01 = 0x0002 // 0xa1116 @0x2
0x0a1114…0a12a8 gno = [ // 0xa1118 @0x4
0x0a1114…0a12a8 [0x00]: C0x0033.0x1.0
0x0a1114…0a12a8 ]
0x0a1114…0a12a8 }
0x0a12a8…0a143c Dummy {f00=0x0033, f01=0x0190, f02=» 0 P IDENT PFTAB REL 8.2 78-09-15 870105040820 P* 8 P* B P* L P* POWER FAIL TABLE V P* p D P* THIS TABLE HOLDS ADDRESSES TO MODULES THAT SHOULD BE EXECUTED z P* AFTER MASTER CLEAR P* P* P ENTRY PFTAB TABLE ENT
0x0a143c…0a15d0 Dummy {f00=0x0033, f01=0x0190, f02=» EXTRN CHLTON LOCAL/REMOTE TERMINALS P* , P* 6 P* @ P* J P* T P* ^ P* h P* r ( P EXTRN C1DRON CASSETTE CHANGER NO. 1 | ( P EXTRN C2DRON 2 ( P EXTRN C3DRON 3 P*
0x0a15d0…0a1764 Dummy {f00=0x0033, f01=0x018e, f02=»UON DISC UNIT P* $ P EXTRN MTDRON MAGNETIC TAPE UNIT 0 P EXTRN DMINIT DATA MANAGEMENT INITIALIZATION H $ PPFTAB DATA PFTABE-* TABLE LENGTH | P DATA TWON P DATA TCDRON P DATA SOPR P* P DATA CHLTON P* P*
0x0a1764…0a18f8 Dummy {f00=0x0033, f01=0x4100, f02=» P* P* P* P DATA FDON " P DATA LPON FLOPPY 4 P DATA CRON CARD-READER N P DATA DUON l P* ~ P DATA MTDRON P DATA DMINIT P* PPFTABE EQU * END OF TABLE P* P* P END @ P*
0x0a18f8…0a1a8c Dummy {f00=0x0033, f01=0x2008, f02=» TON LOCAL/REMOTE TERMINALS P* * P EXTRN DUON DISC UNIT 4 " P EXTRN MTON MAGNETIC YAPE UNIT R P* x P* $ PPFTAB DATA PFTABE-* TABLE LENGTH P DATA TWON P DATA TCDRON P DATA SOPR P DATA DRDCON P DATA
0x0a1a8c…0a1c20 Dummy {f00=0x0033, f01=0x4014, f02=» P END ] @ ] P XIF P IFT IBM=1 $ , PDWTBOE EQU *-DWFD01 BEGINNING OF EXTENT 6 P DATA 0,0,0,0 f $ PDWTEOD EQU *-DWFD01 END OF DATA | P DATA 0,0,0,0 & PDWTEOE EQU *-DWFD01 END OF EXTENT P DATA 0,0,0,0 * PDWTCRN EQU *-D
0x0a1c20…0a1db4 (1, 50) Opaque[0x194]
0x0a1db4…0a1f48 # DirEnt {nam=»TTABX «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0670, f03=0x2020}
0x0a1db4…0a1f48 IdxSect {
0x0a1db4…0a1f48 f00 = 0x0033 // 0xa1db4 @0x0
0x0a1db4…0a1f48 f01 = 0x0002 // 0xa1db6 @0x2
0x0a1db4…0a1f48 gno = [ // 0xa1db8 @0x4
0x0a1db4…0a1f48 [0x00]: C0x0033.0x2.0
0x0a1db4…0a1f48 ]
0x0a1db4…0a1f48 }
0x0a1f48…0a20dc Dummy {f00=0x0033, f01=0x0190, f02=» 0 P IDENT TTABX REL 8.2 78-09-15 870105040820 P* 8 P* B P* T A S K T A B L E L P* l P* v P ENTRY TTABX TABLE ENTRY P* P* P* P* P* PTTABX DATA 0 P DATA /3C TASK LEVEL & P DATA
0x0a20dc…0a2270 Dummy {f00=0x0033, f01=0x4098, f02=» x P DATA 0 TERMINAL SAVE AREA P RES 14 * P* : " P DATA TTABE-* TERMINAL DEVICES D PTTABE EQU * j P* ~ P END @ P* P* P* P* P* PTTABX DATA 0 P DATA /3C TASK LEVEL & P DATA
0x0a2270…0a2404 Dummy {f00=0x0033, f01=0x2008, f02=» ES | PTTABE EQU * P* & P END 0@ <LER TERMINAL , P* T P* ^ P ENTRY TTABX TABLE ENTRY h P* P* P* P* P* PTTABX DATA 0 P DATA 60 TERMINAL STATUS & P DATA /EE TERMINAL IDENTIF
0x0a2404…0a2598 Dummy {f00=0x0033, f01=0x0190, f02=» B P* P R B U F : GET CHARACTERS FROM ECB-BUFFER AND SEND THEM P* J 6 P* B C D T B Y : CONVERT TO BINARY FROM DECIMAL T P* D P* B U F C H R : SEND THE NUMBER OF CHARACTERS GIVEN IN FIRST $ P* CHARACTER IN OUTPUT BUFFER P
0x0a2598…0a272c Dummy {f00=0x0033, f01=0x0190, f02=» P* * P* THE FOLLOWING ORDERS ARE TREATED: P* < $ P* ORDER 00 : TEST STATUS F P* ORDER 06 : WRITE n 0 P* ORDER 0B : POSITION LIFT AND WRITE $ P* ORDER 22 : CUT JOURNAL * P* ORDER 26 : PERFORAT
0x0a272c…0a28c0 Dummy {f00=0x0033, f01=0x018e, f02=»E FOLLOWING RETURN CODES ARE USED: P* * & P* BIT 0 : REQUEST ERROR 4 4 P* BIT 8 : RECOVERY EXECUTED ON REQUEST ^ 8 P* BIT 10 : END OF JOURNAL TAPE, VOUCHER OUT ( P* BIT 13 : CODE CHECK ERROR $ P* BIT 15
0x0a28c0…0a2a54 (1, 51) Opaque[0x194]
0x0a2a54…0a2be8 # DirEnt {nam=»LKMAL «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0678, f03=0x2020}
0x0a2a54…0a2be8 IdxSect {
0x0a2a54…0a2be8 f00 = 0x0033 // 0xa2a54 @0x0
0x0a2a54…0a2be8 f01 = 0x0002 // 0xa2a56 @0x2
0x0a2a54…0a2be8 gno = [ // 0xa2a58 @0x4
0x0a2a54…0a2be8 [0x00]: C0x0033.0x3.0
0x0a2a54…0a2be8 ]
0x0a2a54…0a2be8 }
0x0a2be8…0a2d7c Dummy {f00=0x0033, f01=0x018e, f02=» 0 P IDENT LKMAL REL 8.2 78-09-15 870105040820 P* 8 P* B $ P* LINK TO MONITOR REQUEST TABLE L @ P* THIS TABLE HOLDS INFORMATION ABOUT MODULES THAT HANDLE THE t ( P* DIFFERENT LINK TO MONITOR REQUESTS P* 2 P ENTRY LKMAL TABLE ENTRY C
0x0a2d7c…0a2f10 Dummy {f00=0x0033, f01=0x0190, f02=» * P EXTRN TACTOT ACTIVATE OTHER TERMINAL P EXTRN TPAUSE PAUSE TERMINAL 2 P EXTRN TIMER TIMER V P EXTRN GETBUF GET BUFFER p P EXTRN RELBUF RELEASE BUFFER P EXTRN LOADER SEGMENT LOADER P EXTRN TABORT ABORT FUNCTION P* $ P E
0x0a2f10…0a30a4 Dummy {f00=0x0033, f01=0x0190, f02=»ODE AND INDEX p P EJECT P* $ $ PLKMAL DATA LKMALE-* TABLE LENGTH . P DATA TIO TERMINAL I/O V P DATA TWAIT TERMINAL WAIT t P DATA TEXIT TERMINAL EXIT ( P DATA TACTOT ACTIVATE OTHER TERMINAL P DATA TPAUSE TERMINAL PAUSE P
0x0a30a4…0a3238 Dummy {f00=0x0033, f01=0x40f8, f02=»TABORT ABORT FUNCTION P DATA 0 4 P DATA GETTIM GET CURRENT VALUE OF MONITOR CLOCK . " P DATA SETTIM SET MONITOR CLOCK f P* 0 P DATA TASS,IXTASS ASSIGN FILE CODE AND INDEX PLKMALE EQU * P* P END @ L PAUSE P
0x0a3238…0a33cc Dummy {f00=0x0033, f01=0x2008, f02=» f " P DATA SETTIM SET MONITOR CLOCK PLKMALE EQU * 4 P* H P END R@ ^INAL EXIT R ( P DATA TACTOT ACTIVATE OTHER TERMINAL t P DATA TPAUSE TERMINAL PAUSE P DATA TIMER TIMER P DATA GETBUF GET BUFFER P DATA RELB
0x0a33cc…0a3560 Dummy {f00=0x0033, f01=0x018e, f02=»C,A9 NEXT KEY SAME T PDMR020 EQU * U P* U . P* MOVE LOG REC NO TO ECB U 8 P* U Z P LDK A5,0 U d P LC A5,3,A2 U v P SC A5,ECBCW+3,A8 U P LC A5,4,A2 U P ECR A5,A5 U P LC A5,5,A2 U P ST A5,ECBCW,A8 U P* U P* RELE
0x0a3560…0a36f4 (1, 52) Opaque[0x194]
0x0a36f4…0a3888 # DirEnt {nam=»DVTKB «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0680, f03=0x2020}
0x0a36f4…0a3888 IdxSect {
0x0a36f4…0a3888 f00 = 0x0034 // 0xa36f4 @0x0
0x0a36f4…0a3888 f01 = 0x0002 // 0xa36f6 @0x2
0x0a36f4…0a3888 gno = [ // 0xa36f8 @0x4
0x0a36f4…0a3888 [0x00]: C0x0034.0x0.0
0x0a36f4…0a3888 ]
0x0a36f4…0a3888 }
0x0a3888…0a3a1c Dummy {f00=0x0034, f01=0x0190, f02=» 0 P IDENT DVTKB REL 8.2 78-09-15 870105040820 P* 8 " P* KEYBOARD DEVICE WORK TABLE B P* h P ENTRY DVTKB TABLE ENTRY r P*** ( P EXTRN KBAD POINTER TO ADDRESSBLOCK P EXTRN ECH P* P* PDVTKB EQU * TABLE ENTRY
0x0a3a1c…0a3bb0 Dummy {f00=0x0034, f01=0x0190, f02=»R AND ECB-ADDRESS j ( P DATA KBAD POINTER TO ADDRESS BLOCK P DATA 'KB' TTAB-ADDRESS F $ P DATA 0 WAIT/INDICATE INDICATOR f P DATA 0 TERMINAL QUEUE * P DATA 0 CODE CONVERSION TABLE POINTER P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE A
0x0a3bb0…0a3d44 Dummy {f00=0x0034, f01=0x4114, f02=»ATA /BCA BACKSPACE AND CANCEL " P DATA /ED0 EOR AND DOUBLE ZERO & 6 P DATA DWTSQ+DVTKB POINTER TO FIRST PLACE IN QUEUE L 4 P DATA DWTSQ+DVTKB POINTER TO LAST PLACE IN QUEUE PDWTSQ EQU *-DVTKB P RES 0 PDWTEND EQU * P* P END
0x0a3d44…0a3ed8 Dummy {f00=0x0034, f01=0x2008, f02=» BLE ZERO 6 P DATA DWTSQ+DVTKB POINTER TO FIRST PLACE IN QUEUE 4 P DATA DWTSQ+DVTKB POINTER TO LAST PLACE IN QUEUE R PDWTSQ EQU *-DVTKB P RES 0 P* P END @ 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P R
0x0a3ed8…0a406c Dummy {f00=0x0034, f01=0x0190, f02=» X X $ SAVE8 , ( Q"@ Y _ X R X X 0 , ( k P T X T X ~ X ` DWTECB , ( D <C _ Y _ RTNA154 , ( C z B = 8
0x0a406c…0a4200 Dummy {f00=0x0034, f01=0x418a, f02=» ) + - X H D ! @ 5P CT OP WWv ]P cR iPd mW` sQ y T T P: T W0 P* H D ! T W& P" T W T P P< WH P R< T P T %W ) ` H D ! 1 ` 9R C b uW }T PX Q P PD P R T R T R P H D !@ %PN ) /P
0x0a4200…0a4394 (1, 53) Opaque[0x194]
0x0a4394…0a4528 # DirEnt {nam=»DVTTP «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0688, f03=0x2020}
0x0a4394…0a4528 IdxSect {
0x0a4394…0a4528 f00 = 0x0034 // 0xa4394 @0x0
0x0a4394…0a4528 f01 = 0x0002 // 0xa4396 @0x2
0x0a4394…0a4528 gno = [ // 0xa4398 @0x4
0x0a4394…0a4528 [0x00]: C0x0034.0x1.0
0x0a4394…0a4528 ]
0x0a4394…0a4528 }
0x0a4528…0a46bc Dummy {f00=0x0034, f01=0x0190, f02=» 0 P IDENT DVTTP REL 8.2 78-09-15 870105040820 P* 8 4 P* DEVICE WORK TABLE FOR TELLER TERMINAL PRINTER B P* z P ENTRY DVTTP TABLE ENTRY P* P* ( P EXTRN TPAD POINTER TO ADDRESS-BLOCK P* P* PDVTTP EQU * TABL
0x0a46bc…0a4850 Dummy {f00=0x0034, f01=0x018e, f02=»ATA DWTEND-DVTTP LAST OUTPUT CHR,ORDER ( P DATA TPAD POINTER TO ADDRESS BLOCK . P DATA 'TP' TTAB-ADDRESS Z $ P DATA 0 WAIT/ACTIVATE INDICATOR z P DATA 0 TERMINAL QUEUE P DATA 0 OUTPUT QUEUE LINK , P DATA 0,0,0 SAVE AREA FOR REGS. A3,A4,
0x0a4850…0a49e4 Dummy {f00=0x0034, f01=0x4022, f02=» P* P END @ RDER ( P DATA TPAD POINTER TO ADDRESS BLOCK . P DATA 'TP' TTAB-ADDRESS Z $ P DATA 0 WAIT/ACTIVATE INDICATOR z P DATA 0 TERMINAL QUEUE P DATA 0 OUTPUT QUEUE LINK , P DATA 0,0,0 SAVE AREA FOR REGS. A3,A4,
0x0a49e4…0a4b78 Dummy {f00=0x0034, f01=0x2008, f02=» A TPAD POINTER TO ADDRESS BLOCK P DATA 0 TTAB-ADDRESS 0 $ P DATA 0 WAIT/ACTIVATE INDICATOR L P DATA 0 TERMINAL QUEUE t P DATA 0 OUTPUT QUEUE LINK , P DATA 0,0,0 SAVE AREA FOR REGS. A3,A4,A5 P DATA 0,0,0,0 STACK P DATA 0
0x0a4b78…0a4d0c Dummy {f00=0x0034, f01=0x0190, f02=»M INVALID POLL 3 PBRM120 EQU * 4 & P CF A5,FINTER CHECK IF STA PRESENT 4 * P LDR A6,A3 LOAD DWT TO A6 4 T P RF(NZ) BRM130 STA FOUND 4 v $ P LDKL A6,DWDC00 SELECT TO DCTASK 4 PBRM130 EQU * 4 P ABL SELECT 4 P EJECT 4 P* 4 P* 4 P
0x0a4d0c…0a4ea0 Dummy {f00=0x0034, f01=0x0190, f02=»F(Z) BRM220 ACK IS NOT EXPECTED 4 " P LD A6,FDWTUT GET WRITING DWT 5 ( P RF(Z) BRM210 NO ONE WRITING 5 N P LDK A1,2 SET RC=2 5 r ( P CF A5,CWRITE COMPLETE WRITE REQUEST 5 PBRM210 EQU * 5 " P CM XACK RESET 'ACK EXPECTED' 5 PBRM220 EQU * 5 P C
0x0a4ea0…0a5034 (1, 54) Opaque[0x194]
0x0a5034…0a51c8 # DirEnt {nam=»DVTGP «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0690, f03=0x2020}
0x0a5034…0a51c8 IdxSect {
0x0a5034…0a51c8 f00 = 0x0034 // 0xa5034 @0x0
0x0a5034…0a51c8 f01 = 0x0002 // 0xa5036 @0x2
0x0a5034…0a51c8 gno = [ // 0xa5038 @0x4
0x0a5034…0a51c8 [0x00]: C0x0034.0x2.0
0x0a5034…0a51c8 ]
0x0a5034…0a51c8 }
0x0a51c8…0a535c Dummy {f00=0x0034, f01=0x0190, f02=» 0 P IDENT DVTGP REL 8.2 78-09-15 870105040820 P* 8 , P* DEVICE WORK TABLE FOR GENERAL PRINTER B P* r P ENTRY DVTGP TABLE ENTRY | P* P* ( P EXTRN GPAD POINTER TO ADDRESS BLOCK P* P* PDVTGP EQU * TABLE ENTRY
0x0a535c…0a54f0 Dummy {f00=0x0034, f01=0x0190, f02=»R AND ECB-ADDRESS j ( P DATA GPAD POINTER TO ADDRESS-BLOCK P DATA 'GP' TTAB-ADDRESS F $ P DATA 0 WAIT/ACTIVATE INDICATOR f P DATA 0 TERMINAL QUEUE P DATA 0 OUTPUT QUEUE LINK P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4
0x0a54f0…0a5684 Dummy {f00=0x0034, f01=0x4032, f02=» EQU * P* P* P END "@ .DRESS-BLOCK P DATA 'GP' TTAB-ADDRESS F $ P DATA 0 WAIT/ACTIVATE INDICATOR f P DATA 0 TERMINAL QUEUE P DATA 0 OUTPUT QUEUE LINK P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4
0x0a5684…0a5818 Dummy {f00=0x0034, f01=0x2008, f02=» ESS-BLOCK ~ P DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR 6 P DATA 0 TERMINAL QUEUE ^ P DATA 0 OUTPUT QUEUE LINK | P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT
0x0a5818…0a59ac Dummy {f00=0x0034, f01=0x0190, f02=»RY DWFD01 DWT-ADDRESS P* P************* ( P* * > P* EXTERNALS * T P* * j P************* P* P EXTRN TDISP DISPATCHER P EXTRN TENDIO ENDIO P EXTRN DISIOE REQUEST ERROR P EXTRN D
0x0a59ac…0a5b40 Dummy {f00=0x0034, f01=0x0190, f02=»ETIMP TIMER & P EXTRN INIFLG INITIALIZATION FLAG & P EXTRN INTSAV INTERRUPT SAVE AREA > & P EXTRN TASCII EBCDIC TO ASCII TAB h & P EXTRN TEBCDIC ASCII TO EBCDIC TAB $ P EXTRN ECBBA ECB BUFFER ADDRESS & P EXTRN ECBRL ECB REQUESTED LENGTH
0x0a5b40…0a5cd4 (1, 55) Opaque[0x194]
0x0a5cd4…0a5e68 # DirEnt {nam=»DVTDI «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0698, f03=0x2020}
0x0a5cd4…0a5e68 IdxSect {
0x0a5cd4…0a5e68 f00 = 0x0034 // 0xa5cd4 @0x0
0x0a5cd4…0a5e68 f01 = 0x0002 // 0xa5cd6 @0x2
0x0a5cd4…0a5e68 gno = [ // 0xa5cd8 @0x4
0x0a5cd4…0a5e68 [0x00]: C0x0034.0x3.0
0x0a5cd4…0a5e68 ]
0x0a5cd4…0a5e68 }
0x0a5e68…0a5ffc Dummy {f00=0x0034, f01=0x0190, f02=» 0 P IDENT DVTDI REL 8.2 78-09-15 870105040820 P* 8 P* B . P* DEVICE WORK TABLE FOR DISPLAY INDICATOR L P* ~ P* & P ENTRY DVTDI DISPLAY INDICATOR 03 P* P* ( P EXTRN DIAD POINTER TO ADDRESS-BLOCK P* P*
0x0a5ffc…0a6190 Dummy {f00=0x0034, f01=0x4188, f02=»0,DWTEND-DVTDI ECB-ADDRESS AND ORDER ( P DATA DIAD POINTER TO ADDRESS-BLOCK , 6 P DATA 'DI',0 TERM.NUMBER AND PROGRAM START ADDRESS X $ P DATA 0 ECB QUEUE ANCHOR ADDRESS P DATA 0 OUTPUT QUEUE P DATA /2010 P DATA /3F4F,/5F6F * P DAT
0x0a6190…0a6324 Dummy {f00=0x0034, f01=0x2008, f02=» A DIAD POINTER TO ADDRESS-BLOCK 4 P DATA 0,0 TERM.NUMBER AND PROGRAM START ADDRESS 0 $ P DATA 0 ECB QUEUE ANCHOR ADDRESS h P DATA 0 OUTPUT QUEUE P DATA /2010 P DATA /3F4F,/5F6F P* P* P END @ BLE ENTRY
0x0a6324…0a64b8 Dummy {f00=0x0034, f01=0x0190, f02=»DRESS x P LDR* A2,A4 KEY AREA LENGTH P LDR A1,A2 2 " P ABL(NP) END:10 ILLEGAL LENGTH D P SUK A1,128 j " P ABL(P) END:10 ILLEGAL LENGTH ~ P LDR A3,A2 P* * P* IF ODD CHANGE TO EVEN NO OF BYTES P* P ADK A3,1
0x0a64b8…0a664c Dummy {f00=0x0034, f01=0x018e, f02=» CF A5,FD:WRI SEARCH KEY P LDR A3,A3 RETURN CODE P RB(NZ) FD:048 > P* T $ P* READ RECORD WITH KEY COMMAND ^ P* PFD:060 EQU * P LDKL A2,/8004 BIO P LD A3,4,A8 REQUESTED LENGTH P CWK A3,130 " P ABL(NE) END:10 IL
0x0a664c…0a67e0 Dummy {f00=0x0034, f01=0x018e, f02=» ~ P* TEST STATUS * P* * P*************** 8 P* P PFD:070 EQU * Z P LDKL A2,/FFF9 BIO DUMMY n P CF A5,FD:WRI " P ANKL A3,/0201 WRITE PROTECT? P LDR A1,A3 P IFF DAMA+IBM=0 * P CF A5,VOLADR GET VO
0x0a67e0…0a6974 (1, 56) Opaque[0x194]
0x0a6974…0a6b08 # DirEnt {nam=»DVTDN «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x06a0, f03=0x2020}
0x0a6974…0a6b08 IdxSect {
0x0a6974…0a6b08 f00 = 0x0035 // 0xa6974 @0x0
0x0a6974…0a6b08 f01 = 0x0002 // 0xa6976 @0x2
0x0a6974…0a6b08 gno = [ // 0xa6978 @0x4
0x0a6974…0a6b08 [0x00]: C0x0035.0x0.0
0x0a6974…0a6b08 ]
0x0a6974…0a6b08 }
0x0a6b08…0a6c9c Dummy {f00=0x0035, f01=0x018e, f02=» 0 P IDENT DVTDN REL 8.2 78-09-15 870105040820 P* 8 , P* DEVICE WORK TABLE FOR NUMERIC DISPLAY B P* r P ENTRY DVTDN TABLE ENTRY | P* ( P EXTRN DNAD POINTER TO ADDRESS-BLOCK P* PDVTDN EQU * TABLE ENTRY " P DATA /1111
0x0a6c9c…0a6e30 Dummy {f00=0x0035, f01=0x4162, f02=» V ( P DATA DNAD POINTER TO ADDRESS-BLOCK P DATA 'DN' TTAB-ADDRESS 4 $ P DATA 0 WAIT/ACTIVATE INDICATOR T P DATA 0 TERMINAL QUEUE | P DATA 0 OUTPUT QUEUE LINK P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE
0x0a6e30…0a6fc4 Dummy {f00=0x0035, f01=0x2008, f02=» DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR $ P DATA 0 TERMINAL QUEUE L P DATA 0 OUTPUT QUEUE LINK j P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-STACK P*
0x0a6fc4…0a7158 Dummy {f00=0x0035, f01=0x0190, f02=»TR A3,A4 TRACK INTO BUF " P CF A5,SETINH INHIBIT # P* # > P* WRITE DATA SET LABEL # H P* # h P CF A5,DSLIO PREPARE FOR I/O # r P ORK A2,5 PHYSICAL WRITE # ( P CF A5,FD:WRITE WRITE DATA SET LEBEL # $ P CF A5,UNL:RC CHECK RETURN CODE #
0x0a7158…0a72ec Dummy {f00=0x0035, f01=0x018e, f02=»2,/C UNLOCK # P CF A5,FD:REA $ P ORS A3,DWTRCW,A6 $ * P ANK A3,1 $ D , P RF(NZ) UNL:80 NOT OPERABLE,STILL LOCKED $ V P LD A2,DWTA3,A6 INDEX MASK $ , P XRS A2,DWTLC,A6 INDICATE UNLOCK IN DWT $ PUNL:80 EQU * $ P RB LOA:75 END:IO $ P I
0x0a72ec…0a7480 Dummy {f00=0x0035, f01=0x0190, f02=» $ v P RB(NZ) UNL:80 ENDIO % P RTN A5 % $ P XIF % 4 P IFT IBM=1 % @ P EJECT % R P* % ` P******************* % j P* SEQUENTIAL READ * % P******************* % P* % PSQREAD EQU * % * P CF A5,DSOPCH GET EOD AND EOD ADDRESS %
0x0a7480…0a7614 (1, 57) Opaque[0x194]
0x0a7614…0a77a8 # DirEnt {nam=»DVTDY «, typ=»SC«, f00=0x4c20, f01=0x3d20, f02=0x06a8, f03=0x4431}
0x0a7614…0a77a8 IdxSect {
0x0a7614…0a77a8 f00 = 0x0035 // 0xa7614 @0x0
0x0a7614…0a77a8 f01 = 0x0002 // 0xa7616 @0x2
0x0a7614…0a77a8 gno = [ // 0xa7618 @0x4
0x0a7614…0a77a8 [0x00]: C0x0035.0x1.0
0x0a7614…0a77a8 ]
0x0a7614…0a77a8 }
0x0a77a8…0a793c Dummy {f00=0x0035, f01=0x0190, f02=» 0 P IDENT DVTDY REL 8.2 78-09-15 870105040820 P* 8 * P* DEVICE WORK TABLE FOR VIDEO DISPLAY B P* p P ENTRY DVTDY TABLE ENTRY z P* P* ( P EXTRN DYAD POINTER TO ADDRESS BLOCK P* P* PDVTDY EQU * TABLE ENTRY
0x0a793c…0a7ad0 Dummy {f00=0x0035, f01=0x0190, f02=»AND ECB-ADDRESS h ( P DATA DYAD POINTER TO ADDRESS-BLOCK P DATA 'DY' TTAB-ADDRESS D $ P DATA 0 WAIT/ACTIVATE INDICATOR d P DATA 0 TERMINAL QUEUE P DATA 0 OUTPUT QUEUE LINK P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4
0x0a7ad0…0a7c64 Dummy {f00=0x0035, f01=0x407e, f02=»EFT BYTE=NUMBER OF LINES " P RIGHT BYTE=CHARACTERS/LINE PDWTEND EQU * F P* Z P* d P END n@ zCATOR d P DATA 0 TERMINAL QUEUE P DATA 0 OUTPUT QUEUE LINK P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4
0x0a7c64…0a7df8 Dummy {f00=0x0035, f01=0x2008, f02=» S-BLOCK | P DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR 4 P DATA 0 TERMINAL QUEUE P DATA 0 OUTPUT QUEUE LINK z P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-S
0x0a7df8…0a7f8c Dummy {f00=0x0035, f01=0x0190, f02=» P ANR A1,A2 4 P RF(Z) FDON30 NOT LOCKED 4 P ST A2,DWTA3,A6 SAVE 4 6 P* 4 R P* PUT DRIVE NO IN CIO INSTR 4 P* 4 P SRN A2,A3 DRIVE NO IN A3 4 * P CF A5,SETCIO PUT DRVE NO IN CIO-INSTR 4 P LDK A2,/14 LOCK 4 P CF A5,FD:REA 4 P
0x0a7f8c…0a8120 Dummy {f00=0x0035, f01=0x0190, f02=» SLL A2,1 4 P CWK A2,/0010 5 P RB(NE) FDON25 5 ( P* 5 > P* ANY REQUEST? 5 H P* 5 ` P* 5 j . P* RESTORE STATUS SAVED IN DWST2 TO DWTST. 5 t P* SET DWTST2 TO -1 5 " P LD A2,DWTST2,A6 SAVED STATUS 5 * P ST A2,DWTST,A6 PUT IN CUURENT S
0x0a8120…0a82b4 (1, 58) Opaque[0x194]
0x0a82b4…0a8448 # DirEnt {nam=»DRLT01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x06b0, f03=0x4441}
0x0a82b4…0a8448 IdxSect {
0x0a82b4…0a8448 f00 = 0x0035 // 0xa82b4 @0x0
0x0a82b4…0a8448 f01 = 0x0016 // 0xa82b6 @0x2
0x0a82b4…0a8448 gno = [ // 0xa82b8 @0x4
0x0a82b4…0a8448 [0x00]: C0x0035.0x2.0
0x0a82b4…0a8448 [0x01]: C0x0035.0x3.0
0x0a82b4…0a8448 [0x02]: C0x0036.0x0.0
0x0a82b4…0a8448 [0x03]: C0x0036.0x1.0
0x0a82b4…0a8448 [0x04]: C0x0036.0x2.0
0x0a82b4…0a8448 [0x05]: C0x0036.0x3.0
0x0a82b4…0a8448 [0x06]: C0x0037.0x0.0
0x0a82b4…0a8448 [0x07]: C0x0037.0x1.0
0x0a82b4…0a8448 [0x08]: C0x0037.0x2.0
0x0a82b4…0a8448 [0x09]: C0x0037.0x3.0
0x0a82b4…0a8448 [0x0a]: C0x0038.0x0.0
0x0a82b4…0a8448 ]
0x0a82b4…0a8448 }
0x0a8448…0a85dc Dummy {f00=0x0035, f01=0x0190, f02=» 2 P IDENT DRLT01 REL 8.2 78-09-15 870105040820 P : P* B 6 P************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* DRLT01 = DRIVER CHANNEL UNIT $ P* FOR LOCAL TERMINA
0x0a85dc…0a8770 Dummy {f00=0x0035, f01=0x0190, f02=»THE CHANNEL UNIT DRIVER FOR LOCAL TERMINALS. B P* AT INTERRUPT AN INPUT WORD IS READ TO REGISTER A2. IF DATA 4 D P* INPUT OR DATA REQUEST A BRANCH IS MADE TO INTERRUPT HANDLER z P* FOR ACTUAL DEVICE. D P* IF CONTROL CHARACTER, THIS IS EXAMIN
0x0a8770…0a8904 Dummy {f00=0x0035, f01=0x0190, f02=» . P* - OUTLIN SEND ONE CHARACTER VIA CHLT P* : < P* - CHLTON EXECUTE CIO-START ON EVERY CHLT IN SYSTEM D P* 4 P* - GETCHR GET ONE CHARACTER FROM ECB-BUFFER P* 2 P* CONTROL WORK TABLES FOR THE CHANNELS ARE P*
0x0a8904…0a8a98 Dummy {f00=0x0035, f01=0x0190, f02=»R:- V P* J P* - OUTPUT SEND ONE CHARACTER, SAVE A3-A5 AND RETURN TO DISPATCHER P* d 6 P* - STREG SAVE A3-A5 AND RETURN TO DISPATCHER n P* D P* - LDREG IF INTERRUPT IS ALLOWED, RESTORE A3-A5 AND RETURN " P*
0x0a8a98…0a8c2c Dummy {f00=0x0035, f01=0x018e, f02=» REGISTER USAGE IN THE DRIVER:- P* ( P* A1 = RETURN CODE 2 P* A2 = INPUT WORD N P* A3 = LINE NUMBER * 2 j P* A4 = DEVICE NUMBER * 2 P* A5 = CWT-ADDRESS P* A6 = DWT-ADDRESS P* A7 = ORDER P* A8 = ECB-A
0x0a8c2c…0a8dc0 Dummy {f00=0x0035, f01=0x0190, f02=» P* & P ENTRY CHLT1 INTERRUPT FROM CHLT01 & P ENTRY CHLT2 INTERRUPT FROM CHLT2 8 & P ENTRY CHLT3 INTERRUPT FROM CHLT3 b $ P ENTRY CHLT4 INTERRUP FROM CHLT4 $ P ENTRY OUTLIN SEND ONE CHARACTER P ENTRY CHLTON START OF CHLT : P ENTRY O
0x0a8dc0…0a8f54 (1, 59) Dummy {f00=0x0035, f01=0x0190, f02=»ING j P ENTRY LDREGF RETURN , P ENTRY STREG SAVE REGISTERS A3-A5 IN DWT ( 4 P ENTRY GETCHR GET ONE CHARACTER FROM ECB-BUFFER X 0 P ENTRY LOCHAN NUMBER OF LOCAL CHANNEL UNITS 0 P ENTRY RECHAN NUMBER OF REMOTE CHANNEL UNITS * P ENTRY CWTLT1 CO
0x0a8f54…0a90e8 Dummy {f00=0x0035, f01=0x018e, f02=»CONTROL WORK TABLE CHLT4 * P ENTRY CWTRT1 DUMMY ENTRIES FOR REMOTE P ENTRY CWTRT2 N P ENTRY CWTRT3 d P ENTRY CWTRT4 z P ENTRY CWTRT5 P ENTRY CWTRT6 P ENTRY CWTRT7 P ENTRY CWTRT8 P ENTRY REMFC DUMMY ENTRY P
0x0a90e8…0a927c Dummy {f00=0x0035, f01=0x0190, f02=» P* P EJECT P* . P****************************************** & . P* EXTERNAL TOSS MODULE ENTRIES * X . P****************************************** P* P* & P EXTRN SAVE8 SAVE REGISTERS A1-A8 P EXTRN TDISP D
0x0a927c…0a9410 Dummy {f00=0x0035, f01=0x018e, f02=» INTLT3 INTERRUPT TABLE " P EXTRN INTLT4 INTERRUPT TABLE " P EXTRN SETIME GET TIMER BLOCK F " P EXTRN SETIMP GET TIMER BLOCK l * P EXTRN INTSAV SAVE AREA LAST INTERRUPT P EXTRN TENDIO P EXTRN RTNA15 RETURN AND ENB P* P*
0x0a9410…0a95a4 Dummy {f00=0x0035, f01=0x018e, f02=» P EXTRN DWTST STATUS P EXTRN DWTOR ORDER P EXTRN DWTECB ECB-ADDRESS : * P EXTRN DWTADR ADDRESS TO ADDRESS-BLOCK P EXTRN DWTWAT P* P EJECT P P* P************* P* CONSTANTS * P*************
0x0a95a4…0a9738 Dummy {f00=0x0035, f01=0x0190, f02=» P* . P* DISPLACMENT IN DEVICE WORK TABLE DWT P* @ ( PDWTOCH EQU /6 LAST OUTPUT CHARACTER J $ PDWTOTQ EQU /10 OUTPUT QUEUE LINK v PDWTA3 EQU /12 SAVE AREA A3 PDWTA4 EQU /14 A4 PDWTA5 EQU /16 A5 PDWTS
0x0a9738…0a98cc Dummy {f00=0x0035, f01=0x018e, f02=»************************ P* CONDITIONAL ASSEMBLY * P************************ @ P* ` < P* A LOGG FUNCTION OF EVERY INPUT AND OUTPUT CHARACTER j 8 P* MAY BE INCLUDED TO THE DRIVER BY SETTING X:A=1 P* PX:A EQU 1 PLOGING
0x0a98cc…0a9a60 Dummy {f00=0x0035, f01=0x0190, f02=» PX:B EQU 1 PLOCHAN EQU X:B P* 0 8 P* ACKUMULATORS FOR NAK, RETRANSMISSION FAULT AND : 4 P* UNDEFINED CONTROL CHARACTERS ARE UPDATED IN v 8 P* THE DRIVER. THIS FUNCTION CAN BE EXCLUDED FROM $ P* DRIVER BY SETTING X:C = 0
0x0a9a60…0a9bf4 (1, 60) Dummy {f00=0x0036, f01=0x018e, f02=»ISSING DATA REQUESTS FROM PRINTERS CAN BE INCLUDED P* IN THE DRIVER. : < P* AN ACKUMULATOR TO BE UPDATED EVERY TIME A SOFTWARE V * P* TIME OUT OCCURS IS ALSO INCLUDED. P* PX:D EQU 1 PSOFTIM EQU X:D P* P* (
0x0a9bf4…0a9d88 Dummy {f00=0x0036, f01=0x018e, f02=» P P PRECHAN EQU 0 PREMFC EQU 0 , PCWTRT1 EQU * @ PCWTRT2 EQU * T PCWTRT3 EQU * h PCWTRT4 EQU * | PCWTRT5 EQU * PCWTRT6 EQU * PCWTRT7 EQU * PCWTRT8 EQU * PDWREMU EQU * P EJECT P*
0x0a9d88…0a9f1c Dummy {f00=0x0036, f01=0x018e, f02=» : P***************************************************** P* B 4 P* CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 1 L P* P* PDWA1 EQU /03 DEVICEADDRESS P* PCWTLT1 EQU * TABLE ENTRY 0 PCWTLDW EQU *-CWTLT1 LAST OUTPUT DWT-
0x0a9f1c…0aa0b0 Dummy {f00=0x0036, f01=0x0190, f02=» P DATA INTLT1 PCWTINR EQU *-CWTLT1 INR P INR A2,0,DWA1 8 PCWTOTR EQU *-CWTLT1 OTR N P OTR A2,0,DWA1 n " PCWTCIS EQU *-CWTLT1 CIO-START P CIO A2,1,DWA1 PCWTRTC EQU *-CWTLT1 " P DATA 0 RETRANSMISSION COUNTER $ PCWTEQ
0x0aa0b0…0aa244 Dummy {f00=0x0036, f01=0x0190, f02=»MULATOR $ P DATA 0 RETR. FAULT-ACKUMULATOR , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR 8 PACKTIM EQU *-CWTLT1 h ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR P* P XIF P EJECT P* P* : P********************************
0x0aa244…0aa3d8 Dummy {f00=0x0036, f01=0x0190, f02=»********* d P* 4 P* CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 2 P* T PCWTLT2 EQU * ^ P* r P IFT LOCHAN=2 | PDWA2 EQU /13 DEVICE ADDRESS P* $ P DATA 0 LAST OUTPUT DWT-ADDRESS P DATA 0 LAST OUTPUT WORD P
0x0aa3d8…0aa56c Dummy {f00=0x0036, f01=0x0190, f02=»ISSION COUNTER P DATA 0 END OF QUEUE P* 2 P IFT ACKMUL=1 < P* R P DATA 0 NAK-ACKUMULATOR $ P DATA 0 RETR. FAULT-ACKUMULATOR | , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR P*
0x0aa56c…0aa700 Dummy {f00=0x0036, f01=0x0190, f02=» P* $ P DATA 0 LAST OUTPUT DWT-ADDRESS P DATA 0 LAST OUTPUT WORD 6 P DATA INTLT2 INTERRUPT TABLE V P INR A2,0,DWA2 INR z P OTR A2,0,DWA2 OTR P CIO A2,1,DWA2 CIO-START " P DATA 0 RETRANSMISSION COUNTER P DATA 0 END OF QUEUE
0x0aa700…0aa894 (1, 61) Dummy {f00=0x0036, f01=0x0190, f02=»NED- INTERRUPT-ACKUMULATOR ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR " P* N P XIF X P* d P* n P XIF x P IFT LOCHAN=4 P* P* 6 P* CHANNEL UNIT WORK TABLE FOR LOCAL TERMINAL NO.2 P* PDWA2 EQU /13 DEVICE AD
0x0aa894…0aaa28 Dummy {f00=0x0036, f01=0x0190, f02=» A2,0,DWA2 INR P OTR A2,0,DWA2 OTR P CIO A2,1,DWA2 CIO-START 0 " P DATA 0 RETRANSMISSION COUNTER P P DATA 0 END OF QUEUE v P* P IFT ACKMUL=1 P* P DATA 0 NAK-ACKUMULATOR $ P DATA 0 RETR. FAULT-ACKUMULATOR , P DAT
0x0aaa28…0aabbc Dummy {f00=0x0036, f01=0x0190, f02=» 6 P* CHANNEL UNIT WORK TABLE FOR LOCAL TERMINAL NO.3 P* B PCWTLT3 EQU * L P IFT LOCHAN=3 ` PDWA3 EQU /23 DEVICE ADDRESS v P* $ P DATA 0 LAST OUTPUT DWT-ADDRESS P DATA 0 LAST OUTPUT WORD P DATA INTLT3 INTERRUPT TABLE
0x0aabbc…0aad50 Dummy {f00=0x0036, f01=0x0190, f02=»0 END OF QUEUE P* P IFT ACKMUL=1 P* 6 P DATA 0 NAK-ACKUMULATOR @ $ P DATA 0 RETR. FAULT-ACKUMULATOR ` , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR P* P XIF P* P*
0x0aad50…0aaee4 Dummy {f00=0x0036, f01=0x018e, f02=»RD z P DATA INTLT3 INTERRUPT TABLE P INR A2,0,DWA3 INR . P OTR A2,0,DWA3 OTR H P CIO A2,1,DWA3 CIO-START b " P DATA 0 RETRANSMISSION COUNTER P DATA 0 END OF QUEUE P* P IFT ACKMUL=1 P* P DATA 0 NAK-ACKUMULATOR
0x0aaee4…0ab078 Dummy {f00=0x0036, f01=0x0190, f02=» P* P XIF P EJECT P* ( 4 P* CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 4 2 P* j PCWTLT4 EQU * t P* P* P IFT LOCHAN=4 PDWA4 EQU /33 DEVICE ADDRESS P* $ P DATA 0 LAST OUTPUT DWT-ADDRESS P
0x0ab078…0ab20c Dummy {f00=0x0036, f01=0x0190, f02=»IO-START " P DATA 0 RETRANSMISSION COUNTER P DATA 0 END OF QUEUE 6 P* R P IFT ACKMUL=1 P* r P DATA 0 NAK-ACKUMULATOR | $ P DATA 0 RETR. FAULT-ACKUMULATOR , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR ( P DATA 0 PRINTER TIME
0x0ab20c…0ab3a0 Dummy {f00=0x0036, f01=0x0190, f02=» C H T A B * 2 P********************************************** 4 P* j 6 P* THIS TABLE HOLDS ADDRESSES OF CONTROLLER WORK t 8 P* TABLES CWT TO CHANNEL UNITS FOR LOCAL AND REMOTE P* TERMINALS. P*
0x0ab3a0…0ab534 (1, 62) Dummy {f00=0x0036, f01=0x0190, f02=»A CWTLT3 P XIF P IFT LOCHAN=4 P DATA CWTLT3 2 P DATA CWTLT4 F P XIF Z PCHTABE EQU * END OF TABLE f P* P* P* P* P* P EJECT P* P IFF LOCHAN=1 P* P* C H L T 1 / C H L
0x0ab534…0ab6c8 Dummy {f00=0x0036, f01=0x0190, f02=» XIF P IFT LOCHAN=2 PCHLT3 EQU * " PCHLT4 EQU * 6 P XIF J P IFF LOCHAN=1 V PCHLT1 EQU * l $ P ST P,INTSAV SAVE LAST INTERRUPT & P CF A15,SAVE8 SAVE REGISTERS A1-A8 . P LDKL A5,CWTLT1 SET CWT-ADDRESS FOR CHLT1 P RF
0x0ab6c8…0ab85c Dummy {f00=0x0036, f01=0x0190, f02=»RUPT t & P CF A15,SAVE8 SAVE REGISTERS A1-A8 . P LDKL A5,CWTLT2 SET CWT-ADDRESS FOR CHLT2 6 P XIF h P IFT LOCHAN=2 t 0 PCLT010 EX CWTINR,A5 EXECUTE INR-INSTRUCTION P* P XIF P* P IFT LOCHAN=3 P RF CLT010 P*
0x0ab85c…0ab9f0 Dummy {f00=0x0036, f01=0x0190, f02=»NTERRUPT x & P CF A15,SAVE8 SAVE REGISTERS A1-A8 ! . P LDKL A5,CWTLT3 SET CWT-ADDRESS FOR CHLT3 ! : $ PCLT010 EX CWTINR,A5 EXECUTE INR ! l P* ! P XIF ! P IFT LOCHAN=4 ! P RF CLT010 ! P* ! P* ! P* C H L T 2 ! P* INTERRUP
0x0ab9f0…0abb84 Dummy {f00=0x0036, f01=0x018e, f02=»L A5,CWTLT3 SET CWT-ADDRESS FOR CHLT3 ! P RF CLT010 " . P* C H L T 4 " @ P* INTERRUPT FROM CHLT4 " V P* " v PCHLT4 EQU * " $ P ST P,INTSAV SAVE LAST INTERRUPT " & P CF A15,SAVE8 SAVE REGISTERS A1-A8 " . P LDKL A5,CWTLT4 SET CWT-ADDRESS FO
0x0abb84…0abd18 Dummy {f00=0x0036, f01=0x018e, f02=» " P* # P* INTERRUPT FROM CHLT1 # P* # 4 PCHLT1 EQU * # > PCHLT2 EQU * # R PCHLT3 EQU * # f PCHLT4 EQU * # z * P CF A15,SAVE8 SAVE REGISTERS ON STACK # $ P LDKL A5,CWTLT1 GET CWT-ADDRESS # $ P ST P,INTSAV SAVE LAST INTERRUPT #
0x0abd18…0abeac Dummy {f00=0x0036, f01=0x0190, f02=» # P EJECT $ P* $ P* $ * P* DETERMINE LINE- AND DEVICE NUMBER $ * P* $ X P LDK A1,0 RESET RETURN CODE $ b P LDR A3,A2 INPUT WORD IN A3 $ P SRL A3,8 $ P LDR A4,A3 $ $ P ANK A3,/E 2 * LINE NUMBER IN A3 $ P SRL A4,3 $ & P
0x0abeac…0ac040 Dummy {f00=0x0036, f01=0x0190, f02=» P RF(E) CHPOWO % P* % P* % $ 0 P* CHECK QUEUE AND SEND IF SOMETHING THERE % . P* % b & P LDR* A7,A5 LAST OUTPUT DWT IN A7 % l P CMR A5 RESET LAST OUTPUT % P LD A6,CWTEQ,A5 OUTPUT QUEUE % P RF(E) CLT020 % P STR A2,A15 SAVE A2 %
0x0ac040…0ac1d4 (1, 63) Dummy {f00=0x0036, f01=0x018e, f02=»IN SEND CHARACTER % P LDR* A2,A15 RELOAD A2 & P EJECT & 8 P* & F P* & P 2 P* CHECK CONTROL CHARACTER AND UPDATE ERROR- & Z 2 P* ACKUMULATORS IF NAK, RETRANSMISSION FAULT & ( P* OR UNDEFINED CONTROL CHARACTER & P* & PCLT020 EQU *
0x0ac1d4…0ac368 Dummy {f00=0x0036, f01=0x018e, f02=» P RF(E) CLT028 ' P* ' P IFT ACKMUL=1 ' $ P* ' : P SUK A2,5 NAK ? ' D P RF(E) CLT035 ' P LDK A7,2 ' r $ P SUK A2,/16 RETRANSMISSION FAULT ' P RF(E) CLT025 ' " P ADK A7,2 UNDEFINED INTERRUPT ' PCLT025 ADR A7,A5 ' 0 P IM CWTA
0x0ac368…0ac4fc Dummy {f00=0x0036, f01=0x0190, f02=» 0 P* NAK, TIME-OUT, RETRANSMISSION FAULT OR ( $ P* UNDEFINED CONTROL CHARACTER ( 8 P* ( ` : P* CHECK LAST OUTPUT AND TRY RECOVERY OF THAT DEVICE ( j 4 P* ONE TIME. IF NOT SUCCESS GO TO DRIVER WITH ( P* MESSAGE NOT OPERABLE. ( P* (
0x0ac4fc…0ac690 Dummy {f00=0x0036, f01=0x0190, f02=»CLT032 ( 0 P LDKL A2,/1000 INDICATE RECOVERY TRIAL DONE ) , P XRS A2,DWTST,A6 SET BIT IN STATUS WORD ) B 0 PCLT030 LDK A3,2 INDICATE RECOVERY OF DEVICE ) r P LDK A4,0 ) P RF CPO025 ) . PCLT032 LDK A1,NOERR INDICATE NOT OPERABLE ) P ABL CLT110
0x0ac690…0ac824 Dummy {f00=0x0036, f01=0x0190, f02=» B P* LAST OUTPUT CHARACTER IS RETRANSMITTED BY CHANNEL DRIVER * @ P* UP TO SIX TIMES AND IF STILL NO SUCCESS RETURN CODE NOT * J , P* OPERABLE IS SENT TO DEVICE DRIVER. * P* * PCLT035 EQU * * P IFT ACKMUL=1 * P* * * P IM CWTADD,A
0x0ac824…0ac9b8 Dummy {f00=0x0036, f01=0x0190, f02=»ER * v P SUK A4,7 SEVEN TIMES ? + P RB(E) CLT032 + * * P LD A2,CWTLOW,A5 GET LAST OUTPUT WORD + @ P LDR A1,A5 + n * P EX CWTOTR,A1 EXECUTE OTR-INSTRUCTION + $ P STR A6,A1 STORE LAST DWT IN CWT + P IFT LOGING=1 + . P CF A15,LOGG ** LOGG OUTPUT
0x0ac9b8…0acb4c Dummy {f00=0x0036, f01=0x0190, f02=» P* ACK DATA = 07 , P* , $ 2 P* SIMULATE DATA REQUEST IF RETURN CODE FROM , . . P* CHLT OR DEVICE WITHOUT DATA REQUEST, , d P* ELSE GO TO DISPATCHER , P* , PCLT040 EQU * , P LDKL A7,/EFFF , 6 P ANS A7,DWTST,A6 RESET RECOV
0x0acb4c…0acce0 Dummy {f00=0x0036, f01=0x0190, f02=»REQUEST? , p , P RF(N) CLT110 YES. SIMULATE DATA REQUEST - P* - @ P IFF SOFTIM=1 - J P* - ` PCLT062 EQU * - j P RF EXIT - ~ P* - P XIF - P* - P* - P IFT SOFTIM=1 - P* - P EJECT - P* - P* - P* PRINTER T
0x0acce0…0ace74 (1, 64) Dummy {f00=0x0037, f01=0x0190, f02=» RF(E) CLT070 YES - * P LD A3,DWTTP,A6 ADDRESS TO TIMER BLOCK . P RF(E) CLT060 . H P* . ^ P* RESTART TIMER . h P* . " P LDKL A3,-DRQTIM RESTART TIMER . P ST* A3,DWTTP,A6 . P RF EXIT . P* . P* START TIMER . P* . PCL
0x0ace74…0ad008 Dummy {f00=0x0037, f01=0x0190, f02=»CK . t > P DATA DRQTUT,DRQTIM ADDRESS TO TIME-OUT ROUTINE AND DELAY / PCLT062 EQU * / L P RF EXIT / ` P / p P EJECT / x P* / P* / P* RESET TIMER IF STARTED / P* / $ PCLT070 LD A3,DWTTP,A6 ADDRESS ? / P RF(E) EXIT NO / P C
0x0ad008…0ad19c Dummy {f00=0x0037, f01=0x0190, f02=»ROUTINE HANDLING MISSING INTERRUPTS / P* FROM PRINTERS 0 , P* 0 F PDRQTUT EQU * 0 P P LDR A6,A1 GET DWT-ADDRESS 0 d . P CM DWTTP,A6 RESET POINTER TO TIMER BLOCK 0 P LD A3,DWTST,A6 0 P SLL A3,2 ECHO MODE ? 0 P RF(N) CLT110 YES 0 P
0x0ad19c…0ad330 Dummy {f00=0x0037, f01=0x0190, f02=»DEX 0 ( P ADK A5,2 JUST TO AVOID TABLE LENGTH 1 $ P LD A5,CHTAB,A5 GET CWT-ADDRESS 1 8 ( P IM ACKTIM,A5 INCREMENT ACKUMULATOR 1 ` P* 1 P XIF 1 P IFT SOFTIM=1 1 P IFT ACKMUL=1 1 P IFT LOCHAN=1 1 P* 1 $ P LDKL A5,CWTLT1 GET CWT-AD
0x0ad330…0ad4c4 Dummy {f00=0x0037, f01=0x0190, f02=» P XIF 2 P* 2 P EJECT 2 P* 2 ( P* POWER ON DATA = 03 2 2 P* 2 T 6 P* RECOVERY ROUTINES ARE STARTED FOR EVERY DEVICE 2 ^ 6 P* ON ACTUAL LINE EXCEPT THOSE OCCUPYING CHANNEL 2 $ P* UNIT OR THOSE IN ECHO MODE. 2 P* 2 P* 2
0x0ad4c4…0ad658 Dummy {f00=0x0037, f01=0x0190, f02=» ORDER 2 P* 3 PCHPOWO EQU * 3 P CF A15,GETLIN 3 , $ P LDR* A2,A5 GET LAST OUTPUT DWT 3 B . P CM CWTRTC,A5 RESET RETRANSMISSION COUNTER 3 j P LDK A4,0 3 P LDR A3,A6 DEVICE COUNTER 3 P LDR A1,A8 ADDRESS POINTER 3 $ P RF(Z) EXIT EXIT IF NO
0x0ad658…0ad7ec Dummy {f00=0x0037, f01=0x0190, f02=»0 3 P SLC A6,1 4 " P LCR A7,A6 LEFT BYTE OF DWTCHP 4 P ANK A7,1 INPUT DEVICE ? 4 B P RF(NE) CPO025 YES 4 b P LDKL A7,/EFFF 4 | ( P ANS A7,DWTST,A6 RESET RECOVERY BIT 4 P LC A7,DWTST,A6 4 P ANK A7,/20 ECHO MODE ? 4 P RF(NE) CPO030 YES
0x0ad7ec…0ad980 Dummy {f00=0x0037, f01=0x0190, f02=»N A7 4 ` * P LD A7,4,A7 ADDRESS TO RECOVERY IN A7 5 P RF(E) CPO030 NO RECOVERY 5 : P LDKL A5,DWTSB2 STACKBASE 5 P ADR A5,A6 5 ~ & P CFR A15,A7 GO TO RECOVERY ROUTINE 5 ( PCPO030 SUK A3,2 ALL DEVICES THREATED 5 P 5 P RB(NE) CPO020 NO TAKE NEX
0x0ad980…0adb14 (1, 65) Dummy {f00=0x0037, f01=0x0190, f02=»SS 5 n P SUR A6,A4 VALID INTERRUPT ? 6 P RB(N) EXIT 6 . P LDR A8,A8 6 B P RB(Z) EXIT EXIT NOT DEFINED 6 T P LDR* A6,A8 GET DWT 6 x P RB(E) EXIT 6 P ANKL A6,/FFFE 6 . P LCR A7,A6 LEFT BYTE IN CHANNEL PARAMETER 6 P ANK A7,1 DATA INPUT ? 6
0x0adb14…0adca8 Dummy {f00=0x0037, f01=0x0190, f02=» P ANK A7,/FF 7 * P LD A8,DWTECB,A6 AND ECB-ADDRESS IN A8 7 4 P LD A3,DWTADR,A6 ADDRESS TO ADDRESS-BLOCK IN A3 7 F P ENB 7 ~ & P ABI 2,A3 GO TO INTERRUPT HANDLER 7 P* 7 > P* THE FOLLOWING REGISTER VAULES ARE VALID WHEN ENTERING 7 0 P* THE
0x0adca8…0ade3c Dummy {f00=0x0037, f01=0x0190, f02=»LE , HARDWARE TIME-OUT) 7 j P* A6 = DWT-ADDRESS 8 P* 8 < P* A7 = ORDER 8 F P* 8 P* A8 = ECB-ADDRESS 8 f P EJECT 8 P* 8 P* G E T L I N 8 P* 8 > P* SUBROUTINE TO GET ADDRESS IN INTERRUPT TABLE 'INTLTX' 8 , P* FOR A
0x0ade3c…0adfd0 Dummy {f00=0x0037, f01=0x018e, f02=» 2 8 x P* 9 P* ON EXIT:- 9 P* 9 * 6 P* A6 = TOTAL NUMBER OF DEVICES*2 ON ACTUAL LINE 9 4 < P* A8 = ADDRESS IN 'INTLTX' WHERE DWT-ADDRESS IS FOUND 9 n P* 9 P* 9 PGETLIN EQU * 9 0 P LD A8,CWTITA,A5 ADDRESS TO INTERRUPT TABLE 9
0x0adfd0…0ae164 Dummy {f00=0x0037, f01=0x0190, f02=» P LDR* A6,A8 GET ID-WORD : , P ANK A6,/FF TWO TIMES NUMBER OF DEVICES : $ 4 P ADR A8,A4 ADDRESS TO DEVICE WORK TABLE POSITION : T $ PGTL010 ABL RTNA15 RETURN AND ENB : P EJECT : P* : P* O U T L I N : P* : : P* SUBROUTINE TO SEND ONE
0x0ae164…0ae2f8 Dummy {f00=0x0037, f01=0x0190, f02=»ER CASE DWT IS QUEUED ON A : v P* OUTPUT QUEUE THREAD. ; " P* ; D P* ON ENTRY: ; N P* ; f . P* A2 = OUTPUT CHARACTER IN RIGHT BYTE ; p P* A6 = DWT-ADDRESS ; P* ; POUTLIN EQU * ; " P CF A15,SAVE8 SAVE REGS A1-A8 ; P* ;
0x0ae2f8…0ae48c Dummy {f00=0x0037, f01=0x0190, f02=» ; * P LD A1,CHTAB,A1 GET CWT-ADDRESS IN A1 < P* < 6 P XIF < @ P* < L P* < V P IFT LOCHAN=1 < ` P* < v P LDKL A1,CWTLT1 < P* < P XIF < P* < P INH INHIBIT INTERRUPT < P LDR* A4,A1 IS UNIT FREE ? < P RF(E) OUL050
0x0ae48c…0ae620 Dummy {f00=0x0037, f01=0x0190, f02=»OUL010 CWR A6,A4 < . P RF(E) OUL060 THIS DWT IS ALREADY IN QUEUE = P LD A3,DWTOTQ,A4 = J & P RF(E) OUL030 END OF THREAD FOUND = b P LDR A4,A3 FOLLOW THE THREAD = P RB OUL010 = $ POUL020 ST A6,CWTEQ,A1 QUEUE DWT = P RF OUL040 = $ POUL030 ST A6
0x0ae620…0ae7b4 (1, 66) Dummy {f00=0x0037, f01=0x0190, f02=» = | P* > , POUL050 LDR* A3,A6 GET CHANNEL PARAMETERS > P ANKL A3,/7F00 > B P ANK A2,/FF > X P ORR A2,A3 > l POUL055 EQU * > ~ * P EX CWTOTR,A1 EXECUTE OTR-INSTRUCTION > P RB(NA) OUL005 > $ P STR A6,A1 STORE LAST DWT IN CWT > P IFT LOGIN
0x0ae7b4…0ae948 Dummy {f00=0x0037, f01=0x0190, f02=»OUL070 ABL IHRET8 RESTORE A1-A8 AND RTN A15 > P EJECT ? 4 P* ? B P* C H L T O N ? L P* ? d > P* SUBROUTINE TO RESET CWT AND PERFORM CIO-START OF EVERY ? n @ P* CHLT IN SYSTEM. THE SUBROUTINE IS ENTERED FROM 'PFINIT' ? P* ? PCHLTON EQU
0x0ae948…0aeadc Dummy {f00=0x0037, f01=0x0190, f02=»T ? v P ABL RTNA15 RETURN AND ENB @ * PCON020 LD A5,CHTAB,A1 LOAD CWT-ADDRESS @ , P RB(Z) CON010 @ Z $ P EX CWTCIS,A5 EXECUTE CIO-START @ p P LDR* A6,A5 GET LAST DWT @ P RB(Z) CON010 @ P CMR A5 RESET LAST OUTPUT @ P LDK A2,0 @ " P CF A1
0x0aeadc…0aec70 Dummy {f00=0x0037, f01=0x0190, f02=»IO A2,1,DWA1 CIO-START @ P LD A6,CWTLT1 GET LAST DWT A P RF(Z) CON010 A @ P CM CWTLT1 RESET LAST OUTPUT A V P LDK A2,0 A z " P CF A15,OUTLIN SEND CHARACTER A $ PCON010 ABL RTNA15 RETURN AND ENB A P* A P XIF A P* A P EJECT A P
0x0aec70…0aee04 Dummy {f00=0x0037, f01=0x0190, f02=»N DWT. A t P* B P* B POUTPUT EQU * B " P ANK A2,/FF B 6 P LDR A1,A2 B J P SUK A1,/82 STX ? B P RF(E) LDRE10 B v P SUK A1,/15 ETB ? B P RF(E) LDRE10 B 6 P CF A15,OUTLIN SEND ONE CHARACTER VIA CHANNEL UNIT B P* B P* B
0x0aee04…0aef98 Dummy {f00=0x0037, f01=0x018e, f02=» INH B P LDKL A1,/100 C 0 P ORS A1,DWTST,A6 INDICATE INTERRUPTS ALLOWED C " $ P ST A3,DWTA3,A6 SAVE REGISTER A3 C V $ P ST A4,DWTA4,A6 A4 C ~ $ P ST A5,DWTA5,A6 A5 C P RB EXIT C P EJECT C P* C P* L D R E G C
0x0aef98…0af12c Dummy {f00=0x0037, f01=0x0190, f02=» C PLDREG EQU * D P LD A3,DWTST,A6 D P ANKL A3,/100 D 4 P RB(Z) EXIT D J P XRS A3,DWTST,A6 D ^ P* D v P* D P* L D R E G E D P* D 8 P* RESTORE A3-A5 FROM DWT AND RETURN TO USER VIA A5 D P* D P* D PLDREGF EQU *
0x0af12c…0af2c0 Dummy {f00=0x0037, f01=0x0190, f02=» A4 D x $ PLDRE10 LD A7,DWTOR,A6 GET ORDER E P ANK A7,/FF E : P LD A8,DWTECB,A6 E N P RTN A5 RETURN VIA A5-STACK E f P EJECT E P* E P* E P* G E T C H R E P* E 8 P* SUBROUTINE TO GET ONE CHARACTER FROM ECB-BUFFER E
0x0af2c0…0af454 (1, 67) Dummy {f00=0x0037, f01=0x0190, f02=»* E P* A2 = CHARACTER F * P* A1 = 0 IF LAST CHARACTER ELSE # 0 F & P* F T J P* IF LAST CHARACTER IS REACHED A3 IS STORED IN ECB EFFECTIVE LENGTH F ^ P* F P* F PGETCHR EQU * F P LD A1,4,A8 REQUESTED LENGTH F P SUR A1,A3 F *
0x0af454…0af5e8 Dummy {f00=0x0037, f01=0x0190, f02=»NK A2,/FF F $ P ADK A3,1 INCREMENT BUFFER INDEX G P RF GCH020 G : , PGCH010 ST A3,6,A8 STORE EFFECTIVE LENGTH G L ( PGCH020 ABL RTNA15 RETURN AND ENABLE G | P EJECT G P* G P* G P* L O G G G P* G 8 P* IF CONDITIONALY ASSEMBLY IS
0x0af5e8…0af77c Dummy {f00=0x0037, f01=0x0190, f02=»TR A1,A15 G P LD A1,POINT H P ADK A1,2 H & & P CWK A1,BUFE BUFE IS MAX LOGG AREA H 8 P RF(NE) L1 H b ( P LDKL A1,BUF SET FIRST LOGG ADDRESS H t PL1 ST A1,POINT H . P STR A2,A1 LOGG OF INR OR OTR INSTRUCTION H P LDR* A1,A15 H P ADKL A15,2
0x0af77c…0af910 Dummy {f00=0x0037, f01=0x0190, f02=» * H P* I P XIF I P EJECT I P* I . P* I 8 P* E C H O , E C H E N D I B P* I d < P* SUBROUTINE TO ECHO CHARACTER CONTAINING TWO PARTS, I n . P* ONE GENERAL AND ONE DEVICE-DEPENDENT I P* I 4 P* PART ONE: FIND DWT-ADDRES
0x0af910…0afaa4 Dummy {f00=0x0037, f01=0x018e, f02=»* I . P* PART TWO: ECHO ONE OR MORE CHARACTERS J 2 P* CORRESPONDING TO ONE CHARACTER J < 4 P* TO BE STORED IN INPUT ECB-BUFFER J r P* J P* J 4 P* PART ONE FOLLOWS AND PART TWO CAN BE FOUND J 4 P* IN THE DRIVER
0x0afaa4…0afc38 Dummy {f00=0x0037, f01=0x0190, f02=» J " P* A7 MUST NOT BE DESTROYED K 6 P* THE ECHO-ROUTINE SHOULD BE TERMINATED WITH A K . P* JUMP TO 'ECHRTN'. K h P* K PECHEND EQU * K P* K P IFT CECHO=1 K P* K $ P LDKL A7,/8000 INDICATE END I/O K P XIF K PECHO EQU
0x0afc38…0afdcc Dummy {f00=0x0037, f01=0x018e, f02=»STATUS K P SLL A1,2 L $ P RF(NN) RETUR NO ECHO REQUESTED L 0 P LDR A4,A6 SAVE DWT-ADDRESS OF INPUT DEVICE L H 2 P LD A6,DWTECH,A6 DWT-ADDRESS OF OUTPUT DEVICE L | 6 P ST A4,DWTWAT,A6 SAVE DWT-ADDRESS OF INPUT DEVICE L P LDKL A5,DWTSB2 L & P ADR
0x0afdcc…0aff60 Dummy {f00=0x0037, f01=0x412e, f02=» L ` P XIF M PECHRTN EQU * M P IFT CECHO=1 M ( P LDR A7,A7 END? M < P RF(NN) ERETUR NO M T ( P CF A15,TENDIO END I/O OUTPUT DEVICE M n > PERETUR LD A6,DWTWAT,A6 RELOAD DWT-ADDRESS OF INPUT DEVICE M 4 PRETUR ABL LDREGF RELOAD A3-A5 AND RETURN VIA
0x0aff60…0b00f4 (1, 68) Dummy {f00=0x0038, f01=0x2008, f02=» N PPOINT DATA BUF LOGG POINTER 9 P* 9 2 PBUF RES 63 LOGG AREA 9 < PBUFE EQU * 9 X P* 9 j P XIF 9 t P* 9 P END 9 @ 9 A1,BUFE BUFE IS MAX LOGG AREA 8 P RF(NE) L1 8 ( P LDKL A1,BUF SET FIRST LOGG ADDRESS 8 PL1 ST A1,P
0x0b00f4…0b0288 Dummy {f00=0x0038, f01=0x0008, f02=» @ 0 @
0x0b0288…0b041c Dummy {f00=0x0038, f01=0x0190, f02=» 0 P IDENT TPROC REL 8.2 78-09-15 870105040820 P 8 P* @ 6 P************************************************** J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* TPROC = TOSS LKM PROCESSORS . P* TIO,TWAIT,TEXIT,TACT
0x0b041c…0b05b0 Dummy {f00=0x0038, f01=0x018e, f02=»* P* 6 P* THIS MODULE CONTAINS MANDATORY LKM PROCESSORS P* FOR TOSS. THESE ARE: N P* n P* -TIO INPUT/OUTPUT x P* P* -TWAIT WAIT P* P* -TEXIT EXIT P* * P* -TACTOT ACTIVATE/RESTAR
0x0b05b0…0b0744 Dummy {f00=0x0038, f01=0x018e, f02=» P*********** P* P* " P ENTRY TIO I/O PROCESSOR , P* L P ENTRY TWAIT WAIT PROCESSOR V P* z P ENTRY TEXIT EXIT PROCESSOR P* , P ENTRY TACTOT ACTIVATE/RESTART PROCESSOR P* " P ENTRY TPAUSE PAUSE PROCESSO
0x0b0744…0b08d8 Dummy {f00=0x0038, f01=0x0190, f02=» P EJECT P* P************* P* EXTERNALS * 6 P************* L P* b P* l , P EXTRN DWTADR DWT ADDRESS BLOCK POINTER v " P EXTRN DWTTAB DWT TTAB ADDRESS * P EXTRN DWTWAT WAIT/ACTIVATE INDICATOR & P EXTRN DWTTDM
0x0b08d8…0b0a6c Dummy {f00=0x0038, f01=0x0190, f02=»XTRN DWTECB ECB ADDRESS P EXTRN DWTST STATUS P EXTRN TDISP DISPATCHER < 2 P EXTRN SRUN POINTER TO RUNNING SEGMENT IN LSBT $ P EXTRN LKMRQE LKM REQUEST ERROR , P EXTRN GETBLK PUT BLOCK IN PENDING QUEUE 2 P EXTRN FREBLK RELEASE BLOCK FR
0x0b0a6c…0b0c00 Dummy {f00=0x0038, f01=0x018e, f02=»R l * P EXTRN TTB:ID TERMINAL IDENTIFICATION 0 P EXTRN FNDTID SEARCH TERMINAL IDENTIFICATION 8 $ P EXTRN ACTOT 'ACTIVATE' TERMINAL l ( P EXTRN TTB:ST TASK STATUS AND LEVEL P EXTRN TTB:SA SAVE AREA P EXTRN TIODM ENTRY ADDR P EXTRN A
0x0b0c00…0b0d94 (1, 69) Opaque[0x194]
0x0b0d94…0b0f28 # DirEnt {nam=»DRSOP1«, typ=»SC«, f00=0x3039, f01=0x3131, f02=0x0708, f03=0x2020}
0x0b0d94…0b0f28 IdxSect {
0x0b0d94…0b0f28 f00 = 0x0038 // 0xb0d94 @0x0
0x0b0d94…0b0f28 f01 = 0x000a // 0xb0d96 @0x2
0x0b0d94…0b0f28 gno = [ // 0xb0d98 @0x4
0x0b0d94…0b0f28 [0x00]: C0x0038.0x1.0
0x0b0d94…0b0f28 [0x01]: C0x0038.0x2.0
0x0b0d94…0b0f28 [0x02]: C0x0038.0x3.0
0x0b0d94…0b0f28 [0x03]: C0x0039.0x0.0
0x0b0d94…0b0f28 [0x04]: C0x0039.0x1.0
0x0b0d94…0b0f28 ]
0x0b0d94…0b0f28 }
0x0b0f28…0b10bc Dummy {f00=0x0038, f01=0x018e, f02=» 2 P IDENT DRSOP1 REL 8.2 78-09-15 870105040820 P : P* B @ P************************************************************ L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P* DRSOP1 = DRIVER FOR SYSTEM OPERATORS PANEL P*
0x0b10bc…0b1250 Dummy {f00=0x0038, f01=0x0190, f02=» B P* THIS DRIVER HANDLES INPUT AND OUTPUT ON SYSTEM OPERATOR'S , P* PANEL CONNECTED TO CPU VIA CHCR-SOP N P* ~ P* > P* ON AN INPUT REQUEST THE DEVICE SOFTWARE STATUS IS SET : P* 'BUSY' UNTIL THE INPUT INTERRUPT IS TAKEN CARE O
0x0b1250…0b13e4 Dummy {f00=0x0038, f01=0x0190, f02=»EQUEST,POWER UP h > P* IS INDICATED AND NEXT READ REQUEST IS TERMINATED WITH P* -2 IN CONTROL WORD Z P* x P* > P* ON AN OUTPUT REQUEST THE DEVICE SOFTWARE STATUS IS SET > P* 'READY' IMMEDIATELY, SINCE THE OUTPUT DOES NOT REQUIRE
0x0b13e4…0b1578 Dummy {f00=0x0038, f01=0x0190, f02=» ( P* S O P A S : READ SWITCHES ENTRY P* 4 * P* S O P A L : ACTIVATE LIGHTS ENTRY > P* l & P* I H S O P : INTERRUPT HANDLER v P* " P* S O P R : RECOVERY ROUTINE P* P* P* * P* THE FOLLOWING ORDERS A
0x0b1578…0b170c Dummy {f00=0x0038, f01=0x0190, f02=» p , P* 39 : WRITE FLASHING LIGHTS P* 8 P* NORMAL REGISTER USAGE: B P* d " P* REGISTER A1: INPUT/OUTPUT n " P* A2: WORK REGISTER P* A3: ---- " P* A4: WORK REGISTER P*
0x0b170c…0b18a0 Dummy {f00=0x0038, f01=0x0190, f02=»* P EJECT P* P************ " P* ENTRIES: * 6 P************ J P* ^ P* h * P ENTRY SOPCT S.O.P. CHANNEL UNIT TABLE r ( P ENTRY SOPR S.O.P. RECOVERY ROUTINE 2 P ENTRY IHSOP S.O.P. INTERRUPT HANDLER (ALIAS) P ENTRY
0x0b18a0…0b1a34 (1, 70) Dummy {f00=0x0038, f01=0x018e, f02=»RNALS: * P************** P* & P* TOSS GLOBALS: 0 P* H , P EXTRN SAVE8 PUSH REGS A1-A8 ONTO STACK R 4 P EXTRN DISIOE DISPATCHER I/O REQUEST ERROR ENTRY & P EXTRN TDISP DISPATCHER LKM ENTRY . P EXTRN RETUR8 POP A1-A8 CONT'S AND R
0x0b1a34…0b1bc8 Dummy {f00=0x0038, f01=0x018e, f02=» ( P************************************ P* 0 P* DWT DISPLACEMENTS : P* X ( P************************************ b P* $ P EXTRN DWTCHP CHANNEL PARAMETER P EXTRN DWTST STATUS P EXTRN DWTECB ECB ADDRESS P EXTRN DWT
0x0b1bc8…0b1d5c Dummy {f00=0x0038, f01=0x0190, f02=» h P EXTRN DWTTQ TERMINAL QUEUE P EXTRN DWTWA WORK AREA , . P EXTRN INTSAV SAVE AREA FOR LAST INTERRUPT J " P EXTRN ECBCW ECB CONTROL WORD | PTIME EQU 5 FLASH TIME PDWTTP EQU /10 TIMER POINTER P EJECT P* CONDITIONAL ASSEMBLY
0x0b1d5c…0b1ef0 Dummy {f00=0x0038, f01=0x0190, f02=»** P** 8 P* THIS DRIVER CAN BE MADE TO HANDLE CREDIT ORDERS P* BY SETTING CREDIT = 1 P 4 P* ORDERS 05 AND 06 ARE THEN REPLACED BY ORDERS r P* /37 AND /38 RESPECTIVLY B P* BY SETTING CREDIT=1 THE SOP-SWITCHES IS INDEXED:1,2,3,
0x0b1ef0…0b2084 Dummy {f00=0x0038, f01=0x0190, f02=»HE ECB. P** P PCREDIT EQU 0 " P** 6 P** @ @ P* THE ORDER /39, WRITE FLASHING LIGHTS CAN BE INCLUDED BY J P* SETTING X:B=1 P* PX:B EQU 0 PWRFLA EQU X:B P EJECT P* P**********************
0x0b2084…0b2218 Dummy {f00=0x0038, f01=0x0190, f02=»* P* P* P* " P****************************** ( " P* * N " P* S.O.P. CHANNEL UNIT TABLE * t " P* * " P****************************** P* P* 0 PSOPCT EQU * TA
0x0b2218…0b23ac Dummy {f00=0x0038, f01=0x018e, f02=» SWITCHES ENTRY | P* & PSOPADU EQU * ACTIVATE LIGHTS ENTRY " P* L & P DATA SOPAL ACTIVATE LIGHTS ENTRY V P* $ PSPDLCI DATA 0 LIGHT'S CORE IMAGE P* P EJECT P* " P****************************** " P*
0x0b23ac…0b2540 Dummy {f00=0x0038, f01=0x0190, f02=» P* > P* THE ORDER IS ANALYZED AND THE CORRESPONDING I/O ACTION P* IS CARRIED OUT. P P* l * PSOPAS EQU * SWITCHES ACTIVATION ENTRY v P* P LDR A4,A7 COPY ORDER P* " P SUK A4,/02 SEE IF READ ORDER: P* * P R
0x0b2540…0b26d4 (1, 71) Dummy {f00=0x0038, f01=0x0190, f02=» P IFT CREDIT=0 P RF(Z) EXIT NO $ P CMR A6 YES CLEAR FOR NEXT REQ. 0 P XIF X P IFT CREDIT=1 d P RF(NZ) EXIT NO z P STR A7,A6 YES P XIF P RF IHSOP3 P* P* & PSOPAL EQU * ACTIVATE LIGHTS ENTRY P*
0x0b26d4…0b2868 Dummy {f00=0x0038, f01=0x0190, f02=» A4,/05 SEE IF 'LIGHTS ON' ORDER P XIF ( P IFT CREDIT=1 4 P SUK A4,/37 J P XIF ^ & P RF(Z) SOPON IF SO, TURN ON LIGHTS j P* & P SUK A4,1 SEE IF LIGHTS OFF ORDER P RF(Z) SOPOFF & PSOPER ABL(NZ) DISIOE ILLEGAL ORDER P
0x0b2868…0b29fc Dummy {f00=0x0038, f01=0x0190, f02=» ( P RF(NE) FL010 TIMER ALREADY STARTED P LDK A4,DWTTP 4 P ADR A4,A6 J P LDR A1,A6 P CF A15,SETIMP n P DATA FLTUT,TIME P ST A4,DWTTP,A6 P LDKL A1,/FFBF P ANS A1,DWTST,A6 SET ON FLAG PFL010 EQU * " P LD A4
0x0b29fc…0b2b90 Dummy {f00=0x0038, f01=0x0190, f02=» FL020 & P ORS A4,SPDLCI FIXA TILL DET HELA! P RF SOPONOFF 8 PFL020 EQU * L P C1R A4,A4 ` P ANS A4,SPDLCI r P RF SOPONOF PFLTUT EQU * FLASH TIME OUT P LDKL A6,DWSO01 P LD A4,FLASH 0 P RF(Z) FL030 NO MORE FLASHING
0x0b2b90…0b2d24 Dummy {f00=0x0038, f01=0x0190, f02=» PFL030 CM DWTTP,A6 P RF EXIT END I/O " P XIF : P EJECT F P* T 4 PSOPOFF C1 A4,10,A8 GET COMPLEMENTED CONTROL WORD ^ 4 P ANS A4,SPDLCI MASK OUT LIGHTS TO BE TURNED OFF P IFT WRFLA=1 $ P ANS A4,FLASH STOP SOME FLASHING
0x0b2d24…0b2eb8 Dummy {f00=0x0038, f01=0x0190, f02=» & PSOPON LD A4,10,A8 GET CONTROL WORD . P ORS A4,SPDLCI SET LIGHTS TO BE TURNED ON . P IFT WRFLA=1 ` P C1R A4,A4 t * P ANS A4,FLASH STOP SOME OTHER FLASHING P XIF P* P* COMMON ON/OFF PATH: P* 0 PSOPONOFF LD A1,SPDLCI
0x0b2eb8…0b304c Dummy {f00=0x0038, f01=0x0190, f02=» P**************************** P* * ( P* S.O.P. INTERRUPT HANDLER * L P* * p P**************************** P* P* @ P* THE INTERRUPT HANDLER WILL TAKE CARE OF ALL INTERRUPTS.
0x0b304c…0b31e0 Dummy {f00=0x0038, f01=0x0190, f02=»INTSAV SAVE LAST INTERRUPT P INR A1,0,SOPDA GET SWITCH " P SRN A1,A2 CALC INDEX D P IFT CREDIT=0 b P SLL A2,1 x P XIF P IFT CREDIT=1 P ADK A2,1 P XIF P PIHSOP1 EQU * P IFF SOPX=0 " P LDKL A6,DWSI0
0x0b31e0…0b3374 (1, 72) Dummy {f00=0x0039, f01=0x018e, f02=»,A8 STORE INDEX P LDK A1,0 P CF A15,TENDIO END I/O * P XIF H P T ( PIHSOP2 LDKL A6,DWSI01 ANY REQUEST ON P LD A4,DWTST,A6 STATUS WORD P RF(N) EXIT NO $ P LD A8,DWTECB,A6 GET ECB-ADDRESS P & PIHSOP3 ST A2,ECBCW,A8
0x0b3374…0b3508 Dummy {f00=0x0039, f01=0x0190, f02=» P* * P************************************* * P* * @ * P* S.O.P POWER UP RECOVERY ROUTINE * n * P* * * P************************************* P* P*
0x0b3508…0b369c Dummy {f00=0x0039, f01=0x0190, f02=»SENT IN THE POWER FAILURE RECOVERY TABLE (PFTAB). < P* IF RUNNING READ REQUEST THIS IS COMPLETED WITH -2 IN : 0 P* CONTROL WORD. ELSE -2 IS SAVED IN DWTCHP z P* P* PSOPR EQU * ENTRY POINT P* P CF A15,SAVE8 SAVE REGS.
0x0b369c…0b3830 Dummy {f00=0x0039, f01=0x018e, f02=» h P* P IFT CREDIT=0 " P LDKL A2,-2 POWER UP INDICATOR ( P XIF N P IFT CREDIT=1 Z P LDK A2,0 p P XIF P P IFF SOPX=0 " P LDKL A6,DWSI02 ANY REQUEST ON $ P LD A4,DWTST,A6 GET STATUS WORD P RF(NN) SOPR1 YE
0x0b3830…0b39c4 Dummy {f00=0x0039, f01=0x0190, f02=» r P RF(NN) SOPR2 YES P STR A2,A6 IND POWER UP " P B PSOPR2 RB IHSOP1 J P EJECT b P* p P* D W S I 0 1 : INPUT DWT z P* PDWSI01 EQU * , P DATA 0 CHANNEL PARAMETER: POWER UP IND , P DATA /8000 /8000 MEANS DEVI
0x0b39c4…0b3b58 Dummy {f00=0x0039, f01=0x0190, f02=»AL QUEUE P* P* D W S O 0 1 : OUTPUT DWT P* > P* H PDWSO01 EQU * R " P DATA /0040 CHANNEL PARAMETER f , P DATA /8000 /8000 MEANS DEVICE IS READY P DATA 0 ECB ADDRESS P DATA 0 ORDER * P DATA SOPADU POINTER TO AD
0x0b3b58…0b3cec Dummy {f00=0x0039, f01=0x4140, f02=»TER ~ . PFLASH DATA 0 SAVE AREA FOR FLASHING LAMPS P EJECT > P L P* T * P* D W S I 0 2 : EXTENDED INPUT DWT ^ P* P PDWSI02 EQU * P IFF SOPX=0 P DATA 0 P DATA /8000 P DATA 0,0 P DATA SOPADI
0x0b3cec…0b3e80 Dummy {f00=0x0039, f01=0x2008, f02=» -ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE @ P* ^ P END h@ t P* z P* P* D W S O P U : OUTPUT DWT P* P* PDWSOPU EQU * P DATA 0 CHANNEL PARAMETER , P DATA /8000
0x0b3e80…0b4014 (1, 73) Dummy {f00=0x0039, f01=0x0190, f02=»A CWTLT3 P XIF P IFT LOCHAN=4 P DATA CWTLT3 2 P DATA CWTLT4 F P XIF Z PCHTABE EQU * END OF TABLE f P* P* P* P* P* P EJECT P* P IFF LOCHAN=1 P* P* C H L T 1 / C H L
0x0b4014…0b41a8 Dummy {f00=0x0039, f01=0x0190, f02=» XIF P IFT LOCHAN=2 PCHLT3 EQU * " PCHLT4 EQU * 6 P XIF J P IFF LOCHAN=1 V PCHLT1 EQU * l $ P ST P,INTSAV SAVE LAST INTERRUPT & P CF A15,SAVE8 SAVE REGISTERS A1-A8 . P LDKL A5,CWTLT1 SET CWT-ADDRESS FOR CHLT1 P RF
0x0b41a8…0b433c Dummy {f00=0x0039, f01=0x0190, f02=»RUPT t & P CF A15,SAVE8 SAVE REGISTERS A1-A8 . P LDKL A5,CWTLT2 SET CWT-ADDRESS FOR CHLT2 6 P XIF h P IFT LOCHAN=2 t 0 PCLT010 EX CWTINR,A5 EXECUTE INR-INSTRUCTION P* P XIF P* P IFT LOCHAN=3 P RF CLT010 P*
0x0b433c…0b44d0 Dummy {f00=0x0039, f01=0x0190, f02=»NTERRUPT x & P CF A15,SAVE8 SAVE REGISTERS A1-A8 ! . P LDKL A5,CWTLT3 SET CWT-ADDRESS FOR CHLT3 ! : $ PCLT010 EX CWTINR,A5 EXECUTE INR ! l P* ! P XIF ! P IFT LOCHAN=4 ! P RF CLT010 ! P* ! P* ! P* C H L T 2 ! P* INTERRUP
0x0b44d0…0b4664 Dummy {f00=0x0039, f01=0x018e, f02=»L A5,CWTLT3 SET CWT-ADDRESS FOR CHLT3 ! P RF CLT010 " . P* C H L T 4 " @ P* INTERRUPT FROM CHLT4 " V P* " v PCHLT4 EQU * " $ P ST P,INTSAV SAVE LAST INTERRUPT " & P CF A15,SAVE8 SAVE REGISTERS A1-A8 " . P LDKL A5,CWTLT4 SET CWT-ADDRESS FO
0x0b4664…0b47f8 Dummy {f00=0x0039, f01=0x018e, f02=» " P* # P* INTERRUPT FROM CHLT1 # P* # 4 PCHLT1 EQU * # > PCHLT2 EQU * # R PCHLT3 EQU * # f PCHLT4 EQU * # z * P CF A15,SAVE8 SAVE REGISTERS ON STACK # $ P LDKL A5,CWTLT1 GET CWT-ADDRESS # $ P ST P,INTSAV SAVE LAST INTERRUPT #
0x0b47f8…0b498c Dummy {f00=0x0039, f01=0x0190, f02=» # P EJECT $ P* $ P* $ * P* DETERMINE LINE- AND DEVICE NUMBER $ * P* $ X P LDK A1,0 RESET RETURN CODE $ b P LDR A3,A2 INPUT WORD IN A3 $ P SRL A3,8 $ P LDR A4,A3 $ $ P ANK A3,/E 2 * LINE NUMBER IN A3 $ P SRL A4,3 $ & P
0x0b498c…0b4b20 Dummy {f00=0x0039, f01=0x0190, f02=» P RF(E) CHPOWO % P* % P* % $ 0 P* CHECK QUEUE AND SEND IF SOMETHING THERE % . P* % b & P LDR* A7,A5 LAST OUTPUT DWT IN A7 % l P CMR A5 RESET LAST OUTPUT % P LD A6,CWTEQ,A5 OUTPUT QUEUE % P RF(E) CLT020 % P STR A2,A15 SAVE A2 %
0x0b4b20…0b4cb4 (1, 74) Opaque[0x194]
0x0b4cb4…0b4e48 # DirEnt {nam=»INPRET«, typ=»SC«, f00=0x434b, f01=0x204e, f02=0x0730, f03=0x203d}
0x0b4cb4…0b4e48 IdxSect {
0x0b4cb4…0b4e48 f00 = 0x0039 // 0xb4cb4 @0x0
0x0b4cb4…0b4e48 f01 = 0x0004 // 0xb4cb6 @0x2
0x0b4cb4…0b4e48 gno = [ // 0xb4cb8 @0x4
0x0b4cb4…0b4e48 [0x00]: C0x0039.0x2.0
0x0b4cb4…0b4e48 [0x01]: C0x0039.0x3.0
0x0b4cb4…0b4e48 ]
0x0b4cb4…0b4e48 }
0x0b4e48…0b4fdc Dummy {f00=0x0039, f01=0x0190, f02=» 2 P IDENT INPRET REL 8.2 78-09-15 870105040820 P : P* B 6 P************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* ( P* INPRET = SUBROUTINE INTERPRETER P* P* P*
0x0b4fdc…0b5170 Dummy {f00=0x0039, f01=0x0190, f02=» INTERPRETER TO HANDLE SUBROUTINE x < P* CALLS USING THE A14 STACK. THE INTERPRETER IS CALLED * @ P* WITH INSTRUCTION CODES /C001 - /C0FF WHERE /1 - /FF IS A j . P* INDEX. INDEX VAULES ARE 1,2,3,4...... @ P* THE INDEX IS USED TO GET ABSOLUTE AD
0x0b5170…0b5304 Dummy {f00=0x0039, f01=0x018e, f02=»R TABLE. ('CVTINP') l P* H P* THE INTERPRETER MAY ALSO EXECUTE THE FOLLOWING TWO INSTRUCTIONS: & P* r . P* LD R1,DISPL,A13 CALLING CODE: CXYY | P* . P* ST R1,DISPL,A13 CALLING CODE: DXYY P* $ P* X = R1 = REGIST
0x0b5304…0b5498 Dummy {f00=0x0039, f01=0x0190, f02=» P* ENTRY * P********* P* ( P* 2 ( P ENTRY IHINPT TRAP INTERRUPT ADDRESS < P* h P* r P* | P************* P* EXTERNALS * P************* P* P* ( P EXTRN CVTINP FUNCTION TABLE ADDRESS P
0x0b5498…0b562c Dummy {f00=0x0039, f01=0x0190, f02=»IHINPT EQU * $ P STR A1,A15 SAVE A1-A3 ON STACK P STR A2,A15 < P STR A3,A15 SAVE A3 ON STACK P $ P LD A1,10,A15 LOAD TRAP ADDRESS t P LDR* A2,A1 LOAD TRAP CODE P ADK A1,2 & P ST A1,10,A15 SAVE RETURN ADDRESS P LDR A3,A2 SAV
0x0b562c…0b57c0 Dummy {f00=0x0039, f01=0x0190, f02=»EXECUTE LOAD/STORE INSTRUCTION P* & $ P SC A2,DISPL+1 STORE DISPLACMENT 0 , P SRL A3,1 SHIFT TO FIT INSTRUCTION CODE X P SLL A2,3 . P RF(NN) INT100 BRANCH IF LOAD INSTRUCTION ( P ADK A3,1 INDICATE STORE INSTRUCTION 6 PINT100 ADKL A3,/
0x0b57c0…0b5954 (1, 75) Dummy {f00=0x0039, f01=0x0190, f02=»15 RESTORE A1-A2 P LDR* A1,A15 ( PINSTR DATA 0 LOAD/STORE INSTRUCTION , PDISPL DATA 0 DISPLACMENT X P STR A1,A15 SAVE A1 x * P CF A15,IHSTAK SAVE CONDITION REGISTER $ PIHSTAK LDR* A1,A15 GET COND. REG $ P ST A1,6,A15 STORE IN RETURN P
0x0b5954…0b5ae8 Dummy {f00=0x0039, f01=0x0190, f02=»* P* P* EXECUTE SUBROUTINE CALL P* 8 PINT200 EQU * B 8 P STR A1,A14 STORE CONTINUATION ADDRESS ON A14 STACK V P LD A3,8,A15 ( P ST A3,-2,A14 STORE PSW ON A14 STACK $ P SUKL A14,4 ADJUST STACK POINTER P ANKL A2,/1FFF
0x0b5ae8…0b5c7c Dummy {f00=0x0039, f01=0x40a2, f02=» ADDRESS AND p ( P ST A2,10,A15 STORE IT ON A15 STACK : P ABL RETUR3 RESTORE A1-A3 AND GO TO CALLED SUBROUTINE @ P* ~ P* P END @ ( P ST A3,-2,A14 STORE PSW ON A14 STACK $ P SUKL A14,4 ADJUST STACK POINTER P ANKL A2,/1FFF
0x0b5c7c…0b5e10 Dummy {f00=0x0039, f01=0x2008, f02=» RT ADDRESS t 0 P LDR* A2,A2 GET SUBROUTINE START ADDRESS AND ( P ST A2,10,A15 STORE IT ON A15 STACK N : P ABL RETUR3 RESTORE A1-A3 AND GO TO CALLED SUBROUTINE z P* P* P END @ ( P ST A3,-2,A14 STORE PSW ON A14 STACK
0x0b5e10…0b5fa4 Dummy {f00=0x0039, f01=0x0190, f02=» " P* -BITS 0-7 IN THE FIRST WORD P* -ECBEL EFFECTIVE LENGTH . P* -ECBRC RETURN CODE R P* p P z P P P* 2 P* GET DWT ADDRESS AND CHECK IF DEVICE IS BUSY P* P P ( PTIO CF A15,FNDDWT SEARCH DWT
0x0b5fa4…0b6138 Dummy {f00=0x0039, f01=0x0190, f02=»,A9 SAVE TASK STATUS P RF(N) TIO020 DMTASK CALLING $ P LDKL A9,/4000 REQUEST BUSY BIT @ P AN A9,DWTST,A6 h , P RF(NZ) TIOQ20 REQ BUSY,NOT DMTASK CALL PTIO020 EQU * P CCK A7,/BB00 P ABL(E) ATTACH ATTACH ORDER P CCK A7,/B
0x0b6138…0b62cc Dummy {f00=0x0039, f01=0x0190, f02=»A10,/0800 ATTACH BIT P AN A10,DWTST,A6 P RF(Z) TIO030 NOT ATTACHED 4 P CW A5,DWTTAB,A6 V * P RF(NE) TIOQ20 ATTACHED TO OTHER TASK n P AN A3,DWTST,A6 P RF(Z) TIOQ05 DEVICE BUSY PTIO030 EQU * P AN A3,DWTST,A6 P RF(Z)
0x0b62cc…0b6460 Dummy {f00=0x0039, f01=0x0190, f02=» P RF(Z) TIO100 NOT ECHO P LDKL A2,TIODM " P CW A2,DWTADR,A6 8 P RF(E) TIO090 DM-REQUEST P & P LD A2,DWTECH,A6 LOAD ECHO DEVICE p P RF(Z) TIO100 NO ECHO DEVICE & P LDKL A10,/100 BIT 7=INPUT DEVICE P ANR* A10,A6 ECHO ALLOWED?
0x0b6460…0b65f4 (1, 76) Opaque[0x194]
0x0b65f4…0b6788 # DirEnt {nam=»DRDN01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0740, f03=0x2020}
0x0b65f4…0b6788 IdxSect {
0x0b65f4…0b6788 f00 = 0x003a // 0xb65f4 @0x0
0x0b65f4…0b6788 f01 = 0x0006 // 0xb65f6 @0x2
0x0b65f4…0b6788 gno = [ // 0xb65f8 @0x4
0x0b65f4…0b6788 [0x00]: C0x003a.0x0.0
0x0b65f4…0b6788 [0x01]: C0x003a.0x1.0
0x0b65f4…0b6788 [0x02]: C0x003a.0x2.0
0x0b65f4…0b6788 ]
0x0b65f4…0b6788 }
0x0b6788…0b691c Dummy {f00=0x003a, f01=0x0190, f02=» 2 P IDENT DRDN01 REL 8.2 78-09-15 870105040820 P : P* B 8 P*************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* ( P* DRDN01 = DRIVER NUMERIC DISPLAY P* P* P*
0x0b691c…0b6ab0 Dummy {f00=0x003a, f01=0x0190, f02=»DLES THE NUMERIC DISPLAY | 0 P* ON INDICATOR UNIT PTS 6241 CONNECTED TO & P* THE SYSTEM VIA CHLT OR CHRT. T P* ~ 0 P* THE DISPLAY MAY BE USED AS AN ORDINARY 0 P* OUTPUT DEVICE WHERE NUMERIC INFORMATION 0 P* ARE DISPLAYED FROM
0x0b6ab0…0b6c44 Dummy {f00=0x003a, f01=0x0190, f02=» KEYBOARD DRIVER DRKB01. P* P* * 0 P* THE DRIVER CONSISTS OF FOLLOWING PARTS: 4 P* h & P* A C D N ACTIVATION PART r P* ( P* I H D N INTERRUPT HANDLER P* ( P* R C D N RECOVERY ROUTINE P
0x0b6c44…0b6dd8 Dummy {f00=0x003a, f01=0x0190, f02=»THREATED: r P* ( P* ORDER 05: ERASE NUMERIC DISPLAY ( P* 06: WRITE NUMERIC DISPLAY H P* t P* ~ P* NORMAL REGISTER USAGE: P* $ P* REGISTER: A1 = RETURN CODE ( P* A2 = OUTPUT CHARACTER $
0x0b6dd8…0b6f6c Dummy {f00=0x003a, f01=0x018e, f02=» A6 = DWT-ADDRESS P* A7 = ORDER $ P* A8 = ECB-ADDRESS < P* d P* n P* SYSTEM ADAPTATION x P* 2 P* BY MEANS OF CONDITIONAL ASSEMBLY ORDER 06 0 P* WRITE NUMERIC DISPLAY MAY BE EXCLUDED. 0
0x0b6f6c…0b7100 Dummy {f00=0x003a, f01=0x0190, f02=» P*********** P* ENTRIES * P*********** 0 P* D P* N ( P ENTRY DNAD ADDRESS TO ADDRESS-BLOCK X P* P* P* 0 P******************************************** 0 P* EXTERNAL TOSS MODULE ENTRIES * 0
0x0b7100…0b7294 (1, 77) Dummy {f00=0x003a, f01=0x0190, f02=»OM ECB r $ P EXTRN DISIOE I/O REQUEST ERROR P EXTRN TENDIO END I/O 6 P EXTRN OUTPUT SEND CHARACTER T < P EXTRN LDREG RESTORE REGISTERS A4,A3,A5,A7,A8 AND RETURN x & P EXTRN SAVE8 SAVE REGISTERS A1-A8 & P EXTRN ECHRTN RETURN FROM ECHOING
0x0b7294…0b7428 Dummy {f00=0x003a, f01=0x0190, f02=»RN DWTST STATUS P EXTRN DWTECB P* . P* 8 P EJECT B P* P P************************** Z P* CONDITIONAL ASSEMBLY * | P************************** P* 0 P* BY SETTING X:A = 0 THIS DRIVER HANDLES , P* ONLY
0x0b7428…0b75bc Dummy {f00=0x003a, f01=0x0190, f02=»BE MADE TO HANDLE CREDIT ORDERS | P* BY SETTING CREDIT = 1 ( . P* ORDER 05 IS THEN REPLACED BY ORDER /31 J P** | P PCREDIT EQU 0 P***************** P* CONSTANTS * P***************** P* " PCCERR EQU /4 C
0x0b75bc…0b7750 Dummy {f00=0x003a, f01=0x018e, f02=» P*************** P* TABLES * P************** 6 P* L P* V PDNAD EQU * ADDRESS BLOCK ` P DATA ACDN ACTIVATION PART P DATA IHDN INTERRUPT HANDLER P DATA RCDN RECOVERY ROUTINE 2 P DATA ECHODN DEVICE-DEPENDENT
0x0b7750…0b78e4 Dummy {f00=0x003a, f01=0x0190, f02=» , P* THE FOLLOWING ORDERS ARE THREATED: P* 8 ( P* ORDER 05: ERASE NUMERIC DISPLAY B , P* ORDER 06: WRITE ON NUMERIC DISPLAY n P* < P* IF ORDER 5 ERASE CHARACTER /40 IS SENT TO DISPLAY. @ P* IF ORDER 6 CHARACTERS IN EC
0x0b78e4…0b7a78 Dummy {f00=0x003a, f01=0x0190, f02=»IF P IFT CREDIT=1 P SUK A7,/31 P RF(Z) ADN010 4 P ADK A7,/2C J P XIF ^ P* j P IFT DNWRIT=1 t P* P SUK A7,1 ORDER 6? P RF(E) ADN015 P* P XIF P* " P ABL DISIOE I/O REQUEST ERROR
0x0b7a78…0b7c0c Dummy {f00=0x003a, f01=0x0190, f02=»F ENDIO P EJECT P* P* ORDER 06 ( P* > P* H P IFT DNWRIT=1 R P* h & PADN015 LDK A3,0 RESET BUFFER INDEX r & PADN020 CF A15,GETCHR GET CHARACTER P LDR A1,A1 FOUND? P RF(NP) ENDIO NO, READY ! P*
0x0b7c0c…0b7da0 Dummy {f00=0x003a, f01=0x0190, f02=» RF(P) ADN030 P ADK A4,9 KEY < /30 P RF(N) ADN030 2 PADN025 EQU * H P CF A5,OUTPUT SEND CHARACTER P RB ADN020 2 PADN030 LDK A1,CCERR INDICATE CODE CHECK ERROR P ORS A1,8,A8 RETURN CODE P RB ADN020 P* P XIF
0x0b7da0…0b7f34 (1, 78) Dummy {f00=0x003a, f01=0x0190, f02=»NTERRUPT P* PIHDN EQU * P LD A4,DWTST,A6 BUSY? , P RB(N) EXIT J P SLL A4,2 ECHO MODE ? ^ P RF(N) IHDN10 | & P LDR A1,A1 RETURN CODE FROM CHLT? P RB(NE) ENDIO PIHDN10 EQU * P ABL LDREG P EJECT P*
0x0b7f34…0b80c8 Dummy {f00=0x003a, f01=0x0190, f02=»A2,/7FFF $ P ANS A2,DWTST,A6 SET DEVICE BUSY P LDK A2,/40 ERASE CHARACTER : P CF A5,OUTPUT SEND ERASE ^ P LD A8,DWTECB,A6 ~ P RB(E) ENDIO * P RB ACDN RETURN TO ACTIVATINO PARTONI P EJECT P* P* E C H O D N P
0x0b80c8…0b825c Dummy {f00=0x003a, f01=0x40fa, f02=»3,/8 BACKSPACE? P RF(E) ECH050 P SUK A3,/10 CLEAR? . P RF(NE) ECH040 NO H P LDK A2,/40 ERASE DISPLAY b & PECH040 CF A5,OUTPUT SEND CHARACTER 0 PECH050 ABL ECHRTN RETURN TO KEYBOARD DRIVER P END P @ O D N P
0x0b825c…0b83f0 Dummy {f00=0x003a, f01=0x2008, f02=» KSPACE? P RF(E) ECH050 P SUK A3,/10 CLEAR? . P RF(NE) ECH040 NO H P LDK A2,/40 ERASE DISPLAY b & PECH040 CF A5,OUTPUT SEND CHARACTER 0 PECH050 ABL ECHRTN RETURN TO KEYBOARD DRIVER P END P @ O D N P
0x0b83f0…0b8584 Dummy {f00=0x003a, f01=0x018e, f02=»* I . P* PART TWO: ECHO ONE OR MORE CHARACTERS J 2 P* CORRESPONDING TO ONE CHARACTER J < 4 P* TO BE STORED IN INPUT ECB-BUFFER J r P* J P* J 4 P* PART ONE FOLLOWS AND PART TWO CAN BE FOUND J 4 P* IN THE DRIVER
0x0b8584…0b8718 Dummy {f00=0x003a, f01=0x0190, f02=» J " P* A7 MUST NOT BE DESTROYED K 6 P* THE ECHO-ROUTINE SHOULD BE TERMINATED WITH A K . P* JUMP TO 'ECHRTN'. K h P* K PECHEND EQU * K P* K P IFT CECHO=1 K P* K $ P LDKL A7,/8000 INDICATE END I/O K P XIF K PECHO EQU
0x0b8718…0b88ac Dummy {f00=0x003a, f01=0x018e, f02=»STATUS K P SLL A1,2 L $ P RF(NN) RETUR NO ECHO REQUESTED L 0 P LDR A4,A6 SAVE DWT-ADDRESS OF INPUT DEVICE L H 2 P LD A6,DWTECH,A6 DWT-ADDRESS OF OUTPUT DEVICE L | 6 P ST A4,DWTWAT,A6 SAVE DWT-ADDRESS OF INPUT DEVICE L P LDKL A5,DWTSB2 L & P ADR
0x0b88ac…0b8a40 Dummy {f00=0x003a, f01=0x412e, f02=» L ` P XIF M PECHRTN EQU * M P IFT CECHO=1 M ( P LDR A7,A7 END? M < P RF(NN) ERETUR NO M T ( P CF A15,TENDIO END I/O OUTPUT DEVICE M n > PERETUR LD A6,DWTWAT,A6 RELOAD DWT-ADDRESS OF INPUT DEVICE M 4 PRETUR ABL LDREGF RELOAD A3-A5 AND RETURN VIA
0x0b8a40…0b8bd4 (1, 79) Opaque[0x194]
0x0b8bd4…0b8d68 # DirEnt {nam=»DRDI01«, typ=»SC«, f00=0x1e12, f01=0x5400, f02=0x0758, f03=0x948c}
0x0b8bd4…0b8d68 IdxSect {
0x0b8bd4…0b8d68 f00 = 0x003a // 0xb8bd4 @0x0
0x0b8bd4…0b8d68 f01 = 0x0008 // 0xb8bd6 @0x2
0x0b8bd4…0b8d68 gno = [ // 0xb8bd8 @0x4
0x0b8bd4…0b8d68 [0x00]: C0x003a.0x3.0
0x0b8bd4…0b8d68 [0x01]: C0x003b.0x0.0
0x0b8bd4…0b8d68 [0x02]: C0x003b.0x1.0
0x0b8bd4…0b8d68 [0x03]: C0x003b.0x2.0
0x0b8bd4…0b8d68 ]
0x0b8bd4…0b8d68 }
0x0b8d68…0b8efc Dummy {f00=0x003a, f01=0x0190, f02=» 2 P IDENT DRDI01 REL 9.1 78-09-15 870105940912 P : P* B < P******************************************************* L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* * P* DRDI01 = DRIVER INDICATOR DISPLAY P* P*
0x0b8efc…0b9090 Dummy {f00=0x003a, f01=0x0190, f02=»RIVER HANDLES OUTPUT TO SIGNAL DISPLAYS PTS 6241 > P* AND 6242. IT ALSO CONTROLS LAMPS ON KEYBOARDS PTS 6232 8 " P* 6233, 6236 AND 633, 62361. z P* @ P* THESE DEVICES MUST BE CONNECTED TO CPU VIA CHLT OR CHRT P* P* 4 P* TH
0x0b9090…0b9224 Dummy {f00=0x003a, f01=0x0190, f02=»LER t P* " P* R C D I : RECOVERY ROUTINE P* < P* F * P* THE FOLLOWING ORDERS ARE TREATED: P P* ~ " P* ORDER 05: WRITE LIGHTS ON " P* 06: WRITE LIGHTS OFF ( P* 07: WRITE PROGRAM DISPLAY , P*
0x0b9224…0b93b8 Dummy {f00=0x003a, f01=0x0190, f02=»ETURN CODE ~ P* A2: OUTPUT " P* A3: WORK REGISTER 2 " P* A4: WORK REGISTER X " P* A5: WORK REGISTER ~ P* A6: DWT-ADDRESS P* A7: ORDER P* A8: ECB-ADDRESS
0x0b93b8…0b954c Dummy {f00=0x003a, f01=0x0190, f02=» BIT 10 = 1 IF PROGRAM DISPLAY (PTS 6241) , P* BIT 11 = 1 FOR PTS 6232,6331,6236 6 , P* BIT 11 = 0 FOR PTS 6241,6242,6233 f P* : P* ORDER 07, WRITE PROGRAM DISPLAY MAY BE EXCLUDED BY P* CONDITIONAL ASSEMBLY P* P
0x0b954c…0b96e0 Dummy {f00=0x003a, f01=0x0190, f02=»TO ADDRESS-BLOCK | P* P******************* " P* EXTERNALS * > P******************* Z P* v P EXTRN SAVE8 SAVE REGS P EXTRN TENDIO END I/O . P EXTRN DISEND PERFORM END I/O AND DISPATCH * P EXTRN TDISP DISPATCHER OR
0x0b96e0…0b9874 (1, 80) Dummy {f00=0x003b, f01=0x0190, f02=»XTRN DWTST STATUS P* P EXTRN SETIMP SET TIMER $ P* D P* N P*************** X P* TABLES * p P*************** P* PDIAD EQU * ADDRESS BLOCK P DATA ACDI ACTIVATION DRIVER P DATA IHDI INTERRUPT HANDLER
0x0b9874…0b9a08 Dummy {f00=0x003b, f01=0x0190, f02=»* P* P************************* P* CONDITIONAL ASSEMBLY * 6 P************************* X P* z P* P* : P* ORDER 07, WRITE PROGRAM DISPLAY MAY BE EXCLUDED BY P* SETTING X:A=0 P* P* P*
0x0b9a08…0b9b9c Dummy {f00=0x003b, f01=0x0190, f02=»NG CREDIT = 1 0 P* ORDERS 05,06AND 07 ARE THEN REPLACED BY P* ORDERS 37,38 AND 06 J P** j P t PCREDIT EQU 0 | P* P* P* P* 8 P* ORDER 39, WRITE FLASHING LIGHTS MAY BE INCLUDED ( P* IN THIS DRIVER B
0x0b9b9c…0b9d30 Dummy {f00=0x003b, f01=0x0190, f02=»********* P* DWT-DISPLACEMENTS * P********************* 0 P* N PDWTBC EQU /3 BYTE COUNTER X PDWTECB EQU /4 ECB-ADDRESS z PDWTDIB EQU /12 SAVE AREA , PDWTFLA EQU /18 SAVE AREA FOR FLASH IMAGE PDWTTP EQU /1A TIMER POINTER
0x0b9d30…0b9ec4 Dummy {f00=0x003b, f01=0x0190, f02=»TY OF ORDERS AND STARTS n P* THE PROCESSING P* : P* D PACDI EQU * N P IFT ORD7-CREDIT=1 ` P CCK A7,/0707 z P RF(E) ADI050 ORDER /07 P XIF P IFT ORD7+CREDIT=2 P CCK A7,/0606 P RF(E) ADI050 ORDER /06
0x0b9ec4…0ba058 Dummy {f00=0x003b, f01=0x0190, f02=»NZ) ADI005 ONE CHARACTER DEVICE " P LDR A3,A4 CONTROL WORD tO A3 ( P ANK A4,/F N P ANK A3,/F0 ` P SLL A3,4 t P ORR A4,A3 LAMPCODES IN A4 PADI005 EQU * P IFT FLASH=1 P CCK A7,/3939 P RF(E) FLA05 P XIF P I
0x0ba058…0ba1ec Dummy {f00=0x003b, f01=0x0190, f02=»UK A7,1 P RF(E) ADI007 ORDER 06 " P ABL(NE) DISIOE REQUEST ERROR . P* T P EJECT ^ P IFT FLASH=1 l P* P* FLASH ORDER /39 P* P* , PFLA05 ORS A4,DWTFLA,A6 SAVE FLASH IMMAGE & P LD A1,DWTTP,A6 GET TIMER
0x0ba1ec…0ba380 Dummy {f00=0x003b, f01=0x018e, f02=»5,SETIMP P DATA FLTUT,TIME P ST A4,DWTTP,A6 ( P LDKL A4,/FFBF @ & P ANRS A4,A6 CHECK ON-OFF INDICATOR V PFLA10 EQU * P LD A4,DWTFLA,A6 & P LDR* A2,A6 CHECK ON-OFF INDICATOR P ANK A2,/40 * P RF(Z) FLA20 WRITE FLASHING LI
0x0ba380…0ba514 (1, 81) Dummy {f00=0x003b, f01=0x0190, f02=» t P RF ADI030 TURN ON LAMPS & PFLTUT EQU * FLASH TIME OUT ROUTINE ( P LDR A6,A1 R P LD A4,DWTFLA,A6 d < P RF(Z) FLA30 IF NO MORE LAMPS TO FLASH GO TO DISPATCHER | P LDKL A1,-TIME RESTART TIMER P ST* A1,DWTTP,A6 P LDK A4,/40
0x0ba514…0ba6a8 Dummy {f00=0x003b, f01=0x0190, f02=» ORDER 06: SWITCH OFF LAMPS P* & PADI007 EQU * 0 P C1R A4,A4 D . P ANS A4,DWTDIB,A6 RESET BITS IN DWT-BUFFER V P IFT FLASH=1 0 P ANS A4,DWTFLA,A6 RESET BITS IN FLASH IMAGE P XIF P RF ADI030 P* P* P EJECT
0x0ba6a8…0ba83c Dummy {f00=0x003b, f01=0x018e, f02=»FFER f P IFT FLASH=1 P C1R A4,A4 0 P ANS A4,DWTFLA,A6 RESET BITS IN FLASH IMAGE 2 P XIF f . PADI030 LC A2,DWTDIB,A6 GET FIRST CHARACTER r PADI035 LDK A1,1 6 P SC A1,DWTST+1,A6 SET START VALUE IN BYTE COUNTER P LDR* A3,A6 TWO OU
0x0ba83c…0ba9d0 Dummy {f00=0x003b, f01=0x0190, f02=» P* P* ( P* ORDER 07: WRITE PROGRAM DISPLAY P* D PADI050 LDK A3,0 N & PADI060 CF A15,GETCHR GET CHARACTER f P LDR A1,A1 LAST CHARACTER ? P RF(Z) ADI070 YES P LDR A4,A2 P SRL A4,4 $ P SUK A4,3 UNDEFINED CH
0x0ba9d0…0bab64 Dummy {f00=0x003b, f01=0x0190, f02=» , P SCR A2,A4 STORE CHARACTER IN DWT-BUFFER " P RB ADI060 GET NEXT CHARACTER : < PADI070 SC A1,DWTST+1,A6 SET START VALUE IN BYTE COUNTER ` P RF IHDI10 SEND CHARACTERS P* P* P* CODE CHECK ERROR P* ( PADI100 LDK
0x0bab64…0bacf8 Dummy {f00=0x003b, f01=0x0190, f02=»* I H D I P* 0 P* INTERRUPT HANDLER: PROCESS OF INTERRUPT P* R PIHDI EQU * P LDR A1,A1 RETURN CODE n P RF(NE) ENDIO YES END I/O P LD A4,DWTST,A6 GET STATUS P ANK A4,/FF P SUK A4,2 TWO CHARS. SENT P I
0x0bacf8…0bae8c Dummy {f00=0x003b, f01=0x0190, f02=» PERFORM ENDIO $ PIHDI05 SUK A4,4 LAST CHARACTER ? $ P RF(Z) ENDIO YES. PERFORM ENDIO > PIHDI10 LDKL A2,DWTDIB f P ADR A2,A6 P LD A4,DWTST,A6 P ANK A4,/FF P ADR A2,A4 P LCR A2,A2 GET CHARACTER P XIF P IFT O
0x0bae8c…0bb020 Dummy {f00=0x003b, f01=0x0190, f02=»T IF POWER FAIL NO BELL P LD A3,10,A8 BELL? P RF(NN) OUTPUT NO : P ORK A2,/40 INDICATE BELL T P* v . POUTPUT IM DWTST,A6 INCREMENT BYTE COUNTER & PIHDI20 CF A15,OUTLIN OUTPUT CHAR. PEXIT ABL TDISP 2 PENDIO ABL DISEND PERFO
0x0bb020…0bb1b4 (1, 82) Dummy {f00=0x003b, f01=0x4156, f02=»ED WITH ^ B P* THE VALUES EXISTENT AT POWER FAILURE TIME.THE INFORMATION , P* OM PROGRAM DISPLAY IS ALSO RESTORED V P* P* PRCDI EQU * P CF A15,SAVE8 SAVE REGS. ( P LC A2,DWTDIB,A6 GET FIRST CHARACTER P RB ADI035
0x0bb1b4…0bb348 Dummy {f00=0x003b, f01=0x2008, f02=» POWER FAILURE TIME.THE INFORMATION ~ , P* OM PROGRAM DISPLAY IS ALSO RESTORED 4 P* d P* n PRCDI EQU * x P CF A15,SAVE8 SAVE REGS. ( P LC A2,DWTDIB,A6 GET FIRST CHARACTER P RB ADI035 P* P* P END P
0x0bb348…0bb4dc Dummy {f00=0x003b, f01=0x0190, f02=» ADK A3,/70 P LDR A2,A3 P LDR* A3,A15 & * P CF A15,STORE STORE KEY IN ECB BUFFER : P LDR* A4,A15 RESTORE A4 h P CWK A7,1 $ P RF(E) AKB307 JUMP IF BASIC READ " PAKB214 NGR A2,A1 MAKE ECB CODE P LDR A4,A4 KEY FLAG P RF(
0x0bb4dc…0bb670 Dummy {f00=0x003b, f01=0x0190, f02=»D LENGTH=0 v PAKB220 ABL(E) AKB380 " PAKB225 LDR A3,A3 FIRTST RIME? . P RF(NE) AKB240 N0! T P LD A1,2,A8 BUFFER ADDRESS n P SUK A1,1 P ADR A1,A2 & PAKB230 SCR A3,A1 CLEAR ECB BUFFER P SUK A1,1 P SUK A2,1 P RB(NE
0x0bb670…0bb804 Dummy {f00=0x003b, f01=0x018e, f02=»NE) AKB250 N0! PAKB247 SCR A4,A1 YES! P LDK A1,OVMASK OVERFLOW SET 4 P RF ENDIX END I/O X . PAKB250 CW A1,DWTINQ,A6 SOMETHING IN QUEUE? r P RF(NE) AKB255 " P CF A5,STREG NOTHING IN QUEUE P IFT CTIMUT=1 * P LDR A1,A1 CHECK
0x0bb804…0bb998 Dummy {f00=0x003b, f01=0x0190, f02=» P RF AKB257 P XIF * PAKB255 CF A15,EOQUEU NEXT OUT POINTER " & P ST A1,DWTUTQ,A6 STORE NEW POINTER P PAKB257 EQU * z P LDR A4,A7 P SUK A4,2 P RF(NN) AKB310 ORDER 2 OR 3 P EJECT P* P* P* ORDER 1 BA
0x0bb998…0bbb2c Dummy {f00=0x003b, f01=0x018e, f02=» P XIF PAKB307 CW A3,4,A8 , P RF(E) AKB380 END I/O IF REQ=EFF LENGTH . P LD A2,DWTST,A6 MORE KEYS? ^ P ANK A2,/F P RB(NZ) AKB210 P RB AKB225 P EJECT P* P* P* 4 P* ORDER 2 OR 3 STANDARD AND
0x0bbb2c…0bbcc0 Dummy {f00=0x003b, f01=0x0190, f02=» PAKB310 EQU * " P LD A1,10,A8 KEY-TABLE ADDRESS P RF(Z) AKB360 NO KEY-TABLE B & P LCR A4,A1 KEY-TABLE LENGTH IN A4 d P ANK A4,/FF & P ADR A1,A4 LAST PLACE IN KEY-TABLE P ADK A1,1 PAKB355 SUK A4,1 , P RF(N) AKB360 KEY
0x0bbcc0…0bbe54 (1, 83) Opaque[0x194]
0x0bbe54…0bbfe8 # DirEnt {nam=»DRTP01«, typ=»SC«, f00=0x8226, f01=0x3ae1, f02=0x0778, f03=0x0002}
0x0bbe54…0bbfe8 IdxSect {
0x0bbe54…0bbfe8 f00 = 0x003b // 0xbbe54 @0x0
0x0bbe54…0bbfe8 f01 = 0x000e // 0xbbe56 @0x2
0x0bbe54…0bbfe8 gno = [ // 0xbbe58 @0x4
0x0bbe54…0bbfe8 [0x00]: C0x003b.0x3.0
0x0bbe54…0bbfe8 [0x01]: C0x003c.0x0.0
0x0bbe54…0bbfe8 [0x02]: C0x003c.0x1.0
0x0bbe54…0bbfe8 [0x03]: C0x003c.0x2.0
0x0bbe54…0bbfe8 [0x04]: C0x003c.0x3.0
0x0bbe54…0bbfe8 [0x05]: C0x003d.0x0.0
0x0bbe54…0bbfe8 [0x06]: C0x003d.0x1.0
0x0bbe54…0bbfe8 ]
0x0bbe54…0bbfe8 }
0x0bbfe8…0bc17c Dummy {f00=0x003b, f01=0x018e, f02=» 2 P IDENT DRTP01 REL 8.2 78-09-15 870105040820 P : P* B < P******************************************************* L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P* DRTP01 = DRIVER TELLER TERMINAL PRINTER P* P*
0x0bc17c…0bc310 Dummy {f00=0x003b, f01=0x0190, f02=» > P* THIS DRIVER HANDLES TELLER TERMINAL PRINTERS PTS 6221, 6 P* 6222 OR 6223 CONNECTED TO CPU VIA CHLT OR CHRT J P* P* 4 P* THIS DRIVER CONSISTS OF THE FOLLOWING PARTS: P* $ P* A C T P : ACTIVATION PART P*
0x0bc310…0bc4a4 Dummy {f00=0x003b, f01=0x0190, f02=»INS THE FOLLOWING SUBROUTINES: | P* & B P* P R B U F : GET CHARACTERS FROM ECB-BUFFER AND SEND THEM 0 P* v 6 P* B C D T B Y : CONVERT FROM BINARY TO DECIMAL P* D P* B U F C H R : SEND THE NUMBER OF CHARACTERS GIVEN IN FIRST
0x0bc4a4…0bc638 Dummy {f00=0x003b, f01=0x0190, f02=» ORDER 00 : TEST STATUS " P* ORDER 06 : WRITE JOURNAL " & P* ORDER 07 : WRITE TALLY ROLL H , P* ORDER 08 : WRITE VOUCHER/PASSBOOK r P* P* P* NORMAL REGISTER USAGE: P* " P* REGISTER A1: WORK REGISTER " P
0x0bc638…0bc7cc Dummy {f00=0x003b, f01=0x0190, f02=»TACK POINTER ~ P* A6: DWT-ADDRESS P* A7: ORDER 8 P* A8: ECB-ADDRESS V P* z P* P* SYSTEM ADAPTATION: P* D P* BY MEANS OF CONDITIONAL ASSEMBLY THE FOLLOWING FUNCTIONS CAN P* BE EXC
0x0bc7cc…0bc960 Dummy {f00=0x003b, f01=0x018e, f02=»L CHARACTER /13,/14 x P* P* & @ P* THE CHARACTER CODES FOR ROOMLESS POINT DIGITS IS DEFINED 0 > P* IN A TABLE NAMED ROMTAB.STANDARD IS SHB CHARACTER SET t P* P* P EJECT P* P*********** P* ENTRIES *
0x0bc960…0bcaf4 (1, 84) Dummy {f00=0x003c, f01=0x0190, f02=» P* , P EXTRN TDISP DISPATCHING FROM INTERRUPT $ P EXTRN DISIOE DISPATCH I/O ERROR B & P EXTRN DISEND END I/O AND DISPATCH j P EXTRN TENDIO END I/O & P EXTRN OUTPUT OUTPUT ONE CHARACTER " P EXTRN LDREG RESTORE REGISTERS 8 P EXTRN
0x0bcaf4…0bcc88 Dummy {f00=0x003c, f01=0x0190, f02=»LE DWT l P* P EXTRN DWTST STATUS WORD P EXTRN DWTECB ECB-ADDRESS 8 P EXTRN DWTOR ORDER Z P EJECT t P* P* P************* P* CONSTANTS * P************* P* P* . PCCERR EQU /4 RETURN CODE. CO
0x0bcc88…0bce1c Dummy {f00=0x003c, f01=0x0190, f02=»2 THROUGHPUT ERROR P* P* $ . PVOIN EQU /8 VOUCHER IN BIT IN DATA-REQUEST . 4 PEOJT EQU /4 END OF JOURNALTAPE BIT IN DATA-REQ. ` $ PSTX EQU /82 START OF TEXT BLOCK " PETB EQU /97 END OF TEXT BLOCK PETX EQU /03 LAST DUMMY P*
0x0bce1c…0bcfb0 Dummy {f00=0x003c, f01=0x0190, f02=»UNTER | PDWTSB2 EQU /1E STACK BASE ( PDWTRLN EQU /22 REQUESTED LINE NUMBER 0 & PDWTALN EQU /23 ACTUAL LINE NUMBER P* P EJECT P************************ P* CONDITIONAL ASSEMBLY * P************************ P* @ P
0x0bcfb0…0bd144 Dummy {f00=0x003c, f01=0x0190, f02=» P* : P* JOURNAL TAPE MAY BE CUT/PERFORATED FOR PTS 6223 BY P* SETTING X:B=1 P P* j PX:B EQU 0 t PCUTPER EQU X:B P* @ P* SPECIAL CHARACTER /13, /14 IS ACCEPTED BY SETTING X:C=1 P* AND X:D=1 RESPECTIVLY
0x0bd144…0bd2d8 Dummy {f00=0x003c, f01=0x0190, f02=»CHER/PASSBOOK,IS COMPLETED IF z : P* PRINT OBJECT IS REMOVED UNDER PRINTING IF X:E = 1 & P* d PX:E EQU 0 n PCOMPL EQU X:E P* 6 P* INDICATION OF RECOVERY EXECUTED ON REQUEST CAN 4 P* BE INCLUDED IN THE DRIVER BY SETTING X:F =
0x0bd2d8…0bd46c Dummy {f00=0x003c, f01=0x0190, f02=»S INACTIVE, END OF REQUEST WITH RETURN CODE NOT OPERABLE : P* CAN BE CHOSEN BY SETTING THE CONSTANT RECEND = 1 @ PX:G EQU 0 ~ PRECEND EQU X:G P EJECT P* P*********** P* BUFFERS * P*********** P* P*
0x0bd46c…0bd600 Dummy {f00=0x003c, f01=0x0190, f02=»S FOLLOWING ORDERS: * P* CR2,LIFT TO TOP,GRASP,LIFT TO TOP P* J P* T & PBUF4 DATA /0700,/2009,/0C1A,/830C ^ 0 PBUF5 DATA /030C,/1B83 LIFT TO TOP AND RELASE P* P* P* P********** P* TABLES * P**********
0x0bd600…0bd794 (1, 85) Dummy {f00=0x003c, f01=0x018e, f02=»A RCTP RECOVERY ROUTINE P* $ P* TABLE TO GET ROOMLESS POINT * P* R PROMTAB EQU * ( P DATA /2122,/2426,/3B3C,/3E40,/5E5F p P* ( P* TABLE TO GET ACTUAL LF-CHARACTER P* P* PLFTAB EQU * , P DATA /1819 LI
0x0bd794…0bd928 Dummy {f00=0x003c, f01=0x0190, f02=» P* PHPTAB EQU * P DATA /0D09 & P DATA /0009 : P DATA /0D00 N P* b P* l P IFT CUTPER=1 v : PCPTAB DATA /1F0F CODES FOR PERFORATE/CUT JOURNAL TAPE P XIF P EJECT P* P* P* A C T P
0x0bd928…0bdabc Dummy {f00=0x003c, f01=0x0190, f02=» P* P* PACTP EQU * ACTIVATION ENTRY P* @ P* J P LDR A7,A7 ORDER /00 ? T P RF(Z) TPDUMY YES r PACTP01 LDR A4,A7 GET ORDER P SUK A4,8 CHECK ORDER P RF(P) ACT020 ILLEGAL ORDER P RF(E) ACT010 ORDER 08
0x0bdabc…0bdc50 Dummy {f00=0x003c, f01=0x0190, f02=» XIF $ PACT020 ABL DISIOE ILLEGAL ORDER P EJECT 4 P* B P* L * P* ORDER 08 : WRITE VOUCHER/PASSBOOK V < P* GET REQUESTED LINE NUMBER AND SAVE IN DWT P* P* $ PACT010 LD A1,2,A8 BUFFER ADDRESS " P LCR A4,
0x0bdc50…0bdde4 Dummy {f00=0x003c, f01=0x0190, f02=»ADE | " P ORR A1,A4 DECIMAL LINE NUMBER $ P CF A5,BCDTBY CONVERT TO BINARY 2 P LDR A3,A1 Z " P LD A2,10,A8 GET CONTROL WORD l 0 P SLL A2,3 LINE NUMBER RELATIVE OR ABSOLUTE ? P RF(NN) ACT018 ABSOLUTE $ P LC A3,DWTRLN,A6 GET LINE NUMBER
0x0bdde4…0bdf78 Dummy {f00=0x003c, f01=0x0190, f02=») ACT018 P LDK A3,0 P RF ACT018 " P* 4 P* > PACT015 ADR A3,A1 LIFT DOWN H P* j P* t < PACT018 SC A3,DWTRLN,A6 SAVE REQUESTED LINE NUMBER IN DWT ~ P EJECT PTP100 EQU * P LDK A2,0 & P SC A2,DWTBC,A6 RESET
0x0bdf78…0be10c Dummy {f00=0x003c, f01=0x0190, f02=»DERS 06 AND 07. P* PTP110 EQU * " $ P LD A3,4,A8 GET REQUESTED LENGTH 6 P LDR A4,A7 SAVE ORDER IN A4 ^ P RF(Z) TPDUMY ORDER /00 0 P LC A1,DWTST,A6 GET LEFT BYTE IN STATUS WORD P SUK A4,8 ORDER 08 ? , P RF(Z) TP600 YES GO TO
0x0be10c…0be2a0 Dummy {f00=0x003c, f01=0x0190, f02=» SEND LINE FEED DIRECT P* P* ( P IFT ORD7=1 2 P SUK A7,7 ORDER 07 F 0 P RF(Z) TP400 GO TO ORDER PROCESSING ORDER 07 ` & P ELSE ORDER PROCESSING ORDER 06 P XIF P EJECT P* P* P* P* ORDER 06 : PRI
0x0be2a0…0be434 (1, 86) Dummy {f00=0x003c, f01=0x0190, f02=»,PRBUF PRINT ECB-BUFFER P EJECT P* . P* 8 ( P* SEND LINE FEED ORDERS 06 AND 07 B P* n PTPLF EQU * x " P LDK A2,/1E DETACH PRINT HEAD P CF A5,OUTPUT PTPLF10 EQU * P* 6 P* POSITION PRINT HEAD ACCORDING TO
0x0be434…0be5c8 Dummy {f00=0x003c, f01=0x0190, f02=»FFECTIVE LENGTH ~ " P LD A1,10,A8 GET CONTROL WORD " P SRL A1,14 HP-PARAMETER IN A1 > P SUK A7,6 ORDER 06 ? d P RF(Z) TPHP10 YES P ADK A1,3 NO MODIFY INDEX , PTPHP10 LC A2,HPTAB,A1 LOAD CR-CHARACTER P CF A5,OUTPUT AND SEND IT
0x0be5c8…0be75c Dummy {f00=0x003c, f01=0x0190, f02=»FTAB,A7 GET LF CHARACTER P CF A5,OUTPUT AND SEND IT P EJECT B PTPHP20 EQU * P P* d P IFT CUTPER=1 n " P LD A1,10,A8 GET CONTROL WORD P ECR A1,A1 P ANK A1,3 CUT/PERFORATE ? & P RF(Z) TPDUMY POSITION PRINT HEAD , P
0x0be75c…0be8f0 Dummy {f00=0x003c, f01=0x0190, f02=»INT | P* P* " P* SEND LAST DUMMY CHARACTER P* F PTPDUMY EQU * P $ P LDK A2,ETX END OF TEXT MESSAGE d P CF A5,OUTPUT P EJECT P* P* 0 P* CHECK STATUS AFTER LAST DUMMY CHARACTER P* PTPTST
0x0be8f0…0bea84 Dummy {f00=0x003c, f01=0x0190, f02=»ST010 NO $ P ORKL A1,VOCHIN SET RETURN CODE , PTST010 ANK A2,EOJT END OF JOURNAL TAPE ? 8 " P RF(NZ) ENDIO NO PERFORM ENDIO h , P ORK A1,PROUT SET RETURN CODE PAPER OUT P* P* , P* PERFORM END I/O AND GO TO DISPATCHER P*
0x0bea84…0bec18 Dummy {f00=0x003c, f01=0x0190, f02=» P EJECT P* P* P* & $ P* ORDER 07 : PRINT TALLY ROLL 0 P* X P* b P* l " PTP400 ANK A2,VOIN VOUCHER IN ? v P RF(Z) TP410 NO ( PTP405 CF A5,RELEAS ERROR. VOUCHER IN P* PTP410 EQU * P LDKL A1,/
0x0bec18…0bedac Dummy {f00=0x003c, f01=0x0190, f02=» RB TP210 P* P* P* & P XIF 0 P EJECT < P* J P* T P* ^ * P* ORDER 08 : PRINT VOUCHER PASSBOOK h P* P* P* PTP600 EQU * P ANK A1,/4 & P RF(NE) TP700 TEXT ALREADY PRINTED P LDK
0x0bedac…0bef40 Dummy {f00=0x003c, f01=0x0190, f02=»NO $ P SUK A3,2 REQUESTED LENGTH = 2 ? P RF(Z) TP710 YES RELEASE 2 PTP602 EQU * R P ANK A2,VOIN VOUCHER IN ? f P RF(Z) TP605 NO P SLL A1,1 DISPLACEMENT P RF(N) TP610 YES PTP605 LDKL A3,BUF4 P CF A5,BUFCHR SEND
0x0bef40…0bf0d4 (1, 87) Dummy {f00=0x003c, f01=0x0190, f02=» REQUESTED P* 0 PTP610 LC A3,DWTALN,A6 GET ACTUAL LINE NUMBER " P ANK A3,/FF ACTUAL LINE NUMBER P . PTP620 CC A3,DWTRLN,A6 COMPARE LINE NUMBERS v P RF(E) TP650 EQUEAL " P RF(G) TP630 SEND ELEVATOR UP P* " P LDK A2,/0B SEND ELE
0x0bf0d4…0bf268 Dummy {f00=0x003c, f01=0x0190, f02=»P t * P SUK A3,1 DECREMENT ACTUAL LUNE NUMBER P* 8 P* B & PTP640 CF A5,OUTPUT SEND LIFT CHAR. L , P SC A3,DWTALN,A6 SAVE ACTUAL LINE NUMBER v P ANK A2,VOIN VOUCHER IN ? P IFT COMPL=0 " P ABL(Z) RCTP01 ERROR. RECOVERY & P RB TP
0x0bf268…0bf3fc Dummy {f00=0x003c, f01=0x0190, f02=»T VOUCHER OUT/SHOULD BE IN ~ ( P ORS A1,8,A8 INDICATE IN RETURN CODE " P RB TPDUMY N P XIF ` P EJECT l P* z " P* ORDER 08: ATTACH AND PRINT PTP650 EQU * $ P LDK A2,0 SEND DUMMY TO LET THE P CF A5,OUTPUT LIFT SETTLE $ P
0x0bf3fc…0bf590 Dummy {f00=0x003c, f01=0x0190, f02=»START OF MESSAGE " P LD A3,2,A8 GET BUFFER ADDRESS ! P ADK A3,2 ! > " P LCR A1,A3 GET FIRST CHARACTER ! P P CCK A1,/1111 TABULATION ? ! v P RF(E) TP690 ! P LDK A2,/1D ATTACH ! P CF A5,OUTPUT SEND ! PTP690 EQU * ! P IFT CUTPER=1 !
0x0bf590…0bf724 Dummy {f00=0x003c, f01=0x0190, f02=»STATUS CHANGE NOT ALLOWED ! n " P CF A5,PRBUF PRINT ECB-BUFFER " " P EJECT " H P* " V $ P* ORDER 08: RETURN AFTER PRINT " ` P* " PTP700 EQU * " " P LD A1,10,A8 GET CONTROL WORD " P SLL A1,2 RELEASE ? " P RF(NN) TP715 " PTP710 EQU
0x0bf724…0bf8b8 Dummy {f00=0x003c, f01=0x0190, f02=»SEND CHARACTERS FROM ECB-BUFFER UNTIL REQUESTED " ~ P* LENGTH IS REACHED # 8 P* # V P* # ` * PPRBUF LD A4,4,A8 GET REQUESTED LENGTH # j & P SUK A4,2 ADJUST REQUESTED LENGTH # P LD A3,2,A8 BUFFER ADDRESS # P ADK A3,2 # " PPRB010 LCR A1,A3 G
0x0bf8b8…0bfa4c Dummy {f00=0x003c, f01=0x0190, f02=»CHARACTER # | P* $ P* $ . PPRB100 SUK A4,1 DECREMENT REQUESTED LENGTH $ & P RF(NN) PRB105 PRINT BUFFER $ X P LDK A2,ETB $ | & P CF A5,OUTPUT SEND END OF MESSAGE $ P LDK A2,ETX $ 6 P CF A5,OUTPUT WAIT FOR WHOLE BUFFER TO BE PRINTED $ * P
0x0bfa4c…0bfbe0 Dummy {f00=0x003c, f01=0x0190, f02=»A6 $ PPRB102 RTN A5 % P EJECT % P* % . P* % 8 P* % B P* PRINT BUFFER % L P* % d P* % n PPRB105 EQU * % x 2 P ADR A3,A4 ADDRESS TO CHARACTER TO BE PRINTED % P SUK A7,7 CHECK ORDER % P RF(L) PRB200 PRINT JOURNAL % P RF(
0x0bfbe0…0bfd74 (1, 88) Dummy {f00=0x003d, f01=0x018e, f02=» % P* & P ANK A2,VOIN VOUCHER IN ? & " P RF(Z) PRB200 NO. GO AND PRINT & 4 " P ADK A5,4 RESET STACK POINTER & Z * P ABL TP400 SEND LIFT TO TOP AND RELEAS & P* & P XIF & P* & P* & P* PRINT VOUCHER/PASSBOOK & P* & P* &
0x0bfd74…0bff08 Dummy {f00=0x003d, f01=0x0190, f02=» & P RB(Z) TP645 ' P XIF ' P LDK A1,/11 ' ( P CCR A1,A3 TABULATION? ' < P RF(NE) PRB200 NO ' Z P* ' t P EJECT ' ~ P* ' P* ' 4 P* IF TABULATION CHARACTER: DETACH PRINT HEAD, ' < P* SEND CHARACTERS UNTIL TABULATION POSITION IS
0x0bff08…0c009c Dummy {f00=0x003d, f01=0x0190, f02=»ACH ' z ( PPRB117 LD A1,10,A8 GET CONTROL WORD ( P ANK A1,/FF ( 8 $ P CF A5,BCDTBY CONVERT TO BINARY ( L . PPRB120 IM DWTBC,A6 INCREMENT BYTE COUNTER ( t 2 P CC A1,DWTBC,A6 COMPARE WITH ACTUAL TAB. POS. ( P RF(NG) PRB125 PRINT ( P* ( P* (
0x0c009c…0c0230 Dummy {f00=0x003d, f01=0x0190, f02=»PRB125 LDK A2,/1D ATTACH ( P RF PRB240 SEND ATTACH ) P EJECT ) > P* ) L P* ) V P* ) ` 2 P* GET OUTPUT CHARACTER FROM BUFFER. CHECK IF ) j , P* ILLEGAL CHARACTER OR ROOMLESS POINT ) P* ) P* ) P* ) PPRB200 EQU * ) * PPRB205
0x0c0230…0c03c4 Dummy {f00=0x003d, f01=0x0190, f02=»ER ) p P SUK A4,1 * $ P LCR A7,A3 GET OUTPUT CHARACTER * P ANK A7,/F MASK * D & P LC A7,ROMTAB,A7 GET CODE IN TABLE * P* * P* * P* * , PPRB210 CCK A7,/2020 ILLEGAL CHARACTER ? * P RF(L) PRB220 YES * , PPRB215 CCK A7,/5F5F ILLEGA
0x0c03c4…0c0558 Dummy {f00=0x003d, f01=0x018e, f02=»ACTER ? * v P RF(E) PRB230 YES + P XIF + * P IFT FJOTON=1 + 6 & P CCK A7,/1414 SPECIAL CHARACTER ? + L P RF(E) PRB230 YES + v P XIF + " P LDK A1,CCERR CODE CHECK ERROR + & P ORS A1,8,A8 STORE IN RETURN CODE + P LD A7,DWTOR,A6 GET ORDER +
0x0c0558…0c06ec Dummy {f00=0x003d, f01=0x0190, f02=» + d $ P LDR A2,A7 GET OUTPUT CHARACTER , & PPRB240 CF A5,OUTPUT SEND CHARACTER , 0 & P SUR A3,A4 START OF BUFFER ADDRESS , Z P RB PRB100 , P* , P* , P* , P EJECT , P* , P* I H T P , P* , 0 P* INTERRUPT HANDLER: PROCESS
0x0c06ec…0c0880 Dummy {f00=0x003d, f01=0x0190, f02=»7,A7 ORDER 0 ? , P RF(Z) IHTP20 - , P LDR A1,A1 RETURN CODE FROM CHANNEL UNIT - , 8 PIHTP10 ABL(Z) LDREG NO RETURN CODE RESTORE REGISTERS - P IFT RECEND=0 - $ P RF RCTP10 ELSE GO TO DISPATCHER - P XIF - P IFT RECEND=1 - P RF IHTP30 -
0x0c0880…0c0a14 (1, 89) Dummy {f00=0x003d, f01=0x0190, f02=»* - P* R C T P . P* . 6 P* RECOVERY ROUTINE: REPRINTS RUNNING REQUEST AT . ( " P* POWER UP . b & PRCTP CF A15,SAVE8 SAVE REG. A1-A8 . P LD A2,DWTST,A6 GET STATUS . P RF(N) RCTP05 NOT BUSY . PRCTP01 EQU * . P*
0x0c0a14…0c0ba8 Dummy {f00=0x003d, f01=0x0190, f02=»A5,OUTPUT SEND DUMMY . PRCTP05 EQU * / P LDK A2,0 / 0 2 P SC A2,DWTALN,A6 STORE 0 AS ACTUAL LINE NUMBER / B P LDK A2,/0C LIFT TO TOP / x P CF A5,OUTPUT / P IFT COMPL=1 / P* / P LDR A4,A4 STATUS CHANGE ? / P ABL(NE) TP645 / P XIF
0x0c0ba8…0c0d3c Dummy {f00=0x003d, f01=0x0190, f02=»T DUMMY CHARACTER / | & PRCTP10 ABL TDISP GO TO DISPATCHER 0 P EJECT 0 D P* 0 R P* B C D T B Y 0 P* 0 t 4 P* SUBROUTINE TO CONVERT TO BINARY FROM DECIMAL 0 ~ P* 0 P* 0 P* 0 . PBCDTBY LDR A2,A1 PUT DECIMAL NUMBER IJ A2 0 PBC
0x0c0d3c…0c0ed0 Dummy {f00=0x003d, f01=0x0190, f02=» P* 1 P* 1 P* 1 P EJECT 1 " P* 1 0 P* 1 : P* R E L E A S 1 D P* 1 2 P* SUBROUTINE TO SEND LIFT TO TOP AND RELEASE 1 f P* 1 P* 1 P* 1 PRELEAS EQU * 1 P LDK A1,0 1 < P ST A1,DWTRLN,A6 SET ACTUAL AND REQ. LIN
0x0c0ed0…0c1064 Dummy {f00=0x003d, f01=0x0190, f02=» A NUMBER OF CHARACTERS GIVEN IN 1 x ( P* FIRST CHARACTER IN OUTPUT BUFFER 2 ( P* 2 T P* 2 ^ 4 PBUFCHR LCR A4,A3 GET NUMBER OF OUTPUT CHARACTERS 2 h P ANK A4,/FF MASK 2 , PBUFC10 ADK A3,1 INCREMENT BUFFER POINTER 2 $ P LCR A2,A3 GET OUTPUT CHARACTER
0x0c1064…0c11f8 Dummy {f00=0x003d, f01=0x405e, f02=» TO CALLER 2 P* 3 P* 3 P* 3 & P* 3 0 P* 3 : P* 3 D P END 3 N@ 3 Z* 2 ^ 4 PBUFCHR LCR A4,A3 GET NUMBER OF OUTPUT CHARACTERS 2 h P ANK A4,/FF MASK 2 , PBUFC10 ADK A3,1 INCREMENT BUFFER POINTER 2 $ P LCR A2,A3 GET OUTPUT CHARACTER
0x0c11f8…0c138c Dummy {f00=0x003d, f01=0x2008, f02=» 4 P* 2 P* 2 P* 2 " P* 2 , P* 2 6 P END 2 @@ 2 L 1 N 4 PBUFCHR LCR A4,A3 GET NUMBER OF OUTPUT CHARACTERS 1 X P ANK A4,/FF MASK 1 , PBUFC10 ADK A3,1 INCREMENT BUFFER POINTER 1 $ P LCR A2,A3 GET OUTPUT CHARACTER 1 P CF A5,O
0x0c138c…0c1520 Dummy {f00=0x003d, f01=0x0190, f02=»TB:SP TTB:SA TTB:TDK * , 6DW1501 DW1501 DC15AD MONTAB MONTAB TC:TAB TCTAB CD:TAB CDTAB BLOK:S BLOCKS INTLT1 INTLT2 INTLT3 INTLT4 INTRT1 INTRT
0x0c1520…0c16b4 (1, 90) Opaque[0x194]
0x0c16b4…0c1848 # DirEnt {nam=»DRMT01«, typ=»SC«, f00=0x5600, f01=0x1908, f02=0x07b0, f03=0x1502}
0x0c16b4…0c1848 IdxSect {
0x0c16b4…0c1848 f00 = 0x003d // 0xc16b4 @0x0
0x0c16b4…0c1848 f01 = 0x000e // 0xc16b6 @0x2
0x0c16b4…0c1848 gno = [ // 0xc16b8 @0x4
0x0c16b4…0c1848 [0x00]: C0x003d.0x2.0
0x0c16b4…0c1848 [0x01]: C0x003d.0x3.0
0x0c16b4…0c1848 [0x02]: C0x003e.0x0.0
0x0c16b4…0c1848 [0x03]: C0x003e.0x1.0
0x0c16b4…0c1848 [0x04]: C0x003e.0x2.0
0x0c16b4…0c1848 [0x05]: C0x003e.0x3.0
0x0c16b4…0c1848 [0x06]: C0x003f.0x0.0
0x0c16b4…0c1848 ]
0x0c16b4…0c1848 }
0x0c1848…0c19dc Dummy {f00=0x003d, f01=0x018e, f02=» 2 P IDENT DRMT01 REL 8.2 78-09-15 870105040820 P : P* B : P***************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 4 P* DRMT01 = DRIVER 1/2 " MAGNETIC TAPE RECORDER P* P
0x0c19dc…0c1b70 Dummy {f00=0x003d, f01=0x0190, f02=» > P* THIS DRIVER HANDLES EIGHT 1/2 " MAGNETIC TAPE RECORDERS @ P* CONNECTED TO CPU VIA IOP AND CHMT ON MULTIPLEXED CHANNEL. J P* P* : P* ONLY ONE RECORDER CAN BE WORKING AT A TIME EXCEPT AT P* UNLOAD. P* P* < P*
0x0c1b70…0c1d04 Dummy {f00=0x003d, f01=0x0190, f02=»K SEQUENCE NUMBER. P* P* $ P . P 6 P > P EJECT F P T 2 P* THE DRIVER CONSISTS OF THE FOLLOWING PARTS: P* " P* M T D A ACTIVATION ROUTINE P* $ P* O R D E R P R O C E S S O R S P* $ P* C O M M
0x0c1d04…0c1e98 Dummy {f00=0x003d, f01=0x0190, f02=» $ P* D W M T 0 1 DEVICE WORK TABLE P* 0 P* : P* D P* ORDERS TREATED: N P* h & P* /00 TEST STATUS /33 STEP REVERSE r P* /02 READ /34 STEP FORWARD P* /05 WRITE /37 LOAD P* /06 WRITE /38 UNLOAD & P* /22 WRITE TA
0x0c1e98…0c202c Dummy {f00=0x003d, f01=0x0190, f02=»RE ERROR P* 2: REWINDING 10: EOT & P* 3: TAPE MARK 11: SEQUENCE ERROR 0 P* Z & P* 4: NO DATA 12: INCORRECT LENGTH d P* 5: BOT 13: DATA ERROR . P* 6: WRITE PROTECTED 14: THROUGPUT ERROR P* 7: 15: NOT OPERABLE P EJECT
0x0c202c…0c21c0 Dummy {f00=0x003d, f01=0x0190, f02=»E r $ P ENTRY MTDRON POWER ON RECOVERY P 2 P : P B P* J P* EXTERNALS T P* h P EXTRN TDISP DISPATCHER r $ P EXTRN DISEND DISPATCER END I/O * P EXTRN DISIOE DISPATCHER I/O REQ ERROR $ P EXTRN SAVE8 SAVE A1-A8 AND INH
0x0c21c0…0c2354 (1, 91) Dummy {f00=0x003d, f01=0x0190, f02=»ADDRESS z $ P EXTRN ECBBA ECB BUFFER ADDRESS & P EXTRN ECBRL ECB REQUESTED LENGTH 8 & P EXTRN ECBEL ECB EFFECTIVE LENGTH b " P EXTRN ECBCW ECB CONTROL WORD * P EXTRN INTSAV SAVE AREA LAST INTERRUPT $ P EXTRN HALT MONITOR HALT ROUTINE P
0x0c2354…0c24e8 Dummy {f00=0x003d, f01=0x018e, f02=»REWIND TIME OUT IN 2 SEC STEPS 0 PMTPTOT EQU 10 POWER FAIL TIME OUT IN 100 MS & 6 PMTRBLK EQU 40 NO OF BLOCKS TO REVERSE AT POWER ON Z P P P P P P* P* HARDWARE ADDRESSES P* P PCHMT EQU /0C CHMT AD
0x0c24e8…0c267c Dummy {f00=0x003d, f01=0x0190, f02=» P EJECT P P* 6 P* MTDA ACTIVATION PART. ENTERED AFTER LKM-REQUEST. $ 2 P* THE VALIDITY OF THE ORDER IS CHECKED AND A ^ . P* BRANCH TO THE ORDER PROCESSOR IS MADE. P* P* ENTRY: P* P* A5: DWTSB2 P* A6: D
0x0c267c…0c2810 Dummy {f00=0x003d, f01=0x0190, f02=»R SELECT ~ & P* A2: ACT CHANNEL STATUS ADDRESS P* A3: REQUESTED LENGTH : P* A4: BUFFER ADDRESS Z P* A5: STACK POINTER x P* A6: DWT ADDRESS P* A7: MAX NO OF RETRIES P* A8: ECB ADDRESS P* P PMTDA INH &
0x0c2810…0c29a4 Dummy {f00=0x003d, f01=0x0190, f02=») MTDA10 TRY NEXT P $ PMTDA20 ABL DISIOE ILLEGAL ORDER " P J PMTDA30 ADR A4,A4 R P ADKL A4,MTORD-2 j , P ST A4,MTREQ SAVE ADDRESS TO ORDER PNTR P , PMTDA40 LC A2,DWTOR,A6 GET CHANNEL NUMBER P ANK A2,/7 MASK JUST IN CASE
0x0c29a4…0c2b38 Dummy {f00=0x003d, f01=0x0190, f02=»HIS ORDER REQUIRE LENGTH | P RF(NL) MTDA60 NO P : ( P LD A3,ECBRL,A8 GET REQUESTED LENGTH B $ P LD A4,2,A2 CHECK IF SEQ NUMBERS n P RF(N) MTDA50 NO P ADK A3,2 YES ADJUST LENGTH & PMTDA50 LDR A4,A3 CHECK REQ LENGTH P SRL A4,1
0x0c2b38…0c2ccc Dummy {f00=0x003d, f01=0x0190, f02=»,ECBBA,A8 GET BUFFER ADDRESS P $ , P CWR* A2,A6 CHECK IF CH ALREADY SELECTED , P RF(E) MTDA70 YES P CF A5,SELC SELECT CHANNEL v ( PMTDA70 CM MTEOT CLEAR EOT INDICATOR ( P LDK A7,MTRTRY GET MAX NO OF RERIES & P ABI* MTREQ GO TO ORDER
0x0c2ccc…0c2e60 Dummy {f00=0x003d, f01=0x0190, f02=»TUS ADDRESS z P* A3: REQUESTED LENGTH P* A4: BUFFER ADDRESS 4 P* A5: STACK POINTER R P* A6: DWT ADDRESS n P* A7: MAX NO OF RETRIES P* A8: ECB ADDRESS P* P* EXIT: ABL DISEND P* P* A1: STATUS P
0x0c2e60…0c2ff4 (1, 92) Dummy {f00=0x003e, f01=0x0190, f02=» P P P P P* ( P* TEST STATUS /00 2 P* L P V , PTEST LC A7,DWTOR,A6 SELECT TO GET STATUS ^ P ANK A7,/7 P CF A5,SELC P ABL ENDIO8 P EJECT P P* P* READ /02 P* P
0x0c2ff4…0c3188 Dummy {f00=0x003e, f01=0x0190, f02=»IO4 NO MORE RETRIES P CF A5,SKPR SKIP REVERSE P RB READ TRY AGAIN < P V ( PREAD10 LDR A5,A1 CHECK IF TAPE MARK ^ P SLC A5,3 P RF(N) ENDIO1 TAPE MARK , P RER A5,MTIOPA GET ADDRESS TO SEQ NUMBER P SUK A5,1 P LDR* A3,A
0x0c3188…0c331c Dummy {f00=0x003e, f01=0x0190, f02=» $ P RF(E) ENDIO1 BOTH SEQ CHARS OK P 0 $ PREAD20 LD A5,2,A2 CHECK SEQ MODE 8 P RF(N) ENDIO1 NO SEQ NUMBERS ` $ P ORK A1,/0010 INDICATE SEQ ERROR P RF ENDIO1 P EJECT P P P* P* WRITE /05,/06 P* P
0x0c331c…0c34b0 Dummy {f00=0x003e, f01=0x018e, f02=»DR TO SEQ NUMBER ~ P ADR A8,A3 " P SC A1,-1,A8 STORE SEQ NUMBER * P ECR A1,A1 P P SC A1,-2,A8 b P v P ~ " PWRIT10 CF A5,WBLK WRITE BLOCK P RF(0) ENDIO1 STATUS,DATA OK P RF(1) ENDIO2 ILL STATUS P CF A5,SKPR SKIP REVERSE
0x0c34b0…0c3644 Dummy {f00=0x003e, f01=0x0190, f02=» P RB WRIT10 TRY AGAIN P EJECT $ P 2 P : P* B P* WRITE TAPE MARK /22 L P* j P t PWRTM CF A5,WTMK | P RF(1) ENDIO4 ILL STATUS P LDR A3,A1 $ P SLC A3,3 CHECK IF TAPE MARK OK P RF(NN) WRTM10 NOT TAPE MA
0x0c3644…0c37d8 Dummy {f00=0x003e, f01=0x0190, f02=»UK A7,1 " P RF(N) ENDIO4 NO MORE RETRIES P ANK A1,/20 SAVE EOT 6 P ORS A1,MTEOT R P RB WRTM TRY AGAIN h P P P* P* LOAD /37 P* P PLOAD LD A1,ECBCW,A8 P SRC A1,1 P ST A1,2,A2 SET SEQ MODE
0x0c37d8…0c396c Dummy {f00=0x003e, f01=0x0190, f02=» A2 CLEAR SEQ COUNTER $ P CF A5,SBOW SEARCH BOT AND WAIT P RF ENDIO6 F P X P ` P* h P* UNLOAD /38 r P* P " PUNLD CMR A2 CLEAR SEQ COUNTER P CF A5,SBOT SEARCH BOT P CF A5,OFLI SET OFF-LINE P RF ENDIO7
0x0c396c…0c3b00 Dummy {f00=0x003e, f01=0x0190, f02=»ILL STATUS | P LDKL A3,-1 P ADRS A3,A2 DECR SEQ COUNTER & P LDR A3,A1 J P SLC A3,5 CHECK IF BOT P RF(NN) ENDIO6 NOT BOT z P RB RWND BOT P P P* P* STEP FORWARD /34 P* P PSTPF CF A5,SKPF SKIP
0x0c3b00…0c3c94 (1, 93) Dummy {f00=0x003e, f01=0x0190, f02=» P* RECOVER /3F P* P ( PRECV CF A5,MTRC RECOVER 0 P RF ENDIO8 P P EJECT b P* p . P* ENDIO COMMON EXITS FOR ORDER PROCESSORS z P* P " PENDIO1 IMR A2 INCR SEQ COUNTER P 0 PENDIO2 RER A3,MTIOPA GET NEX
0x0c3c94…0c3e28 Dummy {f00=0x003e, f01=0x0190, f02=»ST LENGTH ~ * P ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH P @ PENDIO4 LDK A4,MTRTRY H P SUR A4,A7 GET NO OF RETRIES d P 0 PENDIO5 ST A4,ECBCW,A8 STORE IN CONTROL WORD P PENDIO6 LDR A7,A1 P SRC A7,1 2 P RF(N) CKPWF NOT O
0x0c3e28…0c3fbc Dummy {f00=0x003e, f01=0x0190, f02=»DICATOR v P ORS A1,2,A2 SAVE STATUS P 0 . PENDIO8 CM MTREQ INDICATE NO RUNNING ORDER 8 4 P ABL DISEND PERFORM TENDIO AND GO TO DISPATCHER j P EJECT P P* 2 P* THE THING WAS NOT OPERABLE, CHECK IF A POWER P* FAIL IS COMING
0x0c3fbc…0c4150 Dummy {f00=0x003e, f01=0x0190, f02=»A4,MTTIM & P CF A15,SETIMP WAIT FOR POWER FAIL P DATA CKPWF1,MTPTOT : P ABL TDISP V P h & PCKPWF1 LDR A6,A1 RESTORE REGISTERS p P LD A1,MTSA7 P LD A2,MTSA2 P CM MTTIM INDICATE NO TIMER P RB ENDIO8 P EJECT P
0x0c4150…0c42e4 Dummy {f00=0x003e, f01=0x0190, f02=»EXIT: P* P* A1: STATUS AFTER COMMAND P* A2: RESTORED < P* A6: DWT ADDRESS T P* A7: RESTORED n P* A8: ECB ADDRESS P* P * PSBOW LDKL A1,-MTRTOT-1 SET UP TIME OUT P ST A1,MTCTR P PSBOW10 CF A5
0x0c42e4…0c4478 Dummy {f00=0x003e, f01=0x0190, f02=»TURN P & PSBOW30 IM MTCTR CHECK IF TIME OUT & P RB(Z) SBOW20 DON'T WAIT ANY MORE > P ST A5,MTSA5 SAVE REGISTER h P LDR A1,A6 P LDKL A4,MTTIM " P CF A15,SETIMP WAIT 2 SECONDS P DATA SBOW40,20 P ABL TDISP P ,
0x0c4478…0c460c Dummy {f00=0x003e, f01=0x0190, f02=»M INDICATE NO TIMER $ P RB SBOW10 GO BACK AND TRY AGAIN P EJECT D P R P* Z P* COMMAND HANDLERS d P* ~ P* ENTRY: CF A5,<COM> P* * P* A2: IF SELC: ACTIVE CHANNEL ADDRESS ( P* A3: IF RBLK,WBLK: REQUSTED LENGTH
0x0c460c…0c47a0 Dummy {f00=0x003e, f01=0x0190, f02=»TN A5 P* P* A1: STATUS AFTER COMMAND P* A2: RESTORED < " P* A3: REQUESTED LENGTH IN ECB T P* A4: BUFFER ADDRESS IN ECB z P* A6: DWT ADDRESS P* A7: RESTORED P* A8: ECB ADDRESS P* , P* CR: =0: NOT ILL
0x0c47a0…0c4934 (1, 94) Dummy {f00=0x003e, f01=0x018e, f02=» ERR,THRUPUT ERR ^ P* P " P * PRBLK LDK A1,/02 READ BLOCK 2 . PRBLK10 WER A3,MTIOPL GIVE REQUESTED LENGTH T , P WER A4,MTIOPA AND BUFFER ADDRESS TO IOP P RF COMM P PWBLK LDK A1,/00 WRITE BLOCK . PWBLK10 ORKL A3,/4000 I
0x0c4934…0c4ac8 Dummy {f00=0x003e, f01=0x0190, f02=» v P RF COMM P PSBOT LDK A1,/41 SEARCH BOT P RF COMM B P R PONLI LDK A1,/51 SET ON-LINE Z P RF COMM ~ P POFLI LDK A1,/40 SET OFF-LINE P RF COMM P PSKPR LDK A1,/21 SKIP REVERSE P RF COMM P
0x0c4ac8…0c4c5c Dummy {f00=0x003e, f01=0x0190, f02=»R SEQ NO v P LDKL A4,MTBUF P RB RBLK10 & P 8 " PSELC LDK A1,/60 SELECT CHANNEL @ P ORR A1,A7 f " P STR A2,A6 SAVE ACTIVE CHANNEL x P " PCOMM CM MTINT IND INT ALLOWED P CIO A1,1,CHMT P RF(A) COMM10 P RF(3) COMM05 NO
0x0c4c5c…0c4df0 Dummy {f00=0x003e, f01=0x0190, f02=» ADK A5,4 P LDK A1,1 NOT OPERABLE ! P ABR* A5 ! 0 & PCOMM10 ST A2,MTSA2 SAVE REGISTERS ! @ P ST A5,MTSA5 ! j P ST A7,MTSA7 ! ~ P ABL TDISP GO TO DISPATCHER ! P EJECT ! P ! P* ! " P* IHMT INTERRUPT HANDLER CHMT ! P* ! P !
0x0c4df0…0c4f84 Dummy {f00=0x003e, f01=0x0190, f02=»9 PARAMETER ! P CF A15,HALT SST NOT ACC. " PIHMT10 C1S MTINT " 6 P RF(NZ) IHMT20 " N * P LDK A1,5 ILLEGAL INTERRUPT PARAMETER " d P CF A15,HALT " P " * PIHMT20 LDKL A6,DWMT01 GET DWT ADDRESS " $ P LD A8,DWTECB,A6 GET ECB ADDRESS " & P LD
0x0c4f84…0c5118 Dummy {f00=0x003e, f01=0x0190, f02=»0 STATUS,DATA OK " P LDK A2,/40 # P SUKL A3,/806 # , P TM A1,A3 # B P RF(NZ) IHMT30 ILL STATUS # T P LDK A2,/80 ILL DATA # v P # PIHMT30 SLC A2,2 # P ST A2,2,A5 UPDATE CR # " P LD A2,MTSA2 RESTORE REGISTERS # P LD A3,ECBRL,A8 #
0x0c5118…0c52ac Dummy {f00=0x003e, f01=0x0190, f02=»TSA7 # P RTN A5 $ P EJECT $ P $ * P* $ 2 ( P* MTDRON ENTRY AT POWER ON RECOVERY $ < P* $ h P $ r PMTDRON CF A15,SAVE8 $ z P LDKL A6,DWMT01 $ P CM DWTST,A6 SET BUSY DWT $ " P CMR A6 IND NO ACTIVE CHANNEL $ " P LD A4,MTTIM CHECK
0x0c52ac…0c5440 Dummy {f00=0x003e, f01=0x0190, f02=»HECK IF PWF TIMER ON $ | P RF(NZ) MTON10 YES % P LDKL A4,MTPWF % 6 P CF A15,SETIMP NO START IT % L P DATA MTON20,MTPTOT % n P % . PMTON10 LDKL A3,-MTPTOT WAIT FOR EVERYTHING % P STR A3,A4 % P ABL TDISP % P % $ PMTON20 CM MTPWF IND NO P
0x0c5440…0c55d4 (1, 95) Dummy {f00=0x003e, f01=0x0190, f02=» LDKL A2,MTCHS GET ADDRESS TO CHANNEL STATUS % P & 4 PMTON30 LD A1,2,A2 GET STATUS & < P SRC A1,1 & ` P RF(N) MTON40 OFF-LINE & r $ P CF A5,MTRC RECOVER THIS CHANNEL & P & PMTON40 ADK A2,4 & ( P CWK A2,MTCHSE ARE ALL CHANNELS DONE & P RB(
0x0c55d4…0c5768 Dummy {f00=0x003e, f01=0x0190, f02=»IVE REQUEST & z P EJECT ' P ' " P* ' * : P* MTRC RECOVERY ROUTINE. THE TAPE IS POSITIONED BEFORE ' 4 0 P* THE BLOCK GIVEN BY THE SEQUENCE COUNTER. ' r 8 P* IF UNSUCCESSFUL DUE TO INCORRECT SEQUNCE NUMBERS ' $ P* THE RECORDER IS PUT OFF-LINE. '
0x0c5768…0c58fc Dummy {f00=0x003e, f01=0x0190, f02=» P* A1: STATUS AFTER RECOVERY ( $ P* A2: ADDRESS TO CHANNEL STATUS ( ( P* A6: DWT ADDRESS ( P P* ( j P ( t P ( | & PMTRC LDR A7,A2 CALC CHANNEL NUMBER ( P SUKL A7,MTCHS ( P SRL A7,2 ( P CF A5,SELC SELECT CHANNEL ( P LD A1,2,A2 CHEC
0x0c58fc…0c5a90 Dummy {f00=0x003e, f01=0x0190, f02=»E AT BOT ( v 8 P LDK A7,MTRBLK REVERSE TAPE TO AVOID ANY OLD BLOCKS ) PMTRC05 CF A5,SKPR ) L P SUK A7,1 ) f P RB(NZ) MTRC05 ) x P ) * PMTRC10 CF A5,RSQN READ SEQUENCE NUMBER ) P SLC A1,3 CHECK IF TAPE MARK ) & P RB(N) MTRC10 TAPE MARK, TRY AGA
0x0c5a90…0c5c24 Dummy {f00=0x003e, f01=0x0190, f02=»IF REW, DATA ERR, THRU ERR, NOT OP ) x & P RF(NZ) MTRC70 ILLEGAL CONDITIONS * * P * T & P LD A3,MTBUF OK NICE SEQ NO FOUND * P ECR A7,A3 PUT IT RIGHT * ( P SUR* A7,A2 CALC NO OF BLOCKS TO GO * P CCR A3,A2 * P RF(NE) MTRC25 * P LDR A7,A7 *
0x0c5c24…0c5db8 Dummy {f00=0x003e, f01=0x0190, f02=»A5,SKPF * P RB MTRC40 + P + " PMTRC50 SUK A7,1 TRY REVERSE + * P RF(N) MTRC60 + N P CF A5,SKPR + d P RB MTRC50 + x P + & PMTRC60 CF A5,RSQN READ SEQ NUMBER + " P RF(4) MTRC70 ILL STATUS,DATA + P SLC A1,3 CHECK IF TAPE MARK + P R
0x0c5db8…0c5f4c Dummy {f00=0x003e, f01=0x0190, f02=» + $ PMTRC70 ABL OFLI RECOVERY FAILED , P , 0 ( PMTRC80 LD A3,MTBUF CHECK SEQ NUMBER , 8 P ECR A3,A3 , d P ADK A3,1 , v P CWR* A3,A2 , P RB(NE) MTRC70 NOT EQUAL , P , $ PMTRC90 ABL SKPF OK RECOVERY DONE , P EJECT , P , P* ,
0x0c5f4c…0c60e0 Dummy {f00=0x003e, f01=0x0190, f02=»1-MTTAB , P - , PMTORD DATA READ,WRIT,WRIT,TEST,WRTM,RWND - " P DATA STPR,STPF,LOAD,UNLD,RECV - H PMTNOL EQU *-8-8 - n P EJECT - P - P* - * P* DWMT01 DEVICE WORK TABLE FOR DRMT01 - P* - P - 0 PDWMT01 DATA 0 DWTCHP PNTR TO ACTIV
0x0c60e0…0c6274 (1, 96) Dummy {f00=0x003f, f01=0x0190, f02=»MTADR DWTADR - P DATA 0 DWTTAB . P DATA 0 DWTWAT . * P DATA 0 DWTTQ . @ ( PMTREQ DATA 0 REQUESTED ORDER POINTER . V ( PMTSA2 DATA 0 SAVE AREA FOR REGISTERS . PMTSA5 DATA 0 . PMTSA7 DATA 0 . P DATA 0,0,0 SUBROUTINE STACK . PMTSTB DATA 0 D
0x0c6274…0c6408 Dummy {f00=0x003f, f01=0x0190, f02=»WF TIMER POINTER . PMTTIM DATA 0 TIMER POINTER / & PMTBUF DATA 0 BUFFER FOR SEQ NUMBER / : PMTEOT DATA 0 EOT INDICATOR / d P EJECT / P / P* / P* CHANNEL STATUS WORDS / P* / & P* FIRST WORD: SEQUENCE COUNTER / > P* SECOND WORD:
0x0c6408…0c659c Dummy {f00=0x003f, f01=0x40e6, f02=»" / ~ P DATA 0,1 CH2: " 0 P DATA 0,1 CH3: " 0 & P DATA 0,1 CH4: " 0 B P DATA 0,1 CH5: " 0 ^ P DATA 0,1 CH6: " 0 z P DATA 0,1 CH7: " 0 P 0 PMTCHSE EQU * 0 P 0 P END 0 @ 0 CE COUNTER / > P* SECOND WORD:
0x0c659c…0c6730 Dummy {f00=0x003f, f01=0x2008, f02=» 1 , STATUS . ~ P DATA 0,1 CH1: " / P DATA 0,1 CH2: " / 4 P DATA 0,1 CH3: " / P P DATA 0,1 CH4: " / l P DATA 0,1 CH5: " / P DATA 0,1 CH6: " / P DATA 0,1 CH7: " / P / PMTCHSE EQU * / P / P END /
0x0c6730…0c68c4 Dummy {f00=0x003f, f01=0x0190, f02=» KEYBOARD DRIVER DRKB01. P* P* * 0 P* THE DRIVER CONSISTS OF FOLLOWING PARTS: 4 P* h & P* A C D N ACTIVATION PART r P* ( P* I H D N INTERRUPT HANDLER P* ( P* R C D N RECOVERY ROUTINE P
0x0c68c4…0c6a58 Dummy {f00=0x003f, f01=0x0190, f02=»THREATED: r P* ( P* ORDER 05: ERASE NUMERIC DISPLAY ( P* 06: WRITE NUMERIC DISPLAY H P* t P* ~ P* NORMAL REGISTER USAGE: P* $ P* REGISTER: A1 = RETURN CODE ( P* A2 = OUTPUT CHARACTER $
0x0c6a58…0c6bec Dummy {f00=0x003f, f01=0x018e, f02=» A6 = DWT-ADDRESS P* A7 = ORDER $ P* A8 = ECB-ADDRESS < P* d P* n P* SYSTEM ADAPTATION x P* 2 P* BY MEANS OF CONDITIONAL ASSEMBLY ORDER 06 0 P* WRITE NUMERIC DISPLAY MAY BE EXCLUDED. 0
0x0c6bec…0c6d80 Dummy {f00=0x003f, f01=0x0190, f02=» P*********** P* ENTRIES * P*********** 0 P* D P* N ( P ENTRY DNAD ADDRESS TO ADDRESS-BLOCK X P* P* P* 0 P******************************************** 0 P* EXTERNAL TOSS MODULE ENTRIES * 0
0x0c6d80…0c6f14 (1, 97) Opaque[0x194]
0x0c6f14…0c70a8 # DirEnt {nam=»DRLP01«, typ=»SC«, f00=0x9da0, f01=0x0001, f02=0x07e8, f03=0x5f28}
0x0c6f14…0c70a8 IdxSect {
0x0c6f14…0c70a8 f00 = 0x003f // 0xc6f14 @0x0
0x0c6f14…0c70a8 f01 = 0x0008 // 0xc6f16 @0x2
0x0c6f14…0c70a8 gno = [ // 0xc6f18 @0x4
0x0c6f14…0c70a8 [0x00]: C0x003f.0x1.0
0x0c6f14…0c70a8 [0x01]: C0x003f.0x2.0
0x0c6f14…0c70a8 [0x02]: C0x003f.0x3.0
0x0c6f14…0c70a8 [0x03]: C0x0040.0x0.0
0x0c6f14…0c70a8 ]
0x0c6f14…0c70a8 }
0x0c70a8…0c723c Dummy {f00=0x003f, f01=0x018e, f02=» 2 P IDENT DRLP01 REL 8.2 78-09-15 870105040820 P : P UPDATE #0 77-12-14 B > P********************************************************** d P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* DRLP01 = DRIVER LINE PRINTER
0x0c723c…0c73d0 Dummy {f00=0x003f, f01=0x0190, f02=» P* @ P* THIS DRIVER HANDLES ONE LINE PRINTER PTS 6881 CONNECTED < P* TO CPU VIA CHLP ON MULTIPLEX CHANNEL OR PROGRAMMED R P* CHANNEL P EJECT P* P* P************************ P* ENTRIES * P
0x0c73d0…0c7564 Dummy {f00=0x003f, f01=0x0190, f02=»HANDLER z P ENTRY LPON RECOVERY ROUTINE & P ENTRY DWLP01 DWT FOR LINE PRINTER 4 P* ^ P* h , P**************************************** r , P* EXTERNAL TOSS MODULE ENTRIES * , P**************************************** P*
0x0c7564…0c76f8 Dummy {f00=0x003f, f01=0x0190, f02=» t P EXTRN DWTST DWT-STATUS P EXTRN DWTOR ORDER ( P EXTRN DWTECB ECB-ADDRESS B * P EXTRN INTSAV SAVE AREA LAST INTERRUPT d P* P* " P***************************** " P* CONSTANTS * " P**********************
0x0c76f8…0c788c Dummy {f00=0x003f, f01=0x018e, f02=»4 EQU /14 PDWTA5 EQU /16 PDWTSB2 EQU /1E ( P* > P EJECT H P* V & P********************************** ` & P* CONDITIONAL ASSEMBLY * & P********************************** P* 2 P* PROGRAMMED CHANNEL MAY BE U
0x0c788c…0c7a20 Dummy {f00=0x003f, f01=0x0190, f02=» P*********************** P* ORDERS * ( P*********************** H P* h P* ORDER /00: TEST STATUS. r 8 P* A TST INSTRUCTION IS EXECUTED TO SEE 0 P* IF LINE PRINTER IS OPERABLE. P*
0x0c7a20…0c7bb4 (1, 98) Dummy {f00=0x003f, f01=0x0190, f02=» TO THE LINE PRINTER WITHOUT ANY CHECK. | P* 0 $ P* ORDER /06: STANDARD WRITE. : @ P* FIRST WORD IN ECB-BUFFER CONTAINS A CONTROL b P* CHARACTER. < P* /2B: PRINT LINE WITHOUT ADVANCING PAPER : P
0x0c7bb4…0c7d48 Dummy {f00=0x003f, f01=0x0190, f02=» OTHER CHARACTERS GIVES A LINE FEED BEFORE P* PRINTING. 8 P* Z P* d > P* CHARACTERS IN BUFFER SHOULD BE WITHIN THE n > P* INTERVAL /20-/5F. NO CHECK IS CARRIED OUT B P* BY DRI
0x0c7d48…0c7edc Dummy {f00=0x003f, f01=0x0190, f02=»CHARACTER. z P* P EJECT P* * P* 4 ( P************************************ > ( P* NORMAL REGISTER USAGE * j ( P************************************ P* P* A1 = RETURN CODE P* A2 = WORK REGISTER
0x0c7edc…0c8070 Dummy {f00=0x003f, f01=0x0190, f02=»DER P* A8 = ECB-ADDRESS P* * P* 4 P* > $ P******************************** H $ P* TABLES * p $ P******************************** P* P* & PLPADR DATA ACLP ACTIVATION DRIVER P* P
0x0c8070…0c8204 Dummy {f00=0x003f, f01=0x0190, f02=»7,A7 ORDER 0 ? P RF(NE) ACLP05 NO P LDKL A4,DWTBC BYTE COUNTER 0 P ADR A4,A6 ADD DWT-ADDRESS T $ P SCR A1,A4 STORE CARRIAGE RETURN v P LDK A2,1 P RF ACLP30 $ PACLP05 LD A4,2,A8 BUFFER ADDRESS P LD A2,4,A8 REQ. LENGTH
0x0c8204…0c8398 Dummy {f00=0x003f, f01=0x0190, f02=»LP10 EQU * P CWK A2,2 REQ. LENGTH < 2 ? P RF(NL) ACLP12 NO 6 8 P LDK A2,2 YES , SAME ACTIONS AS FOR REQ. LENGTH = 2 P PACLP12 EQU * P LDR A3,A4 BUFFER ADDRESS & P ADR A3,A2 ADDED WITH REQ. LENGTH $ P SCR A1,A3 STORE PRINT CHARA
0x0c8398…0c852c Dummy {f00=0x003f, f01=0x018e, f02=»3,/FF $ P SUK A3,/2B SUPER POSITIONING ? P RF(NE) ACLP15 NO 6 $ P SUK A2,2 DECREMENT REQ. LENGTH P & P ADK A4,2 INCREMENT BUFFER ADDRESS x P RF ACLP30 PACLP15 LDK A1,/0A LINE FEED * P SC A1,1,A4 SECOND CHARACTER IN BUFFER P S
0x0c852c…0c86c0 Dummy {f00=0x003f, f01=0x0190, f02=» | P LDK A1,/0D CARRIAGE RETURN 4 PACLP20 SCR A1,A4 STORE FIRST CHARACTER IN BUFFER , $ PACLP30 CF A5,CIOSTA SEND BUFFER d P SUK A7,6 ORDER 6 ? P RF(NE) ENDIO P LDR A2,A2 P RF(NN) ACLP35 4 P IM 6,A8 ADD FOR EXTRA CHAR. AT BU
0x0c86c0…0c8854 (1, 99) Dummy {f00=0x003f, f01=0x0190, f02=»NTROL CHARACTER IN BUFFER | P SRL A3,8 " $ P SCR A3,A4 ALSO RESET FIRST BYTE 4 $ PENDIO CF A15,TENDIO END REQUEST PEXIT ABL TDISP P EJECT P* P* P* CIOSTA " P* SUBROUTINE TO SEND BUFFER P* PCIOSTA E
0x0c8854…0c89e8 Dummy {f00=0x003f, f01=0x0190, f02=»TE NUMBER OF P CHARACTERS TO SEND 0 P WER A2,MUXLP FIRST WRITE EXTERNAL REGISTER 2 P LDR A2,A4 BUFFER ADDRESS f 2 P WER A2,MUXLP+1 SECOND WRITE EXTERNAL REGISTER P XIF P IFT CHAN=1 ( P ST A4,DWTA3,A6 SAVE BUFFER ADDRESS
0x0c89e8…0c8b7c Dummy {f00=0x003f, f01=0x0190, f02=»CT P* P* P* RECOVERY ROUTINE P* < PLPON CF A15,SAVE8 F P LDK A1,1 NOT OPERABLE ` P LDKL A6,DWLP01 DWT-ADDRESS ~ P LD A2,DWTST,A6 DWT STATUS P RB(N) EXIT LP FREE P RF IHLP30 P EJECT P*
0x0c8b7c…0c8d10 Dummy {f00=0x003f, f01=0x0190, f02=»5,SAVE8 SAVE REGISTERS P XIF P IFT CHAN=1 * P STR A1,A15 > P STR A2,A15 R P LDKL A2,DWLP01 DWT-ADDRESS f 2 P LD A1,DWTA3,A2 POINTER AT NEXT BYTE IN BUFFER P LCR A2,A1 NEXT BYTE " P OTR A2,0,DWALP WRITE ONE BYTE P RF(NA
0x0c8d10…0c8ea4 Dummy {f00=0x003f, f01=0x0190, f02=»2 P RF(NE) IHLP10 NOT LAST BYTE P CIO A2,0,DWALP CIO HALT . PIHLP10 EQU * N P LDR* A2,A15 b P LDR* A1,A15 v P RTN A15 P* P* P* PIHLP20 STR A3,A15 P STR A4,A15 P STR A5,A15 P STR A6,A15
0x0c8ea4…0c9038 Dummy {f00=0x003f, f01=0x0190, f02=»QU * P LD A7,DWTOR,A6 ORDER P ANK A7,/FF * P LD A8,DWTECB,A6 ECB-ADDRESS > P IFT CHAN=0 b 4 P RER A3,MUXLP GET NUMBER OF NOT TRANSFERED CHAR. v P ANKL A3,/FFF 8 P LD A2,4,A8 CALCULATE NUMB. OF TRANSFERED CHARACTERS P SUR A2,
0x0c9038…0c91cc Dummy {f00=0x003f, f01=0x0190, f02=» A2,1 YES PIHLP35 EQU * 8 P SU A2,2,A8 CALCULATE NUMB. OF TRANSFERED CHARACTERS & P XIF b " P ST A2,6,A8 STORE EFF. LENGTH n $ P LD A5,DWTA5,A6 GET STACK VALUE P RTN A5 P EJECT P* P* P* D W L P 0 1 P*
0x0c91cc…0c9360 Dummy {f00=0x003f, f01=0x4176, f02=»US 0 P DATA 0,0 LAST OUTPUT, ORDER AND ECB-ADDRESS ( P DATA LPADR ADDRESS TO ADDRESS-BLOCK > P DATA 0 TTAB-ADDRESS j $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE P DATA 0 OUTPUT QUEUE LINK P DATA 0 SAVE AREA FOR A3
0x0c9360…0c94f4 (1, 100) Dummy {f00=0x0040, f01=0x2008, f02=» P DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR ( P DATA 0 TERMINAL QUEUE P P DATA 0 OUTPUT QUEUE LINK n P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-STACK P
0x0c94f4…0c9688 Dummy {f00=0x0040, f01=0x000e, f02=»
0x0c9688…0c981c Dummy {f00=0x0040, f01=0x018e, f02=» 2 P IDENT DRTP01 REL 8.1 78-04-21 870105040810 P : P* B < P******************************************************* L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P* DRTP01 = DRIVER TELLER TERMINAL PRINTER P* P*
0x0c981c…0c99b0 Dummy {f00=0x0040, f01=0x0190, f02=» > P* THIS DRIVER HANDLES TELLER TERMINAL PRINTERS PTS 6221, 6 P* 6222 OR 6223 CONNECTED TO CPU VIA CHLT OR CHRT J P* P* 4 P* THIS DRIVER CONSISTS OF THE FOLLOWING PARTS: P* $ P* A C T P : ACTIVATION PART P*
0x0c99b0…0c9b44 Dummy {f00=0x0040, f01=0x0190, f02=»INS THE FOLLOWING SUBROUTINES: | P* & B P* P R B U F : GET CHARACTERS FROM ECB-BUFFER AND SEND THEM 0 P* v 6 P* B C D T B Y : CONVERT FROM BINARY TO DECIMAL P* D P* B U F C H R : SEND THE NUMBER OF CHARACTERS GIVEN IN FIRST
0x0c9b44…0c9cd8 Dummy {f00=0x0040, f01=0x0190, f02=» ORDER 00 : TEST STATUS " P* ORDER 06 : WRITE JOURNAL " & P* ORDER 07 : WRITE TALLY ROLL H , P* ORDER 08 : WRITE VOUCHER/PASSBOOK r P* P* P* NORMAL REGISTER USAGE: P* " P* REGISTER A1: WORK REGISTER " P
0x0c9cd8…0c9e6c Dummy {f00=0x0040, f01=0x0190, f02=»TACK POINTER ~ P* A6: DWT-ADDRESS P* A7: ORDER 8 P* A8: ECB-ADDRESS V P* z P* P* SYSTEM ADAPTATION: P* D P* BY MEANS OF CONDITIONAL ASSEMBLY THE FOLLOWING FUNCTIONS CAN P* BE EXC
0x0c9e6c…0ca000 Dummy {f00=0x0040, f01=0x018e, f02=»L CHARACTER /13,/14 x P* P* & @ P* THE CHARACTER CODES FOR ROOMLESS POINT DIGITS IS DEFINED 0 > P* IN A TABLE NAMED ROMTAB.STANDARD IS SHB CHARACTER SET t P* P* P EJECT P* P*********** P* ENTRIES *
0x0ca000…0ca194 (1, 101) Opaque[0x194]
0x0ca194…0ca328 # DirEnt {nam=»DRGP01«, typ=»SC«, f00=0x4dc0, f01=0x5c04, f02=0x0808, f03=0x001f}
0x0ca194…0ca328 IdxSect {
0x0ca194…0ca328 f00 = 0x0040 // 0xca194 @0x0
0x0ca194…0ca328 f01 = 0x000c // 0xca196 @0x2
0x0ca194…0ca328 gno = [ // 0xca198 @0x4
0x0ca194…0ca328 [0x00]: C0x0040.0x1.0
0x0ca194…0ca328 [0x01]: C0x0040.0x2.0
0x0ca194…0ca328 [0x02]: C0x0040.0x3.0
0x0ca194…0ca328 [0x03]: C0x0041.0x0.0
0x0ca194…0ca328 [0x04]: C0x0041.0x1.0
0x0ca194…0ca328 [0x05]: C0x0041.0x2.0
0x0ca194…0ca328 ]
0x0ca194…0ca328 }
0x0ca328…0ca4bc Dummy {f00=0x0040, f01=0x0190, f02=» 2 P IDENT DRGP01 REL 8.2 78-09-15 870105040820 P : P* B 6 P************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* ( P* DRGP01 = DRIVER GENERAL PRINTER P* P* P*
0x0ca4bc…0ca650 Dummy {f00=0x0040, f01=0x0190, f02=» GENERAL TERMINAL PRINTER x < P* PTS 6321 CONNECTED TO THE SYSTEM VIA CHLT OR CHRT. " P* b 8 P* THE DRIVER ALSO INCLUDES DEVICE DEPENDENT ECHO l 6 P* FUNCTIONS, WHICH MAKES IT POSSIBLE TO USE THE 6 P* GENERAL PRINTER AS AN ECHO DEVICE
0x0ca650…0ca7e4 Dummy {f00=0x0040, f01=0x0190, f02=»VER CONSISTS OF FOLLOWING PARTS: P* ( & P* A C G P ACTIVATION PART 2 P* ( P* I H G P INTERRUPT HANDLER f P* ( P* R C G P RECOVERY ROUTINE P* & P* E C H O G P ECHO FUNCTIONS P* P*
0x0ca7e4…0ca978 Dummy {f00=0x0040, f01=0x018e, f02=» 06: STANDARD WRITE P* " P* NORMAL REGISTER USAGE , P* N " P* REGISTER A1 = RETURN CODE X ( P* A2 = OUTPUT CHARACTER ~ $ P* A3 = BUFFER INDEX $ P* A4 = WORK REGISTER " P*
0x0ca978…0cab0c Dummy {f00=0x0040, f01=0x0190, f02=» P* P* SYSTEM ADAPTATION P* 0 : P* THE CODES FOR ECHO OF BACKSPACE (GPBSP) AND CLEAR : ( P* (GPCLR) KEYS SHOULD BE DEFINED. x P* 8 P* BY MEANS OF CONDITIONAL ASSEMBLY THE DRIVER IS 0 P* ADAPTED TO HANDLE FOLLOWI
0x0cab0c…0caca0 Dummy {f00=0x0040, f01=0x0190, f02=»DE ECHOING OF AN EXTRA SPACE BETWEEN EACH CHARACTER 6 P* --SUPPRESS ECHOING OF END OF RECORD CHARACTER < * P** --SUPPRESION OF TRAILING BLANKS v @ P* --END OF REQUEST WHEN PRINTER HARDWARE BECOMES INACTIVE P* 6 P* THE CHARACTER COD
0x0caca0…0cae34 (1, 102) Dummy {f00=0x0040, f01=0x0190, f02=» P* P* P*********** P* ENTRIES * 0 P*********** D P* X P* b P* l ( P ENTRY GPAD ADDRESS TO ADDRESSBLOCK v 0 P ENTRY ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE P* P* P* P* . P**********
0x0cae34…0cafc8 Dummy {f00=0x0040, f01=0x0190, f02=» P* P* $ P EXTRN DISIOE I/O REQUEST ERROR . P EXTRN OUTPUT SUBROUTINE TO SEND CHARACTER @ P EXTRN TDISP DISPATCHER r > P EXTRN LDREG LOAD REGISTERS A4, A3, A5, A7, A8 AND RETURN P EXTRN TENDIO END I/O . P EXTRN SAVE8 SAVE 8 RE
0x0cafc8…0cb15c Dummy {f00=0x0040, f01=0x0190, f02=»CT P* P************************ P* DWT PARAMETERS * 4 P************************ T P* t P EXTRN DWTST STATUS ~ P EXTRN DWTOR ORDER P* $ P******************************** $ P* DWT-DISPLACEMENT *
0x0cb15c…0cb2f0 Dummy {f00=0x0040, f01=0x0190, f02=»U /22 HEAD POSITION POINTER P* $ P EJECT . P* < P* F P************* P P* CONSTANTS * f P************* | P* P* : PSOH EQU /01 RESET PRINT BUFFER REMOTE AND LOCAL DUMMY PSTX EQU /82 START OF MESSAGE P
0x0cb2f0…0cb484 Dummy {f00=0x0040, f01=0x018e, f02=»0C FORM FEED PSPACE EQU /20 SPACE 0 PPROUT EQU /04 PAPER OUT OR READY SWITCH OFF 0 P EJECT d * P************************************** r * P* CONDITIONAL ASSEMBLY * * P************************************** P* 2 P*
0x0cb484…0cb618 Dummy {f00=0x0040, f01=0x0190, f02=» P* 4 P* ACCEPTANCE OF SPECIAL CHARACTER /13 CAN BE 0 P* INCLUDED IN THE DRIVER BY SETTING X:B=1 J P* ~ PX:B EQU 0 PTRETON EQU X:B P* 4 P* ACCEPTANCE OF SPECIAL CHARACTER /14 CAN BE 0 P* INCLUDED IN THE D
0x0cb618…0cb7ac Dummy {f00=0x0040, f01=0x0190, f02=» , P* AN EXTRA SPACE AFTER EACH CHARACTER P* BY SETTING X:D=0 4 P* P PX:D EQU 0 Z PCOSPAC EQU X:D l P* 8 P* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE 8 P* TO SUPPRESS ECHOING OF END OF RECORD CHARACTER. 8 P*
0x0cb7ac…0cb940 Dummy {f00=0x0040, f01=0x0190, f02=»SPACES IN RIGHT HAND OF LINE | P* BY SETTING X:F=1 $ P* B PX:F EQU 0 L PSUPSPA EQU X:F ^ P* t ( P* END OF REQUEST IN SITUATIONS WHERE ~ , P* THE SELECTOR UNIT OR PRINTER HARDWARE * P* IS INACTIVE CAN BE CHOSEN BY SETTING P
0x0cb940…0cbad4 (1, 103) Dummy {f00=0x0040, f01=0x0190, f02=» SPECIAL KEYS FOR ECHO FUNCTION * * P************************************** . P* PGPBSP EQU /2D BACK SPACE f PGPCLR EQU /3F CLEAR P* P******************** P* RETURN CODES * P******************** P* 0
0x0cbad4…0cbc68 Dummy {f00=0x0040, f01=0x0190, f02=»EQU /1 NOT OPERABLE, POWER OFF P* & P EJECT 0 P* > P* H P********** R P* TABLES * d P********** v P* P* P IFT CROOM=1 P* PROMTAB EQU * * P TABLE FOR ROOMLESS POINT CHARACTERS ( P DATA /2122,
0x0cbc68…0cbdfc Dummy {f00=0x0040, f01=0x0190, f02=»N DRIVER | P DATA IHGP INTERRUPT HANDLER P DATA RCGP RECOVERY ROUTINE 4 . P DATA ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE X P EJECT P* P* A C G P P* 2 P* ACGP = ACTIVATION DRIVER GENERAL PRINTER P* H P* ORD
0x0cbdfc…0cbf90 Dummy {f00=0x0040, f01=0x0190, f02=» RETURN CODE IS ALSO SET IF TIME-OUT IS SIGNALLED FROM P* CHANNEL UNIT. H P* l > P* ORDER 05: BASIC WRITE. CHARACTER ARE SENT TO PRINTER v " P* FROM ECB-BUFFER P* F P* ORDER 06: STANDARD WRITE. C
0x0cbf90…0cc124 Dummy {f00=0x0040, f01=0x0190, f02=»DK A2,STX START OF MESSAGE P LDK A3,0 RESET BUFFER INDEX " P LDK A4,0 F P LDR A7,A7 ORDER 0? X P RF(E) AGP410 t P SUK A7,5 ORDER 5? P RF(E) ACGP05 P SUK A7,1 ORDER 6? & P ABL(NE) DISIOE I/O REQUEST ERROR $ P LD A1,4,A
0x0cc124…0cc2b8 Dummy {f00=0x0040, f01=0x0190, f02=» A3,/FF PACGP02 EQU * * P SUK A3,/2B POSITIONING BEFORE WRITE? $ P RF(E) ACGP12 R . P LDK A4,2 INDICATE CR AND LF/FFED TO SEND h P EJECT P* . P* SEND DUMMY AND, IF CONTROL CHARACTER 2 P* # 2B, SEND CARRIAGE RETURN AND
0x0cc2b8…0cc44c Dummy {f00=0x0040, f01=0x0190, f02=» n P RF(P) ACGP15 STX P* " $ P* SEND LINE FEED OR FORM FEED , P* T & P SUK A3,5 CONTROL CHARACTER /30 ? ^ P RF(NE) ACGP07 * P ADK A4,1 YES EXTRA LINE FEED TO SEND PACGP07 EQU * P LDK A2,LF & PACGP12 LDK A3,2 START
0x0cc44c…0cc5e0 Dummy {f00=0x0040, f01=0x0190, f02=»GP05 P EJECT P* & P* GET, CHECK AND SEND CHARACTER $ P* (IF ORDER 5 NO CHECK) N P* p PACGP17 CF A5,OUTPUT z 0 PACGP18 IM DWTST,A6 POSITION COUNTER UPDATING PACGP19 EQU * * P LDKL A4,/400 INDICATE LINE FEED DONE
0x0cc5e0…0cc774 (1, 104) Dummy {f00=0x0041, f01=0x018e, f02=»ACGP20 CF A15,GETCHR GET CHARACTER FROM ECB-BUFFER P LDR A1,A1 LAST CHARACTER? : P RF(NP) AGP400 P LDR A1,A2 r P SUK A7,5 ORDER 5? P RF(E) ACGP24 BASIC WRITE $ P SUK A1,9 HARDWARE TABULATION ? P RF(NE) ACGP22 0 P ST A4,DWT
0x0cc774…0cc908 Dummy {f00=0x0041, f01=0x0190, f02=» P IFT TRETON=0 P IFT FJOTON=0 P* 0 P SUK A1,/F LESS THAN /20 ? : P* P XIF f P* r P IFT TRETON=0 | P IFT FJOTON=1 P* P SUK A1,3 /14? P RB(E) ACGP17 P SUK A1,/C LESS THAN /20 ? P*
0x0cc908…0cca9c Dummy {f00=0x0041, f01=0x0190, f02=»UK A1,/D LESS THAN /20 ? P XIF P* , P* 6 P IFT TRETON=1 @ P IFT FJOTON=1 V P* l P SUK A1,2 /13? v P RB(E) ACGP17 P SUK A1,1 /14? P RB(E) ACGP17 P SUK A1,/C LESS THAN /20 ? P* P XIF P*
0x0cca9c…0ccc30 Dummy {f00=0x0041, f01=0x018e, f02=»5F v P RB(NP) ACGP17 P SUK A1,/20 P RF(NN) ACGP30 4 6 P SUK A2,/20 TRANSFORM CHARACTER BETWEEN /60 TO /7F J & P TO CHARACTER BETWEEN /40 TO /5F P RB ACGP17 PACGP24 EQU * P SUK A1,/D P RF(NZ) ACGP26 NOT CR " P CM
0x0ccc30…0ccdc4 Dummy {f00=0x0041, f01=0x0190, f02=» P SUK A1,1 * P ADS A1,DWTST,A6 DECREMENT POS COUNTER P RB ACGP17 D P EJECT V P* d P* CODE CHECK ERROR n P* PACGP30 EQU * P LDK A1,CCERR P ORS A1,8,A8 RETURN CODE P RB ACGP20 P EJECT P*
0x0ccdc4…0ccf58 Dummy {f00=0x0041, f01=0x0190, f02=» GET SECOND ASCII CHARACTER P ANK A2,/F $ P ANK A4,/F 6 P RF(E) ACGP44 H 0 PACGP43 ADK A2,/A FROM DECIMAL TO HEXADECIMAL ^ P SUK A4,1 P RB(NE) ACGP43 8 PACGP44 SU A2,DWTAP,A6 SUBTRACT HEAD POSITION POINTER P LC A4,DWTBC,A6
0x0ccf58…0cd0ec Dummy {f00=0x0041, f01=0x018e, f02=»ACGP45 LDK A2,SPACE LOOP ALSO USED BY RECOVERY ROUTINE PACGP46 CF A5,OUTPUT > ( P IM DWTST,A6 INCREMENT BUFFER INDEX Z P SUK A4,1 P RB(P) ACGP45 P LDR A3,A3 RECOVERY? P RB(NE) ACGP20 * P SC A4,DWTBC,A6 RESET POSITION POINTER
0x0cd0ec…0cd280 Dummy {f00=0x0041, f01=0x0190, f02=» P* P IFT CROOM=1 P* & ( P CF A15,GETCHR GET CHARACTER TO SEND 0 P ANK A2,/F P LC A2,ROMTAB,A2 TRANSFORM n P* P XIF P* P* P IFF CROOM=1 P* P ANK A2,/7F P* P XIF P*
0x0cd280…0cd414 (1, 105) Dummy {f00=0x0041, f01=0x0190, f02=»* PAGP400 EQU * P LDK A2,ETB END OF MESSAGE P CF A5,OUTPUT SEND @ PAGP410 LDK A2,ETX LAST DUMMY Z P CF A5,OUTPUT SEND ~ PAGP420 EQU * 0 P CF A15,UPDAPP UPDATE HEAD POSITION COUNTER PENDIO CF A15,TENDIO END I/O $ PEXIT
0x0cd414…0cd5a8 Dummy {f00=0x0041, f01=0x0190, f02=» P* P* , P* UPDAPP = SUBROUTINE TO UPDATE HEAD , P* POSITION POINTER WHEN END L ( P* OF REQUEST IS REACHED | PUPDAPP EQU * ( P LC A3,DWTBC,A6 GET POSITION COUNTER 2 P ADS A3,DWTAP,A6 UPDATE HEAD POS
0x0cd5a8…0cd73c Dummy {f00=0x0041, f01=0x0190, f02=» P* P* * P* SKIPSP = SUBROTINE TO SKIP SPACES ( P* IN END OF ECB-BUFFER. F 6 P* REQUESTED LENGTH IN ECB IS UPDATED. r & P* A1,A2,A4 - WORK REG P* PSKIPSP EQU * ( P LD A1,2,A8 GET BUFF
0x0cd73c…0cd8d0 Dummy {f00=0x0041, f01=0x0190, f02=»NG) SKIP30 RL < 3 P SUK A1,1 DECR. BA ! P LCR A4,A1 GET CHAR ! 4 P CCK A4,/2020 SPACE ? ! P P RF(NE) SKIP20 NO ! n PSKIP07 SUK A2,1 DECR RL ! P RB SKIP05 GET NEXT ! PSKIP20 CWK A2,4 ! P RF(NG) SKIP30 RL < 5 ! P LC A4,-2,A1 G
0x0cd8d0…0cda64 Dummy {f00=0x0041, f01=0x0190, f02=»B SKIP07 GET NEXT ! P* " " PSKIP30 ST A2,4,A8 STORE NEW RL " $ P RTN A15 " J P XIF " Z P EJECT " f P* " t P* I H G P " ~ P* " P* INTERRUPT " P* " PIHGP EQU * " P LD A4,DWTST,A6 BUSY? " P RB(N) EXIT NO " P SLL A
0x0cda64…0cdbf8 Dummy {f00=0x0041, f01=0x018e, f02=» ? " h P IFT RECEND=0 # P RB(NZ) EXIT # P XIF # 4 P IFT RECEND=1 # @ P RB(NZ) AGP430 # V P XIF # l P # x 4 PIHGP10 ABL LDREG RELOAD A3-A5 AND RETURN VIA A5 # P EJECT # P* # P* E C H O G P # P* # 0 P* ECHOGP = DEVICE-D
0x0cdbf8…0cdd8c Dummy {f00=0x0041, f01=0x0190, f02=» # P IFT EORECH=0 $ P* $ P SUK A2,/80 EOR-CHARACTER $ ( P RF(NN) ECGP20 YES $ J P ADK A2,/80 $ d P* $ x P XIF $ P* $ P LDR A1,A2 $ P ANK A1,/7F $ P SUK A1,/8 $ P RF(E) ECGP40 BACKSPACE $ P SUK A1,/10 $ P RF(
0x0cdd8c…0cdf20 Dummy {f00=0x0041, f01=0x0190, f02=» ECGP20 $ & PECGP10 CF A5,OUTPUT SEND CHARACTER % ( P IM DWTST,A6 UPDATE POSITION COUNTER % : P SUK A4,1 READY ? % f P RF(N) ECGP20 YES % * P RF(P) ECGP60 NO, GO TO CLEAR SECTION % P* % P IFT COSPAC=1 % P* % P LDK A2,SPACE NO SEND
0x0cdf20…0ce0b4 (1, 106) Dummy {f00=0x0041, f01=0x0190, f02=»RTN RETURN TO KEYBOARD % P EJECT & P* & , P* BACKSPACE & 6 P* & L PECGP40 EQU * & V & P LDK A2,GPBSP BACKSPACE CHARACTER & j P RB ECGP10 & P* & P* CANCEL & P* & PECGP50 EQU * & " P LDK A2,GPCLR CLEAR CHARACTER & P
0x0ce0b4…0ce248 Dummy {f00=0x0041, f01=0x018e, f02=»ND CHAR. & z P LDK A2,/08 BACKSPACE ' P SUK A3,1 ' . P RB(NN) ECGP70 ' @ P LDK A3,0 ' V * P SC A3,DWTBC,A6 RESET POSITION COUNTER ' h P RB ECGP20 ' P EJECT ' P* ' P* R C G P ' P* ' 0 P* RCGP = RECOVERY ROUTINE GENERAL PRINT
0x0ce248…0ce3dc Dummy {f00=0x0041, f01=0x0190, f02=» P* ( P* A6 = DWT-ADDRESS ( P* A7 = ORDER ( , P* A8 = ECB-ADDRESS ( D PRCGP EQU * ( b , P CF A15,SAVE8 SAVE 8 REGISTERS ON STACK ( t P LD A2,DWTST,A6 BUSY ? ( P RB(N) EXIT NO ( ( P LDK A2,SOH RESET PRINT BUFFER CODE ( P CF
0x0ce3dc…0ce570 Dummy {f00=0x0041, f01=0x0190, f02=» ( ~ P RB(E) ENDIO ) P RB EXIT ) PRCGP05 EQU * ) , 0 P LC A2,DWTST,A6 GET LEFT BYTE OF STATUS WORD ) @ P ANK A2,/4 LINE FEED DONE ? ) t P ABL(E) ACGP NO ) P LDK A2,SPACE ) P CF A5,OUTPUT SEND SPACE ) P LDK A2,STX ) P CF A5,OUTPUT
0x0ce570…0ce704 Dummy {f00=0x0041, f01=0x4054, f02=» ( PRCGP10 LDK A1,TPERR SET RETURN CODE * P ABL AGP430 * 0 P END * D@ * PLEFT BYTE OF STATUS WORD ) @ P ANK A2,/4 LINE FEED DONE ? ) t P ABL(E) ACGP NO ) P LDK A2,SPACE ) P CF A5,OUTPUT SEND SPACE ) P LDK A2,STX ) P CF A5,OUTPUT
0x0ce704…0ce898 Dummy {f00=0x0041, f01=0x2008, f02=» + YTE OF STATUS WORD % ~ P ANK A2,/4 LINE FEED DONE ? & " P ABL(E) ACGP NO & F P LDK A2,STX & ^ P CF A5,OUTPUT SEND STX & r P LDK A2,CR CARRIAGE RETURN & P LDK A3,0 & 0 P LD A4,DWTAP,A6 GET NUMBER OF SPACES TO SEND & P RB ACGP46 & (
0x0ce898…0cea2c Dummy {f00=0x0041, f01=0x2008, f02=» 4 P* 2 P* 2 P* 2 " P* 2 , P* 2 6 P END 2 @@ 2 L 1 N 4 PBUFCHR LCR A4,A3 GET NUMBER OF OUTPUT CHARACTERS 1 X P ANK A4,/FF MASK 1 , PBUFC10 ADK A3,1 INCREMENT BUFFER POINTER 1 $ P LCR A2,A3 GET OUTPUT CHARACTER 1 P CF A5,O
0x0cea2c…0cebc0 Dummy {f00=0x0041, f01=0x0190, f02=» & PREP042 LDKL A7,/80F SET READ MASK - P TM A2,A7 CORRECT READ - . P RF(Z) REP045 YES - L P SUK A4,1 COUNT RETRY - f P RF(NP) REP060 GIVE UP - P CF A8,BKSP BACKSPACE - " P CF A8,READSQ READ SEQ NUMBER - P RB REP042 - PREP045 SLC A2,3
0x0cebc0…0ced54 (1, 107) Opaque[0x194]
0x0ced54…0ceee8 # DirEnt {nam=»DRKB01«, typ=»SC«, f00=0x855d, f01=0x0000, f02=0x0838, f03=0x3d49}
0x0ced54…0ceee8 IdxSect {
0x0ced54…0ceee8 f00 = 0x0041 // 0xced54 @0x0
0x0ced54…0ceee8 f01 = 0x0010 // 0xced56 @0x2
0x0ced54…0ceee8 gno = [ // 0xced58 @0x4
0x0ced54…0ceee8 [0x00]: C0x0041.0x3.0
0x0ced54…0ceee8 [0x01]: C0x0042.0x0.0
0x0ced54…0ceee8 [0x02]: C0x0042.0x1.0
0x0ced54…0ceee8 [0x03]: C0x0042.0x2.0
0x0ced54…0ceee8 [0x04]: C0x0042.0x3.0
0x0ced54…0ceee8 [0x05]: C0x0043.0x0.0
0x0ced54…0ceee8 [0x06]: C0x0043.0x1.0
0x0ced54…0ceee8 [0x07]: C0x0043.0x2.0
0x0ced54…0ceee8 ]
0x0ced54…0ceee8 }
0x0ceee8…0cf07c Dummy {f00=0x0041, f01=0x0190, f02=» 2 P IDENT DRKB01 REL 9.1 78-09-15 870105640912 P : P* B 0 P******************************************* L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* DRKB01 = DRIVER KEYBOARD P* P* P* P* P
0x0cf07c…0cf210 Dummy {f00=0x0041, f01=0x0190, f02=» d . P* AND ALPHANUMERIC KEYBOARDS PTS 6231, ( P* 6232, 6233, 6234, 6331,AND 6342 : , P* CONNECTED TO CPU VIA CHLT OR CHRT. f P* , P* ONLY INPUT DATA FROM DEPRESSED KEYS $ P* ARE HANDLED BY THE DRIVER. P* 0 P* A
0x0cf210…0cf3a4 Dummy {f00=0x0041, f01=0x0190, f02=» DRIVER CONSISTS OF FOLLOWING PARTS: P* , " P* A C K B : ACTIVATION PART 6 P* $ P* I H K B : INTERRUPT HANDLER f P* P* E C H O : ECHO HANDLER P* $ P* R C K B : RECOVERY ROUTINE P* P EJECT P*
0x0cf3a4…0cf538 Dummy {f00=0x0041, f01=0x0190, f02=»AD v P* ORDER 03: NUMERIC READ & P* ORDER 04: RESET INPUT BUFFER . P* X P* b P* NORMAL REGISTER USAGE : l P* " P* REGISTER A1 : RETURN CODE & P* A2 : INPUT CHARACTER $ P* A3 : BUFFER INDE
0x0cf538…0cf6cc Dummy {f00=0x0041, f01=0x0190, f02=» A7 : ORDER " P* A8 : ECB-ADDRESS P* < P EJECT F P* T P* ^ P* SYSTEM ADAPTATION h P* 4 P* KEYBOARD TYPE MUST BE DEFINED IN FIRST WORD : P* IN DWT. BIT 10 IS RELEVANT FOR ALPHANUMERIC READ & P*
0x0cf6cc…0cf860 Dummy {f00=0x0041, f01=0x0190, f02=» 6342 j < P* BIT 11 = 0 FOR ALL KEYBOARDS BUT PTS 6342 AND 6234 & P* BIT 11 = 1 FOR PTS 6234,6342 N P* x 8 P* CODES FOR SPECIAL CHARACTERS CLEAR, BACKSPACE, 8 P* MULTIPLE ZERO AND STANDARD EOR MUST BE DEFINED P* IN DWT.
0x0cf860…0cf9f4 (1, 108) Dummy {f00=0x0042, f01=0x0190, f02=»MER POINTER t , P* IN DWT MUST BE SET UNEQUAL TO ZERO. 2 P* STANDARD VALUE FOR TIME-OUT IS 30 SECONDS D 4 P* SINCE LAST DEPRESSED KEY. IF ANOTHER VALUE z * P* IS WANTED FOR A SYSTEM, INDICATOR $ P* IN DRIVER MUST BE CHANGED. P
0x0cf9f4…0cfb88 Dummy {f00=0x0042, f01=0x0190, f02=»!!! THAT LENGTH MUST BE THE SAME FOR ALL P* DWT:S IN SYSTEM 2 P EJECT N P* 8 P* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE f 8 P* TO EXCLUDE FROM THE DRIVER FOLLOWING FUNCTIONS: P* P* -----ECHO-FUNCTION P
0x0cfb88…0cfd1c Dummy {f00=0x0042, f01=0x0190, f02=»CONVERSION TABLES 4 P* BY MEANS OF CONDITIONAL ASSEMBLY IT IS ALSO 4 P* POSSIBLE TO GIVE A KEY THE MEANING OF TWO, R P* THREE OR MORE ZEROES. P* 6 P* THE DRIVER IS PREPARED TO HANDLE THE SPECIAL 0 P* NORWAY-PROBLEM, WIT
0x0cfd1c…0cfeb0 Dummy {f00=0x0042, f01=0x0190, f02=»VER CONDITIONALLY THIS v P* FUNCTION IS INCLUDED. P EJECT @ P* N P* X P************** b P* ENTRIES * x P************** P* P ENTRY KBAD ADDRESS-BLOCK ( P ENTRY EOQUEU QUEUE POINTER ROUTINE ( P ENTRY DWTIN
0x0cfeb0…0d0044 Dummy {f00=0x0042, f01=0x0190, f02=»ODULE ENTRIES * | 2 P********************************************** " P* X $ P EXTRN DISIOE I/0 REQUEST ERROR b . P EXTRN DISEND END I/O AND GO TO DISPATCHER P EXTRN TENDIO END I/O " P EXTRN TDISP DISPATCHER ENTRY : P EXTRN L
0x0d0044…0d01d8 Dummy {f00=0x0042, f01=0x0190, f02=»M ECHO HANDLING x P EXTRN LDREGF P EXTRN SETIME SET TIME . P EXTRN SETIMP SET TIME L " P EXTRN SAVE8 SAVE 8 REGISTERS j " P EXTRN ECHRTN RETURN FROM ECHO P EXTRN ECHO ECHO ROUTINE P EXTRN ECHEND END OF ECHO $ P EXTRN RTNA15 RE
0x0d01d8…0d036c Dummy {f00=0x0042, f01=0x018e, f02=»*************** P* P EXTRN DWTST STATUS " * P EXTRN DWTADR ADDRESS TO ADDRESS-BLOCK > P EXTRN DWTWAT SAVE INPUT DWT l P* P*************** P* CONSTANTS * P*************** P* * POVMASK EQU /2 OVERFLOW IN IN
0x0d036c…0d0500 Dummy {f00=0x0042, f01=0x0190, f02=» P* TIME BEFORE TIME-OUT P* * $ PTIME EQU 1200 TIME OUT CONSTANT 4 P* P*************************** f P* DWT-DISPLACEMENT * P*************************** P* PDWTBC EQU /3 $ PDWTCON EQU /10 CONVERSIO
0x0d0500…0d0694 (1, 109) Dummy {f00=0x0042, f01=0x0190, f02=» EQU /1E STACK BASE PDWTTP EQU /20 TIMER POINTER 2 PDWTINQ EQU /28 POINTER TO FIRST PLACE IN QUEUE @ 2 PDWTUTQ EQU /2A POINTER TO LAST PLACE IN QUEUE v PDWTSQ EQU /2C START OF QUEUE ( PDWTEQ EQU DWTSQ+DWTLNG END OF QUEUE P* . P**
0x0d0694…0d0828 Dummy {f00=0x0042, f01=0x0190, f02=»*** j P* & PKBBSP EQU /24 BACK-SPACE CHARACTER " PKBCLR EQU /25 CLEAR CHARACTER @ PKBEOF EQU /26 EOR-CHARACTER f & PKBMZ EQU /27 DOUBLE ZERO CHARACTER P* P EJECT P* P* , P****************************************
0x0d0828…0d09bc Dummy {f00=0x0042, f01=0x0190, f02=» MAY BE EXCLUDED BY z P* SETTING X:A = 0. P* : PX:A EQU 0 D PCTIMUT EQU X:A V P* l * P* ECHO FUNCTION MAY BE EXCLUDED BY v P* SETTING X:B = 0. P* PX:B EQU 1 PCECHO EQU X:B P* * P* STAND
0x0d09bc…0d0b50 Dummy {f00=0x0042, f01=0x0190, f02=»E ZERO MAY BE INCLUDED IN SYSTEM ( P* BY SETTING X:D = 2. SETTING X:D ( , P* = 3 GIVES A THREE ZERO FUNCTION AND T 4 P* X:D = 4 GIVES FOUR-ZERO FUNCTION AND SO ON 4 P* X:D = 0 EXCLUDES THE MULTIPLE ZERO FUNCTION P* PX:D EQU 2
0x0d0b50…0d0ce4 Dummy {f00=0x0042, f01=0x0190, f02=»INCLUDED IN THE DRIVER. > P* IF THERE IS A READ REQUEST, THIS IS COMPLETED WITH -2 @ P* SET IN THE CONTROL WORD OF ECB. IF NOT A POWER OFF FLAG b B P* IS SET, CAUSING THE FIRST READ REQUEST AFTER POWER ON TO 2 P* BE COMPLETED WITH CONTR
0x0d0ce4…0d0e78 Dummy {f00=0x0042, f01=0x0190, f02=»SION VIA h 2 P* "8-BIT" SETTING AND CONVERSION TABLES IS P* INCLUDED IN THE DRIVER. F P** j PX:G EQU 0 t PCONVER EQU X:G P P* P* 8 P* THIS DRIVER CAN BE MADE TO HANDLE CREDIT ORDERS P* BY SETTING CREDI
0x0d0e78…0d100c Dummy {f00=0x0042, f01=0x018e, f02=»IN THE FOLOWING WAY: THE FIRST KEY IN THE EOR-KEY-TABLE @ P* IS GIVEN INDEX =1, THE SECOND EOR-KEY IS GIVEN INDEX=1 @ , P* AND SO ON. (INDEX= 1,2,3,4,... ) 8 P* CONTROL WORD OF ECB IS SET TO ZERO INSTED OF -2 P* P* P
0x0d100c…0d11a0 Dummy {f00=0x0042, f01=0x0190, f02=» b . P* THEMSELVES DEPENDENT KEYBOARDS ON THE P* SAME SELECTOR UNIT. : P* Z PNOLJE EQU 0 d P EJECT x P* P* P************** P* TABLES * P************** P* PKBAD EQU * P DATA ACKB ACTIV
0x0d11a0…0d1334 (1, 110) Dummy {f00=0x0042, f01=0x0190, f02=» XIF P* P* P IFT POWOFF=1 P* 6 P DATA RCKB RECOVERY ROUTINE @ P EJECT d P* r P* | P* R C K B P* 2 P* THIS IS THE RECOVERY ROUTINE FOR KEYBOARD & P* ENTERED FROM CHLT/CHRT DRIVER P*
0x0d1334…0d14c8 Dummy {f00=0x0042, f01=0x0190, f02=» INDICATE POWER OFF OCCURED P ABL TDISP $ & PRCKB10 CF A5,LDREGE LOAD REGISTERS 6 P RF AKB202 ` P* r P XIF | P* P EJECT P* P* P* A C K B P* P* ACTIVATION PART: P* 0 P* CHECKS VA
0x0d14c8…0d165c Dummy {f00=0x0042, f01=0x018e, f02=»QU * P LDKL A1,/FEFF 2 P ANS A1,DWTST,A6 RESET INTERRUPTS ALLOWED FLAG " P LDK A1,0 X P LDK A3,0 START BUFFER INDEX j P LDR A4,A7 " P RF(NG) AKB100 ILLEGEAL ORDER P IFT NOLJE=1 P CWK A7,/37 SELECT KEYBOARD P RF(E) AKB
0x0d165c…0d17f0 Dummy {f00=0x0042, f01=0x0190, f02=» P P SUK A4,4 P " P IFT CREDIT=1 * P SUK A4,/2D @ $ P RF(Z) CRE:10 SKIP INPUT BUFFER T P ADK A4,/2D | PCRE:10 EQU * P XIF P RF(Z) AKB110 ORDER 4 P RF(N) AKB200 ORDER 1,2 OR 3 * PAKB100 ORKL A1,/8000 I
0x0d17f0…0d1984 Dummy {f00=0x0042, f01=0x018e, f02=»D A2,DWTINQ,A6 ORDER 4 ( P SCR A1,A2 RESET OVERFLOW IF OCCURED ( P ST A2,DWTUTQ,A6 RESET OUTPUT QUEUE J P ABL ENDI05 END I/O v P IFT NOLJE=1 P* P* " P* ORDER 37 SELECT KEYBOARD P* PAKBSEL LDKL A2,/FF7F * P A
0x0d1984…0d1b18 Dummy {f00=0x0042, f01=0x0190, f02=» P* P* PAKB200 EQU * P* , P IFT POWOFF=1 6 P* L P LD A2,DWTST,A6 V P ANKL A2,/200 POWER OFF ? n P RF(E) AKB205 P XRS A2,DWTST,A6 RESET BIT P XIF PAKB202 EQU * P IFT CREDIT-POWOFF=-1 " P L
0x0d1b18…0d1cac Dummy {f00=0x0042, f01=0x018e, f02=» P IFT POWOFF=1 P ABL AKB380 P* 2 P XIF < P* H PAKB205 EQU * R P* f P IFT CTIMUT=1 p P* P LDR* A1,A6 P ANK A1,/40 TIMING ? , P RF(E) AKB210 NO TIMING FOR THIS DEVICE P LD A4,DWTTP,A6 P
0x0d1cac…0d1e40 Dummy {f00=0x0042, f01=0x0190, f02=» r P ADR A4,A6 ADD DWT-ADDRESS P LDR A1,A6 * P CF A15,SETIMP SET TIME < 0 P DATA AKBTUT,TIME TIME OUT ROUTINE AND TIME . P ST A4,DWTTP,A6 STORE TIMER ADDRESS IN DWT P* P XIF P* & PAKB210 LD A2,4,A8 REQUESTED LENGTH
0x0d1e40…0d1fd4 (1, 111) Dummy {f00=0x0042, f01=0x018e, f02=» v P SUK A1,1 P ADR A1,A2 ADDRESS IN BUFFER $ PAKB230 SCR A3,A1 STORE CHARACTER > " P SUK A1,1 NEXT CHAR. POSITION f P SUK A2,1 LAST ? P RB(NE) AKB230 NO P EJECT P* , P* READ CHARACTER FROM INPUT BUFFER OR & P*
0x0d1fd4…0d2168 Dummy {f00=0x0042, f01=0x018e, f02=» P XRK A4,/FF OVERFLOW ? P RF(NE) AKB250 & " P SCR A4,A1 RESET OVERFLOW MARK < P LDK A1,OVMASK OVERFLOW SET b P RF ENDIO . PAKB250 CW A1,DWTINQ,A6 SOMETHING IN QUEUE? P RF(NE) AKB260 " P CF A5,STREG NOTHING IN QUEUE P I
0x0d2168…0d22fc Dummy {f00=0x0042, f01=0x0190, f02=» P XIF P IFT CTIMUT=0 P RF AKB270 & P XIF 8 0 PAKB260 CF A15,EOQUEU NEXT OUT QUEUE POINTER D & P ST A1,DWTUTQ,A6 STORE NEW POINTER x PAKB270 LDR A4,A7 P SUK A4,2 P RF(NN) AKB310 ORDER 2 OR 3 P EJECT P* P
0x0d22fc…0d2490 Dummy {f00=0x0042, f01=0x018e, f02=»ECHO INPUTTED CHARACTER P XIF ! 0 P CW A3,4,A8 EFFECTIVE LENGTH = REQ. LENGTH? ! , P RB AKB220 ! ` P EJECT ! r P* ! P* ! 2 P* ORDER 2 OR 3 STANDARD AND NUMERIC READ ! P* ! 6 P* CHECK IF READ CHARACTER IS FOUND IN KEY-TABLE !
0x0d2490…0d2624 Dummy {f00=0x0042, f01=0x0190, f02=» ! p P ANK A4,/FF " & P ADR A1,A4 LAST PLACE IN KEY-TABLE " P ADK A1,1 " F PAKB355 SUK A4,1 " X , P RF(N) AKB360 KEY NOT FOUND IN KEY-TABLE " p P SUK A1,1 NEXT KEY " P CCR A2,A1 EOR-CHARACTER? " P RB(NE) AKB355 NO " P IFT CREDIT=0 "
0x0d2624…0d27b8 Dummy {f00=0x0042, f01=0x0190, f02=»,10,A8 STORE INDEX IN CONTROLWORD " ( PAKB358 CF A15,STORE STORE CHARACTER # * P RF AKB370 # V P* # h P* # r 4 PAKB359 CC A2,KBEOF,A6 STANDARD END OF RECORD KEY # | P RB(E) AKB358 YES # P EJECT # P* # * P* CHARACTER NOT FOUND IN KEY-TA
0x0d27b8…0d294c Dummy {f00=0x0042, f01=0x0190, f02=»PARAMETER # x P ANK A4,/20 SHIFT BIT 9 ? $ P RF(E) AKB361 YES $ 4 P LDR A4,A2 CHARACTER $ N P RF AKB363 $ j PAKB361 EQU * $ | P LDR* A4,A6 $ P ANK A4,/10 PTS 6234 ? $ P RF(E) AKB362 $ P LDR A4,A2 $ P ANK A4,/80 $ P RF(NE) AK
0x0d294c…0d2ae0 Dummy {f00=0x0042, f01=0x018e, f02=»QU * $ P IFF CMULTZ=0 % " P CC A4,KBMZ,A6 MULTIPLE ZERO ? % " P RF(E) KBMZ10 YES! % H P XIF % b P CC A4,KBCLR,A6 CLEAR? % n P RF(E) KBCL10 % P CC A4,KBBSP,A6 BACKSPACE? % P RF(E) KBSP10 % P LDR A1,A1 RETURN CODE? % ( P RF(NE) AKB369
0x0d2ae0…0d2c74 (1, 112) Dummy {f00=0x0043, f01=0x0190, f02=» P CW A3,4,A8 LENGTH OVERFLOW? & P RB(L) AKB210 NO & ( $ PAKB368 LDK A1,8 SET RETURN CODE & @ P RF ENDIO AND END I/O & h 6 PAKB369 CF A15,STORE STORE CHARACTER IN ECB BUFFER & P RF ENDIO END I/O REQUEST & P EJECT & P* & P* & ( P*
0x0d2c74…0d2e08 Dummy {f00=0x0043, f01=0x0190, f02=» ORK A2,/80 INDICATE END OF RECORD & P LDR A1,A1 RETURN CODE? ' * P RF(NE) AKB380 ' J P CF A5,ECHO ECHO CHARACTER ' ` P* ' P XIF ' P* ' PAKB380 LDK A1,0 RETURN CODE ' P EJECT ' P* ' P* ' , P* THIS IS A COMMON END OF THE
0x0d2e08…0d2f9c Dummy {f00=0x0043, f01=0x0190, f02=» PENDIO EQU * ( P* ( P IFT CTIMUT=1 ( " P INH ( 8 P LD A4,DWTTP,A6 ( D * P RF(E) ENDI05 NO TIMING ON THIS DEVICE ( P CM* DWTTP,A6 RESET TIMER ( P CM DWTTP,A6 ( P XIF ( P* ( , PENDI05 ST A3,6,A8 STORE EFFECTIVE LENGTH ( PEN
0x0d2f9c…0d3130 Dummy {f00=0x0043, f01=0x018e, f02=» A1 ( ~ P XIF ) P* ) 0 P ABL DISEND END I/O ON KEYBOARD AND DISPATCH ) " P EJECT ) V P* ) d P* MULTIPLE ZERO ) n P* ) P IFF CMULTZ=0 ) PKBMZ10 EQU * ) ( P LDK A4,CMULTZ LOAD NUMBER OF ZEROES ) , PKBMZ20 LDK A2,/30 ZERO TO STORE
0x0d3130…0d32c4 Dummy {f00=0x0043, f01=0x0190, f02=» P LDR A4,A1 RESTORE A4 * P* * " P IFT CECHO=1 * , P* * @ P CF A5,ECHO ECHO ZERO * J P XIF * h P* * t P* * ~ P IFF CMULTZ=0 * P* * " P CW A3,4,A8 LENGTH OVERFLOW ? * P RB(L) KBMZ20 NO * . PKBMZ25 SUK A4,1 ANY MORE ZEROES TO
0x0d32c4…0d3458 Dummy {f00=0x0043, f01=0x0190, f02=»POSITION ? * | P RF(NE) KBMZ30 NO + , P LDK A1,DWTEQ GET LAST POSITION IN QUEUE + , P ADR A1,A6 + P SUK A1,1 + n P RF KBMZ40 + 2 PKBMZ30 ADR A1,A6 GET PREIOUS POINTER POSITION + P SUK A1,1 + , PKBMZ40 CW A1,DWTINQ,A6 ANY SPACE LEFT ? +
0x0d3458…0d35ec Dummy {f00=0x0043, f01=0x0190, f02=» A2,A1 INPUT BUFFER + P RB KBMZ25 ONCE MORE TIME !! , PKBMZ90 EQU * , @ ( P LDK A4,/FF INDICATE BUFFER OWERFLOW , T P SCR A4,A1 , $ P ST A1,DWTUTQ,A6 UPPDATE POINTER , ( P LDK A1,/A SET RETURN CODE FOR BOTH , * P RB ENDIO LENGTH AND THRUGHPUT ERR
0x0d35ec…0d3780 Dummy {f00=0x0043, f01=0x0190, f02=»E , p P RB AKB365 - P* - P* BACKSPACE - & P* - < & PKBSP10 LDR A3,A3 FIRST CHARACTER? - F P RF(Z) KBSP15 - p $ P SUK A3,1 DECREMENT BUFFER INDEX - P LDK A2,/00 CLEAR ECB-BUFFER - P CF A15,STORE - P SUK A3,1 DECREMENT INDEX - *
0x0d3780…0d3914 (1, 113) Dummy {f00=0x0043, f01=0x0190, f02=»UBROUTINE TO CHECK INPUT CHARACTER - P* . * P* ON ENTRY: . 4 P* . J P* A2 = CHARACTER . T P* A3 = BUFFER INDEX . p P* A6 = DWT-ADDRESS . P* A7 = ORDER . P* . P* . P* ON EXIT: . P* . P* A1 = RETURN
0x0d3914…0d3aa8 Dummy {f00=0x0043, f01=0x0190, f02=»* . P IFT CSTAND=1 / P* / P CWK A7,2 ORDER 2? / * P RF(NE) CHEK05 NO / D P ANK A1,/20 / ^ ( P ORK A1,/5F 5F OR 7F AS UPPER LIMIT / r P LDK A4,/20 LOWER LIMIT / P RF CHEK08 / P* / P XIF / P* / PCHEK05 ANK A1,/10 /
0x0d3aa8…0d3c3c Dummy {f00=0x0043, f01=0x018e, f02=» A1,A2 / " P RF(N) CHERRO CODE CHECK ERROR 0 P SUR A4,A2 0 4 " P RF(P) CHERRO CODE CHECK ERROR 0 F P LDR* A1,A15 0 l PCHEK10 LDK A1,0 RETURN CODE 0 PCHEK20 RTN A5 0 P* 0 P* 0 P* CODE CHECK ERROR 0 P* 0 . PCHERRO LDK A1,4 SE
0x0d3c3c…0d3dd0 Dummy {f00=0x0043, f01=0x0190, f02=» 0 P* 1 D P* THIS IS THE INTERRUPT HANDLER ENTERED FROM CHLT/CHRT DRIVER 1 P* 1 Z P* 1 d PIHKB EQU * 1 n P IFT NOLJE=1 1 P LDR* A3,A6 GET ALLOW BITS 1 P ANK A3,/C0 1 4 P RF(E) IHNOL3 INPUT ALLOWED FROM BOTH KEYBOARDS 1 P LDK A
0x0d3dd0…0d3f64 Dummy {f00=0x0043, f01=0x018e, f02=»NE) EXIT 1 PIHNOL2 EQU * 2 P XIF 2 $ P* 2 0 P IFT CONVER=1 2 : P* 2 P P LDR A4,A2 INPUT WORD 2 Z " P SRL A4,11 DEVICE ADDRESS * 2 2 x P ANK A4,/E 2 $ P CC A4,DWTBC,A6 8-BIT SETTING ? 2 P RF(NE) IHKB03 2 P LDR A3,A2 2 P ANK A3,
0x0d3f64…0d40f8 Dummy {f00=0x0043, f01=0x0190, f02=» PIHKB02 ANKL A2,/FF3F 3 P RF IHKB04 3 4 PIHKB03 LD A3,DWTCON,A6 CONVERSION TABLE ADDRESS 3 2 P RF(E) IHKB04 3 j P LDR A4,A2 3 P ANK A4,/FF 3 P SRL A4,3 LINE INDEX 3 P ADR A3,A4 3 $ P LDR* A3,A3 COLUMN TABLE ADDRESS 3 P RF(E) IHKB0
0x0d40f8…0d428c Dummy {f00=0x0043, f01=0x0190, f02=» P XIF 4 P* 4 P* 4 P IFT NOLJE=1 4 $ P* 4 8 P LDR A3,A2 4 B P ANK A3,/3F 4 T P SUK A3,/22 4 h P RF(Z) IHNOL6 4 | P SUK A3,1 4 P RF(NZ) IHNOL8 4 P RF IHNOL7 4 PIHNOL6 ADK A2,7 4 PIHNOL7 ANKL A2,/FF3F 4 PIHNOL8 E
0x0d428c…0d4420 Dummy {f00=0x0043, f01=0x0190, f02=» 4 P RF(NN) IHKB10 NO,STORE CHARACTER IN DWT-BUFFER 5 P* 5 < P IFT CTIMUT=1 5 F P* 5 P LD A3,DWTTP,A6 5 f * P RF(E) IHKB05 NO TIMING ON THIS DEVICE 5 ~ P LDKL A3,-TIME RESTART TIME 5 P ST* A3,DWTTP,A6 5 P* 5 P XIF 5 P* 5 , P
0x0d4420…0d45b4 (1, 114) Dummy {f00=0x0043, f01=0x0190, f02=»F(E) EXIT YES 5 P LDR A3,A1 6 2 P CF A15,EOQUEU GET NEXT QUEUE POINTER ADDRESS 6 ( P CW A1,DWTUTQ,A6 OVERFLOW? 6 ^ P RF(NE) IHKB20 NO! 6 0 P ORK A2,/FF SET OVERFLOW BIT IN INPUT BUFFER 6 P RF IHKB30 6 0 PIHKB20 ST A1,DWTINQ,A6 STORE INQUEUE POI
0x0d45b4…0d4748 Dummy {f00=0x0043, f01=0x0190, f02=»RL A3,12 6 P LDK A4,/40 7 P SUK A3,1 7 $ P RF(E) IHNOL4 7 6 P LDK A4,/80 7 L P SUK A3,4 7 ` P RB(NE) IHNOL2 7 r $ PIHNOL4 ORRS A4,A6 SET ALLOW BIT 7 P RB IHNOL2 7 P XIF 7 P EJECT 7 P* 7 P* 7 P* A K B T U T 7 P
0x0d4748…0d48dc Dummy {f00=0x0043, f01=0x0190, f02=»ET DWT-ADDRESS 7 P CM DWTTP,A6 8 P LD A1,DWTST,A6 8 * P RB(N) EXIT 8 B P LDK A1,/40 SET RETURN CODE 8 V , P RB IHKB05 RESTORE REGISTERS AND END I/O 8 z P* 8 P XIF 8 P EJECT 8 P* 8 4 P* STORE = SUBROUTINE TO STORE A CHARACTER IN
0x0d48dc…0d4a70 Dummy {f00=0x0043, f01=0x0190, f02=» 8 t P* A3 = BUFFER INDEX 9 P* 9 & P* 9 0 PSTORE EQU * 9 : P LD A4,2,A8 BUFFER ADDRESS 9 N P ADR A4,A3 ADD BUFFER INDEX 9 p ( P SCR A2,A4 STORE CHARACTER IN BUFFER 9 $ P ADK A3,1 INCREMENT BUFFER INDEX 9 P ANK A2,/7F 9 P RF EOQU20 R
0x0d4a70…0d4c04 Dummy {f00=0x0043, f01=0x0190, f02=»Y: 9 P* : P* A1 = QUEUE POINTER : P* A6 = DWT-ADDRESS : 4 P* : R P* ON EXIT: : P* : r P* A1 = NEW QUEUE POINTER : | PEOQUEU EQU * : P INH : P ADK A1,1 : P SUR A1,A6 : P CWK A1,DWTEQ END OF QUEUE? : P
0x0d4c04…0d4d98 Dummy {f00=0x0043, f01=0x401a, f02=»* : P END ; @ ; 1 = QUEUE POINTER : P* A6 = DWT-ADDRESS : 4 P* : R P* ON EXIT: : P* : r P* A1 = NEW QUEUE POINTER : | PEOQUEU EQU * : P INH : P ADK A1,1 : P SUR A1,A6 : P CWK A1,DWTEQ END OF QUEUE? : P
0x0d4d98…0d4f2c Dummy {f00=0x0043, f01=0x2008, f02=» < O 0 ( P CF A15,TENDIO END I/O OUTPUT DEVICE 1 > PERETUR LD A6,DWTWAT,A6 RELOAD DWT-ADDRESS OF INPUT DEVICE 1 > 4 PRETUR ABL LDREGE RELOAD A3-A5 AND RETURN VIA A5 1 P* 1 P XIF 1 P* 1 P END 1 @ 1 RESS TO ADDRESS-BLOCK 0 2 P A
0x0d4f2c…0d50c0 Dummy {f00=0x0043, f01=0x0190, f02=» W ~ W d ' ( } ( $ P C C ~ B &/ W & / "!@ W 6 C C W6 6 t P C W $0 P ~ C f J} C WT781"&$ 39#$;< 6 B & J} C W*
0x0d50c0…0d5254 (1, 115) Opaque[0x194]
0x0d5254…0d53e8 # DirEnt {nam=»DRDY01«, typ=»SC«, f00=0x0009, f01=0x2020, f02=0x0878, f03=0x2020}
0x0d5254…0d53e8 IdxSect {
0x0d5254…0d53e8 f00 = 0x0043 // 0xd5254 @0x0
0x0d5254…0d53e8 f01 = 0x0016 // 0xd5256 @0x2
0x0d5254…0d53e8 gno = [ // 0xd5258 @0x4
0x0d5254…0d53e8 [0x00]: C0x0043.0x3.0
0x0d5254…0d53e8 [0x01]: C0x0044.0x0.0
0x0d5254…0d53e8 [0x02]: C0x0044.0x1.0
0x0d5254…0d53e8 [0x03]: C0x0044.0x2.0
0x0d5254…0d53e8 [0x04]: C0x0044.0x3.0
0x0d5254…0d53e8 [0x05]: C0x0045.0x0.0
0x0d5254…0d53e8 [0x06]: C0x0045.0x1.0
0x0d5254…0d53e8 [0x07]: C0x0045.0x2.0
0x0d5254…0d53e8 [0x08]: C0x0045.0x3.0
0x0d5254…0d53e8 [0x09]: C0x0046.0x0.0
0x0d5254…0d53e8 [0x0a]: C0x0046.0x1.0
0x0d5254…0d53e8 ]
0x0d5254…0d53e8 }
0x0d53e8…0d557c Dummy {f00=0x0043, f01=0x0190, f02=» 2 P IDENT DRDY01 REL 9.1 78-09-15 870105740912 P : P CURPOS OUTSIDE SCREEN B P REL 8.1 78-06-16 b P CURPOS ON 6351 ~ P REL 8.1 78-06-08 P DUMMY FAST OUTPUT P REL 8.1 78-04-21 P* 6 P******************
0x0d557c…0d5710 Dummy {f00=0x0043, f01=0x0190, f02=»C DISPLAY l P* P* P* & P* 0 P* : P* D 6 P************************************************** N P* P* : P* THIS DRIVER HANDLES OUTPUT TO THE VIDEO DISPLAYS @ P* PTS 6344, PTS 6342 AND TO THE PLASMA DISP
0x0d5710…0d58a4 Dummy {f00=0x0043, f01=0x0190, f02=»* < P* THE DRIVER INCLUDES DEVICE DEPENDENT ECHO-FUNCTIONS : P* WHICH MAKES IT POSSIBLE TO USE THE DISPLAY AS AN J : P* ECHO-DEVICE TO ANY KEYBOARD, THAT RUNS UNDER THE ( P* GENERAL KEYBOARD DRIVER DRKB01. P* P* 0 P*
0x0d58a4…0d5a38 Dummy {f00=0x0043, f01=0x0190, f02=»RUPT HANDLER x P* ( P* R C D Y RECOVERY ROUTINE P* J & P* E C H O D Y ECHO FUNCTIONS T P* ~ P P P P* * P* THE FOLLOWING ORDERS ARE TREATED: P* P* ORDER 00: TEST STATUS P*
0x0d5a38…0d5bcc Dummy {f00=0x0043, f01=0x0190, f02=»SITIONING x P* 31: ERASE P* . P* NORMAL REGISTER USAGE 8 P* Z " P* REGISTER A1 = RETURN CODE d ( P* A2 = OUTPUT CHARACTER $ P* A3 = BUFFER INDEX $ P* A4 = WORK REGISTER " P*
0x0d5bcc…0d5d60 Dummy {f00=0x0043, f01=0x0190, f02=» r P* P EJECT P* P* * P* SYSTEM ADAPTATION 4 P* R < P* DISPLAY TYPE MUST BE DEFINED IN FIRST WORD IN DWT. P* * P* --------------------------------- P* BIT: 10 11 P* -------------- " P
0x0d5d60…0d5ef4 (1, 116) Dummy {f00=0x0044, f01=0x0190, f02=»----------------------- P* 6 P* BY MEANS OF CONDITIONAL ASSEMBLY THE DRIVER: * 4 P* -CAN HANDLE GRAFIC MODE FOR PTS 6351 OR NOT d , P* -IS ADAPTED TO CONTROL ONLY PTS 6344 : P* -CAN USE LOWER CASE CHAR. GENERATOR COLUMN 6 AND 7 8
0x0d5ef4…0d6088 Dummy {f00=0x0044, f01=0x0190, f02=»12), LOW INT (/1E), HIGH INT (/1F) p P EJECT * P* 8 P* B P* L P* V P*********** ` P* ENTRIES * t P*********** P* P* P* ( P ENTRY DYAD ADDRESS TO ADDRESSBLOCK 0 P ENTRY ECHODY DEVICE-DEPENDENT ECH
0x0d6088…0d621c Dummy {f00=0x0044, f01=0x0190, f02=»TRIES * t . P***************************************** P* H P* R $ P EXTRN DISIOE I/O REQUEST ERROR . P EXTRN OUTPUT SUBROUTINE TO SEND CHARACTER P EXTRN TDISP DISPATCHER > P EXTRN LDREG LOAD REGISTERS A4, A3, A5, A7, A8 AND
0x0d621c…0d63b0 Dummy {f00=0x0044, f01=0x0190, f02=»CHO h 0 P EXTRN GETCHR GET CHARACTER FROM ECB-BUFFER P EJECT @ P* N P************************ X P* DWT PARAMETERS * x P************************ P* P EXTRN DWTST STATUS P EXTRN DWTOR ORDER P* $ P******
0x0d63b0…0d6544 Dummy {f00=0x0044, f01=0x0190, f02=» BYTE COUNTER ( PDWTAP EQU /22 HEAD POSITION POINTER PDWTPOS EQU /25 POSITIONS B PDWTLIN EQU /24 LINES b P* ~ P EJECT P************* P* CONSTANTS * P************* P* PFASTO EQU /14 FAST OUTPUT $ PSCAD
0x0d6544…0d66d8 Dummy {f00=0x0044, f01=0x0190, f02=»SITY START x & PLISTOP EQU /1F LOW INTENSITY STOP PBACKSP EQU /08 BACKSPACE < PLF EQU /0A LINE FEED PHOME EQU /0B CURSOR HOME x ( PCLEHOM EQU /0C CLEAR AND CURSOR HOME PCR EQU /0D CARRIAGE RETURN PCURRIG EQU /10 CURSOR RIGHT
0x0d66d8…0d686c Dummy {f00=0x0044, f01=0x0190, f02=» EQU /12 RETURN TO ALPHANUMERIC MODE * PESCAPE EQU /11 ESCAPE TO GRAPHIC MODE , " PPOINT EQU /2E POINT CHARACTER Z 2 PEQU EQU 6 THRESHOLD FOR AUTOMATIC FAST OUTPUT PSTILL EQU /18 CURSOR STEADY P* P******************** P* RET
0x0d686c…0d6a00 Dummy {f00=0x0044, f01=0x0190, f02=» P* P EJECT P* P* & . P***************************************** 0 . P* CONDITIONAL ASSEMBLY * b . P***************************************** P* P* H P* BY SETTING X:A TO 1 DRIVER CAN HANDLE GRA
0x0d6a00…0d6b94 (1, 117) Dummy {f00=0x0044, f01=0x0190, f02=»Y PTS 6344 b P* PX:B EQU 1 PWHATDY EQU X:B . P* D P* N 8 P* BY SETTING X:C TO 1 LOWER CASE CHAR. GENERATOR X & P* (COLUMNS 6 AND 7) CAN BE USED PX:C EQU 0 PLOWCHA EQU X:C P* P* 8 P* BY MEANS
0x0d6b94…0d6d28 Dummy {f00=0x0044, f01=0x0190, f02=»NG THE CONSTANT X:G=0 r P* PX:D EQU 0 ( PEORECH EQU X:D : P* P 0 P* BY SETTING THE CONSTANT TRASPA = 1 IT IS Z @ P* POSSIBLE TO SUPPRESS TRAILING BLANKS, /12, /1E AND /1F. P* PX:E EQU 0 PTRASPA EQU X:E P EJE
0x0d6d28…0d6ebc Dummy {f00=0x0044, f01=0x0190, f02=»:F P* P EJECT P* " P* , P********** 6 P* TABLES * H P********** Z P* l P* v P* PDYAD EQU * ADDRESS BLOCK P DATA ACDY ACTIVATION DRIVER P DATA IHDY INTERRUPT HANDLER P DATA RCDY RECOVERY RO
0x0d6ebc…0d7050 Dummy {f00=0x0044, f01=0x0190, f02=»A /0712,/131E,/1F14 P EJECT P* * P* A C D Y 4 P* H * P* ACDY = ACTIVATION DRIVER DISPLAY R P* H P* ORDER 00: TEST STATUS. DUMMY IS SENT TO DISPLAY AND RETURN CODE 2 P* IS SET IF DISPLAY NOT OPERABLE
0x0d7050…0d71e4 Dummy {f00=0x0044, f01=0x018e, f02=»CK. b P* F P* ORDER 06: STANDARD WRITE. CHARACTERS ARE SENT TO DISPLAY FROM < P* ECB-BUFFER AFTER INDIVIDUAL CODE CHECK. ` P* L P* IF A PREDEFINED NUMBER OF CHARACTERS (SEE CONSTANT 'EQU') J P*
0x0d71e4…0d7378 Dummy {f00=0x0044, f01=0x0190, f02=» P* P IFT GRAFIC=1 B P* ORDER 07: WRITE GRAPHIC DISPLAY. THE DISPLAY IS SWITCHED $ @ P* TO GRAPHIC MODE AND INFORMATION IN ECB-BUFFER j * P* IS SENT TO THE DISPLAY. P* P XIF : P* ORDER /B: CURSOR
0x0d7378…0d750c Dummy {f00=0x0044, f01=0x0190, f02=»NO INFORMATION ON DISPLAY p @ P* IS ERASED. THEN STANDARD WRITE (SEE ORDER 6) " P* IS EXECUTED. f P* < P* ORDER 31: ERASE. THE DISPLAY IS ERASED ON THE LINE < P* WHERE THE CURSOR IS POSITIONED THE NU
0x0d750c…0d76a0 Dummy {f00=0x0044, f01=0x0190, f02=»RTS X : P* IN THE CURSOR POSITION. THE CURSOR RE- * P* MAINS IN THAT POSITION. J PACDY EQU * x P LDK A3,0 START BUFFER INDEX P LDK A4,0 COUNTER P LDR A7,A7 ORDER 0 ? P ABL(E) ADY410 YES P LDK A2,ST
0x0d76a0…0d7834 (1, 118) Dummy {f00=0x0044, f01=0x0190, f02=»LAY x P RF(E) ACDY02 NO P IFT GRAFIC=1 $ P CWK A7,7 ORDER ' ? : P ABL(E) ADY500 V P XIF l P IFT WHATDY=0 x . P LDK A2,/12 INDICATE SWITCH TO ALPHA MODE P CF A5,OUTPUT P* P XIF P* PACDY02 EQU *
0x0d7834…0d79c8 Dummy {f00=0x0044, f01=0x0190, f02=» ABL(E) ADY200 YES P SUK A7,/26 ORDER ERASE ? P ABL(E) ADY160 YES < P* V & PDYERR ABL DISIOE I/O REQUEST ERROR ` P EJECT : P* ACTIONS SPECIFIED BY USER IN RIGHT BYTE IN BUFFER P* ARE CARRIED OUT. 0 P* /2B
0x0d79c8…0d7b5c Dummy {f00=0x0044, f01=0x0190, f02=» P* OTHER VALUE CR, LF P* & PACDY20 EQU * 0 $ P LD A2,4,A8 GET REQUESTED LENGTH D P RF(E) ACDY25 l P LDK A3,2 START BUFFER INDEX " P LD A2,2,A8 GET BUFFER ADDRESS & P LC A2,1,A2 GET CONTROL CHARACTER P ANK A2,/FF
0x0d7b5c…0d7cf0 Dummy {f00=0x0044, f01=0x0190, f02=» LDK A4,1 INDICATE LINE FEED " P ADK A2,1 DOUBLE LINE FEEED ? $ P RF(NE) ACDY30 J ( P ADK A4,1 INDICATE DOUBLE LINE FEED ` P P $ PACDY30 LDK A2,CR CARRIAGE RETURN PACDY35 LDK A1,1 2 P SC A1,DWTAP+1,A6 RESET HEAD POSITION COUNTE
0x0d7cf0…0d7e84 Dummy {f00=0x0044, f01=0x0190, f02=»ACDY52 SUK A4,1 & P RF(N) ACDY90 START SECTION ENDED? P LC A1,DWTLIN,A6 LINES B P CC A1,DWTAP,A6 LAST LINE ? ` P RF(L) ACDY55 ( P LDKL A2,/100 INCREMENT LINE COUNTER P ADS A2,DWTAP,A6 & PACDY55 LDK A2,LF LINE FEED TO SEND P
0x0d7e84…0d8018 Dummy {f00=0x0044, f01=0x0190, f02=» P EJECT P* & P* GET, CHECK AND SEND CHARACTER P* (IF ORDER 5 NO CHECK) F P* h PACDY70 EQU * r P IFT WHATDY=0 & P LDR* A4,A6 GET CHANNEL PARAMETER P ANK A4,/10 $ P RF(NZ) ACDY75 NOT 6344 OR 6386 P XIF
0x0d8018…0d81ac Dummy {f00=0x0044, f01=0x0190, f02=»S! PACDY75 EQU * P CF A5,OUTPUT 2 PACDY80 CF A15,POSUPD POSITION COUNTER UPDATING 4 P IFT TRASPA=1 j ( P LD A1,2,A8 GET BUFFER ADDRESS (BA) ( P LD A2,4,A8 GET REQUESTED LENGTH(RL) $ P ADR A1,A2 GET ADD END OF BUFFER PSKIP05 C
0x0d81ac…0d8340 Dummy {f00=0x0044, f01=0x0190, f02=») SKIP20 NO PSKIP07 SUK A2,1 DECR RL P RB SKIP05 GET NEXT 4 PSKIP20 CWK A2,4 P P RF(NG) SKIP30 RL < 5 h P LC A4,-2,A1 GET CHAR $ P CCK A4,/1111 TABULATION CHAR ? P RF(NE) SKIP25 NO! P SUK A1,2 DECR BA P SUK A2,
0x0d8340…0d84d4 (1, 119) Dummy {f00=0x0044, f01=0x0190, f02=»RT? v P RB(Z) SKIP07 YES! SKIP IT! P SUK A4,/C LOW INT. START? 0 P RB(Z) SKIP07 YES! R P SUK A4,1 LOW INT. STOP? l P RB(Z) SKIP07 YES! P* " PSKIP30 ST A2,4,A8 STORE NEW RL P XIF PACDY90 LDK A4,0 6 PADY100 CF A15,
0x0d84d4…0d8668 Dummy {f00=0x0044, f01=0x0190, f02=»CDY75 P ANK A2,/7F P LDK A1,5 SET TABLE POINTER " " P CC A2,TABSPE,A1 FAST OUTPUT? F P RF(E) ADY125 l P SUK A1,1 NO! " P LDR* A7,A6 CHANNEL PARAMETER P ANK A7,/30 GRAFIC DISPLAY ? P RF(E) ADY110 NO P LDK A1,0 SET
0x0d8668…0d87fc Dummy {f00=0x0044, f01=0x0190, f02=»Y122 NO P LDK A4,/80 , PADY120 ORRS A4,A6 SET LOW INTENSITY MODE $ P LDK A4,0 T P RB ACDY50 f $ PADY122 CCK A2,/1212 UNDERLINE ? x P RF(NE) ADY125 " P LDK A4,/40 SET UNDERLINE MODE P RB ADY120 & PADY125 CCK A2,/1414 FAST O
0x0d87fc…0d8990 Dummy {f00=0x0044, f01=0x0190, f02=» P LDR A2,A4 ! P LD A4,4,A8 REQ LENGTH ! P SUR A4,A3 NUMBER OF CHARS ! 4 P RF(Z) ADY127 NONE ! V P* ! p P IFT WHATDY=0 ! z & P LDR* A7,A6 GET CHANNEL PARAMETER ! P ANK A7,/10 ! 2 P RF(NZ) OTHER OTHER DISPLAY THAN 6344 OR 6386? ! P XIF
0x0d8990…0d8b24 Dummy {f00=0x0044, f01=0x0190, f02=» ADY405 ! PADY128 EQU * " P SUK A1,1 GET NEXT " $ P RB(NN) ADY110 NOT AT END " > P LDR A1,A2 MOVE CHARACTER " ` P SUK A1,/11 TAB CHAR? (11) " P RF(E) ADY140 " P SUK A1,/F LESS THAN /20 ? " " P RF(N) ADY130 CODE CHECK ERROR " P SUK
0x0d8b24…0d8cb8 Dummy {f00=0x0044, f01=0x0190, f02=» TO CHARACTER BETWEEN /40 TO /5F " P XIF # ( P RB ACDY70 # 4 P* # F P* # P P IFT WHATDY=0 # Z POTHER EQU * # p P************************ # P* A3 = INDEX # P* A1 = CHARACTER # P* A4 = NUMBER # P************************ # P L
0x0d8cb8…0d8e4c Dummy {f00=0x0044, f01=0x0190, f02=»ET MAX-POS AND # ~ P ANK A3,/FF $ P ST A4,10,A8 SAVE LENGTH $ * P SUR A3,A2 COMPARE $ J P RF(NN) OT030 LENGTH OK $ d P ADR A4,A3 $ P ST A4,10,A8 SAVE LENGTH $ 0 P ADK A4,1 ADJUST NUMBER OF OUTPUT CHARACTERS $ POT030 EQU * $ & P LDR A3,A1
0x0d8e4c…0d8fe0 Dummy {f00=0x0044, f01=0x0190, f02=»P) OT010 $ P LD A4,10,A8 GET ACT. LENGTH % POT040 LDK A2,BACKSP % 4 P CF A5,OUTPUT SENDBACKSPACE % P P SUK A4,1 DECREMENT LENGTH % t P RB(P) OT040 % P RB ADY127 % P XIF % P EJECT % P* % P* CODE CHECK ERROR % P* % P
0x0d8fe0…0d9174 (1, 120) Dummy {f00=0x0045, f01=0x018e, f02=» P* & PADY140 EQU * & , P CF A15,GETCHR GET FIRST ASCII CHARACTER & " P LDR A4,A2 & R . P CF A15,GETCHR GET SECOND ASCII CHARACTER & d P ANK A2,/F & P ANK A4,/F & P RF(E) ADY144 & 0 PADY143 ADK A2,/A FROM DECIMAL TO HEXADECIMAL & P SUK
0x0d9174…0d9308 Dummy {f00=0x0045, f01=0x0190, f02=» & ~ , P SUR A2,A4 AND REQUESTS POSITION COUNTER ' & P TO GET NUMBER OF SPACES TO SEND ' 8 P RB(NP) ADY100 ' b P LDR A4,A2 ' x & PADY145 LDK A2,CURRIG CURSOR RIGHT ' PADY146 CF A5,OUTPUT ' , P CF A15,POSUPD POSITION COUNTER UPDATING ' P SUK A4,
0x0d9308…0d949c Dummy {f00=0x0045, f01=0x0190, f02=»D A4,10,A8 GET NUMBER OF CHAR TO ERASE ' P IFT WHATDY=0 ( . " P LDR* A1,A6 CHANNEL PARAMETER ( D P ANK A1,/10 GRAFIC DISPLAY? ( j P RF(NE) ADY170 YES ( P XIF ( P LDK A3,/20 ( P CF A5,FASTER FAST OUTPUT ( PADY165 LDK A2,ETB ( P CF
0x0d949c…0d9630 Dummy {f00=0x0045, f01=0x018e, f02=»0 ERASE READY ( * P CWK A4,/24 REQ LENGTH > 36 ********** ) * P RB(G) ADY170 YES EV 781205 ********** ) D P LDK A2,/20 SPACE ) r P CF A5,OUTPUT SEND IT ) P RB ADY170 ) PADY180 LD A4,10,A8 ) P AD A4,DWTAP,A6 ) P ANK A4,/FF ) P LC A3
0x0d9630…0d97c4 Dummy {f00=0x0045, f01=0x0190, f02=» ) , P RB(N) ADY165 CURSOR IN ORIGIN POSITION * P LDK A2,BACKSP CURSOR LEFT * 8 P CF A5,OUTPUT SEND IT * Z P RB ADY186 AGAIN * x PADY190 EQU * * P LD A4,DWTAP,A6 * P ANK A4,/FF * P SUR A3,A4 * P RB ADY186 * P XIF * P EJECT *
0x0d97c4…0d9958 Dummy {f00=0x0045, f01=0x0190, f02=»CHANNEL PARAMETER * P ANK A1,/10 GRAFIC DISPLAY? + P RF(NE) ADY205 YES + > 2 P* IF VIDEO (6344) SET CURSOR ADDRESS DIRECT + X P XIF + * P LD A4,10,A8 GET REQUESTED CURSOR POS + . P ST A4,DWTAP,A6 UPDATE LINE & POS COUNTER + P CF A5,CURPOS
0x0d9958…0d9aec Dummy {f00=0x0045, f01=0x0190, f02=»LIN,A6 OUTSIDE SCREEN? + P RF(NG) ADY207 NO! , 4 P LC A4,DWTLIN,A6 YES! SET CURSOR AT END OF LINE , 8 PADY207 EQU * , p $ P LC A3,DWTAP,A6 GET ACTUAL LINE , PADY210 CWR A4,A3 , . P RF(N) ADY250 REQUESTED LINE ABOVE ACTUAL , P RF(E) ADY300 SAME
0x0d9aec…0d9c80 Dummy {f00=0x0045, f01=0x018e, f02=»STED LINE , " P RB(NZ) ADY210 NOT EQUAL ZERO - P LDK A4,1 - 8 P RF ADY300 - J PADY250 LDK A2,HOME HOME - & P LDK A3,1 RESET ACTUAL LINE NUMBER - | " P ST A3,DWTAP,A6 RESET POSITION - P RB ADY230 - P* - P* GET POSITION - P* -
0x0d9c80…0d9e14 (1, 121) Dummy {f00=0x0045, f01=0x0190, f02=» - n P RF(NG) ADY303 NO! . " P LC A4,DWTPOS,A6 SET LAST LINE . " PADY303 EQU * . H P CWK A4,1 FIRST POSITION ? . P RF(NE) ADY305 NO . ~ P CWR A4,A3 FIRST LINE ? . P RF(NE) ADY305 NO . P LDK A2,HOME CURSOR GO HOME . P RF ADY330 . * P
0x0d9e14…0d9fa8 Dummy {f00=0x0045, f01=0x0190, f02=»-POS? . | P RF(NG) ADY310 NO! / P SUK A3,1 / ( * PADY310 CWR A4,A3 FORWARDS OR BACKWARDS / : P RF(E) ADY370 POSITION FOUND / h P RF(N) ADY340 BACK / P LDK A2,CURRIG CURSOR RIGHT / & P ADK A3,1 UPDATE POSITION COUNTER / PADY330 CF A5,OUTPUT
0x0d9fa8…0da13c Dummy {f00=0x0045, f01=0x0190, f02=»DY345 BACKSPACE WAY / P LDK A2,CR CARRIAGE RETURN 0 & P LDK A3,1 INDICATE FIRST POSITION 0 > P RB ADY330 0 h " PADY345 LDK A2,BACKSP BACKSPACE 0 z P CF A5,OUTPUT SEND 0 P SUK A3,1 LAST BACKSPACE ? 0 P RB(NE) ADY345 0 8 PADY370 SC A4,DWTAP+1,A
0x0da13c…0da2d0 Dummy {f00=0x0045, f01=0x0190, f02=» 0 & PADY400 LDK A2,/22 START CHARACTER 1 P CF A5,OUTPUT 1 2 P* 1 H P XIF 1 R P* 1 ^ P EJECT 1 h P* 1 v P* 1 8 P* SEND LAST DUMMY, SET CURSOR POSITION IN CONTROL 1 4 P* WORD, LOAD A1 WITH RETURN CODE AND END I/0. 1 P* 1 P
0x0da2d0…0da464 Dummy {f00=0x0045, f01=0x0190, f02=»DR A4,A1 1 P ANK A1,/40 UNDERLINE MODE ? 2 P RF(E) ADY406 NO 2 4 " P LDK A2,ULSTOP UNDERLINE STOP 2 L P CF A5,OUTPUT 2 r * PADY406 ANK A4,/80 LOW INTENSITY MODE ? 2 P RF(E) ADY407 2 & P LDK A2,LISTOP LOW INTENSITY STOP 2 P CF A5,OUTPUT 2
0x0da464…0da5f8 Dummy {f00=0x0045, f01=0x0190, f02=»COUNTER 2 l PADY410 LDK A2,ETX LAST DUMMY 3 P CF A5,OUTPUT SEND DUMMY 3 4 PADY415 EQU * 3 T P SUK A7,5 ORDER 5 ? 3 h P RF(NE) ADY420 3 P LDKL A4,/101 HOME POSITION 3 P ST A4,DWTAP,A6 3 , PADY420 LD A4,DWTAP,A6 GET CURSOR POINTER 3 * P S
0x0da5f8…0da78c Dummy {f00=0x0045, f01=0x0190, f02=»RAFIC=1 3 P* 4 P EJECT 4 P* 4 ( P* GRAPHIC PART 4 2 P* 4 L PADY500 EQU * 4 V P LDK A2,/11 4 j ( P CF A5,OUTPUT SWITCH TO GRAFIC MODE 4 ~ & PADY510 CF A15,GETCHR GET CHARACTER 4 P LDR A1,A1 BUFFER EMPTY 4 P RB(E) ADY400 4
0x0da78c…0da920 Dummy {f00=0x0045, f01=0x0190, f02=»ESSAGE 4 | P* 5 P* ADDRESS MESSAGE 5 P* 5 4 P* SET FIRST OUT PUT IN A2 5 > P* AND SECOND IN A4 5 b P* 5 P SLL A1,4 5 P LDR A4,A2 5 P SRL A4,4 5 P ORR A4,A1 5 P ANK A2,/F 5 P ANK A4,/7F 5 P ORK A2,/20 5
0x0da920…0daab4 (1, 122) Dummy {f00=0x0045, f01=0x018e, f02=» RB ADY510 5 P EJECT 6 P* 6 P* DATA MESSAGE 6 * P* 6 D " P* FIRST OUTPUT IS SET IN A2 6 N P* AND SECOND IN A4 6 t P* 6 PADY530 SLL A1,13 6 P LDR A4,A2 6 P SLL A2,5 6 P ORR A1,A2 6 P LDK A7,10 6 P LDK A2,0 6
0x0daab4…0dac48 Dummy {f00=0x0045, f01=0x0190, f02=» P RB ADY540 7 PADY560 LDR A4,A2 7 P SRL A4,4 7 . P ANK A4,/3F 7 @ P ANK A2,/F 7 T P ORK A2,/60 7 f P RB ADY515 7 z P* 7 P XIF 7 P* 7 P EJECT 7 P* 7 , P* UPDAPP = SUBROUTINE TO UPDATE HEAD 7 , P* POSITI
0x0dac48…0daddc Dummy {f00=0x0045, f01=0x0190, f02=» ADS A3,DWTAP,A6 UPDATE HEAD POSITION POINTER 7 P LDK A3,0 8 6 , P SC A3,DWTBC,A6 RESET POSITION COUNTER 8 H P RTN A15 8 x P* 8 6 P* POSUPD = SUBROUTINE TO UPDATE ACTUAL POSITION 8 0 P* POINTER WHEN REQUEST RUNNING. 8 > P*
0x0daddc…0daf70 Dummy {f00=0x0045, f01=0x018e, f02=» A2,/FF 8 2 P AD A2,DWTAP,A6 INCLUDE HEAD POSITION POINTER 9 P ANK A2,/FF 9 F " P CC A2,DWTPOS,A6 END OF ROW ? 9 Z P RF(P) POSU10 9 , P IM DWTST,A6 INCREMENT POSITION COUNTER 9 PPOSU10 RTN A15 9 P EJECT 9 P* 9 P* I H D Y 9 P
0x0daf70…0db104 Dummy {f00=0x0045, f01=0x0190, f02=» 9 x P RF(N) IHDY10 : . P LDR A1,A1 RETURN CODE FROM CHANNEL UNIT ? : P RB(NE) ADY420 YES : P 4 PIHDY10 ABL LDREG RELOAD A3-A5 AND RETURN VIA A5 : j P EJECT : P* : P* R C D Y : P* : ( P* RCDY = RECOVERY ROUTINE DISPLAY : P* :
0x0db104…0db298 Dummy {f00=0x0045, f01=0x0190, f02=» A6 = DWT-ADDRESS : P* A7 = ORDER ; P* A8 = ECB-ADDRESS ; 4 PRCDY EQU * ; R , P CF A15,SAVE8 SAVE 8 REGISTERS ON STACK ; d $ P LD A3,DWTST,A6 SAVE STATUS WORD ; P LDKL A2,/7FFF ; P ANS A2,DWTST,A6 SET BUSY ; P IFT STEADY-WHATDY=1
0x0db298…0db42c Dummy {f00=0x0045, f01=0x0190, f02=» ; n P CF A5,OUTPUT < PRCDY05 EQU * < P XIF < 2 P* < > P IFT WHATDY=0 < H P* < ^ " P LDR* A2,A6 CHANNEL PARAMETER < h " P ANK A2,/10 GRAPHIC DISPLAY ? < P RF(E) RCDY10 NO < . P LDK A2,RETURN RETURN TO ALPHANUMERIC MODE < P CF A5,OUT
0x0db42c…0db5c0 Dummy {f00=0x0045, f01=0x0190, f02=»DR A4,A4 LRC-ERROR IN BLOCK ? < P RF(NE) RCDY20 = & " P LDK A2,CLEHOM CLEAR AND HOME = < P CF A5,OUTPUT SEND = b P LDKL A2,/101 = | 6 P ST A2,DWTAP,A6 SET HEAD LINE-AND-POSITION COUNTER = P LDR A3,A3 GET OLD STATUS = P RB(N) ENDIO NOT BUSY =
0x0db5c0…0db754 (1, 123) Dummy {f00=0x0045, f01=0x0190, f02=»* = PRCDY20 EQU * > P SUK A7,5 ORDER 5 ? > P RF(NE) RCDY25 NO > : ( P LDK A1,2 INDICATE THROUGHPUT ERROR > T P RB RCDY15 > & PRCDY25 LDK A2,STX START OF MESSAGE > P CF A5,OUTPUT > 4 P LC A4,DWTBC,A6 GET NUMBER OF POSITIONS TO BACK >
0x0db754…0db8e8 Dummy {f00=0x0045, f01=0x0190, f02=» ABL ACDY90 > P EJECT ? P* ? " P* E C H O D Y ? , P* ? D 0 P* ECHODY = DEVICE-DEPENDENT ECHO-ROUTINE ? N P* ? PECHODY EQU * ? P LDR A7,A7 EOR? ? P RF(N) ECDY17 YES ? P LDR A3,A2 SAVE CHARACTER ? P* ? P IFT EOREC
0x0db8e8…0dba7c Dummy {f00=0x0045, f01=0x0190, f02=»UK A3,/8 ? P RF(E) ECDY40 BACKSPACE @ P SUK A3,/10 @ 0 P RF(E) ECDY50 CLEAR @ D & PECDY10 CF A5,OUTPUT SEND CHARACTER @ ` , P CF A15,POSUPD POSITION COUNTER UPDATING @ P RF ECDY20 @ 4 PECDY17 CF A15,UPDAPP UPDATE HEAD CURSOR POINTER @ ( PECDY
0x0dba7c…0dbc10 Dummy {f00=0x0045, f01=0x0190, f02=»ER @ n P ANK A4,/FF A P RB(E) ECDY20 FIRST POSITION A $ P LDK A4,1 INDICATE ONE BACKSTEP A B P CF A5,BACCAN BACK A j P RB ECDY20 A P EJECT A P* A P* CLEAR A P* A PECDY50 EQU * A ( P LC A4,DWTBC,A6 GET POSITION COUNTER A
0x0dbc10…0dbda4 Dummy {f00=0x0045, f01=0x0190, f02=»AFIC DISPLAY A P RF(E) ECDY60 N B P CF A5,BACCAN BACK B , P RB ECDY20 B F P XIF B X * PECDY60 LDR A3,A4 SAVE POSITION COUNTER B d 6 P LD A4,DWTAP,A6 GET HEAD LINE-AND-POSITION COUNTER B P CF A5,CURPOS SET CURSOR B P LDR A4,A3 GET POS COUNTER B
0x0dbda4…0dbf38 Dummy {f00=0x0045, f01=0x0190, f02=»POSITION COUNTER B z P RB ECDY20 C P EJECT C * P* C 8 P* C B 0 P* BACCAN = SUBROUTINE TO POSITION CURSOR C L 0 P* AT THE PLACE BEFORE REQUEST IF C 0 P* CLEAR OR BACKWARDS ONE STEP IF C P* BACKSPACE. C P
0x0dbf38…0dc0cc Dummy {f00=0x0045, f01=0x018e, f02=» POSITION COUNTER C x P ANK A2,/FF D " P CC A2,DWTPOS,A6 LAST POSITION D . P RF(NP) BACA10 NO D T $ P LDK A2,SPACE DESTRUCTIVE SPACE D n P RF BACA20 D " PBACA10 LDK A2,BACKSP BACKSPACE D P CF A5,OUTPUT SEND D $ P LDK A2,SPACE DESTRUCTIVE SPACE
0x0dc0cc…0dc260 Dummy {f00=0x0045, f01=0x0190, f02=» P NGR A3,A3 NEGATE REGISTER E , P ADS A3,DWTST,A6 UPDATE POSITION COUNTER E & P RTN A5 E V P EJECT E f 4 P*********************************************** E t 4 P* CHECK = SUBROUTIN TO CHECK USER BUFFER IN * E 4 P* ORDER TO GET A REASON FO
0x0dc260…0dc3f4 (1, 124) Dummy {f00=0x0046, f01=0x0190, f02=»******************************************* E PCHECK EQU * F 4 P* F H P* F R P LD A1,4,A8 F P SUR A1,A3 END OF BUFFER? F p P ABL(NP) ACDY75 YES! F , P LDR A7,A2 SAVE CHER TO SEND (AND CHECK) F ( P LDR A2,A4 SAVE BUFFER ADDRESS+INDEX F
0x0dc3f4…0dc588 Dummy {f00=0x0046, f01=0x0190, f02=»2,1 INCREMENT POINTER F $ P CCR A7,A2 CHAR EQU TO PREVIUS? G P RB(E) NEXT YES! G F POUT EQU * G ^ 6 P CWK A4,EQU CONDITION FOR FAST OUTPUT FULLFILLED? G p P RF(L) NOFAST NO! G & P********************************** G & P* UPDATE ACTUAL POSITION P
0x0dc588…0dc71c Dummy {f00=0x0046, f01=0x0190, f02=»EX G t P ST A3,10,A8 SAVE INDEX H 0 P LC A3,DWTPOS,A6 GET MAXNUMBER OF CHAR/LINE H * P SUR A3,A2 AND COMPARE H ^ P SUR A3,A4 H | P RF(NN) HIT H P ADR A4,A3 H P ADK A4,1 H ( PHIT ADS A4,DWTST,A6 UPDATE POSITION H P**********************
0x0dc71c…0dc8b0 Dummy {f00=0x0046, f01=0x018e, f02=» H " P LD A4,DWTST,A6 GET ACTUAL POS I P ANK A4,/FF I . ( P AD A4,DWTAP,A6 INC HEAD POS POINTER I B P CF A5,CURPOS I n " P***************************** I " P* RESTORE A3 (BUFFER INDEX) * I & P LD A3,10,A8 RESTORE BUFFER INDEX I P SUK A3,1 I
0x0dc8b0…0dca44 Dummy {f00=0x0046, f01=0x0190, f02=» I P* J < P* FASTER = SUBROUTINE TO OUTPUT SPACE AT FAST OUTPUT J 4 P* AT ENTRY A4 = NUMBER OF CHARACTERS J R P* J PFASTER EQU * J P CWK A4,/60 J . P RF(L) FAS010 NUMBER OF CHAR NOT TOO LONG J P LDK A4,/59 J PFAS010
0x0dca44…0dcbd8 Dummy {f00=0x0046, f01=0x0190, f02=» CF A5,OUTPUT SEND J P LDR A2,A3 K P CF A5,OUTPUT SEND K , P RTN A5 K F P EJECT K V P* K d P* K n * P* CURPOS = SUBROUTINE TO SET CURSOR K x > P* AT ENTRY A4 = CURSOR POS (POSITION AND LINE) K P* K PCURPOS EQU * K P A
0x0dcbd8…0dcd6c Dummy {f00=0x0046, f01=0x4164, f02=» RF(NN) CURR05 YES! K P LCK A4,/7F00 L PCURR05 EQU * L 2 P LDR A2,A4 L F & P CF A5,OUTPUT OUTPUT POSITION (X) L X P LDR A2,A4 L P RF(NN) CURR10 Y < /80! L P LDK A2,/7F L P RF CURR15 L PCURR10 EQU * L P SRL A2,8 SHIFT RIGHT L
0x0dcd6c…0dcf00 Dummy {f00=0x0046, f01=0x2008, f02=» M NE) BACA10 7 P NGR A3,A3 NEGATE REGISTER 7 , P ADS A3,DWTST,A6 UPDATE POSITION COUNTER 7 < P RTN A5 7 l P END 7 |@ 7 6 t P* 6 PBACCAN EQU * 6 P LDR A3,A4 6 " PBACA10 LDK A2,BACKSP BACKSPACE 6 P CF A5,OUTPUT SEND 6 $ P LDK
0x0dcf00…0dd094 (1, 125) Dummy {f00=0x0046, f01=0x0190, f02=» 2 F IDENT T:ASG0 P,3.2,78-09-15,870136940320 F ASSGN F : , ( AB F J ASSGN . F z T:FDSPA F , ( ! ( " A F I:EVA0 F , ( ? 2 A
0x0dd094…0dd228 Dummy {f00=0x0046, f01=0x0008, f02=» 0 8 @ H
0x0dd228…0dd3bc Dummy {f00=0x0046, f01=0x0190, f02=» 2 P IDENT INTVMA REL 8.2 78-09-15 870105040820 P : P* B 8 P*************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 4 P* INTVMA = INTERRUPT VECTORS AND SYSTEM START 4 P*
0x0dd3bc…0dd550 Dummy {f00=0x0046, f01=0x0190, f02=»********* f P P P " P* * P* 4 8 P* THIS MODULE CONTAINS HARDWARE INTERRUPT VECTORS, > . P* COMMUNICATION VECTOR TABLE,STACK AREA z $ P* AND MONITOR INITIALIZATION. P* P* P P P P P
0x0dd550…0dd6e4 Dummy {f00=0x0046, f01=0x0190, f02=» ENTRY CVTSBA ADDRESS TO START OF BUFFER POOL 0 P ENTRY CVTEBA ADDRESS TO END OF BUFFER POOL 6 , P ENTRY CVTINP INTERPRETER ADDRESS TABLE j P ENTRY CVTDK START UP DISC & P ENTRY CVTAPA APPLICATION ADDRESS , P ENTRY CVTAPS APPLICATION START AD
0x0dd6e4…0dd878 Dummy {f00=0x0046, f01=0x018e, f02=»T LOAD BLOCK TABLE ADDRESS | ( P ENTRY FREPAR FREE PARTITION POINTER " " P ENTRY PARLEN PARTITION LENGTH N & P ENTRY NUMPAR NUMBER OF PARTITIONS t P , P EXTRN IHPFAR POWER FAIL / AUTO RESTART P EXTRN IHLKM LKM INTERRUPT P EXTRN IHRTC REA
0x0dd878…0dda0c Dummy {f00=0x0046, f01=0x0190, f02=» P** P** P** P** " P** , * P EXTRN CHRT1 REMOTE CHANNEL UNIT NO. 1 6 * P EXTRN CHRT2 REMOTE CHANNEL UNIT NO. 2 d P EXTRN CHRT3 P EXTRN CHRT4 ( P EXTRN IHCC1 CASSETTE CHANGER NO. 1 ( P EXTRN IHCC2
0x0dda0c…0ddba0 Dummy {f00=0x0046, f01=0x0190, f02=»2 l P EXTRN CHLT3 P EXTRN CHLT4 P EXTRN IHFD FLOPPY DISCEN 2 P EXTRN IHLP LINE PRINTER T P EXTRN IHCR CARD-READER t P EXTRN IHDU1 DISC UNIT NO. 1 P EXTRN IHDU2 DISC UNIT NO. 2 P EXTRN IHMT MAG. TAPE $ P EXTRN ILLINT
0x0ddba0…0ddd34 (1, 126) Opaque[0x194]
0x0ddd34…0ddec8 # DirEnt {nam=»INIMON«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x08d0, f03=0x2020}
0x0ddd34…0ddec8 IdxSect {
0x0ddd34…0ddec8 f00 = 0x0046 // 0xddd34 @0x0
0x0ddd34…0ddec8 f01 = 0x0006 // 0xddd36 @0x2
0x0ddd34…0ddec8 gno = [ // 0xddd38 @0x4
0x0ddd34…0ddec8 [0x00]: C0x0046.0x2.0
0x0ddd34…0ddec8 [0x01]: C0x0046.0x3.0
0x0ddd34…0ddec8 [0x02]: C0x0047.0x0.0
0x0ddd34…0ddec8 ]
0x0ddd34…0ddec8 }
0x0ddec8…0de05c Dummy {f00=0x0046, f01=0x0190, f02=» 2 P IDENT INIMON REL 8.2 78-09-15 870105040820 P : P** B 8 P*************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* INIMON = INITIALIZE MONITOR P* P* P*
0x0de05c…0de1f0 Dummy {f00=0x0046, f01=0x0190, f02=»ED IN d & P* PROGRAM DEBUGGING PHASE 8 P*************************************************** 8 P* t 4 P* THIS MODULE IS USED TO INITIALIAZE THE MONITOR ~ 4 P* AND START THE DISPATCHER. IT IS STARTED AFTER P* PROGRAM LOAD. P*
0x0de1f0…0de384 Dummy {f00=0x0046, f01=0x0190, f02=»NDING PROGRAM POINTER P* P* ( * P* THE FOLLOWING DWT FIELDS ARE RESET:- 2 P* ` $ P* DWTST STATUS IS SET TO /8000 j 0 P* DWTTQ TERMINAL ON QUEUE FOR THIS DEVICE P* DWTECB DWT-ADDRESS P* 2 P* INTERTASK COM. DWT ONLY:
0x0de384…0de518 Dummy {f00=0x0046, f01=0x0190, f02=»ISTER A15 AND n 0 P* THE STACK IS INITIATED TO PERMIT START OF 6 P* THE SYSTEM WITH THE FIRST USER PROGRAM IN TCTAB J P* P* TIMER QUEUE IS RESET. 4 P* MOREOVER ADDRESSES TO TIMER POINTERS DECLARED 4 P* IN FIRST WORD IN SECOND PART OF
0x0de518…0de6ac Dummy {f00=0x0046, f01=0x0190, f02=»* BUFFER QUEUE IS RESET. P* P* * P* ATTACH CHAIN IS RESET 4 P* T P EJECT ^ P* l P* ENTRY POINTS v P* $ P ENTRY INIMON MODULE ENTRY POINT P* P* EXTERNAL REFERENCES P* P EXTRN TCTAB ( P EXT
0x0de6ac…0de840 Dummy {f00=0x0046, f01=0x0190, f02=» IDENTIFICATION z " P EXTRN TTB:TD TERMINAL DEVICES P EXTRN DWTST STATUS > $ P EXTRN DWTADR ACTIVATION ADDRESS Z P EXTRN DWTECB DWT-ADDRESS " P EXTRN DWTTQ TERMINAL ON QUEUE & P EXTRN BLOCKL LENGTH OF BLOCK POOL & P EXTRN FREQUE FREE B
0x0de840…0de9d4 (1, 127) Dummy {f00=0x0046, f01=0x0190, f02=»RN TIMQUE TIMER QUEUE ANCHOR ( P EXTRN PRUN TTAB FOR RUNNING PROGRAM $ * P EXTRN PFINIT INIT AFTER MASTER CLEAR P $ P EXTRN CDTAB COMMON DEVICE TABLE ~ " P EXTRN APL APPLICATION LOADER P EXTRN CVTMSZ MEMORY SIZE * P EXTRN CVTSBA BEGINNING OF
0x0de9d4…0deb68 Dummy {f00=0x0046, f01=0x0190, f02=»ESS l & P EXTRN INIFLG INITIALIZATION FLAG P EXTRN LOOP IDLE LOOP 6 $ P EXTRN BLOCKS COMMON BLOCK POOL T & P EXTRN ATT:CH ATTACH CHAIN ANCHOR | * P EXTRN ITADI INTERTASK ACTIVATION READ , P EXTRN ITADO INTERTASK ACTIVATION WRITE P*
0x0deb68…0decfc Dummy {f00=0x0046, f01=0x018e, f02=»NHIBIT INTERRUPTS P LDK A7,0 P LD* A1,TCTAB TCTAB LENGTH , P AD A1,TCTAB + BASE ADDRESS N P r PINI100 SUK A1,2 z P CW A1,TCTAB , P RF(E) INI200 ALL TERMINALS INITIALIZED P P LDR* A5,A1 TTAB ADDRESS P LDKL A2,/
0x0decfc…0dee90 Dummy {f00=0x0046, f01=0x0190, f02=» $ P LDKL A14,INI100 RETURN ADDRESS P LDKL A2,TTB:TD , . P ADR A2,A5 TTAB CONFIGURATION PART ADDRESS D & P ABL RSTDEV RESET TERMINAL DEVICES v P EJECT P* P* P* RESET COMMON DEVICES P* P* PINI200 EQU * ( P
0x0dee90…0df024 Dummy {f00=0x0046, f01=0x0190, f02=» * P* RESET DEVICES FOR A TERMINAL/COMMON P* 2 P* ENTRY PARAMETERS: < P* X P* A2 = TABLE ADDRESS b P* A14= RETURN ADDRESS ~ P* $ P* A1 AND A5 MAY NOT BE DESTRYED P* P* PRSTDEV EQU * P LDR* A3,A2 GET TA
0x0df024…0df1b8 Dummy {f00=0x0046, f01=0x0190, f02=» A4,4 ADJUST ADDRESS TO DWT P LDR* A6,A4 GET DWT ADDRESS $ $ P RB(Z) RST100 DWT NOT IN SYSTEM H P LDKL A9,ITADI p $ P CW A9,DWTADR,A6 INTERTASK DWT? P RF(E) RST120 YES! P LDKL A9,ITADO $ P CW A9,DWTADR,A6 INTERTASK DWT? P R
0x0df1b8…0df34c Dummy {f00=0x0046, f01=0x0190, f02=»T ECB ~ & P CM DWTTQ,A6 RESET TERMINAL QUEUE P RB RST100 NEXT DEVICE 8 P EJECT V P* d P* n P* RESET BLOCK POOL x P* P* PINI210 EQU * P LDKL A4,TIMQUE TIMER QUEUE PINI214 EQU * * P LDR* A4,A4 NEXT TIMER
0x0df34c…0df4e0 Dummy {f00=0x0046, f01=0x018e, f02=»TIMER POINTER P RB INI214 PINI218 EQU * ( P CM TIMQUE RESET TIMER QUEUE < & P LD A1,BLOCKL LENGTH OF BLOCK POOL ` $ P LD A2,BLOCKS BLOCK POOL ADDRESS 0 P ST A2,FREQUE INITIALIZE FREE QUEUE POINTER PINI220 EQU * P SUK A1,6
0x0df4e0…0df674 (1, 128) Dummy {f00=0x0047, f01=0x0190, f02=» $ PINI230 CMR A3 END OF FREE BLOCKS P* 0 P* RESET BUFFER QUEUE : P* Z P CM GBQUE d P v P EJECT ~ P* P* RESET ATTACH CHAIN P* P CM ATT:CH P* P* P* INITIALIZE STACK P* (
0x0df674…0df808 Dummy {f00=0x0047, f01=0x0190, f02=»A15,28 P LDK A1,0 P STR A1,A15 P EJECT 4 P* B P* L P* FIND FIRST USER PROGRAM V P* x P* P P LD A1,TCTAB TCTAB ADDRESS P LDR* A4,A1 TCTAB LENGTH PINIM50 ADK A1,2 P SUK A4,2 P RF(NZ)
0x0df808…0df99c Dummy {f00=0x0047, f01=0x0190, f02=» RB(N) INIM50 MONITOR TASK , P ST A5,PRUN SET TTAB FOR RUNNING PROGRAM " P CMR A5 R $ P LD A7,TTB:ST,A5 GET USER LEVEL b P SRC A7,6 P CM DISQUE NO JOBS ON QUEUE P EJECT P* P* P* START SYSTEM P* P*
0x0df99c…0dfb30 Dummy {f00=0x0047, f01=0x40a0, f02=»AND LEVEL " P ABL PFINIT INITIALIZE DEVICES PWAITIS EQU * 8 P LDKL A8,10 L P LKM ` P DATA 6 l P ABI CVTAPS | P END @ DISQUE NO JOBS ON QUEUE P EJECT P* P* P* START SYSTEM P* P*
0x0dfb30…0dfcc4 Dummy {f00=0x0047, f01=0x2008, f02=» P* START SYSTEM P* P* * PINI510 EQU * 4 P IM INIFLG H P LD A13,CVTAPS Z $ P STR A13,A15 USER START ADDRESS p P STR A7,A15 AND LEVEL " P ABL PFINIT INITIALIZE DEVICES P END @ T TTAB FOR RUNNING PROGRAM
0x0dfcc4…0dfe58 Dummy {f00=0x0047, f01=0x018e, f02=» DRIVER J f P* K " P* A7 MUST NOT BE DESTROYED K 6 P* THE ECHO-ROUTINE SHOULD BE TERMINATED WITH A K @ P* JUMP TO 'ECHRTN'. K z P* K PECHEND EQU * K P* K P IFT CECHO=1 K P* K $ P LDKL A7,/8000 INDICATE END I/O K P X
0x0dfe58…0dffec Dummy {f00=0x0047, f01=0x0190, f02=» P LD A1,DWTST,A6 STATUS L P SLL A1,2 L " $ P RF(NN) RETUR NO ECHO REQUESTED L 4 0 P LDR A4,A6 SAVE DWT-ADDRESS OF INPUT DEVICE L 2 P LD A6,DWTECH,A6 DWT-ADDRESS OF OUTPUT DEVICE L 6 P ST A4,DWTWAT,A6 SAVE DWT-ADDRESS OF INPUT DEVICE L P LDKL A5
0x0dffec…0e0180 Dummy {f00=0x0047, f01=0x4140, f02=» DEVICE-DEPENDENT L t P XIF M PECHRTN EQU * M & P IFT CECHO=1 M : P LDR A7,A7 END? M N P RF(NN) ERETUR NO M f ( P CF A15,TENDIO END I/O OUTPUT DEVICE M > PERETUR LD A6,DWTWAT,A6 RELOAD DWT-ADDRESS OF INPUT DEVICE M 4 PRETUR ABL LDREGF RELOAD A3
0x0e0180…0e0314 (1, 129) Opaque[0x194]
0x0e0314…0e04a8 # DirEnt {nam=»TTMJOB«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x08e8, f03=0x2020}
0x0e0314…0e04a8 IdxSect {
0x0e0314…0e04a8 f00 = 0x0047 // 0xe0314 @0x0
0x0e0314…0e04a8 f01 = 0x0002 // 0xe0316 @0x2
0x0e0314…0e04a8 gno = [ // 0xe0318 @0x4
0x0e0314…0e04a8 [0x00]: C0x0047.0x1.0
0x0e0314…0e04a8 ]
0x0e0314…0e04a8 }
0x0e04a8…0e063c Dummy {f00=0x0047, f01=0x0190, f02=» 2 P IDENT TTMJOB REL 8.2 78-09-15 870105040820 P* : P* D P* MONITOR TABLE N P* h P* r P ENTRY TTMJOB TABLE ENTRY | " P ENTRY TTB:ST TERMINAL STATUS * P ENTRY TTB:ID TERMINAL IDENTIFICATION * P ENTRY TTB:PP PENDING
0x0e063c…0e07d0 Dummy {f00=0x0047, f01=0x0190, f02=» p " P ENTRY TTB:TD TERMINAL DEVICES P* . P* 8 P* B PTTMJOB DATA 0 TABLE ENTRY L ( PTTB:ST EQU *-TTMJOB TERMINAL STATUS n P DATA 48 0 PTTB:ID EQU *-TTMJOB TERMINAL IDENTIFICATION P DATA /8000 PTTB:PP EQU *-TTMJOB
0x0e07d0…0e0964 Dummy {f00=0x0047, f01=0x40f6, f02=»R z * PTTB:SA EQU *-TTMJOB TERMINAL SAVE AREA P DATA 0 8 & P DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0 H ( PTTB:TD EQU *-TTMJOB TERMINAL DEVICES r P DATA TTABE-* PTTABE EQU * P* P* P* P END @ PP EQU *-TTMJOB
0x0e0964…0e0af8 Dummy {f00=0x0047, f01=0x2008, f02=» TMJOB TERMINAL STATUS P DATA 48 * 0 PTTABID EQU *-TTMJOB TERMINAL IDENTIFICATION : P DATA /8000 n PTTABPP EQU *-TTMJOB P DATA 0 * PTTABSA EQU *-TTMJOB TERMINAL SAVE AREA P DATA 0 & P DATA 0,0,0,0,0,0,0,0,0,0,0,
0x0e0af8…0e0c8c Dummy {f00=0x0047, f01=0x0190, f02=» P* A1 = RETURN CODE & P* A2 = INPUT OR OUTPUT CHARACTER $ P* A3 = BUFFER INDEX N P* A4 = FUNCTION INDEX l P* A5 = STACK BASE P* A6 = DWT-ADDRESS P* A7 = ORDER P* A8 = ECB-ADDRESS P EJECT P*
0x0e0c8c…0e0e20 Dummy {f00=0x0047, f01=0x0190, f02=» VOLTAGE ERROR DISPENSER & P* BIT 3: TIMEOUT ERROR DISPENSER ( P* BIT 4: SOLENOID ERROR DISPENSER J * P* BIT 5: ELECTRONICS ERROR DISPENSER v ( P* BIT 6: DETECTOR ERROR DISPENSER * P* BIT 7: FRONT SHUTTER DOESN'T CLOSE ( P* BIT 8:
0x0e0e20…0e0fb4 (1, 130) Opaque[0x194]
0x0e0fb4…0e1148 # DirEnt {nam=»DRRT01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x08f0, f03=0x2020}
0x0e0fb4…0e1148 IdxSect {
0x0e0fb4…0e1148 f00 = 0x0047 // 0xe0fb4 @0x0
0x0e0fb4…0e1148 f01 = 0x002a // 0xe0fb6 @0x2
0x0e0fb4…0e1148 gno = [ // 0xe0fb8 @0x4
0x0e0fb4…0e1148 [0x00]: C0x0047.0x2.0
0x0e0fb4…0e1148 [0x01]: C0x0047.0x3.0
0x0e0fb4…0e1148 [0x02]: C0x0048.0x0.0
0x0e0fb4…0e1148 [0x03]: C0x0048.0x1.0
0x0e0fb4…0e1148 [0x04]: C0x0048.0x2.0
0x0e0fb4…0e1148 [0x05]: C0x0048.0x3.0
0x0e0fb4…0e1148 [0x06]: C0x0049.0x0.0
0x0e0fb4…0e1148 [0x07]: C0x0049.0x1.0
0x0e0fb4…0e1148 [0x08]: C0x0049.0x2.0
0x0e0fb4…0e1148 [0x09]: C0x0049.0x3.0
0x0e0fb4…0e1148 [0x0a]: C0x004a.0x0.0
0x0e0fb4…0e1148 [0x0b]: C0x004a.0x1.0
0x0e0fb4…0e1148 [0x0c]: C0x004a.0x2.0
0x0e0fb4…0e1148 [0x0d]: C0x004a.0x3.0
0x0e0fb4…0e1148 [0x0e]: C0x004b.0x0.0
0x0e0fb4…0e1148 [0x0f]: C0x004b.0x1.0
0x0e0fb4…0e1148 [0x10]: C0x004b.0x2.0
0x0e0fb4…0e1148 [0x11]: C0x004b.0x3.0
0x0e0fb4…0e1148 [0x12]: C0x004c.0x0.0
0x0e0fb4…0e1148 [0x13]: C0x004c.0x1.0
0x0e0fb4…0e1148 [0x14]: C0x004c.0x2.0
0x0e0fb4…0e1148 ]
0x0e0fb4…0e1148 }
0x0e1148…0e12dc Dummy {f00=0x0047, f01=0x0190, f02=» 2 P IDENT DRRT01 REL 8.2 78-09-15 870105040820 P : P BLOCKSENDIG FIX B P REL 8.1 78-09-04 P CHTAB x P REL 8.1 78-04-21 P 4 P************************************************ P* $ P* PHILIPS TERMINAL SYSTE
0x0e12dc…0e1470 Dummy {f00=0x0047, f01=0x0190, f02=»* P* P* 4 P************************************************ P* V L P* THIS IS THE DRIVER TO CHANNEL UNITS FOR LOCAL AND REMOTE TERMINALS. ` B P* AT INTERRUPT AN INPUT WORD IS READ TO REGISTER A2. IF DATA D P* INPUT OR DATA
0x0e1470…0e1604 Dummy {f00=0x0047, f01=0x0190, f02=»SARY ACTIONS P* ARE CARRIED OUT. P* 0 P* : < P* THE DRIVER ALSO INCLUDES THE FOLLOWING SUBROUTINES:- D P* . P* - OUTLIN SEND ONE CHARACTER VIA CHLT P* < P* - CHLTON EXECUTE CIO-START ON EVERY CHLT IN SYSTEM
0x0e1604…0e1798 Dummy {f00=0x0047, f01=0x0190, f02=» INCLUDED IN THE DRIVER. P EJECT P* . P* 8 P* B B P* THE FOLLOWING FUNCTIONS ARE ALSO INCLUDED IN THE DRIVER:- L P* J P* - OUTPUT SEND ONE CHARACTER, SAVE A3-A5 AND RETURN TO DISPATCHER P* 6 P* - STREG SAVE
0x0e1798…0e192c Dummy {f00=0x0047, f01=0x0190, f02=»O USER VIA A5 P* : P* - LDREGE RESTORE A3-A5 AND RETURN TO USER VIA A5 P* ^ P* h P* r . P* NORMAL REGISTER USAGE IN THE DRIVER:- | P* P* A1 = RETURN CODE P* A2 = INPUT WORD P* A3 = LINE NUMBER * 2
0x0e192c…0e1ac0 Dummy {f00=0x0047, f01=0x0190, f02=»RESS P* P* P* P EJECT * P* 8 P*************** B P* ENTRIES * Z P*************** r P* P* 2 P ENTRY CHLT1 INTERRUPT FROM FIRST CHANNEL UNIT : P ENTRY CHLT2 INTERRUPT FROM SECOND CHANNEL UNIT LOCA
0x0e1ac0…0e1c54 (1, 131) Dummy {f00=0x0047, f01=0x0190, f02=»ERRUPT FROM FIRST CHANNEL UNIT REMOTE : P ENTRY CHRT2 INTERRUPT FROM SECOND CHANNEL UNIT REMOTE . 2 P ENTRY CHRT3 INTERRUPT FROM THIRD CHANEL REMOT l 4 P ENTRY CHRT4 INTERRUPT FROM FOURTH CHANEL REMOTE $ P ENTRY OUTLIN SEND ONE CHARACTER P ENTRY
0x0e1c54…0e1de8 Dummy {f00=0x0047, f01=0x0190, f02=»HER | , P ENTRY LDREG RELOAD REGISTERS AND RETURN , P ENTRY LDREGE RETURN FROM ECHO HANDLING < P ENTRY LDREGF RETURN l 6 P ENTRY STREG SAVE REGISTERS IN DWT AND DISPATCHER 4 P ENTRY GETCHR GET ONE CHARACTER FROM ECB-BUFFER P @ P ENTRY
0x0e1de8…0e1f7c Dummy {f00=0x0047, f01=0x0190, f02=»F REMOTE CHANNEL UNITS z * P ENTRY CWTLT1 CONTROL WORK TABLE CHLT1 * P ENTRY CWTLT2 CONTROL WORK TABLE CHLT2 L * P ENTRY CWTLT3 CONTROL WORK TABLE CHLT3 z * P ENTRY CWTLT4 CONTROL WORK TABLE CHLT4 8 P ENTRY CWTRT1 CONTROL WORK TABLE REMOTE CHANNEL 1.
0x0e1f7c…0e2110 Dummy {f00=0x0047, f01=0x0190, f02=» CWTRT4 CONTROL WORK TABLE REMOTE CHANNEL 2.2 8 P ENTRY CWTRT5 CONTROL WORK TABLE REMOTE CHANNEL 3.1 6 6 P ENTRY CWTRT6 CONTROL WORK TABLE REMOTE CHANEL 3.2 r 6 P ENTRY CWTRT7 CONTROL WORK TABLE REMOTE CHANEL 4.1 6 P ENTRY CWTRT8 CONTROL WORK TABLE R
0x0e2110…0e22a4 Dummy {f00=0x0047, f01=0x0190, f02=» ENTRY ECHEND END OF ECHO P EJECT " P* 0 P* : * P************************************** D * P* EXTERNAL TOSS MODULE ENTRIES * r * P************************************** P* P* & P EXTRN SAVE8 SAVE REGISTERS A1-A8
0x0e22a4…0e2438 Dummy {f00=0x0047, f01=0x0190, f02=» P EXTRN SETIMP SET TIME 6 P EXTRN INTLT1 INTERRUPT TABLE FOR LOCAL TERMINALS " , P EXTRN INTLT2 INTERRUPT TABLE FOR CHLT2 & P EXTRN INTLT3 INTERRUPT FROM CHLT3 & P EXTRN INTLT4 INTERRUPT FROM CHLT4 6 P EXTRN INTRT1 INTERRUPT TABLE FOR REMOTE
0x0e2438…0e25cc Dummy {f00=0x0047, f01=0x0190, f02=» INTRT4 INTERRUPT TABLE FOR REMOTE CHANEL 4 $ P EXTRN DISIOE I/O REQUEST ERROR 4 & P EXTRN DISEND END I/O AND DISPATCH * P EXTRN INTSAV SAVE AREA LAST INTERRUPT P EXTRN TENDIO $ P EXTRN RTNA15 RETURN AND ENABLE . P EXTRN IHRET8 RESTORE
0x0e25cc…0e2760 Dummy {f00=0x0047, f01=0x0190, f02=»******************* P* P EXTRN DWTOR ORDER & P EXTRN DWTECB ECB-ADDRESS @ * P EXTRN DWTADR ADDRESS TO ADDRESS-BLOCK b P EXTRN DWTST STATUS P EXTRN DWTWAT P* P EJECT P* P* , P**************************
0x0e2760…0e28f4 (1, 132) Dummy {f00=0x0048, f01=0x0190, f02=»QU /6 LAST OUTPUT CHARACTER $ PDWTOTQ EQU /10 OUTPUT QUEUE LINK $ " PDWTA3 EQU /12 SAVE AREA FOR A3 L " PDWTA4 EQU /14 SAVE AREA FOR A4 r " PDWTA5 EQU /16 SAVE AREA FOR A5 PDWTSB2 EQU /1E STACK BASE 2 PDWTTP EQU /20 TIMER POINTER PDW
0x0e28f4…0e2a88 Dummy {f00=0x0048, f01=0x0190, f02=»* P* ( PNOERR EQU 1 RETURN CODE NOT OPERABLE , PTIME EQU 5 TIME BEFORE TIME-OUT FOR SYNC @ 4 PDUMMSP EQU /3 SPECIAL DUMMY TO GET DATA REQUEST p ( P FIRST WHEN PRINTERBUFFER IS EMPTY 0 PDRQTIM EQU 30 TIME TO NEXT ACK FOR PRINTERS P
0x0e2a88…0e2c1c Dummy {f00=0x0048, f01=0x0190, f02=»*********************** P* P* * < P* A LOGG FUNCTION OF EVERY INPUT AND OUTPUT CHARACTER 4 8 P* MAY BE INCLUDED TO THE DRIVER BY SETTING X:A=1 t P* PX:A EQU 1 PLOGING EQU X:A P* P* > P* BY SETTING X:
0x0e2c1c…0e2db0 Dummy {f00=0x0048, f01=0x0190, f02=» P* P* 8 P* ACKUMULATORS FOR NAK, RETRANSMISSION FAULT AND 4 P* UNDEFINED CONTROL CHARACTERS ARE UPDATED IN T 8 P* THE DRIVER. THIS FUNCTION CAN BE EXCLUDED FROM $ P* DRIVER BY SETTING X:C = 0. P* PX:C EQU 1
0x0e2db0…0e2f44 Dummy {f00=0x0048, f01=0x0190, f02=»E CHANNEL CARDS. x P* PX:D EQU 2 " PRECHAN EQU X:D 4 P* J P* T P* ^ , P* REMFC IS " REMOTE TEST FILE CODE " h P* STANDARD IS /15 P* PX:E EQU /15 PREMFC EQU X:E P* * P* ECHO FUNCTION CA
0x0e2f44…0e30d8 Dummy {f00=0x0048, f01=0x0190, f02=»*********************************** ~ : P* C W T L T 1 * , : P***************************************************** j P* 4 P* CONTROL WORK TABLE FOR LOCAL CHANNEL NO. 1 P* PDWA1 EQU /03 DEVICEA
0x0e30d8…0e326c Dummy {f00=0x0048, f01=0x0190, f02=» | P DATA 0 LAST OUTPUT WORD PCWTITA EQU *-CWTLT1 ( , P DATA INTLT1 ADDRESS TO INTERRUPT TABLE D PCWTINR EQU *-CWTLT1 t P INR A2,0,DWA1 INR PCWTOTR EQU *-CWTLT1 P OTR A2,0,DWA1 OTR PCWTCIS EQU *-CWTLT1 P CIO A2,1,DW
0x0e326c…0e3400 Dummy {f00=0x0048, f01=0x0190, f02=»ATA 0 QUEUE 2 PCWTADD EQU *-CWTLT1 P* 2 P IFT ACKMUL=1 < P* R P DATA 0 NAK-ACKUMULATOR $ P DATA 0 RETR. FAULT-ACKUMULATOR | , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR PACKTIM EQU *-CWTLT1 ( P DATA 0 PRINTER TIMEOUT
0x0e3400…0e3594 (1, 133) Dummy {f00=0x0048, f01=0x0190, f02=»*** ^ : P* C W T L T 2 * : P***************************************************** J P* 4 P* CONTROL WORK TABLE FOR LOCAL CHANNEL NO. 2 P* PCWTLT2 EQU * P* P IFT LOCHAN=2 P
0x0e3594…0e3728 Dummy {f00=0x0048, f01=0x0190, f02=» P DATA INTLT2 INTERRUPT TABLE P INR A2,0,DWA2 INR ( P OTR A2,0,DWA2 OTR B P CIO A2,1,DWA2 CIO-START " P DATA 0 RETRANSMISSION COUNTER | P DATA 0 QUEUE P DATA 0 SECOND QUEUE P* P IFT ACKMUL=1 P* P DATA 0 NA
0x0e3728…0e38bc Dummy {f00=0x0048, f01=0x0190, f02=»KUMULATOR v P* P XIF P* ( P IFT LOCHAN=3 2 P* H P* R P* PDWA2 EQU /13 DEVICE ADDRESS f P* P DATA 0 LAST OUTPUT DWT P DATA 0 LAST OUTPUT WORD P DATA INTLT2 INTERRUPT TABLE P INR A2,0,DWA2 I
0x0e38bc…0e3a50 Dummy {f00=0x0048, f01=0x0190, f02=»SECOND QUEUE P* P IFT ACKMUL=1 P* 4 P DATA 0 NAK-ACKUMULATOR > $ P DATA 0 RETR. FAULT-ACKUMULATOR ^ , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR P* P XIF P* P IFT L
0x0e3a50…0e3be4 Dummy {f00=0x0048, f01=0x0190, f02=» OUTPUT WORD P DATA INTLT2 INTERRUPT TABLE P INR A2,0,DWA2 INR 8 P OTR A2,0,DWA2 OTR R P CIO A2,1,DWA2 CIO-START l " P DATA 0 RETRANSMISSION COUNTER P DATA 0 QUEUE P DATA 0 SECOND QUEUE P* P IFT ACKMUL=1 P*
0x0e3be4…0e3d78 Dummy {f00=0x0048, f01=0x0190, f02=»INTER TIMEOUT ACKUMULATOR P* " P XIF , P* 8 P EJECT B P* P P* Z : P***************************************************** d : P* C W T L T 3 * : P****************************************
0x0e3d78…0e3f0c Dummy {f00=0x0048, f01=0x0190, f02=»HAN=3 P* P* P* " PDWA3 EQU /23 DEVICE ADDRESS , P* P P DATA 0 LAST OUTPUT DWT Z P DATA 0 LAST OUTPUT WORD z P DATA INTLT3 INTERRUPT TABLE P INR A2,0,DWA3 INR P OTR A2,0,DWA3 OTR P CIO A2,1,DWA3 CIO-STA
0x0e3f0c…0e40a0 Dummy {f00=0x0048, f01=0x0190, f02=» P DATA 0 NAK-ACKUMULATOR $ P DATA 0 RETR. FAULT-ACKUMULATOR $ , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR L ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR | P* P XIF P* P IFT LOCHAN=4 P* P* P* PDWA3 EQU /23
0x0e40a0…0e4234 (1, 134) Dummy {f00=0x0048, f01=0x0190, f02=»NR A2,0,DWA3 INR P OTR A2,0,DWA3 OTR P CIO A2,1,DWA3 CIO-START 2 " P DATA 0 RETRANSMISSION COUNTER R P DATA 0 QUEUE x P DATA 0 SECOND QUEUE P* P IFT ACKMUL=1 P* P DATA 0 NAK-ACKUMULATOR $ P DATA 0 RETR. FAULT-
0x0e4234…0e43c8 Dummy {f00=0x0048, f01=0x018e, f02=» P EJECT P* P* : P***************************************************** * : P* C W T L T 4 * h : P***************************************************** P* 4 P* CONTROL WORK TABLE FO
0x0e43c8…0e455c Dummy {f00=0x0048, f01=0x0190, f02=» P* P DATA 0 LAST OUTPUT DWT P DATA 0 LAST OUTPUT WORD 2 P DATA INTLT4 INTERRUPT TABLE R P INR A2,0,DWA4 INR v P OTR A2,0,DWA4 OTR P CIO A2,1,DWA4 CIO-START " P DATA 0 RETRANSMISSION COUNTER P DATA 0 QUEUE P D
0x0e455c…0e46f0 Dummy {f00=0x0048, f01=0x0190, f02=» , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR ! ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR ! 4 P* ! ` P XIF ! j P* ! v P EJECT ! $ P******************************* ! $ P* C W T R T 1 * ! $ P******************************* ! 4 P*
0x0e46f0…0e4884 Dummy {f00=0x0048, f01=0x0190, f02=»TRT1 EQU * ! P DATA 0 LAST OUTPUT DWT " P DATA 0 LAST OUTPUT WORD " 2 P DATA INTRT1 INTERRUPT TABLE " R P INR A2,0,DWA5 INR " v P OTR A2,0,DWA5 OTR " P CIO A2,1,DWA5 CIO-START " " P DATA 0 RETRANSMISSION COUNTER " P DATA 0 QUEUE TERMINAL 1
0x0e4884…0e4a18 Dummy {f00=0x0048, f01=0x0190, f02=»KUMULATOR " z , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR # ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR # B P* # n P XIF # x P* # PCWTTP EQU *-CWTRT1 # P DATA 0 TIMER POINTER # PCWSYNC EQU *-CWTRT1 # P DATA /7055 SYNC CHARACTER # PLRCD
0x0e4a18…0e4bac Dummy {f00=0x0048, f01=0x0190, f02=»QU *-CWTRT1 # & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 $ & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 $ > PCWTRST EQU *-CWTRT1 $ h , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) $ 0 PCWTBLK EQU *-CWTRT1 BLOCK SENDING INDICATOR $ ( P DATA 0 BIT 0: BLOCKSENDING RUN
0x0e4bac…0e4d40 Dummy {f00=0x0048, f01=0x0190, f02=» * $ r $ P******************************** % : P* CHANNEL UNIT WORK TABLE FOR REMOTE CHANNEL NO. 2 % 2 P* CONNECTED TO FIRST CHRT % p P* % PCWTRT2 EQU * % P DATA 0 LAST OUTPUT DWT % P DATA 0 LAST OUTPUT WORD % P % P DATA INTRT1 I
0x0e4d40…0e4ed4 (1, 135) Dummy {f00=0x0048, f01=0x0190, f02=» % r P DATA 0 QUEUE TERMINAL 1 & P DATA 0 QUEUE TERMINAL 2 & ( P* & H P IFT ACKMUL=1 & R P* & h P DATA 0 NAK-ACKUMULATOR & r $ P DATA 0 BLOCK ERROR ACKUMULATOR & , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR & ( P DATA 0 PRINTER TIMEOUT ACKUMU
0x0e4ed4…0e5068 Dummy {f00=0x0048, f01=0x0190, f02=»ROCESS TERMINAL 1 & v 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 ' & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 ' N & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 ' x , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) ' $ P DATA 0 BLOCK SENDING INDICATOR ' P EJECT ' $ P
0x0e5068…0e51fc Dummy {f00=0x0048, f01=0x0190, f02=»HANNEL UNIT WORK TABLE FOR REMOTE CHANNEL NO. 1 ' " P* CONNECTED TO SECOND CHRT ( 8 P* ( ^ PCWTRT3 EQU * ( h P* ( | P IFT RECHAN=2 ( P* ( PDWA6 EQU /11 DEVICE ADDRESS ( P* ( P DATA 0 LAST OUTPUT DWT ( P DATA 0 LAST OUTPUT
0x0e51fc…0e5390 Dummy {f00=0x0048, f01=0x0190, f02=»A 0 RETRANSMISSION COUNTER ( P DATA 0 QUEUE TERMINAL 1 ) " P DATA 0 QUEUE TERMINAL 2 ) B P* ) b P IFT ACKMUL=1 ) l P DATA 0 NAK-ACKUMULATOR ) $ P DATA 0 BLOCK ERROR ACKUMULATOR ) , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR ) ( P DATA 0 PRINTE
0x0e5390…0e5524 Dummy {f00=0x0048, f01=0x0190, f02=»PUT DWT ) P DATA 0 LAST OUTPUT WORD * P DATA INTRT2 INTERRUPT TABLE * 0 P INR A2,0,DWA6 INR * T P OTR A2,0,DWA6 OTR * n P CIO A2,1,DWA6 CIO-START * " P DATA 0 RETRANSMISSION COUNTER * P DATA 0 QUEUE TERMINAL 1 * P DATA 0 QUEUE TERMINAL 2 *
0x0e5524…0e56b8 Dummy {f00=0x0048, f01=0x0190, f02=»T-ACKUMULATOR * v ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR + P* + B P XIF + L P IFT RECHAN=4 + X PDWA6 EQU /11 DEVICE ADDRESS + n P* + P DATA 0 LAST OUTPUT DWT + P DATA 0 LAST OUTPUT WORD + P DATA INTRT2 INTERRUPT TABLE + P INR A2,
0x0e56b8…0e584c Dummy {f00=0x0048, f01=0x0190, f02=» 1 + z P DATA 0 QUEUE TERMINAL 2 , P* , * P IFT ACKMUL=1 , 4 P DATA 0 NAK-ACKUMULATOR , J $ P DATA 0 BLOCK ERROR ACKUMULATOR , j , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR , ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR , P* , P XIF , P IFT
0x0e584c…0e59e0 Dummy {f00=0x0048, f01=0x0190, f02=»ATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 , & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 - 2 & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 - , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) - $ P DATA 0 BLOCK SENDING INDICATOR - P XIF - P IFT RECHAN=3 - P DATA 0
0x0e59e0…0e5b74 (1, 136) Dummy {f00=0x0049, f01=0x0190, f02=»CESS TERMINAL 2 - t & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 . & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 . B , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) . l $ P DATA 0 BLOCK SENDING INDICATOR . P XIF . P IFT RECHAN=4 . P DATA 0 TIMER POINTER . P DAT
0x0e5b74…0e5d08 Dummy {f00=0x0049, f01=0x0190, f02=»ATA 0 LRC-ACKUMULATOR TERMINAL 1 . & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 / ( , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) / R $ P DATA 0 BLOCK SENDING INDICATOR / P XIF / P EJECT / $ P******************************** / $ P* C W T R T 4
0x0e5d08…0e5e9c Dummy {f00=0x0049, f01=0x018e, f02=»ED TO SECOND CHRT / P* 0 PCWTRT4 EQU * 0 $ P* 0 8 P IFT RECHAN=2 0 B P DATA 0 LAST OUTPUT DWT 0 X P DATA 0 LAST OUTPUT WORD 0 x P DATA INTRT2 INTERRUPT TABLE 0 P INR A2,0,DWA6 INR 0 P OTR A2,1,DWA6 OTR 0 P CIO A2,1,DWA6 CIO-START
0x0e5e9c…0e6030 Dummy {f00=0x0049, f01=0x0190, f02=» 0 P DATA 0 NAK-ACKUMULATOR 1 $ P DATA 0 BLOCK ERROR ACKUMULATOR 1 ( , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR 1 P ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR 1 P XIF 1 P IFT RECHAN=3 1 P DATA 0 LAST OUTPUT DWT 1 P DATA 0 LAST OUTPUT WORD 1
0x0e6030…0e61c4 Dummy {f00=0x0049, f01=0x0190, f02=»TRANSMISSION COUNTER 1 P DATA 0 QUEUE TERMINAL 1 2 P DATA 0 QUEUE TERMINAL 2 2 < P* 2 P IFT ACKMUL=1 2 f P DATA 0 NAK-ACKUMULATOR 2 | $ P DATA 0 BLOCK ERROR ACKUMULATOR 2 , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR 2 ( P DATA 0 PRINTER TIME
0x0e61c4…0e6358 Dummy {f00=0x0049, f01=0x0190, f02=»NTERRUPT TABLE 2 P INR A2,0,DWA6 INR 3 P OTR A2,1,DWA6 OTR 3 0 P CIO A2,1,DWA6 CIO-START 3 J " P DATA 0 RETRANSMISSION COUNTER 3 j P DATA 0 QUEUE TERMINAL 1 3 P DATA 0 QUEUE TERMINAL 2 3 P* 3 P IFT ACKMUL=1 3 P DATA 0 NAK-ACKUMULATOR
0x0e6358…0e64ec Dummy {f00=0x0049, f01=0x0190, f02=» P XIF 4 P IFT RECHAN=2 4 P* 4 & P DATA 0 TIMER POINTER 4 0 P DATA /7255 SYNC-CHARACTER 4 N 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 4 p 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 4 & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 4 & P DATA
0x0e64ec…0e6680 Dummy {f00=0x0049, f01=0x0190, f02=»IF 4 P* 5 P IFT RECHAN=3 5 P DATA 0 TIMER POINTER 5 * P DATA /7255 SYNC-CHARACTER 5 H 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 5 j 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 5 & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 5 & P DATA 0 LRC-
0x0e6680…0e6814 (1, 137) Dummy {f00=0x0049, f01=0x0190, f02=» P* 6 P IFT RECHAN=4 6 P DATA 0 TIMER POINTER 6 $ P DATA /7255 SYNC-CHARACTER 6 B 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 6 d 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 6 & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 6 & P DATA 0 LRC-ACKUMU
0x0e6814…0e69a8 Dummy {f00=0x0049, f01=0x0190, f02=» 6 P EJECT 7 $ P******************************** 7 $ P* C W T R T 5 * 7 > $ P******************************** 7 f P* 7 : P* CHANNEL UNIT WORK TABLE FOR REMOTE CHANNEL NO. 1 7 P* CONNECTED TO THIRD CHRT 7 P 7 P* 7
0x0e69a8…0e6b3c Dummy {f00=0x0049, f01=0x0190, f02=» 7 x P DATA 0 LAST OUTPUT WORD 8 P DATA INTRT3 INTERRUPT TABLE 8 ( P INR A2,0,DWA7 INR 8 L P OTR A2,0,DWA7 OTR 8 f P CIO A2,1,DWA7 CIO-START 8 " P DATA 0 RETRANSMISSION COUNTER 8 P DATA 0 QUEUE TERMINAL 1 8 P DATA 0 QUEUE TERMINAL 2 8 P*
0x0e6b3c…0e6cd0 Dummy {f00=0x0049, f01=0x0190, f02=»LATOR 8 n ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR 9 P* 9 : P XIF 9 D P IFT RECHAN=4 9 P P* 9 f PDWA7 EQU /21 DEVICE ADDRESS 9 p P* 9 P DATA 0 LAST OUTPUT DWT 9 P DATA 0 LAST OUTPUT WORD 9 P DATA INTRT3 INTERRUPT TABLE 9 P INR A
0x0e6cd0…0e6e64 Dummy {f00=0x0049, f01=0x0190, f02=»AL 1 9 | P DATA 0 QUEUE TERMINAL 2 : P* : , P IFT ACKMUL=1 : 6 P DATA 0 NAK-ACKUMULATOR : L $ P DATA 0 BLOCK ERROR ACKUMULATOR : l , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR : ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR : P* : P XIF : P I
0x0e6e64…0e6ff8 Dummy {f00=0x0049, f01=0x0190, f02=» DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 : & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 ; 4 & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 ; ^ , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) ; $ P DATA 0 BLOCK SENDING INDICATOR ; P XIF ; P IFT RECHAN=4 ; P DATA
0x0e6ff8…0e718c Dummy {f00=0x0049, f01=0x0190, f02=»ROCESS TERMINAL 2 ; v & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 < & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 < D , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) < n $ P DATA 0 BLOCK SENDING INDICATOR < P XIF < P EJECT < $ P******************************** < $ P
0x0e718c…0e7320 Dummy {f00=0x0049, f01=0x0190, f02=»L NO. 2 < b P* CONNECTED TO THIRD CHRT = P* = 4 PCWTRT6 EQU * = > P* = R P IFT RECHAN=3 = P DATA 0 LAST OUTPUT DWT = r P DATA 0 LAST OUTPUT WORD = P DATA INTRT3 INTERRUPT TABLE = P INR A2,0,DWA7 INR = P OTR A2,1,DWA7 OTR =
0x0e7320…0e74b4 (1, 138) Dummy {f00=0x0049, f01=0x0190, f02=»* = P IFT ACKMUL=1 > P DATA 0 NAK-ACKUMULATOR > $ P DATA 0 BLOCK ERROR ACKUMULATOR > @ , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR > h ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR > P XIF > P IFT RECHAN=4 > P DATA 0 LAST OUTPUT DWT > P D
0x0e74b4…0e7648 Dummy {f00=0x0049, f01=0x0190, f02=»-START > ~ " P DATA 0 RETRANSMISSION COUNTER ? P DATA 0 QUEUE TERMINAL 1 ? 4 P DATA 0 QUEUE TERMINAL 2 ? T P* ? t P IFT ACKMUL=1 ? ~ P DATA 0 NAK-ACKUMULATOR ? $ P DATA 0 BLOCK ERROR ACKUMULATOR ? , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR ?
0x0e7648…0e77dc Dummy {f00=0x0049, f01=0x0190, f02=»NC-CHARACTER ? 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 @ 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 @ H & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 @ | & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 @ , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) @ $ P DATA 0
0x0e77dc…0e7970 Dummy {f00=0x0049, f01=0x0190, f02=»5 SYNC-CHARACTER @ 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 A 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 A L & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 A & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 A , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) A $ P DAT
0x0e7970…0e7b04 Dummy {f00=0x0049, f01=0x0190, f02=»T 7 * A $ P******************************** B P* B B : P* CHANNEL UNIT WORK TABLE FOR REMOTE CHANNEL NO. 1 B L " P* CONNECTED TO FOURTH CHRT B P* B PCWTRT7 EQU * B P* B P IFT RECHAN=4 B P* B PDWA8 EQU /31 DEV
0x0e7b04…0e7c98 Dummy {f00=0x0049, f01=0x0190, f02=»2,0,DWA8 INR B P OTR A2,0,DWA8 OTR C P CIO A2,1,DWA8 CIO-START C . " P DATA 0 RETRANSMISSION COUNTER C N P DATA 0 QUEUE TERMINAL 1 C t P DATA 0 QUEUE TERMINAL 2 C P* C P IFT ACKMUL=1 C P DATA 0 NAK-ACKUMULATOR C $ P DATA 0 BLOCK ERROR
0x0e7c98…0e7e2c Dummy {f00=0x0049, f01=0x0190, f02=»FT RECHAN=4 C P DATA 0 TIMER POINTER D P DATA /7055 SYNC-CHARACTER D 2 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 D T 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 D & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 D & P DATA 0 LRC-ACKUMULATOR TERMINAL 2
0x0e7e2c…0e7fc0 Dummy {f00=0x0049, f01=0x0190, f02=»****************** D $ P* C W T R T 8 * E $ P******************************** E B P* E j : P* CHANNEL UNIT WORK TABLE FOR REMOTE CHANNEL NO. 2 E t " P* CONNECTED TO FOURTH CHRT E P* E PCWTRT8 EQU * E P* E P IFT REC
0x0e7fc0…0e8154 (1, 139) Dummy {f00=0x0049, f01=0x0190, f02=» P OTR A2,1,DWA8 OTR F P CIO A2,1,DWA8 CIO-START F " P DATA 0 RETRANSMISSION COUNTER F > P DATA 0 QUEUE TERMINAL 1 F d P DATA 0 QUEUE TERMINAL 2 F P* F P IFT ACKMUL=1 F P DATA 0 NAK-ACKUMULATOR F $ P DATA 0 BLOCK ERROR ACKUMULATOR F
0x0e8154…0e82e8 Dummy {f00=0x0049, f01=0x0190, f02=» P DATA 0 TIMER POINTER G P DATA /7255 SYNC-CHARACTER G " 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 G D 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 G x & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 G & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 G , P DATA 0
0x0e82e8…0e847c Dummy {f00=0x0049, f01=0x0190, f02=»*************************************** G 6 P* C H T A B * H 0 6 P************************************************* H j P* H 6 P* THIS TABLE HOLDS ADDRESSES OF CONTROLLER WORK H 8 P* TABLES CWT TO CHANNEL UNITS
0x0e847c…0e8610 Dummy {f00=0x0049, f01=0x018e, f02=» IFT LOCHAN=1 H P DATA CWTLT1 I P DATA 0 I , P DATA 0 I < P DATA 0 I L P XIF I P* I h P IFT LOCHAN=2 I r P DATA CWTLT1 I P DATA CWTLT2 I P DATA 0 I P DATA 0 I P XIF I P* I P IFT LOCHAN=3 I P DATA CWTLT1
0x0e8610…0e87a4 Dummy {f00=0x0049, f01=0x0190, f02=» P DATA CWTLT3 J P DATA CWTLT4 J P XIF J , P* J 8 P DATA CWTRT1 J B P DATA CWTRT2 J V P* J j P IFT RECHAN=3 J t P DATA CWTRT3 J P DATA CWTRT4 J P DATA CWTRT5 J P DATA CWTRT6 J P* J P XIF J P* J P IFT RECHAN=2
0x0e87a4…0e8938 Dummy {f00=0x0049, f01=0x0190, f02=»A CWTRT5 J P DATA CWTRT6 K P DATA CWTRT7 K $ P DATA CWTRT8 K 8 P XIF K L PCHTABE EQU * END OF TABLE K X P* K z P* K P EJECT K P* K P* K ( P************************************ K ( P* D W R E M U * K ( P
0x0e8938…0e8acc Dummy {f00=0x0049, f01=0x0190, f02=» K p P* L PDWREMU EQU * L P DATA 0 L & P DATA /8000 STATUS L 6 P DATA 0,0 L P ( P DATA AREM POINTER TO ADDRESS-BLOCK L b P DATA 0,0,0 L P EJECT L P* L P* L * P* L O O P - T E S T S E C T I O N L P* L P* L 2 P*
0x0e8acc…0e8c60 Dummy {f00=0x0049, f01=0x0190, f02=»UEST IS COMPLETED WITH FOLLOWING BITS L P* IN RETURN CODE OF ECB: M . P* M R 2 P* BIT 9: CHANNEL UNIT NOT IN ACTIVE STATUS M P* M P* M . P* BIT 14: ACK NOT RECEIVED AFTER OUTPUT M P* M 0 P* BIT 15: SYNC NOT RECEIVED AFTER O
0x0e8c60…0e8df4 (1, 140) Dummy {f00=0x004a, f01=0x0190, f02=» ANK A2,/FF M P RF(E) DISIIE N P CWK A2,8 CHANNEL 1-8 ? N * P RF(G) DISIIE N J P SLL A2,1 N ` & P LD A2,CHTAB+8,A2 GET CWT-ADDRESS N r P RF(E) DISIIE N P LDR A7,A7 WRONG ORDER ? N P RF(E) LOPT10 NO N ( PDISIIE ABL DISIOE I/O REQUEST
0x0e8df4…0e8f88 Dummy {f00=0x004a, f01=0x0190, f02=»SY N n & P LDK A5,/E0 INDICATE REQUEST GOING O * P ST A5,CWTRST,A2 INDICATE LOOP-TESTING O 4 P ABL TDISP O b P EJECT O t P* O P* O P* END OF LOOP-TEST O P* O PIHLOP EQU * O P LDR A5,A1 GET CWT-ADDRESS O , P LD A1,CWTRST,A5 GET
0x0e8f88…0e911c Dummy {f00=0x004a, f01=0x0190, f02=»E IN CHANNEL STATUS O n P ABL DISEND P P EJECT P 0 P* P > P* P H P* C H L T 1 / C H L T 2 P R P* P t P* C H R T 1 / C H R T 2 P ~ P* P 8 P* THIS IS THE INTERRUPT HANDLER FOR CHLT AND CHRT P P* P 2 P* WHEN INTERRUPT FROM
0x0e911c…0e92b0 Dummy {f00=0x004a, f01=0x0190, f02=»* LOGGS IT AND DETERMINES INPUT WORD TO GET P 0 P* DEVICE NUMBER , LINE NUMBER AND TYPE OF Q 6 P* INTERRUPT. Q j P* Q 2 P* FOLLOWING TYPES OF INTERRUPT ARE RELEVANT Q P* Q . P* D = DEVICE ADDRESS C = CHARACTER Q P* Q 8 P
0x0e92b0…0e9444 Dummy {f00=0x004a, f01=0x0190, f02=»IME OUT D = 0 C = 0 Q 8 P* SER POWER ON D = 0 C = 3 R , 8 P* DRI DATA REQUEST IMMEDIATE SIGN BIT SET R h 8 P* ABC+ BLOCK TR. ACKNOWLEDGED D = 0 C = 8 R 8 P* ABC-L LRC ERROR IN BLOCK
0x0e9444…0e95d8 Dummy {f00=0x004a, f01=0x0190, f02=» 8 P* DRD DATA REQUEST DELAYED D # 0 C = 0 S F P* LOCAL CHAR. MAY BE DIFFERENT FROM ZERO S @ 8 P* STD STATUS MESSAGE D # 0 C # 0 S 2 P* DIN DATA INPUT D # 0 S P EJECT S
0x0e95d8…0e976c Dummy {f00=0x004a, f01=0x018e, f02=»LAST INTERRUPT S ~ P* T & P CF A15,SAVE8 SAVE REGISTERS A1-A8 T P LDK A7,2 INDICATE CHLT1 T J P RF CLT010 T j P* T | PCHLT2 EQU * T P* T P* T P* T P* T P* C H L T 2 T P* T P* INTERRUPT FROM CHLT2 T P* T
0x0e976c…0e9900 Dummy {f00=0x004a, f01=0x0190, f02=» T v P RF CLT010 U P* U P XIF U $ P* U 0 P IFT LOCHAN=3 U : $ P ST P,INTSAV SAVE LAST INTERRUPT U P & P CF A15,SAVE8 SAVE REGISTERS A1-A8 U x P LDK A7,4 INDICATE CHLT2 U P RF CLT010 U P* U P XIF U P* U P IFT LOCHAN=4 U $
0x0e9900…0e9a94 (1, 141) Dummy {f00=0x004a, f01=0x0190, f02=» U P XIF V P* V PCHLT3 EQU * V P* V 2 P* V < P* V F P* C H L T 3 V P P* V f P* INTERRUPT FROM CHLT3 V p P* V P IFT LOCHAN=4 V $ P ST P,INTSAV SAVE LAST INTERRUPT V & P CF A15,SAVE8 SAVE REGISTERS A1-A8 V P LDK
0x0e9a94…0e9c28 Dummy {f00=0x004a, f01=0x0190, f02=» & P CF A15,SAVE8 SAVE REGISTERS A1-A8 W P LDK A7,6 INDICATE CHLT3 W . P RF CLT010 W N P* W ` P XIF W j P* W v PCHLT4 EQU * W P* W P* W P* W P* C H L T 4 W P* W P* INTERRUPT FROM CHLT4 W P* W P IFT LOCHA
0x0e9c28…0e9dbc Dummy {f00=0x004a, f01=0x018e, f02=» W P* X P XIF X P* X P EJECT X ( P* X 6 P* X @ P* C H R T 1 X J P* INTERRUPT FROM CHRT1 X ` P* X PCHRT1 EQU * X P ST P,INTSAV X & P CF A15,SAVE8 SAVE REGISTERS A1-A8 X P LDK A7,10 INDICATE CHRT1 X P RF CLT0
0x0e9dbc…0e9f50 Dummy {f00=0x004a, f01=0x0190, f02=» $ P ST P,INTSAV SAVE LAST INTERRUPT Y P* Y , & P CF A15,SAVE8 SAVE REGISTERS A1-A8 Y 6 P LDK A7,14 INDICATE CHRT2 Y ` P RF CLT010 Y P XIF Y P* Y P IFT RECHAN=3 Y & P ST P,INTSAV STORE LAST INTERRUPT Y & P CF A15,SAVE8 SAVE REGISTERS A
0x0e9f50…0ea0e4 Dummy {f00=0x004a, f01=0x0190, f02=»RUPT Y t P* Z & P CF A15,SAVE8 SAVE REGISTERS A1-A8 Z P LDK A7,14 INDICATE CHRT2 Z @ P RF CLT010 Z b P XIF Z t P* Z P* Z P* C H R T 3 Z P* Z P* INTERRUPT FROM CHRT3 Z P* Z PCHRT3 EQU * Z P IFT RECHAN=3 Z $
0x0ea0e4…0ea278 Dummy {f00=0x004a, f01=0x0190, f02=»10 Z P XIF [ P* [ P IFT RECHAN=4 [ $ P ST P,INTSAV SAVE LAST INTERRUPT [ 6 P* [ ^ & P CF A15,SAVE8 SAVE REGISTERS A1-A8 [ h P LDK A7,18 INDICATE CHRT3 [ P RF CLT010 [ P XIF [ P* [ P* [ P* C H R T 4 [ P* [ P*
0x0ea278…0ea40c Dummy {f00=0x004a, f01=0x018e, f02=»F A15,SAVE8 SAVE REGISTERS A1-A8 [ P LDK A7,22 INDICATE CHRT4 ( P XIF J P* V * PCLT010 LD A5,CHTAB,A7 GET CWT-ADDRESS ` P* P XIF P* * P EX CWTINR,A5 EXECUTE INR-INSTRUCTION P* P IFT LOGING=1 P* 4 PCL
0x0ea40c…0ea5a0 Dummy {f00=0x004a, f01=0x018e, f02=» l 4 P* MOREOVER, IF REMOTE, GET THE RIGHT CHANNEL ] 2 P* OF CHRT AND START OR RESTART SYNC-TIMER. ] @ P* ] v P SUK A7,10 ] " P RF(N) CLT018 LOCAL INTERRUPT ] P LDR A3,A2 ] . P SLC A3,6 REMOTE FIRST OR SECOND CHANNEL ? ] P RF(NN) CLT0
0x0ea5a0…0ea734 (1, 142) Dummy {f00=0x004a, f01=0x0190, f02=» * P ANK A3,/2 FIRST OR SECOND TERMINAL ? ^ P LDR A7,A5 ^ 2 P ADR A7,A3 ^ D & P LD A3,CWTRST,A5 LOOP TEST MODE ? ^ V P ABL(N) CLT170 YES ^ & PCLT018 LDK A1,0 RESET RETURN CODE ^ ( P LDR A3,A2 DATA REQUEST IMMEDIATE ? ^ P RF(N) CLT050 ^ $ P A
0x0ea734…0ea8c8 Dummy {f00=0x004a, f01=0x0190, f02=»OF CONTROL CHARACTER ^ | P* _ P LDR A3,A2 _ & . P ANK A3,/FF DELETE DEVICE AND LINE NUMBER _ 8 P RF(E) CLT030 OER _ j P SUK A3,7 _ P RF(E) CLT050 ACK _ P ADK A3,2 _ P ABL(E) CLT080 NAK _ P ADK A3,2 _ P ABL(E) CLT100 POWER ON _
0x0ea8c8…0eaa5c Dummy {f00=0x004a, f01=0x0190, f02=» P RF(E) EXIIT NO ` P XRK A4,/80 YES, RESET BIT ` P SC A4,LRCACK,A7 AND STORE ` > " P LD A6,LRCDWT,A7 LRC-DEVICE ? ` ` P RF(E) EXIIT ` P ANK A4,/7F ` P RF(Z) CLT046 YES ` * P CM LRCDWT,A7 RESET LRC-DEVICE POINTER ` ( P LDK A4,1 RESET BL
0x0eaa5c…0eabf0 Dummy {f00=0x004a, f01=0x018e, f02=» ` , P IM CWTADD+2,A5 UPDATE ERROR ACKUMULATOR a P XIF a 8 P* a D P SUK A3,4 VRC-ERROR ? a N P RF(E) CLT042 YES a l P LDK A4,1 a P SUK A3,2 a P RF(E) CLT033 a P ADK A3,4 a P RF(E) CLT033 a P EJECT a P* a 0 P* RES
0x0eabf0…0ead84 Dummy {f00=0x004a, f01=0x018e, f02=» a f P* DEVICE DRIVER. b PCLT030 LDR A7,A7 REMOTE ? b $ P RF(N) CLTQUE NO b F P LD A6,LRCDWT,A7 b ^ P SUR* A6,A5 LRC-DEVICE ? b v P RF(NE) CLTQUE b * P CM LRCDWT,A7 RESET LRC-DEVICE POINTER b P LDK A4,1 b 0 P ANS A4,CWTBLK,A5 RESET BLOC
0x0ead84…0eaf18 Dummy {f00=0x004a, f01=0x0190, f02=» b & P ANK A2,/30 ECHO AND RECOVERY BIT c P RF(NE) CLT045 c 2 , P ORK A3,/10 INDICATE RECOVERY TRIAL DONE c H P SC A3,DWTST,A6 STORE c x PCLT032 LDK A4,0 c 0 PCLT033 LDK A3,2 INDICATE RECOVERY OF DEVICE c P RF CPO025 c P EJECT c P* c
0x0eaf18…0eb0ac Dummy {f00=0x004a, f01=0x0190, f02=»* IF OUTPUT TO PRINTERS WITH LRC-CONTROL SAME c P* PROCEDURE AS FOR ABC+. d 8 P* d & PCLT042 LDR* A4,A6 BLOCK SENDING ? d f P RB(N) CLT031 d PCLT043 ABL CLT107 d P EJECT d P* d P* POWER ON d P* d 8 P* RECOVERY RO
0x0eb0ac…0eb240 Dummy {f00=0x004a, f01=0x0190, f02=» d t P* e & P* ON EXIT TO RECOVERY ROUTINE: e P* e < P* A5 = STACKBASE e F P* A6 = DWT-ADDRESS e b P* e PCHPOWO EQU * e , P LDR* A2,A5 GET CHANNEL OCCUPYING DEVICE e . P CM CWTRTC,A5 RESET RETRANSMISSION COUNTER e P LDR A7,
0x0eb240…0eb3d4 (1, 143) Dummy {f00=0x004a, f01=0x018e, f02=»KSENDING RUNNING e t $ PCPO010 LDR A3,A6 DEVICE COUNTER f P ANK A3,/FF f @ " P LDR A1,A8 SET ADDRESS POINTER f T PCPO020 ADK A1,2 f z P LDR* A6,A1 GET DWT-ADDRESS f P RF(E) CPO030 f P SRC A6,1 f P RF(N) CPO030 f P SLC A6,1 f ( P L
0x0eb3d4…0eb568 Dummy {f00=0x004a, f01=0x0190, f02=» f l P ANS A7,DWTST,A6 g P LC A7,DWTST,A6 g P ANK A7,/20 ECHO MODE ? g 8 P RF(NE) CPO030 YES g X 0 P CWR A6,A2 DEVICE WAITING FOR CHANNEL ANSWER g r P RF(E) CPO030 YES g : PCPO025 LD A7,DWTADR,A6 ADDRESS TO ADDRESS-BLOCK IN A7 g 2 P LD A7,4,A
0x0eb568…0eb6fc Dummy {f00=0x004a, f01=0x0190, f02=»RECOVERY ROUTINE g ~ * PCPO030 SUK A3,2 ALL DEVICES THREATED? h P RB(NE) CPO020 NO TAKE NEXT h F PEXIIT RF EXIT h j P EJECT h P* h 6 P* INDICATE NOT OPERABLE BEFORE GOING TO DRIVER h P* h PCLT045 EQU * h ( P LDK A1,NOERR INDICATE N
0x0eb6fc…0eb890 Dummy {f00=0x004a, f01=0x0190, f02=»ND THEN EXAMINE LAST h v 0 P* OUTPUT DWT. IF NOT DEFINED UPDATE ERROR i 6 P* ACKUMULATOR AND GO TO DISPATCHER. IF SYNC-ACK i P P* DROP IT. i 8 P* NORMAL ACK OR DRI WILL RESULT IN A RESETTING OF i 8 P* RECOVERY BIT IN DWT. THEN A SIMULATION
0x0eb890…0eba24 Dummy {f00=0x004a, f01=0x0190, f02=» i X : P* HANDLING ANSWERS FROM DEVICE IS AFFECTED AND THEN j > P* IF DRI A BRANCH IS MADE TO THE DATA REQUEST SECTION. j F * P* IF ACK WE HAVE TO WAIT FOR A DRD. j PCLT050 EQU * j & P LC A3,CWTLOW,A5 LAST OUTPUT WORD j " P ANK A3,/F0 KEEP DEV
0x0eba24…0ebbb8 Dummy {f00=0x004a, f01=0x0190, f02=»DK A4,2 j 4 P ORS A4,CWTRST,A5 INDICATE ACK IN CHANNEL STATUS k P LDR A8,A3 OBC-ACK ? k H P RF(NE) CLT052 k d P LDKL A3,/8000 k z * P ORS A3,LRCACK,A7 INDICATE ABC ALLOWED k P RF CLT055 k PCLT052 EQU * k . P LDR* A3,A6 DEVICE WITHOUT DATA REQU
0x0ebbb8…0ebd4c Dummy {f00=0x004a, f01=0x0190, f02=»G k ~ P* l PCLT055 EQU * l P INH l ( * P LD A3,DWTTP,A6 ADDRESS TO TIMER BLOCK l 4 P RF(E) CLT060 l b P* l x P* RESTART TIMER l P* l " P LDKL A3,-DRQTIM RESTART TIMER l P ST* A3,DWTTP,A6 l P RF CLT068 l P* l P* STA
0x0ebd4c…0ebee0 Dummy {f00=0x004a, f01=0x018e, f02=» l v " P CF A15,SETIMP GET TIMER BLOCK m > P DATA DRQTUT,DRQTIM ADDRESS TO TIME-OUT ROUTINE AND DELAY m . PCLT068 EQU * m p P LDR A8,A8 OBC-ACK ? m P RF(E) EXIT YES m P LDK A1,0 m & P LDR* A4,A6 GET CHANNEL PARAMETER m . P RF(N) CLT110 DEVICE
0x0ebee0…0ec074 (1, 144) Dummy {f00=0x004b, f01=0x0190, f02=» P EJECT n P* n 8 P* TIME-OUT ROUTINE HANDLING MISSING DATA REQUESTS n : P* FROM PRINTERS AND , FOR REMOTLY CONNECTED DEVICES n X 8 P* USING THE LRC-FUNCTION , MISSING BLOCK CONTROL n . P* CHARACTERS (ABC) FROM SELECTOR UNIT. n P* n
0x0ec074…0ec208 Dummy {f00=0x004b, f01=0x0190, f02=»B(N) EXIT n P SLL A3,2 ECHO MODE ? o P RF(N) CLT110 YES o 0 " P LDR* A5,A6 CHANNEL PARAMETER o J P ANK A5,/F o p P SLL A5,1 2 * INDEX o P LDK A2,/83 o P CC A2,DWTOCH,A6 o P RF(NE) DRQT10 o P SUK A5,4 LOCAL DEVICE ? o P RB(N) E
0x0ec208…0ec39c Dummy {f00=0x004b, f01=0x0190, f02=»T-ADDRESS o x ( P IM ACKTIM,A5 INCREMENT ACKUMULATOR p P* p > P XIF p H P* p T P ABL CLT032 p ^ P EJECT p r P* p P* N A K p P* p 8 P* ERROR ACKUMULATOR AND RETRANSMISSION COUNTER IS p 8 P* UPDATED. LAST OUTPUT CHARACTER IS
0x0ec39c…0ec530 Dummy {f00=0x004b, f01=0x0190, f02=»IVER. p ^ P* q PCLT080 EQU * q $ P LDR* A6,A5 GET LAST OUTPUT DWT q , P RB(E) EXIT q T P* q h P IFT ACKMUL=1 q r P* q * P IM CWTADD,A5 UPDATE ERROR ACKUMULATOR q P* q P XIF q P* q P CWK A6,1 SYNC BEFORE NAK? q P RB(E)
0x0ec530…0ec6c4 Dummy {f00=0x004b, f01=0x0190, f02=» P ABL(E) CLT030 r * P LD A2,CWTLOW,A5 GET LAST OUTPUT WORD r $ P EX CWTOTR,A5 EXECUTE OTR-INSTR. r H P IFT LOGING=1 r p 2 P CF A15,LOGG ** LOGG INPUT CHARACTER ** r P XIF r P STR A6,A5 SET CHANEL BUSY r , P ST A2,CWTLOW,A5 STORE LAST OU
0x0ec6c4…0ec858 Dummy {f00=0x004b, f01=0x0190, f02=» CF A15,RESTSY START OR RESTART SYNC-TIMER r PCLT090 ABL TDISP s 2 P EJECT s J P* s X P* s b $ P* DATA INPUT AND DATA REQUEST s l P* s 6 P* LOCAL DEVICES: GET DWT-ADDRESS, GET ORDER AND s : P* ECB-ADDRESS AND GO TO DEVICE-DEPENDENT INTE
0x0ec858…0ec9ec Dummy {f00=0x004b, f01=0x0190, f02=»VICES s : P* DATA REQUEST: INPUT WORD IS COMPLEMENTED WITH t 8 P* STATUS FROM CHANNEL PARAMETER. t L : P* STATUS MESSAGE: NEW STATUS IS STORED IN CHANNEL t @ P* PARAMETER. THEN WAIT-STATUS-INDICATOR t <
0x0ec9ec…0ecb80 Dummy {f00=0x004b, f01=0x0190, f02=» GET ORDER AND ECB-ADDRESS AND GO TO t < P* DEVICE WITH THE NEW STATUS. IF NO u < > P* WAITING FOR STATUS, CONTROL IS GIVEN u | ( P* TO DISPATCHER. u P* u P* u PCLT100 EQU
0x0ecb80…0ecd14 (1, 145) Dummy {f00=0x004b, f01=0x0190, f02=»E NUMBER u | P CWK A4,/E SYNC-INPUT ? v P RF(E) CLT150 YES v 0 P LOOP SWITCH SET v J 0 P LD A8,CWTITA,A5 ADDRESS TO INTERRUPT TABLE v d P ADR A8,A3 v , P LDR* A8,A8 ADDRESS TO TERMINAL SECTION v P RB(Z) EXIT NOT DEFINED v P LDR* A6,A8 GE
0x0ecd14…0ecea8 Dummy {f00=0x004b, f01=0x018e, f02=»N v z & P ADR A8,A4 ADDRESS TO DWT-ADDRESS w P LDR* A6,A8 GET DWT-ADDRESS w 4 P RB(E) EXIT w X P ANKL A6,/FFFE w l 2 P LCR A3,A6 GET FIRST BYTE IN CHANNEL PARAMETER w P ANK A3,1 DATA INPUT ? w P RF(NE) CLT110 YES w & P LDR* A4,A6 GET CHANNEL
0x0ecea8…0ed03c Dummy {f00=0x004b, f01=0x0190, f02=» w P SUK A3,DUMMSP x P RF(NE) CLT110 x P* x 4 P************************* x > P* x ` PCLT107 EQU * x j P INH x ~ & P LD A7,DWTTP,A6 GET TIMER POINTER x & P RF(E) CLT110 TIMER ALREADY RESET x P* x P************************* x
0x0ed03c…0ed1d0 Dummy {f00=0x004b, f01=0x0190, f02=»SS x v , P LD A3,DWTADR,A6 ADDRESS TO ADDRESSBLOCK y P ENB y : & P ABI 2,A3 GO TO INTERRUPT HANDLER y F P* y p * PCLT120 LDR A7,A2 REMOTE DATA REQUEST ? y z P ANK A7,/FF y P RF(NE) CLT130 y $ P CWR* A6,A5 DRD BEFORE ANSWER ? y P RB(E) EXIT YE
0x0ed1d0…0ed364 Dummy {f00=0x004b, f01=0x0190, f02=»E OLD STATUS y P ANK A4,/3F RESET OLD STATUS z P SLL A2,4 z 8 P ANK A2,/C0 z J P ORR A4,A2 z ^ ( P SC A4,1,A6 STORE NEW STATUS IN DWT z p $ P LD A4,DWTST,A6 GET STATUS WORD z * P ANKL A4,/200 STATUS CHANGE ALLOWED ? z P RF(E) CLT154 EG. EXIT
0x0ed364…0ed4f8 Dummy {f00=0x004b, f01=0x0190, f02=» ABL CLT033 z P EJECT { P* { " P* { , P* TFU IN LOOP MODE { 6 P* { T PCLT150 EQU * { ^ P LDK A4,1 { r P CWR* A4,A5 SYNC SENT ? { P RF(NE) CLT154 { < P LDKL A4,/8001 INDICATE LOOP MODE AND SYNC-ACK RECEIVED { PCLT152 EQU * {
0x0ed4f8…0ed68c Dummy {f00=0x004b, f01=0x018e, f02=» A3,A2 { P ANK A3,/FF | P SUK A3,3 POWER ON ? | " P RF(E) CLT179 YES | > $ P LDR* A4,A5 GET LAST OUTPUT DWT | X P LDR* A6,A5 | P SUK A4,1 SYNC ? | P RF(E) CLT178 YES | ( P LDK A1,NOERR INDICATE NOT OPERABLE | PCLT177 RB CLT110 |
0x0ed68c…0ed820 Dummy {f00=0x004b, f01=0x0190, f02=» | P* } P* POWER ON } P* } ( PCLT179 EQU * } 2 P LDK A3,/E3 } F * P ANS A3,CWTRST,A5 RESET LOOP TEST BIT } Z P RB CLT100 } P EJECT } P* } P* QUEUE } P* } 2 P* GET LAST OUTPUT DWT AND SET CHANNEL FREE. } 4 P*
0x0ed820…0ed9b4 (1, 146) Dummy {f00=0x004b, f01=0x018e, f02=» } < P* TERMINAL AND SEND IF SOMETHING THERE. IF NOTHING I ~ < P* IN THAT QUEUE, CHECK QUEUE OF INTERRUPTING TERMINAL ~ H & P* AND SEND IF SOMETHING THERE. ~ P* ~ PQUEUE EQU * ~ P STR A2,A15 SAVE A2 ~ $ P LDR* A4,A5 GET LAST OUTPUT
0x0ed9b4…0edb48 Dummy {f00=0x004b, f01=0x0190, f02=» P RF(N) QUEU01 YES " P LDK A1,1 INDICATE FIRST TRIAL " P CWR A7,A5 REMOTE TERMINAL 2 ? D P RF(E) QUEU20 NO j . PQUEU01 LDKL A8,CWTEQ QUEUE FIRST TERMINAL * PQUEU03 ADR A8,A5 ADD CWT-TABLE-ADDRESS PQUEU04 EQU * P LDR* A6,A8 QUEUE
0x0edb48…0edcdc Dummy {f00=0x004b, f01=0x0190, f02=»OUT OF QUEUE v * P STR A2,A8 SET NEXT DWT FIRST IN QUEUE . P LC A2,DWTOCH,A6 GET LAST OUTPUT CHARACTER B P CF A15,OUTLIN SEND IT t PQUEU05 LDR* A2,A15 RELOAD A2 0 P CWR A6,A4 DEVICE ALREADY IN OUTPUT QUEUE ? P RF(E) QUEU30 " P LDR A6,
0x0edcdc…0ede70 Dummy {f00=0x004b, f01=0x018e, f02=»1,0 P ABL RTNA15 PQUEU10 LDR A1,A1 READY ? P RB(E) QUEU05 @ P LDK A1,0 V " P CWR A7,A5 TERMINAL 2 REMOTE ? h P RB(E) QUEU01 NO & PQUEU20 LDKL A8,CWTEQ+2 NEXT QUEUE P RB QUEU03 PQUEU30 ADKL A15,4 P RF EXITA
0x0ede70…0ee004 Dummy {f00=0x004b, f01=0x018e, f02=» P* PRESTSY EQU * P STR A4,A15 " ( P LD A4,CWTTP,A5 TIMER POINTER ZERO? 6 P RF(NE) RESY20 b P LDR A1,A5 x P LDK A4,CWTTP TIMER POINTER P ADR A4,A5 ADD CWT-ADDRESS P CF A15,SETIMP SET TIMER P DATA SYNCUT,TIME
0x0ee004…0ee198 Dummy {f00=0x004b, f01=0x018e, f02=» P LDR* P,A15 P EJECT P* * P* 4 * P* TIME-OUT ROUTINE FOR SYNC-SENDING > 0 P* IF NOTHING HAPPENS ON A LINE IN 500 MS l P* SYNC-CHARACTER IS SENT. P* PSYNCUT EQU * $ P CM CWTTP,A1 RESET TIMER POINTER
0x0ee198…0ee32c Dummy {f00=0x004b, f01=0x0190, f02=» P LDK A6,1 P EX CWTOTR,A1 OUTPUT P RF(U) EXITA 2 , P STR A6,A1 STORE "1" AS LAST OUTPUT DWT F P* v P IFT LOGING=1 P* * P CF A15,LOGG LOGG OF OUTPUT CHARACTER P XIF P* P LDR A3,A2 P SLL A3,4 P
0x0ee32c…0ee4c0 Dummy {f00=0x004b, f01=0x0190, f02=»WTRST,A1 LOOP MODE ? P LDR A3,A4 P ANK A4,/80 . P RF(E) EXITA NO B P ANK A3,/60 Z P RF(E) SYNC20 THIRD SYNC n P SUK A3,/20 P RF(NE) SYNC10 FIRST SYNC P LDK A3,/20 SECOND SYNC * PSYNC10 XRS A3,CWTRST,A1 CHANGE COUNT
0x0ee4c0…0ee654 (1, 147) Dummy {f00=0x004b, f01=0x0190, f02=»U T P U T P* < P* SEND ONE CHARACTER VIA 'OUTLIN' INDICATE INTERRUPTS & P* ALLOWED AND SAVE A3-A5 IN DWT. P* POUTPUT EQU * P ANK A2,/FF P LDR A1,A2 P SUK A1,/82 STX ? P RF(E) OUTP05 P SUK A1,/15 ET
0x0ee654…0ee7e8 Dummy {f00=0x004b, f01=0x0190, f02=» CF A15,OUTLIN SEND ONE CHARACTER VIA CHANNEL UNIT P EJECT : P* H P* S T R E G R P* h : P* INDICATE INTERRUPTS ALLOWED AND SAVE A3-A5 IN DWT r P* PSTREG EQU * P INH P LDKL A1,/100 0 P ORS A1,DWTST,A6 INDICAT
0x0ee7e8…0ee97c Dummy {f00=0x004b, f01=0x0190, f02=» A5 t P RB EXITA P EJECT P* , P* L D R E G * 6 P* N > P* IF INTERRUPT ALLOWED RESTORE A3-A5 FROM DWT AND RETURN X & P* VIA A5. ELSE GO TO DISPATCHER. P* P* PLDREG EQU * P LD A3,DWTST,A6 P ANK
0x0ee97c…0eeb10 Dummy {f00=0x004b, f01=0x0190, f02=»OM DWT AND RETURN TO USER VIA A5 | PLDREGF EQU * ( & P LD A5,DWTA5,A6 A5 < PLDREGE EQU * f & P LD A3,DWTA3,A6 RELOAD REGISTER A3 z & P LD A4,DWTA4,A6 A4 $ PLDRE10 LD A7,DWTOR,A6 GET ORDER P ANK A7,/FF
0x0eeb10…0eeca4 Dummy {f00=0x004b, f01=0x0190, f02=»UBROUTINE TO GET ONE CHARACTER FROM ECB-BUFFER P* 6 P* ON ENTRY: @ P* V P* A3 = BUFFER INDEX ` P* A8 = ECB-ADDRESS ~ P* P* ON EXIT: P* P* A2 = CHARACTER * P* A1 = 0 IF LAST CHARACTER ELSE # 0
0x0eeca4…0eee38 Dummy {f00=0x004b, f01=0x0190, f02=» LD A1,4,A8 REQUESTED LENGTH P SUR A1,A3 $ * P RF(NP) GCH010 LAST CHARACTER REACHED 6 " P LD A2,2,A8 GET BUFFER ADDRESS d P ADR A2,A3 P LCR A2,A2 CHAR. TO A2 P ANK A2,/FF $ P ADK A3,1 INCREMENT BUFFER INDEX P RF GCH020 , P
0x0eee38…0eefcc Dummy {f00=0x004b, f01=0x0190, f02=»N = SUBROUTINE TO SEND ONE CHARACTER VIA P* CHANNEL UNIT 0 P* R P* B P* GET CWT-ADDRESS AND IF CHANNEL UNIT FREE SEND CHARACTER. f 8 P* RUNNING LRC-PROCESS CAN STOP OUTPUT FROM OTHER 8 P* DEVICES ON SAME LINE. IF CH
0x0eefcc…0ef160 Dummy {f00=0x004b, f01=0x0190, f02=»F " P LDR* A7,A6 CHANNEL PARAMETER P ANK A7,/F 0 P SLL A7,1 DOUBLE INDEX B & P LD A5,CHTAB+2,A7 GET CWT-ADDRESS ` P SUK A7,8 REMOTE ? P RF(N) OUL100 NO . P LCR A3,A6 LEFT BYTE IN CHANNEL PARAMETER * P SRL A3,2 SECOND TERMINAL
0x0ef160…0ef2f4 (1, 148) Dummy {f00=0x004c, f01=0x0190, f02=»L100 INH P* ( P* IF UNIT NOT FREE QUEUE OUTPUT. 2 P* IF REMOTE DEVICE AND LRC-PROCESS ALREADY F 0 P* RUNNINGON TERMINAL FOR ANOTHER DEVICE, | 0 P* QUEUE THIS NEW OUTPUT IF LRC-CONTROL ON P* IT IS WANTED. P* ELSE
0x0ef2f4…0ef488 Dummy {f00=0x004c, f01=0x0190, f02=»UL500 P LDR A3,A2 P SUK A3,/82 STX ? P RF(NE) OUL200 NO : P EJECT T P* b P* S T X l P* ~ * P LD A3,LRCDWT,A7 LRC-PROCESS RUNNING ? P RF(NE) OUL175 YES P LDK A2,0 $ P ST A6,LRCDWT,A7 SET LRC-DEVICE ,
0x0ef488…0ef61c Dummy {f00=0x004c, f01=0x018e, f02=»,/E00 SET DEVICE NUMBER TO ZERO P RF OUL510 ( & POUL175 CWR A3,A6 SAME LRC-DEVICE ? : P RF(NE) OUL800 QUEUE OUTPUT d P RF OUL350 POUL200 SUK A3,/15 ETB ? P RF(NE) OUL300 NO P EJECT P* P* E T B P* & P
0x0ef61c…0ef7b0 Dummy {f00=0x004c, f01=0x0190, f02=» | P* 8 POUL300 CW A6,LRCDWT,A7 SAME DEVICE SENDING WITH LRC P RF(Z) OUL350 YES N P LD A3,CWTBLK,A5 h , P RF(NN) OUL500 BLOCKSENDING NOT RUNNING * P RF OUL800 BLOCKSENDING RUNNING, QUEUE P 0 POUL350 LDR* A3,A6 DEVICE WITH DATA
0x0ef7b0…0ef944 Dummy {f00=0x004c, f01=0x0190, f02=»NG n P LDK A3,/80 2 P SC A3,CWTBLK,A5 INDICATE BLOCKSENDING RUNNING P EJECT T P* b P* l & P* SEND CHARACTER SECTION. v 2 P* CHARACTER IS SENT,SYNC-TIMER UPDATED 8 P* LAST OUTPUT DWT AND LAST OUTPUT CHARACTE
0x0ef944…0efad8 Dummy {f00=0x004c, f01=0x0190, f02=» * " P LDR* A3,A6 CHANNEL PARAMETER P ANKL A3,/7E00 0 & POUL510 ORR A2,A3 OUTPUT WORD IN A2 F P* p P* z P* POUL515 EX CWTOTR,A5 OTR P RF(R) OUL800 REFUSED P RF(A) OUL520 ACCEPTED P ADKL A15,20 RESET STACK
0x0efad8…0efc6c Dummy {f00=0x004c, f01=0x0190, f02=» P IFT LOGING=1 P* 0 P CF A15,LOGG ** LOGG OF OUTPUT CHARACTER ** $ P* X P XIF b P* n P STR A6,A5 SET CHANNEL BUSY x , P ST A2,CWTLOW,A5 STORE LAST OUTPUT WORD P LDR A7,A7 REMOTE ? P RF(N) OUL600 P ANK A2,/F
0x0efc6c…0efe00 Dummy {f00=0x004c, f01=0x0190, f02=»AST OUTPUT CHARACTER t POUL700 ABL IHRET8 P EJECT 6 P* D : P* NORMALLY DWT-ADDRESS IS PUT LAST IN OUTPUT QUEUE N P* POUL800 EQU * P LDR A7,A7 REMOTE ? P RF(NN) OUL805 YES P LDR A7,A5 CWT-ADDRESS , POUL805 LD
0x0efe00…0eff94 (1, 149) Dummy {f00=0x004c, f01=0x0190, f02=»OTQ,A4 P RF(E) OUL830 P LDR A4,A3 FOLLOW THE THREAD $ P RB OUL810 H $ POUL820 ST A6,CWTEQ,A7 QUEUE DWT Z P RF OUL840 $ POUL830 ST A6,DWTOTQ,A4 QUEUE DWT P LDK A4,0 : POUL840 ST A4,DWTOTQ,A6 SET OR RESET OUTPUT QUEUE LINK
0x0eff94…0f0128 Dummy {f00=0x004c, f01=0x0190, f02=»ART OF EVERY b @ P* CHLT IN SYSTEM. THE SUBROUTINE IS ENTERED FROM 'PFINIT' P* X P* b P* l PCHLTON EQU * v P LD A4,CHTAB " PCON010 SUK A4,2 ALL TREATED ? P RF(NZ) CON020 NO TAKE NEXT P ABL RTNA15 PCON020 EQU *
0x0f0128…0f02bc Dummy {f00=0x004c, f01=0x0190, f02=»N025 EQU * * P LDK A3,/40 INDICATE CHANNEL NOT BUSY $ P EX CWTCIS,A5 EXECUTE CIO-START @ P RF(U) CON027 h $ P LDK A3,0 INDICATE CHANNEL BUSY ~ . P CF A15,RESTSY START OR RESTART SYNC-TIMER PCON027 EQU * : P SC A3,CWTRST,A5 INDICATE CH
0x0f02bc…0f0450 Dummy {f00=0x004c, f01=0x0190, f02=»N TERMINAL 1 x * P RF(Z) CON028 NO,BLOCK SENDING ALLOWED . P LD A2,10,A1 ANY DEVICE ON SECOND TERMONAL B 0 P RF(NZ) CON029 YES BLOCK SENDING NOT ALLOWED t 4 PCON028 LDK A2,1 INDICATE BLOCK SENDING PERMITTED PCONRET ST A2,CWTBLK,A5 P RF CON035
0x0f0450…0f05e4 Dummy {f00=0x004c, f01=0x0190, f02=»ART t PCON035 EQU * P LDR* A6,A5 GET LAST DWT P RB(Z) CON010 @ P CWK A6,1 SYNC ? V P RB(E) CON010 n P CMR A5 RESET LAST OUTPUT P LDK A2,/00 DUMMY P CF A15,OUTLIN SEND IT P RB CON010 P EJECT P* P
0x0f05e4…0f0778 Dummy {f00=0x004c, f01=0x0190, f02=» P* P* P* P IFT LOGING=1 " P* 8 PLOGG STR A1,A15 B P LD A1,POINT Z P ADK A1,2 n & P CWK A1,BUFE BUFE IS MAX LOGG AREA P RF(NE) L1 ( P LDKL A1,BUF SET FIRST LOGG ADDRESS PL1 ST A1,POINT & P STR A2,A1
0x0f0778…0f090c Dummy {f00=0x004c, f01=0x0190, f02=»G POINTER ~ P* PBUF RES 500 LOGG AREA PBUFE EQU * : P* L P XIF V P* b P EJECT l P* z P* P* E C H O , E C H E N D P* < P* SUBROUTINE TO ECHO CHARACTER CONTAINING TWO PARTS, . P* ONE GENER
0x0f090c…0f0aa0 Dummy {f00=0x004c, f01=0x0190, f02=»FIND ADDRESS n 4 P* TO DEVICE-DEPENDENT ECHO-ROUTINE P* L . P* PART TWO: ECHO ONE OR MORE CHARACTERS V 2 P* CORRESPONDING TO ONE CHARACTER 4 P* TO BE STORED IN INPUT ECB-BUFFER P* P* 4
0x0f0aa0…0f0c34 (1, 150) Dummy {f00=0x004c, f01=0x0190, f02=» P* 6 P* RESTRICTIONS IN DEVICE DEPENDENT ECHO DRIVER P* H " P* A7 MUST NOT BE DESTROYED R 6 P* THE ECHO-ROUTINE SHOULD BE TERMINATED WITH A x P* JUMP TO 'ECHRTN'. P* PECHEND EQU * P* P IFT CECHO=1
0x0f0c34…0f0dc8 Dummy {f00=0x004c, f01=0x0190, f02=»T p P ST A4,DWTA4,A6 P ST A5,DWTA5,A6 " P LD A1,DWTST,A6 STATUS : P SLL A1,2 X $ P RF(NN) RETUR NO ECHO REQUESTED j 0 P LDR A4,A6 SAVE DWT-ADDRESS OF INPUT DEVICE 2 P LD A6,DWTECH,A6 DWT-ADDRESS OF OUTPUT DEVICE 6 P ST A4,DWTWA
0x0f0dc8…0f0f5c Dummy {f00=0x004c, f01=0x416c, f02=» TO ADDRESS-BLOCK x 2 P ABI 6,A1 GO TO ECHO-ROUTINE DEVICE-DEPENDENT P XIF P PECHRTN EQU * P IFT CECHO=1 p P LDR A7,A7 END? P RF(NN) ERETUR NO ( P CF A15,TENDIO END I/O OUTPUT DEVICE > PERETUR LD A6,DWTWAT,A6 RELOAD DWT-ADDR
0x0f0f5c…0f10f0 Dummy {f00=0x004c, f01=0x2008, f02=» INR OR OTR WORD e P LDR* A1,A15 f P ADKL A15,2 f 4 P LDR* P,A15 RETURN f H P* f b P* f l PPOINT DATA BUF LOGG POINTER f v P* f PBUF RES 500 LOGG AREA f PBUFE EQU * f P* f P XIF f P* f P END f @ f
0x0f10f0…0f1284 Dummy {f00=0x004c, f01=0x0190, f02=»CTER t P* P* PWRITE EQU * " P LDR* A1,A6 GET DEVICE ADDRESS 4 P ADR* A1,P Z P OTR A2,0,0 l P EXR A1 P RF(NA) WRI300 P IFF LOGG=0 P CF A15,LOGOUT P XIF PWRI200 EQU * P ST A3,DWTSAV,A6 P
0x0f1284…0f1418 Dummy {f00=0x004c, f01=0x0190, f02=»0 P EXR A1 " P IM TPCONT,A7 COUNT TP-ERRORS P LDK A5,STB @ P ADR A5,A6 T P ABL BMM RESTART REQUEST f P EJECT P* P* * P* READTO : READ WITH TIME SUPERVISION " P* FOR 2-/4-WIRE LINE P* P*
0x0f1418…0f15ac Dummy {f00=0x004c, f01=0x0190, f02=»ATA TIMRE4 ( P ST A4,DWTTP,A7 STORE TIMER POINTER PREADT0 EQU * > P LD A4,DWTSAV+2,A7 R PRESYNC EQU * RESYNCRONIZE l P CF A5,STINP PRES20 EQU * P CF A5,READ WAIT FOR SYN P LDR A2,A2 " P RB(N) RESYNC STATUS INTERRUPT
0x0f15ac…0f1740 Dummy {f00=0x004c, f01=0x0190, f02=»TN A5 P EJECT PRET040 EQU * TIME OUT ENTRY P LDR A7,A1 @ P CM DWTTP,A7 R P LDK A5,4 f P ADS A5,DWTA5,A7 x P LDKL A2,/8000 PRETO50 EQU * P ABL IHI200 P* P P* PREDLTS EQU * P ST A4,DWT
0x0f1740…0f18d4 (1, 151) Opaque[0x194]
0x0f18d4…0f1a68 # DirEnt {nam=»INTVMA«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0998, f03=0x2020}
0x0f18d4…0f1a68 IdxSect {
0x0f18d4…0f1a68 f00 = 0x004c // 0xf18d4 @0x0
0x0f18d4…0f1a68 f01 = 0x0008 // 0xf18d6 @0x2
0x0f18d4…0f1a68 gno = [ // 0xf18d8 @0x4
0x0f18d4…0f1a68 [0x00]: C0x004c.0x3.0
0x0f18d4…0f1a68 [0x01]: C0x004d.0x0.0
0x0f18d4…0f1a68 [0x02]: C0x004d.0x1.0
0x0f18d4…0f1a68 [0x03]: C0x004d.0x2.0
0x0f18d4…0f1a68 ]
0x0f18d4…0f1a68 }
0x0f1a68…0f1bfc Dummy {f00=0x004c, f01=0x0190, f02=» 2 P IDENT INTVMA REL 8.2 78-09-15 870105040820 P : P* B 8 P*************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 4 P* INTVMA = INTERRUPT VECTORS AND SYSTEM START 4 P*
0x0f1bfc…0f1d90 Dummy {f00=0x004c, f01=0x0190, f02=»********* f P P P " P* * P* 4 8 P* THIS MODULE CONTAINS HARDWARE INTERRUPT VECTORS, > . P* COMMUNICATION VECTOR TABLE,STACK AREA z $ P* AND MONITOR INITIALIZATION. P* P* P P P P P
0x0f1d90…0f1f24 Dummy {f00=0x004c, f01=0x0190, f02=» ENTRY CVTSBA ADDRESS TO START OF BUFFER POOL 0 P ENTRY CVTEBA ADDRESS TO END OF BUFFER POOL 6 , P ENTRY CVTINP INTERPRETER ADDRESS TABLE j P ENTRY CVTDK START UP DISC & P ENTRY CVTAPA APPLICATION ADDRESS , P ENTRY CVTAPS APPLICATION START AD
0x0f1f24…0f20b8 Dummy {f00=0x004c, f01=0x018e, f02=»T LOAD BLOCK TABLE ADDRESS | ( P ENTRY FREPAR FREE PARTITION POINTER " " P ENTRY PARLEN PARTITION LENGTH N & P ENTRY NUMPAR NUMBER OF PARTITIONS t P , P EXTRN IHPFAR POWER FAIL / AUTO RESTART P EXTRN IHLKM LKM INTERRUPT P EXTRN IHRTC REA
0x0f20b8…0f224c Dummy {f00=0x004c, f01=0x0190, f02=» P** P** P** P** " P** , * P EXTRN CHRT1 REMOTE CHANNEL UNIT NO. 1 6 * P EXTRN CHRT2 REMOTE CHANNEL UNIT NO. 2 d P EXTRN CHRT3 P EXTRN CHRT4 ( P EXTRN IHCC1 CASSETTE CHANGER NO. 1 ( P EXTRN IHCC2
0x0f224c…0f23e0 Dummy {f00=0x004c, f01=0x0190, f02=»2 l P EXTRN CHLT3 P EXTRN CHLT4 P EXTRN IHFD FLOPPY DISCEN 2 P EXTRN IHLP LINE PRINTER T P EXTRN IHCR CARD-READER t P EXTRN IHDU1 DISC UNIT NO. 1 P EXTRN IHDU2 DISC UNIT NO. 2 P EXTRN IHMT MAG. TAPE $ P EXTRN ILLINT
0x0f23e0…0f2574 (1, 152) Dummy {f00=0x004d, f01=0x018e, f02=»TB:ST TASK STATUS AND LEVEL ( P EXTRN PRUN TTAB FOR RUNNING PROGRAM $ 0 P EXTRN INIMON MONITOR INITIALIZATION ROUTINE P P EXTRN BUG BUGGER * P EXTRN PFINIT INIT AFTER MASTER CLEAR P EXTRN IHINPT TRAP HANDLER P* P P $ P
0x0f2574…0f2708 Dummy {f00=0x004d, f01=0x0190, f02=» h PX:B EQU 0 ( PNUMPAR EQU X:B NUMBER OF PARTITIONS 8 P* BY SETTING X:A NOT EQUAL TO ZERO, UNLOAD IS NOT F < P* PERFORMED ON CASSETTE AFTER THE APPLICATION LOADING P* PX:C EQU 0 PUNLOAD EQU X:C P PREL0 EQU *
0x0f2708…0f289c Dummy {f00=0x004d, f01=0x0190, f02=» P DATA IHRTC 2 P DATA ILLINT 3 P DATA ILLINT 4 < P DATA ILLINT 5 X P DATA ILLINT 6 t P DATA IHTW 7 P DATA IHTC 8 P DATA IHSOP 9 P DATA ILLINT 10 P DATA ILLINT
0x0f289c…0f2a30 Dummy {f00=0x004d, f01=0x0190, f02=»1 16 P DATA CHRT2 17 P DATA CHRT3 18 . P DATA CHRT4 19 J P DATA IHCC1 20 f P DATA IHCC2 21 P DATA ILLINT 22 P DATA IHCC3 23 P DATA CHLT1 24 P DATA CHLT2 25
0x0f2a30…0f2bc4 Dummy {f00=0x004d, f01=0x0190, f02=» ~ P DATA ILLINT 31 P DATA ILLINT 32 $ P DATA ILLINT 33 @ P DATA IHLP 34 P DATA IHCR 35 v P DATA ILLINT 36 P DATA ILLINT 37 P DATA ILLINT 38 P DATA ILLINT 39 P DATA IH
0x0f2bc4…0f2d58 Dummy {f00=0x004d, f01=0x0190, f02=»ILLINT 45 P DATA ILLINT 46 P DATA ILLINT 47 2 P DATA ILLINT 48 N P DATA ILLINT 49 j P DATA ILLINT 50 P DATA ILLINT 51 P DATA ILLINT 52 P DATA ILLINT 53 P DATA ILLINT
0x0f2d58…0f2eec Dummy {f00=0x004d, f01=0x0190, f02=» 59 P DATA ILLINT 60 P DATA ILLINT 61 * P DATA ILLINT 62 F P DATA IHINPT TRAP ROUTINE b P HLT P EJECT P P* P* SYSTEM HALTS P* P P HLT P HLT P P P P
0x0f2eec…0f3080 Dummy {f00=0x004d, f01=0x0190, f02=» & PCVTSBA DATA 0 START OF BUFFER AREA $ PCVTEBA DATA 0 END OF BUFFER AREA . , PCVTINP DATA 0 INTERPPRETER TABLE ADDRESS V P RF INIT P RF BUGG & PCVTAPA DATA 0 APPLICATION ADDRESS * PCVTAPS DATA 0 APPLICATON START ADDRESS " PCVTCLK DAT
0x0f3080…0f3214 (1, 153) Dummy {f00=0x004d, f01=0x0190, f02=» P* INIMON AND BUGGER ENTRIES P* ( P 2 2 PINIT LDKL A1,INIMON INITIALIZE AND START APPL : P RF BRANCH p P " PBUGG LDKL A13,/90 START BUGGER P LDKL A14,-8 P AD A14,CVTAPA P LDKL A1,BUG PBRANCH ABR(NZ) A1 P
0x0f3214…0f33a8 Dummy {f00=0x004d, f01=0x0190, f02=»ND n P* P PCHCREX CIO A1,1,CHCR P SST A3,CHCR 8 P RB(NA) *-2 L P RTN A8 ` P EJECT p P ~ P* P* INITIALIZATION ENTRY P* P 4 PINIM LDK A6,CHCREX-REL0 LOAD CHCREX SUBR ADDRESS P LDR A8,P AND ST
0x0f33a8…0f353c Dummy {f00=0x004d, f01=0x0190, f02=»* P* COMPUTE MEMORY SIZE P* ( P 2 P LDKL A1,/5555 : P LDKL A2,4094 P PINIM30 SUKL A2,4096 f P LDR* A3,A2 SAVE CONTENTS P STR A1,A2 CHECK IF MEMORY P CWR* A1,A2 P RB(NE) INIM30 P P STR A3,A2 RESTO
0x0f353c…0f36d0 Dummy {f00=0x004d, f01=0x0190, f02=» EJECT P P* P* LOAD APPLICATION P* : P D " P LDKL A1,/0400 IND LOAD ON SOP L P OTR A1,0,SOP r * P LDKL A12,INIM20 INSTRUCTION AFTER APL P ABR A2 PERFORM APL P PINIM20 EQU * P IFT UNLOAD=0 P LDK
0x0f36d0…0f3864 Dummy {f00=0x004d, f01=0x0190, f02=»ART ADDRESS z P EJECT P " P* * P* INITIALIZE STACK 4 P* N P X ( PINIM40 LD A15,CVTSTB LOAD STACK BASE ` P LDKL A1,LOOP P STR A1,A15 P LDKL A1,/FC00 & P STR A1,A15 ADJUST STACK FOR LOOP P SUKL A15,28
0x0f3864…0f39f8 Dummy {f00=0x004d, f01=0x018e, f02=»AB ADDRESS P LDR* A4,A1 TCTAB LENGTH PINIM50 ADK A1,2 2 P SUK A4,2 J P RF(NZ) INIM60 P HLT NO USER TASK FOUND r P " PINIM60 LDR* A5,A1 TTAB ADDRESS ( P LD A2,TTB:ID,A5 TASK IDENTIFICATION P RB(N) INIM50 MONITOR TASK
0x0f39f8…0f3b8c Dummy {f00=0x004d, f01=0x0190, f02=» P P* P* START SYSTEM P* 0 P : P LDKL A13,WAITIS B * P STR A13,A15 STORE USER START ADDRESS Z " P STR A7,A15 AND LEVEL ON STACK " P ABL PFINIT INITIALIZE DEVICES P RES 80 PSTB EQU *-2 STACK BASE P
0x0f3b8c…0f3d20 Dummy {f00=0x004d, f01=0x406e, f02=» DATA 6 ( P LDK A1,0 EXIT PARAMETER = CASSETTE P ABI CVTAPS < P P P END INIM X@ jSER START ADDRESS Z " P STR A7,A15 AND LEVEL ON STACK " P ABL PFINIT INITIALIZE DEVICES P RES 80 PSTB EQU *-2 STACK BASE P
0x0f3d20…0f3eb4 (1, 154) Dummy {f00=0x004d, f01=0x2008, f02=» P P END INIM @ & P EJECT 2 P @ P* H P* START SYSTEM R P* h P r P LD A13,CVTAPS z * P STR A13,A15 STORE USER START ADDRESS " P STR A7,A15 AND LEVEL ON STACK " P ABL PFINIT INITIALIZE DEVICES
0x0f3eb4…0f4048 Dummy {f00=0x004d, f01=0x0190, f02=» IH8124 DW8121 DW8122 , IH8121 @ IH8122 T DW8119 h DW8120 | IH8119 IH8120 DW8117 DW8118 IH8117 IH8118
0x0f4048…0f41dc Dummy {f00=0x004d, f01=0x0190, f02=» IH8114 DW8111 DW8112 , IH8111 @ IH8112 T DW8109 h DW8110 | IH8109 IH8110 DW8107 DW8108 IH8107 IH8108
0x0f41dc…0f4370 Dummy {f00=0x004d, f01=0x0190, f02=» IH8104 INTSAV ILLINT * DISIOE < DWTST N , ( { T A P X ^ TENDIO TDISP , ( ! T 8!@X " , ( @X ! @ @ Y ! _.
0x0f4370…0f4504 Dummy {f00=0x004d, f01=0x0190, f02=» Y p SETIME , ( ) 2 Y 4 X ( ! ! Y " , ( G ! y W Y X ( ! ! R , ( g T Y ] X T 8 SETIMP , ( !@P ! ] _ 0 , ( @ d
0x0f4504…0f4698 Dummy {f00=0x004d, f01=0x0190, f02=» P C X ! ECBCW ( * & X ( ! T B 8 ECBBA f , ( AR _: _@ b v DWTOR * & #@ X ! " Q R Y , ( = Y X ! 8X
0x0f4698…0f482c Dummy {f00=0x004d, f01=0x0190, f02=» h , ( @ _.$ X2 8 X ! " B X ( , ( 0P } _^ > X 8 , ( ( ] 2 ! X V h , ( ! ! ! ! ! * & X X4 %_< * * X * & !
0x0f482c…0f49c0 Dummy {f00=0x004d, f01=0x0190, f02=») ! ! R ! ^ ! , ( ! B # X " 6 ) X 2T $ , ( Y 2W ! Y ,ZD X 4T X " T , ( 6 Y 4 W ] & , ( ! ! X ] _ ! , ( ! X P y Y
0x0f49c0…0f4b54 (1, 155) Opaque[0x194]
0x0f4b54…0f4ce8 # DirEnt {nam=»INTVMO«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x09b8, f03=0x2020}
0x0f4b54…0f4ce8 IdxSect {
0x0f4b54…0f4ce8 f00 = 0x004d // 0xf4b54 @0x0
0x0f4b54…0f4ce8 f01 = 0x0008 // 0xf4b56 @0x2
0x0f4b54…0f4ce8 gno = [ // 0xf4b58 @0x4
0x0f4b54…0f4ce8 [0x00]: C0x004d.0x3.0
0x0f4b54…0f4ce8 [0x01]: C0x004e.0x0.0
0x0f4b54…0f4ce8 [0x02]: C0x004e.0x1.0
0x0f4b54…0f4ce8 [0x03]: C0x004e.0x2.0
0x0f4b54…0f4ce8 ]
0x0f4b54…0f4ce8 }
0x0f4ce8…0f4e7c Dummy {f00=0x004d, f01=0x0190, f02=» 2 P IDENT INTVMO REL 8.2 78-09-15 870105040820 P : P* B 8 P*************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 4 P* INTVMO = INTERRUPT VECTORS AND SYSTEM START 4 P*
0x0f4e7c…0f5010 Dummy {f00=0x004d, f01=0x0190, f02=»********* f P P P " P* * P* 4 8 P* THIS MODULE CONTAINS HARDWARE INTERRUPT VECTORS, > . P* COMMUNICATION VECTOR TABLE,STACK AREA z $ P* AND MONITOR INITIALIZATION. P* P* P P P P P
0x0f5010…0f51a4 Dummy {f00=0x004d, f01=0x0190, f02=» ENTRY CVTSBA ADDRESS TO START OF BUFFER POOL 0 P ENTRY CVTEBA ADDRESS TO END OF BUFFER POOL 6 , P ENTRY CVTINP INTERPRETER ADDRESS TABLE j P ENTRY CVTDK START UP DISC & P ENTRY CVTAPA APPLICATION ADDRESS , P ENTRY CVTAPS APPLICATION START AD
0x0f51a4…0f5338 Dummy {f00=0x004d, f01=0x018e, f02=»T LOAD BLOCK TABLE ADDRESS | ( P ENTRY FREPAR FREE PARTITION POINTER " " P ENTRY PARLEN PARTITION LENGTH N & P ENTRY NUMPAR NUMBER OF PARTITIONS t P , P EXTRN IHPFAR POWER FAIL / AUTO RESTART P EXTRN IHLKM LKM INTERRUPT P EXTRN IHRTC REA
0x0f5338…0f54cc Dummy {f00=0x004d, f01=0x0190, f02=» P** P** P** P** " P** , * P EXTRN CHRT1 REMOTE CHANNEL UNIT NO. 1 6 * P EXTRN CHRT2 REMOTE CHANNEL UNIT NO. 2 d * P EXTRN CHRT3 REMOTE CHANNEL UNIT NO. 3 * P EXTRN CHRT4 REMOTE CHANNEL UNIT NO. 4 ( P EXTRN IHCC1 CASSETTE CHAN
0x0f54cc…0f5660 Dummy {f00=0x004d, f01=0x0190, f02=»T NO. 1 r * P EXTRN CHLT2 LOCAL CHANNEL UNIT NO. 2 * P EXTRN CHLT3 LOCAL CHANNEL UNIT NO. 3 > * P EXTRN CHLT4 LOCAL CHANNEL UNIT NO. 4 l P EXTRN IHFD FLOPPY DISC JOS P EXTRN IHLP LINE PRINTER P EXTRN IHCR CARD-READER P EXTRN IHD
0x0f5660…0f57f4 (1, 156) Dummy {f00=0x004e, f01=0x0190, f02=»RN HALT HALT ROUTINE P P EXTRN TCTAB $ & P EXTRN TTB:ID TASK IDENTIFICATION 8 ( P EXTRN TTB:ST TASK STATUS AND LEVEL b ( P EXTRN PRUN TTAB FOR RUNNING PROGRAM 0 P EXTRN INIMON MONITOR INITIALIZATION ROUTINE P EXTRN BUG BUGGER * P
0x0f57f4…0f5988 Dummy {f00=0x004e, f01=0x018e, f02=»SS r " PSOP EQU /2E SOP DEVICE ADDRESS PX:A EQU 0 0 * PSEGLEN EQU X:A SEGMENT LENGTH IN BYTES B PX:B EQU 0 p ( PNUMPAR EQU X:B NUMBER OF PARTITIONS 8 P* BY SETTING X:A NOT EQUAL TO ZERO, UNLOAD IS NOT < P* PERFORMED ON CASSETTE AFT
0x0f5988…0f5b1c Dummy {f00=0x004e, f01=0x0190, f02=» P* INTERRUPT VECTORS P* $ P . P DATA IHPFAR 0 6 P DATA IHLKM 1 R P DATA IHRTC 2 n P DATA ILLINT 3 P DATA ILLINT 4 P DATA ILLINT 5 P DATA ILLINT 6 P DATA IHTW
0x0f5b1c…0f5cb0 Dummy {f00=0x004e, f01=0x0190, f02=» 12 P DATA ILLINT 13 P DATA CHLT1 14 * P DATA IHFD 15 F P DATA CHRT1 16 ` P DATA CHRT2 17 | P DATA CHRT3 18 P DATA CHRT4 19 P DATA IHCC1 20 P DATA IHCC2 21 P
0x0f5cb0…0f5e44 Dummy {f00=0x004e, f01=0x0190, f02=» P DATA CHLT4 27 P DATA ILLINT 28 P DATA ILLINT 29 < P DATA IHFD 30 X P DATA ILLINT 31 r P DATA ILLINT 32 P DATA ILLINT 33 P DATA IHLP 34 P DATA IHCR 35 P DATA ILLINT
0x0f5e44…0f5fd8 Dummy {f00=0x004e, f01=0x0190, f02=»2 41 P DATA ILLINT 42 P DATA ILLINT 43 . P DATA IHMT 44 J P DATA ILLINT 45 d P DATA ILLINT 46 P DATA ILLINT 47 P DATA ILLINT 48 P DATA ILLINT 49 P DATA ILLINT 50
0x0f5fd8…0f616c Dummy {f00=0x004e, f01=0x0190, f02=» | P DATA ILLINT 56 P DATA ILLINT 57 $ P DATA ILLINT 58 @ P DATA ILLINT 59 P DATA ILLINT 60 x P DATA ILLINT 61 P DATA ILLINT 62 P DATA IHINPT TRAP ROUTINE P HLT P EJECT P
0x0f616c…0f6300 Dummy {f00=0x004e, f01=0x0190, f02=»ION VECTOR TABLE P* P " PCVTMSZ DATA 0 MEMORY SIZE * PCVTSTB DATA STB STACK BASE L & PCVTSBA DATA 0 START OF BUFFER AREA n $ PCVTEBA DATA 0 END OF BUFFER AREA , PCVTINP DATA 0 INTERPPRETER TABLE ADDRESS P RF INIT P RF BUGG
0x0f6300…0f6494 (1, 157) Dummy {f00=0x004e, f01=0x0190, f02=»TLSB EQU * PCVTDK EQU * PFREPAR EQU * & PPARLEN EQU * : P EJECT N P P* d P* INIMON AND BUGGER ENTRIES n P* P 2 PINIT LDKL A1,INIMON INITIALIZE AND START APPL P RF BRANCH P " PBUGG LDKL A13,/90 ST
0x0f6494…0f6628 Dummy {f00=0x004e, f01=0x0190, f02=»T PARAMETER ~ P CF A15,HALT P EJECT ( P 6 P* > ( P* SUBROUTINE TO EXECUTE CHCR COMMAND H P* t P ~ PCHCREX CIO A1,1,CHCR P SST A3,CHCR P RB(NA) *-2 P RTN A8 P EJECT P P* P* INITIALIZATI
0x0f6628…0f67bc Dummy {f00=0x004e, f01=0x0190, f02=»SAVE APPL ADDRESS $ P ADR A14,A9 CALC APPL LINK BASE P B P J P R P* Z P* COMPUTE MEMORY SIZE d P* P P LDKL A1,/5555 P LDKL A2,4094 PINIM30 SUKL A2,4096 P LDR* A3,A2 SAVE CONTENTS P STR A1,A2
0x0f67bc…0f6950 Dummy {f00=0x004e, f01=0x0190, f02=»VTMSZ MEMORY SIZE TO CVT P SUK A2,2 $ P ST A2,CVTEBA END OF BUFFER POOL 2 P EJECT Z P h P* p , P* UNLOAD MONITOR CAS AND SELECT APPL CAS z P* P P LDK A1,/F UNLOAD P CFR A8,A6 P * PINIM10 CIO A1,1,SOP READ
0x0f6950…0f6ae4 Dummy {f00=0x004e, f01=0x0190, f02=» t P ANK A1,1 SELECT P CFR A8,A6 P LDK A1,2 LOCK 2 P CFR A8,A6 H P ANK A3,1 Z P RB(NZ) INIM10 NO CASSETTE l P LDK A1,8 SEARCH BOT P CFR A8,A6 P LDK A1,/C SEARCH TAPE MARK P CFR A8,A6 P EJECT P P
0x0f6ae4…0f6c78 Dummy {f00=0x004e, f01=0x018e, f02=»UCTION AFTER APL z P ABR A2 PERFORM APL P 4 $ PINIM20 LDK A1,/F UNLOAD CASSETTE < P CFR A8,A6 d P v : P ST A9,CVTSBA SET ADDRESS TO BEGINNING OF BUFFER POOL ~ & P ST A13,CVTAPS SAVE START ADDRESS P P P* P* CHECK
0x0f6c78…0f6e0c Dummy {f00=0x004e, f01=0x0190, f02=» P* P* INITIALIZE STACK P* , P 6 ( PINIM40 LD A15,CVTSTB LOAD STACK BASE > P LDKL A1,LOOP j P STR A1,A15 P LDKL A1,/FC00 & P STR A1,A15 ADJUST STACK FOR LOOP P SUKL A15,28 P LDK A1,0 P STR A1,A15
0x0f6e0c…0f6fa0 Dummy {f00=0x004e, f01=0x0190, f02=»B LENGTH PINIM50 ADK A1,2 P SUK A4,2 ( P RF(NZ) INIM60 : P HLT NO USER TASK FOUND P P p " PINIM60 LDR* A5,A1 TTAB ADDRESS x ( P LD A2,TTB:ID,A5 TASK IDENTIFICATION P RB(N) INIM50 MONITOR TASK , P ST A5,PRUN SET TTAB FOR RUN
0x0f6fa0…0f7134 (1, 158) Dummy {f00=0x004e, f01=0x0190, f02=»STEM P* P P LDKL A13,WAITIS * P STR A13,A15 STORE USER START ADDRESS 6 " P STR A7,A15 AND LEVEL ON STACK d " P ABL PFINIT INITIALIZE DEVICES P RES 57 PSTB EQU *-2 STACK BASE P P P P* P* IDLE L
0x0f7134…0f72c8 Dummy {f00=0x004e, f01=0x404a, f02=»ETER = CASSETTE | P ABI CVTAPS P , P END INIM 4@ FSER START ADDRESS 6 " P STR A7,A15 AND LEVEL ON STACK d " P ABL PFINIT INITIALIZE DEVICES P RES 57 PSTB EQU *-2 STACK BASE P P P P* P* IDLE L
0x0f72c8…0f745c Dummy {f00=0x004e, f01=0x2008, f02=» P LD A13,CVTAPS * P STR A13,A15 STORE USER START ADDRESS & " P STR A7,A15 AND LEVEL ON STACK T " P ABL PFINIT INITIALIZE DEVICES z P RES 47 PSTB EQU *-2 STACK BASE P P P P* P* IDLE LOOP P*
0x0f745c…0f75f0 Dummy {f00=0x004e, f01=0x40a0, f02=»AND LEVEL " P ABL PFINIT INITIALIZE DEVICES PWAITIS EQU * 8 P LDKL A8,10 L P LKM ` P DATA 6 l P ABI CVTAPS | P END @ DISQUE NO JOBS ON QUEUE P EJECT P* P* P* START SYSTEM P* P*
0x0f75f0…0f7784 Dummy {f00=0x004e, f01=0x2008, f02=» P* START SYSTEM P* P* * PINI510 EQU * 4 P IM INIFLG H P LD A13,CVTAPS Z $ P STR A13,A15 USER START ADDRESS p P STR A7,A15 AND LEVEL " P ABL PFINIT INITIALIZE DEVICES P END @ T TTAB FOR RUNNING PROGRAM
0x0f7784…0f7918 Dummy {f00=0x004e, f01=0x018e, f02=» LDPENDN LRUQUE$ CVTLSB0 ( , ( @ ( A * A , @ . 0 Q : NUMPAR j CVTSBA | FREPAR , ( Q Q 1_ 0 @ 2 A 4 PARLENN CVTSTB LOOPN , (
0x0f7918…0f7aac Dummy {f00=0x004e, f01=0x4120, f02=» DISQUEW , ( "D $ T <Z A > A @ 5 T ? INIFLGS J PFINIT , ( 3I A B A D A D ? F n CVTAPS K ( @ H 8 4 p P$ 7 D ; z C D _P iT P R Q P T A J
0x0f7aac…0f7c40 Dummy {f00=0x004e, f01=0x0190, f02=» J F IDENT INPREO REL 8.1 78-04-21 870105040810 IHINPT R IHINPT d , ( ? ? ? ^ $ P _ A ;a x , ( ! :CV V A > > > ? > PRUN , ( A _ > > > ? ? ? ? @
0x0f7c40…0f7dd4 (1, 159) Opaque[0x194]
0x0f7dd4…0f7f68 # DirEnt {nam=»INIMOD«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x09d8, f03=0x2020}
0x0f7dd4…0f7f68 IdxSect {
0x0f7dd4…0f7f68 f00 = 0x004e // 0xf7dd4 @0x0
0x0f7dd4…0f7f68 f01 = 0x0002 // 0xf7dd6 @0x2
0x0f7dd4…0f7f68 gno = [ // 0xf7dd8 @0x4
0x0f7dd4…0f7f68 [0x00]: C0x004e.0x3.0
0x0f7dd4…0f7f68 ]
0x0f7dd4…0f7f68 }
0x0f7f68…0f80fc Dummy {f00=0x004e, f01=0x018e, f02=» 2 P IDENT INIMOD REL 8.2 78-09-15 870105040820 P : P* B " P****************************** L P* r $ P* PHILIPS TERMINAL SYSTEM PTS | P* D P* INIMOD= DUMMY MODULE HOLDING ADDRESSES BUG INIMON AND DCEXT " P* AND DATA MANAG
0x0f80fc…0f8290 Dummy {f00=0x004e, f01=0x4182, f02=» ~ P* P* P ENTRY INIMON P ENTRY BUG 2 P ENTRY DCEXT D P ENTRY DM:TSK X P EXTRN TTABD0 n P EXTRN TTABD1 P EXTRN TTABD2 P* PINIMON EQU 0 INIMON PBUG EQU 0 DEBUGGER PDCEXT EQU 0 PDM:T
0x0f8290…0f8424 Dummy {f00=0x004e, f01=0x2008, f02=» NT INIMOD P* P* DUMMY MODULE $ P* < P* F P ENTRY INIMON P P ENTRY BUG f P* x P* PINIMON EQU 0 INIMON PBUG EQU 0 DEBUGGER P END @
0x0f8424…0f85b8 Dummy {f00=0x004e, f01=0x0190, f02=»BRT ABORT INTERTASK REQUEST P EXTRN FREBLK FREE ONE BLOCK $ P H P P " PDWTECH EQU /22 ECHO DEVICE DWT X P* ~ P* CONDITIONAL ASSEMBLY P* > P* BY SETTING X:A=0 NO ACTIVATION (IF ANY) WILL TAKE PLACE @ P* IF X:A=1 I/O REQU
0x0f85b8…0f874c Dummy {f00=0x004e, f01=0x0190, f02=»ORTED z PCREDIT EQU 0 P EJECT " P 0 P* 8 P* ABORT I/O REQUEST B P* ^ P h PTABORT LDR* A3,A8 p , P RF(N) TABOER REQUEST ALREADY COMPLETED P ( P CF A15,FNDDWT LOOK FOR DWT ADDRESS P LDR A8,A6 P RF(Z) T
0x0f874c…0f88e0 Dummy {f00=0x004e, f01=0x0190, f02=»OER DEVICE NOT BUSY P P SLC A7,2 $ $ P RF(NN) TABO20 NOT ECHO REQUEST 6 " P LD A6,DWTECH,A6 GET ECHO DWT ^ $ P CF A15,TENDIO ABORT ECHO DEVICE P LDR A6,A8 RESTORE DWT PTABO20 EQU * . P CF A15,ITABRT ABORT IF INTERTASK REQUEST
0x0f88e0…0f8a74 (1, 160) Opaque[0x194]
0x0f8a74…0f8c08 # DirEnt {nam=»SHIFT «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x09e0, f03=0x2020}
0x0f8a74…0f8c08 IdxSect {
0x0f8a74…0f8c08 f00 = 0x004f // 0xf8a74 @0x0
0x0f8a74…0f8c08 f01 = 0x0004 // 0xf8a76 @0x2
0x0f8a74…0f8c08 gno = [ // 0xf8a78 @0x4
0x0f8a74…0f8c08 [0x00]: C0x004f.0x0.0
0x0f8a74…0f8c08 [0x01]: C0x004f.0x1.0
0x0f8a74…0f8c08 ]
0x0f8a74…0f8c08 }
0x0f8c08…0f8d9c Dummy {f00=0x004f, f01=0x018e, f02=» 0 P IDENT SHIFT REL 8.2 78-09-15 870172840820 P 8 P* @ 0 P******************************************* J P* ~ $ P* PHILIPS TERMINAL SYSTEM PTS P* P* SHIFT = SHIFT LEFT/RIGHT P* P* P* P* P*
0x0f8d9c…0f8f30 Dummy {f00=0x004f, f01=0x0190, f02=» b * P* SHIFTING OF ELEMENT LEFT OR RIGHT A & P* SPECIFIED NUMBER OF 4 BIT STEPS: 6 P* CF A14,LABEL ` P* BYTE ELEMENT,STEPS v P* P* P ENTRY T:SHL P ENTRY T:SHR P ENTRY M:SHL,M:SHR P* P EXTRN T:OPA P E
0x0f8f30…0f90c4 Dummy {f00=0x004f, f01=0x018e, f02=»T LEFT * P*************** P* * PM:SHL EQU * 4 P IFT OVERLY=1 H P LDK A1,/80 ^ P XRS A1,2,A14 r P XIF PT:SHL SUR A8,A8 P RF SH10 P* P*************** P* SHIFT RIGHT * P***************
0x0f90c4…0f9258 Dummy {f00=0x004f, f01=0x0190, f02=» " PSH10 LD* A7,4,A14 GET ARGUMENT P ECR A7,A7 CHANGE BYTES * P IFT OVERLY=0 J ( P CF A14,T:OPA GET ELEMENT PARAMETERS ` P XIF P IFT OVERLY=1 ( P CF A14,M:OPA GET ELEMENT PARAMETERS P XIF $ P LDR A5,A1 COPY LENGTH 2-COMPL.
0x0f9258…0f93ec Dummy {f00=0x004f, f01=0x018e, f02=»A14 SAVE SIGN P SCR A9,A6 RESTORE DIGIT & P LDR A9,A6 SAVE SIGN BYTE ADDRESS 6 P ECR A7,A7 CHANGE BYTES ` P ANK A7,/FF MASK STEPS P RF(Z) SH60 NO STEPS P LDR A8,A8 P RF(NZ) SH30 SHIFT RIGHT P SUR A4,A4 A4:=0 P*
0x0f93ec…0f9580 Dummy {f00=0x004f, f01=0x018e, f02=» " P SLL A2,4 SHIFT A2 4 BITS LEFT " P ORR A2,A4 CREATE SHIFTED BYTE * P SCR A2,A6 STORE BYTE P " P SUK A6,1 GET ADR OF NEXT BYTE n P LDR A4,A3 SAVE SHIFTED BCD $ P ADK A1,1 DECREMENT BYTE COUNTER P RF(Z) SH50 P RB SH20 P*
0x0f9580…0f9714 (1, 161) Dummy {f00=0x004f, f01=0x0190, f02=» v P ANK A2,/FF MASK BYTE P LDR A3,A2 COPY TO A3 & " P SLL A3,4 SHIFT A3 4 BITS LEFT D $ P SRL A2,4 SHIFT A2 4 BITS RIGHT j " P ORR A2,A4 CREATE SHIFTED BYTE P SCR A2,A6 STORE BYTE " P ADK A6,1 GET ADR OF NEXT BYTE P LDR A4,A3 S
0x0f9714…0f98a8 Dummy {f00=0x004f, f01=0x0190, f02=»EP COUNTER v P RF(Z) SH60 FINISHED " P LDR A1,A5 RESET BYTE COUNTER . P LDR A6,A9 RESTORE ADR T P LDR A8,A8 r P RB(NZ) SH30 SHIFT RIGHT P RB SH20-2 P* PSH60 LDR* A7,A14 GET SIGN P LCR A2,A9 GET SIGN BYTE P ANK A
0x0f98a8…0f9a3c Dummy {f00=0x004f, f01=0x4048, f02=»S n P ABL RETMMM P* P END ( P 4 P <@ DTER . P LDR A6,A9 RESTORE ADR T P LDR A8,A8 r P RB(NZ) SH30 SHIFT RIGHT P RB SH20-2 P* PSH60 LDR* A7,A14 GET SIGN P LCR A2,A9 GET SIGN BYTE P ANK A
0x0f9a3c…0f9bd0 Dummy {f00=0x004f, f01=0x2008, f02=» 4,A14 MODIFY RETURN ADDRESS P RTN A14 , P* < P END F P R P Z@ bCOUNTER P P LDR A6,A9 RESTORE ADR v P LDR A8,A8 P RB(NZ) SH30 SHIFT RIGHT P RB SH20-2 P* PSH60 LDR* A7,A14 GET SIGN P LCR
0x0f9bd0…0f9d64 Dummy {f00=0x004f, f01=0x0190, f02=»WHEN ALL STARTED ) x P EJECT * P* * & P* * 0 P* S W L 4 8 * : P* * P : P* SUBROUTINE TO SWITCH PROGRAM PRIORITY LEVEL TO 48. * Z P* * P* * PSWL48 EQU * * P INH * P STR A1,A15 * $ P LDKL A1,/C000 PSW FOR LEVEL 48 * & P
0x0f9d64…0f9ef8 Dummy {f00=0x004f, f01=0x0190, f02=»JECT MSUBS * P* + P* + P* S W L X Y + ( P* + > 8 P* SUBROUTINE TO SWITCH PROGRAM PRIORITY LEVEL TO: + H ( P* :=48 IF LEVEL ON STACK IS >=48 + ( P* :=XY " " " " " XY<48 + P* + P* + PSWLXY EQU * + P INH
0x0f9ef8…0fa08c Dummy {f00=0x004f, f01=0x018e, f02=» + n P ANK A1,/FC , & P CWK A1,/C0 LEVEL IS IN BITS 8-13 , P RF(NL) LEV48 LEVEL >= 48? , F P ECR A1,A1 NO , h 8 P ORK A1,/C0 SET RUN AND ENABLE FLIP FLOPS (BITS 8&9) , ~ P* , PSETLEV EQU * , ( P ORS A1,4,A15 SET NEW LEVEL ON STACK , P LDR
0x0fa08c…0fa220 Dummy {f00=0x004f, f01=0x0190, f02=» , b P RB SETLEV - P* - P EJECT - $ P* - 2 ( P* INTERRUPT SAVE AND HALT MODULE - < P* - h PINTSAV DATA 0 - r PSAVA15 DATA 0 - " PILLINT LDK A1,5 HALT PARAMETER - P CF A15,HALT - PHALT EQU * - P CF A15,SAVE8 - P STR A9,
0x0fa220…0fa3b4 (1, 162) Opaque[0x194]
0x0fa3b4…0fa548 # DirEnt {nam=»WRITE «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x09f0, f03=0x2020}
0x0fa3b4…0fa548 IdxSect {
0x0fa3b4…0fa548 f00 = 0x004f // 0xfa3b4 @0x0
0x0fa3b4…0fa548 f01 = 0x000c // 0xfa3b6 @0x2
0x0fa3b4…0fa548 gno = [ // 0xfa3b8 @0x4
0x0fa3b4…0fa548 [0x00]: C0x004f.0x2.0
0x0fa3b4…0fa548 [0x01]: C0x004f.0x3.0
0x0fa3b4…0fa548 [0x02]: C0x0050.0x0.0
0x0fa3b4…0fa548 [0x03]: C0x0050.0x1.0
0x0fa3b4…0fa548 [0x04]: C0x0050.0x2.0
0x0fa3b4…0fa548 [0x05]: C0x0050.0x3.0
0x0fa3b4…0fa548 ]
0x0fa3b4…0fa548 }
0x0fa548…0fa6dc Dummy {f00=0x004f, f01=0x018e, f02=» 0 P IDENT WRITE REL 8.2 78-09-15 870172840820 P 8 P* @ 0 P******************************************* J P* ~ $ P* PHILIPS TERMINAL SYSTEM PTS P* P* WRITE = WRITE FUNCTION P* P* P* P* P*
0x0fa6dc…0fa870 Dummy {f00=0x004f, f01=0x0190, f02=» ` P* I/O-REQUESTS P* P* * : P* PICTURE CONTROLS THE EDITING OF NUMERIC DATA FROM 4 > P* BCD-ELEMENTS ONLY, AND CONSISTS OF A CHARACTER STRING. r P* P* P* P EJECT P* P* P************ P
0x0fa870…0faa04 Dummy {f00=0x004f, f01=0x0190, f02=»**** P* EXTERNALS: * P************** " P* 8 P EXTRN PICTAB B P EXTRN T:OPA X P EXTRN M:OPA l P EXTRN CTLTAB P* PBYTE FORM 8,8 P* POVERLY EQU 0 P* P************** P* WORK AREAS *
0x0faa04…0fab98 Dummy {f00=0x004f, f01=0x0190, f02=»O BE STORED IF F x " PEDEPOI DATA 0 ELEMENT POINTER $ PEDCNTE DATA 0 INDEX FOR ELEMENT > " PEDSIGN DATA 0 SIGN FOR ELEMENT f " PEDPPOI DATA 0 PICTURE POINTER . PEDCNTP DATA 0 INDEX FOR PICTURE (2-COMPL.) P EJECT P* P* P*
0x0fab98…0fad2c Dummy {f00=0x004f, f01=0x0190, f02=» * P ADS A1,8,A14 STORE NEW RETURN ADDRESS " P STR A11,A14 SAVE A11 ON STACK 6 P SUKL A14,2 ADJUST STACK P SUR A11,A11 CLEAR A11 | P SUR A10,A10 CLEAR A10 ( PWRIT10 LD A7,2,A8 GET BUFFER ADDRESS P CF A14,EDITA PERFORM EDIT ( P L
0x0fad2c…0faec0 Dummy {f00=0x004f, f01=0x0190, f02=»CONTROL WORD=0 P SRC A3,1 SHIFT CIRCULAR(D) * P RF(NN) WRIT20 JUMP IF NO CONTROL WORD : 0 P LD A4,CTLTAB,A1 GET CONTROL WORD FROM TABLE h * PWRIT20 ST A4,10,A8 STORE CONTROL WORD P ECR A7,A9 P ANK A7,/FF A7=W+R+ORDER $ P SRC A3,3 SH
0x0faec0…0fb054 (1, 163) Dummy {f00=0x004f, f01=0x0190, f02=»TORE FC IN ECB P ADKL A14,2 ADJUST STACK P RTN A14 6 P EJECT F P* T , PT:EDTZ ADKL A8,1 INDICATE "NO CTL-BYTES" ^ P* PT:EDT CF A14,TEDIT PEDTRTN EQU * P LD A11,-4,A14 RESTORE A11 2 P ANKL A8,/FFFE CLEAR "NO CTL-BYT
0x0fb054…0fb1e8 Dummy {f00=0x004f, f01=0x0190, f02=»T:WRTZ ADKL A8,1 INDICATE "NO CTL-BYTES" P* 0 PT:WRT CF A14,TEDIT : P********* T P* WRITE * f P********* x P LDR A1,A8 SAVE ORIGIN A8 P ANKL A8,/FFFE P LKM P DATA 1 P LDR A8,A1 RESTORE ORIGIN A8 P LDR A
0x0fb1e8…0fb37c Dummy {f00=0x004f, f01=0x0190, f02=»EDITA EQU * P LDK A3,1 LOAD MASK P TM A8,A3 0 " P RF(Z) EDIT JUMP IF CTL-BYTES B P LDK A3,0 h P SCR A3,A7 CLEAR 1:ST BYTE z P ADK A7,1 INCREMENT POINTER P SCR A3,A7 CLEAR SECOND BYTE P ADK A7,1 INCREMENT POINTER P
0x0fb37c…0fb510 Dummy {f00=0x004f, f01=0x0190, f02=»ER t P LDR A5,A1 COPY A1 " P ECR A4,A1 CHANGE BYTES TO A4 $ P ANK A1,/FF A1=CHAR J P ANK A4,/FF A4=Z+D f P LDR A3,A4 A3=Z+D P SRL A4,4 A4=Z P SUK A4,8 " P RF(NN) EDPICT JUMP IF PICTURE ( P LC A6,TABZON+8,A4 GET DISPLACEM
0x0fb510…0fb6a4 Dummy {f00=0x004f, f01=0x0190, f02=»14 P EJECT P******** P* TEXT * ( P******** 8 PEDTXT EQU *-BASIS H " P ANK A3,/F MASK OUT DATA PART b $ P LC A6,TABLE,A3 GET DISPLACEMENT ( P RB EDJMP JUMP TO RESPECTIVE ROUTINE " P****************************** " P* SUBF
0x0fb6a4…0fb838 Dummy {f00=0x004f, f01=0x0190, f02=»K OUT INDICATION BIT ~ P ADK A5,2 P ANK A1,1 . ( P RF(Z) SWITCH JUMP IF SWITCH FORMAT @ P LDR A10,A10 l $ P RF(NZ) AFORM1 JUMP IF OCCUPIED * P LDR A10,A2 GET RETURN ADDRESS TO A10 P RF SWITCH 0 PAFORM1 LDR A11,A2 GET RETURN ADD
0x0fb838…0fb9cc Dummy {f00=0x004f, f01=0x0190, f02=» | P* END OF SUBFORMAT * P******************** $ PENDSUB EQU *-BASIS @ P LDR A11,A11 Z P RF(Z) ENDS10 JUMP IF 0 n , P LDR A2,A11 GET RETURN ADDRESS FROM A11 P SUR A11,A11 CLEAR A11 P RB EDIT PENDS10 LDR A10,A10 $ P R
0x0fb9cc…0fbb60 Dummy {f00=0x004f, f01=0x0190, f02=» RB EDIT P****************** P* IMMEDIATE TEXT * * P****************** D $ PIMTXT EQU *-BASIS IMMEDIATE TEXT ^ " PEDT100 SUK A1,1 DECREMENT CHAR P RB(N) EDIT JUMP IF ALL DONE P LCR A6,A2 GET CHARACTER P ADK A2,1 STEP POINTER
0x0fbb60…0fbcf4 (1, 164) Dummy {f00=0x0050, f01=0x0190, f02=»****** ~ P* SPECIAL TEXT ELEMENT * P************************ . PSTXTEL EQU *-BASIS N P LDR A3,A7 SAVE A7 h P LDR A7,A1 LOAD CHAR IN A7 P ST A13,SVA13 SAVE A13 P LD A13,-2,A13 GET NEW BASE P IFT OVERLY=0 ( P CF A14,T:OP
0x0fbcf4…0fbe88 Dummy {f00=0x0050, f01=0x0190, f02=» PSVA13 EQU *-2 P RF EDT205 P**************** , P* TEXT ELEMENT * D P**************** " PTXTEL EQU *-BASIS TEXT ELEMENT t PEDT200 LDR A3,A7 SAVE A7 * P LDR A7,A1 LOAD EL.IDENTIFICATOR IN A7 P IFT OVERLY=0 ( P CF A14,T:
0x0fbe88…0fc01c Dummy {f00=0x0050, f01=0x018e, f02=» P LDR A7,A3 RESTORE A7 " P ADR A6,A1 ADD 2-COMPL. LENGTH & " P ADK A6,1 GET ELEMENT ADDRESS L $ PEDT210 ADK A1,1 INCREMENT COUNT r P RB(P) EDIT JUMP IF FINISHED " P LCR A5,A6 GET ASCII-CHARACTER ( P ADK A6,1 INCREMENT ELEMENT POINTER
0x0fc01c…0fc1b0 Dummy {f00=0x0050, f01=0x0190, f02=» l P RB EDT210 P********** P* FILLER * , P********** > PEDFILL EQU *-BASIS P $ PEDF100 SUK A1,1 STEP DOWN "CHAR" j P RB(N) EDIT JUMP IF FINISHED $ P SCR A3,A7 STORE BYTE IN BUFFER P ADK A7,1 INCREMENT POINTER P RB ED
0x0fc1b0…0fc344 Dummy {f00=0x0050, f01=0x0190, f02=» P LDR A3,A7 SAVE A7 ( P LDR A7,A1 GET ELEMENT ADDRESS TO A7 " P IFT OVERLY=0 N ( P CF A14,T:OPA GET ELEMENT PARAMETERS d P XIF P IFT OVERLY=1 ( P CF A14,M:OPA GET ELEMENT PARAMETERS P XIF P LDR A7,A3 RESTORE A7 P
0x0fc344…0fc4d8 Dummy {f00=0x0050, f01=0x0190, f02=»XT WORD IN FORMAT | P RB EDIT P EJECT * P*********** 8 P* PICTURE * L P*********** ` . PEDPICT ANK A3,/7F MASK OUT PICTURE NUMBER t P SLL A3,2 PICTURE NUMBER * 4 * P LD A4,PICTAB+2,A3 GET STRING ADDRESS & P LD A3,PICTAB,A3
0x0fc4d8…0fc66c Dummy {f00=0x0050, f01=0x0190, f02=»E REGISTER * P ST A3,EDCNTP STORE LENGTH I COUNTER P LDR A3,A7 SAVE A7 @ & P LDR A7,A1 GET EL. INDICATOR TO A7 Z P IFT OVERLY=0 ( P CF A14,T:OPA GET ELEMENT PARAMETERS P XIF P IFT OVERLY=1 P CF A14,M:OPA P XIF
0x0fc66c…0fc800 Dummy {f00=0x0050, f01=0x018e, f02=»A4,EDSIGN STORE IN SIGN INDICATOR , P NGR A1,A1 GET POSITIVE LENGTH IN BYTES * P SUR A6,A1 Z ( P ADK A6,1 GET ELEMENT START ADDRESS l & P SLL A1,1 LENGTH IN BCD INCL. SIGN & P SUK A1,1 LENGTH IN BCD EXCL. SIGN P LC A3,EDEPOI GET SAVED A3
0x0fc800…0fc994 (1, 165) Dummy {f00=0x0050, f01=0x0190, f02=» P SRL A1,1 DIVIDE WITH 2 P ADR A6,A1 ( . PEDP050 ST A6,EDEPOI STORE ELEMENT POINTER : P CM EDNOTZ CLEAR ZEROMARK l P CM EDFCH CLEAR EDFCH & P CM EDSUPP CLEAR SUPPR. INDICATOR P LDK A6,0 CLEAR A6 $ PEDP100 IM EDCNTP INCREME
0x0fc994…0fcb28 Dummy {f00=0x0050, f01=0x0190, f02=»OINTER z P LDK A1,/80 LOAD TO MASK * P TM A1,A4 TEST ON LEFTMOST BIT IN CODE . P RF(Z) EDP120 JUMP IF BIT=0 P LDR A6,A4 A6=ASCII-CODE P ANK A6,/7F * PEDP110 SCR A6,A7 STORE BYTE IN BUFFER P ADK A7,1 INCREMENT POINTER P R
0x0fcb28…0fccbc Dummy {f00=0x0050, f01=0x0190, f02=»BLE p P ADK A1,1 INCREMENT INDEX * P RB(N) EDP130 JUMP IF NOT END OF TABLE . $ P RB EDP100 JUMP IF ILLEGAL CODE PEDP150 EQU * ( P LC A6,CODTAB+17,A1 GET DISPLACEMENT PBASE EQU *+2 P ADR P,A6 JUMP TO ROUTINE P EJECT P
0x0fccbc…0fce50 Dummy {f00=0x0050, f01=0x0190, f02=» P* T * P******** PLT EQU *-BASE ( " PEDP610 IM EDSUPP EDSUPP NOT=0 > ( P CF A14,EDGETN GET CHR FROM ELEMENT d & P LD A1,EDNOTZ LOAD ZERO INDICATOR . P RF(NZ) EDP670 JUMP IF NOT LEADING ZEROES P CWK A6,/30 COMP WITH ZERO
0x0fce50…0fcfe4 Dummy {f00=0x0050, f01=0x0190, f02=» PEDP650 LDK A5,' ' LOAD SPACE P RB EDP610 ( P EJECT : * P************************************* H * P* MARK NOT ZERO AND STORE CHARACTER * v * P************************************* . PEDP660 IM EDNOTZ INCREMENT ZERO INDICATOR " P LDR
0x0fcfe4…0fd178 Dummy {f00=0x0050, f01=0x0190, f02=»6,A7 STORE EDFCH IN BUFFER P ADK A7,1 INCREMENT POINTER " ( PEDP665 LDR A6,A1 A6=CHR FROM ELEMENT F P******************* r P* STORE CHARACTER * P******************* * PEDP670 SCR A6,A7 STORE BYTE IN BUFFER P ADK A7,1 INCREMENT
0x0fd178…0fd30c Dummy {f00=0x0050, f01=0x0190, f02=» PEDP680 SUK A4,/54 P RB(Z) EDP100 JUMP IF T P***************** > P* STORE FROM A5 * X P***************** r * PEDP700 LDR A6,A5 LOAD CHARACTER TO A6 P RB EDP670 JUMP TO STORE P EJECT P********************** P*
0x0fd30c…0fd4a0 Dummy {f00=0x0050, f01=0x0190, f02=» LD A1,EDSUPP ( P RB(Z) EDP670 JUMP IF NOT SUPPRESSED P LD A1,EDNOTZ B , P RB(NZ) EDP670 JUMP IF NOT LEADING ZERO X , P CWK A6,'.'+/80 COMP WITH ROOMLESS POINT ( P RB(E) EDP100 JUMP IF ROOMLESS POINT P RF EDP780 P*************
0x0fd4a0…0fd634 (1, 166) Dummy {f00=0x0050, f01=0x0190, f02=»******************* P* V (POINT, NOT ROOMLESS) * P*************************** @ PLV EQU *-BASE d PEDP740 LDK A6,'.' LOAD POINT z P RB EDP720 P************ P* 0 (ZERO) * P************ PL0 EQU *-BASE PEDP750
0x0fd634…0fd7c8 Dummy {f00=0x0050, f01=0x0190, f02=» *-BASE . PEDP760 CF A14,EDGETN GET CHR FROM ELEMENT P RB EDP100 JUMP BACK B P************* ^ P* 9 (DIGIT) * t P************* PL9 EQU *-BASE . PEDP770 CF A14,EDGETN GET CHR FROM ELEMENT * P RB EDP660 JUMP TO IM EDNOTZ AND
0x0fd7c8…0fd95c Dummy {f00=0x0050, f01=0x0190, f02=»AD SPACE | P RB EDP670 JUMP TO STORE P******************** 0 P* A (IGNORE SPACE) * L P******************** h PLA EQU *-BASE 6 PEDP790 CF A14,EDGETA GET CHR FROM ELEMENT IN ASCII P CCK A6,' ' COMP WITH SPACE " P RB(E) EDP725 IG
0x0fd95c…0fdaf0 Dummy {f00=0x0050, f01=0x0190, f02=» STORED AFTER SUPPRESSION) * 0 P******************************************** ! $ PLF EQU *-BASE ! X * PEDP800 LC* A4,EDPPOI GET PICTURE CODE ! n P IM EDPPOI INCREMENT POINTER ! * P ST A4,EDFCH STORE CHARACTER IN EDFCH ! P IM EDCNTP ! PEDP805 R
0x0fdaf0…0fdc84 Dummy {f00=0x0050, f01=0x0190, f02=»,EDSIGN GET SIGN ! $ P RF(NZ) EDP830 JUMP IF POSITIVE " PEDP820 LDK A6,'-' LOAD MINUS " @ " P RB EDP670 STORE SIGN IN BUFF " d PEDP830 LDK A6,'+' LOAD PLUS " P RB EDP670 " P************* " P* - (MINUS) * " P************* " PLMINUS
0x0fdc84…0fde18 Dummy {f00=0x0050, f01=0x0190, f02=»******************** " ( P* S (LEADING ZERO REPLACED BY SIGN)* # ( P************************************ # H PLS EQU *-BASE # t & PEDP850 IM EDSUPP MARK SUPPRESSION # ( P CF A14,EDGETN GET CHR FROM ELEMENT # & P LD A1,EDNOTZ LOAD ZERO INDICATOR # (
0x0fde18…0fdfac Dummy {f00=0x0050, f01=0x018e, f02=» AND STORE CHR # | P EJECT $ P************************* $ $ P* C:CONDITIONAL PICTURE * $ F P************************* $ h PLC EQU *-BASE $ " PEDP900 LD A4,EDSIGN LOAD SIGN $ ( P RB(NZ) EDP725 JUMP BACK IF POSITIVE $ & P LD A4,EDPPOI LOAD PIC
0x0fdfac…0fe140 Dummy {f00=0x0050, f01=0x0190, f02=» $ P* % P************************ % P* PRINT SPACE IF BLANK * % 2 P************************ % R PLD EQU *-BASE % r ( P IM EDSUPP INDICATE SUPPRESSION CODE % , P CF A14,EDGETA GET DIGIT IN ASCII TO A6 % P CWK A6,/20 % P RB(E) EDP670 JU
0x0fe140…0fe2d4 (1, 167) Dummy {f00=0x0050, f01=0x0190, f02=»'STVZ09' % P DATA '.,+-*' & P* & & PCODTAB EQU * & 0 P BYTE LA,LB & D P BYTE LC,LD & X P BYTE LF,LP & l P BYTE LS,LT & P BYTE LV,LZ & P BYTE L0,L9 & P BYTE L.,LCOMMA & P BYTE LPLUS,LMINUS & P BYTE LAST,0 & P* &
0x0fe2d4…0fe468 Dummy {f00=0x0050, f01=0x0190, f02=»UB 6,7 & P BYTE RETUR,RETUR 8,9 ' P BYTE RETUR,RETUR A,B ' . P BYTE RETUR,RETUR C,D ' L P BYTE RETUR,COND E,F ' j P* ' PTABZON EQU * ' P BYTE RETURN,EDTXT Z=0,1 ' P BYTE EDFILL,EDFILL 2,3 ' P BYTE RETUR,RETUR 4,5 ' P B
0x0fe468…0fe5fc Dummy {f00=0x0050, f01=0x018e, f02=» , P*************************************** ( * PEDGETN CF A14,EDGETA GET CHR IN ASCII ( 4 " P ANK A6,/F MASK OUT ZONE PART ( b P ORK A6,/30 MAKE ASCII DIGIT ( P RTN A14 ( * P************************************* ( * P* GET CHARACTER FROM ELEMENT,
0x0fe5fc…0fe790 Dummy {f00=0x0050, f01=0x0190, f02=» P LC* A6,EDEPOI GET CHARACTER ) P IM EDEPOI INCREMENT POINTER ) ( " PGETBCD SRC A1,1 SHIFT CIRCULAR ) L $ P RF(N) GETRGT JUMP IF ODD INDEX ) r P LDKL A3,-1 ) , P ADS A3,EDEPOI STEP DOWN ELEMENT POINTER ) P SRL A6,4 A6=LEFT DIGIT ) PGETB10 SUK
0x0fe790…0fe924 Dummy {f00=0x0050, f01=0x4096, f02=» ) p P RB GETB10 * $ PGETRTN IM EDCNTE INCREMENT INDEX * P RTN A14 * B PGETBLK LDK A6,/20 A6=SPACE * R P RB GETRTN * t P END * @ * P LDKL A3,-1 ) , P ADS A3,EDEPOI STEP DOWN ELEMENT POINTER ) P SRL A6,4 A6=LEFT DIGIT ) PGETB10 SUK
0x0fe924…0feab8 Dummy {f00=0x0050, f01=0x2008, f02=» + TN ( P END ) @ ) P LDKL A3,-1 ( & , P ADS A3,EDEPOI STEP DOWN ELEMENT POINTER ( : P SRL A6,4 A6=LEFT DIGIT ( j PGETB10 SUK A6,/F ( P RF(Z) GETBLK JUMP IF BLANK ( P ADK A6,/3F MAKE ASCII DIGIT ( P RF GETRTN ( $ PGETRGT ANK A
0x0feab8…0fec4c Dummy {f00=0x0050, f01=0x0190, f02=»STATUS P DATA 0 ECB ADDRESS P DATA 0 ORDER * * P DATA DC15DC POINTER TO ADDRESS BLOCK @ P DATA 0 TTAB ADDRESS n $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TASK QUEUE P DATA 0 TIMER POINTER ( P DATA 0 WRITE QUEUE OR BUFFER
0x0fec4c…0fede0 Dummy {f00=0x0050, f01=0x0190, f02=»DRESS n P DATA 0 CURSOR ADDRESS P EJECT , P* : P* D P* DC RECEIVE BUFFER POOL N P* n PRLINK EQU RBUFL+RBUFL+8 x P* PDCRBUF EQU * P DATA *+2 FREE BUFFER ANCHOR P IFF RBUFNR=2 P DATA *+RLINK P R
0x0fede0…0fef74 (1, 168) Opaque[0x194]
0x0fef74…0ff108 # DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x2020, f01=0x2020, f02=0x0a20, f03=0x2020}
0x0fef74…0ff108 IdxSect {
0x0fef74…0ff108 f00 = 0x0051 // 0xfef74 @0x0
0x0fef74…0ff108 f01 = 0x011c // 0xfef76 @0x2
0x0fef74…0ff108 gno = [ // 0xfef78 @0x4
0x0fef74…0ff108 [0x00]: C0x0051.0x0.0
0x0fef74…0ff108 [0x01]: C0x0051.0x1.0
0x0fef74…0ff108 [0x02]: C0x0051.0x2.0
0x0fef74…0ff108 [0x03]: C0x0051.0x3.0
0x0fef74…0ff108 [0x04]: C0x0052.0x0.0
0x0fef74…0ff108 [0x05]: C0x0052.0x1.0
0x0fef74…0ff108 [0x06]: C0x0052.0x2.0
0x0fef74…0ff108 [0x07]: C0x0052.0x3.0
0x0fef74…0ff108 [0x08]: C0x0053.0x0.0
0x0fef74…0ff108 [0x09]: C0x0053.0x1.0
0x0fef74…0ff108 [0x0a]: C0x0053.0x2.0
0x0fef74…0ff108 [0x0b]: C0x0053.0x3.0
0x0fef74…0ff108 [0x0c]: C0x0054.0x0.0
0x0fef74…0ff108 [0x0d]: C0x0054.0x1.0
0x0fef74…0ff108 [0x0e]: C0x0054.0x2.0
0x0fef74…0ff108 [0x0f]: C0x0054.0x3.0
0x0fef74…0ff108 [0x10]: C0x0055.0x0.0
0x0fef74…0ff108 [0x11]: C0x0055.0x1.0
0x0fef74…0ff108 [0x12]: C0x0055.0x2.0
0x0fef74…0ff108 [0x13]: C0x0055.0x3.0
0x0fef74…0ff108 [0x14]: C0x0056.0x0.0
0x0fef74…0ff108 [0x15]: C0x0056.0x1.0
0x0fef74…0ff108 [0x16]: C0x0056.0x2.0
0x0fef74…0ff108 [0x17]: C0x0056.0x3.0
0x0fef74…0ff108 [0x18]: C0x0057.0x0.0
0x0fef74…0ff108 [0x19]: C0x0057.0x1.0
0x0fef74…0ff108 [0x1a]: C0x0057.0x2.0
0x0fef74…0ff108 [0x1b]: C0x0057.0x3.0
0x0fef74…0ff108 [0x1c]: C0x0058.0x0.0
0x0fef74…0ff108 [0x1d]: C0x0058.0x1.0
0x0fef74…0ff108 [0x1e]: C0x0058.0x2.0
0x0fef74…0ff108 [0x1f]: C0x0058.0x3.0
0x0fef74…0ff108 [0x20]: C0x0059.0x0.0
0x0fef74…0ff108 [0x21]: C0x0059.0x1.0
0x0fef74…0ff108 [0x22]: C0x0059.0x2.0
0x0fef74…0ff108 [0x23]: C0x0059.0x3.0
0x0fef74…0ff108 [0x24]: C0x005a.0x0.0
0x0fef74…0ff108 [0x25]: C0x005a.0x1.0
0x0fef74…0ff108 [0x26]: C0x005a.0x2.0
0x0fef74…0ff108 [0x27]: C0x005a.0x3.0
0x0fef74…0ff108 [0x28]: C0x005b.0x0.0
0x0fef74…0ff108 [0x29]: C0x005b.0x1.0
0x0fef74…0ff108 [0x2a]: C0x005b.0x2.0
0x0fef74…0ff108 [0x2b]: C0x005b.0x3.0
0x0fef74…0ff108 [0x2c]: C0x005c.0x0.0
0x0fef74…0ff108 [0x2d]: C0x005c.0x1.0
0x0fef74…0ff108 [0x2e]: C0x005c.0x2.0
0x0fef74…0ff108 [0x2f]: C0x005c.0x3.0
0x0fef74…0ff108 [0x30]: C0x005d.0x0.0
0x0fef74…0ff108 [0x31]: C0x005d.0x1.0
0x0fef74…0ff108 [0x32]: C0x005d.0x2.0
0x0fef74…0ff108 [0x33]: C0x005d.0x3.0
0x0fef74…0ff108 [0x34]: C0x005e.0x0.0
0x0fef74…0ff108 [0x35]: C0x005e.0x1.0
0x0fef74…0ff108 [0x36]: C0x005e.0x2.0
0x0fef74…0ff108 [0x37]: C0x005e.0x3.0
0x0fef74…0ff108 [0x38]: C0x005f.0x0.0
0x0fef74…0ff108 [0x39]: C0x005f.0x1.0
0x0fef74…0ff108 [0x3a]: C0x005f.0x2.0
0x0fef74…0ff108 [0x3b]: C0x005f.0x3.0
0x0fef74…0ff108 [0x3c]: C0x0060.0x0.0
0x0fef74…0ff108 [0x3d]: C0x0060.0x1.0
0x0fef74…0ff108 [0x3e]: C0x0060.0x2.0
0x0fef74…0ff108 [0x3f]: C0x0060.0x3.0
0x0fef74…0ff108 [0x40]: C0x0061.0x0.0
0x0fef74…0ff108 [0x41]: C0x0061.0x1.0
0x0fef74…0ff108 [0x42]: C0x0061.0x2.0
0x0fef74…0ff108 [0x43]: C0x0061.0x3.0
0x0fef74…0ff108 [0x44]: C0x0062.0x0.0
0x0fef74…0ff108 [0x45]: C0x0062.0x1.0
0x0fef74…0ff108 [0x46]: C0x0062.0x2.0
0x0fef74…0ff108 [0x47]: C0x0062.0x3.0
0x0fef74…0ff108 [0x48]: C0x0063.0x0.0
0x0fef74…0ff108 [0x49]: C0x0063.0x1.0
0x0fef74…0ff108 [0x4a]: C0x0063.0x2.0
0x0fef74…0ff108 [0x4b]: C0x0063.0x3.0
0x0fef74…0ff108 [0x4c]: C0x0064.0x0.0
0x0fef74…0ff108 [0x4d]: C0x0064.0x1.0
0x0fef74…0ff108 [0x4e]: C0x0064.0x2.0
0x0fef74…0ff108 [0x4f]: C0x0064.0x3.0
0x0fef74…0ff108 [0x50]: C0x0065.0x0.0
0x0fef74…0ff108 [0x51]: C0x0065.0x1.0
0x0fef74…0ff108 [0x52]: C0x0065.0x2.0
0x0fef74…0ff108 [0x53]: C0x0065.0x3.0
0x0fef74…0ff108 [0x54]: C0x0066.0x0.0
0x0fef74…0ff108 [0x55]: C0x0066.0x1.0
0x0fef74…0ff108 [0x56]: C0x0066.0x2.0
0x0fef74…0ff108 [0x57]: C0x0066.0x3.0
0x0fef74…0ff108 [0x58]: C0x0067.0x0.0
0x0fef74…0ff108 [0x59]: C0x0067.0x1.0
0x0fef74…0ff108 [0x5a]: C0x0067.0x2.0
0x0fef74…0ff108 [0x5b]: C0x0067.0x3.0
0x0fef74…0ff108 [0x5c]: C0x0068.0x0.0
0x0fef74…0ff108 [0x5d]: C0x0068.0x1.0
0x0fef74…0ff108 [0x5e]: C0x0068.0x2.0
0x0fef74…0ff108 [0x5f]: C0x0068.0x3.0
0x0fef74…0ff108 [0x60]: C0x0069.0x0.0
0x0fef74…0ff108 [0x61]: C0x0069.0x1.0
0x0fef74…0ff108 [0x62]: C0x0069.0x2.0
0x0fef74…0ff108 [0x63]: C0x0069.0x3.0
0x0fef74…0ff108 [0x64]: C0x006a.0x0.0
0x0fef74…0ff108 [0x65]: C0x006a.0x1.0
0x0fef74…0ff108 [0x66]: C0x006a.0x2.0
0x0fef74…0ff108 [0x67]: C0x006a.0x3.0
0x0fef74…0ff108 [0x68]: C0x006b.0x0.0
0x0fef74…0ff108 [0x69]: C0x006b.0x1.0
0x0fef74…0ff108 [0x6a]: C0x006b.0x2.0
0x0fef74…0ff108 [0x6b]: C0x006b.0x3.0
0x0fef74…0ff108 [0x6c]: C0x006c.0x0.0
0x0fef74…0ff108 [0x6d]: C0x006c.0x1.0
0x0fef74…0ff108 [0x6e]: C0x006c.0x2.0
0x0fef74…0ff108 [0x6f]: C0x006c.0x3.0
0x0fef74…0ff108 [0x70]: C0x006d.0x0.0
0x0fef74…0ff108 [0x71]: C0x006d.0x1.0
0x0fef74…0ff108 [0x72]: C0x006d.0x2.0
0x0fef74…0ff108 [0x73]: C0x006d.0x3.0
0x0fef74…0ff108 [0x74]: C0x006e.0x0.0
0x0fef74…0ff108 [0x75]: C0x006e.0x1.0
0x0fef74…0ff108 [0x76]: C0x006e.0x2.0
0x0fef74…0ff108 [0x77]: C0x006e.0x3.0
0x0fef74…0ff108 [0x78]: C0x006f.0x0.0
0x0fef74…0ff108 [0x79]: C0x006f.0x1.0
0x0fef74…0ff108 [0x7a]: C0x006f.0x2.0
0x0fef74…0ff108 [0x7b]: C0x006f.0x3.0
0x0fef74…0ff108 [0x7c]: C0x0070.0x0.0
0x0fef74…0ff108 [0x7d]: C0x0070.0x1.0
0x0fef74…0ff108 [0x7e]: C0x0070.0x2.0
0x0fef74…0ff108 [0x7f]: C0x0070.0x3.0
0x0fef74…0ff108 [0x80]: C0x0071.0x0.0
0x0fef74…0ff108 [0x81]: C0x0071.0x1.0
0x0fef74…0ff108 [0x82]: C0x0071.0x2.0
0x0fef74…0ff108 [0x83]: C0x0071.0x3.0
0x0fef74…0ff108 [0x84]: C0x0072.0x0.0
0x0fef74…0ff108 [0x85]: C0x0072.0x1.0
0x0fef74…0ff108 [0x86]: C0x0072.0x2.0
0x0fef74…0ff108 [0x87]: C0x0072.0x3.0
0x0fef74…0ff108 [0x88]: C0x0073.0x0.0
0x0fef74…0ff108 [0x89]: C0x0073.0x1.0
0x0fef74…0ff108 [0x8a]: C0x0073.0x2.0
0x0fef74…0ff108 [0x8b]: C0x0073.0x3.0
0x0fef74…0ff108 [0x8c]: C0x0074.0x0.0
0x0fef74…0ff108 [0x8d]: C0x0074.0x1.0
0x0fef74…0ff108 ]
0x0fef74…0ff108 }
0x0ff108…0ff29c Dummy {f00=0x0051, f01=0x0190, f02=» J F IDENT LRPINT REL 8.2 78-09-15 870105040820 B > IHLKM LKMRQE LKMQDI IHRTC TIMQUE MONCLO IHPFAR@ INIFLG R IHLKM INTSAV PRUNN TTB:SA , ( @ A
0x0ff29c…0ff430 Dummy {f00=0x0051, f01=0x0190, f02=» SACTN LRUNEW SWL48 " * & W H ? @ P A 2 , ( o @ (V ( U ` LKMAL LKMRQE LKMQDI QTJOB , ( " P @ V L P U
0x0ff430…0ff5c4 Dummy {f00=0x0051, f01=0x0190, f02=» A A A , ( Q A < Q P Q * MONCLO Z , ( R Y _ A _. n FREBLKC * & 8XD Q Z P 0 9 , ( / _ _& P H H
0x0ff5c4…0ff758 Dummy {f00=0x0051, f01=0x40e2, f02=»ETU14 * & g A P " < H D ! 2 AP GP cP yV P V P J Q J Q P , ( R L !P 5 : ]Q q v @ / _ _& P H H
0x0ff758…0ff8ec Dummy {f00=0x0051, f01=0x0190, f02=» J F IDENT TPROC REL 8.2 78-09-15 870105040820 < 8 dTIO TWAIT TEXIT TACTOTK TPAUSE TIOQ20 TIOERRL TPQUE R FNDDWT |TIO DWTST * & @ R @ ATTACHW D
0x0ff8ec…0ffa80 Dummy {f00=0x0051, f01=0x0190, f02=» TIODM DWTADR , ( O P Y @ P X P X " * , ( i P P P H T H Z * & P H P I Y * & # C C '? Y DWTTDM DWTECB ,
0x0ffa80…0ffc14 (1, 169) Dummy {f00=0x0051, f01=0x0190, f02=» l DWTWAT , ( Y x 8W TIOQ20 N TTB:ST b , ( T 8P Y ^ 5 ) t TTB:SA TIOERRL ( TPQUE , TDISP TWAIT 4 * & HP
0x0ffc14…0ffda8 Dummy {f00=0x0051, f01=0x4134, f02=» $_ t LKMRQE , ( O & ( X4 @ P $ ACTOT T TPAUSE 0 d g L *_B x H D ! ( R T 3R =P CT IP OP YP@ cP2 iP0 qP( {P T~ Pn Pr 8 4 P W T P W P W P
0x0ffda8…0fff3c Dummy {f00=0x0051, f01=0x0190, f02=» J F IDENT TIMER REL 8.2 78-09-15 870105040820 TIMER SETIME SETIMP R TIMER r TDISP FNDTIDN LKMRQE , ( $ T GETBLK` LKMQDIA
0x0fff3c…1000d0 Dummy {f00=0x0051, f01=0x414a, f02=» P n ACTOT SETIME SETIMP ^ 2 SAVE8 F , ( Q @ L _J ^ 4 V TIMQUE , ( m _ @ IHRET8 & " 1 A _ P 9 , ( ~
0x1000d0…100264 Dummy {f00=0x0051, f01=0x018e, f02=» J F IDENT MSUBS REL 8.2 78-09-15 870105040820 J F " SAVE8 QTJOB QMJOB ACTOT EXITY GETBLK FREBLK FNDDWTL FNDTID TABIO R H D ! TENDIO PFINIT SWL48 SWLXY ILLINT INTSAV` HALTY IHRET8 IHRET7 < 8 IHRET6 IHRET5R IHRET4 I
0x100264…1003f8 Dummy {f00=0x0051, f01=0x0190, f02=» TTB:ST0 , ( ! ? ? ? T $P QMJOB J F TTMJOB1 X , ( @ =@ E ^ 5 ) W j ACTOT ^ TTB:SA2 TTB:SS , ( Y W T T P L U TTB:S
0x1003f8…10058c Dummy {f00=0x0051, f01=0x0190, f02=» EXITY , ( 4 T - 1_& U T GETBLK F , ( P 0 U ^W Z FREQUE , ( ? @ T 0 A 1 Q FREBLK , ( Q > 0 @ 1 A P
0x10058c…100720 Dummy {f00=0x0051, f01=0x0190, f02=»D , ( 5 T ? X D T W > CDTAB : , ( O _& @ 8 R Y T ? X D J , ( m T W > _& W > z FNDTID TCTAB , ( D 8 X W ? ` @ @ P TABIO
0x100720…1008b4 (1, 170) Dummy {f00=0x0051, f01=0x0190, f02=» P T R X "P X $ , ( T 4 Y & X $ X & DWTTDM V REQEND h * & $ T X & ( Y " Y z DWTECBO DWTWAT , ( $ " X *P - M Y * X ,P IHRET8 4
0x1008b4…100a48 Dummy {f00=0x0051, f01=0x0190, f02=» > > > > > t IHRET2 @ IHRET1 B ( IHRTN D < PFINIT L N PFTAB b , ( A > > > @ .V ? . > r SWL48 b RTNA15 SWLXY t , ( ] _ W ? _ > 0 ? , (
0x100a48…100bdc Dummy {f00=0x0051, f01=0x411a, f02=» r A. H D ! $ ;P I > UW ]W iT. mP 4 T P W" T ( H D ! D D /R" 5T ET> KW8 ]R" cT sT yW W W P W W t @ < W P R P T T P$ P %P /W SV aW V
0x100bdc…100d70 Dummy {f00=0x0051, f01=0x018e, f02=» J F IDENT GRBUF REL 8.2 78-09-15 870105040820 GETBUFK RELBUF R GETBUFK l GBQUE TTB:SA , ( B $P H L P _ TDISP RELBUF 0 , ( T
0x100d70…100f04 Dummy {f00=0x0051, f01=0x40d4, f02=» LKMQDI , ( s > > > P 5 ) _4 , ( 0 $P , # J @ > z ( $ $ P P Tj UP0 o {P P @ TDISP RELBUF 0 , ( T
0x100f04…101098 Dummy {f00=0x0051, f01=0x0190, f02=» J F IDENT TABORT REL 8.2 78-09-15 870105040820 TABORTK R TABORTK d FNDDWT x DWTTAB DWTST , ( "R P X T X R ? TENDIO@ ITABRT DWTWA
0x101098…10122c Dummy {f00=0x0051, f01=0x4050, f02=» v R@ P8 T2 R, V /P H :@ L TABORTK R TABORTK d FNDDWT x DWTTAB DWTST , ( "R P X T X R ? TENDIO@ ITABRT DWTWA
0x10122c…1013c0 Dummy {f00=0x0051, f01=0x0190, f02=» J F IDENT TDISP REL 8.2 78-09-15 870105040820 F B TDISP LKMDIS DISIOE DISEND DISQUE GBQUE PRUNY SRUNY RETU14 R F B RETU13 RETU12 RETU11 RETU10 RETUR9L RETUR8 RETUR7 RETUR6 F B RETUR5 RETUR4 RETUR3R RETUR2
0x1013c0…101554 (1, 171) Dummy {f00=0x0051, f01=0x018e, f02=»BA ECBRL ECBEL ECBRC ECBCW SACTY LRUNEW z DWTCHP 0 DWTST D DWTECB0 V DWTOR j DWTADR | DWTTAB DWTWAT DWTTQ DWTWA DWTTDM DWTVOL , E
0x101554…1016e8 Dummy {f00=0x0051, f01=0x0190, f02=» SACTY LRUNEW GBQUE . BLOK:S @ FREQUE R BLOCKEW f BLOCKL x DISIOE DISEND TENDIO TDISP , ( @
0x1016e8…10187c Dummy {f00=0x0051, f01=0x0190, f02=»ETU14 j RETU13 l RETU12 n $ RETU11 p 8 RETU10 r L , ( U ? , ? A ` RETUR9L t RETUR8 v RETUR7 x RETUR6 z RETUR5 | RETUR4 ~
0x10187c…101a10 Dummy {f00=0x0051, f01=0x40ae, f02=» LKMDIS , ( ? ? ? ? T ? _& $ @ @ P ^ 9j U Y >_` L PX )UL QP@ W P t @ v RETUR7 x RETUR6 z RETUR5 | RETUR4 ~
0x101a10…101ba4 Dummy {f00=0x0051, f01=0x0190, f02=» J F IDENT MONTIM REL 8.2 78-09-15 870105040820 GETTIMK SETTIM R GETTIMK l MONCLO , ( @ < ? < ? < C TTB:SA LKMQDI * & >h # P >_ < U
0x101ba4…101d38 Dummy {f00=0x0051, f01=0x408e, f02=»5 , ( w _ 00W & <h$ P @ : $ p %P M QP uR W P P x@ , ( @ < ? < ? < C TTB:SA LKMQDI * & >h # P >_ < U
0x101d38…101ecc Dummy {f00=0x0051, f01=0x4182, f02=» J F IDENT INPRET REL 8.2 78-09-15 870105040820 IHINPTK R IHINPTK d , ( ? ? ? ^ $ _ P A ;a x , ( ! :CV V A > > > ? > CVTINP , ( A _ > > > ; ^ [
0x101ecc…102060 Dummy {f00=0x0051, f01=0x018e, f02=» J F IDENT INIMON REL 8.2 78-09-15 870105040820 INIMONK R INIMONK d TCTAB x TTB:ST , ( ` @ @ P $ TTB:PP TTB:SA TTB:TD , ( I
0x102060…1021f4 (1, 172) Dummy {f00=0x0052, f01=0x018e, f02=» ITADO DWTST , ( Q$HX P T 9 $ DWTECB T DWTTQ f TIMQUE v , ( iI Y Y _. 0P p BLOCKLA BLOCKS FREQUEA , ( X -_ A @
0x1021f4…102388 Dummy {f00=0x0052, f01=0x4166, f02=» , ( @ ( ? ? ? @ $ TTB:ID 4 PRUNN F DISQUEC V , ( D T $ T *Z A , 5 T ? h INIFLG PFINITN , ( I A . A 0 A 0 ? 2 CVTAPS
0x102388…10251c Dummy {f00=0x0052, f01=0x018e, f02=» J F IDENT INTVMA REL 8.2 78-09-15 870105040820 D @ CVTMSZK CVTSTB CVTSBA CVTEBA CVTINP CVTDK CVTAPA CVTAPSC R < 8 CVTCLK LOOPY INIM40N CVTLSB FREPAR PARLEN@ NUMPAR NUMPAR IHPFARC IHLKM
0x10251c…1026b0 Dummy {f00=0x0052, f01=0x0190, f02=» CHLT1 IHFDN CHRT1 $ , ( 4 CHRT2 d CHRT3 t CHRT4 IHCC1 IHCC2 IHCC3 , ( ! CHLT2 C
0x1026b0…102844 Dummy {f00=0x0052, f01=0x0190, f02=» ( * IHDU2 $ IHMTN 4 , ( Q , . 0 D , ( a t IHINPT , ( q 2 CVTMSZK CVTSTB
0x102844…1029d8 Dummy {f00=0x0052, f01=0x0190, f02=» CVTDK FREPAR PARLEN@ 0 INIMON D , ( W W 4 V bBUG HALTN * & W 6 , ( @ 8A K " UU , (
0x1029d8…102b6c Dummy {f00=0x0052, f01=0x4110, f02=» , ( ? @ : $ T $ T < PRUNN 8 TTB:ST H PFINIT Z , ( 5" Z A > 5 T @? ? B l LOOPY _ ( @ ( $ W W W +T E
0x102b6c…102d00 Dummy {f00=0x0052, f01=0x018e, f02=» J F IDENT INTVMO REL 8.2 78-09-15 870105040820 D @ CVTMSZK CVTSTB CVTSBA CVTEBA CVTINP CVTDK CVTAPA CVTAPSC R < 8 CVTCLK LOOPY INIM40N CVTLSB FREPAR PARLEN@ NUMPAR NUMPAR IHPFARC IHLKM
0x102d00…102e94 (1, 173) Dummy {f00=0x0052, f01=0x0190, f02=» CHLT1 IHFDN CHRT1 $ , ( 4 CHRT2 d CHRT3 t CHRT4 IHCC1 IHCC2 IHCC3 , ( ! CHLT2 C
0x102e94…103028 Dummy {f00=0x0052, f01=0x0190, f02=» ( * IHDU2 $ IHMTN 4 , ( Q , . 0 D , ( a t IHINPT , ( q 2 CVTMSZK CVTSTB
0x103028…1031bc Dummy {f00=0x0052, f01=0x0190, f02=» CVTDK FREPAR PARLEN@ 0 INIMON D , ( W W 4 V bBUG HALTN , ( W 6 8 , ( A K " UU ( , ( @
0x1031bc…103350 Dummy {f00=0x0052, f01=0x4162, f02=» 6 x TCTAB , ( 9 ? ? ? @ : $ ( TTB:IDO X PRUNN j TTB:ST z , ( W T $ T <Z A > 5 T @? PFINIT q ? B LOOPY _
0x103350…1034e4 Dummy {f00=0x0052, f01=0x018e, f02=» J F IDENT INTVMD REL 8.2 78-09-15 870105040820 D @ CVTMSZK CVTSTB CVTSBA CVTEBA CVTINP CVTDK CVTAPA CVTAPSC R < 8 CVTCLK LOOPY INIM40N CVTLSB FREPAR PARLEN@ NUMPAR NUMPAR IHPFARC IHLKM
0x1034e4…103678 Dummy {f00=0x0052, f01=0x0190, f02=» CHLT1 IHFDN CHRT1 $ , ( 4 CHRT2 d CHRT3 t CHRT4 IHCC1 IHCC2 IHCC3 , ( ! CHLT2 C
0x103678…10380c Dummy {f00=0x0052, f01=0x0190, f02=» ( * IHDU2 $ IHMTN 4 , ( Q , . 0 D , ( a t IHINPT , ( q 2 CVTMSZK CVTSTB
0x10380c…1039a0 Dummy {f00=0x0052, f01=0x0190, f02=» CVTDK FREPAR , ( W W 0 PARLEN@ ` INIMON t bBUG , ( 4W 6 HALTN , ( D 8 A , (
0x1039a0…103b34 (1, 174) Dummy {f00=0x0052, f01=0x0190, f02=» , ( ; W x ,: P : , ( [ : V P T 4 , ( { A. P Y(_8 _J P d , ( pU p xU x , ( @ _ A 9a @ :a S @ , ( :a U
0x103b34…103cc8 Dummy {f00=0x0052, f01=0x418c, f02=» 6 @ : $ T $ PRUNN * TTB:ST : , ( 7D@ T <Z A > 5 T @? ? L PFINIT | LOOPY h , ( Q @ P ? ? B _ " o ( @ 9H @ @ @ H D ! f W W
0x103cc8…103e5c Dummy {f00=0x0052, f01=0x413a, f02=» J F IDENT INIMOD REL 8.2 78-09-15 870105040820 INIMONKdBUG DCEXT DM:TSK R INIMONK v tBUG DCEXT DM:TSK TTABD0A TTABD1A TTABD2 T
0x103e5c…103ff0 Dummy {f00=0x0052, f01=0x018e, f02=» J F IDENT INIMOM REL 8.2 78-09-15 870105040820 INIMONK R INIMONK d TCTAB x TTB:ST * & ` @ @ P $ U TTB:PP TTB:SA TTB:SP TTB:SS
0x103ff0…104184 Dummy {f00=0x0052, f01=0x018e, f02=» ITADI DWTADRN ITADO & , ( K " 0X P 6 DWTST f DWTECB v DWTTQ TIMQUE , ( eBH T 9 Y Y _. BLOCKL BLOCKS , ( } $
0x104184…104318 Dummy {f00=0x0052, f01=0x018e, f02=» LDPEND LRUQUE CVTLSB ( , ( @ ( A * A , @ . 0 Q : NUMPAR j CVTSBA | FREPAR , ( Q Q 1_ 0 @ 2 A 4 PARLEN CVTSTB LOOPN , (
0x104318…1044ac Dummy {f00=0x0052, f01=0x4120, f02=» DISQUE , ( "D $ T <Z A > A @ 5 T ? INIFLG J PFINIT , ( 3I A B A D A D ? F n CVTAPS K ( @ H 8 4 p P$ 7 D ; z C D _P iT P R Q P T A J
0x1044ac…104640 Dummy {f00=0x0052, f01=0x0190, f02=» J F IDENT INPREO REL 8.2 78-09-15 870105040820 IHINPTK R IHINPTK d , ( ? ? ? ^ $ P _ A ;a x , ( ! :CV V A > > > ? > PRUN@ , ( A _ > > > ? ? ? ? @
0x104640…1047d4 (1, 175) Dummy {f00=0x0052, f01=0x0190, f02=»;A j CVTLSB TTB:SA TTB:SPC . , ( @ ,R L ( _ Q @ TTB:SS p UPDLRI RETUR8 * & I Q A Q P CVTAPA , ( @ _* A Q
0x1047d4…104968 Dummy {f00=0x0052, f01=0x40aa, f02=» , ( _ _ Z ( $ 1 Z _ Z X : ,Zp L _ 8 , ( X P4 7 #V - 4 = > _P P: R0 P d L @ I Q A Q P CVTAPA , ( @ _* A Q
0x104968…104afc Dummy {f00=0x0052, f01=0x0190, f02=» J F IDENT DMTASS REL 8.2 78-09-15 870105040820 ( $ DMTASSK VTLRN VLVBA VLVRL SECTLEA R VLVBA ~ VLVRL VTLRN SECTLEA TASECB2 ECBBA ECBRC , (
0x104afc…104c90 Dummy {f00=0x0052, f01=0x0190, f02=» : t TASMXA0 TASASBz & VOLCHE 8 , ( 7H@ A A " P "" J TASCVO z CLRBUF , ( Q P @ TASVOLN ECBFC ECBRL ECBCW
0x104c90…104e24 Dummy {f00=0x0052, f01=0x0190, f02=» , ( P L " TOP A " L TASVLE@ 4 TASVRL F * & ! A $ L C & @ X , ( $ A $Q @ A TASFIL DMTRBU , ( !$ @ ( B * D ,
0x104e24…104fb8 Dummy {f00=0x0052, f01=0x0190, f02=» j , ( I ( & , ( e@ @ (T A " 0" : , ( U _ L !SS j TASCXOL * & P !LL W L @ , A TASSEX , ( $ ,V P E
0x104fb8…10514c Dummy {f00=0x0052, f01=0x0190, f02=» , ( @ 2P 4 2% P R 6 FDBVTO 4 FDBMIA F , ( D X T R 8 @ "T R :T @ X , ( ! ( 6 4 2% QFDBFLR , ( = DP 2 < DWTST
0x10514c…1052e0 Dummy {f00=0x0052, f01=0x0190, f02=» D E 3 P S ~ FDBRLE FDBBLF 0 * & F P S F P S H P S B FDBNIFL p FDBKA , ( $ J P % S L P & S N @ " S , ( 8 B | p @ , ( ,T W
0x1052e0…105474 (1, 176) Dummy {f00=0x0053, f01=0x0190, f02=» EXTLEN * & + H . D Y P P 0 Y R P EXTBAS D , ( ? 0 Y T U ! T ! X6 V TASTBE , ( [ _R _V @ V P I @ MXIND , ( w P @ X V W H X I , (
0x105474…105608 Dummy {f00=0x0053, f01=0x0190, f02=»F , ( (@( @ ( _r ^ FDBDBR : EXTELE L , ( A ` ` 9A S ` L b ^ FDBCEX FDBSNR * & @ b $X D b S d S GTLGRNX , ( f h
0x105608…10579c Dummy {f00=0x0053, f01=0x413e, f02=» l S n d H D !& P !Tl / f AP UP [ f P f Q< f I N iT H D !$ U P W V f T P f P( T T T % d + f =P d H D ! K f _P T W T W| P U Wd P #T. 'W> IU QT mP6 wP ( $ V W
0x10579c…105930 Dummy {f00=0x0053, f01=0x0190, f02=» J F IDENT LOADER REL 8.2 78-09-15 870105040820 LOADERK LD150 R LOADERK j TTB:SP ~ TTB:SS TTB:SA , ( T @ U U ( U QTJOB , ( W
0x105930…105ac4 Dummy {f00=0x0053, f01=0x40b4, f02=»D ACTOT TDISP LKMRQE * , ( S < i@ l T #W@ 3V4 =R l @ T @ U U ( U QTJOB , ( W
0x105ac4…105c58 Dummy {f00=0x0053, f01=0x0190, f02=» J F IDENT LDTASK REL 8.2 78-09-15 870105040820 LDTASKK ECBRED R ECBRED l LDTASKK CVTDK FREBLKC , ( @ @ A A , FRE
0x105c58…105dec Dummy {f00=0x0053, f01=0x0190, f02=» h , ( c C B P Y W A # C , ( - (@ L @ 8 , ( Q ( B ''P ' T W h , ( T J x ,T , ( 9a =a V 9A Q W _":AX R : , (
0x105dec…105f80 Dummy {f00=0x0053, f01=0x0190, f02=»R W | TTB:SP QTJOB . CVTINPC > , ( ] G (@( @ P , ( @ u$ 4 G G a @ , ( @ + G _6 C ( B P ' P ' X : H D !
0x105f80…106114 (1, 177) Dummy {f00=0x0053, f01=0x4016, f02=» @ | TTB:SP QTJOB . CVTINPC > , ( ] G (@( @ P , ( @ u$ 4 G G a @ , ( @ + G _6 C ( B P ' P ' X : H D !
0x106114…1062a8 Dummy {f00=0x0053, f01=0x0190, f02=» J F IDENT TDISPO REL 8.2 78-09-15 870105040820 D @ TDISP LKMDIS DISIOE DISEND DISQUE GBQUE PRUNY SRUNY SACTY R F B LRUNEW LRUQUE LDPEND RETU14 RETU13 RETU12L RETU11 RETU10 F B RETUR9 RETUR8 RETUR7 RETUR6R R
0x1062a8…10643c Dummy {f00=0x0053, f01=0x0190, f02=»WTWAT DWTTQ DWTWA DWTTDM DWTVOL ECBBA ECBRL | ECBEL ECBRC ECBCW 6 DWTCHP2 R DWTST f DWTECB x DWTOR DWTADR DWTTAB DWTWAT DWTTQ DWTWA DWTTDM
0x10643c…1065d0 Dummy {f00=0x0053, f01=0x0190, f02=» PRUNY SRUNY SACTY ( GBQUE : BLOK:S L FREQUE2 ^ BLOCKE r BLOCKL2 LRUQUE LDPEND DISIOE DISEND TENDIO6 TDISP
0x1065d0…106764 Dummy {f00=0x0053, f01=0x018e, f02=» 9 @ ? @ ? 4 A T T TTB:SP 0 , ( W 9J P T P 8 ? B RETU14 r RETU13 RETU12L , ( ( s ? , ? A A RETU11 RETU10
0x106764…1068f8 Dummy {f00=0x0053, f01=0x018e, f02=» RETUR2 RETUR1 RTNA151 , , ( > > > > > >W ? @ _ > @ EXITN p , ( " > ? ? ? ? T ? LKMDIS , ( @_* ^ "9j @ P U Y > > , ( A
0x1068f8…106a8c Dummy {f00=0x0053, f01=0x0190, f02=» GETBLK * & A > > U T LDTASKV H TTABLD Z ACTOT l , ( [ _ X | UPDLRI0 , ( sHH T U U U @ , ( P P A
0x106a8c…106c20 Dummy {f00=0x0053, f01=0x40e2, f02=» t , ( W Q = = A ] > > B H D ! $ ) 1 _PT eP k N o n W P R n P P Pf P T W W> T P W @
0x106c20…106db4 (1, 178) Dummy {f00=0x0053, f01=0x0190, f02=» J F IDENT TIODM REL 8.2 78-09-15 870105040820 D @ TIODM FDBLNK FDBECB FDBSNR FDBRRO FDBRLE FDBBLF FDBTNRC R D @ FDBVTO FDBCEX FDBEXT EXTDMI EXTFC EXTLEN@ EXTBAS EXTELEC D @ FDBLRN FDBNIFN FDBEAL FDBCRL FDB
0x106db4…106f48 Dummy {f00=0x0053, f01=0x0190, f02=» COFILE: , ( , ( ! " L , ( A # $ % | ECBFC FDBLNK FDBECB FDBSNR FDBRRO "
0x106f48…1070dc Dummy {f00=0x0053, f01=0x0190, f02=» EXTFC EXTLEN@ EXTBAS 0 EXTELEC D FDBLRN E X FDBNIFN D l FDBEAL H FDBCRL J FDBKA L FDBMIA N FDBADF P FDBAI1 R FDBDBRW Z
0x1070dc…107270 Dummy {f00=0x0053, f01=0x0190, f02=» DWTTDM! , ( a "$&( h @ D X , ( } P _ L R P @ R $P B DWTST r , ( U ' U _ (@(@ I 2P DWTOR , ( ^ H L Y H W Y EARELB * &
0x107270…107404 Dummy {f00=0x0053, f01=0x0190, f02=» C P C * & - W < C C _H " , ( E H H S W C P ECBRL EATEST , ( aD C B B B U , ( y@ R W X [ X T E T DSU
0x107404…107598 Dummy {f00=0x0053, f01=0x0190, f02=» , ( H B B Y ER Q X FU C bSQR 4 CALSNO B , ( '? T W T (@(@ T FNDTID DMTASKW , ( P D0 T ACTOT TDISP DISENDR $
0x107598…10772c Dummy {f00=0x0053, f01=0x40ac, f02=» d 1 }P R R P P . W . W )P ~ H D ! /W SS UW uU R WJ P S W W, R Q U T W6 T. : T 2 @
0x10772c…1078c0 Dummy {f00=0x0053, f01=0x0190, f02=» J F IDENT DMTASK REL 8.2 78-09-15 870105040820 ( $ DMTASKKdSQRdQSW QIRNY QIRR DMTWM R QIRNY ~ QIRR tQSW tSQR , ( ECBRL FDB
0x1078c0…107a54 (1, 179) Dummy {f00=0x0053, f01=0x0190, f02=»R $ - _ " v , ( W P $ - : R $ - _ : Z TTB:TD F , ( w $ -_ D U 1 X CDTAB , ( W T ` U @ M FDBRRO ECBBA , ( B @ W : X
0x107a54…107be8 Dummy {f00=0x0053, f01=0x0190, f02=» FDBDBR2 " DWTOR 4 , ( @ X P D V D D , ( "? P P &P E t FDBECB GTBKBU , ( 9$ V P ( ( DMTIOT *
0x107be8…107d7c Dummy {f00=0x0053, f01=0x0190, f02=» h FDBSNRL VLVRL FDBVTO * , ( @ X T T " A ( < DIVMOD l VLVBA ~ * & D J $ & P W T , ( B ( Y P T " _ Y DMTRBU CLRBUF
0x107d7c…107f10 Dummy {f00=0x0053, f01=0x0190, f02=» DWTTDM ECBFC , ( % 0 ( T X 2 F " , ( ? 4 T P R TCTAB , ( ] ` 6 U @ 6 , D Z D , ( y ] 0 X W , ( B ` U @
0x107f10…1080a4 Dummy {f00=0x0053, f01=0x0190, f02=»T , ( @ P 0 @ < 1 A <(@_ EXTELE : , ( > @ (@ / O L DWTTQ | QTJOB , ( @ B $P % 4 D F , ( 4 (@ B * P , ( 9
0x1080a4…108238 Dummy {f00=0x0053, f01=0x0190, f02=» @ n , ( Z" @ ) _ (@ C 4 ( B * & ! @ ( F U G > , ( @ F G l ECBCW , ( F H" F H +P DWTST EATEST , (
0x108238…1083cc Dummy {f00=0x0053, f01=0x0190, f02=» I $ P $ - F + X V FDBMRO , , ( g $ P "P $P W X X NT > , ( ;AR ( ( n , ( D T Y F H" F H , ( 4 D '? P P $ P CRNGETZ
0x1083cc…108560 Dummy {f00=0x0053, f01=0x018e, f02=» EASETB0 , ( B 8W D J$ T L T V , ( #$@W E . E . X V ? T B F TENDIO v & " = * X(@( H D ! . . . . . . . . . H D ! ! . #
0x108560…1086f4 (1, 180) Dummy {f00=0x0054, f01=0x4132, f02=» J H D ! TV P W P 5T KT S . gU, Wf U WF W P J P H D !J 7P I D mW uP& . U , P P* T U W R PB !P< #W T H D ! + . AP GW MP eV" kP qP: uP6 wW T* R T P P( P" , ( P P P W T T
0x1086f4…108888 Dummy {f00=0x0054, f01=0x018e, f02=» J F IDENT TASS REL 8.2 78-09-15 870105040820 D @ TASSY VOLCHE IXTASS TASBLK TASQUE TASTTA TASASB TASCVOC R F B TASVOL TASCXO TASSEX TASXLB TASFDB TASVRL TASVLEC TASVRN F B TASECB TASFIL TASTID TASMXA T
0x108888…108a1c Dummy {f00=0x0054, f01=0x0190, f02=» TASVOL TASCXO TASSEX , , ( @ TASXLB $ p TASFDB 4 TASVRL 6 TASVLEC 8 TASVRN : TASECB < , ( !
0x108a1c…108bb0 Dummy {f00=0x0054, f01=0x0190, f02=» TASCAQ Z , ( A @ P TTB:SA D QTJOB V , ( a @ 4 A U W A A f VOLCHE DFTAB , ( @@ } @ U ::A A CDTAB , ( ! , `
0x108bb0…108d44 Dummy {f00=0x0054, f01=0x0190, f02=»' T I @ 8 z DWTVOLW , ( =hP Y X P T , , ( Y H ! R W 9a I DFTABE , ( - ^ W P ,! T T ( IXTASS X TASSY ` , ( M@ :
0x108d44…108ed8 Dummy {f00=0x0054, f01=0x0190, f02=» , ( P @ E TTB:TD- 4 , ( H "# P P @ P W @ F , ( 0 R % "V E T v * & @ D A R_" P @ P , ( W @ 0 R ' F F
0x108ed8…10906c Dummy {f00=0x0054, f01=0x4132, f02=» , ( ( w R A J A 4 LKMQDIL 8 Z J H D ! _P sW R P0 T( P T W Th P PX T( R #W 3W 7P h H D ! ?T CT kP P U P P P W R V T P !W -Rb ?R
0x10906c…109200 Dummy {f00=0x0054, f01=0x0190, f02=» J F IDENT DMINIT REL 8.2 78-09-15 870105040820 DMINITK R DMINITK d INIFLG x , ( =a 9a Q - _ - > QFDBFL FDBSTA FDBEND CRNQUE , ( !
0x109200…109394 (1, 181) Dummy {f00=0x0054, f01=0x40f0, f02=» h BUFDMIC BUFSNR BUFOR , , ( Q , - M M M @ < TASBLKN l TASQUE ~ RTNA15@ g$ A A Q %PJ t @ CRNQUE , ( !
0x109394…109528 Dummy {f00=0x0054, f01=0x0190, f02=» J F IDENT DMBUF REL 8.2 78-09-15 870105040820 J F " CURBUFK BUFLNK BUFDMI BUFFC BUFSNR BUFOR BUFSTA@ DMTGBU DMTRBUC R CLRBUF CURBUFK BUFLNK BUFDMI BUFFC BUFSN
0x109528…1096bc Dummy {f00=0x0054, f01=0x0190, f02=» / & > s V DMTGBU n , ( @ , L T L P L , ( 5 T M Q M L V L A @ HALTN , ( U : T
0x1096bc…109850 Dummy {f00=0x0054, f01=0x4076, f02=» M @ : z H D ! H I . / r s 'T -PF 5T ;Q GV YT T `@ rU n , ( @ , L T L P L , ( 5 T M Q M L V L A @ HALTN , ( U : T
0x109850…1099e4 Dummy {f00=0x0054, f01=0x4172, f02=» J F IDENT DMFDB REL 8.2 78-09-15 870105040820 < 8 FDBSTAK FDBEND QFDBFL CRNQUE CRBUFL CRNEND MXIND R CRBUFL QFDBFL ` FDBSTAK FDBEND CRNQUE
0x1099e4…109b78 Dummy {f00=0x0054, f01=0x0190, f02=» J F IDENT DMSUBX REL 8.2 78-09-15 870105040820 . * FNDKMXK CHKKEY RDNXTR FNDKEY CRNUPD R FNDKMXK MPYMOD * & 4U :! 4 U , ( 9 & ?! , (
0x109b78…109d0c Dummy {f00=0x0054, f01=0x0190, f02=»V _ W W | RDNXTR GTBKBU 0 , ( @ : T ; [ V ( B DMTIOZ r FDBRRO , ( " T E W D FDBMRO FDBRLE , ( V ; [ _ D V
0x109d0c…109ea0 Dummy {f00=0x0054, f01=0x0190, f02=» GTLGRN , ( D U E W ADDMOD B CALSNO T DMTRBU f , ( ! @ P W x , ( =@ _ P [ FNDKEY d FDBMIA , ( Y Z
0x109ea0…10a034 (1, 182) Dummy {f00=0x0054, f01=0x0190, f02=» FDBLRN , ( E E Z:Q , ( D D ZB W Z r @ , ( Q R W K ]d J _j @ W W p CRNUPD FDBADF FDBCRLR , ( " : : " $
0x10a034…10a1c8 Dummy {f00=0x0054, f01=0x412a, f02=» U R ( R ( S ( m@ S (_P (@ : , H D ! UP U 3 r AU EP OP YW }P Q R V W W T. V T L H D ! W V V Wn U W 7P 9W KP T~ W Wh P0 Q W, Q , ( R W W W !W %PL 7R CQ
0x10a1c8…10a35c Dummy {f00=0x0054, f01=0x0190, f02=» J F IDENT DMSUBR REL 8.2 78-09-15 870105040820 F B EATESTK EASETB EARELB CRNGET CALSNO GTBKBU GTLGRNL DMTIOT R CHKIND REQEND DMTIOZ CHKIND , ( ? ? !? P P !> P W IHR
0x10a35c…10a4f0 Dummy {f00=0x0054, f01=0x0190, f02=» P L P 4 M z QTJOB DWTTDM ( DWTST : , ( Y X M M J IHRTN z EATESTK x FDBEAL , ( q _8 D W 0P Q P FDBTNR EASETB * &
0x10a4f0…10a684 Dummy {f00=0x0054, f01=0x0190, f02=» 4W 0P R Q P FREQUE * * & W R D Q ( 0 5 @ < CRNGET j FDBCRLL ~ , ( 1 A Z> : D W (P CRNTID CRNQUE HALTN * & H D I
0x10a684…10a818 Dummy {f00=0x0054, f01=0x0190, f02=» I D ) E : T DIVMOD * FDBEXTR < , ( ] " $S P W X " N EXTLEN ~ FDBCEX , ( wH & ( U U (_ EXTBAS FDBSNR , ( H$ Y *
0x10a818…10a9ac Dummy {f00=0x0054, f01=0x0190, f02=» 2 : p DWTECBa ECBRC " , ( D 4 6 B 8P T 2 FDBDBR: b ECBBA t BUFDMI , ( D$ G 8W X : Y : B < DMTIOZ DWTOR , ( A I > ~ B 8
0x10a9ac…10ab40 Dummy {f00=0x0054, f01=0x0190, f02=» ECBFC , ( ) 6_^ X * P F X . 6 SECTLE @ ECBRL R DMTGBU b ECBCW t , ( ?D C H J C L NW BUFSTA , ( WD C P R C < X @%? : GTLGRNL t ,
0x10ab40…10acd4 (1, 183) Dummy {f00=0x0054, f01=0x414e, f02=» . D " V T 0 T , ( 2 ^ S W . : ^ H D ! P P P W #P 7T< ?R4 MP SP }W P P W W P8 R p H D ! W R W P W6 %T 9U cSP kP oW U U. R P W P8 , (
0x10acd4…10ae68 Dummy {f00=0x0054, f01=0x408e, f02=» J F IDENT INTLT1 REL 8.2 78-09-15 870105040820 INTLT1K R INTLT1K d x@ P* P* PINTLT1 EQU * TABLE ENTRY P* P* P* P END @ ICES CONNECTED T
0x10ae68…10affc Dummy {f00=0x0054, f01=0x408e, f02=» J F IDENT INTLT2 REL 8.2 78-09-15 870105040820 INTLT2K R INTLT2K d x@ P* P* PINTLT2 EQU * TABLE ENTRY P* P* P* P END @ ICES CONNECTED T
0x10affc…10b190 Dummy {f00=0x0054, f01=0x408e, f02=» J F IDENT INTLT3 REL 8.2 78-09-15 870105040820 INTLT3K R INTLT3K d x@ P* P* PINTLT3 EQU * TABLE ENTRY P* P* P* P END @ ICES CONNECTED T
0x10b190…10b324 Dummy {f00=0x0054, f01=0x408e, f02=» J F IDENT INTLT4 REL 8.2 78-09-15 870105040820 INTLT4K R INTLT4K d x@ P* P* PINTLT4 EQU * TABLE ENTRY P* P* P* P END @ ICES CONNECTED T
0x10b324…10b4b8 Dummy {f00=0x0054, f01=0x408e, f02=» J F IDENT INTRT1 REL 8.2 78-09-15 870105040820 INTRT1K R INTRT1K d x@ P* P* PINTRT1 EQU * TABLE ENTRY P* P* P* P END @ EVICES CONNECTED T
0x10b4b8…10b64c Dummy {f00=0x0054, f01=0x408e, f02=» J F IDENT INTRT2 REL 8.2 78-09-15 870105040820 INTRT2K R INTRT2K d x@ P* P* PINTRT2 EQU * TABLE ENTRY P* P* P* P END @ EVICES CONNECTED T
0x10b64c…10b7e0 Dummy {f00=0x0054, f01=0x408e, f02=» J F IDENT INTRT3 REL 8.2 78-09-15 870105040820 INTRT3K R INTRT3K d x@ P* P* PINTRT3 EQU * TABLE ENTRY P* P* P* P END @ EVICES CONNECTED T
0x10b7e0…10b974 (1, 184) Dummy {f00=0x0055, f01=0x408e, f02=» J F IDENT INTRT4 REL 8.2 78-09-15 870105040820 INTRT4K R INTRT4K d x@ P* P* PINTRT4 EQU * TABLE ENTRY P* P* P* P END @ EVICES CONNECTED T
0x10b974…10bb08 Dummy {f00=0x0055, f01=0x40e2, f02=» J F IDENT TC:TAB REL 8.2 78-09-15 870105040820 TC:TABK TCTABT R TC:TABK l TTMJOB TCTABT @ @ TOR TABLE P* P* P
0x10bb08…10bc9c Dummy {f00=0x0055, f01=0x4162, f02=» J F IDENT BLOK:S REL 8.2 78-09-15 870105040820 BLOK:SK BLOCKE R BLOK:SK l , ( I $ , ( $ ! * 0 6 < B , ( I$ A H N T Z `
0x10bc9c…10be30 Dummy {f00=0x0055, f01=0x0190, f02=» J F IDENT PFTAB REL 8.2 78-09-15 870105040820 PFTAB R PFTAB b TWONN t TCDRON SOPRN CHLTONA C1DRONA C2DRON C3DRON` FDONN * & UT
0x10be30…10bfc4 Dummy {f00=0x0055, f01=0x403e, f02=» (@ :870105040820 PFTAB R PFTAB b TWONN t TCDRON SOPRN CHLTONA C1DRONA C2DRON C3DRON` FDONN * & UT
0x10bfc4…10c158 Dummy {f00=0x0055, f01=0x40ca, f02=» J F IDENT TTABX REL 8.2 78-09-15 870105040820 TTABX R TTABX b < t + + , @ PTTABX DATA 0 P DATA /3C TASK LEVEL & P DATA
0x10c158…10c2ec Dummy {f00=0x0055, f01=0x0190, f02=» J F IDENT LKMAL REL 8.2 78-09-15 870105040820 LKMAL R LKMAL b bTIO t TWAIT TEXIT TACTOT TPAUSE TIMER GETBUF RELBUFC * & UT
0x10c2ec…10c480 Dummy {f00=0x0055, f01=0x404c, f02=» & 6@ H LKMAL R LKMAL b bTIO t TWAIT TEXIT TACTOT TPAUSE TIMER GETBUF RELBUFC * & UT
0x10c480…10c614 (1, 185) Dummy {f00=0x0055, f01=0x4108, f02=» J F IDENT DVTKB REL 8.2 78-09-15 870105040820 DVTKB R DVTKB b KBADN t & " KB bECH !@ ` , ) , + , , @
0x10c614…10c7a8 Dummy {f00=0x0055, f01=0x40f0, f02=» J F IDENT DVTTP REL 8.2 78-09-15 870105040820 DVTTP R DVTTP b TPADN t , ( TP $ $ @ VE AREA FOR REGS. A3,A4,
0x10c7a8…10c93c Dummy {f00=0x0055, f01=0x40e8, f02=» J F IDENT DVTGP REL 8.2 78-09-15 870105040820 DVTGP R DVTGP b GPADN t & " GP ! $ $ @ P DATA 0 SAVE AREA FOR A4
0x10c93c…10cad0 Dummy {f00=0x0055, f01=0x40d8, f02=» J F IDENT DVTDI REL 8.2 78-09-15 870105040820 DVTDI R DVTDI b DIADN t * & DI ?O_o @ ATA /2010 P DATA /3F4F,/5F6F * P DAT
0x10cad0…10cc64 Dummy {f00=0x0055, f01=0x40d4, f02=» J F IDENT DVTDN REL 8.2 78-09-15 870105040820 DVTDN R DVTDN b DNADN t & " DN @ P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE
0x10cc64…10cdf8 Dummy {f00=0x0055, f01=0x40ea, f02=» J F IDENT DVTDY REL 8.2 78-09-15 870105040820 DVTDY R DVTDY b DYADN t & " DY ! & & @ P DATA 0 SAVE AREA FOR A4
0x10cdf8…10cf8c Dummy {f00=0x0055, f01=0x0190, f02=» J F IDENT TTMJOB REL 8.2 78-09-15 870105040820 F B TTMJOBK TTB:ST TTB:ID TTB:PP TTB:SP TTB:SS TTB:SAL TTB:TD R TTMJOBK TTB:ST TTB:ID TTB:PP TTB:SS TTB:S
0x10cf8c…10d120 Dummy {f00=0x0055, f01=0x401e, f02=» , @ REL 8.2 78-09-15 870105040820 F B TTMJOBK TTB:ST TTB:ID TTB:PP TTB:SP TTB:SS TTB:SAL TTB:TD R TTMJOBK TTB:ST TTB:ID TTB:PP TTB:SS TTB:S
0x10d120…10d2b4 (1, 186) Dummy {f00=0x0055, f01=0x40de, f02=» J F IDENT DW1501 REL 8.2 78-09-15 870105040820 DW1501K R DW1501K d DC15AD x * & DC @ E QUEUE P DATA 0 STATUS QUEUE
0x10d2b4…10d448 Dummy {f00=0x0055, f01=0x0190, f02=» J F IDENT MONTAB REL 8.2 78-09-15 870105040820 J F " MONTABK TCTAB CDTAB BLOCKS INTLT1 INTLT2 INTLT3@ INTLT4 INTRT1C R INTRT2 INTRT3N INTRT4 MONTABK TC:TAB TCTAB CD:TAB@
0x10d448…10d5dc Dummy {f00=0x0055, f01=0x4096, f02=» INTRT1C INTRT2 INTRT3N , INTRT4 @ ( $ T @ 1C R INTRT2 INTRT3N INTRT4 MONTABK TC:TAB TCTAB CD:TAB@
0x10d5dc…10d770 Dummy {f00=0x0055, f01=0x0190, f02=» J F IDENT MOXTAB REL 8.2 78-09-15 870105040820 J F " MONTABK TCTAB CDTAB BLOCKS INTLT1 INTLT2 INTLT3@ INTLT4 INTRT1C R INTRT2 INTRT3N INTRT4 MONTABK TCTAB CDTAB BLOCKS
0x10d770…10d904 Dummy {f00=0x0055, f01=0x4180, f02=» INTRT4 MONCON KBAD3 0 KBADN @ * & P TPADN ~ GPADN DNADN DIADN DYADN CGADN CDADN MSADN , (
0x10d904…10da98 Dummy {f00=0x0055, f01=0x40b0, f02=» J F IDENT TCLASS REL 8.2 78-09-15 870105040820 TCLASSK R TCLASSK d x @ DATA TCLASE-* PTCLASE EQU * P END @
0x10da98…10dc2c Dummy {f00=0x0055, f01=0x40b0, f02=» J F IDENT ECLASS REL 8.2 78-09-15 870105040820 ECLASSK R ECLASSK d x @ DATA TCLASE-* PTCLASE EQU * P END @
0x10dc2c…10ddc0 Dummy {f00=0x0055, f01=0x40b0, f02=» J F IDENT SCLASS REL 8.2 78-09-15 870105040820 SCLASSK R SCLASSK d x @ DATA TCLASE-* PTCLASE EQU * P END @
0x10ddc0…10df54 (1, 187) Dummy {f00=0x0055, f01=0x4142, f02=» J F IDENT CD:TAB REL 8.2 78-09-15 870105040820 CD:TABK CDTABF R CD:TABK l DWDU01 DWDU02 DWFD01 , ( $ CDTABF " I
0x10df54…10e0e8 Dummy {f00=0x0055, f01=0x40aa, f02=» J F IDENT CTABX REL 8.2 78-09-15 870105040820 CTABX R CTABX b t @ P DATA C1 P DATA C2 P DATA C3 P DATA C4 P DATA C5 P DATA C6
0x10e0e8…10e27c Dummy {f00=0x0055, f01=0x40fc, f02=» J F IDENT DVTCG REL 8.2 78-09-15 870105040820 DVTCG R DVTCG b CGADN t & " CG bECH !@ ( ( @ DATA 0 SAVE
0x10e27c…10e410 Dummy {f00=0x0055, f01=0x40e6, f02=» J F IDENT DVTCD REL 8.2 78-09-15 870105040820 DVTCD R DVTCD b CDADN t & " CD ! " " @ P RES 4 P DATA 0 P
0x10e410…10e5a4 Dummy {f00=0x0055, f01=0x40be, f02=» J F IDENT DFTAB REL 8.2 78-09-15 870105040820 DFTAB DFTABE R DFTAB j DFTABE | @ P DATA /F8F9,/FAFB PDFTABE EQU * P END @ P*
0x10e5a4…10e738 Dummy {f00=0x0055, f01=0x4104, f02=» J F IDENT TTABD0 REL 8.2 78-09-15 870105040820 TTABD0K R TTABD0K d 1D0 x , ( + K + R @ ECBF
0x10e738…10e8cc Dummy {f00=0x0055, f01=0x4104, f02=» J F IDENT TTABD1 REL 8.2 78-09-15 870105040820 TTABD1K R TTABD1K d 1D1 x , ( + K + R @ ECBF
0x10e8cc…10ea60 Dummy {f00=0x0055, f01=0x4104, f02=» J F IDENT TTABD2 REL 8.2 78-09-15 870105040820 TTABD2K R TTABD2K d 1D2 x , ( + K + R @ ECBF
0x10ea60…10ebf4 (1, 188) Dummy {f00=0x0056, f01=0x4138, f02=» J F IDENT ADDMOD REL 8.2 78-09-15 870105040820 ADDMODK R ADDMODK d , ( S Q R S P W x , ( ! S _ R Q _ ;A A [ [ : , ( S Q" R S
0x10ebf4…10ed88 Dummy {f00=0x0056, f01=0x414c, f02=» J F IDENT DSUMOD REL 8.2 78-09-15 870105040820 DSUMODK R DSUMODK d , ( Q S W S Q x , ( ! R S P W S _ R _ " A ;A [ [ : 4 0 Q
0x10ed88…10ef1c Dummy {f00=0x0056, f01=0x4188, f02=» J F IDENT MPYMOD REL 8.2 78-09-15 870105040820 MPYMODK R MPYMODK d , ( T P P V x , ( ! P V S ? V :!9 V , ( A @ P R W * &
0x10ef1c…10f0b0 Dummy {f00=0x0056, f01=0x0190, f02=» J F IDENT DIVMOD REL 8.2 78-09-15 870105040820 DIVMODK R DIVMODK d , ( P T P V x , ( ! Q U V U Q P , ( A P 9A?A:AV R Z _ , (
0x10f0b0…10f244 Dummy {f00=0x0056, f01=0x4066, f02=» Pf V 'Q +UF /V 9Ud =Q4 ?P CP QR aP* cR oR qP V @ P@ b DIVMODK d , ( P T P V x , ( ! Q U V U Q P , ( A P 9A?A:AV R Z _ , (
0x10f244…10f3d8 Dummy {f00=0x0056, f01=0x4128, f02=» J F IDENT TIODMX REL 8.2 78-09-15 870105040820 4 0 TIODM CHKIND REQEND FDBADF TCFILE COFILE R TIODM CHKIND REQEND FDBADF TCFILE COFILE
0x10f3d8…10f56c Dummy {f00=0x0056, f01=0x40ea, f02=» J F IDENT DWCP01 REL 8.2 78-09-15 870105040820 DWCP01K R DWCP01K d CPADN x & " ! " " @ P RES 4 P DATA 0
0x10f56c…10f700 Dummy {f00=0x0056, f01=0x40f8, f02=» J F IDENT DVTOD REL 8.2 78-09-15 870105040820 DVTOD R DVTOD b ODADN t & " OD ! ` , ) , + , , @ P DAT
0x10f700…10f894 (1, 189) Dummy {f00=0x0056, f01=0x0190, f02=» J F IDENT EBCDIC REL 8.2 78-09-15 870105040820 TASCIIK TEBCDI R TASCIIK l , ( , ( ! , ( A ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^
0x10f894…10fa28 Dummy {f00=0x0056, f01=0x416e, f02=»89:#@'=" p , ( ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^ TEBCDI @ , ( -/STUVWXYZ|,%_>?0123456789:#@'= T , ( 7- <=2&p ?' , ( ! @O {[lP}M] Nk`Ka z^L~no , ( A | J
0x10fa28…10fbbc Dummy {f00=0x0056, f01=0x0190, f02=» J F IDENT SHIFT REL 8.2 78-09-15 870172840820 T:SHL T:SHR M:SHL M:SHR R M:SHL t T:SHL M:SHR T:SHR T:OPA , ( W z 8 # , ( ;
0x10fbbc…10fd50 Dummy {f00=0x0056, f01=0x4064, f02=»ETMMM [ W )PJ -T EP cP iP * N@ `HL M:SHR R M:SHL t T:SHL M:SHR T:SHR T:OPA , ( W z 8 # , ( ;
0x10fd50…10fee4 Dummy {f00=0x0056, f01=0x018e, f02=» J F IDENT WRITE REL 8.2 78-09-15 870172840820 " T:WRT T:WRTZ T:EDT T:EDTZ R , ( J [ x , ( ! B B C ; CTLTAB , ( A V D C ' ; V /
0x10fee4…110078 Dummy {f00=0x0056, f01=0x0190, f02=» f , ( ^" _b P = = , ( ( ! $ <d V P 8 , ( :# L _ h ! P T W h , ( _H P _R XV _ Z` ( T:OPA , ( = _ W , (
0x110078…11020c Dummy {f00=0x0056, f01=0x0190, f02=» L A # A z , ( @ u A 8$ A , ( 9A @ # A U 9a A A A J , ( A A Y ` $ A P z , ( & = _ E P Z _0 D * , ( D A @ T 0P W _ A ,
0x11020c…1103a0 Dummy {f00=0x0056, f01=0x0190, f02=» j , ( T s A A A _Z @ T -_h +_l @ , ( X _8 A @ 0X*_ @ : , ( T @ @ A _ A X _ AB j , ( CDFPSTVZ09.,+-* rn ~b Z ^h@V , ( ^:H$$$$&$$$$$$$ ~~$$ $ & , ( .0 : @
0x1103a0…110534 (1, 190) Dummy {f00=0x0056, f01=0x4086, f02=» P H D !` P T" P" W P EW U [ e T R( 'R 5P 9W X H p@ X _ AB j , ( CDFPSTVZ09.,+-* rn ~b Z ^h@V , ( ^:H$$$$&$$$$$$$ ~~$$ $ & , ( .0 : @
0x110534…1106c8 Dummy {f00=0x0056, f01=0x0190, f02=» J F IDENT FUNCTN REL 8.2 78-09-15 870172840820 D @ T:ADD T:ADDC T:SUB T:SUBC T:CMP T:CMPCA T:CPA T:CPAC T:MOV R F B T:MOVC T:OPA T:OP1 T:OPS RETMMMA M:ADD M:SUB M:CMP M:CPA M:MOV M:OPA M:OPS T:OP1
0x1106c8…11085c Dummy {f00=0x0056, f01=0x0190, f02=» A z A | , ( ! & * , ( A % # & P $ P P L , ( a : Q 9AR W 7 | , ( R V ' A V & , ( @ A V * ' P $ P &
0x11085c…1109f0 Dummy {f00=0x0056, f01=0x0190, f02=» T 4$ <A 4 P T M:OPS 2 0 T:OPS 2 B , ( ! W z [ 9 V T RETMMMA ^ M:MOV ` , ( A A 4 A : T:MOVC ` T:MOV d , ( a
0x1109f0…110b84 Dummy {f00=0x0056, f01=0x0190, f02=» Z _f V <9d P 9 ^ M:CPA 0 T:CPAC B T:CPA V , ( V <! P 9 Z6_ h M:CMP T:CMPCA T:CMP , ( W ( 8 * # % , ( !
0x110b84…110d18 Dummy {f00=0x0056, f01=0x410c, f02=» _ H D !| W 7 * ! & % 1 ( OP WP _P gQ qR uW Rl V V V H D ! P R W R P 'W6 ; J ?V sV4 wRL Q V V R Q V ^ H D ! P V P W 'T +RB -QD 1P 9P =V CP GV MQ OP [V qW @
0x110d18…110eac Dummy {f00=0x0056, f01=0x0190, f02=» J F IDENT MULDIV REL 8.2 78-09-15 870172840820 > : T:MUL T:DIV T:SIGN T:BRK T:MULCA T:DIVCA M:BRK M:SIGN R T:MULCA T:MUL T:MOV T:SUB , ( D 0 0
0x110eac…111040 Dummy {f00=0x0056, f01=0x018e, f02=» 8 j T:DIVCA f T:DIV j , ( W ! : 9 [ : 0 T:CMP ` , ( wD 0@ @@ 0@P p , ( 0R P [ P 0 * & _ P 0 , ( @
0x111040…1111d4 (1, 191) Dummy {f00=0x0056, f01=0x0190, f02=» * & @ [ _ _ 0 9A [ T:OPS 6 , ( @ @ [ 8 * F RETMMM v M:BRK R T:BRK R , ( 7 ! # 9 + : R [ ( , ( U U Z D $ A A z A A A
0x1111d4…111368 Dummy {f00=0x0056, f01=0x4072, f02=» ! R R -P 1P q R u Px R R P Pd PB R Q R GR L @ n RETMMM v M:BRK R T:BRK R , ( 7 ! # 9 + : R [ ( , ( U U Z D $ A A z A A A
0x111368…1114fc Dummy {f00=0x0056, f01=0x0190, f02=» J F IDENT DRIC01 REL 8.2 78-09-15 870105040820 ITADI ITADO ITABRT R ITADI p ITADO ECBCW * & P P .T B Y W B FNDTID DWTTAB TTB:TD , (
0x1114fc…111690 Dummy {f00=0x0056, f01=0x0190, f02=»DIOA TDISP , ( S ! @ X SETIMP L , ( m X P R A ^ TTB:ST * & Y X T (P H U DISIOEA , ( ^ 9 1_J 8P ( 9
0x111690…111824 Dummy {f00=0x0056, f01=0x0190, f02=» 1 i @_ _ X T , ( W X T X $ $ IHRTN T DWTECB d , ( 9 $ 1W $P e % v ECBRL , ( W D (@ H B Z D U ECBEL ECBBA , (
0x111824…1119b8 Dummy {f00=0x0056, f01=0x407e, f02=» W T sP wR4 ` H D !6 P P B T P T B W0 )T& / B AW IP mU P h@ z $ 1W $P e % v ECBRL , ( W D (@ H B Z D U ECBEL ECBBA , (
0x1119b8…111b4c Dummy {f00=0x0056, f01=0x40e4, f02=» J F IDENT DRIC0X REL 8.2 78-09-15 870105040820 ITABRTK ITADI ITADO R ITADI p ITADO IHRTN ITABRTK @ @ P* P* P* P*
0x111b4c…111ce0 Dummy {f00=0x0056, f01=0x018e, f02=» J F IDENT ATTACH REL 8.2 78-09-15 870105040820 ATTACHK DETACH ATT:CH R ATTACHK t TTB:STL , ( T C @ T P U W DWTST DWTTABN TIODM , ( "$ X
0x111ce0…111e74 (1, 192) Dummy {f00=0x0057, f01=0x0190, f02=» , ( QD _ X X GETBLK 4 , ( k T B Z T @_$ A @ F SETIMP v TIOQ20 DETACH , ( 1 A N , ( X XT X Z Y
0x111e74…112008 Dummy {f00=0x0057, f01=0x0190, f02=» TTB:SA TPQUE , ( $ ) U ATT:CH P IHRTN d , ( 0P P t FDBADF , ( - $ @ E R 0 , ( I P R I I W I
0x112008…11219c Dummy {f00=0x0057, f01=0x4080, f02=» GP i mT, uT } n < 8 t T 8 h T ( P ER IP MR WW _ h oP * j@ | 0P P t FDBADF , ( - $ @ E R 0 , ( I P R I I W I
0x11219c…112330 Dummy {f00=0x0057, f01=0x40f0, f02=» J F IDENT ATTACX REL 8.2 78-09-15 870105040820 ATTACHK DETACH ATT:CH R ATTACHK t DETACH TIOERR ATT:CH @ @ * * P*
0x112330…1124c4 Dummy {f00=0x0057, f01=0x40ca, f02=» J F IDENT DWII01 REL 8.2 78-09-15 870105040820 DWII01K R DWII01K d ITADI x ( $ @ PDWII01 EQU * & P DATA 0 QUEUE ANCHOR OUTPUT DWT'S
0x1124c4…112658 Dummy {f00=0x0057, f01=0x40ca, f02=» J F IDENT DWIO01 REL 8.2 78-09-15 870105040820 DWIO01K R DWIO01K d ITADO x ( $ @ PDWIO01 EQU * P DATA 0 QUEUE LINK P DATA /8000
0x112658…1127ec Dummy {f00=0x0057, f01=0x40da, f02=» J F IDENT DW0701 REL 8.2 78-09-15 870105040820 DW0701K R DW0701K d DC07AD x & " DC @ P END @ P DATA 0 ECB ADDRESS
0x1127ec…112980 Dummy {f00=0x0057, f01=0x40dc, f02=» J F IDENT DVTMS REL 8.2 78-09-15 870105040820 DVTMS R DVTMS b MSADN t & " ! ( @ FOR A3 P DATA 0 SAVE AREA FOR A4
0x112980…112b14 (1, 193) Dummy {f00=0x0057, f01=0x40ce, f02=» J F IDENT DC:TAB REL 8.2 78-09-15 870105040820 DC:TABK DCTAB R DCTAB j DC:TABK | @ P* P* P* PDCTAB DATA DC:TAB & P
0x112b14…112ca8 Dummy {f00=0x0057, f01=0x40ee, f02=» J F IDENT DW2201 REL 8.2 78-09-15 870105040820 DW2201K R DW2201K d DC22AD x , ( , @ 0 TIMER FOR BUFFER QUEUE
0x112ca8…112e3c Dummy {f00=0x0057, f01=0x40fa, f02=» J F IDENT DVTT1 REL 8.2 78-09-15 870105040820 DVTT1 R DVTT1 b TPAD3 t , ( TP . . @ R REGS. A3,A4,
0x112e3c…112fd0 Dummy {f00=0x0057, f01=0x018e, f02=» $ F IDENT DEBUG 78-08-29 dBUG , |BUG : , ( A @ ~ A J , ( ! A ~ @ A A @ A z , ( A A @ A A @ A a A q , (
0x112fd0…113164 Dummy {f00=0x0057, f01=0x0190, f02=» f , ( $ ( , 0 4 , ( 8 < 8 , ( - h , ( M , ( m 2 , (
0x113164…1132f8 Dummy {f00=0x0057, f01=0x0190, f02=» :A , >a @ t , ( " A P UW B ( , ( - @ = / M Q X , ( M R S T Y G P H L , ( m V I U _v A , ( _ NO!
0x1132f8…11348c Dummy {f00=0x0057, f01=0x0190, f02=» + - ; : x , ( X " H W X " H H , ( - A A A _T @ P A 1+ H , ( !T M X A _ @ A @ A _ x , ( ! m A UP z z " , ( Q! @ @ T z " ( ^ @ , (
0x11348c…113620 Dummy {f00=0x0057, f01=0x0190, f02=» h , ( ! W P @ & 0 , ( - T A P P 8 , ( M _b _J A h , ( m T @ W @ , ( % T @ W @ @ >a , (
0x113620…1137b4 (1, 194) Dummy {f00=0x0057, f01=0x0190, f02=» W A W @ A , ( - P 3P z ( , ( M C @ P @ @ P @ Q X , ( m A @ A " T @ W @ , ( ( A A P , ( B$ @ _2 z T
0x1137b4…113948 Dummy {f00=0x0057, f01=0x0190, f02=» A 9 Y x , ( $ - >a Y T c A ~ A " , ( P M z A <a P T A H , ( @ m ) " A H x , ( U A @ z @ @ , ( T A A ~ P @ P , (
0x113948…113adc Dummy {f00=0x0057, f01=0x0190, f02=» h , ( - ( T ( W P T $ ; V , ( M ; W &~ P &`P 6 P @ t 8 , ( m $ P $ T P #~ h , ( > V . >A P Y X W ^ , ( ? ? @ t ' P Y Y @ t , ( " P A
0x113adc…113c70 Dummy {f00=0x0057, f01=0x0190, f02=»V >! D A A > , ( M > > > > > > > ^ ( , ( m _ ^ _ ? ? ? ? ? A ^ X , ( @ t ? ? > > > , ( > > > > n > , ( P ?
0x113c70…113e04 Dummy {f00=0x0057, f01=0x0190, f02=» H A " x , ( M A 0R 9U AR F , ( m Q 0:D A _* A " H , ( A A T A x , ( A " R _U . , ( " A : A , (
0x113e04…113f98 Dummy {f00=0x0057, f01=0x0190, f02=» h , ( M _ , ( m I T " T A P I T ! A 8 , ( UU A r A R A V A Z A ^ A b A f j h , ( @T A A @ A | @ > , ( ! n @ _ ? ~ c P 9m1 , ( T `
0x113f98…11412c Dummy {f00=0x0057, f01=0x0190, f02=» A zP A x< V A x H D ! ! - 1 = A M Q ] a F i . H D ! R . . P W % . ) - 1 l H D ! 3 : 7 = z A E I ~ M Q U Y ] a e i x m q H D ! _
0x11412c…1142c0 Dummy {f00=0x0057, f01=0x0190, f02=» P P H D ! x T W W W ( W W PP H D ! ' ( - 3T 7 =P A , G . K S W ] c . m q u T X H D ! W T W 6 H D !{ W (
0x1142c0…114454 (1, 195) Dummy {f00=0x0057, f01=0x0190, f02=» ! ' ? M W p g m V T P@ PB 6 H D ! 6 T +R, 1T 5W ?T GV WWp _P cP gP oP TH P@ D H D ! V P W P P W P . T T P -V H D ! 1 V 9 L = T A V I T ! F % F - F
0x114454…1145e8 Dummy {f00=0x0057, f01=0x40aa, f02=» W" . W . W #W 'W +W 1 ~ 5W t H D ! ; x ?PL C oT {T P T$ P T P R< P6 T. %P -W 0 ET SP [V | d @
0x1145e8…11477c Dummy {f00=0x0057, f01=0x0190, f02=» J F IDENT DRTW01 REL 8.2 78-09-15 870105040820 TWADY IHTWY TWONY DWTW01 R TWADY v DISIOEA , ( B U P R U , ( ! ! W ! Q ! B Z P , ( ? C !
0x11477c…114910 Dummy {f00=0x0057, f01=0x0190, f02=» C ! _f Y $P Y % _ ^ , ( _ ! P B L # +P * , ( Y ( ! U _ X T _ Z DWTST , ( W ! Y ! X X ! , ( X P R ?]* U C _. _: , ( = !
0x114910…114aa4 Dummy {f00=0x0057, f01=0x0190, f02=»WTECB , ( {B X R X X ' , ( P ! X > DISENDL n IHTWY INTSAV , ( ( _V A X , ( @ R 8 J P X ' Q 8 , (
0x114aa4…114c38 Dummy {f00=0x0057, f01=0x0190, f02=» TDISP , ( E Y Y Y * ! ( X *_< B * & c 1 4 X X X X ' D , ( 4 B U B $" 4 C r DWTW01 & " 4 _^ H D !
0x114c38…114dcc Dummy {f00=0x0057, f01=0x409e, f02=» H D !1 T W . #P 'R /U ? E KP e . R P " 4 0 R> P Q Wx U P4 !W* 'W -W 7T U P @ DWTW01 & " 4 _^ H D !
0x114dcc…114f60 Dummy {f00=0x0057, f01=0x0190, f02=» J F IDENT DRTC01 REL 8.2 78-09-15 870105040820 $ IHTCY DWTC01 DWTC02 TCDRON R z DISIOEN , ( 1"78 Q P ^ A ECBRL , ( + B X T " T A 7
0x114f60…1150f4 (1, 196) Dummy {f00=0x0058, f01=0x0190, f02=» H TCDRON 0 SAVE8 D INIFLGA T TDISP f , ( @ v , ( P X XP# Y ) W , ( " P P _ :CV + W , (
0x1150f4…115288 Dummy {f00=0x0058, f01=0x0190, f02=» DISEND , ( ; Y A A , ( S X T " P A J , ( s X P W Y @ T z , ( ] D W @ , ( :CZ _J) @ _ P _ Y ,
0x115288…11541c Dummy {f00=0x0058, f01=0x0190, f02=» A _$ _ _, _0 _4 _8 _< A , ( / ?M P A P Q ? A B @ . , ( M T M -W ,E A A > > >M A ^ , ( m _ A > , ( @ ;I C X "A _@ A | , ( U @ A A A
0x11541c…1155b0 Dummy {f00=0x0058, f01=0x0190, f02=» P Y W X | , ( @ # $ Q R _ P , ( C U ( _ : V # P W Y P L DWTC02 | | DWTC01 | , ( cB X ' P Y _ Y " " | H D ! A P +
0x1155b0…115744 Dummy {f00=0x0058, f01=0x417a, f02=» ! P P ( V W* T T T # %P + S W YT H D ! ] c mP: q u wP { ( W T( W P L H D !n $ W B 5P: 9 ;Pd =Q* OT UW ] m s H D ! T T V W T V
0x115744…1158d8 Dummy {f00=0x0058, f01=0x0190, f02=» J F IDENT DRLT01 REL 8.2 78-09-15 870105040820 D @ CHLT1 CHLT2 CHLT3 CHLT4 OUTLIN CHLTON OUTPUTL LDREG LDREGE R D @ LDREGF STREG GETCHR LOCHAN RECHAN CWTLT1 CWTLT2C CWTLT3 F B CWTLT4 CWTRT1 CWTRT2 CWTRT3 CWT
0x1158d8…115a6c Dummy {f00=0x0058, f01=0x0190, f02=»FC CWTRT1 CWTRT2 CWTRT3 4 CWTRT4R H CWTRT5 CWTRT6K p CWTRT7 CWTRT8 DWREMU CWTLT1 INTLT1 CWTLT2C CWTLT3
0x115a6c…115c00 Dummy {f00=0x0058, f01=0x0190, f02=» z INTSAVV , ( B A J ;h # , , ( ; <c$ " P 4 5 T P ? X U , ( [ X > P P P P DWTST , ( { P ] 0 X T Y , (
0x115c00…115d94 (1, 197) Dummy {f00=0x0058, f01=0x0190, f02=» y l SETIMP , ( W W X P y , ( Y W Y X ;BR U _ N , ( / 4 U P $P > R > 8 ~ DWTADR * & O ' T Y X ' T P X , ( i P
0x115d94…115f28 Dummy {f00=0x0058, f01=0x0190, f02=» P " p RTNA15M OUTLIN " , ( @ & $P D P 6 , ( P P P _ E W Q Y W 8 f IHRET82 CHLTON , ( " E 4 % Y B OUTPUTL , , ( I @
0x115f28…1160bc Dummy {f00=0x0058, f01=0x0190, f02=» LDREGE f , ( UA X X Y X X X X GETCHR z L , ( q ' 4 B U B (" ` , ( W C ? @ T A % > > ECHENDW 8 ECHOY <
0x1160bc…116250 Dummy {f00=0x0058, f01=0x414e, f02=» n q@ X b H D !d / A GP QP c iP mP qP uP, {P T W T ( H D ! @ R P P W Wv Pp Wf #Rz 1 ?P< EP2 IR. QT aT eP t H D !@ oP T P P$ P P0 P W W P 3P: 7P6 U W
0x116250…1163e4 Dummy {f00=0x0058, f01=0x0190, f02=» J F IDENT DRSOP1 REL 8.2 78-09-15 870105040820 0 , SOPCT SOPRY IHSOP DWSI01 DWSI02A DWSO01A R SOPCT DISIOE , ( T 8P 9W P P SAVE8 , ( ( ! B A W B A
0x1163e4…116578 Dummy {f00=0x0058, f01=0x4162, f02=» ECBCW TENDIO TDISP SOPRY f 0 , ( W $ C A B DWSI01 r , ( @ m @ A. X V 9_: DWSO01A DWSI02A * & @@ @
0x116578…11670c Dummy {f00=0x0058, f01=0x0190, f02=» J F IDENT DRDN01 REL 8.2 78-09-15 870105040820 DNADY R DNADY b DISIOE t OUTPUT , ( D P P @ ! W GETCHR , ( U ?P Q R !
0x11670c…1168a0 Dummy {f00=0x0058, f01=0x40f8, f02=» S R Y @ ! DWTECB , , ( m X2_n R P T @ ! > ECHRTN n D @ J v P P W& %U +P /Q 3R SR yR P T @ R !
0x1168a0…116a34 (1, 198) Dummy {f00=0x0058, f01=0x0190, f02=» J F IDENT DRDI01 REL 9.1 78-09-15 870105940912 DIADY R DIADY b , ( B 8# T $ # ;D P t DISIOE` DWTST , ( ! P Y W Y X Y , ( = 8# T W
0x116a34…116bc8 Dummy {f00=0x0058, f01=0x407e, f02=» s X _H < 8 D t T P !P -W AT CW$ GT( QP [P aV ( ~ h@ z B 8# T $ # ;D P t DISIOE` DWTST , ( ! P Y W Y X Y , ( = 8# T W
0x116bc8…116d5c Dummy {f00=0x0058, f01=0x018e, f02=» J F IDENT DRTP01 REL 8.2 78-09-15 870105040820 TPADY R TPADY b , ( !"$&;< t DISIOE * & ! >@^_ P Q P V , ( ? B $ D ! <D$ !
0x116d5c…116ef0 Dummy {f00=0x0058, f01=0x0190, f02=» f , ( P ! ! ! B C DWTOR 8 , ( H B 9n P D & ! X ' H , ( @P $ ! ! T # P x DISEND * & " T ) " P ! Y , ( @ _r! T ! B
0x116ef0…117084 Dummy {f00=0x0058, f01=0x018e, f02=» ! B , x , ( ! P ! Y ! B , ( 9BV ! B B , ! T H , ( _ V ! ! Y x , ( Y 4 R Q " P , ( " P -T ! B ! ! Y , (
0x117084…117218 Dummy {f00=0x0058, f01=0x0190, f02=» f LDREG SAVE8 , ( ( i R P W ( , ( @@ X R ! Y # ! X TDISP , ( v R _ 4 Y " $ @ ,$ , ! 4 H D ! , d /P 5Q
0x117218…1173ac Dummy {f00=0x0058, f01=0x4096, f02=» GP IQ OW a qP& P V T V R< Q P6 P 8 4 @ T& U %W6 -T ?R EU iR< mP uW0 R R D @ ( v R _ 4 Y " $ @ ,$ , ! 4 H D ! , d /P 5Q
0x1173ac…117540 Dummy {f00=0x0058, f01=0x0190, f02=» J F IDENT DRMT01 REL 8.2 78-09-15 870105040820 IHMTY DWMT01 MTDRON R DISIOE r DWTOR , ( Q P A X ECBRL , ( " :B V B H R E
0x117540…1176d4 (1, 199) Dummy {f00=0x0058, f01=0x018e, f02=»T 5P H t , ( R ) W H R ( C C ! , ( P Q ! ! R ! A _ ! Q D ECBCW t , ( ; V )W ! ! R ! A _$ B , ( 9 I ! ) ! W ) ! ! , ( W ! Q ) ; V _( ! Q
0x1176d4…117868 Dummy {f00=0x0058, f01=0x0190, f02=» f SETIMP` TDISP , ( q ? A A * , ( @ @ A _4 A ! Z , ( 9 R 9 4 A X A , ( @ @ @ A _< s , ( t W @ _ W W A
0x117868…1179fc Dummy {f00=0x0058, f01=0x0190, f02=»TY L INTSAV SAVE8 , ( A A A A I P . DWTECB ^ , ( [@ A T @ p , ( u (G P @ T : U @ * & @ B H R B @ 4 MTDRON
0x1179fc…117b90 Dummy {f00=0x0058, f01=0x0190, f02=» H 9 R ! , ( A @ ?b ! " , ( " # H R ! ( ( ! ! 9 R , ( C Z 9 V A ! T @ ( )T Q , ( c R ! _ R ! _ ! T 9 V H , ( ; R @ (
0x117b90…117d24 Dummy {f00=0x0058, f01=0x0190, f02=» & H D !^? P ) - /V 9R MP Q U [ e i j m @ H D ! & oP qQ uR y R T P R W R P Q R H D ! Qv V Wl R`
0x117d24…117eb8 Dummy {f00=0x0058, f01=0x413e, f02=» W4 W( W$ W p H D ! W W W W ! %P 'S ? C G WP a cT m u , H D != P T P T x H D !y@ R 'R` GV K OT8 S [T _Q eR oR {T V
0x117eb8…11804c Dummy {f00=0x0058, f01=0x0190, f02=» J F IDENT DRLP01 REL 8.2 78-09-15 870105040820 & " LPADR ACLPY IHLPY LPONY DWLP01 R LPADR | ACLPY , ( T 1 W B B P DISIOEC , ( ! P V - 0;H
0x11804c…1181e0 Dummy {f00=0x0058, f01=0x0190, f02=» , ( ;h 1 Y @ r r SAVE8 4 LPONY D DWTST V IHLPY f INTSAVA x , ( BB _ X Z&W A DWTOR DWTECB , ( A I X ' {
0x1181e0…118374 (1, 200) Dummy {f00=0x0059, f01=0x404a, f02=» YP _P g kT oV W h $ 4@ FNY D DWTST V IHLPY f INTSAVA x , ( BB _ X Z&W A DWTOR DWTECB , ( A I X ' {
0x118374…118508 Dummy {f00=0x0059, f01=0x0190, f02=» J F IDENT DRGP01 REL 8.2 78-09-15 870105040820 GPADY ECHOGP R GPADY j , ( !"$&;<>@^_ P P | DISIOE OUTPUT , ( ! B P B L # +P ! , ( ?
0x118508…11869c Dummy {f00=0x0059, f01=0x0190, f02=» T Y "_* P R P O]: * & V _B T Y Y " R Y " , ( _Z C _P " $ P , ( P X " X ]r ! Y , ( Y Y _ " H TENDIO TDISP * &
0x11869c…118830 Dummy {f00=0x0059, f01=0x0190, f02=»Z$<BR X( 0 R , ( W V ! P P R ?Q ! Y $ ECHRTN T , ( u R Q ( -_ ? _ f SAVE8 , ( X # ! ^ Y _( , ( B X Z ! P P , (
0x118830…1189c4 Dummy {f00=0x0059, f01=0x4076, f02=» }T P4 R( X H D ! Pj V T P ( AR SR( WV( aP" eP" iR mQ yR {Q P0 P `@ rQ ( -_ ? _ f SAVE8 , ( X # ! ^ Y _( , ( B X Z ! P P , (
0x1189c4…118b58 Dummy {f00=0x0059, f01=0x0190, f02=» J F IDENT DRKB01 REL 9.1 78-09-15 870105640912 $ KBADY EOQUEU DWTINQ DWTUTQ R DWTINQ ( z DWTUTQ * KBADY DWTST , ( Y U P R , ( X ( )
0x118b58…118cec Dummy {f00=0x0059, f01=0x0190, f02=» * V t , ( }@ ! B _P B P $$ R , ( % C W Y &X ! 8$ P D , ( W 8$ P $ T W $ Y 'P Y t , ( %P Y $P T ! B Z ECHEND , ( W W ! * T !
0x118cec…118e80 Dummy {f00=0x0059, f01=0x0190, f02=» W X (P Y * 0 %_. % Y * , ( q _d _ P _ ?" ( , ( 8 T ! )_ W ! T "? 9 0 R X LDREG , ( Q > 4 >_ X R ;GV TDISP , ( X ( $4 P X *T * W Y ( -
0x118e80…119014 (1, 201) Dummy {f00=0x0059, f01=0x410a, f02=» # 1 7P ;T WT ]W cT iW m wV { x H D !( P R WV P W P T W PH P P T W 4 H D ! @ W T - KT SW ]P }P T W T R Q R $ V P T W W T @
0x119014…1191a8 Dummy {f00=0x0059, f01=0x0190, f02=» J F IDENT DRDY01 REL 9.1 78-09-15 870105740912 DYADY ECHODY R DYADY j OUTPUT | , ( ! DISIOE , ( P P & B , ( =
0x1191a8…11933c Dummy {f00=0x0059, f01=0x0190, f02=» GETCHR , ( X " E , ( P 8'0P E T ! T 9 @ , ( _t ! T @_ ! p , ( B P ! B C ^N , ( P R ?] _ C _ , ( 1@
0x11933c…1194d0 Dummy {f00=0x0059, f01=0x0190, f02=» @ 8!0T 8 !@P ! $ P ! , ( ! ! T . TENDIO ^ TDISP p , ( Y " X " C X Y " DWTST , ( Y > X " X "" Y %Q Y LDREG SAVE8
0x1194d0…119664 Dummy {f00=0x0059, f01=0x0190, f02=» _ n ECHODY ` , ( K@ ! X $ P ! R " ECHRTN R * & $ i V P P ! W d , ( X $ X ! _ X $ X X , ( " ! ! Y _8 X " , ( " X "" Y %U
0x119664…1197f8 Dummy {f00=0x0059, f01=0x0190, f02=» X % V Y ! , ( 9 X $ X " ! B " , ( W `R Y ! ! ! R , ( s 4 ! V ! " V W :h ! 4 H D ! ` #Pz 'P - v 3 b =P MPP
0x1197f8…11998c Dummy {f00=0x0059, f01=0x408e, f02=» Q R 'T CT UP Y cR iV oP p H D !80 sP" }W v X U W U R@ +V 9 X G v ]R V V W , x@ 4 ! V ! " V W :h ! 4 H D ! ` #Pz 'P - v 3 b =P MPP
0x11998c…119b20 Dummy {f00=0x0059, f01=0x0190, f02=» J F IDENT DRRT01 REL 8.2 78-09-15 870105040820 F B CHLT1 CHLT2 CHLT3 CHLT4 CHRT1 CHRT2 CHRT3 CHRT4 OUTLIN` CHLTON R H D ! OUTPUTN CHTAB LDREG LDREGE LDREGF STREG GETCHRC DWREMU LOCHAN F B RECHAN CWTLT1 CWTLT2 CWTLT
0x119b20…119cb4 (1, 202) Dummy {f00=0x0059, f01=0x0190, f02=» RECHAN REMFC CWTLT1 * INTLT1V > CWTLT2 P CWTLT3R d CWTLT4 x CWTRT1K INTRT1 , ( J B B , ( J B B pU
0x119cb4…119e48 Dummy {f00=0x0059, f01=0x0190, f02=» J B | CWTRT4 , ( y B pU 0 , ( J BQB rU ` CWTRT5 CWTRT6 CWTRT7 CWTRT8 CHTAB DWREMU , (
0x119e48…119fdc Dummy {f00=0x0059, f01=0x0190, f02=»:A H P P H &!@T I & DISEND ( CHLT1 , : INTSAV L * & @ T &! 1 U ' A ^ SAVE8 CHLT2 8 CHLT3 8 CHLT4 8 CHRT1 8 CHRT2 D , ( /
0x119fdc…11a170 Dummy {f00=0x0059, f01=0x0190, f02=» T & R z , ( p # P P , ( R " P 4 ] " P $ P ] J , ( U ( P U P P P R z DWTST , ( 4T ] U ( X "0 , ( T + Y W 8Z
0x11a170…11a304 Dummy {f00=0x0059, f01=0x0190, f02=» P <W T , ( w # Y U & T * , ( ] "W 8V X P y Z SETIMPV , ( W P 8R , ( R Y X Z ;BR 8% =A , ( " Y
0x11a304…11a498 Dummy {f00=0x0059, f01=0x0190, f02=» M ;h # <c$ P X " , ( m Z "X 8# T 8Z V , DWTOR , ( X # T X P y Y X l DWTECB , ( $ ' X (@ L ' T 4X <d , ( $ _@ $?:D" Y X P
0x11a498…11a62c Dummy {f00=0x0059, f01=0x018e, f02=»P n , ( C "P T (R X # X > P RTNA15 > , ( c P P X X> P , ( _@ W ? T T , ( W u > > E D , ( E E S % ;DV " U "
0x11a62c…11a7c0 Dummy {f00=0x0059, f01=0x0190, f02=» f LDREG . , ( @ Y Y Y Y _8 X XB LDREGF < J LDREGE @ ^ , ( 9@" Y X X X X ' r GETCHRC T * & S 4 B U B (" W C OUTLIN` r , ( q
0x11a7c0…11a954 (1, 203) Dummy {f00=0x0059, f01=0x0190, f02=» P T (V W 8V T (P U , ( ( 8 ~ U Q P X H ( IHRET8N X , ( 5 U R " ] " Y j , ( + V P X P P _ ] CHLTON X , ( @ I W Q Y _4 @ T
0x11a954…11aae8 Dummy {f00=0x0059, f01=0x0190, f02=» @ n & " T A % > > ECHEND 8 ECHOY L DWTWAT ^ , ( @ Y Y Y X 9BV X " p ECHRTN TENDIO , ( A Y X D V " @ X <
0x11aae8…11ac7c Dummy {f00=0x0059, f01=0x0190, f02=» P: P0 P, R H D !H T ( Tl WH R 5P2 9R. AT QT UP _P mWf s } ( T H D !$ W V P W P R R R T r 3 =R G ]P d H D ! T" V. T P T P P T P P T 7R =P> GP* MR [ r H D ! aP eP
0x11ac7c…11ae10 Dummy {f00=0x0059, f01=0x408e, f02=» H D ! P Q0 P R /V 7P AP KW _T qR4 yS P T W $ T V$ V P x@ R T r 3 =R G ]P d H D ! T" V. T P T P P T P P T 7R =P> GP* MR [ r H D ! aP eP
0x11ae10…11afa4 Dummy {f00=0x0059, f01=0x0190, f02=» J F IDENT DRKB03 REL 9.1 78-09-15 870105840912 KBAD3 R KBAD3 b DWTST t , ( Y U R -P , ( X ( ) Y * X " P , ( = :A: R Q W Y
0x11afa4…11b138 Dummy {f00=0x0059, f01=0x0190, f02=» $ 4 T % t STREG , ( W X (T ! W Y * V $ ECHON T , ( ! B P X " _X B P d , ( $$ R % C * ! , ( W Y 'P Y &P Y $P Y %P , ( 1 R _
0x11b138…11b2cc Dummy {f00=0x0059, f01=0x0190, f02=»T @ W X (P Y * 0 % , ( _. % Y * W _p P $ ECHEND T DISEND f , ( D _ C ! " x LDREG , ( Q R X R ;GV , ( P X R ;GV X
0x11b2cc…11b460 Dummy {f00=0x0059, f01=0x0190, f02=» P X :d Y > > | , ( { V ? 8 R @R V @% =cW R ( , ( P R P 9 W _ _ X , ( _ %0=c X 0P > 0 > , ( >_ P > _t B 1 > @T , _ H D
0x11b460…11b5f4 (1, 204) Dummy {f00=0x005a, f01=0x410a, f02=» PH #P> T H D ! )P /P 3 9R =Q CP GR KR OW aWr eW s T W P W H D !a P v QP R R( V$ D P8 R2 V. )P / 5T 9W WT H D ! [T ]W aP {Vb R R4 V W0 R@ P R P W, P P T @
0x11b5f4…11b788 Dummy {f00=0x005a, f01=0x0190, f02=» J F IDENT DRDC07 REL 8.2 78-09-15 870103240912 . * DC07ADK IH0701 IH0702 DC07ON DW0700 R DC07ADK / , ( } P P P P D
0x11b788…11b91c Dummy {f00=0x005a, f01=0x0190, f02=» , ( A _0 _: X T , ( _F $ Y C D C 8 , ( X h X Xn y Y _x B h SETIME * & 3 _ _ B P A DWTOR , ( O Y W Y @ X
0x11b91c…11bab0 Dummy {f00=0x005a, f01=0x0190, f02=» _H X P ( y Y 4 ( , ( P 0 ) > (P _ ) 1_ * , ( @ (P _ ) 1_0 ( Z , ( X< P _ 0 )_J (P _ ) 1 DWTST , ( % D 4 X R X T X , ( ? P ,
0x11bab0…11bc44 Dummy {f00=0x005a, f01=0x0190, f02=» 2 T A 4 ! _0 2ST A , ( 4_ @ 4T _J P ! 2 T ! * , ( ! _f 2 P 2 T ! ! Z , ( @ 9! X _ " P @ 9! , ( 2 P 2 T @ 9! _ ! A , ( = 4 _ ! @ .! T
0x11bc44…11bdd8 Dummy {f00=0x005a, f01=0x0190, f02=»T P C z , ( @ C P ! Q , ( @ ! X $T Y J , ( Y X P Y (P _ ) z , ( B & @ .! T 4 A . @ ~9D @ , ( 1 ! 8 1 @ 9 1 ,
0x11bdd8…11bf6c Dummy {f00=0x005a, f01=0x0190, f02=» h , ( @ T @ & _( ! , ( B A : 8! B = A 0 8 , ( A ! @ ~ ! A ~ A | @ h QMJOB , ( @ :E @ ~:A 1 4 Z ? ? > , ( * % > > A ~ A A A A A , (
0x11bf6c…11c100 Dummy {f00=0x005a, f01=0x0190, f02=» h * & D A ~ 4 A ._ @ ~X _ X , ( R X P T Y W ! 6 , ( C 4 Q ! f , ( 4 @ 1 ! P A ! W A , ( ! A ! 4 @ T A IH0701 R
0x11c100…11c294 (1, 205) Dummy {f00=0x005a, f01=0x0190, f02=» A 2 ! 4J T z , ( * ! ! P W ! P @ A & , ( ! 4 0 J IH0702 z , ( P 4 0:H P , ( @ B T ! @ 0P A 0 Q A W J , ( T ! P ! Xv W
0x11c294…11c428 Dummy {f00=0x005a, f01=0x0190, f02=» A _: ~ , ( _T @ ` @ DC07ON N , ( B P $ , 4 @ T Z b , ( " A ! $ A ! $ , @ A & * & ( A a & 4 DW0700 , ( $
0x11c428…11c5bc Dummy {f00=0x005a, f01=0x0190, f02=» n o z { . @ R d v , ( UUW W A A @ - - ( $ R A @ @ 4 , (
0x11c5bc…11c750 Dummy {f00=0x005a, f01=0x0190, f02=» F l R H D ! F J n T @ 5 GP K R Q Z YWp iT y P H D !QF P 0 P 0 P P P * P ) /R6 7T. AP* & T Z H D ! , T T Pf T H P T H P2 H D !: P %T 7 > C I
0x11c750…11c8e4 Dummy {f00=0x005a, f01=0x0190, f02=» T 0 QT" aT mW P. T T R P H D !: T W P * W * # * ) 0 +T ; $ =P AW E 0 F H D ! G Y P ]T& a gT qW }R W T2 P W& P$ 2 P H D !P P T P Q W T
0x11c8e4…11ca78 Dummy {f00=0x005a, f01=0x4044, f02=» < R " B D ! " G L I J v l .@ @ D !: T W P * W * # * ) 0 +T ; $ =P AW E 0 F H D ! G Y P ]T& a gT qW }R W T2 P W& P$ 2 P H D !P P T P Q W T
0x11ca78…11cc0c Dummy {f00=0x005a, f01=0x018e, f02=» J F IDENT DRTP02 REL 8.2 78-09-15 870105040820 TPADY R TPADY b , ( !"$&;<>@ t DWTOR , ( ! ^_ 9: X ! Y DISIOE , ( @ = M $P ^
0x11cc0c…11cda0 Dummy {f00=0x005a, f01=0x0190, f02=» , ( W X ! T B R Q B D OUTPUT 8 , ( ! V ! W ! ! Y J , ( T ! V " ! z , ( B C ! T " T W Q " DISEND , ( T ) !
0x11cda0…11cf34 (1, 206) Dummy {f00=0x005a, f01=0x0190, f02=» _ D ! P | , ( ! P W C V B P ! , ( " ! ! Y 4 L , ( R Q " P _ " P R M T | , ( @ ! L ,! :D" ! Y Y , ( U ! _$ W , ! T
0x11cf34…11d0c8 Dummy {f00=0x005a, f01=0x0190, f02=» W P W , ( s@@ X R ! Y # ! , TDISP , ( : R _ 4 ! l * & ! " T ! ! , ( 4 X # 4 Y # ! " " P ,$
0x11d0c8…11d25c Dummy {f00=0x005a, f01=0x40fe, f02=» Q V W ` T V T l H D ! p T W Q T + 1P 3Q 9W K x W ] sT P P W ( H D ! V P RN Q PH P R: T2 U W4 T )R /U =W QRD t $ UP [P cW2 wR R T P @ P ,$
0x11d25c…11d3f0 Dummy {f00=0x005a, f01=0x0190, f02=» J F IDENT DRCC01 REL 8.2 78-09-15 870106240821 H D ! IHCC1 IHCC2 IHCC3 DWCC01 DWCC02A DWCC03A C1DRON C2DRON` C3DRON R DISIOE , ( I P Y ECBRL ECBBA * &
0x11d3f0…11d584 Dummy {f00=0x005a, f01=0x0190, f02=» n , ( w Y : V ! _$ Y 4 ! , ( ! : Y 4 Y 0 X > , ( 2 X 0 ! P Y R ! n , ( _ Y 0 X 2 X 0 ! , ( @A ! Y 0 X 0 , ( 2
0x11d584…11d718 Dummy {f00=0x005a, f01=0x0190, f02=» w ! _& ! P U Y Z , ( U Y < P Y ` _0 X +T . , ( ! _j ! V X (R X D" T ! ! ^ , ( ZJ9 R Y < , Y +T _t X , ( D: Z|W ! ! _ = Y < , ( X + -P X (R
0x11d718…11d8ac Dummy {f00=0x005a, f01=0x0190, f02=» ! W ! T Y TT Y R ~ , ( U Y L ! P Y N X + , ( T ! U X (V W ! N , ( Y F ^ U Y P _| ~ , ( X 0P B : Y ( ! Q Y 2W , ( : V Y R ! ! _$ Y + !
0x11d8ac…11da40 Dummy {f00=0x005a, f01=0x0190, f02=» pT Y n , ( n V Y l Y j W , ( @ ? R W W Y + Y < X > ECBEL n , ( (R C C X X F ? R ~ DISEND SETIMP , ( Y D Y Y ? Y $ 6 TDI
0x11da40…11dbd4 (1, 207) Dummy {f00=0x005a, f01=0x0190, f02=»W X + r , ( k P W ! OP Y Y xW X + , ( " U Y zW R ! _ O B , ( P Y W : V X D: R Y |W Y r , ( +P Y ~ X rP Y W Y r 4 , ( 4 ) 4 W W W W W 9D! , (
0x11dbd4…11dd68 Dummy {f00=0x005a, f01=0x0190, f02=» B r , ( g B 4 Y Y " Y $ SAVE8 @ , ( D &T E @ E , e . P IHCC1 INTSAV IHCC2 , ( H$ A W A IHCC3 * & W
0x11dd68…11defc Dummy {f00=0x005a, f01=0x0190, f02=» B X (R B X X $ 4 C1DRON ( & C2DRON` 2 : C3DRON < N , ( )A W W b , ( C W Y . 0T 6 , ( a 0T W - L Q , (
0x11defc…11e090 Dummy {f00=0x005a, f01=0x0190, f02=» B ! * !OT ! R , ( ' Q R ! >_ ' Q R ! " , ( _ ! T < V X D< R R , ( ; Y + 4 X H ! 2 Y < , , ( ? [ # 4 = "178? > R F X B B , DWCC01 , ( { 6 H F R
0x11e090…11e224 Dummy {f00=0x005a, f01=0x0190, f02=» ( $ & DWCC02A R , ( f , ( 7 s t { A , ( W A I , ( w
0x11e224…11e3b8 Dummy {f00=0x005a, f01=0x0190, f02=» s t { A , ( A I $ , ( T ! H D !Y ] P l t !V +R M Q Y _T6 e o }V H D ! ?
0x11e3b8…11e54c Dummy {f00=0x005a, f01=0x0190, f02=» B 2 P U U P T B > V< R6 T. H D ! > 2 R T W > 2 P #R -T 3W 9T A KT O > H D !b UR ] a gT mR P & W T T U $ P H D ! T U V W U P
0x11e54c…11e6e0 Dummy {f00=0x005a, f01=0x0190, f02=»W> R@ W2 W R )V - > /W n H D !L 9R4 = > GU MW Q B U * [R aW kPz mW s F yP WN U WR R * H D ! F P W V R& W P P W WT WP WL WH WD W< W8 v H D ! W4 W0 W, %W )W -W 1W =W AW IW [P ]S T W
0x11e6e0…11e874 (1, 208) Dummy {f00=0x005b, f01=0x4058, f02=»Q6 R Q$ R Z ( $ F ! F )T /V 7R _ * * B@ T F yP WN U WR R * H D ! F P W V R& W P P W WT WP WL WH WD W< W8 v H D ! W4 W0 W, %W )W -W 1W =W AW IW [P ]S T W
0x11e874…11ea08 Dummy {f00=0x005b, f01=0x0190, f02=» J F IDENT DRDU01 REL 8.2 78-09-15 870105040820 4 0 DUADR DUONY IHDU1 IHDUY IHDU2 DWDU01 DWDU02 R DUADR , ( DWTOR , ( - A X !
0x11ea08…11eb9c Dummy {f00=0x005b, f01=0x0190, f02=» :e X Y, X P Y ! 9 V ! 9 , ( R Y P P 0 , ( U ! ! ! P _ X @ F ` , ( ! ! ! P _ ! ! , ( ! P _ X b | , ( )@ X # P C
0x11eb9c…11ed30 Dummy {f00=0x005b, f01=0x0190, f02=» c X :B X ! TDISP SAVE8 0 DUONY @ INIFLGL R , ( H E Y Y Y d DWTST TENDIOC , ( A @ P Y ! , ( @" _. @ X"_6 X R
0x11ed30…11eec4 Dummy {f00=0x005b, f01=0x0190, f02=» INTSAV , ( H _d A _ A , ( / I D 9AZV9a X V # T X X @ DWTECB p , ( O X X ' 4 T B C , ( k @ @ X P X " I , ( I X Y Y !
0x11eec4…11f058 Dummy {f00=0x005b, f01=0x0190, f02=» X T r , ( Y _f X Y Y DWDU02 B DWDU01 V , ( 4 j , ( 7 B B r s W H D ! . C EP IP O z SPF WP [P _P
0x11f058…11f1ec Dummy {f00=0x005b, f01=0x410e, f02=» ^ : ! ^ % , /P ; ^ EW OP QW ] ( a * x H D ! . g : mW, qW( u W W : $ P$ R 4 H D ! P - = 8 ?V ET cT uP 8 T : TJ ( $ , P P P T 8 8 @
0x11f1ec…11f380 Dummy {f00=0x005b, f01=0x018e, f02=» J F IDENT DRCG01 REL 8.2 78-09-15 870105040820 CGADY R CGADY b , ( 13 " 87& t DISIOE , ( @ ! Q P DWTST , ( ? 8! T X
0x11f380…11f514 (1, 209) Dummy {f00=0x005b, f01=0x0190, f02=» f , ( W >P T W P T X W , ( T P _ P W @9H Y 8 ECHEND h DISEND z , ( ! X P y Y OUTPUT , ( B ! Y &_| R T !; P , (
0x11f514…11f6a8 Dummy {f00=0x005b, f01=0x0190, f02=»_n B *0 p , ( oB ! W X " T ! P , ( Q ~ X P 9A_ P @ , ( P R T " B ~ C _F _J p , ( " # R _ C _ _r _ , ( _~ X T R _~ _ Z , (
0x11f6a8…11f83c Dummy {f00=0x005b, f01=0x0190, f02=» C p , ( g _j B ! _ X X~ RP X_Z , ( @ Y X $ ! v W W ! @ , ( Y _ <l$ " X V p TDISP , ( $ T P P 4T Y , ( P ! Y
0x11f83c…11f9d0 Dummy {f00=0x005b, f01=0x0190, f02=» X X $ SAVE8 , ( Q"@ Y _ X R X X 0 , ( k P T X T X ~ X ` DWTECB` , ( D <C _ Y _ RTNA15 , ( C z B = 8
0x11f9d0…11fb64 Dummy {f00=0x005b, f01=0x418a, f02=» ) + - X H D ! @ 5P CT OP WWv ]P cR iPd mW` sQ y T T P: T W0 P* H D ! T W& P" T W T P P< WH P R< T P T %W ) ` H D ! 1 ` 9R C b uW }T PX Q P PD P R T R T R P H D !@ %PN ) /P
0x11fb64…11fcf8 Dummy {f00=0x005b, f01=0x0190, f02=» J F IDENT DRCD01 REL 8.2 78-09-15 870105040820 CDADY R CDADY b DISIOE t GETCHR , ( P OUTPUTA DWTST * & T Y _ ! _ X
0x11fcf8…11fe8c Dummy {f00=0x005b, f01=0x40a0, f02=»E8 , ( O R ! e@ X Z _ : 0 , > ` T P T =W CR GT WR V n @ P OUTPUTA DWTST * & T Y _ ! _ X
0x11fe8c…120020 Dummy {f00=0x005b, f01=0x8190, f02=» J F IDENT DRDC15 REL 9.1 78-09-15 870106440911 . * DC15ADK IH1501 IH1502 DC15ON DW1500 R DC15ADK , ( 5 P P P P P P P W DISIOEC TDISP ,
0x120020…1201b4 (1, 210) Dummy {f00=0x005b, f01=0x8190, f02=» P @ | DWTST , ( 2 ! T % A A Y , TENDIO DWTECB n , ( _j _t X , ( P , Y C L C _ , ( _ P C C _T
0x1201b4…120348 Dummy {f00=0x005b, f01=0x8190, f02=»P A Y W Y DWTOR " , ( { @ X T ) _ B X" A 2 , ( Y _4 Y X b , ( P : X H A , ( @ Z A _` X P ( y Y , ( W (P 0
0x120348…1204dc Dummy {f00=0x005b, f01=0x8190, f02=» _R (P _ ) 1_f , ( i X X _x (P _ , ( ) 1_ (X P _ 0 ) P , ( $ _ _2 _" _> _0 , ( (P _ ) 1 4 X R X , ( T X P , Y C L
0x1204dc…120670 Dummy {f00=0x005b, f01=0x8190, f02=» p a > q , , ( BHBB . ! 2B ! J , ( T P P z , ( ! T T A P A T ! T , ( ! T T ! T ! A I A ,
0x120670…120804 Dummy {f00=0x005b, f01=0x8190, f02=» j , ( @ e @ rP @ X@ ! T A v ! , ( A@ @ pP @ P @ n 0 8 ! ! : , ( ! A z_< ! X8_ A v @ @ j , ( T 1 T 0 2P P P A TEBCDI , ( @ l 8 H @ P E P
0x120804…120998 Dummy {f00=0x005b, f01=0x8190, f02=» ! l , ( U X ! X ! W A r @ l X , ( s A x A n A z ! @ < , ( p @ rP ! ! @ pT @ rX l , ( ( W @ n @ v @ @ A ! , ( @ pX< ! T @ zP ! ! , ( _V
0x120998…120b2c Dummy {f00=0x005b, f01=0x8190, f02=» ! XD Y _N X ! P , ( k ! # T @ T ! _ ! ! * , ( ( _ A r A H E A v A l 4 ! Z , ( * @ P ! ! A p @ T , ( J ! _ T _ ~ A n B , ( T B A A A A
0x120b2c…120cc0 Dummy {f00=0x005b, f01=0x818e, f02=»T T Y v , ( ( W W ~ P C @ , ( U u h A p A n 4 @ @ vT F , ( J @ A @ A A v ! T v , ( P P P P P 1 , ( P A @ ]6W P _@ @ @ , (
0x120cc0…120e54 (1, 211) Dummy {f00=0x005b, f01=0x8190, f02=» f , ( U ! @ ! ! ! B J ! , ( T u 4 ! ! @ @ A 8 , ( @ @ T @ ! 8 ! @ xP - ! h , ( x ! W 0 " @ xP R , ( W ! P " ! " :A *@ H , ( T 0
0x120e54…120fe8 Dummy {f00=0x005b, f01=0x818e, f02=» ! " ! ` A t _" A v A n , ( s ! ! % ! R ! ! @ ( , ( ! 8 ! X ! 9a D ! X , ( @ X ! P ! T & ! _b B J B ! IH1501 INTSAVL SAVE8 , ( H ! 4 A
0x120fe8…12117c Dummy {f00=0x005b, f01=0x818e, f02=» , ( % " P A v . A 4 A , ( E _(" P H B P W ! ! 4 , ( c 4 _$ ! ` ! 1 4 A x @ d , ( ` @ P 0 M A x DC15ON * & 4 @ ` @ P $ Y , (
0x12117c…121310 Dummy {f00=0x005b, f01=0x8190, f02=» f , ( $ A 4 A . ! @ @ pP ! @ , ( T 5 ! @ P a A 4 A A 8 , ( U A ?a :a# P @ @ h u @ 4 , ( * A | ! ` ~ ! ` A | @ ~:H DW1500 , ( 4
0x121310…1214a4 Dummy {f00=0x005b, f01=0x8190, f02=»P A A p , ( : @ - R A @ @ : 4 @ , ( =W :f"? H ! h "? H ! h 4 T , ( =w ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^ , ( = -/STUVWXYZ|,%_>?0123456789:#@'=" , ( =
0x1214a4…121638 Dummy {f00=0x005b, f01=0x818e, f02=»P g sP Z H D !w P. = = z T = = z P P # ' H D ! o 3 T EP W cP g n m v uW T P h p b H D ! n n P W P + P: R. %T& -P" O W ]P k+ o+ H D ! ? u2 P
0x121638…1217cc Dummy {f00=0x005b, f01=0x8190, f02=» H D ! { j TL j TD T@ ` T8 ` P z # z 'T + / ` H D ! 9 ` ? < IP OP U 4 c < iP m s wT> 8 P" P 4 P H D ! ` T P P Pt P PF R@ T8 7P GW U e & H D !l gW6 < P L < T
0x1217cc…121960 Dummy {f00=0x005b, f01=0x8190, f02=» T < T x 9PB ?R< GP KT0 OT WW cP H D ! T j T2 P4 PJ PL P4 P. W P P @ < H D ! !T %W )W 7W ;W ?W O W h _ h e R k R u: { F T( H D ! R h h P h =Z W P4 R W, h T h
0x121960…121af4 (1, 212) Dummy {f00=0x005c, f01=0xc112, f02=» Pb L %: )P MP UP WW l H D ! [ L _: = = = P = = = P T /P AP ( H D ! O | S ~ W eP q | u ~ y + + + 2 : =V: W : =V: W : P&: =V: =X t 8 4 : : : =R: R : : : : : =V: =X: : =c=v=o=v= = = = =
0x121af4…121c88 Dummy {f00=0x005c, f01=0x0190, f02=» J F IDENT DRDC17 REL 9.1 78-09-15 870103140820 F B DC17ONK IH1701 IH1702 IH1703 IH1704 IH1705 IH1706L IH1707 R . * IH1708 DW1701 DW1702 DW1703 DW1704 DWTST , ( X P P P P P
0x121c88…121e1c Dummy {f00=0x005c, f01=0x0190, f02=» , ( ; B P A Y , ( U X X X* Y ! 4 , ( u @_D! XJ X P P _V Y Y d , ( Y p Y X t Y Y , ( Y Y ! X B P A , (
0x121e1c…121fb0 Dummy {f00=0x005c, f01=0x0190, f02=» Y Y 8 2 , ( K ! @ 4 Y 2 $ , ( @ i Y P _2 ! 8 ! " T , ( P W Y Y 4 ! DC17ONK , ( 4 ! Y Y Y Y 4 , ( @
0x121fb0…122144 Dummy {f00=0x005c, f01=0x0190, f02=» , ( D X Z. X Y6 Y Y ! , ( ; _F 7T Y _ " Xb 8 , ( Y _T X D -P < h , ( @ y ! , pT k V , ( _ P = r , ( ! Y
0x122144…1222d8 Dummy {f00=0x005c, f01=0x018e, f02=» Y Y z , ( @ |P kP 2 X X , ( ) P _N J , ( GH B D ! X Y z , ( a " = < X Z X , ( ! } _ < ! R kT ,
0x1222d8…12246c Dummy {f00=0x005c, f01=0x0190, f02=» h ECBRL , ( R X Q ! &P P TASCII H , ( D B V H 1 _B Y Z ECBEL * & - @W Y ! T C , ( I Y P ! Y , ( e Y
0x12246c…122600 Dummy {f00=0x005c, f01=0x0190, f02=» Zv X P _ ! , ( ! Y ! Y X ( , ( ! ! B X , ( B U 0 " &Q TEBCDI , ( 9 2V V H ! _( B , ( U D
0x122600…122794 (1, 213) Dummy {f00=0x005c, f01=0x0190, f02=» Y X Z& @ X , ( Y ! _8 * , ( _" Y ! ! ! Z , ( Y r ! Y , ( + ? Y > ! 2 ! , ( I 2 ! 2 ! 4
0x122794…122928 Dummy {f00=0x005c, f01=0x0190, f02=» Y _L k_ p Y z , ( _ |_" Y Y 4 X P y Y , ( > X X y Y _ X X y Y J * & _& Y X ! ! "@P X z , ( R ' X 1 4 , ( C Y 2W ! Y T ! , (
0x122928…122abc Dummy {f00=0x005c, f01=0x0190, f02=» IH1701 INTSAVW , ( H ! l ! l 4 A $ , ( J X ! X X X X T IH1702 IH1707 IH1708 IH1705 IH1706L IH1703 IH1704
0x122abc…122c50 Dummy {f00=0x005c, f01=0x0190, f02=» $ 1 S = , u B J J B B B B J DW1704 p j DW1703 p ~ DW1702 p , ( m Y : W Y : W , ( P Y : Y < X P - 6R
0x122c50…122de4 Dummy {f00=0x005c, f01=0x0190, f02=» P P " $ & " * $ t H D !V ( & P P " " 0 H D !e P # , + F 1 9 H A I @ O ] | c k H mP q w @ | H D ! P W H L D . P& . @
0x122de4…122f78 Dummy {f00=0x005c, f01=0x0190, f02=» l b ` H D !8' & T8 " P P& & % ) " +P / 3 7 H D ! , C a " e q b T ( ( & " b T P h H D ! S R Q P P Vx + -W 5 9 ;TJ C O & SP W _ H D !. e
0x122f78…12310c Dummy {f00=0x005c, f01=0x0190, f02=» L H D ! " @ " @ $ $ @ @ " H D ! $ P @ ' + J 5 V ; A l G R M R S R Y @ _ T H D !> c N g F k @ u y P R R N F $ , & R , & L H D ! D P
0x12310c…1232a0 Dummy {f00=0x005c, f01=0x4072, f02=» 2 2 / 1 2 }W W P. R @ @ n
0x1232a0…123434 (1, 214) Dummy {f00=0x005c, f01=0x0190, f02=» J F IDENT DRDC81 REL 8.2 78-09-15 870105040820 F B DC81ONK IH8101 IH8103 IH8105 IH8107 IH8109 IH8111L IH8113 R F B IH8115 IH8117 IH8119 IH8121 IH8123 IH8102L IH8104 IH8106 F B IH8108 IH8110 IH8112 IH8114R
0x123434…1235c8 Dummy {f00=0x005c, f01=0x0190, f02=»120 DW8122O DW8124 DW8101 DW8103V DW8105V z F B DW8107M DW8109 DW8111O DW8113 DW8115 DW8117W DW8119 DW8121 4 DW8123 ~ DW81021 , ( 2 ! -
0x1235c8…12375c Dummy {f00=0x005c, f01=0x0190, f02=»123 IH8124 DW8121 " DW8122O 6 IH8121 J IH8122 ^ DW8119 r DW8120 IH8119 IH8120! DW8117W DW8118 IH8117 IH8118a
0x12375c…1238f0 Dummy {f00=0x005c, f01=0x0190, f02=»113 IH8114R DW8111O " DW81122 6 IH8111L J IH8112 ^ DW8109 r DW81102 IH8109 IH8110 DW8107M DW81082 IH8107 IH8108
0x1238f0…123a84 Dummy {f00=0x005c, f01=0x0190, f02=»103 IH8104 INTSAVP " ILLINTV 4 DISIOE F DWTST X , ( { T A P X h TENDIO TDISP , ( ! T 8!@X " , ( @X ! @ @ Y
0x123a84…123c18 Dummy {f00=0x005c, f01=0x0190, f02=» 6 E 6 Y z SETIME , ( ) 2 Y 4 X ( ! ! Y , , ( G ! y W Y X ( ! ! * & g T X ! T Y ] SETIMP , ( X ( DWTECB
0x123c18…123dac Dummy {f00=0x005c, f01=0x0190, f02=» ECBCW , ( B X ( ! T B ECBBA @ , ( AR _: _@ b P DWTOR * & @ X ! " Q R Y , ( Y X ! 8X @ DC81ONK < , ( 5
0x123dac…123f40 Dummy {f00=0x005c, f01=0x0190, f02=»! " B X r , ( ( ! Y _^ > X , ( ( Y 2 ? @ ? B , ( @ j y X V ! r , ( ! _" ! * * X ! , ( P P P P X # , (
0x123f40…1240d4 (1, 215) Dummy {f00=0x005c, f01=0x0190, f02=» s # X " 6 ) X 2T Y 2W , ( @ ! Y ,ZD X 4T X " 6 Y 4 0 * & @ W ] & ` , ( ! X ] _ ! , ( B ! P ! , ( ] &
0x1240d4…124268 Dummy {f00=0x005c, f01=0x0190, f02=» 4P $^ T 6 _ $R ~ , ( q @ Y 4 Y 4 ] W Y 2 , ( @ ] Y , c " ! ! N , ( V ! ! Y ,Z ! ~ , ( b # y 2 X 4T X 2 Y 4 , ( & P P !
0x124268…1243fc Dummy {f00=0x005c, f01=0x0190, f02=»R T Y n , ( _ . P X B - ECBRL > , ( } B ]0 ! R Y . P ! R N , ( P ! ! Y ,V ! ~ , ( C ! P X& , ( @ R ! ^ C ! !
0x1243fc…124590 Dummy {f00=0x005c, f01=0x0190, f02=» Y . n , ( Q ! ! Y , ! X , ( q ! Y 0 Y ,^V ! _& ! X . > , ( ! ! C ! ! R n , ( T Y 0 C Y ,^ _4 ! ! , ( C X , ( @
0x124590…124724 Dummy {f00=0x005c, f01=0x0190, f02=» = 6 ) X 4 Y 4 @ ! * & ] ! P ; T X . , ( { 2 Y X ( Y , ( A Y Y ! , ( @ X P y Y Y 0 C B * & Y , Y . !
0x124724…1248b8 Dummy {f00=0x005c, f01=0x0190, f02=» X . ! ! z , ( E Y 0 ! ! V ! C Y , ( c , ! _" T ! ! ;P J , ( X 0P 1 : B B ! z , ( @ X _Z ! T Y , , ( @ Y 0 C C ,
0x1248b8…124a4c Dummy {f00=0x005c, f01=0x0190, f02=» 4 j , ( 5 ! ] ! ] 4 ! 4 , ( U ! ! ! ! 4 ! 4 ! : , ( u _ ! 4 ! _* ! 4 ! Y 0 X j , ( 0T W 1 ! _L < B , ( $ 4 8 B T W 4 Y ] ! , ( !
0x124a4c…124be0 Dummy {f00=0x005c, f01=0x0190, f02=» Y Y " Y $W 8 I ] , ( Q ] " ] " ! ! * , ( o Z X } ] 4 ] ] Z , ( @ $ ] " (_H ! , ( R " I R 4 _ ] ] " ] IH8101 , ( $
0x124be0…124d74 (1, 216) Dummy {f00=0x005d, f01=0x018e, f02=» + P ] P } ] ! , ( K P ! P C . IH8102L | ^ , ( e"@ P C A r , ( X X " X $ X ( * , ( 4 X 6 6 , P ! P , (
0x124d74…124f08 Dummy {f00=0x005d, f01=0x0190, f02=» , ( WX [ ]^ ab d gh k mn p s u , ( = @v yz | * Y X 4 , ( [ ( * ! Y ! y d , ( y W Y X ( * ! ! T , ( ] ] $ C ! ! 4 , ( " ! &
0x124f08…12509c Dummy {f00=0x005d, f01=0x0190, f02=» Y ! , ( / X ( X $ _ _ 9D ! P " M ;a ! 4 R H D !~u T / T ] P T P* P, t H D ! 6 F 5 9 A R K QW c gT6 oT
0x12509c…125230 Dummy {f00=0x005d, f01=0x0190, f02=» Y ] R aR, X H D ! e k o N T: W4 T W P0 W 9P AVH H D ! ]P eT oR W R VH N T P6 P #T G ` H D !#& ITJ ST@ W YRP [T8 eP m R P R P Vt H D ! v P6
0x125230…1253c4 Dummy {f00=0x005d, f01=0x0190, f02=» ! a gPN } N P 4 & P6 P, P P )W 3 & ; H D ! A & K O R SV W k j sT: w { P` P N T" 4 & L H D ! & 8 ! & ' & - & 1 7 E & W & ] & c & g H D ! b s & & & T W & L T
0x1253c4…125558 Dummy {f00=0x005d, f01=0x405e, f02=» T P B Rb P V P P B R. " | KP 8 ^ H@ ZV W k j sT: w { P` P N T" 4 & L H D ! & 8 ! & ' & - & 1 7 E & W & ] & c & g H D ! b s & & & T W & L T
0x125558…1256ec Dummy {f00=0x005d, f01=0x0190, f02=» J F IDENT DRTP03 REL 9.1 78-09-15 870106640911 TPAD3 R TPAD3 b , ( 9:$%& X " X t DISIOE , ( @ ! # Y Y M P ^ , ( ? L
0x1256ec…125880 Dummy {f00=0x005d, f01=0x0190, f02=» ! X ! P X #! T x *! , ( x *# Y " ! P B & , ( B Y , L ! +T X % Y $W Y V , ( $ ," L ! T *@ X -' T , ( Y , ! T ! X , ! ! , ( 7 W ! T ! P _P
0x125880…125a14 (1, 217) Dummy {f00=0x005d, f01=0x0190, f02=» T Y " X # v , ( Y V ) P ) T " P ) C DISEND F , ( " ! _ ! X X ! X , ( 9B Y ! 5 ! B X0 X *X6 , ( $" Y> Y " X #$ U ! , ( + W ! ! B
0x125a14…125ba8 Dummy {f00=0x005d, f01=0x0190, f02=» ,! W 9d ! 9D x , ( - :d ! B 9h ! Y Y & ! , ( ! W ! < ! B Y * ! H , ( ! ! X ! ! x , ( 4 ! ! 4 ! ! , ( ! 4 B R Q W X ' T W B , (
0x125ba8…125d3c Dummy {f00=0x005d, f01=0x0190, f02=» h , ( XD XJ XP_J ! 4 , ( , ! 4 X - T 7 W 8 , ( Y - 4 9 4 9 4 P h LDREG , ( P "@ T Y ":e X $ Y TDISP SAVE8 , ( $
0x125d3c…125ed0 Dummy {f00=0x005d, f01=0x0190, f02=» % , ! , ! ! @ T Y " X , ( # Y X Z X $ P @ P W ( T X " . X H D ! 5P C D E b G b I b K t M t O t Q S U F W F Y Z z H D ! [ Z ] Z _ a e k o s yP } 2 "
0x125ed0…126064 Dummy {f00=0x005d, f01=0x4124, f02=»P T P 2 ^ H D ! !U +W ; I O W ] c yT W T W H D ! W +R> -Q 1W0 ;T& =W, KQ f H D ! OP QV UP sQ T T W P P T 5P mP T P P W T
0x126064…1261f8 Dummy {f00=0x005d, f01=0x018e, f02=» J F IDENT DRDC22 REL 9.1 78-09-15 870106540911 4 0 DC22ADK IH2201 IH2202 DC22ON DCFCY DW2200 R DCFCY ` DC22ADK , ( 3 P P P P P P P W DIS
0x1261f8…12638c Dummy {f00=0x005d, f01=0x0190, f02=» * & @ % A A , ( _H _R X T _^ $ Y 6 , ( C D C T f , ( W X X X y Y , ( _ P C _p _ B DWTECB , (
0x12638c…126520 Dummy {f00=0x005d, f01=0x0190, f02=»X2 Y Y C , ( y f B ,X: P _ B ( SETIME X , ( -_r C Y _ B P A j * & @ Y W Y @ X , ( T ) B X$ A , ( @ Y
0x126520…1266b4 (1, 218) Dummy {f00=0x005d, f01=0x0190, f02=» _ @ P X R X 1T , ( @ g H P X M ( , ( _B (P _ ) 1_V X X , ( X _h (P _ ) 1_~ , ( (X P _ 0 )_ _2 , ( _" (P _ ) 1 4
0x1266b4…126848 Dummy {f00=0x005d, f01=0x0190, f02=» X _" A A x , ( [ A A A W , ( { > H x , ( 1 1 , ( 0 > ; = , (
0x126848…1269dc Dummy {f00=0x005d, f01=0x0190, f02=» [ ! A A A ! , ( { P P M _$ ! . , ( ' ! @ @ 0T ^ , ( P L _ @ P @ P , ( @ @ T X ! T ! T P , ( A P T _ A
0x1269dc…126b70 Dummy {f00=0x005d, f01=0x0190, f02=» A Q ` Q ! ~ , ( w 4 @ P @ T A W A _ 0 , ( B ! ! ! @ N , ( A @ A X R X T ~ , ( C P C T , ( @ ! C W ! X $
0x126b70…126d04 Dummy {f00=0x005d, f01=0x0190, f02=» @ n , ( k P ! A ! ! @ PT , ( @ @ P ! @ P ! @ > , ( BB @ P 8 A p A ! _T @ T n , ( H@ @ T @ X T @ p X , ( R X T _B ! _ @ @ , ( !
0x126d04…126e98 Dummy {f00=0x005d, f01=0x0190, f02=»@ g A X ! P A ! p X , ( @Z X A B A . , ( B P A A ! A p @ ^ , ( P @ ! _N @ @ ! W , ( P B A ! p @ P ! , ( ! @ P ! @ P
0x126e98…12702c Dummy {f00=0x005d, f01=0x0190, f02=» A 4 ! A @ X ~ , ( @ , , ( P _ Y , T ! p ! N , ( p @ rP 4 Y Y ! 4 ~ , ( UP @ @ @ @ P , ( " B P A @ P A ! p
0x12702c…1271c0 Dummy {f00=0x005d, f01=0x0190, f02=» n , ( * q W @ N A 4 A , ( P A W ! ! @ ! @ > , ( ! @ ! W A n , ( J A W @ A @ P _^ @ P _f , ( ! W A A W , ( T A
0x1271c0…127354 (1, 219) Dummy {f00=0x005d, f01=0x0190, f02=» H q B J 4 A @ A A ! @ , ( ! L ! A @ A . , ( @ Xl B XvW ! M ^ , ( ! @ M ! @ M , ( ! @ M ! @ P A , ( A M ! 1 M !
0x127354…1274e8 Dummy {f00=0x005d, f01=0x0190, f02=» o ZB ! ! 4 IH2201 , * & nJ T ! 4 ! @ IH2202 n , ( n_ I ! " P @ A * & 4A _"B P W ! T , ( * 9AY X 2 _ ! 9AP ^ 2
0x1274e8…12767c Dummy {f00=0x005d, f01=0x0190, f02=» X A 0 @ A B J DW2200 v $ , ( H _ ! _$ A a 4 8 h , ( A W A W
0x12767c…127810 Dummy {f00=0x005d, f01=0x018e, f02=»$K H D ! R 2 7P ;Pr ?P CP GP" KP OP QW UP YP ]P e sR {P H D !_ W" v P $. $T $. $2 T T W H P b H D ! 5 + IPT MT, OP [ k P P W~ T H D ! P
0x127810…1279a4 Dummy {f00=0x005d, f01=0x0190, f02=» H D ! } k mW 0 b t P ! ' + / v 1P 9 H D ! = A I MR UP [ _ c u y PN P P H D ! T P P T T T P P4 T P 'Qt 9P GP H D !Lp MQN Y [TP _TL s { }P
0x1279a4…127b38 Dummy {f00=0x005d, f01=0x0190, f02=» TB T* T p R T H ^ p )P - H D ! u 9 , AP K p QTz WTb aP qP y P8 N H ^ W 0 P ^ < H D ! p P H P ' s P T P P, P" P N H D ! , 1PT ;PJ AR@ IP MT4 QT YW gP qW W v
0x127b38…127ccc Dummy {f00=0x005d, f01=0x410a, f02=» v P ! %W" l H D !~ +P 9 E ] m { T P P W P ( H D !s T $0 #$0 +$0 -P ?T E P $* W $* W P& $* $, t 0 , $& R $* $, $/$4$1$2 $T @
0x127ccc…127e60 Dummy {f00=0x005d, f01=0x0190, f02=» J F IDENT DRDC15 REL 9.1 78-09-15 870106440911 . * DC15ADK IH1501 IH1502 DC15ON DW1500 R DC15ADK , ( 5 P P P P P P P W DISIOEC TDISP ,
0x127e60…127ff4 (1, 220) Dummy {f00=0x005e, f01=0x0190, f02=» P @ | DWTST , ( 2 ! T % A A Y , TENDIO DWTECB n , ( _j _t X , ( P , Y C L C _ , ( _ P C C _T
0x127ff4…128188 Dummy {f00=0x005e, f01=0x0190, f02=»P A Y W Y DWTOR " , ( { @ X T ) _ B X" A 2 , ( Y _4 Y X b , ( P : X H A , ( @ Z A _` X P ( y Y , ( W (P 0
0x128188…12831c Dummy {f00=0x005e, f01=0x0190, f02=» _R (P _ ) 1_f , ( i X X _x (P _ , ( ) 1_ (X P _ 0 ) P , ( $ _ _2 _" _> _0 , ( (P _ ) 1 4 X R X , ( T X P , Y C L
0x12831c…1284b0 Dummy {f00=0x005e, f01=0x0190, f02=» p a > q , , ( BHBB . ! 2B ! J , ( T P P z , ( ! T T A P A T ! T , ( ! T T ! T ! A I A ,
0x1284b0…128644 Dummy {f00=0x005e, f01=0x0190, f02=» j , ( @ e @ rP @ X@ ! T A v ! , ( A@ @ pP @ P @ n 0 8 ! ! : , ( ! A z_< ! X8_ A v @ @ j , ( T 1 T 0 2P P P A TEBCDI , ( @ l 8 H @ P E P
0x128644…1287d8 Dummy {f00=0x005e, f01=0x0190, f02=» ! l , ( U X ! X ! W A r @ l X , ( s A x A n A z ! @ < , ( p @ rP ! ! @ pT @ rX l , ( ( W @ n @ v @ @ A ! , ( @ pX< ! T @ zP ! ! , ( _V
0x1287d8…12896c Dummy {f00=0x005e, f01=0x0190, f02=» ! XD Y _N X ! P , ( k ! # T @ T ! _ ! ! * , ( ( _ A r A H E A v A l 4 ! Z , ( * @ P ! ! A p @ T , ( J ! _ T _ ~ A n B , ( T B A A A A
0x12896c…128b00 Dummy {f00=0x005e, f01=0x018e, f02=»T T Y v , ( ( W W ~ P C @ , ( U u h A p A n 4 @ @ vT F , ( J @ A @ A A v ! T v , ( P P P P P 1 , ( P A @ ]6W P _@ @ @ , (
0x128b00…128c94 (1, 221) Dummy {f00=0x005e, f01=0x0190, f02=» f , ( U ! @ ! ! ! B J ! , ( T u 4 ! ! @ @ A 8 , ( @ @ T @ ! 8 ! @ xP - ! h , ( x ! W 0 " @ xP R , ( ~T }T T W ! , ( P "
0x128c94…128e28 Dummy {f00=0x005e, f01=0x018e, f02=» 0 ! A ! " ! " , ( P s ! ` A t _" A v A n ! ! ( , ( % ! R ! ! @ ! 8 X , ( ! X ! 9a D ! X ! , ( P ! T & ! _b B J B ! ! IH1501 INTSAVL
0x128e28…128fbc Dummy {f00=0x005e, f01=0x0190, f02=» , ( )H A N_ I ! " P A , ( E v . A 4 A _(" 4 , ( e P H B P W ! ! 4 d , ( _$ ! x ! 1 4 A @ ` DC15ON , ( @ @ P 0 M A 4 , (
0x128fbc…129150 Dummy {f00=0x005e, f01=0x0190, f02=» h , ( X A > A 4 A , ( * 7 . ! X @ pP ! @ ! $ @ 8 , ( W P a A 4 A A A ?a h * & w :a# P @ @ @ 4 , ( * A | ! x ! x A | @ :H DW1500 ,
0x129150…1292e4 Dummy {f00=0x005e, f01=0x0190, f02=» W A W P A A , ( : @ - R A @ @ & ; 4 V , ( =o :f"? H ! "? H ! 4 j , ( = ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^ , ( = -/STUVWXYZ|,%_>?0123456789:#@'=" , ( =
0x1292e4…129478 Dummy {f00=0x005e, f01=0x0190, f02=» MP QP SW WP [P _P g sP p H D !w P. = > T = = z P P # ' , H D ! o 3 T EP W cP g n m v uW T P h p x H D ! n n P W P +, P: R. %T& -P" O W ]P k+, o+.
0x129478…12960c Dummy {f00=0x005e, f01=0x0190, f02=» P TR H D ! { TL TD T@ x T8 x P # 'T + / ` H D ! 9 x ? T IP OP U 4 c T iP m s wT> 8 P" P 4 d H D ! x T P P Pt P PF R@ T8 7P GW U e & H D !l gW6
0x12960c…1297a0 Dummy {f00=0x005e, f01=0x0190, f02=» H D !k P $ T < T x $ 9PB ?R< GP KT0 OT WW cP H D ! T T2 P4 PJ PL P4 P. W P P X P H D ! !T %W )W 7W ;W ?W O W _ e j k j u: { ^ T( H D ! P =r W PL
0x1297a0…129934 (1, 222) Dummy {f00=0x005e, f01=0x4132, f02=» P T x ^ T : T Pb d # 6 =: AP H D ! s eP mP oW s d w: = = = P = = = P T < H D ! + 4 GP YP g k o }P +-+.+/3 : =n: W : =n: W D @ { : P&: =n: =p: ; : =j; R ; ; ; ; ; =n; =p; ; ={=
0x129934…129ac8 Dummy {f00=0x005e, f01=0x2008, f02=» L = KMD16 DATE = 781208 PACK NBR = 001 f
0x129ac8…129c5c Dummy {f00=0x005e, f01=0x40ea, f02=» 2 P IDENT TCLASS REL 8.1 78-04-21 870105040810 P* : P* D P* N P ENTRY TCLASS X P* n P* x P* P* P* P* PTCLASS DATA TCLASE-* PTCLASE EQU * P END @
0x129c5c…129df0 Dummy {f00=0x005e, f01=0x2008, f02=» NT TCLASS * * $ * . ENTRY TCLASS 8 * N * X * b * l * v * * TCLASS DATALTCLASE-* TCLASE EQU * END @ 1 INTLT2 INTRT1
0x129df0…129f84 Dummy {f00=0x005e, f01=0x2008, f02=»
0x129f84…12a118 Dummy {f00=0x005e, f01=0x0190, f02=»RESS R z P* A1 IS CHANGED S P* S . PDSLIO LDK A1,DWTDSS S 8 P CF A5,DSPAD S T P LDR* A2,A2 S h P SLL A2,3 S | P LDK A3,128 S P LDKL A4,BUF S P RTN A5 S P EJECT S P* S P********** S P* DSOPCH * S P******
0x12a118…12a2ac Dummy {f00=0x005e, f01=0x0190, f02=» OUTPUT: A2 EOD ADDRESS S , P* A7 EOD-NO (0=NOT OPEN) T P* A1 CHANGED T P PDSOPCH LDK A1,DWTEOD T n P CF A5,DSPAD T P LDR* A7,A2 EOD-NO T P RTN A5 T P EJECT T P* T P********* T P* DSPAD * T P****
0x12a2ac…12a440 Dummy {f00=0x005e, f01=0x0190, f02=»* T P* INPUT: A1 DWT OFFSET U P* A6 DWT ADDRESS U , P* U N " P* OUTPUT: A2 ADDRESS TO DATA U X P* A6 DWT ADDRESS U ~ P* U " PDSPAD LC A2,DWTOR,A6 DRIVE NO U P ANK A2,/3 U P ADR A2,A2 U P ADR A2,A6 U P A
0x12a440…12a5d4 (1, 223) Dummy {f00=0x005e, f01=0x0190, f02=»* m P* n P* TRANSMIT STATUS MESSAGE n P* n 6 P* n @ P IFF STAT=0 n J PTRSTA EQU * n ^ $ P IM XSTA INDICATE 'STATUS SENT' n r P ST A6,FDWTUT SAVE A6 n P CF A5,TRSYNC START OUTPUT n P LDK A2,SOH n P CF A5,WRITE SEND SOH n
0x12a5d4…12a768 Dummy {f00=0x005e, f01=0x0002, f02=»
0x12a768…12a8fc Dummy {f00=0x005e, f01=0x40ea, f02=» 2 P IDENT SCLASS REL 8.1 78-04-21 870105040810 P* : P* D P* N P ENTRY SCLASS X P* n P* x P* P* P* P* PSCLASS DATA TCLASE-* PTCLASE EQU * P END @
0x12a8fc…12aa90 Dummy {f00=0x005e, f01=0x2008, f02=» NT TCLASS * * $ * . ENTRY TCLASS 8 * N * X * b * l * v * * TCLASS DATALTCLASE-* TCLASE EQU * END @ 1 INTLT2 INTRT1
0x12aa90…12ac24 Dummy {f00=0x005e, f01=0x0190, f02=» q h P INR A2,0,CHLCIN READ CHAR r , P RF(NA) IHIN20 NOT ACCEPTED,CHECK STATUS r * P IFF LOGG=0 r Z ( P CF A5,LOGIN LOG RECEIVED CHARACTER r n P XIF r P IFF CODE=1 r P C2 SYNSW r P RF(NZ) IHLCI2 r P CWK A2,SYN SKIP SYNS r P RF(E) R
0x12ac24…12adb8 Dummy {f00=0x005e, f01=0x0190, f02=»BCC FRAME r l P CWK A2,SYNEBC s P RF(E) READ SKIP EBCDIC SYN s ( PIHLCI1 EQU * s L P CF A5,CRCCAL CALCULATE CRC s ` ( P LC A2,TASCII,A2 TRANSLATE TO ASCII s P XIF s PIHIN10 RTN A5 s PIHIN20 CF A5,SST PERFORM SST s P ABL BRM s P E
0x12adb8…12af4c Dummy {f00=0x005e, f01=0x0190, f02=»VE8 SAVE A1 - A8 s * P CF A15,LDREG RESTORE DC REGS A3 - A8 t P RB IHIN10 t F P EJECT t X P* t f P* t p & P* SST INSTRUCTION AND STATUS CHECK t z P* t ( P* CHLC STATUS : BIT 10=CARRIER OFF t , P* BIT 14=THROUGHPUT ERROR t ,
0x12af4c…12b0e0 Dummy {f00=0x005e, f01=0x0190, f02=»T LOG SST INFORMATION t P XIF u P ANK A2,2 u * P RF(Z) SST100 u < P CM XSTA TROUHHPUT ERROR u R P LDKL A5,STB u r P ABL BRM010 u PSST100 EQU * u P ST A1,DCSTCU u * P CF A15,CKMESS CHECK IF STATUS CHANGE u P RTN A5 u P* u
0x12b0e0…12b274 (1, 224) Dummy {f00=0x005f, f01=0x0190, f02=»F TAPE AT POWER ON - l P* . P* . $ PRCOVER EQU * . . P CF A8,SELECT SELECT . B P ANK A3,1 . ^ 2 P RB(Z) IHTRTN NOT LOCKED: RETURN FROM RECOVERY . p P CF A8,LOCK . P RF(NZ) REPER NO CASSETTE . , P LD A1,DWTBKC,A6 ANY BLOCK WRITTEN/READ .
0x12b274…12b408 Dummy {f00=0x005f, f01=0x0190, f02=»K . P* / ( PRC0050 LD A1,SEKBYT,A6 SEQ. COUNTING / P RF(NZ) REPER NO / @ P* / X P EJECT DRTC01 / b P* / z P* / P* R E P O S / P* / * P* REPOSITIONING OF TAPE AT POWER ON / P* AND WRITE RECOVERY / P* / 4 P*
0x12b408…12b59c Dummy {f00=0x005f, f01=0x0190, f02=»S EQU * / $ P LDK A4,8 SET REPOSITIONING BIT 0 " P ORS A4,DWTST,A6 STORE IN DWT 0 8 P* 0 ^ PREP005 EQU * 0 h & P LDK A4,PSUBS SET NO OF BACKSPACES 0 | P* 0 PREP010 CF A8,BKSP BACKSPACE 0 P SLL A2,4 0 P RF(NN) REP015 DATA FOUND 0 & P
0x12b59c…12b730 Dummy {f00=0x005f, f01=0x0190, f02=»E 0 h P SLL A2,5 1 P RF(NN) REPER BOT NOT FOUND 1 " P LDKL A5,-1 RESET SEQ. COUNTER 1 @ P RF REP020 READ SEQ. CHAR 1 f P* 1 P EJECT DRTC01 1 P* 1 P* 1 PREP015 EQU * 1 P SUK A4,1 1 " P RB(NZ) REP010 BACKSPACE AGAIN 1 $
0x12b730…12b8c4 Dummy {f00=0x005f, f01=0x018e, f02=»,A7 1 P RF(Z) REP020 READ OK 2 P SUK A4,1 COUNT READ 2 * $ P RB(P) REP017 NOT ALL READ DONE 2 F P RF REP060 GIVE UP 2 n P* 2 * PREP020 LC A4,DWTBKC+1,A6 GET SEQ. CHAR 2 P SUR A4,A5 CALCULATE 2 P SUK A4,1 NO OF BLOCKS TO 2 P ANK A4,/F
0x12b8c4…12ba58 Dummy {f00=0x005f, f01=0x018e, f02=» " PREP030 SUK A4,1 POSITION TAPE 3 P RF(N) REP040 READY 3 * " P CF A8,READSQ READ NEXT BLOCK 3 F P RB REP030 3 l P* 3 ~ ( PREP040 LDK A4,RTRIES SET NO OF RETRY 3 & PREP042 LDKL A7,/80F SET READ MASK 3 P TM A2,A7 CORRECT READ 3 P RF(Z) REP04
0x12ba58…12bbec Dummy {f00=0x005f, f01=0x0190, f02=» 3 p P RB REP042 4 P* 4 P EJECT DRTC01 4 $ P* 4 < P* 4 F PREP045 SLC A2,3 4 P P RF(NN) REP050 NOT TAPE MARK 4 h P ANK A3,/10 4 * P RF(Z) REP060 SHOULD NOT BE TAPE MARK 4 P RF REPOK 4 P* 4 & PREP050 ADK A5,1 CHECK SEQ. NUM
0x12bbec…12bd80 Dummy {f00=0x005f, f01=0x0190, f02=» 4 p P RF(Z) REPER NO 5 , P XRS A7,DWTST,A6 RESET REPOSITIONING BIT 5 P RB REP005 YES 5 P P* 5 f P* 5 p 6 PREPER LDK A2,2 IND RECOVERY/SEQUENCE ERROR STATUS 5 z " P ORS A2,SEKBYT,A6 SAVE IN DWT 5 P RTN A8 5 P* 5 ( PREPOK LDK A2,0 IND R
0x12bd80…12bf14 (1, 225) Dummy {f00=0x005f, f01=0x0190, f02=»POINTER | P RB EDT100 JUMP TO CONTINUE P************************ 4 P* SPECIAL TEXT ELEMENT * T P************************ t PSTXTEL EQU *-BASIS P LDR A3,A7 SAVE A7 P LDR A7,A1 LOAD CHAR IN A7 P ST A13,SVA13 SAVE A13 P
0x12bf14…12c0a8 Dummy {f00=0x005f, f01=0x0002, f02=»
0x12c0a8…12c23c Dummy {f00=0x005f, f01=0x0190, f02=» 0 P IDENT DVTCG REL 8.1 78-04-21 870105040810 P* 8 $ P* DEVICE WORK TABLE COT GENERAL B P* j P ENTRY DVTCG TABLE ENTRY t P*** ( P EXTRN CGAD POINTER TO ADDRESSBLOCK P EXTRN ECH P* P* PDVTCG EQU * TABLE ENTR
0x12c23c…12c3d0 Dummy {f00=0x005f, f01=0x0190, f02=»DER AND ECB-ADDRESS l ( P DATA CGAD POINTER TO ADDRESS BLOCK P DATA 'CG' TTAB-ADDRESS H $ P DATA 0 WAIT/INDICATE INDICATOR h P DATA 0 TERMINAL QUEUE * P DATA 0 CODE CONVERSION TABLE POINTER P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE
0x12c3d0…12c564 Dummy {f00=0x005f, f01=0x407c, f02=» DATA /BCA BACKSPACE AND CANCEL " P DATA /ED0 EOR AND DOUBLE ZERO ( PDWTEND EQU * N P* b P END l@ xE INDICATOR h P DATA 0 TERMINAL QUEUE * P DATA 0 CODE CONVERSION TABLE POINTER P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE
0x12c564…12c6f8 Dummy {f00=0x005f, f01=0x2008, f02=» BLE ZERO 6 P DATA DWTSQ+DVTKB POINTER TO FIRST PLACE IN QUEUE 4 P DATA DWTSQ+DVTKB POINTER TO LAST PLACE IN QUEUE R PDWTSQ EQU *-DVTKB P RES 0 P* P END @ 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P R
0x12c6f8…12c88c Dummy {f00=0x005f, f01=0x2008, f02=» L = RL 8.1:1 DATE = 78-03-03 PACK NBR = 001 f /
0x12c88c…12ca20 Dummy {f00=0x005f, f01=0x0190, f02=» MASK OUT SIGN ( P SUK A4,/D SUBTRACT WITH MINUS SIGN * P ST A4,EDSIGN STORE IN SIGN INDICATOR B , P NGR A1,A1 GET POSITIVE LENGTH IN BYTES p P SUR A6,A1 ( P ADK A6,1 GET ELEMENT START ADDRESS & P SLL A1,1 LENGTH IN BCD INCL. SIGN & P
0x12ca20…12cbb4 (1, 226) Dummy {f00=0x005f, f01=0x0190, f02=»CE WORK TABLE FOR CASSETTE RECORDER 02 5 P* 6 . P* 6 8 PDWTC02 EQU * TABLE ENTRY 6 B P IFT DBCAS=2 6 b P DATA DWTC01+1 DWT NO. 1 6 v 0 P DATA /8000 STATUS./8000 MEANS DEVICE READY 6 P DATA 0 ECB ADDRESS 6 P DATA 0 ORDER 6 ( P DATA TCAD P
0x12cbb4…12cd48 Dummy {f00=0x005f, f01=0x0190, f02=»0 BLOCK COUNTER 6 P DATA 0 SEQ. INDICATOR 7 P XIF 7 6 P EJECT DRTC01 7 B P* 7 Z P* 7 d P* D W T C 0 1 7 n P* 7 2 P* DEVICE WORK TABLE FOR CASSETTE RECORDER 01 7 P* 7 P* 7 PDWTC01 EQU * TABLE ENTRY 7 P DATA DWTC02
0x12cd48…12cedc Dummy {f00=0x005f, f01=0x415a, f02=»ER TO ADDRESS BLOCK 7 P DATA 0 TTAB ADDRESS 8 $ P DATA 0 WAIT/ACTIVATE INDICATOR 8 8 P DATA 0 TERMINAL QUEUE 8 ` & PDWTBKC EQU *-DWTC01 BLOCK COUNTER 8 ~ P DATA 0 8 PSEKBYT EQU *-DWTC01 8 P DATA 0 SEQ. INDICATOR 8 P* 8 P* 8 " PRE
0x12cedc…12d070 Dummy {f00=0x005f, f01=0x2008, f02=» 9 OCK - x P DATA 0 TTAB-ADDRESS . $ P DATA 0 WAIT/ACTIVATE INDICATOR . 0 P DATA 0 TERMINAL QUEUE . X & PDWTBKC EQU *-DWTC01 BLOCK COUNTER . v P DATA 0 . PSEKBYT EQU *-DWTC01 . P DATA 0 SEQ. INDICATOR . P* . P* . P END . @
0x12d070…12d204 Dummy {f00=0x005f, f01=0x0190, f02=»TERS P* P EJECT DRTC01 P* . P* 8 4 P* THE DRIVER CONSISTS OF THE FOLLOWING PARTS: B P* z " P* T C D A : ACTIVATION PART P* $ P* I H T C : INTERRUPT HANDLER P* & P* R C O V E R : RECOVERY ROUTINE
0x12d204…12d398 Dummy {f00=0x005f, f01=0x0190, f02=»D O R D E R P R O C E S S O R S P* * P* 4 * P* THE FOLLOWING ORDERS ARE TREATED: > P* l P* ORDER /00: TEST STATUS v P* /02: READ P* /05: WRITE P* /06: WRITE " P* /22: WRITE
0x12d398…12d52c Dummy {f00=0x005f, f01=0x0190, f02=» x P* /37: LOAD P* /38: UNLOAD $ P* B P EJECT DRTC01 L P* d P* n , P* THE FOLLOWING RETURN CODES ARE USED: x P* P* BIT 0 REQUEST ERROR P* 1 LEADER P* 2 BOT MISSING P*
0x12d52c…12d6c0 Dummy {f00=0x005f, f01=0x0190, f02=»-SIDE P* 9 REWIND TIME-OUT P* 11 SEQUENCE ERROR . P* -READ SEQUENCE ERROR N > P* -POSITION OF TAPE UNSUCCESSFULL AT WRITE RECOVERY r 6 P* -POWER RECOVERY WHEN SEQ. COUNTER NOT USED , P* -POWER RECOVERY NO
0x12d6c0…12d854 (1, 227) Dummy {f00=0x005f, f01=0x0190, f02=»ING DWT M z P IFF STAT=0 N P LD A1,XSTA N $ 0 P ABL(NZ) POL050 STATUS HAS BEEN TRANSMITTED N 8 P XIF N l 0 P LD A1,FBLST GET START POINT FOR LAST BLOCK N x & P SU A1,FECBBA COMPUTE BUFFER INDEX N P ST A1,FBAX N P ABL POL130 N P* N P
0x12d854…12d9e8 Dummy {f00=0x005f, f01=0x0190, f02=» N " P RB(Z) BRM410 ACK NOT EXPECTED O & P CF A5,READ READ SECOND CHARACTER O . P CWK A2,ACK0+PAR O X P RF(NE) BRM620 O p P* O P* ACK , 0 RECEIVED O P* O P LD A1,CACK GET ACKCOUNTER O P RF(Z) BRM630 ACK,0 EXPECTED O PBRM610 EQU * O
0x12d9e8…12db7c Dummy {f00=0x005f, f01=0x0190, f02=» RF(NE) BRM650 O P* P P* ACK , 1 RECEIVED P P* P : P LD A1,CACK GET ACK COUNTER P D $ P RB(Z) BRM610 ACK,1 NOT EXPECTED P h PBRM630 EQU * P P LD A1,XETX P P RF(Z) BRM640 ETX NOT SENT P P EJECT P P* P , P* ACK HAS BEEN RECEIVE
0x12db7c…12dd10 Dummy {f00=0x005f, f01=0x0190, f02=» STATUS HAS BEEN TRANSMITTED P P XIF Q $ ( P CF A5,CWRITE COMPLETE WRITE REQUEST Q 0 PBRM636 EQU * Q P CF A5,TREOT SEND EOT Q p P IFT RCOM=1 Q P Q P CM XRB RESET READ BUFFER Q P XIF Q P RB BRM410 Q PBRM640 EQU * Q P LDK A1,1
0x12dd10…12dea4 Dummy {f00=0x005f, f01=0x0190, f02=» DLE SEQUENCE Q z " P CM XACK RESET 'EXPECTING ACK' R P LD A1,XETX R < $ P RF(NZ) BRM660 ETX HAS BEEN SENT R P P LDK A1,2 SET RC=2 R x P RB BRM635 R PBRM660 EQU * R P LDK A1,0 SET RC=0 R P RB BRM635 R P IFF STAT=0 R P EJECT R P*
0x12dea4…12e038 Dummy {f00=0x005f, f01=0x0190, f02=»F A15,REMOVS REMOVE FROM STATUS QUEUE R P CM XSTA CLEAR 'STATUS SENT' S . " P CM XACK CLEAR 'ACK EXPECTED' S R P LD A1,DWTST,A6 GET STATUS S x P ANK A1,4 S P RB(Z) BRM636 NOT DE S P LDKL A1,/8000 S " P ANS A1,DWTST,A6 CLEAR STATUS S P RB
0x12e038…12e1cc Dummy {f00=0x005f, f01=0x0190, f02=»FF STAT=0 S P LD A1,DWTST,A6 GET STATUS T P LDR A3,A1 T 4 P ANK A1,1 T F $ P RF(Z) SEL110 NO PENDING STATUS T X P CF A5,TRRVI SEND RVI T P XIF T P IFF STAT=1 T P RF SEL110 T P XIF T PSEL100 EQU * T P ABL BRM T PSEL110 E
0x12e1cc…12e360 Dummy {f00=0x005f, f01=0x018e, f02=»AILABLE T x PSEL115 EQU * U P CF A5,TRWACK SEND WACK U $ P RB SEL100 U D PSEL120 EQU * U V , P CF A5,PRREC PREPARE FOR TEXT RECEPTION U j P CF A5,TRACK SEND ACK,0 U P RB SEL100 U P EJECT U P* U P* U P* PREPARE FOR TEXT RECEPTI
0x12e360…12e4f4 (1, 228) Dummy {f00=0x0060, f01=0x0190, f02=» EQU * ] " P CM XACK RESET 'ACK EXPECTED' ^ P CM FDWTUT ^ 4 P RTN A5 ^ F P EJECT ^ V P* ^ d P* ^ n P* READ ONE TEXT BLOCK ^ x P* ^ P* ON EXIT A3 CONTAINS : ^ ( P* 0 : IF CORRECT ETX BLOCK RECEIVED ^ 2 P* 1 : IF LRC OR PARITY ERROR
0x12e4f4…12e688 Dummy {f00=0x0060, f01=0x0190, f02=» P ADK A4,6 RESERVE HEADER _ P LDK A3,0 _ $ P LD A1,XSTA _ 6 $ P RF(NZ) RDM050 LAST INPUT WAS OK _ J " P LD A1,FBLST COMPUTE NEW INDEX _ r P SUR A1,A4 _ P ST A1,FBAX _ PRDM050 EQU * _ P AD A4,FBAX ADD BUFFER INDEX _ ( P ST A4,FBLST REMEM
0x12e688…12e81c Dummy {f00=0x0060, f01=0x0190, f02=» " P RF(NZ) RDM100 NOT FIRST BLOCK ` P CF A5,READP ` * P RF(NZ) RDM120 PARITY ERROR ` > P CWK A2,ESC ` b P RF(NE) RDM110 ` v * P CF A5,READP SKIP NEXT TWO CHARACTERS ` P CF A5,READP ` P XIF ` PRDM100 EQU * ` $ P CF A5,READP READ ONE CHAR
0x12e81c…12e9b0 Dummy {f00=0x0060, f01=0x018e, f02=» ` P RF(E) RDM160 ETB RECEIVED a P CWK A2,ITB a * P RF(E) RDM170 ITB RECEIVED a > P CWK A2,ENQ a ` & P RF(E) RDM140 ENQ IN TEXT RECEIVED a t P CWK A2,/FF a $ P RF(E) RDM140 MARK HOLD RECEIVED a P a P IFT CODE=0 a P IFT BINTRM=1 a
0x12e9b0…12eb44 Dummy {f00=0x0060, f01=0x0190, f02=» P SLL A1,6 b P LDR A8,A1 b * P CF A5,READP 8-BIT CHAR GET NEXT PART b ( P RF(NZ) RDM120 PARITY ERROR b V * P SUK A2,/20 ASSEMBLE TO ONE CHARACTER b z P ORR A2,A8 b PRDM115 EQU * b P XIF b P b P SCR A2,A4 STORE CHARACTER b P ADK
0x12eb44…12ecd8 Dummy {f00=0x0060, f01=0x0190, f02=»OT OVERFLOW b P* c P* BUFFER OVERFLOW c P* c 8 P RF RDM140 ABORT INPUT c B PRDM120 EQU * c ` & P LDK A3,1 INDICATE INVALID MESSAGE c t P SUK A2,/7F c $ P RF(Z) RDM150 MARK HOLD RECEIVED c P RB RDM100 c P* c P* ETX RECEIVED c
0x12ecd8…12ee6c Dummy {f00=0x0060, f01=0x0190, f02=»VE LENGTH IN HEADER c v P IFF CODE=1 d P CF A5,RDLRC d 0 P RF(Z) RDM150 LRC WAS OK d D P XIF d d P IFT CODE=1 d p & P CF A5,RDCRC READ CRC AND CHECK IT d P RF(E) RDM150 CRC WAS OK d P XIF d PRDM140 EQU * d & P LDK A3,1 INDICATE INVALID
0x12ee6c…12f000 Dummy {f00=0x0060, f01=0x0190, f02=»A1 PARITY ERROR SALCUZ d P XIF SALCUZ e P RTN A5 e 4 P* e D P* ETB RECEIVED e N P* e d PRDM160 EQU * e n P LDR A3,A3 e " P RB(NZ) RDM130 ALREADY INVALID e " P LDK A3,2 INDICATE CORRECT ETB e P RB RDM130 e P* e P* ITB RECEIV
0x12f000…12f194 (1, 229) Dummy {f00=0x0060, f01=0x0190, f02=»KUMULATOR % z , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR & ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR & B P* & n P XIF & x P* & P DATA 0 TIMER POINTER & P DATA /7255 SYNC-CHARACTER & 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 & 0 P DATA
0x12f194…12f328 Dummy {f00=0x0060, f01=0x0002, f02=»
0x12f328…12f4bc Dummy {f00=0x0060, f01=0x0190, f02=» 2 P IDENT TTABD1 REL 8.1 78-04-21 870105040810 P* LREK 78-02-20 : P* T 8 P**************************************************** ^ P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P* P*
0x12f4bc…12f650 Dummy {f00=0x0060, f01=0x0190, f02=» $ P* TERMINAL 01: TELLER TERMINAL P* 0 P ENTRY TTABD1 TABLE ENTRY : PX:A EQU 0 4 PRECBFZ EQU X:A INDEX RECORD BUFFER SIZE IN WORDS n P* P* PTTABD1 DATA 0 P DATA /8031 TASK LEVEL & P DATA 'D1' TERMINAL IDENTI
0x12f650…12f7e4 Dummy {f00=0x0060, f01=0x4132, f02=»INAL SAVE AREA P RES 14 P* & " P DATA TTABE-* TERMINAL DEVICES 0 P DATA 0,0 MASTER INDEX ENTRY V PTTABE EQU * z P DATA 0,0,0,0,0,0,0,0 P DATA 0,0,0,0,0,0,0,0 P DATA 0 TASK STACK P RES RECBFZ BUFAR1 P RES RECBF
0x12f7e4…12f978 Dummy {f00=0x0060, f01=0x2008, f02=» ES | PTTABE EQU * P* & P END 0@ <LER TERMINAL , P* T P* ^ P ENTRY TTABX TABLE ENTRY h P* P* P* P* P* PTTABX DATA 0 P DATA 60 TERMINAL STATUS & P DATA /EE TERMINAL IDENTIF
0x12f978…12fb0c Dummy {f00=0x0060, f01=0x0190, f02=»RRUPT-ACKUMULATOR + z ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR , P* , F P XIF , P P IFT RECHAN=2 , P DATA 0 TIMER POINTER , r P DATA /7055 SYNC-CHARACTER , 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 , 0 P DATA 0 DWT OF GOING LRC-PROCESS T
0x12fb0c…12fca0 Dummy {f00=0x0060, f01=0x0190, f02=»TESTS) , n $ P DATA 0 BLOCK SENDING INDICATOR - P XIF - 6 P IFT RECHAN=3 - B P DATA 0 TIMER POINTER - X P DATA /7055 SYNC-CHARACTER - v 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 - 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 - & P DATA 0
0x12fca0…12fe34 (1, 230) Dummy {f00=0x0060, f01=0x0190, f02=»OING LRC-PROCESS TERMINAL 2 5 & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 6 $ & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 6 N , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) 6 x $ P DATA 0 BLOCK SENDING INDICATOR 6 P* 6 P XIF 6 P* 6 P EJECT 6 $ P**********
0x12fe34…12ffc8 Dummy {f00=0x0060, f01=0x0002, f02=»
0x12ffc8…13015c Dummy {f00=0x0060, f01=0x0190, f02=» 2 P IDENT TTABD2 REL 8.1 78-04-21 870105040810 P* LREK 78-02-20 : P* T 8 P**************************************************** ^ P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P* P*
0x13015c…1302f0 Dummy {f00=0x0060, f01=0x0190, f02=» $ P* TERMINAL 01: TELLER TERMINAL P* 0 P ENTRY TTABD2 TABLE ENTRY : PX:A EQU 0 4 PRECBFZ EQU X:A INDEX RECORD BUFFER SIZE IN WORDS n P* P* PTTABD2 DATA 0 P DATA /8031 TASK LEVEL & P DATA 'D2' TERMINAL IDENTI
0x1302f0…130484 Dummy {f00=0x0060, f01=0x4132, f02=»INAL SAVE AREA P RES 14 P* & " P DATA TTABE-* TERMINAL DEVICES 0 P DATA 0,0 MASTER INDEX ENTRY V PTTABE EQU * z P DATA 0,0,0,0,0,0,0,0 P DATA 0,0,0,0,0,0,0,0 P DATA 0 TASK STACK P RES RECBFZ BUFAR1 P RES RECBF
0x130484…130618 Dummy {f00=0x0060, f01=0x2008, f02=» ES | PTTABE EQU * P* & P END 0@ <LER TERMINAL , P* T P* ^ P ENTRY TTABX TABLE ENTRY h P* P* P* P* P* PTTABX DATA 0 P DATA 60 TERMINAL STATUS & P DATA /EE TERMINAL IDENTIF
0x130618…1307ac Dummy {f00=0x0060, f01=0x0190, f02=»OCK SENDING INDICATOR ; P XIF < P EJECT < * $ P******************************** < 8 $ P* C W T R T 6 * < ` $ P******************************** < P* < : P* CHANNEL UNIT WORK TABLE FOR REMOTE CHANNEL NO. 2 < P* CONNECTED T
0x1307ac…130940 Dummy {f00=0x0060, f01=0x0190, f02=»RD < z P DATA INTRT3 INTERRUPT TABLE = P INR A2,0,DWA7 INR = . P OTR A2,1,DWA7 OTR = H P CIO A2,1,DWA7 CIO-START = b " P DATA 0 RETRANSMISSION COUNTER = P DATA 0 QUEUE TERMINAL 1 = P DATA 0 QUEUE TERMINAL 2 = P* = P IFT ACKMUL=1 = P
0x130940…130ad4 (1, 231) Dummy {f00=0x0060, f01=0x0190, f02=» P RES 205 P XIF P IFT QNBUF=14 PBUF15 EQU BUF1 6 P XIF L P* X P* b P IFF QNBUF=1 l P IFF QNBUF=2 P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5 P IFF QNBUF=6 P IFF QNBUF=7 P IFF QNBUF=8
0x130ad4…130c68 Dummy {f00=0x0060, f01=0x0190, f02=»F15 DATA BUF16 P DATA 0,0,0 P RES 205 * P XIF : P IFT QNBUF=15 F PBUF16 EQU BUF1 P XIF r P* ~ P* P IFF QNBUF=1 P IFF QNBUF=2 P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5 P IFF QNBUF=6
0x130c68…130dfc Dummy {f00=0x0060, f01=0x0190, f02=»UF=13 P IFF QNBUF=14 P IFF QNBUF=15 $ PBUF16 DATA BUF1 : P DATA 0,0,0 R P RES 205 f P XIF v P EJECT P* P************** P* DMTGBU * P************** P* * P* ENTRY DMTGBU GET A DISC BU
0x130dfc…130f90 Dummy {f00=0x0060, f01=0x0190, f02=» P* $ P* OUTPUT A3 = BUFFER ADDRESS J P* SKIP RETURN (+2) IF SECTOR MUST BE READ INTO BUFFER AT A3 6 , P* A5 AND A7 WILL BE DESTROYED P* 8 P* CURBUF, BUFDMI, -FC AND -SNR WILL BE SET < P* ST
0x130f90…131124 Dummy {f00=0x0060, f01=0x0190, f02=»ARCHED FOR IS ALREADY PRESENT IN ANY FREE BUFFER. F P* IF THIS SECTOR IS NOT FOUND A FREE SECTOR MUS BE FOUND AND IN : P* P* P* PDMTGBU EQU * P INH INH P* 4 P* CHECK IF THIS SECTOR IS FOUND IN ANY BUFFER
0x131124…1312b8 Dummy {f00=0x0060, f01=0x0190, f02=»20 WRONG VOLUME P CW A2,BUFSNR,A3 P RF(E) DMT050 SAME SECTOR NO 0 PDMT020 EQU * T P LDK A7,/01 h & P AN A7,BUFLNK,A3 STATUS IN BIT 15 | P RF(NZ) DMT041 USED P IM BUFOR,A3 MAKE OLDER P RF(P) DMT030 P LDK A7,/FF
0x1312b8…13144c Dummy {f00=0x0060, f01=0x018e, f02=»EWBUF PDMT041 EQU * P CW A3,CURBUF " * P RB(NE) DMT010 MORE BUFFERS TO SERARCH 8 P LDR A5,A5 f P RF(NZ) DMT043 BUFFER FOUND x P LDK A1,3 LAMP 10 AND 11 P CF A15,HALT NO MORE BUFFERS PDMT043 LD A3,NEWBUF P* * P*
0x13144c…1315e0 Dummy {f00=0x0060, f01=0x0190, f02=» " P ST A2,BUFSNR,A3 SECTOR NUMBER PDMT050 EQU * * " P CM BUFOR,A3 RESET OLD-COUNTER > P ST A3,CURBUF d P LDK A7,/01 z ( P ORRS A7,A3 SET STATUS USED BIT 15 P ENB ENB P RTN A14 P EJECT P* P**************
0x1315e0…131774 (1, 232) Dummy {f00=0x0061, f01=0x0190, f02=»2 p " P ST A4,DWTA4,A6 A4 " P ST A5,DWTA5,A6 A5 0 & PT:DISP ABL TDISP GO TO DISPATCHER V P EJECT DRDU01 P P P* P********************** P* * P* RECOVERY ROUTINE *
0x131774…131908 Dummy {f00=0x0061, f01=0x0002, f02=»
0x131908…131a9c Dummy {f00=0x0061, f01=0x0190, f02=» 2 P IDENT INTLT4 REL 8.1 78-04-21 870105040810 P* : @ P* INTERRUPT TABLE FOR DEVICES CONNECTED TO CHANNEL UNIT NO.1 D P* FOR LOCAL TERMINALS D P* THIS TABLE CONTAINS POINTERS TO DEVICE WORK TABLES ASSOCIATED D P* WITH DEVICES CONNECTED T
0x131a9c…131c30 Dummy {f00=0x0061, f01=0x40f8, f02=»TABLE ENTRY P* P* TERMINAL PARAMETERS P* > P* H , P* RIGHT BYTE = 2 * NUMBER OF DEVICES R P* P* P* P* PINTLT4 EQU * TABLE ENTRY P* P* P* P END @ ICES CONNECTED T
0x131c30…131dc4 Dummy {f00=0x0061, f01=0x2008, f02=» NAL PARAMETERS 0 P* LEFT BYTE = 2 * NUMBER OF INPUT DEVICES 4 P* AND DEVICES WITH DATA REQUESTS R , P* RIGHT BYTE = 2 * NUMBER OF DEVICES P* 4 P* NOTE: PRINTERS ARE TREATED AS INPUT DEVICES P* P*
0x131dc4…131f58 Dummy {f00=0x0061, f01=0x018e, f02=»A1,-TIME " P STR A1,A3 RESTART TIMER # P RB T:DISP # 0 P* # B $ PDUON30 CF A15,SETIMP START TIMER # L , P DATA DUON40,TIME TIME OUT ADDRESS, TIME # t P RB T:DISP # P* # P* TIME-OUT # P* # PDUON40 LDKL A6,DWDU01 # P CM TIMER #
0x131f58…1320ec Dummy {f00=0x0061, f01=0x0190, f02=» P* INTERRUPT HANDLER * $ P* * $ $ P*********************** $ D P* $ d PIHDU2 EQU * $ n P IFT NUNITS=2 $ $ P ST P,INTSAV SAVE LAST INTERRUPT $ P CF A15,SAVE8 $ $ P LDKL A6,DWDU02 DISC UNIT NO. 2 $ P RF IHDU10
0x1320ec…132280 Dummy {f00=0x0061, f01=0x0190, f02=»DISC UNIT NO. 1 $ P % P % " PIHDU10 SST A1,CUADR GET STATUS % ( P IFT NUNITS=2 % N P LDR A2,A1 % d P ANK A2,/40 % v P RF(Z) IHDU20 % P LDKL A6,DWDU02 % P XIF % PIHDU20 EQU * % $ P ANKL A1,/440F MASK RETURN CODE % P SLL A1,
0x132280…132414 (1, 233) Dummy {f00=0x0061, f01=0x0190, f02=»C200 ADK A4,2 - P RB(E) IHRET . P ADK A4,2 . * P ABL(NE) THRERR . < P LC A4,DWTST,A6 STATUS BYTE . T P ANK A4,1 . x P RB(NE) IHRET . . P SC A2,DWTST+1,A6 INDICATE ERROR RECEIVED . P RB EXIT . P EJECT . P* . P* . P* .
0x132414…1325a8 Dummy {f00=0x0061, f01=0x0002, f02=»
0x1325a8…13273c Dummy {f00=0x0061, f01=0x0190, f02=» 2 P IDENT INTRT4 REL 8.1 78-04-21 870105040810 P* : @ P* INTERRUPT TABLE FOR DEVICES CONNECTED TO CHANNEL UNIT NO.1 D P* FOR REMOTE TERMINALS D P* THIS TABLE CONTAINS POINTERS TO DEVICE WORK TABLES ASSOCIATED D P* WITH DEVICES CONNECTED T
0x13273c…1328d0 Dummy {f00=0x0061, f01=0x40f6, f02=»BLE ENTRY P* P* TERMINAL PARAMETERS P* < P* F , P* RIGHT BYTE = 2 * NUMBER OF DEVICES P P* P* P* P* PINTRT4 EQU * TABLE ENTRY P* P* P* P END @ EVICES CONNECTED T
0x1328d0…132a64 Dummy {f00=0x0061, f01=0x2008, f02=» NAL PARAMETERS 0 P* LEFT BYTE = 2 * NUMBER OF INPUT DEVICES 4 P* AND DEVICES WITH DATA REQUESTS R , P* RIGHT BYTE = 2 * NUMBER OF DEVICES P* 4 P* NOTE: PRINTERS ARE TREATED AS INPUT DEVICES P* P*
0x132a64…132bf8 Dummy {f00=0x0061, f01=0x4018, f02=» 2 P END 3 @ 3 ANKL A3,/8FFF 2 P SRC A2,4 2 . P ORR A3,A2 2 @ P STR A3,A6 RESTORE 2 R P RTN A5 2 l P EJECT 2 | P* 2 P* 2 * P* STINTA = STATUS INFORMATION TABLE 2 P* 2 PSTINTA EQU * 2 & P DATA STARP1,STOPP1,STARP2,STO
0x132bf8…132d8c Dummy {f00=0x0061, f01=0x2008, f02=» 4 END I/O % h P EJECT & P* & & P* & 0 * P* STINTA = STATUS INFORMATION TABLE & : P* & h PSTINTA EQU * & r & P DATA STARP1,STOPP1,STARP2,STOPP2 & & P DATA STARP3,STOPP3,STARP4,STOPP4 & & P DATA TISWCA,TIANTC,TIPILO,TIBUZZ & P DAT
0x132d8c…132f20 Dummy {f00=0x0061, f01=0x0190, f02=»3,1 D P LDR A2,A2 E PFDIX10 EQU * E P RF(Z) FDIX20 E 2 P SLL A3,1 E H P SUK A2,1 E Z P RB FDIX10 E l PFDIX20 RTN A5 E ~ P EJECT E P IFF DAMA+IBM=0 E P****************** E P* * E P* VOLADR * E P
0x132f20…1330b4 (1, 234) Dummy {f00=0x0061, f01=0x0190, f02=» LABEL = RL 8.1:1 DATE = 78-03-03 PACK NBR = 001 f 4 &: 4: V - P Y _( Y M : ] =IR E
0x1330b4…133248 Dummy {f00=0x0061, f01=0x0002, f02=»
0x133248…1333dc Dummy {f00=0x0061, f01=0x4104, f02=» J F IDENT TTABD2 REL 8.1 78-04-21 870105040810 TTABD2 R TTABD2 d 1D2 x , ( + K + R @ FAR2
0x1333dc…133570 Dummy {f00=0x0061, f01=0x2008, f02=»
0x133570…133704 Dummy {f00=0x0061, f01=0x40c4, f02=» PINTLT3 DATA 0 PINTLT4 DATA 0 PINTRT1 DATA 0 4 PINTRT2 DATA 0 J PINTRT3 DATA 0 ` PINTRT4 DATA 0 v P* P* P* P* P END @ P* P* P* P* PMONTAB EQU * PTCTA
0x133704…133898 Dummy {f00=0x0061, f01=0x2008, f02=» P EXTRN IN:LT2 P EXTRN IN:RT1 " P EXTRN IN:RT2 8 P* N P* X P* b P* l PMONTAB EQU * v PTCTAB DATA TC:TAB PCDTAB DATA CD:TAB PBLOCKS DATA BLOK:S PDCTAB DATA DC:TAB PINTLT1 DATA IN:LT1
0x133898…133a2c Dummy {f00=0x0061, f01=0x0190, f02=»E) SCAN12 # P SUK A1,4 $ P RB(NE) FEEDER $ $ P SUK A2,4 $ : P RB(E) RECA30 $ L P SUK A2,2 $ b P RB(E) ENDI01 $ t P ABL THRERR $ " PSCAN12 SUK A7,2 PIN REQUEST ? $ P RF(E) PIN10 YES $ " P CF A15,STORE STORE CHARACTER $ , PSCAN15
0x133a2c…133bc0 Dummy {f00=0x0061, f01=0x0190, f02=»A7 LAST PLACE IN KEY-TABLE $ P ADK A1,1 % " PSCAN20 SUK A7,1 % 4 , P RF(N) SCA100 KEY NOT FOUND IN KEYTABLE % L P SUK A1,1 NEXT KEY % | P CCR A2,A1 EOR-CHARACTER % P RB(NE) SCAN20 % P LDK A1,0 % P ADR A7,A7 YES, DOUBLE INDEX % , P ST A7
0x133bc0…133d54 (1, 235) Dummy {f00=0x0061, f01=0x0190, f02=» A2,/7FFF P RF(7) END2 PEND3 ADK A3,/81 2 PEND2 ADK A3,/81 R PEND1 ADK A3,/81 r PEND0 SLL A3,1 P ANK.L A3,/0300 P LDK.L A4,/FCFF P AN.S A4
0x133d54…133ee8 Dummy {f00=0x0061, f01=0x4092, f02=»6 *A7=X'8000' THEN A4= 1 z . P* *AND A1= A6 ( P RB(7) NOVER3 Z P END z@ END0 SLL A3,1 P ANK.L A3,/0300 P LDK.L A4,/FCFF P AN.S A4
0x133ee8…13407c Dummy {f00=0x0061, f01=0x2008, f02=» 4 : PCASSPE LDR A1,A6 *A7=X'8000' THEN A4= 1 . P* *AND A1= A6 P P RB(7) NOVER3 P END @
0x13407c…134210 Dummy {f00=0x0061, f01=0x0190, f02=» LABEL = RL 8.1:1 DATE = 78-03-03 PACK NBR = 001 f : ] =IR E
[…0x4…]
0x134860…1349f4 (1, 236) Dummy {f00=0x0062, f01=0x0190, f02=» LABEL = RL 8.1:1 DATE = 78-03-03 PACK NBR = 001 f _( Y M : ] =IR E
0x1349f4…134b88 Dummy {f00=0x0062, f01=0x0004, f02=»
0x134b88…134d1c Dummy {f00=0x0062, f01=0x0190, f02=» 2 P IDENT DSUMOD REL 8.1 78-04-21 870105040810 P* LREK 78-02-20 : P* T 8 P**************************************************** ^ P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P* P*
0x134d1c…134eb0 Dummy {f00=0x0062, f01=0x0190, f02=»THIS ROUTINE EXECUTES THE DOUBLE SUBSTRACTION INSTRUCTION ON THE ALPHA P*COMPUTER N P*CALLING SEQUENCE ` $ P* A1-A2 = ARG1 z $ P* A6-A7 = ARG2 P* CF A14,DSUMOD & P*RETURN: RESULT I
0x134eb0…135044 Dummy {f00=0x0062, f01=0x0190, f02=» C1R A6,A6 P C1R A7,A7 P ANK.L A7,X'7FFF' > P ANK.L A2,/7FFF b P ADK A7,1 P RF(1) NOVER1 P ADK A6,1 P RF(3) OVER4 P
0x135044…1351d8 Dummy {f00=0x0062, f01=0x0190, f02=» END1 P RF(2) END2 P RF(3) END3 , P ADK A2,0 J P RF(0) END0 h P RF(7) END1 POVER1 ANK.L A2,X'7FFF' P ADK A1,1 P RF(3) OVER4 P
0x1351d8…13536c Dummy {f00=0x0062, f01=0x0190, f02=» NOVER2 PEND3 ADK A3,/80 PEND2 ADK A3,/80 4 PEND1 ADK A3,/80 V F PEND0 SLL A3,1 ************************************* x P ANK.L A3,/0300 P LDK.L A4,/FCFF P
0x13536c…135500 Dummy {f00=0x0062, f01=0x4014, f02=» END @ D3 ADK A3,/80 PEND2 ADK A3,/80 4 PEND1 ADK A3,/80 V F PEND0 SLL A3,1 ************************************* x P ANK.L A3,/0300 P LDK.L A4,/FCFF P
0x135500…135694 (1, 237) Dummy {f00=0x0062, f01=0x018e, f02=» P STR A5,A15 SAVE A5 0 P LD A4,FREQUE GET FIRST BLOCK IN FREE QUEUE $ P RF(NZ) GBL010 X P LDK A1,/B HALT PARAMETER n . P CF A15,HALT HALT IF ALL BLOCKS OCCUPIED PGBL010 LDR* A5,A4 . P ST A5,FREQUE TAKE BLOCK OUT OF FREE QUEUE
0x135694…135828 Dummy {f00=0x0062, f01=0x0190, f02=» ~ P EJECT P* P* P* F R E B L K * P* B : P* SUBROUTINE TO GET PARAMETERS FROM A MONITOR BLOCK L P* AND SET THIS BLOCK FREE. P* P* ENTRY PARAMETER:- P* P* A4 = BLOCKADDRESS P* P
0x135828…1359bc Dummy {f00=0x0062, f01=0x0190, f02=» " " P* P* $ PFREBLK EQU * . P INH B P LDR* A3,A4 UPDATE A3 N P LD A1,FREQUE l P STR A1,A4 P ST A4,FREQUE SET BLOCK FREE P LD A2,2,A4 P LD A1,4,A4 P ABL IHRTN P EJECT P P
0x1359bc…135b50 Dummy {f00=0x0062, f01=0x0190, f02=»D FROM DATA MANAGEMENT t P* A8 = ECB ADDRESS P* 8 P* EXIT PARAMETERS:- B P* ^ P* A2 = DWT INDEX h & P* A6 = DWT ADDRESS IF FOUND ELSE 0 P* P PFNDDWT STR A1,A15 SAVE A1 P LDKL A6,TTB:TD 4 P ADR A6,A5 GET ADD
0x135b50…135ce4 Dummy {f00=0x0062, f01=0x0190, f02=»ILE CODE FROM ECB ~ P PFND100 SUK A1,4 " ( P RF(N) FND110 FILE CODE NOT IN TTAB : & P CC A2,1,A6 SEARCH IN DEVICE TABLE f & P RF(NE) FND106 BRANCH IF NOT FOUND P STR A1,A15 P LD A1,2,A6 DWT ADDR " P LD A1,DWTADR,A1 DRIVER ENTRY
0x135ce4…135e78 Dummy {f00=0x0062, f01=0x0190, f02=» P LDR* A1,A15 PFND106 EQU * ( P ADK A6,4 ADDRESS TO NEXT FILE CODE , P RB FND100 TRY NEXT X P EJECT t P* $ P* SEARCH IN COMMON DEVICE TABLE P* P $ PFND110 LD A6,CDTAB CDTAB ADDRESS P LDR* A1,A6 CDTAB LENGTH
0x135e78…13600c Dummy {f00=0x0062, f01=0x0190, f02=» & P RF(NE) FND126 FILE CODE NOT FOUND P STR A1,A15 . P LD A1,2,A6 B P LD A1,DWTADR,A1 V P CWK A1,TIODM n P RF(NE) FND200 NOT DM REQ $ P CF A15,CHKIND CHECK INDEX IN DM P RF FND200 INDEX OK P LDR* A1,A15 PFND126 EQU
0x13600c…1361a0 Dummy {f00=0x0062, f01=0x018e, f02=»15 RESET STACK P LCR A2,A6 LOAD DWT INDEX P LD A6,2,A6 LOAD DWT ADDRESS 8 PFND210 RF IHRET1 P EJECT t P* P* P* F N D T I D P* P* B P* SUBROUTINE TO FIND TTAB ADDRESS FROM TERMINAL IDENTIFICATION P*
0x1361a0…136334 (1, 238) Dummy {f00=0x0062, f01=0x4046, f02=»TR A1,0,SOP INDICATE TYPE OF HALT - P HLT . * P END . 6@ . B
0x136334…1364c8 Dummy {f00=0x0062, f01=0x2008, f02=» / 5 STACK " ~ P LDR* A1,A15 RESTORE A1 # P RTN A15 RETURN TO CALLER # 8 P* # Z P END # d@ # pN WHEN ALL STARTED " ` P EJECT " P* " P* " P* S W L 4 8 " P* " : P* SUBROUTINE TO SWITCH PROGRAM PRIORITY LEVEL TO 48. "
0x1364c8…13665c Dummy {f00=0x0062, f01=0x0190, f02=»RC BIT 8 ' r P CF A15,TENDIO ( P RB BMM ( & PBMM910 ANK A2,/7F ( 6 P SUK A2,/7F ( P $ P RB(Z) BMM RESYNCHRONIZE ON /FF ( d P RB BMM100 READ NEXT CHAR ( P EJECT ( P* ( P* ( $ P* TRANSMIT MODE, RECEPTION PART ( P* ( P* (
0x13665c…1367f0 Dummy {f00=0x0062, f01=0x018e, f02=»A TR200 0:ACK EXPECTED ( P DATA TR400 2: TTD SEQUENCE ) P DATA TR420 4: WACK SEQUENCE ) B P DATA TR100 6: BID SEQUENCE ) f 8 P DATA TR200 8: ACK EXPECTED AFTER TRANSMIT TIME OUT ) P EJECT ) P* ) P* ) P* BID SEQUENCE ) P* ) P
0x1367f0…136984 Dummy {f00=0x0062, f01=0x0190, f02=» ) p " P CF A5,READP READ SECOND CHAR * P RB(NZ) BMM910 PARITY ERROR * . P CWK A2,ACK0 * R P RF(NE) TR120 NOT PROPER ACK * f 0 P CF A15,CLPTIM ACK 0 : STOP PROCEDURE TIMER * " P ABL WR110 START TRANSMISSION * P* NOT ACK RECEIVED * PTR120 CW
0x136984…136b18 Dummy {f00=0x0062, f01=0x0190, f02=»IVED * " PTR140 LDK A1,/10 ENQ RECEIVED + , P CF A15,TENDIO COMPLETE WRITE, RC BIT 11 + 2 P RB BMM150 BID ACCEPTED + b P EJECT + P* + P* + " P* TRANSMIT MODE: ACK EXPECTED + P* + P* + PTR200 CWK A2,DLE + P RF(E) TR250 DLE R
0x136b18…136cac Dummy {f00=0x0062, f01=0x0190, f02=»BL TRTEXT RETRANSMIT TEXT + . PTR210 LDK A4,2 THROUGHPUT ERROR, RC BIT 14 , " PTR220 EQU * , T P CF A5,TREOT SEND EOT , h ( P CM DWTXST,A6 INDICATE CONTROL STATE , P LDR A1,A4 RETURN CODE , $ P CF A15,TENDIO COMPLETE REQUEST , P ABL TDISP GO TO
0x136cac…136e40 Dummy {f00=0x0062, f01=0x0190, f02=» P RF(NE) TR280 NOT PROPER ACK - ( P CF A15,CLPTIM STOP PROCEDURE TIMER - ( P LDK A4,0 RETURN CODE - T $ P LD A8,DWTECB,A6 GET ECB ADDRESS - r & P LD A1,ECBBA,A8 GET BUFFER ADDRESS - & P LDR* A1,A1 GET CONTROL CHARACTER - P ANK A1,/FF - 8 P RB(Z)
0x136e40…136fd4 (1, 239) Dummy {f00=0x0062, f01=0x0190, f02=»+3 P XIF P DATA *+RLINK P RES RBUFL+3 , P DATA 0 END OF CHAIN @ P RES RBUFL+3 P* p P* z P* DC TRANSMIT BUFFER POOL P* P* PDCTBUF EQU * P* P* P IFF TBUFL=0 , P DATA TBUF1 POINTE
0x136fd4…137168 Dummy {f00=0x0062, f01=0x0190, f02=»AIN z P RES TBUFL BUFFER AREA 2 P XIF , P* 8 P EJECT B P* P P* Z P* INTERRUPT LOGGING ROUTINE d P* P* P IFF LOGG=0 PLOGSST ST A2,SAVE2 P ORKL A2,/F000 P RF LOG10 PLOGOUT ST A2,SAVE2
0x137168…1372fc Dummy {f00=0x0062, f01=0x018e, f02=» LD A3,LOGPNT P STR A2,A3 P ADK A3,2 ( P CWK A3,LOGEND : P RF(L) LOGEXI P P LDKL A3,LOGSTA f PLOGEXI ST A3,LOGPNT ~ P LD A2,SAVE2 P LD A3,SAVE3 PLOGE10 RTN A5 P EJECT P* P* PLOGPNT DATA LO
0x1372fc…137490 Dummy {f00=0x0062, f01=0x018e, f02=» P* P IFT RCOM=1 P EJECT & < P******************************************************* 4 P* t P* L I N C O L ~ P* : P* CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER P* > P******************************
0x137490…137624 Dummy {f00=0x0062, f01=0x0190, f02=» & P LC A2,LICO:T,A2 ASCII LINE NUMBER " P CF A5,WRITEP SEND LINE NUMBER 2 P X P LDR A2,A3 ` P ANK A2,X'3F' r ( P LC A2,LICO:T,A2 ASCII COLUMN NUMBER $ P CF A5,WRITEP SEND COLUMN NUMBER P RTN A5 RETURN P* P* P*
0x137624…1377b8 Dummy {f00=0x0062, f01=0x0190, f02=»8-/0F p * P DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 * P DATA /5152,/5D24,/2A29,/3B5E /18-/1F < * P DATA /2D2F,/5354,/5556,/5758 /20-/27 j * P DATA /595A,/7C2C,/255F,/3E3F /28-/2F ( P DATA /3031,/3233,/3435,/3637 /30-37 ( P DATA /3839,/3A23,/402
0x1377b8…13794c Dummy {f00=0x0062, f01=0x40a0, f02=»:TAB v * P DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 * P DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 : PDC:END EQU * h P* | P* P END @ 95A,/7C2C,/255F,/3E3F /28-/2F ( P DATA /3031,/3233,/3435,/3637 /30-37 ( P DATA /3839,/3A23,/402
0x13794c…137ae0 Dummy {f00=0x0062, f01=0x2008, f02=» H P X ` h p x
0x137ae0…137c74 (1, 240) Dummy {f00=0x0063, f01=0x0190, f02=» P EJECT $ P ENTRY DWTCHP CHANNEL PARAMETER P ENTRY DWTST STATUS > P ENTRY DWTECB ECB ADDRESS Z P ENTRY DWTOR ORDER | * P ENTRY DWTADR POINTER TO ADDRESS-BLOCK P ENTRY DWTTAB TTAB-ADDRESS * P ENTRY DWTWAT WAIT ACTIVATE INDICA
0x137c74…137e08 Dummy {f00=0x0063, f01=0x0190, f02=»L VOLUME NAME P ENTRY ECBBA,ECBRL,ECBEL P ENTRY ECBRC,ECBCW 6 & P ENTRY SACT ACTIVE SEGMENT POINTER P 8 P ENTRY LRUNEW DUMMY FOR MEMORY MANAGEMENT (OVERLAY) z P EJECT P* P************* P* EXTERNALS * P*************
0x137e08…137f9c Dummy {f00=0x0063, f01=0x0190, f02=»D I/O P EXTRN EXIT PROGRAM EXIT & P EXTRN BLOK:S START OF BLOCK POOL . $ P EXTRN BLOCKE BLOCK POOL LENGTH X P EJECT P P* . P****************************************** P* & P* DWT-DISPLACEMENT DECLARATIONS P*
0x137f9c…138130 Dummy {f00=0x0063, f01=0x0190, f02=» PDWTECB EQU 4 ECB-ADDRESS PDWTOR EQU 6 ORDER $ & PDWTADR EQU 8 ADDRESS BLOCK POINTER > PDWTTAB EQU 10 TTAB-ADDRESS h * PDWTWAT EQU 12 WAIT/ACTIVATE INDICATOR PDWTTQ EQU 14 TERMINAL QUEUE PDWTWA EQU 16 WORK AREA * PDWTTDM EQU 16
0x138130…1382c4 Dummy {f00=0x0063, f01=0x0190, f02=»PLACEMENTS P* " P****************************** P* B PECBBA EQU /02 L PECBRL EQU /04 b PECBEL EQU /06 x PECBRC EQU /08 PECBCW EQU /0A P EJECT P* P* D I S Q U E P* 2 P* POINTER TO FIRST
0x1382c4…138458 Dummy {f00=0x0063, f01=0x0190, f02=» OF RUNING PROGRAM P* PPRUN EQU * $ P DATA 0 6 P* F P* S R U N P P* d P* RUNNING SEGMENT POINTER n P* PSRUN EQU * P DATA 0 $ P******************************* P* P* S A C T P*
0x138458…1385ec Dummy {f00=0x0063, f01=0x0190, f02=»EW EQU * P* P* G B Q U E P* 0 4 P* POINTER TO FIRST TASK TABLE IN BUFFER QUEUE : P* r PGBQUE EQU * | P DATA 0 PFREQUE DATA BLOK:S PBLOCKL DATA BLOCKE P* P EJECT P* P* D I S I O E
0x1385ec…138780 Dummy {f00=0x0063, f01=0x0190, f02=»DE t P* PDISEND EQU * P CF A15,TENDIO ( P EJECT > P* L P* V P* T D I S P ` P* v $ P* THIS IS THE DISPATCHER ENTRY P* PTDISP EQU * P INH P LD A5,DISQUE " P RF(Z) RETUR8 NO QUEUE,RETURN
0x138780…138914 (1, 241) Dummy {f00=0x0063, f01=0x0190, f02=»F(Z) BRM316 NO BUFFER AVAILABLE = " P LD A6,FDWTUT GET WRITING DWT > ( P LDR* A2,A6 GET STA > N , P CF A5,PRREC PREPARE FOR TEXT RECEPTION > j P LDK A1,0 SET RC=0 > ( P CF A5,CWRITE COMPLETE WRITE REQUEST > P LDK A1,1 > & P XRS A1,CACK INCREASE
0x138914…138aa8 Dummy {f00=0x0063, f01=0x001a, f02=» P ` h p x
0x138aa8…138c3c Dummy {f00=0x0063, f01=0x018e, f02=» 2 P IDENT DRFD01 REL 8.1 78-09-01 870105040810 P : P LOAD BUG (EOD=74001) B P REL 8.1 78-04-121 b P* ~ 2 P********************************************** P* " P* PHILIPS TERMINAL SYSTEM PTS P* ( P* DRFD01 = DRIV
0x138c3c…138dd0 Dummy {f00=0x0063, f01=0x0190, f02=» ` 0 P* THIS DISK DRIVER HANDLES UP TO FOUR DAISY . P* CHAINED FLEXIBLE DISK DRIVES PTS 6879, < 0 P* CONNECTED TO CPU VIA CHANNEL UNIT CHFD ON n & P* MULTIPLEX OR PROGRAMMED CHANNEL P* P********* P* P* ORDERS: P*
0x138dd0…138f64 Dummy {f00=0x0063, f01=0x018e, f02=» /05 BASIC WRITE D P* /06 SEQUENTIAL WRITE -IBM DISC ONLY- P* /11 PHYSICAL READ b P* /15 PHYSICAL WRITE P* /1A SEARCH KEY P* /24 WRITE DELETED DATA P* /26 LOCK D P* /31 REWIND
0x138f64…1390f8 Dummy {f00=0x0063, f01=0x0190, f02=» P* ENTRY PARAMETERS: P* P* A5 STACK BASE * P* A6 DWT-ADDRESS F P* A7 ORDER b P* A8 ECB-ADDRESS x P EJECT P* P*********** P* * P* ENTRIES * P* * P***********
0x1390f8…13928c Dummy {f00=0x0063, f01=0x0190, f02=»RY DWFD01 DWT-ADDRESS P* P************* ( P* * > P* EXTERNALS * T P* * j P************* P* P EXTRN TDISP DISPATCHER P EXTRN TENDIO ENDIO P EXTRN DISIOE REQUEST ERROR P EXTRN D
0x13928c…139420 Dummy {f00=0x0063, f01=0x0190, f02=»ETIMP TIMER & P EXTRN INIFLG INITIALIZATION FLAG & P EXTRN INTSAV INTERRUPT SAVE AREA > & P EXTRN TASCII EBCDIC TO ASCII TAB h & P EXTRN TEBCDIC ASCII TO EBCDIC TAB $ P EXTRN ECBBA ECB BUFFER ADDRESS & P EXTRN ECBRL ECB REQUESTED LENGTH
0x139420…1395b4 (1, 242) Dummy {f00=0x0063, f01=0x0190, f02=» P SRL A1,1 DIVIDE WITH 2 P ADR A6,A1 ( . PEDP050 ST A6,EDEPOI STORE ELEMENT POINTER : P CM EDNOTZ CLEAR ZEROMARK l P CM EDFCH CLEAR EDFCH & P CM EDSUPP CLEAR SUPPR. INDICATOR P LDK A6,0 CLEAR A6 $ PEDP100 IM EDCNTP INCREME
0x1395b4…139748 Dummy {f00=0x0063, f01=0x0190, f02=»OINTER z P LDK A1,/80 LOAD TO MASK * P TM A1,A4 TEST ON LEFTMOST BIT IN CODE . P RF(Z) EDP120 JUMP IF BIT=0 P LDR A6,A4 A6=ASCII-CODE P ANK A6,/7F * PEDP110 SCR A6,A7 STORE BYTE IN BUFFER P ADK A7,1 INCREMENT POINTER P R
0x139748…1398dc Dummy {f00=0x0063, f01=0x0190, f02=»BLE p P ADK A1,1 INCREMENT INDEX * P RB(N) EDP130 JUMP IF NOT END OF TABLE . $ P RB EDP100 JUMP IF ILLEGAL CODE PEDP150 EQU * ( P LC A6,CODTAB+17,A1 GET DISPLACEMENT PBASE EQU *+2 P ADR P,A6 JUMP TO ROUTINE P EJECT P
0x1398dc…139a70 Dummy {f00=0x0063, f01=0x0190, f02=» P* T * P******** PLT EQU *-BASE ( " PEDP610 IM EDSUPP EDSUPP NOT=0 > ( P CF A14,EDGETN GET CHR FROM ELEMENT d & P LD A1,EDNOTZ LOAD ZERO INDICATOR . P RF(NZ) EDP670 JUMP IF NOT LEADING ZEROES P CWK A6,/30 COMP WITH ZERO
0x139a70…139c04 Dummy {f00=0x0063, f01=0x0190, f02=» PEDP650 LDK A5,' ' LOAD SPACE P RB EDP610 ( P EJECT : * P************************************* H * P* MARK NOT ZERO AND STORE CHARACTER * v * P************************************* . PEDP660 IM EDNOTZ INCREMENT ZERO INDICATOR " P LDR
0x139c04…139d98 Dummy {f00=0x0063, f01=0x0190, f02=»6,A7 STORE EDFCH IN BUFFER P ADK A7,1 INCREMENT POINTER " ( PEDP665 LDR A6,A1 A6=CHR FROM ELEMENT F P******************* r P* STORE CHARACTER * P******************* * PEDP670 SCR A6,A7 STORE BYTE IN BUFFER P ADK A7,1 INCREMENT
0x139d98…139f2c Dummy {f00=0x0063, f01=0x0190, f02=» PEDP680 SUK A4,/54 P RB(Z) EDP100 JUMP IF T P***************** > P* STORE FROM A5 * X P***************** r * PEDP700 LDR A6,A5 LOAD CHARACTER TO A6 P RB EDP670 JUMP TO STORE P EJECT P********************** P*
0x139f2c…13a0c0 Dummy {f00=0x0063, f01=0x0190, f02=» LD A1,EDSUPP ( P RB(Z) EDP670 JUMP IF NOT SUPPRESSED P LD A1,EDNOTZ B , P RB(NZ) EDP670 JUMP IF NOT LEADING ZERO X , P CWK A6,'.'+/80 COMP WITH ROOMLESS POINT ( P RB(E) EDP100 JUMP IF ROOMLESS POINT P RF EDP780 P*************
0x13a0c0…13a254 (1, 243) Dummy {f00=0x0063, f01=0x0190, f02=»'STVZ09' % P DATA '.,+-*' & P* & & PCODTAB EQU * & 0 P BYTE LA,LB & D P BYTE LC,LD & X P BYTE LF,LP & l P BYTE LS,LT & P BYTE LV,LZ & P BYTE L0,L9 & P BYTE L.,LCOMMA & P BYTE LPLUS,LMINUS & P BYTE LAST,0 & P* &
0x13a254…13a3e8 Dummy {f00=0x0063, f01=0x0190, f02=»UB 6,7 & P BYTE RETUR,RETUR 8,9 ' P BYTE RETUR,RETUR A,B ' . P BYTE RETUR,RETUR C,D ' L P BYTE RETUR,COND E,F ' j P* ' PTABZON EQU * ' P BYTE RETURN,EDTXT Z=0,1 ' P BYTE EDFILL,EDFILL 2,3 ' P BYTE RETUR,RETUR 4,5 ' P B
0x13a3e8…13a57c Dummy {f00=0x0063, f01=0x018e, f02=» , P*************************************** ( * PEDGETN CF A14,EDGETA GET CHR IN ASCII ( 4 " P ANK A6,/F MASK OUT ZONE PART ( b P ORK A6,/30 MAKE ASCII DIGIT ( P RTN A14 ( * P************************************* ( * P* GET CHARACTER FROM ELEMENT,
0x13a57c…13a710 Dummy {f00=0x0063, f01=0x0190, f02=» P LC* A6,EDEPOI GET CHARACTER ) P IM EDEPOI INCREMENT POINTER ) ( " PGETBCD SRC A1,1 SHIFT CIRCULAR ) L $ P RF(N) GETRGT JUMP IF ODD INDEX ) r P LDKL A3,-1 ) , P ADS A3,EDEPOI STEP DOWN ELEMENT POINTER ) P SRL A6,4 A6=LEFT DIGIT ) PGETB10 SUK
0x13a710…13a8a4 Dummy {f00=0x0063, f01=0x4096, f02=» ) p P RB GETB10 * $ PGETRTN IM EDCNTE INCREMENT INDEX * P RTN A14 * B PGETBLK LDK A6,/20 A6=SPACE * R P RB GETRTN * t P END * @ * P LDKL A3,-1 ) , P ADS A3,EDEPOI STEP DOWN ELEMENT POINTER ) P SRL A6,4 A6=LEFT DIGIT ) PGETB10 SUK
0x13a8a4…13aa38 Dummy {f00=0x0063, f01=0x2008, f02=» + TN ( P END ) @ ) P LDKL A3,-1 ( & , P ADS A3,EDEPOI STEP DOWN ELEMENT POINTER ( : P SRL A6,4 A6=LEFT DIGIT ( j PGETB10 SUK A6,/F ( P RF(Z) GETBLK JUMP IF BLANK ( P ADK A6,/3F MAKE ASCII DIGIT ( P RF GETRTN ( $ PGETRGT ANK A
0x13aa38…13abcc Dummy {f00=0x0063, f01=0x018e, f02=» ( 3 & & . & - < & L & Z ( h 4 t & 5 999BBL " 5 - & & ( 6 & &
0x13abcc…13ad60 Dummy {f00=0x0063, f01=0x0190, f02=» ( 9 & & . & < & J : Z999E-999999E-999 X " : - z & ( ; & < Z999E-999999E-999 " < - & &
0x13ad60…13aef4 (1, 244) Dummy {f00=0x0064, f01=0x0190, f02=»N EL1 x $ P SCR A3,A10 STORE POS. SIGN EL4 P LDK A1,/B LOAD PLUS SIGN 6 & P SRC A2,2 SHIFT BIT 14 TO SIGN BIT X " P RF(N) SIG100 JUMP IF BIT 14=1 P LDK A1,/D LOAD MINUS SIGN PSIG100 EQU * $ P ST A1,12,A14 STORE RESULT SIGN PRE
0x13aef4…13b088 Dummy {f00=0x0064, f01=0x0190, f02=» PM:BRK EQU * P IFT OVERLY=1 P LDK A1,/80 . P XRS A1,2,A14 B P XIF X $ PT:BRK LKM RETURN VIA DISPATCHER d P DATA 0 P LD A1,16,A14 GET SECOND P LD A2,2,A1 - ARGUMENT /3040 ( P LDR* A1,A1 GET FIRST ARGUMENT /1020
0x13b088…13b21c Dummy {f00=0x0064, f01=0x0190, f02=»,DI120 P SC A2,DI140-1 P SC A2,ARG3+1 $ P SC A2,ARG2 : P SRL A2,8 A2=/0030 N P ANKL A1,/FF00 A1=/1000 h P ADR A2,A1 A2=/1030 P SC A2,MU70 P SC A2,DI040 P SC A2,DI060 P SC A2,DI110 P SC A2,ARG1+1
0x13b21c…13b3b0 Dummy {f00=0x0064, f01=0x405a, f02=»,MU10 P SC A2,DI140-2 P SC A2,ARG3 $ P RB RETUR 8 P END J@ V=/0030 N P ANKL A1,/FF00 A1=/1000 h P ADR A2,A1 A2=/1030 P SC A2,MU70 P SC A2,DI040 P SC A2,DI060 P SC A2,DI110 P SC A2,ARG1+1
0x13b3b0…13b544 Dummy {f00=0x0064, f01=0x2008, f02=» ST A2,MU10 P SC A2,DI140-2 P SC A2,ARG3 2 P RTN A14 F P END V@ bA2=/0030 P ANKL A1,/FF00 A1=/1000 v P ADR A2,A1 A2=/1030 P SC A2,MU70 P SC A2,DI040 P SC A2,DI060 P SC A2,DI110 P SC A2
0x13b544…13b6d8 Dummy {f00=0x0064, f01=0x0190, f02=» LABEL = RL 8.1:1 DATE = 78-03-03 PACK NBR = 001 f =IR E
[…0x2…]
0x13ba00…13bb94 (1, 245) Dummy {f00=0x0064, f01=0x0190, f02=»SUB EQU * P IFT OVERLY=1 P LDK A2,/80 ( P XRS A2,2,A14 < P RF T:SUB R P XIF d PT:SUBC ADKL A13,1 p ( PT:SUB LDK A2,6 INDICATE SUBTRACTION P RF ADD050 P* P************ P* ADDITION * P************
0x13bb94…13bd28 Dummy {f00=0x0064, f01=0x0190, f02=»1 $ PT:ADD LDK A2,0 INDICATE ADDITION PADD050 EQU * 2 P SC A2,SAVE+1 SAVE INDICATOR F P ST A13,ARG1 SAVE A13 j P LD* A7,4,A14 GET ARGUMENT & P ST A7,ARG STORE ARGUMENT FOR COMP P IFT OVERLY=0 " P CF A14,T:CPA COMPARE ABSOLUTE
0x13bd28…13bebc Dummy {f00=0x0064, f01=0x0190, f02=» $ P LDR A2,A7 COPY RESULT INDICATOR * P CF A14,GETOPS GET ELEMENT PARAMETERS 0 $ P LDR A1,A2 COPY RESULT INDICATOR ^ " P LDR A9,A6 GET POINTER TO OP1 PSAVE LDK A2,0 RESTORE A2 P* P LDK A5,0 CLEAR A5 P LDK A3,0 CLEAR A3
0x13bebc…13c050 Dummy {f00=0x0064, f01=0x0190, f02=»/F GET SIGN OP1 P LDR A7,A5 GET SIGN TO A7 P ANK A3,/F GET SIGN OP2 : ( P ANK A6,/F0 MASK OUT 1:ST DIGIT OP2 Z P SUK A6,/F0 P RF(Z) ADD060 JUMP IF BLANK P ADK A6,/F0 RESTORE DIGIT . PADD060 ANK A4,/F0 MASK OUT 1:ST DIGIT OP
0x13c050…13c1e4 Dummy {f00=0x0064, f01=0x0190, f02=»SIVE OR WITH SIGNS 4 P XRR A2,A5 EXCLUSIVE OR WITH SIGNS AND INDICATOR & P RF(Z) ADD078 JUMP IF EQUAL SIGNS R P NGR A4,A4 NEGATE A4 | . P XRR A2,A1 EXVLUSIVE OR WITH COMP. RESULT " P SRC A2,2 SHIFT BIT 14 TO SIGN 8 P RF(P) ADD076 JUMP IF OP
0x13c1e4…13c378 Dummy {f00=0x0064, f01=0x0190, f02=»DD078 JUMP IF OP1 ABSOLUTE GREATER THAN OP2 P LDK A7,/B LOAD PLUS SIGN 4 P RF ADD078 V PADD076 XRK A7,6 INVERT SIGN h PADD078 LDK A1,0 CLEAR CARRY P* P************************ P* ADDITION/SUBTRACTION * P**************
0x13c378…13c50c Dummy {f00=0x0064, f01=0x0190, f02=»T DIGITS t " P RF(N) ADD200 JUMP IF NEGATIVE P SUK A4,/A0 6 P RF(NN) ADD100 JUMP IF CARRY J P LDK A1,0 NO CARRY n $ PADD080 ADK A4,/A0 RESTORE DIGIT * PADD100 ADR A7,A4 GET BOTH DIGITS TO A7 $ PADD105 SCR A7,A9 STORE 2 DIGITS $ P S
0x13c50c…13c6a0 Dummy {f00=0x0064, f01=0x0190, f02=»* PADD150 LCR A4,A9 A4=BYTE OP1 P LDK A6,0 CLEAR A6 . & P IM T:OP2 INCREMENT INDEX FOR OP2 H * P RF(NN) ADD160 JUMP IF END OF ELEMENT r P LCR A6,A10 A6=BYTE OP2 PADD160 LDR A7,A4 COPY A4 P ANK A7,/F GET RIGHT DIGIT P SUK A
0x13c6a0…13c834 (1, 246) Dummy {f00=0x0064, f01=0x0190, f02=»DY DWTOR DISIOE DWTST OUTPUT DISEND LDREG SAVE8 TDISP ^DROD01 ODADY SETIMP STREG DISEND DWTST LDREG TDISP 2DVTOD DVTOD ODADN , 8EBCDIC TASCI
0x13c834…13c9c8 Dummy {f00=0x0064, f01=0x000c, f02=» P X ` h p x
0x13c9c8…13cb5c Dummy {f00=0x0064, f01=0x0190, f02=» 2 P IDENT DROD01 REL 8.1 78-04-21 870105040810 P : P* B 0 P******************************************* L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P* DROR01 = DRIVER OPTICAL CHARACTER READER P* P* P*
0x13cb5c…13ccf0 Dummy {f00=0x0064, f01=0x0190, f02=»UT FROM OCR t , P* CONNECTED TO CPU VIA CHLT OR CHRT. P* D " P* ONLY INPUT DATA FROM OCR N $ P* ARE HANDLED BY THE DRIVER. t P* P* 0 P* THE DRIVER CONSISTS OF FOLLOWING PARTS: P* " P* A C O D : ACTIVATION
0x13ccf0…13ce84 Dummy {f00=0x0064, f01=0x0190, f02=»* P* , P* THE FOLLOWING ORDERS ARE THREATED: P* D P* ORDER 02: READ DOCUMENT N & P* ORDER 04: RESET INPUT BUFFER r P* P* P* NORMAL REGISTER USAGE : P* " P* REGISTER A1 : RETURN CODE & P*
0x13ce84…13d018 Dummy {f00=0x0064, f01=0x018e, f02=» STACK BASE ~ " P* A6 : DWT-ADDRESS P* A7 : ORDER : " P* A8 : ECB-ADDRESS Z P* P* P* P* SYSTEM ADAPTATION P* 4 P* THE LENGTH OF THE CIRCULAR INPUT BUFFER IS 8 P* DEFIN
0x13d018…13d1ac Dummy {f00=0x0064, f01=0x0190, f02=» P* , P* IF TIMING IS WANTED, TIMER POINTER , P* IN DWT MUST BE SET UNEQUAL TO ZERO. > 2 P* STANDARD VALUE FOR TIME-OUT IS 30 SECONDS n 0 P* SINCE LAST CHARACTER. IF ANOTHER VALUE * P* IS WANTED FOR A SYSTEM, INDICATOR $ P*
0x13d1ac…13d340 Dummy {f00=0x0064, f01=0x0190, f02=» TO EXCLUDE FROM THE DRIVER FOLLOWING FUNCTIONS: P* 8 " P* -----POWER ON INDICATION B P* -----TIME-OUT-FUNCTION h P* P* ENTRIES P* P* P ENTRY ODAD ADDRESS-BLOCK P* P* P* & P* EXTER
0x13d340…13d4d4 (1, 247) Dummy {f00=0x0064, f01=0x0190, f02=»A4 REMOVE FROM QUEUE ( PTWR:20 CM* 0,A2 RESET TIMER POINTER P LDK A1,/40 RETURN CODE H P RB END:IO h P* z P* READ REQUEST TIMEOUT P* PTIMORE EQU * P LDR A6,A1 DWT ADDRESS P RB TWR:20 P EJECT P* ,
0x13d4d4…13d668 Dummy {f00=0x0064, f01=0x018e, f02=»QUEST TO BE ABORTED IS A v 2 P* INTERTASK REQUEST, AND IF SO IT WILL UPDATE & P* QUEUE AND ABORT TIMER (IF ANY) V P* ( P* ENTRY PARAMETER: A6 DWT ADDRESS , P* REG. A1,A2,A3,A4 ARE CHANGED P* PITABRT EQU * * P LDK
0x13d668…13d7fc Dummy {f00=0x0064, f01=0x0190, f02=» P CF A15,ABTIM ABORT TIMER P RF IH:RTN & 2 PITAB20 LDKL A3,ITADO ACTIVATION ADDRESS WRITE 8 P CW A3,DWTADR,A6 n P RF(NE) IH:RTN NOT INTERTASK P* P* ABORT WRITE REQUEST P* P LDR A2,A6 P CF A15,ABTIM ABORT TIMER
0x13d7fc…13d990 Dummy {f00=0x0064, f01=0x0190, f02=»,A1 NEXT IN QUEUE P CWR A1,A6 THIS DWT? P RB(NE) IWR:10 NO! 6 P LDR* A3,A1 REMOVE P P STR A3,A4 FROM QUEUE j P RF IH:RTN P EJECT P* 8 P* A B T I M = SUBROUTINE FOR ABORTING TIMER IF ANY P* ( P* ENTRY PARAMET
0x13d990…13db24 Dummy {f00=0x0064, f01=0x0190, f02=»RESS t P LDR* A3,A1 " P RF(Z) ABT:10 NO TIMER ACTIVE P CM* 0,A1 F " P CMR A1 INDICATE NO TIMER SET X PABT:10 EQU * ~ PIH:RTN ABL IHRTN P EJECT P* P* M O V B U F P* 4 P* SUBROUTINE TO MOVE BUFFER FROM S
0x13db24…13dcb8 Dummy {f00=0x0064, f01=0x0190, f02=»RETURN CODE /8 IF SENDING REQ. LEN | . P* WAS GREATER THAN RECEIVING REQ. LEN. * P* P* INPUT PARAMETERS: f P* A2 RECEIVING DWT P* A5 STACK POINTER P* A6 SENDING DWT P* P* REGISTER USAGE: & P* A1
0x13dcb8…13de4c Dummy {f00=0x0064, f01=0x0190, f02=»ACK POINTER P* A6 DWT SENDING TASK $ P* A7 RECEIVING BUFFER POINTER 4 $ P* A8 ECB ADDRESS SENDING TASK P* A9 RETURN CODE P* PMOVBUF EQU * P LD A8,DWTECB,A6 SENDING ECB P ENB P LDKL A9,0 " P LD A1,D
0x13de4c…13dfe0 Dummy {f00=0x0064, f01=0x018e, f02=» LDKL A9,/8 RETURN CODE P LD A3,ECBRL,A1 P RB(N) DIS:OE 8 PMOV:05 EQU * N P b P ST A3,ECBEL,A8 EFF. LEN j P ST A3,ECBEL,A1 EFF. LEN PMOV:10 EQU * * P LD A4,ECBBA,A8 SENDING BUFFER ADDRESS $ P LD A7,ECBBA,A1 REC.BUFFER A
0x13dfe0…13e174 (1, 248) Dummy {f00=0x0065, f01=0x0190, f02=»****** ~ P* SPECIAL TEXT ELEMENT * P************************ . PSTXTEL EQU *-BASIS N P LDR A3,A7 SAVE A7 h P LDR A7,A1 LOAD CHAR IN A7 P ST A13,SVA13 SAVE A13 P LD A13,-2,A13 GET NEW BASE P IFT OVERLY=0 ( P CF A14,T:OP
0x13e174…13e308 Dummy {f00=0x0065, f01=0x0002, f02=» H
0x13e308…13e49c Dummy {f00=0x0065, f01=0x018e, f02=» J F IDENT DRCR01 REL 8.2 78-09-15 870105040820 & " CRADR ACCRY CRONY IHCRY DWCR01 R CRADR | ACCRY DISIOE , ( P B PU W Y A TENDIOC
0x13e49c…13e630 Dummy {f00=0x0065, f01=0x0190, f02=» h IHCRY INTSAV * & X Z6 A _B A , , ( @ X (@ 4 W I X Z , ( 3 4 ;DR Q B , ( S ;AY B U Y C T , ( ! s Q P &W -W /W A L
0x13e630…13e7c4 Dummy {f00=0x0065, f01=0x0190, f02=» Q @ N T D W z , ( :#@'=" @ L Q @ N R Q ;A , ( Y T ;AT @ L L @ N , W J , ( 3 [.<(+^!$*);] ,%_>? Y ? z , ( S @ T X 1 PR B T X , ( s 0 :ET P OFT Y .
0x13e7c4…13e958 Dummy {f00=0x0065, f01=0x4106, f02=» P U W -W ;R =Q G R K ` [U e f H D ! q oT yW }W W Q` V8 R W Pn Qf T^ H H D ! W` QJ RB Q> T2 T. % 2 1W 3 8 5 > 7 D U WTD eR, mT {T T @
0x13e958…13eaec Dummy {f00=0x0065, f01=0x2008, f02=»
0x13eaec…13ec80 Dummy {f00=0x0065, f01=0x018e, f02=»A4,EDSIGN STORE IN SIGN INDICATOR , P NGR A1,A1 GET POSITIVE LENGTH IN BYTES * P SUR A6,A1 Z ( P ADK A6,1 GET ELEMENT START ADDRESS l & P SLL A1,1 LENGTH IN BCD INCL. SIGN & P SUK A1,1 LENGTH IN BCD EXCL. SIGN P LC A3,EDEPOI GET SAVED A3
0x13ec80…13ee14 (1, 249) Dummy {f00=0x0065, f01=0x0190, f02=» DATA /0005,/1500,/0C00,/0000 08-0F ( P DATA /1011,/1213,/3C3D,/3226 10-17 , ( P DATA /7019,/3F27,/1C1D,/1E1F 18-1F X ( P DATA /404F,/7F7B,/5B6C,/507D 20-27 ( P DATA /4D5D,/5C4E,/6B60,/4B61 28-2F ( P DATA /F0F1,/F2F3,/F4F5,/F6F7 30-37 ( P
0x13ee14…13efa8 Dummy {f00=0x0065, f01=0x4158, f02=»A /D7D8,/D9E2,/E3E4,/E5E6 50-57 ( P DATA /E7E8,/E94A,/005A,/5F6D 58-5F ( ( P DATA /0081,/8283,/8485,/8687 60-67 T ( P DATA /8889,/9192,/9394,/9596 68-6F ( P DATA /9798,/99A2,/A3A4,/A5A6 70-77 ( P DATA /A7A8,/A91C,/6A00,/0000 78-7F 4 P DAT
0x13efa8…13f13c Dummy {f00=0x0065, f01=0x2008, f02=» NT EBCASC TESTVERSION 1 END (@ 4
0x13f13c…13f2d0 Dummy {f00=0x0065, f01=0x0190, f02=»TINE EXECUTES THE MULTIPLY INSTRUCTION ON THE ALPLA COMPUTER P* CALLING SEQUENCE: D ( P* LD A6,ARG1 ` ( P* LD A7,ARG1 P* CF A14,MPYMOD ( P* RETURN : RESULT IN A1,A2 0 P
0x13f2d0…13f464 Dummy {f00=0x0065, f01=0x0190, f02=»IN ERROR EXIT P CWR A3,A6 P RF(4) SUITE 6 P CWR A3,A7 V P RF(0) END3 v < P LDR A6,A7 * A6= X'8000' A7# X'8000' 4 P LDR A7,A3 * EXCHANGE A6-A7
0x13f464…13f5f8 Dummy {f00=0x0065, f01=0x0190, f02=»5 z P ADK A6,0 P RF(0) END0 ( P RF(6) ARG1PS F 0 P ADK A3,1 *ARG1 NEGATIVE f P C1R A6,A6 P ADK A6,1 PARG1PS ADK A7,0 P RF(0)
0x13f5f8…13f78c Dummy {f00=0x0065, f01=0x0190, f02=» ADK A7,1 P RF(3) CASSPE PARG2PS SRC A7,1 6 P RF(6) NOVER1 T P ADR A1,A6 t PNOVER1 SRA A2,1 P SRC A1,1 P RF(6) NOVER2 P ORK.L A2,/40
0x13f78c…13f920 Dummy {f00=0x0065, f01=0x0190, f02=»*END* RESTORE SI=N r P RF(0) END1 P C1R A1,A1 8 P C1R A2,A2 X P ADK A2,1 x D P*CAUTION THE NEXT INSTRUCTION IS ABSOLUTELY NECESSARY TO SET CR < P* WHEN THE ADK A2,1 SET AN OVERFLOW CR EX
0x13f920…13fab4 (1, 250) Dummy {f00=0x0065, f01=0x0190, f02=» LABEL = RL 8.1:1 DATE = 78-03-03 PACK NBR = 001 f 4 &: 4: V - P Y _( Y M : ] =IR E
0x13fab4…13fc48 Dummy {f00=0x0065, f01=0x0002, f02=»
0x13fc48…13fddc Dummy {f00=0x0065, f01=0x0190, f02=» J F IDENT MULDIV REL 8.2 78-09-15 870172840820 > : T:MUL T:DIV T:SIGN T:BRK T:MULCA T:DIVCA M:BRK M:SIGN R T:MULCA T:MUL T:MOV T:SUB , ( D 0 0
0x13fddc…13ff70 Dummy {f00=0x0065, f01=0x018e, f02=» 8 j T:DIVCA f T:DIV j , ( W ! : 9 [ : 0 T:CMP ` , ( wD 0@ @@ 0@P p , ( 0R P [ P 0 * & _ P 0 , ( @
0x13ff70…140104 Dummy {f00=0x0065, f01=0x0190, f02=» * & @ [ _ _ 0 9A [ T:OPS 6 , ( @ @ [ 8 * F RETMMM v M:BRK R T:BRK R , ( 7 ! # 9 + : R [ ( , ( U U Z D $ A A z A A A
0x140104…140298 Dummy {f00=0x0065, f01=0x4072, f02=» ! R R -P 1P q R u Px R R P Pd PB R Q R GR L @ n RETMMM v M:BRK R T:BRK R , ( 7 ! # 9 + : R [ ( , ( U U Z D $ A A z A A A
0x140298…14042c Dummy {f00=0x0065, f01=0x2008, f02=»
[…0x1…]
0x1405c0…140754 (1, 251) Dummy {f00=0x0065, f01=0x0190, f02=» h * & D A ~ 4 A ._ @ ~X _ X , ( R X P T Y W ! 6 , ( C 4 Q ! f , ( 4 @ 1 ! P A ! W A , ( ! A ! 4 @ T A IH0701 R
0x140754…1408e8 Dummy {f00=0x0065, f01=0x0190, f02=» A 2 ! 4J T z , ( * ! ! P W ! P @ A & IH0702 J , ( 4 0 P 4 ^ , ( D 0:H P B T ! @ 0P A 0 , ( Q A W J T ! P ! XbW 4 W , ( A A
0x1408e8…140a7c Dummy {f00=0x0065, f01=0x0190, f02=» _T @ ` ~ DC07ON , ( @ @ P $ , 4 @ T 2 , ( DT Z A ! A ! , @ A b , ( E & A a & DW0700 , ( 4 , A >
0x140a7c…140c10 Dummy {f00=0x0065, f01=0x0190, f02=» q | } ( : L ^ p , ( UUW W A A @ - - ( $ R A @ @ 4 , ( -
0x140c10…140da4 Dummy {f00=0x0065, f01=0x0190, f02=» 5 GP K R Q Z YWp iT y P t H D !QF P P P P P P ) /R6 7T. AP* & T 0 H D ! , T T Pf T H P T H P2 | H D !: P %T 7 > C I H QT4 U aP g q uT$ R( T T
0x140da4…140f38 Dummy {f00=0x0065, f01=0x0190, f02=» T T R P ` H D !: T W P W # ) +T ; =P AW E H D ! B Y : ]T& a gT qW }R W T P W P P n T h H D ! P Q W T P W W T < # @ ' D + H / L H D ! 3 P
0x140f38…1410cc Dummy {f00=0x0065, f01=0x400e, f02=» @ R P ` H D !: T W P W # ) +T ; =P AW E H D ! B Y : ]T& a gT qW }R W T P W P P n T h H D ! P Q W T P W W T < # @ ' D + H / L H D ! 3 P
0x1410cc…141260 Dummy {f00=0x0065, f01=0x2008, f02=» SSTI40 LDREGO n IHLCU1 LOGOUT IHLCUX IHLCU2 STREGI WR100 STREGO T LCI3G < LCI4 @ LCI5 D LCI6 H LCI7 L LCI8 P RTNA15 4 LCO3G p LCO4 t LCO5 x LCO6 | LCO7 LCO8 DCTAB 2 FINT10 FINT20 DRDC15 DRDC10 SPTIM DRDC2
0x141260…1413f4 (1, 252) Dummy {f00=0x0066, f01=0x0190, f02=» ADK A4,1 = $ P SCR A2,A4 SAVE PRESENT COUNTERS > P ADK A4,1 > : $ P SCR A3,A4 SAVE FAIL PARAMETERS > L P RTN A5 > t P EJECT > P* > P* > P* HDLC OUTPUT PROCESS > P* > . P* QUEUED AS MONITOR JOB FROM INPUT PROCESS > P* > $
0x1413f4…141588 Dummy {f00=0x0066, f01=0x0190, f02=»DING > h P* ? P* ? PTRM EQU * ? P INH SET INHIBIT ? 2 " P LDKL A5,STBUT LOAD STACKBASE ? L P LDR A7,A1 SAVE PARAMETER ? r P CCK A1,/FF00 REJ ? ? P RF(NE) TRM050 NO ? " P LDK A1,REJ LOAD 'REJ'+ F-BIT ? P RF TRM110 ? PTRM050
0x141588…14171c Dummy {f00=0x0066, f01=0x018e, f02=» SUK A1,1 ? P RF(Z) TRM100 UA ON QUEUE @ P SUK A1,1 @ 4 P RF(Z) TRM120 ROL ON QUEUE @ F P SUK A1,1 @ h P RF(Z) TRM130 RR ON QUEUE @ z P SUK A1,1 @ P RF(Z) TRM140 CMDR ON QUEUE @ ( P RF TRM150 CHECK APPLICATION QUEUE @ P EJECT @
0x14171c…1418b0 Dummy {f00=0x0066, f01=0x0190, f02=» @ " P CF A5,TRSFR SEND SHORT FRAME A P ABL TDISP END OF JOB A . P* A L P* A V P* ROL SHOULD BE SENT A ` P* A | P* A PTRM120 EQU * A P LDK A1,ROL LOAD 'ROL'+F A P RB TRM110 A P* A P* A P* RR SHOULD BE SENT A P*
0x1418b0…141a44 Dummy {f00=0x0066, f01=0x0190, f02=» P SLL A2,5 ADJUST IT B P ORR A1,A2 INSERT IN RR B P RB TRM110 B @ P* B R P* B P* CMDR SHOULD BE SENT B f P* B P* B PTRM140 EQU * B & P LDKL A4,DLOBUF GET BUFFER ADDRESS B P LDK A3,5 FRAME LENGTH TO A3 B P CF A5,WRFRAM
0x141a44…141bd8 Dummy {f00=0x0066, f01=0x0190, f02=» B P* C PTRM150 EQU * C ( P LD A6,DCWRQ CHECK APPLICATION QUEUE C & $ P RF(NZ) TRM300 SOMEONE ON QUEUE C R PTRM170 EQU * C z $ P LD A1,DCRBUF BUFFER SHORTAGE ? C P RB(NZ) TRM130 NO C P* C P* C * P* RNR SHOULD BE SENT, BUFFER SHORTAG
0x141bd8…141d6c Dummy {f00=0x0066, f01=0x018e, f02=»TRANSMIT AN IFRAME C P* D PTRM300 EQU * D $ " P SUK A6,DWTWQ GET DWT ADDRESS D 8 . P LDKL A4,DLOBUF GET OUTPUT BUFFER ADDRESS D ^ ( P CF A5,PRCFI PREPARE C-FIELD FORMAT D $ P LD A8,DWTECB,A6 GET ECB ADDRESS D ( P LD A3,ECBRL,A8 GET REQUESTED LENGTH
0x141d6c…141f00 Dummy {f00=0x0066, f01=0x0190, f02=» * P LD A7,ECBBA,A8 OUTPUT BUFFER ADDRESS E ( P ADK A7,1 USE FREE-WORD TO INSERT IT E 2 P SCR A1,A7 E ^ $ P SUK A7,2 INIT OUTPUT ADDRESSING E p P ST A7,SWITCH E T P**************** INITIALIZATION COMPLETED,SEND THE WHOLE FRAME ********** E P C
0x141f00…142094 (1, 253) Dummy {f00=0x0066, f01=0x0190, f02=» RES RBUFL+3 m P DATA *+RLINK n P RES RBUFL+3 n * P XIF n > P IFT RBUFNR=7 n J P DATA *+RLINK n ` P RES RBUFL+3 n v P DATA *+RLINK n P RES RBUFL+3 n P DATA *+RLINK n P RES RBUFL+3 n P DATA *+RLINK n P RES RBUFL+3 n P
0x142094…142228 Dummy {f00=0x0066, f01=0x0190, f02=» P RES RBUFL+3 o P DATA *+RLINK o P RES RBUFL+3 o . P DATA *+RLINK o B P RES RBUFL+3 o X P XIF o l P IFT RBUFNR=5 o x P DATA *+RLINK o P RES RBUFL+3 o P DATA *+RLINK o P RES RBUFL+3 o P DATA *+RLINK o P RES RBUFL+3 o
0x142228…1423bc Dummy {f00=0x0066, f01=0x0190, f02=»FT RBUFNR=3 o P DATA *+RLINK p P RES RBUFL+3 p * P XIF p > P DATA *+RLINK p J P RES RBUFL+3 p ` P DATA 0 p t P RES RBUFL+3 p P* p P EJECT p P* p P* p P* DC TRANSMIT BUFFER POOL p P* p P* p PDCTBUF EQU * p
0x1423bc…142550 Dummy {f00=0x0066, f01=0x0190, f02=» p f P RES TBUFL BUFFER AREA 3 q PBUF4 DATA 0 END OF CHAIN q ( P RES TBUFL BUFFER AREA 4 q H P XIF q h P* q t P EJECT q ~ P* q & P* DATA LINK CONTROL OUTPUT BUFFER q P* q P* q PDLOBUF EQU * q P RES 6 OUTPUT BUFFER q P EJE
0x142550…1426e4 Dummy {f00=0x0066, f01=0x0190, f02=»5555 q P RF LOG10 r PLOGOUT EQU * r P LDK A1,0 r 2 P RF LOG10 r D PLOGIN EQU * r V P LDKL A1,/1111 r j PLOG10 ST A3,SAVE3 r P ST A2,SAVE2 r P LD A3,LOGPNT r P STR A1,A3 r P ADK A3,2 r P STR A2,A3 r P ADK A3,2 r
0x1426e4…142878 Dummy {f00=0x0066, f01=0x0190, f02=» PLOGE10 RTN A5 s P EJECT s P* s ( P* s 2 PLOGPNT DATA LOGSTA s < PLOGSTA EQU * s V P RES 400 s j PLOGEND EQU *-6 s z PSAVE2 DATA 0 s PSAVE3 DATA 0 s P XIF s P* s P* s P* s P EJECT s P* s P* s P***
0x142878…142a0c Dummy {f00=0x0066, f01=0x4088, f02=»-TAB'S VARIABLE LENGTH s * P DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 t PDC:END EQU * END OF TABLE t L P* t n P END t x@ t s z PSAVE2 DATA 0 s PSAVE3 DATA 0 s P XIF s P* s P* s P* s P EJECT s P* s P* s P***
0x142a0c…142ba0 Dummy {f00=0x0066, f01=0x2008, f02=» u PLOGEND EQU *-4 J PSAVE2 DATA 0 J $ PSAVE3 DATA 0 J 8 P XIF J L P* J X P* J b P* J l P END J v@ J I | P ADK A3,2 I P CWK A3,LOGEND I P RF(L) LOGEXI I P LDKL A3,LOGSTA I PLOGEXI ST A3,LOGPNT I P LD A2,S
0x142ba0…142d34 (1, 254) Dummy {f00=0x0066, f01=0x0190, f02=»r r r r r r r !!IL 16 !!IL 08 EXTRN TTAB DATA TTAB DATA LED DC:TAB!!CH $$DWDC $$DWDC $$ !!CH $$/EE$$'00'$$ EXTRN DWREMU DATA /015 DATA DWREMULED BLOK:S!!IL 14 DATA *+6,0,0 - - !!CH $$/3C$$ $$!!CH $$TTMJOB$$TTMJO
0x142d34…142ec8 Dummy {f00=0x0066, f01=0x0002, f02=» (
0x142ec8…14305c Dummy {f00=0x0066, f01=0x0190, f02=» 2 P IDENT DWII01 REL 8.1 78-04-21 870105040810 P* : ( P* INTERTASK COMMUNICATION INPUT DWT D P* p P ENTRY DWII01 TABLE ENTRY z P P EXTRN ITADI DRIVER ENTRY P PDWII01 EQU * & P DATA 0 QUEUE ANCHOR OUTPUT DWT'S
0x14305c…1431f0 Dummy {f00=0x0066, f01=0x40c0, f02=» | $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE 0 P DATA 0 TIMER POINTER N P DATA 0 TIME OUT l P DATA 0 P DATA 0,0 SAVE AREA P END @ P PDWII01 EQU * & P DATA 0 QUEUE ANCHOR OUTPUT DWT'S
0x1431f0…143384 Dummy {f00=0x0066, f01=0x2008, f02=» DATA 0 TTAB ADDRESS $ DATA 0 WAIT/ACTIVATE INDICATOR $ DATA 0 TERMINAL QUEUE L DATA 0 TIMER POINTER j DATA 0 TIME OUT DATA 0 DATA 0,0 SAVE AREA END @ & ! DATA 0 QUEUE ANCHOR OUTPUT DWT'S
0x143384…143518 Dummy {f00=0x0066, f01=0x018e, f02=»FIND TTAB ADDRESS FROM TID P EXTRN TTB:TD " P EXTRN TTB:ST TTAB STATUS 8 " P EXTRN DWTTAB DWT TTAB ADDRESS Z $ P EXTRN DWTADR ACTIVATION ADDRESS * P EXTRN IHRTN RTN A15 WITHOUT ENABLING $ P EXTRN ECBBA ECB BUFFER ADDRESS & P EXTRN ECB
0x143518…1436ac Dummy {f00=0x0066, f01=0x0190, f02=» p P* P* C O N S T A N T S P* 0 PDWTTP EQU /10 TIMER POINTER : " PDWSTB EQU /18 STACK BASE USED ^ * PDWSTB2 EQU /1E STACK BASE 2 (NOT USED) PDWTIM EQU /12 TIME PDWQACH EQU /14 QUEUE ANCHOR P EJECT P* P
0x1436ac…143840 Dummy {f00=0x0066, f01=0x0190, f02=»F(Z) READ READ ORDER P SUK A7,9 P RF(Z) WRITE WRITE ORDER . P SUK A7,/2E N P RF(NZ) DIS:OE REQUEST ERROR b P* P* S E T T I M E O U T P* P LD A1,10,A8 TIME P ST A1,DWTIM,A6 P LDK A1,0 RETURN CODE
0x143840…1439d4 (1, 255) Dummy {f00=0x0066, f01=0x018e, f02=»CH KEY ~ P XIF P PFD:DIS EQU * " P ABL DISIOE REQUEST ERROR 6 P EJECT X P* f P*************** p P* * P* BASIC WRITE * P* * P*************** P* PFD:010 CF A5,BIO
0x1439d4…143b68 Dummy {f00=0x0066, f01=0x0190, f02=» x P XIF P IFT IBM=1 , P LDR A7,A3 NO OF CHAR. TO BE TRANSFORMED & P CF A5,EBCDIC V PFD:018 EQU * l P XIF " P CF A5,FD:WRITE PERFORME WRITE P RF FD:048 GOTO FD:RC P* P****************** P* *
0x143b68…143cfc Dummy {f00=0x0066, f01=0x0190, f02=»IO BITS 13-15 ~ P RB FD:015 P EJECT ( P* 6 P********************** @ P* * ^ P* WRITE DELETED DATA * | P* * P********************** P* PFD:030 CF A5,BIO P ORK A2,6
0x143cfc…143e90 Dummy {f00=0x0066, f01=0x018e, f02=»*************** P* PFD:040 CF A5,BIO:RE " P IFT DAMA+IBM=2 > P LD A1,DWTLAB,A6 V P AN A1,DWTA3,A6 n P RF(Z) FD:042 TOSS DISC P XIF P IFT IBM=1 P LDKL A4,BUF PFD:042 EQU * P XIF $ PFD:045 CF A5,FD:
0x143e90…144024 Dummy {f00=0x0066, f01=0x0190, f02=» P IFT IBM=1 P LD A7,ECBRL,A8 REQ LEN ( P LD A4,ECBBA,A8 ASCII OUTPUT ADDRESS 6 P CF A5,ASCII b PFD:047 EQU * v P XIF PFD:048 EQU * P ABL FD:RC P EJECT P IFT DAMA+IBM=0 P* P************** P*
0x144024…1441b8 Dummy {f00=0x0066, f01=0x0190, f02=»DRESS x P LDR* A2,A4 KEY AREA LENGTH P LDR A1,A2 2 " P ABL(NP) END:10 ILLEGAL LENGTH D P SUK A1,128 j " P ABL(P) END:10 ILLEGAL LENGTH ~ P LDR A3,A2 P* * P* IF ODD CHANGE TO EVEN NO OF BYTES P* P ADK A3,1
0x1441b8…14434c Dummy {f00=0x0066, f01=0x018e, f02=» CF A5,FD:WRI SEARCH KEY P LDR A3,A3 RETURN CODE P RB(NZ) FD:048 > P* T $ P* READ RECORD WITH KEY COMMAND ^ P* PFD:060 EQU * P LDKL A2,/8004 BIO P LD A3,4,A8 REQUESTED LENGTH P CWK A3,130 " P ABL(NE) END:10 IL
0x14434c…1444e0 Dummy {f00=0x0066, f01=0x018e, f02=» ~ P* TEST STATUS * P* * P*************** 8 P* P PFD:070 EQU * Z P LDKL A2,/FFF9 BIO DUMMY n P CF A5,FD:WRI " P ANKL A3,/0201 WRITE PROTECT? P LDR A1,A3 P IFF DAMA+IBM=0 * P CF A5,VOLADR GET VO
0x1444e0…144674 (1, 256) Dummy {f00=0x0067, f01=0x0190, f02=» * - * P* FD:RC - STORE EFF LEN, END:IO * . , * P* * . Z * P************************************* . P* . P* INPUT: A3 RETURN CODE . P* . PFD:RC EQU * . P LDR A1,
0x144674…144808 Dummy {f00=0x0067, f01=0x0190, f02=»* . P********** / P* * / P* END:IO * / . P* * / @ P********** / R P* / d PEND:IO EQU * / n P CF A15,TENDIO / PT:DISP ABL TDISP / P* / P* / " P* ENTRY FROM RECOVERY ROUTINE / P* / 0 PEND:05 CM DWTECB,A6
0x144808…14499c Dummy {f00=0x0067, f01=0x018e, f02=» EJECT / P* 0 P******************** 0 P* * 0 4 P* RECOVERY ROUTINE * 0 P P* * 0 l P******************** 0 P* 0 PFDON INH 0 P CF A15,SAVE8 0 P LDKL A6,DWFD01 DWT ADDRESS 0 P IFT INI=1 0
0x14499c…144b30 Dummy {f00=0x0067, f01=0x0190, f02=» " P CM DWTRTY,A6 RESET RETRY FLAG 1 P XIF 1 * P IFT IBM+INI=2 1 6 P LDR A1,A6 1 L P ADK A1,DWTEOD 1 ^ P LDK A2,4 1 t PFDON02 EQU * 1 P CMR A1 CLOSE DATA SET 1 P ADK A1,2 1 P SUK A2,1 1 P RB(P) FDON02 1 P XIF 1 PFDON05 EQU
0x144b30…144cc4 Dummy {f00=0x0067, f01=0x018e, f02=» ALREADY DONE. 1 r P* DWTST IS SET BUSY 2 P* 2 4 P LD A2,DWTST2,A6 2 > P CWK A2,-1 2 V P RF(NE) FDON08 ALREADY SAVED 2 h P LD A2,DWTST,A6 2 P ST A2,DWTST2,A6 2 PFDON08 CM DWTST,A6 SET BUSY 2 P* 2 P* DELAY 2 SEC 2 P* 2
0x144cc4…144e58 Dummy {f00=0x0067, f01=0x0190, f02=» PFDON10 LDK A4,DWTTP 3 P ADR A4,A6 3 P LDR A1,A6 SAVE A6 3 2 P CF A15,SETIMP 3 L P DATA FDON20,TIME 3 b P RB T:DISP 3 | P* 3 P* TIME OUT ROUTINE 3 P* 3 PFDON20 LDR A6,A1 3 P CM DWTTP,A6 3 P LDK A5,DWTSB2 3 P ADR A5,
0x144e58…144fec Dummy {f00=0x0067, f01=0x0190, f02=» P ANR A1,A2 4 P RF(Z) FDON30 NOT LOCKED 4 P ST A2,DWTA3,A6 SAVE 4 6 P* 4 R P* PUT DRIVE NO IN CIO INSTR 4 P* 4 P SRN A2,A3 DRIVE NO IN A3 4 * P CF A5,SETCIO PUT DRVE NO IN CIO-INSTR 4 P LDK A2,/14 LOCK 4 P CF A5,FD:REA 4 P
0x144fec…145180 Dummy {f00=0x0067, f01=0x0190, f02=» SLL A2,1 4 P CWK A2,/0010 5 P RB(NE) FDON25 5 ( P* 5 > P* ANY REQUEST? 5 H P* 5 ` P* 5 j . P* RESTORE STATUS SAVED IN DWST2 TO DWTST. 5 t P* SET DWTST2 TO -1 5 " P LD A2,DWTST2,A6 SAVED STATUS 5 * P ST A2,DWTST,A6 PUT IN CUURENT S
0x145180…145314 (1, 257) Dummy {f00=0x0067, f01=0x0190, f02=»D A2,DWTST,A6 5 0 P RB(N) END:05 NO REQUEST, RETURN VIA TENDIO 6 P* 6 J P* RETRY REQUEST 6 T P* 6 l P IM DWTRTY,A6 INDICATE RETRY 6 v P LD A7,DWTOR,A6 6 P ANK A7,/3F ORDER 6 P LD A8,DWTECB,A6 ECB ADDRESS 6 P ABL FDAD REACTIVATE 6
0x145314…1454a8 Dummy {f00=0x0067, f01=0x0190, f02=» * 6 ~ P********************* 7 P* 7 * PIHFD EQU * 7 4 $ P ST P,INTSAV SAVE LAST INTERRUPT 7 F P IFT CHAN=1 7 n P STR A1,A15 7 P STR A2,A15 7 P STR A3,A15 7 P LDKL A2,DWFD01 7 . P LD A1,DWTUB,A2 POINTER AT WORD IN BUFFER 7 * P
0x1454a8…14563c Dummy {f00=0x0067, f01=0x0190, f02=» ADK A1,1 UPDATE BUFFER POINTER 7 P LCR A2,A1 SECOND CHAR. 8 ( P OTR A2,0,CUADR WRITE 8 H P RF(A) IH020 ACCEPTED 8 f P RF IH040 NOT ACCEPTED 8 PIH010 INR A2,0,CUADR READ 8 P RF(NA) IH040 NOT ACCEPTED 8 P ECR A3,A2 8 & P SCR A3,A1 FIRST
0x14563c…1457d0 Dummy {f00=0x0067, f01=0x018e, f02=»DDRESS 8 v P ADK A1,1 9 * P ST A1,DWTUB,A2 POINTER AT NEXT CHAR. 9 P CW A1,DWTUBE,A2 9 N P RF(NE) IH030 NOT LAST WORD 9 f P CIO A2,0,CUADR CIO HALT 9 PIH030 EQU * 9 P LDR* A3,A15 9 P LDR* A2,A15 9 P LDR* A1,A15 9 P RTN A15 9
0x1457d0…145964 Dummy {f00=0x0067, f01=0x0190, f02=» P STR A7,A15 : P STR A8,A15 : P XIF : , P IFF CHAN=1 : 8 P CF A15,SAVE8 : L P XIF : b P SST A3,CUADR STATUS : n P LDKL A6,DWFD01 DWT ADDRESS : P LD A8,DWTECB,A6 ECB ADDRESS : " P LD A5,DWTA5,A6 STACK POINTER : P SLL A3,1 :
0x145964…145af8 Dummy {f00=0x0067, f01=0x0190, f02=»Y FLAG : x P LDR A1,A3 ; P ANKL A1,/0405 ; P RF(Z) IH:10 RETURN CODE OK ; 6 P LDK A1,/4 ; Z P ORR A3,A1 CRC ERROR ; l PIH:10 EQU * ; P* ; & P* TRANSFORM RETURN CODE, CU - ECB ; P* ; P ANKL A3,/FF37 ; P RF(Z) IH:80 ; P LDR
0x145af8…145c8c Dummy {f00=0x0067, f01=0x0190, f02=» ; P IFT DAMA+IBM=0 < P LDR A4,A1 < P ANKL A4,/2000 BIT 2 < 2 P SLL A4,1 TO BIT 1 < N P ORR A3,A4 < h P XIF < z P LDR A4,A1 < P ANK A4,/20 BIT 10 < P SLL A4,3 TO BIT 7 < P ORR A3,A4 < P ANK A1,/10 BIT 11 < P SRC A1,5 TO BIT
0x145c8c…145e20 Dummy {f00=0x0067, f01=0x0190, f02=» < | P* READY INTERRUPT * = P* * = $ P******************** = @ P* = PFDRE EQU * = f P LD A2,DWTA2,A6 = x , P ABL(NZ) T:DISP POWER ON ROUTINE ACTIVE = P LDK A5,DWTSB2 = P ADR A5,A6 STACK BASE = P RB FDON60 = P E
0x145e20…145fb4 (1, 258) Dummy {f00=0x0067, f01=0x0190, f02=» $ P* WRITE : TRANSMIT ONE CHARACTER P* 0 P* : PWRITE EQU * D " P LDR* A1,A6 GET DEVICE ADDRESS X P ADR* A1,P ~ P OTR A2,0,0 P EXR A1 P RF(NA) WRI300 P IFF LOGG=0 P CF A15,LOGOUT P XIF PWRI200 E
0x145fb4…146148 Dummy {f00=0x0067, f01=0x0190, f02=»6 P ADR* A1,P P SST A1,0 P EXR A1 . " P ST A1,TPUT,A7 SAVE HW STATUS > P IM TPUTC,A7 d P ABL BMM RESTART REQUEST x P EJECT P* P* * P* READTO : READ WITH TIME SUPERVISION " P* FOR 2-/4-WIRE LINE
0x146148…1462dc Dummy {f00=0x0067, f01=0x0190, f02=»A RET040 P DATA TIMRE4 ( P ST A4,DWTTP,A7 STORE TIMER POINTER $ P LD A4,DWTSAV+2,A7 P PRESYNC EQU * RESYNCRONIZE j P CF A5,STINP PRES20 EQU * P CF A5,READ WAIT FOR SYN P LDR A2,A2 " P RB(N) RESYNC STATUS INTERRUPT
0x1462dc…146470 Dummy {f00=0x0067, f01=0x0190, f02=» A5 P EJECT PRET040 EQU * TIME OUT ENTRY P LDR A7,A1 > P CM DWTTP,A7 P P LDK A5,4 d P ADS A5,DWTA5,A7 v P LDKL A2,/8000 PRETO50 EQU * P ABL IHI200 P EJECT P* P* . P* READP : READ CHARACTER A
0x146470…146604 Dummy {f00=0x0067, f01=0x0190, f02=» v P ADK A5,4 P LDR A2,A2 " P RF(N) REDRET STATUS INTERRUPT , P LDR A1,A2 R P ANK A2,/7F d P CC A1,PARTAB,A2 x P RF(N) READP1 PREDRET ABR* A5 PREADP1 ADK A1,1 P RB REDRET P EJECT P* P* READ : S
0x146604…146798 Dummy {f00=0x0067, f01=0x0190, f02=»READ EQU * P ST A3,DWTSAV,A7 P ST A4,DWTSAV+2,A7 * P ST A5,DWTSAV+4,A7 D PREAD05 EQU * ^ PREAD10 EQU * r P IFT CPU852=1 P LDR* A8,A15 P LDR* A7,A15 P LDR* A6,A15 P LDR* A5,A15 P LDR* A4,A15 P LDR* A3
0x146798…14692c Dummy {f00=0x0067, f01=0x0190, f02=»CT P* P* SAVE 8 REG ON STACK P* 4 PSAVER EQU * > P IFT CPU852=1 R P ST A2,2,A15 h P STR A3,A15 | P STR A4,A15 P STR A5,A15 P STR A6,A15 P STR A7,A15 P STR A8,A15 P LD A2,16,A15
0x14692c…146ac0 Dummy {f00=0x0067, f01=0x0190, f02=» ABR A8 P XIF P EJECT < P******************************************************* * P* j ( P* INTERRUPT HANDLER , CHLC RECEIVER t P* < P******************************************************* P* P* P* P
0x146ac0…146c54 (1, 259) Dummy {f00=0x0067, f01=0x0190, f02=»PTS 6344 p : P* -CAN USE LOWER CASE CHAR. GENERATOR COLUMN 6 AND 7 8 P* -CAN SUPPRESS ECHOING OF END OF RECORD CHARACTER N & P* -CAN SUPPRESS TRAILING BLANKS F P* AND ALSO UNDERLINE START (/12), LOW INT (/1E), HIGH INT (/1F) P* P
0x146c54…146de8 Dummy {f00=0x0067, f01=0x0002, f02=»
0x146de8…146f7c Dummy {f00=0x0067, f01=0x016e, f02=» P$REL PMES @P PLED @P,/S,/EE,## P##DL 0 6 . P IDENT @P REL 8.1 78-04-21 870105040810 D P##EN v PKPF /S PBEA /S PKPF /O PEND P$RELF PMES @P PLED @P,/S,/EE,## P##DL 0 . P IDENT @P RE
0x146f7c…147110 Dummy {f00=0x0067, f01=0x2008, f02=» PMES @P PLED @P,/S,/EE,## P##DL 0 6 . P IDENT @P REL 8.1 78-04-21 870105040810 D P##EN v PKPF /S PBEA /S PKPF /O PEND P$RELF PMES @P PLED @P,/S,/EE,## P##DL 0 . P IDENT @P RE
0x147110…1472a4 Dummy {f00=0x0067, f01=0x0190, f02=»RE A6 ! z P RB GBUF10 RETURN " P XIF " ( P EJECT " 4 P* " B P* " L P* RELEASE RECEIVE BUFFER " V P* " v P* A4 CONTAINS BUFFER ADDRESS " $ P* CALLING SEQUENCE: CF A15,RRBUF " P* A2 AND A3 ARE DESTROYED " P* " P* " ( PRRBUF
0x1472a4…147438 Dummy {f00=0x0067, f01=0x0190, f02=»B RBUF10 " PRBUF20 EQU * # P STR A4,A2 # $ P CMR A4 # 6 P RB GBUF10 RETURN TO CALLER # F P* # j P* # t P* RELEASE TRANSMIT BUFFER # ~ P* # P IFF TBUFL=0 # P* A4 CONTAINS BUFFER ADDRESS # $ P* CALLING SEQUENCE: CF A15,RTBUF #
0x147438…1475cc Dummy {f00=0x0067, f01=0x0190, f02=»DRIVER BUFFER # P CWK A4,TBUF2 $ P RB(E) RBUF DRIVER BUFFER $ , " P RB GBUF10 APPLICATION BUFFER $ N P XIF $ t P EJECT $ P* $ P* $ ( P* INSERT DWT IN WRITE REQUEST QUEUE $ P* $ P* A2,A3,A4 DESTROYED $ P* A6=DWT $ P* $
0x1475cc…147760 Dummy {f00=0x0067, f01=0x0190, f02=» $ p P LDR A2,A3 % P RB INSWQ2 % PINSWQ3 ADR A4,A6 % , P STR A4,A2 INSERT IN QUEUE % D " P CMR A4 INDICATE END OF QUEUE % f P RB GBUF10 RETURN % P* % P* % * P* REMOVE DWT FROM WRITE REQUEST QUEUE % P* % P* A2,A3,A4 DESTROYED %
0x147760…1478f4 (1, 260) Dummy {f00=0x0068, f01=0x0190, f02=»INITIONS ~ P* " PFDBLNK EQU 0 LINK TO NEXT FDB PFDBECB EQU 18 ECB START @ PFDBSNR EQU 32 SECTOR NUMBER ` ( PFDBRRO EQU 34 RELATIVE RECORD OFFSET PFDBRLE EQU 36 RECORD LENGTH " PFDBBLF EQU 38 BLOCKING FACTOR * PFDBTNR EQU 39
0x1478f4…147a88 Dummy {f00=0x0068, f01=0x0190, f02=»T EXTENT BLOCK START ~ PEXTDMI EQU 0 DMTAST IDENT PEXTFC EQU 1 VOLUME FILE CODE > PEXTLEN EQU 2 EXTENT LENGTH b PEXTBAS EQU 4 EXTENT BASE " PEXTELE EQU 6 EXT ENTRY LENGTH $ PFDBLRN EQU 69 LAST RECORD NUMBER $ PFDBNIF EQU 68 NO OF IN
0x147a88…147c1c Dummy {f00=0x0068, f01=0x0190, f02=»BMIA EQU 78 ADDRESS OF MASTER INDEX * PFDBADF EQU 80 ADDRESS OF DATA FILE FDB , , PFDBAI1 EQU 82 ADDRESS OF INDEX FILE FDB Z 2 PFDBDBR EQU 90 DELAY,BASIC AND REL BUFFER FLAGS & PFDBMRN EQU 91 LAST REC NR IN FILE PFDBMRO EQU 94 MAX FDBRRO
0x147c1c…147db0 Dummy {f00=0x0068, f01=0x0190, f02=» EQU 8 CURRENT INDEX FILE P EJECT " P* 0 P************* : P* TIODM * P P************* f P* | P* & PTIODM DATA *+2 TIODM START ADDRESS P* P* SET UP A14 STACK P* P LDKL A14,TIOD14 P*
0x147db0…147f44 Dummy {f00=0x0068, f01=0x0190, f02=»D A3,2,A1 P CW A3,DWTTDM,A6 P RF(E) TIOD10 THIS TASK * P ADK A2,2 NO J P RB TIOD05 TRY NEXT ^ PTIOD10 EQU * z P LD A1,2,A3 TASK STATUS P RF(N) TIO13 DMTASK CALLING P* P* SET TASK ID FOR ALL FDBS P*
0x147f44…1480d8 Dummy {f00=0x0068, f01=0x0190, f02=»* P SUK A3,2 P RF(N) TIO13 ALL FDB READY P LDR* A5,A1 FDB ADDR > P RF(E) TIO12 NO FDB Z P SC A2,FDBTNR,A5 TASK ID v " P ORS A4,DWTST,A5 REQ BUSY BIT PTIO12 EQU * P ADK A1,2 NEXT FDB ADDR P RB TIO11 PTIO13
0x1480d8…14826c Dummy {f00=0x0068, f01=0x018e, f02=» BYTE n P* P LDKL A1,/8000 REQUEST ERROR & P LDK A2,NOOFOR-1 NO OF ORDERS - 1 < 2 PTIOD15 CC A7,TIODMO,A2 START AT END OF TIODMO f P RF(E) TIOD20 MATCH P SUK A2,1 P RB(NN) TIOD15 >= 0 P ABL TIODME ERROR RETURN PTI
0x14826c…148400 Dummy {f00=0x0068, f01=0x0190, f02=» P* $ PDELIXR EQU * DELETE INDEX RECORD P* : $ PINSIXR EQU * INSERT INDEX RECORD D P* l $ PIXRARE EQU * INDEXED RANDOM READ v P LDKL A4,-1 P RF TIOC10 P* " PREVTOC EQU * READ VTOC RECORD P* PCLOSE EQU
0x148400…148594 (1, 261) Dummy {f00=0x0068, f01=0x0190, f02=» n P AN A3,DWTA3,A6 P RF(Z) FD:080 TOSS LABEL P ORK A1,/20 SET BIT 10 (IBM) @ PFD:080 EQU * d P XIF x PFD:090 ABL END:IO P EJECT P* P******** P* * P* LOAD * P* * P******** P*
0x148594…148728 Dummy {f00=0x0068, f01=0x0006, f02=» ` h p
0x148728…1488bc Dummy {f00=0x0068, f01=0x0190, f02=» J F IDENT DRDC81 REL 8.2 78-09-15 870105040820 F B DC81ONK IH8101 IH8103 IH8105 IH8107 IH8109 IH8111L IH8113 R F B IH8115 IH8117 IH8119 IH8121 IH8123 IH8102L IH8104 IH8106 F B IH8108 IH8110 IH8112 IH8114R
0x1488bc…148a50 Dummy {f00=0x0068, f01=0x0190, f02=»120 DW8122O DW8124 DW8101 DW8103V DW8105V z F B DW8107M DW8109 DW8111O DW8113 DW8115 DW8117W DW8119 DW8121 4 DW8123 ~ DW81021 , ( 2 ! -
0x148a50…148be4 Dummy {f00=0x0068, f01=0x0190, f02=»123 IH8124 DW8121 " DW8122O 6 IH8121 J IH8122 ^ DW8119 r DW8120 IH8119 IH8120! DW8117W DW8118 IH8117 IH8118a
0x148be4…148d78 Dummy {f00=0x0068, f01=0x0190, f02=»113 IH8114R DW8111O " DW81122 6 IH8111L J IH8112 ^ DW8109 r DW81102 IH8109 IH8110 DW8107M DW81082 IH8107 IH8108
0x148d78…148f0c Dummy {f00=0x0068, f01=0x0190, f02=»103 IH8104 INTSAVP " ILLINTV 4 DISIOE F DWTST X , ( { T A P X h TENDIO TDISP , ( ! T 8!@X " , ( @X ! @ @ Y
0x148f0c…1490a0 Dummy {f00=0x0068, f01=0x018e, f02=» 6 E 6 Y z SETIME , ( ) 2 Y 4 X ( ! ! Y , , ( G ! y W Y X ( ! ! , ( g T Y ] X T 8 SETIMP , ( !@P ! ] _ 0 , ( @
0x1490a0…149234 (1, 262) Dummy {f00=0x0068, f01=0x0190, f02=» , ( P C X ! ECBCW 4 * & X ( ! T B D ECBBA r , ( AR _: _@ b DWTOR * & #@ X ! " Q R Y , ( = Y X
0x149234…1493c8 Dummy {f00=0x0068, f01=0x0190, f02=» B X( t , ( @ _.$ X2 8 X ! " B X ( , ( 0P } _^ > X D , ( ( ] 2 ! X V t , ( ! ! ! ! ! * & X X4 %_< * * X * &
0x1493c8…14955c Dummy {f00=0x0068, f01=0x0190, f02=» s Y ,) ! ! R ! ^ ! , ( ! B # X " 6 ) X 2T 0 , ( Y 2W ! Y ,ZD X 4T X " ` , ( 6 Y 4 W ] & , ( ! ! X ] _ ! , ( ! X P y
0x14955c…1496f0 Dummy {f00=0x0068, f01=0x0190, f02=» X 4P $^ T 6 _ , ( y $R Y 4 Y 4 ] W , ( Y 2 ] Y , c " ! P * & ! V ! ! Y ,Z ! , ( b # y 2 X 4T X , ( 2 Y 4 & P
0x1496f0…149884 Dummy {f00=0x0068, f01=0x0190, f02=» ! T n , ( g Y . c T ! R T Y . P ECBRL > , ( @ P B - B ]( ! R Y N , ( . P ! R P ! ! ~ , ( Y ,V ! C ! * & P $ R ! ^ ! C
0x149884…149a18 Dummy {f00=0x0068, f01=0x0190, f02=» ! l , ( U X . Y . ! ! Y , ! , ( u X _ ! X . ! ! C < , ( ! ! R T Y 0 l , ( @ C Y ,^ _4 ! ! , ( 0 C Y , B , ( 0+
0x149a18…149bac Dummy {f00=0x0068, f01=0x0190, f02=» C @ ! ! P ; T , ( c@ ! Y 0 C B , , ( } Y , Y . ! ! B B , ( P ^P , C " P , ( P Y . ! _2 C _ W , ( Y . ! X . !
0x149bac…149d40 Dummy {f00=0x0068, f01=0x0190, f02=» B ! | , ( @ M X _Z ! T Y , * & m! C C _ X _ B L , ( B XL ^ ! ! ! z , ( ! ! ! ! ! ! , ( ! ! ! 4 ! ] ,
0x149d40…149ed4 (1, 263) Dummy {f00=0x0068, f01=0x0190, f02=» ! j , ( C _L < B 4 8 B T , ( c W 4 Y ] ! ! < B : , ( 4 < A @ 4 8_ " H j , ( 8 B T Y Y " Y $W 8 I , ( ] ] ] " ] , ( " !
0x149ed4…14a068 Dummy {f00=0x0068, f01=0x0190, f02=»101 H , ( ( = A : TJ" , ( [ " $ & * 4 & < J > , ( { T < B 6! P ] n , ( P } ] ! P ! f ! , ( P } ] X P y Y , ( D
0x14a068…14a1fc Dummy {f00=0x0068, f01=0x018e, f02=» X 6 r , ( - 6 , P ! P Y > , > , ( M B , ( m # %& )* , / 12 4 78 ; => @ r , ( C EF IJ L O QR T WX [ ]^ a , ( b d gh k mn p s uv yz | , (
0x14a1fc…14a390 Dummy {f00=0x0068, f01=0x0190, f02=» , ( ) $ C ! F ! " ! , ( G P ! _ ! _ ! * R X 4 , ( g " P V C :AP Z d , ( P ! * ! R _* ! Y * & y Y ! f ! , ( X ( X $
0x14a390…14a524 Dummy {f00=0x0068, f01=0x0190, f02=» ! V 5 9 F A R K * QW c gTR wT P f H D ! f P P T R 1 " 3Q 5R ePZ uP yT* P L H D ! V. $ X ' +P /P 3P 7P EW M " OQ H D !M QW W " YP ]W R,
0x14a524…14a6b8 Dummy {f00=0x0068, f01=0x0190, f02=» ! ' ?T c eTB oT8 s uRH wT0 P P * | H D !& R P R P * Vr P4 R V. 8 H D ! ? IQ U e i $ u $ R T H D ! VD M * Q WP i P6 P,
0x14a6b8…14a84c Dummy {f00=0x0068, f01=0x4136, f02=» X h H D ! ! - 9T =W C U aT cWD s w J T $ H D !z W * Z * R ! J #R Y p T P P PH P P P p H D ! A P 5P ;P W T IP M _Rn qP wV P P
0x14a84c…14a9e0 Dummy {f00=0x0068, f01=0x2008, f02=» DISCON fxBMM OLI150 OLI165 OLI170 OTC110U OTC100 WRT105U " FINDTC " WRT130 R WRT110 > WRT107 : WRT120 N DRM000 b DRM300 DRM200 DRM250 DRM100 z DRM275 DRM400 HALTUTU OUTPUT POLLT $ BMM10 STOUT X WRITE SELEC
0x14a9e0…14ab74 (1, 264) Dummy {f00=0x0069, f01=0x0190, f02=» T C P ~ , ( } C ! C W ! X , ( $T Y @ R pP A N , ( n @ R A p Y X P Y ~ , ( @ (P _ ) A @ @ <P , ( ! A @ ! ! @ P PT @
0x14ab74…14ad08 Dummy {f00=0x0069, f01=0x0190, f02=» T n , ( B s _8 ! _ @ l @ 8 ! _( @ l @ , ( 8 ! A @ @ <P ! _ A > , ( B @ ! @ P PP @ R p @ nT n , ( H @ hT @ 8 X P X A R X ! , ( " P A B ! X Z X , ( B" A
0x14ad08…14ae9c Dummy {f00=0x0069, f01=0x0190, f02=»BD k @ hP ! @ DP @ j X A R 8 A , ( P ! Y A D A j @ t . , ( $ 8 A P p A R_ @ 8 A h X A R Y ^ , ( J 4 @ p A R @ A P 4 A n @ 8 X , ( @ R , , ( P _ Y , T
0x14ae9c…14b030 Dummy {f00=0x0069, f01=0x0190, f02=» @ <P A < @ :P X ~ , ( R X P T T Y W ! , ( l @ L P T P N , ( R A : 4 A < A fW ! ~ , ( D ! @ ! @ ^ ! @ ` ! , ( J W A < A fW @ A P
0x14b030…14b1c4 Dummy {f00=0x0069, f01=0x0190, f02=» 0 n , ( " P ! _ ! ! ! , ( H B J 4 A V @ Z A X A Z ! @ > , ( Z ! L Z ! A Y @ X A n , ( Z @ :T _n ! M Z ! @ , ( !B M Z ! @ P M Z ! @ R M , ( ! Z
0x14b1c4…14b358 Dummy {f00=0x0069, f01=0x0190, f02=» ! @ N @ L 0 " R ! SAVE8 . IH2201 > , ( @ B ! ! 4 R IH2202 , ( ! J T ! 4 ! , ( _ I ! " P . @ A 4 , ( @ A _"B P W
0x14b358…14b4ec Dummy {f00=0x0069, f01=0x0190, f02=» d , ( @ [ P 0 , 4 @ T X , ( T w A . @ A B J ! _$ A : DW2200 j , ( a 4 ~ v w . /
0x14b4ec…14b680 Dummy {f00=0x0069, f01=0x0190, f02=» , ( ) ) 8 H D ! P 0 5P 9Pr =P AP EP" IP MP OW SP WP [P c qR yP R H D !_ W" P ) * ) ) V T d P d < H D !Y )T - j /P = D A j WP k
0x14b680…14b814 (1, 265) Dummy {f00=0x0069, f01=0x0190, f02=»10 BCC ERROR 5 P CF A5,HALTIN HALT INPUT 6 P EJECT 6 4 P* 6 B P* 6 L P* ANALYZE CONTROL SEQUENCE 6 V P* 6 x P* 6 P LD A1,HEADER GET HEADER 6 P LD A2,HEADER+2 6 P LDK A3,0 FIND HEADER TYPE 6 P LDKL A4,STRING 6 PBRM260 CWR
0x14b814…14b9a8 Dummy {f00=0x0069, f01=0x018e, f02=» ADK A4,4 INCREMENT STRING POINTER 6 P CWK A4,STRINE 7 * P RB(NE) BRM260 TRY NEXT 7 @ P RB BRM INVALID HEADER 7 ` P EJECT 7 ~ P* 7 P* 7 P* RECEIVE TEXT 7 P* 7 P* 7 PBRM300 LD A6,FDWTIN 7 . P RF(Z) BRM900 INVALID SUBTERMINAL
0x14b9a8…14bb3c Dummy {f00=0x0069, f01=0x0190, f02=» P LD A1,DWTST,A6 8 P ANK A1,BUSYFL 8 , P RF(NZ) BRM900 DONT ACCEPT TEXT IF BUSY 8 2 & P ADK A4,6 RESERVE 3 WORDS AT BEGIN 8 b P LDK A3,0 RESET BUFFER INDEX 8 & PBRM310 CF A5,READP READ CHARACTER 8 P RF(NZ) BRM900 PARITY ERROR 8 P CWK A2,DC
0x14bb3c…14bcd0 Dummy {f00=0x0069, f01=0x0190, f02=»M320 NOT SYN, NOT TO BE SKIPPED 8 P XRR A7,A2 ADJUST BCC 9 ( P RB BRM310 9 F P EJECT 9 X P* 9 f P* PRINT COMMAND DETECTED 9 p P* 9 PBRM315 EQU * 9 2 P IM SPRINT INIT PRINT FLAG FOR FOLLOWING POLL 9 P LDK A1,BUSYFL 9 ( P ORS A1,DWTS
0x14bcd0…14be64 Dummy {f00=0x0069, f01=0x0190, f02=» BRM318 9 P LD A1,FDID : " P ST A1,AIDID,A6 INIT AI DEVICE : $ PBRM318 EQU * : J P* : ^ * P* STORE INCOMMING CHARACTER IN BUFFER : h P* DC2 WILL BE TAKEN : P* : PBRM320 CWK A3,RBUFL+RBUFL : " P RF(G) BRM900 BUFFER OVERFLOW :
0x14be64…14bff8 Dummy {f00=0x0069, f01=0x0190, f02=»M310 : P EJECT ; P* ; ( P* ETX DETECTED,STORE DID IN MESSAGE ; $ P* ; P PBRM350 EQU * ; Z P LDK A2,DID ; n P LD A1,SPRINT PRINT ASKED ? ; P RF(Z) BRM355 NO ; , P LD A2,AIDID,A6 YES,GET SELECTED DEVICE ; PBRM355 EQU * ; P CWK A
0x14bff8…14c18c Dummy {f00=0x0069, f01=0x0190, f02=»ER ; x P ADK A3,1 UPDATE LENGTH < P* < * P CF A5,READP READ BCC < 4 P RF(NZ) BRM910 PARITY ERROR < R $ P ANK A7,/7F MASK BCC PARITY BIT < v P RF(NZ) BRM910 BCC ERROR < P IM WPOLL SET WAIT FOR POLL < P ST A3,-4,A4 STORE LENGTH < * P LD*
0x14c18c…14c320 Dummy {f00=0x0069, f01=0x0190, f02=» RECEIVE BUFFER < z $ P LD A1,DCRBUF BUFFER SHORTAGE ? = P RF(Z) BRM370 YES = @ P LD A1,SPRINT = Z P RF(NZ) BRM370 SET WABT = p P IM TACK ACK TO BE SENT = PBRM360 EQU * = $ P ADK A4,6 ADJUST BUFFER POINTER = P RF TEXT PROCESS TEXT =
0x14c320…14c4b4 (1, 266) Dummy {f00=0x0069, f01=0x40d6, f02=» S iT qW u T W W | H D ! R> Q W0 T& !W, /Q 3P 5V 9P WQ {T 8 8 4 T W P P T P MP mT P P W T @
0x14c4b4…14c648 Dummy {f00=0x0069, f01=0x2008, f02=»
0x14c648…14c7dc Dummy {f00=0x0069, f01=0x0190, f02=»A TRAFFIC POLL WITH ACK / & P DATA SP SPECIFIC POLL WITHOUT ACK 0 $ P DATA SPA SPECIFIC POLL WITH ACK 0 J P DATA RT RETRANSMIT REQUEST 0 r P EJECT 0 P* 0 P* OUTPUT SOFTWARE MESSAGES 0 P* 0 P* 0 . PDCSTR1 DATA 0 WORK AREA FOR NO TRAFF
0x14c7dc…14c970 Dummy {f00=0x0069, f01=0x0190, f02=»R5 DATA /0404,0 NO TRAFFIC 0 $ PDCSTR6 DATA /103E,0 DEVICE READY 1 " PDCSTR7 DATA /103B,0 THRU 1 J , PDCSTR8 DATA /103D,0 DEVICE NOT OPERABLE 1 j P EJECT 1 P* 1 P* 1 $ P* RECEIVE A FRAME AND DECODE IT 1 P* 1 P* 1 * PBRM LDKL A5,STB
0x14c970…14cb04 Dummy {f00=0x0069, f01=0x0190, f02=»AD CHARACTER 1 | P SUK A2,SOH 2 P RF(E) BRM200 SOH 2 ( P SUK A2,/FF-SOH 2 B P RB(NE) BRM100 NOT /FF 2 Z P CF A5,READ READ CHARACTER 2 x P CWK A2,/FF 2 " P RB(NE) BRM100 NOT ANOTHER /FF 2 , P ABL BRM910 HALT INPUT AND RESYNCHRONIZE 2 P* 2
0x14cb04…14cc98 Dummy {f00=0x0069, f01=0x0190, f02=» " P CW A2,DW2200 CHECK IF THIS TC 3 . P ABL(NE) BRM900 NOT THIS TC: RESYNCHRONIZE 3 * . P CF A5,READP READ SID=SUBTERMINAL ADDRESS 3 P ABL(NZ) BRM900 PARITY ERROR 3 ( P ST A2,FSID SAVE SUBTERMINAL ADDRESS 3 * P CF A5,FINTER FIND SUBTERMINAL ADDRESS 3
0x14cc98…14ce2c Dummy {f00=0x0069, f01=0x0190, f02=» EQU * 3 P SUK A2,SID 4 P RF(Z) BRM210 GENERAL SID 4 " P LDR A3,A3 4 D P ABL(Z) BRM900 SID UNKNOWN 4 V PBRM210 EQU * 4 x P CF A5,READP 4 P ABL(NZ) BRM900 PARITY ERROR 4 P ST A2,FDID SAVE DID 4 $ P CM HEADER CLEAR HEADER CONTENTS 4 P
0x14ce2c…14cfc0 Dummy {f00=0x0069, f01=0x0190, f02=» P CWK A2,STX 5 " P RF(E) BRM300 STX: TEXT FRAME 5 P CWK A2,ETX 5 > & P RF(E) BRM250 ETX: ANALYZE HEADER 5 R P CWK A3,4 5 | $ P ABL(G) BRM900 HEADER OVEABLLOW 5 $ P SC A2,HEADER,A3 STORE CHARACTER 5 P ADK A3,1 INCREMENT POINTER 5 P RB BR
0x14cfc0…14d154 (1, 267) Dummy {f00=0x0069, f01=0x0190, f02=»TRM QUEUE FOR TRANSMISSION - P RB BRM . " PBRM100 EQU * . 2 P LDR A2,A1 . F P XRK A2,DISC DISCONNECT ? . X P RF(NZ) BRM110 . z P* . P* . P* DISC RECEIVED . P* . P* . PBRM105 EQU * . & P CM MODE INDICATE DISCONNECT MODE .
0x14d154…14d2e8 Dummy {f00=0x0069, f01=0x0190, f02=» REQUEST FOR ONLINE . ~ P* / P* / & P LDK A1,2 LOAD 'ROL' / 0 ( P CF A15,QMTRM QUEUE FOR TRANSMISSION / L P RB BRM / x PBRM120 EQU * / P SUK A2,2 / P RF(Z) BRM160 CMDR-MODE / P EJECT / P* / P* NORMAL RESPONSE MODE / P*
0x14d2e8…14d47c Dummy {f00=0x0069, f01=0x0190, f02=» P* 0 P* RNR RECEIVED 0 P* 0 $ P* 0 . 8 P CF A5,UPDCON UPDATE COUNTERS AND CHECK OUTPUT QUEUE 0 8 P CF A5,TSTNR CMDR ? 0 t P LDK A1,3 LOAD 'RR' 0 ( P CF A15,QMTRM QUEUE FOR TRANSMISSION 0 P RB BRM 0 PBRM130 EQU * 0 P LDR A2,A1 G
0x14d47c…14d610 Dummy {f00=0x0069, f01=0x0190, f02=» OR REJ RECEIVED 0 P* 1 PBRM140 EQU * 1 " 8 P CF A5,UPDCON UPDATE COUNTERS AND CHECK OUTPUT QUEUE 1 6 P CF A5,TSTNR CMDR ? 1 r PBRM145 EQU * 1 P LC A1,FIELD1+1 GET C-FIELD 1 P ANK A1,/10 CHECK POLL-BIT 1 P RB(Z) BRM P-BIT OFF 1 ( P LDK
0x14d610…14d7a4 Dummy {f00=0x0069, f01=0x0190, f02=»NVALID CONTROL FIELD 1 P* 2 PBRM150 EQU * 2 & P LDR A2,A1 2 : P ANK A2,IMSK 2 L P RF(Z) BRM170 I-FRAME 2 ` P LC A1,FIELD1+1 GET C-FIELD 2 ~ P ANK A1,/EF EXCLUDE POLL-BIT 2 P LDR A2,A1 2 P XRK A2,UIMSK UI ? 2 P RF(Z) BRM155 YES 2
0x14d7a4…14d938 Dummy {f00=0x0069, f01=0x018e, f02=»ON ? 2 ~ P RB(NZ) BRM050 YES 3 P RB BRM 3 & P* 3 6 P* 3 @ P* INVALID COMMAND 3 J P* 3 d P* 3 n PBRM156 EQU * 3 x P LDK A2,0 PRESENT CONTERS 3 . P LDK A3,/80 FAIL CODE (CMDR MODE SETTING) 3 P CF A5,PRCMDR INIT CMDR 3 PBRM160 E
0x14d938…14dacc Dummy {f00=0x0069, f01=0x0190, f02=» 3 j P RB BRM 4 P EJECT 4 P* 4 & P* 4 0 P* I-FRAME RECEIVED 4 : P* 4 T P* 4 ^ > PBRM170 CF A5,UPDCON UPDATE COUNTERS AND CHECK OUTPUT QUEUE 4 h ( P LD A1,STATUS CHECK UNEXPECTED N(S) 4 P ANK A1,1 N(S) OK? 4 P RF(NZ) BRM185 NO 4 &
0x14dacc…14dc60 Dummy {f00=0x0069, f01=0x018e, f02=»LL BIT 4 | P RF(Z) BRM180 P-BIT OFF 5 ( P LDK A1,0 INDICATE POLL-BIT RECEIVED 5 . ( P CF A15,QMTRM QUEUE FOR TRANSMISSION 5 Z PBRM180 EQU * 5 P* 5 & P* HERE TO PROCESS AVAILABLE FRAME 5 P* A4=BUFFER 5 P* 5 P LC A2,+6,A4 GET STA 5
0x14dc60…14ddf4 (1, 268) Dummy {f00=0x006a, f01=0x0190, f02=» 5 , P* SUBTERMINAL ADDRESS IS NOT CONTAINED 6 P* IN DCTAB SUBSET. 6 8 * P* QUEUE INCOMMING MESSAGE TO DC-TASK 6 V ( P* AND CHECK IF REQUEST PENDING 6 P* 6 . P ST A2,+4,A4 SAVE WRONG SUB TRMNL. ADDRESS 6 P CF A5,QRBUF QUEUE IN DW0700
0x14ddf4…14df88 Dummy {f00=0x006a, f01=0x0190, f02=»EJ WITHOUT TESTING POLL-BIT 6 x $ P* HALF-DUPLEX:WAIT POLL-BIT 7 $ P* 7 L PBRM185 EQU * 7 V P CM STATUS RESTORE STATUS 7 j * P LDKL A1,HFDUP GET FULL OR HALF DUPLEX 7 P RB(Z) BRM145 WAIT POLL 7 & P LDK A1,/FF INDICATE REJ TOBE SENT 7 ( P CF
0x14df88…14e11c Dummy {f00=0x006a, f01=0x0190, f02=»BRM190 EQU * 7 P LD A1,DWTST,A6 GET STATUS 8 P RF(N) COMP30 NO REQUEST 8 6 P LD A1,DWTOR,A6 GET ORDER 8 V P SUK A1,2 8 x P RF(NZ) COMP30 NOT READING 8 PCOMP25 EQU * 8 & P LD A8,DWTECB,A6 GET ECB ADDRRESS 8 P LD A1,+2,A4 GET LENGTH 8
0x14e11c…14e2b0 Dummy {f00=0x006a, f01=0x0190, f02=»T 8 z P LDK A1,0 SET RC=0 9 ( P CF A15,TENDIO COMPLETE READ REQUEST 9 $ P ABL BRM BASIS RECEIVE MODE 9 P P EJECT 9 t P* 9 P* QUEUE RECEIVED MESSAGE 9 P* 9 PCOMP30 EQU * 9 * P LDK A2,DWTBQ GET PROPER QUEUE ANCHOR 9 P ADR A2,A6 9
0x14e2b0…14e444 Dummy {f00=0x006a, f01=0x018e, f02=»WTBQ,A6 9 P LDR* A2,A1 FIRST IN QUEUE : P RF(NZ) COMP35 : 2 P LDR A1,A6 : H . P CF A15,SETIME START BUF SUPERVISION TIMER : Z P DATA COMP40,TIMBUF : P ST A4,DWTBTP,A6 : PCOMP35 ABL BRM : P* : P* TIME OUT ENTRY : P* : PCOMP
0x14e444…14e5d8 Dummy {f00=0x006a, f01=0x0190, f02=» $ P CM DWTBQ,A6 CLEAR QUEUE ANCHOR ; PCOMP42 EQU * ; , 2 P LDKL A2,DW0700+DWTWQ GET DC-TASK QUEUE ANCHOR ; @ PCOMP43 EQU * ; v P LDR* A3,A2 ; P RF(Z) COMP44 END OF QUEUE ; P LDR A2,A3 ; P RB COMP43 ; PCOMP44 EQU * ; . P STR A1,A2 INSER
0x14e5d8…14e76c Dummy {f00=0x006a, f01=0x0190, f02=» " P* HERE TO TEST N(R) VALIDITY < P* < * PTSTNR EQU * < 4 P LD A1,STATUS GET STATUS < H P ANK A1,2 WRONG N(R)? < h P RF(NZ) TSTNRX YES < P RTN A5 < 0 P********** INIT CMDR PARAMETERS *********** < PTSTNRX EQU * < P CM STATUS RESTO
0x14e76c…14e900 Dummy {f00=0x006a, f01=0x0190, f02=»ODE IN A3 < ~ P CF A5,PRCMDR INIT FIELDS = P ABL BRM160 = 4 P EJECT = H P* = V , P* HERE TO INITIALIZE CMDR OUTPUT FIELDS = ` P* = PPRCMDR EQU * = " P LDK A1,CMDR LOAD 'CMDR'+F-BIT = & P LDKL A4,DLOBUF GET BUFFER ADDRESS = P ADK A4,1
0x14e900…14ea94 (1, 269) Dummy {f00=0x006a, f01=0x0190, f02=» ADK A4,1 = $ P SCR A2,A4 SAVE PRESENT COUNTERS > P ADK A4,1 > : $ P SCR A3,A4 SAVE FAIL PARAMETERS > L P RTN A5 > t P EJECT > P* > P* > P* HDLC OUTPUT PROCESS > P* > . P* QUEUED AS MONITOR JOB FROM INPUT PROCESS > P* > $
0x14ea94…14ec28 Dummy {f00=0x006a, f01=0x0190, f02=»DING > h P* ? P* ? PTRM EQU * ? P INH SET INHIBIT ? 2 " P LDKL A5,STBUT LOAD STACKBASE ? L P LDR A7,A1 SAVE PARAMETER ? r P CCK A1,/FF00 REJ ? ? P RF(NE) TRM050 NO ? " P LDK A1,REJ LOAD 'REJ'+ F-BIT ? P RF TRM110 ? PTRM050
0x14ec28…14edbc Dummy {f00=0x006a, f01=0x018e, f02=» SUK A1,1 ? P RF(Z) TRM100 UA ON QUEUE @ P SUK A1,1 @ 4 P RF(Z) TRM120 ROL ON QUEUE @ F P SUK A1,1 @ h P RF(Z) TRM130 RR ON QUEUE @ z P SUK A1,1 @ P RF(Z) TRM140 CMDR ON QUEUE @ ( P RF TRM150 CHECK APPLICATION QUEUE @ P EJECT @
0x14edbc…14ef50 Dummy {f00=0x006a, f01=0x0190, f02=» @ " P CF A5,TRSFR SEND SHORT FRAME A P ABL TDISP END OF JOB A . P* A L P* A V P* ROL SHOULD BE SENT A ` P* A | P* A PTRM120 EQU * A P LDK A1,ROL LOAD 'ROL'+F A P RB TRM110 A P* A P* A P* RR SHOULD BE SENT A P*
0x14ef50…14f0e4 Dummy {f00=0x006a, f01=0x0190, f02=» P SLL A2,5 ADJUST IT B P ORR A1,A2 INSERT IN RR B P RB TRM110 B @ P* B R P* B P* CMDR SHOULD BE SENT B f P* B P* B PTRM140 EQU * B & P LDKL A4,DLOBUF GET BUFFER ADDRESS B P LDK A3,5 FRAME LENGTH TO A3 B P CF A5,WRFRAM
0x14f0e4…14f278 Dummy {f00=0x006a, f01=0x0190, f02=» B P* C PTRM150 EQU * C ( P LD A6,DCWRQ CHECK APPLICATION QUEUE C & $ P RF(NZ) TRM300 SOMEONE ON QUEUE C R PTRM170 EQU * C z $ P LD A1,DCRBUF BUFFER SHORTAGE ? C P RB(NZ) TRM130 NO C P* C P* C * P* RNR SHOULD BE SENT, BUFFER SHORTAG
0x14f278…14f40c Dummy {f00=0x006a, f01=0x018e, f02=»TRANSMIT AN IFRAME C P* D PTRM300 EQU * D $ " P SUK A6,DWTWQ GET DWT ADDRESS D 8 . P LDKL A4,DLOBUF GET OUTPUT BUFFER ADDRESS D ^ ( P CF A5,PRCFI PREPARE C-FIELD FORMAT D $ P LD A8,DWTECB,A6 GET ECB ADDRESS D ( P LD A3,ECBRL,A8 GET REQUESTED LENGTH
0x14f40c…14f5a0 Dummy {f00=0x006a, f01=0x0190, f02=» * P LD A7,ECBBA,A8 OUTPUT BUFFER ADDRESS E ( P ADK A7,1 USE FREE-WORD TO INSERT IT E 2 P SCR A1,A7 E ^ $ P SUK A7,2 INIT OUTPUT ADDRESSING E p P ST A7,SWITCH E T P**************** INITIALIZATION COMPLETED,SEND THE WHOLE FRAME ********** E P C
0x14f5a0…14f734 (1, 270) Dummy {f00=0x006a, f01=0x0190, f02=» PDCSST EQU * P LD A8,DWTECB,A6 P LD A1,ECBCW,A8 GET STATUS 4 P LDR A2,A1 V " P ANKL A2,/FF00 FUNCTION CODE ? h P CWK A2,/4000 P RF(E) DCSST4 YES P LDR A1,A1 P RF(NZ) DCSST1 BUSY P RF(Z) DCSST0 OK PDCSS
0x14f734…14f8c8 Dummy {f00=0x006a, f01=0x018e, f02=» p P LDK A1,/FE & P ANS A1,DWTST,A6 SET DEVICE READY ( P LDKL A2,DCSTQ GET THRU QUEUE ANCHOR F & P CF A15,INSWQ1 INSERT DWT IN QUEUE r P LDK A2,6 " P ST A2,DWTOR,A6 REPLACE ORDER P CM ECBRL,A8 P ABL DCRTN DISPATCHER PDC
0x14f8c8…14fa5c Dummy {f00=0x006a, f01=0x0190, f02=» P LDR* A2,A3 GET AI P RB(Z) DCSSTX END OF LIST " P ANKL A2,NBIT0 D P CWR A1,A2 COMPARE AI Z P RF(E) DCSST3 OK,AI FOUND x P ADK A3,2 P RB DCSST2 GO ON SEARCHING PDCSST3 EQU * P LD A1,ECBCW,A8 P STR A1,A3 SET
0x14fa5c…14fbf0 Dummy {f00=0x006a, f01=0x0190, f02=»H n P LDK A2,6 " P ST A2,DWTOR,A6 REPLACE ORDER P RB DCWR B P EJECT R P* ` P* j P* t P* TIMER HANDLING PART ~ P* P* P* P* READ TIMER=TIMERR P* PTIMERE EQU * P LDR A1,A6 & P L
0x14fbf0…14fd84 Dummy {f00=0x006a, f01=0x018e, f02=»TIMERR DATA 0 ( P ST A4,DWTTP,A6 STORE TIMER POINTER PTIME10 EQU * B P RF GBUF10 RETURN V P* p P* TIMEOUT READ TIMER z P* PTOUTRE EQU * P LDR A6,A1 FETCH DWT P CM DWTTP,A6 P IFF TBUFL=0 $ P CF A15,REMOVG R
0x14fd84…14ff18 Dummy {f00=0x006a, f01=0x0190, f02=» f P SUK A2,8 P RF(NZ) TOUTR2 NOT EXCHANGE 2 P ORK A1,2 RETURN CODE /42 AT EXCHANGE TIME OUT > & PTOUTR2 ABL ENDIO COMPLETE REQUEST t P* P* WRITE TIMER=TIMWR P* PTIMEWR LDR A1,A6 & P LD A2,ECBCW,A8 GET TIMEOUT VALUE
0x14ff18…1500ac Dummy {f00=0x006a, f01=0x0190, f02=»6 P RB TIME10 P* P* TIMEOUT WRITE TIMER & P* D PTOUTWR EQU * N P LDR A6,A1 FETCH DWT b P CM DWTTP,A6 ~ P LD A1,DWTOR,A6 GET ORDER P SUK A1,6 P RF(Z) TOUT10 WRITE P SUK A1,2 ( P RB(NZ) TOUTR1 ORDER
0x1500ac…150240 Dummy {f00=0x006a, f01=0x0190, f02=»SMITBUFFER v ( P CF A15,CKGBQ CHECK GET BUFFER QUEUE * P CF A15,REMOVW REMOVE FROM WRITE QUEUE > P XIF l P RB TOUTR1 x P EJECT P* P* P* STOP REQUEST TIMING P* & P* REMAINING TIME IS RETURNED IN A2 P* P
0x150240…1503d4 (1, 271) Dummy {f00=0x006a, f01=0x0190, f02=» GET REMAINING TIME P CM* DWTTP,A6 STOP TIMER P CM DWTTP,A6 < PCTIM10 EQU * P P RTN A5 d P EJECT t P* P* GET RECEIVE BUFFER P* $ P* CALLING SEQUENCE: CF A15,GRBUF P* A4=0 IF NO BUFFER IS FREE & P* ELSE A4
0x1503d4…150568 Dummy {f00=0x006a, f01=0x0190, f02=»NH P LDR* A4,A2 P RF(Z) GBUF10 NO BUFFER FREE . P LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN B P STR A3,A2 t * PGBUF10 ADKL A15,4 ADJUST STACK POINTER P ABR* A15 RETURN TO CALLER P* P* P* GET TRANSMIT BUFFER P
0x150568…1506fc Dummy {f00=0x006a, f01=0x0190, f02=»ESS r P* A2 AND A3 ARE DESTROYED P* . P* 8 * PGTBUF LDKL A2,DCTBUF TRANSMIT BUFFERS B P RB GBUF p P EJECT P* P* P* CHECK GET BUFFER QUEUE P* P* PCKGBQ EQU * P LDR A7,A6 SAVE A6 " P LD
0x1506fc…150890 Dummy {f00=0x006a, f01=0x0190, f02=»EQUEST ~ P LD A2,DWTOR,A6 ! P SUK A2,/31 ! & ( P RF(NZ) CKG100 NO GET BUFFER REQUEST ! : & P CF A15,GTBUF GET TRANSMIT BUFFER ! f P LDR A4,A4 ! P RF(Z) CKG110 NO BUFFER FREE ! P LD A3,DWTECB,A6 ! ( P ST A4,ECBBA,A3 STORE BUFFER ADDRESS !
0x150890…150a24 Dummy {f00=0x006a, f01=0x0190, f02=» P LDR A6,A7 RESTORE A6 " P RB GBUF10 RETURN " " P XIF " < P EJECT " H P* " V P* " ` P* RELEASE RECEIVE BUFFER " j P* " P* A4 CONTAINS BUFFER ADDRESS " $ P* CALLING SEQUENCE: CF A15,RRBUF " P* A2 AND A3 ARE DESTROYED " P* "
0x150a24…150bb8 Dummy {f00=0x006a, f01=0x0190, f02=» LDR A2,A3 " P RB RBUF10 # PRBUF20 EQU * # $ P STR A4,A2 # 8 P CMR A4 # J P RB GBUF10 RETURN TO CALLER # Z P* # ~ P* # P* RELEASE TRANSMIT BUFFER # P* # P IFF TBUFL=0 # P* A4 CONTAINS BUFFER ADDRESS # $ P* CALLING SEQUENCE
0x150bb8…150d4c Dummy {f00=0x006a, f01=0x0190, f02=»DRIVER BUFFER ? # P RB(E) RBUF YES $ " P CWK A4,BUFT2 DRIVER BUFFER ? $ 0 P RB(E) RBUF YES $ V P RB GBUF10 NO $ n P XIF $ P EJECT $ P* $ P* $ ( P* INSERT DWT IN WRITE REQUEST QUEUE $ P* $ P* A2,A3,A4 DESTROYED $ P* A6
0x150d4c…150ee0 Dummy {f00=0x006a, f01=0x0190, f02=»D OF QUEUE FOUND $ P LDR A2,A3 % P RB INSWQ2 % * PINSWQ3 ADR A4,A6 % < P STR A4,A2 INSERT IN QUEUE % T " P CMR A4 INDICATE END OF QUEUE % v P RB GBUF10 RETURN % P* % P* % * P* REMOVE DWT FROM WRITE REQUEST QUEUE % P* % P* A2,A
0x150ee0…151074 (1, 272) Dummy {f00=0x006b, f01=0x0190, f02=» 2 F IDENT T:ASG0 P,3.2,78-09-15,870136940320 F ASSGN F : , ( AB F J ASSGN . F z T:FDSPA F , ( ! ( " A F I:EVA0 F , ( ? 2 A
0x151074…151208 Dummy {f00=0x006b, f01=0x4070, f02=» & # T : F Y _ G O g P T G 6 G Z@ G l F J ASSGN . F z T:FDSPA F , ( ! ( " A F I:EVA0 F , ( ? 2 A
0x151208…15139c Dummy {f00=0x006b, f01=0x0190, f02=» 2 F IDENT T:DMR P,3.2,78-09-15,870136940320 H & " T:RREAK T:RRE1 T:RWRI T:RWR1 H : T:RREAK H d T:FDSP H x T:RRE1 H I:EVA0 H T:STCW H , ( A &P C H T:IO2 H T:R
0x15139c…151530 Dummy {f00=0x006b, f01=0x402a, f02=» 6 + 6 H F I @ I &6940320 H & " T:RREAK T:RRE1 T:RWRI T:RWR1 H : T:RREAK H d T:FDSP H x T:RRE1 H I:EVA0 H T:STCW H , ( A &P C H T:IO2 H T:R
0x151530…1516c4 Dummy {f00=0x006b, f01=0x40a0, f02=» 2 F IDENT T:SWI P,3.2,78-09-15,870136940320 J T:SWITK J : T:SWITK J L I:RT1 J ` ( J p J @ J I:EVA0 H T:STCW H , ( A &P C H T:IO2 H T:R
0x1516c4…151858 Dummy {f00=0x006b, f01=0x4114, f02=» 2 F IDENT T:TEI P,3.2,78-09-15,870136940320 K T:TESTK T:ABOR K : T:TESTK K T T:FDSP K h I:RT1 K z T:ABOR K * & @ "R V I K ( _ K R K *
0x151858…1519ec Dummy {f00=0x006b, f01=0x40e4, f02=» 2 F IDENT T:CLO P,3.2,78-09-15,870136940320 L T:SETTK T:GETT L : T:SETTK L T I:EVA0 L h I:RT1 L z T:GETT L , ( A ( ( _ L L @ L _ K R K *
0x1519ec…151b80 Dummy {f00=0x006b, f01=0x40ba, f02=» 2 F IDENT T:DEL P,3.2,78-09-15,870136940320 M T:DELAK M : T:DELAK M L I:EVA0 M ` I:RT1 M r A ( M M @ M ( _ L L @ L _ K R K *
0x151b80…151d14 (1, 273) Dummy {f00=0x006b, f01=0x0190, f02=» U h , ( J C W /.!" V T:XSTA V 8 T:WAIT` V L , ( B 'W ( W C V ` T:IO1 V T:IO2 V T:IO3 V T:IO4 " V , ( C C ( ' P I "%@P " V , (
0x151d14…151ea8 Dummy {f00=0x006b, f01=0x0190, f02=» V h I:RT1 W , ( B U ( 5 _ "( W T:EDWR W H I:EDW W T:EDWEN W l T:EDWF W , ( C C W T:EDWIA W , ( B B P C : V I W
0x151ea8…15203c Dummy {f00=0x006b, f01=0x018e, f02=» 5 C & R V C W T:SVE ^ X . T:BPCB X @ , ( S@ : 6 V ?d ( X R , ( q # V "P ( - _ X T:REST X , ( : 7 $ V 6P $ - X , ( _ (
0x15203c…1521d0 Dummy {f00=0x006b, f01=0x0190, f02=» I:FML Y , ( @ 2' 6 2 #? ;D:B Y , ( : C : Y D , ( ) : "!@P ") # B C W C Y t T:STCW P Y , ( I C : #0 T & C C : Y , ( g C C V W
0x1521d0…152364 Dummy {f00=0x006b, f01=0x0190, f02=» C S W C Y x , ( C 0 P C ;a 6 4 Z , ( ZH T : 49d_Z B@5 Z H , ( ' @ 8 @N ' @ d P ( Z x T:GTCW ^ Z , ( G z= #0 T B Z , ( g 'W B B "
0x152364…1524f8 Dummy {f00=0x006b, f01=0x0190, f02=»V > _V ' P _d Z | , ( P & 1 P 1 [ , ( _ , @ - R T U :B@ [ L & " ' ' d [ | H D !o{ W W ^ - 2 C GP W * [ _ 0 c gW k o [ H D !lo {W $ W0
0x1524f8…15268c Dummy {f00=0x006b, f01=0x40f4, f02=»P, T( U U P P ! GR MV P [ H D ! P T T T W 5P EW YT W W W R P( W$ W F H D ! P T cT kW 0 @ PP " R R Q P P P R ? @ @ @ lo {W $ W0
0x15268c…152820 Dummy {f00=0x006b, f01=0x0190, f02=» 2 F IDENT I:NTP P,3.2,78-09-15,870136940320 ] 4 0 I:TRC I:NTP I:NTPA I:NTPR I:RT0 I:RT1 I:RT2 ] : I:MOV ] r I:ADD ] I:SUB ] I:CMP ] I:MUL ] * & T ] I:DIV ] ( $
0x152820…1529b4 (1, 274) Dummy {f00=0x006b, f01=0x0190, f02=»:EDS ] , ( - ^ I:INIT ^ < I:TRC ^ N I:NTPA D ^ ` T:ATAB ^ t , ( ?" @ , V P ^ [ ^ I:NTP j ^ ] V 7 ^ I:NTPR j ^
0x1529b4…152b48 Dummy {f00=0x006b, f01=0x0190, f02=» I:RT2 ^ I:RT1 _ I:RT0 _ $ , ( :aW _@ 2 P W _ 6 T:BAT _ f , ( _ 2 # L $ " 2 P V D _ v , ( ! R T _L 8^4 D , _ T:PAT _ T:CAT _ , ( ! D &
0x152b48…152cdc Dummy {f00=0x006b, f01=0x4148, f02=»_ _t 6 7 _ _ I:EVB ` & , ( { _ * V & ^ H J ' ` 6 W 'W '_2 ` f H D ! | v ! " # " % d ' ) " + " ; ` H D ! = ? A UP i j {V Q W W P W P R
0x152cdc…152e70 Dummy {f00=0x006b, f01=0x0190, f02=» 2 F IDENT I:EVA P,3.2,78-09-15,870136940320 a H D ! I:EVA0K I:EVA1 I:EVA2 I:EVA3 I:EVA5 I:EVA6 I:EVB I:EVI I:FML a : I:EVA2 a T:LIT a I:EVA1 a I:EVA3 a T:KPI a I:EVA6 a I:EVA5 a
0x152e70…153004 Dummy {f00=0x006b, f01=0x0190, f02=» 9 W 6 2 " T v a , ( Y @ : " # b , , ( y ;b , (V ; [ [ b , ( @ z ;AV Z H # b , ( ; @ : & Z 4 b , ( :
0x153004…153198 Dummy {f00=0x006b, f01=0x417a, f02=» [ 6 [ Z b | I:FML t c , ( W 7 Z 7 : c . I:EVI c ^ , ( w 4 ( ; V Y : 2! c p I:EVB c , ( : 2 6 " # t;b c ; : c H D ! L
0x153198…15332c Dummy {f00=0x006b, f01=0x018e, f02=» 2 F IDENT I:ADS P,3.2,78-09-15,870136940320 d I:ADD I:SUB d : I:ADD d P I:SUB d b , ( W " T & T + : d t I:CPA d , ( ! * & !@P `1` P Q d ? ; d , ( M
0x15332c…1534c0 Dummy {f00=0x006b, f01=0x4102, f02=» , ( P R ` = <( ;_| V e , ( P ^ `_ " P :" e 4 , ( # P * U P 1`! T 9e! e d = K : e 8 4 W T 5P ;Q T$ P* P P P U P T e e @ e M
0x1534c0…153654 (1, 275) Dummy {f00=0x006b, f01=0x414e, f02=» n q@ X b H D !d / A GP QP c iP mP qP uP, {P T W T ( H D ! @ R P P W Wv Pp Wf #Rz 1 ?P< EP2 IR. QT aT eP t H D !@ oP T P P$ P P0 P W W P 3P: 7P6 U W
0x153654…1537e8 Dummy {f00=0x006b, f01=0x2008, f02=»
0x1537e8…15397c Dummy {f00=0x006b, f01=0x417a, f02=» 2 F IDENT T:USE P,3.2,78-09-15,870136940320 P T:USE P : T:USE P J T:CAT P I:EVA0 P l , ( 2 & X 2 ' P ~ , ( & X R 8 R P X 8 P X P , ( = _ Q ?! V X P
0x15397c…153b10 Dummy {f00=0x006b, f01=0x408a, f02=» 2 F IDENT T:EXIT P,3.2,78-09-15,870136940320 Q T:EXITK Q : T:EXITK Q L ( Q ` Q t@ Q & X 2 ' P ~ , ( & X R 8 R P X 8 P X P , ( = _ Q ?! V X P
0x153b10…153ca4 Dummy {f00=0x006b, f01=0x40e0, f02=» 2 F IDENT T:GTCW P,3.2,78-09-15,870136940320 R GETCW R : T:FDSP R J GETCW R I:EVA0 R n T:GTCW R I:RT1 R $ I R R @ R = _ Q ?! V X P
0x153ca4…153e38 Dummy {f00=0x006b, f01=0x40c0, f02=» 2 F IDENT T:GTID P,3.2,78-09-15,870136940320 S T:GETIK S : T:GETIK S L I:EVA0 S ` I:RT1 S r $ @ V G 9h ' S S @ S R R @ R P END @ EL 77-06-16 #2.2
0x153e38…153fcc Dummy {f00=0x006b, f01=0x018e, f02=» 2 F IDENT T:IO P,3.2,78-09-15,870136940320 T H D ! T:WRITK T:READ T:KIY T:NKI T:KIA T:NKIAA T:EDWR T:DSC0` T:DSC1 T : H D ! T:EDWEN T:EDWF T:EDWIA T:EDIOA T:XSTA T:WAIT` T:IO1 T:IO2 T:IO3 T B > T:IO4 T:FDS0 T:FDSP T:SVE T:REST T:STCW T:GDSP
0x153fcc…154160 Dummy {f00=0x006b, f01=0x0190, f02=» , ( ! ' ( ( $ U T:WRITK X U 4 , ( A P C C U H T:READ h U x I:EVA0 U , ( a @ / W / W U T:DSC0` | U T:DSC1 U I:EVA2W U , (
0x154160…1542f4 (1, 276) Dummy {f00=0x006c, f01=0x415c, f02=» 2 F IDENT I:CMP P,3.2,78-09-15,870136940320 f I:CMP f : I:CMP f J , ( P " T * & : * & f I:CPA f , ( ! !`P :J +_ +Q f , ( A _0 , V W R V f & " _ W
0x1542f4…154488 Dummy {f00=0x006c, f01=0x4166, f02=» 2 F IDENT I:CPA P,3.2,78-09-15,870136940320 g I:CPA g : I:CPA g J * & R W g , ( ( V W Q P W ! W V g , ( ? P , V W Q P W $ W V g * & _ P T V
0x154488…15461c Dummy {f00=0x006c, f01=0x0190, f02=» 2 F IDENT I:MOV P,3.2,78-09-15,870136940320 h I:MOV I:MVC h : I:MOV h P I:MVC h b , ( $0#0;b P P P P h t , ( ! 0 - P V W Z _ h , ( A 4 V W Q P ) P 9_ &" h , (
0x15461c…1547b0 Dummy {f00=0x006c, f01=0x0190, f02=» , ( V 4! P < i , ( X 4 9d $ & ! R + : i 4 , ( V W R 4 0R Y i d , ( ! 7 Y& P Z,;D 9_8 8 _< i , ( A V W YL T 9 : &9d i , ( a ! +
0x1547b0…154944 Dummy {f00=0x006c, f01=0x40e6, f02=» P _6 & Q 9d! )0 + i ( $ P 7 Y Z $ _ : j $ H D ! P P PN P +P: MQ OP WP oP sQ { R R R j P 0 , +P mP T P SZ P Q Q P. P j j @ j : &9d i , ( a ! +
0x154944…154ad8 Dummy {f00=0x006c, f01=0x0190, f02=» 2 F IDENT I:MUL P,3.2,78-09-15,870136940320 k I:MUL I:SH1L k : I:MUL k R , ( V ) " T *V &V k d , ( ! : V S W P 9 S W _ k , ( A V P W T V E + k , ( a : &
0x154ad8…154c6c Dummy {f00=0x006c, f01=0x0190, f02=» k | , ( Z P [ 9a Z $" T l I:ADD l L , ( 9d! P [ [ P l , ( V H )_ _N z l , ( R z ! P 1` { V (9h T I l I:SH1L > l , ( /
0x154c6c…154e00 Dummy {f00=0x006c, f01=0x4012, f02=» ^ l @ m k | , ( Z P [ 9a Z $" T l I:ADD l L , ( 9d! P [ [ P l , ( V H )_ _N z l , ( R z ! P 1` { V (9h T I l I:SH1L > l , ( /
0x154e00…154f94 (1, 277) Dummy {f00=0x006c, f01=0x0190, f02=» 2 F IDENT I:DIV P,3.2,78-09-15,870136940320 n I:DIV I:SH1R n : I:DIV n R , ( " T *V &V n d ! P = n , ( ' ;@ R P W ;a n , ( G =a P " R & R V n
0x154f94…155128 Dummy {f00=0x006c, f01=0x0190, f02=»$ [ [ n I:SUB o " , ( ( z o 2 , ( " ! P ! R 2` + z " P ! o b I:CPA o * & R 2` { 1 ! { [ o I:SH1L o $ Q _ o ,
0x155128…1552bc Dummy {f00=0x006c, f01=0x418c, f02=» Z ! Z $ o z * & y P Z %_N [ Q p * & R [ Z { p H , ( z 9e! W Z p v I:SH1R p , ( : V I _ , " -! 9H p X" ,9 -9d_ p H D !
0x1552bc…155450 Dummy {f00=0x006c, f01=0x40ce, f02=» 2 F IDENT I:NTF P,3.2,78-09-15,870136940320 q I:NTFAK q : I:NTFAK q L , ( Z H D & H q ` $ ! D % [ ( q 8 q @ q _ , " -! 9H p X" ,9 -9d_ p H D !
0x155450…1555e4 Dummy {f00=0x006c, f01=0x0190, f02=» 2 F IDENT I:EDT P,3.2,78-09-15,870136940320 r F B I:EDT I:EDW I:ED1 I:EDSK I:EVT I:EFLI I:ETABL I:EXIT I:ETXT r : F B I:ECPY I:ECTR I:ESL I:ENL I:EOR I:ECW I:ECWC` I:EFIL I:EPICN r , ( !! gg++ r , ( ! L
0x1555e4…155778 Dummy {f00=0x006c, f01=0x0190, f02=» r I:EVI s I:EVA3 s I:EVA0 s * * & AUT s < I:EVNO! s j I:ESKI s | I:EBRI s I:EBRBR s I:EBR s , ( Q s I:EINH s I
0x155778…15590c Dummy {f00=0x006c, f01=0x0190, f02=» : s l I:ED1 t I:EDW t I:EVA6 t 0 , ( @ R B t B , ( P 2 " T W t r , ( "@T '?W "? H " K :e t I:EFLI t , ( J J " J _T Z
0x15590c…155aa0 Dummy {f00=0x006c, f01=0x0190, f02=» t n I:ETXT d u I:ECPY d u " I:ECTR z u 6 , ( ] : P 4 ! T _ K u J I:ESL u z I:ENL u , ( } W K W +_ u I:EOR u T:EDWF- u I:ECW u , (
0x155aa0…155c34 (1, 278) Dummy {f00=0x006c, f01=0x0190, f02=»V : 1 u n v I:EPICN v " + v 6 [ [ v T < v r , ( !AAP !TTT W !**T * [ R v !FFP !EET W v + I 6 v , ( 5 * B Z 9 !
0x155c34…155dc8 Dummy {f00=0x006c, f01=0x0190, f02=»U 1 J !00 ;_ v * & _ 9P F " X4# ; W )0_8 w , ( J R Z R 4! P ;)0 w N , ( Z ] 49d_$ _8U ; : w ~ $ X _| _ z 9d! ) ^ _x w , ( + ,_ 8 _ : W 8W J 8 ! w , (
0x155dc8…155f5c Dummy {f00=0x006c, f01=0x4126, f02=» W4 P T w H D ! W T W AQ oPd wT^ WR WD W. W V x H D ! P T W T R P %T )W - x ] h cP gWl kW8 m oWd sT& x d H D ! wW, {P T W F W> P U P ~ W R R P U x ;W ?W
0x155f5c…1560f0 Dummy {f00=0x006c, f01=0x0190, f02=» 2 F IDENT I:EDTE P,3.2,78-09-15,870136940320 y D @ I:EKIHK I:EINH I:EVIN I:EBRI I:EBRB I:EBR I:ESKI I:EVNOC y : I:EGTD I:EGTB y I:EKIHK y I:EINH y I:ETAB y I:EVIN y , ( @ : ! P
0x1560f0…156284 Dummy {f00=0x006c, f01=0x4142, f02=» : ! )P9H # T &W y I:EBR j z I:EBRB n z 2 , ( Y &" :I : : P & z F I:ESKI z v I:EVNOC z I:EGTD z I:EGTB z & " y _ &X _ : : : : z 8 4 P P 'P -P
0x156284…156418 Dummy {f00=0x006c, f01=0x40de, f02=» 2 F IDENT I:EDS P,3.2,78-09-15,870136940320 { I:EDS { : I:EDS { J I:EVS2 { I:ED1 { n , ( { ~ : { : { & { @ { : z 8 4 P P 'P -P
0x156418…1565ac Dummy {f00=0x006c, f01=0x0190, f02=» 2 F IDENT I:STR P,3.2,78-09-15,870136940320 | $ I:INS I:DLT I:MCH I:CPY I:XCP | : I:DLT | b I:EVS1 | t I:MCH | , ( @ P 9 _ | , ( @ [ | , ( ; Z
0x1565ac…156740 Dummy {f00=0x006c, f01=0x418c, f02=» ) | j I:EVS2 } , ( V E } I:CPY } L I:XCP } ^ , ( W [ : } p , ( Z !0P 4 R :d" 8 R ! :DW } , ( ! 9 R R Y, : } I:MVC
0x156740…1568d4 (1, 279) Dummy {f00=0x006c, f01=0x0190, f02=» W A a ( !,,P - , ( _ a Z , , ( : ( !;;P W , ( - ( !,,T 0 - : , ( M A.A I. C.9b! X 9 :A H , ( 0 m r r W
0x1568d4…156a68 Dummy {f00=0x006c, f01=0x0190, f02=»SST $ )T : ) | , ( P P _ @ H ;H H ! T , ( ; T : T ` : L , ( - _d R | , ( @ M P @ _& : , ( m P T A I W :
0x156a68…156bfc Dummy {f00=0x006c, f01=0x0190, f02=»w E l , ( M % : D A R , ( W M A I X A < , ( - M % : =E t w l , ( M E M T 1 E _ M @ m : H D ! R. E S uV {S
0x156bfc…156d90 Dummy {f00=0x006c, f01=0x0190, f02=» CP SW gP PB Q6 V U R EPP I & UP x H D !@ YP< g & T T P PL P P AP IP OW eP qR u wW P 4 H D ! D . WN D p T T 4 T l T l H D ! T %T +W 1Tz 7P ET [P aW e {P P WZ P
0x156d90…156f24 Dummy {f00=0x006c, f01=0x409e, f02=» T ]P o qP u 4 wT d H D ! } N W p 4 O R W R ) N C p M UT l ' @ p T T 4 T l T l H D ! T %T +W 1Tz 7P ET [P aW e {P P WZ P
0x156f24…1570b8 Dummy {f00=0x006c, f01=0x2008, f02=» L = INT DATE = 78-09-08 PACK NBR = -0- f
0x1570b8…15724c Dummy {f00=0x006c, f01=0x40fc, f02=» 2 F IDENT I:HEX T,3.2,78-09-15,870137140320 I:HEXBK I:HEXW I:HEX : I:HEXBK Z I:HEXW n I:HEX , ( W 9 " R 0 1 Y ! : W " @ +W@ /W< 3W8
0x15724c…1573e0 Dummy {f00=0x006c, f01=0x4114, f02=» 2 F IDENT I:CHK T,3.2,78-09-15,870137140320 I:CHK : I:CHK J P:BAS P:END l TC:CHK | * & @ ;a <a R <a V I:ERR : R V $
0x1573e0…157574 (1, 280) Dummy {f00=0x006d, f01=0x413e, f02=» W4 W( W$ W p H D ! W W W W ! %P 'S ? C G WP a cT m u , H D != P T P T x H D !y@ R 'R` GV K OT8 S [T _Q eR oR {T V
0x157574…157708 Dummy {f00=0x006d, f01=0x2008, f02=»
0x157708…15789c Dummy {f00=0x006d, f01=0x0190, f02=» W W W @W | , ( A. @ P (@ >A K : , ( ( L 00 | , ( R ( -_ : d , ( 5 8# R _ ZY QY : A @ , ( ( U A A Z
0x15789c…157a30 Dummy {f00=0x006d, f01=0x0190, f02=»_. ` (9A @ A , ( B A @ ( B $ , ( V P Z 0>BX T , ( B $ =_ @ ( A , ( 1 A - @ , ( @ Q A A @ 8 X
0x157a30…157bc4 Dummy {f00=0x006d, f01=0x0190, f02=»P v A t , ( N ;B A R @ A , ( @ N P .P v D , ( " A A 4:AV @ U t , ( / T U T P P _ H , ( O U W A J YB @ .P , (
0x157bc4…157d58 Dummy {f00=0x006d, f01=0x018e, f02=» , ( A 4 5 B , ( C @ <A_H D $ 4 , ( " U A A R W A d , ( A / h @ (P , ( O @ P ,P A U:BTAB , (
0x157d58…157eec Dummy {f00=0x006d, f01=0x0190, f02=» f , ( P * H I , ( ZXP _ P 8 I:INITK & h , ( " _ @ K _ | , ( - @ T A P " P A , ( M W 1 A 9h M P
0x157eec…158080 Dummy {f00=0x006d, f01=0x0190, f02=»T l , ( 1 I T _,9 , ( T @ T A.(@ : < , ( [ ( ! T _ !AAT A W l , ( - !UUT @ P , @ T A , ( M @ P , W A a , ( m
0x158080…158214 (1, 281) Dummy {f00=0x006d, f01=0x0190, f02=» 2 F IDENT TRACHK T,3.2,78-09-15,870137140320 . * TC:CHKK TC:ABT TC:ERR TC:RDC TC:RMP : I:TRC l TC:RMP | TC:CHKK TT:HLT * & @ P ( _ @ TT:TON TT:TRP , (
0x158214…1583a8 Dummy {f00=0x006d, f01=0x0190, f02=»VER , ( Q W " @ P $ TT:VMM < TT:RON N , ( k B $P , D D E @ ` TT:REP TT:RMDR , ( P $ T D P T D , ( A a W : @ P A H A
0x1583a8…15853c Dummy {f00=0x006d, f01=0x418c, f02=» TB:ABTL , ( ( A _ TB( TC:RDC @ TB:RDC T TC:ERR f TT:MSG z , ( H : TB( : A " A " E A , ( TB( ( ) A : H
0x15853c…1586d0 Dummy {f00=0x006d, f01=0x018e, f02=» 2 F IDENT TRATAB T,3.2,78-09-15,870137140320 F B TT:TONK TT:TRP TT:LOP TT:VON TT:VER TT:VMM TT:RONL TT:REP : . * TT:RMD TT:HLT TT:PRC TT:TID TT:MSG TT:TONK TT:TRP , (
0x1586d0…158864 Dummy {f00=0x006d, f01=0x0190, f02=» f , ( a TT:VMM @ 8 L TT:RONL h TT:REP | , ( , ( TT:LOP T
0x158864…1589f8 Dummy {f00=0x006d, f01=0x4020, f02=» ~ ^ @ TT:VMM @ 8 L TT:RONL h TT:REP | , ( , ( TT:LOP T
0x1589f8…158b8c Dummy {f00=0x006d, f01=0x0190, f02=» 2 F IDENT TRABUG T,3.2,78-09-15,870137140320 TB:ENTK TB:ABT TB:RDC : P:BAS n , ( ~ TB:ABT TB:ENTK , ( ( ( (
0x158b8c…158d20 Dummy {f00=0x006d, f01=0x0190, f02=» 9a : x TT:TID TT:MSG * , ( g @ P @ < TB:RDC l , ( A A "V # ( , ( D A P UW T A , ( P @ = W
0x158d20…158eb4 (1, 282) Dummy {f00=0x006d, f01=0x0190, f02=» p , ( U ? A 2 A 4 A 6 A 8 A B , ( UT _ A : A < A > A @ A H A D A F @ , ( ( P A D A F , + - p , ( ; : ( X " , , ( P A F A D_@ X ,T , (
0x158eb4…159048 Dummy {f00=0x006d, f01=0x0190, f02=» B ? A 8_ A B " @ DT " @ F , ( E( _ @ HP A < A : " @ < 0 , ( T @ W @ < A W ` , ( W 0 W _2 , ( B P @ <& _8 , (
0x159048…1591dc Dummy {f00=0x006d, f01=0x0190, f02=» A , ( _ ;a ]@ 1 _D 0 , ( J P 3P P , ( C @ :P @ < 1 "T @ W , ( @ @ < A 0 J P , ( R @ :P @ < 1
0x1591dc…159370 Dummy {f00=0x006d, f01=0x0190, f02=»" 1 p , ( J ] P @ < @ > @ @ @ BT @ , ( @ { R *9l! P &9d! ) @ , ( W P &9d & _ p , ( & A , ( A @ Z " ! , ( @
0x159370…159504 Dummy {f00=0x006d, f01=0x0190, f02=» Y T @ :P @ <! 5 = TT:TRP 0 , ( Q( y P @ < W B TT:TON r , ( @ B A T @ W @ , ( < A " A A @ ( , ( A " @
0x159504…159698 Dummy {f00=0x006d, f01=0x0190, f02=» h TT:REP , ( R # @ < @ 2P @ 4P V TT:RMD J TT:RON , ( A@ R % ) @ B I I A n TC:RMP , ( [ W P R )W a , ( w A P @ < @ 2P @
0x159698…15982c Dummy {f00=0x006d, f01=0x0190, f02=» TT:VON , ( $ I I A W * & @R I W P R )W F , ( A EQ GR t , ( LO NE NG NL R @ , ( ; < @ 4 @ 2P P , ( H
0x15982c…1599c0 Dummy {f00=0x006d, f01=0x0190, f02=» , ( T W #T P P , ( (T P ,T P )T 4 , ( T @ R ?aP * d , ( :l" T & W T C B B , ( 1 B B B " A A A , ( Q A A A
0x1599c0…159b54 (1, 283) Dummy {f00=0x006d, f01=0x0190, f02=» LABEL = SSTS101 DATE = 78 10 16 PACK NBR = 101 f
[…0x7…]
0x15a660…15a7f4 (1, 284) Dummy {f00=0x006e, f01=0x0190, f02=» LABEL = SSTS101 DATE = 78 10 16 PACK NBR = 101 f
[…0xf…]
0x15bfa0…15c134 (1, 286) Dummy {f00=0x006e, f01=0x0190, f02=» M ;h # <c$ P X " , ( m Z "X 8# T 8Z V , DWTOR , ( X # T X P y Y X l DWTECB , ( $ ' X (@ L ' T 4X <d , ( $ _@ $?:D" Y X P
0x15c134…15c2c8 Dummy {f00=0x006e, f01=0x018e, f02=»P n , ( C "P T (R X # X > P RTNA15 > , ( c P P X X> P , ( _@ W ? T T , ( W u > > E D , ( E E S % ;DV " U "
0x15c2c8…15c45c Dummy {f00=0x006e, f01=0x0190, f02=» f LDREG . , ( @ Y Y Y Y _8 X XB LDREGF < J LDREGE @ ^ , ( 9@" Y X X X X ' r GETCHRC T * & S 4 B U B (" W C OUTLIN` r , ( q
0x15c45c…15c5f0 Dummy {f00=0x006e, f01=0x0190, f02=» P T (V W 8V T (P U , ( ( 8 ~ U Q P X H ( IHRET8N X , ( 5 U R " ] " Y j , ( + V P X P P _ ] CHLTON X , ( @ I W Q Y _4 @ T
0x15c5f0…15c784 Dummy {f00=0x006e, f01=0x0190, f02=» @ n & " T A % > > ECHEND 8 ECHOY L DWTWAT ^ , ( @ Y Y Y X 9BV X " p ECHRTN TENDIO , ( A Y X D V " @ X <
0x15c784…15c918 Dummy {f00=0x006e, f01=0x0190, f02=» P: P0 P, R H D !H T ( Tl WH R 5P2 9R. AT QT UP _P mWf s } ( T H D !$ W V P W P R R R T r 3 =R G ]P d H D ! T" V. T P T P P T P P T 7R =P> GP* MR [ r H D ! aP eP
0x15c918…15caac Dummy {f00=0x006e, f01=0x408e, f02=» H D ! P Q0 P R /V 7P AP KW _T qR4 yS P T W $ T V$ V P x@ R T r 3 =R G ]P d H D ! T" V. T P T P P T P P T 7R =P> GP* MR [ r H D ! aP eP
0x15caac…15cc40 Dummy {f00=0x006e, f01=0x2008, f02=»
0x15cc40…15cdd4 (1, 287) Dummy {f00=0x006e, f01=0x0190, f02=» LABEL = SSTS101 DATE = 78 10 16 PACK NBR = 101 f
[…0x7…]
0x15d8e0…15da74 (1, 288) Dummy {f00=0x006f, f01=0x0190, f02=» LABEL = SSTS101 DATE = 78 10 16 PACK NBR = 101 f
[…0x7…]
0x15e580…15e714 (1, 289) Dummy {f00=0x006f, f01=0x0190, f02=» h * & D A ~ 4 A ._ @ ~X _ X , ( R X P T Y W ! 6 , ( C 4 Q ! f , ( 4 @ 1 ! P A ! W A , ( ! A ! 4 @ T A IH0701 R
0x15e714…15e8a8 Dummy {f00=0x006f, f01=0x0190, f02=» A 2 ! 4J T z , ( * ! ! P W ! P @ A & , ( ! 4 0 J IH0702 z , ( P 4 0:H P , ( @ B T ! @ 0P A 0 Q A W J , ( T ! P ! Xv W
0x15e8a8…15ea3c Dummy {f00=0x006f, f01=0x0190, f02=» A _: ~ , ( _T @ ` @ DC07ON N , ( B P $ , 4 @ T Z b , ( " A ! $ A ! $ , @ A & * & ( A a & 4 DW0700 , ( $
0x15ea3c…15ebd0 Dummy {f00=0x006f, f01=0x0190, f02=» n o z { . @ R d v , ( UUW W A A @ - - ( $ R A @ @ 4 , (
0x15ebd0…15ed64 Dummy {f00=0x006f, f01=0x0190, f02=» F l R H D ! F J n T @ 5 GP K R Q Z YWp iT y P H D !QF P 0 P 0 P P P * P ) /R6 7T. AP* & T Z H D ! , T T Pf T H P T H P2 H D !: P %T 7 > C I
0x15ed64…15eef8 Dummy {f00=0x006f, f01=0x0190, f02=» T 0 QT" aT mW P. T T R P H D !: T W P * W * # * ) 0 +T ; $ =P AW E 0 F H D ! G Y P ]T& a gT qW }R W T2 P W& P$ 2 P H D !P P T P Q W T
0x15eef8…15f08c Dummy {f00=0x006f, f01=0x4044, f02=» < R " B D ! " G L I J v l .@ @ D !: T W P * W * # * ) 0 +T ; $ =P AW E 0 F H D ! G Y P ]T& a gT qW }R W T2 P W& P$ 2 P H D !P P T P Q W T
0x15f08c…15f220 Dummy {f00=0x006f, f01=0x2008, f02=» STREGI 2 SSTI16 SSTI40 LDREGO IHLCU1 LOGOUT IHLCUX IHLCU2 " WR100 . STREGO j LCI3G R LCI4 V LCI5 Z LCI6 ^ LCI7 b LCI8 f RTNA15 J LCO3G LCO4 LCO5 LCO6 LCO7 LCO8 DCTAB H FINT10 FINT20 DRDC15 DRDC10 SPT
0x15f220…15f3b4 (1, 290) Dummy {f00=0x006f, f01=0x0190, f02=» LABEL = SSTS101 DATE = 78 10 16 PACK NBR = 101 f
[…0xf…]
0x160b60…160cf4 (1, 292) Dummy {f00=0x0070, f01=0x2008, f02=» OSI25 b POSI40 t POSI30 p RDSEQN F POSI45 POSI80 POSI48 POSI50 POSI60 POSI65 POSI70 POSI90 COMMT J RBLK10 4 COMM10 N COMM20 t COMM15 d TIMOUT TOUT10 IHCC10 IHCC20 IHCC30 IHCC40 IHCC50 IHCC60 CCON0 F C
0x160cf4…160e88 Dummy {f00=0x0070, f01=0x0190, f02=» LABEL = SSTS101 DATE = 78 10 16 PACK NBR = 101 f
[…0xe…]
0x1624a0…162634 (1, 294) Dummy {f00=0x0070, f01=0x2008, f02=»
0x162634…1627c8 Dummy {f00=0x0070, f01=0x0190, f02=» B X (R B X X $ 4 C1DRON ( & C2DRON` 2 : C3DRON < N , ( )A W W b , ( C W Y . 0T 6 , ( a 0T W - L Q , (
0x1627c8…16295c Dummy {f00=0x0070, f01=0x0190, f02=» B ! * !OT ! R , ( ' Q R ! >_ ' Q R ! " , ( _ ! T < V X D< R R , ( ; Y + 4 X H ! 2 Y < , , ( ? [ # 4 = "178? > R F X B B , DWCC01 , ( { 6 H F R
0x16295c…162af0 Dummy {f00=0x0070, f01=0x0190, f02=» ( $ & DWCC02A R , ( f , ( 7 s t { A , ( W A I , ( w
0x162af0…162c84 Dummy {f00=0x0070, f01=0x0190, f02=» s t { A , ( A I $ , ( T ! H D !Y ] P l t !V +R M Q Y _T6 e o }V H D ! ?
0x162c84…162e18 Dummy {f00=0x0070, f01=0x0190, f02=» B 2 P U U P T B > V< R6 T. H D ! > 2 R T W > 2 P #R -T 3W 9T A KT O > H D !b UR ] a gT mR P & W T T U $ P H D ! T U V W U P
0x162e18…162fac Dummy {f00=0x0070, f01=0x0190, f02=»W> R@ W2 W R )V - > /W n H D !L 9R4 = > GU MW Q B U * [R aW kPz mW s F yP WN U WR R * H D ! F P W V R& W P P W WT WP WL WH WD W< W8 v H D ! W4 W0 W, %W )W -W 1W =W AW IW [P ]S T W
0x162fac…163140 Dummy {f00=0x0070, f01=0x4058, f02=»Q6 R Q$ R Z ( $ F ! F )T /V 7R _ * * B@ T F yP WN U WR R * H D ! F P W V R& W P P W WT WP WL WH WD W< W8 v H D ! W4 W0 W, %W )W -W 1W =W AW IW [P ]S T W
0x163140…1632d4 (1, 295) Dummy {f00=0x0070, f01=0x0190, f02=» LABEL = SSTS101 DATE = 78 10 16 PACK NBR = 101 f
[…0x7…]
0x163de0…163f74 (1, 296) Dummy {f00=0x0071, f01=0x0190, f02=» LABEL = SSTS101 DATE = 78 10 16 PACK NBR = 101 f
[…0x1f…]
0x167060…1671f4 (1, 300) Dummy {f00=0x0072, f01=0x0190, f02=» LABEL = SSTS101 DATE = 78 10 16 PACK NBR = 101 f
[…0x17…]
0x169640…1697d4 (1, 303) Dummy {f00=0x0072, f01=0x0190, f02=» 4 j , ( 5 ! ] ! ] 4 ! 4 , ( U ! ! ! ! 4 ! 4 ! : , ( u _ ! 4 ! _* ! 4 ! Y 0 X j , ( 0T W 1 ! _L < B , ( $ 4 8 B T W 4 Y ] ! , ( !
0x1697d4…169968 Dummy {f00=0x0072, f01=0x0190, f02=» Y Y " Y $W 8 I ] , ( Q ] " ] " ! ! * , ( o Z X } ] 4 ] ] Z , ( @ $ ] " (_H ! , ( R " I R 4 _ ] ] " ] IH8101 , ( $
0x169968…169afc Dummy {f00=0x0072, f01=0x018e, f02=» + P ] P } ] ! , ( K P ! P C . IH8102L | ^ , ( e"@ P C A r , ( X X " X $ X ( * , ( 4 X 6 6 , P ! P , (
0x169afc…169c90 Dummy {f00=0x0072, f01=0x0190, f02=» , ( WX [ ]^ ab d gh k mn p s u , ( = @v yz | * Y X 4 , ( [ ( * ! Y ! y d , ( y W Y X ( * ! ! T , ( ] ] $ C ! ! 4 , ( " ! &
0x169c90…169e24 Dummy {f00=0x0072, f01=0x0190, f02=» Y ! , ( / X ( X $ _ _ 9D ! P " M ;a ! 4 R H D !~u T / T ] P T P* P, t H D ! 6 F 5 9 A R K QW c gT6 oT
0x169e24…169fb8 Dummy {f00=0x0072, f01=0x0190, f02=» Y ] R aR, X H D ! e k o N T: W4 T W P0 W 9P AVH H D ! ]P eT oR W R VH N T P6 P #T G ` H D !#& ITJ ST@ W YRP [T8 eP m R P R P Vt H D ! v P6
0x169fb8…16a14c Dummy {f00=0x0072, f01=0x0190, f02=» ! a gPN } N P 4 & P6 P, P P )W 3 & ; H D ! A & K O R SV W k j sT: w { P` P N T" 4 & L H D ! & 8 ! & ' & - & 1 7 E & W & ] & c & g H D ! b s & & & T W & L T
0x16a14c…16a2e0 Dummy {f00=0x0072, f01=0x405e, f02=» T P B Rb P V P P B R. " | KP 8 ^ H@ ZV W k j sT: w { P` P N T" 4 & L H D ! & 8 ! & ' & - & 1 7 E & W & ] & c & g H D ! b s & & & T W & L T
0x16a2e0…16a474 (1, 304) Dummy {f00=0x0073, f01=0x0190, f02=» LABEL = SSTS101 DATE = 78 10 16 PACK NBR = 101 f
[…0x17…]
0x16c8c0…16ca54 (1, 307) Dummy {f00=0x0073, f01=0x0190, f02=» P* P* PDCRD EQU * P LD A8,DWTECB,A6 GET ECB * . P LD A3,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE J " P RF(Z) DCRD10 NOTHING IN QUEUE | P ( P LDR* A2,A3 TAKE THE FIRST IN QUEUE P ST A2,DWTRQ,A6 P ADK A3,6 P ST A3,E
0x16ca54…16cbe8 Dummy {f00=0x0073, f01=0x0190, f02=» P $ PDCRD10 CF A15,TIMERE START TIMER P RB DCRTN 4 P EJECT F P* T P* ^ P* GET WRITE BUFFER h P* P* P IFF TBUFL=0 P* COMPLETE WHEN: P* BUFFER BEEN ALOCATED P* TIME OUT P* P*
0x16cbe8…16cd7c Dummy {f00=0x0073, f01=0x0190, f02=» P LDKL A1,TBUFL+TBUFL ( P ST A1,ECBEL,A8 STORE BUFFER LENGTH P LDK A1,0 L P RB ENDIO COMPLETE REQUEST ^ PDCGW10 EQU * P CF A15,TIMERE START TIMER P CF A15,INSGWQ QUEUE REQUEST P RB DCRTN P XIF P EJECT P*
0x16cd7c…16cf10 Dummy {f00=0x0073, f01=0x0190, f02=»DCRR10 EQU * P LDK A1,0 * P CF A15,TENDIO COMPLETE RRBUF REQUEST & P RB DCRTN T P EJECT f P* t P* ~ P* EXCHANGE P* P* P* P* COMPLETE WHEN: " P* MESSAGE PASSED TO TERMINAL P* TIME OUT
0x16cf10…16d0a4 Dummy {f00=0x0073, f01=0x0190, f02=» IFF STAT=0 PDCSS EQU * * P LD A1,ECBCW,A8 GET STATUS INFORMATION & P ANK A1,3 MASK DB,IR T P RF(Z) DCSS20 DEVICE END p PDCSS10 EQU * P ST A1,DWTST,A6 P RB DCRR10 COMPLETE REQUEST PDCSS20 EQU * P LD A1,DWTST,A6
0x16d0a4…16d238 Dummy {f00=0x0073, f01=0x0190, f02=»DK A1,4 SET DE P RB DCSS10 P XIF ( P EJECT 4 P* B P* L P* V P* TIMER HANDLING PART ` P* ~ P* P* P* READ TIMER=TIMERR P* PTIMERE EQU * P LDR A1,A6 & P LD A2,ECBCW,A8 GET TIMEOUT VALU
0x16d238…16d3cc Dummy {f00=0x0073, f01=0x0190, f02=»WTTP,A6 STORE TIMER POINTER PTIME10 EQU * $ P RF GBUF10 RETURN 8 P* R P* TIMEOUT READ TIMER P* x PTOUTRE EQU * P LDR A6,A1 FETCH DWT P CM DWTTP,A6 P IFF TBUFL=0 $ P CF A15,REMOVG REMOVE FROM QUEUE P XIF
0x16d3cc…16d560 Dummy {f00=0x0073, f01=0x0190, f02=») TOUTR2 NOT EXCHANGE 2 P ORK A1,2 RETURN CODE /42 AT EXCHANGE TIME OUT $ PTOUTR2 RB ENDIO COMPLETE REQUEST T P* | P* WRITE TIMER=TIMWR P* PTIMEWR LDR A1,A6 & P LD A2,ECBCW,A8 GET TIMEOUT VALUE P RB(Z) TIME10 NO TIMING
0x16d560…16d6f4 (1, 308) Dummy {f00=0x0074, f01=0x0190, f02=» P* P* TIMEOUT WRITE TIMER P* 0 PTOUTWR EQU * : P LDR A6,A1 FETCH DWT N P CM DWTTP,A6 j P LD A1,DWTOR,A6 GET ORDER ~ P SUK A1,6 P RF(Z) TOUT10 WRITE P SUK A1,2 ( P RB(NZ) TOUTR1 ORDER IS NOT EXCHANGE
0x16d6f4…16d888 Dummy {f00=0x0074, f01=0x018e, f02=»F A15,CKGBQ CHECK GET BUFFER QUEUE P XIF * * P CF A15,REMOVW REMOVE FROM WRITE QUEUE 6 P* d & P* THIS INSTRUCTION DOES NOT BELONG n P* TO THE STANDARD INTERFACE ( P CM XACK INDICATE 'ACK NOT EXPECTED' P LD A2,FDWTUT P CWR A2,A6
0x16d888…16da1c Dummy {f00=0x0074, f01=0x018e, f02=» P* STOP REQUEST TIMING P* & & P* REMAINING TIME IS RETURNED IN A2 0 P* Z P* d PCTIME EQU * n & P LD A2,DWTTP,A6 GET TIMER POINTER P RF(Z) CTIM10 NOT RUNNING P LDR* A2,A2 " P NGR A2,A2 GET REMAINING TIME P
0x16da1c…16dbb0 Dummy {f00=0x0074, f01=0x0190, f02=» z P* ! $ P* CALLING SEQUENCE: CF A15,GRBUF ! P* A4=0 IF NO BUFFER IS FREE ! : & P* ELSE A4 CONTAINS BUFFER ADDRESS ! ^ P* A2 AND A3 ARE DESTROYED ! P* ! P* ! ( PGRBUF LDKL A2,DCRBUF RECEIVE BUFFERS ! PGBUF INH ! P LDR* A4,A2 !
0x16dbb0…16dd44 Dummy {f00=0x0074, f01=0x018e, f02=»TACK POINTER ! v P ABR* A15 RETURN TO CALLER " P* " 6 P* " @ P* GET TRANSMIT BUFFER " J P* " h P IFF TBUFL=0 " r $ P* CALLING SEQUENCE: CF A15,GTBUF " P* A4=0 IF NO BUFFER IS FREE " & P* ELSE A4 CONTAINS BUFFER ADDRESS " P* A2 AND A3
0x16dd44…16ded8 Dummy {f00=0x0074, f01=0x0190, f02=» P* CHECK GET BUFFER QUEUE # P* # $ P* # . PCKGBQ EQU * # 8 P LDR A7,A6 SAVE A6 # L " P LD A6,DCGWQ GET QUEUE ANCHOR # f " P RF(Z) CKG110 NO ONE ON QUEUE # P SUK A6,DWTWQ # P LD A2,DWTST,A6 # P RF(N) CKG100 NO REQUEST # P LD A2,D
0x16ded8…16e06c Dummy {f00=0x0074, f01=0x0190, f02=» P RF(Z) CKG110 NO BUFFER FREE $ P LD A3,DWTECB,A6 $ ( ( P ST A4,ECBBA,A3 STORE BUFFER ADDRESS $ @ P LDKL A1,TBUFL+TBUFL $ l ( P ST A1,ECBEL,A3 STORE BUFFER LENGTH $ & P CF A15,CTIME STOP REQUEST TIMING $ ( P ST A2,ECBCW,A3 STORE REMAINING TIME $
0x16e06c…16e200 Dummy {f00=0x0074, f01=0x0190, f02=» RESTORE A6 $ P RB GBUF10 RETURN % P XIF % . P EJECT % : P* % H P* % R P* RELEASE RECEIVE BUFFER % P* % | P* A4 CONTAINS BUFFER ADDRESS % $ P* CALLING SEQUENCE: CF A15,RRBUF % P* A2 AND A3 ARE DESTROYED % P* % P* % ( P
0x16e200…16e394 (1, 309) Dummy {f00=0x0074, f01=0x0190, f02=» P RB RBUF10 & PRBUF20 EQU * & P STR A4,A2 & * P CMR A4 & < P RB GBUF10 RETURN TO CALLER & L P* & p P* & z P* RELEASE TRANSMIT BUFFER & P* & P IFF TBUFL=0 & P* A4 CONTAINS BUFFER ADDRESS & $ P* CALLING SEQUENCE: CF A15,RTBUF
0x16e394…16e528 Dummy {f00=0x0074, f01=0x0190, f02=» RBUF DRIVER BUFFER & P CWK A4,TBUF2 ' P RB(E) RBUF DRIVER BUFFER ' 2 " P RB GBUF10 APPLICATION BUFFER ' T P XIF ' z P EJECT ' P* ' P* ' ( P* INSERT DWT IN WRITE REQUEST QUEUE ' P* ' P* A2,A3,A4 DESTROYED ' P* A6=DWT '
0x16e528…16e6bc Dummy {f00=0x0074, f01=0x018e, f02=» FOUND ' v P LDR A2,A3 ( P RB INSWQ2 ( PINSWQ3 ADR A4,A6 ( 2 P STR A4,A2 INSERT IN QUEUE ( J " P CMR A4 INDICATE END OF QUEUE ( l P RB GBUF10 RETURN ( P* ( P* ( * P* REMOVE DWT FROM WRITE REQUEST QUEUE ( P* ( P* A2,A3,A4 DESTR
0x16e6bc…16e850 Dummy {f00=0x0074, f01=0x0190, f02=» PREM06 EQU * ) P ADR A4,A6 ) PREM10 LDR* A3,A2 ) , & P RB(Z) GBUF10 NOT ON QUEUE: RETURN ) D P CWR A3,A4 ) n P RF(E) REM15 ) P LDR A2,A3 GET NEXT ) P RB REM10 ) PREM15 LDR* A3,A4 REMOVE ) P STR A3,A2 ) P RB GBUF10 RETURN )
0x16e850…16e9e4 Dummy {f00=0x0074, f01=0x0190, f02=» DESTROYED ) P* A6=DWT * P* * " * PINSGWQ LDKL A2,DCGWQ GET QUEUE ANCHOR * , P RB INSWQ1 * Z P* * l P* * v , P* REMOVE DWT FROM GET WRITE BUFFER QUEUE * P* * P* A2,A3,A4 DESTROYED * P* A6=DWT * P* * * PREMOVG LDKL A2,DCGWQ GET
0x16e9e4…16eb78 Dummy {f00=0x0074, f01=0x0190, f02=» STAT=0 * P* A2,A3,A4 DESTROYED + P* A6=DWT + , P* + < ( PINSSQ LDKL A2,DCSTQ GET QUEUE ANCHOR + F P LDK A4,DWTSQ + r P RB INSWQ2 + P* + P* + " P* REMOVE DWT FROM STATUS QUEUE + P* + P* A2,A3,A4 DESTROYED + P* A6=DWT +
0x16eb78…16ed0c Dummy {f00=0x0074, f01=0x0190, f02=» + $ P* QUEUE ALLOCATED RECEIVE BUFFER , P* , 0 P* A4=BUFFER ADDR , : P* A2,A3 DESTROYED , R P* , l PQRBUF EQU * , v P IFT MESPAS=1 , ( P LDKL A2,DW1500 QUEUE ON DC-TASK DWT , P XIF , P IFT MESPAS=0 , $ P LDR A2,A6 QUEUE ON TERMIN
0x16ed0c…16eea0 Dummy {f00=0x0074, f01=0x0190, f02=»EUE FOUND , z P LDR A2,A3 - P RB QR100 - $ & PQR200 STR A4,A2 INSERT INTO QUEUE - 6 " P CMR A4 INDICATE END OF QUEUE - ` P RTN A5 - P EJECT - P* - P* - 2 P* CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE - P* - 4 P* REGISTERS A1,A
0x16eea0…16f034 (1, 310) Opaque[0x194]
0x16f034…16f1c8 # DirEnt {nam=»MULDIV«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0e90, f03=0x2020}
0x16f034…16f1c8 IdxSect {
0x16f034…16f1c8 f00 = 0x0074 // 0x16f034 @0x0
0x16f034…16f1c8 f01 = 0x0008 // 0x16f036 @0x2
0x16f034…16f1c8 gno = [ // 0x16f038 @0x4
0x16f034…16f1c8 [0x00]: C0x0074.0x2.0
0x16f034…16f1c8 [0x01]: C0x0074.0x3.0
0x16f034…16f1c8 [0x02]: C0x0075.0x0.0
0x16f034…16f1c8 [0x03]: C0x0075.0x1.0
0x16f034…16f1c8 ]
0x16f034…16f1c8 }
0x16f1c8…16f35c Dummy {f00=0x0074, f01=0x0190, f02=» 2 P IDENT MULDIV REL 8.2 78-09-15 870172840820 P : P* B 0 P******************************************* L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* ( P* MULDIV = MULTIPLICATION/DIVISION P* P* P* P*
0x16f35c…16f4f0 Dummy {f00=0x0074, f01=0x018e, f02=»O HANDLE l * P* INTEGER MULTIPLICATION AND DIVISION P* > P* FORMAT MULTIPLICATION: H P* CF A14,T:MUL h P* BYTE EL1,EL2 ~ P* BYTE EL3,EL4 P* P* FORMAT DIVISION: P* CF A14,T:DIV P* BYTE EL1,EL2 P* BYTE EL3,EL4
0x16f4f0…16f684 Dummy {f00=0x0074, f01=0x0190, f02=» z P ENTRY M:BRK,M:SIGN P EJECT $ P* 2 P EXTRN T:ADD,T:SUB < P EXTRN T:MOV,T:CMP,T:OPA V P EXTRN T:SHR,T:SHL v P EXTRN T:OPS P EXTRN RETMMM ( P EXTRN M:ADD,M:SUB,M:MOV,M:CMP,M:OPA P EXTRN M:SHR,M:SHL,M:OPS P*
0x16f684…16f818 Dummy {f00=0x0074, f01=0x0190, f02=» PT:MULC EQU * P ADKL A13,1 INDICATE MULC P* : PT:MUL EQU * D P SUKL A14,8 X P IFT OVERLY=0 l ( P CF A14,T:BRK GET ARGUMENT AND BREAK $ P CF A14,T:SIGN SET START VALUES " P CF A14,T:MOV MOVE EL1 TO EL3 PMU10 DATA /3
0x16f818…16f9ac Dummy {f00=0x0074, f01=0x0190, f02=» P IFT OVERLY=1 ( P CF A14,M:BRK GET ARGUMENT AND BREAK $ P CF A14,M:SIGN SET START VALUES F " P CF A14,M:MOV MOVE EL1 TO EL3 n PMU10 DATA /3010 " P CF A14,M:SUB SUB EL3 FROM EL1 PMU20 DATA /1030 P* ( PMU30 CF A14,M:BRK GE
0x16f9ac…16fb40 Dummy {f00=0x0074, f01=0x0190, f02=»2,4 GET DIGIT P ANK A2,/F MASK DIGIT P RF(Z) MU50 NEXT DIGIT 4 P SUK A2,/F R P RF(Z) MU80 JUMP IF FINISHED d P SUK A3,/10 DECREMENT DIGIT P SCR A3,A1 RESTORE BYTE P IFT OVERLY=0 P CF A14,T:ADD ADD EL3 TO EL1 PMU
0x16fb40…16fcd4 (1, 311) Dummy {f00=0x0074, f01=0x0190, f02=»FT EL3 z P XIF P IFT OVERLY=1 P CF A14,M:ADD ADD EL3 TO EL1 0 PMU40 DATA /1030 T P RB MU30 l P* | & PMU50 CF A14,M:SHR SHIFT RIGHT EL4 PMU60 DATA /4001 P CF A14,M:SHL SHIFT LEFT EL3 P XIF PMU70 DATA /3001
0x16fcd4…16fe68 Dummy {f00=0x0074, f01=0x0190, f02=»1,A6 LOAD SIGN BYTE P ANK A1,/F0 MASK DIGIT P LDR* A2,A14 GET RESULT SIGN : P ORR A1,A2 INSERT SIGN ^ P SCR A1,A6 RESTORE SIGN BYTE | P* PRET LDK A2,4 $ P ADS A2,4,A14 MODIFY RETURN ADR P IFT OVERLY=0 P RTN A14
0x16fe68…16fffc Dummy {f00=0x0074, f01=0x0190, f02=»* P***************** P* $ PT:DIVC EQU * . P ADKL A13,1 INDICATE DIVC B P* d PT:DIV EQU * n P SUKL A14,8 P IFT OVERLY=0 ( P CF A14,T:BRK GET ARGUMENT AND BREAK $ P CF A14,T:SIGN SET START VALUES P CF A14,
0x16fffc…170190 Dummy {f00=0x0074, f01=0x0190, f02=» SUR A11,A11 CLEAR A11 P CF A14,T:CMP PDI015 DATA /3040 4 , P RF(E) DI180 JUMP IF DIVISION WITH ZERO L P* | * PDI020 CF A14,T:BRK BACK TO DISPATCHER " P CF A14,T:CMP CMP EL1 AND EL3 PDI030 DATA /1030 P RF(L) DI050 EL1 < EL3
0x170190…170324 Dummy {f00=0x0074, f01=0x0190, f02=»IFT LEFT EL3 PDI040 DATA /3001 ( P SUKL A11,1 DECREMENT SHIFT COUNTER , P RB DI020 X P* j PDI050 LDR A11,A11 t , P RF(Z) DI130 DIVIDEND LESS THAN DIVISOR " P CF A14,T:SHR SHIFT RIGHT EL3 PDI060 DATA /3001 ( P ADKL A11,1
0x170324…1704b8 Dummy {f00=0x0074, f01=0x0190, f02=» j P CF A14,T:SUB EL1 - EL3 PDI090 DATA /1030 ( & P LD A2,4,A14 GET SIGN BYTE ADR EL4 @ P LCR A1,A2 GET BYTE j " P ADK A1,/10 INCREMENT QUOTIENT P SCR A1,A2 RESTORE BYTE P* PDI095 EQU * P CF A14,T:CMP PDI100 EQ
0x1704b8…17064c Dummy {f00=0x0074, f01=0x018e, f02=» r " P CF A14,T:SHR SHIFT EL3 RIGHT PDI110 DATA /3001 . P CF A14,T:SHL SHIFT EL4 LEFT F PDI120 DATA /4001 j $ P CF A14,T:BRK BACK TO DISPATCHER P RB DI095 P* & PDI130 CF A14,T:MOV MOVE EL4 TO EL1 P DATA /1040 P*
0x17064c…1707e0 Dummy {f00=0x0074, f01=0x018e, f02=» P* PDI180 LDK A1,3 INDICATE CR=3 P RB DI150 2 P XIF D P IFT OVERLY=1 P ( P CF A14,M:BRK GET ARGUMENT AND BREAK f $ P CF A14,M:SIGN SET START VALUES P CF A14,M:MOV EL4 TO EL3 PDI005 DATA /3040 P CF A14,M:SUB CLEAR EL
0x1707e0…170974 (1, 312) Dummy {f00=0x0075, f01=0x0190, f02=» ~ , P RF(E) DI180 JUMP IF DIVISION WITH ZERO P* 8 * PDI020 CF A14,M:BRK BACK TO DISPATCHER B " P CF A14,M:CMP CMP EL1 AND EL3 p PDI030 DATA /1030 P RF(L) DI050 EL1 < EL3 P RF(E) DI070 EL1 = EL3 P IM 6,A14 INCREMENT COUNTER
0x170974…170b08 Dummy {f00=0x0075, f01=0x0190, f02=»IFT COUNTER x P RB DI020 P* & PDI050 LDR A11,A11 0 , P RF(Z) DI130 DIVIDEND LESS THAN DIVISOR J " P CF A14,M:SHR SHIFT RIGHT EL3 z PDI060 DATA /3001 ( P ADKL A11,1 INCREMENT SHIFT COUNTER P* * PDI070 ST A11,6,A14 STORE S
0x170b08…170c9c Dummy {f00=0x0075, f01=0x018e, f02=»A2,4,A14 GET SIGN BYTE ADR EL4 P LCR A1,A2 GET BYTE & " P ADK A1,/10 INCREMENT QUOTIENT B P SCR A1,A2 RESTORE BYTE h P* PDI095 EQU * P CF A14,M:CMP PDI100 EQU * P DATA /1030 " P RB(NL) DI080 JUMP IF NOT LESS
0x170c9c…170e30 Dummy {f00=0x0075, f01=0x0190, f02=» P CF A14,M:SHL SHIFT EL4 LEFT PDI120 DATA /4001 ( $ P CF A14,M:BRK BACK TO DISPATCHER @ P RB DI095 h P* z & PDI130 CF A14,M:MOV MOVE EL4 TO EL1 P DATA /1040 P* PDI140 LDK A1,0 INDICATE CR=0 $ PDI150 LD A11,10,A14 REST
0x170e30…170fc4 Dummy {f00=0x0075, f01=0x0190, f02=»1,A1 P ORR A6,A1 P ST A6,10,A14 P RB MU80 4 P* D PDI180 LDK A1,3 INDICATE CR=3 N P RB DI150 r P XIF P EJECT P* P* ( P* T:SIGN SETS EL1 AND EL4 POSITIVE, " P* COMPUTES SIGN OF RESULT AND * P* ST
0x170fc4…171158 Dummy {f00=0x0075, f01=0x0190, f02=» XIF PT:SIGN EQU * " PARG1 LDK A7,/30 GET ELEMNT EL3 P IFT OVERLY=0 F * P CF A14,T:OPA GET ELEMENT DATA FOR EL3 * P SLL A1,1 NEG. NUMBER OF BYTES TIMES 2 ( P ST A1,10,A14 STORE COUNTER ON STACK " P CF A14,T:MOV MOVE EL2 TO EL4
0x171158…1712ec Dummy {f00=0x0075, f01=0x0190, f02=»OR EL1 AND EL4 x P XIF P IFT OVERLY=1 " * P CF A14,M:OPA GET ELEMENT DATA FOR EL3 8 * P SLL A1,1 NEG. NUMBER OF BYTES TIMES 2 f ( P ST A1,10,A14 STORE COUNTER ON STACK " P CF A14,M:MOV MOVE EL2 TO EL4 P DATA /4020 PARG2 EQU *-2
0x1712ec…171480 Dummy {f00=0x0075, f01=0x0190, f02=»T A6,6,A14 STORE ADDRESS OF EL1 ON STACK 0 P ST A10,8,A14 STORE ADDRESS OF EL4 ON STACK 0 P LCR A1,A6 GET SIGN BYTE EL1 d P LDR A2,A1 COPY A1 " P LCR A3,A10 GET SIGN BYTE EL4 P ADR A2,A3 ADD BYTES " P ANK A1,/F0 MASK AWAY SIGN EL1 "
0x171480…171614 (1, 313) Dummy {f00=0x0075, f01=0x0190, f02=»N EL1 x $ P SCR A3,A10 STORE POS. SIGN EL4 P LDK A1,/B LOAD PLUS SIGN 6 & P SRC A2,2 SHIFT BIT 14 TO SIGN BIT X " P RF(N) SIG100 JUMP IF BIT 14=1 P LDK A1,/D LOAD MINUS SIGN PSIG100 EQU * $ P ST A1,12,A14 STORE RESULT SIGN PRE
0x171614…1717a8 Dummy {f00=0x0075, f01=0x0190, f02=» PM:BRK EQU * P IFT OVERLY=1 P LDK A1,/80 . P XRS A1,2,A14 B P XIF X $ PT:BRK LKM RETURN VIA DISPATCHER d P DATA 0 P LD A1,16,A14 GET SECOND P LD A2,2,A1 - ARGUMENT /3040 ( P LDR* A1,A1 GET FIRST ARGUMENT /1020
0x1717a8…17193c Dummy {f00=0x0075, f01=0x0190, f02=»,DI120 P SC A2,DI140-1 P SC A2,ARG3+1 $ P SC A2,ARG2 : P SRL A2,8 A2=/0030 N P ANKL A1,/FF00 A1=/1000 h P ADR A2,A1 A2=/1030 P SC A2,MU70 P SC A2,DI040 P SC A2,DI060 P SC A2,DI110 P SC A2,ARG1+1
0x17193c…171ad0 Dummy {f00=0x0075, f01=0x405a, f02=»,MU10 P SC A2,DI140-2 P SC A2,ARG3 $ P RB RETUR 8 P END J@ V=/0030 N P ANKL A1,/FF00 A1=/1000 h P ADR A2,A1 A2=/1030 P SC A2,MU70 P SC A2,DI040 P SC A2,DI060 P SC A2,DI110 P SC A2,ARG1+1
0x171ad0…171c64 Dummy {f00=0x0075, f01=0x2008, f02=» ST A2,MU10 P SC A2,DI140-2 P SC A2,ARG3 2 P RTN A14 F P END V@ bA2=/0030 P ANKL A1,/FF00 A1=/1000 v P ADR A2,A1 A2=/1030 P SC A2,MU70 P SC A2,DI040 P SC A2,DI060 P SC A2,DI110 P SC A2
0x171c64…171df8 Dummy {f00=0x0075, f01=0x2008, f02=» ASCT10 ADK A6,/A P SUK A4,1 P RB(NE) ASCT10 2 PASCT20 RTN A15 H P END ^@ j P RTN A15 p P* P* 2 P* ASCTBY = SUBROUTINE TO CONVERT A6-CONTENT ( P* FROM ASCII TO BINARY. P* RESU
0x171df8…171f8c Dummy {f00=0x0075, f01=0x018e, f02=» EQU * ; " P CM XACK RESET 'ACK EXPECTED' < PBRM220 EQU * < 4 P CM XSEL RESET 'SELECTED' < H P RB BRM < j P EJECT < z P* < P* < P* STX HAS BEEN RECEIVED < P* < P* < PBRM300 EQU * < P CF A5,HPTIM < P LD A1,XSEL <
0x171f8c…172120 Dummy {f00=0x0075, f01=0x0190, f02=» < p P********************* = PBRM305 EQU * = & P CF A5,RDMESS READ MESSAGE = : P SUK A7,1 = P RF(NZ) BRM320 MESSAGE OK = n PBRM310 EQU * = ( P CM XSTA INDICATE 'INVALID MESSAGE' = PBRM312 EQU * = P CF A5,TRNAK SEND NAK = P RB BR
0x172120…1722b4 (1, 314) Opaque[0x194]
0x1722b4…172448 # DirEnt {nam=»FUNCTN«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0eb0, f03=0x2020}
0x1722b4…172448 IdxSect {
0x1722b4…172448 f00 = 0x0075 // 0x1722b4 @0x0
0x1722b4…172448 f01 = 0x000c // 0x1722b6 @0x2
0x1722b4…172448 gno = [ // 0x1722b8 @0x4
0x1722b4…172448 [0x00]: C0x0075.0x2.0
0x1722b4…172448 [0x01]: C0x0075.0x3.0
0x1722b4…172448 [0x02]: C0x0076.0x0.0
0x1722b4…172448 [0x03]: C0x0076.0x1.0
0x1722b4…172448 [0x04]: C0x0076.0x2.0
0x1722b4…172448 [0x05]: C0x0076.0x3.0
0x1722b4…172448 ]
0x1722b4…172448 }
0x172448…1725dc Dummy {f00=0x0075, f01=0x0190, f02=» 2 P IDENT FUNCTN REL 8.2 78-09-15 870172840820 P : P* B 0 P******************************************* L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* FUNCTN = TOSS FUNCTIONS P* P* P* P* P
0x1725dc…172770 Dummy {f00=0x0075, f01=0x0190, f02=» P* THESE ARE : P* " P* T:ADD(C) DECIMAL ADDITION & P* L $ P* T:SUB(C) DECIMAL SUBTRACTION V P* ~ P* T:CMP(C) COMPARISON P* , P* T:CPA(C) ABSOLUTE COMPARISON P* P* T:MOV(C) MOVE P*
0x172770…172904 Dummy {f00=0x0075, f01=0x0190, f02=»K UNPACK FROM BCD TO ASCII P* $ . P* MVC MOV TO ASCII/BCD FROM ASCII/BCD . P* ` P* j P EJECT t P* P* P* : P* TOSS FUNCTIONS ARE CALLED BY FOLLOWING SEQUENCE : P* P* CF A14,LABEL P* BYTE EL1
0x172904…172a98 Dummy {f00=0x0075, f01=0x0190, f02=»= ELEMENT ADDRESS OF RESULT OPERAND(FIRST OPERAND) P* : 2 P* EL2 = ELEMENT ADDRESS OF SECOND OPERAND D P* z P* P EJECT P* P* P************ P* ENTRIES: * P************ P* " P ENTRY T:ADD DECIM
0x172a98…172c2c Dummy {f00=0x0075, f01=0x0190, f02=» ENTRY T:CMPC " P ENTRY T:CPA COMPARE ABSOLUTE P ENTRY T:CPAC < P ENTRY T:MOV MOVE R P ENTRY T:MOVC l P ENTRY T:OPA,T:OP1 P ENTRY T:OPS P ENTRY RETMMM " P ENTRY M:ADD,M:SUB,M:CMP,M:CPA P ENTRY M:MOV,M:OPA,M:OPS
0x172c2c…172dc0 Dummy {f00=0x0075, f01=0x0190, f02=»EAS USED BY THE DIFFERENT SUBROUTINES * 8 P*************************************************** 0 P* l PT:OP1 EQU * v " P DATA 0 LENGTH 2-COMPLEMENTED P* P* & PT:OP2 DATA 0 LENGTH 2-COMPLEMENTED P* P* P EJECT
0x172dc0…172f54 (1, 315) Dummy {f00=0x0075, f01=0x0190, f02=»SUB EQU * P IFT OVERLY=1 P LDK A2,/80 ( P XRS A2,2,A14 < P RF T:SUB R P XIF d PT:SUBC ADKL A13,1 p ( PT:SUB LDK A2,6 INDICATE SUBTRACTION P RF ADD050 P* P************ P* ADDITION * P************
0x172f54…1730e8 Dummy {f00=0x0075, f01=0x0190, f02=»1 $ PT:ADD LDK A2,0 INDICATE ADDITION PADD050 EQU * 2 P SC A2,SAVE+1 SAVE INDICATOR F P ST A13,ARG1 SAVE A13 j P LD* A7,4,A14 GET ARGUMENT & P ST A7,ARG STORE ARGUMENT FOR COMP P IFT OVERLY=0 " P CF A14,T:CPA COMPARE ABSOLUTE
0x1730e8…17327c Dummy {f00=0x0075, f01=0x0190, f02=» $ P LDR A2,A7 COPY RESULT INDICATOR * P CF A14,GETOPS GET ELEMENT PARAMETERS 0 $ P LDR A1,A2 COPY RESULT INDICATOR ^ " P LDR A9,A6 GET POINTER TO OP1 PSAVE LDK A2,0 RESTORE A2 P* P LDK A5,0 CLEAR A5 P LDK A3,0 CLEAR A3
0x17327c…173410 Dummy {f00=0x0075, f01=0x0190, f02=»/F GET SIGN OP1 P LDR A7,A5 GET SIGN TO A7 P ANK A3,/F GET SIGN OP2 : ( P ANK A6,/F0 MASK OUT 1:ST DIGIT OP2 Z P SUK A6,/F0 P RF(Z) ADD060 JUMP IF BLANK P ADK A6,/F0 RESTORE DIGIT . PADD060 ANK A4,/F0 MASK OUT 1:ST DIGIT OP
0x173410…1735a4 Dummy {f00=0x0075, f01=0x0190, f02=»SIVE OR WITH SIGNS 4 P XRR A2,A5 EXCLUSIVE OR WITH SIGNS AND INDICATOR & P RF(Z) ADD078 JUMP IF EQUAL SIGNS R P NGR A4,A4 NEGATE A4 | . P XRR A2,A1 EXVLUSIVE OR WITH COMP. RESULT " P SRC A2,2 SHIFT BIT 14 TO SIGN 8 P RF(P) ADD076 JUMP IF OP
0x1735a4…173738 Dummy {f00=0x0075, f01=0x0190, f02=»DD078 JUMP IF OP1 ABSOLUTE GREATER THAN OP2 P LDK A7,/B LOAD PLUS SIGN 4 P RF ADD078 V PADD076 XRK A7,6 INVERT SIGN h PADD078 LDK A1,0 CLEAR CARRY P* P************************ P* ADDITION/SUBTRACTION * P**************
0x173738…1738cc Dummy {f00=0x0075, f01=0x0190, f02=»T DIGITS t " P RF(N) ADD200 JUMP IF NEGATIVE P SUK A4,/A0 6 P RF(NN) ADD100 JUMP IF CARRY J P LDK A1,0 NO CARRY n $ PADD080 ADK A4,/A0 RESTORE DIGIT * PADD100 ADR A7,A4 GET BOTH DIGITS TO A7 $ PADD105 SCR A7,A9 STORE 2 DIGITS $ P S
0x1738cc…173a60 Dummy {f00=0x0075, f01=0x0190, f02=»* PADD150 LCR A4,A9 A4=BYTE OP1 P LDK A6,0 CLEAR A6 . & P IM T:OP2 INCREMENT INDEX FOR OP2 H * P RF(NN) ADD160 JUMP IF END OF ELEMENT r P LCR A6,A10 A6=BYTE OP2 PADD160 LDR A7,A4 COPY A4 P ANK A7,/F GET RIGHT DIGIT P SUK A
0x173a60…173bf4 (1, 316) Dummy {f00=0x0076, f01=0x0190, f02=» *+4 JUMP IF BLANK P ADK A4,/F0 RESTORE DIGIT P LDR A5,A6 COPY A6 < P ANK A6,/F0 GET LEFT DIGIT V P SUK A6,/F0 x P RF(Z) *+4 JUMP IF BLANK P ADK A6,/F0 RESTORE DIGIT P ANK A5,/F GET RIGHT DIGIT P SUK A5,/F P RF(Z)
0x173bf4…173d88 Dummy {f00=0x0076, f01=0x0190, f02=»2 NOT GREATER THAN OP1 x P NGR A4,A4 NEGATE A4 P NGR A7,A7 NEGATE A7 : P RF ADD170 V PADD165 NGR A5,A5 NEGATE A5 h P NGR A6,A6 NEGATE A6 P* $ PADD170 ADR A7,A1 ADD WITH CARRY P LDK A1,/10 INDICATE CARRY * P ADR A7,A5 ADD
0x173d88…173f1c Dummy {f00=0x0076, f01=0x0190, f02=» CARRY " PADD180 ADK A7,/A RESTORE DIGIT P RB ADDSUB 4 P* F " PADD200 NGR A1,A1 NEGATE CARRY P P RB ADD080 v P* " PADD220 NGR A1,A1 NEGATE CARRY P RB ADD180 P* P EJECT P* P* P* GET ELEMENT PARA
0x173f1c…1740b0 Dummy {f00=0x0076, f01=0x018e, f02=»BLOCK h P* A4=USED 8 P* A1=ELEMENT LENGTH IN BYTES 2-COMPLEMENTED ( 8 P*************************************************** d P* PM:OPA EQU * P IFT OVERLY=1 P LDK A1,/80 P XRS A1,2,A14 P XIF
0x1740b0…174244 Dummy {f00=0x0076, f01=0x0190, f02=» P LD A6,2,A5 BASE ADDRESS " P LDR* A5,A5 GET ADDRESS TO DB $ P ANK A4,/F MASK OUT N J P SLL A4,1 N * 2 h P ADR A5,A4 ADDRESS WITHIN DB P LDR* A1,A5 ( P ANKL A1,/FFF MASK OUT DISPLACEMENT P ADR A6,A1 ELEMENT ADDRESS ( P S
0x174244…1743d8 Dummy {f00=0x0076, f01=0x0190, f02=» ( P ANKL A4,/FFF MASK OUT DISPLACEMENT POPA100 SUR A1,A4 GET LENGTH 0 P NGR A1,A1 NEGATE LENGTH T P RF RETMMM t P EJECT < P******************************************************* , P* GET ELEMENT PARAMETERS FOR 2 OPERANDS ( P* AN
0x1743d8…17456c Dummy {f00=0x0076, f01=0x0190, f02=» T:OP2 =NEG LENGTH OF OP2 $ P* A1 =NEG LENGTH OP1 $ & P* A3 =PACKING FORM OP2 L , P* A5 =DESCRIPTOR ADDRESS OP1 v " P* A6 =POINTER OP1 " P* A10 =POINTER OP2 P* < P************
0x17456c…174700 Dummy {f00=0x0076, f01=0x0190, f02=»DS A1,8,A14 ADJUST RETURN ADDRESS PM:OPS EQU * * P IFT OVERLY=1 > P LDK A1,/80 T P XRS A1,2,A14 h P XIF ~ PT:OPS EQU * P LDR A1,A13 COPY A13 2 P ANKL A13,/FFFE MASK AWAY CONSTANT INDICATION P ST A13,ARG2 SAVE A13
0x174700…174894 (1, 317) Dummy {f00=0x0076, f01=0x0190, f02=»FT OVERLY=0 ( P CF A14,T:OPA GET PARAMETERS FOR OP2 P XIF @ P IFT OVERLY=1 L $ P CF A14,M:OPA PARAMETERS FOR OP2 b P XIF P LDKL A13,0 PARG2 EQU *-2 P LDR A10,A6 A10=POINTER OP2 & P ST A1,T:OP2 STORE NEG LENGTH OP2
0x174894…174a28 Dummy {f00=0x0076, f01=0x018e, f02=» OP1 p P XIF P IFT OVERLY=1 P CF A14,M:OPA . P XIF D & P ST A1,T:OP1 STORE NEG LENGTH OP1 P P IFT OVERLY=0 z PRETMMM RTN A14 P XIF P IFT OVERLY=1 PRETMMM STR A1,A14 P LD A1,2,A14 P ANK A1,/80
0x174a28…174bbc Dummy {f00=0x0076, f01=0x0190, f02=» P* MOVE P* $ P******************************** P* H PM:MOV EQU * R P IFT OVERLY=1 f P LDK A1,/80 | P XRS A1,2,A14 P RF T:MOV P XIF PT:MOVC ADKL A13,1 P* PT:MOV EQU * * P CF A14,GETO
0x174bbc…174d50 Dummy {f00=0x0076, f01=0x0190, f02=»0 GET POINTER OP2 P XRR* A3,A5 * P RF(NN) MVC JUMP IF EQUAL PACKING FORM . ( P LDR* A3,A5 GET PACKING FORM FOR OP1 P RF(N) UPK JUMP IF ASCII P EJECT P* P* PACK P*********** P* PPCK LDK A1,/B LOAD PLUS SIGN
0x174d50…174ee4 Dummy {f00=0x0076, f01=0x0190, f02=» A3,A7 GET BYTE FROM OP2 P SUK A3,/30 $ P RF(NN) PCK045 JUMP IF NOT SPACE 4 P LDK A3,/F LOAD BLANK * PPCK045 SLL A3,4 SHIFT TO LEFT POSITION z 4 PPCK050 ADR A1,A3 GET 2 DIGITS IN THE RIGHT BYTE P SCR A1,A6 STORE BYTE IN OP1 P ADK
0x174ee4…175078 Dummy {f00=0x0076, f01=0x0190, f02=»1,/F LOAD BLANK & P ADK A2,1 INCREMENT INDEX FOR OP2 ( P RB(P) PCK040 JUMP IF END OF ELEMENT B P LCR A1,A7 GET BYTE FROM OP2 n P SUK A1,/30 $ P RF(NN) PCK060 JUMP IF NOT SPACE P LDK A1,/F LOAD BLANK . PPCK060 SUK A7,1 DECREMENT PO
0x175078…17520c Dummy {f00=0x0076, f01=0x0190, f02=» P* PMVC EQU * P LDK A3,0 LOAD HEX ZERO PMVC020 EQU * @ P LDR* A5,A5 GET PACKING FORM T P RF(N) MVC050 JUMP IF ASCII x P LDK A3,/FF LOAD BLANKS & PMVC050 LDR A1,A3 GET FILLER TO A1 & P ADK A2,1 INCREMENT INDEX FOR OP2
0x17520c…1753a0 Dummy {f00=0x0076, f01=0x0190, f02=»7,1 DECREMENT POINTER OP2 $ P SUK A6,1 DECREMENT POINTER OP1 " P ADK A4,1 STEP UP INDEX J & P RB(N) MVC050 JUMP IF NOT FINISHED j PRETUR RB RETMMM P EJECT P* P* UNPACK P************ P* PUPK LDK A1,0 CLEAR A1
0x1753a0…175534 (1, 318) Dummy {f00=0x0076, f01=0x0190, f02=»UK A1,/F P RF(Z) UPK060 JUMP IF BLANK P ADK A1,/1F 4 0 PUPK060 ADK A1,/20 MAKE ASCII DIGIT OR BLANK H PUPK070 SCR A1,A6 STORE ASCII | $ P SUK A6,1 DECREMENT POINTER OP1 $ P SUK A7,1 DECREMENT POINTER OP2 P ADK A4,1 INCREMENT INDE
0x175534…1756c8 Dummy {f00=0x0076, f01=0x018e, f02=»IF END OF ELEMENT | " P LCR A1,A7 GET DIGITS FROM OP2 P ANK A1,/F GET RIGHT DIGIT @ P SUK A1,/F b P RF(Z) UPK100 JUMP IF BLANK t P ADK A1,/1F 0 PUPK100 ADK A1,/20 MAKE ASCII DIGIT OR BLANK PUPK110 SCR A1,A6 STORE ASCII $ P SUK
0x1756c8…17585c Dummy {f00=0x0076, f01=0x0190, f02=» P EJECT P* " P* COMPARISON OF 2 BCD ELEMENTS * P************************************* B P* p PM:CPA EQU * z P P IFT OVERLY=1 P LDK A1,/80 P XRS A1,2,A14 P RF T:CPA P XIF PT:CPAC ADKL A13,1
0x17585c…1759f0 Dummy {f00=0x0076, f01=0x0190, f02=»VERLY=1 P LDK A1,/80 ! P XRS A1,2,A14 ! $ P RF T:CMP ! : P XIF ! L PT:CMPC ADKL A13,1 ! X & PT:CMP EQU * COMP. INCLUSIVE SIGNS ! r $ P SUR A9,A9 INDICATE NORMAL COMP ! $ PCOMP LDKL A8,/EC08 A8=CWR A4,A2 ! * P CF A14,GETOPS GET ELEMENT P
0x1759f0…175b84 Dummy {f00=0x0076, f01=0x018e, f02=»DR A3,A4 COPY A4 ! P LDR A5,A2 COPY A2 " P ANK A3,/F GET SIGN OP1 " 2 P ANK A5,/F GET SIGN OP2 " R P ANK A4,/F0 GET LEFT DIGIT " r P ANK A2,/F0 GET LEFT DIGIT " P LDR A9,A9 " . P RF(NZ) CMP100 JUMP IF ABSOLUTE COMPARISON " P SUR A3,A5 "
0x175b84…175d18 Dummy {f00=0x0076, f01=0x018e, f02=» " n P LDKL A8,/EA10 A8=CWR A2,A4 # PCMP100 SUK A4,/FF # , " P RF(Z) CMP110 JUMP IF 2 BLANKS # F P ADK A4,/F # l . P RF(NN) CMP110 JUMP IF 1 BLANK (LEFTMOST) # ~ P ADK A4,/F0 RESTORE DIGITS # PCMP110 SUK A2,/FF # " P RF(Z) CMP120 JUMP IF 2 BLAN
0x175d18…175eac Dummy {f00=0x0076, f01=0x0190, f02=» # x " P RF(G) CMP140 JUMP IF GREATER $ P RF(E) CMP130 JUMP IF EQUAL $ . P LDK A7,2 INDICATE LESS $ R & PCMP130 SUK A6,1 DECREMENT POINTER $ r " P SUKL A10,1 DECREMENT POINTER $ P ADK A1,1 INCREMENT INDEX $ P RF(NN) CMP170 $ " P LCR A4,A6 GET
0x175eac…176040 Dummy {f00=0x0076, f01=0x0190, f02=»T BYTE FROM OP2 $ P RB CMP100 % P* % * P* GREATER THAN % 4 P**************** % J P* % b * PCMP140 LDK A7,1 INDICATE GREATER THAN % l P RB CMP130 % P* % P* OP1 + AND OP2 - % P***************** % P* % * PCMP150 LDK A7,1 INDI
0x176040…1761d4 (1, 319) Dummy {f00=0x0076, f01=0x40a8, f02=»CATE LESS THAN % | PCMP170 LC A6,2,A14 PSW & P ANK A6,/FC & 4 P ORR A6,A7 & H P SC A6,2,A14 PSW COND UPD & Z P RB RETUR & | P* & P END & @ &
0x1761d4…176368 Dummy {f00=0x0076, f01=0x2008, f02=» ' OP2 - ! P***************** " P* " 0 * PCMP150 LDK A7,1 INDICATE GREATER THAN " : P RF CMP170 " h P* " z P* OP1 - AND OP2 + " P****************** " P* " & PCMP160 LDK A7,2 INDICATE LESS THAN " * PCMP170 SC A7,2,A14 STORE PSW
0x176368…1764fc Dummy {f00=0x0076, f01=0x0190, f02=» 0 P IDENT TDISP REL 8.2 78-09-15 870105040820 P 8 P* @ 6 P************************************************** J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* TDISP = TERMINAL DISPATCHER P* P* P* P*
0x1764fc…176690 Dummy {f00=0x0076, f01=0x0190, f02=»INAL DISPATCHER IN TOSS. | > P* ENTRY POINT IS 'TDISP' WITH 8 REGISTERS ON A15 STACK. > P* THE DISPATCHER CHECKS IF THERE IS A JOB IN DISPATCHER- b < P* QUEUE WITH HIGHER PRIORITY THAN INTERRUPTED PROGRAM. < P* - IF SO THE QUEUED PROGRAM IS ST
0x176690…176824 Dummy {f00=0x0076, f01=0x0190, f02=»TED PROGRAM VIA RETUR8. h P* @ P* AN ENTRYPOINT 'LKMDIS' IS ALSO INCLUDED IN THIS MODULE. * D P* THIS PART IS DISPATCHED AFTER EACH LKM-REQUEST.(NO REGISTERS n H P* ON STACK) A CHECK IS MADE IF THERE IS A JOB IN DISPATCHER QUEUE 6 P* WI
0x176824…1769b8 Dummy {f00=0x0076, f01=0x0190, f02=»OGRAM VIA RETU14. b P* P* $ > P* AN OPTIONALY ENTRYPOINT 'DISIOE' IS ALSO PROVIDED FOR . > P* ERRORS IN I/O DRIVERS. BIT 0 IS SET IN A1 AND THE SUB- p < P* ROUTINE 'TENDIO' IS CALLED BEFORE THE 'TDISP'-ENTRY P* IS ENTERED. @
0x1769b8…176b4c Dummy {f00=0x0076, f01=0x0190, f02=»********* P* " P ENTRY TDISP DISPATCHER ENTRY & P ENTRY LKMDIS DISPATCHED AFTER LKM B " P ENTRY DISIOE I/O ERROR ENTRY l & P ENTRY DISEND END I/O AND DISPATCH < P ENTRY DISQUE POINTER TO FIRST PLACE IN DISPATCHER-QUEUE 6 P ENTRY GBQUE
0x176b4c…176ce0 Dummy {f00=0x0076, f01=0x0190, f02=»RY RETU14 RESTORE REGISTER A14-A1 VIA A15 STACK P ENTRY RETU13 8 P ENTRY RETU12 N P ENTRY RETU11 d P ENTRY RETU10 z P ENTRY RETUR9 P ENTRY RETUR8 P ENTRY RETUR7 P ENTRY RETUR6 P ENTRY RETUR5 P ENTRY RET
0x176ce0…176e74 (1, 320) Opaque[0x194]
0x176e74…177008 # DirEnt {nam=»OBDIR «, typ=»UF«, f00=0x2020, f01=0x2020, f02=0x0ee0, f03=0x2020}
0x176e74…177008 IdxSect {
0x176e74…177008 f00 = 0x0077 // 0x176e74 @0x0
0x176e74…177008 f01 = 0x000e // 0x176e76 @0x2
0x176e74…177008 gno = [ // 0x176e78 @0x4
0x176e74…177008 [0x00]: C0x0077.0x0.0
0x176e74…177008 [0x01]: C0x0077.0x1.0
0x176e74…177008 [0x02]: C0x0077.0x2.0
0x176e74…177008 [0x03]: C0x0077.0x3.0
0x176e74…177008 [0x04]: C0x0078.0x0.0
0x176e74…177008 [0x05]: C0x0078.0x1.0
0x176e74…177008 [0x06]: C0x0078.0x2.0
0x176e74…177008 ]
0x176e74…177008 }
0x177008…17719c Dummy {f00=0x0077, f01=0x000c, f02=» 3 , `DRTP03 TPADY DISIOE OUTPUT DISEND LDREG TDISP SAVE8 2DVTT1 DVTT1 TPADN . 102L DRDC22 DCFCY < DC22ADK DISIOEN TDISP TENDIO
0x17719c…177330 Dummy {f00=0x0077, f01=0x0190, f02=» LRPINT IHLKM INTSAV PRUNN TTB:SA HALTN LKMDISN SACTN LRUNEW SWL48 LKMAL LKMRQE LKMQDI QTJOB TDISP IHRTC SAVE8 CVTCLKR QMJOB MONCLO FREBLKC TIMQUE L INIFLG P IHPFAR@ R PFINIT RET
0x177330…1774c4 Dummy {f00=0x0077, f01=0x0190, f02=»ECB SRUNN GETBLK QTJOB DWTWAT TIOQ20 TTB:ST TTB:SA TIOERRL ( TPQUE , TDISP TWAIT 4 TEXIT F EXITN TACTOTK L FNDTID LKMRQE ACTOT TPAUSE 0 r TIMER TIMER TDISP FNDTIDN LKMRQE GETBLK`
0x1774c4…177658 Dummy {f00=0x0077, f01=0x0190, f02=»E8 QTJOB & DISQUE TTB:ST0 QMJOB J TTMJOB1 ACTOT ^ TTB:SA2 TTB:SS TTB:SPO TTB:ID2 TTB:PP2 EXITY GETBLK FREQUE FREBLK FNDDWTL TTB:TD2 DWTADR- TIODM CHKIND CDTAB FNDTID TCTAB TABIO TENDIO DWT
0x177658…1777ec Dummy {f00=0x0077, f01=0x0190, f02=»HRET2 @ IHRET1 B IHRTN D PFINIT L PFTAB SWL48 b RTNA15 SWLXY t INTSAV` ILLINT HALTY dGRBUF GETBUFK GBQUE TTB:SA TDISP RELBUF 0 QTJOB LKMQDI TABORT TABORTK
0x1777ec…177980 Dummy {f00=0x0077, f01=0x0190, f02=»WTST DWTECB0 DWTOR DWTADR DWTTAB DWTWAT DWTTQ DWTWA DWTTDM DWTVOL , ECBBA ECBRL ECBEL ECBRC ECBCW DISQUE PRUNY SRUNY SACTY LRUNEW GBQUE BLOK:S FREQUE BLOCKEW BLOCKL
0x177980…177b14 (1, 321) Dummy {f00=0x0077, f01=0x0190, f02=» t RETUR8 v RETUR7 x RETUR6 z RETUR5 | RETUR4 ~ RETUR3R RETUR2 RTNA15 RETUR1! EXITN LKMDIS `MONTIM GETTIMK MONCLO TTB:SA LKMQDI SETTIM < RTNA15 @INPRET
0x177b14…177ca8 Dummy {f00=0x0077, f01=0x0190, f02=»TADI DWTADRC ITADO DWTST DWTECB DWTTQ TIMQUE BLOCKLA BLOCKS FREQUEA GBQUE ATT:CH CVTSTB! LOOPN TTB:ID PRUNN DISQUEC INIFLG PFINITN CVTAPS INTVMA NUMPAR IHPFARC IHLKM IHRTC ILLINT
0x177ca8…177e3c Dummy {f00=0x0077, f01=0x0190, f02=» IHDU1 IHDU2 IHMTN IHINPT CVTMSZK CVTSTB CVTSBA CVTEBA CVTINP CVTAPA CVTAPSC CVTCLK CVTLSB CVTDK FREPAR PARLEN@ INIMON bBUG HALTN INIM40N TCTAB TTB:IDO PRUNN TTB:ST PFINIT LOO
0x177e3c…177fd0 Dummy {f00=0x0077, f01=0x0190, f02=» CHRT2 CHRT3 CHRT4 IHCC1 IHCC2 IHCC3 CHLT2 CHLT3 CHLT4 IHLPN IHCRN IHDU1 IHDU2 IHMTN IHINPT CVTMSZK CVTSTB CVTSBA CVTEBA CVTINP CVTAPA CVTAPSC CVTCLK CVTLSB CVTDK FREPAR PARLEN@
0x177fd0…178164 Dummy {f00=0x0077, f01=0x0190, f02=» IHPFARC IHLKM IHRTC ILLINT IHTWN IHTCN IHSOP CHLT1 IHFDN CHRT1 CHRT2 CHRT3 CHRT4 IHCC1 IHCC2 IHCC3 CHLT2 CHLT3 CHLT4 IHLPN IHCRN IHDU1 IHDU2 IHMTN IHINPT CVTMSZK CVTSTB CVTSBA CVTEBA CVTINP
0x178164…1782f8 Dummy {f00=0x0077, f01=0x0190, f02=»DO PRUNN TTB:ST PFINIT LOOPY h hINIMOD 0 INIMONK tBUG DCEXT DM:TSK TTABD0A TTABD1A TTABD2 INIMOM 1 INIMONK TCTAB TTB:ST TTB:PP TTB:SA TTB:SP TTB:SS TTB:TD C
0x1782f8…17848c Dummy {f00=0x0077, f01=0x0190, f02=» CVTLSB NUMPAR CVTSBA FREPAR PARLEN CVTSTB LOOPN TTB:IDC PRUNN SRUNN DISQUE INIFLG PFINIT CVTAPS V INPREO 5 IHINPTK PRUN@ SRUNN CVTINP CVTLSB TTB:SA TTB:SPC TTB:SS UPDLRI RETUR8
0x17848c…178620 Dummy {f00=0x0077, f01=0x0190, f02=»STA BUFDMI DMTASSK 2 TASTID TASMXA0 TASASBz VOLCHE TASCVO CLRBUF TASVOLN ECBFC ECBRL ECBCW DMTGBUC TASVRN TASVLE@ TASVRL TASFIL DMTRBU TASCXOL TASSEX TASXLB TASFDB FDBSTA FDBEXT FDBVTO FDBMIA Q
0x178620…1787b4 (1, 322) Dummy {f00=0x0077, f01=0x0190, f02=»ND TASCAQ QTJOB FDBADF FDBDBR EXTELE FDBCEX FDBSNR GTLGRNX FDBMRN MPYMOD6 FDBMRO J LOADER A LOADERK TTB:SP TTB:SS TTB:SA QTJOB LD150 P GETBLK LDTASK TTABLD ACTOT TDISP LKMRQE
0x1787b4…178948 Dummy {f00=0x0077, f01=0x0190, f02=»TJOB CVTINPC TDISPO G DWTCHP2 DWTST DWTECB DWTOR DWTADR DWTTAB DWTWAT DWTTQ DWTWA DWTTDM DWTVOL , ECBBA ECBRL ECBEL ECBRC ECBCW DISQUE PRUNY SRUNY SACTY
0x178948…178adc Dummy {f00=0x0077, f01=0x0190, f02=»TB:SA TTB:SP RETU14 RETU13 RETU12L RETU11 RETU10 RETUR9 RETUR8 RETUR7 RETUR6R RETUR5r RETUR4a RETUR3! RETUR2 RETUR1 RTNA151 EXITN LKMDIS TTB:SS GETBLK LDTASKV TTABLD ACTOT
0x178adc…178c70 Dummy {f00=0x0077, f01=0x0190, f02=» FDBRRO " FDBRLE $ FDBBLF & FDBTNRC ' FDBVTO ( FDBCEX * FDBEXT , EXTDMI EXTFC EXTLEN@ EXTBAS EXTELEC FDBLRN E FDBNIFN D FDBEAL H FDBCRL J FDBKA L FDBMIA N FDBADF P FDBAI1 R FDBDBRW Z FDBMRNW [ F
0x178c70…178e04 Dummy {f00=0x0077, f01=0x0190, f02=» DSUMOD- ECBEL ECBRC bSQR CALSNO FNDTID DMTASKW ACTOT TDISP DISENDR 2 DMTASK U QIRNY QIRR tQSW tSQR ECBRL FDBRLE ECBRC ECBEL DMTWM F TTB:TD CDTAB FDBRRO ECBBA FNDTID RTNA15 DMTAS
0x178e04…178f98 Dummy {f00=0x0077, f01=0x0190, f02=» DWTTDM ECBFC TCTAB EARELB FDBCRL2 CRNQUEW FDBEXT EXTELE DWTTQ QTJOB FDBSTA ECBCW DWTST EATEST FDBMRO CRNGETZ CRNCIF CRNCDFV EASETB0 TENDIO P TASS _ TASBLK TASQUE TASTTA TAS
0x178f98…17912c Dummy {f00=0x0077, f01=0x0190, f02=» J TASTID L TASMXA N TASSPWR P TASFDD R TASTBEK T TASCAQ Z TTB:SA QTJOB VOLCHE DFTAB CDTAB ECBFC ECBRC DWTVOLW DFTABE IXTASS X TASSY ` TDISP TTB:TD- FNDTIDW DMTASSW ACTOT LKMQDIL DMINIT e
0x17912c…1792c0 Dummy {f00=0x0077, f01=0x0190, f02=» TASQUE RTNA15@ t DMBUF g CURBUFK BUFLNK BUFDMI BUFFC BUFSNR BUFOR BUFSTA@ DMTGBU HALTN DMTRBUC CLRBUF rDMFDB j CRBUFL QFDBFL ` FDBSTAK FDBEND CRN
0x1792c0…179454 (1, 323) Dummy {f00=0x0077, f01=0x0190, f02=»O FDBMRO FDBRLE FDBCEXC EXTBAS EXTLENL FDBSNR GTLGRN ADDMOD CALSNO DMTRBU FNDKEY d FDBMIA FDBLRN CRNUPD FDBADF FDBCRLR FDBECB CRNCIFK z 8DMSUBR p CHKIND IHRET2 REQEND . FDBADFO
0x179454…1795e8 Dummy {f00=0x0077, f01=0x0190, f02=»CRLL CRNTID CRNQUE HALTN CRBUFLW CALSNO V FDBBLF DIVMOD FDBEXTR EXTLEN FDBCEX EXTBAS FDBSNR FDBRLE FDBRRO DMTIOT FDBECBr DWTECBa ECBRC FDBDBR: ECBBA BUFDMI DMTIOZ DWTOR QIRNN QIRRL GTBKBU , E
0x1795e8…17977c Dummy {f00=0x0077, f01=0x0190, f02=» DISIOEA DWTST TWONY z SAVE8 DWTOR DWTECB DISENDL IHTWY INTSAV TDISP DWTW01 DRTC01 | DISIOEN ECBRL ECBCW SWLXY TCDRON SAVE8 INIFLGA TDISP DWTECB ECBEL DWTST DISEND IHTCY , INTSA
0x17977c…179910 Dummy {f00=0x0077, f01=0x0190, f02=»RT4R CWTRT5 CWTRT6K CWTRT7 CWTRT8 DWREMU CWTLT1 INTLT1 CWTLT2C CWTLT3 CWTLT4 CHLT1 CHLT2 CHLT3 CHLT4 SAVE8 INTSAVV DWTST TDISP SETIMP DWTADR DWTOR DWTECB RTNA15M OUTLIN IHR
0x179910…179aa4 Dummy {f00=0x0077, f01=0x0190, f02=»OV x DRSOP1 SOPCT DISIOE SAVE8 IHSOP < INTSAV DWTST DWTECB ECBCW TENDIO TDISP SOPRY f DWSI01 DWSO01A DWSI02A DRDN01 DNADY DISIOE OUTPUT GETCHR TENDIO TDI
0x179aa4…179c38 Dummy {f00=0x0077, f01=0x0190, f02=» SAVE8 ~ pDRTP01 TPADY DISIOE OUTPUT DWTST DWTOR DISEND LDREG SAVE8 TDISP DRMT01 DISIOE DWTOR ECBRL ECBBA ECBCW ECBEL DISEND SETIMP` TDISP HALTN IHMTY L INTSAV
0x179c38…179dcc Dummy {f00=0x0077, f01=0x0190, f02=»E8 LPONY DWTST IHLPY INTSAVA DWTOR DWTECB DWLP01 DRGP01 GPADY DISIOE OUTPUT DWTST GETCHR TENDIO TDISP LDREG ECHOGP N ECHRTN SAVE8 DRKB01 DWTINQ ( DWTUTQ
0x179dcc…179f60 Dummy {f00=0x0077, f01=0x0190, f02=» OUTPUT DISIOE GETCHR TENDIO TDISP DWTST LDREG SAVE8 ECHODY ` ECHRTN XDRRT01 LOCHAN RECHAN REMFC CWTLT1 INTLT1V CWTLT2 CWTLT3R CWTLT4 CWTRT1K INTRT1 CWTRT2 D CWTRT
0x179f60…17a0f4 (1, 324) Dummy {f00=0x0078, f01=0x0190, f02=» INTSAV SAVE8 CHLT2 8 CHLT3 8 CHLT4 8 CHRT1 8 CHRT2 D CHRT3 P CHRT4 P DWTST DWTADR SETIMPV DWTOR DWTECB RTNA15 OUTPUTN STREG LDREG LDREGF LDREGE $ GETCHRC 8 OUTLIN` V IHRET8N CHLTON . ECHEND ECHOY
0x17a0f4…17a288 Dummy {f00=0x0078, f01=0x0190, f02=» SETIME DWTOR TEBCDI IH1501 INTSAVL SAVE8 IH1502 DC15ON DW1500 = pDRTP02 TPADY DWTOR DISIOE DWTST OUTPUT DISEND LDREG SAVE8 TDISP DRCC01 DISIOE ECBRL E
0x17a288…17a41c Dummy {f00=0x0078, f01=0x0190, f02=»N < DWCC01 DWCC02A DWCC03A * DRDU01 DUADR DWTOR DISIOE TDISP SAVE8 DUONY INIFLGL DWTST TENDIOC SETIMP IHDU2 " IHDUY " IHDU1 " INTSAV DWTECB DWDU02 DWDU01 DRFD01
0x17a41c…17a5b0 Dummy {f00=0x0078, f01=0x0190, f02=»V ECBCW ECBBA DWFD01 " l |DRCD01 CDADY DISIOE GETCHR OUTPUTA DWTST LDREG TDISP DISEND ECHRTN SAVE8 n DRCP01 CPADY DWTOR DISIOE GETCHR OUTPUTA STREG DISEND DWTST
0x17a5b0…17a744 Dummy {f00=0x0078, f01=0x0190, f02=» ECHON TDISP LDREG SAVE8 DWTECB` RTNA15 ,INTLT1 INTLT1K ,INTLT2 INTLT2K ,INTLT3 INTLT3K ,INTLT4 INTLT4K ,INTRT1
0x17a744…17a8d8 Dummy {f00=0x0078, f01=0x0190, f02=» INTRT4K BTC:TAB TC:TABK TTMJOB TCTABT 8BLOK:S BLOK:SK BLOCKE x x PFTAB PFTAB TWONN TCDRON SOPRN CHLTONA C1DRONA C2DRON C3DRON` FDONN
0x17a8d8…17aa6c Dummy {f00=0x0078, f01=0x0190, f02=» TWAIT TEXIT TACTOT TPAUSE TIMER GETBUF RELBUFC LOADER TABORT GETTIM SETTIM TASSN IXTASS@ 8DVTKB DVTKB KBADN bECH , 2DVTTP DVTTP TPADN $ 2DVTGP
0x17aa6c…17ac00 Dummy {f00=0x0078, f01=0x0190, f02=»TDY DVTDY DYADN & TTMJOB TTMJOBK TTB:ST TTB:ID TTB:PP TTB:SS TTB:SP TTB:SAL TTB:TD * , 6DW1501 DW1501K DC15AD MONTAB MON
0x17ac00…17ad94 (1, 325) Dummy {f00=0x0078, f01=0x0190, f02=»2 INTRT3N INTRT4 MOXTAB MONTABK TCTAB CDTAB BLOCKS INTLT1 INTLT2 INTLT3@ INTLT4 INTRT1C INTRT2 INTRT3N INTRT4 MONCON KBAD3 KBADN TPADN GPADN DNADN DIADN D
0x17ad94…17af28 Dummy {f00=0x0078, f01=0x0190, f02=» ,SCLASS SCLASSK VCD:TAB CD:TABK DWDU01 DWDU02 DWFD01 CDTABF " " *CTABX CTABX 8DVTCG DVTCG CGADN bECH ( 2DVTCD
0x17af28…17b0bc Dummy {f00=0x0078, f01=0x0190, f02=» ,TTABD1 TTABD1K R ,TTABD2 TTABD2K R ,ADDMOD ADDMODK J ,DSUMOD DSUMODK V ,MPYMOD MPYMODK ~ ,DIVMOD DIVMODK
0x17b0bc…17b250 Dummy {f00=0x0078, f01=0x0190, f02=» DWCP01K CPADN " 2DVTOD " DVTOD ODADN , 8EBCDIC # TASCIIK TEBCDI ^DROD01 % ODADY SETIMP STREG DISEND DWTST LDREG TDISP ZSHIFT (
0x17b250…17b3e4 Dummy {f00=0x0078, f01=0x0190, f02=» T:WRT r T:OPA PICTAB H FUNCTN / T:OP1 M:SUB T:SUBC T:SUB M:ADD T:ADDC T:ADD M:OPA T:OPA M:OPS 2 T:OPS 2 RETMMMA ^ M:MOV ` T:MOVC ` T:MOV d M:CPA T:CPAC T:CPA M:CMP
0x17b3e4…17b578 Dummy {f00=0x0078, f01=0x0190, f02=» j T:CMP M:SIGN T:SIGN T:OPA T:OPS RETMMM M:BRK R T:BRK R DRIC01 8 ITADI ITADO ECBCW FNDTID DWTTAB TTB:TD DWTADRL DWTST TENDIOA TDISP SETIMP TTB:ST DISIOEA ITABRT IHRTN DWT
0x17b578…17b70c Dummy {f00=0x0078, f01=0x0190, f02=» ATTACHK TTB:STL DWTST DWTTABN TIODM DWTADR FREBLK TIOERR@ GETBLK SETIMP TIOQ20 DETACH DWTTQ TDISP TTB:SA TPQUE ATT:CH IHRTN FDBADF QTJOB NATTACX A ATTACHK DETACH TIOERR A
0x17b70c…17b8a0 Dummy {f00=0x0078, f01=0x0190, f02=»8 DWCR01 4DWII01 F DWII01K ITADI 4DWIO01 G DWIO01K ITADO DRDC07 H DC07ADK DISIOEC TDISP TENDIO SETIME DWTOR DWTECB DWTST QMJOB IH0701 R SAVE8 I
0x17b8a0…17ba34 (1, 326) Dummy {f00=0x0078, f01=0x0190, f02=»WTST STREG ECHON ECHEND DISEND LDREG TDISP zDRMS01 [ MSADY DISIOE OUTPUT STREG DWTST DISEND GETCHRL TDISP LDREG SAVE8 2DVTMS _ DVTMS MSADN ( 6DC:TAB `
0x17ba34…17bbc8 Dummy {f00=0x0078, f01=0x0190, f02=»WTECB ECBBA ECBRL TASCII ECBEL TEBCDI IH1701 INTSAVW IH1702 IH1707 IH1708 IH1705 IH1706L IH1703 IH1704 ILLINTW DW1701 . DW1704 l DW1703 l DW1702 l DRDC81 p DW81021 D
0x17bbc8…17bd5c Dummy {f00=0x0078, f01=0x0190, f02=»9 IH8120! DW8117W DW8118 IH8117 IH8118a DW8115 DW8116 IH8115 IH8116r DW8113 DW81142 IH8113 IH8114R DW8111O DW81122 IH8111L IH8112 DW8109 DW81102 IH8109 IH8110 DW810
0x17bd5c…17bef0 Dummy {f00=0x0078, f01=0x0190, f02=» INTSAVP ILLINTV DISIOE DWTST TENDIO TDISP SETIME SETIMP DWTECB ECBRC DISEND ECBCW ECBBA DWTOR DC81ONK ECBEL ECBRL IH8101 H IH8102L DRDC22 DCFCY < DC22ADK DISIOEN TDISP TENDIO
0x17bef0…17c084 Dummy {f00=0x0078, f01=0x40ae, f02=» DC22AD , `DRTP03 TPADY DISIOE OUTPUT DISEND LDREG TDISP SAVE8 2DVTT1 DVTT1 TPADN . 102L DRDC22 DCFCY < DC22ADK DISIOEN TDISP TENDIO
0x17c084…17c218 Dummy {f00=0x0078, f01=0x0190, f02=»ESTART TIMER r * P CF A15,CKMESS CHECK IF STATUS CHANGE s P RTN A5 s B P EJECT s R P* s ` P* s j " P* DEVICE WORK TABLE FOR DCTASK s t P* s P* s PDW2200 EQU * TABLE ENTRY s P DATA 0 CU LINE ADDRESS s P DATA /8000 STATUS s P
0x17c218…17c3ac Dummy {f00=0x0078, f01=0x0190, f02=»/ACTIVATE INDICATOR s P DATA 0 TASK QUEUE t P DATA 0 TIMER POINTER t 6 ( P DATA 0 WRITE QUEUE OR BUFFER QUEUE t T P DATA 0 BUF QUEUE ANCHOR t $ P DATA 0 TIMER FOR BUFFER QUEING t P EJECT t P* t P* t P* DC RECEIVE BUFFER POOL t
0x17c3ac…17c540 Dummy {f00=0x0078, f01=0x018e, f02=» t P DATA *+RLINK u P RES RBUFL+3 u P DATA *+RLINK u 2 P RES RBUFL+3 u H P DATA *+RLINK u P RES RBUFL+3 u r P DATA 0 u P RES RBUFL+3 u P XIF u P EJECT u P* u P* u P* DC TRANSMIT BUFFER POOL u P* u P* u
0x17c540…17c6d4 (1, 327) Opaque[0x194]
0x17c6d4…17c868 # DirEnt {nam=»DRKB03«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0f18, f03=0x2020}
0x17c6d4…17c868 IdxSect {
0x17c6d4…17c868 f00 = 0x0078 // 0x17c6d4 @0x0
0x17c6d4…17c868 f01 = 0x0010 // 0x17c6d6 @0x2
0x17c6d4…17c868 gno = [ // 0x17c6d8 @0x4
0x17c6d4…17c868 [0x00]: C0x0078.0x3.0
0x17c6d4…17c868 [0x01]: C0x0079.0x0.0
0x17c6d4…17c868 [0x02]: C0x0079.0x1.0
0x17c6d4…17c868 [0x03]: C0x0079.0x2.0
0x17c6d4…17c868 [0x04]: C0x0079.0x3.0
0x17c6d4…17c868 [0x05]: C0x007a.0x0.0
0x17c6d4…17c868 [0x06]: C0x007a.0x1.0
0x17c6d4…17c868 [0x07]: C0x007a.0x2.0
0x17c6d4…17c868 ]
0x17c6d4…17c868 }
0x17c868…17c9fc Dummy {f00=0x0078, f01=0x018e, f02=» 2 P IDENT DRKB03 REL 9.1 78-09-15 870105840912 P : & P ADAPTED TO KEYBOARD PTS 6271/72 B P REL 8.1 78-04-21 l P* 0 P******************************************* P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* DR
0x17c9fc…17cb90 Dummy {f00=0x0078, f01=0x0190, f02=» b P* P* 0 P* THIS DRIVER HANDLES INPUT FROM NUMERIC . P* AND ALPHANUMERIC KEYBOARDS PTS 6236, P , P* CONNECTED TO CPU VIA CHLT OR CHRT. P* : P* ONLY INPUT DATA FROM DEPRESSED KEYS AND KEY-LOCKS $ P* ARE HANDL
0x17cb90…17cd24 Dummy {f00=0x0078, f01=0x0190, f02=» P* ECHOED. P* 0 P* THE DRIVER CONSISTS OF FOLLOWING PARTS: " P* V " P* A C K B : ACTIVATION PART ` P* $ P* I H K B : INTERRUPT HANDLER P* P* E C H O : ECHO HANDLER P* $ P* R C K B : RECOVERY
0x17cd24…17ceb8 Dummy {f00=0x0078, f01=0x0190, f02=»EAD z P* ORDER 02: STANDARD READ P* ORDER 03: NUMERIC READ 0 & P* ORDER 31: RESET INPUT BUFFER T P* ~ P* P* NORMAL REGISTER USAGE : P* " P* REGISTER A1 : RETURN CODE & P* A2 : INPUT CHARACTER
0x17ceb8…17d04c Dummy {f00=0x0078, f01=0x0190, f02=» A6 : DWT-ADDRESS P* A7 : ORDER " P* A8 : ECB-ADDRESS < P* b P* l P* v P* SYSTEM ADAPTATION P* 8 P* CODES FOR SPECIAL CHARACTERS CLEAR, BACKSPACE, 8 P* MULTIPLE ZERO AND STANDARD EOR
0x17d04c…17d1e0 Dummy {f00=0x0078, f01=0x0190, f02=»* , P* IF TIMING IS WANTED, TIMER POINTER , P* IN DWT MUST BE SET UNEQUAL TO ZERO. : 2 P* STANDARD VALUE FOR TIME-OUT IS 30 SECONDS j 4 P* SINCE LAST DEPRESSED KEY. IF ANOTHER VALUE * P* IS WANTED FOR A SYSTEM, INDICATOR $ P*
0x17d1e0…17d374 (1, 328) Dummy {f00=0x0079, f01=0x0190, f02=»LUE IS 7 CHARACTERS p 8 P* NOTE !!! THAT LENGTH MUST BE THE SAME FOR ALL P* DWT:S IN SYSTEM X P t P* ~ 8 P* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE 8 P* TO EXCLUDE FROM THE DRIVER FOLLOWING FUNCTIONS: P*
0x17d374…17d508 Dummy {f00=0x0079, f01=0x0190, f02=»TION t , P* -----KEYBOARD LOCK IF NO KEYLOCK ON P* < P* ENTRIES F P* Z P* d P ENTRY KBAD3 ADDRESS-BLOCK n P* P* P* & P* EXTERNAL TOSS MODULE ENTRIES P* P* P* $ P EXTRN DISIOE I/O
0x17d508…17d69c Dummy {f00=0x0079, f01=0x0190, f02=» 0 P EXTRN LDREG LOAD REGISTERS A2-A8 AND RETURN 4 P EXTRN STREG STORE REGISTERS AND GO TO DISPATCER 8 , P EXTRN LDREGE RETURN FROM ECHOE HANDLING p P EXTRN LDREGF PANIK EXTERN P EXTRN SETIME SET TIME P EXTRN SETIMP SET TIME " P EXTRN SAV
0x17d69c…17d830 Dummy {f00=0x0079, f01=0x0190, f02=» P* P* P* DWT PARAMETERS P* 8 P* B P* L " P EXTRN DWTCHP CHANEL PARAMETER V P EXTRN DWTST STATUS | * P EXTRN DWTADR ADDRESS TO ADDRESS-BLOCK P EXTRN DWTWAT SAVE INPUT DWT P P* P* P
0x17d830…17d9c4 Dummy {f00=0x0079, f01=0x0190, f02=»H OF CIRCULAR INPUT BUFFER 2 PDWTLNG EQU X:F NUMBER OF BYTES IN DECIMAL FORM " P* X P* b P* TIME BEFORE TIME OUT l P* " PTIME EQU 300 TIME OUT CONSTANT P* P* P* P* DWT-DISPLACEMENT P* P*
0x17d9c4…17db58 Dummy {f00=0x0079, f01=0x0190, f02=»A FOR A4 z " PDWTA5 EQU /16 SAVE AREA FOR A5 PDWTSB2 EQU /1E STACK BASE 6 PDWTTP EQU /20 TIMER POINTER X PDWTECH EQU /22 ECHO DEVICE | 2 PDWTINQ EQU /28 POINTER TO FIRST PLACE IN QUEUE 2 PDWTUTQ EQU /2A POINTER TO LAST PLACE IN QUEUE
0x17db58…17dcec Dummy {f00=0x0079, f01=0x0190, f02=»L KEYS DEFINED IN DWT P* P* ( P* 2 & PKBBSP EQU /24 BACK-SPACE CHARACTER < " PKBCLR EQU /25 CLEAR CHARACTER f ( PKBMZ2 EQU /27 DOUBLE ZERO CHARACTER PKBMZ3 EQU /26 P* P P* P* , P******************
0x17dcec…17de80 Dummy {f00=0x0079, f01=0x0190, f02=»* TIME OUT FUNCTION MAY BE EXCLUDED BY P* SETTING X:A = 0. 2 P* P PX:A EQU 0 Z PCTIMUT EQU X:A l P* * P* ECHO FUNCTION MAY BE EXCLUDED BY P* SETTING X:B = 0. P* PX:B EQU 1 PCECHO EQU X:B
0x17de80…17e014 (1, 329) Dummy {f00=0x0079, f01=0x0190, f02=»IS A READ REQUEST THIS IS COMPLETED WITH , P* ZERO IN THE CONTROL WORD OF ECB. 0 @ P* IF THERE IS NO READ REQUEST , THE FIRST READ REQUEST ` @ P* AFTER POWER ON IS COMPLETED WITH ZERO IN CONTROL WORD P* OF ECB P* P
0x17e014…17e1a8 Dummy {f00=0x0079, f01=0x0190, f02=» SHIFT ON KB 71/72 X PX:H EQU 0 PNSHIFT EQU X:H , P* B P* L B P* BY SETTING X:I = 1 KEYBOARD IS LOCKED IF NO KEYLOCK ON. V PX:I EQU 0 PKBLOCK EQU X:I P P* TABLES P* P* PKBAD3 EQU *
0x17e1a8…17e33c Dummy {f00=0x0079, f01=0x0190, f02=» XIF P IFT POWOFF=0 P DATA 0 NO RECOVERY " P XIF > P* J P IFT POWOFF=1 T P j P* RCKB t P* P* RECOVERY PART P* P* PRCKB EQU * P CF A15,SAVE8 P LD A3,DWTST,A6 BUSY? P RF(
0x17e33c…17e4d0 Dummy {f00=0x0079, f01=0x018e, f02=» n P RF AKB202 P XIF P & P* 0 P* : P* ACKB D P* X : P* ACTIVATION PART: CHECS VALIDITY OF ORDERS AND b P* @ P* EXAMINES INPUT BUFFER TO SEE IF SOME QUEUED CHARACTER P* P* TO THREAT
0x17e4d0…17e664 Dummy {f00=0x0079, f01=0x0190, f02=» ` P LDK A1,0 P LDK A3,0 START BUFFER INDEX P LDR A4,A7 > P RF(NG) AKB100 ILLEGAL ORDER P P SUK A4,4 t P RF(N) AKB200 ORDER 1,2 OR 3 P SUK A4,/2D P RF(Z) AKB110 ORDER 31 * PAKB100 ORKL A1,/8000 I/0 REQUEST ERROR
0x17e664…17e7f8 Dummy {f00=0x0079, f01=0x018e, f02=»B110 EQU * P LD A2,DWTINQ,A6 P SCR A1,A2 * ( P ST A2,DWTUTQ,A6 RESET OUTPUT QUEUE < P ABL ENDIO h P* z P P* P* P* ORDER 1,2,3 P* P* P* PAKB200 EQU * P IFT POWOFF=1 P LD
0x17e7f8…17e98c Dummy {f00=0x0079, f01=0x0190, f02=» 8 P CWK A7,1 IF BASIC READ DON'T COMPLEATE THE REQUEST P RF(E) AKB205 D P CM 10,A8 INDICATE POWER OFF Z P RF AKB218 ~ P XIF PAKB205 EQU * P IFT CTIMUT=1 P LDR* A1,A6 P ANK A1,/40 TIMING? , P RF(E) AKB210 NO T
0x17e98c…17eb20 Dummy {f00=0x0079, f01=0x018e, f02=»A6 P RF AKB210 PAKBTIM EQU * P LDK A4,DWTTP TIMER POINTER 0 P ADR A4,A6 ADD DWT-ADDRESS T P LDR A1,A6 v P CF A15,SETIMP SET TIME 0 P DATA AKBTUT,TIME TIME OUT ROUTINE AND TIME . P ST A4,DWTTP,A6 STORE TIMER ADDRESS IN DWT
0x17eb20…17ecb4 (1, 330) Dummy {f00=0x0079, f01=0x018e, f02=» X 6 P* OF FLAG. STORE KEY-CHARACTER IN ECB-BUFFER. < P* IN CASE OF STANDARD OR NUMERIC READ MAKE ECB-CODE B & P* AND END I/O. ELSE CONTINUE. P* P* PAKB210 EQU * " P LD A2,DWTST,A6 ANY KEY-LOCK? P ANK A2,/F
0x17ecb4…17ee48 Dummy {f00=0x0079, f01=0x0190, f02=» P ADK A4,1 P RF AKB212 PAKB211 ADR A4,A4 , . PAKB212 XRS A4,DWTST,A6 RESET OLD KEY-FLAG D P LDR A2,A4 v P SLL A4,4 P AN A4,DWTST,A6 P STR A4,A15 SAVE A4 P STR A3,A15 P SRN A2,A3 ORDER 1 " P ADR A3,A3 M
0x17ee48…17efdc Dummy {f00=0x0079, f01=0x018e, f02=»A3,A15 * P CF A15,STORE STORE KEY IN ECB BUFFER P LDR* A4,A15 RESTORE A4 < P CWK A7,1 $ P RF(E) AKB307 JUMP IF BASIC READ n " PAKB214 NGR A2,A1 MAKE ECB CODE P LDR A4,A4 KEY FLAG P RF(E) AKB215 P SUK A2,4 , PAKB215 S
0x17efdc…17f170 Dummy {f00=0x0079, f01=0x0190, f02=» " PAKB225 LDR A3,A3 FIRTST RIME? P RF(NE) AKB240 N0! * P LD A1,2,A8 BUFFER ADDRESS D P SUK A1,1 f P ADR A1,A2 x & PAKB230 SCR A3,A1 CLEAR ECB BUFFER P SUK A1,1 P SUK A2,1 P RB(NE) AKB230 PAKB240 EQU * P LD A1
0x17f170…17f304 Dummy {f00=0x0079, f01=0x0190, f02=»! | P LDK A1,OVMASK OVERFLOW SET P RF ENDIX END I/O . . PAKB250 CW A1,DWTINQ,A6 SOMETHING IN QUEUE? H P RF(NE) AKB255 z " P CF A5,STREG NOTHING IN QUEUE P IFT CTIMUT=1 * P LDR A1,A1 CHECK TIME OUT RETURN CODE P RF(Z) AKB25
0x17f304…17f498 Dummy {f00=0x0079, f01=0x0190, f02=»A15,EOQUEU NEXT OUT POINTER & P ST A1,DWTUTQ,A6 STORE NEW POINTER $ PAKB257 EQU * N P LDR A4,A7 b P SUK A4,2 t P RF(NN) AKB310 ORDER 2 OR 3 P P* P* P* ORDER 1 BASIC READ P* P* P* 6 PAK
0x17f498…17f62c Dummy {f00=0x0079, f01=0x0190, f02=»F(E) AKB380 END I/O IF REQ=EFF LENGTH P LD A2,DWTST,A6 MORE KEYS? . P ANK A2,/F P P RB(NZ) AKB210 b P RB AKB225 x P P* P* P* 4 P* ORDER 2 OR 3 STANDARD AND NUMERIC READ P* B P* CHECK IF READ
0x17f62c…17f7c0 Dummy {f00=0x0079, f01=0x0190, f02=»RESS v P RF(Z) AKB360 NO KEY-TABLE & P LCR A4,A1 KEY-TABLE LENGTH IN A4 . P ANK A4,/FF X & P ADR A1,A4 LAST PLACE IN KEY-TABLE l P ADK A1,1 PAKB355 SUK A4,1 , P RF(N) AKB360 KEY NOT FOUND IN KEY-TABLE P SUK A1,1 NEXT KEY
0x17f7c0…17f954 (1, 331) Dummy {f00=0x0079, f01=0x0190, f02=»E CHARACTER ~ P IFT CECHO=1 & P ORK A2,/80 INDICATE EOR-CHARACTER ( " P CF A5,ECHO ECHO EOR-CHARACTER R P XIF x P RF AKB380 PAKB360 EQU * P LDR A4,A2 P CC A4,KBMZ2,A6 P RF(E) KBMZ20 P CC A4,KBMZ3,A6 P RF(E)
0x17f954…17fae8 Dummy {f00=0x0079, f01=0x0190, f02=»R IN BUFFER t P LDR A4,A2 ( P SUK A4,/20 CHEC CONVERTED CHARACTER & P RF(N) AKB364 LESS THAN /20 R P SUK A4,/5F CHARACTER > /7F v P RF(P) AKB364 YES P CWK A7,2 $ P RF(E) AKB366 STANDARD READ OK P ADK A4,/4F P RF(N)
0x17fae8…17fc7c Dummy {f00=0x0079, f01=0x0190, f02=» P IFT CECHO=1 P ANK A2,/7F P CF A5,ECHO 0 P XIF D P CW A3,4,A8 LENGTH OVERFLOW? P " PAKB367 ABL(L) AKB210 NO RETURN t & PAKB368 LDK A1,8 YES SET ERROR CODE P RF ENDIO END I/O P PKBMZ30 EQU * TRIPPLE ZERO
0x17fc7c…17fe10 Dummy {f00=0x0079, f01=0x0190, f02=» P LDR A1,A4 ! P CF A15,STORE ! P LDR A4,A1 ! , P IFT CECHO=1 ! > P CF A5,ECHO ! R P XIF ! f P CW A3,4,A8 ! r P RB(L) KBMZ25 ! PKBMZ27 EQU * ! P SUK A4,1 ANY MORE ZEROES ! $ P RB(L) AKB368 NO,SET RETURN CODE ! P INH ! * P L
0x17fe10…17ffa4 Dummy {f00=0x0079, f01=0x0190, f02=»TEQ GET LAST POSITION IN QUEUE ! P ADR A1,A6 " & P SUK A1,1 " 8 P RF KBMZ40 " J 2 PKBMZ29 ADR A1,A6 GET PREIOUS POINTER POSITION " P SUK A1,1 " , PKBMZ40 CW A1,DWTINQ,A6 ANY SPACE LEFT ? " P RF(E) KBMZ90 NO NOT REALY. " 0 P ST A1,DWTUTQ,A6
0x17ffa4…180138 Dummy {f00=0x0079, f01=0x0190, f02=»QU * " ( P LDK A4,/FF INDICATE BUFFER OWERFLOW # P SCR A4,A1 # 8 $ P ST A1,DWTUTQ,A6 UPPDATE POINTER # J ( P LDK A1,/A SET RETURN CODE FOR BOTH # r . PENDIX RF ENDIO LENGTH AND THRUGHPUT ERRORS # P* # P* # P* # PKBCL10 EQU * CLEAR # P
0x180138…1802cc Dummy {f00=0x0079, f01=0x018e, f02=»5 # P SUK A3,1 $ , P SUR A2,A2 CLEAR LAST CHAR IN ECB-BUFFER $ P CF A15,STORE $ L P SUK A3,1 $ b PKBSP15 LDK A2,/8 $ t P RB AKB366 $ P* $ P* $ PAKB380 LDK A1,0 RETURN CODE $ P $ P* $ P* $ , P* THIS IS A COMMO
0x1802cc…180460 Dummy {f00=0x0079, f01=0x0190, f02=» $ P* % PENDIO EQU * % P* % & P INH % 0 P IFT CTIMUT=1 % < P LD A4,DWTTP,A6 % R * P RF(E) ENDI05 NO TIMING ON THIS DEVICE % j P CM* DWTTP,A6 RESET TIMER % P CM DWTTP,A6 % P XIF % P* % , PENDI05 ST A3,6,A8 STORE EFFECTIVE LE
0x180460…1805f4 (1, 332) Dummy {f00=0x007a, f01=0x018e, f02=» A1,A4 RESTORE A1 % P XIF & P ABL DISEND & & P* & : P & D P* & N P* & X P* & b P* IHKB & l P* & ~ P* & F P* THIS IS THE INTERRUPT HANDLER ENTERED FROM CHLT/CHRT DRIVER & P* & P* & P* & PIHKB EQU * &
0x1805f4…180788 Dummy {f00=0x007a, f01=0x0190, f02=» & r P RF(N) IHKB12 KEY-LOCK ' P ' & P LD A3,DWTST,A6 NORMAL CHAR ' . P IFT KBLOCK=1 ' R P ANK A3,/FF ' h P RF(Z) EXIT ' | P LD A3,DWTST,A6 I/O REQUEST? ' P XIF ' * P RF(N) IHKB15 NO READ REQUEST PENDING ' " P SLL A3,7 INTERRUPT ALLOWE
0x180788…18091c Dummy {f00=0x007a, f01=0x0190, f02=»G ON THIS DEVICE ' z P LDKL A3,-TIME RESTART TIME ( P ST* A3,DWTTP,A6 ( < P XIF ( T , PIHKB07 ABL LDREG RETURN TO READ ROUTINE ( ` , PIHKB12 CF A15,KEYSET SET KEY CODE IN DWT ( P LDR A3,A3 ( P RF(Z) EXIT NO KEY CHANGE ( P LD A3,DWTST,A6 (
0x18091c…180ab0 Dummy {f00=0x007a, f01=0x0190, f02=»ER INDEX ( t P LDKL A5,DWTSB2 ) P ADR A5,A6 ) ( P ABL AKB210 ) : P ) N PIHKB15 LD A1,DWTINQ,A6 ) V P LCR A4,A1 ) t " P XRK A4,/FF ALREADY OVERFLOW? ) P RF(E) EXIT YES ) P LDR A3,A1 ) 4 P CF A15,EOQUEU GET NEXT OUTQUEUE POINTER ADDRESS )
0x180ab0…180c44 Dummy {f00=0x007a, f01=0x0190, f02=» RF IHKB30 ) 0 PIHKB20 ST A1,DWTINQ,A6 STORE INQUEUE POINTER * PIHKB30 SCR A2,A3 * F PEXIT ABL TDISP * ^ P* * t P * ~ P* * P* * P* * P* AKBTUT * P* * & P* THIS IS THE TIME-OUT ROUTINE * P* * P* * P* *
0x180c44…180dd8 Dummy {f00=0x007a, f01=0x0190, f02=» P LD A2,DWTST,A6 + * P RB(N) EXIT DISPATCH IF NO REQUEST ON + , P RB IHKB07 RESTORE REGISTER AND END I/O + J P XIF + z P + P* + P* + P* + P* + P* KEYSET + P* + P* + P* + , P* ON ENTRY: A4= NEG KEY-L
0x180dd8…180f6c Dummy {f00=0x007a, f01=0x0190, f02=» STR A4,A15 + P LD A3,DWTST,A6 , P LDKL A2,/100 , , PSET100 SRL A2,1 , B P ADK A4,2 IN A4: 1=OFF 0=ON , Z P RB(N) SET100 , ~ $ P ANR A3,A2 CHEC OLD KEY POSITION , " P RF(NZ) SET300 JUMP IF KEY ON , P LDR A4,A4 , P RF(NZ) SET500 ,
0x180f6c…181100 Dummy {f00=0x007a, f01=0x0190, f02=» A2,A3 , P ST A2,DWTST,A6 - * P LDK A3,1 A3=1 IF KEY LOCK HAS CHANGED - & PSET500 LDR* A4,A15 - T P RTN A15 - n P - ~ P* - P* - P* - P* KONVER - P* - * P* KONVER CONVERTS INPUT CHARACTER - P* - P* - ( P*
0x181100…181294 (1, 333) Dummy {f00=0x007a, f01=0x018e, f02=»EY-LOCK, ZERO IF CHARACTER,POS IF CTRL,SHIFT - t $ P* A5 IS DESTROYED! . 4 P* . P* . f PKONVER EQU * . p P LDR A4,A2 . P IFT NSHIFT=0 . P SUK A4,/7C CODE > /7B . P RF(NN) KON500 YES . P LDR A4,A2 RESTORE CHARACTER . P
0x181294…181428 Dummy {f00=0x007a, f01=0x0190, f02=» . x PKON100 SUK A4,/40 / P RF(N) KON180 ALFANUMERIC / " P SUK A4,/10 FUNCTION / D P RF(NN) KON110 NO / ` P SUK A2,/40 YES / z PKON105 EQU * / P ANK A5,/10 / P SRL A5,3 / P RF KON200 / * PKON110 SUK A4,8 (UN)CTRL OR (UN)SHIFT /
0x181428…1815bc Dummy {f00=0x007a, f01=0x0190, f02=»ON / z P IFT NSHIFT=1 0 P SUK A4,2 0 P RF(N) KON125 CONTROL OFF 0 2 $ P RF(E) KON140 NUMERICAL SHIFT ON 0 T " P RF KON160 NUMERICAL SHIFT OFF 0 | P XIF 0 PKON125 EQU * 0 P LDKL A2,/FFDF UNCTRL 0 PKON120 ANR A5,A2 0 PKON130 STR A5,A6
0x1815bc…181750 Dummy {f00=0x007a, f01=0x0190, f02=» 0 P RF(Z) KON145 SHIFT NOT ON 1 P LDK A2,/90 1 * P RF KON150 1 > P XIF 1 P PKON145 EQU * 1 P LDK A2,/10 SHIFT 1 p PKON150 ORR A5,A2 1 P RB KON130 1 PKON160 EQU * 1 P IFT NSHIFT=1 1 P LDR A4,A5 1 P ANK A4,/80 1 P RF(
0x181750…1818e4 Dummy {f00=0x007a, f01=0x0190, f02=» LDK A2,/20 CTRL 1 P RB KON150 2 PKON180 SUK A2,/20 FIND INDEX 2 * P ANK A5,/30 2 N P SRL A5,3 2 b P ADK A5,4 2 t 8 PKON200 LD A4,DWTCON,A6 GET CONVERSION TABLE ADDRESS 2 P ADR A4,A5 2 P LDR* A4,A4 2 P RF(Z) KON400 2 P ADR A4,A2
0x1818e4…181a78 Dummy {f00=0x007a, f01=0x0190, f02=» 2 j PKON300 RTN A15 3 4 PKON400 LDR* A2,A15 NO CONVERSION, KEEP CHARACTER 3 P RB KON300 3 V P IFT NSHIFT=0 3 h PKON500 EQU * 3 ~ P LDR A4,A4 KEY CODE /7C 3 P RF(Z) KON600 YES 3 & P LDK A4,1 INDICATE SKIP CHARACTER 3 P RTN A15 3 PKO
0x181a78…181c0c Dummy {f00=0x007a, f01=0x0190, f02=» CHARACTER IN 3 n 6 P* ECB-BUFFER AND INCREMENT BUFFER INDEX 4 P* 4 P P* ON ENTRY: 4 Z P* 4 p P* A2 = CHARACTER TO STORE 4 z P* A3 = BUFFER INDEX 4 P* 4 P* 4 PSTORE EQU * 4 P LD A4,2,A8 BUFFER ADDRESS 4 P A
0x181c0c…181da0 Dummy {f00=0x007a, f01=0x0190, f02=» 4 ~ P LDR* P,A15 5 P 5 P* 5 & P* 5 0 6 P* EOQUEU = SUBROUTINE TO GET NEXT QUEUE POINTER 5 : P* 5 t P* ON ENTRY: 5 ~ P* 5 P* A1 = QUEUE POINTER 5 P* A6 = DWT-ADDRESS 5 P* 5 P* ON EXIT: 5 P* 5 P*
0x181da0…181f34 (1, 334) Dummy {f00=0x007a, f01=0x4074, f02=»QU10 5 * P LDK A1,DWTSQ SET QUEUE START ADDRESS 6 PEOQU10 ADR A1,A6 6 : P RB STORTN 6 R P END 6 d@ 6 p
0x181f34…1820c8 Dummy {f00=0x007a, f01=0x2008, f02=» 7 WTCON,A6 GET CONVERSION TABLE ADDRESS ADR A4,A1 6 ADR A4,A2 H ( # LCR A2,A4 GET CHARACTER FROM TABLE Z RTN A15 END @ A4,2 RF(Z) KON180 CTRL RF(N) KON190 SHIFT LDR A1,8 CTRL AND SHIFT
0x1820c8…18225c Dummy {f00=0x007a, f01=0x0190, f02=» d l ^ $ R W*W(W&W P X 8 : V U R V W" _& _* W R W W W W W, V U Q W , P| Px R WrWpWnWl V Q R , P T 9IV OBW UFW SC V N 0 V P.
0x18225c…1823f0 Dummy {f00=0x007a, f01=0x0190, f02=»WPW W P @P @T ` 2( _> F K V U 5 W R WrWpW Wl_v V R P V X V Q W R FWF V ] R W4 V P R W : V YPZ( V Y , R FW : W V W 2 P L 8 : EOV ON INPUT FILE,MOUNT NEW
0x1823f0…182584 Dummy {f00=0x007a, f01=0x0190, f02=» 8 R @ : R W W W W W V R ' Q ' W 2 R WtWrWpW V W W V R^ ' QX V RR W b R WPWNWLWJWZ V | SC N N _ V | UF_ V U Q _ W W W W W < W V , X X P Rb T W A
0x182584…182718 Dummy {f00=0x007a, f01=0x0190, f02=» V V V W _6 V W F ; V F F );A F ( R ?U ) Y ) ( T Y W V K V QD R W W W W W W V V V ' ] W _ V R _ WNWvWf V K > R W W W W C V C c l R WjW
0x182718…1828ac Dummy {f00=0x007a, f01=0x0190, f02=» 8 W 2 : LINE NUMBER INPUT FILE CAN NOT BE ASSIGNED OUTPUT NOT ASSIGNED W f R WVWTWRW W V ~ R WFWDWBW@ P4 11 ) R W"W W W 0 O : W W 8 : 00 W
0x1828ac…182a40 Dummy {f00=0x007a, f01=0x0190, f02=»ZZ # 4 C C F 9n ~ R _ _ _ _ B H K _ DL = ON = F ! " / = _ J K R W W W W k : , P T 9CQ 9FR T ! T~ N T # 4 R W _ _ _ H ( T P@ W D V P L
0x182a40…182bd4 (1, 335) Opaque[0x194]
0x182bd4…182d68 # DirEnt {nam=»MONTAB«, typ=»SC«, f00=0x4c20, f01=0x3d20, f02=0x0f58, f03=0x4431}
0x182bd4…182d68 IdxSect {
0x182bd4…182d68 f00 = 0x007a // 0x182bd4 @0x0
0x182bd4…182d68 f01 = 0x0002 // 0x182bd6 @0x2
0x182bd4…182d68 gno = [ // 0x182bd8 @0x4
0x182bd4…182d68 [0x00]: C0x007a.0x3.0
0x182bd4…182d68 ]
0x182bd4…182d68 }
0x182d68…182efc Dummy {f00=0x007a, f01=0x0190, f02=» 2 P IDENT MONTAB REL 8.2 78-09-15 870105040820 P : P* B 6 P* THIS TABLE CONTAINS ADDRESSES TO CONFIGURATION L P* DEPENDENT MONITOR TABLES P* P* P ENTRY MONTAB P ENTRY TCTAB,CDTAB,BLOCKS P* P ENTRY I
0x182efc…183090 Dummy {f00=0x007a, f01=0x0190, f02=»3 P ENTRY INTRT4 P P EXTRN TC:TAB,CD:TAB,BLOK:S ( P* L P* V P* ` P* j P* t P* ~ P* P* P* P* P* P* P* P* PMONTAB EQU * PTCTAB DATA TC:TAB PCD
0x183090…183224 Dummy {f00=0x007a, f01=0x409c, f02=»A 0 PINTRT1 DATA 0 PINTRT2 DATA 0 " PINTRT3 DATA 0 8 PINTRT4 DATA 0 N P* d P* n P* x P* P END @ * P* P* P* P* P* PMONTAB EQU * PTCTAB DATA TC:TAB PCD
0x183224…1833b8 Dummy {f00=0x007a, f01=0x2008, f02=» P EXTRN IN:LT2 P EXTRN IN:RT1 " P EXTRN IN:RT2 8 P* N P* X P* b P* l PMONTAB EQU * v PTCTAB DATA TC:TAB PCDTAB DATA CD:TAB PBLOCKS DATA BLOK:S PDCTAB DATA DC:TAB PINTLT1 DATA IN:LT1
0x1833b8…18354c Dummy {f00=0x007a, f01=0x0190, f02=» ANK A4,/20 SHIFT BIT 9 ? # P RF(E) AKB361 YES $ " P LDR A4,A2 CHARACTER $ < P RF AKB363 $ X PAKB361 EQU * $ j P LDR* A4,A6 $ ~ P ANK A4,/10 PTS 6234 ? $ P RF(E) AKB362 $ P LDR A4,A2 $ P ANK A4,/80 $ P RF(NE) AKB362 $ P LDR A
0x18354c…1836e0 Dummy {f00=0x007a, f01=0x0190, f02=»MULTZ=0 $ " P CC A4,KBMZ,A6 MULTIPLE ZERO ? % P RF(E) KBMZ10 YES! % 6 P XIF % P P CC A4,KBCLR,A6 CLEAR? % P RF(E) KBCL10 % z P CC A4,KBBSP,A6 BACKSPACE? % P RF(E) KBSP10 % P LDR A1,A1 RETURN CODE? % ( P RF(NE) AKB369 YES,STORE AND END
0x1836e0…183874 (1, 336) Opaque[0x194]
0x183874…183a08 # DirEnt {nam=»DC:TAB«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0f60, f03=0x4441}
0x183874…183a08 IdxSect {
0x183874…183a08 f00 = 0x007b // 0x183874 @0x0
0x183874…183a08 f01 = 0x0002 // 0x183876 @0x2
0x183874…183a08 gno = [ // 0x183878 @0x4
0x183874…183a08 [0x00]: C0x007b.0x0.0
0x183874…183a08 ]
0x183874…183a08 }
0x183a08…183b9c Dummy {f00=0x007b, f01=0x4178, f02=» 2 P IDENT DC:TAB REL 8.2 78-09-15 870105040820 P* : P* D P* DC CONFIGURATION TABLE N P* n P* x P ENTRY DC:TAB,DCTAB P* P* P* P* P* P* P* P* PDCTAB DATA DC:TAB & P
0x183b9c…183d30 Dummy {f00=0x007b, f01=0x2008, f02=» DWDC08 P DATA DWDC09 P DATA DWDC10 6 PDCTABE EQU * END OF TABLE V P* x P* P END @ TH ~ P DATA DWDC01 P DATA DWDC02 P DATA DWDC03 P
0x183d30…183ec4 Dummy {f00=0x007b, f01=0x2008, f02=» DATA 0 TTAB ADDRESS $ DATA 0 WAIT/ACTIVATE INDICATOR $ DATA 0 TERMINAL QUEUE L DATA 0 TIMER POINTER j DATA 0 TIME OUT DATA 0 DATA 0,0 SAVE AREA END @ & ! DATA 0 QUEUE ANCHOR OUTPUT DWT'S
0x183ec4…184058 Dummy {f00=0x007b, f01=0x0190, f02=»RACTER x PAOD320 EQU * P LDK A4,/40 " $ P TM A4,A2 CHECK IF END CHARACTER 6 P RF(Z) AOD330 NO ^ 2 P ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH IN ECB v P NGR A3,A3 NEGATE REGISTER P RF AOD340 PAOD330 EQU * " P CWK A2,/3F REJECTED
0x184058…1841ec Dummy {f00=0x007b, f01=0x0190, f02=» f PAOD331 EQU * " P CWK A2,/21 DIRECTION REJECTED P RF(NE) AOD332 NO B ( P LDK A1,/10 INDICATE DIRECTION ERROR P RF ENDIO PAOD332 EQU * $ P CWK A2,/1C QUADRATURE REJECTED? P RF(NE) AOD333 NO , P LDKL A1,/800 INDICATE Q
0x1841ec…184380 Dummy {f00=0x007b, f01=0x018e, f02=»D A1,ECBCW,A8 KEY TABLE ADDRESS P RF(Z) AOD340 NO KEYTABLE ( " P LCR A4,A1 TABLE LENGTH IN A4 J P ANK A4,/FF p & P ADR A1,A4 LAST PLACE IN KEY TABLE P ADK A1,1 PAOD335 EQU * P SUK A4,1 P RF(N) AOD340 KEY NOT FOUND
0x184380…184514 (1, 337) Opaque[0x194]
0x184514…1846a8 # DirEnt {nam=»DRDC07«, typ=»SC«, f00=0x3039, f01=0x3131, f02=0x0f68, f03=0x2020}
0x184514…1846a8 IdxSect {
0x184514…1846a8 f00 = 0x007b // 0x184514 @0x0
0x184514…1846a8 f01 = 0x0020 // 0x184516 @0x2
0x184514…1846a8 gno = [ // 0x184518 @0x4
0x184514…1846a8 [0x00]: C0x007b.0x1.0
0x184514…1846a8 [0x01]: C0x007b.0x2.0
0x184514…1846a8 [0x02]: C0x007b.0x3.0
0x184514…1846a8 [0x03]: C0x007c.0x0.0
0x184514…1846a8 [0x04]: C0x007c.0x1.0
0x184514…1846a8 [0x05]: C0x007c.0x2.0
0x184514…1846a8 [0x06]: C0x007c.0x3.0
0x184514…1846a8 [0x07]: C0x007d.0x0.0
0x184514…1846a8 [0x08]: C0x007d.0x1.0
0x184514…1846a8 [0x09]: C0x007d.0x2.0
0x184514…1846a8 [0x0a]: C0x007d.0x3.0
0x184514…1846a8 [0x0b]: C0x007e.0x0.0
0x184514…1846a8 [0x0c]: C0x007e.0x1.0
0x184514…1846a8 [0x0d]: C0x007e.0x2.0
0x184514…1846a8 [0x0e]: C0x007e.0x3.0
0x184514…1846a8 [0x0f]: C0x007f.0x0.0
0x184514…1846a8 ]
0x184514…1846a8 }
0x1846a8…18483c Dummy {f00=0x007b, f01=0x018e, f02=» 2 P IDENT DRDC07 REL 8.2 78-09-15 870103240912 P : P* B 2 P********************************************* L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* * P* DRDC07: DRIVER DATA COMMUNICATION * P* HDLC F
0x18483c…1849d0 Dummy {f00=0x007b, f01=0x0190, f02=» ` P* P* P* P* & P* 0 P EJECT : P* H P* R P* ENTRY POINTS P* r P* | 2 P ENTRY DC07AD ADDRESS BLOCK TERMINAL REQUESTS " P ENTRY IH0701 INPUT INTERRUPT " P ENTRY IH0702 OUTPUT INTERRUPT " P
0x1849d0…184b64 Dummy {f00=0x007b, f01=0x0190, f02=»* " P EXTRN TDISP DISPATCHER ENTRY ( P EXTRN SAVE8 SAVE A1-A8 ON A15 STACK 0 $ P EXTRN TENDIO COMPLETE I/O EVENT P EXTRN DISIOE REQUEST ERROR P EXTRN SETIME SET TIMER P EXTRN DWTST DWT STATUS P EXTRN DWTOR DWT ORDER P E
0x184b64…184cf8 Dummy {f00=0x007b, f01=0x018e, f02=»ERFACE PART FOR DATA COMMUNICATION P* * P* 4 P* > P* H P* DWT CONTENTS R P* h J P* DWTCHP TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15) r $ P* DWTST BIT #00: NO REQUEST P* P* P* ECB PARAME
0x184cf8…184e8c Dummy {f00=0x007b, f01=0x0190, f02=» PECBRC EQU 8 RETURN CODE PECBCW EQU 10 CONTROL WORD $ P* F P* DWT DISPLACEMENTS P P* l . PDWTTP EQU /10 TIMER POINTER ORDER PROCESS v ( PDWTWQ EQU /12 WRITE/GET BUFFER QUEUE & PDWTBQ EQU /14 BUFFER QUEUE ANCHOR 2 PDWTBTP EQU
0x184e8c…185020 Dummy {f00=0x007b, f01=0x0190, f02=» & PX:A EQU 130 RECEIVE BUFFER LENGTH PRBUFL EQU X:A 2 PX:B EQU 0 H PTBUFL EQU X:B Z PX:C EQU 60 DCTASK FILE CODE p PDC07FC EQU X:C $ PX:D EQU 1 IF 1 INTERRUPT LOGGING PLOGG EQU X:D " PX:E EQU 300 POLL TIMEOUT VALUE
0x185020…1851b4 (1, 338) Dummy {f00=0x007b, f01=0x018e, f02=»HFDUP EQU X:G FULL(=1),HALF(=0)DUPLEX $ PX:H EQU /02 INPUT DEVICE ADDRESS . PCHLCIN EQU X:H V 0 PCHLCUT EQU CHLCIN+/10 OUTPUT DEVICE ADDRESS l P EJECT P* P* P* REQUEST HANDLING P* P* P* P* PARAMETERS
0x1851b4…185348 Dummy {f00=0x007b, f01=0x018e, f02=» t P* /31: GET WRITE BUFFER P* /37: TRANSFER PARAMETERS ( P* J P EJECT T P* b P* l P* CONSTANTS AND WORK AREAS v P* P* & PDCONOF DATA 0 ON- / OFFLINESWITCH * PDCSTOL DATA 0 OLD DC EQUIPMENT STATUS PDCST
0x185348…1854dc Dummy {f00=0x007b, f01=0x0190, f02=» P XIF , PDCTPGP DATA 0 TIMER POINTER GENERAL POLL , PDC07DC DATA DCACTD ADDRESS BLOCK DC TASK @ $ PDC07AD DATA DCACT ADDRESS BLOCK p , P RES 15 SUBROUTINE STACK FOR INTERRUPTS PSTB RES 1 P* P* PTIMBUF EQU 1800 180 SECOND
0x1854dc…185670 Dummy {f00=0x007b, f01=0x0190, f02=»CT MODEM z PCIWAIC EQU /3 WAIT FOR CALLL * PCIREPC EQU /5 RECEIVE ON PROG.CHANNEL 4 2 PCIAREP EQU /4 RECEIVE ON PROG.CHANNEL (2-WIRE) b ( PCIREMX EQU /B RECEIVE ON MUX CHANNEL . PCIAREM EQU /E RECEIVE ALARM ON MUX CHANNEL P* P* CI
0x185670…185804 Dummy {f00=0x007b, f01=0x0190, f02=»E PROG.CHANNEL ~ $ PCIT4WM EQU /A 4-WIRE MUX.CHANNEL $ PCIT2WM EQU /B 2-WIRE MUX.CHANNEL > PCIIDLE EQU 4 TRANSMIT IDLE 1 f P EJECT P* P* CHANNEL UNIT PARAMETRS P* P* P* PROCEDURE WORK AREAS P* . PSTATUS D
0x185804…185998 Dummy {f00=0x007b, f01=0x018e, f02=»DE INDICATOR (0~=DISC,1=NRM,2=CMDR) , PQTRM DATA 0 COMMAND/RESPONSE QUEUE AREA , . PFIELD1 DATA 0 ADDRESS + C-FIELD RECEPTION PWRDWT DATA 0 WRITING DWT $ P RES 15 STACK FOR INPUT PROCESS $ PSTBIN RES 1 INPUT STACK POINTER $ P RES 15 ST
0x185998…185b2c Dummy {f00=0x007b, f01=0x0190, f02=» PCPCNT DATA 0 CHECK POINT $ PVSCNT DATA 0 SEND STATE VARIABLE ( ( PVRCNT DATA 0 RECEIVE STATE VARIABLE P PNSCNT DATA 0 SEND COUNTER | PNRCNT DATA 0 RECEIVE COUNTER $ PLNRCNT DATA 0 LAST ACCEPTED N(R) P EJECT P* P*
0x185b2c…185cc0 Dummy {f00=0x007b, f01=0x0190, f02=»QU /53 SET DISCONNECT MODE PSIM EQU /7 SET INIT MODE " P* B P* MASKS ON RECEIVED FRAMES L P* p PRRMSK EQU 1 RECEIVE READY z " PRNRMSK EQU 5 RECEIVE NOT READY PREJMSK EQU 9 REJECT COMMAND PIMSK EQU 1 INFORMATION FRAME "
0x185cc0…185e54 (1, 339) Dummy {f00=0x007b, f01=0x018e, f02=»ON SEQUENCED ACK PROL EQU /1F REQUEST ON LINE PRR EQU /11 READY TO RECEIVE < PCMDR EQU /97 INVALID COMMAND ` PREJ EQU /19 FRAME REJECTION P EJECT P* P* $ P* ACTIVATION FROM TERMINAL TASKS P* PDCACT EQU *
0x185e54…185fe8 Dummy {f00=0x007b, f01=0x0190, f02=» P SUK A7,/08-/06 P RF(Z) DCEX EXCHANGE P SUK A7,/22-/08 < $ P RF(Z) DCRR RELEASE READ BUFFER T P SUK A7,/37-/22 | $ P RF(Z) DCTP TRANSFER PARAMETERS P IFF TBUFL=0 P ADK A7,/37-/31 P RF(Z) DCGW GET WRITE BUFFER
0x185fe8…18617c Dummy {f00=0x007b, f01=0x0190, f02=» P SUK A7,/02 P RF(E) DCRDDC READ P SUK A7,/22-/02 2 $ P RF(E) DCRR RELEASE READ BUFFER J P SUK A7,/37-/22 r $ P RF(E) DCTP TRANSFER PARAMETERS PDCA100 EQU * REQUEST ERROR P ABL DISIOE INVALID ORDER P EJECT P*
0x18617c…186310 Dummy {f00=0x007b, f01=0x0190, f02=» DC EQUIPMENT | $ P* SPONTANOUS MESSAGE RECEPTION P* > PDCRDDC EQU * H , P CF A15,CKMESS CHECK IF MESSAGE RECEIVED PDCRTN EQU * P ABL TDISP GO TO DISPATCHER P* P* P* TRANSFER PARAMETERS P* P* >
0x186310…1864a4 Dummy {f00=0x007b, f01=0x018e, f02=» P* & PDCTP LD A2,ECBCW,A8 GET PARAMETER ( P STR A2,A6 SAVE IN FIRST WORD OF DWT 8 P EJECT d P* r & P* HERE TO INTRODUCE DWT IN DC-TAB | $ P* IF NOT DC-TASK CONCERNED P* P CWK A6,DW0700 DC-TASK ? P RF(E) ENDIO YES
0x1864a4…186638 Dummy {f00=0x007b, f01=0x0190, f02=» $ P STR A6,A1 INSERT DWT IN DC:TAB P LDK A1,2 , . P ADS A1,DC:IN UPDATE DC:TAB INPUT POINTER > * P ADS A1,DC:TAB INCREMENT DC:TAB LENGTH p P SUR A1,A1 RETURN CODE=0 PENDIO EQU * $ P CF A15,TENDIO COMPLETE REQUEST P RB DCRTN
0x186638…1867cc Dummy {f00=0x007b, f01=0x0190, f02=»TIME OUT P* P* PDCWR EQU * $ P CF A15,TIMEWR SET TIMER 6 P CF A15,INSWQ QUEUE REQUEST V P RB DCRTN z P EJECT P* P* P* P* READ P* P* P* COMPLETE WHEN: P* MESSAGE RECEIVED
0x1867cc…186960 Dummy {f00=0x007b, f01=0x0190, f02=»RD10 NOT EMPTY P* P* P* * P CF A15,TIMERE START TIMER 4 P* V P* ` P* j P RB DCRTN t P* P* P* BUFFER WAITING IN QUEUE P* P* PDCRD10 EQU * P LDR* A2,A1 GET NEXT ONE , P ST
0x186960…186af4 (1, 340) Dummy {f00=0x007c, f01=0x018e, f02=» x P SUK A4,1 UPDATE LENGTH P ST A4,ECBEL,A8 STORE IN ECB ( P LDK A1,0 SET RC = 0 L ( P CF A15,TENDIO COMPLETE READ REQUEST h P LD A1,DWTBQ,A6 P RB(NZ) DCRTN . P LD A1,DWTBTP,A6 QUEUE EMPTY, STOP TIMING P RB(Z) DCRTN P
0x186af4…186c88 Dummy {f00=0x007c, f01=0x018e, f02=» P IFF TBUFL=0 P* COMPLETE WHEN: P* BUFFER BEEN ALOCATED 4 P* TIME OUT T P* h P* r PDCGW EQU * | & P CF A15,GTBUF GET TRANSMIT BUFFER P LDR A4,A4 P RF(Z) DCGW10 NO FREE BUFFER P ST A4,ECBBA,A8 P L
0x186c88…186e1c Dummy {f00=0x007c, f01=0x0190, f02=» P CF A15,TIMERE START TIMER P CF A15,INSGWQ QUEUE REQUEST * P RB DCRTN N P XIF ` P EJECT l P* z P* P* RELEASE READ BUFFER P* P* PDCRR LD A4,ECBBA,A8 P SUK A4,7 P CF A15,RRBUF P LDK
0x186e1c…186fb0 Dummy {f00=0x007c, f01=0x0190, f02=»* P* COMPLETE WHEN: " P* MESSAGE PASSED TO TERMINAL " P* TIME OUT H P* PDCEX EQU * f * P RB DCWR SAME INITIALIZATION AS WRITE x P EJECT P* P* P* P* TIMER HANDLING PART P* P* P*
0x186fb0…187144 Dummy {f00=0x007c, f01=0x0190, f02=»0 NO TIMING P ST A2,TIMERR P CF A15,SETIME * P DATA TOUTRE @ PTIMERR DATA 0 T ( P ST A4,DWTTP,A6 STORE TIMER POINTER j PTIME10 EQU * P RF GBUF10 RETURN P* P* TIMEOUT READ TIMER P* PTOUTRE EQU * P
0x187144…1872d8 Dummy {f00=0x007c, f01=0x0190, f02=» PTOUTR1 EQU * " P LDK A1,/40 INDICATE TIME OUT , P LD A2,DWTOR,A6 CHECK IF EXCHANGE ORDER B P SUK A2,8 r P RF(NZ) TOUTR2 NOT EXCHANGE 2 P ORK A1,2 RETURN CODE /42 AT EXCHANGE TIME OUT $ PTOUTR2 RB ENDIO COMPLETE REQUEST P*
0x1872d8…18746c Dummy {f00=0x007c, f01=0x018e, f02=» x P ST A2,TIMWR P CF A15,SETIME P DATA TOUTWR 2 PTIMWR DATA 0 F P ST A4,DWTTP,A6 Z P RB TIME10 r P EJECT P* P* TIMEOUT WRITE TIMER P* PTOUTWR EQU * P LDR A6,A1 FETCH DWT P CM DWTTP,A6 P
0x18746c…187600 Dummy {f00=0x007c, f01=0x0190, f02=» j PTOUT10 LD A2,DWTECB,A6 P LD A4,ECBBA,A2 FETCH BUFFER & P IFF TBUFL=0 J ( P CF A15,RTBUF RELEASE TRANSMITBUFFER ^ ( P CF A15,CKGBQ CHECK GET BUFFER QUEUE P XIF * P CF A15,REMOVW REMOVE FROM WRITE QUEUE P RB TOUTR1 P EJECT
0x187600…187794 (1, 341) Dummy {f00=0x007c, f01=0x0190, f02=»EQU * & P LD A2,DWTTP,A6 GET TIMER POINTER P RF(Z) CTIM10 NOT RUNNING 8 P LDR* A2,A2 Z " P NGR A2,A2 GET REMAINING TIME n P CM* DWTTP,A6 STOP TIMER P CM DWTTP,A6 PCTIM10 EQU * P RTN A5 P EJECT P* P* GE
0x187794…187928 Dummy {f00=0x007c, f01=0x0190, f02=»ADDRESS v P* A2 AND A3 ARE DESTROYED P* 2 P* < ( PGRBUF LDKL A2,DCRBUF RECEIVE BUFFERS F PGBUF INH r P LDR* A4,A2 P RF(Z) GBUF10 NO BUFFER FREE . P LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN P STR A3,A2 * PGBUF10 ADK
0x187928…187abc Dummy {f00=0x007c, f01=0x0190, f02=»BUFL=0 $ P* CALLING SEQUENCE: CF A15,GTBUF P* A4=0 IF NO BUFFER IS FREE 6 & P* ELSE A4 CONTAINS BUFFER ADDRESS Z P* A2 AND A3 ARE DESTROYED P* P* * PGTBUF LDKL A2,DCTBUF TRANSMIT BUFFERS P RB GBUF P EJECT P*
0x187abc…187c50 Dummy {f00=0x007c, f01=0x0190, f02=»UE ANCHOR | " P RF(Z) CKG110 NO ONE ON QUEUE ! P SUK A6,DWTWQ ! 8 P LD A2,DWTST,A6 ! N P RF(N) CKG100 NO REQUEST ! f P LD A2,DWTOR,A6 ! P SUK A2,/31 ! ( P RF(NZ) CKG100 NO GET BUFFER REQUEST ! & P CF A15,GTBUF GET TRANSMIT BUFFER ! P
0x187c50…187de4 Dummy {f00=0x007c, f01=0x018e, f02=»+TBUFL ! ( P ST A1,ECBEL,A3 STORE BUFFER LENGTH " P LDK A1,0 " : $ P CF A15,TENDIO COMPLETE REQUEST " L PCKG100 EQU * " t $ P CF A15,REMOVG REMOVE FROM QUEUE " PCKG110 LDR A6,A7 RESTORE A6 " P RB GBUF10 RETURN " P XIF " P EJECT " P
0x187de4…187f78 Dummy {f00=0x007c, f01=0x0190, f02=» P* A2 AND A3 ARE DESTROYED # P* # & P* # 0 ( PRRBUF LDKL A2,DCRBUF RECEIVE BUFFERS # : PRBUF INH # f PRBUF10 EQU * # v P LDR* A3,A2 # P RF(Z) RBUF20 # P LDR A2,A3 # P RB RBUF10 # PRBUF20 EQU * # P STR A4,A2 # P CMR A4 #
0x187f78…18810c Dummy {f00=0x007c, f01=0x0190, f02=»INS BUFFER ADDRESS # $ P* CALLING SEQUENCE: CF A15,RTBUF $ P* A2 AND A3 ARE DESTROYED $ B P* $ d P* $ n * PRTBUF LDKL A2,DCTBUF TRANSMIT BUFFERS $ x P RB RBUF $ P XIF $ P EJECT $ P* $ P* $ ( P* INSERT DWT IN WRITE REQUEST QUEUE
0x18810c…1882a0 Dummy {f00=0x007c, f01=0x0190, f02=» $ | PINSWQ2 LDR* A3,A2 % $ P RF(Z) INSWQ3 END OF QUEUE FOUND % " P LDR A2,A3 % J P RB INSWQ2 % PINSWQ3 ADR A4,A6 % n P STR A4,A2 INSERT IN QUEUE % " P CMR A4 INDICATE END OF QUEUE % P RB GBUF10 RETURN % P* % P* % * P* REMOVE DWT
0x1882a0…188434 (1, 342) Dummy {f00=0x007c, f01=0x018e, f02=» % j 2 PREM05 LDK A4,DWTWQ GET DWT-LINK TO BE REMOVED & PREM06 ADR A4,A6 & > PREM10 LDR* A3,A2 & V & P RB(Z) GBUF10 NOT ON QUEUE: RETURN & n P CWR A3,A4 & P RF(E) REM15 & P LDR A2,A3 GET NEXT & P RB REM10 & PREM15 LDR* A3,A4 REMOVE &
0x188434…1885c8 Dummy {f00=0x007c, f01=0x0190, f02=» P* ' P IFF TBUFL=0 ' P* A2,A3,A4 DESTROYED ' " P* A6=DWT ' > P* ' N * PINSGWQ LDKL A2,DCGWQ GET QUEUE ANCHOR ' X P RB INSWQ1 ' P* ' P* ' , P* REMOVE DWT FROM GET WRITE BUFFER QUEUE ' P* ' P* A2,A3,A4 DESTROYED ' P* A6=D
0x1885c8…18875c Dummy {f00=0x007c, f01=0x018e, f02=»E ALLOCATED RECEIVE BUFFER ' P* ( " P* A4=BUFFER ADDR ( , P* A2,A3 DESTROYED ( D P* ( ^ PQRBUF EQU * ( h 4 P LDKL A2,DW0700+DWTWQ BEGINNING OF RECEIVE QUEUE ( | PQR100 EQU * ( P LDR* A3,A2 ( $ P RF(Z) QR200 END OF QUEUE FOUND ( P LDR
0x18875c…1888f0 Dummy {f00=0x007c, f01=0x0190, f02=» ( P* ) P* ) 2 P* CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE ) P* ) R 4 P* REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED ) P* ) PCKMESS LDKL A6,DW0700 ) P LD A1,DWTST,A6 ) P RF(N) CKM110 NO REQUEST ) P LDK A1,2 READ REQUE
0x1888f0…188a84 Dummy {f00=0x007c, f01=0x018e, f02=»EUE ) n " P RF(Z) CKM200 NO READ IN QUEUE * , P LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER * 2 . P ST A2,DWTWQ,A6 STORE THIS ADDR INTO QUEUE * b " P ADK A3,7 MOVE POINTER TO TEXT * * P ST A3,ECBBA,A8 SAVE THIS ADDR IN ECB * P LD A4,-5,A3 * P SUK A4,1 UP
0x188a84…188c18 Dummy {f00=0x007c, f01=0x018e, f02=» * d P LDK A1,0 PARAMETER=OK + 6 PCKM100 CF A15,TENDIO COMPLETE READ GENERAL REQUEST + & * PCKM110 ADKL A15,4 ADJUST STACK POINTER + ` P ABR* A15 RETURN + 8 PCKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHECK STATUS + , P OR A1,DCONOF TAKE CARE OF POLL TIME O
0x188c18…188dac Dummy {f00=0x007c, f01=0x0190, f02=» + h P RB CKM100 , P EJECT , P* , ( P* , 2 P* HDLC INPUT PROCESS , < P* , X P* READ ONE FRAME,ANALYZE IT , b P* QUEUE RESPONSES FOR , P* OUTPUT PROCESS , P* , P* , PBRM EQU * BASIC RECEIVE MODE , ( P LDKL A5,STBIN LOAD
0x188dac…188f40 Dummy {f00=0x007c, f01=0x0190, f02=» CC A1,DW0700+1 , * P RB(NE) BRM NOT MENT FOR THIS CLUSTER - P LC A1,FIELD1+1 GET C-FIELD - F P LDR A2,A1 SAVE IT - j P XRK A2,SNRM - P RF(NZ) BRM100 - P* - P* - P* SNRM RECEIVED - P* - P* - P LDK A1,1 - . P ST A1,M
0x188f40…1890d4 (1, 343) Dummy {f00=0x007c, f01=0x0190, f02=»TRM QUEUE FOR TRANSMISSION - P RB BRM . " PBRM100 EQU * . 2 P LDR A2,A1 . F P XRK A2,DISC DISCONNECT ? . X P RF(NZ) BRM110 . z P* . P* . P* DISC RECEIVED . P* . P* . PBRM105 EQU * . & P CM MODE INDICATE DISCONNECT MODE .
0x1890d4…189268 Dummy {f00=0x007c, f01=0x0190, f02=» REQUEST FOR ONLINE . ~ P* / P* / & P LDK A1,2 LOAD 'ROL' / 0 ( P CF A15,QMTRM QUEUE FOR TRANSMISSION / L P RB BRM / x PBRM120 EQU * / P SUK A2,2 / P RF(Z) BRM160 CMDR-MODE / P EJECT / P* / P* NORMAL RESPONSE MODE / P*
0x189268…1893fc Dummy {f00=0x007c, f01=0x0190, f02=» P* 0 P* RNR RECEIVED 0 P* 0 $ P* 0 . 8 P CF A5,UPDCON UPDATE COUNTERS AND CHECK OUTPUT QUEUE 0 8 P CF A5,TSTNR CMDR ? 0 t P LDK A1,3 LOAD 'RR' 0 ( P CF A15,QMTRM QUEUE FOR TRANSMISSION 0 P RB BRM 0 PBRM130 EQU * 0 P LDR A2,A1 G
0x1893fc…189590 Dummy {f00=0x007c, f01=0x0190, f02=» OR REJ RECEIVED 0 P* 1 PBRM140 EQU * 1 " 8 P CF A5,UPDCON UPDATE COUNTERS AND CHECK OUTPUT QUEUE 1 6 P CF A5,TSTNR CMDR ? 1 r PBRM145 EQU * 1 P LC A1,FIELD1+1 GET C-FIELD 1 P ANK A1,/10 CHECK POLL-BIT 1 P RB(Z) BRM P-BIT OFF 1 ( P LDK
0x189590…189724 Dummy {f00=0x007c, f01=0x0190, f02=»NVALID CONTROL FIELD 1 P* 2 PBRM150 EQU * 2 & P LDR A2,A1 2 : P ANK A2,IMSK 2 L P RF(Z) BRM170 I-FRAME 2 ` P LC A1,FIELD1+1 GET C-FIELD 2 ~ P ANK A1,/EF EXCLUDE POLL-BIT 2 P LDR A2,A1 2 P XRK A2,UIMSK UI ? 2 P RF(Z) BRM155 YES 2
0x189724…1898b8 Dummy {f00=0x007c, f01=0x018e, f02=»ON ? 2 ~ P RB(NZ) BRM050 YES 3 P RB BRM 3 & P* 3 6 P* 3 @ P* INVALID COMMAND 3 J P* 3 d P* 3 n PBRM156 EQU * 3 x P LDK A2,0 PRESENT CONTERS 3 . P LDK A3,/80 FAIL CODE (CMDR MODE SETTING) 3 P CF A5,PRCMDR INIT CMDR 3 PBRM160 E
0x1898b8…189a4c Dummy {f00=0x007c, f01=0x0190, f02=» 3 j P RB BRM 4 P EJECT 4 P* 4 & P* 4 0 P* I-FRAME RECEIVED 4 : P* 4 T P* 4 ^ > PBRM170 CF A5,UPDCON UPDATE COUNTERS AND CHECK OUTPUT QUEUE 4 h ( P LD A1,STATUS CHECK UNEXPECTED N(S) 4 P ANK A1,1 N(S) OK? 4 P RF(NZ) BRM185 NO 4 &
0x189a4c…189be0 Dummy {f00=0x007c, f01=0x018e, f02=»LL BIT 4 | P RF(Z) BRM180 P-BIT OFF 5 ( P LDK A1,0 INDICATE POLL-BIT RECEIVED 5 . ( P CF A15,QMTRM QUEUE FOR TRANSMISSION 5 Z PBRM180 EQU * 5 P* 5 & P* HERE TO PROCESS AVAILABLE FRAME 5 P* A4=BUFFER 5 P* 5 P LC A2,+6,A4 GET STA 5
0x189be0…189d74 (1, 344) Dummy {f00=0x007d, f01=0x0190, f02=» 5 , P* SUBTERMINAL ADDRESS IS NOT CONTAINED 6 P* IN DCTAB SUBSET. 6 8 * P* QUEUE INCOMMING MESSAGE TO DC-TASK 6 V ( P* AND CHECK IF REQUEST PENDING 6 P* 6 . P ST A2,+4,A4 SAVE WRONG SUB TRMNL. ADDRESS 6 P CF A5,QRBUF QUEUE IN DW0700
0x189d74…189f08 Dummy {f00=0x007d, f01=0x0190, f02=»EJ WITHOUT TESTING POLL-BIT 6 x $ P* HALF-DUPLEX:WAIT POLL-BIT 7 $ P* 7 L PBRM185 EQU * 7 V P CM STATUS RESTORE STATUS 7 j * P LDKL A1,HFDUP GET FULL OR HALF DUPLEX 7 P RB(Z) BRM145 WAIT POLL 7 & P LDK A1,/FF INDICATE REJ TOBE SENT 7 ( P CF
0x189f08…18a09c Dummy {f00=0x007d, f01=0x0190, f02=»BRM190 EQU * 7 P LD A1,DWTST,A6 GET STATUS 8 P RF(N) COMP30 NO REQUEST 8 6 P LD A1,DWTOR,A6 GET ORDER 8 V P SUK A1,2 8 x P RF(NZ) COMP30 NOT READING 8 PCOMP25 EQU * 8 & P LD A8,DWTECB,A6 GET ECB ADDRRESS 8 P LD A1,+2,A4 GET LENGTH 8
0x18a09c…18a230 Dummy {f00=0x007d, f01=0x0190, f02=»T 8 z P LDK A1,0 SET RC=0 9 ( P CF A15,TENDIO COMPLETE READ REQUEST 9 $ P ABL BRM BASIS RECEIVE MODE 9 P P EJECT 9 t P* 9 P* QUEUE RECEIVED MESSAGE 9 P* 9 PCOMP30 EQU * 9 * P LDK A2,DWTBQ GET PROPER QUEUE ANCHOR 9 P ADR A2,A6 9
0x18a230…18a3c4 Dummy {f00=0x007d, f01=0x018e, f02=»WTBQ,A6 9 P LDR* A2,A1 FIRST IN QUEUE : P RF(NZ) COMP35 : 2 P LDR A1,A6 : H . P CF A15,SETIME START BUF SUPERVISION TIMER : Z P DATA COMP40,TIMBUF : P ST A4,DWTBTP,A6 : PCOMP35 ABL BRM : P* : P* TIME OUT ENTRY : P* : PCOMP
0x18a3c4…18a558 Dummy {f00=0x007d, f01=0x0190, f02=» $ P CM DWTBQ,A6 CLEAR QUEUE ANCHOR ; PCOMP42 EQU * ; , 2 P LDKL A2,DW0700+DWTWQ GET DC-TASK QUEUE ANCHOR ; @ PCOMP43 EQU * ; v P LDR* A3,A2 ; P RF(Z) COMP44 END OF QUEUE ; P LDR A2,A3 ; P RB COMP43 ; PCOMP44 EQU * ; . P STR A1,A2 INSER
0x18a558…18a6ec Dummy {f00=0x007d, f01=0x0190, f02=» " P* HERE TO TEST N(R) VALIDITY < P* < * PTSTNR EQU * < 4 P LD A1,STATUS GET STATUS < H P ANK A1,2 WRONG N(R)? < h P RF(NZ) TSTNRX YES < P RTN A5 < 0 P********** INIT CMDR PARAMETERS *********** < PTSTNRX EQU * < P CM STATUS RESTO
0x18a6ec…18a880 Dummy {f00=0x007d, f01=0x0190, f02=»ODE IN A3 < ~ P CF A5,PRCMDR INIT FIELDS = P ABL BRM160 = 4 P EJECT = H P* = V , P* HERE TO INITIALIZE CMDR OUTPUT FIELDS = ` P* = PPRCMDR EQU * = " P LDK A1,CMDR LOAD 'CMDR'+F-BIT = & P LDKL A4,DLOBUF GET BUFFER ADDRESS = P ADK A4,1
0x18a880…18aa14 (1, 345) Dummy {f00=0x007d, f01=0x0190, f02=» ADK A4,1 = $ P SCR A2,A4 SAVE PRESENT COUNTERS > P ADK A4,1 > : $ P SCR A3,A4 SAVE FAIL PARAMETERS > L P RTN A5 > t P EJECT > P* > P* > P* HDLC OUTPUT PROCESS > P* > . P* QUEUED AS MONITOR JOB FROM INPUT PROCESS > P* > $
0x18aa14…18aba8 Dummy {f00=0x007d, f01=0x0190, f02=»DING > h P* ? P* ? PTRM EQU * ? P INH SET INHIBIT ? 2 " P LDKL A5,STBUT LOAD STACKBASE ? L P LDR A7,A1 SAVE PARAMETER ? r P CCK A1,/FF00 REJ ? ? P RF(NE) TRM050 NO ? " P LDK A1,REJ LOAD 'REJ'+ F-BIT ? P RF TRM110 ? PTRM050
0x18aba8…18ad3c Dummy {f00=0x007d, f01=0x018e, f02=» SUK A1,1 ? P RF(Z) TRM100 UA ON QUEUE @ P SUK A1,1 @ 4 P RF(Z) TRM120 ROL ON QUEUE @ F P SUK A1,1 @ h P RF(Z) TRM130 RR ON QUEUE @ z P SUK A1,1 @ P RF(Z) TRM140 CMDR ON QUEUE @ ( P RF TRM150 CHECK APPLICATION QUEUE @ P EJECT @
0x18ad3c…18aed0 Dummy {f00=0x007d, f01=0x0190, f02=» @ " P CF A5,TRSFR SEND SHORT FRAME A P ABL TDISP END OF JOB A . P* A L P* A V P* ROL SHOULD BE SENT A ` P* A | P* A PTRM120 EQU * A P LDK A1,ROL LOAD 'ROL'+F A P RB TRM110 A P* A P* A P* RR SHOULD BE SENT A P*
0x18aed0…18b064 Dummy {f00=0x007d, f01=0x0190, f02=» P SLL A2,5 ADJUST IT B P ORR A1,A2 INSERT IN RR B P RB TRM110 B @ P* B R P* B P* CMDR SHOULD BE SENT B f P* B P* B PTRM140 EQU * B & P LDKL A4,DLOBUF GET BUFFER ADDRESS B P LDK A3,5 FRAME LENGTH TO A3 B P CF A5,WRFRAM
0x18b064…18b1f8 Dummy {f00=0x007d, f01=0x0190, f02=» B P* C PTRM150 EQU * C ( P LD A6,DCWRQ CHECK APPLICATION QUEUE C & $ P RF(NZ) TRM300 SOMEONE ON QUEUE C R PTRM170 EQU * C z $ P LD A1,DCRBUF BUFFER SHORTAGE ? C P RB(NZ) TRM130 NO C P* C P* C * P* RNR SHOULD BE SENT, BUFFER SHORTAG
0x18b1f8…18b38c Dummy {f00=0x007d, f01=0x018e, f02=»TRANSMIT AN IFRAME C P* D PTRM300 EQU * D $ " P SUK A6,DWTWQ GET DWT ADDRESS D 8 . P LDKL A4,DLOBUF GET OUTPUT BUFFER ADDRESS D ^ ( P CF A5,PRCFI PREPARE C-FIELD FORMAT D $ P LD A8,DWTECB,A6 GET ECB ADDRESS D ( P LD A3,ECBRL,A8 GET REQUESTED LENGTH
0x18b38c…18b520 Dummy {f00=0x007d, f01=0x0190, f02=» * P LD A7,ECBBA,A8 OUTPUT BUFFER ADDRESS E ( P ADK A7,1 USE FREE-WORD TO INSERT IT E 2 P SCR A1,A7 E ^ $ P SUK A7,2 INIT OUTPUT ADDRESSING E p P ST A7,SWITCH E T P**************** INITIALIZATION COMPLETED,SEND THE WHOLE FRAME ********** E P C
0x18b520…18b6b4 (1, 346) Dummy {f00=0x007d, f01=0x0190, f02=» ANK A1,7 MODULO 7 E P ST A1,VSCNT F " P ST A1,CPCNT UPDATE CHECKPINT F . P ABL TDISP F T P EJECT F f P* F t " P* PREPARE C-FIELD FOR I-FRAME F ~ P* F P* F PPRCFI EQU * F P LDK A1,/10 LOAD 'I'+F F ( P LD A2,VRCNT GET NEXT EXPECTED
0x18b6b4…18b848 Dummy {f00=0x007d, f01=0x0190, f02=»IELD IN BUFFER F | P RTN A5 G P EJECT G & P* G 4 P* G > , P* QUEUE 'OUTPUT PROCESS' AS MONITOR JOB G H , P* ON ENTRY A1 CONTAINS ACTION PARAMETER G x P* G P* G PQMTRM EQU * G ( P LDKL A2,TRM DISPATCH ADDRESS TO A2 G , P STR A3,A15
0x18b848…18b9dc Dummy {f00=0x007d, f01=0x0190, f02=»*** G j P LDR* A3,A15 H P ADKL A15,4 H P ABR* A15 H 4 P* H F P* H P P* RESET PROCEDURE COUNTERS H Z P* H | P* H PRESCON EQU * H P CM VSCNT H P CM VRCNT H P LDK A1,7 H P ST A1,NSCNT H P CM NRCNT H P CM LNRC
0x18b9dc…18bb70 Dummy {f00=0x007d, f01=0x0190, f02=»UE H z P* I * P* ON ENTRY A1 CONTAINS CURRENT C-FIELD I P* I B P* I L PUPDCON EQU * I V P LC A1,FIELD1+1 GET C-FIELD I j P LDR A2,A1 SAVE C-FIELD I P ANK A2,1 I ( P RF(NZ) UPD100 NOT I-FRAME, NO N(S) I P LDR A2,A1 I P SRL A2,1
0x18bb70…18bd04 Dummy {f00=0x007d, f01=0x0190, f02=»INCREMENT VARIABLE I P LDK A2,7 J P ANS A2,VRCNT MODULO 7 J , P RF UPD100 J J PUPD080 EQU * J P LDK A2,1 J p & P ORS A2,STATUS INDICATE WRONG N(S) J PUPD100 EQU * J P LDR A2,A1 GET C-FIELD J P SRL A2,5 ADJUST IT J P ANK A2,7 J
0x18bd04…18be98 Dummy {f00=0x007d, f01=0x0190, f02=» LD A6,WRDWT GET WRITING DWT J , P CW A2,CPCNT TRANSMISSION ACKNOWLEDGED ? K $ P RF(NE) UPD130 NO K T 2 P ST A2,LNRCNT YES,SAVE LAST ACKNOWLEDGED N(R) K n P* K P* K P* UPDATE OUTPUT QUEUE K P* K P* K P IFF TBUFL=0 K $ P LD A8,DWT
0x18be98…18c02c Dummy {f00=0x007d, f01=0x018e, f02=»0 RC=0 K ( P CF A5,CWRITE CHECK COMPLETE REQUEST L P RTN A5 L : P* L J ( P* LAST TRANSMISSION NOT ACKNOWLEDGED L T P* L P* L PUPD130 EQU * L ( P****** TEST IF VALID N(R) ********* L P CW A2,LNRCNT VALID ? L P RF(NE) UPD205 NO L
0x18c02c…18c1c0 Dummy {f00=0x007d, f01=0x018e, f02=» PUPD205 EQU * M P LDK A1,2 M P ORS A1,STATUS M * P RB UPD200 M @ P* M R * P* HERE ,NO TRANSMISSION HAS BEEN DONE M . P* SO,JUST CHECK SYNCHRONOUS N(R) SEQUENCE M PUPD210 EQU * M P* M P CW A2,VSCNT M P RB(E) UPD200 RIGHT SEQUEN
0x18c1c0…18c354 (1, 347) Dummy {f00=0x007d, f01=0x0190, f02=» P* N P* A1 CONTAINS RETURN CODE N P* N 0 P* N : PCWRITE EQU * N D $ P LD A8,DWTECB,A6 GET ECBADDRESS N X P LD A2,DWTST,A6 N P RF(N) CWR200 NO REQUEST N P LD A2,DWTOR,A6 GET ORDER N P SUK A2,6 N P RF(Z) CWR100 WRITE REQUEST
0x18c354…18c4e8 Dummy {f00=0x007d, f01=0x018e, f02=»R N n P RF CWR200 O * PCWR100 CF A5,CTIME STOP REQUEST TIMING O P ST A2,ECBCW,A8 O J $ P CF A15,TENDIO COMPLETE REQUEST O b P EJECT O PCWR200 EQU * O * P CF A15,REMOVW REMOVE FROM WRITE QUEUE O P IFF TBUFL=0 O & P LD A4,ECBBA,A8 GET BUFFER
0x18c4e8…18c67c Dummy {f00=0x007d, f01=0x0190, f02=» P RTN A5 P P EJECT P P* P " P* P , * P* TRANSMIT SHORT FRAME WITHOUT I-FIELD P 6 , P* ON ENTRY A1 CONTAINS COMMAND/RESPONSE P d P* P P* P PTRSFR EQU * P & P LDKL A4,DLOBUF GET BUFFER ADDRESS P P SC A1,+1,A4 STORE C-FIELD P P
0x18c67c…18c810 Dummy {f00=0x007d, f01=0x0190, f02=» FRAME P " P* ON ENTRY : A3 = FRAME LENGTH Q $ P* A4 = BUFFER ADDRESS Q 4 P* Q P* Q f PWRFRAM EQU * Q p P LD A1,DW0700 GET CU ADDRESS Q $ P SCR A1,A4 STORE FIRST IN BUFFER Q P LDR A1,A3 Q P ANK A1,1 Q < P RF(Z) WRF100 ALL BI
0x18c810…18c9a4 Dummy {f00=0x007d, f01=0x0190, f02=»1,CHLCUT START CHLC TRANSMITTER Q P CF A5,WRITE SEND THE FRAME R ( P RF WRF110 R L $ P LDK A1,CIIDLE TRANSMIT IDLE ONE R ^ P CIO A1,1,CHLCUT R P CF A5,WRITE R PWRF110 EQU * R P LDK A1,CINRTS R ( P CIO A1,1,CHLCUT NO REQUEST TO SEND R P
0x18c9a4…18cb38 Dummy {f00=0x007d, f01=0x0190, f02=»Z) IF THE FRAME IS VALID R $ P* AND A4 CONTAINS BUFFER ADDRESS S P* S H P* S R PRDFRAM EQU * S P LD A4,DCRBUF GET BUFFER S p , P RF(NZ) RDF001 BUFFERS STILL AVAILABLES S P HLT S PRDF001 EQU * S P ADK A4,6 RESERVE HEADER S & P LDK A
0x18cb38…18cccc Dummy {f00=0x007d, f01=0x0190, f02=»,READ READ THE FRAME S P RF(Z) RDF110 VALID FRAME T PRDF100 EQU * T > P LDK A1,1 T R P RF RDF120 T d PRDF110 EQU * T v P LD A4,DCRBUF T P ADK A4,2 GET BUFFER ADDRESS T P STR A3,A4 SAVE LENGTH T P LDK A1,0 T PRDF120 EQU * T P
0x18cccc…18ce60 Dummy {f00=0x007d, f01=0x0190, f02=» PIH0701 EQU * U P CF A15,SAVE8 U P CF A15,LDREGI U . " P INR A2,0,CHLCIN READ 16 BITS U D P RF(NA) IHLC10 NOT ACCEPTED U j P IFF LOGG=0 U P CF A5,LOGIN U P* U " P* STORE FIRST WORD IN FIELD1 U P* U P LD A7,TESTCF FIRST WORD
0x18ce60…18cff4 (1, 348) Dummy {f00=0x007e, f01=0x0190, f02=» U P XIF V PNFIRST EQU * V P STR A2,A4 STORE IN BUFFER V ( P ADK A4,2 INCREMENT POINTER V J P ADK A3,2 INCREMENT COUNTER V n * P CWK A3,RBUFL+RBUFL BUFFER OVERFLOW ? V P RF(L) READ NO V P* V P* BUFFER OVERFLOW V P* V P SUK
0x18cff4…18d188 Dummy {f00=0x007e, f01=0x018e, f02=» EQU * V & P CM TESTCF RESET FIRST WSORD TEST W P CF A5,SSTIN PERFORM SST W 8 P ADK A5,4 W X P LDR A7,A7 W j P ABR* A5 W | P EJECT W P* W P* W " P* PERFORM SST ON INPUT CHANNEL W P* W P* W PSSTIN EQU * W P SST A2,CHLC
0x18d188…18d31c Dummy {f00=0x007e, f01=0x018e, f02=» W x P ANK A1,2 X P RF(Z) SSTI10 X P* X 0 P* THROUGHPUT ERROR X : P* X T P RF SSTI20 X ^ PSSTI10 EQU * X p P LDR A1,A2 X 4 P ANK A1,/01 MASK CARRIER OFF AND MODEM NOT READY X P RF(Z) SSTI30 NOT PRESENT X . PSSTI15 OR A2,DCONOF MERG
0x18d31c…18d4b0 Dummy {f00=0x007e, f01=0x0190, f02=» P DATA SSTI16,1 Y P ABL TDISP Y PSSTI16 EQU * Y , P CF A15,LDREGI Y @ PSSTI20 EQU * Y V $ P LDK A7,1 INDICATE INVALID FRAME Y j P RTN A5 Y PSSTI30 EQU * Y P LDR A1,A2 Y P ANKL A1,/300C Y P RB(NZ) SSTI20 INVALID FRAME Y P LDK A
0x18d4b0…18d644 Dummy {f00=0x007e, f01=0x0190, f02=» A5 Y P EJECT Z P* Z P* Z $ P* OUTPUT INTERRUPT HANDLER Z . P* Z P P* Z Z PIH0702 EQU * Z d P CF A15,SAVE8 Z x P CF A15,LDREGO Z P LCR A2,A4 Z P SLL A2,8 Z & P LC A2,+1,A4 INIT OUTPUT REGISTER Z P OTR A2,0,CHLCUT SEND
0x18d644…18d7d8 Dummy {f00=0x007e, f01=0x0190, f02=»RECT FROM USER BUFFER Z x P* [ , P LD A7,SWITCH LOAD USE BUFFE ADD ESS [ ( P RF(Z) IHLCUX I-FRAME [ X " P LDR A4,A7 INIT FIRST PASSAGE [ v P CM SWITCH CLEAR INDICATOR [ PIHLCUX EQU * [ P ADK A4,2 INCREMENT POINTER [ P SUK A3,2 DECREMEN
0x18d7d8…18d96c Dummy {f00=0x007e, f01=0x0190, f02=»ON [ p P RF WRITE WAIT FOR SST P* ( P* CHECK SST 2 P* F PIHLCU1 EQU * P P SST A2,CHLCUT PERFORM SST d P RF(NA) IHLCU2 NOT ACCEPTED P IFF LOGG=0 P CF A5,LOGSST P XIF P LDR A1,A2 P RF(Z) IHLCU2 SST OK
0x18d96c…18db00 Dummy {f00=0x007e, f01=0x0190, f02=»U2 PIHLCU2 EQU * ] P RTN A5 ] P* ] . P* ] 8 P* READ FROM THE LINE ] B P* ] ^ P* ] h PREAD EQU * ] r " P CF A15,STREGI SAVE REGISTERS ] P RF WR100 ] P* ] P* ] P* WRITE ON THE LINE ] P* ] P* ] PWRITE EQ
0x18db00…18dc94 (1, 349) Dummy {f00=0x007e, f01=0x0190, f02=»REGISTER A3-A8 ] P* ^ P* ^ PSTREGI ST A3,LCI3 ^ * P ST A4,LCI4 ^ D P ST A5,LCI5 ^ X P ST A6,LCI6 ^ l P ST A7,LCI7 ^ P ST A8,LCI8 ^ PRTNA15 EQU * ^ P ADKL A15,4 ^ P ABR* A15 ^ P EJECT ^ P* ^ P* ^ " P* RE
0x18dc94…18de28 Dummy {f00=0x007e, f01=0x018e, f02=» LDKL A5,0 ^ PLCI5 EQU *-2 _ P LDKL A6,0 _ & PLCI6 EQU *-2 _ 8 P LDKL A7,0 _ L PLCI7 EQU *-2 _ ^ P LDKL A8,0 _ r PLCI8 EQU *-2 _ P RB RTNA15 _ P EJECT _ P* _ P* _ " P* STORE OUTPUT REGISTER A3-A8 _ P* _ P* _ PST
0x18de28…18dfbc Dummy {f00=0x007e, f01=0x0190, f02=» _ P EJECT ` P* ` P* ` $ P* RESTORE OUTPUT REGISTER A3-A8 ` * P* ` R P* ` PLDREGO LDKL A3,0 ` f PLCO3 EQU *-2 ` ~ P LDKL A4,0 ` PLCO4 EQU *-2 ` P LDKL A5,0 ` PLCO5 EQU *-2 ` P LDKL A6,0 ` PLCO6 EQU *-2 ` P LDK
0x18dfbc…18e150 Dummy {f00=0x007e, f01=0x0190, f02=»SUBTERMINAL ADDRESS AS GIVEN IN A2 ` z P* a * $ P* CALLING SEQUENCE: CF A5,FINTER a 4 P* A2=SUBTERMINAL ADDRESS a P* A1 DESTROYED a | " P* A3#0: DWT TO FOUND TERMINAL a P* a PFINTER EQU * a & P LD A1,DCTAB GET ADDRESS TO DC:TAB a * P AD* A1,
0x18e150…18e2e4 Dummy {f00=0x007e, f01=0x0190, f02=»INT20 SUBTERMINAL NOT FOUND a P LDR* A3,A1 LOAD DWT ADDRESS b $ , P CWR* A2,A3 COMPARE SUBTERMINAL ADDRESS b H & P RB(NE) FINT10 TAKE NEXT TERMINAL b x PFINT20 RTN A5 b P EJECT b P* b P* b P* POWER ON FUNCTIONS b P* b P* b $
0x18e2e4…18e478 Dummy {f00=0x007e, f01=0x0190, f02=» b " P CF A15,SPTIM START POLLTIMER c PDRDC15 EQU * c . " P LDKL A5,STBIN LOAD STACK BASE c B P LDK A1,CIDISC c h & P CIO A1,1,CHLCIN DISCONNECT MODEM c ~ P CF A5,READ c P LDK A1,CICMO CONNECT MODEM c P CIO A1,1,CHLCIN c $ P CF A5,READ WAIT
0x18e478…18e60c Dummy {f00=0x007e, f01=0x0190, f02=»BASE c p P LDK A2,/40 d ( P ST A2,DCONOF INDICATE POLL TIME OUT d * P CF A15,CKMESS CHECK IF STATUS CHANGE d L " P CF A15,SPTIM START POLLTIMER d z P ABL TDISP d P* d 4 P* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED d P* d $ PCPTIM CM D
0x18e60c…18e7a0 Dummy {f00=0x007e, f01=0x0190, f02=» RTN A5 d P* e P* START POLLTIMER e P* e 4 $ PSPTIM CF A15,SETIME START TIMER e > P DATA PTOUT,TIMPOL e f & P ST A4,DCTPGP STORE TI,ER POINTER e P ADKL A15,4 e P ABR* A15 e P EJECT e P* e P* e " P* DEVICE WORK TABLE FO
0x18e7a0…18e934 (1, 350) Dummy {f00=0x007e, f01=0x018e, f02=»B ADDRESS e P DATA 0 ORDER f * P DATA DC07DC POINTER TO ADDRESS BLOCK f ( P DATA 0 TTAB ADDRESS f V $ P DATA 0 WAIT/ACTIVATE INDICATOR f r P DATA 0 TASK QUEUE f P DATA 0 TIMER POINTER f ( P DATA 0 WRITE QUEUE OR BUFFER QUEUE f P DATA 0 BU
0x18e934…18eac8 Dummy {f00=0x007e, f01=0x018e, f02=» P* g P* g PRLINK EQU RBUFL+RBUFL+8 g P* g 8 P* g B PDCRBUF EQU * g L P DATA *+2 FREE BUFFER ANCHOR g ` P IFT RBUFNR=14 g P DATA *+RLINK g P RES RBUFL+3 g P DATA *+RLINK g P RES RBUFL+3 g P DATA *+RLINK g P RES
0x18eac8…18ec5c Dummy {f00=0x007e, f01=0x0190, f02=» g P DATA *+RLINK h P RES RBUFL+3 h P DATA *+RLINK h 2 P RES RBUFL+3 h H P DATA *+RLINK h P RES RBUFL+3 h r P DATA *+RLINK h P RES RBUFL+3 h P DATA *+RLINK h P RES RBUFL+3 h P DATA *+RLINK h P RES RBUFL+3 h P XIF
0x18ec5c…18edf0 Dummy {f00=0x007e, f01=0x0190, f02=» RES RBUFL+3 h P DATA *+RLINK i P RES RBUFL+3 i * P DATA *+RLINK i > P RES RBUFL+3 i T P DATA *+RLINK i h P RES RBUFL+3 i ~ P DATA *+RLINK i P RES RBUFL+3 i P DATA *+RLINK i P RES RBUFL+3 i P DATA *+RLINK i P RES RBUFL+3
0x18edf0…18ef84 Dummy {f00=0x007e, f01=0x0190, f02=»INK i P RES RBUFL+3 j P DATA *+RLINK j P RES RBUFL+3 j 6 P DATA *+RLINK j J P RES RBUFL+3 j ` P DATA *+RLINK j t P RES RBUFL+3 j P DATA *+RLINK j P RES RBUFL+3 j P DATA *+RLINK j P RES RBUFL+3 j P DATA *+RLINK j P
0x18ef84…18f118 Dummy {f00=0x007e, f01=0x018e, f02=»+3 j P XIF k P IFT RBUFNR=11 k P DATA *+RLINK k , P RES RBUFL+3 k B P DATA *+RLINK k V P RES RBUFL+3 k l P DATA *+RLINK k P RES RBUFL+3 k P DATA *+RLINK k P RES RBUFL+3 k P DATA *+RLINK k P RES RBUFL+3 k P DATA *+RL
0x18f118…18f2ac Dummy {f00=0x007e, f01=0x018e, f02=» P RES RBUFL+3 l P XIF l P IFT RBUFNR=10 l $ P DATA *+RLINK l : P RES RBUFL+3 l P P DATA *+RLINK l d P RES RBUFL+3 l z P DATA *+RLINK l P RES RBUFL+3 l P DATA *+RLINK l P RES RBUFL+3 l P DATA *+RLINK l P RES RBUFL+3 l
0x18f2ac…18f440 Dummy {f00=0x007e, f01=0x0190, f02=» l P IFT RBUFNR=9 m P DATA *+RLINK m P RES RBUFL+3 m 4 P DATA *+RLINK m H P RES RBUFL+3 m ^ P DATA *+RLINK m r P RES RBUFL+3 m P DATA *+RLINK m P RES RBUFL+3 m P DATA *+RLINK m P RES RBUFL+3 m P DATA *+RLINK m P R
0x18f440…18f5d4 (1, 351) Dummy {f00=0x007e, f01=0x0190, f02=» DATA *+RLINK m P RES RBUFL+3 n P DATA *+RLINK n * P RES RBUFL+3 n @ P DATA *+RLINK n T P RES RBUFL+3 n j P DATA *+RLINK n ~ P RES RBUFL+3 n P DATA *+RLINK n P RES RBUFL+3 n P XIF n P IFT RBUFNR=7 n P DATA *+RLINK n
0x18f5d4…18f768 Dummy {f00=0x007e, f01=0x0190, f02=»FL+3 n P DATA *+RLINK o P RES RBUFL+3 o " P XIF o 6 P IFT RBUFNR=6 o B P DATA *+RLINK o X P RES RBUFL+3 o n P DATA *+RLINK o P RES RBUFL+3 o P DATA *+RLINK o P RES RBUFL+3 o P DATA *+RLINK o P RES RBUFL+3 o P XIF o
0x18f768…18f8fc Dummy {f00=0x007e, f01=0x0190, f02=» RBUFL+3 o P XIF p P IFT RBUFNR=4 p P DATA *+RLINK p 2 P RES RBUFL+3 p H P DATA *+RLINK p P RES RBUFL+3 p r P XIF p P IFT RBUFNR=3 p P DATA *+RLINK p P RES RBUFL+3 p P XIF p P DATA *+RLINK p P RES RBUFL+3 p P
0x18f8fc…18fa90 Dummy {f00=0x007e, f01=0x0190, f02=»TBUF EQU * p P* q P* q P IFF TBUFL=0 q & , P DATA BUF3 POINTER TO FIRST FREE BUFFER q : . PBUF3 DATA BUF4 POINTER TO NEXT FREE BUFFER q j P RES TBUFL BUFFER AREA 3 q PBUF4 DATA 0 END OF CHAIN q P RES TBUFL BUFFER AREA 4 q P XIF q P
0x18fa90…18fc24 Dummy {f00=0x007e, f01=0x0190, f02=» q | P EJECT r P* r P* r P* INTERRUPT LOGGING ROUTINE r * P* r N P* r X P IFF LOGG=0 r b PLOGSST EQU * r v P LDKL A1,/5555 r P RF LOG10 r PLOGOUT EQU * r P LDK A1,0 r P RF LOG10 r PLOGIN EQU * r P LDKL A1,/
0x18fc24…18fdb8 Dummy {f00=0x007e, f01=0x0190, f02=»DK A3,2 r P CWK A3,LOGEND s P RF(L) LOGEXI s & P LDKL A3,LOGSTA s < PLOGEXI ST A3,LOGPNT s T P LD A2,SAVE2 s p P LD A3,SAVE3 s PLOGE10 RTN A5 s P EJECT s P* s P* s PLOGPNT DATA LOGSTA s PLOGSTA EQU * s P RES 400 s
0x18fdb8…18ff4c Dummy {f00=0x007e, f01=0x411c, f02=» s P*** DC-TAB AREA t P* t P* t * & PDC:IN DATA DC:TAB+2 INSERT POINTER t 4 " PDCTAB DATA DC:TAB ENTRY POINT t ^ * PDC:TAB DATA 2 DC-TAB'S VARIABLE LENGTH t * P DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 t PDC:END EQU * END OF TABLE t P* t
0x18ff4c…1900e0 Dummy {f00=0x007e, f01=0x2008, f02=» u PLOGEND EQU *-4 J PSAVE2 DATA 0 J $ PSAVE3 DATA 0 J 8 P XIF J L P* J X P* J b P* J l P END J v@ J I | P ADK A3,2 I P CWK A3,LOGEND I P RF(L) LOGEXI I P LDKL A3,LOGSTA I PLOGEXI ST A3,LOGPNT I P LD A2,S
0x1900e0…190274 (1, 352) Dummy {f00=0x007f, f01=0x018e, f02=»MER POINTER u ~ $ P DATA 0 PROCEDURE TIMER POINTER v ( P DATA 0 MODEM TRANSMIT TIMER POINTER v < $ P RES 5 SAVE AREA FOR A3-A5,A7,A8 v h P DATA 0 PROCEDURE STATUS v P DATA 0 RESPONSE STATUS v P DATA 0 ENQ COUNTER v $ P DATA 0 ACK TO BE SENT/RECEI
0x190274…190408 Dummy {f00=0x007f, f01=0x0190, f02=» P OTR A2,0,DAMU04 w P SST A2,DAMI04 w P SST A2,DAMU04 w 2 P CIO A2,1,DAMI04 w H P CIO A2,1,DAMU04 w ` P CIO A2,0,DAMI04 w x P CIO A2,0,DAMU04 w P**LOGG w P IFF LOGG=0 w P DATA LGST04 w PLGST04 EQU * w P RES LOGG w P DAT
0x190408…19059c Dummy {f00=0x007f, f01=0x0190, f02=» w PDW1704 EQU * x P IFF NLINE=3 x PDW1703 EQU * x 0 P IFF NLINE=2 x D PDW1702 EQU * x X P XIF x l P DATA 0 DUMMY DWT x x P DATA 0 STATUS BUSY x P EJECT x P* x P* x P* INTERRUPT LOGGING ROUTINE x P* x P* LOG LABE
0x19059c…190730 Dummy {f00=0x007f, f01=0x0190, f02=»TPUT STATUS MARKED /0F - NOT USED x P* y , P IFF LOGG=0 y 6 PLOGSST ST A2,SAVE2,A6 y J P ORKL A2,/1F00 y h P RF LOG10 y ~ PLOGOUT ST A2,SAVE2,A6 y P ORKL A2,/0000 y P RF LOG10 y PLOGIN CWK A2,/FF y P RF(E) LOGE10 y P ST
0x190730…1908c4 Dummy {f00=0x007f, f01=0x4104, f02=»3,A6 y P CWK A3,LOGEND z P RF(L) LOGEXI z " P LDKL A3,LOGSTA z 8 PLOGEXI EQU * z P P ADR A3,A6 z d P ST A3,LOGPNT,A6 z v P LD A2,SAVE2,A6 z P LD A3,SAVE3,A6 z PLOGE10 RTN A5 z P XIF z P* z P* z P END z @ z ST
0x1908c4…190a58 Dummy {f00=0x007f, f01=0x2008, f02=» { 0 8 @ x @
0x190a58…190bec Dummy {f00=0x007f, f01=0x0190, f02=»1 [ ( P ORS A1,DWTST,A6 INDICATE LINE OPEN P ORS A1,DWTST,A7 6 P LD A1,DWTATP,A6 N ( P RF(NZ) OLI120 RECOVERY AT POWER ON f P LDK A1,0 P IFT RQLOGG=1 P CF A15,REQLOG P XIF $ P CF A15,TENDIO COMPLETE REQUEST POLI1
0x190bec…190d80 Dummy {f00=0x007f, f01=0x0190, f02=» r P LDKL A3,200 ] . P ORS A3,DWTST,A7 INDICATE WAITING FOR CALL ] P RB RD300 ] N POLI130 EQU * ] ` P LDR A1,A6 ] t P LDR A4,A6 ] P ADK A4,DWTATP ] P LDR* A2,A4 ] & P ABL(NZ) BMM RECOVERY AT POWER ON ] & P CF A15,SETIMP SET ACTIVITY
0x190d80…190f14 (1, 353) Opaque[0x194]
0x190f14…1910a8 # DirEnt {nam=»MOXTAB«, typ=»SC«, f00=0x434b, f01=0x204e, f02=0x0fe8, f03=0x203d}
0x190f14…1910a8 IdxSect {
0x190f14…1910a8 f00 = 0x007f // 0x190f14 @0x0
0x190f14…1910a8 f01 = 0x0002 // 0x190f16 @0x2
0x190f14…1910a8 gno = [ // 0x190f18 @0x4
0x190f14…1910a8 [0x00]: C0x007f.0x1.0
0x190f14…1910a8 ]
0x190f14…1910a8 }
0x1910a8…19123c Dummy {f00=0x007f, f01=0x0190, f02=» 2 P IDENT MOXTAB REL 8.2 78-09-15 870105040820 P : P* B 6 P* THIS TABLE CONTAINS ADDRESSES TO CONFIGURATION L P* DEPENDENT MONITOR TABLES P* P* P ENTRY MONTAB P ENTRY TCTAB,CDTAB,BLOCKS P* P ENTRY I
0x19123c…1913d0 Dummy {f00=0x007f, f01=0x018e, f02=»3 P ENTRY INTRT4 P* P EXTRN MONCON * P EXTRN KBAD3 @ P EXTRN KBAD T P EXTRN TPAD h P EXTRN GPAD | P EXTRN DNAD P EXTRN DIAD P EXTRN DYAD P* P* P EXTRN CGAD P EXTRN CDAD P
0x1913d0…191564 Dummy {f00=0x007f, f01=0x0190, f02=» P* PINTLT1 DATA 0 PINTLT2 DATA 0 ( PINTLT3 DATA 0 > PINTLT4 DATA 0 T PINTRT1 DATA 0 j PINTRT2 DATA 0 PINTRT3 DATA 0 PINTRT4 DATA 0 P DATA MONCON P DATA KBAD3 P DATA KBAD P DATA TPAD
0x191564…1916f8 Dummy {f00=0x007f, f01=0x4046, f02=»ATA MSAD P DATA ODAD P DATA TPAD3 " P END 6@ BATA 0 > PINTLT4 DATA 0 T PINTRT1 DATA 0 j PINTRT2 DATA 0 PINTRT3 DATA 0 PINTRT4 DATA 0 P DATA MONCON P DATA KBAD3 P DATA KBAD P DATA TPAD
0x1916f8…19188c Dummy {f00=0x007f, f01=0x2008, f02=» DATA DYAD P* P* $ P END .@ : DYAD 8 P* L P* V P* ` PMONTAB EQU * j PTCTAB DATA 0 ~ PCDTAB DATA 0 PBLOCKS DATA 0 PDCTAB DATA 0 PINTLT1 DATA 0 PINTLT2 DATA 0 PINTRT1 DATA
0x19188c…191a20 Dummy {f00=0x007f, f01=0x4186, f02=» + - T H D ! @ 5P CT OP WWv ]P cR iPd mW` sQ y T T P: T W0 P* H D ! T W& P" T W T P P< WH P R< T P T %W ) H D ! 1 ` 9R C b uW }T PX Q P PD P R T R T R P H D !@ %PN ) /P ;R
0x191a20…191bb4 (1, 354) Opaque[0x194]
0x191bb4…191d48 # DirEnt {nam=»TCLASS«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x0ff0, f03=0x2020}
0x191bb4…191d48 IdxSect {
0x191bb4…191d48 f00 = 0x007f // 0x191bb4 @0x0
0x191bb4…191d48 f01 = 0x0002 // 0x191bb6 @0x2
0x191bb4…191d48 gno = [ // 0x191bb8 @0x4
0x191bb4…191d48 [0x00]: C0x007f.0x2.0
0x191bb4…191d48 ]
0x191bb4…191d48 }
0x191d48…191edc Dummy {f00=0x007f, f01=0x40ea, f02=» 2 P IDENT TCLASS REL 8.2 78-09-15 870105040820 P* : P* D P* N P ENTRY TCLASS X P* n P* x P* P* P* P* PTCLASS DATA TCLASE-* PTCLASE EQU * P END @
0x191edc…192070 Dummy {f00=0x007f, f01=0x2008, f02=» NT TCLASS * * $ * . ENTRY TCLASS 8 * N * X * b * l * v * * TCLASS DATALTCLASE-* TCLASE EQU * END @ 1 INTLT2 INTRT1
0x192070…192204 Dummy {f00=0x007f, f01=0x0190, f02=» A n P RF(NZ) BIO035 READ! B P SUK A1,128 B $ " P RF(Z) BIO100 REQ LEN ACCEPTED B 8 P RF BIO045 B ^ P* B p PBIO035 SUK A1,128 B z & P RF(NP) BIO100 REQ LENGTH ACCEPTED B PBIO045 ADK A2,1 B P CWK A2,3 B P RB(NG) BIO015 B $ P RF BIOERR
0x192204…192398 Dummy {f00=0x007f, f01=0x0190, f02=»NO FROM CONTROL WORD OF ECB IS B ( P* WITHIN RANGE, PUT IT IN POS 2-12 C & P* C R P LD A1,ECBCW,A8 SECTOR NO C P RF(N) BIOER2 OUTSIDE RANGE C ~ P IFT DAMA+IBM=2 C P ANK A7,/A C P RF(Z) BIO110 IBM DISC C P XIF C P IFT DAMA=1 C
0x192398…19252c Dummy {f00=0x007f, f01=0x0190, f02=» P RF BIO120 D P XIF D P IFT IBM=1 D " PBIO110 CWK A1,1923 D 4 P RF(P) BIOER2 OUT OF RANGE D N P XIF D p P IFT DAMA+IBM=0 D | ( P CWK A1,2001 SECTOR NO OUT OF RANGE D P RF(G) BIOER2 YES! D P XIF D PBIO120 EQU * D P SLL A1,3 D
0x19252c…1926c0 Dummy {f00=0x007f, f01=0x018e, f02=»EVEN D t P RTN A5 E P* E P* E & 2 P* ILLEGAL REQUESTED LENGTH, RETURN VIA TENDIO E 0 P* E f PBIOERR ABL END:10 E p P* ILLEGAL SECTOR NO E PBIOER2 ABL FD:DIS E P* E P********* E P* * E P* FDIX * E P*
0x1926c0…192854 (1, 355) Opaque[0x194]
0x192854…1929e8 # DirEnt {nam=»ECLASS«, typ=»SC«, f00=0x1e12, f01=0x5400, f02=0x0ff8, f03=0x948c}
0x192854…1929e8 IdxSect {
0x192854…1929e8 f00 = 0x007f // 0x192854 @0x0
0x192854…1929e8 f01 = 0x0002 // 0x192856 @0x2
0x192854…1929e8 gno = [ // 0x192858 @0x4
0x192854…1929e8 [0x00]: C0x007f.0x3.0
0x192854…1929e8 ]
0x192854…1929e8 }
0x1929e8…192b7c Dummy {f00=0x007f, f01=0x40ea, f02=» 2 P IDENT ECLASS REL 8.2 78-09-15 870105040820 P* : P* D P* N P ENTRY ECLASS X P* n P* x P* P* P* P* PECLASS DATA TCLASE-* PTCLASE EQU * P END @
0x192b7c…192d10 Dummy {f00=0x007f, f01=0x2008, f02=» NT TCLASS * * $ * . ENTRY TCLASS 8 * N * X * b * l * v * * TCLASS DATALTCLASE-* TCLASE EQU * END @ 1 INTLT2 INTRT1
0x192d10…192ea4 Dummy {f00=0x007f, f01=0x018e, f02=» Q P ORS A3,FD:CIO R P RTN A5 R P IFT IBM=1 R . P EJECT R @ P* R N P********** R X P* BINDEC * R j P********** R | P* R : P* FUNCTION: BINDEC TRANSFORMS A BINARY NUMBER TO TWO R 0 P* EBCDIC-CODED DIGITS (DECIMAL) R
0x192ea4…193038 Dummy {f00=0x007f, f01=0x0190, f02=» P* S PBINDEC LDK A3,0 S PBIN:10 SUK A7,10 S & P RF(N) BIN:20 S > P ADK A3,1 S T P RB BIN:10 S f PBIN:20 ADK A7,10 S x P SLL A3,8 S * P ORR A3,A7 DECIMAL CONVERTED NO IN A3 S P ORKL A3,/F0F0 EBCDIC CODED S P RTN A5 S P EJE
0x193038…1931cc Dummy {f00=0x007f, f01=0x018e, f02=» P* INPUT: A6 DWT ADDRESS T P* T & : P* OUTPUT: A2 BITS 0-12 SECTOR NO, BITS 13-15 ZEROES T 0 P* A3 128 T n ( P* A4 DRIVER BUFFER ADDRESS T P* A6 DWT ADDRESS T P* A1 IS CHANGED T P* T PDSLI
0x1931cc…193360 Dummy {f00=0x007f, f01=0x018e, f02=» P EJECT U P* U P********** U P* DSOPCH * U . P********** U @ P* U R 6 P* FUNCTION: GET EOD-NO AND EOD-NO ADDRESS IN DWT U P* U P* INPUT: A6 DWT ADDRESS U P* U P* OUTPUT: A2 EOD ADDRESS U , P* A7 EOD-NO
0x193360…1934f4 (1, 356) Opaque[0x194]
0x1934f4…193688 # DirEnt {nam=»SCLASS«, typ=»SC«, f00=0x8226, f01=0x3ae1, f02=0x1000, f03=0x0002}
0x1934f4…193688 IdxSect {
0x1934f4…193688 f00 = 0x0080 // 0x1934f4 @0x0
0x1934f4…193688 f01 = 0x0002 // 0x1934f6 @0x2
0x1934f4…193688 gno = [ // 0x1934f8 @0x4
0x1934f4…193688 [0x00]: C0x0080.0x0.0
0x1934f4…193688 ]
0x1934f4…193688 }
0x193688…19381c Dummy {f00=0x0080, f01=0x40ea, f02=» 2 P IDENT SCLASS REL 8.2 78-09-15 870105040820 P* : P* D P* N P ENTRY SCLASS X P* n P* x P* P* P* P* PSCLASS DATA TCLASE-* PTCLASE EQU * P END @
0x19381c…1939b0 Dummy {f00=0x0080, f01=0x2008, f02=» NT TCLASS * * $ * . ENTRY TCLASS 8 * N * X * b * l * v * * TCLASS DATALTCLASE-* TCLASE EQU * END @ 1 INTLT2 INTRT1
0x1939b0…193b44 Dummy {f00=0x0080, f01=0x0190, f02=»WTBUF BUFFER ADDRESS Q " P* STATISTIC COUNTERS FOR WRITE R P DATA 0 DWTWBM BOT MISSING R D ( P DATA 0 DWTWIL ILLEGAL STATUS /0841 R f . P DATA 0 DWTWSE SEQ ERROR = POS ERROR /0010 R 6 P DATA 0 DWTWRE RETRY ERROR = NORM DATA ERROR /0004 R * P DATA 0,0
0x193b44…193cd8 Dummy {f00=0x0080, f01=0x0190, f02=» R v ( P DATA 0 DWTRIL ILLEGAL STATUS /0841 S . P DATA 0,0 DWTRSE SEQ ERROR /0010 (32 BITS) S 4 8 P DATA 0 DWTRRE RETRY ERROR = NORMAL DATA ERROR /000E S f * P DATA 0,0 DWTROK READING OK (32 BITS) S 6 P* STATISTIC COUNTERS FOR CONTROL READ (READ MATS) S
0x193cd8…193e6c Dummy {f00=0x0080, f01=0x0190, f02=»ERROR (NO RETRY PERF) /000E S | 2 P DATA 0,0 DWTMOK CONTROL READING OK (32 BITS) T $ P* POS COUNTER T Z , P DATA 0 DWTREP POS ONE MORE TRY COUNTER T p P* STATISTIC COUNTERS FOR POS T & P DATA 0 DWTPND NO DATA = PPOS ERR T ( P DATA 0 DWTPBM BOT MISSING
0x193e6c…194000 Dummy {f00=0x0080, f01=0x0190, f02=»TM = 2 TRIES T x . P DATA 0 DWTPIS PREV=ILL SEQ NO = 2 TRIES U . P DATA 0 DWTPIE PREV =ILL DAT ERR = 2 TRIES U F & P DATA 0 DWTPDB ERROR AFTER 2 TRIES U x P* U & P DATA 0 DWTTMK TAPE MARK INDICATOR U P* U $ P* STATISTIC COUNTERS FOR CHANGER U " P
0x194000…194194 (1, 357) Opaque[0x194]
0x194194…194328 # DirEnt {nam=»DRTP02«, typ=»SC«, f00=0x5600, f01=0x1908, f02=0x1008, f03=0x1502}
0x194194…194328 IdxSect {
0x194194…194328 f00 = 0x0080 // 0x194194 @0x0
0x194194…194328 f01 = 0x0010 // 0x194196 @0x2
0x194194…194328 gno = [ // 0x194198 @0x4
0x194194…194328 [0x00]: C0x0080.0x1.0
0x194194…194328 [0x01]: C0x0080.0x2.0
0x194194…194328 [0x02]: C0x0080.0x3.0
0x194194…194328 [0x03]: C0x0081.0x0.0
0x194194…194328 [0x04]: C0x0081.0x1.0
0x194194…194328 [0x05]: C0x0081.0x2.0
0x194194…194328 [0x06]: C0x0081.0x3.0
0x194194…194328 [0x07]: C0x0082.0x0.0
0x194194…194328 ]
0x194194…194328 }
0x194328…1944bc Dummy {f00=0x0080, f01=0x0190, f02=» 2 P IDENT DRTP02 REL 8.2 78-09-15 870105040820 P : P* B < P******************************************************* L < P* * < P* PHILIPS TERMINAL SYSTEM PTS *
0x1944bc…194650 Dummy {f00=0x0080, f01=0x0190, f02=» * < P* * < P* | P* P* < P* * < P**********************************************
0x194650…1947e4 Dummy {f00=0x0080, f01=0x018e, f02=» OR CHRT f P* P* 4 P* THIS DRIVER CONSISTS OF THE FOLLOWING PARTS: $ P* $ P* A C T P : ACTIVATION PART f P* & P* I H T P : INTERRUPT HANDLER P* $ P* R C T P : RECOVERY ROUTINE P* P* 6 P
0x1947e4…194978 Dummy {f00=0x0080, f01=0x0190, f02=» P* 6 P* B C D T B Y : CONVERT TO BINARY FROM DECIMAL P* H D P* B U F C H R : SEND THE NUMBER OF CHARACTERS GIVEN IN FIRST R $ P* CHARACTER IN OUTPUT BUFFER P* . P* G R A S P : SEND GRASP TO VOUCHER P* 4 P
0x194978…194b0c Dummy {f00=0x0080, f01=0x0190, f02=»* ORDER 00 : TEST STATUS P* ORDER 06 : WRITE ( 0 P* ORDER 0B : POSITION LIFT AND WRITE J $ P* ORDER 22 : CUT JOURNAL ~ * P* ORDER 26 : PERFORATE JOURNAL . P* ORDER 37 : GRASP VOUCHER/PASSBOOK 0 P*
0x194b0c…194ca0 Dummy {f00=0x0080, f01=0x0190, f02=» REQUEST ERROR ~ 4 P* BIT 8 : RECOVERY EXECUTED ON REQUEST 8 P* BIT 10 : END OF JOURNAL TAPE, VOUCHER OUT P ( P* BIT 13 : CODE CHECK ERROR $ P* BIT 15 : NOT OPERABLE P* P* P* P* NORMAL
0x194ca0…194e34 (1, 358) Dummy {f00=0x0080, f01=0x0190, f02=»INTER v $ P* A4: OUTPUT COUNTER " P* A5: STACK POINTER 6 P* A6: DWT-ADDRESS P* A7: ORDER P* A8: ECB-ADDRESS P* P* P* P* P* SYSTEM ADAPTATION: P
0x194e34…194fc8 Dummy {f00=0x0080, f01=0x0190, f02=»ET IF RECOVERY IS EXECUTED ON REQUEST | 4 P* CUT/PERFORATE JOURNAL TAPE (PTS 6221,6222) . 0 P* ACCAPTANCE OF SPECIAL CHARACTER /13,/14 f H P* COMPLETION OF REQUEST AT 'VOUCHER OUT' BEFORE MESSAGE IS WRITTEN P* P* @ P* THE CHARAC
0x194fc8…19515c Dummy {f00=0x0080, f01=0x0190, f02=» P EJECT P* P*********** P* ENTRIES * 0 P*********** D P* X P* b P ENTRY TPAD ADDRESS BLOCK l P* P* P* P************* P* EXTERNALS * P************* P* P* , P EXTRN
0x19515c…1952f0 Dummy {f00=0x0080, f01=0x0190, f02=»O END I/O & P EXTRN OUTPUT OUTPUT ONE CHARACTER " P EXTRN LDREG RESTORE REGISTERS < 8 P EXTRN STREG STORE REGISTERS AND WAIT FOR INTERRUPT b P EXTRN SAVE8 SAVE REG. A1-A8 P* P* P* . P* DISPLACMENT IN DEVICE WORK TABLE D
0x1952f0…195484 Dummy {f00=0x0080, f01=0x0190, f02=»************** P* CONDITIONAL ASSEMBLY * P************************ 6 P* V P* ` < P* WHEN RECOVERY EXECUTED ON REQUEST RETURN CODE IS SET j P* BY SETTING X:A = 1 P* P* PX:A EQU 0 PRECOV EQU X:A P*
0x195484…195618 Dummy {f00=0x0080, f01=0x0190, f02=» PCUTPER EQU X:B P* P* ( B P* SPECIAL CHARACTER /13, /14 IS ACCEPTED BY SETTING X:C = 1 2 P* AND X:D = 1 RESPECTIVLY x P* P* PX:C EQU 0 PCHR13 EQU X:C P* P* PX:D EQU 0 PCHR14 EQU
0x195618…1957ac Dummy {f00=0x0080, f01=0x0190, f02=»= 1 ^ P* P* PX:E EQU 0 PCOMPL EQU X:E 2 P EJECT H P* V P* ` > P* IN SITUATIONS WHERE PRINTER HARDWARE OR SELECTOR UNIT j < P* IS INACTIVE,END OF REQUEST MAY BE CHOSEN BY SETTING > P* THE CONSTANT RELEND=1. R
0x1957ac…195940 Dummy {f00=0x0080, f01=0x0190, f02=» SPEED IN THE SHB-PROJECT FOR t < P* LOCAL PRINTERS THE CONSTANT SHBDUM CAN BE SET TO 1. & ( P* NOT ALLOWED FOR REMOTE PRINTERS. f P* PX:H EQU 0 PSHBDUM EQU X:H P EJECT P* P* P************* P* CONSTANTS
0x195940…195ad4 (1, 359) Dummy {f00=0x0080, f01=0x0190, f02=»JOURNAL TAPE n P* P* 0 PVOIN EQU /8 'VOUCHER IN' BIT IN DATA-REQUEST ( 2 PEOJT EQU /4 'END OF JOURNAL' BIT IN DATA-REQ. @ PVOCHA EQU /200 BIT #6 DWTTST;VOUCHER STATUS CH. NOT ALLOWED 4 PMESS EQU /400 BIT #5 DWTTST;TEST MESSAGE WRITTEN
0x195ad4…195c68 Dummy {f00=0x0080, f01=0x0190, f02=»1 RESET PRINT BUFFER REMOTE * PTAB EQU /11 TABULATION CHAR IN BUFFER $ PCR1 EQU /0D CR JOURNAL TAPE R PLF1 EQU /18 LF JOURNAL TAPE v . PCR2 EQU /09 CR TALLY ROLL,VOUCHER/PASSBOOK PLF2 EQU /19 LF TALLY ROLL $ PLDO EQU /0B LIFT DOWN 1 PO
0x195c68…195dfc Dummy {f00=0x0080, f01=0x0190, f02=»PASSBOOK f ( PREL EQU /1B RELEASE VOUCHER/PASSBOOK " PAPH EQU /1D ATTACH PRINT HEAD < " PRPH EQU /1E RETURN PRINT HEAD b 4 PTETX EQU /83 LAST DUMMY AFTER GRASP AND RELEASE P* P* P********************* P* DWT-DISPLACEMENTS *
0x195dfc…195f90 Dummy {f00=0x0080, f01=0x0190, f02=»STED LINE NUMBER | & PDWTALN EQU /23 ACTUAL LINE NUMBER P* B P* L P********************* V P* ECB-DISPLACEMENTS * t P********************* P* & PECBBA EQU 2 BUFFER ADDRESS IN ECB ( PECBRL EQU 4 REQUESTED LENGTH IN ECB
0x195f90…196124 Dummy {f00=0x0080, f01=0x0190, f02=» P* P*********** P* BUFFERS * & P*********** : P* N P* X & PBUF1 DATA /0382,/0D1D STX,CR1,APH b P IFT CUTPER=0 PBUF2 DATA /0382 STX P XIF P IFT CUTPER=1 PBUF2 DATA /0482 STX P XIF $ P
0x196124…1962b8 Dummy {f00=0x0080, f01=0x018e, f02=» P* P********** P* TABLES * P********** 2 P* D P* N PTPAD EQU * ADDRESS BLOCK X P DATA ACTP ACTIVATIONDRIVER x P DATA IHTP INTERRUPTHANDLER P DATA RCTP RECOVERY ROUTINE P* $ P* TABLE TO GET ROOMLESS
0x1962b8…19644c Dummy {f00=0x0080, f01=0x0190, f02=» j P* P* PLFTAB EQU * , P DATA /1819 LINE FEED JOURNAL/TALLY ROLL 0 P* ` P* j P IFT CUTPER=1 t : PCPTAB DATA /1F0F CODES FOR PERFORATE/CUT JOURNAL TAPE P XIF PTPTAB EQU * ORDER TABLE P DATA /0002,/0607,/0
0x19644c…1965e0 Dummy {f00=0x0080, f01=0x0190, f02=»* P* A C T P P* 2 P* THIS IS THE ACTIVATION PART OF THE DRIVER ( > P* CHECKS VALIDITY OF ORDERS AND JUMPS TO ORDER PROCESSOR ^ P* P* P* PACTP EQU * ACTIVATION ENTRY P* P* < P* GET DWT INDEX:
0x1965e0…196774 (1, 360) Dummy {f00=0x0081, f01=0x0190, f02=»DER r , P SC A7,DWTOR+1,A6 SAVE NEW ORDER IN DWT P LDK A4,0 ACTIVATION < PACT005 LDK A3,TPLEN-1 X 2 PACT010 CC A7,TPTAB,A3 FIND OUT IF LEGAL ORDER v P RF(E) ACT020 VALID ORDER P SUK A3,1 P RB(NN) ACT010 TRY NEXT P*
0x196774…196908 Dummy {f00=0x0081, f01=0x0190, f02=»EX ~ P ABI TPFUC,A3 EXECUTE ORDER 6 PTPFUC DATA TPDUMY,TPDUMY,TP200,TP405,ACT055,ACT050 . P IFT CUTPER=1 h P DATA TP700,TP750 ~ P XIF P DATA TP800,TP900 P EJECT P* P* , P* ORDER 06,0B: WRITE VOUCHER/PASSBOOK
0x196908…196a9c Dummy {f00=0x0081, f01=0x018e, f02=»UMBER FROM CONTROL WORD IN ECB p P RF ACT085 & P* 8 , PACT055 LD A3,ECBBA,A8 GET BUFFER ADDRESS B & P LC A3,1,A3 GET CONTROL CHARACTER r $ P ANK A3,/FF REQUESTED LINE STEPS P SUK A3,/39 P RF(G) ACT070 > /39 = ONE LF P ADK A3,/9
0x196a9c…196c30 Dummy {f00=0x0081, f01=0x0190, f02=» P RF(Z) TP605 /2B = NO LF PACT070 LDK A3,1 ONE LF $ 4 PACT080 LC A1,DWTRLN,A6 GET LINE NUMBER FROM DWT B * P SUR A1,A3 GET REQUESTED LINE POSITION z 2 PACT085 RF(NN) ACT090 LINE POSITION LESS ZERO ? * P LDK A1,0 YES; SET LINE POSITION ZERO
0x196c30…196dc4 Dummy {f00=0x0081, f01=0x018e, f02=»5 P EJECT P* P* " P* , P* ORDER 06 : PRINT JOURNAL 6 P* Z P* d P* n * PTP200 LDKL A3,BUF1 SEND CR1 AND ATTACH x PTP210 EQU * 0 P LC A1,DWTST,A6 GET LEFT BYTE IN STATUS WORD $ P ANK A1,4 TEXT MESSAGE WRI
0x196dc4…196f58 Dummy {f00=0x0081, f01=0x0190, f02=» n & P RF(N) TP230 YES; COMPLETE REQUEST P RF(P) TP215 2 P LD A1,2,A8 BUFFER ADDRESS F P LC A2,2,A1 THIRD CHARACTER h $ P CCK A2,/2020 CONTROL CHARACTER P RF(NL) TP215 P CF A5,OUTPUT P RF TP220 PTP215 EQU * P C
0x196f58…1970ec Dummy {f00=0x0081, f01=0x0190, f02=»STATUS CHANGE ALLOWED t P ANS A2,DWTST,A6 P EJECT 6 P* D P* N P* ECB-BUFFER IS WRITTEN X P* z * P* SEND LINE FEED IF JOURNAL OR TALLY P* P* PTPLF EQU * P LDR A1,A1 P RF(NE) TPLF10 " P LDK A2,
0x1970ec…197280 Dummy {f00=0x0081, f01=0x0190, f02=»T,A6 P XIF PTPLF10 EQU * P SUK A7,8 , ( P RF(NN) TPL010 NOT JOURNAL AND TALLY > P ADK A7,2 GET INDEX TABLE j $ P LC A2,LFTAB,A7 GET LF CHARACTER P CF A5,OUTPUT SEND LF CHAR. . PTPL010 LD A1,ECBRL,A8 GET REQUESTED LENGTH *
0x197280…197414 (1, 361) Dummy {f00=0x0081, f01=0x0190, f02=» SEND LAST DUMMY CHARACTER P* $ PTPDUMY EQU * . P LDK A2,ETX B P CF A5,OUTPUT V P EJECT l P* z P* 0 P* CHECK STATUS AFTER LAST DUMMY CHARACTER P* PTPTST EQU * . P SUK A7,2 TEST STATUS : VOUCHER/PASSBOOK
0x197414…1975a8 Dummy {f00=0x0081, f01=0x0190, f02=»10 SUK A7,4 P IFT CUTPER=0 * P RF(G) ENDIO NOT TEST STATUS, JOURNAL * P XIF X P IFT CUTPER=1 d * P RF(G) TST020 NOT TEST STATUS, JOURNAL z PTST012 EQU * P XIF & P ANK A2,EOJT END OF JOURNAL TAPE? $ P RF(NZ) ENDIO NO: PERF
0x1975a8…19773c Dummy {f00=0x0081, f01=0x0190, f02=»M END I/O AND GO TO DISPATCHER P* & PENDIO EQU * 0 4 P ABL DISEND PERFORM END I/O AND GO TO DISPATCHER D P* | P* P* P* P IFT CUTPER=1 PTST020 SUK A7,16 " P RB(L) ENDIO VOUCHER/PASSBOOK P SUK A7,4
0x19773c…1978d0 Dummy {f00=0x0081, f01=0x0190, f02=» : PRINT TALLY ROLL P* ! P* ! & P* ! 0 ( PTP405 CF A5,RELEAS ERROR. VOUCHER IN ! : P* ! f * PTP407 LDKL A3,BUF3 SEND CR2 AND ATTACH ! p PTP410 EQU * ! P LDKL A1,VOCHA ! @ P ORS A1,DWTST,A6 INDICATE VOUCHER STATUS CHANGE NOT ALLOWED !
0x1978d0…197a64 Dummy {f00=0x0081, f01=0x0190, f02=» POSITION LIFT AND WRITE ! P* " P* " * $ PTP605 CF A5,GRASP GRASP VOUCHER " 4 P EJECT " P* " j P* " t * P* SEND ELEVATOR UP/DOWN UNTIL ACTUAL " ~ & P* LINE NUMBER IS EQUAL REQUESTED " P* " P* " . PTP610 CC A3,DWTRLN,A6 COMPARE
0x197a64…197bf8 Dummy {f00=0x0081, f01=0x0190, f02=»EMENT ACTUAL LINE NUMBER " P RF TP640 # & PTP630 LDK A2,LUP SEND ELEVATOR UP # 2 * P SUK A3,1 DECREMENT ACTUAL LINE NUMBER # P* # & PTP640 CF A5,OUTPUT SEND LIFT CHAR # P* # , P SC A3,DWTALN,A6 SAVE ACTUAL LINE NUMBER # P ANK A2,VOIN VOU
0x197bf8…197d8c Dummy {f00=0x0081, f01=0x018e, f02=» P IFT COMPL=1 $ 2 P RB(NZ) TP610 YES: CHECK IF LIFT IS POSITIONED $ $ PTP645 LDK A1,PROUT 'VOUCHER OUT' $ N , P ORS A1,ECBRC,A8 INDICATE IN RETURN CODE $ v P RB TPDUMY $ P XIF $ P EJECT $ P* $ P* $ , P* ORDER 06 AND 0B: LIFT IS POSIT
0x197d8c…197f20 Dummy {f00=0x0081, f01=0x018e, f02=» $ l P RB TP410 PRINT ECB-BUFFER % P EJECT % * P IFT CUTPER=1 % 8 P* % N 4 P* ORDER 22 AND 26 CUT AND PERFORATE JOURNAL % X P* % PTP700 EQU * % P LDK A1,1 SET INDEX % P RF TP760 % PTP750 EQU * % P LDK A1,0 SET INDEX %
0x197f20…1980b4 (1, 362) Dummy {f00=0x0081, f01=0x018e, f02=» % P XIF & P* & < P* ORDER 37 AND 38 GRASP AND RELEASE VOUCHER/PASSBOOK & P* & ^ PTP800 EQU * & h P CF A5,GRASPA & | P RB TPDUMY & PTP900 EQU * & P CF A5,RELEAS & P RB TPDUMY & P & P EJECT & P* & P* P R
0x1980b4…198248 Dummy {f00=0x0081, f01=0x0190, f02=» . PPRBUF LD A4,ECBRL,A8 GET REQUESTED LENGTH ' & P SUK A4,2 ADJUST REQUESTED LENGTH ' 6 " P LD A3,ECBBA,A8 BUFFER ADDRESS ' ` ( P* SKIP PRECEDING SPACES IN BUFFER ' P ADK A3,2 ' " PPRB010 LCR A1,A3 GET CHARACTER ' P CCK A1,/2020 ' P RF(NE)
0x198248…1983dc Dummy {f00=0x0081, f01=0x0190, f02=» (/09,/0D) LAST IN BUFFER ' p $ PPRB050 LDR A1,A3 GET ADDRESS TO ( " ( P ADR A1,A4 LAST CHARACTER IN BUFFER ( J P LC A1,-1,A1 GET CHAR ( v * P CCK A1,/0909 CARRIAGE RETURN - CR2 ? ( P RF(E) PRB060 YES ( * P CCK A1,/0D0D CARRIAGE RETURN - CR1 ? (
0x1983dc…198570 Dummy {f00=0x0081, f01=0x0190, f02=» ST A1,ECBEL,A8 SAVE CHAR. IN ECB ( P* ) * P* ) 4 . PPRB100 SUK A4,1 DECREMENT REQUESTED LENGTH ) > P RF(NN) PRB105 PRINT BUFFER ) p 6 P LD A2,ECBEL,A8 GET CARRIAGE RETURN CHAR (/09,/0D) ) P RF(E) PRB101 ) P CF A5,OUTPUT SEND CHAR ) PPRB1
0x198570…198704 Dummy {f00=0x0081, f01=0x0190, f02=»IT FOR WHOLE BUFFER TO BE PRINTED ) * P LDKL A1,MESS INDICATE MESSAGE PRINTED * * P ORS A1,DWTST,A6 * X P XIF * p PPRB102 RTN A5 * | P EJECT * P* * P* * P* * P* PRINT BUFFER * P* * P* * PPRB105 EQU * * 2 P ADR A3,A4
0x198704…198898 Dummy {f00=0x0081, f01=0x0190, f02=»R * v P EJECT + P* + P* + " P* + , P* PRINT TALLY ROLL + 6 P* + R P* + P* + f P ANK A2,VOIN VOUCHER IN ? + p " P RF(Z) PRB200 NO. GO AND PRINT + " P ADK A5,4 RESET STACK POINTER + * P RB TP405 SEND LIFT TO TOP AND RELEAS +
0x198898…198a2c Dummy {f00=0x0081, f01=0x0190, f02=»PL=0 + ( P RF(Z) RCTP01 ERROR .VOUCHER NOT IN , P XIF , 8 P IFT COMPL=1 , D P RB(Z) TP645 , X P XIF , l $ P LDR A1,A4 COPY REQUESTED LENGTH , x P SUK A1,2 R.L. < 3? , $ P RF(N) PRB200 YES: NO TABULATION , P LDK A1,TAB , P CC A1,-2,A3 TAB
0x198a2c…198bc0 Dummy {f00=0x0081, f01=0x0190, f02=»SEND CHARACTERS UNTIL TABULATION POSITION IS REACHED , P* AND ATTACH PRINT HEAD - < P* - ^ P* - h ( PPRB115 LDK A2,RPH DETACH PRINT HEAD - r P CF A5,OUTPUT SEND DETACH - , PPRB117 LC A2,-1,A3 GET 1ST TAB POS CHAR - $ P LCR A1,A3 GET 2ND TAB P
0x198bc0…198d54 (1, 363) Dummy {f00=0x0081, f01=0x0190, f02=»A5,BCDTBY CONVERT TO BINARY - . PPRB120 IM DWTBC,A6 INCREMENT BYTE COUNTER . $ 2 P CC A1,DWTBC,A6 COMPARE WITH ACTUAL TAB. POS. . V P RF(NG) PRB125 PRINT . P* . P* . P* . P LDK A2,/20 LOAD BLANK . ( P CF A5,OUTPUT SEND BLANKS OR DETACH
0x198d54…198ee8 Dummy {f00=0x0081, f01=0x0190, f02=»RESS . r P LDK A2,APH ATTACH / P RF PRB240 SEND ATTACH / & P EJECT / D P* / R P* / P* / f 2 P* GET OUTPUT CHARACTER FROM BUFFER. CHECK IF / p P* - ROOMLESS POINT / P* - ILLEGAL CHARACTER / & P* - SPECIAL CHARACTER (/13,/14) /
0x198ee8…19907c Dummy {f00=0x0081, f01=0x0190, f02=» / ~ & P SUK A3,1 DECREMENT BUFFER POINTER 0 P SUK A4,1 0 2 $ P LCR A7,A3 GET OUTPUT CHARACTER 0 D P ANK A7,/F MASK 0 l & P LC A7,ROMTAB,A7 GET CODE IN TABLE 0 P* 0 P* 0 P* 0 , PPRB210 CCK A7,/2020 ILLEGAL CHARACTER ? 0 P RF(L) PRB22
0x19907c…199210 Dummy {f00=0x0081, f01=0x0190, f02=»13=1 0 & P CCK A7,/1313 SPECIAL CHARACTER ? 1 P RF(E) PRB230 YES 1 6 P XIF 1 P P IFT CHR14=1 1 & P CCK A7,/1414 SPECIAL CHARACTER ? 1 p P RF(E) PRB230 YES 1 P XIF 1 P* 1 " P LDK A1,CCERR CODE CHECK ERROR 1 * P ORS A1,ECBRC,A8 STORE I
0x199210…1993a4 Dummy {f00=0x0081, f01=0x0190, f02=»TBC,A6 INCREMENT BYTE COUNTER 1 $ P LDR A2,A7 GET OUTPUT CHARACTER 2 & & PPRB240 CF A5,OUTPUT SEND CHARACTER 2 N , PPRB245 SUR A3,A4 START OF BUFFER ADDRESS 2 x P RB PRB100 2 P* 2 P* 2 P* 2 P EJECT 2 P* 2 P* I H T P 2 P* 2
0x1993a4…199538 Dummy {f00=0x0081, f01=0x0190, f02=» P RF(N) RCTP10 NOT BUSY 3 $ P LDR A7,A7 TEST STATUS;JOURNAL ? 3 " P RF(Z) IHTP20 YES 3 J , P CWK A7,2 TEST STATUS;VOUCHER/PASSBOOK ? 3 d P RF(Z) IHTP20 YES 3 , P LDR A1,A1 RETURN CODE FROM CHANNEL UNIT 3 8 PIHTP10 ABL(Z) LDREG NO RETURN CODE RESTORE
0x199538…1996cc Dummy {f00=0x0081, f01=0x0190, f02=» 3 PIHTP20 LDR A1,A1 4 P ABL(Z) TPTST 4 PIHTP30 EQU * 4 6 P ABL ENDIO 4 J P* 4 P* 4 f P* 4 p P EJECT 4 z P* 4 P* R C T P 4 P* 4 > P* RECOVERY ROUTINE: REPRINTS RUNNING REQUEST AT POWER ON 4 P* 4 & PRCTP CF A15,
0x1996cc…199860 Dummy {f00=0x0081, f01=0x0190, f02=» 4 p P ADR A5,A6 5 < P LDK A2,REMOT RESET PRINT BUFFER REMOTE AND LOCAL DUMMY 5 P CF A5,OUTPUT SEND DUMMY 5 Z P IFT COMPL=1 5 z P LDR A4,A4 STATUS CHANGE ? 5 P ABL(NE) TP645 5 P XIF 5 PRCTP05 EQU * 5 P LDK A2,0 5 2 P SC A2,DWTALN,A6
0x199860…1999f4 (1, 364) Dummy {f00=0x0082, f01=0x0190, f02=»ER OFF 5 x P ORS A2,8,A8 SET RETURN CODE 6 P XIF 6 2 P LDK A4,1 IND RECOVERY 6 > * P ABL ACT005 START RECOVERY OF PRINTER 6 & PRCTP10 ABL TDISP GO TO DISPATCHER 6 P EJECT 6 P* 6 P* B C D T B Y 6 P* 6 4 P* SUBROUTINE TO CONVERT
0x1999f4…199b88 Dummy {f00=0x0082, f01=0x0190, f02=» RF(N) BCDTB2 END 6 P SUK A1,6 DECREMENT BY 6 7 P RB BCDTB1 7 : " PBCDTB2 RTN A5 RETURN TO CALLER 7 N P* 7 t P* 7 ~ P* 7 P* 7 P* 7 P* G R A S P 7 P* 7 4 P* SUBROUTINE TO SEND GRASP TO VOUCHER/PASSBOOK 7 P* 7 P
0x199b88…199d1c Dummy {f00=0x0082, f01=0x0190, f02=»ASP 7 P CF A5,OUTPUT 8 P ANK A2,VOIN VOUCHER IN ? 8 " P RF(NZ) GRAS10 YES 8 D " P LDK A2,TETX DUMMY AFTER GRASP 8 ^ P CF A5,OUTPUT 8 P LDK A2,LFF LIFT TO TOP 8 P CF A5,OUTPUT 8 P RTN A5 8 PGRAS10 LC A3,DWTALN,A6 8 P RTN A5 8
0x199d1c…199eb0 Dummy {f00=0x0082, f01=0x0190, f02=»EASE 8 f P* 9 P* 9 P* 9 PRELEAS EQU * 9 * P LDK A1,0 9 > 0 P SC A1,DWTALN,A6 SET ACTUAL LINE NUMBER TO 0 9 P ( P LDKL A3,BUF5 LIFT TO TOP AND RELEAS 9 P LDK A2,LFF LIFT TO TOP 9 P CF A5,OUTPUT 9 P ANK A2,VOIN VOUCHER IN ? 9 P
0x199eb0…19a044 Dummy {f00=0x0082, f01=0x018e, f02=»RST CHARACTER IN OUTPUT BUFFER 9 P* : & P* : 0 4 PBUFCHR LCR A4,A3 GET NUMBER OF OUTPUT CHARACTERS : : P ANK A4,/FF MASK : r , PBUFC10 ADK A3,1 INCREMENT BUFFER POINTER : $ P LCR A2,A3 GET OUTPUT CHARACTER : P CF A5,OUTPUT SEND CHARACTER : P S
0x19a044…19a1d8 Dummy {f00=0x0082, f01=0x4046, f02=» P* ; P* ; P* ; P* ; " P* ; , P END ; 6@ ; B4,A3 GET NUMBER OF OUTPUT CHARACTERS : : P ANK A4,/FF MASK : r , PBUFC10 ADK A3,1 INCREMENT BUFFER POINTER : $ P LCR A2,A3 GET OUTPUT CHARACTER : P CF A5,OUTPUT SEND CHARACTER : P S
0x19a1d8…19a36c Dummy {f00=0x0082, f01=0x2008, f02=» < * 8 P* 8 P* 8 P* 8 & P* 8 0 P END 8 :@ 8 F 7 H 4 PBUFCHR LCR A4,A3 GET NUMBER OF OUTPUT CHARACTERS 7 R P ANK A4,/FF MASK 7 , PBUFC10 ADK A3,1 INCREMENT BUFFER POINTER 7 $ P LCR A2,A3 GET OUTPUT CHARACTER 7 P CF A5,OUTPUT
0x19a36c…19a500 Dummy {f00=0x0082, f01=0x0190, f02=»GI SAVE REGISTERS P RF WR100 ] P* ] , P* ] 6 P* WRITE ON THE LINE ] @ P* ] P* ] f PWRITE EQU * ] p " P CF A15,STREGO SAVE REGISTERS ] PWR100 EQU * ] P ABL TDISP ] P EJECT ] P* ] P* ] P* STORE INPUT REGISTER
0x19a500…19a694 (1, 365) Opaque[0x194]
0x19a694…19a828 # DirEnt {nam=»DRCC01«, typ=»SC«, f00=0x9da0, f01=0x0001, f02=0x1048, f03=0x5f28}
0x19a694…19a828 IdxSect {
0x19a694…19a828 f00 = 0x0082 // 0x19a694 @0x0
0x19a694…19a828 f01 = 0x001a // 0x19a696 @0x2
0x19a694…19a828 gno = [ // 0x19a698 @0x4
0x19a694…19a828 [0x00]: C0x0082.0x1.0
0x19a694…19a828 [0x01]: C0x0082.0x2.0
0x19a694…19a828 [0x02]: C0x0082.0x3.0
0x19a694…19a828 [0x03]: C0x0083.0x0.0
0x19a694…19a828 [0x04]: C0x0083.0x1.0
0x19a694…19a828 [0x05]: C0x0083.0x2.0
0x19a694…19a828 [0x06]: C0x0083.0x3.0
0x19a694…19a828 [0x07]: C0x0084.0x0.0
0x19a694…19a828 [0x08]: C0x0084.0x1.0
0x19a694…19a828 [0x09]: C0x0084.0x2.0
0x19a694…19a828 [0x0a]: C0x0084.0x3.0
0x19a694…19a828 [0x0b]: C0x0085.0x0.0
0x19a694…19a828 [0x0c]: C0x0085.0x1.0
0x19a694…19a828 ]
0x19a694…19a828 }
0x19a828…19a9bc Dummy {f00=0x0082, f01=0x0190, f02=» 2 P IDENT DRCC01 REL 8.2 78-09-15 870106240821 P : P* B : P***************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* ( P* DRCC01 = DRIVER CASSETTE CHANGER P* P* P*
0x19a9bc…19ab50 Dummy {f00=0x0082, f01=0x0190, f02=» DRVER HANDLES THREE CASSETTE CHANGERS CONNECTED 6 P* TO CPU VIA CHCC AND IOP ON MULTIPLEXED CHANNEL. 8 P* r 6 P* THE CHANGERS ARE OPERATED COMPLETELY INDEPENDENT | P* OF EACH OTHER. P* . P* DATA IS RECORDED IN BLOCKS FROM 2 TO 256 6
0x19ab50…19ace4 Dummy {f00=0x0082, f01=0x018e, f02=»JECT P 2 P* THE DRIVER CONSISTS OF THE FOLLOWING PARTS: P* J * P* A C T I V A T I O N R O U T I N E T P* & P* O R D E R P R O C E S S O R S P* & P* C O M M A N D H A N D L E R S P* ( P* I N T E R R U P T
0x19ace4…19ae78 Dummy {f00=0x0082, f01=0x0190, f02=» P* P* P* ORDERS TREATED: P* 6 P* CHANGER: @ P* R 0 P* /10 TEST STATUS SET IND /13 EJECT CASSETTE ( P* /11 INSERT CASSETTE /14 FEED TRAY 0 P* /12 RETURN CASSETTE /3E RESET STATUS FLAGS P* P* RECORDER:
0x19ae78…19b00c Dummy {f00=0x0082, f01=0x0190, f02=»READ MATS v P* /3F RECOVER P* ( P EJECT 2 P @ P* H P* STATUS BITS: R P* h P* CHANGER RECORDER r P* & P* 0: REQUEST ERROR REQUEST ERROR " P* 1: CAS IN DISCH COMP LEADER & P* 2: CAS NOT IN TRAY BOT MISS
0x19b00c…19b1a0 Dummy {f00=0x0082, f01=0x0190, f02=» P* 6: WRITE PROTECTED P* 7: B-SIDE ( P* F 0 P* 8: ILL ORDER SEQUENCE ILL ORDER SEQUENCE P & P* 9: HARD ERR, TIME OUT TIME OUT P* 10: " P* 11: SEQUENCE ERROR P* $ P* 12: INCORRECT LEN
0x19b1a0…19b334 (1, 366) Dummy {f00=0x0082, f01=0x0190, f02=»JECT P P* P* ENTRIES P* 0 P : $ P ENTRY IHCC1 INTERRUPT HANDLERS B P ENTRY IHCC2 j P ENTRY IHCC3 $ P ENTRY DWCC01 DEVICE WORK TABLES P ENTRY DWCC02 P ENTRY DWCC03 $ P ENTRY C1DRON POWER ON RECOVERY
0x19b334…19b4c8 Dummy {f00=0x0082, f01=0x0190, f02=»HER | $ P EXTRN DISEND DISPATCHER END I/O ( P EXTRN DISIOE DISP I/O REQUEST ERROR 4 $ P EXTRN SAVE8 SAVE A1-A8 AND INH ` P EXTRN SETIMP START TIMER $ P EXTRN ECBBA ECB BUFFER ADDRESS & P EXTRN ECBRL ECB REQUESTED LENGTH & P EXTRN ECBEL
0x19b4c8…19b65c Dummy {f00=0x0082, f01=0x0190, f02=»LT ROUTINE z P EJECT P P* ( P* CONSTANTS 2 P* F P P , PCCRTRD EQU 10 MAX NO OF RETRIES AT READ X , PCCRTWR EQU 3 MAX NO OF RETRIES AT WRITE * PCCRTSB EQU 5 MAX NO OF RETRIES AT SBOT * PCCRTLD EQU 3 MAX NO OF RETRIES AT
0x19b65c…19b7f0 Dummy {f00=0x0082, f01=0x0190, f02=»X NO OF STEP TRAY :S 4 PCCPOFF EQU 20 TIME TO WAIT AT POWER OFF (100 MS) 2 PCCPON EQU 30 TIME TO WAIT AT POWER ON (100 MS) T 4 PCCRBLK EQU 5 NO OF BLOCKS TO REVERSE AT POWER ON P P* P* HARDWARE ADDRESSES P* P PCHCC1
0x19b7f0…19b984 Dummy {f00=0x0082, f01=0x0190, f02=» ADDRESSES v PC1IOPA EQU CHCC1+CHCC1+1 PC2IOPL EQU CHCC2+CHCC2 2 PC2IOPA EQU CHCC2+CHCC2+1 P PC3IOPL EQU CHCC3+CHCC3 p PC3IOPA EQU CHCC3+CHCC3+1 P EJECT P P P* P* DWT DISPLACEMENTS P* P PDWTC
0x19b984…19bb18 Dummy {f00=0x0082, f01=0x0190, f02=» PDWTTQ EQU 14 PDWTREQ EQU 16 PDWTSAV EQU 18 . PDWTSB2 EQU 30 D PDWTSA2 EQU 32 Z PDWTSA5 EQU 34 p PDWTSA7 EQU 36 PDWTINT EQU 38 PDWTMOD EQU 40 PDWTSQC EQU 43 PDWTTOT EQU 44 PDWTTIM EQU 46
0x19bb18…19bcac Dummy {f00=0x0082, f01=0x0190, f02=»TRRA EQU 60 PDWTIOS EQU 62 PDWTIOH EQU 64 * PDWTSST EQU 66 @ PDWTSTA EQU 68 V PDWTEOT EQU 70 l PDWTBUF EQU 72 PDWTWBM EQU 74 PDWTWIL EQU 76 PDWTWSE EQU 78 PDWTWRE EQU 80 PDWTWOK EQU 82 PDW
0x19bcac…19be40 Dummy {f00=0x0082, f01=0x0190, f02=» EQU 102 PDWTMBM EQU 104 PDWTMIL EQU 106 & PDWTMDE EQU 108 < PDWTMOK EQU 110 R PDWTREP EQU 114 h PDWTPND EQU 116 ~ PDWTPBM EQU 118 PDWTPNS EQU 120 PDWTPTF EQU 122 PDWTPIT EQU 124 PDWTPIS EQU 126 PDWTPIE
0x19be40…19bfd4 (1, 367) Dummy {f00=0x0082, f01=0x0190, f02=»* CCDA ACTIVATION ROUTINE. ENTERED AFTER LKM-REQUEST. < P* THE VALIDITY OF THE ORDER IS CHECKED AND A BRANCH TO > $ P* THE ORDER PROCESSOR IS MADE. ~ P* P* P* ENTRY: P* P* A5: DWTSB2,A6 P* A6: DWT ADDRESS P*
0x19bfd4…19c168 Dummy {f00=0x0082, f01=0x0190, f02=»: BUFFER ADDRESS P* A5: STACK POINTER P* A6: DWT ADDRESS 6 P* A7: MAX NO OF RETRIES P P* A8: ECB ADDRESS p P* P PCCDA INH & P LDK A2,CCLEN CHECK IF LEGAL ORDER P PCCDA10 CC A7,CCTAB-1,A2 P RF(E) CCD
0x19c168…19c2fc Dummy {f00=0x0082, f01=0x0190, f02=»2,A2 P ADKL A2,CCORD-2 0 P ST A2,DWTREQ,A6 SAVE ADDRESS TO ORDER PNTR $ 6 PCCDA40 CWK A2,CCNOL DOES THIS ORDER REQUIRE LENGTH X P RF(NL) CCDA60 NO P " P LD A3,ECBRL,A8 GET REQ LENGTH * P LD A4,DWTMOD,A6 CHECK IF SEQ NUMBERS P
0x19c2fc…19c490 Dummy {f00=0x0082, f01=0x0190, f02=» RB(N) CCDA20 LESS THAN 2 CHARS P SUK A4,254 ( & P RB(P) CCDA20 MORE THAN 256 CHARS < P f , PCCDA60 LD A4,ECBBA,A8 GET BUFFER ADDRESS n " P LDK A7,0 RESET NO OF RETRIES & P CM DWTEOT,A6 CLEAR EOT INDICATOR * P ABI* DWTREQ,A6 GO TO ORDE
0x19c490…19c624 Dummy {f00=0x0082, f01=0x0190, f02=»GTH | P* A4: BUFFER ADDRESS P* A5: STACK POINTER * P* A6: DWT ADDRESS F P* A7: MAX NO OF RETRIES ` P* A8: ECB ADDRESS P* P* EXIT: ABL DISEND P* P* A1: STATUS P* A6: DWT ADDRESS P* 8 P* EF
0x19c624…19c7b8 Dummy {f00=0x0082, f01=0x0190, f02=» P P* 2 P* TEST CHANGER STATUS AND SET INDICATORS /10 P* P P Z ( PTCSI LD A1,ECBCW,A8 LOAD IND PATTERN b P CF A5,SETI P ABL ENDIOC P EJECT P P* P* INSERT CASSETTE /11 P* P 6 PIS
0x19c7b8…19c94c Dummy {f00=0x0082, f01=0x0190, f02=» j P RF(NZ) ISRT30 YES * P LDK A7,CCSTPS SET UP MAX NO OF STEPS " $ P CF A5,MVCT PUT HANDLER IN TRAY P 4 PISRT10 LDKL A2,/1441 CK IF NO TRAY,TR FULL,TOT,N x P TM A1,A2 & P ABL(NZ) ENDIOC ILLEGAL CONDITIONS P P LDR A2,A1 " P A
0x19c94c…19cae0 Dummy {f00=0x0082, f01=0x0190, f02=»UK A7,1 P ABL(Z) ENDIOE TO MANY STEPS P CF A5,STPT STEP TRAY 4 P RB ISRT10 R P d . PISRT20 C1S DWTSTP,A6 INDICATE TRAY STEPPED l P CF A5,STPT STEP TRAY 2 P ABL(1) ENDIOE HAND NOT AT TRAY,TIM OUT,NOT OP * PISRT30 CF A5,MVCR MOVE
0x19cae0…19cc74 (1, 368) Dummy {f00=0x0083, f01=0x0190, f02=»ENDIOC NOT OP & P CM DWTSTP,A6 CLEAR CHANGER FLAGS 0 P C1S DWTHRC,A6 INDICATE HANDLER AT RECORDER @ P ABL ENDIOC t P EJECT P P* P* RETURN CASSETTE /12 P* P PRTRN LDK A7,CCRTRT ( P LD A2,DWTLCK,A6 CHE
0x19cc74…19ce08 Dummy {f00=0x0083, f01=0x0190, f02=»L ORDER x & PRTRN10 CF A5,MVCT MOVE CAS TO TRAY P RF(0) RTRN20 STATUS OK : P IM DWTRET,A6 INC STAT CNT Z P SUK A7,1 | & P RF(N) RTRN20 ENOUGH WITH RETRIES P CF A5,MVCR P RB RTRN10 TRY AGAIN P , PRTRN20 CM DWTHRC,A6 IND
0x19ce08…19cf9c Dummy {f00=0x0083, f01=0x0190, f02=» LD A2,DWTLCK,A6 CHECK IF CAS LOCKED & P ABL(NZ) ILLORD YES ILLEGAL ORDER , * P LD A2,DWTHRC,A6 CHECK IF HANDL AT REC V $ P ABL(Z) ILLORD NO ILLEGAL ORDER P CF A5,TEST < P LDKL A2,/4041 CHECK IF CAS IN DISCH COMP, TOT , NOT OP P TM A1,A
0x19cf9c…19d130 Dummy {f00=0x0083, f01=0x0190, f02=»M DWTHRC,A6 IND HANDL NOT AT REC P ABL ENDIOC ( P EJECT < P J P R P* Z P* FEED TRAY TO END /14 d P* P 0 PFEED LD A2,DWTHRC,A6 CHECK IF HANDLER AT REC & P ABL(NZ) ILLORD YES ILLEGAL ORDER * P LDK A7,CCSTPS SET U
0x19d130…19d2c4 Dummy {f00=0x0083, f01=0x018e, f02=»S RETURN ~ P SUK A7,1 P ABL(Z) ENDIOE TO MANY STEPS " P CF A5,STPT STEP TRAY F P RB FEED10 d P EJECT v P P P* P* RESET STATUS FLAGS /3E P* P ( PRSET CM DWTSTP,A6 CLEAR TRAY STEPPED & P CM DWTLCK
0x19d2c4…19d458 Dummy {f00=0x0083, f01=0x0190, f02=» P* TEST RECORDER STATUS /00 P* ( P 2 0 PTSTR LD A2,DWTHRC,A6 CHECK IF HANDLER AT REC : $ P ABL(Z) ILLORD NO ILLEGAL ORDER n " P LD A1,DWTSAV,A6 GET WP,B-SIDE P ABL ENDIO7 P EJECT P P P* P* READ /02
0x19d458…19d5ec Dummy {f00=0x0083, f01=0x018e, f02=»H BOT p PREAD05 CF A5,SBOT P RF(5) READ06 OK ( P IM DWTRNO,A6 INC STAT CNT @ P ABL ENDIO4 ILLEGAL STATUS b PREAD06 EQU * P ANKL A1,/0400 P RF(NZ) READ10 BOT FOUND P SUK A2,1 BOT NOT FOUND P RF(NN) READ08 OK P
0x19d5ec…19d780 Dummy {f00=0x0083, f01=0x0190, f02=» P PREAD10 CF A5,RBLK READ BLOCK " P RF(0) READ20 STATUS, DATA OK 0 P RF(5) READ12 ILL DATA V P IM DWTRIL,A6 INC STAT CNT t P ABL ENDIO4 ILL STATUS PREAD12 EQU * P ADK A7,1 INC RETRY CNT P CWK A7,CCRTRD P RF(NG) RE
0x19d780…19d914 (1, 369) Dummy {f00=0x0083, f01=0x0190, f02=»0 l P IM DWTRRE,A6 INC STAT CNT P ABL ENDIO1 NO MORE RETRIES , & PREAD13 LDK A7,CCRTRD ONE MORE TRY P " P LDR A3,A2 RESTORE REQ LENGTH z P RB READ10 READ NEXT BLOCK PREAD14 EQU * P LD A2,DWTSQC,A6 " P RF(NZ) READ15 NOT FIRST B
0x19d914…19daa8 Dummy {f00=0x0083, f01=0x0190, f02=»9 NOT ILL DATA P LD A2,DWTMOD,A6 " P RF(N) READ19 SEQ NO NOT USED . P LD A2,DWTSTA,A6 T P ANK A2,/16 l ( P RF(NZ) READ19 LAST STATUS ILL DATA " P CF A5,SKPR REVERSE ONE BLOCK P CF A5,RBLK READ ONE BLOCK P RB(2) READ12 ILL DA
0x19daa8…19dc3c Dummy {f00=0x0083, f01=0x0190, f02=»UK A3,1 MOD TO GET SEQ NO POINTER P LCR A3,A3 GET SEQ NO * P ADK A3,1 H P CC A3,DWTSQC,A6 Z P RF(NE) READ20 OK r " P LDR A3,A2 RESTORE REQ LENGTH $ P RB READ10 SEQ NO = PREV SEQ NO PREAD17 LD A2,DWTSTA,A6 P SLC A2,3 *
0x19dc3c…19ddd0 Dummy {f00=0x0083, f01=0x0190, f02=»BLK P RB READ10 TRY AGAIN ! P ! ( ( PREAD20 LDR A5,A1 CHECK IF TAPE MARK ! 0 P SLC A5,3 ! P ABL(N) ENDIO1 TAPE MARK ! n P EX DWTRRA,A6 RER A3,CXIOPA ! P SUK A3,1 ! * P LD A2,DWTSQC,A6 GET SEQUENCE COUNTER ! P CCR A2,A3 ! P RF(
0x19ddd0…19df64 Dummy {f00=0x0083, f01=0x0190, f02=» ! t * PREAD30 IM DWTRSE+2,A6 INC STAT CNTR(S) " P RF(NZ) READ35 " 6 P IM DWTRSE,A6 " L PREAD35 RF READ45 " b * PREAD40 IM DWTROK+2,A6 INC STAT CNTR(S) " z P RF(NZ) READ45 " P IM DWTROK,A6 " PREAD45 EQU * " P ABL ENDIO1 " P EJECT "
0x19df64…19e0f8 Dummy {f00=0x0083, f01=0x0190, f02=» " P* # P # ( PWRIT LD A2,DWTSQC,A6 GET SEQ COUNTER # " P RF(NZ) WRIT10 NOT FIRST BLOCK # F " P CF A5,SBES FIRST BLOCK ERASE # l P LDR A2,A1 # P SLC A2,5 CHECK IF BOT FOUND # P RF(N) WRIT05 OK # P IM DWTWBM,A6 INC STAT CNT # P ABL E
0x19e0f8…19e28c Dummy {f00=0x0083, f01=0x0190, f02=»A2,DWTMOD,A6 CHECK SEQ MODE # P RF(N) WRIT20 NO SEQ NUMBERS $ $ $ P LD A2,DWTSQC,A6 GET SEQ COUNTER $ H * P LDR A1,A4 CALC ADDRESS TO SEQ NUMBER $ p P ADR A1,A3 $ P SUK A1,1 $ * P SCR A2,A1 STORE SEQ NUMBER IN BUFFER $ PWRIT15 LD A2,DWTTMK,A6 $
0x19e28c…19e420 Dummy {f00=0x0083, f01=0x0190, f02=»4) WRIT24 NOT OK $ $ P IM DWTWOK+2,A6 INC STAT CNTR(S) % P RF(NZ) WRIT23 % @ P IM DWTWOK,A6 % V PWRIT23 EQU * % l P ABL ENDIO1 STATUS, DATA OK % PWRIT24 RF(5) WRIT26 OK % P IM DWTWIL,A6 INC STAT CNT % P ABL ENDIO4 ILLEGAL STATUS % PWR
0x19e420…19e5b4 (1, 370) Dummy {f00=0x0083, f01=0x0190, f02=» PWRIT28 EQU * & P LD A2,DWTSQC,A6 & " P RF(NZ) WRIT30 NOT FIRST BLOCK & 0 P & V " P CF A5,ERAS FIRST BLOCK, ERASE & ^ P CWK A7,CCRTWR-2 & P RF(NG) WRIT30 & . P ADK A7,1 TOO MANY RETRIES ON FIRST BLOCK & P & PWRIT30 LD A2,DWTMOD,A6 & $
0x19e5b4…19e748 Dummy {f00=0x0083, f01=0x018e, f02=»IT50 CF A5,ERAS & P ANKL A1,/0400 SAVE EOT ' P ORS A1,DWTEOT,A6 ' 8 P SUK A2,1 ' R P RB(NN) WRIT50 ' d P ADK A7,1 ' z P CWK A7,CCRTWR ' P RF(NG) WRIT60 OK ' P IM DWTWRE,A6 INC STAT CNT ' P ANKL A1,/800 INDICATE ERROR ' P ABL E
0x19e748…19e8dc Dummy {f00=0x0083, f01=0x0190, f02=» P ( PLOAD LDK A7,CCRTLD ( * P LD A2,DWTHRC,A6 CHECK IF HANDL AT REC ( & " P RF(Z) ILLORD NO ILLEGAL ORDER ( T P LD A2,ECBCW,A8 GET MODE BIT ( z P SRC A2,1 ( " P ST A2,DWTMOD,A6 SET SEQ MODE ( PLOAD10 CF A5,LOCK ( ( P RF(1) LOAD20 TIME OUT,
0x19e8dc…19ea70 Dummy {f00=0x0083, f01=0x0190, f02=»O4 TIME OUT ( P IM DWTINS,A6 INC STAT CNT ) P SUK A7,1 ) 6 & P RF(N) ENDIO4 ENOUGH WITH RETRIES ) H , P CF A5,MVCT TRY AGAIN TO MAKE MATS HAPPY ) r P CF A5,MVCR ) P RB LOAD10 ) P EJECT ) P ) P ) P* ) P* REWIND /31 ) P*
0x19ea70…19ec04 Dummy {f00=0x0083, f01=0x0190, f02=» ) P * P* * P* UNLOAD /38 * P* * 0 P * : ( PUNLD CM DWTSQC,A6 CLEAR SEQ COUNTER * B P CF A5,REWD REWIND TO LEADER * n & PUNLD10 CF A5,UNLK UNLOCK CASSETTE * * P CM DWTLCK,A6 INDICATE CAS NOT LOCKED * P RF ENDIO6 * P * P *
0x19ec04…19ed98 Dummy {f00=0x0083, f01=0x0190, f02=» RF(Z) ILLORD NO NO * P CF A5,CCRC RECOVER RECORDER + & P OR A1,DWTSAV,A6 PUT IN WP,B-SIDE + @ P RF ENDIO7 + j P EJECT + | P + P* + P* READ MATS /3D + P* + P + ( PRDMA LD A2,DWTSQC,A6 GET SEQ COUNTER + " P RF(NZ) RDMA10 NOT FIR
0x19ed98…19ef2c Dummy {f00=0x0083, f01=0x0190, f02=»NT + x P ABL ENDIO4 ILL STATUS , PRDMA07 EQU * , ( P ANKL A1,/0400 , < P RF(NZ) RDMA10 BOT FOUND , R P SUK A2,1 BOT NOT FOUND , r P RF(NN) RDMA08 OK , P IM DWTMBM,A6 INC STAT CNT , P ABL ENDIOB NO MORE RETRIES , PRDMA08 EQU * , P C
0x19ef2c…19f0c0 Dummy {f00=0x0083, f01=0x0190, f02=»STAT CNTR(S) , | P RF(NZ) RDMA11 - P IM DWTMOK,A6 - * PRDMA11 EQU * - @ P ABL READ20 STATUS, DATA OK - T PRDMA12 RF(6) RDMA14 - x P IM DWTMDE,A6 INC STAT CNT - P ABL ENDIO1 ILL DATA - $ PRDMA14 IM DWTMIL,A6 INC STAT CNT - P ABL ENDIO4 IL
0x19f0c0…19f254 (1, 371) Dummy {f00=0x0083, f01=0x0190, f02=»RDER - r P RF ENDIO6 . P . P . & P . . P* . 6 ( P* COMMON EXITS FOR ORDER PROCESSORS . @ P* . l P . v , PENDIOE ORKL A1,/0040 IND HARDWARE ERROR . ~ P . ( PENDIOC ANKL A1,/FCFF MASK WP, B-SIDE . $ P LDR A7,A1 CHECK IF NOT OPERABLE .
0x19f254…19f3e8 Dummy {f00=0x0083, f01=0x0190, f02=» . f P RF ENDIO4 / P / P / " ( PENDIO1 IM DWTSQC,A6 INCR SEQ COUNTER / * P / V & PENDIO2 EX DWTRRA,A6 RER A3,CCIOPA / ^ $ P SUR A3,A4 CALC EFFECTIVE LENGTH / * P LD A4,DWTMOD,A6 CHECK IF SEQ NUMBERS / P RF(N) *+4 NO / P SUK A3,1 YES ADJUST
0x19f3e8…19f57c Dummy {f00=0x0083, f01=0x0190, f02=»A6 PUT IN WP, B-SIDE / | P OR A1,DWTEOT,A6 PUT IN EOT 0 P 0 @ * PENDIO5 LDR A7,A1 CHECK IF NOT OPERABLE 0 H P SRC A7,1 0 v , P RF(N) CKPWF NOT OP, CHECK IF POWER FAIL 0 P 0 & PENDIO6 ST A1,DWTSTA,A6 SAVE STATUS 0 P 0 . PENDIO7 CM DWTREQ,A6 IN
0x19f57c…19f710 Dummy {f00=0x0083, f01=0x0190, f02=»NOT OPERABLE, CHECK IF A POWER 0 P* FAIL IS COMING ALONG. 1 & P* 1 F P 1 P PCKPWF SLC A7,1 1 X P ST A7,DWTSA7,A6 SAVE STATUS 1 n P LDR A1,A6 KEEP DWT ADDRESS 1 P LDK A4,DWTPWF 1 P ADR A4,A6 1 & P CF A15,SETIMP WAIT FOR POWER FAIL 1 P
0x19f710…19f8a4 Dummy {f00=0x0083, f01=0x0190, f02=»S 1 r " P CM DWTPWF,A6 IND NO PWF TIMER 2 P RB ENDIO7 2 0 P EJECT 2 B P 2 P P* 2 X P* POSI POSITION TAPE 2 b P* 2 ~ P* EXIT: 2 $ P* CR: E=SUCCESS, NE=NO SUCCESS 2 P* 2 P 2 ( PPOSI LD A2,DWTMOD,A6 CHECK SEQ MODE 2 $ P RF(NN) PO
0x19f8a4…19fa38 Dummy {f00=0x0083, f01=0x0190, f02=»POSI10 LDK A2,5 REVERSE FIVE BLOCKS 2 PPOSI20 SUK A2,1 3 , P RF(N) POSI28 3 D P CF A5,SKPR 3 Z P RB(5) POSI20 STATUS OK 3 n 4 P LD A2,DWTSQC,A6 NO DATA, SEQ NO GREAT THAN 10 ? 3 P SUK A2,8 3 P RF(NG) POSI22 NO 3 P IM DWTPND,A6 INC STAT
0x19fa38…19fbcc Dummy {f00=0x0083, f01=0x0190, f02=»LC A2,5 3 P RF(N) POSI25 BOT FOUND 4 P IM DWTPBM,A6 INC STAT CNT 4 0 P RF POSIER POS ERROR 4 R PPOSI25 EQU * 4 n P LDKL A3,-1 CLEAR SEQ NUMBER 4 P LD A2,DWTSQC,A6 4 $ P RF(Z) POSIOK NO BLOCKS ON TAPE 4 P RF POSI40 4 PPOSI28 EQU * 4
0x19fbcc…19fd60 Dummy {f00=0x0083, f01=0x018e, f02=» POSI45 READ OK 4 P SUK A2,1 COUNT READ 5 $ P RB(P) POSI30 NOT ALL READ DONE 5 4 P IM DWTPNS,A6 INC STAT CNT 5 $ P RF POSI80 GIVE IT ONE MORE TRY 5 ~ PPOSI45 EQU * 5 , P LC A2,DWTSQC,A6 CALC NO OF BLOCKS TO GO 5 P SUR A2,A3 5 P SUK A2,1 5
0x19fd60…19fef4 (1, 372) Dummy {f00=0x0084, f01=0x0190, f02=» 5 z PPOSI48 EQU * 6 " PPOSI50 SUK A2,1 POSITION TAPE 6 P RF(N) POSI60 6 B P CF A5,RDSEQN 6 X P RB POSI50 6 n $ PPOSI60 LDKL A2,/84F TEST STATUS 6 P TM A1,A2 6 P RF(Z) POSI65 OK 6 P IM DWTPIE,A6 INC STAT CNT 6 $ P RF POSI80 GIVE IT O
0x19fef4…1a0088 Dummy {f00=0x0084, f01=0x018e, f02=»,DWTSTA,A6 TAPE MARK, GET LAST STATUS 6 P SLC A2,3 7 . ( P RF(N) POSIOK OK SHOULD BE TAPE MARK 7 @ P IM DWTPIT,A6 INC STAT CNT 7 l $ P RF POSI80 GIVE IT ONE MORE TRY 7 $ PPOSI70 ADK A3,1 CHECK SEQ NUMBER 7 P CC A3,DWTSQC,A6 7 P RF(E) POSIOK 7
0x1a0088…1a021c Dummy {f00=0x0084, f01=0x0190, f02=» 7 | P IM DWTPDB,A6 INC STAT CNT 8 P RF POSIER POS ERROR 8 * $ PPOSI90 IM DWTREP,A6 ONE MORE TRY 8 F P ABL POSI10 8 n P 8 PPOSIOK ADK A5,4 8 P SUR A2,A2 8 P ABR* A5 8 P 8 PPOSIER ADK A5,4 8 ( P ORK A1,/0014 INDICATE SEQ, DATA ERR
0x1a021c…1a03b0 Dummy {f00=0x0084, f01=0x0190, f02=» * P* A3: IF RBLK,WBLK: REQUESTED LENGTH 9 ( P* A4: IF RBLK,WBLK: BUFFER ADDRESS 9 2 P* A6: DWT ADDRESS 9 ^ P* 9 x P* EXIT: RTN A5 9 P* 9 P* A1: STATUS AFTER COMMAND 9 P* A2: RESTORED 9 " P* A3: REQUESTED LENGTH IN ECB 9 P*
0x1a03b0…1a0544 Dummy {f00=0x0084, f01=0x0190, f02=»ILL STATUS, NOT ILL DATA 9 D P* =1: ILL STATUS: HANDL NOT AT TRAY/ NO DATA, TOT, NOT OP : @ P* =2: NOT ILL STATUS, ILL DATA: DATA ERR, THRUPUT ERR : h P* : P : P : PSTPT LDK A1,/04 STEP TRAY : P RF COMM : P : ( PMVCR LDK
0x1a0544…1a06d8 Dummy {f00=0x0084, f01=0x0190, f02=»/07 MOVE CAS TO DISCH COMP : P RF COMM ; " P ; 2 PTEST LDK A1,/00 TEST STATUS ; : P RF COMM ; ^ P ; n PSETI SLL A1,4 SET INDICATORS ; v P ANK A1,/FF ; P ADK A1,/01 ; P RF COMM ; P ; " PLOCK LDK A1,/02 LOCK CASSETTE ; P RF COMM
0x1a06d8…1a086c Dummy {f00=0x0084, f01=0x0190, f02=» P < PERAS LDK A1,/09 ERASE < P RF COMM < * P < : PWBLK LDK A1,/0A WRITE BLOCK < B ( P ORKL A3,/4000 INDICATE WRITE TO IOP < f P RF RBLK10 < P < $ PWTMK LDK A1,/0B WRITE TAPE MARK < P RF COMM < P < PSBOT LDK A1,/0C SEARCH BOT <
0x1a086c…1a0a00 Dummy {f00=0x0084, f01=0x0190, f02=»X DWTWRL,A6 GIVE REQUESTED LENGTH < , P EX DWTWRA,A6 AND BUFFER ADDRESS TO IOP = * P RF COMM = Z P = j PSKPR LDK A1,/0E SKIP REVERSE = r P RF COMM = P = $ PREWD LDK A1,/0F REWIND TO LEADER = & P LDKL A3,-600 60 SECONDS TIME OUT = P RF COMM
0x1a0a00…1a0b94 (1, 373) Dummy {f00=0x0084, f01=0x0190, f02=»T ALLOWED = | P EX DWTIOS,A6 CIO A1,1,CHCCX > P RF(A) COMM20 > 6 * P RF(3) COMM15 NO INTERFACE IN COMPUTER > L P LDK A1,9 > z P CF A15,HALT MONITOR HALT > & PCOMM15 LD A3,ECBRL,A8 RESTORE REG > P LD A4,ECBBA,A8 > & P ADK A5,4 UPDATE A5 STAC
0x1a0b94…1a0d28 Dummy {f00=0x0084, f01=0x0190, f02=» > P ST A7,DWTSA7,A6 ? P ABL TDISP GO TO DISPATCHER ? P EJECT ? D P ? R P ? Z P* ? b 0 P* TIMOUT ENTERED IF TIME OUT DURING COMMAND ? l P* ? P ? 0 PTIMOUT LD A2,DWTINT,A1 CHECK IF INT ALLOWED ? P RF(NZ) TOUT10 NO ? P EX DWTI
0x1a0d28…1a0ebc Dummy {f00=0x0084, f01=0x0190, f02=»DISP ? P @ P @ P @ P EJECT @ $ P @ 2 P @ : P* @ B 0 P* IHCC1-3 INTERRUPT HANDLER CASSETTE CHANGER @ L P* @ P @ $ PIHCC1 CF A15,SAVE8 ENTRY FOR CC1 @ P ST P,INTSAV SAVE LAST INT. @ P LDKL A6,DWCC01 @ P RF IHCC10 @ P
0x1a0ebc…1a1050 Dummy {f00=0x0084, f01=0x0190, f02=»CC3 CF A15,SAVE8 ENTRY FOR CC3 @ P ST P,INTSAV SAVE LAST INT. A & P LDKL A6,DWCC03 A J P A b $ PIHCC10 EX DWTSST,A6 SST A1,CHCCX A j P RF(A) IHCC20 A P LDK A1,9 A P CF A15,HALT MONITOR HALT A 0 PIHCC20 C1S DWTINT,A6 CHECK IF ILL INTERRUPT
0x1a1050…1a11e4 Dummy {f00=0x0084, f01=0x018e, f02=» LD A5,DWTSA5,A6 RESTORE STACK POINTER A P B . , PIHCC40 LD A2,DWTTOT,A6 CHECK IF TIME OUT B 6 P RF(Z) IHCC50 NO B f $ P ORKL A1,/0040 YES IND IN STATUS B ~ & P CM DWTTOT,A6 RESET TOT INDICATOR B P B PIHCC50 LDK A2,/00 B , P LDKL A3,/0847 CHECK I
0x1a11e4…1a1378 Dummy {f00=0x0084, f01=0x018e, f02=» P RF(NZ) IHCC60 ILL STATUS C P LDK A2,/80 ILL DATA C & P C B PIHCC60 SLC A2,2 C J P ST A2,2,A5 UPDATE CR C b & P LD A3,ECBRL,A8 RESTORE REGISTERS C * P LD A4,DWTMOD,A6 CHECK IF SEQ NUMBERS C P RF(N) *+4 NO C P ADK A3,1 YES ADJUST LENGT
0x1a1378…1a150c Dummy {f00=0x0084, f01=0x018e, f02=» * P* CXDRON ENTRIES AT POWER ON RECOVERY D P* D 2 P D < $ PC1DRON CF A15,SAVE8 RECOVER CC1 D D P LDKL A6,DWCC01 D l P RF CCON D P D $ PC2DRON CF A15,SAVE8 RECOVER CC2 D P LDKL A6,DWCC02 D P RF CCON D P D $ PC3DRON CF A15,SAVE8
0x1a150c…1a16a0 Dummy {f00=0x0084, f01=0x0190, f02=» D r . P LDK A4,DWTTIM CHECK IF COM TIMER STARTED E P ADR A4,A6 E : P LDR* A3,A4 E L P RF(NZ) CCON10 YES E ` & P CF A15,SETIMP START COMMAND TIMER E z P DATA TIMOUT,1000 E P E . PCCON10 LDK A4,DWTPWF CHECK IF PWF TIMER ON E P ADR A4,A6 E
0x1a16a0…1a1834 (1, 374) Dummy {f00=0x0084, f01=0x0190, f02=»ON20 LDKL A2,-CCPON WAIT FOR EVERYTHING E P STR A2,A3 F 0 P LDKL A2,CCON30 F B P LD A4,-2,A3 F Z P ST A2,2,A4 F n PCCON25 ABL TDISP F P F ( PCCON30 LDR A6,A1 RESTORE DWT ADDRESS F & P LDK A5,DWTSB2 LOAD STACK POINTER F P ADR A5,A6 F &
0x1a1834…1a19c8 Dummy {f00=0x0084, f01=0x0190, f02=» RF(Z) CCON40 NO F P CF A5,CCRC RECOVER RECORDER G 2 PCCON40 LD A2,DWTREQ,A6 CHECK IF ACTIVE REQUEST G < P ABL(Z) DISEND NO RETURN G r & P ABL CCDA40 REPEAT ACTIVE REQUEST G P EJECT G P G P G P* G B P* CCRC RECOVERY ROUTINE. THE CASSETT
0x1a19c8…1a1b5c Dummy {f00=0x0084, f01=0x0190, f02=»CCESSFUL DUE TO INCORRECT G n > P* SEQUENCE NUMBERS ON THE TAPE, THE CASSETTE IS UNLOADED. H " P* H d P H n ( PCCRC LD A2,DWTMOD,A6 CHECK SEQ MODE H v P RF(N) CCRCUK NO SEQ NUMBERS H P CF A5,LOCK H ( P RF(1) CCRCUK TIME OUT, NOT OPERABLE H ( P L
0x1a1b5c…1a1cf0 Dummy {f00=0x0084, f01=0x0190, f02=»TO AVOID ANY OLD BLOCKS H t P I PCCRC10 CF A5,SKPR I ( P SLC A1,4 CHECK IF DATA I B P RF(N) CCRC20 NO DATA I b P SUK A2,1 I P RB(NZ) CCRC10 I P I " P CF A5,RDSEQN READ SEQ NUMBER I P CF A5,RDSEQN I P LDR A2,A1 I P SLC A2,3
0x1a1cf0…1a1e84 Dummy {f00=0x0084, f01=0x0190, f02=»CCRC20 CF A5,REWD REWIND AND SEARCH BOT I P CF A5,SBOT J 0 P LDKL A3,-1 CLEAR SEQ NUMBER J D P J h L PCCRC30 ANK A1,/004F CHECK IF TOT, INC LENGTH, DAT ERR, THRU ERR, NOT OP J p " P RF(NZ) CCRCUK ILL CONDITIONS J & P ADK A3,2 CALC NO OF BLOCKS TO GO
0x1a1e84…1a2018 Dummy {f00=0x0084, f01=0x0190, f02=» P ANK A7,/FF K P CWK A7,CCRCBL K ( P RF(G) CCRCUK TOO MANY BLOCKS TO GO K . PCCRC50 SUK A7,1 K Z P RF(N) CCRC80 K r P CF A5,SKPR K P RB CCRC50 K P K " PCCRC60 ANK A7,/FF TRY FORWARD K P CWK A7,CCRCBL K ( P RF(G) CCRCUK TOO MANY
0x1a2018…1a21ac Dummy {f00=0x0084, f01=0x0190, f02=»READ SEQ NUMBER TO A3 K | . P LDKL A4,/E8FF CHECK IF ILLEGAL CONDITIONS L P TM A1,A4 L P P RF(NZ) CCRCUK YES TO BAD L b " P LDR A4,A1 CHECK IF TAPE MARK L P SLC A4,3 L P RF(NN) CCRC90 NOT TAPE MARK L $ P LD A4,DWTSTA,A6 GET LAST STATUS L P
0x1a21ac…1a2340 Dummy {f00=0x0084, f01=0x018e, f02=»1 CHECK SEQ NUMBER L P CC A3,DWTSQC,A6 M P RB(NE) CCRCUK NOT EQUAL M 2 P M R $ PCCRCOK RTN A5 OK RECOVERY READY M Z P EJECT M P M P M P* M " P* RDSEQN READ SEQ NUMBER TO A3 M P* M P M $ PRDSEQN LDKL A3,256 SET UP BUFFER M
0x1a2340…1a24d4 (1, 375) Dummy {f00=0x0084, f01=0x0190, f02=» M P ANK A3,/FF N P RTN A5 N P EJECT N , P N : P N B P* N J P* LEGAL ORDER TAB N T P* N n P N x & PCCTAB DATA /0206,/3D00,/2231,/3738 N " P DATA /3F10,/1112,/1314,/3E00 N P N PCCLEN EQU *-CCTAB-1 N P N 6 PCCORD DATA R
0x1a24d4…1a2668 Dummy {f00=0x0084, f01=0x0190, f02=» N P O P O P O " P* DWCC01 DEVICE WORK TABLE CC1 O P O F PDWCC01 DATA CCDA DWTCHP O N P DATA /8000 DWTST O n P DATA 0 DWTECB O P DATA 0 DWTOR O P DATA DWCC01 DWTADR O P DATA 0 DWTTAB O P DATA 0 DWTWAT O P DATA 0 DWTT
0x1a2668…1a27fc Dummy {f00=0x0084, f01=0x0190, f02=» P DATA 0 P P DATA 0 P P DATA 0 P $ P DATA 0 DWTSB2 STACK BASE P 4 & P DATA 0 DWTSA2 SAVE AREA FOR REG P V P DATA 0 DWTSA5 P P DATA 0 DWTSA7 P ( P DATA /FFFF DWTINT /0: INT ALLOWED P " P DATA 0 DWTMOD BIT0: SEQ MODE P P DATA 0 DW
0x1a27fc…1a2990 Dummy {f00=0x0084, f01=0x018e, f02=» P n $ P DATA 0 DWTLCK CAS LOCKED FLAG Q & P DATA 0 DWTSTP TRAY STEPPED FLAG Q 0 & P DATA 0 DWTPWF PWF TIMER ADDRESS Q Z , P WER A3,C1IOPL DWTWRL I/O INSTRUCTIONS Q P WER A4,C1IOPA DWTWRA Q P RER A3,C1IOPA DWTRRA Q P CIO A1,1,CHCC1 DWTIOS Q
0x1a2990…1a2b24 Dummy {f00=0x0084, f01=0x0190, f02=» ( P DATA CCBUF1 DWTBUF BUFFER ADDRESS R " P* STATISTIC COUNTERS FOR WRITE R 0 P DATA 0 DWTWBM BOT MISSING R V ( P DATA 0 DWTWIL ILLEGAL STATUS /0841 R x . P DATA 0 DWTWSE SEQ ERROR = POS ERROR /0010 R 6 P DATA 0 DWTWRE RETRY ERROR = NORM DATA ERROR /0004
0x1a2b24…1a2cb8 Dummy {f00=0x0084, f01=0x0190, f02=»DWTRBM BOT MISSING R ( P DATA 0 DWTRIL ILLEGAL STATUS /0841 S . P DATA 0,0 DWTRSE SEQ ERROR /0010 (32 BITS) S F 8 P DATA 0 DWTRRE RETRY ERROR = NORMAL DATA ERROR /000E S x * P DATA 0,0 DWTROK READING OK (32 BITS) S 6 P* STATISTIC COUNTERS FOR CONTROL READ
0x1a2cb8…1a2e4c Dummy {f00=0x0084, f01=0x0190, f02=»ATA 0 DWTMDE DATA ERROR (NO RETRY PERF) /000E S 2 P DATA 0,0 DWTMOK CONTROL READING OK (32 BITS) T 6 P* POS COUNTER T l , P DATA 0 DWTREP POS ONE MORE TRY COUNTER T P* STATISTIC COUNTERS FOR POS T & P DATA 0 DWTPND NO DATA = PPOS ERR T ( P DATA 0
0x1a2e4c…1a2fe0 Dummy {f00=0x0084, f01=0x0190, f02=»0 DWTPIT PREV=ILL TM = 2 TRIES T . P DATA 0 DWTPIS PREV=ILL SEQ NO = 2 TRIES U & . P DATA 0 DWTPIE PREV =ILL DAT ERR = 2 TRIES U X & P DATA 0 DWTPDB ERROR AFTER 2 TRIES U P* U & P DATA 0 DWTTMK TAPE MARK INDICATOR U P* U $ P* STATISTIC COUNTERS F
0x1a2fe0…1a3174 (1, 376) Dummy {f00=0x0085, f01=0x0190, f02=» U p " P* DWCC02 DEVICE WORK TABLE CC2 V P V . PDWCC02 DATA CCDA DWTCHP V 6 P DATA /8000 DWTST V V P DATA 0 DWTECB V p P DATA 0 DWTOR V P DATA DWCC02 DWTADR V P DATA 0 DWTTAB V P DATA 0 DWTWAT V P DATA 0 DWTTQ V & P DATA 0 DWTREQ
0x1a3174…1a3308 Dummy {f00=0x0085, f01=0x0190, f02=»A 0 V P DATA 0 W P DATA 0 DWTSB2 STACK BASE W & P DATA 0 DWTSA2 SAVE AREA FOR REG W > P DATA 0 DWTSA5 W h P DATA 0 DWTSA7 W ~ ( P DATA /FFFF DWTINT /0: INT ALLOWED W " P DATA 0 DWTMOD BIT0: SEQ MODE W P DATA 0 DWTSQC SEQ COUNTER W "
0x1a3308…1a349c Dummy {f00=0x0085, f01=0x0190, f02=»CAS LOCKED FLAG W & P DATA 0 DWTSTP TRAY STEPPED FLAG X & P DATA 0 DWTPWF PWF TIMER ADDRESS X B , P WER A3,C2IOPL DWTWRL I/O INSTRUCTIONS X l P WER A4,C2IOPA DWTWRA X P RER A3,C2IOPA DWTRRA X P CIO A1,1,CHCC2 DWTIOS X P CIO A1,0,CHCC2 DW
0x1a349c…1a3630 Dummy {f00=0x0085, f01=0x0190, f02=»UFFER ADDRESS X z " P* STATISTIC COUNTERS FOR WRITE Y P DATA 0 DWTWBM BOT MISSING Y < ( P DATA 0 DWTWIL ILLEGAL STATUS /0841 Y ^ . P DATA 0 DWTWSE SEQ ERROR = POS ERROR /0010 Y 6 P DATA 0 DWTWRE RETRY ERROR = NORM DATA ERROR /0004 Y * P DATA 0,0 DWTWOK W
0x1a3630…1a37c4 Dummy {f00=0x0085, f01=0x0190, f02=» DATA 0 DWTRIL ILLEGAL STATUS /0841 Y . P DATA 0,0 DWTRSE SEQ ERROR /0010 (32 BITS) Z , 8 P DATA 0 DWTRRE RETRY ERROR = NORMAL DATA ERROR /000E Z ^ * P DATA 0,0 DWTROK READING OK (32 BITS) Z 6 P* STATISTIC COUNTERS FOR CONTROL READ (READ MATS) Z P DATA
0x1a37c4…1a3958 Dummy {f00=0x0085, f01=0x0190, f02=»O RETRY PERF) /000E Z t 2 P DATA 0,0 DWTMOK CONTROL READING OK (32 BITS) [ P* POS COUNTER [ R , P DATA 0 DWTREP POS ONE MORE TRY COUNTER [ h P* STATISTIC COUNTERS FOR POS [ & P DATA 0 DWTPND NO DATA = PPOS ERR [ ( P DATA 0 DWTPBM BOT MISSING = POS E
0x1a3958…1a3aec Dummy {f00=0x0085, f01=0x0190, f02=»RIES [ p . P DATA 0 DWTPIS PREV=ILL SEQ NO = 2 TRIES . P DATA 0 DWTPIE PREV =ILL DAT ERR = 2 TRIES > & P DATA 0 DWTPDB ERROR AFTER 2 TRIES p P* & P DATA 0 DWTTMK TAPE MARK INDICATOR P* $ P* STATISTIC COUNTERS FOR CHANGER " P DATA 0
0x1a3aec…1a3c80 Dummy {f00=0x0085, f01=0x018e, f02=»RK TABLE CC3 ~ P ] PDWCC03 DATA CCDA DWTCHP ] P DATA /8000 DWTST ] < P DATA 0 DWTECB ] V P DATA 0 DWTOR ] l P DATA DWCC03 DWTADR ] P DATA 0 DWTTAB ] P DATA 0 DWTWAT ] P DATA 0 DWTTQ ] & P DATA 0 DWTREQ REQ ORDER POINTER ] "
0x1a3c80…1a3e14 (1, 377) Dummy {f00=0x0085, f01=0x0190, f02=» P DATA 0 DWTSB2 STACK BASE ^ & P DATA 0 DWTSA2 SAVE AREA FOR REG ^ & P DATA 0 DWTSA5 ^ P P DATA 0 DWTSA7 ^ f ( P DATA /FFFF DWTINT /0: INT ALLOWED ^ | " P DATA 0 DWTMOD BIT0: SEQ MODE ^ P DATA 0 DWTSQC SEQ COUNTER ^ " P DATA 0 DWTTOT TIME O
0x1a3e14…1a3fa8 Dummy {f00=0x0085, f01=0x0190, f02=» DATA 0 DWTSTP TRAY STEPPED FLAG ^ & P DATA 0 DWTPWF PWF TIMER ADDRESS _ * , P WER A3,C3IOPL DWTWRL I/O INSTRUCTIONS _ T P WER A4,C3IOPA DWTWRA _ P RER A3,C3IOPA DWTRRA _ P CIO A1,1,CHCC3 DWTIOS _ P CIO A1,0,CHCC3 DWTIOH _ P SST A1,CHCC
0x1a3fa8…1a413c Dummy {f00=0x0085, f01=0x0190, f02=»STATISTIC COUNTERS FOR WRITE _ P DATA 0 DWTWBM BOT MISSING ` $ ( P DATA 0 DWTWIL ILLEGAL STATUS /0841 ` F . P DATA 0 DWTWSE SEQ ERROR = POS ERROR /0010 ` r 6 P DATA 0 DWTWRE RETRY ERROR = NORM DATA ERROR /0004 ` * P DATA 0,0 DWTWOK WRITING OK (32 BITS) `
0x1a413c…1a42d0 Dummy {f00=0x0085, f01=0x0190, f02=»TATUS /0841 ` x . P DATA 0,0 DWTRSE SEQ ERROR /0010 (32 BITS) a 8 P DATA 0 DWTRRE RETRY ERROR = NORMAL DATA ERROR /000E a F * P DATA 0,0 DWTROK READING OK (32 BITS) a 6 P* STATISTIC COUNTERS FOR CONTROL READ (READ MATS) a P DATA 0 DWTMNO NOT OPERABLE a
0x1a42d0…1a4464 Dummy {f00=0x0085, f01=0x0190, f02=» 2 P DATA 0,0 DWTMOK CONTROL READING OK (32 BITS) b P* POS COUNTER b : , P DATA 0 DWTREP POS ONE MORE TRY COUNTER b P P* STATISTIC COUNTERS FOR POS b & P DATA 0 DWTPND NO DATA = PPOS ERR b ( P DATA 0 DWTPBM BOT MISSING = POS ERR b , P DATA 0 DWTPNS
0x1a4464…1a45f8 Dummy {f00=0x0085, f01=0x418e, f02=»IS PREV=ILL SEQ NO = 2 TRIES b . P DATA 0 DWTPIE PREV =ILL DAT ERR = 2 TRIES c & & P DATA 0 DWTPDB ERROR AFTER 2 TRIES c X P* c & P DATA 0 DWTTMK TAPE MARK INDICATOR c P* c $ P* STATISTIC COUNTERS FOR CHANGER c " P DATA 0 DWTINS INSERT FAILURE c
0x1a45f8…1a478c Dummy {f00=0x0085, f01=0x2008, f02=» d THST HANDL STARTED FLAG 7 , ' WER A3,C1IOPL DWTWRL I/O INSTRUCTIONS 8 ( WER A4,C1IOPA DWTWRA 8 X RER A2,C1IOPA DWTRRA 8 v CIO A1,1,CHCC1 DWTIOS 8 CIO A1,0,CHCC1 DWTIOH 8 SST A1,CHCC1 DWTSST 8 ( # DATA CCBUF1 DWTBUF BUFFER
0x1a478c…1a4920 Dummy {f00=0x0085, f01=0x018e, f02=»ARD /0A P* PREAD EQU * $ P LDK A4,RTRIES SET NO OF RETRIES . $ P LC A2,DWTBC,A6 GET BYTE COUNTER V P ANK A2,/FF ~ " P SUK A2,/0C DOCUMENT INSERTED P RF(NE) WRIT02 NO PREAD02 EQU * P LDK A3,0 RESET BUFFER INDEX $
0x1a4920…1a4ab4 (1, 378) Opaque[0x194]
0x1a4ab4…1a4c48 # DirEnt {nam=»CD:TAB«, typ=»SC«, f00=0x4dc0, f01=0x5c04, f02=0x10b0, f03=0x001f}
0x1a4ab4…1a4c48 IdxSect {
0x1a4ab4…1a4c48 f00 = 0x0085 // 0x1a4ab4 @0x0
0x1a4ab4…1a4c48 f01 = 0x0002 // 0x1a4ab6 @0x2
0x1a4ab4…1a4c48 gno = [ // 0x1a4ab8 @0x4
0x1a4ab4…1a4c48 [0x00]: C0x0085.0x2.0
0x1a4ab4…1a4c48 ]
0x1a4ab4…1a4c48 }
0x1a4c48…1a4ddc Dummy {f00=0x0085, f01=0x0190, f02=» 2 P IDENT CD:TAB REL 8.2 78-09-15 870105040820 P* : P* COMMON DEVICE TABLE D P* d 0 P* THIS TABLE HOLDS DEVICES THAT ARE COMMON n P* TO ALL TASKS P* P ENTRY CD:TAB P ENTRY CDTABF P EXTRN DWDU01 P E
0x1a4ddc…1a4f70 Dummy {f00=0x0085, f01=0x018e, f02=» PCD:TAB DATA CDTABE-* P DATA /00F0 $ P DATA DWDU01 8 P DATA /01F1 L P DATA DWDU01 ` P DATA /00F2 t P DATA DWDU02 P DATA /01F3 P DATA DWDU02 P DATA /00F8 JOS P DATA DWFD01 JOS P DATA /01F9 JOS
0x1a4f70…1a5104 Dummy {f00=0x0085, f01=0x403c, f02=» PCDTABE EQU * P* P* " P END ,@ 8A DWDU01 8 P DATA /01F1 L P DATA DWDU01 ` P DATA /00F2 t P DATA DWDU02 P DATA /01F3 P DATA DWDU02 P DATA /00F8 JOS P DATA DWFD01 JOS P DATA /01F9 JOS
0x1a5104…1a5298 Dummy {f00=0x0085, f01=0x2008, f02=» NT CDTAB P* P* " P* COMMON DEVICE TABLE , P* L 0 P* THIS TABLE HOLDS DEVICES THAT ARE COMMON V P* TO ALL TASKS P* P ENTRY CDTAB P* P* P* P* P* P* P* P*
0x1a5298…1a542c Dummy {f00=0x0085, f01=0x018e, f02=» # " P RB(NZ) ERT10 ERASE NOT READY $ P RB READ50 $ . P* $ @ P* $ J P* O L O C K $ T P* $ j P* ORDER LOCK CASSETTE $ t P* $ P* $ " POLOCK CF A8,LOCK LOCK CASSETTE $ " P RB(Z) REW010 CASSETTE LOCKED $ P RB LOAD10 $ P X
0x1a542c…1a55c0 Dummy {f00=0x0085, f01=0x018e, f02=» PSELECT EQU * % P LDK A2,/FF LOAD MASK % " P ANS A2,DWTST,A6 SET DWT BUSY % 6 P IFT DBCAS=1 % P LDK A3,0 SELECT CODE % p P XIF % P IFT DBCAS=2 % P LDR* A3,A6 GET OTHER DWT % " P ANS A2,DWTST,A3 SET DWT BUSY % P ANK A3,1 GET SELE
0x1a55c0…1a5754 (1, 379) Opaque[0x194]
0x1a5754…1a58e8 # DirEnt {nam=»DRDU01«, typ=»SC«, f00=0x855d, f01=0x0000, f02=0x10b8, f03=0x3d49}
0x1a5754…1a58e8 IdxSect {
0x1a5754…1a58e8 f00 = 0x0085 // 0x1a5754 @0x0
0x1a5754…1a58e8 f01 = 0x000e // 0x1a5756 @0x2
0x1a5754…1a58e8 gno = [ // 0x1a5758 @0x4
0x1a5754…1a58e8 [0x00]: C0x0085.0x3.0
0x1a5754…1a58e8 [0x01]: C0x0086.0x0.0
0x1a5754…1a58e8 [0x02]: C0x0086.0x1.0
0x1a5754…1a58e8 [0x03]: C0x0086.0x2.0
0x1a5754…1a58e8 [0x04]: C0x0086.0x3.0
0x1a5754…1a58e8 [0x05]: C0x0087.0x0.0
0x1a5754…1a58e8 [0x06]: C0x0087.0x1.0
0x1a5754…1a58e8 ]
0x1a5754…1a58e8 }
0x1a58e8…1a5a7c Dummy {f00=0x0085, f01=0x0190, f02=» 2 P IDENT DRDU01 REL 8.2 78-09-15 870105040820 P : P* B 2 P********************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* D P* DRDU01 = DRIVER FOR ONE/TWO DISC UNITS X/1215 AND/OR X/1216 P*
0x1a5a7c…1a5c10 Dummy {f00=0x0085, f01=0x0190, f02=»* THIS DISC DRIVER HANDLES UP TO TWO DISC 6 P* DRIVES X/1215,X/1216 CONNECTED TO CPU VIA IOP 4 P* ON MULTIPLEX CHANNEL n P* P* * P* THE FOLLOWING ORDERS ARE TRAETED : P* P* /00 TEST STATUS P* /01 BASIC
0x1a5c10…1a5da4 Dummy {f00=0x0085, f01=0x0190, f02=» P P P* P*********** " P* ENTRIES * 6 P*********** J P* ^ $ P ENTRY DUADR ACTIVATION ADDRESS h P ENTRY DUON RECIVERY ROUTINE 2 P ENTRY IHDU1 INTERRUPT HANDLER DISC UNIT NO. 1 2 P ENTRY IHDU INTERRUPT HANDLER
0x1a5da4…1a5f38 Dummy {f00=0x0085, f01=0x0190, f02=»WDU02 DWT-ADDRESS DISC UNIT NO. 2 P * P 2 P : P* B P************* L P* EXTERNALS * b P************* x P* P EXTRN TDISP DISPATCHER P EXTRN TENDIO ENDIO . P EXTRN SAVE8 SAVE REGS. A1-A8 ON A15 STACK P E
0x1a5f38…1a60cc Dummy {f00=0x0085, f01=0x0190, f02=»FLG INITIALIZATION FLAG P EXTRN DWTVOL VOLUME NAME * P EXTRN INTSAV SAVEAREA LAST INTERRUPT B P EXTRN SETIMP TIMER p P EJECT P P P* P************************** P* * P* CONDITIONAL A
0x1a60cc…1a6260 Dummy {f00=0x0085, f01=0x0190, f02=» ORDER /15 h P* BY SETTING X:A = 0 P* 0 P : PX:A EQU 0 B PRAW EQU X:A T P* h P* r . P* THIS DRIVER CAN HANDLE TWO DISC UNITS | P* IF X:B := 2 P* P PX:B EQU 1 PNUNITS EQU X:B P*
0x1a6260…1a63f4 (1, 380) Dummy {f00=0x0086, f01=0x0190, f02=»X:C P* 4 P* DRIVE 2 MAY BE A X/1216 INSTEAD OF A X/1215 P* BY SETTING X:D = 1 N P* l PX:D EQU 0 v PTYPE2 EQU X:D P EJECT DRDU01 P P P* P************* P* CONSTANTS * P************
0x1a63f4…1a6588 Dummy {f00=0x0086, f01=0x0190, f02=» /38 DEVICE ADDRESS FIXED DISC NO. 2 4 PDAC2 EQU /18 DEVICE ADDRESS CARTRIDGE DISC NO. 2 , $ PWER1 EQU /10 MULTIPLEXOR ADDRESS d & PCUADR EQU /08 CONTROL UNIT ADDRESS P P * PMAXCY5 EQU 203 MAX CYLINDER NO X/1215 * PMAXCY6 EQU 407 MAX.
0x1a6588…1a671c Dummy {f00=0x0086, f01=0x0190, f02=»COUNT PTIME EQU 1000 2 MINUTES P . P 6 P* > P*********************** H P* * h P* DWT-DISPLACEMENTS * P* * P*********************** P* * PDWTA2 EQU /12 DWT-DISP
0x1a671c…1a68b0 Dummy {f00=0x0086, f01=0x018e, f02=» ,1:ST STACK BASE | . PDWTSB2 EQU /1E ,STACK BASE $ P EJECT DRDU01 V P n P v P************** ~ P* & PDUADR DATA DUAD ACTIVATION ADDRESS ( PBUF RES 5 SECTOR BUFFER - 200 WORDS P IFT RAW=1 $ P R
0x1a68b0…1a6a44 Dummy {f00=0x0086, f01=0x018e, f02=» P* P* 6 P* TABLE FOR CONVERSION FROM LOGICAL TO PHYSICAL P* SECTOR NUMBER R P* l P* v @ PSECTAB DATA /0003,/0609,/0C0F,/0205,/080B,/0E01,/0407,/0A0D : P DATA /1013,/1619,/1C1F,/1215,/181B,/1E11,/1417,/1A1D P EJECT
0x1a6a44…1a6bd8 Dummy {f00=0x0086, f01=0x0190, f02=» | P***************** P* " PDUAD EQU * ACTIVATION ENTRY , P IFT NUNITS=2 P P LDKL A1,/7FFF f ( P LDR* A2,A6 GET OTHER DISC UNIT DWT | . P ANS A1,DWTST,A2 SET OTHER DISC UNIT BUSY P XIF P P P SUK A5,4 STACK BA
0x1a6bd8…1a6d6c Dummy {f00=0x0086, f01=0x018e, f02=»DR A1,A1 P ADR A1,A6 P LD A2,DWTBSY,A1 " P RF(Z) DUA:10 DISC READY : P LDR A7,A7 Z $ P RF(Z) DUA:10 TEST STATUS ORDER l & P LDK A1,/80 DISC HAS BECOME READY P ABL END:15 P EJECT P P PDUA:10 LDR A1,A7 ORDER
0x1a6d6c…1a6f00 Dummy {f00=0x0086, f01=0x0190, f02=» t P SUK A1,12 P RF(Z) DUA:20 PHYSICAL READ P SUK A1,4 @ P RF(Z) DUA:20 PHYSICAL WRITE R P v P EJECT ~ P P " PDUERR ABL DISIOE REQUEST ERROR P P & PDUA:20 LDK A4,RY4 RETRY COUNT = 4 P P ST
0x1a6f00…1a7094 (1, 381) Dummy {f00=0x0086, f01=0x0190, f02=» # 410 r P EJECT DRDU01 P & P . ( P LD A2,10,A8 RELATIVE SECTOR NUMBER 6 P LDR A3,A2 b & P ANK A3,/1F LOGICAL SECTOR NUMBER t , P LC A3,SECTAB,A3 PHYSICAL SECTOR NUMBER P SC A3,DWTSEC,A6 SAVE IT P P P SRL A2,5
0x1a7094…1a7228 Dummy {f00=0x0086, f01=0x0190, f02=»A6 COMPARE WITH CURRENT CYLINDER NUMBER . P RF(E) DU:030 DISC HEAD ALREADT POSITIONED 0 * P ST A2,DWTCYL,A6 SAVE CYLINDER NUMBER b P P EJECT DRDU01 P P P* P************************ P* *
0x1a7228…1a73bc Dummy {f00=0x0086, f01=0x0190, f02=»DER N t P SLC A1,6 & P RF(NN) DU:030 OK. SEEK COMPLETED P J P R P* Z P************************ d P* * P* SEEK CYLINDER 0 * P* * P************************ P*
0x1a73bc…1a7550 Dummy {f00=0x0086, f01=0x0190, f02=»10 TRY AGAIN P * PDU:020 LDKL A3,/FFFF ALL RETRIES DONE 0 P ST A3,DWTCYL,A6 SET ILLEGAL CYLINDER NUMBER J ( P LDKL A1,/200 SEEK ERROR RETURN CODE ~ P ABL END:IO PERFORM ENDIO P EJECT DRDU01 P P P* P**********
0x1a7550…1a76e4 Dummy {f00=0x0086, f01=0x0190, f02=»**************** P* P* " PDU:030 LDR A1,A7 ORDER , P RF(Z) TEST TEST STATUS J P SUK A1,5 j P RF(Z) WRIT:N BASIC WRITE | P SUK A1,12 P RF(NP) READ:N READ P P P P* P************************
0x1a76e4…1a7878 Dummy {f00=0x0086, f01=0x0190, f02=» 0 PP:WRIT CF A5,WER:R5 EXECUTE WER INSTRUCTIONS P CF A5,READ5 READ FIVE WORDS < P ANK A1,2 ` , P RF(Z) P:WR10 OK. CHECK CYLINDER NUMBER r & P SUK A4,1 DECREMENT RETRY COUNTER $ P ABL(Z) END:IO ALL RETRIES DONE P RB P:WRIT TRY AGAIN
0x1a7878…1a7a0c Dummy {f00=0x0086, f01=0x0190, f02=»CYLINDER NUMBER n ( P RB(NE) DU:015 ERROR.SEEK CYLINDER 0 P D P L P T P* P********************* f P* * P* WRITE SECTOR N * P* * P********************* P* 0 PWR
0x1a7a0c…1a7ba0 Dummy {f00=0x0086, f01=0x0190, f02=»DE r & P SUK A4,1 DECREMENT RETRY COUNTER $ P ABL(Z) END:IO ALL RETRIES DONE 4 P RB WRIT:N TRY AGAIN P x P IFT RAW=1 PWRIT20 CWK A7,5 P ABL(E) END:IO BASIC WRITE & P LDKL A3,BUF DRIVER BUFFER ADDRESS P XIF P IFF R
0x1a7ba0…1a7d34 (1, 382) Dummy {f00=0x0086, f01=0x018e, f02=» z P* * P* READ SECTOR N * & P* * D P********************** b P* 0 PREAD:N CF A5,WER:R EXECUTE WER INSTRUCTIONS P CF A5,READ READ SECTOR N P ANK A1,/F $ P RF(Z) READ10 OK. NO R
0x1a7d34…1a7ec8 Dummy {f00=0x0086, f01=0x018e, f02=» P*************************** P* * ( P* CHECK CYLINDER NUMBER * L P* * p P*************************** P* P* 4 PREAD10 LD A2,DWTCYL,A6 REQUESTED CYLINDER NUMBER 6 P CW*
0x1a7ec8…1a805c Dummy {f00=0x0086, f01=0x0190, f02=» P EJECT DRDU01 P P $ P* , P********************* 6 P* * T P* TEST STATUS * r P* * P********************* P* 4 PTEST LDKL A2,DWTNAM VOLUME NAME DWT DISPLACEMENT
0x1a805c…1a81f0 Dummy {f00=0x0086, f01=0x0190, f02=» 2 PTEST10 ST A2,10,A8 SAVE ADDRESS TO VOLUME NAME P SUR A1,A1 SET RETURN CODE=0 : P ABL END:IO PEABLORM ENDIO ^ P EJECT DRDU01 P P P* " P****************************** " P* * " P* EXECUTE
0x1a81f0…1a8384 Dummy {f00=0x0086, f01=0x0190, f02=»EAD 5 WORDS z & P LDKL A3,BUF DRIVER BUFFER ADDRESS P RF EX:WER > P P P X & PWER:R LDKL A2,/80CD READ 1 SECTOR ` P CWK A3,BUF P RF(E) EX:WER P RF WER:WB P P & PWER:W LDKL A2,/C0CD WRITE 1 SECTOR * PWER:WB L
0x1a8384…1a8518 Dummy {f00=0x0086, f01=0x0190, f02=» RTN A5 P EJECT DRDU01 P ( P 0 P* 8 P******************* B P* * ^ P* SEEK CYLINDER * z P* * P******************* P* ( PSEEK LD A2,DWTCYL,A6 CYLINDER NUMBER P SLL
0x1a8518…1a86ac Dummy {f00=0x0086, f01=0x0190, f02=»CIO-START P P ( PREAD5 LC A2,DWTSEC,A6 SECTOR NUMBER " P ANK A2,/1F N P SUK A2,3 SECTOR N-1 b P ANK A2,/1F ~ P SLL A2,2 P RF CIO EXECUTE CIO-START P EJECT DRDU01 P P & PREAD LC A2,DWTSEC,A6 SECTO
0x1a86ac…1a8840 Dummy {f00=0x0086, f01=0x0190, f02=»UMBER p , P ST* A2,2,A8 PUT CYLNMB. IN USER BUFFER " P LC A2,DWTSEC,A6 SECTOR NUMBER > P SLL A2,2 d P ADK A2,1 v P EJECT DRDU01 P P P PCIO EQU * P P PEX:CIO LC A1,DWTOR,A6 P ANK A1,1 INDEX
0x1a8840…1a89d4 (1, 383) Dummy {f00=0x0086, f01=0x0190, f02=»VE REGS. A2 z " P ST A4,DWTA4,A6 A4 " P ST A5,DWTA5,A6 A5 : & PT:DISP ABL TDISP GO TO DISPATCHER ` P EJECT DRDU01 P P P* P********************** P* * P* RECOVERY ROUT
0x1a89d4…1a8b68 Dummy {f00=0x0086, f01=0x0190, f02=» P LDKL A6,DWDU01 P & P LD A1,INIFLG INITIALIZATION FLAG $ P RF(Z) DUON08 POWER UP N P l P t PDURED2 EQU * | P LDKL A1,/7FFF ( P ANS A1,DWTST,A6 SET DISC UNIT BUSY $ PDUON05 LDKL A5,DWTSB2 STACK BASE P LDKL A6,DWDU0
0x1a8b68…1a8cfc Dummy {f00=0x0086, f01=0x0190, f02=» , P LDR* A6,A6 OTHER DISC UNIT DWT-ADDRESS P LDKL A5,DWTSB2 8 P ADR A5,A6 STACK BASE P P n P v P LDKL A1,/7FFF ~ " P ANS A1,DWTST,A6 SET DWT BUSY P P " P CF A5,VO:NAM GET VOLUME NAME P CF A15,TENDIO PERFORM E
0x1a8cfc…1a8e90 Dummy {f00=0x0086, f01=0x0190, f02=» ~ " P RB(Z) DURED2 NO TIMER ACTIVE ! P RB T:DISP TIMER ACTIVE ! . P EJECT ! N PDUON08 EQU * ! P LDK A1,2 THROUGHPUT ERROR ! p " P LD A2,DWTST,A6 GET DWT STATUS ! P RF(N) DUON10 UNIT FREE ! P CF A15,TENDIO PERFORM ENDIO ! P ! P !
0x1a8e90…1a9024 Dummy {f00=0x0086, f01=0x018e, f02=»IT FREE ! P CF A15,TENDIO PERFORM ENDIO " P XIF " 4 P* " @ $ P* SET DISC BUSY AND START TIMER " J P* " r PDUON20 LDKL A1,/7FFF " | P IFT NUNITS=2 " " P ANS A1,DWTST,A6 SET UNIT BUSY " " P LDR* A6,A6 OTHER DWT ADDRESS " P XIF " " P A
0x1a9024…1a91b8 Dummy {f00=0x0086, f01=0x0190, f02=» P LDKL A1,-TIME # P STR A1,A3 RESTART TIMER # P RB T:DISP # : P* # L $ PDUON30 CF A15,SETIMP START TIMER # V , P DATA DUON40,TIME TIME OUT ADDRESS, TIME # ~ P RB T:DISP # P* # P* TIME-OUT # P* # PDUON40 LDKL A6,DWDU01 # P C
0x1a91b8…1a934c Dummy {f00=0x0086, f01=0x0190, f02=» * # | P* INTERRUPT HANDLER * $ P* * $ , P*********************** $ L P* $ l PIHDU2 EQU * $ v P IFT NUNITS=2 $ $ P ST P,INTSAV SAVE LAST INTERRUPT $ P CF A15,SAVE8 $ $ P LDKL A6,DWDU02 DISC UNIT NO. 2 $ P R
0x1a934c…1a94e0 Dummy {f00=0x0086, f01=0x0190, f02=»,DWDU01 DISC UNIT NO. 1 $ P % P % ( " PIHDU10 SST A1,CUADR GET STATUS % 0 P IFT NUNITS=2 % V P LDR A2,A1 % l P ANK A2,/40 % ~ P RF(Z) IHDU20 % P LDKL A6,DWDU02 % P XIF % PIHDU20 EQU * % $ P ANKL A1,/440F MASK RETURN CODE % P
0x1a94e0…1a9674 (1, 384) Dummy {f00=0x0087, f01=0x018e, f02=»DR A3,A1 % P ANK A3,1 & * P RF(NZ) END:IO DISC UNIT NOT OPERABLE & " P EJECT DRDU01 & P P & h P & p * PGET LD A5,DWTA5,A6 RELOAD REGISTERS A5 & x ( P LD A4,DWTA4,A6 A4 & ( P LD A2,DWTA2,A6 A2 & P LD A7,DWT
0x1a9674…1a9808 Dummy {f00=0x0087, f01=0x0190, f02=» & P******************* ' P* * ' $ P* PERFORM ENDIO * ' @ P* * ' P******************* ' x P* ' PEND:IO EQU * ' P ' " P ANKL A1,/28F MASK RETURN CODE ' P RF(NZ) END:10 ERROR ' " P LD A2,4,A8
0x1a9808…1a999c Dummy {f00=0x0087, f01=0x0190, f02=»W A2,DWTA4,A6 ' P RF(E) END:15 NO RETRY ( " P ORKL A1,/100 BIT 7 = RETRIES ( 4 PEND:15 EQU * ( Z P LC A2,DWTOR,A6 ORDER ( n P ANK A2,1 INDEX ( P ADR A2,A2 ( P ADR A2,A6 ( " P CM DWTBSY,A2 RESET READY WORD ( P IFT NUNITS=2 ( , P LDR
0x1a999c…1a9b30 Dummy {f00=0x0087, f01=0x0190, f02=» P CF A15,TENDIO PERFORM ENDIO ) & PEND:20 ABL TDISP GO TO DISPATCHER ) ( P EJECT ) R P ) ` P ) h PVO:NAM LD A1,DWTOR,A6 ORDER ) p P ST A1,DWTSAV,A6 SAVE IT ) P CM DWTOR,A6 INDEX=0 ) PVO:NA5 EQU * ) P ) P ) P ) $ PDU:NAM CF A5
0x1a9b30…1a9cc4 Dummy {f00=0x0087, f01=0x0190, f02=»STRUCTIONS ) t " P SUR A2,A2 CYLINDER NUMBER = 0 * P ST A2,DWTCYL,A6 * 8 P CF A5,CIO READ VOLUME LABEL * P P ANK A1,3 * t 0 P RF(NZ) VO:NA8 THROUGHPUT-ERROR,NOT OPERABLE * P * P * P LDKL A2,DWTNAM * P ADR A2,A6 * P LC A1,DWTOR,A6 *
0x1a9cc4…1a9e58 Dummy {f00=0x0087, f01=0x0190, f02=»ETURN CODE * x " P LDKL A3,BUF+2 BUFFER ADDRESS + P LDK A4,6 + 8 P + J P + R P + Z & PDUNA20 LDR* A7,A3 GET VOLUME NAME + b . P CWR* A7,A2 COMPARE WITH LAST VOLUME NAME + P RF(E) DUNA30 SAME DISC + P LDK A1,/80 NEW DISC LOADED + P +
0x1a9e58…1a9fec Dummy {f00=0x0087, f01=0x0190, f02=») DUNA20 GET NEXT WORD + P , P , & P LDR A1,A1 , . P RF(Z) DUNA40 VOLUME MATCH , @ P LC A2,DWTOR,A6 INDEX , b P ANK A2,1 , P ADR A2,A2 , P ADR A2,A6 , & P ST A1,DWTBSY,A2 NEW VOLUME LOADED , PDUNA40 EQU * , P , P , P LD
0x1a9fec…1aa180 Dummy {f00=0x0087, f01=0x0190, f02=»,DWTSAV,A6 GET OLD DWT CONTENTS , P ST A1,DWTOR,A6 SAVE IT - ( P LDKL A1,-1 - H P ST A1,DWTSAV,A6 - P LDKL A5,DWTSB1 - t P ADR A5,A6 STACK BASE - ( P LDK A1,1 RETURN CODE. NOT OPERABLE - P RTN A5 - P* - P* - P* TIMER POIN
0x1aa180…1aa314 (1, 385) Dummy {f00=0x0087, f01=0x0190, f02=»T NO. 2 - r P* . P* . PDWDU02 EQU * . $ P IFT NUNITS=2 . 8 & P DATA DWDU01 POINTER TO OTHER DWT . N P DATA /8000 DWT STATUS . x P DATA 0 ECB-ADDRESS . P DATA 0 ORDER . " P DATA DUADR ACTIVATION ADDRESS . P DATA 0 TTAB-ADDRESS . $
0x1aa314…1aa4a8 Dummy {f00=0x0087, f01=0x0190, f02=»A FOR REGISTERS . | P DATA 0,0 STACK / P DATA 0,0 / 0 & P DATA /80 DISC UNIT BUSY INDICATOR / B P DATA /80 / l $ P RIGHT BYTE = CYLINDER NUMBER / ~ ( P CIO A2,1,DAF2 CIO-START FIXED DISC / , P CIO A2,1,DAC2 CIO-START CARTRIDGE DISC / P WER A
0x1aa4a8…1aa63c Dummy {f00=0x0087, f01=0x0190, f02=» P DATA /FFFF CYLINDER NO. 0 P IFT TYPE2=0 0 $ P DATA MAXCY5 MAX CYLINDER NO 0 8 P XIF 0 P IFT NUNITS+TYPE2=3 0 h P DATA MAXCY6 MAX CYLINDER NO 0 P XIF 0 P EJECT DRDU01 0 P 0 P* 0 * P* DEVICE WORK TABLE DISC UNIT NO. 1 0
0x1aa63c…1aa7d0 Dummy {f00=0x0087, f01=0x0190, f02=» 0 | P DATA 0 ORDER 1 " P DATA DUADR ACTIVATION ADDRESS 1 P DATA 0 TTAB-ADDRESS 1 D $ P DATA 0 WAIT/ACTIVATE INDICATOR 1 ` P DATA 0 TERMINAL QUEUE 1 PDWTSEC EQU *-DWDU01 1 ( P DATA /00FF LEFT BYTE=SECTOR NUMBER 1 ( P DATA 0,0,0 SAVE AREA FOR
0x1aa7d0…1aa964 Dummy {f00=0x0087, f01=0x0190, f02=»UNIT BUSY INDICATOR 1 " PDWTCIO EQU *-DWDU01 CIO-START 2 P CIO A2,1,DAF1 2 B P CIO A2,1,DAC1 2 X , PDWTWR1 EQU *-DWDU01 1:ST WER INSTRUCTION 2 n P WER A2,WER1 2 , PDWTWR2 EQU *-DWDU01 2:ND WER INSTRUCTION 2 P WER A3,WER1+1 2 PDWTNAM EQU *-DWD
0x1aa964…1aaaf8 Dummy {f00=0x0087, f01=0x4124, f02=» 2 PDWTCYL EQU *-DWDU01 3 P DATA /FFFF CYLINDER NUMBER 3 $ P IFT TYPE1=0 3 H PDWTCMX EQU *-DWDU01 3 $ P DATA MAXCY5 MAX CYLINDER X/1215 3 x P XIF 3 P IFT TYPE1=1 3 PDWTCMX EQU *-DWDU01 3 ( P DATA MAXCY6 MAX CYLINDER NO X/1216 3 P
0x1aaaf8…1aac8c Dummy {f00=0x0087, f01=0x2008, f02=» 4 -DWDU01 2:ND WER INSTRUCTION - P WER A3,WER1+1 . , PDWTNAM EQU *-DWDU01 . B PDWTVOL EQU *-DWDU01 . ^ & P DATA 0,0,0 VOLUME NAME FIXED DISC . z * P DATA 0,0,0 VOLUME NAME CARTRIDGE DISC . PDWTSAV EQU *-DWDU01 . P DATA -1 . P END . @
0x1aac8c…1aae20 Dummy {f00=0x0087, f01=0x0190, f02=»T TIMEOUT VALUE ~ P RB(Z) TIME10 NO TIMING P ST A2,TIMWR 8 P CF A15,SETIME L P DATA TOUTWR b PTIMWR DATA 0 v P ST A4,DWTTP,A6 P RB TIME10 P EJECT P* P* TIMEOUT WRITE TIMER P* PTOUTWR EQU * P
0x1aae20…1aafb4 (1, 386) Opaque[0x194]
0x1aafb4…1ab148 # DirEnt {nam=»CTABX «, typ=»SC«, f00=0x000a, f01=0x2020, f02=0x10f0, f03=0x2020}
0x1aafb4…1ab148 IdxSect {
0x1aafb4…1ab148 f00 = 0x0087 // 0x1aafb4 @0x0
0x1aafb4…1ab148 f01 = 0x0002 // 0x1aafb6 @0x2
0x1aafb4…1ab148 gno = [ // 0x1aafb8 @0x4
0x1aafb4…1ab148 [0x00]: C0x0087.0x2.0
0x1aafb4…1ab148 ]
0x1aafb4…1ab148 }
0x1ab148…1ab2dc Dummy {f00=0x0087, f01=0x0190, f02=» 0 P IDENT CTABX REL 8.2 78-09-15 870105040820 P* 8 P* B P* CODE CONVERSION TABLE L P* n P* x P ENTRY CTABX P* P* * PC0 EQU 0 CODE CONVERSION COLUMN NO. 0 ( PC1 EQU 0 1 ( PC2 E
0x1ab2dc…1ab470 Dummy {f00=0x0087, f01=0x4144, f02=» 5 ( PC6 EQU 0 6 $ ( PC7 EQU 0 7 P P* | P* P* PCTABX DATA C0 P DATA C1 P DATA C2 P DATA C3 P DATA C4 P DATA C5 P DATA C6
0x1ab470…1ab604 Dummy {f00=0x0087, f01=0x2008, f02=» C7 EQU 0 7 * 4 * > * H CTABX DATA C1 R DATA C2 h DATA C2 x DATA C3 DATA C4 DATA C5 DATA C6 DATA C7 * * END @
0x1ab604…1ab798 Dummy {f00=0x0087, f01=0x2008, f02=» P EXTRN IN:LT2 P EXTRN IN:RT1 " P EXTRN IN:RT2 8 P* N P* X P* b P* l PMONTAB EQU * v PTCTAB DATA TC:TAB PCDTAB DATA CD:TAB PBLOCKS DATA BLOK:S PDCTAB DATA DC:TAB PINTLT1 DATA IN:LT1
0x1ab798…1ab92c Dummy {f00=0x0087, f01=0x0190, f02=» PX:F EQU 3 $ P* X:F = RETRY LIMIT FOR RECOVERY P* B P* L PBDA EQU 0 V B P* IF BDA = 1, TC ADDRESSES ARE ADAPTED FOR THE BANKDATA CASE: h " P* INPUT = /41 -/4F (A - O) L P* OUTPUT = ADDRESSES ACCORDING TO IBM REMOTE CONT
0x1ab92c…1abac0 Dummy {f00=0x0087, f01=0x0190, f02=» SAVING d H P* LINE NUMBER, ORDER, RETURN CODE AND TID FOR THE 100 LAST REQUESTS. P* P* f P EJECT p P* ~ < P******************************************************* P* P* SYSTEM PARAMETERS P* < P****************
0x1abac0…1abc54 (1, 387) Opaque[0x194]
0x1abc54…1abde8 # DirEnt {nam=»DRCG01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x10f8, f03=0x2020}
0x1abc54…1abde8 IdxSect {
0x1abc54…1abde8 f00 = 0x0087 // 0x1abc54 @0x0
0x1abc54…1abde8 f01 = 0x000e // 0x1abc56 @0x2
0x1abc54…1abde8 gno = [ // 0x1abc58 @0x4
0x1abc54…1abde8 [0x00]: C0x0087.0x3.0
0x1abc54…1abde8 [0x01]: C0x0088.0x0.0
0x1abc54…1abde8 [0x02]: C0x0088.0x1.0
0x1abc54…1abde8 [0x03]: C0x0088.0x2.0
0x1abc54…1abde8 [0x04]: C0x0088.0x3.0
0x1abc54…1abde8 [0x05]: C0x0089.0x0.0
0x1abc54…1abde8 [0x06]: C0x0089.0x1.0
0x1abc54…1abde8 ]
0x1abc54…1abde8 }
0x1abde8…1abf7c Dummy {f00=0x0087, f01=0x0190, f02=» 2 P IDENT DRCG01 REL 8.2 78-09-15 870105040820 P : P* B 4 P*********************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 6 P* DRCG01 = DRIVER CUSTOMER OPERATED TELLER (COT) P* G
0x1abf7c…1ac110 Dummy {f00=0x0087, f01=0x0190, f02=»* 8 P* THIS DRIVER HANDLES OUTPUT TO AND INPUT FROM THE < P* GENERAL PART OF THE CUSTOMER OPERATED TELLER (COT). F > P* FOUR DEVICES OF THE COT ARE CONTROLED BY THIS DRIVER: " P* ---- MICROPROCESSOR & P* ---- CARD READER
0x1ac110…1ac2a4 Dummy {f00=0x0087, f01=0x0190, f02=» VIA CHLT. l P* 0 P* THE DRIVER CONSISTS OF FOLLOWING PARTS: P* P " P* A C C G : ACTIVATION PART Z P* $ P* I H C G : INTERRUPT HANDLER P* " P* R C C G : RECOVERY ROUTINE P* P EJECT P* * P*
0x1ac2a4…1ac438 Dummy {f00=0x0087, f01=0x018e, f02=»EYBOARD | P* ORDER 06: WRITE CARD P* ORDER 0A: READ CARD 0 P* ORDER 0B: PICK NOTES P P* ORDER 11: INSERT CARD p P* ORDER 22: FEED NOTES $ P* ORDER 26: FINISH TRANSACTION P* ORDER 31: RETURN CARD P* ORDER 33
0x1ac438…1ac5cc Dummy {f00=0x0087, f01=0x0190, f02=» P* P* A1 = RETURN CODE & P* A2 = INPUT OR OUTPUT CHARACTER * P* A3 = BUFFER INDEX T P* A4 = FUNCTION INDEX r P* A5 = STACK BASE P* A6 = DWT-ADDRESS P* A7 = ORDER P* A8 = ECB-ADDRESS P EJECT
0x1ac5cc…1ac760 Dummy {f00=0x0087, f01=0x0190, f02=» MOTOR VOLTAGE ERROR DISPENSER & P* BIT 3: TIMEOUT ERROR DISPENSER & ( P* BIT 4: SOLENOID ERROR DISPENSER P * P* BIT 5: ELECTRONICS ERROR DISPENSER | ( P* BIT 6: DETECTOR ERROR DISPENSER * P* BIT 7: FRONT SHUTTER DOESN'T CLOSE ( P*
0x1ac760…1ac8f4 (1, 388) Dummy {f00=0x0088, f01=0x0190, f02=» CUSTOMER AFTER POWER BREAK r < P* BIT 12: INCORRECT LENGTH, INCORRECT PIN, DUMP ERROR $ 6 P* BIT 13: NEGATIVE ACKNOWLEDGEMENT OF OPERATION d P* BIT 14: THROUGHPUT ERROR P* BIT 15: COT NOT OPERABLE P EJECT P* P* P
0x1ac8f4…1aca88 Dummy {f00=0x0088, f01=0x0190, f02=»S BLOCK ~ P* P* P* $ . P****************************************** . . P* EXTERNAL TOSS MODULE ENTRIES * ` . P****************************************** P* P EXTRN SAVE8 6 P EXTRN STREG STORE REGISTERS AND GO TO
0x1aca88…1acc1c Dummy {f00=0x0088, f01=0x0190, f02=»QUEST ERROR | 2 P EXTRN GETCHR GET NEXT CHARACTER IN ECB-BUFFER . P EXTRN DISEND END I/O AND GO TO DISPATCHER J " P EXTRN TDISP DISPATCHER ENTRY | P EXTRN ECHO ECHO SUBROUTINE P EXTRN ECHEND END OF ECHOING P EXTRN SETIMP P SET T
0x1acc1c…1acdb0 Dummy {f00=0x0088, f01=0x018e, f02=»PARAMETERS * & P********************************* " P* L P* V P EXTRN DWTST STATUS ` P EXTRN DWTOR ORDER | P EXTRN DWTECB ECB-ADDRESS P* * P************************************** * P* DWT-DISPLACEMENTS
0x1acdb0…1acf44 Dummy {f00=0x0088, f01=0x0190, f02=» " PDWTA4 EQU /14 SAVE AREA FOR A4 PDWTTP EQU /20 TIMER POINTER . " PDWTLRC EQU /26 LRC-ACKUMULATOR R $ PKBPIN EQU /24 PIN-ECHO CHARACTER x P* P EJECT & P********************************* & P* CONSTANTS *
0x1acf44…1ad0d8 Dummy {f00=0x0088, f01=0x018e, f02=»CRWETX EQU /3F CARD END CHARACTER 6 PFEERET EQU /01 FEEF NOTES AND RETURN CARD COMMANDS * ( PSWALOW EQU /05 SWALLOW CARD COMMAND d ( PSCANK EQU /03 SCAN KEYBOARD COMMAND $ POPCODE EQU /11 OPEN COT COMMAND $ PCLCODE EQU /12 CLOSE COT COMMAND
0x1ad0d8…1ad26c Dummy {f00=0x0088, f01=0x0190, f02=» PX:E EQU /5051 PX:F EQU /5050 PX:G EQU /5051 4 PX:H EQU /5050 J PX:I EQU /5052 ` PX:J EQU /5250 v PX:K EQU /5154 PX:L EQU /505A PX:M EQU /5150 PX:N EQU /5103 0 PSTARP1 EQU X:A START ADDRESS 1:ST PI
0x1ad26c…1ad400 Dummy {f00=0x0088, f01=0x0190, f02=»SS " v 0 PSTARP3 EQU X:E START ADDRESS 3:RD " . PSTOPP3 EQU X:F STOP ADDRESS " L . PSTARP4 EQU X:G START ADDRESS 4:TH " ~ , PSTOPP4 EQU X:H STOP ADDRESS " , PTISWCA EQU X:I TIMEOUT FOR SWALLOW CARD
0x1ad400…1ad594 (1, 389) Dummy {f00=0x0088, f01=0x0190, f02=»R BUZZER ALARM z " PLENGNO EQU X:M LENGTH OF NOTES 2 PKEYTYP EQU X:N KEYBOARD TYPE AND END CHARACTER < P* r PCOTTIM EQU 30 FEED TIMEOUT | P EJECT P* P* P********************* P* TABLES * P************
0x1ad594…1ad728 Dummy {f00=0x0088, f01=0x0190, f02=»Y ROUTINE ~ 2 PCTTAB DATA /110A,/0631,/330B,/2202,/0338,/3726 P DATA /FF H PCTLEN EQU *-CTTAB Z P* t H PFUNTAB DATA CARDIN,RECARD,WRCARD INSERT CARD, READ CARD, WRITE CARD ~ B P DATA RETUCA,SWALL,PICK RETURN CARD, SWALLOW CARD, PICK NOTES
0x1ad728…1ad8bc Dummy {f00=0x0088, f01=0x0190, f02=»ION T P DATA TEST TEST STATUS P EJECT * P* 8 P* B P* C G A D L P* ` P* ACTIVATION PART j P* PACCG EQU * P* P* ORDER CHECK P* P LDK A4,CTLEN 0 PACCG10 CC A7,CTTAB-1,A4 CHECK IF LEG
0x1ad8bc…1ada50 Dummy {f00=0x0088, f01=0x0190, f02=» : P* CHECK IF PARAMETER CARD LOADING REQUESTED. IF SO, , P* FINISH ALL REQUESTS WITH BIT 8 SET. F P* v PACCG30 EQU * " P LDR* A1,A6 CHANNEL PARAMETER P ANK A1,/80 PIN LOADING ? P RF(NE) ENDIO P* 0 P* CHECK IF
0x1ada50…1adbe4 Dummy {f00=0x0088, f01=0x0190, f02=»L A2,/400 P RF(E) ACCG35 P XRS A2,DWTST,A6 ( P LDK A1,2 @ P RF ENDIO R P EJECT d P* r , P* CHECK IF COT CLOSED. IF SO, END ALL | 2 P* REQUESTS BUT OPEN WITH RETURN CODE BIT 10. P* PACCG35 EQU * P CWK A4,
0x1adbe4…1add78 Dummy {f00=0x0088, f01=0x0190, f02=» P RF(E) ENDIO YES P LDK A1,/20 P RF ENDIO 0 P* B 4 P* MODIFY DEVICE ADDRESS DEPENDING ON KEYBOARD, L 2 P* CARD READER/WRITER, OR DISPENSER ORDER AND & P* JUMP TO VALID FUNCTION MODULE. P* PACCG38 EQU * P LDK A
0x1add78…1adf0c Dummy {f00=0x0088, f01=0x0190, f02=»40 EQU * ( P CF A5,MODIFY MODIFY DEVICE ADDRESS PACCG50 EQU * < P LDK A3,0 P P SLL A4,1 b 2 P ABI FUNTAB-2,A4 JUMP TO VALID FUNCTION MODULE t P EJECT P* 2 P* CHECK IF CARD-IN-READER MESSAGE HAS COME " P* OR WAIT FOR
0x1adf0c…1ae0a0 Dummy {f00=0x0088, f01=0x0190, f02=»A5,STREG WAIT FOR COT MESSAGE $ P SUK A1,3 DEVICE CODE CORRECT ? & P RF(NE) THRERR NO N PCARD10 EQU * h P SUK A2,/0C CARD IN READER ? | P RF(E) ENDIO 2 PCARD12 SUK A2,/34 FRONT SHUTTER DOESNT CLOSE ? P RF(NE) CARD20 NO PCARD
0x1ae0a0…1ae234 (1, 390) Dummy {f00=0x0088, f01=0x0190, f02=»YES $ P SUK A2,2 OPERATION INCORRECT ? P RF(NE) CARD22 NO 4 PCARD21 LDK A1,4 N P RF ENDIO f ( PCARD22 SUK A2,2 POSITIVE OPERATION ? x P RF(E) ENDIO YES P SUK A2,7 CARD TAKEN ? P RF(NE) CARD23 & P SUK A4,10 SWALLOW CARD
0x1ae234…1ae3c8 Dummy {f00=0x0088, f01=0x0190, f02=» $ P SUK A4,10 SWALLOW CARD ORDER ? P RF(E) ENDIO , P RB CARD21 NO INDICATE ERROR @ * PCARD24 ADK A2,/20 RESET CHARACTER CODE d P CWK A4,4 READ ORDER / P RF(E) RECA05 YES P RF THRERR NO PCARD30 EQU * P LDK A1,/40 TRANSPOR
0x1ae3c8…1ae55c Dummy {f00=0x0088, f01=0x0190, f02=»AD STACKBASE ~ P ADR A5,A6 P LDR A4,A1 SAVE A1 & & P CF A5,ECHEND END I/O ECHO DEVICE @ P LD A2,DWTTP,A6 TIMER ? j P RF(E) ENDIT P CM* DWTTP,A6 P CM DWTTP,A6 PENDIT EQU * P LDR A1,A4 RELOAD A1 P ABL DISEND
0x1ae55c…1ae6f0 Dummy {f00=0x0088, f01=0x0190, f02=»F A5,OUTPUT SEND READ TRACK COMMAND ( P CM DWTLRC,A6 CLEAR LRC-ACKUMULATOR , P RB CARD05 X PRECA05 EQU * j P LDR A3,A3 FIRST CHARACTER ~ $ P RF(N) RECA40 NO, LRC-CHARACTER " P RF(NE) RECA10 NO, DATA INPUT P ADK A3,/80 $ P CCB A
0x1ae6f0…1ae884 Dummy {f00=0x0088, f01=0x018e, f02=»O PRECA10 EQU * P ANK A3,/7F " P CCB A2,CRWETX END CHARACTER ? 2 P RF(NE) RECA20 NO X * P ST A3,6,A8 YES STORE EFFECTIVE LENGTH r P NGR A3,A3 NEGATE REGISTER P RF RECA25 PRECA20 EQU * 0 P CF A15,STORE STORE CHARACTER IN
0x1ae884…1aea18 Dummy {f00=0x0088, f01=0x0190, f02=» ` P SUK A2,/30 VALID CODE ? P RF(N) RECA30 NO ( P SUK A2,/F NUMERIC VALUE ? @ P RB(NP) CARD05 YES b PRECA30 EQU * | ( P LDK A1,4 INDICATE CODE CHECK ERROR . P ABL SCA200 STORE EFF. LENGTH AND END I/O PRECA40 EQU * P XR A2
0x1aea18…1aebac Dummy {f00=0x0088, f01=0x0190, f02=»CT P* P* PWRCARD EQU * ( P LDK A2,CRWSTX CARD START CHARACTER 2 PWRCA10 EQU * ^ & P CF A5,OUTPUT SEND START CHARACTER r 0 P CF A15,GETCHR GET NEXT CHARACTER IN BUFFER P LDR A1,A1 LAST CHARACTER ? P RB(NE) WRCA10 NO
0x1aebac…1aed40 Dummy {f00=0x0088, f01=0x0190, f02=»L LDK A2,SWALOW SWALLOW CARD COMMAND P RB CAROUT , P EJECT > P* L P* V PPICK EQU * ` , P LD A2,4,A8 GET NUMBER OF NOTES TO PICK r P ORK A2,/30 PMICOUT EQU * $ P CF A5,OUTPUT SEND PICK COMMAND P LDK A3,0 P RF
0x1aed40…1aeed4 (1, 391) Dummy {f00=0x0088, f01=0x0190, f02=»EG WAIT FOR PICK MESSAGE PPICK15 EQU * P LDR A7,A4 4 P SUK A7,20 CLOSE COMMAND ? F P RF(E) CLOS10 YES h P ADK A7,6 KEYBOARD REQUEST ? P RF(P) SCAN10 YES $ P SUK A1,5 DEVICE ADDRESS VALID ? P RB(NE) THRERR P SUK A2,/1
0x1aeed4…1af068 Dummy {f00=0x0088, f01=0x0190, f02=»0 YES P SUK A7,1 LAST LOOP ? P RF(E) MICEND YES , " P SLL A1,1 PREPARE RETURN CODE F P RB MICLOP l $ PMICEND CWK A4,14 FEED REQUEST ? ~ P RF(E) FEED10 YES P SUK A2,2 DUMP ERROR ? P RF(E) SCA175 YES P ADK A2,/17 RESE
0x1af068…1af1fc Dummy {f00=0x0088, f01=0x0190, f02=» h P ANK A2,/F . P CW A2,4,A8 NUMBER OF PICKED NOTES CORRECT P RB(NE) RECA30 L & P ST A2,6,A8 NUMBER OF PICKED NOTES b 6 PPICK20 SUK A3,1 INDICATE WAIT FOR FIRST DUMP CODE P RB PICK10 PPICK25 EQU * $ P LDR A3,A2 SAVE FIRST DUMP C
0x1af1fc…1af390 Dummy {f00=0x0088, f01=0x0190, f02=» RB PICK40 4 PPICK50 ST A2,10,A8 STORE NUMBER OF DUMPED NOTES ! PPICK60 EQU * ! J P LDK A1,0 ! ^ P RB ENDI01 ! p P EJECT ! P* ! P* ! & PCLOSE LDK A2,CLCODE CLOSE COMMAND ! P RB MICOUT ! PCLOS10 SUK A2,/1D CLOSED ? ! P RB(NE
0x1af390…1af524 Dummy {f00=0x0088, f01=0x0190, f02=»RETURN CARD COMMAND ! * PFEED10 SUK A2,1 NOTES NOT AVAILABLE ? " P RB(E) RECA30 YES " J " P ADK A2,/10 NOTES AVAILABLE ? " d P RF(NE) FEED30 " P LDR A3,A3 POWER BREAK ? " P RF(N) FEED20 YES " & P LDK A3,1 INDICATE MONEY AVAILABLE " P RB
0x1af524…1af6b8 Dummy {f00=0x0088, f01=0x018e, f02=»NOTES TAKEN ? " PFEEDER EQU * # P RB(NE) THRERR # * P LDR A3,A3 POWER BREAK ? # @ P RB(N) FEED20 YES # ` P RB PICK60 # z P EJECT # P* # P* # PSCANKE EQU * # ( P LDK A2,SCANK SCAN KEYBOARD COMMAND # P RB MICOUT # PSCAN10 E
0x1af6b8…1af84c Dummy {f00=0x0088, f01=0x0190, f02=» # P RB(E) RECA30 $ P SUK A2,2 $ P RB(E) ENDI01 $ 0 P ABL THRERR $ F " PSCAN12 SUK A7,2 PIN REQUEST ? $ Z P RF(E) PIN10 YES $ " P CF A15,STORE STORE CHARACTER $ , PSCAN15 LD A1,10,A8 GET KEY-TABLE ADDRESS $ P RF(E) SCA100 NO KEYTABLE
0x1af84c…1af9e0 Dummy {f00=0x0088, f01=0x0190, f02=» $ , P RF(N) SCA100 KEY NOT FOUND IN KEYTABLE % P SUK A1,1 NEXT KEY % 8 P CCR A2,A1 EOR-CHARACTER % R P RB(NE) SCAN20 % r P LDK A1,0 % P ADR A7,A7 YES, DOUBLE INDEX % , P ST A7,10,A8 STORE INDEX IN CONTROL WORD % P RF SCA200 % , PSCA100 C
0x1af9e0…1afb74 (1, 392) Dummy {f00=0x0089, f01=0x0190, f02=»RFLOW ? % z P RB(NE) PICK10 NO & PSCA175 LDK A1,8 & * , PSCA200 ST A3,6,A8 STORE EFFECTIVE LENGTH & B P RB ENDI02 & r P EJECT & P* & P* & PSCANPI EQU * & 0 P LD A2,4,A8 GET WANTED NUMBER OF CHARACTERS & P LDR A3,A2 & $ P CF A5,O
0x1afb74…1afd08 Dummy {f00=0x0089, f01=0x0190, f02=»5 & P SUK A2,2 ' P RB(E) ENDI02 ' P SUK A2,/52 PIN INPUT ? ' 2 P RF(E) PIN20 ' R P ADK A2,/58 RESET A2 ' f P RB SCAN15 ' PPIN20 EQU * ' . P SC A2,DWTBC,A6 RESET RECIVER BUFFER AREA ' P LC A2,KBPIN,A6 ' P CF A5,ECHO ' P L
0x1afd08…1afe9c Dummy {f00=0x0089, f01=0x0190, f02=»2,FICODE FINISH TRANSACTION COMMAND ' P RF OPEN10 ( , POPEN EQU * ( > P LDK A2,OPCODE OPEN COMMAND ( P POPEN10 CF A5,OUTPUT ( t P LDKL A2,/200 ( P ORS A2,DWTST,A6 ( PENDI03 RB ENDI02 ( P EJECT ( P* ( P* ( P* ( P* I
0x1afe9c…1b0030 Dummy {f00=0x0089, f01=0x0190, f02=» ANK A2,/FF ( $ P LD A3,DWTST,A6 GET STATUS WORD ) P RF(NN) IHC100 BUSY ) < P LDR A3,A2 ) X P SUK A4,3 DEVICE ADDRESS 3 ? ) j P RF(NE) IHCG30 NO ) P SUK A3,2 TRANSPORT ERROR ? ) P RF(E) IHCG20 YES ) ( P SUK A3,10 CARD IN READER MESSAGE
0x1b0030…1b01c4 Dummy {f00=0x0089, f01=0x018e, f02=» IN STATUS WORD ) r PEXIT ABL TDISP * P EJECT * . P * < P * D P * L PIHCG30 EQU * * T P SUK A4,2 DEVICE ADDRESS 5 ? * h P RB(NE) EXIT NO * P SUK A3,/1C PIN LOADED ? * P RF(E) IHCG90 * P ADK A3,/19 STATUS REQUEST ? * P RB(NE) EX
0x1b01c4…1b0358 Dummy {f00=0x0089, f01=0x0190, f02=» P ADR A5,A6 STACK BASE + ( P CF A5,MODIFY MODIFY DEVICE ADDRESS + " P LDKL A2,/7FFF + N P ANS A2,DWTST,A6 SET BUSY + d P LDK A4,28 + P LDKL A3,STINTA + ( PIHCG85 LCR A2,A3 GET FIRST CHARACTER + P CF A5,OUTPUT SEND + P ADK A3,1 + $ P
0x1b0358…1b04ec Dummy {f00=0x0089, f01=0x0190, f02=»DI03 + PIHCG90 LDKL A1,/FF7F , . P ANRS A1,A6 RESET PIN CARD WAIT INDICATOR , ( P RB EXIT , Z P EJECT , j P* , x P* DEVICE BUSY , P* , PIHC100 EQU * , & P LDR A1,A1 RETURN CODE FROM CHLT ? , P RB(NE) EXIT , P LDR A1,A4 OUTPUT
0x1b04ec…1b0680 Dummy {f00=0x0089, f01=0x018e, f02=» RB(E) IHCG80 YES , ( P SUK A3,/15 INTERFACE BOARD ERROR ? - P RF(NE) IHC105 - F . P LDK A1,/40 INDICATE INTERFACE BOARD ERROR - P RB ENDI03 - PIHC105 SUK A3,1 - , P RF(NE) IHC110 NOT TRANSMISSION TIMEOUT - , P LDK A1,2 INDICATE TRANSMISSION
0x1b0680…1b0814 (1, 393) Dummy {f00=0x0089, f01=0x0190, f02=» PIHC200 ADK A4,2 . P RB(E) IHRET . P ADK A4,2 . 0 P ABL(NE) THRERR . B P LC A4,DWTST,A6 STATUS BYTE . Z P ANK A4,1 . ~ P RB(NE) IHRET . . P SC A2,DWTST+1,A6 INDICATE ERROR RECEIVED . P RB EXIT . P EJECT . P* . P* .
0x1b0814…1b09a8 Dummy {f00=0x0089, f01=0x018e, f02=»6 BUSY ? . P RF(N) RCCG20 / & P LD A4,DWTA4,A6 GET FUNCTION INDEX / & $ P SUK A4,28 STATUS TRANSMISSION ? / P P RB(E) IHCG80 / x P ADK A4,22 WRITE ? / P RF(E) RCCG30 YES / P SUK A4,8 FEED ? / P RF(NE) RCCG10 / P LD A3,DWTA3,A6 / P
0x1b09a8…1b0b3c Dummy {f00=0x0089, f01=0x0190, f02=» / ~ P ABL(E) FEED20 0 2 PRCCG10 LD A4,DWTST,A6 LEFT BYTE OF STATUS WORD 0 P SLL A4,3 RECOVERY BIT SET? 0 T P ABL(NN) THRERR NO 0 x P RB EXIT 0 PRCCG20 LDKL A1,/400 0 P ORS A1,DWTST,A6 0 P RB EXIT 0 PRCCG30 LD A8,DWTECB,A6 0 P LDK
0x1b0b3c…1b0cd0 Dummy {f00=0x0089, f01=0x0190, f02=»ER IN 0 h 6 P* ECB-BUFFER AND INCREMENT BUFFER INDEX 1 P* 1 H PSTORE EQU * 1 R P LD A7,2,A8 BUFFER ADDRESS 1 f P ADR A7,A3 ADD BUFFER INDEX 1 P SCR A2,A7 STORE CHARACTER 1 P ADK A3,1 INCREMENT INDEX 1 P ABL RTNA15 1 P* 1
0x1b0cd0…1b0e64 Dummy {f00=0x0089, f01=0x0190, f02=» LDR* A3,A6 GET DWTCHP 1 P ANKL A3,/8FFF 2 P SRC A2,4 2 4 P ORR A3,A2 2 F P STR A3,A6 RESTORE 2 X P RTN A5 2 r P EJECT 2 P* 2 P* 2 * P* STINTA = STATUS INFORMATION TABLE 2 P* 2 PSTINTA EQU * 2 & P DATA STARP1,STOPP1,STAR
0x1b0e64…1b0ff8 Dummy {f00=0x0089, f01=0x401e, f02=» EQU * 2 P END 3 @ 3 ANKL A3,/8FFF 2 P SRC A2,4 2 4 P ORR A3,A2 2 F P STR A3,A6 RESTORE 2 X P RTN A5 2 r P EJECT 2 P* 2 P* 2 * P* STINTA = STATUS INFORMATION TABLE 2 P* 2 PSTINTA EQU * 2 & P DATA STARP1,STOPP1,STAR
0x1b0ff8…1b118c Dummy {f00=0x0089, f01=0x2008, f02=» 4 END I/O % h P EJECT & P* & & P* & 0 * P* STINTA = STATUS INFORMATION TABLE & : P* & h PSTINTA EQU * & r & P DATA STARP1,STOPP1,STARP2,STOPP2 & & P DATA STARP3,STOPP3,STARP4,STOPP4 & & P DATA TISWCA,TIANTC,TIPILO,TIBUZZ & P DAT
0x1b118c…1b1320 Dummy {f00=0x0089, f01=0x0190, f02=» t P SUK A1,12 P RF(Z) DUA:20 PHYSICAL READ P SUK A1,4 @ P RF(Z) DUA:20 PHYSICAL WRITE R P v P EJECT ~ P P " PDUERR ABL DISIOE REQUEST ERROR P P & PDUA:20 LDK A4,RY4 RETRY COUNT = 4 P P ST
0x1b1320…1b14b4 (1, 394) Opaque[0x194]
0x1b14b4…1b1648 # DirEnt {nam=»DRCD01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1130, f03=0x2020}
0x1b14b4…1b1648 IdxSect {
0x1b14b4…1b1648 f00 = 0x0089 // 0x1b14b4 @0x0
0x1b14b4…1b1648 f01 = 0x0004 // 0x1b14b6 @0x2
0x1b14b4…1b1648 gno = [ // 0x1b14b8 @0x4
0x1b14b4…1b1648 [0x00]: C0x0089.0x2.0
0x1b14b4…1b1648 [0x01]: C0x0089.0x3.0
0x1b14b4…1b1648 ]
0x1b14b4…1b1648 }
0x1b1648…1b17dc Dummy {f00=0x0089, f01=0x0190, f02=» 2 P IDENT DRCD01 REL 8.2 78-09-15 870105040820 P : P* B 4 P**********************************************: L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* * P* DRCD01 = DRIVER COT ALPHA DISPLAY P* P* P*
0x1b17dc…1b1970 Dummy {f00=0x0089, f01=0x0190, f02=»OT ALPHA DISPLAY. l P* : P* THE COT MUST BE CONNECTED TO CPU VIA CHLT OR CHRT. $ P* b P* l 4 P* THE DRIVER CONSISTS OF THE FOLLOWING PARTS: v P* & P* A C C D : ACTIVATION PART ( P* I H C D : INTERRUPT HANDLER
0x1b1970…1b1b04 Dummy {f00=0x0089, f01=0x0190, f02=»* ORDER 06: WRITE P EJECT P* , P* 6 P* NORMAL REGISTER USAGE: @ P* d " P* REGISTER A1: RETURN CODE n & P* A2: OUTPUT CHARACTER $ P* A3: WORK REGISTER $ P* A4: WORK REGISTER
0x1b1b04…1b1c98 Dummy {f00=0x0089, f01=0x0190, f02=»B-ADDRESS | P* P* P* SYSTEM ADAPTATION & P* D P EJECT N P* P* f P*********************** p P* ENTRIES * P*********************** P* P ENTRY CDAD P* * P****************
0x1b1c98…1b1e2c Dummy {f00=0x0089, f01=0x0190, f02=»E REGS P EXTRN TENDIO END I/O . P EXTRN DISEND PERFORM END I/O AND DISPATCH , " P EXTRN TDISP DISPATCHER ENTRY ^ P EXTRN OUTPUT OUTPUT CHAR. * P EXTRN LDREG LOAD REGISTERS AND RETURN P EXTRN GETCHR GET CHARACTER $ P EXTRN DISIOE I/
0x1b1e2c…1b1fc0 Dummy {f00=0x0089, f01=0x018e, f02=» $ P******************************* $ P* CONSTANTS * 0 $ P******************************* X P* PDWTBC EQU /3 P* P************************* P* TABLES * P*************************
0x1b1fc0…1b2154 (1, 395) Dummy {f00=0x0089, f01=0x0190, f02=» r . P DATA ECHOCD DEVICE DEPENDENT ECHO ROUTINE P* : P* D P* N P EJECT X P* f P* p P*[ z 0 P******************************************* . P* CONDITIONAL ASSEMBLY * 0 P******************************
0x1b2154…1b22e8 Dummy {f00=0x0089, f01=0x0190, f02=» * z 0 P******************************************** P* R P EJECT P* j P* A C C D t P* 2 P* ACTIVATION PART: CHECH VALIDITY OF ORDERS 4 P* AND STARTS THE PROCESSING P*
0x1b22e8…1b247c Dummy {f00=0x0089, f01=0x0190, f02=»0 PACCD10 EQU * $ P CF A15,GETCHR GET ONE CHARACTER P LDR A1,A1 LAST CHARACTER F P RF(E) ACCD20 YES h P CWK A2,/07 P RF(NE) ACCD15 P LDK A2,4 P SC A2,DWTBC,A6 P RB ACCD10 PACCD15 EQU * P CF A5,OUTPU
0x1b247c…1b2610 Dummy {f00=0x0089, f01=0x0190, f02=»GHT BYTE x P RF ENDIO P EJECT " P* 0 P* I H C D : P* N 0 P* INTERRUPT HANDLER: PROCESS OF INTERRUPT X P* PIHCD EQU * P LD A4,DWTST,A6 STATUS P RF(N) EXIT P LDR A1,A1 RETURN CODE P RF(NE) ENDIO YE
0x1b2610…1b27a4 Dummy {f00=0x0089, f01=0x0190, f02=» 2 P* ECHOCD = DEVICE DEPENDENT ECHO SUBROUTINE P* : PECHOCD EQU * D P LDR A7,A7 EOR ? X P RF(N) ECHO10 p P CF A5,OUTPUT SEND CHARACTER PECHO10 ABL ECHRTN P EJECT P* P* R C C D P* P* PRCCD
0x1b27a4…1b2938 Dummy {f00=0x0089, f01=0x4010, f02=» END @ = DEVICE DEPENDENT ECHO SUBROUTINE P* : PECHOCD EQU * D P LDR A7,A7 EOR ? X P RF(N) ECHO10 p P CF A5,OUTPUT SEND CHARACTER PECHO10 ABL ECHRTN P EJECT P* P* R C C D P* P* PRCCD
0x1b2938…1b2acc Dummy {f00=0x0089, f01=0x2008, f02=» A15,SAVE8 LD A7,DWTST,A6 RB(N) EXIT 2 LDK A1,2 F RB ENDIO X * j * t END ~@ LD A4,DWTST,A6 STATUS RF(N) EXIT LDR A1,A1 RETURN CODE RF(NE) ENDIO YES END I/O ABL LDR
0x1b2acc…1b2c60 Dummy {f00=0x0089, f01=0x0190, f02=»STAT CNTR(S) , | P RF(NZ) RDMA11 - P IM DWTMOK,A6 - * PRDMA11 EQU * - @ P ABL READ20 STATUS, DATA OK - T PRDMA12 RF(6) RDMA14 - x P IM DWTMDE,A6 INC STAT CNT - P ABL ENDIO1 ILL DATA - $ PRDMA14 IM DWTMIL,A6 INC STAT CNT - P ABL ENDIO4 IL
0x1b2c60…1b2df4 (1, 396) Opaque[0x194]
0x1b2df4…1b2f88 # DirEnt {nam=»DVTCG «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1140, f03=0x2020}
0x1b2df4…1b2f88 IdxSect {
0x1b2df4…1b2f88 f00 = 0x008a // 0x1b2df4 @0x0
0x1b2df4…1b2f88 f01 = 0x0002 // 0x1b2df6 @0x2
0x1b2df4…1b2f88 gno = [ // 0x1b2df8 @0x4
0x1b2df4…1b2f88 [0x00]: C0x008a.0x0.0
0x1b2df4…1b2f88 ]
0x1b2df4…1b2f88 }
0x1b2f88…1b311c Dummy {f00=0x008a, f01=0x0190, f02=» 0 P IDENT DVTCG REL 8.2 78-09-15 870105040820 P* 8 $ P* DEVICE WORK TABLE COT GENERAL B P* j P ENTRY DVTCG TABLE ENTRY t P*** ( P EXTRN CGAD POINTER TO ADDRESSBLOCK P EXTRN ECH P* P* PDVTCG EQU * TABLE ENTR
0x1b311c…1b32b0 Dummy {f00=0x008a, f01=0x0190, f02=»DER AND ECB-ADDRESS l ( P DATA CGAD POINTER TO ADDRESS BLOCK P DATA 'CG' TTAB-ADDRESS H $ P DATA 0 WAIT/INDICATE INDICATOR h P DATA 0 TERMINAL QUEUE * P DATA 0 CODE CONVERSION TABLE POINTER P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE
0x1b32b0…1b3444 Dummy {f00=0x008a, f01=0x407c, f02=» DATA /BCA BACKSPACE AND CANCEL " P DATA /ED0 EOR AND DOUBLE ZERO ( PDWTEND EQU * N P* b P END l@ xE INDICATOR h P DATA 0 TERMINAL QUEUE * P DATA 0 CODE CONVERSION TABLE POINTER P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE
0x1b3444…1b35d8 Dummy {f00=0x008a, f01=0x2008, f02=» BLE ZERO 6 P DATA DWTSQ+DVTKB POINTER TO FIRST PLACE IN QUEUE 4 P DATA DWTSQ+DVTKB POINTER TO LAST PLACE IN QUEUE R PDWTSQ EQU *-DVTKB P RES 0 P* P END @ 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P R
0x1b35d8…1b376c Dummy {f00=0x008a, f01=0x0190, f02=»WAIT 4 TEXIT F EXITN TACTOTK L FNDTID LKMRQE ACTOT TPAUSE 0 r NATTACX ATTACH DETACH TIOERRK ATT:CH DRIC01 ITADI ITADO ECBCW FNDTID DWTTABN TTB:TD DWTADR DWT
0x1b376c…1b3900 Dummy {f00=0x008a, f01=0x0190, f02=» ITADI ITADO IHRTN ITABRT ATTACH " ATTACH TTB:ST DWTST DWTTAB TIODM DWTADR FREBLK TIOERRV GETBLKK SETIMPK TIOQ20B DETACH DWTTQ TDISP TTB:SAK TPQUE ATT:CH IHRTN FDBADF Q
0x1b3900…1b3a94 (1, 397) Opaque[0x194]
0x1b3a94…1b3c28 # DirEnt {nam=»DVTCD «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1148, f03=0x2020}
0x1b3a94…1b3c28 IdxSect {
0x1b3a94…1b3c28 f00 = 0x008a // 0x1b3a94 @0x0
0x1b3a94…1b3c28 f01 = 0x0002 // 0x1b3a96 @0x2
0x1b3a94…1b3c28 gno = [ // 0x1b3a98 @0x4
0x1b3a94…1b3c28 [0x00]: C0x008a.0x1.0
0x1b3a94…1b3c28 ]
0x1b3a94…1b3c28 }
0x1b3c28…1b3dbc Dummy {f00=0x008a, f01=0x0190, f02=» 0 P IDENT DVTCD REL 8.2 78-09-15 870105040820 P* 8 P* B . P* DEVICE WORK TABLE FOR DISPLAY INDICATOR L P* ~ P* & P ENTRY DVTCD DISPLAY INDICATOR 03 P* P* ( P EXTRN CDAD POINTER TO ADDRESS-BLOCK P* P*
0x1b3dbc…1b3f50 Dummy {f00=0x008a, f01=0x4140, f02=»0,DWTEND-DVTCD ECB-ADDRESS AND ORDER ( P DATA CDAD POINTER TO ADDRESS-BLOCK , 6 P DATA 'CD',0 TERM.NUMBER AND PROGRAM START ADDRESS X $ P DATA 0 ECB QUEUE ANCHOR ADDRESS P DATA 0 OUTPUT QUEUE P DATA 0,0,0 P RES 4 P DATA 0 P
0x1b3f50…1b40e4 Dummy {f00=0x008a, f01=0x2008, f02=» A DIAD POINTER TO ADDRESS-BLOCK 4 P DATA 0,0 TERM.NUMBER AND PROGRAM START ADDRESS 0 $ P DATA 0 ECB QUEUE ANCHOR ADDRESS h P DATA 0 OUTPUT QUEUE P DATA /2010 P DATA /3F4F,/5F6F P* P* P END @ BLE ENTRY
0x1b40e4…1b4278 Dummy {f00=0x008a, f01=0x2008, f02=» NT CDTAB P* P* " P* COMMON DEVICE TABLE , P* L 0 P* THIS TABLE HOLDS DEVICES THAT ARE COMMON V P* TO ALL TASKS P* P ENTRY CDTAB P* P* P* P* P* P* P* P*
0x1b4278…1b440c Dummy {f00=0x008a, f01=0x0190, f02=» l P LD A2,CRCSAV+2 SAVE IT P SLL A2,8 ( P XRR A2,A8 : P ADK A5,4 L . P CWR A2,A6 COMPARE RECEIVED WITH COMPUTED ^ P ABR* A5 P XIF P IFT CODE=0 P* & P* RDLRC READ LRC CHARACTER " P* CR=0
0x1b440c…1b45a0 Dummy {f00=0x008a, f01=0x0190, f02=» EQU * P CM SYNSW P ABR* A5 P 0 P XIF 8 P EJECT D P* R P* " P* DEVICE WORK TABLE FOR DCTASK f P* P* PDW1500 EQU * TABLE ENTRY P DATA 0 CU LINE ADDRESS P DATA /8000 STATUS P DATA 0 ECB AD
0x1b45a0…1b4734 (1, 398) Opaque[0x194]
0x1b4734…1b48c8 # DirEnt {nam=»ATTACH«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1150, f03=0x2020}
0x1b4734…1b48c8 IdxSect {
0x1b4734…1b48c8 f00 = 0x008a // 0x1b4734 @0x0
0x1b4734…1b48c8 f01 = 0x0006 // 0x1b4736 @0x2
0x1b4734…1b48c8 gno = [ // 0x1b4738 @0x4
0x1b4734…1b48c8 [0x00]: C0x008a.0x2.0
0x1b4734…1b48c8 [0x01]: C0x008a.0x3.0
0x1b4734…1b48c8 [0x02]: C0x008b.0x0.0
0x1b4734…1b48c8 ]
0x1b4734…1b48c8 }
0x1b48c8…1b4a5c Dummy {f00=0x008a, f01=0x0190, f02=» 2 P IDENT ATTACH REL 8.2 78-09-15 870105040820 P : P* B 0 P******************************************* L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* & P* ATTACH = ATTACH/DETACH HANDLER P* P* P* P*
0x1b4a5c…1b4bf0 Dummy {f00=0x008a, f01=0x0190, f02=»* PARAMETERS: P* P* A5 TTAB ADDRESS " P* A6 DWT ADDRESS @ P* A7 ORDER P* A8 ECB ADDRESS r P* , P**************************************** P* P EJECT P* P* E N T R I E S P*
0x1b4bf0…1b4d84 Dummy {f00=0x008a, f01=0x0190, f02=»E X T E R N A L S P* P EXTRN GETBLK GET BLOCK $ P EXTRN FREBLK FREE BLOCK D P EXTRN SETIMP SET TIMER d P P EXTRN TTB:ST TTAB STATUS " P EXTRN TTB:SA DISPATCH ADDRESS P P EXTRN DWTST DWT STATUS P EXTRN DWTTQ
0x1b4d84…1b4f18 Dummy {f00=0x008a, f01=0x0190, f02=» TIOERR END REQUEST P EXTRN TDISP DISPATCHER P < P EXTRN TPQUE QUEUE TTAB D P EXTRN QTJOB d P EXTRN IHRTN x P * P EXTRN FDBADF ADDRESS OF DATA FILE FDB P EXTRN TIODM DM ENTRY P EJECT P* P* A T T A C H
0x1b4f18…1b50ac Dummy {f00=0x008a, f01=0x018e, f02=» RETURN CODE P* , P* ABORT REQUEST IF BIT 1 IN TTB:ST SET P* N P LDKL A2,/4000 BIT 1 X P AN A2,TTB:ST,A5 t P RF(Z) ATT:10 DON'T ABORT " P XRS A2,TTB:ST,A5 RESET BIT 1 P RF ATT:55 END REQUEST P " PATT:10 LDKL A2
0x1b50ac…1b5240 Dummy {f00=0x008a, f01=0x0190, f02=» ~ P RF(NN) ATT:50 DEVICE BUSY P* * P* ATTACH REQUESTING TASK 4 P* V P ORS A1,DWTST,A6 ATTACH ` , P ST A5,DWTTAB,A6 PUT TTAB ADDRESS IN DWT P LDKL A4,TIODM P CW A4,DWTADR,A6 P RF(NE) ATT:15 NO DM REQUEST ( P CF A1
0x1b5240…1b53d4 (1, 399) Dummy {f00=0x008a, f01=0x0190, f02=» ~ P* & P* FREE BLOCK AND TIMER IN ATT:CH P* < P CM* 2,A4 FREE TIMER F " P LDR* A3,A4 REMOVE FROM ATT:CH b P STR A3,A2 P CF A15,FREBLK RELEASE BLOCK PATT:20 LDK A3,0 RETURN CODE " PATT:30 ABL TIOERR END REQUEST $ P
0x1b53d4…1b5568 Dummy {f00=0x008a, f01=0x0190, f02=»5 YES, REQUEST ERROR * PATT:50 CF A15,FNDBLK IS TIMER ACTIVE? P LDR A4,A4 J P RF(NZ) ATT:80 YES! P* x P* SET TIMER P* P LD A1,10,A8 TIME P RB(N) ATT:35 TIME NEGATIVE P RF(NZ) ATT:60 SET TIMER " PATT:55 L
0x1b5568…1b56fc Dummy {f00=0x008a, f01=0x018e, f02=» BLOCK ~ P LD A1,ATT:CH ANCHOR P STR A1,A4 * P ST A4,ATT:CH UPDATE ANCHOR < $ P ADK A4,2 TIMER POINTER ADDRESS ` P LDR A1,A6 DWT ADDRESS P CF A15,SETIMP SET TIMER P DATA TIMOUT PATTIM DATA 0 , PATT:80 LDK A4,0 NOT ACTIVA
0x1b56fc…1b5890 Dummy {f00=0x008a, f01=0x0190, f02=» * P RB(NZ) ATT:30 I/O AND ACTIVATE-ERROR P LDKL A1,/800 2 P AN A1,DWTST,A6 H P RB(Z) ATT:35 NOT ATTACHED ` P CW A5,DWTTAB,A6 * P RB(NE) ATT:35 ATTACHED TO OTHER TASK P XRS A1,DWTST,A6 DETACH P LDKL A4,TIODM P CW A4,DWT
0x1b5890…1b5a24 Dummy {f00=0x008a, f01=0x0190, f02=» P LDR A2,A6 QREQ INPUT P CF A15,QREQ UPDATE DWTTQ & P RB ATT:20 END REQUEST H P EJECT f P* t P* T I M E O U T ~ P* P* ENTRY PARAMETERS P* A1 DWT ADDRESS & P* A2 ADDRESS TO 2:ND TIMER BLOCK P*
0x1b5a24…1b5bb8 Dummy {f00=0x008a, f01=0x0190, f02=»5,FNDBLK P LDR* A1,A4 " P STR A1,A2 REMOVE FROM ATT:CH $ P CF A15,FREBLK J P* ` & P* REMOVE TTAB FROM DEVICE QUEUE j P* P LDR A1,A6 ( P ADKL A1,DWTTQ QUEUE ANCHOR ADDRESS PTIM:10 LDR A2,A1 SAVE P LDR* A1,A1 NE
0x1b5bb8…1b5d4c Dummy {f00=0x008a, f01=0x0190, f02=» ABL TDISP PTIM:30 EQU * P CWR A1,A5 & P RB(NE) TIM:10 NOT FOUND 8 P* X & P* TTAB FOUND - REMOVE FROM QUEUE b P* P LDR* A1,A1 P STR A1,A2 P LDK A3,4 , P ADS A3,TTB:SA,A5 UPDATE DISPACH ADDRESS * P CF A15,SE
0x1b5d4c…1b5ee0 Dummy {f00=0x008a, f01=0x0190, f02=» B L K P* ( P* SUBROUTINE TO FIND BLK IN ATT:CH P* D P* ENTRY PARAMETERS: N P* j P* A5 TTAB ADDRESS t P* P* EXIT PARAMETERS: P* , P* A2 ADDRESS TO PRECEDING BLK IN CHAIN ( P* A4 BLOCK ADDRESS IF
0x1b5ee0…1b6074 (1, 400) Dummy {f00=0x008b, f01=0x0190, f02=»0 END OF ATT:CH P CW A5,4,A4 P RB(NE) FND:10 NOT FOUND , PFND:30 ABL IHRTN L P EJECT d P* r P* S E T R C E | P* 6 P* THIS SUBROUTINE SETS RETURN CODE /0040 IN ECB. 0 P* ECB ADDRESS IS FOUND FROM TTAB SAVE AREA
0x1b6074…1b6208 Dummy {f00=0x008b, f01=0x018e, f02=»A5 TTAB ADDRESS z P* PSETRCE LDR A1,A5 " P ADK A1,/1C A8 IN SAVE AREA : P LDR* A1,A1 ECB ADDRESS ^ P LDK A2,/40 RETURN CODE ~ P ORS A2,8,A1 INTO ECB P ABL IHRTN P EJECT P* " P* F D B A T T / F D B D E T
0x1b6208…1b639c Dummy {f00=0x008b, f01=0x0190, f02=» " P* A6 FDB ADDRESS P* * P* WORKING REG. A2,A3,A4 4 P* X PFDBDET EQU * b P C1R A1,A1 A1=FF7F v PFDBATT EQU * P LDR A4,A6 FDB ADDRESS P ADKL A4,FDBADF P LDK A3,10 LOOP INDEX PFDB:10 SUK A3,2
0x1b639c…1b6530 Dummy {f00=0x008b, f01=0x0190, f02=»TACH REQUEST * P ORS A1,DWTST,A2 ATTACH / DETACH FILE P ST A5,DWTTAB,A2 B P RF FDB:20 Z PFDB:15 ANS A1,DWTST,A2 l P CF A15,QREQ UPDATE DWTTQ $ PFDB:20 ADK A4,2 NEXT FDB ADDRESS P RB FDB:10 PFDB:30 ABL IHRTN P EJECT
0x1b6530…1b66c4 Dummy {f00=0x008b, f01=0x417a, f02=»ADDRESS z P* WORK. REG. A7,A9 P* . PQREQ EQU * 8 & P LDR A9,A5 SAVE A5 (TTAB ADDRESS) J & P LD A5,DWTTQ,A2 ANY TASK IN QUEUE? t P RF(Z) QRE:10 NO! ( P LDR* A7,A5 YES,UPDATE QUEUE ANCHOR P ST A7,DWTTQ,A2 P CF A15,QTJO
0x1b66c4…1b6858 Dummy {f00=0x008b, f01=0x2008, f02=» ! ( $ LDR* A3,A5 YES, UPDATE QUEUE ANCHOR ST A3,DWTTQ,A6 > CF A15,QTJOB V RB ATT:20 END REQUEST l END @ CH EQU * LDKL A3,/800 AN A3,DWTST,A6 RB(Z) ATT:35 NOT ATTACHED CW A5,DWTTAB,
0x1b6858…1b69ec Dummy {f00=0x008b, f01=0x0190, f02=»OR EL1 AND EL4 x P XIF P IFT OVERLY=1 " * P CF A14,M:OPA GET ELEMENT DATA FOR EL3 8 * P SLL A1,1 NEG. NUMBER OF BYTES TIMES 2 f ( P ST A1,10,A14 STORE COUNTER ON STACK " P CF A14,M:MOV MOVE EL2 TO EL4 P DATA /4020 PARG2 EQU *-2
0x1b69ec…1b6b80 Dummy {f00=0x008b, f01=0x0190, f02=»T A6,6,A14 STORE ADDRESS OF EL1 ON STACK 0 P ST A10,8,A14 STORE ADDRESS OF EL4 ON STACK 0 P LCR A1,A6 GET SIGN BYTE EL1 d P LDR A2,A1 COPY A1 " P LCR A3,A10 GET SIGN BYTE EL4 P ADR A2,A3 ADD BYTES " P ANK A1,/F0 MASK AWAY SIGN EL1 "
0x1b6b80…1b6d14 (1, 401) Opaque[0x194]
0x1b6d14…1b6ea8 # DirEnt {nam=»DRDC15«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1168, f03=0x2020}
0x1b6d14…1b6ea8 IdxSect {
0x1b6d14…1b6ea8 f00 = 0x008b // 0x1b6d14 @0x0
0x1b6d14…1b6ea8 f01 = 0x002a // 0x1b6d16 @0x2
0x1b6d14…1b6ea8 gno = [ // 0x1b6d18 @0x4
0x1b6d14…1b6ea8 [0x00]: C0x008b.0x1.0
0x1b6d14…1b6ea8 [0x01]: C0x008b.0x2.0
0x1b6d14…1b6ea8 [0x02]: C0x008b.0x3.0
0x1b6d14…1b6ea8 [0x03]: C0x008c.0x0.0
0x1b6d14…1b6ea8 [0x04]: C0x008c.0x1.0
0x1b6d14…1b6ea8 [0x05]: C0x008c.0x2.0
0x1b6d14…1b6ea8 [0x06]: C0x008c.0x3.0
0x1b6d14…1b6ea8 [0x07]: C0x008d.0x0.0
0x1b6d14…1b6ea8 [0x08]: C0x008d.0x1.0
0x1b6d14…1b6ea8 [0x09]: C0x008d.0x2.0
0x1b6d14…1b6ea8 [0x0a]: C0x008d.0x3.0
0x1b6d14…1b6ea8 [0x0b]: C0x008e.0x0.0
0x1b6d14…1b6ea8 [0x0c]: C0x008e.0x1.0
0x1b6d14…1b6ea8 [0x0d]: C0x008e.0x2.0
0x1b6d14…1b6ea8 [0x0e]: C0x008e.0x3.0
0x1b6d14…1b6ea8 [0x0f]: C0x008f.0x0.0
0x1b6d14…1b6ea8 [0x10]: C0x008f.0x1.0
0x1b6d14…1b6ea8 [0x11]: C0x008f.0x2.0
0x1b6d14…1b6ea8 [0x12]: C0x008f.0x3.0
0x1b6d14…1b6ea8 [0x13]: C0x0090.0x0.0
0x1b6d14…1b6ea8 [0x14]: C0x0090.0x1.0
0x1b6d14…1b6ea8 ]
0x1b6d14…1b6ea8 }
0x1b6ea8…1b703c Dummy {f00=0x008b, f01=0x018e, f02=» 2 P IDENT DRDC15 REL 9.1 78-09-15 870106440911 P : P IBM-3270 EMULATION B P REL 8.1 78-08-25 ` $ P MESSAGE QUEUING ON TERMINALS | P REL 8.1 78-06-21 P PTS 6805 ADAPTION P MSV1. UNDEFINED ADDRESS P REL 8.1
0x1b703c…1b71d0 Dummy {f00=0x008b, f01=0x018e, f02=» z P 2 P********************************************* P* F $ P* PHILIPS TERMINAL SYSTEM PTS P P* x * P* DRDC15: DRIVER DATA COMMUNICATION . P* BSC MULTIPOINT LINE PROCEDURE P* OR SIEMENS MSV1 P*
0x1b71d0…1b7364 Dummy {f00=0x008b, f01=0x0190, f02=» P* ENTRY POINTS P* P* ( 2 P ENTRY DC15AD ADDRESS BLOCK TERMINAL REQUESTS 2 " P ENTRY IH1501 INPUT INTERRUPT h " P ENTRY IH1502 OUTPUT INTERRUPT " P ENTRY DC15ON POWER ON ROUTINE " P ENTRY DW1500 DWT FOR DC TASK P*
0x1b7364…1b74f8 Dummy {f00=0x008b, f01=0x0190, f02=» l $ P EXTRN TENDIO COMPLETE I/O EVENT P EXTRN DISIOE REQUEST ERROR 0 P EXTRN SETIME SET TIMER T P EXTRN DWTST DWT STATUS t P EXTRN DWTOR DWT ORDER P EXTRN DWTECB DWT ECB * P EXTRN INTSAV SAVE AREA LAST INTERRUPT ( P EXTRN TEB
0x1b74f8…1b768c Dummy {f00=0x008b, f01=0x0190, f02=»STANDARD INTERFACE PART FOR DATA COMMUNICATION P* 6 P* @ P* J P* T P* DWT CONTENTS ^ P* t J P* DWTCHP TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15) ~ P* P* DWT DISPLACEMENTS P* . PDWTTP EQU /1
0x1b768c…1b7820 Dummy {f00=0x008b, f01=0x018e, f02=»E QUEUE | ( PDWTBUF EQU /18 DEVICE BUFFER ADDRESS " PDWTCUR EQU /1A CURSOR ADDRESS < P* b P* ECB DISPLACEMENTS l P* PECBBA EQU 2 BUFFER ADDRESS PECBRL EQU 4 REQUESTED LENGTH PECBEL EQU 6 EFFECTIVE LENGTH PECBRC EQU 8
0x1b7820…1b79b4 (1, 402) Dummy {f00=0x008b, f01=0x0190, f02=» V P* * P* PARAMETERS FOR CONDITIONAL ASSEMBLY P* @ P* J & PX:A EQU 2000 RECEIVE BUFFER LENGTH T PRBUFL EQU X:A ~ ( PX:B EQU 1000 TRANSMIT BUFFER LENGTH PTBUFL EQU X:B PX:C EQU /60 DCTASK FILE CODE PDC15FC EQU /60
0x1b79b4…1b7b48 Dummy {f00=0x008b, f01=0x0190, f02=»1 STATUS AND RVI HANDLING IF=1 PSTAT EQU X:F & ( PX:G EQU 1 READ COMMAND HANDLING IF=1 : PRCOM EQU X:G f & PX:H EQU 254 TRANSMIT BLOCK LENGTH z PTBLEN EQU X:H ( PX:I EQU 1 CODE , 0=ASCII , 1=EBCDIC PCODE EQU X:I * PX:J EQU 0 IF 1
0x1b7b48…1b7cdc Dummy {f00=0x008b, f01=0x0190, f02=»W n PSPEED EQU X:K * PX:L EQU 0 IF 1 SIEMENS MSV1 PROCEDURE PMSV1 EQU X:L N . PX:M EQU 2 NUMBER OF RECEIVE BUFFERS (2-5) b PRBUFNR EQU X:M . PX:N EQU 0 IF = 1 PTS 6805 ADAPTION SALCUZ PP6805 EQU X:N PX:O EQU /02 P I
0x1b7cdc…1b7e70 Dummy {f00=0x008b, f01=0x0190, f02=»ER j P XIF PX:P EQU 0 . PIBMCHR EQU X:P IF 1 IBM CHARACTER HANDLING ( . PX:Q EQU 0 IF 1 MESSAGE PASSING TO DC TASK Z PMESPAS EQU X:Q 4 PX:R EQU 0 IBM-3270 EMULATION PACKAGE, IF NOT = 0 PEM3270 EQU X:R * PBINTRM EQU 0 IF 1 BINARY
0x1b7e70…1b8004 Dummy {f00=0x008b, f01=0x0190, f02=»WORKING WITH A MAIN-FRAME THAT ~ 0 P DOESN'T ACCEPT WACK RESPONSE TO A SELECT & 0 P SEQUENCE, NOWACK SHOULD BE SET TO "ONE". Z , P ONLY WORKING IF STAT IS SET TO "ONE". P IFT P6805=0 SALCUZ < PLCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMIT
0x1b8004…1b8198 Dummy {f00=0x008b, f01=0x0190, f02=»Z P EJECT P* P* REQUEST HANDLING " P* < P* F P* P P* A7=ORDER Z P* l P* /02: READ v P* /06: WRITE P* /08: EXCHANGE P* /22: RELEASE READ BUFFER P* /31: GET WRITE BUFFER P* /37: TRANSFER
0x1b8198…1b832c Dummy {f00=0x008b, f01=0x0190, f02=»/ OFFLINESWITCH ~ * PDCSTOL DATA 0 OLD DC EQUIPMENT STATUS PDCSTCU DATA 0 CURRENT STATUS F $ PDCWRQ DATA 0 WRITE REQUEST QUEUE j P IFF TBUFL=0 * PDCGWQ DATA 0 GET BUFFER REQUEST QUEUE P XIF , PDCTPGP DATA 0 TIMER POINTER GENERAL POLL
0x1b832c…1b84c0 Dummy {f00=0x008b, f01=0x0190, f02=» h PSTB RES 1 " P RES 1 AND FOR TRANSFER PARAM PSTB2 RES 1 @ P R P IFT SPEED=1 Z PLSPEED EQU /0200 n P XIF P IFT SPEED=0 PLSPEED EQU 0 P XIF P EJECT P* P* $ P* ACTIVATION FROM TERMINAL TASKS
0x1b84c0…1b8654 (1, 403) Dummy {f00=0x008b, f01=0x0190, f02=»/06-/02 P RF(Z) DCWR P SUK A7,/08-/06 $ P RF(Z) DCEX EXCHANGE < P SUK A7,/22-/08 X $ P RF(Z) DCRR RELEASE READ BUFFER p P SUK A7,/37-/22 $ P RF(Z) DCTP TRANSFER PARAMETERS P SUK A7,/38-/37 P IFF STAT=0 P RF(
0x1b8654…1b87e8 Dummy {f00=0x008b, f01=0x018e, f02=»A100 P EJECT P* P* $ P* ACTIVATION FROM DCTASK . P* N P* X PDCACTD EQU * b P SUK A7,/02 v P RF(E) DCRDDC READ P SUK A7,/22-/02 $ P RF(E) DCRR RELEASE READ BUFFER P SUK A7,/37-/22 $ P RF(E) DCTP
0x1b87e8…1b897c Dummy {f00=0x008b, f01=0x0190, f02=» | P* P* P* REQUEST FROM DC-TASK P* COMPLETE WHEN: : & P* STATUS CHANGE ON DC EQUIPMENT R $ P* SPONTANOUS MESSAGE RECEPTION | P* PDCRDDC EQU * , P CF A15,CKMESS CHECK IF MESSAGE RECEIVED PDCRTN EQU * P A
0x1b897c…1b8b10 Dummy {f00=0x008b, f01=0x0190, f02=»TASK: TRANSFER TERMINAL COMPUTER ADDRESS ~ : P* FROM TERMINALS: TRANSFER TERMINAL ADDRESSES 0 P* n P* x P IFF CODE=1 & PDCTP LD A2,ECBCW,A8 GET PARAMETER P XIF P IFT CODE=1 & PDCTP LC A2,ECBCW,A8 GET TCS IF ANY
0x1b8b10…1b8ca4 Dummy {f00=0x008b, f01=0x0190, f02=»CW+1,A8 GET TCP OR DV P ANK A3,/FF ( P LC A2,TASCII,A3 TRANSLATE TO ASCII 2 P XIF ^ ( P STR A2,A6 SAVE IN FIRST WORD OF DWT j P P IFT RCOM=1 * P LD A3,ECBBA,A8 DEVICE BUFFER ADDRESS P ST A3,DWTBUF,A6 ( P LD A3,ECBRL,A8
0x1b8ca4…1b8e38 Dummy {f00=0x008b, f01=0x0190, f02=»E IN DC:TAB n * P LD A1,DC:IN GET DC:TAB INPUT POINTER * P CWK A1,DC:END TABLE ALREADY FULL ???? B & P ABL(E) DISIOE YES!! REQUEST ERROR p P EJECT P P PDCTP20 EQU * P IFT EM3270=0 " P LDKL A5,STB2 LOAD STACK BASE , P
0x1b8e38…1b8fcc Dummy {f00=0x008b, f01=0x018e, f02=»TAB t P LDK A1,2 * P ADS A1,DC:IN UPDATE DC:TAB IN POINTER P L * P ADS A1,DC:TAB INCREMENT DC:TAB LENGTH T P IFT STAT=1 P LDK A1,4 DEVICE END P ORS A1,DWTST,A6 ( P CF A15,INSSQ INSERT IN STATUS QUEUE P XIF PDCTP30
0x1b8fcc…1b9160 Dummy {f00=0x008b, f01=0x018e, f02=» P* P* P* WRITE P* , P* 6 P* COMPLETE WHEN: @ P* SUCCESFUL TRANSMISSION X P* TIME OUT z P* P* PDCWR EQU * P CF A15,TIMEWR SET TIMER P CF A15,INSWQ QUEUE REQUEST P RB DCRTN
0x1b9160…1b92f4 (1, 404) Dummy {f00=0x008c, f01=0x0190, f02=» P* P* PDCRD EQU * P LD A8,DWTECB,A6 GET ECB * . P LD A3,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE J " P RF(Z) DCRD10 NOTHING IN QUEUE | P ( P LDR* A2,A3 TAKE THE FIRST IN QUEUE P ST A2,DWTRQ,A6 P ADK A3,6 P ST A3,E
0x1b92f4…1b9488 Dummy {f00=0x008c, f01=0x0190, f02=» P $ PDCRD10 CF A15,TIMERE START TIMER P RB DCRTN 4 P EJECT F P* T P* ^ P* GET WRITE BUFFER h P* P* P IFF TBUFL=0 P* COMPLETE WHEN: P* BUFFER BEEN ALOCATED P* TIME OUT P* P*
0x1b9488…1b961c Dummy {f00=0x008c, f01=0x0190, f02=» P LDKL A1,TBUFL+TBUFL ( P ST A1,ECBEL,A8 STORE BUFFER LENGTH P LDK A1,0 L P RB ENDIO COMPLETE REQUEST ^ PDCGW10 EQU * P CF A15,TIMERE START TIMER P CF A15,INSGWQ QUEUE REQUEST P RB DCRTN P XIF P EJECT P*
0x1b961c…1b97b0 Dummy {f00=0x008c, f01=0x0190, f02=»DCRR10 EQU * P LDK A1,0 * P CF A15,TENDIO COMPLETE RRBUF REQUEST & P RB DCRTN T P EJECT f P* t P* ~ P* EXCHANGE P* P* P* P* COMPLETE WHEN: " P* MESSAGE PASSED TO TERMINAL P* TIME OUT
0x1b97b0…1b9944 Dummy {f00=0x008c, f01=0x0190, f02=» IFF STAT=0 PDCSS EQU * * P LD A1,ECBCW,A8 GET STATUS INFORMATION & P ANK A1,3 MASK DB,IR T P RF(Z) DCSS20 DEVICE END p PDCSS10 EQU * P ST A1,DWTST,A6 P RB DCRR10 COMPLETE REQUEST PDCSS20 EQU * P LD A1,DWTST,A6
0x1b9944…1b9ad8 Dummy {f00=0x008c, f01=0x0190, f02=»DK A1,4 SET DE P RB DCSS10 P XIF ( P EJECT 4 P* B P* L P* V P* TIMER HANDLING PART ` P* ~ P* P* P* READ TIMER=TIMERR P* PTIMERE EQU * P LDR A1,A6 & P LD A2,ECBCW,A8 GET TIMEOUT VALU
0x1b9ad8…1b9c6c Dummy {f00=0x008c, f01=0x0190, f02=»WTTP,A6 STORE TIMER POINTER PTIME10 EQU * $ P RF GBUF10 RETURN 8 P* R P* TIMEOUT READ TIMER P* x PTOUTRE EQU * P LDR A6,A1 FETCH DWT P CM DWTTP,A6 P IFF TBUFL=0 $ P CF A15,REMOVG REMOVE FROM QUEUE P XIF
0x1b9c6c…1b9e00 Dummy {f00=0x008c, f01=0x0190, f02=») TOUTR2 NOT EXCHANGE 2 P ORK A1,2 RETURN CODE /42 AT EXCHANGE TIME OUT $ PTOUTR2 RB ENDIO COMPLETE REQUEST T P* | P* WRITE TIMER=TIMWR P* PTIMEWR LDR A1,A6 & P LD A2,ECBCW,A8 GET TIMEOUT VALUE P RB(Z) TIME10 NO TIMING
0x1b9e00…1b9f94 (1, 405) Dummy {f00=0x008c, f01=0x0190, f02=» P* P* TIMEOUT WRITE TIMER P* 0 PTOUTWR EQU * : P LDR A6,A1 FETCH DWT N P CM DWTTP,A6 j P LD A1,DWTOR,A6 GET ORDER ~ P SUK A1,6 P RF(Z) TOUT10 WRITE P SUK A1,2 ( P RB(NZ) TOUTR1 ORDER IS NOT EXCHANGE
0x1b9f94…1ba128 Dummy {f00=0x008c, f01=0x018e, f02=»F A15,CKGBQ CHECK GET BUFFER QUEUE P XIF * * P CF A15,REMOVW REMOVE FROM WRITE QUEUE 6 P* d & P* THIS INSTRUCTION DOES NOT BELONG n P* TO THE STANDARD INTERFACE ( P CM XACK INDICATE 'ACK NOT EXPECTED' P LD A2,FDWTUT P CWR A2,A6
0x1ba128…1ba2bc Dummy {f00=0x008c, f01=0x018e, f02=» P* STOP REQUEST TIMING P* & & P* REMAINING TIME IS RETURNED IN A2 0 P* Z P* d PCTIME EQU * n & P LD A2,DWTTP,A6 GET TIMER POINTER P RF(Z) CTIM10 NOT RUNNING P LDR* A2,A2 " P NGR A2,A2 GET REMAINING TIME P
0x1ba2bc…1ba450 Dummy {f00=0x008c, f01=0x0190, f02=» z P* ! $ P* CALLING SEQUENCE: CF A15,GRBUF ! P* A4=0 IF NO BUFFER IS FREE ! : & P* ELSE A4 CONTAINS BUFFER ADDRESS ! ^ P* A2 AND A3 ARE DESTROYED ! P* ! P* ! ( PGRBUF LDKL A2,DCRBUF RECEIVE BUFFERS ! PGBUF INH ! P LDR* A4,A2 !
0x1ba450…1ba5e4 Dummy {f00=0x008c, f01=0x018e, f02=»TACK POINTER ! v P ABR* A15 RETURN TO CALLER " P* " 6 P* " @ P* GET TRANSMIT BUFFER " J P* " h P IFF TBUFL=0 " r $ P* CALLING SEQUENCE: CF A15,GTBUF " P* A4=0 IF NO BUFFER IS FREE " & P* ELSE A4 CONTAINS BUFFER ADDRESS " P* A2 AND A3
0x1ba5e4…1ba778 Dummy {f00=0x008c, f01=0x0190, f02=» P* CHECK GET BUFFER QUEUE # P* # $ P* # . PCKGBQ EQU * # 8 P LDR A7,A6 SAVE A6 # L " P LD A6,DCGWQ GET QUEUE ANCHOR # f " P RF(Z) CKG110 NO ONE ON QUEUE # P SUK A6,DWTWQ # P LD A2,DWTST,A6 # P RF(N) CKG100 NO REQUEST # P LD A2,D
0x1ba778…1ba90c Dummy {f00=0x008c, f01=0x0190, f02=» P RF(Z) CKG110 NO BUFFER FREE $ P LD A3,DWTECB,A6 $ ( ( P ST A4,ECBBA,A3 STORE BUFFER ADDRESS $ @ P LDKL A1,TBUFL+TBUFL $ l ( P ST A1,ECBEL,A3 STORE BUFFER LENGTH $ & P CF A15,CTIME STOP REQUEST TIMING $ ( P ST A2,ECBCW,A3 STORE REMAINING TIME $
0x1ba90c…1baaa0 Dummy {f00=0x008c, f01=0x0190, f02=» RESTORE A6 $ P RB GBUF10 RETURN % P XIF % . P EJECT % : P* % H P* % R P* RELEASE RECEIVE BUFFER % P* % | P* A4 CONTAINS BUFFER ADDRESS % $ P* CALLING SEQUENCE: CF A15,RRBUF % P* A2 AND A3 ARE DESTROYED % P* % P* % ( P
0x1baaa0…1bac34 (1, 406) Dummy {f00=0x008c, f01=0x0190, f02=» P RB RBUF10 & PRBUF20 EQU * & P STR A4,A2 & * P CMR A4 & < P RB GBUF10 RETURN TO CALLER & L P* & p P* & z P* RELEASE TRANSMIT BUFFER & P* & P IFF TBUFL=0 & P* A4 CONTAINS BUFFER ADDRESS & $ P* CALLING SEQUENCE: CF A15,RTBUF
0x1bac34…1badc8 Dummy {f00=0x008c, f01=0x0190, f02=» RBUF DRIVER BUFFER & P CWK A4,TBUF2 ' P RB(E) RBUF DRIVER BUFFER ' 2 " P RB GBUF10 APPLICATION BUFFER ' T P XIF ' z P EJECT ' P* ' P* ' ( P* INSERT DWT IN WRITE REQUEST QUEUE ' P* ' P* A2,A3,A4 DESTROYED ' P* A6=DWT '
0x1badc8…1baf5c Dummy {f00=0x008c, f01=0x018e, f02=» FOUND ' v P LDR A2,A3 ( P RB INSWQ2 ( PINSWQ3 ADR A4,A6 ( 2 P STR A4,A2 INSERT IN QUEUE ( J " P CMR A4 INDICATE END OF QUEUE ( l P RB GBUF10 RETURN ( P* ( P* ( * P* REMOVE DWT FROM WRITE REQUEST QUEUE ( P* ( P* A2,A3,A4 DESTR
0x1baf5c…1bb0f0 Dummy {f00=0x008c, f01=0x0190, f02=» PREM06 EQU * ) P ADR A4,A6 ) PREM10 LDR* A3,A2 ) , & P RB(Z) GBUF10 NOT ON QUEUE: RETURN ) D P CWR A3,A4 ) n P RF(E) REM15 ) P LDR A2,A3 GET NEXT ) P RB REM10 ) PREM15 LDR* A3,A4 REMOVE ) P STR A3,A2 ) P RB GBUF10 RETURN )
0x1bb0f0…1bb284 Dummy {f00=0x008c, f01=0x0190, f02=» DESTROYED ) P* A6=DWT * P* * " * PINSGWQ LDKL A2,DCGWQ GET QUEUE ANCHOR * , P RB INSWQ1 * Z P* * l P* * v , P* REMOVE DWT FROM GET WRITE BUFFER QUEUE * P* * P* A2,A3,A4 DESTROYED * P* A6=DWT * P* * * PREMOVG LDKL A2,DCGWQ GET
0x1bb284…1bb418 Dummy {f00=0x008c, f01=0x0190, f02=» STAT=0 * P* A2,A3,A4 DESTROYED + P* A6=DWT + , P* + < ( PINSSQ LDKL A2,DCSTQ GET QUEUE ANCHOR + F P LDK A4,DWTSQ + r P RB INSWQ2 + P* + P* + " P* REMOVE DWT FROM STATUS QUEUE + P* + P* A2,A3,A4 DESTROYED + P* A6=DWT +
0x1bb418…1bb5ac Dummy {f00=0x008c, f01=0x0190, f02=» + $ P* QUEUE ALLOCATED RECEIVE BUFFER , P* , 0 P* A4=BUFFER ADDR , : P* A2,A3 DESTROYED , R P* , l PQRBUF EQU * , v P IFT MESPAS=1 , ( P LDKL A2,DW1500 QUEUE ON DC-TASK DWT , P XIF , P IFT MESPAS=0 , $ P LDR A2,A6 QUEUE ON TERMIN
0x1bb5ac…1bb740 Dummy {f00=0x008c, f01=0x0190, f02=»EUE FOUND , z P LDR A2,A3 - P RB QR100 - $ & PQR200 STR A4,A2 INSERT INTO QUEUE - 6 " P CMR A4 INDICATE END OF QUEUE - ` P RTN A5 - P EJECT - P* - P* - 2 P* CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE - P* - 4 P* REGISTERS A1,A
0x1bb740…1bb8d4 (1, 407) Dummy {f00=0x008c, f01=0x0190, f02=» LDK A1,2 READ REQUEST ? - P CW A1,DWTOR,A6 . P RF(NE) CKM110 NO . 8 $ P LD A8,DWTECB,A6 ECB ADDR TO A8 . R * P LD A3,DWTRQ,A6 A3=ADDR TO READ QUEUE . z " P RF(Z) CKM200 NO READ IN QUEUE . , P LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER . . P ST A2,DWT
0x1bb8d4…1bba68 Dummy {f00=0x008c, f01=0x0190, f02=» . 0 P ST A4,ECBEL,A8 STORE NUMBERS OF CHARACTERS / P LD A4,-2,A3 / < . P ST A4,ECBCW,A8 STORE LINE DEVICE ADDRESS / P P LDK A1,0 PARAMETER=OK / 6 PCKM100 CF A15,TENDIO COMPLETE READ GENERAL REQUEST / * PCKM110 ADKL A15,4 ADJUST STACK POINTER / P
0x1bba68…1bbbfc Dummy {f00=0x008c, f01=0x018e, f02=»A1,DCSTOL / P ST A1,DCSTOL 0 & P RB(E) CKM110 NO CHANGE OF STATUS 0 ( * P ORKL A1,/2000 INDICATE STATUS CHANGE 0 R P RB CKM100 0 P EJECT 0 P* 0 P* 0 P* STORE REGISTER A3-A8 0 $ P* CALLING SEQUENSE: CF A15,STREG 0 P* 0 P* RE
0x1bbbfc…1bbd90 Dummy {f00=0x008c, f01=0x0190, f02=» P ST A6,LCA6 1 P ST A7,LCA7 1 P ST A8,LCA8 1 , P RF RTNA15 RETURN 1 @ P EJECT 1 Z PLDREG LDKL A3,0 1 h PLCA3 EQU *-2 1 P LDKL A4,0 1 PLCA4 EQU *-2 1 P LDKL A5,0 1 PLCA5 EQU *-2 1 P LDKL A6,0 1 PLCA6 EQU *-2 1 P L
0x1bbd90…1bbf24 Dummy {f00=0x008c, f01=0x0190, f02=»CT 1 P* 2 P* 2 P* TIMER VALUES 2 P* 2 4 P* 2 > ( PTIMPRO EQU 30 PROCEDURE TIMER 3 SEC 2 H P* 2 t P* 2 ~ P* CHARACTER EQUATES 2 P* 2 & PSF EQU X'1D' START FIELD CHARACTER 2 PSYN EQU /16 2 PSTX EQU /02 2 PETX EQU
0x1bbf24…1bc0b8 Dummy {f00=0x008c, f01=0x0190, f02=»EQU /15 2 PESC EQU /1B 3 PSBA EQU /11 3 $ PGP EQU /22 3 8 PRDBCOM EQU /32 3 J PRDMCOM EQU /36 3 ` P IFT CODE=0 3 v PPAR EQU /80 3 PRVI EQU /3C 3 PACK0 EQU /30 3 PACK1 EQU /31 3 PDC1 EQU /11 3 P IFT MSV1=0 3 PWACK E
0x1bc0b8…1bc24c Dummy {f00=0x008c, f01=0x0190, f02=»ODE=1 3 PPAR EQU /00 4 PWACK EQU /2C 4 " PRVI EQU /40 4 6 PACK0 EQU /18 4 J PACK1 EQU /2F 4 ^ PSYNEBC EQU /32 4 r P XIF 4 P EJECT 4 P* 4 P* 4 P* PROCEDURE WORK AREAS 4 P* 4 P* 4 * PFDWTIN RES 1 CURRENT DWT FOR REC
0x1bc24c…1bc3e0 Dummy {f00=0x008c, f01=0x0190, f02=»ETX SENT 4 2 PXSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT 5 " PXRB DATA 0 READ BUFFER SWITCH 5 F PCACK DATA 0 ACK COUNTER 5 l * PSYNSW DATA 0 0=SKIP SYNS, 1=DON'T SKIP 5 P* 5 PFECB RES 1 WRITING ECB 5 ( PFECBBA RES 1 WRITING BUFFER ADDRESS 5
0x1bc3e0…1bc574 (1, 408) Dummy {f00=0x008d, f01=0x0190, f02=»Q DATA 0 STATUS QUEUE ANCHOR 5 . PDCTPP DATA 0 POINTER FOR PROCEDURE TIMING 6 $ , PRESEND DATA 0 CONTROL SEQUENCE SAVE AREA 6 V P* 6 P* 6 $ P* 3270 SENSE/STATUS INFORMATION 6 P* 6 P* 6 P IFF STAT=0 6 . PSSTAB EQU * S/S 0 : NO STATUS,
0x1bc574…1bc708 Dummy {f00=0x008d, f01=0x0190, f02=» 6 b , PIR EQU /26 S/S 1 : INTERVENTION REQUIRED 7 P XIF 7 8 P EJECT 7 D P* 7 R P* 7 P* BASIC RECEIVE MODE 7 f P* 7 " P* ENTERED EVERY TIME A MESSAGE 7 & P* IS EXPECTED FROM THE MASTER SIDE 7 P* 7 P* 7 P IFT P6805=1 SALCUZ 7
0x1bc708…1bc89c Dummy {f00=0x008d, f01=0x0190, f02=»05=0 SALCUZ 7 2 P CF A5,HALTIN HALT RECEIVER AND UPDATE STATUS 8 P XIF SALCUZ 8 J P IFT P6805=1 SALCUZ 8 ` 0 P CF A15,CKMESS CHECK IF STATUS CHANGE SALCUZ 8 | P XIF SALCUZ 8 PBRM010 EQU * 8 P IFT CODE+P6805=0 SALCUZ 8 0 P LDKL A2,/10
0x1bc89c…1bca30 Dummy {f00=0x008d, f01=0x0190, f02=»C SPECIFY SYN PATTERN 8 v P XIF SALCUZ 9 P IFT P6805=0 SALCUZ 9 4 " P CIO A2,1,LCUIN START RECEIVER 9 P P XIF SALCUZ 9 v P IFT P6805=1 SALCUZ 9 P IFF CODE=1 SALCUZ 9 P LDK A2,/0C SALCUZ 9 * P CIO A2,1,LCUIN START RECEIVER SALCUZ 9
0x1bca30…1bcbc4 Dummy {f00=0x008d, f01=0x0190, f02=» P IFT CODE+P6805=2 SALCUZ : P LDK A2,0 SALCUZ : & * P CIO A2,1,LCUIN START RECEIVER SALCUZ : @ P LDK A2,SYNEBC SALCUZ : n 2 P OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ : P RB(NA) BRMHLT SALCUZ : P XIF SALCUZ : PBRM100 EQU * : $
0x1bcbc4…1bcd58 Dummy {f00=0x008d, f01=0x0190, f02=»CEIVED : | P SUK A1,EOT-STX ; P RF(Z) BRM200 EOT RECEIVED ; & P SUK A1,ENQ-EOT ; H P ABL(Z) BRM400 ENQ RECEIVED ; ` P SUK A1,DLE-ENQ ; P ABL(Z) BRM600 DLE RECEIVED ; P SUK A1,NAK-DLE ; P ABL(Z) BRM500 NAK RECEIVED ; P IFT MSV1=0
0x1bcd58…1bceec Dummy {f00=0x008d, f01=0x018e, f02=»NVALID ADDRESSING ; P XIF < P LDK A3,0 < & P CC A2,DW1500+1 < 8 P RF(E) BRM110 POLLING < P P LDK A3,2 < n P CC A2,DW1500 < P RF(NE) BRM150 NOT THIS TCU < PBRM110 EQU * < P CF A5,READP READ 1:ST STA < P RF(NZ) BRM150 PARITY ER
0x1bceec…1bd080 Dummy {f00=0x008d, f01=0x018e, f02=» , P RF(NE) BRM150 INVALID ADDRESS SEQUENCE = P XIF = 4 " P CF A5,READ READ ONE CHARACTER = @ P IFT P6805=0 SALCUZ = f P SUK A2,ENQ+PAR = P XIF SALCUZ = P IFT P6805=1 SALCUZ = P SUK A2,ENQ SALCUZ = P XIF SALCUZ = P RF(NZ) BR
0x1bd080…1bd214 (1, 409) Dummy {f00=0x008d, f01=0x0190, f02=» = P CIO A1,0,LCUIN HALT INPUT > P SST A1,LCUIN > * P XIF SALCUZ > @ P IFT P6805=1 SALCUZ > V $ P CF A5,HALTIN HALT INPUT SALCUZ > r . P RB(NZ) BRM010 PARITY ERROR SALCUZ SALCUZ > P XIF SALCUZ > P LDK A1,1 > P ST A1,CACK LOAD ACK
0x1bd214…1bd3a8 Dummy {f00=0x008d, f01=0x0190, f02=» IFT MSV1=1 > 6 P CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS) ? P XIF ? N P IFT MSV1=0 ? Z & P CF A5,FINTER CHECK IF STA PRESENT ? n P XIF ? P IFF EM3270=0 ? . P CF A5,FINT10 CONTINUE SEARCHING IN DC:TAB ? P XIF ? P LDR A6,A3 LOAD
0x1bd3a8…1bd53c Dummy {f00=0x008d, f01=0x0190, f02=» ? n P LDR A6,A3 LOAD DWT TO A6 @ P RF(NZ) BRM130 STA FOUND @ * P IFT MSV1=0 @ J $ P LDKL A6,DW1500 SELECT TO DCTASK @ ` PBRM130 EQU * @ P ABL SELECT @ P XIF @ P IFT MSV1=1 @ P ABL BRM INVALID ADDRESS @ P XIF @ P*
0x1bd53c…1bd6d0 Dummy {f00=0x008d, f01=0x0190, f02=» RESYNCHRONIZE @ & P CF A5,READ READ ANOTHER CHARACTER A P RB BRM150 A @ P EJECT A R P* A ` P* A j P* EOT HAS BEEN RECEIVED A t P* A P* A PBRM200 EQU * A & P CF A5,HPTIM STOP PROCEDURE TIMER A P IFT RCOM=1 A P CM XRB RESET
0x1bd6d0…1bd864 Dummy {f00=0x008d, f01=0x0190, f02=»Z) BRM210 NO ONE WRITING A P LDK A1,2 SET RC=2 B ( P CF A5,CWRITE COMPLETE WRITE REQUEST B : PBRM210 EQU * B f " P CM XACK RESET 'ACK EXPECTED' B z PBRM220 EQU * B P CM XSEL RESET 'SELECTED' B P RB BRM B P EJECT B P* B P* B P
0x1bd864…1bd9f8 Dummy {f00=0x008d, f01=0x0190, f02=»ED B x P LD A1,DCRBUF C ( P*********************CHAINED COMMAND C & P RB(Z) BRM150 NO BUFFER AVAILABLE C L P********************* C v PBRM305 EQU * C P CF A5,RDMESS READ MESSAGE C P SUK A7,1 C P RF(NZ) BRM320 MESSAGE OK C PBRM310 EQU
0x1bd9f8…1bdb8c Dummy {f00=0x008d, f01=0x0190, f02=» P IFT RCOM=1 D P LD A1,XACK D & P RF(Z) BRM316 ACK IS NOT EXPECTED D , P LD A1,DCRBUF D V & P RF(Z) BRM316 NO BUFFER AVAILABLE D l " P LD A6,FDWTUT GET WRITING DWT D 0 P ABL(Z) BRM150 NO ONE WRITING. RESYNCHRONIZE D P LDR* A2,A6 GET STA D
0x1bdb8c…1bdd20 Dummy {f00=0x008d, f01=0x0190, f02=» D P IFT RCOM=1 E , P CF A5,PRREC PREPARE FOR TEXT RECEPTION E P LDK A1,0 SET RC=0 E L ( P CF A5,CWRITE COMPLETE WRITE REQUEST E f P LDK A1,1 E & P XRS A1,CACK INCREASE ACK COUNTER E P RB BRM305 READ THE MESSAGE E P XIF E ( PBRM316 CF
0x1bdd20…1bdeb4 (1, 410) Dummy {f00=0x008d, f01=0x0190, f02=» P IM XSTA INDICATE MESSAGE OK F $ P LD A4,DCRBUF GET BUFFER ADDRESS F ( P ADK A4,6 F P P CW A4,FBLST F b " P RF(NE) BRM325 NOT FIRST BLOCK F v P IFF RCOM=0 F P LDK A1,ESC F P CCR A1,A4 F P RB(NE) BRM310 ESC NOT FOUND F P ADK A4,1 F
0x1bdeb4…1be048 Dummy {f00=0x008d, f01=0x0190, f02=»OM-RDBCOM F & P RF(Z) RDMOD READ BUFFER RECEIVED G P XIF G < PBRM325 EQU * G H P SUK A7,1 G & P RF(Z) BRM340 MESSAGE ENDED BY ETB G n P CM FBAX G * P CF A15,GRBUF ALLOCATE RECEIVE BUFFER G P ADK A4,6 G P LD A6,FDWTIN GET INPUT DWT G
0x1be048…1be1dc Dummy {f00=0x008d, f01=0x0190, f02=»CRBUF G P RF(Z) BRM326 H P ST A2,+4,A1 H $ P XIF H 8 PBRM326 EQU * H D P CWK A6,DW1500 H X , P RF(E) BRM330 MESSAGE IS MENT FOR DCTASK H n P LD A2,DWTST,A6 GET STATUS H P RF(N) BRM330 NO REQUEST H P LDK A2,2 H P CW A2,DWTOR,A6 H "
0x1be1dc…1be370 Dummy {f00=0x008d, f01=0x0190, f02=»BA,A8 STORE BUFFER ADDRESS H P LD A3,-4,A4 GET LENGTH I " * P ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH I B & P CF A15,CTIME STOP REQUEST TIMING I p ( P ST A2,ECBCW,A8 STORE REMAINING TIME I P EJECT I P* I P* I 0 P* CHECK IF START PRINTER BIT SET
0x1be370…1be504 Dummy {f00=0x008d, f01=0x0190, f02=»TE I x P ANK A2,8 J P RF(Z) BRM328 J P LD A2,DWTST,A6 GET STATUS J 2 P ORK A2,/A J T P ST A2,DWTST,A6 J f PBRM328 EQU * J ~ P XIF J $ P CF A15,TENDIO COMPLETE REQUEST J P RF BRM345 J P EJECT J PBRM330 EQU * J P SUK A4,6 GET
0x1be504…1be698 Dummy {f00=0x008d, f01=0x0190, f02=»F A5,TRACK SEND ACK 0/1 J P ABL BRM K PBRM345 EQU * K 0 P IFT STAT=1 K D P LD A1,DWTST,A6 K X P ANK A1,8 K p $ P RB(Z) BRM340 ACK SHOULD BE SENT K P CF A5,TRWACK SEND WACK K P RF BRM410 K P XIF K P IFF STAT=1 K P RB BRM340 K
0x1be698…1be82c Dummy {f00=0x008d, f01=0x0190, f02=» $ PRDBUF EQU * READ BUFFER COMMAND L PRDMOD EQU * L , " P CM XSEL RESET SELECT EXPECTED L @ 4 P LD A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL L f $ P LD A4,DWTBUF,A6 BUFFER ADDRESS L $ P SUK A4,2 SDJUST BUFFER ADDRESS L " P LDKL A3,1922 REQUESTED LE
0x1be82c…1be9c0 Dummy {f00=0x008d, f01=0x0190, f02=»127 L P XIF M P* M P* M " P* ENQ HAS BEEN RECEIVED M , P* M L P* M V PBRM400 EQU * M ` & P CF A5,HPTIM STOP PROCEDURE TIMER M t P LD A1,XACK M P OR A1,XSEL M " P RF(Z) BRM410 IN CONTROL STATE M . P CF A5,TRREP REPEAT LAST CON
0x1be9c0…1beb54 (1, 411) Dummy {f00=0x008d, f01=0x0190, f02=» M PBRM500 EQU * N & P CF A5,HPTIM STOP PROCEDURE TIMER N P LD A1,XACK N F P RF(NZ) BRM510 ACK EXPECTED N Z P OR A1,XSEL N ~ " P RB(Z) BRM410 IN CONTROL STATE N P RF BRM636 N PBRM510 EQU * N " P LD A6,FDWTUT GET WRITING DWT N P IFF
0x1beb54…1bece8 Dummy {f00=0x008d, f01=0x0190, f02=»T BLOCK N l & P SU A1,FECBBA COMPUTE BUFFER INDEX O P ST A1,FBAX O : P ABL POL130 O N P* O b P* O l P* DLE HAS BEEN RECEIVED O v P* O P* O PBRM600 EQU * O & P CF A5,HPTIM STOP PROCEDURE TIMER O P LD A1,XACK O " P RB(Z) BRM41
0x1bece8…1bee7c Dummy {f00=0x008d, f01=0x0190, f02=»CEIVED O P* P P LD A1,CACK GET ACKCOUNTER P P RF(Z) BRM630 ACK,0 EXPECTED P : PBRM610 EQU * P ^ P CF A5,TRENQ SEND ENQ P r & P CF A5,SPTIM START PROCEDURE TIMER P P RB BRM410 P PBRM620 EQU * P P CWK A2,ACK1 P P RF(NE) BRM650 P
0x1bee7c…1bf010 Dummy {f00=0x008d, f01=0x018e, f02=» P P LD A1,XETX Q P RF(Z) BRM640 ETX NOT SENT Q P EJECT Q > P* Q L , P* ACK HAS BEEN RECEIVED TO AN ETX BLOCK Q V P* Q P LDK A1,0 SET RC=0 Q PBRM635 EQU * Q P IFF STAT=0 Q P LD A2,XSTA Q . P RF(NZ) BRM670 STATUS HAS BEEN TRA
0x1bf010…1bf1a4 Dummy {f00=0x008d, f01=0x0190, f02=» Q P R P CM XRB RESET READ BUFFER R P XIF R 2 P RB BRM410 R > PBRM640 EQU * R P P LDK A1,1 R d & P XRS A1,CACK INCREMENT ACK COUNTER R v P ABL POL130 R PBRM650 EQU * R P CWK A2,RVI+PAR R ( P RB(NE) BRM610 INVALID DLE SEQUENCE R
0x1bf1a4…1bf338 Dummy {f00=0x008d, f01=0x0190, f02=»35 R PBRM660 EQU * S P LDK A1,0 SET RC=0 S P RB BRM635 S 8 P IFF STAT=0 S J P EJECT S ^ P* S l P* S v " P* STATUS HAS BEEN TRANSMITTED S P* S P* S PBRM670 EQU * S " P LD A6,FDWTUT GET DWT ADDRESS S , P CF A15,REMOVS REMOV
0x1bf338…1bf4cc Dummy {f00=0x008d, f01=0x0190, f02=» ANK A1,4 S P RB(Z) BRM636 NOT DE T P LDKL A1,/8000 T . " P ANS A1,DWTST,A6 CLEAR STATUS T D P RB BRM636 T j P XIF T | P EJECT T P* T P* T P* SELECT HAS BEEN RECEIVED T P* T P* T PSELECT EQU * T P IFF STAT=0 T P
0x1bf4cc…1bf660 Dummy {f00=0x008d, f01=0x0190, f02=» P XIF U P IFF STAT=1 U P RF SEL110 U $ P XIF U 6 PSEL100 EQU * U B P ABL BRM U V PSEL110 EQU * U f P IFT STAT+NOWACK=1 U z P ANK A3,8 U P RF(NZ) SEL115 BUSY U P XIF U P IFT STAT+NOWACK=2 U P ANK A3,8 U " P RF(Z) SEL111
0x1bf660…1bf7f4 (1, 412) Dummy {f00=0x008e, f01=0x018e, f02=») SEL120 BUFFER AVAILABLE U PSEL115 EQU * V " P IFF STAT+NOWACK=2 V 6 P CF A5,TRWACK SEND WACK V P P XIF V p P RB SEL100 V | PSEL120 EQU * V , P CF A5,PRREC PREPARE FOR TEXT RECEPTION V P CF A5,TRACK SEND ACK,0 V P RB SEL100 V P EJE
0x1bf7f4…1bf988 Dummy {f00=0x008e, f01=0x0190, f02=» P CM FBAX RESET BUFFER INDEX W P IFT CODE=1 W ( . P LC A2,TEBCDIC,A2 TRANSLATE STA TO EBCDIC W < P XIF W n $ P ST A2,+4,A1 SAVE STA IN BUFFER W z P IM XSTA W " P ST A6,FDWTIN STORE INPUT DWT W P RTN A5 W P EJECT W P* W P* W $
0x1bf988…1bfb1c Dummy {f00=0x008e, f01=0x0190, f02=» P LD A6,DCSTQ X & P RF(Z) POL110 NO STATUS TO BE SENT X " P SUK A6,DWTSQ GET DWT ADDRESS X D PPOL050 EQU * X j P CF A5,TRSTA SEND STATUS X ~ & P CF A5,SPTIM START PROCEDURE TIMER X P IM XACK SET 'ACK EXPECTED' X P XIF X P IFF STAT=1 X
0x1bfb1c…1bfcb0 Dummy {f00=0x008e, f01=0x0190, f02=»EUE X v PPOL115 EQU * Y P CF A5,TREOT SEND EOT Y P RB POL100 Y > PPOL120 EQU * Y P " P SUK A6,DWTWQ GET DWT ADDRESS Y d PPOL125 EQU * Y $ P LD A8,DWTECB,A6 GET ECB ADDRESS Y P RF(NZ) POL126 Y P CF A15,REMOVW Y P RB POL115 Y PPOL1
0x1bfcb0…1bfe44 Dummy {f00=0x008e, f01=0x0190, f02=»,A8 GET LENGTH Y PPOL127 EQU * Z & P ST A4,FECBBA SAVE BUFFER ADDRESS Z * ( P SUK A3,2 SKIP FIRST WORD OF BUFFER Z T P ST A3,FECBRL SAVE LENGTH Z P CM FBAX RESET BUFFER INDEX Z PPOL130 EQU * Z P CM XETX RESET 'ETX SENT' Z P CM XSTA Z
0x1bfe44…1bffd8 Dummy {f00=0x008e, f01=0x018e, f02=» EJECT Z P* [ P* [ & P* SPECIFIC POLL HAS BEEN RECEIVED [ " P* [ L P* [ V PSPOLL EQU * [ ` P IFF STAT+SPECP=0 [ t P LDR A7,A6 SAVE A6 [ P CF A5,CPTIM CHECK POLLTIMER [ P LDR A6,A7 RESTORE A6 [ P IFT STAT=1 [ P LD A1,DWT
0x1bffd8…1c016c Dummy {f00=0x008e, f01=0x0190, f02=» [ ~ P RB(N) POL115 NO REQUEST P LD A1,DWTOR,A6 GET ORDER ( P SUK A1,6 J P RB(Z) POL125 WRITE REQUEST P SUK A1,2 " P RB(Z) POL125 EXCHANGE REQUEST P XIF P RB POL115 SEND EOT P EJECT P* P* 8 P* CHEC
0x1c016c…1c0300 Dummy {f00=0x008e, f01=0x0190, f02=»T ~ $ P RF(Z) CWR900 NO WRITE GOING ON ] P LD A2,DWTST,A6 ] 2 P RF(N) CWR900 NO REQUEST ] J P LD A2,DWTOR,A6 GET ORDER ] j P SUK A2,6 ] P RF(Z) CWR100 WRITE REQUEST ] P SUK A2,2 ] ( P RF(NZ) CWR900 NOT EXCHANGE REQUEST ] P LDR A1,
0x1c0300…1c0494 (1, 413) Dummy {f00=0x008e, f01=0x0190, f02=» P RF CWR150 ^ & PCWR100 LD A8,FECB GET ECB ADDRESS ^ P CF A15,CTIME STOP TIMING ^ @ P LDR A8,A8 ^ b P RF(Z) CWR150 ^ t P ST A2,ECBCW,A8 ^ $ P CF A15,TENDIO COMPLETE REQUEST ^ PCWR150 EQU * ^ * P CF A15,REMOVW REMOVE FROM WRITE QUEUE ^
0x1c0494…1c0628 Dummy {f00=0x008e, f01=0x0190, f02=»5,CKGBQ CHECK GET BUFFER QUEUE ^ P XIF _ & PCWR900 EQU * _ 2 " P CM XACK RESET 'ACK EXPECTED' _ F P CM FDWTUT _ l P RTN A5 _ ~ P EJECT _ P* _ P* _ P* READ ONE TEXT BLOCK _ P* _ P* ON EXIT A3 CONTAINS : _ ( P* 0 : IF CORRECT
0x1c0628…1c07bc Dummy {f00=0x008e, f01=0x0190, f02=»RDMESS EQU * _ $ P LD A4,DCRBUF GET BUFFER ADDRESS ` P ADK A4,6 RESERVE HEADER ` < P LDK A3,0 ` P LD A1,XSTA ` n $ P RF(NZ) RDM050 LAST INPUT WAS OK ` " P LD A1,FBLST COMPUTE NEW INDEX ` P SUR A1,A4 ` P ST A1,FBAX ` PRDM050 EQU * `
0x1c07bc…1c0950 Dummy {f00=0x008e, f01=0x0190, f02=»C ` ~ P a P IFT IBMCHR=1 a P LD A1,FBAX a ( " P RF(NZ) RDM100 NOT FIRST BLOCK a < P CF A5,READP a b P RF(NZ) RDM120 PARITY ERROR a v P CWK A2,ESC a P RF(NE) RDM110 a * P CF A5,READP SKIP NEXT TWO CHARACTERS a P CF A5,READP a P X
0x1c0950…1c0ae4 Dummy {f00=0x008e, f01=0x018e, f02=»X a P RF(E) RDM130 ETX RECEIVED b P CWK A2,ETB b , P RF(E) RDM160 ETB RECEIVED b @ P CWK A2,ITB b b P RF(E) RDM170 ITB RECEIVED b v P CWK A2,ENQ b & P RF(E) RDM140 ENQ IN TEXT RECEIVED b P CWK A2,/FF b $ P RF(E) RDM140 MARK HOLD RECEIV
0x1c0ae4…1c0c78 Dummy {f00=0x008e, f01=0x0190, f02=» b t P ADK A1,3 c P RF(N) RDM115 NOT DC1-DC3 c P SLL A1,6 c < P LDR A8,A1 c N * P CF A5,READP 8-BIT CHAR GET NEXT PART c ` P RF(NZ) RDM120 PARITY ERROR c * P SUK A2,/20 ASSEMBLE TO ONE CHARACTER c P ORR A2,A8 c PRDM115 EQU * c P X
0x1c0c78…1c0e0c Dummy {f00=0x008e, f01=0x0190, f02=»BAX c P CWK A1,RBUFL+RBUFL d P RB(NG) RDM100 NOT OVERFLOW d ( P* d L P* BUFFER OVERFLOW d V P* d p P RF RDM140 ABORT INPUT d z PRDM120 EQU * d & P LDK A3,1 INDICATE INVALID MESSAGE d P SUK A2,/7F d $ P RF(Z) RDM150 MARK HOLD RECEIV
0x1c0e0c…1c0fa0 Dummy {f00=0x008e, f01=0x0190, f02=»,FBAX GET BUFFER INDEX d 2 P ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER e P IFF CODE=1 e T P CF A5,RDLRC e h P RF(Z) RDM150 LRC WAS OK e | P XIF e P IFT CODE=1 e & P CF A5,RDCRC READ CRC AND CHECK IT e P RF(E) RDM150 CRC WAS OK e P X
0x1c0fa0…1c1134 (1, 414) Dummy {f00=0x008e, f01=0x0190, f02=»A5,HALTIN HALT INPUT e P IFT P6805=1 f " P ORR A7,A1 PARITY ERROR SALCUZ f 0 P XIF SALCUZ f V P RTN A5 f l P* f | P* ETB RECEIVED f P* f PRDM160 EQU * f P LDR A3,A3 f " P RB(NZ) RDM130 ALREADY INVALID f " P LDK A3,2 INDICATE COR
0x1c1134…1c12c8 Dummy {f00=0x008e, f01=0x0190, f02=» RB(NZ) RDM120 LRC WAS NOT OK f P XIF g & P IFT CODE=1 g 2 & P CF A5,RDCRC READ CRC AND CHECK IT g F " P RB(NE) RDM120 CRC WAS NOT OK g p P XIF g P RB RDM100 g P EJECT g P* g P* TRANSMIT ACK 0 OR 1 g P* g PTRACK LDK A2,1 g
0x1c12c8…1c145c Dummy {f00=0x008e, f01=0x0190, f02=»DLE g P* h P* TRANSMIT WACK h P* h . PTRWACK LDK A3,WACK LOAD WACK h 8 P RF TRDLE h P* h n P* TRANSMIT RVI h x P* h P IFF STAT=0 h PTRRVI LDK A3,RVI LOAD RVI h P XIF h P* h P* TRANSMIT DLE h P* h PTRDL
0x1c145c…1c15f0 Dummy {f00=0x008e, f01=0x0190, f02=»TRANSMIT NAK h P* i PTRNAK LDK A3,NAK LOAD NAK i P RF TREN10 i @ P* i R P* TRANSMIT EOT i P* i r PTREOT LDK A3,EOT LOAD EOT i | P RF TREN10 i P* i P* TRANSMIT ENQ i P* i PTRENQ LDK A3,ENQ LOAD ENQ i P* i ( PTR
0x1c15f0…1c1784 Dummy {f00=0x008e, f01=0x0190, f02=»END GET FIRST CHARACTER i P CF A5,WRITEP SEND IT j & P LC A2,RESEND+1 GET NEXT CHARACTER j > P CF A5,WRITEP SEND IT j h PTRRE10 LDK A2,/FF j P CF A5,WRIT05 SEND PAD j P LDK A2,/FF j P CF A5,WRIT05 j P LDK A2,0 SALCUZ j $ P CIO A
0x1c1784…1c1918 Dummy {f00=0x008e, f01=0x0190, f02=»T PERFORM SST AT ONCE j P IFF LOGG=0 k ( P CF A5,LOGSST LOG TRANSMITTER STATUS k 2 P XIF k ^ P RTN A5 k j P EJECT k z P* k P* k P* TRANSMIT ONE TEXT BLOCK k P* k P* k PTRTEXT EQU * k P CF A5,TRSYNC START OUTPUT k P
0x1c1918…1c1aac Dummy {f00=0x008e, f01=0x0190, f02=»RT OF MESSAGE k z P l 2 P LD A1,XRB READ BUFFER COMMAND IN PROCESS ??? l P RF(NZ) TRT050 YES !! l T P l r P LD A4,FECBBA l z " P LC A3,+2,A4 GET AID CHARACTER l P SUK A3,/30 l $ P RF(NZ) TRT050 NOT TEST REQUEST l P LDK A2,SOH l P C
0x1c1aac…1c1c40 Dummy {f00=0x008e, f01=0x0190, f02=» SEND / l P LDK A2,STX m P CF A5,WRITE SEND STX m $ ( P ST A4,FBLST REMEMBER START OF BLOCK m B ( P ADK A4,5 SKIP AID + CURSOR ADDRESS m n P LDK A3,5 ADJUST LENGTH m P LDK A2,3 m P ST A2,FBAX m P RF TRT100 m PTRT050 EQU * m P*
0x1c1c40…1c1dd4 (1, 415) Dummy {f00=0x008e, f01=0x0190, f02=»BUFFER ADDRESS m ~ P AD A4,FBAX ADD BUFFER INDEX n ( P ST A4,FBLST REMEMBER START OF BLOCK n : ( P ADK A4,2 SKIP FIRST WORD OF BUFFER n f & P LDK A3,0 RESET CHARACTER COUNTER n P LD A1,FBAX GET BUFFER INDEX n " P RF(NZ) TRT100 NOT FIRST BLOCK n P L
0x1c1dd4…1c1f68 Dummy {f00=0x008e, f01=0x0190, f02=» P IFF RCOM=1 o " P LDK A2,/27 SEND ENTER AS AID o P CF A5,WRITEP o > " P LDK A2,/20 AND CURSOR ADDRESS o T P CF A5,WRITEP o z P LDK A2,/20 o P CF A5,WRITEP o P XIF o P IFT RCOM=1 o P o & P LD A1,XRB READ BUFFER COMMAND ??? o
0x1c1f68…1c20fc Dummy {f00=0x008e, f01=0x0190, f02=» o t P p $ P LD* A3,DWTCUR,A6 CURSOR ADDRESS p . P CF A5,LINCOL SEND LINE AND COLUMN NUMBER p 8 P LDK A3,5 SET BLOCK COUNT p j P RF TRT100 p PTRT070 EQU * p P XIF p P p P LDK A3,2 p PTRT100 EQU * p P LCR A2,A4 GET ONE CHARACTER
0x1c20fc…1c2290 Dummy {f00=0x008e, f01=0x0190, f02=»105 NO!! p P q @ P************************************************************ q P* q , P* CHECK IF ATTRIBUTE CHARACTER OR NULL q f P* q 4 P*********************************************** q P q & P CWK A2,X'20' ATTRIBUTE CHARACTER q
0x1c2290…1c2424 Dummy {f00=0x008e, f01=0x0190, f02=» A2,/0A q PTRT102 EQU * r P CWK A2,/7D END OF MESSAGE ? r $ " P RF(NE) TRT103 NO,GO TO TRT103 r H P LDK A2,/19 r n PTRT103 EQU * r P CWK A2,X'7F' NULL ?? r P RF(NE) TRT105 r P SUK A2,1 r P XIF r P IFT RCOM=1 r P RF TRT105 r
0x1c2424…1c25b8 Dummy {f00=0x008e, f01=0x018e, f02=»RACTER r r P ANK A2,X'7F' s ( P LDR A1,A2 CONVERT TO IBM ATTRIBUTE s $ P ANK A1,1 s P P ANK A2,/1E MASK s b P SLL A2,1 s z & P ORR A2,A1 IBM ATTRIBUTE COMPOSED s " P ORK A2,/40 BIT ALWAYS SET ONE s P LC A2,TASCII,A2 s & P CWK A2,/18 CHECK SP
0x1c25b8…1c274c Dummy {f00=0x008e, f01=0x0190, f02=» P RF TRT110 t PTRT105 EQU * t P XIF t * P EJECT t 6 P CWK A2,/07 t D ( P RF(L) TRT110 ILLEGAL CODE : SKIP IT t X P CF A5,WRITEP SEND CHARACTER t PTRT110 EQU * t $ P IM FBAX INCREMENT BUFFER INDEX t & P LD A1,FECBRL GET REQUESTED LENGTH t
0x1c274c…1c28e0 Dummy {f00=0x008e, f01=0x0190, f02=»L) TRT100 NOT FULL BLOCK t P IFT RCOM=1 u , P LDK A1,SBA CHECK IF SBA AT END OF BLOCK u 4 P CC A1,-2,A4 u d P RF(E) TRT115 YES u x P CC A1,-1,A4 u P RF(NE) TRT116 NO SEND ETB u ( P LCR A2,A4 GET FIRST BYTE AFTER SBA u P ADK A4,1 INREMENT P
0x1c28e0…1c2a74 (1, 416) Dummy {f00=0x008f, f01=0x0190, f02=»TEP SEND IT u P IM FBAX INCREMENT INDEX v P XIF v 4 PTRT116 EQU * v @ P LDK A2,ETB LOAD ETB v T PTRT120 EQU * v p P CF A5,WRITEP SEND IT v P IFF CODE=1 v P LDR A2,A7 GET LRC v P CF A5,WRITEP SEND LRC v P XIF v P IFT CODE=1 v
0x1c2a74…1c2c08 Dummy {f00=0x008f, f01=0x0190, f02=» ANK A2,/FF v " P CF A5,WRIT05 SEND CRC BYTE 2 w P XIF w : P ABL TRRE10 HALT OUTPUT w F PTRT130 EQU * w f P IM XETX INDICATE 'ETX SENT' w z PTRT140 EQU * w P LDK A2,ETX LOAD ETX w P RB TRT120 SEND ETX AND LRC w P EJECT w P* w
0x1c2c08…1c2d9c Dummy {f00=0x008f, f01=0x0190, f02=»' w r P ST A6,FDWTUT SAVE A6 x P CF A5,TRSYNC START OUTPUT x ( P LDK A2,SOH x J P CF A5,WRITE SEND SOH x ^ P LDK A7,0 REST LRC x | P LDK A2,'%' x P CF A5,WRITEP SEND '%' x P LDK A2,'R' x P CF A5,WRITEP SEND 'R' x P LDK A2,STX x
0x1c2d9c…1c2f30 Dummy {f00=0x008f, f01=0x0190, f02=» P LD A1,DWTST,A6 GET STATUS y P ANK A1,/06 MASK FOR S/S 0 y & P SRL A1,1 y H $ P LC A2,SSTAB,A1 GET STATUS BYTE y Z P CF A5,WRITEP SEND S/S 0 y P LDK A2,NOIR PRELOAD S/S 1 y P LD A1,DWTST,A6 GET STATUS y P ANK A1,5 y P RF(Z) TRST10 NO
0x1c2f30…1c30c4 Dummy {f00=0x008f, f01=0x0190, f02=» RB TRT130 SEND ETX AND LRC y P XIF z $ P EJECT z 0 P* z > P* z H P* TRANSMIT SYNC SEQUENCE z R P* z r P* z | PTRSYNC EQU * z P LDK A2,0 SALCUZ z * P CIO A2,0,LCUIN HALT INPUT IF NOT DONE z P SST A2,LCUIN PERFORM SST z P IFT
0x1c30c4…1c3258 Dummy {f00=0x008f, f01=0x0190, f02=» z | P LDK A2,0 SALCUZ { , P CIO A2,1,LCUUT START TRANSMITTER SALCUZ { " P RF(A) TRS010 SALCUZ { R P SST A1,LCUUT SALCUZ { p P RF(A) TRS005 SALCUZ { P ABL BRM SALCUZ { " PTRS005 CIO A2,1,LCUUT SALCUZ { PTRS010 EQU * SALCUZ { P L
0x1c3258…1c33ec Dummy {f00=0x008f, f01=0x018e, f02=» CODE=0 SALCUZ { P LDK A2,/0C SALCUZ | P CIO A2,1,LCUUT SALCUZ | 4 P RF(A) TRS010 SALCUZ | T P SST A1,LCUUT SALCUZ | r P RF(A) TRS005 SALCUZ | P ABL BRM SALCUZ | " PTRS005 CIO A2,1,LCUUT SALCUZ | PTRS010 EQU * | P LDK A2,
0x1c33ec…1c3580 Dummy {f00=0x008f, f01=0x0190, f02=» | h P LDK A3,4 4 SYNS } PTRS100 LDK A2,SYN } P CF A5,WRITE SEND SYN } : P SUK A3,1 } X P RB(NZ) TRS100 } j P RTN A5 } P EJECT } P* } P* } P* RECEIVER INTERRUPT } P* } P* } PIH1501 EQU * } P ST P,INTSAV }
0x1c3580…1c3714 (1, 417) Dummy {f00=0x008f, f01=0x0190, f02=»CCEPTED,CHECK STATUS } | P IFF LOGG=0 ~ ( P CF A5,LOGIN LOG RECEIVED CHARACTER ~ 0 P XIF ~ P IFF CODE=1 ~ h P C2 SYNSW ~ | P RF(NZ) IHLCI2 ~ P CWK A2,SYN SKIP SYNS ~ P RF(E) READ ~ " PIHLCI2 XRR A7,A2 CALCULATE LRC ~ P XIF ~ P
0x1c3714…1c38a8 Dummy {f00=0x008f, f01=0x0190, f02=»C SYN ~ z PIHLCI1 EQU * P CF A5,CRCCAL CALCULATE CRC " ( P LC A2,TASCII,A2 TRANSLATE TO ASCII F P XIF r PIHIN10 RTN A5 ~ P IFT P6805=0 SALCUZ PIHIN20 CF A5,SST PERFORM SST P ABL BRM P XIF SALCUZ P IFT P6805=1
0x1c38a8…1c3a3c Dummy {f00=0x008f, f01=0x0190, f02=» v P* P* PIH1502 EQU * P ST P,INTSAV 0 P CF A15,SAVE8 SAVE A1 - A8 D * P CF A15,LDREG RESTORE DC REGS A3 - A8 f P RB IHIN10 P EJECT P* P* & P* SST INSTRUCTION AND STATUS CHECK P* ( P* LCU STAT
0x1c3a3c…1c3bd0 Dummy {f00=0x008f, f01=0x0190, f02=» BIT 15=MODEM NOT READY P* * PSST SST A1,LCUIN 4 P IFT P6805=1 SALCUZ L 2 P RF(NA) SST200 ALREADY INACTIVE SALCUZ SALCUZ h P XIF SALCUZ P LDR A2,A1 P IFF LOGG=0 & P CF A5,LOGSST LOG SST INFORMATION P XIF
0x1c3bd0…1c3d64 Dummy {f00=0x008f, f01=0x0190, f02=» SALCUZ P RF(Z) SST100 SALCUZ P ANK A2,2 SALCUZ . & P RF(NZ) SST050 THROUGH PUT SALCUZ H & P LDK A1,1 SET PARITY ERROR SALCUZ r P RF SSTRET SALCUZ P XIF SALCUZ PSST050 EQU * SALCUZ P CM XSTA TROUHHPUT ERROR P
0x1c3d64…1c3ef8 Dummy {f00=0x008f, f01=0x0190, f02=»ATUS CHANGE v P RTN A5 P XIF SALCUZ $ P IFT P6805=1 SALCUZ : P ANK A1,/21 SALCUZ V P RF(Z) SST200 LSALCUZ r 6 P CF A15,SETIME LINE ERROR, WAIT 0.2 SECONDS SALCUZ P DATA BRM RESTART SALCUZ P DATA 2 WAIT TIME SALCUZ
0x1c3ef8…1c408c Dummy {f00=0x008f, f01=0x0190, f02=»* A5 RETURN SALCUZ P XIF SALCUZ P* 0 P* : P* HALT INPUT D P* X P* b PHALTIN LDK A1,0 SALCUZ l P CIO A1,0,LCUIN P IFT P6805=0 SALCUZ 4 P RB SST PERFORM SST INSTRUCTION AND STATUS CHECK P XIF SALCUZ
0x1c408c…1c4220 Dummy {f00=0x008f, f01=0x0190, f02=»* WRITE FROM OR READ ONE CHARACTER TO A2 P* 0 P* : PWRITE EQU * D P IFT CODE=1 X P ANK A2,/FF l P CWK A2,/FF 0 P RF(E) WRIT05 NO TRANSLATION OF TRAILING PAD * P LC A2,TEBCDIC,A2 TRANSLATE TO EBCDIC P XIF PWRIT05
0x1c4220…1c43b4 (1, 418) Dummy {f00=0x008f, f01=0x0190, f02=»RR A7,A2 ACCUMULATE BCC P XIF P IFT CODE=1 , & PWRIT10 CF A5,CRCCAL CALCULATE CRC @ P XIF j P IFF LOGG=0 v & P CF A5,LOGOUT LOG OUTPUT CHARACTER P XIF P* PREAD CF A15,STREG P ABL TDISP P EJECT P*
0x1c43b4…1c4548 Dummy {f00=0x008f, f01=0x018e, f02=» ANK A2,/FF P ECR A1,A2 P ORK A2,/80 & PWRI100 SLL A1,1 : P RB(P) WRI100 R P RB(Z) WRITE WRITE h P XRK A2,/80 P RB WRI100 P XIF P IFF CODE+P6805=0 SALCUZ PWRITEP RB WRITE P XIF P* P*
0x1c4548…1c46dc Dummy {f00=0x008f, f01=0x0190, f02=» P IFT CODE+P6805=0 SALCUZ P ECR A1,A2 & PRE100 SLL A1,1 8 P RF(Z) RE110 N P RB(NN) RE100 b P XRK A2,/80 x P RB RE100 PRE110 LDR A1,A2 P ANK A2,/7F P XIF P IFF CODE+P6805=0 SALCUZ P LDK A1,/80
0x1c46dc…1c4870 Dummy {f00=0x008f, f01=0x0190, f02=»FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2 P* > $ P* CALLING SEQUENCE: CF A5,FINTER H P* A2=SUBTERMINAL ADDRESS p P* A4 DESTROYED " P* A3#0: DWT TO FOUND TERMINAL P* B P* NOTE: FOR SIEMENS MSV1 - SEPARATE SELECT AND POL
0x1c4870…1c4a04 Dummy {f00=0x008f, f01=0x0190, f02=» IF 1 COMPARE WITH RIGTH BYTE P* & P* 0 PFINTEP EQU * : P IFT MSV1=0 N PFINTER EQU * b P XIF v P IM RBYTE P IFT MSV1=1 PFINTER EQU * P XIF & P LD A4,DCTAB GET ADDRESS TO DC:TAB * P AD* A4,DCTAB ADDRESS
0x1c4a04…1c4b98 Dummy {f00=0x008f, f01=0x0190, f02=»NAL NOT FOUND z P LDR* A3,A4 LOAD DWT ADDRESS P IFT MSV1=1 : $ P AD A3,RBYTE CHOOSE ADDRESS TYPE N * P CCR A2,A3 COMPARE SUBTERMINAL ADDRESS v P XIF P IFT MSV1=0 . P CC A2,1,A3 COMPARE TO SUBTERMINAL ADDRESS P XIF & P RB(NE
0x1c4b98…1c4d2c Dummy {f00=0x008f, f01=0x0190, f02=»WER ON FUNCTIONS P* P* " $ PDC15ON CF A15,SAVE8 SAVE A1 - A8 , P IFT STAT=1 T P LDK A5,4 SET DEVICE END h P LD A1,DCTAB . P AD* A1,DCTAB GET ADDRESS TO END OF TABLE PDRDC05 SUK A1,2 P CW A1,DCTAB P RF(E) DRDC06
0x1c4d2c…1c4ec0 Dummy {f00=0x008f, f01=0x0190, f02=»US QUEUE t P RB DRDC05 PDRDC06 EQU * " P XIF 6 ( P LD A2,DCTPGP GET POLL TIMER POINTER B " P RF(NZ) DRDC20 ALREADY STARTED n * PDRDC10 CF A15,SPOTIM START POLL TIMER PDRDC20 ABL BRM P EJECT P* P* POLL TIME OUT P
0x1c4ec0…1c5054 (1, 419) Dummy {f00=0x008f, f01=0x0190, f02=»CK IF STATUS CHANGE ~ $ P CF A15,SPOTIM START POLL TIMER P ABL TDISP D P* V 4 P* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED ` P* $ PCPTIM CM DCONOF INDICATE POLLING P LDKL A2,-TIMPOL P ST* A2,DCTPGP RESTART TIMER * P C
0x1c5054…1c51e8 Dummy {f00=0x008f, f01=0x0190, f02=»ER r P DATA PTOUT,TIMPOL & P ST A4,DCTPGP STORE TIMER POINTER $ P ADKL A15,4 N P ABR* A15 b P EJECT t P* P* START PROCEDURE TIMER P* PSPTIM EQU * $ P LDR A1,A6 LOAD DWT AS PARAMETER P CF A15,SETIME P
0x1c51e8…1c537c Dummy {f00=0x008f, f01=0x0190, f02=»UT CM DCTPP P LDR A6,A1 RELOAD A6 P LDKL A5,STB LOAD STACK BASE 0 , P CF A5,HALTIN HALT INPUT IF OPEN SALCUZ T P LD A1,XACK " P RF(Z) PRT10 ACK NOT EXPECTED P CF A5,TRENQ SEND ENQ & P CF A5,SPTIM START PROCEDURE TIMER PPR
0x1c537c…1c5510 Dummy {f00=0x008f, f01=0x0190, f02=»PT10 NOT RUNNING P CM* DCTPP STOP TIMER P CM DCTPP 6 PHPT10 RTN A5 H P EJECT P IFT CODE=1 j P* ~ P* P* CALCULATION OF CRC P* P* A2 = CHARACTER P* A7 = ACCUMULATED CRC P* P* PCRCCAL
0x1c5510…1c56a4 Dummy {f00=0x008f, f01=0x0190, f02=» P XRR A3,A2 P SRL A2,1 P ANK A3,1 , P RF(Z) CRC110 > P XRKL A7,/A001 T PCRC110 SUK A1,1 j P RB(NZ) CRC100 P LD A1,CRCSAV P LD A2,CRCSAV+2 P LD A3,CRCSAV+4 P RTN A5 PCRCSAV RES 3 P EJECT
0x1c56a4…1c5838 Dummy {f00=0x008f, f01=0x018e, f02=»,A7 SAVE CURRENT CRC $ P IM SYNSW DO NOT SKIP SYNCS NOW P CF A5,READ READ BYTE 1 D P LD A8,CRCSAV+2 SAVE IT d P CF A5,READ READ BYTE 2 ( P CM SYNSW SYNCS CAN BE SKIPPED AGAIN P LD A2,CRCSAV+2 SAVE IT P SLL A2,8 P XRR A
0x1c5838…1c59cc Dummy {f00=0x008f, f01=0x0190, f02=» & P* RDLRC READ LRC CHARACTER " P* CR=0 IF LRC OK . P* T PRDLRC IM SYNSW ^ P CF A5,READP t P ADK A5,4 P LDR A1,A1 P RF(NZ) LRCEND P ANK A7,/7F PLRCEND EQU * P CM SYNSW P ABR* A5
0x1c59cc…1c5b60 Dummy {f00=0x008f, f01=0x0190, f02=»NTRY | P DATA 0 CU LINE ADDRESS P DATA /8000 STATUS , P DATA 0 ECB ADDRESS F P DATA 0 ORDER b * P DATA DC15DC POINTER TO ADDRESS BLOCK x P DATA 0 TTAB ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TASK QUEUE P DAT
0x1c5b60…1c5cf4 (1, 420) Dummy {f00=0x0090, f01=0x018e, f02=»MESSAGE QUEUE , P DATA 0 SIMULATED DEVICE BUFFER ADDRESS P DATA 0 CURSOR ADDRESS F P EJECT d P* r P* | P* DC RECEIVE BUFFER POOL P* PRLINK EQU RBUFL+RBUFL+8 P* PDCRBUF EQU * P DATA *+2 FREE BUFFER ANCH
0x1c5cf4…1c5e88 Dummy {f00=0x0090, f01=0x0190, f02=» P IFF RBUFNR=4 P DATA *+RLINK P RES RBUFL+3 0 P XIF D P DATA *+RLINK P P RES RBUFL+3 f P DATA 0 END OF CHAIN z P RES RBUFL+3 P* P* P* DC TRANSMIT BUFFER POOL P* P* PDCTBUF EQU * P
0x1c5e88…1c601c Dummy {f00=0x0090, f01=0x0190, f02=» P RES TBUFL BUFFER AREA 1 PTBUF2 DATA 0 END OF CHAIN $ P RES TBUFL BUFFER AREA 2 F P XIF f P* r P EJECT | P* P* P* INTERRUPT LOGGING ROUTINE P* P* P IFF LOGG=0 PLOGSST ST A2,SAVE2 P ORK
0x1c601c…1c61b0 Dummy {f00=0x0090, f01=0x0190, f02=»E10 P ST A2,SAVE2 PLOG10 ST A3,SAVE3 P LD A3,LOGPNT : P STR A2,A3 P P ADK A3,2 b P CWK A3,LOGEND t P RF(L) LOGEXI P LDKL A3,LOGSTA PLOGEXI ST A3,LOGPNT P LD A2,SAVE2 P LD A3,SAVE3 PLOGE10 RTN A
0x1c61b0…1c6344 Dummy {f00=0x0090, f01=0x0190, f02=»TA 0 PSAVE3 DATA 0 P XIF P* , P* 6 P* @ P IFT RCOM=1 J P EJECT ^ < P******************************************************* l P* P* L I N C O L P* : P* CONVERT CURSOR ADDRESS TO LINE AND COLUM
0x1c6344…1c64d8 Dummy {f00=0x0090, f01=0x0190, f02=»CURSOR ADDRESS P SRL A2,6 P ANK A2,X'3F' ( & P LC A2,LICO:T,A2 ASCII LINE NUMBER > " P CF A5,WRITEP SEND LINE NUMBER h P P LDR A2,A3 P ANK A2,X'3F' ( P LC A2,LICO:T,A2 ASCII COLUMN NUMBER $ P CF A5,WRITEP SEND COLUMN NUMB
0x1c64d8…1c666c Dummy {f00=0x0090, f01=0x018e, f02=»/4647 /00-/07 x * P DATA /4849,/5B2E,/3C28,/2B21 /08-/0F * P DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 D * P DATA /5152,/5D24,/2A29,/3B5E /18-/1F r * P DATA /2D2F,/5354,/5556,/5758 /20-/27 * P DATA /595A,/7C2C,/255F,/3E3F /28-/2F ( P DATA /3031,
0x1c666c…1c6800 Dummy {f00=0x0090, f01=0x40d8, f02=» PDCTAB DATA DC:TAB " PDC:TAB DATA 2 LENGTH OF DC:TAB * P DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 D * P DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 r PDC:END EQU * P* P* P END @ A,/7C2C,/255F,/3E3F /28-/2F ( P DATA /3031,
0x1c6800…1c6994 (1, 421) Dummy {f00=0x0090, f01=0x2008, f02=» H P X ` h p x
0x1c6994…1c6b28 Dummy {f00=0x0090, f01=0x0190, f02=» LABEL = FIX1 DATE = 791227 PACK NBR = 001 f P Y _( Y M : ] =IR E
[…0x6…]
0x1c74a0…1c7634 (1, 422) Opaque[0x194]
0x1c7634…1c77c8 # DirEnt {nam=»INIMOM«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1210, f03=0x2020}
0x1c7634…1c77c8 IdxSect {
0x1c7634…1c77c8 f00 = 0x0090 // 0x1c7634 @0x0
0x1c7634…1c77c8 f01 = 0x0008 // 0x1c7636 @0x2
0x1c7634…1c77c8 gno = [ // 0x1c7638 @0x4
0x1c7634…1c77c8 [0x00]: C0x0090.0x2.0
0x1c7634…1c77c8 [0x01]: C0x0090.0x3.0
0x1c7634…1c77c8 [0x02]: C0x0091.0x0.0
0x1c7634…1c77c8 [0x03]: C0x0091.0x1.0
0x1c7634…1c77c8 ]
0x1c7634…1c77c8 }
0x1c77c8…1c795c Dummy {f00=0x0090, f01=0x0190, f02=» 2 P IDENT INIMOM REL 8.2 78-09-15 870105040820 P : P** B 8 P*************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* INIMOM = INITIALIZE MONITOR P* P* P*
0x1c795c…1c7af0 Dummy {f00=0x0090, f01=0x0190, f02=»ED IN d & P* PROGRAM DEBUGGING PHASE 8 P*************************************************** 8 P* t 4 P* THIS MODULE IS USED TO INITIALIAZE THE MONITOR ~ 4 P* AND START THE DISPATCHER. IT IS STARTED AFTER P* PROGRAM LOAD. P*
0x1c7af0…1c7c84 Dummy {f00=0x0090, f01=0x0190, f02=»* TTB:SA PROGRAM COUNTER & P* TTB:PP PENDING PROGRAM POINTER " P* L P* V * P* THE FOLLOWING DWT FIELDS ARE RESET:- ` P* $ P* DWTST STATUS IS SET TO /8000 0 P* DWTTQ TERMINAL ON QUEUE FOR THIS DEVICE P* DWTECB DWT-ADDRE
0x1c7c84…1c7e18 Dummy {f00=0x0090, f01=0x0190, f02=» 4 P* THE STACKBASE IS LOADED INTO REGISTER A15 AND 0 P* THE STACK IS INITIATED TO PERMIT START OF < 6 P* THE SYSTEM WITH THE FIRST USER PROGRAM IN TCTAB p P* P* TIMER QUEUE IS RESET. 4 P* MOREOVER ADDRESSES TO TIMER POINTERS DECLARED
0x1c7e18…1c7fac Dummy {f00=0x0090, f01=0x0190, f02=»CTION ARE SET FREE. t P* P* BUFFER QUEUE IS RESET. & P* F P* ATTACH CHAIN IS RESET P P* p P EJECT z P* P* ENTRY POINTS P* $ P ENTRY INIMON MODULE ENTRY POINT P* P* EXTERNAL REFERENCES P*
0x1c7fac…1c8140 Dummy {f00=0x0090, f01=0x018e, f02=»REA FOR TERMINAL | * P EXTRN TTB:PP PENDING PROGRAM POINTER P EXTRN TTB:ST STATUS F * P EXTRN TTB:ID TERMINAL IDENTIFICATION b " P EXTRN TTB:TD TERMINAL DEVICES P EXTRN DWTST STATUS $ P EXTRN DWTADR ACTIVATION ADDRESS P EXTRN DWTECB
0x1c8140…1c82d4 (1, 423) Dummy {f00=0x0090, f01=0x0190, f02=» l & P EXTRN GBQUE START OF BUFFER QUEUE P EXTRN STB STACK BASE 2 " P EXTRN DISQUE JOB QUEUE ANCHOR P $ P EXTRN TIMQUE TIMER QUEUE ANCHOR v ( P EXTRN PRUN TTAB FOR RUNNING PROGRAM P EXTRN SRUN RUNNING SEGMENT & P EXTRN LRUQUE POINTER TO L
0x1c82d4…1c8468 Dummy {f00=0x0090, f01=0x0190, f02=» P EXTRN CVTMSZ MEMORY SIZE * P EXTRN CVTSBA BEGINNING OF BUFFER POOL & $ P EXTRN CVTEBA END OF BUFFER POOL T $ P EXTRN CVTSTB STACK BASE IN CVT | , P EXTRN CVTAPS APPLICATION START ADDRESS & P EXTRN INIFLG INITIALIZATION FLAG P EXTRN LOO
0x1c8468…1c85fc Dummy {f00=0x0090, f01=0x0190, f02=»NS p " P EXTRN PARLEN PARTITION LENGTH & P EXTRN FREPAR FREE PARTITION LINK 0 , P EXTRN CVTLSB START ADDRESS OF LSB-TABLE Z P EXTRN ATT:CH ATTACH CHAIN 6 P EXTRN ITADI ACTIVATION ADDRESS INTERTASK REQUEST 6 P EXTRN ITADO ACTIVATION ADDRESS IN
0x1c85fc…1c8790 Dummy {f00=0x0090, f01=0x0190, f02=»INIMON EQU * P INH INHIBIT INTERRUPTS P LDK A7,0 6 P LD* A1,TCTAB TCTAB LENGTH H P AD A1,TCTAB + BASE ADDRESS j P PINI100 SUK A1,2 P CW A1,TCTAB , P RF(E) INI200 ALL TERMINALS INITIALIZED P P LDR* A5,A1 TT
0x1c8790…1c8924 Dummy {f00=0x0090, f01=0x018e, f02=» l ( P CM TTB:SP,A5 RESET SEGMENT POINTER . P CM TTB:SS,A5 RESET SEGMENT START ADDRESS 4 $ P LDKL A14,INI100 RETURN ADDRESS f P LDKL A2,TTB:TD . P ADR A2,A5 TTAB CONFIGURATION PART ADDRESS & P ABL RSTDEV RESET TERMINAL DEVICES P EJECT
0x1c8924…1c8ab8 Dummy {f00=0x0090, f01=0x0190, f02=» j & P LD A2,CDTAB DEVICE TABLE ADDRESS P ABL RSTDEV 2 P EJECT F P* T P* ^ * P* RESET DEVICES FOR A TERMINAL/COMMON h P* P* ENTRY PARAMETERS: P* P* A2 = TABLE ADDRESS P* A14= RETURN ADDRESS P* $
0x1c8ab8…1c8c4c Dummy {f00=0x0090, f01=0x0190, f02=» LDKL A8,/80 PRST100 EQU * P SUK A3,4 ( " P ABR(N) A14 ALL DEVICES RESET : $ P ADK A4,4 ADJUST ADDRESS TO DWT ` P LDR* A6,A4 GET DWT ADDRESS $ P RB(Z) RST100 DWT NOT IN SYSTEM P LDKL A9,ITADI $ P CW A9,DWTADR,A6 INTERTASK DWT
0x1c8c4c…1c8de0 Dummy {f00=0x0090, f01=0x0190, f02=»6 RESET WORD 0 PRST130 EQU * $ P SC A8,DWTST,A6 RESET DWT STATUS * P CM DWTECB,A6 RESET ECB R & P CM DWTTQ,A6 RESET TERMINAL QUEUE r P RB RST100 NEXT DEVICE P EJECT P* P* P* RESET BLOCK POOL P* P*
0x1c8de0…1c8f74 (1, 424) Dummy {f00=0x0091, f01=0x0190, f02=»8 NO MORE * P LD* A3,2,A4 GET TIMER POINTER ADDRESS P RB(Z) INI214 @ P CMR A3 RESET TIMER POINTER V P RB INI214 z PINI218 EQU * P CM TIMQUE RESET TIMER QUEUE & P LD A1,BLOCKL LENGTH OF BLOCK POOL $ P LD A2,BLOCKS BLOCK POOL A
0x1c8f74…1c9108 Dummy {f00=0x0091, f01=0x0190, f02=»DR A3,A2 P ADK A2,6 2 P STR A2,A3 STORE ADDRESS TO NEXT FREE POSITION " P RB INI220 X $ PINI230 CMR A3 END OF FREE BLOCKS j P* P* RESET BUFFER QUEUE P* P CM GBQUE P EJECT P* P* RESET ATTACH CHAIN
0x1c9108…1c929c Dummy {f00=0x0091, f01=0x0190, f02=»LRU-QUEUE. INDICATE SEGMENTS UNLOADED P* . P CM LRUQUE CLEAR LRU-LINK 8 & P LD A4,CVTLSB GET ADDRESS TO LSBT Z " P LDR* A3,A4 GET LENGTH OF LSBT P ADR A3,A4 UPPER LIMIT , PINILRU ADK A4,12 POINTER OF SEGMENT END P CWR A4,A3 END O
0x1c929c…1c9430 Dummy {f00=0x0091, f01=0x0190, f02=»T x P CMR A4 CLEAR SUCCEDENT P RB INILRU * P* < P* LINK FREE PARTITIONS F P* f PINIPAR EQU * p , P LDKL A4,NUMPAR GET NUMBER OF PARTITIONS P LD A3,CVTSBA , P ST A3,FREPAR SET FREE PARTITION POINTER $ PINI240 SUK A4,
0x1c9430…1c95c4 Dummy {f00=0x0091, f01=0x018e, f02=»40 PINI245 CMR A3 P EJECT P* . P* 8 P* INITIALIZE STACK B P* ^ ( PINI250 LD A15,CVTSTB LOAD STACK BASE h P LDKL A1,LOOP P STR A1,A15 P LDKL A1,/FC00 P STR A1,A15 P SUKL A15,28 P LDK A1,0
0x1c95c4…1c9758 Dummy {f00=0x0091, f01=0x0190, f02=» P* P P LD A1,TCTAB TCTAB ADDRESS P LDR* A4,A1 TCTAB LENGTH 8 PINIM50 ADK A1,2 X P SUK A4,2 p P RF(NZ) INIM60 P HLT NO USER TASK FOUND P " PINIM60 LDR* A5,A1 TTAB ADDRESS ( P LD A2,TTB:ID,A5 TASK IDENTIFICATI
0x1c9758…1c98ec Dummy {f00=0x0091, f01=0x018e, f02=» $ P LD A7,TTB:ST,A5 GET USER LEVEL P SRC A7,6 , P CM DISQUE NO JOBS ON QUEUE > P EJECT b P* p P* z P* START SYSTEM P* P* PINI510 EQU * P CM INIFLG P IM INIFLG P LDKL A13,WAITIS $ P STR A13,A
0x1c98ec…1c9a80 Dummy {f00=0x0091, f01=0x4044, f02=» P LKM P DATA 6 P ABI CVTAPS P END 4@ @SQUE NO JOBS ON QUEUE > P EJECT b P* p P* z P* START SYSTEM P* P* PINI510 EQU * P CM INIFLG P IM INIFLG P LDKL A13,WAITIS $ P STR A13,A
0x1c9a80…1c9c14 (1, 425) Dummy {f00=0x0091, f01=0x2008, f02=» P* START SYSTEM P* P* * PINI510 EQU * 4 P IM INIFLG H P LD A13,CVTAPS Z $ P STR A13,A15 USER START ADDRESS p P STR A7,A15 AND LEVEL " P ABL PFINIT INITIALIZE DEVICES P END @ T TTAB FOR RUNNING PROGRAM
0x1c9c14…1c9da8 Dummy {f00=0x0091, f01=0x018e, f02=»ESS OF PROGRAM TO BE DISPATCHED ~ P* ( PDIS100 EQU * 2 0 P LDR* A1,A5 REMOVE JOB FROM DISPATCHER QUEUE F P ST A1,DISQUE z * P LD A1,TTB:SA,A5 LOAD DISPATCH ADDRESS " P LD A2,TTB:ST+1,A5 LOAD LEVEL P SLL A2,10 P CWK A2,/C000 MONI
0x1c9da8…1c9f3c Dummy {f00=0x0091, f01=0x0190, f02=» . P ADK A3,14 SET ADDRESS TO A1 IN SAVE AREA P LDK A1,14 SET COUNTER : , PDIS110 LDR* A2,A3 SET UP A1-A14 ON STACK X P STR A2,A15 P ADK A3,2 P SUK A1,1 P RB(NZ) DIS110 : PDIS120 ST A5,PRUN SET TABB-ADDRES FOR DISPATCHED P
0x1c9f3c…1ca0d0 Dummy {f00=0x0091, f01=0x0190, f02=»RYPOINTS RETU14-RETUR1 :RELOAD REGISTERS FROM STACK P* AND RETURN VIA A15 < P* Z PRETU14 LDR* A14,A15 d PRETU13 LDR* A13,A15 PRETU12 LDR* A12,A15 PRETU11 LDR* A11,A15 PRETU10 LDR* A10,A15 PRETUR9 LDR* A9,A15
0x1ca0d0…1ca264 Dummy {f00=0x0091, f01=0x0190, f02=»R3 LDR* A3,A15 PRETUR2 LDR* A2,A15 P RF RETUR1 0 PRTNA15 STR A1,A15 B PRETUR1 LDK A1,/40 BIT 9 . P ORS A1,4,A15 SET PSW IN A15 STACK TO ENB | P LDR* A1,A15 P RTN A15 P EJECT P* P* P* MONITOR JOB DISP
0x1ca264…1ca3f8 Dummy {f00=0x0091, f01=0x0190, f02=»CK z ( P STR A2,A15 STORE LEVEL 48 ON STACK & P SUKL A15,16 ADJUST STACK POINTER 6 : P STR A1,A15 SET MONITOR JOB DISPATCH ADDRESS ON STACK ` P STR A2,A15 SET LEVEL , P LD A1,TTB:SA+2,A5 LOAD PARAMETER IN A1 P STR A1,A15 AND SET ON STACK
0x1ca3f8…1ca58c Dummy {f00=0x0091, f01=0x0190, f02=»S P* 6 P* THIS PART IS DISPATCHED AFTER EACH LKM-REQUEST P* NO REGISTERS ON STACK N P* p P* z PLKMDIS EQU * P INH P LD A5,DISQUE " P RF(Z) DIS010 NO QUEUE,RETURN & P LD A1,32,A15 LOAD PSW FROM STACK
0x1ca58c…1ca720 Dummy {f00=0x0091, f01=0x4066, f02=»DR* A5,A15 , P RB DIS120 RETURN TO INTERRUPTED PROGRAM P* B P* L P END V@ bK N P* p P* z PLKMDIS EQU * P INH P LD A5,DISQUE " P RF(Z) DIS010 NO QUEUE,RETURN & P LD A1,32,A15 LOAD PSW FROM STACK
0x1ca720…1ca8b4 (1, 426) Opaque[0x194]
0x1ca8b4…1caa48 # DirEnt {nam=»INPREO«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1230, f03=0x2020}
0x1ca8b4…1caa48 IdxSect {
0x1ca8b4…1caa48 f00 = 0x0091 // 0x1ca8b4 @0x0
0x1ca8b4…1caa48 f01 = 0x0006 // 0x1ca8b6 @0x2
0x1ca8b4…1caa48 gno = [ // 0x1ca8b8 @0x4
0x1ca8b4…1caa48 [0x00]: C0x0091.0x2.0
0x1ca8b4…1caa48 [0x01]: C0x0091.0x3.0
0x1ca8b4…1caa48 [0x02]: C0x0092.0x0.0
0x1ca8b4…1caa48 ]
0x1ca8b4…1caa48 }
0x1caa48…1cabdc Dummy {f00=0x0091, f01=0x0190, f02=» 2 P IDENT INPREO REL 8.2 78-09-15 870105040820 P : P* B 6 P************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* ( P* INPREO = SUBROUTINE INTERPRETER P* P* P*
0x1cabdc…1cad70 Dummy {f00=0x0091, f01=0x0190, f02=» INTERPRETER TO HANDLE SUBROUTINE x < P* CALLS USING THE A14 STACK. THE INTERPRETER IS CALLED * @ P* WITH INSTRUCTION CODES /C001 - /C0FF WHERE /1 - /FF IS A j . P* INDEX. INDEX VAULES ARE 1,2,3,4...... @ P* THE INDEX IS USED TO GET ABSOLUTE AD
0x1cad70…1caf04 Dummy {f00=0x0091, f01=0x018e, f02=»R TABLE. ('CVTINP') l P* H P* THE INTERPRETER MAY ALSO EXECUTE THE FOLLOWING TWO INSTRUCTIONS: & P* r . P* LD R1,DISPL,A13 CALLING CODE: CXYY | P* . P* ST R1,DISPL,A13 CALLING CODE: DXYY P* $ P* X = R1 = REGIST
0x1caf04…1cb098 Dummy {f00=0x0091, f01=0x0190, f02=» P* ENTRY * P********* P* ( P* 2 ( P ENTRY IHINPT TRAP INTERRUPT ADDRESS < P* h P* r P* | P************* P* EXTERNALS * P************* P* P* ( P EXTRN CVTINP FUNCTION TABLE ADDRESS " P
0x1cb098…1cb22c Dummy {f00=0x0091, f01=0x018e, f02=» P EXTRN LD150 LOADER JUMP P EXTRN LKMDIS $ P EXTRN RETUR3,RETUR8 : P EJECT V P* d P* n P* I H I N P T x P* P* INTERPRETER TRAP HANDLER P* PIHINPT EQU * P STR A1,A15 P STR A2,A15 P STR
0x1cb22c…1cb3c0 Dummy {f00=0x0091, f01=0x0190, f02=» t ( P ANKL A3,/F00 MASK OUT REGISTER CODE , P RF(Z) INT200 BRANCH IF SUBROUTINE CALL 4 P* d P* n & P* EXECUTE LOAD/STORE INSTRUCTION x P* & P ST A1,10,A15 SAVE RETURN ADDRESS $ P SC A2,DISPL+1 STORE DISPLACMENT , P SRL A3,1
0x1cb3c0…1cb554 (1, 427) Dummy {f00=0x0091, f01=0x018e, f02=»UCTION r 6 PINT100 ADKL A3,/8056 GET COMPLETE INSTRUCTION CODE 2 P ST A3,INSTR STORE INSTRUCTION TO BE EXECUTED H P LDR* A3,A15 RESTORE A3 ~ P LDR* A2,A15 RESTORE A1-A2 P LDR* A1,A15 ( PINSTR DATA 0 LOAD/STORE INSTRUCTION PDISPL DA
0x1cb554…1cb6e8 Dummy {f00=0x0091, f01=0x0190, f02=» $ P ST A1,6,A15 STORE IN RETURN PSW & P LDR* A1,A15 DUMMY TO ADJUST STACK , P LDR* A1,A15 RELOAD A1 V $ P RTN A15 RETURN TO USER PROGRAM t P EJECT P* P* P* EXECUTE SUBROUTINE CALL P* PINT200 EQU * P STR A4,
0x1cb6e8…1cb87c Dummy {f00=0x0091, f01=0x0190, f02=» d P ANK A2,/FF GET INDEX P CWK A2,/FF RETURN ? & P RF(E) INT400 YES B P LD A3,18,A15 PSW $ P ST A3,-6,A14 STORE ON A14 STACK v P LD A3,SRUN SEGMENT POINTER $ P ST A3,-2,A14 STORE SP ON STACK , P ST A1,-4,A14 STORE ABS ADDRES
0x1cb87c…1cba10 Dummy {f00=0x0091, f01=0x0190, f02=» 2 P AD A2,CVTINP ADD FUNCTION TABLE START ADDRESS & P LDR* A2,A2 GET SUBROUTINE POINTER : P LDR A3,A2 d P ANK A2,/FF v P SUK A2,1 P ADR A2,A2 P SRL A3,8 P RF(E) INT250 SEGMENT 0 P SLL A3,2 P LDR A1,A3 P SLL
0x1cba10…1cbba4 Dummy {f00=0x0091, f01=0x018e, f02=» P LD A1,2,A3 LOAD ADDRESS PINT230 EQU * $ P ADR A2,A1 8 P LDR* A2,A2 J PRETTUR EQU * ^ P ST A2,20,A15 r & P ST A2,TTB:SA,A4 DISPATCH ADDRESS * P ST A3,TTB:SP,A4 SAVE SEGMENT PIOINTER P ST A3,SRUN SEGMENT RUNNING ( P ST
0x1cbba4…1cbd38 Dummy {f00=0x0091, f01=0x0190, f02=» PINT250 LD A1,CVTAPA P RB INT230 $ PINT270 EQU * 6 P NGR A2,A2 J PINT300 CM SRUN P CM TTB:SP,A4 r P CM TTB:SS,A4 P ST A14,TTB:SA+28,A4 P ST A13,TTB:SA+26,A4 P ST A12,TTB:SA+24,A4 P ST A11,TTB:SA+22,A4
0x1cbd38…1cbecc Dummy {f00=0x0091, f01=0x018e, f02=» PINT350 LDR* A5,A15 P STR A5,A1 P SUK A1,2 0 P SUK A6,2 B P RB(NE) INT350 T P SUKL A15,16 j P LDKL A7,LKMDIS ~ P ST A7,20,A15 P LDKL A7,/C000 P ST A7,18,A15 P LDR A1,A4 TTAB ADDRESS P ABL LD150 JUMP
0x1cbecc…1cc060 Dummy {f00=0x0091, f01=0x411a, f02=» p P ST A1,18,A15 " P LD A3,-2,A14 SEGMENT POINTER P RB(E) RETTUR D " P SUR* A2,A14 SUB LAST LOAD ADR Z P LDR* A1,A3 LOADED ? P RB(N) INT270 P LD A1,2,A3 LOAD ADDRESS P ADR A2,A1 P RB RETTUR P* P*
0x1cc060…1cc1f4 (1, 428) Dummy {f00=0x0092, f01=0x2008, f02=» RT ADDRESS t 0 P LDR* A2,A2 GET SUBROUTINE START ADDRESS AND ( P ST A2,10,A15 STORE IT ON A15 STACK N : P ABL RETUR3 RESTORE A1-A3 AND GO TO CALLED SUBROUTINE z P* P* P END @ ( P ST A3,-2,A14 STORE PSW ON A14 STACK
0x1cc1f4…1cc388 Dummy {f00=0x0092, f01=0x0004, f02=»
0x1cc388…1cc51c Dummy {f00=0x0092, f01=0x0190, f02=» 2 P IDENT INPRET REL 8.1 78-04-21 870105040810 P : P* B 6 P************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* ( P* INPRET = SUBROUTINE INTERPRETER P* P* P*
0x1cc51c…1cc6b0 Dummy {f00=0x0092, f01=0x0190, f02=» INTERPRETER TO HANDLE SUBROUTINE x < P* CALLS USING THE A14 STACK. THE INTERPRETER IS CALLED * @ P* WITH INSTRUCTION CODES /C001 - /C0FF WHERE /1 - /FF IS A j . P* INDEX. INDEX VAULES ARE 1,2,3,4...... @ P* THE INDEX IS USED TO GET ABSOLUTE AD
0x1cc6b0…1cc844 Dummy {f00=0x0092, f01=0x018e, f02=»R TABLE. ('CVTINP') l P* H P* THE INTERPRETER MAY ALSO EXECUTE THE FOLLOWING TWO INSTRUCTIONS: & P* r . P* LD R1,DISPL,A13 CALLING CODE: CXYY | P* . P* ST R1,DISPL,A13 CALLING CODE: DXYY P* $ P* X = R1 = REGIST
0x1cc844…1cc9d8 Dummy {f00=0x0092, f01=0x0190, f02=» P* ENTRY * P********* P* ( P* 2 ( P ENTRY IHINPT TRAP INTERRUPT ADDRESS < P* h P* r P* | P************* P* EXTERNALS * P************* P* P* ( P EXTRN CVTINP FUNCTION TABLE ADDRESS P
0x1cc9d8…1ccb6c Dummy {f00=0x0092, f01=0x0190, f02=»IHINPT EQU * $ P STR A1,A15 SAVE A1-A3 ON STACK P STR A2,A15 < P STR A3,A15 SAVE A3 ON STACK P $ P LD A1,10,A15 LOAD TRAP ADDRESS t P LDR* A2,A1 LOAD TRAP CODE P ADK A1,2 & P ST A1,10,A15 SAVE RETURN ADDRESS P LDR A3,A2 SAV
0x1ccb6c…1ccd00 Dummy {f00=0x0092, f01=0x0190, f02=»EXECUTE LOAD/STORE INSTRUCTION P* & $ P SC A2,DISPL+1 STORE DISPLACMENT 0 , P SRL A3,1 SHIFT TO FIT INSTRUCTION CODE X P SLL A2,3 . P RF(NN) INT100 BRANCH IF LOAD INSTRUCTION ( P ADK A3,1 INDICATE STORE INSTRUCTION 6 PINT100 ADKL A3,/
0x1ccd00…1cce94 (1, 429) Opaque[0x194]
0x1cce94…1cd028 # DirEnt {nam=»DMTASS«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1248, f03=0x2020}
0x1cce94…1cd028 IdxSect {
0x1cce94…1cd028 f00 = 0x0092 // 0x1cce94 @0x0
0x1cce94…1cd028 f01 = 0x0010 // 0x1cce96 @0x2
0x1cce94…1cd028 gno = [ // 0x1cce98 @0x4
0x1cce94…1cd028 [0x00]: C0x0092.0x1.0
0x1cce94…1cd028 [0x01]: C0x0092.0x2.0
0x1cce94…1cd028 [0x02]: C0x0092.0x3.0
0x1cce94…1cd028 [0x03]: C0x0093.0x0.0
0x1cce94…1cd028 [0x04]: C0x0093.0x1.0
0x1cce94…1cd028 [0x05]: C0x0093.0x2.0
0x1cce94…1cd028 [0x06]: C0x0093.0x3.0
0x1cce94…1cd028 [0x07]: C0x0094.0x0.0
0x1cce94…1cd028 ]
0x1cce94…1cd028 }
0x1cd028…1cd1bc Dummy {f00=0x0092, f01=0x0190, f02=» 2 P IDENT DMTASS REL 8.2 78-09-15 870105040820 P : P MX REL. L. 176,565 B P REL 8.1 78-04-21 ` P* | 8 P**************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 4 P* DMTASS
0x1cd1bc…1cd350 Dummy {f00=0x0092, f01=0x0190, f02=»********************** r P* * P* THIS MODULE IS ACTIVATED FROM TASS ( P* V B P* INPUT A2 = TID TASK IDENT OF DMTASK AT PRESENT NOT USED ` ( P* TASBLK PARAMETER BLOCK P* J P* IN TASVOL IN TASBLK ALL VOLUMES WHERE TH
0x1cd350…1cd4e4 Dummy {f00=0x0092, f01=0x0190, f02=»E FILE TO BE ASSIGNED. FOR EACH EXTENT ITS z > P* FILE-SECTION-NO, FILE-EXTENT-NO,FILE-EXTENT-LENGTH AND 2 . P* FILE-EXTENT-BASE ARE SAVED IN TASBLK. t L P* FOR THE FIRST EXTENT (I.E. FILE-SECTION-NO =0 AND FILE-EXTENT-NO =0) J P* THE LAST-RECOR
0x1cd4e4…1cd678 Dummy {f00=0x0092, f01=0x018e, f02=»FDB:S CAN BE SEARCHED ^ L P* TO CHECK IF THE FILE TO BE ASSIGNED HAS PREVIOUSLY BEEN ASSIGNED TO L P* ANOTHER FILE CODE. IF SO THE FDB ADDRESS IS PUT INTO THE CD:TAB AND n L P* THE ASSIGNMENT IS COMPLETED. IF NO FDB DESCRIBING THE FILE IS FOUND
0x1cd678…1cd80c Dummy {f00=0x0092, f01=0x0190, f02=» 2 P* FOR INDEX ASIGN THE PRODGRAM IS RUN TWICE. 4 P* DURING THE FIRST LOOP A MASTERINDEX IS READ. : . P* FC 13 IN TTAB FOR DMTASK IS THEN USED r P EJECT P* P*************** P* ENTRIES * P*************** P*
0x1cd80c…1cd9a0 Dummy {f00=0x0092, f01=0x0190, f02=»*************** P* EXTERNALS * P***************** 2 P* L P EXTRN QTJOB V P EXTRN FNDTID,TTB:TD j P* P EXTRN DWTST P EXTRN DWTADR P* P EXTRN ECBFC P EXTRN ECBBA P EXTRN ECBRL P EXTRN E
0x1cd9a0…1cdb34 (1, 430) Dummy {f00=0x0092, f01=0x018e, f02=»UFSTA P EXTRN BUFSNR P EXTRN BUFDMI $ P* : P EXTRN QFDBFL D P EXTRN FDBSTA Z P EXTRN FDBEND p P EXTRN FDBECB P EXTRN FDBEXT P EXTRN EXTDMI P EXTRN EXTLEN P EXTRN EXTBAS P EXTRN FDBRLE
0x1cdb34…1cdcc8 Dummy {f00=0x0092, f01=0x0190, f02=» . P EXTRN FDBSNR,FDBMRN,GTLGRN,EXTELE,FDBCEX P EXTRN FDBDBR,FDBMRO 6 $ P EXTRN MXIND,CRNQUE,DMTWM,MPYMOD R P EXTRN TASASB z P EXTRN TASCVO P EXTRN TASVOL P EXTRN TASCXO P EXTRN TASSEX P EXTRN TASXLB P EXTRN TAS
0x1cdcc8…1cde5c Dummy {f00=0x0092, f01=0x0190, f02=» EXTRN TASSPW,TASFDD,TASTBE P EXTRN TASCAQ $ P EXTRN VOLCHE : P EJECT P PX:A EQU 0 ^ , PRECBFZ EQU X:A INDEX RECORD BUFFER SIZE p PX:B EQU 0 2 PINDXAC EQU X:B INDEX ACCESS FUNCTIONS WHEN = 1 P EJECT P* P********
0x1cde5c…1cdff0 Dummy {f00=0x0092, f01=0x0190, f02=»12 PVLVRL EQU 14 PVLVER EQU 34 P* 2 PVTFSNO EQU 8 < PVTFXNO EQU 10 P PVTFXLE EQU 14 f PVTFXBA EQU 18 | PVTLRN EQU 21 PVTRLE EQU 24 PVTBLF EQU 26 PVTFIOR EQU 27 PVTNIF EQU 37 PVTKA EQU 38
0x1cdff0…1ce184 Dummy {f00=0x0092, f01=0x0190, f02=»0 4 WORDS P DATA 0,0 STACK PDMTA14 EQU *-2 * P EJECT @ P* N P************** X P* DMTIOC * n P************** P* : P* ENTRY DMTIOC CHECK RETURN CODES AFTER DISC I/O > P* RETURN TO DMTASX
0x1ce184…1ce318 Dummy {f00=0x0092, f01=0x0190, f02=»A1,/FEFF BIT 7 ONLY RETRIES P RF(Z) DMTIOX $ P ADKL A14,4 : P ANK A1,/80 N $ P RF(NZ) DMT060 NEW VOLUME LOADED b P SUKL A3,BUFSTA , P CM BUFDMI,A3 CLEAR VOL IDENT IN BUFFER P LDK A7,1 P ABL DMTASX DISC I/O ERROR PDM
0x1ce318…1ce4ac Dummy {f00=0x0092, f01=0x0190, f02=»TASS EQU * 8 P LDKL A14,DMTA14 INITIALIZE DMTASK A14 STACK POINTER P ST A2,TASTID TASK IDENT N P CM TASMXA MASTER INDEX ADDR n P ANK A2,/2 P RF(Z) DMT010 NOT FLEXTASC P* & P* PERFORM VOLUME CHECK WITH LOCK P* P LD
0x1ce4ac…1ce640 Dummy {f00=0x0092, f01=0x0190, f02=» P LDR A1,A1 P RF(Z) DMT010 OK P LDK A7,4 VOL UNKNOWN . P ABL DMTASX L PDMT010 EQU * ` P* t P LDKL A8,TASECB ~ P* 6 P LD A1,TASCVO OFFSET INTO TASVOL FOR FIRST VOLUME PDMT050 EQU * , P CF A14,CLRBUF RELEASE ALL
0x1ce640…1ce7d4 (1, 431) Dummy {f00=0x0092, f01=0x0190, f02=»T A2,ECBRL,A8 SECTOR LENGTH P LDK A2,0 $ 0 P ST A2,ECBCW,A8 SECTOR #0 VL (VOLUME LABEL) 6 P* j P* t 2 P CF A14,DMTGBU GET A DM BUFFER ADDRESS IN A3 ~ P DATA /5700 NOP. READ ALWAYS P ADKL A3,BUFSTA & P ST A3,ECBBA,A8 DATA BUF
0x1ce7d4…1ce968 Dummy {f00=0x0092, f01=0x0190, f02=» * P DATA DMTAR3 RESTART ADDRESS AFTER I/O P LKM 6 P DATA 3 EXIT B P EJECT V 4 PDMTAR3 EQU * RESTART AFTER VOLUME LABEL IS READ d . P LDKL A14,DMTA14 SET UP A14 STACK POINTER P CF A14,DMTIOC I/O CHECK P LD A2,VLVER,A3 VERSION
0x1ce968…1ceafc Dummy {f00=0x0092, f01=0x0190, f02=»DMT100 EQU * P CM TASVRN P LD A6,VLVLE,A3 VTOC LENGTH & P ST A6,TASVLE J P LD A2,VLVBA,A3 VTOC BASE ` . P ST A2,ECBCW,A8 1:ST VTOC SECTOR NO = FSAT & P LD A9,VLVRL,A3 VTOC RECORD LENGTH P ST A9,TASVRL P EJECT P*
0x1ceafc…1cec90 Dummy {f00=0x0092, f01=0x0190, f02=» $ P RF(P) DMT115 MORE VTOC SECTORS P EJECT , P* : " P* ALL VTOC SECTORS ARE READ D P* j P LD A1,TASCVO t P SUK A1,2 & P ABL(N) DMT300 ALL VOLUMES CHECKED P ST A1,TASCVO UPDATE TASCVO $ P LDK A7,7 TOO MANY FILE SECTIO
0x1cec90…1cee24 Dummy {f00=0x0092, f01=0x0190, f02=»EASE BUFFER ~ P LC A7,TASVOL,A1 P CC A7,TASVOL+2,A1 , P RB(E) DMT050 SAME DM TASK F P* h P* ACTIVATE NEXT DM TASK r P* P ADKL A7,'D0' P LKM P DATA -4 P DATA DMTASS P LKM P DATA 3 EXIT P EJE
0x1cee24…1cefb8 Dummy {f00=0x0092, f01=0x018e, f02=» P CF A14,DMTRBU P LD A2,ECBCW,A8 P ADK A2,1 NEXT VTOC SECTOR 2 P LD A1,TASCVO T P LD A1,TASVOL,A1 j P CF A14,DMTGBU GET BUFFER P DATA /5700 NOP. READ ALWAYS P ADKL A3,BUFSTA P ST A3,ECBBA,A8 P ST A2,ECBCW,A8
0x1cefb8…1cf14c Dummy {f00=0x0092, f01=0x0190, f02=» PDMTAR4 EQU * P LDKL A14,DMTA14 P CF A14,DMTIOC 0 P LD A9,TASVRL F P LD A11,TASASB , P ADKL A11,2 POINTER TO FILENAME IN ASBLK r P LDK A4,2 P CW A4,TASFIL $ P RF(NE) DMT135 NOT MASTER INDEX " P ADKL A11,14 MX FILE N
0x1cf14c…1cf2e0 Dummy {f00=0x0092, f01=0x0190, f02=»A3 " P ADR A4,A9 ADDRESS STATUS BYTE P LCR A2,A4 0 P ANK A2,/FF B P ABL(Z) DMT250 NOT USED V ( P SUR A4,A9 BACK TO START OF VTOC REC v P LDR A7,A11 $ P LDK A2,4 FILE NAME MAX 4 WORDS PDMT150 EQU * P LDR* A10,A4 P C
0x1cf2e0…1cf474 (1, 432) Dummy {f00=0x0093, f01=0x018e, f02=» ADK A7,2 P RB DMT150 CHECK NEXT WORD P* 4 ( P* ONLY STANDARD FILES ARE HANDLED > P* j PDMT160 EQU * t P LC A2,VTFIOR,A3 P CCK A2,'SS' STANDARD FILE ? P RF(E) DMT165 YES P CCK A2,'LL' LIBRARY FILE ? P ABL(N
0x1cf474…1cf608 Dummy {f00=0x0093, f01=0x0190, f02=» PDMT167 EQU * P* . P* GET INFO FROM VTOC AND SAVE IN TASBLK " P* T $ P LDR A4,A3 START OF VTOC RECORD ^ 8 P LD A1,TASCXO CURRENT OFFSET INTO TASSEX AND TASXLB P SUK A1,4 P ST A1,TASCXO P RF(NN) DMT170 <= 4 EXTENTS
0x1cf608…1cf79c Dummy {f00=0x0093, f01=0x0190, f02=»TFXNO+1,A4 EXT NO INTO RIGHT HALF OF A2 P ST A2,TASSEX,A1 0 P LD A6,TASCVO H , P ST A6,TASSEX+2,A1 REMEMBER WHICH VOLUME ^ " P LD A2,VTFXLE,A4 EXTENT-LENGTH P ST A2,TASXLB,A1 P LD A2,VTFXBA,A4 EXTENT BASE P ST A2,TASXLB+2,A1
0x1cf79c…1cf930 Dummy {f00=0x0093, f01=0x0190, f02=»BING THE FILE ALREADY EXISTS. v P* & P LD A12,TASFDB 0 * P RF(Z) DMT190 FIRST TIME EXT #0 FOUND F P LDK A7,7 t $ P ABL DMTASX EXT #0 ALREADY FOUND PDMT190 EQU * P LDKL A12,FDBSTA PDMT200 EQU * P LDR* A5,A12 P ANK A
0x1cf930…1cfac4 Dummy {f00=0x0093, f01=0x018e, f02=»DBVTO,A12 P CW A2,TASVRN $ P RF(NE) DMT210 NOT SAME VTOC REC ( P LD A2,FDBMIA,A12 P " P RF(NZ) DMT205 INDEX ASS BEFOR j P LD A2,TASFIL . P ABL(E) DMT400 SAME VTOC RECORD FDB FOUND PDMT205 EQU * P LDK A7,5 FILE CODE USED
0x1cfac4…1cfc58 Dummy {f00=0x0093, f01=0x0190, f02=» j P* 0 P* NO MATCHING FDB EXIST FIND A FREE FDB P* F P LDKL A12,FDBSTA P PDMT220 LDR* A5,A12 h P ANK A5,/01 P RF(Z) DMT230 FREE P LDR* A12,A12 GET NEXT FDB P ANKL A12,/FFFE & P RB(NE) DMT220 MORE FDB:S TO C
0x1cfc58…1cfdec Dummy {f00=0x0093, f01=0x018e, f02=» P ST A12,TASFDB P LDR A10,A12 P ADKL A10,QFDBFL . P LDK A2,0 F P LDR A1,A12 X PDMT233 ADK A1,2 l P CWR A1,A10 P RF(E) DMT237 END OF FDB P STR A2,A1 P RB DMT233 PDMT237 EQU * P LDKL A2,/8000 P*
0x1cfdec…1cff80 Dummy {f00=0x0093, f01=0x0190, f02=» P ADKL A1,FDBECB P ST A2,ECBRL,A1 P LDK A2,/01 4 P ORRS A2,A12 SET USE BIT H P LC A2,VTLRN,A4 h P SC A2,FDBLRN,A12 P LD A2,VTLRN+1,A4 P ST A2,FDBLRN+1,A12 P LD A2,VTRLE,A4 P ST A2,FDBRLE,A12 P LC A2
0x1cff80…1d0114 (1, 433) Dummy {f00=0x0093, f01=0x0190, f02=» P LD A2,TASVRN P ST A2,FDBVTO,A12 P EJECT 4 P* B P* CHECK NEXT VTOC RECORD L P* n PDMT250 EQU * x P* A3 = ADR 1ST REC P* A9 = VTOC REC LGTH P ADR A3,A9 P ADK A3,1 SKIP STATUS BYTE P LDR A2,A3
0x1d0114…1d02a8 Dummy {f00=0x0093, f01=0x0190, f02=»* < P* ALL VTOCS IN ALL VOLUMES ARE SEARCHED AT THIS POINT P* J PDMT300 EQU * T P LDK A3,16 h P SU A3,TASCXO z P RF(NZ) DMT310 P LDK A7,6 P RF DMTASX FILE NAME UNKNOWN PDMT310 EQU * P LD A12,TASFDB P R
0x1d02a8…1d043c Dummy {f00=0x0093, f01=0x0190, f02=»FDB IN ASCENDING ORDER p 8 P* ACCORDING TO INCREASING SECTOR NO AND EXTENT NO P* Z PDMT320 EQU * d P* x @ P* CHECK IF RECORD BUFFERS ARE LARGE ENOUGH FOR INDEX FILE P* P LD A6,TASFIL P RF(Z) DMT330 DATA FILE ASS $
0x1d043c…1d05d0 Dummy {f00=0x0093, f01=0x0190, f02=»NG) DMT330 OK P LDK A7,12 ! * P RF DMTASX RECORD BUFFER IS TOO SMALL ! ( PDMT330 EQU * ! V P LDR A6,A12 ! j P* FDB ADDR ! ~ P ADKL A6,FDBEXT ! P LDK A2,0 ! P LDR A5,A3 ! P SRL A5,2 NUMBER OF EXTENTS ! PDMT340 EQU * ! P L
0x1d05d0…1d0764 Dummy {f00=0x0093, f01=0x0190, f02=»DMT350 MORE EXTENTS TO CHECK ! P* " $ , P* THE EXTENT SEARCHED FOR IS NOT FOUND " . 2 P* CHECK IF RIGHT HALF OF A2 = 0 (EXT-NO = 0) " ^ P* " P LDR A1,A2 " P ANK A1,/FF " $ P RF(NZ) DMT370 TRY NEXT SECTION " P* " PDMT355 EQU * "
0x1d0764…1d08f8 Dummy {f00=0x0093, f01=0x018e, f02=»* " P LD A1,TASSEX+2,A4 # P LD A1,TASVOL,A1 # $ P ST A1,EXTDMI,A6 # < P LD A1,TASXLB,A4 # T P ST A1,EXTLEN,A6 # l P LD A1,TASXLB+2,A4 # P ST A1,EXTBAS,A6 # P ADK A6,6 # P SUK A5,1 # & P RF(NP) DMT500 ALL EXTENTS HANDLED # P* #
0x1d08f8…1d0a8c Dummy {f00=0x0093, f01=0x0190, f02=» # P SUK A1,3 $ " P RF(NE) DMT380 NOT EXT-NO = 3 $ PDMT370 EQU * $ @ P ECR A1,A2 $ T P ANK A1,/FF $ f P SUK A1,3 $ z P RB(E) DMT355 SECTION-NO = 3 $ " P ADK A1,4 INCREMENT SECTION-NO $ P ECR A2,A1 EXT-NO = 0 $ P RB DMT340 $ $ PDM
0x1d0a8c…1d0c20 Dummy {f00=0x0093, f01=0x0190, f02=»T400 EQU * $ P LDK A7,0 % PDMTASX EQU * % $ , P LD A2,TASTBE TTAB/CDTAB FILE CODE ADDR % 8 P LDR A7,A7 % h P RF(Z) DMT420 CORRECT RETURN % z P CM -1,A2 ZERO FILE CODE % P* % $ P* REMOVE FDB WITH MASTER INDEX % P* % $ P LD A4,TASMXA
0x1d0c20…1d0db4 (1, 434) Dummy {f00=0x0093, f01=0x0190, f02=» % PDMT405 EQU * & P SUK A2,4 NEXT OFFSET & P RF(NN) DMT407 OK & : * P RF DMT408 MASTER INDEX MUST BE FOUND & T PDMT407 CW A4,MXIND+2,A2 & P RB(NE) DMT405 NEXT ENTRY & P LDKL A4,/7FFF & & P ANS A4,MXIND+4,A2 SET ENTRY FREE & PDMT4
0x1d0db4…1d0f48 Dummy {f00=0x0093, f01=0x018e, f02=»FDB USE BIT & ~ P RF DMT430 ' PDMT420 EQU * ' & P ST A12,1,A2 FDB ADDR ' : PDMT430 EQU * ' X P LDR A8,A8 ' l P RF(Z) DMT440 NO BUFFER ' ~ P LD A3,ECBBA,A8 ' P SUKL A3,BUFSTA ' " P CF A14,DMTRBU RELEASE BUFFER ' PDMT440 EQU * ' , P
0x1d0f48…1d10dc Dummy {f00=0x0093, f01=0x0190, f02=» ' P LKM ( P DATA 3 ( P EJECT ( $ PDMT500 EQU * ( 2 P LD A6,TASFIL ( F P ABL(Z) DMT700 DATA FILE ( P IFF INDXAC=1 ( | P LDKL A7,-1 REQ ERR ( P RB DMTASX ( P XIF ( P IFT INDXAC=1 ( P SUK A6,1 ( P ABL(Z) DMT600 INDEX
0x1d10dc…1d1270 Dummy {f00=0x0093, f01=0x018e, f02=»* MASTER INDEX WITH SEQUENTIAL READ ON THIS FILE CODE ( P* ) @ P LD A7,TASTID DMTASK ID ) J P INH ) j " P CF A15,FNDTID TTAB ADDR TO A2 ) v P ENB ) P ST A2,TASSPW ) " P LDKL A3,/0100 INDEX DATA FILE ) P LD A1,TASASB ) P LC A3,1,A1 FI
0x1d1270…1d1404 Dummy {f00=0x0093, f01=0x0190, f02=» P SUKL A3,BUFSTA * " P CF A14,DMTRBU RELEASE BUFFER * P* * B 0 P* CALC NO OF WORDS NEEDED IN MASTRE INDEX * L P* * P LD A6,FDBRLE,A12 REC LGTH * " P LD A7,FDBLRN+1,A12 NO OF RECS * , P CF A14,MPYMOD A1,A2=NO OF BYTES NEEDED * P SRC A
0x1d1404…1d1598 Dummy {f00=0x0093, f01=0x0190, f02=»NH * P LD A4,MXIND LENGTH MXIND + P SUK A4,4 MAX A5 VALUE + , P LDKL A5,-2 OFFSET + J PDMT540 EQU * + d P ADK A5,4 GET ENTRY + x P CWR A5,A4 + P RF(G) DMT570 NO ENTRY FOUND + P LD A3,MXIND,A5 + P RB(Z) DMT540 ZERO ENTRY + P LD A6
0x1d1598…1d172c Dummy {f00=0x0093, f01=0x0190, f02=» P* SUFFICIENT SPACE FOUND , P* , & P LDKL A1,/8000 USED BIT , 0 & P ORS A1,MXIND+2,A5 MARK ENTRY USED , P $ P ST A3,TASMXA MASTER INDEX ADDR , z P ST A3,FDBMIA,A12 , P LD A7,FDBLRN+1,A12 , P STR A7,A3 NO OF ENTRIES , P LD A1,FDBRLE,A1
0x1d172c…1d18c0 Dummy {f00=0x0093, f01=0x0190, f02=» , x . P LDR A1,A5 MXIND ENTRY PAR TO REACTIVATION - P CWR A1,A4 MXIND ENTRY - : P RF(NL) DMT590 LAST ENTRY - X P LD A3,MXIND+6,A1 - z " P RF(N) DMT590 NEXT ENTRY USED - P* - & P* MOVE SPARE WORDS TO NEXT ENTRY - P* - P LD A2,MXIND+2,A
0x1d18c0…1d1a54 (1, 435) Dummy {f00=0x0093, f01=0x0190, f02=»6,A1 MAKE NEXT ENTRY LARGER - $ P LD A7,MXIND,A1 PREVIOUS POINTER . $ P SLL A2,1 NO OF BYTES . L P ADR A7,A2 . j P ST A7,MXIND+4,A1 . | P EJECT . PDMT590 EQU * . P ENB . P* . 2 P* NOW READ MASTER INDEX WITH SEQUENTIAL READ . P*
0x1d1a54…1d1be8 Dummy {f00=0x0093, f01=0x0190, f02=» . X P* / PDMT550 EQU * / & P LDK A7,/42 SEQ READ,NOWAIT,NO EA / & P LKM / P P DATA -1 / P DATA DMTAR5 / l P LKM / P DATA 3 EXIT / PDMTAR5 EQU * / " P LDKL A14,DMTA14 RESTORE STACK / P LDKL A8,TASECB ECB ADDR / P LD A2,ECBRC,A
0x1d1be8…1d1d7c Dummy {f00=0x0093, f01=0x0190, f02=» P LD A4,TASFDB FDB ADDR 0 P LD A5,FDBCRL,A4 CRN BUF ADR 0 " P RF(Z) DMT553 NO CRN 0 F P CM FDBCRL,A4 0 b P INH 0 x P LD A6,CRNQUE 0 P STR A6,A5 0 P ST A5,CRNQUE 0 P ENB 0 PDMT553 EQU * 0 P ANKL A2,/1000 BIT 3 = EOF 0 0 P RF(
0x1d1d7c…1d1f10 Dummy {f00=0x0093, f01=0x018e, f02=»60 EQU * 0 P* 1 P* RECORD READ,READ NEXRT 1 P* 1 < P LD A2,ECBRL,A8 1 F P ADS A2,ECBBA,A8 REC LENGTH 1 ^ P RB DMT550 READ NEXT RECORD 1 PDMT570 EQU * 1 P ENB 1 P LDK A7,3 NOT SUFF SPACE 1 P RB DMT555 1 P EJECT 1 PDM
0x1d1f10…1d20a4 Dummy {f00=0x0093, f01=0x0190, f02=» 1 v " P LD A3,TASSPW TTAB ADR DMTASK 2 P CM TTB:TD+2,A3 DELETE ENTRY 2 . P CM TTB:TD+4,A3 2 R P LD A3,TASFDB FDB ADDR 2 j P LDKL A2,/FFFE 2 " P ANRS A2,A3 CLEAR FDB USE BIT 2 ( P CM TASFDB EXT 0 NOT FOUND FOR INDEX 2 P LDK A1,16 2 & P ST A1
0x1d20a4…1d2238 Dummy {f00=0x0093, f01=0x0190, f02=» P EJECT 3 PDMT600 EQU * 3 P* 3 & P* INDEX FILE ASSIGN 3 0 P* 3 N P LDK A7,10 RET CODE 3 X & P LD A10,TASFDD FDB ADDR DATA FILEP 3 t P RF(Z) DMT650 NO DATA FILE 3 P* 3 * P* STORE INDEX ADDR IN FDB DATA FILE 3 P* 3 P INH
0x1d2238…1d23cc Dummy {f00=0x0093, f01=0x018e, f02=»20 EQU * 3 P SUK A3,2 4 $ P RF(N) DMT640 MORE THAN 4 INDEX 4 " P LDR A6,A10 4 J P ADR A6,A3 4 ^ P LD A2,FDBAI1,A6 4 p P RB(NZ) DMT620 USED 4 * P ST A12,FDBAI1,A6 STORE FDB ADDR INDEX 4 P* 4 < P* MOVE FDB ADDRESSES FROM DATA FILE TO ALL
0x1d23cc…1d2560 Dummy {f00=0x0093, f01=0x018e, f02=» P LDR A1,A10 FDB DATA 5 P ADR A1,A5 5 $ P LD A3,FDBAI1,A1 FDB ADDR INDEX 5 2 P RB(Z) DMT625 NO INDEX FILE 5 Z P LDKL A1,FDBADF 5 ~ P ADR A3,A1 TO ADDR 5 P ADR A1,A10 FROM ADDR 5 P LDK A2,10 NO OF BYTES 5 P CF A14,DMTWM MOVE 5 WORDS 5
0x1d2560…1d26f4 (1, 436) Dummy {f00=0x0094, f01=0x0190, f02=» P LD A1,TASMXA 6 ( P ST A1,FDBMIA,A12 MASTER INDEX ADDR 6 P RF DMT720 6 F ( PDMT639 ADK A7,2 A7=13=OTHER REQ BUSY 6 X * PDMT640 ADK A7,1 A7=11=4 INDEX ALREADY 6 $ PDMT650 EQU * A7=10=NO DATA FILE 6 P ABL DMTASX 6 P XIF 6 P EJECT 6 " P
0x1d26f4…1d2888 Dummy {f00=0x0094, f01=0x0190, f02=» SLL A1,1 6 $ P ORS A1,FDBDBR,A12 DELAY + BASIC 7 PDMT720 EQU * 7 : P* 7 N ( P* SET FDBMRN TO MAX REC NO IN FILE 7 X P* 7 P LDR A1,A12 7 P ADKL A1,FDBNIF 7 P ADKL A1,EXTELE-2 7 PDMT750 SUKL A1,EXTELE 7 P LDR* A2,A1 EXT BASE 7
0x1d2888…1d2a1c Dummy {f00=0x0094, f01=0x0190, f02=» 7 ~ P LDR A1,A12 8 " P CF A14,GTLGRN GET LOG REC NO 8 P LDK A1,0 8 B " P LC A1,FDBBLF,A12 BLOCK FACTOR 8 T P SUK A1,1 8 z P ADR A3,A1 8 P RF(O) DMT760 8 P RF DMT770 8 PDMT760 ANKL A3,/7FFF 8 P ADK A2,1 CARRY 8 PDMT770 SC A2,F
0x1d2a1c…1d2bb0 Dummy {f00=0x0094, f01=0x40da, f02=»A12 REC LENGTH 8 P ADK A6,1 9 P LDK A7,0 9 ( P LC A7,FDBBLF,A12 BLOCK FACT 9 : P SUK A7,1 9 ^ P CF A14,MPYMOD A1,A2=A6*A7 9 p P ST A2,FDBMRO,A12 MAX FDBRRO 9 P ABL DMT400 9 P END 9 @ 9 8 P ADK A2,1 CARRY 8 PDMT770 SC A2,F
0x1d2bb0…1d2d44 Dummy {f00=0x0094, f01=0x2008, f02=» : EXIT P* P ENB P LKM * P DATA 3 6 P END F@ RA2,/FFFE P " P ANRS A2,A3 CLEAR FDB USE BIT f P RF DMT430 PDMT420 EQU * P ST A12,CDTAB+2,A2 PDMT430 EQU * P LD A3,ECBBA,A8 P SUKL A3,BUFSTA
0x1d2d44…1d2ed8 Dummy {f00=0x0094, f01=0x0190, f02=» A4,4 ADJUST ADDRESS TO DWT P LDR* A6,A4 GET DWT ADDRESS $ $ P RB(Z) RST100 DWT NOT IN SYSTEM H P LDKL A9,ITADI p $ P CW A9,DWTADR,A6 INTERTASK DWT? P RF(E) RST120 YES! P LDKL A9,ITADO $ P CW A9,DWTADR,A6 INTERTASK DWT? P R
0x1d2ed8…1d306c Dummy {f00=0x0094, f01=0x0190, f02=»T ECB ~ & P CM DWTTQ,A6 RESET TERMINAL QUEUE P RB RST100 NEXT DEVICE 8 P EJECT V P* d P* n P* RESET BLOCK POOL x P* P* PINI210 EQU * P LDKL A4,TIMQUE TIMER QUEUE PINI214 EQU * * P LDR* A4,A4 NEXT TIMER
0x1d306c…1d3200 Dummy {f00=0x0094, f01=0x018e, f02=»TIMER POINTER P RB INI214 PINI218 EQU * ( P CM TIMQUE RESET TIMER QUEUE < & P LD A1,BLOCKL LENGTH OF BLOCK POOL ` $ P LD A2,BLOCKS BLOCK POOL ADDRESS 0 P ST A2,FREQUE INITIALIZE FREE QUEUE POINTER PINI220 EQU * P SUK A1,6
0x1d3200…1d3394 (1, 437) Opaque[0x194]
0x1d3394…1d3528 # DirEnt {nam=»INTVMD«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1288, f03=0x2020}
0x1d3394…1d3528 IdxSect {
0x1d3394…1d3528 f00 = 0x0094 // 0x1d3394 @0x0
0x1d3394…1d3528 f01 = 0x000a // 0x1d3396 @0x2
0x1d3394…1d3528 gno = [ // 0x1d3398 @0x4
0x1d3394…1d3528 [0x00]: C0x0094.0x1.0
0x1d3394…1d3528 [0x01]: C0x0094.0x2.0
0x1d3394…1d3528 [0x02]: C0x0094.0x3.0
0x1d3394…1d3528 [0x03]: C0x0095.0x0.0
0x1d3394…1d3528 [0x04]: C0x0095.0x1.0
0x1d3394…1d3528 ]
0x1d3394…1d3528 }
0x1d3528…1d36bc Dummy {f00=0x0094, f01=0x018e, f02=» 2 P IDENT INTVMD REL 8.2 78-09-15 870105040820 P : P* B 8 P*************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 4 P* INTVMD = INTERRUPT VECTORS AND SYSTEM START P* P*
0x1d36bc…1d3850 Dummy {f00=0x0094, f01=0x0190, f02=» P* 8 P* THIS MODULE CONTAINS HARDWARE INTERRUPT VECTORS, . P* COMMUNICATION VECTOR TABLE,STACK AREA N $ P* AND MONITOR INITIALIZATION. P* P* P P P P P P P P P P EJE
0x1d3850…1d39e4 Dummy {f00=0x0094, f01=0x0190, f02=»L d 0 P ENTRY CVTEBA ADDRESS TO END OF BUFFER POOL , P ENTRY CVTINP INTERPRETER ADDRESS TABLE > P ENTRY CVTDK START UP DISC n & P ENTRY CVTAPA APPLICATION ADDRESS , P ENTRY CVTAPS APPLICATION START ADDRESS " P ENTRY CVTCLK REAL TIME CLOCK
0x1d39e4…1d3b78 Dummy {f00=0x0094, f01=0x0190, f02=»PAR FREE PARTITION POINTER " P ENTRY PARLEN PARTITION LENGTH " & P ENTRY NUMPAR NUMBER OF PARTITIONS H P r , P EXTRN IHPFAR POWER FAIL / AUTO RESTART z P EXTRN IHLKM LKM INTERRUPT P EXTRN IHRTC REAL TIME CLOCK P EXTRN IHTW TYPEWRITER
0x1d3b78…1d3d0c Dummy {f00=0x0094, f01=0x0190, f02=» * P EXTRN CHRT1 REMOTE CHANNEL UNIT NO. 1 * P EXTRN CHRT2 REMOTE CHANNEL UNIT NO. 2 6 P EXTRN CHRT3 d P EXTRN CHRT4 x ( P EXTRN IHCC1 CASSETTE CHANGER NO. 1 ( P EXTRN IHCC2 2 ( P EXTRN IHCC3 3
0x1d3d0c…1d3ea0 Dummy {f00=0x0094, f01=0x0190, f02=»AL CHANNEL UNIT NO. 4 P EXTRN IHFD FLOPPY DISCEN P EXTRN IHLP LINE PRINTER @ P EXTRN IHCR CARD-READER ` P EXTRN IHDU1 DISC UNIT NO. 1 P EXTRN IHDU2 DISC UNIT NO. 2 P EXTRN IHMT MAG. TAPE $ P EXTRN ILLINT ILLEGAL INTERRUPT
0x1d3ea0…1d4034 (1, 438) Dummy {f00=0x0094, f01=0x0190, f02=»D LEVEL t ( P EXTRN PRUN TTAB FOR RUNNING PROGRAM 0 P EXTRN INIMON MONITOR INITIALIZATION ROUTINE < P EXTRN BUG BUGGER p * P EXTRN PFINIT INIT AFTER MASTER CLEAR P EXTRN IHINPT TRAP HANDLER P* P PFD EQU /09 FD DEVICE ADDRESS
0x1d4034…1d41c8 Dummy {f00=0x0094, f01=0x0190, f02=»IN BYTES r PX:B EQU 0 ( PNUMPAR EQU X:B NUMBER OF PARTITIONS " 8 P* BY SETTING X:A NOT EQUAL TO ZERO, UNLOAD IS NOT N < P* PERFORMED ON CASSETTE AFTER THE APPLICATION LOADING P* PX:C EQU 0 PUNLOAD EQU X:C PDOPDSK EQU 0
0x1d41c8…1d435c Dummy {f00=0x0094, f01=0x0190, f02=»A IHLKM 1 P DATA IHRTC 2 P DATA ILLINT 3 4 P DATA ILLINT 4 P P DATA ILLINT 5 l P DATA ILLINT 6 P DATA IHTW 7 P DATA IHTC 8 P DATA IHSOP 9 P DATA ILLINT 10
0x1d435c…1d44f0 Dummy {f00=0x0094, f01=0x018e, f02=»15 P DATA CHRT1 16 P DATA CHRT2 17 & P DATA CHRT3 18 B P DATA CHRT4 19 ^ P DATA IHCC1 20 z P DATA IHCC2 21 P DATA ILLINT 22 P DATA IHCC3 23 P DATA CHLT1 24 P D
0x1d44f0…1d4684 Dummy {f00=0x0094, f01=0x0190, f02=» P DATA IHFD 30 P DATA ILLINT 31 P DATA ILLINT 32 : P DATA ILLINT 33 V P DATA IHLP 34 r P DATA IHCR 35 P DATA ILLINT 36 P DATA ILLINT 37 P DATA ILLINT 38 P DATA ILLINT
0x1d4684…1d4818 Dummy {f00=0x0094, f01=0x0190, f02=» 44 P DATA ILLINT 45 P DATA ILLINT 46 , P DATA ILLINT 47 H P DATA ILLINT 48 d P DATA ILLINT 49 P DATA ILLINT 50 P DATA ILLINT 51 P DATA ILLINT 52 P DATA ILLINT 53
0x1d4818…1d49ac Dummy {f00=0x0094, f01=0x0190, f02=» | P DATA ILLINT 59 P DATA ILLINT 60 $ P DATA ILLINT 61 @ P DATA ILLINT 62 P DATA IHINPT TRAP ROUTINE x P HLT P EJECT P P* P* SYSTEM HALTS P* P P HLT P HLT P
0x1d49ac…1d4b40 Dummy {f00=0x0094, f01=0x018e, f02=»ATA STB STACK BASE & PCVTSBA DATA 0 START OF BUFFER AREA $ PCVTEBA DATA 0 END OF BUFFER AREA D , PCVTINP DATA 0 INTERPPRETER TABLE ADDRESS l P RF INIT P RF BUGG & PCVTAPA DATA 0 APPLICATION ADDRESS * PCVTAPS DATA 0 APPLICATON START ADD
0x1d4b40…1d4cd4 (1, 439) Dummy {f00=0x0094, f01=0x0190, f02=» t ( PFREPAR DATA 0 FREE PARTITION POINTER 0 PPARLEN DATA 0 LENGTH OF PARTITIONS IN BYTES 4 4 PCVTAPN DATA 0 APPLICATION NUMBER (START SWITCH) h 8 PCVTSUB DATA 0 ADDRESS TO IPL READ SECTOR SUBROUTINE P EJECT P P* P* INIMON AND
0x1d4cd4…1d4e68 Dummy {f00=0x0094, f01=0x0190, f02=»/90 START BUGGER P LDKL A14,-8 P AD A14,CVTAPA , P LDKL A1,BUG B PBRANCH ABR(NZ) A1 V P HLT p " PTRAP LDK A1,/D HALT PARAMETER | P CF A15,HALT P EJECT P* , P* SAVE MEMORY SIZE, END OF BUFFER POOL P* AND LO
0x1d4e68…1d4ffc Dummy {f00=0x0094, f01=0x0190, f02=»IDGE h @ P* A9 = ADDRESS TO DPL (A9+2 = ADDRESS TO APPLICATION NO.) P* A10= RELOCATION BASE P P* A11= BUFFER ADDRESS+2 p " P* A12= MONITOR START ADDRESS P* A13= APPLICATION ADDRESS P* A14= MEMORY SIZE . P* A15= ADDRESS
0x1d4ffc…1d5190 Dummy {f00=0x0094, f01=0x0190, f02=» ST A14,CVTEBA END OF BUFFER POOL P IFT DOPDSK=1 * P LDR A13,A9 @ P LDR A9,A12 T P ORKL A12,/FFE h P ST A12,CVTEBA ~ P ADKL A12,2 P ST A12,CVTMSZ P LDR A12,A9 P XIF P LDR A14,P LOAD STACK BASE & P LDKL A2
0x1d5190…1d5324 Dummy {f00=0x0094, f01=0x0190, f02=»TSUB SAVE ADDRESS TO READ SECTOR SUBR. P* . P* READ LSBT 8 P* N P LDR A6,A1 X P IFT DOPDSK=1 j P SUK A6,1 P ST A3,CVTAPN P RF INIM20 P XIF P CFR A14,A15 READ LSBT P LDR* A2,A11 GET LENGTH P CWK
0x1d5324…1d54b8 Dummy {f00=0x0094, f01=0x0190, f02=» A3,A11 BUFFER ADDRESS P LDR A5,A13 P ADKL A5,408 2 $ PINIM10 LDR* A4,A3 GET TABLE WORD F P STR A4,A13 STORE TABLE WORD n & P ADKL A13,2 UPDATE MEMORY ADDRESS & P ADK A3,2 INCREMENT FETCH ADDRESS P SUK A2,2 READY ? P RF(E) I
0x1d54b8…1d564c Dummy {f00=0x0094, f01=0x0190, f02=»* SAVE APPLICATION ADDRESS AND RELOCATION BASE P* 8 , PINIM20 ST A13,CVTAPA APPLICATION ADDRESS B , P ADR A10,A13 APPLICATION RELOCATION BASE r P EJECT P* $ P* READ AND RELOCATION ROUTINE P* P* ON ENTRY: & P*
0x1d564c…1d57e0 Dummy {f00=0x0094, f01=0x0190, f02=»REGISTER USAGE: 4 P* A2 = RELOCATION BITS CHECK REG 6 P* A3 = ADDRESS OF RELOCATION TABLE P 2 P* A4 = RELOCATION BIT COUNTER , P* A5 = CODE WORD ADDRESS , P* A7 = C
0x1d57e0…1d5974 (1, 440) Dummy {f00=0x0095, f01=0x0190, f02=»UPDATE SECTOR NUMBER " P CFR A14,A15 READ FIRST SECTOR P LDR* A2,A11 START ADDRESS B $ P ADR A2,A10 ADD RELOCATION BASE d $ P ST A2,CVTAPS SAVE START ADDRESS P LD A1,4,A11 LENGTH IN BYTES $ P ADR A1,A10 ADD RELOCATION BASE P ADK A1,
0x1d5974…1d5b08 Dummy {f00=0x0095, f01=0x0190, f02=» PRELOC LDK A4,0 2 P LDKL A7,376 NUMBER OF BYTES IN NORMAL SECTOR P LDR A3,A11 P , PRELOCS LDR A5,A3 BUFFER ADDRESS POINTER d * P ADR A3,A7 ADDRESS TO RELOCATION WORDS PMOV EQU * P LDR* A2,A3 RELOCATION BITS P SRC A2,1
0x1d5b08…1d5c9c Dummy {f00=0x0095, f01=0x0190, f02=»DK A4,16 NUMBER OF BITS PMOVE EQU * * P LDR* A8,A5 GET CODE WORD FROM BUFFER 2 " P SLC A2,1 CHECK RELOCATION BIT ` P RF(NN) MOVABS NO RELOCATION $ P ADR A8,A10 ADD RELOCATION BASE & PMOVABS STR A8,A13 STORE CODE WORD $ P ADK A5,2 UP
0x1d5c9c…1d5e30 Dummy {f00=0x0095, f01=0x0190, f02=»9 LAST POSITION ADMITTED ? P RF(NE) MONFOR NO " P LDKL A1,/100 < PFELUTG OTR A1,0,SOP R P HLT n PMONFOR SUK A7,2 LAST ? z P RF(Z) MOVEND YES $ P SUK A4,1 NEXT RELOCATION WORD ? P RB(P) MOVE P RB MOV YES * PMOVEND
0x1d5e30…1d5fc4 Dummy {f00=0x0095, f01=0x0190, f02=»F BUFFER POOL AND INDICATE LOADING ENDED P* 0 PREDEND EQU * : P ST A13,CVTSBA N $ P LDKL A4,NUMPAR OVERLAY SYSTEM ? d P RF(E) INIM35 NO . P ADKL A13,10 DUMMY NEEDED AT SEGMENT LOAD ( P ST A13,CVTSBA START OF BUFFER POOL P*
0x1d5fc4…1d6158 Dummy {f00=0x0095, f01=0x018e, f02=»L A1,368 BYTES IN 1:ST SECTOR P RF(NP) PAREND & P ADKL A2,368 < 0 PPARADD SUKL A1,376 BYTES IN 2:ND-N:TH SECTOR P P RF(NP) PAREND P ADKL A2,376 P RB PARADD 6 PPAREND ADKL A2,408 RESERVED SPACE FOR LAST SECTOR P ST A2,PARLEN
0x1d6158…1d62ec Dummy {f00=0x0095, f01=0x018e, f02=» & P SRL A1,1 START ADDRESS REFERENCE P LD A2,PARLEN . ( P SRL A2,1 PARTITION LENGTH REFERENCE D PINIM28 ADR A1,A2 OVERFLOW? p P RF(O) OVERFL ERROR P SUK A3,1 P RB(NZ) INIM28 " P LD A2,CVTEBA GET MEMORY SIZE P SRL A2,1
0x1d62ec…1d6480 Dummy {f00=0x0095, f01=0x0190, f02=» P* " P* LINK FREE PARTITION QUEUE P* 8 PINILNK EQU * B . P ST A13,FREPAR SET FREE PARTITION POINTER V $ PINIM29 SUK A4,1 LAST PARTITION ? P RF(E) INIM32 P LDR A5,A13 ( P AD A13,PARLEN ADD PARTITION LENGTH P S
0x1d6480…1d6614 (1, 441) Dummy {f00=0x0095, f01=0x0190, f02=»0,SOP INDICATE LOADING ENDED P LD A7,CVTDK START UP DISC $ P ANK A7,/F F P SLL A7,4 X P ORS A7,INIM37 j P ANK A7,/80 P RF(Z) INIM38 NOT FLEX DISC P LDK A7,/C UNLOCK PINIM37 CIO A7,1,FD P RB(NA) *-2 P SST A7,
0x1d6614…1d67a8 Dummy {f00=0x0095, f01=0x0190, f02=»INIM40 RESTART ADDRESS P LDKL A1,BUG P ABR(NZ) A1 2 P EJECT F P T P* P* FIND FIRST USER TASK f P* PINIM40 EQU * P LD A1,TCTAB TCTAB ADDRESS P LDR* A4,A1 TCTAB LENGTH PINIM50 ADK A1,2 P SUK A4,2
0x1d67a8…1d693c Dummy {f00=0x0095, f01=0x018e, f02=»CATION r P RB(N) INIM50 MONITOR TASK , P ST A5,PRUN SET TTAB FOR RUNNING PROGRAM 0 P CMR A5 ` $ P LD A7,TTB:ST,A5 GET USER LEVEL p P SRC A7,6 P EJECT P* P* INITIALIZE STACK P* , P LDKL A15,STB-32 STACK BASE - ID
0x1d693c…1d6ad0 Dummy {f00=0x0095, f01=0x0190, f02=» . P STR A1,A15 SEGMENT POINTRER OF IDLE LOOP ! P* ! : P* START SYSTEM ! D P* ! Z P ! d PINIM70 EQU * ! l P LDKL A13,WAITIS ! * P STR A13,A15 STORE USER START ADDRESS ! " P STR A7,A15 AND LEVEL ON STACK ! " P ABL PFINIT INITIALIZE DEVIC
0x1d6ad0…1d6c64 Dummy {f00=0x0095, f01=0x4156, f02=»P ! P* " P " PLOOP RB * " PWAITIS EQU * " . P LDKL A8,10 " B P LKM " V P DATA 6 " b P LD A1,CVTDK START UP DISC " r P SLL A1,8 INTO LEFT BYTE " 0 P LC A1,CVTAPN+1 APPLICATION NO IN RIGTH BYTE " 8 P LD A2,CVTSUB ADDRESS TO IPL REA
0x1d6c64…1d6df8 Dummy {f00=0x0095, f01=0x2008, f02=» # P P END INIM @ & P EJECT 2 P @ P* H P* START SYSTEM R P* h P r P LD A13,CVTAPS z * P STR A13,A15 STORE USER START ADDRESS " P STR A7,A15 AND LEVEL ON STACK " P ABL PFINIT INITIALIZE DEVICES
0x1d6df8…1d6f8c Dummy {f00=0x0095, f01=0x0190, f02=» > n RTNA15 , ( C @ P P P X X8 , ( a _: W ? T T P , ( W u > > E D , ( E E S % ;DV " * & U " D & $ P #`P T E &
0x1d6f8c…1d7120 Dummy {f00=0x0095, f01=0x0190, f02=» Y _8 X v LDREGF LDREGE $ * , ( XB Y X X X X ' > GETCHRC 8 n , ( 3@ 4 B U B (" W C OUTLIN` V , ( Q$ " 8' ?A R 8 , ( m ;b#
0x1d7120…1d72b4 (1, 442) Opaque[0x194]
0x1d72b4…1d7448 # DirEnt {nam=»LOADER«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x12b0, f03=0x2020}
0x1d72b4…1d7448 IdxSect {
0x1d72b4…1d7448 f00 = 0x0095 // 0x1d72b4 @0x0
0x1d72b4…1d7448 f01 = 0x0004 // 0x1d72b6 @0x2
0x1d72b4…1d7448 gno = [ // 0x1d72b8 @0x4
0x1d72b4…1d7448 [0x00]: C0x0095.0x2.0
0x1d72b4…1d7448 [0x01]: C0x0095.0x3.0
0x1d72b4…1d7448 ]
0x1d72b4…1d7448 }
0x1d7448…1d75dc Dummy {f00=0x0095, f01=0x018e, f02=» 2 P IDENT LOADER REL 8.2 78-09-15 870105040820 P : P* B 6 P************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 8 P* LOADER = TOSS LKM-PROCESSOR FOR SEGMENT LOADING P*
0x1d75dc…1d7770 Dummy {f00=0x0095, f01=0x0190, f02=» . P* THIS MODULE CONTAINS THE LKM-PROCESSOR P* 6 P* L O A D E R @ P* X 8 P* THIS MODULE IS ENTERED WHEN LOADING OF A SEGMENT b P* IS REQUIRED. 8 P* THE MODULE IS CALLED BY THE LKM-HANDLING MODULE. P* P* ENTRY PA
0x1d7770…1d7904 Dummy {f00=0x0095, f01=0x0190, f02=»E JOB WILL BE PUT IN z B P* DIPATCHER QUEUE ELSE A LOAD-TASK IS ACTIVATED WITH ADDRESS > P* OF A LOAD PARAMETER BLOCK IN A1 AS THE ONLY PARAMETER. b P* & P* EXIT PARAMETERS TO LOAD TASK: 2 P* A1= ADDRESS TO BLOCK IN MONITOR BLOCK POOL
0x1d7904…1d7a98 Dummy {f00=0x0095, f01=0x018e, f02=» THIRD PARAM= TTAB-ADDRESS P* * 4 P* IF AN ERROR CONDITION IS DETECTED THE ERROR 4 4 P* RETURN WILL BE PERFORMED AT THE INSTRUCTION l " P* FOLLOWING THE LKM-REQUEST P* P* EXIT PARAMETER: P* A7= -1 P EJECT
0x1d7a98…1d7c2c Dummy {f00=0x0095, f01=0x018e, f02=» j ( P ENTRY LD150 ENTRY FROM INTERPRETER P* 4 P************* > P* EXTERNALS * T P************* j P* P* P EXTRN GETBLK P EXTRN LDTASK P EXTRN ACTOT P EXTRN QTJOB P EXTRN TDISP , P EXTRN LKMRQ
0x1d7c2c…1d7dc0 Dummy {f00=0x0095, f01=0x018e, f02=» ` " P EXTRN TTB:SA DISPATCH ADDRESS " P EXTRN TTABLD LOAD TASK TABLE . P* T P************* ^ P* CONSTANTS * t P************* P* P* 2 PCVTLSB EQU /9A START ADDRESS OF LOAD SEGM BLK & P FIRST WORD CONTAINS LSBT-LE
0x1d7dc0…1d7f54 (1, 443) Dummy {f00=0x0095, f01=0x0190, f02=» PLOADER EQU * P SUKL A8,1 P ADR A8,A8 * P LDR A7,A7 SEGMENT NBR 0? < P RF(NZ) LD050 NO! ^ 0 P LD A2,CVTAPA YES CALCULATE DISPATCH ADDRESS x P CM TTB:SP,A5 P CM TTB:SS,A5 PLD010 EQU * $ P ADR A2,A8 GET DISPATCH ADDR
0x1d7f54…1d80e8 Dummy {f00=0x0095, f01=0x0190, f02=»JECT P* & P* CHECK VALIDITY OF SEGMENT NBR P* @ PLD050 EQU * J ( P LDR A3,A7 CALCULATE 12 TIMES SEGNBR ^ P SLL A3,2 P LDR A2,A3 P SLL A2,1 P ADR A3,A2 & P CW* A3,CVTLSB CMP WITH LSB-LENGTH P RF(NL) LDER
0x1d80e8…1d827c Dummy {f00=0x0095, f01=0x0190, f02=»A2,A3 $ P RF(N) LD100 LOAD IF NOT LOADED $ P ST A3,TTB:SP,A5 UPDATE POINTER 6 P LD A2,2,A3 NEW LOAD ADDRESS ^ P ST A2,TTB:SS,A5 UPDATE $ P RB LD010 QUEUE JOB AND DISPATCH P EJECT P* ( P* GET PARAMETER BLOCK AND FILL IN
0x1d827c…1d8410 Dummy {f00=0x0095, f01=0x018e, f02=»DDRESS z PLD150 EQU * $ P CF A15,GETBLK GET MONITOR BLOCK " P* J > P* ACTIVATE LOAD TASK AND PUT IT IN THE DISPATCHER QUEUE T P* P LDR A1,A4 LOAD PARAMETER * P LDKL A2,LDTASK LOAD DISPATCH ADDRESS P LDKL A5,TTABLD P
0x1d8410…1d85a4 Dummy {f00=0x0095, f01=0x4092, f02=» P ABL TDISP P* P* ERROR EXIT P* 6 PLDERR EQU * @ * P ABL LKMRQE SET A7=-1 QUE AND DISPATCH T P END @ P* P LDR A1,A4 LOAD PARAMETER * P LDKL A2,LDTASK LOAD DISPATCH ADDRESS P LDKL A5,TTABLD P
0x1d85a4…1d8738 Dummy {f00=0x0095, f01=0x2008, f02=» @ ET MONITOR BLOCK * , @ ;* ACTIVATE LOAD TASK AND PLACE IT IN THE DISPATCHER QUEUE 6 * z LDR A1,A4 LOAD PARAMETER * % LDKL A2,LDTASK LOAD DISPATCH ADDRESS $ CF A15,ACTOT ACTIVATE LOAD TASK * $ *
0x1d8738…1d88cc Dummy {f00=0x0095, f01=0x0190, f02=» P P* P* START SYSTEM P* 0 P : P LDKL A13,WAITIS B * P STR A13,A15 STORE USER START ADDRESS Z " P STR A7,A15 AND LEVEL ON STACK " P ABL PFINIT INITIALIZE DEVICES P RES 80 PSTB EQU *-2 STACK BASE P
0x1d88cc…1d8a60 Dummy {f00=0x0095, f01=0x406e, f02=» DATA 6 ( P LDK A1,0 EXIT PARAMETER = CASSETTE P ABI CVTAPS < P P P END INIM X@ jSER START ADDRESS Z " P STR A7,A15 AND LEVEL ON STACK " P ABL PFINIT INITIALIZE DEVICES P RES 80 PSTB EQU *-2 STACK BASE P
0x1d8a60…1d8bf4 (1, 444) Opaque[0x194]
0x1d8bf4…1d8d88 # DirEnt {nam=»LDTASK«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x12c0, f03=0x2020}
0x1d8bf4…1d8d88 IdxSect {
0x1d8bf4…1d8d88 f00 = 0x0096 // 0x1d8bf4 @0x0
0x1d8bf4…1d8d88 f01 = 0x0008 // 0x1d8bf6 @0x2
0x1d8bf4…1d8d88 gno = [ // 0x1d8bf8 @0x4
0x1d8bf4…1d8d88 [0x00]: C0x0096.0x0.0
0x1d8bf4…1d8d88 [0x01]: C0x0096.0x1.0
0x1d8bf4…1d8d88 [0x02]: C0x0096.0x2.0
0x1d8bf4…1d8d88 [0x03]: C0x0096.0x3.0
0x1d8bf4…1d8d88 ]
0x1d8bf4…1d8d88 }
0x1d8d88…1d8f1c Dummy {f00=0x0096, f01=0x0190, f02=» 2 P IDENT LDTASK REL 8.2 78-09-15 870105040820 P : P* B $ P******************************* L P* t $ P* PHILIPS TERMINAL SYSTEM PTS ~ P* P* LDTASK = LOAD TASK P* P* P* P* P* P* $
0x1d8f1c…1d90b0 Dummy {f00=0x0096, f01=0x0190, f02=» P EXTRN QTJOB TASK QUEUE , P EXTRN FREPAR FREE COREMEMORY PARTITION ( & P EXTRN PARLEN LENGTH OF PARTITION X & P EXTRN PARNUM NUMBER OF PARTITION $ P EXTRN GETBLK MONITOR FREE BLOCK ( P EXTRN FREBLK PARAM. FROM MON.BLOCK ( P EXTRN T
0x1d90b0…1d9244 Dummy {f00=0x0096, f01=0x0190, f02=»IRST SEGMENT IN QUEUE v , P EXTRN PARTEN ADDRESS TO FREE PARTITION 0 P EXTRN LDPEND LOAD PENDING. LDTASK IN PAUSE N * P EXTRN CVTINP SUBROUTINE TABLE ADDRESS P EXTRN CVTDK START UP DISC P EJECT P* P* P* P* P
0x1d9244…1d93d8 Dummy {f00=0x0096, f01=0x0190, f02=»* 4 P* MONBLK = GET PARAMETERS FROM A MONITOR BLOCK P* B P* L PMONBLK EQU * V $ P LDKL A14,STBLD LOAD STACK BASE j P LD A4,CVTDK GET START DISC P ST A4,ECBRED P LDR A4,A1 " P CF A15,FREBLK --GET MON.BLOCK P LDR
0x1d93d8…1d956c Dummy {f00=0x0096, f01=0x018e, f02=»OADED p P* PLDTEST EQU * P LDR* A1,A3 LOADED ? , P RF(N) PART NO H " P LD A10,2,A3 NEW LOAD ADDRESS ^ P ABL ACTIV P* 0 P* PART = SEEK FREE PARTTION IN CORE MEMORY P* PPART EQU * ( P LD A10,FREPAR GET PARTI
0x1d956c…1d9700 Dummy {f00=0x0096, f01=0x0190, f02=» 2 P* INDICATE LOADING PENDING AND PAUSE LDTASK P* : PPAUSE EQU * D P IM LDPEND X P ENB j P LKM PAUSE LDTASK v P DATA 5 P INH P RB LDTEST P* * PUPDFRE LDR* A7,A10 NEXT FREE PARTITION * P ST A7,FREPAR UPDA
0x1d9700…1d9894 (1, 445) Dummy {f00=0x0096, f01=0x0190, f02=»,-8,A8 LOAD ADDR. TO FREE PARTITION P* , , P* UPLSBT = UPDATE LSBT SEGMENT STATUS 6 P* f PUPLSBT EQU * p P LDK A7,/80 P SC A7,-10,A8 UNLOADED P LD A6,-2,A8 PRECEDENT P RF(Z) FIN P CM 2,A6 UPDATE END OF QUEUE
0x1d9894…1d9a28 Dummy {f00=0x0096, f01=0x0190, f02=» x PFINITO EQU * P LDK A7,/C0 4 P SCR A7,A3 SET NEW SEGMENT STATUS=UNDER LOADING 0 P ST A10,2,A3 LOAD ADDRESS h P* $ P* SAVE AND LOAD REGISTERS FOR $ P* READ AND RELOCATION ROUTINE P* P ENB P SUKL A10,10
0x1d9a28…1d9bbc Dummy {f00=0x0096, f01=0x0190, f02=»POINTER v P LD A6,4,A3 SECTOR ADDRESS * P LDK A7,/F8 LOWEST FLEX.DISC FILE CODE 2 P CW A7,CVTDK ` " P RF(G) CONT NOT FLEXIBLE DISC t P* ( P* LOCK FLEXIBLE DISC (IF UNLOCKED) P* P LDK A7,/A6 LOCK ORDER P LDKL A8,ECBRED
0x1d9bbc…1d9d50 Dummy {f00=0x0096, f01=0x018e, f02=»ONT OK ,ALREADY LOCKED P ANK A7,1 P RF(NZ) ERRLOD NOT OPERABLE 0 P LDK A7,2 I/O ERROR T P RF ERRLOD p PCONT EQU * P EJECT @ P************************************************************ P* $ P* READ AND RELOCATION
0x1d9d50…1d9ee4 Dummy {f00=0x0096, f01=0x0190, f02=» P* REGISTER USAGE: " P* A1 = LAST WORD TO RELOCATE & P* A2 = RELOCATION BITS CHECK REG F ( P* A3 = ADDRESS OF RELOCATION TABLE p $ P* A4 = RELOCATION BIT COUNTER P* A5 = P* A7 = CODE WORD COUNTER P* A8 = CODE WORD
0x1d9ee4…1da078 Dummy {f00=0x0096, f01=0x0190, f02=»TION AND GET RELOC. PARAMETERS p P* & P CF A14,IOSUBS --READ SECTOR 0 P LDR A7,A7 READ ERROR? T P RF(NZ) ERRLOD r , P LD A1,4,A10 LOAD MODULE LENGTH IN BYTES 6 P ADR A1,A10 ADD RELOCATION BASE TO GET END ADDRESS P* P* RELOCATE
0x1da078…1da20c Dummy {f00=0x0096, f01=0x0190, f02=»ON WORDS r P* P* GET RELOCATION WORD P* : 4 PRELWRD LDK A4,16 INITIATE RELOCATION BIT COUNTER D $ P LDR* A2,A3 GET RELOCATION WORD | 0 P RF(NZ) REL200 IF NOT ZERO JMP AND RELOCATE P* ( P* NO MORE RELOCATION BY THIS WORD
0x1da20c…1da3a0 Dummy {f00=0x0096, f01=0x0190, f02=» P CWR A5,A1 MODULE END? P RF(NL) RELEND YES " P SLL A1,1 < P SUR A7,A4 SECTOR ENDED? N P RF(P) REL100 JMP IF NOT n P ADR A13,A7 P RF SECEND 2 PREL100 ADK A3,2 UPDATE RELOCATION WORD POINTER P RB RELWRD GET NEXT WORD
0x1da3a0…1da534 (1, 446) Dummy {f00=0x0096, f01=0x018e, f02=»BY THIS WORD! n 0 PREL200 RF(N) REL300 YES RELOCATE MODULE WORD ( P SLN A2,A5 NOT THIS WORD - GET NEXT J P SUR A4,A5 v P ADR A5,A5 P SUR A7,A5 P ADR A13,A5 P RF REL400 P* P* RELOCATE ONE MODULE WORD P*
0x1da534…1da6c8 Dummy {f00=0x0096, f01=0x0190, f02=» " P CWR A13,A1 RELOCATION ENDED? P RF(E) RELEND YES * P SUK A7,2 D & P RF(Z) SECEND JMP IF END OF SECTOR V & P SUK A4,1 GET NEXT RELOCATION BIT , P RB(P) RELNXT RELOCATE NEXT MODULE WORD P RB REL100 P* & P* GET NEXT SECTO
0x1da6c8…1da85c Dummy {f00=0x0096, f01=0x0190, f02=» ST A13,ECBRED+2 SET READ BUFFER ADDRESS P CF A14,IOSUBS READ SECTOR 0 P LDR A7,A7 READ ERROR? R P RF(NZ) ERRLOD p " P STR A5,A13 RESTORE LAST WORD & P ADKL A13,2 UPDATE MEMORY POINTER $ P RB RELSEC RELOCATE NEXT SECTOR P* < P
0x1da85c…1da9f0 Dummy {f00=0x0096, f01=0x0190, f02=»D A3,SEGMNO GET SEGMENT ADDRESS P LDK A7,/00 ( & P SCR A7,A3 STATUS= LOADED , READY < P* f $ P* GET START ADDRESS IN SEGMENT p P* PACTIV EQU * P LDR A12,A12 DISPATCHER P RF(N) DSPFOR AVTIVATION P ADR A12,A10 "
0x1da9f0…1dab84 Dummy {f00=0x0096, f01=0x0190, f02=» ST A10,TTB:SS,A9 SEGMENT START ADDRESS $ P ST A3,TTB:SP,A9 SEGMENT POINTER 0 PDIRECT LDR A5,A9 X & P CF A15,QTJOB --START CALLING TASK p P ENB P LKM P DATA 3 EXIT PERRLOD LD A5,CVTINP P SUK A5,2 P LDR* A5,A5 P
0x1dab84…1dad18 Dummy {f00=0x0096, f01=0x0190, f02=»DKL A10,8 P ST A10,FREPAR P STR A5,A10 ( P CM TTB:SP,A9 < P RB DIRECT R P EJECT d P* r ( P* IOSUBS = READ SECTOR SUBROUTINE | P* 0 P* THIS ROUTINE READS ONE SECTOR FROM DISC 2 P* AND ALSO CHECKS THE RETURN COD
0x1dad18…1daeac Dummy {f00=0x0096, f01=0x0190, f02=»RD f P LKM P DATA 1 P* & P* 0 < P* RETCOD CHECKS AND TRANSLATES RETURNCODE AFTER READ. : P* z , P* INPUT:8,A8 = RETURN CODE AFTER READ P* P* OUTPUT:A7 = 0 NO ERROR $ P* 1 DISC. IO ERROR & P
0x1daeac…1db040 Dummy {f00=0x0096, f01=0x4178, f02=»8 GET RETURN CODE & P ANKL A7,/FEFF BIT 7 ONLY RETRIES P RF(Z) UT NO ERROR D P ANK A7,/83 ^ P RF(Z) DISCIO BIT 0-6,9-13 r P ANK A7,/3 * P RB(Z) IOSUBS BIT 8 NEW VOLUME LOADED P LDK A7,1 DISC INOPERABLE " PDISCIO ADK A7,1 DI
0x1db040…1db1d4 (1, 447) Dummy {f00=0x0096, f01=0x2008, f02=» CF A15,QTJOB --START CALLING TASK LKM 2 DATA 3 EXIT > END R@ ^ * f & "* PLACE SEGMENT FIRST IN LRU QUE p * LD A2,LRUQUE STR A2,A1 SUK A1,2 ST A1,-2,A2 $ ADKL A10,8 PARTITION
0x1db1d4…1db368 Dummy {f00=0x0096, f01=0x0190, f02=»T PARAMETER ~ P CF A15,HALT P EJECT ( P 6 P* > ( P* SUBROUTINE TO EXECUTE CHCR COMMAND H P* t P ~ PCHCREX CIO A1,1,CHCR P SST A3,CHCR P RB(NA) *-2 P RTN A8 P EJECT P P* P* INITIALIZATI
0x1db368…1db4fc Dummy {f00=0x0096, f01=0x0190, f02=»SAVE APPL ADDRESS $ P ADR A14,A9 CALC APPL LINK BASE P B P J P R P* Z P* COMPUTE MEMORY SIZE d P* P P LDKL A1,/5555 P LDKL A2,4094 PINIM30 SUKL A2,4096 P LDR* A3,A2 SAVE CONTENTS P STR A1,A2
0x1db4fc…1db690 Dummy {f00=0x0096, f01=0x0190, f02=»VTMSZ MEMORY SIZE TO CVT P SUK A2,2 $ P ST A2,CVTEBA END OF BUFFER POOL 2 P EJECT Z P h P* p , P* UNLOAD MONITOR CAS AND SELECT APPL CAS z P* P P LDK A1,/F UNLOAD P CFR A8,A6 P * PINIM10 CIO A1,1,SOP READ
0x1db690…1db824 Dummy {f00=0x0096, f01=0x0190, f02=» t P ANK A1,1 SELECT P CFR A8,A6 P LDK A1,2 LOCK 2 P CFR A8,A6 H P ANK A3,1 Z P RB(NZ) INIM10 NO CASSETTE l P LDK A1,8 SEARCH BOT P CFR A8,A6 P LDK A1,/C SEARCH TAPE MARK P CFR A8,A6 P EJECT P P
0x1db824…1db9b8 Dummy {f00=0x0096, f01=0x018e, f02=»UCTION AFTER APL z P ABR A2 PERFORM APL P 4 $ PINIM20 LDK A1,/F UNLOAD CASSETTE < P CFR A8,A6 d P v : P ST A9,CVTSBA SET ADDRESS TO BEGINNING OF BUFFER POOL ~ & P ST A13,CVTAPS SAVE START ADDRESS P P P* P* CHECK
0x1db9b8…1dbb4c Dummy {f00=0x0096, f01=0x0190, f02=» P* P* INITIALIZE STACK P* , P 6 ( PINIM40 LD A15,CVTSTB LOAD STACK BASE > P LDKL A1,LOOP j P STR A1,A15 P LDKL A1,/FC00 & P STR A1,A15 ADJUST STACK FOR LOOP P SUKL A15,28 P LDK A1,0 P STR A1,A15
0x1dbb4c…1dbce0 Dummy {f00=0x0096, f01=0x0190, f02=»B LENGTH PINIM50 ADK A1,2 P SUK A4,2 ( P RF(NZ) INIM60 : P HLT NO USER TASK FOUND P P p " PINIM60 LDR* A5,A1 TTAB ADDRESS x ( P LD A2,TTB:ID,A5 TASK IDENTIFICATION P RB(N) INIM50 MONITOR TASK , P ST A5,PRUN SET TTAB FOR RUN
0x1dbce0…1dbe74 (1, 448) Opaque[0x194]
0x1dbe74…1dc008 # DirEnt {nam=»RELUP «, typ=»UF«, f00=0x2020, f01=0x2020, f02=0x12e0, f03=0x2020}
0x1dbe74…1dc008 IdxSect {
0x1dbe74…1dc008 f00 = 0x0097 // 0x1dbe74 @0x0
0x1dbe74…1dc008 f01 = 0x0004 // 0x1dbe76 @0x2
0x1dbe74…1dc008 gno = [ // 0x1dbe78 @0x4
0x1dbe74…1dc008 [0x00]: C0x0097.0x0.0
0x1dbe74…1dc008 [0x01]: C0x0097.0x1.0
0x1dbe74…1dc008 ]
0x1dbe74…1dc008 }
0x1dc008…1dc19c Dummy {f00=0x0097, f01=0x0190, f02=» P$REL P=LRPINT P$REL P=TPROC P$REL P=TIMER . P$REL P=MSUBS B P$REL P=GRBUF V P$REL P=TABORT j P$REL P=TDISP P$REL P=MONTIM PSCR P$REL P=INPRET P$REL P=INIMON P$REL P=INTVMA PSCR P$REL
0x1dc19c…1dc330 Dummy {f00=0x0097, f01=0x0190, f02=» P$REL P=LOADER P$REL P=LDTASK PSCR 0 P$REL P=TDISPO < P$REL P=TIODM R PSCR f P$REL P=DMTASK r P$REL P=TASS PSCR P$REL P=DMINIT P$REL P=DMBUF P$REL P=DMFDB P$REL P=DMSUBX P$REL P=DMSUB
0x1dc330…1dc4c4 Dummy {f00=0x0097, f01=0x0190, f02=» P$REL P=DRDI01 P$REL P=DRTP01 PSCR 4 P$REL P=DRMT01 @ P$REL P=DRLP01 V P$REL P=DRGP01 l PSCR P$REL P=DRKB01 P$REL P=DRDY01 PSCR P$REL P=DRRT01 P$REL P=DRDC15 P$REL P=DRTP02 P
0x1dc4c4…1dc658 Dummy {f00=0x0097, f01=0x0190, f02=»1 PSCR P$REL P=DRCG01 P$REL P=INTLT1 , P$REL P=INTLT2 B P$REL P=INTLT3 X P$REL P=INTLT4 n PSCR P$REL P=INTRT1 P$REL P=INTRT2 P$REL P=INTRT3 P$REL P=INTRT4 P$REL P=TC:TAB PSCR
0x1dc658…1dc7ec Dummy {f00=0x0097, f01=0x018e, f02=»$REL P=DVTGP P$REL P=DVTDI P$REL P=DVTDN ( P$REL P=DVTDY < PSCR P P$REL P=TTMJOB P$REL P=DW1501 r P$REL P=MONTAB PSCR P$REL P=MOXTAB P$REL P=TCLASS P$REL P=ECLASS P$REL P=SCLASS P$REL P
0x1dc7ec…1dc980 Dummy {f00=0x0097, f01=0x0190, f02=» P$REL P=TTABD1 P$REL P=TTABD2 PSCR 4 P$REL P=ADDMOD @ P$REL P=DSUMOD V P$REL P=MPYMOD l P$REL P=DIVMOD P$REL P=TIODMX PSCR P$REL P=DWCP01 P$REL P=DVTOD P$REL P=EBCDIC P$REL P=DROD01
0x1dc980…1dcb14 (1, 449) Dummy {f00=0x0097, f01=0x0190, f02=»=DRIC0X P$REL P=ATTACH P$REL P=ATTACX & P$REL P=DRCR01 < PSCR R P$REL P=DWII01 ^ P$REL P=DWIO01 t P$REL P=DRDC07 P$REL P=DW0701 PSCR P$REL P=DRKB03 P$REL P=DRMS01 P$REL P=DVTMS P$REL P
0x1dcb14…1dcca8 Dummy {f00=0x0097, f01=0x004a, f02=» P$REL P=DRTP03 P$REL P=DVTT1 PGOD . PASG /E0,TY10 : < PSCR R P$REL P=DWII01 ^ P$REL P=DWIO01 t P$REL P=DRDC07 P$REL P=DW0701 PSCR P$REL P=DRKB03 P$REL P=DRMS01 P$REL P=DVTMS P$REL P
0x1dcca8…1dce3c Dummy {f00=0x0097, f01=0x2008, f02=» P=DRTP03 P$REL P=DVTT1 PGOD . PASG /E0,TY10 : < PSCR R P$REL P=DWII01 ^ P$REL P=DWIO01 t P$REL P=DRDC07 P$REL P=DW0701 PSCR P$REL P=DRKB03 P$REL P=DRMS01 P$REL P=DVTMS P$REL P
0x1dce3c…1dcfd0 Dummy {f00=0x0097, f01=0x0190, f02=» P . P RF(NZ) BRM670 STATUS HAS BEEN TRANSMITTED Q P XIF Q : ( P CF A5,CWRITE COMPLETE WRITE REQUEST Q F PBRM636 EQU * Q r P CF A5,TREOT SEND EOT Q P IFT RCOM=1 Q P Q P CM XRB RESET READ BUFFER Q P XIF Q P RB BRM410 Q PBRM640 E
0x1dcfd0…1dd164 Dummy {f00=0x0097, f01=0x0190, f02=» RB(NE) BRM610 INVALID DLE SEQUENCE Q " P CM XACK RESET 'EXPECTING ACK' R , P LD A1,XETX R R $ P RF(NZ) BRM660 ETX HAS BEEN SENT R f P LDK A1,2 SET RC=2 R P RB BRM635 R PBRM660 EQU * R P LDK A1,0 SET RC=0 R P RB BRM635 R P IFF STAT=0 R
0x1dd164…1dd2f8 Dummy {f00=0x0097, f01=0x0190, f02=»DWT ADDRESS R ~ , P CF A15,REMOVS REMOVE FROM STATUS QUEUE S P CM XSTA CLEAR 'STATUS SENT' S D " P CM XACK CLEAR 'ACK EXPECTED' S h P LD A1,DWTST,A6 GET STATUS S P ANK A1,4 S P RB(Z) BRM636 NOT DE S P LDKL A1,/8000 S " P ANS A1,DWTST,A6 CLE
0x1dd2f8…1dd48c Dummy {f00=0x0097, f01=0x0190, f02=»SELECT EQU * S P IFF STAT=0 T P LD A1,DWTST,A6 GET STATUS T ( P LDR A3,A1 T J P ANK A1,1 T $ P RF(Z) SEL110 NO PENDING STATUS T n P CF A5,TRRVI SEND RVI T P XIF T P IFF STAT=1 T P RF SEL110 T P XIF T PSEL100 EQU * T P A
0x1dd48c…1dd620 Dummy {f00=0x0097, f01=0x0190, f02=»F(NZ) SEL120 BUFFER AVAILABLE T PSEL115 EQU * U & P CF A5,TRWACK SEND WACK U : P RB SEL100 U Z PSEL120 EQU * U l , P CF A5,PRREC PREPARE FOR TEXT RECEPTION U P CF A5,TRACK SEND ACK,0 U P RB SEL100 U P EJECT U P* U P* U P* PR
0x1dd620…1dd7b4 (1, 450) Opaque[0x194]
0x1dd7b4…1dd948 # DirEnt {nam=»TDISPO«, typ=»SC«, f00=0x4c20, f01=0x3d20, f02=0x12f0, f03=0x4431}
0x1dd7b4…1dd948 IdxSect {
0x1dd7b4…1dd948 f00 = 0x0097 // 0x1dd7b4 @0x0
0x1dd7b4…1dd948 f01 = 0x000a // 0x1dd7b6 @0x2
0x1dd7b4…1dd948 gno = [ // 0x1dd7b8 @0x4
0x1dd7b4…1dd948 [0x00]: C0x0097.0x2.0
0x1dd7b4…1dd948 [0x01]: C0x0097.0x3.0
0x1dd7b4…1dd948 [0x02]: C0x0098.0x0.0
0x1dd7b4…1dd948 [0x03]: C0x0098.0x1.0
0x1dd7b4…1dd948 [0x04]: C0x0098.0x2.0
0x1dd7b4…1dd948 ]
0x1dd7b4…1dd948 }
0x1dd948…1ddadc Dummy {f00=0x0097, f01=0x0190, f02=» 2 P IDENT TDISPO REL 8.2 78-09-15 870105040820 P : P* B 6 P************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* TDISP = TERMINAL DISPATCHER P* P* P* P
0x1ddadc…1ddc70 Dummy {f00=0x0097, f01=0x0190, f02=»RMINAL DISPATCHER IN TOSS. ~ > P* ENTRY POINT IS 'TDISP' WITH 8 REGISTERS ON A15 STACK. " > P* THE DISPATCHER CHECKS IF THERE IS A JOB IN DISPATCHER- d < P* QUEUE WITH HIGHER PRIORITY THAN INTERRUPTED PROGRAM. < P* - IF SO THE QUEUED PROGRAM IS
0x1ddc70…1dde04 Dummy {f00=0x0097, f01=0x0190, f02=»UPTED PROGRAM VIA RETUR8. j P* " @ P* AN ENTRYPOINT 'LKMDIS' IS ALSO INCLUDED IN THIS MODULE. , D P* THIS PART IS DISPATCHED AFTER EACH LKM-REQUEST.(NO REGISTERS p H P* ON STACK) A CHECK IS MADE IF THERE IS A JOB IN DISPATCHER QUEUE 6 P*
0x1dde04…1ddf98 Dummy {f00=0x0097, f01=0x0190, f02=»PROGRAM VIA RETU14. d P* P* & > P* AN OPTIONALY ENTRYPOINT 'DISIOE' IS ALSO PROVIDED FOR 0 > P* ERRORS IN I/O DRIVERS. BIT 0 IS SET IN A1 AND THE SUB- r < P* ROUTINE 'TENDIO' IS CALLED BEFORE THE 'TDISP'-ENTRY P* IS ENTERED.
0x1ddf98…1de12c Dummy {f00=0x0097, f01=0x0190, f02=»*********** P* " P ENTRY TDISP DISPATCHER ENTRY & P ENTRY LKMDIS DISPATCHED AFTER LKM D " P ENTRY DISIOE I/O ERROR ENTRY n & P ENTRY DISEND END I/O AND DISPATCH < P ENTRY DISQUE POINTER TO FIRST PLACE IN DISPATCHER-QUEUE 6 P ENTRY GBQ
0x1de12c…1de2c0 Dummy {f00=0x0097, f01=0x0190, f02=» IN LSBT j * P ENTRY SACT POINTER TO ACTIVE SEGMENT P ENTRY LRUNEW > 8 P ENTRY LRUQUE POINTER TO FIRST SEGMENT IN LRU-STACK T . P ENTRY LDPEND LOAD PENDING.LDTASK IN PAUSE 8 P ENTRY RETU14 RESTORE REGISTER A14-A1 VIA A15 STACK P ENTRY RET
0x1de2c0…1de454 (1, 451) Dummy {f00=0x0097, f01=0x0190, f02=» P ENTRY RETUR6 P ENTRY RETUR5 P ENTRY RETUR4 4 P ENTRY RETUR3 J P ENTRY RETUR2 ` P ENTRY RETUR1 v P ENTRY RTNA15 0 P ENTRY UPDLRI SUBROUTINE TO UPDATE LRUQUEUE P ENTRY FREQUE P ENTRY BLOCKL P EJECT
0x1de454…1de5e8 Dummy {f00=0x0097, f01=0x0190, f02=» ENTRY DWTADR POINTER TO ADDRESS-BLOCK P ENTRY DWTTAB TTAB-ADDRESS . * P ENTRY DWTWAT WAIT ACTIVATE INDICATOR P P ENTRY DWTTQ TERMINAL QUEUE ~ P ENTRY DWTWA WORK AREA * P ENTRY DWTTDM DM REQUEST TTAB ADDRESS P ENTRY DWTVOL VOLUME NAME
0x1de5e8…1de77c Dummy {f00=0x0097, f01=0x0190, f02=»*********** P* P* DISPLACEMENT IN TTAB P* > " P EXTRN TTB:SS START OF SEGMENT H P EXTRN TTB:SP SGMENT POINTER n P EXTRN TTB:SA SAVE AREA P EXTRN TTB:ST STATUS P EXTRN TENDIO END I/O P EXTRN EXIT PROGRAM EXIT
0x1de77c…1de910 Dummy {f00=0x0097, f01=0x0190, f02=»BLK P EXTRN LDTASK P EXTRN TTABLD " P* 8 P************* B P* CONSTANTS * X P************* n P* P* 2 PCVTLSB EQU /9A START ADDRESS OF LOAD SEGM BLK & P FIRST WORD CONTAINS LSBT-LENGTH P EJECT P
0x1de910…1deaa4 Dummy {f00=0x0097, f01=0x0190, f02=»********************************* P* * P 4 " PDWTCHP EQU 0 CHANNEL PARAMETER < PDWTST EQU 2 STSTUS b PDWTECB EQU 4 ECB-ADDRESS | PDWTOR EQU 6 ORDER & PDWTADR EQU 8 ADDRESS BLOCK POINTER PDWTTAB EQU 10 TTAB-ADDRESS * PDWTWAT
0x1deaa4…1dec38 Dummy {f00=0x0097, f01=0x0190, f02=»ADDRESS r PDWTVOL EQU 44 VOLUME NAME P EJECT 2 P* @ " P****************************** J P* p P* ECB-DISPLACEMENTS z P* " P****************************** P* PECBBA EQU /02 PECBRL EQU /04 PECBEL EQU
0x1dec38…1dedcc Dummy {f00=0x0097, f01=0x0190, f02=»LACE IN DISPATCHER QUEUE z P* PDISQUE EQU * * P DATA 0 > P* N P* P R U N X & P* TTAB-ADDRESS OF RUNING PROGRAM l P* PPRUN EQU * P DATA 0 P* P* S R U N . P* POINTER TO RUNNING SEGMENT IN LSB-TA
0x1dedcc…1def60 Dummy {f00=0x0097, f01=0x0190, f02=» P DATA 0 P* G B Q U E 4 P* POINTER TO FIRST TASK TABLE IN BUFFER QUEUE * P* b PGBQUE EQU * l P DATA 0 PFREQUE DATA BLOK:S PBLOCKL DATA BLOCKE P* P* L R U Q U E H P* POINTER TO FIRST SEGMENT IN 'L
0x1def60…1df0f4 (1, 452) Dummy {f00=0x0098, f01=0x0190, f02=»AD PENDING. LDTASK IN 'PAUSE' PLDPEND DATA 0 & P* < P EJECT F P* T P* D I S I O E ^ P* v : P* SET BIT 0 IN ECB RETURN CODE AND GO TO TDISP-ENTRY P* PDISIOE EQU * " P LDKL A1,/8000 SET RETURN CODE P*
0x1df0f4…1df288 Dummy {f00=0x0098, f01=0x0190, f02=»ER ENTRY x P* PTDISP EQU * P INH . & P LD A1,18,A15 LOAD PSW FROM STACK : P SRL A1,10 GET LEVEL d P LD A5,DISQUE 2 P ABL(Z) SEGDIS NO QUEUE,RETURN THROUGH SEGDIS 4 P CC A1,TTB:ST+1,A5 AND COMPARE WITH QUEUED LEVEL < P ABL
0x1df288…1df41c Dummy {f00=0x0098, f01=0x0190, f02=» P STR A12,A15 P STR A13,A15 P STR A14,A15 , P LD A1,PRUN @ " P STR A1,A15 SAVE PRUN ON STACK T " P LD A1,SRUN SAVE SRUN ON STACK z P STR A1,A15 " P AND DISPATCH QUEUED PROGRAM P EJECT P* P* 2 P* DISPATCH
0x1df41c…1df5b0 Dummy {f00=0x0098, f01=0x0190, f02=» 0 P LDR* A1,A5 REMOVE JOB FROM DISPATCHER QUEUE P ST A1,DISQUE 8 * P LD A2,TTB:SA,A5 LOAD DISPATCH ADDRESS N " P LD A1,TTB:ST+1,A5 LOAD LEVEL | P SLL A1,10 P CWK A1,/C000 MONITOR JOB ? P RF(E) DIS200 YES P LD A6,TTB:SP,A5 SEGME
0x1df5b0…1df744 Dummy {f00=0x0098, f01=0x0190, f02=»5,UPDLRU UPDATE LRU QUEUE P EJECT " PDIS105 EQU * 0 & P STR A2,A15 STORE DISPATCH ADDRESS D " P STR A1,A15 AND LEVEL ON STACK n P LDR A3,A5 . P ADK A3,14 SET ADDRESS TO A1 IN SAVE AREA P LDK A1,14 SET COUNTER , PDIS110 LDR* A2,A3
0x1df744…1df8d8 Dummy {f00=0x0098, f01=0x018e, f02=»DDRES FOR DISPATCHED PROG. t 8 P ST A6,SRUN SET POINTER TO LSBT FOR RUNNING SEGMENT " . P START QUEUED PROGRAM (A1-A14 ON STACK) ^ P EJECT P* P* P* R E T U R P* @ P* ENTRYPOINTS RETU14-RETUR1 :RELOAD REGISTERS FROM
0x1df8d8…1dfa6c Dummy {f00=0x0098, f01=0x0190, f02=» PRETU11 LDR* A11,A15 PRETU10 LDR* A10,A15 PRETUR9 LDR* A9,A15 < PRETUR8 LDR* A8,A15 V PRETUR7 LDR* A7,A15 p PRETUR6 LDR* A6,A15 PRETUR5 LDR* A5,A15 PRETUR4 LDR* A4,A15 PRETUR3 LDR* A3,A15 PRETUR2 LDR* A2,A15
0x1dfa6c…1dfc00 Dummy {f00=0x0098, f01=0x0190, f02=» LDR* A1,A15 P RTN A15 P EJECT $ P* 2 P* < P* MONITOR JOB DISPATCHING F P* j PDIS200 EQU * t @ P LDKL A3,LKMDIS STORE ADDRESS TO BE DISPATCHED AFTER MONITOR P STR A3,A15 JOB ON STACK ( P STR A1,A15 STORE LEVEL 48 O
0x1dfc00…1dfd94 (1, 453) Dummy {f00=0x0098, f01=0x0190, f02=»LEVEL , P LD A1,TTB:SA+2,A5 LOAD PARAMETER IN A1 P STR A1,A15 AND SET ON STACK > , P CF A15,EXIT DO EXIT ON MONITOR JOB AND b P RB RETUR1 THEN START IT P EJECT P* P* P* L K M D I S P* 6 P* THIS PART IS D
0x1dfd94…1dff28 Dummy {f00=0x0098, f01=0x0190, f02=»A15 LOAD PSW FROM STACK P SRL A1,10 GET LEVEL P LD A5,DISQUE < " P RF(Z) DIS010 NO QUEUE,RETURN R 4 P CC A1,TTB:ST+1,A5 AND COMPARE WITH QUEUED LEVEL x & P RB(G) DIS100 DISPATCH FROM QUEUE PDIS010 EQU * P LDR* A6,A15 SRUN FROM STA
0x1dff28…1e00bc Dummy {f00=0x0098, f01=0x0190, f02=»DR* A10,A15 P LDR* A9,A15 P ST A5,PRUN ( P ST A6,SRUN < P EJECT P P* ^ P* SEGDIS h & P* LEVEL IN REG A1 SHIFTED RIGHT z P* ( PSEGDIS CWK A1,49 INTERRUPT ROUTINE? P RB(NG) RETUR8 YES RETURN P LD A6,SRUN
0x1e00bc…1e0250 Dummy {f00=0x0098, f01=0x018e, f02=»ND LOAD SEGMENT v P LD A2,20,A15 DISP ADRESS: P EJECT : P* H & P* UPDATE LRUSTACK AND TASK TABLE R P* | P CF A15,UPDLRU , P ST A2,20,A15 STORE NEW DISPATCH ADDRESS P RB RETUR8 P EJECT P* P* SAVE INTO TTAB
0x1e0250…1e03e4 Dummy {f00=0x0098, f01=0x0190, f02=» P ST A12,TTB:SA+24,A5 P ST A11,TTB:SA+22,A5 P ST A10,TTB:SA+20,A5 < P ST A9,TTB:SA+18,A5 X . P LDR A4,A5 SAVE A1-A8 FROM STACK INTO TTAB t P ADK A4,28 P LDK A3,8 PSEGNXT LDR* A1,A15 P STR A1,A4 P SUK A4,2 P
0x1e03e4…1e0578 Dummy {f00=0x0098, f01=0x0190, f02=»A,A5 P EJECT P* P* LOAD SEGMENT $ P* < P* F ( P* GET PARAMETER BLOCK AND FILL IN P . P* SEGMNT POINTER,DISPL AND TTAB-ADDRESS | P* PSEGLD EQU * , P LDR A3,A6 LOAD SEGMENT POINTER IN LSBT & P SU A2,TTB:S
0x1e0578…1e070c Dummy {f00=0x0098, f01=0x0190, f02=» BLOCK v P* > P* ACTIVATE LOAD TASK AND PUT IT IN THE DISPATCHER QUEUE P* Z P LDR A1,A4 LOAD PARAMETER d * P LDKL A2,LDTASK LOAD DISPATCH ADDRESS P LDKL A5,TTABLD P LDK A3,0 $ P CF A15,ACTOT ACTIVATE LOAD TASK P*
0x1e070c…1e08a0 Dummy {f00=0x0098, f01=0x0190, f02=»ATE TASK TABLE P* PUPDLRU EQU * P LD A7,2,A6 NEW LOAD ADDRESS 4 $ P LD A4,TTB:SS,A5 OLD SEG ADDRESS X & P ST A7,TTB:SS,A5 SAVE NEW ADDRESS P SUR A7,A4 ADRESS DIFFERENCE $ P ADR A2,A7 NEW DISPATCH ADDRESS ( P ST A2,TTB:SA,A5 S
0x1e08a0…1e0a34 (1, 454) Dummy {f00=0x0098, f01=0x0190, f02=»D A3,SACT P RF(E) LRUNDA & P CWR A3,A6 SAME AS ACTIVE SEGMENT? ( P RF(E) LRUNDA YES R P CF A15,LRUNEW NO l PLRUNDA EQU * " P LDKL A7,/2000 QUEUE INDICATOR " P ST A6,SACT SET ACTIVE POINTER P LDR A4,A7 P ANR* A7,A6
0x1e0a34…1e0bc8 Dummy {f00=0x0098, f01=0x0190, f02=»LST . P ST A7,-2,A3 UPDATE PRECEDENT OF SUCCEDENT PLRULST LDR A7,A7 > P RF(NZ) LRU100 V P ST A3,LRUQUE l P RF LRUMOD PLRU100 ST A3,2,A7 PLRUMOD CM 8,A6 P CM 10,A6 P RF LRUEND PLRUNEW EQU * P STR A7,A15
0x1e0bc8…1e0d5c Dummy {f00=0x0098, f01=0x0190, f02=»Z) NOPEND JMP IF NOT & P CM LDPEND CLEAR PENDING INDICATOR P LDR A3,A5 SAVE A5 F P LDKL A5,TTABLD ` $ P CF A15,QTJOB RESTART LOAD TASK x P LDR A5,A3 RESTORE A5 PNOPEND EQU * P ADK A7,10 P RF LRUUPD PLRUFOR ADK A7,8
0x1e0d5c…1e0ef0 Dummy {f00=0x0098, f01=0x40ae, f02=»DENT POINTER PLRUUPD ST A7,LRUQUE ! P LDKL A3,/2000 ! 0 P ORS A3,-10,A7 ! F P LDR* A7,A15 ! PLRUEND ADKL A15,2 ! p P LDR* P,A15 ! P END ! @ ! TORE A5 PNOPEND EQU * P ADK A7,10 P RF LRUUPD PLRUFOR ADK A7,8
0x1e0ef0…1e1084 Dummy {f00=0x0098, f01=0x2008, f02=» " p P* P* P END $@ 0K P* > P* H PLKMDIS EQU * R P INH f P LD A5,DISQUE r " P RF(Z) DIS010 NO QUEUE,RETURN & P LD A1,32,A15 LOAD PSW FROM STACK P SRL A1,10 GET LEVEL 4 P CC A1,TTABST+1,A5 A
0x1e1084…1e1218 Dummy {f00=0x0098, f01=0x0190, f02=» LD A1,DWTST,A6 GET STATUS R P LDR A3,A1 S " P ANK A1,1 S 4 $ P RF(Z) SEL110 NO PENDING STATUS S F P CF A5,TRRVI SEND RVI S n P XIF S P IFF STAT=1 S P RF SEL110 S P XIF S PSEL100 EQU * S P ABL BRM S PSEL110 EQU * S P IFF S
0x1e1218…1e13ac Dummy {f00=0x0098, f01=0x0190, f02=»L115 EQU * S P CF A5,TRWACK SEND WACK T P RB SEL100 T 2 PSEL120 EQU * T D , P CF A5,PRREC PREPARE FOR TEXT RECEPTION T X P CF A5,TRACK SEND ACK,0 T P RB SEL100 T P EJECT T P* T P* T P* PREPARE FOR TEXT RECEPTION T P* T
0x1e13ac…1e1540 Dummy {f00=0x0098, f01=0x0190, f02=»2 TRANSLATE STA TO EBCDIC T P XIF U " $ P ST A2,+4,A1 SAVE STA IN BUFFER U . P IM XSTA U V " P ST A6,FDWTIN STORE INPUT DWT U f P RTN A5 U P EJECT U P* U P* U $ P* GENERAL POLL HAS BEEN RECEIVED U P* U P* U PGPOLL EQU * U
0x1e1540…1e16d4 (1, 455) Opaque[0x194]
0x1e16d4…1e1868 # DirEnt {nam=»TIODM «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1318, f03=0x4441}
0x1e16d4…1e1868 IdxSect {
0x1e16d4…1e1868 f00 = 0x0098 // 0x1e16d4 @0x0
0x1e16d4…1e1868 f01 = 0x000c // 0x1e16d6 @0x2
0x1e16d4…1e1868 gno = [ // 0x1e16d8 @0x4
0x1e16d4…1e1868 [0x00]: C0x0098.0x3.0
0x1e16d4…1e1868 [0x01]: C0x0099.0x0.0
0x1e16d4…1e1868 [0x02]: C0x0099.0x1.0
0x1e16d4…1e1868 [0x03]: C0x0099.0x2.0
0x1e16d4…1e1868 [0x04]: C0x0099.0x3.0
0x1e16d4…1e1868 [0x05]: C0x009a.0x0.0
0x1e16d4…1e1868 ]
0x1e16d4…1e1868 }
0x1e1868…1e19fc Dummy {f00=0x0098, f01=0x0190, f02=» 0 P IDENT TIODM REL 8.2 78-09-15 870105040820 P 8 ( P ORDER SET LRN IMPLEMENTED + EA SR @ P REL 8.1 78-04-21 l P* 8 P**************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0
0x1e19fc…1e1b90 Dummy {f00=0x0098, f01=0x0190, f02=»****************************** z P* & B P* THIS MODULE IS ENTERED IN THE SAME WAY AS A DRIVER VIA TIO 0 . P* AND THE DWTADR IN FDB FOR CURRENT FILE v P* H P* THE DM REQUEST IS PROCESSED HERE UP TO THE POINT WHERE A SECTOR $ P* FROM A
0x1e1b90…1e1d24 Dummy {f00=0x0098, f01=0x0190, f02=»A6 = FDB ADDRESS P* A7 = ORDER P* A8 = ECB ADDRESS 6 P* Z P* USED REGISTERS A1 - A10 d P* D P* BEFORE EXIT A DMTASK IS ACTIVATED WITH THE FDB ADDRESS IN A1 P* AS THE ONLY PARAMETER P* 4 P*
0x1e1d24…1e1eb8 Dummy {f00=0x0098, f01=0x0190, f02=»FDBTNR TASK NUMBER FOR CALLING TASK . P* FDBCEX CURRENT EXTENT BLOCK POINTER . P* ` P* j D P* IF AN ERROR CONDITION IS DETECTED THE ERROR RETURN WILL BE: t P* LDKL A1,/<RETURN CODE> P* ABL DISEND P* P*
0x1e1eb8…1e204c Dummy {f00=0x0098, f01=0x0190, f02=»ADR r P ENTRY FDBLNK P ENTRY FDBECB " P ENTRY FDBSNR 8 P ENTRY FDBRRO N P ENTRY FDBRLE d P ENTRY FDBBLF z P ENTRY FDBTNR P ENTRY FDBVTO P ENTRY FDBCEX P ENTRY FDBEXT P ENTRY EXTDMI P ENTRY EXT
0x1e204c…1e21e0 Dummy {f00=0x0098, f01=0x0190, f02=»IA,FDBADF j & P ENTRY FDBAI1,CRNTID,CRNCDF,CRNCIF P ENTRY FDBMRN,FDBDBR,FDBMRO < P ENTRY ECBFC ` P ENTRY TCFILE,COFILE t P EJECT P* P***************** P* EXTERNALS * P***************** P* P*
0x1e21e0…1e2374 (1, 456) Dummy {f00=0x0099, f01=0x018e, f02=»WTECB P EXTRN DWTOR P EXTRN DWTTDM " " P EXTRN DMTGCA GET CRN ADDRESS 8 , P EXTRN DMTGEA GET EA WORD ADDR AND MASK ^ P EXTRN DMTASK P EXTRN CALSNO P EXTRN ECBBA P EXTRN ECBRL P EXTRN ECBEL P EXTRN ECBRC
0x1e2374…1e2508 Dummy {f00=0x0099, f01=0x0190, f02=» P* P************************ P* CONDITIONAL ASSEMBLY * . P************************ N P* n P* x @ P* A VERSION CONTAINING INDEXED REQUEST ORDERS IS OBTAINED P* BY SETTING INDXAC EQU 1 * P* INDXAC EQU 0 OT
0x1e2508…1e269c Dummy {f00=0x0099, f01=0x0190, f02=» MONCON P EJECT P* P************************ ( P* DATA DEFINITIONS * H P************************ h P* P* P DATA 0,0 4 WORDS P DATA 0,0 " PTIOD14 EQU *-2 TIODM A14 STACK P* P* & PTIODMF
0x1e269c…1e2830 Dummy {f00=0x0099, f01=0x0190, f02=»NDEXED READ NEXT P DATA IXINS INDEXED INSERT P DATA IXDEL INDEXED DELETE : P DATA IXREWR INDEXED REWRITE $ P DATA IXRARE INDEXED RANDOM READ P XIF P IFF INDXAC=1 P DATA TIODME P DATA TIODME P DATA TIODME P D
0x1e2830…1e29c4 Dummy {f00=0x0099, f01=0x018e, f02=»NDOM READ * P DATA RELXAC RELEASE EXCLUSIVE ACCESS $ P DATA SEQWRITE SEQUENTIAL WRITE @ " P DATA SEQREAD SEQUENTIAL READ h P DATA GETCUR GET CURRENCY P IFT INDXAC=1 $ P DATA INSIXR INSERT INDEX RECORD $ P DATA DELIXR DELETE INDEX
0x1e29c4…1e2b58 Dummy {f00=0x0099, f01=0x0190, f02=» l & P DATA RANWRD DELAYED RANDOM WRITE & P DATA RANDLD DELAYED RANDOM DELETE 2 $ P DATA RANREB RAND READ REL BUFF P DATA SETLRN SET LRN P* P* PTIODMO EQU * DM ORDERS $ P DATA /221E CLOSE,IND READ NEXT & P DATA /1D1C IN
0x1e2b58…1e2cec Dummy {f00=0x0099, f01=0x0190, f02=»EAD, REL EXCL ACC ~ & P DATA /0807 SPEC. WR. , SPEC. WR. & P DATA /0605 SEQ WR. , BASIC WRITE D $ P DATA /0302 READ VTOC, SEQ READ n ( P DATA /0123 BASIC READ,GET CURRENCY * P DATA /1F20 INS INDEXREC,DEL INDEXREC . P DATA /240D GET CURR IND
0x1e2cec…1e2e80 Dummy {f00=0x0099, f01=0x0190, f02=»NDEX TABLE | P DATA /0004 P DATA /0608 & P DATA /0A0C : P DATA /0E10 N P DATA /1214 b P DATA /1616 v P DATA /1616 P DATA /0218 P DATA /181A P DATA /1C1E P DATA /2022 P DATA /2426 P DATA
0x1e2e80…1e3014 (1, 457) Dummy {f00=0x0099, f01=0x0190, f02=»FSET DEFINITIONS P* " PFDBLNK EQU 0 LINK TO NEXT FDB " PFDBECB EQU 18 ECB START H PFDBSNR EQU 32 SECTOR NUMBER h ( PFDBRRO EQU 34 RELATIVE RECORD OFFSET PFDBRLE EQU 36 RECORD LENGTH " PFDBBLF EQU 38 BLOCKING FACTOR * PFDBTNR
0x1e3014…1e31a8 Dummy {f00=0x0099, f01=0x018e, f02=» 44 FIRST EXTENT BLOCK START PEXTDMI EQU 0 DMTAST IDENT $ PEXTFC EQU 1 VOLUME FILE CODE F PEXTLEN EQU 2 EXTENT LENGTH j PEXTBAS EQU 4 EXTENT BASE " PEXTELE EQU 6 EXT ENTRY LENGTH $ PFDBLRN EQU 69 LAST RECORD NUMBER $ PFDBNIF EQU 68
0x1e31a8…1e333c Dummy {f00=0x0099, f01=0x0190, f02=» h * PFDBMIA EQU 78 ADDRESS OF MASTER INDEX * PFDBADF EQU 80 ADDRESS OF DATA FILE FDB 6 , PFDBAI1 EQU 82 ADDRESS OF INDEX FILE FDB d 2 PFDBDBR EQU 90 DELAY,BASIC AND REL BUFFER FLAGS & PFDBMRN EQU 91 LAST REC NR IN FILE PFDBMRO EQU 94 MAX FD
0x1e333c…1e34d0 Dummy {f00=0x0099, f01=0x0190, f02=» $ PCRNCIF EQU 8 CURRENT INDEX FILE P EJECT , P* : P************* D P* TIODM * Z P************* p P* P* & PTIODM DATA *+2 TIODM START ADDRESS P* P* SET UP A14 STACK P* P LDKL A14,TIOD14
0x1e34d0…1e3664 Dummy {f00=0x0099, f01=0x0190, f02=» P LD A3,2,A1 P CW A3,DWTTDM,A6 P RF(E) TIOD10 THIS TASK 4 P ADK A2,2 NO T P RB TIOD05 TRY NEXT h PTIOD10 EQU * P LD A1,2,A3 TASK STATUS P RF(N) TIO13 DMTASK CALLING P* P* SET TASK ID FOR ALL FDBS
0x1e3664…1e37f8 Dummy {f00=0x0099, f01=0x0190, f02=»TIO11 EQU * P SUK A3,2 P RF(N) TIO13 ALL FDB READY & P LDR* A5,A1 FDB ADDR H P RF(E) TIO12 NO FDB d P SC A2,FDBTNR,A5 TASK ID " P ORS A4,DWTST,A5 REQ BUSY BIT PTIO12 EQU * P ADK A1,2 NEXT FDB ADDR P RB TIO11
0x1e37f8…1e398c Dummy {f00=0x0099, f01=0x018e, f02=»WTOR RIGHT BYTE x P* P LDKL A1,/8000 REQUEST ERROR " & P LDK A2,NOOFOR-1 NO OF ORDERS - 1 F 2 PTIOD15 CC A7,TIODMO,A2 START AT END OF TIODMO p P RF(E) TIOD20 MATCH P SUK A2,1 P RB(NN) TIOD15 >= 0 P ABL TIODME ERROR RETURN
0x1e398c…1e3b20 Dummy {f00=0x0099, f01=0x0190, f02=» P EJECT P* $ PDELIXR EQU * DELETE INDEX RECORD P* D $ PINSIXR EQU * INSERT INDEX RECORD N P* v $ PIXRARE EQU * INDEXED RANDOM READ P LDKL A4,-1 P RF TIOC10 P* " PREVTOC EQU * READ VTOC RECORD P* P
0x1e3b20…1e3cb4 (1, 458) Dummy {f00=0x0099, f01=0x0190, f02=»DBSNR,A6 SECTOR #0 VOLUME LABLE P* ( ( P* LET FDBCEX POINT TO FIRST EXTENT 2 P* ^ P LDR A4,A6 h P ADKL A4,FDBEXT z P ST A4,FDBCEX,A6 P ABL TIOD68 ACTIVATE DMTASK P EJECT P* * PRELXAC EQU * RELEASE EXCLUSIVE ACC
0x1e3cb4…1e3e48 Dummy {f00=0x0099, f01=0x0190, f02=»DK A1,0 CORRECT RETURN P ABL TIODME P EJECT 2 ( PSETLRN EQU * SET LAST RECORD NUMBER @ P LC A1,ECBCW+3,A8 l P SC A1,FDBLRN,A6 P LD A1,ECBCW,A8 P ST A1,FDBLRN+1,A6 P RB REL090 P EJECT , PGETCUR LDK A7,CRNCDF+1 G
0x1e3e48…1e3fdc Dummy {f00=0x0099, f01=0x0190, f02=»NGET GET CRN BUFFER P ADR A7,A2 ADDR CURR REC NO P LDK A2,0 @ P LC A3,-1,A7 FILE CODE R P CC A3,ECBFC,A8 p P RF(E) GET020 SAME FILE CODE P SC A2,ECBCW+3,A8 P RF GET030 PGET020 EQU * P LCR A2,A7 P SC A2,ECB
0x1e3fdc…1e4170 Dummy {f00=0x0099, f01=0x0190, f02=»ENTIAL READ ~ P* $ P* FIND CRN+1 AND TEST IF > LRN P* F P LDR A1,A6 FDB ADDR P " P CF A14,CRNGET GET CRN-BUFFER l P LDK A1,0 P LC A1,CRNCDF+1,A2 & P LD A2,CRNCDF+2,A2 CURR LOG REC NO P ADK A2,1 CRN+1 P RF(O) S
0x1e4170…1e4304 Dummy {f00=0x0099, f01=0x0190, f02=» * P SC A1,ECBCW+3,A8 REC NO P ST A2,ECBCW,A8 * P* B $ P* CONTINUE AS FOR RANDOM READ L P* t P EJECT ~ PRANREAD EQU * RANDOM READ P* $ PRANREB EQU * RAND READ REL BUFF P* P* TEST IF ECBRL <= 0 P
0x1e4304…1e4498 Dummy {f00=0x0099, f01=0x0190, f02=» * P RF(NP) TIODME ERROR RETURN IF RL <= 0 P* 6 * P* EA MUST NOT BE SET FOR OTHER TASK @ P* n P LDR A1,A6 FDB ADDR x P CF A14,EATEST P LDR A4,A4 RTN INF P RF(N) TIODPE EA OTHER TASK P RF TIODMA P EJECT P
0x1e4498…1e462c Dummy {f00=0x0099, f01=0x0190, f02=» ECBCW h P* P* * P* CALCULATE NUMBER DOF SPARE RECORDS " P* P P LDR A5,A6 SAVE FDB ADDR Z P LDK A1,0 z P LC A1,FDBMRN,A6 LAST REC NR P LD A2,FDBMRN+1,A6 P LDK A6,0 P LC A6,FDBLRN,A5 P LD A7,FDBLRN+1,A5 L
0x1e462c…1e47c0 Dummy {f00=0x0099, f01=0x018e, f02=» ST A2,ECBEL,A8 NR OF SPARE P LDR A6,A5 FDB ADDRESS $ P LDK A1,0 B P LC A1,FDBLRN,A6 T P LD A2,FDBLRN+1,A6 LRN l P IFT INDXAC=1 P RF IXR020 STORE LOG REC NO P EJECT $ PIXRDNX EQU * INDEXED EREAD NEXT P* P*
0x1e47c0…1e4954 (1, 459) Dummy {f00=0x0099, f01=0x0190, f02=» P LDK A2,0 P* " P* CHECK THAT FILE CODE IS OK $ P* J P LDR* A5,A8 FILE CODE T P CC A5,CRNCIF,A4 r . P RF(NE) IXR020 OTHER INDEX FILE IS CURRENT P LC A1,CRNCIF+1,A4 " P LD A2,CRNCIF+2,A4 LOG REC NO PIXR020 EQU *
0x1e4954…1e4ae8 Dummy {f00=0x0099, f01=0x018e, f02=»DK A1,1 ADK CARRY PIXR040 EQU * P SC A1,ECBCW+3,A8 REC NO . P ST A2,ECBCW,A8 N * P RF TIOD25 DO NOT CHECK EOF CONDITION f P EJECT P* PIXREWR EQU * INDEXED REWRITE P* PIXDEL EQU * INDEXED DELETE P* PRA
0x1e4ae8…1e4c7c Dummy {f00=0x0099, f01=0x0190, f02=» P* PRANDEL EQU * RANDOM DELETE P* 0 P* NO SPECIAL PROCESSING : P* P EJECT f P* t P************************* ~ P* DMTASK ACTIVATION * P************************* P* PTIODMA EQU * P*
0x1e4c7c…1e4e10 Dummy {f00=0x0099, f01=0x0190, f02=»LRN,A6 MOST SIGN PART P RF(L) TIOD25 CRN<LRN ! P RF(G) TIOD23 CRN>LRN ! < P CW A2,FDBLRN+1,A6 2 PART ! Z P RF(NG) TIOD25 CRN <= LRN ! | PTIOD23 EQU * ! P LDKL A3,/1000 END OF FILE ! P ORS A3,ECBRC,A8 ! P ANK A7,/3F ! P SUKL A7
0x1e4e10…1e4fa4 Dummy {f00=0x0099, f01=0x0190, f02=» AND OFFSET IN SECTOR ! t P LDR A1,A1 RETURN INF " P RF(NZ) TIODME " < P EJECT " R P* " ` . P* ACTIVATE DMTASK WITH FDB ADDRESS IN A1 " j P* " PTIOD68 EQU * " P ENB " P ENB " P INH " P LDR A1,A6 FDB ADDRESS " P LDK A7,0 "
0x1e4fa4…1e5138 Dummy {f00=0x0099, f01=0x0190, f02=» TTAB FOUND " " P HLT DMTASK MISSING IN TCTAB # * PTIOD70 LDKL A2,DMTASK DISPATCH ADDRESS # : P LDK A3,0 # h " P CF A15,ACTOT ACTIVATE DMTASK # z P* # P* EXIT TO TDISP # P* # P ABL TDISP # P* # P EJECT # P* # P******
0x1e5138…1e52cc Dummy {f00=0x0099, f01=0x40e4, f02=»CHER # N P* $ PTIODPE EQU * $ P LDKL A1,/2000 PROTECT ERROR $ * PTIODME EQU * $ N P* A1 = ERROR CODE $ b P* A6 = FDB ADDRESS $ ~ , P ABL DISEND CALL TENDIO GOTO DISPATCHER $ P* $ P END $ @ $ P EJECT # P* # P******
0x1e52cc…1e5460 Dummy {f00=0x0099, f01=0x2008, f02=» %
0x1e5460…1e55f4 (1, 460) Dummy {f00=0x009a, f01=0x0190, f02=» t P* P* P IFF LOGG=0 PLOGSST ST A2,SAVE2 0 P ORKL A2,/F000 J P RF LOG10 ` PLOGOUT ST A2,SAVE2 r P ORKL A2,/0F00 P RF LOG10 PLOGIN CWK A2,/FF P RF(E) LOGE10 P ST A2,SAVE2 PLOG10 ST A3,SAVE3
0x1e55f4…1e5788 Dummy {f00=0x009a, f01=0x0190, f02=»GEXI ST A3,LOGPNT P LD A2,SAVE2 P LD A3,SAVE3 . PLOGE10 RTN A5 B P EJECT X P* f P* p PLOGPNT DATA LOGSTA z PLOGSTA EQU * P RES 300 PLOGEND EQU *-4 PSAVE2 DATA 0 PSAVE3 DATA 0 P XIF P*
0x1e5788…1e591c Dummy {f00=0x009a, f01=0x0190, f02=» L I N C O L P* : P* CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER P* ^ > P********************************************************** h P PLINCOL EQU * " P LDR A2,A3 COPY CURSOR ADDRESS P SRL A2,6 P ANK A2,X'
0x1e591c…1e5ab0 Dummy {f00=0x009a, f01=0x0190, f02=» ( P LC A2,LICO:T,A2 ASCII COLUMN NUMBER $ P CF A5,WRITEP SEND COLUMN NUMBER 0 P RTN A5 RETURN X P* n P* x P* P EJECT P P PLICO:T EQU * * P DATA /2041,/4243,/4445,/4647 /00-/07 * P DATA /4849,/5B2E,/3C28,/2B2
0x1e5ab0…1e5c44 Dummy {f00=0x009a, f01=0x018e, f02=»758 /20-/27 v * P DATA /595A,/7C2C,/255F,/3E3F /28-/2F ( P DATA /3031,/3233,/3435,/3637 /30-37 B ( P DATA /3839,/3A23,/4027,/3D22 /38-3F n P XIF P EJECT P PDC:IN DATA DC:TAB+2 PDCTAB DATA DC:TAB " PDC:TAB DATA 2 LENGTH O
0x1e5c44…1e5dd8 Dummy {f00=0x009a, f01=0x401e, f02=» P* P END @ A,/7C2C,/255F,/3E3F /28-/2F ( P DATA /3031,/3233,/3435,/3637 /30-37 B ( P DATA /3839,/3A23,/4027,/3D22 /38-3F n P XIF P EJECT P PDC:IN DATA DC:TAB+2 PDCTAB DATA DC:TAB " PDC:TAB DATA 2 LENGTH O
0x1e5dd8…1e5f6c Dummy {f00=0x009a, f01=0x2008, f02=» H P X ` h p x
0x1e5f6c…1e6100 Dummy {f00=0x009a, f01=0x401e, f02=» ` 7 @ v {P t H D ! P Q P P %T 3W ;P AT GT cP iT* {T P 0 H D ! U # + B / 7 B ; ? W t | H D !y% YP _ p g t m s | Q P -Q 3P ? [Q* aP i uR
0x1e6100…1e6294 (1, 461) Opaque[0x194]
0x1e6294…1e6428 # DirEnt {nam=»DMTASK«, typ=»SC«, f00=0x3039, f01=0x3131, f02=0x1348, f03=0x2020}
0x1e6294…1e6428 IdxSect {
0x1e6294…1e6428 f00 = 0x009a // 0x1e6294 @0x0
0x1e6294…1e6428 f01 = 0x0022 // 0x1e6296 @0x2
0x1e6294…1e6428 gno = [ // 0x1e6298 @0x4
0x1e6294…1e6428 [0x00]: C0x009a.0x1.0
0x1e6294…1e6428 [0x01]: C0x009a.0x2.0
0x1e6294…1e6428 [0x02]: C0x009a.0x3.0
0x1e6294…1e6428 [0x03]: C0x009b.0x0.0
0x1e6294…1e6428 [0x04]: C0x009b.0x1.0
0x1e6294…1e6428 [0x05]: C0x009b.0x2.0
0x1e6294…1e6428 [0x06]: C0x009b.0x3.0
0x1e6294…1e6428 [0x07]: C0x009c.0x0.0
0x1e6294…1e6428 [0x08]: C0x009c.0x1.0
0x1e6294…1e6428 [0x09]: C0x009c.0x2.0
0x1e6294…1e6428 [0x0a]: C0x009c.0x3.0
0x1e6294…1e6428 [0x0b]: C0x009d.0x0.0
0x1e6294…1e6428 [0x0c]: C0x009d.0x1.0
0x1e6294…1e6428 [0x0d]: C0x009d.0x2.0
0x1e6294…1e6428 [0x0e]: C0x009d.0x3.0
0x1e6294…1e6428 [0x0f]: C0x009e.0x0.0
0x1e6294…1e6428 [0x10]: C0x009e.0x1.0
0x1e6294…1e6428 ]
0x1e6294…1e6428 }
0x1e6428…1e65bc Dummy {f00=0x009a, f01=0x0190, f02=» 2 P IDENT DMTASK REL 8.2 78-09-15 870105040820 P : P BUF. HANDL. L. 1614 B " P REQ ERR HANDL L. 1351,1488 ` P REL 8.1 78-04-21 P* 8 P**************************************************** P* $ P* PHILIPS TERMINAL S
0x1e65bc…1e6750 Dummy {f00=0x009a, f01=0x018e, f02=» 8 P**************************************************** P* @ , P* THIS MODULE IS ACTIVATED FROM TIODM. J P* z P* INPUT PARAMETERS: P* A1 = FDB ADDRESS < P* A2 = TID TASK IDENT OF DMTASK AT PRESENT NOT USED P* H P
0x1e6750…1e68e4 Dummy {f00=0x009a, f01=0x0190, f02=» F P* IS ALREADY PRESENT IN A BUFFER. IF SO THE BUFFER STATUS IS SET D P* TO USED AND ACTIONS ACCORDING TO THE ORDER ARE TAKEN. IF NOT N : P* THE SECTOR MUST FIRST BE READ INTO A FREE BUFFER. P* H P* ALL I/O LKM REQUESTS IN THIS MODULE AR
0x1e68e4…1e6a78 Dummy {f00=0x009a, f01=0x0190, f02=» & P* ALL I/O ARE MADE IN WAIT MODE P* . D P* BY MEANS OF CONDITIONAL ASSEMBLY THE EXCLUSIVE ACCESS CHECK 8 6 P* FOR INDEXED DELETE AND FOR INDEXED REWRITE AND < P* FOR RANDOM WRITE AND RANDOM DELETE CAN BE EXCLUDED. P* 2 P*
0x1e6a78…1e6c0c Dummy {f00=0x009a, f01=0x0190, f02=»******* P* ENTRIES * P*************** ( P* @ P* J P ENTRY DMTASK T & P ENTRY SQR EXTERNAL CODE SEQ READ j P ENTRY QSW P ENTRY QIRN,QIRR P ENTRY DMTWM P EJECT P* P***************** P*
0x1e6c0c…1e6da0 Dummy {f00=0x009a, f01=0x018e, f02=» P EXTRN TENDIO P EXTRN RTNA15 P EXTRN FDBECB 4 P EXTRN FDBSNR J P EXTRN FDBRRO ` P EXTRN FDBRLE v P EXTRN FDBBLF P EXTRN FDBTNR P EXTRN FDBVTO P EXTRN FDBCEX P EXTRN FDBEXT P EXTRN EXTDMI
0x1e6da0…1e6f34 (1, 462) Dummy {f00=0x009a, f01=0x0190, f02=» P EXTRN FDBEAL P EXTRN FDBADF P EXTRN FDBAI1 0 P EXTRN FDBCRL F P EXTRN FDBDBR,FDBMRN,FDBMRO P EXTRN ECBFC P EXTRN ECBBA P EXTRN ECBRL P EXTRN ECBEL P EXTRN ECBRC P EXTRN ECBCW P EXTRN CLRBUF
0x1e6f34…1e70c8 Dummy {f00=0x009a, f01=0x0190, f02=»XTRN CURBUF P EXTRN DWTECB P EXTRN DWTOR * P EXTRN DWTST,DWTTDM,DWTTQ > ( P EXTRN DMTRBU RELEASE A DISC BUFFER ` P EXTRN VTLRN P EXTRN VLVBA P EXTRN VLVRL P EXTRN DMTIOT,DIVMOD P EXTRN MPYMOD,CHKKEY P EXTRN C
0x1e70c8…1e725c Dummy {f00=0x009a, f01=0x0190, f02=» EXTRN CRNCIF,CRNCDF,CRNQUE P EXTRN MXIND $ P EXTRN FDBKA,FDBNIF,RDNXTR 8 . P EXTRN BUFAR1,BUFAR2,SECTLE,DMTIOZ,CRNUPD Z P EJECT P* P* P* P************************ P* CONDITIONAL ASSEMBLY * P****************
0x1e725c…1e73f0 Dummy {f00=0x009a, f01=0x0190, f02=»0. ^ P* P* PX:A EQU 1 PX:B EQU 0 0 PX:C EQU 0 B PX:D EQU 1 T PX:E EQU 0 f P* x PQNOEXA EQU X:A 6 P* INDEXED ACCEXSS FUNCTIONS CAN BE OMITTED WITH , P* INDXAC EQU 1 = INDEX ACCESS INCLUDED 6 P* IN
0x1e73f0…1e7584 Dummy {f00=0x009a, f01=0x0190, f02=» EQU X:D FLEXIBLE DISC INCLUDED WHEN EQU 1 0 PINSLAS EQU X:E INSERT SAME KEY LAST WHEN = 1 2 P EJECT f P* t P************************ ~ P* DATA DEFINITIONS * P************************ P* P* , PEABIT EQU /20 EA-BIT I
0x1e7584…1e7718 Dummy {f00=0x009a, f01=0x0190, f02=»LATIVE ` & P* POSITION IN TIODM-TABLE TIODMF P* 8 PQCL EQU 0 B PDMTAFU DATA DMCLOSE CLOSE T PQRV EQU 2 v " P DATA DMREVT READ VTOC RECORD PQIRN EQU 4 P IFT INDXAC=1 " P DATA DMIRN INDEXED READ NEXT PQINS EQU 6
0x1e7718…1e78ac Dummy {f00=0x009a, f01=0x0190, f02=»ITE x $ P DATA DMIRR INDEXED RANDOM RESAD P XIF 4 PQIRR EQU 12 @ P IFF INDXAC=1 T , P DATA DMTERR,DMTERR,DMTERR,DMTERR,DMTERR j P XIF PQRD EQU 14 P DATA DMRDDE RANDOM DELETE PQRW EQU 16 P DATA DMRDWR RANDOM WRITE
0x1e78ac…1e7a40 Dummy {f00=0x009a, f01=0x0190, f02=» " P DATA DMSQWR SEQUENTIAL WRITE * PSQR EQU 2 EXTERNAL ORDER CODE SEQ READ * PQSR EQU 24 X P DATA DMSQRE SEQUENTIAL READ j PQGCUR EQU 26 P DATA DMTERR GET CURRENCY P IFT INDXAC=1 PQINIX EQU 28 P DATA DMINIX INSERT INDEX
0x1e7a40…1e7bd4 (1, 463) Dummy {f00=0x009a, f01=0x0190, f02=»QGCURX EQU 32 " P DATA DMTERR GET CURRENT INDEX PQRWD EQU 34 < & P DATA DMRDWD DELAYED RANDOM WRITE P PQRDD EQU 36 z & P DATA DMRDDD DELAYED RANDOM DELETE PQRRRB EQU 38 $ P DATA DMRRRB RAND READ REL BUFF P* $ PVTOCRL DAT
0x1e7bd4…1e7d68 Dummy {f00=0x009a, f01=0x018e, f02=»TRY DMTFRL FIND RECORD LENGTH P* * 4 P* INPUT A1 = RETURN CODE IF INCORRECT LENGTH 4 P* A6 = FDB ADDRESS l & P* A9 = USER ECB ADDRESS P* . P* OUTPUT A2 = RECORD LENGTH TO BE USED < P* A1 IS
0x1e7d68…1e7efc Dummy {f00=0x009a, f01=0x0190, f02=» ~ P CW A2,FDBRLE,A6 $ P RF(E) DMTF20 ECBRL = REC LENGTH $ P RF(L) DMTF10 ECBRL < REC LENGTH H ( P LD A2,FDBRLE,A6 ECBRL > REC LENGTH p P RF DMTF20 * PDMTF10 ORS A1,ECBRC,A9 SET RETURN CODE . PDMTF20 ST A2,ECBEL,A9 SET EFFECTIVE LENGTH
0x1e7efc…1e8090 Dummy {f00=0x009a, f01=0x0190, f02=»WORD MOVE | P* " P* INPUT A1 = FROM ADDRESS , P* A2 = NO OF BYTES TO BE MOVED B P* A3 = TO ADDRESS r P* $ P* A4 WILL BE DESTROYED P* P* PDMTWM EQU * P SUK A2,2 " P RF(N)
0x1e8090…1e8224 Dummy {f00=0x009a, f01=0x0190, f02=»2,/01 P RF(E) DMTW20 P LCR A4,A1 MOVE LAST CHAR $ P SCR A4,A3 F PDMTW20 RTN A14 X P EJECT n P* | P************* P* DMTBM * P************* P* " P* ENTRY DMTBM BYTE MOVE P* " P* IN
0x1e8224…1e83b8 Dummy {f00=0x009a, f01=0x0190, f02=» A4 WILL BE DESTROYED P* P* OUTPUT A3 = NEXT CHAR ( P* J P* T PDMTBM EQU * ^ P SUK A2,1 r " P RF(N) DMTB10 LAST BYTE MOVED P LCR A4,A1 P SCR A4,A3 P ADK A1,1 P ADK A3,1 P RB DMTBM PDMTB
0x1e83b8…1e854c Dummy {f00=0x009a, f01=0x0190, f02=»A2 P ADR A3,A2 PDMTB20 SUK A2,1 P RB(N) DMTB10 4 P SUK A1,1 J P SUK A3,1 P LCR A4,A1 n P SCR A4,A3 P RB DMTB20 P EJECT 8 P****DESCRIPTION************************************* P* : P* FNDFDB WILL
0x1e854c…1e86e0 Dummy {f00=0x009a, f01=0x0190, f02=»TAB ADDR $ P* A2 = FILE CODE TO SEARCH FOR 4 P* A5 NOT= 0 WHEN ONLY TTAB SHALL BE SEARCHED 8 P* p 8 P****EXIT PARAMETERS********************************* z P* P* A1 = UNCHANGED 2 P* A2 = FILE CODE. = 0 WHEN NO CODE IS FOUND
0x1e86e0…1e8874 (1, 464) Dummy {f00=0x009b, f01=0x0190, f02=» REGISTERS********************************** P* 4 P* A1-A5 > P* P : P****************************************************** Z P* " P* LOOK FOR FILE CODE IN TTAB P* PFNDFDB EQU * & P LD A3,TTB:TD,A1 LENGTH DEV DESCR
0x1e8874…1e8a08 Dummy {f00=0x009b, f01=0x0190, f02=»DR A4,A3 P CCR A2,A4 P RB(NE) FND030 " P SUK A4,1 8 P LDK A5,1 J " P RF FND080 CODE FOUND IN TTAB P* " P* SEARCH FILE CODE IN CDTAB P* PFND040 EQU * P LDR A5,A5 ( P RF(NZ) FND060 ONLY TTAB IS SEACHED
0x1e8a08…1e8b9c Dummy {f00=0x009b, f01=0x0190, f02=»3,A4 P CC A2,1,A3 P RB(NE) FND050 P AD A4,CDTAB 6 P RF FND080 CODE FOUND J PFND060 EQU * h P LDK A2,0 NO CODE | PFND080 EQU * P RTN A14 P EJECT P* P************** P* DMTREM * P**********
0x1e8b9c…1e8d30 Dummy {f00=0x009b, f01=0x018e, f02=»IN FDBRRO,A6 p $ P* BUFFER ADDRESS IN A5 * P* USER REC AREA IN ECBBA,A9 < $ P* RECORD LENGTH IN A2 j P* P* P* P* MOVE THE RECORD > P* IF (FROM) AND (TO) ADDRESSES BOTH EVEN THEN WORD MOVE
0x1e8d30…1e8ec4 Dummy {f00=0x009b, f01=0x0190, f02=» T : P* ELSE USE BYTE MOVE INSTRUCTIONS FOR THE WHOLE REC P* F PDMTREM EQU * P P LD A1,FDBRRO,A6 d P ADR A1,A5 FROM ADDRESS | P LDR A4,A1 P LD A3,ECBBA,A9 TO ADDRESS P XRR A4,A3 P ANK A4,/01 ( P RF(Z) DMT210 BOTH
0x1e8ec4…1e9058 Dummy {f00=0x009b, f01=0x0190, f02=» P RF(E) DMT220 BOTH EVEN P SUK A2,1 BOTH ODD $ P LCR A4,A1 > P SCR A4,A3 P P ADK A1,1 b P ADK A3,1 t " PDMT220 CF A14,DMTWM WORD MOVE PDMT225 EQU * P RTN A14 P EJECT P* P* SET UP A14 STACK P*
0x1e9058…1e91ec Dummy {f00=0x009b, f01=0x0190, f02=» DESCR p P ADKL A14,TTB:TD+32 STACK P ABL RTNA15 RET AND ENB 0 P EJECT P P* ^ P************** h P* DMTASK * ~ P************** P* P* PDMTASK EQU * P* P* SET UP A14 STACK P* P INH
0x1e91ec…1e9380 Dummy {f00=0x009b, f01=0x0190, f02=»FOR ORDERS XR,DX,IX (SEE TIODM) PDMT020 EQU * ( P LD A4,FDBDBR,A1 < P RF(NN) DMT025 NO DELAY T P ANKL A4,/C0FF t P LD A2,DWTOR,A1 P ANK A2,/3F P CWK A2,QCL P RF(E) DMT024 CLOSE P CWK A2,QRV P RF(E) DMT024
0x1e9380…1e9514 (1, 465) Dummy {f00=0x009b, f01=0x0190, f02=»R,A1 PDMT025 EQU * P LDR A8,A1 P ADKL A8,FDBECB ECB ADDR 2 $ P CF A14,GTBKBU GET BLOCK BUFFER R P LDR A2,A2 z $ P RF(NN) DMT080 BUFFER WAS BEFORE P* ( P* READ SECTOR INTO BUFFER AND EXIT P* P SUK A5,QCL P
0x1e9514…1e96a8 Dummy {f00=0x009b, f01=0x0190, f02=»T #1 v P LKM P DATA 3 EXIT P* , ( PDMT030 EQU * I/O WITH WAIT FOR CLOSE 6 P LDK A7,/91 b P LKM v P DATA 1 " P RF DMT050 CHECK RETURN CODES P EJECT P************** P* DMTAR1 * P************** P
0x1e96a8…1e983c Dummy {f00=0x009b, f01=0x0190, f02=»TA14 PDMT050 EQU * 4 P CF A14,DMTIOT CHECK RETURN CODES FROM DISC I/O P LDR A1,A1 X P ABL(NE) DMTERR j P LD A5,ECBBA,A8 P RF DMT090 0 PDMT080 EQU * ENTRY IF SECT ALREADY IN BUFFER P LDR A5,A3 P ADK A5,8 SKIP BUFFER
0x1e983c…1e99d0 Dummy {f00=0x009b, f01=0x0190, f02=»OR b P* ! P ADK A5,2 SKIP CYLID WORD ! P LD A7,DWTOR,A6 ! 6 P* A7 = INTERNAL ORDER CODE ! N P ANK A7,/3F ! r ( P ABI DMTAFU,A7 DMTASK FUNCTION TABLE ! P EJECT ! $ PDMRRRB EQU * RAND READ REL BUFF ! P* ! PDMSQRE EQU * SEQUENTIA
0x1e99d0…1e9b64 Dummy {f00=0x009b, f01=0x0190, f02=»A2,FDBRRO,A6 ! P AD A2,FDBRLE,A6 " P ADR A2,A5 " , P LDK A1,0 " > P CCR A1,A2 STATUS BYTE IN A1 " P P RF(NE) DMT200 USED " t P LDKL A1,/800 NO DATA " P ABL DMTERR " & PDMT200 LDK A1,/8 INCORRECT LENGTH " & P CF A14,DMTFRL A2 := RECORD
0x1e9b64…1e9cf8 Dummy {f00=0x009b, f01=0x0190, f02=»T " f P* # PDMT230 EQU * # P ABL DMT400 PUT CRN AND EA # ( P EJECT # J " PDMREVT EQU * READ VTOC RECORD # X P* # ~ PDMCLOSE EQU * CLOSE A FILE # P* # P LD A2,FDBSNR,A6 # ( P RF(NZ) DMT270 VTOC SECTOR IN BUFFER # P* # P* VO
0x1e9cf8…1e9e8c Dummy {f00=0x009b, f01=0x0190, f02=»S SECTOR INTO BUFFER # p P* $ P LDR A10,A6 SAVE FDB ADDR $ & P LDR A9,A8 SAVE ECB ADDR $ H P LD A3,VLVRL-2,A5 $ h P ST A3,VTOCRL $ ( P LDK A6,VTOBLK VTOC BLOCKING FACTIOR $ ( P LD A2,FDBVTO,A10 VTOC RECORD NUMBER $ P LDK A1,0 $ , P CF A1
0x1e9e8c…1ea020 Dummy {f00=0x009b, f01=0x0190, f02=»REST = 0 $ $ P ADK A3,1 RECORD IN NEXT SECTOR % P RF DMT250 % 8 . PDMT240 LDK A2,VTOBLK LAST RECORD IN SECTOR % J & PDMT250 AD A3,VLVBA-2,A5 VTOC BASE % | P ST A3,FDBSNR,A6 % P LDK A3,0 % PDMT255 SUK A2,1 % P RF(Z) DMT260 % P AD A3,VLV
0x1ea020…1ea1b4 (1, 466) Dummy {f00=0x009b, f01=0x0190, f02=» % P LD A3,ECBBA,A9 & P SUK A3,8 & " P CF A14,DMTRBU RELEASE BUFFER & 2 & P CF A14,CLRBUF CLEAR FREE BUFFERS & X P ENB ENB & P LDR A1,A6 FDB ADDR & P ABL DMT020 READ VTOC SECTOR & P EJECT & PDMT270 EQU * & P SUK A7,QRV & $
0x1ea1b4…1ea348 Dummy {f00=0x009b, f01=0x0190, f02=»ISC & r P AD A5,FDBRRO,A6 ' P LDK A2,0 ' $ P LC A2,FDBLRN,A6 ' 6 P SC A2,VTLRN,A5 ' N P LD A2,FDBLRN+1,A6 ' f P ST A2,VTLRN+1,A5 ' P* CLOSE FILE. WRITE VTOC ' P* ' P LDK A7,/95 ' P LKM ' P DATA 1 ' P* ' P LDR A1,
0x1ea348…1ea4dc Dummy {f00=0x009b, f01=0x0190, f02=» LD A1,DWTTDM,A6 TTAB ADDR ' P LDK A2,0 ( " P LC A2,ECBFC,A9 FILE CODE ( 4 " P LDK A5,0 TRY LOCAL AND GLOBAL ( V . P CF A14,FNDFDB GET ENTRY IN TTAB CDTADTAB ( | & P LDR A13,A5 LOCAL/GLOBAL INDICATOR ( P LDR A2,A2 ( P RF(NZ) DMT725 FC FOUND (
0x1ea4dc…1ea670 Dummy {f00=0x009b, f01=0x0190, f02=»RY ADDR ( v P LDR A12,A1 SAVE TTEAB ADDR ) 4 P LDKL A10,0 MARK THAT FDB NOT SHALL BE RELEASED ) 4 P EJECT ) l 0 P* CHECK IF THIS FDB ADDR IS USED ELEWHERE ) z P* ) P* SEARCH ALL TTABS ) P* ) P LD* A2,TCTAB ) PDMT730 EQU * ) P
0x1ea670…1ea804 Dummy {f00=0x009b, f01=0x0190, f02=» ID ) P RB(N) DMT730 MONOITOR TASK * P LD A3,TTB:TD,A1 * 0 ( P ADKL A1,TTB:TD+2 DEV DESCR TABLE +2 * H PDMT770 EQU * * t P SUK A3,4 * $ P RB(NP) DMT730 NOT IN THIS TTAB * P LDR A4,A1 * P ADR A4,A3 * P CWR* A5,A4 * P RB(NE) DMT770
0x1ea804…1ea998 Dummy {f00=0x009b, f01=0x0190, f02=»S ON THIS FDB * | P* + P* NOW SEARCH CDTAB + P* + < PDMT780 EQU * + F P LD* A4,CDTAB + Z PDMT790 EQU * + p P SUK A4,4 + . P RF(NP) DMT800 THIS FDB HAS NO OTHER USER + P LD A2,CDTAB + P ADR A2,A4 + P CW A5,2,A2 + P RB(NE
0x1ea998…1eab2c Dummy {f00=0x009b, f01=0x0190, f02=»SERS + r P EJECT , P* , P* NOW RELEASE THIS FDB , $ P* , D PDMT800 EQU * , N P* , b P* RELEASE EA-BUFFERS , l P* , . P LDKL A2,/8000 ALL EA-BUFFERS ARE RELEASED , P LDR A1,A6 FDB ADDR , P CF A14,EARELB , P* , P* RE
0x1eab2c…1eacc0 Dummy {f00=0x009b, f01=0x0190, f02=»F DMT830 , PDMT820 EQU * - P LDR A4,A5 BUFFER ADDRESS - $ PDMT830 EQU * - F & P RF(Z) DMT840 ALL BUFFER S REMOVED - Z $ P LDR* A5,A4 NEXT BUFFER ADDRESS - P* - P* RETIURN BUFFER TO POOL - P* - P INH - P LD A3,CRNQUE - P STR
0x1eacc0…1eae54 (1, 467) Dummy {f00=0x009b, f01=0x0190, f02=»CE CODES. WHEN LAST FILE IS CLOSED ON - ~ > P* A FLEXIBLE DISC UNIT, AN UNLOC IS MADE FOR THIS VOLUME . . P* . p P LDK A1,4 EXTENT COUNTER . z P LDR A5,A6 FDB ADDR . . P ADKL A5,FDBEXT+1 ZADDR OF FIRST VOL CODE . & P SUKL A5,EXTELE EXT LENGTH IN FD
0x1eae54…1eafe8 Dummy {f00=0x009b, f01=0x0190, f02=»THIS EXTENT . z P XIF / P IFT INDXAC=1 / P EJECT / 6 P* / D P* ALL EXTENTS CHECKED / N P* RELEASE MASRTER INDEX / n P* / P INH / & P LD A1,FDBMIA,A6 MASTER INDEX ADDR / P RF(Z) DMT894 NO MATER IX / P LD A5,MXIND LENTH /
0x1eafe8…1eb17c Dummy {f00=0x009b, f01=0x0190, f02=»XIND+2,A5 / P RB(NE) DMT885 0 P LD A4,MXIND,A5 0 ( & P RF(N) DMT890 PREVIOUS ENTRY USED 0 @ " P LD A4,MXIND+4,A5 NO OF WORDS 0 j P ANKL A4,/7FFF REMOV USE BIT 0 P ADS A4,MXIND,A5 NR OF WORDS 0 P* 0 P* MOVE UP REST OF MXIND 0 P* 0
0x1eb17c…1eb310 Dummy {f00=0x009b, f01=0x0190, f02=» P SUK A2,2 NO OF CHAR 1 P CF A14,DMTWM MOVE UOP 1 P RF DMT894 1 > PDMT890 EQU * 1 P P LDKL A4,/7FFF 1 d & P ANS A4,MXIND+4,A5 REMOVE USE BIT 1 z P XIF 1 P EJECT 1 PDMT894 EQU * 1 0 P LDKL A10,1 MARK THAT FDB SHALL BE RELEASED 1 PDM
0x1eb310…1eb4a4 Dummy {f00=0x009b, f01=0x0190, f02=» 1 ~ P* 2 * P* RELEASE DWT-QUEUQ IN THIS FDB-DWT 2 P* 2 @ P LDR A1,A6 FDBADDR 2 J $ P ADKL A1,DWTTQ ADDR QUEUE START 2 d P LDR* A5,A1 NEXT TTAB ADDR 2 P RF(Z) DMTA20 NO Q 2 P CMR A1 KILL ROOT 2 $ PDMTA10 LDR* A1,A5 NEXT IN QUEUE 2
0x1eb4a4…1eb638 Dummy {f00=0x009b, f01=0x0190, f02=»AB/CDATAB 2 | P* 3 P LDR A1,A12 TTAB ADDR 3 P LDK A2,0 3 : ( P LC A2,ECBFC,A9 FILE CODE USERT ECB 3 L & P LDR A5,A13 LOCAL/GLOBAL INDICATOR 3 x $ P CF A14,FNDFDB SEARCH TTAB CDTAB 3 P LDK A7,0 INDICATES A2 = 0 3 P IFT INDXAC=1 3 P LDR A
0x1eb638…1eb7cc Dummy {f00=0x009b, f01=0x0190, f02=»D A7,2,A4 NEXT FDB ADDR TO CLOSE 3 P LDK A1,2 4 ( P ADR A1,A6 FROM ADDR 4 : P LDK A3,2 4 V P ADR A3,A7 TO ADDR 4 h P LDK A2,12 NO OF BYTES 4 P CF A14,DMTWM MOVE DWT 4 P LD A3,DWTTDM,A6 4 P ST A3,DWTTDM,A7 MOVE 4 P CM FDBSNR,A7 SECTOR
0x1eb7cc…1eb960 Dummy {f00=0x009b, f01=0x0190, f02=» 4 x PDMTA30 EQU * 5 P XIF 5 P ENB ENB 5 ( P* 5 : P* RELEASE BUFFER 5 D P* 5 ^ P LD A3,ECBBA,A8 5 h P SUK A3,8 5 P CF A14,DMTRBU 5 P* 5 P* RELEASE FDB 5 P* 5 P LDR A10,A10 5 P RF(Z) DMTA40 NO RELEASE 5 P
0x1eb960…1ebaf4 (1, 468) Dummy {f00=0x009c, f01=0x0190, f02=» SUK A1,2 5 " P RF(N) DMTA70 ALL FDBS CHECKED 6 P LDR A2,A6 6 8 P ADR A2,A1 6 J $ P LD A3,FDBADF,A2 OTHER FDB ADDR 6 P RB(Z) DMTA50 6 P LDK A4,10 2*MAX NR OF FDBS 6 PDMTA60 SUK A4,2 6 0 P RB(N) DMTA50 ALL ADDR CHECKED IN OTHER FDB 6
0x1ebaf4…1ebc88 Dummy {f00=0x009c, f01=0x0190, f02=»SHALL BE RELEASED 6 f P* 7 P CM FDBADF,A5 7 $ P RB DMTA50 7 : P XIF 7 L P EJECT 7 X PDMTA70 EQU * 7 f P LDKL A3,/FFFE 7 z P INH INH 7 P ANRS A3,A6 SET FDB FREE 7 PDMTA40 EQU * 7 * P CF A14,CLRBUF REMOVE ALL FREE BUFFERS 7 P LDR
0x1ebc88…1ebe1c Dummy {f00=0x009c, f01=0x0190, f02=»IS NEXT AND ACTIVATE THAT 7 z P* 8 " P LDK A7,0 8 , " P LC A7,FDBEXT,A1 TASK 1ST EXT 8 > P ADKL A7,'D0' TASK ID 8 d P LKM 8 P DATA -4 8 P DATA DMTASK 8 P LKM 8 P DATA 3 EXIT 8 P XIF 8 P IFT FLXDSC=1 8 P EJECT 8 PDMT900
0x1ebe1c…1ebfb0 Dummy {f00=0x009c, f01=0x0190, f02=»CODE FLEXDOISC A5 = EXT ADDR 8 ~ P* A6 = FDB ADDR 9 ( 0 P* A8 = ECB ADDR A9 = DM ECB ADDR 9 B P* A10-A12 USED 9 v P* 9 & P ADKL A5,EXTELE EXT LENGTH IN FDB 9 P LCR A7,A5 VOLUME CODE 9 P ANK A7,/FF 9 P ABL(Z) DMT880 NO CO
0x1ebfb0…1ec144 Dummy {f00=0x009c, f01=0x0190, f02=»ISC 9 x P* : 6 P* IF SAME FLEXDISC AS LAST, DO NOT SCHECK AGAIN : P* : P P CCR A4,A5 : Z P ABL(E) DMT880 SAME : l P* : < P* NOW SEARCH ALL FDBS FOR THOIS FLEXIBLE DISC VOL CODE : P* : PDMT910 EQU * : P LCR A4,A5 SAVE VOL CODE
0x1ec144…1ec2d8 Dummy {f00=0x009c, f01=0x0190, f02=» EQU * : P ANKL A3,/FFFE FDB ADDR ; " P RF(Z) DMT980 ALL FDBS CHECKED ; 0 P LDR* A7,A3 ; V P ANK A7,1 ; j P RB(Z) DMT920 FREE ; | P CWR A6,A3 ; P RB(E) DMT920 CURRENT FDB ; P LDK A7,4 EXTENT COUNTER ; P LDR A2,A3 FDB ADDR ; P A
0x1ec2d8…1ec46c Dummy {f00=0x009c, f01=0x0190, f02=» RB(N) DMT920 ALL EXTENTS CHECKED ; P ADKL A2,EXTELE < * P CCR A4,A2 VOLUME CODE < B ( P ABL(E) DMT880 CODE USED. NO UNLOCK < ` P RB DMT930 NEXT EXTENT < P* < & P* ALL FSDBS CHECKED. MAKE UNLOAD < P* < PDMT980 EQU * < P ENB ENB <
0x1ec46c…1ec600 Dummy {f00=0x009c, f01=0x0190, f02=»DE < z P LDK A7,/B8 UNLOAD WAIT = P LKM = * P DATA 1 = 6 P LD A1,ECBRC,A8 = F P ANK A1,1 INOPER = ^ P ABL(NZ) DMTERR = v P ABL DMT880 CHECK NEXT EXT = P XIF = P EJECT = " PDMT500 EQU * READ VTOC RECORD = P* = " P LD A2,VTOCRL
0x1ec600…1ec794 (1, 469) Dummy {f00=0x009c, f01=0x018e, f02=»1,ECBRC,A9 SET RC BUT CONTINUE = , P LD A2,ECBRL,A9 MOVE WHAT USER TOLD YOU > & PDMT510 EQU * > V P ST A2,ECBEL,A9 > j P CF A14,DMTREM MOVE RECORD > PDMAEX EQU * > P ABL DMTAEX EXIT > P EJECT > " PDMSQWR EQU * SEQUENTIAL WRITE > P* >
0x1ec794…1ec928 Dummy {f00=0x009c, f01=0x0190, f02=» PDMDEL EQU * INDEXED DELETE ? P* ? & PDMIRW EQU * INDEXED REWRITE ? 0 P* ? T & PDMRDWD EQU * DELAYED RANDOM WRITE ? ^ P* ? & PDMRDDD EQU * DELAYED RANDOM DELETE ? P* ? P* TEST STATUS ? P LD A10,FDBRRO,A6 ? P AD A10,FDBRLE,A
0x1ec928…1ecabc Dummy {f00=0x009c, f01=0x0190, f02=» ANK A2,/FF ? P LD A3,ECBCW,A9 LOG REC NR @ P LDK A4,0 @ 6 P CCR A4,A10 @ H P RF(E) DMS010 FREE @ P IFT INDXAC=1 @ v P LDR A4,A7 @ P SUK A4,QINS @ P RF(E) DMEAER INDEXED INSERT @ P XIF @ P LDR A4,A7 @ P SUK A4,QSW @ P
0x1ecabc…1ecc50 Dummy {f00=0x009c, f01=0x0190, f02=»BIT @ " P RF(NZ) DMS020 EA=1, NO CHECK A P* EA MUST BE SET A 2 P* A L P CF A14,EATEST A V P LDR A4,A4 RTN CODE A l " P RF(NP) DMEAER NO EA THIS TASK A P XIF A P RF DMS100 A PDMS010 EQU * A P IFT INDXAC=1 A P LDR A4,A7 A P
0x1ecc50…1ecde4 Dummy {f00=0x009c, f01=0x0190, f02=» A PDMS020 EQU * B P CF A14,EATEST B P LDR A4,A4 RTN CODE B 2 P RF(N) DMEAER EA OTHER TASK B N PDMS100 EQU * B r P LDK A1,0 SET STATUS FREE B P IFT INDXAC=1 B P LDR A2,A7 B P SUK A2,QIRW B " P RF(E) CHK010 INDEXED REWRITE B
0x1ecde4…1ecf78 Dummy {f00=0x009c, f01=0x0190, f02=»DELETE B z P XIF C P LDR A2,A7 C P SUK A2,QRD C , P RF(E) DMT350 RANDOM DELETE C @ P LDR A2,A7 C d P SUK A2,QRDD C v ( P RF(E) DMT350 DELAYED RANDOM DELETE C P RF DMT310 RW,RWD,SW C P IFT INDXAC=1 C P EJECT C PCHK010 EQU * C F
0x1ecf78…1ed10c Dummy {f00=0x009c, f01=0x0190, f02=»YS IN FILE AND USER BUFFER C P* D " P LDR A1,A6 FDB ADDR D , P LDK A5,8 MAX 4 INDEX D H P SUR A12,A12 INDEX COUNTER D f PCHK040 EQU * D P SUK A5,2 D $ P RF(N) CHK100 ALL INDEX CHECKED D P LDR A2,A1 FDB ADD D P ADR A2,A5 D ( P LD A6
0x1ed10c…1ed2a0 Dummy {f00=0x009c, f01=0x0190, f02=»2,/3F ORDER INDEX D P SUK A2,QIRW E & P RB(NE) CHK040 NOT INDEXED REWRITE E . " P LD A2,FDBKA,A6 KEY START ADDR E X P LDR A3,A2 E ~ " P AD A2,ECBBA,A9 KEY IN BUFFER E P AD A3,FDBRRO,A1 E P ADR A3,A11 KEY IN FILE E P LDK A7,0 E " P LD A6,F
0x1ed2a0…1ed434 (1, 470) Dummy {f00=0x009c, f01=0x0190, f02=»GED CHECK NEXT E x P LDR A6,A1 FDB ADDR F P LDKL A1,/4000 KEY NOT FOUND F 2 P RF DMERR F V PCHK100 EQU * F h P LDR A6,A1 FDB ADDR F | P LD A7,DWTOR,A6 F P ANK A7,/3F ORDER INDEX F P LDK A2,0 F P LC A2,FDBNIF,A6 F P CWR A2,A12 F
0x1ed434…1ed5c8 Dummy {f00=0x009c, f01=0x0190, f02=»F DMERR F P XIF G $ PDMEAER LDKL A1,/2000 EA PROTECT G PDMERR ABL DMTERR G D P EJECT G P* G j P* MOVE RECORD G t P* G PDMT310 EQU * G P IFT INDXAC=1 G P LDR A2,A7 G P SUK A2,QDEL G " P ABL(E) DMXDEL INDEXED DELETE G
0x1ed5c8…1ed75c Dummy {f00=0x009c, f01=0x0190, f02=»BA,A9 FROM ADDRESS G P XRR A4,A1 H P ANK A4,/01 H , ( P RF(E) DMT320 BOTH ODD OR BOTH EVEN H @ & P CF A14,DMTBM ONE ODD AND ONE EVEN H l P RF DMT340 H P* H PDMT320 LDR A4,A3 H P ANK A4,/01 H P RF(E) DMT330 BOTH EVEN H P SUK A2,1
0x1ed75c…1ed8f0 Dummy {f00=0x009c, f01=0x0190, f02=»DMT340 EQU * H P* I P* SET STATUS USED I P* I : P LDK A1,/FF I D PDMT350 SCR A1,A10 I X P LD A3,FDBDBR,A6 I r P RF(NN) DMT394 NO DELAY I P LDR A2,A7 I P SUK A2,QSW I " P RF(E) DMT360 SEQUENTIAL WRITE I P LDR A2,A7 I P
0x1ed8f0…1eda84 Dummy {f00=0x009c, f01=0x0190, f02=» I $ P* WRITE IF LAST REC IN SECTOR J P* J 0 PDMT360 LD A4,FDBRRO,A6 J : P CW A4,FDBMRO,A6 J X " P RF(NE) DMT400 NOT LAST RECORD J p " PDMT390 LDK A7,/05 BASIC WRITE J P SLL A3,1 J P RF(N) DMT395 BASIC WANTED J $ PDMT394 LDK A7,/15 PHYSIC
0x1eda84…1edc18 Dummy {f00=0x009c, f01=0x0190, f02=» J l P LKM K P DATA -1 I/O AND ACTIVATION K " P DATA DMTAR2 DMTASK RESTART #2 K 8 P LKM K ^ P DATA 3 EXIT K j P EJECT K ~ P* K P************** K P* DMTAR2 * K P************** K P* K P* K , PDMTAR2 EQU * DMTASK RESTART
0x1edc18…1eddac Dummy {f00=0x009c, f01=0x0190, f02=»C I/O K x P LDR A1,A1 L P RF(NZ) DMTERR L P LDKL A1,/C0FF L 6 $ P ANS A1,FDBDBR,A6 RELEASE BUFFER L L PDMT400 EQU * L t " P LDR A1,A6 FDB ADDR DATA FILE L P LD A2,ECBCW+2,A9 L P ANK A2,/FF L P LD A3,ECBCW,A9 LOG REC NR L P LC A11,EC
0x1eddac…1edf40 Dummy {f00=0x009c, f01=0x0190, f02=»WRITE L ~ P LDK A4,QRD M P CWR A7,A4 M " P RF(E) DMT420 RAND DEL M 4 P LDK A4,QRDD M R P CWR A7,A4 M f ( P RF(E) DMT420 DELAYED RANDEOM DELETE M x P IFT INDXAC=1 M P LDK A4,QDEL M P CWR A7,A4 M P RF(E) DMT420 INDEXED DELETE M P XIF
0x1edf40…1ee0d4 (1, 471) Dummy {f00=0x009c, f01=0x0190, f02=» M r P LDR A10,A2 BUFFER ADDR N P CM CRNCIF,A2 N ( P* CLEAR INDEX CRN N > P CM CRNCIF+2,A2 N Z P LDR A2,A5 N r P LDR A3,A9 N P ST A2,CRNCDF,A10 N & P ST A3,CRNCDF+2,A10 CRN DATA FILE N & P SC A11,CRNCDF,A10 CRN FIL E CODE N P IFT
0x1ee0d4…1ee268 Dummy {f00=0x009c, f01=0x018e, f02=» N P CWR A7,A4 O P RF(E) DMT450 SEQ READ O P LDK A4,QRR O 8 P CWR A7,A4 O L P RF(E) DMT450 RANDOM READ O ^ P LDK A4,QRRRB O P CWR A7,A4 O & P RF(E) DMT450 RAND READ REL BUFFER O PDMT440 EQU * O P* O P* RELEASE EA O P*
0x1ee268…1ee3fc Dummy {f00=0x009c, f01=0x0190, f02=» & P RF(NZ) DMTAEX EA=1. NO EA WANTED P P* P . " P* CHECK IF EA IS SET ALREADY P 8 P* P ^ P CF A14,EATEST CHECK EA P h P LDR A4,A4 P " P RF(NZ) DMTAEX EA ALREADY SET P P* P P* SET EA P P* P P CF A14,EASETB P P RF DMTAEX P
0x1ee3fc…1ee590 Dummy {f00=0x009c, f01=0x0190, f02=» P LDK A4,QINS Q P CWR A7,A4 Q " P ABL(E) DMINS2 INDEXED INSERT Q * P XIF Q P P EJECT Q " PDMTAEX LDK A1,0 CORRECT RETURN Q j P* Q PDMTERR LD A3,FDBDBR,A6 Q P RF(NN) DMTEX1 NOT DELAY Q P ANKL A3,/3F00 Q ( P RF(NZ) DMTERX NO RELEASE
0x1ee590…1ee724 Dummy {f00=0x009c, f01=0x0190, f02=» EQU * Q P INH R P* A1 = RET CODE R P* A6 = DWT ADDR R 4 P CF A15,TENDIO R N P ENB R d PEXIT EQU * R p P LKM R P DATA 3 R P IFT INDXAC=1 R P EJECT R PDMIRR EQU * R P* INDEXED RANDOM READ R 2 P******************
0x1ee724…1ee8b8 Dummy {f00=0x009c, f01=0x0190, f02=»1,ECBCW+3,A9 NO OF CHAR R P LD A2,FDBRLE,A1 S P SUK A2,6 MAX KEY LENGTH S 8 P CWR A11,A2 S X , P RF(NP) DMR005 NOT TOO LARGE KEY WANTED S l P LDR A11,A2 MAX KEY S PDMR005 EQU * S P LDR A13,A1 S P ADKL A13,FDBECB ECB ADDR S $ P CF A1
0x1ee8b8…1eea4c Dummy {f00=0x009c, f01=0x0190, f02=»,FDBECB S P ADR A8,A6 ECB ADDRESS T P LDR A2,A2 RETURN CODE T . P RF(NZ) DMI030 KEY NOT FOUND T L P* T p P* KEY RECORD FOUN T z . P* CHECK IF NEXT RECORD HAS THE SAME KEY T P* T " P LD A2,FDBRRO,A1 RECORD OFFSET T P ADK A2,10 BUFFE
0x1eea4c…1eebe0 Dummy {f00=0x009c, f01=0x018e, f02=»2 DUPLICATE KEY CHAR T $ P RF(NE) DMR020 NEXT KEY NOT SAME U P LDKL A5,/200 BIT 6 U D " P ORS A5,ECBRC,A9 NEXT KEY SAME U ` PDMR020 EQU * U P* U P* MOVE LOG REC NO TO ECB U P* U P LDK A5,0 U P LC A5,3,A2 U P SC A5,ECBCW+3,A8
0x1eebe0…1eed74 (1, 472) Dummy {f00=0x009d, f01=0x0190, f02=» U P CF A14,DMTRBU V P EJECT V P* V , 0 P* PERFORM RANDOM READ ON THOIS DATA RECORD V 6 P* V j P LDR A6,A1 FDB ADDR V t " P LC A2,DWTST,A6 USER REQUESRT V P ANK A2,EABIT GET EA BIT V P SLL A2,1 V " P LDK A7,/A RANDOM READ NO WAIT V
0x1eed74…1eef08 Dummy {f00=0x009d, f01=0x0190, f02=» P LDK A2,6 NO OF CHAR W P CF A14,DMTWM MOVE ECB W P LDR A1,A6 FDB ADDR W > P LKM W Z P DATA -1 W f P DATA DMTAR4 W v P LD A7,ECBRC,A8 W P RF(N) DMTAR4 REQ ERR W P LKM W P DATA 3 EXIT W PDMTAR4 EQU * W P* W P* SET UP
0x1eef08…1ef09c Dummy {f00=0x009d, f01=0x0190, f02=»,DWTECB,A6 USER ECB W P LD A1,ECBRC,A8 X & P ORS A1,ECBRC,A9 RET CODE TO USER X 4 2 P ANKL A1,/EEF7 BIT 3,7 AND 12 NOT GRAVE ERROR X ^ P RB(NZ) DMTERX NOT OK X P* X P* SET CRN FOR INDEX FILE X P* X ( P LD A1,FDBADF,A6 FDB ADDR DATA F
0x1ef09c…1ef230 Dummy {f00=0x009d, f01=0x0190, f02=»GTLGRN GET INDE X LOG REC NO X P SC A2,CRNCIF+1,A10 Y $ & P ST A3,CRNCIF+2,A10 CRN INDEX FILE Y @ P LC A2,ECBFC,A9 Y j P SC A2,CRNCIF,A10 Y P* THAT WAS FILE CODE CRN Y P* Y P* SET RERTURN CODEXS Y P* Y $ P LD A2,ECBEL,A8 EFFECTIV
0x1ef230…1ef3c4 Dummy {f00=0x009d, f01=0x018e, f02=»EXT Y v 2 P********************************************* Z P LDR A1,A6 FDB INDEX Z B " P LD A2,FDBRRO,A1 RECORD OFFSET Z ^ P LDR A3,A5 Z P SUK A3,10 BUFFER ADDR Z PDMI100 EQU * Z P ADR A2,A3 BUFFADR Z P ADK A2,10 RECORD ADDR Z ( P AD A2,F
0x1ef3c4…1ef558 Dummy {f00=0x009d, f01=0x018e, f02=» Z ~ & P ST A4,FDBRRO,A1 LAST REC IN SECT [ P* [ 2 P* CHECK IF END OF FILE [ < P* [ P LDR A9,A3 SAVE [ f P CF A14,GTLGRN GET REC NR [ ~ P CC A2,FDBLRN,A1 [ P RF(L) DMI106 NOT EOF [ P RF(G) DMI105 EOF [ P CW A3,FDBLRN+1,A1 [
0x1ef558…1ef6ec Dummy {f00=0x009d, f01=0x0190, f02=» PDMI120 EQU * P* INDEX RECORD IS FOUND P* < P LDK A2,0 MARK FOUND F . P ABL DMR006 CONT AS FOR INDEXED RAND READ b PDMI010 EQU * ( P CF A14,RDNXTR GET NEXT INDEX RECORD P RB DMI100 RECORD FOUND P LDR A6,A1 FDB ADDR
0x1ef6ec…1ef880 Dummy {f00=0x009d, f01=0x0190, f02=» DMTERR ERROR AND BUFFER P EJECT ] P* ] . & PDMINS2 EQU * INDEXED INSERT PART 2 ] 8 P* ] b 2 P********************************************* ] l P ENB ENB ] P LD A3,ECBBA,A8 ] P SUK A3,8 BUFSTA ] " P CF A14,DMTRBU RELEASE BUFFER ]
0x1ef880…1efa14 (1, 473) Dummy {f00=0x009d, f01=0x0190, f02=»8 PHYS ECB ADDR ] P LDK A5,0 ^ . P SC A5,FDBDBR,A1 ZEROE INDEX FILE COUNTER ^ * P LDK A5,8 NR OF INDEX * 2 ^ P LDR A10,A1 FDB DATA ^ ~ PDXI020 SUK A5,2 ^ P RF(N) DXI100 ALL INDEXES ^ P LDR A6,A10 ^ P ADR A6,A5 ^ ( P LD A1,FDBAI1,
0x1efa14…1efba8 Dummy {f00=0x009d, f01=0x0190, f02=»B ^ PDXI030 SUK A6,4 _ P LD A7,CDTAB _ " P ADR A7,A6 _ 6 P CW A1,2,A7 _ H P RB(NE) DXI030 SEARCH NEXT _ P LDR A8,A1 FDB INDEX _ ~ P ADKL A8,FDBECB ECB ADDR _ P LC A6,1,A7 _ P SC A6,ECBFC,A8 INDEX FILE _ P LDR A6,A11 _ P SUK
0x1efba8…1efd3c Dummy {f00=0x009d, f01=0x018e, f02=»ADDR _ x P ADK A6,2 CYLID ` $ P AD A6,FDBRRO,A10 ADDR DATA REC ` $ $ P LDK A7,/20 DELETE INDEX NOWAIT ` L P RF DXI090 ` t PDXI080 EQU * ` $ P LD A9,DWTECB,A10 USER ECB ADDR ` $ P LD A6,ECBBA,A9 USER BUFFER ADDR ` $ P LDK A7,/1F INSERT INDEX NOWAI
0x1efd3c…1efed0 Dummy {f00=0x009d, f01=0x0190, f02=» ` P LD A7,ECBRC,A8 a P RF(N) DMTAR5 REQ ERR a P RB DXI020 NEXT INDEX DIRECT a > PDXI100 LKM a b P DATA 3 EXIT a t PDMTAR5 EQU * a " P LD A6,FDBADF,A1 FDB DATA FILE a P LD A9,DWTECB,A6 USER ECB a P LDKL A8,FDBECB a P ADR A1,A8 E
0x1efed0…1f0064 Dummy {f00=0x009d, f01=0x0190, f02=»R a v P LDK A1,0 RETURN CODE b & P LC A2,FDBDBR,A6 NR OF READY INDEX b ( P ADK A2,1 COUNT INDEXES b R $ P CC A2,FDBNIF,A6 TOT NR OF INDEX b r P RF(NE) DXI200 b P LD A7,DWTOR,A6 b P ANK A7,/3F ORDER CODE b P SUK A7,QINS INDEXED INSERT b
0x1f0064…1f01f8 Dummy {f00=0x009d, f01=0x0190, f02=»0,2 CYLID b P AD A10,FDBRRO,A6 c & P AD A10,FDBRLE,A6 ADDR STATUS CHAR c , P LDK A1,0 STATUS FREE c V . P ABL DMT350 CONTINUE AS FOR RANDOM DELETE c t PDXI200 EQU * c P SC A2,FDBDBR,A6 c P LKM c " P DATA 3 EXIT. MORE INDEX LEFT c P EJE
0x1f01f8…1f038c Dummy {f00=0x009d, f01=0x0190, f02=»*** c f " P LD A9,DWTECB,A1 USER ECB ADDR d $ P LD A8,ECBBA,A9 BUFFER ADDR USER d 2 P AD A8,FDBKA,A1 KEY ADDR d Z P LDR A12,A8 d z $ P LD A11,FDBRLE,A1 RECORD LENGTH d P SUKL A11,6 KEY LENGTH d P LDR A13,A14 d 0 P ADKL A13,2 ECB ADDR TO RECORD B
0x1f038c…1f0520 Dummy {f00=0x009d, f01=0x0190, f02=»B(Z) DMI035 NO SECTOR FOUND d P LDR A13,A3 BUFFER ADDR e $ " P LD A4,FDBADF,A6 FDB DATA FILE e D P LD A5,DWTECB,A4 USER ECB e j P LD A1,DWTOR,A6 e P ANK A1,/3F e P SUK A1,QDELX e & P ABL(E) DEL000 DELETE INDEX RECORD e P* e ( P* SE
0x1f0520…1f06b4 (1, 474) Dummy {f00=0x009d, f01=0x018e, f02=» e p ( P* (SHORT KEY NOT ALLOWED IN FILE) f P* f 4 P LC A4,ECBFC,A5 FILE CODE f > P CC A4,FDBECB+1,A6 f ` * P RF(NE) INS049 NOT REQUESTED FILE CODE f z P LDKL A4,/200 BIT 6 f " P ORS A4,ECBRC,A5 NEXT KEY SAME f PINS049 EQU * f P IFT INSLA
0x1f06b4…1f0848 Dummy {f00=0x009d, f01=0x0190, f02=» PINS080 EQU * g P CF A14,RDNXTR GET NEXT REC g P RF INS100 OK g < P ABL DEL045 ERROR g R PINS100 EQU * g l P ADR A2,A3 g P ADK A2,10 REC ADDR g P AD A2,FDBRLE,A1 ADDR STATUS g P LDK A5,/FF g P CCR A5,A2 g P RF(E) INS150 US
0x1f0848…1f09dc Dummy {f00=0x009d, f01=0x0190, f02=» DUPL KEY CHAR g P CWR A5,A11 KEY LENGTH h $ P RB(E) INS080 NEXT SAME GET NEXT h 4 P* h P* UPDATE LAST SAME RECORD h f P* h P SC A11,-4,A2 NEXT SAME h P LD A7,FDBRRO,A1 h P CW A7,FDBMRO,A1 h & P RF(NE) INS160 SECT WRITTEN LATER h
0x1f09dc…1f0b70 Dummy {f00=0x009d, f01=0x0190, f02=» P LDR A1,A1 i P ABL(NZ) DMTERR i P* i . P* GET NEXT RECORD i 8 P* i T PINS160 EQU * i ^ " P LDR A7,A5 NR OF SAME IN NEXT i r P LDR A1,A6 FDB i P CF A14,RDNXTR GET NEXT RC i P RF INS170 OK i P ABL DEL045 ERROR i PINS170 E
0x1f0b70…1f0d04 Dummy {f00=0x009d, f01=0x0190, f02=» PINS050 EQU * j P* j ( P* CREATE AN INDE XRECORD IN AREA 1 j " P* j N P LDR A1,A12 FROM ADDR j X P LDR A3,A14 j v P ADK A3,2 TO ADDR j P LDR A2,A11 KEY LENGTH j P CF A14,DMTBM MOVE KEY j P LDK A2,0 j P SCR A2,A3 DUMMY j
0x1f0d04…1f0e98 Dummy {f00=0x009d, f01=0x0190, f02=» REC NR j z P LD A2,ECBCW+2,A5 k ( P LD A3,ECBCW,A5 REC NR DATA FILE REC k * P SCR A2,A7 k V P ADK A7,2 k h P SCR A3,A7 k z P ECR A3,A3 k P SUK A7,1 k P SCR A3,A7 LOG REC NR k P ADK A7,2 k P LDK A1,/FF USED k P SCR A1,A7 STATU
0x1f0e98…1f102c Dummy {f00=0x009d, f01=0x018e, f02=» P* l P ST A2,-28,A14 l P ST A3,-26,A14 l $ P EJECT l : P* l H : P* BELOW IS A NEW INDEX RECORD INSERTED AND FOLLOWING l R $ P* USED RECORDS ROLLED FORWARD l $ P* A6,A11,A13 IS USED AT ENTRY l $ P ADKL A11,7 RECORD LENGTH TOTAL l P
0x1f102c…1f11c0 Dummy {f00=0x009d, f01=0x0190, f02=» , P* A12 = AREA INDEX 0=BUFAR1,1=BUFAR2 m $ P* A13 = BUFFER ADDRESS SECTOR m 4 P* m PINS190 EQU * m f P LDKL A12,1 BUFADR2 m z PINS200 EQU * m P LDK A1,0 m P LDR A12,A12 m P RF(Z) INS210 BUFAR1 m ( P LDKL A1,RECBFZ RECORD BUUFF
0x1f11c0…1f1354 (1, 475) Dummy {f00=0x009d, f01=0x0190, f02=»* SAVE LAST RECORD m P* n P LDR A1,A13 n & P ADK A1,10 BUFSTA+2 n : . P AD A1,FDBMRO,A6 ADDR OF LAST REC IN SECT n V P LDR A2,A11 n P LDR A3,A10 n " P CF A14,DMTBM SAVE LAST RECORD n P* MOVE REST OF SECTOR n P* n P LDR A1,
0x1f1354…1f14e8 Dummy {f00=0x009d, f01=0x0190, f02=»OF CHAR n | P LDR A3,A1 o P ADR A3,A11 TO ADDR o " P CF A14,DMTBMR MOVE o > P* INSERT NEW RECORD o Z P* o x P LDKL A1,RECBFZ BUFFER SIZE o P SLL A1,1 BYTE NO o P LDR A12,A12 o P RF(Z) INS250 BUFAR1 o " P LDK A1,0 SELECT OTHER B
0x1f14e8…1f167c Dummy {f00=0x009d, f01=0x0190, f02=»ADDR o P CF A14,DMTBM MOVE p P* WRITE BUFFER p & P* p > P LDR A8,A14 USE STACK AS ECB p H P SUKL A8,24 p l $ P LC A2,FDBEXT+1,A6 VOL DEV CODE p P STR A2,A8 p P LDR A2,A13 p P ADK A2,8 BUFSTA p P ST A2,ECBBA,A8 SECTOR ADDR p
0x1f167c…1f1810 Dummy {f00=0x009d, f01=0x018e, f02=» A7,/95 WRITE , WAIT p P LKM q P DATA 1 q ( P LDR A1,A6 FDB INDEX q 8 P CF A14,DMTIOZ IO CHECK q T P LDR A1,A1 q t P ABL(NZ) DMTERR q P* q 6 P* IF SPILLED RECORD IS FREE, OPERATION IS READY q P* q P LDR A2,A10 RECORD AREA ADDR
0x1f1810…1f19a4 Dummy {f00=0x009d, f01=0x0190, f02=» q j P CCR A1,A2 r P RF(Z) INS400 FREE RECORD r P* r < P* GET NEXT SECTOR r F P* r b P LDR A1,A6 FDB ADDR r l P LDR A3,A13 BUFFER ADDR r 2 P CF A14,RDNXTR GET FIRST RECORD IN NEXT SECTOR r P RF INS260 OK r P LDR A1,A5 r P A
0x1f19a4…1f1b38 Dummy {f00=0x009d, f01=0x0190, f02=» r l P SUR A12,A12 s P RB INS200 s P EJECT s . PINS400 EQU * s < P* s P ( P* UPDATE LRN IF EOF IS ENCOUNTERED s Z P* s P LDR A1,A6 FDB INDEX s P CF A14,GTLGRN s P CC A2,FDBLRN,A1 s P RF(L) INS430 NO EOF s P RF(G) INS410 EO
0x1f1b38…1f1ccc Dummy {f00=0x009d, f01=0x0190, f02=»N+1,A6 s P LDKL A1,/1000 EOF t P ORS A1,ECBRC,A9 EOF TO USER t * PINS430 EQU * t N P* t b 0 P* UPDATE CRN-LINK FOR MOVED INDEX RECORDS t l P* t P LDKL A12,1 ADD ON E TO CRN t P LDR A8,A2 t P LDR A9,A3 LAST REC NR MOVED t P LD
0x1f1ccc…1f1e60 Dummy {f00=0x009d, f01=0x0190, f02=»SAME FILE CODE t ~ P* u P LD A1,FDBADF,A5 FDB DATA F u " P CF A14,CRNGET GET CRN BUFFER u D " P LC A4,ECBFC,A9 USER FILE CODE u j P CC A4,FDBECB+1,A5 u P RF(NE) INS440 OTHRER FILE u P ST A10,CRNCIF,A2 u P ST A11,CRNCIF+2,A2 REC NR u P
0x1f1e60…1f1ff4 (1, 476) Dummy {f00=0x009e, f01=0x0190, f02=» u x P ABL DMTEX2 v P EJECT v * PDEL000 EQU * DELETE INDEX RECORD CONT v * P LDR A12,A5 USER ECB ADDR v X P LDR A2,A2 v z PDEL010 EQU * v " P ABL(NZ) DMI030 KEY NOT FOUND v P* v P* CHECK RECORD NR DATA REC v P* v PDEL020 EQU
0x1f1ff4…1f2188 Dummy {f00=0x009e, f01=0x0190, f02=»C A2,ECBCW+3,A12 REC NR v P RF(NE) DEL030 WRONG RECORD w P LC A2,1,A1 w D P ECR A2,A2 w X P LC A2,2,A1 REC NR w j P CW A2,ECBCW,A12 w P RF(E) DEL200 RECORD FOUND w PDEL030 EQU * w P* w P* CHECK IF NEXT KEY SAME w P* w P
0x1f2188…1f231c Dummy {f00=0x009e, f01=0x0190, f02=»ET NEXT INDEX RECORD w P RF DEL050 OK x PDEL045 LDR A1,A5 ERROR CODE x 2 P ABL DMI035 ERROR x V PDEL050 EQU * x p P* x P* CHECK IF RECORD IS USED x P* x P LDR A13,A3 NEW BUFFER ADDR x P ADR A2,A3 x P ADK A2,10 BUFSTA + 2
0x1f231c…1f24b0 Dummy {f00=0x009e, f01=0x0190, f02=» ST A4,FDBRRO,A1 LAST REC IN SECTOR x P RB DEL040 NEXT REC y , P EJECT y H PDEL200 EQU * RECORD FOUND y V P* y x & P* SET RC BIT 6 IF NEXT KEY SAME y P* y $ P LC A2,ECBFC,A12 USER FILE CODE y P LDK A7,0 y P LC A7,-1,A1 NR OF SAME
0x1f24b0…1f2644 Dummy {f00=0x009e, f01=0x0190, f02=» P CWR A11,A7 KEY LENGTH z $ P RF(NE) DEL220 NEXT KEY NOT SAME z " P LDKL A4,/200 z J $ P ORS A4,ECBRC,A12 NEXT KEY SAME z ` PDEL220 EQU * z P* z $ P* MOVE UP RECORDS OVER DELETED z P* z $ P ADKL A11,7 TOTAL RECORD LENGTH z P LDR A3,
0x1f2644…1f27d8 Dummy {f00=0x009e, f01=0x0190, f02=» z P SU A2,FDBRRO,A6 NR OF CHAR { P CF A14,DMTBM MOVE { , P* { F P* SET LAST RECORD FREE { P P* { p P ADR A3,A11 { z P SUK A3,1 { P LDK A1,0 { P SCR A1,A3 STATUS FREE { P* { $ P* UPDATE CRN FOR MOVED RECORDS { P* {
0x1f27d8…1f296c Dummy {f00=0x009e, f01=0x0190, f02=»RO,A6 OLD OFFSET { P LD A4,FDBMRO,A6 | P ST A4,FDBRRO,A6 MAX OFFSET | 0 $ P CF A14,GTLGRN LAST REC NR MOVED | T P LDR A8,A2 | | P LDR A9,A3 REC NR | " P ST A12,FDBRRO,A6 RESET OFFSET | P LDKL A12,-1 | & P CF A14,CRNUPD UPDATE CRN BUFFERS |
0x1f296c…1f2b00 Dummy {f00=0x009e, f01=0x0190, f02=»A5 FDB | P CF A14,GTLGRN GET REC NR } P LDR A1,A2 } 0 P LDR A2,A3 } B P LDK A6,0 } T P LDK A7,1 } f $ P CF A14,DSUMOD A1,A2 = A1,A2 - 1 } x P RF(Z) DEL600 FILE START } P LDR A6,A5 FDB ADDR } P CF A14,CALSNO GET SECTOR NR } P LDR A5,
0x1f2b00…1f2c94 (1, 477) Dummy {f00=0x009e, f01=0x018e, f02=» $ P RF(Z) DEL245 BUFFER NOT CHANGED ~ P* ~ , P* WRITE SECTOR ~ 6 P* ~ N P LDK A7,/95 WRITE WAIT ~ X P LKM ~ v P DATA 1 ~ P LDR A1,A5 FDB ~ P CF A14,DMTIOZ IO CHECK ~ P LDR A1,A1 ~ P ABL(NZ) DMTERR ~ ( P SUR A12,A12 BUFFER NO
0x1f2c94…1f2e28 Dummy {f00=0x009e, f01=0x0190, f02=» ~ v P* P LDR A1,A5 FDB ADDR P LDK A3,0 . P CF A14,RDNXTR GET SECTOR @ P RF DEL250 OK b P LDR A6,A1 FDB ADDR x P RB DEL045 PDEL250 EQU * P LDR A5,A1 FDB P LDR A13,A3 NEW BUFFER ADDR P LD A4,FDBMRO,A5
0x1f2e28…1f2fbc Dummy {f00=0x009e, f01=0x0190, f02=»OFFSET p P ADK A4,10 BUFSTA+2 P ADR A4,A13 RECORD ADDR * & P AD A4,FDBRLE,A5 STATUS CHAR ADDR J P LDK A2,/FF t P CCR A2,A4 P RB(NE) DEL240 FREE . P LC A2,17,A14 NR OF SAME IN DELETED RECORD P CC A2,-4,A4 P RF(NL) DEL6
0x1f2fbc…1f3150 Dummy {f00=0x009e, f01=0x4172, f02=»900 BUFFER NOT CHANGED P* P* WRITE SECTOR ( P* @ PDEL700 EQU * J P LDR A8,A14 ^ P ADKL A8,2 ECB ADDR r P LDK A7,/95 WRITE WAIT P LKM P DATA 1 P LDR A1,A5 FDB ADDR P CF A14,DMTIOZ IO CHECK P LDR
0x1f3150…1f32e4 Dummy {f00=0x009e, f01=0x2008, f02=» + t P INH , P CF A15,TENDIO , P ENB , 2 P* , > P* EXIT , H P* , X P LKM , b P DATA 3 , n P* , ~ P END , @ , RD ADDR A2:=EA BIT + & P C1R A2,A2 ONE COMPLEMENT BIT MASK + P ANRS A2,A3 SET OFF EA BIT + P* +
0x1f32e4…1f3478 Dummy {f00=0x009e, f01=0x410c, f02=» _ H D !| W 7 * ! & % 1 ( OP WP _P gQ qR uW Rl V V V H D ! P R W R P 'W6 ; J ?V sV4 wRL Q V V R Q V ^ H D ! P V P W 'T +RB -QD 1P 9P =V CP GV MQ OP [V qW @
0x1f3478…1f360c Dummy {f00=0x009e, f01=0x0190, f02=» J F IDENT MULDIV REL 8.1 78-04-21 870172840810 > : T:MUL T:DIV T:SIGN T:BRK T:MULC T:DIVC M:BRK M:SIGNK R T:MULC T:MUL T:MOV T:SUB , ( D 0 0
0x1f360c…1f37a0 Dummy {f00=0x009e, f01=0x018e, f02=» 8 j T:DIVC f T:DIV j , ( W ! : 9 [ : 0 T:CMP ` , ( wD 0@ @@ 0@P p , ( 0R P [ P 0 * & _ P 0 , ( @
0x1f37a0…1f3934 (1, 478) Opaque[0x194]
0x1f3934…1f3ac8 # DirEnt {nam=»TASS «, typ=»SC«, f00=0x434b, f01=0x204e, f02=0x13d0, f03=0x203d}
0x1f3934…1f3ac8 IdxSect {
0x1f3934…1f3ac8 f00 = 0x009e // 0x1f3934 @0x0
0x1f3934…1f3ac8 f01 = 0x000c // 0x1f3936 @0x2
0x1f3934…1f3ac8 gno = [ // 0x1f3938 @0x4
0x1f3934…1f3ac8 [0x00]: C0x009e.0x2.0
0x1f3934…1f3ac8 [0x01]: C0x009e.0x3.0
0x1f3934…1f3ac8 [0x02]: C0x009f.0x0.0
0x1f3934…1f3ac8 [0x03]: C0x009f.0x1.0
0x1f3934…1f3ac8 [0x04]: C0x009f.0x2.0
0x1f3934…1f3ac8 [0x05]: C0x009f.0x3.0
0x1f3934…1f3ac8 ]
0x1f3934…1f3ac8 }
0x1f3ac8…1f3c5c Dummy {f00=0x009e, f01=0x0190, f02=» 0 P IDENT TASS REL 8.2 78-09-15 870105040820 P 8 P* @ 8 P**************************************************** J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P* TASS = ASSIGN FILE CODE ACTIVATION PART P* P*
0x1f3c5c…1f3df0 Dummy {f00=0x009e, f01=0x0190, f02=»ERED VIA z $ P* ASSIGN REQUEST (DATA 15) OR ( P* ASSIGN INDEX REQUEST (DATA 16). 8 P* d P* LDK A7,TC n P* LDKL A8,ASBLK P* LKM P* DATA 15 P* " P* INPUT A5 = TTAB ADDRESS P* A7 = TC
0x1f3df0…1f3f84 Dummy {f00=0x009e, f01=0x0190, f02=» ASSIGN IN TTAB IS WANTED j B P* TC = 0 WHEN GLOBAL ASSIGN IN CDTAB IS WANETED " P* h P EJECT r P* +----------+----------+ $ P* ASBLK I NO OF VOL FC I P* +----------+----------+ P* I I
0x1f3f84…1f4118 Dummy {f00=0x009e, f01=0x0190, f02=»-------------+ P* I I P* I VOL NAME I 8 P* I I Z P* +---------------------+ | P* I I P* $ P* MAX 4 VOL NAMES CAN BE GIVEN P* P* @ P*
0x1f4118…1f42ac Dummy {f00=0x009e, f01=0x018e, f02=»ED WITH INFORMATION FROM THE VTOC:S OF THE x $ P* VOLUMES MENTIONED IN ASBLK. 2 P* Z J P* UPON COMPLETION OF THE ASSIGN REQUEST REG A7 WILL HAVE ONE OF THE d P* FOLLOWING RETURN CODES: P* 0 P* 0 = CORRECT RETURN ASSIGNMENT PERFOR
0x1f42ac…1f4440 Dummy {f00=0x009e, f01=0x0190, f02=» v ( P* 4 = ONE OR MORE VOLUMES UNKNOWN " P* 5 = FILE CODE ALREADY USED 4 P* 6 = FILE NAME UNKNOWN Z 0 P* 7 = FILE SECTION MISSING OR FOUND TWICE | P* 8 = FAULTY DISC FORMAT & P* 9 = MORE THAN 4 EXTENTS EXIST P* P E
0x1f4440…1f45d4 (1, 479) Dummy {f00=0x009e, f01=0x0190, f02=»A5 = TTAB ADDRESS " P* A8 = ASBLK ADDRESS 0 P* WHERE ASBLK IS A PARAMETER BLOCK @ P* +----------+----------+ t $ P* ASBLK I NO OF VOL FC I P* +----------+----------+ P* I I P* I
0x1f45d4…1f4768 Dummy {f00=0x009e, f01=0x0190, f02=» VOL NAME I P* I I P* +---------------------+ > $ P* I MASTER INDEX ` " P* I FILE NAME P* D P* UPON COMPLETION OF THIS REQUEST REG A7 WILL HAVE ONE OF THE P* FOLL
0x1f4768…1f48fc Dummy {f00=0x009e, f01=0x0190, f02=» " P* 2 = NO FREE ENTRY IN TABLE 8 P* 3 = NO FDB AVAILABLE OR MASTER INDEX CORE AVAIL * ( P* 4 = ONE OR MORE VOLUMES UNKNOWN f " P* 5 = FILE CODE ALREADY USED P* 6 = FILE NAME UNKNOWN 0 P* 7 = FILE SECTION MISSING OR FOUND TWICE
0x1f48fc…1f4a90 Dummy {f00=0x009e, f01=0x0190, f02=»FILES ALREADY ASSIGNED 0 P* 12= SIZE OF DISC BUFFERS NOT SUFFICIENT 0 P* 13= REQUEST BUSY. REPEAT ASSIGN REQUEST R P EJECT P* P*************** P* ENTRIES * P*************** P* P ENTRY TASS P ENT
0x1f4a90…1f4c24 Dummy {f00=0x009e, f01=0x0190, f02=»NTRY TASVOL P ENTRY TASCXO P ENTRY TASSEX * P ENTRY TASXLB @ P ENTRY TASFDB V P ENTRY TASVRL l P ENTRY TASVLE P ENTRY TASVRN P ENTRY TASECB & P ENTRY TASFIL,TASTID,TASMXA,TASSPW P ENTRY TASFDD,TASTBE $
0x1f4c24…1f4db8 Dummy {f00=0x009e, f01=0x0190, f02=» ~ P* P EXTRN DFTAB P EXTRN DFTABE & P EXTRN CDTAB < P EXTRN DWTVOL P P EXTRN FNDTID f P EXTRN DMTASS | P EXTRN ACTOT P EXTRN TDISP P EXTRN QTJOB P EXTRN LKMQDI P EXTRN TTB:SA P EXTRN TTB:TD,
0x1f4db8…1f4f4c Dummy {f00=0x009e, f01=0x0190, f02=»*** P* PTASBLK DATA 0 USE INDICATOR $ PTASQUE DATA 0 ASSIGN QUEUE ANCOR : * PTASTTA DATA 0 REQUESTING TTAB ADDRESS b PTASASB DATA 0 ASBLK ADDRESS * PTASCVO DATA 0 CURRENT OFFSET IN TASVOL 0 PTASVOL DATA 0 VOLUME IDENTIFICATION (D
0x1f4f4c…1f50e0 Dummy {f00=0x009e, f01=0x0190, f02=»ER, EXTENT NUMBER v * P DATA 0 OFFSET IN TASVOL FOR THIS EXT ( P DATA 0,0,0,0,0,0 THREE MORE ENTRIES H PTASXLB DATA 0 EXTENT LENGTH t P DATA 0 EXTENT BASE ( P DATA 0,0,0,0,0,0 THREE MORE ENTRIES PTASFDB DATA 0 FDB ADDRESS $ PTASVRL
0x1f50e0…1f5274 (1, 480) Dummy {f00=0x009f, f01=0x018e, f02=» P DATA 410 ECBRL P DATA 0,0,0 ECBEL,-RC,-CW P DATA 0 CW2 > 0 PTASFIL DATA 0 0=DATA,1=INDEX,2=MASTER INDEX R * PTASTID DATA 0 DMTSASK IDENT AT ASSIGN $ PTASMXA DATA 0 MASTER INDEX ADDR & PTASSPW DATA 0 TTAB ADDRESS DMTASK $ PTA
0x1f5274…1f5408 Dummy {f00=0x009f, f01=0x0190, f02=» P EJECT P************** P* TASCAQ * ( P************** > P* T , P* ENTRY TASCAQ CHECK ASSIGN QUEUE ^ P* P* A7= RETURN CODE P* * P* SET OFF USE BIT IN TASBLK H P* IF TASQUE =
0x1f5408…1f559c Dummy {f00=0x009f, f01=0x0190, f02=»5,A7 | P* PTASCAQ EQU * P LD A5,TASQUE * P RF(Z) TASCEX EMPTY QUEUE @ " P LDR* A1,A5 GET NEXT IN CHAIN b , P ST A1,TASQUE AND PUT IT FIRST IN QUEUE P LDKL A1,-4 ( P ADS A1,TTB:SA,A5 UPD DISPATCH ADDR P CF A15,QTJOB NE
0x1f559c…1f5730 Dummy {f00=0x009f, f01=0x0190, f02=» LD A5,TASTTA 4 P ST A7,TTB:SA+14,A5 SET RETURN CODE IN SAVED A7 P RTN A14 N P EJECT ^ 8 P****DESCRIPTION************************************* l P* : P* VOLCHE WILL COMPARE EACH VOLUME NAME IN ASBLK WITH & P* VOLUME NAMES IN DWT
0x1f5730…1f58c4 Dummy {f00=0x009f, f01=0x018e, f02=» A8 = ASBLK ADDR ( P* A11 = 0 WHEN NO LOCK IS WANTED. : P* 1 LOCK WANTED. ONLY FROM DMTASS FOR FLEXDISC F P* 8 P****EXIT PARAMETERS********************************* P* P* A1 = 0 OK P* 1 VOLUME UNKNOWN
0x1f58c4…1f5a58 Dummy {f00=0x009f, f01=0x0190, f02=» P* : P****************************************************** PVOLCHE EQU * L P SLL A2,1 ` P SUK A2,2 r P ST A2,TASCVO INIT. TASCVO P LDR A4,A8 2 P ADK A4,10 POINTER TO FIRST VOL NAME IN ASBLK PTAS110 EQU * 2 P LDKL
0x1f5a58…1f5bec Dummy {f00=0x009f, f01=0x0190, f02=» IN CD:TAB AND COMPARE DWTVOL | P* & P LD* A6,CDTAB 0 PTAS130 SUK A6,4 F 2 P RF(N) TASHLT FC NOT FOUND? SHOULD NOT OCCUR. ^ P LD A5,CDTAB P ADR A5,A6 P CC A1,1,A5 P RB(NE) TAS130 NOT THIS FC P LDR A11,A11 P RF(
0x1f5bec…1f5d80 Dummy {f00=0x009f, f01=0x0190, f02=»CK FLEXDISC P* P LDKL A8,TASECB " P ST A1,ECBFC,A8 FLEX FILE CODE 6 & P LDKL A12,0 LFLAG=UNLOCKED BEFORE P LDK A7,/A6 LOCK,WAIT P LKM P DATA 1 P LD A7,ECBRC,A8 P RF(Z) TAS131 P ANKL A7,/7FFF " P RF(
0x1f5d80…1f5f14 (1, 481) Dummy {f00=0x009f, f01=0x018e, f02=» x P RF(NZ) TAS150 GRAVE ERR PTAS131 EQU * ( P ST A1,TASVOL,A2 SAVE FC < P P AD A6,CDTAB d P LDR* A5,A6 INDEX x $ P LDK A1,0 DISC NAME DISPLACEMENT P SRL A5,8 P RF(Z) TAS135 , P* DECIDE DISC DISPL FOR THIS FILE CO
0x1f5f14…1f60a8 Dummy {f00=0x009f, f01=0x0190, f02=» P RB(P) TAS132 PTAS135 EQU * P LD A6,2,A6 DWT ADDR . & P RF(Z) TASHLT NO DWT ADDRESS FOUND J & P ADR A6,A1 POINTER TO VOLUME NAME t P LDK A1,3 VOL NAMES 3 WORDS & P LDR A5,A4 POINTER ASBLK VOL NAME P* , P* CHECK VOLUME N
0x1f60a8…1f623c Dummy {f00=0x009f, f01=0x0190, f02=» P ADK A6,2 P SUK A1,1 . P RB(P) TAS140 CHECK NEXT WORD IN VOL NAME ( P* Z P* VOL NAME MATCH d P* STORE DMI , FC IN TASVOL ~ P* P LD A1,TASVOL,A2 P ANK A1,/0F P CWK A1,/8 $ P RF(L) TAS143 NOT FLEXIBLE DIS
0x1f623c…1f63d0 Dummy {f00=0x009f, f01=0x0190, f02=» FOR DRIVE 1 P* 1 FOR DRIVE 2 " P* 2 FOR FLEXDISC 8 P* ^ P SC A1,TASVOL,A2 h P* P* CHECK NEXT VOL IN ASBLK P* P LDK A1,0 RET CODE P ADK A4,6 P SUK A2,2 ( P RB(NN) TAS110 MOR
0x1f63d0…1f6564 Dummy {f00=0x009f, f01=0x0190, f02=»RFORMED x P LCR A1,A3 DISC CODE P ANK A1,/F8 , P SUK A1,/F8 @ P RF(NZ) TAS150 NO FLEXDISC T P LDR A12,A12 LFLAG v P RF(NZ) TAS150 LOCKED BEFORE P* P* UNLOCK P* P LDK A7,/B8 UNLOAD,WAIT P LKM P D
0x1f6564…1f66f8 Dummy {f00=0x009f, f01=0x0190, f02=» RB(NE) TAS120 MORE FC IN DFTAB P LDK A1,1 ( PTAS155 EQU * : P RTN A14 N PTASHLT HLT ^ P EJECT p P* ~ P************ P* TASS * P************ P* PIXTASS EQU * P LDKL A14,/81 * P SCR A14,A8 BIT
0x1f66f8…1f688c Dummy {f00=0x009f, f01=0x0190, f02=»R d P LDR A10,A7 SAVE TC P* & . P* CHECK IF PREVIOS ASSIGN NOT COMPLETED 0 4 P* AND IF SO QUEUE THIS REQUEST VIA THE TASQUE b P* P LD A1,TASBLK & P RF(Z) TAS050 NO CONCURRENT ASSIGN * P LDKL A1,TASQUE START OF ASSIGN QUEU
0x1f688c…1f6a20 Dummy {f00=0x009f, f01=0x0190, f02=» A5,A2 P CMR A5 P ABL TDISP DISPATCH P* : PTAS050 EQU * D & P IM TASBLK INDICATE ASSIGN STARTED X " P CM TASFDD FDB ADDR DATA FILE P* 6 P ST A5,TASTTA SAVE TTAB ADDRESS OF REQUESTING TASK P* $ P ST A8,TASASB SAVE
0x1f6a20…1f6bb4 (1, 482) Dummy {f00=0x009f, f01=0x0190, f02=»ITIALIZE RETURN CODE IN A7 P* " . P* CHECK MAX NUMBER OF VOLUMES ( 1 - 4 ) , P* ^ P LDK A2,0 h P LCR A2,A8 NO OF VOLUMES z . P ANK A2,/1F REMOVE INDEX BIT +DELAY+BASIC P RF(Z) TAS090 NO VOL P CWK A2,4 P RF(NG) TAS100
0x1f6bb4…1f6d48 Dummy {f00=0x009f, f01=0x018e, f02=»L A11,0 NO FLEXLOCK P CF A14,VOLCHE P LD A8,TASASB ASBLK ADDR 2 P LDKL A7,-1 RET CODE R P LDR A1,A1 n $ P RF(Z) TAS160 ALL VOLUMES FOUND P* , P* ALL VOL NOT FOUND. ACT FLEXDISCTASK P* P LD A1,TASCVO P LDK A
0x1f6d48…1f6edc Dummy {f00=0x009f, f01=0x018e, f02=» P* PTAS160 EQU * P LDR* A3,A8 " P ANK A3,/FF 6 , P RF(E) TASSEM FILE CODE = 0 NOT ALLOWED J P LDR A10,A10 TC z P RF(Z) TAS165 GLOBAL ASSIGN P LD A2,TASTTA TTAB ADDR P LDR A4,A2 P LD A2,TTB:TD,A4 P ADKL A4
0x1f6edc…1f7070 Dummy {f00=0x009f, f01=0x0190, f02=» P RF(L) TAS180 END OF TABLE ! P LDR A1,A4 ! & P ADR A1,A2 ! 8 P CCR A3,A1 FILE CODE ! J P RB(NE) TAS170 NO MATCH ! f P* ! P* FILE CODE USED ! . P* OK WHEN REQ = ASS INDEX AND INDEX = 1 ! P* ! P LDR* A2,A8 ASBLK 1ST WORD ! P
0x1f7070…1f7204 Dummy {f00=0x009f, f01=0x018e, f02=»* DATA FILE FDB IS FOUND ! P* " " P LD A1,1,A1 FDB ADDR " , P ST A1,TASFDD " H P RB TAS170 " ^ P* " p P* " z > P* FIND A FREE ENTRY IN TTAB/CD:TAB (FC AND DWTADR = 0 ) " P* " PTAS180 EQU * " P LDK A1,0 " P LDR A10,A10 TC "
0x1f7204…1f7398 Dummy {f00=0x009f, f01=0x0190, f02=» " | P RF TAS190 # PTAS185 EQU * # P LD A4,CDTAB # . P LDR* A2,A4 # B P ADK A4,1 # V PTAS190 SUK A2,4 # h ( P RF(L) TASSE2 NO FREE ENTRY IN TABLE # P LDR A9,A4 # P ADR A9,A2 # P CCR A1,A9 FILE CODE # " P RB(NE) TAS190 FC NOT EQUAL
0x1f7398…1f752c Dummy {f00=0x009f, f01=0x0190, f02=» * P ORKL A3,/100 INDEX = 1 FOR DATA FILE $ PTAS195 EQU * $ 2 0 P ST A3,-1,A9 SET INDEX AND FC IN FREE ENTRY $ F P ST A9,TASTBE SAVE ENTRY $ z P* $ 0 P* GET FIRST VOLUME AND ACTIVATE ITS DMTASK $ P* $ P LD A1,TASCVO $ P LDK A7,0 $
0x1f752c…1f76c0 Dummy {f00=0x009f, f01=0x0190, f02=»B FOUND $ ~ P EJECT % P* % & P* FLEXDISC DMTASK DOES NOT EXIST % ( P* % R P CM -1,A9 REMOVE ENTRY % P LDK A7,4 VOL UNKNOWN % z P RF TASSEM % PTAS200 EQU * % P LDK A2,2 % 4 P ST A2,TASFIL MASTER INDEX LOOP IDENT IN DMTSAK % & P
0x1f76c0…1f7854 (1, 483) Dummy {f00=0x009f, f01=0x018e, f02=»M TASFDB =0 INDICATES EXT #0 NOT FOUND % P LDK A3,0 & . * P* A1=PAR,A2=ADR,A3=SEGM,A5=TTAB ADDR & @ " P CF A15,ACTOT ACTIVATE DMTASK & n P ABL TDISP GO TO DISPATCHER & P EJECT & P* & P* ERROR RETURNS & P* & PTASSE5 ADK A7,1 &
0x1f7854…1f79e8 Dummy {f00=0x009f, f01=0x4064, f02=» & P CF A14,TASCAQ CHECK ASSIGN QUEUE ' " P ABL LKMQDI QUEUE AND DISPATCH ' . P END ' T@ ' `DR & @ " P CF A15,ACTOT ACTIVATE DMTASK & n P ABL TDISP GO TO DISPATCHER & P EJECT & P* & P* ERROR RETURNS & P* & PTASSE5 ADK A7,1 &
0x1f79e8…1f7b7c Dummy {f00=0x009f, f01=0x2008, f02=» (
0x1f7b7c…1f7d10 Dummy {f00=0x009f, f01=0x0190, f02=» , ( ' " ! P ! _ ! , ( G _ ! * R X " P 4 , ( g V C :AP Z P ! * ! d , ( @R _* ! Y y Y , ( @ ! f ! X ( X $ , ( _" _* 9D
0x1f7d10…1f7ea4 Dummy {f00=0x009f, f01=0x0190, f02=» V 5 9 F A R K * QW c gTR wT P f H D ! f P P T R 1 3Q 5R ePZ uP yT* P > H D ! V. $ X ' +P /P 3P 7P EW M OQ H D !M QW W YP ]W R, T:
0x1f7ea4…1f8038 Dummy {f00=0x009f, f01=0x0190, f02=» eTB oT8 s uRH wT0 P P * n H D !& R P R P * Vr P4 R V. * H D ! ? IQ U e i $ u $ R T v H D ! VD M * Q WP i P6 P, P P
0x1f8038…1f81cc Dummy {f00=0x009f, f01=0x4124, f02=» X Z H D ! ! - 9T =W C U aT cWD s w < T H D !z W * Z * R ! < #R Y p T P PH P P P P b H D !2 'P -P W T N ;P ? QRn cP iV qP yP R: P
0x1f81cc…1f8360 Dummy {f00=0x009f, f01=0x0190, f02=» F IDENT DEBUG dBUG |BUG . , ( A @ ~ A > , ( ! A ~ @ A A @ A n , ( A A @ A A @ A a A W o , (
0x1f8360…1f84f4 (1, 484) Opaque[0x194]
0x1f84f4…1f8688 # DirEnt {nam=»DMINIT«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1400, f03=0x2020}
0x1f84f4…1f8688 IdxSect {
0x1f84f4…1f8688 f00 = 0x00a0 // 0x1f84f4 @0x0
0x1f84f4…1f8688 f01 = 0x0004 // 0x1f84f6 @0x2
0x1f84f4…1f8688 gno = [ // 0x1f84f8 @0x4
0x1f84f4…1f8688 [0x00]: C0x00a0.0x0.0
0x1f84f4…1f8688 [0x01]: C0x00a0.0x1.0
0x1f84f4…1f8688 ]
0x1f84f4…1f8688 }
0x1f8688…1f881c Dummy {f00=0x00a0, f01=0x0190, f02=» 2 P IDENT DMINIT REL 8.2 78-09-15 870105040820 P : P MONCON B P REL 8.1 78-04-21 T P* p 8 P**************************************************** z P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P* DMINIT = DATA MANA
0x1f881c…1f89b0 Dummy {f00=0x00a0, f01=0x0190, f02=»****** b P* 0 P* ALLOCATE AND LINK FDB:S IN THE FDB AREA > P* CLEAR THE USE BIT AND THE BUFFER HEADER IN DM BUFFERS L 0 P* CLEAR USE BIT AND QUEUE ANCHOR IN TASBLK , P* CLEAR DM FILE CODE ENTRIES IN CD:TAB P* , P* DMINIT I
0x1f89b0…1f8b44 Dummy {f00=0x00a0, f01=0x0190, f02=» P EXTRN INIFLG P EXTRN CDTAB P EXTRN QFDBFL . P EXTRN FDBSTA D P EXTRN FDBEND Z P EXTRN CURBUF p P EXTRN BUFDMI P EXTRN BUFSNR P EXTRN BUFOR P EXTRN TASBLK P EXTRN TASQUE P EXTRN CDTABF P
0x1f8b44…1f8cd8 Dummy {f00=0x00a0, f01=0x0190, f02=» A3= LINK ROOT P* A6= AREA END ADDR PDMIN30 LDR A4,A3 < P ADR A4,A2 T P* f P* DIV W. 2 FOR 16 K LIMIT p P* P LDR A5,A4 P SRL A5,1 P LDR A1,A6 P SRL A1,1 P CWR A5,A1 " P RF(G) DMIN40 EN
0x1f8cd8…1f8e6c Dummy {f00=0x00a0, f01=0x018e, f02=»DB CHAIN P ADKL A15,4 P ABR* A15 $ P EJECT 6 P* D PDMINIT EQU * N . P* NO INITIALIZATIONS IF POWER FAIL RESTART b P* P LD A1,INIFLG P RF(Z) DMINEX P LDKL A2,QFDBFL FDB LENGTH P* $ P* CHAIN FDB:S IN
0x1f8e6c…1f9000 Dummy {f00=0x00a0, f01=0x0190, f02=» x P* P LDKL A3,CRNQUE+2 P ST A3,CRNQUE , P LDKL A2,CRBUFL B P LDKL A6,CRNEND Z P CF A15,DMIN30 r P* < P* CLEAR USE BIT AND BUFFER HEADER WORDS IN DM BUFFERS P* P LDKL A2,/FFFE P LD A3,CURBUF P
0x1f9000…1f9194 (1, 485) Dummy {f00=0x00a0, f01=0x4128, f02=»F P RB(NE) DMIN50 P* 8 P* CLEAR USE BIT AND QUEUE ANCHOR ADDRESS IN TASBLK * P CM TASBLK f P CM TASQUE x P* , P* CLEAR DM FILE CODE ENTRIES IN CD:TAB P* P* P* PDMINEX EQU * P ABL RTNA15 RETURN
0x1f9194…1f9328 Dummy {f00=0x00a0, f01=0x2008, f02=» PDMINEX EQU * P RTN A15 " P END 2@ >TASBLK P CM TASBLK P P CM TASQUE b P* t , P* CLEAR DM FILE CODE ENTRIES IN CDTAB ~ P* P LD A2,CDTAB PDMIN60 SUK A2,4 P LDR A3,A2 P ADKL A3,CDTAB
0x1f9328…1f94bc Dummy {f00=0x00a0, f01=0x018e, f02=» EASETB0 , ( B 8W D J$ T L T V , ( #$@W E . E . X V ? T B F TENDIO v & " = * X(@( H D ! . . . . . . . . . H D ! ! . #
0x1f94bc…1f9650 Dummy {f00=0x00a0, f01=0x4132, f02=» J H D ! TV P W P 5T KT S . gU, Wf U WF W P J P H D !J 7P I D mW uP& . U , P P* T U W R PB !P< #W T H D ! + . AP GW MP eV" kP qP: uP6 wW T* R T P P( P" , ( P P P W T T
0x1f9650…1f97e4 Dummy {f00=0x00a0, f01=0x2008, f02=» DMTEX2 @ EXITI L ND900 QUL
0x1f97e4…1f9978 Dummy {f00=0x00a0, f01=0x0190, f02=» h IHCRY INTSAV * & X Z6 A _B A , , ( @ X (@ 4 W I X Z , ( 3 4 ;DR Q B , ( S ;AY B U Y C T , ( ! s Q P &W -W /W A L
0x1f9978…1f9b0c Dummy {f00=0x00a0, f01=0x0190, f02=» Q @ N T D W z , ( :#@'=" @ L Q @ N R Q ;A , ( Y T ;AT @ L L @ N , W J , ( 3 [.<(+^!$*);] ,%_>? Y ? z , ( S @ T X 1 PR B T X , ( s 0 :ET P OFT Y .
0x1f9b0c…1f9ca0 Dummy {f00=0x00a0, f01=0x4106, f02=» P U W -W ;R =Q G R K ` [U e f H D ! q oT yW }W W Q` V8 R W Pn Qf T^ H H D ! W` QJ RB Q> T2 T. % 2 1W 3 8 5 > 7 D U WTD eR, mT {T T @
0x1f9ca0…1f9e34 (1, 486) Opaque[0x194]
0x1f9e34…1f9fc8 # DirEnt {nam=»DMSUBX«, typ=»SC«, f00=0x1e12, f01=0x5400, f02=0x1410, f03=0x948c}
0x1f9e34…1f9fc8 IdxSect {
0x1f9e34…1f9fc8 f00 = 0x00a0 // 0x1f9e34 @0x0
0x1f9e34…1f9fc8 f01 = 0x000c // 0x1f9e36 @0x2
0x1f9e34…1f9fc8 gno = [ // 0x1f9e38 @0x4
0x1f9e34…1f9fc8 [0x00]: C0x00a0.0x2.0
0x1f9e34…1f9fc8 [0x01]: C0x00a0.0x3.0
0x1f9e34…1f9fc8 [0x02]: C0x00a1.0x0.0
0x1f9e34…1f9fc8 [0x03]: C0x00a1.0x1.0
0x1f9e34…1f9fc8 [0x04]: C0x00a1.0x2.0
0x1f9e34…1f9fc8 [0x05]: C0x00a1.0x3.0
0x1f9e34…1f9fc8 ]
0x1f9e34…1f9fc8 }
0x1f9fc8…1fa15c Dummy {f00=0x00a0, f01=0x0190, f02=» 2 P IDENT DMSUBX REL 8.2 78-09-15 870105040820 P : * P BUF HANDL + SEQ L. 230-250,317-325 B P REL 8.1 78-04-21 p P* 8 P**************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P*
0x1fa15c…1fa2f0 Dummy {f00=0x00a0, f01=0x018e, f02=»************************************ 8 P****THIS MODULE IS ACTIVATED FROM :***************** , P* h P* DMTASK r P* P*************** P* ENTRIES * P*************** P* P ENTRY FNDKMX,CHKKEY P ENTRY RDNXT
0x1fa2f0…1fa484 Dummy {f00=0x00a0, f01=0x0190, f02=» | P* P EXTRN MPYMOD : P EXTRN EXTLEN,FDBECB,FDBMIA,BUFSTA,FDBRLE,FDBSNR,ECBCW ( . P EXTRN FDBRRO,FDBCEX,FDBBLF,EXTBAS,BUFSNR f . P EXTRN FDBLRN,FDBMRO,FDBCRL,FDBADF,CRNCIF 4 P EXTRN DMTIOT,GTLGRN,GTBKBU,ADDMOD,CALSNO,DMTRBU P EXTRN
0x1fa484…1fa618 Dummy {f00=0x00a0, f01=0x0190, f02=»Y IN A MASTER INDEX. l > P* A BINARY SEARCH IS USED. REF : KNUTH PAGE 411 ALG. U. 4 P* THE SEARCH KEY MAY BE TERMINATED WITH A /EE. ^ 0 P* THE FIRST TWO WORDS IN MASTER INDEX IS : P* - NO OF ENTRIES N $ P* - NO OF CHARACTERS PER ENTRY
0x1fa618…1fa7ac Dummy {f00=0x00a0, f01=0x0190, f02=»ESS OF SEARCH KEy P* A11 = NR OF CHAR IN KEY P* > P* CF A14,FNDKMX H P* d 8 P****EXIT PARAMETERS********************************* n P* 0 P* A1,A2 = LODGICAL RECORD NO IN INDEX FILE P* A8,A11= UNCHANGED P*
0x1fa7ac…1fa940 Dummy {f00=0x00a0, f01=0x0190, f02=»* A2,A5 NO OF ENTRIES N " P RF(NP) FND045 NO MASTER INDEX P LDR A9,A2 F P ANKL A9,/1 GET BIT 15 X P SRA A2,1 v P LDR A10,A2 M=N/2 FLOOR P ADR A9,A2 I=N/2 CEILING P ADK A5,2 TABLE BASE - 2 PFND020 EQU * P LDK A2,0
0x1fa940…1faad4 (1, 487) Dummy {f00=0x00a0, f01=0x0190, f02=»=(I-1)*EL | P SRC A1,1 P ORR A2,A1 GET MOST SIGN BIT $ PFND025 EQU * H " P ADR A2,A5 ADD MI BASE ADR - 2 P ADK A2,2 ENTRY KEY ADR P LDR A1,A2 SAVE ENTRY ADR P LDR A3,A8 SEARCH KEY ADR P LDR A6,A11 MAX KEY LENGTH P
0x1faad4…1fac68 Dummy {f00=0x00a0, f01=0x0190, f02=»1 M/2 FLOOR P ADR A6,A7 M/2 CEILING P LDR A3,A3 CHKKEY RTN INF 2 . P RF(NG) FND040 SEARCHED KEY LESS OR EQUAL T P* P* SEARCHED KEY GREATER P* P LDR A10,A10 M P RF(Z) FND050 SEARCH READY P ADR A9,A6 I=I+(M/2 CE
0x1fac68…1fadfc Dummy {f00=0x00a0, f01=0x0190, f02=»0 SEARCH READY P SUR A9,A6 I=I-(M/2 CEIL) P RB FND030 8 PFND045 EQU * NO MASTER INDEX J P LDK A1,0 n P LDK A2,1 REC NR 1 P RF FND070 PFND050 EQU * P ADR* A1,A5 ARDR NEXT ENTRY PFND060 EQU * P LDR A3,A1 ENTRY
0x1fadfc…1faf90 Dummy {f00=0x00a0, f01=0x018e, f02=»CR A1,A3 P ADK A3,1 P LCR A2,A3 " P ADK A3,1 4 P ECR A2,A2 F P LCR A2,A3 X PFND070 EQU * j P RTN A14 ~ P EJECT 8 P****DESCRIPTION************************************* P* D P* CHKKEY COMPARE TWO CHARACTER STRIN
0x1faf90…1fb124 Dummy {f00=0x00a0, f01=0x0190, f02=» P* P* A2 = ADR OF ENTRY KEY P* A3 = ADR OF SEARCH KEY 0 * P* A6 = MAX NO OF CAHARACTERS IN KEY R 2 P* A7 = REL NO OF FIRST CHAR TO CHECK IN KEY P* P* CF A14,CHKKEY P* 8 P****EXIT PARAMETERS***************
0x1fb124…1fb2b8 Dummy {f00=0x00a0, f01=0x0190, f02=»ER j ( P* = -1 WHEN SEARCH KEY IS LESS N P* A7 = REL NO OF NEXT CHAR TO CHECK = NO OF SAME CHARACTERS IN WHOLE KEY 6 " P* A6 = MAX NO OF CHAR IN KEY P* 8 P****USED REGISTERS********************************** P* P* A2-A4,
0x1fb2b8…1fb44c Dummy {f00=0x00a0, f01=0x018e, f02=» TO TEST x $ P ADR A2,A7 FIRST EC CHAR TO TEST PCHK020 EQU * 8 P LCR A4,A3 SEARCED KEY CHAR L P CCK A4,/EE00 p " P RF(E) CHK060 END OF KEY CHAR P CCR A4,A2 SC=EC? P RF(G) CHK100 SC GT TH EC " P RF(L) CHK120 SC LESS THAN EC
0x1fb44c…1fb5e0 Dummy {f00=0x00a0, f01=0x0190, f02=» v P ADK A2,1 NXT EC TO TEST P RB CHK020 ( PCHK060 EQU * < P LDK A3,0 FOUND P P RF CHK140 h PCHK120 EQU * z $ P LDKL A3,-1 SEARCHED KEY SMALLER P RF CHK140 PCHK100 EQU * $ P LDK A3,1 SEARCHED KEY SGREATER PCHK1
0x1fb5e0…1fb774 (1, 488) Dummy {f00=0x00a1, f01=0x0190, f02=»E NEXT RECORD IN AN INDEX FILE AVAILABLE | P* IN A CORE BUFFER 0 D P* WHEN NO RECORD IS READ BEFORE, THE FIRST RECORD IN SPECIFIED L & P* SECTOR WILL BE MADE AVAILABLE P* 8 P****ENTRY PARAMETERS******************************** P*
0x1fb774…1fb908 Dummy {f00=0x00a1, f01=0x0190, f02=»FER, WHEN = -1 THE FIRST j 8 P* RECORD IN CURRENT SECTOR IS WANTED : P* A3 = ADDRESS OF BLOCK BUFFER FROM PREVIOUS CALL IN > P* SAME DM-REQUEST. =0 WHEN NO BYUFFER IS ALLOCATED P* A8 = ECB ADDRESS P* 8 P****EX
0x1fb908…1fba9c Dummy {f00=0x00a1, f01=0x0190, f02=»+ 2 WHEN ERROR ~ P* A1 = FDB ADDRESS N P* A5 = ERROR CODE (RETURN CODE FOM PHYS I/O) WHEN NO BUFFER IS ALLOCATED 2 $ P* A2 = FDBRRO = RECORD OFFSET P* A3 = BUFFER ADDRESS * P* = 0 WHEN NO BUFFER IS ALLOCATED P* A8 = ECB A
0x1fba9c…1fbc30 Dummy {f00=0x00a1, f01=0x0190, f02=»STACK f P* : P****************************************************** P EJECT V PRDNXTR EQU * d P LDR A10,A3 SAVE BUFFER ADDR x P RF(NZ) RDN200 BUFFER EXIST P STR A7,A14 P SUKL A14,4 P ST A6,2,A14 P* P*
0x1fbc30…1fbdc4 Dummy {f00=0x00a1, f01=0x018e, f02=»READY IN CORE z P* P* READ SECTOR FROM DISC P* B P LDR A10,A3 BUFFER ADDR L $ P LDK A7,/91 PHYS READ WITH WAIT l P LKM P DATA 1 & P CF A14,DMTIOZ CHECK RETURN CODES P LDR A1,A1 P RF(NZ) RDN900 ERROR P
0x1fbdc4…1fbf58 Dummy {f00=0x00a1, f01=0x0190, f02=» P RF RDN940 RETURN P* P* BUFFER WAS BEFORE ( P* F PRDN200 EQU * P $ P LD A2,FDBRRO,A1 REC ORD OFFSET d P RF(NN) RDN220 NOT FIRST REC P STR A7,A14 P SUKL A14,4 P ST A6,2,A14 P RB RDN080 FIRST REC WANTED
0x1fbf58…1fc0ec Dummy {f00=0x00a1, f01=0x0190, f02=»T v * P RF(NL) RDN300 THIS REC LAST IN BUFFER P* 8 , P* GET NEXT REC IN CURRENT BLOCKBUFFER B P* r $ P AD A2,FDBRLE,A1 RECOR D LENGTH | P ADK A2,1 STATUS CHAR P ST A2,FDBRRO,A1 NEW OFFSET P RF RDN950 RETURN P* 4
0x1fc0ec…1fc280 Dummy {f00=0x00a1, f01=0x018e, f02=»,A14 P LD A3,FDBCEX,A1 EXT ADDR P LD A5,EXTBAS,A3 EXT BASE . " P AD A5,EXTLEN,A3 EXTENT LENGTH P P SUK A5,1 v $ P CW A5,FDBSNR,A1 SECT NO CURRENT , P RF(NG) RDN400 IT WAS LAST REC IN EXTENT P* P* NEW SECTOR P*
0x1fc280…1fc414 (1, 489) Dummy {f00=0x00a1, f01=0x0190, f02=» PRDN400 EQU * P LDR A13,A8 ECB ADDR " P CF A14,GTLGRN GET LOG REC NO 8 P LDR A1,A2 ^ P LDR A2,A3 p P LDK A6,0 P LDK A7,1 P CF A14,ADDMOD NEXT REC NO P LDR A6,A5 RESTORE FDB ADDR * P CF A14,CALSNO GET NEXT REC
0x1fc414…1fc5a8 Dummy {f00=0x00a1, f01=0x0190, f02=»* GET NEXT SECTOR P* PRDN500 EQU * & P LDR A3,A10 BUFFER ADDR : " P CF A14,DMTRBU RELEASE BUFFER Z P LDR A1,A6 FDB ADDR P RB RDN040 NEXT SECTOR P* P* EXIT P* PRDN900 EQU * P LDR A5,A1 RET CODE
0x1fc5a8…1fc73c Dummy {f00=0x00a1, f01=0x0190, f02=»RDN960 EQU * P LDK A3,2 P ADS A3,8,A14 RET ADDR & P LDK A3,0 BUFFER ADDR D PRDN940 EQU * b P LD A6,2,A14 v P ADKL A14,4 P LDR* A7,A14 PRDN950 EQU * P RTN A14 P EJECT 8 P****DESCRIPTION*********************
0x1fc73c…1fc8d0 Dummy {f00=0x00a1, f01=0x0190, f02=»Y l 6 P* IF END OF FILE, THE FIRST FREE RECORD IS FOUND P* D 8 P****ENTRY PARAMETERS******************************** N P* P* A1 = FDB ADDRESS P* A8 = SEARCH KEY ADDR & P* A11 = NO OF CHARACTERS IN KEY " P* A13= PHYSI
0x1fc8d0…1fca64 Dummy {f00=0x00a1, f01=0x0190, f02=» FDBSNR,FDBRRO = FOUND INDEX RECORD " P* A2 = 0 WHEN KEY ISS FOUND 0 2 P* = /4000 WHEN NEXT HIGHER KEY IS FOUND V . P* = RETURN CODE WHEN KEY IS NOT FOUND 4 P* BIT 1 CAN NEVBER BE SET BY DISC DRIVER P* A3 = BUFFER AD
0x1fca64…1fcbf8 Dummy {f00=0x00a1, f01=0x018e, f02=»A11 = UNCHANGED P* 8 P****USED REGISTERS********************************** " P* ^ , P* A1 - A11,A13 + 4 WORDS ON A14 STACK h P* : P****************************************************** P EJECT PFNDKEY EQU * P*
0x1fcbf8…1fcd8c Dummy {f00=0x00a1, f01=0x0190, f02=» n P SUKL A14,8 & P ST A8,6,A14 SAVE SEARCH KEY ADDR 0 P CF A14,FNDKMX GET KEY ENTRY IN MASTER INDEX F P LD A6,8,A14 FDB ADDR z P CF A14,CALSNO GET PHYS ADDR P LDR A1,A1 P RF(NZ) FKY900 ERROR P LDR A1,A6 FDBADDR " P LDR
0x1fcd8c…1fcf20 Dummy {f00=0x00a1, f01=0x0190, f02=» | PFKY100 EQU * P LDR A3,A9 BUFFER ADDR $ P CF A14,RDNXTR GET INDEX RECORD : P RF FKY150 b P LDR A1,A5 RET CODE t P RF FKY900 ERROR EXIT P* " P* BUFFER AND ADATA IS FOUND P* PFKY150 EQU * P LDR A9,A3 B
0x1fcf20…1fd0b4 (1, 490) Dummy {f00=0x00a1, f01=0x0190, f02=»STATUS CHAR v P LDK A5,/FF USED CHAR MARK P CCR A5,A10 STATUS CHAR 6 P RF(E) FKY200 USED RECORD V P* x & P* NO MORE RECORDS IN THIS SECTOR P* * P LD A13,FDBRRO,A1 SAVE CURRENT OFFSET P LD A4,FDBMRO,A1 & P ST A4,FDB
0x1fd0b4…1fd248 Dummy {f00=0x00a1, f01=0x0190, f02=»R t P LDR A6,A11 NR OF CHAR P LDR A7,A10 CHAR ADDR ( P CC A2,FDBLRN,A1 F P RB(L) FKY100 NOT EOF ^ P RF(G) FKY180 EOF | P CW A3,FDBLRN+1,A1 P RB(L) FKY100 NOT EOF PFKY180 EQU * P* P* EOF IS IN THIS SECTOR
0x1fd248…1fd3dc Dummy {f00=0x00a1, f01=0x0190, f02=»Y950 P* " P* CHECK KEY IN THIS RECODRD P* < PFKY200 EQU * F P LD A3,6,A14 SEARCH KEY ADDR Z P CF A14,CHKKEY COMPARE KEYS ~ P LDR A3,A3 & P RF(P) FKY840 SEARCHED KEY GREATER " P RF(N) FKY850 SEARCH KEY LESS P RF
0x1fd3dc…1fd570 Dummy {f00=0x00a1, f01=0x0190, f02=» AT LEAST THE SAME NO OF LEADING CHARACTERS : P* THAT HAS BEEN CHECKED FOR THIS KEY ! D . P LC A7,-4,A10 REDUCE NO OF SAME CHARACTERS ! P RB FKY100 NEXT KEY ! PFKY850 EQU * ! P LDKL A2,/4000 KEY NOT FOUND ! P
0x1fd570…1fd704 Dummy {f00=0x00a1, f01=0x0190, f02=»DR A2,A1 ERR CODE ! $ P LDK A7,0 NO OF SAME LEAD CHARS " PFKY950 EQU * " B P ADKL A14,8 RESTORE STACK " V P LDR* A1,A14 FDB ADDR " x P LDR A3,A9 BUFFER ADDR " P RTN A14 " P EJECT " P* " J P* CRNUPD UPDATES CRN-BUFFERS SO THAT RECOR
0x1fd704…1fd898 Dummy {f00=0x00a1, f01=0x0190, f02=» A10,A11= FIRST RECORD NR MOVED " P* A5 = FDB ADDR INDEX # ( & P* A12 = ADD PARAMETER +1, -1 # L P* # v P* USED REGISTERS: # P* A1 -A12 # P* # P* OUT: # P* A5 = FDB ADDR INDEX # P* A10,A11 = UNCHANGED #
0x1fd898…1fda2c Dummy {f00=0x00a1, f01=0x0190, f02=»RL,A12 CRN LINK ROOT # P RF CRU120 $ PCRU100 LDR* A12,A12 $ . $ PCRU120 RF(Z) CRU900 END OF LINK $ J P LC A7,FDBECB+1,A5 FILE CODE $ r P CC A7,CRNCIF,A12 $ P RB(NE) CRU100 WRONG FC $ P CC A10,CRNCIF+1,A12 $ P RB(G) CRU100 $ P RF(L)
0x1fda2c…1fdbc0 Dummy {f00=0x00a1, f01=0x0190, f02=» RB(L) CRU100 $ P CW A9,CRNCIF+2,A12 % P RB(L) CRU100 % 2 PCRU300 EQU * % H P* % P* UPDATE CRN % f P* % | P LD A7,2,A14 ADD PARAM % P LDR A6,A7 % P RF(N) CRU230 -1 % P LDK A6,0 % PCRU230 EQU * % P ANKL A7,/7FFF %
0x1fdbc0…1fdd54 (1, 491) Dummy {f00=0x00a1, f01=0x4078, f02=»CIF+2,A12 % P RB CRU100 & PCRU900 EQU * & $ P ADKL A14,2 & 8 P ENB & L P RTN A14 & X P END & h@ & t
0x1fdd54…1fdee8 Dummy {f00=0x00a1, f01=0x2008, f02=» ' + t P INH , P CF A15,TENDIO , P ENB , 2 P* , > P* EXIT , H P* , X P LKM , b P DATA 3 , n P* , ~ P END , @ , RD ADDR A2:=EA BIT + & P C1R A2,A2 ONE COMPLEMENT BIT MASK + P ANRS A2,A3 SET OFF EA BIT + P* +
0x1fdee8…1fe07c Dummy {f00=0x00a1, f01=0x0190, f02=» * P IDENT INTLT4 REL=8.1 DATE=78-04-01 P* 2 @ P* INTERRUPT TABLE FOR DEVICES CONNECTED TO CHANNEL UNIT NO.1 < P* FOR LOCAL TERMINALS D P* THIS TABLE CONTAINS POINTERS TO DEVICE WORK TABLES ASSOCIATED D P* WITH DEVICES CONNECTED TO A SPEC
0x1fe07c…1fe210 Dummy {f00=0x00a1, f01=0x40f0, f02=»TRY z P* P* TERMINAL PARAMETERS P* 6 P* @ , P* RIGHT BYTE = 2 * NUMBER OF DEVICES J P* z P* P* P* PINTLT4 EQU * TABLE ENTRY P* P* P* P END @ ICES CONNECTED TO A SPEC
0x1fe210…1fe3a4 Dummy {f00=0x00a1, f01=0x2008, f02=» NAL PARAMETERS 0 P* LEFT BYTE = 2 * NUMBER OF INPUT DEVICES 4 P* AND DEVICES WITH DATA REQUESTS R , P* RIGHT BYTE = 2 * NUMBER OF DEVICES P* 4 P* NOTE: PRINTERS ARE TREATED AS INPUT DEVICES P* P*
0x1fe3a4…1fe538 Dummy {f00=0x00a1, f01=0x0190, f02=»: DWT-ADDRESS P* A7: ORDER " P* A8: ECB-ADDRESS 6 P* P* f P* SYSTEM ADAPTATION p P* P EJECT P* P* P*********************** P* ENTRIES * P**************
0x1fe538…1fe6cc Dummy {f00=0x00a1, f01=0x0190, f02=» * p * P************************************* P EXTRN SAVE8 SAVE REGS : P EXTRN TENDIO END I/O X . P EXTRN DISEND PERFORM END I/O AND DISPATCH v " P EXTRN TDISP DISPATCHER ENTRY P EXTRN OUTPUT OUTPUT CHAR. * P EXTRN LDREG LOAD REGIST
0x1fe6cc…1fe860 Dummy {f00=0x00a1, f01=0x0190, f02=»OR ORDER * P EXTRN ECHRTN RETURN FROM ECHO ROUTINE P* > P* H $ P******************************* R $ P* CONSTANTS * z $ P******************************* P* PDWTBC EQU /3 P* P**********************
0x1fe860…1fe9f4 (1, 492) Opaque[0x194]
0x1fe9f4…1feb88 # DirEnt {nam=»DMFDB «, typ=»SC«, f00=0x8226, f01=0x3ae1, f02=0x1440, f03=0x0002}
0x1fe9f4…1feb88 IdxSect {
0x1fe9f4…1feb88 f00 = 0x00a2 // 0x1fe9f4 @0x0
0x1fe9f4…1feb88 f01 = 0x0004 // 0x1fe9f6 @0x2
0x1fe9f4…1feb88 gno = [ // 0x1fe9f8 @0x4
0x1fe9f4…1feb88 [0x00]: C0x00a2.0x0.0
0x1fe9f4…1feb88 [0x01]: C0x00a2.0x1.0
0x1fe9f4…1feb88 ]
0x1fe9f4…1feb88 }
0x1feb88…1fed1c Dummy {f00=0x00a2, f01=0x018e, f02=» 0 P IDENT DMFDB REL 8.2 78-09-15 870105040820 P 8 P* @ 8 P**************************************************** J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* , P* DMFDB = FILE DESCRIPTOR BLOCKS FDB P* P* P*
0x1fed1c…1feeb0 Dummy {f00=0x00a2, f01=0x0190, f02=» H P* BY MEANS OF CONDITIONAL ASSEMBLY QFDBAR WORDS WILL BE ALLOCATED P* P P ENTRY FDBSTA Z P ENTRY FDBEND p P ENTRY QFDBFL P ENTRY CRNQUE,CRBUFL P ENTRY CRNEND P ENTRY MXIND P EJECT P* 6 P* MXSIZ IS T
0x1feeb0…1ff044 Dummy {f00=0x00a2, f01=0x0190, f02=» EQU 12 SIZE CRN BUFFER P* < P* CRNBAR IS THE SIZE OF THE CRN BUFFER ARERA IN WORDS * 4 P* WHERE CRBUFL BYTES ARE USED FOR EACH BUFFER j P* PX:B EQU 50 PCRNBAR EQU X:B CURRENCY AREA P* P* PX:A EQU 250
0x1ff044…1ff1d8 Dummy {f00=0x00a2, f01=0x0190, f02=» EQU X:A P* & PQFDBFL EQU 96 FDB FIX PART LENGTH P* D P EJECT N P* PFDBSTA EQU * f P RES QFDBAR z PFDBEND EQU * PCRNQUE DATA 0 CRN LINK ROOT P RES CRNBAR PCRNEND EQU * * PMXIND DATA MXINDE-* LENGTH
0x1ff1d8…1ff36c Dummy {f00=0x00a2, f01=0x40e0, f02=»0,0,0,0,0,0,0,0 z * P DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 P XIF F PMXINDE EQU * END INDEX INDEX R 2 P DATA 0,0 SIGNIFICANT ZEROES AFTER INDEXINDEX v PMXAR EQU * P RES MXSIZ P END @ EQU * * PMXIND DATA MXINDE-* LENGTH
0x1ff36c…1ff500 Dummy {f00=0x00a2, f01=0x2008, f02=» PFDBSTA EQU * P RES QFDBAR PFDBEND EQU * 2 P END F@ R OF CONDITIONAL ASSEMBLY QFDBAR WORDS WILL BE ALLOCATED J P* P ENTRY FDBLEN P ENTRY FDBSTA P ENTRY FDBEND P ENTRY QFDBFL P* P*
0x1ff500…1ff694 (1, 493) Dummy {f00=0x00a2, f01=0x0190, f02=» * P* READ SECTOR N * P* * : P********************** X P* v 0 PREAD:N CF A5,WER:R EXECUTE WER INSTRUCTIONS P CF A5,READ READ SECTOR N P ANK A1,/F $ P RF(Z) READ10 OK. NO RETURN CODE
0x1ff694…1ff828 Dummy {f00=0x00a2, f01=0x0190, f02=»******************* P* * P* CHECK CYLINDER NUMBER * @ P* * d P*************************** P* P* 4 PREAD10 LD A2,DWTCYL,A6 REQUESTED CYLINDER NUMBER 6 P CW* A2,2,A8 COM
0x1ff828…1ff9bc Dummy {f00=0x00a2, f01=0x0190, f02=»RDU01 P P P* P********************* ( P* * F P* TEST STATUS * d P* * P********************* P* 4 PTEST LDKL A2,DWTNAM VOLUME NAME DWT DISPLACEMENT P ADR A2,
0x1ff9bc…1ffb50 Dummy {f00=0x00a2, f01=0x018e, f02=»A2,10,A8 SAVE ADDRESS TO VOLUME NAME P SUR A1,A1 SET RETURN CODE=0 , P ABL END:IO PEABLORM ENDIO P P EJECT DRDU01 r P P P* " P****************************** " P* * " P* EXECUTE WER INSTRUCTI
0x1ffb50…1ffce4 Dummy {f00=0x00a2, f01=0x0190, f02=» l & P LDKL A3,BUF DRIVER BUFFER ADDRESS P RF EX:WER 2 P D P L & PWER:R LDKL A2,/80CD READ 1 SECTOR T P CWK A3,BUF ~ P RF(E) EX:WER P RF WER:WB P P & PWER:W LDKL A2,/C0CD WRITE 1 SECTOR * PWER:WB LD A3,2,A8 US
0x1ffce4…1ffe78 Dummy {f00=0x00a2, f01=0x018e, f02=» P EJECT DRDU01 P P $ P* , P******************* 6 P* * R P* SEEK CYLINDER * n P* * P******************* P* ( PSEEK LD A2,DWTCYL,A6 CYLINDER NUMBER P SLL A2,3
0x1ffe78…20000c Dummy {f00=0x00a2, f01=0x0190, f02=» t P P ( PREAD5 LC A2,DWTSEC,A6 SECTOR NUMBER P ANK A2,/1F D P SUK A2,3 SECTOR N-1 X P ANK A2,/1F t P SLL A2,2 P RF CIO EXECUTE CIO-START P EJECT DRDU01 P P & PREAD LC A2,DWTSEC,A6 SECTOR NUMBER
0x20000c…2001a0 Dummy {f00=0x00a2, f01=0x0190, f02=» , P ST* A2,2,A8 PUT CYLNMB. IN USER BUFFER " P LC A2,DWTSEC,A6 SECTOR NUMBER 4 P SLL A2,2 Z P ADK A2,1 l P EJECT DRDU01 ~ P P P PCIO EQU * P P PEX:CIO LC A1,DWTOR,A6 P ANK A1,1 INDEX P A
0x2001a0…200334 (1, 494) Opaque[0x194]
0x200334…2004c8 # DirEnt {nam=»DFTAB «, typ=»SC«, f00=0x5600, f01=0x1908, f02=0x1450, f03=0x1502}
0x200334…2004c8 IdxSect {
0x200334…2004c8 f00 = 0x00a2 // 0x200334 @0x0
0x200334…2004c8 f01 = 0x0002 // 0x200336 @0x2
0x200334…2004c8 gno = [ // 0x200338 @0x4
0x200334…2004c8 [0x00]: C0x00a2.0x2.0
0x200334…2004c8 ]
0x200334…2004c8 }
0x2004c8…20065c Dummy {f00=0x00a2, f01=0x0190, f02=» 0 P IDENT DFTAB REL 8.2 78-09-15 870105040820 P UPDATE #0 76.10.07 8 P* V 8 P**************************************************** ` P* $ P* PHILIPS TERMINAL SYSTEM PTS P* & P* DFTAB = DISC FILE CODE TABLE P*
0x20065c…2007f0 Dummy {f00=0x00a2, f01=0x40fe, f02=»************************ t P* P* DISC FILE CODE TABLE * P* J P ENTRY DFTAB T P ENTRY DFTABE h P* ~ P* PDFTAB EQU * P DATA /F0F1,/F2F3 P DATA /F8F9,/FAFB PDFTABE EQU * P END @ P*
0x2007f0…200984 Dummy {f00=0x00a2, f01=0x2008, f02=» NT DFTAB P* P* DISC FILE CODE TABLE " P* B P ENTRY DFTAB L P ENTRY DFTABE ` P* v P* PDFTAB EQU * P DATA /F0F1 PDFTABE EQU * P END @ END P ENTRY QFDBFL P* P*
0x200984…200b18 Dummy {f00=0x00a2, f01=0x4046, f02=»ATA MSAD P DATA ODAD P DATA TPAD3 " P END 6@ BATA 0 > PINTLT4 DATA 0 T PINTRT1 DATA 0 j PINTRT2 DATA 0 PINTRT3 DATA 0 PINTRT4 DATA 0 P DATA MONCON P DATA KBAD3 P DATA KBAD P DATA TPAD
0x200b18…200cac Dummy {f00=0x00a2, f01=0x2008, f02=» DATA DYAD P* P* $ P END .@ : DYAD 8 P* L P* V P* ` PMONTAB EQU * j PTCTAB DATA 0 ~ PCDTAB DATA 0 PBLOCKS DATA 0 PDCTAB DATA 0 PINTLT1 DATA 0 PINTLT2 DATA 0 PINTRT1 DATA
0x200cac…200e40 Dummy {f00=0x00a2, f01=0x0190, f02=»DR* A3,A2 CRN $ P ADK A3,1 CRN+1 % $ P ST A3,10,A8 STORE CRN+1 IN ECB % . P CWR A3,A7 % V P RF(NL) SQR:10 END OF DATA % h P CF A5,BIO:RE % P LDKL A4,BUF BUFFER ADDRESS % 2 P CF A5,FD:REA READ SECTOR POINTED AT BY CRN+1 % P LDK A7,128 %
0x200e40…200fd4 (1, 495) Opaque[0x194]
0x200fd4…201168 # DirEnt {nam=»TTABD0«, typ=»SC«, f00=0x9da0, f01=0x0001, f02=0x1458, f03=0x5f28}
0x200fd4…201168 IdxSect {
0x200fd4…201168 f00 = 0x00a2 // 0x200fd4 @0x0
0x200fd4…201168 f01 = 0x0002 // 0x200fd6 @0x2
0x200fd4…201168 gno = [ // 0x200fd8 @0x4
0x200fd4…201168 [0x00]: C0x00a2.0x3.0
0x200fd4…201168 ]
0x200fd4…201168 }
0x201168…2012fc Dummy {f00=0x00a2, f01=0x0190, f02=» 2 P IDENT TTABD0 REL 8.2 78-09-15 870105040820 P* LREK 78-02-20 : P* T 8 P**************************************************** ^ P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P* P*
0x2012fc…201490 Dummy {f00=0x00a2, f01=0x0190, f02=» $ P* TERMINAL 01: TELLER TERMINAL P* 0 P ENTRY TTABD0 TABLE ENTRY : PX:A EQU 0 4 PRECBFZ EQU X:A INDEX RECORD BUFFER SIZE IN WORDS n P* P* PTTABD0 DATA 0 P DATA /8031 TASK LEVEL & P DATA 'D0' TERMINAL IDENTI
0x201490…201624 Dummy {f00=0x00a2, f01=0x4132, f02=»INAL SAVE AREA P RES 14 P* & " P DATA TTABE-* TERMINAL DEVICES 0 P DATA 0,0 MASTER INDEX ENTRY V PTTABE EQU * z P DATA 0,0,0,0,0,0,0,0 P DATA 0,0,0,0,0,0,0,0 P DATA 0 TASK STACK P RES RECBFZ BUFAR1 P RES RECBF
0x201624…2017b8 Dummy {f00=0x00a2, f01=0x2008, f02=» ES | PTTABE EQU * P* & P END 0@ <LER TERMINAL , P* T P* ^ P ENTRY TTABX TABLE ENTRY h P* P* P* P* P* PTTABX DATA 0 P DATA 60 TERMINAL STATUS & P DATA /EE TERMINAL IDENTIF
0x2017b8…20194c Dummy {f00=0x00a2, f01=0x0190, f02=»TP220 EQU * P LDK A1,0 6 PTP230 LDKL A2,/FDFF VOUCHER STATUS CHANGE ALLOWED & P ANS A2,DWTST,A6 ` P EJECT x P* P* P* ECB-BUFFER IS WRITTEN P* * P* SEND LINE FEED IF JOURNAL OR TALLY P* P* P
0x20194c…201ae0 Dummy {f00=0x00a2, f01=0x018e, f02=» * P LDKL A1,MESS INDICATE MESSAGE PRINTED P ORS A1,DWTST,A6 6 P XIF N PTPLF10 EQU * Z P SUK A7,8 n ( P RF(NN) TPL010 NOT JOURNAL AND TALLY P ADK A7,2 GET INDEX TABLE $ P LC A2,LFTAB,A7 GET LF CHARACTER P CF A5,OUTPUT SEND
0x201ae0…201c74 (1, 496) Opaque[0x194]
0x201c74…201e08 # DirEnt {nam=»TTABD1«, typ=»SC«, f00=0x4dc0, f01=0x5c04, f02=0x1460, f03=0x001f}
0x201c74…201e08 IdxSect {
0x201c74…201e08 f00 = 0x00a3 // 0x201c74 @0x0
0x201c74…201e08 f01 = 0x0002 // 0x201c76 @0x2
0x201c74…201e08 gno = [ // 0x201c78 @0x4
0x201c74…201e08 [0x00]: C0x00a3.0x0.0
0x201c74…201e08 ]
0x201c74…201e08 }
0x201e08…201f9c Dummy {f00=0x00a3, f01=0x0190, f02=» 2 P IDENT TTABD1 REL 8.2 78-09-15 870105040820 P* LREK 78-02-20 : P* T 8 P**************************************************** ^ P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P* P*
0x201f9c…202130 Dummy {f00=0x00a3, f01=0x0190, f02=» $ P* TERMINAL 01: TELLER TERMINAL P* 0 P ENTRY TTABD1 TABLE ENTRY : PX:A EQU 0 4 PRECBFZ EQU X:A INDEX RECORD BUFFER SIZE IN WORDS n P* P* PTTABD1 DATA 0 P DATA /8031 TASK LEVEL & P DATA 'D1' TERMINAL IDENTI
0x202130…2022c4 Dummy {f00=0x00a3, f01=0x4132, f02=»INAL SAVE AREA P RES 14 P* & " P DATA TTABE-* TERMINAL DEVICES 0 P DATA 0,0 MASTER INDEX ENTRY V PTTABE EQU * z P DATA 0,0,0,0,0,0,0,0 P DATA 0,0,0,0,0,0,0,0 P DATA 0 TASK STACK P RES RECBFZ BUFAR1 P RES RECBF
0x2022c4…202458 Dummy {f00=0x00a3, f01=0x2008, f02=» ES | PTTABE EQU * P* & P END 0@ <LER TERMINAL , P* T P* ^ P ENTRY TTABX TABLE ENTRY h P* P* P* P* P* PTTABX DATA 0 P DATA 60 TERMINAL STATUS & P DATA /EE TERMINAL IDENTIF
0x202458…2025ec Dummy {f00=0x00a3, f01=0x0190, f02=»A3,1922 REQUESTED LENGTH K " P IM XRB SET READ BUFFER SWITCH L P CM FDWTUT L F P LDK A1,1 L X & P XRS A1,CACK INCREMENT ACK COUNTER L j P ABL POL127 L P XIF L P* L P* L P* ENQ HAS BEEN RECEIVED L P* L P* L PBRM400 EQU *
0x2025ec…202780 Dummy {f00=0x00a3, f01=0x0190, f02=»RREP REPEAT LAST CONTROL SEQUENCE L PBRM410 EQU * M * P ABL BRM M > P EJECT M N P* M P* M f P* NAK HAS BEEN RECEIVED M p P* M P* M PBRM500 EQU * M & P CF A5,HPTIM STOP PROCEDURE TIMER M P LD A1,XACK M P RF(NZ) BRM510 ACK
0x202780…202914 (1, 497) Opaque[0x194]
0x202914…202aa8 # DirEnt {nam=»M:PROC«, typ=»UF«, f00=0x855d, f01=0x0000, f02=0x1468, f03=0x3d49}
0x202914…202aa8 IdxSect {
0x202914…202aa8 f00 = 0x00a3 // 0x202914 @0x0
0x202914…202aa8 f01 = 0x0002 // 0x202916 @0x2
0x202914…202aa8 gno = [ // 0x202918 @0x4
0x202914…202aa8 [0x00]: C0x00a3.0x1.0
0x202914…202aa8 ]
0x202914…202aa8 }
0x202aa8…202c3c Dummy {f00=0x00a3, f01=0x016e, f02=» P$REL PMES @P PLED @P,/S,/EE,## P##DL 0 6 . P IDENT @P REL 8.2 78-09-15 870105040820 D P##EN v PKPF /S PASM /S PKPF /O PEND P$RELF PMES @P PLED @P,/S,/EE,## P##DL 0 . P IDENT @P RE
0x202c3c…202dd0 Dummy {f00=0x00a3, f01=0x2008, f02=» PMES @P PLED @P,/S,/EE,## P##DL 0 6 . P IDENT @P REL 8.2 78-09-15 870105040820 D P##EN v PKPF /S PASM /S PKPF /O PEND P$RELF PMES @P PLED @P,/S,/EE,## P##DL 0 . P IDENT @P RE
0x202dd0…202f64 Dummy {f00=0x00a3, f01=0x0190, f02=» A A A , ( Q A < Q P Q * MONCLO Z , ( R Y _ A _. n FREBLK * & 8XD Q Z P 0 9 , ( / _ _& P H H
0x202f64…2030f8 Dummy {f00=0x00a3, f01=0x40e2, f02=»ETU142 * & g A P " < H D ! 2 AP GP cP yV P V P J Q J Q P , ( R L !P 5 : ]Q q v @ / _ _& P H H
0x2030f8…20328c Dummy {f00=0x00a3, f01=0x0190, f02=» J F IDENT TPROC REL 8.1 78-04-21 870105040810 < 8 dTIO TWAIT TEXIT TACTOTK TPAUSE TIOQ20K TIOERR TPQUE R FNDDWTN |TIO DWTST * & @ R @ ATTACHR D
0x20328c…203420 Dummy {f00=0x00a3, f01=0x0190, f02=» TIODM DWTADRK , ( O P Y @ P X P X " * , ( i P P P H T H Z * & P H P I Y * & # C C '? Y DWTTDM DWTECB ,
0x203420…2035b4 (1, 498) Opaque[0x194]
0x2035b4…203748 # DirEnt {nam=»ATTACX«, typ=»SC«, f00=0x000b, f01=0x2020, f02=0x1470, f03=0x2020}
0x2035b4…203748 IdxSect {
0x2035b4…203748 f00 = 0x00a3 // 0x2035b4 @0x0
0x2035b4…203748 f01 = 0x0002 // 0x2035b6 @0x2
0x2035b4…203748 gno = [ // 0x2035b8 @0x4
0x2035b4…203748 [0x00]: C0x00a3.0x2.0
0x2035b4…203748 ]
0x2035b4…203748 }
0x203748…2038dc Dummy {f00=0x00a3, f01=0x0190, f02=» 2 P IDENT ATTACX REL 8.2 78-09-15 870105040820 P : * B ( #*********************************** L * x $ * PHILIPS TERMINAL SYSTEM PTS * : 5* ATTACX = DUMMY MODULE, USED IF ATTACH IS EXCLUDED * * P*
0x2038dc…203a70 Dummy {f00=0x00a3, f01=0x4096, f02=»NTRY ATT:CH EXTRN TIOERR * * ATTACH EQU * 4 DETACH EQU * H ABL TIOERR ATT:CH DATA 0 p END @ SYSTEM PTS * : 5* ATTACX = DUMMY MODULE, USED IF ATTACH IS EXCLUDED * * P*
0x203a70…203c04 Dummy {f00=0x00a3, f01=0x2008, f02=» * x * ENTRY ATTACH ENTRY DETACH 2 ENTRY ATT:CH H EXTRN TIOERR ^ * t ATTACH EQU * ~ DETACH EQU * ABL TIOERR ATT:CH DATA 0 END @ MODULE, USED IF ATTACH IS EXCLUDED
0x203c04…203d98 Dummy {f00=0x00a3, f01=0x0190, f02=»= ELEMENT ADDRESS OF RESULT OPERAND(FIRST OPERAND) P* : 2 P* EL2 = ELEMENT ADDRESS OF SECOND OPERAND D P* z P* P EJECT P* P* P************ P* ENTRIES: * P************ P* " P ENTRY T:ADD DECIM
0x203d98…203f2c Dummy {f00=0x00a3, f01=0x0190, f02=» ENTRY T:CMPC " P ENTRY T:CPA COMPARE ABSOLUTE P ENTRY T:CPAC < P ENTRY T:MOV MOVE R P ENTRY T:MOVC l P ENTRY T:OPA,T:OP1 P ENTRY T:OPS P ENTRY RETMMM " P ENTRY M:ADD,M:SUB,M:CMP,M:CPA P ENTRY M:MOV,M:OPA,M:OPS
0x203f2c…2040c0 Dummy {f00=0x00a3, f01=0x0190, f02=»EAS USED BY THE DIFFERENT SUBROUTINES * 8 P*************************************************** 0 P* l PT:OP1 EQU * v " P DATA 0 LENGTH 2-COMPLEMENTED P* P* & PT:OP2 DATA 0 LENGTH 2-COMPLEMENTED P* P* P EJECT
0x2040c0…204254 (1, 499) Opaque[0x194]
0x204254…2043e8 # DirEnt {nam=»DRFD01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1478, f03=0x2020}
0x204254…2043e8 IdxSect {
0x204254…2043e8 f00 = 0x00a3 // 0x204254 @0x0
0x204254…2043e8 f01 = 0x001a // 0x204256 @0x2
0x204254…2043e8 gno = [ // 0x204258 @0x4
0x204254…2043e8 [0x00]: C0x00a3.0x3.0
0x204254…2043e8 [0x01]: C0x00a4.0x0.0
0x204254…2043e8 [0x02]: C0x00a4.0x1.0
0x204254…2043e8 [0x03]: C0x00a4.0x2.0
0x204254…2043e8 [0x04]: C0x00a4.0x3.0
0x204254…2043e8 [0x05]: C0x00a5.0x0.0
0x204254…2043e8 [0x06]: C0x00a5.0x1.0
0x204254…2043e8 [0x07]: C0x00a5.0x2.0
0x204254…2043e8 [0x08]: C0x00a5.0x3.0
0x204254…2043e8 [0x09]: C0x00a6.0x0.0
0x204254…2043e8 [0x0a]: C0x00a6.0x1.0
0x204254…2043e8 [0x0b]: C0x00a6.0x2.0
0x204254…2043e8 [0x0c]: C0x00a6.0x3.0
0x204254…2043e8 ]
0x204254…2043e8 }
0x2043e8…20457c Dummy {f00=0x00a3, f01=0x018e, f02=» 2 P IDENT DRFD01 REL 8.2 78-09-15 870105040820 P : P LOAD BUG (EOD=74001) B P REL 8.1 78-04-121 b P* ~ 2 P********************************************** P* " P* PHILIPS TERMINAL SYSTEM PTS P* ( P* DRFD01 = DRIV
0x20457c…204710 Dummy {f00=0x00a3, f01=0x0190, f02=» ` 0 P* THIS DISK DRIVER HANDLES UP TO FOUR DAISY . P* CHAINED FLEXIBLE DISK DRIVES PTS 6879, < 0 P* CONNECTED TO CPU VIA CHANNEL UNIT CHFD ON n & P* MULTIPLEX OR PROGRAMMED CHANNEL P* P********* P* P* ORDERS: P*
0x204710…2048a4 Dummy {f00=0x00a3, f01=0x018e, f02=» /05 BASIC WRITE D P* /06 SEQUENTIAL WRITE -IBM DISC ONLY- P* /11 PHYSICAL READ b P* /15 PHYSICAL WRITE P* /1A SEARCH KEY P* /24 WRITE DELETED DATA P* /26 LOCK D P* /31 REWIND
0x2048a4…204a38 Dummy {f00=0x00a3, f01=0x0190, f02=» P* ENTRY PARAMETERS: P* P* A5 STACK BASE * P* A6 DWT-ADDRESS F P* A7 ORDER b P* A8 ECB-ADDRESS x P EJECT P* P*********** P* * P* ENTRIES * P* * P***********
0x204a38…204bcc Dummy {f00=0x00a3, f01=0x0190, f02=»RY DWFD01 DWT-ADDRESS P* P************* ( P* * > P* EXTERNALS * T P* * j P************* P* P EXTRN TDISP DISPATCHER P EXTRN TENDIO ENDIO P EXTRN DISIOE REQUEST ERROR P EXTRN D
0x204bcc…204d60 Dummy {f00=0x00a3, f01=0x0190, f02=»ETIMP TIMER & P EXTRN INIFLG INITIALIZATION FLAG & P EXTRN INTSAV INTERRUPT SAVE AREA > & P EXTRN TASCII EBCDIC TO ASCII TAB h & P EXTRN TEBCDIC ASCII TO EBCDIC TAB $ P EXTRN ECBBA ECB BUFFER ADDRESS & P EXTRN ECBRL ECB REQUESTED LENGTH
0x204d60…204ef4 (1, 500) Dummy {f00=0x00a4, f01=0x018e, f02=»******************** P* * P* CONDITIONAL ASSEMBLY * < P* * P************************ | P* . P* MULTIPLEX CHANNEL INSTEAD OF PROGRAMMED P* CHANNEL BY SETTING X:A = 0 P* PX:
0x204ef4…205088 Dummy {f00=0x00a4, f01=0x0190, f02=» PX:B EQU 0 PDAMA EQU X:B P* * < P* IBM LABELLED DISC HANDLING MAY BE INCLUDED BY SETTING 4 P* X:C = 1 t P* PX:C EQU 0 PIBM EQU X:C P* 0 P* IF INIMON IS TO BE USED, DRIVER SHOULD BE . P* ADAPTED FOR RES
0x205088…20521c Dummy {f00=0x00a4, f01=0x0190, f02=» * P* CONSTANTS * P* * " P************* 8 P* N & PCUADR EQU 09 CONTROL UNIT ADDRESS X & PMUXADR EQU CUADR+CUADR MUX-ADDRESS * PSTALEN EQU 512 MAX STANDARD SEC. LEN. ( PTOSLEN EQU 410 MAX TOSS SEC. LENGTH $ PIB
0x20521c…2053b0 Dummy {f00=0x00a4, f01=0x0190, f02=»ND OF DATA POSITION PTIME EQU 20 DELAY - POWER ON P******************** @ P* * P* DWT-DISPLACEMENTS* x P* * P******************** P* P PDWTA2 EQU /12 PDWTA3 EQU /14
0x2053b0…205544 Dummy {f00=0x00a4, f01=0x018e, f02=» P********** P* & PFDADR DATA FDAD ACTIVATION ADDRESS P* J P EJECT T P* b P************** l P* * P* ACTIVATION * P* * P************** P* PFDAD EQU * ACTIVATION ENTRY P
0x205544…2056d8 Dummy {f00=0x00a4, f01=0x0190, f02=» P CF A5,SETCIO A3,A4 AFFECTED ( P CM DWTRCW,A6 SAVE RETURN CODE WORD , P* X P* CHECK IF LOCKED b P* | $ P LD A1,DWTLC,A6 LOCK INDICATOR " P CF A5,FDIX GET BIT MASK IN A3 * P ST A3,DWTA3,A6 SAVE DRIVE INDEX MASK P ANR A
0x2056d8…20586c Dummy {f00=0x00a4, f01=0x0190, f02=» LOAD LOAD ORDER P LDKL A1,/8001 RETURN CODE P RF FD:090 ENDIO : P EJECT R P* ` P* ORDER? j P* | PFD:ORD EQU * P* P LDR A1,A7 P RF(Z) FD:070 TEST STATUS P SUK A1,1 P RF(Z) FD:040 PHYSICAL READ
0x20586c…205a00 Dummy {f00=0x00a4, f01=0x0190, f02=» FD:020 PHYSICAL WRITE P SUK A1,15 $ P RF(Z) FD:030 WRITE DELETED DATA 0 P SUK A1,/14 X P ABL(Z) UNLOAD UNLOAD ORDER l P IFT IBM=1 P ADK A1,/36 " P ABL(Z) SQREAD SEQUENTIAL READ P SUK A1,4 $ P ABL(Z) SQWRIT SEQUENTIAL
0x205a00…205b94 (1, 501) Dummy {f00=0x00a4, f01=0x018e, f02=»CH KEY ~ P XIF P PFD:DIS EQU * " P ABL DISIOE REQUEST ERROR 6 P EJECT X P* f P*************** p P* * P* BASIC WRITE * P* * P*************** P* PFD:010 CF A5,BIO
0x205b94…205d28 Dummy {f00=0x00a4, f01=0x0190, f02=» x P XIF P IFT IBM=1 , P LDR A7,A3 NO OF CHAR. TO BE TRANSFORMED & P CF A5,EBCDIC V PFD:018 EQU * l P XIF " P CF A5,FD:WRITE PERFORME WRITE P RF FD:048 GOTO FD:RC P* P****************** P* *
0x205d28…205ebc Dummy {f00=0x00a4, f01=0x0190, f02=»IO BITS 13-15 ~ P RB FD:015 P EJECT ( P* 6 P********************** @ P* * ^ P* WRITE DELETED DATA * | P* * P********************** P* PFD:030 CF A5,BIO P ORK A2,6
0x205ebc…206050 Dummy {f00=0x00a4, f01=0x018e, f02=»*************** P* PFD:040 CF A5,BIO:RE " P IFT DAMA+IBM=2 > P LD A1,DWTLAB,A6 V P AN A1,DWTA3,A6 n P RF(Z) FD:042 TOSS DISC P XIF P IFT IBM=1 P LDKL A4,BUF PFD:042 EQU * P XIF $ PFD:045 CF A5,FD:
0x206050…2061e4 Dummy {f00=0x00a4, f01=0x0190, f02=» P IFT IBM=1 P LD A7,ECBRL,A8 REQ LEN ( P LD A4,ECBBA,A8 ASCII OUTPUT ADDRESS 6 P CF A5,ASCII b PFD:047 EQU * v P XIF PFD:048 EQU * P ABL FD:RC P EJECT P IFT DAMA+IBM=0 P* P************** P*
0x2061e4…206378 Dummy {f00=0x00a4, f01=0x0190, f02=»DRESS x P LDR* A2,A4 KEY AREA LENGTH P LDR A1,A2 2 " P ABL(NP) END:10 ILLEGAL LENGTH D P SUK A1,128 j " P ABL(P) END:10 ILLEGAL LENGTH ~ P LDR A3,A2 P* * P* IF ODD CHANGE TO EVEN NO OF BYTES P* P ADK A3,1
0x206378…20650c Dummy {f00=0x00a4, f01=0x018e, f02=» CF A5,FD:WRI SEARCH KEY P LDR A3,A3 RETURN CODE P RB(NZ) FD:048 > P* T $ P* READ RECORD WITH KEY COMMAND ^ P* PFD:060 EQU * P LDKL A2,/8004 BIO P LD A3,4,A8 REQUESTED LENGTH P CWK A3,130 " P ABL(NE) END:10 IL
0x20650c…2066a0 Dummy {f00=0x00a4, f01=0x018e, f02=» ~ P* TEST STATUS * P* * P*************** 8 P* P PFD:070 EQU * Z P LDKL A2,/FFF9 BIO DUMMY n P CF A5,FD:WRI " P ANKL A3,/0201 WRITE PROTECT? P LDR A1,A3 P IFF DAMA+IBM=0 * P CF A5,VOLADR GET VO
0x2066a0…206834 (1, 502) Dummy {f00=0x00a4, f01=0x0190, f02=» n P AN A3,DWTA3,A6 P RF(Z) FD:080 TOSS LABEL P ORK A1,/20 SET BIT 10 (IBM) @ PFD:080 EQU * d P XIF x PFD:090 ABL END:IO P EJECT P* P******** P* * P* LOAD * P* * P******** P*
0x206834…2069c8 Dummy {f00=0x00a4, f01=0x018e, f02=»IBM=2 P* P* CHECK IF TOSS/IBM LABEL P* : P LDK A2,0 BIO D P LDKL A4,BUF Z P LDK A3,38 NO OF BYTES n P CF A5,FD:REA P CF A5,LD:RC P ADK A4,34 P LDR* A2,A4 P CWK A2,'TO' ( P RF(NE) LOA:10 IBM LABEL
0x2069c8…206b5c Dummy {f00=0x00a4, f01=0x0190, f02=» P* P* READ VOLUME NAME P* . P LDK A3,8 LENGTH 8 P LDK A2,0 BIO P * P C1 A1,DWTA3,A6 1 COMP. DRIVE BIT MASK f * P ANS A1,DWTLAB,A6 INDICATE TOSS LABEL P RF LOA:15 P XIF P IFT IBM=1 PLOA:10 LDK A3,10 LENGT
0x206b5c…206cf0 Dummy {f00=0x00a4, f01=0x0190, f02=»RN CODE BIT 10 P ORS A1,DWTRCW,A6 P XIF 0 P IFF DAMA+IBM=0 < PLOA:15 EQU * T P LDKL A4,BUF BUFFER ADDRESS h P CF A5,FD:REA P CF A5,LD:RC P LDK A1,2 P XIF P IFT IBM=1 P LD A7,DWTRCW,A6 $ P ANK A7,/2
0x206cf0…206e84 Dummy {f00=0x00a4, f01=0x0190, f02=» EQU * P XIF P IFF DAMA+IBM=0 P* 2 P* GET DWT VOL NAME ADDRESS < P* ` P CF A5,VOLADR ADDRESS TO A2 j P* P* STORE NAME IN DWT P* P LDK A3,3 PLOA:40 LD A4,BUF,A1 P STR A4,A2 P SUK A3,1
0x206e84…207018 Dummy {f00=0x00a4, f01=0x018e, f02=» P* DATA SET OPENING WANTED? P* * " P ANK A1,/2 A1: TOSS=6, IBM=8 4 P RF(NZ) LOA:70 TOSS LABEL Z P LC A1,DWTOR+1,A6 ORDER | P CCK A1,/2600 P RF(E) LOA:70 LOCK ORDER P* P* READ DATA SET LABEL P* P LD
0x207018…2071ac Dummy {f00=0x00a4, f01=0x0190, f02=» P ADK A2,25 P SLL A2,3 BIO P LDK A3,80 LENGTH , P LDKL A4,BUF F P CF A5,FD:REA Z P LDR A1,A3 RETURN CODE p P SLL A1,4 CHECK NO DATA BIT P RF(NN) LOA:60 NOT NO DATA 2 P ORKL A3,/2000 INDICATE ILLEGAL DATA SET LABEL
0x2071ac…207340 Dummy {f00=0x00a4, f01=0x0190, f02=»AVE IN DWT P ADK A4,BOE BOE ADDRESS . P CF A5,LOGSEC TRANSFORM TO LOGICAL SECTOR 2 P LDK A1,DWTBOE d $ P CF A5,STDWT STORE BOE NO IN DWT z P SUK A3,1 CRN P LDK A1,DWTCRN P CF A5,STDWT P ADK A4,EOE-BOE EOE ADDRESS P C
0x207340…2074d4 (1, 503) Dummy {f00=0x00a4, f01=0x0190, f02=» P CF A5,SETINH INHIBIT P LDK A1,DWTEOD " $ P CF A5,STDWT STORE EOD NO IN DWT 8 P* ` PLOA:70 EQU * j P XIF ~ P LD A2,DWTA3,A6 " P ORS A2,DWTLC,A6 INDICATE LOCK & PLOA:75 LD A3,DWTRCW,A6 RETURN CODE PLOA:80 ABL FD:RC
0x2074d4…207668 Dummy {f00=0x00a4, f01=0x018e, f02=» v P LDK A2,/C UNLOCK P CF A5,FD:REA " P RB LOA:75 8 P* J : P*---------------------------------------------------- T P* LD:RC SUBROUTINE P* PLD:RC ORS A3,DWTRCW,A6 P ANKL A3,/2007 FATAL ERROR P RB(NZ) LOA:90
0x207668…2077fc Dummy {f00=0x00a4, f01=0x0190, f02=» P* UNLOAD * P* * P********** ( P* : PUNLOAD EQU * D P IFT IBM=1 X P* j P* DATA SET OPEN? t P* P CF A5,DSOPCH A1,AFFECTED P LDR A7,A7 EOD P RF(Z) UNL:70 NOT OPEN 8 P ST A7,ECBCW,A8 STORE EO
0x2077fc…207990 Dummy {f00=0x00a4, f01=0x0190, f02=» & P CF A5,FD:REA READ DATA SET LABEL ! $ P CF A5,UNL:RC RETURN CODE CHECK ! . P ENB ! V P** ! b $ P*------------------------------ ! l < P* TRANSFORM RETURN CODE TO IBM SECTOR NO (EBCDIC-CODED) ! P* ! P CF A5,DSOPCH EOD-NO TO A7 ! P* !
0x207990…207b24 Dummy {f00=0x00a4, f01=0x0190, f02=» PUNL:20 ADK A7,27 " P* " P* A1 = BINARY TRACK NO " & * P* A7 = SECTOR NO WITHIN TRACK (0-25) " F P* " t ( P CF A5,BINDEC TRANSFORM SEC.NO TO A3 " ~ ( P LDKL A4,BUF+EOD+4 ADDRESS TO POS 79 " P SCR A3,A4 " P SUK A4,1 " P SRL A3,8 LEFT
0x207b24…207cb8 Dummy {f00=0x00a4, f01=0x0190, f02=»TR A3,A4 TRACK INTO BUF " P CF A5,SETINH INHIBIT # P* # > P* WRITE DATA SET LABEL # H P* # h P CF A5,DSLIO PREPARE FOR I/O # r P ORK A2,5 PHYSICAL WRITE # ( P CF A5,FD:WRITE WRITE DATA SET LEBEL # $ P CF A5,UNL:RC CHECK RETURN CODE #
0x207cb8…207e4c Dummy {f00=0x00a4, f01=0x018e, f02=»2,/C UNLOCK # P CF A5,FD:REA $ P ORS A3,DWTRCW,A6 $ * P ANK A3,1 $ D , P RF(NZ) UNL:80 NOT OPERABLE,STILL LOCKED $ V P LD A2,DWTA3,A6 INDEX MASK $ , P XRS A2,DWTLC,A6 INDICATE UNLOCK IN DWT $ PUNL:80 EQU * $ P RB LOA:75 END:IO $ P I
0x207e4c…207fe0 Dummy {f00=0x00a4, f01=0x0190, f02=» $ v P RB(NZ) UNL:80 ENDIO % P RTN A5 % $ P XIF % 4 P IFT IBM=1 % @ P EJECT % R P* % ` P******************* % j P* SEQUENTIAL READ * % P******************* % P* % PSQREAD EQU * % * P CF A5,DSOPCH GET EOD AND EOD ADDRESS %
0x207fe0…208174 (1, 504) Dummy {f00=0x00a5, f01=0x0190, f02=» ADK A3,1 CRN+1 % & P ST A3,ECBCW,A8 STORE CRN+1 IN ECB & P CWR A3,A7 & B P RF(NL) SQR:10 END OF DATA & T P CF A5,BIO:RE & v P LDKL A4,BUF BUFFER ADDRESS & 2 P CF A5,FD:REA READ SECTOR POINTED AT BY CRN+1 & ( P LD A4,ECBBA,A8 USER BUFFER ADDRES
0x208174…208308 Dummy {f00=0x00a5, f01=0x018e, f02=»SQW:10 UPDATE CRN & P* ' P* END OF DATA ' $ P* ' < $ PSQR:10 LDKL A1,/1000 RETURN CODE ' F P RF END:IO ' n P EJECT ' P* ' P******************* ' P* SEQUENTIAL WRITE * ' P******************* ' P* ' PSQWRIT EQU * '
0x208308…20849c Dummy {f00=0x00a5, f01=0x0190, f02=» ' P LDK A1,DWTEOE ( & P CF A5,DSPAD EOE-NO ADDRESS TO A2 ( * P ST A7,ECBCW,A8 STORE EOD IN ECB C. W. ( H P CWR* A7,A2 ( v P RF(G) SQW:20 YES,EOE ( P CF A5,BIO ( P LDK A7,128 ( , P CF A5,EBCDIC TRANSFORM AND MOVE TO BUF ( P ORK A2,5
0x20849c…208630 Dummy {f00=0x00a5, f01=0x0190, f02=» OPERABLE ( ~ * P IMR A2 EOD=EOD+1 OR CRN=CRN+1 IN DWT ) PSQW:15 RF FD:RC ) @ P* ) X P* ) b P* END OF EXTENT ) l $ PSQW:20 LDKL A1,/400 RETURN CODE ) P RF END:IO ) P EJECT ) P* ) P********** ) P* REWIND * ) P********** )
0x208630…2087c4 Dummy {f00=0x00a5, f01=0x0190, f02=»D ADDRESS ) ~ P LDK A1,DWTBOE * P CF A5,DSPAD * ( P LDR* A4,A2 BOE * < P STR A4,A3 EOD = BOE * T P LDK A1,DWTCRN * p P CF A5,DSPAD * P SUK A4,1 BOE - 1 * P STR A4,A2 CRN = BOE -1 * P LDK A1,0 RETURN CODE * P RF END:IO * P XIF
0x2087c4…208958 Dummy {f00=0x00a5, f01=0x0190, f02=»***************** * P* + P* + $ P* INPUT: A2 BIO CONTENTS + . 0 P* A3 NO OF BYTES TO BE TRANSFERED + R " P* A4 BUFFER ADDRESS + P* + PFD:WRI EQU * + P IFT CHAN=0 + P LDKL A1,/C000 WORDS,WRITE + P XIF +
0x208958…208aec Dummy {f00=0x00a5, f01=0x018e, f02=»N=1 + P LDK A1,1 , P ST A1,DWTRW,A6 READ MODE , P XIF , @ P IFT CHAN=0 , L P LDKL A1,/8000 WORDS READ , ` P XIF , PFD:800 EQU * , P IFT CHAN=0 , " P SRL A3,1 FROM BYTES TO WORDS , P ORR A3,A1 , PWER1 WER A3,MUXADR FIRST W
0x208aec…208c80 Dummy {f00=0x00a5, f01=0x0190, f02=» , d P* - P ST A4,DWTUB,A6 - P ADR A3,A4 - * " P ST A3,DWTUBE,A6 END ADDRESS+2 - < P XIF - b PFD:820 EQU * - n & P ST A5,DWTA5,A6 SAVE STACK POINTER - $ PFD:CIO CIO A2,1,CUADR CIO-START - ( P RF(3) FD:840 DEVICE ADDRESS UNKNOWN - P RF T:DI
0x208c80…208e14 (1, 505) Dummy {f00=0x00a5, f01=0x0190, f02=» * - * P* FD:RC - STORE EFF LEN, END:IO * . , * P* * . Z * P************************************* . P* . P* INPUT: A3 RETURN CODE . P* . PFD:RC EQU * . P LDR A1,
0x208e14…208fa8 Dummy {f00=0x00a5, f01=0x0190, f02=»* . P********** / P* * / P* END:IO * / . P* * / @ P********** / R P* / d PEND:IO EQU * / n P CF A15,TENDIO / PT:DISP ABL TDISP / P* / P* / " P* ENTRY FROM RECOVERY ROUTINE / P* / 0 PEND:05 CM DWTECB,A6
0x208fa8…20913c Dummy {f00=0x00a5, f01=0x018e, f02=» EJECT / P* 0 P******************** 0 P* * 0 4 P* RECOVERY ROUTINE * 0 P P* * 0 l P******************** 0 P* 0 PFDON INH 0 P CF A15,SAVE8 0 P LDKL A6,DWFD01 DWT ADDRESS 0 P IFT INI=1 0
0x20913c…2092d0 Dummy {f00=0x00a5, f01=0x0190, f02=» " P CM DWTRTY,A6 RESET RETRY FLAG 1 P XIF 1 * P IFT IBM+INI=2 1 6 P LDR A1,A6 1 L P ADK A1,DWTEOD 1 ^ P LDK A2,4 1 t PFDON02 EQU * 1 P CMR A1 CLOSE DATA SET 1 P ADK A1,2 1 P SUK A2,1 1 P RB(P) FDON02 1 P XIF 1 PFDON05 EQU
0x2092d0…209464 Dummy {f00=0x00a5, f01=0x018e, f02=» ALREADY DONE. 1 r P* DWTST IS SET BUSY 2 P* 2 4 P LD A2,DWTST2,A6 2 > P CWK A2,-1 2 V P RF(NE) FDON08 ALREADY SAVED 2 h P LD A2,DWTST,A6 2 P ST A2,DWTST2,A6 2 PFDON08 CM DWTST,A6 SET BUSY 2 P* 2 P* DELAY 2 SEC 2 P* 2
0x209464…2095f8 Dummy {f00=0x00a5, f01=0x0190, f02=» PFDON10 LDK A4,DWTTP 3 P ADR A4,A6 3 P LDR A1,A6 SAVE A6 3 2 P CF A15,SETIMP 3 L P DATA FDON20,TIME 3 b P RB T:DISP 3 | P* 3 P* TIME OUT ROUTINE 3 P* 3 PFDON20 LDR A6,A1 3 P CM DWTTP,A6 3 P LDK A5,DWTSB2 3 P ADR A5,
0x2095f8…20978c Dummy {f00=0x00a5, f01=0x0190, f02=» P ANR A1,A2 4 P RF(Z) FDON30 NOT LOCKED 4 P ST A2,DWTA3,A6 SAVE 4 6 P* 4 R P* PUT DRIVE NO IN CIO INSTR 4 P* 4 P SRN A2,A3 DRIVE NO IN A3 4 * P CF A5,SETCIO PUT DRVE NO IN CIO-INSTR 4 P LDK A2,/14 LOCK 4 P CF A5,FD:REA 4 P
0x20978c…209920 Dummy {f00=0x00a5, f01=0x0190, f02=» SLL A2,1 4 P CWK A2,/0010 5 P RB(NE) FDON25 5 ( P* 5 > P* ANY REQUEST? 5 H P* 5 ` P* 5 j . P* RESTORE STATUS SAVED IN DWST2 TO DWTST. 5 t P* SET DWTST2 TO -1 5 " P LD A2,DWTST2,A6 SAVED STATUS 5 * P ST A2,DWTST,A6 PUT IN CUURENT S
0x209920…209ab4 (1, 506) Dummy {f00=0x00a5, f01=0x0190, f02=»D A2,DWTST,A6 5 0 P RB(N) END:05 NO REQUEST, RETURN VIA TENDIO 6 P* 6 J P* RETRY REQUEST 6 T P* 6 l P IM DWTRTY,A6 INDICATE RETRY 6 v P LD A7,DWTOR,A6 6 P ANK A7,/3F ORDER 6 P LD A8,DWTECB,A6 ECB ADDRESS 6 P ABL FDAD REACTIVATE 6
0x209ab4…209c48 Dummy {f00=0x00a5, f01=0x0190, f02=» * 6 ~ P********************* 7 P* 7 * PIHFD EQU * 7 4 $ P ST P,INTSAV SAVE LAST INTERRUPT 7 F P IFT CHAN=1 7 n P STR A1,A15 7 P STR A2,A15 7 P STR A3,A15 7 P LDKL A2,DWFD01 7 . P LD A1,DWTUB,A2 POINTER AT WORD IN BUFFER 7 * P
0x209c48…209ddc Dummy {f00=0x00a5, f01=0x0190, f02=» ADK A1,1 UPDATE BUFFER POINTER 7 P LCR A2,A1 SECOND CHAR. 8 ( P OTR A2,0,CUADR WRITE 8 H P RF(A) IH020 ACCEPTED 8 f P RF IH040 NOT ACCEPTED 8 PIH010 INR A2,0,CUADR READ 8 P RF(NA) IH040 NOT ACCEPTED 8 P ECR A3,A2 8 & P SCR A3,A1 FIRST
0x209ddc…209f70 Dummy {f00=0x00a5, f01=0x018e, f02=»DDRESS 8 v P ADK A1,1 9 * P ST A1,DWTUB,A2 POINTER AT NEXT CHAR. 9 P CW A1,DWTUBE,A2 9 N P RF(NE) IH030 NOT LAST WORD 9 f P CIO A2,0,CUADR CIO HALT 9 PIH030 EQU * 9 P LDR* A3,A15 9 P LDR* A2,A15 9 P LDR* A1,A15 9 P RTN A15 9
0x209f70…20a104 Dummy {f00=0x00a5, f01=0x0190, f02=» P STR A7,A15 : P STR A8,A15 : P XIF : , P IFF CHAN=1 : 8 P CF A15,SAVE8 : L P XIF : b P SST A3,CUADR STATUS : n P LDKL A6,DWFD01 DWT ADDRESS : P LD A8,DWTECB,A6 ECB ADDRESS : " P LD A5,DWTA5,A6 STACK POINTER : P SLL A3,1 :
0x20a104…20a298 Dummy {f00=0x00a5, f01=0x0190, f02=»Y FLAG : x P LDR A1,A3 ; P ANKL A1,/0405 ; P RF(Z) IH:10 RETURN CODE OK ; 6 P LDK A1,/4 ; Z P ORR A3,A1 CRC ERROR ; l PIH:10 EQU * ; P* ; & P* TRANSFORM RETURN CODE, CU - ECB ; P* ; P ANKL A3,/FF37 ; P RF(Z) IH:80 ; P LDR
0x20a298…20a42c Dummy {f00=0x00a5, f01=0x0190, f02=» ; P IFT DAMA+IBM=0 < P LDR A4,A1 < P ANKL A4,/2000 BIT 2 < 2 P SLL A4,1 TO BIT 1 < N P ORR A3,A4 < h P XIF < z P LDR A4,A1 < P ANK A4,/20 BIT 10 < P SLL A4,3 TO BIT 7 < P ORR A3,A4 < P ANK A1,/10 BIT 11 < P SRC A1,5 TO BIT
0x20a42c…20a5c0 Dummy {f00=0x00a5, f01=0x0190, f02=» < | P* READY INTERRUPT * = P* * = $ P******************** = @ P* = PFDRE EQU * = f P LD A2,DWTA2,A6 = x , P ABL(NZ) T:DISP POWER ON ROUTINE ACTIVE = P LDK A5,DWTSB2 = P ADR A5,A6 STACK BASE = P RB FDON60 = P E
0x20a5c0…20a754 (1, 507) Dummy {f00=0x00a5, f01=0x0190, f02=» R O U T I N E S * = 0 P* * > * 0 P******************************************* > ^ P* > P******* > P* * > P* BIO * > P* * > P******* > P* > P* > P* INPUT
0x20a754…20a8e8 Dummy {f00=0x00a5, f01=0x0190, f02=»RANSFERED > n " P* A4 BUFFER ADDRESS ? P* ? 8 PBIO EQU * ? B P LDK A4,0 FLAG ? T P RF BIO010 ? j PBIO:RE LDK A4,1 ? | PBIO010 EQU * ? P LD A3,ECBRL,A8 REQ LEN ? P RF(N) BIOERR ILLEGAL LENGTH ? P IFT DAMA+IBM=2 ? P LD
0x20a8e8…20aa7c Dummy {f00=0x00a5, f01=0x0190, f02=»0 ? P XIF @ P IFT DAMA+IBM=2 @ P RF BIO030 @ . P XIF @ @ P IFT DAMA=1 @ L PBIO020 LDKL A7,TOSLEN @ ` P LDK A2,3 @ ~ PBIO030 EQU * @ P XIF @ P IFF DAMA+IBM=0 @ P LDR A4,A4 @ P RF(Z) BIO060 WRITE @ P LDK A2,0 @ P
0x20aa7c…20ac10 Dummy {f00=0x00a5, f01=0x018e, f02=» & P ADK A2,1 INCREMENT NO OF SECTORS A P RB BIO040 A . P* A @ P* WRITE, CHECK REQ LENGTH A J P* A l PBIO060 CWR A3,A7 A v " P RF(NE) BIOERR ILLEGAL REQ LEN A P XIF A P IFT DAMA+IBM=0 A P* A > P* FIND NO OF SECTORS TO BE READ/WRITT
0x20ac10…20ada4 Dummy {f00=0x00a5, f01=0x0190, f02=» A n P RF(NZ) BIO035 READ! B P SUK A1,128 B $ " P RF(Z) BIO100 REQ LEN ACCEPTED B 8 P RF BIO045 B ^ P* B p PBIO035 SUK A1,128 B z & P RF(NP) BIO100 REQ LENGTH ACCEPTED B PBIO045 ADK A2,1 B P CWK A2,3 B P RB(NG) BIO015 B $ P RF BIOERR
0x20ada4…20af38 Dummy {f00=0x00a5, f01=0x0190, f02=»NO FROM CONTROL WORD OF ECB IS B ( P* WITHIN RANGE, PUT IT IN POS 2-12 C & P* C R P LD A1,ECBCW,A8 SECTOR NO C P RF(N) BIOER2 OUTSIDE RANGE C ~ P IFT DAMA+IBM=2 C P ANK A7,/A C P RF(Z) BIO110 IBM DISC C P XIF C P IFT DAMA=1 C
0x20af38…20b0cc Dummy {f00=0x00a5, f01=0x0190, f02=» P RF BIO120 D P XIF D P IFT IBM=1 D " PBIO110 CWK A1,1923 D 4 P RF(P) BIOER2 OUT OF RANGE D N P XIF D p P IFT DAMA+IBM=0 D | ( P CWK A1,2001 SECTOR NO OUT OF RANGE D P RF(G) BIOER2 YES! D P XIF D PBIO120 EQU * D P SLL A1,3 D
0x20b0cc…20b260 Dummy {f00=0x00a5, f01=0x018e, f02=»EVEN D t P RTN A5 E P* E P* E & 2 P* ILLEGAL REQUESTED LENGTH, RETURN VIA TENDIO E 0 P* E f PBIOERR ABL END:10 E p P* ILLEGAL SECTOR NO E PBIOER2 ABL FD:DIS E P* E P********* E P* * E P* FDIX * E P*
0x20b260…20b3f4 (1, 508) Dummy {f00=0x00a6, f01=0x0190, f02=» E P LDR A2,A2 F PFDIX10 EQU * F P RF(Z) FDIX20 F . P SLL A3,1 F D P SUK A2,1 F V P RB FDIX10 F h PFDIX20 RTN A5 F z P EJECT F P IFF DAMA+IBM=0 F P****************** F P* * F P* VOLADR * F P*
0x20b3f4…20b588 Dummy {f00=0x00a6, f01=0x0190, f02=» F n P* A3 ZERO G P* G $ PVOLADR LDK A2,DWTVO0 G . P ADR A2,A6 G J P LC A3,DWTOR,A6 DRIVE NO G P ANK A3,/3 G | PVOLA10 EQU * G P RF(Z) VOLA20 G P ADK A2,6 UPDATE ADDRESS G P SUK A3,1 G P RB VOLA10 G PVOLA20 RTN A
0x20b588…20b71c Dummy {f00=0x00a6, f01=0x0190, f02=»* FUNCTION: ASCII TRANSFORMS A STRING FROM EBCDIC TO G P* ASCII CODE H > . P* INPUT STRING ADDRESS IS BUF H ^ & P* INPUT: A7 NO OF CHARACTERS H , P* A4 OUTPUT STRING ADDRESS H P* OUTPUT: A1 CHANGED H
0x20b71c…20b8b0 Dummy {f00=0x00a6, f01=0x0190, f02=»4,A7 H PASC:10 SUK A7,1 I P RF(N) ASC:20 I $ P SUK A4,1 I : " P LC A1,BUF,A7 GET EBCDIC CHAR I L ( P LC A1,TASCII,A1 TRANSFORM TO ASCII I r 0 P SCR A1,A4 PUT ASCII CHAR. IN OUTPUT BUFFER I P RB ASC:10 I PASC:20 EQU * I " P RF EBC:90 SET I
0x20b8b0…20ba44 Dummy {f00=0x00a6, f01=0x018e, f02=»FORMES A STRING FROM ASCII TO I v P* EBCDIC CODE J & 8 P* OUTPUT STRING IS PUT IN DRIVER BUFFER J H P* J & P* INPUT: A7 NO OF CHARACTERS J * P* A4 INPUT STRING ADDRESS J P* J P* OUTPUT: A1 CHANGE
0x20ba44…20bbd8 Dummy {f00=0x00a6, f01=0x0190, f02=» J P LDK A1,0 K PEBC:10 SUK A7,1 K P RF(N) EBC:80 K 2 P SUK A4,1 K H P LCR A1,A4 GET ASCII CHAR. K Z P LC A1,TEBCDIC,A1 K | P SC A1,BUF,A7 K P RB EBC:10 K PEBC:80 EQU * K P LDKL A4,BUF K PEBC:90 EQU * K P CF A5,SETINH
0x20bbd8…20bd6c Dummy {f00=0x00a6, f01=0x0190, f02=»NSFORMS PHYSICAL SECTOR TO STANDARD K x , P* LOGICAL SECTOR (BINARY). L , < P* FORMAT OF PHYS. SEC. TT0SS (EBCDIC CODE) L * P* TT = TRACK, SS=SECTOR L P* L , P* INPUT: A4 ADDRESS TO PHYS. SECTOR L P* L
0x20bd6c…20bf00 Dummy {f00=0x00a6, f01=0x0190, f02=»DR A3,A1 SAVE L P ADK A4,2 M P* M ( P* MULTIPLY BY 26 M 2 P* M L P SLL A3,5 *32 M V P LDR A2,A1 M l P SLL A2,2 M ~ P SUR A3,A2 *28 M P SLL A1,1 M P SUR A3,A1 *26 M P CF A5,DECBIN M P SUK A1,1 M P ADR A3,A1 M P
0x20bf00…20c094 (1, 509) Dummy {f00=0x00a6, f01=0x0190, f02=»F(E) LOG:02 YES! M P SUKL A1,1898 N P RF LOG:04 N . P* N @ " P* CHECK EOD LESS/EQUAL 74001 N J P* N p PLOG:02 SUKL A1,1899 N z PLOG:04 EQU * N " P RF(P) LOG:10 NOT ACC SEC. NO N " P SUK A4,4 RESET BUFFER POINTER N P RTN A5 N P*
0x20c094…20c228 Dummy {f00=0x00a6, f01=0x018e, f02=»CW,A6 N P CF A5,SETINH O P ABL LOA:90 ERROR ROUTINE O $ P* O F P********** O P P* DECBIN* O b P********** O t P* O > P* FUNCTION: DECBIN TRANSFORMS TWO EBCDIC CODED DIGITS TO O D P* BINARY. RANGE OF EBCDIC CODE /F0 - /F9 I
0x20c228…20c3bc Dummy {f00=0x00a6, f01=0x0190, f02=» PDECBIN LDK A1,0 P P LDK A7,2 P PDEC:10 LCR A2,A4 DIGIT P . P ANK A2,/FF P L P SUK A2,/F0 P ` P RB(N) LOG:05 P t P SUK A2,9 P P RB(P) LOG:05 NOT DIGIT P P ADK A2,9 P P SUK A7,1 P P RF(Z) DEC:30 P & P ADK A4,1 ADDRESS
0x20c3bc…20c550 Dummy {f00=0x00a6, f01=0x0190, f02=»30 ADR A1,A2 P P RTN A5 Q P XIF Q $ P EJECT Q 0 P* Q > P********** Q H P* SETCIO * Q Z P********** Q l P* Q ~ 2 P* FUNCTION: PUT DRIVE NO IN CIO INSTRUCTION Q P* Q 8 P* INPUT: A3 DRIVE NO , (BITS 0-13 MUST BE ZEROES Q P* Q
0x20c550…20c6e4 Dummy {f00=0x00a6, f01=0x018e, f02=» Q P ORS A3,FD:CIO R P RTN A5 R P IFT IBM=1 R . P EJECT R @ P* R N P********** R X P* BINDEC * R j P********** R | P* R : P* FUNCTION: BINDEC TRANSFORMS A BINARY NUMBER TO TWO R 0 P* EBCDIC-CODED DIGITS (DECIMAL) R
0x20c6e4…20c878 Dummy {f00=0x00a6, f01=0x0190, f02=» P* S PBINDEC LDK A3,0 S PBIN:10 SUK A7,10 S & P RF(N) BIN:20 S > P ADK A3,1 S T P RB BIN:10 S f PBIN:20 ADK A7,10 S x P SLL A3,8 S * P ORR A3,A7 DECIMAL CONVERTED NO IN A3 S P ORKL A3,/F0F0 EBCDIC CODED S P RTN A5 S P EJE
0x20c878…20ca0c Dummy {f00=0x00a6, f01=0x018e, f02=» P* INPUT: A6 DWT ADDRESS T P* T & : P* OUTPUT: A2 BITS 0-12 SECTOR NO, BITS 13-15 ZEROES T 0 P* A3 128 T n ( P* A4 DRIVER BUFFER ADDRESS T P* A6 DWT ADDRESS T P* A1 IS CHANGED T P* T PDSLI
0x20ca0c…20cba0 Dummy {f00=0x00a6, f01=0x018e, f02=» P EJECT U P* U P********** U P* DSOPCH * U . P********** U @ P* U R 6 P* FUNCTION: GET EOD-NO AND EOD-NO ADDRESS IN DWT U P* U P* INPUT: A6 DWT ADDRESS U P* U P* OUTPUT: A2 EOD ADDRESS U , P* A7 EOD-NO
0x20cba0…20cd34 (1, 510) Dummy {f00=0x00a6, f01=0x0190, f02=» U P EJECT V P* V P********* V P* DSPAD * V 2 P********* V D P* V V 2 P* FUNCTION: GET ABSOLUTE ADDRESS OF SPECIFIED V ` 6 P* TYPE OF DATA FOR COORESSPONDING DRIVE V P* V P* INPUT: A1 DWT OFFSET V P* A
0x20cd34…20cec8 Dummy {f00=0x00a6, f01=0x0190, f02=»RIVE NO V z P ANK A2,/3 W P ADR A2,A2 W " P ADR A2,A6 W 4 P ADR A2,A1 W F P RTN A5 W X P EJECT W h P* W v P********* W P* STDWT * W P********* W P* W : P* FUNCTION: STORE INPUT WORD IN DWT-AREA DEPENDING OF W P*
0x20cec8…20d05c Dummy {f00=0x00a6, f01=0x0190, f02=» A6 DWT ADDRESS W P* X P* OUTPUT: A1 UNCHANGED X " 0 P* A2 ADDRESS TO WORD IN DWT AREA X D P* A3 UNCHANGED X x P* A6 UNCHANGED X P* X PSTDWT EQU * X P CF A5,DSPAD X P STR A3,A2 X P RTN A5
0x20d05c…20d1f0 Dummy {f00=0x00a6, f01=0x0190, f02=»N ROUTINE IS ACTIVE X h > P* ESCAPE VIA DISPATCHER ELSE RESET DWTENB AND Y P* RETURN Y ^ P* Y z " P* INPUT: A6 DWT ADDRESS Y P* Y PSETINH INH Y P LD A1,DWTA2,A6 FDON Y P RF(Z) SET:10 NOT ACTIVE Y P ABL T
0x20d1f0…20d384 Dummy {f00=0x00a6, f01=0x0190, f02=» IFT IBM=1 Y P RES 60 Z P XIF Z " P EJECT Z . P* Z < P********************* Z F P* * Z d P* DEVICE WORK TABLE * Z P* * Z P********************* Z P* Z PDWFD01 EQU * Z P DATA 0 Z
0x20d384…20d518 Dummy {f00=0x00a6, f01=0x018e, f02=»RESS Z $ P DATA 0 WAIT/ACTIVATE INDICATOR [ P DATA 0 TERMINAL QUEUE [ 4 P DATA 0 [ R P DATA 0 SAVE AREA [ b P DATA 0 [ | P DATA 0 [ P DATA 0,0,0,0 STACK [ ( PDWTST2 EQU *-DWFD01 SAVE STATUS WORD [ P DATA -1 [ * PDWTRTY EQU *-DWFD01
0x20d518…20d6ac Dummy {f00=0x00a6, f01=0x0190, f02=» [ j P DATA 0 , PDWTLAB EQU *-DWFD01 DISC LABEL INDICATOR P DATA 0 H , PDWTLC EQU *-DWFD01 DRIVE LOCK INDICATOR X P DATA 0 ( PDWTVO0 EQU *-DWFD01 VOLUME NAME NO 0 P DATA 0,0,0 ( PDWTVO1 EQU *-DWFD01 VOLUME NAME NO 1 P DAT
0x20d6ac…20d840 Dummy {f00=0x00a6, f01=0x0190, f02=» P IFT CHAN=1 ] 6 PDWTUB EQU *-DWFD01 POINTER AT NEXT WORD IN BUFFER ] P DATA 0 ] V , PDWTUBE EQU *-DWFD01 BUFFER END ADDRESS+2 ] f P DATA 0 ] , PDWTRW EQU *-DWFD01 READ/WRITE INDICATOR ] P DATA 0 ] P XIF ] P IFT IBM=1 ] , PDWTB
0x20d840…20d9d4 (1, 511) Dummy {f00=0x00a6, f01=0x40e0, f02=»QU *-DWFD01 END OF EXTENT ] P DATA 0,0,0,0 ^ " * PDWTCRN EQU *-DWFD01 CURRENT RECORD NO ^ 8 P DATA 0,0,0,0 ^ f . PDWTDSS EQU *-DWFD01 DATA SET LABEL SECTOR ^ | P DATA 0,0,0,0 ^ P XIF ^ P END ^ @ ^
0x20d9d4…20db68 Dummy {f00=0x00a6, f01=0x2008, f02=» _ END @
0x20db68…20dcfc Dummy {f00=0x00a6, f01=0x0190, f02=» 2 P IDENT DRCC01 REL 8.1 78-04-21 870105040810 P : P* B : P***************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* ( P* DRCC01 = DRIVER CASSETTE CHANGER P* P* P*
0x20dcfc…20de90 Dummy {f00=0x00a6, f01=0x0190, f02=» DRVER HANDLES THREE CASSETTE CHANGERS CONNECTED 6 P* TO CPU VIA CHCC AND IOP ON MULTIPLEXED CHANNEL. 8 P* r 6 P* THE CHANGERS ARE OPERATED COMPLETELY INDEPENDENT | P* OF EACH OTHER. P* . P* DATA IS RECORDED IN BLOCKS FROM 2 TO 256 6
0x20de90…20e024 Dummy {f00=0x00a6, f01=0x018e, f02=»JECT P 2 P* THE DRIVER CONSISTS OF THE FOLLOWING PARTS: P* J * P* A C T I V A T I O N R O U T I N E T P* & P* O R D E R P R O C E S S O R S P* & P* C O M M A N D H A N D L E R S P* ( P* I N T E R R U P T
0x20e024…20e1b8 Dummy {f00=0x00a6, f01=0x0190, f02=» P* P* P* ORDERS TREATED: P* 6 P* CHANGER: @ P* R 0 P* /10 TEST STATUS SET IND /13 EJECT CASSETTE ( P* /11 INSERT CASSETTE /14 FEED TRAY 0 P* /12 RETURN CASSETTE /3E RESET STATUS FLAGS P* P* RECORDER:
0x20e1b8…20e34c Dummy {f00=0x00a6, f01=0x0190, f02=»READ MATS v P* /3F RECOVER P* ( P EJECT 2 P @ P* H P* STATUS BITS: R P* h P* CHANGER RECORDER r P* & P* 0: REQUEST ERROR REQUEST ERROR " P* 1: CAS IN DISCH COMP LEADER & P* 2: CAS NOT IN TRAY BOT MISS
0x20e34c…20e4e0 Dummy {f00=0x00a6, f01=0x0190, f02=» P* 6: WRITE PROTECTED P* 7: B-SIDE ( P* F 0 P* 8: ILL ORDER SEQUENCE ILL ORDER SEQUENCE P & P* 9: HARD ERR, TIME OUT TIME OUT P* 10: " P* 11: SEQUENCE ERROR P* $ P* 12: INCORRECT LEN
0x20e4e0…20e674 (1, 512) Opaque[0x194]
0x20e674…20e808 # DirEnt {nam=»DMSUBR«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x14e0, f03=0x2020}
0x20e674…20e808 IdxSect {
0x20e674…20e808 f00 = 0x00a7 // 0x20e674 @0x0
0x20e674…20e808 f01 = 0x000e // 0x20e676 @0x2
0x20e674…20e808 gno = [ // 0x20e678 @0x4
0x20e674…20e808 [0x00]: C0x00a7.0x0.0
0x20e674…20e808 [0x01]: C0x00a7.0x1.0
0x20e674…20e808 [0x02]: C0x00a7.0x2.0
0x20e674…20e808 [0x03]: C0x00a7.0x3.0
0x20e674…20e808 [0x04]: C0x00a8.0x0.0
0x20e674…20e808 [0x05]: C0x00a8.0x1.0
0x20e674…20e808 [0x06]: C0x00a8.0x2.0
0x20e674…20e808 ]
0x20e674…20e808 }
0x20e808…20e99c Dummy {f00=0x00a7, f01=0x0190, f02=» 2 P IDENT DMSUBR REL 8.2 78-09-15 870105040820 P : $ P BUF HANDL + RC L. 496,543,551 B P REL 8.1 78-04-21 j P* 8 P**************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P
0x20e99c…20eb30 Dummy {f00=0x00a7, f01=0x018e, f02=»**************** l 8 P****THIS MODULE IS ACTIVATED FROM :***************** P* T P* DMTASK,TIODM,DMTASS ^ P* ~ P*************** P* ENTRIES * P*************** P* P* & P ENTRY EATEST,EASETB,EARELB,CRNGET
0x20eb30…20ecc4 Dummy {f00=0x00a7, f01=0x0190, f02=» P***************** P* EXTERNALS * P***************** 8 P* R P* 4 P EXTRN FDBEAL,FDBTNR,FDBCRL,FDBRLE,FDBSNR,FDBRRO f P EXTRN FDBCEX,FDBBLF,FDBEXT : P EXTRN FDBECB,DWTECB,DWTOR,EXTDMI,BUFSTA,BUFDMI,BUFOR " P EXTRN E
0x20ecc4…20ee58 Dummy {f00=0x00a7, f01=0x0190, f02=»XTRN EXTELE P EXTRN CRNTID P EXTRN DMTGBU * P EXTRN EXTLEN,EXTBAS @ P EXTRN CRNQUE,GETBLK,FREQUE P EXTRN HALT P EXTRN CRBUFL $ P EXTRN IHRET2,IHRTN,FDBADF,DWTST P EXTRN FDBDBR P EXTRN QIRN,QIRR P EJECT
0x20ee58…20efec Dummy {f00=0x00a7, f01=0x0190, f02=»XR,XN, DATA FILE OTHERWISE P* " PCHKIND EQU * , P STR A1,A15 @ P STR A2,A15 T " P LDK A2,1 INDEX FOR DATA FILE h P LDR A1,A7 ORDER P ANK A1,/3F P CWK A1,/20 P RF(E) FND320 DELETE INDEX P CWK A1,/1A P RF(
0x20efec…20f180 Dummy {f00=0x00a7, f01=0x0190, f02=» P RF FND340 ( PFND320 LDK A2,0 INDEX FOR INDEX FILE PFND340 EQU * B P CCR A2,A6 INDEX V P RF(E) FND390 ENTRY FOUND n P LDK A1,2 * P ADS A1,8,A15 RETURN+2 WHEN NOT FOUND PFND390 ABL IHRET2 P EJECT P* : P* RE
0x20f180…20f314 (1, 513) Dummy {f00=0x00a7, f01=0x0190, f02=» EQU * P LDKL A2,/8000 " P AN A2,2,A5 TASK STATUS BIT 0 $ " P RF(NZ) TEN115 DMTASK CALLING J P* p , P* RESET REQUEST BUSY BIT FOR ALL FILES z P* $ P LDKL A2,10 MAX NO OF FILES * 2 PTEN112 EQU * P SUK A2,2 P RF(N)
0x20f314…20f4a8 Dummy {f00=0x00a7, f01=0x0190, f02=» ADDR P RF(E) TEN114 MASTER DWT P LD A5,DWTTQ,A3 . P RF(Z) TEN113 NO QUEUE F P LDR* A4,A5 d P ST A4,DWTTQ,A3 NEW ANCHOR x P CF A15,QTJOB REPEAT REQUEST " PTEN113 LD A5,DWTTDM,A6 RESTORE PTEN114 EQU * $ P LDKL A4,/BFFF R
0x20f4a8…20f63c Dummy {f00=0x00a7, f01=0x0190, f02=»TEN115 EQU * P ABL IHRTN P EJECT & 8 P****DESCRIPTION************************************* 4 P* p < P* EATEST WILL SEARCH THE EA-LINK FOR A LOG RECORD NO. z P* 8 P****ENTRY PARAMETERS******************************** P*
0x20f63c…20f7d0 Dummy {f00=0x00a7, f01=0x0190, f02=»**************************** x P* $ P* A1-A3 = UNCHANGED . P* A4 = 0 NO EA AT ALL L * P* = +1 EA FOUND FOR ACTUAL TASK n * P* = -1 EA FOUND FO R OTHER TASK P* 8 P****USED REGISTERS**********************************
0x20f7d0…20f964 Dummy {f00=0x00a7, f01=0x0190, f02=»QU * P LDR* A4,A4 NEXT BUFFER ADR PEAT030 EQU * 0 $ P RF(Z) EAT100 EMPTY QUEUE,NO EA D P* l P* SEARCH LOG REC NO v P* P CC A2,3,A4 FIRST CHAR P RB(NE) EAT020 P CW A3,4,A4 2 AND 3 CHAR P RB(NE) EAT020 P
0x20f964…20faf8 Dummy {f00=0x00a7, f01=0x0190, f02=» OTHER TASK P RF EAT100 PEAT060 EQU * & P LDK A4,1 EA SAME ATASK : PEAT100 EQU * Z P RTN A14 n P EJECT ~ 8 P****DESCRIPTION************************************* P* B P* EASETB WILL UNCONDITIONALLY PUT A NEW EA BUFFER IN
0x20faf8…20fc8c Dummy {f00=0x00a7, f01=0x0190, f02=»********************** r P* P* A6 = FDB ADDR ( " P* A2,A3 = LOGICAL RECORD NO B P* h P* CF A14,EASETB r P* 8 P****EXIT PARAMETERS********************************* P* P* A6 = FDB ADDR P* 8 P****US
0x20fc8c…20fe20 Dummy {f00=0x00a7, f01=0x0190, f02=»************* f P EJECT PEASETB EQU * $ P ECR A2,A2 8 P LC A2,FDBTNR,A6 TASK ID J P ECR A2,A2 j P LDR A1,A3 LOG REC NO | P INH , P CF A15,GETBLK GET BUFF AND STORE A1,A2 P* P* LINK BUFFER TO FDB P* P
0x20fe20…20ffb4 (1, 514) Dummy {f00=0x00a7, f01=0x0190, f02=»ION************************************* P* 0 8 P* EARELB WILL RELEASE EA BUFFERS AND CONNRECT THEM : P* TIO THE FREE LINK. v P* 8 P****ENTRY PARAMETERS******************************** P* P* A1 = FDB-ADDRESS " P* A2,A
0x20ffb4…210148 Dummy {f00=0x00a7, f01=0x0190, f02=» l < P* BIT 0=1,BIT 1=0 ALL BUFFERS ON FDB IS REMOVED. J P* BIT 0=0 THE FIRST BUFFER WITH TASK ID AND LOG REC NO H 0 P* AS SPEC IS REMOVED. P* 8 P****EXIT PARAMETERS*********************************
0x210148…2102dc Dummy {f00=0x00a7, f01=0x0190, f02=» P EJECT PEARELB EQU * P LDR A5,A1 * P ADKL A5,FDBEAL ROOT ADR < P LDR* A4,A5 EA ROOT P RF EAR030 x PEAR020 EQU * P LDR A5,A4 SAVE OLD ROOT P LDR* A4,A4 NEXT BUFFER ADR PEAR030 EQU * P RF(Z) EAR100 EA L
0x2102dc…210470 Dummy {f00=0x00a7, f01=0x0190, f02=»C A2,3,A4 P RB(NE) EAR020 P CW A3,4,A4 ( P RB(NE) EAR020 < P RF EAR060 R PEAR050 EQU * d P CWK A2,/A000 CHECK BIT 1 x 0 P RF(L) EAR080 BIT 1 ZERO,ALL BUFFERS REMOVED PEAR060 EQU * P* P* SEARCH TASK IDENT
0x210470…210604 Dummy {f00=0x00a7, f01=0x0190, f02=»R080 EQU * P LDR* A3,A4 NEXT BUFADR & P STR A3,A5 REMOVE BUFFER FROM LINK 2 P* P* RETURN BUFFER TO POOL f P* P INH P LD A3,FREQUE P STR A3,A4 NEXT FREE P ST A4,FREQUE NEW ROOT P LDR A4,A5 BUFFER ROOT
0x210604…210798 Dummy {f00=0x00a7, f01=0x0190, f02=»********************** r P* D P* CRNGET WILL SEARCH THE CRN-LINK FOR TASK ID. IF NO BUFFER IS ( D P* FOUND A NEW IS FETCHED FROM THE FREE LINK AND B FILLED WITH p H P* ZEROES AND PUT ON THE CRN LINK. IF NO FREE BUFFERS ARE AVAILABLE 0 P*
0x210798…21092c Dummy {f00=0x00a7, f01=0x0190, f02=»****************** n P* " P* A1 = FDB ADDRESS DATA FILE $ P* J 8 P****EXIT PARAMETERS********************************* T P* P* A1 = UNCHANGED ( P* A2 = ADDRESS OF FOUND CRN-BUFFER P* 8 P****USED REGISTERS************
0x21092c…210ac0 Dummy {f00=0x00a7, f01=0x0190, f02=»30 PCRN020 EQU * P LDR* A2,A2 NEXT BUFFER PCRN030 EQU * > P RF(Z) CRN100 LINK END R P* p P* CHECK ATASK IDENT z P* P LC A3,FDBTNR,A1 TASK ID P CC A3,CRNTID,A2 P RB(NE) CRN020 OTHER TASK P RF CRN200 B
0x210ac0…210c54 (1, 515) Dummy {f00=0x00a7, f01=0x0190, f02=»F(NZ) CRN120 P LDK A1,3 LAMP 10 AND 11 P CF A15,HALT NO MORE BUFFERS 4 PCRN120 EQU * X P LDR* A3,A2 NEXT FREE l P ST A3,CRNQUE UPD ROOT P* P* FILL BUFFER WITH ZEROES P* * P LDKL A3,CRBUFL BUFFER LENGTH IN BYTES
0x210c54…210de8 Dummy {f00=0x00a7, f01=0x0190, f02=»A3 OFFSET IN BUFFER P CMR A4 P RB CRN140 MORE WORDS , P* J " P* CONNECT NEW BUFFER TO LINK T P* z PCRN160 EQU * P LC A3,FDBTNR,A1 P SC A3,CRNTID,A2 TASK ID P LD A3,FDBCRL,A1 LINK ROOT P STR A3,A2 THREAD
0x210de8…210f7c Dummy {f00=0x00a7, f01=0x0190, f02=»**** ` P* 2 P* CALSNO WILL CONVERT A LOGICAL RECORD NO TO P* SECTOR AND OFFSET L P* j 8 P****ENTRY PARAMETERS******************************** t P* " P* A1,A2 = LOGICAL RECORD NO P* A6 = FDB ADDR P* P*
0x210f7c…211110 Dummy {f00=0x00a7, f01=0x0190, f02=» , ERROR =/20=END OF MEDIUM P* A4 = EXTENT ADDRESS $ P* A6 = UNCHANGED D $ P* IN FDB : FDBSNR = SECTOR NR ^ , P* FDBRRO = OFFSET IN SECTOR * P* FDBCEX = CURRENT EXTENT P* 8 P****USED REGISTERS********
0x211110…2112a4 Dummy {f00=0x00a7, f01=0x0190, f02=»LE t P* P LDR A5,A6 SAVE FDB ADDR P LDK A6,0 4 $ P LC A6,FDBBLF,A5 BLOCKING FACTOR F , P CF A14,DIVMOD A2=A1,A2//A6,A1=REMAINDER n P RF(O) TIOD99 OVERFLOW P LDR A3,A2 QUOTIENT P LDR A6,A5 FDB ADDR P LDR A2,A1 REMAINDER
0x2112a4…211438 Dummy {f00=0x00a7, f01=0x0190, f02=»R h P* P* FIND FILE EXTENT P* 0 PTIOD40 EQU * : P LDR A4,A6 N & P ADKL A4,FDBEXT FIRST FILE EXTENT ` , P LD A9,EXTLEN,A4 LENGTH OF FIRST EXTENT P LDK A5,4 NUMBER OF EXTENTS PTIOD45 CWR A3,A9 ( P RF(NG) TIOD55 SEC
0x211438…2115cc Dummy {f00=0x00a7, f01=0x0190, f02=»N,A4 ADD LENGTH OF NEXT EXTENT P RB TIOD45 & P* 8 * P* SAVE CURRENT EXTENT BLOCK POINTER B P* p PTIOD55 ST A4,FDBCEX,A6 z P* * P* FIND LOGICAL SECTOR NUMBER ON DISC P* 6 P SU A9,EXTLEN,A4 NO OF SECTORS IN PREVIOUS EXT
0x2115cc…211760 Dummy {f00=0x00a7, f01=0x0190, f02=»A4 SECTOR NO ON DISC 0 P ST A3,FDBSNR,A6 SAVE LOGICAL SECTOR NUMBER 2 P* FIND RELATIVE RECORD OFFSET WITHIN SECTOR P P* P LDK A3,0 & PTIOD60 SUK A2,1 A2=RELATIVE REC NO ( P RF(Z) TIOD65 REL REC OFFS IN A3 NOW * P AD A3,FDBRLE,A6
0x211760…2118f4 (1, 516) Dummy {f00=0x00a8, f01=0x0190, f02=»EDIUM v P RF TIODMF P* , P* STORE RELATIVE REC OFFSET IN FBDRRO * P* Z PTIOD65 EQU * d P LDK A1,0 OK x P ST A3,FDBRRO,A6 PTIODMF EQU * P RTN A14 P EJECT P* P************** P* DMTIOT P
0x2118f4…211a88 Dummy {f00=0x00a8, f01=0x018e, f02=» t P* P* OUTPUT A6 = FDB ADDRESS P* A1 = 0 WHEN OK 6 $ P* = ERROR CODE ELSE X $ P* A9 = DM ECB ADDRESS * P* A8 = PHYS I/O ECB ADDRESS $ P* A2 WILL BE DESTROYED P* ( P
0x211a88…211c1c Dummy {f00=0x00a8, f01=0x0190, f02=» P ADR A8,A6 $ P LD A9,DWTECB,A6 DM ECB ADDRESS PDMTIT0 EQU * > P LD A1,ECBRC,A8 R P RF(Z) DMTIOX DISC I/O OK j P ANKL A1,/FEFF $ P RF(NZ) DMTIT1 NOT ONLY RETRIES P LDKL A2,/100 P ORS A2,ECBRC,A9 USER RC P RF DMTI
0x211c1c…211db0 Dummy {f00=0x00a8, f01=0x0190, f02=» P* GET BUFFER ADDR ! P SUK A2,8 BUFSTA ! ( , P CM BUFDMI,A2 CLEAR VOL IDENT IN BUFFER ! @ P LDK A1,/02 DISC IO ERROR ! p " P LDKL A2,/FF7E NOT BIT 8 OR 15 ! P AN A2,ECBRC,A8 ! P ABL(NZ) DMTIOX ! P LD A1,ECBRC,A8 BIT 8 OR 15 !
0x211db0…211f44 Dummy {f00=0x00a8, f01=0x0190, f02=»RAM ! x P* " P* IN: A1 = FDB ADDR " P* A8 = ECB ADDR " 2 P* OUT: " L P* A1 = RET CODE " P* A2 = DESTROYED " v P* A6 = FDB ADDR " P* A8 = ECB ADDR " P* A9 == USER ECB " P* " PDMTIOZ LDR A6,A1 " P LD A2,D
0x211f44…2120d8 Dummy {f00=0x00a8, f01=0x018e, f02=»INDEXED RANDOM READ " " P LD A1,FDBADF,A6 FDB DATA FILE # PDMTIZ1 EQU * # B P LD A9,DWTECB,A1 USER ECB # V P RB DMTIT0 # x P EJECT # 8 P****DESCRIPTION************************************* # P* # 8 P* GTBKBU WILL GET A BLOCK BUFFER FOR DIS
0x2120d8…21226c Dummy {f00=0x00a8, f01=0x0190, f02=» # Z P* $ P* A1 = FDB ADDRESS $ , P* FDB-CEX,ECB,SNR,RRO $ . 8 P* ECB-FC,CW,BA,DWT-OR,ECB,EXTDMI $ ^ P* A8 = ECB ADDR $ P* $ 8 P****EXIT PARAMETERS********************************* $ P* $ P*
0x21226c…212400 Dummy {f00=0x00a8, f01=0x0190, f02=» IN $ V < P* THE FOUND CORE BUFFER % P* A3 = BUFFER ADDRESS % L P* A5 = ORDE R CODE % l P* A8 = ECB ADDR % P* A9 = DM ECB ADDR % P* % 8 P****USED REGISTERS********************************** % P* %
0x212400…212594 (1, 517) Dummy {f00=0x00a8, f01=0x0190, f02=»B ADDRESS % ~ 2 P LD A4,FDBCEX,A6 CURRENT EXTENT BLOCK POINTER & P LD A1,EXTDMI,A4 DMIDENT, FC & H " P LD A2,FDBSNR,A6 SECTOR NUMBER & l P LD A9,DWTECB,A6 DM ECB & , P SC A1,ECBFC,A8 FILE CODE OF DISC VOLUME & P LDR A4,A2 SAVE & P LDKL A5,SECTL
0x212594…212728 Dummy {f00=0x00a8, f01=0x018e, f02=» & d 0 P* RETURN IF SECTOR MUST BE READ FROM DISC ' P LDKL A2,-1 RET CODE ' < PGTB040 EQU * ' X P ST A4,ECBCW,A8 SECTOR NR ' l P LDR A5,A3 ' 2 P ADKL A5,BUFSTA A5 = DATA BUFFER START ADDRESS ' P ST A5,ECBBA,A8 ' P LD A5,DWTOR,A6 ' P A
0x212728…2128bc Dummy {f00=0x00a8, f01=0x0190, f02=» ' j P RB GTB040 STORE ORDER CODE ( P EJECT ( , 8 P****DESCRIPTION************************************* ( : P* ( v D P* GTLGRN WILL CONVERT FDBSNR AND FDBRRO TO A LOGICAL RECORD NO ( P* ( 8 P****ENTRY PARAMETERS******************************** (
0x2128bc…212a50 Dummy {f00=0x00a8, f01=0x0190, f02=»************ ( h P* ) P* A1=A5=A6= FDB ADDRESS ) P* A2,A3 = LOG RECORD NO ) @ P* ) b 8 P****USED REGISTERS********************************** ) l P* ) P* A1 - A7 ) P* ) : P****************************************************** )
0x212a50…212be4 Dummy {f00=0x00a8, f01=0x0190, f02=»TH ) r P LD A7,FDBCEX,A1 EXT ADDR * ( P ADKL A7,EXTLEN ADDR TO LAST LENGTH * , PGTL050 EQU * * X P CWR A3,A7 * l . P RF(E) GTL100 ALL PREVIOUS EXTENTS COUNTED * ~ ( P* NOTE THAT ONLY (E) CAN BE TESTED * $ P ADR* A6,A3 NO OF SECT IN EXTENT * $ P ADK
0x212be4…212d78 Dummy {f00=0x00a8, f01=0x018e, f02=» TOTAL NO OF SECTORS * ( P AD A6,FDBSNR,A1 TOTAL NR OF SECTORS + P* + H ( P* CONVERT FDBRRO TO NO OF RECORDS + R P* + ~ P LDK A7,0 + " P LC A7,FDBBLF,A1 BLOCK FACTOR + P LDR A5,A1 SAVE FDB ADDR + P CF A14,MPYMOD A1,A2=A6*A7 + P LD A4
0x212d78…212f0c Dummy {f00=0x00a8, f01=0x0190, f02=» + PGTL150 EQU * , P ADK A7,1 RECORD COUNTER , P SUR A6,A4 , < * P RB(NN) GTL150 COUNT RECORDS IN SECTOR , N P* , | , P* ADD SECT*BLOCFACT AND RECINCURRSECT , P* , P ADR A2,A7 , P RF(O) GTL160 OVERFLOW , P RF GTL170 , PGTL160
0x212f0c…2130a0 Dummy {f00=0x00a8, f01=0x4052, f02=» P LDR A1,A5 FDB ADDR - P LDR A6,A5 - P RTN A14 - 2 P END - B@ - NNN) GTL150 COUNT RECORDS IN SECTOR , N P* , | , P* ADD SECT*BLOCFACT AND RECINCURRSECT , P* , P ADR A2,A7 , P RF(O) GTL160 OVERFLOW , P RF GTL170 , PGTL160
0x2130a0…213234 (1, 518) Dummy {f00=0x00a8, f01=0x2008, f02=» . + t P INH , P CF A15,TENDIO , P ENB , 2 P* , > P* EXIT , H P* , X P LKM , b P DATA 3 , n P* , ~ P END , @ , RD ADDR A2:=EA BIT + & P C1R A2,A2 ONE COMPLEMENT BIT MASK + P ANRS A2,A3 SET OFF EA BIT + P* +
0x213234…2133c8 Dummy {f00=0x00a8, f01=0x0190, f02=»ST LDREG SAVE8 ECHODY B ECHRTN DRTC01 t DISIOE TCDRON SAVE8 DWTECB DWTST TENDIO TDISP IHTCY INTSAV DWTC02 . DWTC01 . B DRRT01 z LOCHAN0 RECHAN REMFC CWTLT18
0x2133c8…21355c Dummy {f00=0x00a8, f01=0x0190, f02=»END CHLT1 ( INTSAV SAVE8 CHLT2 4 CHRT1 8 CHRT2 D DWTST DWTADR SETIMPW DWTOR DWTECB RTNA15 OUTPUT STREG LDREG LDREGF LDREGED GETCHR 4 OUTLIN R IHRET8H CHLTONK ( ECHENDP ECHOY DWTWAT ECHRTNA
0x21355c…2136f0 Dummy {f00=0x00a8, f01=0x0190, f02=» INTRT1 ,INTRT2 INTRT2 8BLOK:S BLOK:S BLOCKE x x *CTABX CTABX ,DCTBUF DCTBUF ,DCRBUF DCRBUF ,
0x2136f0…213884 Dummy {f00=0x00a8, f01=0x0190, f02=» INIMOM INIMON TCTAB TTB:ST TTB:PP TTB:SA TTB:SP TTB:SS TTB:TDD CDTAB ITADI DWTADR ITADO DWTST DWTECB DWTTQ TIMQUE BLOCKL0 BLOCKSF FREQUE GBQUE ATT:CH2 LDPENDN LRUQUE$ CVTLSB0 NUMPAR
0x213884…213a18 Dummy {f00=0x00a8, f01=0x0190, f02=» IHINPT PRUN SRUNN CVTINP CVTLSBK TTB:SA TTB:SP TTB:SS UPDLRI RETUR8 CVTAPA LKMDIS LD150 L LOADER LOADER TTB:SP TTB:SS TTB:SA QTJOB LD150 P GETBLK LDTASK TTABLD A
0x213a18…213bac Dummy {f00=0x00a8, f01=0x0190, f02=»AD TTB:SS TTB:SP QTJOB CVTINP 4INIMOD INIMON tBUG TTMJOB TTMJOB TTB:ST TTB:ID TTB:PPK TTB:SSK TTB:SP TTB:SA TTB:TDK * , VCD:TAB CD:
0x213bac…213d40 Dummy {f00=0x00a8, f01=0x0190, f02=» bTIO TWAIT TEXIT TACTOTK TPAUSE TIMER GETBUF RELBUF LOADERD TABORT GETTIM SETTIM TASSN IXTASS0 DMINIT DMINIT INIFLG QFDBFL FDBSTA FDBEND CRNQUE CRBUFL CRNEND CURBUF BUFDMI
0x213d40…213ed4 (1, 519) Opaque[0x194]
0x213ed4…214068 # DirEnt {nam=»DRIC01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1518, f03=0x2020}
0x213ed4…214068 IdxSect {
0x213ed4…214068 f00 = 0x00a8 // 0x213ed4 @0x0
0x213ed4…214068 f01 = 0x0008 // 0x213ed6 @0x2
0x213ed4…214068 gno = [ // 0x213ed8 @0x4
0x213ed4…214068 [0x00]: C0x00a8.0x3.0
0x213ed4…214068 [0x01]: C0x00a9.0x0.0
0x213ed4…214068 [0x02]: C0x00a9.0x1.0
0x213ed4…214068 [0x03]: C0x00a9.0x2.0
0x213ed4…214068 ]
0x213ed4…214068 }
0x214068…2141fc Dummy {f00=0x00a8, f01=0x0190, f02=» 2 P IDENT DRIC01 REL 8.2 78-09-15 870105040820 P : P ABORT INTERTASK WRITE BUG B P REL 8.1 78-04-21 f P P* 0 P******************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P*
0x2141fc…214390 Dummy {f00=0x00a8, f01=0x018e, f02=»****************** t P* 8 P* THIS MODULE HANDLES THE INTERTASK COMMUNICATION $ P* ` P**************** j P* P* ORDERS: P* P* /02 READ P* /0B WRITE P* /39 SET TIMEOUT P* P************
0x214390…214524 Dummy {f00=0x00a8, f01=0x0190, f02=» P* A8 ECB-ADDRESS P EJECT P* . P* E N T R I E S 8 P* R ( P ENTRY ITADI ACTIVATION ADDRESS READ * P ENTRY ITADO ACTIVATION ADDRESS WRITE * P ENTRY ITABRT ABORT INTERTASK REQUEST P* P* E X T E R N A L S
0x214524…2146b8 Dummy {f00=0x00a8, f01=0x0190, f02=» v P EXTRN DWTST DWT STATUS P EXTRN SETIMP TIMER ( , P EXTRN FNDTID FIND TTAB ADDRESS FROM TID D P EXTRN TTB:TD t P EXTRN TTB:ST TTAB STATUS " P EXTRN DWTTAB DWT TTAB ADDRESS $ P EXTRN DWTADR ACTIVATION ADDRESS * P EXTRN IHRTN R
0x2146b8…21484c Dummy {f00=0x00a8, f01=0x0190, f02=»LENGTH z P EXTRN ECBRC ECB RETURN CODE " P EXTRN ECBCW ECB CONTROL WORD 2 P* X P* C O N S T A N T S b P* PDWTTP EQU /10 TIMER POINTER " PDWSTB EQU /18 STACK BASE USED * PDWSTB2 EQU /1E STACK BASE 2 (NOT USED) PDWTIM
0x21484c…2149e0 Dummy {f00=0x00a8, f01=0x0190, f02=»D PITADO DATA ICAD P " PICAD EQU * * P SUK A7,2 < P RF(Z) READ READ ORDER N P SUK A7,9 l P RF(Z) WRITE WRITE ORDER ~ P SUK A7,/2E P RF(NZ) DIS:OE REQUEST ERROR P* P* S E T T I M E O U T P*
0x2149e0…214b74 (1, 520) Dummy {f00=0x00a9, f01=0x0190, f02=»T E P* PWRITE EQU * P* * ( P* FIND INPUT DWT OF ADDRESSED TASK 4 P* ` P LD A7,ECBCW,A8 TID j & P CF A15,FNDTID TTAB ADDRESS TO A2 P LDR A2,A2 P RF(Z) DIS:OE NOT FOUND P CW A2,DWTTAB,A6 P RF(E) DIS:OE
0x214b74…214d08 Dummy {f00=0x00a9, f01=0x0190, f02=»DDRESS t , PWRI:20 ADK A2,4 ADDRESS TO NEXT DWT ADDR P SUK A1,4 > P RF(N) DIS:OE NOT FOUND P P LDR* A4,A2 DWT ADDRESS p P CW A3,DWTADR,A4 INPUT DWT? P RB(NE) WRI:20 NO, TRY NEXT P LDR A2,A4 & P LD A1,DWTST,A2 ANY READ REQUE
0x214d08…214e9c Dummy {f00=0x00a9, f01=0x0190, f02=» BUFFER P SUK A5,DWSTB2-DWSTB P CF A5,MOVBUF , " PWRI:45 CF A15,TENDIO END WRITE B P LDR A6,A2 h " PEND:IO CF A15,TENDIO END READ z PT:DISP ABL TDISP P* , P* NO READ REQUEST, QUEUE WRITE REQUEST P* " PWRI:50 LDK A
0x214e9c…215030 Dummy {f00=0x00a9, f01=0x0190, f02=» LDR A3,A3 P RF(N) DIS:OE NEG. TIME P LDR A1,A6 DWTOUT=PARAMETER 2 P LDK A4,DWTTP V P ADR A4,A6 TIMER POINTER l P ST A3,TIME P CF A15,SETIMP SET TIMER P DATA TIMOWR TIMEOUT ADDRESS PTIME DATA 0 P* . P* IN
0x215030…2151c4 Dummy {f00=0x00a9, f01=0x018e, f02=»B,A6 TTAB ADDRESS P LC A1,TTB:ST+1,A5 LEVEL PWRI:80 LDR A4,A2 SAVE : P LDR* A2,A2 NEXT IN QUEUE X P RF(Z) WRI:90 END FOUND z " P LD A5,DWTTAB,A2 TTAB ADDRESS & P CC A1,TTB:ST+1,A5 COMPARE LEVELS P RB(NL) WRI:80 $ PWRI:90 S
0x2151c4…215358 Dummy {f00=0x00a9, f01=0x0190, f02=» P* P* R E A D P* & PREAD EQU * 0 " P LDR* A2,A6 ANYTHING IN QUEUE B P RF(Z) REA:40 NO! h " P LDR* A3,A2 REMOVE FROM QUEUE P STR A3,A6 $ P CF A15,ABTIM ABORT TIMER IF ANY P* P* MOVE BUFFER P*
0x215358…2154ec Dummy {f00=0x00a9, f01=0x0190, f02=»45 P " PREA:40 LDK A1,/40 RETURN CODE P LD A3,DWTIM,A6 TIME 8 P RB(Z) END:IO T P CWK A3,/FFFF j " P RF(E) REA:70 NO TIMER WANTED P LDR A3,A3 P RB(N) DIS:OE NEG. TIME P LDK A4,DWTTP P ADR A4,A6 P ST A3,T
0x2154ec…215680 Dummy {f00=0x00a9, f01=0x0190, f02=» PREA:70 EQU * P RB T:DISP P EJECT * P* 8 P* WRITE REQUEST TIMEOUT B P* d $ PTIMOWR LDR A6,A1 DWT OUT ADDRESS n 2 P LD A1,DWQACH,A6 QUEUE ANCHOR (READ DWT ADDR) P* P* REMOVE FROM QUEUE P* PTWR:10 LDR
0x215680…215814 (1, 521) Dummy {f00=0x00a9, f01=0x0190, f02=»A4 REMOVE FROM QUEUE ( PTWR:20 CM* 0,A2 RESET TIMER POINTER P LDK A1,/40 RETURN CODE H P RB END:IO h P* z P* READ REQUEST TIMEOUT P* PTIMORE EQU * P LDR A6,A1 DWT ADDRESS P RB TWR:20 P EJECT P* ,
0x215814…2159a8 Dummy {f00=0x00a9, f01=0x018e, f02=»QUEST TO BE ABORTED IS A v 2 P* INTERTASK REQUEST, AND IF SO IT WILL UPDATE & P* QUEUE AND ABORT TIMER (IF ANY) V P* ( P* ENTRY PARAMETER: A6 DWT ADDRESS , P* REG. A1,A2,A3,A4 ARE CHANGED P* PITABRT EQU * * P LDK
0x2159a8…215b3c Dummy {f00=0x00a9, f01=0x0190, f02=» P CF A15,ABTIM ABORT TIMER P RF IH:RTN & 2 PITAB20 LDKL A3,ITADO ACTIVATION ADDRESS WRITE 8 P CW A3,DWTADR,A6 n P RF(NE) IH:RTN NOT INTERTASK P* P* ABORT WRITE REQUEST P* P LDR A2,A6 P CF A15,ABTIM ABORT TIMER
0x215b3c…215cd0 Dummy {f00=0x00a9, f01=0x0190, f02=»,A1 NEXT IN QUEUE P CWR A1,A6 THIS DWT? P RB(NE) IWR:10 NO! 6 P LDR* A3,A1 REMOVE P P STR A3,A4 FROM QUEUE j P RF IH:RTN P EJECT P* 8 P* A B T I M = SUBROUTINE FOR ABORTING TIMER IF ANY P* ( P* ENTRY PARAMET
0x215cd0…215e64 Dummy {f00=0x00a9, f01=0x0190, f02=»RESS t P LDR* A3,A1 " P RF(Z) ABT:10 NO TIMER ACTIVE P CM* 0,A1 F " P CMR A1 INDICATE NO TIMER SET X PABT:10 EQU * ~ PIH:RTN ABL IHRTN P EJECT P* P* M O V B U F P* 4 P* SUBROUTINE TO MOVE BUFFER FROM S
0x215e64…215ff8 Dummy {f00=0x00a9, f01=0x0190, f02=»RETURN CODE /8 IF SENDING REQ. LEN | . P* WAS GREATER THAN RECEIVING REQ. LEN. * P* P* INPUT PARAMETERS: f P* A2 RECEIVING DWT P* A5 STACK POINTER P* A6 SENDING DWT P* P* REGISTER USAGE: & P* A1
0x215ff8…21618c Dummy {f00=0x00a9, f01=0x0190, f02=»ACK POINTER P* A6 DWT SENDING TASK $ P* A7 RECEIVING BUFFER POINTER 4 $ P* A8 ECB ADDRESS SENDING TASK P* A9 RETURN CODE P* PMOVBUF EQU * P LD A8,DWTECB,A6 SENDING ECB P ENB P LDKL A9,0 " P LD A1,D
0x21618c…216320 Dummy {f00=0x00a9, f01=0x018e, f02=» LDKL A9,/8 RETURN CODE P LD A3,ECBRL,A1 P RB(N) DIS:OE 8 PMOV:05 EQU * N P b P ST A3,ECBEL,A8 EFF. LEN j P ST A3,ECBEL,A1 EFF. LEN PMOV:10 EQU * * P LD A4,ECBBA,A8 SENDING BUFFER ADDRESS $ P LD A7,ECBBA,A1 REC.BUFFER A
0x216320…2164b4 (1, 522) Dummy {f00=0x00a9, f01=0x409c, f02=» P SCR A1,A7 P ADK A4,1 P ADK A7,1 ( P RB MOV:15 : PMOV:20 LDR A1,A9 RETURN CODE L P INH p P RTN A5 | P END @
0x2164b4…216648 Dummy {f00=0x00a9, f01=0x2008, f02=» A5 END @ ODE LD A3,4,A1 0 D MOV:10 EQU * L & " LD A4,2,A8 SENDING BUFFER ADDRESS ` " LD A7,2,A2 REC. BUFFER ADDR. ADR A3,A4 END OF BUFFER CWR A4,A3 " RF(E) MOV:20 ALL CHAR. MOVED
0x216648…2167dc Dummy {f00=0x00a9, f01=0x0190, f02=»EDITA EQU * P LDK A3,1 LOAD MASK P TM A8,A3 0 " P RF(Z) EDIT JUMP IF CTL-BYTES B P LDK A3,0 h P SCR A3,A7 CLEAR 1:ST BYTE z P ADK A7,1 INCREMENT POINTER P SCR A3,A7 CLEAR SECOND BYTE P ADK A7,1 INCREMENT POINTER P
0x2167dc…216970 Dummy {f00=0x00a9, f01=0x0190, f02=»ER t P LDR A5,A1 COPY A1 " P ECR A4,A1 CHANGE BYTES TO A4 $ P ANK A1,/FF A1=CHAR J P ANK A4,/FF A4=Z+D f P LDR A3,A4 A3=Z+D P SRL A4,4 A4=Z P SUK A4,8 " P RF(NN) EDPICT JUMP IF PICTURE ( P LC A6,TABZON+8,A4 GET DISPLACEM
0x216970…216b04 Dummy {f00=0x00a9, f01=0x0190, f02=»14 P EJECT P******** P* TEXT * ( P******** 8 PEDTXT EQU *-BASIS H " P ANK A3,/F MASK OUT DATA PART b $ P LC A6,TABLE,A3 GET DISPLACEMENT ( P RB EDJMP JUMP TO RESPECTIVE ROUTINE " P****************************** " P* SUBF
0x216b04…216c98 Dummy {f00=0x00a9, f01=0x0190, f02=»K OUT INDICATION BIT ~ P ADK A5,2 P ANK A1,1 . ( P RF(Z) SWITCH JUMP IF SWITCH FORMAT @ P LDR A10,A10 l $ P RF(NZ) AFORM1 JUMP IF OCCUPIED * P LDR A10,A2 GET RETURN ADDRESS TO A10 P RF SWITCH 0 PAFORM1 LDR A11,A2 GET RETURN ADD
0x216c98…216e2c Dummy {f00=0x00a9, f01=0x0190, f02=» | P* END OF SUBFORMAT * P******************** $ PENDSUB EQU *-BASIS @ P LDR A11,A11 Z P RF(Z) ENDS10 JUMP IF 0 n , P LDR A2,A11 GET RETURN ADDRESS FROM A11 P SUR A11,A11 CLEAR A11 P RB EDIT PENDS10 LDR A10,A10 $ P R
0x216e2c…216fc0 Dummy {f00=0x00a9, f01=0x0190, f02=» RB EDIT P****************** P* IMMEDIATE TEXT * * P****************** D $ PIMTXT EQU *-BASIS IMMEDIATE TEXT ^ " PEDT100 SUK A1,1 DECREMENT CHAR P RB(N) EDIT JUMP IF ALL DONE P LCR A6,A2 GET CHARACTER P ADK A2,1 STEP POINTER
0x216fc0…217154 (1, 523) Opaque[0x194]
0x217154…2172e8 # DirEnt {nam=»DRCP01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1538, f03=0x2020}
0x217154…2172e8 IdxSect {
0x217154…2172e8 f00 = 0x00a9 // 0x217154 @0x0
0x217154…2172e8 f01 = 0x0004 // 0x217156 @0x2
0x217154…2172e8 gno = [ // 0x217158 @0x4
0x217154…2172e8 [0x00]: C0x00a9.0x3.0
0x217154…2172e8 [0x01]: C0x00aa.0x0.0
0x217154…2172e8 ]
0x217154…2172e8 }
0x2172e8…21747c Dummy {f00=0x00a9, f01=0x0190, f02=» 2 P IDENT DRCP01 REL 8.2 78-09-15 870105040820 P : P* B 4 P**********************************************: L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* DRCP01 = DRIVER COT PRINTER P* P* P* P*
0x21747c…217610 Dummy {f00=0x00a9, f01=0x0190, f02=»NTER. f P* < P* THE COT MUST BE CONNECTED TO CPU VIA CHLT OR CHRT. P* X P* b 4 P* THE DRIVER CONSISTS OF THE FOLLOWING PARTS: l P* & P* A C C P : ACTIVATION PART ( P* I H C P : INTERRUPT HANDLER P*
0x217610…2177a4 Dummy {f00=0x00a9, f01=0x0190, f02=» 06: WRITE P* ORDER 22: CUT RECEIPT P EJECT 6 P* D P* N P* NORMAL REGISTER USAGE: X P* | " P* REGISTER A1: RETURN CODE & P* A2: OUTPUT CHARACTER $ P* A3: WORK REGISTER $ P*
0x2177a4…217938 Dummy {f00=0x00a9, f01=0x0190, f02=» " P* A8: ECB-ADDRESS P* * P EJECT 4 P* B P* L P*********************** V P* ENTRIES * v P*********************** P* P ENTRY CPAD P* * P*************************************
0x217938…217acc Dummy {f00=0x00a9, f01=0x0190, f02=»O END I/O . P EXTRN DISEND PERFORM END I/O AND DISPATCH " P EXTRN TDISP DISPATCHER ENTRY D P EXTRN OUTPUT OUTPUT CHAR. j * P EXTRN LDREG LOAD REGISTERS AND RETURN . P EXTRN STREG STORE REGISTERS AND DISPATCH P EXTRN GETCHR GET CHARACTER
0x217acc…217c60 Dummy {f00=0x00a9, f01=0x0190, f02=»TINE n P EJECT P* P* $ $ P******************************* . $ P* CONSTANTS * V $ P******************************* ~ P* PDWTBC EQU /3 P* P************************* P* TABLES
0x217c60…217df4 (1, 524) Dummy {f00=0x00aa, f01=0x018e, f02=» t P DATA RCCP RECOVERY ROUTINE P* , P* 6 P* @ P EJECT J P* X P* b 0 P******************************************* l . P* CONDITIONAL ASSEMBLY * 0 P******************************************* P*
0x217df4…217f88 Dummy {f00=0x00aa, f01=0x0190, f02=» b 0 P******************************************** P* < P EJECT F P* T P* A C C P ^ P* r 2 P* ACTIVATION PART: CHECH VALIDITY OF ORDERS | 4 P* AND STARTS THE PROCESSING P* PACCP EQU * P L
0x217f88…21811c Dummy {f00=0x00aa, f01=0x0190, f02=»NO, SET DEV. ADR. TO RECEIPT PRINTER PACP05 EQU * , P SUK A7,/22 CUT ? @ P RF(E) ACCP30 Z P ADK A7,/1C WRITE ? p " P ABL(NE) DISIOE REQUEST ERROR P LDK A3,0 START BUFFER INDEX P LDK A4,0 PACCP10 EQU * $ P CF A15,GETC
0x21811c…2182b0 Dummy {f00=0x00aa, f01=0x0190, f02=»QU * P LDK A2,/03 PACCP25 CF A5,OUTPUT PACCP27 CF A5,STREG < P ANK A2,/7F V P SUK A2,2 j P RF(Z) ACCP65 END OF PAPER | P SUK A7,6 P RF(NE) ACCP70 P SUK A2,2 P RF(NZ) ENDIO P LDK A2,/20 P ORS A
0x2182b0…218444 Dummy {f00=0x00aa, f01=0x0190, f02=» P LDK A2,/20 P ADK A3,1 P RB ACCP35 . PACCP50 LDK A2,/13 @ P ST A3,6,A8 Z P RB ACCP25 n & PACCP65 LDKL A1,/4000 RECEIPT STUCK P RF ENDIO PACCP70 SUK A2,4 P RB(E) ACCP27 PENDIO ABL DISEND P EJECT
0x218444…2185d8 Dummy {f00=0x00aa, f01=0x416e, f02=»WTST,A6 STATUS P RF(N) EXIT P LDR A1,A1 RETURN CODE * P RB(NE) ENDIO YES END I/O H P ABL LDREG j PEXIT ABL TDISP | P EJECT P* P* R C C P P* P* PRCCP EQU * P CF A15,SAVE8 P LD A7,DWTST,A
0x2185d8…21876c Dummy {f00=0x00aa, f01=0x2008, f02=» A15,SAVE8 LD A7,DWTST,A6 RB(N) EXIT 2 LDK A1,2 F RB ENDIO X * j * t END ~@ LD A4,DWTST,A6 STATUS RF(N) EXIT LDR A1,A1 RETURN CODE RF(NE) ENDIO YES END I/O ABL LDR
0x21876c…218900 Dummy {f00=0x00aa, f01=0x018e, f02=» POSI45 READ OK 4 P SUK A2,1 COUNT READ 5 $ P RB(P) POSI30 NOT ALL READ DONE 5 4 P IM DWTPNS,A6 INC STAT CNT 5 $ P RF POSI80 GIVE IT ONE MORE TRY 5 ~ PPOSI45 EQU * 5 , P LC A2,DWTSQC,A6 CALC NO OF BLOCKS TO GO 5 P SUR A2,A3 5 P SUK A2,1 5
0x218900…218a94 (1, 525) Opaque[0x194]
0x218a94…218c28 # DirEnt {nam=»DWCP01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1548, f03=0x2020}
0x218a94…218c28 IdxSect {
0x218a94…218c28 f00 = 0x00aa // 0x218a94 @0x0
0x218a94…218c28 f01 = 0x0002 // 0x218a96 @0x2
0x218a94…218c28 gno = [ // 0x218a98 @0x4
0x218a94…218c28 [0x00]: C0x00aa.0x1.0
0x218a94…218c28 ]
0x218a94…218c28 }
0x218c28…218dbc Dummy {f00=0x00aa, f01=0x0190, f02=» 2 P IDENT DWCP01 REL 8.2 78-09-15 870105040820 P* : P* D . P* DEVICE WORK TABLE FOR DISPLAY INDICATOR N P* P* & P ENTRY DWCP01 DISPLAY INDICATOR 03 P* P* ( P EXTRN CPAD POINTER TO ADDRESS-BLOCK P* P
0x218dbc…218f50 Dummy {f00=0x00aa, f01=0x4142, f02=»A 0,DWTEND-DWCP01 ECB-ADDRESS AND ORDER ( P DATA CPAD POINTER TO ADDRESS-BLOCK 0 4 P DATA 0,0 TERM.NUMBER AND PROGRAM START ADDRESS $ P DATA 0 ECB QUEUE ANCHOR ADDRESS P DATA 0 OUTPUT QUEUE P DATA 0,0,0 P RES 4 P DATA 0
0x218f50…2190e4 Dummy {f00=0x00aa, f01=0x2008, f02=» A DIAD POINTER TO ADDRESS-BLOCK 4 P DATA 0,0 TERM.NUMBER AND PROGRAM START ADDRESS 0 $ P DATA 0 ECB QUEUE ANCHOR ADDRESS h P DATA 0 OUTPUT QUEUE P DATA /2010 P DATA /3F4F,/5F6F P* P* P END @ BLE ENTRY
0x2190e4…219278 Dummy {f00=0x00aa, f01=0x2008, f02=» ES | PTTABE EQU * P* & P END 0@ <LER TERMINAL , P* T P* ^ P ENTRY TTABX TABLE ENTRY h P* P* P* P* P* PTTABX DATA 0 P DATA 60 TERMINAL STATUS & P DATA /EE TERMINAL IDENTIF
0x219278…21940c Dummy {f00=0x00aa, f01=0x018e, f02=» + P* , $ PPRB110 ANK A2,VOIN VOUCHER IN ? , P IFT COMPL=0 , : ( P RF(Z) RCTP01 ERROR .VOUCHER NOT IN , N P XIF , z P IFT COMPL=1 , P RB(Z) TP645 , P XIF , $ P LDR A1,A4 COPY REQUESTED LENGTH , P SUK A1,2 R.L. < 3? , $ P RF(N) PRB
0x21940c…2195a0 Dummy {f00=0x00aa, f01=0x0190, f02=» , 4 P* IF TABULATION CHARACTER: DETACH PRINT HEAD, - < P* SEND CHARACTERS UNTIL TABULATION POSITION IS REACHED - @ P* AND ATTACH PRINT HEAD - P* - P* - ( PPRB115 LDK A2,RPH DETACH PRINT HEAD - P CF A5,OUTPUT SEND DETACH - , PPRB1
0x2195a0…219734 (1, 526) Opaque[0x194]
0x219734…2198c8 # DirEnt {nam=»DRCR01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1550, f03=0x2020}
0x219734…2198c8 IdxSect {
0x219734…2198c8 f00 = 0x00aa // 0x219734 @0x0
0x219734…2198c8 f01 = 0x000a // 0x219736 @0x2
0x219734…2198c8 gno = [ // 0x219738 @0x4
0x219734…2198c8 [0x00]: C0x00aa.0x2.0
0x219734…2198c8 [0x01]: C0x00aa.0x3.0
0x219734…2198c8 [0x02]: C0x00ab.0x0.0
0x219734…2198c8 [0x03]: C0x00ab.0x1.0
0x219734…2198c8 [0x04]: C0x00ab.0x2.0
0x219734…2198c8 ]
0x219734…2198c8 }
0x2198c8…219a5c Dummy {f00=0x00aa, f01=0x0190, f02=» 2 P IDENT DRCR01 REL 8.2 78-09-15 870105040820 P : P B P L @ P************************************************************ V P* " P* PHILIPS TERMINAL SYSTEM PTS P* " P* DRCR01 = DRIVER CARD READER P* P*
0x219a5c…219bf0 Dummy {f00=0x00aa, f01=0x018e, f02=»IVER HANDLES ONE CARD READER PTS 6885 CONNECTED < P* TO CPU VIA CHCD ON PROGRAMMED OR MULTIPLEX CHANNEL 8 P* x P* @ P************************************************************ P EJECT P***************** P* ENTRIES
0x219bf0…219d84 Dummy {f00=0x00aa, f01=0x018e, f02=» r " P ENTRY IHCR INTERRUPT HANDLER & P ENTRY DWCR01 DWT FOR CARD READER . P X * P************************************** b * P* EXTERNAL TOSS MODULE ENTRIES * * P************************************** P EXTRN TDISP DISPATCHER
0x219d84…219f18 Dummy {f00=0x00aa, f01=0x0190, f02=» P EXTRN DISIOE REQUEST ERROR , P EXTRN INTSAV SAVE AREA, LAST INTERRUPT ( P X " P****************************** b " P* DISPLACEMENTS IN DWT * " P****************************** PDWTST EQU 2 PECB EQU 4 PDWTA2 EQU 18
0x219f18…21a0ac Dummy {f00=0x00aa, f01=0x0190, f02=»***************** PDEVICE EQU /0D PMUX EQU DEVICE+DEVICE 0 PREQLEN EQU 4 N PBUFFER EQU 2 b PEFFLEN EQU 6 v P EJECT P* P************************** P* CONDITIONAL ASSEMBLY * P************************** . P
0x21a0ac…21a240 Dummy {f00=0x00aa, f01=0x0190, f02=»:A P* P STATUS P ******************** & P -HARDWARE: F . P BIT 10: INPUT HOPPER EMPTY OR OUTPUT P STACKER FULL P 14: THROUGHPUT ERROR P 15: NOT OPERABLE P P -SOFTWARE: P BI
0x21a240…21a3d4 (1, 527) Dummy {f00=0x00aa, f01=0x0190, f02=» P P P ORDER P ******************** , P L P /02 STANDARD READ V < P -THE CARDS ARE READ IN HOLLERITH CODE, ON 12 BITS, z : P CONVERTED INTO ASCII CODE ON 8 BITS, AND STORED , P UNTIL REQ
0x21a3d4…21a568 Dummy {f00=0x00aa, f01=0x018e, f02=»**** z P A1=RETURN CODE P A2=WORK REGISTER $ P A3=WORK REGISTER > P A4=BUFFER ADDRESS X P A5=STACK BASE t P A6=DWT-ADDRESS P A7=ORDER P A8=ECB-ADDRESS P : P************************************************
0x21a568…21a6fc Dummy {f00=0x00aa, f01=0x0190, f02=» : P* CARD ROWS : 12,11,0,1,2,3.....9 * : P***************************************************** B P P P P* ADDRESS TABLE P* ************* P PCRADR DATA ACCR P
0x21a6fc…21a890 Dummy {f00=0x00aa, f01=0x018e, f02=»CT P************************* P* * , P* ACTIVATION PART * N P* * p P************************* P PACCR EQU * P SUK A7,2 ORDER 2? P RF(Z) ORDER2 YES! P ABL
0x21a890…21aa24 Dummy {f00=0x00aa, f01=0x018e, f02=» l , P RF ENDIO SET "INCORRECT LENGTH" BIT 12 PAC.1 EQU * 8 P CM STATUS,A6 J & P CM FLAG RESET RECOVERY INDICATOR ` P CF A5,READ READ ONE CARD 2 P ANKL A1,/FFF7 RESET "INCORRECT LENGTH" BIT 12 P OR A1,STATUS,A6 $ PENDIO CF A15,T
0x21aa24…21abb8 Dummy {f00=0x00aa, f01=0x0190, f02=» " P****************************** PREAD EQU * * P ST A5,DWTA5,A6 SAVE A5 < P LD A4,BUFFER,A8 P SUK A4,1 t , P ST A4,DWTA4,A6 SAVE BUFFER ADDRESS - 1 P LDK A2,1 0 P ST A2,DWTA2,A6 SAVE "COLUMN TO BE EXAMINED" P IFT CHAN=0
0x21abb8…21ad4c Dummy {f00=0x00aa, f01=0x018e, f02=» XIF P CIO A3,1,DEVICE CIO START P RB EXIT . P > P******************** H P* RECOVERY ROUTINE * d P******************** PCRON EQU * P CF A15,SAVE8 P LDKL A6,DWCR01 DWT ADDRESS P LD A3,DWTST,A6 REQUEST ON?
0x21ad4c…21aee0 Dummy {f00=0x00aa, f01=0x0190, f02=» P RB ENDIO P EJECT P ( P 2 P < P********************* F P* INTERRUPT HANDLER * d P********************* PIHCR EQU * & P ST P,INTSAVE SAVE LAST INTERRUPT P CF A15,SAVE8 SAVE A1 - A8 P LDKL A6,D
0x21aee0…21b074 (1, 528) Dummy {f00=0x00ab, f01=0x0190, f02=»A3 WITH CHARACTER FROM CARD READER | P RF(A) CONV * P XIF > P IFT CHAN=0 J : P LDKL A5,MUXBUF GET BUFFERADDRESS AND START CONVERSION ^ P ENB PIHCR10 EQU * $ P LDR* A3,A5 GET WORD FROM BUFFER P ADK A5,2 P RF CONV CONVERT
0x21b074…21b208 Dummy {f00=0x00ab, f01=0x0190, f02=» EJECT P P******************* P* CODE CONVERSION * 4 P******************* P P l . P A3=RECIEVED CHARACTER IN HOLERITH-CODE v P A2=COLUMN TO BE EXAMINED P A4=BUFFER ADDRESS - 1 P P P
0x21b208…21b39c Dummy {f00=0x00ab, f01=0x0190, f02=»CE r $ P CW A2,REQLEN,A8 BUFFER FILLED? P ABL(NG) PUTCHA NO! 2 P ABL TEST N P* ` PHOLE1 DATA 0 j PHOLE2 DATA 0 ~ P EJECT L P*======================================================================= D P
0x21b39c…21b530 Dummy {f00=0x00ab, f01=0x018e, f02=»T CW A2,REQLEN,A8 BUFFER FILLED? P RF(NG) IH.1 NO! ( 0 P LDK A3,8 YES! SET "INCORRECT LENGTH" BIT 12 @ P ORS A3,STATUS,A6 t P ABL READY . PIH.1 ST A2,EFFLEN,A8 STORE EFFECTIV LENGTH P ANKL A3,/7FFF 0 P RF(NZ) SCAN2 THE ONLY HOLE IN T
0x21b530…21b6c4 Dummy {f00=0x00ab, f01=0x018e, f02=» P RF(Z) *+6 P LDK A3,/26 & (ROW 12) P RF PUTCHA 4 P LDK A3,/2D - (ROW 11) F P RF PUTCHA d P LDR A3,A1 v ( P ADK A3,/2F DIGIT 0 - 9 (ROW 0 - 9) P RF PUTCHA & P ONE HOLE L P*=======================
0x21b6c4…21b858 Dummy {f00=0x00ab, f01=0x0190, f02=» . PSCAN2 ST A1,HOLE1 SAVE FIRST HOLE POSITION " P ADK A1,1 SCAN FOR SECOND HOLE : P SLL A3,1 ` P RB(P) *-4 r 0 P ST A1,HOLE2 2:ND HOLE FOUND! SAVE POSITION , P ANKL A3,/7FFF LAST HOLE IN THIS COLUMN? P RF(P) SCAN3 NO! P LD A1,H
0x21b858…21b9ec Dummy {f00=0x00ab, f01=0x0190, f02=»BLE v P LD A3,HOLE2 P SUK A3,3 P RF(N) FAULT DATA FAULT? 2 P ADR A1,A3 NO! R & P LCR A3,A1 CHOOSE LETTER IN TABLE h P RF PUTCHA P EJECT P P 6 P* CONVERSION TABLE 1 ASCII /41 - 5A, 2F 6 P
0x21b9ec…21bb80 Dummy {f00=0x00ab, f01=0x0190, f02=» P ------------ ( PTAB.1 DATA 'ABCDEFGHI ' 12,1 - 12,9 ( PTAB.2 DATA 'JKLMNOPQR ' 11,1 - 11,9 H & PTAB.3 DATA '/STUVWXYZ ' 0,1 - 0,9 t 6 P ************************************* P EJECT P P PSPEC RF(E) FAU
0x21bb80…21bd14 (1, 529) Dummy {f00=0x00ab, f01=0x0190, f02=» DATA FAULT? , P -THE FIRST HOLE MUST NOT BE IN ROW 8! P LD A3,HOLE2 D P SUK A3,10 X P RF(NZ) FAULT DATA FAULT? j * P -THE SECOND HOLE MUST BE IN ROW 8! 0 P LC A3,TABLE2,A1 CHOOSE CHARACTER IN TABLE2 P RF PUTCHA P
0x21bd14…21bea8 Dummy {f00=0x00ab, f01=0x0190, f02=»- PTABLE2 DATA ':#' 2,8 3,8 P DATA /4027 4,8 5,8 , P DATA '="' 6,8 7,8 H , P ************************************* d D P TWO HOLES L P*===========================================
0x21bea8…21c03c Dummy {f00=0x00ab, f01=0x0190, f02=»AN3 LD A1,HOLE1 P SUK A1,2 P RF(P) FAULT DATA FAULT? * 0 P -THE FIRST HOLE MUST BE WITHIN THE FIRST J P THREE ROWS (12, 11, 0) ~ P LD A1,HOLE2 P SUK A1,4 P RF(N) FAULT DATA FAULT? P SUK A1,5 P RF(P) FAULT
0x21c03c…21c1d0 Dummy {f00=0x00ab, f01=0x0190, f02=»P) *-4 P SUK A1,10 3:RD HOLE FOUND! P RF(NZ) FAULT DATA FAULT? 2 & P -THE 3:RD HOLE MUST BE IN ROW 8 T P SLL A3,1 ~ P RF(NZ) FAULT DATA FAULT? P -NO MORE THEN 3 HOLES! P LD A3,HOLE1 P ADR A3,A3 " P LD A3,TABLE3,
0x21c1d0…21c364 Dummy {f00=0x00ab, f01=0x0190, f02=» P* " P CONVERSION TABLE 3 , P ************************************* 4 PTABLE3 DATA TAB.4 d P DATA TAB.5 ~ P DATA TAB.6 2 P ROWS ON CARD 8 P ------------
0x21c364…21c4f8 Dummy {f00=0x00ab, f01=0x0190, f02=»' 11,2,8 11,3,8 P DATA '*)' 11,4,8 11,5,8 P DATA ';]' 11,6,8 11,7,8 : " PTAB.6 DATA /5C2C 0,2,8 0,3,8 P DATA /255F 0,4,8 0,5,8 P DATA '>?' 0,6,8 0,7,8 , P ************************************* F P
0x21c4f8…21c68c Dummy {f00=0x00ab, f01=0x0190, f02=»JECT P P SET DATA FAULT P ************** 2 PFAULT EQU * N . P LDK A1,4 SET DATA FAULT,BIT 13, IN STATUS b P ST A1,STATUS,A6 ( P LDK A3,/3F REPLACE CHARACTER BY "?" P P . P PUT CHARACTER (ASCII)
0x21c68c…21c820 Dummy {f00=0x00ab, f01=0x0190, f02=»NZ) NEXT10 RECOVERY HAS BEEN PERFORMED! P XIF 0 , P LD A4,DWTA4,A6 A2=COLUMN TO BE EXAMINED < " P ADR A4,A2 A3=ASCII CHARACTER l $ P SCR A3,A4 A4=BUFFER ADDRESS - 1 * PTEST CWK A2,80 THE WHOLE CARD SCANNED? P RF(L) NEXT NO! P IFT CHA
0x21c820…21c9b4 (1, 530) Dummy {f00=0x00ab, f01=0x0190, f02=»F z P CW A2,EFFLEN,A8 P RF(NE) NEXT00 EFF.LENGTH #4 " & P LD A4,DWTA4,A6 GET BUFFER-ADDRESS F P ADK A4,1 p ( P LDR* A2,A4 GET FIRST WORD IN BUFFER P CWK A2,':E' A2 = :E ? P RF(NE) NEXT00 NO! " P LD A2,2,A4 YES, GET NEXT WORD
0x21c9b4…21cb48 Dummy {f00=0x00ab, f01=0x0190, f02=». n P EJECT PNEXT00 EQU * P IFT CHAN=1 , PNEXT ADK A2,1 @ P ST A2,DWTA2,A6 SAVE A2 V P XIF v P IFT CHAN=0 P ABL IHCR20 READY PNEXT EQU * P ADK A2,1 P ST A2,DWTA2,A6 $ P ABL IHCR10 TAKE NEXT CHARAC
0x21cb48…21ccdc Dummy {f00=0x00ab, f01=0x0190, f02=»***************** | * P* DEVICE WORK TABLE FOR CARD READER * * P************************************* H P v PDWCR01 EQU * P DATA 0 CHANNEL PARAMETER P DATA /8000 STATUS P DATA 0 ECB ADDRESS P DATA 0 LAST OUTPUT, ORDER
0x21ccdc…21ce70 Dummy {f00=0x00ab, f01=0x4108, f02=»AL QUEUE P DATA 0 OUTPUT QUEUE LINK ! P DATA 0 SAVEAREA FOR A2 ! 2 P DATA 0 SAVEAREA FOR A4 ! R P DATA 0 SAVEAREA FOR A5 ! r P RES 4 DWT STACK ! $ P DATA 0 SOFTWARE STATUS SAVEAREA ! " PFLAG DATA 0 RECOVERY INDICATOR ! P END ! @ !
0x21ce70…21d004 Dummy {f00=0x00ab, f01=0x2008, f02=» " FOR A2 DATA 0 SAVEAREA FOR A4 DATA 0 SAVEAREA FOR A5 8 DATA 0 DATA FAULT SAVEAREA X RES 4 DWT STACK | END @ DRESS DATA 0 LAST OUTPUT, ORDER ( $ DATA CRADR POINTER TO DEVICE DRIVER DATA 0
0x21d004…21d198 Dummy {f00=0x00ab, f01=0x2008, f02=» BLE ZERO 6 P DATA DWTSQ+DVTKB POINTER TO FIRST PLACE IN QUEUE 4 P DATA DWTSQ+DVTKB POINTER TO LAST PLACE IN QUEUE R PDWTSQ EQU *-DVTKB P RES 0 P* P END @ 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P R
0x21d198…21d32c Dummy {f00=0x00ab, f01=0x0190, f02=» j Lz ? ? ? ? ? ? ? V ? ? ? ? ? ? ? ? ? ? ? ? ? ? Nb B ( ? ? ? ? ? ? ? @ X, N ? ? ? ? ? ? ? h T
0x21d32c…21d4c0 Dummy {f00=0x00ab, f01=0x0190, f02=» @ 4 R 2 f R X f R ~ f T 0 R
0x21d4c0…21d654 (1, 531) Opaque[0x194]
0x21d654…21d7e8 # DirEnt {nam=»TTABD2«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1578, f03=0x2020}
0x21d654…21d7e8 IdxSect {
0x21d654…21d7e8 f00 = 0x00ab // 0x21d654 @0x0
0x21d654…21d7e8 f01 = 0x0002 // 0x21d656 @0x2
0x21d654…21d7e8 gno = [ // 0x21d658 @0x4
0x21d654…21d7e8 [0x00]: C0x00ab.0x3.0
0x21d654…21d7e8 ]
0x21d654…21d7e8 }
0x21d7e8…21d97c Dummy {f00=0x00ab, f01=0x0190, f02=» 2 P IDENT TTABD2 REL 8.2 78-09-15 870105040820 P* LREK 78-02-20 : P* T 8 P**************************************************** ^ P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P* P*
0x21d97c…21db10 Dummy {f00=0x00ab, f01=0x0190, f02=» $ P* TERMINAL 01: TELLER TERMINAL P* 0 P ENTRY TTABD2 TABLE ENTRY : PX:A EQU 0 4 PRECBFZ EQU X:A INDEX RECORD BUFFER SIZE IN WORDS n P* P* PTTABD2 DATA 0 P DATA /8031 TASK LEVEL & P DATA 'D2' TERMINAL IDENTI
0x21db10…21dca4 Dummy {f00=0x00ab, f01=0x4132, f02=»INAL SAVE AREA P RES 14 P* & " P DATA TTABE-* TERMINAL DEVICES 0 P DATA 0,0 MASTER INDEX ENTRY V PTTABE EQU * z P DATA 0,0,0,0,0,0,0,0 P DATA 0,0,0,0,0,0,0,0 P DATA 0 TASK STACK P RES RECBFZ BUFAR1 P RES RECBF
0x21dca4…21de38 Dummy {f00=0x00ab, f01=0x2008, f02=» ES | PTTABE EQU * P* & P END 0@ <LER TERMINAL , P* T P* ^ P ENTRY TTABX TABLE ENTRY h P* P* P* P* P* PTTABX DATA 0 P DATA 60 TERMINAL STATUS & P DATA /EE TERMINAL IDENTIF
0x21de38…21dfcc Dummy {f00=0x00ab, f01=0x0190, f02=»,DWTST,A6 [ P RF(N) CWR900 NO REQUEST P LD A2,DWTOR,A6 GET ORDER 2 P SUK A2,6 T P RF(Z) CWR100 WRITE REQUEST f P SUK A2,2 ( P RF(NZ) CWR900 NOT EXCHANGE REQUEST P LDR A1,A1 2 P RF(NZ) CWR100 TRANSMISSION ERROR, RC NOT ZERO
0x21dfcc…21e160 Dummy {f00=0x00ab, f01=0x0190, f02=» n P CF A15,CTIME STOP TIMING ] P LDR A8,A8 ] * P RF(Z) CWR150 ] < P ST A2,ECBCW,A8 ] R $ P CF A15,TENDIO COMPLETE REQUEST ] j PCWR150 EQU * ] * P CF A15,REMOVW REMOVE FROM WRITE QUEUE ] PCWR200 EQU * ] P IFF TBUFL=0 ] $ P LD A4,FECBB
0x21e160…21e2f4 (1, 532) Opaque[0x194]
0x21e2f4…21e488 # DirEnt {nam=»DRMS01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1580, f03=0x2020}
0x21e2f4…21e488 IdxSect {
0x21e2f4…21e488 f00 = 0x00ac // 0x21e2f4 @0x0
0x21e2f4…21e488 f01 = 0x000a // 0x21e2f6 @0x2
0x21e2f4…21e488 gno = [ // 0x21e2f8 @0x4
0x21e2f4…21e488 [0x00]: C0x00ac.0x0.0
0x21e2f4…21e488 [0x01]: C0x00ac.0x1.0
0x21e2f4…21e488 [0x02]: C0x00ac.0x2.0
0x21e2f4…21e488 [0x03]: C0x00ac.0x3.0
0x21e2f4…21e488 [0x04]: C0x00ad.0x0.0
0x21e2f4…21e488 ]
0x21e2f4…21e488 }
0x21e488…21e61c Dummy {f00=0x00ac, f01=0x0190, f02=» 2 P IDENT DRMS01 REL 9.1 78-09-15 870106040912 P : P* B 6 P************************************************* L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* ( P* DRMS01 = DRIVER MAGNETIC STRIPE P* P* P*
0x21e61c…21e7b0 Dummy {f00=0x00ac, f01=0x0190, f02=»R HANDLES INPUT/OUTPUT ON THE B P* M A G N E T I C S T R I P E U N I T (M S U) PTS 6XXX. & > P* THE MSU MUST BE CONNECTED TO THE CPU VIA CHLT OR CHRT. l P* @ P* TRACK 2 AND 3 ON STRIPES CAN BE READ AND TRACK 3 CAN BE P* WRITTEN.
0x21e7b0…21e944 Dummy {f00=0x00ac, f01=0x0190, f02=»* 0 P* THE DRIVER CONSISTS OF FOLLOWING PARTS: P* > $ P* A C M S : ACTIVATION PART H $ P* ORDER PROCESSOR p & P* I H M S : INTERRUPT HANDLER & P* O N M S : RECOVERY ROUTINE P* P* P EJECT
0x21e944…21ead8 Dummy {f00=0x00ac, f01=0x0190, f02=» 11 INSERT CARD P* 26 END OF OPERATION P* < * P* THE FOLLOWING RETURN CODE IS USED: F P* t P* BIT 0 REQUEST ERROR ~ P* 7 NO DATA P* 10 CARD MISSING " P* 12 INCORRECT LENGTH * P*
0x21ead8…21ec6c Dummy {f00=0x00ac, f01=0x0190, f02=» NORMAL USE OF REGISTERS: P* " " P* REGISTER A1 RETURN CODE , . P* A2 INPUT/OUTPUT CHARACTER R $ P* A3 BUFFER INDEX P* A4 * P* A5 STACK BASE POINTER " P* A6 DWT
0x21ec6c…21ee00 Dummy {f00=0x00ac, f01=0x0190, f02=» P* ENTRIES * P*********** P* , P ENTRY MSAD ADDRESS BLOCK 6 P* X P************* b P* EXTERNALS * x P************* P* 2 P EXTRN SAVE8 SAVE REGISTER A1-A8 ON A15 STACK 6 P EXTRN STREG STORE REGISTERS AND GO
0x21ee00…21ef94 (1, 533) Dummy {f00=0x00ac, f01=0x0190, f02=»RN DISIOE DISPATCH END I/O, REQUEST ERROR 2 P EXTRN GETCHR GET NEXT CHARACTER IN ECB-BUFFER 2 & P EXTRN DISEND END I/O AND DISPATCH h " P EXTRN TDISP DISPATCHER ENTRY $ P EXTRN DWTST DWT SOFTWARE STATUS P EXTRN DWTOR ORDER P EXTRN DWTECB
0x21ef94…21f128 Dummy {f00=0x00ac, f01=0x0190, f02=»****** ~ P* P EJECT DRMS01 P* 0 P************* : P* CONSTANTS * P P************* f P* | ( PCRWSTX EQU /3B CARD START CHARACTER & PCRWETX EQU /3F CARD END CHARACTER PRTRIES EQU 2 NO OF RETRIES P* P
0x21f128…21f2bc Dummy {f00=0x00ac, f01=0x0190, f02=»QU /1E STACK BASE POINTER PDWTA4 EQU /14 " " PDWTLRC EQU /26 LRC-ACCUMULATOR 8 P* ^ P******************** h P* ECB-DISPLACEMENT * P******************** P* PECBBA EQU 2 BUFFER ADDRESS PECBRL EQU 4 REQUESTED LENGTH
0x21f2bc…21f450 Dummy {f00=0x00ac, f01=0x0190, f02=» P********** P* TABLES * P********** ( P* : PMSAD EQU * D P DATA ACMS ACTIVATION DRIVER V P DATA IHMS INTERRUPT HANDLER z P DATA RCMS RECOVERY ROUTINE P* P* PTAB EQU * ORDER TABLE P DATA /060A,/1126
0x21f450…21f5e4 Dummy {f00=0x00ac, f01=0x0190, f02=»JECT DRMS01 P* P* P* A C M S * P* > 2 P* ACTIVATION PART: CHECKS VALIDITY OF ORDERS H 0 P* AND STARTS PROCESSING. ~ P* P* PACMS EQU * P LDK A4,TABL-1 0 PACMS10 CC A7,TAB,A4 FIND O
0x21f5e4…21f778 Dummy {f00=0x00ac, f01=0x0190, f02=»ABL DISIOE DISPATCH END I/O,REQUEST ERROR P* 2 PACMS20 EQU * < P ADR A4,A4 GET INDEX P 2 P ABI MSFUN,A4 BRANCH TO VALID FUNCTION MODULE l P EJECT DRMS01 P* P* INSERT CARD /11 P* PINSERT EQU * " P LDK A4,
0x21f778…21f90c Dummy {f00=0x00ac, f01=0x0190, f02=»05 EQU * P LDK A2,/01 GENERAL RESET P CF A5,OUTPUT SEND IT 2 * P CF A5,STREG WAIT FOR MESSAGE FROM MSU P . PINSE10 CWR A2,A4 DOCUMENT INSERTED/ESCAPED ~ P RB(NE) INSE05 NO P SC A4,DWTST+1,A6 YES P EJECT DRMS01 P* $
0x21f90c…21faa0 Dummy {f00=0x00ac, f01=0x018e, f02=»ARD /0A P* PREAD EQU * $ P LDK A4,RTRIES SET NO OF RETRIES . $ P LC A2,DWTBC,A6 GET BYTE COUNTER V P ANK A2,/FF ~ " P SUK A2,/0C DOCUMENT INSERTED P RF(NE) WRIT02 NO PREAD02 EQU * P LDK A3,0 RESET BUFFER INDEX $
0x21faa0…21fc34 (1, 534) Dummy {f00=0x00ac, f01=0x0190, f02=» & P ADK A2,/A COMPUTE TRACK TO SELECT 6 P CF A5,OUTPUT SEND READ TRACK COMMAND (/0A OR /0B) . ( P CM DWTLRC,A6 CLEAR LRC-ACKUMULATOR h PREAD05 EQU * & P CF A5,STREG WAIT FOR DATA INPUTS P LDR A7,A2 " P SUK A7,4 OPERATION INCORRECT
0x21fc34…21fdc8 Dummy {f00=0x00ac, f01=0x0190, f02=»NT j PENDIO1 RB ENDIO & PREAD07 SUK A7,2 OPERATION CORRECT? " P RB(E) ENDIO YES L P SUK A7,2 d P RF(E) READ60 NO DATA v P LDR A3,A3 FIRST CHARACTER $ P RF(N) READ40 NO; LRC-CHARACTER " P RF(NE) READ10 NO; DATA INPUT P ADK
0x21fdc8…21ff5c Dummy {f00=0x00ac, f01=0x018e, f02=» ( PREAD10 ANK A3,/7F MASK BUFFER INDEX P CWK A2,CRWETX END CHARACTER 0 P RF(NE) READ20 NO T 0 P ST A3,ECBEL,A8 YES; STORE EFFECITVE LENGTH n P NGR A3,A3 NEGATE REGISTER P RF READ25 PREAD20 EQU * * P CF A15,STORE STORE CHAR IN EC
0x21ff5c…2200f0 Dummy {f00=0x00ac, f01=0x0190, f02=» ` , P CF A15,CDCHK CHECK IF CODE CHECK ERROR P RB READ05 8 $ PREAD40 XR A2,DWTLRC,A6 CHECK LRC J P ANK A2,/F MASK LRC-SUM r P RB(E) READ05 LRC CORRECT P RB READ06 $ PREAD50 LDK A1,8 INCORRECT LENGTH * P ST A3,ECBEL,A8 STORE EFFE
0x2200f0…220284 Dummy {f00=0x00ac, f01=0x0190, f02=»CARD /06 P* PWRITE EQU * $ P LDK A4,RTRIES SET NO OF RTRIES 0 $ P LC A2,DWTBC,A6 GET BYTE COUNTER X P ANK A2,/FF " P SUK A2,/0C DOCUMENT INSERTED P RF(E) WRIT05 YES " PWRIT02 LDK A1,/20 CARD MISSING PENDIO2 RB ENDI
0x220284…220418 Dummy {f00=0x00ac, f01=0x0190, f02=»CHARACTER v PWRIT10 EQU * , P XRS A2,DWTLRC,A6 UPDATE LRC-ACKUMULATOR & P CF A5,OUTPUT SEND CHARACTER V 6 PWRIT15 CF A15,GETCHR GET NEXT CHAR FROM ECB-BUFFER z P LDR A1,A1 LAST CHARACTER P RF(E) WRIT20 YES P CF A15,CDCHK VALID CODE
0x220418…2205ac Dummy {f00=0x00ac, f01=0x0190, f02=»RS A2,DWTLRC,A6 UPDATE LRC P CF A5,OUTPUT SEND CHARACTER " " P XR A2,DWTLRC,A6 LRC-CHARACTER F P ORK A2,/30 SET ZONE l $ P CF A5,OUTPUT SEND LRC-CHARACTER . PWRIT25 CF A5,STREG WAIT FOR STATUS MESSAGE P* P LDR A7,A2 $ P SUK A7,4
0x2205ac…220740 Dummy {f00=0x00ac, f01=0x0190, f02=»WLEDGEMENT r P RB ENDIO2 ( PWRIT30 SUK A7,2 OPERATION CORRECT ? $ P RB(Z) ENDIO2 YES P P SUK A7,2 j ( P RB(E) WRIT27 NO DATA AT READ CHECK | P RB WRIT25 P EJECT DRMS01 P* P* END OF OPERATION /26 P* P
0x220740…2208d4 (1, 535) Dummy {f00=0x00ac, f01=0x0190, f02=»BC,A6 GET BYTE COUNTER P ANK A2,/FF P RF(NE) END10 2 0 PEND05 CF A5,STREG WAIT FOR MESSAGE FROM MSU H & PEND10 CWR A2,A4 DOCUMENT ESCAPED? | P RB(NE) END05 NO 2 P SC A4,DWTST+1,A6 CHAR TO BYTE COUNTER IN DWT PENDIO3 RB ENDIO2
0x2208d4…220a68 Dummy {f00=0x00ac, f01=0x0190, f02=» ANK A2,/FF $ P LD A3,DWTST,A6 GET STATUS WORD P RF(NN) IHM100 BUSY < P LDR A3,A2 SAVE CHAR X " P SUK A3,/0C DOCUMENT INSERTED t P RF(E) IHMS10 P SUK A3,1 DOCUMENT ESCAPED P RF(NE) EXIT PIHMS10 EQU * & P SC A2,DWTST+1
0x220a68…220bfc Dummy {f00=0x00ac, f01=0x0190, f02=» A1,A1 RETURN CODE FROM CHLT/CHRT . P RB(NE) ENDIO3 YES; INDICATE NOT OPERABEL * P LDR A4,A4 OUTPUT ANSWER ? P RF(Z) IHRET YES ~ P SUK A7,/11 INSERT CARD P RF(E) IHRET YES " P SUK A7,/15 END OF OPERATION? P RF(E) IHRET P
0x220bfc…220d90 Dummy {f00=0x00ac, f01=0x0190, f02=»5 Z P* PIHM140 LDK A4,/0D ( P SC A4,DWTST+1,A6 UPDATE STATUS WORD . P LDK A1,/20 CARD MISSING Z PENDIO4 RB ENDIO3 z P EJECT DRMS01 P* P* P* R C M S P* P* RECOVERY ROUTINE P* P*
0x220d90…220f24 Dummy {f00=0x00ac, f01=0x0190, f02=»A7,DWTST,A6 BUSY? P RB(N) EXIT NO P LDK A1,2 THROUGPUT ERROR 0 P RB ENDIO4 R P EJECT DRMS01 d P* | . P* STORE = SUBROUTINE TO STORE CHARACTER : P* IN ECB-BUFFER AND INCREMENT BUFFER INDEX. P* PSTORE EQ
0x220f24…2210b8 Dummy {f00=0x00ac, f01=0x0190, f02=»X | P RTN A15 P* P* $ * P* CDCHK = CHECK IF CODE CHECK ERROR . P* P* AT ENTRY: A2=CHARACTER f $ P* AT EXIT: A1=RERURN CODE 0,4 PCDCHK EQU * P LDR A1,A2 P SUK A1,/30 VALID CODE? P RF(N) CDC05 NO
0x2210b8…22124c Dummy {f00=0x00ac, f01=0x4050, f02=» " P ORS A1,ECBRC,A8 INSERT IN ECB PCDC10 RTN A15 * P END @@ LROR . P* P* AT ENTRY: A2=CHARACTER f $ P* AT EXIT: A1=RERURN CODE 0,4 PCDCHK EQU * P LDR A1,A2 P SUK A1,/30 VALID CODE? P RF(N) CDC05 NO
0x22124c…2213e0 Dummy {f00=0x00ac, f01=0x2008, f02=» ER INDEX. l P* PSTORE EQU * $ " P LD A7,ECBBA,A8 BUFFER ADDRESS 8 P ADR A7,A3 ADD BUFFER INDEX ^ P SCR A2,A7 STORE CHAR P ADK A3,1 INCR. INDEX P RTN A15 P* P END @ A1,2 THROUGPUT ERROR P R
0x2213e0…221574 (1, 536) Dummy {f00=0x00ad, f01=0x0190, f02=»INDICATE THROUGHPUT ERROR = P RB RCDY15 > " & PRCDY25 LDK A2,STX START OF MESSAGE > 4 P CF A5,OUTPUT > ^ 4 P LC A4,DWTBC,A6 GET NUMBER OF POSITIONS TO BACK > t P ANK A4,/FF > P RF(E) RCDY30 > . P CF A5,BACCAN SEND BACKSPACES AND RUB OUT > P
0x221574…221708 Dummy {f00=0x00ad, f01=0x0008, f02=» h p x
0x221708…22189c Dummy {f00=0x00ad, f01=0x0190, f02=» 2 P IDENT DRDI01 REL 8.2 78-09-15 870105940912 P : P* B < P******************************************************* L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* * P* DRDI01 = DRIVER INDICATOR DISPLAY P* P*
0x22189c…221a30 Dummy {f00=0x00ad, f01=0x0190, f02=»RIVER HANDLES OUTPUT TO SIGNAL DISPLAYS PTS 6241 > P* AND 6242. IT ALSO CONTROLS LAMPS ON KEYBOARDS PTS 6232 8 " P* 6233, 6236 AND 633, 62361. z P* @ P* THESE DEVICES MUST BE CONNECTED TO CPU VIA CHLT OR CHRT P* P* 4 P* TH
0x221a30…221bc4 Dummy {f00=0x00ad, f01=0x0190, f02=»LER t P* " P* R C D I : RECOVERY ROUTINE P* < P* F * P* THE FOLLOWING ORDERS ARE TREATED: P P* ~ " P* ORDER 05: WRITE LIGHTS ON " P* 06: WRITE LIGHTS OFF ( P* 07: WRITE PROGRAM DISPLAY , P*
0x221bc4…221d58 Dummy {f00=0x00ad, f01=0x0190, f02=»ETURN CODE ~ P* A2: OUTPUT " P* A3: WORK REGISTER 2 " P* A4: WORK REGISTER X " P* A5: WORK REGISTER ~ P* A6: DWT-ADDRESS P* A7: ORDER P* A8: ECB-ADDRESS
0x221d58…221eec Dummy {f00=0x00ad, f01=0x0190, f02=» BIT 10 = 1 IF PROGRAM DISPLAY (PTS 6241) , P* BIT 11 = 1 FOR PTS 6232,6331,6236 6 , P* BIT 11 = 0 FOR PTS 6241,6242,6233 f P* : P* ORDER 07, WRITE PROGRAM DISPLAY MAY BE EXCLUDED BY P* CONDITIONAL ASSEMBLY P* P
0x221eec…222080 Dummy {f00=0x00ad, f01=0x0190, f02=»TO ADDRESS-BLOCK | P* P******************* " P* EXTERNALS * > P******************* Z P* v P EXTRN SAVE8 SAVE REGS P EXTRN TENDIO END I/O . P EXTRN DISEND PERFORM END I/O AND DISPATCH * P EXTRN TDISP DISPATCHER OR
0x222080…222214 (1, 537) Opaque[0x194]
0x222214…2223a8 # DirEnt {nam=»DVTMS «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x15a8, f03=0x2020}
0x222214…2223a8 IdxSect {
0x222214…2223a8 f00 = 0x00ad // 0x222214 @0x0
0x222214…2223a8 f01 = 0x0002 // 0x222216 @0x2
0x222214…2223a8 gno = [ // 0x222218 @0x4
0x222214…2223a8 [0x00]: C0x00ad.0x1.0
0x222214…2223a8 ]
0x222214…2223a8 }
0x2223a8…22253c Dummy {f00=0x00ad, f01=0x0190, f02=» 0 P IDENT DVTMS REL 8.2 78-09-15 870105040820 P* 8 0 P* DEVICE WORK TABLE FOR MAGNETIC STRIPE UNIT B P* v P ENTRY DVTMS TABLE ENTRY P* ( P EXTRN MSAD POINTER TO ADDRESSBLOCK P* P* PDVTMS EQU * TABLE ENTRY "
0x22253c…2226d0 Dummy {f00=0x00ad, f01=0x0190, f02=»T AND ORDER CODE ~ ( P DATA MSAD POINTER TO ADDRESS BLOCK P DATA 0 TTAB-ADDRESS D & P DATA 0 WAIT/ACTIVATION INDICATOR ` P DATA 0 TERMINAL QUEUE P DATA 0 OUTPUT QUEUE LINK P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4
0x2226d0…222864 Dummy {f00=0x00ad, f01=0x4028, f02=»LATOR ~ P* P END @ $ER TO ADDRESS BLOCK P DATA 0 TTAB-ADDRESS D & P DATA 0 WAIT/ACTIVATION INDICATOR ` P DATA 0 TERMINAL QUEUE P DATA 0 OUTPUT QUEUE LINK P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4
0x222864…2229f8 Dummy {f00=0x00ad, f01=0x2008, f02=» ER TO ADDRESS BLOCK P DATA 0 TTAB-ADDRESS ( & P DATA 0 WAIT/ACTIVATION INDICATOR D P DATA 0 TERMINAL QUEUE n P DATA 0 OUTPUT QUEUE LINK P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5
0x2229f8…222b8c Dummy {f00=0x00ad, f01=0x0190, f02=» W P W , ( s@@ X R ! Y # ! , TDISP , ( : R _ 4 ! l * & ! " T ! ! , ( 4 X # 4 Y # ! " " P ,$
0x222b8c…222d20 Dummy {f00=0x00ad, f01=0x40fe, f02=» Q V W ` T V T l H D ! p T W Q T + 1P 3Q 9W K x W ] sT P P W ( H D ! V P RN Q PH P R: T2 U W4 T )R /U =W QRD t $ UP [P cW2 wR R T P @ P ,$
0x222d20…222eb4 (1, 538) Opaque[0x194]
0x222eb4…223048 # DirEnt {nam=»DRIC0X«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x15b0, f03=0x2020}
0x222eb4…223048 IdxSect {
0x222eb4…223048 f00 = 0x00ad // 0x222eb4 @0x0
0x222eb4…223048 f01 = 0x0002 // 0x222eb6 @0x2
0x222eb4…223048 gno = [ // 0x222eb8 @0x4
0x222eb4…223048 [0x00]: C0x00ad.0x2.0
0x222eb4…223048 ]
0x222eb4…223048 }
0x223048…2231dc Dummy {f00=0x00ad, f01=0x0190, f02=» 2 P IDENT DRIC0X REL 8.2 78-09-15 870105040820 P : P* B P*************************** L P* p $ P* PHILIPS TERMINAL SYSTEM PTS z P* $ P* DRIC0X = DRIC01 DUMMY MODULE P* P* P* P* P* P*
0x2231dc…223370 Dummy {f00=0x00ad, f01=0x4060, f02=»RN IHRTN PITADI EQU * PITADO EQU * $ PITABRT ABL IHRTN 8 END P@ ******* L P* p $ P* PHILIPS TERMINAL SYSTEM PTS z P* $ P* DRIC0X = DRIC01 DUMMY MODULE P* P* P* P* P* P*
0x223370…223504 Dummy {f00=0x00ad, f01=0x2008, f02=» NT DRIC0X REL=8.1 DATE=78-03-03 A-TEST END :@ F
0x223504…223698 Dummy {f00=0x00ad, f01=0x0190, f02=»******************** " ( P* S (LEADING ZERO REPLACED BY SIGN)* # ( P************************************ # H PLS EQU *-BASE # t & PEDP850 IM EDSUPP MARK SUPPRESSION # ( P CF A14,EDGETN GET CHR FROM ELEMENT # & P LD A1,EDNOTZ LOAD ZERO INDICATOR # (
0x223698…22382c Dummy {f00=0x00ad, f01=0x018e, f02=» AND STORE CHR # | P EJECT $ P************************* $ $ P* C:CONDITIONAL PICTURE * $ F P************************* $ h PLC EQU *-BASE $ " PEDP900 LD A4,EDSIGN LOAD SIGN $ ( P RB(NZ) EDP725 JUMP BACK IF POSITIVE $ & P LD A4,EDPPOI LOAD PIC
0x22382c…2239c0 Dummy {f00=0x00ad, f01=0x0190, f02=» $ P* % P************************ % P* PRINT SPACE IF BLANK * % 2 P************************ % R PLD EQU *-BASE % r ( P IM EDSUPP INDICATE SUPPRESSION CODE % , P CF A14,EDGETA GET DIGIT IN ASCII TO A6 % P CWK A6,/20 % P RB(E) EDP670 JU
0x2239c0…223b54 (1, 539) Opaque[0x194]
0x223b54…223ce8 # DirEnt {nam=»DROD01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x15b8, f03=0x2020}
0x223b54…223ce8 IdxSect {
0x223b54…223ce8 f00 = 0x00ad // 0x223b54 @0x0
0x223b54…223ce8 f01 = 0x000c // 0x223b56 @0x2
0x223b54…223ce8 gno = [ // 0x223b58 @0x4
0x223b54…223ce8 [0x00]: C0x00ad.0x3.0
0x223b54…223ce8 [0x01]: C0x00ae.0x0.0
0x223b54…223ce8 [0x02]: C0x00ae.0x1.0
0x223b54…223ce8 [0x03]: C0x00ae.0x2.0
0x223b54…223ce8 [0x04]: C0x00ae.0x3.0
0x223b54…223ce8 [0x05]: C0x00af.0x0.0
0x223b54…223ce8 ]
0x223b54…223ce8 }
0x223ce8…223e7c Dummy {f00=0x00ad, f01=0x0190, f02=» 2 P IDENT DROD01 REL 8.2 78-09-15 870106340821 P : P* B 0 P******************************************* L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P* DROR01 = DRIVER OPTICAL CHARACTER READER P* P* P*
0x223e7c…224010 Dummy {f00=0x00ad, f01=0x0190, f02=»UT FROM OCR t , P* CONNECTED TO CPU VIA CHLT OR CHRT. P* D " P* ONLY INPUT DATA FROM OCR N $ P* ARE HANDLED BY THE DRIVER. t P* P* 0 P* THE DRIVER CONSISTS OF FOLLOWING PARTS: P* " P* A C O D : ACTIVATION
0x224010…2241a4 Dummy {f00=0x00ad, f01=0x0190, f02=»* P* , P* THE FOLLOWING ORDERS ARE THREATED: P* D P* ORDER 02: READ DOCUMENT N & P* ORDER 04: RESET INPUT BUFFER r P* P* P* NORMAL REGISTER USAGE : P* " P* REGISTER A1 : RETURN CODE & P*
0x2241a4…224338 Dummy {f00=0x00ad, f01=0x018e, f02=» STACK BASE ~ " P* A6 : DWT-ADDRESS P* A7 : ORDER : " P* A8 : ECB-ADDRESS Z P* P* P* P* SYSTEM ADAPTATION P* 4 P* THE LENGTH OF THE CIRCULAR INPUT BUFFER IS 8 P* DEFIN
0x224338…2244cc Dummy {f00=0x00ad, f01=0x0190, f02=» P* , P* IF TIMING IS WANTED, TIMER POINTER , P* IN DWT MUST BE SET UNEQUAL TO ZERO. > 2 P* STANDARD VALUE FOR TIME-OUT IS 30 SECONDS n 0 P* SINCE LAST CHARACTER. IF ANOTHER VALUE * P* IS WANTED FOR A SYSTEM, INDICATOR $ P*
0x2244cc…224660 Dummy {f00=0x00ad, f01=0x0190, f02=» TO EXCLUDE FROM THE DRIVER FOLLOWING FUNCTIONS: P* 8 " P* -----POWER ON INDICATION B P* -----TIME-OUT-FUNCTION h P* P* ENTRIES P* P* P ENTRY ODAD ADDRESS-BLOCK P* P* P* & P* EXTER
0x224660…2247f4 (1, 540) Dummy {f00=0x00ae, f01=0x0190, f02=»SPATCHER n P EXTRN TENDIO END I/O " P EXTRN TDISP DISPATCHER ENTRY . 0 P EXTRN LDREG LOAD REGISTERS A2-A8 AND RETURN T 4 P EXTRN STREG STORE REGISTERS AND GO TO DISPATCER , P EXTRN LDREGE RETURN FROM ECHOE HANDLING P EXTRN LDREGF PANIK EXTE
0x2247f4…224988 Dummy {f00=0x00ae, f01=0x018e, f02=»HO t P EXTRN ECHO ECHO ROUTINE P EXTRN ECHEND END OF ECHOING * P* N P* X P EJECT b P* p P* DWT PARAMETERS z P* P* P* " P EXTRN DWTCHP CHANEL PARAMETER P EXTRN DWTST STATUS * P EXTRN DWTADR ADDR
0x224988…224b1c Dummy {f00=0x00ae, f01=0x0190, f02=» P* P* * POVMASK EQU /2 OVERFLOW IN INPUT BUFFER P* J . PX:B EQU 80 LENGTH OF CIRCULAR INPUT BUFFER T 2 PDWTLNG EQU X:B NUMBER OF BYTES IN DECIMAL FORM PETX EQU /03 END CHARACTER P* P* TIME BEFORE TIME-OUT
0x224b1c…224cb0 Dummy {f00=0x00ae, f01=0x0190, f02=»SPLACEMENT P* P* P* & PDWTBC EQU /3 0 $ PDWTCON EQU /10 CONVERSION TABLE D " PDWTA3 EQU /12 SAVE AREA FOR A3 l " PDWTA4 EQU /14 SAVE AREA FOR A4 " PDWTA5 EQU /16 SAVE AREA FOR A5 PDWTSB2 EQU /1E STACK BASE PDWTTP EQ
0x224cb0…224e44 Dummy {f00=0x00ae, f01=0x0190, f02=»E IN QUEUE l 2 PDWTUTQ EQU /2A POINTER TO LAST PLACE IN QUEUE PDWTSQ EQU /2C START TO QUEUE H ( PDWTEQ EQU DWTSQ+DWTLNG END OF QUEUE l P* P* P EJECT P* P******************** P* ECB-DISPLACEMENT * P************
0x224e44…224fd8 Dummy {f00=0x00ae, f01=0x0190, f02=»C EQU 8 RETURN CODE PECBCW EQU 10 CONTROL WORD P EJECT > P* L P* V , P**************************************** ` , P* CONDITIONAL ASSEMBLY * , P**************************************** P* P* > P*
0x224fd8…22516c Dummy {f00=0x00ae, f01=0x0190, f02=»T THIS IS COMPLETED WITH p * P* -2 IN THE CONTROL WORD OF ECB. @ P* IF THERE IS NO READ REQUEST , THE FIRST READ REQUEST N > P* AFTER POWER ON IS COMPLETED WITH -2 IN CONTROL WORD P* OF ECB P* P* PX:A EQU 0
0x22516c…225300 Dummy {f00=0x00ae, f01=0x0190, f02=» PX:C EQU 1 PCTIMUT EQU X:C P* , P* 6 8 P* THIS DRIVER CAN BE MADE TO HANDLE CREDIT ORDERS @ P* BY SETTING CREDIT = 1 | 0 P* ORDER /04 IS THEN REPLACED BY ORDER /31 8 P* CONTROL WORD OF ECB IS SET TO ZERO INSTEAD OF-2
0x225300…225494 (1, 541) Dummy {f00=0x00ae, f01=0x0190, f02=»TABLES * P************** P* * PODAD EQU * 4 P DATA ACOD ACTIVATION DRIVER F P DATA IHOD INTERRUPT HANDLER j P* P IFF POWOFF=1 P* P DATA 0 NO RECOVERY P* P XIF P* P* P IFT POWOF
0x225494…225628 Dummy {f00=0x00ae, f01=0x0190, f02=»HE RECOVERY ROUTINE FOR OCR & P* ENTERED FROM CHLT/CHRT DRIVER $ P* N PRCOD EQU * X P INH j P CF A15,SAVE8 v P LDKL A1,/200 0 P ORS A1,DWTST,A6 INDICATE POWER OFF OCCURED P LD A3,DWTST,A6 I/O-REQUEST P RF(N) RCOD05
0x225628…2257bc Dummy {f00=0x00ae, f01=0x0190, f02=»RCOD05 EQU * P LDK A1,1 " P ORS A1,DWTST,A6 RECOVERY FLAG & PRCOD10 EQU * L P LDK A4,DWTTP ` P ADR A4,A6 v P LDR A1,A6 P CF A15,SETIMP P DATA RCTUT,/A P ST A4,DWTTP,A6 P RF RCTDIS DISPATCH PRCTUT EQU *
0x2257bc…225950 Dummy {f00=0x00ae, f01=0x018e, f02=»GET ECB-ADDRESS * P RF(Z) RCTUT6 SYSTEM START SKIP BUFFER P INH F P XIF R P IFT CREDIT-POWOFF=-1 ^ " P LDKL A1,-2 INDICATE POWER ON | P ST A1,ECBCW,A8 P XIF P IFT CREDIT+POWOFF=2 P CM 10,A8 INDICATE POWER ON P X
0x225950…225ae4 Dummy {f00=0x00ae, f01=0x0190, f02=» P LDK A1,0 P LD A2,DWTINQ,A6 P SCR A1,A2 . P ST A2,DWTUTQ,A6 @ P LD A3,DWTST,A6 X P RF(NN) RCEND p PRCTDIS EQU * P ABL TDISP PRCEND EQU * P LDKL A4,/FDFF $ P ANS A4,DWTST,A6 RESET POWER OFF P ABL DISEN
0x225ae4…225c78 Dummy {f00=0x00ae, f01=0x0190, f02=»* CHECKS VALIDITY OF ORDERS AND EXAMINES , P* INPUT BUFFER TO SEE IF SOME QUEUED 4 P* TO THREAT. d P* | P* PACOD EQU * P LDK A1,0 P LDK A3,0 START BUFFER INDEX * P ST A3,DWTLRC,A6 CLEAR LRC-ACKUMULATOR P L
0x225c78…225e0c Dummy {f00=0x00ae, f01=0x0190, f02=» A4,/2D PCRE:10 EQU * P XIF $ P RF(Z) AOD110 ORDER 4 0 P RF(N) AOD200 ORDER 2 N * PAOD100 ORKL A1,/8000 I/O REQUEST ERROR l PAOD105 EQU * P ABL ENDI10 P EJECT P* P* $ P* ORDER 4 RESET INPUT BUFFER
0x225e0c…225fa0 Dummy {f00=0x00ae, f01=0x0190, f02=» P ABL ENDIO END I/O P EJECT P* , P* 6 P* @ P* J PAOD200 EQU * T P* h P IFT POWOFF=1 r P* P LD A2,DWTST,A6 P ANKL A2,/200 POWER OFF ? P RF(E) AOD205 P XRS A2,DWTST,A6 RESET BIT P XIF
0x225fa0…226134 (1, 542) Dummy {f00=0x00ae, f01=0x0190, f02=» CREDIT+POWOFF=2 P CM 10,A8 INDICATE POWER ON P XIF < P IFT POWOFF=1 H P ABL AOD380 ^ P* r P XIF | P* PAOD205 EQU * P* P IFT CTIMUT=1 P* P LDR* A1,A6 P ANK A1,/40 TIMING ? , P RF(E) A
0x226134…2262c8 Dummy {f00=0x00ae, f01=0x0190, f02=»P TIMER POINTER P ADR A4,A6 ADD DWT-ADDRESS P LDR A1,A6 : P CF A15,SETIMP SET TIME L 0 P DATA AODTUT,TIME TIME OUT ROUTINE AND TIME l . P ST A4,DWTTP,A6 STORE TIMER ADDRESS IN DWT P* P XIF P* P EJECT P*
0x2262c8…22645c Dummy {f00=0x00ae, f01=0x0190, f02=» P RF(NE) AOD240 N0! " P LD A1,ECBBA,A8 BUFFER ADDRESS P SUK A1,1 D P ADR A1,A2 V & PAOD230 SCR A3,A1 CLEAR ECB BUFFER h P SUK A1,1 P SUK A2,1 P RB(NE) AOD230 PAOD240 EQU * P LD A1,DWTUTQ,A6 P LCR A2,A1
0x22645c…2265f0 Dummy {f00=0x00ae, f01=0x0190, f02=»SET x P RF ENDIO END I/O . PAOD250 CW A1,DWTINQ,A6 SOMETHING IN QUEUE? & P RF(NE) AOD260 X " P CF A5,STREG NOTHING IN QUEUE p P IFT CTIMUT=1 * P LDR A1,A1 CHECK TIME OUT RETURN CODE P RF(Z) AOD270 NO TIME-OUT " P RF ENDI05 E
0x2265f0…226784 Dummy {f00=0x00ae, f01=0x018e, f02=» ST A1,DWTUTQ,A6 STORE NEW POINTER PAOD270 EQU * * P LDR A4,A7 > P SUK A4,2 P P RF(NN) AOD310 ORDER 2 b P RB AOD100 I/O REQUEST ERROR P EJECT P* P* P* P* ORDER 2 READ DOCUMENT P* P* P
0x226784…226918 Dummy {f00=0x00ae, f01=0x018e, f02=» P LDK A4,/40 $ P TM A4,A2 CHECK IF END CHARACTER P RF(Z) AOD330 NO D 2 P ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH IN ECB P NGR A3,A3 NEGATE REGISTER P RF AOD340 PAOD330 EQU * " P CWK A2,/3F REJECTED CHARACTER P RF(NE)
0x226918…226aac Dummy {f00=0x00ae, f01=0x0190, f02=» " P CWK A2,/21 DIRECTION REJECTED P RF(NE) AOD332 NO * ( P LDK A1,/10 INDICATE DIRECTION ERROR D P RF ENDIO p PAOD332 EQU * $ P CWK A2,/1C QUADRATURE REJECTED? P RF(NE) AOD333 NO , P LDKL A1,/800 INDICATE QUADRATURE ERROR P
0x226aac…226c40 Dummy {f00=0x00ae, f01=0x018e, f02=»ADDRESS v P RF(Z) AOD340 NO KEYTABLE " P LCR A4,A1 TABLE LENGTH IN A4 2 P ANK A4,/FF X & P ADR A1,A4 LAST PLACE IN KEY TABLE l P ADK A1,1 PAOD335 EQU * P SUK A4,1 P RF(N) AOD340 KEY NOT FOUND P SUK A1,1 NEXT KEY
0x226c40…226dd4 (1, 543) Dummy {f00=0x00ae, f01=0x0190, f02=» , P XRS A2,DWTLRC,A6 UPDATE LRC-ACKUMULATOR 2 P CF A15,CDCHK CODE CHECK IF LESS /1F SET BIT 7 4 P LDR A3,A3 j P RF(N) AOD345 | & P CF A15,STORE STORE IN ECB-BUFFER PAOD345 EQU * P RB AOD240 PAOD400 EQU * P ANK A2,/3F DELETE
0x226dd4…226f68 Dummy {f00=0x00ae, f01=0x0190, f02=»ERROR x P RF ENDIO PAOD360 EQU * P CF A15,CDCHK CODE CHECK 4 P LDK A1,8 LENGTH OVERFLOW T P RF ENDIO v PAOD380 LDK A1,0 RETURN CODE P EJECT P* P* , P* THIS IS A COMMON END OF THE DRIVER P* 2 P
0x226f68…2270fc Dummy {f00=0x00ae, f01=0x0190, f02=»WTTP,A6 * P RF(E) ENDI05 NO TIMING ON THIS DEVICE P CM* DWTTP,A6 RESET TIMER > P CM DWTTP,A6 ` P XIF t P* P*** P* PENDI05 EQU * P LDR A3,A3 P RF(N) ENDI10 * P ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH
0x2270fc…227290 Dummy {f00=0x00ae, f01=0x0190, f02=» F P* THIS IS THE INTERRUPT HANDLER ENTERED FROM CHLT/CHRT DRIVER ! P* ! R P* ! P* ! f PIHOD EQU * ! p P ANK A2,/FF ! P IFT POWOFF=1 ! P LD A4,DWTST,A6 I/O-REQUEST ! P ANK A4,1 RECOVERY? ! P RF(NZ) EXIT2 YES ! P X
0x227290…227424 Dummy {f00=0x00ae, f01=0x0190, f02=»ACTER IN DWT-BUFFER ! t P* " P IFT CTIMUT=1 " & P* " < P LD A3,DWTTP,A6 " F * P RF(E) IHOD05 NO TIMING ON THIS DEVICE " ^ P LDKL A3,-TIME RESTART TIME " P ST* A3,DWTTP,A6 " P* " P XIF " P* " PIHOD05 EQU * " & P ABL LDREG R
0x227424…2275b8 Dummy {f00=0x00ae, f01=0x018e, f02=» RF(E) EXIT YES " P LDR A3,A1 # 4 P CF A15,EOQUEU GET NEXT OUTQUEUE POINTER ADDRESS # * P CW A1,DWTUTQ,A6 OVERFLOW? # b P RF(NE) IHOD20 # 0 P ORK A2,/FF SET OVERFLOWBIT IN INPUT BUFFER # P RF IHOD30 # 0 PIHOD20 ST A1,DWTINQ,A6 STORE INQUEUE POI
0x2275b8…22774c Dummy {f00=0x00ae, f01=0x0190, f02=» P RF(N) EXIT4 $ " P LD A4,DWTTP,A6 TIMER CLEARED $ P RF(Z) EXIT3 YES $ > P LDKL A3,-100 $ V " P ST* A3,DWTTP,A6 RESTART TIMER $ l P LDK A3,1 $ PEXIT3 EQU * $ P ADK A3,1 $ P LDK A4,/40 $ P TM A4,A2 ETX CHARACTER $ P RF(Z) EXI
0x22774c…2278e0 Dummy {f00=0x00ae, f01=0x0190, f02=»CLEAR TIMER $ P LDK A3,0 % P ABL RCTUT5 % & P XIF % : P EJECT % F P* % T P* % ^ P* A O D T U T % h P* % & P* THIS IS THE TIME-OUT ROUTINE % P* % P* % P IFT CTIMUT=1 % P* % PAODTUT EQU * % P LDR A6,A1 G
0x2278e0…227a74 (1, 544) Dummy {f00=0x00af, f01=0x0190, f02=»TORE REGISTERS AND END I/O % P* & " P XIF & , P* & 8 P EJECT & B P* & P 4 P* STORE = SUBROUTINE TO STORE A CHARACTER IN & Z 6 P* ECB-BUFFER AND INCREMENT BUFFER INDEX & P* & P* ON ENTRY: & P* & P* A2 = CHARACTE
0x227a74…227c08 Dummy {f00=0x00af, f01=0x0190, f02=» ADD BUFFER INDEX & ( P SCR A2,A4 STORE CHARACTER IN BUFFER ' $ P ADK A3,1 INCREMENT BUFFER INDEX ' F P ANK A2,/7F ' n PSTORTN ADKL A15,2 ' P LDR* P,A15 ' P EJECT ' P* ' P* ' 6 P* EOQUEU = SUBROUTINE TO GET NEXT QUEUE POINTER '
0x227c08…227d9c Dummy {f00=0x00af, f01=0x0190, f02=» P* ( P* A1 = NEW QUEUE POINTER ( PEOQUEU EQU * ( 2 P ADK A1,1 ( F P SUR A1,A6 ( X P CWK A1,DWTEQ END OF QUEUE? ( j P RF(NE) EOQU10 ( * P LDK A1,DWTSQ SET QUEUE START ADDRESS ( PEOQU10 ADR A1,A6 ( P RB STORTN ( P EJECT (
0x227d9c…227f30 Dummy {f00=0x00af, f01=0x410a, f02=»* AT EXIT A2= 7-BIT ASCII CHARACTER ( PCDCHK EQU * ) 8 P LDR A4,A2 SAVE REGISTER ) L . P SUK A4,/1F LESS THEN /1F CONVERT TO ASCII ) l P RF(NN) CDC05 NO ) P ORK A2,/40 SET BIT 7 ) PCDC05 EQU * ) P RB STORTN ) P END ) @ )
0x227f30…2280c4 Dummy {f00=0x00af, f01=0x2008, f02=» * WTCON,A6 GET CONVERSION TABLE ADDRESS ADR A4,A1 6 ADR A4,A2 H ( # LCR A2,A4 GET CHARACTER FROM TABLE Z RTN A15 END @ A4,2 RF(Z) KON180 CTRL RF(N) KON190 SHIFT LDR A1,8 CTRL AND SHIFT
0x2280c4…228258 Dummy {f00=0x00af, f01=0x0190, f02=» RF(Z) ILLORD NO NO * P CF A5,CCRC RECOVER RECORDER + & P OR A1,DWTSAV,A6 PUT IN WP,B-SIDE + @ P RF ENDIO7 + j P EJECT + | P + P* + P* READ MATS /3D + P* + P + ( PRDMA LD A2,DWTSQC,A6 GET SEQ COUNTER + " P RF(NZ) RDMA10 NOT FIR
0x228258…2283ec Dummy {f00=0x00af, f01=0x0190, f02=»NT + x P ABL ENDIO4 ILL STATUS , PRDMA07 EQU * , ( P ANKL A1,/0400 , < P RF(NZ) RDMA10 BOT FOUND , R P SUK A2,1 BOT NOT FOUND , r P RF(NN) RDMA08 OK , P IM DWTMBM,A6 INC STAT CNT , P ABL ENDIOB NO MORE RETRIES , PRDMA08 EQU * , P C
0x2283ec…228580 Dummy {f00=0x00af, f01=0x0190, f02=»STAT CNTR(S) , | P RF(NZ) RDMA11 - P IM DWTMOK,A6 - * PRDMA11 EQU * - @ P ABL READ20 STATUS, DATA OK - T PRDMA12 RF(6) RDMA14 - x P IM DWTMDE,A6 INC STAT CNT - P ABL ENDIO1 ILL DATA - $ PRDMA14 IM DWTMIL,A6 INC STAT CNT - P ABL ENDIO4 IL
0x228580…228714 (1, 545) Opaque[0x194]
0x228714…2288a8 # DirEnt {nam=»DVTOD «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x15e8, f03=0x2020}
0x228714…2288a8 IdxSect {
0x228714…2288a8 f00 = 0x00af // 0x228714 @0x0
0x228714…2288a8 f01 = 0x0002 // 0x228716 @0x2
0x228714…2288a8 gno = [ // 0x228718 @0x4
0x228714…2288a8 [0x00]: C0x00af.0x1.0
0x228714…2288a8 ]
0x228714…2288a8 }
0x2288a8…228a3c Dummy {f00=0x00af, f01=0x0190, f02=» 0 P IDENT DVTOD REL 8.2 78-09-15 870105040820 P* 8 0 P* OPTICAL DOCUMENT READER DEVICE WORK TABLE B P* v P ENTRY DVTOD TABLE ENTRY P*** ( P EXTRN ODAD POINTER TO ADDRESSBLOCK P***** P* P* PDVTOD EQU * TA
0x228a3c…228bd0 Dummy {f00=0x00af, f01=0x0190, f02=»TPUT, ORDER AND ECB-ADDRESS t ( P DATA ODAD POINTER TO ADDRESS BLOCK $ P DATA 'OD' TTAB-ADDRESS P $ P DATA 0 WAIT/INDICATE INDICATOR p P DATA 0 TERMINAL QUEUE * P DATA 0 CODE CONVERSION TABLE POINTER P DATA 0 SAVE AREA FOR A3 P DAT
0x228bd0…228d64 Dummy {f00=0x00af, f01=0x40fc, f02=» P DATA 0 P DATA 0 LRC-ACKUMULATOR 6 P DATA DWTSQ+DVTOD POINTER TO FIRST PLACE IN QUEUE 4 4 P DATA DWTSQ+DVTOD POINTER TO LAST PLACE IN QUEUE n PDWTSQ EQU *-DVTOD P RES 0 PDWTEND EQU * P* P END @ P DAT
0x228d64…228ef8 Dummy {f00=0x00af, f01=0x2008, f02=» BLE ZERO 6 P DATA DWTSQ+DVTKB POINTER TO FIRST PLACE IN QUEUE 4 P DATA DWTSQ+DVTKB POINTER TO LAST PLACE IN QUEUE R PDWTSQ EQU *-DVTKB P RES 0 P* P END @ 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P R
0x228ef8…22908c Dummy {f00=0x00af, f01=0x0190, f02=» ADK A7,1 P RF(3) CASSPE PARG2PS SRC A7,1 > P RF(6) NOVER1 P ADR A1,A6 | PNOVER1 SRA A2,1 P SRC A1,1 P RF(6) NOVER2 P ORK.L
0x22908c…229220 Dummy {f00=0x00af, f01=0x0190, f02=» *END* RESTORE SI=N z P RF(0) END1 " P C1R A1,A1 @ P C1R A2,A2 ` P ADK A2,1 D P*CAUTION THE NEXT INSTRUCTION IS ABSOLUTELY NECESSARY TO SET CR < P* WHEN THE ADK A2,1 SET AN OVERFLO
0x229220…2293b4 (1, 546) Opaque[0x194]
0x2293b4…229548 # DirEnt {nam=»EBCDIC«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x15f0, f03=0x2020}
0x2293b4…229548 IdxSect {
0x2293b4…229548 f00 = 0x00af // 0x2293b4 @0x0
0x2293b4…229548 f01 = 0x0004 // 0x2293b6 @0x2
0x2293b4…229548 gno = [ // 0x2293b8 @0x4
0x2293b4…229548 [0x00]: C0x00af.0x2.0
0x2293b4…229548 [0x01]: C0x00af.0x3.0
0x2293b4…229548 ]
0x2293b4…229548 }
0x229548…2296dc Dummy {f00=0x00af, f01=0x0190, f02=» 2 P IDENT EBCDIC REL 8.2 78-09-15 870105040820 P : P* B 4 P************************************************ L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* EBCDIC = EBCDIC/ASCII TABLE P* P* P* P*
0x2296dc…229870 Dummy {f00=0x00af, f01=0x0190, f02=» P* P* . P* CONDITIONAL ASSEMBLY (SEE ALSO DRDC15) P* J 2 PX:A EQU 1 CODE , 0=ASCII , 1=EBCDIC (DRDC15) T PCODE EQU X:A 4 PX:B EQU 1 READ COMMAND HANDLING IF = 1 (DRDC15) PRCOM EQU X:B P EJECT P* P*
0x229870…229a04 Dummy {f00=0x00af, f01=0x0190, f02=»/0009,/0000 00-07 ~ ( P DATA /0000,/0000,/0C00,/0000 08-0F ( P DATA /1011,/1213,/000A,/0000 10-17 F ( P DATA /0019,/0000,/1C1D,/1E1F 18-1F r ( P DATA /0000,/0000,/0000,/171B 20-27 ( P DATA /0000,/0000,/0005,/0000 28-2F ( P DATA /0000,/1600,
0x229a04…229b98 Dummy {f00=0x00af, f01=0x0190, f02=»8,/2B21 48-4F z ( P DATA /264A,/4B4C,/4D4E,/4F50 50-57 ( P DATA /5152,/5D24,/2A29,/3B5E 58-5F B ( P DATA /2D2F,/5354,/5556,/5758 60-67 n ( P DATA /595A,/7C2C,/255F,/3E3F 68-6F ( P DATA /1831,/3233,/3435,/3637 70-77 ( P DATA /3839,/3A23,/402
0x229b98…229d2c Dummy {f00=0x00af, f01=0x0190, f02=»F70 90-97 v ( P DATA /7172,/5D24,/2A29,/3B5E 98-9F ( P DATA /2D2F,/7374,/7576,/7778 A0-A7 > ( P DATA /797A,/7C2C,/255F,/3E3F A8-AF j ( P DATA /3031,/3233,/3435,/3637 B0-B7 ( P DATA /3839,/3A23,/4027,/3D22 B8-BF ( P DATA /2041,/4243,/4445,/4
0x229d2c…229ec0 Dummy {f00=0x00af, f01=0x0190, f02=»D8-DF r ( P DATA /2D2F,/5354,/5556,/5758 E0-E7 ( P DATA /595A,/7C2C,/255F,/3E3F E8-EF : ( P DATA /3031,/3233,/3435,/3637 F0-F7 f ( P DATA /3839,/3A23,/4027,/3DFF F8-FF P XIF P EJECT P* P* 2 P* TABLE FOR CONVERSION OF AS
0x229ec0…22a054 (1, 547) Dummy {f00=0x00af, f01=0x0190, f02=» DATA /0005,/1500,/0C00,/0000 08-0F ( P DATA /1011,/1213,/3C3D,/3226 10-17 , ( P DATA /7019,/3F27,/1C1D,/1E1F 18-1F X ( P DATA /404F,/7F7B,/5B6C,/507D 20-27 ( P DATA /4D5D,/5C4E,/6B60,/4B61 28-2F ( P DATA /F0F1,/F2F3,/F4F5,/F6F7 30-37 ( P
0x22a054…22a1e8 Dummy {f00=0x00af, f01=0x4158, f02=»A /D7D8,/D9E2,/E3E4,/E5E6 50-57 ( P DATA /E7E8,/E94A,/005A,/5F6D 58-5F ( ( P DATA /0081,/8283,/8485,/8687 60-67 T ( P DATA /8889,/9192,/9394,/9596 68-6F ( P DATA /9798,/99A2,/A3A4,/A5A6 70-77 ( P DATA /A7A8,/A91C,/6A00,/00E0 78-7F 4 P DAT
0x22a1e8…22a37c Dummy {f00=0x00af, f01=0x2008, f02=» NT EBCASC TESTVERSION 1 END (@ 4
0x22a37c…22a510 Dummy {f00=0x00af, f01=0x0190, f02=» INC LRPINT,TOSSWORK KPF /O MOV TPROC,/S,TOSSWORK . KPF /S,TPROC L SCR ` INC TPROC,TOSSWORK l KPF /O MOV MSUBS,/S,TOSSWORK KPF /S,MSUBS SCR INC MSUBS,TOSSWORK KPF /O MOV TTMJOB
0x22a510…22a6a4 Dummy {f00=0x00af, f01=0x0190, f02=»RET SCR INC INPRET,TOSSWORK KPF /O 4 MOV PFTAB,/S,TOSSWORK B KPF /S,PFTAB ` SCR t INC PFTAB,TOSSWORK KPF /O MOV LKMAL,/S,TOSSWORK KPF /S,LKMAL SCR INC LKMAL,TOSSWORK KPF
0x22a6a4…22a838 Dummy {f00=0x00af, f01=0x0190, f02=» z KPF /S,DVTTP SCR INC DVTTP,TOSSWORK ( KPF /O D MOV DVTGP,/S,TOSSWORK R KPF /S,DVTGP p SCR INC DVTGP,TOSSWORK KPF /O MOV DVTDN,/S,TOSSWORK KPF /S,DVTDN SCR INC DVTDN,TOSSW
0x22a838…22a9cc Dummy {f00=0x00af, f01=0x0190, f02=»VTDY,/S,TOSSWORK KPF /S,DVTDY SCR , INC DVTDY,TOSSWORK 8 KPF /O T MOV DVTCG,/S,TOSSWORK b KPF /S,DVTCG SCR INC DVTCG,TOSSWORK KPF /O MOV DVTCD,/S,TOSSWORK KPF /S,DVTCD SCR
0x22a9cc…22ab60 Dummy {f00=0x00af, f01=0x0190, f02=»/O MOV DVTOD,/S,TOSSWORK KPF /S,DVTOD ( SCR < INC DVTOD,TOSSWORK H KPF /O d MOV DVTT1,/S,TOSSWORK r KPF /S,DVTT1 SCR INC DVTT1,TOSSWORK KPF /O MOV DWII01,/S,TOSSWORK KPF /S,DWII01
0x22ab60…22acf4 (1, 548) Opaque[0x194]
0x22acf4…22ae88 # DirEnt {nam=»DMBUF «, typ=»SC«, f00=0x4c20, f01=0x3d20, f02=0x1600, f03=0x4431}
0x22acf4…22ae88 IdxSect {
0x22acf4…22ae88 f00 = 0x00b0 // 0x22acf4 @0x0
0x22acf4…22ae88 f01 = 0x0008 // 0x22acf6 @0x2
0x22acf4…22ae88 gno = [ // 0x22acf8 @0x4
0x22acf4…22ae88 [0x00]: C0x00b0.0x0.0
0x22acf4…22ae88 [0x01]: C0x00b0.0x1.0
0x22acf4…22ae88 [0x02]: C0x00b0.0x2.0
0x22acf4…22ae88 [0x03]: C0x00b0.0x3.0
0x22acf4…22ae88 ]
0x22acf4…22ae88 }
0x22ae88…22b01c Dummy {f00=0x00b0, f01=0x0190, f02=» 0 P IDENT DMBUF REL 8.2 78-09-15 870105040820 P 8 P* @ 8 P**************************************************** J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* . P* DMBUF = DATA MANAGEMENT BUFFER AREAS P* P* P
0x22b01c…22b1b0 Dummy {f00=0x00b0, f01=0x018e, f02=»FOR DMTASK v P* . P* A ROUTINE DMTGBU TO GET A DISC BUFFER P* N L P* BY MEANS OF CONDITIONAL ASSEMBLY QNBUF NUMBER OF BUFFERS WILL BE ALL X P* P* MAX VALUE OF QNBUF IS 16 P* > P* AT LEAST TWO BUFFERS PER DISC DRIVE
0x22b1b0…22b344 Dummy {f00=0x00b0, f01=0x018e, f02=» ( P ENTRY CURBUF CURRENT BUFFER POINTER P ENTRY BUFLNK BUFFER LINK 4 P ENTRY BUFDMI DMTASK IDENT V P ENTRY BUFFC FILE CODE x P ENTRY BUFSNR SECTOR NO P ENTRY BUFOR ORDER * P ENTRY BUFSTA DATA AREA START ADDRESS P ENTRY DMT
0x22b344…22b4d8 Dummy {f00=0x00b0, f01=0x0190, f02=» P EJECT $ PX:A EQU 8 NUMBER OF DISC BUFFERS PQNBUF EQU X:A : P* P P* Z PCURBUF DATA BUF1 d PNEWBUF DATA 0 | P* P* PBUFLNK EQU 0 2 PBUF1 DATA BUF2 BUFFER LINK STATUS IN BIT 15 PBUFDMI EQU *-BUF1 DMI
0x22b4d8…22b66c Dummy {f00=0x00b0, f01=0x0190, f02=»RU-WORD ~ " P DATA 0 BUFFER STATUS,DM ORDER ( PBUFSTA EQU *-BUF1 DATA BUFFER START 6 P RES 205 b P* r P* | P IFT QNBUF=1 PBUF2 EQU BUF1 P XIF P* P* P IFF QNBUF=1 PBUF2 DATA BUF3 P DATA 0,0,0
0x22b66c…22b800 Dummy {f00=0x00b0, f01=0x0190, f02=»UF=1 P IFF QNBUF=2 PBUF3 DATA BUF4 P DATA 0,0,0 6 P RES 205 J P XIF Z P* f P* p P IFT QNBUF=3 z PBUF4 EQU BUF1 P XIF P* P* P IFF QNBUF=1 P IFF QNBUF=2 P IFF QNBUF=3 PBUF4 DAT
0x22b800…22b994 (1, 549) Dummy {f00=0x00b0, f01=0x018e, f02=»* P* P IFF QNBUF=1 P IFF QNBUF=2 ( P IFF QNBUF=3 < P IFF QNBUF=4 P PBUF5 DATA BUF6 d P DATA 0,0,0 z P RES 205 P XIF P* P* P IFT QNBUF=5 PBUF6 EQU BUF1 P XIF P* P* P
0x22b994…22bb28 Dummy {f00=0x00b0, f01=0x0190, f02=» P RES 205 P XIF P* $ P* . P IFT QNBUF=6 8 PBUF7 EQU BUF1 L P XIF b P* n P* x P IFF QNBUF=1 P IFF QNBUF=2 P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5 P IFF QNBUF=6 PBUF7 DATA BUF8
0x22bb28…22bcbc Dummy {f00=0x00b0, f01=0x0190, f02=» P* P IFF QNBUF=1 P IFF QNBUF=2 " P IFF QNBUF=3 6 P IFF QNBUF=4 J P IFF QNBUF=5 ^ P IFF QNBUF=6 r P IFF QNBUF=7 PBUF8 DATA BUF9 P DATA 0,0,0 P RES 205 P XIF P* P* P IFT QNBUF=8 P
0x22bcbc…22be50 Dummy {f00=0x00b0, f01=0x0190, f02=»FF QNBUF=5 P IFF QNBUF=6 P IFF QNBUF=7 & P IFF QNBUF=8 : PBUF9 DATA BUF10 N P DATA 0,0,0 f P RES 205 z P XIF P* P* P IFT QNBUF=9 PBUF10 EQU BUF1 P XIF P* P* P IFF QNBUF=1 P
0x22be50…22bfe4 Dummy {f00=0x00b0, f01=0x0190, f02=» P IFF QNBUF=9 PBUF10 DATA BUF11 P DATA 0,0,0 0 P RES 205 D P XIF T P IFT QNBUF=10 ` PBUF11 EQU BUF1 v P XIF P* P* P IFF QNBUF=1 P IFF QNBUF=2 P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5
0x22bfe4…22c178 Dummy {f00=0x00b0, f01=0x018e, f02=»ATA 0,0,0 P RES 205 P XIF " P IFT QNBUF=11 . PBUF12 EQU BUF1 D P XIF Z P* f P* p P IFF QNBUF=1 z P IFF QNBUF=2 P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5 P IFF QNBUF=6 P IFF QNBUF=7 P I
0x22c178…22c30c Dummy {f00=0x00b0, f01=0x018e, f02=» P XIF P IFT QNBUF=12 PBUF13 EQU BUF1 * P XIF @ P* L P* V P IFF QNBUF=1 ` P IFF QNBUF=2 t P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5 P IFF QNBUF=6 P IFF QNBUF=7 P IFF QNBUF=8 P IFF QNB
0x22c30c…22c4a0 Dummy {f00=0x00b0, f01=0x0190, f02=» P XIF P IFT QNBUF=13 PBUF14 EQU BUF1 & P XIF < P* H P* R P IFF QNBUF=1 P IFF QNBUF=2 p P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5 P IFF QNBUF=6 P IFF QNBUF=7 P IFF QNBUF=8 P IFF QNBUF=9
0x22c4a0…22c634 (1, 550) Dummy {f00=0x00b0, f01=0x0190, f02=» P RES 205 P XIF P IFT QNBUF=14 PBUF15 EQU BUF1 6 P XIF L P* X P* b P IFF QNBUF=1 l P IFF QNBUF=2 P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5 P IFF QNBUF=6 P IFF QNBUF=7 P IFF QNBUF=8
0x22c634…22c7c8 Dummy {f00=0x00b0, f01=0x0190, f02=»F15 DATA BUF16 P DATA 0,0,0 P RES 205 * P XIF : P IFT QNBUF=15 F PBUF16 EQU BUF1 P XIF r P* ~ P* P IFF QNBUF=1 P IFF QNBUF=2 P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5 P IFF QNBUF=6
0x22c7c8…22c95c Dummy {f00=0x00b0, f01=0x0190, f02=»UF=13 P IFF QNBUF=14 P IFF QNBUF=15 $ PBUF16 DATA BUF1 : P DATA 0,0,0 R P RES 205 f P XIF v P EJECT P* P************** P* DMTGBU * P************** P* * P* ENTRY DMTGBU GET A DISC BU
0x22c95c…22caf0 Dummy {f00=0x00b0, f01=0x0190, f02=» P* $ P* OUTPUT A3 = BUFFER ADDRESS J P* SKIP RETURN (+2) IF SECTOR MUST BE READ INTO BUFFER AT A3 6 , P* A5 AND A7 WILL BE DESTROYED P* 8 P* CURBUF, BUFDMI, -FC AND -SNR WILL BE SET < P* ST
0x22caf0…22cc84 Dummy {f00=0x00b0, f01=0x0190, f02=»ARCHED FOR IS ALREADY PRESENT IN ANY FREE BUFFER. F P* IF THIS SECTOR IS NOT FOUND A FREE SECTOR MUS BE FOUND AND IN : P* P* P* PDMTGBU EQU * P INH INH P* 4 P* CHECK IF THIS SECTOR IS FOUND IN ANY BUFFER
0x22cc84…22ce18 Dummy {f00=0x00b0, f01=0x0190, f02=»20 WRONG VOLUME P CW A2,BUFSNR,A3 P RF(E) DMT050 SAME SECTOR NO 0 PDMT020 EQU * T P LDK A7,/01 h & P AN A7,BUFLNK,A3 STATUS IN BIT 15 | P RF(NZ) DMT041 USED P IM BUFOR,A3 MAKE OLDER P RF(P) DMT030 P LDK A7,/FF
0x22ce18…22cfac Dummy {f00=0x00b0, f01=0x018e, f02=»EWBUF PDMT041 EQU * P CW A3,CURBUF " * P RB(NE) DMT010 MORE BUFFERS TO SERARCH 8 P LDR A5,A5 f P RF(NZ) DMT043 BUFFER FOUND x P LDK A1,3 LAMP 10 AND 11 P CF A15,HALT NO MORE BUFFERS PDMT043 LD A3,NEWBUF P* * P*
0x22cfac…22d140 Dummy {f00=0x00b0, f01=0x0190, f02=» " P ST A2,BUFSNR,A3 SECTOR NUMBER PDMT050 EQU * * " P CM BUFOR,A3 RESET OLD-COUNTER > P ST A3,CURBUF d P LDK A7,/01 z ( P ORRS A7,A3 SET STATUS USED BIT 15 P ENB ENB P RTN A14 P EJECT P* P**************
0x22d140…22d2d4 (1, 551) Dummy {f00=0x00b0, f01=0x0190, f02=»FER ADDRESS | P* A2 IS DESTROYED P* 8 P* B PDMTRBU EQU * L P LDKL A2,/FFFE ` P ANRS A2,A3 SET OFF BIT 15 v P RTN A14 P* P* ( PCLRBUF EQU * CLEAR ALL FREE BUFFERS @ P********************************
0x22d2d4…22d468 Dummy {f00=0x00b0, f01=0x40b0, f02=» AN A2,BUFLNK,A3 P RF(NZ) DMT750 USED P CM BUFDMI,A3 REMOVE 4 PDMT750 CW A3,CURBUF P P RB(NE) DMT700 MORE BUFFERS l P RTN A14 P END @ P* ( PCLRBUF EQU * CLEAR ALL FREE BUFFERS @ P********************************
0x22d468…22d5fc Dummy {f00=0x00b0, f01=0x2008, f02=» P* DMTRBU * P************** " P* 8 . P* ENTRY DMTRBU RELEASE A DISC BUFFER B P* t $ P* INPUT A3 = BUFFER ADDRESS ~ P* A2 IS DESTROYED P* P* PDMTRBU EQU * P LDKL A2,/FFFE P
0x22d5fc…22d790 Dummy {f00=0x00b0, f01=0x0190, f02=»0 DWT STATUS X P DATA 0 ECB-ADDRESS Y P DATA 0 ORDER Y 0 " P DATA FDADR ACTIVATION ADDRESS Y F P DATA 0 TTAB-ADDRESS Y l $ P DATA 0 WAIT/ACTIVATE INDICATOR Y P DATA 0 TERMINAL QUEUE Y P DATA 0 Y P DATA 0 SAVE AREA Y P DATA 0 Y P
0x22d790…22d924 Dummy {f00=0x00b0, f01=0x018e, f02=»T FLAG Y p P DATA 0 Z $ PDWTTP EQU *-DWFD01 TIMER POINTER Z P DATA 0 Z F ( PDWTRCW EQU *-DWFD01 TEMP RETURN CODE Z V P DATA 0 Z , PDWTLAB EQU *-DWFD01 DISC LABEL INDICATOR Z P DATA 0 Z , PDWTLC EQU *-DWFD01 DRIVE LOCK INDICATOR Z P DATA
0x22d924…22dab8 Dummy {f00=0x00b0, f01=0x0190, f02=» ( PDWTVO2 EQU *-DWFD01 VOLUME NAME NO 2 [ P DATA 0,0,0 [ 0 ( PDWTVO3 EQU *-DWFD01 VOLUME NAME NO 3 [ D P DATA 0,0,0 [ p P IFT CHAN=1 [ 6 PDWTUB EQU *-DWFD01 POINTER AT NEXT WORD IN BUFFER [ P DATA 0 [ , PDWTUBE EQU *-DWFD01 BUFFER END ADDRESS
0x22dab8…22dc4c Dummy {f00=0x00b0, f01=0x415c, f02=»D01 BEGINNING OF EXTENT [ P DATA 0,0,0,0 $ PDWTEOD EQU *-DWFD01 END OF DATA 6 P DATA 0,0,0,0 ^ & PDWTEOE EQU *-DWFD01 END OF EXTENT t P DATA 0,0,0,0 * PDWTCRN EQU *-DWFD01 CURRENT RECORD NO P DATA 0,0,0,0 . PDWTDSS EQU *-DWF
0x22dc4c…22dde0 Dummy {f00=0x00b0, f01=0x2008, f02=» ] END @
0x22dde0…22df74 (1, 552) Opaque[0x194]
0x22df74…22e108 # DirEnt {nam=»ADDMOD«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1620, f03=0x4441}
0x22df74…22e108 IdxSect {
0x22df74…22e108 f00 = 0x00b1 // 0x22df74 @0x0
0x22df74…22e108 f01 = 0x0004 // 0x22df76 @0x2
0x22df74…22e108 gno = [ // 0x22df78 @0x4
0x22df74…22e108 [0x00]: C0x00b1.0x0.0
0x22df74…22e108 [0x01]: C0x00b1.0x1.0
0x22df74…22e108 ]
0x22df74…22e108 }
0x22e108…22e29c Dummy {f00=0x00b1, f01=0x0190, f02=» 2 P IDENT ADDMOD REL 8.2 78-09-15 870105040820 P* LREK 78-02-20 : P* T 8 P**************************************************** ^ P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P* P*
0x22e29c…22e430 Dummy {f00=0x00b1, f01=0x0190, f02=»THIS ROUTINE EXECUTES THE DOUBLE ADDITION INSTRUCTION ON THE ALPHA P* COMPUTER J P*CALLING SEQUENCE: $ P* A1-A2 = ARG1 v $ P* AG-A7 = ARG2 P* CF A14,ADDMOD & P*RETURN : RESULT IN A1
0x22e430…22e5c4 Dummy {f00=0x00b1, f01=0x0190, f02=» ANK.L A7,/7FFF P ANK.L A2,/7FFF P ADR A2,A7 > P RF(3) OVER1 ^ 0 PNOVER ADR A1,A6 * NO OVERFLOW ~ P RF(1) END1 P RF(2) END2 P RF(3) END3
0x22e5c4…22e758 Dummy {f00=0x00b1, f01=0x0190, f02=» ADK A1,1 P RF(3) OVER3 P RB(7) NOVER 6 POVER3 ADR A1,A6 V P RF(2) END3 v P ADK A1,0 P RF(1) END1 P RB(7) NOVER1 PEND3 ADK A3,/8
0x22e758…22e8ec Dummy {f00=0x00b1, f01=0x40ee, f02=»**** V P ANK.L A3,/0300 P LDK.L A4,/FCFF . P AN.S A4,2,A14 P B P OR.S A3,2,A14 UPDATE CR IN PSW CALLING PROGRAM r P RTN A14 P END @ PEND3 ADK A3,/8
0x22e8ec…22ea80 Dummy {f00=0x00b1, f01=0x2008, f02=» ANK.L A3,/0300 P LDK.L A4,/FCFF * P AN.S A4,2,A14 L B P OR.S A3,2,A14 UPDATE CR IN PSW CALLING PROGRAM n P RTN A14 P END @ D1 P RB(7) NO
0x22ea80…22ec14 (1, 553) Dummy {f00=0x00b1, f01=0x0190, f02=» LABEL = RL 8.1:1 DATE = 78-03-03 PACK NBR = 001 f 4 &: 4: V - P Y _( Y M : ] =IR E
0x22ec14…22eda8 Dummy {f00=0x00b1, f01=0x0002, f02=»
0x22eda8…22ef3c Dummy {f00=0x00b1, f01=0x0190, f02=» 0 P IDENT DFTAB REL 8.1 78-04-21 870105040810 P UPDATE #0 76.10.07 8 P* V 8 P**************************************************** ` P* $ P* PHILIPS TERMINAL SYSTEM PTS P* & P* DFTAB = DISC FILE CODE TABLE P*
0x22ef3c…22f0d0 Dummy {f00=0x00b1, f01=0x40fe, f02=»************************ t P* P* DISC FILE CODE TABLE * P* J P ENTRY DFTAB T P ENTRY DFTABE h P* ~ P* PDFTAB EQU * P DATA /F0F1,/F2F3 P DATA /F8F9,/FAFB PDFTABE EQU * P END @ P*
0x22f0d0…22f264 Dummy {f00=0x00b1, f01=0x2008, f02=» NT DFTAB P* P* DISC FILE CODE TABLE " P* B P ENTRY DFTAB L P ENTRY DFTABE ` P* v P* PDFTAB EQU * P DATA /F0F1 PDFTABE EQU * P END @ END P ENTRY QFDBFL P* P*
0x22f264…22f3f8 Dummy {f00=0x00b1, f01=0x2008, f02=» TMJOB TERMINAL STATUS P DATA 48 * 0 PTTABID EQU *-TTMJOB TERMINAL IDENTIFICATION : P DATA /8000 n PTTABPP EQU *-TTMJOB P DATA 0 * PTTABSA EQU *-TTMJOB TERMINAL SAVE AREA P DATA 0 & P DATA 0,0,0,0,0,0,0,0,0,0,0,
0x22f3f8…22f58c Dummy {f00=0x00b1, f01=0x0190, f02=» " P* MOVE CHARACTER BY CHARACTER " P***************************** . P* T PMVC EQU * ^ P LDK A3,0 LOAD HEX ZERO p PMVC020 EQU * P LDR* A5,A5 GET PACKING FORM P RF(N) MVC050 JUMP IF ASCII P LDK A3,/FF LOAD BLANKS
0x22f58c…22f720 Dummy {f00=0x00b1, f01=0x0190, f02=» A1,A7 GET BYTE FROM OP2 & PMVC100 SCR A1,A6 STORE BYTE IN OP1 $ P SUK A7,1 DECREMENT POINTER OP2 J $ P SUK A6,1 DECREMENT POINTER OP1 r P ADK A4,1 STEP UP INDEX & P RB(N) MVC050 JUMP IF NOT FINISHED PRETUR RB RETMMM P EJECT
0x22f720…22f8b4 (1, 554) Opaque[0x194]
0x22f8b4…22fa48 # DirEnt {nam=»MPYMOD«, typ=»SC«, f00=0x3039, f01=0x3131, f02=0x1630, f03=0x2020}
0x22f8b4…22fa48 IdxSect {
0x22f8b4…22fa48 f00 = 0x00b1 // 0x22f8b4 @0x0
0x22f8b4…22fa48 f01 = 0x0004 // 0x22f8b6 @0x2
0x22f8b4…22fa48 gno = [ // 0x22f8b8 @0x4
0x22f8b4…22fa48 [0x00]: C0x00b1.0x2.0
0x22f8b4…22fa48 [0x01]: C0x00b1.0x3.0
0x22f8b4…22fa48 ]
0x22f8b4…22fa48 }
0x22fa48…22fbdc Dummy {f00=0x00b1, f01=0x0190, f02=» 2 P IDENT MPYMOD REL 8.2 78-09-15 870105040820 P* LREK 78-02-20 : P* T 8 P**************************************************** ^ P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P* P*
0x22fbdc…22fd70 Dummy {f00=0x00b1, f01=0x0190, f02=»THIS ROUTINE EXECUTES THE MULTIPLY INSTRUCTION ON THE ALPLA COMPUTER P* CALLING SEQUENCE: L ( P* LD A6,ARG1 h ( P* LD A7,ARG1 P* CF A14,MPYMOD ( P* RETURN : RESULT IN A1,A2
0x22fd70…22ff04 Dummy {f00=0x00b1, f01=0x0190, f02=» RETURN IN ERROR EXIT d P CWR A3,A6 P RF(4) SUITE > P CWR A3,A7 ^ P RF(0) END3 ~ < P LDR A6,A7 * A6= X'8000' A7# X'8000' 4 P LDR A7,A3 * EXCHANGE A6
0x22ff04…230098 Dummy {f00=0x00b1, f01=0x0190, f02=» A4,15 P ADK A6,0 P RF(0) END0 0 P RF(6) ARG1PS N 0 P ADK A3,1 *ARG1 NEGATIVE n P C1R A6,A6 P ADK A6,1 PARG1PS ADK A7,0 P R
0x230098…23022c Dummy {f00=0x00b1, f01=0x0190, f02=» ADK A7,1 P RF(3) CASSPE PARG2PS SRC A7,1 > P RF(6) NOVER1 P ADR A1,A6 | PNOVER1 SRA A2,1 P SRC A1,1 P RF(6) NOVER2 P ORK.L
0x23022c…2303c0 Dummy {f00=0x00b1, f01=0x0190, f02=» *END* RESTORE SI=N z P RF(0) END1 " P C1R A1,A1 @ P C1R A2,A2 ` P ADK A2,1 D P*CAUTION THE NEXT INSTRUCTION IS ABSOLUTELY NECESSARY TO SET CR < P* WHEN THE ADK A2,1 SET AN OVERFLO
0x2303c0…230554 (1, 555) Dummy {f00=0x00b1, f01=0x0190, f02=» A2,/7FFF P RF(7) END2 PEND3 ADK A3,/81 2 PEND2 ADK A3,/81 R PEND1 ADK A3,/81 r PEND0 SLL A3,1 P ANK.L A3,/0300 P LDK.L A4,/FCFF P AN.S A4
0x230554…2306e8 Dummy {f00=0x00b1, f01=0x4092, f02=»6 *A7=X'8000' THEN A4= 1 z . P* *AND A1= A6 ( P RB(7) NOVER3 Z P END z@ END0 SLL A3,1 P ANK.L A3,/0300 P LDK.L A4,/FCFF P AN.S A4
0x2306e8…23087c Dummy {f00=0x00b1, f01=0x2008, f02=» 4 : PCASSPE LDR A1,A6 *A7=X'8000' THEN A4= 1 . P* *AND A1= A6 P P RB(7) NOVER3 P END @
0x23087c…230a10 Dummy {f00=0x00b1, f01=0x0190, f02=»FF QNBUF=5 P IFF QNBUF=6 P IFF QNBUF=7 & P IFF QNBUF=8 : PBUF9 DATA BUF10 N P DATA 0,0,0 f P RES 205 z P XIF P* P* P IFT QNBUF=9 PBUF10 EQU BUF1 P XIF P* P* P IFF QNBUF=1 P
0x230a10…230ba4 Dummy {f00=0x00b1, f01=0x0190, f02=» P IFF QNBUF=9 PBUF10 DATA BUF11 P DATA 0,0,0 0 P RES 205 D P XIF T P IFT QNBUF=10 ` PBUF11 EQU BUF1 v P XIF P* P* P IFF QNBUF=1 P IFF QNBUF=2 P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5
0x230ba4…230d38 Dummy {f00=0x00b1, f01=0x018e, f02=»ATA 0,0,0 P RES 205 P XIF " P IFT QNBUF=11 . PBUF12 EQU BUF1 D P XIF Z P* f P* p P IFF QNBUF=1 z P IFF QNBUF=2 P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5 P IFF QNBUF=6 P IFF QNBUF=7 P I
0x230d38…230ecc Dummy {f00=0x00b1, f01=0x018e, f02=» P XIF P IFT QNBUF=12 PBUF13 EQU BUF1 * P XIF @ P* L P* V P IFF QNBUF=1 ` P IFF QNBUF=2 t P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5 P IFF QNBUF=6 P IFF QNBUF=7 P IFF QNBUF=8 P IFF QNB
0x230ecc…231060 Dummy {f00=0x00b1, f01=0x0190, f02=» P XIF P IFT QNBUF=13 PBUF14 EQU BUF1 & P XIF < P* H P* R P IFF QNBUF=1 P IFF QNBUF=2 p P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5 P IFF QNBUF=6 P IFF QNBUF=7 P IFF QNBUF=8 P IFF QNBUF=9
0x231060…2311f4 (1, 556) Opaque[0x194]
0x2311f4…231388 # DirEnt {nam=»DIVMOD«, typ=»SC«, f00=0x434b, f01=0x204e, f02=0x1640, f03=0x203d}
0x2311f4…231388 IdxSect {
0x2311f4…231388 f00 = 0x00b2 // 0x2311f4 @0x0
0x2311f4…231388 f01 = 0x0004 // 0x2311f6 @0x2
0x2311f4…231388 gno = [ // 0x2311f8 @0x4
0x2311f4…231388 [0x00]: C0x00b2.0x0.0
0x2311f4…231388 [0x01]: C0x00b2.0x1.0
0x2311f4…231388 ]
0x2311f4…231388 }
0x231388…23151c Dummy {f00=0x00b2, f01=0x0190, f02=» 2 P IDENT DIVMOD REL 8.2 78-09-15 870105040820 P* LREK 78-02-20 : P* T 8 P**************************************************** ^ P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P* P*
0x23151c…2316b0 Dummy {f00=0x00b2, f01=0x0190, f02=»THIS ROUTINE EXECUTES THE DIVIDE INSTRUCTION ON THE ALPHA COMPUTER P* CALLING SEQUENCE J & P* A1-A2= DIVIDEND d $ P* A6 = DIVISOR P* CF A14,DIVMOD B P*RETURN* RESUT IN A1-A2 ; A1= REMAIN
0x2316b0…231844 Dummy {f00=0x00b2, f01=0x0190, f02=»1 SAVE DIVIDEND SIGN z P LDK A3,0 " P ADK A6,0 @ @ P RF(0) END3 * IF DIVISOR IS NULL, OVREFLOW ^ P ADK A1,0 P RF(4) SIGNE P ANK.L A2,/7FFF @ P
0x231844…2319d8 Dummy {f00=0x00b2, f01=0x0190, f02=» A7,0 P LDK A4,16 4 P ADK A1,0 *SIGN OF DIVIDEND 0 P RF(6) DIVENP h 8 P ADK A3,1 * DIVIDEND IS NEGATIVE P C1R A1,A1 P C1R A2,A2 P
0x2319d8…231b6c Dummy {f00=0x00b2, f01=0x0190, f02=»5) END3 2 PDIVENP ADK A6,0 *SIGN OF DIVISOR P RF(6) DIVORP H 4 P SUK A3,1 *NEGATIVE DIVISOR h P C1R A6,A6 P ADK A6,1 < P ADK A6,0 RES
0x231b6c…231d00 Dummy {f00=0x00b2, f01=0x0190, f02=»SSP1 | 2 PSHIFT SUK A4,1 *A1 LESS THAN A6 P RF(0) END B P SLL A1,1 ` P SLL A7,1 ~ P SLL A2,1 P RF(6) *+4 P ADK A1,1 P ADK
0x231d00…231e94 (1, 557) Dummy {f00=0x00b2, f01=0x018e, f02=» P ADK A7,1 P RB(7) SHIFT " 4 P*THIS SEQUENCE RESTORES THE SIGN OF THE RESULTS B PEND LDR A2,A7 z P ADK A3,0 P RF(0) NOSIGN 8 P RF(2) AA DIVIDEND +. DIVISO
0x231e94…232028 Dummy {f00=0x00b2, f01=0x0190, f02=» P ADK A2,1 D P*CAUTION THE NEXT INSTRUCTION IS ABSOLUTELY NECESSARY TO SET CR " > P* WHEN THE ADK A2,1 SET AN OVERFLOW CR EX (QUOTIENT=8000) j P ADK A2,0 P RF(2) END2 P RF(0) END0 PEN
0x232028…2321bc Dummy {f00=0x00b2, f01=0x0190, f02=»******************** f P ANK.L A3,/0300 P LDK.L A4,/FCFF > P AN.S A4,2,A14 ` B P OR.S A3,2,A14 UPDATE CR IN PSW CALLING PROGRAM P RTN A14 8 PNOSIGN ADK.L A8,0 TEST
0x2321bc…232350 Dummy {f00=0x00b2, f01=0x4162, f02=» REMAINDER - x PBB ADK A2,0 P RB(0) END0 8 P RB(2) END2 V P RB(7) END1 t PCASSPE LDR A7,A1 P LDR A1,A2 P CWK A1,/8000 P RB(4) EN
0x232350…2324e4 Dummy {f00=0x00b2, f01=0x2008, f02=» A2,0 P RB(0) END0 P RB(2) END2 2 P RB(7) END1 P PCASSPE LDR A7,A1 n P LDR A1,A2 P CWK A1,/8000 P RB(4) END P LDK A1,0 P
0x2324e4…232678 Dummy {f00=0x00b2, f01=0x416a, f02=»,A6 STATUS P RF(N) EXIT P LDR A1,A1 RETURN CODE & P RB(NE) ENDIO YES END I/O D P ABL LDREG f PEXIT ABL TDISP x P EJECT P* P* R C C P P* P* PRCCP EQU * P CF A15,SAVE8 P LD A7,DWTST,A6
0x232678…23280c Dummy {f00=0x00b2, f01=0x2008, f02=» A15,SAVE8 LD A7,DWTST,A6 RB(N) EXIT 2 LDK A1,2 F RB ENDIO X * j * t END ~@ LD A4,DWTST,A6 STATUS RF(N) EXIT LDR A1,A1 RETURN CODE RF(NE) ENDIO YES END I/O ABL LDR
0x23280c…2329a0 Dummy {f00=0x00b2, f01=0x0190, f02=»EWIND P XIF P IFT DAMA+IBM=0 P ADK A1,30 2 P RF(Z) FD:050 SEARCH KEY D P XIF d P p PFD:DIS EQU * x P ABL DISIOE REQUEST ERROR P EJECT P* P*************** P* * P* BASIC WRITE *
0x2329a0…232b34 (1, 558) Opaque[0x194]
0x232b34…232cc8 # DirEnt {nam=»DSUMOD«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1650, f03=0x2020}
0x232b34…232cc8 IdxSect {
0x232b34…232cc8 f00 = 0x00b2 // 0x232b34 @0x0
0x232b34…232cc8 f01 = 0x0004 // 0x232b36 @0x2
0x232b34…232cc8 gno = [ // 0x232b38 @0x4
0x232b34…232cc8 [0x00]: C0x00b2.0x2.0
0x232b34…232cc8 [0x01]: C0x00b2.0x3.0
0x232b34…232cc8 ]
0x232b34…232cc8 }
0x232cc8…232e5c Dummy {f00=0x00b2, f01=0x0190, f02=» 2 P IDENT DSUMOD REL 8.2 78-09-15 870105040820 P* LREK 78-02-20 : P* T 8 P**************************************************** ^ P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P* P*
0x232e5c…232ff0 Dummy {f00=0x00b2, f01=0x0190, f02=»THIS ROUTINE EXECUTES THE DOUBLE SUBSTRACTION INSTRUCTION ON THE ALPHA P*COMPUTER N P*CALLING SEQUENCE ` $ P* A1-A2 = ARG1 z $ P* A6-A7 = ARG2 P* CF A14,DSUMOD & P*RETURN: RESULT I
0x232ff0…233184 Dummy {f00=0x00b2, f01=0x0190, f02=» C1R A6,A6 P C1R A7,A7 P ANK.L A7,X'7FFF' > P ANK.L A2,/7FFF b P ADK A7,1 P RF(1) NOVER1 P ADK A6,1 P RF(3) OVER4 P
0x233184…233318 Dummy {f00=0x00b2, f01=0x0190, f02=» END1 P RF(2) END2 P RF(3) END3 , P ADK A2,0 J P RF(0) END0 h P RF(7) END1 POVER1 ANK.L A2,X'7FFF' P ADK A1,1 P RF(3) OVER4 P
0x233318…2334ac Dummy {f00=0x00b2, f01=0x0190, f02=» NOVER2 PEND3 ADK A3,/80 PEND2 ADK A3,/80 4 PEND1 ADK A3,/80 V F PEND0 SLL A3,1 ************************************* x P ANK.L A3,/0300 P LDK.L A4,/FCFF P
0x2334ac…233640 Dummy {f00=0x00b2, f01=0x4014, f02=» END @ D3 ADK A3,/80 PEND2 ADK A3,/80 4 PEND1 ADK A3,/80 V F PEND0 SLL A3,1 ************************************* x P ANK.L A3,/0300 P LDK.L A4,/FCFF P
0x233640…2337d4 (1, 559) Dummy {f00=0x00b2, f01=0x2008, f02=» ,0 P RB(7) NOVER2 PEND3 ADK A3,/80 6 PEND2 ADK A3,/80 X PEND1 ADK A3,/80 z PEND0 SLL1 A3 P ANK.L A3,/0300 P LDK.L A4,/FCFF P A
0x2337d4…233968 Dummy {f00=0x00b2, f01=0x0190, f02=» b 0 P******************************************** P* < P EJECT F P* T P* A C C P ^ P* r 2 P* ACTIVATION PART: CHECH VALIDITY OF ORDERS | 4 P* AND STARTS THE PROCESSING P* PACCP EQU * P L
0x233968…233afc Dummy {f00=0x00b2, f01=0x0190, f02=»NO, SET DEV. ADR. TO RECEIPT PRINTER PACP05 EQU * , P SUK A7,/22 CUT ? @ P RF(E) ACCP30 Z P ADK A7,/1C WRITE ? p " P ABL(NE) DISIOE REQUEST ERROR P LDK A3,0 START BUFFER INDEX P LDK A4,0 PACCP10 EQU * $ P CF A15,GETC
0x233afc…233c90 Dummy {f00=0x00b2, f01=0x0190, f02=»QU * P LDK A2,/03 PACCP25 CF A5,OUTPUT PACCP27 CF A5,STREG < P ANK A2,/7F V P SUK A2,2 j P RF(Z) ACCP65 END OF PAPER | P SUK A7,6 P RF(NE) ACCP70 P SUK A2,2 P RF(NZ) ENDIO P LDK A2,/20 P ORS A
0x233c90…233e24 Dummy {f00=0x00b2, f01=0x0190, f02=» P LDK A2,/20 P ADK A3,1 P RB ACCP35 . PACCP50 LDK A2,/13 @ P ST A3,6,A8 Z P RB ACCP25 n & PACCP65 LDKL A1,/4000 RECEIPT STUCK P RF ENDIO PACCP70 SUK A2,4 P RB(E) ACCP27 PENDIO ABL DISEND P EJECT
0x233e24…233fb8 Dummy {f00=0x00b2, f01=0x416e, f02=»WTST,A6 STATUS P RF(N) EXIT P LDR A1,A1 RETURN CODE * P RB(NE) ENDIO YES END I/O H P ABL LDREG j PEXIT ABL TDISP | P EJECT P* P* R C C P P* P* PRCCP EQU * P CF A15,SAVE8 P LD A7,DWTST,A
0x233fb8…23414c Dummy {f00=0x00b2, f01=0x2008, f02=» A15,SAVE8 LD A7,DWTST,A6 RB(N) EXIT 2 LDK A1,2 F RB ENDIO X * j * t END ~@ LD A4,DWTST,A6 STATUS RF(N) EXIT LDR A1,A1 RETURN CODE RF(NE) ENDIO YES END I/O ABL LDR
0x23414c…2342e0 Dummy {f00=0x00b2, f01=0x0190, f02=»SAV INTERRUPT SAVE AREA & P EXTRN TASCII EBCDIC TO ASCII TAB & P EXTRN TEBCDIC ASCII TO EBCDIC TAB J P* t P************************ ~ P* * P* CONDITIONAL ASSEMBLY * P* * P**********
0x2342e0…234474 (1, 560) Opaque[0x194]
0x234474…234608 # DirEnt {nam=»DMRUTS«, typ=»UF«, f00=0x1e12, f01=0x5400, f02=0x1660, f03=0x948c}
0x234474…234608 IdxSect {
0x234474…234608 f00 = 0x00b3 // 0x234474 @0x0
0x234474…234608 f01 = 0x0002 // 0x234476 @0x2
0x234474…234608 gno = [ // 0x234478 @0x4
0x234474…234608 [0x00]: C0x00b3.0x0.0
0x234474…234608 ]
0x234474…234608 }
0x234608…23479c Dummy {f00=0x00b3, f01=0x018e, f02=» P$MOVDM R=DMINIT PDEL DMSUBX,/S PDEL DMSUBX,/O 2 PDEL DMSUBR,/S H PDEL DMSUBR,/O ^ PSCR t P$MOVDM R=TASS PSCR P$MOVDM R=DMTASS PSCR P$MOVDM R=TIODM PSCR PDEL DMTASK,/S PDEL DMTASK
0x23479c…234930 Dummy {f00=0x00b3, f01=0x00fa, f02=» P$MOVDM R=DMBUF PSCR P$MOVDM R=TTABD0 * P$MOVDM R=TTABD1 B P$MOVDM R=TTABD2 Z PSCR r P$MOVDM R=ADDMOD ~ P$MOVDM R=DIVMOD PSCR P$MOVDM R=MPYMOD P$MOVDM R=DSUMOD PASG /E0,TY10 PDEL DMTASK
0x234930…234ac4 Dummy {f00=0x00b3, f01=0x2008, f02=» $MOVDM R=DMBUF PSCR P$MOVDM R=TTABD0 * P$MOVDM R=TTABD1 B P$MOVDM R=TTABD2 Z PSCR r P$MOVDM R=ADDMOD ~ P$MOVDM R=DIVMOD PSCR P$MOVDM R=MPYMOD P$MOVDM R=DSUMOD PASG /E0,TY10 PDEL DMTASK
0x234ac4…234c58 Dummy {f00=0x00b3, f01=0x0190, f02=»F CONDITIONAL ASSEMBLY THE EXCLUSIVE ACCESS CHECK < P* FOR RANDOM WRITE AND RANDOM DELETE CAN BE EXCLUDED. : P* z 2 P* QNOEXA=1 EXCLUSIVE ACCESS CHECK INCLUDED 2 P* QNOEXA=0 EXCLUSIVE ACCESS CHECK EXCLUDED P EJECT P* P
0x234c58…234dec Dummy {f00=0x00b3, f01=0x018e, f02=»DE SEQ READ z P ENTRY QSW P ENTRY DMTWM & P EJECT : P* H P***************** R P* EXTERNALS * l P***************** P* P* P EXTRN CD:TAB P EXTRN TTB:TD,FDBSTA P EXTRN TC:TAB P EXTRN FNDTI
0x234dec…234f80 Dummy {f00=0x00b3, f01=0x0190, f02=» P EXTRN FDBBLF P EXTRN FDBTNR P EXTRN FDBVTO 4 P EXTRN FDBCEX J P EXTRN FDBEXT ` P EXTRN EXTDMI v P EXTRN EXTFC P EXTRN EXTLEN P EXTRN EXTBAS P EXTRN EXTELE P EXTRN FDBLRN P EXTRN FDBMIA
0x234f80…235114 (1, 561) Opaque[0x194]
0x235114…2352a8 # DirEnt {nam=»INTLT3«, typ=»SC«, f00=0x8226, f01=0x3ae1, f02=0x1668, f03=0x0002}
0x235114…2352a8 IdxSect {
0x235114…2352a8 f00 = 0x00b3 // 0x235114 @0x0
0x235114…2352a8 f01 = 0x0002 // 0x235116 @0x2
0x235114…2352a8 gno = [ // 0x235118 @0x4
0x235114…2352a8 [0x00]: C0x00b3.0x1.0
0x235114…2352a8 ]
0x235114…2352a8 }
0x2352a8…23543c Dummy {f00=0x00b3, f01=0x0190, f02=» 2 P IDENT INTLT3 REL 8.2 78-09-15 870105040820 P* : @ P* INTERRUPT TABLE FOR DEVICES CONNECTED TO CHANNEL UNIT NO.1 D P* FOR LOCAL TERMINALS D P* THIS TABLE CONTAINS POINTERS TO DEVICE WORK TABLES ASSOCIATED D P* WITH DEVICES CONNECTED T
0x23543c…2355d0 Dummy {f00=0x00b3, f01=0x40f8, f02=»TABLE ENTRY P* P* TERMINAL PARAMETERS P* > P* H , P* RIGHT BYTE = 2 * NUMBER OF DEVICES R P* P* P* P* PINTLT3 EQU * TABLE ENTRY P* P* P* P END @ ICES CONNECTED T
0x2355d0…235764 Dummy {f00=0x00b3, f01=0x2008, f02=» NAL PARAMETERS 0 P* LEFT BYTE = 2 * NUMBER OF INPUT DEVICES 4 P* AND DEVICES WITH DATA REQUESTS R , P* RIGHT BYTE = 2 * NUMBER OF DEVICES P* 4 P* NOTE: PRINTERS ARE TREATED AS INPUT DEVICES P* P*
0x235764…2358f8 Dummy {f00=0x00b3, f01=0x4010, f02=» END @ = DEVICE DEPENDENT ECHO SUBROUTINE P* : PECHOCD EQU * D P LDR A7,A7 EOR ? X P RF(N) ECHO10 p P CF A5,OUTPUT SEND CHARACTER PECHO10 ABL ECHRTN P EJECT P* P* R C C D P* P* PRCCD
0x2358f8…235a8c Dummy {f00=0x00b3, f01=0x2008, f02=» A15,SAVE8 LD A7,DWTST,A6 RB(N) EXIT 2 LDK A1,2 F RB ENDIO X * j * t END ~@ LD A4,DWTST,A6 STATUS RF(N) EXIT LDR A1,A1 RETURN CODE RF(NE) ENDIO YES END I/O ABL LDR
0x235a8c…235c20 Dummy {f00=0x00b3, f01=0x0190, f02=» SUK A4,1 DECREMENT RETRY COUNTER $ P ABL(Z) END:IO ALL RETRIES DONE * P RB WRIT:N TRY AGAIN R P n P IFT RAW=1 v PWRIT20 CWK A7,5 P ABL(E) END:IO BASIC WRITE & P LDKL A3,BUF DRIVER BUFFER ADDRESS P XIF P IFF RAW=1 $
0x235c20…235db4 (1, 562) Opaque[0x194]
0x235db4…235f48 # DirEnt {nam=»INTLT4«, typ=»SC«, f00=0x5600, f01=0x1908, f02=0x1670, f03=0x1502}
0x235db4…235f48 IdxSect {
0x235db4…235f48 f00 = 0x00b3 // 0x235db4 @0x0
0x235db4…235f48 f01 = 0x0002 // 0x235db6 @0x2
0x235db4…235f48 gno = [ // 0x235db8 @0x4
0x235db4…235f48 [0x00]: C0x00b3.0x2.0
0x235db4…235f48 ]
0x235db4…235f48 }
0x235f48…2360dc Dummy {f00=0x00b3, f01=0x0190, f02=» 2 P IDENT INTLT4 REL 8.2 78-09-15 870105040820 P* : @ P* INTERRUPT TABLE FOR DEVICES CONNECTED TO CHANNEL UNIT NO.1 D P* FOR LOCAL TERMINALS D P* THIS TABLE CONTAINS POINTERS TO DEVICE WORK TABLES ASSOCIATED D P* WITH DEVICES CONNECTED T
0x2360dc…236270 Dummy {f00=0x00b3, f01=0x40f8, f02=»TABLE ENTRY P* P* TERMINAL PARAMETERS P* > P* H , P* RIGHT BYTE = 2 * NUMBER OF DEVICES R P* P* P* P* PINTLT4 EQU * TABLE ENTRY P* P* P* P END @ ICES CONNECTED T
0x236270…236404 Dummy {f00=0x00b3, f01=0x2008, f02=» NAL PARAMETERS 0 P* LEFT BYTE = 2 * NUMBER OF INPUT DEVICES 4 P* AND DEVICES WITH DATA REQUESTS R , P* RIGHT BYTE = 2 * NUMBER OF DEVICES P* 4 P* NOTE: PRINTERS ARE TREATED AS INPUT DEVICES P* P*
0x236404…236598 Dummy {f00=0x00b3, f01=0x0190, f02=» P ABL(Z) BRM500 NAK RECEIVED ; P IFT MSV1=0 ; ( P LDR A8,A2 ; < $ P CF A5,READP READ ONE CHARACTER ; N P RF(NZ) BRM150 PARITY ERROR ; v P CWR A2,A8 ; & P RF(NE) BRM150 INVALID ADDRESSING ; P XIF ; P LDK A3,0 ; P CC A2,DW1500+1 ;
0x236598…23672c Dummy {f00=0x00b3, f01=0x0190, f02=»,READP READ 1:ST STA ; P RF(NZ) BRM150 PARITY ERROR < P LDR A8,A2 < @ P IFT MSV1=0 < R P CF A5,READP READ 2:ND STA < f P RF(NZ) BRM150 PARITY ERROR < P CWR A2,A8 < , P RF(NE) BRM150 INVALID ADDRESS SEQUENCE < P XIF < " P CF A5,READ RE
0x23672c…2368c0 Dummy {f00=0x00b3, f01=0x0190, f02=»Q SALCUZ < P XIF SALCUZ = P RF(NZ) BRM150 NOT ENQ = ( P IFT P6805=0 SALCUZ = F $ P CF A5,READ READ LAST CHARACTER = b P = " P* TRAILING PAD CAN BE CHECKED = P = P CIO A1,0,LCUIN HALT INPUT = P SST A1,LCUIN = P XIF SALCUZ =
0x2368c0…236a54 (1, 563) Opaque[0x194]
0x236a54…236be8 # DirEnt {nam=»INTRT3«, typ=»SC«, f00=0x9da0, f01=0x0001, f02=0x1678, f03=0x5f28}
0x236a54…236be8 IdxSect {
0x236a54…236be8 f00 = 0x00b3 // 0x236a54 @0x0
0x236a54…236be8 f01 = 0x0002 // 0x236a56 @0x2
0x236a54…236be8 gno = [ // 0x236a58 @0x4
0x236a54…236be8 [0x00]: C0x00b3.0x3.0
0x236a54…236be8 ]
0x236a54…236be8 }
0x236be8…236d7c Dummy {f00=0x00b3, f01=0x0190, f02=» 2 P IDENT INTRT3 REL 8.2 78-09-15 870105040820 P* : @ P* INTERRUPT TABLE FOR DEVICES CONNECTED TO CHANNEL UNIT NO.1 D P* FOR REMOTE TERMINALS D P* THIS TABLE CONTAINS POINTERS TO DEVICE WORK TABLES ASSOCIATED D P* WITH DEVICES CONNECTED T
0x236d7c…236f10 Dummy {f00=0x00b3, f01=0x40f6, f02=»BLE ENTRY P* P* TERMINAL PARAMETERS P* < P* F , P* RIGHT BYTE = 2 * NUMBER OF DEVICES P P* P* P* P* PINTRT3 EQU * TABLE ENTRY P* P* P* P END @ EVICES CONNECTED T
0x236f10…2370a4 Dummy {f00=0x00b3, f01=0x2008, f02=» NAL PARAMETERS 0 P* LEFT BYTE = 2 * NUMBER OF INPUT DEVICES 4 P* AND DEVICES WITH DATA REQUESTS R , P* RIGHT BYTE = 2 * NUMBER OF DEVICES P* 4 P* NOTE: PRINTERS ARE TREATED AS INPUT DEVICES P* P*
0x2370a4…237238 Dummy {f00=0x00b3, f01=0x0190, f02=» P RF(E) ENDIO YES P LDK A1,/20 P RF ENDIO 0 P* B 4 P* MODIFY DEVICE ADDRESS DEPENDING ON KEYBOARD, L 2 P* CARD READER/WRITER, OR DISPENSER ORDER AND & P* JUMP TO VALID FUNCTION MODULE. P* PACCG38 EQU * P LDK A
0x237238…2373cc Dummy {f00=0x00b3, f01=0x0190, f02=»40 EQU * ( P CF A5,MODIFY MODIFY DEVICE ADDRESS PACCG50 EQU * < P LDK A3,0 P P SLL A4,1 b 2 P ABI FUNTAB-2,A4 JUMP TO VALID FUNCTION MODULE t P EJECT P* 2 P* CHECK IF CARD-IN-READER MESSAGE HAS COME " P* OR WAIT FOR
0x2373cc…237560 Dummy {f00=0x00b3, f01=0x0190, f02=»A5,STREG WAIT FOR COT MESSAGE $ P SUK A1,3 DEVICE CODE CORRECT ? & P RF(NE) THRERR NO N PCARD10 EQU * h P SUK A2,/0C CARD IN READER ? | P RF(E) ENDIO 2 PCARD12 SUK A2,/34 FRONT SHUTTER DOESNT CLOSE ? P RF(NE) CARD20 NO PCARD
0x237560…2376f4 (1, 564) Opaque[0x194]
0x2376f4…237888 # DirEnt {nam=»INTRT4«, typ=»SC«, f00=0x4dc0, f01=0x5c04, f02=0x1680, f03=0x001f}
0x2376f4…237888 IdxSect {
0x2376f4…237888 f00 = 0x00b4 // 0x2376f4 @0x0
0x2376f4…237888 f01 = 0x0002 // 0x2376f6 @0x2
0x2376f4…237888 gno = [ // 0x2376f8 @0x4
0x2376f4…237888 [0x00]: C0x00b4.0x0.0
0x2376f4…237888 ]
0x2376f4…237888 }
0x237888…237a1c Dummy {f00=0x00b4, f01=0x0190, f02=» 2 P IDENT INTRT4 REL 8.2 78-09-15 870105040820 P* : @ P* INTERRUPT TABLE FOR DEVICES CONNECTED TO CHANNEL UNIT NO.1 D P* FOR REMOTE TERMINALS D P* THIS TABLE CONTAINS POINTERS TO DEVICE WORK TABLES ASSOCIATED D P* WITH DEVICES CONNECTED T
0x237a1c…237bb0 Dummy {f00=0x00b4, f01=0x40f6, f02=»BLE ENTRY P* P* TERMINAL PARAMETERS P* < P* F , P* RIGHT BYTE = 2 * NUMBER OF DEVICES P P* P* P* P* PINTRT4 EQU * TABLE ENTRY P* P* P* P END @ EVICES CONNECTED T
0x237bb0…237d44 Dummy {f00=0x00b4, f01=0x2008, f02=» NAL PARAMETERS 0 P* LEFT BYTE = 2 * NUMBER OF INPUT DEVICES 4 P* AND DEVICES WITH DATA REQUESTS R , P* RIGHT BYTE = 2 * NUMBER OF DEVICES P* 4 P* NOTE: PRINTERS ARE TREATED AS INPUT DEVICES P* P*
0x237d44…237ed8 Dummy {f00=0x00b4, f01=0x018e, f02=»NOTES TAKEN ? " PFEEDER EQU * # P RB(NE) THRERR # * P LDR A3,A3 POWER BREAK ? # @ P RB(N) FEED20 YES # ` P RB PICK60 # z P EJECT # P* # P* # PSCANKE EQU * # ( P LDK A2,SCANK SCAN KEYBOARD COMMAND # P RB MICOUT # PSCAN10 E
0x237ed8…23806c Dummy {f00=0x00b4, f01=0x0190, f02=» # P RB(E) RECA30 $ P SUK A2,2 $ P RB(E) ENDI01 $ 0 P ABL THRERR $ F " PSCAN12 SUK A7,2 PIN REQUEST ? $ Z P RF(E) PIN10 YES $ " P CF A15,STORE STORE CHARACTER $ , PSCAN15 LD A1,10,A8 GET KEY-TABLE ADDRESS $ P RF(E) SCA100 NO KEYTABLE
0x23806c…238200 Dummy {f00=0x00b4, f01=0x0190, f02=» $ , P RF(N) SCA100 KEY NOT FOUND IN KEYTABLE % P SUK A1,1 NEXT KEY % 8 P CCR A2,A1 EOR-CHARACTER % R P RB(NE) SCAN20 % r P LDK A1,0 % P ADR A7,A7 YES, DOUBLE INDEX % , P ST A7,10,A8 STORE INDEX IN CONTROL WORD % P RF SCA200 % , PSCA100 C
0x238200…238394 (1, 565) Opaque[0x194]
0x238394…238528 # DirEnt {nam=»DW1501«, typ=»SC«, f00=0x855d, f01=0x0000, f02=0x1688, f03=0x3d49}
0x238394…238528 IdxSect {
0x238394…238528 f00 = 0x00b4 // 0x238394 @0x0
0x238394…238528 f01 = 0x0002 // 0x238396 @0x2
0x238394…238528 gno = [ // 0x238398 @0x4
0x238394…238528 [0x00]: C0x00b4.0x1.0
0x238394…238528 ]
0x238394…238528 }
0x238528…2386bc Dummy {f00=0x00b4, f01=0x0190, f02=» 2 P IDENT DW1501 REL 8.2 78-09-15 870105040820 P* : : P* DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 D P* P ENTRY DW1501 TABLE ENTRY * P EXTRN DC15AD POINTER TO ADDRESS-BLOCK P* PDW1501 EQU * TABLE ENTRY P D
0x2386bc…238850 Dummy {f00=0x00b4, f01=0x4188, f02=» P RIGHT BYTE=ORDER * P DATA DC15AD POINTER TO ADDRESS-BLOCK P DATA 'DC' TTAB-ADDRESS N $ P DATA 0 WAIT/ACTIVATE INDICATOR n P DATA 0 TERMINAL QUEUE P DATA 0 TIMER POINTER P DATA 0 WRITE QUEUE P DATA 0 STATUS QUEUE
0x238850…2389e4 Dummy {f00=0x00b4, f01=0x2008, f02=» R ( P DATA DCAD POINTER TO ADDRESS-BLOCK P DATA 0 TTAB-ADDRESS > $ P DATA 0 WAIT/ACTIVATE INDICATOR Z P DATA 0 TERMINAL QUEUE P DATA 0 TIMER POINTER P DATA 0 WRITE QUEUE P DATA 0 STATUS QUEUE P DATA 0,0 SAVE ARE
0x2389e4…238b78 Dummy {f00=0x00b4, f01=0x2008, f02=» ESS-BLOCK ~ P DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR 6 P DATA 0 TERMINAL QUEUE ^ P DATA 0 OUTPUT QUEUE LINK | P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT
0x238b78…238d0c Dummy {f00=0x00b4, f01=0x0190, f02=» (DMSUBR Z CHKIND^ IHRET2 REQEND . FDBADFF DWTTQ QTJOB DWTTDM DWTST IHRTN EATEST x FDBEAL FDBTNR EASETB GETBLKR EARELB FREQUER CRNGETK FDBCRL CRNTIDC CRNQUEC HALTN CRBUFL CALSNO
0x238d0c…238ea0 Dummy {f00=0x00b4, f01=0x4146, f02=»DBDBR0 ECBBA BUFDMIR DMTIOZ GTBKBUK EXTDMI ECBFC ECBCW SECTLE ECBRL DMTGBUC BUFSTA DWTOR GTLGRN Z EXTELEF MPYMODF rDMFDB a CRBUFL QFDBFL ` FDBSTA FDBEND CRNQUEK CRNENDK Z MXI
0x238ea0…239034 (1, 566) Opaque[0x194]
0x239034…2391c8 # DirEnt {nam=»DWII01«, typ=»SC«, f00=0x000c, f01=0x2020, f02=0x1690, f03=0x2020}
0x239034…2391c8 IdxSect {
0x239034…2391c8 f00 = 0x00b4 // 0x239034 @0x0
0x239034…2391c8 f01 = 0x0002 // 0x239036 @0x2
0x239034…2391c8 gno = [ // 0x239038 @0x4
0x239034…2391c8 [0x00]: C0x00b4.0x2.0
0x239034…2391c8 ]
0x239034…2391c8 }
0x2391c8…23935c Dummy {f00=0x00b4, f01=0x0190, f02=» 2 P IDENT DWII01 REL 8.2 78-09-15 870105040820 P* : ( P* INTERTASK COMMUNICATION INPUT DWT D P* p P ENTRY DWII01 TABLE ENTRY z P P EXTRN ITADI DRIVER ENTRY P PDWII01 EQU * & P DATA 0 QUEUE ANCHOR OUTPUT DWT'S
0x23935c…2394f0 Dummy {f00=0x00b4, f01=0x40c0, f02=» | $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE 0 P DATA 0 TIMER POINTER N P DATA 0 TIME OUT l P DATA 0 P DATA 0,0 SAVE AREA P END @ P PDWII01 EQU * & P DATA 0 QUEUE ANCHOR OUTPUT DWT'S
0x2394f0…239684 Dummy {f00=0x00b4, f01=0x2008, f02=» DATA 0 TTAB ADDRESS $ DATA 0 WAIT/ACTIVATE INDICATOR $ DATA 0 TERMINAL QUEUE L DATA 0 TIMER POINTER j DATA 0 TIME OUT DATA 0 DATA 0,0 SAVE AREA END @ & ! DATA 0 QUEUE ANCHOR OUTPUT DWT'S
0x239684…239818 Dummy {f00=0x00b4, f01=0x0190, f02=» v P EXTRN DWTST DWT STATUS P EXTRN SETIMP TIMER ( , P EXTRN FNDTID FIND TTAB ADDRESS FROM TID D P EXTRN TTB:TD t P EXTRN TTB:ST TTAB STATUS " P EXTRN DWTTAB DWT TTAB ADDRESS $ P EXTRN DWTADR ACTIVATION ADDRESS * P EXTRN IHRTN R
0x239818…2399ac Dummy {f00=0x00b4, f01=0x0190, f02=»LENGTH z P EXTRN ECBRC ECB RETURN CODE " P EXTRN ECBCW ECB CONTROL WORD 2 P* X P* C O N S T A N T S b P* PDWTTP EQU /10 TIMER POINTER " PDWSTB EQU /18 STACK BASE USED * PDWSTB2 EQU /1E STACK BASE 2 (NOT USED) PDWTIM
0x2399ac…239b40 Dummy {f00=0x00b4, f01=0x0190, f02=»D PITADO DATA ICAD P " PICAD EQU * * P SUK A7,2 < P RF(Z) READ READ ORDER N P SUK A7,9 l P RF(Z) WRITE WRITE ORDER ~ P SUK A7,/2E P RF(NZ) DIS:OE REQUEST ERROR P* P* S E T T I M E O U T P*
0x239b40…239cd4 (1, 567) Opaque[0x194]
0x239cd4…239e68 # DirEnt {nam=»TIODMX«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1698, f03=0x2020}
0x239cd4…239e68 IdxSect {
0x239cd4…239e68 f00 = 0x00b4 // 0x239cd4 @0x0
0x239cd4…239e68 f01 = 0x0002 // 0x239cd6 @0x2
0x239cd4…239e68 gno = [ // 0x239cd8 @0x4
0x239cd4…239e68 [0x00]: C0x00b4.0x3.0
0x239cd4…239e68 ]
0x239cd4…239e68 }
0x239e68…239ffc Dummy {f00=0x00b4, f01=0x0190, f02=» 2 P IDENT TIODMX REL 8.2 78-09-15 870105040820 P* : P* D 8 P**************************************************** N P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P* P* $ P* LEVEL
0x239ffc…23a190 Dummy {f00=0x00b4, f01=0x418c, f02=»** ^ P* . P* THIS DUMMY MODULE REPLACE TIODM AND DM P* F P ENTRY TIODM,CHKIND,REQEND P P ENTRY FDBADF r P ENTRY TCFILE,COFILE PTIODM EQU * PCHKIND EQU * PREQEND EQU * PFDBADF EQU * $ P DATA /6300 SOMETHIN
0x23a190…23a324 Dummy {f00=0x00b4, f01=0x2008, f02=» ES | PTTABE EQU * P* & P END 0@ <LER TERMINAL , P* T P* ^ P ENTRY TTABX TABLE ENTRY h P* P* P* P* P* PTTABX DATA 0 P DATA 60 TERMINAL STATUS & P DATA /EE TERMINAL IDENTIF
0x23a324…23a4b8 Dummy {f00=0x00b4, f01=0x018e, f02=»S TAKEN ? " | PFEEDER EQU * # P RB(NE) THRERR # & P LDR A3,A3 POWER BREAK ? # < P RB(N) FEED20 YES # P RB PICK60 # v P EJECT # P* # P* # PSCANKE EQU * # ( P LDK A2,SCANK SCAN KEYBOARD COMMAND # P RB MICOUT # PSCAN10 EQU *
0x23a4b8…23a64c Dummy {f00=0x00b4, f01=0x0190, f02=» P RB(E) RECA30 $ P SUK A2,2 $ P RB(E) ENDI01 $ , P ABL THRERR $ B " PSCAN12 SUK A7,2 PIN REQUEST ? $ V P RF(E) PIN10 YES $ | " P CF A15,STORE STORE CHARACTER $ , PSCAN15 LD A1,10,A8 GET KEY-TABLE ADDRESS $ P RF(E) SCA100 NO KEYTABLE $
0x23a64c…23a7e0 Dummy {f00=0x00b4, f01=0x0190, f02=» , P RF(N) SCA100 KEY NOT FOUND IN KEYTABLE % P SUK A1,1 NEXT KEY % 4 P CCR A2,A1 EOR-CHARACTER % N P RB(NE) SCAN20 % n P LDK A1,0 % P ADR A7,A7 YES, DOUBLE INDEX % , P ST A7,10,A8 STORE INDEX IN CONTROL WORD % P RF SCA200 % , PSCA100 CCK A
0x23a7e0…23a974 (1, 568) Opaque[0x194]
0x23a974…23ab08 # DirEnt {nam=»DWIO01«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x16a0, f03=0x2020}
0x23a974…23ab08 IdxSect {
0x23a974…23ab08 f00 = 0x00b5 // 0x23a974 @0x0
0x23a974…23ab08 f01 = 0x0002 // 0x23a976 @0x2
0x23a974…23ab08 gno = [ // 0x23a978 @0x4
0x23a974…23ab08 [0x00]: C0x00b5.0x0.0
0x23a974…23ab08 ]
0x23a974…23ab08 }
0x23ab08…23ac9c Dummy {f00=0x00b5, f01=0x0190, f02=» 2 P IDENT DWIO01 REL 8.2 78-09-15 870105040820 P* : ( P* INTERTASK COMMUNICATION INPUT DWT D P* p P ENTRY DWIO01 TABLE ENTRY z P P EXTRN ITADO DRIVER ENTRY P PDWIO01 EQU * P DATA 0 QUEUE LINK P DATA /8000
0x23ac9c…23ae30 Dummy {f00=0x00b5, f01=0x40c8, f02=»WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE P DATA 0 TIMER POINTER > P DATA 0 TIME OUT $ P DATA 0 ADDRESS TO QUEUE ANCHOR t P DATA 0,0 SAVE AREA P END @ PDWIO01 EQU * P DATA 0 QUEUE LINK P DATA /8000
0x23ae30…23afc4 Dummy {f00=0x00b5, f01=0x2008, f02=» DATA 0 TTAB ADDRESS $ DATA 0 WAIT/ACTIVATE INDICATOR $ DATA 0 TERMINAL QUEUE L DATA 0 TIMER POINTER j DATA 0 TIME OUT DATA 0 DATA 0,0 SAVE AREA END @ & ! DATA 0 QUEUE ANCHOR OUTPUT DWT'S
0x23afc4…23b158 Dummy {f00=0x00b5, f01=0x0190, f02=»H BOT P P P LDK A1,/C P CFR A8,A6 SEARCH TAPE MARK 0 P T P PSOP:IL LDKL A1,/0400 d & P OTR A1,0,SOP ILLUMINATE SOP-LAMP P EJECT MONCON P P** . P***************************************** P**
0x23b158…23b2ec Dummy {f00=0x00b5, f01=0x018e, f02=»******************** ~ P** P & P LDKL A6,CL:ADR-PART:3 . " P ADR A6,A12 SUBROUTINE ADDRESS L P r P z P LDKL A4,CL:TAB-PART:3 * P ADR A4,A12 CLASS TABLE ADDRESS TABLE P P PCLA:10 LDR* A5,A4 * P RF(Z) CLA:20 CL
0x23b2ec…23b480 Dummy {f00=0x00b5, f01=0x0190, f02=» PCLA:20 ADK A4,2 " P RB CLA:10 GET NEXT CLASS TYPE PCLA:30 EQU * B P EJECT MONCON V P n P** v $ P******************************** P** P* SET WORDS IN FREE MEMORY P* AREA = /0000 P** $ P**************
0x23b480…23b614 (1, 569) Opaque[0x194]
0x23b614…23b7a8 # DirEnt {nam=»DW0701«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x16a8, f03=0x2020}
0x23b614…23b7a8 IdxSect {
0x23b614…23b7a8 f00 = 0x00b5 // 0x23b614 @0x0
0x23b614…23b7a8 f01 = 0x0002 // 0x23b616 @0x2
0x23b614…23b7a8 gno = [ // 0x23b618 @0x4
0x23b614…23b7a8 [0x00]: C0x00b5.0x1.0
0x23b614…23b7a8 ]
0x23b614…23b7a8 }
0x23b7a8…23b93c Dummy {f00=0x00b5, f01=0x0190, f02=» 2 P IDENT DW0701 REL 8.2 78-09-15 870105040820 P* : P ENTRY DW0701 D P* Z ( P EXTRN DC07AD ACTIVATION ********:** d P* PDW0701 EQU * TABLE ENTRY P DATA 0 CU LINE ADDRESS P DATA /8000 STATUS P DATA 0 ECB ADDRESS
0x23b93c…23bad0 Dummy {f00=0x00b5, f01=0x40f0, f02=»IVE INDICATOR P DATA 0 TASK QUEUR P DATA 0 TIMER POINTER 0 ( P DATA 0 WRITE QUEUE OR BUFFER QUEUE N P DATA 0 BUFFER QUEUE ANCHOR z * P DATA 0 TIMER POINTER FOR BUFFER QUEUE PDWTEND EQU * P END @ P DATA 0 ECB ADDRESS
0x23bad0…23bc64 Dummy {f00=0x00b5, f01=0x2008, f02=» R POINTER ( # DATA 0 WRITE QUEUE OR BUFFER QUEUE DATA 0 BUFFER QUEUE ANCHOR F * & DATA 0 TIMER POINTER FOR BUFFER QUEUE j END @ ADDRESS DATA 8000 STATUS DATA 0 ECB ADDRESS DATA 0 ORDER ( # DAT
0x23bc64…23bdf8 Dummy {f00=0x00b5, f01=0x0190, f02=» P CF A5,SETCIO A3,A4 AFFECTED ( P CM DWTRCW,A6 SAVE RETURN CODE WORD , P* X P* CHECK IF LOCKED b P* | $ P LD A1,DWTLC,A6 LOCK INDICATOR " P CF A5,FDIX GET BIT MASK IN A3 * P ST A3,DWTA3,A6 SAVE DRIVE INDEX MASK P ANR A
0x23bdf8…23bf8c Dummy {f00=0x00b5, f01=0x0190, f02=» LOAD LOAD ORDER P LDKL A1,/8001 RETURN CODE P RF FD:090 ENDIO : P EJECT R P* ` P* ORDER? j P* | PFD:ORD EQU * P* P LDR A1,A7 P RF(Z) FD:070 TEST STATUS P SUK A1,1 P RF(Z) FD:040 PHYSICAL READ
0x23bf8c…23c120 Dummy {f00=0x00b5, f01=0x0190, f02=» FD:020 PHYSICAL WRITE P SUK A1,15 $ P RF(Z) FD:030 WRITE DELETED DATA 0 P SUK A1,/14 X P ABL(Z) UNLOAD UNLOAD ORDER l P IFT IBM=1 P ADK A1,/36 " P ABL(Z) SQREAD SEQUENTIAL READ P SUK A1,4 $ P ABL(Z) SQWRIT SEQUENTIAL
0x23c120…23c2b4 (1, 570) Opaque[0x194]
0x23c2b4…23c448 # DirEnt {nam=»DRDC17«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x16b0, f03=0x2020}
0x23c2b4…23c448 IdxSect {
0x23c2b4…23c448 f00 = 0x00b5 // 0x23c2b4 @0x0
0x23c2b4…23c448 f01 = 0x0020 // 0x23c2b6 @0x2
0x23c2b4…23c448 gno = [ // 0x23c2b8 @0x4
0x23c2b4…23c448 [0x00]: C0x00b5.0x2.0
0x23c2b4…23c448 [0x01]: C0x00b5.0x3.0
0x23c2b4…23c448 [0x02]: C0x00b6.0x0.0
0x23c2b4…23c448 [0x03]: C0x00b6.0x1.0
0x23c2b4…23c448 [0x04]: C0x00b6.0x2.0
0x23c2b4…23c448 [0x05]: C0x00b6.0x3.0
0x23c2b4…23c448 [0x06]: C0x00b7.0x0.0
0x23c2b4…23c448 [0x07]: C0x00b7.0x1.0
0x23c2b4…23c448 [0x08]: C0x00b7.0x2.0
0x23c2b4…23c448 [0x09]: C0x00b7.0x3.0
0x23c2b4…23c448 [0x0a]: C0x00b8.0x0.0
0x23c2b4…23c448 [0x0b]: C0x00b8.0x1.0
0x23c2b4…23c448 [0x0c]: C0x00b8.0x2.0
0x23c2b4…23c448 [0x0d]: C0x00b8.0x3.0
0x23c2b4…23c448 [0x0e]: C0x00b9.0x0.0
0x23c2b4…23c448 [0x0f]: C0x00b9.0x1.0
0x23c2b4…23c448 ]
0x23c2b4…23c448 }
0x23c448…23c5dc Dummy {f00=0x00b5, f01=0x018e, f02=» 2 P IDENT DRDC17 REL 9.1 78-09-15 870103140820 P : & P ODD BUFFER ADDRESSES AND CREDIT B P REL 8.1 78-04-21 l < P******************************************************* P* B P* PHILIPS ELECTRONIC INDUSTRIES - TERMINAL DIVISION.
0x23c5dc…23c770 Dummy {f00=0x00b5, f01=0x0190, f02=» ^ P* P* P* P* & P* 0 < P******************************************************* : P* z $ P* STANDARD USE OF REGISTERS : P* P* A1 WORK REGISTER " P* A2 I/O AND WORK REGISTER P* A3 WORK R
0x23c770…23c904 Dummy {f00=0x00b5, f01=0x0190, f02=»* A8 ECB ADDRESS P* < P******************************************************* & P EJECT f P* t < P******************************************************* ~ P* P* ENTRY POINTS P* < P********************************
0x23c904…23ca98 Dummy {f00=0x00b5, f01=0x0190, f02=»PUT x P ENTRY IH1702 OUTPUT P ENTRY IH1703 LINE 02 INPUT 0 P ENTRY IH1704 OUTPUT T P ENTRY IH1705 LINE 03 INPUT x P ENTRY IH1706 OUTPUT P ENTRY IH1707 LINE 04 INPUT P ENTRY IH1708 OUTPUT P
0x23ca98…23cc2c Dummy {f00=0x00b5, f01=0x0190, f02=» DW1704 LINE 04 DWT P* P EJECT & P* 4 < P******************************************************* > P* ~ P* EXTERNAL REFERENCES P* < P******************************************************* P* " P EXTRN TDISP D
0x23cc2c…23cdc0 Dummy {f00=0x00b5, f01=0x0190, f02=» l P EXTRN DWTST DWT STATUS " P EXTRN DWTECB DWT ECB ADDRESS ( P EXTRN DWTOR DWT ORDER N $ P EXTRN ECBBA ECB BUFFER ADDRESS l & P EXTRN ECBRL ECB REQUESTED LENGTH & P EXTRN ECBEL ECB EFFECTIVE LENGTH P EXTRN ECBRC ECB RETURN CODE
0x23cdc0…23cf54 (1, 571) Dummy {f00=0x00b5, f01=0x0190, f02=»IC f P EXTRN INTSAV $ P EXTRN ILLINT ILLEGAL INTERRUPT P EJECT H P* V P* ` . P* PARAMETERS FOR CONDITIONALLY ASSEMBLY j P* P* PX:A EQU 1 <=4 0 PNLINE EQU X:A NUMBER OF COMMUNICATION LINES P PX:B EQ
0x23cf54…23d0e8 Dummy {f00=0x00b5, f01=0x0190, f02=»II CODE x & P IF = 1. EBCDIC CODE (BSC ONLY) PX:D EQU 0 : : PTRANSP EQU X:D IF = 1. EBCDIC TRANSPARANCY (BSC ONLY) L P PX:E EQU 10 . PTBID EQU X:E BID TIME OUT VALUE (X100 MS) P PX:F EQU 500 4 PLOGG EQU X:F IF NOT ZE
0x23d0e8…23d27c Dummy {f00=0x00b5, f01=0x018e, f02=» INPUT DEV. ADDR. LINE 01 PX:H EQU /22 " , PDAMI02 EQU X:H INPUT DEV. ADDR. LINE 02 6 PX:I EQU /04 f , PDAMI03 EQU X:I INPUT DEV. ADDR. LINE 03 z PX:J EQU /05 , PDAMI04 EQU X:J INPUT DEV. ADDR. LINE 04 4 PDAMU01 EQU DAMI01+/10 OUTP
0x23d27c…23d410 Dummy {f00=0x00b5, f01=0x0190, f02=» ^ 4 PDAMU04 EQU DAMI04+/10 OUTPUT DEV. ADDR. LINE 04 P EJECT @ P* N < P******************************************************* X P* P* SYSTEM PARAMETERS P* < P******************************************************* P
0x23d410…23d5a4 Dummy {f00=0x00b5, f01=0x018e, f02=»TIMACK EQU 30 ACK TIMER: 3 S " PTIMWAC EQU 20 WACK TIMER: 2 S $ $ PTIMCON EQU 20 CONNECT TIMER: 2 S J $ PTIMWRT EQU 200 WRITE TIMER: 20 S r P* P* ( PENQCNT EQU 3 COUNT OUT AFTER 3 ENQ:S , PWACCNT EQU 15 COUNT OUT AFTER 15 WACK:S 0
0x23d5a4…23d738 Dummy {f00=0x00b5, f01=0x0190, f02=» P* DEVICE WORK AREA EQUATES P* & < P******************************************************* 0 P* p P EJECT z P* < P******************************************************* P* P* DWT STATUS WORD CONTENTS P* < P
0x23d738…23d8cc Dummy {f00=0x00b5, f01=0x0190, f02=» 1 = DEVICE NOT BUSY ~ 0 P* BIT #15 : 0 MODEM NOT CONNECTED * P* : 1 MODEM CONNECTED R P* P EJECT < P******************************************************* P* $ P* LINE CONTROL CHARACTER EQUATES
0x23d8cc…23da60 Dummy {f00=0x00b5, f01=0x0190, f02=»INK ESCAPE ~ PSTX EQU /02 START OF TEXT PETX EQU /03 END OF TEXT 4 P IFT CODE=0 T PSYN EQU /16 h PEOT EQU /04 | PENQ EQU /05 * PETB EQU /17 END OF TRANSMISSION BLOCK ( PNAK EQU /15 NEGATIVE ACKNOWLEDGEMENT ( PRVI EQU /3
0x23da60…23dbf4 (1, 572) Dummy {f00=0x00b6, f01=0x0190, f02=» P IFT CODE=0 P IFT BSC=1 * PWACK EQU /3B SEC CHAR IN WACK SEQUENCE * P XIF X P IFT CODE=0 d P IFT BSC=0 x * PWACK EQU /BF SEC CHAR IN WABT SEQUENCE P SIEMENS MSV2 PROCEDURE P XIF ( P IFT CODE=1 EBCDIC CHARACTER EQUAT
0x23dbf4…23dd88 Dummy {f00=0x00b6, f01=0x0190, f02=»U /7C PACK0 EQU /70 PEXCACK EQU /11 " P XIF 8 P EJECT D P* R < P******************************************************* < P******************************************************* P* P* & P* D R I V E R A C T I V
0x23dd88…23df1c Dummy {f00=0x00b6, f01=0x0190, f02=»********************* n P* P* ( $ PDRMAD DATA DRMACT DWT REFERENCE 2 P* Z P* d PDRMACT EQU * n ( P LDK A5,DWTSTB SET UP A5 STACK BASE $ P ADR A5,A6 IN CASE OF I/O START , P LD A1,DWTST,A6 GET CURRENT LINE STATUS P S
0x23df1c…23e0b0 Dummy {f00=0x00b6, f01=0x0190, f02=»ORDER= RANDOM READ ) x P SUK A7,/22-/0A P RF(Z) SRVI SEND RVI 4 P SUK A7,/31-/22 P P RF(Z) ACCALL ACCEPT CALL h P SUK A7,/37-/31 P ABL(Z) CONNCT CONNECT MODEM P SUK A7,/38-/37 " P ABL(Z) DISCON DISCONNECT LINE P ABL
0x23e0b0…23e244 Dummy {f00=0x00b6, f01=0x0190, f02=»CHECK STATUS " P RF(NZ) RD400 MODEM CONNECTED PRD100 EQU * : , P LDK A1,1 RC BIT 15: MODEM NOT OPERABLE N PRD200 EQU * ~ $ P CF A15,TENDIO COMPLETE REQUEST PRD300 EQU * P ABL TDISP GO TO DISPATCHER P EJECT P*
0x23e244…23e3d8 Dummy {f00=0x00b6, f01=0x0190, f02=»UPERVISION v P ST A1,RD410 P LDR A1,A6 DWT ADDRESS & & P CF A15,SETIME START REQUEST TIMER D " P DATA RD500 TIME OUT SEQUENCE n PRD410 DATA 0 TIMER VALUE ( P ST A4,DWTRTI,A6 STORE TIMER POINTER PRD420 EQU * ( P LD A1,DWTXST,A6 GET
0x23e3d8…23e56c Dummy {f00=0x00b6, f01=0x0190, f02=»00 NOT IN WACK DELAY - WAIT FOR ENQ OR EOT ( P CF A15,CLPTIM STOP PROCEDURE TIMER 2 , P CM DWTACK,A6 RESET WACK DELAY INDICATOR ^ P CF A5,TRACK SEND ACK 0/1 P ABL BMM CONTINUE RECEPTION P EJECT P* P* P* READ REQUEST TIM
0x23e56c…23e700 Dummy {f00=0x00b6, f01=0x018e, f02=»200 COMPLETE READ REQUEST P EJECT " P* 0 P* : P* ORDER 06: WRITE D P* ^ : P* IF CONTROL CHARACTER = 0 NOT, TEXT IS ENDED BY ETB h : P* IF CONTROL CHARACTER = 0 , TEXT IS ENDED BY ETX P* PWR EQU * P ANK A1,1
0x23e700…23e894 (1, 573) Dummy {f00=0x00b6, f01=0x018e, f02=» p P SUK A1,1 P RF(Z) WR100 TRANSMIT MODE 4 P LDK A1,/10 RECEIVE MODE: SEQUENCE ERROR BIT 11 < P RB RD200 COMPLETE REQUEST t P* P* P* SEND BID SEQUENCE P* P* PBID LDK A1,1 , P ST A1,DWTXST,A6 INDICATE
0x23e894…23ea28 Dummy {f00=0x00b6, f01=0x0190, f02=» , P ST A1,DWTRSN,A6 INDICATE ACK 0 EXPECTED P ABL TRENQB SEND ENQ TO BID 8 P EJECT P* j P* t P* START WRITE IF POSSIBLE ~ P* P* , PWR100 LD A1,DWTACK,A6 GET RESPONSE STATE P SUK A1,2 & P RB(NZ) RD300 NOT
0x23ea28…23ebbc Dummy {f00=0x00b6, f01=0x0190, f02=»CK COUNTER z ( P CF A15,CLPTIM STOP PROCEDURE TIMER P LDK A1,EXCACK > * P XRS A1,DWTRSN,A6 CHANGE EXPECTED ACK T P ABL TRTEXT SEND TEXT P* P* P EJECT P* P* P* ORDER /22: SEND RVI P* 4 P* RVI IS
0x23ebbc…23ed50 Dummy {f00=0x00b6, f01=0x0190, f02=»ECK STATUS $ P RB(Z) RD100 MODEM NOT CONNECTED $ P LD A1,ECBCW,A8 GET CONTROL WORD : * P RF(Z) RVI120 NO TIME OUT SUPERVISION b P ST A1,RVI100 P LDR A1,A6 DWT ADDRESS & P CF A15,SETIME START REQUEST TIMER P DATA RVI400 PRVI100
0x23ed50…23eee4 Dummy {f00=0x00b6, f01=0x0190, f02=» 0 P RF(Z) RVI200 RECEIVE MODE. ETX NOT RECEIVED & P LDK A1,/10 SEQUENCE ERROR. BIT 11 8 P RB RD200 COMPLETE REQUEST b 4 PRVI200 LD A1,DWTACK,A6 GET WACK DELAY INDICATOR 8 P RB(Z) RD300 NOT IN WACK DELAY - WAIT FOR ENQ OR EOT ( P CF A15,CLPTIM S
0x23eee4…23f078 Dummy {f00=0x00b6, f01=0x0190, f02=»UEST TIMER x " P LDK A1,0 SET RVI SENT. RC= 0 $ P CF A15,TENDIO COMPLETE REQUEST 8 P ABL BMM CONTINUE RECEPTION ` P* P* TIME OUT P* 4 PRVI400 LDR A6,A1 RVI REQUEST TIME OUT,RESTORE A6 " P LDK A1,/40 TIME OUT, RC BIT 9
0x23f078…23f20c Dummy {f00=0x00b6, f01=0x0190, f02=»NK A1,1 , P LDK A1,/10 RC BIT 11 FOR SEQUENCE ERROR * P RB(NZ) RD200 MODEM ALREADY CONNECTED @ $ P LD A1,ECBCW,A8 GET CONTROL WORD n * P RF(Z) ACC110 NO TIME OUT SUPERVISION P ST A1,ACC100 TIMER VALUE P LDR A1,A6 PASS DWT ADDRESS &
0x23f20c…23f3a0 Dummy {f00=0x00b6, f01=0x0190, f02=»E TIMER POINTER | PACC110 INH P LDK A2,0 * 8 P EX DWTCSI,A6 START CHLC TO ACCEPT CALLING INDICATOR < , P ABL(A) RD300 ACCEPTED: GO TO DISPATCHER x " P CF A15,CLRTIM STOP REQ TIMER 0 PACCNOP ABL RD100 COMPL REQ WITH NOT OPERABLE P*
0x23f3a0…23f534 (1, 574) Dummy {f00=0x00b6, f01=0x0190, f02=»,HALTIN STOP CHLC , P LDK A1,/40 INDICATE TIME OUT, RC BIT 9 P ABL RD200 COMPLETE REQUEST J P EJECT n P* | P* P* CONNECT MODEM TO LINE P* P* PCONNCT EQU * P LDR A1,A6 P CF A15,SETIME START TIMER
0x23f534…23f6c8 Dummy {f00=0x00b6, f01=0x0190, f02=»CIO START CONNECT MODEM P RF(A) CON010 P CF A15,CLPTIM 6 P RB ACCNOP L 4 PCON010 CF A5,HALTIN STOP RECEIVER, NO INTERRUPTS ^ P ABL RD300 GO TO DISPATCHER PCON100 LDR A6,A1 TIME OUT & P LDK A5,DWTSTB LOAD A5 STACK BASE P A
0x23f6c8…23f85c Dummy {f00=0x00b6, f01=0x0190, f02=»TED v P RF CON120 COMPLETE REQUEST PCON110 LDK A1,1 0 . P ORS A1,DWTST,A6 INDICATE CONNECTED IN DWT H P CM DWTXST,A6 CONTROL MODE z P LDK A1,0 RETURN CODE = 0 PCON120 EQU * P ABL RD200 COMPLETE REQUEST P EJECT P*
0x23f85c…23f9f0 Dummy {f00=0x00b6, f01=0x0190, f02=» v P ABL RD200 COMPLETE REQUEST ! P* ! , P* ! 6 P* DISCONNECT SEQUENCE ! @ P* ! ^ P* ! h PDIS100 CF A5,HALTIN ! r P LDK A2,0 ! & P EX DWTCSI,A6 CIO START DISCONNECT ! P EX DWTCHI,A6 HALT CHLC ! P EX DWTSSI,A6 SST ! P LDK
0x23f9f0…23fb84 Dummy {f00=0x00b6, f01=0x0190, f02=»*********************************************** ! < P******************************************************* " 8 P* " x P* " * P* R E C O V E R Y A T P O W E R O N " P* " P* " < P******************************************************* "
0x23fb84…23fd18 Dummy {f00=0x00b6, f01=0x0190, f02=»INDEX " PDRM100 ADK A2,2 # P CW A2,DCTAB # & & P RF(E) DRM150 ALL LINES PROCESSED # : $ P LD A6,DCTAB,A2 GET DWT ADDRESS # d ( P CM DWTXST,A6 INDICATE CONTROL STATE # 2 P CF A15,CLPTIM STOP PROCEDURE TIMER IF RUNNING # PDRM110 LDKL A1,/FFFE # *
0x23fd18…23feac Dummy {f00=0x00b6, f01=0x0190, f02=»R IF RUNNING # p 2 P LDK A1,1 RETURN CODE BIT 15: MODEM NOT READY $ $ P CF A15,TENDIO COMPLETE REQUEST $ J P RB DRM100 NEXT LINE $ r PDRM150 RTN A15 $ P EJECT $ P* $ < P******************************************************* $ < P************
0x23feac…240040 Dummy {f00=0x00b6, f01=0x0190, f02=» $ < P******************************************************* % < P******************************************************* % H P* % < P******************************************************* % P* % P* BMM : BASIC MASTER MODE % P* % < P
0x240040…2401d4 (1, 575) Dummy {f00=0x00b6, f01=0x0190, f02=»CK BASE % z $ P CF A5,HALTIN HALT INPUT IF ANY & < P LDKL A2,/100+SYN SPECIFY SYN PATTERN AND CONNECT MODEM & 8 P EX DWTCSI,A6 START RECEIVER & x PBMM100 EQU * & P CF A5,READP READ CHAR & P RF(NZ) BMM910 PARITY ERROR & ( P LD A1,DWTXST,A6 GET O
0x2401d4…240368 Dummy {f00=0x00b6, f01=0x0190, f02=»JECT & P* ' P* CONTROL STATE ' P* ' . P CWK A2,ENQ ' 8 P RF(NE) BMM900 NOT ENQ ' L , PBMM150 LD A1,DWTST,A6 GET REQUEST STATUS ' j P RB(N) BMM NO REQUEST ' P LD A1,DWTOR,A6 GET ORDER ' P SUK A1,2 ' P RB(P) BMM NO READ REQUEST '
0x240368…2404fc Dummy {f00=0x00b6, f01=0x0190, f02=» ACK0 ' ~ P RB BMM RECEIVE TEXT ( P EJECT ( * P* ( 8 P* CHARACTER NOT RECOGNIZED ( B P* ( d PBMM900 CWK A2,EOT ( n P RF(NE) BMM910 NOT EOT ( . P CM DWTXST,A6 EOT: RESET TO CONTROL STATE ( ( P CF A15,CLPTIM STOP PROCEDURE TIMER ( * P LDK
0x2404fc…240690 Dummy {f00=0x00b6, f01=0x0190, f02=» RESYNCHRONIZE ON /FF ( P RB BMM100 READ NEXT CHAR ) P EJECT ) @ P* ) N P* ) X $ P* TRANSMIT MODE, RECEPTION PART ) b P* ) P* ) PTRANSM EQU * ) ( P LD A1,DWTACK,A6 GET TRANSMIT STATUS ) " P ABI TRFUNC,A1 SELECT FUNCTION ) P* )
0x240690…240824 Dummy {f00=0x00b6, f01=0x0190, f02=»100 6: BID SEQUENCE ) 8 P DATA TR200 8: ACK EXPECTED AFTER TRANSMIT TIME OUT * P EJECT * X P* * f P* * p P* BID SEQUENCE * z P* * P* * PTR100 EQU * * P CWK A2,ENQ * P RF(E) TR140 ENQ RECEIVED * P CWK A2,DLE * " P RB(NE
0x240824…2409b8 Dummy {f00=0x00b6, f01=0x0190, f02=»120 NOT PROPER ACK * 0 P CF A15,CLPTIM ACK 0 : STOP PROCEDURE TIMER + " P ABL WR110 START TRANSMISSION + N P* NOT ACK RECEIVED + t PTR120 CWK A2,WACK + P RB(NE) BMM900 NOT WACK + ( P CF A15,CLPTIM STOP PROCEDURE TIMER + P ABL TRENQB BID AG
0x2409b8…240b4c Dummy {f00=0x00b6, f01=0x0190, f02=» ACCEPTED + P EJECT , P* , P* , * " P* TRANSMIT MODE: ACK EXPECTED , 4 P* , Z P* , d PTR200 CWK A2,DLE , n P RF(E) TR250 DLE RECEIVED , P CWK A2,NAK , . P RB(NE) BMM900 NOT ACK, WACK , RVI OR NAK , , P CF A15,CLPTIM NAK: STOP P
0x240b4c…240ce0 Dummy {f00=0x00b6, f01=0x018e, f02=»REOT SEND EOT , ( P CM DWTXST,A6 INDICATE CONTROL STATE - P LDR A1,A4 RETURN CODE - B $ P CF A15,TENDIO COMPLETE REQUEST - ` P ABL TDISP GO TO DISPATCHER - P* DLE RECEIVED - PTR250 CF A5,READP - P RB(NZ) BMM910 PARITY ERROR - P CW A2
0x240ce0…240e74 (1, 576) Dummy {f00=0x00b7, f01=0x0190, f02=» $ P LD A8,DWTECB,A6 GET ECB ADDRESS . & P LD A1,ECBBA,A8 GET BUFFER ADDRESS . , & P LC A1,1,A1 GET CONTROL CHARACTER . V P ANK A1,/FF . 8 P RB(Z) TR220 ETX SENT: SEND EOT AND COMPLETE REQUEST . P LDK A1,0 PROPER ACK . 2 P CF A15,TENDIO COMPLETE WRIT
0x240e74…241008 Dummy {f00=0x00b7, f01=0x0190, f02=» DATA TRTTD,TIMTTD . ( P ST A4,DWTPTI,A6 SAVE TIMER POINTER / P LDK A1,2 / F * P ST A1,DWTACK,A6 INDICATE TTD SEQUENCE / X P ABL TDISP GO TO DISPATCHER / P* NOT ACK RECEIVED / PTR280 CWK A2,RVI / P RF(E) TR320 RVI RECEIVED / P CWK A2,
0x241008…24119c Dummy {f00=0x00b7, f01=0x0190, f02=»BMM900 NO ACK AT ALL / PTR290 EQU * 0 ( P CF A15,CLPTIM STOP PROCEDURE TIMER 0 0 2 P LD A1,DWTACK,A6 ACK AFTER TRANSMIT TIME OUT? 0 , P RF(Z) TR295 NO, IMPROPER ACK - SEND ENQ 0 $ P ABL TRTEXT YES, RETRANSMIT TEXT 0 PTR295 EQU * 0 & P ABL TRENQ
0x24119c…241330 Dummy {f00=0x00b7, f01=0x0190, f02=»D 0 p 4 P CF A15,TENDIO COMPLETE WRITE REQUEST, RC BIT 10 1 P RB TR255 GO TO TTD SEQUENCE 1 B P* WACK RECEIVED 1 f , PTR340 CF A15,CLPTIM STOP PROCEDURE TIMER 1 P LDK A4,0 RETURN CODE 1 $ P LD A8,DWTECB,A6 GET ECB ADDRESS 1 & P LD A1,ECBBA,A8 GE
0x241330…2414c4 Dummy {f00=0x00b7, f01=0x0190, f02=»ST 1 ^ P LDK A1,0 WACK RECEIVED: OK 2 , P CF A15,TENDIO COMPLETE REQUEST, RC = 0 2 . P LDK A1,4 2 ^ , P ST A1,DWTACK,A6 INDICATE WACK SEQUENCE 2 p P ABL TRENQ SEND ENQ 2 P EJECT 2 P* 2 P* 2 P* TTD SEQUENCE 2 P* 2 P* 2 P
0x2414c4…241658 Dummy {f00=0x00b7, f01=0x0190, f02=» LD A1,DWTST,A6 CHECK IF WRITE REQUEST 2 P RB(N) TR260 NO REQUEST 3 . P LD A1,DWTOR,A6 GET ORDER 3 N P SUK A1,6 3 p P ABL(Z) WR110 WRITE REQUEST 3 P RB TR260 NO WRITE REQUEST 3 P EJECT 3 P* 3 P* 3 P* WACK SEQUENCE 3 P* 3
0x241658…2417ec Dummy {f00=0x00b7, f01=0x018e, f02=»MM910 PARITY ERROR 3 P CWK A2,WACK 4 P RF(NE) TR440 NOT WACK 4 . . P CF A15,CLPTIM WACK: STOP PROCEDURE TIMER 4 L P IM DWTWAC,A6 COUNT WACK:S 4 ~ P LD A1,DWTWAC,A6 4 P CWK A1,WACCNT 4 ( P RB(L) TR290 NOT COUNT OUT: SEND ENQ 4 ( P LDKL A4,/0800
0x2417ec…241980 Dummy {f00=0x00b7, f01=0x0190, f02=» 4 t , P CF A15,CLPTIM EXPECTED ACK: STOP TIMER 5 P LDK A1,2 5 8 2 P ST A1,DWTACK,A6 INDICATE NOW IN TTD SEQUENCE 5 J * P RB TR410 CHECK IF WRITE IS TO BE DONE 5 P EJECT 5 P* 5 P* 5 P* RECEIVE MODE 5 P* 5 P* 5 PRECEIV EQU * 5
0x241980…241b14 (1, 577) Dummy {f00=0x00b7, f01=0x0190, f02=»900 NOT DLE 5 P CF A5,READP READ CHAR 6 P XIF 6 2 P CWK A2,STX 6 > P ABL(NE) BMM900 NOT STX 6 R P LDK A7,0 STX: RESET BCC 6 r P LDK A3,0 6 $ P LD A8,DWTECB,A6 GET ECB ADDRESS 6 & P LD A4,ECBBA,A8 GET BUFFER ADDRESS 6 PREC100 CF A5,READP
0x241b14…241ca8 Dummy {f00=0x00b7, f01=0x0190, f02=» CF A5,READP READ CONTROL CHAR. - DLE PRECEEDING 6 P XIF 7 8 P CWK A2,SYN 7 D P RB(E) REC100 DELETE SYN 7 X P CWK A2,ENQ 7 x ( P RF(E) REC220 TTD RECEIVED: SEND NAK 7 P IFT TRANSP=1 7 P CWK A2,DLE 7 $ P RF(E) REC120 2:ND DLE RECEIVED 7
0x241ca8…241e3c Dummy {f00=0x00b7, f01=0x0190, f02=»EC250 NO READ REQUEST 7 P IFT CODE=0 8 P XRR A7,A2 ACCUMULATE BCC 8 2 P XIF 8 T P IFT CODE=1 8 ` P CF A5,CRCCAL ACCUMULATE CRC 8 t P XIF 8 P CWK A2,ETB 8 P RF(E) REC150 ETB RECEIVED 8 P CWK A2,ETX 8 P RF(E) REC160 ETX RECEIVED
0x241e3c…241fd0 Dummy {f00=0x00b7, f01=0x0190, f02=»REQUEST 8 z P CF A5,CRCCAL ACCUMULATE CRC 9 P XIF 9 4 P CW A3,ECBRL,A8 CHECK LENGTH 9 @ " P RF(NL) REC250 BUFFER OVERFLOW 9 d P IFT CODE=1 9 2 P LC A2,TASCII,A2 CONVERT FROM EBCDIC TO ASCII 9 P XIF 9 $ P SCR A2,A4 STORE CHAR IN BUFFER 9 P
0x241fd0…242164 Dummy {f00=0x00b7, f01=0x0190, f02=»ET RC FOR ETB, RC BIT 7 9 x P LDK A1,2 : ( P ST A1,DWTXST,A6 RESET RECEIVE MODE : 2 P RF REC170 : ^ P* ETX RECEIVED : p 6 PREC160 LDK A4,0 PRESET RETURN CODE FOR ETX, RC = 0 : P LDK A1,3 : 4 P ST A1,DWTXST,A6 SET RECEIVE MODE. ETX RECEIVED :
0x242164…2422f8 Dummy {f00=0x00b7, f01=0x0190, f02=»/7F MASK PARITY BIT : P XIF ; P IFT CODE=1 ; ( $ P CF A5,RDCRC READ AND CHECK CRC ; < P XIF ; d P RF(NZ) REC220 BCC ERROR ; p * P ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH ; 0 P CF A15,CLRTIM STOP REQUEST TIMER IF RUNNING ; P LDR A1,A4 STORE RETUR
0x2422f8…24248c Dummy {f00=0x00b7, f01=0x0190, f02=»QU * ; P LDR A4,A4 < 0 P RF(Z) REC410 ETX RECEIVED: SEND ALWAYS ACK < P CF A5,HALTIN STOP RECEIVER < R P LDR A1,A6 DWT ADDRESS < v $ P CF A15,SETIME START WACK TIMER < P DATA REC500,TIMWAC < ( P ST A4,DWTPTI,A6 SAVE TIMER POINTER < P LDK
0x24248c…242620 Dummy {f00=0x00b7, f01=0x0190, f02=»IVED < l P RB(NZ) REC200 PARITY ERROR = P IFT TRANSP=1 = 0 P CWK A2,DLE = F P RB(NE) REC200 NOT DLE = Z P CF A5,READ = x P XIF = P CWK A2,ETB = P RF(E) REC210 ETB RECEIVED = P CWK A2,ETX = P RB(NE) REC200 NOT ETB/ETX = PREC2
0x242620…2427b4 (1, 578) Dummy {f00=0x00b7, f01=0x0190, f02=» RB(NZ) REC250 PARITY ERROR = P IFT TRANSP=1 > $ P CWK A2,DLE > : P RB(NE) REC250 NOT DLE > N P CF A5,READ > l P XIF > P CWK A2,ETB > P RF(E) REC260 ETB RECEIVED > P CWK A2,ETX > P RB(NE) REC250 NOT ETB/ETX > PREC260 CF A5,REA
0x2427b4…242948 Dummy {f00=0x00b7, f01=0x018e, f02=»* ENQ RECEIVED: REPEAT LAST ACKNOWLEDGMENT > P* ? 2 P* ? < , PREC400 LD A1,DWTLRS,A6 GET LAST RESPONSE ? F P CWK A1,NAK ? v P RB(E) REC220 NAK SENT ? P CWK A1,RVI ? P RF(E) REC420 RVI SENT ? P CWK A1,WACK ? * P RF(NE) REC410 WACK NOT SE
0x242948…242adc Dummy {f00=0x00b7, f01=0x0190, f02=» P RF(Z) REC410 READ REQUEST @ P SUK A1,/22-/02 @ & 0 P ABL(Z) RVI300 SEND RVI AND COMPLETE REQUEST @ > P RB REC190 @ r PREC410 EQU * @ P CF A5,TRACK SEND ACK 0/1 @ " P ABL BMM WAIT FOR NEXT MESSAGE @ PREC420 EQU * @ P CF A5,TRRVI SEND RV
0x242adc…242c70 Dummy {f00=0x00b7, f01=0x0190, f02=» P* A PREC500 EQU * A " P LDR A6,A1 RESTORE DWT ADDRESS A " & P LDK A5,DWTSTB LOAD A5 STACK BASE A H P ADR A5,A6 A r , P CM DWTACK,A6 RESET WACK DELAY INDICATOR A P CF A5,TRWACK SEND WACK A P ABL BMM WAIT FOR ENQ A P EJECT A P* A
0x242c70…242e04 Dummy {f00=0x00b7, f01=0x0190, f02=»RTR,A6 A P CWK A1,RTRCNT B & P ABL(G) TR210 COUNT OUT, SEND EOT B $ 0 P CF A5,WRSYN START TRANSMITTER AND SEND SYN B N P IFT TRANSP=1 B P LDK A2,DLE B P CF A5,WRBCCN SEND ONE DLE B P XIF B P LDK A2,STX B P CF A5,WRITEP SEND STX B
0x242e04…242f98 Dummy {f00=0x00b7, f01=0x0190, f02=»ADDRESS B t ( P ADK A4,2 SKIP FIRST WORD IN BUFFER C ( P LD A3,ECBRL,A8 GET REQUESTED LENGTH C < P SUK A3,1 SKIP FIRST BYTE C h PTRT100 EQU * C P SUK A3,1 DECREMENT LENGTH C " P RF(NP) TRT120 ALL TRANSMITTED C $ P LCR A2,A4 GET CHAR FROM BUFFER C
0x242f98…24312c Dummy {f00=0x00b7, f01=0x0190, f02=» TEXT C x P CWK A2,SYN D ( P RF(NL) TRT105 REPLACE SYN BY SPACE D " P CWK A2,/07 CHECK CODE D N , P RF(NL) TRT110 CODE /07 OR GREATER IS OK D l PTRT105 EQU * D . P LDK A2,/20 REPLACE INVALID CODE BY SPACE D P XIF D PTRT110 EQU * D P IFT C
0x24312c…2432c0 Dummy {f00=0x00b7, f01=0x0190, f02=» NOT DLE D , P CF A5,WRBCCN INSERT ONE DLE. NO CRC-CAL E P LDK A2,DLE E @ P XIF E T PTRT115 EQU * E ` P CF A5,WRITEP SEND CHAR E t P RB TRT100 NEXT CHAR E PTRT120 EQU * E P IFT TRANSP=1 E P LDK A2,DLE E * P CF A5,WRBCCN SEND ONE DLE
0x2432c0…243454 (1, 579) Dummy {f00=0x00b7, f01=0x0190, f02=»L CHARACTER E z P LDK A2,ETX F P ANK A1,/FF F ( P RF(Z) TRT130 WRITE LAST F < P LDK A2,ETB F $ PTRT130 CF A5,WRITEP SEND ETB/ETX F p P IFT CODE=1 F P LDR A3,A7 SAVE CRC F P LDR A2,A7 F P ANK A2,/FF F ( P CF A5,WRITE SEND 1ST CRC
0x243454…2435e8 Dummy {f00=0x00b7, f01=0x018e, f02=»RMINATE OUTPUT F P LDR A1,A6 DWT ADDRESS G " P CF A15,SETIME START ACK TIMER G 4 P DATA TRT200,TIMACK G Z ( P ST A4,DWTPTI,A6 SAVE TIMER POINTER G v ( P CM DWTACK,A6 INDICATE ACK EXPECTED G P ABL BMM G P EJECT G P* G P* G $ P* TIME O
0x2435e8…24377c Dummy {f00=0x00b7, f01=0x018e, f02=» P ADR A5,A6 H P LDK A1,8 H 0 P ST A1,DWTACK,A6 INDICATE TRANSMIT TIME OUT H ( P ABL TRENQ SEND ENQ H P EJECT H x P* H P* H P* SEND ENQ IN BID SEQUENCE H P* H P* H PTRENQB CF A5,WRENQ SEND ENQ H P LDR A1,A6 DWT ADDRE
0x24377c…243910 Dummy {f00=0x00b7, f01=0x0190, f02=» H P* I P* I P* BID TIME OUT I P* I 2 P* I < ( PTRE200 LDR A6,A1 RESTORE DWT ADDRESS I F & P LDK A5,DWTSTB LOAD A5 STACK BASE I r P ADR A5,A6 I P LD A1,DWTENQ,A6 I P CWK A1,ENQCNT I * P RB(L) TRENQB NOT COUNT OUT: BID AGAIN I
0x243910…243aa4 Dummy {f00=0x00b7, f01=0x0190, f02=»DURE ENQ I P* J P* J PTRENQ EQU * J $ $ P LD A1,DWTENQ,A6 GET ENQ COUNTER J 8 P CWK A1,ENQCNT J ` * P RB(G) TRE210 ENQ COUNT OUT: SEND EOT J v P CF A5,WRENQ SEND ENQ J P LDR A1,A6 DWT ADDRESS J P CF A15,SETIME START TIMER J P DATA
0x243aa4…243c38 Dummy {f00=0x00b7, f01=0x0190, f02=»TORE DWT ADDRESS J | & P LDK A5,DWTSTB LOAD A5 STACK BASE K P ADR A5,A6 K B P RB TRENQ SEND ENQ AGAIN K T P* K t P* K ~ P EJECT K P* K P* K P* TRANSMIT TTD K P* K P* K PTRTTD EQU * K " P LDR A6,A1 RESTORE DWT ADDRESS K
0x243c38…243dcc Dummy {f00=0x00b7, f01=0x0190, f02=» K 0 P CF A5,WRSYN START TRANSMITTER AND SEND SYN L P IFT TRANSP=1 L < P LDK A2,DLE L R P CF A5,WRBCCN SEND ONE DLE L f P XIF L P LDK A2,STX L P CF A5,WRITEP SEND STX L P IFT TRANSP=1 L P LDK A2,DLE L P CF A5,WRBCCN SEND ONE D
0x243dcc…243f60 Dummy {f00=0x00b7, f01=0x0190, f02=» L | ( P ST A4,DWTPTI,A6 SAVE TIMER POINTER M P ABL BMM M 4 P* M D P* M N " P* NO RESPONSE ON TTD SEQUENCE M X P* M ~ P* M ( PTRT500 LDR A6,A1 RESTORE DWT ADDRESS M & P LDK A5,DWTSTBOAD A5 STACK BASE M P ADR A5,A6 M . P ABL TR410 CHE
0x243f60…2440f4 (1, 580) Dummy {f00=0x00b8, f01=0x0190, f02=»ND SYN M P* N P* N PWRSYN EQU * N " * P CF A5,HALTIN HALT RECEIVER IF ACTIVE N 6 $ P EX DWTCSU,A6 START TRANSMITTER N d P LDR A1,A6 DWT ADDRESS N P STR A4,A15 SAVE A4 ON STACK N . P CF A15,SETIME START MODEM TRANSMIT TIMER N P DATA WR
0x2440f4…244288 Dummy {f00=0x00b8, f01=0x018e, f02=» P LDK A2,SYN O P CF A5,WRITE SEND SYN O P LDK A2,SYN O 6 P CF A5,WRITE SEND SYN O J P LDK A2,SYN O h P CF A5,WRITE SEND SYN O | P RTN A5 O P EJECT O P* O P* O P* WROUT: TRANSMIT TIME OUT O P* = MODEM ERROR O
0x244288…24441c Dummy {f00=0x00b8, f01=0x0190, f02=» O ( P CF A15,CLPTIM STOP PROCEDURE TIMER P " P EX DWTCHU,A6 HALT TRANSMITTER P 4 P EX DWTSSU,A6 P Z 4 P ABL SST150 COMPLETE REQUEST. MODEM NOT OPERABLE P p P EJECT P P* P P* P P* TREOT : SEND SINGLE EOT P P* P P* P PTREOT EQ
0x24441c…2445b0 Dummy {f00=0x00b8, f01=0x0190, f02=»ER P j P CF A5,WRITEP SEND CHARACTER Q P LDK A2,PAD Q . P CF A5,WRITE SEND PAD Q B P LDK A2,PAD Q ` P CF A5,WRITE Q t P EX DWTCHU,A6 HALT OUTPUT Q P EX DWTSSU,A6 SST OUTPUT Q P RTN A5 Q P* Q P* Q P* WRENQ : SEND SINGLE ENQ
0x2445b0…244744 Dummy {f00=0x00b8, f01=0x018e, f02=»Q:S SENT Q z P LDK A2,ENQ R P RB OUTEND R $ P EJECT R 6 P* R D P* R N P* TRNAK : SEND SINGLE NAK R X P* R z P* R PTRNAK EQU * R * P CF A5,WRSYN START OUTPUT AND SEND SYN R P LDK A2,NAK R ( P ST A2,DWTLRS,A6 SAVE LAST RESPONSE
0x244744…2448d8 Dummy {f00=0x00b8, f01=0x018e, f02=» 0 P LD A3,DWTRSN,A6 GET PROPER ACK TO BE SENT S PTRA100 EQU * S 8 * P CF A5,WRSYN START OUTPUT AND SEND SYN S L P LDK A2,DLE S z P CF A5,WRITE SEND DLE S P LDR A2,A3 S ( P ST A2,DWTLRS,A6 SAVE LAST RESPONSE S P RB OUTEND S P* S P*
0x2448d8…244a6c Dummy {f00=0x00b8, f01=0x0190, f02=» P* T P* TRACK0 : SEND ACK 0 T P* T , P* T 6 PTRACK0 LDK A3,ACK0 T @ & P ST A3,DWTRSN,A6 STORE PROPER ACK T Z P RB TRA100 T P* T P* T P* TRRVI : SEND RVI T P* T P* T PTRRVI LDK A3,RVI T P RB TRA100 T P EJECT
0x244a6c…244c00 Dummy {f00=0x00b8, f01=0x0190, f02=»6 SST INPUT T P RTN A5 U P* U $ P* U . & P* CLEAR PROCEDURE TIMER IF RUNNING U 8 P* U b P* U l , PCLPTIM LD A1,DWTPTI,A6 GET TIMER POINTER U v " P RF(Z) CLPRTN NO TIMER RUNNING U P CM* DWTPTI,A6 STOP TIMER U & P CM DWTPTI,A6 CLEAR TIMER
0x244c00…244d94 (1, 581) Dummy {f00=0x00b8, f01=0x018e, f02=»* U , PCLRTIM LD A1,DWTRTI,A6 GET TIMER POINTER V " P RB(Z) CLPRTN NO TIMER RUNNING V : P CM* DWTRTI,A6 STOP TIMER V ` & P CM DWTRTI,A6 CLEAR TIMER POINTER V P RB CLPRTN V P* V P EJECT V P* V P* V , P* CLEAR MODEM TRANSMIT TIMER I
0x244d94…244f28 Dummy {f00=0x00b8, f01=0x0190, f02=» P CM* DWTMTI,A6 STOP TIMER W & P CM DWTMTI,A6 CLEAR TIMER POINTER W & P RB CLPRTN W P P EJECT W b P* W p P* W z $ P* SST SEQUENCE FOR INPUT CHANNEL W P* W P* W PSSTIN EQU * W " P EX DWTSSI,A6 SST INSTRUCTION W P**LOGG W P
0x244f28…2450bc Dummy {f00=0x00b8, f01=0x0190, f02=») BMM MODEM OPERABLE W P ANK A2,/40 X ( P RF(Z) SST150 NOT CALLING INDICATOR X 0 & P LD A1,DWTST,A6 CALLING INDICATOR X P ABL(N) BMM NO REQUEST X P LD A1,DWTOR,A6 GET ORDER X P SUK A1,/31 X ( P ABL(NZ) BMM NOT ACCEPT CALL REQUEST X & P C
0x2450bc…245250 Dummy {f00=0x00b8, f01=0x0190, f02=» NOT OPERABLE X v . P ANS A1,DWTST,A6 RESET MODEM OPERABLE BIT Y & P CF A15,CLRTIM STOP REQUEST TIMER Y H 4 P ABL RD100 COMPLETE REQUEST AND GO TO DISPATCHER Y r P EJECT Y P* Y P* Y 2 P* WRITEP : GENERATE PARITY AND SEND CHARACTER Y P* Y
0x245250…2453e4 Dummy {f00=0x00b8, f01=0x0190, f02=» WRP100 Y P RF(Z) WRP110 Z P XRK A2,/80 Z & P RB WRP100 Z : PWRP110 EQU * Z L P XIF Z ` P RF WRITE Z l P* Z ~ P* Z $ P* WRITE : TRANSMIT ONE CHARACTER Z P* Z P* Z PWRITE EQU * Z P IFT CODE=0 Z P XRR A7,A2 ACCUMUL
0x2453e4…245578 Dummy {f00=0x00b8, f01=0x0190, f02=»M OTR INSTRUCTION Z | P**LOGG [ P IFF LOGG=0 [ ( P RF(NA) WRIT10 [ < ( P CF A5,LOGOUT LOGG OUTPUT CHARACTER [ R P XIF [ ~ PWRIT10 EQU * [ P RF READ SAVE REGISTERS [ P EJECT [ P* [ P* [ . P* READP : READ CHARACTER AND CHECK PARIT
0x245578…24570c Dummy {f00=0x00b8, f01=0x0190, f02=»ODE=0 [ P ECR A3,A2 P LDR A1,A2 PREP10 EQU * 2 P SLL A3,1 F P RF(Z) REP20 X P RB(NN) REP10 l P XRK A1,/80 P RB REP10 PREP20 EQU * P LD A3,DWTSAV,A6 RESTORE A3 P XRK A1,/80 P ANK A2,/7F P
0x24570c…2458a0 Dummy {f00=0x00b8, f01=0x0190, f02=» P ABR* A5 ] P EJECT ] P* ] " & P* READ : SAVE REGISTER A3-A5,A7,A8 ] , P* GO TO DISPATCHER ] V P* ] x PREAD EQU * ] P ST A3,DWTSAV,A6 ] P ST A4,DWTSAV+2,A6 ] P ST A5,DWTSAV+4,A6 ] P ST A7,DWTSAV+6,A6 ] P ST A8,DWTSAV+
0x2458a0…245a34 (1, 582) Dummy {f00=0x00b8, f01=0x0190, f02=» P* A2 = CHARACTER ^ P* A7 = ACCUMULATED CRC ^ P* ^ : P* ^ D PCRCCAL EQU * ^ N P ST A1,CRCSAV ^ b P ST A2,CRCSAV+2 ^ x P ST A3,CRCSAV+4 ^ P LDK A1,8 ^ PCRC100 LDR A3,A7 ^ P SRL A7,1 ^ P XRR A3,A2 ^ P SRL A2,1 ^ P
0x245a34…245bc8 Dummy {f00=0x00b8, f01=0x0190, f02=»,CRCSAV+2 ^ P LD A3,CRCSAV+4 _ P RTN A5 _ * PCRCSAV RES 3 _ : P EJECT _ N P* _ P* _ f P* READ AND CHECK CRC _ p P* _ " P* ON RETURN CR=0 IF CRC IS OK _ P* _ P* _ PRDCRC EQU * _ " P CF A5,READ READ 1ST CRC CHAR _ &
0x245bc8…245d5c Dummy {f00=0x00b8, f01=0x0190, f02=»RC AND SET CR _ ~ P ABR* A5 RETURN ` P XIF ` . P EJECT ` : < P******************************************************* ` H P* ` ( P* INTERRUPT HANDLER , CHLC RECEIVER ` P* ` < P******************************************************* ` P
0x245d5c…245ef0 Dummy {f00=0x00b8, f01=0x0190, f02=» DWT ADDRESS ` | , P INR A2,0,DAMI01 GET CHARACTER FROM LINR a PIHI100 EQU * a D P ABL(NA) SSTIN a X P**LOGG a n P IFF LOGG=0 a | P LD A5,DWTSAV+4,A6 a & P CF A5,LOGIN LOGG INPUT CHARACTER a P XIF a PIHI110 EQU * a P LD A3,DWTSAV,A6 a
0x245ef0…246084 Dummy {f00=0x00b8, f01=0x0190, f02=» a P EJECT b P* b P* b P* b * PIH1703 EQU * b 4 P ST P,INTSAV b H * P CF A15,IHSAV8 SAVE A1-A8 ON A15 STACK b $ P LDKL A6,DW1702 LOAD DWT ADDRESS b , P INR A2,0,DAMI02 GET CHARACTER FROM LINE b P RB IHI100 b P IFF NLINE=2 b P
0x246084…246218 Dummy {f00=0x00b8, f01=0x0190, f02=» DWT ADDRESS b | , P INR A2,0,DAMI03 GET CHARACTER FROM LINE c P RB IHI100 c D P IFF NLINE=3 c V P* c j P* c t P* c ~ PIH1707 EQU * c P ST P,INTSAV c * P CF A15,IHSAV8 SAVE A1-A8 ON A15 STACK c $ P LDKL A6,DW1704 LOAD DWT ADDRESS c , P I
0x246218…2463ac Dummy {f00=0x00b8, f01=0x018e, f02=»********* c b P* d * P* INTERRUPT HANDLER , CHLC TRANSMITTER d P* d J < P******************************************************* d T P* d P* d P* d PIHLCUT EQU * d PIH1702 EQU * d P ST P,INTSAV d * P CF A15,IHSAV8 SAVE A1-A8
0x2463ac…246540 Dummy {f00=0x00b8, f01=0x0190, f02=» P* e P* e PIH1704 EQU * e P ST P,INTSAV e , * P CF A15,IHSAV8 SAVE A1-A8 ON A15 STACK e @ $ P LDKL A6,DW1702 LOAD DWT ADDRESS e n P RB IHI110 LOAD REGISTERS e P IFF NLINE=2 e P* e P* e P* e PIH1706 EQU * e P ST P,INTS
0x246540…2466d4 (1, 583) Dummy {f00=0x00b8, f01=0x0190, f02=»LINE=3 e P* f P* f P* f " PIH1708 EQU * f , P ST P,INTSAV f @ * P CF A15,IHSAV8 SAVE A1-A8 ON A15 STACK f T $ P LDKL A6,DW1704 LOAD DWT ADDRESS f P RB IHI110 LOAD REGISTERS f P XIF f P EJECT f P* f P* ILLEGAL INTERRUPTS f
0x2466d4…246868 Dummy {f00=0x00b8, f01=0x0190, f02=»FF NLINE=2 f PIH1703 EQU * g PIH1704 EQU * g & P XIF g : P ST P,INTSAV g F * P LDK A1,/5 INDICATE ILLEGAL INTERRUPT g Z * P ABL ILLINT ILLEGAL INTERRUPT ROUTINE g < P******************************************************* g P* g , P* SUBROU
0x246868…2469fc Dummy {f00=0x00b8, f01=0x0190, f02=»TR A3,A15 g P STR A4,A15 h P STR A5,A15 h & P STR A6,A15 h : P STR A7,A15 h N P STR A8,A15 h b $ P LD A3,16,A15 GET RETURN ADDRESS h v P ST A1,16,A15 h P ST A2,14,A15 h P ABR A3 h P EJECT h P* h P* h & P* DCTAB: LIN
0x2469fc…246b90 Dummy {f00=0x00b8, f01=0x0190, f02=»LINE=1 h P DATA DW1702 i P IFF NLINE=2 i " P DATA DW1703 i 6 P IFF NLINE=3 i J P DATA DW1704 i ^ P XIF i r PDCTABE EQU * i ~ P EJECT i P* i P* i $ P* DEVICE WORK TABLE FOR LINE 01 i P* i P* i PDW1701 EQU * i P DAT
0x246b90…246d24 Dummy {f00=0x00b8, f01=0x0190, f02=» DATA DRMAD POINTER TO ADDRESS BLOCK i P DATA 0 TTAB ADDRESS j , $ P DATA 0 WAIT/ACTIVATE INDICATOR j H & P DATA 0 TASK QUEUE FOR THIS DEVICE j p PDWTRTI EQU *-DW1701 j " P DATA 0 REQUEST TIMER POINTER j PDWTPTI EQU *-DW1701 j $ P DATA 0 PROCEDUR
0x246d24…246eb8 Dummy {f00=0x00b8, f01=0x0190, f02=»AREA FOR A3-A5,A7,A8 j PDWTXST EQU *-DW1701 k . P DATA 0 PROCEDURE STATUS: 0= CONTROL STATE k 8 . P 1= TRANSMISSION MODE k j ( P 2= RECEIVE MODE k 2 P 3= RECEIVE MODE, ETX REC. k PDWTACK EQU
0x246eb8…24704c Dummy {f00=0x00b8, f01=0x0190, f02=»S) k v ( P 3= TTD SEQ. WAIT FOR NAK (TRANS) l P 4= WACK SEQ. (TRANS) l 6 P 6= BID SEQ. l V * P 8= ACK EXP. AFTER TRANSMIT TIME OUT l l PDWTENQ EQU *-DW1701 l P DATA 0 ENQ COUNTER l PDWTRSN EQU *-DW1701 l $ P DATA 0 ACK TO BE SENT/REC
0x24704c…2471e0 Dummy {f00=0x00b8, f01=0x0190, f02=»DWTLRS EQU *-DW1701 l P DATA NAK LAST SENT RESPONSE m P RES 10 A5 STACK m @ $ PDWTSTB EQU *-DW1701-2 STACK BASE m X PDWTOTR EQU *-DW1701 m P OTR A2,0,DAMU01 m PDWTSSI EQU *-DW1701 m P SST A2,DAMI01 m PDWTSSU EQU *-DW1701 m P SST A
0x2471e0…247374 (1, 584) Dummy {f00=0x00b9, f01=0x018e, f02=»701 m P CIO A2,0,DAMI01 n PDWTCHU EQU *-DW1701 n $ P CIO A2,0,DAMU01 n @ P**LOGG n X P IFF LOGG=0 n f PLOGPNT EQU *-DW1701 n z P DATA LGST01 n PLOGSTA EQU *-DW1701 n PLGST01 EQU * n P RES LOGG n PLOGEND EQU *-DW1701-4 n
0x247374…247508 Dummy {f00=0x00b9, f01=0x018e, f02=» n P* o P* o $ P* DEVICE WORK TABLE FOR LINE 02 o P* o D P* o N PDW1702 EQU * o X P DATA DAMU02 DEVICE ADDRESS o l 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY o P DATA 0 ECB ADDRESS o P DATA 0 ORDER o ( P DATA DRMAD POIN
0x247508…24769c Dummy {f00=0x00b9, f01=0x0190, f02=» " P DATA 0 REQUEST TIMER POINTER p $ P DATA 0 PROCEDURE TIMER POINTER p * ( P DATA 0 MODEM TRANSMIT TIMER POINTER p R $ P RES 5 SAVE AREA FOR A3-A5,A7,A8 p ~ P DATA 0 PROCEDURE STATUS p P DATA 0 RESPONSE STATUS p P DATA 0 ENQ COUNTER p $ P DATA
0x24769c…247830 Dummy {f00=0x00b9, f01=0x0190, f02=» RES 10 A5 STACK p P OTR A2,0,DAMU02 q P SST A2,DAMI02 q 0 P SST A2,DAMU02 q F P CIO A2,1,DAMI02 q P CIO A2,1,DAMU02 q t P CIO A2,0,DAMI02 q P CIO A2,0,DAMU02 q P**LOGG q P IFF LOGG=0 q P DATA LGST02 q PLGST02 EQU * q P R
0x247830…2479c4 Dummy {f00=0x00b9, f01=0x0190, f02=» q $ P* DEVICE WORK TABLE FOR LINE 03 r P* r 0 P* r : PDW1703 EQU * r D P DATA DAMU03 DEVICE ADDRESS r X 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY r | P DATA 0 ECB ADDRESS r P DATA 0 ORDER r ( P DATA DRMAD POINTER TO ADDRESS BLOCK
0x2479c4…247b58 Dummy {f00=0x00b9, f01=0x018e, f02=»MER POINTER r ~ $ P DATA 0 PROCEDURE TIMER POINTER s ( P DATA 0 MODEM TRANSMIT TIMER POINTER s < $ P RES 5 SAVE AREA FOR A3-A5,A7,A8 s h P DATA 0 PROCEDURE STATUS s P DATA 0 RESPONSE STATUS s P DATA 0 ENQ COUNTER s $ P DATA 0 ACK TO BE SENT/RECEI
0x247b58…247cec Dummy {f00=0x00b9, f01=0x0190, f02=» P OTR A2,0,DAMU03 t P SST A2,DAMI03 t P SST A2,DAMU03 t 2 P CIO A2,1,DAMI03 t H P CIO A2,1,DAMU03 t ` P CIO A2,0,DAMI03 t x P CIO A2,0,DAMU03 t P**LOGG t P IFF LOGG=0 t P DATA LGST03 t PLGST03 EQU * t P RES LOGG t P DAT
0x247cec…247e80 Dummy {f00=0x00b9, f01=0x0190, f02=» t $ P* DEVICE WORK TABLE FOR LINE 04 u P* u 0 P* u : PDW1704 EQU * u D P DATA DAMU04 DEVICE ADDRESS u X 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY u | P DATA 0 ECB ADDRESS u P DATA 0 ORDER u ( P DATA DRMAD POINTER TO ADDRESS BLOCK
0x247e80…248014 (1, 585) Dummy {f00=0x00b9, f01=0x018e, f02=»MER POINTER u ~ $ P DATA 0 PROCEDURE TIMER POINTER v ( P DATA 0 MODEM TRANSMIT TIMER POINTER v < $ P RES 5 SAVE AREA FOR A3-A5,A7,A8 v h P DATA 0 PROCEDURE STATUS v P DATA 0 RESPONSE STATUS v P DATA 0 ENQ COUNTER v $ P DATA 0 ACK TO BE SENT/RECEI
0x248014…2481a8 Dummy {f00=0x00b9, f01=0x0190, f02=» P OTR A2,0,DAMU04 w P SST A2,DAMI04 w P SST A2,DAMU04 w 2 P CIO A2,1,DAMI04 w H P CIO A2,1,DAMU04 w ` P CIO A2,0,DAMI04 w x P CIO A2,0,DAMU04 w P**LOGG w P IFF LOGG=0 w P DATA LGST04 w PLGST04 EQU * w P RES LOGG w P DAT
0x2481a8…24833c Dummy {f00=0x00b9, f01=0x0190, f02=» w PDW1704 EQU * x P IFF NLINE=3 x PDW1703 EQU * x 0 P IFF NLINE=2 x D PDW1702 EQU * x X P XIF x l P DATA 0 DUMMY DWT x x P DATA 0 STATUS BUSY x P EJECT x P* x P* x P* INTERRUPT LOGGING ROUTINE x P* x P* LOG LABE
0x24833c…2484d0 Dummy {f00=0x00b9, f01=0x0190, f02=»TPUT STATUS MARKED /0F - NOT USED x P* y , P IFF LOGG=0 y 6 PLOGSST ST A2,SAVE2,A6 y J P ORKL A2,/1F00 y h P RF LOG10 y ~ PLOGOUT ST A2,SAVE2,A6 y P ORKL A2,/0000 y P RF LOG10 y PLOGIN CWK A2,/FF y P RF(E) LOGE10 y P ST
0x2484d0…248664 Dummy {f00=0x00b9, f01=0x4104, f02=»3,A6 y P CWK A3,LOGEND z P RF(L) LOGEXI z " P LDKL A3,LOGSTA z 8 PLOGEXI EQU * z P P ADR A3,A6 z d P ST A3,LOGPNT,A6 z v P LD A2,SAVE2,A6 z P LD A3,SAVE3,A6 z PLOGE10 RTN A5 z P XIF z P* z P* z P END z @ z ST
0x248664…2487f8 Dummy {f00=0x00b9, f01=0x2008, f02=» { 0 8 @ x @
0x2487f8…24898c Dummy {f00=0x00b9, f01=0x0190, f02=» P RF TRCTRL d PTRTHRU EQU * d P LDKL A4,DCSTR7 d * P IM XACK d B P LDKL A1,TRTHRU d R P ST A1,LSEND d j P RF TRCTRL d ~ PTRNOP EQU * d P LDKL A4,DCSTR8 d P IM XACK d P LDKL A1,TRNOP d P ST A1,LSEND d P RF TRCTRL d P
0x24898c…248b20 Dummy {f00=0x00b9, f01=0x0190, f02=»* d PTRCTRL EQU * e P* e 2 P* HERE TO TEST ON RETRANSMISSION CASE OR NOT e ( * P* IF YES RESTORE PREVIOUS HEADER e ^ P* e P LD A1,TSTENQ e " P RF(NZ) RETRAX RETRANSMISSION e P CF A5,TRHEAD e " PTRC100 LCR A2,A4 GET CHARACTER e
0x248b20…248cb4 (1, 586) Opaque[0x194]
0x248cb4…248e48 # DirEnt {nam=»DRDC81«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1730, f03=0x2020}
0x248cb4…248e48 IdxSect {
0x248cb4…248e48 f00 = 0x00b9 // 0x248cb4 @0x0
0x248cb4…248e48 f01 = 0x0036 // 0x248cb6 @0x2
0x248cb4…248e48 gno = [ // 0x248cb8 @0x4
0x248cb4…248e48 [0x00]: C0x00b9.0x2.0
0x248cb4…248e48 [0x01]: C0x00b9.0x3.0
0x248cb4…248e48 [0x02]: C0x00ba.0x0.0
0x248cb4…248e48 [0x03]: C0x00ba.0x1.0
0x248cb4…248e48 [0x04]: C0x00ba.0x2.0
0x248cb4…248e48 [0x05]: C0x00ba.0x3.0
0x248cb4…248e48 [0x06]: C0x00bb.0x0.0
0x248cb4…248e48 [0x07]: C0x00bb.0x1.0
0x248cb4…248e48 [0x08]: C0x00bb.0x2.0
0x248cb4…248e48 [0x09]: C0x00bb.0x3.0
0x248cb4…248e48 [0x0a]: C0x00bc.0x0.0
0x248cb4…248e48 [0x0b]: C0x00bc.0x1.0
0x248cb4…248e48 [0x0c]: C0x00bc.0x2.0
0x248cb4…248e48 [0x0d]: C0x00bc.0x3.0
0x248cb4…248e48 [0x0e]: C0x00bd.0x0.0
0x248cb4…248e48 [0x0f]: C0x00bd.0x1.0
0x248cb4…248e48 [0x10]: C0x00bd.0x2.0
0x248cb4…248e48 [0x11]: C0x00bd.0x3.0
0x248cb4…248e48 [0x12]: C0x00be.0x0.0
0x248cb4…248e48 [0x13]: C0x00be.0x1.0
0x248cb4…248e48 [0x14]: C0x00be.0x2.0
0x248cb4…248e48 [0x15]: C0x00be.0x3.0
0x248cb4…248e48 [0x16]: C0x00bf.0x0.0
0x248cb4…248e48 [0x17]: C0x00bf.0x1.0
0x248cb4…248e48 [0x18]: C0x00bf.0x2.0
0x248cb4…248e48 [0x19]: C0x00bf.0x3.0
0x248cb4…248e48 [0x1a]: C0x00c0.0x0.0
0x248cb4…248e48 ]
0x248cb4…248e48 }
0x248e48…248fdc Dummy {f00=0x00b9, f01=0x0190, f02=» 2 P IDENT DRDC81 REL 8.2 78-09-15 870105040820 P : P RECOVERY,THRUPUT,ETC B P REL 8.1 78-06-15 b $ P IMPROVED RECOVERY AT TP-ERROR ~ P REL 8.1 78-04-21 P P < P******************************************************
0x248fdc…249170 Dummy {f00=0x00b9, f01=0x018e, f02=»BER DRIVER P* P* P* & P* 0 P* : P* D P* N < P******************************************************* X P* 0 P* THIS DRIVER PERFORMS DATA COMMUNICATION 0 P* WITH TC'S CONNECTED TO THE CONCENTRATOR 4
0x249170…249304 Dummy {f00=0x00b9, f01=0x0190, f02=» < P******************************************************* P* H $ P* STANDARD USE OF REGISTERS : R P* z P* A1 WORK REGISTER " P* A2 I/O AND WORK REGISTER P* A3 WORK REGISTER P* A4 WORK REGISTER P*
0x249304…249498 Dummy {f00=0x00b9, f01=0x0190, f02=»*************************************************** P EJECT < P* J < P******************************************************* T P* P* ENTRY POINTS P* < P******************************************************* P* & P
0x249498…24962c Dummy {f00=0x00b9, f01=0x0190, f02=»5,IH8107,IH8109,IH8111,IH8113,IH8115,IH8117,IH8119,IH8121,IH8123 P ENTRY IH8123 H P ENTRY IH8102,IH8104 ^ P P ENTRY IH8106,IH8108,IH8110,IH8112,IH8114,IH8116,IH8118,IH8120,IH8122,IH8124 z P ENTRY IH8124 8 P ENTRY DW8102,DW8104,DW8106 OUTPUT A
0x24962c…2497c0 Dummy {f00=0x00b9, f01=0x018e, f02=»RY DW8101,DW8103,DW8105 INPUT DWT:S P ENTRY DW8107,DW8109,DW8111 , P ENTRY DW8113,DW8115,DW8117 P P ENTRY DW8119,DW8121,DW8123 t P EJECT P* < P******************************************************* P* P* EXTERNAL REF
0x2497c0…249954 (1, 587) Dummy {f00=0x00b9, f01=0x0190, f02=» $ P EXTRN TENDIO REQUEST COMPLETION , P EXTRN DISEND THE ENTIES ABOVE TOGETHER , P EXTRN DISIOE REQUEST ERROR ( P EXTRN SETIME SET TIMER CALL ADDRESS P EXTRN SETIMP P EXTRN DWTST DWT STATUS " P EXTRN DWTECB DWT ECB ADDRESS P
0x249954…249ae8 Dummy {f00=0x00b9, f01=0x0190, f02=»VE LENGTH x P EXTRN ECBRC ECB RETURN CODE " P EXTRN ECBCW ECB CONTROL WORD 6 P EXTRN ILLINT P EXTRN INTSAV r P EJECT P* P* P************************** P* * P* SYSTEM ADOPTION *
0x249ae8…249c7c Dummy {f00=0x00b9, f01=0x0190, f02=» ASSEMBLYy | " P***************************** P* 8 P* B P* L P* V PX:A EQU 1 ` . P* X:A = NUMBER OF LINES HANDLED BY DRDC81 r P* P* PX:B EQU 10 P* X:B = LENGTH OF POLL LIST P* P* PX:G EQ
0x249c7c…249e10 Dummy {f00=0x00b9, f01=0x0190, f02=»E 02 l P* P* PX:I EQU /5 , P* X:I = INPUT DEVICE ADDRESS FOR LINE 03 2 P* b P* l PX:J EQU /6 v , P* X:J = INPUT DEVICE ADDRESS FOR LINE 04 P* P* PX:K EQU /7 , P* X:K = INPUT DEVICE ADDRESS FOR LINE 05
0x249e10…249fa4 Dummy {f00=0x00b9, f01=0x0190, f02=»X:M = INPUT DEVICE ADDRESS FOR LINE 07 P* . P* 8 PX:N EQU /23 B , P* X:N = INPUT DEVICE ADDRESS FOR LINE 08 V P* P* PX:O EQU /24 , P* X:O = INPUT DEVICE ADDRESS FOR LINE 09 P* P* PX:P EQU /25 , P*
0x249fa4…24a138 Dummy {f00=0x00b9, f01=0x0190, f02=» P* PX:R EQU /27 , P* X:R = INPUT DEVICE ADDRESS FOR LINE 12 & P* V P* ` P* j PX:C EQU 0 t 8 P* IF X:C = 1, INSTUCTION SET IS ADOPTED FOR 852 CPU P* P* PX:D EQU 350 P* X:D = MAX BLOCKLENGTH
0x24a138…24a2cc Dummy {f00=0x00b9, f01=0x018e, f02=»REA LENGTH = X:E P* P* " P* , PX:F EQU 3 6 $ P* X:F = RETRY LIMIT FOR RECOVERY H P* p P* z PX:S EQU 50 P* X:S = TIME OUT FOR TC BUSY P* P* PX:T EQU 40 P* X:T = TIME OUT FOR ENQ P*
0x24a2cc…24a460 Dummy {f00=0x00b9, f01=0x0190, f02=» L P* OUTPUT = ADDRESSES ACCORDING TO IBM REMOTE CONTROL UNIT ADDRESSING P* T P* ^ ( PRQLOGG EQU 0 FOR TEST PURPOSES ONLY h 8 P* IF RQLOGG = 1, A REQUEST LOGG IS INCLUDED, SAVING H P* LINE NUMBER, ORDER, RETURN CODE AND TID FOR THE 100 LA
0x24a460…24a5f4 (1, 588) Dummy {f00=0x00ba, f01=0x0190, f02=»************************************* ~ P* . P* SYSTEM PARAMETERS 8 P* T < P******************************************************* ^ P* 0 PHILINO EQU X:A HIGHEST LINE NUMBER IN SYSTEM $ PPLTLEN EQU X:B POLL LIST LENGTH PLINE
0x24a5f4…24a788 Dummy {f00=0x00ba, f01=0x0190, f02=» PLTLEN PLINE07 EQU PLTLEN PLINE08 EQU PLTLEN * PLINE09 EQU PLTLEN D PLINE10 EQU PLTLEN ^ PLINE11 EQU PLTLEN x PLINE12 EQU PLTLEN 4 PCPU852 EQU X:C EXCLUDES MULTIPLE LOAD AND STORE 4 PMAXTBL EQU X:D MAX LENGTH OF TRANSMI
0x24a788…24a91c Dummy {f00=0x00ba, f01=0x018e, f02=»Y TIMER z 6 PRTYSYS EQU X:F RETRY LIMIT FOR RECOVERY ( SYSGEN ) 0 PRTYLIM EQU -RTYSYS RETRY LIMIT FOR RECOVERY J " PNUMSYN EQU -3 NUMBER OF SYN:S ~ 4 PDELAY EQU 1 READ REQ DELAY AT STATUS POLL HALTED ( PBSYTIM EQU X:S TIME OUT FOR TC BUSY $ P
0x24a91c…24aab0 Dummy {f00=0x00ba, f01=0x0190, f02=» P* DEVICE WORK AREA EQUATES P* & < P******************************************************* 0 P* p $ PDWTTP EQU /10 DWT TIMER POINTER z * PDWTATP EQU /12 ACTIVITY TIMER POINTER PSTB EQU /1E STACK BASE PDWTSAV EQU /20 DWT SAVE AR
0x24aab0…24ac44 Dummy {f00=0x00ba, f01=0x0190, f02=» EQU /2C DWT RETRY COUNTER " PDWTBCC EQU /2E DWT BCC COUNTER " " PDWTACK EQU /30 DWT ACK COUNTER H & PPACT EQU /32 LAST POLLED ACTIVE TC n * PPINACT EQU /34 LAST POLLED INACTIVE TC 0 PPLIST EQU /36 POLLIST ADDRESS IN OUTPUT DWT $ PTPCONT EQU /14
0x24ac44…24add8 Dummy {f00=0x00ba, f01=0x0190, f02=» P* PBIT2 EQU /2000 PBIT5 EQU /400 $ PBIT6 EQU /200 : PBIT7 EQU /100 P PBIT8 EQU /80 f PBIT9 EQU /40 z PBIT10 EQU /20 PBIT11 EQU /10 PBIT12 EQU 8 PBIT13 EQU 4 PBIT14 EQU 2 PBIT15 EQU 1
0x24add8…24af6c Dummy {f00=0x00ba, f01=0x0190, f02=»OP EQU BIT15 MODEM NOT OPERABLE, ALL ORDERS , PNORESP EQU BIT14 NO RESPONSE, ORDER /00 4 < PTCINPL EQU BIT14 TC ALLREADY IN POLLING LIST, ORDER /37 d : PPOLPER EQU BIT14 POLLING ALLREADY PERMITTED, ORDER /27 0 PINVTCA EQU BIT13 INVALID TCA, ORDER /0
0x24af6c…24b100 Dummy {f00=0x00ba, f01=0x018e, f02=»OLLIST OVERFLOW, ORDER /37 ~ 2 PLINSTE EQU BIT11 LINE OPEN/CLOSED, ALL ORDERS " 6 PTCINAC EQU BIT10 TC INACTIVE, ORDER /02, /06, /37 X 8 PTCNLST EQU BIT9 TC NOT IN POLL LIST, ORDER /06, /38 . PPOLHLT EQU BIT8 POLLING HALTED, ORDER /02 2 PRETRAN E
0x24b100…24b294 (1, 589) Dummy {f00=0x00ba, f01=0x0190, f02=» j & PTCBUSY EQU BIT2 TC BUSy, ORDER /06 P* 2 P* < P EJECT F P* T < P******************************************************* ^ P* P* DWT STATUS WORD CONTENTS P* < P****************************************************
0x24b294…24b428 Dummy {f00=0x00ba, f01=0x0190, f02=»SY z . P* BIT #14 : 0 = POLLING PERMITTED 2 P* 1 = HALT POLLING INITIATED < ( P* BIT #15 : 0 = LINE CLOSED r & P* 1 = LINE OPEN P* < P******************************************************
0x24b428…24b5bc Dummy {f00=0x00ba, f01=0x018e, f02=» 4 P* STATUS : /00 = MODEM READY / CARRIER DETECTED $ P* : /01 = MODEM NOT READY @ & P* : /02 = THROUGHPUT ERROR h * P* : /20 = CARRIER NOT DETECTED & P* : /40 = CALLING INDICATOR P* < P********************
0x24b5bc…24b750 Dummy {f00=0x00ba, f01=0x0190, f02=» $ P* LINE CONTROL CHARACTER EQUATES P* 0 < P******************************************************* : P* z PSYN EQU /16 PPAD EQU /7F TRAILING PAD PDLE EQU /10 DATA LINK ESCAPE $ PEOT EQU /04 END OF TRANSMISSION PENQ
0x24b750…24b8e4 Dummy {f00=0x00ba, f01=0x0190, f02=»ETXP EQU /83 ETX WITH PARITY PETBP EQU /97 ETB WITH PARITY $ ( PNAK EQU /15 NEGATIVE ACKNOWLEDGEMENT H PGP EQU /22 GENERAL POLL t $ PPAR:0 EQU /B0 ZERO (ODD PARITY) 6 PSEMIKO EQU /3B SECOND CHARACTER IN WACK, AFTER DLE P EJECT P*
0x24b8e4…24ba78 Dummy {f00=0x00ba, f01=0x0190, f02=»*********************************************** P* 8 PDAMI01 EQU X:G INPUT CHLC 1 B PDAMI02 EQU X:H f PDAMI03 EQU X:I | PDAMI04 EQU X:J PDAMI05 EQU X:K PDAMI06 EQU X:L PDAMI07 EQU X:M PDAMI08 EQU X:N PDAMI09 E
0x24ba78…24bc0c Dummy {f00=0x00ba, f01=0x0190, f02=»AMI02+/10 PDAMU03 EQU DAMI03+/10 PDAMU04 EQU DAMI04+/10 0 PDAMU05 EQU DAMI05+/10 N PDAMU06 EQU DAMI06+/10 l PDAMU07 EQU DAMI07+/10 PDAMU08 EQU DAMI08+/10 PDAMU09 EQU DAMI09+/10 PDAMU10 EQU DAMI10+/10 PDAMU11
0x24bc0c…24bda0 Dummy {f00=0x00ba, f01=0x0190, f02=»*********************** p P EJECT P* . P* 8 $ P* BSC MASTER CONFIGURATION TABLE B P* j P* t $ PDWMTAB DATA DWMTE-* TABLE LENGTH ~ ( P DATA DW8101 DWT FOR INPUT ON LINE 1 6 P DATA DW8102 DWT FOR OUTPUT AND CONTROL ON LINE 1
0x24bda0…24bf34 (1, 590) Dummy {f00=0x00ba, f01=0x0190, f02=»08,DW8107 P IFF HILINO=4 P DATA DW8110,DW8109 ( P IFF HILINO=5 D P DATA DW8112,DW8111 Z P IFF HILINO=6 v P DATA DW8114,DW8113 P IFF HILINO=7 P DATA DW8116,DW8115 P IFF HILINO=8 P DATA DW8118,DW8117
0x24bf34…24c0c8 Dummy {f00=0x00ba, f01=0x0190, f02=»24,DW8123 P XIF PDWMTE EQU * P* 2 P* < P EJECT F P* T P* ^ " P***************************** h " P* * P* DEVICE WORK TABLES * " P* * " P****************
0x24c0c8…24c25c Dummy {f00=0x00ba, f01=0x0190, f02=» P* PDW8102 EQU * TABLE ENTRY P DATA DAMU01 DEVICE ADDRESS 2 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY V P DATA 0 ECB ADDRESS P DATA 0 ORDER * P DATA DRMUAD POINTER TO ADDRESS BLOCK P DATA 0 TTAB ADDRESS $ P
0x24c25c…24c3f0 Dummy {f00=0x00ba, f01=0x0190, f02=»OINTER x & P DATA 0,0,0,0,0,0 SUBROUTINE STACK ! P RES 3 SAVE AREA FOR A3-A5 ! 8 $ P DATA DW8102 OUTPUT DWT ADDRESS ! Z " P DATA DW8101 INPUT DWT ADDRESS ! P DATA 0 SAVE AREA FOR A8 ! P DATA 0 RETRY COUNTER ! P DATA 0 BCC COUNTER ! P DATA
0x24c3f0…24c584 Dummy {f00=0x00ba, f01=0x0190, f02=»POLLIST ! P DATA /FFFF " P* " $ P EJECT " . P* " < P* " F * P* DEVICE WORK TABLE FOR LINE 01, INPUT " P P* " ~ P* " PDW8101 EQU * TABLE ENTRY " P DATA DAMI01 DEVICE ADDRESS " 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY "
0x24c584…24c718 Dummy {f00=0x00ba, f01=0x0190, f02=»WAIT/ACTIVATE INDICATOR " & P DATA 0 TASK QUEUE FOR THIS DEVICE # P DATA 0 TIMER POINTER # J " P DATA 0 ACTIVITY TIMER POINTER # h & P DATA 0,0,0,0,0,0 SUBROUTINE STACK # P RES 3 SAVE AREA FOR A3-A5 # $ P DATA DW8102 OUTPUT DWT ADDRESS # " P DATA
0x24c718…24c8ac Dummy {f00=0x00ba, f01=0x0190, f02=»BLE FOR LINE 02, OUTPUT AND CONTROL # P* $ , P* $ 6 PDW8104 EQU * TABLE ENTRY $ @ P DATA DAMU02 DEVICE ADDRESS $ ` 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY $ P DATA 0 ECB ADDRESS $ P DATA 0 ORDER $ * P DATA DRMUAD POINTER TO ADDR
0x24c8ac…24ca40 Dummy {f00=0x00ba, f01=0x018e, f02=»TIMER POINTER $ " P DATA 0 ACTIVITY TIMER POINTER % & P DATA 0,0,0,0,0,0 SUBROUTINE STACK % < P RES 3 SAVE AREA FOR A3-A5 % f $ P DATA DW8104 OUTPUT DWT ADDRESS % " P DATA DW8103 INPUT DWT ADDRESS % P DATA 0 SAVE AREA FOR A8 % P DATA 0 RETRY COUN
0x24ca40…24cbd4 (1, 591) Dummy {f00=0x00ba, f01=0x0190, f02=» P RES LINE02 & P DATA /FFFF & P* & , P EJECT & 6 P* & D P* & N * P* DEVICE WORK TABLE FOR LINE 02, INPUT & X P* & P* & PDW8103 EQU * TABLE ENTRY & P DATA DAMI02 DEVICE ADDRESS & 2 P DATA /8000 STATUS , /8000 MEANS DEVICE RE
0x24cbd4…24cd68 Dummy {f00=0x00ba, f01=0x0190, f02=» DATA 0 WAIT/ACTIVATE INDICATOR & & P DATA 0 TASK QUEUE FOR THIS DEVICE ' ( P DATA 0 TIMER POINTER ' R " P DATA 0 ACTIVITY TIMER POINTER ' p & P DATA 0,0,0,0,0,0 SUBROUTINE STACK ' P RES 3 SAVE AREA FOR A3-A5 ' $ P DATA DW8104 OUTPUT DWT ADDRESS ' "
0x24cd68…24cefc Dummy {f00=0x00ba, f01=0x0190, f02=» WORK TABLE FOR LINE 03, OUTPUT AND CONTROL ' P* ( 4 P* ( > PDW8106 EQU * TABLE ENTRY ( H P DATA DAMU03 DEVICE ADDRESS ( h 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY ( P DATA 0 ECB ADDRESS ( P DATA 0 ORDER ( * P DATA DRMUAD POINTER
0x24cefc…24d090 Dummy {f00=0x00ba, f01=0x0190, f02=» DATA 0 TIMER POINTER ( " P DATA 0 ACTIVITY TIMER POINTER ) & P DATA 0,0,0,0,0,0 SUBROUTINE STACK ) D P RES 3 SAVE AREA FOR A3-A5 ) n $ P DATA DW8106 OUTPUT DWT ADDRESS ) " P DATA DW8105 INPUT DWT ADDRESS ) P DATA 0 SAVE AREA FOR A8 ) P DATA 0 RE
0x24d090…24d224 Dummy {f00=0x00ba, f01=0x018e, f02=»3 ) ~ P RES LINE03 * P DATA /FFFF * P* * 2 P EJECT * < P* * J P* * T * P* DEVICE WORK TABLE FOR LINE 03, INPUT * ^ P* * P* * PDW8105 EQU * TABLE ENTRY * P DATA DAMI03 DEVICE ADDRESS * 2 P DATA /8000 STATUS , /8000 MEANS DEV
0x24d224…24d3b8 Dummy {f00=0x00ba, f01=0x0190, f02=» * z $ P DATA 0 WAIT/ACTIVATE INDICATOR + & P DATA 0 TASK QUEUE FOR THIS DEVICE + 0 P DATA 0 TIMER POINTER + Z " P DATA 0 ACTIVITY TIMER POINTER + x & P DATA 0,0,0,0,0,0 SUBROUTINE STACK + P RES 3 SAVE AREA FOR A3-A5 + $ P DATA DW8106 OUTPUT DWT ADDRES
0x24d3b8…24d54c Dummy {f00=0x00ba, f01=0x0190, f02=»* DEVICE WORK TABLE FOR LINE 04, OUTPUT AND CONTROL + P* , < P* , F PDW8108 EQU * TABLE ENTRY , P P DATA DAMU04 DEVICE ADDRESS , p 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY , P DATA 0 ECB ADDRESS , P DATA 0 ORDER , * P DATA DRMUAD
0x24d54c…24d6e0 Dummy {f00=0x00ba, f01=0x0190, f02=» , n P DATA 0 TIMER POINTER - " P DATA 0 ACTIVITY TIMER POINTER - & & P DATA 0,0,0,0,0,0 SUBROUTINE STACK - L P RES 3 SAVE AREA FOR A3-A5 - v $ P DATA DW8108 OUTPUT DWT ADDRESS - " P DATA DW8107 INPUT DWT ADDRESS - P DATA 0 SAVE AREA FOR A8 - P D
0x24d6e0…24d874 (1, 592) Dummy {f00=0x00bb, f01=0x0190, f02=»04+LINE04 - P RES LINE04 . P DATA /FFFF . & P* . : P EJECT . D P* . R P* . * P* DEVICE WORK TABLE FOR LINE 04, INPUT . f P* . P* . PDW8107 EQU * TABLE ENTRY . P DATA DAMI04 DEVICE ADDRESS . 2 P DATA /8000 STATUS , /8000 M
0x24d874…24da08 Dummy {f00=0x00bb, f01=0x018e, f02=»DDRESS . $ P DATA 0 WAIT/ACTIVATE INDICATOR / & P DATA 0 TASK QUEUE FOR THIS DEVICE / 6 P DATA 0 TIMER POINTER / ` " P DATA 0 ACTIVITY TIMER POINTER / ~ & P DATA 0,0,0,0,0,0 SUBROUTINE STACK / P RES 3 SAVE AREA FOR A3-A5 / $ P DATA DW8108 OUTPUT DWT
0x24da08…24db9c Dummy {f00=0x00bb, f01=0x0190, f02=» / 8 P* DEVICE WORK TABLE FOR LINE 05, OUTPUT AND CONTROL 0 P* 0 D P* 0 N PDW8110 EQU * TABLE ENTRY 0 X P DATA DAMU05 DEVICE ADDRESS 0 x 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY 0 P DATA 0 ECB ADDRESS 0 P DATA 0 ORDER 0 * P DAT
0x24db9c…24dd30 Dummy {f00=0x00bb, f01=0x0190, f02=»S DEVICE 0 v P DATA 0 TIMER POINTER 1 " P DATA 0 ACTIVITY TIMER POINTER 1 . & P DATA 0,0,0,0,0,0 SUBROUTINE STACK 1 T P RES 3 SAVE AREA FOR A3-A5 1 ~ $ P DATA DW8110 OUTPUT DWT ADDRESS 1 " P DATA DW8109 INPUT DWT ADDRESS 1 P DATA 0 SAVE AREA FOR A8 1
0x24dd30…24dec4 Dummy {f00=0x00bb, f01=0x0190, f02=»ATA LINE05+LINE05 1 P RES LINE05 2 P DATA /FFFF 2 . P* 2 B P EJECT 2 L P* 2 Z P* 2 d * P* DEVICE WORK TABLE FOR LINE 05, INPUT 2 n P* 2 P* 2 PDW8109 EQU * TABLE ENTRY 2 P DATA DAMI05 DEVICE ADDRESS 2 2 P DATA /8000 STATUS ,
0x24dec4…24e058 Dummy {f00=0x00bb, f01=0x0190, f02=»0 TTAB ADDRESS 2 $ P DATA 0 WAIT/ACTIVATE INDICATOR 3 & P DATA 0 TASK QUEUE FOR THIS DEVICE 3 > P DATA 0 TIMER POINTER 3 h " P DATA 0 ACTIVITY TIMER POINTER 3 & P DATA 0,0,0,0,0,0 SUBROUTINE STACK 3 P RES 3 SAVE AREA FOR A3-A5 3 $ P DATA DW8110 OUT
0x24e058…24e1ec Dummy {f00=0x00bb, f01=0x0190, f02=» P* 4 8 P* DEVICE WORK TABLE FOR LINE 06, OUTPUT AND CONTROL 4 P* 4 J P* 4 T PDW8112 EQU * TABLE ENTRY 4 ^ P DATA DAMU06 DEVICE ADDRESS 4 ~ 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY 4 P DATA 0 ECB ADDRESS 4 P DATA 0 ORDER 4 *
0x24e1ec…24e380 Dummy {f00=0x00bb, f01=0x0190, f02=»OR THIS DEVICE 4 | P DATA 0 TIMER POINTER 5 " P DATA 0 ACTIVITY TIMER POINTER 5 4 & P DATA 0,0,0,0,0,0 SUBROUTINE STACK 5 Z P RES 3 SAVE AREA FOR A3-A5 5 $ P DATA DW8112 OUTPUT DWT ADDRESS 5 " P DATA DW8111 INPUT DWT ADDRESS 5 P DATA 0 SAVE AREA FO
0x24e380…24e514 (1, 593) Dummy {f00=0x00bb, f01=0x0190, f02=» P DATA LINE06+LINE06 6 P RES LINE06 6 P DATA /FFFF 6 4 P* 6 H P EJECT 6 R P* 6 ` P* 6 j * P* DEVICE WORK TABLE FOR LINE 06, INPUT 6 t P* 6 P* 6 PDW8111 EQU * TABLE ENTRY 6 P DATA DAMI06 DEVICE ADDRESS 6 2 P DATA /8000 ST
0x24e514…24e6a8 Dummy {f00=0x00bb, f01=0x0190, f02=» DATA 0 TTAB ADDRESS 6 $ P DATA 0 WAIT/ACTIVATE INDICATOR 7 & P DATA 0 TASK QUEUE FOR THIS DEVICE 7 D P DATA 0 TIMER POINTER 7 n " P DATA 0 ACTIVITY TIMER POINTER 7 & P DATA 0,0,0,0,0,0 SUBROUTINE STACK 7 P RES 3 SAVE AREA FOR A3-A5 7 $ P DATA DW81
0x24e6a8…24e83c Dummy {f00=0x00bb, f01=0x0190, f02=»* 7 P* 8 8 P* DEVICE WORK TABLE FOR LINE 07, OUTPUT AND CONTROL 8 P* 8 P P* 8 Z PDW8114 EQU * TABLE ENTRY 8 d P DATA DAMU07 DEVICE ADDRESS 8 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY 8 P DATA 0 ECB ADDRESS 8 P DATA 0 ORDER
0x24e83c…24e9d0 Dummy {f00=0x00bb, f01=0x0190, f02=»UEUE FOR THIS DEVICE 8 P DATA 0 TIMER POINTER 9 " P DATA 0 ACTIVITY TIMER POINTER 9 : & P DATA 0,0,0,0,0,0 SUBROUTINE STACK 9 ` P RES 3 SAVE AREA FOR A3-A5 9 $ P DATA DW8114 OUTPUT DWT ADDRESS 9 " P DATA DW8113 INPUT DWT ADDRESS 9 P DATA 0 SAVE A
0x24e9d0…24eb64 Dummy {f00=0x00bb, f01=0x018e, f02=»CT 9 P DATA LINE07+LINE07 : P RES LINE07 : & P DATA /FFFF : : P* : N P EJECT : X P* : f P* : p * P* DEVICE WORK TABLE FOR LINE 07, INPUT : z P* : P* : PDW8113 EQU * TABLE ENTRY : P DATA DAMI07 DEVICE ADDRESS : 2 P DATA /8
0x24eb64…24ecf8 Dummy {f00=0x00bb, f01=0x0190, f02=» : h P DATA 0 TTAB ADDRESS ; $ P DATA 0 WAIT/ACTIVATE INDICATOR ; $ & P DATA 0 TASK QUEUE FOR THIS DEVICE ; L P DATA 0 TIMER POINTER ; v " P DATA 0 ACTIVITY TIMER POINTER ; & P DATA 0,0,0,0,0,0 SUBROUTINE STACK ; P RES 3 SAVE AREA FOR A3-A5 ; $ P D
0x24ecf8…24ee8c Dummy {f00=0x00bb, f01=0x0190, f02=» ; P* < P* < 8 P* DEVICE WORK TABLE FOR LINE 08, OUTPUT AND CONTROL < P* < X P* < b PDW8116 EQU * TABLE ENTRY < l P DATA DAMU08 DEVICE ADDRESS < 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY < P DATA 0 ECB ADDRESS < P DATA
0x24ee8c…24f020 Dummy {f00=0x00bb, f01=0x0190, f02=»0 TASK QUEUE FOR THIS DEVICE < P DATA 0 TIMER POINTER = $ " P DATA 0 ACTIVITY TIMER POINTER = B & P DATA 0,0,0,0,0,0 SUBROUTINE STACK = h P RES 3 SAVE AREA FOR A3-A5 = $ P DATA DW8116 OUTPUT DWT ADDRESS = " P DATA DW8115 INPUT DWT ADDRESS = P DATA
0x24f020…24f1b4 (1, 594) Dummy {f00=0x00bb, f01=0x0190, f02=»A 0 PINACT = P DATA LINE08+LINE08 > P RES LINE08 > . P DATA /FFFF > B P* > V P EJECT > ` P* > n P* > x * P* DEVICE WORK TABLE FOR LINE 08, INPUT > P* > P* > PDW8115 EQU * TABLE ENTRY > P DATA DAMI08 DEVICE ADDRESS > 2 P
0x24f1b4…24f348 Dummy {f00=0x00bb, f01=0x0190, f02=»BLOCK > p P DATA 0 TTAB ADDRESS ? $ P DATA 0 WAIT/ACTIVATE INDICATOR ? * & P DATA 0 TASK QUEUE FOR THIS DEVICE ? R P DATA 0 TIMER POINTER ? | " P DATA 0 ACTIVITY TIMER POINTER ? & P DATA 0,0,0,0,0,0 SUBROUTINE STACK ? P RES 3 SAVE AREA FOR A3-A5 ?
0x24f348…24f4dc Dummy {f00=0x00bb, f01=0x0190, f02=» EJECT ? P* @ P* @ 8 P* DEVICE WORK TABLE FOR LINE 09, OUTPUT AND CONTROL @ " P* @ ^ P* @ h PDW8118 EQU * TABLE ENTRY @ r P DATA DAMU09 DEVICE ADDRESS @ 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY @ P DATA 0 ECB ADDRESS @ P
0x24f4dc…24f670 Dummy {f00=0x00bb, f01=0x018e, f02=» DATA 0 TASK QUEUE FOR THIS DEVICE @ P DATA 0 TIMER POINTER A * " P DATA 0 ACTIVITY TIMER POINTER A H & P DATA 0,0,0,0,0,0 SUBROUTINE STACK A n P RES 3 SAVE AREA FOR A3-A5 A $ P DATA DW8118 OUTPUT DWT ADDRESS A " P DATA DW8117 INPUT DWT ADDRESS A P
0x24f670…24f804 Dummy {f00=0x00bb, f01=0x0190, f02=» P DATA 0 PINACT B P DATA LINE09+LINE09 B P RES LINE09 B 6 P DATA /FFFF B J P* B ^ P EJECT B h P* B v P* B * P* DEVICE WORK TABLE FOR LINE 09, INPUT B P* B P* B PDW8117 EQU * TABLE ENTRY B P DATA DAMI09 DEVICE ADDRESS
0x24f804…24f998 Dummy {f00=0x00bb, f01=0x0190, f02=»ADDRESS BLOCK B x P DATA 0 TTAB ADDRESS C $ P DATA 0 WAIT/ACTIVATE INDICATOR C 2 & P DATA 0 TASK QUEUE FOR THIS DEVICE C Z P DATA 0 TIMER POINTER C " P DATA 0 ACTIVITY TIMER POINTER C & P DATA 0,0,0,0,0,0 SUBROUTINE STACK C P RES 3 SAVE AREA FOR A
0x24f998…24fb2c Dummy {f00=0x00bb, f01=0x0190, f02=» C P EJECT D P* D P* D 8 P* DEVICE WORK TABLE FOR LINE 10, OUTPUT AND CONTROL D * P* D f P* D p PDW8120 EQU * TABLE ENTRY D z P DATA DAMU10 DEVICE ADDRESS D 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY D P DATA 0 ECB ADDRESS
0x24fb2c…24fcc0 Dummy {f00=0x00bb, f01=0x0190, f02=» D p & P DATA 0 TASK QUEUE FOR THIS DEVICE E P DATA 0 TIMER POINTER E 2 " P DATA 0 ACTIVITY TIMER POINTER E P & P DATA 0,0,0,0,0,0 SUBROUTINE STACK E v P RES 3 SAVE AREA FOR A3-A5 E $ P DATA DW8120 OUTPUT DWT ADDRESS E " P DATA DW8119 INPUT DWT ADDRESS
0x24fcc0…24fe54 (1, 595) Dummy {f00=0x00bb, f01=0x0190, f02=»CT E P DATA 0 PINACT F P DATA LINE10+LINE10 F P RES LINE10 F < P DATA /FFFF F P P* F d P EJECT F n P* F | P* F * P* DEVICE WORK TABLE FOR LINE 10, INPUT F P* F P* F PDW8119 EQU * TABLE ENTRY F P DATA DAMI10 DEVICE AD
0x24fe54…24ffe8 Dummy {f00=0x00bb, f01=0x0190, f02=»ER TO ADDRESS BLOCK F ~ P DATA 0 TTAB ADDRESS G $ P DATA 0 WAIT/ACTIVATE INDICATOR G 8 & P DATA 0 TASK QUEUE FOR THIS DEVICE G ` P DATA 0 TIMER POINTER G " P DATA 0 ACTIVITY TIMER POINTER G & P DATA 0,0,0,0,0,0 SUBROUTINE STACK G P RES 3 SAVE AREA
0x24ffe8…25017c Dummy {f00=0x00bb, f01=0x0190, f02=»INO=10 G P EJECT H P* H P* H & 8 P* DEVICE WORK TABLE FOR LINE 11, OUTPUT AND CONTROL H 0 P* H l P* H v PDW8122 EQU * TABLE ENTRY H P DATA DAMU11 DEVICE ADDRESS H 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY H P DATA 0 ECB AD
0x25017c…250310 Dummy {f00=0x00bb, f01=0x0190, f02=»CATOR H v & P DATA 0 TASK QUEUE FOR THIS DEVICE I P DATA 0 TIMER POINTER I 8 " P DATA 0 ACTIVITY TIMER POINTER I V & P DATA 0,0,0,0,0,0 SUBROUTINE STACK I | P RES 3 SAVE AREA FOR A3-A5 I $ P DATA DW8122 OUTPUT DWT ADDRESS I " P DATA DW8121 INPUT DWT A
0x250310…2504a4 Dummy {f00=0x00bb, f01=0x0190, f02=»A 0 PACT I P DATA 0 PINACT J P DATA LINE11+LINE11 J & P RES LINE11 J B P DATA /FFFF J V P* J j P EJECT J t P* J P* J * P* DEVICE WORK TABLE FOR LINE 11, INPUT J P* J P* J PDW8121 EQU * TABLE ENTRY J P DATA DAMI11 DEV
0x2504a4…250638 Dummy {f00=0x00bb, f01=0x0190, f02=» POINTER TO ADDRESS BLOCK J P DATA 0 TTAB ADDRESS K " $ P DATA 0 WAIT/ACTIVATE INDICATOR K > & P DATA 0 TASK QUEUE FOR THIS DEVICE K f P DATA 0 TIMER POINTER K " P DATA 0 ACTIVITY TIMER POINTER K & P DATA 0,0,0,0,0,0 SUBROUTINE STACK K P RES 3 SAV
0x250638…2507cc Dummy {f00=0x00bb, f01=0x0190, f02=»FF HILINO=11 K P EJECT L P* L " P* L , 8 P* DEVICE WORK TABLE FOR LINE !2, OUTPUT AND CONTROL L 6 P* L r P* L | PDW8124 EQU * TABLE ENTRY L P DATA DAMU12 DEVICE ADDRESS L 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY L P DATA 0
0x2507cc…250960 Dummy {f00=0x00bb, f01=0x018e, f02=»E INDICATOR L | & P DATA 0 TASK QUEUE FOR THIS DEVICE M P DATA 0 TIMER POINTER M > " P DATA 0 ACTIVITY TIMER POINTER M & P DATA 0,0,0,0,0,0 SUBROUTINE STACK M P RES 3 SAVE AREA FOR A3-A5 M $ P DATA DW8124 OUTPUT DWT ADDRESS M " P DATA DW8123 INPUT
0x250960…250af4 (1, 596) Dummy {f00=0x00bc, f01=0x0190, f02=» P DATA 0 PACT N P DATA 0 PINACT N P DATA LINE12+LINE12 N . P RES LINE12 N J P DATA /FFFF N ^ P* N r P EJECT N | P* N P* N * P* DEVICE WORK TABLE FOR LINE 12, INPUT N P* N P* N PDW8123 EQU * TABLE ENTRY N P DATA DA
0x250af4…250c88 Dummy {f00=0x00bc, f01=0x018e, f02=»A DRMIAD POINTER TO ADDRESS BLOCK N P DATA 0 TTAB ADDRESS O * $ P DATA 0 WAIT/ACTIVATE INDICATOR O F & P DATA 0 TASK QUEUE FOR THIS DEVICE O n P DATA 0 TIMER POINTER O " P DATA 0 ACTIVITY TIMER POINTER O & P DATA 0,0,0,0,0,0 SUBROUTINE STACK O P R
0x250c88…250e1c Dummy {f00=0x00bc, f01=0x0190, f02=» O v P XIF P P IFF HILINO=12 P P EJECT P * P* P 8 P* P B P* P L P* DUMMY ENTRIES P V P* P n P* P x PDW8123 EQU * P PDW8124 EQU * P PIH8123 EQU * P PIH8124 EQU * P P IFF HILINO=11 P PDW8121 EQU * P PDW8122 EQU *
0x250e1c…250fb0 Dummy {f00=0x00bc, f01=0x018e, f02=» EQU * P P IFF HILINO=9 Q PDW8117 EQU * Q $ PDW8118 EQU * Q 8 PIH8117 EQU * Q L PIH8118 EQU * Q ` P IFF HILINO=8 Q t PDW8115 EQU * Q PDW8116 EQU * Q PIH8115 EQU * Q PIH8116 EQU * Q P IFF HILINO=7 Q PDW8113 EQU * Q PDW81
0x250fb0…251144 Dummy {f00=0x00bc, f01=0x0190, f02=» PIH8112 EQU * R P IFF HILINO=5 R PDW8109 EQU * R . PDW8110 EQU * R B PIH8109 EQU * R V PIH8110 EQU * R j P IFF HILINO=4 R ~ PDW8107 EQU * R PDW8108 EQU * R PIH8107 EQU * R PIH8108 EQU * R P IFF HILINO=3 R PDW8105 EQU * R
0x251144…2512d8 Dummy {f00=0x00bc, f01=0x0190, f02=»QU * R PIH8104 EQU * S P ST P,INTSAV S P ABL ILLINT S 4 P XIF S H P EJECT S T P S b P S j P S r P S z P S P S P S P S P S P* S P* S P* S P* S P* S P* S < P**********************************
0x2512d8…25146c Dummy {f00=0x00bc, f01=0x0190, f02=»******************************* S x < P******************************************************* T ( P* T h P* T r P* T | P* T P* T P EJECT T < P******************************************************* T P* T P* INPUT REQUESTS T
0x25146c…251600 Dummy {f00=0x00bc, f01=0x0190, f02=»* T P* U PMIACT EQU * U P SUK A7,2 U ( P RF(Z) RD ORDER 01: READ U : $ PMIA100 ABL DISIOE ILLEGAL ORDER U Z P* U P* U P* ORDER 02 : READ U P* U P* U PRD EQU * U P LD A1,DWTST,A6 GET STATUS U P LDR A2,A1 U P
0x251600…251794 (1, 597) Dummy {f00=0x00bc, f01=0x0190, f02=»FT RQLOGG=1 U P CF A15,REQLOG V P XIF V * $ P CF A15,TENDIO COMPLETE REQUEST V 6 PRD300 EQU * V ^ P ABL TDISP GO TO DISPATCHER V r PRD400 EQU * V P LCR A1,A6 V P ANK A1,/40 V P RB(Z) RD300 4-WIRE V P ANK A2,4 V P RB(Z) RD3
0x251794…251928 Dummy {f00=0x00bc, f01=0x0190, f02=»DWTST,A6 RESET WAIT BIT V P CF A5,HALTIN W * P LDKL A1,CALIND RC: CALLING INDICATOR W 6 P RB RD200 W d P EJECT W v < P******************************************************* W P* W " P* OUTPUT AND CONTROL REQUESTS W P* W < P**********
0x251928…251abc Dummy {f00=0x00bc, f01=0x0190, f02=»ACT EQU * W P LDR A7,A7 X $ P RF(Z) TEST ORDER 00, TEST LINE X $ P SUK A7,6 X L P ABL(Z) WRT ORDER 06: WRITE X ^ P SUK A7,/22-6 X $ P RF(Z) OLIN ORDER 22, OPEN LINE X P SUK A7,2 X & P ABL(Z) CLIN ORDER 24, CLOSE LINE X P SUK A7,2 X
0x251abc…251c50 Dummy {f00=0x00bc, f01=0x018e, f02=»BL(Z) OTC ORDER 37: OPEN TC X P SUK A7,1 Y $ $ P ABL(Z) WRT150 ORDER 38,CLOSE TC Y 6 P RB MIA100 ILLEGAL ORDER Y ^ P EJECT Y ~ P* Y P* Y P* ORDER 00 TEST LINE Y P* Y PTEST EQU * Y P LD A1,DWTST,A6 GET STATUS Y P ANK A
0x251c50…251de4 Dummy {f00=0x00bc, f01=0x0190, f02=» Y P* Z POLIN EQU * Z P LD A7,DWTA7,A6 Z $ P LD A1,DWTST,A6 GET STATUS Z < P ANK A1,1 Z ^ & P RB(NZ) RD100 LINE ALREADY OPENED Z p * P LD A1,PLIST,A6 GET LENGTH OF POLLIST Z P LDR A2,A1 Z P ADR A1,A6 Z POLI100 EQU * Z P CM PLIS
0x251de4…251f78 Dummy {f00=0x00bc, f01=0x0190, f02=» Z P LD A7,DWTSAV+8,A6 [ POLI105 EQU * [ " P CF A5,HALTIN [ 6 P CF A5,STINP CONNECT MODEM [ L P LDR A1,A6 [ n P CF A15,SETIME [ P DATA OLI110,TIMMRY [ P ST A4,DWTTP,A6 [ P CF A5,READ [ P CM* DWTTP,A6 [ P RF OLI115 [ ( POL
0x251f78…25210c Dummy {f00=0x00bc, f01=0x018e, f02=»A7,DWTA7,A6 [ P ADR A5,A6 P CF A5,HALTIN & P ANK A1,1 < & P RF(NZ) OLI160 MODEM NOT OPERABLE N P LD A1,DWTST,A6 x P ANK A1,1 ( P RF(NZ) OLI130 RECOVERY AT POWER ON P LDK A1,1 ( P ORS A1,DWTST,A6 INDICATE LINE OPEN
0x25210c…2522a0 Dummy {f00=0x00bc, f01=0x0190, f02=» n POLI130 EQU * ] P LDR A1,A6 ] P LDR A4,A6 ] . P ADK A4,DWTATP ] @ & P CF A15,SETIMP SET ACTIVITY TIMER ] V P DATA OLI150,TIMACT ] $ P ABL BMM ENTER BASIC MASTER MODE ] P* ] P* ] P* ACTVITY TIME OUT ] P* ] POLI1
0x2522a0…252434 (1, 598) Dummy {f00=0x00bc, f01=0x018e, f02=»ISCON ] " P LDK A1,MODNOP RC: MOD NOT OP ^ P LD A8,DWTECB,A6 ^ 4 P RF(Z) OLI165 ^ L P CM ECBRC,A8 ^ b P IFT RQLOGG=1 ^ v P CF A15,REQLOG ^ P XIF ^ P CF A15,TENDIO ^ POLI165 EQU * ^ P LDR A6,A7 ^ P LD A8,DWTECB,A6 ^ P RF(Z)
0x252434…2525c8 Dummy {f00=0x00bc, f01=0x0190, f02=» ^ P* _ & P* CLOSE LINE / HALT POLLING _ P* _ < P* _ F PCLIN EQU * _ P P LD A1,DWTST,A6 GET STATUS _ b P ANK A1,1 _ & P ABL(Z) RD100 LINE ALREADY CLOSED _ P _ P ABL TDISP _ P EJECT _ P* _ P* _ P* ORDER 37 :
0x2525c8…25275c Dummy {f00=0x00bc, f01=0x0190, f02=»1,1 _ P ABL(Z) RD100 SEQ ERROR ` P ANKL A2,/200 ` , $ P RF(NZ) OTC110 WAITING FOR CALL ` B P LD A2,ECBCW,A8 GET TCA ` j P SUK A2,/41 ` $ P RF(N) OTC100 INVALID TC ADDRESS ` P SUK A2,/5A-/41 ` P ABL(NP) TDISP ` POTC100 EQU * ` ( P
0x25275c…2528f0 Dummy {f00=0x00bc, f01=0x0190, f02=»70 ` P EJECT a P* a P* a " P* ORDER 06 : WRITE a , P* a F P* a P PWRT EQU * a Z P LC* A2,ECBBA,A8 TCA a l PWRT105 EQU * a P LD A1,DWTST,A6 a P ANK A1,1 a P ABL(Z) RD100 SEQ ERROR a P ANK A2,/7F a 0 P CF A15,FINDTC
0x2528f0…252a84 Dummy {f00=0x00bc, f01=0x0190, f02=» IN POLLIST a v PWRT107 EQU * b P ABL TDISP b ( PWRT110 EQU * b : * P SC A4,DWTOR,A6 SAVE INDEX IN POLLIST b N P LD A1,DWTOR,A6 b | P ANK A1,/FF b P SUK A1,/38 b P RB(Z) WRT107 b " P LDK A1,TCINAC RC: TC INACTIVE b PWRT120 EQU * b
0x252a84…252c18 Dummy {f00=0x00bc, f01=0x0190, f02=» b l P RB WRT120 c P* c P* c $ P* ORDER 38: CLOSE TC c . P* c R PWRT150 EQU * c P LD A2,ECBCW,A8 TCA c p P RB WRT105 c P EJECT c P* c < P******************************************************* c < P******************
0x252c18…252dac Dummy {f00=0x00bc, f01=0x0190, f02=»*************************************************** c < P******************************************************* d < P* d | PDC81ON EQU * d P INH d P LD A3,DWMTAB TABLE LENGTH d PDRM000 EQU * d P SUK A3,2 d P RF(Z) DRM300 END ODF TABL
0x252dac…252f40 Dummy {f00=0x00bc, f01=0x0190, f02=»200 LINE CLOSED d P ANK A4,/10 e P RF(NZ) DRM250 OUTPUT DWT e , PDRM100 EQU * INPUT DWT e N P ANKL A1,/8000 e l P RB(NZ) DRM000 NO REQUEST e P LD A8,DWTECB,A6 e P LD A2,ECBEL,A8 e . P RB(Z) DRM000 NO COMPLETE MESSAGE RECEIVED e P I
0x252f40…2530d4 (1, 599) Dummy {f00=0x00bc, f01=0x0190, f02=» P ANK A4,/10 f P RB(Z) DRM000 INPUT DWT f P ANKL A1,/8000 f 8 P RB(NZ) DRM000 NO RQUEST f N P LD A1,DWTOR,A6 GET ORDER f n P ANK A1,/FF f P SUK A1,/22 f P RB(NZ) DRM000 f PDRM250 EQU * f P LDK A5,STB f P LD A7,DWTA7,A6 f
0x2530d4…253268 Dummy {f00=0x00bc, f01=0x0190, f02=»TIMMRY f P ST A4,DWTTP,A6 g P RB DRM000 g & PDRM300 RTN A15 g 8 P* g N P* REOPEN LINE g X P* g n PDRM400 EQU * g x P LDR A6,A1 g P LD A7,DWTA7,A6 g P CM DWTTP,A6 g P LDK A5,STB g P ADR A5,A6 g P ABL OLI105 REOPEN LINE
0x253268…2533fc Dummy {f00=0x00bc, f01=0x0190, f02=»*************** g h P* h P* h " 0 P* P R O C E D U R E C O N T R O L P A R T h , P* h ` P* h j < P******************************************************* h t < P******************************************************* h P* h < P**********
0x2533fc…253590 Dummy {f00=0x00bc, f01=0x018e, f02=»*************************** h t $ PBMM000 EQU * ENTRY AFTER TENDIO i $ P LDKL A1,TDISP i L P STR A1,A15 i b P LDKL A1,/C040 i v P STR A1,A15 i P SUKL A15,16 i ( PBMM010 EQU * RESTART ACTIVITY TIMER i P LDKL A1,-TIMACT i P ST* A1,DWTATP,A
0x253590…253724 Dummy {f00=0x00bc, f01=0x0190, f02=» i f PBMM100 EQU * j $ P LD A1,DWTST,A7 GET INPUT STATUS j P ABL(NN) POLL READ REQUEST j D 2 PBMM200 EQU * ENTRY AFTER ACTIVITY WITHOUT I/O j f P CF A5,STOUT j P LDK A2,PAD j P CF A5,WRITE j P RB BMM010 j P EJECT j P* j P* j
0x253724…2538b8 Dummy {f00=0x00bc, f01=0x018e, f02=»ET ECB ADDRESS j ~ . P ST A8,DWTA8,A6 LOAD A8 INTERUPT REGISTERS k P ST A8,DWTA8,A7 k H P LD A1,DWTOR,A6 GET ORDER k ` P ANK A1,/FF k P SUK A1,6 k $ P ABL(Z) SELECT ORDER 06 : WRITE k P SUK A1,/24-6 k ( P RF(Z) OUT400 ORDER 24 : CLOSE LIN
0x2538b8…253a4c Dummy {f00=0x00bc, f01=0x0190, f02=» P SUK A1,/10 l $ P RF(Z) OUT100 ORDER 37 : OPEN TC l P* l @ P* l J P* ORDER 38 : CLOSE TC l T P* l r P* l | ( P LC A3,DWTOR,A6 GET INDEX IN POLLIST l P ANK A3,/FF l P ADR A3,A6 l P CM PLIST,A3 DELETE TCA l P RF OUT300 COMPL
0x253a4c…253be0 Dummy {f00=0x00bc, f01=0x0190, f02=»8 GET TCA l . P CF A15,FINDTC CHECK IF IT'S ALREADY THERE m P RF(P) OUT105 TCA NOT FOUND m D " P RF OUT300 TC ALLREADY IN LIST m h POUT105 EQU * m P LDK A2,0 m 4 P CF A15,FINDTC SEARCH EMPTY PLACE IN POLLINGLIST m P RF(Z) OUT110 m : P LDK A
0x253be0…253d74 (1, 600) Dummy {f00=0x00bd, f01=0x0190, f02=»EX IN POLLIST m x P LD A1,ECBCW,A8 GET TCA n " P ORKL A1,/8000 SET TC INACTIVE n 6 ( P STR A1,A3 INSERT TCA IN POLLINGLIST n P ANK A1,/7F n P LDKL A2,RTYLIM n ( P ST A2,DWTRTY,A6 RESET RETRY COUNTER n P IFF BDA=1 n ( P ORK A1,/20 MODIFY TCA
0x253d74…253f08 Dummy {f00=0x00bd, f01=0x0190, f02=»STA n & P CF A5,SEPOSE SEND SELECT SEQUENCE o 6 P CF A5,READTO WAIT FOR REPLY WITH TIME SUPERVISION o 6 P LDR A2,A2 o p P RF(N) OUT130 o POUT125 EQU * o P CF A5,READP o 0 P RB(NN) OUT125 WAIT FOR END OF TRANSMISSION o , P CF A5,HALTIN DLE,0
0x253f08…25409c Dummy {f00=0x00bd, f01=0x0190, f02=»ST o n P ANK A2,/FF p P ADR A2,A6 p P ADK A2,PLIST p 0 P STR A3,A2 SET TC ACTIVE p F P LD A1,PACT,A6 p f $ P RF(NZ) OUT300 NOT FIRST IN LIST p | P ST A2,PACT,A6 p P RF OUT300 p POUT130 EQU * p P CF A5,HALTIN HALT INPUT p ( P IM DWTR
0x25409c…254230 Dummy {f00=0x00bd, f01=0x018e, f02=»ST IN LIST p z ( P LC A2,DWTOR,A6 GET INDEX IN POLLIST q P ANK A2,/FF q > P ADR A2,A6 q R P ADK A2,PLIST q d P ST A2,PINACT,A6 q z POUT150 EQU * q 0 P LDK A1,TCINAC SET RETURN CODE : TC INACTIVE q P RF OUT310 q P EJECT q P* q P* q
0x254230…2543c4 Dummy {f00=0x00bd, f01=0x0190, f02=» q r " P LDK A1,POLHLT RC:POLL HALTED r P LDR A6,A7 r . P IFT RQLOGG=1 r @ P CF A15,REQLOG r V P XIF r l P CF A15,TENDIO r x P LD A6,DWTA6,A7 RELOAD A6 r POUT300 EQU * r P LDK A1,0 r POUT310 EQU * r P IFT RQLOGG=1 r P CF A15,
0x2543c4…254558 Dummy {f00=0x00bd, f01=0x018e, f02=» P LD A1,DWTST,A7 s P ANK A1,2 s , P RB(Z) OUT300 POLLING ALLREADY PERMITTED s . P XRS A1,DWTST,A7 s ^ P RB OUT300 s v P EJECT s P* s P* s $ P* ORDER /24 : CLOSE LINE s P* s P* s POUT400 EQU * s " P CF A5,DISCON
0x254558…2546ec Dummy {f00=0x00bd, f01=0x0190, f02=» s P LDR A6,A7 t P IFT RQLOGG=1 t P CF A15,REQLOG t 0 P XIF t F P ABL DISEND t R P EJECT t f P* t t P* t ~ P* t P* t < P******************************************************* t < P********************************************
0x2546ec…254880 Dummy {f00=0x00bd, f01=0x0190, f02=»********************************* t z < P******************************************************* u * P* u j P* u t " P* POLL : PERFORM READ REQUEST u ~ P* u P* u PPOLL EQU * u P ANK A1,2 u P RF(Z) POL100 u P* POLL HALTED u
0x254880…254a14 (1, 601) Dummy {f00=0x00bd, f01=0x018e, f02=»LL10 EQU * COMPLETE READREQ AFTER DELAY u P LDR A7,A1 RELOAD A7 v 0 P LD A6,DWTA6,A7 RELOAD A6 v L P CM DWTTP,A7 v n P LDK A5,STB v P ADR A5,A6 v P LD A8,DWTECB,A7 v " P CM ECBRC,A8 RESET RETURN CODE v P LDK A1,POLHLT v P RF POL225 v
0x254a14…254ba8 Dummy {f00=0x00bd, f01=0x0190, f02=» P LD A1,PACT,A6 w ( P RF(Z) POL130 NO ACTIVE TCA PRESENT w PPOL110 EQU * w F P ADK A1,2 w Z P LDR* A3,A1 GET NEXT TCA w l P RB(Z) POL110 EMPTY PLACE w " P RF(NN) POL150 ACTIVE TC FOUND w P ADK A3,1 w P RB(NZ) POL110 INACTIVE TCA w
0x254ba8…254d3c Dummy {f00=0x00bd, f01=0x0190, f02=» ABL(Z) BMM200 NO INACTIVE TC PRESENT w PPOL132 EQU * x . P ADK A1,2 NEXT POS IN LIST x B P CW A1,PINACT,A6 x d P RF(E) POL134 LIST SCANNED x | P LDR* A3,A1 x " P RB(NN) POL132 NOT INACTIVE TC x P ADK A3,1 x $ P RF(NZ) POL138 INACTIVE TC FOU
0x254d3c…254ed0 Dummy {f00=0x00bd, f01=0x0190, f02=»OL140 INACTIVE TC FOUND x ( P CM PINACT,A6 NO INACTIVE TC IN LIST y P ABL BMM200 y L PPOL138 EQU * y ` P SUK A3,1 y t PPOL140 EQU * y $ P ST A1,PINACT,A6 UPPDATE PINACT y P LDK A1,/FF y ( P SC A1,DWTOR,A7 INDICATE INACTIVE TC y ( P LDKL
0x254ed0…255064 Dummy {f00=0x00bd, f01=0x0190, f02=»,DWTOR,A7 INDICATE ACTIVE TC y P LDKL A2,RTYLIM z $ " PPOL200 EQU * INITIATE POLLING z < ( P ST A2,DWTRTY,A6 RESET RETRYCOUNTER z b P SC* A3,ECBBA,A8 SC*ORE TCA z P IFT BDA=1 z P ANK A3,/7F z P SUK A3,/41 TABLE INDEX z P LC A3,POLTAB,A3
0x255064…2551f8 Dummy {f00=0x00bd, f01=0x0190, f02=»DTO WAIT FOR REPLY z P LDR A2,A2 { P RF(NN) POL230 { , PPOL215 EQU * { B P CF A5,HALTIN { V P ANK A1,1 { l & P ABL(NZ) OLI160 MODEM NOT OPERABLE { ~ P IM DWTRTY,A6 { 0 P RB(N) POL210 LIMIT NOT REACHED , TRY AGAIN { PPOL220 EQU * { P C
0x2551f8…25538c Dummy {f00=0x00bd, f01=0x0190, f02=»A3,/8000 SET TC INACTIVE { P ST* A3,PACT,A6 | P LD A2,PINACT,A6 | 8 P RF(NZ) POL224 | P P LD A1,PACT,A6 | f P ST A1,PINACT,A6 | | PPOL224 EQU * | 0 P LDK A1,TCINAC SET RETURN CODE : TC INACTIVE | PPOL225 EQU * | P LDR A6,A7 | P IFT R
0x25538c…255520 Dummy {f00=0x00bd, f01=0x0190, f02=» PPOL230 EQU * } P CWK A2,STX } P RF(E) MIP STX RECEIVED } , P CWK A2,EOT } L P RF(E) POL240 } ` PPOL235 EQU * } v & P CF A5,READP WAIT FOR CARRIER DOWN } P RB(NN) POL235 } PPOL240 EQU * } P CF A5,HALTIN } P LD A1,DWTOR,A7 }
0x255520…2556b4 (1, 602) Dummy {f00=0x00bd, f01=0x018e, f02=»T TC ACTIVE } | P LD A3,PACT,A6 ~ P RF(NZ) POL250 ~ * P LD A1,PINACT,A6 ~ @ P ST A1,PACT,A6 ~ X PPOL250 EQU * ~ n P LDKL A1,TCACT RC: TC ACTIVE ~ P RB POL225 ~ P EJECT ~ P* ~ P* ~ P* MIP : MESSAGE INPUT ~ P* ~ P* ~
0x2556b4…255848 Dummy {f00=0x00bd, f01=0x0190, f02=» ~ v $ P CM DWTACK,A6 RESET ACK COUNTER $ P CM DWTBCC,A6 RESET BCC COUNTER 0 P CF A5,READP READ TCA X $ P RF(NZ) MIP110 SST OR PAR ERROR v P XRS A2,DWTBCC,A6 P IFT BDA=0 P CC* A2,ECBBA,A8 P RF(NE) MIP110 P XIF PMIP1
0x255848…2559dc Dummy {f00=0x00bd, f01=0x0190, f02=»CALCULATE BCC ~ P CWK A2,ETB P RF(E) MIP210 ETB RECEIVED * P CWK A2,ETX L P ABL(E) MIP220 ETX RECEIVED ` P CWK A2,SYN P RB(E) MIP100 SKIP SYN P LDR A3,A4 P AD A3,ECBBA,A8 P SCR A2,A3 P ADK A4,1 PMIP1
0x2559dc…255b70 Dummy {f00=0x00bd, f01=0x0190, f02=»2,ETX P RF(E) MIP220 . PMIP110 EQU * PARITY ERROR, BUFFER OVERFLOW $ 4 P CF A5,READP WAIT FOR END OF TRANSMISSION BLOCK V " P RF(N) MIP130 STATUS INTERRUPT P CWK A2,ETB P RF(E) MIP120 ETB RECEIVED P CWK A2,ETX $ P RB(NE) MI
0x255b70…255d04 Dummy {f00=0x00bd, f01=0x0190, f02=» PMIP135 EQU * P CF A5,HALTIN P IM DWTRTY,A6 . ( P RF(NL) MIP200 RETRY LIMIT OVERFLOW D P CF A5,WRNAK SEND NAK p P LDKL A2,RETRAN 0 P ORS A2,ECBRC,A8 PRELOAD RC: RETRANSMISSION PMIP140 EQU * P CF A5,REDLTS WAIT FOR REP
0x255d04…255e98 Dummy {f00=0x00bd, f01=0x018e, f02=»BL(E) POL240 EOT RECEIVED P LDR A2,A2 " P RF(N) MIP155 TIME OUT 4 PMIP150 EQU * R P CF A5,READP f 0 P RB(NN) MIP150 WAIT FOR END OF TRANSMISSION z P LDKL A1,RETRAN P ORS A1,ECBRC,A8 PMIP155 EQU * P CF A5,HALTIN P
0x255e98…25602c Dummy {f00=0x00bd, f01=0x0190, f02=» P RB MIP140 PMIP160 EQU * P LDR A3,A3 * & P RB(NZ) MIP105 RECEIVE NEXT BLOCK < P SUKL A4,MAXTBL f P RB(N) MIP050 1:ST BLOCK ~ P SUK A4,1 P RB(E) MIP050 1:ST BLOCK P LDK A1,0 PMIP165 EQU * P ADK A1,1 P
0x25602c…2561c0 Dummy {f00=0x00bd, f01=0x0190, f02=»170 P CM DWTBCC,A6 P RB MIP100 " PMIP200 EQU * 4 P CF A5,WREOT SEND EOT H P CM ECBRC,A8 f P CW A4,ECBRL,A8 z " P RF(G) MIP260 BUFFER OVERFLOW P CM ECBEL,A8 P ABL POL220 PMIP210 EQU * P CF A5,READP READ BC
0x2561c0…256354 (1, 603) Dummy {f00=0x00bd, f01=0x0190, f02=»N HALT INPUT P CF A5,WRACK SEND ACK 0/1 P LDKL A1,RTYLIM 6 ( P ST A1,DWTRTY,A6 RESET RETRY COUNTER N PMIP215 EQU * z P CF A5,REDLTS P CWK A2,STX P RB(E) MIP105 P CWK A2,ENQ P RB(NE) MIP145 P CF A5,HALTIN
0x256354…2564e8 Dummy {f00=0x00bd, f01=0x0190, f02=»20 EQU * P CF A5,READP READ BCC P RB(NZ) MIP130 PARITY ERROR . P CW A2,DWTBCC,A6 R P RB(NE) MIP130 BCC ERROR j PMIP225 EQU * P CF A5,HALTIN HALT INPUT P CF A5,WRACK SEND ACK 0/1 P ST A4,ECBEL,A8 & P CF A5,REDLTS WA
0x2564e8…25667c Dummy {f00=0x00bd, f01=0x0190, f02=»MIP240 $ P LDK A1,1 ENQ HAS BEEN RECEIVED * P XRS A1,DWTACK,A6 INCREASE ACK COUNTER 6 P LDKL A2,RETRAN d 0 P ORS A2,ECBRC,A8 PRELOAD RC: RETRANSMISSION | P IM DWTRTY,A6 ( P RB(NL) MIP200 RETRY LIMIT OVERFLOW P RB MIP225 REPEAT LAST
0x25667c…256810 Dummy {f00=0x00bd, f01=0x0190, f02=»7 $ P ABL(NN) POL225 TC NOT INACTIVE P ABL POL245 SET TC ACTIVE 2 PMIP260 EQU * BUFFER OVERFLOw T P CM ECBRC,A8 x ( P LDK A1,INCLEN RC: INCORRECT LENGTH P ABL POL225 P EJECT P* P* & P* SELECT : TRANSFER MESSAG
0x256810…2569a4 Dummy {f00=0x00bd, f01=0x0190, f02=»,RTYLIM ( P ST A1,DWTRTY,A6 RESET RETRY COUNTER PSEL100 EQU * < & P LD A4,ECBBA,A8 GET BUFFER ADDRESS P P LCR A3,A4 GET TCA z P IFF BDA=1 P ORK A3,/20 MODIFY TCA P XIF P IFT BDA=1 P CF A5,SELADR P XIF P LC
0x2569a4…256b38 Dummy {f00=0x00bd, f01=0x0190, f02=» P RF(NN) SEL120 P CF A5,HALTIN P ANK A1,1 0 P ABL(NZ) OLI160 MOD NOT OP B PSEL110 EQU * d " P IM DWTRTY,A6 RECEIVE TIMEOUT x 0 P RB(N) SEL100 LIMIT NOT REACHED , TRY AGAIN PSEL115 EQU * P CF A5,WREOT P CM ECBRC,A8
0x256b38…256ccc Dummy {f00=0x00bd, f01=0x018e, f02=»T l P LC* A3,ECBBA,A8 P ANK A3,/7F " ( P LC A2,DWTOR,A6 GET INDEX IN POLLIST 6 P ANK A2,/FF b P ADR A2,A6 v P ADK A2,PLIST " P ORKL A3,/8000 SET TC INACTIVE P STR A3,A2 P LD A1,PINACT,A6 ( P ABL(NZ) BMM000 NOT 1:ST I
0x256ccc…256e60 Dummy {f00=0x00bd, f01=0x0190, f02=» " P CF A5,READ GET NEXT CHARACTER P CF A5,HALTIN * P CWK A2,PAR:0 @ P RF(E) MUT ACK 0 RECEIVED V P CWK A2,SEMIKO x P RB(NE) SEL110 INVALID REPLY PSEL130 EQU * P LD A1,DWTTP,A6 6 P ABL(NZ) BMM100 TIME SUPERVISIOM ALLREADY
0x256e60…256ff4 (1, 604) Dummy {f00=0x00be, f01=0x0190, f02=»QU * TC BUSY TIME OUT P LDR A6,A1 P LDK A5,STB 0 P ADR A5,A6 D P LD A7,DWTA7,A6 V $ P CM DWTTP,A6 CLEAR TIMER POINTER n P LDK A1,4 & P ORS A1,DWTST,A6 INDICATE TC BUSY P ABL READ10 RETURN * PSEL160 EQU * COMPLETE REQUES
0x256ff4…257188 Dummy {f00=0x00be, f01=0x018e, f02=»A15,REQLOG P XIF * P CF A15,TENDIO COMPLETE WRITE REQUEST P CF A5,WREOT SEND EOT L P ABL BMM000 j P EJECT ~ P* P* P* MUT : MESSAGE OUTPUT P* P* PMUT EQU * P LD A1,DWTTP,A6 P RF(Z) MUT00
0x257188…25731c Dummy {f00=0x00be, f01=0x0190, f02=» x P ST A3,ECBEL,A8 P AD A3,ECBBA,A8 PMUT100 EQU * 8 P LDKL A1,RTYLIM L ( P ST A1,DWTRTY,A6 RESET RETRY COUNTER d PMUT110 EQU * $ P CM DWTBCC,A6 RESET BCC COUNTER 0 P CF A5,WRSYN START TRANSMITTER AND SEND SYN P LDK A2,
0x25731c…2574b0 Dummy {f00=0x00be, f01=0x018e, f02=»CBRL,A8 ( P RF(E) MUT150 END OF MESSAGE REACHED P CWK A4,MAXTBL < 4 P RF(E) MUT140 END OF TRANSMISSION BLOCK REACHED R P LCR A2,A3 P IM ECBEL,A8 P ADK A3,1 $ P ADK A4,1 INCREMENT BLOCK INDEX P ANK A2,/7F P CWK A2,ET
0x2574b0…257644 Dummy {f00=0x00be, f01=0x0190, f02=» $ P CF A5,WRITEP SEND ONE CHARACTER P RB MUT120 , PMUT135 EQU * > ( P LDK A1,CODERR RC: CODE CHECK ERROR R P ORS A1,ECBRC,A8 ~ * P LDK A2,/20 REPLACE ILLEGAL CHARACTER P RB MUT130 PMUT140 EQU * P LDK A2,ETBP P RF MUT160
0x257644…2577d8 Dummy {f00=0x00be, f01=0x0190, f02=» P LD A2,DWTBCC,A6 P CF A5,WRITEP SEND BCC P LDK A2,PAD : P CF A5,WRITE SEND PAD N P LDK A1,1 l * P XRS A1,DWTACK,A6 INCREASE ACK COUNTER ~ " P CF A5,HALTUT TERMINATE OUTPUT PMUT170 EQU * P CF A5,READTO WAIT FOR REPLY
0x2577d8…25796c Dummy {f00=0x00be, f01=0x0190, f02=»RS A1,ECBRC,A8 PRELOAD RC: RETRANSMISSION P IM DWTRTY,A6 2 ( P ABL(NL) SEL115 RETRY LIMIT OVERFLOW H P CF A5,WRENQ SEND ENQ t P RB MUT170 PMUT190 EQU * P CWK A2,DLE P RF(NE) MUT220 P CF A5,READ DLE RECEIVED P CF A5
0x25796c…257b00 Dummy {f00=0x00be, f01=0x0190, f02=» P RB(NE) MUT180 & PMUT200 EQU * CORRECT ACKK RECEIVED P LD A1,ECBEL,A8 D P CW A1,ECBRL,A8 & P RB(NE) MUT100 NOT END OF MESSAGE t " PMUT205 EQU * TRANSFER COMPLETE P CF A5,WREOT SEND EOT P LDK A1,0 P IFT RQLOGG=1
0x257b00…257c94 (1, 605) Dummy {f00=0x00be, f01=0x0190, f02=» P RB(E) MUT200 ACK 0 RECEIVED P RB MUT180 , PMUT220 EQU * > P CF A5,HALTIN R P CWK A2,NAK h P RF(NE) MUT230 | $ PMUT225 EQU * NAK OR ENQ RECEIVED P IM DWTRTY,A6 ( P ABL(NL) SEL115 RETRY LIMIT OVERFLOW P LDK A1,1
0x257c94…257e28 Dummy {f00=0x00be, f01=0x018e, f02=» P ABL MUT110 PMUT230 EQU * P CWK A2,ENQ , P RB(E) MUT225 ENQ RECEIVED @ P RB MUT180 b PMUT250 EQU * WACK RECEIVED t P LD A1,ECBEL,A8 P CW A1,ECBRL,A8 , P RB(E) MUT205 COMPLETE MESSAGE TRANFERED P ABL SEL130 TC BUS
0x257e28…257fbc Dummy {f00=0x00be, f01=0x0190, f02=» n $ P* A4 CONTAINS STA / GP P* 0 P* : 0 PSEPOSE CF A5,WRSYN START OUTPUT AND SEND SYN D P LDK A2,EOT x P CF A5,WRITE SEND EOT P LDK A2,PAD P CF A5,WRITE SEND PAD P CF A5,WRSY10 SEND SYN P LDR A2,A3
0x257fbc…258150 Dummy {f00=0x00be, f01=0x0190, f02=»DR A2,A4 P CF A5,WRITEP P LDK A2,ENQ & P CF A5,WRITE SEND ENQ : P LDK A2,PAD X P CF A5,WRITE l P LDK A2,PAD P CF A5,WRITE " P CF A5,HALTUT TERMINATE OUTPUT P RTN A5 P EJECT P* P* $ P* START
0x258150…2582e4 Dummy {f00=0x00be, f01=0x0190, f02=»A2,NUMSYN NUMBER OF SYNC CHARACTERS P ST A2,SYNCON,A7 , PWRSY20 EQU * D P LDK A2,SYN X P CF A5,WRITE l P IM SYNCON,A7 P RB(NZ) WRSY20 P RTN A5 P EJECT P* P* P* WREOT : SEND SINGLE EOT P*
0x2582e4…258478 Dummy {f00=0x00be, f01=0x0190, f02=»U * P LDK A2,PAD P CF A5,WRITE SEND PAD P LDK A2,PAD > P CF A5,WRITE R " P CF A5,HALTUT TERMINATE OUTPUT f P RTN A5 P* P* P* WRENQ : SEND SINGLE ENQ P* P* PWRENQ EQU * * P CF A5,WRSYN S
0x258478…25860c Dummy {f00=0x00be, f01=0x0190, f02=»WRNAK : SEND SINGLE NAK P* P* * PWRNAK EQU * 4 * P CF A5,WRSYN START OUTPUT AND SEND SYN H P LDK A2,NAK v P CF A5,WRITE SEND NAK P RB WRE10 P* P* " P* WRACK : SEND ACK-0 OR ACK-1 P* P* P
0x25860c…2587a0 Dummy {f00=0x00be, f01=0x018e, f02=»RS A2,DWTACK,A6 INCREASE ACK COUNTER P LD A2,DWTACK,A6 , P RF(NZ) WRA10 D P LDK A2,PAR:0 Z P RF WRA20 p PWRA10 EQU * P LDK A2,'1' PWRA20 EQU * P CF A5,WRITE SEND '0' OR '1' P RB WRE10 P EJECT P*
0x2587a0…258934 (1, 606) Dummy {f00=0x00be, f01=0x018e, f02=» P CIO A2,1,0 P LDKL A2,/100+SYN P EXR A1 2 . P ABL(NA) SST055 HW NOT PRESENT OR ERRONEUS B P RTN A5 t P* P* P* STOUT : START TRANSMITTER P* P* PSTOUT EQU * P LDR* A1,A6 P ADR* A1,P
0x258934…258ac8 Dummy {f00=0x00be, f01=0x0190, f02=» P* P* DISCON : DISCONNECT MODEM P* 2 P* < PDISCON EQU * F P LDK A1,0 Z P SC A1,DWTST+1,A6 l P SC A1,DWTST+1,A7 P CF A5,HALTIN P CF A5,HALTUT P LDR* A1,A7 P ADR* A1,P P CIO A2,1,0 P L
0x258ac8…258c5c Dummy {f00=0x00be, f01=0x018e, f02=»TATP,A6 PDISC10 EQU * P LD A1,DWTTP,A6 $ P RF(Z) DISC20 < P CM* DWTTP,A6 R P CM DWTTP,A6 h PDISC20 EQU * | P LD A1,DWTTP,A7 P RF(Z) DISC30 P CM* DWTTP,A7 P CM DWTTP,A7 PDISC30 EQU * P RTN A5
0x258c5c…258df0 Dummy {f00=0x00be, f01=0x0190, f02=» P ADR* A1,P P CIO A1,0,0 P EXR A1 * P ORKL A1,/840 A1:= SST INSTR : P EXR A1 ^ P RTN A5 n P* ~ P* P* HALTUT : HALT LINE OUTPUT P* P* PHALTUT EQU * P LDR* A1,A6 P RB HALTIO P EJE
0x258df0…258f84 Dummy {f00=0x00be, f01=0x0190, f02=» P LC A2,PARTAB,A2 P* P* * $ P* WRITE : TRANSMIT ONE CHARACTER 4 P* P* f PWRITE EQU * p " P LDR* A1,A6 GET DEVICE ADDRESS P ADR* A1,P P OTR A2,0,0 P EXR A1 P RF(NA) WRI300 P IFF LOGG=0
0x258f84…259118 Dummy {f00=0x00be, f01=0x0190, f02=»READ10 PWRI300 EQU * P LDR* A1,A6 " P ADR* A1,P 6 P SST A1,0 H P EXR A1 Z " P IM TPCONT,A7 COUNT TP-ERRORS j P LDK A5,STB P ADR A5,A6 P ABL BMM RESTART REQUEST P EJECT P* P* * P* READTO : READ
0x259118…2592ac Dummy {f00=0x00be, f01=0x0190, f02=»DR A1,A7 & P CF A15,SETIME START RECEIVE TIMER P DATA RET040 : P DATA TIMRE4 N PREADT0 EQU * b ( P ST A4,DWTTP,A7 STORE TIMER POINTER v P LD A4,DWTSAV+2,A7 PRESYNC EQU * RESYNCRONIZE P CF A5,STINP PRES20 EQU * P C
0x2592ac…259440 Dummy {f00=0x00be, f01=0x0190, f02=» FOR NEXT r $ P CM* DWTTP,A7 HALT RECEIVE TIMER P CM DWTTP,A7 : P RTN A5 N P EJECT ^ PRET040 EQU * TIME OUT ENTRY l P LDR A7,A1 P CM DWTTP,A7 P LDK A5,4 P ADS A5,DWTA5,A7 P LDKL A2,/8000 PRETO50 EQU *
0x259440…2595d4 (1, 607) Dummy {f00=0x00be, f01=0x018e, f02=»,DWTSAV+2,A7 P LDR A1,A7 P CF A15,SETIME & P DATA RET040,TIMENQ < P RB READT0 X P EJECT j P* x P* . P* READP : READ CHARACTER AND CHECK PARITY * P* ON PARITY ERROR CR POSITIVE P* P* PREADP EQ
0x2595d4…259768 Dummy {f00=0x00be, f01=0x0190, f02=» P ANK A2,/7F P CC A1,PARTAB,A2 P RF(N) READP1 0 PREDRET ABR* A5 F PREADP1 ADK A1,1 P RB REDRET t P EJECT P* P* READ : SAVE REGISTER A3-A5 2 P* RELOAD REGISTER A1-A8 FROM A15 STACK * P* RETURN
0x259768…2598fc Dummy {f00=0x00be, f01=0x0190, f02=»AD05 EQU * PREAD10 EQU * P IFT CPU852=1 & P LDR* A8,A15 < P LDR* A7,A15 P P LDR* A6,A15 d P LDR* A5,A15 x P LDR* A4,A15 P LDR* A3,A15 P LDR* A2,A15 P LDR* A1,A15 P XIF P IFF CPU852=1 P MLR 8,A15
0x2598fc…259a90 Dummy {f00=0x00be, f01=0x0190, f02=» P ST A2,2,A15 P STR A3,A15 P STR A4,A15 0 P STR A5,A15 D P STR A6,A15 X P STR A7,A15 l P STR A8,A15 P LD A2,16,A15 P ST A1,16,A15 P ABR A2 P XIF P IFF CPU852=1 P ST A8,-10,A15 P
0x259a90…259c24 Dummy {f00=0x00be, f01=0x0190, f02=»* Z P* ( P* INTERRUPT HANDLER , CHLC RECEIVER P* @ < P******************************************************* J P* P* P* PIH8101 EQU * P ST P,INTSAV P CF A15,SAVER P LDKL A7,DW8101 , P INR A2,0,
0x259c24…259db8 Dummy {f00=0x00be, f01=0x0190, f02=»I200 EQU * P LD A3,DWTSAV,A7 P LD A4,DWTSAV+2,A7 * P LD A5,DWTSAV+4,A7 D P LD A6,DWTA6,A7 ^ P LD A8,DWTA8,A7 v P RTN A5 P IFF HILINO=1 P EJECT P* P* P* PIH8103 EQU * P ST P,INTSAV P
0x259db8…259f4c Dummy {f00=0x00be, f01=0x0190, f02=»FF HILINO=2 P EJECT P* " P* , P* 6 PIH8105 EQU * @ P ST P,INTSAV T P CF A15,SAVER h P LDKL A7,DW8105 ~ , P INR A2,0,DAMI03 GET CHARACTER FROM LINE P RB(A) IHI100 P ABL SSTIN P IFF HILINO=3 P EJE
0x259f4c…25a0e0 Dummy {f00=0x00be, f01=0x0190, f02=»DAMI04 GET CHARACTER FROM LINE P RB(A) IHI100 & P RF SSTIN < P IFF HILINO=4 N P EJECT d P* r P* | P* PIH8109 EQU * P ST P,INTSAV P CF A15,SAVER P LDKL A7,DW8109 , P INR A2,0,DAMI05 GET CHARACTER FRO
0x25a0e0…25a274 (1, 608) Dummy {f00=0x00bf, f01=0x0190, f02=» P ST P,INTSAV P CF A15,SAVER P LDKL A7,DW8111 . , P INR A2,0,DAMI06 GET CHARACTER FROM LINE F P RB(A) IHI100 v P RF SSTIN P IFF HILINO=6 P EJECT P* P* P* PIH8113 EQU * P ST P,INTSAV P
0x25a274…25a408 Dummy {f00=0x00bf, f01=0x0190, f02=»FF HILINO=7 P EJECT P* " P* , P* 6 PIH8115 EQU * @ P ST P,INTSAV T P CF A15,SAVER h P LDKL A7,DW8115 ~ , P INR A2,0,DAMI08 GET CHARACTER FROM LINE P RB(A) IHI100 P RF SSTIN P IFF HILINO=8 P EJE
0x25a408…25a59c Dummy {f00=0x00bf, f01=0x0190, f02=»DAMI09 GET CHARACTER FROM LINE P ABL(A) IHI100 & P RF SSTIN < P IFF HILINO=9 N P EJECT d P* r P* | P* PIH8119 EQU * P ST P,INTSAV P CF A15,SAVER P LDKL A7,DW8119 , P INR A2,0,DAMI10 GET CHARACTER FRO
0x25a59c…25a730 Dummy {f00=0x00bf, f01=0x0190, f02=» P ST P,INTSAV P CF A15,SAVER P LDKL A7,DW8121 . , P INR A2,0,DAMI11 GET CHARACTER FROM LINE F P ABL(A) IHI100 v P RF SSTIN P IFF HILINO=11 P EJECT P* P* P* PIH8123 EQU * P ST P,INTSAV P
0x25a730…25a8c4 Dummy {f00=0x00bf, f01=0x0190, f02=»IF P EJECT < P******************************************************* P* X . P* STATUS INTERRUPT HANDLER , CHLC RECEIVER b P* < P******************************************************* P* P* P* PSSTIN EQU *
0x25a8c4…25aa58 Dummy {f00=0x00bf, f01=0x0190, f02=»ST P XIF P LDR A1,A2 P RF(NZ) SST030 ( P LDR* A1,A7 > P ADR* A1,P R P CIO A2,1,0 d P LDKL A2,/116 x P EXR A1 START INPUT P ABL READ10 PSST030 EQU * P ANK A1,2 P RF(Z) SST050 " P IM TPCONT,A7
0x25aa58…25abec Dummy {f00=0x00bf, f01=0x0190, f02=» A5,STB P ADR A5,A6 P ABL BMM RESTART REQUEST " PSST050 EQU * B P LDR A1,A2 V P ANK A1,1 h P RF(Z) SST070 z PSST055 EQU * CLOSE LINE P LDK A5,STB P ADR A5,A6 P CF A5,DISCON PSST65 EQU * * P LDK A1,
0x25abec…25ad80 Dummy {f00=0x00bf, f01=0x0190, f02=»QLOG P XIF P CF A15,TENDIO PSST067 EQU * . P LDR A6,A7 B P LD A8,DWTECB,A6 T P RF(Z) SST069 l P CM ECBRC,A8 P IFT RQLOGG=1 P CF A15,REQLOG P XIF PSST069 EQU * P ABL DISEND PSST070 EQU * 2
0x25ad80…25af14 (1, 609) Dummy {f00=0x00bf, f01=0x0190, f02=»********* b P* * P* INTERRUPT HANDLER , CHLC TRANSMITTER P* J < P******************************************************* T P* P* P* PIH8102 EQU * P ST P,INTSAV P CF A15,SAVER P LDKL A6,DW8102 P
0x25af14…25b0a8 Dummy {f00=0x00bf, f01=0x0190, f02=» P RTN A5 P IFF HILINO=1 P EJECT . P* < P* F P* P PIH8104 EQU * Z P ST P,INTSAV n P CF A15,SAVER P LDKL A6,DW8104 P RB IHU100 P IFF HILINO=2 P EJECT P* P* P* PIH81
0x25b0a8…25b23c Dummy {f00=0x00bf, f01=0x0190, f02=»* P* P* PIH8108 EQU * P ST P,INTSAV 2 P CF A15,SAVER F P LDKL A6,DW8108 P RB IHU100 t P IFF HILINO=4 P EJECT P* P* P* PIH8110 EQU * P ST P,INTSAV P CF A15,SAVER P L
0x25b23c…25b3d0 Dummy {f00=0x00bf, f01=0x0190, f02=»AV P CF A15,SAVER P LDKL A6,DW8112 P RB IHU100 8 P IFF HILINO=6 J P EJECT ` P* n P* x P* PIH8114 EQU * P ST P,INTSAV P CF A15,SAVER P LDKL A6,DW8114 P RB IHU100 P IFF HILINO=7
0x25b3d0…25b564 Dummy {f00=0x00bf, f01=0x018e, f02=»IHU100 P IFF HILINO=8 P EJECT $ P* 2 P* < P* F PIH8118 EQU * P P ST P,INTSAV d P CF A15,SAVER x P LDKL A6,DW8118 P RB IHU100 P IFF HILINO=9 P EJECT P* P* P* PIH8120 EQU *
0x25b564…25b6f8 Dummy {f00=0x00bf, f01=0x0190, f02=» P* P* PIH8122 EQU * P ST P,INTSAV , P CF A15,SAVER @ P LDKL A6,DW8122 V P ABL IHU100 n P IFF HILINO=11 P EJECT P* P* P* PIH8124 EQU * P ST P,INTSAV P CF A15,SAVER P LDKL
0x25b6f8…25b88c Dummy {f00=0x00bf, f01=0x0190, f02=»T v P* P* A2 CONTAINS TCA AT ENTRY P* 6 . P* A3 CONTAINS ADDRESS TO FOUND TC AT EXIT @ , P* A4 CONTAINS INDEX IN LIST TO FOUND TC r P* P* A1 A3 A4 ARE DESTROYED " P* CR = (Z) : ACTIVE TCA FOUND $ P* CR = (N) : INACTIVE
0x25b88c…25ba20 Dummy {f00=0x00bf, f01=0x0190, f02=»TH OF POLLINGLIST x P LDR A3,A6 P ADK A3,PLIST , P ADR A3,A4 B PFIND10 EQU * T P LDR* A1,A3 GET TCA h P CWR A1,A2 " P RF(E) FIND40 ACTIVE TC FOUND P ANK A1,/FF P CWR A1,A2 $ P RF(E) FIND30 INACTIVE TC FOUND
0x25ba20…25bbb4 (1, 610) Dummy {f00=0x00bf, f01=0x0190, f02=»DR* A1,A3 PFIND40 EQU * P ABR* A15 & P* 8 P* B PPARTAB EQU * L P* ` P NLIST j @ P DATA /8001,/0283,/0485,/8607,/0889,/8A0B,/8C0D,/0E8F,/1091 x @ P DATA /9213,/9415,/1697,/9819,/1A9B,/1C9D,/9E1F,/20A1,/A223 " P DATA /A
0x25bbb4…25bd48 Dummy {f00=0x00bf, f01=0x0190, f02=»849,/4ACB,/4CCD,/CE4F j @ P DATA /D051,/52D3,/54D5,/D657,/58D9,/DA5B,/DC5D,/5EDF,/E061 @ P DATA /62E3,/64E5,/E667,/68E9,/EA6B,/EC6D,/6EEF,/70F1,/F273 b . P DATA /F475,/76F7,/F879,/7AFB,/7CFD,/FE7F P LIST P EJECT P* P* P
0x25bd48…25bedc Dummy {f00=0x00bf, f01=0x0190, f02=»TIMER P* P LDR A1,A6 P CF A15,SETIME * P DATA TLTO,TIMACT @ P ST A4,DWTATP,A6 Z P* r P* CONNECT MODEM | P* P LD A7,DWTA7,A6 P ST A8,DWTA8,A7 P CF A5,STINP P LDR A1,A6 P CF A15,SETIME
0x25bedc…25c070 Dummy {f00=0x00bf, f01=0x0190, f02=»DR A6,A1 PTES030 EQU * P CM DWTTP,A6 $ P LD A7,DWTA7,A6 8 P LD A8,DWTA8,A7 P P LDK A5,STB h P ADR A5,A6 | P CF A5,HALTIN P ANK A1,1 & P RF(NZ) TES330 MODEM NOT OPERABLE P* & P* START INPUT AND SEND SYNCPAT
0x25c070…25c204 Dummy {f00=0x00bf, f01=0x0190, f02=»ECBCW,A8 RESET BIT ERROR COUNTER P CF A5,STINP ( P CF A5,WRSYN < P* P P* TRANSMITT TEST PATTERN Z P* z PTES100 EQU * ( P LDK A4,0 BIT AND CHARACTER COUNTER " P LDKL A3,/1FF 1:ST SHIFT STATE PTES110 EQU * P LDR A2,A3
0x25c204…25c398 Dummy {f00=0x00bf, f01=0x0190, f02=» " P* COMPLETE PATTERN TRAMSMITTED P* * PTES150 EQU * 4 P LDK A2,PAD H P CF A5,WRITE P RB TES150 p P EJECT P* P* P* SYNCRONIZE INPUT P* PREC000 EQU * P CF A5,READ PRECPAT EQU * P LDR
0x25c398…25c52c Dummy {f00=0x00bf, f01=0x0190, f02=» P* ( P LDK A4,0 BIT AND CHARACTER COUNTER " P LDKL A3,/1FF 1:ST SHIFT STATE : PTES200 EQU * ` P XRR A2,A3 t P ANK A2,/FF P RF(Z) TES240 NO BIT ERRORS P ECR A2,A2 P LDR A2,A2 P RF(NN) TES220 PTES210 EQU *
0x25c52c…25c6c0 Dummy {f00=0x00bf, f01=0x0190, f02=»F8 P RF(E) TES300 P CF A5,READ P CF A5,PATGEN 4 P LDR A2,A2 J P RF(N) TES400 P RB TES200 r P* P* COMPLETE PATTERN RECEIVED P* PTES300 EQU * P CF A5,HALTIN P LDKL A1,TES320 P ST A1,STB
0x25c6c0…25c854 (1, 611) Dummy {f00=0x00bf, f01=0x018e, f02=»5,REQLOG P XIF P CF A15,TENDIO P CF A5,DISCON 2 P ABL TDISP H P EJECT Z P* h P* TIME OUT r P* PTLTO EQU * P LDR A6,A1 P LD A7,DWTA7,A6 P LD A5,DWTA5,A6 P LDK A1,NORESP P RB TES340
0x25c854…25c9e8 Dummy {f00=0x00bf, f01=0x0190, f02=» P* PATTERN GENERATOR P* P* A3:= CURRENT SHIFT STATE * $ P* A4:= BIT AND CHARACTER COUNTER L P* t PPATGEN EQU * ~ P LDR A1,A3 P SLL A1,4 P XRR A1,A3 P ANK A1,/10 BIT9 XOR BIT5 P RF(Z) PAT100 P LDKL A1
0x25c9e8…25cb7c Dummy {f00=0x00bf, f01=0x0190, f02=»1,/7 P RB(NZ) PATGEN P RTN A5 " P IFT BDA=1 2 P EJECT D P* R P* < P* POLL AND SELECT ADDRESS CONVERTING ROUTINES AND TABLES f P* PSELADR EQU * P ANK A3,/7F P SUK A3,/41 P LC A3,SELTAB,A3 P RTN
0x25cb7c…25cd10 Dummy {f00=0x00bf, f01=0x0190, f02=»/4445 P DATA /4647 P DATA /4849 " P DATA /5B2E 6 P DATA /3C28 J P DATA /2BFF ^ P* r P* SELECT ADDRESSES | P* PSELTAB EQU * P DATA /2D2F P DATA /5354 P DATA /5556 P DATA /5758 P DAT
0x25cd10…25cea4 Dummy {f00=0x00bf, f01=0x0190, f02=»REQUEST LOGG ( P* 1:ST WORD=DEVICE ADDRESS, ORDER P* 2:ND WORD = RETURN CODE @ P* 3:RD WORD = TID d P* PREQLOG EQU * P STR A2,A15 P STR A3,A15 P LD A3,REQPEK P LD A2,DWTST,A6 P RF(N) RQLRTN NO REQ
0x25cea4…25d038 Dummy {f00=0x00bf, f01=0x0190, f02=»,DWTECB,A6 P OR A1,ECBRC,A2 P STR A1,A3 RETURN CODE * P ADK A3,2 H P LD A2,10,A6 TTAB ADDRESS Z P ADK A2,4 | P LDR* A2,A2 TID P STR A2,A3 P ADK A3,2 P CWK A3,ENDLOG P RF(NG) RQLRTN P LDKL A3,REQBUF
0x25d038…25d1cc Dummy {f00=0x00bf, f01=0x0190, f02=» P* P* REQUEST LOGG AREA P* * ( P* 1:ST WORD=DEVICE ADDRESS, ORDER 4 P* 2:ND WORD = RETURN CODE ` P* 3:RD WORD = TID P* P* PREQPEK DATA REQBUF PREQBUF RES 300 " PENDLOG DATA /FFFF,/FFFF,/FFFF
0x25d1cc…25d360 Dummy {f00=0x00bf, f01=0x0190, f02=» P ORKL A2,/C000 P RF LOG PLOGSST EQU * . P ORKL A2,/8000 B PLOGIN EQU * X PLOG EQU * l P LD A1,LOGPNT ~ P CWK A2,/C000+PAD P RF(E) PADLOG PAD OUTPUT P CWK A2,SYN P RF(E) SYNLOG SYN INPUT PLOG010
0x25d360…25d4f4 (1, 612) Dummy {f00=0x00c0, f01=0x0190, f02=»LOGRTN EQU * P ST A1,LOGPNT P ANKL A2,/FF * P ADKL A15,4 > P ABR* A15 R P* d PPADLOG EQU * n P* P CW A2,-2,A1 P RF(E) PAD10 P CM PADOUT P ADK A1,2 PPAD10 ADKL A1,-2 P IM PADOUT P RB LO
0x25d4f4…25d688 Dummy {f00=0x00c0, f01=0x018c, f02=»KL A1,-2 P IM SYNIN P RB LOG010 " P EJECT 4 P* B P* L PSYNIN DATA 0 V PPADOUT DATA 0 j P* P* P* LOGG AREA P* * P* /C0XX XX = OUTPUT CHARACTER * P* /80XX XX = INPUT CHLC ST
0x25d688…25d81c Dummy {f00=0x00c0, f01=0x4008, f02=»@ P IM SYNIN P RB LOG010 " P EJECT 4 P* B P* L PSYNIN DATA 0 V PPADOUT DATA 0 j P* P* P* LOGG AREA P* * P* /C0XX XX = OUTPUT CHARACTER * P* /80XX XX = INPUT CHLC ST
0x25d81c…25d9b0 Dummy {f00=0x00c0, f01=0x2008, f02=» ********************* v * & * 0 DRBMON EQU * : END N@ Z
0x25d9b0…25db44 Dummy {f00=0x00c0, f01=0x0190, f02=»***** ^ P* . P* STATUS INTERRUPT HANDLER , CHLC RECEIVER P* J < P******************************************************* T P* P* P* PSSTIN EQU * P LD A6,DWTA6,A7 P LDR* A1,A7 P ADR* A1,P P SST
0x25db44…25dcd8 Dummy {f00=0x00c0, f01=0x0190, f02=» P ADR* A1,P P CIO A2,1,0 P LDKL A2,/116 . P EXR A1 START INPUT D P ABL READ10 ` PSST030 EQU * t P ANK A1,2 P RF(Z) SST050 " P IM TPCONT,A7 COUNT TP ERRORS P LD A1,DWTTP,A7 P RF(Z) SST040 P CM*
0x25dcd8…25de6c Dummy {f00=0x00c0, f01=0x0190, f02=»QU * P LDR A1,A2 P ANK A1,1 P RF(Z) SST070 0 PSST055 EQU * CLOSE LINE F P LDK A5,STB f P ADR A5,A6 z P CF A5,DISCON PSST65 EQU * * P LDK A1,MODNOP RC: MODEM NOT OPERABLE P LD A8,DWTECB,A6 P RF(Z) SST06
0x25de6c…25e000 Dummy {f00=0x00c0, f01=0x0190, f02=»A7 P LD A8,DWTECB,A6 P RF(Z) SST069 " P CM ECBRC,A8 8 P IFT RQLOGG=1 L P CF A15,REQLOG b P XIF x PSST069 EQU * P ABL DISEND PSST070 EQU * 2 P ORKL A2,/8000 NO CARRIER OR CALLING INDICATOR P ABL IHI200
0x25e000…25e194 (1, 613) Opaque[0x194]
0x25e194…25e328 # DirEnt {nam=»DRTP03«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1808, f03=0x2020}
0x25e194…25e328 IdxSect {
0x25e194…25e328 f00 = 0x00c0 // 0x25e194 @0x0
0x25e194…25e328 f01 = 0x000e // 0x25e196 @0x2
0x25e194…25e328 gno = [ // 0x25e198 @0x4
0x25e194…25e328 [0x00]: C0x00c0.0x1.0
0x25e194…25e328 [0x01]: C0x00c0.0x2.0
0x25e194…25e328 [0x02]: C0x00c0.0x3.0
0x25e194…25e328 [0x03]: C0x00c1.0x0.0
0x25e194…25e328 [0x04]: C0x00c1.0x1.0
0x25e194…25e328 [0x05]: C0x00c1.0x2.0
0x25e194…25e328 [0x06]: C0x00c1.0x3.0
0x25e194…25e328 ]
0x25e194…25e328 }
0x25e328…25e4bc Dummy {f00=0x00c0, f01=0x0190, f02=» 2 P IDENT DRTP03 REL 9.1 78-09-15 870106640911 P* : < P******************************************************* D < P* * < P* PHILIPS TERMINAL SYSTEM PTS * < P*
0x25e4bc…25e650 Dummy {f00=0x00c0, f01=0x0190, f02=» * < P* * 4 < P* * t < P******************************************************* P* 8 P* THIS D
0x25e650…25e7e4 Dummy {f00=0x00c0, f01=0x0190, f02=»TIVATION PART ~ P* & P* I H T P : INTERRUPT HANDLER P* J $ P* R C T P : RECOVERY ROUTINE T P* | 6 P* THE ACTIVATION PART PREPARES ORDERS AND SENDS 0 P* A FIXED FORMATTED STRING TO THE PRINTERS ( P* MICROPROCESSOR (
0x25e7e4…25e978 Dummy {f00=0x00c0, f01=0x0190, f02=»ST STATUS z P* ORDER 06 : WRITE 0 P* ORDER 0B : POSITION LIFT AND WRITE 4 . P* ORDER 24 : SET PRINTER PARAMETERS h 0 P* ORDER 1B : SET DOCUMENT PARAMETERS 0 P* ORDER 38 : RELEASE VOUCHER/PASSBOOK P*
0x25e978…25eb0c Dummy {f00=0x00c0, f01=0x018e, f02=»AL TAPE, VOUCHER OUT p ( P* BIT 13 : CODE CHECK ERROR $ P* BIT 15 : NOT OPERABLE H P* p P* z P* NORMAL REGISTER USAGE: P* " P* REGISTER A1: WORK REGISTER " P* A2: INPUT/OUTPUT $ P*
0x25eb0c…25eca0 Dummy {f00=0x00c0, f01=0x0190, f02=» r P* A7: ORDER P* A8: ECB-ADDRESS & P* J P* T P EJECT ^ P* l P*********** v P* ENTRIES * P*********** P* P* P ENTRY TPAD3 ADDRESS BLOCK P* P* P* P**
0x25eca0…25ee34 (1, 614) Dummy {f00=0x00c0, f01=0x0190, f02=»RN DISIOE DISPATCH I/O ERROR & P EXTRN DISEND END I/O AND DISPATCH $ & P EXTRN OUTPUT OUTPUT ONE CHARACTER N " P EXTRN LDREG RESTORE REGISTERS x P EXTRN SAVE8 SAVE REG. A1-A8 P EJECT P* P* P************* P* CONSTANTS *
0x25ee34…25efc8 Dummy {f00=0x00c0, f01=0x0190, f02=» $ PLUP EQU /0B LIFT UP ONE POSITION POCR EQU /13 OCR , PSPEC EQU /0E SPECIAL MODE D PDOUBLE EQU /0C DOUBLE MODE f PEXE EQU /06 EXECUTE COMMAND PRESET EQU /07 RESET MP P EJECT P* P* P*********************
0x25efc8…25f15c Dummy {f00=0x00c0, f01=0x018e, f02=»R EQU 6 LAST OUTPUT, ORDER PDWTSB2 EQU /1E STACK BASE " " PDWTRLN EQU /22 REQUESTED LINE D PDWTALN EQU /23 ACTUAL LINE j , PDWTRPP EQU /24 REQUESTED PRINT POSITION ( PDWTAPP EQU /25 ACTUAL PRINT POSITION $ PDWTPP EQU /26 PRINTER PARAMETERS
0x25f15c…25f2f0 Dummy {f00=0x00c0, f01=0x0190, f02=» P********************* P* ECB-DISPLACEMENTS * " P********************* @ P* ^ & PECBBA EQU 2 BUFFER ADDRESS IN ECB h ( PECBRL EQU 4 REQUESTED LENGTH IN ECB ( PECBEL EQU 6 EFFECTIVE LENGTH IN ECB " PECBRC EQU 8 RETURN CODE IN ECB
0x25f2f0…25f484 Dummy {f00=0x00c0, f01=0x0190, f02=»* PTPAD3 EQU * ADDRESS BLOCK P DATA ACTP ACTIVATION DRIVER , P DATA IHTP INTERRUPT HANDLER P P DATA RCTP RECOVERY ROUTINE t PTPTAB EQU * : P DATA /0001,/0206,/0708,/0C0D,/393A,/2425,/261C,/1D00 PTPLEN EQU *-TPTAB P EJE
0x25f484…25f618 Dummy {f00=0x00c0, f01=0x0190, f02=» ORDERS AND JUMPS TO ORDER PROCESSOR z P* , P* 6 P* @ PACTP EQU * ACTIVATION ENTRY J P* n P* x : P* GET DWT INDEX: 0=JOURNAL, 1=VOUCHER/PASSBOOK, 2=A4 P* " P LC A2,DWTOR,A6 GET DWT INDEX P ANK A2,7 MASK * P L
0x25f618…25f7ac Dummy {f00=0x00c0, f01=0x0190, f02=» INDEX TO ORDER ~ * P SC A7,DWTOR+1,A6 STORE MODIFIED ORDER PACT005 LDK A3,TPLEN-2 F . PACT010 CC A7,TPTAB,A3 CHECK IF LEGAL ORDER d P RF(E) ACT020 VALID ORDER P SUK A3,1 P RB(NN) ACT010 TRY NEXT P* P ABL DISIOE ILLEGAL
0x25f7ac…25f940 Dummy {f00=0x00c0, f01=0x018e, f02=»TPSTAT,TPSTAT,TP06,TP06,TP06,TP0B,TP0B ~ , P DATA TP38,TP38,TP24,TP24,TP24,TP1B,TP1B . P EJECT ^ P* l P* v P* ORDER 00 : TEST STATUS P* P* PTPSTAT EQU * P CF A5,START P LDK A2,/30 LOAD MP ORDER $ P CF A5,O
0x25f940…25fad4 (1, 615) Dummy {f00=0x00c0, f01=0x0190, f02=» P* PTP06 EQU * P SUR A1,A1 P CWR A1,A2 DEVICE=JOURNAL 2 P RF(E) TP062 T " P CF A5,STATCK CHECK IF DOC. IN h P ABL(NZ) TPTST NO PTP062 EQU * P CF A5,START P LDK A2,/33 LOAD MP ORDER $ P CF A5,ORDER ADD INDEX
0x25fad4…25fc68 Dummy {f00=0x00c0, f01=0x0190, f02=»,OUTPUT SEND LF UP P LDR A2,A3 P CF A5,OUT SEND NO. OF LF , & P LC A1,DWTDEV,A6 GET DEVICE INDEX N P ANK A1,3 x P RF(Z) TP0610 JOURNAL $ P LC A1,DWTALN,A6 GET ACTUAL LINE P ANK A1,/FF P RF(NZ) TP0604 " P LD* A1,DWTDP,
0x25fc68…25fdfc Dummy {f00=0x00c0, f01=0x018e, f02=»/FF P CWR A1,A3 >MAX P ABL(G) ERR $ " P SC A1,DWTRLN,A6 STORE IN DWT 8 $ PTP0610 CF A5,REQCK CHECK LENGTH ^ P SUK A4,1 LENGTH=2 P RF(Z) TP0620 2 P LD A4,ECBRL,A8 GET ADJUSTED REQUESTED LENGTH P SUK A4,2 . P LD A3,ECB
0x25fdfc…25ff90 Dummy {f00=0x00c0, f01=0x0190, f02=» P ANK A1,/FF P SUK A1,/2B P RF(NZ) PR002 NOT /2B , * P LC A1,DWTAPP,A6 GET ACTUAL PRINT POS J 4 P SC A1,DWTRPP,A6 -AND SET AS REQUESTED PRINT POS x P RF PR004 0 PPR002 CM DWTRPP,A6 RESET PRINT POS COUNTERS P " PPR004 LCR
0x25ff90…260124 Dummy {f00=0x00c0, f01=0x0190, f02=» RF(NE) PR030 P LDR A2,A7 GET DIGIT P ADK A3,1 STEP POINTER 2 PPR014 SUK A4,1 DECR. LENGTH P P ORK A2,/40 SET ZONE VALUE t * P LC A7,DWTPM,A6 CHECK IF SPECIAL MODE P ANK A7,/80 P RF(NZ) PR020 YES P SC A2,DWTSAV,A6 SAVE
0x260124…2602b8 Dummy {f00=0x00c0, f01=0x0190, f02=»SAV,A6 P CF A5,OUTPUT SEND DIGIT P LDK A2,SPEC . P CF A5,OUTPUT B P RF PR022 X P j $ PPR020 CF A5,INCR CHECK AND COUNT r P RF(NZ) ERR P CF A5,OUTPUT SEND CHARACTER $ PPR022 SUK A4,1 DECR. REQ. LENGTH P RF(Z) TP0620
0x2602b8…26044c Dummy {f00=0x00c0, f01=0x0190, f02=»UK A7,DOUBLE DOUBLE P RF(Z) PR040 P SUK A7,2 SPECIAL 0 P RF(Z) PR040 J P SUK A7,5 OCR ^ P RB(NZ) PR020 t ( PPR040 CF A5,SETMOD UPDATE PRINT MODE P CF A5,OUTPUT P RB PR022 PTP0620 CF A5,EXECUT P LC A1,DWTDEV,
0x26044c…2605e0 Dummy {f00=0x00c0, f01=0x0190, f02=»AL LINE r PTP0630 LDK A3,/13 LOAD MASK P TM A2,A3 NOT OPERABLE 4 P RF(Z) TP0640 YES R " P CM DWTRPP,A6 CLEAR PRINT POS l P RF TPTST . PTP0640 LC A1,DWTRPP,A6 GET REQ. PRINT POS . P SC A1,DWTAPP,A6 STORE AS ACTUAL PRINT POS P
0x2605e0…260774 (1, 616) Dummy {f00=0x00c1, f01=0x0190, f02=»OCIN P LDK A1,1 PDOCIN LC A4,DWTDEV,A6 P ANK A4,3 JOURNAL < P RF(Z) CODE V P LDK A3,/40 j P TM A2,A3 DOCUMENT OUT ~ P RF(NZ) CODE $ P CM DWTRLN,A6 RESET LINE COUNTER $ P LC A3,DWTST,A6 RESET DOC IN BIT P ANK A3,
0x260774…260908 Dummy {f00=0x00c1, f01=0x018e, f02=» TM A2,A3 CODE CHECK ERROR P RF(Z) ENDJT " P ORK A1,4 6 PENDJT LDR A4,A4 NOT JOURNAL H P RF(NZ) TPRC l P ANK A2,/20 NOT END OF PAPER P RF(Z) TPRC P ORK A1,/20 ( PTPRC ST A1,ECBRC,A8 SET RETURN CODE P* P*
0x260908…260a9c Dummy {f00=0x00c1, f01=0x0190, f02=» PERR EQU * P LDK A2,RESET P CF A5,OUTPUT SEND RESET 0 P LDK A1,4 P P RB TPRC b P* r : P* ORDER 0B : POSITION VOUCHER/PASSBOOK/A4 AND WRITE | P* P* PTP0B EQU * " P CF A5,STATCK CHECK IF DOC. IN P R
0x260a9c…260c30 Dummy {f00=0x00c1, f01=0x0190, f02=»DEV,A6 SAVE CURRENT DEVICE P CF A5,START " P LDK A2,/35 LOAD MP ORDER 6 $ P CF A5,ORDER ADD INDEX AND SEND X $ P LD A3,ECBCW,A8 GET CONTROL WORD P RB(Z) ERR =0 " P LD A1,DWTDP,A6 GET TABLE ADR P RB(Z) ERR NOT DEFINED P LDR*
0x260c30…260dc4 Dummy {f00=0x00c1, f01=0x0190, f02=»,DWTALN,A6 GET ACTUAL LINE P ANK A4,/FF " PTP0B04 CWR A3,A4 6 " P RF(NG) TP0B10 REQ. <= ACTUAL N P LDK A2,LDO t P CF A5,OUTPUT SEND LF DOWN P SUR A3,A4 P RF TP0B20 PTP0B10 LDK A2,LUP P CF A5,OUTPUT SEND LF UP P
0x260dc4…260f58 Dummy {f00=0x00c1, f01=0x0190, f02=»P0620 NO PRINTING P ABL TP0610 P* . 2 P* ORDER 38 : RELEASE VOUCHER/PASSBOOK AND A4 8 P* n PTP38 EQU * x P CF A5,START P LDK A2,/37 LOAD MP ORDER $ P CF A5,ORDER ADD INDEX AND SEND & P CM DWTRLN,A6 SET ACTUAL LINE ZE
0x260f58…2610ec Dummy {f00=0x00c1, f01=0x0190, f02=»NTROL WORD OF ECB CONTAINS: ( P* BIT 0- 7:NATIONAL CHARACTER SET $ P* BIT 8-11:PITCH P P* BIT 12-15:STEPS/LINE l P* P* PTP24 EQU * P CF A5,START P LDK A2,/3A LOAD MP ORDER $ P CF A5,ORDER ADD INDEX AND SEND
0x2610ec…261280 Dummy {f00=0x00c1, f01=0x0190, f02=»A1 $ P LD A1,ECBCW,A8 GET CONTROL WORD & P ANK A1,/F MASK TO GET STEPS/LINE 2 P RF(NZ) TP2402 P LCR A1,A3 GET OLD VALUE r P ANK A1,/F P ORR A4,A1 SAVE STEPS/LINE P RF TP2404 P PTP2402 CF A5,PPCK CHECK P RB(NZ)
0x261280…261414 (1, 617) Dummy {f00=0x00c1, f01=0x018e, f02=» P ANK A1,/F0 GET PITCH P RF(NZ) TP2406 " P LCR A1,A3 GET OLD VALUE 8 P ANK A1,/F0 X P RF TP2408 l P ~ PTP2406 SRL A1,4 P CF A5,PPCK CHECK P RB(NZ) ERR P SLL A1,4 & PTP2408 ORR A4,A1 SAVE PITCH VALUE , P
0x261414…2615a8 Dummy {f00=0x00c1, f01=0x0190, f02=» P SRL A1,8 GET NAT. CH. SET P LDR A2,A1 & P ANK A1,/F 8 P SUK A1,9 >9 J P RB(P) ERR ^ P SC A2,DWTPP,A6 STORE IN DWT p P CF A5,OUT SEND NAT. CH. SET P CF A5,EXECUT P RF TP1B10 P P* P* * P* ORDER 1B
0x2615a8…26173c Dummy {f00=0x00c1, f01=0x018e, f02=» CF A5,START P LDK A2,/3C LOAD MP ORDER $ P CF A5,ORDER ADD INDEX AND SEND 6 $ P LD A3,ECBCW,A8 GET CONTROL WORD ^ P ABL(Z) ERR NOT DEFINED $ P ST A3,DWTDP,A6 STORE TABLE ADR P CF A5,SENDDP SEND TABLE P CF A5,EXECUT PTP1B
0x26173c…2618d0 Dummy {f00=0x00c1, f01=0x0190, f02=» " P* SENDS MODIFIED ORDER TO MP ! P* ! * PORDER EQU * ! 4 P LDR A3,A2 SAVE ! H P LDK A2,STX ! ` P CF A5,OUTPUT ! t P LDR A2,A3 ! P LC A1,DWTDEV,A6 GET INDEX ! P ANK A1,3 ! P ADR A2,A1 ADD INDEX ! P CF A5,OUTPUT SEND ORDER !
0x2618d0…261a64 Dummy {f00=0x00c1, f01=0x0190, f02=»RW ! P LDK A2,RESET " P CF A5,OUTPUT " P RTN A5 " 6 P* " F P* E X E C U T " P & P* INDICATES LAST CHARACTER TO MP " h P* " PEXECUT EQU * " " P CF A5,DRW DATA REQUEST WANTED " P LDK A2,EXE " P CF A5,OUTPUT " P RTN A5
0x261a64…261bf8 Dummy {f00=0x00c1, f01=0x0190, f02=»,A8 GET REQUESTED LENGTH " P SUK A1,2 # P RF(N) COND1 LENGTH=0-1 # 2 P RF(G) RE10 BUFFER TO PRINT # R P LDK A4,1 IND. REQ. LENGTH=2 # v PRE10 RF COND0 # P # P* # P* S T A T C K # P* CHECKS IF DOCUMENT IN # P* # PST
0x261bf8…261d8c Dummy {f00=0x00c1, f01=0x0190, f02=») COND0 # P RF COND1 $ P $ " P* $ * P* N O L F $ 4 P* GET NO. OF LINES TO A1 $ H P* $ j PNOLF EQU * $ t " P LD A3,ECBBA,A8 GET BUFFER ADR $ P LC A3,1,A3 $ & P ANK A3,/FF GET CONTROL CHARACTER $ P SUK A3,/39 $ P RF(G) NOL
0x261d8c…261f20 Dummy {f00=0x00c1, f01=0x018e, f02=»OLF40 =/2B = NO LF $ PNOLF10 LDK A3,1 % P RTN A5 % 2 PNOLF20 LDK A3,2 % B PNOLF30 RTN A5 % Z PNOLF40 LDK A3,0 % p P RTN A5 % P % P* % P* SET CONDITION % P* % PCOND0 LDK A7,0 % P SC A7,2,A5 % P RTN A5 % P
0x261f20…2620b4 (1, 618) Dummy {f00=0x00c1, f01=0x0190, f02=» P* & PINCR EQU * & P LDR A7,A2 SAVE & P SUK A7,/1E >/1E & 8 P RF(G) INC10 & P P LDR A7,A2 & d P SUK A7,LDO <LDO & v P RB(N) COND1 & P SUK A7,9 & P RB(G) COND1 >OCR & P ADK A7,6 TAB ORDER & P RB(Z) COND1 & P RB COND0
0x2620b4…262248 Dummy {f00=0x00c1, f01=0x0190, f02=»NTER & n P ADK A1,1 COUNT ' P ANK A7,DOUBLE ' $ P SUK A7,DOUBLE NOT DOUBLE ' : P RF(NZ) INC20 ' P ADK A1,1 ' r ( PINC20 SC A1,DWTRPP,A6 STORE COUNTER ' P RB COND0 ' P* P P C K ' P* CHECK PRINTER PARAMETERS ' P* ' PPPCK
0x262248…2623dc Dummy {f00=0x00c1, f01=0x018e, f02=»0 U T ' P* ADD CONST. AND SEND ( P* ( . POUT ADK A2,/20 ( 8 P CF A5,OUTPUT ( N P RTN A5 ( d P* ( t P* S E N D D P ( ~ * P* SENDS ALL BYTES IN PARAMETER TABLE ( P* ( PSENDDP EQU * ( P LDK A4,6 ( ( PSEN10 LCR A2,A3 GET
0x2623dc…262570 Dummy {f00=0x00c1, f01=0x0190, f02=» ( P RTN A5 ) P ) P* ) P* S E T M O D ) * P* UPDATES PRINTING MODE ) B P* ) d PSETMOD EQU * ) n $ P LC A7,DWTPM,A6 GET CURRENT MODE ) P CWK A2,SPEC NOT SPECIAL ) P RF(NE) SET10 ) P XRK A7,/80 ) P RF SET20 ) PSE
0x262570…262704 Dummy {f00=0x00c1, f01=0x018e, f02=»REQUEST WANTED ) ~ P* * PDRW LDKL A1,/7FFF * P ANRS A1,A6 * : P RTN A5 * N P* * ^ P* N O D R W * h P* NO DATA REQUEST WANTED * ~ P* * PNODRW LDKL A1,/8000 * P ORRS A1,A6 * P RTN A5 * P EJECT * P* * P* I
0x262704…262898 Dummy {f00=0x00c1, f01=0x0190, f02=» * & P RF(Z) IHTP10 ACK AS DATA REQUEST + P LDK A3,8 + 2 P TM A2,A3 NOT DATA REQUEST + D P RF(Z) IHTP20 + f P + | PIHTP10 ABL LDREG + $ PIHTP20 ANK A2,/40 MASK DOC. BIT + P CWK A2,0 DOCUMENT IN? + P RF(NE) IHTP22 YES + $ P CM DWTRLN,A
0x262898…262a2c Dummy {f00=0x00c1, f01=0x0190, f02=»,A6 SET NEW STATUS + PIHTP30 ABL TDISP , P EJECT , 2 P* , @ P* R C T P , J P* , ^ > P* RECOVERY ROUTINE: REPRINTS RUNNING REQUEST AT POWER ON , h P* , & PRCTP CF A15,SAVE8 SAVE REG. A1-A8 , P CF A5,NODRW NO DATA REQUEST , P CF A5
0x262a2c…262bc0 Dummy {f00=0x00c1, f01=0x0190, f02=» LC A3,DWTDEV,A6 , P SRL A3,2 GET "DOC. INDEX" - P ANK A3,3 - : & P ADR A2,A3 ADD INDEX TO ORDER CODE - L PRCTP02 CF A5,OUTPUT - v , P LDR A3,A6 GET ADR TO FIRST BYTE TO SEND - P ADK A3,DWTPP+1 - P LDK A4,3 SET COUNTER - PRCTP06 LCR A2,A3
0x262bc0…262d54 (1, 619) Dummy {f00=0x00c1, f01=0x0190, f02=» - P SUK A4,1 . P RB(NZ) RCTP06 . P SUK A3,4 . 0 P LCR A2,A3 . B P CF A5,OUT SEND NAT. CH. SET . T P ADK A3,4 . x P LDR* A3,A3 GET ADR TO TABLE . P RF(Z) RCTP10 NOT DEFINED . P . P CF A5,SENDDP SEND TABLE . P LDR A3,A6 .
0x262d54…262ee8 Dummy {f00=0x00c1, f01=0x0190, f02=»TUAL LINE . ~ PRCTP10 CF A5,EXECUT / < P LDK A3,/40 RESET DOC IN BIT IF FAILED RECOVERY NOT BUSY / . P TM A2,A3 / n P RF(NZ) RCTP11 / $ P CM DWTRLN,A6 CRESET ACTUAL LINE / $ P LC A3,DWTST,A6 RESET DOC IN BIT / P ANK A3,/FD / P SC A3,DWTST,A
0x262ee8…26307c Dummy {f00=0x00c1, f01=0x4160, f02=» RCTP12 / P LDK A3,/40 0 P TM A2,A3 DOCUMENT OUT 0 $ P RF(Z) RCTP30 0 B P RF RCTP20 0 X PRCTP12 LDK A3,3 0 j & P TM A2,A3 TRANSPORT/GENERAL ERROR 0 P RF(NZ) RCTP30 0 . PRCTP20 LC A2,DWTDEV,A6 GET CURRENT DEVICE 0 P ANK A2,3 0 P A
0x26307c…263210 Dummy {f00=0x00c1, f01=0x2008, f02=» 1 * 8 P* 8 P* 8 P* 8 & P* 8 0 P END 8 :@ 8 F 7 H 4 PBUFCHR LCR A4,A3 GET NUMBER OF OUTPUT CHARACTERS 7 R P ANK A4,/FF MASK 7 , PBUFC10 ADK A3,1 INCREMENT BUFFER POINTER 7 $ P LCR A2,A3 GET OUTPUT CHARACTER 7 P CF A5,OUTPUT
0x263210…2633a4 Dummy {f00=0x00c1, f01=0x0190, f02=»ABLE FOR FRAMES 1 | & P DATA TP TRAFFIC POLL WITHOUT ACK 2 $ P DATA TPA TRAFFIC POLL WITH ACK 2 B & P DATA SP SPECIFIC POLL WITHOUT ACK 2 j $ P DATA SPA SPECIFIC POLL WITH ACK 2 P DATA RT RETRANSMIT REQUEST 2 P EJECT 2 P* 2 P* OUTPUT SOFTWAR
0x2633a4…263538 Dummy {f00=0x00c1, f01=0x0190, f02=»ATA /1030,0 TRAFFIC 2 & PDCSTR4 DATA /1005,0 REPLY REQUEST 3 " PDCSTR5 DATA /0404,0 NO TRAFFIC 3 F $ PDCSTR6 DATA /103E,0 DEVICE READY 3 l PDCSTR7 DATA /103B,0 THRU 3 , PDCSTR8 DATA /103D,0 DEVICE NOT OPERABLE 3 , PDCSTR9 DATA 0 REQUEST PROCESSOR MESS
0x263538…2636cc Dummy {f00=0x00c1, f01=0x0190, f02=»E FOR A5 3 r * P LDKL A2,/100+SYN SPECIFY SYN PATTERN 4 $ P CIO A2,1,CHLCIN START RECEIVER 4 > $ PBRM100 CF A5,READ READ CHARACTER 4 f P SUK A2,SOH 4 P RF(E) BRM200 SOH 4 P SUK A2,/FF-SOH 4 P RB(NE) BRM100 NOT /FF 4 P CF A5,READ READ CHARA
0x2636cc…263860 Dummy {f00=0x00c1, f01=0x0190, f02=»CEIVED 4 P* 5 PBRM200 LDK A7,0 CLEAR BCC 5 P CF A5,READP READ RID=TC 5 : P ABL(NZ) BRM900 PARITY ERROR 5 Z " P CW A2,DW2200 CHECK IF THIS TC 5 ~ P RF(E) BRM201 5 P CWK A2,GRID GENERAL RID ? 5 . P ABL(NE) BRM900 NOT THIS TC: RESYNCHRONIZE 5
0x263860…2639f4 (1, 620) Opaque[0x194]
0x2639f4…263b88 # DirEnt {nam=»DVTT1 «, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1840, f03=0x2020}
0x2639f4…263b88 IdxSect {
0x2639f4…263b88 f00 = 0x00c2 // 0x2639f4 @0x0
0x2639f4…263b88 f01 = 0x0002 // 0x2639f6 @0x2
0x2639f4…263b88 gno = [ // 0x2639f8 @0x4
0x2639f4…263b88 [0x00]: C0x00c2.0x0.0
0x2639f4…263b88 ]
0x2639f4…263b88 }
0x263b88…263d1c Dummy {f00=0x00c2, f01=0x0190, f02=» 0 P IDENT DVTT1 REL 8.2 78-09-15 870105040820 P* 8 4 P* DEVICE WORK TABLE FOR TELLER TERMINAL PRINTER B P* z P ENTRY DVTT1 TABLE ENTRY P* P* * P EXTRN TPAD3 POINTER TO ADDRESS-BLOCK P* P* PDVTT1 EQU * TA
0x263d1c…263eb0 Dummy {f00=0x00c2, f01=0x0190, f02=» DATA DWTEND-DVTT1 LAST OUTPUT CHR,ORDER ( P DATA TPAD3 POINTER TO ADDRESS BLOCK 0 P DATA 'TP' TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR | P DATA 0 TERMINAL QUEUE P DATA 0 OUTPUT QUEUE LINK , P DATA 0,0,0 SAVE AREA FOR REGS. A3,A
0x263eb0…264044 Dummy {f00=0x00c2, f01=0x40bc, f02=»AL PRINT POSITION z " P DATA 0,0 PRINTING PARAMETERS & P DATA 0 DOC. PARAMETER ADR. TABLE @ P DATA 0 SAVE AREA j PDWTEND EQU * P* P* P END @ P DATA 0 OUTPUT QUEUE LINK , P DATA 0,0,0 SAVE AREA FOR REGS. A3,A
0x264044…2641d8 Dummy {f00=0x00c2, f01=0x2008, f02=» A TPAD POINTER TO ADDRESS BLOCK P DATA 0 TTAB-ADDRESS 0 $ P DATA 0 WAIT/ACTIVATE INDICATOR L P DATA 0 TERMINAL QUEUE t P DATA 0 OUTPUT QUEUE LINK , P DATA 0,0,0 SAVE AREA FOR REGS. A3,A4,A5 P DATA 0,0,0,0 STACK P DATA 0
0x2641d8…26436c Dummy {f00=0x00c2, f01=0x0190, f02=» A6 : DWT-ADDRESS P* A7 : ORDER " P* A8 : ECB-ADDRESS @ P* f P* p P* z P* SYSTEM ADAPTATION P* 8 P* CODES FOR SPECIAL CHARACTERS CLEAR, BACKSPACE, 8 P* MULTIPLE ZERO AND STANDARD
0x26436c…264500 Dummy {f00=0x00c2, f01=0x0190, f02=» P* , P* IF TIMING IS WANTED, TIMER POINTER , P* IN DWT MUST BE SET UNEQUAL TO ZERO. > 2 P* STANDARD VALUE FOR TIME-OUT IS 30 SECONDS n 4 P* SINCE LAST DEPRESSED KEY. IF ANOTHER VALUE * P* IS WANTED FOR A SYSTEM, INDICATOR $
0x264500…264694 (1, 621) Opaque[0x194]
0x264694…264828 # DirEnt {nam=»DRDC22«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1848, f03=0x2020}
0x264694…264828 IdxSect {
0x264694…264828 f00 = 0x00c2 // 0x264694 @0x0
0x264694…264828 f01 = 0x0024 // 0x264696 @0x2
0x264694…264828 gno = [ // 0x264698 @0x4
0x264694…264828 [0x00]: C0x00c2.0x1.0
0x264694…264828 [0x01]: C0x00c2.0x2.0
0x264694…264828 [0x02]: C0x00c2.0x3.0
0x264694…264828 [0x03]: C0x00c3.0x0.0
0x264694…264828 [0x04]: C0x00c3.0x1.0
0x264694…264828 [0x05]: C0x00c3.0x2.0
0x264694…264828 [0x06]: C0x00c3.0x3.0
0x264694…264828 [0x07]: C0x00c4.0x0.0
0x264694…264828 [0x08]: C0x00c4.0x1.0
0x264694…264828 [0x09]: C0x00c4.0x2.0
0x264694…264828 [0x0a]: C0x00c4.0x3.0
0x264694…264828 [0x0b]: C0x00c5.0x0.0
0x264694…264828 [0x0c]: C0x00c5.0x1.0
0x264694…264828 [0x0d]: C0x00c5.0x2.0
0x264694…264828 [0x0e]: C0x00c5.0x3.0
0x264694…264828 [0x0f]: C0x00c6.0x0.0
0x264694…264828 [0x10]: C0x00c6.0x1.0
0x264694…264828 [0x11]: C0x00c6.0x2.0
0x264694…264828 ]
0x264694…264828 }
0x264828…2649bc Dummy {f00=0x00c2, f01=0x0190, f02=» 2 P IDENT DRDC22 REL 9.1 78-09-15 870106540911 P* : 2 P********************************************* D P* z $ P* PHILIPS TERMINAL SYSTEM PTS P* P* 2 P* DRDC22 : UNISCOPE 100 SYNCHRONOUS PROTOCOL P* O
0x2649bc…264b50 Dummy {f00=0x00c2, f01=0x018e, f02=»* P* ENTRY POINTS P* P* * 2 P ENTRY DC22AD ADDRESS BLOCK TERMINAL REQUESTS 4 " P ENTRY IH2201 INPUT INTERRUPT j " P ENTRY IH2202 OUTPUT INTERRUPT " P ENTRY DC22ON POWER ON ROUTINE $ P ENTRY DCFC FILE CODE FOR DCTASK " P ENT
0x264b50…264ce4 Dummy {f00=0x00c2, f01=0x0190, f02=» p ( P EXTRN SAVE8 SAVE A1-A8 ON A15 STACK $ P EXTRN TENDIO COMPLETE I/O EVENT 4 P EXTRN DISIOE REQUEST ERROR P EXTRN SETIME SET TIMER P EXTRN DWTST DWT STATUS P EXTRN DWTOR DWT ORDER P EXTRN DWTECB DWT ECB P EJECT
0x264ce4…264e78 Dummy {f00=0x00c2, f01=0x018e, f02=» P* DWT CONTENTS P* J P* DWTCHP TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15) $ $ P* DWTST BIT #00: NO REQUEST r ( P* DWTTP TIMERPOINTER, ORDER PROCESS " P* DWTWQ WRITE/GET BUFFER QUEUE P* P* P* ECB PA
0x264e78…26500c Dummy {f00=0x00c2, f01=0x018e, f02=» r PECBRC EQU 8 RETURN CODE PECBCW EQU 10 CONTROL WORD ( P EJECT J P* X P* DWT DISPLACEMENTS b P* ~ . PDWTTP EQU /10 TIMER POINTER ORDER PROCESS ( PDWTWQ EQU /12 WRITE/GET BUFFER QUEUE & PDWTBQ EQU /14 BUFFER QUEUE ANCHOR
0x26500c…2651a0 Dummy {f00=0x00c2, f01=0x0190, f02=» " PDIDLST EQU /1C DEVICES PRESENT P* * P* 4 * P* PARAMETERS FOR CONDITIONAL ASSEMBLY > P* l P* v & PX:A EQU 128 RECEIVE BUFFER LENGTH PRBUFL EQU X:A & PX:B EQU 128 TRANSMIT BUFFER LENGTH PTBUFL EQU X:B PX:C EQU
0x2651a0…265334 (1, 622) Dummy {f00=0x00c2, f01=0x0190, f02=»QU X:E POLL TIME-OUT PX:F EQU 4 ( PRBUFNR EQU X:F NUMBER RECEIVE BUFFER . PX:G EQU 1 SUPPRESS NULL Z PNULTST EQU X:G z PX:H EQU /02 PCHLCIN EQU X:H PCHLCUT EQU CHLCIN+/10 P EJECT P* P* P* REQUEST HAND
0x265334…2654c8 Dummy {f00=0x00c2, f01=0x0190, f02=» P* /08: EXCHANGE P* /22: RELEASE READ BUFFER P* /31: GET WRITE BUFFER > P* /37: TRANSFER PARAMETERS ^ P* /38: SET STATUS P* P EJECT P* P* P* CONSTANTS AND WORK AREAS P* P* & PDCONOF
0x2654c8…26565c Dummy {f00=0x00c2, f01=0x0190, f02=» REQUEST QUEUE ~ P IFF TBUFL=0 * PDCGWQ DATA 0 GET BUFFER REQUEST QUEUE * P XIF X $ PDCSTQ DATA 0 THRU REQUEST QUEUE d , PDCTPGP DATA 0 TIMER POINTER GENERAL POLL , PDC22DC DATA DCACTD ADDRESS BLOCK DC TASK $ PDC22AD DATA DCACT ADDRESS BL
0x26565c…2657f0 Dummy {f00=0x00c2, f01=0x0190, f02=»STATUS AI P EJECT P* P* * $ P* ACTIVATION FROM TERMINAL TASKS 4 P* PDCACT EQU * f P LDK A1,0 PRESET RETURN CODE z P SUK A7,/02 P RF(Z) DCRD READ SPECIFIC P SUK A7,/06-/02 P RF(Z) DCWR P SUK A7,
0x2657f0…265984 Dummy {f00=0x00c2, f01=0x0190, f02=»Z) DCTP TRANSFER PARAMETERS P SUK A7,/38-/37 $ P RF(Z) DCSST SET STATUS < P IFF TBUFL=0 P ADK A7,/38-/31 p P RF(Z) DCGW GET WRITE BUFFER P XIF P RF DCA100 P EJECT P* P* P* ACTIVATION FROM DCTASK
0x265984…265b18 Dummy {f00=0x00c2, f01=0x0190, f02=»AD BUFFER z P SUK A7,/37-/22 $ P RF(E) DCTP TRANSFER PARAMETERS * PDCA100 EQU * REQUEST ERROR R P ABL DISIOE INVALID ORDER t P EJECT P* P* P* READ FROM DCTASK P* P* P* REQUEST FROM DC-TASK P* CO
0x265b18…265cac Dummy {f00=0x00c2, f01=0x0190, f02=»A15,CKMESS CHECK IF MESSAGE RECEIVED PDCRTN EQU * , P ABL TDISP GO TO DISPATCHER @ P EJECT d P* r P* | P* TRANSFER PARAMETERS P* P* > P* REQUEST FROM DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS : P* FROM
0x265cac…265e40 Dummy {f00=0x00c2, f01=0x018e, f02=»/70 SPECIFIC DID ? P RF(L) DCTP20 NO " P LDK A3,DIDLST GET DEVICE LIST 2 P ADR A3,A6 X PDCTP05 EQU * j P LDR* A1,A3 ~ " P RF(Z) DCTP10 FREE POSITION ? P ADK A3,2 NO P RB DCTP05 PDCTP10 EQU * P STR A2,A3 STORE DID I
0x265e40…265fd4 (1, 623) Dummy {f00=0x00c2, f01=0x0190, f02=» ( P* HERE TO INTRODUCE DWT IN DC-TAB $ P* IF DC-TASK NOT CONCERNED 0 P* X P CWK A6,DW2200 DC-TASK ? b P RF(E) ENDIO YES * P LD A1,DC:IN GET DC-TAB INPUT POINTER ( P CWK A1,DC:END TABLE ALREADY FULL ? $ P ABL(E) DISIOE YES R
0x265fd4…266168 Dummy {f00=0x00c2, f01=0x0190, f02=»DC:TAB INCREMENT DC-TAB LENGTH P SUR A1,A1 RETURN CODE = 0 & PENDIO EQU * H $ P CF A15,TENDIO COMPLETE REQUEST P RB DCRTN P EJECT P* P* P* WRITE P* P* P* COMPLETE WHEN: P* SUCCESFUL TRANSM
0x266168…2662fc Dummy {f00=0x00c2, f01=0x0190, f02=» P RB DCRTN P* P EJECT P* . P* 8 P* READ B P* P P* Z P* COMPLETE WHEN: d P* MESSAGE RECEIVED | P* MESSAGE IN QUEUE P* TIME OUT P* P* PDCRD EQU * & P LD A1,DWTBQ,A6 CHEC
0x2662fc…266490 Dummy {f00=0x00c2, f01=0x0190, f02=» IN QUEUE P* PDCRD10 EQU * P LDR* A2,A1 GET NEXT ONE 0 , P ST A2,DWTBQ,A6 STORE AS FIRST IN QUEUE P P ADK A1,6 ADJUST ADDRESS P ST A1,ECBBA,A8 STORE IN ECB P LD A4,-4,A1 GET LENGTH P ST A4,ECBEL,A8 STORE IN ECB P
0x266490…266624 Dummy {f00=0x00c2, f01=0x0190, f02=»5,RRBUF RELEASE IT $ P LDKL A1,/400 BEL INRETURN CODE P CF A15,TENDIO B P RF DCRD12 X PDCRD11 EQU * j P LDK A1,0 ~ ( P CF A15,TENDIO COMPLETE READ REQUEST PDCRD12 EQU * P LD A1,DWTBQ,A6 P RB(NZ) DCRTN , P LD A1,DWT
0x266624…2667b8 Dummy {f00=0x00c2, f01=0x0190, f02=» P* P* P* GET WRITE BUFFER P* 6 P* @ P IFF TBUFL=0 J P* COMPLETE WHEN: ^ P* BUFFER BEEN ALOCATED v P* TIME OUT P* P* PDCGW EQU * & P CF A15,GTBUF GET TRANSMIT BUFFER P LDR A4,A4
0x2667b8…26694c Dummy {f00=0x00c2, f01=0x018e, f02=» CF A15,TIMERE START TIMER P CF A15,INSGWQ QUEUE REQUEST " P RB DCRTN F P XIF X P EJECT d P* r P* | P* RELEASE READ BUFFER P* P* PDCRR LD A4,ECBBA,A8 P SUK A4,6 P CF A15,RRBUF PDCRR1 EQU *
0x26694c…266ae0 Dummy {f00=0x00c2, f01=0x0190, f02=» P* P* P* P* COMPLETE WHEN: & " P* MESSAGE PASSED TO TERMINAL > P* TIME OUT d P* x PDCEX EQU * * P RB DCWR SAME INITIALIZATION AS WRITE P EJECT P* P* P* SET STATUS P* COMPLETE W
0x266ae0…266c74 (1, 624) Dummy {f00=0x00c3, f01=0x0190, f02=»RANSFER FUNCTION CODE ~ P* PDCSST EQU * ( P LD A8,DWTECB,A6 < P LD A1,ECBCW,A8 GET STATUS T P LDR A2,A1 v " P ANKL A2,/FF00 FUNCTION CODE ? P CWK A2,/4000 P RF(E) DCSST4 YES P LDR A1,A1 P RF(NZ) DCSST1 BUSY
0x266c74…266e08 Dummy {f00=0x00c3, f01=0x0190, f02=» RB(Z) DCRR1 STATUS ALREADY SET P LDK A1,/FE ( & P ANS A1,DWTST,A6 SET DEVICE READY < ( P LDKL A2,DCSTQ GET THRU QUEUE ANCHOR f & P CF A15,INSWQ1 INSERT DWT IN QUEUE P LDK A2,6 " P ST A2,DWTOR,A6 REPLACE ORDER P CM ECBRL,A8 P
0x266e08…266f9c Dummy {f00=0x00c3, f01=0x0190, f02=» ADR A3,A6 PDCSST2 EQU * P LDR* A2,A3 GET AI & P RB(Z) DCSSTX END OF LIST @ P ANKL A2,NBIT0 b P CWR A1,A2 COMPARE AI x P RF(E) DCSST3 OK,AI FOUND P ADK A3,2 P RB DCSST2 GO ON SEARCHING PDCSST3 EQU * P LD A1,E
0x266f9c…267130 Dummy {f00=0x00c3, f01=0x0190, f02=»ECBRL,A8 CLEAR REQUESTED LENGTH P LDK A2,6 ( " P ST A2,DWTOR,A6 REPLACE ORDER : P RB DCWR ` P EJECT p P* ~ P* P* P* TIMER HANDLING PART P* P* P* P* READ TIMER=TIMERR P* PTIMERE EQU
0x267130…2672c4 Dummy {f00=0x00c3, f01=0x0190, f02=»ME P DATA TOUTRE PTIMERR DATA 0 ( P ST A4,DWTTP,A6 STORE TIMER POINTER 4 PTIME10 EQU * ` P RF GBUF10 RETURN t P* P* TIMEOUT READ TIMER P* PTOUTRE EQU * P LDR A6,A1 FETCH DWT P CM DWTTP,A6 P IFF T
0x2672c4…267458 Dummy {f00=0x00c3, f01=0x0190, f02=»,A6 CHECK IF EXCHANGE ORDER P SUK A2,8 $ P RF(NZ) TOUTR2 NOT EXCHANGE 6 2 P ORK A1,2 RETURN CODE /42 AT EXCHANGE TIME OUT Z & PTOUTR2 ABL ENDIO COMPLETE REQUEST P* P* WRITE TIMER=TIMWR P* PTIMEWR LDR A1,A6 & P LD A2
0x267458…2675ec Dummy {f00=0x00c3, f01=0x018e, f02=»DATA 0 P ST A4,DWTTP,A6 P RB TIME10 & P* 8 P* TIMEOUT WRITE TIMER B P* ` PTOUTWR EQU * j P LDR A6,A1 FETCH DWT ~ P CM DWTTP,A6 P LD A1,DWTOR,A6 GET ORDER P SUK A1,6 P RF(Z) TOUT10 WRITE P SUK A1,2
0x2675ec…267780 Dummy {f00=0x00c3, f01=0x0190, f02=» ( P CF A15,RTBUF RELEASE TRANSMITBUFFER ( P CF A15,CKGBQ CHECK GET BUFFER QUEUE 0 * P CF A15,REMOVW REMOVE FROM WRITE QUEUE P XIF P RB TOUTR1 P EJECT P* P* P* STOP REQUEST TIMING P* & P* REMAINING TIME IS RE
0x267780…267914 (1, 625) Dummy {f00=0x00c3, f01=0x0190, f02=» LDR* A2,A2 " P NGR A2,A2 GET REMAINING TIME P CM* DWTTP,A6 STOP TIMER : P CM DWTTP,A6 Z PCTIM10 EQU * n P RTN A5 P EJECT P* P* GET RECEIVE BUFFER P* $ P* CALLING SEQUENCE: CF A15,GRBUF P* A4=0 IF NO BUF
0x267914…267aa8 Dummy {f00=0x00c3, f01=0x0190, f02=» RECEIVE BUFFERS | PGBUF INH P LDR* A4,A2 ( P RF(Z) GBUF10 NO BUFFER FREE < . P LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN ` P STR A3,A2 * PGBUF10 ADKL A15,4 ADJUST STACK POINTER P ABR* A15 RETURN TO CALLER P* P* P
0x267aa8…267c3c Dummy {f00=0x00c3, f01=0x0190, f02=»* ELSE A4 CONTAINS BUFFER ADDRESS P* A2 AND A3 ARE DESTROYED * P* L P* V * PGTBUF LDKL A2,DCTBUF TRANSMIT BUFFERS ` P RB GBUF P EJECT P* P* P* CHECK GET BUFFER QUEUE P* P* PCKGBQ EQU * P
0x267c3c…267dd0 Dummy {f00=0x00c3, f01=0x0190, f02=»,A6 P RF(N) CKG100 NO REQUEST ! P LD A2,DWTOR,A6 ! , P SUK A2,/31 ! D ( P RF(NZ) CKG100 NO GET BUFFER REQUEST ! X & P CF A15,GTBUF GET TRANSMIT BUFFER ! P LDR A4,A4 ! P RF(Z) CKG110 NO BUFFER FREE ! P LD A3,DWTECB,A6 ! ( P ST A4,ECBBA
0x267dd0…267f64 Dummy {f00=0x00c3, f01=0x0190, f02=» QUEUE ! v PCKG110 EQU * " P LDR A6,A7 RESTORE A6 " " P RB GBUF10 RETURN " @ P XIF " Z P EJECT " f P* " t P* " ~ P* RELEASE RECEIVE BUFFER " P* " P* A4 CONTAINS BUFFER ADDRESS " $ P* CALLING SEQUENCE: CF A15,RRBUF " P* A2 AND A
0x267f64…2680f8 Dummy {f00=0x00c3, f01=0x0190, f02=» " P RF(Z) RBUF20 # P LDR A2,A3 # P RB RBUF10 # 0 PRBUF20 EQU * # B P STR A4,A2 # V P CMR A4 # h P RB GBUF10 RETURN TO CALLER # x P* # P* # P* RELEASE TRANSMIT BUFFER # P* # P IFF TBUFL=0 # P* A4 CONTAINS BUFFER ADD
0x2680f8…26828c Dummy {f00=0x00c3, f01=0x0190, f02=»BUFFERS # r " P CWK A4,BUFT1 DRIVER BUFFER ? $ P RB(E) RBUF YES $ 6 " P CWK A4,BUFT2 DRIVER BUFFER ? $ N P RB(E) RBUF YES $ t P RB GBUF10 NO $ P XIF $ P EJECT $ P* $ P* $ ( P* INSERT DWT IN WRITE REQUEST QUEUE $ P* $ P*
0x26828c…268420 Dummy {f00=0x00c3, f01=0x0190, f02=»A3,A2 $ $ P RF(Z) INSWQ3 END OF QUEUE FOUND % P LDR A2,A3 % 6 P RB INSWQ2 % H PINSWQ3 ADR A4,A6 % Z P STR A4,A2 INSERT IN QUEUE % r " P CMR A4 INDICATE END OF QUEUE % P RB GBUF10 RETURN % P* % P* % * P* REMOVE DWT FROM WRITE REQUEST
0x268420…2685b4 (1, 626) Dummy {f00=0x00c3, f01=0x0190, f02=»,DWTWQ GET DWT-LINK TO BE REMOVED % P ADR A4,A6 & * PREM10 LDR* A3,A2 & > & P RB(Z) GBUF10 NOT ON QUEUE: RETURN & V P CWR A3,A4 & P RF(E) REM15 & P LDR A2,A3 GET NEXT & P RB REM10 & PREM15 LDR* A3,A4 REMOVE & P STR A3,A2 & P R
0x2685b4…268748 Dummy {f00=0x00c3, f01=0x0190, f02=» & P* A2,A3,A4 DESTROYED ' P* A6=DWT ' $ P* ' 4 * PINSGWQ LDKL A2,DCGWQ GET QUEUE ANCHOR ' > P RB INSWQ1 ' l P* ' ~ P* ' , P* REMOVE DWT FROM GET WRITE BUFFER QUEUE ' P* ' P* A2,A3,A4 DESTROYED ' P* A6=DWT ' P* ' * PREMOVG
0x268748…2688dc Dummy {f00=0x00c3, f01=0x0190, f02=» ' p P* ( P* A4=BUFFER ADDR ( P* A2,A3 DESTROYED ( * P* ( D PQRBUF EQU * ( N 4 P LDKL A2,DW2200+DWTWQ BEGINNING OF RECEIVE QUEUE ( b PQR100 EQU * ( P LDR* A3,A2 ( $ P RF(Z) QR200 END OF QUEUE FOUND ( P LDR A2,A3 ( P RB QR100 (
0x2688dc…268a70 Dummy {f00=0x00c3, f01=0x0190, f02=»* CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE ( P* ) 6 4 P* REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED ) @ P* ) x PCKMESS LDKL A6,DW2200 ) P LD A1,DWTST,A6 ) P RF(N) CKM110 NO REQUEST ) P LDK A1,2 READ REQUEST ? ) P CW A1,DWTOR,A6
0x268a70…268c04 Dummy {f00=0x00c3, f01=0x0190, f02=» READ IN QUEUE ) , P LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER * . P ST A2,DWTWQ,A6 STORE THIS ADDR INTO QUEUE * F " P ADK A3,6 MOVE POINTER TO TEXT * x * P ST A3,ECBBA,A8 SAVE THIS ADDR IN ECB * P LD A4,-4,A3 * 0 P ST A4,ECBEL,A8 STORE NUMBERS OF CHARACT
0x268c04…268d98 Dummy {f00=0x00c3, f01=0x0190, f02=»PLETE READ GENERAL REQUEST * x * PCKM110 ADKL A15,4 ADJUST STACK POINTER + " P ABR* A15 RETURN + P 8 PCKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHECK STATUS + h , P OR A1,DCONOF TAKE CARE OF POLL TIME OUT + P CW A1,DCSTOL + P ST A1,DCSTOL + & P RB(E) C
0x268d98…268f2c Dummy {f00=0x00c3, f01=0x0190, f02=»ORE REGISTER A3-A8 + $ P* CALLING SEQUENSE: CF A15,STREG , P* , B P* RESTORE , L $ P* CALLING SEQUENCE: CF A15,LDREG , ^ P* , P* , PSTREG ST A3,LCA3 , P ST A4,LCA4 , P ST A5,LCA5 , P ST A6,LCA6 , P ST A7,LCA7 , P ST A8
0x268f2c…2690c0 Dummy {f00=0x00c3, f01=0x0190, f02=» LDKL A5,0 , PLCA5 EQU *-2 - P LDKL A6,0 - & PLCA6 EQU *-2 - 8 P LDKL A7,0 - L PLCA7 EQU *-2 - ^ P LDKL A8,0 - r PLCA8 EQU *-2 - PRTNA15 EQU * - P ADKL A15,4 - P ABR* A15 - P EJECT - P* - P* - P* - P* TIMER VA
0x2690c0…269254 (1, 627) Dummy {f00=0x00c3, f01=0x0190, f02=»U /16 - PSOH EQU /01 . PSTX EQU /02 . " PETX EQU /03 . 6 PSID EQU /50 . J PDID EQU /70 . ^ PGRID EQU /20 . r PDLE EQU /10 . PACK1 EQU /31 . PWABT EQU /3F . PDC2 EQU /12 . PCHDSL EQU /72 . P EJECT . P* . P* .
0x269254…2693e8 Dummy {f00=0x00c3, f01=0x0190, f02=»ANSMISSION . p PXACK DATA 0 ACK EXPECTED / & PTACK DATA 0 ACK TO BE TRANSMITTED / 2 PWPOLL DATA 0 WAIT FOR POLL / ( PTWABT DATA 0 WABT TO BE TRANSMITTED / ~ ( PHEADER DATA 0,0 HEADER STORAGE AREA / P* / PFECB RES 1 WRITING ECB / ( PFECBBA RES
0x2693e8…26957c Dummy {f00=0x00c3, f01=0x0190, f02=» / v PNAKCNT RES 1 NAK COUNTER 0 P* 0 ( PTSTENQ DATA 0 RECOVERY FLAG 0 2 ( PCOUNT DATA 0 CHARACTERS TO BE SAVED 0 V P* 0 & PZRECOV RES 6 SAVE TRANSMIT HEADER 0 & PLSEND RES 1 LAST TRANSMIT ADDRESS 0 P* 0 * PBUSYFL EQU 1 BUSY FLAG (BIT 15
0x26957c…269710 Dummy {f00=0x00c3, f01=0x0190, f02=» PDIDREA DATA 0 SELECTED DID 1 P EJECT 1 & P* 1 4 P* 1 > PSTRING EQU * FRAME STRINGS 1 H & P DATA 0,0 TRAFFIC POLL WITHOUT ACK 1 j ( P DATA /1031,0 TRAFFIC POLL WITH ACK 1 * P DATA /0500,0 STATUS POLL WITHOUT ACK 1 * P DATA /1031,/0500 STATUS P
0x269710…2698a4 Dummy {f00=0x00c3, f01=0x0190, f02=»ABLE FOR FRAMES 1 | & P DATA TP TRAFFIC POLL WITHOUT ACK 2 $ P DATA TPA TRAFFIC POLL WITH ACK 2 B & P DATA SP SPECIFIC POLL WITHOUT ACK 2 j $ P DATA SPA SPECIFIC POLL WITH ACK 2 P DATA RT RETRANSMIT REQUEST 2 P EJECT 2 P* 2 P* OUTPUT SOFTWAR
0x2698a4…269a38 Dummy {f00=0x00c3, f01=0x0190, f02=»ATA /1030,0 TRAFFIC 2 & PDCSTR4 DATA /1005,0 REPLY REQUEST 3 " PDCSTR5 DATA /0404,0 NO TRAFFIC 3 F $ PDCSTR6 DATA /103E,0 DEVICE READY 3 l PDCSTR7 DATA /103B,0 THRU 3 , PDCSTR8 DATA /103D,0 DEVICE NOT OPERABLE 3 , PDCSTR9 DATA 0 REQUEST PROCESSOR MESS
0x269a38…269bcc Dummy {f00=0x00c3, f01=0x0190, f02=»E FOR A5 3 r * P LDKL A2,/100+SYN SPECIFY SYN PATTERN 4 $ P CIO A2,1,CHLCIN START RECEIVER 4 > $ PBRM100 CF A5,READ READ CHARACTER 4 f P SUK A2,SOH 4 P RF(E) BRM200 SOH 4 P SUK A2,/FF-SOH 4 P RB(NE) BRM100 NOT /FF 4 P CF A5,READ READ CHARA
0x269bcc…269d60 Dummy {f00=0x00c3, f01=0x0190, f02=»CEIVED 4 P* 5 PBRM200 LDK A7,0 CLEAR BCC 5 P CF A5,READP READ RID=TC 5 : P ABL(NZ) BRM900 PARITY ERROR 5 Z " P CW A2,DW2200 CHECK IF THIS TC 5 ~ P RF(E) BRM201 5 P CWK A2,GRID GENERAL RID ? 5 . P ABL(NE) BRM900 NOT THIS TC: RESYNCHRONIZE 5
0x269d60…269ef4 (1, 628) Dummy {f00=0x00c4, f01=0x0190, f02=»INAL ADDRESS 5 x * P CF A5,FINTER FIND SUBTERMINAL ADDRESS 6 & P LDR A3,A3 SET CONDITION REGISTER 6 B . P RF(N) BRM205 DONT INIT DWT IF GENERAL SID 6 l P ST A3,FDWTIN AND STORE IT 6 PBRM205 EQU * 6 P SUK A2,SID 6 P RF(Z) BRM210 GENERAL SID 6
0x269ef4…26a088 Dummy {f00=0x00c4, f01=0x0190, f02=»,FDID SAVE DID 6 $ P CM HEADER CLEAR HEADER CONTENTS 7 P CM HEADER+2 7 > & P LDK A3,0 RESET CHARACTER COUNTER 7 R & PBRM220 CF A5,READP READ CHARACTER 7 | P ABL(NZ) BRM900 PARITY ERROR 7 P CWK A2,STX 7 " P RF(E) BRM300 STX: TEXT FRAME 7 P CWK
0x26a088…26a21c Dummy {f00=0x00c4, f01=0x0190, f02=»RE CHARACTER 7 | P ADK A3,1 INCREMENT POINTER 8 P RB BRM220 8 8 PBRM250 CF A5,READP READ BCC 8 J P ABL(NZ) BRM910 PARITY ERROR 8 n $ P ANK A7,/7F MASK BCC PARITY BIT 8 P ABL(NZ) BRM910 BCC ERROR 8 P CF A5,HALTIN HALT INPUT 8 P EJECT 8
0x26a21c…26a3b0 Dummy {f00=0x00c4, f01=0x018e, f02=» A3,0 FIND HEADER TYPE 8 P LDKL A4,STRING 9 PBRM260 CWR* A1,A4 9 6 P RF(NE) BRM270 9 P P CW A2,2,A4 9 f 2 P ABI(E) FRAME,A3 TYPE FOUND: BRANCH TO HANDLER 9 z PBRM270 ADK A3,2 9 & P ADK A4,4 INCREMENT STRING POINTER 9 P CWK A4,STRINE 9 P
0x26a3b0…26a544 Dummy {f00=0x00c4, f01=0x0190, f02=» PBRM300 LD A6,FDWTIN : . P RF(Z) BRM900 INVALID SUBTERMINAL ADDRESS : P LD A4,DCRBUF : R & P RF(Z) BRM900 NO BUFFER AVAILABLE : h P LD A1,WPOLL : " P RF(NZ) BRM900 MUST BE A POLL : P LD A1,DWTST,A6 : P ANK A1,BUSYFL : , P RF(NZ) BRM900
0x26a544…26a6d8 Dummy {f00=0x00c4, f01=0x0190, f02=»CHARACTER : x P RF(NZ) BRM900 PARITY ERROR ; P CWK A2,DC2 PRINT COMMAND ? ; 6 P RF(E) BRM315 YES ; Z P CWK A2,ETX ; t P RF(E) BRM350 ETX RECEIVED ; P CWK A2,SYN ; . P RF(NE) BRM320 NOT SYN, NOT TO BE SKIPPED ; P XRR A7,A2 ADJUST BCC ;
0x26a6d8…26a86c Dummy {f00=0x00c4, f01=0x0190, f02=»AG FOR FOLLOWING POLL ; x P LDK A1,BUSYFL < ( P ORS A1,DWTST,A6 SET BUSY SUB-TRMNL < 4 P* < ` " P* TAKE CARE OF FAST SELECTION < j P* < P LD A1,FDID < P SUK A1,DID < P RF(Z) BRM318 < P LD A1,FDID < " P ST A1,AIDID,A6 INIT AI DEVI
0x26a86c…26aa00 Dummy {f00=0x00c4, f01=0x0190, f02=» EQU * < P IFT NULTST=0 = P CWK A2,0 NULL ? = $ P RB(E)BRM310 YES SUPPRESS IT = < P XIF = ` P CWK A3,RBUFL+RBUFL = l " P RF(G) BRM900 BUFFER OVERFLOW = P LDR A1,A4 = & P ADR A1,A3 COMPUTE BUFFER ADDRESS = P SCR A2,A1 STORE CHARACTER =
0x26aa00…26ab94 (1, 629) Dummy {f00=0x00c4, f01=0x0190, f02=»M350 EQU * = P LDK A2,DID > P LD A1,SPRINT PRINT ASKED ? > & P RF(Z) BRM355 NO > J , P LD A2,AIDID,A6 YES,GET SELECTED DEVICE > b PBRM355 EQU * > P LC A1,HEADER > P CWK A1,/07 BEL ? > " P RF(E) BRM356 YES,MESSAGE NUL > P CWK A3,RBUF
0x26ab94…26ad28 Dummy {f00=0x00c4, f01=0x0190, f02=» P ADK A3,1 UPDATE LENGTH ? P* ? $ PBRM356 EQU * ? . P CF A5,READP READ BCC ? B P RF(NZ) BRM910 PARITY ERROR ? ` $ P ANK A7,/7F MASK BCC PARITY BIT ? P RF(NZ) BRM910 BCC ERROR ? P IM WPOLL SET WAIT FOR POLL ? P ST A3,-4,A4 STORE LENGT
0x26ad28…26aebc Dummy {f00=0x00c4, f01=0x0190, f02=»GRBUF ALLOCATE RECEIVE BUFFER ? $ P LD A1,DCRBUF BUFFER SHORTAGE ? @ & P RF(Z) BRM370 YES @ N P LD A1,SPRINT @ h P RF(NZ) BRM370 SET WABT @ ~ P IM TACK ACK TO BE SENT @ PBRM360 EQU * @ $ P ADK A4,6 ADJUST BUFFER POINTER @ P RF TEXT PROCE
0x26aebc…26b050 Dummy {f00=0x00c4, f01=0x0190, f02=»JECT @ P* A P* A * P* ERROR: WAIT FOR TWO /FF CONSECUTIVE A P* A N P* A X PBRM800 EQU * A b P LDKL A5,STB A v P LDKL A2,/100+SYN A P CIO A2,1,CHLCIN A PBRM900 CF A5,READ A P SUK A2,/FF A P RB(NZ) BRM900 NOT /FF A P
0x26b050…26b1e4 Dummy {f00=0x00c4, f01=0x0190, f02=»NIZE A d P ABL BRM B P EJECT B P* B * P* B 4 P* TEXT RECEIVED B > P* B V P* B ` PTEXT EQU * B j P LD A2,FSID B | P ST A2,DCSTRX SAVE SID TEXT B P LD A6,FDWTIN GET INPUT DWT B P ST A6,DWTTXT B P LD A2,DWTST,A6 GET STATUS
0x26b1e4…26b378 Dummy {f00=0x00c4, f01=0x0190, f02=»TE READ REQUEST WITH RC=0 B $ P LD A8,DWTECB,A6 GET ECB ADDRESS C " 0 P ST A4,ECBBA,A8 STORE BUFFER ADDRESS IN ECB C J P LD A3,-4,A4 GET LENGTH C ~ * P ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH C P RF(NZ) TEX100 C $ P SUK A4,6 RESTORE BUFFER ADDRESS C
0x26b378…26b50c Dummy {f00=0x00c4, f01=0x018e, f02=»CW,A8 STORE REMAINING TIME C $ P CF A15,TENDIO COMPLETE REQUEST D " P RF TEX205 D J " PTEX200 SUK A4,6 BASE OF BUFFER D " P LDK A2,DWTBQ GET PROPER QUEUE D P ADR A2,A6 D P CF A5,QR100 D P LD A1,DWTBQ,A6 D P LDR* A2,A1 FIRST IN QUEUE D P
0x26b50c…26b6a0 Dummy {f00=0x00c4, f01=0x018e, f02=» D ~ PTEX205 EQU * E P LD A1,FDID E P SUK A1,DID E 0 P RF(Z) TEX206 E D P* E Z P* FORCE SELECT ANSWER E d P* IF DC2,FORCE WABT E P* E P LD A1,SPRINT E , P RF(NZ) TEX206 PRINT WITH FAST SELECTION E " P IM SREADY FORCE SEL
0x26b6a0…26b834 (1, 630) Dummy {f00=0x00c4, f01=0x0190, f02=» E PTEX210 EQU * F P LDR A6,A1 GET DWT F P CM DWTBTP,A6 F 6 P LD A1,DWTBQ,A6 GET ANCHOR F L P RF(Z) TEX250 F n $ P CM DWTBQ,A6 CLEAR QUEUE ANCHOR F . P LDKL A2,DW2200+DWTWQ DC TASK QUEUE ANCHOR F PTEX220 EQU * F P LDR* A3,A2 F P R
0x26b834…26b9c8 Dummy {f00=0x00c4, f01=0x0190, f02=»MESS COMPLETE DC F PTEX250 EQU * G P ABL TDISP G , P EJECT G > P* G L P* G V ( P* STATUS POLL: GENERAL AND SPECIFIC G ` P* G P* G PSP EQU * G " P CM WPOLL CLEAR WAIT FOR POLL G ( P LD A2,XACK STATUS POLL WITHOUT ACK G " P RF(Z)
0x26b9c8…26bb5c Dummy {f00=0x00c4, f01=0x0190, f02=»WPOLL CLEAR WAIT FOR POLL G P LDK A1,0 RETURN CODE = 0 H " < P CF A5,CWRITE CHECK IF WRITE REQUEST IS TO BE COMPLETED H D PSPA200 EQU * H " P CF A5,CPTIM RESET POLL TIMER H PSPA300 EQU * H P LD A2,FSID GET SID H P SUK A2,SID GENERAL SID ?
0x26bb5c…26bcf0 Dummy {f00=0x00c4, f01=0x018e, f02=» H P LD A1,SREADY I P RF(Z) SPA301 I P CF A5,SETREA I 4 P ABL TPA400 SELECT DEVICE I J PSPA301 EQU * I l P LD A1,SPRINT I P RF(Z) SPA302 I P CF A5,FRWABT PRINT MODE I PSPA302 EQU * I P LD A6,DCSTQ I P ABL(NZ) TPA305 SEND
0x26bcf0…26be84 Dummy {f00=0x00c4, f01=0x018e, f02=» I p PSPA330 EQU * J P LDR* A2,A6 GET SUBTERMINAL J P ST A2,FSID STORE SID J @ P LDK A2,DID J ^ P ST A2,FDID RESTORE DID J r P CF A5,TRTRAF SEND TRAFFIC J P RB SP100 J P* J P EJECT J P* SPECIFIC STATUS POLL J P* J P
0x26be84…26c018 Dummy {f00=0x00c4, f01=0x0190, f02=» P LD A6,FDWTIN RESTORE DWT K ( P LD A1,SPRT1,A6 PRINT IN PROGRESS ? K & P RF(NZ) TPA201 YES K R PSPA360 EQU * K l P LD A1,FDID K * P SUK A1,DID SELECTION OR DESELECTION ? K P ABL(NZ) TPA400 YES K P LD A1,DWTST,A6 GET STATUS K P RF(N) S
0x26c018…26c1ac Dummy {f00=0x00c4, f01=0x018e, f02=»RAFFIC FOR THIS DWT K ( PSPA500 CF A5,TRNOTR SEND NO TRAFFIC L P RB SP100 L H PSPA600 EQU * L Z P LD A1,DWTTXT L n P CW A1,FDWTIN L . P ABL(NE) BRM MUST BE FOR THE SAME TERMINAL L P CF A5,FRWABT SET WABT L P RB SPA360 L P* L PSP
0x26c1ac…26c340 Dummy {f00=0x00c4, f01=0x0190, f02=» P* M P* M P* TRAFFIC POLL M P* M . P* M 8 & PTP EQU * TRAFFIC POLL WITHOUT ACK M B " P CM WPOLL CLEAR WAIT FOR POLL M l P LD A2,XACK M " P RF(Z) TPA200 NO ACK EXPECTED M $ P CF A5,TRRPRQ SEND REPLY REQUEST M P RB SP100 M $ PTP
0x26c340…26c4d4 (1, 631) Dummy {f00=0x00c4, f01=0x0190, f02=»TE IS TO BE COMPLETED M v PTPA200 EQU * N P* N 2 ( P* CHECK IF SPECIFIC OR GENERAL SID N < P* N h P LD A2,FSID GET SID N r P SUK A2,SID GENERAL SID ? N P RF(Z) TPA300 YES N P* N 0 P* HERE ON SPECIFIC SID,TEST IF SPECIFIC DID N P
0x26c4d4…26c668 Dummy {f00=0x00c4, f01=0x018e, f02=» P* SPECIFIC TRAFFIC POLL O " P* TEST IF PRINT MODE O $ P* O J P LD A1,SREADY O T P RF(NZ) TPA207 SELECT DEVICE O j P LD A1,SPRINT O " P RF(NZ) TPA206 PRINT STATEMENT O P LD A6,FDWTIN GET DWT O P LD A1,SPRT1,A6 O P RF(Z) T
0x26c668…26c7fc Dummy {f00=0x00c4, f01=0x0190, f02=» P ANK A1,BUSYFL P P RF(Z) TPA306 NOT BUSY P P IM TWABT P 8 P CF A5,TRNOTR P J * P ABL SP100 RETURN AFTER TRANSMIT BUSY P ` PTPA203 EQU * P P LD A1,DWTST,A6 GET STATUS P P RB(N) SPA500 NO ORDER ON P P LD A1,DWTOR,A6 GET ORDER P P
0x26c7fc…26c990 Dummy {f00=0x00c4, f01=0x0190, f02=»FFIC POLL P t P* Q PTPA205 EQU * Q P ST A6,FDWTUT WRITING DWT Q 0 $ P LD A8,DWTECB,A6 GET ECB ADDRESS Q R P ST A8,FECB Q z & P LD A2,ECBBA,A8 GET BUFFER ADDRESS Q P ST A2,FECBBA Q ( P LD A2,ECBRL,A8 GET REQUESTED LENGTH Q P RF(Z) TPA210
0x26c990…26cb24 Dummy {f00=0x00c4, f01=0x0190, f02=» Q z P ABL SP100 R PTPA206 EQU * R P LD A1,DWTTXT R . P CW A1,FDWTIN R D . P ABL(NE) BRM MUST BE FOR THE SAME TERMINAL R Z P CF A5,FRWABT SET WABT R P RB TPA203 R PTPA207 EQU * R P LD A1,DWTTXT R P CW A1,FDWTIN R P ABL(NE) BRM
0x26cb24…26ccb8 Dummy {f00=0x00c4, f01=0x0190, f02=»,DCSTR9 INIT TRANSFER FIELD R ( P CF A5,TRSFCN TRANSFER FUNCTION KEY S $ P ABL SP100 S P P EJECT S b P* S p $ P* GENERAL TRAFFIC POLL DETECTED S z P* S PTPA300 EQU * S P* S & P* TEST IF PRINT SEQUENCE INITIATED S P* S P LD A1,SRE
0x26ccb8…26ce4c Dummy {f00=0x00c4, f01=0x0190, f02=» P CF A5,FRWABT INIT WABT T PTPA302 EQU * T $ P LD A6,DCSTQ T 8 " P RF(Z) TPA315 NO PENDING THRU T L PTPA305 EQU * T r P SUK A6,DWTWQ T " P ST A6,FDWTUT INIT OUTPUT DWT T P LD A1,AIDID,A6 GET DID T P ST A1,FDID T P LDR* A1,A6 T
0x26ce4c…26cfe0 Dummy {f00=0x00c4, f01=0x0190, f02=»A6,DCWRQ GET QUEUE ANCHOR T P ABL(Z) SPA500 NO TRAFFIC U " " P SUK A6,DWTWQ GET DWT ADDRESS U D P LDR* A2,A6 INIT SID U j P ST A2,FSID U P LDK A2,DID U $ P ST A2,FDID RESTORE GENERAL DID U ( P RB TPA205 SEND FIRST TEXT IN QUEUE U P EJECT
0x26cfe0…26d174 (1, 632) Dummy {f00=0x00c5, f01=0x0190, f02=» * U " P LD A6,FDWTIN RESTORE LAST DWT V " P CM SPRINT RESTORE PRINT FLAG V 0 $ P LD A1,AIDID,A6 GET SPECIFIC DID V V $ P ST A1,FDID STORE IT TO BE SEND V ~ * P IM SPRT1,A6 INIT WABT-THRU INDICATOR V P RTN A5 V P* V P* INIT DEVICE (SID,DID) V
0x26d174…26d308 Dummy {f00=0x00c5, f01=0x0190, f02=» EJECT V P* W P* SELECT AI DEVICE W P* W 4 PTPA400 EQU * W > P* W R P* TEST IF DID IS VALID W P* W z . P CF A5,DESEL EXAMINE EVENTUAL DESELECTION W " P CM SREADY CLEAR READY TO SEND W P LD A6,FDWTIN GET DWT W $ P LD A1,DWTST,A
0x26d308…26d49c Dummy {f00=0x00c5, f01=0x0190, f02=»DK A3,DIDLST GET DEVICE LIST W P ADR A3,A6 X $ PTPA403 EQU * X 6 P LDR* A2,A3 GET DID IN LIST X J P ABL(Z) BRM END OF LIST X n P ANKL A2,NBIT0 IGNORE STATUS X P CWR A1,A2 OK ? X $ P RF(E) TPA405 YES,DID RECOGNIZED X P ADK A3,2 X P RB
0x26d49c…26d630 Dummy {f00=0x00c5, f01=0x018e, f02=» AI ADDRESS X | P LDR* A2,A3 GET AI STATUS Y P ANKL A2,BIT0 AI OPERABLE ? Y 6 P RF(NZ) TPA500 NO Y Z P* Y t P* DEVICE READY Y ~ P* Y P CF A5,TREADY Y P ABL SP100 Y P* Y P* DEVICE NOT OPERABLE Y P* Y PTPA500 EQU * Y
0x26d630…26d7c4 Dummy {f00=0x00c5, f01=0x0190, f02=» 2 P* RELEASE TERMINAL BY RESETTING STATUS BUSY Z P* Z : PDESEL EQU * Z D P LD A1,FDID Z X P CWK A1,CHDSL DESELECTION ? Z l P RF(E) DESEL1 Z P RTN A5 NO Z . PDESEL1 EQU * DESELECTION,RESTORE TERMINAL Z * P CM SPRT1,A6 RESET WABT-THRU I
0x26d7c4…26d958 Dummy {f00=0x00c5, f01=0x0190, f02=»CT Z P* [ P* [ P* RETRANSMIT REQUEST [ P* [ : P* [ D PRT EQU * [ N P LD A1,XACK [ ^ 0 P ABL(Z) BRM IGNORE NACK IF NOT ACK EXPECTED [ r P LD A1,ZRECOV+4 [ P CW A1,FSID [ P ABL(NE) BRM NOT PROPER SID [ P LD A6,FDWTUT [
0x26d958…26daec Dummy {f00=0x00c5, f01=0x0190, f02=»50 YES [ P IM NAKCNT COUNT NAK:S P LD A2,NAKCNT , P SUK A2,4 B " P RF(Z) RT100 4 NAK:S RECEIVED T P IM TSTENQ z " P CF A5,TRTEXT RETRANSMIT TEXT P ABL SP100 , PRT100 LDK A1,2 4 NAK:S: THROUGHPUT ERROR 0 P CF A5,CWRITE COMPLE
0x26daec…26dc80 Dummy {f00=0x00c5, f01=0x0190, f02=» z P* ] PRT150 EQU * ] P IM TSTENQ ] & ( P CFI A5,LSEND RETURN TO LAST STATUS ] 8 P ABL BRM ] d P EJECT ] t P* ] P* ] 8 P* CHECK IF THERE IS A WRITE REQUEST TO BE COMPLETED ] P* ] P* A1 CONTAINS RETURN CODE ] P* ] P
0x26dc80…26de14 (1, 633) Dummy {f00=0x00c5, f01=0x0190, f02=»WR900 NO WRITE GOING ON ] P LD A2,DWTST,A6 ^ P RF(N) CWR250 NO REQUEST ^ 8 P LD A2,DWTOR,A6 GET ORDER ^ X P SUK A2,6 ^ z P RF(Z) CWR100 WRITE REQUEST ^ P SUK A2,2 ^ ( P RF(NZ) CWR250 NOT EXCHANGE REQUEST ^ P LDR A1,A1 ^ 2 P RF(NZ)
0x26de14…26dfa8 Dummy {f00=0x00c5, f01=0x0190, f02=» 0 PCWR100 CF A5,CTIME ******UD 19 08 76 ******* _ $ P CF A15,TENDIO COMPLETE REQUEST _ 8 P LD A2,DCSTQ THRU IN QUEUE _ ` P RF(Z) CWR101 NO _ $ P LDKL A2,DCSTQ INIT QUEUE ANCHOR _ P CF A15,REM05 _ P RF CWR250 _ PCWR101 EQU * _ * P CF A15,RE
0x26dfa8…26e13c Dummy {f00=0x00c5, f01=0x018e, f02=»E TRANSMIT BUFFER _ | ( P CF A15,CKGBQ CHECK GET BUFFER QUEUE ` P XIF ` F & PCWR250 CM FDWTUT NO WRITE GOING ON ` R PCWR900 EQU * ` | P RTN A5 ` P EJECT ` P* ` P* ` " P* TRANSMIT PROCEDURE RESPONSES ` P* ` P* ` PTRACK EQU *
0x26e13c…26e2d0 Dummy {f00=0x00c5, f01=0x0190, f02=» P* ACK NOT RECEIVED SEND ENQ a P* a ( PTRRPRQ EQU * a 2 P CF A5,TRSYNC a F P LDK A2,SOH a P CF A5,WRITE a p P LDK A7,0 BCC a P LD A2,DW2200 RID a P CF A5,WRITEP a P LD A2,ZRECOV+4 a P CF A5,WRITEP LAST SID a P LD A2,Z
0x26e2d0…26e464 Dummy {f00=0x00c5, f01=0x0190, f02=»CSTR3 TRAFFIC a P IM XACK b P LDKL A1,TRTRAF b & P ST A1,LSEND b > P RF TRCTRL b R P EJECT b d P* b r P* SEND NO TRAFFIC b | ( P* IF ACK OR WABT HAVE TO BE INCLUDED b P* TAKE CARE ABOUT SID,DID b P* b P* b PTRNOTR EQU * b
0x26e464…26e5f8 Dummy {f00=0x00c5, f01=0x0190, f02=»B TRACK YES b PTRNOT1 EQU * c P LD A1,TWABT TRANSMIT WABT ? c ( P RF(Z) TRNOT2 NO c L P RB TRACK YES c d PTRNOT2 EQU * c z P LDKL A4,DCSTR5 c P CF A5,TRSYNC c P LDK A7,0 BCC c P RF TRC100 c P EJECT c P* c P* c P*
0x26e5f8…26e78c Dummy {f00=0x00c5, f01=0x0190, f02=» P RF TRCTRL d PTRTHRU EQU * d P LDKL A4,DCSTR7 d * P IM XACK d B P LDKL A1,TRTHRU d R P ST A1,LSEND d j P RF TRCTRL d ~ PTRNOP EQU * d P LDKL A4,DCSTR8 d P IM XACK d P LDKL A1,TRNOP d P ST A1,LSEND d P RF TRCTRL d P
0x26e78c…26e920 Dummy {f00=0x00c5, f01=0x0190, f02=»* d PTRCTRL EQU * e P* e 2 P* HERE TO TEST ON RETRANSMISSION CASE OR NOT e ( * P* IF YES RESTORE PREVIOUS HEADER e ^ P* e P LD A1,TSTENQ e " P RF(NZ) RETRAX RETRANSMISSION e P CF A5,TRHEAD e " PTRC100 LCR A2,A4 GET CHARACTER e
0x26e920…26eab4 (1, 634) Dummy {f00=0x00c5, f01=0x0190, f02=» RB TRC100 e PTRC200 LDK A2,ETX f P CF A5,WRITEP SEND ETX f , P LDR A2,A7 f J P CF A5,WRITEP SEND BCC f P LDK A3,3 f z PTRC210 EQU * f P LDK A2,/FF f P CF A5,WRITE SEND PAD f P SUK A3,1 f P RB(NZ) TRC210 f & P CIO A2,0,CHLC
0x26eab4…26ec48 Dummy {f00=0x00c5, f01=0x0190, f02=»E 1 OR DLE ?) f | P* g PRETRAX EQU * g P CM TSTENQ g 4 P LC A3,ZRECOV g F & P ST A3,COUNT INIT PARAMETERS COUNT g P LDK A3,/FF g 2 P ANS A3,ZRECOV DESTROY FIRST CHARACTER COUNTER g P CF A5,TRSYNC g P LD A2,ZRECOV g P CF A5,WRITE
0x26ec48…26eddc Dummy {f00=0x00c5, f01=0x018e, f02=»ND CHARACTER g " P ADK A3,2 COUNTER IN PROGRESS h & P CC A3,COUNT+1 END OF SAVE AREA ? h : " P RB(NE) LOOP NO,GO ON WRITING h d P LD A1,COUNT h " P SC A1,ZRECOV RESTORE COUNTER h " P LD A1,FDWTUT RECOGNIZE RETURN h P RB(Z) TRC100 STATUS h ( P L
0x26eddc…26ef70 Dummy {f00=0x00c5, f01=0x018e, f02=» P EJECT i P* i P* i P* TRANSMIT HEADER : i & & P* SOH RID SID DID i B : P* DLE 1 (ACK),DLE ? (WABT=ACK+BUSY) IF REQUIRED i l $ P* SAVE IT FOR RECOVERY PURPOSES i P* i P* i PTRHEAD EQU * i P CF A5,TRSYNC
0x26ef70…26f104 Dummy {f00=0x00c5, f01=0x0190, f02=» i P LDK A7,0 BCC j P LD A2,DW2200 j P ST A2,ZRECOV,A3 j 4 P CF A5,WRITEP SEND RID j L P ADK A3,2 j j P LD A2,FSID j | P ST A2,ZRECOV,A3 j P CF A5,WRITEP SEND SID j P ADK A3,2 j P LD A2,FDID j P ST A2,ZRECOV,A3 SEND DID j
0x26f104…26f298 Dummy {f00=0x00c5, f01=0x0190, f02=»D A1,TACK TRANSMIT ACK ? j ( P RF(Z) HEAD10 NO,TEST TRANSMIT WABT k P CM TACK k L P LDK A2,DLE k P ST A2,ZRECOV,A3 k p P CF A5,WRITEP SEND DLE k P ADK A3,2 k P LDK A2,ACK1 k P ST A2,ZRECOV,A3 k P CF A5,WRITEP SEND 1 k P ADK A3,
0x26f298…26f42c Dummy {f00=0x00c5, f01=0x0190, f02=» REJECT TRANSMIT WABT k P LDK A2,DLE l P ST A2,ZRECOV,A3 l 2 P CF A5,WRITEP SEND DLE l J P ADK A3,2 l h P LDK A2,WABT l z P ST A2,ZRECOV,A3 l P CF A5,WRITEP SEND WABT l P ADK A3,2 l PHEAD20 EQU * l < P SC A3,ZRECOV SAVE PARAMETER
0x26f42c…26f5c0 Dummy {f00=0x00c5, f01=0x0190, f02=» INCLUDE PENDING ACK,PENDING WABT EVENTUALLY l P* m 6 PTRTEXT EQU * m @ P LD A1,TSTENQ m T " P RB(NZ) RETRAX RETRANSMISSION m j P EJECT m P* m P* TRANSMIT TEXT m P* m P* m P CF A5,TRHEAD m PTRT010 EQU * m P LDK A2,ST
0x26f5c0…26f754 (1, 635) Dummy {f00=0x00c5, f01=0x018e, f02=»A4 GET CHARACTER m P ADK A4,1 INCREMENT POINTER n P CF A5,WRITEP SEND CHARACTER n < PTRT120 EQU * n ` P SUK A3,1 n t " P RB(NZ) TRT100 NEXT CHARACTER n 2 P ABL TRC200 ALL TRANSMITTED. SEND ETX AND BCC n P EJECT n P* n P* n P* TR
0x26f754…26f8e8 Dummy {f00=0x00c5, f01=0x0190, f02=» n h P LDK A3,4 4 SYNS o PTRS100 LDK A2,SYN o P CF A5,WRITE SEND SYN o : P SUK A3,1 o X P RB(NZ) TRS100 o j P RTN A5 o P EJECT o P* o P* o P* RECEIVER INTERRUPT o P* o P* o $ PIH2201 CF A15,SAVE8 SAVE A1 - A8 o
0x26f8e8…26fa7c Dummy {f00=0x00c5, f01=0x0190, f02=» LOGG=0 o ( P CF A5,LOGIN LOG RECEIVED CHARACTER p P XIF p < P XRR A7,A2 CALCULATE BCC p H PIHIN10 RTN A5 p h PIHIN20 CF A5,SST PERFORM SST p ~ P ABL BRM p P* p P* p P* TRANSMITTER INTERRUPT p P* p P* p $ PIH2202 CF A1
0x26fa7c…26fc10 Dummy {f00=0x00c5, f01=0x0190, f02=»RUCTION AND STATUS CHECK p P* q ( P* CHLC STATUS : BIT 10=CARRIER OFF q * , P* BIT 14=THROUGHPUT ERROR q V , P* BIT 15=MODEM NOT READY q P* q PSST SST A1,CHLCIN q P LDR A2,A1 q P IFF LOGG=0 q & P CF A5,L
0x26fc10…26fda4 Dummy {f00=0x00c5, f01=0x0190, f02=»CONOF TAKE CARE OF POLL TIME OUT q P ST A1,DCSTCU r ( * P CF A15,CKMESS CHECK IF STATUS CHANGE r > P RTN A5 r l P* r | P* r P* HALT INPUT r P* r P* r PHALTIN CIO A1,0,CHLCIN r 4 P RB SST PERFORM SST INSTRUCTION AND STATUS CHECK r
0x26fda4…26ff38 Dummy {f00=0x00c5, f01=0x0190, f02=»0,CHLCUT SEND CHARACTER r P RF(A) WRIT10 s P RF READ THROUGPUT ERROR s 6 $ PWRIT10 XRR A7,A2 ACCUMULATE BCC s V P IFF LOGG=0 s ~ & P CF A5,LOGOUT LOG OUTPUT CHARACTER s P XIF s P* s PREAD CF A15,STREG s P ABL TDISP s P EJECT s
0x26ff38…2700cc Dummy {f00=0x00c5, f01=0x0190, f02=»/80 s PWRI100 SLL A1,1 t P RB(P) WRI100 t $ P RB(Z) WRITE WRITE t : P XRK A2,/80 t T P RB WRI100 t h P* t z P* t P* t P*** READP t P* t . P* READ CHARACTER TO A2 AND CHECK PARITY t P* t P* t PREADP CF A5,RE
0x2700cc…270260 Dummy {f00=0x00c5, f01=0x018e, f02=»LDR A1,A2 t P ANK A2,/7F u P ADK A5,4 u & P ANK A1,/80 u 8 P XRK A1,/80 u L P ABR* A5 u ` P* u p P* u z P EJECT u P* u < P* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2 u P* u $ P* CALLING SEQUENCE: CF A5,FINTER u
0x270260…2703f4 (1, 636) Dummy {f00=0x00c6, f01=0x0190, f02=» P* SEARCH IF GENERAL SID v P* v $ P LDR A1,A2 v . P SUK A1,SID v @ P RF(NZ) FINT05 SPECIFIC v T P LDKL A3,-1 INIT GENERAL SID v t P RTN A5 v P* v PFINT05 EQU * v & P LD A4,DCTAB GET ADDRESS TO DC:TAB v * P AD* A4,DCTAB ADDRESS TO
0x2703f4…270588 Dummy {f00=0x00c6, f01=0x0190, f02=»L NOT FOUND v x P LDR* A3,A4 LOAD DWT ADDRESS w , P CWR* A2,A3 COMPARE SUBTERMINAL ADDRESS w 8 & P RB(NE) FINT10 TAKE NEXT TERMINAL w h PFINT20 RTN A5 w P EJECT w P* w P* w P* POWER ON FUNCTIONS w P* w P* w $ PDC22ON CF A15,
0x270588…27071c Dummy {f00=0x00c6, f01=0x0190, f02=»OLL TIMER w t P DATA PTOUT,TIMPOL x , P ST A4,DCTPGP STORE TIMERIC RECEIVE MODE x , PDRDC20 ABL BRM x P EJECT x r P* x P* POLL TIME OUT x P* x ( PPTOUT LDKL A5,STB LOAD A5 STACK BASE x P LDK A2,/40 x ( P ST A2,DCONOF INDICATE POLL
0x27071c…2708b0 Dummy {f00=0x00c6, f01=0x0190, f02=»TART TIMER x P* y 4 P* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED y P* y T $ PCPTIM CM DCONOF INDICATE POLLING y ^ P LDKL A2,-TIMPOL y P ST* A2,DCTPGP RESTART TIMER y * P CF A15,CKMESS CHECK IF STATUS CHANGE y P RTN A5 y P EJECT y
0x2708b0…270a44 Dummy {f00=0x00c6, f01=0x0190, f02=»ESS y | P DATA /8000 STATUS z P DATA 0 ECB ADDRESS z & P DATA 0 ORDER z B * P DATA DC22DC POINTER TO AADRESS BLOCK z X P DATA 0 TTAB ADDRESS z $ P DATA 0 WAIT/ACTIVATE INDICATOR z P DATA 0 TASK QUEUE z P DATA 0 TIMER POINTER z ( P DATA
0x270a44…270bd8 Dummy {f00=0x00c6, f01=0x0190, f02=» z P* DC RECEIVE BUFFER POOL { P* { ( P* { 2 PRLINK EQU RBUFL+RBUFL+8 { < . PDCRBUF EQU * POINTER TO FIRST FREE BUFFER { P DATA *+2 { P IFT RBUFNR=14 { P DATA *+RLINK { P RES RBUFL+3 { P DATA *+RLINK { P RES RBUFL+3 {
0x270bd8…270d6c Dummy {f00=0x00c6, f01=0x0190, f02=»RLINK { P RES RBUFL+3 | P DATA *+RLINK | " P RES RBUFL+3 | 8 P DATA *+RLINK | L P RES RBUFL+3 | b P DATA *+RLINK | v P RES RBUFL+3 | P DATA *+RLINK | P RES RBUFL+3 | P DATA *+RLINK | P RES RBUFL+3 | P DATA *+RLINK |
0x270d6c…270f00 Dummy {f00=0x00c6, f01=0x0190, f02=» P DATA *+RLINK } P RES RBUFL+3 } P DATA *+RLINK } . P RES RBUFL+3 } D P DATA *+RLINK } X P RES RBUFL+3 } n P DATA *+RLINK } P RES RBUFL+3 } P DATA *+RLINK } P RES RBUFL+3 } P DATA *+RLINK } P RES RBUFL+3 } P DATA *+
0x270f00…271094 (1, 637) Dummy {f00=0x00c6, f01=0x0190, f02=»BUFNR=12 } P DATA *+RLINK ~ P RES RBUFL+3 ~ & P DATA *+RLINK ~ : P RES RBUFL+3 ~ P P DATA *+RLINK ~ d P RES RBUFL+3 ~ z P DATA *+RLINK ~ P RES RBUFL+3 ~ P DATA *+RLINK ~ P RES RBUFL+3 ~ P DATA *+RLINK ~ P RES RBUFL+3 ~
0x271094…271228 Dummy {f00=0x00c6, f01=0x018e, f02=»*+RLINK ~ P RES RBUFL+3 P XIF $ P IFT RBUFNR=11 0 P DATA *+RLINK F P RES RBUFL+3 P DATA *+RLINK p P RES RBUFL+3 P DATA *+RLINK P RES RBUFL+3 P DATA *+RLINK P RES RBUFL+3 P DATA *+RLINK P RES
0x271228…2713bc Dummy {f00=0x00c6, f01=0x0190, f02=» P DATA *+RLINK P RES RBUFL+3 P XIF 2 P IFT RBUFNR=10 > P DATA *+RLINK T P RES RBUFL+3 j P DATA *+RLINK ~ P RES RBUFL+3 P DATA *+RLINK P RES RBUFL+3 P DATA *+RLINK P RES RBUFL+3 P DATA *+RLIN
0x2713bc…271550 Dummy {f00=0x00c6, f01=0x0190, f02=» RES RBUFL+3 P XIF P IFT RBUFNR=9 P DATA *+RLINK 6 P RES RBUFL+3 L P DATA *+RLINK ` P RES RBUFL+3 v P DATA *+RLINK P RES RBUFL+3 P DATA *+RLINK P RES RBUFL+3 P DATA *+RLINK P RES RBUFL+3 P
0x271550…2716e4 Dummy {f00=0x00c6, f01=0x0190, f02=» P RES RBUFL+3 P DATA *+RLINK P RES RBUFL+3 . P DATA *+RLINK B P RES RBUFL+3 X P DATA *+RLINK l P RES RBUFL+3 P DATA *+RLINK P RES RBUFL+3 P DATA *+RLINK P RES RBUFL+3 P XIF P IFT RBUFNR=7
0x2716e4…271878 Dummy {f00=0x00c6, f01=0x0190, f02=»*+RLINK P RES RBUFL+3 P DATA *+RLINK $ P RES RBUFL+3 : P XIF N P IFT RBUFNR=6 Z P DATA *+RLINK p P RES RBUFL+3 P DATA *+RLINK P RES RBUFL+3 P DATA *+RLINK P RES RBUFL+3 P DATA *+RLINK P RES
0x271878…271a0c Dummy {f00=0x00c6, f01=0x018e, f02=»ATA *+RLINK P RES RBUFL+3 P XIF ( P IFT RBUFNR=4 4 P DATA *+RLINK J P RES RBUFL+3 ` P DATA *+RLINK t P RES RBUFL+3 P XIF P IFT RBUFNR=3 P DATA *+RLINK P RES RBUFL+3 P XIF P DATA *+RLINK
0x271a0c…271ba0 Dummy {f00=0x00c6, f01=0x018e, f02=» P* PDCTBUF EQU * P* " P* , P IFF TBUFL=0 6 , P DATA BUFT1 POINTER TO FIRST FREE BUFFER J PBUFT1 DATA BUFT2 z P RES TBUFL BUFFER AREA 3 PBUFT2 DATA 0 END OF CHAIN P RES TBUFL BUFFER AREA 4 P XIF P*
0x271ba0…271d34 (1, 638) Dummy {f00=0x00c6, f01=0x0190, f02=» P ORKL A2,/F000 P RF LOG10 PLOGOUT ST A2,SAVE2 , P ORKL A2,/0F00 F P RF LOG10 PLOGIN CWK A2,/FF n P RF(E) LOGE10 P ST A2,SAVE2 PLOG10 ST A3,SAVE3 P LD A3,LOGPNT P STR A2,A3 P ADK A3,2 P CWK
0x271d34…271ec8 Dummy {f00=0x00c6, f01=0x0190, f02=»10 RTN A5 P EJECT P* P* * PLOGPNT DATA LOGSTA 4 PLOGSTA EQU * N P RES 2200 b PLOGEND EQU *-4 t PSAVE2 DATA 0 PSAVE3 DATA 0 P XIF P* P* P* P EJECT P* P**** DC-TAB AREA
0x271ec8…27205c Dummy {f00=0x00c6, f01=0x406e, f02=»LENGTH p * P DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 PDC:END EQU * END OF TABLE < P END ^@ j b PLOGEND EQU *-4 t PSAVE2 DATA 0 PSAVE3 DATA 0 P XIF P* P* P* P EJECT P* P**** DC-TAB AREA
0x27205c…2721f0 Dummy {f00=0x00c6, f01=0x2008, f02=» ENTRY POINT { * PDC:TAB DATA 2 DC TAB'S VARIABLE LENGTH | * P DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 | J PDC:END EQU * END OF TABLE | x P END | @ | PLOGEND EQU *-4 { PSAVE2 DATA 0 { PSAVE3 DATA 0 { P XIF { P* { P* {
0x2721f0…272384 Dummy {f00=0x00c6, f01=0x0190, f02=» IF 1 COMPARE WITH RIGTH BYTE P* & P* 0 PFINTEP EQU * : P IFT MSV1=0 N PFINTER EQU * b P XIF v P IM RBYTE P IFT MSV1=1 PFINTER EQU * P XIF & P LD A4,DCTAB GET ADDRESS TO DC:TAB * P AD* A4,DCTAB ADDRESS
0x272384…272518 Dummy {f00=0x00c6, f01=0x0190, f02=»NAL NOT FOUND z P LDR* A3,A4 LOAD DWT ADDRESS P IFT MSV1=1 : $ P AD A3,RBYTE CHOOSE ADDRESS TYPE N * P CCR A2,A3 COMPARE SUBTERMINAL ADDRESS v P XIF P IFT MSV1=0 . P CC A2,1,A3 COMPARE TO SUBTERMINAL ADDRESS P XIF & P RB(NE
0x272518…2726ac Dummy {f00=0x00c6, f01=0x0190, f02=»WER ON FUNCTIONS P* P* " $ PDC15ON CF A15,SAVE8 SAVE A1 - A8 , P IFT STAT=1 T P LDK A5,4 SET DEVICE END h P LD A1,DCTAB . P AD* A1,DCTAB GET ADDRESS TO END OF TABLE PDRDC05 SUK A1,2 P CW A1,DCTAB P RF(E) DRDC06
0x2726ac…272840 Dummy {f00=0x00c6, f01=0x0190, f02=»US QUEUE t P RB DRDC05 PDRDC06 EQU * " P XIF 6 ( P LD A2,DCTPGP GET POLL TIMER POINTER B " P RF(NZ) DRDC20 ALREADY STARTED n * PDRDC10 CF A15,SPOTIM START POLL TIMER PDRDC20 ABL BRM P EJECT P* P* POLL TIME OUT P
0x272840…2729d4 (1, 639) Opaque[0x194]
0x2729d4…272b68 # DirEnt {nam=»DW2201«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x18d8, f03=0x2020}
0x2729d4…272b68 IdxSect {
0x2729d4…272b68 f00 = 0x00c6 // 0x2729d4 @0x0
0x2729d4…272b68 f01 = 0x0002 // 0x2729d6 @0x2
0x2729d4…272b68 gno = [ // 0x2729d8 @0x4
0x2729d4…272b68 [0x00]: C0x00c6.0x3.0
0x2729d4…272b68 ]
0x2729d4…272b68 }
0x272b68…272cfc Dummy {f00=0x00c6, f01=0x0190, f02=» 2 P IDENT DW2201 REL 8.2 78-09-15 870105040820 P* : : P* DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 D P* P ENTRY DW2201 TABLE ENTRY * P EXTRN DC22AD POINTER TO ADDRESS-BLOCK P* PDW2201 EQU * TABLE ENTRY P D
0x272cfc…272e90 Dummy {f00=0x00c6, f01=0x0190, f02=» RIGHT BYTE=ORDER * P DATA DC22AD POINTER TO ADDRESS-BLOCK P DATA 0 TTAB-ADDRESS H $ P DATA 0 WAIT/ACTIVATE INDICATOR d P DATA 0 TERMINAL QUEUE P DATA 0 TIMER POINTER P DATA 0 WRITE QUEUE P DATA 0 BUFFER QUEUE ANCHOR " P
0x272e90…273024 Dummy {f00=0x00c6, f01=0x402a, f02=»0 DEVICE LIST (<8) | P END @ &NTER TO ADDRESS-BLOCK P DATA 0 TTAB-ADDRESS H $ P DATA 0 WAIT/ACTIVATE INDICATOR d P DATA 0 TERMINAL QUEUE P DATA 0 TIMER POINTER P DATA 0 WRITE QUEUE P DATA 0 BUFFER QUEUE ANCHOR " P
0x273024…2731b8 Dummy {f00=0x00c6, f01=0x2008, f02=» R ( P DATA DCAD POINTER TO ADDRESS-BLOCK P DATA 0 TTAB-ADDRESS > $ P DATA 0 WAIT/ACTIVATE INDICATOR Z P DATA 0 TERMINAL QUEUE P DATA 0 TIMER POINTER P DATA 0 WRITE QUEUE P DATA 0 STATUS QUEUE P DATA 0,0 SAVE ARE
0x2731b8…27334c Dummy {f00=0x00c6, f01=0x0190, f02=»C I/O K x P LDR A1,A1 L P RF(NZ) DMTERR L P LDKL A1,/C0FF L 6 $ P ANS A1,FDBDBR,A6 RELEASE BUFFER L L PDMT400 EQU * L t " P LDR A1,A6 FDB ADDR DATA FILE L P LD A2,ECBCW+2,A9 L P ANK A2,/FF L P LD A3,ECBCW,A9 LOG REC NR L P LC A11,EC
0x27334c…2734e0 Dummy {f00=0x00c6, f01=0x0190, f02=»WRITE L ~ P LDK A4,QRD M P CWR A7,A4 M " P RF(E) DMT420 RAND DEL M 4 P LDK A4,QRDD M R P CWR A7,A4 M f ( P RF(E) DMT420 DELAYED RANDEOM DELETE M x P IFT INDXAC=1 M P LDK A4,QDEL M P CWR A7,A4 M P RF(E) DMT420 INDEXED DELETE M P XIF
0x2734e0…273674 (1, 640) Opaque[0x194]
0x273674…273808 # DirEnt {nam=»LARSEK«, typ=»UF«, f00=0x2020, f01=0x2020, f02=0x18e0, f03=0x2020}
0x273674…273808 IdxSect {
0x273674…273808 f00 = 0x00c7 // 0x273674 @0x0
0x273674…273808 f01 = 0x0002 // 0x273676 @0x2
0x273674…273808 gno = [ // 0x273678 @0x4
0x273674…273808 [0x00]: C0x00c7.0x0.0
0x273674…273808 ]
0x273674…273808 }
0x273808…27399c Dummy {f00=0x00c7, f01=0x0190, f02=» LED DMSUBR !!RE 0,$$04-21$$08-21$$ !!DL 1 6 & !* BUF HANDL + RC L. 496,543,551 D * REL 8.1 78-04-21 n !!IL 52 EXTRN QIRN,QIRR !!IL 481 EJECT !!DL 496,497 LD A2,DWTOR,A6 ORDER ANK A
0x27399c…273b30 Dummy {f00=0x00c7, f01=0x0190, f02=» LD A1,FDBADF,A6 FDB DATA FILE DMTIZ1 EQU * & LD A9,DWTECB,A1 USER ECB : !!DL 535 LDR A4,A2 SAVE l !!IL 542 ST A4,ECBCW,A8 SECTOR NR !!EN KPF /S SCR /O BEA DMSUBR LED DMSUBX !!RE 0
0x273b30…273cc4 Dummy {f00=0x00c7, f01=0x0190, f02=»40 LDR A10,A3 BUFFER ADDR !!DL 248 * !!DL 317,319 : !!IL 320 N " CF A14,DMTRBU RELEASE BUFFER ^ !!RE 322,$$060$$040$$ !!RE 453,$$LD$$LC$$ !!EN KPF /S SCR /O BEA DMSUBX LED TIODM
0x273cc4…273e58 Dummy {f00=0x00c7, f01=0x0026, f02=» BEA TIODM ASG /E0,TY10 !!DL 248 * !!DL 317,319 : !!IL 320 N " CF A14,DMTRBU RELEASE BUFFER ^ !!RE 322,$$060$$040$$ !!RE 453,$$LD$$LC$$ !!EN KPF /S SCR /O BEA DMSUBX LED TIODM
0x273e58…273fec Dummy {f00=0x00c7, f01=0x2008, f02=» TIODM ASG /E0,TY10 !!DL 248 * !!DL 317,319 : !!IL 320 N " CF A14,DMTRBU RELEASE BUFFER ^ !!RE 322,$$060$$040$$ !!RE 453,$$LD$$LC$$ !!EN KPF /S SCR /O BEA DMSUBX LED TIODM
0x273fec…274180 Dummy {f00=0x00c7, f01=0x0190, f02=» P EJECT P* P***************** P* EXTERNALS * 6 P***************** P P* j P EXTRN QTJOB t P EXTRN FNDTID,TTB:TD P* P EXTRN DWTST P EXTRN DWTADR P* P EXTRN ECBFC P EXTRN ECBBA
0x274180…274314 (1, 641) Opaque[0x194]
0x274314…2744a8 # DirEnt {nam=»JOSKB «, typ=»UF«, f00=0x2020, f01=0x2020, f02=0x18e8, f03=0x2020}
0x274314…2744a8 IdxSect {
0x274314…2744a8 f00 = 0x00c7 // 0x274314 @0x0
0x274314…2744a8 f01 = 0x0002 // 0x274316 @0x2
0x274314…2744a8 gno = [ // 0x274318 @0x4
0x274314…2744a8 [0x00]: C0x00c7.0x1.0
0x274314…2744a8 ]
0x274314…2744a8 }
0x2744a8…27463c Dummy {f00=0x00c7, f01=0x0190, f02=» LED DRKB03 " P!!RE 0,$$78-04-21$$78-08-24$$ !!IL 1 < & " ADAPTED TO KEYBOARD PTS 6271/72 J REL 8.1 78-04-21 t !!IL 89 $ * -----NUMERIC SHIFT-FUNCTION !!RE 138,$$10$$X:F$$ !!IL 208 8 P* BY SETTING X:H
0x27463c…2747d0 Dummy {f00=0x00c7, f01=0x0190, f02=» IFT NSHIFT=0 & ! CWK A4,1 INDICATE SKIP CHARACTER RF(E) EXIT YESD @ XIF X !!IL 703 d P IFT NSHIFT=0 t SUK A4,/7C CODE > /7B RF(NN) KON500 YES LDR A4,A2 RESTORE CHARACTER XIF !!RE 710,$$10$$10 FUNC
0x2747d0…274964 Dummy {f00=0x00c7, f01=0x0190, f02=»RL A5,3 " !!RE 717,$$140$$140 SHIFT ON$$ $ !!RE 719,$$160$$160 SHIFT OFF$$ 6 !!DL 720 ^ RF(Z) KON170 CONTROL ON n IFT NSHIFT=1 SUK A4,2 RF(N) KON125 CONTROL OFF $ RF(E) KON140 NUMERICAL SHIFT ON " RF KON1
0x274964…274af8 Dummy {f00=0x00c7, f01=0x0102, f02=»EY CODE /7C RF(Z) KON600 YES & ! LDK A4,1 INDICATE SKIP CHARACTER . P RTN A15 X RB KON300 RETURN h PKON600 EQU * SUR A2,A2 RB KONVER DO START AGAIN !!EN PASM /S KPF /O ASG /E0,TY10 F KON1
0x274af8…274c8c Dummy {f00=0x00c7, f01=0x2008, f02=» /7C RF(Z) KON600 YES & ! LDK A4,1 INDICATE SKIP CHARACTER . P RTN A15 X RB KON300 RETURN h PKON600 EQU * SUR A2,A2 RB KONVER DO START AGAIN !!EN PASM /S KPF /O ASG /E0,TY10 F KON1
0x274c8c…274e20 Dummy {f00=0x00c7, f01=0x0190, f02=» z P* < P* DISPLAY TYPE MUST BE DEFINED IN FIRST WORD IN DWT. P* R * P* --------------------------------- P* BIT: 10 11 P* -------------- " P* 0 0 PTS 6344 * P* 0 1 PTS 6351 & 634
0x274e20…274fb4 (1, 642) Opaque[0x194]
0x274fb4…275148 # DirEnt {nam=»JOSKB1«, typ=»UF«, f00=0x2020, f01=0x2020, f02=0x18f0, f03=0x2020}
0x274fb4…275148 IdxSect {
0x274fb4…275148 f00 = 0x00c7 // 0x274fb4 @0x0
0x274fb4…275148 f01 = 0x0004 // 0x274fb6 @0x2
0x274fb4…275148 gno = [ // 0x274fb8 @0x4
0x274fb4…275148 [0x00]: C0x00c7.0x2.0
0x274fb4…275148 [0x01]: C0x00c7.0x3.0
0x274fb4…275148 ]
0x274fb4…275148 }
0x275148…2752dc Dummy {f00=0x00c7, f01=0x018e, f02=» LED DRKB03 " P!!RE 0,$$78-04-21$$78-09-07$$ !!IL 1 < & " ADAPTED TO KEYBOARD PTS 6271/72 J REL 8.1 78-04-21 t !!IL 89 $ * -----NUMERIC SHIFT-FUNCTION , P* -----KEYBOARD LOCK IF NO KEYLOCK ON !!RE 138,$$10$$X
0x2752dc…275470 Dummy {f00=0x00c7, f01=0x0190, f02=» P* B P* BY SETTING X:I = 1 KEYBOARD IS LOCKED IF NO KEYLOCK ON. PX:I EQU 0 T PKBLOCK EQU X:I f PNSHIFT EQU X:H | P!!IL 463 P SUK A4,/5F CHARACTER > /7F P RF(P) AKB364 YES P!!DL 466 P ADK A4,/4F P!!IL
0x275470…275604 Dummy {f00=0x00c7, f01=0x0190, f02=» XIF P!!IL 593 P IFT KBLOCK=1 P!!IL 596 2 P XIF B 8 P!!RE 597,$$IHKB10$$IHKB10 NO READ REQUEST PENDING$$ N !!IL 703 P IFT NSHIFT=0 SUK A4,/7C CODE > /7B RF(NN) KON500 YES LDR A4,A2 RESTORE CHARACTER
0x275604…275798 Dummy {f00=0x00c7, f01=0x018e, f02=»05 EQU * ANK A5,/10 SRL A5,3 $ " !!RE 717,$$140$$140 SHIFT ON$$ 6 $ !!RE 719,$$160$$160 SHIFT OFF$$ !!DL 720 RF(Z) KON170 CONTROL ON IFT NSHIFT=1 SUK A4,2 RF(N) KON125 CONTROL OFF $ RF(E) KON
0x275798…27592c Dummy {f00=0x00c7, f01=0x0146, f02=» P IFT NSHIFT=0 KON500 EQU * LDR A4,A4 KEY CODE /7C 2 RF(Z) KON600 YES R & ! LDK A4,1 INDICATE SKIP CHARACTER l P RTN A15 PKON600 EQU * SUR A2,A2 RB KONVER DO START AGAIN P XIF P!!DL 764
0x27592c…275ac0 Dummy {f00=0x00c7, f01=0x2008, f02=» IFT NSHIFT=0 KON500 EQU * LDR A4,A4 KEY CODE /7C 2 RF(Z) KON600 YES R & ! LDK A4,1 INDICATE SKIP CHARACTER l P RTN A15 PKON600 EQU * SUR A2,A2 RB KONVER DO START AGAIN P XIF P!!DL 764
0x275ac0…275c54 (1, 643) Dummy {f00=0x00c7, f01=0x018e, f02=» ~ P*************** P* PFD:010 CF A5,BIO * P ORK A2,1 B PFD:015 EQU * T P IFT DAMA+IBM=2 h P LD A1,DWTLAB,A6 P AN A1,DWTA3,A6 P RF(Z) FD:018 NOT IBM P XIF P IFT IBM=1 , P LDR A7,A3 NO OF CHAR. TO BE
0x275c54…275de8 Dummy {f00=0x00c7, f01=0x0190, f02=» x P* P****************** P* * , P* PHYSICAL WRITE * F P* * ` P****************** z P* PFD:020 CF A5,BIO $ P ORK A2,5 INSERT BIO BITS 13-15 P RB FD:015 P EJECT P* P
0x275de8…275f7c Dummy {f00=0x00c7, f01=0x0190, f02=»****** P* PFD:030 CF A5,BIO P ORK A2,6 0 P RB FD:015 B P* T P***************** ^ P* * x P* PHYSICAL READ * P* * P***************** P* PFD:040 CF A5,BIO:RE P I
0x275f7c…276110 Dummy {f00=0x00c7, f01=0x0190, f02=»L A4,BUF PFD:042 EQU * P XIF $ $ PFD:045 CF A5,FD:REA PERFORM READ 0 P IFT DAMA+IBM=2 X P LD A1,DWTLAB,A6 p P AN A1,DWTA3,A6 P RF(Z) FD:047 NOT IBM P XIF P IFT IBM=1 P LD A7,4,A8 REQ LEN $ P LD A4,2,A8 ASCI
0x276110…2762a4 Dummy {f00=0x00c7, f01=0x0190, f02=»A+IBM=0 P* P************** P* * 0 P* SEARCH KEY * F P* * P************** r P* PFD:050 EQU * " P LD A4,10,A8 KEY AREA ADDRESS P LDR* A2,A4 KEY AREA LENGTH P LDR A1,A2 " P ABL(N
0x2762a4…276438 Dummy {f00=0x00c7, f01=0x0190, f02=»TO EVEN NO OF BYTES ~ P* P ADK A3,1 & P SRL A3,1 8 P SLL A3,1 J P* P SLL A2,3 f P ORK A2,7 BIO x P ADK A3,4 P ADK A4,2 KEY ADDRESS P CF A5,FD:WRI SEARCH KEY P LDR A3,A3 RETURN CODE P RB(NZ) FD:0
0x276438…2765cc Dummy {f00=0x00c7, f01=0x0190, f02=»D LENGTH | P CWK A3,130 " P ABL(NE) END:10 ILLEGAL LENGTH $ P LD A4,2,A8 BUFFER ADDRESS J P RB FD:045 l P XIF ~ P* P*************** P* * P* TEST STATUS * P* * P***************
0x2765cc…276760 Dummy {f00=0x00c7, f01=0x0190, f02=» P IFF DAMA+IBM=0 * P CF A5,VOLADR GET VOL NAME ADDR IN A2 & P ST A2,10,A8 STORE IN CONTROL WORD N P XIF x P IFT IBM=1 $ P LD A3,DWTLAB,A6 LABEL INDICATOR P AN A3,DWTA3,A6 P RF(Z) FD:080 TOSS LABEL P ORK A1,/20 SET BI
0x276760…277400 (2, 0) DirGranule ((2, 0)) {
0x276760…277400 DirEnt {nam=»SCREEN«, typ=» «, f00=0x0000, f01=0x0000, f02=0x1900, f03=0x0000}
0x276760…277400 DirEnt {nam=»SCREEN«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1908, f03=0x4441}
0x276760…277400 DirEnt {nam=»STRINP«, typ=»SC«, f00=0x3039, f01=0x3131, f02=0x1928, f03=0x2020}
0x276760…277400 DirEnt {nam=»STROUT«, typ=»SC«, f00=0x434b, f01=0x204e, f02=0x1938, f03=0x203d}
0x276760…277400 }
0x277400…277594 (2, 1) Opaque[0x194]
0x277594…277728 # DirEnt {nam=»SCREEN«, typ=»SC«, f00=0x2020, f01=0x2020, f02=0x1908, f03=0x4441}
0x277594…277728 IdxSect {
0x277594…277728 f00 = 0x00c8 // 0x277594 @0x0
0x277594…277728 f01 = 0x0008 // 0x277596 @0x2
0x277594…277728 gno = [ // 0x277598 @0x4
0x277594…277728 [0x00]: C0x00c8.0x1.0
0x277594…277728 [0x01]: C0x00c8.0x2.0
0x277594…277728 [0x02]: C0x00c8.0x3.0
0x277594…277728 [0x03]: C0x00c9.0x0.0
0x277594…277728 ]
0x277594…277728 }
0x277728…2778bc Dummy {f00=0x00c8, f01=0x0190, f02=» . P IDENT SCREEN 78-09-15 8701 380 40320 P* 6 , P* A STANDARD PROGRAM PACKAGE HANDLING @ 0 P* A COMPLETE PICTURE ON A DISPLAY SCREEN p P* ( P* RUNNING UNDER: CREDIT REL 3.1 ( P* TOSS REL 8.1 P*
0x2778bc…277a50 Dummy {f00=0x00c8, f01=0x0190, f02=»ELDS l * P ENTRY SPCLRN CLEAR NO VARIABLE FIELDS ( P ENTRY SPERR DISPLAY ERROR PRINTOUT : P AND CONTINUE HANDLING f P* , P EXT SPCHK1 STANDARD CHECK ROUTINE NO. 1 , P EXT SPCHK2 STANDARD CHECK ROUTINE NO. 2 , P EXT SPCHK3 STANDARD CHE
0x277a50…277be4 Dummy {f00=0x00c8, f01=0x0190, f02=»DARD CHECK ROUTINE NO. 6 , P EXT SPCHK7 STANDARD CHECK ROUTINE NO. 7 & P EXT SPAPPL USER ROUTINE TO HANDLE P P APPL VALUES z ( P EXT SPTCHK USER ROUTINE TO EVALUATE P CONDITIONAL TABULATION P* . P EXT EMPTYT ASSEMBLY SUBROUTINE
0x277be4…277d78 Dummy {f00=0x00c8, f01=0x0190, f02=»IABLE FIELD BEFORE HANDLING THE PICTURE ~ P* 0 PSPCLRA PROC : P PERF SCREEN,=W'1' N P RET h P PEND t P* @ P* CLEAR SOME VARIABLE FIELDS BEFORE HANDLING THE PICTURE P* PSPCLRS PROC P PERF SCREEN,=W'2' P
0x277d78…277f0c Dummy {f00=0x00c8, f01=0x0190, f02=»F SCREEN,=W'3' P RET P PEND " P* 0 4 P* HANDLE ERRORS DETECTED OUTSIDE THE PACKAGE : P* r PSPERR PROC | P PERF SCREEN,=W'0' P RET P PEND P* P EJECT PSCREEN PROC $OPT P PLIT $OPT OPTIO SELEC
0x277f0c…2780a0 Dummy {f00=0x00c8, f01=0x0190, f02=» n P BE ERRPRINT YES ! P " ( P MOVE SPBINW1,='1' SET INITIAL VALUE * . P TBT SPPROMPT,ENTIRE JUMP IF ENTIRE FORMAT V P SHOULD BE DISPLAYED P* P* ONLY VARIABLE FIELDS P* 8 P IB SPBINW2,CLEARA,CLEARS,CONT JUMP ON ROUTI
0x2780a0…278234 (2, 2) Dummy {f00=0x00c8, f01=0x0190, f02=»RASE 5,SPBINW1,='0' ERASE SOME FROM 1 AND UP P B CONT 4 P EJECT D P* R P* DISPLAY ENTIRE FORMAT P* ~ PENTIRE 8 P IB SPBINW2,ECLRA,ECLRS,ECLRN JUMP ON ROUTINE INDEX P* P* CLEAR ALL VARIABLES P* PEC
0x278234…2783c8 Dummy {f00=0x00c8, f01=0x0190, f02=»E VARIABLES P* PECLRS 0 P ERASE 6,SPBINW1,='0' CLEAR SOME FIELDS FROM , P 1 AND UP IN MEMORY ` P* ~ & P* CLEAR NO VARIABLES IN MEMORY P* PECLRN 0 P DISPLAY 0,SPBINW1,='0' DISPLAY ENTIRE FORM P EJECT
0x2783c8…27855c Dummy {f00=0x00c8, f01=0x018e, f02=»SPBINW4,SPBINW3 SEARCH CURRENT POSITION P BZ SETCREAD JUMP IF FOUND 0 " P BL KTHOME POSITION NOT FOUND R P* x P* COMPULSORY FIELD FOUND P* & P MOVE SPBINW4,SPBINW3 CHANGE INDEX P B CONT5 SEARCH AGAIN P* P EJECT
0x27855c…2786f0 Dummy {f00=0x00c8, f01=0x0190, f02=» P* * P* READ TO CURRENT FIELD ON DISPLAY P* < PREADIN F . P DYKI SPINPUT,SPKTAB1,SPKTAB2,SPBINW1, C T P SPBINW2,SPBINW4 P BL ERRPRT ERROR 2 P CBNG SPBINW2,='0',RETUR JUMP IF POWER OFF OR P KEY SWITCHES PDY
0x2786f0…278884 Dummy {f00=0x00c8, f01=0x0190, f02=» UPDATE,UPDATE,UPDATE,UPDATE END-OF-ITEM-KEY C P UPDATE,KDUPL,KEDIT 8 P EJECT T P* b 4 P* HANDLE THE RESPECTIVE KEY AS EOI-KEY FIRST l P* PUPDATE 0 P CBE SPBINW1,='0',UPD350 JUMP IF LENGTH = 0 & P GETCTL 3,SPBINW4 GET SC
0x278884…278a18 Dummy {f00=0x00c8, f01=0x018e, f02=»HK5,SPCHK6,SPCHK7 & P IB SPBINW3,UPD100,UPD070,ERRPRINT P* D P* CONDITIONAL DISPLAYING N P* r PUPD050 | , P MOVE SPBINW4,='1' INDICATE COND. DISPL P B UPD200 PUPD070 $ P GETCTL 0,SPBINW3 GET APPL-VALUE 0 P CBNE
0x278a18…278bac Dummy {f00=0x00c8, f01=0x0190, f02=» 6 P MOVE SPBINW4,='2' INDICATE UNCONDITIONAL DISPLAY PUPD200 > $ P GETCTL 0,SPBINW3 GET APPL-VALUE L 2 P CBE SPBINW3,='0',UPD400 JUMP IF NO APPL VALUE t P* ( P* APPL-VALUE DIFFERENT FROM ZERO P* PUPD210 P PERF SPAPPL
0x278bac…278d40 Dummy {f00=0x00c8, f01=0x0190, f02=»ING v P* PUPD260 2 P UPDFLD 1,SPINPUT UPDATE FIELD WITH DISPLAYING $ . PUPD300 SET SPCHANGE INDICATE CHANGED ITEM Z PUPD350 $ P* JUMP ON FUNCTION KEY INDEX P IB SPBINW2,READIN,DUMMY, C P KEOI,DUMMY,DUMMY,KTFWD, C .
0x278d40…278ed4 (2, 3) Dummy {f00=0x00c8, f01=0x0190, f02=»EX j PDUMMY PRETUR P RET & P* 2 PUPD400 < 8 P CBE SPBINW4,='2',UPD260 JUMP IF UNCONDITIONAL DISPL J 0 P UPDFLD 0,SPINPUT UPDATE FIELD DISPL. COND. P B UPD300 P* P EJECT " PKEOI COMMON END-OF-ITEM KEY
0x278ed4…279068 Dummy {f00=0x00c8, f01=0x0190, f02=» TSTTAB P* " PKTHOME TAB. TO HOME POSITION P THOME @ P B TSTTAB N P* ` ( PKTLDOWN TAB. TO FIRST ON NEXT LINE j P TLDOWN P B TSTTAB P* PKTLEFT TAB. TO LEFTMOST P TLEFT P B TSTTAB P*
0x279068…2791fc Dummy {f00=0x00c8, f01=0x0190, f02=»B P* PKTUP TAB 1 UP P TUP , P 8 PTSTTAB TEST TAB OUTPUT @ P BE READIN OK ` P BL SETCREAD NOT FOUND v * P BOFL SETCREAD EMPTY COMPULSORY FIELD P* P* P* CONDITIONAL TABULATION P* P PER
0x2791fc…279390 Dummy {f00=0x00c8, f01=0x0190, f02=»D,KTFWD,KTFWD, C P KTBWD,KTFWD,KTBWD < P* BRANCH LIST EXHAUSTED - SPBINW2 CLOBBERED BY SPTCHK 6 P v P B SETCREAD ~ P P P EJECT PKCOPY HARD COPY P MOVE SPBINW3,='1' P PRINT SPDSPRT,SPBINW3,='0' $ P
0x279390…279524 Dummy {f00=0x00c8, f01=0x018e, f02=»INPUT DUPLICATION P BZ UPD260 DUPL ALLOWED 0 P MOVE SPBINW4,='4' INDICATE ILLEGAL EOI-KEY : P B ERRPRINT DUPL NOT ALLOWED n P EJECT P* P* EDIT FIELD P* PKEDIT P GETCTL 1,SPBINW3 GET MAXL P CBNE SPBINW
0x279524…2796b8 Dummy {f00=0x00c8, f01=0x018e, f02=» l P SPBINW2,SPBINW4 P BL ERRPRT ERROR " 4 P CBNG SPBINW2,='0',RETUR POWER OFF OR KEY SWITCH : . P CBNE SPBINW1,='0',DYKOUT LENGTH NOT ZERO r ( P SET SPCHANGE ITEM CLEARED BY EDFLD " P B DYKOUT CONTINUE AS FOR DYKI P* P* ENT
0x2796b8…27984c Dummy {f00=0x00c8, f01=0x0190, f02=» 2 P MOVE SPBINW2,='0' SET INDEX TO SEARCHED FIELD < P GETFLD 0,SPBINW2,SPBINW3 SEARCH FOR EMPTY COMP. FIELDS : ( P BOFL KENT10 EMPTY COMP. FIELD FOUND z & P TSTCTL 2 LOOK IF COMPULSORY FIELD P BZ KENT05 NO! . P CALL EMPTYT,:FMTITEM LOOK IF EMPT
0x27984c…2799e0 Dummy {f00=0x00c8, f01=0x0190, f02=» EMPTY COMPULSORY FIELD FOUND P* & PKENT10 0 6 P GETFLD 0,SPBINW3,SPBINW2 GET THE COMPULSORY FIELD > P B ERRPRINT x P EJECT PERRPRT * P CBE SPBINW2,='16',KEDIT JUMP IF EDIT * P CBE SPBINW2,='4',CANC JUMP IF CANCEL1 * P CBE
0x2799e0…279b74 (2, 4) Dummy {f00=0x00c9, f01=0x0190, f02=»IF NO PRINTOUT r ( P EDWRT SPDSSCRN,BELL ACOUSTIC ALARM ( P MOVE SPBINW3,=X'1801' ROW 24 COL. 1 B 4 P DSC1 SPDSSCRN,6,SPBINW3 SET CURSOR ON LAST ROW n P* & P EDWRT SPDSSCRN,SPFTBERR(SPBINW4) P* P* READ AFTER ERROR P*
0x279b74…279d08 Dummy {f00=0x00c9, f01=0x0190, f02=»ED LENGTH t 6 P NKIA .NE,SPDSDYKB,SPINPUT,SPKTAB1,SPBINW3,SPBINW2 P BNZ ERR100 JUMP IF NOT OK L . P CBE SPBINW2,='0',RETUR JUMP IF POWER OFF n " P IB SPBINW2,ERR100,ERRCONT C $ P ERRCONT,ERR100,ERRCONT,ERRCONT P B ERR100 CONTINUE P
0x279d08…279e9c Dummy {f00=0x00c9, f01=0x0190, f02=»INW3 ERASE LAST LINE | & P SUB SPBINW2,='1' ADJUST KEY INDEX PCANC F 0 P CBE SPBINW1,='0',ERRC10 JUMP IF LENGTH = 0 R 0 P MOVE SPINPUT,:FMTITEM SAVE CURRENT CONTENTS 4 P MOVE :FMTITEM,=C'1' PUT SOMETHING IN THE FIELD & P GETABX SPBINW4 GET CU
0x279e9c…27a030 Dummy {f00=0x00c9, f01=0x0190, f02=»' ADJUST FOR CANCEL1,CANCEL2 P RET $ PCLEAR1 0 0 P CBE SPBINW1,='0',ERRC20 JUMP IF LENGTH = 0 > ( P SET SPCHANGE INDICATE CHANGED FIELD r PERRC20 P B SETCREAD CONTINUE P* PCLEAR2 . P CBE SPBINW1,='0',CLEA20 JUMP IF LENGTH
0x27a030…27a1c4 Dummy {f00=0x00c9, f01=0x40bc, f02=»,SPBINW4,SPBINW4 DISPLAY FIELD P B SETCREAD CONTINUE & P* B PBELL FRMT L P FSL ^ P FILLR X'07',1 j P FMEND P P PEND P P END @ INUE P* PCLEAR2 . P CBE SPBINW1,='0',CLEA20 JUMP IF LENGTH
0x27a1c4…27a358 Dummy {f00=0x00c9, f01=0x2008, f02=» ,SPBINW4 DISPLAY FIELD P B SETCREAD CONTINUE & P* B PBELL FRMT L P FSL ^ P FILLR X'07',1 j P FMEND P P PEND P P END @ INUE P* PCLEAR2 . P CBE SPBINW1,='0',CLEA20 JUMP IF LENGTH
0x27a358…27a4ec Dummy {f00=0x00c9, f01=0x0190, f02=»* DATASET CONTROL FUNCTION 0 * & P********************************** * P T . PT:DSC0 CF PS,GTWEDS GET WAIT-BIT AND DSET " P CF PS,GTBYTE GET CONTROL CODE * P CM DSCBIX,A8 CLEAR INDEX ITEM ADDRESS P RF DSCE L P EJECT T:IO T:IO
0x27a4ec…27a680 Dummy {f00=0x00c9, f01=0x018e, f02=» 1 * t & P********************************** P 8 . PT:DSC1 CF PS,GTWEDS GET WAIT-BIT AND DSET @ " P LCR OP1A,PP GET CONTROL CODE r P ADKL PP,1 P CF PS,I:EVA2 P LDK WK1,1 LITERAL TYPE? P TM OPCD,WK1 P RF(Z) DSC01 NO!
0x27a680…27a814 (2, 5) Opaque[0x194]
0x27a814…27a9a8 # DirEnt {nam=»STRINP«, typ=»SC«, f00=0x3039, f01=0x3131, f02=0x1928, f03=0x2020}
0x27a814…27a9a8 IdxSect {
0x27a814…27a9a8 f00 = 0x00c9 // 0x27a814 @0x0
0x27a814…27a9a8 f01 = 0x0004 // 0x27a816 @0x2
0x27a814…27a9a8 gno = [ // 0x27a818 @0x4
0x27a814…27a9a8 [0x00]: C0x00c9.0x1.0
0x27a814…27a9a8 [0x01]: C0x00c9.0x2.0
0x27a814…27a9a8 ]
0x27a814…27a9a8 }
0x27a9a8…27ab3c Dummy {f00=0x00c9, f01=0x018e, f02=» , P IDENT STRINP 78-09-15 8701 380 40320 H P******************************************************************** 4 P* & P* DISPLAY MANAGEMENT IN CREDIT P* " P* RUNNING UNDER CREDIT 3.1 P* TOSS 8.1 P
0x27ab3c…27acd0 Dummy {f00=0x00c9, f01=0x0190, f02=» P* D P* INPUT FROM A STRING TO THE VARIABLE FIELDS OF A COMPLETE OR " P* A PART OF A DISPLAY FORMAT V P* | P* PARAMETERS: L P* <TYPE> BINARY ITEM HOLDING FIELD TYPE 0=FKI 1=FINP 2=F . P* <INPUT STRING> T
0x27acd0…27ae64 Dummy {f00=0x00c9, f01=0x0190, f02=»OSITION COUNT 0 p L P* AT RETURN INPUT START POINTS WHERE MOVE WAS END L P* <UNIT SEPARATOR> STRING THAT HOLDS A CHARACTER WHICH SEPARATES E h 6 P* FIELD IN THE INPUT STRING L P* <INDEX1>
0x27ae64…27aff8 Dummy {f00=0x00c9, f01=0x0190, f02=»RN <INDEX1> HOLDS THE FIELD INDEX TO p 2 P* THE LAST MOVED FIELD , L P* <INDEX2> BINARY ITEM HOLDING THE LAST VARIABLE FIELD IND b * P* MUST NOT BE 0 H P* <RETURN CODE> BINARY ITEM HOL
0x27aff8…27b18c Dummy {f00=0x00c9, f01=0x0190, f02=»****************** Z P DDUM SPDDIV P PDIV . . P ENTRY STRINP INPUT FROM STRING TO FORMAT < P* n P EXT STRIN1 MOVE TO FORMAT x P* & P* DESCRIPTION OF ROUTINE STRIN1: @ P**********************************************************
0x27b18c…27b320 Dummy {f00=0x00c9, f01=0x0190, f02=»CALLED FROM CREDIT STANDARD MODULE 'S T R I N P' P* 8 . P* THE UNIT SEPARATOR IS FIRST SEARCHED. B @ P* SEARCH STARTS AT GIVEN STARTPOSITION WITHIN THE STRING. t < P* WHEN THE UNIT SEPARATOR IS FOUND THE SUBSTRING TO BE P* MOVED IS IDE
0x27b320…27b4b4 (2, 6) Dummy {f00=0x00c9, f01=0x0190, f02=» ITEM IS SHORTER THE REST WILL BE FILLED WITH X'00' P* D B P* CALL STRIN1,<INPUT STRING>,<INPUT START>,<UNIT SEPARATOR> N P* WHERE . P* <INPUT STRING> STRING TO HOLD INPUT @ P* <INPUT START> BINARY ITEM WITH START POS
0x27b4b4…27b648 Dummy {f00=0x00c9, f01=0x0190, f02=»TS WHERE MOVE ENDED ` D P* <UNIT SEPARATOR> STRING TO HOLD A CHARACTER THAT SEPARATES 6 P* THE FIELDS IN <INPUT STRING> d P* @ P************************************************************ P EJECT P* > PSTRI
0x27b648…27b7dc Dummy {f00=0x00c9, f01=0x0190, f02=»SIN200 , P GETFLD 0,INDEX1,RETCOD ONLY FKI FIELDS P B SIN300 > PSIN100 P , P GETFLD 1,INDEX1,RETCOD ONLY FINP FIELDS ^ P B SIN300 PSIN200 4 P GETFLD 2,INDEX1,RETCOD BOTH FKI AND FINP FIELDS PSIN300 P BZ SIN350 FIELD FOU
0x27b7dc…27b970 Dummy {f00=0x00c9, f01=0x018e, f02=»CODE 3 p P B SINRET P EJECT P* . @ P* PERFORM MOVE FROM INPUT STRING TO CURRENT VARIABLE FIELD 8 P* | PSIN350 $ P CALL STRIN1,INPSTR,INPSTA,INPUS P* , P BNZ SINERR UNSUCESSFUL MOVE FROM STRING 8 P CBNL INDEX1,INDEX
0x27b970…27bb04 Dummy {f00=0x00c9, f01=0x404c, f02=» | PSINRET RET P PEND P* ( P* 2 P END <@ HM INPUT STRING TO CURRENT VARIABLE FIELD 8 P* | PSIN350 $ P CALL STRIN1,INPSTR,INPSTA,INPUS P* , P BNZ SINERR UNSUCESSFUL MOVE FROM STRING 8 P CBNL INDEX1,INDEX
0x27bb04…27bc98 Dummy {f00=0x00c9, f01=0x2008, f02=» SINRET RET P PEND P* ( P* 2 P END <@ HM INPUT STRING TO CURRENT VARIABLE FIELD 8 P* | PSIN350 $ P CALL STRIN1,INPSTR,INPSTA,INPUS P* , P BNZ SINERR UNSUCESSFUL MOVE FROM STRING 8 P CBNL INDEX1,INDEX
0x27bc98…27be2c Dummy {f00=0x00c9, f01=0x2042, f02=»L ERRPRT ERROR 1 I T _,9 , ( T CBNG SPBINW2,='0',RETUR JUMP IF POWER OFF OR ( ! T _ !AAT A W l , ( KEY SWITCHES P , @ T A , ( M @ P , W DYKOUT , ( m
0x27be2c…27bfc0 Dummy {f00=0x00c9, f01=0x5c5c, f02=»UPDATE,CANC,CANC, C ( !,,P - , ( _ a UPDATE,UPDATE,UPDATE,UPDATE CONVERTED C W , ( - ( !,, UPDATE,UPDATE,UPDATE,UPDATE END-OF-ITEM-KEY C C.9b! X 9 :A H , ( UPDATE,KDUPL,KEDIT
0x27bfc0…27c154 (2, 7) Opaque[0x194]
0x27c154…27c2e8 # DirEnt {nam=»STROUT«, typ=»SC«, f00=0x434b, f01=0x204e, f02=0x1938, f03=0x203d}
0x27c154…27c2e8 IdxSect {
0x27c154…27c2e8 f00 = 0x00c9 // 0x27c154 @0x0
0x27c154…27c2e8 f01 = 0x0004 // 0x27c156 @0x2
0x27c154…27c2e8 gno = [ // 0x27c158 @0x4
0x27c154…27c2e8 [0x00]: C0x00c9.0x3.0
0x27c154…27c2e8 [0x01]: C0x00ca.0x0.0
0x27c154…27c2e8 ]
0x27c154…27c2e8 }
0x27c2e8…27c47c Dummy {f00=0x00c9, f01=0x0190, f02=» . P IDENT STROUT 87-09-15 8701 380 40320 H P******************************************************************** 6 P* & P* DISPLAY MANAGEMENT IN CREDIT P* " P* RUNNING UNDER CREDIT 3.1 P* TOSS 8.1
0x27c47c…27c610 Dummy {f00=0x00c9, f01=0x0190, f02=» P* D P* OUTPUT TO A STRING FROM THE VARIABLE FIELDS OF A COMPLETE OR " P* A PART OF A DISPLAY FORMAT V P* | P* PARAMETERS: L P* <TYPE> BINARY ITEM HOLDING FIELD TYPE 0=FKI 1=FINP 2=F . P* <OUTPUT STRING> T
0x27c610…27c7a4 Dummy {f00=0x00c9, f01=0x0190, f02=»OSITION COUNT 0 p L P* AT RETURN <OUTPUT START> POINTS WHERE MOVE WAS L P* <UNIT SEPARATOR> STRING THAT HOLDS A CHARACTER WHICH SEPARATES E h 8 P* FIELD IN THE OUTPUT STRING L P* <INDEX1>
0x27c7a4…27c938 Dummy {f00=0x00c9, f01=0x0190, f02=»TURN <INDEX1> HOLDS THE FIELD INDEX TO r 2 P* THE LAST MOVED FIELD . L P* <INDEX2> BINARY ITEM HOLDING THE LAST VARIABLE FIELD IND d * P* MUST NOT BE 0 H P* <RETURN CODE> BINARY ITEM H
0x27c938…27cacc Dummy {f00=0x00c9, f01=0x0190, f02=»************* P DDUM SPDDIV P PDIV * . P ENTRY STROUT OUTPUT FROM FORMAT TO STRING 8 P* j & P EXT STROU1 MOVE TO OUTPUT STRING t P* & P* DESCRIPTION OF ROUTINE STROU1* @ P******************************************************
0x27cacc…27cc60 Dummy {f00=0x00c9, f01=0x018e, f02=» 8 P* CALLED FORM CREDIT STANDARD MODULE 'S T R O U T' P* D F P* A CHECK THAT OUTPUT STRING IS LARGE ENOUGH IS PERFORMED FIRST. N H P* MOVE ROUTINE T:DUPX USED BY T:DUPL FUNCTION IS USED, NOT NEEDED 4 P* BYTES IN OUTPUT STRING ARE FILLE
0x27cc60…27cdf4 (2, 8) Dummy {f00=0x00ca, f01=0x0190, f02=» D P* CALL STROU1,<OUTPUT STRING>,<OUTPUT START>,<UNIT SEPARATOR> P* WHERE P 0 P* <OUTPUT STRING> STRING TO HOLD OUTPUT b B P* <OUTPUT START> BINARY ITEM WITH START POSITION WITHIN B P* <OUTPUT STRING> FIRST
0x27cdf4…27cf88 Dummy {f00=0x00ca, f01=0x0190, f02=» HOLD A CHARACTER THAT SEPARATES p 8 P* THE FIELDS IN <OUTPUT STRING> ( P* d @ P************************************************************ n P EJECT P* > PSTROUT PROC TYPE,OUTSTR,OUTSTA,OUTUS,INDEX1,INDEX2,RETCOD
0x27cf88…27d11c Dummy {f00=0x00ca, f01=0x0190, f02=» P B SOU300 PSOU100 , P GETFLD 1,INDEX1,RETCOD ONLY FINP FIELDS $ P B SOU300 T PSOU200 f 4 P GETFLD 2,INDEX1,RETCOD BOTH FKI AND FINP FIELDS t PSOU300 P BZ SOU350 FIELD FOUND & P BOFL SOU350 FIELD FOUND BUT EMPTY P COM
0x27d11c…27d2b0 Dummy {f00=0x00ca, f01=0x4158, f02=»PERFORM MOVE TO OUTPUT STRING FROM CURRENT VARIABLE FIELD P* B PSOU350 L $ P CALL STROU1,OUTSTR,OUTSTA,OUTUS Z P BNZ SOUERR MOVE NOT OK P CBNL INDEX1,INDEX2,SOU400 P ADD INDEX1,=W'1' P SWITCH P B SOU010 PSOU400
0x27d2b0…27d444 Dummy {f00=0x00ca, f01=0x2008, f02=» MOVE TO OUTPUT STRING FROM CURRENT VARIABLE FIELD P* B PSOU350 L $ P CALL STROU1,OUTSTR,OUTSTA,OUTUS Z P BNZ SOUERR MOVE NOT OK P CBNL INDEX1,INDEX2,SOU400 P ADD INDEX1,=W'1' P SWITCH P B SOU010 PSOU400
0x27d444…27d5d8 Dummy {f00=0x00ca, f01=0x8190, f02=» 9a : x TT:TID TT:MSG * , ( g @ P @ < TB:RDC l , ( A A "V # ( , ( D A P UW T A , ( P @ = W
0x27d5d8…27d76c Dummy {f00=0x00ca, f01=0x8190, f02=» p , ( U ? A 2 A 4 A 6 A 8 A B , ( UT _ A : A < A > A @ A H A D A F @ , ( ( P A D A F , + - p , ( ; : ( X " , , ( P A F A D_@ X ,T , (
0x27d76c…27d900 Dummy {f00=0x00ca, f01=0x8190, f02=» B ? A 8_ A B " @ DT " @ F , ( E( _ @ HP A < A : " @ < 0 , ( T @ W @ < A W ` , ( W 0 W _2 , ( B P @ <& _8 , (