|
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 L M N O P R S T X p ½
Length: 4191904 (0x3ff6a0)
Description: Bits:30009676 Philips computer tape "600210"
Types: SimhTapContainer, ½" Magnetic Tape
| name | artifact |
|---|---|
| M:92NA | «none» |
| M:92NA//OBJCT.OB | ⟦7a74c9346⟧ pts_type |
| M:92NA/A.UF | ⟦572344da0⟧ pts_type |
| M:92NA/ADDMOD.SC | ⟦6d6263adb⟧ pts_type |
| M:92NA/CTAB01.SC | ⟦a08e77d41⟧ pts_type |
| M:92NA/CTABX.SC | ⟦3769dd56c⟧ pts_type |
| M:92NA/DFTAB.SC | ⟦abe5da9c8⟧ pts_type |
| M:92NA/DIVMOD.SC | ⟦7b14bf61f⟧ pts_type |
| M:92NA/DMBUF.SC | ⟦0aa60395e⟧ pts_type |
| M:92NA/DMFDB.SC | ⟦d66029dfa⟧ pts_type |
| M:92NA/DMINIT.SC | ⟦edfbc020d⟧ pts_type |
| M:92NA/DMSUBR.SC | ⟦bb4ee61eb⟧ pts_type |
| M:92NA/DMSUBX.SC | ⟦211c916bf⟧ pts_type |
| M:92NA/DMTASK.SC | ⟦c52fc4326⟧ pts_type |
| M:92NA/DMTASS.SC | ⟦f3aaf19bf⟧ pts_type |
| M:92NA/DRDC15.SC | ⟦815891146⟧ pts_type |
| M:92NA/DRDI01.SC | ⟦a4e53906d⟧ pts_type |
| M:92NA/DRDY01.SC | ⟦0b6bf5928⟧ pts_type |
| M:92NA/DRFD01.SC | ⟦de23df58a⟧ pts_type |
| M:92NA/DRGP01.SC | ⟦2c9d4cb14⟧ pts_type |
| M:92NA/DRIC01.SC | ⟦36dd4bef2⟧ pts_type |
| M:92NA/DRKB03.SC | ⟦bde0a9f99⟧ pts_type |
| M:92NA/DRRT01.SC | ⟦b6849bf36⟧ pts_type |
| M:92NA/DRSOP1.SC | ⟦8e2f00fbe⟧ pts_type |
| M:92NA/DRTP02.SC | ⟦af5b6e693⟧ pts_type |
| M:92NA/DSUMOD.SC | ⟦3cbe7dc60⟧ pts_type |
| M:92NA/DVDI02.SC | ⟦a0c0bf9a7⟧ pts_type |
| M:92NA/DVDY00.SC | ⟦437887695⟧ pts_type |
| M:92NA/DVDY01.SC | ⟦32078cd6c⟧ pts_type |
| M:92NA/DVDY02.SC | ⟦391a644a7⟧ pts_type |
| M:92NA/DVGP03.SC | ⟦ce805ab9d⟧ pts_type |
| M:92NA/DVKB00.SC | ⟦6afc39c85⟧ pts_type |
| M:92NA/DVKB01.SC | ⟦ca54d88f9⟧ pts_type |
| M:92NA/DVKB02.SC | ⟦29e4b65c9⟧ pts_type |
| M:92NA/DVTDI.SC | ⟦1d2fc504c⟧ pts_type |
| M:92NA/DVTDY.SC | ⟦963eba64a⟧ pts_type |
| M:92NA/DVTGP.SC | ⟦93b53e66f⟧ pts_type |
| M:92NA/DVTKB.SC | ⟦67db6cb42⟧ pts_type |
| M:92NA/DVTP01.SC | ⟦39f0b5b05⟧ pts_type |
| M:92NA/DVTTP.SC | ⟦a7d1d2605⟧ pts_type |
| M:92NA/DW1501.SC | ⟦44aa092f7⟧ pts_type |
| M:92NA/DWII01.SC | ⟦7a8c09fcc⟧ pts_type |
| M:92NA/DWIO01.SC | ⟦386c74ced⟧ pts_type |
| M:92NA/EBCDIC.SC | ⟦afbdc8a39⟧ pts_type |
| M:92NA/GLDC15.SC | ⟦c2c1612d2⟧ pts_type |
| M:92NA/LDTASK.SC | ⟦509a88e8f⟧ pts_type |
| M:92NA/LKMAL.SC | ⟦25f335d67⟧ pts_type |
| M:92NA/LRPINT.SC | ⟦951bb7df7⟧ pts_type |
| M:92NA/M:92LP.LM | ⟦c672ba839⟧ pts_type |
| M:92NA/M:92N1.LM | ⟦7c75115fe⟧ pts_type |
| M:92NA/M:92N1.UF | ⟦24cd7efb7⟧ pts_type |
| M:92NA/M:92NA.LM | ⟦7733d0496⟧ pts_type |
| M:92NA/M:92NA.UF | ⟦997281c1d⟧ pts_type |
| M:92NA/M:92NE.LM | ⟦d8b6ea609⟧ pts_type |
| M:92NA/M:92NE.UF | ⟦c57effc26⟧ pts_type |
| M:92NA/MONTAB.SC | ⟦88847afeb⟧ pts_type |
| M:92NA/MONTIM.SC | ⟦e3bdb0a74⟧ pts_type |
| M:92NA/MPYMOD.SC | ⟦b8982b499⟧ pts_type |
| M:92NA/MSUBS.SC | ⟦ae4944be6⟧ pts_type |
| M:92NA/NJDC15.SC | ⟦3240f1c40⟧ pts_type |
| M:92NA/PFTAB.SC | ⟦033121915⟧ pts_type |
| M:92NA/SCLASS.SC | ⟦02082f5a5⟧ pts_type |
| M:92NA/SYSLDA.SC | ⟦9c4a54036⟧ pts_type |
| M:92NA/SYSLDM.SC | ⟦1b67e8497⟧ pts_type |
| M:92NA/SYSTAB.SC | ⟦bcd6cf973⟧ pts_type |
| M:92NA/TABORT.SC | ⟦28ff1271c⟧ pts_type |
| M:92NA/TASS.SC | ⟦d19681016⟧ pts_type |
| M:92NA/TCLASS.SC | ⟦327a0656b⟧ pts_type |
| M:92NA/TDISP.SC | ⟦78bad221e⟧ pts_type |
| M:92NA/TEST.UF | ⟦e7d7c5c93⟧ pts_type |
| M:92NA/TIMER.SC | ⟦22141529d⟧ pts_type |
| M:92NA/TIODM.SC | ⟦98fdfd8e9⟧ pts_type |
| M:92NA/TLDSEG.SC | ⟦c98812760⟧ pts_type |
| M:92NA/TMMLKM.SC | ⟦3cbd60306⟧ pts_type |
| M:92NA/TOSSIO.SC | ⟦221345043⟧ pts_type |
| M:92NA/TPROC.SC | ⟦aaa790319⟧ pts_type |
| M:92NA/TTMJOB.SC | ⟦02300311a⟧ pts_type |
| M:92SP | «none» |
| M:92SP//OBJCT.OB | ⟦0dba5336e⟧ pts_type |
| M:92SP/A.UF | ⟦d388d9495⟧ pts_type |
| M:92SP/ADDMOD.SC | ⟦6d6263adb⟧ pts_type |
| M:92SP/CTAB01.SC | ⟦a08e77d41⟧ pts_type |
| M:92SP/CTABX.SC | ⟦3769dd56c⟧ pts_type |
| M:92SP/DFTAB.SC | ⟦44fafccba⟧ pts_type |
| M:92SP/DIVMOD.SC | ⟦7b14bf61f⟧ pts_type |
| M:92SP/DMBUF.SC | ⟦5a6501986⟧ pts_type |
| M:92SP/DMFDB.SC | ⟦7fc147c16⟧ pts_type |
| M:92SP/DMINIT.SC | ⟦edfbc020d⟧ pts_type |
| M:92SP/DMSUBR.SC | ⟦bb4ee61eb⟧ pts_type |
| M:92SP/DMSUBX.SC | ⟦211c916bf⟧ pts_type |
| M:92SP/DMTASK.SC | ⟦a97adb448⟧ pts_type |
| M:92SP/DMTASS.SC | ⟦f3aaf19bf⟧ pts_type |
| M:92SP/DRDC15.SC | ⟦815891146⟧ pts_type |
| M:92SP/DRDI01.SC | ⟦a4e53906d⟧ pts_type |
| M:92SP/DRDU01.SC | ⟦114f62808⟧ pts_type |
| M:92SP/DRDY01.SC | ⟦a6021f136⟧ pts_type |
| M:92SP/DRFD01.SC | ⟦594710733⟧ pts_type |
| M:92SP/DRGP01.SC | ⟦2c9d4cb14⟧ pts_type |
| M:92SP/DRIC01.SC | ⟦453a625ad⟧ pts_type |
| M:92SP/DRKB03.SC | ⟦a0802bab7⟧ pts_type |
| M:92SP/DRLP01.SC | ⟦f354bb12b⟧ pts_type |
| M:92SP/DRRT01.SC | ⟦eafddadd2⟧ pts_type |
| M:92SP/DRSOP1.SC | ⟦8e2f00fbe⟧ pts_type |
| M:92SP/DRTP02.SC | ⟦af5b6e693⟧ pts_type |
| M:92SP/DSUMOD.SC | ⟦3cbe7dc60⟧ pts_type |
| M:92SP/DVDI02.SC | ⟦b01eb6160⟧ pts_type |
| M:92SP/DVDY00.SC | ⟦437887695⟧ pts_type |
| M:92SP/DVDY01.SC | ⟦32078cd6c⟧ pts_type |
| M:92SP/DVDY02.SC | ⟦be7291477⟧ pts_type |
| M:92SP/DVDY05.SC | ⟦4e843bc4b⟧ pts_type |
| M:92SP/DVGP03.SC | ⟦4eff29f96⟧ pts_type |
| M:92SP/DVKB00.SC | ⟦e4bfa7f8d⟧ pts_type |
| M:92SP/DVKB01.SC | ⟦ca54d88f9⟧ pts_type |
| M:92SP/DVKB02.SC | ⟦29e4b65c9⟧ pts_type |
| M:92SP/DVTDI.SC | ⟦1d2fc504c⟧ pts_type |
| M:92SP/DVTDY.SC | ⟦963eba64a⟧ pts_type |
| M:92SP/DVTGP.SC | ⟦93b53e66f⟧ pts_type |
| M:92SP/DVTKB.SC | ⟦67db6cb42⟧ pts_type |
| M:92SP/DVTP01.SC | ⟦39f0b5b05⟧ pts_type |
| M:92SP/DVTP04.SC | ⟦0aa3764f9⟧ pts_type |
| M:92SP/DVTTP.SC | ⟦a7d1d2605⟧ pts_type |
| M:92SP/DW1501.SC | ⟦44aa092f7⟧ pts_type |
| M:92SP/DWII01.SC | ⟦7a8c09fcc⟧ pts_type |
| M:92SP/DWIO01.SC | ⟦386c74ced⟧ pts_type |
| M:92SP/EBCDIC.SC | ⟦afbdc8a39⟧ pts_type |
| M:92SP/LDTASK.SC | ⟦509a88e8f⟧ pts_type |
| M:92SP/LKMAL.SC | ⟦273508672⟧ pts_type |
| M:92SP/LRPINT.SC | ⟦dc2fb9c43⟧ pts_type |
| M:92SP/M:92SP.LM | ⟦85608f710⟧ pts_type |
| M:92SP/M:92SP.UF | ⟦bc0aec4ec⟧ pts_type |
| M:92SP/M:BUG.LM | ⟦17289a222⟧ pts_type |
| M:92SP/MONGEN.UF | ⟦6999ea42b⟧ pts_type |
| M:92SP/MONTAB.SC | ⟦88847afeb⟧ pts_type |
| M:92SP/MPYMOD.SC | ⟦b8982b499⟧ pts_type |
| M:92SP/MSUBS.SC | ⟦9c7b669d4⟧ pts_type |
| M:92SP/PFTAB.SC | ⟦ed4f957f4⟧ pts_type |
| M:92SP/SCLASS.SC | ⟦96abeb9c0⟧ pts_type |
| M:92SP/SYSBUG.SC | ⟦25a2b1fdf⟧ pts_type |
| M:92SP/SYSLDA.SC | ⟦ba3b80a86⟧ pts_type |
| M:92SP/SYSLDM.SC | ⟦8e02ad96a⟧ pts_type |
| M:92SP/SYSTAB.SC | ⟦45c8e172b⟧ pts_type |
| M:92SP/TABORT.SC | ⟦28ff1271c⟧ pts_type |
| M:92SP/TASS.SC | ⟦d19681016⟧ pts_type |
| M:92SP/TCLASS.SC | ⟦7e4e17fe4⟧ pts_type |
| M:92SP/TDISP.SC | ⟦4b112a802⟧ pts_type |
| M:92SP/TIMER.SC | ⟦80c8b5877⟧ pts_type |
| M:92SP/TIODM.SC | ⟦ff53afd55⟧ pts_type |
| M:92SP/TLDSEG.SC | ⟦be9752c26⟧ pts_type |
| M:92SP/TMMLKM.SC | ⟦3cbd60306⟧ pts_type |
| M:92SP/TOSSIO.SC | ⟦18dc157c4⟧ pts_type |
| M:92SP/TPROC.SC | ⟦aaa790319⟧ pts_type |
| M:92SP/TTMJOB.SC | ⟦af49654f8⟧ pts_type |
| M:92SP/X.SC | ⟦3ef9b0ba1⟧ pts_type |
| SAG | «none» |
| SAG//OBJCT.OB | ⟦d68b0cdbc⟧ pts_type |
| SAG/ASM.LM | ⟦6be3e01a8⟧ pts_type |
| SAG/BEA.LM | ⟦9b75a9601⟧ pts_type |
| SAG/BUG.LM | ⟦f826f1c79⟧ pts_type |
| SAG/C:FLEX.UF | ⟦d17924334⟧ pts_type |
| SAG/CASCON.UF | ⟦f57955024⟧ pts_type |
| SAG/CASCOP.LM | ⟦d4747e311⟧ pts_type |
| SAG/CCI.LM | ⟦5f8d9acc6⟧ pts_type |
| SAG/CPLGEN.LM | ⟦ef98daeac⟧ pts_type |
| SAG/CSEG1.LM | ⟦3ee5d13e8⟧ pts_type |
| SAG/CSEG2.LM | ⟦c411922d3⟧ pts_type |
| SAG/CSEG3.LM | ⟦5655b5a5c⟧ pts_type |
| SAG/CSEG4.LM | ⟦06be61e35⟧ pts_type |
| SAG/CSEG5.LM | ⟦75697e1eb⟧ pts_type |
| SAG/CSEG7.LM | ⟦226ec5670⟧ pts_type |
| SAG/CSEG8.LM | ⟦77d6ab6f3⟧ pts_type |
| SAG/CSEG9.LM | ⟦4ba546904⟧ pts_type |
| SAG/CSEGA.LM | ⟦8f8becaa2⟧ pts_type |
| SAG/CSEGB.LM | ⟦fa442af97⟧ pts_type |
| SAG/CSEGC.LM | ⟦0593961db⟧ pts_type |
| SAG/CSEGD.LM | ⟦0327e3157⟧ pts_type |
| SAG/CSEGE.LM | ⟦a00e77c57⟧ pts_type |
| SAG/DKLD.LM | ⟦7b7e91148⟧ pts_type |
| SAG/DMPGEF.LM | ⟦061920459⟧ pts_type |
| SAG/DMPGEN.LM | ⟦4f7bf0944⟧ pts_type |
| SAG/DUMPA.LM | ⟦6d4fa9bbe⟧ pts_type |
| SAG/FLXCON.UF | ⟦3d37d6fbc⟧ pts_type |
| SAG/FLXCOP.LM | ⟦e9d9b4613⟧ pts_type |
| SAG/FLXMON.LM | ⟦fe2f33654⟧ pts_type |
| SAG/GLLED.LM | ⟦90e64be69⟧ pts_type |
| SAG/LED.LM | ⟦6e968930f⟧ pts_type |
| SAG/LKE.LM | ⟦35fb19e1e⟧ pts_type |
| SAG/M:267.LM | ⟦cb3ce0e0b⟧ pts_type |
| SAG/M:PROC.UF | ⟦ddfe97fcc⟧ pts_type |
| SAG/MONCOP.LM | ⟦fe2f33654⟧ pts_type |
| SAG/NYL.LM | ⟦ebe1191c5⟧ pts_type |
| SAG/NYLED.LM | ⟦ebe1191c5⟧ pts_type |
| SAG/OBDIR.UF | ⟦185d4ac6b⟧ pts_type |
| SAG/OBX.LM | ⟦223c69e8b⟧ pts_type |
| SAG/PCAS.LM | ⟦bf5485846⟧ pts_type |
| SAG/PDISC.LM | ⟦2564fc873⟧ pts_type |
| SAG/PM6800.LM | ⟦74ba30087⟧ pts_type |
| SAG/PRDUMP.LM | ⟦20bfd483d⟧ pts_type |
| SAG/RUM.LM | ⟦824fb03a4⟧ pts_type |
| SAG/SUM.LM | ⟦b71926c99⟧ pts_type |
| SAG/SUP.LM | ⟦ca88a9a76⟧ pts_type |
| SAG/SUP001.LM | ⟦410056e6d⟧ pts_type |
| SAG/SUP002.LM | ⟦410056e6d⟧ pts_type |
| SAG/SUP003.LM | ⟦410056e6d⟧ pts_type |
| SAG/SUP004.LM | ⟦410056e6d⟧ pts_type |
| SAG/SYSGEN.LM | ⟦d2e64749f⟧ pts_type |
| SAG/TLK.LM | ⟦af7bc2720⟧ pts_type |
| SAG/TOSSUT.LM | ⟦2a916886a⟧ pts_type |
| SAG/TRA.LM | ⟦b6c0974ee⟧ pts_type |
| SAG/XRF.LM | ⟦6334b6031⟧ pts_type |
0x000000…000ca0 (0, 0) DirGranule ((0, 0)) {
0x000000…000ca0 DirEnt {nam=»SAG «, typ=» «, f00=0x0000, f01=0x0000, f02=0x0000, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUP «, typ=»LM«, f00=0x019a, f01=0x0198, f02=0x0010, f03=0x0008}
0x000000…000ca0 DirEnt {nam=»TRA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0060, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG1 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00c8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG2 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00d0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG3 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00e0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CCI «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00f0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG5 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0110, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»LED «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x09f0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG7 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0140, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG8 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0148, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG9 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0158, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEGA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0160, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEGB «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0168, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEGC «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0170, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEGD «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0178, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEGE «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0180, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»PRDUMP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01a8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DMPGEF«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01c0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»XRF «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01c8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DMPGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01d0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CPLGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01d8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»LKE «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01e0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»ASM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01f8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»M:PROC«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0218, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»BUG «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0228, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0238, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»RUM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0248, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DUMPA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0260, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»PM6800«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0288, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»OBX «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x02c0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»PDISC «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0328, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUP001«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0348, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUP002«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0398, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»TOSSUT«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x03e8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»PCAS «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0428, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUP003«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0430, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUP004«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0480, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»TLK «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x04d0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG4 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0538, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x0540, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CASCOP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0638, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»FLXCOP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0640, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CASCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0650, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»FLXCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0658, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»FLXMON«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0660, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»MONCOP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0680, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SYSGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x06a0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»OBDIR «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0700, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»NYLED «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0720, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»NYL «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0738, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»GLLED «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0750, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DKLD «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0760, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»M:267 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0768, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»BEA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x07e8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C:FLEX«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0810, f03=0x0000}
0x000000…000ca0 }
0x000ca0…000e34 (0, 1) Opaque[0x194]
0x000e34…000fc8 # DirEnt {nam=»SUP «, typ=»LM«, f00=0x019a, f01=0x0198, f02=0x0010, f03=0x0008}
0x000e34…000fc8 IdxSect {
0x000e34…000fc8 f00 = 0x0000 // 0xe34 @0x0
0x000e34…000fc8 f01 = 0x0014 // 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 ]
0x000e34…000fc8 }
0x000fc8…00115c Dummy {f00=0x0000, f01=0x0190, f02=»c Hi "R" "Z K , _ H) * * + +f,
0x00115c…0012f0 Dummy {f00=0x0000, f01=0x0190, f02=»
0x0012f0…001484 Dummy {f00=0x0000, f01=0x0190, f02=» c ' !z 0 B D Q U $0#P$ %tP P $DB U DML MCQ HDK WML RYM RDM ASN ABP PSP RSQ6 & TY J- LP / TK [
0x001484…001618 Dummy {f00=0x0000, f01=0x0190, f02=» $ FL 8 FL 8 FL ) 8 6 FL 9 8 l DK 3 zDK 8 3 r DK 3
0x001618…0017ac Dummy {f00=0x0000, f01=0x0190, f02=» ? ? ? ? ? ? ? _ & ? ? ? ? ? ? ? Z ? ? ? ? ? ? ? L 1 r
0x0017ac…001940 Dummy {f00=0x0000, f01=0x0190, f02=» Z 0 f Z V f Z | f f B
0x001940…001ad4 (0, 2) Dummy {f00=0x0000, f01=0x0190, f02=»I q q A A I A y J I q q A A I A y J 6 I q q A A I)A)y J N l 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=» p
0x002124…0022b8 Dummy {f00=0x0000, f01=0x0190, f02=»
[…0x1…]
0x00244c…0025e0 Dummy {f00=0x0000, f01=0x0190, f02=» J
0x0025e0…002774 (0, 3) Dummy {f00=0x0001, f01=0x0190, f02=»
[…0x1…]
0x002908…002a9c Dummy {f00=0x0001, f01=0x0190, f02=» $
0x002a9c…002c30 Dummy {f00=0x0001, f01=0x0190, f02=»
[…0x1…]
0x002dc4…002f58 Dummy {f00=0x0001, f01=0x0190, f02=» 101G0100
0x002f58…0030ec Dummy {f00=0x0001, f01=0x3130, f02=»1G01000422&101 101G010004302&010975&02010181&03101&0410170&053415244205245&0844552204?4 54 &09! 101G0100
0x0030ec…003280 Dummy {f00=0x0001, f01=0x3130, f02=»1G010004502&010975&02010181&03101&0410171&053415244205245&0850455241424? &092! 101G0100046&101
0x003280…003414 (0, 4) Dummy {f00=0x0001, f01=0x0190, f02=»
0x003414…0035a8 Dummy {f00=0x0001, f01=0x0190, f02=» @ _ ? ? ? ? ? ? ? A R2 @ A A R$ A A R A A R A @"X > > > > > > > > ? ? ? ? ? ? ?
0x0035a8…00373c Dummy {f00=0x0001, f01=0x0190, f02=» P A ' @ Q A ' A! ' A A(|_ @ A# ^ 9j ?R > > > > > > > A @# E E E E E E > > a @ E # @ ? ? > !z P P Q P ! P @ $. R @ P W ' <
0x00373c…0038d0 Dummy {f00=0x0001, f01=0x0190, f02=» (P& P (_ =a:a =A:A Z P Z _" TR @ ;a=a R W* @ =a Z ;a RP ) i %0 E ' @ ;a=a R @ =a V ;A , P = - - _F @%0 L P< 0 Tt @ PR 0=a @ ?a RX @ ?a VN=A 0 ( P>P< , T
0x0038d0…003a64 Dummy {f00=0x0001, f01=0x0190, f02=» &8 'D D >a @ =a 'v D U@ x &bW U, @% x &|W @& A& ,P$ _: @% @% @% @% @& @& _ A% A% A% A% A& A& B A'( A& B :a Y B R A& _ @% ' W4 @& A& ,Xp _ <
0x003a64…003bf8 Dummy {f00=0x0001, f01=0x0190, f02=» U P" @'4 @'6 @'8 @': @'< @'> @'@ 'B @'4 x @% 8R P =A_ %_ XJ _ P0 @ !@T @" @" R P< E" " A" A ^ 9j =Q > > > > > > > > P @ !@ ) @ P @ X0 , ) A _< U` A(| @ , L ? ? , L L L L L
0x003bf8…003d8c Dummy {f00=0x0001, f01=0x0190, f02=» > > [ [ A @" H" " ? A" > @ P ,V$ A (> @ 9 (> T A #t @ ) ? ? >_ T PT PJV P>V SH? V :!9 V @ P R W ;A [ [ : _4 Pj T
0x003d8c…003f20 Dummy {f00=0x0001, f01=0x0190, f02=» [ [ : 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 [ [ : # P| ' PL + ; R <a V 9A:A ; V ; V V
0x003f20…0040b4 (0, 5) Dummy {f00=0x0001, f01=0x0190, f02=»< R $ <A Q! T! U! :$ _ < Z& ,:W _ < <A9 R :a ; V < R ; V < V _" _ ? < V < V @ < _,; RJ ! P 0 9 T! T! V T! U! : R Q ;H [ [ : ! _J ? ? ? ? ? ? ? Q _ ^ ( H _l -, W - W
0x0040b4…004248 Dummy {f00=0x0001, f01=0x0190, f02=» ? - A X #? P ? ? ? ? ? ? ? - A, ? (@ @ % ? ? ? ? ? ? ? - A (@_$ > ? ? ? ? ? ? ? . A ? ? ? ? ? ? ? . A, ? ? ? ? ? ? ? .8 A&(@_~ > X R Y _ X D $! TR ? ? ? ? ? ? ? .| A8 8 M ? ? ?
0x004248…0043dc Dummy {f00=0x0001, f01=0x0190, f02=» >F$ <A > Pl > X X X M M Y ? ? ? ? ? ? ? /` Al ? ? ? ? ? ? ? /x A (@ @ X U P U T" Y 0 Y Y X Q Y _ X X X U 5 X E _ X 4 Y 5 X 4 Y ! 1P, 0P +P
0x0043dc…004570 Dummy {f00=0x0001, f01=0x0190, f02=» ? ? ? ? ? ? 0 Al(@ Y L X X X R 5 X X - >F X Q Y Y X Y x ? ? ? ? ? ? ? 1 A, Y Y X X T ? ? ? ? ? ? ? 1, A& > > > > > > > > > R X X Q Y ( O` ? ? ? ? ? ? ? 1z Al ? ? ?
0x004570…004704 Dummy {f00=0x0001, f01=0x0190, f02=»1 Al(@ L X 4Q W 9AY T Q P &W -W /W ? ? A2: 9AY A2< T< @2: V D3* @2< R $WVP Q @2< T D2 W>:#@'=" @2: Q @2< R~ Qz 9AY Tn9ATj @2: D3N @2< $W 1 Y $ D ! P 1 Y 0 P
0x004704…004898 Dummy {f00=0x0001, f01=0x0190, f02=»P X 1 ' Q X >T X X R ( 5 Y P _84 X Y L P 6PW* L % P M M M M 4 B % ?A ' B % B =e L P H 6P H L X T $ T M W& M L y W =C- M $ T& M
0x004898…004a2c Dummy {f00=0x0001, f01=0x0190, f02=»" * A5E- A5 L " ! UJ ! Q L W 5 W6 T 5, B" (@ T X @ R >F >FM (% , ! R " T* L L 5dW L W L L 5xW L 5 A M 5 W W =h C L % Ph L =c M B !?PN P6! TD C B <b $ !@ <B C O C
0x004a2c…004bc0 Dummy {f00=0x0001, f01=0x0190, f02=» B M 6l O 8B M T8 L T: P* M 6 _vW C B % T L 6 5 6T M P* L P L 4 M L P <C M =C M 7 > 4 X ? ? ? ? ? ? ? 7( A8P _ =b%0 X $ L <B<j P L >>$ _ >> L
0x004bc0…004d54 (0, 6) Dummy {f00=0x0001, f01=0x0190, f02=» P L !# 6r 6r L !# Q $ P L x P 6r 8 > M L =H =A^ 4` A87=` M 4 8L 6(W C >F B"9 :B:B9 9 :B:B9 9|: : < > = ? : ; ? . - M ! P M W0 L $ P M P M P M * L $@ M X Y
0x004d54…004ee8 Dummy {f00=0x0001, f01=0x0190, f02=» _ (% ?a' 8 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 > W` M L . > > L ( = Q M ( M * L . M ( L & 9A (ZN YT (ZZ Y` W L 0Zp
0x004ee8…00507c Dummy {f00=0x0001, f01=0x0190, f02=»V M _J _x _ M .W 9a M ( X M . : M 9 L $ T $ > X X M Q> =b%0 X $ X $? P L , >> L _ L < M < L P FLT L TB L , X M =b%0 X $ L <B<j P L , >>_ :A^ = L $ L @P
0x00507c…005210 Dummy {f00=0x0001, f01=0x0190, f02=» M > > > > > > > > @ M M M > > > > > > > > M M M L $ P ? L 4 Q 9A Q P L 4 ? =A Q M 4 < L T (@ >> > L $ L =AR = R ? P P ? =A Y 7 M T P (T # T 9AR _ L 9KVN9BR 9A
0x005210…0053a4 Dummy {f00=0x0001, f01=0x0190, f02=»= 8 X L *(@ M * L _D X Mm M 1P ] >>(@ > 1 Q M * = 8 M * M = ? @ ? > X B A>8 B (@ ' X X W W ' # C C P L L m A , DKP L P L @ _ C C #
0x0053a4…005538 Dummy {f00=0x0001, f01=0x0190, f02=» X P % Y X R X >T ! X Y T T Y Y Y Y Y U U X @ _ X X X X P? ? ? @b@* P $ Y Y Y Y > >* Y 8 TPP" X R 8 TYX WH H@$ Y _8 X X: X R X ( _$ _* $
0x005538…0056cc Dummy {f00=0x0001, f01=0x0190, f02=» X*Y$ X X X6 Y Z(P A@X ZrP Y _8 _< _@ ! >> $0 X M A@ T b" >> X X B AA P X $ ? _" B W B W A W I W J X %?W X %? AAf AAj > > > > > > > Ah V <a W X ' ?A q
0x0056cc…005860 Dummy {f00=0x0001, f01=0x0190, f02=»L X >F (@(@ L % T> L % T6 L % T. L %?P& P" L % - AB_M T % T L T 4 L R % _X R _ 1 Tt M " L '? L U "T J WP T J2WF T I B C B B C C C C C C C B C E W* G, W" E W H L :AR| M
0x005860…0059f4 (0, 7) Dummy {f00=0x0002, f01=0x0190, f02=»C W M " J L P L 9JR@ P P T J 5 U P T Q P P W Q P T@(@ L D " Q L Q Q L Q L ( L ! TNW P T P P W Q L ' @ P p Y "(@ P P $ M C P ( M P Q P
0x0059f4…005b88 Dummy {f00=0x0002, f01=0x0190, f02=» ( P _ 0 4 ) % ] M (@ L 2 J T R Q @ ] J > 9C 9C > ^ U (@ L T U U U M L M L M M L 4 C L J ! :c:A J L T V P T"W L >F J L & J E M 4 E0 M L M L " P
0x005b88…005d1c Dummy {f00=0x0002, f01=0x0190, f02=» % T D V L ! P L ! XfWn L M L M M F C L :c:A L D V D M L ! T*_ L < J < R M M "W G M 4 E0 L E M L "! J L 2 L T L P L D Q GZ M 2 F0 L L $:BV W $:AV M " M J L L
0x005d1c…005eb0 Dummy {f00=0x0002, f01=0x0190, f02=» 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 J L J L U H M 2 F0 L M $ L M & L L
0x005eb0…006044 Dummy {f00=0x0002, f01=0x0190, f02=» L R 0 % _ M M L . P M . IL M 2 F0 L U I M 2 F0 L L L & ) L $ I L M L L U M J @ M L M M M W L J @ M M ( L P0W" M L J @ M ( L U J` M 2 F0 L L ( E L % E
0x006044…0061d8 Dummy {f00=0x0002, f01=0x0190, f02=» m M ^ U L ( L L ? ? ? ? ? ? ? A A R 4 R W 7 Tt Q K K K K K R K 5 L ( "^ L4( "^ 5 L@ $ @L: b 4T W j b H bP H d _ AK L AR 5 T6 @R P R K K K K K @R AR
0x0061d8…00636c Dummy {f00=0x0002, f01=0x0190, f02=» L R 0 % _ M M L . P M . IL M 2 5 L T( T L P T( - _ K 5 T( T T( T * :a;a L :A ;A Q K T Mn 0P M Y _ 1 X 1 M M W8 M& M X W* 8 AM T AM M (@( >> >F : 0 :R -
0x00636c…006500 Dummy {f00=0x0002, f01=0x0190, f02=» 8 FL L X X ! R V Y ANJ 8 TKP Y LPP MTP Y Y T T Y Y U U 0!? 5T W 1 Q TKP MTT Y P ; Y (@ K P Q 1 K >Z X X ? ? ? ? ? ? ? N Al_ 5 T( L @ Q P P
0x006500…006694 (0, 8) Dummy {f00=0x0002, f01=0x0190, f02=» ] K 0DKER UNIT CYLD STAT OZ O > Oh O W2 Ob O X W$ On O W Ot( X = 0 :R # Y P O 0AB CD ADDR @ 9a:a;a R R AP8 P: AR _ ' _ P A @R P$ @P8 = ^
0x006694…006828 Dummy {f00=0x0002, f01=0x0190, f02=» @ A @ !? #t A! R _* 5 @R L @ A K 0 Tt AQ, AQ. Q* ( "^ @ A ' U 5 @ 4 L P T( _ 5 K 5 T( AQ T( R: P T( R( Q ( "^ Q ^ @ T Q ( "^ K L Q I/0 ERROR QQ P
0x006828…0069bc Dummy {f00=0x0002, f01=0x0190, f02=» Z H @R P : Rp ` : L> ISTAT c _* AR RX ( "^ : ; ;<A ' R `R Q QLy _ QLx<a : : : , A ~(@ A" AR A A A A AR AR AR a S @ ? ? > !z P :b" Q P T4 P Q Q @ @ @ @
0x0069bc…006b50 Dummy {f00=0x0002, f01=0x0190, f02=»; V W # @ A AR @ ? ? > Q @ ? ? ? ? ? ? ? T P< @ P <a:a L :A : P6 $ R, Z R R Q $ :D P $ R ^& : L P R( ATb ATd ATf ATh ATj ATl ATn Tp ,:j Z ( I ^ - ^
0x006b50…006ce4 Dummy {f00=0x0002, f01=0x0190, f02=» @U @! $ & $ C "! PX @ Q P VF_ P RN;AR P P4 0 P P C C C LPT P P C # ' C _: DL P H C _ P X( DD _Z :EOS :EOF > > > @ !? ?R _ V > ' !? 0X A "! X6 @ Q P
0x006ce4…006e78 Dummy {f00=0x0002, f01=0x0190, f02=»(@ M M M B B M M # C C @ _ "ZN(@(@ ^ :j >Z _ m (@ M M 8 DKT X X T X M W M W y Y Y Y # C B > B > $? U P R U P R X U P Pv P
0x006e78…00700c Dummy {f00=0x0002, f01=0x0190, f02=»W X(W Wx 8 MTPp DYPj X T Y $ WZ XRWX $ # T $ T Y B W0 %@ R b " Y Y Y Y Y $ X _0 8 TCX< TKXB MTXH DYXN :EOS:EOV > > > AX X !? Q[PP ^ > V X > > X A
0x00700c…0071a0 Dummy {f00=0x0002, f01=0x0190, f02=»9A Y _2 !Z<Y@ 9 R !ZT !ZX AX XT_ X Y Y _^ !Z@ ![ tW !Z@ !ZD] ! X W !ZH 9C^ W| !ZL_ !ZP Wn !ZT_ X Y Y _ X r s W4 X @ _ W$ AW @W $W %W W !W W X 9d)` AX AX A T @ 9CV * 9AV 9AV X 1P * 9EV )@ X
0x0071a0…007334 (0, 9) Dummy {f00=0x0002, f01=0x0190, f02=»T ; @X U X @X X 4YPYPYnYnYnYnY Y Y Y Y Y Z Z Y Y Z Z &" 13468$$ :EOS:EOV Y Y "$&1368 A[l [n!? Q[ P ^ > A > X A_& X A_, Q R x % =A Y X Y4 Z8 A[d $ $ T D i [ !^ X "! T( !^
0x007334…0074c8 Dummy {f00=0x0002, f01=0x0190, f02=» !^ " P P !_ _ !^R ] ] > P Pj P P P @_" Y ] D P X &Q Y W Y 4 X $;H D :ET $;H D OSP OVT W W ! X ! P X 1P W @ X U W W W ! X ! . @Wp ! X ! Tb AW^ X P&
0x0074c8…00765c Dummy {f00=0x0002, f01=0x0190, f02=» , $ T D q A !^ !^ [p Y Y A_, A_& h !^ !^ W W A^v X 9c T D[h E[h 4 X B X :c H[h % ] !_ _N !_ !^V_X !_ _^ !^ Y " !^ _p [t_ X # ;dC Y A[f A[b @ A_"_ _ _( _, _0 _4 _8 _<
0x00765c…0077f0 Dummy {f00=0x0002, f01=0x0190, f02=» <j =h Qb P. ^ %x 8P P< X % !X %`X P % X. R" X>W % P T % XT <A P X^<a P @ p @ $ ! P $^ P< ! Ab Ab Ab Ab Ab Ab Ab b > > > > > > > ab @b E E E E E E
0x0077f0…007984 Dummy {f00=0x0002, f01=0x0190, f02=»T ?f' W ! H Wx ! Wn & P >b& >AW >a& @T ! X X T$W. ! P X ` `T 8 P X 8 T! T! T "<A U! U! T! U! T! T! ? ? U! T! T! T! T! T! T! ! ! ! ! !
0x007984…007b18 Dummy {f00=0x0002, f01=0x0190, f02=»P Y _" P" P& R| ^T Y _D _T X _ X _ X" X& T: X P4 0' P. 1R P _ 0$ XT % X` Z _f % _n Q4 8 TYP, R Y _$ P Q X Q % _" Y Y Y >*% X P Y $ W Y =D %_
0x007b18…007cac Dummy {f00=0x0002, f01=0x0190, f02=» 9 : : : @ P R ! R P L M M Y$ #? @ P R P T T T Y" P T _ X D D E E ] @ E @ d ? ? > ? ? ? ? ? ? ? g C ( "^ @h e U T "
0x007cac…007e40 Dummy {f00=0x0002, f01=0x0190, f02=» [ [ ^ [ [ [ [ @ L ! P Y _ @ M ^ U > > > > > > >WZ A ^ T " T0 ! P W SY SD AD _ ! P _, J _2 g # C ( "^ P
0x007e40…007fd4 (0, 10) Dummy {f00=0x0002, f01=0x0190, f02=» Af Af J Af T. B B J (@" T L #( "^ B P @ !? M @h P M L R ! _ PP I H P _ A c A A A @ ~ g A ~ @g A ~ @ i ( K A A "^ R (@_0 $ ( , 0 4 8 < g U T "
0x007fd4…008168 Dummy {f00=0x0002, f01=0x0190, f02=» [ [ ^ [ [ [ [ @ L ! P Y _ @ M ^ U > > > > > > >W A ^ T " T ! P W SY SD AD _ ! P _, J _2 # C ( "^ P
0x008168…0082fc Dummy {f00=0x0002, f01=0x0190, f02=»12 r P RTN A14 P* ( P* 2 PSEGMIS EQU * < P LDK.L A10,8 X P RB SEGERR x P* P* PSEGNCT EQU * 0 P LDK.L A10,4 NOT CATALOGED P RB
0x0082fc…008490 Dummy {f00=0x0002, f01=0x0190, f02=» 0 0 P* NOT IN CATALOG P DATA /FF09 @ P DATA /0C00 ` P* 2 P DATA /FF14 SEG NAME MISSING P DATA 0 P* P EJECT P* P*
0x008490…008624 Dummy {f00=0x0002, f01=0x0190, f02=» RF RUNER0 PROG NAME ERROR > P RF RUN400 EXECUTE A CATALOGED PROGRAM 6 P RF RUNER0 x D P RF RUN420 BINARY VALUE ( MASTER FLAG ) 6 P* NO PROGRAM
0x008624…0087b8 Dummy {f00=0x0002, f01=0x0190, f02=» * P RF(0) RUNER1 /L EMPTY P ADK A5,0 2 . P RF(0) RUNER1 /L NO DEVICE P P* B P* NOW,SET JPT TO EXECUTE THE PROG " P LD A1,LFTBOT,A5 0 PRUN050 EQU
0x0087b8…00894c Dummy {f00=0x0002, f01=0x0190, f02=»* 6 P LDK A1,0 MAX # OF SEG IN JPT $ P LC A1,JPTSEG,A11 D $ P CW A1,W:SEG0,A13 l * P RF(2) RUN100 LESS,0K : P* GREATER,#OF SEG = WSEG0 $ P
0x00894c…008ae0 Dummy {f00=0x0002, f01=0x0190, f02=» RF(0) RUN200 EXIT P LDR A2,A13 & 0 P ADK.L A2,W:SEG1 MOVE SEG ADDR F P LDR A3,A11 z " P ADK A3,JPTROT+2 P* PRUN110 EQU * P LDR* A4,A2 P
0x008ae0…008c74 (0, 11) Opaque[0x194]
0x008c74…008e08 # DirEnt {nam=»TRA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0060, f03=0x0000}
0x008c74…008e08 IdxSect {
0x008c74…008e08 f00 = 0x0003 // 0x8c74 @0x0
0x008c74…008e08 f01 = 0x001a // 0x8c76 @0x2
0x008c74…008e08 gno = [ // 0x8c78 @0x4
0x008c74…008e08 [0x00]: C0x0003.0x0.0
0x008c74…008e08 [0x01]: C0x0003.0x1.0
0x008c74…008e08 [0x02]: C0x0003.0x2.0
0x008c74…008e08 [0x03]: C0x0003.0x3.0
0x008c74…008e08 [0x04]: C0x0004.0x0.0
0x008c74…008e08 [0x05]: C0x0004.0x1.0
0x008c74…008e08 [0x06]: C0x0004.0x2.0
0x008c74…008e08 [0x07]: C0x0004.0x3.0
0x008c74…008e08 [0x08]: C0x0005.0x0.0
0x008c74…008e08 [0x09]: C0x0005.0x1.0
0x008c74…008e08 [0x0a]: C0x0005.0x2.0
0x008c74…008e08 [0x0b]: C0x0005.0x3.0
0x008c74…008e08 [0x0c]: C0x0006.0x0.0
0x008c74…008e08 ]
0x008c74…008e08 }
0x008e08…008f9c Dummy {f00=0x0003, f01=0x0190, f02=» "K K 1& " N 1& 2 l 1& C D8 P | D8 U D8 Y 1& ] :C H A M D H R M D PB " P :C_ @ 9C E ^ D V V ( T # Y$ @ J ( B A b 9o A
0x008f9c…009130 Dummy {f00=0x0003, f01=0x0190, f02=» @ H t @ A z @ ~P A ~ A F A ~ @ |Q , %. : A A&. & F @ ~P A A ~W - @ z A A ^ A , A . A 0 A A A : - @ ^ @, - A - - ( @ ` A b A ` 1 ' -* ' ' TD A D
0x009130…0092c4 Dummy {f00=0x0003, f01=0x0190, f02=»- @ R - @ -*P n P : T J : _&- - @ ~P R B T @ R : @ P~ @ RL P| B TX @ T A A D @ ~TL @ 2P - > : p B @ : 8 B
0x0092c4…009458 Dummy {f00=0x0003, f01=0x0190, f02=» *P A * ! P"% T - , W % T - : @ = V l A B . @ ~T @ P : * AZ AZ 09 .. '' , '' , : A ` A A A, M e (
0x009458…0095ec Dummy {f00=0x0003, f01=0x0190, f02=» , @ T ^ P > @ V4 " R U , > P A P @ V> @ P ,W " R IQb > T P @ IV2 : +R IP W + " R IQ > PF : " W I > P* "
0x0095ec…009780 Dummy {f00=0x0003, f01=0x0190, f02=» : K K K K K K K L L L L(L6L(L(L(L(L(L(L(L(L(L(L(L( (STACKTOP
0x009780…009914 (0, 12) Dummy {f00=0x0003, f01=0x0190, f02=» IDENT MODNAM TRA X.Y - - F1 O1111 = , ( J : , Z ) j J ) j , Z , & v , v C X W D ' , , @' @' , XX CC " '' *
0x009914…009aa8 Dummy {f00=0x0003, f01=0x0190, f02=» AZ V AZ V 09 V .. V TERM . TWB .&UWB .&CWB .&SWB .&DWB .&DSET .2START .>REENTER .JSTACK .VFMTCTL .bBLK .nDBLK .~BIN . BCD . BOOL . STRG . BINI . BCDI . STRGI . PDIV . ADD SUB
0x009aa8…009c3c Dummy {f00=0x0003, f01=0x0190, f02=» 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 BL R BNE T BNG U BNL V BOK P BEOF Q BERR R
0x009c3c…009dd0 Dummy {f00=0x0003, f01=0x0190, f02=»NL , CALL 0 "RET 4 *INSERT d ,INSRT d ,MATCH h 6DELETE f BDLETE f BEXIT 0 HPAUSE 0 HKI 0 xNKI 0 xKIA 0 xNKIA 0 xRSTRT 0 TUSE 0 XUNUSE 0 ^READ 0 bWRITE 0 jACTV 0 LEDWRT 0 DSC0 0 DSC1 0 DSC2 0 XSTAT 0 WAIT 0 MWAIT
0x009dd0…009f64 Dummy {f00=0x0003, f01=0x0190, f02=» GETTIME0 GETID 0 TTFWD 0 TBWD 0 THOME 0 TLEFT 0 TRIGHT 0 TLDOWN 0 TDOWN 0 TUP 0 DUPL 0 lGETABX 0 "SETCUR 0 GETCTL 0 &TSTCTL 0 ,GETFLD 0 0DISPLAY0 8ERASE 0 8PRINT 0 @DYKI 0 HUPDFLD 0 VEDFLD 0 ATTFMT 0 hDETFMT 0 HIREAD 0 pIRNEXT 0 zIR
0x009f64…00a0f8 Dummy {f00=0x0003, f01=0x0190, f02=» Z Z Z Z Z Z Z Z Z OZ Z Z Z Z Z $ Z Z Z Z Z Z Z Z @ 5 h
0x00a0f8…00a28c Dummy {f00=0x0003, f01=0x0190, f02=» EJECT SPACE tLIST "NLIST <DDIV DDUM OPTNS . CON . PERF . PERFI / PLIST / END / FTABLE /&INCLUDE /2KTAB />FRMT /JFMEL /VFMELI /bFTEXT /rFCTL /~FCOPY / FLINK / FCW / FILLR / FTAB / FHIGH / FL
0x00a28c…00a420 Dummy {f00=0x0003, f01=0x0190, f02=» 0VFBT 0fFSL 0rFNL 0~FKI 0 FINP 0 FEOR 0 FMEND 0 ENTRY 0 EXT 0 EQU 0 PROC 0 PFRMT 0 PKTAB 0 PLIT 1 PEND 1 2 N j * CREDIT TRANSLATOR REL 1.1 761007 * * IDENT AAAAAA * DATE XX
0x00a420…00a5b4 (0, 13) Dummy {f00=0x0003, f01=0x0190, f02=» NAME TABLE nLOC OC OPERANDS LINE LABEL OPCODE OPERANDS COMMENT C n IX LINE LABEL OPCODE OPERANDS COMMENT C lNAME REF TYPE
0x00a5b4…00a748 Dummy {f00=0x0003, f01=0x0190, f02=»OGRAM LENGTH = ERROR = REL 4.2 800118 * !N @ Pn $ T < ! T` @ <aP @ Q % %. ' -* B * A eX6 @ U , @ U , v A!6 A!4 ! : d ' PP U A 6 !0 R, !9 Q&$ P 4S _ &
0x00a748…00a8dc Dummy {f00=0x0003, f01=0x0190, f02=» _2 F :END PDIV DDUM IDENT FRMT FMEND PEND ***GENERATED STATEMENT*** @ 9 V^ ?C &0 , R P Q W A &0 N , % %. : @ ! V & P !D ! : @ ! Q & P P !D
0x00a8dc…00aa70 Dummy {f00=0x0003, f01=0x0190, f02=», : ( : @&. ) A&. A : @ Q % %. A D A : @ P @ P A&. : v < ! P v " P> A D % P4 ( @&, Q V <D, A&. % Y : , : A A @ 9a @ :a R @ :a
0x00aa70…00ac04 Dummy {f00=0x0003, f01=0x0190, f02=» D 4 R DW B @ B 4 Y P D_P < # P _ !& @ N % = A! ! : @ NQ" J T !& A! _. !& *)@ + A! _D 4P Q P
0x00ac04…00ad98 Dummy {f00=0x0003, f01=0x0190, f02=»_ $ : 0 4T Y ::a Y : @ U4 e @ Q 9AR W 9CV -t W : T 9 : . : T : _ @ < R @ 2P 1 W W e 6 ! P , : : v 6 ! P -t : !D
0x00ad98…00af2c Dummy {f00=0x0003, f01=0x0190, f02=» -t @TT " A! A T2 @ P A 8_B " -t W A! A! T Q P -t T T @ ! T A P @ R P @ P P P P V @ !
0x00af2c…00b0c0 Dummy {f00=0x0003, f01=0x0190, f02=» P F P ( P: 6 !+ P !- P P Q W % # T W @ 3 T <D P _ A A 9 _ P" 6 !0 R !9 Q % _D _L @ T W @ A Q W. 6 !- P !+ T P
0x00b0c0…00b254 (0, 14) Dummy {f00=0x0003, f01=0x0190, f02=» <D_B 9 A _R @ @ ! T" *>H J V >d _ K >h + P4 ! 9 V -t9 V -t9 V -t9 V -t A! ! &0T " P -t A! A! ! : A! ! W A!* !* E
0x00b254…00b3e8 Dummy {f00=0x0003, f01=0x0190, f02=» [ [ [ [ ; Z [ Z [ : [ [ : "N Z "N Z Z Z Z Z Z Z Z : " d " " ( : R _ >D : @" T : . $ P R P R,P.
0x00b3e8…00b57c Dummy {f00=0x0003, f01=0x0190, f02=» ERROR LENGTH TRUNCATION 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 B
0x00b57c…00b710 Dummy {f00=0x0003, f01=0x0190, f02=»LEGAL DIMENSION TOO MANY VALUES OUT OF RANGE UNSPECIFIED PARAM PARAMETER LIST OVFL NO START DEFINITION @ >aPH @, P@ &0 ** ' " D, & P _ D, & * ' % _F A, : ! @ =aPb @, T @ PJ @ PD< V @ &0 (< V @ ` &M
0x00b710…00b8a4 Dummy {f00=0x0003, f01=0x0190, f02=» @&/ % - A&/< Rf @&, @ V < < R0< V* n &0 *l n 2 ,T A&, n &0 ( : @&, =a% @ R ZH 2 ,T A&,_ 1 ,T< R W - n *l
0x00b8a4…00ba38 Dummy {f00=0x0003, f01=0x0190, f02=» " *l 2 ,T 2 ,T A&, & P ( P ( % , R : ( ( (* (* P (z P
0x00ba38…00bbcc Dummy {f00=0x0003, f01=0x0190, f02=» ) ) ) ) *
0x00bbcc…00bd60 Dummy {f00=0x0003, f01=0x0190, f02=» + + + + +
0x00bd60…00bef4 (0, 15) Dummy {f00=0x0004, f01=0x0190, f02=» R W T R = ( B T B P : : *b + % , -* : +|_$ ) @,| P ?a 9H + ) % , -* ) A,| : @ =aP" P A, @, V <H U, A, :I/O ERROR FILE =
0x00bef4…00c088 Dummy {f00=0x0004, f01=0x0190, f02=» Z A J _ A J & _ A J _( A J _4 A J _@ A J N _L A J _X A J R _d A J z _p A J _| A J _ A J H _ A J _ A J V _ A J ` _ A J _ A J B _ A J _ A J _ A J _ Z A J _ A J
0x00c088…00c21c Dummy {f00=0x0004, f01=0x0190, f02=»_ A J _ A J * _ A J l _ A J _ A J _ A J 8 _ A J f _ A J _ A J _ Z A J _ A J _ A J T _( A J f _4 A J r _@ A J 8 _L A J _X A J _d A J _p A J _| A J _ A J P _ A J
0x00c21c…00c3b0 Dummy {f00=0x0004, f01=0x0190, f02=» D _ A J _( A J _4 A J _@ A J _L A J _X A J _d A J _p A J H _| A J , _ A J _ A J _ A J _ A J _ A J _
0x00c3b0…00c544 Dummy {f00=0x0004, f01=0x0190, f02=»1 TRUE 1 T 1 FALSE 1 F 1 @ ;t @ 7 Rr e @2 @ P 9D 2 8 ( P T@ v 1& =P V P =T . , W @ A2" @ ?A A A2 ;J -t : T:A000T:D000 *0 : CZ
0x00c544…00c6d8 Dummy {f00=0x0004, f01=0x0190, f02=» l F ! P A1 7" A1 7" & v 24 " >HQ >AR , W , P P , D @ v A1 A1 A1 A1 9h A1 A1 1 . A 1 A2 @ P ?D A2 : 1 @2 76 @ n !DD 4 v L "
0x00c6d8…00c86c Dummy {f00=0x0004, f01=0x0190, f02=» Q A A R( 2* T , WJ 2 PD , W< 2 P T A2( 2(W A2& 2& 2 ! 2* @2 P P$ ? v 6 @2* v 6 A2 : v 2Z " A2 2 >HV -t W* " >HZ U -t V -t
0x00c86c…00ca00 Dummy {f00=0x0004, f01=0x0190, f02=» 2 0 ' 2 @ 4 A2 W A2 @ 7 6 e 7.& 72 7* & P @2 T , W @2 2 2* D @ ? @2 P A2 A ( 1 @ ! P^ e 6 @ (Q> @2* e 6 DB A@ @ A ^
0x00ca00…00cb94 (0, 16) Dummy {f00=0x0004, f01=0x0190, f02=» 0 ' : W W W W W W , : 8 FC= 8 BUFL= 8 DEV= 8 BUFDS= @ R P e R $@P 2 T W( @2 @ P 9jT W 9fT 2 @ e P @2 :D @ Q :D &0 ( A2 A7@ A7D A7F A7T A7V A
0x00cb94…00cd28 Dummy {f00=0x0004, f01=0x0190, f02=», _ W -t_^ @7T H Y A7A_x @7V ( 0 A7D @ A7@_ @7Z D ZR$@XV @2 ]` A7F_ @7X h_ (9 099 (,9 ) 099 8) W W W ! @2$? 7" W $ W " A A8 1 @ P @2 ;t @2$ ;p @ 7 R e
0x00cd28…00cebc Dummy {f00=0x0004, f01=0x0190, f02=»P " ! T 8_ X A8 A8 ; 8 RF @8 8 T U4 @8 8 $ T P @8 P -t @8 A8 ; _> P @8 ! Q -tW -t @2 @ P 9D 2 8 8 ( @8 P P @ ! PV @ @ =L @8 9 @2$ Y 8 R @
0x00cebc…00d050 Dummy {f00=0x0004, f01=0x0190, f02=»W W , : Q R P =oT >BV U -t W -t : @ ! P* @ (Q$ ! @ A; 0 CJ "* : < INDS= < OUTDS= @<*T A<* !?A ; ( A<B A<D v <, V
0x00d050…00d1e4 Dummy {f00=0x0004, f01=0x0190, f02=» A; _l @<DT0 R"$@P @ P A; _ W W -t_ >@LINES= = ADRMOD= = LITADR= @=RP , v A=R =0 V v " P $ 8& : @=PT A=P T H T R X( Q A % A 2 A A A A A _R @ Q T~ H Tv Rp
0x00d1e4…00d378 Dummy {f00=0x0004, f01=0x0190, f02=» W W -t_ @ Q @ Q D @ ? @ BV A1 A n &0 ( : v v " T = V -t=A a : -t :> @> ? P< v L " >HR$ U -t > A? A | : -t : , :
0x00d378…00d50c Dummy {f00=0x0004, f01=0x0190, f02=» _ P @ (TH @ ^9 V * CJ CJ @ ^ G @2" G G @ ^ D @ @ S A@ DB @ A ^ P 2 CJ _ CJ @ ^ A ^ D @ A A A ( : Dh Dh @ Dh Dh : :BTABT:ATAB :
0x00d50c…00d6a0 Dummy {f00=0x0004, f01=0x0190, f02=» P6! X ! T W& @ A@ H 9B @@ ( % H E _D @ _( 2 A@ 9h A@ @ A A AB @ DB A@ @ P Dh _ Dh A ^ CJ P CJ_ CJ @ ^ D @ A@ @ A@ U A@ A@ Bt @ A@ @
0x00d6a0…00d834 (0, 17) Dummy {f00=0x0004, f01=0x0190, f02=» Dh _D Dh @@ @@ :a A ^ CJ @ @ P. CJ " CJ @@ _4 CJ @ ^ D : ) F @,|T @ ^- K K J =A?A R ,|T^ : R T, ' A ^Sd : R<W* T - W ' / =A>A?A ' A ^S8 A ^S2
0x00d834…00d9c8 Dummy {f00=0x0004, f01=0x0190, f02=»-* : ) H ) H , : @,|T <GQ @,|TJ : @) P <E, # ! T = V A,| :R ,~ : @ ! F G DB @ @ AD A@ @ P Dh _ Dh A ^ @D P
0x00d9c8…00db5c Dummy {f00=0x0004, f01=0x0190, f02=» D AEr @<*P @@ a DB A@ @ @?fP ?` Dh > > P Dh _ Dh D A ^ " CJ @D @ 9 Q * CJ @?fT CJ CJ W CJ CJ @? CJ P
0x00db5c…00dcf0 Dummy {f00=0x0004, f01=0x0190, f02=» =A V ' G P - R C A,| : @,|P =A>A^ A,| C ! ,~ :
0x00dcf0…00de84 Dummy {f00=0x0004, f01=0x0190, f02=» 1 LIST 1( ( v v " !D v 1( 1( 8 ! TV T 1. V P . -t W @ A1& @ ~Q @ P % %. @ A @1& A A F -t A :
0x00de84…00e018 Dummy {f00=0x0004, f01=0x0190, f02=»
[…0x2…]
0x00e340…00e4d4 (0, 18) Dummy {f00=0x0004, f01=0x0190, f02=» 8z8zF ? ? 8z8z8z8z8z8z8z8z8z8z8z8z8z8z8z8z8zHf=,8 ; 8z8z8z8z8z8z8z8z>X8z8z8z8z8z8z8zA D E H ( "R
0x00e4d4…00e668 Dummy {f00=0x0004, f01=0x0190, f02=» H :H 8 ( 2 + ( 8 + ( 0 ,v ( DOS SYSTEM ERROR ON ADDRESS = W j 2 V 9 , 9 5 V 9D9k D9 9h9 : ; W( W W W W W W W W W 2 W V # T , 0V U V j : V NO 9 @ X 8<h 8
0x00e668…00e7fc Dummy {f00=0x0004, f01=0x0190, f02=» @ U 9 . 9" M - ;v F G U W D V 96 F V # f = Z V : R W W W W ' C : R WdW W W V SCP" OBP LMP UFP 9. K V K K K
0x00e7fc…00e990 Dummy {f00=0x0004, f01=0x0190, f02=» @ _ V Q # T 9& : V V , T W W W V : 0 Q Q X*Q R U ; V_> <0_D @ , H Q R W H T T <0W H T I I Y2 X_ , P P , P P C U T P
0x00e990…00eb24 Dummy {f00=0x0004, f01=0x0190, f02=» 4 T C < R _ _ _ _ B , @ T * ,9cP I Y _ :` @ T T P T R ?A?i _ U U U W : W V C = R W _ _ _ T 4 & C = R WL_ _ _ B , ,9c I [
0x00eb24…00ecb8 Dummy {f00=0x0004, f01=0x0190, f02=» V * 4T _ R ; I(S6 T I(9C # 2 Q > R W _ _ _ V V : W _ W _ V P ;B L> 8 W < B # , P P| Q& P R 9AR Wl B V T C F # C P W W
0x00ecb8…00ee4c Dummy {f00=0x0004, f01=0x0190, f02=»? R ? R B W B < B , PX PN P RT T MTP TCP TKT2 ( B :ER ( B P ( @T 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
0x00ee4c…00efe0 Dummy {f00=0x0004, f01=0x0190, f02=»A WxWv_ T TY * < AE ( < _L W W V W V W < A A W$W(W V <_x A A W W _, T TPX>_8 W C _ V B , P P P R W , P* 09AR R BH P F F G W W W V : L
0x00efe0…00f174 (0, 19) Dummy {f00=0x0005, f01=0x0190, f02=» G G F G , P C$ C$ @ U F L ?L C P X B6 L =CR =AR Cn=CRH ChWB Cz=CR: CtW4 C =l P* C W$ ' ' ( J G G G G G G G G G B L '
0x00f174…00f308 Dummy {f00=0x0005, f01=0x0190, f02=»W C$ B P8 R R H T H T H P < 6 C$ G G G G G G G G G G G B W Q Z P F G V : P G G "P P _ < # @ 2 P P _ : AEZ
0x00f308…00f49c Dummy {f00=0x0005, f01=0x0190, f02=» E R *P FL E R *T < , T W | < V 8 W F R WLW WHWFWD 1P 1P 0 ) ] V :IDENT IDENT* W _ W G G G T P G F T V _( P # Q V W
0x00f49c…00f630 Dummy {f00=0x0005, f01=0x0190, f02=» V # G> R 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
0x00f630…00f7c4 Dummy {f00=0x0005, f01=0x0190, f02=»9AR W W @H : I AH B P @H B R _ : X _$ X _, 2 <_(H I I ; IzW" ; I W ; I W Z " [ Z : ! @Ix Z 9c Z P L U _< :` % _H % _P XV _Z
0x00f7c4…00f958 Dummy {f00=0x0005, f01=0x0190, f02=» " VF @ 2B $ 2B R $@P T $ P $ P W @ Q @ T W @ P $ TB $ T <HRv # P @ ^ @ Q ;hP -t B 3 @ 2Pv <CVp Pj 1& 0T 1& 2nR U2 -t W( $ P4 $ P @` KW F R ?
0x00f958…00faec Dummy {f00=0x0005, f01=0x0190, f02=» :5 65 9 v5 v5 v1( ; ;d D D 7$ 7 v; 9 D, :7 3. O 36U 33@@ 5 3L O D K A > !N ! v @ A
0x00faec…00fc80 Dummy {f00=0x0005, f01=0x0190, f02=» @2l @ P @ P 4 5 0 1 $@P W $0T " -t_ &<BV A T W &R <CV &<CV 8_ & T @2hP A2h A;b_" -t @ Q @ A ^ @ 2T W CZ @ 2P ? 2p A2l A A2f A2h A2d A :5(NW, 52NE, 5<NEA, ! < !..TF 4
0x00fc80…00fe14 (0, 20) Dummy {f00=0x0005, f01=0x0190, f02=» @ P 9D B 4@ W -t _$:FMTITEM " : V @ : V $ 9 5 T P _ W R> R4 "@PP P: @ 2P A "!T( @ QV TN @ PHW R $ T W W -t @ P " P W " P " P :JV A @
0x00fe14…00ffa8 Dummy {f00=0x0005, f01=0x0190, f02=» @ U @ T 3 4@ T: 7 n 7 7 7 @ Q V PW ? X $ P A2h B v 4@ 4@ : " V~ $ P, R" 9 A7 !0P @ B T 4@ @ 9 8 @ 2P A $@T $ P _F $ Td
0x00ffa8…01013c Dummy {f00=0x0005, f01=0x0190, f02=»B $ P` A7 $ P $0Pp 4@ $ Pf " <HR @ R$ R $pT@ @ B 0 @7 T 4@ R $ P _& @ 2 4@ <E 4@ 3 W W W W -t 7 @ U &:HR @;`9B @ @ ^ @ ,$ T, L R - W - R Q @ @ Z. W Q L P M
0x01013c…0102d0 Dummy {f00=0x0005, f01=0x0190, f02=» A P T A P( @ 2V R W @ $ P = A!" ! @ T @ 2 P* @ B 4@ @ A @ 2Q P$ A P @ $ B 4@ L A @ 4T @ B @ 4@ 3 <U -t < A!" ! B @ B Y @2dP A 2 @ U8 @ A @
0x0102d0…010464 Dummy {f00=0x0005, f01=0x0190, f02=»U0 @2hP $ P$ @;` @;b 3 B @ A;` A;b 4@ " R4$ P4 T* ; @; B @; <d B 4@ W -t ; _8 = @ 2P " Tf P =, < R =0 @ U =cT ; R& P ; V P& T W % P 9AW T v 3 R2
0x010464…0105f8 Dummy {f00=0x0005, f01=0x0190, f02=», @; 6 ! P T6 @ @ P =A 9hT W T < V A A B 4@ W -t <H^ _* !N @ U> @ P W0 e @2n ) e 0 P ! : >U -t > @ 2P , @ ,R A , @ P @ : -t_ A= @ A= A= " $0P T W
0x0105f8…01078c Dummy {f00=0x0005, f01=0x0190, f02=» A= _x = 9hP @2bP" = : -t W W W &0T v " = :$$$TRA !D @ P> A @ U2 ? > @ @ ? ? ! : P0 R P"? R ? R T @ _6 @ : ) @,|T @ ^ K
0x01078c…010920 Dummy {f00=0x0005, f01=0x0190, f02=» 2 P" & @ T @2p P P T $ @2p @2r A A ! : <a$ @2fP * $ P * @ , W @ ^ @ L A@ =N=b A @@ : !D @ ^ @ @2fP * A ! : @,|T <GQ @,|TJ : @) P <E, # ! T = V A,|
0x010920…010ab4 (0, 21) Dummy {f00=0x0005, f01=0x0190, f02=» W8 Ah @ 2T R _P 2_T @ % A @ ^ @ 2P @2j A A*n : !N ) , -* !< ! K K :H K ?a + P$ @ 2P ! U 2t !< ) % : P @ 2T A A @ Q : <C R @ Q: B6 R A A @ @ A #
0x010ab4…010c48 Dummy {f00=0x0005, f01=0x0190, f02=» @ 2 @ P4 A 1 5 A2l A @A P * Q U A A2l : @A P @ Q"W @ 2 R A A2l : W " 5 1 A2l A A : A A*n @ 2TX @ ^ A P, R @ R ?L Y" @ W % %. @ A A D : @2j A 2
0x010c48…010ddc Dummy {f00=0x0005, f01=0x0190, f02=»F`APPL= F DUPL= G NUM G ALPHA G MINL= H,MAXL= HTREWRT HlME H NEOI H NCLR H CTAB H VERIF H SCHK= AD 0 D ( AD 3R 3 AD D ( AD AD 3R 3
0x010ddc…010f70 Dummy {f00=0x0005, f01=0x0190, f02=» AD W @D AD @D P 9dT @ P 9A D D @D ID @D ID @D ID D W$ D @D P Q @D W W @D W W AD B @D P _ A * 3R 4@ @D E AD A2b = T2 A2b D :hP AD 9H @D T AD E AD E -t
0x010f70…011104 Dummy {f00=0x0005, f01=0x0190, f02=» D & E " <HZ X& @ R R "@TnW Rf$ Pb @ P D W D @D ! Xh& Xf " <HZp @ R R "@T$W R P @ P D _ D _ W -t_ @D E AD E @D E AD @ AD E @D E AD = T @V D E -t E @D
0x011104…011298 Dummy {f00=0x0005, f01=0x0190, f02=»D E AD @ AD E @D E AD AD E @D E AD AD E @D E AD = ^ D E 3tW 3t A2d W 3^ A2d A 2 A v < !==T =@ J @2dP B J =@ A 2 v 3V AI J A 3T AI W 3Z AI
0x011298…01142c Dummy {f00=0x0005, f01=0x0190, f02=»I Wx 3d AI Wl 3d AI W` 3d AI WT 3b AI WH 3d AI W< 3j AI W0 3n AI W$ 3n AI W 3b AI W 3b AI W A 2 =@ B v I 3
0x01142c…0115c0 Dummy {f00=0x0005, f01=0x0190, f02=»:FMTITEM =@ A 2 A 4 v 3N 3 = P P @= 6 " < V A 9 5 D8 ( 1T P _ @ Wr @ R2 R($ 7 $@XD $ T @ QJ T< @ P<WJ R<$ 7 $ P0 D@ 0T( D@ 2nR @ B 4@ W W W
0x0115c0…011754 (0, 22) Dummy {f00=0x0005, f01=0x0190, f02=» P : @ U T A2n A2j A 2 @ ,Rb A , @ Q( e @ , ) : e @ , A A 2p A2l : , _ , W I| Ib A2n A2j A 2 @ ,ZF A , @ Q Ib_ Ib @ , A A
0x011754…0118e8 Dummy {f00=0x0005, f01=0x0190, f02=» )W4 e * @ , A W , : , _p v v " AF AF T -tWD AF @ P: Rz $ P $ P -t " @ ! P ** A @F @F 8 ! r @ P ( A : @ " P @F AF F P : @ P R $@P $ P $ P
0x0118e8…011a7c Dummy {f00=0x0005, f01=0x0190, f02=» AHn e v = P P W -t @ A A A 8> Z> @ Hn @ ,R8 A , @ Q @ , )W0 # >U , > < # @ W W , : ?D ?P !D @ < V& @Ir Il ( AIr Ij Ib
0x011a7c…011c10 Dummy {f00=0x0005, f01=0x0190, f02=»:FMTITEM 3, 3~ 34 A2fW 3> A D 3~ @ DP A D 3J A2f_2 , : A @2fT = P P @= 6 " < V A 9 @ R, R"$ 7 $@P @ Q T @ P W 5 D8 ( 1T P _ @ Wj R @P @ PT WN RX
0x011c10…011da4 Dummy {f00=0x0005, f01=0x0190, f02=» G( @ P % %. @ P @ U E W @ P 0 E @ e ! P , v L " >HRL U -t V @ Q4 E PW: @E 9CV $ P W,$PP W W W W -tW , : @ R.P. T" AF~ v = @F~ T ) :
0x011da4…011f38 Dummy {f00=0x0005, f01=0x0190, f02=» _@ W W W ! )@ AG0 @ P , W v H " A <HR~ U -t Rj !@P %Td ! P @G0! PP $ @G0 ) @ T0 @ P* @ P: A H @ @ P P V Q _ 8& X : W W W W -t $0 & H( " _0 $$H" AZH4 ,H H
0x011f38…0120cc Dummy {f00=0x0005, f01=0x0190, f02=»T H " A <HR| U -t Vh V^ VT VJ $ $ a T @ $@P " <HR&;D+ @ P A 8& X : W -t $0 H( " _$ -t_&
0x0120cc…012260 Dummy {f00=0x0005, f01=0x0190, f02=» - # &0 ( . ( @&, Q , A&/ & &0 @ ^ &A ( @, &O "l & - # &0 ( & @, PD 2 + ( + + "l 1 + ( 0 ,v :TRA.ERR.BIN BCD STR BOL FTB FOR EQU EXT ADR KEY PRO FLB @ P d 2< D
0x012260…0123f4 (0, 23) Dummy {f00=0x0006, f01=0x0190, f02=» ! P 9 R _ &0 W * 9AV MW 9AV U Q&0 nZ % _ P % :
0x0123f4…012588 Dummy {f00=0x0006, f01=0x0000, f02=»
[…0x6…]
0x012f00…013094 (0, 24) Opaque[0x194]
0x013094…013228 # DirEnt {nam=»CSEG1 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00c8, f03=0x0000}
0x013094…013228 IdxSect {
0x013094…013228 f00 = 0x0006 // 0x13094 @0x0
0x013094…013228 f01 = 0x0002 // 0x13096 @0x2
0x013094…013228 gno = [ // 0x13098 @0x4
0x013094…013228 [0x00]: C0x0006.0x1.0
0x013094…013228 ]
0x013094…013228 }
0x013228…0133bc Dummy {f00=0x0006, f01=0x0190, f02=» : W N j , R W W W W W V ~ W W J R W W W W W V V P T T n r W R W W W W ' W V T V P V P 4 # R Wt_ _ _ B T V ,P6R 9 :AW H - 9a:K8G
0x0133bc…013550 Dummy {f00=0x0006, f01=0x0190, f02=» V # V ' V R W _ _ _ V C R W _ _ _ V V < = V ] PD V R* G R W^_ _ _ C B P W = G 0 R W,_ _ _ V : W. W* W& W" W W W W W $W (W ,W 0 L 8
0x013550…0136e4 Dummy {f00=0x0006, f01=0x0190, f02=»V R W W W W W V A V P T T , A @ R W W W W , P P F ' 4 + ' 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
0x0136e4…013878 Dummy {f00=0x0006, f01=0x0190, f02=» _fW W W$ | R _xW W W G K _. P 8 V : C ! % + TOO BIG N W R W^W WZWX W" | W R W W W W 8 V V P T T 6 R R W W W W W F P
0x013878…013a0c Dummy {f00=0x0006, f01=0x0190, f02=» Y P W R 4W6 C Y^W _" W* W& W" W W W W $W ~ (W ,W 0 P J 8 V : + IN CATALOG B C R _nW W W 8I9A:l:A H B V % R _ W W W V : N j R W(W&
0x013a0c…013ba0 Dummy {f00=0x0006, f01=0x0190, f02=» Z` T PD # 4 C C R W W W W B D K V _ DL = ON = F ! " / = _ DD = F D ! " = : F P F F = J K , R W W W W k : , P T 9CQ 9FR T ! T~
0x013ba0…013d34 (0, 25) Opaque[0x194]
0x013d34…013ec8 # DirEnt {nam=»CSEG2 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00d0, f03=0x0000}
0x013d34…013ec8 IdxSect {
0x013d34…013ec8 f00 = 0x0006 // 0x13d34 @0x0
0x013d34…013ec8 f01 = 0x0004 // 0x13d36 @0x2
0x013d34…013ec8 gno = [ // 0x13d38 @0x4
0x013d34…013ec8 [0x00]: C0x0006.0x2.0
0x013d34…013ec8 [0x01]: C0x0006.0x3.0
0x013d34…013ec8 ]
0x013d34…013ec8 }
0x013ec8…01405c Dummy {f00=0x0006, f01=0x0190, f02=» d d l ^ 8 > $ 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.
0x01405c…0141f0 Dummy {f00=0x0006, 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
0x0141f0…014384 Dummy {f00=0x0006, 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
0x014384…014518 Dummy {f00=0x0006, 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
0x014518…0146ac Dummy {f00=0x0006, 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 1 ) R W"W W W 0 O : W W 8 : 00 W
0x0146ac…014840 Dummy {f00=0x0006, f01=0x0190, f02=» Z` T PD # 4 C C R W W W W B D K V _ DL = ON = F ! " / = _ DD = F D ! " = : F P F F = J K , R W W W W k : , P T 9CQ 9FV0 N "
0x014840…0149d4 (0, 26) Dummy {f00=0x0006, f01=0x0190, f02=» D V P L Q M V I R Wf_ _ _ V U j P . R W4W2W W. ( P T R FW : W W W W W W P z 8 : '( #( ( D N N OB DI R UF 0 V P *
0x0149d4…014b68 Dummy {f00=0x0006, f01=0x0190, f02=» A D W V V A j @ W W W W W OBJECT FILE DIRECTORY **** SECTORS Q Q" & U W W W W W R W 4 V W # R R
0x014b68…014cfc Dummy {f00=0x0006, f01=0x0190, f02=» W (>a ( % P _ V % V % P _" ( % P _ P P _ A ( ` " PROGRAM NAME SECTOR STRT INIT ACTL DATE W
0x014cfc…014e90 Dummy {f00=0x0006, f01=0x0190, f02=» ( ' $ ' $! h P x R W W W W W V % P _ V & ( % & j ( < ( % W P& ( % P ( % W P _& W W & ( W V W j Z
0x014e90…015024 Dummy {f00=0x0006, f01=0x0190, f02=» W ($ < R < R W h 2 V % V % j z @ LR R W A % @ NR S % A L A N V L A L_ A N_ A A EN D z @ @ z (; V A A A V % V
0x015024…0151b8 Dummy {f00=0x0006, f01=0x0190, f02=» P _ " W 2 V R : 8 ` R @ & R W W W W W V % P _ V & ( % & j ( < ( % W P ( % P ( % W P _& W W & ( W V W j
0x0151b8…01534c Dummy {f00=0x0006, f01=0x0190, f02=» 6 ,NOD 5 781215 NODPROK $ 8POD 7 781215 PODPROK PODPST FCSEG3 @ 781215 SEG3Y ODIGEN GODPST |KPF >ODIGEN L 781215 ODIGENK bKPF GODPST 8ACCTNG T 781215
0x01534c…0154e0 Dummy {f00=0x0006, f01=0x0190, f02=» SEG8Y DUFPRO *CSEG9 s 781215 SEG9Y R VD:CADI | 781215 CADPROK PRC06 PRD53 S:PRC PRD59 SKIPY ~ *CSEGB 781215 SEGBY *CSEGD 781215 SEGDY ,I:DDRQ
0x0154e0…015674 (0, 27) Opaque[0x194]
0x015674…015808 # DirEnt {nam=»CSEG3 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00e0, f03=0x0000}
0x015674…015808 IdxSect {
0x015674…015808 f00 = 0x0007 // 0x15674 @0x0
0x015674…015808 f01 = 0x0004 // 0x15676 @0x2
0x015674…015808 gno = [ // 0x15678 @0x4
0x015674…015808 [0x00]: C0x0007.0x0.0
0x015674…015808 [0x01]: C0x0007.0x1.0
0x015674…015808 ]
0x015674…015808 }
0x015808…01599c Dummy {f00=0x0007, 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
0x01599c…015b30 Dummy {f00=0x0007, f01=0x0190, f02=» : UF W _D F R, F T V LW W W R 4W W X N ! 4 V # R _* V 4 4Pv Tp V 9$ TR V 6 W 6 V V PP W N ! V # W X R _ W U V 6 W 6 V 5 U
0x015b30…015cc4 Dummy {f00=0x0007, f01=0x0190, f02=» # R W 6 0=a 08g9A:l @ 8 A 8;` $ 9(@ 4 N ! # p 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
0x015cc4…015e58 Dummy {f00=0x0007, f01=0x0190, f02=» W 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 > D T C _: ( B W V T" W B U V T W V
0x015e58…015fec Dummy {f00=0x0007, f01=0x0190, f02=» R W W W W W C _( W ( W" C V J " R _4 W _ W _" B U W 6 L R WNW W V T$ C h R W2 W U _: U W _D C R W W W W W U _ T T Y T T W j_( C 5 Z V
0x015fec…016180 Dummy {f00=0x0007, f01=0x0190, f02=»_ _ V 6 8 V <A W 6 V 6 b 6 V Q Z 4 % Y # R W _ _ _ , T 4<A $ % 4 % Y j W 4P6 T V W jW4 V 5 Z B W V W P V W _R C , U V R _ V T@ V
0x016180…016314 (0, 28) Dummy {f00=0x0007, f01=0x0190, f02=»Y" V W j V T V R * V _& O 8 : 4_ MODULE O 8 V R @W : _H _P W V 4 V # V V # R W W _ W C _ V R _ _ W _ W V
0x016314…0164a8 Dummy {f00=0x0007, f01=0x0190, f02=»OB N N 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
0x0164a8…01663c Dummy {f00=0x0007, f01=0x0190, f02=»T~ V W W V W 8 W W V V W R V V W < ~ R W W W _f 8 . * 8 . R J_8WD_<_> " P P P 4 0 W " ?A W
0x01663c…0167d0 Dummy {f00=0x0007, f01=0x0190, f02=» 8 W P R T0 4 @ % V C z 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, B_ 8W _2 _: W 2 @
0x0167d0…016964 Dummy {f00=0x0007, f01=0x0190, f02=» V C R W:W8W:W4 V P* W B 9 V P> W W _z V P$ " T W _ W _ W _ V $ Pl V PN C # ` R W4W2W0W. B $ $ - $ X R _ _ _ _ #_V B $ $ - $_r
0x016964…016af8 Dummy {f00=0x0007, f01=0x0190, f02=» RDO PRT | , ( LST RDA PRD , ( LSD PCH POB L , ( PLD DUF INC MO | , ( V SCR KPF p DEL , ( ) p ASG SEG RUN p
0x016af8…016c8c Dummy {f00=0x0007, f01=0x0190, f02=» LK l , ( E p LED DEB p EDT , ( SVD ` SVU REW < , ( ULD FFS FBS l , ( RFS RBS WEF , ( ) WES WEV SDM HS , ( I F p
0x016c8c…016e20 Dummy {f00=0x0007, f01=0x413c, f02=» LSF GOD P POD , ( OLE P " $ NOD MAC P & RT , , ( L P ( PRV LSV TRA , ( p 0 TLK p 2 4 XRF P 6 8 BUG p , ( ) TLT p : 4 LKF p < " I
0x016e20…016fb4 (0, 29) Opaque[0x194]
0x016fb4…017148 # DirEnt {nam=»CCI «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00f0, f03=0x0000}
0x016fb4…017148 IdxSect {
0x016fb4…017148 f00 = 0x0007 // 0x16fb4 @0x0
0x016fb4…017148 f01 = 0x0008 // 0x16fb6 @0x2
0x016fb4…017148 gno = [ // 0x16fb8 @0x4
0x016fb4…017148 [0x00]: C0x0007.0x2.0
0x016fb4…017148 [0x01]: C0x0007.0x3.0
0x016fb4…017148 [0x02]: C0x0008.0x0.0
0x016fb4…017148 [0x03]: C0x0008.0x1.0
0x016fb4…017148 ]
0x016fb4…017148 }
0x017148…0172dc Dummy {f00=0x0007, f01=0x0190, f02=» ' d H v z X $ v ` . R ^ D $ * < h L p DCU DLU LIC PRC RSU ` RDS RDO PRT LST RDA PRD LSD PCH POB PLD DUF INC
0x0172dc…017470 Dummy {f00=0x0007, f01=0x0190, f02=» TCD 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
0x017470…017604 Dummy {f00=0x0007, f01=0x0190, f02=»L P ( PRV LSV TRA p * TLK p , . XRF P 0 2 BUG p TLT p 4 . LKF p 6 N P 9B 9A R D P < N P N 9 V O O N 9CV < N 9 R N 9AV < N 9 V O W $
0x017604…017798 Dummy {f00=0x0007, f01=0x0190, f02=»_t r R W W W W O & < f O , P^ PZ P R T TYT O , P T O , P4 P0 T O T O : W 0 V T _^ @ D H ;DRR , PH I H P6 H P0 @ " P _ D 4 #
0x017798…01792c Dummy {f00=0x0007, f01=0x0190, f02=» C R W _ _ _ T 4 & C , R WL_ _ _ B , ,9c f[ Y W YD l R W _ _ _ W V V W V N C R W _ _ _ V W W V V * 4T _ R
0x01792c…017ac0 Dummy {f00=0x0007, f01=0x0190, f02=» W < B # , P P| Q& P R 9AR Wl B V T C F # C P W W P W ( B R29 R<9 R49 R&9 R0' Q B H R&9AR 9AR W B < B W H_ _ _ _ B P R&? R ? R ? R ? R ? R B W B < B
0x017ac0…017c54 (0, 30) Dummy {f00=0x0007, f01=0x0190, f02=» T U U _& W W W V C B , X PD P QL QN T 9 R29 RJ T C H R W W W W @ K V V V V P R W W ( R _$W W W _4 :W W W ( V R S: :WxWv_ T TY * < (
0x017c54…017de8 Dummy {f00=0x0007, f01=0x0190, f02=» , P P P R W W A n W W W W ~ W2 W W V V 5 W _* V P W V | W | V P V /P 0R$ :RTW V W ~ V W ~ V _" V V 8H V ! T 8 _ 4 WHW V V ! T 8 _ R
0x017de8…017f7c Dummy {f00=0x0007, f01=0x0190, f02=» v | W | P ,P :P V | $:H $ F0Z F9U FAZ& FFY, A n p p v | !AAZ !ZZY v | W | ! P !,,P @ n Q 5 A n _( @ n X ! P _$W W ~ : _ W V | W | : 8D R 0 P P 9H _ W _(
0x017f7c…018110 Dummy {f00=0x0007, f01=0x0190, f02=» L T P*_ 0R" 9Q 0 P 9C 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 j (XB * R *P _ V : N :IV :B
0x018110…0182a4 Dummy {f00=0x0007, f01=0x0190, f02=» PH P8=A 1 * * 1 1 ZHW _4 N ! QPP: O V ~ P8 h H JW*W W W W d W W W W W _ W W R W W W W V ~ : " ( . 4 B L X b h
0x0182a4…018438 Dummy {f00=0x0007, f01=0x0190, f02=» DISK NOT OPERATIONAL ALREADY CATALOGED 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
0x018438…0185cc Dummy {f00=0x0007, f01=0x0190, f02=» % P P P0 2 U N ! T W h O h H rWz N % T U O 0 W i _0 ]$ Z & W & < U Z & r W R W W W W X~ X Q P N 4
0x0185cc…018760 Dummy {f00=0x0007, f01=0x0190, f02=» V : DATE HX /HX /HX TIME HXH-HXM-HXS- A $ )T P _ @ W = W | < , P V 8 W W V | W R W W W W W H R *P N R *T < , T W | < V 8 W R WLW WHWFWD
0x018760…0188f4 (0, 31) Dummy {f00=0x0008, f01=0x0190, f02=» T V _( P # Q V W V : , T _. F Z _j W W W F W P ) F W P W F 4 V # @ R W _ _ _ W G W 6 W V F T W V P v Pd P &Qp T
0x0188f4…018a88 Dummy {f00=0x0008, f01=0x0190, f02=» W ]<_ V T8 V 4 W W V W W V D W V W V : V W _ V X _ W , P* 09AR R P F F G W W W V : L P< R R" T T T G :W @ 2T
0x018a88…018c1c Dummy {f00=0x0008, f01=0x0190, f02=» ?L 0 P X L =CR =AR =CRH WB =CR: W4 =l P* W$ ' ' ( J G G G G G G G G G L ' P< L # 4 C C C d R W:_ _ _ B RW L # 4
0x018c1c…018db0 Dummy {f00=0x0008, f01=0x0190, f02=» G G G G G G G G G G G W Q Z P F G V : P G G "P P _ < # @ 2 P P _ : A B P @ B R _ : X _$ X _, 2
0x018db0…018f44 Dummy {f00=0x0008, f01=0x0190, f02=» W ; W Z " [ Z : ! @ Z 9c Z P L U _< :` % _H % _P XV _Z W j 2 V , 5 V 9D9k D f W( W W W W W W W W W 2 W V # T , 0V U V j : V NO @ X
0x018f44…0190d8 Dummy {f00=0x0008, f01=0x0190, f02=» t @ U . M - t F G U W D V 4 F V # f = Z V R W W W W ' C R WdW W W V SCP" OBP LMP UFP , K V
0x0190d8…01926c Dummy {f00=0x0008, f01=0x0190, f02=» V , W @ _ V Q # T $ : V V , T W W W V : 0 Q Q X*Q R U V_> ._D @ , H Q R W H T T .W H T I I Y2 X_ , P P , P P C U T
0x01926c…019400 Dummy {f00=0x0008, f01=0x0190, f02=» F 4 T C R _ _ _ _ B , @ T * ,9cP f Y _ :` W O QH ?A R $T$ $P, W P ?a W ( W ;h P V : 8 V : OPTION NOT AVAILABLE CSEG1 LMCSEG2 LMCSEG3 LMCSEG4 LMCSEG5 LMLED LMCSEG
0x019400…019594 (0, 32) Dummy {f00=0x0008, f01=0x0190, f02=»CORE OVERFLOW ** @ !6 O N W P ( - Y j O P: 4 9 Y <=h R O & = Y N P N P : N P 9B 9A R H P #v W f T P : $T !V R HW
0x019594…019728 Dummy {f00=0x0008, f01=0x0190, f02=»W W W W j ! R JW W W W B PL ( XB " R _L YR U " V l8h Xf "$ R _p ;Yv < $ $~ "R R HW W W W j "j R JW W W W B P YD b P :h " R _`W @ X 8<h 8# LP 8P W T X
0x019728…0198bc Dummy {f00=0x0008, f01=0x0190, f02=» #J R _x V 0 V PW !NN O : ( $ 8 5 Y @ P N N V O U $:h U # U " N N V < O U N N V < O U N N V U ( $& R W W W W W 1 5 C $D R W W
0x0198bc…019a50 Dummy {f00=0x0008, f01=0x0190, f02=»0MS- W @ 4 4 " Y%X %X 8 QR F%B _& Q$ & 4 " 9 Z _P &L 8 & 8 V :%n% % % % % & & & & PROG ABORTED AT OVERFLOW IN SIMULATION ROUTINE SAVE AREA NOT WIRED INSTRUCTION MEMORY PROTECT
0x019a50…019be4 Dummy {f00=0x0008, f01=0x0190, f02=»A4 =HEXA A5 =HEXA A6 =HEXA A7 =HEXA A8 =HEXA A9 =HEXA A10=HEXA A11=HEXA A12=HEXA A13=HEXA A14=HEXA BUFFER ALLOCATION OVERFLOW DISK OVERFLOW DISK QUEUE OVERFLOW MEMORY OVERFLOW DURING LOADING PHASE R W W W W W 1 5 C R W W
0x019be4…019d78 Dummy {f00=0x0008, f01=0x0190, f02=» C:HXBI,A12 CONVERT DEVICE ADDRESS R PINCVTG EQU * S , P RB INCVT9 S H 0 P LDR A3,A1 DEVICE ADDRESS S h $ P LD A2,W:PARV,A13 S @ P LDKL A1,/1E0 ASSIGN TYPE U ; FILE CODE /E0 S 8 P
0x019d78…019f0c Dummy {f00=0x0008, f01=0x0190, f02=»SB7,A13 ASSIGN STATUS S x P RB(4) INCVT9 T , P* ASSIGNEMENT HAS BEEN PROCESSED T @ PINCVTH EQU * T p H P LDK A1,/50 BATCH PROCESSING,SET BIT 13 IN JPTMOD T P RF INCVTD T P* T PINCVTC
0x019f0c…01a0a0 Dummy {f00=0x0008, f01=0x0190, f02=» EQU * *PTS T L P LDK A1,0 RESPONSE = N, NO BATCH PROCESSING DESIRED U P* U d 4 PINCVTD EQU * SET BIT IN JPTMOD U n $ P ORS A1,JPTMOD,A11 U P* U P RTN A14 U P* U P
0x01a0a0…01a234 (0, 33) Opaque[0x194]
0x01a234…01a3c8 # DirEnt {nam=»CSEG5 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0110, f03=0x0000}
0x01a234…01a3c8 IdxSect {
0x01a234…01a3c8 f00 = 0x0008 // 0x1a234 @0x0
0x01a234…01a3c8 f01 = 0x0008 // 0x1a236 @0x2
0x01a234…01a3c8 gno = [ // 0x1a238 @0x4
0x01a234…01a3c8 [0x00]: C0x0008.0x2.0
0x01a234…01a3c8 [0x01]: C0x0008.0x3.0
0x01a234…01a3c8 [0x02]: C0x0009.0x0.0
0x01a234…01a3c8 [0x03]: C0x0009.0x1.0
0x01a234…01a3c8 ]
0x01a234…01a3c8 }
0x01a3c8…01a55c Dummy {f00=0x0008, f01=0x0190, f02=» !* . F N P R < z @ t ( H 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 0 W O W X^ b_ _0 _6 V DEP T.
0x01a55c…01a6f0 Dummy {f00=0x0008, f01=0x0190, f02=» 9AV~ N N 0 V P2 8 R @W W 2 W 2 Y : V P& > D N N 0 V P L_Z N 9BVF D 0 V P _ V P > D 0 V P f_ , T 8_ X 4
0x01a6f0…01a884 Dummy {f00=0x0008, 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 :
0x01a884…01aa18 Dummy {f00=0x0008, f01=0x0190, f02=»SYST 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
0x01aa18…01abac Dummy {f00=0x0008, f01=0x0190, f02=» !DDP& !RRTR W QP O _: W QF O _J W QP O _Z V /ST , P P _t Wz Wv Wr W * Wd H_ WZ WV WR :_ V T , P P T 9IV. N OB 0 V P R P 8 : , T ! T~ N T #
0x01abac…01ad40 Dummy {f00=0x0008, f01=0x0190, f02=» R W V T& D F:ERMSUF 0 V P d V V j N " N W 2 L W 2 N T N 9HR : W 2 : ( /S ASSIGN ERR : R OPTION ERR NL OPTION ERR D OPTION ERR /S EMPTY /O ASSIGN ER
0x01ad40…01aed4 (0, 34) Dummy {f00=0x0008, f01=0x0190, f02=»R LM FCL 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 , T X 4 R WR R
0x01aed4…01b068 Dummy {f00=0x0008, f01=0x0190, f02=» 8 N N 9HZ W 0_( 8 : MAC LM 8 : RTL LM TLT W TLK A f j H 4 % Y GOD W j n W | W j H $ 5 Y j W | D W - Y ` O O
0x01b068…01b1fc Dummy {f00=0x0008, f01=0x0190, f02=» _6 O _z W V O O _ P 8 : N 9AVt N N 0 V P. 8 2 R @W W 2 W Y : > D N N 0 V P L_P N 9BV@ D 0 V P _x > D 0 V P f_ , T
0x01b1fc…01b390 Dummy {f00=0x0008, f01=0x0190, f02=»W W 2 4 N OB 0 V P$ 8 z R @W W 2_P N OB 0 V P$ 8 R @W W 2_N N OB 0 V P$ 8 R @W W 2_N N OB 0 V P$ 8 : R @W W
0x01b390…01b524 Dummy {f00=0x0008, f01=0x0190, f02=» W 0_ W V O O _ P 8 : N 9AV N N 0 V W W A r W W W W ~ : W: D W&W W V V 5 W _, A r V P W V | W | V P V /P 0R. :RrW& V t @ r P W ~ V
0x01b524…01b6b8 Dummy {f00=0x0008, f01=0x0190, f02=» W* @ rP U @Q 9JW P W @ W ~ V W ~ V W ~ V 0R :R AR GV V | V P v | W | P ,P KP L T P6_ L tW$ @R 0 P 9D _( W L
0x01b6b8…01b84c Dummy {f00=0x0008, f01=0x0190, f02=»W 8 : _ _ $ _ !_ _& _0 IDENT V 8 V /O W /LP /S V W : SC W * R _ W>_~_ 4 # P R _ W _ ( V X W V Z V W N N W^ W
0x01b84c…01b9e0 Dummy {f00=0x0008, f01=0x0190, f02=» W W . R 4W W N ! 4 V # Z R _* V 4 4Pv Tp V 9$ TR V 6 W 6 V V PP W N ! V # W R _ W U V 6 W 6 V 5 U U U V U N ! 4 V #
0x01b9e0…01bb74 (0, 35) Dummy {f00=0x0009, f01=0x0190, f02=»8g9A:l @ A ;` $ 9(@ 4 N ! # R W* V T U V T W 2 : W V , P8 PB W T W T 9 VH9 V # V R W& V V P W ! O 8 V _ W
0x01bb74…01bd08 Dummy {f00=0x0009, f01=0x0190, f02=»/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 > D T C _: ( PW V T" W B U V T W V T C R _l W W U C V X B W
0x01bd08…01be9c Dummy {f00=0x0009, f01=0x0190, f02=»W" C V J R _4 W _ W _" B U W 6 R WNW W V T$ C R W2 W U _: U W _D C R W W W W W U _ T T Y T T W 4 _( C 5 Z B V j W (P. H U W V W W H W
0x01be9c…01c030 Dummy {f00=0x0009, f01=0x0190, f02=» 4 % Y # R W _ _ _ , T 4<A $ % 4 % Y j W 4P6 T V W t W4 V 5 Z B W V W P V W _R C , U R _ V T@ V 8 , T 9 V( OB W W :
0x01c030…01c1c4 Dummy {f00=0x0009, f01=0x0190, f02=» z R * V _& O 8 : _ MODULE O 8 R @W : _H _P W V 4 V # V V # R W W _ W C _ V < R _ _ W _ W V C C _NW" V P GOD W j n W | W
0x01c1c4…01c358 Dummy {f00=0x0009, f01=0x0190, f02=» 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 W W W W W R W W W
0x01c358…01c4ec Dummy {f00=0x0009, f01=0x0190, f02=» W V V W V V W W W W _f f t 8 * 8 R J_8WD_<_> " P P P 4 0 W " ?A W ?a H V X^ Z R JW W W W W
0x01c4ec…01c680 Dummy {f00=0x0009, f01=0x0190, f02=» V C 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, _ 8W _2 d_: W 2 @ : V D : W W V 9a:a
0x01c680…01c814 (0, 36) Dummy {f00=0x0009, f01=0x0190, f02=» 9 V P> W W _z V P$ " T W _ W _ W _ V $ Pl V PN C # R W4W2W0W. B $ $ - $ X R _ _ _ _ #_V f B $ $ - $_r ?a V X^ R JW W W W W
0x01c814…01c9a8 Dummy {f00=0x0009, f01=0x0190, f02=» A1,W:ASB7,A13 F : P RF(0) TLK260 OK. ASSIGN SYSTEM LIBR. OBJECT DIRECTORY G P* G X 6 P* PRINT ERROR MESSAGE G b P LDK.L A3,SYSLBR G P RB TLK210 G P EJECT G P* G , P* ASSIGN SYSTEM
0x01c9a8…01cb3c Dummy {f00=0x0009, f01=0x0190, f02=»TE PROTECT, ASGTYP=4 G p P LDK A2,/F0 DISK FILE CODE H P LDK A3,8 DIRECTORY ADDRESS H > & P MS 7,W:ASB0,A13 SET ASSIGN BLOCK H b & P CFI A14,C:ASG,A12 REQUEST ASSIGN H " P LD A1,W:ASB7,A13 STATUS OK ? H P RF(0) TLK300 YES H P* PRINT ERROR MESS
0x01cb3c…01ccd0 Dummy {f00=0x0009, f01=0x0190, f02=» * H " P* CHECK OBJECT INPUT FILE * I " P* * I @ " P****************************** I f P I 8 PTLK300 EQU * CHECK IF /O IS PRESENT I P LDK A3,/D5 I $ P CFI A14,C:
0x01ccd0…01ce64 Dummy {f00=0x0009, f01=0x0190, f02=»QU * PRINT ERROR MESSAGE I P LDK.L A3,LKEORR J 0 PTLK315 LDK.L A1,/FF00 J T P LDK A2,0 J v $ P CFI A14,C:ERMS,A12 J H P RB TLK230 THEN DELETE FILE CODES ASSIGNED TO LIB J P
0x01ce64…01cff8 Dummy {f00=0x0009, f01=0x0190, f02=»ICE J V P EJECT K P K P******************* K " P* * K > P* CLOSE /O FILE * K Z P* * K v P******************* K P K P LDR A8,A13 K P ADK.L A8,W:DEC1 K , P LDK
0x01cff8…01d18c Dummy {f00=0x0009, f01=0x018e, f02=»10 REQ LENGTH K z * P MSR 3,A8 SET ECB L P* L H 8 P LDK.L A4,TLK330 WRITE EOF ON THE FILE L R P ABI C:WEOF,A12 L PTLK330 EQU * L , P RF TLK340 I/O ERROR L P* L : P
0x01d18c…01d320 Dummy {f00=0x0009, f01=0x018e, f02=» L P P LDK.L A3,LKEOR1 M 6 P RB TLK315 WRITE ERROR MESSAGE M , P* M f 6 PTLK350 EQU * NOW REWIND THE FILE M p P LDK.L A4,TLK360 M P ABI C:REWD,A12 M PTLK360 EQU * M
0x01d320…01d4b4 (0, 37) Opaque[0x194]
0x01d4b4…01d648 # DirEnt {nam=»LED «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x09f0, f03=0x0000}
0x01d4b4…01d648 IdxSect {
0x01d4b4…01d648 f00 = 0x004f // 0x1d4b4 @0x0
0x01d4b4…01d648 f01 = 0x0006 // 0x1d4b6 @0x2
0x01d4b4…01d648 gno = [ // 0x1d4b8 @0x4
0x01d4b4…01d648 [0x00]: C0x004f.0x2.0
0x01d4b4…01d648 [0x01]: C0x00c0.0x0.0
0x01d4b4…01d648 [0x02]: C0x00c0.0x1.0
0x01d4b4…01d648 ]
0x01d4b4…01d648 }
0x01d648…01d7dc Dummy {f00=0x004f, f01=0x0190, f02=» N W w W 2 R W W W W W V | D N N SC b R W W W W W$ V /SP W V R Q UF W 0 R @W R W W W W W W tW. V Uv Qr , Pl W t R WfW W W` !!W V TR V W v A V A V
0x01d7dc…01d970 Dummy {f00=0x004f, f01=0x0190, f02=» r W p W r W z W W A A r A W | V t L: A h W W _ _ A A A t v j $ V vP W: (P. R *P _, V n ! T n W | * . J N ; R _ _& X _ N T N 9HV V W 2 W 2 W 2 :
0x01d970…01db04 Dummy {f00=0x004f, f01=0x0190, f02=» | V zQ + A A J l V | W ~ & R WZW0WVW W> V RL ' QF V | W ~ P R W0W W,W*W V T V LT A V | V ~ 0 0 6 R W~W|WzW Wv V Rp ' Qj V | W ~ W R WPW.WLW WL V RB ' Q< W R W(W W$W"W$ V T V
0x01db04…01dc98 Dummy {f00=0x004f, f01=0x0190, f02=» R W W W W W V | W ~ V | D N N W R WvWtWrW Wn V Rh ' Qb W W R WPW.WLW W V RB ' Q< W R W(W W$W"W$ V T V CT A W T A W 0 V V | V ~U @ P W ~ B 6 A L V | V W W | P W ~ p :W
0x01dc98…01de2c Dummy {f00=0x004f, f01=0x0190, f02=» | W R W W6W W W V R ' Q W V | W R WxW WtWrWp V W x V W | V V T V =a=A V V x V =a=A W | R W W W W W" V V CT A W A w W w V p r V % V E
0x01de2c…01dfc0 Dummy {f00=0x004f, f01=0x0190, f02=» W x V W | V V V =a=A V V V =a=A W V ~ V |P W ~ 6 W ~ V w V ) V p r % E E E E W p @ T & : V ~ W | A W p P R $ )_ A W B
0x01dfc0…01e154 (0, 38) Dummy {f00=0x00c0, f01=0x0190, f02=» A J 0 A A A W V | W R W WDW W W V R ' Q W W * R W W W W W V R ' Q W Wd V W x V W | V V x A W | R WNW WJWHWJ V T> V FT A W T A R W W W W W V T V CT A W
0x01e154…01e2e8 Dummy {f00=0x00c0, f01=0x0190, f02=» @ Q V | V R> V UB j F W V V @ P A tW W |_ _ W V | j @ j @ j @ tT W @ Q2_> V Q JW V A Z V | A b V J V ~ W | L ( C ( _ T n ~ ( . 0 2 T
0x01e2e8…01e47c Dummy {f00=0x00c0, f01=0x0190, f02=»]],$$STRG1$$STRG2$$[,C/L] )!!RE LINE1,$$STRG1$$STRG2$$ )!!EN [D] )!!LS LINE1[,LINE2][,C] OR $$STRG1$$[,F/N][,C] )C= CONSOLE, L= LINE PRINTER, D= DIAGNOSTICS, F= FIND, N= NOT, $$= ARB. CHARACTERS )REL. 11.0 81-03-27 V | W W V | V P v | W | W V xP 9H_
0x01e47c…01e610 Dummy {f00=0x00c0, f01=0x0190, f02=» | ^ _" W j W p V p W p V $V : , V |Q , V |R D _ W v W _> V |T A A V p M L W V $ V | P P , 9 9 Y V | 9a9A $ $ 9 W | X Y $ 9 V D W W
0x01e610…01e7a4 Dummy {f00=0x00c0, f01=0x0190, f02=» A B @ R W W W W V ! T* V I J A @ j @ j @ W z j V pV2 L X M V | C J A > V j j @ W W | V | V ~ F , V l R FW F " ! T: V A J A V | A 4 J @
0x01e7a4…01e938 Dummy {f00=0x00c0, f01=0x0190, f02=» _ V t I: A h D WxW _ _ V j V v @ P V | W ~ n 6 V | I j @ j V j P R _|_~W W W z V |T A _ J N ; N _ X _ # , T TYT f C R HW W W W j W | P W P % Y P
0x01e938…01eacc Dummy {f00=0x00c0, f01=0x0190, f02=» J A WH V t , P2 W 0 c C Z C @ t R R W W W , , V t , h ( 0 ) Z @ @ t R R W W W W ( & N < V O &V # 00 ) ~ R W W W W : V x A " t " R @
0x01eacc…01ec60 Dummy {f00=0x00c0, f01=0x0190, f02=» _ V t I: A W W _ _ V j V v @ P V | W ~ 6 V | I j @ DL IL EN AB JN :CH LS RE HL COMMAND UNKNOWN ,TRY AGAIN " I/O ERR ON LAST RECORD,TRY AGAIN $ SEQUENCE ERROR, CURRENT LINE:
0x01ec60…01edf4 (0, 39) Dummy {f00=0x00c0, f01=0x0190, f02=»SC,UPD TERMINATED * AUX. INPUT CAN NOT BE ASSIGNED,TRY AGAIN STRING NOT FOUND 0000 LINES = +0000 IN FILE IDENT STATEMENT UPDATED HIGHEST LINENO READ 0000 LINE PRINTER NOT ASSIGNED 0000 OF 0000 LINES IN FILE LINE NUMBER 1 > LINE NUMBER 2
0x01edf4…01ef88 Dummy {f00=0x00c0, f01=0x0190, f02=»QU 0$$EDM EQU 1$$ !!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ !!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ !!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!CH $$ASSOLY EQU 0$$ASSOLY EQU 1$$ !!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ !!CH $$SWPBLK EQU 0$$SWPBLK EQU 1$$ ASM /S,NL @ PT FZ
0x01ef88…01f11c Dummy {f00=0x00c0, f01=0x0190, f02=» SP ECP 1P AP :DC : F : ( SP MMT W ( Lj Ml :!!IL 48 @P !SS = S 5 <x @P G >4 @P 5 B T :h" P 0R U Q P <H9D_( : : Wf AP @l P Al @l P Al @l P Al @l P Al YF P
0x01f11c…01f2b0 Dummy {f00=0x00c0, f01=0x0190, f02=» _@ 7 @T T AT O(_^ @X8PV Ab @T P T AX< AX8 X: E AT 01 AT YB T O _ Ab 7 a CD Al Al| CG Al Alz : 4R P @X8! P X> XH 4 AXJ | Z"Pb 4 7 AJ (R> f AI.
0x01f2b0…01f444 Dummy {f00=0x00c0, f01=0x0190, f02=» T 01 7 @X| , 7 4 W V T1P TNP G1P G2P T2P TPT, 1 0P 1T W AJ / AI @J W AI AT O( 4^ AX| @J : P @ $ !;;P6 ! P0 ! X !__T P Z0_. !^^T bv_B + _F Jb P P ~t
0x01f444…01f5d8 Dummy {f00=0x00c0, f01=0x0190, f02=» P, LP !,,T2 U, LP LP 9H # Lj_4 # AX| : J @P 7 Lj : V DIT M ,0W8 @P P KB Xp V MTT 0P OH @ I 7 P& @P !,, J @P OH C C # : 7 : K @P T <h !NNP f J Dl ! J Q
0x01f5d8…01f76c Dummy {f00=0x00c0, f01=0x0190, f02=» T :h" P 0R U Q P <H9D_( : J YZ @P V J V J J K, J @P Lj9H @P Lj A M8 J V KBT bqP brP b6T b6 bA K @$ 1 K 20 K V KBP DIP U P P _ U` (
0x01f76c…01f900 Dummy {f00=0x00c0, f01=0x0190, f02=»P 0 0R Q ; W : # +0 !99U :d" *0 !99U :H : T TP Y T1 Y TN Y T2 Z G2 Y G1 Y D4 Y D5 Y MD Z CD Z TWP DUP FDT Y W Y W 7 V W 01 W W XP V AXj AXi V AXl AXk XZ
0x01f900…01fa94 (0, 40) Opaque[0x194]
0x01fa94…01fc28 # DirEnt {nam=»CSEG7 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0140, f03=0x0000}
0x01fa94…01fc28 IdxSect {
0x01fa94…01fc28 f00 = 0x000a // 0x1fa94 @0x0
0x01fa94…01fc28 f01 = 0x0002 // 0x1fa96 @0x2
0x01fa94…01fc28 gno = [ // 0x1fa98 @0x4
0x01fa94…01fc28 [0x00]: C0x000a.0x0.0
0x01fa94…01fc28 ]
0x01fa94…01fc28 }
0x01fc28…01fdbc Dummy {f00=0x000a, 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( _
0x01fdbc…01ff50 Dummy {f00=0x000a, 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 _>
0x01ff50…0200e4 Dummy {f00=0x000a, 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 h V l l , P p R W W W W W V
0x0200e4…020278 Dummy {f00=0x000a, f01=0x0190, f02=» K v R W0W _P_R_T @T R RW x 2( _pW 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
0x020278…02040c Dummy {f00=0x000a, f01=0x0190, f02=»CVEMIN+2 SECONDS ^ ~ 4 PCVEFIT EQU CVESEC+2 FIFTETHS OF SEC ^ & 2 PCVEBTB EQU CVEFIT+2 ALLOCATION TABLE ^ P* P* P* P* & P* FCT FILE CODE TABLE P* , PFCTFC EQU 0
0x02040c…0205a0 Dummy {f00=0x000a, f01=0x0190, f02=»F LFI ASSIGNED TO THE FILE CODE l P* ( P* 2 ( P* DCT DISK CONTROL TABLE < . PDCTLG EQU -14 ENTRY LENGTH h F PDCTEB0 EQU DCTLG+2 EVENT BYTE / LOGICAL DISK FILE CODE : PDCTEB1 EQU DCTEB0+2 BUFFER
0x0205a0…020734 (0, 41) Opaque[0x194]
0x020734…0208c8 # DirEnt {nam=»CSEG8 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0148, f03=0x0000}
0x020734…0208c8 IdxSect {
0x020734…0208c8 f00 = 0x000a // 0x20734 @0x0
0x020734…0208c8 f01 = 0x0004 // 0x20736 @0x2
0x020734…0208c8 gno = [ // 0x20738 @0x4
0x020734…0208c8 [0x00]: C0x000a.0x1.0
0x020734…0208c8 [0x01]: C0x000a.0x2.0
0x020734…0208c8 ]
0x020734…0208c8 }
0x0208c8…020a5c Dummy {f00=0x000a, f01=0x0190, f02=» @ 8 N FILE TYPE MISSING FILE TYPE ERROR D A 6 R W W W W W W l 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
0x020a5c…020bf0 Dummy {f00=0x000a, f01=0x0190, f02=» B &P$ V W W D W 8W _ 0 V P 8WB R W W W W W _> N W 0 V P 8 R @Wx 4 ' ! + @ R WhW W W R R WVW W W G K _. B $ V UFT F > &
0x020bf0…020d84 Dummy {f00=0x000a, f01=0x0190, f02=» RN V T. T T P: P4 P6 A R W W W W W8 W W W W + 8 V V < : @ 4 C 4 C 0 I D C C R C F ! C B
0x020d84…020f18 Dummy {f00=0x000a, f01=0x0190, f02=» X v A X A 8 T ( B B A ^ A ` A b F A l F A x F A F A F A F . A C N C T W < A 0
0x020f18…0210ac Dummy {f00=0x000a, f01=0x0190, f02=»RACK SEC/GRAN INTERLACE P W A 4 W ( @ R W W W W,W 8 W 2 V : _" V P@ , P8 P R V P T T~ P P + _^ _h _r D N " N UF W 0
0x0210ac…021240 Dummy {f00=0x000a, f01=0x0190, f02=» R W W W W WZ R T @ T W R _._0_2W WZ Z> R W W W W W@ R @ Q W 1 W ( R W W W W V W P Q W " R W W W WTW R D R W W W W ` W
0x021240…0213d4 (0, 42) Dummy {f00=0x000a, f01=0x0190, f02=» W _ _ SECTOR # W AGRANTBID 4 W 9 , PH , X Q: Y , Z H ]d V X 4 _ W , W ( R W W W W : W W
0x0213d4…021568 Dummy {f00=0x000a, f01=0x0190, f02=»,A12 v x PPRT375 EQU * w P RF PRER07 w ( P RF *+2 w H P RF *+2 w f P RF *+2 w PPRT376 EQU * w . P IM S:CUR,A13 NEXT LINE # w P LDKL A1,/20
0x021568…0216fc Dummy {f00=0x000a, f01=0x0190, f02=»PRT379 NOT NEGATIVE,THERE IS A LIMIT w ~ * P* NEGATIVE x 2 " P LD A1,S:CUR,A13 x ` P SUK.L A1,9999 x 0 P RB(5) PRT340 LESS OR EQUAL x B P LDK A1,0 GREATER THAN 9
0x0216fc…021890 Dummy {f00=0x000a, f01=0x0190, f02=»QU * x " P CW A1,S:CUR,A13 y L P RF(2) PRTEND LIN2 LESS THAN CUR ,THEN END,OTHEWISE,NEXT y 8 & P RB PRT340 LINE y P* y PART390 RF PRT390 y PART600 RF PRT600 y PART400 RF
0x021890…021a24 Dummy {f00=0x000a, f01=0x0190, f02=» A1,ECBRL,A10 y P LDR A8,A10 z P LDK.L A4,PRT382 z 8 B P ABI C:WREC,A12 WRITE THE 1ST PART OF THE RECORD z PPRT382 EQU * z P RF PRER07 z P RF *+2 z P RF
0x021a24…021bb8 Dummy {f00=0x000a, f01=0x0190, f02=» SUK A1,8 MAXLG-8 z L P ADS A1,ECBBF,A8 BEGINNING OF 2ND PART = BEG OF REC -8+MXLG { & " P LD A1,S:LNG,A13 { v P ADK A1,8 { B P SUS A1,ECBRL,A8 REQUEST LENGTH OF THE 2ND PART = { B P*
0x021bb8…021d4c Dummy {f00=0x000a, f01=0x0190, f02=» LDR A3,A2 BLANK OUT THE 1ST 8 CHARACTERS { P LDR A4,A2 | < P MS* 4,ECBBF,A8 | P* | P* | P LDK.L A4,PRT383 | P ABI C:WREC,A12 | PPRT383 EQU * | P RF
0x021d4c…021ee0 Dummy {f00=0x000a, f01=0x0190, f02=»NEXT LINE | r P* } P* } P* } & P* } 0 P* } : P* } D P* } N P* } X P EJECT } b P* } x P* } PPRT390 EQU * } P ADK A7,0 } 2 PPRT395 ABL(0) PRT360 INCORRECT LENGTH } 8 P SUK
0x021ee0…022074 (0, 43) Opaque[0x194]
0x022074…022208 # DirEnt {nam=»CSEG9 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0158, f03=0x0000}
0x022074…022208 IdxSect {
0x022074…022208 f00 = 0x000a // 0x22074 @0x0
0x022074…022208 f01 = 0x0002 // 0x22076 @0x2
0x022074…022208 gno = [ // 0x22078 @0x4
0x022074…022208 [0x00]: C0x000a.0x3.0
0x022074…022208 ]
0x022074…022208 }
0x022208…02239c Dummy {f00=0x000a, f01=0x0190, f02=» Z W R W W W W 8 V : _ W N R _ _"W W D W N W N W 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
0x02239c…022530 Dummy {f00=0x000a, f01=0x0190, f02=» W R &_ _ W W V 8! B V 9oP V 8 A V : W V < A 9a 4 48D 5 Z H W _t_vW W W W 4 V * +9A P X _ V V Q Q P A Y W _ Z _$ 4 A Z A ?A
0x022530…0226c4 Dummy {f00=0x000a, f01=0x0190, f02=» W W R _ _ W W R FW * R W @ * W 2 * 8 & W LM W 0 V P T _t IDENT PRNAME SEGMENTED PROGRAM.PLD COMMAND CANNOT BE USED WARNING:IDENT HAS BEEN PUNCHED ON OUTP
0x0226c4…022858 Dummy {f00=0x000a, f01=0x0190, f02=» 8 V : _ _$ _, _4 ( 8 R @W V : '( _& D5 LIBRARY R * | W V Yt R _ W _ _ N ! W N W W V W W W F R W W W W WH _ V V P T
0x022858…0229ec Dummy {f00=0x000a, f01=0x0190, f02=» R W W W W W WF W 4 V # W V TV * R W W W$W W$ W _$ 8WP " 8WB W ` ( v R *T2 W W B W _ W 2 V : V P W _ W R _ _ _ _ _ W V 4 V
0x0229ec…022b80 Dummy {f00=0x000a, f01=0x0190, f02=»_$ V : _ _$ _, _4 ( 8 R @W V : '( _& D5 LIBRARY R * | W V Yt R _ W _ _ N ! W N W W V W W W R W W W W W _ V V P T
0x022b80…022d14 (0, 44) Opaque[0x194]
0x022d14…022ea8 # DirEnt {nam=»CSEGA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0160, f03=0x0000}
0x022d14…022ea8 IdxSect {
0x022d14…022ea8 f00 = 0x000b // 0x22d14 @0x0
0x022d14…022ea8 f01 = 0x0002 // 0x22d16 @0x2
0x022d14…022ea8 gno = [ // 0x22d18 @0x4
0x022d14…022ea8 [0x00]: C0x000b.0x0.0
0x022d14…022ea8 ]
0x022d14…022ea8 }
0x022ea8…02303c Dummy {f00=0x000b, f01=0x0190, f02=» W W N R %& 8 V : W W LW W W W W W W p R W W W W W _ W W W W W " R W W W W _ _ V T T( P + ( _ _ 4
0x02303c…0231d0 Dummy {f00=0x000b, f01=0x0190, f02=»+ ( W F L A F A F A 2 0*********DD: ********* 0*****GENERAL CATALOGUE***** 0****USERIDNT****ADDRESS**** W W W W " R W W W W V PJ N ! 4 # X R W W W W 0 I V D x R W W W W
0x0231d0…023364 Dummy {f00=0x000b, f01=0x0190, f02=» V A $ _ '( _. < W W 0 R W W W W + b W % W R W W W W | W W _$W W W W 4 W *P W R W W W W V 6R 9BR PtQ ( V 8 V : R < W
0x023364…0234f8 Dummy {f00=0x000b, f01=0x0190, f02=»*****LIBRARY DIRECTORY********* 0****FILENAME****TYPE****ADDRESS**** 0****OBJECT MODULES****/OB 0 MODULE **USERIDNT****ADDRESS**** W W W W R W W W 0 A j A 4 W W N R W W W W R P* W _0
0x0234f8…02368c Dummy {f00=0x000b, f01=0x0190, f02=» j W W R W W W W A j A _ < Y Z < P2 Y < " Y Y W W R OB V 0 USERIDNT ADDR 0 FILENM TP ADDR V ! P : R W W W W O :11 W
0x02368c…023820 Dummy {f00=0x000b, f01=0x0190, f02=» TABLE Z < PCVEYAR EQU CVELFT+2 CURRENT YEAR, 2 ASCIL CHAR < PCVEMON EQU CVEYAR+2 CURRENT MONTH,2 ASCIL*CHAR N < PCVEDAY EQU CVEMON+2 CURRENT DAY, 2 ASCIL CHAR 4 PCVEHOR EQU CVEDAY+2 HOURS ] @ PCV
0x023820…0239b4 (0, 45) Opaque[0x194]
0x0239b4…023b48 # DirEnt {nam=»CSEGB «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0168, f03=0x0000}
0x0239b4…023b48 IdxSect {
0x0239b4…023b48 f00 = 0x000b // 0x239b4 @0x0
0x0239b4…023b48 f01 = 0x0002 // 0x239b6 @0x2
0x0239b4…023b48 gno = [ // 0x239b8 @0x4
0x0239b4…023b48 [0x00]: C0x000b.0x1.0
0x0239b4…023b48 ]
0x0239b4…023b48 }
0x023b48…023cdc Dummy {f00=0x000b, f01=0x0190, f02=» 6 < r p W V TY 0 W W A B R W8W6W4W W2 V U. P* R R" V V W r R W W~W W W W W W V V P W W P P D P R W W W W V 0 V! R @ : : V R P0 T V
0x023cdc…023e70 Dummy {f00=0x000b, f01=0x0190, f02=» V W R W W W W N W _~ | R W W W W WZ V V P T T P P W A W W V R T R W W:W W D W D B V V Ph W A UF
0x023e70…024004 Dummy {f00=0x000b, f01=0x0190, f02=» 8 V : + W W N R WnW W WtWz V /OTh V B T^ W x R WDWpWnWl N " N /O BJ CT OB V R4 V P$ W ~ 8 : _ _ _ _( _0 "
0x024004…024198 Dummy {f00=0x000b, f01=0x0190, f02=» V Z V X W 4 V - N ! V # R _ W W R 4_ V P$ DEL OBDIR j n W | W < : W N " N /OBJCTOB W 0 V P4 P 8 L R 0W : OBJECT LIBRARY W
0x024198…02432c Dummy {f00=0x000b, f01=0x0190, f02=» R _D W C _ C _t W 6 R _hW W V T C $ R _ W _6 W _< : B V T C L R _* W C _ C f R _DW W W C C _$ DEL /OB W j n W | W < : N N R WbW W^W W LM 5 _" Pv '
0x02432c…0244c0 Dummy {f00=0x000b, f01=0x0190, f02=» : _2 _8 z R W WVW W , P P N O T O N V R V O P ( - Y ( | N N LM N O F T" V | ' O F P, . R W$W"W W _ O _ O _ W W W P ` 8 :
0x0244c0…024654 (0, 46) Opaque[0x194]
0x024654…0247e8 # DirEnt {nam=»CSEGC «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0170, f03=0x0000}
0x024654…0247e8 IdxSect {
0x024654…0247e8 f00 = 0x000b // 0x24654 @0x0
0x024654…0247e8 f01 = 0x0002 // 0x24656 @0x2
0x024654…0247e8 gno = [ // 0x24658 @0x4
0x024654…0247e8 [0x00]: C0x000b.0x2.0
0x024654…0247e8 ]
0x024654…0247e8 }
0x0247e8…02497c Dummy {f00=0x000b, f01=0x0190, f02=» H V @ A A A A N R P 8 V V : N R W W W W ~ V V P T T P _` A F T 9C9nP 9aP F F " A R W W W W W V V P T T P P _ A ! P
0x02497c…024b10 Dummy {f00=0x000b, f01=0x0190, f02=» R , _ , _ , , _* _._ _ _ _ R _ W W W T R _4W W W T & * Q * & + Y P8R. @ A ( A . 8@ 8` K (@ + Y @ K @ @ R _ W W W > V 4 P C Y
0x024b10…024ca4 Dummy {f00=0x000b, f01=0x0190, f02=» + FIRST SECOND TYPE BUG W DEB A Z R W W W W , P P T W( V | LM N N F P W R W~W|WzWx D DEB LM 0 V P PZ 8 L R @ N W 0
0x024ca4…024e38 Dummy {f00=0x000b, f01=0x0190, f02=»W # v R _:W W W C _r B " W 2 , N O O T V O O ( " ! " PROCESSOR SYSTEM USER Y P R @ A A 8@ 8` K (@ + Y @ K @ @ R _ W W W > V 4 P C Y
0x024e38…024fcc Dummy {f00=0x000b, f01=0x0190, f02=» , ( V W R _ _^W _V UFW V , ( ! /O /ST SCW /L 4 , ( A LM W N " N d , ( a V Z V X W , ( 4 V - N ! V # , ( R _
0x024fcc…025160 Dummy {f00=0x000b, f01=0x0190, f02=» N /OBJCTOB W 0 V , ( ! P 8 $ , ( A R 0W : OBJECT LIBRARY W T , ( a 4 # , ( R W W W W W C _ W W , ( ( R *
0x025160…0252f4 (0, 47) Opaque[0x194]
0x0252f4…025488 # DirEnt {nam=»CSEGD «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0178, f03=0x0000}
0x0252f4…025488 IdxSect {
0x0252f4…025488 f00 = 0x000b // 0x252f4 @0x0
0x0252f4…025488 f01 = 0x0002 // 0x252f6 @0x2
0x0252f4…025488 gno = [ // 0x252f8 @0x4
0x0252f4…025488 [0x00]: C0x000b.0x3.0
0x0252f4…025488 ]
0x0252f4…025488 }
0x025488…02561c Dummy {f00=0x000b, f01=0x0190, f02=» " ~ z F L T X ` j t n W . R W W W|Wz W V W J R WhWfWdW Wx V V P T T PL PDWR W R W0W.W,W* F P W W0 W W W W W W W $ P 8 V : W V V # R
0x02561c…0257b0 Dummy {f00=0x000b, f01=0x0190, f02=» ' + R _ W W2W W. V OBT$ G F >P _2 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 b R _. C C R
0x0257b0…025944 Dummy {f00=0x000b, f01=0x0190, f02=» B V M R _ R 4_ V T. ON V W J R 4W 4 8 V C h R _R_ _ _ V * V K K K T R _ _ K V R$ R _ C B $ X _L =_R
0x025944…025ad8 Dummy {f00=0x000b, f01=0x0190, f02=»W W _ _ W W 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 j 8 : j P V V PlRv
0x025ad8…025c6c Dummy {f00=0x000b, f01=0x0190, f02=» _4 : ( R _ W _ W> B C C c # $ R W W W W V # ( : NO LABEL W j j ` R : : : : : R W W W W < V W , T : V P ( ( ) Y
0x025c6c…025e00 Dummy {f00=0x000b, f01=0x0190, f02=» ^ R _ h R _$W W _ ' R W ) Y 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
0x025e00…025f94 (0, 48) Opaque[0x194]
0x025f94…026128 # DirEnt {nam=»CSEGE «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0180, f03=0x0000}
0x025f94…026128 IdxSect {
0x025f94…026128 f00 = 0x000c // 0x25f94 @0x0
0x025f94…026128 f01 = 0x000a // 0x25f96 @0x2
0x025f94…026128 gno = [ // 0x25f98 @0x4
0x025f94…026128 [0x00]: C0x000c.0x0.0
0x025f94…026128 [0x01]: C0x000c.0x1.0
0x025f94…026128 [0x02]: C0x000c.0x2.0
0x025f94…026128 [0x03]: C0x000c.0x3.0
0x025f94…026128 [0x04]: C0x000d.0x0.0
0x025f94…026128 ]
0x025f94…026128 }
0x026128…0262bc Dummy {f00=0x000c, f01=0x0190, f02=» #3` ' .z R W W W W W 8 t _ V V _$ , T _8 t A R W W W W _F _X V , X6 4 MT A R W W W W WD _ V CK V A R W W W W W 0 _ A @
0x0262bc…026450 Dummy {f00=0x000c, f01=0x0190, f02=» * A2 H . A2 H 2 A2 F ! P8 "# # C C ( B @ A3Z VW( @3 t Q W A & A * A 6_4 A 6 A . A A ( B ( B @ P( A ( ( ( B A
0x026450…0265e4 Dummy {f00=0x000c, f01=0x0190, f02=» T P A : P P + W W 0 N A A N C A A W T A L A _ W R _* W. @ T B @ L @ R X4 B L_@ T( &Q L M _ A A B @ C @
0x0265e4…026778 Dummy {f00=0x000c, f01=0x0190, f02=» W A @ T @ C T W A W0 @ P< B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( f ( A p 6
0x026778…02690c Dummy {f00=0x000c, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x02690c…026aa0 Dummy {f00=0x000c, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( ( A 6
0x026aa0…026c34 (0, 49) Dummy {f00=0x000c, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x026c34…026dc8 Dummy {f00=0x000c, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( ( A 6
0x026dc8…026f5c Dummy {f00=0x000c, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x026f5c…0270f0 Dummy {f00=0x000c, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( ( A 6
0x0270f0…027284 Dummy {f00=0x000c, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x027284…027418 Dummy {f00=0x000c, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( ( A 6
0x027418…0275ac Dummy {f00=0x000c, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x0275ac…027740 Dummy {f00=0x000c, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( ( A 6
0x027740…0278d4 (0, 50) Dummy {f00=0x000c, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x0278d4…027a68 Dummy {f00=0x000c, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( ( A 6
0x027a68…027bfc Dummy {f00=0x000c, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x027bfc…027d90 Dummy {f00=0x000c, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( ( A 6
0x027d90…027f24 Dummy {f00=0x000c, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x027f24…0280b8 Dummy {f00=0x000c, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( ( A 6
0x0280b8…02824c Dummy {f00=0x000c, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x02824c…0283e0 Dummy {f00=0x000c, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( ( A 6
0x0283e0…028574 (0, 51) Dummy {f00=0x000c, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x028574…028708 Dummy {f00=0x000c, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( ( A 6
0x028708…02889c Dummy {f00=0x000c, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x02889c…028a30 Dummy {f00=0x000c, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( ( A 6
0x028a30…028bc4 Dummy {f00=0x000c, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x028bc4…028d58 Dummy {f00=0x000c, f01=0x0190, f02=» W A N " N M:PROCUF W 0 V T W 4 P ) Y : ( R @W j W | H W (" . _ 4 P ' (D R W W W WxW P W 4 4 P _ V ~T j ( R * ) ' ( R W W W W$W P W END 4
0x028d58…028eec Dummy {f00=0x000c, f01=0x0190, f02=»)` 8W W 2 W 2 O : 8_ )l 8_. PROCEDURE IN PROCEDURE DEFINITION z ) W r ) . W V ~R ) - W Wx ) * W| V x =Td ) . WZ V ~ QP ) * WT 5 V x ,X` T0WV V ~ P ~ V r ( P 5
0x028eec…029080 Dummy {f00=0x000c, f01=0x0190, f02=» W v H % Y j P ) Y j # * R W W W WlW P W 4 H ( * R FWj_ )( )l ~ h J ( I +6 R W2_ _ _ ~ 8 *| + 8 )( END MISSING 8 )( + ~ H j 4 ( % Y _
0x029080…029214 (0, 52) Dummy {f00=0x000d, f01=0x0190, f02=» + , - W 4 4 ,0 . _ Y V x ,D R WJW6 =P _ ,X R W ,b R W,W ,n R W ,x R W W _ , . W + +x T" , . W + ! + _* W , R W , . W _ ( , R W _ _ _ *| +j V x =P - R W W8_ - R W - R
0x029214…0293a8 Dummy {f00=0x000d, f01=0x0190, f02=» 2 , U O O : W p z ~ 4 T V p $T - R *P - - _2 - V p 4 P : V t V vP % W t W p W ~ W .< R W$ .F R W&W$ =P W ~ V ~Z( 5 _. V ~Q V p W x V p , P P P V
0x0293a8…02953c Dummy {f00=0x000d, f01=0x0190, f02=» T W P HWr A A ! 9A A A @ ( t <W: & @ Q .X T @ x A P _ N ?a A A A N A N ! A " A @ P A @ @ Z O W O O T _ N T: @
0x02953c…0296d0 Dummy {f00=0x000d, f01=0x0190, f02=» @ 87P P D b 8 :EOVP ZLW$ $ A v A _r P W R W N t N T T @ NOT ( Jp T q r 9D 9B W 9E A A _r p <A B Y A
0x0296d0…029864 Dummy {f00=0x000d, f01=0x0190, f02=»ADDRESS : DISK I/O ERROR MAG TAPE I/O ERROR END OF RESTORING UNKNOWN ADDRESS COPIED DISK VOLUME LABEL : A P _ N ?a A A A N A N ! A " A @ DATE OF COPY : 01 01 78 WRITING THE VOLUME LABEL ? . CO
0x029864…0299f8 Dummy {f00=0x000d, f01=0x0190, f02=» X : P***DAY EQU 32 CURRENT DAY, 2 ASCII CHAR 2 P***HOR EQU 34 HOURS, ^ F @ P***MIN EQU 36 MINUTES ^ BINARY VALUES | 2 P***SEC EQU 38 SECONDS ^ 2 P***FIT EQU
0x0299f8…029b8c Dummy {f00=0x000d, f01=0x0190, f02=» | P***DMP EQU 48 * PCVEDP EQU 50 DADCT-POOL $ P EJECT R P* h * P* CCI WORK AREA EQUIVALENCES r P* P* ROOT WORK AREA P* P* NOTE '**'='W:' L P**DFRE EQU 0
0x029b8c…029d20 Dummy {f00=0x000d, f01=0x0190, f02=» J P**SFRE EQU 2 ABSOLUTE SECTOR ADDR OF THE SECTOR WHERE F P* THE 1ST FREE ENTRY OF CAT OR DIR IS R 6 PW:DEC1 EQU 4 DISK ECB1 , 6 WORDS 6 P**DEC2 EQU W:DEC1+12 DISK ECB2 , 6 WORDS
0x029d20…029eb4 (0, 53) Opaque[0x194]
0x029eb4…02a048 # DirEnt {nam=»PRDUMP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01a8, f03=0x0000}
0x029eb4…02a048 IdxSect {
0x029eb4…02a048 f00 = 0x000d // 0x29eb4 @0x0
0x029eb4…02a048 f01 = 0x0006 // 0x29eb6 @0x2
0x029eb4…02a048 gno = [ // 0x29eb8 @0x4
0x029eb4…02a048 [0x00]: C0x000d.0x1.0
0x029eb4…02a048 [0x01]: C0x000d.0x2.0
0x029eb4…02a048 [0x02]: C0x000d.0x3.0
0x029eb4…02a048 ]
0x029eb4…02a048 }
0x02a048…02a1dc Dummy {f00=0x000d, f01=0x0190, f02=» f 8 & , @ , NOPZ YE , @ . S 6 A 8 & , @ , NOP YE , @ . S P _8 A A : 8 & , @ , NOT@ A A A A @ T A @ P A A Wx YE l @ . S v A
0x02a1dc…02a370 Dummy {f00=0x000d, f01=0x0190, f02=» : B N @ 1 !-- X @ T @ , @ 2 !00 l !00 r @ P @ , @ 2 !00X !00X @ , `_ S @ -9H @ . @ /:H @ 0 _ S @ 2 `_ S @ 39H @ 4 @ 5:H @ 6 _ S R R ( R R HW 8 @ A 8 & , @ , YET @ . S P
0x02a370…02a504 Dummy {f00=0x000d, f01=0x0190, f02=» , @ , YE : @ . S D p A G T :R Q Z [ Z [ : R W U Z [ : A L 0R 4V 0 Z [ : A A L 0R, :R AR GV 0 P 9D_. Z [ :
0x02a504…02a698 Dummy {f00=0x000d, f01=0x0190, f02=»11.23 12NC=8701 359 40240 # SELECTION OF MEMORY DUMP AREAS ? MEMORY DUMP AREA : 0NO MORE DUMP AREAS MORE AREAS WANTED ? 2 SIDES ? SIDE1 (0-63K) ? INSERTED SIDE2 ? @ UZ @ FLP @ C ( A @ T A A
0x02a698…02a82c Dummy {f00=0x000d, f01=0x0190, f02=» : @ T` B @ FLT P W V A ( @ C @ FLP ( @ A @ T A A ( : A @ FLP ( B V @ @ : @ A @ FLP ( : ( @ TKP FL :
0x02a82c…02a9c0 Dummy {f00=0x000d, f01=0x0190, f02=»11.23 12NC=8701 359 40240 # SELECTION OF MEMORY DUMP AREAS ? MEMORY DUMP AREA : 0NO MORE DUMP AREAS MORE AREAS WANTED ? 2 SIDES ? SIDE1 INSERTED SIDE2 ? @ U @ FLP @ C ( A @ T A A
0x02a9c0…02ab54 (0, 54) Dummy {f00=0x000d, f01=0x0190, f02=» : @ T B @ FLT P W V A MASKFLL BUFF1 INLOOP 4 INLAST SECTOR NILOC1 n CTEST1 INEOF yOK1 NILOC2U INRTN LASTBU EOFCND GETRTNU X CTEST2 WAITF ERR2 NILOC3 T REWRTN ECB1 REVRTN D
0x02ab54…02ace8 Dummy {f00=0x000d, f01=0x0190, f02=» Y : @ 8 4 Q $ 6 ^ 8 D E ^ @ TKT " ^ @ 4 & Y :? 2 8 p 0 5 0 P R D U M P REL 2.4 5
0x02ace8…02ae7c Dummy {f00=0x000d, f01=0x0190, f02=» 0 DATE OF PRINTING: : : 0 0 TIME: : : C A S E T T E EDITDT 8 EDLOOP : DATFLD SLASK CVALOP f TIMFLD DAYLOP TITWRT NEWMOV TXTCAS " CASFLX TITECB TITLNO TITTAB T
0x02ae7c…02b010 Dummy {f00=0x000d, f01=0x0190, f02=» N( : ( : Z P 1 F L E X I B L E - DISC DUMP PRINTOUT PAGE: C A S E T T E ADDPAG " NEWMOV@ TXTCAS PAGTXTC Z PAGENO L PNOFLDN PAGECB N SPAECB PRTR SPATXT` ; ;
0x02b010…02b1a4 Dummy {f00=0x000d, f01=0x0190, f02=» D - Z Z Z Z Z Z :- 0123456789 d ' A $ A & @ A 4 & ( & ! T @ & : 4 & ( & @ $ A $ A & @ FLP 1 ( R ( & @ $& T j @ & 6 4 - Z ( &
0x02b1a4…02b338 Dummy {f00=0x000d, f01=0x0190, f02=» 0END OF PRDUMP 0FINIS. ( 0THERE WAS BLOCKS/SECTORS IN DUMP. 0XX ERROR STATUS WORD: G " 0 0INPUT-DEVICE MUST BE CASSETTE OR FLEXIBLE-DISC D 0REQUESTED MEMORY DUMP AREA NOT PRESENT ON CAS
0x02b338…02b4cc Dummy {f00=0x000d, f01=0x0190, f02=» A D A @ @ ( @ @ HW" @ T @ A A _< @ A 6 @ A 8 @ 6 @ ( @ 8 @ HW * @ A A @ FLT T T W R T T @ A @ @ 6 ( @ @ 8 HW @ 8 T A 6 A 8_p @ A
0x02b4cc…02b660 Dummy {f00=0x000d, f01=0x0190, f02=» A @ @ @ T A @ P @ T @ 6 A @ 8 A @ T @ @ P ^ P ~ @ @ T 0XX ERROR STATUS WORD: G " 0 0INPUT-DEVICE MUST BE CASSETTE OR FLEXIBLE-DISC D 0REQUESTED MASKF12 MASKF
0x02b660…02b7f4 (0, 55) Dummy {f00=0x000d, f01=0x0190, f02=»2P EXITO LOOPT , CASTST LyERR $yEOF 4 DMP25 ^ DMP3P RET3 RET6T DLLOOP JMP2T RET4P OFLOP1 JMP1V RET5T NUMEOFU EOF1@ N OFLTST l OFLOP22 t 9 $ P Y :0123456789ABCDEF @ 6! P @ 8 : T A 6 A 8 ( :
0x02b7f4…02b988 Dummy {f00=0x000d, f01=0x0190, f02=» XLOOP < HEXDIG P LINEI NILOC WXLOOP WXL001 WALOOPN WADOT WASCR LINECB PRTFC WORD: G " 0 0INPUT-DEVICE MUST BE CASSETTE OR FLEXIBLE-DISC D 0REQUESTED MASKF12 MASKF
0x02b988…02bb1c Dummy {f00=0x000d, f01=0x2008, f02=» A 3,DMPIPL,80,0,0,0 ECB2 DATA 3,DUMP,DUMPL,0,0,0 $ H END START P@ bL A8,ECB1 b LKM x DATA 1 LDK A7,/85 LKM DATA 1 LDKL A8,ECB2 LKM DATA 1
0x02bb1c…02bcb0 Dummy {f00=0x000d, f01=0x0190, f02=»RD INTERPRETED X l 6 P ADK A6,2 AS CONTROL CHARACTER Y 2 P ST A5,2,A8 MESSAGE ADDRESS Y P 0 P ST A6,4,A8 MESSAGE LENGTH Y 6 P LDK A7,/86 WAIT STANDARD WRITE Y P LKM Y P
0x02bcb0…02be44 Dummy {f00=0x000d, f01=0x0190, f02=» FILE CODE *PTS Y P STR A1,A8 INTO ECB *PTS Z P LKM *PTS Z 8 * P DATA 1 STANDARD WRITE WITH WAIT *PTS Z J P* Z x 2 P ABL PK100 GO ASK QUESTIONS Z P EJECT Z P* Z P* HIGHER DAD NUMBER Z P* Z PPK90
0x02be44…02bfd8 Dummy {f00=0x000d, f01=0x0190, f02=»DK A3,0 CYLINDER NUMBER Z P CF A14,SEEK15 [ , P LDKL A9,PK905 [ P P ABL SEKSST [ r PPK905 EQU * [ . P LDK A4,0 HEAD NUMBER [ @ P LD A5,VTC,A12 PHYSICAL S
0x02bfd8…02c16c Dummy {f00=0x000d, f01=0x0190, f02=»LNG,A12 [ z P CF A14,READ15 0 P LDKL A9,PK910 RETURN ADDRESS 4 . P ABL RDSST CHECK STATUS h , PPK908 ABL PKERB BAD TRACK PPK910 RB PK908 P RB PK908
0x02c16c…02c300 Dummy {f00=0x000d, f01=0x0190, f02=» LDK A1,16 LENGTH ONE DAD ENTRY = 16 B P ADS A1,DBUF2+VTONUC,A12 NEW '# USED CHARACTERS' ] @ P ADR A11,A12 ] : P ADKL A11,DBUF2 POINT TO DAD ENTRY VDA ] . P ML 3,DDDNAM,A12 D
0x02c300…02c494 (0, 56) Opaque[0x194]
0x02c494…02c628 # DirEnt {nam=»DMPGEF«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01c0, f03=0x0000}
0x02c494…02c628 IdxSect {
0x02c494…02c628 f00 = 0x000e // 0x2c494 @0x0
0x02c494…02c628 f01 = 0x0002 // 0x2c496 @0x2
0x02c494…02c628 gno = [ // 0x2c498 @0x4
0x02c494…02c628 [0x00]: C0x000e.0x0.0
0x02c494…02c628 ]
0x02c494…02c628 }
0x02c628…02c7bc Dummy {f00=0x000e, f01=0x0190, f02=» @ t ( @ P@ 4 t 4 ( t x t x ( t( $ C C ( : 9 $ Y :0123456789ABCDEF> # F $ 4` 1F ^-8 T t tB bbTg t z ^ ^ bHPH H ^2 Z ` z
0x02c7bc…02c950 Dummy {f00=0x000e, f01=0x0190, f02=» STATUS WORD: D d 2Z $"z y B % y D Dbb d & B 6P yB W [~ ? d f% L "~ T &b ECn 1 d @ < ~ UU ' &P _ A. | A I. L A 9 Z F. " :D # P" z = x =
0x02c950…02cae4 Dummy {f00=0x000e, f01=0x0190, f02=» :L W A 8B Tt A L : @ @ V @ W @ P@ A @ @ UU @ T$ P A x _ W _ L ~
0x02cae4…02cc78 Dummy {f00=0x000e, f01=0x0190, f02=»TE OLD DRIVE-ADDRESS ( P ORRS A2,A7 INSERT NEW DRIVE-ADDRESS B P LDKL A7,CIOSTA-DUMPFD+/80 GET ADDRESS OF CIOSTART-INSTRUCTION H ( P ANRS A8,A7 DELETE OLD DRIVE-ADDRESS ( P ORRS A2,A7 INSERT NEW DRIVE-ADDRESS 8 P RF DUMP26 A7 NOW CONTAINS SUBROUT
0x02cc78…02ce0c Dummy {f00=0x000e, f01=0x0190, f02=»ONS. h P* PDUMP25 EQU * B P LDKL A7,CIOMUX-DUMPFD+/80 GET ADDRESS OF CIOSTART-INSTRUCTION * ( P ANRS A8,A7 DELETE OLD DRIVE-ADDRESS p ( P ORRS A2,A7 INSERT NEW DRIVE-ADDRESS > P LDKL A7,SSTOKM-DUMPFD+/80 GET ADDRESS OF SST-INSTRUCTION (
0x02ce0c…02cfa0 Dummy {f00=0x000e, f01=0x0190, f02=»INSTRUCTION b ( P ANRS A8,A7 DELETE OLD DRIVE-ADDRESS ( P ORRS A2,A7 INSERT NEW DRIVE-ADDRESS @ : P LDKL A7,IOMUX-DUMPFD+/80 GET SUBROUTINE START ADDRESS l 6 P LDKL A2,/C100 MUX-PARAMETER FOR WRITING 256 WORDS P EJECT PDUMP26 LDR A10,A10
0x02cfa0…02d134 (0, 57) Opaque[0x194]
0x02d134…02d2c8 # DirEnt {nam=»XRF «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01c8, f03=0x0000}
0x02d134…02d2c8 IdxSect {
0x02d134…02d2c8 f00 = 0x000e // 0x2d134 @0x0
0x02d134…02d2c8 f01 = 0x0002 // 0x2d136 @0x2
0x02d134…02d2c8 gno = [ // 0x2d138 @0x4
0x02d134…02d2c8 [0x00]: C0x000e.0x1.0
0x02d134…02d2c8 ]
0x02d134…02d2c8 }
0x02d2c8…02d45c Dummy {f00=0x000e, 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
0x02d45c…02d5f0 Dummy {f00=0x000e, 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 !'
0x02d5f0…02d784 Dummy {f00=0x000e, 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
0x02d784…02d918 Dummy {f00=0x000e, 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
0x02d918…02daac Dummy {f00=0x000e, 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
0x02daac…02dc40 Dummy {f00=0x000e, 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 ! _
0x02dc40…02ddd4 (0, 58) Opaque[0x194]
0x02ddd4…02df68 # DirEnt {nam=»DMPGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01d0, f03=0x0000}
0x02ddd4…02df68 IdxSect {
0x02ddd4…02df68 f00 = 0x000e // 0x2ddd4 @0x0
0x02ddd4…02df68 f01 = 0x0002 // 0x2ddd6 @0x2
0x02ddd4…02df68 gno = [ // 0x2ddd8 @0x4
0x02ddd4…02df68 [0x00]: C0x000e.0x2.0
0x02ddd4…02df68 ]
0x02ddd4…02df68 }
0x02df68…02e0fc Dummy {f00=0x000e, f01=0x0190, f02=» b | d( d ( d ( d p( d ( d( d ( ( B T `T : | | p( ( $ C C ( : 9 $ Y :0123456789ABCDEF` z
0x02e0fc…02e290 Dummy {f00=0x000e, f01=0x0190, f02=» 0TK ERROR 6 0DMPGEN REL 3.4 DATE 79.11.23 12NC=8701 361 40340 STATUS WORD: T A. A I. 9h! X F.! TR A P 8B T A K T ; V ^0W| T _p @ T W W @ V @
0x02e290…02e424 Dummy {f00=0x000e, f01=0x0190, f02=» ^< 2 ( ( ( ( ( ( ( ( B T UU ' &P _ W8 ( ( $ C C ( : 9 A I T 9 I 0123456789ABCDEF` z
0x02e424…02e5b8 Dummy {f00=0x000e, f01=0x0190, f02=».11.23 12NC=8701 364 40250 DISK TYPE : V COMPLETE PREMARK: W DISC FILE CODE : DISC NOT OPERABLE VOLUME LABEL MISSING OR UNREADABLE OK ? ( C ( b @ P !VVT A W !WW A C C ( C % C
0x02e5b8…02e74c Dummy {f00=0x000e, f01=0x0190, f02=» F A F C C ( C % E C ( @ NOT d YE Z d S * C C ( C C ( @ 2 b AB 68 D B D 75T d 1215W
0x02e74c…02e8e0 Dummy {f00=0x000e, f01=0x0190, f02=».11.23 12NC=8701 364 40250 DISK TYPE : V COMPLETE PREMARK: W DISC FILE CODE : DISC NOT OPERABLE VOLUME LABEL MISSING OR UNREADABLE OK ? ( C ( b @ P !VVT A W !WW A C C ( C % C
0x02e8e0…02ea74 (0, 59) Opaque[0x194]
0x02ea74…02ec08 # DirEnt {nam=»CPLGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01d8, f03=0x0000}
0x02ea74…02ec08 IdxSect {
0x02ea74…02ec08 f00 = 0x000e // 0x2ea74 @0x0
0x02ea74…02ec08 f01 = 0x0002 // 0x2ea76 @0x2
0x02ea74…02ec08 gno = [ // 0x2ea78 @0x4
0x02ea74…02ec08 [0x00]: C0x000e.0x3.0
0x02ea74…02ec08 ]
0x02ea74…02ec08 }
0x02ec08…02ed9c Dummy {f00=0x000e, f01=0x0190, f02=» L f N( N ( N Z( N ( N( B T `T : ~ f ~ r f r Z( ( $ C C ( : 9 $ Y :0123456789ABCDEF : Y G :) Z <`] n bZ
0x02ed9c…02ef30 Dummy {f00=0x000e, f01=0x0190, f02=» 0TK ERROR 4 0CPLGEN REL 1.3 DATE 79.04.10 12NC=8701 363 40130 STATUS WORD: [~ A P UU x ' &P _ B A. y R:R: ` B :% ;d# A I T P^ 1 I T: P 0V W XB X"9A_
0x02ef30…02f0c4 Dummy {f00=0x000e, f01=0x0190, f02=»WRITE CPLI (CASSETTE-IPL TO BE LOADED BY BOOTSTRAP). @ P* OBS: OLD BOOTSTRAP-VERSION IS DEMANDING IPL-CASSETTEBLOCK < J P* WITH THE LENGTH EXACTLY 80 CHARACTERS (= IPL-LENGHT USED HERE) P* ( P LDK A7,/85 BASIC WRITE ON CASSETTE P LKM
0x02f0c4…02f258 Dummy {f00=0x000e, f01=0x018e, f02=»MBER CHARACTER, AS LAST CHARACTER, | @ P* INTO CASSETTE-BUFFER USED FOR WRITING CPLS ONTO CASSETTE. * P* n 0 P LDK A7,/89 INSERT SEQUENCE NUMBER CHARACTER x & P LDKL A8,ECBS INTO CASSETTE-BLOCK P LKM P DATA 1 P 8 P CF A14,STATUS
0x02f258…02f3ec Dummy {f00=0x000e, f01=0x0190, f02=» P DATA 1 P 8 P CF A14,STATUS TEST STATUS. IF ERROR EXIT TO MONITOR P P* EXIT TO MONITOR d P* ~ P LKM P DATA 3 P EJECT P* P* CHECK CASSETTE STATUS P* PSTATUS EQU * $ P LD A2,8,A8
0x02f3ec…02f580 Dummy {f00=0x000e, f01=0x018e, f02=»YES " P LDR A2,A1 GET CASSETTE STATUS 0 P ANKL A2,SWMASK SOFTWARE STATUS 'NO DATA' ? 2 P* OR 'EOT' OR 'BOT' f P RF(NZ) ERROR YES. ERROR P RTN A14 RETURN P* D P* DISPLAY THE BINARY STATUS WORD AS HEXADECIMAL ASCII-CHARACTERS
0x02f580…02f714 (0, 60) Opaque[0x194]
0x02f714…02f8a8 # DirEnt {nam=»LKE «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01e0, f03=0x0000}
0x02f714…02f8a8 IdxSect {
0x02f714…02f8a8 f00 = 0x000f // 0x2f714 @0x0
0x02f714…02f8a8 f01 = 0x0006 // 0x2f716 @0x2
0x02f714…02f8a8 gno = [ // 0x2f718 @0x4
0x02f714…02f8a8 [0x00]: C0x000f.0x0.0
0x02f714…02f8a8 [0x01]: C0x000f.0x1.0
0x02f714…02f8a8 [0x02]: C0x000f.0x2.0
0x02f714…02f8a8 ]
0x02f714…02f8a8 }
0x02f8a8…02fa3c Dummy {f00=0x000f, f01=0x0190, f02=» p ^~ @ s> d 2Z $"z yd M P yz $ D ^ O " R>x2 +u K w [ ? d +b% L M "~ T &b ACn 1 d < ~R:R:L `{ ^ Z% ^ Dd z `,d x : t ` ^ D `H P D >~ m `" f >~ $ d p 4d @ X
0x02fa3c…02fbd0 Dummy {f00=0x000f, f01=0x0190, f02=» b z $ ^a : b 9 z i $ w z4r{ > tV u 3 qC zuq $ % > P ZD m c r zuq Z %C7 h > @Bh $/} F 4` 1 ` O PZ-8 T0 Hp tB / ^Tg t z ^ Z D D H Z2 Z } n zP bd ` z R:4d d z$(Rd0 Gt
0x02fbd0…02fd64 Dummy {f00=0x000f, f01=0x0190, f02=» z $ 4c ^~ @ s> d 2Z $"z yd M P yz $ D ^ O " R>x2 +u K w [ ? d +b% L M "~ T &b ACn 1 d < ~R:R:L `{ ^ Z% ^ Dd z `,d x : t ` ^ D `H P D >~ m `" f >~ $ d p 4d @ X
0x02fd64…02fef8 Dummy {f00=0x000f, f01=0x0190, f02=» b z $ ^a : b 9 z i $ w z4r{ > tV u 3 qC zuq $ % > P ZD m c r zuq Z %C7 h > @Bh $/} F 4` 1 ` O PZ-8 T0 Hp tB / ^Tg t z ^ Z D D H Z2 Z } n zP bd ` z R:4d d z$(Rd0 Gt
0x02fef8…03008c Dummy {f00=0x000f, f01=0x0190, f02=» z $ 4c ^~ @ s> d 2Z $"z yd M P yz $ D ^ O " R>x2 +u K w R? d L PT Cn < ~R:R: ` ^ Z% ^ Dd z `,d x : t ` D `H D >~ m `" f >~ $ d p 4d @ X
0x03008c…030220 Dummy {f00=0x000f, f01=0x0190, f02=»DEF.INV.LGH.ABS.STR.TBL.OVL.INV.IDT.END.MIS.UNS.EXT.ERR.LKE.BLK.COM.NO STRT.PRG.OVL IDT.MIS.INV.STR.ERR.NOD. 9 R : ) Y : @ Pt %T _ . $ 5T` PX Y %T PJ_ $ 5 R8 P2 % @P 5 _ P %X = = $ 5 P :
0x030220…0303b4 (0, 61) Dummy {f00=0x000f, f01=0x0190, f02=» A _" @ |R0 @ @ P& T < _ (;CZ A | A : @ |P. @ $" % A 6 L 5 @ P _* : @ |Pb @ < < @ A < < V @ A R0 A A N A L @ N @ L @ = > A @ @ : = > < @ $ A $" P $"
0x0303b4…030548 Dummy {f00=0x000f, f01=0x0190, f02=» @ @ = @ B : @ |P @ @ PR $" % (% P A 0 K.COM.NO (% P A ( T.MIS.IN $) ) ,! P @ 1 _X : @ |Pn @ @ Pd $" * % (% T A ( T` ( =e T ( T , 0Q W ,& T 1 0Q _ A 0 , _ : A x @ |Pj ` P P`
0x030548…0306dc Dummy {f00=0x000f, f01=0x0190, f02=»T @ ( _ @ A T @ T ( @ A @ A @ A : H % : R 1( A R A Z A b A : $;e (<e P : 4 9P : Y : $;e (<e 4 9P Q : P Y : Y : @ ?a @ =a UL?A $=KR W6 <
0x0306dc…030870 Dummy {f00=0x000f, f01=0x0190, f02=» 1 0 A _4 A r : A @ A A @ @ P 89D A 9A A < A @ P 8:GR _6 A @ A A T A V 8 A A A A N_ A A @ A A : W W W W W W
0x030870…030a04 Dummy {f00=0x000f, f01=0x0190, f02=» @ @ @ : W A A @ @ :a Q. @ @ @ :b Q A @ _8 @ P @ A : @ A : @ @ 9a @ :a Q2 A > A @ @ @ 9b Q @ @ A @ @ >_$ @ @ A : @ x ` A x @ A
0x030a04…030b98 Dummy {f00=0x000f, f01=0x0190, f02=» A r : A < A F A D A N A A A R A R % 1 a PTSLKF (790507) A 4 V A A I ^ 00 A : A V 8 A A A A N_ A A @ A A : W W W ` p A A
0x030b98…030d2c Dummy {f00=0x000f, f01=0x0190, f02=» ` R NPH @ H A _, @ x ` " :A @ A A 9A _T f P 6 @ A ` NO ` NO _ @ xT ` ` @ ~R0 A ~ @ T @ P6 A S A f V6_ _ @ A SX0 @ a ` _F f V : @ a @ ` T" @
0x030d2c…030ec0 Dummy {f00=0x000f, f01=0x0190, f02=» 9A 9B A <a V :A A A J @ a @ M <a L 9a <A A @ @ P @ A A S A A ~ ` NO ` R NP8 @ H A _& @ x ` " :A @ A A 9A _N ` NO J @ A A
0x030ec0…031054 (0, 62) Dummy {f00=0x000f, f01=0x0190, f02=» A @ A @ :a9a A @ ` P P F @ tP R r ( @ @ T W @ P A _ : ` @ P& @ F $ ) Y @ L 4 : , @ 1 = *** SYMBOL TABLE ^ 4 @ 0 =W
0x031054…0311e8 Dummy {f00=0x000f, f01=0x0190, f02=» @ :a9a ^~ 4 @ _ 4 @ 0 = ** = ] ] 4 @ 0 = START = = @ LENGTH = @ REGION = @ U _ 4 : , 1 P , 1 : < , 1 : L P @ $;e $ ) a
0x0311e8…03137c Dummy {f00=0x000f, f01=0x0190, f02=» : F @ A P @ A H I ( @ A A A : W f( : <A 0 R ( ) : (_ @ <a @ =a @ 9b9A A , ) Z A : @ @ <a @ =a :b:A A , ) Y A : @ @ P >a @ 9a Vp9A A A
0x03137c…031510 Dummy {f00=0x000f, f01=0x0190, f02=» : < $ P A A B $ ) 9 @ P 9 : $<e :9C D 4 @ 5 A A : @ @ ;a<a V $:CR E P : _& ( ^ : @ p @ T : P @ A p :( B d A d : @ 9a R _ @ P @
0x031510…0316a4 Dummy {f00=0x000f, f01=0x0190, f02=» LABEL = FIXS3-1 DATE = 790507 PACK NBR = 001 f P Y _( Y M : ] =IR E
[…0x3…]
0x031b60…031cf4 (0, 63) Opaque[0x194]
0x031cf4…031e88 # DirEnt {nam=»ASM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01f8, f03=0x0000}
0x031cf4…031e88 IdxSect {
0x031cf4…031e88 f00 = 0x000f // 0x31cf4 @0x0
0x031cf4…031e88 f01 = 0x0008 // 0x31cf6 @0x2
0x031cf4…031e88 gno = [ // 0x31cf8 @0x4
0x031cf4…031e88 [0x00]: C0x000f.0x3.0
0x031cf4…031e88 [0x01]: C0x0010.0x0.0
0x031cf4…031e88 [0x02]: C0x0010.0x1.0
0x031cf4…031e88 [0x03]: C0x0010.0x2.0
0x031cf4…031e88 ]
0x031cf4…031e88 }
0x031e88…03201c Dummy {f00=0x000f, f01=0x0190, f02=» H % #N. q [::Z B Y%o=fr b Fr ? ^a T : 6 9 i %(TLw z~+ *S Nwm 3 C # 7 x zl L $=Tu Z<K m c mjv z L _^ z F$T$ %@$V$ %@% % 4` @ @ . Pn b~
0x03201c…0321b0 Dummy {f00=0x000f, f01=0x0190, f02=» + @J <Z % !2Z "z y :s % H D 6 Y d ~ { & B P y:p W [~ 7]d +b% L M >) E: ( : @ < z R:R: ` B@ ^% g 0~ "<d# c ( B R Q : B | B p ( 0IO ERROR
0x0321b0…032344 Dummy {f00=0x000f, 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
0x032344…0324d8 Dummy {f00=0x000f, f01=0x0190, f02=» + @J <Z % !2Z "z y :s % H 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
0x0324d8…03266c Dummy {f00=0x000f, 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
0x03266c…032800 Dummy {f00=0x000f, 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"#
0x032800…032994 (0, 64) Dummy {f00=0x0010, 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 : @
0x032994…032b28 Dummy {f00=0x0010, 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.
0x032b28…032cbc Dummy {f00=0x0010, 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
0x032cbc…032e50 Dummy {f00=0x0010, 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
0x032e50…032fe4 Dummy {f00=0x0010, f01=0x0190, f02=» A ( @ A A A @ A A < h A f @ A @ A r I 0 ^ z A & . x A v **QX LRRQ 6 L J . T@ @$TP T P A . R A BW F *W _ ( @ P P @ I @ T~ Ut A
0x032fe4…033178 Dummy {f00=0x0010, f01=0x0190, f02=» V @ @ Q @ P 2 r 4 "( 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 ,
0x033178…03330c Dummy {f00=0x0010, f01=0x0190, f02=» % @ @ ) I ((R * ))R U > S S ,,Y` R a B J T ( % a A : $ B : W @ B T B L J 2 @ 0 A a P2 6 ,,RR F $" T @ = ," W A 2 = ] ]
0x03330c…0334a0 Dummy {f00=0x0010, f01=0x0190, f02=»W. < Pz T W Tn @ W T * ] ] 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
0x0334a0…033634 (0, 65) Dummy {f00=0x0010, f01=0x0190, f02=» @ , _2 @ A A A A $T @ A A A J @ B LPLQ @ @ P8 $T % _ 6 R $ R % ,,Y" J LU6 * @ T* R$ @ j 9a R S 9 @ J @ B L J
0x033634…0337c8 Dummy {f00=0x0010, f01=0x0190, f02=» . @ T 6 ! : J L J ''Q2 8 Y 4 Y T @ T P X ,,RD Q Z4 R ''Q X A ( Y 4 A _ ''Y X* XB Y 4 _L Z A 0 A 2 J Y 9a 09R, YV D 4" Y^ E 4 9 E T ,,Q - = _4 ZN
0x0337c8…03395c Dummy {f00=0x0010, f01=0x0190, f02=»PN 8 I 4 ;a P _ ] ] T ] " 2 YP _T T 8 P "T x _ R T* " P" P F 4 P @ G 4 @ P n _> G 4 4 G T_ PX P 8 @V "P ,,Q R A
0x03395c…033af0 Dummy {f00=0x0010, f01=0x0190, f02=»R P 9A G 4 Z_ T| @ @ J PX X @ O O O _ 2! Q : F A 2 : ,,Q R A : Z J R R @ R : P P * : 8 : 2 : 2' ?A 2&p : @ P @ P P P
0x033af0…033c84 Dummy {f00=0x0010, f01=0x0190, f02=» W @ B LUL * ==R@ * R4 P P A A B LV _ J 1 A @ T @ B LU A 6 @ %P % 6 A 6 A 6 R 4 F A D z E ^ ( A I ^ @ A @ A A F
0x033c84…033e18 Dummy {f00=0x0010, f01=0x0190, f02=»,,R 6 + J @ @ P& T 2 j 4 A _, P ( @ @ A PT $ $# P $ ] T A A @ T A 0_Z ] A @ P W P @
0x033e18…033fac Dummy {f00=0x0010, f01=0x0190, f02=»# Q A W R W ** A $# Q W ( W X ~ _ P J j P T j A ( 4 & ( 4 ^ j A P 4 0^ ( ASS.ERR.Q D @ "1 I T A I D
0x033fac…034140 Dummy {f00=0x0010, f01=0x0190, f02=» @ I W j @ I C ` @ I C V A Q M A a ! I 2 A i 1S A q BI @ " 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
0x034140…0342d4 (0, 66) Dummy {f00=0x0010, f01=0x0190, f02=»"1 p TR ! 1 h DR DRS !h UR URS !h NR NRS !h RR RRS !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 DK
0x0342d4…034468 Dummy {f00=0x0010, f01=0x0190, f02=» t P B q BL ` IO@ @ h NR H h TR @ ` STH ? h ST H ` 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
0x034468…0345fc Dummy {f00=0x0010, f01=0x0190, f02=» 8 h RC 8 p LN8 h RN 8 h ER p h ER x h GR h MR r !p XR a ! a XK ! 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
0x0345fc…034790 Dummy {f00=0x0010, f01=0x0190, f02=»x FF tx FT px IF TAB ORM FORM x EN J8 8 8 X Z X P X N 8 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
0x034790…034924 Dummy {f00=0x0010, f01=0x0190, f02=» LABEL = FIXS3 DATE = 790404 PACK NBR = 001 f 4: V - P Y _( Y M : ] =IR E
[…0x3…]
0x034de0…034f74 (0, 67) Opaque[0x194]
0x034f74…035108 # DirEnt {nam=»M:PROC«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0218, f03=0x0000}
0x034f74…035108 IdxSect {
0x034f74…035108 f00 = 0x0010 // 0x34f74 @0x0
0x034f74…035108 f01 = 0x0004 // 0x34f76 @0x2
0x034f74…035108 gno = [ // 0x34f78 @0x4
0x034f74…035108 [0x00]: C0x0010.0x3.0
0x034f74…035108 [0x01]: C0x0011.0x0.0
0x034f74…035108 ]
0x034f74…035108 }
0x035108…03529c Dummy {f00=0x0010, 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 PCAS @M= v PWEF 3 @A= PMOV @A=,/L,@AU PRUN PCAS @A= 2 P$PCASC M=@M=,A=@A=,C=@C=,CU=@CU=,D=@D=,DU=@DU= * P$PCASC M=@M=
0x03529c…035430 Dummy {f00=0x0010, f01=0x0190, f02=»A=,C=@C=,D=@D= P$PCASC M=@M=,A=@A=,C=@C= P$PCASF C=@C= 6 P$PCASF D=@D= J P$PCASF CU=@CU= ^ P$PCASF DU=@DU= t P$PCASE M=@M=,A=@A= P$PCASE M=@M= P$PCASE A=@A= PMES PARAMETER ?? PEND P$PCASC PWEF 3
0x035430…0355c4 Dummy {f00=0x0010, f01=0x018e, f02=»MES @D= P$PCASE PEND P$PCASF * * PMES ILLEGEL PARAMETER COMBINATION!!!! 8 2 PMES M,M+A,A,M+A+C,M+A+C+D IS OK SO TRY AGAIN! f * PMES AND DON'T DO ANY MORE MISTAKES!!!! P$PCASE PEND P$PCASE PWEF 3,2 PULD /3
0x0355c4…035758 Dummy {f00=0x0010, f01=0x018e, f02=» , POPT OUT=@MOUT=@M=,FC=@FC=E9,FT=M,INP=@M= PMOV @A=,/L,@AU 4 PRUN PDISC,0 A=@A= J , POPT OUT=@AOUT=@A,FC=@FC=E9,FT=A,INP=@A= d PMOV @C=,/A,@CU PRUN PDISC,0 C=@C= , POPT OUT=@COUT=@C=,FC=@FC=E9,FT=C,INP=@C= P$PDISCE P=@M=
0x035758…0358ec Dummy {f00=0x0010, f01=0x4158, f02=» " PMES 1 A,A+AU,A+AOUT,A+AU+AOUT " PMES 2 C,C+CU,C+COUT,C+CU+COUT * " PMES 3 M,M+MU,M+MOUT,M+MU+MOUT P PMES 4 FC v : PMES ANY COMBINATION OF ALTERNATIVE 1,2 AND 3 IS VALID, 0 PMES AND AT LEAST ONE OF THEM MUST BE CHOOSEN 0 PMES ALTERNATIVE
0x0358ec…035a80 Dummy {f00=0x0010, f01=0x4008, f02=»@ PRUN CCDD,0 C=@C= P$PDISCE M=@M=,A=@A=,C=@C= ( P$PDISCE M=@M=,A=@A= J P$PDISCE M=@M=,C=@C= f P$PDISCE A=@A=,C=@C= P$PDISCE M=@M= P$PDISCE A=@A= P$PDISCE C=@C= PMES PARAMETER? PEND P$PDISC
0x035a80…035c14 (0, 68) Dummy {f00=0x0011, f01=0x2008, f02=» REF /A PRDS /A PKPF /S $ PEND 2 P$RDAFL > PASG /E1,@D=FL09 L PASG /A,DK d PRUN READFL v PKPF /A,@N PEND P$ASGFL PASG /E1,@D=FL09 PASG /A,DK PRUN READFL PKPF /A,@N PASG /E
0x035c14…035da8 Dummy {f00=0x0011, f01=0x0190, f02=» A ^ _* A ^ " A A T A A " R _U . " A : A " , " 0 " 1 " ! R :W" W W W ?W /W : A t W ! A n A 4 A 4A Pf _ ? @ 4T A I > > > B @ _
0x035da8…035f3c Dummy {f00=0x0011, f01=0x0190, f02=» > B @ _ R ? ~ c P W 9m1 T ` P > @ > I RR< A P6 T @ T. @ P A W ` @ @ P @ T A P A < V A A (@ ( B > B > ? ? ? ? ? ? ? > A > A
0x035f3c…0360d0 Dummy {f00=0x0011, f01=0x0190, f02=» P RF OPEN40 ! P ! $ POPEN30 LDR* A4,A4 OPEN INDIRECT ! " P CF A8,PRCRLF ! J P ! ` POPEN40 CF A8,PR2SP ! h P LDR A2,A4 ! $ P CF A8,PRWORD PRINT NEW ADDRESS ! P CF A8,PRSLSH ! P RB OPEN20 ! P EJECT ! P ! P* ! P* R
0x0360d0…036264 Dummy {f00=0x0011, f01=0x018e, f02=» LDKL A5,CREGS ! P RF REGS " P " & P " . P* " 6 P* Q OPEN Q REGISTERS " @ P* " P* <ARG2>Q OPEN REG ARG2 " f & P* Q PRINT ALL REGISTERS " P* " P " POPNQ LDKL A5,QREGS " P RF REGS " P " P " P* " *
0x036264…0363f8 Dummy {f00=0x0011, f01=0x0190, f02=» " P # POPNU LDKL A5,UREGS # P # * P # 2 ( PREGS LDR A2,A2 CHECK IF REG NO GIVEN # : ( P RF(Z) REGS20 NO PRINT ALL REISTERS # f " PREGS05 LDR A7,A1 SAVE REG TYPE # P LD A6,ARG2+2 GET REG NO # P # PREGS10 ANK A6,/F # " P LDR A4,A5 CALC
0x0363f8…03658c Dummy {f00=0x0011, f01=0x0190, f02=» CWK A5,QREGS # P RF(NE) REGS15 $ P ST A5,QRSWI $ , P LD A3,QREGSM-QREGS,A4 $ @ P RF(Z) REGS15 $ ^ P CF A8,PRCOL PRINT ADDR MODE $ t P LDR A1,A3 $ P CF A8,PRCHAR $ & PREGS15 CF A8,GETNSA GET NEW VALUE $ P RB OPEN30 @ INDIRECT $ P
0x03658c…036720 Dummy {f00=0x0011, f01=0x0190, f02=»1,A7 $ P CF A8,PRCHAR % P RB REGS10 % " P % 4 P % < ( PREGS20 LDK A3,2 PRINT ALL REGISTERS % D P % p PREGS30 LDR A4,A5 % x P CM ADDRMD % PREGS40 CF A8,PRCRLF % P CF A8,PR8WDS % P SUK A3,1 % P RB(NZ) REGS40 % P ABL RDCOM %
0x036720…0368b4 (0, 69) Opaque[0x194]
0x0368b4…036a48 # DirEnt {nam=»BUG «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0228, f03=0x0000}
0x0368b4…036a48 IdxSect {
0x0368b4…036a48 f00 = 0x0011 // 0x368b4 @0x0
0x0368b4…036a48 f01 = 0x0004 // 0x368b6 @0x2
0x0368b4…036a48 gno = [ // 0x368b8 @0x4
0x0368b4…036a48 [0x00]: C0x0011.0x1.0
0x0368b4…036a48 [0x01]: C0x0011.0x2.0
0x0368b4…036a48 ]
0x0368b4…036a48 }
0x036a48…036bdc Dummy {f00=0x0011, f01=0x0190, f02=» v v( v D A ( @ ~ A A ~(@ ( @ A A @ A A @ A A @ A " A Z% d z " `# F : t `
0x036bdc…036d70 Dummy {f00=0x0011, f01=0x0190, f02=» 2 _ S A _ @ T :a R T <a Z _ = :A , >a @ A P UW B ~ @
0x036d70…036f04 Dummy {f00=0x0011, f01=0x0190, f02=» A A A A A A A A *T A _ P A A 8 . T , d + - ; : X " H W X " H H A A A _T @ P A 1+X A _ @ A @ A _ A UP " @ @ T " ( ^ @ P
0x036f04…037098 Dummy {f00=0x0011, f01=0x0190, f02=» 0 T A P P b_b _J A ` RT @ : W @ T @ W @ @ >a @ A ` A R ;a ]@ 1 R _L W @ $ 0 bW R A W @ A
0x037098…03722c Dummy {f00=0x0011, f01=0x0190, f02=» f A A R A RP F @ _F F RT V 0 P P _ @ R R @ @ @ P R @ A 9 Y V>a Y c A A " R A V<a P A ) " A * H
0x03722c…0373c0 Dummy {f00=0x0011, f01=0x0190, f02=» A R N RE <RN =ME HMN IP A @ A R A j ( @ A ~ @ A @ A @ A @ A > W R: ( T D V $ W ( W P T $ ; V ; Wp&~ P &`P 6 P @ $ P $ TH P@#n > V
0x0373c0…037554 (0, 70) Dummy {f00=0x0011, f01=0x0190, f02=»_ " ^ T @ 9J A T _ B1@ _ ^ 9 V * >! D A ( * A ( > > > > > > > > ^ _ ^ _ ? ? ? ? ? A d ^ @ ? ? > > > > > > > B > ? ? ? ? ? ? ? > A > A
0x037554…0376e8 Dummy {f00=0x0011, f01=0x0190, f02=» A ^ _* A ^ " A A T A A " R _U . " A : A " , " 0 " 1 " ! R :W" W W W ?W /W : A t W ! A n A 4 A 4A Pf _ ? @ 4T A I > > > B @ _
0x0376e8…03787c Dummy {f00=0x0011, f01=0x0190, f02=» > B @ _ R ? ~ c P W 9m1 T ` P > @ > I RR< A P6 T @ T. @ P A W ` @ @ P @ T A P A < V A A (@ ( B > B > ? ? ? ? ? ? ? > A > A
0x03787c…037a10 Dummy {f00=0x0011, f01=0x0190, f02=» P RF OPEN40 ! P ! $ POPEN30 LDR* A4,A4 OPEN INDIRECT ! " P CF A8,PRCRLF ! J P ! ` POPEN40 CF A8,PR2SP ! h P LDR A2,A4 ! $ P CF A8,PRWORD PRINT NEW ADDRESS ! P CF A8,PRSLSH ! P RB OPEN20 ! P EJECT ! P ! P* ! P* R
0x037a10…037ba4 Dummy {f00=0x0011, f01=0x018e, f02=» LDKL A5,CREGS ! P RF REGS " P " & P " . P* " 6 P* Q OPEN Q REGISTERS " @ P* " P* <ARG2>Q OPEN REG ARG2 " f & P* Q PRINT ALL REGISTERS " P* " P " POPNQ LDKL A5,QREGS " P RF REGS " P " P " P* " *
0x037ba4…037d38 Dummy {f00=0x0011, f01=0x0190, f02=» " P # POPNU LDKL A5,UREGS # P # * P # 2 ( PREGS LDR A2,A2 CHECK IF REG NO GIVEN # : ( P RF(Z) REGS20 NO PRINT ALL REISTERS # f " PREGS05 LDR A7,A1 SAVE REG TYPE # P LD A6,ARG2+2 GET REG NO # P # PREGS10 ANK A6,/F # " P LDR A4,A5 CALC
0x037d38…037ecc Dummy {f00=0x0011, f01=0x0190, f02=» CWK A5,QREGS # P RF(NE) REGS15 $ P ST A5,QRSWI $ , P LD A3,QREGSM-QREGS,A4 $ @ P RF(Z) REGS15 $ ^ P CF A8,PRCOL PRINT ADDR MODE $ t P LDR A1,A3 $ P CF A8,PRCHAR $ & PREGS15 CF A8,GETNSA GET NEW VALUE $ P RB OPEN30 @ INDIRECT $ P
0x037ecc…038060 Dummy {f00=0x0011, f01=0x0190, f02=»1,A7 $ P CF A8,PRCHAR % P RB REGS10 % " P % 4 P % < ( PREGS20 LDK A3,2 PRINT ALL REGISTERS % D P % p PREGS30 LDR A4,A5 % x P CM ADDRMD % PREGS40 CF A8,PRCRLF % P CF A8,PR8WDS % P SUK A3,1 % P RB(NZ) REGS40 % P ABL RDCOM %
0x038060…0381f4 (0, 71) Opaque[0x194]
0x0381f4…038388 # DirEnt {nam=»SUM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0238, f03=0x0000}
0x0381f4…038388 IdxSect {
0x0381f4…038388 f00 = 0x0011 // 0x381f4 @0x0
0x0381f4…038388 f01 = 0x0004 // 0x381f6 @0x2
0x0381f4…038388 gno = [ // 0x381f8 @0x4
0x0381f4…038388 [0x00]: C0x0011.0x3.0
0x0381f4…038388 [0x01]: C0x0012.0x0.0
0x0381f4…038388 ]
0x0381f4…038388 }
0x038388…03851c Dummy {f00=0x0011, f01=0x0190, f02=» F y ^Z ~ @ O> ` @ 2Z "z yd_ Mt Pv Uz {$ : zO " R>x +u K w [ ? d +b% L M "~ T &> ACJ 0 @ | < ZR:R:L `{z : Z% : d z `,@ T : t ` : `H Pt >Z m `" f >Z c p ` 4@ @ W
0x03851c…0386b0 Dummy {f00=0x0011, f01=0x0190, f02=» @ < D L R L A m L J W W @ ~ @ BV& ** - Z ` D V P 8 8 | 8Y, W W ( :TC t SUM 1.4 (790517) *** SAVED FILES WITH GRANULE ADDRESSES
0x0386b0…038844 Dummy {f00=0x0011, f01=0x0190, f02=»MAGTAPE STATISTICS TOTAL NUMBER OF SAVED USERS: SAVED FILES: SAVED GRANULES: A < USERID: P * @ BV R , < ~ @ BV NMBR OF FILES: @ & A 2 A & | , TOTAL S
0x038844…0389d8 Dummy {f00=0x0011, f01=0x0190, f02=»9! A ( BV | @ BV(W @ BV " T P * Z2 @ BV @ V D _ A & : 8 8 8Y, W W ( :TC t SUM 1.4 (790517) *** SAVED FILES WITH GRANULE ADDRESSES
0x0389d8…038b6c Dummy {f00=0x0011, f01=0x0190, f02=»MAGTAPE STATISTICS TOTAL NUMBER OF SAVED USERS: SAVED FILES: SAVED GRANULES: A < USERID: @ BV n T : J : : ( B R. : ( : ( : A @
0x038b6c…038d00 Dummy {f00=0x0011, f01=0x0190, f02=» A A ( A A ! X !XXT ( ( @ ! : A A ( : X NP W A A ( ES O A q XW ! T _ !//T ( _ 0Z2 U ]@ YF< Y< ZT A m @ ~
0x038d00…038e94 (0, 72) Dummy {f00=0x0012, f01=0x0190, f02=»ES ETC.? < $" = @ A A A : A W @ n A A A U v ( @ @ A A ( : U z DW @ #U. A @ A p @ A : ; [ [ [ Z Z Z : : < ,
0x038e94…039028 Dummy {f00=0x0012, f01=0x0190, f02=» Y : @ nY : @ U v : @ A R _ : f A : ( : X NP W A A ( ES O A XW ! T _ !//T 1 0Z2 U ]@ YF< Y< ZT A @
0x039028…0391bc Dummy {f00=0x0012, f01=0x0190, f02=»ES ETC.? < $" = @ A A A : A W @ Z V Z W Z R` P WX [ WD ; T N x : : W _" , 4X X [ Z _ , TV 4P P _ WJ U
0x0391bc…039350 Dummy {f00=0x0012, f01=0x0190, f02=» : _ N_ _ 1^ _ 1Y N P 0^& Q ~_8 W ?B?e + n A v A b l( @ tT2 : ~W A A ~ Y : A b]B $ 0TOO MANY I/O ERRORS ON DISC dP 4 D 0 @ t X 0 $* XXXXING SECT
0x039350…0394e4 Dummy {f00=0x0012, f01=0x0190, f02=» [ [ R Q @ 2 - WJ @ 0 - A D R( X < R X < _ Q @ DX A D T 2 - _. D 2 - Z Z Z Z Z : :- 0123456789 d ' : : W _" , 4X X [ Z _ , T 4P P _ W U
0x0394e4…039678 Dummy {f00=0x0012, f01=0x0190, f02=» P BYTES 22,' ' P DATA 'ERR. DIRECTORY ON MT' PABEXIT EQU * B P CALL MSG V P BYTES 16,' ' h P DATA 'ABNORMAL EXIT.' ~ P LDK A7,4 EXIT CODE P RF EXIT PCOVFL LDK A7,15 EXIT CODE PEXIT LKM P DATA 3
0x039678…03980c Dummy {f00=0x0012, f01=0x0190, f02=»UM' P DATA RELNO PDOTVER EQU VERNO-'.'+'..' P DATA DOTVER B P DATA ' (' V P DATA RELYER,RELMON,RELDAY h P DATA ') *** ' & PTITLTX DATA 'RESTORED FILES WITH' P DATA 'GRANULE ADDRESSES' PTITX:L EQU *-TITLTX $
0x03980c…0399a0 Dummy {f00=0x0012, f01=0x018e, f02=»TL:L EQU *-TITL P* PTITLCW EQU * " P DATA ' 0' 6 P DATA 'RUM REL' H P DATA RELNO ` P DATA DOTVER t P DATA ' DATE ' & P DATA RELYER,'.',RELMON,'.',RELDAY P DATA ' 12NC' P DATA '=8701 356 40140 ' 6 PRUMDES D
0x0399a0…039b34 (0, 73) Opaque[0x194]
0x039b34…039cc8 # DirEnt {nam=»RUM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0248, f03=0x0000}
0x039b34…039cc8 IdxSect {
0x039b34…039cc8 f00 = 0x0012 // 0x39b34 @0x0
0x039b34…039cc8 f01 = 0x0006 // 0x39b36 @0x2
0x039b34…039cc8 gno = [ // 0x39b38 @0x4
0x039b34…039cc8 [0x00]: C0x0012.0x1.0
0x039b34…039cc8 [0x01]: C0x0012.0x2.0
0x039b34…039cc8 [0x02]: C0x0012.0x3.0
0x039b34…039cc8 ]
0x039b34…039cc8 }
0x039cc8…039e5c Dummy {f00=0x0012, f01=0x0190, f02=» 4 y ^Z ~ @ O> ` @ 2Z "z yd_ Mt Pv Uz {$ : zO " R>x +u K w [ ? d +b% L M "~ T &> ACJ 0 @ | < ZR:R:L `{z : Z% : d z `,@ T : t ` : `H Pt >Z m `" f >Z c p ` 4@ @ W
0x039e5c…039ff0 Dummy {f00=0x0012, f01=0x0190, f02=» D 4D;a<a * A A A R$S D L R( L A L W " 0MT AT EOF! W A R Sr @ ^ _& @ V& ** - Z b 8 8
0x039ff0…03a184 Dummy {f00=0x0012, f01=0x0190, f02=»ITH GRANULE ADDRESSES ************** DATE OF RUN: YYMMDD 0RUM REL 1.4 DATE 79. 05. 17 12NC=8701 356 40140 0RESTORE USER/DISC FROM MAGTAPESTATISTICS TOTAL NUMBER OF RESTORED USERS: RESTORED FILES: ALLOCATED GRANULES: A ( @ P P,
0x03a184…03a318 Dummy {f00=0x0012, f01=0x0190, f02=»ING ERROR ON MT " STATUS WORD: T& @ V " LENGTH ERROR _v ( : A A A " T $ & @ D H A P &W D * A $ @ Q @ T T A W A D A
0x03a318…03a4ac Dummy {f00=0x0012, f01=0x0190, f02=» @ V " V @ "T @ V @ A @ A : V " & $ T & : " DISC OVFL W " 0CATALOG OVFL @ " WHEN CREATING USER UUUUUUUU NEW USERID:
0x03a4ac…03a640 Dummy {f00=0x0012, f01=0x0190, f02=»ING ERROR ON MT STATUS WORD: T& @ LENGTH ERROR _v ( : A A A T $ A * ` T T " RW A A A V6 @ @
0x03a640…03a7d4 (0, 74) Dummy {f00=0x0012, f01=0x0190, f02=»! T T Z$ AQ, @ @ FP " 0DIRECTORY OVFLW@ @ W T P V @ Z A : @ @ "* WHEN RESTORING FFFFFFTT OF USER UUUUUUUU A " @ " * J ]x _
0x03a7d4…03a968 Dummy {f00=0x0012, f01=0x0190, f02=» : ; [ [ [ [ [ R Q @ - WJ @ - A R( X R X _ Q @ X A T - _. D - Z Z Z Z Z : :- 0123456789 d ' A : A < 8( D A : A < 4 ! X !XXT D( ( @ D! : ` A : A
0x03a968…03aafc Dummy {f00=0x0012, f01=0x0190, f02=»T ( _ 0Z2 U ]@ YF< Y< ZT D A " R 6 P Z ZZ : ` ZZ : ?? DISC FILE CODE ? OK ? LISTING OF FILENAMES ETC.? < $" = @ ( A ( A * A ( : A *W @ n A * A J A
0x03aafc…03ac90 Dummy {f00=0x0012, f01=0x0190, f02=» @ * A * : ; [ [ [ Z Z Z : : < , = = $ - Y : - : " :d H - " H - :0123456789ABCDEF A 9h _@ - Y : @ nY : @ U : @ A R _ : V A : B
0x03ac90…03ae24 Dummy {f00=0x0012, f01=0x0190, f02=»T 1 0Z2 U ]@ YF< Y< ZT D A R 6 P Z ZZ : `PAGE: B ?? DISC FILE CODE ? OK ? LISTING OF FILENAMES ETC.? < $" = @ A A A : A W @ Z V Z W Z R`
0x03ae24…03afb8 Dummy {f00=0x0012, f01=0x0190, f02=» 4X X [ Z _ TV 4P P _ dWJ U : d R O T O O W O U W W 6 " 6 A P @ : _ _ _ 1^ _ 1Y P & 0^& Q "_8 W ?B?e +
0x03afb8…03b14c Dummy {f00=0x0012, f01=0x0190, f02=»S ON DISC P @ "* XXXXING SECTOR: XXXX, STATUS WORD: XXXX ( READWRIT , %Q R Y W W Z ' [ : V RT(= @ M A _ @ V I _ U W 6 @ R A L M 9#
0x03b14c…03b2e0 Dummy {f00=0x0012, f01=0x0190, f02=» 4X X [ Z _ TV 4P P _ dWJ U : d R O T O O W O U W W " A P @ : _ _ _ 1^ _ 1Y P 0^& Q _8 W ?B?e +
0x03b2e0…03b474 (0, 75) Dummy {f00=0x0012, f01=0x0190, f02=» 6 - 9W: - 9W. ;c ` $Q( $ ,` A <` @ $+ & @ $ : W 6WORD: XXXX ( READWRIT , %Q R Y W W Z ' [ : V T(= @ M A _ @ V I _ U W 6 @ R A L M 9#
0x03b474…03b608 Dummy {f00=0x0012, f01=0x2008, f02=» ENT SCM @ HKPF /S,CDLOOP $ HKPF /O : HEND H A14 L * END f@ r4 h . * CFR A14,FUNREG CALL THE ARGUMENT FUNCTION * LD CDPTR,2,A14 " CW CDPTR,4,A14 COMP WITH UPB RB(L) LOOP11
0x03b608…03b79c Dummy {f00=0x0012, f01=0x018e, f02=»LLA CHARACTERS MOVED 7 P 8 P LDK A2,'0' 8 $ PGT:ER2 CWK A3,SAVEIN 8 8 P RF(L) GT:ER3 8 T P SCR A2,A3 8 j P SUK A3,1 8 | P RB GT:ER2 8 P 8 P 8 PGT:ER3 LDKL A2,0 RELOAD A2 8 PGT:A2 EQU *-2 8 P LDKL A3,0 8 PGT:A3 EQU *-2
0x03b79c…03b930 Dummy {f00=0x0012, f01=0x0190, f02=» P 9 P 9 P* 9 , P**************************************** 9 P******* 9 N P* CHANGE TO CREDIT ORDERS 9 ^ P* 9 P****** 9 P*************** 9 P* 9 PCR:DIT LDKL A2,CR:BUF 9 P LDK A3,35 9 < P CF A14,WRTCAS CONDITIONAL A
0x03b930…03bac4 Dummy {f00=0x0012, f01=0x0190, f02=» 9 r & P CF A14,KPFS BEA /S,KPF /O,KPF /S : P RTN A14 : 2 P : B P : J PCRD:10 LDKL A2,BEA:NL : R P LDK A3,9 : p P CF A14,WRTCAS BEA /S,NL : P : P CF A14,KPFO KPF /O : P CF A14,KPF:10 KPF /S : P RTN A14 : P XIF : P EJECT :
0x03bac4…03bc58 Dummy {f00=0x0012, f01=0x0190, f02=»******** : P* ; PLED:DR EQU * ; P LDKL A2,-1 ; . P ST A2,SND020 ; B P LDKL A2,LEDBUF ; X P LDK A3,10 ; p P LDK A1,6 ; P CF A14,SNDLE1 LED DRIVER ; P RTN A14 ; P EJECT ; P ; P ; , PREPONE DATA '!!CH $',/245C,'X:A$',/2
0x03bc58…03bdec Dummy {f00=0x0012, f01=0x0190, f02=»5C,'X:A$',/245C ; x PREPCN3 DATA ' $$' < PLEDKB DATA 'LED DVTKB' < 4 PCOLON DATA ' : ' < R 0 PCODES DATA '!!CH $$/2122,/2426,/3B3C,/3E40' < j P DATA ',/5E5F$$' < $ PROMTAB DATA '/ ,/ ,/ ,' < P DATA '/ ,/ $$' < 2 PZE:RO DATA /
0x03bdec…03bf80 Dummy {f00=0x0012, f01=0x4098, f02=»H $$CREDI',/545C < P DATA 'EQ',/555C,'0$$CREDI' = P DATA /545C,'EQ',/555C,'1$$' = < PBEA:NL DATA 'BEA /S,NL' = ` P END DRIVER = @ = j P DATA ',/5E5F$$' < $ PROMTAB DATA '/ ,/ ,/ ,' < P DATA '/ ,/ $$' < 2 PZE:RO DATA /
0x03bf80…03c114 (0, 76) Opaque[0x194]
0x03c114…03c2a8 # DirEnt {nam=»DUMPA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0260, f03=0x0000}
0x03c114…03c2a8 IdxSect {
0x03c114…03c2a8 f00 = 0x0013 // 0x3c114 @0x0
0x03c114…03c2a8 f01 = 0x000a // 0x3c116 @0x2
0x03c114…03c2a8 gno = [ // 0x3c118 @0x4
0x03c114…03c2a8 [0x00]: C0x0013.0x0.0
0x03c114…03c2a8 [0x01]: C0x0013.0x1.0
0x03c114…03c2a8 [0x02]: C0x0013.0x2.0
0x03c114…03c2a8 [0x03]: C0x0013.0x3.0
0x03c114…03c2a8 [0x04]: C0x0014.0x0.0
0x03c114…03c2a8 ]
0x03c114…03c2a8 }
0x03c2a8…03c43c Dummy {f00=0x0013, 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 : :'
0x03c43c…03c5d0 Dummy {f00=0x0013, 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
0x03c5d0…03c764 Dummy {f00=0x0013, 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
0x03c764…03c8f8 Dummy {f00=0x0013, 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
0x03c8f8…03ca8c Dummy {f00=0x0013, 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
0x03ca8c…03cc20 Dummy {f00=0x0013, f01=0x0190, f02=» @ A A A : A W @ ! R ?U : : $ - - Y : @ 4 Q $ . ^ 1 ~ Y f ` x ` ~ $ ` ~ ~ T T ` ^ @, @, `
0x03cc20…03cdb4 (0, 77) Dummy {f00=0x0013, 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 ( : ( *
0x03cdb4…03cf48 Dummy {f00=0x0013, f01=0x0190, f02=» * : j( : - - Y : @ 4 Q $ ^ 1 ~ Y ` ` ~ ` ~ ~ T T ` ^ @ @ `
0x03cf48…03d0dc Dummy {f00=0x0013, 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 ( : (
0x03d0dc…03d270 Dummy {f00=0x0013, f01=0x0190, f02=» : ( : - - Y : @ 4 Q $ ^ 1 ~ Y ` ` ~ ` ~ ~ T T ` ^ @ @ `
0x03d270…03d404 Dummy {f00=0x0013, 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 ( : (
0x03d404…03d598 Dummy {f00=0x0013, f01=0x0190, f02=» : ( : - - Y : @ 4 Q $ ^ 1 ~ Y ` ` ~ ` ~ ~ T T ` ^ @ @ `
0x03d598…03d72c Dummy {f00=0x0013, 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 ( : (
0x03d72c…03d8c0 Dummy {f00=0x0013, f01=0x0190, f02=» : ( : - - Y : @ 4 Q $ ^ 1 ~ Y ` ` ~ ` ~ ~ T T ` ^ @ @ `
0x03d8c0…03da54 (0, 78) Dummy {f00=0x0013, 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 ( : (
0x03da54…03dbe8 Dummy {f00=0x0013, f01=0x0190, f02=» : ( : - - Y : @ 4 Q $ ^ 1 ~ Y ` ` ~ ` ~ ~ T T ` ^ @ @ `
0x03dbe8…03dd7c Dummy {f00=0x0013, 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 ( : (
0x03dd7c…03df10 Dummy {f00=0x0013, f01=0x0190, f02=» : ( : - - Y : @ 4 Q $ ^ 1 ~ Y ` ` ~ ` ~ ~ T T ` ^ @ @ `
0x03df10…03e0a4 Dummy {f00=0x0013, 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 ( : (
0x03e0a4…03e238 Dummy {f00=0x0013, f01=0x0190, f02=» : ( : - - Y : @ 4 Q $ ^ 1 ~ Y ` ` ~ ` ~ ~ T T ` ^ @ @ `
0x03e238…03e3cc Dummy {f00=0x0013, 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 ( : (
0x03e3cc…03e560 Dummy {f00=0x0013, f01=0x0190, f02=» : ( : - - Y : @ 4 Q $ ^ 1 ~ Y ` ` ~ ` ~ ~ T T ` ^ @ @ `
0x03e560…03e6f4 (0, 79) Dummy {f00=0x0013, 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 ( : (
0x03e6f4…03e888 Dummy {f00=0x0013, f01=0x0190, f02=» : ( : - - Y : @ 4 Q $ ^ 1 ~ Y ` ` ~ ` ~ ~ T T ` ^ @ @ `
0x03e888…03ea1c Dummy {f00=0x0013, 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 ( : (
0x03ea1c…03ebb0 Dummy {f00=0x0013, f01=0x0190, f02=» : ( : - - Y : @ 4 Q $ ^ 1 ~ Y ` ` ~ ` ~ ~ T T ` ^ @ @ `
0x03ebb0…03ed44 Dummy {f00=0x0013, 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 ( : (
0x03ed44…03eed8 Dummy {f00=0x0013, f01=0x0190, f02=» : ( : - - Y : @ 4 Q $ ^ 1 ~ Y ` ` ~ ` ~ ~ T T ` ^ @ @ `
0x03eed8…03f06c Dummy {f00=0x0013, 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 ( : (
0x03f06c…03f200 Dummy {f00=0x0013, 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 ` ^ @ @
0x03f200…03f394 (0, 80) Dummy {f00=0x0014, 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
0x03f394…03f528 Dummy {f00=0x0014, 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, ; [ [
0x03f528…03f6bc Dummy {f00=0x0014, 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
0x03f6bc…03f850 Dummy {f00=0x0014, 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
0x03f850…03f9e4 Dummy {f00=0x0014, 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
0x03f9e4…03fb78 Dummy {f00=0x0014, 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)
0x03fb78…03fd0c Dummy {f00=0x0014, 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
0x03fd0c…03fea0 Dummy {f00=0x0014, 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
0x03fea0…040034 (0, 81) Opaque[0x194]
0x040034…0401c8 # DirEnt {nam=»PM6800«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0288, f03=0x0000}
0x040034…0401c8 IdxSect {
0x040034…0401c8 f00 = 0x0014 // 0x40034 @0x0
0x040034…0401c8 f01 = 0x000e // 0x40036 @0x2
0x040034…0401c8 gno = [ // 0x40038 @0x4
0x040034…0401c8 [0x00]: C0x0014.0x1.0
0x040034…0401c8 [0x01]: C0x0014.0x2.0
0x040034…0401c8 [0x02]: C0x0014.0x3.0
0x040034…0401c8 [0x03]: C0x0015.0x0.0
0x040034…0401c8 [0x04]: C0x0015.0x1.0
0x040034…0401c8 [0x05]: C0x0015.0x2.0
0x040034…0401c8 [0x06]: C0x0015.0x3.0
0x040034…0401c8 ]
0x040034…0401c8 }
0x0401c8…04035c Dummy {f00=0x0014, f01=0x0190, f02=» 1F W f W h W j W l W n A A 9D: " @ :D R 0 P P 9H _4 W f_< W h V f V h V j V l V n : W f W h W j W l W n f L T PF_ L W4 @R 0 P 9D _( W f V f V h V j V l V n V f V h V j V l V n W f W
0x04035c…0404f0 Dummy {f00=0x0014, f01=0x0190, f02=» f V h V j V l V n 0 R _ A A 9H: " @ :H 0 dR _ A 9H: " @ :H 0 d R _ A 9H: " @ :H : : 0R :R AR GV A @ A > @ (@ $$T <( A : A @ A >(@ <( (@ A > A @ <( :
0x0404f0…040684 Dummy {f00=0x0014, f01=0x0190, f02=»RESTART SYSTEM D W A A 9D: " @ :D R 0 P P 9H _4 W _< W V V V V V : W W W W W L T SYST. USERID: V -DEVICE ADDRESS UNKNOWN -
0x040684…040818 Dummy {f00=0x0014, f01=0x0190, f02=» DATE = F1 PACK NBR =
0x040818…0409ac Dummy {f00=0x0014, f01=0x0190, f02=» CATALOG
0x0409ac…040b40 Dummy {f00=0x0014, f01=0x0190, f02=»
0x040b40…040cd4 (0, 82) Dummy {f00=0x0014, f01=0x0190, f02=» CATALOG LABEL: DATE: PACK NBR: A
0x040cd4…040e68 Dummy {f00=0x0014, f01=0x0190, f02=» A A A ~ A A H A ( A F A N A j A V H @ A H @ NOT T @ ! 9A q A < A b A d A > ^ J I A A A I A I ! P A S I A A A ? $ J (
0x040e68…040ffc Dummy {f00=0x0014, f01=0x0190, f02=»9@ A 9@ O J N A ^ @ J @ @ J# TH @ 8A A ! T: A @ T @ O N A ^ @ J A J_P NI P A J @ J! z @ T @ O A J @ @ 9@ A 9@ O @ 9AR
0x040ffc…041190 Dummy {f00=0x0014, f01=0x0190, f02=» A P A L A J J A : (I P J A J > A : (I P @ A P A @ J A : A A A A ~ A A H A ( A F A N A j A V , : H NO @ :P YE @ : ( A A : $$ A (@ I ! :I ! @ Z9a Jq r
0x041190…041324 Dummy {f00=0x0014, f01=0x0190, f02=» W W =E : $$ A A Z A A @ A A $$ A ?FR R _V ; :P _ P , ) Y %? 8 N=L=k ] ] 9BRZ 9DQ " " 9B W^ R P
0x041324…0414b8 Dummy {f00=0x0014, f01=0x0190, f02=» x T 4 &: 4: V - P Y _( Y M : $ ] $ =IR E : $_ ` % $ C 6 C ( #( #WN l C C ( C C ( b @ P !VVT A W !WW A
0x0414b8…04164c Dummy {f00=0x0014, f01=0x0190, f02=» T" P 6d 7 & 6dW 4 F 6 A4 4 F 6d C C ( C % E C ( @ NOT z . YE Z z 6 S * Z C C ( h C C ( @ 2 b AB 68 D B
0x04164c…0417e0 Dummy {f00=0x0014, f01=0x0190, f02=» ( 01PM6800 REL 2.6 DATE 79.11.23 12NC=8701 364 40260 DISK TYPE : : COMPLETE PREMARK: DISC FILE CODE : DISC NOT OPERABLE VOLUME LABEL MISSING OR UNREADABLE OK ? ( C ( b @ P !VVT A W !WW A
0x0417e0…041974 (0, 83) Dummy {f00=0x0014, f01=0x0190, f02=» T P W F A F C C ( C % E C ( @ NOT z . YE Z z S * C C ( C C ( @ 2 b AB 68 D B
0x041974…041b08 Dummy {f00=0x0014, f01=0x0190, f02=» ( 01PM6800 REL 2.6 DATE 79.11.23 12NC=8701 364 40260 DISK TYPE : : COMPLETE PREMARK: DISC FILE CODE : DISC NOT OPERABLE VOLUME LABEL MISSING OR UNREADABLE OK ? ( C ( b @ P !VVT A W !WW A
0x041b08…041c9c Dummy {f00=0x0014, f01=0x0190, f02=» T P W F A F C C ( C % E C ( @ NOT z . YE Z z S * C C ( C C ( @ 2 b AB 68 D B
0x041c9c…041e30 Dummy {f00=0x0014, f01=0x0190, f02=» ( 01PM6800 REL 2.6 DATE 79.11.23 12NC=8701 364 40260 DISK TYPE : : COMPLETE PREMARK: DISC FILE CODE : DISC NOT OPERABLE VOLUME LABEL MISSING OR UNREADABLE OK ? ( C ( b @ P !VVT A W !WW A
0x041e30…041fc4 Dummy {f00=0x0014, f01=0x0190, f02=» T P W F A F C C ( C % E C ( @ NOT z . YE Z z S * C C ( C C ( @ 2 b AB 68 D B
0x041fc4…042158 Dummy {f00=0x0014, f01=0x0190, f02=» ( 01PM6800 REL 2.6 DATE 79.11.23 12NC=8701 364 40260 DISK TYPE : : COMPLETE PREMARK: DISC FILE CODE : DISC NOT OPERABLE VOLUME LABEL MISSING OR UNREADABLE OK ? ( C ( b @ P !VVT A W !WW A
0x042158…0422ec Dummy {f00=0x0014, f01=0x0190, f02=» T P W F A F C C ( C % E C ( @ NOT z . YE Z z S * C C ( C C ( @ 2 b AB 68 D B
0x0422ec…042480 Dummy {f00=0x0014, f01=0x0190, f02=» ( 01PM6800 REL 2.6 DATE 79.11.23 12NC=8701 364 40260 DISK TYPE : : COMPLETE PREMARK: DISC FILE CODE : DISC NOT OPERABLE VOLUME LABEL MISSING OR UNREADABLE OK ? ( C ( b @ P !VVT A W !WW A
0x042480…042614 (0, 84) Dummy {f00=0x0015, f01=0x0190, f02=» T P W F A F C C ( C % E C ( @ NOT z . YE Z z S * C C ( C C ( @ 2 b AB 68 D B
0x042614…0427a8 Dummy {f00=0x0015, f01=0x0190, f02=» ( 01PM6800 REL 2.6 DATE 79.11.23 12NC=8701 364 40260 DISK TYPE : : COMPLETE PREMARK: DISC FILE CODE : DISC NOT OPERABLE VOLUME LABEL MISSING OR UNREADABLE OK ? ( C ( b @ P !VVT A W !WW A
0x0427a8…04293c Dummy {f00=0x0015, f01=0x0190, f02=» T P W F A F C C ( C % E C ( @ NOT z . YE Z z S * C C ( C C ( @ 2 b AB 68 D B
0x04293c…042ad0 Dummy {f00=0x0015, f01=0x0190, f02=» ( 01PM6800 REL 2.6 DATE 79.11.23 12NC=8701 364 40260 DISK TYPE : : COMPLETE PREMARK: DISC FILE CODE : DISC NOT OPERABLE VOLUME LABEL MISSING OR UNREADABLE OK ? ( C ( b @ P !VVT A W !WW A
0x042ad0…042c64 Dummy {f00=0x0015, f01=0x0190, f02=» T P W F A F C C ( C % E C ( @ NOT z . YE Z z S * C C ( C C ( @ 2 b AB 68 D B
0x042c64…042df8 Dummy {f00=0x0015, f01=0x0190, f02=» ( 01PM6800 REL 2.6 DATE 79.11.23 12NC=8701 364 40260 DISK TYPE : : COMPLETE PREMARK: DISC FILE CODE : DISC NOT OPERABLE VOLUME LABEL MISSING OR UNREADABLE OK ? ( C ( b @ P !VVT A W !WW A
0x042df8…042f8c Dummy {f00=0x0015, f01=0x0190, f02=» T P W F A F C C ( C % E C ( @ NOT z . YE Z z S * C C ( C C ( @ 2 b AB 68 D B
0x042f8c…043120 Dummy {f00=0x0015, f01=0x0190, f02=» ( 01PM6800 REL 2.6 DATE 79.11.23 12NC=8701 364 40260 DISK TYPE : : COMPLETE PREMARK: DISC FILE CODE : DISC NOT OPERABLE VOLUME LABEL MISSING OR UNREADABLE OK ? ( C ( b @ P !VVT A W !WW A
0x043120…0432b4 (0, 85) Dummy {f00=0x0015, f01=0x0190, f02=» T P W F A F C C ( C % E C ( @ NOT z . YE Z z S * C C ( C C ( @ 2 b AB 68 D B
0x0432b4…043448 Dummy {f00=0x0015, f01=0x0190, f02=» ( 01PM6800 REL 2.6 DATE 79.11.23 12NC=8701 364 40260 DISK TYPE : : COMPLETE PREMARK: DISC FILE CODE : DISC NOT OPERABLE VOLUME LABEL MISSING OR UNREADABLE OK ? ( C ( b @ P !VVT A W !WW A
0x043448…0435dc Dummy {f00=0x0015, f01=0x0190, f02=» T P W F A F C C ( C % E C ( @ NOT z . YE Z z S * C C ( C C ( @ 2 b AB 68 D B
0x0435dc…043770 Dummy {f00=0x0015, f01=0x0190, f02=» ( 01PM6800 REL 2.6 DATE 79.11.23 12NC=8701 364 40260 DISK TYPE : : COMPLETE PREMARK: DISC FILE CODE : DISC NOT OPERABLE VOLUME LABEL MISSING OR UNREADABLE OK ? ( C ( b @ P !VVT A W !WW A
0x043770…043904 Dummy {f00=0x0015, f01=0x0190, f02=» T P W F A F C C ( C % E C ( @ NOT z . YE Z z S * C C ( C C ( @ 2 b AB 68 D B
0x043904…043a98 Dummy {f00=0x0015, f01=0x0190, f02=» ( 01PM6800 REL 2.6 DATE 79.11.23 12NC=8701 364 40260 DISK TYPE : : COMPLETE PREMARK: DISC FILE CODE : DISC NOT OPERABLE VOLUME LABEL MISSING OR UNREADABLE OK ? ( C ( b @ P !VVT A W !WW A
0x043a98…043c2c Dummy {f00=0x0015, f01=0x0190, f02=» T P W F A F C C ( C % E C ( @ NOT z . YE Z z S * C C ( C C ( @ 2 b AB 68 D B
0x043c2c…043dc0 Dummy {f00=0x0015, f01=0x0190, f02=» ( C C ( #( # : $ ! R !__Q P _ : : 6 # 4 C C C ( B : 0 6 "! #( B : S r S t S S S S AA AA* AA AA AAB AAN A@ A@ A@ A@ A@ SUPERV Wp (@ 7
0x043dc0…043f54 (0, 86) Dummy {f00=0x0015, f01=0x0190, f02=» X V W 8 C ( X 9DVT X C X # P $ A? % P _ ( X 8 z W _ X Xh f_p 8b C % E ( ! T 8 Y X ;EV 8 Fv_ W 00 8 F _ X % B 8 z _ =t R R S R
0x043f54…0440e8 Dummy {f00=0x0015, f01=0x0190, f02=» S S C R * $P 1 1 _ C " $P 1 1 _ C :A $P 1 1 _ R &N N DN @ ;p S D^ 9 > T BD P N S S ? D~ 9 > W R R & BD < BD Z @ ;p D^ :( > A:B ? Dn :< > W W: $T R T R
0x0440e8…04427c Dummy {f00=0x0015, f01=0x0190, f02=» R Q( B (@ 7P B _ B _ B _ R : E AC0 AC2 C _< C4 _D ;" F AC ;._ AC ;:_ AC R ;H_* AC R ;V_8 AC R ;d_F AC C $_ R ;~ E AC0 AC2 NBR OF C D^ ; > R S R % R D~ ; > W
0x04427c…044410 Dummy {f00=0x0015, f01=0x0190, f02=»<> > W Q BD R R D~ <` > W R % Z $CATALOG S R S R S R R > QN VTOC S BD BD R BD S R 9H R R R R > R S S S S R > A@ C (@
0x044410…0445a4 Dummy {f00=0x0015, f01=0x0190, f02=» R 9H R R R R S R O R > N >: ; > R R R R D~ >, > W : F N : >C F S . : :a :Av v >D >BF ::a :Av v >D >B _ N S|Y > Rp> B : N SbY ?T > Z > RP>
0x0445a4…044738 Dummy {f00=0x0015, f01=0x0190, f02=» OKP NOT =6 [ : : R 8 YET [ W NOT 7 [ : : A? R ?z F S S R : ? A B* BL Bn A ? : A? R A? S @? : R & DD. R Q S : : ? R Q ? : R R C| * : T ? : R
0x044738…0448cc Dummy {f00=0x0015, f01=0x0190, f02=»?$AV 8 ?BA~ L A 0 A ?jA r @PA * A ? A A ? B " B2 " ? BT " ? Bv B ? B RUN AGAIN : ANOTHER DAD ? (OK/NO) : LABEL: DATE: PACK NBR: DISK UNIT PH
0x0448cc…044a60 Dummy {f00=0x0015, f01=0x0190, f02=»F SEC./ GRAN. OF : : NBR. OF SEC./ TRACK OF 7 [ : SEC. LENGTH(IN CHAR) OF S : SYST. USERID: PASSWORD : ACCOUNT NBR. : END OF PM6800 SEEK ERRORUNKNOWN DEVICEDEVICE NOT OPERABLE THRUPUT ERR TRACK/SECT OVERFLOW BAD TRACK IN FIRST CYL. TOO MA
0x044a60…044bf4 (0, 87) Dummy {f00=0x0015, f01=0x0190, f02=» THAN NBR. OF SECT/TRXPCTD: 0 READ: ?j r9 9 > 9 > : > >4 >@>`>2 >R>V>n>r 6 6 # F >0>0 >0>0>:>: >:>:>H>H >H>H>d>d >d>d
0x044bf4…044d88 Dummy {f00=0x0015, f01=0x0190, f02=» r =L=k ] n ] p 9BR :K T :A Y :a :i q r E x T 4 &: 4: V - P Y _( Y M : $ ] $ =IR E : $_ AF F 0 1
0x044d88…044f1c Dummy {f00=0x0015, f01=0x0190, f02=» !00R* !::R !AAR !FFQ Y& 8 9 Y 9 8 9 338 9 9 8 Y 8 !::R Y 8 >n>r 6 6 # F >0>0 >0>0>:>: >:>:>H>H >H>H>d>d >d>d
0x044f1c…0450b0 Dummy {f00=0x0015, f01=0x0190, f02=» p " PENDTAB DATA ' ' " P DATA ' ' . " P DATA ' ' T " P DATA ' ' z " P DATA ' ' " P DATA ' ' " P DATA '
0x0450b0…045244 Dummy {f00=0x0015, f01=0x018e, f02=»A ' ' " P DATA ' ' " P DATA ' ' @ " PENDBUF DATA ' ' f " P DATA ' ' " P DATA ' ' " P DATA ' ' " P D
0x045244…0453d8 Dummy {f00=0x0015, f01=0x0190, f02=» p PSEC2 DATA 0 P DATA /12 P DATA 'CATALOG ' > P DATA 0 b P DATA 0 ~ P DATA 0 P DATA 0 P DATA X'FFFF' 6 P DATA '
0x0453d8…04556c Dummy {f00=0x0015, f01=0x0190, f02=» ' h 6 P DATA ' ' 6 P DATA ' ' L 6 P DATA ' ' 6 P DATA ' ' 6 P DATA
0x04556c…045700 Dummy {f00=0x0015, f01=0x0190, f02=» ' n 6 P DATA ' ' 6 P DATA ' ' R H PMXONE RES 1 ADRESS OF FIRST WORD OF THE MULTIPLEX. PNBRGRN DATA 0 PBUFRD RES 20
0x045700…045894 (0, 88) Opaque[0x194]
0x045894…045a28 # DirEnt {nam=»OBX «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x02c0, f03=0x0000}
0x045894…045a28 IdxSect {
0x045894…045a28 f00 = 0x0016 // 0x45894 @0x0
0x045894…045a28 f01 = 0x001a // 0x45896 @0x2
0x045894…045a28 gno = [ // 0x45898 @0x4
0x045894…045a28 [0x00]: C0x0016.0x0.0
0x045894…045a28 [0x01]: C0x0016.0x1.0
0x045894…045a28 [0x02]: C0x0016.0x2.0
0x045894…045a28 [0x03]: C0x0016.0x3.0
0x045894…045a28 [0x04]: C0x0017.0x0.0
0x045894…045a28 [0x05]: C0x0017.0x1.0
0x045894…045a28 [0x06]: C0x0017.0x2.0
0x045894…045a28 [0x07]: C0x0017.0x3.0
0x045894…045a28 [0x08]: C0x0018.0x0.0
0x045894…045a28 [0x09]: C0x0018.0x1.0
0x045894…045a28 [0x0a]: C0x0018.0x2.0
0x045894…045a28 [0x0b]: C0x0018.0x3.0
0x045894…045a28 [0x0c]: C0x0019.0x0.0
0x045894…045a28 ]
0x045894…045a28 }
0x045a28…045bbc Dummy {f00=0x0016, f01=0x0190, f02=» f d R p X T0 x F.F8mHmbm|m m m n n T0 * o 8 , @ | ~
0x045bbc…045d50 Dummy {f00=0x0016, f01=0x0190, f02=»
[…0x13…]
0x047b4c…047ce0 Dummy {f00=0x0016, f01=0x0190, f02=» ' '
0x047ce0…047e74 (0, 91) Dummy {f00=0x0016, f01=0x0190, f02=»
[…0x7…]
0x048980…048b14 (0, 92) Dummy {f00=0x0017, f01=0x0190, f02=»
[…0x1f…]
0x04bc00…04bd94 (0, 96) Dummy {f00=0x0018, f01=0x0190, f02=»
[…0xb…]
0x04cef0…04d084 Dummy {f00=0x0018, f01=0x0190, f02=» 0 0 0 0 0 0" $ &
0x04d084…04d218 Dummy {f00=0x0018, 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 % _ _
0x04d218…04d3ac Dummy {f00=0x0018, 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
0x04d3ac…04d540 Dummy {f00=0x0018, 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
0x04d540…04d6d4 (0, 98) Dummy {f00=0x0018, 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
0x04d6d4…04d868 Dummy {f00=0x0018, 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 (
0x04d868…04d9fc Dummy {f00=0x0018, 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
0x04d9fc…04db90 Dummy {f00=0x0018, 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 _
0x04db90…04dd24 Dummy {f00=0x0018, 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
0x04dd24…04deb8 Dummy {f00=0x0018, 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 { {
0x04deb8…04e04c Dummy {f00=0x0018, 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
0x04e04c…04e1e0 Dummy {f00=0x0018, 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 # ~
0x04e1e0…04e374 (0, 99) Dummy {f00=0x0018, 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`
0x04e374…04e508 Dummy {f00=0x0018, 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
0x04e508…04e69c Dummy {f00=0x0018, 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 + :
0x04e69c…04e830 Dummy {f00=0x0018, 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 + : &
0x04e830…04e9c4 Dummy {f00=0x0018, 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
0x04e9c4…04eb58 Dummy {f00=0x0018, 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 :
0x04eb58…04ecec Dummy {f00=0x0018, 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
0x04ecec…04ee80 Dummy {f00=0x0018, 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
0x04ee80…04f014 (0, 100) Dummy {f00=0x0019, 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 :
0x04f014…04f1a8 Dummy {f00=0x0019, 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
0x04f1a8…04f33c Dummy {f00=0x0019, 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
0x04f33c…04f4d0 Dummy {f00=0x0019, 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
0x04f4d0…04f664 Dummy {f00=0x0019, 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
0x04f664…04f7f8 Dummy {f00=0x0019, 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 '
0x04f7f8…04f98c Dummy {f00=0x0019, 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! ' {
0x04f98c…04fb20 Dummy {f00=0x0019, 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 '
0x04fb20…04fcb4 (0, 101) Opaque[0x194]
0x04fcb4…04fe48 # DirEnt {nam=»PDISC «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0328, f03=0x0000}
0x04fcb4…04fe48 IdxSect {
0x04fcb4…04fe48 f00 = 0x0019 // 0x4fcb4 @0x0
0x04fcb4…04fe48 f01 = 0x0008 // 0x4fcb6 @0x2
0x04fcb4…04fe48 gno = [ // 0x4fcb8 @0x4
0x04fcb4…04fe48 [0x00]: C0x0019.0x1.0
0x04fcb4…04fe48 [0x01]: C0x0019.0x2.0
0x04fcb4…04fe48 [0x02]: C0x0019.0x3.0
0x04fcb4…04fe48 [0x03]: C0x001a.0x0.0
0x04fcb4…04fe48 ]
0x04fcb4…04fe48 }
0x04fe48…04ffdc Dummy {f00=0x0019, f01=0x0190, f02=» + + . fY%w n b ] $ ^ : 9 i $ $- w z 4r tV u 3 qC + zuqL $ - > Pu ZD u c r F yL _b % ?Pp G > # J $ 4` 1F b-8 T x tB bfTg t z ^ b bLPL H b2 Z ` z
0x04ffdc…050170 Dummy {f00=0x0019, f01=0x0190, f02=» 4c @S{ D d 2Z $"z y B % y D Dbf d * F :P }B W [~ ? d j% L "~ T &b ICn 1 d @ < R:R: ` J bf b% bfpL 0 <h ll d : | ` ^ D)hH P D >~ `" f >~ $ d p 4d @u { H
0x050170…050304 Dummy {f00=0x0019, f01=0x0190, f02=» ^< 2 + . fY%w n b ] $ ^ : 9 :01 $ - > Pu ZD u c r F yL _b % ?Pp G > # J $ 4` 1F b-8 T x tB bfTg t z ^ b bLPL H b2 Z ` z
0x050304…050498 Dummy {f00=0x0019, f01=0x0190, f02=» 4c @S{ D d 2Z $"z y B % y D Dbf d * F :P }B W [~ ? d j% L "~ T &b ICn 1 d @ < R:R: ` J bf b% bfpL 0 <h ll d : | ` ^ D)hH P D >~ `" f >~ $ d p 4d @u {
0x050498…05062c Dummy {f00=0x0019, f01=0x0190, f02=» $ ^ : 9 :01 $ - > Pu ZD u c r F yL _b % ?Pp G > # J $ 4` 1F b-8 T x tB bfTg t z ^ b bLPL H b2 Z ` z
0x05062c…0507c0 Dummy {f00=0x0019, f01=0x0190, f02=» 4c @S{ D d 2Z $"z y B % y D Dbf d * F :P }B W [~ ? d j% L "~ T &b ICn 1 d @ < R:R: ` J bf b% bfpL 0 <h ll d : | ` ^ D)hH P D >~ `" f >~ $ d p 4d @u {
0x0507c0…050954 (0, 102) Dummy {f00=0x0019, f01=0x0190, f02=» $ ^ : 9 :01 $ - > Pu ZD u c r F yL _b % ?Pp G > # J $ 4` 1F b-8 T x tB bfTg t z ^ b bLPL H b2 Z ` z
0x050954…050ae8 Dummy {f00=0x0019, f01=0x0190, f02=» 365 2 0 H b z 0 D 400PDISC REL 1.2 DATE 79.12.21 12NC=8701 082 40120 STATUS WORD: XXXX FORMAT ERROR END PDISC PDISC: DISC NOT OPERABLE DISC I/O ERROR NO TOSS DISC FORMAT BADS
0x050ae8…050c7c Dummy {f00=0x0019, f01=0x0190, f02=»DISC OVERFLOW TOO MANY EXTENTS BLOCK LENGTH > 400 CHARACTERS VTOC OVERFLOW FILENAME ALREADY USED FILENAME UNKNOWN NO ENTRY AVAILABLE IN VTOC ` j z @ !FFP !EEP 9H @ F0] Y W$
0x050c7c…050e10 Dummy {f00=0x0019, f01=0x0190, f02=» A B A R @ NP A v H @ BQn A F A D H I @ NU H CRT ]B A @ @ H A @ A @ A DPD @ lP @ @ nT v W* v_. Y A h @ BP b ^ A d_ @ A b G ) @ F @ D A @ G @ @ X A X A A
0x050e10…050fa4 Dummy {f00=0x0019, f01=0x0190, f02=» 0 P ; ) 1 A @ h @ @ BR @ < A _ @_ ^P: @ @ BR8 @ @ A T @ BR b ^ ( A A d @ BZ6W @ ^ b G ) @ @ G @ @ ( hW, @ ! Q : @ < @ > P
0x050fa4…051138 Dummy {f00=0x0019, f01=0x0190, f02=» : P d : @ < @ > P T V _ 11P . B : 00 :: " _j : F @ % Q 9 A H @ NP F A f F A B A R : A B F Q 9 A B : t 0V , - P X 9A_ : A ( @
0x051138…0512cc Dummy {f00=0x0019, f01=0x0190, f02=» A : W p n C P n C ( : W W W Z ? $ Y :0123456789ABCDEF @ TOT @ SST B : @ LP" l @ A & * : X P $ Z @ Z
0x0512cc…051460 Dummy {f00=0x0019, f01=0x0190, f02=» R < ! P !,,P 5 _ _^ @ !@@TV @ ! CT< $ % Q ( ! P RX ! QR % _ Z W( @ ! AP P T A N T : Z V 8 5 W : @ !$$T` P$ ( ! P RH ! QB_ P
0x051460…0515f4 (0, 103) Dummy {f00=0x0019, f01=0x0190, f02=» S A 8 ( A c A d A f A h @ T A j l 2 A R @ PP (@ W " P T P @ NT @ j (Y A B : @ `T A ` @ $ A b A l t V W U& R" @ nP lW l ( % _6 U0 @ nP A @ v_j @ nP
0x0515f4…051788 Dummy {f00=0x0019, f01=0x0190, f02=» r_L v _V A ` A v @ H A : H E A pQ W V |Z" : ( % : ; [ [ [ [ : Z Z Z Z Z Z : @ $$T P ( ! R ! Q _
0x051788…05191c Dummy {f00=0x0019, f01=0x0190, f02=»S TOSS REL 9.2 UU $ 3 2P _ B , ) %? G.G K. A ;A; G. ] S S S S % =A S S 3 D @ P P " T W P N S W x ,:
0x05191c…051ab0 Dummy {f00=0x0019, f01=0x0190, f02=» P #P $ B. T P ' " : UU 3 2P _ J , ) G.G K. A ;A; G. ] S % T S S M % T S L H P P " P P N S
0x051ab0…051c44 Dummy {f00=0x0019, f01=0x0190, f02=»E _ M @ T* : P #P $ B. T P ' " : $ C C ( : @ 2 C @ P >B C ( B P Y : @ P >B C : A A 2 A A $ A % $ ! A A W B " T ! T :
0x051c44…051dd8 Dummy {f00=0x0019, f01=0x0190, f02=»W A ` A A A A 0 A 2 A A A A A 2 @ R 2 @ % ( B P" Y$ z @ ~ A @ @ P W " A @ P _j j ( $ A
0x051dd8…051f6c Dummy {f00=0x0019, f01=0x0190, f02=» z @ ~ A @ P W " T A 0 @ n ( ( B P Un ( _ , @ 2 $T P UD_, $ Y @ @ P W @ 0 @ 2P2 A 2 @ W" P2 @ V* A @ (
0x051f6c…052100 Dummy {f00=0x0019, f01=0x0190, f02=»T _> @ Q. ^n ( - _ @ Q ^ $ - _ A 0 O 0 8 @ Q. @ ( ( 1 @ Q2 ( ( 1 @ Q _ @ @ P W @ 1 W @ P W @ 1 W A 2 % 0P % % @ Q _*
0x052100…052294 (0, 104) Dummy {f00=0x001a, f01=0x0190, f02=»Tv 2 | @ Qd * BA % DS % PO % T % 5 Y 5 Y % , % B % % (_j R " T0 @ P W A ` A n .W W A A @ 2 ]" 2 2
0x052294…052428 Dummy {f00=0x001a, f01=0x0190, f02=» : @ P ( : @" ^ $ - _ A OK? 0OUTPUT VOLUME NAME: ! C C R A! " P A! ( : : B " $ ) Y " "& " "& A! ! ( " "& `! YP 2 :
0x052428…0525bc Dummy {f00=0x001a, f01=0x0190, f02=» S 2 A" #X $ : " " R ' # C ( B T$ B Q* ( , X % "' P % _L _P "' A" V A" R !LLPL @" TV R 1 R 8 PB R 6! P R 1 S * Y W : Y A" W R 6:A R 6 A" A" 2 A"
0x0525bc…052750 Dummy {f00=0x001a, f01=0x0190, f02=»" Z U Y _& @" Wh &4 T6 1 Q " 2 A" @" @" P 9B A" ( @" T : W W : _ @" T _ _ R @" !LLP PR P R XrW Rh P Q 1 &4 N_ A" 0 &4 ` 1 Q A" A" @" ] : $ : P . P #^ $ : : A" @" A
0x052750…0528e4 Dummy {f00=0x001a, f01=0x0190, f02=» : @" T % @" % Q : " % @" )B @" K @" K K K K K K K R 2 K R 1:H R K R !LLT R 4:H R 5 K K $ K & A" ( )B . " )B R !LLP R 6 K % R 4 K & K ( K ) ( @" % ' @" %
0x0528e4…052a78 Dummy {f00=0x001a, f01=0x0190, f02=» : A" @" Q* A" )P )d )B ( )l ( ) )B @" 0 A) ) *p ) *p " ) @" T * )B ) ( " @" : A" (X T @" T : A" A" #X A" T: % @" P* T" $ : P . P #^_: : "
0x052a78…052c0c Dummy {f00=0x001a, f01=0x0190, f02=» : Q _$ _D % ) I _ ( - : ) FILE )x 9 VOLUME NAME FILE EXT.NO EXTENT BASE EXTENT LENGTH ) A DELETED R _ P 0 - : ;
0x052c0c…052da0 Dummy {f00=0x001a, f01=0x0190, f02=» _ 1 T R P*j - _ : Q S W S Q R S P W S _ R _ ;A [ [ : @" T ( " @" : A" T @" T : A" A" #X A" T % @" P T $ : P . P #^_: : "
0x052da0…052f34 (0, 105) Opaque[0x194]
0x052f34…0530c8 # DirEnt {nam=»SUP001«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0348, f03=0x0000}
0x052f34…0530c8 IdxSect {
0x052f34…0530c8 f00 = 0x001a // 0x52f34 @0x0
0x052f34…0530c8 f01 = 0x0014 // 0x52f36 @0x2
0x052f34…0530c8 gno = [ // 0x52f38 @0x4
0x052f34…0530c8 [0x00]: C0x001a.0x1.0
0x052f34…0530c8 [0x01]: C0x001a.0x2.0
0x052f34…0530c8 [0x02]: C0x001a.0x3.0
0x052f34…0530c8 [0x03]: C0x001b.0x0.0
0x052f34…0530c8 [0x04]: C0x001b.0x1.0
0x052f34…0530c8 [0x05]: C0x001b.0x2.0
0x052f34…0530c8 [0x06]: C0x001b.0x3.0
0x052f34…0530c8 [0x07]: C0x001c.0x0.0
0x052f34…0530c8 [0x08]: C0x001c.0x1.0
0x052f34…0530c8 [0x09]: C0x001c.0x2.0
0x052f34…0530c8 ]
0x052f34…0530c8 }
0x0530c8…05325c Dummy {f00=0x001a, f01=0x0190, f02=»c Hi "R" "Z K , _ H) * * + +f,
0x05325c…0533f0 Dummy {f00=0x001a, f01=0x0190, f02=»
0x0533f0…053584 Dummy {f00=0x001a, f01=0x0190, f02=» c ' !z 0 B D Q U $0#P$ %tP P $DB U DML MCQ HDK WML RYM RDM ASN ABP PSP RSQ6 & TY J- LP / TK [
0x053584…053718 Dummy {f00=0x001a, f01=0x0190, f02=» $ FL 8 FL 8 FL ) 8 6 FL 9 8 l DK 3 zDK 8 3 r DK 3
0x053718…0538ac Dummy {f00=0x001a, f01=0x0190, f02=» ? ? ? ? ? ? ? _ & ? ? ? ? ? ? ? Z ? ? ? ? ? ? ? L 1 r
0x0538ac…053a40 Dummy {f00=0x001a, f01=0x0190, f02=» Z 0 f Z V f Z | f f B
0x053a40…053bd4 (0, 106) Dummy {f00=0x001a, f01=0x0190, f02=»I q q A A I A y J I q q A A I A y J 6 I q q A A I)A)y J N l I q q A A I9A9y J
0x053bd4…053d68 Dummy {f00=0x001a, f01=0x0190, f02=» 6 6 6 6
0x053d68…053efc Dummy {f00=0x001a, f01=0x0190, f02=» 6 6 6 6 6
0x053efc…054090 Dummy {f00=0x001a, f01=0x0190, f02=»
0x054090…054224 Dummy {f00=0x001a, f01=0x0190, f02=» p
0x054224…0543b8 Dummy {f00=0x001a, f01=0x0190, f02=»
[…0x1…]
0x05454c…0546e0 Dummy {f00=0x001a, f01=0x0190, f02=» J
0x0546e0…054874 (0, 107) Dummy {f00=0x001a, f01=0x0190, f02=»
[…0x1…]
0x054a08…054b9c Dummy {f00=0x001a, f01=0x0190, f02=» $
0x054b9c…054d30 Dummy {f00=0x001a, f01=0x0190, f02=»
[…0x4…]
0x055380…055514 (0, 108) Dummy {f00=0x001b, f01=0x0190, f02=»
0x055514…0556a8 Dummy {f00=0x001b, f01=0x0190, f02=» @ _ ? ? ? ? ? ? ? A R2 @ A A R$ A A R A A R A @"X > > > > > > > > ? ? ? ? ? ? ?
0x0556a8…05583c Dummy {f00=0x001b, f01=0x0190, f02=» P A ' @ Q A ' A! ' A A(|_ @ A# ^ 9j ?R > > > > > > > A @# E E E E E E > > a @ E # @ ? ? > !z P P Q P ! P @ $. R @ P W ' <
0x05583c…0559d0 Dummy {f00=0x001b, f01=0x0190, f02=» (P& P (_ =a:a =A:A Z P Z _" TR @ ;a=a R W* @ =a Z ;a RP ) i %0 E ' @ ;a=a R @ =a V ;A , P = - - _F @%0 L P< 0 Tt @ PR 0=a @ ?a RX @ ?a VN=A 0 ( P>P< , T
0x0559d0…055b64 Dummy {f00=0x001b, f01=0x0190, f02=» &8 'D D >a @ =a 'v D U@ x &bW U, @% x &|W @& A& ,P$ _: @% @% @% @% @& @& _ A% A% A% A% A& A& B A'( A& B :a Y B R A& _ @% ' W4 @& A& ,Xp _ <
0x055b64…055cf8 Dummy {f00=0x001b, f01=0x0190, f02=» U P" @'4 @'6 @'8 @': @'< @'> @'@ 'B @'4 x @% 8R P =A_ %_ XJ _ P0 @ !@T @" @" R P< E" " A" A ^ 9j =Q > > > > > > > > P @ !@ ) @ P @ X0 , ) A _< U` A(| @ , L ? ? , L L L L L
0x055cf8…055e8c Dummy {f00=0x001b, f01=0x0190, f02=» > > [ [ A @" H" " ? A" > @ P ,V$ A (> @ 9 (> T A #t @ ) ? ? >_ T PT PJV P>V SH? V :!9 V @ P R W ;A [ [ : _4 Pj T
0x055e8c…056020 Dummy {f00=0x001b, f01=0x0190, f02=» [ [ : 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 [ [ : # P| ' PL + ; R <a V 9A:A ; V ; V V
0x056020…0561b4 (0, 109) Dummy {f00=0x001b, f01=0x0190, f02=»< R $ <A Q! T! U! :$ _ < Z& ,:W _ < <A9 R :a ; V < R ; V < V _" _ ? < V < V @ < _,; RJ ! P 0 9 T! T! V T! U! : R Q ;H [ [ : ! _J ? ? ? ? ? ? ? Q _ ^ ( H _l -, W - W
0x0561b4…056348 Dummy {f00=0x001b, f01=0x0190, f02=» ? - A X #? P ? ? ? ? ? ? ? - A, ? (@ @ % ? ? ? ? ? ? ? - A (@_$ > ? ? ? ? ? ? ? . A ? ? ? ? ? ? ? . A, ? ? ? ? ? ? ? .8 A&(@_~ > X R Y _ X D $! TR ? ? ? ? ? ? ? .| A8 8 M ? ? ?
0x056348…0564dc Dummy {f00=0x001b, f01=0x0190, f02=» >F$ <A > Pl > X X X M M Y ? ? ? ? ? ? ? /` Al ? ? ? ? ? ? ? /x A (@ @ X U P U T" Y 0 Y Y X Q Y _ X X X U 5 X E _ X 4 Y 5 X 4 Y ! 1P, 0P +P
0x0564dc…056670 Dummy {f00=0x001b, f01=0x0190, f02=» ? ? ? ? ? ? 0 Al(@ Y L X X X R 5 X X - >F X Q Y Y X Y x ? ? ? ? ? ? ? 1 A, Y Y X X T ? ? ? ? ? ? ? 1, A& > > > > > > > > > R X X Q Y ( O` ? ? ? ? ? ? ? 1z Al ? ? ?
0x056670…056804 Dummy {f00=0x001b, f01=0x0190, f02=»1 Al(@ L X 4Q W 9AY T Q P &W -W /W ? ? A2: 9AY A2< T< @2: V D3* @2< R $WVP Q @2< T D2 W>:#@'=" @2: Q @2< R~ Qz 9AY Tn9ATj @2: D3N @2< $W 1 Y $ D ! P 1 Y 0 P
0x056804…056998 Dummy {f00=0x001b, f01=0x0190, f02=»P X 1 ' Q X >T X X R ( 5 Y P _84 X Y L P 6PW* L % P M M M M 4 B % ?A ' B % B =e L P H 6P H L X T $ T M W& M L y W =C- M $ T& M
0x056998…056b2c Dummy {f00=0x001b, f01=0x0190, f02=»" * A5E- A5 L " ! UJ ! Q L W 5 W6 T 5, B" (@ T X @ R >F >FM (% , ! R " T* L L 5dW L W L L 5xW L 5 A M 5 W W =h C L % Ph L =c M B !?PN P6! TD C B <b $ !@ <B C O C
0x056b2c…056cc0 Dummy {f00=0x001b, f01=0x0190, f02=» B M 6l O 8B M T8 L T: P* M 6 _vW C B % T L 6 5 6T M P* L P L 4 M L P <C M =C M 7 > 4 X ? ? ? ? ? ? ? 7( A8P _ =b%0 X $ L <B<j P L >>$ _ >> L
0x056cc0…056e54 (0, 110) Dummy {f00=0x001b, f01=0x0190, f02=» P L !# 6r 6r L !# Q $ P L x P 6r 8 > M L =H =A^ 4` A87=` M 4 8L 6(W C >F B"9 :B:B9 9 :B:B9 9|: : < > = ? : ; ? . - M ! P M W0 L $ P M P M P M * L $@ M X Y
0x056e54…056fe8 Dummy {f00=0x001b, f01=0x0190, f02=» _ (% ?a' 8 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 > W` M L . > > L ( = Q M ( M * L . M ( L & 9A (ZN YT (ZZ Y` W L 0Zp
0x056fe8…05717c Dummy {f00=0x001b, f01=0x0190, f02=»V M _J _x _ M .W 9a M ( X M . : M 9 L $ T $ > X X M Q> =b%0 X $ X $? P L , >> L _ L < M < L P FLT L TB L , X M =b%0 X $ L <B<j P L , >>_ :A^ = L $ L @P
0x05717c…057310 Dummy {f00=0x001b, f01=0x0190, f02=» M > > > > > > > > @ M M M > > > > > > > > M M M L $ P ? L 4 Q 9A Q P L 4 ? =A Q M 4 < L T (@ >> > L $ L =AR = R ? P P ? =A Y 7 M T P (T # T 9AR _ L 9KVN9BR 9A
0x057310…0574a4 Dummy {f00=0x001b, f01=0x0190, f02=»= 8 X L *(@ M * L _D X Mm M 1P ] >>(@ > 1 Q M * = 8 M * M = ? @ ? > X B A>8 B (@ ' X X W W ' # C C P L L m A , DKP L P L @ _ C C #
0x0574a4…057638 Dummy {f00=0x001b, f01=0x0190, f02=» X P % Y X R X >T ! X Y T T Y Y Y Y Y U U X @ _ X X X X P? ? ? @b@* P $ Y Y Y Y > >* Y 8 TPP" X R 8 TYX WH H@$ Y _8 X X: X R X ( _$ _* $
0x057638…0577cc Dummy {f00=0x001b, f01=0x0190, f02=» X*Y$ X X X6 Y Z(P A@X ZrP Y _8 _< _@ ! >> $0 X M A@ T b" >> X X B AA P X $ ? _" B W B W A W I W J X %?W X %? AAf AAj > > > > > > > Ah V <a W X ' ?A q
0x0577cc…057960 Dummy {f00=0x001b, f01=0x0190, f02=»L X >F (@(@ L % T> L % T6 L % T. L %?P& P" L % - AB_M T % T L T 4 L R % _X R _ 1 Tt M " L '? L U "T J WP T J2WF T I B C B B C C C C C C C B C E W* G, W" E W H L :AR| M
0x057960…057af4 (0, 111) Dummy {f00=0x001b, f01=0x0190, f02=»C W M " J L P L 9JR@ P P T J 5 U P T Q P P W Q P T@(@ L D " Q L Q Q L Q L ( L ! TNW P T P P W Q L ' @ P p Y "(@ P P $ M C P ( M P Q P
0x057af4…057c88 Dummy {f00=0x001b, f01=0x0190, f02=» ( P _ 0 4 ) % ] M (@ L 2 J T R Q @ ] J > 9C 9C > ^ U (@ L T U U U M L M L M M L 4 C L J ! :c:A J L T V P T"W L >F J L & J E M 4 E0 M L M L " P
0x057c88…057e1c Dummy {f00=0x001b, f01=0x0190, f02=» % T D V L ! P L ! XfWn L M L M M F C L :c:A L D V D M L ! T*_ L < J < R M M "W G M 4 E0 L E M L "! J L 2 L T L P L D Q GZ M 2 F0 L L $:BV W $:AV M " M J L L
0x057e1c…057fb0 Dummy {f00=0x001b, f01=0x0190, f02=» 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 J L J L U H M 2 F0 L M $ L M & L L
0x057fb0…058144 Dummy {f00=0x001b, f01=0x0190, f02=» L R 0 % _ M M L . P M . IL M 2 F0 L U I M 2 F0 L L L & ) L $ I L M L L U M J @ M L M M M W L J @ M M ( L P0W" M L J @ M ( L U J` M 2 F0 L L ( E L % E
0x058144…0582d8 Dummy {f00=0x001b, f01=0x0190, f02=» m M ^ U L ( L L ? ? ? ? ? ? ? A A R 4 R W 7 Tt Q K K K K K R K 5 L ( "^ L4( "^ 5 L@ $ @L: b 4T W j b H bP H d _ AK L AR 5 T6 @R P R K K K K K @R AR
0x0582d8…05846c Dummy {f00=0x001b, f01=0x0190, f02=» L R 0 % _ M M L . P M . IL M 2 5 L T( T L P T( - _ K 5 T( T T( T * :a;a L :A ;A Q K T Mn 0P M Y _ 1 X 1 M M W8 M& M X W* 8 AM T AM M (@( >> >F : 0 :R -
0x05846c…058600 Dummy {f00=0x001b, f01=0x0190, f02=» 8 FL L X X ! R V Y ANJ 8 TKP Y LPP MTP Y Y T T Y Y U U 0!? 5T W 1 Q TKP MTT Y P ; Y (@ K P Q 1 K >Z X X ? ? ? ? ? ? ? N Al_ 5 T( L @ Q P P
0x058600…058794 (0, 112) Dummy {f00=0x001c, f01=0x0190, f02=» ] K 0DKER UNIT CYLD STAT OZ O > Oh O W2 Ob O X W$ On O W Ot( X = 0 :R # Y P O 0AB CD ADDR @ 9a:a;a R R AP8 P: AR _ ' _ P A @R P$ @P8 = ^
0x058794…058928 Dummy {f00=0x001c, f01=0x0190, f02=» @ A @ !? #t A! R _* 5 @R L @ A K 0 Tt AQ, AQ. Q* ( "^ @ A ' U 5 @ 4 L P T( _ 5 K 5 T( AQ T( R: P T( R( Q ( "^ Q ^ @ T Q ( "^ K L Q I/0 ERROR QQ P
0x058928…058abc Dummy {f00=0x001c, f01=0x0190, f02=» Z H @R P : Rp ` : L> ISTAT c _* AR RX ( "^ : ; ;<A ' R `R Q QLy _ QLx<a : : : , A ~(@ A" AR A A A A AR AR AR a S @ ? ? > !z P :b" Q P T4 P Q Q @ @ @ @
0x058abc…058c50 Dummy {f00=0x001c, f01=0x0190, f02=»; V W # @ A AR @ ? ? > Q @ ? ? ? ? ? ? ? T P< @ P <a:a L :A : P6 $ R, Z R R Q $ :D P $ R ^& : L P R( ATb ATd ATf ATh ATj ATl ATn Tp ,:j Z ( I ^ - ^
0x058c50…058de4 Dummy {f00=0x001c, f01=0x0190, f02=» @U @! $ & $ C "! PX @ Q P VF_ P RN;AR P P4 0 P P C C C LPT P P C # ' C _: DL P H C _ P X( DD _Z :EOS :EOF > > > @ !? ?R _ V > ' !? 0X A "! X6 @ Q P
0x058de4…058f78 Dummy {f00=0x001c, f01=0x0190, f02=»(@ M M M B B M M # C C @ _ "ZN(@(@ ^ :j >Z _ m (@ M M 8 DKT X X T X M W M W y Y Y Y # C B > B > $? U P R U P R X U P Pv P
0x058f78…05910c Dummy {f00=0x001c, f01=0x0190, f02=»W X(W Wx 8 MTPp DYPj X T Y $ WZ XRWX $ # T $ T Y B W0 %@ R b " Y Y Y Y Y $ X _0 8 TCX< TKXB MTXH DYXN :EOS:EOV > > > AX X !? Q[PP ^ > V X > > X A
0x05910c…0592a0 Dummy {f00=0x001c, f01=0x0190, f02=»9A Y _2 !Z<Y@ 9 R !ZT !ZX AX XT_ X Y Y _^ !Z@ ![ tW !Z@ !ZD] ! X W !ZH 9C^ W| !ZL_ !ZP Wn !ZT_ X Y Y _ X r s W4 X @ _ W$ AW @W $W %W W !W W X 9d)` AX AX A T @ 9CV * 9AV 9AV X 1P * 9EV )@ X
0x0592a0…059434 (0, 113) Dummy {f00=0x001c, f01=0x0190, f02=»T ; @X U X @X X 4YPYPYnYnYnYnY Y Y Y Y Y Z Z Y Y Z Z &" 13468$$ :EOS:EOV Y Y "$&1368 A[l [n!? Q[ P ^ > A > X A_& X A_, Q R x % =A Y X Y4 Z8 A[d $ $ T D i [ !^ X "! T( !^
0x059434…0595c8 Dummy {f00=0x001c, f01=0x0190, f02=» !^ " P P !_ _ !^R ] ] > P Pj P P P @_" Y ] D P X &Q Y W Y 4 X $;H D :ET $;H D OSP OVT W W ! X ! P X 1P W @ X U W W W ! X ! . @Wp ! X ! Tb AW^ X P&
0x0595c8…05975c Dummy {f00=0x001c, f01=0x0190, f02=» , $ T D q A !^ !^ [p Y Y A_, A_& h !^ !^ W W A^v X 9c T D[h E[h 4 X B X :c H[h % ] !_ _N !_ !^V_X !_ _^ !^ Y " !^ _p [t_ X # ;dC Y A[f A[b @ A_"_ _ _( _, _0 _4 _8 _<
0x05975c…0598f0 Dummy {f00=0x001c, f01=0x0190, f02=» <j =h Qb P. ^ %x 8P P< X % !X %`X P % X. R" X>W % P T % XT <A P X^<a P @ p @ $ ! P $^ P< ! Ab Ab Ab Ab Ab Ab Ab b > > > > > > > ab @b E E E E E E
0x0598f0…059a84 Dummy {f00=0x001c, f01=0x0190, f02=»T ?f' W ! H Wx ! Wn & P >b& >AW >a& @T ! X X T$W. ! P X ` `T 8 P X 8 T! T! T "<A U! U! T! U! T! T! ? ? U! T! T! T! T! T! T! ! ! ! ! !
0x059a84…059c18 Dummy {f00=0x001c, f01=0x0190, f02=»P Y _" P" P& R| ^T Y _D _T X _ X _ X" X& T: X P4 0' P. 1R P _ 0$ XT % X` Z _f % _n Q4 8 TYP, R Y _$ P Q X Q % _" Y Y Y >*% X P Y $ W Y =D %_
0x059c18…059dac Dummy {f00=0x001c, f01=0x0190, f02=» 9 : : : @ P R ! R P L M M Y$ #? @ P R P T T T Y" P T _ X D D E E ] @ E @ d ? ? > ? ? ? ? ? ? ? g C ( "^ @h e U T "
0x059dac…059f40 Dummy {f00=0x001c, f01=0x0190, f02=» [ [ ^ [ [ [ [ @ L ! P Y _ @ M ^ U > > > > > > >WZ A ^ T " T0 ! P W SY SD AD _ ! P _, J _2 g # C ( "^ P
0x059f40…05a0d4 (0, 114) Dummy {f00=0x001c, f01=0x0190, f02=» Af Af J Af T. B B J (@" T L #( "^ B P @ !? M @h P M L R ! _ PP I H P _ A c A A A @ ~ g A ~ @g A ~ @ i ( K A A "^ R (@_0 $ ( , 0 4 8 < g U T "
0x05a0d4…05a268 Dummy {f00=0x001c, f01=0x0190, f02=» [ [ ^ [ [ [ [ @ L ! P Y _ @ M ^ U > > > > > > >W A ^ T " T ! P W SY SD AD _ ! P _, J _2 # C ( "^ P
0x05a268…05a3fc Dummy {f00=0x001c, f01=0x0190, f02=»12 r P RTN A14 P* ( P* 2 PSEGMIS EQU * < P LDK.L A10,8 X P RB SEGERR x P* P* PSEGNCT EQU * 0 P LDK.L A10,4 NOT CATALOGED P RB
0x05a3fc…05a590 Dummy {f00=0x001c, f01=0x0190, f02=» 0 0 P* NOT IN CATALOG P DATA /FF09 @ P DATA /0C00 ` P* 2 P DATA /FF14 SEG NAME MISSING P DATA 0 P* P EJECT P* P*
0x05a590…05a724 Dummy {f00=0x001c, f01=0x0190, f02=» RF RUNER0 PROG NAME ERROR > P RF RUN400 EXECUTE A CATALOGED PROGRAM 6 P RF RUNER0 x D P RF RUN420 BINARY VALUE ( MASTER FLAG ) 6 P* NO PROGRAM
0x05a724…05a8b8 Dummy {f00=0x001c, f01=0x0190, f02=» * P RF(0) RUNER1 /L EMPTY P ADK A5,0 2 . P RF(0) RUNER1 /L NO DEVICE P P* B P* NOW,SET JPT TO EXECUTE THE PROG " P LD A1,LFTBOT,A5 0 PRUN050 EQU
0x05a8b8…05aa4c Dummy {f00=0x001c, f01=0x0190, f02=»* 6 P LDK A1,0 MAX # OF SEG IN JPT $ P LC A1,JPTSEG,A11 D $ P CW A1,W:SEG0,A13 l * P RF(2) RUN100 LESS,0K : P* GREATER,#OF SEG = WSEG0 $ P
0x05aa4c…05abe0 Dummy {f00=0x001c, f01=0x0190, f02=» RF(0) RUN200 EXIT P LDR A2,A13 & 0 P ADK.L A2,W:SEG1 MOVE SEG ADDR F P LDR A3,A11 z " P ADK A3,JPTROT+2 P* PRUN110 EQU * P LDR* A4,A2 P
0x05abe0…05ad74 (0, 115) Opaque[0x194]
0x05ad74…05af08 # DirEnt {nam=»SUP002«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0398, f03=0x0000}
0x05ad74…05af08 IdxSect {
0x05ad74…05af08 f00 = 0x001c // 0x5ad74 @0x0
0x05ad74…05af08 f01 = 0x0014 // 0x5ad76 @0x2
0x05ad74…05af08 gno = [ // 0x5ad78 @0x4
0x05ad74…05af08 [0x00]: C0x001c.0x3.0
0x05ad74…05af08 [0x01]: C0x001d.0x0.0
0x05ad74…05af08 [0x02]: C0x001d.0x1.0
0x05ad74…05af08 [0x03]: C0x001d.0x2.0
0x05ad74…05af08 [0x04]: C0x001d.0x3.0
0x05ad74…05af08 [0x05]: C0x001e.0x0.0
0x05ad74…05af08 [0x06]: C0x001e.0x1.0
0x05ad74…05af08 [0x07]: C0x001e.0x2.0
0x05ad74…05af08 [0x08]: C0x001e.0x3.0
0x05ad74…05af08 [0x09]: C0x001f.0x0.0
0x05ad74…05af08 ]
0x05ad74…05af08 }
0x05af08…05b09c Dummy {f00=0x001c, f01=0x0190, f02=»c Hi "R" "Z K , _ H) * * + +f,
0x05b09c…05b230 Dummy {f00=0x001c, f01=0x0190, f02=»
0x05b230…05b3c4 Dummy {f00=0x001c, f01=0x0190, f02=» c ' !z 0 B D Q U $0#P$ %tP P $DB U DML MCQ HDK WML RYM RDM ASN ABP PSP RSQ6 & TY J- LP / TK [
0x05b3c4…05b558 Dummy {f00=0x001c, f01=0x0190, f02=» $ FL 8 FL 8 FL ) 8 6 FL 9 8 l DK 3 zDK 8 3 r DK 3
0x05b558…05b6ec Dummy {f00=0x001c, f01=0x0190, f02=» ? ? ? ? ? ? ? _ & ? ? ? ? ? ? ? Z ? ? ? ? ? ? ? L 1 r
0x05b6ec…05b880 Dummy {f00=0x001c, f01=0x0190, f02=» Z 0 f Z V f Z | f f B
0x05b880…05ba14 (0, 116) Dummy {f00=0x001d, f01=0x0190, f02=»I q q A A I A y J I q q A A I A y J 6 I q q A A I)A)y J N l I q q A A I9A9y J
0x05ba14…05bba8 Dummy {f00=0x001d, f01=0x0190, f02=» 6 6 6 6
0x05bba8…05bd3c Dummy {f00=0x001d, f01=0x0190, f02=» 6 6 6 6 6
0x05bd3c…05bed0 Dummy {f00=0x001d, f01=0x0190, f02=»
0x05bed0…05c064 Dummy {f00=0x001d, f01=0x0190, f02=» p
0x05c064…05c1f8 Dummy {f00=0x001d, f01=0x0190, f02=»
[…0x1…]
0x05c38c…05c520 Dummy {f00=0x001d, f01=0x0190, f02=» J
0x05c520…05c6b4 (0, 117) Dummy {f00=0x001d, f01=0x0190, f02=»
[…0x1…]
0x05c848…05c9dc Dummy {f00=0x001d, f01=0x0190, f02=» $
0x05c9dc…05cb70 Dummy {f00=0x001d, f01=0x0190, f02=»
[…0x5…]
0x05d354…05d4e8 Dummy {f00=0x001d, f01=0x0190, f02=» @ _ ? ? ? ? ? ? ? A R2 @ A A R$ A A R A A R A @"X > > > > > > > > ? ? ? ? ? ? ?
0x05d4e8…05d67c Dummy {f00=0x001d, f01=0x0190, f02=» P A ' @ Q A ' A! ' A A(|_ @ A# ^ 9j ?R > > > > > > > A @# E E E E E E > > a @ E # @ ? ? > !z P P Q P ! P @ $. R @ P W ' <
0x05d67c…05d810 Dummy {f00=0x001d, f01=0x0190, f02=» (P& P (_ =a:a =A:A Z P Z _" TR @ ;a=a R W* @ =a Z ;a RP ) i %0 E ' @ ;a=a R @ =a V ;A , P = - - _F @%0 L P< 0 Tt @ PR 0=a @ ?a RX @ ?a VN=A 0 ( P>P< , T
0x05d810…05d9a4 Dummy {f00=0x001d, f01=0x0190, f02=» &8 'D D >a @ =a 'v D U@ x &bW U, @% x &|W @& A& ,P$ _: @% @% @% @% @& @& _ A% A% A% A% A& A& B A'( A& B :a Y B R A& _ @% ' W4 @& A& ,Xp _ <
0x05d9a4…05db38 Dummy {f00=0x001d, f01=0x0190, f02=» U P" @'4 @'6 @'8 @': @'< @'> @'@ 'B @'4 x @% 8R P =A_ %_ XJ _ P0 @ !@T @" @" R P< E" " A" A ^ 9j =Q > > > > > > > > P @ !@ ) @ P @ X0 , ) A _< U` A(| @ , L ? ? , L L L L L
0x05db38…05dccc Dummy {f00=0x001d, f01=0x0190, f02=» > > [ [ A @" H" " ? A" > @ P ,V$ A (> @ 9 (> T A #t @ ) ? ? >_ T PT PJV P>V SH? V :!9 V @ P R W ;A [ [ : _4 Pj T
0x05dccc…05de60 Dummy {f00=0x001d, f01=0x0190, f02=» [ [ : 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 [ [ : # P| ' PL + ; R <a V 9A:A ; V ; V V
0x05de60…05dff4 (0, 119) Dummy {f00=0x001d, f01=0x0190, f02=»< R $ <A Q! T! U! :$ _ < Z& ,:W _ < <A9 R :a ; V < R ; V < V _" _ ? < V < V @ < _,; RJ ! P 0 9 T! T! V T! U! : R Q ;H [ [ : ! _J ? ? ? ? ? ? ? Q _ ^ ( H _l -, W - W
0x05dff4…05e188 Dummy {f00=0x001d, f01=0x0190, f02=» ? - A X #? P ? ? ? ? ? ? ? - A, ? (@ @ % ? ? ? ? ? ? ? - A (@_$ > ? ? ? ? ? ? ? . A ? ? ? ? ? ? ? . A, ? ? ? ? ? ? ? .8 A&(@_~ > X R Y _ X D $! TR ? ? ? ? ? ? ? .| A8 8 M ? ? ?
0x05e188…05e31c Dummy {f00=0x001d, f01=0x0190, f02=» >F$ <A > Pl > X X X M M Y ? ? ? ? ? ? ? /` Al ? ? ? ? ? ? ? /x A (@ @ X U P U T" Y 0 Y Y X Q Y _ X X X U 5 X E _ X 4 Y 5 X 4 Y ! 1P, 0P +P
0x05e31c…05e4b0 Dummy {f00=0x001d, f01=0x0190, f02=» ? ? ? ? ? ? 0 Al(@ Y L X X X R 5 X X - >F X Q Y Y X Y x ? ? ? ? ? ? ? 1 A, Y Y X X T ? ? ? ? ? ? ? 1, A& > > > > > > > > > R X X Q Y ( O` ? ? ? ? ? ? ? 1z Al ? ? ?
0x05e4b0…05e644 Dummy {f00=0x001d, f01=0x0190, f02=»1 Al(@ L X 4Q W 9AY T Q P &W -W /W ? ? A2: 9AY A2< T< @2: V D3* @2< R $WVP Q @2< T D2 W>:#@'=" @2: Q @2< R~ Qz 9AY Tn9ATj @2: D3N @2< $W 1 Y $ D ! P 1 Y 0 P
0x05e644…05e7d8 Dummy {f00=0x001d, f01=0x0190, f02=»P X 1 ' Q X >T X X R ( 5 Y P _84 X Y L P 6PW* L % P M M M M 4 B % ?A ' B % B =e L P H 6P H L X T $ T M W& M L y W =C- M $ T& M
0x05e7d8…05e96c Dummy {f00=0x001d, f01=0x0190, f02=»" * A5E- A5 L " ! UJ ! Q L W 5 W6 T 5, B" (@ T X @ R >F >FM (% , ! R " T* L L 5dW L W L L 5xW L 5 A M 5 W W =h C L % Ph L =c M B !?PN P6! TD C B <b $ !@ <B C O C
0x05e96c…05eb00 Dummy {f00=0x001d, f01=0x0190, f02=» B M 6l O 8B M T8 L T: P* M 6 _vW C B % T L 6 5 6T M P* L P L 4 M L P <C M =C M 7 > 4 X ? ? ? ? ? ? ? 7( A8P _ =b%0 X $ L <B<j P L >>$ _ >> L
0x05eb00…05ec94 (0, 120) Dummy {f00=0x001e, f01=0x0190, f02=» P L !# 6r 6r L !# Q $ P L x P 6r 8 > M L =H =A^ 4` A87=` M 4 8L 6(W C >F B"9 :B:B9 9 :B:B9 9|: : < > = ? : ; ? . - M ! P M W0 L $ P M P M P M * L $@ M X Y
0x05ec94…05ee28 Dummy {f00=0x001e, f01=0x0190, f02=» _ (% ?a' 8 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 > W` M L . > > L ( = Q M ( M * L . M ( L & 9A (ZN YT (ZZ Y` W L 0Zp
0x05ee28…05efbc Dummy {f00=0x001e, f01=0x0190, f02=»V M _J _x _ M .W 9a M ( X M . : M 9 L $ T $ > X X M Q> =b%0 X $ X $? P L , >> L _ L < M < L P FLT L TB L , X M =b%0 X $ L <B<j P L , >>_ :A^ = L $ L @P
0x05efbc…05f150 Dummy {f00=0x001e, f01=0x0190, f02=» M > > > > > > > > @ M M M > > > > > > > > M M M L $ P ? L 4 Q 9A Q P L 4 ? =A Q M 4 < L T (@ >> > L $ L =AR = R ? P P ? =A Y 7 M T P (T # T 9AR _ L 9KVN9BR 9A
0x05f150…05f2e4 Dummy {f00=0x001e, f01=0x0190, f02=»= 8 X L *(@ M * L _D X Mm M 1P ] >>(@ > 1 Q M * = 8 M * M = ? @ ? > X B A>8 B (@ ' X X W W ' # C C P L L m A , DKP L P L @ _ C C #
0x05f2e4…05f478 Dummy {f00=0x001e, f01=0x0190, f02=» X P % Y X R X >T ! X Y T T Y Y Y Y Y U U X @ _ X X X X P? ? ? @b@* P $ Y Y Y Y > >* Y 8 TPP" X R 8 TYX WH H@$ Y _8 X X: X R X ( _$ _* $
0x05f478…05f60c Dummy {f00=0x001e, f01=0x0190, f02=» X*Y$ X X X6 Y Z(P A@X ZrP Y _8 _< _@ ! >> $0 X M A@ T b" >> X X B AA P X $ ? _" B W B W A W I W J X %?W X %? AAf AAj > > > > > > > Ah V <a W X ' ?A q
0x05f60c…05f7a0 Dummy {f00=0x001e, f01=0x0190, f02=»L X >F (@(@ L % T> L % T6 L % T. L %?P& P" L % - AB_M T % T L T 4 L R % _X R _ 1 Tt M " L '? L U "T J WP T J2WF T I B C B B C C C C C C C B C E W* G, W" E W H L :AR| M
0x05f7a0…05f934 (0, 121) Dummy {f00=0x001e, f01=0x0190, f02=»C W M " J L P L 9JR@ P P T J 5 U P T Q P P W Q P T@(@ L D " Q L Q Q L Q L ( L ! TNW P T P P W Q L ' @ P p Y "(@ P P $ M C P ( M P Q P
0x05f934…05fac8 Dummy {f00=0x001e, f01=0x0190, f02=» ( P _ 0 4 ) % ] M (@ L 2 J T R Q @ ] J > 9C 9C > ^ U (@ L T U U U M L M L M M L 4 C L J ! :c:A J L T V P T"W L >F J L & J E M 4 E0 M L M L " P
0x05fac8…05fc5c Dummy {f00=0x001e, f01=0x0190, f02=» % T D V L ! P L ! XfWn L M L M M F C L :c:A L D V D M L ! T*_ L < J < R M M "W G M 4 E0 L E M L "! J L 2 L T L P L D Q GZ M 2 F0 L L $:BV W $:AV M " M J L L
0x05fc5c…05fdf0 Dummy {f00=0x001e, f01=0x0190, f02=» 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 J L J L U H M 2 F0 L M $ L M & L L
0x05fdf0…05ff84 Dummy {f00=0x001e, f01=0x0190, f02=» L R 0 % _ M M L . P M . IL M 2 F0 L U I M 2 F0 L L L & ) L $ I L M L L U M J @ M L M M M W L J @ M M ( L P0W" M L J @ M ( L U J` M 2 F0 L L ( E L % E
0x05ff84…060118 Dummy {f00=0x001e, f01=0x0190, f02=» m M ^ U L ( L L ? ? ? ? ? ? ? A A R 4 R W 7 Tt Q K K K K K R K 5 L ( "^ L4( "^ 5 L@ $ @L: b 4T W j b H bP H d _ AK L AR 5 T6 @R P R K K K K K @R AR
0x060118…0602ac Dummy {f00=0x001e, f01=0x0190, f02=» L R 0 % _ M M L . P M . IL M 2 5 L T( T L P T( - _ K 5 T( T T( T * :a;a L :A ;A Q K T Mn 0P M Y _ 1 X 1 M M W8 M& M X W* 8 AM T AM M (@( >> >F : 0 :R -
0x0602ac…060440 Dummy {f00=0x001e, f01=0x0190, f02=» 8 FL L X X ! R V Y ANJ 8 TKP Y LPP MTP Y Y T T Y Y U U 0!? 5T W 1 Q TKP MTT Y P ; Y (@ K P Q 1 K >Z X X ? ? ? ? ? ? ? N Al_ 5 T( L @ Q P P
0x060440…0605d4 (0, 122) Dummy {f00=0x001e, f01=0x0190, f02=» ] K 0DKER UNIT CYLD STAT OZ O > Oh O W2 Ob O X W$ On O W Ot( X = 0 :R # Y P O 0AB CD ADDR @ 9a:a;a R R AP8 P: AR _ ' _ P A @R P$ @P8 = ^
0x0605d4…060768 Dummy {f00=0x001e, f01=0x0190, f02=» @ A @ !? #t A! R _* 5 @R L @ A K 0 Tt AQ, AQ. Q* ( "^ @ A ' U 5 @ 4 L P T( _ 5 K 5 T( AQ T( R: P T( R( Q ( "^ Q ^ @ T Q ( "^ K L Q I/0 ERROR QQ P
0x060768…0608fc Dummy {f00=0x001e, f01=0x0190, f02=» Z H @R P : Rp ` : L> ISTAT c _* AR RX ( "^ : ; ;<A ' R `R Q QLy _ QLx<a : : : , A ~(@ A" AR A A A A AR AR AR a S @ ? ? > !z P :b" Q P T4 P Q Q @ @ @ @
0x0608fc…060a90 Dummy {f00=0x001e, f01=0x0190, f02=»; V W # @ A AR @ ? ? > Q @ ? ? ? ? ? ? ? T P< @ P <a:a L :A : P6 $ R, Z R R Q $ :D P $ R ^& : L P R( ATb ATd ATf ATh ATj ATl ATn Tp ,:j Z ( I ^ - ^
0x060a90…060c24 Dummy {f00=0x001e, f01=0x0190, f02=» @U @! $ & $ C "! PX @ Q P VF_ P RN;AR P P4 0 P P C C C LPT P P C # ' C _: DL P H C _ P X( DD _Z :EOS :EOF > > > @ !? ?R _ V > ' !? 0X A "! X6 @ Q P
0x060c24…060db8 Dummy {f00=0x001e, f01=0x0190, f02=»(@ M M M B B M M # C C @ _ "ZN(@(@ ^ :j >Z _ m (@ M M 8 DKT X X T X M W M W y Y Y Y # C B > B > $? U P R U P R X U P Pv P
0x060db8…060f4c Dummy {f00=0x001e, f01=0x0190, f02=»W X(W Wx 8 MTPp DYPj X T Y $ WZ XRWX $ # T $ T Y B W0 %@ R b " Y Y Y Y Y $ X _0 8 TCX< TKXB MTXH DYXN :EOS:EOV > > > AX X !? Q[PP ^ > V X > > X A
0x060f4c…0610e0 Dummy {f00=0x001e, f01=0x0190, f02=»9A Y _2 !Z<Y@ 9 R !ZT !ZX AX XT_ X Y Y _^ !Z@ ![ tW !Z@ !ZD] ! X W !ZH 9C^ W| !ZL_ !ZP Wn !ZT_ X Y Y _ X r s W4 X @ _ W$ AW @W $W %W W !W W X 9d)` AX AX A T @ 9CV * 9AV 9AV X 1P * 9EV )@ X
0x0610e0…061274 (0, 123) Dummy {f00=0x001e, f01=0x0190, f02=»T ; @X U X @X X 4YPYPYnYnYnYnY Y Y Y Y Y Z Z Y Y Z Z &" 13468$$ :EOS:EOV Y Y "$&1368 A[l [n!? Q[ P ^ > A > X A_& X A_, Q R x % =A Y X Y4 Z8 A[d $ $ T D i [ !^ X "! T( !^
0x061274…061408 Dummy {f00=0x001e, f01=0x0190, f02=» !^ " P P !_ _ !^R ] ] > P Pj P P P @_" Y ] D P X &Q Y W Y 4 X $;H D :ET $;H D OSP OVT W W ! X ! P X 1P W @ X U W W W ! X ! . @Wp ! X ! Tb AW^ X P&
0x061408…06159c Dummy {f00=0x001e, f01=0x0190, f02=» , $ T D q A !^ !^ [p Y Y A_, A_& h !^ !^ W W A^v X 9c T D[h E[h 4 X B X :c H[h % ] !_ _N !_ !^V_X !_ _^ !^ Y " !^ _p [t_ X # ;dC Y A[f A[b @ A_"_ _ _( _, _0 _4 _8 _<
0x06159c…061730 Dummy {f00=0x001e, f01=0x0190, f02=» <j =h Qb P. ^ %x 8P P< X % !X %`X P % X. R" X>W % P T % XT <A P X^<a P @ p @ $ ! P $^ P< ! Ab Ab Ab Ab Ab Ab Ab b > > > > > > > ab @b E E E E E E
0x061730…0618c4 Dummy {f00=0x001e, f01=0x0190, f02=»T ?f' W ! H Wx ! Wn & P >b& >AW >a& @T ! X X T$W. ! P X ` `T 8 P X 8 T! T! T "<A U! U! T! U! T! T! ? ? U! T! T! T! T! T! T! ! ! ! ! !
0x0618c4…061a58 Dummy {f00=0x001e, f01=0x0190, f02=»P Y _" P" P& R| ^T Y _D _T X _ X _ X" X& T: X P4 0' P. 1R P _ 0$ XT % X` Z _f % _n Q4 8 TYP, R Y _$ P Q X Q % _" Y Y Y >*% X P Y $ W Y =D %_
0x061a58…061bec Dummy {f00=0x001e, f01=0x0190, f02=» 9 : : : @ P R ! R P L M M Y$ #? @ P R P T T T Y" P T _ X D D E E ] @ E @ d ? ? > ? ? ? ? ? ? ? g C ( "^ @h e U T "
0x061bec…061d80 Dummy {f00=0x001e, f01=0x0190, f02=» [ [ ^ [ [ [ [ @ L ! P Y _ @ M ^ U > > > > > > >WZ A ^ T " T0 ! P W SY SD AD _ ! P _, J _2 g # C ( "^ P
0x061d80…061f14 (0, 124) Dummy {f00=0x001f, f01=0x0190, f02=» Af Af J Af T. B B J (@" T L #( "^ B P @ !? M @h P M L R ! _ PP I H P _ A c A A A @ ~ g A ~ @g A ~ @ i ( K A A "^ R (@_0 $ ( , 0 4 8 < g U T "
0x061f14…0620a8 Dummy {f00=0x001f, f01=0x0190, f02=» [ [ ^ [ [ [ [ @ L ! P Y _ @ M ^ U > > > > > > >W A ^ T " T ! P W SY SD AD _ ! P _, J _2 # C ( "^ P
0x0620a8…06223c Dummy {f00=0x001f, f01=0x0190, f02=»12 r P RTN A14 P* ( P* 2 PSEGMIS EQU * < P LDK.L A10,8 X P RB SEGERR x P* P* PSEGNCT EQU * 0 P LDK.L A10,4 NOT CATALOGED P RB
0x06223c…0623d0 Dummy {f00=0x001f, f01=0x0190, f02=» 0 0 P* NOT IN CATALOG P DATA /FF09 @ P DATA /0C00 ` P* 2 P DATA /FF14 SEG NAME MISSING P DATA 0 P* P EJECT P* P*
0x0623d0…062564 Dummy {f00=0x001f, f01=0x0190, f02=» RF RUNER0 PROG NAME ERROR > P RF RUN400 EXECUTE A CATALOGED PROGRAM 6 P RF RUNER0 x D P RF RUN420 BINARY VALUE ( MASTER FLAG ) 6 P* NO PROGRAM
0x062564…0626f8 Dummy {f00=0x001f, f01=0x0190, f02=» * P RF(0) RUNER1 /L EMPTY P ADK A5,0 2 . P RF(0) RUNER1 /L NO DEVICE P P* B P* NOW,SET JPT TO EXECUTE THE PROG " P LD A1,LFTBOT,A5 0 PRUN050 EQU
0x0626f8…06288c Dummy {f00=0x001f, f01=0x0190, f02=»* 6 P LDK A1,0 MAX # OF SEG IN JPT $ P LC A1,JPTSEG,A11 D $ P CW A1,W:SEG0,A13 l * P RF(2) RUN100 LESS,0K : P* GREATER,#OF SEG = WSEG0 $ P
0x06288c…062a20 Dummy {f00=0x001f, f01=0x0190, f02=» RF(0) RUN200 EXIT P LDR A2,A13 & 0 P ADK.L A2,W:SEG1 MOVE SEG ADDR F P LDR A3,A11 z " P ADK A3,JPTROT+2 P* PRUN110 EQU * P LDR* A4,A2 P
0x062a20…062bb4 (0, 125) Opaque[0x194]
0x062bb4…062d48 # DirEnt {nam=»TOSSUT«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x03e8, f03=0x0000}
0x062bb4…062d48 IdxSect {
0x062bb4…062d48 f00 = 0x001f // 0x62bb4 @0x0
0x062bb4…062d48 f01 = 0x0010 // 0x62bb6 @0x2
0x062bb4…062d48 gno = [ // 0x62bb8 @0x4
0x062bb4…062d48 [0x00]: C0x001f.0x1.0
0x062bb4…062d48 [0x01]: C0x001f.0x2.0
0x062bb4…062d48 [0x02]: C0x001f.0x3.0
0x062bb4…062d48 [0x03]: C0x0020.0x0.0
0x062bb4…062d48 [0x04]: C0x0020.0x1.0
0x062bb4…062d48 [0x05]: C0x0020.0x2.0
0x062bb4…062d48 [0x06]: C0x0020.0x3.0
0x062bb4…062d48 [0x07]: C0x0021.0x0.0
0x062bb4…062d48 ]
0x062bb4…062d48 }
0x062d48…062edc Dummy {f00=0x001f, f01=0x0190, f02=» r 9Sf ` 0 "z y oE H z $ 6 ~ Gw " R>o +u lK w [ 7]d +b% L M "~ T % A: ( : < R:R: + RC: "r d z " `# F : t ` `H H 5 ]m `" <^# 5 " [ h=} 6+ @ }O
0x062edc…063070 Dummy {f00=0x001f, f01=0x0190, f02=» b Fr ^a : 6 b END OF ; PROGRAM ABORTED BY OPERATOR; @ C ( B P ^_ B U+ Y C : $ !; P I $ ;Z I $ " C C ( : $ !; P I $ ;Z I $ " _: [ " " )
0x063070…063204 Dummy {f00=0x001f, f01=0x0190, f02=» A Z Z Z Z : [ _ ( Y R ( Y$R ( ( Y6 _ [ [ Q. , 0R" 9U AR FQ 0 P =D _, [ Z Z : = ! U 9 - Y : [ [ [ [ [ [ [ V Wf
0x063204…063398 Dummy {f00=0x001f, f01=0x0190, f02=» Z Z Z Z : T* >EV U+ ZN ` T* >BV HW&_d>AV$ P~ >Px Pr PlW _ A T* >FV :A H,P @ Y H,R @ Z >AV - W _ _ @ @ >BV -W4>AV -W,>AV( B ` R _ @ @ - - T.a A R T* > R > _d
0x063398…06352c Dummy {f00=0x001f, f01=0x0190, f02=» M ^ R _ ) W _ " " @ / P0Q W ;A @ H/ , P " @ :A H) A H) A " R _ P 0 - : ; [ V - - ' d Z : :
0x06352c…0636c0 Dummy {f00=0x001f, f01=0x0190, f02=» ; [ [ [ [ B@ , , ' , , d , , B Z Z Z Z : : ; X : V *W R - _ 1 T R P - _ : S Q"R S P W S _ R Q _
0x0636c0…063854 (0, 126) Dummy {f00=0x001f, f01=0x0190, f02=» : M ^ R _ W _ " " @ P0Q W ;A @ H , P " @ :A H A H A " R _ P 0 - : ; [ V - - ' d Z : :
0x063854…0639e8 Dummy {f00=0x001f, f01=0x0190, f02=» ; [ [ [ [ B@ , , ' , , d , , B Z Z Z Z : : ; X : V *W R - _ 1 T R P - _ : S Q"R S P W S _ R Q _
0x0639e8…063b7c Dummy {f00=0x001f, f01=0x0190, f02=» : M ^ R _ W _ " " @ P0Q W ;A @ H , P " @ :A H A H A " R _ P 0 - : ; [ V - - ' d Z : :
0x063b7c…063d10 Dummy {f00=0x001f, f01=0x0190, f02=» ; [ [ [ [ B@ , , ' , , d , , B Z Z Z Z : : ; X : V *W R - _ 1 T R P - _ : S Q"R S P W S _ R Q _
0x063d10…063ea4 Dummy {f00=0x001f, f01=0x0190, f02=» : M ^ R _ W _ " " @ P0Q W ;A @ H , P " @ :A H A H A " R _ P 0 - : ; [ V - - ' d Z : :
0x063ea4…064038 Dummy {f00=0x001f, f01=0x0190, f02=» ; [ [ [ [ B@ , , ' , , d , , B Z Z Z Z : : ; X : V *W R - _ 1 T R P - _ : S Q"R S P W S _ R Q _
0x064038…0641cc Dummy {f00=0x001f, f01=0x0190, f02=» : M ^ R _ W _ " " @ P0Q W ;A @ H , P " @ :A H A H A " R _ P 0 - : ; [ V - - ' d Z : :
0x0641cc…064360 Dummy {f00=0x001f, f01=0x0190, f02=» ; [ [ [ [ B@ , , ' , , d , , B Z Z Z Z : : ; X : V *W R - _ 1 T R P - _ : S Q"R S P W S _ R Q _
0x064360…0644f4 (0, 127) Dummy {f00=0x001f, f01=0x0190, f02=» : M ^ R _ W _ " " @ P0Q W ;A @ H , P " @ :A H A H A " R _ P 0 - : ; [ V - - ' d Z : :
0x0644f4…064688 Dummy {f00=0x001f, f01=0x0190, f02=» ; [ [ [ [ B@ , , ' , , d , , B Z Z Z Z : : ; X : V *W R - _ 1 T R P - _ : S Q"R S P W S _ R Q _
0x064688…06481c Dummy {f00=0x001f, f01=0x0190, f02=» : M ^ R _ W _ " " @ P0Q W ;A @ H , P " @ :A H A H A " R _ P 0 - : ; [ V - - ' d Z : :
0x06481c…0649b0 Dummy {f00=0x001f, f01=0x0190, f02=» ; [ [ [ [ B@ , , ' , , d , , B Z Z Z Z : : ; X : V *W R - _ 1 T R P - _ : S Q"R S P W S _ R Q _
0x0649b0…064b44 Dummy {f00=0x001f, f01=0x0190, f02=» : M ^ R _ W _ " " @ P0Q W ;A @ H , P " @ :A H A H A " R _ P 0 - : ; [ V - - ' d Z : :
0x064b44…064cd8 Dummy {f00=0x001f, f01=0x0190, f02=» ; [ [ [ [ B@ , , ' , , d , , B Z Z Z Z : : ; X : V *W R - _ 1 T R P - _ : S Q"R S P W S _ R Q _
0x064cd8…064e6c Dummy {f00=0x001f, f01=0x0190, f02=» : M ^ R _ W _ " " @ P0Q W ;A @ H , P " @ :A H A H A " R _ P 0 - : ; [ V - - ' d Z : :
0x064e6c…065000 Dummy {f00=0x001f, f01=0x0190, f02=» ; [ [ [ [ B@ , , ' , , d , , B Z Z Z Z : : ; X : V *W R - _ 1 T R P - _ : S Q"R S P W S _ R Q _
0x065000…065194 (0, 128) Dummy {f00=0x0020, f01=0x0190, f02=» : M ^ R _ W _ " " @ P0Q W ;A @ H , P " @ :A H A H A " R _ P 0 - : ; [ V - - ' d Z : :
0x065194…065328 Dummy {f00=0x0020, f01=0x0190, f02=» ; [ [ [ [ B@ , , ' , , d , , B Z Z Z Z : : ; X : V *W R - _ 1 T R P - _ : S Q"R S P W S _ R Q _
0x065328…0654bc Dummy {f00=0x0020, f01=0x0190, f02=» : M ^ R _ W _ " " @ P0Q W ;A @ H , P " @ :A H A H A " R _ P 0 - : ; [ V LPOP XLS TK1 TK2 MT1 MT2 pqCSH W @ ` F3Q
0x0654bc…065650 Dummy {f00=0x0020, f01=0x0190, f02=»W: : R !LLT : @ ` !YYT A @ &T : !NNX ' A$4W* A$2 A$4 A$. A$0W$ A$0 A$4W A$. A$4W A$4 A$. A$0 A$2 &H "r @$0P * W @$.P * W @$4P * A$0W * W [ : H"r P P _ A"x @$2T A A"yW @$0P A _ A _
0x065650…0657e4 Dummy {f00=0x0020, f01=0x0190, f02=» :FATAL ASSIGN ERROR ; "z T @$0T "] : @ ` DKTj A : @ ` DKP WX A : @ ` DKX. W6 S DK & A H H P Y S ( S : W $ D ! P !TTP $ 'N $.W0 'N $&W& 'N $& E P '
0x0657e4…065978 Dummy {f00=0x0020, f01=0x0190, f02=»W2 : @ ` R& I$* : W @ `! P !P T A : [ : $:W A$2 & W ^ _ A$2WH (" @ # ( B # ThW* IBM LABEL;TOSS LABEL; A$2W (" @ #( B $2P R P $ T W T # T :' P # P (.W (8 _ `
0x065978…065b0c Dummy {f00=0x0020, f01=0x0190, f02=» : $ _ _X S : W @ A :TOSS UTILITIES REL. 9.2 DATE = 79 11 16 12NC=870136640920; CC: WHAT?? CRV CRF DLF PVC E , 9:)*+ W 8
0x065b0c…065ca0 Dummy {f00=0x0020, f01=0x0190, f02=» <=; > ?8 U C GHF@ 8J KLMVQRSTO 8 NP B AI A A V! VAV!T V"V"$, B A A A A A A AVAVA T A A A A V!VAVA A A E E AV!E A VAV! AV!V!W! AW! A AT V/V/T @ ! AV! A
0x065ca0…065e34 (0, 129) Dummy {f00=0x0020, f01=0x0190, f02=» 2 c
0x065e34…065fc8 Dummy {f00=0x0020, f01=0x0190, f02=» $p$6$ $ $ $ $ $6$ $ $ & & 't't$ $ ' $ ' $p $ $:$ ( ( $ ) $ $ %$ &t ) & ) $ $ & $ % % $ )* $ $ & )2)8$ )" $ ( . 1 2 7
0x065fc8…06615c Dummy {f00=0x0020, f01=0x0190, f02=» > E K N (D' 1:1V1 1x1 1 1 1 1 1 2 2 2$2.2:1H1j2D2^ 2x4 2~2 2 2 2 2 2 3 3 3 3$323N1: 3^3n3~3 1V3 3 3 1 3 3 4 1 3 2x 4 444 444T4p2~4 4 4 4 4 4 4 1 5 5&1 5B 5^4 5n5n5n2 1 5 0 0"040>0F0N0X0h0t0t0 0 0 0
0x06615c…0662f0 Dummy {f00=0x0020, f01=0x0190, f02=»7 7 7 7 8 8$888V8$7 5 5 6 :$5 5 8 5 5 8 7L6 5 5 7 7 769,8r5 5 7 7 769,8 8 5 5 8x9 8 9 5 5 6 9D7 7v6f9X9n9 7 7 767 7v6f9X9n9 7 7 76 9 9 7 7v9 7 76 7 5 7 7v6f9X9n: 7 7 9 7h5 8x 8 6 PRINT DEVICE:;OLD RESP. NEW DISC:;VOLUME NAME:; OLD RESP. NEW VOLUME N
0x0662f0…066484 Dummy {f00=0x0020, f01=0x0190, f02=»ENGTH:; MAXIMUM NUMBER OF RECORDS:; SECTOR NUMBER:; POSITION:;HEX.VALUE:; FILE ORG:;*** INPUT DEFINITION ***; *** OUTPUT DEFINITION ***;PACK:;OUTPUT DEVICE:; LABELLED TAPE:; SEQ. NUMBER INPUT TAPE:;SEQ. NUMBER OUTPUT TAPE:; BLOCK FACTOR INPUT TAPE:; BLOCK FACTOR O
0x066484…066618 Dummy {f00=0x0020, f01=0x0190, f02=»NGTH:;MONITOR NUMBER:;START SWITCH ON SOP:; MORE THAN ONE APPLICATION :;DATA SET NAME:; BOE-SECTOR:;EOE-SECTOR:;EXPIRATION DATE:; VOLUME INITIALIZATION:; SECTOR OF DATA SET LABEL:;NUMBER OF INDEX FILES:; KEY ADDRESS WITHIN DATA RECORD:;KEY LENGTH IN DATA RECORD:;
0x066618…0667ac Dummy {f00=0x0020, f01=0x0190, f02=»MAX NO OF RECORDS ON OUTPUT INDEX FILE:;SUB-KEY ADDRESSES IN RECORD:; SUB-KEY LENGTHS IN RECORD:; ***WORK FILE DEFINITION***; WORK FILE NAME:;SORTING IN ASCENDING ORDER:;REORGANIZE DISC:; DISC NOT OPERABLE;BADSPOT ON TRACK ZERO.DISC NOT USABLE;MORE THAN 5 BADSPOTS
0x0667ac…066940 Dummy {f00=0x0020, f01=0x0190, f02=»TENTS NEEDED; ILLEGAL BLOCK LENGTH; VTOC OVERFLOW;NO FREE SPACE ENTRY AVAILABLE;FILE NAME ALREADY USED; NO TOSS DISC FORMAT;TAPE UNIT NOT OPERABLE; OUTPUT DISC NOT EMPTY;FAULTY RECORD LENGTH; OUTPUT FILE NOT LARGE ENOUGH; OUTPUT FILE NOT EMPTY;TAPE UNIT NOT LOCKED
0x066940…066ad4 (0, 130) Dummy {f00=0x0020, f01=0x0190, f02=»G;TAPE MARK MISSING AFTER LABEL RECORD; LABEL RECORD MISSING; UNEXPECTED TAPE MARK; LABEL RECORD ERROR; ILLEGAL BLOCK LENGTH ON INPUT;EOF INSIDE SPLITTED RECORD; INPUT VOLUME NAME UNKNOWN;OUTPUT VOLUME NAME UNKNOWN; FILE NAME UNKNOWN;FLEXIBLE DISC ALREADY LOCKED;
0x066ad4…066c68 Dummy {f00=0x0020, f01=0x0190, f02=»BM DISC FORMAT; BLOCK SEQUENCE ERROR; KEY DEFINITION ERROR; LOAD FACTOR TOO SMALL;KEY SEQUENCE ERROR; DATA SET DEFINITION ERROR;ILLEGAL SECTOR NUMBER;CARD READER NOT OPERABLE; FILE ORGANIZATION ERROR;CORE AREA TOO SMALL;RECORD NOT IN FILE - END OF MEDIUM; ILLEGAL
0x066c68…066dfc Dummy {f00=0x0020, f01=0x0190, f02=» NUMBER OF BADSPOTS = -WRITING THE SECTORS -CHECKING THE SECTORS TOSS REL 9.2 UU $ 3 2P _ B , ) %? G.G K. A ;A; G. ] S S S S % =A S S 3 D @ P
0x066dfc…066f90 Dummy {f00=0x0020, f01=0x0190, f02=» =e=C- E M $ =A % =B R > R @t w E M % ( :<t P #P $ B. T P ' " : UU 3 2P _ J , ) G.G K. A ;A; G. ] S % T S S M % T S L
0x066f90…067124 Dummy {f00=0x0020, f01=0x0190, f02=» X* Y _" R R R " $ =E R Ht w E M T 1 E _ M @ T* :> P #P $ B. T P ' " : : C C ( : @; : 2 C @; P >B C ( B P Y B : @; P >B C : A;
0x067124…0672b8 Dummy {f00=0x0020, f01=0x0190, f02=» ( B ! " B S B R ! P" A; 2 A;" A;$ 3 A;&W A; ` A;" A;$ A;& A: A: A: :` A:` :l A:l :z A:x : A: 2 @; : >J : > 2 @: % ( B P" Y$ B @:l :x B A:l @; @
0x0672b8…06744c Dummy {f00=0x0020, f01=0x0190, f02=»P U@ > ( _ 2 @: $T P U _* $ Y W B @:` :l B A:` ; @; P W " T A: @;& A : ( : > ( : B P Un > ( _ , @: $T P UD_, $ Y @; @; P
0x06744c…0675e0 Dummy {f00=0x0020, f01=0x0190, f02=» : @: :b :n @:`QR @:lQ2 $ (V : ^< - _$ ( : ^P - $T _> @:`Q. : ^n ( - _ @:lQ : ^ $ - _ A: 0 : 0 : >J : @: Q. @:x ( ( 1 @: Q2 ( ( 1 @: Q _ @:x @; P W @;" 1 W @; P W @;" 1
0x0675e0…067774 (0, 131) Dummy {f00=0x0020, f01=0x0190, f02=»R _ 5 : >^ 2 % 2 * % Y A: Tv 2 | : @: Qd * BA % DS % PO % T % 5 Y 5 Y % , % B % % (_j >^ R " T0 @; P W A< A< < W W A; A;j @;
0x067774…067908 Dummy {f00=0x0020, f01=0x0190, f02=»; P M % % W @; % % % ; ( % Y 2 % >^ : @; P : ( : AE AEr AEx AE AE AE E P AE @ErP K& @E : R !LLP R 2 ^ S 1Q : S 1 S 2
0x067908…067a9c Dummy {f00=0x0020, f01=0x0190, f02=»' AE V AE R !LLPL @ErTV R 1 R 8 @E PB R 6! P R 1 S zY W : Y AEtW R 6:A R 6 AEt AEv 2 AEz AE| AE| AE AE~ AE AEz @E P AE AE B @E P ?B C ( B T| : 2 @Et 2 R| 0X R @EtZ U Y
0x067a9c…067c30 Dummy {f00=0x0020, f01=0x0190, f02=» P R XrW Rh P Q 1 H N_ AEt 0 H ` 1 Q AEv AEx @Ex ] : G : P . P F& GT : : AE @E~ AE R C AE @E @EzY @E P 9B AE ( @E E `Ep P J S T @Ep $ 1T P _ E| Xd_6 AE : @ErT
0x067c30…067dc4 Dummy {f00=0x0020, f01=0x0190, f02=» R K R !LLT R 4:H R 5 K K $ K & AE ( L . " L R !LLP R 6 K % R 4 K & K ( K ) ( @E G Jv @E % @E R 2 R 1 % Y @E P =B>B AE E ( AE @E P AE @E Y AE ( @E G AE @E P AE @E Y" : A
0x067dc4…067f58 Dummy {f00=0x0020, f01=0x0190, f02=»E T L L L~ ( E @E : AE K" T @E T : AEr AE F AE T< AEp Hv @E P* T" G : P . P F&_< : E L @E| - ( @E G J AEv J J Jv 2 2 R> 0P6 P X P T P 1 0 T _( = ] _ P
0x067f58…0680ec Dummy {f00=0x0020, f01=0x0190, f02=» EXTENT BASE EXTENT LENGTH L A DELETED 1 0 0VOLUME NAME: DISC: 0FREE SPACE TABLE 0EXT BASE EXT LENGTH OF
0x0680ec…068280 Dummy {f00=0x0020, f01=0x0190, f02=» CREATION RET INDEX KEY MONITOR SWITCH NAME EXT BASE EXT LEN ORG LENGTH FACT REC NO SEC NO EXT NO DATE PER FILES ADDRESS NO NO/SOP 0NUMBER OF FREE ENTRIES IN VTOC = ( - : N ( B R
0x068280…068414 (0, 132) Dummy {f00=0x0021, f01=0x0190, f02=»TO 4 R 4 IM Y L N L " N M N , AM , AM , AM N R ' Q 9B C ( B R L N M N M2 N 2 4P2 AM MX 4 MN MJ N Y4W Y> @M Mb M` N L
0x068414…0685a8 Dummy {f00=0x0021, f01=0x0190, f02=» M M ]J *% RH R p M R N J U !LLT2 J " c J " k - U 8 U T U ZW - U d U l J 8 J ? J J . J J J " J " ) E N "
0x0685a8…06873c Dummy {f00=0x0021, f01=0x0190, f02=» P AN P @N N L N Nv & N L N W W W W N : R C ( B L OK? 0OUTPUT VOLUME NAME: R C C R AR " P AR ( : : B R $ ) Y R R R R AR R (
0x06873c…0688d0 Dummy {f00=0x0021, f01=0x0190, f02=» P* & P LC A4,QPRFC,A12 PRINTER FILE CODE P SC A4,PRECB+1 < $ P LC A4,QDIFC,A12 DISC FILE CODE R P SC A4,ECBR+1 z P* P IFT DOS=0 P SUK A4,/F0 P ADR A4,A4 * P LD A1,CDISCT,A4 TABLE WITH DISC CODES P ST A1,D
0x0688d0…068a64 Dummy {f00=0x0021, f01=0x0190, f02=»PRVT15 P* PPRVT10 ANK A4,/F P CWK A4,9 0 P RF(E) PRVT15 B P ADK A4,7 X P* j PPRVT15 ADKL A4,/4530 t P ST A4,DISC P XIF P* P EJECT PRVTOC P* P* LOCK IF FLEXIBLE DISC P* P I
0x068a64…068bf8 Dummy {f00=0x0021, f01=0x0190, f02=»NOT FD P LDK A7,/A6 LOCK ORDER P LKM , P DATA 1 8 P LD A6,ECBRC,A8 RETURN CODE H P LDR A7,A6 l P ANK A7,/1 ~ P ABL(NZ) RTNNO NOT OPERABLE P LDR A7,A6 P ANK A7,/6 P ABL(NZ) RTNIO I/O ERROR P IM FD INDICATE
0x068bf8…068d8c Dummy {f00=0x0021, f01=0x0190, f02=»C P* P* ****** P* * VL * $ P* ****** 4 P* D P* READ VL TO BUF1 N P* h P LDK A7,/91 r P LDKL A8,ECBR P CM ECBCW,A8 SECTOR 0 P* PVL01 LKM P DATA 1 P* TEST OF RETURN CODES $ P LD A6
0x068d8c…068f20 Dummy {f00=0x0021, f01=0x0190, f02=»NK A6,/1 $ P ABL(NZ) RTNNO DISC NOT OPERABLE P LD A6,ECBRC,A8 : P ANKL A6,/820E R P XIF h P ABL(NZ) RTNIO ERROR MESSAGE t P* P EJECT PRVTOC P* P* TAKE VOLUME NAME FROM VL P* " P LDR* A3,A12 GET BUF1 AD
0x068f20…0690b4 (0, 133) Opaque[0x194]
0x0690b4…069248 # DirEnt {nam=»PCAS «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0428, f03=0x0000}
0x0690b4…069248 IdxSect {
0x0690b4…069248 f00 = 0x0021 // 0x690b4 @0x0
0x0690b4…069248 f01 = 0x0002 // 0x690b6 @0x2
0x0690b4…069248 gno = [ // 0x690b8 @0x4
0x0690b4…069248 [0x00]: C0x0021.0x1.0
0x0690b4…069248 ]
0x0690b4…069248 }
0x069248…0693dc Dummy {f00=0x0021, f01=0x0190, f02=» | J J 0XX ERROR 2 0PCAS REL 1.3 DATE 79.04.10 12NC=8701 362 40130 STATUS WORD: R:R:L `s < Z% d z " `# F : t ` `H H 5 ]m `" <^# 5 " [ h=} 6+ @ }O
0x0693dc…069570 Dummy {f00=0x0021, 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 zl Z : 6 R@Bh L | & 1> 4` ` T O PZ$ 0 ? tB J/ K t 1 z Z Z) Z < } n zH Y 6X z R:+ d z I (v t
0x069570…069704 Dummy {f00=0x0021, f01=0x0190, f02=» z + 0XX ERROR 2 0PCAS REL 1.3 DATE 79.04.10 12NC=8701 362 40130 STATUS WORD: R:R:L `s < Z% d z " `# F : t ` `H H 5 ]m `" <^# 5 " [ h=} 6+ @ }O
0x069704…069898 Dummy {f00=0x0021, 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 zl Z : 6 R@Bh L | & 1> 4` ` T O PZ$ 0 ? tB J/ K t 1 z Z Z) Z n zH Y 6X z R:+ d z I (v t
0x069898…069a2c Dummy {f00=0x0021, f01=0x0190, f02=» A A A @ A A A @ CRP W A @ 9a , A 0 ) A H A J W ,= V % @ QB @ @ P8 @ U A W* @ P A W A , a A A A T p Ph P ,T , A J T2 0
0x069a2c…069bc0 Dummy {f00=0x0021, f01=0x0190, f02=» 0% ) T( ( % @ E A A ( ( @ " ` T( : @ 0 @ Q( &( @ . T A 0 : TKW DKW FM A N V J 2 D J > D 2 D > D P C ( ( $ C C ( : 9 $
0x069bc0…069d54 (0, 134) Opaque[0x194]
0x069d54…069ee8 # DirEnt {nam=»SUP003«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0430, f03=0x0000}
0x069d54…069ee8 IdxSect {
0x069d54…069ee8 f00 = 0x0021 // 0x69d54 @0x0
0x069d54…069ee8 f01 = 0x0014 // 0x69d56 @0x2
0x069d54…069ee8 gno = [ // 0x69d58 @0x4
0x069d54…069ee8 [0x00]: C0x0021.0x2.0
0x069d54…069ee8 [0x01]: C0x0021.0x3.0
0x069d54…069ee8 [0x02]: C0x0022.0x0.0
0x069d54…069ee8 [0x03]: C0x0022.0x1.0
0x069d54…069ee8 [0x04]: C0x0022.0x2.0
0x069d54…069ee8 [0x05]: C0x0022.0x3.0
0x069d54…069ee8 [0x06]: C0x0023.0x0.0
0x069d54…069ee8 [0x07]: C0x0023.0x1.0
0x069d54…069ee8 [0x08]: C0x0023.0x2.0
0x069d54…069ee8 [0x09]: C0x0023.0x3.0
0x069d54…069ee8 ]
0x069d54…069ee8 }
0x069ee8…06a07c Dummy {f00=0x0021, f01=0x0190, f02=»c Hi "R" "Z K , _ H) * * + +f,
0x06a07c…06a210 Dummy {f00=0x0021, f01=0x0190, f02=»
0x06a210…06a3a4 Dummy {f00=0x0021, f01=0x0190, f02=» c ' !z 0 B D Q U $0#P$ %tP P $DB U DML MCQ HDK WML RYM RDM ASN ABP PSP RSQ6 & TY J- LP / TK [
0x06a3a4…06a538 Dummy {f00=0x0021, f01=0x0190, f02=» $ FL 8 FL 8 FL ) 8 6 FL 9 8 l DK 3 zDK 8 3 r DK 3
0x06a538…06a6cc Dummy {f00=0x0021, f01=0x0190, f02=» ? ? ? ? ? ? ? _ & ? ? ? ? ? ? ? Z ? ? ? ? ? ? ? L 1 r
0x06a6cc…06a860 Dummy {f00=0x0021, f01=0x0190, f02=» Z 0 f Z V f Z | f f B
0x06a860…06a9f4 (0, 135) Dummy {f00=0x0021, f01=0x0190, f02=»I q q A A I A y J I q q A A I A y J 6 I q q A A I)A)y J N l I q q A A I9A9y J
0x06a9f4…06ab88 Dummy {f00=0x0021, f01=0x0190, f02=» 6 6 6 6
0x06ab88…06ad1c Dummy {f00=0x0021, f01=0x0190, f02=» 6 6 6 6 6
0x06ad1c…06aeb0 Dummy {f00=0x0021, f01=0x0190, f02=»
0x06aeb0…06b044 Dummy {f00=0x0021, f01=0x0190, f02=» p
0x06b044…06b1d8 Dummy {f00=0x0021, f01=0x0190, f02=»
[…0x1…]
0x06b36c…06b500 Dummy {f00=0x0021, f01=0x0190, f02=» J
0x06b500…06b694 (0, 136) Dummy {f00=0x0022, f01=0x0190, f02=»
[…0x1…]
0x06b828…06b9bc Dummy {f00=0x0022, f01=0x0190, f02=» $
0x06b9bc…06bb50 Dummy {f00=0x0022, f01=0x0190, f02=»
[…0x5…]
0x06c334…06c4c8 Dummy {f00=0x0022, f01=0x0190, f02=» @ _ ? ? ? ? ? ? ? A R2 @ A A R$ A A R A A R A @"X > > > > > > > > ? ? ? ? ? ? ?
0x06c4c8…06c65c Dummy {f00=0x0022, f01=0x0190, f02=» P A ' @ Q A ' A! ' A A(|_ @ A# ^ 9j ?R > > > > > > > A @# E E E E E E > > a @ E # @ ? ? > !z P P Q P ! P @ $. R @ P W ' <
0x06c65c…06c7f0 Dummy {f00=0x0022, f01=0x0190, f02=» (P& P (_ =a:a =A:A Z P Z _" TR @ ;a=a R W* @ =a Z ;a RP ) i %0 E ' @ ;a=a R @ =a V ;A , P = - - _F @%0 L P< 0 Tt @ PR 0=a @ ?a RX @ ?a VN=A 0 ( P>P< , T
0x06c7f0…06c984 Dummy {f00=0x0022, f01=0x0190, f02=» &8 'D D >a @ =a 'v D U@ x &bW U, @% x &|W @& A& ,P$ _: @% @% @% @% @& @& _ A% A% A% A% A& A& B A'( A& B :a Y B R A& _ @% ' W4 @& A& ,Xp _ <
0x06c984…06cb18 Dummy {f00=0x0022, f01=0x0190, f02=» U P" @'4 @'6 @'8 @': @'< @'> @'@ 'B @'4 x @% 8R P =A_ %_ XJ _ P0 @ !@T @" @" R P< E" " A" A ^ 9j =Q > > > > > > > > P @ !@ ) @ P @ X0 , ) A _< U` A(| @ , L ? ? , L L L L L
0x06cb18…06ccac Dummy {f00=0x0022, f01=0x0190, f02=» > > [ [ A @" H" " ? A" > @ P ,V$ A (> @ 9 (> T A #t @ ) ? ? >_ T PT PJV P>V SH? V :!9 V @ P R W ;A [ [ : _4 Pj T
0x06ccac…06ce40 Dummy {f00=0x0022, f01=0x0190, f02=» [ [ : 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 [ [ : # P| ' PL + ; R <a V 9A:A ; V ; V V
0x06ce40…06cfd4 (0, 138) Dummy {f00=0x0022, f01=0x0190, f02=»< R $ <A Q! T! U! :$ _ < Z& ,:W _ < <A9 R :a ; V < R ; V < V _" _ ? < V < V @ < _,; RJ ! P 0 9 T! T! V T! U! : R Q ;H [ [ : ! _J ? ? ? ? ? ? ? Q _ ^ ( H _l -, W - W
0x06cfd4…06d168 Dummy {f00=0x0022, f01=0x0190, f02=» ? - A X #? P ? ? ? ? ? ? ? - A, ? (@ @ % ? ? ? ? ? ? ? - A (@_$ > ? ? ? ? ? ? ? . A ? ? ? ? ? ? ? . A, ? ? ? ? ? ? ? .8 A&(@_~ > X R Y _ X D $! TR ? ? ? ? ? ? ? .| A8 8 M ? ? ?
0x06d168…06d2fc Dummy {f00=0x0022, f01=0x0190, f02=» >F$ <A > Pl > X X X M M Y ? ? ? ? ? ? ? /` Al ? ? ? ? ? ? ? /x A (@ @ X U P U T" Y 0 Y Y X Q Y _ X X X U 5 X E _ X 4 Y 5 X 4 Y ! 1P, 0P +P
0x06d2fc…06d490 Dummy {f00=0x0022, f01=0x0190, f02=» ? ? ? ? ? ? 0 Al(@ Y L X X X R 5 X X - >F X Q Y Y X Y x ? ? ? ? ? ? ? 1 A, Y Y X X T ? ? ? ? ? ? ? 1, A& > > > > > > > > > R X X Q Y ( O` ? ? ? ? ? ? ? 1z Al ? ? ?
0x06d490…06d624 Dummy {f00=0x0022, f01=0x0190, f02=»1 Al(@ L X 4Q W 9AY T Q P &W -W /W ? ? A2: 9AY A2< T< @2: V D3* @2< R $WVP Q @2< T D2 W>:#@'=" @2: Q @2< R~ Qz 9AY Tn9ATj @2: D3N @2< $W 1 Y $ D ! P 1 Y 0 P
0x06d624…06d7b8 Dummy {f00=0x0022, f01=0x0190, f02=»P X 1 ' Q X >T X X R ( 5 Y P _84 X Y L P 6PW* L % P M M M M 4 B % ?A ' B % B =e L P H 6P H L X T $ T M W& M L y W =C- M $ T& M
0x06d7b8…06d94c Dummy {f00=0x0022, f01=0x0190, f02=»" * A5E- A5 L " ! UJ ! Q L W 5 W6 T 5, B" (@ T X @ R >F >FM (% , ! R " T* L L 5dW L W L L 5xW L 5 A M 5 W W =h C L % Ph L =c M B !?PN P6! TD C B <b $ !@ <B C O C
0x06d94c…06dae0 Dummy {f00=0x0022, f01=0x0190, f02=» B M 6l O 8B M T8 L T: P* M 6 _vW C B % T L 6 5 6T M P* L P L 4 M L P <C M =C M 7 > 4 X ? ? ? ? ? ? ? 7( A8P _ =b%0 X $ L <B<j P L >>$ _ >> L
0x06dae0…06dc74 (0, 139) Dummy {f00=0x0022, f01=0x0190, f02=» P L !# 6r 6r L !# Q $ P L x P 6r 8 > M L =H =A^ 4` A87=` M 4 8L 6(W C >F B"9 :B:B9 9 :B:B9 9|: : < > = ? : ; ? . - M ! P M W0 L $ P M P M P M * L $@ M X Y
0x06dc74…06de08 Dummy {f00=0x0022, f01=0x0190, f02=» _ (% ?a' 8 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 > W` M L . > > L ( = Q M ( M * L . M ( L & 9A (ZN YT (ZZ Y` W L 0Zp
0x06de08…06df9c Dummy {f00=0x0022, f01=0x0190, f02=»V M _J _x _ M .W 9a M ( X M . : M 9 L $ T $ > X X M Q> =b%0 X $ X $? P L , >> L _ L < M < L P FLT L TB L , X M =b%0 X $ L <B<j P L , >>_ :A^ = L $ L @P
0x06df9c…06e130 Dummy {f00=0x0022, f01=0x0190, f02=» M > > > > > > > > @ M M M > > > > > > > > M M M L $ P ? L 4 Q 9A Q P L 4 ? =A Q M 4 < L T (@ >> > L $ L =AR = R ? P P ? =A Y 7 M T P (T # T 9AR _ L 9KVN9BR 9A
0x06e130…06e2c4 Dummy {f00=0x0022, f01=0x0190, f02=»= 8 X L *(@ M * L _D X Mm M 1P ] >>(@ > 1 Q M * = 8 M * M = ? @ ? > X B A>8 B (@ ' X X W W ' # C C P L L m A , DKP L P L @ _ C C #
0x06e2c4…06e458 Dummy {f00=0x0022, f01=0x0190, f02=» X P % Y X R X >T ! X Y T T Y Y Y Y Y U U X @ _ X X X X P? ? ? @b@* P $ Y Y Y Y > >* Y 8 TPP" X R 8 TYX WH H@$ Y _8 X X: X R X ( _$ _* $
0x06e458…06e5ec Dummy {f00=0x0022, f01=0x0190, f02=» X*Y$ X X X6 Y Z(P A@X ZrP Y _8 _< _@ ! >> $0 X M A@ T b" >> X X B AA P X $ ? _" B W B W A W I W J X %?W X %? AAf AAj > > > > > > > Ah V <a W X ' ?A q
0x06e5ec…06e780 Dummy {f00=0x0022, f01=0x0190, f02=»L X >F (@(@ L % T> L % T6 L % T. L %?P& P" L % - AB_M T % T L T 4 L R % _X R _ 1 Tt M " L '? L U "T J WP T J2WF T I B C B B C C C C C C C B C E W* G, W" E W H L :AR| M
0x06e780…06e914 (0, 140) Dummy {f00=0x0023, f01=0x0190, f02=»C W M " J L P L 9JR@ P P T J 5 U P T Q P P W Q P T@(@ L D " Q L Q Q L Q L ( L ! TNW P T P P W Q L ' @ P p Y "(@ P P $ M C P ( M P Q P
0x06e914…06eaa8 Dummy {f00=0x0023, f01=0x0190, f02=» ( P _ 0 4 ) % ] M (@ L 2 J T R Q @ ] J > 9C 9C > ^ U (@ L T U U U M L M L M M L 4 C L J ! :c:A J L T V P T"W L >F J L & J E M 4 E0 M L M L " P
0x06eaa8…06ec3c Dummy {f00=0x0023, f01=0x0190, f02=» % T D V L ! P L ! XfWn L M L M M F C L :c:A L D V D M L ! T*_ L < J < R M M "W G M 4 E0 L E M L "! J L 2 L T L P L D Q GZ M 2 F0 L L $:BV W $:AV M " M J L L
0x06ec3c…06edd0 Dummy {f00=0x0023, f01=0x0190, f02=» 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 J L J L U H M 2 F0 L M $ L M & L L
0x06edd0…06ef64 Dummy {f00=0x0023, f01=0x0190, f02=» L R 0 % _ M M L . P M . IL M 2 F0 L U I M 2 F0 L L L & ) L $ I L M L L U M J @ M L M M M W L J @ M M ( L P0W" M L J @ M ( L U J` M 2 F0 L L ( E L % E
0x06ef64…06f0f8 Dummy {f00=0x0023, f01=0x0190, f02=» m M ^ U L ( L L ? ? ? ? ? ? ? A A R 4 R W 7 Tt Q K K K K K R K 5 L ( "^ L4( "^ 5 L@ $ @L: b 4T W j b H bP H d _ AK L AR 5 T6 @R P R K K K K K @R AR
0x06f0f8…06f28c Dummy {f00=0x0023, f01=0x0190, f02=» L R 0 % _ M M L . P M . IL M 2 5 L T( T L P T( - _ K 5 T( T T( T * :a;a L :A ;A Q K T Mn 0P M Y _ 1 X 1 M M W8 M& M X W* 8 AM T AM M (@( >> >F : 0 :R -
0x06f28c…06f420 Dummy {f00=0x0023, f01=0x0190, f02=» 8 FL L X X ! R V Y ANJ 8 TKP Y LPP MTP Y Y T T Y Y U U 0!? 5T W 1 Q TKP MTT Y P ; Y (@ K P Q 1 K >Z X X ? ? ? ? ? ? ? N Al_ 5 T( L @ Q P P
0x06f420…06f5b4 (0, 141) Dummy {f00=0x0023, f01=0x0190, f02=» ] K 0DKER UNIT CYLD STAT OZ O > Oh O W2 Ob O X W$ On O W Ot( X = 0 :R # Y P O 0AB CD ADDR @ 9a:a;a R R AP8 P: AR _ ' _ P A @R P$ @P8 = ^
0x06f5b4…06f748 Dummy {f00=0x0023, f01=0x0190, f02=» @ A @ !? #t A! R _* 5 @R L @ A K 0 Tt AQ, AQ. Q* ( "^ @ A ' U 5 @ 4 L P T( _ 5 K 5 T( AQ T( R: P T( R( Q ( "^ Q ^ @ T Q ( "^ K L Q I/0 ERROR QQ P
0x06f748…06f8dc Dummy {f00=0x0023, f01=0x0190, f02=» Z H @R P : Rp ` : L> ISTAT c _* AR RX ( "^ : ; ;<A ' R `R Q QLy _ QLx<a : : : , A ~(@ A" AR A A A A AR AR AR a S @ ? ? > !z P :b" Q P T4 P Q Q @ @ @ @
0x06f8dc…06fa70 Dummy {f00=0x0023, f01=0x0190, f02=»; V W # @ A AR @ ? ? > Q @ ? ? ? ? ? ? ? T P< @ P <a:a L :A : P6 $ R, Z R R Q $ :D P $ R ^& : L P R( ATb ATd ATf ATh ATj ATl ATn Tp ,:j Z ( I ^ - ^
0x06fa70…06fc04 Dummy {f00=0x0023, f01=0x0190, f02=» @U @! $ & $ C "! PX @ Q P VF_ P RN;AR P P4 0 P P C C C LPT P P C # ' C _: DL P H C _ P X( DD _Z :EOS :EOF > > > @ !? ?R _ V > ' !? 0X A "! X6 @ Q P
0x06fc04…06fd98 Dummy {f00=0x0023, f01=0x0190, f02=»(@ M M M B B M M # C C @ _ "ZN(@(@ ^ :j >Z _ m (@ M M 8 DKT X X T X M W M W y Y Y Y # C B > B > $? U P R U P R X U P Pv P
0x06fd98…06ff2c Dummy {f00=0x0023, f01=0x0190, f02=»W X(W Wx 8 MTPp DYPj X T Y $ WZ XRWX $ # T $ T Y B W0 %@ R b " Y Y Y Y Y $ X _0 8 TCX< TKXB MTXH DYXN :EOS:EOV > > > AX X !? Q[PP ^ > V X > > X A
0x06ff2c…0700c0 Dummy {f00=0x0023, f01=0x0190, f02=»9A Y _2 !Z<Y@ 9 R !ZT !ZX AX XT_ X Y Y _^ !Z@ ![ tW !Z@ !ZD] ! X W !ZH 9C^ W| !ZL_ !ZP Wn !ZT_ X Y Y _ X r s W4 X @ _ W$ AW @W $W %W W !W W X 9d)` AX AX A T @ 9CV * 9AV 9AV X 1P * 9EV )@ X
0x0700c0…070254 (0, 142) Dummy {f00=0x0023, f01=0x0190, f02=»T ; @X U X @X X 4YPYPYnYnYnYnY Y Y Y Y Y Z Z Y Y Z Z &" 13468$$ :EOS:EOV Y Y "$&1368 A[l [n!? Q[ P ^ > A > X A_& X A_, Q R x % =A Y X Y4 Z8 A[d $ $ T D i [ !^ X "! T( !^
0x070254…0703e8 Dummy {f00=0x0023, f01=0x0190, f02=» !^ " P P !_ _ !^R ] ] > P Pj P P P @_" Y ] D P X &Q Y W Y 4 X $;H D :ET $;H D OSP OVT W W ! X ! P X 1P W @ X U W W W ! X ! . @Wp ! X ! Tb AW^ X P&
0x0703e8…07057c Dummy {f00=0x0023, f01=0x0190, f02=» , $ T D q A !^ !^ [p Y Y A_, A_& h !^ !^ W W A^v X 9c T D[h E[h 4 X B X :c H[h % ] !_ _N !_ !^V_X !_ _^ !^ Y " !^ _p [t_ X # ;dC Y A[f A[b @ A_"_ _ _( _, _0 _4 _8 _<
0x07057c…070710 Dummy {f00=0x0023, f01=0x0190, f02=» <j =h Qb P. ^ %x 8P P< X % !X %`X P % X. R" X>W % P T % XT <A P X^<a P @ p @ $ ! P $^ P< ! Ab Ab Ab Ab Ab Ab Ab b > > > > > > > ab @b E E E E E E
0x070710…0708a4 Dummy {f00=0x0023, f01=0x0190, f02=»T ?f' W ! H Wx ! Wn & P >b& >AW >a& @T ! X X T$W. ! P X ` `T 8 P X 8 T! T! T "<A U! U! T! U! T! T! ? ? U! T! T! T! T! T! T! ! ! ! ! !
0x0708a4…070a38 Dummy {f00=0x0023, f01=0x0190, f02=»P Y _" P" P& R| ^T Y _D _T X _ X _ X" X& T: X P4 0' P. 1R P _ 0$ XT % X` Z _f % _n Q4 8 TYP, R Y _$ P Q X Q % _" Y Y Y >*% X P Y $ W Y =D %_
0x070a38…070bcc Dummy {f00=0x0023, f01=0x0190, f02=» 9 : : : @ P R ! R P L M M Y$ #? @ P R P T T T Y" P T _ X D D E E ] @ E @ d ? ? > ? ? ? ? ? ? ? g C ( "^ @h e U T "
0x070bcc…070d60 Dummy {f00=0x0023, f01=0x0190, f02=» [ [ ^ [ [ [ [ @ L ! P Y _ @ M ^ U > > > > > > >WZ A ^ T " T0 ! P W SY SD AD _ ! P _, J _2 g # C ( "^ P
0x070d60…070ef4 (0, 143) Dummy {f00=0x0023, f01=0x0190, f02=» Af Af J Af T. B B J (@" T L #( "^ B P @ !? M @h P M L R ! _ PP I H P _ A c A A A @ ~ g A ~ @g A ~ @ i ( K A A "^ R (@_0 $ ( , 0 4 8 < g U T "
0x070ef4…071088 Dummy {f00=0x0023, f01=0x0190, f02=» [ [ ^ [ [ [ [ @ L ! P Y _ @ M ^ U > > > > > > >W A ^ T " T ! P W SY SD AD _ ! P _, J _2 # C ( "^ P
0x071088…07121c Dummy {f00=0x0023, f01=0x0190, f02=»12 r P RTN A14 P* ( P* 2 PSEGMIS EQU * < P LDK.L A10,8 X P RB SEGERR x P* P* PSEGNCT EQU * 0 P LDK.L A10,4 NOT CATALOGED P RB
0x07121c…0713b0 Dummy {f00=0x0023, f01=0x0190, f02=» 0 0 P* NOT IN CATALOG P DATA /FF09 @ P DATA /0C00 ` P* 2 P DATA /FF14 SEG NAME MISSING P DATA 0 P* P EJECT P* P*
0x0713b0…071544 Dummy {f00=0x0023, f01=0x0190, f02=» RF RUNER0 PROG NAME ERROR > P RF RUN400 EXECUTE A CATALOGED PROGRAM 6 P RF RUNER0 x D P RF RUN420 BINARY VALUE ( MASTER FLAG ) 6 P* NO PROGRAM
0x071544…0716d8 Dummy {f00=0x0023, f01=0x0190, f02=» * P RF(0) RUNER1 /L EMPTY P ADK A5,0 2 . P RF(0) RUNER1 /L NO DEVICE P P* B P* NOW,SET JPT TO EXECUTE THE PROG " P LD A1,LFTBOT,A5 0 PRUN050 EQU
0x0716d8…07186c Dummy {f00=0x0023, f01=0x0190, f02=»* 6 P LDK A1,0 MAX # OF SEG IN JPT $ P LC A1,JPTSEG,A11 D $ P CW A1,W:SEG0,A13 l * P RF(2) RUN100 LESS,0K : P* GREATER,#OF SEG = WSEG0 $ P
0x07186c…071a00 Dummy {f00=0x0023, f01=0x0190, f02=» RF(0) RUN200 EXIT P LDR A2,A13 & 0 P ADK.L A2,W:SEG1 MOVE SEG ADDR F P LDR A3,A11 z " P ADK A3,JPTROT+2 P* PRUN110 EQU * P LDR* A4,A2 P
0x071a00…071b94 (0, 144) Opaque[0x194]
0x071b94…071d28 # DirEnt {nam=»SUP004«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0480, f03=0x0000}
0x071b94…071d28 IdxSect {
0x071b94…071d28 f00 = 0x0024 // 0x71b94 @0x0
0x071b94…071d28 f01 = 0x0014 // 0x71b96 @0x2
0x071b94…071d28 gno = [ // 0x71b98 @0x4
0x071b94…071d28 [0x00]: C0x0024.0x0.0
0x071b94…071d28 [0x01]: C0x0024.0x1.0
0x071b94…071d28 [0x02]: C0x0024.0x2.0
0x071b94…071d28 [0x03]: C0x0024.0x3.0
0x071b94…071d28 [0x04]: C0x0025.0x0.0
0x071b94…071d28 [0x05]: C0x0025.0x1.0
0x071b94…071d28 [0x06]: C0x0025.0x2.0
0x071b94…071d28 [0x07]: C0x0025.0x3.0
0x071b94…071d28 [0x08]: C0x0026.0x0.0
0x071b94…071d28 [0x09]: C0x0026.0x1.0
0x071b94…071d28 ]
0x071b94…071d28 }
0x071d28…071ebc Dummy {f00=0x0024, f01=0x0190, f02=»c Hi "R" "Z K , _ H) * * + +f,
0x071ebc…072050 Dummy {f00=0x0024, f01=0x0190, f02=»
0x072050…0721e4 Dummy {f00=0x0024, f01=0x0190, f02=» c ' !z 0 B D Q U $0#P$ %tP P $DB U DML MCQ HDK WML RYM RDM ASN ABP PSP RSQ6 & TY J- LP / TK [
0x0721e4…072378 Dummy {f00=0x0024, f01=0x0190, f02=» $ FL 8 FL 8 FL ) 8 6 FL 9 8 l DK 3 zDK 8 3 r DK 3
0x072378…07250c Dummy {f00=0x0024, f01=0x0190, f02=» ? ? ? ? ? ? ? _ & ? ? ? ? ? ? ? Z ? ? ? ? ? ? ? L 1 r
0x07250c…0726a0 Dummy {f00=0x0024, f01=0x0190, f02=» Z 0 f Z V f Z | f f B
0x0726a0…072834 (0, 145) Dummy {f00=0x0024, f01=0x0190, f02=»I q q A A I A y J I q q A A I A y J 6 I q q A A I)A)y J N l I q q A A I9A9y J
0x072834…0729c8 Dummy {f00=0x0024, f01=0x0190, f02=» 6 6 6 6
0x0729c8…072b5c Dummy {f00=0x0024, f01=0x0190, f02=» 6 6 6 6 6
0x072b5c…072cf0 Dummy {f00=0x0024, f01=0x0190, f02=»
0x072cf0…072e84 Dummy {f00=0x0024, f01=0x0190, f02=» p
0x072e84…073018 Dummy {f00=0x0024, f01=0x0190, f02=»
[…0x1…]
0x0731ac…073340 Dummy {f00=0x0024, f01=0x0190, f02=» J
0x073340…0734d4 (0, 146) Dummy {f00=0x0024, f01=0x0190, f02=»
[…0x1…]
0x073668…0737fc Dummy {f00=0x0024, f01=0x0190, f02=» $
0x0737fc…073990 Dummy {f00=0x0024, f01=0x0190, f02=»
[…0x5…]
0x074174…074308 Dummy {f00=0x0024, f01=0x0190, f02=» @ _ ? ? ? ? ? ? ? A R2 @ A A R$ A A R A A R A @"X > > > > > > > > ? ? ? ? ? ? ?
0x074308…07449c Dummy {f00=0x0024, f01=0x0190, f02=» P A ' @ Q A ' A! ' A A(|_ @ A# ^ 9j ?R > > > > > > > A @# E E E E E E > > a @ E # @ ? ? > !z P P Q P ! P @ $. R @ P W ' <
0x07449c…074630 Dummy {f00=0x0024, f01=0x0190, f02=» (P& P (_ =a:a =A:A Z P Z _" TR @ ;a=a R W* @ =a Z ;a RP ) i %0 E ' @ ;a=a R @ =a V ;A , P = - - _F @%0 L P< 0 Tt @ PR 0=a @ ?a RX @ ?a VN=A 0 ( P>P< , T
0x074630…0747c4 Dummy {f00=0x0024, f01=0x0190, f02=» &8 'D D >a @ =a 'v D U@ x &bW U, @% x &|W @& A& ,P$ _: @% @% @% @% @& @& _ A% A% A% A% A& A& B A'( A& B :a Y B R A& _ @% ' W4 @& A& ,Xp _ <
0x0747c4…074958 Dummy {f00=0x0024, f01=0x0190, f02=» U P" @'4 @'6 @'8 @': @'< @'> @'@ 'B @'4 x @% 8R P =A_ %_ XJ _ P0 @ !@T @" @" R P< E" " A" A ^ 9j =Q > > > > > > > > P @ !@ ) @ P @ X0 , ) A _< U` A(| @ , L ? ? , L L L L L
0x074958…074aec Dummy {f00=0x0024, f01=0x0190, f02=» > > [ [ A @" H" " ? A" > @ P ,V$ A (> @ 9 (> T A #t @ ) ? ? >_ T PT PJV P>V SH? V :!9 V @ P R W ;A [ [ : _4 Pj T
0x074aec…074c80 Dummy {f00=0x0024, f01=0x0190, f02=» [ [ : 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 [ [ : # P| ' PL + ; R <a V 9A:A ; V ; V V
0x074c80…074e14 (0, 148) Dummy {f00=0x0025, f01=0x0190, f02=»< R $ <A Q! T! U! :$ _ < Z& ,:W _ < <A9 R :a ; V < R ; V < V _" _ ? < V < V @ < _,; RJ ! P 0 9 T! T! V T! U! : R Q ;H [ [ : ! _J ? ? ? ? ? ? ? Q _ ^ ( H _l -, W - W
0x074e14…074fa8 Dummy {f00=0x0025, f01=0x0190, f02=» ? - A X #? P ? ? ? ? ? ? ? - A, ? (@ @ % ? ? ? ? ? ? ? - A (@_$ > ? ? ? ? ? ? ? . A ? ? ? ? ? ? ? . A, ? ? ? ? ? ? ? .8 A&(@_~ > X R Y _ X D $! TR ? ? ? ? ? ? ? .| A8 8 M ? ? ?
0x074fa8…07513c Dummy {f00=0x0025, f01=0x0190, f02=» >F$ <A > Pl > X X X M M Y ? ? ? ? ? ? ? /` Al ? ? ? ? ? ? ? /x A (@ @ X U P U T" Y 0 Y Y X Q Y _ X X X U 5 X E _ X 4 Y 5 X 4 Y ! 1P, 0P +P
0x07513c…0752d0 Dummy {f00=0x0025, f01=0x0190, f02=» ? ? ? ? ? ? 0 Al(@ Y L X X X R 5 X X - >F X Q Y Y X Y x ? ? ? ? ? ? ? 1 A, Y Y X X T ? ? ? ? ? ? ? 1, A& > > > > > > > > > R X X Q Y ( O` ? ? ? ? ? ? ? 1z Al ? ? ?
0x0752d0…075464 Dummy {f00=0x0025, f01=0x0190, f02=»1 Al(@ L X 4Q W 9AY T Q P &W -W /W ? ? A2: 9AY A2< T< @2: V D3* @2< R $WVP Q @2< T D2 W>:#@'=" @2: Q @2< R~ Qz 9AY Tn9ATj @2: D3N @2< $W 1 Y $ D ! P 1 Y 0 P
0x075464…0755f8 Dummy {f00=0x0025, f01=0x0190, f02=»P X 1 ' Q X >T X X R ( 5 Y P _84 X Y L P 6PW* L % P M M M M 4 B % ?A ' B % B =e L P H 6P H L X T $ T M W& M L y W =C- M $ T& M
0x0755f8…07578c Dummy {f00=0x0025, f01=0x0190, f02=»" * A5E- A5 L " ! UJ ! Q L W 5 W6 T 5, B" (@ T X @ R >F >FM (% , ! R " T* L L 5dW L W L L 5xW L 5 A M 5 W W =h C L % Ph L =c M B !?PN P6! TD C B <b $ !@ <B C O C
0x07578c…075920 Dummy {f00=0x0025, f01=0x0190, f02=» B M 6l O 8B M T8 L T: P* M 6 _vW C B % T L 6 5 6T M P* L P L 4 M L P <C M =C M 7 > 4 X ? ? ? ? ? ? ? 7( A8P _ =b%0 X $ L <B<j P L >>$ _ >> L
0x075920…075ab4 (0, 149) Dummy {f00=0x0025, f01=0x0190, f02=» P L !# 6r 6r L !# Q $ P L x P 6r 8 > M L =H =A^ 4` A87=` M 4 8L 6(W C >F B"9 :B:B9 9 :B:B9 9|: : < > = ? : ; ? . - M ! P M W0 L $ P M P M P M * L $@ M X Y
0x075ab4…075c48 Dummy {f00=0x0025, f01=0x0190, f02=» _ (% ?a' 8 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 > W` M L . > > L ( = Q M ( M * L . M ( L & 9A (ZN YT (ZZ Y` W L 0Zp
0x075c48…075ddc Dummy {f00=0x0025, f01=0x0190, f02=»V M _J _x _ M .W 9a M ( X M . : M 9 L $ T $ > X X M Q> =b%0 X $ X $? P L , >> L _ L < M < L P FLT L TB L , X M =b%0 X $ L <B<j P L , >>_ :A^ = L $ L @P
0x075ddc…075f70 Dummy {f00=0x0025, f01=0x0190, f02=» M > > > > > > > > @ M M M > > > > > > > > M M M L $ P ? L 4 Q 9A Q P L 4 ? =A Q M 4 < L T (@ >> > L $ L =AR = R ? P P ? =A Y 7 M T P (T # T 9AR _ L 9KVN9BR 9A
0x075f70…076104 Dummy {f00=0x0025, f01=0x0190, f02=»= 8 X L *(@ M * L _D X Mm M 1P ] >>(@ > 1 Q M * = 8 M * M = ? @ ? > X B A>8 B (@ ' X X W W ' # C C P L L m A , DKP L P L @ _ C C #
0x076104…076298 Dummy {f00=0x0025, f01=0x0190, f02=» X P % Y X R X >T ! X Y T T Y Y Y Y Y U U X @ _ X X X X P? ? ? @b@* P $ Y Y Y Y > >* Y 8 TPP" X R 8 TYX WH H@$ Y _8 X X: X R X ( _$ _* $
0x076298…07642c Dummy {f00=0x0025, f01=0x0190, f02=» X*Y$ X X X6 Y Z(P A@X ZrP Y _8 _< _@ ! >> $0 X M A@ T b" >> X X B AA P X $ ? _" B W B W A W I W J X %?W X %? AAf AAj > > > > > > > Ah V <a W X ' ?A q
0x07642c…0765c0 Dummy {f00=0x0025, f01=0x0190, f02=»L X >F (@(@ L % T> L % T6 L % T. L %?P& P" L % - AB_M T % T L T 4 L R % _X R _ 1 Tt M " L '? L U "T J WP T J2WF T I B C B B C C C C C C C B C E W* G, W" E W H L :AR| M
0x0765c0…076754 (0, 150) Dummy {f00=0x0025, f01=0x0190, f02=»C W M " J L P L 9JR@ P P T J 5 U P T Q P P W Q P T@(@ L D " Q L Q Q L Q L ( L ! TNW P T P P W Q L ' @ P p Y "(@ P P $ M C P ( M P Q P
0x076754…0768e8 Dummy {f00=0x0025, f01=0x0190, f02=» ( P _ 0 4 ) % ] M (@ L 2 J T R Q @ ] J > 9C 9C > ^ U (@ L T U U U M L M L M M L 4 C L J ! :c:A J L T V P T"W L >F J L & J E M 4 E0 M L M L " P
0x0768e8…076a7c Dummy {f00=0x0025, f01=0x0190, f02=» % T D V L ! P L ! XfWn L M L M M F C L :c:A L D V D M L ! T*_ L < J < R M M "W G M 4 E0 L E M L "! J L 2 L T L P L D Q GZ M 2 F0 L L $:BV W $:AV M " M J L L
0x076a7c…076c10 Dummy {f00=0x0025, f01=0x0190, f02=» 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 J L J L U H M 2 F0 L M $ L M & L L
0x076c10…076da4 Dummy {f00=0x0025, f01=0x0190, f02=» L R 0 % _ M M L . P M . IL M 2 F0 L U I M 2 F0 L L L & ) L $ I L M L L U M J @ M L M M M W L J @ M M ( L P0W" M L J @ M ( L U J` M 2 F0 L L ( E L % E
0x076da4…076f38 Dummy {f00=0x0025, f01=0x0190, f02=» m M ^ U L ( L L ? ? ? ? ? ? ? A A R 4 R W 7 Tt Q K K K K K R K 5 L ( "^ L4( "^ 5 L@ $ @L: b 4T W j b H bP H d _ AK L AR 5 T6 @R P R K K K K K @R AR
0x076f38…0770cc Dummy {f00=0x0025, f01=0x0190, f02=» L R 0 % _ M M L . P M . IL M 2 5 L T( T L P T( - _ K 5 T( T T( T * :a;a L :A ;A Q K T Mn 0P M Y _ 1 X 1 M M W8 M& M X W* 8 AM T AM M (@( >> >F : 0 :R -
0x0770cc…077260 Dummy {f00=0x0025, f01=0x0190, f02=» 8 FL L X X ! R V Y ANJ 8 TKP Y LPP MTP Y Y T T Y Y U U 0!? 5T W 1 Q TKP MTT Y P ; Y (@ K P Q 1 K >Z X X ? ? ? ? ? ? ? N Al_ 5 T( L @ Q P P
0x077260…0773f4 (0, 151) Dummy {f00=0x0025, f01=0x0190, f02=» ] K 0DKER UNIT CYLD STAT OZ O > Oh O W2 Ob O X W$ On O W Ot( X = 0 :R # Y P O 0AB CD ADDR @ 9a:a;a R R AP8 P: AR _ ' _ P A @R P$ @P8 = ^
0x0773f4…077588 Dummy {f00=0x0025, f01=0x0190, f02=» @ A @ !? #t A! R _* 5 @R L @ A K 0 Tt AQ, AQ. Q* ( "^ @ A ' U 5 @ 4 L P T( _ 5 K 5 T( AQ T( R: P T( R( Q ( "^ Q ^ @ T Q ( "^ K L Q I/0 ERROR QQ P
0x077588…07771c Dummy {f00=0x0025, f01=0x0190, f02=» Z H @R P : Rp ` : L> ISTAT c _* AR RX ( "^ : ; ;<A ' R `R Q QLy _ QLx<a : : : , A ~(@ A" AR A A A A AR AR AR a S @ ? ? > !z P :b" Q P T4 P Q Q @ @ @ @
0x07771c…0778b0 Dummy {f00=0x0025, f01=0x0190, f02=»; V W # @ A AR @ ? ? > Q @ ? ? ? ? ? ? ? T P< @ P <a:a L :A : P6 $ R, Z R R Q $ :D P $ R ^& : L P R( ATb ATd ATf ATh ATj ATl ATn Tp ,:j Z ( I ^ - ^
0x0778b0…077a44 Dummy {f00=0x0025, f01=0x0190, f02=» @U @! $ & $ C "! PX @ Q P VF_ P RN;AR P P4 0 P P C C C LPT P P C # ' C _: DL P H C _ P X( DD _Z :EOS :EOF > > > @ !? ?R _ V > ' !? 0X A "! X6 @ Q P
0x077a44…077bd8 Dummy {f00=0x0025, f01=0x0190, f02=»(@ M M M B B M M # C C @ _ "ZN(@(@ ^ :j >Z _ m (@ M M 8 DKT X X T X M W M W y Y Y Y # C B > B > $? U P R U P R X U P Pv P
0x077bd8…077d6c Dummy {f00=0x0025, f01=0x0190, f02=»W X(W Wx 8 MTPp DYPj X T Y $ WZ XRWX $ # T $ T Y B W0 %@ R b " Y Y Y Y Y $ X _0 8 TCX< TKXB MTXH DYXN :EOS:EOV > > > AX X !? Q[PP ^ > V X > > X A
0x077d6c…077f00 Dummy {f00=0x0025, f01=0x0190, f02=»9A Y _2 !Z<Y@ 9 R !ZT !ZX AX XT_ X Y Y _^ !Z@ ![ tW !Z@ !ZD] ! X W !ZH 9C^ W| !ZL_ !ZP Wn !ZT_ X Y Y _ X r s W4 X @ _ W$ AW @W $W %W W !W W X 9d)` AX AX A T @ 9CV * 9AV 9AV X 1P * 9EV )@ X
0x077f00…078094 (0, 152) Dummy {f00=0x0026, f01=0x0190, f02=»T ; @X U X @X X 4YPYPYnYnYnYnY Y Y Y Y Y Z Z Y Y Z Z &" 13468$$ :EOS:EOV Y Y "$&1368 A[l [n!? Q[ P ^ > A > X A_& X A_, Q R x % =A Y X Y4 Z8 A[d $ $ T D i [ !^ X "! T( !^
0x078094…078228 Dummy {f00=0x0026, f01=0x0190, f02=» !^ " P P !_ _ !^R ] ] > P Pj P P P @_" Y ] D P X &Q Y W Y 4 X $;H D :ET $;H D OSP OVT W W ! X ! P X 1P W @ X U W W W ! X ! . @Wp ! X ! Tb AW^ X P&
0x078228…0783bc Dummy {f00=0x0026, f01=0x0190, f02=» , $ T D q A !^ !^ [p Y Y A_, A_& h !^ !^ W W A^v X 9c T D[h E[h 4 X B X :c H[h % ] !_ _N !_ !^V_X !_ _^ !^ Y " !^ _p [t_ X # ;dC Y A[f A[b @ A_"_ _ _( _, _0 _4 _8 _<
0x0783bc…078550 Dummy {f00=0x0026, f01=0x0190, f02=» <j =h Qb P. ^ %x 8P P< X % !X %`X P % X. R" X>W % P T % XT <A P X^<a P @ p @ $ ! P $^ P< ! Ab Ab Ab Ab Ab Ab Ab b > > > > > > > ab @b E E E E E E
0x078550…0786e4 Dummy {f00=0x0026, f01=0x0190, f02=»T ?f' W ! H Wx ! Wn & P >b& >AW >a& @T ! X X T$W. ! P X ` `T 8 P X 8 T! T! T "<A U! U! T! U! T! T! ? ? U! T! T! T! T! T! T! ! ! ! ! !
0x0786e4…078878 Dummy {f00=0x0026, f01=0x0190, f02=»P Y _" P" P& R| ^T Y _D _T X _ X _ X" X& T: X P4 0' P. 1R P _ 0$ XT % X` Z _f % _n Q4 8 TYP, R Y _$ P Q X Q % _" Y Y Y >*% X P Y $ W Y =D %_
0x078878…078a0c Dummy {f00=0x0026, f01=0x0190, f02=» 9 : : : @ P R ! R P L M M Y$ #? @ P R P T T T Y" P T _ X D D E E ] @ E @ d ? ? > ? ? ? ? ? ? ? g C ( "^ @h e U T "
0x078a0c…078ba0 Dummy {f00=0x0026, f01=0x0190, f02=» [ [ ^ [ [ [ [ @ L ! P Y _ @ M ^ U > > > > > > >WZ A ^ T " T0 ! P W SY SD AD _ ! P _, J _2 g # C ( "^ P
0x078ba0…078d34 (0, 153) Dummy {f00=0x0026, f01=0x0190, f02=» Af Af J Af T. B B J (@" T L #( "^ B P @ !? M @h P M L R ! _ PP I H P _ A c A A A @ ~ g A ~ @g A ~ @ i ( K A A "^ R (@_0 $ ( , 0 4 8 < g U T "
0x078d34…078ec8 Dummy {f00=0x0026, f01=0x0190, f02=» [ [ ^ [ [ [ [ @ L ! P Y _ @ M ^ U > > > > > > >W A ^ T " T ! P W SY SD AD _ ! P _, J _2 # C ( "^ P
0x078ec8…07905c Dummy {f00=0x0026, f01=0x0190, f02=»12 r P RTN A14 P* ( P* 2 PSEGMIS EQU * < P LDK.L A10,8 X P RB SEGERR x P* P* PSEGNCT EQU * 0 P LDK.L A10,4 NOT CATALOGED P RB
0x07905c…0791f0 Dummy {f00=0x0026, f01=0x0190, f02=» 0 0 P* NOT IN CATALOG P DATA /FF09 @ P DATA /0C00 ` P* 2 P DATA /FF14 SEG NAME MISSING P DATA 0 P* P EJECT P* P*
0x0791f0…079384 Dummy {f00=0x0026, f01=0x0190, f02=» RF RUNER0 PROG NAME ERROR > P RF RUN400 EXECUTE A CATALOGED PROGRAM 6 P RF RUNER0 x D P RF RUN420 BINARY VALUE ( MASTER FLAG ) 6 P* NO PROGRAM
0x079384…079518 Dummy {f00=0x0026, f01=0x0190, f02=» * P RF(0) RUNER1 /L EMPTY P ADK A5,0 2 . P RF(0) RUNER1 /L NO DEVICE P P* B P* NOW,SET JPT TO EXECUTE THE PROG " P LD A1,LFTBOT,A5 0 PRUN050 EQU
0x079518…0796ac Dummy {f00=0x0026, f01=0x0190, f02=»* 6 P LDK A1,0 MAX # OF SEG IN JPT $ P LC A1,JPTSEG,A11 D $ P CW A1,W:SEG0,A13 l * P RF(2) RUN100 LESS,0K : P* GREATER,#OF SEG = WSEG0 $ P
0x0796ac…079840 Dummy {f00=0x0026, f01=0x0190, f02=» RF(0) RUN200 EXIT P LDR A2,A13 & 0 P ADK.L A2,W:SEG1 MOVE SEG ADDR F P LDR A3,A11 z " P ADK A3,JPTROT+2 P* PRUN110 EQU * P LDR* A4,A2 P
0x079840…0799d4 (0, 154) Opaque[0x194]
0x0799d4…079b68 # DirEnt {nam=»TLK «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x04d0, f03=0x0000}
0x0799d4…079b68 IdxSect {
0x0799d4…079b68 f00 = 0x0026 // 0x799d4 @0x0
0x0799d4…079b68 f01 = 0x001a // 0x799d6 @0x2
0x0799d4…079b68 gno = [ // 0x799d8 @0x4
0x0799d4…079b68 [0x00]: C0x0026.0x2.0
0x0799d4…079b68 [0x01]: C0x0026.0x3.0
0x0799d4…079b68 [0x02]: C0x0027.0x0.0
0x0799d4…079b68 [0x03]: C0x0027.0x1.0
0x0799d4…079b68 [0x04]: C0x0027.0x2.0
0x0799d4…079b68 [0x05]: C0x0027.0x3.0
0x0799d4…079b68 [0x06]: C0x0028.0x0.0
0x0799d4…079b68 [0x07]: C0x0028.0x1.0
0x0799d4…079b68 [0x08]: C0x0028.0x2.0
0x0799d4…079b68 [0x09]: C0x0028.0x3.0
0x0799d4…079b68 [0x0a]: C0x0029.0x0.0
0x0799d4…079b68 [0x0b]: C0x0029.0x1.0
0x0799d4…079b68 [0x0c]: C0x0029.0x2.0
0x0799d4…079b68 ]
0x0799d4…079b68 }
0x079b68…079cfc Dummy {f00=0x0026, f01=0x0190, f02=» D E % 4 % . % A /| H /| W n :C H A M 4 H R M 4 PB " P :C_ @ 9C E ^ 4 V V ( T # Y$ @ : ( @ D A A D ( A d;FR A dW H T A $ Z F
0x079cfc…079e90 Dummy {f00=0x0026, f01=0x0190, f02=» H A A H A %0 @ A @ A @ A @ A @ 4 @ 4 A d A A A @ A $P D " X E _ @ d P @ A @ A @ A @ A @ dP H H %<
0x079e90…07a024 Dummy {f00=0x0026, f01=0x0190, f02=» %T @ fT8 @ ~P ( _ f P& B P B G G B P : < = G T B F P 4_ F =h P8 T* B F P 4_ F P 4_ : ` & A ` '
0x07a024…07a1b8 Dummy {f00=0x0026, f01=0x0190, f02=» V H H b V H H V H H
0x07a1b8…07a34c Dummy {f00=0x0026, f01=0x0190, f02=» d V H H V H H V H H
0x07a34c…07a4e0 Dummy {f00=0x0026, f01=0x0190, f02=»
[…0x3…]
0x07a99c…07ab30 Dummy {f00=0x0026, f01=0x0190, f02=» , | n n | n n
0x07ab30…07acc4 Dummy {f00=0x0026, f01=0x0190, f02=» 8
0x07acc4…07ae58 Dummy {f00=0x0026, f01=0x0190, f02=» ! Z ; Z ;P ; [ [ "D : = #n D #n ( ( I/O ERROR FILE = STATUS = 0 0 ! Z 4 [ :f Q P # :b
0x07ae58…07afec Dummy {f00=0x0026, f01=0x0190, f02=» P T [ "D : H ! A A A NO 3 D S S H S "D : R G : R G : P : : 2 X # : : . : G P W : : x
0x07afec…07b180 Dummy {f00=0x0026, f01=0x0190, f02=» MR:FC XW MR:OPN N D D L Qz L , % X P$ P P p j G = G 0 G X <A @ VQ( P X G X G = X G X G p j p j XW MR:CLO N
0x07b180…07b314 (0, 156) Dummy {f00=0x0027, f01=0x0190, f02=» M T - Y V ;AP p b p b MR:RS XW MR:GER F % P p F P G G 0 1 G T G W F P~ b G G = U H H L U L j j j j j F P 0 G T G F F U
0x07b314…07b4a8 Dummy {f00=0x0027, f01=0x0190, f02=» p p p XW MR:PUR F % P p " F P F G G F G T G W 9 F TX F PR F U D F P 0 G T G F F p " p " p " XW MR:ENR F ! P p F P b = F G
0x07b4a8…07b63c Dummy {f00=0x0027, f01=0x0190, f02=» b G G = U H F Pd 0 G T G F P p 6 F P. 0 G T G F P U H p 6 p 6 p 6 XW MR:PUW * F % P p F P F G G F G T G W 9 F T0 F P 0 G T G F P
0x07b63c…07b7d0 Dummy {f00=0x0027, f01=0x0190, f02=» H 4 F P. 0 G T G F P U H 0 4 p MR:AR XW MR:ASB : P P p F F P F D E T %W ) G G p F XW MR:REL : P P p D G G P 0 E T E p MR:LKM
0x07b7d0…07b964 Dummy {f00=0x0027, f01=0x0190, f02=» F R p f G < ( B F B ] B P W B P ; R _ D G G p f fW MR:INF < ( B p MR:RWR XW MR:RBR F P $ T p F T F P@ 0 G T G F U H p t b
0x07b964…07baf8 Dummy {f00=0x0027, f01=0x0190, f02=» H b G G = p p MR:PC XW MR:EXI D ( p XW MR:DAT @ T I Y p J XW MR:TIM @ " T I I Y I < I I 2 I p MR:ES XW MR:EOS
0x07baf8…07bc8c Dummy {f00=0x0027, f01=0x0190, f02=» H h p l b p 2 p 2 XW MR:REW F $ P P p 1 U H b p `
0x07bc8c…07be20 Dummy {f00=0x0027, f01=0x0190, f02=» UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU
0x07be20…07bfb4 (0, 157) Dummy {f00=0x0027, f01=0x0190, f02=»UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU IDENT O T:D TRA NOD P:PIL T:FMT P:S001T:KEY S:GTABT:LIT P:BAS T:BAT T:PAT P:END T:CAT T:PIC P:MTABT:ATABU:BTABS:BT
0x07bfb4…07c148 Dummy {f00=0x0027, f01=0x0190, f02=» ! @!lP " W !n C C # A!l "D : [ [ [ [ ; Z [ : [ [ : Z "t Z "t Z Z Z Z Z Z Z : " @ @ W& " @ @ @ @ U A =a>a
0x07c148…07c2dc Dummy {f00=0x0027, f01=0x0190, f02=» #T "D : ; T : : " ' _ " Q "h : "9d # X "! # _()0 :R ' : T : _ ; &P _ # : : " <P. F F , 1Q R W F T _, W "h : " " 'Q R "h : " %T
0x07c2dc…07c470 Dummy {f00=0x0027, f01=0x0190, f02=» _ * CREDIT CODE LINKER REL 4.2 791123 * * DATE XXXXXX * PAGE 0000 * J A : _ A : _ A : _( A : _4 A : _@ A : b _L A : _X A : j _d A : x _p A : _| A : _ A : _
0x07c470…07c604 Dummy {f00=0x0027, f01=0x0190, f02=» B A A A !H ( C !N ( C !T ( C A(v (V @(v , T (x @ dX A d @ A WF A d @(vT R2 ]B @ !CCT A d A ~ # C _n A v $P$ D D X D * E _( A h P @(vP T&
0x07c604…07c798 Dummy {f00=0x0027, f01=0x0190, f02=» & @(v A'R A'X _ @ d9CV @ T DW D A A d @ A @ A A P A H @ $P( D X ) #T - M M _, ) $P " #T ) A p_ ) @ A ~ A # C C @ d9D & A ~
0x07c798…07c92c Dummy {f00=0x0027, f01=0x0190, f02=» : A d ( : 2 R ! : 5Nv@7 7 > 2 2 7 ( - 3 ! @ ~ # T. T Tn B P, B $ PZ B P Y<PL P T T W4 P4 W0 # )P ;M C W "D : ! A,l
0x07c92c…07cac0 Dummy {f00=0x0027, f01=0x0190, f02=» T| ` " :A B ;m ) # ) #T ) ( T B ! T @) ! T A) Z`_ A) WB ! T. !Z $ T A) @) ! T _ A) W ! T A) ) "D : @) @) @) " T P, @) U + Wv R V $Rp A) A) WB
0x07cac0…07cc54 (0, 158) Dummy {f00=0x0027, f01=0x0190, f02=»_ _ @) R V$ H # @) (" :A + : + @) A) _8 R @) R W ) T W #T V8 A) ,V R @) @) A) A) A) R S _P ) : " @) R P S R V A) _" "h : ! A- R @ R - _ $:ARL:A
0x07cc54…07cde8 Dummy {f00=0x0027, f01=0x0190, f02=» A S S "D : @ d9FV@ @ C E T A T6W& D E P E DDP R E P D ! A - _^ !t_ S R Z S A : ! @ d9L . @ d9C 4 R C / 0l 0 L <. 1 L
0x07cde8…07cf7c Dummy {f00=0x0027, f01=0x0190, f02=» ' 2 2 A , A D A 8 A < A 4 A 0 A P A A A A A $ @ A @ P A "D : R @ P ! R P ! / @0jP ! 0 ,P _ P ! 0l 0 $ @ d:DV W 1 2V @ D =P 8 < =P R S #T 8
0x07cf7c…07d110 Dummy {f00=0x0027, f01=0x0190, f02=» P L 8 - 9 W6 @ d=LR L V( < 9 @ d=LV X R Y _t X~ A0j_ : $ (P: (T _ ,P L P ^ P X" X&_ I ( 9 5 ) 4 _: : < $P D H R I _ 0 _ : " H T" I $P D H R I _ 0 _ "h
0x07d110…07d2a4 Dummy {f00=0x0027, f01=0x0190, f02=» 9j C T @ A W D C C ( # U : D T A D C C B U P : 1 1 1 4P _ , 4 9 1 "h : < $P D H ^ E _ , $P D H ^ E _ :
0x07d2a4…07d438 Dummy {f00=0x0027, f01=0x0190, f02=»9IR 4 "D : 2 R ! _ ! $l 5 #T @ d9C 4 @ dT = 4 W = @ | @ A | A C H $8 5( . < X P & ;D _ R % ;D @ 5( !j H $8 5( < 0 5( A z 5( H
0x07d438…07d5cc Dummy {f00=0x0027, f01=0x0190, f02=» nT A x A n @ dP R S #T "D : : A P A d_ @ dTL $ T A d R S #T _V @ ! A A d_ !|_ @ d !x_ @ d $ @ ! _. @ dT R :h -Q 5 : @ dT 4 2
0x07d5cc…07d760 Dummy {f00=0x0027, f01=0x0190, f02=» # 0 "D : ! R 9i @ d:LRn 7 :& P( 7 7 :& P D7 D7 7 R ;a T C :OV C ;NV R Wp 7 :& P4 @ d<DR" 7 7 :& P D7 W 9j 7 ! Z C 8 | 9 W "
0x07d760…07d8f4 (0, 159) Dummy {f00=0x0027, f01=0x0190, f02=» R P*?A S ?i R : S "h : 9r9r9r9j ! 2>iP & R W R @ d9C 4 "D : # 2?m #T X868:8 !Z $ Pd @ dT ( @ d
0x07d8f4…07da88 Dummy {f00=0x0027, f01=0x0190, f02=»T. B P P& | Q @ Q "D : ! _ ! _ " 9 9 L 0P ( 1 # P$ " ) # @9 I W # P I "h : @9 ! _ ! W ! Q : U 9g D: $ $ T2 @ A P S S M ; :a
0x07da88…07dc1c Dummy {f00=0x0027, f01=0x0190, f02=» 8 5R6Q0 Q, ; _` Q < X T _t W ! " P W ; V W ; R R T T R Q ; ; ; ; V R $ T(W #T Q
0x07dc1c…07ddb0 Dummy {f00=0x0027, f01=0x0190, f02=» W : ! @ D P A @ D T D [ A "D : A @ R P S E S _< " P, Q B ^ _ @ jT j ! C _0 "h : ! $P D D P V L PF =h & >A D R _ " P W
0x07ddb0…07df44 Dummy {f00=0x0027, f01=0x0190, f02=» A "h : " (P:W (P4 H V W P&Q = P _ 5 ( 9 ) = 8 "h : ! _F <T 5 9 : ! @ dPF R ! @ R P ! A @ | S D R Bn 4 "D : ! R ?4 ?F ?4 ? X?x ! W ! R ! TR
0x07df44…07e0d8 Dummy {f00=0x0027, f01=0x0190, f02=» D? D? P # P Tr T Q !CCP @ dP A P @ d9EV 9GR # C @ dP | D 9 "D : 2 R ! _ ! _ R P 0P Y P : P ! P P P Q P :> > ?@?@> ?4> ?@> ?4?@> B C P ! R #
0x07e0d8…07e26c Dummy {f00=0x0027, f01=0x0190, f02=»U : W @ l! P& R ! #T A l A l A "D : ! [ A _ ! A A A l A @ P ! A "D : ! W ! @ 9r A A l C C P6 ' ?A : : C @ #
0x07e26c…07e400 Dummy {f00=0x0027, f01=0x0190, f02=» ' ?A Bb B` !CCT W2 T W, X ' P" X A T # P Bl Bl # P4W C C W$ , P - ! C - A P Y "h : @ C _ ! @ rP @ t Y A r L 8P X V W QL V W Y" X
0x07e400…07e594 (0, 160) Dummy {f00=0x0028, f01=0x0190, f02=» ( @| A A A @ d9 R A ~ A d9 R| '| A A A A A A A A A ( A @ A L A 2 A A ~ @ A A d @ P A $P D " X E _ ` ' D A T A @ d:DR$ D @ A @ R W R @ P W ' A @ R @ d9DR
0x07e594…07e728 Dummy {f00=0x0028, f01=0x0190, f02=» % @ @ ( A A A A ~ ( A ~ % @ ) A ( @ ~T @ A : A d_ D ? :n S S A @ P. A' @ R A' A :A H' A' : # P D C A | : E $ # P C _ :
0x07e728…07e8bc Dummy {f00=0x0028, f01=0x0190, f02=» * / ! ) @ ) "D : ! S P R #T S _ "D : S S U W S #T S 4 S R : ! A*z R @ R *r_ $:ARL:ARB H # $ D @ R
0x07e8bc…07ea50 Dummy {f00=0x0028, f01=0x0190, f02=» E T A T6W& D E P E DDP R E P D ! A *r _^ !t_ S R Z S A : ! @ d9L + @ d9C 1 R C , -J - L 9 - L 9 - P 9 K
0x07ea50…07ebe4 Dummy {f00=0x0028, f01=0x0190, f02=» A A A $ @ A @ P A "D : R @ P ! R P ! , @-HP ! 0 ,P _ P ! -J - $ @ d:DV W - /4 @ D : 8 < : R S #T 8 / /f ' , /f / 8 $ +|
0x07ebe4…07ed78 Dummy {f00=0x0028, f01=0x0190, f02=» 5 @ d=LV X R Y _t X~ A-H_ : $ (P: (T _ ,P L P ^ P X" X&_ I ( 9 5 ) 4 _: : < $P D H R I _ - _ : " H T" I $P D H R I _ - _ "h : " $ /. D ^ T E < 9F = @ d
0x07ed78…07ef0c Dummy {f00=0x0028, f01=0x0190, f02=» ( # U 7 D T A D C C B U P 7 - - - 4P _ , 4 9 - "h : < $P D H ^ E _ , $P D H ^ E _ : R W U / / T ' $P
0x07ef0c…07f0a0 Dummy {f00=0x0028, f01=0x0190, f02=»#T @ d9C 1 @ dT 9 1 W 9 @ | @ A | A C H $8 2 . < X P & ;D _ R % ;D @ 2 !j H $8 2 < 0 2 A z 2 H $8 2 < 1P T A @ nP& @ dP 9a
0x07f0a0…07f234 (0, 161) Dummy {f00=0x0028, f01=0x0190, f02=» "D : : A P A d_ @ dTL $ T A d R S #T _V @ ! A A d_ !|_ @ d !x_ @ d $ @ ! _. @ dT R :h -Q 2` : @ dT 1 2 R ! :;8; ; ; 2 2T2T2T2 2 2 2 2 2 2 2 ><> > =*
0x07f234…07f3c8 Dummy {f00=0x0028, f01=0x0190, f02=» 7 P( 4 4 7 P D4 D4 3 R ;a T C :OV C ;NV R Wp 4 7 P4 @ d<DR" 4 4 7 P D4 W 6H 3 ! Z C 8 | 5 W " @ | C C @ 4 # 4 "D : "
0x07f3c8…07f55c Dummy {f00=0x0028, f01=0x0190, f02=» 7 S "h : 6P6P6P6H ! 2>iP & R W R @ d9C 1 "D : # 2?m #T X5 5 5 !Z $ Pd @ dT :. @ d<CV C @ d<CV : C P C P $P _
0x07f55c…07f6f0 Dummy {f00=0x0028, f01=0x0190, f02=»! _ ! _ " 5 5 L 0P ( 1 # P$ " ) # @5 I W # P I "h : @5 ! _ ! W ! Q 6 U 9g D6 $ $ T2 @ A P S S M 8 :a # R R S _ S <H % [ [
0x07f6f0…07f884 Dummy {f00=0x0028, f01=0x0190, f02=»Q, 8l _` Q < X T _t W ! " P W 8 V W 8 R R T T R Q 8 8 8 8 V R $ T(W #T Q P R Zf _n R 7 P 7
0x07f884…07fa18 Dummy {f00=0x0028, f01=0x0190, f02=» "D : A @ R P S E S _< " P, Q B ^ _ @ jT j ! C _0 "h : ! $P D D P V L PF =h & >A D R _ " P W 7 " P W D Y T
0x07fa18…07fbac Dummy {f00=0x0028, f01=0x0190, f02=»T Tn B P, B $ PZ B P Y<PL P T T W4 P4 W0 # )P ;M C W "D : " (P:W (P4 H V W P&Q ;, P _ 5 ( 9 ) ;, 8 "h : ! _F <T 5 9 : ! @ dPF R ! @ R
0x07fbac…07fd40 Dummy {f00=0x0028, f01=0x0190, f02=» TR @ dP D= | D=$ (P* H ;AZ H P # X P T A , ?( W| < P < X= W R ! D= D= P # P Tr T Q !CCP @ dP ?( P @ d9EV 9GR # C @ dP | D 5 "D : 2 R ! _ ! _ R
0x07fd40…07fed4 (0, 162) Dummy {f00=0x0028, f01=0x0190, f02=» & S PD " @ D U 7 W A @ l! P ! @ ) A l @ R` @ D U 7 W @ l! P& R ! #T A l A l A "D : ! [ A _ ! A A A l A @ P ! A "D : ! W !
0x07fed4…080068 Dummy {f00=0x0028, f01=0x0190, f02=» @ # R 3 ! =* RJ @ D " :AT 9h P _ R " S P 9H R @ 2 "D : " ' ?A ? ? !CCT W2 T W, X ' P" X A T # P ? ? # P4W C C W$ , P - !
0x080068…0801fc Dummy {f00=0x0028, f01=0x0190, f02=»W Y" X P X P 5 X T A r A t W 5 ( 8 ) 9 + _b "D :
0x0801fc…080390 Dummy {f00=0x0028, f01=0x0190, f02=» F .R F 0 F *Q &n G . F .?DV ?d' &" G . 2 F M M G =T p M P G * : F * F 0R 2 R&P 0 G * G * 2 F M M _, : 2 F 1 I I G * G ( ' F .>A ' + ' 2 F n $ #T
0x080390…080524 Dummy {f00=0x0028, f01=0x0190, f02=» 2 F 0 U U F .?BV 2 F X ,?d'> )Z " #T U 2 U G * F .?CV@ 2 F X ,?A'> )h " #T U 2 U G * G . G / : 2 F - n # p U U G * : G . G / : G .
0x080524…0806b8 Dummy {f00=0x0028, f01=0x0190, f02=» )29d A( )2 d )2 )2 A( ( ( #n ( R W( ( ( P( !00X R !00P P % ( ( P _" % "h : R _ 9D :) ) ) ) * * *2*J*X*l*|* * * * + + +L+N+d+ + + + , , ,,,B,P,b,z, , , , , , - - -(-J-Z-t- - - - - .v- - . . .&.8.R.d- - -
0x0806b8…08084c Dummy {f00=0x0028, f01=0x0190, f02=»E LISTING UNSATISFIED EXTERNALS PICTURE POOL LINKER STATISTICS KEYTABLE POOL FORMAT POOL SEGMENT MAP LINKER STATISTICS TOTAL &LOC MODULE ERROR COMMENT $LOC DATA IX SYMBOL DEFINED IX TYPE LOC DATA 0SYMBOL TYPE VALUE
0x08084c…0809e0 Dummy {f00=0x0028, f01=0x0190, f02=» TYPE LENGTH USAGE MODULES ERRORS MEMORY OVERFLOW SYMBOL TYPE CONFLICT ILLEGAL INPUT LOAD ADR INCORRECT UNREFERRED LITERALS UNDEFINED LITERALS NO START ADR DBL DEF MODULES UNSATISFIED EXTERNALS MODULE LENGTH ERROR TRANSLATION ERRORS WR
0x0809e0…080b74 (0, 163) Dummy {f00=0x0028, f01=0x0190, f02=»NOD TYPE ERROR MODULE LONGER THAN SEGMENT SIZE IDENT MISSING ADDRESSING MODE CONFLICT NOD SEQUENCE ERROR CALL TABLE PERFORM TABLE LB TABLE LITERAL DESCRIPTOR TABLE PICTURE DESCRIPTOR TABLE FORMAT DESCRIPTOR TABLE LITERAL POOL SIZE PICTURE POO
0x080b74…080d08 Dummy {f00=0x0028, f01=0x0190, f02=»LE KEYTABLE POOL SIZE AVAILABLE WORKSPACE USED WORKSPACE UNUSED WORKSPACE MAX WORKSPACE PER MODULE SEGMENT SIZE PERCENTUAL USAGEPROGRAM LENGTH =LINKAGE ERROR : : XXXXX BYTES, XXXXX ENTRIES: XXXXX BYTES, XXXXX % TLK.ERR.
0x080d08…080e9c Dummy {f00=0x0028, f01=0x0190, f02=» @ D A A A @ d @ ~ P ! ( : A! S A! ! W ?H/ 2 Tr Q / ! 2 !$ 2 !* 2 !6 2 ! 2 !< 2 ! 2 ! 2 /@ !0 2 U`/ ! 2 3, 6n # @ A T
0x080e9c…081030 Dummy {f00=0x0028, f01=0x0190, f02=» 62 A 8tW 8l T U`/ !0 2 1p P @ M A @ M A @ M A A A A : " A1 A1 3 S S @ S @ S S "h : " > @ ~T U` 2 P > "h
0x081030…0811c4 Dummy {f00=0x0028, f01=0x0190, f02=» A1 > R :R8W @1 P.> > & 3 @1 S :a S @2$ A2 A1 "h : " # A2 # #T ?h #T S A3 "h : " @ d @ ~P 3 3 ? = P L A P O W L P
0x0811c4…081358 Dummy {f00=0x0028, f01=0x0190, f02=»o W K ? A j 3 = P F q P W F P ? 3( "h : " @ ~P @ A4N 4B <Z @ A4P @4N A 4F <Z @ A4R @4P A T <Z @ A4T T @4R A 4J <Z @ @4T A A @
0x081358…0814ec Dummy {f00=0x0028, f01=0x0190, f02=» C T ! 1 e 4V > 4N > > @ Q T !< 1 e 4X > 4P > > T* ! 1 e 4Z > 4R > > @ Q T ! 1 e 4 > 4T > > "h : " 9a :a ; S < S dR _ Q R
0x0814ec…081680 Dummy {f00=0x0028, f01=0x0190, f02=»PD R( " # 0 C P C P C _, , @ ~P ? _ Z L P " %W " # 0 C P C _ 2! P( ! P ! R A _& @ 8 A @x_8 R ! R R @ 9v Zd > _ 7 8 8 8(8D8^) ) )
0x081680…081814 (0, 164) Dummy {f00=0x0029, f01=0x0190, f02=» " W " W " X7 A7 @7 X7 V 7 " #T X7 0 P" P P /TW /8 #T @ P % " ) X7 $ $ T 9A P 9a ( P P 7 W )
0x081814…0819a8 Dummy {f00=0x0029, f01=0x0190, f02=» P 5 X T A r A t W 5 ( 8 ) 9 + _b "D : " D9 8 ; U @ d ;@ #n X V * # Wr X 9AV" #n #nWH X L T X # G W" #n
0x0819a8…081b3c Dummy {f00=0x0029, f01=0x0190, f02=» X X VL H 9a @ / 2 / > X R / > :$9AR H XZ H V ~ % > % R > :$ "h : " 8P* X ^ X % > % > A _. "h : <&<6<><BSTR BIN BCD PIC KEY FM
0x081b3c…081cd0 Dummy {f00=0x0029, f01=0x0190, f02=» 9l9B @< < #T #n T dV _z Q W: X ' @ ~P W ! 9A ?4 Q W <V A<X ] Q$ ?4 T Q - @<X Q A<XW A<X @ dV <V #n <V R >
0x081cd0…081e64 Dummy {f00=0x0029, f01=0x0190, f02=»> @> T$ H > @ * S S S = R = 9 R*% W(9 V ;a A> A 9 = V S = V S ;a A> = V A = V U A> W^ @> PV @> 9a :A 3& A> #T 4 S @> A? A> A> "h : " "P _ P "h :
0x081e64…081ff8 Dummy {f00=0x0029, f01=0x0190, f02=» _ @ jT j ! C _0 "h : ! $P D D P V L PF =h & >A D R _ " P W C` " P W D Y T #T_ "D = : " $l P # B @ ~P _
0x081ff8…08218c Dummy {f00=0x0029, f01=0x0190, f02=»W (P4 H V W P&Q Ad P _ 5 ( 9 ) Ad 8 "h : ! _F <T 5 9 : " 8P X Y R X R W ^ #T "h : I E I I W I E E E I E E E E I E E E I E E " W " AA 8P @A P P /( #TW * #
0x08218c…082320 Dummy {f00=0x0029, f01=0x0190, f02=» W #nW <bT )j " A #T _ "h : ! *Pp Z Z R 8 4 U 8 5R6Q0 Q, DF _` Q < X T _t W ! " P W D V W D R
0x082320…0824b4 (0, 165) Dummy {f00=0x0029, f01=0x0190, f02=» P R Zf _n R B P B [ "D : D $ ! 9A : R W :
0x0824b4…082648 Dummy {f00=0x0029, f01=0x0190, f02=» / 00 TLK.ERR. " > A A A @ d @ fTD A A 2$ 0 A A 4 7 6 @ hP ! @ pT ! H 5 @ fT T @ hP W ; @ ?a @ A 5J A @ A 1 : P / ( /|( A/ ( "h :
0x082648…0827dc Dummy {f00=0x0029, f01=0x0190, f02=» 3P 3Pj_: 2$ <A ]H # 4?m #T 3F P P $P _ " C _^ 4V W >AX R _ T P , L X L L T 5_( G _0 @0 V T S #T 0 : " d E 8P E _
0x0827dc…082970 Dummy {f00=0x0029, f01=0x0190, f02=» H 2 ";L = < ( < _T $P. D ' X ( < < < _2 < =n "h : " # A3 # #T ?h #T S A3> "h : ! @ ~ # T. T Tn
0x082970…082b04 Dummy {f00=0x0029, f01=0x0190, f02=» "D : D D x z D D D D 4B4J4R4Z4b4j4r4z4 4 4 4 4 4 P:END T:FMT T:PIC T:KEY T:LIT T:PAT T:CAT T:BAT P:BAS I:NTPA U:BTAB T:ATAB S:BTAB I:RST " !B 2 aH !B = eh !B eh = 3 $PNR
0x082b04…082c98 Dummy {f00=0x0029, f01=0x0190, f02=»S < S dR _ Q R _ "h : I E I I W I E E E I E E E E I E E E I E E " W " A5 8P @5 P P /( #TW * # 5 ( 5 " !WWP A 5 #T 4VP 5 =l $ % P P"
0x082c98…082e2c Dummy {f00=0x0029, f01=0x0190, f02=» 8P X % #n X 9h S ( X ! P X 5J ( % G $P D _ ! ( ) ( _ "h : " A7 A7 A P P R _ "h : $ T A7 W 3P @7 8
0x082e2c…082fc0 Dummy {f00=0x0029, f01=0x0190, f02=» H X ?a ` H L P / / = _: 2$ <A ] # 4?m #T 3F B ! X P $P _ " C A7 _d 3TN 2$ <A 4 P $P0 ( V S W* R >A_ % H H U H L 5_ S A7 7 9l9 9 9 9 9 )
0x082fc0…083154 (0, 166) Dummy {f00=0x0029, f01=0x0190, f02=» " W " W " X9f A9d @9d X9XV 9R " #T X9F 0 P" P P /TW /8 #T @ P % " ) X9L $ $ T 9A P 9a ( P P
0x083154…0832e8 Dummy {f00=0x0029, f01=0x0190, f02=» $ X* ?m #T P S S ! 9bT W D: S X ! Pj X T * # S WH #n #n #n - ' #T & >j 8 "h : " @ ~P < = R @< @< T$ H
0x0832e8…08347c Dummy {f00=0x0029, f01=0x0190, f02=» @< PV @< 9a :A 3& A< #T 4 S @< A= A< A< "h : " A=( =) # T" = $R ( < _ < "h : " A=~ A= 3 S S @ S @ S S "h : " =
0x08347c…083610 Dummy {f00=0x0029, f01=0x0190, f02=»W @= P.> > & 3 @= S :a S @= A> A= "h : " 4P [R , #n - ' #T ( G ( ) ' _` P P "h :
0x083610…0837a4 Dummy {f00=0x0029, f01=0x0190, f02=»N WORK5,FWORK5,2,SBLEN,WSEQS,DK P REWIND WORK5 ( ( PMEOM EQU * ENTRY WHEN END OF MEMORY > P CALL PASS3 j P LD A1,XEOM END OF MEMORY ? ~ P RF(NZ) ERROR YES , P LD A1,NSEG WAS IT A SEGMENTED PROGRAM ? P RF(Z) CLOSED NO P LDK
0x0837a4…083938 Dummy {f00=0x0029, f01=0x018e, f02=» ' NOD TYPE P CALL IO:NOD WRITE A NOD PCLOSED EQU * 4 P CLOSE WORK1 H P CLOSE WORK2 P CLOSE LP p P CLOSE WORK5 * * PERFORM EXIT * $ LDK A7,0 SAVE THE FILES TO LKE PRETURN EQU *
0x083938…083acc Dummy {f00=0x0029, f01=0x400c, f02=» @ P CALL IO:NOD WRITE A NOD PCLOSED EQU * 4 P CLOSE WORK1 H P CLOSE WORK2 P CLOSE LP p P CLOSE WORK5 * * PERFORM EXIT * $ LDK A7,0 SAVE THE FILES TO LKE PRETURN EQU *
0x083acc…083c60 Dummy {f00=0x0029, f01=0x2008, f02=»
0x083c60…083df4 (0, 167) Opaque[0x194]
0x083df4…083f88 # DirEnt {nam=»CSEG4 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0538, f03=0x0000}
0x083df4…083f88 IdxSect {
0x083df4…083f88 f00 = 0x0029 // 0x83df4 @0x0
0x083df4…083f88 f01 = 0x0002 // 0x83df6 @0x2
0x083df4…083f88 gno = [ // 0x83df8 @0x4
0x083df4…083f88 [0x00]: C0x0029.0x3.0
0x083df4…083f88 ]
0x083df4…083f88 }
0x083f88…08411c Dummy {f00=0x0029, f01=0x0190, f02=» d $ j > R W W W W N 9 V r W F F $ $ I P6 ! P0 R$ Q $ W T D L ;FV 2 V R $V # _& YF N 4 # R WP_ _ _ @ H * ( B T 4 Q W 4 ) Y P ) Y :WP W W
0x08411c…0842b0 Dummy {f00=0x0029, f01=0x0190, f02=»A CAT. PROC. , P( P$ P R 9AQ O P F 9AV W 2 Y4 N P0 , P8 P4 F 9AV G . N jW W 2 @ D H ;AV I , H R ;H;h _ O : F ! # 4 C C C ( V P G : O x R WbW W^W
0x0842b0…084444 Dummy {f00=0x0029, f01=0x0190, f02=» N 9B 9 O : 8 : W @P O v |9H W | v | W | v |:H W | v | W |WV v |;H W | v | W | v |<H W | v | W | v |=H W | v | W | v |>H W | v | W | W p > : : b W W W v | W | !,,P V Q 5 W _" W _ *, , P
0x084444…0845d8 Dummy {f00=0x0029, f01=0x0190, f02=» P` 0R RV PP @ :PJ @ <PD V> W T0 T 9FR T D ! A :W W 0 O W 2 Yp N 9 Rh N 9DV. # . C C C R HW W W W # j C C C < R JW(W _0_2 N 9CV j $ / W
0x0845d8…08476c Dummy {f00=0x0029, f01=0x0190, f02=»_" ! _ W v |9H W | v | W | v |:H W | v | W | v |;H W | v | W | v |<H W | v | W t , W | p ,8h 00 ^ R WV RP QJ V R W T T n ' ' ' W & R *T N O O O W
0x08476c…084900 Dummy {f00=0x0029, f01=0x0190, f02=»W W W W D j B &P< N ? O & O F O j D T _ 8 8 + 8 & A P ( O : L 11CCI (PTS VERSION 800118)
0x084900…084a94 (0, 168) Opaque[0x194]
0x084a94…084c28 # DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x0540, f03=0x0000}
0x084a94…084c28 IdxSect {
0x084a94…084c28 f00 = 0x002a // 0x84a94 @0x0
0x084a94…084c28 f01 = 0x003e // 0x84a96 @0x2
0x084a94…084c28 gno = [ // 0x84a98 @0x4
0x084a94…084c28 [0x00]: C0x002a.0x0.0
0x084a94…084c28 [0x01]: C0x002a.0x1.0
0x084a94…084c28 [0x02]: C0x002a.0x2.0
0x084a94…084c28 [0x03]: C0x002a.0x3.0
0x084a94…084c28 [0x04]: C0x002b.0x0.0
0x084a94…084c28 [0x05]: C0x002b.0x1.0
0x084a94…084c28 [0x06]: C0x002b.0x2.0
0x084a94…084c28 [0x07]: C0x002b.0x3.0
0x084a94…084c28 [0x08]: C0x002c.0x0.0
0x084a94…084c28 [0x09]: C0x002c.0x1.0
0x084a94…084c28 [0x0a]: C0x002c.0x2.0
0x084a94…084c28 [0x0b]: C0x002c.0x3.0
0x084a94…084c28 [0x0c]: C0x002d.0x0.0
0x084a94…084c28 [0x0d]: C0x002d.0x1.0
0x084a94…084c28 [0x0e]: C0x002d.0x2.0
0x084a94…084c28 [0x0f]: C0x002d.0x3.0
0x084a94…084c28 [0x10]: C0x002e.0x0.0
0x084a94…084c28 [0x11]: C0x002e.0x1.0
0x084a94…084c28 [0x12]: C0x002e.0x2.0
0x084a94…084c28 [0x13]: C0x002e.0x3.0
0x084a94…084c28 [0x14]: C0x002f.0x0.0
0x084a94…084c28 [0x15]: C0x002f.0x1.0
0x084a94…084c28 [0x16]: C0x002f.0x2.0
0x084a94…084c28 [0x17]: C0x002f.0x3.0
0x084a94…084c28 [0x18]: C0x0030.0x0.0
0x084a94…084c28 [0x19]: C0x0030.0x1.0
0x084a94…084c28 [0x1a]: C0x0030.0x2.0
0x084a94…084c28 [0x1b]: C0x0030.0x3.0
0x084a94…084c28 [0x1c]: C0x0031.0x0.0
0x084a94…084c28 [0x1d]: C0x0031.0x1.0
0x084a94…084c28 [0x1e]: C0x0031.0x2.0
0x084a94…084c28 ]
0x084a94…084c28 }
0x084c28…084dbc Dummy {f00=0x002a, f01=0x40d4, f02=» 4 F IDENT DEFDOC T,REL=4.2,791116,870137140420 DEFDOCK < DEFDOCK N T:FDSP b I:EVA0 t T:IO2 $ H @ 1,A8 $ P LDK A7,X'1B'+X'80' ORDER + WAIT P
0x084dbc…084f50 Dummy {f00=0x002a, f01=0x413a, f02=» 4 F IDENT FMOVE T,REL=4.2,791116,870137140420 FMOVE < FMOVE L I:EVA0 ^ I:ERR2 p I:EVA5 , ( D #0 & + I:ER18 I:RT1 * & $ P _
0x084f50…0850e4 Dummy {f00=0x002a, f01=0x40ee, f02=» 4 F IDENT TYPET T,REL=4.2,791116,870137140420 TYPET < TYPET L I:EVA0 ^ I:ERR2 p I:RT1 , ( B #03 ;d # + @ @
0x0850e4…085278 Dummy {f00=0x002a, f01=0x40f2, f02=» 4 F IDENT ICLEAR T,REL=4.2,791116,870137140420 ICLEARK < ICLEARK N I:EVA0 b I:RT1 t , ( @ #0 0T ' ' _ T $ @
0x085278…08540c Dummy {f00=0x002a, f01=0x4112, f02=» 4 F IDENT EMPTYT T,REL=4.2,791116,870137140420 EMPTYTK < EMPTYTK N I:EVA0 b , ( @ #0 0T & ! T t I:RT1 , ( P & ! X T C T T !P <
0x08540c…0855a0 Dummy {f00=0x002a, f01=0x0190, f02=» 4 F IDENT T:STIN T,REL=4.2,791116,870137140420 STRIN1K < STRIN1K N T:STEV b , ( @ X x & Y " X R W t T:RNOK T:LOFSN , ( P _ Y $ I:EVA0
0x0855a0…085734 (0, 169) Dummy {f00=0x002a, f01=0x4160, f02=»! P " P p I:ERR2C , ( s W " P X $ X " R W " , ( V R W V % _ R I:MOV T:GRFC , ( $ " D $ D X T:ROK $ X y & @ <
0x085734…0858c8 Dummy {f00=0x002a, f01=0x0190, f02=» 4 F IDENT T:STOU T,REL=4.2,791116,870137140420 STROU1K < STROU1K N T:STEV b T:LOFS t * & @ X x & Y " I:EVA0 T:LOPS I:ER17 , (
0x0858c8…085a5c Dummy {f00=0x002a, f01=0x414c, f02=» s ?A W ?AW <! P , ( X " X R W V y , T:DUPX T:GRFC n , ( & Y $ 8 " X X T:ROK T:RNOK x ( y $ < 8 9PL ?P ET S
0x085a5c…085bf0 Dummy {f00=0x002a, f01=0x4140, f02=» 4 F IDENT T:STEV T,REL=4.2,791116,870137140420 T:STEVK < T:STEVK N T:GRFC b I:EVA0 t * & H #0T Y Y , ( ! T # P & #0T ( I:ERR2 7 :
0x085bf0…085d84 Dummy {f00=0x002a, f01=0x0190, f02=» 4 F IDENT T:EDFL T,REL=4.2,791116,870137140420 T:EDFLK < T:EDFLK N T:PM1 b T:PM2 r T:CASP , ( I Y ( x P Y * , ( x y W X " T:DUPX
0x085d84…085f18 Dummy {f00=0x002a, f01=0x018e, f02=» V X ( x C T:CSEG * T:SCUW < , ( ( Y * X Y , N , ( X X C & C C ~ , ( ( B P 9 T:IOERC , ( R 9 X !@
0x085f18…0860ac Dummy {f00=0x002a, f01=0x0190, f02=» , ( K _ _ B U C Q C T:CLR1N 4 T:CLR2 F , ( i @ D X X * X , ( $" ~_> @ Y X * _R X !@ , ( XX y X # x V y X X , ( * P P 1 _
0x0860ac…086240 Dummy {f00=0x002a, f01=0x415e, f02=» X 1 1 X x , ( ? !@T X $ " P y _ T:CLIT@ H T:EKEY Z , ( _ x T X H X l $ { X * , )$ P _ : H D !T P l )Wz 9 UP m l yV* Ph R^ PP +P ET YU cQ m z o |
0x086240…0863d4 (0, 170) Dummy {f00=0x002a, f01=0x0190, f02=» 4 F IDENT T:DYKI T,REL=4.2,791116,870137140420 J F " T:DYKIK T:PM1 T:PM2 T:CLR1 T:CLIT T:CLR2 T:IOER@ T:EKEY T:BELLC < T:DYKIK I:EVA7@ , ( @ ' Y y , ( x C y X C C
0x0863d4…086568 Dummy {f00=0x002a, f01=0x0190, f02=» T:CLRD * & } _` y C Q " T , ( X ! X X ! x D , ( Y Y _ X "@P B R y t , ( C B P 9 V _F9 V X ! , ( T X !@X y C _d y C C T
0x086568…0866fc Dummy {f00=0x002a, f01=0x0190, f02=» c C _$ _ T:CLR2 b T:SCUW 4 , ( U y _6 x X@ X X F , ( s # C _. B ]d P v , ( C Q X8_H x XD @ Y c , ( C y XR X x
0x0866fc…086890 Dummy {f00=0x002a, f01=0x0190, f02=»:CLIT T:LOFS I:EVA0 " * & H ( 4 T:LOPSN b T:CLMI t , ( ! ( : B C T:PM1 D T:GRFC , ( ; _J + . X 9 V ! P
0x086890…086a24 Dummy {f00=0x002a, f01=0x4142, f02=» : p , ( , ( " $ : ! P # P > : n H D ! ! D ]Tf e iR o F yT } Q T 0 P R P V H D ! VV T #P 'Q( W P Q8 0 7 @ QV WP
0x086a24…086bb8 Dummy {f00=0x002a, f01=0x0190, f02=» 4 F IDENT T:UPDF T,REL=4.2,791116,870137140420 T:UPDFK < T:UPDFK N T:GRFCN b I:ER14 t , ( @ 2! Y " T:LOFSC I:EVA0 T:LOPS , (
0x086bb8…086d4c Dummy {f00=0x002a, f01=0x4060, f02=» T:RCTS $ O X MT : ` J@ T:GRFCN b I:ER14 t , ( @ 2! Y " T:LOFSC I:EVA0 T:LOPS , (
0x086d4c…086ee0 Dummy {f00=0x002a, f01=0x0190, f02=» 4 F IDENT T:DUPL T,REL=4.2,791116,870137140420 T:DUPLK T:DUPX < T:DUPLK V T:GRFC j I:EVA0 | I:ERR2@ T:RNOK , ( HB !0 X T:ROK T:DUPX
0x086ee0…087074 (0, 171) Dummy {f00=0x002a, f01=0x4062, f02=»OV & " S V : KT WV 4 h L@ ^
0x087074…087208 Dummy {f00=0x002a, f01=0x417c, f02=» 4 F IDENT T:GETC T,REL=4.2,791116,870137140420 T:GETCK < T:GETCK N T:GRFC b I:ER14 t I:EVA0 , ( @ 2' I:ERR2 I:RT1 , ( " P # P R P
0x087208…08739c Dummy {f00=0x002a, f01=0x4150, f02=» 4 F IDENT T:GETA T,REL=4.2,791116,870137140420 T:GETAK < T:GETAK N T:GRFC b I:EVA0 t I:ERR2@ , ( H ! P # P X T:RNOK T:ROK T:RCR ( $ H '
0x08739c…087530 Dummy {f00=0x002a, f01=0x4130, f02=» 4 F IDENT T:TSTC T,REL=4.2,791116,870137140420 T:TSTCK < T:TSTCK N T:GRFC b , ( @ X " 9b! X :c 2" t I:ER14 T:RTES , ( H @ ;
0x087530…0876c4 Dummy {f00=0x002a, f01=0x0190, f02=» 4 F IDENT T:TFWD T,REL=4.2,791116,870137140420 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
0x0876c4…087858 Dummy {f00=0x002a, 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
0x087858…0879ec Dummy {f00=0x002a, f01=0x018e, f02=» 4 F IDENT T:DISP T,REL=4.2,791116,870137140420 T:PRINK T:DISP T:ERAS < T:PRINK ^ T:FDSP r T:EDWIC T:GRFCC T:GTIP , ( D 9H Y * T:DISP T:ERAS
0x0879ec…087b80 Dummy {f00=0x002a, f01=0x018e, f02=» f I:ER14 , ( S @P P R P R Y +W T:TABD J , ( q Y + W T R , ( W Q W Y + U , ( Q Y Q P W T:TABC , (
0x087b80…087d14 (0, 172) Dummy {f00=0x002b, f01=0x4178, f02=» , ( X 0 Y 8 P Y 0 X 0 X 2 T:WRDY 4 , ( # ] X 8 Y 0 : X 0 :H* F , ( A : X 2T Y 2 : C 1 B v T:EDIO a ] : H D ! c W !W 7T SP0 WP YR _P aR mWl q P } B
0x087d14…087ea8 Dummy {f00=0x002b, f01=0x018e, f02=» 4 F IDENT T:GETF T,REL=4.2,791116,870137140420 T:GETFK T:GTIT T:GTIP < T:GETFK ^ I:ER14L r , ( X +! X +! U 9K T:TABC T:TABN T:GTIT 0 T:GRFC , ( H Y
0x087ea8…08803c Dummy {f00=0x002b, f01=0x40bc, f02=» I:ER15 * & W 0 6 2 X 0 I:ERR2 H $ s : ! P # T : Z 0 U O v a v {P T @ C T:TABN T:GTIT 0 T:GRFC , ( H Y
0x08803c…0881d0 Dummy {f00=0x002b, f01=0x0190, f02=» 4 F IDENT T:REWR T,REL=4.2,791116,870137140420 ! . * T:REWRK T:SCUW T:CLRD T:IOWR T:CASP ! < T:IOWR ! n T:CSEG ! T:SCUW ! , ( C ( C : ! T:CLRD . ! T:REWRK 4 ! , (
0x0881d0…088364 Dummy {f00=0x002b, f01=0x4156, f02=» X D D : K ! I:EVA3L " & I:EPIC " 8 , ( } $ + Q 2 P P " J T:LOPS " z , ( ( B X # V " I:EVA0 " I:ECPY " I:EVI " , ( :
0x088364…0884f8 Dummy {f00=0x002b, f01=0x0190, f02=» 4 F IDENT T:DEDT T,REL=4.2,791116,870137140420 # . * T:TABCK T:TABD T:TABE T:TABN T:SCR2 # < I:EVNON # n I:ESKI # I:EVA0T # I:EBRI # I:EBRBR # I:EBR # , ( #
0x0884f8…08868c Dummy {f00=0x002b, f01=0x0190, f02=» # p T:DSL $ T:TABCK & $ T:TABD * $ 4 T:TABE . $ H , ( ! W W X 0Q $ T:EDWI $ I:EVT $ * & ; Y ( Y *P $ I:EDSKL $ T:GRFC $ * & W
0x08868c…088820 Dummy {f00=0x002b, f01=0x0190, f02=»P $ $ p T:LOPS % , ( &W " P Y 0] Y % " , ( (_z P P T " X _@ % R T:EDWF % , ( " P ( X *# P B 1 % I:ER16 % , ( " (W * " P X %
0x088820…0889b4 (0, 173) Dummy {f00=0x002b, f01=0x4110, f02=» _ W @ X (T W X y 6 Y ( % T:TABN & , T:RCR & @ : X (;n . & P H D ! )W -W 5Q 9 , = * IP Q P PR V PL T Ph Wp P P & n < 8 P T0 P" P W P 7P =P CT MP aW iT mW & &
0x0889b4…088b48 Dummy {f00=0x002b, f01=0x0190, f02=» 4 F IDENT T:ENLI T,REL=4.2,791116,870137140420 ' T:DNL T:DSL ' < I:EVNO ' R I:ECPY ' d I:EPIC ' v I:ETXTL ' I:ETAB ' I:EBRI ' I:EBRB ' I:EBR ' * & '
0x088b48…088cdc Dummy {f00=0x002b, f01=0x0190, f02=» ' I:ESKI ( $ T:DSL & ( 6 T:GRFC ( H T:DNL 4 ( Z , ( ! " Y . Y ,W " ( l , ( 9 Y . X ( X ." P X 0R T Y * ( T:WRDY ( , ( Y P U :H $ K (
0x088cdc…088e70 Dummy {f00=0x002b, f01=0x4162, f02=» 0U X * ( p I:ER16 ) , ( # P P T " T : " ) " T:ENINL ) R , ( @ , Y . . Y ( ) d , ( @ " Y *T " T ! 1 W ! ) ) @ * : ) H D ! 4 # & 3W IPV ORz QT$ YP _U {T
0x088e70…089004 Dummy {f00=0x002b, f01=0x0190, f02=» 4 F IDENT T:EINP T,REL=4.2,791116,870137140420 * " T:PKI T:PINP T:TKI T:TINP * < T:PKI * b T:PINP * t T:GRFC` * I:ETAB * I:EVIN * , ( I Y *T : * I:ECTR * T:EVO
0x089004…089198 Dummy {f00=0x002b, f01=0x0190, f02=» * h , ( Q & X ( " Q Y +Q R " + I:ER16@ + 8 * & q P W " U Y , " Q " + J , ( X . X 0R P X *:h P + x , ( P ) Y (W X *:h P + , ( P P P + , (
0x089198…08932c Dummy {f00=0x002b, f01=0x0190, f02=» D @ Y (W Y , W + I:EXIT , * , ( E Y ( : X *:h X (! # P X , < , ( c & V L T W X , X 0P , l , ( T X *:h XF XL X (!@T @ , , ( Y ( X , Y t X 0 l _r X ( , , (
0x08932c…0894c0 Dummy {f00=0x002b, f01=0x0190, f02=» X & V , n , ( H "@T P V Y - , ( ? X (P X ( - > T:CLMI - n , ( ] P 8 Y 0 X 2P X - , ( { 0V _z Y ( " T Y ( : - I:EVA0C - , ( $ 8
0x0894c0…089654 (0, 174) Dummy {f00=0x002b, f01=0x0190, f02=» Y ( X $ Y X " Y X & - , ( Y X < Y @ : Y : X : . " , ( 5 X ( T X & V H " V . R T:CLDY . ( $ U Y : X $ X : : . H D !@@ T OP aQ iQ kR qP sW yU } Q R P" P PD W .
0x089654…0897e8 Dummy {f00=0x002b, f01=0x4092, f02=» P Wh P . X H D !% T 'TF + /P6 CP K $ ]P a wP }V T P P P T / W T ?T QV / ` l / |@ / $ U Y : X $ X : : . H D !@@ T OP aQ iQ kR qP sW yU } Q R P" P PD W .
0x0897e8…08997c Dummy {f00=0x002b, f01=0x0190, f02=» 4 F IDENT T:ENIN T,REL=4.2,791116,870137140420 0 T:ENINK T:ENI T:EVOU 0 < T:ENINK 0 T:ENI 0 p , ( X Y " X Y $ X Y & X @W X 0 T:LOFS 0 , ( ! < Y = " 0 I:EGTBC 0 * &
0x08997c…089b10 Dummy {f00=0x002b, f01=0x0190, f02=» T:WRDY 1 , ( W X & V D ! P @ W X 1 , ( W Y ( : X , Y X $ Y 1 F , ( X &T Y Y Y W V $ 1 v , ( :H D Y D :H Y ! P V 1 I:EVA0 1 I:EVA1 1 , ( Y
0x089b10…089ca4 Dummy {f00=0x002b, f01=0x4110, f02=» Q : 2' " P T 1 I:EVA3 2 . I:EPIC 2 @ , ( mD W : N : 2 R H D ! W CT IW SP a mT" }T W4 W, P W" P W W T WD 2 ( $ P W )P /W A X aP gT qW 2 2
0x089ca4…089e38 Dummy {f00=0x002b, f01=0x413a, f02=» 4 F IDENT T:SETC T,REL=4.2,791116,870137140420 3 T:SETCK T:SCUR 3 < T:SETCK 3 V T:GRFC 3 j T:EDWI 3 | T:RCTS 3 T:SCUR 3 , ( A C 3 T:WRDY 3 X
0x089e38…089fcc Dummy {f00=0x002b, f01=0x40d8, f02=» 4 F IDENT T:CLMI T,REL=4.2,791116,870137140420 4 T:CLMIK 4 < T:CLMIK 4 N , ( "0P ' Q W ' 4 b ! Y : 4 P Q W 4 ( 4 @ 4 P SCR A2,OP2A CLEAR LOOP P ADKL OP2A,1
0x089fcc…08a160 Dummy {f00=0x002b, f01=0x0190, f02=» 4 F IDENT T:ATTF T,REL=4.2,791116,870137140420 5 J F " T:ATTFK T:DETF T:ROK T:RNOK T:RCR T:RCTS T:RTES@ T:GRFC T:WRDYC 5 < T:CLDY 5 T:DETF 5 T:ATTFK 5 I:EVA6A 5 I:FFSN 5 , ( W V
0x08a160…08a2f4 (0, 175) Dummy {f00=0x002b, f01=0x40f6, f02=» B 5 t T:RNOK < 6 T:GRFC @ 6 ( T:WRDYC H 6 < T:EDIOA 6 P * & ; X _ v : C C 6 b T:CLDY 6 $ Y @ : C : 6 @ W @ 6 l 6 @ 6
0x08a2f4…08a488 Dummy {f00=0x002b, f01=0x0190, f02=» 4 F IDENT T:LSEG T,REL=4.2,791116,870137140420 7 & " T:LOFSK T:LOPS T:LSEG T:CSEG 7 < T:LSEG 7 f T:CSEG 7 z , ( ( R : V E V D ' 7 I:ER1C 7 , ( ! $ W P 7 I:RT1
0x08a488…08a61c Dummy {f00=0x002b, f01=0x4022, f02=» YP 7 d 8 @ 8 1116,870137140420 7 & " T:LOFSK T:LOPS T:LSEG T:CSEG 7 < T:LSEG 7 f T:CSEG 7 z , ( ( R : V E V D ' 7 I:ER1C 7 , ( ! $ W P 7 I:RT1
0x08a61c…08a7b0 Dummy {f00=0x002b, f01=0x413c, f02=» 4 F IDENT T:DC00 T,REL=4.2,791116,870137140420 9 DCREADK DCWRTE DCEXCH 9 < T:FDS0C 9 ^ DCREADK 9 p T:DCR1 9 DCWRTE 9 T:DCW1 9 DCEXCH 9 T:DCE1 9 , ( I$
0x08a7b0…08a944 Dummy {f00=0x002b, f01=0x416e, f02=» 4 F IDENT T:DMI0 T,REL=4.2,791116,870137140420 : " IREAD IRNEXT IRWRIT IINSY : < IREAD : b T:FDS0C : t T:IRE1 : IRNEXT : T:IRN1 : IRWRIT : T:IRW1@ : , ( I$
0x08a944…08aad8 Dummy {f00=0x002b, f01=0x40a0, f02=» 4 F IDENT T:ASS0 T,REL=4.2,791116,870137140420 ; ASSIGNK ; < ASSIGNK ; N T:ASSI ; b @ ; t ; @ ; ********** ~ 2 P* * 2 P* CREDIT ASSEMBLER SUBROUTINE E
0x08aad8…08ac6c Dummy {f00=0x002b, f01=0x40a0, f02=» 4 F IDENT T:IAS0 T,REL=4.2,791116,870137140420 < IASSGNK < < IASSGNK < N T:IASS < b @ < t < @ < ************ ~ 2 P* * 2 P* CREDIT ASSEMBLER SUBROU
0x08ac6c…08ae00 Dummy {f00=0x002b, f01=0x40ee, f02=» 4 F IDENT T:DMR0 T,REL=4.2,791116,870137140420 = RREAD RWRITE = < T:FDS0 = T RREAD = f T:RRE1 = x RWRITE = T:RWR1 = $ I = = @ = TACK POINTER P*
0x08ae00…08af94 (0, 176) Dummy {f00=0x002c, f01=0x40a0, f02=» 4 F IDENT T:SWI0 T,REL=4.2,791116,870137140420 > SWITCHK > < T:SWIT > N SWITCHK > ` @ > t > @ > MBLER SUBROUTINE ENTRIES * . P* * . P******************
0x08af94…08b128 Dummy {f00=0x002c, f01=0x40d0, f02=» 4 F IDENT T:TEI0 T,REL=4.2,791116,870137140420 ? TESTIOK ABORT ? < T:TEST ? T TESTIOK ? f T:ABOR ? z ABORT ? H ? ? @ ? * . P******************
0x08b128…08b2bc Dummy {f00=0x002c, f01=0x40d4, f02=» 4 F IDENT T:CLO0 T,REL=4.2,791116,870137140420 @ SETTIMK GETTIM @ < T:SETT @ V SETTIMK @ h T:GETT @ | GETTIM @ H @ @ @ @ * . P******************
0x08b2bc…08b450 Dummy {f00=0x002c, f01=0x409c, f02=» 4 F IDENT T:DEL0 T,REL=4.2,791116,870137140420 A DELAY A < T:DELA A L DELAY A ^ @ A p A @ A ASSEMBLER SUBROUTINE ENTRIES * . P* * . P******************
0x08b450…08b5e4 Dummy {f00=0x002c, f01=0x40a0, f02=» 4 F IDENT T:GTI0 T,REL=4.2,791116,870137140420 B GETTIDK B < T:GETI B N GETTIDK B ` @ B t B @ B MBLER SUBROUTINE ENTRIES * . P* * . P******************
0x08b5e4…08b778 Dummy {f00=0x002c, f01=0x0190, f02=» 4 F IDENT T:DC T,REL=4.2,791116,870137140420 C 6 2 T:DCREK T:DCR1 T:DCWR T:DCW1 T:DCEX T:DCE1 C < T:DCREK C v T:FDSP C T:DCR1 C T:DCWR C T:DCW1 C T:EDION C , ( @@ / W
0x08b778…08b90c Dummy {f00=0x002c, f01=0x4164, f02=» 5 / "!@P C I:EVA0L D . , ( O ' / #0T D @ , ( i C #0T C D p , ( #0 T ' P &R &P C D * & #0 T & C : W D
0x08b90c…08baa0 Dummy {f00=0x002c, f01=0x0190, f02=» 4 F IDENT T:DMI T,REL=4.2,791116,870137140420 E F B T:IREAK T:IRE1 T:IRNE T:IRN1 T:IRWR T:IRW1 T:IINSL T:INS1 E < T:IREAK E T:FDSPA E T:IRE1 E I:ERR E T:IO2 E , ( @ / "!@P
0x08baa0…08bc34 (0, 177) Dummy {f00=0x002c, f01=0x0190, f02=» T:STCW E , ( 7 / "!@P F T:IO1 F B T:IINSL V F R T:INS1 Z F f I:EVA0 F z , ( Q #0 T F , ( i / "!@P F , ( @ #0 T &R
0x08bc34…08bdc8 Dummy {f00=0x002c, f01=0x4034, f02=» T: R: T T W F r G @ G 0P F T:IO1 F B T:IINSL V F R T:INS1 Z F f I:EVA0 F z , ( Q #0 T F , ( i / "!@P F , ( @ #0 T &R
0x08bdc8…08bf5c Dummy {f00=0x002c, f01=0x0190, f02=» 4 F IDENT T:ASSI T,REL=4.2,791116,870137140420 H T:ASSIK H < , ( H N T:ASSIK & H ~ T:CSEG H , ( ! @ P ( _ H T:FDSP H I:EVA0 H , ( A ? A
0x08bf5c…08c0f0 Dummy {f00=0x002c, f01=0x4104, f02=» ( H I:RT1 I ( , ( P V I @ $ % A & # I 8 I:ERR I h * & T : Y _ A I x I 0 , +P ]T iT~ u Uh Qd TX P T I I @ I
0x08c0f0…08c284 Dummy {f00=0x002c, f01=0x0190, f02=» 4 F IDENT T:IASS T,REL=4.2,791116,870137140420 J T:IASSK J < T:IASSK J N , ( @ J b T:CSEG J T:FDSP J , ( ! P ( _ A J I:EVA0 J , ( = " A
0x08c284…08c418 Dummy {f00=0x002c, f01=0x40e8, f02=» ( P V I J I:RT1 K ( , ( H @ % A & # T K 8 I:ERR K h " @ : Y _ A K x 0 , !P KT WT c kTn w TZ P T K K @ K I:EVA0 J , ( = " A
0x08c418…08c5ac Dummy {f00=0x002c, f01=0x0190, f02=» 4 F IDENT T:ASG0 T,REL=4.2,791116,870137140420 L ASSGN L < , ( L L ASSGN & L | T:CSEGA L , ( ! @ P ( _ L T:FDSPA L I:EVA0 L , ( A ? @ A "
0x08c5ac…08c740 Dummy {f00=0x002c, f01=0x40ea, f02=» ( P V L I:RT1 M $ , ( @ I @ $ % A & # M 4 I:ERR M d ( $ T : Y _ A M t 0 , " +P ST _ iUx mQt yTh TR P T M M @ M 0 L , ( A ? @ A "
0x08c740…08c8d4 (0, 178) Dummy {f00=0x002c, f01=0x0190, f02=» 4 F IDENT T:DMR T,REL=4.2,791116,870137140420 N & " T:RREAK T:RRE1 T:RWRI T:RWR1 N < T:RREAK N f T:FDSP N z T:RRE1 N I:EVA0 N , ( A #0 T &R N T:STCW N I:ERR N T
0x08c8d4…08ca68 Dummy {f00=0x002c, f01=0x40a2, f02=» N l T:IO1 O , ( S #0T C : O m W O L X TX RX A X _T oW O h v O @ O I:EVA0 N , ( A #0 T &R N T:STCW N I:ERR N T
0x08ca68…08cbfc Dummy {f00=0x002c, f01=0x40c4, f02=» 4 F IDENT T:SWI T,REL=4.2,791116,870137140420 P T:SWITK P < T:SWITK P N T:CSEG P b I:RT1 P t & " ( P P @ P EQU * P LDK A7,0 " P SU PP,CSB,TCA GET RELATIVE PP
0x08cbfc…08cd90 Dummy {f00=0x002c, f01=0x416a, f02=» 4 F IDENT T:TEI T,REL=4.2,791116,870137140420 Q T:TESTK T:ABOR Q < T:TESTK Q V T:FDSP Q j I:RT1 Q | T:ABOR Q * & @ "R V I Q T:KIAA Q , ( ( T _& @
0x08cd90…08cf24 Dummy {f00=0x002c, f01=0x411c, f02=» 4 F IDENT T:DEL T,REL=4.2,791116,870137140420 T T:DELAK T < T:DELAK T N I:EVA0 T b I:ERR T t T:CSEG T , ( @ #0 P ( T I:RT1 T B T P T
0x08cf24…08d0b8 Dummy {f00=0x002c, f01=0x411a, f02=» 4 F IDENT T:MSK0 T,REL=4.2,791116,870137140420 U MASKY U < MASKY U L I:EVA0 U ^ , ( @ #0 T #0 T V U p I:RT1 U U I:ERR U # U T T U
0x08d0b8…08d24c Dummy {f00=0x002c, f01=0x0190, f02=» 6 F IDENT T:SCD T,REL=4.2,791211,870137140420 T:ACTVK T:PAUS T:RSTR > T:ACTVK ` , ( 2 ;BP P J t P:BAS I:ERR4 , ( ! T ( I:NTPB
0x08d24c…08d3e0 Dummy {f00=0x002c, f01=0x40ae, f02=» W & F T:PAUS t I:RT1 4 ( $ s : ( D $ P P8 %T 1 f IW< S f eW p @ I:ERR4 , ( ! T ( I:NTPB
0x08d3e0…08d574 (0, 179) Dummy {f00=0x002c, f01=0x0190, f02=» 6 F IDENT T:USE T,REL=4.2,791213,870137140420 T:USE T:UERR > T:USE V I:EVA0 h , ( 2 & >A >A 2 $ z , ( !@ & V D 9a 9 P:MTABA , ( ?" V @ W @ ( T
0x08d574…08d708 Dummy {f00=0x002c, f01=0x0190, f02=»( 9 | , ( 8 ? X Q , V , ( ( - 4T L , ( V 5 ( W V P | , ( W U V X 9T I T:UERR B I:RT0 I:ERR
0x08d708…08d89c Dummy {f00=0x002c, f01=0x401a, f02=» N @ ( 8 ? X Q , V , ( ( - 4T L , ( V 5 ( W V P | , ( W U V X 9T I T:UERR B I:RT0 I:ERR
0x08d89c…08da30 Dummy {f00=0x002c, f01=0x0190, f02=» 8 F IDENT T:UNUS T,REL=4.2,791229,870137140420 T:UNUSK @ T:UNUSK R , ( 2 ' P >A >A 2 $ V f P:MTAB , ( ! L ;a ; R @ ( 8 ? , ( ? X Q ( V )<B
0x08da30…08dbc4 Dummy {f00=0x002c, f01=0x4042, f02=» z P~ 3RD MQ. ,@ > T:UNUSK @ T:UNUSK R , ( 2 ' P >A >A 2 $ V f P:MTAB , ( ! L ;a ; R @ ( 8 ? , ( ? X Q ( V )<B
0x08dbc4…08dd58 Dummy {f00=0x002c, f01=0x408c, f02=» 4 F IDENT T:EXIT T,REL=4.2,791116,870137140420 ] T:EXITK ] < T:EXITK ] N ( ] b ] v@ ] z P REL #1,76-06-15 P* P ENTRY T:EXIT P* PT:EXIT LKM P DATA 3 P* P END
0x08dd58…08deec Dummy {f00=0x002c, f01=0x40e2, f02=» 4 F IDENT T:GTCW T,REL=4.2,791116,870137140420 ^ GETCW ^ < T:FDSP ^ L GETCW ^ ^ I:EVA0 ^ p T:GTCW ^ I:RT1 ^ $ I ^ ^ @ ^ DATA ITEM ADDRESS " P CF PS,T:GTC
0x08deec…08e080 Dummy {f00=0x002c, f01=0x411e, f02=» 4 F IDENT T:GTID T,REL=4.2,791116,870137140420 _ T:GETIK _ < T:GETIK _ N I:EVA0 _ b , ( @ #0T R W T V G 9h _ t I:RT1 _ I:ERR _ ' W _ T R W T 'W _
0x08e080…08e214 (0, 180) Dummy {f00=0x002d, f01=0x0190, f02=» 6 F IDENT T:IO T,REL=4.2,791229,870137140420 J F " T:WRITK T:READ T:KIY T:NKI T:EDWR T:DSC0 T:DSC1@ T:DSC2 T:EDWEC > F B T:EDWF T:EDWIN T:EDIO T:XSTA T:WAIT@ T:IO1 T:IO2 T:IO3 T:IO4 F B T:FDS0 T:FDSP, T:STCW T:GDSP T:GTCW T:KIPR
0x08e214…08e3a8 Dummy {f00=0x002d, f01=0x0190, f02=» r I:EVA0 T:READ 2 $ * & ! P / W 8 I:ER13 f T:DSC0 N x , ( = / "!@ W C T:DSC1@ ` , ( Y C W C C J ' W 78 T:DSC
0x08e3a8…08e53c Dummy {f00=0x002d, f01=0x0190, f02=»T@ T:CSEGW , ( @ 'W ( T:MWAID N , ( W W b , ( ^ ( I:ER19D , ( 1W C C C " T
0x08e53c…08e6d0 Dummy {f00=0x002d, f01=0x0190, f02=» M "%@P "% P B C C 4 " , ( m 5 # B P B P B 5 P C 0 I:RT1 ` * & P B % P C + p T:EDWR I:EDW T:EDWEC , ( C
0x08e6d0…08e864 Dummy {f00=0x002d, f01=0x0190, f02=» B n T:EDIO , ( : ( ' P I " T:KIPR & R I:EVA7 f , ( # : % Y x I:ERR5 , ( A C & , ( ] C "!@
0x08e864…08e9f8 Dummy {f00=0x002d, f01=0x0190, f02=» , ( V : 2 ' W 2 6 2 @ & " I:EVTO 8 I:FML J , ( T # ' ?D W ' #? Z I:ER1AV , ( V H ;D:B " , ( : _, C : I:EVA2
0x08e9f8…08eb8c Dummy {f00=0x002d, f01=0x0190, f02=» "!@P ") # B C B T:STCW t , ( i % C C : #0 T & C C 4 , ( : C C V d , ( W V Q 0W Q , ( W Q W , ( 4 ! P
0x08eb8c…08ed20 Dummy {f00=0x002d, f01=0x0190, f02=» : 49d_b B@5 @ 8 @ , ( a N ' @ d P ( $ T:GTCW T , ( z= #0 T B 'W h , ( @ B B " , ( P P L R , ( R
0x08ed20…08eeb4 (0, 181) Dummy {f00=0x002d, f01=0x0190, f02=»_ , @ - R T U :B@ T:KIAA x ( T:KIAC@ z < * & _ ' d P H D !~m W & ( P #P 1W 5 9 MW Q U _W c ~ H D ! o v uW P P W Wp W
0x08eeb4…08f048 Dummy {f00=0x002d, f01=0x40a8, f02=»W 9P M x UP }T W b H D !0 W W L P0 W, W !P ?T T W h x PP Z R $ R Q P #P 9P IR w x j | @ 9 MW Q U _W c ~ H D ! o v uW P P W Wp W
0x08f048…08f1dc Dummy {f00=0x002d, f01=0x0190, f02=» 6 F IDENT T:KIA T,REL=4.2,791116,870137140420 T:KIA T:NKIA > T:KIA V T:NKIA h T:ABUF | , ( W P 6 V :a L T:KIPR , ( Q ' ( ( T:LSE
0x08f1dc…08f370 Dummy {f00=0x002d, f01=0x0190, f02=» 6 K x , ( u V K V V K V K , ( V 6V ( - _ : J 7 H , ( J V W J :A x * & V 6V $ - _ * + : , ( D T E D :A D ;A
0x08f370…08f504 Dummy {f00=0x002d, f01=0x4102, f02=»P _ W *) + : , ( g $: R P $ : D V D ( ( $ V ( < C C _, X H D !L W PZ !QJ % p 7 < ST WP c V V T> Q U 3 d AP IP QW mR oP @
0x08f504…08f698 Dummy {f00=0x002d, f01=0x408e, f02=» 4 F IDENT T:ABUF T,REL=4.2,791116,870137140420 j T:ABUFK j < M j N T:ABUFK j d j x@ j IA SAVEAREA x EJECT END @
0x08f698…08f82c Dummy {f00=0x002d, f01=0x4190, f02=» 4 F IDENT WRITEL T,REL=4.2,791116,870137140420 k WRITELK k < WRITELK k N T:FDS0 k b I:EVA0 k t , ( D / #0T C k , ( #0 T &R &P C k T:IO2 k , ( 9 #0 T & C
0x08f82c…08f9c0 Dummy {f00=0x002d, f01=0x0190, f02=» 6 F IDENT I:NTP T,REL=4.2,791211,870137140420 B > I:TRC I:NTP I:NTPA I:NTPB I:NTPR I:RT0 I:RT1 I:RT2 I:RST > I:MOV I:ADD I:SUB I:CMP I:MUL * & T I:D
0x08f9c0…08fb54 (0, 182) Dummy {f00=0x002d, f01=0x0190, f02=» I:XCP I:EDS , ( / A P I:TRC N n I:RST P I:NTPA P I:NTPB T T:LSEG , ( O W V 7 P P I:NTP
0x08fb54…08fce8 Dummy {f00=0x002d, f01=0x0190, f02=» pV r I:EVA0N I:EVA2 $ , ( 9c D " $ Q 6 I:RT2 f I:TRA x * & @ W :aW @ NYRP I:RT1 I:TRB I:RT0 I:TRA0 I:ERR
0x08fce8…08fe7c Dummy {f00=0x002d, f01=0x0190, f02=»# ;B V T . | , ( 7 W V P L , V 2P " , ( W 2 P V D ! R T V P V L , ( w W V P _ 8^t | T:PAT , ( @ D . 2 ! 9BP V T 0W V , ( P D $ V 6
0x08fe7c…090010 Dummy {f00=0x002d, f01=0x0190, f02=» n , ( " 2" &] Y $! 6 , ( + P Q $ T 9BP , _ _ W < , ( K 6 @ & 2" T 7 $ l , ( i V P W _ I:EVB , ( 6 V &
0x090010…0901a4 Dummy {f00=0x002d, f01=0x40d4, f02=» G I K M cP kP w VP Q W z H D ! W, P P W< + J 1T 7W SP YP iR mT sP P P T W 6 8 4 T PH PB +P -Q 1T 5P IW [T mP W W Q @ , ( 6 V &
0x0901a4…090338 Dummy {f00=0x002d, f01=0x0190, f02=» 4 F IDENT I:EVA T,REL=4.2,791116,870137140420 r J F " I:EVA0K I:EVA1 I:EVA2 I:EVA3 I:EVA5 I:EVA6 I:EVA7L I:EVB I:EVI r < I:FML I:EVTO r P:MTAB r , ( :l:d:h r I:EVA2 r I:EVA1 r
0x090338…0904cc Dummy {f00=0x002d, f01=0x0190, f02=» 9 # W @ $ E " T ; [ r , ( W # :H 2 T Z L s , , ( @ w L D V W # s , ( L E V $ W D V s I:EVA0K s , ( @ L , W 6 2 W " s , (
0x0904cc…090660 Dummy {f00=0x002d, f01=0x0190, f02=» Z Z : s I:ERR9L t $ , ( 3 :B , (V ; t 6 , ( Q [ [ Z H (;AR t f I:ERRA t , ( q H & z ;AV Z H # t , ( @ ; t , (
0x090660…0907f4 (0, 183) Dummy {f00=0x002d, f01=0x0190, f02=» t h , ( [ [ & @ $ ! P u , ( %! Z [ 6 [ u 8 , ( A Z 7 . Z 7 u h I:FML b u I:EVTO x u , ( a : ( :A ( @ & " u , ( P [ :;H 2
0x0907f4…090988 Dummy {f00=0x002d, f01=0x40fc, f02=»W " # u r , ( @ b;b ; : v ;f" #?_" v B H D ! #W 'W -P 1W = x ?W4 KT> [ b kT V, W b V W Wn v Z < 8 x W P b WF MV V: P P P W& v v @ v
0x090988…090b1c Dummy {f00=0x002d, f01=0x0190, f02=» 4 F IDENT I:ADS T,REL=4.2,791116,870137140420 w I:ADD I:SUB w < I:ADD w R I:SUB w d I:ERR2A w v I:ERR1 w * & @ W # w , ( " T & T + : * w I:CPA w , (
0x090b1c…090cb0 Dummy {f00=0x002d, f01=0x0190, f02=»! X # P 4 V W w , ( Q P [ " X $ P T x ( , ( R R ` ; <( x X , ( Q P # W " <! =# T W = Z x , ( P _ V ^< `_@ x , ( ) R Q <# =_ P :"
0x090cb0…090e44 Dummy {f00=0x002d, f01=0x404a, f02=» P )R +Q 7P x AP GU KP QT y l y 4@ y F T x ( , ( R R ` ; <( x X , ( Q P # W " <! =# T W = Z x , ( P _ V ^< `_@ x , ( ) R Q <# =_ P :"
0x090e44…090fd8 Dummy {f00=0x002d, f01=0x418c, f02=» 4 F IDENT I:CMP T,REL=4.2,791116,870137140420 z I:CMP z < I:CMP z L I:ERR1 z ^ , ( #0 P " T * & z p , ( : * & !`P :J +_ +Q z I:CPA z , ( ? _0 , V W
0x090fd8…09116c Dummy {f00=0x002d, f01=0x4168, f02=» 4 F IDENT I:CPA T,REL=4.2,791116,870137140420 { I:CPA { < I:CPA { L * & R W { ^ , ( ( V W Q P W ! W V { , ( ? P , V W Q P W $ W V { * & _ P T V
0x09116c…091300 Dummy {f00=0x002d, f01=0x018e, f02=» 4 F IDENT I:MOV T,REL=4.2,791116,870137140420 | I:MOV I:MVC | < I:MOV | R I:MVC | d , ( $0#0;b P P P P | v , ( ! 0 - P V W Z _ | , ( A 4 V W Q P ) P 9_ &" | , (
0x091300…091494 (0, 184) Dummy {f00=0x002e, f01=0x0190, f02=» | f , ( V 4! P < S S } , ( S X 4 9d * & ! R + } 8 , ( : V W R 4 0R } h , ( ! Y 7 Y& P Z,;D 9_8 } , ( A 8 _< V W YL T 9 } I:ERR8 } ,
0x091494…091628 Dummy {f00=0x002e, f01=0x4124, f02=» } j , ( V Q W Q 7 Y P _6 & Q ~ , ( 9d! )0 + P 7 Y Z $ ~ : _ : ~ j H D ! f P P PN P +P: MQ OP WP oP sQ { S S S ~ < 8 R R R 1P wP T P SZ P Q Q P. P ~
0x091628…0917bc Dummy {f00=0x002e, f01=0x0190, f02=» 4 F IDENT I:MUL T,REL=4.2,791116,870137140420 I:MUL I:SH1L < I:MUL T I:ERR2 f I:ERR1L x , ( V ) 0 !0 , ( " T *V &V : V , ( = S W P 9 S W _
0x0917bc…091950 Dummy {f00=0x002e, f01=0x018e, f02=» [ [ $ [ [ I:MOV I:NTFA , * & P>h [ [ D I:SUB r , ( Z P , ( [ 9a Z $" T 9d! P P [ I:ADD , ( P Z w [
0x091950…091ae4 Dummy {f00=0x002e, f01=0x40dc, f02=» , ( g ! I Z ! : 4 P 9 , ( 59D_ " P P [ ! :d" 8 5 : h D @ @ TV 9V GP WV cW PP P6 P( P 5 z AR IP P P P ~ @ I:ADD , ( P Z w [
0x091ae4…091c78 Dummy {f00=0x002e, f01=0x0190, f02=» 4 F IDENT I:DIV T,REL=4.2,791116,870137140420 I:DIV I:SH1R < I:DIV T I:ERR2 f I:ERR1 x , ( 0 !0 " T , ( *V &V P = , ( ; ;@ R
0x091c78…091e0c Dummy {f00=0x002e, f01=0x0190, f02=» V & 6 , ( [ [ [ [ $ , I:MOV I:NTFAL * & P [ [ t I:SUB , ( z " ! , ( ! R 2` { z " P ! R 2`
0x091e0c…091fa0 Dummy {f00=0x002e, f01=0x0190, f02=» [ T { [ [ Q [ I:ADD , , ( yP { R [ _ < , ( Z ! Z $ l * & P Z %_N [ Q * & R [ Z { , (
0x091fa0…092134 (0, 185) Dummy {f00=0x002e, f01=0x407e, f02=» V 'V 5PP KR QP UW aP iR qR yV T W P KQ WP k sQ@ R Q* R W D ( h@ z Z ! Z $ l * & P Z %_N [ Q * & R [ Z { , (
0x092134…0922c8 Dummy {f00=0x002e, f01=0x40d0, f02=» 4 F IDENT I:NTF T,REL=4.2,791116,870137140420 I:NTFAK < I:NTFAK N , ( Z H D & H b $ ! D % [ ( 8 @ P P END ,PS P LDR* OP2A,WK1 P LD
0x0922c8…09245c Dummy {f00=0x002e, f01=0x0190, f02=» 4 F IDENT I:EDT T,REL=4.2,791116,870137140420 F B I:EDT I:EDW I:ED1 I:EDSK I:EVT I:ETAB I:EXITL I:ETXT I:ECPY < D @ I:ECTR I:ESL I:ENL I:EOR I:ECW I:ECWC I:EFIL` I:EFLA I:SCB I:FFSN , ( !! gg++
0x09245c…0925f0 Dummy {f00=0x002e, f01=0x0190, f02=» I:EGTB I:EVI I:EVA3 * I:EVA0 < * & AUT N I:EVNO | I:EPICV I:ESKI I:EBRI: I:EBRB I:EBR * & Q T
0x0925f0…092784 Dummy {f00=0x002e, f01=0x0190, f02=» 6 K K K | I:EDT I:ED1 . I:EDW @ , ( K V K : R I:EVA6 , ( T R B " V , ( V Z P 2 " T W , ( "@T
0x092784…092918 Dummy {f00=0x002e, f01=0x0190, f02=» [ Z P $ z I:EXITL l , ( U [ V 7_ Z . , ( u $ Z 7 Z Z P ^ I:FFSN , ( @ $ : V P:BAS * & R (Q V : &
0x092918…092aac Dummy {f00=0x002e, f01=0x0190, f02=» Q : P | I:ECTR I:ESL 0 I:ENL ( B , ( 4 ! T _ K W W +_ T I:EOR > T:EDWF I:ECW H , ( + K W _& X (W T:EDWE I:ECWC R
0x092aac…092c40 Dummy {f00=0x002e, f01=0x40e6, f02=» x H D ! U Y [ e > g l i H k 2 m ( s u : : P H D ! T W T W 9 OP y P R Q P Qf P TV f WJ X ( $ ! $ #W + > / : 9W. GW eV mT x @ T:EDWE I:ECWC R
0x092c40…092dd4 (0, 186) Dummy {f00=0x002e, f01=0x0190, f02=» 4 F IDENT I:EDTE T,REL=4.2,791116,870137140420 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
0x092dd4…092f68 Dummy {f00=0x002e, 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 _ :
0x092f68…0930fc Dummy {f00=0x002e, f01=0x40e0, f02=» 4 F IDENT I:EDS T,REL=4.2,791116,870137140420 I:EDS < I:EDS L I:EVS2 ^ I:ED1 p , ( : { : & @ IN STRING " P CF PS,I:ED1 EDIT OF S
0x0930fc…093290 Dummy {f00=0x002e, f01=0x0190, f02=» 4 F IDENT I:STR T,REL=4.2,791116,870137140420 $ I:INS I:DLT I:MCH I:CPY I:XCP < I:DLT d I:EVS1 v , ( @ $0T P 9 I:MCH " * & _ $0T [ , ( ; $0T
0x093290…093424 Dummy {f00=0x002e, f01=0x018e, f02=» j , ( R W R # P W ) V E I:EVS2 : , ( $0T W W L I:ERR | I:CPY I:XCP , ( W [ , ( : Z !0 , !0P 0 > 4
0x093424…0935b8 Dummy {f00=0x002e, f01=0x408e, f02=» H D !@ T F Pb )T ?T UR$ ]P cT mTd oW TH R W R P W $ T Wp W W P2 R !W P N x@ I:CPY I:XCP , ( W [ , ( : Z !0 , !0P 0 > 4
0x0935b8…09374c Dummy {f00=0x002e, f01=0x018e, f02=» 4 F IDENT I:EVS T,REL=4.2,791116,870137140420 I:EVS1K I:EVS2 < I:EVA0 V , ( @ #03 T jP h , ( kT T : & 9! " : $ , ( = : T W V 9! , ( ] R W
0x09374c…0938e0 Dummy {f00=0x002e, f01=0x407a, f02=» I:ERR _^ W , ( T )T GT KW eQ< qQ0 }Q$ T W 4 d@ v #03 T jP h , ( kT T : & 9! " : $ , ( = : T W V 9! , ( ] R W
0x0938e0…093a74 (0, 187) Dummy {f00=0x002e, f01=0x0190, f02=» 6 F IDENT I:TRA T,REL=4.2,791104,870137140420 2 . I:NTR I:PRT I:TRA0 I:TRA I:TRB I:BUF I:ECB > I:ECB t I:BUF , ( *1 TID ADDR OP CR LVL MODIFI , ( - ED OPERAND CREDIT 2.1
0x093a74…093c08 Dummy {f00=0x002e, f01=0x0190, f02=»R ( z , ( _ * A T ( , ( A A ( J , ( D p A ) Y V A z P:BAS I:HEX I:HEXB , ( V v
0x093c08…093d9c Dummy {f00=0x002e, f01=0x4170, f02=» & & Y@ zQ & I:TRB t J , ( R k A W ~ V D ! )0 1 I:NTPRN I:PRT , ( 6 V 9 A , ( @ ( < (
0x093d9c…093f30 Dummy {f00=0x002e, f01=0x0190, f02=» 4 F IDENT I:ERR T,REL=4.2,791116,870137140420 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:ER13 I:ER14 I:ER15
0x093f30…0940c4 Dummy {f00=0x002e, f01=0x0190, f02=» I:ERR3 I:ERR4 I:ERR5 & I:ERR6C : I:ERR7 N , ( W W W W W W W W b I:ERR8 I:ERR9 $ I:ERRA ( I:ERRB , I:ERRC 0 I:ERRDC 4
0x0940c4…094258 Dummy {f00=0x002e, f01=0x0190, f02=»R12 H I:ER13 L I:ER14 P " I:ER15 T 6 I:ER16 X J I:ER17 ^ , ( A W W W W W W W W r I:ER18@ ` I:ER19D d I:ER1A h I:ER1BM l I:ER1C p
0x094258…0943ec Dummy {f00=0x002e, f01=0x0190, f02=»:HEXB , ( $ ER A R A I:ECB > * & @ R 4 4 A N I:PRT | , ( " U 4 - _ TC:ERR I:NTPR , ( @ ILLEGA
0x0943ec…094580 Dummy {f00=0x002e, f01=0x0190, f02=»QUESTED p , ( W LENGTH STACK UNDERFLOW ARIT , ( w HM OVERFLOW STACK OVERFLOW IN @ , ( DEX OVERFLOW ILL INDEX TYPE DI p , ( V BY ZERO EDIT BUFFER OVFL ED , ( IT PICTURE OVERFLOW ALLOCATION , (
0x094580…094714 (0, 188) Dummy {f00=0x002f, f01=0x0190, f02=» W TED FIX BUFFER NOT ALLOWED IL , ( w LEGAL CONTROL CODE ILLEGAL INDE 0 , ( X VALUE FORMAT CONDITIONS CHAN ` , ( GED ILLEGAL PARAMETER LENGTH , ( ERROR DATASET BUSY ILLEGAL DA , ( TASET REFERENCE
0x094714…0948a8 Dummy {f00=0x002f, f01=0x411e, f02=» WT #WP 'WL +WH /WD 3W@ 7W< ;W8 ?W4 p H D ! CW0 GW, KW( OW$ SW WW [W _W cW gW kW oW sW R D , H D ! U # 3 C ] _ q x @ < " + A [ s '
0x0948a8…094a3c Dummy {f00=0x002f, f01=0x40fe, f02=» 4 F IDENT I:HEX T,REL=4.2,791116,870137140420 I:HEXBK I:HEXW I:HEX < I:HEXBK I:HEXW p I:HEX , ( W 9 " R 0 1 Y ! : W " @ S,10 TEST
0x094a3c…094bd0 Dummy {f00=0x002f, f01=0x4132, f02=» 4 F IDENT I:CHK T,REL=4.2,791116,870137140420 I:CHK < I:CHK L P:BAS ^ P:END n , ( ;a V P V P W ~ TC:CHK I:ERR , ( B <a R 9a V : P
0x094bd0…094d64 Dummy {f00=0x002f, f01=0x0190, f02=» 4 F IDENT TRACHK T,REL=4.2,791116,870137140420 & " TC:CHKK TC:ABT TC:ERR TC:RDC < TC:CHKK f T:CSEGN z * & @ P ( TT:HLT TT:TRP , ( _" @ P @ P P
0x094d64…094ef8 Dummy {f00=0x002f, f01=0x018e, f02=» E W . t TT:VER TT:VMM & , ( qA @ P $ $P 8 , ( T , D E : @ P A h TT:TID TT:PRC , ( @ H A W TW V A TT:SNO8 TB:ENT
0x094ef8…09508c Dummy {f00=0x002f, f01=0x0190, f02=» TC:RDC TB:RDCL * & TB( : TB( . TC:ERR TT:MSG p * & : A A E A , ( / V A TB( , ( I ( A @ V P (
0x09508c…095220 Dummy {f00=0x002f, f01=0x4026, f02=» _P gR | r @ " * & TB( : TB( . TC:ERR TT:MSG p * & : A A E A , ( / V A TB( , ( I ( A @ V P (
0x095220…0953b4 (0, 189) Dummy {f00=0x002f, f01=0x0190, f02=» 4 F IDENT TRATAB T,REL=4.2,791116,870137140420 F B TT:TONK TT:TRP TT:LOP TT:VON TT:VER TT:VMM TT:HLTL TT:PRC < & " TT:TID TT:MSG TT:SNO TT:TRS TT:TONK TT:TRP , ( , (
0x0953b4…095548 Dummy {f00=0x002f, f01=0x4180, f02=» a TT:VON 0 TT:VER D , ( X , ( TT:VMM @ TT:HLTL TT:PRC
0x095548…0956dc Dummy {f00=0x002f, f01=0x0190, f02=» 4 F IDENT T:CLO T,REL=4.2,791116,870137140420 R T:SETTK T:GETT R < T:SETTK R V I:EVA0 R j T:CSEG R | I:RT1 R , ( @ ( R T:GETT R * & H (
0x0956dc…095870 Dummy {f00=0x002f, f01=0x4010, f02=» P R @ S LO T,REL=4.2,791116,870137140420 R T:SETTK T:GETT R < T:SETTK R V I:EVA0 R j T:CSEG R | I:RT1 R , ( @ ( R T:GETT R * & H (
0x095870…095a04 Dummy {f00=0x002f, f01=0x0190, f02=» 8 F IDENT TRABUG T,REL=4.2,800103,870137140420 TB:ENTK TB:ABT TB:RDC @ b P:BAS t * & , ( , (
0x095a04…095b98 Dummy {f00=0x002f, f01=0x0190, f02=» j P:MTAB TT:PRC , ( @ e D "! A , @ . TT:SNO ^ , ( @ @ ,P ( p , ( @ V R V W , ( Z T _" = T , (
0x095b98…095d2c Dummy {f00=0x002f, f01=0x0190, f02=» @ P @ A TB:RDC > $ , ( 9 A . A 0 "V # ( 8 , ( W A .P UW T A .P h , ( w @ = W , ( Q M / S I J T Y , ( G L
0x095d2c…095ec0 Dummy {f00=0x002f, f01=0x0190, f02=» A A A A A A A , ( 7 A A A P A A ( , ( W , + - ; : ( X , ( w . X " , A L A , ( L @ A A _T X ,T , ( X ) A A
0x095ec0…096054 (0, 190) Dummy {f00=0x002f, f01=0x0190, f02=» A @ V x , ( E 7 " @ T " @ @ P A A , ( ( W " @ >T @ 6 A @ < H , ( UQ w A @ B A @ H A @ A @ x , ( U@ A B @ A H @ A <P , ( $ W @ T @ Z @ A 6 , (
0x096054…0961e8 Dummy {f00=0x002f, f01=0x0190, f02=» h , ( 7 0 P P , ( W P @R _ 8 , ( w _T h , ( > 4 T P , ( W T @R W , ( *
0x0961e8…09637c Dummy {f00=0x002f, f01=0x0190, f02=» A @ @ A F @ A :P , ( $ W W @ T @ Z A ( , ( w @ > @ A 4 X , ( A > @ , ( R V ;a Q _ 1 > , ( @ A 4_ 0
0x09637c…096510 Dummy {f00=0x002f, f01=0x0190, f02=» @ 8 A @ > A x , ( * W @ D A @ A @ A > @ A , ( w D @ A 8P W @ T H , ( A @ V @ A 2 0 x , ( " P @ P @ 1 > , ( A @ @ > A , (
0x096510…0966a4 Dummy {f00=0x002f, f01=0x0190, f02=» h , ( S 0! T , ( H s @ P @ " 1 > P @ 8 , ( T @ @ @ T @ R A h , ( *9l! P &9d! ) W , ( P &9d & _ & , (
0x0966a4…096838 Dummy {f00=0x002f, f01=0x0190, f02=» @ T @ P R % < , ( o < ! T @ ( , ( P @ ! 5 = > X TT:TRP , ( @ >P @ W TT:TRS TT:TON , ( $
0x096838…0969cc Dummy {f00=0x002f, f01=0x0190, f02=» @ @ @ ~ TT:LOPL , ( = T I _:P @ _ A 0 TT:HLTC ` , ( Y . A @ A > @ r I:TRC , ( u ! A >P @ @ P @ P , ( R @ T @
0x0969cc…096b60 Dummy {f00=0x002f, f01=0x018e, f02=»P R )W x , ( A > , A A , ( :B A Q (P _ H @ F , ( @ H A " EQ GT v , ( ? LT NE NG NL P @ , R , ( _ @ P Q ( , (
0x096b60…096cf4 (0, 191) Dummy {f00=0x002f, f01=0x0190, f02=» f , ( :B A (P _ @ , ( @ @ P @ 8 , ( V @ Q 1 @ Q Q h , ( -D A " ( R ( @ , ( I$ V @ H ) I " , ( c $ %
0x096cf4…096e88 Dummy {f00=0x002f, f01=0x0190, f02=» P ,T p P )T , ( @ A T @ R ?aP * ( , ( :l" T & W T C B B X , ( ! B B B " A A A , ( A A A A A R Q , ( a ! 9D# 9hP Q "
0x096e88…09701c Dummy {f00=0x002f, f01=0x0190, f02=» % Q x , ( W , ( C H , ( ! " _* Q P Q V x , ( A _ W " A < V , ( a " F <P , (
0x09701c…0971b0 Dummy {f00=0x002f, f01=0x0190, f02=» h , ( .T @ ,P P " A " , ( X X " , , A A 8 , ( :B A Q (P _ # # H A " h , ( = A A 4 4 @ , ( ] I T A A A T A , ( @ } T
0x0971b0…097344 Dummy {f00=0x002f, f01=0x0190, f02=» j , ( "( @ " :S :X , ( :Y :Z $P W A : , ( - A 0R 9Q 0 A :B j , ( M _" A " , ( m A 0R 9U AR FQ , ( 0:D
0x097344…0974d8 Dummy {f00=0x002f, f01=0x0190, f02=» "! R _U .W A : , ( A " 9d ! R * , ( - :W W W W ? Z , ( M W :W .W / a A T " , ( m @ T A ( , ( @ A "
0x0974d8…09766c Dummy {f00=0x002f, f01=0x0190, f02=» 1 z w 0 H D ! . M Y g < { X 8 P R V W X T 2 8 W L H D ! X & P R 8 N # )P - 2 5 A v IV [ < aP H D !o eW k X o 8 uP y }
0x09766c…097800 Dummy {f00=0x002f, f01=0x0190, f02=» a z e i m q " u y * f p T p l | H D ! 4 " : P : % /V 3 7 : ?T KP c iT 8 H D ! P W T V W F W < 2 W H D ! 2 X -PZ ? V E KP O N [ aR
0x097800…097994 (0, 192) Dummy {f00=0x0030, f01=0x0190, f02=» 5 E < OP S WW ]T i h H D ! q { v 2 2 > 2 2 R Q < l $ H D ! F 8 6 P P P P 3P ?T g P W T p H D ! V 8 P P F 2 V P V )T H D
0x097994…097b28 Dummy {f00=0x0030, f01=0x0190, f02=» GP` UT T H D ! Q ] 6 aPF w V & 8 T P P 2 W" d T W R / H D !1 =T GP K S 2 Pd PL P l l 2 R T V H D ! Rl W PT RN W d , , , Q P ) , OP2 WR* [ l H D ! _ a gP mQ
0x097b28…097cbc Dummy {f00=0x0030, f01=0x0190, f02=» 6 R: P T* W T 9 = A E I M Q U l WR ]Q H D ! mP qQ Pl * P R PL W~ Pz R Tr Qj W" P` QV QL H H D ! P P W 1Q 5P 7Q ;V KW S h yP W* P T l l l H D ! T P f P f < < # <
0x097cbc…097e50 Dummy {f00=0x0030, f01=0x418a, f02=» l P !WH % l - d 3 9R ?Q E d S l a d x H D ! ~ i l q yR$ U R Q l T l 2 T 4 H D ! R U WV & # & +R 1W& 7 X ;W A X EW H D ! IW MW QW UW [ _ eT i o qT u y }
0x097e50…097fe4 Dummy {f00=0x0030, f01=0x0190, f02=» 4 F IDENT I:EPIC T,REL=4.2,791116,870137140420 I:EPICK < I:EPICK N I:EVA0 b : + t [ [ < , ( ! !AAP !TTT W !**T * [ R A !FFP !EE
0x097fe4…098178 Dummy {f00=0x0030, f01=0x0190, f02=» *W FP . :T Z ! XBW *X& I:ERRD 0 , ( W :P # U J 1 p ! B I:SCB r , ( 00T ; _ 9P F " X> # ; W )0_B , ( J R Z R 4! P ;)0 I:ERRE
0x098178…09830c Dummy {f00=0x0030, f01=0x414e, f02=» ,_ 8 _ : W 8W p 8 ! , ( ++P !-- z ;$# + ^" _( * " |`. PT*AXYZ9 Z H D ! ` %P +T /W 5T ?R EP KT OW S P Wv W@ Wn H D ! T& W4 P T W F WH P" U T P W R(
0x09830c…0984a0 Dummy {f00=0x0030, f01=0x018e, f02=» > @ IDENT SYSLOD REL 9.2 79-12-19 870105040920 & " SYSLOD SYSBAS NUMSEG PRGLG1 F NUMSEG p PRGLG1 SYSBAS SYSLOD SCTADA SCTPLD SCTANO * & H ($S
0x0984a0…098634 (0, 193) Dummy {f00=0x0030, f01=0x0190, f02=» , ( 5@ @ ! P >B @ A @ , ( O E D P _ $ % 8 SCTMSZ h , ( m H $P _ % A @ z , ( " Q A : , ( R W A A P ,
0x098634…0987c8 Dummy {f00=0x0030, f01=0x0190, f02=»AVE04 , ( W F W F CRT F SCTPSZ > , ( $ A @ @ ! P @ P ERROR , ( + P ;b=H F CR , ( I F W =J F CRT F SCTNOS SAV
0x0987c8…09895c Dummy {f00=0x0030, f01=0x0190, f02=» , ( $ P A Y W " @ " SAVE08 4 , ( T W $ @ F SAVE07 v SAVE01 , ( V W Q & ( MMEND , ( * ,
0x09895c…098af0 Dummy {f00=0x0030, f01=0x0190, f02=» C :L A , W $ A . SCTNPE . , ( ] A 0W * @ , ( y T F W V p , ( = V W Y* SCTMMC , ( P Z( = 2
0x098af0…098c84 Dummy {f00=0x0030, f01=0x0190, f02=» * & ( @ @ 4 A 4 , ( # 6 $ @ 6 CR 2 MMDDIV b * & =! T @ P @ ! P W 8 @ t SAVE06 , ( U 6 V :P _ @ ! P * & o @ !RRP V : @ P
0x098c84…098e18 Dummy {f00=0x0030, f01=0x0190, f02=» _ r , ( P , , ( @ :l 8 89b ) B SAVE03 r , ( D V 8_ @ V W < W * & - $ P T V , ( I < 0 !;;P P V (
0x098e18…098fac Dummy {f00=0x0030, f01=0x018e, f02=» W $ , ( W < V < 0 " , ( !;;P P V (Xb _ P R SAVE20 , ( !;;T X$ W < > , ( @P $XZ_V S A A , ( /! @ R
0x098fac…099140 Dummy {f00=0x0030, f01=0x018e, f02=» LDALEN , ( } B V ( $ ) H , ( D A I. : C. F , ( X C.9h! # " v , ( :A K : , ( A T I T P 1 I P < , (
0x099140…0992d4 (0, 194) Dummy {f00=0x0030, f01=0x0190, f02=» f , ( u 9B r @ r A I ! ( , ( : A A A A A ! T 8 , ( A A I ! : 9E h , ( @ r s A I T ) , ( A _ I N T : , (
0x0992d4…099468 Dummy {f00=0x0030, f01=0x0190, f02=» F j , ( qA @ T X W @ : YX , ( d C !CCT B. X : , ( B.9 H Q _ 2_ !SST j SCTSWB , ( 0 U R X A H X SAVE25 , ( @ W J : @
0x099468…0995fc Dummy {f00=0x0030, f01=0x0190, f02=» G@D V LT V LT W L , ( a P V & W & @ 0 , ( { $ P p W > T : A ` , ( _ 0V , - P X 9A " _ : @ ! P (W ( : H D ! ;P$ [P oP Q R W2
0x0995fc…099790 Dummy {f00=0x0030, f01=0x0190, f02=»W /P 9T gW {T W V V W P P W V ~ H D !0N W Q ' 7 =T CP MP _P mP q wP P PZ : H D ! T P V 1 5 9P = A ETJ WP ]P cP$ uT T H D ! 9 W N P P T P ' K + /
0x099790…099924 Dummy {f00=0x0030, f01=0x40e8, f02=» . T T T j H D ! / . 9PJ CT@ IT: QTt YP _P$ uT TZ Q T& R W V W$ V & H D !! P #P ) 1W =P EV KT Q YT eP }P W T V P r P W @ P P T P ' K + /
0x099924…099ab8 Dummy {f00=0x0030, f01=0x2008, f02=» L = KMD06 DATE = 82 05 21 1216PACK NBR = 0006
0x099ab8…099c4c Dummy {f00=0x0030, f01=0x418a, f02=» ( J F " D h a P R LaX3 RL RL?R R La R ?R R A 1XF R6 _ _ 8 0 & KORREKT $ & ? &
0x099c4c…099de0 Dummy {f00=0x0030, f01=0x0190, f02=» 8 H IDENT MOD221 TRA 4.2 82-08-27 F1 O1111 820526 NJ < 8 AD46 BCHKPR DIVRUT MEMIX1 MEMIX2 STREDT UPDMEM @ $$$TRAD @ < AD46 BCHKPRD DIVRUTM $ MEMIX1X MEMIX2 STREDT UPDMEMD < 8 CHDATO FMODP FMREMPV FSOLV
0x099de0…099f74 (0, 195) Dummy {f00=0x0030, f01=0x0190, f02=» 2 7 9 = , J F " D 6 <FPWu R L ! R WI R R R R a F R R < E O Y `0 d f j n
0x099f74…09a108 Dummy {f00=0x0030, f01=0x0190, f02=» R @ N 0 @ P 0 ` t J F " D W A 4 L L 6 -Va FWj a FWa a FWT #% L 0
0x09a108…09a29c Dummy {f00=0x0030, f01=0x0190, f02=»$a FW #% L R # ^ , < & L ( Z f ZZZZZZZZZ9 v " & ( ZZZZZZZZZ9 " &
0x09a29c…09a430 Dummy {f00=0x0030, f01=0x0190, f02=» 99V99V99 " " & 2 99V99V99 @ " X & h ( v ZZZZZZZZZZ " & 99V99V99 " & (
0x09a430…09a5c4 Dummy {f00=0x0030, f01=0x4122, f02=» & ZZZZZZVZZ9BB99- " : ( J V BZZVZZZVZZ9,99- f " ( 6 HUNDESTED KOMMUNE D ? = #a Fa F 4 4 4 4 4 6 W 4 ;L4
0x09a5c4…09a758 Dummy {f00=0x0030, f01=0x0190, f02=» 8 H IDENT RGKLAR TRA 4.2 82-08-06 F1 O1111 820615 NJ B > BCKUP CLBEH CLEDB CLEJ CLKF KLRFMT RGA120 RGKLAR SKIFT @ $ SLUTIDK STRTIDA STRTWR2 ZERO6 $$$TRAC B > BCKUP CLBEH CLEDB CLEJ6 CLKF1 KLRFMT RGA120 s > :
0x09a758…09a8ec Dummy {f00=0x0030, f01=0x018e, f02=» CRKJA FRMXVOI GRASPVU INITRGS KFREAD KFWRIT KORTR KTPLANT D @ LAMPOFG LAMPONC PACKCLE RADEL RAREADC RAWRITC SETDEBC SETKRE D B > SLUTA SOPRD SPCLRAP SPCLRNR SPLIN8A T:ATTFI T:DSC0R T:DSC1T < 8 T:EDWRG T:WAITC TCONFWE WAITF WRITFDC WRITIDC WRITJ
0x09a8ec…09aa80 Dummy {f00=0x0030, f01=0x0190, f02=» b $ 4 D T 20 G d 50 G v 90 G ; < < > 8 B C D G J F " D A 1XF
0x09aa80…09ac14 (0, 196) Dummy {f00=0x0031, f01=0x018e, f02=» Z0 `0 e j $ g F 4 j D l N T m d t v v ~ J F " D @ RRR_G L L g L ) L L L X R R R RLA s R R s _~ <
0x09ac14…09ada8 Dummy {f00=0x0031, f01=0x0190, f02=» 0 R J F " D A 1XF R2 RRR_ @ @ @ @ @ @ @ @ @ @ @ @ @ L L L0X 0X L & h 0 1 x 0 1 0 1 0 1 0 1 J F " D R L ( L L " x
0x09ada8…09af3c Dummy {f00=0x0031, f01=0x0190, f02=»DB T[LLER * 2 TOTAL " 4 8 70 O H =0 O Z J F " D L L R 6 x o LL L L R "_] L R LH- LWX l D M0 L X a0 L j
0x09af3c…09b0d0 Dummy {f00=0x0031, f01=0x018e, f02=» T L 0 VERSUR KONTO . J Z 0 E j | 0 E J F " D ! L L L R T R T+! L' R T ! L PE
0x09b0d0…09b264 Dummy {f00=0x0031, f01=0x0190, f02=» VERSUR KONTONR REMIT 0 E , J F " D L L R T L L A ! L, ! L L L L > KASSE-KONTO 0 A " ( TOTAL *
0x09b264…09b3f8 Dummy {f00=0x0031, f01=0x0190, f02=» L L L R L R L R R L L g ~ H j < J F L M T *R l V N ~ W f i 0 J F " D @ L@ X R R R @ L RL 4 4 R ?R x
0x09b3f8…09b58c Dummy {f00=0x0031, f01=0x0190, f02=» % EJ-EDB T[LLER ( 0 J 8 J F " D L o L L R R _" L L 4 L L x D R J 0 0 0 > 0 %
0x09b58c…09b720 Dummy {f00=0x0031, f01=0x0190, f02=» 0 O 0 O " 0 O 4 0 O F # X - h ; x J F " D H# L@ @ R L L L LW4 R R R Q W a
0x09b720…09b8b4 (0, 197) Dummy {f00=0x0031, f01=0x018e, f02=» 0 , > < 0 L 0 ^ p J F " D L L A A R%@ @ R%0X I ' L LW R R 0 L 0
0x09b8b4…09ba48 Dummy {f00=0x0031, f01=0x0190, f02=» 0 0 J F " D R L L 4 L RL R L L LI L L " W , & z * 2 2 60 2 : 3 < > J J F " D
0x09ba48…09bbdc Dummy {f00=0x0031, f01=0x0190, f02=» J F " D @P RL R _g R R " 0 R 0 d 0 v J F " D _ I / % L W L% L W 0 0
0x09bbdc…09bd70 Dummy {f00=0x0031, f01=0x018e, f02=» 1XFA R6 SLET SALDO SLET PERIODE 4 ! SUBTOTAL P )0 U h ,0 U z /0 U 1 9 @ > @ J F " D _.K 1 L W K < L W L
0x09bd70…09bf04 Dummy {f00=0x0031, f01=0x0190, f02=» 0 J F " D @R 0X L v " < i L i i R 0X I 6 W i L 0 X d 0 X v > 0 % B >
0x09bf04…09c098 Dummy {f00=0x0031, f01=0x0190, f02=» B 2 , < B L : l | @ B B J F " D 1X F R RT H H
0x09c098…09c22c Dummy {f00=0x0031, f01=0x0190, f02=» , 0 F L " 0 % " @ & P )0 b - $ t . 0 4 9 > " ? J F " D L4 R A* R H" XL RX R Lat R R RL |L
0x09c22c…09c3c0 Dummy {f00=0x0031, f01=0x0190, f02=» N ] g j , , l0 < u ( N J F " D @ t XLH" R ! RH" XL R R RL@$@*@ 4 R| R LatT t R tT 4 ^ # * $ (
0x09c3c0…09c554 (0, 198) Dummy {f00=0x0031, f01=0x0190, f02=»aaF4 t XL V 0 $ 6 F " V f $ x $ $ $ @ $
0x09c554…09c6e8 Dummy {f00=0x0031, f01=0x0190, f02=» RL RLH, RLH- RLH RL R6 x* _ RL v $ 4 D V h 0 x 0 L 0 ) " *
0x09c6e8…09c87c Dummy {f00=0x0031, f01=0x0190, f02=» R |L R1 _S R1 _TJ < RL RLA R T6 u u L R x I0 6 M SLUTDR H [ , ^ ]0 L n c $ d i F n > w " x z $ {
0x09c87c…09ca10 Dummy {f00=0x0031, f01=0x0190, f02=» 0 , 0 < 1 N ` 0 p ' 0 " $ @
0x09ca10…09cba4 Dummy {f00=0x0031, f01=0x0190, f02=» 0 J F " D L R#L L R$L LJ. R%L LJ= R+L LJ, RL RL R!L ;L _ RL RL ( " v 0 f 0 $
0x09cba4…09cd38 Dummy {f00=0x0031, f01=0x0190, f02=» B " ( * - 6 & F ADM T $ h & x & KASSE]BNINGL $ & & DAGS-DATON $
0x09cd38…09cecc Dummy {f00=0x0031, f01=0x0190, f02=» ZZZ " m & POST-DATO . $ H & k X 99E-99E-99 j " ( & KASSELUKNING $ & $
0x09cecc…09d060 Dummy {f00=0x0031, f01=0x0190, f02=» & & & ( KONTONRK 6 $ N & ^ BEL l $ & & B & B 99999999E-99 " BTTTVTTTVTTTVTT9V99-
0x09d060…09d1f4 (0, 199) Opaque[0x194]
0x09d1f4…09d388 # DirEnt {nam=»CASCOP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0638, f03=0x0000}
0x09d1f4…09d388 IdxSect {
0x09d1f4…09d388 f00 = 0x0031 // 0x9d1f4 @0x0
0x09d1f4…09d388 f01 = 0x0002 // 0x9d1f6 @0x2
0x09d1f4…09d388 gno = [ // 0x9d1f8 @0x4
0x09d1f4…09d388 [0x00]: C0x0031.0x3.0
0x09d1f4…09d388 ]
0x09d1f4…09d388 }
0x09d388…09d51c Dummy {f00=0x0031, 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
0x09d51c…09d6b0 Dummy {f00=0x0031, 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
0x09d6b0…09d844 Dummy {f00=0x0031, f01=0x0190, f02=» n <_0 @ P L t_J ^ 4 _ @ 1 A _ P 9 J & ` @ F L R X ^ d j p v |
0x09d844…09d9d8 Dummy {f00=0x0031, 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
0x09d9d8…09db6c Dummy {f00=0x0031, 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
0x09db6c…09dd00 Dummy {f00=0x0031, f01=0x018e, f02=» , ( A DUECB2K f 4 DUECB3 z H , ( a DUECB4 , ( CTECBI CTECBO , ( $
0x09dd00…09de94 (0, 200) Opaque[0x194]
0x09de94…09e028 # DirEnt {nam=»FLXCOP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0640, f03=0x0000}
0x09de94…09e028 IdxSect {
0x09de94…09e028 f00 = 0x0032 // 0x9de94 @0x0
0x09de94…09e028 f01 = 0x0004 // 0x9de96 @0x2
0x09de94…09e028 gno = [ // 0x9de98 @0x4
0x09de94…09e028 [0x00]: C0x0032.0x0.0
0x09de94…09e028 [0x01]: C0x0032.0x1.0
0x09de94…09e028 ]
0x09de94…09e028 }
0x09e028…09e1bc Dummy {f00=0x0032, 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
0x09e1bc…09e350 Dummy {f00=0x0032, 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
0x09e350…09e4e4 Dummy {f00=0x0032, 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
0x09e4e4…09e678 Dummy {f00=0x0032, 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
0x09e678…09e80c Dummy {f00=0x0032, 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
0x09e80c…09e9a0 Dummy {f00=0x0032, 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
0x09e9a0…09eb34 (0, 201) Dummy {f00=0x0032, 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
0x09eb34…09ecc8 Dummy {f00=0x0032, 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
0x09ecc8…09ee5c Dummy {f00=0x0032, 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
0x09ee5c…09eff0 Dummy {f00=0x0032, 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
0x09eff0…09f184 Dummy {f00=0x0032, 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 !
0x09f184…09f318 Dummy {f00=0x0032, 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
0x09f318…09f4ac Dummy {f00=0x0032, 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 @
0x09f4ac…09f640 Dummy {f00=0x0032, 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
0x09f640…09f7d4 (0, 202) Opaque[0x194]
0x09f7d4…09f968 # DirEnt {nam=»CASCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0650, f03=0x0000}
0x09f7d4…09f968 IdxSect {
0x09f7d4…09f968 f00 = 0x0032 // 0x9f7d4 @0x0
0x09f7d4…09f968 f01 = 0x0002 // 0x9f7d6 @0x2
0x09f7d4…09f968 gno = [ // 0x9f7d8 @0x4
0x09f7d4…09f968 [0x00]: C0x0032.0x2.0
0x09f7d4…09f968 ]
0x09f7d4…09f968 }
0x09f968…09fafc Dummy {f00=0x0032, f01=0x007e, f02=» T; 01; TID=SP; TCL=SP; * LEV=60; : 00; J 02; V SDC=S01; b SDC=S02; r KPF /L,FLXMON ASG /E0,TY10
0x09fafc…09fc90 Dummy {f00=0x0032, f01=0x2008, f02=» 01; TID=SP; TCL=SP; * LEV=60; : 00; J 02; V SDC=S01; b SDC=S02; r KPF /L,FLXMON ASG /E0,TY10
0x09fc90…09fe24 Dummy {f00=0x0032, f01=0x0190, f02=» IHTCN , ( IHSOP > IHFDN N , ( ^ , ( ! , ( 1 , ( A
0x09fe24…09ffb8 Dummy {f00=0x0032, f01=0x0190, f02=» ~ HALTN . SCTMSZK F SCTSFA Z SCTEFA n SCTPLD SCTANO SCTADA SCTPAGL , ( @ SCT
0x09ffb8…0a014c Dummy {f00=0x0032, f01=0x018e, f02=» SCTMMP SCTLAP SCTNPE & SCTSTB : SCTOPT N SCTTCTR b SCTCDTr v SCTBUGa SCTDMT! , ( SCTDMI SCTDML
0x0a014c…0a02e0 Dummy {f00=0x0032, f01=0x401e, f02=» v @ SCTNPE & SCTSTB : SCTOPT N SCTTCTR b SCTCDTr v SCTBUGa SCTDMT! , ( SCTDMI SCTDML
0x0a02e0…0a0474 (0, 203) Opaque[0x194]
0x0a0474…0a0608 # DirEnt {nam=»FLXCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0658, f03=0x0000}
0x0a0474…0a0608 IdxSect {
0x0a0474…0a0608 f00 = 0x0032 // 0xa0474 @0x0
0x0a0474…0a0608 f01 = 0x0002 // 0xa0476 @0x2
0x0a0474…0a0608 gno = [ // 0xa0478 @0x4
0x0a0474…0a0608 [0x00]: C0x0032.0x3.0
0x0a0474…0a0608 ]
0x0a0474…0a0608 }
0x0a0608…0a079c Dummy {f00=0x0032, f01=0x007e, f02=» T; 01; TID=SP; TCL=SP; * LEV=60; : 00; J 02; V SDC=S01; b SDC=S02; r
0x0a079c…0a0930 Dummy {f00=0x0032, f01=0x2008, f02=» 01; TID=SP; TCL=SP; * LEV=60; : 00; J 02; V SDC=S01; b SDC=S02; r
0x0a0930…0a0ac4 Dummy {f00=0x0032, f01=0x2008, f02=»
0x0a0ac4…0a0c58 Dummy {f00=0x0032, f01=0x018e, f02=» A3,0 P ADK A6,0 @ P RF(0) END3 * IF DIVISOR IS NULL, OVREFLOW 0 P ADK A1,0 t P RF(4) SIGNE P ANK.L A2,/7FFF @ P RF(0) END0 * IF DIVIDEND IS NULL,
0x0a0c58…0a0dec Dummy {f00=0x0032, f01=0x0190, f02=» 4 P ADK A1,0 *SIGN OF DIVIDEND P RF(6) DIVENP < 8 P ADK A3,1 * DIVIDEND IS NEGATIVE P C1R A1,A1 P C1R A2,A2 P ANK.L A2,X'7FFF' P ADK
0x0a0dec…0a0f80 Dummy {f00=0x0032, f01=0x0190, f02=» *SIGN OF DIVISOR v P RF(6) DIVORP 4 P SUK A3,1 *NEGATIVE DIVISOR < P C1R A6,A6 t P ADK A6,1 < P ADK A6,0 RESET IF OVERFLOW P RF(5) CASS
0x0a0f80…0a1114 (0, 204) Opaque[0x194]
0x0a1114…0a12a8 # DirEnt {nam=»FLXMON«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0660, f03=0x0000}
0x0a1114…0a12a8 IdxSect {
0x0a1114…0a12a8 f00 = 0x0033 // 0xa1114 @0x0
0x0a1114…0a12a8 f01 = 0x0008 // 0xa1116 @0x2
0x0a1114…0a12a8 gno = [ // 0xa1118 @0x4
0x0a1114…0a12a8 [0x00]: C0x0033.0x0.0
0x0a1114…0a12a8 [0x01]: C0x0033.0x1.0
0x0a1114…0a12a8 [0x02]: C0x0033.0x2.0
0x0a1114…0a12a8 [0x03]: C0x0033.0x3.0
0x0a1114…0a12a8 ]
0x0a1114…0a12a8 }
0x0a12a8…0a143c Dummy {f00=0x0033, f01=0x0190, f02=» ( " B B B B B B B B B B " B B B B B B B B B B B B B B " B B B B B B B B B B B B B B B B B B B B B B B B B B B B B B B B H _ w @ % Yt_D , |[ F : d 7 |d $
0x0a143c…0a15d0 Dummy {f00=0x0033, f01=0x0190, f02=» p?: | : xFt 5 [ ( b 6XE Cb L 1 I ^ % & P C l ` d : J > L. 1 r * {, b iq v MM _ A > > < & ? ? ? ? ? ? ? @ < > > U H ( ( P c P W. A < V ( U P @ P
0x0a15d0…0a1764 Dummy {f00=0x0033, f01=0x0190, f02=» _( Z P H H #P B A > A Q Z @ : ) A :_ A A <_ ? ? ? ? ? ^ A ~ _ _ ^ ? ? ? : $P T I R $ 5 % Z `W Z W Z T T U U U T U 4 T
0x0a1764…0a18f8 Dummy {f00=0x0033, f01=0x0190, f02=» R" Y T ? X D `T> `W8 > _& @ 8 R" Y T ? X D `T `W > _& W8 > 8 X W. ? ` @ @ P $ H W W > > > > > > > > @ HV ? H > _ > ? _ > > ? ^ ! Y ^ _ H Z @A. #M 1
0x0a18f8…0a1a8c Dummy {f00=0x0033, f01=0x0190, f02=» D #DP @ R XV Y @ P, `T W X "P T X I Y # C C '? Y `T Y W Y T # P W Y (@ 2 Z(@ X L L U 0 % _ Z(@ X P& T D #DP 0P X T 4 Y X ` X
0x0a1a8c…0a1c20 Dummy {f00=0x0033, f01=0x0190, f02=» f b c r T 8PX 9WF B P P ` A 8W A 8 @ 8A.W Z A >I.9 :A X R C C h ZA @ 8A. X V 9_> f @ n " X ! > Y & X * ! 0 Y T & f
0x0a1c20…0a1db4 (0, 205) Dummy {f00=0x0033, f01=0x0190, f02=» . B n B _F ! 8 ! T Y & X & f ! ># X Y * X & ! > Y &# T X Y *_ Y HW Y H Y D Y F Y B S W W B C h _ Z V Y X T X Y Y X $P y $_@ $ _P Y $ X * P Y : !
0x0a1db4…0a1f48 Dummy {f00=0x0033, f01=0x0190, f02=»J T" % % V I D H FT B > > > > ? ? ? ? K V X ;ARH;a X "P Y " P 7P( < <A $ <C ! 9 4 X j _ W B R: T P W U ] W : B R Q 9C B ! T 4 n | P ;A _ 4 A R;D A R 4
0x0a1f48…0a20dc Dummy {f00=0x0033, f01=0x0190, f02=» Q P ^ ` A : B X T " T A 7T B # Y B A P T YF ZJ X T X M A v ( H @ ~ Z @ h | 8 Px X XZ# Y ) Wf " P P _ :CV + W* T T * _<
0x0a20dc…0a2270 Dummy {f00=0x0033, f01=0x0190, f02=» W Y @ T( ] D W @ : :CZ _J) @ _ P _ Y ;g# + _ Y _ Y _ _ X<_J Y 8 M # C W A _ A A . A _$ _ _, _0 _4 _8 _< A > ?M P: A PdQ* ? A . @ : T M -
0x0a2270…0a2404 Dummy {f00=0x0033, f01=0x0190, f02=» T X T :EV W X T Y :DV X Qx :EVp W " P Y WD X $ QB R _ P U _ : V # P W Y P X ' P Y _ Y " " } h T h
0x0a2404…0a2598 Dummy {f00=0x0033, f01=0x0190, f02=» > > > > > > > > @ < A <W ^ ! Z6 : (X> @ <P T M ]N , ) A < Pj P Y U ( ) 5 & > > > > > > > $ " [ [ [ [ [ [ [ > > [ [ < Z Z ? ? Z Z Z Z Z Z Z
0x0a2598…0a272c Dummy {f00=0x0033, f01=0x0190, f02=» T6 X T0. T G Y6 G _b P ,P - _ ($SWAP A A A @ A. UU @ @ ! P$>B @ T A T @ T E D P _ $ % $P _ % A @ " Q A : R W2 A A d
0x0a272c…0a28c0 Dummy {f00=0x0033, f01=0x0190, f02=» P V;b=H F CR Z F ZW =J F CRTT F PN A @ $ P( @ R W 8 !RRT W V P A Y W @ " T> W @ V W Q V T Y P @ T W - T
0x0a28c0…0a2a54 (0, 206) Dummy {f00=0x0033, f01=0x0190, f02=» V = V W Y* P Z( = :L < P W <9B @ V W Q V W @ T @ CRT @ P @ ! P W @ V P _ @ ! P !RRP V @ P W _: Z
0x0a2a54…0a2be8 Dummy {f00=0x0033, f01=0x0190, f02=» W W P TJ V 0 !;;P P V P$ _ P !;;T X$ W f_J V T W 6 W W V 0 !;;P P V Xb _ P !;;T X$ W f nP XZ_V S A +
0x0a2be8…0a2d7c Dummy {f00=0x0033, f01=0x0190, f02=» : C. | X C.9h! # " :A K : A T.I T P 1 I P < R P A _> V : 8 A d A A A A @ A D A d A h : 9e9C) A I " 9A ! 9B r @ r A I ! ( : A d A A A
0x0a2d7c…0a2f10 Dummy {f00=0x0033, f01=0x0190, f02=» 9PJ S Y T@ $ 1T: C !CCTt : 1P P$_ P =H P @ @ T X W n : YX d C !CCT B. | X B.9 H Q v_ _ !SST( 0 U R X A X W : @ ' R xW V W$ V P
0x0a2f10…0a30a4 Dummy {f00=0x0033, f01=0x0190, f02=» 0V , - P X 9A_ : @ ! P (W ( :W> 2 W 0 . "K : A T 2 ; Z [ : : [ [ : W Z A. c R $ )_
0x0a30a4…0a3238 Dummy {f00=0x0033, f01=0x0190, f02=» b A. @ d @ W A Z : A h > ;h 0 :C # : .=H N @ .=H N @ N : d 8" R _ ZY QY : @ H W z W | CRP* J ? ? > v V @
0x0a3238…0a33cc Dummy {f00=0x0033, f01=0x0190, f02=» A (| (~ P (. E r (~ (. E @ @ W @ @ % T $Z %Z #X '8 @ ` ] @ P @ P " P " P " P W W . !TTP V ' @ T V Y Z !TTX" A 9 A : @ @ P. @
0x0a33cc…0a3560 Dummy {f00=0x0033, f01=0x0190, f02=» ( 3 ( 9B @ @ T V : @ :B W . !TTP V ' W t N =H N W l N =H N @ W | ( @ % P W @ % P ' P0 ' r " U V _2 ' P0 ' " U
0x0a3560…0a36f4 (0, 207) Dummy {f00=0x0033, f01=0x0190, f02=» W @ % P Z !TTT * @ @ T V : T V P _ A V W ' W t ' PT W f ( ' W d ' ( G =h G V d V r < ! V f P W f _B V W V t
0x0a36f4…0a3888 Dummy {f00=0x0033, f01=0x0190, f02=» W >b & 8P D P U " E W V W R 9 W D f ) $ P@ D L T@ D "P U , I ( I * $# P V -W H P U " I @ % PH H I H T P, H U V U W < + + P
0x0a3888…0a3a1c Dummy {f00=0x0033, f01=0x0190, f02=» R _ $ W : W | v z *T P _ / P *_ *T P$ _ .P _ / V z U Y$ P W | V z 3 % W P _ V |P V v ] & P _ @ @ T V
0x0a3a1c…0a3bb0 Dummy {f00=0x0033, f01=0x0190, f02=» Ph W p ' W V 8 8 4 D P$ f @ # P H I K T + Y@ V p _j V t Y Z !TTX @ @ T V : Z !TTX !CCTr ' P, ' V r 4 U V $ $ _. ' P, '
0x0a3bb0…0a3d44 Dummy {f00=0x0033, f01=0x0190, f02=» W ' P0 W f ' W d ' V d V r < ! V f _2 ' Un ' V 8 U V 8 8 8 4 D P$ f @ # P H I K T + Y@ _pR& @ @ @ % P V 4 4 4 _r @ @ T V :
0x0a3d44…0a3ed8 Dummy {f00=0x0033, f01=0x0190, f02=» S S _ : N =H N @ : N =H N @ : &=H F @ : F =H F @ : F =H F @ : 00=H 00 P P _ _ : , P@ , - 4 ] 4 zY 5 X * _6 : ( ( | V V h P
0x0a3ed8…0a406c Dummy {f00=0x0033, f01=0x2008, f02=»
0x0a406c…0a4200 Dummy {f00=0x0033, f01=0x0190, f02=» LABEL = FIX DATE = 79:04:07 PACK NBR = UNO f P Y _( Y M : ] =IR E
0x0a4200…0a4394 (0, 208) Opaque[0x194]
0x0a4394…0a4528 # DirEnt {nam=»MONCOP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0680, f03=0x0000}
0x0a4394…0a4528 IdxSect {
0x0a4394…0a4528 f00 = 0x0034 // 0xa4394 @0x0
0x0a4394…0a4528 f01 = 0x0008 // 0xa4396 @0x2
0x0a4394…0a4528 gno = [ // 0xa4398 @0x4
0x0a4394…0a4528 [0x00]: C0x0034.0x0.0
0x0a4394…0a4528 [0x01]: C0x0034.0x1.0
0x0a4394…0a4528 [0x02]: C0x0034.0x2.0
0x0a4394…0a4528 [0x03]: C0x0034.0x3.0
0x0a4394…0a4528 ]
0x0a4394…0a4528 }
0x0a4528…0a46bc Dummy {f00=0x0034, f01=0x0190, f02=» ( " B B B B B B B B B B " B B B B B B B B B B B B B B " B B B B B B B B B B B B B B B B B B B B B B B B B B B B B B B B H _ w @ % Yt_D , |[ F : d 7 |d $
0x0a46bc…0a4850 Dummy {f00=0x0034, f01=0x0190, f02=» p?: | : xFt 5 [ ( b 6XE Cb L 1 I ^ % & P C l ` d : J > L. 1 r * {, b iq v MM _ A > > < & ? ? ? ? ? ? ? @ < > > U H ( ( P c P W. A < V ( U P @ P
0x0a4850…0a49e4 Dummy {f00=0x0034, f01=0x0190, f02=» _( Z P H H #P B A > A Q Z @ : ) A :_ A A <_ ? ? ? ? ? ^ A ~ _ _ ^ ? ? ? : $P T I R $ 5 % Z `W Z W Z T T U U U T U 4 T
0x0a49e4…0a4b78 Dummy {f00=0x0034, f01=0x0190, f02=» R" Y T ? X D `T> `W8 > _& @ 8 R" Y T ? X D `T `W > _& W8 > 8 X W. ? ` @ @ P $ H W W > > > > > > > > @ HV ? H > _ > ? _ > > ? ^ ! Y ^ _ H Z @A. #M 1
0x0a4b78…0a4d0c Dummy {f00=0x0034, f01=0x0190, f02=» D #DP @ R XV Y @ P, `T W X "P T X I Y # C C '? Y `T Y W Y T # P W Y (@ 2 Z(@ X L L U 0 % _ Z(@ X P& T D #DP 0P X T 4 Y X ` X
0x0a4d0c…0a4ea0 Dummy {f00=0x0034, f01=0x0190, f02=» f b c r T 8PX 9WF B P P ` A 8W A 8 @ 8A.W Z A >I.9 :A X R C C h ZA @ 8A. X V 9_> f @ n " X ! > Y & X * ! 0 Y T & f
0x0a4ea0…0a5034 (0, 209) Dummy {f00=0x0034, f01=0x0190, f02=» . B n B _F ! 8 ! T Y & X & f ! ># X Y * X & ! > Y &# T X Y *_ Y HW Y H Y D Y F Y B S W W B C h _ Z V Y X T X Y Y X $P y $_@ $ _P Y $ X * P Y : !
0x0a5034…0a51c8 Dummy {f00=0x0034, f01=0x0190, f02=»J T" % % V I D H FT B > > > > ? ? ? ? K V X ;ARH;a X "P Y " P 7P( < <A $ <C ! 9 4 X j _ W B R: T P W U ] W : B R Q 9C B ! T 4 n | P ;A _ 4 A R;D A R 4
0x0a51c8…0a535c Dummy {f00=0x0034, f01=0x0190, f02=» Q P ^ ` A : B X T " T A 7T B # Y B A P T YF ZJ X T X M A v ( H @ ~ Z @ h | 8 Px X XZ# Y ) Wf " P P _ :CV + W* T T * _<
0x0a535c…0a54f0 Dummy {f00=0x0034, f01=0x0190, f02=» W Y @ T( ] D W @ : :CZ _J) @ _ P _ Y ;g# + _ Y _ Y _ _ X<_J Y 8 M # C W A _ A A . A _$ _ _, _0 _4 _8 _< A > ?M P: A PdQ* ? A . @ : T M -
0x0a54f0…0a5684 Dummy {f00=0x0034, f01=0x0190, f02=» T X T :EV W X T Y :DV X Qx :EVp W " P Y WD X $ QB R _ P U _ : V # P W Y P X ' P Y _ Y " " } h T h
0x0a5684…0a5818 Dummy {f00=0x0034, f01=0x0190, f02=» > > > > > > > > @ < A <W ^ ! Z6 : (X> @ <P T M ]N , ) A < Pj P Y U ( ) 5 & > > > > > > > $ " [ [ [ [ [ [ [ > > [ [ < Z Z ? ? Z Z Z Z Z Z Z
0x0a5818…0a59ac Dummy {f00=0x0034, f01=0x0190, f02=» T6 X T0. T G Y6 G _b P ,P - _ ($SWAP A A A @ A. UU @ @ ! P$>B @ T A T @ T E D P _ $ % $P _ % A @ " Q A : R W2 A A d
0x0a59ac…0a5b40 Dummy {f00=0x0034, f01=0x0190, f02=» P V;b=H F CR Z F ZW =J F CRTT F PN A @ $ P( @ R W 8 !RRT W V P A Y W @ " T> W @ V W Q V T Y P @ T W - T
0x0a5b40…0a5cd4 (0, 210) Dummy {f00=0x0034, f01=0x0190, f02=» V = V W Y* P Z( = :L < P W <9B @ V W Q V W @ T @ CRT @ P @ ! P W @ V P _ @ ! P !RRP V @ P W _: Z
0x0a5cd4…0a5e68 Dummy {f00=0x0034, f01=0x0190, f02=» W W P TJ V 0 !;;P P V P$ _ P !;;T X$ W f_J V T W 6 W W V 0 !;;P P V Xb _ P !;;T X$ W f nP XZ_V S A +
0x0a5e68…0a5ffc Dummy {f00=0x0034, f01=0x0190, f02=» : C. | X C.9h! # " :A K : A T.I T P 1 I P < R P A _> V : 8 A d A A A A @ A D A d A h : 9e9C) A I " 9A ! 9B r @ r A I ! ( : A d A A A
0x0a5ffc…0a6190 Dummy {f00=0x0034, f01=0x0190, f02=» 9PJ S Y T@ $ 1T: C !CCTt : 1P P$_ P =H P @ @ T X W n : YX d C !CCT B. | X B.9 H Q v_ _ !SST( 0 U R X A X W : @ ' R xW V W$ V P
0x0a6190…0a6324 Dummy {f00=0x0034, f01=0x0190, f02=» 0V , - P X 9A_ : @ ! P (W ( :W> 2 W 0 . "K : A T 2 ; Z [ : : [ [ : W Z A. c R $ )_
0x0a6324…0a64b8 Dummy {f00=0x0034, f01=0x0190, f02=» b A. @ d @ W A Z : A h > ;h 0 :C # : .=H N @ .=H N @ N : d 8" R _ ZY QY : @ H W z W | CRP* J ? ? > v V @
0x0a64b8…0a664c Dummy {f00=0x0034, f01=0x0190, f02=» A (| (~ P (. E r (~ (. E @ @ W @ @ % T $Z %Z #X '8 @ ` ] @ P @ P " P " P " P W W . !TTP V ' @ T V Y Z !TTX" A 9 A : @ @ P. @
0x0a664c…0a67e0 Dummy {f00=0x0034, f01=0x0190, f02=» ( 3 ( 9B @ @ T V : @ :B W . !TTP V ' W t N =H N W l N =H N @ W | ( @ % P W @ % P ' P0 ' r " U V _2 ' P0 ' " U
0x0a67e0…0a6974 (0, 211) Dummy {f00=0x0034, f01=0x0190, f02=» W @ % P Z !TTT * @ @ T V : T V P _ A V W ' W t ' PT W f ( ' W d ' ( G =h G V d V r < ! V f P W f _B V W V t
0x0a6974…0a6b08 Dummy {f00=0x0034, f01=0x0190, f02=» W >b & 8P D P U " E W V W R 9 W D f ) $ P@ D L T@ D "P U , I ( I * $# P V -W H P U " I @ % PH H I H T P, H U V U W < + + P
0x0a6b08…0a6c9c Dummy {f00=0x0034, f01=0x0190, f02=» R _ $ W : W | v z *T P _ / P *_ *T P$ _ .P _ / V z U Y$ P W | V z 3 % W P _ V |P V v ] & P _ @ @ T V
0x0a6c9c…0a6e30 Dummy {f00=0x0034, f01=0x0190, f02=» Ph W p ' W V 8 8 4 D P$ f @ # P H I K T + Y@ V p _j V t Y Z !TTX @ @ T V : Z !TTX !CCTr ' P, ' V r 4 U V $ $ _. ' P, '
0x0a6e30…0a6fc4 Dummy {f00=0x0034, f01=0x0190, f02=» W ' P0 W f ' W d ' V d V r < ! V f _2 ' Un ' V 8 U V 8 8 8 4 D P$ f @ # P H I K T + Y@ _pR& @ @ @ % P V 4 4 4 _r @ @ T V :
0x0a6fc4…0a7158 Dummy {f00=0x0034, f01=0x0190, f02=» S S _ : N =H N @ : N =H N @ : &=H F @ : F =H F @ : F =H F @ : 00=H 00 P P _ _ : , P@ , - 4 ] 4 zY 5 X * _6 : ( ( | V V h P
0x0a7158…0a72ec Dummy {f00=0x0034, f01=0x2008, f02=»
0x0a72ec…0a7480 Dummy {f00=0x0034, f01=0x0190, f02=» LABEL = FIX DATE = 79:04:07 PACK NBR = UNO f P Y _( Y M : ] =IR E
0x0a7480…0a7614 (0, 212) Opaque[0x194]
0x0a7614…0a77a8 # DirEnt {nam=»SYSGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x06a0, f03=0x0000}
0x0a7614…0a77a8 IdxSect {
0x0a7614…0a77a8 f00 = 0x0035 // 0xa7614 @0x0
0x0a7614…0a77a8 f01 = 0x0018 // 0xa7616 @0x2
0x0a7614…0a77a8 gno = [ // 0xa7618 @0x4
0x0a7614…0a77a8 [0x00]: C0x0035.0x0.0
0x0a7614…0a77a8 [0x01]: C0x0035.0x1.0
0x0a7614…0a77a8 [0x02]: C0x0035.0x2.0
0x0a7614…0a77a8 [0x03]: C0x0035.0x3.0
0x0a7614…0a77a8 [0x04]: C0x0036.0x0.0
0x0a7614…0a77a8 [0x05]: C0x0036.0x1.0
0x0a7614…0a77a8 [0x06]: C0x0036.0x2.0
0x0a7614…0a77a8 [0x07]: C0x0036.0x3.0
0x0a7614…0a77a8 [0x08]: C0x0037.0x0.0
0x0a7614…0a77a8 [0x09]: C0x0037.0x1.0
0x0a7614…0a77a8 [0x0a]: C0x0037.0x2.0
0x0a7614…0a77a8 [0x0b]: C0x0037.0x3.0
0x0a7614…0a77a8 ]
0x0a7614…0a77a8 }
0x0a77a8…0a793c Dummy {f00=0x0035, f01=0x0190, f02=»k W~ @ A r @ A t @rH @mN @mPP" @c P A[ @c P A[ W @[ T A[ @rDT : A P 2 P & @[ AW A @[ AW A @[ @[ AW A @ R AW AW A A AW AW AW AW AW AW AW AW PH @ " H A
0x0a793c…0a7ad0 Dummy {f00=0x0035, f01=0x0190, f02=» AX @[ AX @[ AX AX @ < 0P T AX @[ AX AX A @ RP6 A P 2 H `R 01 I ` _ X ~ A P 2 W * ^ ` % @ Z A p W A Z @rDT @ P B 0 W BW @ RP W W W B D A Z T A ^ @
0x0a7ad0…0a7c64 Dummy {f00=0x0035, f01=0x0190, f02=» A P 2 W * < D A z AT A | A A ~ V $R % _ A P 2 W p * D o. : j DATA ILLINT0560570580590600610620630640650660670680690700710720730740750760770780790800811221231241251261271281291301311321331341
0x0a7c64…0a7df8 Dummy {f00=0x0035, f01=0x0190, f02=»7038039 041042043044045046047048049050051052053054055056057058059060061062063064065066067 LED SYSTABLED PFTAB LED INITAB!!IL 63 !!CH $$IHINPT$$TRAP$$ !!DL 85 ! D " & * . AW AW AW AW AW : @ P@ AW @ 0P 2T AW AW W AW
0x0a7df8…0a7f8c Dummy {f00=0x0035, f01=0x0190, f02=» A122123124125126 129130131132133134135136138139140141142145149150155156159 j : 0 <c P & & @ 8 @ T x @[ T : & $ & : J & p & : &
0x0a7f8c…0a8120 Dummy {f00=0x0035, f01=0x0190, f02=» A X ` Y ` T D ' : A : X ` A Y ` r : : !99T : W W 0R 5 _ 5 0 T P R$ 0 <c Q P W 1 Q _, : " . F R ^ p H !!IL 12 !!IL 40 A A A A :!!IL 55
0x0a8120…0a82b4 (0, 213) Dummy {f00=0x0035, f01=0x0190, f02=» 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 $$CHLT3 26$$ILLINT
0x0a82b4…0a8448 Dummy {f00=0x0035, f01=0x0190, f02=»P _ _ : 0715178182 22!!CH $$ EXTRN CHLT1$$*$$!!CH $$ EXTRN IHFD$$*$$ !!CH $$ EXTRN CHRT3$$*$$!!CH $$ EXTRN CHRT4$$*$$!!CH $$ EXTRN IHCC1$$*$$!!CH $$ EXTRN IHCC2$$*$$!!CH $$ EXTRN IHCC3$$*$$!!CH $$ EXTRN CHLT3$$*$$!!CH $$ EXTRN CHLT4$$*$$
0x0a8448…0a85dc Dummy {f00=0x0035, f01=0x0190, f02=»$ EXTRN BUG$$*$$ @rHP` @[ P @ < 0P P @[ P B A vW C A v @mH x : D A v @mJ_ E A v @mL_ @ RP F A v _. : L bR _ L b,0 ) $ ) I :' d !!CH $$ X:A$$ $$ 4R P Z T 5 _$ : 4P^R` 4 J o < % ) !
0x0a85dc…0a8770 Dummy {f00=0x0035, f01=0x0190, f02=» h _ : 4R T h $X R T _$ : A 0 ) A W W W W W Z # C C ( B RF : f _( @ $ A !YYP$ !NNP !$$T 4 !## o& W : o& _x _ W h
0x0a8770…0a8904 Dummy {f00=0x0035, f01=0x0190, f02=» R D ! P ) _ _ : A _, > Q DTOSS TOSSWORK A < A @ A D A H A L A P A T X ` d h l A p A : A W ( -R _ : ( =R WJ _ < )R WJ _ :
0x0a8904…0a8a98 Dummy {f00=0x0035, f01=0x0190, f02=» _ MOV ,/S,TOSSWORKINC ,TOSSWORK KPF /S,0 ASG /E0,TY10!!EN DATA 00!!DL LED KPF /O I/O ERROR SCR 9 R [ 8R T 5 _ T A [ _" @mFT 00 A( A A A( A A!^ A
0x0a8a98…0a8c2c Dummy {f00=0x0035, f01=0x0190, f02=»', A' A' A!` A A"P A#4 A$ A$ A$ A% A( A " A'F @ 4P DR A : @ X @ ^ A X A A A ^ A 3T @[ P DR A @[ P DR A J ( } . @ T W T 3| @[ A 8 @[ A A[ A[ @ Pv 1 1 @ SP CIT
0x0a8c2c…0a8dc0 Dummy {f00=0x0035, f01=0x0190, f02=» P @ 0 SP NUT 1 A 0 2 A @ SP 1P ABF A3H 1 @ < SP NUT A < @ REP Ak @ DCP Ak @ DCP Ak @4X DCP Ak @' DCP Ak @' DCP Ak @$P DCP Ak @$ DCP Ak @%* DCP Ak @ SP 1P AB0 4< :DRKB01DRTP01DRGP01DRDN01DRDI
0x0a8dc0…0a8f54 (0, 214) Dummy {f00=0x0035, f01=0x0190, f02=»0000DRDC07DRDC15DRDC17DRDC81DRDC82DRDCXXDRDCYYDRDC22DRCC01 ******************** D R I V E R S ********************* < P @ ' & ' &% &8'`( !|"l#R$6$ % ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( RETURN CODE
0x0a8f54…0a90e8 Dummy {f00=0x0035, f01=0x0190, f02=» OF REQUEST IF PRINT OBJECT IS REMOVED : END OF REQUEST WHEN SELECTOR UNIT OR PRINTER IS INACTIVE : ROOMLESS POINT CODES : MMU BUFFER SIZE (BYTES) : WRITE TALLY ROLL : CUT/PERFORATE JOURNAL TAPE : SPECIAL CHARACTER /13 : SPECIAL CHARACTER /1
0x0a90e8…0a927c Dummy {f00=0x0035, f01=0x0190, f02=»OF REQUEST WHEN SELECTOR UNIT OR PRINTER IS INACTIVE : ROOMLESS POINT CODES : MMU BUFFER SIZE (BYTES) : KEYBOARD TIMEOUT : ECHO FUNCTION : STANDARD READ : NUMBER OF ZEROES FOR MULTIPLE ZERO KEY : COMPLETION OF READ REQUEST AT POWER ON : CIRC
0x0a927c…0a9410 Dummy {f00=0x0035, f01=0x0190, f02=»YLOCK ON : MMU BUFFER SIZE (BYTES) : MMU KEY TABLE SIZE : ROOMLESS POINT CODES : SPECIAL CHARACTER /13 : SPECIAL CHARACTER /14 : ECHOING OF EXTRA SPACE BETWEEN CHARACTERS : ECHO OF EOR KEY : SUPRESSION OF TRAILING BLANKS : END OF REQUEST
0x0a9410…0a95a4 Dummy {f00=0x0035, f01=0x0190, f02=»MMU BUFFER SIZE (BYTES) : ORDER,WRITE PROGRAM DISPLAY : FLASH FUNCTION : LOGG FUNCTION FOR INPUT/OUTOUT CHRS : NUMBER OF LOCAL CHANNEL UNITS : ACKUMULATORS FOR NAK, RETRANSMISSION FAULT AND UNDEFINED CONTROL CHRS : SOFTWARE TIMOUT HANDLING MISSING D
0x0a95a4…0a9738 Dummy {f00=0x0035, f01=0x0190, f02=» MMU BUFFER SIZE (WORDS) : LOGG FUNCTION FOR INPUT/OUTPUT CHRS : NUMBER OF LOCAL CHANNEL UNITS : ACKUMULATORS FOR NAK,RETRANSMISSION FAULT AND UNDEFINED CONTROL CHRS : NUMBER OF REMOTE CHANNEL UNITS : REMOTE TEST FILE CODE : 01 KEYBOARD TIMEOUT
0x0a9738…0a98cc Dummy {f00=0x0035, f01=0x0190, f02=»46 : LOWER CASE CHARACTERS : ECHO OF EOR-KEY : SUPRESSION OF TRAILING BLANKS : CURSOR STEADY ON 6386/6385 (ELSE TWINKLING) : COUNTRY CODE ON 6385 (0-9) : MMU BUFFER SIZE (BYTES) : READ AFTER WRITE : NUMBER OF DISC UNITS : UNIT 1 PTS 6876 DI
0x0a98cc…0a9a60 Dummy {f00=0x0035, f01=0x0190, f02=»CIEVE 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 HIGH : SIEM
0x0a9a60…0a9bf4 (0, 215) Dummy {f00=0x0035, f01=0x0190, f02=»MESSAGE PASSING TO DC:TASK : IBM-3270 PACKAGE : MMU BUFFER SIZE (WORDS) : RECEIVE BUFFER LENGTH : DC-TASK DATCOM FILE CODE : INTERRUPT LOGGING : POLL TIMEOUT VALUE : NUMBER OF RECEIVE BUFFERS (3-14) : FULL DUPLEX : 00 PHYSICAL LINE NUMBER
0x0a9bf4…0a9d88 Dummy {f00=0x0035, f01=0x0190, f02=» ASCII) : EBCDIC TRANSPARANCY : BID TIME OUT VALUE : LOGG AREA LENGTH PER LINE : 00 PHYSICAL LINE NUMBER : 34 04 05 MMU BUFFER SIZE (WORDS) : NUMBER OF LINES : POLL LIST LENGTH : P852 INSTRUCTION SET : MAX BLOCK LENGTH : INTERRUPT
0x0a9d88…0a9f1c Dummy {f00=0x0035, f01=0x0190, f02=»E (WORDS) : NUMBER OF LINES : POLL LIST LENGTH : P852 INSTRUCTION SET : MAX BLOCK LENGTH : INTERRUPT LOGGING : RETRY LIMIT : PHYSICAL LINE NUMBER : 34 04 05 06 07 32 33 35 36 37 38 MMU BUFFER SIZE (WORDS) : RECEIVE BUFFER LEN
0x0a9f1c…0aa0b0 Dummy {f00=0x0035, f01=0x0190, f02=»GTH : DC-TASK DATCOM FILE CODE : PHYSICAL LINE NUMBER : MMU DEVICE BUFFER : RECEIVE BUFFER LENGTH : DC-TASK DATCOM FILE CODE : INTERRUPT LOGGING : POLL TIMEOUT VALUE : NUMBER OF RECEIVE BUFFERS (3-14) : SUPPRESS NULL CHARS. : 00 PHYSIC
0x0aa0b0…0aa244 Dummy {f00=0x0035, f01=0x0190, f02=») : FD ON PROGRAMMED CHANNEL(ELSE MUX) : FD ADAPTED TO TOSS FORMAT (DM & PAGING) : IBM LABELLED DISC HANDLING : ORDERS OPEN,CLOSE : MMU BUFFER SIZE (WORDS) : COMPLETION OF READ REQUEST AT POWER ON : CIRCULAR INPUT BUFFER SIZE : MMU BUFFER SIZ
0x0aa244…0aa3d8 Dummy {f00=0x0035, f01=0x0190, f02=»DCMMU BUFFER SIZE (BYTES) : NATIONAL CHARACTER VARIATION (0-9) : LOWER CASE CHARACTERS : CHARACTER PITCH DOCUMENT (2-0) : JOURNAL STATION IN PRINTER : CHARACTER PITCH JOURNAL (2-0) : PARAMETER ORDERS : MMU BUFFER SIZE (BYTES) : MMU BUFFER S
0x0aa3d8…0aa56c Dummy {f00=0x0035, f01=0x0190, f02=» X DCX: !SSP B ) . & * A A1V A1h A1z ,lW @k P . W @k T .8W$ .(W @mF @mN @t @rD @mPP . .8 _ : @) 1 A1 a1 _t 4R>" :Q WJ A* W$ WJ A* P * Z6T 5W _B : * R R P
0x0aa56c…0aa700 Dummy {f00=0x0035, f01=0x0190, f02=»* * * zjz * 4 0P 0 A R : 4" H* * * * 0 A p : 4 0T 00 AxB AxD : 4 0Q 0 A(N : : _ ; @* D -( -( /H 4 0~ @ 4 T # R dR W ! - - - P( R A A _ 00 A ^ - @A :HV. !
0x0aa700…0aa894 (0, 216) Dummy {f00=0x0036, f01=0x0190, f02=»W > + $ @* Yr @A @* D T @* D ! R dR _ _ @* D ! _ 4R WJ A- P T A1 A1 / A1~W@ 4 !SSPZ P T # R dR W ! P P A1~ T A1 1p W A1Z 1L W A1l 1^ A1V A1h A1z _ P
0x0aa894…0aaa28 Dummy {f00=0x0036, f01=0x0190, f02=»+ W. !00 + !FF + !99U !AA + + E1 L A- _f TL PH QB A. A. A. A A ( - 0 A R - _ + + @k P 2p # @mFP 2 # @t P 2 # @rDP 2 # @mNP 3 # @mPP 3$ # D P
0x0aaa28…0aabbc Dummy {f00=0x0036, f01=0x0190, f02=» 0T& A A1A 14 W 1 1* D : 1 .( : A0< A0> A0@ A ,,P <H + + 0D + A0@ @0>P @0@ A0@ + X 17P 81P 82T @0@ + W @0@ _ @0@ _ <C 0 X Q 0 a0< @* A0< X 17T @
0x0aabbc…0aad50 Dummy {f00=0x0036, f01=0x0190, f02=» _ @ 0T 00 A A W 01_ +6021213 341415 041011 051819 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$$
0x0aad50…0aaee4 Dummy {f00=0x0036, f01=0x0190, f02=»DL 35 1 A A W D : .( : A A A ,,P <H + !!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ !!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ !!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!CH $$ASSOLY EQU 0$$ASSOLY
0x0aaee4…0ab078 Dummy {f00=0x0036, f01=0x0190, f02=» W T 3 : 3 @ KEP A A1V A1h A1z ,l .( :DRKB03 LED DRKB03 @ FPT 4 1 @' SP CIT Q W @' = > 4 'F 4h D :LED DVTOD @[ T 44 :DRIC0X @ SP ECP 1P AB :DC : 4 : ( SP
0x0ab078…0ab20c Dummy {f00=0x0036, f01=0x0190, f02=»" P 0R U Q P <H9D_( : : 9 5W 7 t 6 @5 A* A*, @5 A* 7 7 6 ) 8h o Z P 8z 8 D @5 A* A*, @5 A* @k P" TA A7 @mF @mNP TM A7B A7H A7 T A7 @rDP TL A7 @mF @rD @mN
0x0ab20c…0ab3a0 Dummy {f00=0x0036, f01=0x0190, f02=»7 7 B D A7 A7* 8J A A1V 0 @7$P 1 A1Z 1L D A : 7 z 5 1 @' SP CIT Q W L K M - P R O C E S S O R S IMER TPROC MLKM DSEGTABORT MONTIM NTIM TASS TASS MLKM MLKMTSWBLKTSWBLK 01
0x0ab3a0…0ab534 (0, 217) Dummy {f00=0x0036, f01=0x0190, f02=»DELAY/DELAY AND ACTIVATION : ABORT FUNCTION : GET/SET TIME : LED LRPINT 8 m :LED TABORTATTACH/DETACH : LED TOSSIO!!CH $$ X:A$$ 1$$ @7 A8 @7 A8 @7 A8 @7 A8 @7 A8 @7$ A8 @76 A8 @7N A9 :
0x0ab534…0ab6c8 Dummy {f00=0x0036, f01=0x0190, f02=» E 7W @ Bz E E o Z PP 01 7 ; [ A A; :hT _@ 7 @E E AE @3HR I @2_h @H PV AS @E P E AH AH H E AE 01 AE J4 T @ _ AS 7 a}b
0x0ab6c8…0ab85c Dummy {f00=0x0036, f01=0x0190, f02=»WJ A: P" (P W T N 7 W ; _D W W X ?> @f } @ _ I2 4P 1 A;v @E 7 E 01 7 @I2 , 7 4 W V T1P TPT, 1 0P 1T W A; / A;v @; W A;v AE @2 4^ AI2 @; :
0x0ab85c…0ab9f0 Dummy {f00=0x0036, f01=0x0190, f02=» @A ; R *Pr_ 7 = P^ "T @ 1T V SIT TF P, LA !,,T2 U, LA LA 9H # = _4 # AI2 : < @A 7 = : V @A P KB I& V MTT 0P @R @}b I 7 P& @A !,, < @A @R C C # : 7 :
0x0ab9f0…0abb84 Dummy {f00=0x0036, f01=0x0190, f02=»9D_( : < JL < < < @A = 9H @A = A} >J < V KBT$ bqP brP b6T Ix @3HR I b6 bA =: @ 1 =: 20 =: V KBP DIP W J FHR P _ F ( : : R _ : < @A !NNP !YY < W : JL
0x0abb84…0abd18 Dummy {f00=0x0036, f01=0x0190, f02=» :d" *0 !99U :H : T TP J| T1 J D3 K D4 J D5 J TWP6 DUP FDT I W 7 V W V W 1 W W W 7 V W 01 W W I V AI AI V AI" AI! I G AI V AI AI 0 AI! AI" I D : A? a A`@
0x0abd18…0abeac Dummy {f00=0x0036, f01=0x0190, f02=»T* @ 1T" 7 @I2P @I4 W 02 W AI2 : DEFINE TERMINAL DEVICE CLASSES DEFINE ECHO DEVICE CLASSES A F F F F G@ G F F H$FILE COD
0x0abeac…0ac040 Dummy {f00=0x0036, f01=0x0190, f02=»KEY : ECHO DEVICE : KEYBOARD TIME-OUT : CODE CONVERSION : <(< = = = = = => >~> {t{ > > T1
0x0ac040…0ac1d4 (0, 218) Dummy {f00=0x0036, f01=0x0190, f02=»
0x0ac1d4…0ac368 Dummy {f00=0x0036, f01=0x0190, f02=» TAS T01 :
0x0ac368…0ac4fc Dummy {f00=0x0036, f01=0x0190, f02=» 20203000003010909090 000010100010101010 10101000202000 FILE CODE : DEVICE ADDRESS : FILE CODE : DEVICE ADDRESS : PTS NUMBER : FILE CODE : DEVICE ADDRESS : PTS NUMBER :
0x0ac4fc…0ac690 Dummy {f00=0x0036, f01=0x0190, f02=»TER : DISPLAY FILE CODE : FILE CODE JOURNAL : DEVICE ADRESS : FILE CODE DOCUMENT : FILE CODE JOURNAL : DEVICE ADRESS : FILE CODE DOCUMENT : FILE CODE TALLY ROLL : LEVEL: *********
0x0ac690…0ac824 Dummy {f00=0x0036, f01=0x0190, f02=» I W I A $ ! P ) _ :END OF RECORD KEY : TRIPLE ZERO KEY : ABF b6 : CO ABF : 7 V W V W 1P 3 W W W 1_ 1 W W : DIP @ P T AFVW : : L[ R T _ : P& P P W @A AA 0 AA @A :
0x0ac824…0ac9b8 Dummy {f00=0x0036, f01=0x0190, f02=» @0 7 V W V W W : V W : }d A}b @s P V AOE E O 4 8R @K V @H P K Rf O X *0 T1P. D4P( D5P" DUP FDP TPP D3T X W X X / O @K Q L L D _n / AR _ / P Q$ AK Q _ [j AL AK
0x0ac9b8…0acb4c Dummy {f00=0x0036, f01=0x0190, f02=» : X NT2 @S 90R NX R R R$ T : ET$ @s P R R$ R, W : AOF O8 @S 90R NX R 0 AO AO^ X 00 FO X 10T R@ W X AR X AR R X X W 1 AO !99U W 1 AO 40 M W M 8
0x0acb4c…0acce0 Dummy {f00=0x0036, f01=0x0190, f02=»O O N Ld T !99U AO[:h AO] @s P OL : X AS 90Rf S0WF AS W@ @S AR ! " R _ ES R W R @S AR 9h AR : @S ! U 10 AS _Z @}b 0Tf P P " 9U AR R P P8 ! " R _ ES P AR AR AR
0x0acce0…0ace74 (0, 219) Dummy {f00=0x0036, f01=0x0190, f02=» $$/1111$$/ 000$$ !!CH $$BCA$$ $$ !!CH $$ED0$$ $$
0x0ace74…0ad008 Dummy {f00=0x0036, f01=0x0190, f02=»
0x0ad008…0ad19c Dummy {f00=0x0036, f01=0x0190, f02=»!!CH $$2010$$0000$$ !!CH $$DATA /3F4F,/5F6F$$ $$!!CH $$0 CODE $$CTAB $$$!!CH $$8000$$8000$$ !!CH $$***$$ EXTRN CTABXX$$ !!CH $$/ABC$$/ $$!!DL 5 EXTRN CTAB0 !!CH $$KBAD$$KBAD3$$!!CH $$0 CODE $$CTAB00 CODE $$ E 9a R _ :H
0x0ad19c…0ad330 Dummy {f00=0x0036, f01=0x0190, f02=»S 4T : 3T 24 : 2T 16 : 1T 08 : 00 : 4T : 3T 12 : 2T 08 : 1T 04 : 00 : [ o Z P W WJ
0x0ad330…0ad4c4 Dummy {f00=0x0036, f01=0x0190, f02=» [N AWh AWr Zh Y[ W E[ H !,,P Yb T AUd E AUF AU@ _ [ $ [ P @[ T LT A[ @rH @rD @mN @mPP @[ T @ P FD A[ W DU A[ 1 A[= U @ RP @[ P VD @q A @[ P$ 2 A[= VD @q A Ak Ak Ak Ak @ Ph A Ak Ak
0x0ad4c4…0ad658 Dummy {f00=0x0036, f01=0x0190, f02=» $R T ) _ @[ T A[ @[ T A[ @[ T A[ @[ T A[ @[ T A[ @[ T A[ @ A P A [ @ P A [ m NU A @ Q 00 A A A : 09HR _ _ : F[NP F[N^ : Z _ KB KEYBOARD TP TELLER TERMINAL PRINTE
0x0ad658…0ad7ec Dummy {f00=0x0036, f01=0x0190, f02=»ISPLAY LT LOCAL TERMINALS RT LOCAL AND REMOTE TERMINALS MS MAGNETIC STRIPE UNIT OD OPTICAL DOCUMENT READER T1 TELLER TERMINAL PRINTER (TP71) TC TAPE CASSETTE SI SOP INPUT SO SOP OUTPUT MT MAGNETIC TAPE UNIT TW TYPE
0x0ad7ec…0ad980 Dummy {f00=0x0036, f01=0x0190, f02=»NICATION INPUT IO INTERTASK COMMUNICATION OUTPUT D1 DATA COM DRIVER DRDC07 D2 DATA COM DRIVER DRDC15 D3 DATA COM DRIVER DRDC17 D4 DATA COM DRIVER DRDC81 D5 DATA COM DRIVER DRDC82 D6 USER OWN DATA COM DRIVER 1 D7
0x0ad980…0adb14 (0, 220) Dummy {f00=0x0037, f01=0x0190, f02=»ICE ABBREVIATIONS DEFINE DEVICES : DC-DRIVER1 NAME,USERID : KBTPGPDNDIDYLTRT MSODT1 TCSISOMTTWDULPFDCRIIIOD1D2D3D4D5D6D7D8CC DWII01DWIO01DW0701DW1501DW2201DTTP03 DVTKB DVTTP DVTGP DVTDN
0x0adb14…0adca8 Dummy {f00=0x0037, f01=0x0190, f02=»RD 6236/71/72 IN SYSTEM : ONLY KEYBOARD 6236 : @ P 01 A A!@ A"$ A% : [ $ [ P DC A R : DEVICE LIST (Y/N) : ] b AH AE S AE 01 AE [ A9 `8 A9 ] A9 A;< : A9 c P ] ] W* `b ]
0x0adca8…0ade3c Dummy {f00=0x0037, f01=0x0190, f02=»
0x0ade3c…0adfd0 Dummy {f00=0x0037, f01=0x0190, f02=» ` a a ` aD` a a a a a a a bXb b a a a ` DEFINE SPECIAL DEVICE-CLASSES
0x0adfd0…0ae164 Dummy {f00=0x0037, f01=0x0190, f02=»IT NUMBER : FILE CODE : INPUT FILE CODE : OUTPUT FILE CODE : BACKSPACE KEY : CANCEL KEY : END OF RECORD KEY : INPUT FILE CODE : OUTPUT FILE CODE :
0x0ae164…0ae2f8 Dummy {f00=0x0037, f01=0x0190, f02=» LINE NUMBER : INPUT FILE CODE : LINE NUMBER : OUTPUT FILE CODE : @rH @mN @mPP @[ P Ac A[ @[ P Ac A[ : L[ P T _ : @ Ag2 @ Ag4 @s T DW Ag f @ RP @g 4 e gL g
0x0ae2f8…0ae48c Dummy {f00=0x0037, f01=0x0190, f02=» X P g g Ag< Ag> Ag8 Ag:_ @g$P h gV W gr g g^ 4^ T P _" @g$PD @[ T, @[ T& @[ T @[ T @[ T @rH @ @mN @mPT W gr g g^ g @g 00 Agr Agv Ag gt @g @g"T / Ag 0 T T1P DUP FDP TPP MTT T
0x0ae48c…0ae620 Dummy {f00=0x0037, f01=0x0190, f02=»g$PN @ R @rH @mN @mP @ P8 Ag" g g Agv Ag g g gt _ ir g D @g Q PN Q P E AgP Q Ag g g g g 00 Agr Agv Ag Ag Q P Ag Ag cX S AgP W Ae Ag Q Ag$ @rH @mN @mP @ Xh $ l gL g j< gV 00 A
0x0ae620…0ae7b4 (0, 221) Dummy {f00=0x0037, f01=0x0190, f02=» 0715178182 22 ASM DC:TABLED TCLASS!!IL 11 DATA TC00TC00 DATA TC00E-* TC00E EQU * DATA O 00 EXTRN DV 00!!
0x0ae7b4…0ae948 Dummy {f00=0x0037, f01=0x0190, f02=» Dg( Ag Ag X 17P 81P 82P W X X 0 W 01 Ag Ag [j AWh AWr Wd R> R _ FDP MTP DUT W X ! P Hf T If W : Ag Ag g : 00 Ag @[ P iD @[ P iJ @[ P iP @[ P iV @[ P i @ P kh j< : 07W 15W
0x0ae948…0aeadc Dummy {f00=0x0037, f01=0x0190, f02=» k j : @%* 22W( @ 07W @ 15W @$P @ W @$ @ W Ag& /0 Ag Ag h DW Ag @g& Ag 00 Ag g : @rH @mN @mPP, @[ Ag P @ < 0P P jx j @[ Ag P j : 02 Ag g : 01_ @rH @mN @mP @ P @[ P< @ < 0P4 P 0 F2 k, 1 F3
0x0aeadc…0aec70 Dummy {f00=0x0037, f01=0x0190, f02=» h kB : kN : DATA DWDU02 AkZ AkY : EXTRN DWREMU DATA /015 DATA DWREMU : : P A 1 p$ 7 : :pz q u 2 q< b q o Ak Z T q r ; X HA Ir
0x0aec70…0aee04 Dummy {f00=0x0037, f01=0x0190, f02=» st o Z P AmF M Are t o Z P" AmN r o Z ArDP AS ApT A Are t o Z AmP r o Z P6 ArJ @rDP A Ar3 AreW @mFT r W r* r> W r| o Ak Z P A 02 A r o Z ArH u> p$ pz @rHP W A t u> p$ m
0x0aee04…0aef98 Dummy {f00=0x0037, f01=0x0190, f02=» @p _ A R r q r * t. @[ P tp s q s * q s0 * s @[ P t| @ Q s sL * D rl rx rR @rJP r rf r WJ L @k A q (
0x0aef98…0af12c Dummy {f00=0x0037, f01=0x0190, f02=» / 1 S Q Q _T q AV q S _ :T 5 u 9 ] K c0STk k k k WJ ; T @A !YYP NP :SYSTAB IMON IMOD TDISPLRPINT TPROC MSUBSTTMJOB OINT TASKTOSSIOSYSLDMSYSLDALDTASK PFTAB LKMAL CTABX TCLASSSCLASSMONTAB
0x0af12c…0af2c0 Dummy {f00=0x0037, f01=0x0190, f02=»:LT3IN:LT4IN:RT1IN:RT2IN:RT3IN:RT4 S Y S G E N SYSTEM GENERATION PROGRAM 6810 RELEASE #4.2 SUPPORTING TOSS RELEASE #9.2 ASSEMBLY LIST : ASG /02,NOSYSGEN ENDEDEXTRA MONITOR MODULES : MOV LED DWDC00 DEBUGGER : INC DEBUG,
0x0af2c0…0af454 (0, 222) Dummy {f00=0x0037, f01=0x0190, f02=» DATA MANAGEMENT : ASSEMBLER OVERLAY : MONITOR NAME : KPF /L, LED MONTAB009010011012013014015016017 021022023024025026027028029030031032033 038039040041042043044045046 049050051052053054055056057058059060061 MEMORY MANAGEMENT UNIT : !!DL
0x0af454…0af5e8 Dummy {f00=0x0037, f01=0x0190, f02=»P P u Atn Atm tb _* : t s t t` At t_ At tT At : DATA CTABXX EXTRN CTABXX EXTRN ITAD DATA ITAD !!IL 47 ****!!IL 19 t :TIODMX 0501131012l l l l l COMPUTER TYPE : SWAPPABLE WORK BLOCK HANDLING : DISC PAGING :
0x0af5e8…0af77c Dummy {f00=0x0037, f01=0x0190, f02=» 365 40420 wd @rH w { y wd u wd ) z$ z: A x @w AA z A AwX v .( A{< y. @x$! A AwX v y y x @[ P @ < 1T x W y8 @[ T y D A{H
0x0af77c…0af910 Dummy {f00=0x0037, f01=0x0190, f02=»{ m : : LwDR _ LwD,0 ) $ ) I : :d > 9C :' d !!CH $$ X:A$$ $$ MAX NUMBER OF DISC FILES : MAX NUMBER OF COMMON DISC-FILE FILE CODES : MAX NUMBER OF LOCAL DISC-FILE FILE CODES : MAX NUMBER OF DISC BUFFERS :
0x0af910…0afaa4 Dummy {f00=0x0037, f01=0x0190, f02=» INDEXED ACCESS : MAX KEY LENGTH IN BYTES : NUMBER OF WORDS IN MASTER INDEX AREA : LED DMBUF LED DFTAB !!CH $$F0F1,/F2F3$$F0F1$$ !!DL 24 DATA MANAGEMENT PARAMETERS LED DMFDB LED DMTASK!!DL 23 @x AA @x AA z B AwX v @x AA @x
0x0afaa4…0afc38 Dummy {f00=0x0037, f01=0x0190, f02=» w, @x " 9a AmH C AwX v A AwX .( A{$ :LED DMTASS @w w, @w " AmJ : z` @xt A! AwX v .( A{ :LED TIODM 4 0T 00 Ax Ax Ax Ax : 4 00T T !00T 00 AxB AxD 0 Ax$ : Az Az @mFP" @xt 1R @x w, @x " 9a Av @z @z : A
0x0afc38…0afdcc Dummy {f00=0x0037, f01=0x0190, f02=»MPYMODDIVMODDMSUBR | @A < !NNPF !YY < S ; P )P | @A | |Z_( @}^T | D @} b4P | o Z T @}b I A}^ H P A}b : !::T <h !00R !77Q @}^T( A}^ | @E A} @}b I } A} A} : HA
0x0afdcc…0aff60 Dummy {f00=0x0037, f01=0x0190, f02=» @}b I :LED CTABX 8-BIT SETTING : !!CH $$X$$ $$!!CH $$C0 EQU 0$$C0 DATA /0000,/0000,/0000,/0000,/0000,/0000,/0000,/0000$$!!AB }d x Ax Ax : 4 00T T !00T : @rDP` } o Z Y ~ ~C ~^ ( ~ o Z Y ~ ~X ~ " : @rDP ~4
0x0aff60…0b00f4 (0, 223) Dummy {f00=0x0037, f01=0x0190, f02=»$ X:B$$ $$ A 0 !00R !FFQ !99U !AAR - $ : A 0 !00R !99Q - : A W A A $ ) ^ 0 P ) _ : I A H P A : !::T <h !00R !77Q @ T A @E A @ I A A : HA
0x0b00f4…0b0288 Dummy {f00=0x0037, f01=0x0190, f02=»~ } D A~ @}H9A } A A~ : : @~ ! B A~ } @~ } @~ " 9a Ar C A~ } A A~ 0B A :LED DMTASS ` N @~ A! A~ } 0B A :LED TIODM 4 0T 00 A~ A~ A~ A~ : : A A @~ 1R @~ } @~ " 9a A}H @ @ : C 0 0R
0x0b0288…0b041c Dummy {f00=0x0037, f01=0x0190, f02=» @x P V ` r B T B r r F d + L N @ AC @ AC Ar @ $ AC @ & AC Ar @}H9A A @ 0B | A : FILE MANAGEMENT PARAMETERS NUMBER OF FILES FOR ALL TASKS : NUMBER OF FILES/TASK : LED DM
0x0b041c…0b05b0 Dummy {f00=0x0037, f01=0x0190, f02=» 1P ' M M N N N N : P @ U U U U P ` U U U U :0000000001010101020202020303030301010101000000000101010102020202 DATA /0000,/0000,/0000,/0000,/0000,/0000,/0000,/0000,/0000 /000
0x0b05b0…0b0744 Dummy {f00=0x0037, f01=0x0190, f02=» @C >` !NNPF !YY >` r V > P )P @C ._( @ 2T @ 0 r u Z T @ 6 I A 2 H P A 6 r : !::T <h !00R !77Q @ 2T( A 2 N @H A @ 6 I N A A :
0x0b0744…0b08d8 Dummy {f00=0x0037, f01=0x0190, f02=» >` @ 6 I :LED CTABX 8-BIT SETTING : !!CH $$X$$ $$!!CH $$C0 EQU 0$$C0 DATA /0000,/0000,/0000,/0000,/0000,/0000,/0000,/0000$$!!AB 8 010202020203030303010101010000 : @x,P` u Z Y 2 ( u Z Y , b " : @x,P
0x0b08d8…0b0a6c Dummy {f00=0x0037, f01=0x0190, f02=»CH $$ X:B$$ $$ C 0 !00R !FFQ !99U !AAR - $ : C 0 !00R !99Q - : C W C C $ ) ^ 0 P ) _ : I A H P A r : !::T <h !00R !77Q @ T A N @H A @ I N A A :
0x0b0a6c…0b0c00 Dummy {f00=0x0037, f01=0x0000, f02=»
0x0b0c00…0b0d94 (0, 224) Opaque[0x194]
0x0b0d94…0b0f28 # DirEnt {nam=»OBDIR «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0700, f03=0x0000}
0x0b0d94…0b0f28 IdxSect {
0x0b0d94…0b0f28 f00 = 0x0038 // 0xb0d94 @0x0
0x0b0d94…0b0f28 f01 = 0x0008 // 0xb0d96 @0x2
0x0b0d94…0b0f28 gno = [ // 0xb0d98 @0x4
0x0b0d94…0b0f28 [0x00]: C0x0038.0x0.0
0x0b0d94…0b0f28 [0x01]: C0x0038.0x1.0
0x0b0d94…0b0f28 [0x02]: C0x0038.0x2.0
0x0b0d94…0b0f28 [0x03]: C0x0038.0x3.0
0x0b0d94…0b0f28 ]
0x0b0d94…0b0f28 }
0x0b0f28…0b10bc Dummy {f00=0x0038, f01=0x000c, f02=»820910 MMEND SCTLAP SCTMMP SCTNPE SCTMMC SCTEFA SCTLAC MMDDIV SAVE06 SAVE03 MOVE SAVE20 M:REL LDALEN CONVRT SCTSWB SAVE25 SAVE12 SYSBAS SYSLOD SCTADA SCTPLD SCTANO SCTSFA bREL
0x0b10bc…0b1250 Dummy {f00=0x0038, f01=0x0190, f02=» HDEFDOC 820910 DEFDOCK T:FDSP I:EVA0 T:IO2 ZFMOVE 820910 FMOVE I:EVA0 I:ERR2 I:EVA5 I:ER18 I:RT1 4 FTYPET 820910 TYPET I:EVA0 I:ERR2 I:RT1 >ICLEAR 820910
0x0b1250…0b13e4 Dummy {f00=0x0038, f01=0x0190, f02=» T:STEV T:RNOK T:LOFSN I:EVA0 T:LOPS I:ER17 T:CLMI I:ERR2C I:MOV T:GRFC T:ROK T:STOU 820910 STROU1K T:STEV T:LOFS I:EVA0 T:LOPS I:ER17 I:ERR2L T:DUPX T:GRFC T:ROK T:RNOK J
0x0b13e4…0b1578 Dummy {f00=0x0038, f01=0x0190, f02=» T:DUPX T:GRFC@ T:CLRD T:CSEG T:SCUW T:IOERC T:BELL T:CLR1N T:CLR2 T:CLIT@ T:EKEY T:DYKI 820910 T:DYKIK I:EVA7@ T:CSEGW T:CASP T:CLRD T:EKEY T:RCR T:IOER@ F T:CLR1 T T:CLR2 b T:SCUW
0x0b1578…0b170c Dummy {f00=0x0038, f01=0x0190, f02=»UPDF 820910 T:UPDFK T:GRFCN I:ER14 T:LOFSC I:EVA0 T:LOPS I:ERR2@ I:MOV T:RCR T:REWR T:RCTS ` T:DUPL 820910 T:DUPLK T:GRFC I:EVA0 I:ERR2@ T:RNOK T:ROK T:DUPX T:LOFS T:LOPSC I:MOV
0x0b170c…0b18a0 Dummy {f00=0x0038, f01=0x0190, f02=» T:GRFC I:EVA0 I:ERR2@ T:RNOK T:ROK T:RCR 0 JT:TSTC 820910 T:TSTCK T:GRFC I:ER14 T:RTES < T:TFWD 820910 T:TLEFK T:TRIG T:TLDO T:TDOW T:TUP T:TFWD T:TBWD T:THOMC "
0x0b18a0…0b1a34 (0, 225) Dummy {f00=0x0038, f01=0x0190, f02=» T:DISP T:ERAS " T:GTIT I:ER15 I:ER14 T:TABD T:TABC T:RNOK I:RT1 T:CLDY T:WRDY T:EDIO l T:GETF 820910 T:GETFK I:ER14L T:TABC T:TABN T:GTIT 0 T:GRFC T:GTIP @ I:EVA0 I:EVA2 I:ER15 I
0x0b1a34…0b1bc8 Dummy {f00=0x0038, f01=0x0190, f02=»PIC T:LOPS I:EVA0 I:ECPY I:EVI 6T:DEDT # 820910 I:EVNON I:ESKI I:EVA0T I:EBRI I:EBRBR I:EBR I:ECWC@ I:EXIT I:EFLAD T:DNL T:TINPC T:TKI T:DSL T:TABCK & T:TABD * T:TABE . T:EDWI I:EVT I:EDSKL
0x0b1bc8…0b1d5c Dummy {f00=0x0038, f01=0x0190, f02=» I:ECPY I:EPIC I:ETXTL I:ETAB I:EBRI I:EBRB I:EBR I:EOR I:EXIT I:ECW I:EFLA~ T:PINP T:PKI I:EFIL I:ESKI T:DSL & T:GRFC T:DNL 4 T:WRDY I:ENL I:ESL I:ECTR I:ER16 T:ENINL T:EINP * 820910 T
0x0b1d5c…0b1ef0 Dummy {f00=0x0038, f01=0x0190, f02=»Y T:CLMI I:EVA0C T:CLDY l T:ENIN 0 820910 T:ENINK T:ENI T:LOFS I:EGTBC T:WRDY I:EVA0 I:EVA1 I:ECPY T:EVOU X I:EVI I:EVA3 I:EPIC `T:SETC 3 820910 T:SETCK T:GRFC T:EDWI T:RCTS
0x0b1ef0…0b2084 Dummy {f00=0x0038, f01=0x0190, f02=» I:FFSN T:ROK ( T:RCR * I:RT1 T:RCTS 6 T:RTES@ : T:RNOK < T:GRFC @ T:WRDYC H T:EDIOA T:CLDY l bT:LSEG 7 820910 T:LSEG T:CSEG I:ER1C I:RT1 T:LOFSK D T:LOPS P d lT:DC00 9 820910 T:FDS0C
0x0b2084…0b2218 Dummy {f00=0x0038, f01=0x0190, f02=»EXT T:IRN1 IRWRIT T:IRW1@ IINSY T:INS1 6T:ASS0 ; 820910 ASSIGNK T:ASSI 6T:IAS0 < 820910 IASSGNK T:IASS TT:DMR0 = 820910 T:FDS0 RREAD T:RRE1 RWRITE T:RWR1
0x0b2218…0b23ac Dummy {f00=0x0038, f01=0x0190, f02=»T:CLO0 @ 820910 T:SETT SETTIMK T:GETT GETTIM 4T:DEL0 A 820910 T:DELA DELAY 6T:GTI0 B 820910 T:GETI GETTIDK T:DC C 820910 T:DCREK T:FDSP T:DCR1 T:DCWR T:DCW
0x0b23ac…0b2540 Dummy {f00=0x0038, f01=0x0190, f02=»:ERR T:IO2 T:IRNE T:IRN1 " T:IRWR 8 T:IRW1 < T:STCW T:IO1 T:IINSL V T:INS1 Z I:EVA0 ZT:ASSI H 820910 T:ASSIK & T:CSEG T:FDSP I:EVA0 I:RT1 I:ERR ZT:IASS J 820910 T:IASSK T:CSEG T
0x0b2540…0b26d4 (0, 226) Dummy {f00=0x0038, f01=0x0190, f02=»DMR N 820910 T:RREAK T:FDSP T:RRE1 I:EVA0 T:STCW I:ERR T:IO2 T:RWRI : T:RWR1 > T:IO1 v >T:SWI P 820910 T:SWITK T:CSEG I:RT1 ^T:TEI Q 820910 T:TESTK T:FDSP I:RT1 T:ABOR
0x0b26d4…0b2868 Dummy {f00=0x0038, f01=0x0190, f02=» MASKY I:EVA0 I:RT1 I:ERR ( T:SCD T 820910 T:ACTVK P:BAS I:ERR4 I:NTPB T:CSEGN T:BAT T:RSTR P I:EVA0 T:PAUS t I:RT1 ZT:USE V 820910 T:USE I:EVA0 P:MTABA T:UERR B I:RT0 I:ERR
0x0b2868…0b29fc Dummy {f00=0x0038, f01=0x0190, f02=» PT:GTCW 820910 T:FDSP GETCW I:EVA0 T:GTCW I:RT1 FT:GTID ] 820910 T:GETIK I:EVA0 I:RT1 I:ERR . T:IO ^ 820910 T:KIY T:NKI T:WRITK I:EVA0 T:READ 2 I:ER13 T:DSC0 N
0x0b29fc…0b2b90 Dummy {f00=0x0038, f01=0x0190, f02=»T1 T:EDWR I:EDW T:EDWEC T:EDWF T:EDWIN I:ERR T:EDIO T:KIPR & I:EVA7 I:ERR5 T:FDS0 T:FDSP, T:GDSP P:MTABN I:EVTO I:FML I:ER1AV I:EVA2 I:ERR2 T:STCW t T:GTCW T:KIAA x T:KIAC@ z |
0x0b2b90…0b2d24 Dummy {f00=0x0038, f01=0x0190, f02=»T:ABUF k 820910 T:ABUFK PWRITEL l 820910 WRITELK T:FDS0 I:EVA0 T:IO2 I:ERR bI:NTP m 820910 I:MOV I:ADD I:SUB I:CMP I:MUL I:DIV I:EDT I:CPY I:INS I:DLT I:MCH I:XCP I:EDS I:TRC N
0x0b2d24…0b2eb8 Dummy {f00=0x0038, f01=0x0190, f02=»RB I:RT0 I:TRA0 I:ERR T:BAT T:PAT P:MTAB T:CAT I:EVB Q I:EVA s 820910 P:MTAB I:EVA2 I:EVA1 I:EVA3 $ I:EVA6 ( I:EVA5 . I:EVA7L 2 I:EVA0K T:LOFS T:LOPS I:ERR9L I:ERRA I:FML b I:EVTO x
0x0b2eb8…0b304c Dummy {f00=0x0038, f01=0x0190, f02=» I:CMP I:ERR1 I:CPA *I:CPA | 820910 I:CPA | >I:MOV } 820910 I:MOV I:MVC I:ERR8 tI:MUL 820910 I:MUL I:ERR2 I:ERR1L I:ERR9 I:MOV I:NTFA I:SUB I:ADD I:SH1L z
0x0b304c…0b31e0 Dummy {f00=0x0038, f01=0x0190, f02=»I:NTF 820910 I:NTFAK 8 I:EDT 820910 I:EVT B I:EGTDR I:EVA2U I:EVA5 I:EVB I:EGTB I:EVI I:EVA3 I:EVA0 I:EVNO I:EPICV I:ESKI I:EBRI: I:EBRB I:EBR I:EINH I:EKIH I:EDSK x I:EDT I:ED1
0x0b31e0…0b3374 (0, 227) Dummy {f00=0x0038, f01=0x0190, f02=»:ENL ( I:EOR > T:EDWF I:ECW H T:EDWE I:ECWC R I:EFIL` I:SCB h I:ERRD0 x I:EDTE 820910 I:EKIHK I:EINH I:ETAB I:EVIN I:EVA0 I:EVA1 I:EBRI F I:ERR2C I:EBR r I:EBRB v I:ESKI I:EVNOC I:E
0x0b3374…0b3508 Dummy {f00=0x0038, f01=0x0190, f02=» I:EVS1 I:MCH " I:INS ~ I:EVS2 I:ERR I:CPY I:XCP I:MVC N TI:EVS 820910 I:EVA0 I:EVS1K I:EVA2 I:EVS2 I:ERR I:TRA 820910 I:ECB I:BUF I:NTR ~ T:CSEGA P:BAS I:HEX I:HEXB I
0x0b3508…0b369c Dummy {f00=0x0038, f01=0x0190, f02=» I:ERR3 I:ERR4 I:ERR5 I:ERR6C I:ERR7 I:ERR8 I:ERR9 $ I:ERRA ( I:ERRB , I:ERRC 0 I:ERRDC 4 I:ERRE 8 I:ERRF < I:ER10 @ I:ER11, D I:ER12 H I:ER13 L I:ER14 P I:ER15 T I:ER16 X I:ER17 I:ER18@
0x0b369c…0b3830 Dummy {f00=0x0038, f01=0x0190, f02=»HEX 820910 I:HEXBK I:HEXW I:HEX " LI:CHK 820910 I:CHK P:BAS P:END TC:CHK I:ERR 8 TRACHK 820910 TC:CHKK T:CSEGN TT:HLT TT:TRP TT:TRST TT:LOP TT:VONL TT:VER TT:VMM TT:
0x0b3830…0b39c4 Dummy {f00=0x0038, f01=0x0190, f02=» TT:TONK TT:TRP TT:LOP @ TT:TRS B TT:VON TT:VER TT:VMM @ TT:HLTL TT:PRC TT:TID TT:SNO TT:MSG T:CLO 820910 T:SETTK I:EVA0 T:CSEG I:RT1 T:GETT I:ERR P TRABUG 8209
0x0b39c4…0b3b58 Dummy {f00=0x0038, f01=0x0190, f02=»LOPL TT:HLTC I:TRC TT:VER TT:VMM TT:VON RI:EPIC 820910 I:EPICK I:EVA0 I:ERRD I:SCB I:ERRE SYSLOD 820910 NUMSEG PRGLG1 SYSBAS SYSLOD SCTADA SCTPLD SCTANO SCTSFA bREL
0x0b3b58…0b3cec Dummy {f00=0x0038, f01=0x40c4, f02=» SAVE01 MMEND SCTLAP SCTMMP SCTNPE SCTMMC SCTEFA SCTLAC MMDDIV SAVE06 SAVE03 MOVE SAVE20 M:REL LDALEN CONVRT SCTSWB SAVE25 SAVE12 SYSBAS SYSLOD SCTADA SCTPLD SCTANO SCTSFA bREL
0x0b3cec…0b3e80 Dummy {f00=0x0038, f01=0x40ee, f02=» 4 F IDENT T:DMR0 T,REL=4.2,791116,870137140420 = RREAD RWRITE = < T:FDS0 = T RREAD = f T:RRE1 = x RWRITE = T:RWR1 = $ I = = @ = TACK POINTER P*
0x0b3e80…0b4014 (0, 228) Opaque[0x194]
0x0b4014…0b41a8 # DirEnt {nam=»NYLED «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0720, f03=0x0000}
0x0b4014…0b41a8 IdxSect {
0x0b4014…0b41a8 f00 = 0x0039 // 0xb4014 @0x0
0x0b4014…0b41a8 f01 = 0x0006 // 0xb4016 @0x2
0x0b4014…0b41a8 gno = [ // 0xb4018 @0x4
0x0b4014…0b41a8 [0x00]: C0x0039.0x0.0
0x0b4014…0b41a8 [0x01]: C0x0039.0x1.0
0x0b4014…0b41a8 [0x02]: C0x0039.0x2.0
0x0b4014…0b41a8 ]
0x0b4014…0b41a8 }
0x0b41a8…0b433c Dummy {f00=0x0039, f01=0x0190, f02=» : W w @ D P 9aW W F R _ W W W W V | D N N SC ~ R W W W W W( V /SP W V R Q UF W 0 V v R W W W W W W W2 V U Q , P P W R W W W W !!
0x0b433c…0b44d0 Dummy {f00=0x0039, f01=0x0190, f02=»W W W W W *W W W W . " & W N W 0 V v W t W v A A A A A A W V pW W _ _ W L N D j E l ^ W n A A A : 0 - ?? W j d j $ @ $ A (PN R
0x0b44d0…0b4664 Dummy {f00=0x0039, f01=0x0190, f02=» pW W W W B b_0 _ W W W W W W P , 8 N T N 9HV V W 2 W 2 W 2 : 8 ~ @W _H _ _P B P R $ !CC A j P ( V F P ) Y R _Z_ W Wh A W
0x0b4664…0b47f8 Dummy {f00=0x0039, f01=0x0190, f02=» @ P v @ PP @ A | - @ @ Q + @ @ A A @ /S SCP /A A x W @ P X W : R _ _ _ W V Z ' Y$ ' W 4 R _6W _:_< V f T R _V_X_ZW _^ V Zd ' Yj V
0x0b47f8…0b498c Dummy {f00=0x0039, f01=0x0190, f02=» t b " T " d @ P V W @ @ A D @ V A j V W V A R _8W._<W _@ V ZF ' YL V ZB W R
0x0b498c…0b4b20 Dummy {f00=0x0039, f01=0x0190, f02=» W h R _ W _ _ 0 V P$ < / V A B 8 V V Q f A | V V W W P W jW V W fW A | V W W ' W v | !$$PV !,,T W |_" 2 R _0_2_4W _8 V Z> ' YD W T R _R_T_VW _Z V
0x0b4b20…0b4cb4 (0, 229) Dummy {f00=0x0039, f01=0x0190, f02=» , V =a=A V V , V =a=A w W w V t V V % V % % % W t T R _ _ _ W _ V Z ' Y" V W ~ V V , V =a=A V V , V =a=A W V V P W
0x0b4cb4…0b4e48 Dummy {f00=0x0039, f01=0x0190, f02=» 0 B C " # ( B C # @ @ 8 A A A A A V | A @ Q @ R WVWTWRW WN V RH ' QB W W R W0W W,W W V R" ' Q W R W W W W W A 0 ) % B P Q0 $ !,, $ !FFT @ A
0x0b4e48…0b4fdc Dummy {f00=0x0039, f01=0x0190, f02=» j P ( + * ! T , z R WFWD_ WD F K @ Q V V R2 V U2 b W V V T f A W W W _d @ P @ P V V V V W b " ! T B C C A 0 % C ( A " ! T B C
0x0b4fdc…0b5170 Dummy {f00=0x0039, f01=0x0190, f02=» 2 C ( W ( V W A L C ( _ * * 2 L V 0 , 0!!DL LINE1(,LINE2)(,C) )!!IL LINE1(,C) )!!JN (LINE1,)FILE,LINE2(,LINE3)(,C)(,L) )!!AB )!!CH (LINE1,LINE2)/STRG1/STRG2/(,C)(,L) )!!RE LINE1/
0x0b5170…0b5304 Dummy {f00=0x0039, f01=0x0190, f02=») )REL DATE: 80-06-12 V | 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 p
0x0b5304…0b5498 Dummy {f00=0x0039, f01=0x0190, f02=» P P , 9 9 Y V | 9a9A $ $ 9 W | X| Y $ 9 V D p T A W V T A N ; R| @ Pv A A V j = # j 0 - C ( B - C - @ @ @ !
0x0b5498…0b562c Dummy {f00=0x0039, f01=0x0190, f02=»REP CHT @ P WR LSP , !// , - / - R , !// $ - -_ W 8 9 : B $ DLP ILP JNTD L Q: $ ! X !CCT W !LL $ !,, * $ ! 6 ) A : W W W j P ( V ) Y @
0x0b562c…0b57c0 Dummy {f00=0x0039, f01=0x0190, f02=»UUT PW " P T. @ Q( P ( V A $ )_ V ( v R WDWBW W A @ P P T @ P W V V v V ZDQ R FW _T " ! T: V A A V A @ " R
0x0b57c0…0b5954 (0, 230) Dummy {f00=0x0039, f01=0x0190, f02=» j * D EO S c _< @ T @ P V W A W V pWFWp_8_: V j A 4W V j P 0 R _r_tW W A _z b N ; : Z pW W W W B X _l Xp_2 # , T TYTF L A .
0x0b5954…0b5ae8 Dummy {f00=0x0039, f01=0x0190, f02=» B B B V 1 L: W W , PZ V , PD ( h ) V " V P I ) * ) R W W W , , V , ( h 00 ) J R W W W W ( <V # N < V #
0x0b5ae8…0b5c7c Dummy {f00=0x0039, f01=0x0190, f02=»W :!! * D EO S SYSTEM @ T @ P V W A W V W W _8_: V j A W DL LIL EN AB JN CH LS RE L COMMAND UNKNOWN ,TRY AGAIN " I/O ERR ON LAST RECORD,TRY AGAIN
0x0b5c7c…0b5e10 Dummy {f00=0x0039, f01=0x0190, f02=» AGAIN EOF SOURCE /SC,UPD TERMINATED /S CAN NOT BE ASSIGNED * AUX. INPUT CAN NOT BE ASSIGNED,TRY AGAIN STRING NOT FOUND 0000 LINES = +0000 IN /S IDENT STATEMENT UPDATED HIGHEST LINENO READ 0000 LINEPRINTER IS NOT ASSIGNED +0000 OF 0000 L
0x0b5e10…0b5fa4 Dummy {f00=0x0039, f01=0x0190, f02=»'!' $$ ERROR TABLE O'FLOW,TRY AGAIN EOF IN AUXI INPUT SOURCE /SC W A W V W W _8_: V j A W DL LIL EN AB JN CH LS RE L COMMAND UNKNOWN ,TRY AGAIN " I/O ERR ON LAST RECORD,TRY AGAIN
0x0b5fa4…0b6138 Dummy {f00=0x0039, f01=0x018e, f02=» LD A1,S:ANB2,A13 LAST LINE TO BE COPIED " P ST A1,S:NB1,A13 > P LDKL A6,JNP230 d 0 P ABL COPYLL COPY DA TO D4 . P RF *+2 EOF DETECTED PJNP230 EQU * <
0x0b6138…0b62cc Dummy {f00=0x0039, f01=0x0190, f02=» n > P ST A1,S:NB,A13 RESTORE LINE # OF MAIN INPUT B P AB.L ILP700 INSERT LINES UP TO NEXT COMMAND J P EJECT $ PSYNTCH EQU * HELP TO BRANCH PTS P ABL SYNTAX SYNTAX ERROR PTS P* B P* CHP
0x0b62cc…0b6460 Dummy {f00=0x0039, f01=0x0190, f02=»AT END OF THE WORK AREA) t P* USED AS FOLLOWS : P* B D P* RETURN TO A6+2 IF EOF ON /DA FILE L . P* 1WORD ENTRY LENGTH (2 STRINGS) * P* 1WORD LENGTH OF 1ST STRING P* N WORDS 1S
0x0b6460…0b65f4 (0, 231) Opaque[0x194]
0x0b65f4…0b6788 # DirEnt {nam=»NYL «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0738, f03=0x0000}
0x0b65f4…0b6788 IdxSect {
0x0b65f4…0b6788 f00 = 0x0039 // 0xb65f4 @0x0
0x0b65f4…0b6788 f01 = 0x0006 // 0xb65f6 @0x2
0x0b65f4…0b6788 gno = [ // 0xb65f8 @0x4
0x0b65f4…0b6788 [0x00]: C0x0039.0x3.0
0x0b65f4…0b6788 [0x01]: C0x003a.0x0.0
0x0b65f4…0b6788 [0x02]: C0x003a.0x1.0
0x0b65f4…0b6788 ]
0x0b65f4…0b6788 }
0x0b6788…0b691c Dummy {f00=0x0039, f01=0x0190, f02=» : W w @ D P 9aW W F R _ W W W W V | D N N SC ~ R W W W W W( V /SP W V R Q UF W 0 V v R W W W W W W W2 V U Q , P P W R W W W W !!
0x0b691c…0b6ab0 Dummy {f00=0x0039, f01=0x0190, f02=»W W W W W *W W W W . " & W N W 0 V v W t W v A A A A A A W V pW W _ _ W L N D j E l ^ W n A A A : 0 - ?? W j d j $ @ $ A (PN R
0x0b6ab0…0b6c44 Dummy {f00=0x0039, f01=0x0190, f02=» pW W W W B b_0 _ W W W W W W P , 8 N T N 9HV V W 2 W 2 W 2 : 8 ~ @W _H _ _P B P R $ !CC A j P ( V F P ) Y R _Z_ W Wh A W
0x0b6c44…0b6dd8 Dummy {f00=0x0039, f01=0x0190, f02=» @ P v @ PP @ A | - @ @ Q + @ @ A A @ /S SCP /A A x W @ P X W : R _ _ _ W V Z ' Y$ ' W 4 R _6W _:_< V f T R _V_X_ZW _^ V Zd ' Yj V
0x0b6dd8…0b6f6c Dummy {f00=0x0039, f01=0x0190, f02=» t b " T " d @ P V W @ @ A D @ V A j V W V A R _8W._<W _@ V ZF ' YL V ZB W R
0x0b6f6c…0b7100 Dummy {f00=0x0039, f01=0x0190, f02=» W h R _ W _ _ 0 V P$ < / V A B 8 V V Q f A | V V W W P W jW V W fW A | V W W ' W v | !$$PV !,,T W |_" 2 R _0_2_4W _8 V Z> ' YD W T R _R_T_VW _Z V
0x0b7100…0b7294 (0, 232) Dummy {f00=0x003a, f01=0x0190, f02=» , V =a=A V V , V =a=A w W w V t V V % V % % % W t T R _ _ _ W _ V Z ' Y" V W ~ V V , V =a=A V V , V =a=A W V V P W
0x0b7294…0b7428 Dummy {f00=0x003a, f01=0x0190, f02=» 0 B C " # ( B C # @ @ 8 A A A A A V | A @ Q @ R WVWTWRW WN V RH ' QB W W R W0W W,W W V R" ' Q W R W W W W W A 0 ) % B P Q0 $ !,, $ !FFT @ A
0x0b7428…0b75bc Dummy {f00=0x003a, f01=0x0190, f02=» j P ( + * ! T , z R WFWD_ WD F K @ Q V V R2 V U2 b W V V T f A W W W _d @ P @ P V V V V W b " ! T B C C A 0 % C ( A " ! T B C
0x0b75bc…0b7750 Dummy {f00=0x003a, f01=0x0190, f02=» 2 C ( W ( V W A L C ( _ * * 2 L V 0 , 0!!DL LINE1(,LINE2)(,C) )!!IL LINE1(,C) )!!JN (LINE1,)FILE,LINE2(,LINE3)(,C)(,L) )!!AB )!!CH (LINE1,LINE2)/STRG1/STRG2/(,C)(,L) )!!RE LINE1/
0x0b7750…0b78e4 Dummy {f00=0x003a, f01=0x0190, f02=») )REL DATE: 80-06-12 V | 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 p
0x0b78e4…0b7a78 Dummy {f00=0x003a, f01=0x0190, f02=» P P , 9 9 Y V | 9a9A $ $ 9 W | X| Y $ 9 V D p T A W V T A N ; R| @ Pv A A V j = # j 0 - C ( B - C - @ @ @ !
0x0b7a78…0b7c0c Dummy {f00=0x003a, f01=0x0190, f02=»REP CHT @ P WR LSP , !// , - / - R , !// $ - -_ W 8 9 : B $ DLP ILP JNTD L Q: $ ! X !CCT W !LL $ !,, * $ ! 6 ) A : W W W j P ( V ) Y @
0x0b7c0c…0b7da0 Dummy {f00=0x003a, f01=0x0190, f02=»UUT PW " P T. @ Q( P ( V A $ )_ V ( v R WDWBW W A @ P P T @ P W V V v V ZDQ R FW _T " ! T: V A A V A @ " R
0x0b7da0…0b7f34 (0, 233) Dummy {f00=0x003a, f01=0x0190, f02=» j * D EO S c _< @ T @ P V W A W V pWFWp_8_: V j A 4W V j P 0 R _r_tW W A _z b N ; : Z pW W W W B X _l Xp_2 # , T TYTF L A .
0x0b7f34…0b80c8 Dummy {f00=0x003a, f01=0x0190, f02=» B B B V 1 L: W W , PZ V , PD ( h ) V " V P I ) * ) R W W W , , V , ( h 00 ) J R W W W W ( <V # N < V #
0x0b80c8…0b825c Dummy {f00=0x003a, f01=0x0190, f02=»W :!! * D EO S SYSTEM @ T @ P V W A W V W W _8_: V j A W DL LIL EN AB JN CH LS RE L COMMAND UNKNOWN ,TRY AGAIN " I/O ERR ON LAST RECORD,TRY AGAIN
0x0b825c…0b83f0 Dummy {f00=0x003a, f01=0x0190, f02=» AGAIN EOF SOURCE /SC,UPD TERMINATED /S CAN NOT BE ASSIGNED * AUX. INPUT CAN NOT BE ASSIGNED,TRY AGAIN STRING NOT FOUND 0000 LINES = +0000 IN /S IDENT STATEMENT UPDATED HIGHEST LINENO READ 0000 LINEPRINTER IS NOT ASSIGNED +0000 OF 0000 L
0x0b83f0…0b8584 Dummy {f00=0x003a, f01=0x0190, f02=»'!' $$ ERROR TABLE O'FLOW,TRY AGAIN EOF IN AUXI INPUT SOURCE /SC W A W V W W _8_: V j A W DL LIL EN AB JN CH LS RE L COMMAND UNKNOWN ,TRY AGAIN " I/O ERR ON LAST RECORD,TRY AGAIN
0x0b8584…0b8718 Dummy {f00=0x003a, f01=0x018e, f02=» LD A1,S:ANB2,A13 LAST LINE TO BE COPIED " P ST A1,S:NB1,A13 > P LDKL A6,JNP230 d 0 P ABL COPYLL COPY DA TO D4 . P RF *+2 EOF DETECTED PJNP230 EQU * <
0x0b8718…0b88ac Dummy {f00=0x003a, f01=0x0190, f02=» n > P ST A1,S:NB,A13 RESTORE LINE # OF MAIN INPUT B P AB.L ILP700 INSERT LINES UP TO NEXT COMMAND J P EJECT $ PSYNTCH EQU * HELP TO BRANCH PTS P ABL SYNTAX SYNTAX ERROR PTS P* B P* CHP
0x0b88ac…0b8a40 Dummy {f00=0x003a, f01=0x0190, f02=»AT END OF THE WORK AREA) t P* USED AS FOLLOWS : P* B D P* RETURN TO A6+2 IF EOF ON /DA FILE L . P* 1WORD ENTRY LENGTH (2 STRINGS) * P* 1WORD LENGTH OF 1ST STRING P* N WORDS 1S
0x0b8a40…0b8bd4 (0, 234) Opaque[0x194]
0x0b8bd4…0b8d68 # DirEnt {nam=»GLLED «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0750, f03=0x0000}
0x0b8bd4…0b8d68 IdxSect {
0x0b8bd4…0b8d68 f00 = 0x003a // 0xb8bd4 @0x0
0x0b8bd4…0b8d68 f01 = 0x0004 // 0xb8bd6 @0x2
0x0b8bd4…0b8d68 gno = [ // 0xb8bd8 @0x4
0x0b8bd4…0b8d68 [0x00]: C0x003a.0x2.0
0x0b8bd4…0b8d68 [0x01]: C0x003a.0x3.0
0x0b8bd4…0b8d68 ]
0x0b8bd4…0b8d68 }
0x0b8d68…0b8efc Dummy {f00=0x003a, 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
0x0b8efc…0b9090 Dummy {f00=0x003a, 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
0x0b9090…0b9224 Dummy {f00=0x003a, f01=0x0190, f02=» R W*W(W W _j R FW _ 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
0x0b9224…0b93b8 Dummy {f00=0x003a, 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
0x0b93b8…0b954c Dummy {f00=0x003a, 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.
0x0b954c…0b96e0 Dummy {f00=0x003a, 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
0x0b96e0…0b9874 (0, 235) Dummy {f00=0x003a, 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 @ *
0x0b9874…0b9a08 Dummy {f00=0x003a, 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
0x0b9a08…0b9b9c Dummy {f00=0x003a, 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
0x0b9b9c…0b9d30 Dummy {f00=0x003a, 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
0x0b9d30…0b9ec4 Dummy {f00=0x003a, f01=0x0190, f02=»BI C:RDSC,A12 READ GRANTB INTO W:DBF2 I P* J 8 P* J B P* J L PPRD60 RF *+2 J V P RF *+2 J t P RF *+2 J P RF *+2 J B P ADKL A10,4 A10= CURRENT GRANULE ADD
0x0b9ec4…0ba058 Dummy {f00=0x003a, f01=0x0190, f02=»EADING J P* K P LDKL A1,PRDBU1 K & P ST A1,W:REC1+2,A13 K < P LDK A1,37 K f & P ST A1,W:REC1+4,A13 K P LDR A8,A13 K P ADKL A8,W:REC1 K P LDKL A4
0x0ba058…0ba1ec Dummy {f00=0x003a, f01=0x0190, f02=» P RF *+2 L P LDKL A4,PRD63 L " P LDKL A1,PRDBU3 L D & P ST A1,W:REC1+2,A13 L h P LDK A1,24 L & P ST A1,W:REC1+4,A13 L F P LDKL A5,-6 A5= SECTOR
0x0ba1ec…0ba380 Dummy {f00=0x003a, f01=0x0190, f02=» *+2 L P RF *+2 M P RF *+2 M 0 P RF *+2 M N P LDR A1,A13 M l P ADKL A1,W:DBF1 M & P ST A1,W:DEC1+2,A13 M @ P LDKL A6,-1 SET EOS FLAG
0x0ba380…0ba514 (0, 236) Opaque[0x194]
0x0ba514…0ba6a8 # DirEnt {nam=»DKLD «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0760, f03=0x0000}
0x0ba514…0ba6a8 IdxSect {
0x0ba514…0ba6a8 f00 = 0x003b // 0xba514 @0x0
0x0ba514…0ba6a8 f01 = 0x0002 // 0xba516 @0x2
0x0ba514…0ba6a8 gno = [ // 0xba518 @0x4
0x0ba514…0ba6a8 [0x00]: C0x003b.0x0.0
0x0ba514…0ba6a8 ]
0x0ba514…0ba6a8 }
0x0ba6a8…0ba83c Dummy {f00=0x003b, 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> @ `
0x0ba83c…0ba9d0 Dummy {f00=0x003b, 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
0x0ba9d0…0bab64 Dummy {f00=0x003b, 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
0x0bab64…0bacf8 Dummy {f00=0x003b, 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 : : < , = = $ -
0x0bacf8…0bae8c Dummy {f00=0x003b, 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
0x0bae8c…0bb020 Dummy {f00=0x003b, 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
0x0bb020…0bb1b4 (0, 237) Opaque[0x194]
0x0bb1b4…0bb348 # DirEnt {nam=»M:267 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0768, f03=0x0000}
0x0bb1b4…0bb348 IdxSect {
0x0bb1b4…0bb348 f00 = 0x003b // 0xbb1b4 @0x0
0x0bb1b4…0bb348 f01 = 0x0020 // 0xbb1b6 @0x2
0x0bb1b4…0bb348 gno = [ // 0xbb1b8 @0x4
0x0bb1b4…0bb348 [0x00]: C0x003b.0x1.0
0x0bb1b4…0bb348 [0x01]: C0x003b.0x2.0
0x0bb1b4…0bb348 [0x02]: C0x003b.0x3.0
0x0bb1b4…0bb348 [0x03]: C0x003c.0x0.0
0x0bb1b4…0bb348 [0x04]: C0x003c.0x1.0
0x0bb1b4…0bb348 [0x05]: C0x003c.0x2.0
0x0bb1b4…0bb348 [0x06]: C0x003c.0x3.0
0x0bb1b4…0bb348 [0x07]: C0x003d.0x0.0
0x0bb1b4…0bb348 [0x08]: C0x003d.0x1.0
0x0bb1b4…0bb348 [0x09]: C0x003d.0x2.0
0x0bb1b4…0bb348 [0x0a]: C0x003d.0x3.0
0x0bb1b4…0bb348 [0x0b]: C0x003e.0x0.0
0x0bb1b4…0bb348 [0x0c]: C0x003e.0x1.0
0x0bb1b4…0bb348 [0x0d]: C0x003e.0x2.0
0x0bb1b4…0bb348 [0x0e]: C0x003e.0x3.0
0x0bb1b4…0bb348 [0x0f]: C0x003f.0x0.0
0x0bb1b4…0bb348 ]
0x0bb1b4…0bb348 }
0x0bb348…0bb4dc Dummy {f00=0x003b, f01=0x0190, f02=» V ~ . - - ( 6 c @ Tg t z ^ b bLPL H b2 Z ` z
0x0bb4dc…0bb670 Dummy {f00=0x003b, f01=0x0190, f02=» 4c @S{ D d 2Z $"z y B % y D Dbf d * F :P }B W [~ ? d j% L "~ T &b ICn 1 d _ A " f _ @f > > U # T @ , H ( ( P c P W~ T P> , T6 L f M 0 - Af Q @ P A 0
0x0bb670…0bb804 Dummy {f00=0x003b, f01=0x0190, f02=» A x 6 A 4Q _0 A 4 < Q . P . Q . Z Y _ z 8 f Q Z P 0 9 _ h _, ? P H H #P A A Q ? @f ~ ) Af _ A l Af _ ? ? ? ? ? ^ A _ _ ^ f $P T
0x0bb804…0bb998 Dummy {f00=0x003b, f01=0x0190, f02=»T - 1_( U T P 0 U _t ? @f T 0 Af 1 Q Q > > 0 @f 1 Af P P > ? * X " R" Y T ? X D NdT> b W8 > _& @ 8 R" Y T ? X D NdT b W > _& W2 > 8 X W( ? ` @ @ P $ H W W > > > > > > @
0x0bb998…0bbb2c Dummy {f00=0x003b, f01=0x0190, f02=»#M 1 F $ ( , 0 4 8 < C 8W T 8P Y ^ 5 ) P U g XH D #DP @ R XV Y @ P, NdT W X &P T X
0x0bbb2c…0bbcc0 Dummy {f00=0x003b, f01=0x0190, f02=» T # P W Y P R R P P (@ (@ " 2 X $? P $ > > F C F C > B R Q F ! P C > C > F :c" H :b"? #" : C > B R Q~ P0 B P*
0x0bbcc0…0bbe54 (0, 238) Dummy {f00=0x003b, f01=0x0190, f02=» X 9BV X & j g X B D C > X H UJ H B P PL $ # Q > P _0 # T p > P p (_H _2 B U X > ? _ X T (@ ^ > > ? _ X T X X T
0x0bbe54…0bbfe8 Dummy {f00=0x003b, f01=0x0190, f02=» U f 6 Y _| ?(@ X P& T D #DP 0P X T 4 Y X Nd X T X c* 1 1 X P - M T $ PD _ T " # p X L R P P (@ ^ X P8 P0 # P T P 0P 1 _
0x0bbfe8…0bc17c Dummy {f00=0x003b, f01=0x0190, f02=» X 9BV X & X B D C > X H U H B P P $ # Q > P _0 # T p > P p (_H _2 B U X > ? _ X T (@ ^ > > ? _ X T X X T
0x0bc17c…0bc310 Dummy {f00=0x003b, f01=0x0190, f02=» $ 0 $V D M v A ( @f f X H Af ) @ H P 1 % E I L U M M (@ D >a @ <a H D b C 9b;BT C 0 @ # W( C UH R C W C R
0x0bc310…0bc4a4 Dummy {f00=0x003b, f01=0x0190, f02=» Q '_D W Z 0 f J B B ? A J ;h # <c$ " P PR 4 5 T P ? X U X ( > PZ PF P P 0 X T Y Wn U U T X^ T E g Y Tx 8RtWP 4 U P> $P4> R0> 8' T Y
0x0bc4a4…0bc638 Dummy {f00=0x003b, f01=0x0190, f02=» ? $P$ D P P0 P P _ E W Q Y W 8 " E 4 % E Y > >B @ P A ( " P> P: ( Y Y Y Y X Y X X X X ' 4 B U B (" W C (@ > Y Y Y X 9BV$ X & Y " X
0x0bc638…0bc7cc Dummy {f00=0x003b, f01=0x0190, f02=» R C C j g ?A @f A. X V 9_: J @ R P P P 0 X T Y W U U T X^ T E Y T 8R W 4 U P $P > R > 8' T Y
0x0bc7cc…0bc960 Dummy {f00=0x003b, f01=0x0190, f02=» ? $P$ D P P0 P P _ E W Q Y W 8 " E 4 % E Y > >B @ P A ( " P> P: ( Y Y Y Y X Y PR " 0 P B :b9B Y D ) Y F X Y >:g H $
0x0bc960…0bcaf4 (0, 239) Dummy {f00=0x003b, f01=0x0190, f02=»UH ! ! N! P WF X @ @ ! @ ! & ! f! P W* P& ! ! ! P W ! ! ! P l X FP _ X D ( ^ W b X @X$_ W P W B " 0 Y , Y . 4 X @:C* WB W> X " " :BW0 X " :BW& X @ X FP _ X D % ^ W c X :B X ! E
0x0bcaf4…0bcc88 Dummy {f00=0x003b, f01=0x0190, f02=»P X> X4 0P -_z L , _ A _v A ? I F 9AZf9a X <V # T X X X '? 4 T B C X P X " I $ j g Y < Y ! J Td ! Y @ ! ! TR 0 X P " Y , (P ) P @ T X Q $ X X T Y _l
0x0bcc88…0bce1c Dummy {f00=0x003b, f01=0x0190, f02=» 1 WP B B PD P g V - 0 P A # +T W Q P P 1 ! T V C B Q 1 j g Y @ r t B X _ ? T X Z&W A ?I T X ' { B C X 4 v x c X E
0x0bce1c…0bcfb0 Dummy {f00=0x003b, f01=0x0190, f02=»P X> X4 0P -_z , _ A _v A 0 X ! Y * X . ! Y T & B " 0 T V2 R, Y | :b9B Y v Y x ) !T C Y z d PX P( PP P< P@ 6 2 p + g ! * X , X P ! T ! Wb !
0x0bcfb0…0bd144 Dummy {f00=0x003b, f01=0x0190, f02=»T Y *W X * ! # J & ! ! " 0 TOT 0 SST X Y ,W 0 X Y , Y * J ! ! X *' P ! : ! & D J ) P _ X " X ! Tr X !& Ph B :C P J ! 9DV ! (@ B n ! 4 ! v N ! 4 f ! 4 ! v ^ ! 4 (
0x0bd144…0bd2d8 Dummy {f00=0x003b, f01=0x0190, f02=» ;h 1 ! 1 ! < ! * ! ! ( ! ) ! Y *# T X Y ._ Y *# 4 ! g ( C V ! J ! B B ! : f ! &W0 W ! X@ ^ ! & C (Q ! ! T* ! ! ! T )WL WP ! Xz N ! & ( - f ! & ) W. Y LW Y L Y H Y J Y B S W W
0x0bd2d8…0bd46c Dummy {f00=0x003b, f01=0x0190, f02=» T X Y $ Y X (P y (_ ( L _ Y ( " X . P Y : ! ! X # P Y .:A , X $ Y Y $ Y X Y & X '? 0 A ? (@ X H X J K P6 X LT $ D C Y B g K & E % Y B K X ;AR@;a X &P Y &
0x0bd46c…0bd600 Dummy {f00=0x003b, f01=0x0190, f02=» U _ T,: B R(' P Q 9BW Q 9C B ! T 4 P ;A _ 4 X 0 # P _ 4(@ R J DK* 1_ W (@ R 0 DL* ] J_ J ! < 4 ! ;E :B 9A ! U P jW kQ 4 Y * ! < 0" Z Y" P Z _
0x0bd600…0bd794 (0, 240) Dummy {f00=0x003c, f01=0x0190, f02=» T X Y Y X P y _ _ Y " X P Y : ! ! X # P Y :A , X Y Y , !H !T
0x0bd794…0bd928 Dummy {f00=0x003c, f01=0x0190, f02=» U _ T : B R ' P Q 9BW Q 9C B ! T 4 P ;A _ 4 X # P _ 4(@ R D 1_ W (@ R 0 D ] _ ! 4 ! ;E :B 9A ! U P jW kQ 4 Y ! 0" Z Y" P Z _
0x0bd928…0bdabc Dummy {f00=0x003c, f01=0x0190, f02=» T X Y Y X # &./ # &./ Y " X P Y : ! ! P8 P P +P4 P: $ $ W P P 5P g % g X P W B Y "W B " P HK*:H B # LK* Y @& P P $_ L $$ _R _$ X 9 B Y B Y /PP8 @J
0x0bdabc…0bdc50 Dummy {f00=0x003c, f01=0x0190, f02=»_ $ _ B ! P Y _R X ! X % _ B Y _l g X P A% L % Y Wb Y @_ X X A%& L %. Y _& Y % @& 0 A& A& _: X P ( y Y W / (P 0 ) > # (P _ ) 1_ # (X( P _ 0 )_6 X " X> XB & _> & _0
0x0bdc50…0bdde4 Dummy {f00=0x003c, f01=0x0190, f02=» P y Y X P T % @& T A& A& > A&z A&~ A& A& A& & W > +P W BHBB # !- 2B !. T P P ( )P ) !. Tf Tb A/QP A/PTR !. TL !. TD T@ !. T8 !. A I A& P
0x0bdde4…0bdf78 Dummy {f00=0x003c, f01=0x0190, f02=» !+ & @& P @/ P @& ' 8 !* !* A& _: !. X6_Z A& @/ @& T 1 R 0 2P P P A& %^ @& 8 HL* @/ P E /PPf X R` X P X TR P C %J C P " HL* X "# P " P X * Y X T !% W W( jW" X R X T j !% % !+
0x0bdf78…0be10c Dummy {f00=0x003c, f01=0x0190, f02=» &^ L )0 g &x @& @& *J @& @& A& * !. @& XV !. T @& P !+ !. _p /T, @& X @& P @& T0 !* !+ A& _ A& * B A& @& T _2 _6 @& % A& A& X ! XD Y _N @& TL X ! P !+ & # T @/ T !+ _ !* !+ _ A& A& HL* E A& A
0x0be10c…0be2a0 Dummy {f00=0x003c, f01=0x0190, f02=»& A& A& A& !, !. A& _^ @& !. X ! X Zp X Xp Xt_~ @& P6 X R0 X P T$ T Y W & %J P C j % A& A& 4 @/ @& T @& A& @& A& A& !. T2 P4 PJ PL P P. 1 A& @& ]6W P _@ @/ @& E !/,P
0x0be2a0…0be434 (0, 241) Dummy {f00=0x003c, f01=0x0190, f02=» 4 !-v !- @& @& A& @& T( @/Q !. 8 !. @& P - !. x !J W 0 " @& PL R ~T }T T0 W, !. P " ! " :A *@ HK* T 0 !. W R !. A& @& @& UH Zx Q P Q T 0 !. A& 0 !. A& !. " !- " !- + A&
0x0be434…0be5c8 Dummy {f00=0x003c, f01=0x0190, f02=»- 4 A ? &xJ T A& T 2PX !. HK* 4 !- & A ? &x_ I " P A& # & A#Z % 4 A _$" P HL*B P W !. &^ g _ !. ! 1 4 A. @J `J @J P 0 M A. 4 ? @J `J @J P $ Y % _ @ A#V % @#^T . & # @ A#V % .
0x0be5c8…0be75c Dummy {f00=0x003c, f01=0x0190, f02=»/* ?a :a# P @/& @/( @/* 4 ! A& !. /( !. A& @/(:H 4 #d /t / 8 ! " :A *@ H T 0 ! W R ! A& @& @& U Zx Q P Q T 0 ! A& 0 ! A& ! " ! " ! + A&
0x0be75c…0be8f0 Dummy {f00=0x003c, f01=0x0190, f02=» 4 A ? &xJ T A& T 2P ! H 4 ! & A ? &x_ I " P A& # & A#Z % 4 A _$" P H B P W ! &^ _ !. ! 1 4 A. @ ` @ P 0 M A. 4 ? @ ` @ P $ Y % _ @ A#V % @#^T & # @ A#V %
0x0be8f0…0bea84 Dummy {f00=0x003c, f01=0x0190, f02=» ?a :a# P @ @ @ 4 ! A& !. /( !. A& @/(:H 4 #d / 8 ! " :A *@ H T 0 ! W R ! A& @& @& U Zx Q P Q T 0 ! A& 0 ! A& ! " ! " ! + A&
0x0bea84…0bec18 Dummy {f00=0x003c, f01=0x0190, f02=» 4 A ? &xJ T A& T 2P ! H 4 ! & A ? &x_ I " P A& # & A#Z % 4 A _$" P H B P W ! &^ _ !. ! 1 4 A. @ ` @ P 0 M A. 4 ? @ ` @ P $ Y % _ @ A#V % @#^T & # @ A#V %
0x0bec18…0bedac Dummy {f00=0x003c, f01=0x0190, f02=» ?a :a# P @ @ @ 4 ! A& !. /( !. A& @/(:H 4 #d / 8 ! " :A *@ H T 0 ! W R ! A& @& @& U Zx Q P Q T 0 ! A& 0 ! A& ! " ! " ! + A&
0x0bedac…0bef40 Dummy {f00=0x003c, f01=0x0190, f02=» 4 A ? &xJ T A& T 2P ! H 4 ! & A ? &x_ I " P A& # & A#Z % 4 A _$" P H B P W ! &^ _ !. ! 1 4 A. @ ` @ P 0 M A. 4 ? @ ` @ P $ Y % _ @ A#V % @#^T & # @ A#V %
0x0bef40…0bf0d4 (0, 242) Dummy {f00=0x003c, f01=0x0190, f02=» ?a :a# P @ @ @ 4 ! A& !. /( !. A& @/(:H 4 #d / 8 ! " :A *@ H T 0 ! W R ! A& @& & U Zx Q P Q T 0 ! A& 0 ! A& ! " ! " ! + A&
0x0bf0d4…0bf268 Dummy {f00=0x003c, f01=0x0190, f02=» 4 A ? &xJ T A& T 2P ! H 4 ! & A ? &x_ I " P A& # & A#Z % 4 A _$" P H B P W ! &^ _ !. ! 1 4 A. @ ` @ P 0 M A. 4 ? @ ` @ P $ Y % _ @ A#V % @#^T & # @ A#V %
0x0bf268…0bf3fc Dummy {f00=0x003c, f01=0x0190, f02=» ?a :a# P @ @ @ 4 ! A& !. /( !. A& @/(:H 4 #d / 8 ! " :A *@ H T 0 ! W R ! A& @& & U Zx Q P Q T 0 ! A& 0 ! A& ! " ! " ! + A&
0x0bf3fc…0bf590 Dummy {f00=0x003c, f01=0x0190, f02=» 4 A ? &xJ T A& T 2P ! H 4 ! & A ? &x_ I " P A& # & A#Z % 4 A _$" P H B P W ! &^ _ !. ! 1 4 A. @ ` @ P 0 M A. 4 ? @ ` @ P $ Y % _ @ A#V % @#^T & # @ A#V %
0x0bf590…0bf724 Dummy {f00=0x003c, f01=0x0190, f02=» ?a :a# P @ @ @ 4 ! A& !. /( !. A& @/(:H 4 #d / 8 ! " :A *@ H T 0 ! W R ! A& @& & U Zx Q P Q T 0 ! A& 0 ! A& ! " ! " ! + A&
0x0bf724…0bf8b8 Dummy {f00=0x003c, f01=0x0190, f02=» 4 A ? &xJ T A& T 2P ! H 4 ! & A ? &x_ I " P A& # & A#Z % 4 A _$" P H B P W ! &^ _ !. ! 1 4 A. @ ` @ P 0 M A. 4 ? @ ` @ P $ Y % _ @ A#V % @#^T & # @ A#V %
0x0bf8b8…0bfa4c Dummy {f00=0x003c, f01=0x0190, f02=» ?a :a# P @ @ @ 4 ! A& !. /( !. A& @/(:H 4 #d / 8 ! " :A *@ H T 0 ! W R ! A& @& & U Zx Q P Q T 0 ! A& 0 ! A& ! " ! " ! + A&
0x0bfa4c…0bfbe0 Dummy {f00=0x003c, f01=0x0190, f02=» 4 A ? &xJ T A& T 2P ! H 4 ! & A ? &x_ I " P A& # & A#Z % 4 A _$" P H B P W ! &^ _ !. ! 1 4 A. @ ` @ P 0 M A. 4 ? @ ` @ P $ Y % _ @ A#V % @#^T & # @ A#V %
0x0bfbe0…0bfd74 (0, 243) Dummy {f00=0x003c, f01=0x0190, f02=» ?a :a# P @ @ @ 4 ! A& !. /( !. A& @/(:H 4 #d / 8 ! " :A *@ H T 0 ! W R ! A& @& & U Zx Q P Q T 0 ! A& 0 ! A& ! " ! " ! + A&
0x0bfd74…0bff08 Dummy {f00=0x003c, f01=0x0190, f02=» 4 A ? &xJ T A& T 2P ! H 4 ! & A ? &x_ I " P A& # & A#Z % 4 A _$" P H B P W ! &^ _ !. ! 1 4 A. @ ` @ P 0 M A. 4 ? @ ` @ P $ Y % _ @ A#V % @#^T & # @ A#V %
0x0bff08…0c009c Dummy {f00=0x003c, f01=0x0190, f02=» ?a :a# P @ @ @ 4 ! A& !. /( !. A& @/(:H 4 #d / 8 ! " :A *@ H T 0 ! W R ! A& @& & U Zx Q P Q T 0 ! A& 0 ! A& ! " ! " ! + A&
0x0c009c…0c0230 Dummy {f00=0x003c, f01=0x0190, f02=» 4 A ? &xJ T A& T 2P ! H 4 ! & A ? &x_ I " P A& # & A#Z % 4 A _$" P H B P W ! &^ _ !. ! 1 4 A. @ ` @ P 0 M A. 4 ? @ ` @ P $ Y % _ @ A#V % @#^T & # @ A#V %
0x0c0230…0c03c4 Dummy {f00=0x003c, f01=0x0190, f02=» ?a :a# P @ @ @ 4 ! A& !. /( !. A& @/(:H 4 #d / 8 ! " :A *@ H T 0 ! W R ! A& @& & U Zx Q P Q T 0 ! A& 0 ! A& ! " ! " ! + A&
0x0c03c4…0c0558 Dummy {f00=0x003c, f01=0x0190, f02=» { ABCDEFGHI#.<(+!&JKLMNOPQR$]*);^-/STUVWXYZ@,%_>? 123456789:[ '=" abcdefghi[.<(+!&jklmnopqr]$*);^-/stuvwxyz|,%_>?0123456789:#@'=" ABCDE
0x0c0558…0c06ec Dummy {f00=0x003c, f01=0x0190, f02=» z^L~noj {|[_m TOSS T L L L g @ L L L _ _< ? ^ 4 _ @ z 1 A z _ P 9 > > R @ U 9C @ T M D _
0x0c06ec…0c0880 Dummy {f00=0x003c, f01=0x0190, f02=» g g g g L h M< v N N PxPxPxPxPxP P O O O OdO4PxPxO8P P O O"" # $ % "$&( Nf N @ D X P _ L !##P T @ R $P U + U _ (@(@ IN.P ^ Px HNH Y HN B # X ( U
0x0c0880…0c0a14 (0, 244) Dummy {f00=0x003d, f01=0x0190, f02=» W < C C _H d H H S W C C B B B U cv R Wp H TP L P B r L ( e $ X _ X ` T I T J b P C X I X J S W C C W, B B Y IR Q X JU C '? T W6 dT T.(@(@ P
0x0c0a14…0c0ba8 Dummy {f00=0x003d, f01=0x0190, f02=» - _ " P $ - : R $ - _ : Z $ -_ D ( U ( 0 W T ` U @ , @ W : X & X P !##T Y T( X P P P @f Q (@ F f6 : @ ,_ f ( H > Q X &Pj D ^V" D "? P P &P E ^ e(
0x0c0ba8…0c0d3c Dummy {f00=0x003d, f01=0x0190, f02=» T AP J , b P W T Y $ P T _ Y & F & .(@ _ TV X & X I U X J U ( d T$ X X RP F P T U P ` U0 @ , D !##X D ( * ]" 0 X Wf ` U @ H @ X
0x0c0d3c…0c0ed0 Dummy {f00=0x003d, f01=0x0190, f02=» P (@ B & P 9 . U 4' S ' S 5 S 4 ZZ W , P& ,' X X 1 Z" ) S _ (@ C A S ( B ! U S @P F U G F G Q4 U & ( F " F +P P* X $ T cv U W cv R P> $
0x0c0ed0…0c1064 Dummy {f00=0x003d, f01=0x0190, f02=» Q d T Y ^ F " F D '? P P( $ P" d I I K K P P & P c W D $ T cv T c W E I E J X ^V ? T B & j(@( r B B P ! Tn M YN : U A A " P < ""
0x0c1064…0c11f8 Dummy {f00=0x003d, f01=0x0190, f02=» C l @ n A nQ< @ > X A > @ YN B & D @ E BX #D( V ( B & B @ > D @ W C C ( U U l < @ T A p 0" X X U _ L !SSP !LL X W L @ H A HV YN P E J
0x0c11f8…0c138c Dummy {f00=0x003d, f01=0x0190, f02=» YN j r P %_ S Nd S E 3 P S I P S J P S ( P S * P % S H P & S P @ p S , d S B | WP V @ HT W jT Wz @ P R ( >a U Wb 0 =b P JP @ H ! T. W< P L D @ Y P Z Y P
0x0c138c…0c1520 Dummy {f00=0x003d, f01=0x0190, f02=»b Ib (@ @ jP -W P B & . (@( @ Y _ T ` < ` 9A S ^ H $X D S . S $ ep R * S W S _ S ` R ( R * b S b Yt U _ L !SSP !LL W L @ A V P E
0x0c1520…0c16b4 (0, 245) Dummy {f00=0x003d, f01=0x0190, f02=» P %_ S Nd S E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | WP V @ T W T W @ P R ( >a U W 0 =b P P @ ! T W P D Y P Y P
0x0c16b4…0c1848 Dummy {f00=0x003d, f01=0x0190, f02=» I (@ @ P -W P B (@( @ Y _ T ` ` 9A S ^ H $X D S . S $ R * S W S _ S ` R ( R * S b Yt U _ L !SSP !LL W L @ A V P E
0x0c1848…0c19dc Dummy {f00=0x003d, f01=0x0190, f02=» P %_ S Nd S E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | WP V @ T W T W @ P R ( >a U W 0 =b P P @ ! T W P D Y P Y P
0x0c19dc…0c1b70 Dummy {f00=0x003d, f01=0x0190, f02=» I (@ @ P -W P B (@( @ Y _ T ` ` 9A S ^ H $X D S . S $ R * S W S _ S ` R ( R * S b Yt U _ L !SSP !LL W L @ A V P E
0x0c1b70…0c1d04 Dummy {f00=0x003d, f01=0x0190, f02=» P %_ S Nd S E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | WP V @ T W T W @ P R ( >a U W 0 =b P P @ ! T W P D Y P Y P
0x0c1d04…0c1e98 Dummy {f00=0x003d, f01=0x0190, f02=» I (@ @ P -W b P Q R ;A [ [ : P Q R ;A [ [ : Q R P ;A [ [ : ? ? !? P P !> P W 9P _ d T !##P> ? R4 L TX P L P 4 M X M M _8
0x0c1e98…0c202c Dummy {f00=0x003d, f01=0x0190, f02=» R D + Q ( 0 5 @f 1 Af Z> : D NW (P D + I W6 @_ T ( A_ U 1_ D + I D N ) E N : T * b SP P W X * 0 U U. _ Y . R P Y $ P X ( _ W Y & : B P6 T G W& X ^
0x0c202c…0c21c0 Dummy {f00=0x003d, f01=0x0190, f02=» C X %? : X &_ 0 D . P , _ D . D $ D * b T ( T & ^ S W : U ; $ T $ T $ T&x : : $ T2 $ ) ] $ ) Y _$ U x 0 )_8 $_ $ ) YP_J U ; $ T $ T $ TNp : : $ T* (W $
0x0c21c0…0c2354 (0, 246) Dummy {f00=0x003d, f01=0x0190, f02=» V 6 v h~k|n q q > > @f t Af W j ^ ! Z( f (X0 @f P T M ]@ , ) L P $R _, Af P* P Y U ( ) 5 & > > [ [ f Z PJ D 0P P - I 1 P Z $ " @ @ - P _ Z 9B @ U W Z Z Z
0x0c2354…0c24e8 Dummy {f00=0x003d, f01=0x0190, f02=» G Y6 G _b P ,P - _ ( ( h j h ? X V Y g ! W@ Y U -P -P R j X , ) Y . j X P Y C i 8!@P$ X $P y $W $ L k. ` Y $ B P T B % X . $ 4 T % W X ,T ! P W
0x0c24e8…0c267c Dummy {f00=0x003d, f01=0x0190, f02=»P Y (P T k> ! B Z W k>W !j * T ! X $P y $ Y $ C ! g 0 Z k> ! B Z ZX X . 0T X W X ,P Y . 0 %_. % Y . _t _ P k> _ ?" 8 T ! )_ W ! T "? 9 0 R Q > 4 >_ <k$ Y T #? 0R
0x0c267c…0c2810 Dummy {f00=0x003d, f01=0x0190, f02=»Z @_8 B 1 " W XT 0 (@ > d k m n !"&';<>@^_ 9: X ! Y Mk P ^ g Y Lk k k l l k k l l ! ! ! W B W$ B L # 9Q T W Q P X & V T Y &W kd X ! T6 B R0Q$ B D !
0x0c2810…0c29a4 Dummy {f00=0x003d, f01=0x0190, f02=» g !n kn Y _ ! !nf Y &P Q W ! Y '" n _" kh_< !nZ_n !n _t B B , ! T _ D ! P ! P W C V B P ! ! ! Y 4 RNQ " PH _ " P R: M T2 ! L ,! :D" !nN Y Y U ! _$ W4 , !
0x0c29a4…0c2b38 Dummy {f00=0x003d, f01=0x0190, f02=» Y ' ! X T ! g k g R _ 4 ! ! ! " T ! ! ! ! 4 X ' 4 Y ' kr ! ! " P ,$ , ! 4 n p6p pR PB P8 g B P B L # +P ! ! T ! Y & ! W ! ! W ! Y Y
0x0c2b38…0c2ccc Dummy {f00=0x003d, f01=0x0190, f02=» & X ]r ! Y Y Y _ " _ ! ! o j g X C _ X Y & Y > B B U$ $ ! T _ U D ! T _ C > X Z^<BR P j X _x R0 V0 ! P* P P P" R ?Q ! Y R Q o 6 -_ ? _ X # !
0x0c2ccc…0c2e60 Dummy {f00=0x003d, f01=0x0190, f02=» $ # ;D 7P P g Y W Y X Y 8# T W$ T( X $ P X P B V *@ Y ( g g ? X _F q v t u u t ! 8! P ! P P s & s g B P B H " +P P. T Y ' ! R X ( Y &R Y & _ Y &_.
0x0c2e60…0c2ff4 (0, 247) Dummy {f00=0x003d, f01=0x0190, f02=»X`" Eq P( 8'0P Eq TJ ! T 9 _ ! T @_ ! B P 8' T( !v B C t~ ^T PR RF ?] _ X X &" X )# C V C ! Y B ! Y _` C _ " $ P X ' X ] ! t r B 8! T !v
0x0c2ff4…0c3188 Dummy {f00=0x003d, f01=0x0190, f02=» W Y &_ Y & B Y )U X ) T T W V X ' Y )U P"R ! _ R _ ! Y ' r " ! 8!0T 8 !@P ! $ P ! ! t ! T Y & T X & C j g X Y & Y > X " X &" Y )Q Y > X Z2<BR J ? Y
0x0c3188…0c331c Dummy {f00=0x003d, f01=0x0190, f02=» r R V P P" ! t W t 6 X $ X !u _ X $ X 8! P !u _( X & !v !v Y _D X " X &" Y )U W ! ! ! Y 4 B r2 U )X R@ X X &" Y * X ) V Y !v X $ X & !v X * r r2
0x0c331c…0c34b0 Dummy {f00=0x003d, f01=0x0190, f02=» P Y &_ Y & B Y )U X ) T T W V X ' Y )U P R ! _ R _ ! Y ' r " ! 8!0T 8 !@P ! $ P ! ! ! T Y & T X & C j g X Y & Y > X " X &" Y )Q Y > X Z2<BR J ? Y
0x0c34b0…0c3644 Dummy {f00=0x003d, f01=0x0190, f02=» r R V P P" ! t W t 6 X $ X !u _ X $ X 8! P !u _( X & !v !v Y _D X " X &" Y )U W ! ! ! Y 4 B r2 U )X R@ X X &" Y * X ) V Y !v X $ X & !v X * r r2
0x0c3644…0c37d8 Dummy {f00=0x003d, f01=0x0190, f02=» Y &_ Y & B Y )U X ) T T W V X ' Y )U P R ! _ R _ ! Y ' r " ! 8!0T 8 !@P ! $ P ! ! ! T Y & T X & C j g X Y & Y > X " X &" Y )Q Y > X Z2<BR J ? Y
0x0c37d8…0c396c Dummy {f00=0x003d, f01=0x0190, f02=» r R V P P" ! t W t 6 X $ X !u _ X $ X 8! P !u _( X & !v !v Y _D X " X &" Y )U W ! ! ! Y 4 B r2 U )X R@ X X &" Y * X ) V Y !v X $ X & !v X * r r2
0x0c396c…0c3b00 Dummy {f00=0x003d, f01=0x0190, f02=» Y &_ Y & B Y )U X ) T T W V X ' Y )U P R ! _ R _ ! Y ' r " ! 8!0T 8 !@P ! $ P ! ! ! T Y & T X & C j g X Y & Y > X " X &" Y )Q Y > X Z2<BR J ? Y
0x0c3b00…0c3c94 (0, 248) Dummy {f00=0x003e, f01=0x0190, f02=» r R V P P" ! t W t 6 X $ X !u _ X $ X 8! P !u _( X & !v !v Y _D X " X &" Y )U W ! ! ! Y 4 B r2 U )X R@ X X &" Y * X ) V Y !v X $ X & !v X * r r2
0x0c3c94…0c3e28 Dummy {f00=0x003e, f01=0x0190, f02=» Y &_ Y & B Y )U X ) T T W V P P P .T B Y Wx B @ P X P ( ( 7 R ( P H RN H P ' P v P W< v T6 R' P ! j B # P G W G j g X P P R: A L > Y X T Q
0x0c3e28…0c3fbc Dummy {f00=0x003e, f01=0x0190, f02=» i V 9 @_ z H v P v P $ $ 1 ) > ) $P e % > (@ B Z F U F Z v P U g C G 4' "?:B ] @ P H U _ U @ U 9C @ $$ T %_< %_B "RT PL X TF X R@? V X & X H P
0x0c3fbc…0c4150 Dummy {f00=0x003e, f01=0x0190, f02=» >_2 < U = 2 (@ " $ P B >H<h $ P ?_" = > = > = =_D R _ 00 > & <h$ P > P R A L Y X T @ 8P
0x0c4150…0c42e4 Dummy {f00=0x003e, f01=0x0190, f02=» B P T W ' T| I @ @ 8 =hP Y X Pl 0T< Y H @! R W 9a I @ T T 9a H A E ^ W P ,! T T ( T : "' # @ 6P 8 $ ) 5 g A 6 A A : " e < A H "" P U W
0x0c42e4…0c4478 Dummy {f00=0x003e, f01=0x0190, f02=» )W @ 0 Rb ' F "R G @ > D @ #D @ T G W, A V "R A A j g . P R A L Y X T @ 8P
0x0c4478…0c460c Dummy {f00=0x003e, f01=0x0190, f02=» B P T W ' T I @ @ 8 =hP Y X P 0T Y H @! R W 9a I @ T T 9a H A E ^ W P ,! T T ( : "' # r @ 6P 8 $ ) 5 g A 6 A A : " e < A H "" P U W
0x0c460c…0c47a0 Dummy {f00=0x003e, f01=0x0190, f02=» )W @ 0 Rb ' F "R G @ > D @ #D @ T G W, A V "R A A j g R A L Y X T @ 8P
0x0c47a0…0c4934 (0, 249) Dummy {f00=0x003e, f01=0x0190, f02=» B P T W ' T I @ @ 8 =hP Y X P 0T Y H @! R W 9a I @ T T 9a H A E ^ W P ,! T T ( : "' # @ 6P 8 $ ) 5 g A 6 A A : " e < A H "" P .
0x0c4934…0c4ac8 Dummy {f00=0x003e, f01=0x0190, f02=» )W @ 0 Rb ' F "R G @ > D @ #D @ T G W, A V "R A A j g R A L Y X T @ 8P
0x0c4ac8…0c4c5c Dummy {f00=0x003e, f01=0x0190, f02=» @ , [ [ M M M A * -(@ : - : @ * , L T M @ * : =a 9a Q - _ - > @ PJ r ZZ _ T _ A_ b T @ * , - M M M @ * A 6 A 8 > !"#$%& () +,-./ PQRSTUVWXYZ []^_ !
0x0c4c5c…0c4df0 Dummy {f00=0x003e, f01=0x0190, f02=» @ @ ! P$>B @ A @ E D P _ $ % $P _ % A @ " Q A F : R W2 A . A . P. _ " :c* A W " :d2 * A x & W F ` W F W F CRT F A @ @ ! P2 @ P ;b=H
0x0c4df0…0c4f84 Dummy {f00=0x003e, f01=0x0190, f02=» @ " T> W @ V W Q Y P @ T W - P _ T <B :L A W A A W T F W V = V W
0x0c4f84…0c5118 Dummy {f00=0x003e, f01=0x0190, f02=» : @ CRT @ P @ ! P W @ V P _ @ ! P !RRP V @ P W _: V @ PZ W @ @ ! T _ P :l 9b ) V _ @ V W
0x0c5118…0c52ac Dummy {f00=0x003e, f01=0x0190, f02=» & .W & X W W V 0 !;;P P V Xb _ P !;;T X$ W $ nP XZ_V S A A X @ R @ ! T A , A @ V @ R V V I $ W V $ ) H A I.
0x0c52ac…0c5440 Dummy {f00=0x003e, f01=0x0190, f02=»P < R P A _> : A A A ^ A t A A A A : 9e9C) A I " 9A ! 9B r @ Fr A I ! ( : A A A ^ A t A ,! T A 0 A , I ! : 9E @ Fr s A I T ) A _ I N T : ^
0x0c5440…0c55d4 (0, 250) Dummy {f00=0x003e, f01=0x0190, f02=»YX d C !CCTZ B. X B.9 H H Q _ x_ !SST& 0 U N R X A X W : @ ' R xW V W$ V P P W P V V T V T W P V W @ $ P p W $ T : A
0x0c55d4…0c5768 Dummy {f00=0x003e, f01=0x0190, f02=» [ : : [ [ : t A A A A ! T A W Z A. c @ V W U R $ )_ :
0x0c5768…0c58fc Dummy {f00=0x003e, f01=0x0190, f02=»_F 9o V _X V V : V J P r V U _ V Z K W W :K W r Q R t V P v : V W V ) : V <B W |P
0x0c58fc…0c5a90 Dummy {f00=0x003e, f01=0x0190, f02=» RR > R W > <B V x V |P v 1 v W V z ` _f V : W R R P W x ( _ V : " D Pd W V PL $;A^ D E D P. V P P T E _J E _T " D T E
0x0c5a90…0c5c24 Dummy {f00=0x003e, f01=0x0190, f02=»W 0 : V P 9a _ " ( ) 8 ( ) : " $ V P 9A _ 0 : W W W ?AP ^ 0 : W ; V : : , X G : J @ 0 V @ 0 H W : ? ? R 0 R P P B _ f : V
0x0c5c24…0c5db8 Dummy {f00=0x003e, f01=0x0190, f02=» ` $ $ W < $ H h ) P _ " = D 4 Q _d F h Z = G $ V W $ V E J K _N V r V :B A V 9n A @ A A : @ @ ! @ P P P P|_
0x0c5db8…0c5f4c Dummy {f00=0x003e, f01=0x0190, f02=» Q @ P A. @ P _b A 9n A :B A @ .V 3 S Y& P4 f f S P 3 _ f 3 f L A. @ N @ W A l : A g >
0x0c5f4c…0c60e0 Dummy {f00=0x003e, f01=0x0190, f02=» ( _v V d , V P _ N L % V d V f v G G v U v G v : P V : V ~P 8 W x (_$ 8 V V x % V v % : V V P 9k! P % _ V V W W
0x0c60e0…0c6274 (0, 251) Dummy {f00=0x003e, f01=0x0190, f02=» p W ~ pP0 R P _ W ~ R X4 _ ` @ ` W W ~ pPn < V W % R , " E R W ~ R R P ^ R Xv ^_|W T : W x ( _ V P F I W z `
0x0c6274…0c6408 Dummy {f00=0x003e, f01=0x0190, f02=» #_v W | ;b W W t V b v ( v W p V ` $ W ` P ;h 0 :C # : .=H N V .=H N V N : d 8" R _ ZY QY : @ V H W z W | CRP W ` ` H W d 2
0x0c6408…0c659c Dummy {f00=0x003e, f01=0x0190, f02=» N =H N V @ ) p !TTXX !CCT t !UUT d Wh 2 .:H N P V _ R :h " YV : v `?A @ W W :b / W D W @ W D
0x0c659c…0c6730 Dummy {f00=0x003e, f01=0x0190, f02=» w ` :A W V d 4 W P _ W ` W d V V W W V V >k 8 W W t V V D x A F zP W r z W @ @ % V , P@ , - 4 ] 4 Y 5
0x0c6730…0c68c4 Dummy {f00=0x003e, f01=0x0190, f02=» @ T Y p !TTX" A 9 A : @ @ P. @ " P #D " P #E " P #F : @ " P @ P 3 _ @ " P S 1 S 9J S ( 3 ( 9B @ @ T : @ :B W . !TTP
0x0c68c4…0c6a58 Dummy {f00=0x003e, f01=0x0190, f02=»P0 & r " U _2 P0 & " U _2 V V tPJ S ( V | S =J @ " S V l S W l V p S W p W _L @ % P W @ % P p !TTT v @ @
0x0c6a58…0c6bec Dummy {f00=0x003e, f01=0x0190, f02=» !RRP @ ! T 3 @ & P 3 3 YL @ @ T : f ` @ P 0_ 0 3 S S V V W @ @ T : P S S _ : . !TTP V
0x0c6bec…0c6d80 Dummy {f00=0x003e, f01=0x0190, f02=» $ @ # P H I K T + Y@ V p _j V t Y p !TTX @ @ T : p @ R @ T P / _ T @ A V W W t PT W f ( &
0x0c6d80…0c6f14 (0, 252) Dummy {f00=0x003f, f01=0x0190, f02=» : p !TTX !CCTr P, & V r 4 U $ $ _. P, & V 4 U $ $ _. @ @ @ ! P V 8 8 8 @ >B 3 . !CCP W P0 W f & W d 6 V d
0x0c6f14…0c70a8 Dummy {f00=0x003f, f01=0x0190, f02=» T + Y@ _`R& @ @ @ % P V 4 4 4 _r @ @ T : W v V @ 0 V P _ W $ q > R P >b W >b & 8P D P U & E W V V W R 9 W D $ ) $ P@ D L T@ D &P V
0x0c70a8…0c723c Dummy {f00=0x003f, f01=0x0190, f02=» V U W < + + P 4 V : V $ F !LLT # W ;I # ;b W ;a WR# T W W,# T W W # T W W W R _ $ W : W | v z *T P _ / P
0x0c723c…0c73d0 Dummy {f00=0x003f, f01=0x0190, f02=»P V v ]f W v P _ @ @ T : N =H N V : N =H N V : &=H F V : F =H F V : F =H F V : P N =H N T p_ : 00=H 00 P P _ _ : @ ! P (W ( : T
0x0c73d0…0c7564 Dummy {f00=0x003f, f01=0x0190, f02=» P P d @ ( P Z 0 3 0 1 2 a T `/P ,v v ,v v 0#nDC D
0x0c7564…0c76f8 Dummy {f00=0x003f, f01=0x0190, f02=» 8q DY N =H N P U h~KB l V : D D 8q DY
0x0c76f8…0c788c Dummy {f00=0x003f, f01=0x0190, f02=» 8q DY $ h~KB , Z
0x0c788c…0c7a20 Dummy {f00=0x003f, f01=0x0190, f02=» 4n GP 4n GP N 4k|TP " D D 8q DY
0x0c7a20…0c7bb4 (0, 253) Opaque[0x194]
0x0c7bb4…0c7d48 # DirEnt {nam=»BEA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x07e8, f03=0x0000}
0x0c7bb4…0c7d48 IdxSect {
0x0c7bb4…0c7d48 f00 = 0x003f // 0xc7bb4 @0x0
0x0c7bb4…0c7d48 f01 = 0x000a // 0xc7bb6 @0x2
0x0c7bb4…0c7d48 gno = [ // 0xc7bb8 @0x4
0x0c7bb4…0c7d48 [0x00]: C0x003f.0x1.0
0x0c7bb4…0c7d48 [0x01]: C0x003f.0x2.0
0x0c7bb4…0c7d48 [0x02]: C0x003f.0x3.0
0x0c7bb4…0c7d48 [0x03]: C0x0040.0x0.0
0x0c7bb4…0c7d48 [0x04]: C0x0040.0x1.0
0x0c7bb4…0c7d48 ]
0x0c7bb4…0c7d48 }
0x0c7d48…0c7edc Dummy {f00=0x003f, f01=0x0190, f02=» l #2B x , , * 0 1 1 0 1 1 2B 2B 2B @ @ < P
0x0c7edc…0c8070 Dummy {f00=0x003f, f01=0x0190, f02=» ( B R Q : B B ~ X ( 0
0x0c8070…0c8204 Dummy {f00=0x003f, f01=0x0190, f02=» _4 ( H T @ A 8 B B T = C : < T _" 8 *X( 8 T$ < P <P B _R 8W R Rt Wp X$ , < P <P < 9 _H 8 R W: X , < P 'T
0x0c8204…0c8398 Dummy {f00=0x003f, f01=0x0190, f02=» B :a;a : MW2 XW. CW* RW& EW" IW LW U A W FW SW OW P @ $ A * A @ P @ Q W$ @ A @ A @ P a @ a x @ vP 8 R ) A _ @ 0Q p I 0 ^ A 0W j I 6 ^ @ T W * I ^ a A @ P A @
0x0c8398…0c852c Dummy {f00=0x003f, f01=0x0190, f02=» : : : Q ^ a A : A a ` : $:f:A $# Q $# P W WL $$ X $$ <A $# P _ ; $$ X, ; A 4 & X <a<A : : @ W 4 @
0x0c852c…0c86c0 Dummy {f00=0x003f, f01=0x0190, f02=» @ %W @ % : 4 &<E , P. * T P / T 0 W , W T , P" "$ T" 4 %T W @ R _v W W @ @ $<E % @ $$ Q ) A : A ^ W 09U ( 9 S = S 0 S _
0x0c86c0…0c8854 (0, 254) Dummy {f00=0x003f, f01=0x0190, f02=» A ++Q --U A 09Q ..Q EEQ> ''Q (& P 8 S S Q Q _< P _ ^N_ X< ++Q --U A 09]R (& @ 8 S S A 09Y ''Q _x A _ X @ :
0x0c8854…0c89e8 Dummy {f00=0x003f, f01=0x0190, f02=» 4 ` A ''Q Y @ @ $# Q (Q, a v A v @ A )W $# X ( H + R_0 : W W W W 4 3 + f A ++Q --Q W W V **Q ''Qr //Q0 XXU ''Q.W BBU ''QbW| AZ
0x0c89e8…0c8b7c Dummy {f00=0x003f, f01=0x0190, f02=» @ W Z A XT @ h @ hT $# T @ 0 * A U A R $ P P A # P&# ;c ( Wf T( Q t WZ P T V& @ hP * A X A A A V 5 5W V + 3 PB P W6 @
0x0c8b7c…0c8d10 Dummy {f00=0x003f, f01=0x0190, f02=»SYMBOL TABLE0 UND.ENT.0 UND.LAB.0 ASS.ERR.1 $ ) $ 0P P $ ) _ : d L R L _ 0 ) ^ : 9 R : ) Y :P ff33 A A A @ T : d D L T
0x0c8d10…0c8ea4 Dummy {f00=0x003f, f01=0x0190, f02=»8! S _6 <P 8 : P~ @ Pr @ P*R A A A W @ " @ S@ SB @ S@ SB @ S@ T W6 F < -Q [ : : @ : _F _F _F _F ~ " [ : W P < A A : P P
0x0c8ea4…0c9038 Dummy {f00=0x003f, f01=0x0190, f02=» 8! 8! _ 8 T Q V" 8 T . 8 P 8 4 @ @ P P0 $" P R ( $! 9# P _4 RT QP Q VF T< @ T @ @ A A
0x0c9038…0c91cc Dummy {f00=0x003f, f01=0x0190, f02=» O @ !* P @ h * @ * * 4 @ h A , @ 4 LPT @ : TYT 6 @ R 1 A P @ 6 TYP DYP n nU n A B A @ T@ 4 z ^ T ^ j @ 0R ) ) A 0 A : 1 A @ 4 TYT J B
0x0c91cc…0c9360 Dummy {f00=0x003f, f01=0x0190, f02=» l ^ J l ^ : l ^ : ( : 1 PAGE DATE - - TIME H- M- S Z W W Pp a @ Q: @ hP4 P. B ` ' ?A A ^
0x0c9360…0c94f4 (0, 255) Dummy {f00=0x003f, f01=0x0190, f02=» D 02-PASS ASSEMBLER - NAT LAB - VERSION 7.2 16/11/78 x 8P _ @
0x0c94f4…0c9688 Dummy {f00=0x003f, f01=0x0190, f02=» R A ) H A A X F 4 I b>! A Z>!P H A ` I d A )T @ 0P A $P @ vT 0 @ R W @ vT : @ tP f 4 A A _, A R Q @ U D @ A $ U A : @ Pf @ @ XT
0x0c9688…0c981c Dummy {f00=0x003f, f01=0x0190, f02=»! A 2( @ 6 nT @ 4 TYT LP A 4 < A : @ A A W @ d 9 ! A @ A ` A A A A A A . @ hP A A A A A @ A @ A A r I 0 ^ , A . x A v **Q~ $$
0x0c981c…0c99b0 Dummy {f00=0x003f, f01=0x0190, f02=» R |W _ R ( A @ P % P @ $ I @ T~ nUt A nUb A nUT A @ PJ A @ R $ T& - $ - A H M @ > % nV @ @ Q @ P 2 X @ hQ B "( B ( @
0x0c99b0…0c9b44 Dummy {f00=0x003f, f01=0x0190, f02=» A T @ P A _ + * /*W( + * 0 W + * / W , * 0 A A A @ @ T W @ T @ TL Uz f XP8 @ hT0 U $# Q $# Q L9a @ U A W A A * A W @ hX ,,YV R
0x0c9b44…0c9cd8 Dummy {f00=0x003f, f01=0x0190, f02=» R @ ) I ((R ))R0 U,> S( S$ ,,YX R a @ h @ A XT % a A : @ hQ :a @ U A _0 $ : W @ HT LP @ hTj @ @ h @ f 0 A a PR ,,Rr L $"
0x0c9cd8…0c9e6c Dummy {f00=0x003f, f01=0x0190, f02=» P ;A_ ;a Y ==Q$ ::QZ P P Q TWH P T W4 W. Pz T W Tn @ W T ] ] P 9A Y T2 < = T$ P &T F T W R ,,Y W ,,Y @ 2 P R ^ ` " a Qx T
0x0c9e6c…0ca000 Dummy {f00=0x003f, f01=0x0190, f02=» _ A A0 @ V @ T~ @ Tt P, @ [! T A ^ & ] b A Z @ X , _2 @ A A A A 0 @ A A A @ PLQ @ @ P8 $T % R _ X $ % ,,Y"
0x0ca000…0ca194 (0, 256) Dummy {f00=0x0040, f01=0x0190, f02=» P @ P @ P @ R ) $ * % ] @ P @ A W @ Q R, @ W @ T ! A ,, ''Qd DDU ''U QN f Y 4 W. FFU ''Qn A Y 4 Y T @ T P
0x0ca194…0ca328 Dummy {f00=0x0040, f01=0x0190, f02=» A 2 ~ R $% P ( R P $" : A 0 @ 0PN 8 I 4 ;a P _ ! ]" ]! T ]"0 2
0x0ca328…0ca4bc Dummy {f00=0x0040, f01=0x0190, f02=» @ P $| _> G 4 4 R t G T_ $ PX P %F $ @V "0P ,,Q R A W$ $ P $ <c! 9A $ $ $h_P ((RL 07Q 4 | R ( ))R W 4_ $ W **R " P 9A G 4 $h_ T| 4 @ @ PX
0x0ca4bc…0ca650 Dummy {f00=0x0040, f01=0x0190, f02=» : ! P P : : : 2' ?A 2&p ! ! : @ P @ P P P " P 9 ! G T 4 G 4 ! P $| : X Q : $" | R 4 A 0 ~ W @ UL ==R@ R4 P P A A
0x0ca650…0ca7e4 Dummy {f00=0x0040, f01=0x0190, f02=» B E ^ IDENT H* ! P I Z " D T E ^ @ A ( A I ^ , A * A 0 A @ A @ A A A @ @ P R $ )_ ASM 7.2 A v 4 A R6 ,,Q
0x0ca7e4…0ca978 Dummy {f00=0x0040, f01=0x0190, f02=» @ @ A ^ PT R $ $# P $ ] b T A A Z @ XT A ^ 0_Z ] b A Z @ P W P @ R % 6 d @ hQ @ ) ) @ hQ @ T ) )
0x0ca978…0cab0c Dummy {f00=0x0040, f01=0x0190, f02=» @) P ) ) @)&W, P R $Y $# Y $# P: P $# P $# Q A W R W ** A $# Q W ( W X ( ( P D d P N d A B &
0x0cab0c…0caca0 Dummy {f00=0x0040, f01=0x0190, f02=»T PASS0 I X A I M A 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 @ i RS A i FI ~ A I 1 t @ I W j @ I C ` @ I C V A Q M A a ! I 2 A i 1S A q BI @
0x0caca0…0cae34 (0, 257) Dummy {f00=0x0040, f01=0x0190, f02=» @ i ST V A I L L @ I S B A i AD 8 @ ADS . A i SU " @ SUS A i MU @ MUS A i DV @ DVS A h XR h MR !h GR H h ER p h ER x i XK ! P F W P B _ p DR "1 p TR ! 1 h DR DRS !h UR URS !h NR
0x0cae34…0cafc8 Dummy {f00=0x0040, f01=0x0190, f02=» ! 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 I F ! i WK ~ i CK t P B q BL ` IO@ @ h NR H h TR
0x0cafc8…0cb15c Dummy {f00=0x0040, f01=0x0190, f02=»LC 8 h RC 8 p LN8 h RN 8 h CR !p LR h SR !p UR a ! h VR h AR h SR ` LK 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 h MD ( h VF p h VB zx h
0x0cb15c…0cb2f0 Dummy {f00=0x0040, f01=0x0190, f02=»DVR DVRS ! VUS x VSU p h FL h FX ` ILH h CA H@h IM @ h MP @@h M2 @ DENT% NTRY XTRN 852 855 856 857 ATA ORG ORG IST P LIST T JECT Xx QU (x ES x ND' OMN x FF% x FT%~x IF% TAB ORM
0x0cb2f0…0cb484 Dummy {f00=0x0040, f01=0x0190, f02=»2 ZA3 ZA4 ZA5 ZA6 ZA7 ZA8 ZA9 zA10 zA11 zA12 zA13 zA14 zA15 h AR h SR ` LK 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 h MD ( h VF p h VB zx h
0x0cb484…0cb618 Dummy {f00=0x0040, f01=0x0190, f02=» L @ L ` R r , ( T @ L @ P S , ( T @ @ L @ R S B `ESC S r * & P @ A S ADDSET S * & H @ A S * & H @ A @
0x0cb618…0cb7ac Dummy {f00=0x0040, f01=0x0190, f02=» A @ A S z , ( @ c N ` @ T * & { V U @ V T H * & H @ T v , ( ` @ P P @ T * & H @ A @ A T , (
0x0cb7ac…0cb940 Dummy {f00=0x0040, f01=0x0190, f02=» A * T r , ( ( @ P Q U DODASH U B , ( ; $ @ A * @ A , @ U T * & S H A . @ A 0 @ A U , ( g 2 ( @ V U * & H $ @
0x0cb940…0cbad4 (0, 258) Opaque[0x194]
0x0cbad4…0cbc68 # DirEnt {nam=»C:FLEX«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0810, f03=0x0000}
0x0cbad4…0cbc68 IdxSect {
0x0cbad4…0cbc68 f00 = 0x0040 // 0xcbad4 @0x0
0x0cbad4…0cbc68 f01 = 0x0002 // 0xcbad6 @0x2
0x0cbad4…0cbc68 gno = [ // 0xcbad8 @0x4
0x0cbad4…0cbc68 [0x00]: C0x0040.0x2.0
0x0cbad4…0cbc68 ]
0x0cbad4…0cbc68 }
0x0cbc68…0cbdfc Dummy {f00=0x0040, f01=0x006e, f02=» T; 01; TID=SP; TCL=SP; * LEV=60; : 00; J P01; V SDC=S01; b
0x0cbdfc…0cbf90 Dummy {f00=0x0040, f01=0x2008, f02=» 01; TID=SP; TCL=SP; * LEV=60; : 00; J P01; V SDC=S01; b
0x0cbf90…0cc124 Dummy {f00=0x0040, f01=0x2008, f02=» AND AT LEAST ONE OF THEM MUST BE CHOOSEN 0 HMES ALTERNATIVE 4 MAY BE INCLUDED IF NEEDED 8 HEND l * HMES ILLEGAL PARAMETER COMBINATION !!! x * HMES FOLLOWING COMBINATIONS ARE VALID: " HMES 1 A,A+AU,A+AOUT,A+AU+AOUT " HMES 2 C,C+CU,C
0x0cc124…0cc2b8 Dummy {f00=0x0040, f01=0x4062, f02=»* P*975001 9.2 TOSS-TEST DISK " P*975003 9.2 COPY LYNGBY 820721 , P END R@ ^ P*KMD25 11.1 SYSTEM d P*KMD26 11.1 MONITOR ~ P* P*MON12 12.0 MONITORDISK P*SYS12 12.0 SYSTEMDISK * $ *DSB001 9.2 PLADSBESTILLING
0x0cc2b8…0cc44c Dummy {f00=0x0040, f01=0x2008, f02=» *KMD25 11.0 SYSTEM *KMD26 11.0 MONITOR $ * @ $ *DSB001 9.2 PLADSBESTILLING DSB J * r PT001 9.2 OFFLINE/ONLINE P&T | * @ SYSTEM *KMD15 *KMD16 *KMD17 *KMD18 *KMD19 11.1 DEMO68
0x0cc44c…0cc5e0 Dummy {f00=0x0040, f01=0x0190, f02=» P j$ > > F C F C > B R Q F ! P C > C > F :c" H :b"? #" : C > B R Q~ P0 B P* 0$ T # R QL > X B U( H Q2 X
0x0cc5e0…0cd280 (1, 0) DirGranule ((1, 0)) {
0x0cc5e0…0cd280 DirEnt {nam=»M:92SP«, typ=» «, f00=0x0000, f01=0x0000, f02=0x0130, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»M:92SP«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0138, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»TCLASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2860, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x0878, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»SCLASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b10, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»MONTAB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b20, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»SYSTAB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b28, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»TDISP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b40, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»LRPINT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b60, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»TPROC «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b88, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»MSUBS «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0ba0, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»TTMJOB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0bd0, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»TOSSIO«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0be0, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»SYSLDM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0c78, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»SYSLDA«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0d50, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»LDTASK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0ea0, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»PFTAB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0ed0, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»LKMAL «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0ed8, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»CTABX «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0ee0, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DVTKB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0ee8, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DVTTP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0ef0, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DVTGP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0ef8, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DVTDI «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f00, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DVTDY «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f08, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DWII01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f10, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DWIO01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f18, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DW1501«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f20, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DRKB03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f28, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DRTP02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f68, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DRGP01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0fb0, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DRDI01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0fe8, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DRDY01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1010, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DRRT01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1068, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DRSOP1«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1118, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DRDU01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1140, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DRLP01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1188, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DRIC01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x11a8, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DRDC15«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x11d0, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»EBCDIC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1280, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»TIMER «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1290, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»TMMLKM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12a8, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»TLDSEG«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12c0, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»TABORT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12d8, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»TASS «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12e8, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»TIODM «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1318, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DMTASK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1348, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DMINIT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x13e0, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DMTASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x13f0, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DMBUF «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1430, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DMFDB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1450, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DFTAB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1460, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DMSUBX«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1468, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»ADDMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1498, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DSUMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x14a8, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»MPYMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x14b8, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DIVMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x14c8, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DMSUBR«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x14d8, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DVKB00«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1520, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DVDY00«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1528, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DVKB01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1530, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DVTP01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1538, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DVDY01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1540, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DVKB02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1548, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DVDI02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1550, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DVDY02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1558, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DVGP03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1560, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DVTP04«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1568, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»M:92SP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x1050, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»CTAB01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1600, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»SYSBUG«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1610, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»M:BUG «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x1060, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»X «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x16c0, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»MONGEN«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1700, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»A «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1008, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DRFD01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1710, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»DVDY05«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0868, f03=0x0000}
0x0cc5e0…0cd280 }
0x0cd280…0cd414 (1, 1) Opaque[0x194]
0x0cd414…0cd5a8 # DirEnt {nam=»M:92SP«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0138, f03=0x0000}
0x0cd414…0cd5a8 IdxSect {
0x0cd414…0cd5a8 f00 = 0x0009 // 0xcd414 @0x0
0x0cd414…0cd5a8 f01 = 0x0016 // 0xcd416 @0x2
0x0cd414…0cd5a8 gno = [ // 0xcd418 @0x4
0x0cd414…0cd5a8 [0x00]: C0x0009.0x3.0
0x0cd414…0cd5a8 [0x01]: C0x0040.0x3.0
0x0cd414…0cd5a8 [0x02]: C0x0041.0x0.0
0x0cd414…0cd5a8 [0x03]: C0x0041.0x1.0
0x0cd414…0cd5a8 [0x04]: C0x0041.0x2.0
0x0cd414…0cd5a8 [0x05]: C0x0041.0x3.0
0x0cd414…0cd5a8 [0x06]: C0x0042.0x0.0
0x0cd414…0cd5a8 [0x07]: C0x0042.0x1.0
0x0cd414…0cd5a8 [0x08]: C0x0042.0x2.0
0x0cd414…0cd5a8 [0x09]: C0x0042.0x3.0
0x0cd414…0cd5a8 [0x0a]: C0x0043.0x0.0
0x0cd414…0cd5a8 ]
0x0cd414…0cd5a8 }
0x0cd5a8…0cd73c Dummy {f00=0x0009, f01=0x0190, f02=» ASG /02,NO MOV TCLASS,/S,TOSSWORK KPF /S,TCLASS 4 SCR J INC TCLASS,TOSSWORK V KPF /O r MOV SCLASS,/S,TOSSWORK KPF /S,SCLASS SCR INC SCLASS,TOSSWORK KPF /O MOV MONTAB,/S,TOSSWORK
0x0cd73c…0cd8d0 Dummy {f00=0x0009, f01=0x0190, f02=»WORK ~ KPF /S,SYSTAB SCR " MOV TDISP,/S,TOSSWORK . KPF /S,TDISP L SCR ` MOV LRPINT,/S,TOSSWORK l KPF /S,LRPINT SCR MOV TPROC,/S,TOSSWORK KPF /S,TPROC SCR MOV MSUBS,/S,TOSSWORK
0x0cd8d0…0cda64 Dummy {f00=0x0009, f01=0x018e, f02=»SIO SCR MOV SYSLDM,/S,TOSSWORK KPF /S,SYSLDM 6 SCR L MOV SYSLDA,/S,TOSSWORK X KPF /S,SYSLDA v SCR MOV LDTASK,/S,TOSSWORK KPF /S,LDTASK SCR MOV PFTAB,/S,TOSSWORK KPF /S,PFTAB
0x0cda64…0cdbf8 Dummy {f00=0x0009, f01=0x0190, f02=» LED SYSTAB ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ B ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ n ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ !!EN ASM /S KPF /O KPF /S SCR
0x0cdbf8…0cdd8c Dummy {f00=0x0009, f01=0x018e, f02=»U 0$$ r ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ !!EN : ASM /S F KPF /O T KPF /S b SCR p LED LRPINT | ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$
0x0cdd8c…0cdf20 Dummy {f00=0x0009, f01=0x0190, f02=» ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 0 ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ !!EN ASM /S KPF /O KPF /S SCR LED MSUBS ( #
0x0cdf20…0ce0b4 (1, 2) Dummy {f00=0x0040, f01=0x0190, f02=» $$DSKPAG EQU 0$$DSKPAG EQU 1$$ !!EN ( ASM /S 4 KPF /O B KPF /S P SCR ^ LED TTMJOB j ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ | ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ ( #!!CH $$D
0x0ce0b4…0ce248 Dummy {f00=0x0040, f01=0x0190, f02=»U 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ H ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ t !!EN ASM /S KPF /O KPF /S SCR LED SYSLDM ( #!!CH $$CREDIT EQU 0$
0x0ce248…0ce3dc Dummy {f00=0x0040, f01=0x0190, f02=»PAG EQU 1$$ x !!EN ASM /S KPF /O . KPF /S < SCR J LED SYSLDA V ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ h ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ ( #!!CH $$DSKPAG EQU 0$$DSKPAG
0x0ce3dc…0ce570 Dummy {f00=0x0040, f01=0x0190, f02=» l ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 4 ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ ` !!EN ASM /S KPF /O KPF /S SCR MOV DVTKB,/S,TOSSWORK KPF /S,DVTKB SCR
0x0ce570…0ce704 Dummy {f00=0x0040, f01=0x0190, f02=»DI,/S,TOSSWORK KPF /S,DVTDI SCR * MOV DVTDY,/S,TOSSWORK 6 KPF /S,DVTDY T SCR h MOV DWII01,/S,TOSSWORK t KPF /S,DWII01 SCR INC DWII01,TOSSWORK KPF /O MOV DWIO01,/S,TOSSWORK KPF /S,DWIO0
0x0ce704…0ce898 Dummy {f00=0x0040, f01=0x0190, f02=»01,TOSSWORK KPF /O LED DWII01 " ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ 4 ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ` ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ !!EN ASM /S KPF /O
0x0ce898…0cea2c Dummy {f00=0x0040, f01=0x018e, f02=»!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ , !!EN X ASM /S d KPF /O r KPF /S SCR LED DW1501 ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH
0x0cea2c…0cebc0 Dummy {f00=0x0040, f01=0x0190, f02=» SCR MOV DRKB03,/S,TOSSWORK KPF /S,DRKB03 . SCR D MOV DRTP02,/S,TOSSWORK P KPF /S,DRTP02 n SCR MOV DRGP01,/S,TOSSWORK KPF /S,DRGP01 SCR MOV DRDI01,/S,TOSSWORK KPF /S,DRDI01 SCR
0x0cebc0…0ced54 (1, 3) Dummy {f00=0x0041, f01=0x0190, f02=»MOV DRSOP1,/S,TOSSWORK KPF /S,DRSOP1 SCR 4 MOV DRDU01,/S,TOSSWORK @ KPF /S,DRDU01 ^ SCR t MOV DRLP01,/S,TOSSWORK KPF /S,DRLP01 SCR MOV DRIC01,/S,TOSSWORK KPF /S,DRIC01 SCR MOV DRDC
0x0ced54…0ceee8 Dummy {f00=0x0041, f01=0x018e, f02=»C$$ 1$$ !!CH $$ X:D$$ 2$$ !!CH $$ X:E$$ 1$$ * !!CH $$ X:F$$ 40$$ D !!CH $$ X:G$$ 1$$ ^ !!CH $$ X:H$$ 1$$ x !!CH $$ X:I$$ 1$$ !!CH $$ X:J$$ 040$$ !!CH $$ X:K$$ 40$$ ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$
0x0ceee8…0cf07c Dummy {f00=0x0041, f01=0x0190, f02=» !!EN ASM /S KPF /O KPF /S , SCR : LED DRTP02 F !!CH $$ X:A$$ 0$$ X !!CH $$ X:B$$ 0$$ r !!CH $$ X:C$$ 0$$ !!CH $$ X:D$$ 0$$ !!CH $$ X:E$$ 0$$ !!CH $$ X:F$$ 0$$ !!CH $$ X:G$$ 1$$
0x0cf07c…0cf210 Dummy {f00=0x0041, f01=0x0190, f02=»DIT EQU 1$$ x ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ @ ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ l !!EN ASM /S KPF /O KPF /S SCR LED DRGP01 !!CH $$ X:A$$ 1$$ !!
0x0cf210…0cf3a4 Dummy {f00=0x0041, f01=0x018e, f02=»X:G$$ 0$$ !!CH $$ X:H$$ 162$$ ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ . ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ Z ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ !!EN ASM /S KPF /O KP
0x0cf3a4…0cf538 Dummy {f00=0x0041, f01=0x018e, f02=» ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 0 ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ !!EN ASM /S KPF /O KPF /S SCR LED DRDY01 !!CH $$ X:A$$ 0$$ !!CH $$ X:B$$ 1$$
0x0cf538…0cf6cc Dummy {f00=0x0041, f01=0x0190, f02=» !!CH $$ X:H$$ 162$$ ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ L ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ x ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ !!EN ASM /S KPF /O KPF /S SC
0x0cf6cc…0cf860 Dummy {f00=0x0041, f01=0x018e, f02=» $$ X:E$$ /15$$ !!CH $$ X:F$$ 01$$ ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ 2 ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ^ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ !!EN ASM /S KPF /O
0x0cf860…0cf9f4 (1, 4) Dummy {f00=0x0041, f01=0x0190, f02=» j ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 4 ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ ` !!EN ASM /S KPF /O KPF /S SCR LED DRDU01 !!CH $$ X:A$$ 1$$ !!CH $$ X:B$$
0x0cf9f4…0cfb88 Dummy {f00=0x0041, f01=0x0190, f02=»CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ * ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ V !!EN ASM /S KPF /O KPF /S SCR LED DRLP01 !!CH $$ X:A$$ 0$$ !!CH $$ X:B$$ 126$$
0x0cfb88…0cfd1c Dummy {f00=0x0041, f01=0x0190, f02=»!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ !!EN , ASM /S 8 KPF /O F KPF /S T SCR b LED DRIC01 n !!CH $$ X:A$$ 575$$ ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$
0x0cfd1c…0cfeb0 Dummy {f00=0x0041, f01=0x0190, f02=»D DRDC15 !!CH $$ X:A$$ 650$$ !!CH $$ X:B$$ /60$$ , !!CH $$ X:C$$ 0$$ H !!CH $$ X:D$$ 500$$ b !!CH $$ X:E$$ 0$$ ~ !!CH $$ X:F$$ 1$$ !!CH $$ X:G$$ 252$$ !!CH $$ X:H$$ 1$$ !!CH $$ X:I$$ 0$$ !!CH $
0x0cfeb0…0d0044 Dummy {f00=0x0041, f01=0x0190, f02=»$ 0$$ !!CH $$ X:P$$ 0$$ !!CH $$ X:Q$$ 1$$ ( !!CH $$ X:R$$ 650$$ B ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ^ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$
0x0d0044…0d01d8 Dummy {f00=0x0041, f01=0x0190, f02=»LED EBCDIC !!EN ASM /S KPF /O , KPF /S : SCR H LED DRKB03 T !!CH $$ X:A$$ 1$$ f !!CH $$ X:B$$ 1$$ !!CH $$ X:C$$ 1$$ !!CH $$ X:D$$ 2$$ !!CH $$ X:E$$ 1$$ !!CH $$ X:F$$ 40$$ !!CH $
0x0d01d8…0d036c Dummy {f00=0x0041, f01=0x0190, f02=»DIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ " ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ N ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ z !!EN ASM /S KPF /O KPF /S SCR LED DVTKB !!DL 35
0x0d036c…0d0500 Dummy {f00=0x0041, f01=0x0190, f02=»0,0,0,0,0,0,0,0 DATA 0,0,0,0, !!EN . ASM /S : KPF /O H KPF /S V SCR d LED TOSSIO p !!CH $$ X:A$$ 1$$ !!EN ASM /S KPF /O KPF /S SCR MOV TIMER,/S,TOSSWORK KPF /S,TIMER
0x0d0500…0d0694 (1, 5) Dummy {f00=0x0041, f01=0x018e, f02=»R MOV TLDSEG,/S,TOSSWORK KPF /S,TLDSEG ( SCR > MOV TABORT,/S,TOSSWORK J KPF /S,TABORT h SCR ~ MOV TASS,/S,TOSSWORK KPF /S,TASSR SCR LED TIMER ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!
0x0d0694…0d0828 Dummy {f00=0x0041, f01=0x0190, f02=» ASM /S KPF /O KPF /S $ SCR 2 LED TPROC > ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ P ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ | ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ !!EN
0x0d0828…0d09bc Dummy {f00=0x0041, f01=0x018e, f02=»U 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ H !!EN t ASM /S KPF /O KPF /S SCR LED TLDSEG ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$
0x0d09bc…0d0b50 Dummy {f00=0x0041, f01=0x0190, f02=» KPF /O ! KPF /S ! SCR ! LED TABORT ! , ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ! > ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ! j ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ ! ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ ! !!EN ! ASM /S !
0x0d0b50…0d0ce4 Dummy {f00=0x0041, f01=0x0190, f02=»$ ! n ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ " ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ " 6 !!EN " b ASM /S " n KPF /O " | KPF /S " SCR " LED LKMAL " !!DL 019 " !!DL 020 " !!DL 021 " !!DL 022 " !!DL 027 " !!
0x0d0ce4…0d0e78 Dummy {f00=0x0041, f01=0x0190, f02=»00 " ~ !!DL 045 # DATA 00 # !!DL 050 # 6 !!DL 051 # F !!EN # V ASM /S # b KPF /O # p KPF /S # ~ SCR # LED LRPINT # !!CH $$ X:A$$ 0$$ # !!EN # ASM /S # KPF /O # KPF /S # SCR # MO
0x0d0e78…0d100c Dummy {f00=0x0041, f01=0x0190, f02=»S,TOSSWORK # KPF /S,DMINIT $ SCR $ ( MOV TASS,/S,TOSSWORK $ 4 KPF /S,TASSI $ R SCR $ f MOV DMTASS,/S,TOSSWORK $ r KPF /S,DMTASS $ SCR $ MOV DMBUF,/S,TOSSWORK $ KPF /S,DMBUF $ SCR $ MOV DMFDB,/S,TOSSWORK $
0x0d100c…0d11a0 Dummy {f00=0x0041, f01=0x0190, f02=»,DMSUBX $ SCR % MOV ADDMOD,/S,TOSSWORK % KPF /S,ADDMOD % : SCR % P MOV DSUMOD,/S,TOSSWORK % KPF /S,DSUMOD % z SCR % MOV MPYMOD,/S,TOSSWORK % KPF /S,MPYMOD % SCR % MOV DIVMOD,/S,TOSSWORK % KPF /S,DIVMOD
0x0d11a0…0d1334 (1, 6) Dummy {f00=0x0041, f01=0x0190, f02=» $$CREDIT EQU 0$$CREDIT EQU 1$$ % ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ & ( ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ & T ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ & !!EN & ASM /S & KPF /O & KPF /S & SCR & LED DMBUF & !!CH $$
0x0d1334…0d14c8 Dummy {f00=0x0041, f01=0x0190, f02=»2 EQU 0$$ & v ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ ' !!EN ' > ASM /S ' J KPF /O ' X KPF /S ' f SCR ' t LED DMTASK ' !!CH $$ X:A$$ 00001$$ ' !!CH $$ X:B$$ 00000$$ ' !!CH $$ X:C$$ 00004$$ ' ( #!!CH $$CREDIT EQU 0$$CREDIT
0x0d14c8…0d165c Dummy {f00=0x0041, f01=0x0190, f02=»1$$ ' p !!EN ( ASM /S ( KPF /O ( & KPF /S ( 4 SCR ( B LED DMTASS ( N !!CH $$ X:A$$ 00004$$ ( ` !!CH $$ X:B$$ 00000$$ ( ~ ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( ( #!!CH $$CPU852 EQU 1$
0x0d165c…0d17f0 Dummy {f00=0x0041, f01=0x018e, f02=»D DFTAB ( !!CH $$F0F1,/F2F3$$F0F1$$ ) !!DL 24 ) 2 !!EN ) B ASM /S ) N KPF /O ) KPF /S ) j SCR ) x LED DMFDB ) !!CH $$ X:A$$ 02280$$ ) !!CH $$ X:B$$ 00240$$ ) !!CH $$ X:C$$ 00000$$ ) !!CH $$ X:D$$ 00114$$ )
0x0d17f0…0d1984 Dummy {f00=0x0041, f01=0x0190, f02=» ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ * !!EN * 0 ASM /S * < KPF /O * J KPF /S * X SCR * f LED DMINIT * r ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ * ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ * ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ * ( #
0x0d1984…0d1b18 Dummy {f00=0x0041, f01=0x0190, f02=»REDIT EQU 0$$CREDIT EQU 1$$ * ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ + $ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ + P ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ + | !!EN + ASM /S + KPF /O + KPF /S + SCR + LED DMSUBX + ( #!!CH $$CREDI
0x0d1b18…0d1cac Dummy {f00=0x0041, f01=0x0190, f02=»U 0$$DSKPAG EQU 1$$ + !!EN , ASM /S , ( KPF /O , 6 KPF /S , D SCR , R LED ADDMOD , ^ ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ , p ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ , ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ , ( #!!CH $$DSKPAG EQU 0$
0x0d1cac…0d1e40 Dummy {f00=0x0041, f01=0x0190, f02=»EQU 1$$ , t ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ - ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ - < ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ - h !!EN - ASM /S - KPF /O - KPF /S - SCR - LED MPYMOD - ( #!!CH $$CREDIT EQU 0$$CREDIT EQU
0x0d1e40…0d1fd4 (1, 7) Dummy {f00=0x0042, f01=0x0190, f02=» - l !!EN . ASM /S . KPF /O . " KPF /S . 0 SCR . > LED DIVMOD . J ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ . ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ . ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ . ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ .
0x0d1fd4…0d2168 Dummy {f00=0x0042, f01=0x0190, f02=» $$MMUPAG EQU 0$$MMUPAG EQU 1$$ . ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ / ( ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ / T !!EN / ASM /S / KPF /O / KPF /S / SCR / LED SYSTAB / !!CH $$IHINPT$$TRAP$$ / !!CH $$ X:A$$ 00003$$
0x0d2168…0d22fc Dummy {f00=0x0042, f01=0x018e, f02=»X:F$$ 00001$$ / , '!!CH $$ILLINT 12$$IH1501 12$$ 0 , '!!CH $$ILLINT 13$$IH1502 13$$ 0 F !!IL 55 0 v EXTRN IH1501 0 EXTRN IH1502 0 !!DL 056 0 !!DL 057 0 !!DL 064 0 !!DL 067 0 !!
0x0d22fc…0d2490 Dummy {f00=0x0042, f01=0x0190, f02=» 0 !!DL 080 1 !!DL 081 1 !!DL 85 1 ( !!DL 122 1 8 DATA ILLINT 1 H !!DL 123 1 h DATA ILLINT 1 x !!DL 130 1 DATA ILLINT 1 !!DL 133 1 DATA ILLINT 1 !!DL 134 1
0x0d2490…0d2624 Dummy {f00=0x0042, f01=0x018e, f02=» 1 DATA ILLINT 2 !!DL 140 2 ( DATA ILLINT 2 8 !!DL 141 2 X DATA ILLINT 2 h !!DL 142 2 DATA ILLINT 2 !!DL 145 2 DATA ILLINT 2 !!DL 150 2 DATA
0x0d2624…0d27b8 Dummy {f00=0x0042, f01=0x0190, f02=» KPF /O 3 KPF /S 3 SCR 3 LED PFTAB 3 , !!IL 12 3 > EXTRN DC15ON 3 N !!DL 013 3 n !!DL 014 3 ~ !!DL 018 3 !!DL 019 3 !!DL 020 3 !!DL 021 3 !!DL 022 3 !!DL 023 3 !!DL 024 3 !!DL 025 3
0x0d27b8…0d294c Dummy {f00=0x0042, f01=0x0190, f02=»DL 035 3 !!DL 037 4 !!DL 038 4 !!IL 40 4 . DATA DC15ON 4 > !!DL 041 4 ^ !!DL 042 4 n !!DL 046 4 ~ !!DL 047 4 !!DL 048 4 !!DL 049 4 !!DL 050 4 !!DL 051 4 !!DL 052 4 !!DL 053 4 !!DL 054 4
0x0d294c…0d2ae0 Dummy {f00=0x0042, f01=0x0190, f02=»DL 065 4 !!DL 066 5 !!EN 5 ASM /S 5 * KPF /O 5 8 KPF /S 5 F SCR 5 T MOV CTAB01,/S,NJ-AID,/S,/F3 5 ` ASM /S 5 KPF /O 5 KPF /S 5 SCR 5 MOV DRDC15,/S,M:92LP,/S,/F3 5 ASM /S 5 KPF /O 5 KPF /S 5
0x0d2ae0…0d2c74 (1, 8) Dummy {f00=0x0042, f01=0x0190, f02=»1$$CPU852 EQU 0$$ 5 ~ ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ 6 !!CH $$DVTKB$$DVKB00$$ 6 F !!CH $$KBAD$$KBAD3$$ 6 d !!CH $$/1111$$/1100$$ 6 !!CH $$BCA$$FFFF$$ 6 !!CH $$ED0$$FFFF$$ 6 " !!CH $$0 CODE $$CTAB01 CODE $$ 6 !!CH $$ECH$$DVDY
0x0d2c74…0d2e08 Dummy {f00=0x0042, f01=0x0190, f02=» $$CREDIT EQU 0$$CREDIT EQU 1$$ 6 ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 7 ( ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 7 T ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ 7 !!CH $$DVTDY$$DVDY00$$ 7 !!CH $$/ABC$$/1850$$ 7 !!CH $$/1111$$/C000$$ 7 !!EN
0x0d2e08…0d2f9c Dummy {f00=0x0042, f01=0x018e, f02=»G EQU 0$$MMUPAG EQU 1$$ 7 ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 8 ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ 8 L !!CH $$DVTKB$$DVKB01$$ 8 x !!CH $$KBAD$$KBAD3$$ 8 !!CH $$/1111$$/1140$$ 8 !!CH $$BCA$$FFFF$$ 8 !!CH $$ED0$$FFBA$$ 8 " !!CH
0x0d2f9c…0d3130 Dummy {f00=0x0042, f01=0x0190, f02=» KPF /S 9 SCR 9 LED DVTTP 9 ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ 9 0 ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 9 ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 9 ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ 9 !!CH $$DVTTP$$DVTP01$$ 9 !!CH $$/11
0x0d3130…0d32c4 Dummy {f00=0x0042, f01=0x0190, f02=»1$$ 9 p ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ : ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ : 8 ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ : d !!CH $$DVTTP$$DVTP01$$ : !!CH $$/1111$$/2000$$ : !!EN : ASM /S : KPF /O : KPF /S : SCR :
0x0d32c4…0d3458 Dummy {f00=0x0042, f01=0x0190, f02=»852 EQU 0$$ : x ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ ; !!CH $$DVTTP$$DVTP01$$ ; @ !!CH $$/1111$$/2000$$ ; ^ !!EN ; | ASM /S ; KPF /O ; KPF /S ; SCR ; LED DVTDY ; ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ; ( #!!CH $$MMUPA
0x0d3458…0d35ec Dummy {f00=0x0042, f01=0x0190, f02=»DY01$$ ; !!CH $$/ABC$$/1850$$ < !!CH $$/1111$$/C000$$ < * !!EN < H ASM /S < T KPF /O < b KPF /S < p SCR < ~ LED DVTKB < ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ < ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ < ( #!!CH $$CPU852 EQU 1$
0x0d35ec…0d3780 Dummy {f00=0x0042, f01=0x0190, f02=»11$$/1100$$ < !!CH $$BCA$$FFFF$$ = !!CH $$ED0$$BABA$$ = . " !!CH $$0 CODE $$CTAB03 CODE $$ = H !!CH $$ECH$$DVDY02$$ = n !!DL 5 = EXTRN CTAB03 = !!EN = ASM /S = KPF /O = KPF /S = SCR = LED DVTDI = ( #!!CH $
0x0d3780…0d3914 (1, 9) Dummy {f00=0x0042, f01=0x0190, f02=»PAG EQU 0$$DSKPAG EQU 1$$ = !!CH $$DVTDI$$DVDI02$$ > " !!CH $$2010$$0000$$ > @ !!CH $$/1111$$/9010$$ > !!EN > z ASM /S > KPF /O > KPF /S > SCR > LED DVTDY > ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ > ( #!!CH $$MMUPAG
0x0d3914…0d3aa8 Dummy {f00=0x0042, f01=0x018e, f02=»02$$ > ~ !!CH $$/ABC$$/1850$$ ? !!CH $$/1111$$/C000$$ ? ( !!EN ? F ASM /S ? R KPF /O ? ` KPF /S ? n SCR ? | LED DVTGP ? ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ? ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ? ( #!!CH $$CPU852 EQU 1$$C
0x0d3aa8…0d3c3c Dummy {f00=0x0042, f01=0x0190, f02=» ASM /S @ KPF /O @ KPF /S @ SCR @ . LED DVTTP @ : ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ @ L ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ @ x ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ @ ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ @ !!CH $$DVTTP
0x0d3c3c…0d3dd0 Dummy {f00=0x0042, f01=0x0190, f02=» $$CREDIT EQU 0$$CREDIT EQU 1$$ @ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ A ( ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ A T ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ A !!CH $$DVTTP$$DVTP04$$ A !!CH $$/1111$$/2000$$ A !!EN A ASM /S A KPF /O
0x0d3dd0…0d3f64 Dummy {f00=0x0042, f01=0x0190, f02=» ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ B ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ B 0 !!CH $$DVTTP$$DVTP04$$ B !!CH $$/1111$$/2000$$ B z !!EN B ASM /S B KPF /O B KPF /S B SCR B LED TCLASS B !!IL 6 B EXTRN
0x0d3f64…0d40f8 Dummy {f00=0x0042, f01=0x0190, f02=»01 B z EXTRN DVKB02 C EXTRN DVDI02 C * EXTRN DVDY02 C J EXTRN DVGP03 C j EXTRN DVTP04 C !!IL 11 C DATA TC00 C DATA TC01 C DATA
0x0d40f8…0d428c Dummy {f00=0x0042, f01=0x0190, f02=» /0021 C DATA DVKB00 D DATA /00310 D 2 DATA DVDY00 D R TC00E EQU * D r TC01 DATA TC01E-* D DATA /00200 D DATA DVKB01 D DATA /00301
0x0d428c…0d4420 Dummy {f00=0x0042, f01=0x0190, f02=» DATA DVTP01 D DATA /00501 E DATA DVDY01 E @ TC01E EQU * E ` TC02 DATA TC02E-* E | DATA /00201 E DATA DVKB02 E DATA /00402 E D
0x0d4420…0d45b4 (1, 10) Dummy {f00=0x0042, f01=0x0190, f02=»E-* E z DATA /00302 F DATA DVGP03 F , TC03E EQU * F L TC04 DATA TC04E-* F h DATA /00303 F DATA DVTP04 F DATA /02314 F DATA DVTP04 F
0x0d45b4…0d4748 Dummy {f00=0x0042, f01=0x0190, f02=»F /S F SCR G LED SCLASS G !!IL 6 G * EXTRN DWSI01 G 8 EXTRN DWSO01 G X EXTRN DWII01 G x EXTRN DWIO01 G EXTRN DW1501 G EXTRN DWLP01 G EXTRN
0x0d4748…0d48dc Dummy {f00=0x0042, f01=0x018e, f02=»01 G | DATA TC02 H DATA TC03 H ( DATA TC04 H F DATA TC05 H d !!IL 12 H TC00 DATA TC00E-* H DATA /00101 H DATA DWSI01 H DATA /0
0x0d48dc…0d4a70 Dummy {f00=0x0042, f01=0x0190, f02=» DATA DWII01 I TC01E EQU * I $ TC02 DATA TC02E-* I @ DATA /00E11 I b DATA DWIO01 I TC02E EQU * I TC03 DATA TC03E-* I DATA /00611 I
0x0d4a70…0d4c04 Dummy {f00=0x0042, f01=0x0190, f02=»DWLP01 I ~ TC04E EQU * J TC05 DATA TC05E-* J * DATA /00601 J L DATA DW1500 J l DATA /015 J DATA DWREMU J DATA /00F00 J DATA DWDU01 J DATA /01F10 J
0x0d4c04…0d4d98 Dummy {f00=0x0042, f01=0x018e, f02=»IL 19 J **** K EXTRN CTAB01 K EXTRN CTAB02 K 0 EXTRN CTAB03 K F EXTRN ITAD K !!DL 021 K p !!DL 024 K !!DL 027 K !!DL 029 K !!DL 030 K !!DL 031 K !!DL 032 K !!DL 033 K !!IL 47 K **** K
0x0d4d98…0d4f2c Dummy {f00=0x0042, f01=0x010e, f02=» !!DL 057 L !!DL 058 L !!DL 059 L $ !!DL 060 L 4 !!DL 061 L D !!EN L T ASM /S L ` KPF /O L n KPF /S L | SCR L ASG /02,LP0F L SCR L INC SYSTAB L INC DEBUGM L LKE M L KPF /L,M:92SP L ASG /E0,TY
0x0d4f2c…0d50c0 Dummy {f00=0x0042, f01=0x2008, f02=» M 057 L !!DL 058 L !!DL 059 L $ !!DL 060 L 4 !!DL 061 L D !!EN L T ASM /S L ` KPF /O L n KPF /S L | SCR L ASG /02,LP0F L SCR L INC SYSTAB L INC DEBUGM L LKE M L KPF /L,M:92SP L ASG /E0,TY
0x0d50c0…0d5254 (1, 11) Dummy {f00=0x0043, f01=0x0142, f02=» M !!DL 049 N !!DL 052 N !!DL 055 N ( !!DL 057 N 8 !!DL 058 N H !!DL 059 N X !!DL 060 N h !!DL 061 N x !!EN N ASM /S N KPF /O N KPF /S N SCR N ASG /02,LP0F N SCR N INC SYSTAB N INC DEBUGM N
0x0d5254…0d53e8 Dummy {f00=0x0043, f01=0x2008, f02=» O !!DL 049 N !!DL 052 N !!DL 055 N ( !!DL 057 N 8 !!DL 058 N H !!DL 059 N X !!DL 060 N h !!DL 061 N x !!EN N ASM /S N KPF /O N KPF /S N SCR N ASG /02,LP0F N SCR N INC SYSTAB N INC DEBUGM N
0x0d53e8…0d557c Dummy {f00=0x0043, f01=0x018e, f02=» 2 P IDENT SCLASS REL 9.2 79-11-16 870105040920 P : P* B P* L P ENTRY SCLASS V P* l P* v P EXTRN DWSI01 P EXTRN DWSO01 P EXTRN DWII01 P EXTRN DWIO01 P
0x0d557c…0d5710 Dummy {f00=0x0043, f01=0x018e, f02=» v P EXTRN DWFD01 P* ( P* 2 P* < P* F PSCLASS DATA TCLASE-* P P DATA TC00 l P DATA TC01 P DATA TC02 P DATA TC03 P DATA TC04 P
0x0d5710…0d58a4 Dummy {f00=0x0043, f01=0x0190, f02=» v P DATA /0011 P DATA DWSO01 ( PTC00E EQU * H PTC01 DATA TC01E-* d P DATA /00E0 P DATA DWII01 PTC01E EQU * PTC02 DATA TC02E-* P
0x0d58a4…0d5a38 Dummy {f00=0x0043, f01=0x0190, f02=» /0061 P DATA DW1501 PTC03E EQU * 2 PTC04 DATA TC04E-* N P DATA /0080 p P DATA DWLP01 PTC04E EQU * PTC05 DATA TC05E-* P DATA /0060
0x0d5a38…0d5bcc Dummy {f00=0x0043, f01=0x4134, f02=» DATA /01F1 P DATA DWDU01 P DATA /00F8 0 P DATA DWFD01 P P DATA /01F9 f P DATA DWFD01 P DATA /02FA P DATA DWFD01 P DATA /03FB P DATA DWFD01 P
0x0d5bcc…0d5d60 Dummy {f00=0x0043, f01=0x2008, f02=» NT TCLASS * * $ * . ENTRY TCLASS 8 * N * X * b * l * v * * TCLASS DATALTCLASE-* TCLASE EQU * END @ 1 INTLT2 INTRT1
0x0d5d60…0d5ef4 (1, 12) Opaque[0x194]
0x0d5ef4…0d6088 # DirEnt {nam=»TCLASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2860, f03=0x0000}
0x0d5ef4…0d6088 IdxSect {
0x0d5ef4…0d6088 f00 = 0x0143 // 0xd5ef4 @0x0
0x0d5ef4…0d6088 f01 = 0x0004 // 0xd5ef6 @0x2
0x0d5ef4…0d6088 gno = [ // 0xd5ef8 @0x4
0x0d5ef4…0d6088 [0x00]: C0x0143.0x0.0
0x0d5ef4…0d6088 [0x01]: C0x0143.0x1.0
0x0d5ef4…0d6088 ]
0x0d5ef4…0d6088 }
0x0d6088…0d621c Dummy {f00=0x0143, f01=0x0190, f02=» 2 P IDENT TCLASS REL 9.2 79-11-16 870105040920 P : P* B P* L P ENTRY TCLASS V P* l P* v P EXTRN DVKB00 P EXTRN DVDY00 P EXTRN DVKB01 P EXTRN DVTP01 P
0x0d621c…0d63b0 Dummy {f00=0x0143, f01=0x0190, f02=» DVGP03 P EXTRN DVTP04 P EXTRN DVDY05 0 P* F P* P P* Z P* d PTCLASS DATA TCLASE-* n P DATA TC00 P DATA TC01 P DATA TC02 P DATA TC03 P
0x0d63b0…0d6544 Dummy {f00=0x0143, f01=0x018e, f02=» DATA DVKB00 P DATA /0031 P DATA DVDY00 8 PTC00E EQU * X PTC01 DATA TC01E-* t P DATA /0020 P DATA DVKB01 P DATA /0030 P DATA
0x0d6544…0d66d8 Dummy {f00=0x0143, f01=0x0190, f02=» v P DATA /0050 P DATA DVDY01 ( PTC01E EQU * H PTC02 DATA TC02E-* d P DATA /0020 P DATA DVKB02 P DATA /0040 P DATA DVDI02 P
0x0d66d8…0d686c Dummy {f00=0x0143, f01=0x0190, f02=»A /0030 P DATA DVGP03 PTC03E EQU * 4 PTC04 DATA TC04E-* P P DATA /0030 r P DATA DVTP04 P DATA /0231 P DATA DVTP04 P DATA /013
0x0d686c…0d6a00 Dummy {f00=0x0143, f01=0x4024, f02=»TC05E EQU * P END @ DVGP03 PTC03E EQU * 4 PTC04 DATA TC04E-* P P DATA /0030 r P DATA DVTP04 P DATA /0231 P DATA DVTP04 P DATA /013
0x0d6a00…0d6b94 (1, 13) Dummy {f00=0x0143, f01=0x2008, f02=» NT TCLASS * * $ * . ENTRY TCLASS 8 * N * X * b * l * v * * TCLASS DATALTCLASE-* TCLASE EQU * END @ 1 INTLT2 INTRT1
0x0d6b94…0d6d28 Dummy {f00=0x0143, f01=0x0190, f02=» " ^ T @ 9J A T _ 1@ _ ^ 9 V >! D A A > > > > > > > > ^ _ ^ _ ? ? ? ? ? A ^ @ ? ? > > > > > > > @ > ? ? ? ? ? ? ? A > A >
0x0d6d28…0d6ebc Dummy {f00=0x0143, f01=0x0190, f02=» 0:D A z_* A " A A b P & T A A " @ R _U . r " A >: D A > " A Z A ^ b$ T ! " A @ BT 0W 0W A @ BT 1W 1 @ " P& A UT @ W T @ W T @ W @ " " ? ?
0x0d6ebc…0d7050 Dummy {f00=0x0143, f01=0x0190, f02=» ! R :W" r W r W W ?W /W : A W ! A A PL _ @ _ I T " T A P I T$! A A A A A A A A J A A @ A @ > @ _ . I d 0R> M A P6 T @
0x0d7050…0d71e4 Dummy {f00=0x0143, f01=0x0190, f02=» H ( ( P c P W~ T P> , T6 L M 0 - A Q @ P A 2 T _ P, A V ( U P" @, V L, W @, U 2 : A A Q > ? A ~ V _* 8 " Q Z P 0 9 _ _, ? P
0x0d71e4…0d7378 Dummy {f00=0x0143, f01=0x0190, f02=» ^ $P T I R $ 5 % > ? &W ? W ? T T$ U U U U T U U 2 > > 4 T - 1_( U T P 0 U _t ? @ T 0 A 1 Q Q > > 0 @ 1 A P P > ? * X " R" Y T
0x0d7378…0d750c Dummy {f00=0x0143, f01=0x0190, f02=» W W > > > > > > @Q V ? Q > _ > ? _ > > ? ^ ! Y ^ _ ? A. $ ( , 0 4 8 < #M 1 A ~ _* 8 Q Z P 0 9 _ _, ? P
0x0d750c…0d76a0 Dummy {f00=0x0143, f01=0x0190, f02=» ^ $P T I R $ 5 % > ? W ? W ? T T U U U U T U U 2 > > 4 T - 1_( U T P 0 U _t ? @ T 0 A 1 Q Q > > 0 @ 1 P P > ? X " R Y
0x0d76a0…0d7834 (1, 14) Opaque[0x194]
0x0d7834…0d79c8 # DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x0878, f03=0x0000}
0x0d7834…0d79c8 IdxSect {
0x0d7834…0d79c8 f00 = 0x0043 // 0xd7834 @0x0
0x0d7834…0d79c8 f01 = 0x00ac // 0xd7836 @0x2
0x0d7834…0d79c8 gno = [ // 0xd7838 @0x4
0x0d7834…0d79c8 [0x00]: C0x0043.0x3.0
0x0d7834…0d79c8 [0x01]: C0x0044.0x0.0
0x0d7834…0d79c8 [0x02]: C0x0044.0x1.0
0x0d7834…0d79c8 [0x03]: C0x0044.0x2.0
0x0d7834…0d79c8 [0x04]: C0x0044.0x3.0
0x0d7834…0d79c8 [0x05]: C0x0045.0x0.0
0x0d7834…0d79c8 [0x06]: C0x0045.0x1.0
0x0d7834…0d79c8 [0x07]: C0x0045.0x2.0
0x0d7834…0d79c8 [0x08]: C0x0045.0x3.0
0x0d7834…0d79c8 [0x09]: C0x0046.0x0.0
0x0d7834…0d79c8 [0x0a]: C0x0046.0x1.0
0x0d7834…0d79c8 [0x0b]: C0x0046.0x2.0
0x0d7834…0d79c8 [0x0c]: C0x0046.0x3.0
0x0d7834…0d79c8 [0x0d]: C0x0047.0x0.0
0x0d7834…0d79c8 [0x0e]: C0x0047.0x1.0
0x0d7834…0d79c8 [0x0f]: C0x0047.0x2.0
0x0d7834…0d79c8 [0x10]: C0x0047.0x3.0
0x0d7834…0d79c8 [0x11]: C0x0048.0x0.0
0x0d7834…0d79c8 [0x12]: C0x0048.0x1.0
0x0d7834…0d79c8 [0x13]: C0x0048.0x2.0
0x0d7834…0d79c8 [0x14]: C0x0048.0x3.0
0x0d7834…0d79c8 [0x15]: C0x0049.0x0.0
0x0d7834…0d79c8 [0x16]: C0x0049.0x1.0
0x0d7834…0d79c8 [0x17]: C0x0049.0x2.0
0x0d7834…0d79c8 [0x18]: C0x0049.0x3.0
0x0d7834…0d79c8 [0x19]: C0x004a.0x0.0
0x0d7834…0d79c8 [0x1a]: C0x004a.0x1.0
0x0d7834…0d79c8 [0x1b]: C0x004a.0x2.0
0x0d7834…0d79c8 [0x1c]: C0x004a.0x3.0
0x0d7834…0d79c8 [0x1d]: C0x004b.0x0.0
0x0d7834…0d79c8 [0x1e]: C0x004b.0x1.0
0x0d7834…0d79c8 [0x1f]: C0x004b.0x2.0
0x0d7834…0d79c8 [0x20]: C0x004b.0x3.0
0x0d7834…0d79c8 [0x21]: C0x004c.0x0.0
0x0d7834…0d79c8 [0x22]: C0x004c.0x1.0
0x0d7834…0d79c8 [0x23]: C0x004c.0x2.0
0x0d7834…0d79c8 [0x24]: C0x004c.0x3.0
0x0d7834…0d79c8 [0x25]: C0x004d.0x0.0
0x0d7834…0d79c8 [0x26]: C0x004d.0x1.0
0x0d7834…0d79c8 [0x27]: C0x004d.0x2.0
0x0d7834…0d79c8 [0x28]: C0x004d.0x3.0
0x0d7834…0d79c8 [0x29]: C0x004e.0x0.0
0x0d7834…0d79c8 [0x2a]: C0x004e.0x1.0
0x0d7834…0d79c8 [0x2b]: C0x004e.0x2.0
0x0d7834…0d79c8 [0x2c]: C0x004e.0x3.0
0x0d7834…0d79c8 [0x2d]: C0x004f.0x0.0
0x0d7834…0d79c8 [0x2e]: C0x004f.0x1.0
0x0d7834…0d79c8 [0x2f]: C0x004f.0x3.0
0x0d7834…0d79c8 [0x30]: C0x0050.0x0.0
0x0d7834…0d79c8 [0x31]: C0x0050.0x1.0
0x0d7834…0d79c8 [0x32]: C0x0050.0x2.0
0x0d7834…0d79c8 [0x33]: C0x0050.0x3.0
0x0d7834…0d79c8 [0x34]: C0x0051.0x0.0
0x0d7834…0d79c8 [0x35]: C0x0051.0x1.0
0x0d7834…0d79c8 [0x36]: C0x0051.0x2.0
0x0d7834…0d79c8 [0x37]: C0x0051.0x3.0
0x0d7834…0d79c8 [0x38]: C0x0052.0x0.0
0x0d7834…0d79c8 [0x39]: C0x0052.0x1.0
0x0d7834…0d79c8 [0x3a]: C0x0052.0x2.0
0x0d7834…0d79c8 [0x3b]: C0x0052.0x3.0
0x0d7834…0d79c8 [0x3c]: C0x0053.0x0.0
0x0d7834…0d79c8 [0x3d]: C0x0053.0x1.0
0x0d7834…0d79c8 [0x3e]: C0x0053.0x2.0
0x0d7834…0d79c8 [0x3f]: C0x0053.0x3.0
0x0d7834…0d79c8 [0x40]: C0x0054.0x0.0
0x0d7834…0d79c8 [0x41]: C0x0054.0x1.0
0x0d7834…0d79c8 [0x42]: C0x0054.0x2.0
0x0d7834…0d79c8 [0x43]: C0x0054.0x3.0
0x0d7834…0d79c8 [0x44]: C0x0055.0x0.0
0x0d7834…0d79c8 [0x45]: C0x0055.0x1.0
0x0d7834…0d79c8 [0x46]: C0x0055.0x2.0
0x0d7834…0d79c8 [0x47]: C0x0055.0x3.0
0x0d7834…0d79c8 [0x48]: C0x0056.0x0.0
0x0d7834…0d79c8 [0x49]: C0x0056.0x1.0
0x0d7834…0d79c8 [0x4a]: C0x0056.0x2.0
0x0d7834…0d79c8 [0x4b]: C0x0056.0x3.0
0x0d7834…0d79c8 [0x4c]: C0x0057.0x0.0
0x0d7834…0d79c8 [0x4d]: C0x0057.0x1.0
0x0d7834…0d79c8 [0x4e]: C0x0057.0x2.0
0x0d7834…0d79c8 [0x4f]: C0x0057.0x3.0
0x0d7834…0d79c8 [0x50]: C0x0058.0x0.0
0x0d7834…0d79c8 [0x51]: C0x0058.0x1.0
0x0d7834…0d79c8 [0x52]: C0x0142.0x3.0
0x0d7834…0d79c8 [0x53]: C0x0080.0x3.0
0x0d7834…0d79c8 [0x54]: C0x0082.0x0.0
0x0d7834…0d79c8 [0x55]: C0x0082.0x1.0
0x0d7834…0d79c8 ]
0x0d7834…0d79c8 }
0x0d79c8…0d7b5c Dummy {f00=0x0043, f01=0x0190, f02=» J F IDENT MONTAB REL 9.2 79-11-16 870105040920 F B MONTABK SPDLCI FREQUE PAGQUE INTLT1 INTLT2 INTLT3L INTLT4 R & " INTRT1 INTRT2 INTRT3 INTRT4 MONTABK FREQUE PAGQUE INT
0x0d7b5c…0d7cf0 Dummy {f00=0x0043, f01=0x4154, f02=» INTRT4 SYSLOD CTAB01L $ CTAB02 6 * & H CTAB03 v ITADN KBAD3 TPADN GPADN DIADN DYADN , (
0x0d7cf0…0d7e84 Dummy {f00=0x0043, f01=0x018e, f02=» > @ IDENT DEBUGM REL 9.2 79-11-16 870105040920 dBUG F |BUG T , ( A U A @ * A d , ( ! A " @ ~ A A ~ @ , ( A A A @ A A @ , ( a A A
0x0d7e84…0d8018 Dummy {f00=0x0043, f01=0x0190, f02=» f , ( , ( $ ( , 0 4 8 , ( # 8 < h , ( C , ( c , (
0x0d8018…0d81ac Dummy {f00=0x0043, f01=0x0190, f02=» T :a R T <a Z _ = , ( :A , >a @ ( , ( " # A P UW B X , ( C @ = / M Q , ( c R S T Y G P H L , ( V I U _v
0x0d81ac…0d8340 Dummy {f00=0x0043, f01=0x0190, f02=» P A A x , ( . , + - ; : , ( # X " H W X " H H H , ( C A A A _T @ P A 1+ x , ( !T c X A _ @ A @ A _ , ( ! A UP " , (
0x0d8340…0d84d4 (1, 15) Dummy {f00=0x0044, f01=0x0190, f02=» h , ( 0 _, W , ( ! # W P @ & 0 8 , ( C T A P P h , ( c _b _J A , ( $T @ W @ , ( % T @ W
0x0d84d4…0d8668 Dummy {f00=0x0044, f01=0x0190, f02=» _L W @ $ 0 , ( # W $ A W @ A ( , ( C P 3P X , ( c C @ P @ @ P @ Q , ( A $ @ A " T @ W @ , ( ( A A
0x0d8668…0d87fc Dummy {f00=0x0044, f01=0x0190, f02=» @ P x , ( # & @ A 9 Y , ( $ C *>a Y j c A A " H , ( P c & A *<a P j A x , ( @ ) " A H , ( U A @ & @ @ , (
0x0d87fc…0d8990 Dummy {f00=0x0044, f01=0x0190, f02=» h , ( # RE RN ME MN W R , ( C ( T ( W P T $ ; V 8 , ( c ; W &~ P &`P 6 P @ h , ( $ P $W $ T P , ( #~ > V . >A P Y X , ( W ^ ?
0x0d8990…0d8b24 Dummy {f00=0x0044, f01=0x0190, f02=» ^ P _ " ^ , ( $ C T @ 9J A T _ 1@ _ ( , ( c ^ 9 V >! D A X , ( A > > > > > , ( > > > ^ _ ^ _ ? ? ? ? ? , ( A ^ @ ?
0x0d8b24…0d8cb8 Dummy {f00=0x0044, f01=0x0190, f02=» A > A x , ( C > A A ^ " , , ( c , A A :B A Q (P _ # # H , ( H A " A 0R x , ( 9U AR FQ 0:D A , ( _* A " A A , (
0x0d8cb8…0d8e4c Dummy {f00=0x0044, f01=0x0190, f02=» h , ( C $ T ! " A @ T , ( c 0W 0W A @ T 1W 1 8 , ( @ " P A UT @ W T h " @ W T @ W @ " , ( @ D H L P T X ` d h l p t x | , (
0x0d8e4c…0d8fe0 Dummy {f00=0x0044, f01=0x0190, f02=» /W : A W ! A A ~ , ( y P _ @ _ , ( I T " T N , ( A P I T ! A A A A A A ~ , ( A A @ A A @ , ( B A @ > @ _ $
0x0d8fe0…0d9174 (1, 16) Dummy {f00=0x0044, f01=0x0190, f02=»V A n @ y H D ! ' 3 7 C G S W c g s w " H D ! P h L R h h : F # + P 1P 5W ; h ? L n H D ! C G Z I P M S W [ _ c g k o s w { H D !
0x0d9174…0d9308 Dummy {f00=0x0044, f01=0x0190, f02=» p R H D !+^ T P T W 6 W Z W P F b W H D !5 #W +PP = b C IT M SP W f ] h a 0 i Z m F s : y h 8 P Z H D ! T W T W P F F 8 F F H D ! p Z W b %
0x0d9308…0d949c Dummy {f00=0x0044, f01=0x0190, f02=» ` Z P ) Z 7 8 = X U n c Z m } 8 n Z T P@ H D !x PB p p Z $ T AR, GT KW UT ]V mW~ uP yP }P P F H D ! < W TR PJ V P W P W P W & " W 3P H D ! 9 h IT UT ] kV o w {
0x0d949c…0d9630 Dummy {f00=0x0044, f01=0x412c, f02=»U h # 4 + : / 4 9 P = T C X GT [ _ 8 v H D !, aT eW i mW q u 8 wT {W P& T W T 2 H D !)B W T W ?R EW" K h OW U h YW ]W aW eW k oW ~ H D ! u yPL } T T P T$ 'R> /P6 7T. =P EW ]T k
0x0d9630…0d97c4 Dummy {f00=0x0044, f01=0x0190, f02=» J F IDENT SYSTAB REL 9.2 79-11-16 870105040920 F B SCTMSZK SCTSFA SCTEFA SCTPLD SCTANO SCTADA SCTPAGL SCTSEG R F B SCTSWB SCTNOS SCTNOP SCTPSZ SCTMMC SCTLACL SCTMMP SCTLAP F B SCTNPE SCTSTB SCTOPT SCTTCT
0x0d97c4…0d9958 Dummy {f00=0x0044, f01=0x0190, f02=»:PA PAG:SB SWB:NC SWB:DS SWB:ELS SWB:NS0 z T:ACSB 4 SEG:ST F SEG:DSL Z SEG:EL n SEG:PBI PAG:QF PAG:QBV PAG:PA PAG:SB SWB:NC SWB:DS
0x0d9958…0d9aec Dummy {f00=0x0044, f01=0x0190, f02=» IHSOP . IH1501W > IH1502 P CHLT1 b IHFDN r CHRT1 , ( CHRT2 , ( ! , ( 1
0x0d9aec…0d9c80 Dummy {f00=0x0044, f01=0x0190, f02=» , ( a " , ( q R HALTN SCTMSZK SCTSFA SCTEFA SCTPLD SCTANO
0x0d9c80…0d9e14 (1, 17) Dummy {f00=0x0044, f01=0x018e, f02=» SCTNOS SCTNOP SCTPSZ & SCTMMC : SCTLACL N SCTMMP b SCTLAP v SCTNPE SCTSTB SCTOPT SCTTCT SCTCDT SCTBUG~ SCT
0x0d9e14…0d9fa8 Dummy {f00=0x0044, f01=0x4082, f02=» SCTDCT _ 6 L l@ ~ v SCTNPE SCTSTB SCTOPT SCTTCT SCTCDT SCTBUG~ SCT
0x0d9fa8…0da13c Dummy {f00=0x0044, f01=0x0190, f02=» J F IDENT TDISP REL 9.2 79-11-16 870105040920 8 4 TDISP MEXIT DISIOE DISEND DISQUE PRUNY RETUR8 R DISQUE PRUNY RETUR8 MEXIT EXITN DISIOE TENDIO
0x0da13c…0da2d0 Dummy {f00=0x0044, f01=0x018e, f02=» (X0 @ P T x TTB:SBA QLTDSK0 * * & = @ M ]@ , ) L P $R < , ( U _, A P P Y U ( j TTB:SA` TTB:PWN * & q ) 5 > > [ [ SEG:PBA PAG:QB`
0x0da2d0…0da464 Dummy {f00=0x0044, f01=0x4116, f02=» SCTNPE, TTB:MT , ( @ - P _ Z 9B ( SCTLAP X T:ACSB j * & $H @ U W Z Z Z | ? Z > 4 0 W 9P MP QR _P* cP iU PJ P P W
0x0da464…0da5f8 Dummy {f00=0x0044, f01=0x0190, f02=» J F IDENT LRPINT 9.2DK 1 79-11-16 870105040920 J F " IHLKM LKM030 LKMRQE LKMERR LKMQDI IHRTC TIMQUE@ MONCLO IHPFARC R INIFLG IHLKM INTSAV PRUNN TTB:SA , ( A$ A
0x0da5f8…0da78c Dummy {f00=0x0044, f01=0x0190, f02=» SEG:PB * & 5 P c P W T P , T L PAGQUE# > PAG:QBH P PQEMTYT b , ( Q M 0 - A Q t TTABLD QTJOB , ( gDH @ P A T LKM030
0x0da78c…0da920 Dummy {f00=0x0044, f01=0x0190, f02=»R HALTN LKMRQE LKMQDI 0 , ( B W @ U D TDISP t IHRTC , ( I A A Q > ? QMJOB SWLXY MONCLO , ( @ A
0x0da920…0daab4 (1, 18) Dummy {f00=0x0044, f01=0x418a, f02=» _, ? P H z TIMQUE@ < INIFLG N . IHPFARC P B , ( 7 H #P A V DISQUEA , ( @ U A LQ ? @ * @ ) A *_ PFINIT & " q F F A N , A _ H D !
0x0daab4…0dac48 Dummy {f00=0x0044, f01=0x0190, f02=» J F IDENT TPROC REL 9.2 79-11-16 870105040920 * & TWAIT TEXIT TACTOT TPAUSE TMWAIT R FNDDWT TWAIT DWTWAT TEXIT EXITN TDISP * & @ P "R Y W
0x0dac48…0daddc Dummy {f00=0x0044, f01=0x018a, f02=» P n TPAUSE TMWAIT 6 " DWTST 6 , ( 1@ _ <U "R P F DWTTAB v , ( MD@ X R X T X T . T , ( g G Y6 G _b P LKMRQE LKMQDI
0x0daddc…0daf70 Dummy {f00=0x0044, f01=0x4008, f02=»@ n TPAUSE TMWAIT 6 " DWTST 6 , ( 1@ _ <U "R P F DWTTAB v , ( MD@ X R X T X T . T , ( g G Y6 G _b P LKMRQE LKMQDI
0x0daf70…0db104 Dummy {f00=0x0044, f01=0x0190, f02=» J F IDENT MSUBS REL 9.2 79-11-16 870105040920 D @ SAVE8 QTJOB QMJOB ACTOT ACTOTP EXITY GETBLK FREBLKL FNDDWT R H D ! FNDTID PFINIT SWL48 SWLXY ILLINT INTSAV@ HALTY IHRET8 IHRET2 IHRET1 IHRTN SAVE8
0x0db104…0db298 Dummy {f00=0x0044, f01=0x0190, f02=»P T I v QMJOB J TTMJOB ( ACTOTP T : , ( ; R $ 5 % > ? W ? N ACTOT ~ TTB:SA , ( Y $ W ? T T U U U TTB:ID TTB:SB, , ( s H U
0x0db298…0db42c Dummy {f00=0x0044, f01=0x0190, f02=» T P 0 U z GETBLK FREQUE . , ( _t ? @ T @ FREBLKL p * & 0 A 1 Q Q > > 0 @ FNDDWT TTB:TD , ( 1 A P P > ?
0x0db42c…0db5c0 Dummy {f00=0x0044, f01=0x0190, f02=»W > _& @ 8 | * & K R Y T ? X D T FNDTID | J SCTTCTD ^ * & e W > _& W > 8 X W ? ` p , ( @ @ P $ H W IHRET8 IHRET2 IHRET1
0x0db5c0…0db754 (1, 19) Dummy {f00=0x0045, f01=0x4154, f02=» , ( > _ > ? _ > > ? ^ INTSAV@ 4 ILLINT H HALTY , ( ! Y ^ _ ? n A. H D ! 4 $ 1P ;R SW [W gT$ T P T R" #T < 8 3T> 9
0x0db754…0db8e8 Dummy {f00=0x0045, f01=0x0190, f02=» J F IDENT TTMJOB REL 9.2 79-11-16 870105040920 F B TTB:LAK TTB:MT TTB:SB TTMJOB TTB:QL TTB:ID TTB:STL TTB:PP R TTB:PW TTB:SA TTB:TD , ( $ ( , 0 4 8 < TTB:LAK TTB
0x0db8e8…0dba7c Dummy {f00=0x0045, f01=0x40ac, f02=» TTB:PW TTB:SA , ( ! #M 1 & TTB:TD ( V A j K L @ A TTB:TD , ( $ ( , 0 4 8 < TTB:LAK TTB
0x0dba7c…0dbc10 Dummy {f00=0x0045, f01=0x018e, f02=» J F IDENT SYSLDM REL 9.2 79-12-20 870105040920 SYSLDMK R SYSLDMK d SCTSFA x SYSBAS SCTEFA TCLASSV , ( I A SCLASS SAV
0x0dbc10…0dbda4 Dummy {f00=0x0045, f01=0x0190, f02=» f , ( K , P , - 4 ] CMPADR 8 SCTOPT: J , ( i @ 4 Y 5 X SAVE01f * & * _6 : @ TTMJOB SCTDMT , ( " ]
0x0dbda4…0dbf38 Dummy {f00=0x0045, f01=0x0190, f02=» . !TTP @ NXTBLK $ , ( T Y " !TTX" 6 SCTTCTW f , ( B$ A 9 A $ : @ $ x SCTDMI , ( %B @ P @ &" P #D " , ( A P #E " P #F
0x0dbf38…0dc0cc Dummy {f00=0x0045, f01=0x0190, f02=»9B @ @ z * & T : SCTDML@ F SAVE04 X , ( @ (:B W * . !TTP j SAVE19E SAVE16E , ( W , N =H N W SAVE17T , (
0x0dc0cc…0dc260 Dummy {f00=0x0045, f01=0x0190, f02=»W @ % P , ( Y P " U $ , ( w _2 T , ( P " U , ( _2 , ( A V * V ,P S
0x0dc260…0dc3f4 (1, 20) Dummy {f00=0x0045, f01=0x0190, f02=» % P p , ( 7 W @ % P " !TTT bREL @ , ( @ S 6 @ @ T N , ( m : @ ! ~ SCTADA SCTLAC PRGLG1 , ( $ P @ 8 @ : < CR
0x0dc3f4…0dc588 Dummy {f00=0x0045, f01=0x0190, f02=» h , ( @ !RRP @ ! T , ( 3 @ & P 3 8 , ( 3 YL @ @ h , ( 1 T : FREQUE SCTBLK , ( K @ B ` $ @
0x0dc588…0dc71c Dummy {f00=0x0045, f01=0x0190, f02=» @ T p , ( : P , ( H S S _ : . ! @ , ( TTP V W , p * & * P , ( _ SAVE03N
0x0dc71c…0dc8b0 Dummy {f00=0x0045, f01=0x0190, f02=» H I K T , ( } + Y@ V 0 _j V , , ( Y " !TTX @ @ T P * & : , ( $ @ R @ , ( T P
0x0dc8b0…0dca44 Dummy {f00=0x0045, f01=0x0190, f02=» W , P W N SAVE14G , ( K ( W P 0 , ( g G =h G V P V < ` , ( V N P W N _B V , ( $ W V , Yr " !TTX @ , ( @ T
0x0dca44…0dcbd8 Dummy {f00=0x0045, f01=0x0190, f02=» $ $ , ( % _. P V 4 SCTDCTN P , ( C U $ $ _. b , ( aH @ R @ @ ! P V SCTDMC SCTCDT * & y 8 8 8 @ T>B
0x0dcbd8…0dcd6c Dummy {f00=0x0045, f01=0x018e, f02=» V t , ( N _2 U V * & 8 8 8 4 D P B , ( ! L @ # P H I p , ( = K T + Y@ _`R , ( ]H @ @ R @ % P V , ( u
0x0dcd6c…0dcf00 Dummy {f00=0x0045, f01=0x0190, f02=» * & V Z @ 0 V SAVE072 6 , ( P _ W ^ $ q > R H DWTECH x * & P >b W >b & 8P D P U SYSLOD , ( ` E W b V W R 9 , ( W
0x0dcf00…0dd094 (1, 21) Dummy {f00=0x0045, f01=0x0190, f02=» V j , ( o ^ -W H P U ` I @ % , ( P H I H T P H : , ( U V FU W j , ( F H < + + P , ( @ V : V X $ * & F !
0x0dd094…0dd228 Dummy {f00=0x0045, f01=0x0190, f02=» W R _ $ SAVE21S ( , ( qD W Z : W 4 f : SAVE23I j , ( @ h | , ( *T P _ / P , ( *_ *T P _ .P
0x0dd228…0dd3bc Dummy {f00=0x0045, f01=0x0190, f02=» _ V 4P V f ] ~ , ( ; jW f P _ @ , ( U @ T N , ( o @ : N =H N 2 : N =H N ~ , ( 2 : &=H F 2 : F =H , ( F 2 : F =H F 2 :
0x0dd3bc…0dd550 Dummy {f00=0x0045, f01=0x0190, f02=» ! n , ( P (W ( : ~ F , ( = v @ : < > , ( Y CRT @ ! P ` : @ E "W n SYSLDA * & sH ` : @ E " l H D !p P # N / N G &
0x0dd550…0dd6e4 Dummy {f00=0x0045, f01=0x0190, f02=» g uU P0 U PJ 5P ;W CP QT kT P T H D ! PP P T P 3T [P _ g {V T P H H D !m P r P ! )Ph 1 OP$ _P T R T P T H D ! * 7 r ? CPT Y a i P T
0x0dd6e4…0dd878 Dummy {f00=0x0045, f01=0x410e, f02=» P W P P W V W R W 3P@ AT@ x H D ! GP cP sW yP PD P( U P T !WR %T /W, 3T ?W ET QW 4 H D ! cR T P P T P$ P U P W 'P 3P =W IP [T P ( $ T P P P !W [T" cP qW @
0x0dd878…0dda0c Dummy {f00=0x0045, f01=0x0190, f02=» J F IDENT SYSLDA REL 9.2 79-12-21 870105040920 D @ JUMPY SYSLDA dREL LDALEN MOVEY ERROR CMPADR NXTBLKL NXTCOM R F B CONVRT GETNUM MMTAB TABBE MMEND MMDDIV BUFSIZ` SYSBUF M:REL F B SAVE01 SAVE120 SAVE03 SAVE04 S
0x0dda0c…0ddba0 Dummy {f00=0x0045, f01=0x0190, f02=»9( SAVE20 SAVE21 SAVE22 SAVE23F SAVE24V x SAVE25 2 |REL D $ W W " T , ( 1 ; Z [ : : [ [ | SYSLDMP JUMPY , ( Q : SAVE0
0x0ddba0…0ddd34 (1, 22) Dummy {f00=0x0045, f01=0x0190, f02=»AVE08 , ( o SAVE09 @ SAVE10 T SAVE11 h SAVE120 | SAVE13D SAVE22 SAVE25 M:REL SYSBUF BUFSIZ` , (
0x0ddd34…0ddec8 Dummy {f00=0x0045, f01=0x0190, f02=» p SAVE18 r SAVE19( t SAVE20 n 2 SAVE21 v F SAVE23F z Z SAVE24V | n MMDDIV MMTAB TABBE MMEND , (
0x0ddec8…0de05c Dummy {f00=0x0045, f01=0x0190, f02=» U R $ )_ : , ( ? W W W W W $ , ( _ Q V V v x W T , ( V V v p R W V , ( W ^< _@ V _P V , ( V : V
0x0de05c…0de1f0 Dummy {f00=0x0045, f01=0x0190, f02=»:K W r t , ( ? Q R t , ( _ V > v : D , ( V W V ) : V t , ( <B W |P v v , ( : $ V |P v w , (
0x0de1f0…0de384 Dummy {f00=0x0045, f01=0x0190, f02=» , ( ? <B V x V |P v , ( _ 1 v W V z ` _f V 4 , ( : W R R P W x d , ( @ _ V : " D P , ( W V P $;A^ D E D , ( P V
0x0de384…0de518 Dummy {f00=0x0045, f01=0x0190, f02=» ;B " , ( _ R P |P v $ CMPADR T , ( v : V W 0 : h , ( V P 9a _ " ( ) 8 ( ) , ( : " $ V P 9A _ 0 : W , ( W W ?A
0x0de518…0de6ac Dummy {f00=0x0045, f01=0x018e, f02=» j SAVE8 , ( = 0 H W : ? ? SCTLAC J , ( ] R 0 ACTOT RETUR8P , ( y R P P B _ : , ( V ) v : 4P
0x0de6ac…0de840 Dummy {f00=0x0045, f01=0x0190, f02=» , ( ` V b pP , ( ` $ $ W H 4 , ( @ - L ) P _ " = d , ( E M D 4 Q _d * L , ( P m > = G V W , ( $ V E
0x0de840…0de9d4 (1, 23) Dummy {f00=0x0046, f01=0x0190, f02=» @ @ x SCTPAG SCTNOPN * * & ! @ < , ( P P P P _ _ j SCTPSZ , ( D @ 9N @ :b @ :b , ( / V W U
0x0de9d4…0deb68 Dummy {f00=0x0046, f01=0x0190, f02=» l SCTSEG , ( A A 9n A :B A , ( D @ .V N PAGQUE ~ , ( 3 S Y& P , ( S P , ( 3 _
0x0deb68…0decfc Dummy {f00=0x0046, f01=0x0190, f02=» @ W A & TDISP & , ( k : A ( > 6 , ( @ l : R W n f , ( V pT : N V l W H V ]" , ( " . nT W v W , ( D n V ~P
0x0decfc…0dee90 Dummy {f00=0x0046, f01=0x0190, f02=» v G G v U , ( i v G v : P V & , ( : V ~P W x V , ( _$ 8 V V x % V v % : V , ( V > 9k! , ( P % _ V V W W
0x0dee90…0df024 Dummy {f00=0x0046, f01=0x018e, f02=» f v ) G v , ( g v ` " W p W ~ pP , ( @ R P _ W ~ R F , ( $ X4 _ ` @ ` W v , ( P W ~ pP V W , ( % R , , (
0x0df024…0df1b8 Dummy {f00=0x0046, f01=0x0190, f02=» f , ( c P * I W z ` p , ( P H - V I 8 , ( " R E R T h , ( E D E @ v H v , ( E > #_v W | , ( ;b W
0x0df1b8…0df34c Dummy {f00=0x0046, f01=0x0190, f02=» , ( A 0 :C # : .=H N , ( D a : .=H N : 4 GETNUM d , ( N : d 8" x SYSLDA , ( BR _ ZY QY : $ @ , ( V H W z W | CR
0x0df34c…0df4e0 Dummy {f00=0x0046, f01=0x0190, f02=» !TTP N x , ( 3 :H N TBT W W 2 " T , ( S @ N =H N H , ( s : @ ) T !TTXX !CCT x , ( @ X !UUT d W , ( 2 .:H N P V , (
0x0df4e0…0df674 (1, 24) Dummy {f00=0x0046, f01=0x0190, f02=» h , ( / :b / W , ( O : W @ W D 8 , ( k V W W ` " h , ( W p @ pP " , ( 4X 1 R , ( @Z0
0x0df674…0df808 Dummy {f00=0x0046, f01=0x0190, f02=» W V V >k 8 W , ( G W t V V : ( g x X H D ! W> 2 0 . 1 2 C S Y j V !W %U 1R g iQ@ R( l H D !e P z V U z V z M OQ QR ] _V V W V H D !
0x0df808…0df99c Dummy {f00=0x0046, f01=0x4152, f02=» , P H D ! P P P P| ?V CW GU6 QT WW aP iP( mP qV uW yU H D ! Q P P V P4 P 7 B W x [ R T T" P %V X H D ! 0 3P _U {P V P P P0 P Pn /P 3 B = B AW GT eP Pl H D ! T R P R 'P
0x0df99c…0dfb30 Dummy {f00=0x0046, f01=0x0190, f02=» J F IDENT LDTASK REL 9.2 79-12-06 870105040920 6 2 LT:DSKK LT:SWB TTABLD QLTDSK QLTSWB PQEMTY R PQEMTY TTABLD , ( #L 1
0x0dfb30…0dfcc4 Dummy {f00=0x0046, f01=0x0190, f02=»AGQUEA , ( @ A ( @ PAG:QB > PAG:SB P * & % X H A ) @ H b TTB:MT , ( = D P 1 % E I L TLDS20 SEG:EL * & U U
0x0dfcc4…0dfe58 Dummy {f00=0x0046, f01=0x0190, f02=»CW , ( ( C 9b;BT SCTLAP : ECBBA L SCTPLDT , ( " C 0 @ # n * & W C U R C , ( W C R # R , ( _8
0x0dfe58…0dffec Dummy {f00=0x0046, f01=0x4152, f02=»TB:SBH * & ) HT :" U U ( F QLTSWB X < , ( A M 0 - A Q '_D P QLTDSK ^ ACTOT LKMERR LT:SWB j & " Y W * , D @ @4 V ?P T
0x0dffec…0e0180 Dummy {f00=0x0046, f01=0x4114, f02=» J F IDENT DWII01 REL 9.2 79-11-16 870105040920 DWII01K R DWII01K d ITADN x , ( IT:BUF @ , ,
0x0e0180…0e0314 (1, 25) Dummy {f00=0x0046, f01=0x4114, f02=» J F IDENT DWIO01 REL 9.2 79-11-16 870105040920 DWIO01K R DWIO01K d ITADN x , ( IT:BUF @ , ,
0x0e0314…0e04a8 Dummy {f00=0x0046, f01=0x4106, f02=» J F IDENT DW1501 9.2DK 1 81-11-05 870105040920 DW1501K R DW1501K d DC15AD x , ( DC @ 0 $ 0 @
0x0e04a8…0e063c Dummy {f00=0x0046, f01=0x0190, f02=» J F IDENT DRKB03 REL 9.2 79-11-16 870105040920 KBAD3 R KBAD3 b DWTST t * & @ 2 ( ? X V Y TDISP LDREGE , ( ! W Y , (
0x0e063c…0e07d0 Dummy {f00=0x0046, f01=0x0190, f02=» W t SETIMP , ( Y X " P :A & * & : R Q W Y <D X V , ( ? ?: T p > > , ( P P C B T , ( B % X . $ 4 T
0x0e07d0…0e0964 Dummy {f00=0x0046, f01=0x018e, f02=» , ( Y _` B P $$ R % C , ( y * ! W Y +P Y *P Y ( 4 , ( P Y )P R _Q P OR d , ( R W " ! B W W , ( @ 0 Z ! B Z Z& , ( X . 0
0x0e0964…0e0af8 Dummy {f00=0x0046, f01=0x0190, f02=» DISEND , ( OA Y C ! " * & i @ Q R X # P X R ;GV X J LDREG x , ( @ P P y P X DWTA3 DWTSB2 , ( @ R ;GV X X , *
0x0e0af8…0e0c8c Dummy {f00=0x0046, f01=0x0190, f02=» h , ( :d Y > > ? 8 R @R , ( ) V @% =cW R P R P R P W 8 , ( I 9 W $ P W _ $ P h , ( i _$ _*_, _ %0=c X , ( 0P > 0 > >_ B 1 >
0x0e0c8c…0e0e20 Dummy {f00=0x0046, f01=0x417c, f02=» @ @ T T ! & 'T /P f H D ! 3 R 7 AV E OP _P$ kR { W PH P> P P R Q " H D ! P R R W Wr W T W P 'W 1P 9 IP g kQf n H D ! mR$ uP {R6 V2 P P8 R2 V. P T W T T W H D !
0x0e0e20…0e0fb4 (1, 26) Dummy {f00=0x0046, f01=0x0190, f02=» J F IDENT DRTP02 REL 9.2 79-11-16 870105040920 TPADY R TPADY b , ( d t DWTOR , ( ! !"&';<>@^_ 9: X ! Y DISIOE DWTBC , (
0x0e0fb4…0e1148 Dummy {f00=0x0046, f01=0x0190, f02=» , ( w ! W B W B L , ( # 9Q T W Q P X & V 8 DWTST h ECBRL x , ( T Y &W X ! T B , ( R Q B D ! V ! ! * & ! W ! !
0x0e1148…0e12dc Dummy {f00=0x0046, f01=0x0190, f02=» , ( 5 T " T W Q " T ) ! , ( Q Y _ ! ! Y 8 , ( m @ &P Q W ! Y '" h * & _" _< ! _n ! _t B B , ( , ! T _ D ! , ( P ! P
0x0e12dc…0e1470 Dummy {f00=0x0046, f01=0x0190, f02=»T ! L ,! :D" ! Y , ( 7 Y U ! _$ W , & ECBRC V , ( Q ! T ,' ! R !__U f , ( qHD C X ' W Y ! LDREG , ( _ X R U T X
0x0e1470…0e1604 Dummy {f00=0x0046, f01=0x0190, f02=»SP , ( @ B R _ , ( 4 ! ! ! " T : , ( "" ! ! ! ! j * & % 4 X ' 4 Y ' ! ! ( $ A @ " P ,$ , ! 4 H D ! 4 IP
0x0e1604…0e1798 Dummy {f00=0x0046, f01=0x40d6, f02=» 9T =T ?W CQ GT Q , i oP qQ wW , T P P H D ! @ W V P RN Q PH P R: T2 3 =U MW4 UT gR mU {W H ( $ RT U TJ P T R T EP X @ P ,$ , ! 4 H D ! 4 IP
0x0e1798…0e192c Dummy {f00=0x0046, f01=0x0190, f02=» J F IDENT DRGP01 REL 9.2 80-01-03 870105040920 GPADY ECHOGP R GPADY j , ( !"$&;<>@^_ P | DISIOE OUTPUT , ( ! P B P B L # +P ! , ( ?
0x0e192c…0e1ac0 Dummy {f00=0x0046, f01=0x0190, f02=» Y , ( U P T Y &_. P R P , ( @ O]> V _F T Y Y & V P , ( @D Y _^ C _P " DWTBC * & $ P X & X ]r ! * & Y Y
0x0e1ac0…0e1c54 (1, 27) Dummy {f00=0x0047, f01=0x0190, f02=» X C _ X Y ~ , ( G & Y > B B U $ , ( e ! T _ U D ! T _ N LDREG ~ , ( C > X Z^<BR P j ECHOGP , ( X _x R V ! P P , (
0x0e1c54…0e1de8 Dummy {f00=0x0047, f01=0x416a, f02=» ? X Z t , ( @ ! P P . 2 X , ( 1 " ! ! X D $ K & 6 t H D ! PB !P8 -P ;P KT _W mW P U P" T P4 H D ! R( Pj V T P - @ _U$ iT sU }T
0x0e1de8…0e1f7c Dummy {f00=0x0047, f01=0x0190, f02=» J F IDENT DRDI01 REL 9.2 79-11-16 870105040920 DIADY R DIADY b , ( B 8# T $ # ;D t DISIOE` DWTST , ( ! 7P P Y W Y X , ( ?@ Y 8#
0x0e1f7c…0e2110 Dummy {f00=0x0047, f01=0x4088, f02=»END u ? X _F @ < p J z T #P 'P 3W GT IW$ MT( WP aP gV . r@ B 8# T $ # ;D t DISIOE` DWTST , ( ! 7P P Y W Y X , ( ?@ Y 8#
0x0e2110…0e22a4 Dummy {f00=0x0047, f01=0x8190, f02=» J F IDENT DRDY01 9.2DK 1 80-02-12 870105040921 DYADY ECHODY R DYADY j OUTPUT | , ( DISIOE * & !@ ! P P & , ( =
0x0e22a4…0e2438 Dummy {f00=0x0047, f01=0x8190, f02=» ! B B U , ( $ ! T _ U D ! T . GETCHR ^ , ( _ $$ X" X& X* C p , ( X`" E P 8'0P E , ( T ! T 9 _ ! T @_ ! , ( 5
0x0e2438…0e25cc Dummy {f00=0x0047, f01=0x818e, f02=» DWTBC , ( X ' X ] ! , ( B ! ! ! @ , ( @ B Y & ! W 8!0T 8 !@ p , ( DP ! $ P ! ! , ( ! T Y & T X & C TENDI
0x0e25cc…0e2760 Dummy {f00=0x0047, f01=0x8190, f02=» LDREG , ( U Z2<BR J ? Y , ( o! ! T X ! Y D * & & Zl T _ ! X t ECHODY , ( $ P ! R V ECHRTN * & P P !
0x0e2760…0e28f4 (1, 28) Dummy {f00=0x0047, f01=0x8190, f02=» X &" Y )U W ! ! , ( 1 ! Y 4 B $ * & @ K U )X R X T , ( i X &" Y * X ) V Y , ( ! X $ X & ! X * , ( H `R Y !
0x0e28f4…0e2a88 Dummy {f00=0x0047, f01=0xc184, f02=» 4 * > r H D ! R d )P -P 3 9 CP SP WP. ]T oR| yR H D ! D : U4 T U T P( P TD T )T GP M Y cP ^ H D !> gR P : W T P P * T T KQ [R H D ! p wT T P
0x0e2a88…0e2c1c Dummy {f00=0x0047, f01=0x0190, f02=» J F IDENT DRRT01 9.2DK 1 79-11-16 870105040920 F B CHLT1 CHLT2 CHLT3 CHLT4 CHRT1 CHRT2 CHRT3 CHRT4 OUTLIN` CHLTON R H D ! OUTPUTN CHTAB LDREG LDREGE LDREGF STREG GETCHRC DWREMU LOCHAN * & RECHAN REMFC ECHRTN` ECHOY E
0x0e2c1c…0e2db0 Dummy {f00=0x0047, f01=0x0190, f02=» J B t , ( B pU INTRT2 D , ( ; J BAB rU V , ( [ J B B pU , ( y J BQB rU CHTAB DWREMU
0x0e2db0…0e2f44 Dummy {f00=0x0047, f01=0x0190, f02=» P P H !@T I DISEND . CHLT1 @ INTSAV R , ( H T ! 1 U A ? d CHLT2 CHLT3 CHLT4 CHRT1 CHRT2 CHRT3 $ CHRT4
0x0e2f44…0e30d8 Dummy {f00=0x0047, f01=0x0190, f02=» P r , ( k R P 4 ] P , ( $ P ] U P P P P B DWTST r , ( R 4T ] U X , ( "0T + Y W 8Z 4 , ( U R ] U # $P
0x0e30d8…0e326c Dummy {f00=0x0047, f01=0x0190, f02=» > x , ( = W T # Y U DWTTP H , ( [ T ] W 8V X X SETIMP * & { P y W , ( P 8R R Y DWTOCHf ,
0x0e326c…0e3400 Dummy {f00=0x0047, f01=0x0190, f02=» T U 5 U z , ( R " ] ;h # <c$ , ( % P X X " Z " J , ( E X 8# T 8Z V X # T z , ( c 8R X P y Y X DWTECB INTADR , ( {$@'
0x0e3400…0e3594 (1, 29) Dummy {f00=0x0047, f01=0x0190, f02=»@ # P 4 4 P _r T _$ , ( U _ ? 4 U 5 R P . DWTOTQ ^ , ( "P R T T R X $ # X p , ( / > P P P , ( M X XF _H W ? T T , ( m
0x0e3594…0e3728 Dummy {f00=0x0047, f01=0x0190, f02=» OUTPUTN , ( @ _ " P T 8! P STREG D DWTA3 V DWTA4 f DWTA5 v , ( Y Y & Y ( Y * LDREG LDREGF LDREGE , ( _8 X XB Y
0x0e3728…0e38bc Dummy {f00=0x0047, f01=0x0190, f02=» (@ > ?" 8' x , ( S ?A R 8;b# 4T R , ( s T T ] ] 8 W T H , ( W T ] _ P T V W 8 x , ( V T P U 8 ~ U Q , ( P X H " 5 U R " , (
0x0e38bc…0e3a50 Dummy {f00=0x0047, f01=0x0190, f02=» T B P X | , ( G R @ U S ` U t " , ( g D P D T U W _ U 4XR L ECHENDT | ECHOY , ( XX 5 J_b Y & Y ( DWTECH DWTWAT , ( H$ Y * X
0x0e3a50…0e3be4 Dummy {f00=0x0047, f01=0x0190, f02=» . H D !p P Q P P T W W #W /R 5V = ` K H D !L QR Y _PJ cP i o sRL }P P P PD P< P0 P, R T ` H D ! Tp WH f R P4 R0 T T #P -P =Wh C v M _T iW H D !H( mV u v }P
0x0e3be4…0e3d78 Dummy {f00=0x0047, f01=0x40fa, f02=» ! 9P =P CP I B _Wj gT s wW S( V P P T P T P6 H D ! J /U =W [R kT oRT uT {T W< Tr W T P V WT V L H D ! P Q2 P R V P P #W 7T IR4 QS kP qT yW V$ V @ H( mV u v }P
0x0e3d78…0e3f0c Dummy {f00=0x0047, f01=0x018e, f02=» J F IDENT DRSOP1 REL 9.2 79-11-16 870105040920 0 , SOPCT SOPRY IHSOP DWSI01 DWSI02A DWSO01A R SOPCT , ( T 8T 9W B DISIOE SPDLCI , ( ! D 7P P
0x0e3f0c…0e40a0 Dummy {f00=0x0047, f01=0x0190, f02=» ECBCW ECBEL TENDIO $ , ( W"H X R C C 6 TDISP f SOPRY t v * & o ?A @ A. X DWSI01 , ( @ V 9_: DWSO01A
0x0e40a0…0e4234 (1, 30) Dummy {f00=0x0047, f01=0x403e, f02=» ;W GW W ]R V p (@ : X R C C 6 TDISP f SOPRY t v * & o ?A @ A. X DWSI01 , ( @ V 9_: DWSO01A
0x0e4234…0e43c8 Dummy {f00=0x0047, f01=0x018e, f02=» J F IDENT DRDU01 REL 9.2 79-11-16 870105040920 4 0 DUADR DUONY IHDU1 IHDUY IHDU2 DWDU01 DWDU02 R DUADR , ( , ( P " 0 P B :b
0x0e43c8…0e455c Dummy {f00=0x0047, f01=0x0190, f02=» f , ( W B B # L Y :e , ( ? X Y, X P Y ! 9 R ! 9 R 8 , ( _ Y W P U ! h , ( ! ! P W X @ @ ! ! , ( ! P W P ! ! ! P , ( W !
0x0e455c…0e46f0 Dummy {f00=0x0047, f01=0x0190, f02=» Y Y 4 X :C* W W X " , ( ? " :BW X " :BW X X P _ X ( , ( _ % ^ W c X :B X ! X DWTA4 DWTA5 TDISP DUONY , ( } $ E Y Y ? INIFLGN
0x0e46f0…0e4884 Dummy {f00=0x0047, f01=0x0190, f02=» P X Y '? , ( _< @ X2 a W _J Y " , ( ! P X> X4 0P R SETIMP IHDU2 IHDUY IHDU1 INTSAV * & -_z _ A _v A ,
0x0e4884…0e4a18 Dummy {f00=0x0047, f01=0x0190, f02=» j , ( s B" I Y Y , ( B ! 2 T ! Y ! t! T : , ( @ X P Y , (P ) j , ( P @ T X Q , ( $ X X T Y _l DWDU02
0x0e4a18…0e4bac Dummy {f00=0x0047, f01=0x0190, f02=» H D ! PR P D F > $ n P P P P !W ; A B H D ! G @ IP& M @ Q ( UR Y 2 ]R i @ oWb uP yUH } 6 P WF @ j H D ! h N P W* P& D P W D P T F P D H D !
0x0e4bac…0e4d40 Dummy {f00=0x0047, f01=0x409c, f02=»P N H D ! P ' 7 < 9V ?T YT iP { $ < Td @ TR , ( 0 P P P T $ T < N V Z @
0x0e4d40…0e4ed4 (1, 31) Dummy {f00=0x0048, f01=0x0190, f02=» J F IDENT DRLP01 REL 9.2 79-11-16 870105040920 & " LPADR ACLPY IHLPY LPONY DWLP01 R LPADR | ACLPY DWTBC , ( T 1 W B DISIOEC , ( B P P
0x0e4ed4…0e5068 Dummy {f00=0x0048, f01=0x0190, f02=» TDISP DWTA5 , ( } Q 1 Y $ LPONY T DWTST f , ( @ r t B X _ ? X Z& v IHLPY INTSAV DWTOR DWTECB , ( DW A ?I X
0x0e5068…0e51fc Dummy {f00=0x0048, f01=0x4088, f02=» H D ! T WP %PD )P 3V I OT UW _P eP m qT uV W Z r@ X _ ? X Z& v IHLPY INTSAV DWTOR DWTECB , ( DW A ?I X
0x0e51fc…0e5390 Dummy {f00=0x0048, f01=0x0190, f02=» > @ IDENT DRIC01 9.2DK 1 83-09-16 870105040920 ITAD ITABRT IT:BUF F ITAD f IT:BUF x ECBCW , ( P P P .T B Y FNDTID DWTTAB
0x0e5390…0e5524 Dummy {f00=0x0048, f01=0x0190, f02=» H n , ( " [ R H P ' P P W T DWTSB1 < TENDIO N ECBBA ` * & y ' P ! B p TDISP , ( $ # P G W G SETIMP , ( X P P
0x0e5524…0e56b8 Dummy {f00=0x0048, f01=0x0190, f02=» 1_N X t , ( T @ P ( A _ ( Y , ( D _ _x X T @ P ( A D , ( = _ ( Y _ _ i 9 @ t ITABRT ^ , ( ] _ H P P $ DWTECB * & } $ 1
0x0e56b8…0e584c Dummy {f00=0x0048, f01=0x414c, f02=» F Z P z DISEND ECBEL * , ( H U " C $ G $ 4 : H D ! ^ P & P P !T +Wx 7P =P MR ]RN eP iP oP qW< j H D !Pa wT6 { ` P P W P P R: L Q P T P 0 , 8 +
0x0e584c…0e59e0 Dummy {f00=0x0048, f01=0x0190, f02=» J F IDENT EBCDIC 9.2DK 3 82-10-05 870105040920 TASCIIK TEBCDI R TASCIIK l , ( { , ( ! , ( A BCDEFGHI#.<(+!&JKLMNOPQR$]*);^
0x0e59e0…0e5b74 (1, 32) Dummy {f00=0x0048, f01=0x416e, f02=»89:#@'=" p , ( ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^ TEBCDI @ , ( /STUVWXYZ|,%_>?0123456789:#@'= T , ( 7- <=2&p ?' , ( ! @O JZlP}M] Nk`Ka z^L~no , ( A j {
0x0e5b74…0e5d08 Dummy {f00=0x0048, f01=0x4140, f02=» J F IDENT DVTKB REL 9.2 79-11-16 870105040920 DVTKB R DVTKB b KBADN t & " KB bECH , ( !@ " ?
0x0e5d08…0e5e9c Dummy {f00=0x0048, f01=0x0190, f02=» J F IDENT TOSSIO REL 9.2 79-11-16 870105040920 H D !dTIO TENDIO DC:MIN DC:MOT MONMMU ECBFC ECBBA ECBRL ECBEL ECBRC R D @ ECBCW ECBCW2 BUFLENA ACTADRA ABTADR INTADR` POLADR RECADR F B ECHADR DC:DIXV DM:DIX PC:DIX8
0x0e5e9c…0e6030 Dummy {f00=0x0048, f01=0x018e, f02=»UEC# DWTMEC DWTA2 DWTA3 DWTA4 DWTA5 DWTSB1 z * & DWTSB2f DWTTP DWTECHj DWTSQ DWTVOLW 4 DWTCHP b DWTST v DWTBC DWTECB DWTOR DWTOCH DWTADR DWTTAB DWTWAT
0x0e6030…0e61c4 Dummy {f00=0x0048, f01=0x0190, f02=» DWTA4 DWTA5 DWTSB1 , DWTSB2f " @ DWTTP $ T DWTECHj & f DWTSQ 0 z DWTVOLW 0 BUFLENA ACTADRA ABTADR INTADR` POLADR R
0x0e61c4…0e6358 Dummy {f00=0x0048, f01=0x0190, f02=» IT:DIX ECBFC ECBBA & ECBRL 8 ECBEL J ECBRC ECBCW n ECBCW2 , ( MONMMU $ , ( ! $ ( , 0 4
0x0e6358…0e64ec Dummy {f00=0x0048, f01=0x0190, f02=» n , ( y @ C @ $W 0P P > FDBADF > , ( Z 0P R I P QTJOB * & W _" H P 4 I TIODM , ( > T C T V Y * & @
0x0e64ec…0e6680 Dummy {f00=0x0048, f01=0x0190, f02=» A D , ( I W @W T P X T T LKMQDIR P , ( D g W C 8 b TTB:ST , ( W T 8P Y ^ 5 TDISP FNDDWT |TIO , (
0x0e6680…0e6814 (1, 33) Dummy {f00=0x0048, f01=0x0190, f02=» b P X l T x , ( @_| Xv Y @ P T W X , ( &P T P H T H TTB:PW x , ( 7 _ X I Y T , ( U # C C W O " # X , ( u Y ) C C
0x0e6814…0e69a8 Dummy {f00=0x0048, f01=0x0190, f02=»P (@ (@ " 2 z , ( X $? P $ > > , ( J , ( / F C z , ( O F C > B R Q F ! P C , ( o > C > F :c" H ,
0x0e69a8…0e6b3c Dummy {f00=0x0048, f01=0x0190, f02=» j , ( U H Q X D B , ( $ T C x > C $ ) _ : DISENDS j , ( - X 9BV X & X | , ( K B D C > X H U H B , ( k P P $ #
0x0e6b3c…0e6cd0 Dummy {f00=0x0048, f01=0x0190, f02=» l DC:MOT , ( @ > ? _ X T (@ DC:MIN P , ( ^ > > ? _ X T d , ( ' X X T % T ?C L R , ( G _@(@ L U L Q M , ( g h
0x0e6cd0…0e6e64 Dummy {f00=0x0048, f01=0x0190, f02=» H " $ TENDIO & , ( Y _| ?(@ X P T : * & D #DP 0P X T 4 Y j REQEND , ( X X T X & , ( 1 1 X P - M T $ P ,
0x0e6e64…0e6ff8 Dummy {f00=0x0048, f01=0x0190, f02=» j * & P 0P 1 _ ACTOTPN 6 & " (W Y > > H H D ! F X x V x V H Z V Z Z V V r H D ! ! V # S eP W P P R W P T T, V. T H
0x0e6ff8…0e718c Dummy {f00=0x0048, f01=0x4124, f02=»T W T V H D ! P W P R P P aQ iP Q~ P0 P* T QL H D ! U( Q2 T 3V = cUJ qP uPL Q P T P U 9T ARl E H ^ H D ! QU WQ0 q P& P P T T !P /PD [R ]P cP yP8 }P0 P P P W
0x0e718c…0e7320 Dummy {f00=0x0048, f01=0x0190, f02=» J F IDENT TIMER REL 9.2 79-11-16 870105040920 TIMER SETIME SETIMP R TIMER r TDISP FNDTIDC LKMRQE , ( $ T GETBLK@ LKMQDI
0x0e7320…0e74b4 (1, 34) Dummy {f00=0x0048, f01=0x40ee, f02=» _ _< , ( S ? ^ 4 _ & TIMQUE V , ( qH @ 1 A _ P 9 h > > ( $ ~ T N : - 4 1 N 3 > P @ BLK@ LKMQDI
0x0e74b4…0e7648 Dummy {f00=0x0048, f01=0x0190, f02=» J F IDENT TMMLKM REL 9.2 79-11-16 870105040920 TCHPAGK TCHMMU TLUSEG R TCHPAGK t TTB:MTL LKMQDI TCHMMU FNDTID , ( $' "?:B ] TLU
0x0e7648…0e77dc Dummy {f00=0x0048, f01=0x4060, f02=»$ T %_< z O %_B P )U /U GT . R J@ MMU TLUSEG R TCHPAGK t TTB:MTL LKMQDI TCHMMU FNDTID , ( $' "?:B ] TLU
0x0e77dc…0e7970 Dummy {f00=0x0048, f01=0x0190, f02=» J F IDENT TLDSEG REL 9.2 79-11-16 870105040920 TLDSEGK TLDS15 TLDS20 R TLDSEGK t SCTNOS LKM030 SCTSEG , ( R @ U 9C @ TTB:SB@ SEG:D
0x0e7970…0e7b04 Dummy {f00=0x0048, f01=0x0190, f02=» * & 5 H $R M A D TLDS15 T 6 PAG:QB@ J TLDS20 d PAG:PA p , ( K B _ $P D % 1 I SCTMMP SCTNPE , ( eB@ D " @ @ - U
0x0e7b04…0e7c98 Dummy {f00=0x0048, f01=0x402e, f02=» /W^ 7R WP yU @ * TLDS15 T 6 PAG:QB@ J TLDS20 d PAG:PA p , ( K B _ $P D % 1 I SCTMMP SCTNPE , ( eB@ D " @ @ - U
0x0e7c98…0e7e2c Dummy {f00=0x0048, f01=0x0190, f02=» J F IDENT TABORT REL 9.2 79-11-16 870105040920 TABORTK R TABORTK d FNDDWT x DWTTAB DWTST , ( "R P X T X R ? DWTECH DWTADR ABTAD
0x0e7e2c…0e7fc0 Dummy {f00=0x0048, f01=0x40a8, f02=» X H x LKMQDI LKMRQE * & " I P < ( $ RT PL TF R@ V )P 7P IP f @ , ( "R P X T X R ? DWTECH DWTADR ABTAD
0x0e7fc0…0e8154 (1, 35) Dummy {f00=0x0049, f01=0x0190, f02=» J F IDENT TASS REL 9.2 79-11-16 870105040920 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 TASMXAP T
0x0e8154…0e82e8 Dummy {f00=0x0049, f01=0x0190, f02=» TASCVOC TASVOL TASCXO 0 TASSEX D , ( X TASXLB $ TASFDB 4 TASVRL 6 TASVLEC 8 TASVRN : TASECB < , ( !
0x0e82e8…0e847c Dummy {f00=0x0049, f01=0x0190, f02=» TASTBE T TASLFD# V , ( A , a TASCAQT n TTB:SA QTJOB , ( D H @ P 4 A U W A VOLCHE , ( ( A @ U : A V A
0x0e847c…0e8610 Dummy {f00=0x0049, f01=0x0190, f02=»% T < C z ECBRC , ( ( B P T W ' T I * , ( @ 8 =hP Y X P Z DWTVOL , ( 3 T Y H ! R , ( Q W 9a I T T 9a H E V DFTABE(
0x0e8610…0e87a4 Dummy {f00=0x0049, f01=0x0190, f02=» : "' # TDISP ( , ( I ` @ P $ ) 5 8 MOV:US h , ( T A A R A b " z , ( A "" P U W , ( A P @ E "# P P
0x0e87a4…0e8938 Dummy {f00=0x0049, f01=0x0190, f02=» P W @ | , ( } 0 R ' F "R G FNDTID L , ( ) T @ D #D T G ^ DMTASSV ACTOT , ( W A J "R A J A 4 LKMQDI * & H
0x0e8938…0e8acc Dummy {f00=0x0049, f01=0x4076, f02=» T P P U W P #P 'P 7W CR OV WT gP wW Rb R T W, R < `@ r
0x0e8acc…0e8c60 Dummy {f00=0x0049, f01=0x018e, f02=» J F IDENT LKMAL REL 9.2 79-11-16 870105040920 LKMAL R LKMAL b bTIO t TWAIT TEXIT TACTOT TPAUSE TIMER TMWAIT TLUSEGC * & UT
0x0e8c60…0e8df4 (1, 36) Dummy {f00=0x0049, f01=0x406e, f02=» , ( * % 4 & H & X@ j b bTIO t TWAIT TEXIT TACTOT TPAUSE TIMER TMWAIT TLUSEGC * & UT
0x0e8df4…0e8f88 Dummy {f00=0x0049, f01=0x0190, f02=» J F IDENT TIODM REL 9.2 79-11-16 870105040920 D @ TIODM FDBLNK FDBECB FDBSNR FDBRRO FDBRLE FDBBLF FDBTNRC R D @ FDBVTO FDBCEX FDBEXT EXTDMI EXTFC EXTLEN@ EXTBAS EXTELE D @ FDBLRN FDBNIF FDBEAL FDBCRL` FDB
0x0e8f88…0e911c Dummy {f00=0x0049, f01=0x0190, f02=» t , ( ! " , ( A # $ % D FDBLNK t FDBECB FDBSNR $ FDBRRO & FDBRLE ( FDBBLF * FDBTNRC + FDBVT
0x0e911c…0e92b0 Dummy {f00=0x0049, f01=0x0190, f02=»ELE FDBLRN I FDBNIF H " FDBEAL L 6 FDBCRL` N J FDBKA P ^ FDBMIAT R p FDBADFN T FDBAI1 V FDBDBR ^ FDBMRN _ FDBMROV b FDBMEC d FDBKEY r
0x0e92b0…0e9444 Dummy {f00=0x0049, f01=0x0190, f02=» j @ D X TTB:ID , ( } P _ L !##P T 2 DWTST b , ( @ R $P U + U _ (@(@ r DWTOR ECBCW2 , ( ! I 2P ^ H L Y H ECBCW , (
0x0e9444…0e95d8 Dummy {f00=0x0049, f01=0x0190, f02=» Y . B CRNGET ( , ( + Y I B Y J_ W : ECBFC j , ( G C P C W < C z , ( a! C _H H H S * & } W C C B B
0x0e95d8…0e976c Dummy {f00=0x0049, f01=0x0190, f02=» j DSUMOD , ( $ X _ X ` T I T J ECBEL J , ( P C X I X J Z * & S W C C W B ECBRC * & B Y IR Q X JU C bSQR C
0x0e976c…0e9900 Dummy {f00=0x0049, f01=0x418a, f02=»#D ( * | ACTOT TDISP * DISEND : ( $ m , . 0 2 L H D ! | | | | | ! h # 8 % | ' | x H D ! + ) < + - / 1 & P P R P P | U | W N % |
0x0e9900…0e9a94 (1, 37) Dummy {f00=0x0049, f01=0x0190, f02=» J F IDENT DMBUF REL 9.2 79-11-16 870105040920 J F " CURBUFK BUFLNK BUFDMI BUFFC BUFSNR BUFOR BUFSTA@ DMTGBU DMTRBUC R CLRBUF CURBUFK BUFLNK BUFDMI BUFFC BUFSN
0x0e9a94…0e9c28 Dummy {f00=0x0049, f01=0x0190, f02=» / & > s V DMTGBU n , ( @ , L T L P L , ( 5 T M Q M L V L A @ HALTN , ( U : T
0x0e9c28…0e9dbc Dummy {f00=0x0049, 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
0x0e9dbc…0e9f50 Dummy {f00=0x0049, f01=0x0190, f02=» J F IDENT DMTASK REL 9.2 79-11-16 870105040920 ( $ DMTASKKdSQRdQSW DMTWM QIRNY QIRR R QIRNY ~ QIRR tQSW tSQR , ( ECBRL FDB
0x0e9f50…0ea0e4 Dummy {f00=0x0049, f01=0x0190, f02=»R $ - _ " v , ( W P $ - : R $ - _ : Z TTB:TDC F , ( w $ -_ D U 0 X SCTCDT@ , ( W T ` U @ , FDBRRO DWTTDM TTB:ID , ( A
0x0ea0e4…0ea278 Dummy {f00=0x0049, f01=0x018e, f02=» PRUNN ECBBA MOV:SU $ , ( $ P @ Q (@ F 6 MONMMU f * & H : @ _ x DMTASKK FDBDBR , ( D > X P D "V , ( )
0x0ea278…0ea40c Dummy {f00=0x0049, f01=0x0190, f02=» , ( @ a ( ( W ( , ( A B W C X '? 4 , ( H X X )T d FDBSNR@ VLVRL , ( * X *T T , A ( FDBVTO DIVMOD
0x0ea40c…0ea5a0 Dummy {f00=0x0049, f01=0x0190, f02=»LRBUFV , ( D F 4 6(@ _ FDBLRN > VTLRN P , ( D X X 8 U : X 8 U : ` FDBMIA , ( 5 $ ( ( T X X <P ECBFC , ( O F > T
0x0ea5a0…0ea734 (1, 38) Dummy {f00=0x0049, f01=0x0190, f02=» X W ` U @ H EARELB $ FDBCRL 6 , ( @ X W B H CRNQUE x * & D 4 5W P 0 @ F 1 A FDBEXT: EXTELER , ( F(@_ H J (@
0x0ea734…0ea8c8 Dummy {f00=0x0049, f01=0x0190, f02=» 4 P 9 6 , ( a J 4' ' 5 * FDBSTA Z , ( 4 P W , P ,' X X l , ( $ H J Z" J ) _ SCTPLDX , ( @ " (@ C > A R ( B
0x0ea8c8…0eaa5c Dummy {f00=0x0049, f01=0x0190, f02=» F T" F T +P P X EATESTS . , ( ! V$ T X U W X R @ * & ; P $P W X X p , ( W F X P MOV:USX , ( oH @ Q (@ Z + X "V
0x0eaa5c…0eabf0 Dummy {f00=0x0049, f01=0x0190, f02=» Y " F T" F T , ( > D '? P P $ P CRNGETR P CRNCIF b CRNCDF t , ( "B ^ I ` I ` K b , ( H K b b P P & P EASETB: , ( ) B BW D
0x0eabf0…0ead84 Dummy {f00=0x0049, f01=0x0190, f02=» H D ! L L L L L L L L L H D ! ! L # % ' 3P 5R ;W IR WP aR U W T U W T P H D ! T( !Pj 'V" 7P =P AP WV, [P c p oW } L W T L TT H D ! P W P CT$ MP cT
0x0ead84…0eaf18 Dummy {f00=0x0049, f01=0x4076, f02=» P8 P4 W T( R T P P( P" P P %P +W 3T ;T AW QV WT < n `@ rP aR U W T U W T P H D ! T( !Pj 'V" 7P =P AP WV, [P c p oW } L W T L TT H D ! P W P CT$ MP cT
0x0eaf18…0eb0ac Dummy {f00=0x0049, f01=0x0190, f02=» J F IDENT DMTASS REL 9.2 79-11-16 870105040920 ( $ DMTASSK VTLRN VLVBA VLVRL SECTLEA R VLVBA ~ VLVRL VTLRN SECTLEA TASECB ECBBA ECBRC , (
0x0eb0ac…0eb240 Dummy {f00=0x0049, f01=0x018e, f02=» : t TASMXAE TASASB & VOLCHE 8 , ( 7H@ A A " P "" J TASCVO z CLRBUF * & Q H P @ TASVOL ECBFC ECBRL ECBCW
0x0eb240…0eb3d4 (1, 39) Dummy {f00=0x004a, f01=0x0190, f02=» TASVLEP , ( L " TOP A " L TASVRL F , ( B A $ L C & @ $ X TASFIL , ( " A $Q @ A @ DMTRBU , ( ( B * D
0x0eb3d4…0eb568 Dummy {f00=0x004a, f01=0x018e, f02=» j , ( G & @ (T , ( a A " 0" : , ( U _ L !SSP !LL j TASCXOS , ( W L @ , A ,V TASSEXR TASXLBP , (
0x0eb568…0eb6fc Dummy {f00=0x004a, f01=0x0190, f02=» FDBVTO , ( H 4 2% P R 6 X T R FDBMIA# J , ( 8 @ "T R :T @ ( , ( 6 4 2% P QFDBFL , ( = 2 < P % DWTST
0x0eb6fc…0eb890 Dummy {f00=0x004a, f01=0x0190, f02=» E 3 P S F P S FDBRLE " FDBBLF 4 FDBNIF F * & F P S H P S J P % S X FDBKA FDBMEC * & L P & S N @ " S 8 DWTMEC , ( @ P S R B
0x0eb890…0eba24 Dummy {f00=0x004a, f01=0x0190, f02=»P @ , t EXTDMIH EXTLENT & , ( ! ! T W P . D Y T P 0 8 EXTBAS h , ( 9I Y V P 0 Y X U ! T z TASLFD , ( S ! X6 _R _V D Z" TASTBE , ( q$ P
0x0eba24…0ebbb8 Dummy {f00=0x004a, f01=0x0190, f02=» @ 2 n , ( $P -W P B TASCAQ > QTJOB P * & @ * ` b(@( @ ` FDBADF& FDBDBR , ( ( _ d ` ` 9A EXTELE , ( D S f
0x0ebbb8…0ebd4c Dummy {f00=0x004a, f01=0x0190, f02=»MRN , ( =@ R J S W S p S p MPYMODW < FDBMRO N , ( WB$ R H R J r S t ` o H D !%l P !Tn / d AP UP ] d P d Q< d _T u U P H D ! W V d T
0x0ebd4c…0ebee0 Dummy {f00=0x004a, f01=0x4038, f02=»W P W P ES GW p "@ 4 MPYMODW < FDBMRO N , ( WB$ R H R J r S t ` o H D !%l P !Tn / d AP UP ] d P d Q< d _T u U P H D ! W V d T
0x0ebee0…0ec074 (1, 40) Dummy {f00=0x004a, f01=0x40b8, f02=» J F IDENT DFTAB REL 9.2 79-11-16 870105040920 DFTAB DFTABE R DFTAB j DFTABE | @ AFB PDFTABE EQU * P END @ P* P* P* LEVE
0x0ec074…0ec208 Dummy {f00=0x004a, f01=0x4172, f02=» J F IDENT DMFDB REL 9.2 79-11-16 870105040920 < 8 FDBSTAK FDBEND QFDBFL CRNQUE CRBUFL CRNEND MXIND R CRBUFL QFDBFL r FDBSTAK FDBEND CRNQUE
0x0ec208…0ec39c Dummy {f00=0x004a, f01=0x0190, f02=» J F IDENT DMINIT REL 9.2 79-11-16 870105040920 DMINITK R DMINITK d INIFLG x , ( =a 9a Q - _ - > QFDBFL FDBSTA FDBEND CRNQUE , ( !
0x0ec39c…0ec530 Dummy {f00=0x004a, f01=0x40da, f02=» h BUFDMIL BUFSNR BUFOR , , ( Q , - M M M @ < TASBLK l TASQUE ~ g$ A A > Q %PJ r @ FDBEND CRNQUE , ( !
0x0ec530…0ec6c4 Dummy {f00=0x004a, f01=0x0190, f02=» J F IDENT DMSUBX REL 9.2 79-11-16 870105040920 . * FNDKMXK CHKKEY RDNXTR FNDKEY CRNUPD R FNDKMXK MPYMOD * & 4U :! 4 U , ( 9 & ?! , (
0x0ec6c4…0ec858 Dummy {f00=0x004a, f01=0x0190, f02=»V _ W W | RDNXTR GTBKBU 0 , ( @ : T ; [ V ( B DMTIOZ r FDBRRO , ( " T E W D FDBMROP FDBRLE , ( V ; [ _ D V
0x0ec858…0ec9ec Dummy {f00=0x004a, f01=0x0190, f02=» GTLGRN# , ( D U E W ADDMODH B CALSNOT T DMTRBU f , ( ! @ P W x , ( =@ _ P [ FNDKEY d FDBMIA , ( Y Z
0x0ec9ec…0ecb80 Dummy {f00=0x004a, 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 FDBCRL , ( " : : " $
0x0ecb80…0ecd14 (1, 41) Dummy {f00=0x004a, 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
0x0ecd14…0ecea8 Dummy {f00=0x004a, f01=0x40ea, f02=» J F IDENT ADDMOD REL 9.2 79-11-16 870105040920 ADDMODK R ADDMODK d , ( P Q R ;A [ [ x ! : P Q R $ @ ,2,A14 B P OR.S
0x0ecea8…0ed03c Dummy {f00=0x004a, f01=0x40ea, f02=» J F IDENT DSUMOD REL 9.2 79-11-16 870105040920 DSUMODK R DSUMODK d , ( P Q R ;A [ [ x ! : P Q R $ @
0x0ed03c…0ed1d0 Dummy {f00=0x004a, f01=0x40ec, f02=» J F IDENT MPYMOD REL 9.2 79-11-16 870105040920 MPYMODK R MPYMODK d , ( P Q R ;A [ x ! [ : P Q R & @ . P*
0x0ed1d0…0ed364 Dummy {f00=0x004a, f01=0x40ea, f02=» J F IDENT DIVMOD REL 9.2 79-11-16 870105040920 DIVMODK R DIVMODK d , ( Q R P ;A [ [ x ! : Q R P $ @ P RB(7) END1
0x0ed364…0ed4f8 Dummy {f00=0x004a, f01=0x0190, f02=» J F IDENT DMSUBR REL 9.2 79-11-16 870105040920 F B EATESTK EASETB EARELB CRNGET CALSNO GTBKBU GTLGRNL DMTIOT R . * CHKIND REQEND DMTIOZ MOV:US MOV:SU CHKIND , ( ? ? !? P P !> P W
0x0ed4f8…0ed68c Dummy {f00=0x004a, f01=0x0190, f02=»WTTQ , ( = R L X P L P 4 M QTJOB < DWTTDM L DWTST ^ , ( Y X M M n IHRTN EATESTK z FDBEALL , ( q _8 > D W 0P Q F
0x0ed68c…0ed820 Dummy {f00=0x004a, f01=0x0190, f02=» X 1 Y : , ( 4W 0P R Q P FREQUEW P * & W R D Q ( 0 5 @ b CRNGET FDBCRL , ( 1 A Z> : D W (P CRNTID CRNQUE
0x0ed820…0ed9b4 (1, 42) Dummy {f00=0x004a, f01=0x018e, f02=»SNO X FDBBLF , ( G I D ) E : T DIVMOD P FDBEXT~ b , ( _ $ &S P W X $ t EXTLEN FDBCEX , ( yH ( * U U *_ EXTBAS
0x0ed9b4…0edb48 Dummy {f00=0x004a, f01=0x0190, f02=» , ( P X 2 _ W Y 4 : DWTECB 8 ECBRC J , ( D 6 8 B :P T Z FDBDBR ECBBA BUFDMIT , ( D$ G :W X < Y < B > DMTIOZ DWT
0x0edb48…0edcdc Dummy {f00=0x004a, f01=0x0190, f02=» GTBKBU , EXTDMI , ( ) 8_ X , P H X 0 8 & SECTLE V ECBRL h DMTGBU x ECBCW , ( ? ! # J C L NW C BUFSTAH , ( Y P R C > X B%? : X
0x0edcdc…0ede70 Dummy {f00=0x004a, f01=0x0190, f02=» MPYMODF , ( 0 D $ V T 2 T , ( 4 ^ S W B MOV:US r , ( : U ; $ T $ T $ T x : : , ( $ T $ ) ] $ ) Y _$ , ( U x 0 )_8 $_ $
0x0ede70…0ee004 Dummy {f00=0x004a, f01=0x418e, f02=» Y _& (# )_4 $ ($ , ( ) YR_L U p 0_8 $ * _< Z H D ! P P P W #P 7P> ?R4 MP SP W P P W W P8 R l H D ! W R W P W6 'T ;U eSP mP qW U U. R P W P6 H D !
0x0ee004…0ee198 Dummy {f00=0x004a, f01=0x413e, f02=» J F IDENT PFTAB REL 9.2 79-11-16 870105040920 PFTAB R PFTAB b DC15ON t SOPRN CHLTON FDONN LPONN DUONN DMINITL * & UT
0x0ee198…0ee32c Dummy {f00=0x004a, f01=0x0190, f02=» J F IDENT DVKB00 REL 9.2 79-11-16 870105040920 DVKB00K R DVKB00K d KBAD3 x CTAB01 , ( KB DVDY00 , ( %@
0x0ee32c…0ee4c0 Dummy {f00=0x004a, f01=0x4032, f02=» p X - 0 / 0 @ .2 79-11-16 870105040920 DVKB00K R DVKB00K d KBAD3 x CTAB01 , ( KB DVDY00 , ( %@
0x0ee4c0…0ee654 (1, 43) Dummy {f00=0x004b, f01=0x4104, f02=» J F IDENT DVDY00 REL 9.2 79-11-16 870105040920 DVDY00K R DVDY00K d DYADN x * & DY % P @ 8 , 8 @ P
0x0ee654…0ee7e8 Dummy {f00=0x004b, f01=0x0190, f02=» J F IDENT DVKB01 REL 9.2 79-11-16 870105040920 DVKB01K R DVKB01K d KBAD3 x CTAB02 , ( @ KB DVDY01 , ( %@
0x0ee7e8…0ee97c Dummy {f00=0x004b, f01=0x4032, f02=» p X - 0 / 0 @ .2 79-11-16 870105040920 DVKB01K R DVKB01K d KBAD3 x CTAB02 , ( @ KB DVDY01 , ( %@
0x0ee97c…0eeb10 Dummy {f00=0x004b, f01=0x4108, f02=» J F IDENT DVTP01 REL 9.2 79-11-16 870105040920 DVTP01K R DVTP01K d TPADN x , ( TP " @ 4 ( 4 @
0x0eeb10…0eeca4 Dummy {f00=0x004b, f01=0x4104, f02=» J F IDENT DVDY01 REL 9.2 79-11-16 870105040920 DVDY01K R DVDY01K d DYADN x * & DY % P @ 8 , 8 @
0x0eeca4…0eee38 Dummy {f00=0x004b, f01=0x0190, f02=» J F IDENT DVKB02 REL 9.2 79-11-16 870105040920 DVKB02K R DVKB02K d KBAD3 x CTAB03 , ( KB DVDY02 , ( %@
0x0eee38…0eefcc Dummy {f00=0x004b, f01=0x4032, f02=» p X - 0 / 0 @ .2 79-11-16 870105040920 DVKB02K R DVKB02K d KBAD3 x CTAB03 , ( KB DVDY02 , ( %@
0x0eefcc…0ef160 Dummy {f00=0x004b, f01=0x4106, f02=» J F IDENT DVDI02 REL 9.2 79-11-16 870105040920 DVDI02K R DVDI02K d DIADN x , ( DI ?O_o @ 2 & 2 @ 0,
0x0ef160…0ef2f4 (1, 44) Dummy {f00=0x004b, f01=0x4104, f02=» J F IDENT DVDY02 REL 9.2 79-11-16 870105040920 DVDY02K R DVDY02K d DYADN x * & DY % P @ 8 , 8 @
0x0ef2f4…0ef488 Dummy {f00=0x004b, f01=0x4100, f02=» J F IDENT DVGP03 REL 9.2 79-11-16 870105040920 DVGP03K R DVGP03K d GPADN x * & GP % @ 4 ( 4 @ ECB ADD
0x0ef488…0ef61c Dummy {f00=0x004b, f01=0x4108, f02=» J F IDENT DVTP04 REL 9.2 79-11-16 870105040920 DVTP04K R DVTP04K d TPADN x , ( TP " @ 4 ( 4 @
0x0ef61c…0ef7b0 Dummy {f00=0x004b, f01=0x0190, f02=» J F IDENT TCLASS REL 9.2 79-11-16 870105040920 TCLASSK R TCLASSK d DVKB00 x DVDY00 DVKB01 , ( H ! 1 DVTP01 DVDY01 DVK
0x0ef7b0…0ef944 Dummy {f00=0x004b, f01=0x40b8, f02=» 3 " @ P 0 0 DVDY05 , IH 1 2 0 > < 8 ~ . < B P / = C Q b V @ ! 1 DVTP01 DVDY01 DVK
0x0ef944…0efad8 Dummy {f00=0x004b, f01=0x0190, f02=» J F IDENT SCLASS REL 9.2 79-11-16 870105040920 SCLASSK R SCLASSK d DWSI01 x DWSO01 DWII01 , ( H DWIO01 DW1501 DWL
0x0efad8…0efc6c Dummy {f00=0x004b, f01=0x40a0, f02=» 5 H I * < 8 ~ $ * 0 % + 1 " J R @ WII01 , ( H DWIO01 DW1501 DWL
0x0efc6c…0efe00 Dummy {f00=0x004b, f01=0x0190, f02=» H F IDENT CTAB01 83.05.19 NJ NORDJYLLANDS AMT & " CTAB01K CTAB02 CTAB03 CTAB04 P CTAB01K z CTAB02 CTAB03 CTAB04 , ( , ( !
0x0efe00…0eff94 (1, 45) Dummy {f00=0x004b, f01=0x0190, f02=» < +,-. 0123456789 `ABCDEFG , ( HIJKLMNOPQRSTUVWXYZ [] * * , ( > ?;_: =!"#$%&/() @ABCDEFG Z , ( HIJKLMNOPQRSTUVWXYZ []* , ( < +,-. 0123456789 `ABCDEFG , ( ! HIJKLMNOPQRSTUVWXYZ []
0x0eff94…0f0128 Dummy {f00=0x004b, f01=0x4034, f02=» H x x r x @ 0JKLMNOPQRSTUVWXYZ [] * * , ( > ?;_: =!"#$%&/() @ABCDEFG Z , ( HIJKLMNOPQRSTUVWXYZ []* , ( < +,-. 0123456789 `ABCDEFG , ( ! HIJKLMNOPQRSTUVWXYZ []
0x0f0128…0f02bc Dummy {f00=0x004b, f01=0x0190, f02=» J F IDENT SYSBUG REL 9.2 79-11-16 870105040920 F B SCTMSZK SCTSFA SCTEFA SCTPLD SCTANO SCTADA SCTPAGL SCTSEG R F B SCTSWB SCTNOS SCTNOP SCTPSZ SCTMMC SCTLACL SCTMMP SCTLAP F B SCTNPE SCTSTB SCTOPT SCTTCT
0x0f02bc…0f0450 Dummy {f00=0x004b, f01=0x0190, f02=»:PA PAG:SB SWB:NC SWB:DS SWB:ELS SWB:NS0 z T:ACSB 4 SEG:ST F SEG:DSL Z SEG:EL n SEG:PBI PAG:QF PAG:QBV PAG:PA PAG:SB SWB:NC SWB:DS
0x0f0450…0f05e4 Dummy {f00=0x004b, f01=0x0190, f02=» IHSOP . IH1501W > IH1502 P CHLT1 b IHFDN r CHRT1 , ( CHRT2 , ( ! , ( 1
0x0f05e4…0f0778 Dummy {f00=0x004b, f01=0x0190, f02=» , ( a " , ( q R HALTN SCTMSZK SCTSFA SCTEFA SCTPLD SCTANO
0x0f0778…0f090c Dummy {f00=0x004b, f01=0x0190, f02=» SCTNOS SCTNOP SCTPSZ & SCTMMC : SCTLACL N SCTMMP b SCTLAP v SCTNPE SCTSTB SCTOPT SCTTCT SCTCDT bBUG SCTBUG~
0x0f090c…0f0aa0 Dummy {f00=0x004b, f01=0x4090, f02=» SCTBLK SCTDCT ( _ D Z z@ NPE SCTSTB SCTOPT SCTTCT SCTCDT bBUG SCTBUG~
0x0f0aa0…0f0c34 (1, 46) Dummy {f00=0x004b, f01=0x0190, f02=» J F IDENT DRFD01 REL 9.2 79-12-05 870105040920 FDADR IHFDY FDONY DWFD01 R FDADR v DWTOR , ( X ! Y X ! ECBBA , ( Y T & , (
0x0f0c34…0f0dc8 Dummy {f00=0x004b, f01=0x0190, f02=» h DISIOEL * & P 6 + , ( ! * X X P ! ! W H , ( ! * _ ! * _& ! X X P x ECBRL , ( ! X P B _ X p , ( ^ X C W X X
0x0f0dc8…0f0f5c Dummy {f00=0x004b, f01=0x0190, f02=»TOT 0 SST x , ( X Y W 0 X Y Y , ( ! ! X ' P ! ! H , ( D ) P _ X " X ! T x ECBCW , ( A X !& P B * & :C P ! 9DV !
0x0f0f5c…0f10f0 Dummy {f00=0x004b, f01=0x0190, f02=» X ! _ Y , ( 4 ! P C ! ! ! ( , ( (@ ! R _ ! 1 X , ( ;h 1 ! 1 ! ! * ! ! , ( ! ) ! Y # T X Y _ Y , ( # 4 ! (
0x0f10f0…0f1284 Dummy {f00=0x004b, f01=0x0190, f02=»* ! ! ! v , ( w T )W W ! Xz ! ( - , ( ! ) W Y W Y Y F DWTA5 v ECBEL * & Y Y B S W W B C TENDIO TDISP FDONY DWTA2 , (
0x0f1284…0f1418 Dummy {f00=0x004b, f01=0x018e, f02=» ! Y Y ! @ ! DWTST , , ( ! D ) Y X T X < , ( A Y Y X P y _ l SETIMP , ( ] _ Y , ( y X P Y : ! ! X # P
0x0f1418…0f15ac Dummy {f00=0x004b, f01=0x0190, f02=» INTSAV , ( @ A " ? (@ X X K P , ( X T $ D C Y B F * & K & E % Y B K v , ( ) X ;AR ;a X P Y , ( E P 7P < $ , (
0x0f15ac…0f1740 Dummy {f00=0x004b, f01=0x0190, f02=» , ( @ B R ' P Q 9BW Q 9C , ( @ B ! T 4 P ;A 4 , ( _ 4 X # P _ 4(@ d TASCII , ( R D $ 1_ W (@ R TEBCDI0 , ( 7 0 D & ] _ !
0x0f1740…0f18d4 (1, 47) Dummy {f00=0x004c, f01=0x0190, f02=» Y" P Z x , ( _ 4 A ;D A 4 R , ( _ ;H 4 ! (:C 4 H , ( ! ( 4 X " 4 ! ) x & " 4 X P 4 DWFD01 , (
0x0f18d4…0f1a68 Dummy {f00=0x004c, f01=0x0190, f02=» v # H D ! * . 'T / 5 = IT MV2 SR, W | k v s x { , 0 H D !A z < PX P( PP P< P@ H , P , | H D !s Wb , P " z P , v | !W % ,
0x0f1a68…0f1bfc Dummy {f00=0x004c, f01=0x0190, f02=» P Tr Ph " ` H D !Z V ! | ) n - 3 N 5 N 9 = f A G N I ^ M S N W Y V ] H D !6 e . i * m y * " PT R p h H D ! ' * T . * !V % ) " - H D ! x 9
0x0f1bfc…0f1d90 Dummy {f00=0x004c, f01=0x0190, f02=» L H D !g R8 . , " ! ) " 7 $ =T E $ M ( OP W ( [ ( e j H D ! A o ( { . P P . $ $ & H J P6 L T % T H D ! 1R@ 7 & 9P = & EP OP W RZ , P W P Q8 U T, R( H D ! O P Q W Q T P
0x0f1d90…0f1f24 Dummy {f00=0x004c, f01=0x401e, f02=» . @ , " ! ) " 7 $ =T E $ M ( OP W ( [ ( e j H D ! A o ( { . P P . $ $ & H J P6 L T % T H D ! 1R@ 7 & 9P = & EP OP W RZ , P W P Q8 U T, R( H D ! O P Q W Q T P
0x0f1f24…0f20b8 Dummy {f00=0x004c, f01=0x0190, f02=» J F IDENT DRDC15 9.2DK 7 83-10-12 870105040924 . * DC15ADK IH1501 IH1502 DC15ON DW1500 R DC15ADK * & , ( C P P +P P P DISIOEC , (
0x0f20b8…0f224c Dummy {f00=0x004c, f01=0x0190, f02=»I , ( W B " P H :H B , ( # L Y @ P P : SETIME j , ( $_ @ !@P _l | , ( _0 X 9 P @ , ( @ ` @ P 0P _ % A A
0x0f224c…0f23e0 Dummy {f00=0x004c, f01=0x0190, f02=» I Q X ! 3 _ ECBEL 0 DC:MIN @ , ( g X P 0 Y P C R , ( B B ! P Y , ( _d X ! X _ B Y _~ DISEND , (
0x0f23e0…0f2574 (1, 48) Dummy {f00=0x004c, f01=0x0190, f02=» _: X P ( y Y W , ( 1 (P 0 ) > (P _ " , ( Q ) 1_ (X( P _ 0 ) R , ( q _6 X " X> "XD XH _D , ( _6 (P _ ) 1 4 X , ( R X T X P , Y
0x0f2574…0f2708 Dummy {f00=0x004c, f01=0x0190, f02=» P T r , ( ! X @ T A A > A A A , ( A A A W B a > r q , ( @ BHBB < ! 2B ! , ( T P P
0x0f2708…0f289c Dummy {f00=0x004c, f01=0x0190, f02=»_ ! l , ( % T " X ! _ ! A , ( E x @ pP @ nP ! A p A r_ ! < , ( e @ rP @ X@ ! T A v ! l * & @ pP @ P @ n 2 8 ! X , ( Y ! A z_B ! X>_b A , ( v @
0x0f289c…0f2a30 Dummy {f00=0x004c, f01=0x0190, f02=» X l * & T P C C * & 3 P " H X "# P " P X : , ( M * Y X T ! W h , ( g W W X R X T , ( ! ! X " T , ( R @ X !
0x0f2a30…0f2bc4 Dummy {f00=0x004c, f01=0x0190, f02=» N @ n @ v @ , ( @ A ! @ pXV ! ( , ( 7 T @ zP ! ! _p /T @ zX @ X , ( W tP @ vT ! ! A x_ A z , ( w B A p @ tT _2 _6 @ n , ( T A v A p X ! XD
0x0f2bc4…0f2d58 Dummy {f00=0x004c, f01=0x0190, f02=» 4 @ pP ! ! x , ( D ! @ P ! ! A p , ( @ / @ T ! _ T X_ ~ H ECBBA x DC:MOT, , ( @ M A n C B B , ( J e A A A A t A v ! ! A , ( p_^
0x0f2d58…0f2eec Dummy {f00=0x004c, f01=0x0190, f02=» P T T Y W ~ , ( * P C X A p A n @ * , ( xP X Y 4 @ @ vT @ Z , ( @ 1 A @ A A v ! T , ( Q P P P P P 1 A , ( q @ ]6W P _@
0x0f2eec…0f3080 Dummy {f00=0x004c, f01=0x0190, f02=» A ! @ ! z , ( @ ! ! ! B J 4 ! , ( ! @ @ A @ T J , ( 1 @ ! 8 ! W - ! x ! z , ( Q W 0 " W R ~T }T , ( q T W ! P " ! " :A ,
0x0f3080…0f3214 (1, 49) Dummy {f00=0x004c, f01=0x0190, f02=» j , ( ! " ! " ! A t , ( ( _" A v A n ! ! % ! R ! : , ( / ! @ ! 8 ! X ! 9a j , ( @ M D ! X ! P ! T & ! _b IH1501 INTSAVL , ( k B J B !
0x0f3214…0f33a8 Dummy {f00=0x004c, f01=0x018e, f02=» , ( U@ A v < A 4 A _$" , ( P H B P W ! 4 _ 4 , ( @@ ! ! 1 4 A @ ` d DC15ON 8 , ( ! @ P 0 M A 4 ? @ , ( A ` @ P $ Y r_ @ A , (
0x0f33a8…0f353c Dummy {f00=0x004c, f01=0x0190, f02=» f , ( 4 A < ! @ pP ! ! , ( R @ P a A 4 A A A 8 , ( ?a :a# P @ @ @ h 4 , ( * ! A | ! ! A | @ :H DW1500 D , ( A 4
0x0f353c…0f36d0 Dummy {f00=0x004c, f01=0x0190, f02=» DEFGHI#.<(+!&JKLMNOPQR$]*);^-/ST , ( ' UVWXYZ@,%_>?0123456789:[ '=" * , ( ' Z , ( ' ( H D ! l t B t GP> M d QP UP8 YP> ]PH c i
0x0f36d0…0f3864 Dummy {f00=0x004c, f01=0x0190, f02=» KQl O S B a mP d H D ![ P r P Wb X n p n P -W 1 t 7P H D !4 KP gP P D R2 T* P& P P T % n )T - p 1 n l H D ! 7 P ; T ? X C G ` K d MW T P P $ H D !*
0x0f3864…0f39f8 Dummy {f00=0x004c, f01=0x0190, f02=» yTD P H D ! P( t P" t T P P P t P D Pf H D ! R` P TR EP IP YT aW iW( oW" uR {T T< W. X H D !3 T P T Wx # r ' 1 7T =P A E MT, H D !8 YP aT0 e i y r
0x0f39f8…0f3b8c Dummy {f00=0x004c, f01=0x0190, f02=» P T$ T W P P # t -T I KT2 QP4 WPJ ]PL cP iP. H D !6 }W P t P T W W W W W j D H D ! ` j /T$ 3 E 7 = ?W E M'| QW [WL aR gT oT H D !) wT0 {W, T W R UH P
0x0f3b8c…0f3d20 Dummy {f00=0x004c, f01=0x40a6, f02=» W ' ' #' %P ?' C' I' KP t H D !s gT k P P P W h' ' ' ' 0 ' ' ' ' | ( @ T$ 3 E 7 = ?W E M'| QW [WL aR gT oT H D !) wT0 {W, T W R UH P
0x0f3d20…0f3eb4 (1, 50) Dummy {f00=0x004c, f01=0x4104, f02=» J F IDENT DVDY05 REL 9.2 COPY80 831215 8701050 DVDY05K R DVDY05K d DYADN x * & P DY % P @ 8 , 8 @ 0,0,
0x0f3eb4…0f4048 Dummy {f00=0x004c, f01=0x8190, f02=» > @ IDENT DRDY01 9.2DK 2 83-12-15 870105040921 DYAD ECHODY F DYAD ^ OUTPUT p , ( DISIOE * & !@ ! P P & , ( = B P B
0x0f4048…0f41dc Dummy {f00=0x004c, f01=0x8190, f02=» ! B B , ( U $ ! T _ U D ! " GETCHR R , ( T _ $$ X" X& X* C d , ( X`" E P 8'0P , ( E T ! T 9 _ ! T @_ , ( 5 !
0x0f41dc…0f4370 Dummy {f00=0x004c, f01=0x818e, f02=» , ( X ' X ] ! * & B ! ! ! 4 , ( B Y & ! W 8!0 b , ( T 8 !@P ! $ P ! 8 , ( !@T ! ! T TENDIO T
0x0f4370…0f4504 Dummy {f00=0x004c, f01=0x8190, f02=» , ( S Y )Q Y > X Z2<BR J * & o ? Y ! T X 4 , ( ! Y & Zl " b , ( T _ ! X $ P ! ECHODY , ( R V P P ! F
0x0f4504…0f4698 Dummy {f00=0x004c, f01=0x8190, f02=» X &" Y )U W x , ( 3" ! ! ! Y , ( M 4 B U ) H , ( k X R X X &" Y * X ) x , ( V Y ! X $ X & , ( @ ! X * `R Y , (
0x0f4698…0f482c Dummy {f00=0x004c, f01=0x8190, f02=» h 4 6 > H D ! ^ p )P -P 3 9 CP SP WP4 ]T oR yR " H D ! P F U4 T U T P( P TD !T /T MP S _ iP n H D !> mR P F W T P P T 6 T %T WQ H D !
0x0f482c…0f49c0 Dummy {f00=0x004c, f01=0xc008, f02=»@
0x0f49c0…0f4b54 (1, 51) Dummy {f00=0x004d, f01=0x0190, f02=» J F IDENT DRDY01 9.2DK 2 83-12-15 870105040921 DYADY ECHODY R DYADY j OUTPUT | , ( , ( !@ ! 8! P ! P P DISIOE , ( =
0x0f4b54…0f4ce8 Dummy {f00=0x004d, f01=0x0190, f02=» Y &_4 8$ T B 1 ! * ( B B U $ ! . , ( T _ U D ! T _ $$ GETCHR , ( X" X& X* C , ( X`" E P 8'0P E T ! , ( 3 T
0x0f4ce8…0f4e7c Dummy {f00=0x004d, f01=0x0190, f02=» _ X n , ( X &" X )# C V C , ( ! Y B ! Y > , ( _` C _ " $ P n , ( X ' X ] ! , ( B 8! T ! ! , ( #@ !
0x0f4e7c…0f5010 Dummy {f00=0x004d, f01=0x0190, f02=» } R P ! W Y &_ , ( Y & B Y )U X ) T T W . , ( V X ' Y )U P R ! ^ , ( @_ R _ ! Y ' * & @ " ! 8!0T 8 !@P ! , ( $ P ! 8!@
0x0f5010…0f51a4 Dummy {f00=0x004d, f01=0x0190, f02=» Y n DWTST , ( c > X " X &" Y )Q Y > X LDREG N , ( Z2<BR J ? Y ^ , ( @ 8" P ! ! T 8" P * & d ! Y ! *0 ! , ( X !
0x0f51a4…0f5338 Dummy {f00=0x004d, f01=0x0190, f02=» ECHRTN , ( # dW T X $ X , ( = ! _ X $ X 8! P ! _( X @ * & [ & ! ! Y _D X p , ( w " X &" Y )U W ! , ( D ! ! Y 4 B , (
0x0f5338…0f54cc Dummy {f00=0x004d, f01=0x0190, f02=»H `R Y ! ! , ( % ! 4 ! V . , ( ? ! V W :h ! 4 X ^ , ( [ )" X '# R 4 T > H D ! ` t | . )P 5P 9P ? T E OP _P cP4 iT {R H
0x0f54cc…0f5660 Dummy {f00=0x004d, f01=0x4128, f02=» X EV YT V H D ! e . gW qU }R P W U T T W V U P" R R T H D ! P P #T - T 7T CT uQ R P T> P T P r R V ^ H D ! P P" )W ? r OP S r _ . i U W U R@ V . R =V KV OW k
0x0f5660…0f57f4 (1, 52) Dummy {f00=0x004d, f01=0x2008, f02=» . L = KMD10 DATE = 83 11 11 1216PACK NBR = 0001 8 @
0x0f57f4…0f5988 Dummy {f00=0x004d, f01=0x0190, f02=» DMT165 YES P CCK A2,'LL' LIBRARY FILE ? P ABL(NZ) DMT250 NO 8 P LDK A2,0 FILE EXTENT NUMBER R P RF DMT167 v . PDMT165 LD A2,VTFSNO,A3 FILE SECTION NUMBER P EJECT PDMT167 EQU * P* . P* GET INFO FROM VTOC AND SAVE IN
0x0f5988…0f5b1c Dummy {f00=0x004d, f01=0x0190, f02=» P ST A1,TASCXO P RF(NN) DMT170 <= 4 EXTENTS P LDK A7,9 B * P ABL DMTASX MORE THAN 4 EXTENTS EXIST T PDMT170 EQU * " P ECR A2,A2 TO LEFT HALF OF A2 4 P LC A2,VTFXNO+1,A4 EXT NO INTO RIGHT HALF OF A2 P ST A2,TASSEX,A1
0x0f5b1c…0f5cb0 Dummy {f00=0x004d, f01=0x0190, f02=» LD A2,VTFXBA,A4 EXTENT BASE P ST A2,TASXLB+2,A1 $ P LD A2,TASSEX,A1 > $ P RF(NZ) DMT250 NOT FIRST EXTENT V P EJECT ~ P* FIRST FILE EXTENT < P* CHECK IF AN FDB DESCRIBING THE FILE ALREADY EXISTS. P* P LD A12,TASFDB *
0x0f5cb0…0f5e44 Dummy {f00=0x004d, f01=0x0190, f02=»FDBSTA PDMT200 EQU * P LDR* A5,A12 " P ANK A5,/01 6 P RF(Z) DMT210 FREE J P LD A2,FDBEXT,A12 d P CW A2,TASVOL,A6 ~ " P RF(NE) DMT210 NOT SAME VOLUME P LD A2,FDBVTO,A12 P CW A2,TASVRN $ P RF(NE) DMT210 NOT SAME VTOC
0x0f5e44…0f5fd8 Dummy {f00=0x004d, f01=0x0190, f02=»OUND j PDMT205 EQU * P LDK A7,5 FILE CODE USED P ABL DMTASX @ P* T $ PDMT210 LDR* A12,A12 GET NEXT FDB ^ P ANKL A12,/FFFE ( P RB(NE) DMT200 MORE FDB:S TO SEARCH P* 0 P* NO MATCHING FDB EXIST FIND A FREE FDB P
0x0f5fd8…0f616c Dummy {f00=0x004d, f01=0x0190, f02=» P ANKL A12,/FFFE & P RB(NE) DMT220 MORE FDB:S TO CHECK P LDK A7,3 F P ABL DMTASX NO FDB AVAILABLE X ( P* INITIALIZE FDB ZERO FROM FDB+2 | P* PDMT230 EQU * P ST A12,TASFDB P LDR A10,A12 P ADKL A10,QFDBFL P
0x0f616c…0f6300 Dummy {f00=0x004d, f01=0x0190, f02=»DMT233 PDMT237 EQU * P LDKL A2,/8000 " P* DEV NOT BUSY 8 P ST A2,DWTST,A12 P P LDKL A2,TIODM h P ST A2,DWTADR,A12 ~ P LDKL A2,SECTLE P LDR A1,A12 P ADKL A1,FDBECB P ST A2,ECBRL,A1 P LDK A2,/01 P
0x0f6300…0f6494 (1, 53) Dummy {f00=0x004d, f01=0x0190, f02=» LD A2,VTRLE,A4 P ST A2,FDBRLE,A12 P LC A2,VTBLF,A4 2 P SC A2,FDBBLF,A12 J P LC A2,VTNIF,A4 d P SC A2,FDBNIF,A12 | P LD A2,VTKA,A4 P ST A2,FDBKA,A12 P LD A2,TASVRN P ST A2,FDBVTO,A12 P* P IFT MMUPA
0x0f6494…0f6628 Dummy {f00=0x004d, f01=0x0004, f02=» x
0x0f6628…0f67bc Dummy {f00=0x004d, f01=0x0190, f02=» 2 P IDENT DMINIT REL 9.2 79-11-16 870105040920 P : P* B 8 P**************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P* DMINIT = DATA MANAGEMENT INITIALIZATION P* P*
0x0f67bc…0f6950 Dummy {f00=0x004d, f01=0x018e, f02=»FDB:S IN THE FDB AREA z > P* CLEAR THE USE BIT AND THE BUFFER HEADER IN DM BUFFERS 0 P* CLEAR USE BIT AND QUEUE ANCHOR IN TASBLK ` , P* CLEAR DM FILE CODE ENTRIES IN CD:TAB P* , P* DMINIT IS CALLED AS A PFINIT ROUTINE P* " P
0x0f6950…0f6ae4 Dummy {f00=0x004d, f01=0x0190, f02=» P EXTRN FDBSTA P EXTRN FDBEND P EXTRN CURBUF 0 P EXTRN BUFDMI F P EXTRN BUFSNR P EXTRN BUFOR r P EXTRN TASBLK P EXTRN TASQUE P EXTRN CRNQUE,CRNEND P EXTRN CRBUFL P EJECT P* P* P*
0x0f6ae4…0f6c78 Dummy {f00=0x004d, f01=0x0190, f02=» P* DIV W. 2 FOR 16 K LIMIT P* ( P LDR A5,A4 2 P SRL A5,1 D P LDR A1,A6 V P SRL A1,1 h P CWR A5,A1 z " P RF(G) DMIN40 END OF FDB AREA P STR A4,A3 CHAIN P LDR A3,A4 P RB DMIN30 PDMIN40 EQU * P SUR A
0x0f6c78…0f6e0c Dummy {f00=0x004d, f01=0x0190, f02=»ALIZATIONS IF POWER FAIL RESTART P* ( P LD A1,INIFLG 2 P RF(Z) DMINEX H P LDKL A2,QFDBFL FDB LENGTH ^ P* $ P* CHAIN FDB:S IN THE FDB AREA P* P LDKL A3,FDBSTA P LDKL A6,FDBEND P CF A15,DMIN30 P*
0x0f6e0c…0f6fa0 Dummy {f00=0x004d, f01=0x0190, f02=» P CF A15,DMIN30 P* < P* CLEAR USE BIT AND BUFFER HEADER WORDS IN DM BUFFERS $ P* d P LDKL A2,/FFFE n P LD A3,CURBUF PDMIN50 LDR* A3,A3 P ANRS A2,A3 CLEAR USE BIT P CM BUFDMI,A3 P CM BUFSNR,A3 P CM BU
0x0f6fa0…0f7134 (1, 54) Dummy {f00=0x004d, f01=0x0190, f02=» b P X l T x , ( @_| Xv Y @ P T W X , ( &P T P H T H TTB:PW x , ( 7 _ X I Y T , ( U # C C W O " # X , ( u Y ) C C
0x0f7134…0f72c8 Dummy {f00=0x004d, f01=0x0002, f02=» P
0x0f72c8…0f745c Dummy {f00=0x004d, f01=0x0190, f02=» J F IDENT TLDSEG REL 9.2 79-11-16 870105040920 TLDSEGK TLDS15 TLDS20 R TLDSEGK t SCTNOS LKM030 SCTSEG , ( R @ U 9C @ TTB:SB@ SEG:D
0x0f745c…0f75f0 Dummy {f00=0x004d, f01=0x0190, f02=» * & 5 H $R M A D TLDS15 T 6 PAG:QB@ J TLDS20 d PAG:PA p , ( K B _ $P D % 1 I SCTMMP SCTNPE , ( eB@ D " @ @ - U
0x0f75f0…0f7784 Dummy {f00=0x004d, f01=0x402e, f02=» /W^ 7R WP yU @ * TLDS15 T 6 PAG:QB@ J TLDS20 d PAG:PA p , ( K B _ $P D % 1 I SCTMMP SCTNPE , ( eB@ D " @ @ - U
0x0f7784…0f7918 Dummy {f00=0x004d, f01=0x2008, f02=»
0x0f7918…0f7aac Dummy {f00=0x004d, f01=0x4124, f02=»T W T V H D ! P W P R P P aQ iP Q~ P0 P* T QL H D ! U( Q2 T 3V = cUJ qP uPL Q P T P U 9T ARl E H ^ H D ! QU WQ0 q P& P P T T !P /PD [R ]P cP yP8 }P0 P P P W
0x0f7aac…0f7c40 Dummy {f00=0x004d, f01=0x2008, f02=»
0x0f7c40…0f7dd4 (1, 55) Dummy {f00=0x004e, f01=0x0190, f02=»AME MAX 4 WORDS PDMT150 EQU * P LDR* A10,A4 , P CWR* A10,A7 @ P ABL(NE) DMT250 NO MATCH T P SUK A2,1 t . P RF(NP) DMT160 ALL 4 FILE NAME WORDS MATCH P ADK A4,2 P ADK A7,2 P RB DMT150 CHECK NEXT WORD P* ( P
0x0f7dd4…0f7f68 Dummy {f00=0x004e, f01=0x0190, f02=»F(E) DMT165 YES P CCK A2,'LL' LIBRARY FILE ? P ABL(NZ) DMT250 NO < P LDK A2,0 FILE EXTENT NUMBER V P RF DMT167 z . PDMT165 LD A2,VTFSNO,A3 FILE SECTION NUMBER P EJECT PDMT167 EQU * P* . P* GET INFO FROM VTOC AND SAV
0x0f7f68…0f80fc Dummy {f00=0x004e, f01=0x0190, f02=»1,4 P ST A1,TASCXO P RF(NN) DMT170 <= 4 EXTENTS " P LDK A7,9 F * P ABL DMTASX MORE THAN 4 EXTENTS EXIST X PDMT170 EQU * " P ECR A2,A2 TO LEFT HALF OF A2 4 P LC A2,VTFXNO+1,A4 EXT NO INTO RIGHT HALF OF A2 P ST A2,TASSEX,A1
0x0f80fc…0f8290 Dummy {f00=0x004e, f01=0x0190, f02=» P LD A2,VTFXBA,A4 EXTENT BASE P ST A2,TASXLB+2,A1 ( P LD A2,TASSEX,A1 B $ P RF(NZ) DMT250 NOT FIRST EXTENT Z P EJECT P* FIRST FILE EXTENT < P* CHECK IF AN FDB DESCRIBING THE FILE ALREADY EXISTS. P* P LD A12,TASFDB
0x0f8290…0f8424 Dummy {f00=0x004e, f01=0x0190, f02=»A12,FDBSTA PDMT200 EQU * P LDR* A5,A12 & P ANK A5,/01 : P RF(Z) DMT210 FREE N P LD A2,FDBEXT,A12 h P CW A2,TASVOL,A6 " P RF(NE) DMT210 NOT SAME VOLUME P LD A2,FDBVTO,A12 P CW A2,TASVRN $ P RF(NE) DMT210 NOT SAME
0x0f8424…0f85b8 Dummy {f00=0x004e, f01=0x0190, f02=»DB FOUND n PDMT205 EQU * P LDK A7,5 FILE CODE USED $ P ABL DMTASX D P* X $ PDMT210 LDR* A12,A12 GET NEXT FDB b P ANKL A12,/FFFE ( P RB(NE) DMT200 MORE FDB:S TO SEARCH P* 0 P* NO MATCHING FDB EXIST FIND A FREE FDB
0x0f85b8…0f874c Dummy {f00=0x004e, f01=0x0190, f02=» v P ANKL A12,/FFFE & P RB(NE) DMT220 MORE FDB:S TO CHECK P LDK A7,3 J P ABL DMTASX NO FDB AVAILABLE ( P* INITIALIZE FDB ZERO FROM FDB+2 P* PDMT230 EQU * P ST A12,TASFDB P LDR A10,A12 P ADKL A10,QFDBFL
0x0f874c…0f88e0 Dummy {f00=0x004e, f01=0x0190, f02=» RB DMT233 PDMT237 EQU * P LDKL A2,/8000 & P* DEV NOT BUSY < P ST A2,DWTST,A12 T P LDKL A2,TIODM l P ST A2,DWTADR,A12 P LDKL A2,SECTLE P LDR A1,A12 P ADKL A1,FDBECB P ST A2,ECBRL,A1 P LDK A2,/01
0x0f88e0…0f8a74 (1, 56) Dummy {f00=0x004e, f01=0x018e, f02=» 0 PTASVOL DATA 0 VOLUME IDENTIFICATION (DMI,FC) " P DATA 0,0,0 THREE MORE ENTRIES 8 6 PTASCXO DATA 0 CURRENT OFFSET IN TASSEX AND TASXLB ^ 0 PTASSEX DATA 0 SECTION NUMBER, EXTENT NUMBER * P DATA 0 OFFSET IN TASVOL FOR THIS EXT ( P DATA 0,0,0,0,
0x0f8a74…0f8c08 Dummy {f00=0x004e, f01=0x0190, f02=» PTASFDB DATA 0 FDB ADDRESS $ PTASVRL DATA 0 VTOC RECORD LENGTH & PTASVLE DATA 0 VTOC LENGTH N PTASVRN DATA 0 VTOC RECORD NO p PTASECB DATA 0,0 ECBFC,ECBBA P DATA 410 ECBRL P DATA 0,0,0 ECBEL,-RC,-CW P DATA 0 CW2 0 PTA
0x0f8c08…0f8d9c Dummy {f00=0x004e, f01=0x0190, f02=»TASSPW DATA 0 TTAB ADDRESS DMTASK $ PTASFDD DATA 0 FDB ADDR DATA FILE * ( PTASTBE DATA 0 TTAB/SCTCDT ENTRY ADDR R 2 PTASLFD DATA 0,0 LOCKED FLEXDISC FILE CODES =1 ~ P DATA 0,0 P DATA 0,0 " PTASS14 EQU *-2 TASS A14 STACK P* P
0x0f8d9c…0f8f30 Dummy {f00=0x004e, f01=0x0190, f02=» * P************** P* , P* ENTRY TASCAQ CHECK ASSIGN QUEUE * P* Z P* A7= RETURN CODE d P* * P* SET OFF USE BIT IN TASBLK H P* IF TASQUE = 0 THEN RETURN ELSE QUEUE FIRST IN CHAIN AND 2 P
0x0f8f30…0f90c4 Dummy {f00=0x004e, f01=0x0190, f02=»QUE P RF(Z) TASCEX EMPTY QUEUE " P LDR* A1,A5 GET NEXT IN CHAIN . , P ST A1,TASQUE AND PUT IT FIRST IN QUEUE T P LDKL A1,-4 ( P ADS A1,TTB:SA,A5 UPD DISPATCH ADDR P CF A15,QTJOB NEXT ASSIGN P RF TASC05 & PTASCEX CM TASQUE
0x0f90c4…0f9258 Dummy {f00=0x004e, f01=0x0190, f02=» CODE IN SAVED A7 r P RTN A14 P EJECT * 8 P****DESCRIPTION************************************* 8 P* t : P* VOLCHE WILL COMPARE EACH VOLUME NAME IN ASBLK WITH ~ & P* VOLUME NAMES IN DWT FOR DISCS P* 8 P****ENTRY PARAMETERS****
0x0f9258…0f93ec Dummy {f00=0x004e, f01=0x0190, f02=»S WANTED. v : P* 1 LOCK WANTED. ONLY FROM DMTASS FOR FLEXDISC P* P 8 P****EXIT PARAMETERS********************************* Z P* P* A1 = 0 OK P* 1 VOLUME UNKNOWN P* A5 = TTAB ADDR P* 8 P****USED REG
0x0f93ec…0f9580 Dummy {f00=0x004e, f01=0x0190, f02=»************** h PVOLCHE EQU * P CM TASLFD =1 * $ P CM TASLFD+2 LOCKED FLEXDISCS =1 @ P SLL A2,1 h P SUK A2,2 z 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
0x0f9580…0f9714 (1, 57) Dummy {f00=0x004e, f01=0x0190, f02=» P LKM > P DATA 3 EXIT > P XIF > $ P IFT FLXDSC=1 > 0 P EJECT > F PDMT900 EQU * > T $ P* UNLOCK FLEXDISC IN THIS LOOP > h P* > P* REGISTERS > P* A1 = EXTENT COUNTER > 6 P* A4 = LAST VOL CODE FLEXDOISC A5 = EXT ADDR >
0x0f9714…0f98a8 Dummy {f00=0x004e, f01=0x0190, f02=»NGTH IN FDB > z P LCR A7,A5 VOLUME CODE ? P ANK A7,/FF ? 2 P ABL(Z) DMT880 NO CODE ? F P* ? d & P* FLEXDICSC IF BIT 8-13 = 111110 ? n P* ? P ANK A7,/F8 ? P SUK A7,/F8 ? P ABL(NE) DMT880 NO FLEXDISC ? P* ? 6 P* IF SAME FLEX
0x0f98a8…0f9a3c Dummy {f00=0x004e, f01=0x0190, f02=»THOIS FLEXIBLE DISC VOL CODE ? t P* @ $ PDMT910 EQU * @ . P LCR A4,A5 SAVE VOL CODE @ B " P LDKL A3,FDBSTA FDB LINK ROOT @ b P INH INH @ P RF DMT925 @ PDMT920 EQU * @ P LDR* A3,A3 FDB ADDR @ PDMT925 EQU * @ P ANKL A3,/FFFE FDB ADD
0x0f9a3c…0f9bd0 Dummy {f00=0x004e, f01=0x018e, f02=» DMT920 CURRENT FDB @ P LDK A7,4 EXTENT COUNTER A P LDR A2,A3 FDB ADDR A < P ADKL A2,FDBEXT+1 A X P* ADDR OF 1ST VOL CODE A r & P SUKL A2,EXTELE EXT LENGTH IN FDB A PDMT930 EQU * A P SUK A7,1 A & P RB(N) DMT920 ALL EXTENTS CHECKED A
0x0f9bd0…0f9d64 Dummy {f00=0x004e, f01=0x018e, f02=» A & P* ALL FSDBS CHECKED. MAKE UNLOAD B P* B 2 PDMT980 EQU * B < P ENB ENB B P P* B b 6 P* NOTE THAT ECBBUF IS ASSUMED NOT TO BE CHANGED B l P* WITH THIS REQUEST B P* B P SC A4,ECBFC,A8 VOL CODE B P* B P IFF DSKPAG+SWPB
0x0f9d64…0f9ef8 Dummy {f00=0x004e, f01=0x0190, f02=» P IFT FLXDSC=1 C P LDK A7,/B8 UNLOAD WAIT C P LKM C : P DATA 1 C F P LD A1,ECBRC,A8 C V P ANK A1,1 INOPER C n P ABL(NZ) DMTERR C P ABL DMT880 CHECK NEXT EXT C P XIF C P EJECT C " PDMT500 EQU * READ VTOC RECORD C P* C "
0x0f9ef8…0fa08c Dummy {f00=0x004e, f01=0x0190, f02=»H C v ( P ORS A1,ECBRC,A9 SET RC BUT CONTINUE D , P LD A2,ECBRL,A9 MOVE WHAT USER TOLD YOU D 6 PDMT510 EQU * D f P ST A2,ECBEL,A9 D z P CF A14,DMTREM MOVE RECORD D PDMAEX EQU * D P ABL DMTAEX EXIT D P EJECT D " PDMSQWR EQU * SEQUENTIAL WR
0x0fa08c…0fa220 Dummy {f00=0x004e, f01=0x0190, f02=» D v P* E PDMDEL EQU * INDEXED DELETE E P* E 4 PDMIRW EQU * INDEXED REWRITE E > P* E b & PDMRDWD EQU * DELAYED RANDOM WRITE E l P* E & PDMRDDD EQU * DELAYED RANDOM DELETE E P* E P* TEST STATUS E P LD A10,FDBRRO,A6 E P A
0x0fa220…0fa3b4 (1, 58) Dummy {f00=0x004e, f01=0x0190, f02=» % t P RF(NG) TIOD25 CRN <= LRN & PTIOD23 EQU * & * P LDKL A3,/1000 END OF FILE & > P ORS A3,ECBRC,A8 & ` P ANK A7,/3F & x P SUKL A7,SQR SEQ READ & P RF(NE) TIOD25 NOT SR & P LDR A1,A3 & P RF TIODME & PTIOD25 EQU * & 6 P CF A14,
0x0fa3b4…0fa548 Dummy {f00=0x004e, f01=0x0190, f02=»TE DMTASK WITH FDB ADDRESS IN A1 & P* ' ( PTIOD68 EQU * ' 2 P ENB ' F P ENB ' R P INH ' ^ P LDR A1,A6 FDB ADDRESS ' j P LDK A7,0 ' $ P LC A7,EXTDMI,A4 TID FOR DMTASK ' P ADKL A7,'#D' ' P CF A15,FNDTID A2:=TTAB ADDR ' P LDR A5,A2 '
0x0fa548…0fa6dc Dummy {f00=0x004e, f01=0x0190, f02=»TE DMTASK ' | P* ( P* EXIT TO TDISP ( P* ( 6 P ABL TDISP ( @ P* ( R P EJECT ( P* ( j P************** ( t P* TIODME * ( P************** ( P* ( J P* TIODM ERROR CALL TENDIO WITH RETURN CODE IN A1 AND GOTO DISPATCHER (
0x0fa6dc…0fa870 Dummy {f00=0x004e, f01=0x4056, f02=»RESS ( , P ABL DISEND CALL TENDIO GOTO DISPATCHER ) P* ) < P END ) F@ ) R R P EJECT ( P* ( j P************** ( t P* TIODME * ( P************** ( P* ( J P* TIODM ERROR CALL TENDIO WITH RETURN CODE IN A1 AND GOTO DISPATCHER (
0x0fa870…0faa04 Dummy {f00=0x004e, f01=0x2008, f02=» *
0x0faa04…0fab98 Dummy {f00=0x004e, f01=0x0190, f02=» P STR A1,A4 P ST A4,FREQUE SET BLOCK FREE P LD A2,2,A4 > P LD A1,4,A4 R P* f P IFT CPU852=1 p P RF IHRTN P XIF P* P IFT CPU852=0 P RTN A15 P XIF P* P EJECT MSUBS P*
0x0fab98…0fad2c Dummy {f00=0x004e, f01=0x0190, f02=» A5 = TTAB ADDRESS 8 P* A7 = ORDER CODE WHEN CALLED FROM DATA MANAGEMENT P* A8 = ECB ADDRESS X P* t P* EXIT PARAMETERS:- ~ P* P* A2 = DWT INDEX * P* A6 = DWT ADDRESS IF FOUND, ELSE 0 P* P* PFNDDWT
0x0fad2c…0faec0 Dummy {f00=0x004e, f01=0x0190, f02=»GTH v P* P IFT MMUPAG=1 & P ELR A2,A8 LOAD FILE CODE FROM ECB , P XIF V P* b P IFT MMUPAG=0 l ( P LDR* A2,A8 LOAD FILE CODE FROM ECB P XIF P* P EJECT MSUBS P* P* PFND100 SUK A1,4 ( P R
0x0faec0…0fb054 (1, 59) Dummy {f00=0x004f, f01=0x0190, f02=»ATA /0E10 P DATA /1214 P DATA /1616 & P DATA /1616 : P DATA /0218 N P DATA /181A b P DATA /1C1E v P DATA /2022 P DATA /2426 P DATA /281A SET LRN P* $ PNOOFOR EQU 25 NO OF ORDER CODES P*
0x0fb054…0fb1e8 Dummy {f00=0x004f, f01=0x0190, f02=»RD P XIF P* P IFT MMUPAG=1 PSTART EQU DWTDRD+4 6 P XIF P P* P* f P* FDB OFFSET DEFINITIONS p P* " PFDBLNK EQU 0 LINK TO NEXT FDB PFDBECB EQU START+2 ECB START & PFDBSNR EQU START+16 SECTOR NUMBER
0x0fb1e8…0fb37c Dummy {f00=0x004f, f01=0x0190, f02=» l 0 PFDBTNR EQU START+23 TASK NUMBER CALLING TASK & PFDBVTO EQU START+24 VTOC RECORD NO < 4 PFDBCEX EQU START+26 CURRENT EXTENT BLOCK POINTER f 0 PFDBEXT EQU START+28 FIRST EXTENT BLOCK START PEXTDMI EQU 0 DMTAST IDENT PEXTFC EQU 1 VOLUME F
0x0fb37c…0fb510 Dummy {f00=0x004f, f01=0x0190, f02=»+53 LAST RECORD NUMBER * PFDBNIF EQU START+52 NO OF INDEX FILES $ PFDBEAL EQU START+56 EA LINK ROOT L & PFDBCRL EQU START+58 CRN LINK ROOT t 0 PFDBKA EQU START+60 KEY ADDRESS IN DATA FILE 0 PFDBMIA EQU START+62 ADDRESS OF MASTER INDEX 0 PFD
0x0fb510…0fb6a4 Dummy {f00=0x004f, f01=0x0190, f02=»AND REL BUFFER FLAGS p , PFDBMRN EQU START+75 LAST REC NR IN FILE " PFDBMRO EQU START+78 MAX FDBRRO L , PFDBMEC EQU START+80 MMU ECB DISPLACEMENT r < PFDBKEY EQU START+94 SAVE AREA FOR KEY IN INDEXED ACCESS P* & P* CRN BUFFER OFFSET DEFINI
0x0fb6a4…0fb838 Dummy {f00=0x004f, f01=0x0190, f02=» P EJECT P* P************* P* TIODM * 2 P************* H P* ^ P* h ( P DATA 0 DATA MANAGEMENT DEVICE INDEX r & PTIODM DATA *+2 TIODM START ADDRESS P* P* SET UP A14 STACK P* P LDKL A14,TIOD14
0x0fb838…0fb9cc Dummy {f00=0x004f, f01=0x018e, f02=» A1,A2 P LD A3,2,A1 P CW A3,DWTTDM,A6 " P RF(E) TIOD10 THIS TASK : P ADK A2,2 NO Z P RB TIOD05 TRY NEXT n PTIOD10 EQU * P LC A1,TTB:ID,A3 GET TASK ID P CCK A1,'##' ( P RF(E) TIO13 JUMP IF DMTASK CALLING P*
0x0fb9cc…0fbb60 Dummy {f00=0x004f, f01=0x0190, f02=» P LDKL A4,/4000 REQ BUSY BIT PTIO11 EQU * ( P SUK A3,2 < P RF(N) TIO13 ALL FDB READY N P LDR* A5,A1 FDB ADDR p P RF(E) TIO12 NO FDB P SC A2,FDBTNR,A5 TASK ID " P ORS A4,DWTST,A5 REQ BUSY BIT PTIO12 EQU * P ADK A
0x0fbb60…0fbcf4 (1, 60) Dummy {f00=0x004f, f01=0x0190, f02=»R IN A7 , P* PUT ORDER INDEX IN DWTOR RIGHT BYTE P* @ P LDKL A1,/8000 REQUEST ERROR J & P LDK A2,NOOFOR-1 NO OF ORDERS - 1 n 2 PTIOD15 CC A7,TIODMO,A2 START AT END OF TIODMO P RF(E) TIOD20 MATCH P SUK A2,1 P RB(NN) TIOD
0x0fbcf4…0fbe88 Dummy {f00=0x004f, f01=0x0190, f02=»BI TIODMF,A2 BRANCH TO DM FUNCTION P EJECT * P* 8 $ PIXRARE EQU * INDEXED RANDOM READ B P LD A3,ECBCW2,A8 =1 j P ANK A3,/FF REQ KEY LGTH =1 P LD A4,FDBRLE,A6 =1 P SUK A4,6 MAX LGTH =1 P CWR A3,A4 =1 P RF(NG) IXRAR1
0x0fbe88…0fc01c Dummy {f00=0x004f, f01=0x0190, f02=»GET USER KEY ADDRESS 0 P LDK A2,FDBKEY GET FDB KEY AREA DISPLACEMENT P ADR A2,A6 ADD FDB ADDRESS P P* =1 r 2 P CF A14,MOV:US MOVE KEY FROM USER TO FDB AREA P XIF P* $ PDELIXR EQU * DELETE INDEX RECORD P* $ PINSIXR E
0x0fc01c…0fc1b0 Dummy {f00=0x004f, f01=0x018e, f02=»U * CLOSE A FILE P LDK A4,0 PTIOC10 EQU * * $ P ST A4,FDBRRO,A6 MARK ORDER TYPE > P LDK A2,0 f , P ST A2,FDBSNR,A6 SECTOR #0 VOLUME LABLE x P* ( P* LET FDBCEX POINT TO FIRST EXTENT P* P LDR A4,A6 P ADK A4,FDBEXT
0x0fc1b0…0fc344 Dummy {f00=0x004f, f01=0x0190, f02=» P LDR A1,A6 FDB ADDR 0 P LDKL A2,/C000 REMOVE BUFFERS FOR THIS TASK P CF A14,EARELB T PREL090 EQU * j P LDK A1,0 CORRECT RETURN ~ P ABL TIODME P EJECT ( PSETLRN EQU * SET LAST RECORD NUMBER P LC A1,ECBCW+3,A8 P S
0x0fc344…0fc4d8 Dummy {f00=0x004f, f01=0x0190, f02=»DATA REC p P RF GET010 . PGETCUX LDK A7,CRNCIF+1 GET CURR INDEX REC " PGET010 LDR A1,A6 FDB ADDR T " P CF A14,CRNGET GET CRN BUFFER v P ADR A7,A2 ADDR CURR REC NO P LDK A2,0 P LC A3,-1,A7 FILE CODE P CC A3,ECBFC,A8 P
0x0fc4d8…0fc66c Dummy {f00=0x004f, f01=0x0190, f02=»REC NO ~ P LD A2,1,A7 PGET030 EQU * " P ST A2,ECBCW,A8 6 P RB REL090 N P EJECT ` " PSEQREAD EQU * SEQUENTIAL READ n P* $ P* FIND CRN+1 AND TEST IF > LRN P* P LDR A1,A6 FDB ADDR " P CF A14,CRNGET GET CRN-BUFFE
0x0fc66c…0fc800 Dummy {f00=0x004f, f01=0x018e, f02=»ERFLOW P RF SEQR20 PSEQR10 EQU * " P ANKL A2,/7FFF REMOVE OVERFLOW 4 P ADK A1,1 ADD CARRY Z PSEQR20 EQU * v P SC A1,ECBCW+3,A8 REC NO P ST A2,ECBCW,A8 P* $ P* CONTINUE AS FOR RANDOM READ P* P EJECT
0x0fc800…0fc994 (1, 61) Dummy {f00=0x004f, f01=0x0190, f02=»ECK NEXT M r P LDR A6,A1 FDB ADDR N P LDKL A1,/4000 KEY NOT FOUND N , P RF DMERR N P PCHK100 EQU * N b P LDR A6,A1 FDB ADDR N v P LD A7,DWTOR,A6 N P ANK A7,/3F ORDER INDEX N P LDK A2,0 N P LC A2,FDBNIF,A6 N P CWR A2,A12 N ( P
0x0fc994…0fcb28 Dummy {f00=0x004f, f01=0x0190, f02=»R N P XIF O $ PDMEAER LDKL A1,/2000 EA PROTECT O PDMERR ABL DMTERR O > P EJECT O V P* O d P* MOVE RECORD O n P* O PDMT310 EQU * O P IFT INDXAC=1 O P LDR A2,A7 O P SUK A2,QDEL O " P ABL(E) DMXDEL INDEXED DELETE O P X
0x0fcb28…0fccbc Dummy {f00=0x004f, f01=0x0190, f02=»FROM ADDRESS O P* P P IFT MMUPAG=0 P P XRR A4,A1 P 4 P ANK A4,/01 P F ( P RF(E) DMT320 BOTH ODD OR BOTH EVEN P Z & P CF A14,DMTBM ONE ODD AND ONE EVEN P P RF DMT340 P P* P PDMT320 LDR A4,A3 P P ANK A4,/01 P P RF(E) DMT330 BO
0x0fccbc…0fce50 Dummy {f00=0x004f, f01=0x018e, f02=»RD MOVE P z P* Q P XIF Q P* Q & P IFT MMUPAG=1 Q 0 P LDR A3,A2 GET LENGTH Q F , P LDR A2,A4 GET RECEIVING BUFFER ADDRESS Q d P INH Q & P LD A4,DWTTDM,A6 GET TTAB ADDRESS Q $ P TL TTB:MT,A4 LOAD MMU REGISTERS Q $ P LD A4,PRUN GET DM TTA
0x0fce50…0fcfe4 Dummy {f00=0x004f, f01=0x0190, f02=» Q Z P XIF R P* R PDMT340 EQU * R P* R 2 P* SET STATUS USED R < P* R X P LDK A1,/FF R b PDMT350 SCR A1,A10 R v P LD A3,FDBDBR,A6 R P RF(NN) DMT394 NO DELAY R P LDR A2,A7 R P SUK A2,QSW R " P RF(E) DMT360 SEQUENTIAL W
0x0fcfe4…0fd178 Dummy {f00=0x004f, f01=0x0190, f02=»NDOM DELETE R x P RF DMT390 S $ P* WRITE IF LAST REC IN SECTOR S & P* S N PDMT360 LD A4,FDBRRO,A6 S X P CW A4,FDBMRO,A6 S v " P RF(NE) DMT400 NOT LAST RECORD S " PDMT390 LDK A7,/05 BASIC WRITE S P SLL A3,1 S P RF(N) DMT395 BASIC WANTED S
0x0fd178…0fd30c Dummy {f00=0x004f, f01=0x0190, f02=»1,A6 FDB ADDRESS AS PARAMETER S P LKM T & P DATA -1 I/O AND ACTIVATION T 2 " P DATA DMTAR2 DMTASK RESTART #2 T V P LKM T | P DATA 3 EXIT T P EJECT T P* T P************** T P* DMTAR2 * T P************** T P* T P* T ,
0x0fd30c…0fd4a0 Dummy {f00=0x004f, f01=0x0190, f02=»4,DMTIOT CHECK DISC I/O T P LDR A1,A1 U P RF(NZ) DMTERR U 2 P LDKL A1,/C0FF U H $ P ANS A1,FDBDBR,A6 RELEASE BUFFER U ^ PDMT400 EQU * U " P LDR A1,A6 FDB ADDR DATA FILE U P LD A2,ECBCW+2,A9 U P ANK A2,/FF U P LD A3,ECBCW,A9 LOG REC NR
0x0fd4a0…0fd634 (1, 62) Dummy {f00=0x0050, f01=0x0190, f02=» RF(E) DMT460 SEQ WRITE U P LDK A4,QRD V P CWR A7,A4 V 4 P RF(E) DMT420 RAND DEL V F P LDK A4,QRDD V d P CWR A7,A4 V x ( P RF(E) DMT420 DELAYED RANDEOM DELETE V P IFT INDXAC=1 V P LDK A4,QDEL V P CWR A7,A4 V P RF(E) DMT420 INDEXED
0x0fd634…0fd7c8 Dummy {f00=0x0050, f01=0x0190, f02=»ET GET CRN BUFFER V P LDR A10,A2 BUFFER ADDR W P IFT INDXAC=1 =2 START W : P LDK A3,QIRW W Z P CWR A7,A3 W n " P RF(E) DMT410 INDEXED REWRITE W P XIF =2 END W P CM CRNCIF,A2 W P* CLEAR INDEX CRN W P CM CRNCIF+2,A2 W PDM
0x0fd7c8…0fd95c Dummy {f00=0x0050, f01=0x018e, f02=»NCDF,A10 CRN FIL E CODE W P IFT INDXAC=1 X P LDK A4,QINS X 6 P CWR A7,A4 X J P RF(E) DMT460 INDEXED INSERT X P XIF X PDMT420 EQU * X P LDK A4,QSR X P CWR A7,A4 X P RF(E) DMT450 SEQ READ X P LDK A4,QRR X P CWR A7,A4 X
0x0fd95c…0fdaf0 Dummy {f00=0x0050, f01=0x018e, f02=» P* Y P* RELEASE EA Y P* Y $ P CF A14,EARELB REL EA Y . P RF DMTAEX Y L PDMT450 EQU * Y ^ P LC A4,DWTST,A1 DWTSTATUS Y r P ANK A4,EABIT EA-BIT Y & P RF(NZ) DMTAEX EA=1. NO EA WANTED Y P* Y " P* CHECK IF EA IS SET ALREADY Y
0x0fdaf0…0fdc84 Dummy {f00=0x0050, f01=0x0190, f02=» P CF A14,EASETB Z P RF DMTAEX Z PDMT460 EQU * Z , P* Z @ P* UPDATE LRN Z J P* Z ` P SC A2,FDBLRN,A1 Z j P ST A3,FDBLRN+1,A1 Z P IFT INDXAC=1 Z P LDK A4,QINS Z P CWR A7,A4 Z " P ABL(E) DMINS2 INDEXED INSERT Z P XIF Z
0x0fdc84…0fde18 Dummy {f00=0x0050, f01=0x0190, f02=»3F00 Z ( P RF(NZ) DMTERX NO RELEASE OF BUFFER [ PDMTEX1 LD A3,ECBBA,A8 [ 8 P SUK A3,8 [ V PDMTEX2 EQU * [ h ( P CF A14,DMTRBU RELEASE BUFFER AT A3 [ | PDMTERX EQU * [ P INH [ P* A1 = RET CODE [ P* A6 = DWT ADDR [ P CF A15,TEND
0x0fde18…0fdfac Dummy {f00=0x0050, f01=0x0190, f02=»RANDOM READ [ 2 P********************************************* " P LD A9,DWTECB,A1 USER ECB ADDR J P IFT MMUPAG=0 p P LD A8,ECBCW,A9 ADDR OF KEY P XIF P IFT INDXAC=1 P IFT MMUPAG=1 P LDR A8,A1 FDB ADDR " P ADKL A8,F
0x0fdfac…0fe140 Dummy {f00=0x0050, f01=0x018e, f02=» LDR A13,A1 P ADKL A13,FDBECB ECB ADDR ] $ P CF A14,FNDKEY GET INDEX RECORD ] 6 ( PDMR006 EQU * FROM INDEXED READ NEXT ] ^ P LD A9,DWTECB,A1 ] P LDR A6,A1 FDB ADR ] P LDKL A8,FDBECB ] P ADR A8,A6 ECB ADDRESS ] P LDR A2,A2 RETURN CODE
0x0fe140…0fe2d4 (1, 63) Dummy {f00=0x0050, f01=0x0190, f02=»1,A1 P RF(Z) DMT010 OK P LDK A7,4 VOL UNKNOWN $ P SUR A8,A8 NO BUFFER =3 B P ABL DMTASX b PDMT010 EQU * v P* P LDKL A8,TASECB P* 6 P LD A1,TASCVO OFFSET INTO TASVOL FOR FIRST VOLUME PDMT050 EQU * , P CF
0x0fe2d4…0fe468 Dummy {f00=0x0050, f01=0x0190, f02=»L A2,SECTLE " P ST A2,ECBRL,A8 SECTOR LENGTH P LDK A2,0 : 0 P ST A2,ECBCW,A8 SECTOR #0 VL (VOLUME LABEL) L P* P* 2 P CF A14,DMTGBU GET A DM BUFFER ADDRESS IN A3 P DATA /5700 NOP. READ ALWAYS P ADKL A3,BUFSTA & P S
0x0fe468…0fe5fc Dummy {f00=0x0050, f01=0x0190, f02=»2 ~ P LKM P DATA 1 =2 . P LDKL A14,DMTA14 SET UP A14 STACK POINTER * P CF A14,DMTIOC I/O CHECK P LD A2,VLVER,A3 VERSION | & P CWK A2,'TO' DTOSS FORMATED DISC? P RF(E) DMT100 YES P LDK A7,8 NO P ABL DMTASX ERROR RE
0x0fe5fc…0fe790 Dummy {f00=0x0050, f01=0x018e, f02=»OC BASE ~ . P ST A2,ECBCW,A8 1:ST VTOC SECTOR NO = FSAT & P LD A9,VLVRL,A3 VTOC RECORD LENGTH B P ST A9,TASVRL l P EJECT P* P* SEARCH ALL VTOC:S P* PDMT110 EQU * P LD A6,TASVLE P SUK A6,1 P ST A6,TAS
0x0fe790…0fe924 Dummy {f00=0x0050, f01=0x018e, f02=» P LD A1,TASCVO P SUK A1,2 & P ABL(N) DMT300 ALL VOLUMES CHECKED , P ST A1,TASCVO UPDATE TASCVO V $ P LDK A7,7 TOO MANY FILE SECTIONS z P LD A3,TASFIL " P ABL(NZ) DMTASX NOT DATA FILE P LD A3,ECBBA,A8 P SUKL A3,BUFSTA
0x0fe924…0feab8 Dummy {f00=0x0050, f01=0x0190, f02=» P* ACTIVATE NEXT DM TASK P* & P ADKL A7,'#D' 0 P LKM F P DATA -4 R P DATA DMTASS b P LKM v P DATA 3 EXIT P EJECT P* & P* READ NEXT VTOC SECTOR AND EXIT P* PDMT115 EQU * P LD A3,ECBBA,A8
0x0feab8…0fec4c Dummy {f00=0x0050, f01=0x0190, f02=»A1,TASVOL,A1 P CF A14,DMTGBU GET BUFFER P DATA /5700 NOP. READ ALWAYS 6 P ADKL A3,BUFSTA Z P ST A3,ECBBA,A8 r P ST A2,ECBCW,A8 P LDK A7,/91 WAIT =2 P LKM P DATA 1 =2 P LDKL A14,DMTA14 P CF A14,DMTIOC
0x0fec4c…0fede0 Dummy {f00=0x0050, f01=0x0190, f02=» RF(NE) DMT135 NOT MASTER INDEX " P ADKL A11,14 MX FILE NAME ADDR ( PDMT135 EQU * N P ADK A3,2 SKIP CYLID b PDMT120 EQU * ~ ( P IM TASVRN INCREMENT VTOC RECORD NO P LDR A4,A3 " P ADR A4,A9 ADDRESS STATUS BYTE P LCR A2,A4 P
0x0fede0…0fef74 (1, 64) Dummy {f00=0x0050, f01=0x018e, f02=»ERE UNLOCKED BEFORE % f P* & P LDR A5,A7 & & P LDR A6,A8 SAVE & 8 P LDK A1,3 LOOP & P PDMTASY EQU * & f P LC A2,TASLFD,A1 FILE CODES & z P ANK A2,/FF & P RF(Z) DMTASZ NO CODE & P LDKL A8,TASECB & P SC A2,TASECB+1 & P LDK A7,
0x0fef74…0ff108 Dummy {f00=0x0050, f01=0x0190, f02=» P LDR A8,A6 ' P RF DMT401 =1 END ' P* ' 0 ( P* PUT FDB ADDRESS INTO TTAB/CD:TAB ' : P* ' f PDMT400 EQU * ' p P LDK A7,0 ' PDMT401 EQU * =1 ' , P LD A2,TASTBE TTAB/CDTAB FILE CODE ADDR ' P LDR A7,A7 ' P RF(Z) DMT420 CORRECT RE
0x0ff108…0ff29c Dummy {f00=0x0050, f01=0x018e, f02=» ' p " P RF(Z) DMT410 NO MASTER INDEX ( P INH INH ( . ( P LD A2,MXIND SIEZE MASTERINDEXINDEX ( @ P SUK A2,2 ( l PDMT405 EQU * ( ~ P SUK A2,4 NEXT OFFSET ( P RF(NN) DMT407 OK ( * P RF DMT408 MASTER INDEX MUST BE FOUND ( PDMT407 CW A4,MXI
0x0ff29c…0ff430 Dummy {f00=0x0050, f01=0x0190, f02=» PDMT410 EQU * ) P LD A3,TASFDB ) P RF(Z) DMT430 NO FDB USED ) . P LDKL A2,/FFFE ) P " P ANRS A2,A3 CLEAR FDB USE BIT ) f P RF DMT430 ) PDMT420 EQU * ) P ST A12,1,A2 FDB ADDR ) PDMT430 EQU * ) P LDR A8,A8 ) P RF(Z) DMT440 NO B
0x0ff430…0ff5c4 Dummy {f00=0x0050, f01=0x0190, f02=»ELEASE ALL FREE BUFFERS ) & P CF A14,TASCAQ CHECK ASSIGN QUEUE * $ P CF A15,QTJOB QUEUE CALLING TASK * J P ENB * r P LKM * ~ P DATA 3 * P EJECT * PDMT500 EQU * * P LD A6,TASFIL * P ABL(Z) DMT700 DATA FILE * P IFF INDXAC=1 * P
0x0ff5c4…0ff758 Dummy {f00=0x0050, f01=0x0190, f02=»CT * P* + " P* THIS IS MASTER INDEX LOOP. + 8 P* CONNECT FDB TO FILE CODE IN DMTASK TTAB AND READ + : < P* MASTER INDEX WITH SEQUENTIAL READ ON THIS FILE CODE + v P* + P LD A7,TASTID DMTASK ID + P INH + " P CF A15,FNDTID TTAB ADDR TO
0x0ff758…0ff8ec Dummy {f00=0x0050, f01=0x0190, f02=»C A3,TASECB+1 + " P ST A3,TTB:TD+2,A2 TTAB ENTRY , P ST A12,TTB:TD+4,A2 FDB ADR , < P LD A3,ECBBA,A8 , ` P SUKL A3,BUFSTA , x " P CF A14,DMTRBU RELEASE BUFFER , P* , 0 P* CALC NO OF WORDS NEEDED IN MASTRE INDEX , P* , P LD A6,FDB
0x0ff8ec…0ffa80 Dummy {f00=0x0050, f01=0x0190, f02=»A1 GET MOST SIGN BIT , P ADK A2,5 - P SRL A2,1 NO OF WORDS NEEDED - . P RF(Z) DMT570 WRONG SIZE - R P INH - r P LD A4,MXIND LENGTH MXIND - ~ P SUK A4,4 MAX A5 VALUE - P LDKL A5,-2 OFFSET - PDMT540 EQU * - P ADK A5,4 GET ENTRY - P
0x0ffa80…0ffc14 (1, 65) Dummy {f00=0x0050, f01=0x018e, f02=» ] " P LD A2,FDBRRO,A1 RECORD OFFSET ^ P ADK A2,10 BUFFER HEADER ^ . P ADR A2,A3 REC ADDR ^ N P LD A4,FDBRLE,A1 REC LENGTH ^ j P SUK A4,6 KEY LENGTH ^ P ADR A2,A4 ^ " P CC A4,2,A2 DUPLICATE KEY CHAR ^ $ P RF(NE) DMR020 NEXT KEY NOT SAME ^
0x0ffc14…0ffda8 Dummy {f00=0x0050, f01=0x0190, f02=» ^ P LDK A5,0 _ P LC A5,3,A2 _ P SC A5,ECBCW+3,A8 _ . P LC A5,4,A2 _ H P ECR A5,A5 _ P LC A5,5,A2 _ n P ST A5,ECBCW,A8 _ P* _ P* RELEASE BLOCK BUFFER _ P* _ P CF A14,DMTRBU _ P EJECT _ P* _ 0 P* PERFORM
0x0ffda8…0fff3c Dummy {f00=0x0050, f01=0x018e, f02=» BIT _ | P SLL A2,1 ` " P LDK A7,/A RANDOM READ NO WAIT ` P ORR A7,A2 EA BIT ` D P* ` ^ P* MOVE USER ECB ` h P* ` P LDR A1,A9 FROM ECB ADDR ` P LDR A3,A8 TO ECB ADDR ` P LDK A2,6 NO OF CHAR ` P CF A14,DMTWM MOVE ECB ` P LDR
0x0fff3c…1000d0 Dummy {f00=0x0050, f01=0x0190, f02=» P DATA 3 EXIT a PDMTAR4 EQU * a P* a , P* SET UP A14 STACK a 6 P* a R P CF A15,GETA14 a P LDR A6,A1 a r P LDKL A8,FDBECB a P ADR A8,A6 RR ECB a P LD A9,DWTECB,A6 USER ECB a P LD A1,ECBRC,A8 a & P ORS A1,ECBRC,A9 RET COD
0x1000d0…100264 Dummy {f00=0x0050, f01=0x0190, f02=»LE a x P* b ( P LD A1,FDBADF,A6 FDB ADDR DATA FILEP b & P CF A14,CRNGET GET CRN BUFFER ADDR b @ P LDR A10,A2 CRN BUFFER ADDR b j " P LDR A1,A6 FDB ADDR INDEX FILE b ( P CF A14,GTLGRN GET INDE X LOG REC NO b P SC A2,CRNCIF+1,A10 b & P ST A3,CRNCI
0x100264…1003f8 Dummy {f00=0x0050, f01=0x0190, f02=»URN CODEXS b P* c $ P LD A2,ECBEL,A8 EFFECTIVE LENGTH c P ST A2,ECBEL,A9 c D P LDK A1,0 RETURN CODE c P ABL DMTERX TENDIO c z P EJECT c " PDMIRN EQU * INDEXED READ NEXT c 2 P********************************************* c P LDR A1,A6
0x1003f8…10058c Dummy {f00=0x0050, f01=0x0190, f02=»UFFADR c P ADK A2,10 RECORD ADDR d ( P AD A2,FDBRLE,A1 ADDR OF STATUS CHAR d , P LDK A5,/FF USED MARK d X P CCR A5,A2 STATUS d v P RF(E) DMI120 USED d P LD A4,FDBMRO,A1 d & P ST A4,FDBRRO,A1 LAST REC IN SECT d P* d P* CHECK IF END O
0x10058c…100720 Dummy {f00=0x0050, f01=0x0190, f02=» RF(G) DMI105 EOF d P CW A3,FDBLRN+1,A1 e P RF(L) DMI106 NOT EOF e 4 PDMI105 LDR A3,A9 e R P RF DMI030 EOF e j PDMI106 LDR A3,A9 RESTORE e P RF DMI010 NEXT REC e PDMI120 EQU * e P* INDEX RECORD IS FOUND e P* e P LDK A2,0
0x100720…1008b4 (1, 66) Dummy {f00=0x0051, f01=0x0190, f02=» LDK A1,1 PTAS155 EQU * P RTN A14 & P* 6 ( PTASHLT LDK A1,/11 INDICATE DM ERROR @ P CF A15,HALT HALT SYSTEM l P* P EJECT P* P************ P* TASS * P************ P* PIXTASS EQU * P
0x1008b4…100a48 Dummy {f00=0x0051, f01=0x0190, f02=» A7,A8 GET FIRST WORD OF USER ASSIGN BLOCK $ P ANK A7,/FF SKIP LEFT CHARACTER 2 0 P ORKL A7,/8100 BIT 0+7 IND. ASSIGN ONE INDEX Z ( P ESR A7,A8 SET WORD IN ASSIGN BLOCK P XIF P*~ ( P LDK A7,0 ONLY GLOBAL ASSIGN ALLOWED P* PTA
0x100a48…100bdc Dummy {f00=0x0051, f01=0x0190, f02=»NOT COMPLETED t 4 P* AND IF SO QUEUE THIS REQUEST VIA THE TASQUE P* N P LD A1,TASBLK X & P RF(Z) TAS050 NO CONCURRENT ASSIGN n * P LDKL A1,TASQUE START OF ASSIGN QUEUE ( PTAS020 EQU * QUEUE AS FOR GETBUFFER P LDR A2,A1 P LDR
0x100bdc…100d70 Dummy {f00=0x0051, f01=0x0190, f02=»QU * & P IM TASBLK INDICATE ASSIGN STARTED ! " P CM TASFDD FDB ADDR DATA FILE ! 6 P* ! 6 P ST A5,TASTTA SAVE TTAB ADDRESS OF REQUESTING TASK ! f P* ! P IFT MMUPAG=1 ! P* ! 2 P* MOVE USER ASSIGN BLOCK TO SYSTEM AREA MASBLK ! P* ! ,
0x100d70…100f04 Dummy {f00=0x0051, f01=0x0190, f02=»BLOCK ADDRESS ! p , P LDK A3,34 ASSIGN BLOCK LENGTH IN BYTES " $ P CF A14,MOV:US MOVE ASSIGN BLOCK " F P XIF " n P* " z $ P ST A8,TASASB SAVE ASBLK ADDRESS " P* " P LDK A1,16 " : P ST A1,TASCXO INIT. TASCXO TO LAST ENTRY IN TASSEXXLB " P*
0x100f04…101098 Dummy {f00=0x0051, f01=0x0190, f02=» " P LCR A2,A8 NO OF VOLUMES # . P ANK A2,/1F REMOVE INDEX BIT +DELAY+BASIC # ( P RF(Z) TAS090 NO VOL # Z P CWK A2,4 # v P RF(NG) TAS100 <=4 # PTAS090 RF TASSEM # P EJECT # P* # $ P* CHECK IF VOLUMES ARE ON LINE # P* # PTAS1
0x101098…10122c Dummy {f00=0x0051, f01=0x0190, f02=»1,0 SET CR # $ P RF(Z) TAS160 ALL VOLUMES FOUND $ P* $ : , P* ALL VOL NOT FOUND. ACT FLEXDISCTASK $ D P* $ t P LD A1,TASCVO $ ~ P LDK A2,2 ID DMTASK FLEXDISC $ P SC A2,TASVOL,A1 SEE TAS195 $ P EJECT $ P* $ , P* CHECK IF FILE CO
0x10122c…1013c0 Dummy {f00=0x0051, f01=0x0190, f02=»D $ j P LDR A10,A10 TC % P RF(Z) TAS165 GLOBAL ASSIGN % " P LD A2,TASTTA TTAB ADDR % F P LDR A4,A2 % f P LD A2,TTB:TD,A4 % x P ADKL A4,TTB:TD+1 % P RF TAS170 % PTAS165 EQU * % P LD A4,SCTCDT % P LDR* A2,A4 % P ADK A4,1 %
0x1013c0…101554 (1, 67) Dummy {f00=0x0051, f01=0x0190, f02=»ST,A10 5 P ANK A3,/40 6 & P RF(NZ) DMT639 OTHER REQUEST BUSY 6 " P LDK A3,8 MAX NO OF INDE*2 6 L PDMT620 EQU * 6 n P SUK A3,2 6 $ P RF(N) DMT640 MORE THAN 4 INDEX 6 P LDR A6,A10 6 P ADR A6,A3 6 P LD A2,FDBAI1,A6 6 P RB(NZ) DMT620
0x101554…1016e8 Dummy {f00=0x0051, f01=0x0190, f02=» 6 P LDK A5,8 NR OF INDEX *2 7 PDMT625 EQU * 7 ( P SUK A5,2 7 < " P RF(N) DMT635 ALL FDB UPPDATED 7 N P LDR A1,A10 FDB DATA 7 t P ADR A1,A5 7 $ P LD A3,FDBAI1,A1 FDB ADDR INDEX 7 P RB(Z) DMT625 NO INDEX FILE 7 P LDKL A1,FDBADF 7 P A
0x1016e8…10187c Dummy {f00=0x0051, f01=0x0190, f02=»DMT635 EQU * 7 P LC A1,DWTST,A10 8 0 P SC A1,DWTST,A12 SAME BUSY BITS AS DATA FILE 8 , P ENB ENB 8 ` P LD A1,TASMXA 8 r ( P ST A1,FDBMIA,A12 MASTER INDEX ADDR 8 P RF DMT720 8 ( PDMT639 ADK A7,2 A7=13=OTHER REQ BUSY 8 * PDMT640 ADK A7,1 A7=11=
0x10187c…101a10 Dummy {f00=0x0051, f01=0x018e, f02=»ILE 8 v & P ST A12,FDBADF,A12 FDB ADDR TO FDB 9 P LD* A1,TASASB ASBLK ADDR 9 6 P ANKL A1,/6000 9 X P SLL A1,1 9 n $ P ORS A1,FDBDBR,A12 DELAY + BASIC 9 PDMT720 EQU * 9 P* 9 ( P* SET FDBMRN TO MAX REC NO IN FILE 9 P* 9 P LDR A1,A12
0x101a10…101ba4 Dummy {f00=0x0051, f01=0x0190, f02=» P AD A2,-2,A1 : P SUKL A1,EXTELE-2 : P ST A1,FDBCEX,A12 : 2 P SUK A2,1 : L P ST A2,FDBSNR,A12 : ^ P LDR A1,A12 : x " P CF A14,GTLGRN GET LOG REC NO : P LDK A1,0 : " P LC A1,FDBBLF,A12 BLOCK FACTOR : P SUK A1,1 : P ADR A3,A1 :
0x101ba4…101d38 Dummy {f00=0x0051, f01=0x414a, f02=»,FDBMRN+1,A12 : P* ; 4 P* CALCULATE FDBMRO WHICH IS MAX FDBRRO IN FILE ; P* ; X P LD A6,FDBRLE,A12 REC LENGTH ; b P ADK A6,1 ; P LDK A7,0 ; P LC A7,FDBBLF,A12 BLOCK FACT ; P SUK A7,1 ; P CF A14,MPYMOD A1,A2=A6*A7 ; P ST A2
0x101d38…101ecc Dummy {f00=0x0051, 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
0x101ecc…102060 Dummy {f00=0x0051, f01=0x0190, f02=»AT MADE THE I/O REQUEST. THUS I/O WITH WAIT CAN P* NOT BE ABORTED. 8 P* T P* ^ PTABORT EQU * h P IFT MMUPAG=0 | & P LDR* A3,A8 GET FIRST WORD OF ECB P XIF P* P IFT MMUPAG=1 $ P ELR A3,A8 GET FIRST WORD OF ECB
0x102060…1021f4 (1, 68) Dummy {f00=0x0051, f01=0x0190, f02=»25 EQU * " P ADR A2,A5 ADD MI BASE ADR - 2 P ADK A2,2 ENTRY KEY ADR 6 P LDR A1,A2 SAVE ENTRY ADR V P LDR A3,A8 SEARCH KEY ADR x P LDR A6,A11 MAX KEY LENGTH P LDK A7,0 CHAR ADR P CF A14,CHKKEY COMPARE KEYS P LDR A7,A10 M
0x1021f4…102388 Dummy {f00=0x0051, f01=0x0002, f02=»
0x102388…10251c Dummy {f00=0x0051, f01=0x0190, f02=» 0 P IDENT DFTAB REL 9.2 79-11-16 870105040920 P 8 P* @ 8 P**************************************************** J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* & P* DFTAB = DISC FILE CODE TABLE P* P* P* LEVE
0x10251c…1026b0 Dummy {f00=0x0051, f01=0x40e8, f02=»** ^ P* P* DISC FILE CODE TABLE P* 4 P ENTRY DFTAB > P ENTRY DFTABE R P* h P* r PDFTAB EQU * | P DATA /F0F1,/F2F3 P DATA /F8F9,/FAFB PDFTABE EQU * P END @ P* P* P* LEVE
0x1026b0…102844 Dummy {f00=0x0051, 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*
0x102844…1029d8 Dummy {f00=0x0051, 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*
0x1029d8…102b6c Dummy {f00=0x0051, f01=0x0190, f02=»D A3,4,A8 REQUESTED LENGTH # P CWK A3,130 $ " " P ABL(NE) END:10 ILLEGAL LENGTH $ 6 P LD A4,2,A8 BUFFER ADDRESS $ P RB FD:045 $ ~ P XIF $ P* $ P EJECT DRFD01 $ P* $ P*************** $ P* * $ P* TEST STATUS *
0x102b6c…102d00 Dummy {f00=0x0051, f01=0x018e, f02=» P LDR A1,A3 % P ANK A1,1 % & P RF(NZ) FD:090 DISC NOT OPERABEL? % ( " P ANKL A3,/200 WRITE PROTECTED? % R P ORS A3,DWTRCW,A6 % x P IFF TOSS+IBM=0 % P RF LOA:05 READ VOLUME NAME % P* % PFD:075 EQU * % P XIF % $ P LD A1,DWTRCW,A6
0x102d00…102e94 (1, 69) Dummy {f00=0x0051, f01=0x0190, f02=»WHEN NO RECORD IS READ BEFORE, THE FIRST RECORD IN SPECIFIED & P* SECTOR WILL BE MADE AVAILABLE D P* n 8 P****ENTRY PARAMETERS******************************** x P* : P* A1 = FDB ADDRESS FOR CURRENT RECORD (BEFORE NEXT) P* FDB
0x102e94…103028 Dummy {f00=0x0051, f01=0x0190, f02=»NTED ` : P* A3 = ADDRESS OF BLOCK BUFFER FROM PREVIOUS CALL IN > P* SAME DM-REQUEST. =0 WHEN NO BYUFFER IS ALLOCATED J P* A8 = ECB ADDRESS P* 8 P****EXIT PARAMETERS********************************* P* 2 P* RETURN AT AD
0x103028…1031bc Dummy {f00=0x0051, f01=0x018e, f02=»DE FOM PHYS I/O) WHEN NO BUFFER IS ALLOCATED r $ P* A2 = FDBRRO = RECORD OFFSET 4 P* A3 = BUFFER ADDRESS * P* = 0 WHEN NO BUFFER IS ALLOCATED | P* A8 = ECB ADDRESS P* 8 P****USED REGISTERS**********************************
0x1031bc…103350 Dummy {f00=0x0051, f01=0x0190, f02=» X P EJECT PRDNXTR EQU * P LDR A10,A3 SAVE BUFFER ADDR * P RF(NZ) RDN200 BUFFER EXIST N P STR A7,A14 r P SUKL A14,4 P ST A6,2,A14 P* P* GET A BUFFER P* PRDN040 EQU * & P CF A14,GTBKBU GET BLOCKBU
0x103350…1034e4 Dummy {f00=0x0051, f01=0x0190, f02=»DR A10,A3 BUFFER ADDR $ P LDK A7,/91 PHYS READ WITH WAIT P LKM F P DATA 1 R & P CF A14,DMTIOZ CHECK RETURN CODES b P LDR A1,A1 P RF(NZ) RDN900 ERROR P LDR A1,A6 FDB ADDR PRDN080 EQU * P LDR A6,A1 FDB ADDR P L
0x1034e4…103678 Dummy {f00=0x0051, f01=0x0190, f02=»RDN200 EQU * $ P LD A2,FDBRRO,A1 REC ORD OFFSET P RF(NN) RDN220 NOT FIRST REC < P STR A7,A14 ` P SUKL A14,4 t P ST A6,2,A14 P RB RDN080 FIRST REC WANTED P* : P* CHECK IF THIS OFFSET POINTS TO LAST REC IN BUFFER P
0x103678…10380c Dummy {f00=0x0051, f01=0x0190, f02=»EC IN CURRENT BLOCKBUFFER P* " $ P AD A2,FDBRLE,A1 RECOR D LENGTH , P ADK A2,1 STATUS CHAR T P ST A2,FDBRRO,A1 NEW OFFSET r P RF RDN950 RETURN P* 4 P* CHECK IF THIS RECORD ALSO IS LAST IN EXTENT P* PRDN300 EQU *
0x10380c…1039a0 Dummy {f00=0x0051, f01=0x0190, f02=» AD A5,EXTLEN,A3 EXTENT LENGTH P SUK A5,1 & $ P CW A5,FDBSNR,A1 SECT NO CURRENT 8 , P RF(NG) RDN400 IT WAS LAST REC IN EXTENT ` P* P* NEW SECTOR P* P IM FDBSNR,A1 SECT NO P LDR A6,A1 FDB ADDR P RF RDN500 P*
0x1039a0…103b34 (1, 70) Dummy {f00=0x0052, f01=0x4028, f02=» % P RTN A14 & P END & @ & $
0x103b34…103cc8 Dummy {f00=0x0052, 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* +
0x103cc8…103e5c Dummy {f00=0x0052, f01=0x0190, f02=» A6,A10 g P ADR A6,A5 h ( P LD A1,FDBAI1,A6 FDB ADDR INDEX FILE h " P RB(Z) DXI020 NO INDEX h N P* h l ( P* GET FILE CODE FOR THIS FDB ADDR h v P* h P LD* A6,SCTCDT h PDXI030 SUK A6,4 h P LD A7,SCTCDT h P ADR A7,A6 h P CW A1
0x103e5c…103ff0 Dummy {f00=0x0052, f01=0x0190, f02=»CBFC,A8 INDEX FILE h P LDR A6,A11 i P SUK A6,QINS i . P RF(E) DXI080 INDEXED DELETE i B P* i f $ P* GET ADDRESSS OF DATA RECORD i p P* i P LD A6,ECBBA,A12 SECTOR ADDR i P ADK A6,2 CYLID i $ P AD A6,FDBRRO,A10 ADDR DATA REC i P A
0x103ff0…104184 Dummy {f00=0x0052, f01=0x0190, f02=» ADDR i v $ P LD A6,ECBBA,A9 USER BUFFER ADDR j P AD A6,FDBKA,A1 KEY OFFSET j 6 P IFT MMUPAG=1 j X P LDR A6,A1 j n " P ADKL A6,FDBKEY ADDR KEY AREA j P XIF j P IFT INDXAC=1 j $ P LDK A7,/1F INSERT INDEX NOWAIT j PDXI090 EQU * j P* j
0x104184…104318 Dummy {f00=0x0052, f01=0x0190, f02=» DATA DMTAR5 j P LD A7,ECBRC,A8 k P RF(N) DMTAR5 REQ ERR k , P RB DXI020 NEXT INDEX DIRECT k J PDXI100 LKM k n P DATA 3 EXIT k PDMTAR5 EQU * k " P LD A6,FDBADF,A1 FDB DATA FILE k P LD A9,DWTECB,A6 USER ECB k P LDKL A8,FDBECB k P
0x104318…1044ac Dummy {f00=0x0052, f01=0x0190, f02=»A9 RC TO USER k P LDK A1,0 RETURN CODE l & P LC A2,FDBDBR,A6 NR OF READY INDEX l 4 P ADK A2,1 COUNT INDEXES l ^ $ P CC A2,FDBNIF,A6 TOT NR OF INDEX l ~ P RF(NE) DXI200 l P LD A7,DWTOR,A6 l P ANK A7,/3F ORDER CODE l P SUK A7,QINS INDEXED I
0x1044ac…104640 Dummy {f00=0x0052, f01=0x0190, f02=» P ADKL A10,2 CYLID m P AD A10,FDBRRO,A6 m & P AD A10,FDBRLE,A6 ADDR STATUS CHAR m 8 P LDK A1,0 STATUS FREE m b . P ABL DMT350 CONTINUE AS FOR RANDOM DELETE m PDXI200 EQU * m P SC A2,FDBDBR,A6 m P LKM m " P DATA 3 EXIT. MORE INDEX LEFT
0x104640…1047d4 (1, 71) Dummy {f00=0x0052, f01=0x0190, f02=» P LDK A2,0 P LC A2,ECBCW+3,A8 REC NO P LD A3,ECBCW,A8 6 P LDK A1,/8 INCORRECT LENGTH N P LD A4,ECBRL,A8 r * P RF(NP) TIODME ERROR RETURN IF RL <= 0 P* * P* EA MUST NOT BE SET FOR OTHER TASK P* P LDR A1,A6 FDB
0x1047d4…104968 Dummy {f00=0x0052, f01=0x018e, f02=»EQU * INDEXED INSRERT P IFT MMUPAG=1 P* 4 " P* MOVE KEYS TO FDB KEY AREAS > P* d P LDK A5,8 n PIXINS3 EQU * P LDR A2,A6 FDB DATA P ADR A2,A5 P LD A3,FDBADF,A2 FDB INDEX P RF(Z) IXINS4 NO INDEX P LD A1
0x104968…104afc Dummy {f00=0x0052, f01=0x0190, f02=» P LD A3,FDBRLE,A3 REC LGTH P SUK A3,6 KEY LGTH & " P CF A14,MOV:US KEY TO FDB AREA @ PIXINS4 EQU * f P SUK A5,2 z P RB(NZ) IXINS3 MORE INDEXS P XIF P* $ PSEQWRITE EQU * SEQUENTIAL WRITE P* 2 P* GET LRN+1 INTO
0x104afc…104c90 Dummy {f00=0x0052, f01=0x0190, f02=» x P LDK A1,0 ! P LC A1,FDBMRN,A6 LAST REC NR ! P LD A2,FDBMRN+1,A6 ! > P LDK A6,0 ! X P LC A6,FDBLRN,A5 ! j P LD A7,FDBLRN+1,A5 LRN ! P CF A14,DSUMOD SUBTRACT ! P SUK A2,1 ! P LDR A1,A1 ! P RF(Z) SEQ005 NOT MANY ! P LDKL
0x104c90…104e24 Dummy {f00=0x0052, f01=0x0190, f02=»,FDBLRN+1,A6 LRN ! P IFT INDXAC=1 " P RF IXR020 STORE LOG REC NO " . P EJECT " R $ PIXRDNX EQU * INDEXED EREAD NEXT " ` P* " P* GET CRN " P* " P LD A1,FDBADF,A6 FDB ADDR " " P CF A14,CRNGET GET CRN BUFFER " P LDR A4,A2 BUFFA
0x104e24…104fb8 Dummy {f00=0x0052, f01=0x0190, f02=»C A5,CRNCIF,A4 " . P RF(NE) IXR020 OTHER INDEX FILE IS CURRENT # P LC A1,CRNCIF+1,A4 # H " P LD A2,CRNCIF+2,A4 LOG REC NO # b PIXR020 EQU * # P XIF # P ADK A2,1 # P RF(O) IXR030 OVERFLOW # P RF IXR040 # , PIXR030 ANKL A2,/7FFF REMOVE OV
0x104fb8…10514c Dummy {f00=0x0052, f01=0x0190, f02=»NOT CHECK EOF CONDITION # P EJECT $ P* $ . PIXREWR EQU * INDEXED REWRITE $ 8 P* $ PIXDEL EQU * INDEXED DELETE $ f P* $ PRANWRITE EQU * RANDOM WRITE $ P* $ & PRANWRD EQU * DELAYED RANDOM WRITE $ P* $ & PRANDLD EQU * DELAYED
0x10514c…1052e0 Dummy {f00=0x0052, f01=0x018e, f02=» $ P************************* % P* DMTASK ACTIVATION * % * P************************* % L P* % n PTIODMA EQU * % x P* % P* SET EOF IF CRN > LRN % P* % P LDK A1,0 % P LC A1,ECBCW+3,A8 REC NO % P LD A2,ECBCW,A8 DITTO
0x1052e0…105474 (1, 72) Dummy {f00=0x0052, f01=0x0190, f02=» % t P RF(NG) TIOD25 CRN <= LRN & PTIOD23 EQU * & * P LDKL A3,/1000 END OF FILE & > P ORS A3,ECBRC,A8 & ` P ANK A7,/3F & x P SUKL A7,SQR SEQ READ & P RF(NE) TIOD25 NOT SR & P LDR A1,A3 & P RF TIODME & PTIOD25 EQU * & 6 P CF A14,
0x105474…105608 Dummy {f00=0x0052, f01=0x0002, f02=» H
0x105608…10579c Dummy {f00=0x0052, f01=0x0190, f02=» 2 P IDENT DVDI02 REL 9.2 79-11-16 870105040920 P : P =1,HANG UP AT /03 OUTPUT B P REL 9.1 79-05-23 f P* . P* DEVICE WORK TABLE FOR DISPLAY INDICATOR P* P* & P ENTRY DVDI02 DISPLAY INDICATOR 03 P* P*
0x10579c…105930 Dummy {f00=0x0052, f01=0x0190, f02=»RAMETER z 0 P DATA /8000 STATUS. /8000 MEANS DEVICE READY P DATA 0 ECB ADDRESS D P DATA DWTEND-DVDI02 ORDER ` ( P DATA DIAD POINTER TO ADDRESS-BLOCK 6 P DATA 'DI',0 TERM.NUMBER AND PROGRAM START ADDRESS $ P DATA 0 ECB QUEUE ANCHOR ADDRESS
0x105930…105ac4 Dummy {f00=0x0052, f01=0x4162, f02=»UEUE P DATA /0000 P DATA /3F4F,/5F6F * P DATA 0 SAVE AREA FOR FLASHING LIGHTS : P DATA 0 TIMER POINTER h P DATA 0 DUMMY WORD =1 P DATA 0 DUMMY WORD =1 " P DATA 0 DUMMY TIMER POINTER =1 P IFT MMUPAG=1 PDEVECB DAT
0x105ac4…105c58 Dummy {f00=0x0052, 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
0x105c58…105dec Dummy {f00=0x0052, f01=0x0190, f02=»,SAVE06,A13 SAVE " PSYA250 CM UWB,A13 INDICATE CWB ( P ADKL A8,2 STEP TO NEXT T:A ADDRESS > P CW A8,ENDADD,A13 j " P RF(E) SYA270 ALL T:A'S DONE! " P CALL GETTAB GET TTAB-ADDRESS P CALL MOVMMT MOVE MM-TABLE " P* FILL MM-TABLE ADDRES
0x105dec…105f80 Dummy {f00=0x0052, f01=0x0190, f02=» FILL TABLE ( P CALL T:DADD GET T:D ADDRESS TO A12 4 P ST A12,T:DSAV,A9 SAVE 'OLD' T:D-ADDRESS IN TTAB @ P x P* CALCULATE LENGTH OF T:D P 2 P EL A1,WATLEN,A12 NUMBER OF BYTES-1 IN DBLKTAB P ADK A1,2 P ANKL A1,/FFFE EVEN AD
0x105f80…106114 (1, 73) Dummy {f00=0x0052, f01=0x018e, f02=»0,C1 CAS F0,F1 DISC F8,F9 FLOPP $ PSCTANO DATA 0 APPLICATION NUMBER ( 2 PSCTADA DATA 0 APPLICATION DISC SECTOR ADDRESS P PSCTPAG DATA 0 PAGTAB ADDRESS PSCTSEG DATA 0 SEGTAB ADDRESS PSCTSWB DATA 0 SWBTAB ADDRESS $ PSCTNOS DATA 0 NUMBER O
0x106114…1062a8 Dummy {f00=0x0052, f01=0x0190, f02=» P INDEX REL TTAB 0 PSCTLAC DATA 0 LOGICAL ADDRESS OF COMMON PART & PSCTMMP DATA 0 MMU TABLE PAGE ENTRY R P INDEX REL TTAB | * PSCTLAP DATA 0 LOGICAL ADDRESS OF PAGES ( PSCTNPE DATA 0 NUMBER OF PAGE ENTRIES & PSCTSTB DATA STB SYSTEM S
0x1062a8…10643c Dummy {f00=0x0052, f01=0x018e, f02=»SCTCDT DATA 0 CDTAB ADDRESS PSCTBUG DATA BUG DEBUGGER $ & PSCTDMT DATA X:B DMTASKS IN SYSTEM D P BIT 13:D2,14:D1,15:D0 n 0 PSCTDMI DATA X:C DM INDEX RECORD BUFFER SIZE ( PSCTDML DATA X:D DM NO OF LOCAL FILES * PSCTDMC DATA X:E DM NO OF C
0x10643c…1065d0 Dummy {f00=0x0052, f01=0x40fe, f02=» P* P* SYSTEM STACK P* $ P RES 145 . P DATA /FCC0 AND PSW > & PSTB DATA LOOP AND PC FOR IDLE LOOP Z P P P* P* IDLE LOOP P* P PLOOP RB * P P P P END @ DM NO OF C
0x1065d0…106764 Dummy {f00=0x0052, 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
0x106764…1068f8 Dummy {f00=0x0052, f01=0x0190, f02=»N AND ARE V ( P* FOLLOWED BY AN EXIT LKM REQUEST. : P* INDEX FILES ARE HANDLED IN SUBROUTINE RDNXTR WHERE > & P* ALL I/O ARE MADE IN WAIT MODE | P* D P* BY MEANS OF CONDITIONAL ASSEMBLY THE EXCLUSIVE ACCESS CHECK 6 P* FOR INDEXED
0x1068f8…106a8c Dummy {f00=0x0052, f01=0x018e, f02=»SIVE ACCESS CHECK INCLUDED | 2 P* QNOEXA=0 EXCLUSIVE ACCESS CHECK EXCLUDED " P EJECT X P* f P*************** p P* ENTRIES * P*************** P* P* P ENTRY DMTASK & P ENTRY SQR EXTERNAL CODE SEQ READ
0x106a8c…106c20 Dummy {f00=0x0052, f01=0x0190, f02=» | P***************** P* " P* , P EXTRN SCTTCT,SCTCDT 6 & P EXTRN TTB:ID TASK IDENTIFICATION R P EXTRN TTB:TD,FDBSTA | P EXTRN FNDTID P EXTRN TENDIO P EXTRN FDBECB P EXTRN FDBSNR P EXTRN FDBRRO P E
0x106c20…106db4 (1, 74) Dummy {f00=0x0053, f01=0x0190, f02=»EXIT PARAMETERS********************************* P* 8 P* A1 = UNCHANGED B ( P* A2 = ADDRESS OF FOUND CRN-BUFFER P* 8 P****USED REGISTERS********************************** P* P* A1 - A4 P EJECT DMSUBR PCRNG
0x106db4…106f48 Dummy {f00=0x0053, f01=0x0004, f02=» H P
0x106f48…1070dc Dummy {f00=0x0053, f01=0x0190, f02=» J F IDENT SYSTAB REL 9.2 79-11-16 870105040920 F B SCTMSZK SCTSFA SCTEFA SCTPLD SCTANO SCTADA SCTPAGL SCTSEG R F B SCTSWB SCTNOS SCTNOP SCTPSZ SCTMMC SCTLACL SCTMMP SCTLAP F B SCTNPE SCTSTB SCTOPT SCTTCT
0x1070dc…107270 Dummy {f00=0x0053, f01=0x0190, f02=»:PA PAG:SB SWB:NC SWB:DS SWB:ELS SWB:NS0 z T:ACSB 4 SEG:ST F SEG:DSL Z SEG:EL n SEG:PBI PAG:QF PAG:QBV PAG:PA PAG:SB SWB:NC SWB:DS
0x107270…107404 Dummy {f00=0x0053, f01=0x0190, f02=» IHSOP . IH1501W > IH1502 P CHLT1 b CHRT1 r , ( CHRT2 , ( ! , ( 1
0x107404…107598 Dummy {f00=0x0053, f01=0x018e, f02=» r , ( a , ( q B HALTN r SCTMSZK SCTSFA SCTEFA SCTPLD SCTANO SCTADA
0x107598…10772c Dummy {f00=0x0053, f01=0x018e, f02=» SCTNOP SCTPSZ SCTMMC , SCTLACL @ SCTMMP T SCTLAP h SCTNPE | SCTSTB SCTOPT SCTTCT SCTCDT bBUG SCTBUG~ , (
0x10772c…1078c0 Dummy {f00=0x0053, f01=0x4084, f02=» SCTDCT _ 8 N n@ E | SCTSTB SCTOPT SCTTCT SCTCDT bBUG SCTBUG~ , (
0x1078c0…107a54 (1, 75) Dummy {f00=0x0053, f01=0x0190, f02=» % | , P* FDB-CEX,ECB,SNR,RRO & 8 P* ECB-FC,CW,BA,DWT-OR,ECB,EXTDMI & 8 P* A8 = ECB ADDR & t P* & 8 P****EXIT PARAMETERS********************************* & P* & P* A1 = A6 = FDB ADDR & 0 P* A2 = FDB
0x107a54…107be8 Dummy {f00=0x0053, f01=0x0190, f02=» THE FOUND CORE BUFFER & v P* A3 = BUFFER ADDRESS ' & P* A5 = ORDE R CODE ' F P* A8 = ECB ADDR ' b P* A9 = DM ECB ADDR ' | P* ' 8 P****USED REGISTERS********************************** ' P* ' P* A1 - A9 ' P* ' : P**
0x107be8…107d7c Dummy {f00=0x0053, f01=0x0190, f02=»RENT EXTENT BLOCK POINTER ' | P LD A1,EXTDMI,A4 DMIDENT, FC ( " " P LD A2,FDBSNR,A6 SECTOR NUMBER ( F P LD A9,DWTECB,A6 DM ECB ( l P ANK A1,/FF =1 ( $ P STR A1,A8 DISC VOL FILE CODE =1 ( P LDR A4,A2 SAVE ( P LDKL A5,SECTLE ( " P ST A5,ECBRL
0x107d7c…107f10 Dummy {f00=0x0053, f01=0x0190, f02=»SECTOR MUST BE READ FROM DISC ( P LDKL A2,-1 RET CODE ) & PGTB040 EQU * ) B P ST A4,ECBCW,A8 SECTOR NR ) V P LDR A5,A3 ) x 2 P ADKL A5,BUFSTA A5 = DATA BUFFER START ADDRESS ) P ST A5,ECBBA,A8 ) P LD A5,DWTOR,A6 ) P ANK A5,/3F ) ( P LDR
0x107f10…1080a4 Dummy {f00=0x0053, f01=0x018e, f02=» ORDER CODE ) P EJECT DMSUBR * 8 P****DESCRIPTION************************************* * , P* * h D P* GTLGRN WILL CONVERT FDBSNR AND FDBRRO TO A LOGICAL RECORD NO * r P* * 8 P****ENTRY PARAMETERS******************************** * P* *
0x1080a4…108238 Dummy {f00=0x0053, f01=0x0190, f02=» * Z P* + P* A1=A5=A6= FDB ADDRESS + P* A2,A3 = LOG RECORD NO + 4 P* + V 8 P****USED REGISTERS********************************** + ` P* + P* A1 - A7 + P* + : P****************************************************** + P EJECT
0x108238…1083cc Dummy {f00=0x0053, f01=0x0190, f02=» + p P LD A7,FDBCEX,A1 EXT ADDR , ( P ADKL A7,EXTLEN ADDR TO LAST LENGTH , * PGTL050 EQU * , V P CWR A3,A7 , j . 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 ADKL
0x1083cc…108560 Dummy {f00=0x0053, f01=0x0190, f02=»OTAL NO OF SECTORS , ~ ( P AD A6,FDBSNR,A1 TOTAL NR OF SECTORS - P* - F ( P* CONVERT FDBRRO TO NO OF RECORDS - P 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,F
0x108560…1086f4 (1, 76) Dummy {f00=0x0053, f01=0x0190, f02=»UPDATE BUFFER ADDRESSES 5 P ADK A2,1 6 ( P SUK A3,1 DECREMENT REQUESTED LENGTH 6 2 & P RB(P) MVUS10 MORE CHAR. TO MOVE? 6 ^ P RB MVUS30 NO, RETURN 6 P* 6 P EJECT DMSUBR 6 P* 6 P* M O V : S U 6 P* 6 F P* THIS ROUTINE MOVES D
0x1086f4…108888 Dummy {f00=0x0053, f01=0x0190, f02=»USED, DEPENDING ON WHETHER THE BUFFER ADDRESSES ARE EVEN OR NOT. 6 P* 7 H : P* INPUT: A1 = ADDRESS OF SENDING BUFFER (SYSTEM AREA) 7 R : P* A2 = ADDRESS OF RECEIVING BUFFER (USER AREA) 7 . P* A3 = NUMBER OF BYTES TO BE MOVED 7 P* 7 "
0x108888…108a1c Dummy {f00=0x0053, f01=0x0190, f02=»F REQUESTED LENGTH <= 0 7 x P STR A5,A14 SAVE A5 8 ( P LDR A4,A2 CHECK USER BUFFER ADDRESS 8 < P ANK A4,1 8 h . P RF(NZ) MVSU40 USER BUFFER ADDRESS UNEVEN? 8 z . P LDR A4,A1 NO, CHECK SYSTEM BUFFER ADDRESS 8 P ANK A4,1 8 0 P RF(NZ) MVSU60 SYSTEM BU
0x108a1c…108bb0 Dummy {f00=0x0053, f01=0x018e, f02=»UNEVEN? 8 p P* 9 PMVSU20 MVSU A3 9 P* 9 0 " PMVSU30 LDR* A5,A14 RESTORE A5 9 : P* 9 ` PMVSU35 RTN A14 9 j P* 9 P EJECT DMSUBR 9 P* 9 P* 9 0 PMVSU40 EQU * USER BUFFER ADDRESS WAS UNEVEN 9 * P LDR A4,A1 CHECK SYSTEM BUFFER
0x108bb0…108d44 Dummy {f00=0x0053, f01=0x0190, f02=» 9 ^ P RF MVSU65 : P* : 2 PMVSU60 EQU * SYSTEM BUFFER ADDRESS WAS UNEVEN : $ 0 P LCR A4,A1 GET ONE CHAR. FROM SYSTEM BUFFER : Z P ECR A4,A4 : * P ADK A1,1 UPDATE SYSTEM BUFFER ADDRESS : ( P SUK A3,1 DECREMENT REQUESTED LENGTH : * P RF(NP) MVSU70
0x108d44…108ed8 Dummy {f00=0x0053, f01=0x0190, f02=»ER BUFFER : p & P ADK A1,1 UPDATE BUFFER ADDRESSES ; P ADK A2,2 ; < ( P SUK A3,1 DECREMENT REQUESTED LENGTH ; N & P RB(P) MVSU60 MORE CHAR. TO MOVE? ; z P RB MVSU30 NO, RETURN ; P* ; 4 PMVSU70 ELR A3,A2 GET LAST CHAR. FROM USER BUFFER ; $ P ANK
0x108ed8…10906c Dummy {f00=0x0053, f01=0x018e, f02=»FFER ; j P RB MVSU30 RETURN < P* < & P EJECT DMSUBR < 0 P* < H P* < R 2 PMVSU80 EQU * BOTH BUFFER ADDRESSES WERE UNEVEN < 2 P LDR* A4,A1 GET FIRST CHAR. FROM SYSTEM BUFFER < 0 P ELR A5,A2 GET FIRST CHAR. FROM USER BUFFER < $ P ANK A4,/FF
0x10906c…109200 Dummy {f00=0x0053, f01=0x0190, f02=» < b & P ADK A1,1 UPDATE BUFFER ADDRESSES = P ADK A2,1 = 2 ( P SUK A3,1 DECREMENT REQUESTED LENGTH = D * P RB(P) MVSU10 MORE CHARACTERS TO MOVE? = p P RB MVSU30 NO, RETURN = P* = , PMVSU90 EQU * REQUESTED LENGTH WAS UNEVEN = ( P SUK A3,1 MAKE REQ
0x109200…109394 (1, 77) Dummy {f00=0x0053, f01=0x0190, f02=»R IN A7 , P* PUT ORDER INDEX IN DWTOR RIGHT BYTE P* @ P LDKL A1,/8000 REQUEST ERROR J & P LDK A2,NOOFOR-1 NO OF ORDERS - 1 n 2 PTIOD15 CC A7,TIODMO,A2 START AT END OF TIODMO P RF(E) TIOD20 MATCH P SUK A2,1 P RB(NN) TIOD
0x109394…109528 Dummy {f00=0x0053, f01=0x0004, f02=» (
0x109528…1096bc Dummy {f00=0x0053, f01=0x0190, f02=» J F IDENT DMSUBR REL 9.2 79-11-16 870105040920 F B EATESTK EASETB EARELB CRNGET CALSNO GTBKBU GTLGRNL DMTIOT R . * CHKIND REQEND DMTIOZ MOV:US MOV:SU CHKIND , ( ? ? !? P P !> P W
0x1096bc…109850 Dummy {f00=0x0053, f01=0x0190, f02=»WTTQ , ( = R L X P L P 4 M QTJOB < DWTTDM L DWTST ^ , ( Y X M M n IHRTN EATESTK z FDBEALL , ( q _8 > D W 0P Q F
0x109850…1099e4 Dummy {f00=0x0053, f01=0x0190, f02=» X 1 Y : , ( 4W 0P R Q P FREQUEW P * & W R D Q ( 0 5 @ b CRNGET FDBCRL , ( 1 A Z> : D W (P CRNTID CRNQUE
0x1099e4…109b78 Dummy {f00=0x0053, f01=0x018e, f02=»SNO X FDBBLF , ( G I D ) E : T DIVMOD P FDBEXT~ b , ( _ $ &S P W X $ t EXTLEN FDBCEX , ( yH ( * U U *_ EXTBAS
0x109b78…109d0c Dummy {f00=0x0053, f01=0x0190, f02=» , ( P X 2 _ W Y 4 : DWTECB 8 ECBRC J , ( D 6 8 B :P T Z FDBDBR ECBBA BUFDMIT , ( D$ G :W X < Y < B > DMTIOZ DWT
0x109d0c…109ea0 Dummy {f00=0x0053, f01=0x0190, f02=» GTBKBU , EXTDMI , ( ) 8_ X , P H X 0 8 & SECTLE V ECBRL h DMTGBU x ECBCW , ( ? ! # J C L NW C BUFSTAH , ( Y P R C > X B%? : X
0x109ea0…10a034 (1, 78) Dummy {f00=0x0054, f01=0x0190, f02=» TABLE % r P EJECT & $ PDMRRRB EQU * RAND READ REL BUFF & P* & D PDMSQRE EQU * SEQUENTIAL READ & N P* & r PDMRDRE EQU * RANDOM READ & | P* & 4 P* CHECK STATUS IF NOT USED THEN ERROR RETURN & P* & P LD A2,FDBRRO,A6 & P AD A2,F
0x10a034…10a1c8 Dummy {f00=0x0054, f01=0x018e, f02=»A & | P ABL DMTERR ' & PDMT200 LDK A1,/8 INCORRECT LENGTH ' & P CF A14,DMTFRL A2 := RECORD LENGTH ' H P* ' r P* MOVE THE RECORD ' | P* ' P CF A14,DMTREM ' P* ' 0 P* UPDATE CRN AND SET EXCLUSIVE ACCESS BIT ' P* ' PDMT230 E
0x10a1c8…10a35c Dummy {f00=0x0054, f01=0x0190, f02=» ' t P* ( P LD A2,FDBSNR,A6 ( ( P RF(NZ) DMT270 VTOC SECTOR IN BUFFER ( * P* ( V P* VOLUME LABEL IN BUFFER ( ` H P* FIND VTOC SECTOR NUMBER AND RELATIVE RECORD OFFSET WITHIN SECTOR ( 8 P* FOR VTOC RECORD AND READ THIS SECTOR INTO BUFFER (
0x10a35c…10a4f0 Dummy {f00=0x0054, f01=0x0190, f02=»OBLK VTOC BLOCKING FACTIOR ( ( P LD A2,FDBVTO,A10 VTOC RECORD NUMBER ) " P LDK A1,0 ) N , P CF A14,DIVMOD A2=A1,A2/A6.A1=REMAINDRER ) ` P LDR A3,A2 QUOTIENT ) P LDR A6,A10 FDB ADDR ) P LDR A2,A1 REST ) P RF(Z) DMT240 REST = 0 ) $ P ADK A3,1
0x10a4f0…10a684 Dummy {f00=0x0054, f01=0x0190, f02=» P ST A3,FDBSNR,A6 * P LDK A3,0 * PDMT255 SUK A2,1 * . P RF(Z) DMT260 * F P AD A3,VLVRL-2,A5 * P ADK A3,1 SKIP STATUS BYTE * v P RB DMT255 * PDMT260 ST A3,FDBRRO,A6 * P* * P* RELEASE BUFFER * P* * P LD A3,ECBBA,A9 *
0x10a684…10a818 Dummy {f00=0x0054, f01=0x0190, f02=» ADDR * P RB DMT020 READ VTOC SECTOR + P EJECT + 2 PDMT270 EQU * + @ P SUK A7,QRV + T $ P ABL(Z) DMT500 READ VTOC RECORD + h P* CLOSE FILE + & P* UPDATE VTOC LAST RECORD NUMBER + & P* AND WRITE SECTOR BACK ON DISC + P AD A5,FDBRRO,
0x10a818…10a9ac Dummy {f00=0x0054, f01=0x0190, f02=»E FILE. WRITE VTOC + P* , P LDK A7,/95 , $ P LKM , 8 P DATA 1 , D P* , T P LDR A1,A6 FDBADDRESS IN A1 , ^ & P CF A14,DMTIOT CHECK RETURN CODES , P LDR A1,A1 , P RF(NZ) DMT724 ERROR , PDMT720 EQU * , P LD A1,DWTTDM,A6 TTAB ADDR
0x10a9ac…10ab40 Dummy {f00=0x0054, f01=0x0190, f02=» A2,1 0 OR 1 , P ECR A2,A2 =1 END - P LC A2,ECBFC,A9 FILE CODE - . " P LDK A5,0 TRY LOCAL AND GLOBAL - P . P CF A14,FNDFDB GET ENTRY IN TTAB CDTADTAB - v & P LDR A13,A5 LOCAL/GLOBAL INDICATOR - P LDR A2,A2 - P RF(NZ) DMT725 FC FOUND - P LDK
0x10ab40…10acd4 (1, 79) Dummy {f00=0x0054, f01=0x0190, f02=»+2,A9 E P ANK A2,/FF F P LD A3,ECBCW,A9 LOG REC NR F " P LDK A4,0 F D P CCR A4,A10 F V P RF(E) DMS010 FREE F j P IFT INDXAC=1 F P LDR A4,A7 F P SUK A4,QINS F P RF(E) DMEAER INDEXED INSERT F P XIF F P LDR A4,A7 F P SUK A
0x10acd4…10ae68 Dummy {f00=0x0054, f01=0x0190, f02=» P ANK A4,EABIT G " P RF(NZ) DMS020 EA=1, NO CHECK G P* EA MUST BE SET G @ P* G Z P CF A14,EATEST G d P LDR A4,A4 RTN CODE G z " P RF(NP) DMEAER NO EA THIS TASK G P XIF G P RF DMS100 G PDMS010 EQU * G P IFT INDXAC=1 G P LDR
0x10ae68…10affc Dummy {f00=0x0054, f01=0x0190, f02=»TE G v P XIF H PDMS020 EQU * H P CF A14,EATEST H * P LDR A4,A4 RTN CODE H @ P RF(N) DMEAER EA OTHER TASK H PDMS100 EQU * H P LDK A1,0 SET STATUS FREE H P IFT INDXAC=1 H P LDR A2,A7 H P SUK A2,QIRW H " P RF(E) CHK010 INDEXED
0x10affc…10b190 Dummy {f00=0x0054, f01=0x0190, f02=»HK010 INDEXED DELETE H P XIF I P LDR A2,A7 I ( P SUK A2,QRD I : P RF(E) DMT350 RANDOM DELETE I N P LDR A2,A7 I r P SUK A2,QRDD I ( P RF(E) DMT350 DELAYED RANDOM DELETE I P RF DMT310 RW,RWD,SW I P IFT INDXAC=1 I P EJECT I PCHK0
0x10b190…10b324 Dummy {f00=0x0054, f01=0x0190, f02=»* COMPARE KEYS IN FILE AND USER BUFFER I P* J 0 P LDR A1,A6 FDB ADDR J : P LDK A5,8 MAX 4 INDEX J V P SUR A12,A12 INDEX COUNTER J t PCHK040 EQU * J P SUK A5,2 J $ P RF(N) CHK100 ALL INDEX CHECKED J P LDR A2,A1 FDB ADD J P ADR A2,A5
0x10b324…10b4b8 Dummy {f00=0x0054, f01=0x0190, f02=»ORDER =3 J P ANK A2,/3F ORDER INDEX K P SUK A2,QIRW K 0 & P RB(NE) CHK040 NOT INDEXED REWRITE K D P* K n P IFT MMUPAG=1 K x P LDR A7,A1 SAVE A1 K * P LD A1,FDBKA,A6 GET KEY START ADDRESS K P AD A1,ECBBA,A9 K 2 P LDKL A2,FDBKEY GET KEY SA
0x10b4b8…10b64c Dummy {f00=0x0054, f01=0x0190, f02=»6 KEY LENGTH K P INH L & P LD A4,DWTTDM,A7 GET TTAB ADDRESS L $ P TL TTB:MT,A4 LOAD MMU REGISTERS L J $ P LD A4,PRUN GET DM TTAB ADDRESS L r 0 P TS TTB:MT,A4 STORE USER MMU IN DM MMU TABLE L P ENB L , P CF A14,MOV:US MOVE KEY TO FDB KEY AREA L
0x10b64c…10b7e0 Dummy {f00=0x0054, f01=0x0190, f02=»NDXAC=1 L P IFT MMUPAG=0 M " P LD A2,FDBKA,A6 KEY START ADDR M & P LDR A3,A2 M L " P AD A2,ECBBA,A9 KEY IN BUFFER M ^ P XIF M P* M P IFT INDXAC=1 M P AD A3,FDBRRO,A1 M P ADR A3,A11 KEY IN FILE M P LDK A7,0 M " P LD A6,FDBRLE,
0x10b7e0…10b974 (1, 80) Dummy {f00=0x0054, f01=0x0190, f02=» P LKM > P DATA 3 EXIT > P XIF > $ P IFT FLXDSC=1 > 0 P EJECT > F PDMT900 EQU * > T $ P* UNLOCK FLEXDISC IN THIS LOOP > h P* > P* REGISTERS > P* A1 = EXTENT COUNTER > 6 P* A4 = LAST VOL CODE FLEXDOISC A5 = EXT ADDR >
0x10b974…10bb08 Dummy {f00=0x0054, f01=0x0190, f02=»NGTH IN FDB > z P LCR A7,A5 VOLUME CODE ? P ANK A7,/FF ? 2 P ABL(Z) DMT880 NO CODE ? F P* ? d & P* FLEXDICSC IF BIT 8-13 = 111110 ? n P* ? P ANK A7,/F8 ? P SUK A7,/F8 ? P ABL(NE) DMT880 NO FLEXDISC ? P* ? 6 P* IF SAME FLEX
0x10bb08…10bc9c Dummy {f00=0x0054, f01=0x0190, f02=»THOIS FLEXIBLE DISC VOL CODE ? t P* @ $ PDMT910 EQU * @ . P LCR A4,A5 SAVE VOL CODE @ B " P LDKL A3,FDBSTA FDB LINK ROOT @ b P INH INH @ P RF DMT925 @ PDMT920 EQU * @ P LDR* A3,A3 FDB ADDR @ PDMT925 EQU * @ P ANKL A3,/FFFE FDB ADD
0x10bc9c…10be30 Dummy {f00=0x0054, f01=0x018e, f02=» DMT920 CURRENT FDB @ P LDK A7,4 EXTENT COUNTER A P LDR A2,A3 FDB ADDR A < P ADKL A2,FDBEXT+1 A X P* ADDR OF 1ST VOL CODE A r & P SUKL A2,EXTELE EXT LENGTH IN FDB A PDMT930 EQU * A P SUK A7,1 A & P RB(N) DMT920 ALL EXTENTS CHECKED A
0x10be30…10bfc4 Dummy {f00=0x0054, f01=0x018e, f02=» A & P* ALL FSDBS CHECKED. MAKE UNLOAD B P* B 2 PDMT980 EQU * B < P ENB ENB B P P* B b 6 P* NOTE THAT ECBBUF IS ASSUMED NOT TO BE CHANGED B l P* WITH THIS REQUEST B P* B P SC A4,ECBFC,A8 VOL CODE B P* B P IFF DSKPAG+SWPB
0x10bfc4…10c158 Dummy {f00=0x0054, f01=0x0190, f02=» P IFT FLXDSC=1 C P LDK A7,/B8 UNLOAD WAIT C P LKM C : P DATA 1 C F P LD A1,ECBRC,A8 C V P ANK A1,1 INOPER C n P ABL(NZ) DMTERR C P ABL DMT880 CHECK NEXT EXT C P XIF C P EJECT C " PDMT500 EQU * READ VTOC RECORD C P* C "
0x10c158…10c2ec Dummy {f00=0x0054, f01=0x0190, f02=»H C v ( P ORS A1,ECBRC,A9 SET RC BUT CONTINUE D , P LD A2,ECBRL,A9 MOVE WHAT USER TOLD YOU D 6 PDMT510 EQU * D f P ST A2,ECBEL,A9 D z P CF A14,DMTREM MOVE RECORD D PDMAEX EQU * D P ABL DMTAEX EXIT D P EJECT D " PDMSQWR EQU * SEQUENTIAL WR
0x10c2ec…10c480 Dummy {f00=0x0054, f01=0x0190, f02=» D v P* E PDMDEL EQU * INDEXED DELETE E P* E 4 PDMIRW EQU * INDEXED REWRITE E > P* E b & PDMRDWD EQU * DELAYED RANDOM WRITE E l P* E & PDMRDDD EQU * DELAYED RANDOM DELETE E P* E P* TEST STATUS E P LD A10,FDBRRO,A6 E P A
0x10c480…10c614 (1, 81) Dummy {f00=0x0054, f01=0x0190, f02=»ECK NEXT M r P LDR A6,A1 FDB ADDR N P LDKL A1,/4000 KEY NOT FOUND N , P RF DMERR N P PCHK100 EQU * N b P LDR A6,A1 FDB ADDR N v P LD A7,DWTOR,A6 N P ANK A7,/3F ORDER INDEX N P LDK A2,0 N P LC A2,FDBNIF,A6 N P CWR A2,A12 N ( P
0x10c614…10c7a8 Dummy {f00=0x0054, f01=0x0190, f02=»R N P XIF O $ PDMEAER LDKL A1,/2000 EA PROTECT O PDMERR ABL DMTERR O > P EJECT O V P* O d P* MOVE RECORD O n P* O PDMT310 EQU * O P IFT INDXAC=1 O P LDR A2,A7 O P SUK A2,QDEL O " P ABL(E) DMXDEL INDEXED DELETE O P X
0x10c7a8…10c93c Dummy {f00=0x0054, f01=0x0190, f02=»FROM ADDRESS O P* P P IFT MMUPAG=0 P P XRR A4,A1 P 4 P ANK A4,/01 P F ( P RF(E) DMT320 BOTH ODD OR BOTH EVEN P Z & P CF A14,DMTBM ONE ODD AND ONE EVEN P P RF DMT340 P P* P PDMT320 LDR A4,A3 P P ANK A4,/01 P P RF(E) DMT330 BO
0x10c93c…10cad0 Dummy {f00=0x0054, f01=0x018e, f02=»RD MOVE P z P* Q P XIF Q P* Q & P IFT MMUPAG=1 Q 0 P LDR A3,A2 GET LENGTH Q F , P LDR A2,A4 GET RECEIVING BUFFER ADDRESS Q d P INH Q & P LD A4,DWTTDM,A6 GET TTAB ADDRESS Q $ P TL TTB:MT,A4 LOAD MMU REGISTERS Q $ P LD A4,PRUN GET DM TTA
0x10cad0…10cc64 Dummy {f00=0x0054, f01=0x0190, f02=» Q Z P XIF R P* R PDMT340 EQU * R P* R 2 P* SET STATUS USED R < P* R X P LDK A1,/FF R b PDMT350 SCR A1,A10 R v P LD A3,FDBDBR,A6 R P RF(NN) DMT394 NO DELAY R P LDR A2,A7 R P SUK A2,QSW R " P RF(E) DMT360 SEQUENTIAL W
0x10cc64…10cdf8 Dummy {f00=0x0054, f01=0x0190, f02=»NDOM DELETE R x P RF DMT390 S $ P* WRITE IF LAST REC IN SECTOR S & P* S N PDMT360 LD A4,FDBRRO,A6 S X P CW A4,FDBMRO,A6 S v " P RF(NE) DMT400 NOT LAST RECORD S " PDMT390 LDK A7,/05 BASIC WRITE S P SLL A3,1 S P RF(N) DMT395 BASIC WANTED S
0x10cdf8…10cf8c Dummy {f00=0x0054, f01=0x0190, f02=»1,A6 FDB ADDRESS AS PARAMETER S P LKM T & P DATA -1 I/O AND ACTIVATION T 2 " P DATA DMTAR2 DMTASK RESTART #2 T V P LKM T | P DATA 3 EXIT T P EJECT T P* T P************** T P* DMTAR2 * T P************** T P* T P* T ,
0x10cf8c…10d120 Dummy {f00=0x0054, f01=0x0190, f02=»4,DMTIOT CHECK DISC I/O T P LDR A1,A1 U P RF(NZ) DMTERR U 2 P LDKL A1,/C0FF U H $ P ANS A1,FDBDBR,A6 RELEASE BUFFER U ^ PDMT400 EQU * U " P LDR A1,A6 FDB ADDR DATA FILE U P LD A2,ECBCW+2,A9 U P ANK A2,/FF U P LD A3,ECBCW,A9 LOG REC NR
0x10d120…10d2b4 (1, 82) Dummy {f00=0x0055, f01=0x018e, f02=» ] " P LD A2,FDBRRO,A1 RECORD OFFSET ^ P ADK A2,10 BUFFER HEADER ^ . P ADR A2,A3 REC ADDR ^ N P LD A4,FDBRLE,A1 REC LENGTH ^ j P SUK A4,6 KEY LENGTH ^ P ADR A2,A4 ^ " P CC A4,2,A2 DUPLICATE KEY CHAR ^ $ P RF(NE) DMR020 NEXT KEY NOT SAME ^
0x10d2b4…10d448 Dummy {f00=0x0055, f01=0x0190, f02=» ^ P LDK A5,0 _ P LC A5,3,A2 _ P SC A5,ECBCW+3,A8 _ . P LC A5,4,A2 _ H P ECR A5,A5 _ P LC A5,5,A2 _ n P ST A5,ECBCW,A8 _ P* _ P* RELEASE BLOCK BUFFER _ P* _ P CF A14,DMTRBU _ P EJECT _ P* _ 0 P* PERFORM
0x10d448…10d5dc Dummy {f00=0x0055, f01=0x018e, f02=» BIT _ | P SLL A2,1 ` " P LDK A7,/A RANDOM READ NO WAIT ` P ORR A7,A2 EA BIT ` D P* ` ^ P* MOVE USER ECB ` h P* ` P LDR A1,A9 FROM ECB ADDR ` P LDR A3,A8 TO ECB ADDR ` P LDK A2,6 NO OF CHAR ` P CF A14,DMTWM MOVE ECB ` P LDR
0x10d5dc…10d770 Dummy {f00=0x0055, f01=0x0190, f02=» P DATA 3 EXIT a PDMTAR4 EQU * a P* a , P* SET UP A14 STACK a 6 P* a R P CF A15,GETA14 a P LDR A6,A1 a r P LDKL A8,FDBECB a P ADR A8,A6 RR ECB a P LD A9,DWTECB,A6 USER ECB a P LD A1,ECBRC,A8 a & P ORS A1,ECBRC,A9 RET COD
0x10d770…10d904 Dummy {f00=0x0055, f01=0x0190, f02=»LE a x P* b ( P LD A1,FDBADF,A6 FDB ADDR DATA FILEP b & P CF A14,CRNGET GET CRN BUFFER ADDR b @ P LDR A10,A2 CRN BUFFER ADDR b j " P LDR A1,A6 FDB ADDR INDEX FILE b ( P CF A14,GTLGRN GET INDE X LOG REC NO b P SC A2,CRNCIF+1,A10 b & P ST A3,CRNCI
0x10d904…10da98 Dummy {f00=0x0055, f01=0x0190, f02=»URN CODEXS b P* c $ P LD A2,ECBEL,A8 EFFECTIVE LENGTH c P ST A2,ECBEL,A9 c D P LDK A1,0 RETURN CODE c P ABL DMTERX TENDIO c z P EJECT c " PDMIRN EQU * INDEXED READ NEXT c 2 P********************************************* c P LDR A1,A6
0x10da98…10dc2c Dummy {f00=0x0055, f01=0x0190, f02=»UFFADR c P ADK A2,10 RECORD ADDR d ( P AD A2,FDBRLE,A1 ADDR OF STATUS CHAR d , P LDK A5,/FF USED MARK d X P CCR A5,A2 STATUS d v P RF(E) DMI120 USED d P LD A4,FDBMRO,A1 d & P ST A4,FDBRRO,A1 LAST REC IN SECT d P* d P* CHECK IF END O
0x10dc2c…10ddc0 Dummy {f00=0x0055, f01=0x0190, f02=» RF(G) DMI105 EOF d P CW A3,FDBLRN+1,A1 e P RF(L) DMI106 NOT EOF e 4 PDMI105 LDR A3,A9 e R P RF DMI030 EOF e j PDMI106 LDR A3,A9 RESTORE e P RF DMI010 NEXT REC e PDMI120 EQU * e P* INDEX RECORD IS FOUND e P* e P LDK A2,0
0x10ddc0…10df54 (1, 83) Dummy {f00=0x0055, f01=0x0190, f02=»*************** m r " P LD A9,DWTECB,A1 USER ECB ADDR n $ P LD A8,ECBBA,A9 BUFFER ADDR USER n > P LDR A12,A8 n f $ P LD A11,FDBRLE,A1 RECORD LENGTH n z P SUKL A11,6 KEY LENGTH n P LDR A13,A14 n 0 P ADKL A13,2 ECB ADDR TO RECORD BUFFER AREASS n $ P
0x10df54…10e0e8 Dummy {f00=0x0055, f01=0x0002, f02=»
0x10e0e8…10e27c Dummy {f00=0x0055, f01=0x0190, f02=» J F IDENT TCLASS REL 9.2 79-11-16 870105040920 TCLASSK R TCLASSK d DVKB00 x DVDY00 DVKB01 * & ! 1 DVTP01 DVDY01 DVKB0
0x10e27c…10e410 Dummy {f00=0x0055, f01=0x4094, f02=» " @ P 0 0 GH 1 2 * 4 0 | , : @ - ; A F N ~@ DVKB01 * & ! 1 DVTP01 DVDY01 DVKB0
0x10e410…10e5a4 Dummy {f00=0x0055, f01=0x2008, f02=»
0x10e5a4…10e738 Dummy {f00=0x0055, f01=0x018e, f02=» P ABL(NZ) DMTERR s P* s P* GET NEXT RECORD s & P* s B PINS160 EQU * s L " P LDR A7,A5 NR OF SAME IN NEXT s ` P LDR A1,A6 FDB s P CF A14,RDNXTR GET NEXT RC s P RF INS170 OK s P ABL DEL045 ERROR s PINS170 EQU * s P LDR A
0x10e738…10e8cc Dummy {f00=0x0055, f01=0x0190, f02=» s P* t ( P* CREATE AN INDE XRECORD IN AREA 1 t P* t > P LDR A1,A12 FROM ADDR t H P* t f P LDR A3,A14 t p P ADK A3,2 TO ADDR t P LDR A2,A11 KEY LENGTH t P CF A14,DMTBM MOVE KEY t P LDK A2,0 t P SCR A2,A3 DUMMY t P ADK
0x10e8cc…10ea60 Dummy {f00=0x0055, f01=0x0190, f02=»R t t P LD A2,ECBCW+2,A5 u ( P LD A3,ECBCW,A5 REC NR DATA FILE REC u $ P SCR A2,A7 u P P ADK A7,2 u b P SCR A3,A7 u t P ECR A3,A3 u P SUK A7,1 u P SCR A3,A7 LOG REC NR u P ADK A7,2 u P LDK A1,/FF USED u P SCR A1,A7 STATUS CHAR
0x10ea60…10ebf4 (1, 84) Dummy {f00=0x0055, f01=0x018e, f02=» " P LDR A11,A3 FIRST REC NR MOVED P LD A12,FDBRRO,A6 OLD OFFSET * P LD A4,FDBMRO,A6 N P ST A4,FDBRRO,A6 MAX OFFSET f $ P CF A14,GTLGRN LAST REC NR MOVED P LDR A8,A2 P LDR A9,A3 REC NR " P ST A12,FDBRRO,A6 RESET OFFSET P LDK
0x10ebf4…10ed88 Dummy {f00=0x0055, f01=0x0190, f02=» ~ $ P RF(NZ) DEL290 NOT FIRST RECORD P LDR A1,A5 FDB 0 P CF A14,GTLGRN GET REC NR F P LDR A1,A2 h P LDR A2,A3 z P LDK A6,0 P LDK A7,1 $ P CF A14,DSUMOD A1,A2 = A1,A2 - 1 P RF(Z) DEL600 FILE START P LDR A6,A5 FDB A
0x10ed88…10ef1c Dummy {f00=0x0055, f01=0x0190, f02=»A14 P ADKL A8,2 ECB ADDR P LDR A12,A12 ( $ P RF(Z) DEL245 BUFFER NOT CHANGED < P* d P* WRITE SECTOR n P* P LDK A7,/95 WRITE WAIT P LKM P DATA 1 P LDR A1,A5 FDB P CF A14,DMTIOZ IO CHECK P LDR A1,
0x10ef1c…10f0b0 Dummy {f00=0x0055, f01=0x018e, f02=»EASE BUFFER ~ P* P* GET PREVIOUS SECTOR P* > P LDR A1,A5 FDB ADDR H P LDK A3,0 d P CF A14,RDNXTR GET SECTOR v P RF DEL250 OK P LDR A6,A1 FDB ADDR P RB DEL045 PDEL250 EQU * P LDR A5,A1 FDB P L
0x10f0b0…10f244 Dummy {f00=0x0055, f01=0x018e, f02=» PDEL300 EQU * * P ST A4,FDBRRO,A5 PREVIOS RECORD OFFSET P ADK A4,10 BUFSTA+2 F P ADR A4,A13 RECORD ADDR b & P AD A4,FDBRLE,A5 STATUS CHAR ADDR P LDK A2,/FF P CCR A2,A4 P RB(NE) DEL240 FREE . P LC A2,17,A14 NR OF SAME I
0x10f244…10f3d8 Dummy {f00=0x0055, f01=0x0190, f02=» v PDEL600 EQU * P LDR A12,A12 $ P RF(Z) DEL900 BUFFER NOT CHANGED 0 P* X P* WRITE SECTOR b P* z PDEL700 EQU * P LDR A8,A14 P ADKL A8,2 ECB ADDR P LDK A7,/95 WRITE WAIT P LKM P DATA 1 P LDR A
0x10f3d8…10f56c Dummy {f00=0x0055, f01=0x401c, f02=» XIF P END @ LDR A12,A12 $ P RF(Z) DEL900 BUFFER NOT CHANGED 0 P* X P* WRITE SECTOR b P* z PDEL700 EQU * P LDR A8,A14 P ADKL A8,2 ECB ADDR P LDK A7,/95 WRITE WAIT P LKM P DATA 1 P LDR A
0x10f56c…10f700 Dummy {f00=0x0055, 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* +
0x10f700…10f894 (1, 85) Dummy {f00=0x0055, f01=0x0190, f02=» S V V W @ @ T < : P S S _ : . !TTP < V W t * & P D r _ 6 Ph W p D W V 8 8 4 D P$ L @ # P H I
0x10f894…10fa28 Dummy {f00=0x0055, f01=0x0190, f02=» T < P / _ T @ A V W W t & PT W f ( D W d T G =h G V d V r < F V f P W f _B V W V t Yr !TTX @ @ T < : !TTX !CC
0x10fa28…10fbbc Dummy {f00=0x0055, f01=0x0190, f02=» _. @ @ @ ! P V 8 8 8 @ >B 3 . !CCP W P0 W f D W d T V d V r < F V f _2 6 U^ D V 8 8 8 4 D P$ L @ # P H I K T + Y@ _`R& @ @
0x10fbbc…10fd50 Dummy {f00=0x0055, f01=0x0190, f02=» q > R P >b W >b & 8P D P U & E W ~ V W R 9 W D L ) $ P@ D L T@ D &P V U 0 I , I . $# P V -W H P U & I @ % PD H I H T P( H U V U W < + +
0x10fd50…10fee4 Dummy {f00=0x0055, f01=0x0190, f02=» W W W R _ $ W : W | v z *T P _ / P *_ *T P$ _ .P _ / V z U Y$ P W | V z 3 % W P _ V |P V v ]stW v P _ @
0x10fee4…110078 Dummy {f00=0x0055, f01=0x0190, f02=» P N =H N T _ : 00=H 00 P P _ _ : @ ! P (W ( : > r " h h x @ CRT" @ ! P ` @ E "W ` @ E " > H ^ l r ! H 1 0 1 2 P @ P 0
0x110078…11020c Dummy {f00=0x0055, f01=0x0190, f02=» . , & . .K DC < u(KB *T x x 8 DY
0x11020c…1103a0 Dummy {f00=0x0055, f01=0x0190, f02=» 4x TP 8 DY CRT" P u(KB > H 4 4
0x1103a0…110534 (1, 86) Dummy {f00=0x0056, f01=0x018e, f02=» > @ IDENT DEBUGM REL 9.2 79-11-16 870105040920 dBUG F |BUG T , ( A U A @ * A d , ( ! A " @ ~ A A ~ @ , ( A A A @ A A @ , ( a A A
0x110534…1106c8 Dummy {f00=0x0056, f01=0x0190, f02=» f , ( , ( $ ( , 0 4 8 , ( # 8 < h , ( C , ( c , (
0x1106c8…11085c Dummy {f00=0x0056, f01=0x0190, f02=» T :a R T <a Z _ = , ( :A , >a @ ( , ( " # A P UW B X , ( C @ = / M Q , ( c R S T Y G P H L , ( V I U _v
0x11085c…1109f0 Dummy {f00=0x0056, f01=0x0190, f02=» P A A x , ( . , + - ; : , ( # X " H W X " H H H , ( C A A A _T @ P A 1+ x , ( !T c X A _ @ A @ A _ , ( ! A UP " , (
0x1109f0…110b84 Dummy {f00=0x0056, f01=0x0190, f02=» h , ( 0 _, W , ( ! # W P @ & 0 8 , ( C T A P P h , ( c _b _J A , ( $T @ W @ , ( % T @ W
0x110b84…110d18 Dummy {f00=0x0056, f01=0x0190, f02=» _L W @ $ 0 , ( # W $ A W @ A ( , ( C P 3P X , ( c C @ P @ @ P @ Q , ( A $ @ A " T @ W @ , ( ( A A
0x110d18…110eac Dummy {f00=0x0056, f01=0x0190, f02=» @ P x , ( # & @ A 9 Y , ( $ C *>a Y j c A A " H , ( P c & A *<a P j A x , ( @ ) " A H , ( U A @ & @ @ , (
0x110eac…111040 Dummy {f00=0x0056, f01=0x0190, f02=» h , ( # RE RN ME MN W R , ( C ( T ( W P T $ ; V 8 , ( c ; W &~ P &`P 6 P @ h , ( $ P $W $ T P , ( #~ > V . >A P Y X , ( W ^ ?
0x111040…1111d4 (1, 87) Dummy {f00=0x0056, f01=0x0190, f02=» ` $ $ W $ H ) P _ " = D 4 Q j_d T = G $ @ V W $ n V E J K _N V r V :B A V 9n A @ A A , @ @ ! @ P P P P|_ _ @
0x1111d4…111368 Dummy {f00=0x0056, f01=0x0190, f02=»P A. @ P _b A 9n A :B A @ .V 3 S Y& P4 2 2 S P 3 _ 2 3 4 B A. @ D @ W x A @ : A | > l
0x111368…1114fc Dummy {f00=0x0056, f01=0x0190, f02=» ^ _v V d , V P _ N L % V d V f v G G v U v G v : P V : V ~P W x _$ 8 V V x % V v % : V V 9k! P % _ V V W W r
0x1114fc…111690 Dummy {f00=0x0056, f01=0x0190, f02=» ~ pP0 F R P R _ W ~ R X4 R _ ` @ ` W W ~ pPn T V W % F R , " E R 6 W ~ R 6 R P R Xv _|W T : W x _ V P I T W z `
0x111690…111824 Dummy {f00=0x0056, f01=0x0190, f02=» W | ;b W W t V b v ( v W p V ` $ W ` ;h 0 :C # : .=H N .=H N N : d 8" R _ ZY QY : @ V H W z W | CRP W ` ` H W d 2 ;A @
0x111824…1119b8 Dummy {f00=0x0056, f01=0x0190, f02=» =H N @ ) !TTXX !CCT !UUT d dWh R 2 .:H N P V _ R :h " R YV : v `?A @ W W :b / W : W @ W D
0x1119b8…111b4c Dummy {f00=0x0056, f01=0x0190, f02=» :A W V d 4 W P _ W ` W d V V W W V V >k 8 W W t V V : x A P x W r x W @ @ % P V , P@ , - 4 ] 4 NY 5
0x111b4c…111ce0 Dummy {f00=0x0056, f01=0x0190, f02=» @ T Y !TTX" A 9 A : @ @ P. @ " P #D " P #E " P #F : @ " P @ P 3 _ @ " P S 1 S 9J S ( 3 ( 9B @ @ T : @ :B W . !TTP W
0x111ce0…111e74 (1, 88) Dummy {f00=0x0056, f01=0x0190, f02=» r " U _2 P0 " U _2 V V tPJ S ( V | S =J @ " S V l S W l V p S W p W _L @ % P W @ % P !TTT @ @ T
0x111e74…112008 Dummy {f00=0x0056, f01=0x0190, f02=» @ !RRP @ ! T 3 @ & P @ 3 @ 3 YL @ @ T : 0 ` @ P _ 3 S S V V W @ @ T : P S S _ : . !TTP V
0x112008…11219c Dummy {f00=0x0056, f01=0x0190, f02=» @ # P H I K T + Y@ V p _j V t Y !TTX @ @ T : @ R @ T P / _ T @ A V W W t PT W f ( W d
0x11219c…112330 Dummy {f00=0x0056, f01=0x0190, f02=» : !TTX !CCTr P, V r 4 U $ $ _. P, V 4 U $ $ _. @ @ @ ! P V 8 8 8 @ >B 3 . !CCP W P0 W f W d V d V
0x112330…1124c4 Dummy {f00=0x0056, f01=0x0190, f02=» + Y@ _`R& @ @ @ % P V 4 4 4 _r @ @ T : W V @ 0 V P _ W $ q > R P >b W >b & 8P D P U & E W V W R 9 W D ) $ P@ D L T@ D &P V U
0x1124c4…112658 Dummy {f00=0x0056, f01=0x0190, f02=» V U W < + + P V : V $ F !LLT # W ;I # ;b W ;a WR# T W W,# T W W # T W W W R _ $ W : W | v z *T P _ / P
0x112658…1127ec Dummy {f00=0x0056, f01=0x0190, f02=» v ] 6W v P _ @ @ T : N =H N : N =H N : &=H F : F =H F : F =H F : P N =H N T _ : 00=H 00 P P _ _ : @ ! P (W ( : D p
0x1127ec…112980 Dummy {f00=0x0056, f01=0x0190, f02=» 1 . 2 . P b @ & P X 0 0 1 2 $ * 0 6 V v X a # " `eV " " - - - - , x , .Y DC
0x112980…112b14 (1, 89) Dummy {f00=0x0056, f01=0x0190, f02=» 8 DY : N P @ KB =H F b 4 TP V
0x112b14…112ca8 Dummy {f00=0x0056, f01=0x0190, f02=» 2 PDI L ?O_o 8 DY , P 4 GP 4 TP
0x112ca8…112e3c Dummy {f00=0x0056, f01=0x0190, f02=» P DATA /300D P DATA /3233 P DATA /3435 , P DATA /3637 @ P DATA /3839 T P DATA /ACA9 B12,C13 h P DATA /ADA7 E13,D13 P DATA /A8A6 D14,E14 P DATA /6041 E12 P DATA /4243 P DATA /4445 P DATA /4647
0x112e3c…112fd0 Dummy {f00=0x0056, f01=0x408e, f02=»455 P DATA /5657 P DATA /5859 P DATA /5A5C 4 P DATA /5B5D H P DATA /277F D12 P* t END ~@ 7 E13,D13 P DATA /A8A6 D14,E14 P DATA /6041 E12 P DATA /4243 P DATA /4445 P DATA /4647
0x112fd0…113164 Dummy {f00=0x0056, f01=0x2008, f02=» 233 DATA /3435 DATA /3637 ( DATA /3839 < DATA /BA26 A20,A21 P DATA /ABB3 A22,C22 l DATA /B292 D22,D23 DATA /A1A0 E15,E17 DATA /AEAF E18,E19 DATA /8C80 E20,E21 DATA /B0B1 E22,
0x113164…1132f8 Dummy {f00=0x0056, f01=0x0190, f02=»EGSET v & PDK03 DSET FC=C3 FD999003 CYCLE SET $ PDK04 DSET FC=C4 FD999004 KT PLAN 8 PDSSOPI DSET FC=10 ` PDSSOPO DSET FC=11 z " P FMTCTL INDS=KEYB,OUTDS=SCREEN P* P* P* P* P* P START REGGO P STACK 1
0x1132f8…11348c Dummy {f00=0x0056, f01=0x0190, f02=»TA DIVISION FOR IBM-3270 EMULATION PACKAGE. z B P* THIS MODULE ALSO CONTAINS THE CREDIT CODED 4 * P* START-UP ROUTINES. z P* H P******************************************************************** P P E
0x11348c…113620 Dummy {f00=0x0056, f01=0x0190, f02=»E F=NO SALDO AT ALL IN KORT . PCCLKTFLG BOOL FALSE T=KONTOKORT I KASSELUK $ 0 PCTESTFLG BOOL FALSE T=CONVERSION, TEST MODE V , PCTRVALG BOOL FALSE T: SKOVBO. F: VIBORG . PCFLT46 BOOL FALSE T=SPECIAL FIELD 46,TR=8 . PCFLT48 BOOL FALSE T=SPECIAL
0x113620…1137b4 (1, 90) Dummy {f00=0x0057, f01=0x0190, f02=»W b X @X$_ nW nP W B " 0 Y , Y . 4 X @:C* WB W> X " " :BW0 X " :BW& X @ X FP _ X D % ^ W c X :B X ! E ( ! Y Y y ? "l @ P: Y " !! P X > Y '? * R>_< @"jX2 a"jW<_J Y " !! P
0x1137b4…113948 Dummy {f00=0x0057, f01=0x0190, f02=» X P X " I $ R> y Y < Y ! Td ! ^ Y @ ! ! TR 0 X P p Y , (P ) P @ T X Q $ X X T Y _l Y < 4 "l j " B B r s " T
0x113948…113adc Dummy {f00=0x0057, f01=0x0190, f02=» Q 1 R> y Y @ r t B X _ ? # X Z&W A ?I # X ' { B C X 4 " # c X # E Y Y ? @ P Y ! P X Y '? * _< @ X2 a W _J Y ! P
0x113adc…113c70 Dummy {f00=0x0057, f01=0x0190, f02=» X P X " I %*'"/N % '"/N ^ Y @ ! ! TR 0 X P p Y P, P P 1P( P W P P 5P y & y X P W` B " P HJ :H B # LJ 9 B Y B Y / P. @J J y @J `J @J P 0P _ % AJ AJ R>_r B Q< &$
0x113c70…113e04 Dummy {f00=0x0057, f01=0x0190, f02=» S &> Y _& Y & @' 0 A' A' _: X P ( y Y W /N (P 0 ) > $ (P _ ) 1_ $ (X( P _ 0 )_6 (P _ ) 1 4 / X R2 X T* X P& , Y L C L C Q > @$ @$ @$ A$ X R>_" X P y Y X P
0x113e04…113f98 Dummy {f00=0x0057, f01=0x0190, f02=» % !- 2B !- T P P ) * ) !- Tf Tb A/!P A/ TR !- TL !- TD T@ !- T8 !- A I A' P " * !. +&_ !. T / *t" X !- _ !. A' @' P @' P !+( A' A' _ !. @' P @/NX@ !+n T< A' !, ' @' P @/NP @'
0x113f98…11412c Dummy {f00=0x0057, f01=0x0190, f02=»R@ X P X T2 P C &Z C X T !& W Q W( R>W" X R X T R> !& & !, ' _ A' @' X A' A' A' @' A' + !. @' T @' P !,2 ' !. @' T @' X Wj A I 'R S ) y 'l @' @' @' A' + !. @' XN !- T @' P !
0x11412c…1142c0 Dummy {f00=0x0057, f01=0x0190, f02=»' A' HK E A' A' 4 @' P !,& !. ' !.bW ' @$ T !,"_ T & _ ' A' AX C Qh B B A' A' A' A' A' !,Z !. A' _^_V @' P6 X R0 X P T$ T Y W ' &Z P C R> & A' A' 4 @/N @' T @' A' @' A' A' !- T2 P4
0x1142c0…114454 (1, 91) Dummy {f00=0x0057, f01=0x0190, f02=» ` W d p G =h G V d V r < b V f P W f _B V W V t Yr !TTX @ @ T X : !TTX !CCTr 2 P, ` V r 4 U X $ $ _. R P, ` V 4 U X $ $
0x114454…1145e8 Dummy {f00=0x0057, f01=0x0002, f02=» 0
0x1145e8…11477c Dummy {f00=0x0057, f01=0x000c, f02=» HEND SP,/L HRUN PDISC,0 M=M:92SP & HOPT OUT=@M=,FC=F1,FT=M,INP=M:92SP 6 H$PDISCE P=M:92SP ` * HMES ILLEGAL PARAMETER COMBINATION !!! x * HMES FOLLOWING COMBINATIONS ARE VALID: " HMES 1 A,A+AU,A+AOUT,A+AU+AOUT " HMES 2 C,C+CU,C
0x11477c…114910 Dummy {f00=0x0057, f01=0x2008, f02=» SP,/L HRUN PDISC,0 M=M:92SP & HOPT OUT=@M=,FC=F1,FT=M,INP=M:92SP 6 H$PDISCE P=M:92SP ` * HMES ILLEGAL PARAMETER COMBINATION !!! x * HMES FOLLOWING COMBINATIONS ARE VALID: " HMES 1 A,A+AU,A+AOUT,A+AU+AOUT " HMES 2 C,C+CU,C
0x114910…114aa4 Dummy {f00=0x0057, f01=0x2008, f02=» AND AT LEAST ONE OF THEM MUST BE CHOOSEN 0 HMES ALTERNATIVE 4 MAY BE INCLUDED IF NEEDED 8 HEND l * HMES ILLEGAL PARAMETER COMBINATION !!! x * HMES FOLLOWING COMBINATIONS ARE VALID: " HMES 1 A,A+AU,A+AOUT,A+AU+AOUT " HMES 2 C,C+CU,C
0x114aa4…114c38 Dummy {f00=0x0057, f01=0x0190, f02=» m KB *T P 8w DY X P @ m KB F Z Z
0x114c38…114dcc Dummy {f00=0x0057, f01=0x0190, f02=» 8w DY CRT" @ P m KB z Z d z R R 2wbDI ?O_o 8
0x114dcc…114f60 Dummy {f00=0x0057, f01=0x0190, f02=» t 8w DY X P @ m KB F Z Z
0x114f60…1150f4 (1, 92) Dummy {f00=0x0057, f01=0x0190, f02=» A j A A : 9e9C) A I " 9A ! 9B r @ r A I ! ( : A A A A 4 A ! T A A I ! : 9E @ r s A I T ) A _ I N T : 4 9PJ S Y T@ $ 1T: C !CCTt
0x1150f4…115288 Dummy {f00=0x0057, f01=0x0190, f02=» 8_ !SST& 0 U R X A X W : @ ' R xW V W$ V P P W P V V T V T W P V W @ $ P p W T : A _ 0V , - P X 9A_ : @ ! P (W (
0x115288…11541c Dummy {f00=0x0057, f01=0x0190, f02=» j A A A A ! T A W Z A. c @ V W U R $ )_ : W W W W W `Q@ V V v
0x11541c…1155b0 Dummy {f00=0x0057, f01=0x0190, f02=» P L r `V U L _ V L Z K W W :K W r `Q R t `V v : V W V ) : V <B W |P v v : $ V |P v w v : V $
0x1155b0…115744 Dummy {f00=0x0057, f01=0x0190, f02=» 1 v W V z ` _f V : W R R P n W x _ V : " D Pd W V PL $;A^ D E D P. V P P T E _J E _T " D T E E D E % : " R ;B " R P(
0x115744…1158d8 Dummy {f00=0x0057, f01=0x0190, f02=» : W W W ?AP ^ 0 : W ; V : : , X G : J @ 0 V @ 0 H W : ? ? R 0 R P P B h _ x : V ) v : 4P: " D , H H $ M v b - I
0x1158d8…115a6c Dummy {f00=0x0057, f01=0x0190, f02=» D 4 Q |_d f = G $ R V W $ V E J K _N V r V :B A V 9n A @ A A , @ @ ! @ P P P P|_ _ @ 9N @ :b @ :b V W U6 T 9B
0x115a6c…115c00 Dummy {f00=0x0057, f01=0x0190, f02=» @ .V 3 S Y& P4 x x S P 3 _ x 3 x B A. @ D @ W x A : A y > l : R n W n V pT : N V l W H V ]"
0x115c00…115d94 (1, 93) Dummy {f00=0x0057, f01=0x0190, f02=» CW A4,DCTAB ALL ENTRIES CHECKED?? =3 * P RF(E) DCTP25 YES.DWT NOT IN TABLE =3 . P CWR* A6,A4 IN TABLE ?? =3 P RF(E) DCTP30 YES!! =3 ~ " P RB DCTP22 CHECK NEXT ENTRY =3 PDCTP25 EQU * =3 P $ P STR A6,A1 INSERT DWT IN DC:TAB
0x115d94…115f28 Dummy {f00=0x0057, f01=0x0190, f02=» P LDK A1,4 DEVICE END P ORS A1,DWTST,A6 ( P CF A15,INSSQ INSERT IN STATUS QUEUE 8 P XIF d PDCTP30 EQU * p P SUR A1,A1 RETURN CODE ::= 0 PENDIO EQU * $ P CF A15,TENDIO COMPLETE REQUEST P RB DCRTN P P*
0x115f28…1160bc Dummy {f00=0x0057, f01=0x0190, f02=»* PDCWR EQU * P IFT MMUPAG=1 $ P LD A1,ECBRL,A8 REQUESTED LENGTH 2 " P CWK A1,BUFLEN ILLEGAL LENGTH? Z P RF(G) IL:LEN YES!! P XIF P CF A15,TIMEWR SET TIMER P CF A15,INSWQ QUEUE REQUEST 2 P LD A1,DWTOR,A6 RESPONSE TO
0x1160bc…116250 Dummy {f00=0x0057, f01=0x0190, f02=»ECIFIC POLL DK7 r P RB DCRTN ! P* ! * P* ! 4 P* ! > P* READ ! H P* ! V P* ! ` P* COMPLETE WHEN: ! j P* MESSAGE RECEIVED ! P* TIME OUT ! P* ! P* ! PDCRD EQU * ! P LD A8,DWTECB,A6 GET ECB ! . P LD A4,DWTRQ,A6
0x116250…1163e4 Dummy {f00=0x0057, f01=0x0190, f02=» P ST A2,DWTRQ,A6 " P ADK A4,6 " " P LD A3,-4,A4 EFFECTIVE LENGTH " . P ST A3,ECBEL,A8 " T P " l P LDK A1,0 RESET RETURN CODE " t * P CF A15,DC:MIN MOV DATA TO USER BUFFER " P RB DCRTN " P " $ PDCRD10 CF A15,TIMERE START TIMER " P
0x1163e4…116578 Dummy {f00=0x0057, f01=0x0190, f02=»CW,A8 GET STATUS INFORMATION " P ANK A1,3 MASK DB,IR # $ P RF(Z) DCSS20 DEVICE END # @ PDCSS10 EQU * # ` P ST A1,DWTST,A6 # t P RB DCTP30 COMPLETE REQUEST # PDCSS20 EQU * # P LD A1,DWTST,A6 # P ANK A1,9 # ( P RB(Z) DCSS10 WACK HAS NOT
0x116578…11670c Dummy {f00=0x0057, f01=0x0190, f02=» P $ P $ P* $ " P* SET REQUEST TIMEOUT VALUE $ P* $ F P* $ P P $ Z PREQTIM EQU * $ b " P LD A2,ECBCW,A8 TIMEOUT VALUE $ v $ P ST A2,DWTTIM,A6 SAVE IT IN DWT $ P RB DCTP30 TENDIO & DISPATCH $ P $ P* $ ( P* ILLEGAL AP
0x11670c…1168a0 Dummy {f00=0x0057, f01=0x0190, f02=» $ t P % P* % P* % P* % & P* TIMER HANDLING PART % 0 P* % N P* % X P* % b P* READ TIMER=TIMERR % l P* % PTIMERE EQU * % P LDR A1,A6 % . P LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE % P RF(Z) TIME10 NO TIMING %
0x1168a0…116a34 (1, 94) Dummy {f00=0x0058, f01=0x0190, f02=»10 EQU * % P RF GBUF10 RETURN & P* & * P* TIMEOUT READ TIMER & 4 P* & P PTOUTRE EQU * & Z P LDR A6,A1 FETCH DWT & n P CM DWTTP,A6 & PTOUTR1 EQU * & " P LDK A1,/40 INDICATE TIME OUT & $ PTOUTR2 RB ENDIO COMPLETE REQUEST & P* &
0x116a34…116bc8 Dummy {f00=0x0058, f01=0x0190, f02=»G & z P ST A2,TIMWR ' P CF A15,SETIME ' P DATA TOUTWR ' 4 PTIMWR DATA 0 ' H P ST A4,DWTTP,A6 ' P RB TIME10 ' t P ' P* ' P* TIMEOUT WRITE TIMER ' P* ' PTOUTWR EQU * ' P LDR A6,A1 FETCH DWT ' P CM DWTTP,A6 ' * P C
0x116bc8…116d5c Dummy {f00=0x0058, f01=0x0190, f02=»A2,FDWTUT ' P CWR A2,A6 ( * P RB(NE) TOUTR1 THIS DWT IS NOT WRITING ( $ ( P CM XACK INDICATE 'ACK NOT EXPECTED' ( R P CM FDWTUT ( ~ P* ( P* ( P RB TOUTR1 ( P ( P* ( P* ( P* STOP REQUEST TIMING ( P* ( & P* REMAINING
0x116d5c…116ef0 Dummy {f00=0x0058, f01=0x0190, f02=»G ( x P LDR* A2,A2 ) " P NGR A2,A2 GET REMAINING TIME ) P CM* DWTTP,A6 STOP TIMER ) D P CM DWTTP,A6 ) d PCTIM10 EQU * ) x P RF GBUF10 ) P ) P* ) P* GET RECEIVE BUFFER ) P* ) $ P* CALLING SEQUENCE: CF A15,GRBUF ) P* A4=0 I
0x116ef0…117084 Dummy {f00=0x0058, f01=0x0190, f02=»2,DCRBUF RECEIVE BUFFERS ) PGBUF INH * P LDR* A4,A2 * 0 P RF(Z) GBUF10 NO BUFFER FREE * D . P LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN * h P STR A3,A2 * * PGBUF10 ADKL A15,4 ADJUST STACK POINTER * P ABR* A15 RETURN TO CALLER * P * P*
0x117084…117218 Dummy {f00=0x0058, f01=0x018e, f02=» A2,DCWRQ GET QUEUE ANCHOR * PINSWQ1 LDK A4,DWTWQ + " PINSWQ2 LDR* A3,A2 + > $ P RF(Z) INSWQ3 END OF QUEUE FOUND + X P LDR A2,A3 + P RB INSWQ2 + PINSWQ3 ADR A4,A6 + P STR A4,A2 INSERT IN QUEUE + " P CMR A4 INDICATE END OF QUEUE + P RB
0x117218…1173ac Dummy {f00=0x0058, f01=0x0190, f02=» + P* , * PREMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR , 2 PREM05 LDK A4,DWTWQ GET DWT-LINK TO BE REMOVED , @ PREM06 EQU * , v P ADR A4,A6 , PREM10 LDR* A3,A2 , & P RB(Z) GBUF10 NOT ON QUEUE: RETURN , P CWR A3,A4 , P RF(E) REM15 , P L
0x1173ac…117540 Dummy {f00=0x0058, f01=0x018e, f02=» P* - P* INSERT DWT IN STATUS QUEUE - P* - 2 P IFF STAT=0 - < P* A2,A3,A4 DESTROYED - P P* A6=DWT - l P* - | PINSSQ EQU * - ( P LD A2,0,A6 GET TERMINAL ADDRESS DK4 - * P ANK A2,/FF IF ADDRESS = 00 OR /7F DK4 - ( P RB(Z) GBUF10 DONT P
0x117540…1176d4 (1, 95) Dummy {f00=0x0058, f01=0x0190, f02=» P LD A2,0,A6 GET TCA DK5 . P ANK A2,/FF DK5 . $ 0 P SUK A2,LPDEV IF STATUS HANDLING DEVICE DK5 . < P RB(NZ) GBUF10 NO DK5 . p P XIF DK5 . P IFF STAT=0 DK5 . $ P LDKL A2,DCSTQ GET QUEUE ANCHOR . P LDK A4,DWTSQ . P RB INSWQ2 . P
0x1176d4…117868 Dummy {f00=0x0058, f01=0x0190, f02=»,DCSTQ GET QUEUE ANCHOR . P LDK A4,DWTSQ / P RB REM06 / 6 P XIF / H P / T P* / ^ P* / h $ P* QUEUE ALLOCATED RECEIVE BUFFER / r P* / P* A4=BUFFER ADDR / P* A2,A3 DESTROYED / P* / PQRBUF EQU * / P IFT MESPAS=1 / (
0x117868…1179fc Dummy {f00=0x0058, f01=0x018e, f02=» A2,DWTRQ BEGINNING OF RECEIVE QUEUE / PQR100 EQU * 0 , P LDR* A3,A2 0 @ $ P RF(Z) QR200 END OF QUEUE FOUND 0 T P LDR A2,A3 0 | P RB QR100 0 & PQR200 STR A4,A2 INSERT INTO QUEUE 0 " P CMR A4 INDICATE END OF QUEUE 0 P RTN A5 0 P 0
0x1179fc…117b90 Dummy {f00=0x0058, f01=0x0190, f02=» 0 ^ P* 1 PCKMESS LDKL A6,DW1500 1 P LD A1,DWTST,A6 1 0 P RF(N) CKM110 NO REQUEST 1 H P LDK A1,2 READ REQUEST ? 1 h P CW A1,DWTOR,A6 1 P RF(NE) CKM110 NO 1 $ P LD A8,DWTECB,A6 ECB ADDR TO A8 1 * P LD A3,DWTRQ,A6 A3=ADDR TO READ QUEUE
0x117b90…117d24 Dummy {f00=0x0058, f01=0x0190, f02=» ADDR INTO QUEUE 1 v " P ADK A3,6 MOVE POINTER TO TEXT 2 & P DONT DESTROY BUFFER ADDRESS =6 2 > P LD A4,-4,A3 2 h 0 P ST A4,ECBEL,A8 STORE NUMBERS OF CHARACTERS 2 | P LD A4,-2,A3 2 . P ST A4,ECBCW,A8 STORE LINE DEVICE ADDRESS 2 P 2 P LDK A1,0
0x117d24…117eb8 Dummy {f00=0x0058, f01=0x0190, f02=»JUST STACK POINTER 2 | P ABR* A15 RETURN 3 8 PCKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHECK STATUS 3 2 , P OR A1,DCONOF TAKE CARE OF POLL TIME OUT 3 n P CW A1,DCSTOL 3 P ST A1,DCSTOL 3 & P RB(E) CKM110 NO CHANGE OF STATUS 3 * P ORKL A1,/2000 INDIC
0x117eb8…11804c Dummy {f00=0x0058, f01=0x0190, f02=»************************************** 3 z P* 4 . P* ABORT ROUTINE 4 8 P* 4 R P************************ 4 P 4 | & PABORT LD A1,DWTTP,A6 TIMER POINTER 4 " P RF(Z) AB:10 NO TIMER RUNNING 4 P CM* DWTTP,A6 KILL TIMER 4 P CM DWTTP,A6 4 P
0x11804c…1181e0 Dummy {f00=0x0058, f01=0x0190, f02=») AB:RTN NO ACTION IF NOT READ/WRITE 4 P 5 , . P CF A15,REMOVW REMOVE DWT FROM WRITE QUEUE 5 4 & P LD A2,FDWTUT WRITING DWT ADDRESS 5 f P CWR A2,A6 5 P RF(NE) AB:RTN NOT THIS DWT 5 P CM XACK RESET ACK EXPECTED 5 P CM FDWTUT RESET WRITING DWT 5
0x1181e0…118374 (1, 96) Dummy {f00=0x0142, f01=0x0000, f02=»
0x118374…118508 Dummy {f00=0x0142, f01=0x0002, f02=»(X
0x118508…11869c Dummy {f00=0x0142, f01=0x0190, f02=» J F IDENT TCLASS REL 9.2 79-11-16 870105040920 TCLASSK R TCLASSK d DVKB00 x DVDY00 DVKB01 * & ! 1 DVTP01 DVDY01 DVKB0
0x11869c…118830 Dummy {f00=0x0142, f01=0x4094, f02=» " @ P 0 0 GH 1 2 * 4 0 | , : @ - ; A F N ~@ DVKB01 * & ! 1 DVTP01 DVDY01 DVKB0
0x118830…1189c4 Dummy {f00=0x0142, f01=0x4104, f02=» J F IDENT DVDY00 REL 9.2 79-11-16 870105040920 DVDY00K R DVDY00K d DYADN x * & DY % P @ 8 , 8 @ P
0x1189c4…118b58 Dummy {f00=0x0142, f01=0x0190, f02=» J F IDENT TCLASS REL 9.2 79-11-16 870105040920 TCLASSK R TCLASSK d DVKB00 x DVDY00 DVKB01 , ( H ! 1 DVTP01 DVDY01 DVK
0x118b58…118cec Dummy {f00=0x0142, f01=0x40b8, f02=» 3 " @ P 0 0 DVDY05 , IH 1 2 0 > < 8 ~ . < B P / = C Q b V @ ! 1 DVTP01 DVDY01 DVK
0x118cec…118e80 Dummy {f00=0x0142, f01=0x2008, f02=» L = KMD10 DATE = 83 11 11 1216PACK NBR = 0001
0x118e80…119014 (1, 97) Dummy {f00=0x0080, f01=0x0190, f02=»44 Z P* PX:B EQU 1 PWHATDY EQU 1 & P* : P* D 8 P* BY SETTING X:C TO 1 LOWER CASE CHAR. GENERATOR N & P* (COLUMNS 6 AND 7) CAN BE USED PX:C EQU 0 PLOWCHA EQU 0 P* P* 8 P* BY MEANS OF CONDITION
0x119014…1191a8 Dummy {f00=0x0080, f01=0x018e, f02=»ANT X:G=0 f P* PX:D EQU 0 PEORECH EQU 0 . P* B 0 P* BY SETTING THE CONSTANT TRASPA = 1 IT IS L @ P* POSSIBLE TO SUPPRESS TRAILING BLANKS, /12, /1E AND /1F. P* PX:E EQU 0 PTRASPA EQU 1 P EJECT P*
0x1191a8…11933c Dummy {f00=0x0080, f01=0x0190, f02=» < P* THIS DRIVER CAN BE ADAPTED TO MEMORY MANAGEMENT UNIT P* BY SETTING MMUPAG = 1 D P* f PMMUPAG EQU 1 p P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P*
0x11933c…1194d0 Dummy {f00=0x0080, f01=0x0190, f02=» CHARACTER SETS. h P P P* CODE COUNTRY ( P > P* 0 GB/NL/B F P* 1 D/A/L/CH Z P* 2 F/CH/B/L n P* 3 E P* 4 I/CH P* 5 S/SF P* 6 DK/N P* 7 P P* 8 YU P* 9 US PX:G EQU 0 PCOUNTRY EQU
0x1194d0…119664 Dummy {f00=0x0080, f01=0x0190, f02=»CT P* P* $ P******************************** $ P* DWT-DISPLACEMENT * F $ P******************************** n P* P* 0 PDWTDRD EQU /10 START OF DRIVER DEFINED PART P* P IFT MMUPAG=0 PSTART EQU
0x119664…1197f8 Dummy {f00=0x0080, f01=0x0190, f02=»ION POINTER r " PDWTPOS EQU START+/15 POSITIONS PDWTLIN EQU START+/14 LINES : & PDWTBIN EQU START+/16 BUFFER INDEX P* P EJECT P* P* P********** P* TABLES * P********** P* P* P DATA DVBLEN
0x1197f8…11998c Dummy {f00=0x0080, f01=0x0190, f02=»OUTINE ADDRESS ~ P DATA IHDY INTERRUPT HANDLER P DATA RCDY RECOVERY ROUTINE : . P DATA ECHODY DEVICE-DEPENDENT ECHO-ROUTINE ^ P* P* , PTABSPE EQU * TABLE OF SPECIAL CHARACTERS P DATA /0712,/131E,/1F14 P EJECT P*
0x11998c…119b20 Dummy {f00=0x0080, f01=0x0190, f02=»ISPLAY AND RETURN CODE b 2 P* IS SET IF DISPLAY NOT OPERABLE P* T P* ^ > P* ORDER 05: BASIC WRITE. CHARACTER ARE SENT TO DISPLAY h 6 P* FROM ECB-BUFFER WITHOUT ANY CHECK. P* F P* ORDER 06: STANDARD WR
0x119b20…119cb4 (1, 98) Dummy {f00=0x0082, f01=0x0190, f02=» A A P@ @ PB z z d . @ ! T A @ A # A . & RE RN ME MN W R, ( T ( W P T $ ; V ; W~&~ P &`P 6 P @ $ P $W $ TR PJ#~ > V . >A P Y X W ^ ? ?
0x119cb4…119e48 Dummy {f00=0x0082, f01=0x0190, f02=» " ^ T @ 9J A T _ 1@ _ ^ 9 V >! D A A > > > > > > > > ^ _ ^ _ ? ? ? ? ? A ^ @ ? ? > > > > > > > @ > ? ? ? ? ? ? ? A > A >
0x119e48…119fdc Dummy {f00=0x0082, f01=0x0190, f02=» 0:D A z_* A " A A b P & T A A " @ R _U . r " A >: D A > " A Z A ^ b$ T ! " A @ BT 0W 0W A @ BT 1W 1 @ " P& A UT @ W T @ W T @ W @ " " ? ?
0x119fdc…11a170 Dummy {f00=0x0082, f01=0x0190, f02=» ! R :W" r W r W W ?W /W : A W ! A A PL _ @ _ I T " T A P I T$! A A A A A A A A J A A @ A @ > @ _ . I d 0R> M A P6 T @
0x11a170…11a304 Dummy {f00=0x0082, f01=0x0190, f02=» H ( ( P c P W~ T P> , T6 L t M 0 - A t Q @ P A 2 T _ P, A V ( U P" @, V L, W @, U 2 A A Q > ? A ~ V _* 8 Q Z P 0 9 _ _, ? P
0x11a304…11a498 Dummy {f00=0x0082, f01=0x0190, f02=» ^ $P T I R $ 5 % > ? &W ? W ? T T$ U U U U T U U 2 > > 4 T - 1_( U T P 0 U _t ? @ rT 0 A r 1 Q Q > > 0 @ r 1 A r P P > ? * X " R" Y T
0x11a498…11a62c Dummy {f00=0x0082, f01=0x0190, f02=» W W > > > > > > @Q V ? Q > _ > ? _ > > ? ^ ! Y ^ _ ? A. $ ( , 0 4 8 < #M 1 A ~ _* 8 Q Z P 0 9 _ _, ? P
0x11a62c…11a7c0 Dummy {f00=0x0082, f01=0x0190, f02=» ^ $P T I R $ 5 % > ? W ? W ? T T U U U U T U U 2 > > 4 T - 1_( U T P 0 U _t ? @ T 0 A 1 Q Q > > 0 @ 1 P P > ? X " R Y
0x11a7c0…11a954 (1, 99) Dummy {f00=0x0082, f01=0x0190, f02=» 1 % E I L U ,| M (@ D >a @ <a H D P C 9b;BT C 0 @ # W( C UH R C W C R # R l _8 C # l p ' 2 ( B T :" U U F t M 0
0x11a954…11aae8 Dummy {f00=0x0082, f01=0x0190, f02=» J B B pU J BQB rU 6 z B " P Q :A H `P P H !@T I T ! 1 U A ? W A ? W A ? W X U R ; V d # T R
0x11aae8…11ac7c Dummy {f00=0x0082, f01=0x0190, f02=» X "0Tp+ Y WH 8Z $ 4 U R ] U # $P4> R0> 8' T Y X ' T P X P " >Wh 4 T # Y U T ] W 8V 4 X $P y $W $ + h P 8R R Y $ X Z ;BR 8% =A Y T
0x11ac7c…11ae10 Dummy {f00=0x0082, f01=0x0190, f02=» "X 8# T& 8Z V2 X # T 8R X $P y $ Y $ X ' X (@ L ' T 4X <d$ _D $?:D" Y X P Y # P 4T U d # P 4 4 P _r T _$ U _ ? 4 U 5 R PF "P2 R T T R X # X > P P
0x11ae10…11afa4 Dummy {f00=0x0082, f01=0x0190, f02=» D $ P #`P T E j_ " P T 8! P6 Y Y Y Y _8 X XB Y X X X X ' 4 B U B (" W C (@ > ?" 8' ?A Z R 8;b# 4T RT T T ] ] 8 W< TrW T ] _ P T V WT 8V T P
0x11afa4…11b138 Dummy {f00=0x0082, f01=0x0190, f02=» Y _: @ X T P XX R4 @ U S U t " D P D T U W _ U 4XR XX 5 _b Y Y Y X 9BV$ X & Y " X D V * X T 8TV 9WD B 7P P A W A @ A.W ? A I.9 " X
0x11b138…11b2cc Dummy {f00=0x0082, f01=0x0190, f02=» * T E j_ " P T 8! P Y Y Y Y _8 X XB Y X X X X ' 4 B U B (" W C (@ > ?" 8' ?A Z R 8;b# 4T R T T ] ] 8 W T W T ] _ P T V W 8V T P
0x11b2cc…11b460 Dummy {f00=0x0082, f01=0x0190, f02=» Y _: @ X T P XX R4 @ U S U PR " 0 P B :b9B Y D ) Y F X Y >:g H $ ! P P P P !! W B B # L Y :e X BY, X @P& Y @ ! 9 R ! 9 R Y @ Wb P UH
0x11b460…11b5f4 (1, 100) Opaque[0x194]
0x11b5f4…11b788 # DirEnt {nam=»SCLASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b10, f03=0x0000}
0x11b5f4…11b788 IdxSect {
0x11b5f4…11b788 f00 = 0x0058 // 0x11b5f4 @0x0
0x11b5f4…11b788 f01 = 0x0004 // 0x11b5f6 @0x2
0x11b5f4…11b788 gno = [ // 0x11b5f8 @0x4
0x11b5f4…11b788 [0x00]: C0x0058.0x2.0
0x11b5f4…11b788 [0x01]: C0x0058.0x3.0
0x11b5f4…11b788 ]
0x11b5f4…11b788 }
0x11b788…11b91c Dummy {f00=0x0058, f01=0x018e, f02=» 2 P IDENT SCLASS REL 9.2 79-11-16 870105040920 P : P* B P* L P ENTRY SCLASS V P* l P* v P EXTRN DWSI01 P EXTRN DWSO01 P EXTRN DWII01 P EXTRN DWIO01 P
0x11b91c…11bab0 Dummy {f00=0x0058, f01=0x0190, f02=» v P EXTRN DWFD01 P* P* ( P* 2 P* < PSCLASS DATA TCLASE-* F P DATA TC00 b P DATA TC01 P DATA TC02 P DATA TC03 P DATA TC04 P DATA
0x11bab0…11bc44 Dummy {f00=0x0058, f01=0x018e, f02=» DATA /0011 P DATA DWSO01 PTC00E EQU * < PTC01 DATA TC01E-* X P DATA /00E0 z P DATA DWII01 PTC01E EQU * PTC02 DATA TC02E-* P DATA
0x11bc44…11bdd8 Dummy {f00=0x0058, f01=0x0190, f02=» v P DATA DW1501 PTC03E EQU * ( PTC04 DATA TC04E-* D P DATA /0080 f P DATA DWLP01 PTC04E EQU * PTC05 DATA TC05E-* P DATA /0060 P
0x11bdd8…11bf6c Dummy {f00=0x0058, f01=0x40f2, f02=» /01F1 P DATA DWDU01 P DATA /00F8 & P DATA DWFD01 : P DATA /01F9 N P DATA DWFD01 b P DATA /02FA v P DATA DWFD01 P DATA /03FB P DATA DWFD01 PTC05E EQU * P END @ /0060 P
0x11bf6c…11c100 Dummy {f00=0x0058, f01=0x2008, f02=» NT TCLASS * * $ * . ENTRY TCLASS 8 * N * X * b * l * v * * TCLASS DATALTCLASE-* TCLASE EQU * END @ 1 INTLT2 INTRT1
0x11c100…11c294 (1, 101) Dummy {f00=0x0058, f01=0x0190, f02=» ! 8 ! X ! 9a DT ! X ! P ! T & ! _P B J B ! ! 4 A TVJ T AT T P 4 ! T A TV_ I " P AT~ Q` T AQ( S 4 A _$B P W T< " * 9AY X 2 _ ![ 9AP ^ 2 _ " ! 1 4 A[ @ ` @ P 0 M A[
0x11c294…11c428 Dummy {f00=0x0058, f01=0x0022, f02=» P X ` h p x
0x11c428…11c5bc Dummy {f00=0x0058, f01=0x0190, f02=» Z x x x x x x ` x xN O H x R x x x x x x H x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x ~ c @ Tg t z ^ b bLPL H b2 Z ` z
0x11c5bc…11c750 Dummy {f00=0x0058, f01=0x0190, f02=» 4c @S{ D d 2Z $"z y B % y D Dbf d * F :P }B W [~ ? d j% L "~ T &b ICn 1 d _ A t " lp _ @lp > > U # T @ x H ( ( P c P W~ T P> , T6 L lD M 0 - AlD Q @ ~P A ~
0x11c750…11c8e4 Dummy {f00=0x0058, f01=0x0190, f02=» A D ^_* F 8 lv Q Z P 0 9 _ 4 P _, ? P H H #P x A t A VQ ? @ln J ) Aln_ P P A X 8 Alp_ ? ? ? ? ? ^ A _ _ ^ ln $P T I R $ 5 % > ? W ? W ? T T$
0x11c8e4…11ca78 Dummy {f00=0x0058, f01=0x0190, f02=»T ~ 0 AlB 1 Q Q > > 0 @lB 1 AlB P P > ? * X " R" Y T ? X D T> @ W8 > _& @ 8 R" Y T ? X D T @ W > _& W2 > 8 X W( ? ` @ @ P $ H W W > > > > > > @D V ? D > _ > ? _ > > ? ^ ! Y ^
0x11ca78…11cc0c Dummy {f00=0x0058, f01=0x0190, f02=» A D _* F 8 Q Z P 0 9 _ 4 _, ? P H H #P x A A VQ ? @ J ) A _ P P A X A _ ? ? ? ? ? ^ A _ _ ^ $P T I R $ 5 % > ? W ? W ? T T
0x11cc0c…11cda0 Dummy {f00=0x0058, f01=0x0190, f02=»T ~ 0 A 1 Q Q > > 0 @ 1 P P > ? X " R" Y #L 1 $ $V D A ~( @lF lDX H AlF ) @ H P 1 % E I L U M (@ D >a @ <a H D |
0x11cda0…11cf34 (1, 102) Opaque[0x194]
0x11cf34…11d0c8 # DirEnt {nam=»MONTAB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b20, f03=0x0000}
0x11cf34…11d0c8 IdxSect {
0x11cf34…11d0c8 f00 = 0x0059 // 0x11cf34 @0x0
0x11cf34…11d0c8 f01 = 0x0002 // 0x11cf36 @0x2
0x11cf34…11d0c8 gno = [ // 0x11cf38 @0x4
0x11cf34…11d0c8 [0x00]: C0x0059.0x0.0
0x11cf34…11d0c8 ]
0x11cf34…11d0c8 }
0x11d0c8…11d25c Dummy {f00=0x0059, f01=0x0190, f02=» 2 P IDENT MONTAB REL 9.2 79-11-16 870105040920 P : P* B 6 P* THIS TABLE CONTAINS ADDRESSES TO CONFIGURATION L P* DEPENDENT MONITOR TABLES P* P* P ENTRY MONTAB,SPDLCI P ENTRY FREQUE P ENTRY PAGQUE P E
0x11d25c…11d3f0 Dummy {f00=0x0059, f01=0x0190, f02=» INTRT3 P ENTRY INTRT4 P* & P EXTRN SYSLOD 0 P**** F P EXTRN CTAB01 R P EXTRN CTAB02 h P EXTRN CTAB03 ~ P EXTRN ITAD P EXTRN KBAD3 P EXTRN TPAD P EXTRN GPAD P EXTRN DIAD P EXTRN DYAD
0x11d3f0…11d584 Dummy {f00=0x0059, f01=0x0190, f02=» PINTLT3 DATA 0 PINTLT4 DATA 0 PINTRT1 DATA 0 0 PINTRT2 DATA 0 F PINTRT3 DATA 0 PINTRT4 DATA 0 r P DATA SYSLOD P**** P DATA CTAB01 P DATA CTAB02 P DATA CTAB03 P DATA ITAD P DATA KBAD
0x11d584…11d718 Dummy {f00=0x0059, f01=0x4018, f02=» d P END @ PINTLT4 DATA 0 PINTRT1 DATA 0 0 PINTRT2 DATA 0 F PINTRT3 DATA 0 PINTRT4 DATA 0 r P DATA SYSLOD P**** P DATA CTAB01 P DATA CTAB02 P DATA CTAB03 P DATA ITAD P DATA KBAD
0x11d718…11d8ac Dummy {f00=0x0059, 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
0x11d8ac…11da40 Dummy {f00=0x0059, f01=0x018e, f02=» < P IFT NUNITS+TYPE2=3 = P DATA MAXCY6 MAX CYLINDER NO = $ P XIF = H P* = T P IFT NUNITS=2 = ^ P IFT MMUPAG=1 = t * P DATA 0 PAGE NUMBER (PSEUDO MMU TABLE) = * P DATA 0 16 BIT LOGICAL BUFFER ADDRESS = PECBDU2 EQU * = P DATA 0,0,0,0,
0x11da40…11dbd4 (1, 103) Opaque[0x194]
0x11dbd4…11dd68 # DirEnt {nam=»SYSTAB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b28, f03=0x0000}
0x11dbd4…11dd68 IdxSect {
0x11dbd4…11dd68 f00 = 0x0059 // 0x11dbd4 @0x0
0x11dbd4…11dd68 f01 = 0x0006 // 0x11dbd6 @0x2
0x11dbd4…11dd68 gno = [ // 0x11dbd8 @0x4
0x11dbd4…11dd68 [0x00]: C0x0059.0x1.0
0x11dbd4…11dd68 [0x01]: C0x0059.0x2.0
0x11dbd4…11dd68 [0x02]: C0x0059.0x3.0
0x11dbd4…11dd68 ]
0x11dbd4…11dd68 }
0x11dd68…11defc Dummy {f00=0x0059, f01=0x0190, f02=» 2 P IDENT SYSTAB REL 9.2 79-11-16 870105040920 P : P* B P* L 8 P*************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P* SYSTAB = INTERRUPT VECTORS, SYSTEM CONTROL 2 P*
0x11defc…11e090 Dummy {f00=0x0059, f01=0x0190, f02=»*************** l P* P* " P , P 4 P < P D P L P T P P d P l P t P | P P P EJECT SYSTAB P P 4 P ENTRY SCTMSZ,SCTSFA,SCTEFA SYSTEM CONTROL TABLE P ENTRY SCTPLD
0x11e090…11e224 Dummy {f00=0x0059, f01=0x0190, f02=» SCTMMP,SCTLAP,SCTNPE P ENTRY SCTSTB P ENTRY SCTOPT 4 P ENTRY SCTTCT,SCTCDT J P ENTRY SCTBUG f & P ENTRY SCTDMT,SCTDMI,SCTDML,SCTDMC | P ENTRY SCTBLK,SCTDCT & P ENTRY SEG:ST,SEG:DS,SEG:EL,SEG:PB & P ENTRY PAG:QF,PAG:QB,PAG:PA,
0x11e224…11e3b8 Dummy {f00=0x0059, f01=0x0190, f02=»O RESTART r P EXTRN IHLKM LKM INTERRUPT P EXTRN IHRTC REAL TIME CLOCK 4 P EXTRN IH1501 X P EXTRN IH1502 x ( P EXTRN IHSOP SYSTEM OPERATORS PANEL P P P P P * P EXTRN CHRT1 REMOTE CHANNEL
0x11e3b8…11e54c Dummy {f00=0x0059, f01=0x0190, f02=» EXTRN IHLP LINE PRINTER P EXTRN IHDU1 DISC UNIT NO. 1 $ P EXTRN ILLINT ILLEGAL INTERRUPT D P EXTRN HALT HALT ROUTINE l P* EXTRN BUG DEBUGGER PX:A EQU 0 MONITOR OPTION ( PX:B EQU 0 DATA MAN .TASKS IN SYSTEM * PX:C EQU 0 DM INDEX R
0x11e54c…11e6e0 Dummy {f00=0x0059, f01=0x0190, f02=»TEM x P* 6 P* DISPLACEMENTS IN SEGTAB, PAGTAB, SWBTAB AND T:A P* P PSEG:ST EQU 0 STATUS Z $ PSEG:DS EQU 2 DISC SECTOR ADDRESS v " PSEG:EL EQU 4 EFFECTIVE LENGTH $ PSEG:PB EQU 6 PAGE BLOCK ADDRESS P* & PPAG:QF EQU 0 QUEUE
0x11e6e0…11e874 (1, 104) Dummy {f00=0x0059, f01=0x0190, f02=» n P* 2 PSWB:NC EQU 0 NUMBER OF COPIES WITHIN SWB TYPE 2 PSWB:DS EQU 2 DISC SECTOR ADDRESS OF FIRST COPY H $ PSWB:EL EQU 4 SWB LENGTH (BYTES) ~ & PSWB:NS EQU 6 SWB LENGTH (SECTORS) P* ( PT:ACSB EQU -12 CURRENT SEGMENT BASE P E
0x11e874…11ea08 Dummy {f00=0x0059, f01=0x0190, f02=»C 2 P DATA ILLINT 3 P DATA ILLINT 4 . P DATA ILLINT 5 J P DATA ILLINT 6 f P DATA ILLINT P DATA ILLINT P DATA IHSOP 9 P DATA ILLINT 10 P DATA ILLINT
0x11ea08…11eb9c Dummy {f00=0x0059, f01=0x0190, f02=»RT1 16 P DATA CHRT2 17 P DATA ILLINT 0 P DATA ILLINT P P DATA ILLINT p P DATA ILLINT P DATA ILLINT 22 P DATA ILLINT P DATA CHLT1 24 P
0x11eb9c…11ed30 Dummy {f00=0x0059, f01=0x0190, f02=» 29 P DATA IHFD P DATA ILLINT 31 . P DATA ILLINT 32 J P DATA ILLINT 33 f P DATA IHLP 34 P DATA ILLINT P DATA ILLINT 36 P DATA ILLINT 37 P DATA ILLINT 38
0x11ed30…11eec4 Dummy {f00=0x0059, f01=0x0190, f02=» 43 P DATA ILLINT P DATA ILLINT 45 0 P DATA ILLINT 46 L P DATA ILLINT 47 h P DATA ILLINT 48 P DATA ILLINT 49 P DATA ILLINT 50 P DATA ILLINT 51 P DATA ILLINT 52
0x11eec4…11f058 Dummy {f00=0x0059, f01=0x018e, f02=» 57 P DATA ILLINT 58 P DATA ILLINT 59 ( P DATA ILLINT 60 D P DATA ILLINT 61 ` P DATA ILLINT 62 | P DATA TRAP TRAP ROUTINE P EJECT SYSTAB P P* " P* SYSTEM CONTROL TABLE POINTER P
0x11f058…11f1ec Dummy {f00=0x0059, f01=0x0190, f02=» P HLT P P* P* DEBUG RESTART ENTRY & P* D P XRR A13,A13 N P XRR A14,A14 b P LD A1,SCTBUG v P ABR(NZ) A1 P HLT P P EJECT SYSTAB P P* P* SYSTEM CONTROL TABLE P* P
0x11f1ec…11f380 Dummy {f00=0x0059, f01=0x0190, f02=»END OF FREE AREA & PSCTPLD DATA 0 PROGRAM LOAD DEVICE ( P C0,C1 CAS F0,F1 DISC F8,F9 FLOPP B $ PSCTANO DATA 0 APPLICATION NUMBER n 2 PSCTADA DATA 0 APPLICATION DISC SECTOR ADDRESS PSCTPAG DATA 0 PAGTAB ADDRESS PSCTSEG DATA 0 SEGTAB ADD
0x11f380…11f514 (1, 105) Dummy {f00=0x0059, f01=0x0190, f02=»A 0 PAGE SIZE . PSCTMMC DATA 0 MMU TABLE COMMON PART ENTRY P INDEX REL TTAB H 0 PSCTLAC DATA 0 LOGICAL ADDRESS OF COMMON PART b & PSCTMMP DATA 0 MMU TABLE PAGE ENTRY P INDEX REL TTAB * PSCTLAP DATA 0 LOGICAL ADDRESS OF PAGES ( P
0x11f514…11f6a8 Dummy {f00=0x0059, f01=0x0190, f02=»ASSOLY,14:DSKPAG,15:MMUPAG PSCTTCT DATA 0 TCTAB ADDRESS " PSCTCDT DATA 0 CDTAB ADDRESS F PSCTBUG DATA 0 DEBUGGER j ( PSCTDMT DATA 00001 DMTASKS IN SYSTEM P BIT 13:D2,14:D1,15:D0 2 PSCTDMI DATA 00004 DM INDEX RECORD BUFFER SIZE *
0x11f6a8…11f83c Dummy {f00=0x0059, f01=0x414a, f02=» ( PSCTDCT DATA 00001 DC-TASK IN SYSTEM P EJECT SYSTAB 0 P H P* P P* SYSTEM STACK Z P* p P RES 145 z P DATA /FCC0 AND PSW & PSTB DATA LOOP AND PC FOR IDLE LOOP P P P* P* IDLE LOOP P* P
0x11f83c…11f9d0 Dummy {f00=0x0059, 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
0x11f9d0…11fb64 Dummy {f00=0x0059, f01=0x0190, f02=» W W V V >k 8 W W t V V : x A P W r W @ @ % b V , P@ , - 4 ] 4 `Y 5 X * _6 : @ & ] @ P @ P
0x11fb64…11fcf8 Dummy {f00=0x0059, f01=0x0190, f02=» @ " P #D " P #E " P #F : @ " P @ P 3 _ @ " P S 1 S 9J S ( 3 ( 9B @ @ T : @ :B W . !TTP W t N =H N W l N =H N W p N =H N W | ( @ %
0x11fcf8…11fe8c Dummy {f00=0x0059, f01=0x0190, f02=» " U _2 V V tPJ S ( V | S =J @ " S V l S W l V p S W p W _L @ % P W @ % P & !TTT , @ @ T : @ ! P @ @ R CRT 3
0x11fe8c…120020 Dummy {f00=0x0059, f01=0x0190, f02=» YL @ @ T : x ` @ P _ 3 S S V V W @ @ T : P S S _ : . !TTP V W t * P r _
0x120020…1201b4 (1, 106) Opaque[0x194]
0x1201b4…120348 # DirEnt {nam=»TDISP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b40, f03=0x0000}
0x1201b4…120348 IdxSect {
0x1201b4…120348 f00 = 0x005a // 0x1201b4 @0x0
0x1201b4…120348 f01 = 0x0008 // 0x1201b6 @0x2
0x1201b4…120348 gno = [ // 0x1201b8 @0x4
0x1201b4…120348 [0x00]: C0x005a.0x0.0
0x1201b4…120348 [0x01]: C0x005a.0x1.0
0x1201b4…120348 [0x02]: C0x005a.0x2.0
0x1201b4…120348 [0x03]: C0x005a.0x3.0
0x1201b4…120348 ]
0x1201b4…120348 }
0x120348…1204dc Dummy {f00=0x005a, f01=0x0190, f02=» 0 P IDENT TDISP REL 9.2 79-11-16 870105040920 P 8 P* @ P* J 6 P************************************************** T P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TDISP = TOSS DISPATCHER P* P* P*
0x1204dc…120670 Dummy {f00=0x005a, f01=0x0190, f02=»PATCHER IN TOSS. x > P* ENTRY POINT IS 'TDISP' WITH 8 REGISTERS ON A15 STACK. > P* THE DISPATCHER CHECKS IF THERE IS A TASK IN DISPATCHER Z < P* QUEUE WITH HIGHER PRIORITY THAN INTERRUPTED PROGRAM. : P* - IF SO, THE RUNNING TASK IS QUEUED AND
0x120670…120804 Dummy {f00=0x005a, f01=0x0190, f02=»TRY 'DISEND' CALLS TENDIO BEFORE TDSIP P* . 6 P* ENTRY 'DISIOE' SETS BIT 0 IN A1 BEFORE DISEND. 8 P* r 8 P* ENTRY 'MEXIT' EXITS A MONITOR TASK BEFORE TDISP. | P* D P* ENTRY 'RETUR8' LOADS 8 REGISTERS FROM A15 STACK AND RETURNS.
0x120804…120998 Dummy {f00=0x005a, f01=0x0190, f02=»NTRY TDISP DISPATCHER ENTRY ( P ENTRY MEXIT EXIT FOR MONITOR TASKS $ " P ENTRY DISIOE I/O ERROR ENTRY P & P ENTRY DISEND END I/O AND DISPATCH v 8 P ENTRY DISQUE POINTER TO FIRST PLACE IN DISP. QUEUE 0 P ENTRY PRUN TTAB ADDRESS OF RUNNING PROGRAM
0x120998…120b2c Dummy {f00=0x005a, f01=0x018e, f02=» P************* P* P* ( P EXTRN TTB:SA SAVE AREA 2 P EXTRN TTB:ST STATUS R & P EXTRN TTB:PW PROGRAM STATUS WORD n P EXTRN TTB:MT MMUTAB ( P EXTRN TTB:SB SEGMENT BLOCK ADDRESS , P EXTRN SEG:PB SEGMENT PAGE BLOCK ADDRESS
0x120b2c…120cc0 Dummy {f00=0x005a, f01=0x018e, f02=» d P EXTRN TENDIO END I/O P EXTRN EXIT PROGRAM EXIT & 2 P EXTRN QLTDSK ACTIVATE LDTASK AT ENTRY LT:DSK F . P EXTRN SCTLAP LOGICAL ADDRESS OF CODE PAGE | & P EXTRN SCTMMP MMU TABLE PAGE ENTRY ( P EXTRN SCTNPE NUMBER OF PAGE ENTRIES P EJE
0x120cc0…120e54 (1, 107) Dummy {f00=0x005a, f01=0x0190, f02=» . P***************************************** P* 6 . P* A PROGRAM VERSION USING TOSS MMU PAGING @ * P* IS OBTAINED BY SETTING MMUPAG EQU 1. r P* PMMUPAG EQU 1 P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION
0x120e54…120fe8 Dummy {f00=0x005a, f01=0x0190, f02=»ISC PAGING p * &* IS OBTAINED BY SETTING DSKPAG EQU 1. * @ PDSKPAG EQU 1 J * ^ P* h @ P* A PROGRAM VERSION PREVENTING SEGMENTS TO MOVE WHEN HAVING r > P* APPLICATION TASKS AT DIFFERENT PRIORITY LEVELS USING THE 8 P* SAME SEGMENT I
0x120fe8…12117c Dummy {f00=0x005a, f01=0x018e, f02=»VERLAY f * P* IS OBTAINED BY SETTING ASSOLY EQU 1 P* < PASSOLY EQU 0 F P* Z P EJECT TDISP d P* z P* D I S Q U E P* 2 P* POINTER TO FIRST PLACE IN DISPATCHER QUEUE P* PDISQUE DATA 0 P* P*
0x12117c…121310 Dummy {f00=0x005a, f01=0x0190, f02=» P* R E T U R 8 P* . P* LOAD 8 REGISTERS FROM STACK AND RETURN * P* PRETUR8 EQU * f P z P IFT CPU852=0 P MLR 8,A15 P XIF P P IFT CPU852=1 P LDR* A8,A15 P LDR* A7,A15 P LDR* A6,A15
0x121310…1214a4 Dummy {f00=0x005a, f01=0x0190, f02=» P EJECT TDISP P P* & P* M E X I T 0 P* F 0 P* DO EXIT ON MONITOR TASK AND GO TO TDISP P P* PMEXIT INH P LD A5,PRUN P CF A15,EXIT P CM PRUN P RF TDISP P P* P* D I S I
0x1214a4…121638 Dummy {f00=0x005a, f01=0x0190, f02=»* D I S E N D P* $ P* CALL TENDIO AND GO TO TDISP " P* J PDISEND CF A15,TENDIO T P EJECT TDISP p P* P* T D I S P P* $ P* THIS IS THE DISPATCHER ENTRY P* PTDISP INH & P LC A1,18,A15 LOAD P
0x121638…1217cc Dummy {f00=0x005a, f01=0x0190, f02=»CHER QUEUE P* PTDISCQ LDKL A2,DISQUE P LDR* A3,A2 : P RB(Z) RETUR8 QUEUE EMPTY N P p P LD A5,PRUN x $ P RF(Z) TDCQ10 IDLE LOOP RUNNING & P LD A4,TTB:ST+1,A5 COMPARE RUNNING 4 P CC A4,TTB:ST+1,A3 AND QUEUED TASK'S PRIOR
0x1217cc…121960 Dummy {f00=0x005a, f01=0x0190, f02=» P P IFT DSKPAG=1 , P LD A1,TTB:SB,A3 GET SEGMENT BLOCK ADDR " P RF(Z) TDISSW NONE R P LDR* A7,A1 l P RF(N) TDISSW SEGMENT LOADED 2 P CF A15,QLTDSK SEGM NOT LOADED QUEUE LOAD TASK & P RB TDISCQ TAKE NEXT TASK INSTEAD P XIF
0x121960…121af4 (1, 108) Dummy {f00=0x005a, f01=0x0190, f02=»D RUNNING TASK ~ P RF(Z) TDISST IDLE LOOP P 6 . P ADK A6,0 QUEUE OLD TASK FIRST ON PRIORITY > P RF(Z) TDSW20 EMPTY QUEUE p 0 PTDSW10 CC A4,TTB:ST+1,A6 COMPARE PRIORITIES 0 P RF(NG) TDSW20 SAME OR LOWER PRIORITY FOUND P LDR A2,A6
0x121af4…121c88 Dummy {f00=0x005a, f01=0x0190, f02=» ST A14,TTB:SA+28,A5 SAVE REGISTERS P LDR A14,A5 , P @ P IFT CPU852=0 H P MLR 8,A15 ^ P MS 13,TTB:SA+2,A14 p P MLR 2,A15 P P XIF P IFT CPU852=1 P LDR* A8,A15 P LDR* A7,A15 P LDR* A6,A15 P LDR
0x121c88…121e1c Dummy {f00=0x005a, f01=0x0190, f02=»B:SA+24,A14 P ST A11,TTB:SA+22,A14 P ST A10,TTB:SA+20,A14 2 P ST A9,TTB:SA+18,A14 P P ST A8,TTB:SA+16,A14 l P ST A7,TTB:SA+14,A14 P ST A6,TTB:SA+12,A14 P ST A5,TTB:SA+10,A14 P ST A4,TTB:SA+8,A14 P ST A3,TTB:SA+6,
0x121e1c…121fb0 Dummy {f00=0x005a, f01=0x0190, f02=»TB:SA,A14 AND PC & P ST A2,TTB:PW,A14 AND PSW IN TTAB P IFT DSKPAG+DIFPRI=2 B P ^ * P LD A1,TTB:SB,A14 GET SEGM BLOCK ADDR f P RF(Z) TDISST NONE P LDR* A2,A1 GET SEGM STATUS P LDKL A3,/1000 , P TM A2,A3 CHECK IF SEGM USED BY
0x121fb0…122144 Dummy {f00=0x005a, f01=0x018e, f02=»AT IT WAS THIS TASK x P XIF P EJECT TDISP ( P* > P* START NEW TASK H P* ` PTDISST LD A14,PRUN j P IFT DSKPAG=1 P * P LD A1,TTB:SB,A14 GET SEGM BLOCK ADDR P RF(Z) TDST30 NONE ( P LD A4,SEG:PB,A1 GET PAGE BLOC
0x122144…1222d8 Dummy {f00=0x005a, f01=0x0190, f02=» P IFT DSKPAG+DIFPRI=2 P $ ( P LDR* A2,A4 CHECK IF PAGE IN PAGQUE , P RF(NZ) TDST10 YES X " P LDR* A3,A1 NO GET SEGM STATUS r 2 P ANKL A3,/1000 CHECK IF SEGM USED BY INT TASK P RF(Z) TDST20 NO 4 P CW A14,PAG:QB,A4 YES CHECK IF IT
0x1222d8…12246c Dummy {f00=0x005a, f01=0x018e, f02=» DSKPAG=1 P 2 PTDST10 LD A3,PAG:QB,A4 TAKE PAGE OUT OF QUEUE P STR A2,A3 P P ST A3,PAG:QB,A2 b P CMR A4 z P , PTDST20 LD A1,PAG:PA,A4 GET PAGE ADDRESS ( P LD A5,TTB:SA+26,A14 AND T:A ADDRESS P P IFT MMUPAG=1
0x12246c…122600 Dummy {f00=0x005a, f01=0x0190, f02=» , P LD A4,SCTNPE AND GET NUMBER OF ENTRIES P 4 2 PTDST22 SCR A2,A3 UPDATE MMU TABLE JUST IN CASE < P SUK A4,1 r P RF(Z) TDST25 P ADK A2,4 P ADK A3,2 P RB TDST22 P PTDST25 EQU * P IFT ASSOLY=0 " P TL TT
0x122600…122794 (1, 109) Dummy {f00=0x005a, f01=0x0190, f02=»,T:ACSB,A5 P RF TDST35 P $ P XIF , P IFT DSKPAG-MMUPAG=1 8 4 P ST A1,T:ACSB,A5 UPDATE BASE IN T:A JUST IN CASE T P XIF P PTDST30 EQU * P IFT MMUPAG=1 " P TL TTB:MT,A14 LOAD MMU TABLE P XIF P & PTDST
0x122794…122928 Dummy {f00=0x005a, f01=0x0190, f02=» n & P ML 14,TTB:SA+2,A14 LOAD REGISTERS P 2 P XIF : P IFT CPU852=1 F P P STR A1,A15 PUT PC d P STR A2,A15 AND PSW ON STACK ~ & P LD A1,TTB:SA+2,A14 LOAD REGISTERS P LD A2,TTB:SA+4,A14 P LD A3,TTB:SA+6,A14 P LD
0x122928…122abc Dummy {f00=0x005a, f01=0x4106, f02=» LD A9,TTB:SA+18,A14 P LD A10,TTB:SA+20,A14 P LD A11,TTB:SA+22,A14 : P LD A12,TTB:SA+24,A14 X P LD A13,TTB:SA+26,A14 v P LD A14,TTB:SA+28,A14 P P XIF P P RTN A15 START THE TASK P P END @ D
0x122abc…122c50 Dummy {f00=0x005a, 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
0x122c50…122de4 Dummy {f00=0x005a, f01=0x0190, f02=» IHTWN IHTCN , ( IHSOP N CHLT1 ^ IHFDN n CHRT1 ~ , ( CHRT2 CHRT3 CHRT4 IHCC1 IHCC2
0x122de4…122f78 Dummy {f00=0x005a, f01=0x018e, f02=» $ & ~ IHLPN IHCRN . IHDU1 > , ( A ( * N IHDU2 ~ IHMTN , ( Q , . 0 , ( a IHINPTI
0x122f78…12310c Dummy {f00=0x005a, f01=0x0190, f02=» SCTEFA SCTPLD SCTANO , SCTADA @ SCTPAGL T , ( @ h SCTSEG SCTSWB SCTNOS SCTNOP SCTPSZ SCTMMC
0x12310c…1232a0 Dummy {f00=0x005a, f01=0x414e, f02=»T SCTCDT bBUG SCTBUG~ . , ( 6 B SCTDMT r SCTDMI SCTDML SCTDMC SCTBLK SCTDCT
0x1232a0…123434 (1, 110) Opaque[0x194]
0x123434…1235c8 # DirEnt {nam=»LRPINT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b60, f03=0x0000}
0x123434…1235c8 IdxSect {
0x123434…1235c8 f00 = 0x005b // 0x123434 @0x0
0x123434…1235c8 f01 = 0x000a // 0x123436 @0x2
0x123434…1235c8 gno = [ // 0x123438 @0x4
0x123434…1235c8 [0x00]: C0x005b.0x0.0
0x123434…1235c8 [0x01]: C0x005b.0x1.0
0x123434…1235c8 [0x02]: C0x005b.0x2.0
0x123434…1235c8 [0x03]: C0x005b.0x3.0
0x123434…1235c8 [0x04]: C0x005c.0x0.0
0x123434…1235c8 ]
0x123434…1235c8 }
0x1235c8…12375c Dummy {f00=0x005b, f01=0x0190, f02=» 2 P IDENT LRPINT 9.2DK 1 79-11-16 870105040920 P : P =DK1, HANGING REM. TERM. B P 80-03-11 f P* z P* 6 P************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P*
0x12375c…1238f0 Dummy {f00=0x005b, f01=0x0190, f02=»************************************************** P* : P* D : P* THIS MODULE CONTAINS MANDATORY INTERRUPT HANDLERS N P* FOR TOSS. THESE ARE: P* P* -IHLKM: LKM INTERRUPT P* P* -IHRTC: RTC INTERRUPT P*
0x1238f0…123a84 Dummy {f00=0x005b, f01=0x0190, f02=»THESE ARE: P* 4 P* -LKMRQE: SET A7 = -1, QUEUE JOB AND DISPATCH P* T ( P* -LKMQDI: QUEUE JOB AND DISPATCH ^ P* P EJECT LRPINT P* P* P*********** P* ENTRIES * P*********** P* P*
0x123a84…123c18 Dummy {f00=0x005b, f01=0x0190, f02=»R r 4 P ENTRY LKMERR HALT SYSTEM DUE TO FATAL LKM ERROR ( P ENTRY LKMQDI QUEUE JOB AND DISPATCH B & P ENTRY IHRTC RTC INTERRUPT HANDLER n 8 P ENTRY TIMQUE POINTER TO FIRST BLOCK IN TIMER QUEUE P ENTRY MONCLO MONITOR CLOCK 2 P ENTRY IHPFAR PO
0x123c18…123dac Dummy {f00=0x005b, f01=0x0190, f02=»* P* EXTERNALS * P************* P* 6 P* @ P EXTRN TDISP DISPATCHER J " P EXTRN DISQUE DISPATCHER QUEUE j ( P EXTRN PRUN TTAB OF RUNNING PROGRAM " P EXTRN MEXIT MONITOR TASK EXIT , P EXTRN MONMMU MONITOR (SYSTEM) MMU TAB
0x123dac…123f40 Dummy {f00=0x005b, f01=0x0190, f02=»TCH TO LEVEL XY P EXTRN FREBLK SET BLOCK FREE " P EXTRN SAVE8 SAVE 8 REGISTERS < $ P EXTRN PFINIT RESTART OF DEVICES b P EXTRN HALT HALT MODULE ( P EXTRN INTSAV INTERRUPT SAVE MODULE P EXTRN TTABLD LOAD TASK TTAB ( P EXTRN PQEMTY
0x123f40…1240d4 (1, 111) Dummy {f00=0x005b, f01=0x0190, f02=»KWARD t ( P EXTRN TTB:SB SEGMENT BLOCK POINTER & P EXTRN TTB:PW PROGRAM STATUS WORD : 2 P EXTRN TTB:SA FIRST WORD OF SAVE AREA IN TTAB d " P EXTRN LKMAL LKM REQUEST TABLE P EJECT LRPINT P* P* . P****************************
0x1240d4…124268 Dummy {f00=0x005b, f01=0x018e, f02=»PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. . P* PMMUPAG EQU 1 f P* z P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU8
0x124268…1243fc Dummy {f00=0x005b, f01=0x018e, f02=» PDSKPAG EQU 1 * P* & 8 P* A PROGRAM VERSION USING NO MONITOR CLOCK FUNCTIONS 0 * P* IS OBTAINED BY SETTING MCLOCK EQU 0. l P* PX:A EQU 1 PMONCLK EQU 0 P* P EJECT LRPINT P* P* P* I H
0x1243fc…124590 Dummy {f00=0x005b, f01=0x0190, f02=» * P* - IF STACK OVERFLOW SYSTEM HALTS. P* 2 @ P* - ELSE REGISTERS A1 - A14 ARE SAVED IN TTAB FOR RUNNING < P* PROGRAM. P* : P* - EXIT CONDITIONS ARE SET AND A BRANCH IS MADE TO $ P* APPROPRIATE LKM PROCESSOR. P*
0x124590…124724 Dummy {f00=0x005b, f01=0x0190, f02=»KM REQUEST) h , P* A5 = TTAB ADDRESS OF CALLING PROGRAM P* A2, A3 AND A6 ARE LOST. D P* h : P* ALL OTHER REGISTERS REMAIN UNCHANGED FROM CALLING r P* PROGRAM. P* P* P* PIHLKM EQU * $ P ST P,INTSAV SAVE
0x124724…1248b8 Dummy {f00=0x005b, f01=0x0190, f02=» SAVE A15 " P LD A15,PRUN LOAD TTAB ADDRESS P* 8 P IFT CPU852=1 B 4 P ADKL A15,TTB:SA+28 SET A15 TO LAST IN SAVE AREA X * P STR A14,A15 SAVE USER REGISTERS, -A14 P STR A13,A15 -A13 P STR A12,A15 -A12 P STR A11,A15 -A11
0x1248b8…124a4c Dummy {f00=0x005b, f01=0x0190, f02=»5 -A5 P STR A4,A15 -A4 P STR A3,A15 -A3 & P STR A2,A15 -A2 > P STR A1,A15 -A1 V P XIF n P* z P IFT CPU852=0 6 P MS 14,TTB:SA+2,A15 SAVE A1-A14 IN TTAB SAVE AREA P XIF P* 0 P LD A5,PRUN GET TTAB ADDRESS O
0x124a4c…124be0 Dummy {f00=0x005b, f01=0x0190, f02=» GET LKM REQUEST PARAMETERS P* $ P LDR* A3,A15 . 4 P LDR* A2,A15 LOAD P.C. AND ADJUST STACK POINTER B & P ST A3,TTB:PW,A5 STORE PSW IN TTAB z P* P IFT MMUPAG=0 & P LD A3,-2,A2 GET INSTRUCTION CODE " P LDR* A6,A2 GET DATA DIREC
0x124be0…124d74 (1, 112) Dummy {f00=0x005b, f01=0x018e, f02=»MMU TABLE t P* PLKM015 EQU * & P EL A3,-2,A2 GET INSTRUCTION CODE 0 " P ELR A6,A2 GET DATA DIRECTIVE Z P XIF P* P CWK A3,/2804 P RF(E) LKM025 LKM? P CWK A3,/6300 P RF(E) LKM025 TRAP? P* $ P* ST
0x124d74…124f08 Dummy {f00=0x005b, f01=0x0190, f02=» P EJECT LRPINT P* P* & PLKM025 EQU * 0 P IFT DSKPAG=1 D . P LD A3,TTB:SB,A5 GET SEGMENT BLOCK ADDRESS Z P RF(Z) LKM027 NO SEGMENT? " P LDR* A4,A3 GET SEGMENT STATUS 0 P ANKL A4,/1E00 CHECK IF CORE RESIDENT OR... 2 P
0x124f08…12509c Dummy {f00=0x005b, f01=0x0190, f02=»ET PAGE BLOCK ADDRESS ~ & P LDKL A4,PAGQUE GET PAGQUE ADDRESS P ST A4,PAG:QB,A3 H 4 P LDR* A4,A4 GET ADDRESS OF FIRST BLOCK IN PAGQUE ` " P STR A4,A3 UPDATE QUEUE LINKS P ST A3,PAGQUE P ST A3,PAG:QB,A4 4 P LD A3,PQEMTY CHECK IF LOAD
0x12509c…125230 Dummy {f00=0x005b, f01=0x0190, f02=»K | P* , P CM PQEMTY INDICATE PAGE QUEUE NOT EMPTY P LDR A4,A5 SAVE A5 D , P LDKL A5,TTABLD GET LDTASK TTAB ADDRESS ^ $ P CF A15,QTJOB RESTART LOAD TASK P LDR A5,A4 RESTORE A5 P LD A4,TTB:PW,A5 GET PSW & P ST A4,-2,A15 RESTOR
0x125230…1253c4 Dummy {f00=0x005b, f01=0x0190, f02=» ( P RF(E) LKM060 LOAD SEGMENT REQUEST? P XIF 0 P* < P EJECT LRPINT F P* ^ P* h PLKM030 EQU * r ( P CM PRUN INDICATE IDLE LOOP RUNNING $ P CF A15,SWL48 SWITCH TO LEVEL 48 P LDK A4,0 " P LDR A3,A6 GET DATA DIRECTIV
0x1253c4…125558 Dummy {f00=0x005b, f01=0x0190, f02=»IRECTIVE POSITIVE z P* P IFT MMUPAG=0 $ P LDR* A4,A2 GET LABEL : P XIF X P* d P IFT MMUPAG=1 n P ELR A4,A2 GET LABEL P XIF P* P EJECT LRPINT P* . P* UPDATE TTB:SA AND GO TO LKM PROCESSOR
0x125558…1256ec Dummy {f00=0x005b, f01=0x0190, f02=»MAL v * P RF(Z) LKMQDI PROGRAM SWITCH REQUEST? P CW A3,LKMAL : * P RF(NL) LKMRQE INVALID DATA DIRECTIVE? N P INH | P LD A3,LKMAL,A3 P* P IFF MMUPAG+DSKPAG=0 P RF LKM065 P* . PLKM060 EQU * LOAD SEGMENT REQUEST (DAT
0x1256ec…125880 Dummy {f00=0x005b, f01=0x018e, f02=» P* P EJECT LRPINT P* & P* 0 P* L K M E R R : P* R P* > PLKMERR LDK A1,15 INDICATE REQUESTED LKM PROC. NOT PRESENT f P* PLKM070 EQU * P CF A15,HALT HALT SYSTEM P* P* P* L K M R Q
0x125880…125a14 (1, 113) Dummy {f00=0x005b, f01=0x0190, f02=» PLKMRQE EQU * P LDKL A2,-1 . P ST A2,TTB:SA+14,A5 SET -1 IN SAVE AREA A7 , P* ^ P* h P* L K M Q D I r P* ( P* QUEUE TERMINAL JOB AND DISPATCH. P* P* A5 = TTAB ADDRESS P* P* PLKMQDI EQU *
0x125a14…125ba8 Dummy {f00=0x005b, f01=0x0190, f02=»CT LRPINT P* P* I H R T C P* 4 6 P* THIS IS THE REAL TIME CLOCK INTERRUPT HANDLER. > 6 P* THE TIMER QUEUE WILL BE PROCESSED EACH 100 MS. x P* * PIHRTC ST P,INTSAV SAVE LAST INTERRUPT " P RIT /1B RESET INTERRUPT FLAG
0x125ba8…125d3c Dummy {f00=0x005b, f01=0x0190, f02=»F A15,SAVE8 SAVE A1-A8 ON STACK P XIF ( P* 4 P IFT CPU852=0 > " P MSR 8,A15 SAVE A1-A8 ON STACK T P XIF z P* " P LDKL A4,-4 SET 100 MS SWITCH P ST A4,COUNT . P LDKL A2,CLOCK QUEUE CLOCK ROUTINE AS MJOB P CF A15,QMJO
0x125d3c…125ed0 Dummy {f00=0x005b, f01=0x0190, f02=» * $ P CF A15,SWLXY SWITCH TO LEVEL XY P RB T:DISP 2 P* D P EJECT LRPINT N P* f P* p P IFT MONCLK=1 z P* < P* MONITOR CLOCK UPDATING ROUTINE STARTED EACH SECOND. P* PMCLOCK EQU * ( PRTC025 LDKL A4,-
0x125ed0…126064 Dummy {f00=0x005b, f01=0x0190, f02=»20 IM MONCLO+2,A4 INCREMENT TIME 0 P XR A3,MONCLO+2,A4 CHANGE MINUTES OR HOURS ? ( $ P RB(NE) RTC020 GO TO DISPATCHER? ( P CM MONCLO+2,A4 RESTART TIME COUNTER P SUK A4,2 END? " P RB(N) MCLO20 MIDNIGHT CARRY? " P RB(P) MCLO10 UPDATE MINUTES
0x126064…1261f8 Dummy {f00=0x005b, f01=0x0190, f02=»MONCLO EQU * P IFT MONCLK=1 & P DATA 0 ACCUMULATED 24 HOUR CARRY * P DATA 0 HOUR T P DATA 0 MINUTE h P DATA 0 SECOND ~ PSECOND DATA 0 SECOND SWITCH P XIF P* P EJECT LRPINT P* * P* CLOCK ROUTINE STARTE
0x1261f8…12638c Dummy {f00=0x005b, f01=0x0190, f02=»0 LDR* A4,A6 GET TIMER BLOCK P ABL(Z) MEXIT END OF QUEUE $ P IM 4,A4 INCREMENT TIMER F P RB(N) CLK10 NOT TIME OUT? f P RF(Z) CLK30 TIME OUT? P LDR* A3,A4 RELEASE TIMER P STR A3,A6 P CF A15,FREBLK P LDR A4,A2 P CF A1
0x12638c…126520 Dummy {f00=0x005b, f01=0x0190, f02=» CF A15,SWL48 SWITCH TO LEVEL 48 DK1 P INH , P RB CLK10 8 P* J PCLK40 EQU * T P IFT CPU852=1 h & P CF A15,SAVE8 SAVE A1-A8 ON STACK ~ P XIF P* P IFT CPU852=0 " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P*
0x126520…1266b4 (1, 114) Dummy {f00=0x005c, f01=0x0190, f02=»NE r P* P* PCOUNT DATA 0 100 MS SWITCH P* @ P* J P* T I M Q U E T P* l . P* POINTER TO FIRST BLOCK IN TIMER QUEUE v P* P* PTIMQUE EQU * P DATA 0 P* P EJECT LRPINT P*
0x1266b4…126848 Dummy {f00=0x005c, f01=0x0190, f02=»ATA 0 & PTTABPF DATA 0 TTAB FOR POWER FAIL P DATA '#P' 8 P DATA 0 J PA15SAV DATA 0 Z P DATA /00C0 p P DATA POWOFF P* P* P* WORK AREAS P* P* & PPFX DATA 1 POWER ON/OFF INDICATOR P*
0x126848…1269dc Dummy {f00=0x005c, f01=0x018e, f02=»INTERRUPT t P* P* PIHPFAR EQU * & $ P ST P,INTSAV SAVE LAST INTERRUPT < & P RIT /17 RESET INTERNAL INTERRUPT d & P C1S PFX INDICATE POWER ON OR OFF P RF(P) POWON POWER ON? P* P* POWER OFF P* P IFT CPU
0x1269dc…126b70 Dummy {f00=0x005c, f01=0x0190, f02=» P XIF ! P* ! 4 P LD A1,DISQUE QUEUE PFTASK FIRST FOR DISPATCHING ! P LDKL A2,TTABPF ! R P STR A1,A2 ! j P ST A2,DISQUE ! | P RB T:DISP ! P* ! 2 PPOWOFF ST A15,A15SAV SAVE A15 FOR BETTER TIMES ! P HLT ! P* ! P EJECT LRPIN
0x126b70…126d04 Dummy {f00=0x005c, f01=0x4058, f02=» ! P CM PRUN " P RB T:DISP " P* " * P* " 4 P* " > P END " H@ " TA2,TTABPF ! R P STR A1,A2 ! j P ST A2,DISQUE ! | P RB T:DISP ! P* ! 2 PPOWOFF ST A15,A15SAV SAVE A15 FOR BETTER TIMES ! P HLT ! P* ! P EJECT LRPIN
0x126d04…126e98 Dummy {f00=0x005c, 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
0x126e98…12702c Dummy {f00=0x005c, f01=0x0190, f02=»1,0 SET CR # $ P RF(Z) TAS160 ALL VOLUMES FOUND $ P* $ : , P* ALL VOL NOT FOUND. ACT FLEXDISCTASK $ D P* $ t P LD A1,TASCVO $ ~ P LDK A2,2 ID DMTASK FLEXDISC $ P SC A2,TASVOL,A1 SEE TAS195 $ P EJECT $ P* $ , P* CHECK IF FILE CO
0x12702c…1271c0 Dummy {f00=0x005c, f01=0x0190, f02=»D $ j P LDR A10,A10 TC % P RF(Z) TAS165 GLOBAL ASSIGN % " P LD A2,TASTTA TTAB ADDR % F P LDR A4,A2 % f P LD A2,TTB:TD,A4 % x P ADKL A4,TTB:TD+1 % P RF TAS170 % PTAS165 EQU * % P LD A4,SCTCDT % P LDR* A2,A4 % P ADK A4,1 %
0x1271c0…127354 (1, 115) Opaque[0x194]
0x127354…1274e8 # DirEnt {nam=»TPROC «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b88, f03=0x0000}
0x127354…1274e8 IdxSect {
0x127354…1274e8 f00 = 0x005c // 0x127354 @0x0
0x127354…1274e8 f01 = 0x0006 // 0x127356 @0x2
0x127354…1274e8 gno = [ // 0x127358 @0x4
0x127354…1274e8 [0x00]: C0x005c.0x1.0
0x127354…1274e8 [0x01]: C0x005c.0x2.0
0x127354…1274e8 [0x02]: C0x005c.0x3.0
0x127354…1274e8 ]
0x127354…1274e8 }
0x1274e8…12767c Dummy {f00=0x005c, f01=0x0190, f02=» 0 P IDENT TPROC REL 9.2 79-11-16 870105040920 P 8 P* @ P* J 6 P************************************************** T P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* TPROC = TOSS LKM PROCESSORS P* P* P*
0x12767c…127810 Dummy {f00=0x005c, f01=0x0190, f02=»AINS THE FOLLOWING | P* TOSS LKM PROCESSORS: P* : P* - TWAIT = WAIT D P* ` P* - TEXIT = EXIT j P* ( P* - TACTOT = ACTIVATE/RESTART TASK P* P* - TPAUSE = PAUSE TASK P* P* - TMWAIT = MULTIPL
0x127810…1279a4 Dummy {f00=0x005c, f01=0x018e, f02=»* P* P ENTRY TWAIT WAIT PROCESSOR P ENTRY TEXIT EXIT PROCESSOR 8 , P ENTRY TACTOT ACTIVATE/RESTART PROCESSOR " P ENTRY TPAUSE PAUSE PROCESSOR * P ENTRY TMWAIT MULTIPLE WAIT PROCESSOR P P P P* P*
0x1279a4…127b38 Dummy {f00=0x005c, f01=0x0190, f02=» P EXTRN TDISP DISPATCHER * P EXTRN LKMQDI QUEUE TASK AND DISPATCH $ $ P EXTRN LKMRQE LKM REQUEST ERROR R P EXTRN EXIT PROGRAM EXIT z 2 P EXTRN FNDDWT FIND DWT ADDRESS FROM FILE CODE 0 P EXTRN FNDTID FIND TTAB ADDRESS FROM TASK ID P EXT
0x127b38…127ccc Dummy {f00=0x005c, f01=0x018e, f02=»RN DWTWAT WAIT/ACTIVATE INDICATOR P EJECT TPROC * P* @ P* J . P***************************************** T P* P* CONDITIONAL ASSEMBLY P* . P***************************************** P* . P* A PROGRAM VERSION
0x127ccc…127e60 Dummy {f00=0x005c, f01=0x0190, f02=» P* P* P******** P* WAIT * ( P******** 8 P* H P* R ( P* THIS IS THE WAIT LKM PROCESSOR. P* , P* THIS MODULE IS ENTERED WHEN THE TASK 6 P* WANTS TO SYNCHRONIZE WITH A PARTICULAR EVENT. P* * P*
0x127e60…127ff4 (1, 116) Dummy {f00=0x005c, f01=0x0190, f02=»CB ADDRESS P* P* * PTWAIT CF A15,FNDDWT SEARCH DWT ADDRESS & P ADK A6,0 SET CR T & P RF(Z) TP:RQE FILE CODE NOT FOUND? l P* P IFT MMUPAG=0 * P LDR* A1,A8 RETURN IF EVENT COMPLETED P XIF P* P IFT MMUPAG=1
0x127ff4…128188 Dummy {f00=0x005c, f01=0x0190, f02=»SET WAIT INDICATOR IN DWT ~ P RF T:DISP GO TO DISPATCHER " P* F P EJECT TPROC P P* f P* p P******** z P* EXIT * P******** P* P* ( P* THIS IS THE EXIT LKM PROCESSOR. P* * P* THIS MODULE IS E
0x128188…12831c Dummy {f00=0x005c, f01=0x0190, f02=»D FROM THE LKM HANDLER & P* WITH THE FOLLOWING PARAMETERS: P* H P* A5 = TTAB ADDRESS R P* p P* z PTEXIT EQU * " P CF A15,EXIT CALL PROGRAM EXIT P* & PT:DISP ABL TDISP GO TO DISPATCHER P* P EJECT TPR
0x12831c…1284b0 Dummy {f00=0x005c, f01=0x0190, f02=» TASK LKM PROCESSOR. p P* 4 P* THIS MODULE IS ENTERED FROM THE LKM HANDLER & ( P* WHEN A TASK HAS TO BE ACTIVATED. ^ P* 0 P* THE FOLLOWING PARAMETERS ARE SUPPLIED:- P* ( P* A1 = PARAMETER WHEN A4 NOT ZERO 4 P* A4 = S
0x1284b0…128644 Dummy {f00=0x005c, f01=0x0190, f02=» PTACTOT EQU * $ P CF A15,FNDTID FIND TTAB ADDRESS P ADK A2,0 SET CR D $ P RF(Z) TP:RQE TASK NOT IN SYSTEM 4 P CF A15,QTJOB QUEUE CALLING TASK FOR DISPATCHING * P LD A3,TTB:SA+6,A5 GET SEGMENT NUMBER P LDR A5,A2 P LDR A2,A4
0x128644…1287d8 Dummy {f00=0x005c, f01=0x0190, f02=» EJECT TPROC P* P* P********** * P* TPAUSE * < P********** N P* ` P* j ( P* THIS IS THE PAUSE LKM PROCESSOR. t P* : P* THIS MODULE IS ENTERED FROM THE LKM HANDLER WHEN A : P* TASK WANTS TO (TEMPORARILY)
0x1287d8…12896c Dummy {f00=0x005c, f01=0x0190, f02=» P********** P* TMWAIT * P********** , P* > P* H 0 P* THIS IS THE MULTIPLE WAIT LKM PROCESSOR. R P* * P* IT IS ENTERED FROM THE LKM HANDLER & P* WITH THE FOLLOWING PARAMETERS: P* P* A5 = TTAB ADDRESS
0x12896c…128b00 Dummy {f00=0x005c, f01=0x018e, f02=»LLING TASK VIA TENDIO t & P* WITH THE FOLLOWING PARAMETERS: P* H , P* A8 = ECB ADDRESS OF COMPLETED EVENT R P* > P* IF REQUEST ERROR, A7 := -1 (AND NO RETURN VIA TENDIO). P* ( P* NOTICE THAT ALL EVENTS MUST HAVE ( P*
0x128b00…128c94 (1, 117) Dummy {f00=0x005c, f01=0x0190, f02=» n P LDK A3,0 P* P IFT MMUPAG=0 $ * P LDR* A1,A7 GET NO OF ECB:S IN ECBBLK : P XIF h P* t P IFT MMUPAG=1 ~ ( P ELR A1,A7 GET NO OF ECB:S IN ECBBLK P XIF P* ( P RF(NP) TP:RQE REQUEST ERROR IF <= 0 P*
0x128c94…128e28 Dummy {f00=0x005c, f01=0x0190, f02=»S v & P LDR* A2,A8 GET FIRST WORD OF ECB P XIF 4 P* @ P IFT MMUPAG=1 J P ELR A8,A7 GET ECB ADDRESS ` $ P ELR A2,A8 GET FIRST WORD OF ECB P XIF P* ( P RF(N) TMW:30 I/O ALREADY COMPLETED? 8 P CF A15,FNDDWT NO, SEARCH DW
0x128e28…128fbc Dummy {f00=0x005c, f01=0x0190, f02=» " P LD A2,DWTST,A6 GET DWT STATUS P RF(N) TP:RQE NOT BUSY? * P CW A5,DWTTAB,A6 J 4 P RF(NE) TP:RQE REQUEST NOT ISSUED BY THIS TASK? b 0 P LD A2,DWTWAT,A6 GET WAIT/ACTIVATE INDICATOR , P RF(NZ) TP:RQE REQUEST ISSUED WITH WAIT? P ORK A6,1
0x128fbc…129150 Dummy {f00=0x005c, f01=0x0190, f02=»AVE FIRST DWT ADDRESS P LDR A3,A6 P* 0 PTMW:20 EQU * : 8 P ST A6,DWTWAT,A9 CHAIN THIS DWT WITH THE ONE BEFORE N $ P LDR A9,A6 SAVE THIS DWT ADDRESS P SUK A1,1 ( P RB(P) TMW:10 MORE ECB:S IN ECBBLK? : P ST A3,DWTWAT,A9 NO, SET
0x129150…1292e4 Dummy {f00=0x005c, f01=0x0190, f02=» TTAB SAVE AREA p 2 P ADK A3,0 CHECK FLAG IF FIRST ECB TO WAIT FOR & P RF(Z) TP:QDI FIRST ECB IN ECBBLK? N P* x : PTMW:40 ADKL A3,DWTWAT POINT TO WAIT/ACTIVATE INDICATOR $ P LDR* A2,A3 GET NEXT DWT ADDRESS P RF(Z) TP:QDI NO MORE DWT:S?
0x1292e4…129478 Dummy {f00=0x005c, f01=0x40aa, f02=»QU * " P ABL LKMRQE LKM REQUEST ERROR P* 2 PTP:QDI EQU * < ( P ABL LKMQDI QUEUE TASK AND DISPATCH P P* | P* P* P END @ VATE INDICATOR $ P LDR* A2,A3 GET NEXT DWT ADDRESS P RF(Z) TP:QDI NO MORE DWT:S?
0x129478…12960c Dummy {f00=0x005c, 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
0x12960c…1297a0 Dummy {f00=0x005c, f01=0x0000, f02=»
0x1297a0…129934 (1, 118) Opaque[0x194]
0x129934…129ac8 # DirEnt {nam=»MSUBS «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0ba0, f03=0x0000}
0x129934…129ac8 IdxSect {
0x129934…129ac8 f00 = 0x005d // 0x129934 @0x0
0x129934…129ac8 f01 = 0x000c // 0x129936 @0x2
0x129934…129ac8 gno = [ // 0x129938 @0x4
0x129934…129ac8 [0x00]: C0x005d.0x0.0
0x129934…129ac8 [0x01]: C0x005d.0x1.0
0x129934…129ac8 [0x02]: C0x005d.0x2.0
0x129934…129ac8 [0x03]: C0x005d.0x3.0
0x129934…129ac8 [0x04]: C0x005e.0x0.0
0x129934…129ac8 [0x05]: C0x005e.0x1.0
0x129934…129ac8 ]
0x129934…129ac8 }
0x129ac8…129c5c Dummy {f00=0x005d, f01=0x0190, f02=» 0 P IDENT MSUBS REL 9.2 79-11-16 870105040920 P 8 P* @ P* J 6 P************************************************** T P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* MSUBS = MONITOR SUBROUTINES P* P* P*
0x129c5c…129df0 Dummy {f00=0x005d, f01=0x0190, f02=»OLLOWING MONITOR r P* SUBROUTINES: P* 0 , P* -SAVE8 SAVE 8 REGISTERS ON STACK : , P* -QTJOB QUEUE TASK FOR DISPATCHING j 4 P* -QMJOB QUEUE MONITOR JOB FOR DISPATCHING . P* -ACTOT ACTIVATE TASK ON FIFO BASIS . P*
0x129df0…129f84 Dummy {f00=0x005d, f01=0x018e, f02=»K SET A MONITOR BLOCK FREE " P* -FNDDWT FIND DWT ADDRESS $ * P* -FNDTID FIND TASK IDENTIFICATION J P* -PFINIT RESTART DEVICE x $ P* -SWL48 SWITCH TO LEVEL 48 $ P* -SWLXY SWITCH TO LEVEL XY P* -HALT HALT MODULE
0x129f84…12a118 Dummy {f00=0x005d, f01=0x0190, f02=» " P ENTRY SAVE8 SAVE 8 REGISTERS P ENTRY QTJOB QUEUE TASK * " P ENTRY QMJOB QUEUE MONITOR JOB J & P ENTRY ACTOT ACTIVATE TASK (FIFO) p & P ENTRY ACTOTP ACTIVATE TASK (LIFO) P ENTRY EXIT PROGRAM EXIT P ENTRY GETBLK GET BLOCK P ENT
0x12a118…12a2ac Dummy {f00=0x005d, f01=0x0190, f02=»CE v $ P ENTRY SWL48 SWITCH TO LEVEL 48 $ P ENTRY SWLXY SWITCH TO LEVEL XY 2 , P ENTRY ILLINT ILLEGAL INTERRUPT ROUTINE Z * P ENTRY INTSAV SAVE AREA LAST INTERRUPT P ENTRY HALT HALT MODULE P* 2 P* ENTRIES TO RESTORE REGISTERS A8-A1
0x12a2ac…12a440 Dummy {f00=0x005d, f01=0x018e, f02=» A1 ~ 2 P ENTRY IHRTN RETURN WITHOUT ENABLE INTERRUPTS P EJECT MSUBS J P* ` P* j P************* t P* EXTERNALS * P************* P* P* : P EXTRN DISQUE POINTER TO 1ST PLACE IN DISPATCHER QUEUE & P
0x12a440…12a5d4 (1, 119) Dummy {f00=0x005d, f01=0x0190, f02=» & P EXTRN TTB:ID TASK IDENTIFICATION P EXTRN TTB:SA SAVE AREA . * P EXTRN TTB:PP POINTER TO PENDING QUEUE N ( P EXTRN TTB:TD TERMINAL DEVICE TABLE | 6 P EXTRN FREQUE POINTER TO FIRST FREE MONITOR BLOCK P EXTRN DWTADR -ADDRESS BLOCK $ P E
0x12a5d4…12a768 Dummy {f00=0x005d, f01=0x0190, f02=»XTRN TIODM DM ENTRY P EXTRN CHKIND DM ENTRY P* : P* D " PSOP EQU /2E SOP DEVICE ADDRESS N P* t P EJECT MSUBS ~ P* P* . P***************************************** P* P* CONDITIONAL ASSEMBLY P*
0x12a768…12a8fc Dummy {f00=0x005d, f01=0x0190, f02=»NG MMUPAG EQU 1. z P* PMMUPAG EQU 1 " P* 6 P* @ 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION J . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0 P* * . ** A PROGRAM VERSION USING TOSS D
0x12a8fc…12aa90 Dummy {f00=0x005d, f01=0x0190, f02=»* P* S A V E 8 P* 0 P* SUBROUTINE TO SAVE 8 REGISTERS ON STACK * $ P* WITHOUT ENABLING INTERRUPTS. ^ P* P* PSAVE8 EQU * P INH INHIBIT INTERRUPTS P STR A3,A15 P STR A4,A15 P STR A5,A15
0x12aa90…12ac24 Dummy {f00=0x005d, f01=0x0190, f02=»RANCH ADDRESS v P ST A2,14,A15 P ST A1,16,A15 , P LD A3,12,A15 RESTORE A3 B & P ABL 0 THIS IS USED TO BRANCH BACK b PSAVE81 EQU *-2 P* P EJECT MSUBS P* P* P* Q T J O B P* 2 P* SUBROUTINE TO
0x12ac24…12adb8 Dummy {f00=0x005d, f01=0x0190, f02=» P* 8 P* THE REQUESTED JOB IS PUT IN DISPATCHER QUEUE ON 8 P* PRIORITY BASIS. WITHIN ONE PRIORITY LEVEL JOB IS J P* PUT LAST IN QUEUE. P* P* PQTJOB EQU * P INH P* P IFT CPU852=1 $ P STR A1,A15 SAVE
0x12adb8…12af4c Dummy {f00=0x005d, f01=0x0190, f02=»CK t P XIF P* . P LDKL A1,DISQUE LOAD QUEUE ANCHOR ADDRESS 2 P LDR* A2,A1 GET ADDRESS OF FIRST TASK IN QUEUE R P RF(Z) QTJ020 DISQUE EMPTY? * P LD A3,TTB:ST+1,A5 GET PRIORITY LEVEL P* P EJECT MSUBS P* P*
0x12af4c…12b0e0 Dummy {f00=0x005d, f01=0x0190, f02=»1 GET NEXT TTAB ADDRESS IN QUEUE $ P RB(NZ) QTJ010 NOT END OF QUEUE? ( P* P ( PQTJ020 STR A2,A5 UPDATE QUEUE LINKS Z P STR A5,A1 P* P IFT CPU852=1 P ABL IHRET3 P XIF P* P IFT CPU852=0 * P MLR 3,A15 RESTO
0x12b0e0…12b274 (1, 120) Dummy {f00=0x005d, f01=0x018e, f02=»B P* 6 P* SUBROUTINE TO QUEUE MONITOR JOBS ON LEVEL 49. P* N P* ENTRY PARAMETERS:- X P* v P* A1 = PARAMETER P* A2 = DISPATCH ADDRESS P* : P* A5 IS SET TO TTAB ADDRESS OF MONITOR JOBS AND THE < P*
0x12b274…12b408 Dummy {f00=0x005d, f01=0x0190, f02=» & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF . P* : P IFT CPU852=0 D P INH Z " P MSR 8,A15 SAVE A1-A8 ON STACK f P XIF P* $ P LDKL A5,TTMJOB SET TTAB ADDRESS P RF ACT01 P* P EJECT MSUBS P* P*
0x12b408…12b59c Dummy {f00=0x005d, f01=0x0190, f02=»* P* A1 = PARAMETER 1 P* A2 = DISPATCH ADDRESS & P* A3 = SEGMENT NUMBER H P* A4 = PARAMETER 2 h P* A5 = TTAB ADDRESS P* < P* - IF REQUESTED PROGRAM IS NOT ACTIVE THE PROGRAM IS : P* PUT IN DISPATCHER QUEU
0x12b59c…12b730 Dummy {f00=0x005d, f01=0x0190, f02=»LL PUT REQUEST IN PENDING QUEUE ON FIFO BASIS. B P* - ACTOTP WILL PUT REQUEST IN PENDING QUEUE ON LIFO BASIS. 6 P* | P* PACTOTP EQU * P IFT CPU852=1 & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF P* P IFT CPU852=0
0x12b730…12b8c4 Dummy {f00=0x005d, f01=0x0190, f02=» P EJECT MSUBS P* P* $ PACTOT EQU * . P IFT CPU852=1 B & P CF A15,SAVE8 SAVE A1-A8 ON STACK X P XIF P* P IFT CPU852=0 P INH " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P* PACT01 LDK A6,0 IND
0x12b8c4…12ba58 Dummy {f00=0x005d, f01=0x0190, f02=» " P ST A1,TTB:SA+2,A5 PARAMETER 1 0 P ST A2,TTB:SA,A5 SAVE (NEW) DISPATCH ADDRESS * & P ST A3,TTB:SA+6,A5 SEGMENT NUMBER ^ " P ST A4,TTB:SA+8,A5 PARAMETER 2 $ P LD A4,TTB:ID,A5 SET TERMINAL ID * P ST A4,TTB:SA+4,A5 TO A2 IN SAVE AREA P*
0x12ba58…12bbec Dummy {f00=0x005d, f01=0x0190, f02=»E JOB z P* P EJECT MSUBS P* . P* 8 PACT010 EQU * B P IFT CPU852=1 V ( P ABL IHRET8 RESTORE A1-A8 AND RETURN l P XIF P* P IFT CPU852=0 * P MLR 8,A15 RESTORE A1-A8 FROM STACK... P RTN A15 ...AND RETURN
0x12bbec…12bd80 Dummy {f00=0x005d, f01=0x0190, f02=»K GET A FREE BLOCK P LDR A1,A7 PARAMETER 2 P LDR A2,A4 8 P CF A15,GETBLK J P ADKL A5,TTB:PP ` P* x " PACT030 LDR A3,A5 SAVE ADDRESS ( P LDR* A5,A5 FOLLOW THE QUEUE THREAD P ADK A6,0 SET CR & P RF(NZ) ACT040 QUEUE ON LIFO
0x12bd80…12bf14 (1, 121) Dummy {f00=0x005d, f01=0x0190, f02=»E t P STR A5,A4 P RB ACT010 P* . P EJECT MSUBS 8 P* N P* X P* E X I T b P* v 8 P* SUBROUTINE TO SET A PROGRAM FREE AND QUEUE FIRST P* PENDING PROGRAM. P* P* ENTRY PARAMETER: P* P
0x12bf14…12c0a8 Dummy {f00=0x005d, f01=0x018e, f02=»OGRAM COUNTER z 0 P LD A4,TTB:PP,A5 GET PENDING PROGRAM POINTER $ P RF(Z) IHRTN NO PENDING PROGRAM J P LDR* A3,A4 GET QUEUE THREAD r 0 P ST A3,TTB:PP,A5 AND SAVE IN PENDING POINTER 4 P CF A15,FREBLK RELEASE BLOCK AND GET PARAMETERS P LDR A
0x12c0a8…12c23c Dummy {f00=0x005d, f01=0x0190, f02=» P EJECT MSUBS P* P* ( P* G E T B L K 2 P* J 4 P* SUBROUTINE TO GET A FREE BLOCK FROM MONITOR T 8 P* BLOCK POOL. REGISTERS A3-A1 ARE STORED IN FOUND P* FREE BLOCK. P* P* EXIT PARAMETER:- P*
0x12c23c…12c3d0 Dummy {f00=0x005d, f01=0x0190, f02=»A4,FREQUE GET FIRST BLOCK IN FREE QUEUE P RF(NZ) GBL010 0 P LDK A1,/B HALT PARAMETER F , P CF A15,HALT HALT IF NO MORE FREE BLOCKS h P* PGBL010 LDR* A5,A4 . P ST A5,FREQUE TAKE BLOCK OUT OF FREE QUEUE $ P STR A3,A4 STORE A3-A1 IN
0x12c3d0…12c564 Dummy {f00=0x005d, f01=0x0190, f02=» XIF P* P IFT CPU852=0 P RTN A15 , P XIF < P* H P EJECT MSUBS R P* h P* r P* F R E B L K | P* : P* SUBROUTINE TO GET PARAMETERS FROM A MONITOR BLOCK P* AND SET THIS BLOCK FREE. P*
0x12c564…12c6f8 Dummy {f00=0x005d, f01=0x0190, f02=» PARAMETER IN BLOCK $ P* A2 = SECOND " " $ P* A1 = THIRD " " D P* l P* v PFREBLK EQU * P INH P LDR* A3,A4 UPDATE A3 P LD A1,FREQUE P STR A1,A4 P ST A4,FREQUE SET BLOCK FREE
0x12c6f8…12c88c Dummy {f00=0x005d, f01=0x0190, f02=» RTN A15 P XIF P* P EJECT MSUBS & P* < P* F P* F N D D W T P P* h " P* SUBROUTINE TO FIND A DWT. r P* P* ENTRY PARAMETERS:- P* P* A5 = TTAB ADDRESS 8 P* A7 = ORDER CODE WHEN CALLED
0x12c88c…12ca20 Dummy {f00=0x005d, f01=0x0190, f02=»A6 = DWT ADDRESS IF FOUND, ELSE 0 P* * P* 4 PFNDDWT STR A1,A15 SAVE A1 > P LDKL A6,TTB:TD+2 ` 4 P ADR A6,A5 GET ADDRESS TO TERMINAL DEVICE TABLE z " P LD A1,-2,A6 GET TABLE LENGTH P* P IFT MMUPAG=1 & P ELR A2,A8 LOAD
0x12ca20…12cbb4 (1, 122) Dummy {f00=0x005e, f01=0x0190, f02=» EJECT MSUBS P* P* PFND100 SUK A1,4 * ( P RF(N) FND110 FILE CODE NOT IN TTAB? B & P CC A2,1,A6 SEARCH IN DEVICE TABLE n & P RF(NE) FND106 BRANCH IF NOT FOUND P STR A1,A15 P LD A1,2,A6 DWT ADDRESS " P LD A1,DWTADR,A1 A
0x12cbb4…12cd48 Dummy {f00=0x005e, f01=0x0190, f02=» OK P LDR* A1,A15 P* PFND106 EQU * * ( P ADK A6,4 ADDRESS TO NEXT FILE CODE > P RB FND100 TRY NEXT j P* $ P* SEARCH IN COMMON DEVICE TABLE P* & PFND110 LD A6,SCTCDT CDTAB ADDRESS P LDR* A1,A6 CDTAB LENGTH
0x12cd48…12cedc Dummy {f00=0x005e, f01=0x0190, f02=»LE CODE NOT FOUND? P CC A2,1,A6 ( P RF(NE) FND126 FILE CODE NOT FOUND? . P STR A1,A15 Z P LD A1,2,A6 n P LD A1,DWTADR,A1 P CWK A1,TIODM " P RF(NE) FND200 NOT DM REQUEST? $ P CF A15,CHKIND CHECK INDEX IN DM P RF FND200
0x12cedc…12d070 Dummy {f00=0x005e, f01=0x0190, f02=»6,0 P RF IHRET1 ! P* ! " PFND200 LDR* A1,A15 RESET STACK ! ( P LCR A2,A6 LOAD DWT INDEX ! N P LD A6,2,A6 LOAD DWT ADDRESS ! p P* ! PFND210 RF IHRET1 ! P* ! P EJECT MSUBS ! P* ! P* ! P* F N D T I D ! P* !
0x12d070…12d204 Dummy {f00=0x005e, f01=0x0190, f02=»IDENTIFICATION ! P* " P* EXIT PARAMETER: " P* " < P* A2 = TTAB ADDRESS " F 0 P* A2 = 0 INDICATES ILLEGAL IDENTIFICATION " d P* " P* " PFNDTID STR A1,A15 SAVE A1 " P LD* A1,SCTTCT TCTAB LENGTH " P AD A1,SCTTCT " P
0x12d204…12d398 Dummy {f00=0x005e, f01=0x0190, f02=»,TTB:ID,A2 COMPARE IDENTIFICATIONS " P RB(NE) FTI010 NO MATCH? # * P RF IHRET1 # J P* # ^ * PFTI030 LDK A2,0 ILLEGAL IDENTIFICATION # h P RF IHRET1 # P* # P EJECT MSUBS # P* # P* # , P* RESTORE REGISTERS AND RETURN WITHOUT #
0x12d398…12d52c Dummy {f00=0x005e, f01=0x0190, f02=»DR* A6,A15 # PIHRET5 LDR* A5,A15 $ PIHRET4 LDR* A4,A15 $ , PIHRET3 LDR* A3,A15 $ F PIHRET2 LDR* A2,A15 $ ` PIHRET1 LDR* A1,A15 $ z PIHRTN INH $ $ P ADKL A15,4 ADJUST STACK POINTER $ P ABR* A15 AND RETURN $ P XIF $ P* $ P IFT CPU
0x12d52c…12d6c0 Dummy {f00=0x005e, f01=0x0190, f02=» FROM STACK... $ r P RTN A15 ...AND RETURN % P* % 4 0 PIHRET1 LDR* A1,A15 RESTORE A1 FROM STACK... % > P* % r PIHRTN RTN A15 ...AND RETURN % | P XIF % P* % P EJECT MSUBS % P* % P* % P* P F I N I T % P* % & P* SU
0x12d6c0…12d854 (1, 123) Dummy {f00=0x005e, f01=0x0190, f02=»E AVAILABLE FOR THE RESTART ROUTINES. % z P* & . P* & 8 PPFINIT EQU * & B ( P LDK A1,2 SET INDEX TO FIRST ROUTINE & V P* & $ PPFI100 CW A1,PFTAB CHECK IF LAST & " P RF(NL) PFI110 ALL RESTARTED? & P STR A1,A15 SAVE A1 & P INH & * P CFI A
0x12d854…12d9e8 Dummy {f00=0x005e, f01=0x0190, f02=» RTN A15 RETURN WHEN ALL STARTED & P* ' ( P EJECT MSUBS ' 2 P* ' H P* ' R P* S W L 4 8 ' P* ' r & P* SWITCH TO LEVEL 48 AND ENABLE. ' | P* ' P* ' PSWL48 EQU * ' P STR A1,A15 SAVE A1 ' P* ' PSWL481 EQU * ' $ P
0x12d9e8…12db7c Dummy {f00=0x005e, f01=0x018e, f02=» ' x P RTN A15 ( P* ( P EJECT MSUBS ( " P* ( 8 P* ( B P* S W L X Y ( L P* ( b & P* SWITCH TO LEVEL XY AND ENABLE. ( l P* ( . P* LEVEL := 48 IF LEVEL ON STACK IS >= 48 ( 0 P* LEVEL := XY " " " " " XY < 48 ( P*
0x12db7c…12dd10 Dummy {f00=0x005e, f01=0x0190, f02=» ( z & P LC A1,24,A15 GET LEVEL FROM STACK ) P ANK A1,/FC ) 2 P SUK A1,/BC ) F P RB(G) SWL481 ) Z P LD A1,24,A15 ) p " P ANKL A1,/FFFE SYSTEM MODE BIT ) P RB SWL482 ) P* ) P EJECT MSUBS ) P* ) P* ) & P* INTERRUPT SAVE AND
0x12dd10…12dea4 Dummy {f00=0x005e, f01=0x0190, f02=»A15,HALT ) P* * PHALT EQU * * P IFT CPU852=1 * , & P CF A15,SAVE8 SAVE A1-A8 ON STACK * B $ P STR A9,A15 SAVE A9-A14 ON STACK * l P STR A10,A15 * P STR A11,A15 * P STR A12,A15 * P STR A13,A15 * P STR A14,A15 * P XIF * P* *
0x12dea4…12e038 Dummy {f00=0x005e, f01=0x404e, f02=»YPE OF HALT * x P HLT + P* + P* + * P* + 4 P END + >@ + J8 SAVE A1-A8 ON STACK * B $ P STR A9,A15 SAVE A9-A14 ON STACK * l P STR A10,A15 * P STR A11,A15 * P STR A12,A15 * P STR A13,A15 * P STR A14,A15 * P XIF * P* *
0x12e038…12e1cc Dummy {f00=0x005e, 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. "
0x12e1cc…12e360 Dummy {f00=0x005e, f01=0x0190, f02=» W V V >k 8 W , ( G W t V V : ( g x X H D ! W> 2 0 . 1 2 C S Y j V !W %U 1R g iQ@ R( l H D !e P z V U z V z M OQ QR ] _V V W V H D !
0x12e360…12e4f4 (1, 124) Opaque[0x194]
0x12e4f4…12e688 # DirEnt {nam=»TTMJOB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0bd0, f03=0x0000}
0x12e4f4…12e688 IdxSect {
0x12e4f4…12e688 f00 = 0x005e // 0x12e4f4 @0x0
0x12e4f4…12e688 f01 = 0x0004 // 0x12e4f6 @0x2
0x12e4f4…12e688 gno = [ // 0x12e4f8 @0x4
0x12e4f4…12e688 [0x00]: C0x005e.0x2.0
0x12e4f4…12e688 [0x01]: C0x005e.0x3.0
0x12e4f4…12e688 ]
0x12e4f4…12e688 }
0x12e688…12e81c Dummy {f00=0x005e, f01=0x018e, f02=» 2 P IDENT TTMJOB REL 9.2 79-11-16 870105040920 P : P* B P* L P* MONITOR JOB TASK TABLE V P* v P* P********* P*ENTRIES* P********* P* P* $ P ENTRY TTB:LA LAST LOAD ADDRESS P ENTRY TTB:M
0x12e81c…12e9b0 Dummy {f00=0x005e, f01=0x0190, f02=» j & P ENTRY TTB:ID TASK IDENTIFICATION P ENTRY TTB:ST TASK STATUS 2 " P ENTRY TTB:PP PENDING POINTER T & P ENTRY TTB:PW PROGRAM STATUS WORD z $ P ENTRY TTB:SA TERMINAL SAVE AREA " P ENTRY TTB:TD TERMINAL DEVICES P* P EJECT TTM
0x12e9b0…12eb44 Dummy {f00=0x005e, f01=0x0190, f02=»************************************* P* . . P* A PROGRAM VERSION USING TOSS MMU PAGING 8 * P* IS OBTAINED BY SETTING MMUPAG EQU 1. j P* PMMUPAG EQU 1 P* * . ** A PROGRAM VERSION USING TOSS DISC PAGING * &* IS OBTAINE
0x12eb44…12ecd8 Dummy {f00=0x005e, f01=0x018e, f02=» * P* IS OBTAINED BY SETTING ASSOLY EQU 1. P* 2 PASSOLY EQU 0 < P* P " P EJECT TTMJOB TTMJOB Z P* P* PLA:DUM EQU * P IFT ASSOLY=1 P DATA 0 LAST LOAD ADDRESS P XIF P* PMMUDUM EQU *
0x12ecd8…12ee6c Dummy {f00=0x005e, f01=0x0190, f02=» " P DATA /3000,/3400,/3800,/3C00 P XIF * P* 6 PSB:DUM EQU * @ P IFF MMUPAG+DSKPAG=0 T " P DATA 0 SEGMENT BLOCK ADDRESS p P XIF 6 PTTB:LA EQU LA:DUM-* LAST LOAD ADDRESS DISPLACEMENT . PTTB:MT EQU MMUDUM-* MMU TABLE DISPLACEMENT
0x12ee6c…12f000 Dummy {f00=0x005e, f01=0x018e, f02=»TMJOB ENTRY . PTTB:QL EQU *-TTMJOB DISPATCHER QUEUE LINK P DATA 0 F P* V , PTTB:ID EQU *-TTMJOB TASK IDENTIFICATION ` P DATA '#M' P* $ PTTB:ST EQU *-TTMJOB TASK STATUS P DATA 49 P* ( PTTB:PP EQU *-TTMJOB PENDIN
0x12f000…12f194 (1, 125) Dummy {f00=0x005e, f01=0x4168, f02=» P EJECT TTMJOB P* P* & * PTTB:SA EQU *-TTMJOB TERMINAL SAVE AREA 0 P DATA 0 DISPATCH ADDRESS ^ 2 P DATA 0,0,0,0,0,0,0 SAVE AREA, REGISTER A1-A14 ~ P DATA 0,0,0,0,0,0,0 P* ( PTTB:TD EQU *-TTMJOB TERMINAL DEVICES P D
0x12f194…12f328 Dummy {f00=0x005e, 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,
0x12f328…12f4bc Dummy {f00=0x005e, f01=0x0190, f02=»NG MMUPAG EQU 1. z P* PMMUPAG EQU 0 " P* 6 P* @ 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION J . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 1 P* * . ** A PROGRAM VERSION USING TOSS D
0x12f4bc…12f650 Dummy {f00=0x005e, f01=0x0190, f02=»* P* S A V E 8 P* 0 P* SUBROUTINE TO SAVE 8 REGISTERS ON STACK * $ P* WITHOUT ENABLING INTERRUPTS. ^ P* P* PSAVE8 EQU * P INH INHIBIT INTERRUPTS P STR A3,A15 P STR A4,A15 P STR A5,A15
0x12f650…12f7e4 Dummy {f00=0x005e, f01=0x0190, f02=»RANCH ADDRESS v P ST A2,14,A15 P ST A1,16,A15 , P LD A3,12,A15 RESTORE A3 B & P ABL 0 THIS IS USED TO BRANCH BACK b PSAVE81 EQU *-2 P* P EJECT MSUBS P* P* P* Q T J O B P* 2 P* SUBROUTINE TO
0x12f7e4…12f978 Dummy {f00=0x005e, f01=0x0190, f02=» P* 8 P* THE REQUESTED JOB IS PUT IN DISPATCHER QUEUE ON 8 P* PRIORITY BASIS. WITHIN ONE PRIORITY LEVEL JOB IS J P* PUT LAST IN QUEUE. P* P* PQTJOB EQU * P INH P* P IFT CPU852=1 $ P STR A1,A15 SAVE
0x12f978…12fb0c Dummy {f00=0x005e, f01=0x0190, f02=»CK t P XIF P* . P LDKL A1,DISQUE LOAD QUEUE ANCHOR ADDRESS 2 P LDR* A2,A1 GET ADDRESS OF FIRST TASK IN QUEUE R P RF(Z) QTJ020 DISQUE EMPTY? * P LD A3,TTB:ST+1,A5 GET PRIORITY LEVEL P* P EJECT MSUBS P* P*
0x12fb0c…12fca0 Dummy {f00=0x005e, f01=0x0190, f02=»1 GET NEXT TTAB ADDRESS IN QUEUE $ P RB(NZ) QTJ010 NOT END OF QUEUE? ( P* P ( PQTJ020 STR A2,A5 UPDATE QUEUE LINKS Z P STR A5,A1 P* P IFT CPU852=1 P ABL IHRET3 P XIF P* P IFT CPU852=0 * P MLR 3,A15 RESTO
0x12fca0…12fe34 (1, 126) Opaque[0x194]
0x12fe34…12ffc8 # DirEnt {nam=»TOSSIO«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0be0, f03=0x0000}
0x12fe34…12ffc8 IdxSect {
0x12fe34…12ffc8 f00 = 0x005f // 0x12fe34 @0x0
0x12fe34…12ffc8 f01 = 0x0026 // 0x12fe36 @0x2
0x12fe34…12ffc8 gno = [ // 0x12fe38 @0x4
0x12fe34…12ffc8 [0x00]: C0x005f.0x0.0
0x12fe34…12ffc8 [0x01]: C0x005f.0x1.0
0x12fe34…12ffc8 [0x02]: C0x005f.0x2.0
0x12fe34…12ffc8 [0x03]: C0x005f.0x3.0
0x12fe34…12ffc8 [0x04]: C0x0060.0x0.0
0x12fe34…12ffc8 [0x05]: C0x0060.0x1.0
0x12fe34…12ffc8 [0x06]: C0x0060.0x2.0
0x12fe34…12ffc8 [0x07]: C0x0060.0x3.0
0x12fe34…12ffc8 [0x08]: C0x0061.0x0.0
0x12fe34…12ffc8 [0x09]: C0x0061.0x1.0
0x12fe34…12ffc8 [0x0a]: C0x0061.0x2.0
0x12fe34…12ffc8 [0x0b]: C0x0061.0x3.0
0x12fe34…12ffc8 [0x0c]: C0x0062.0x0.0
0x12fe34…12ffc8 [0x0d]: C0x0062.0x1.0
0x12fe34…12ffc8 [0x0e]: C0x0062.0x2.0
0x12fe34…12ffc8 [0x0f]: C0x0062.0x3.0
0x12fe34…12ffc8 [0x10]: C0x0063.0x0.0
0x12fe34…12ffc8 [0x11]: C0x0063.0x1.0
0x12fe34…12ffc8 [0x12]: C0x0063.0x2.0
0x12fe34…12ffc8 ]
0x12fe34…12ffc8 }
0x12ffc8…13015c Dummy {f00=0x005f, f01=0x018e, f02=» 2 P IDENT TOSSIO REL 9.2 79-11-16 870105040920 P : P =1, DM ATTACH HANG UP B P REL 9.1 79-05-23 b P* ~ P* 6 P************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* ( P
0x13015c…1302f0 Dummy {f00=0x005f, f01=0x0190, f02=» P* , P* THIS IS THE TOSS I/O LKM PROCESSOR. 6 P* IT CONTAINS THE FOLLOWING MONITOR SUBROUTINES: B P* | P* -TIO INITIALIZE I/O P* P* -TENDIO END I/O P* P* -ATTACH ATTACH DEVICE P* P*
0x1302f0…130484 Dummy {f00=0x005f, f01=0x0190, f02=» j P* 8 P* THIS MODULE ALSO CONTAINS STANDARD DISPLACEMENT 8 P* VALUES FOR ECB AND DWT AREAS, AS WELL AS SPECIAL N . P* MOVE ROUTINES FOR DATA COMMUNICATION. P* P EJECT TOSSIO P* P* P*********** P*
0x130484…130618 Dummy {f00=0x005f, f01=0x0190, f02=» DC:MIN MOVE ROUTINE FOR DATACOM, INPUT 2 P ENTRY DC:MOT MOVE ROUTINE FOR DATACOM, OUTPUT 0 , P ENTRY MONMMU MONITOR (SYSTEM) MMU TABLE f P* P ENTRY ECBFC FILE CODE P ENTRY ECBBA BUFFER ADDRESS " P ENTRY ECBRL REQUESTED LENGTH " P
0x130618…1307ac Dummy {f00=0x005f, f01=0x0190, f02=»D (USED BY DM) p P* $ P ENTRY BUFLEN MMU BUFFER LENGTH $ P ENTRY ACTADR ACTIVATION ADDRESS H P ENTRY ABTADR ABORT ADDRESS p $ P ENTRY INTADR INTERRUPT ADDRESS 2 P ENTRY POLADR BUFFER POOL ADDRESS (DC DRIVERS) " P ENTRY RECADR RECOVERY
0x1307ac…130940 Dummy {f00=0x005f, f01=0x0190, f02=»NDEX DATA MANAGEMENT z 2 P ENTRY PC:DIX DEVICE INDEX PROGRAMMED CHANNEL 0 P ENTRY MX:DIX DEVICE INDEX MULTIPLEX CHANNEL R , P ENTRY KB:DIX DEVICE INDEX KEYBOARD/CTW 6 P ENTRY IT:DIX DEVICE INDEX INTERTASK COMMUNICATION P* P EJECT TOSSI
0x130940…130ad4 (1, 127) Dummy {f00=0x005f, f01=0x0190, f02=»RY DWTECB ECB ADDRESS P ENTRY DWTOR INDEX AND ORDER ( P ENTRY DWTOCH LAST OUTPUT CHARACTER B & P ENTRY DWTADR DRIVER ADDRESS BLOCK n P ENTRY DWTTAB TTAB ADDRESS * P ENTRY DWTWAT WAIT/ACTIVATE INDICATOR P ENTRY DWTTQ TERMINAL QUEUE
0x130ad4…130c68 Dummy {f00=0x005f, f01=0x018e, f02=»WTMEC MMU ECB ADDRESS P ENTRY DWTA2 SAVE AREA A2 P ENTRY DWTA3 SAVE AREA A3 @ P ENTRY DWTA4 SAVE AREA A4 b P ENTRY DWTA5 SAVE AREA A5 & P ENTRY DWTSB1 STACK BASE 1 IN DWT & P ENTRY DWTSB2 STACK BASE 2 IN DWT P ENTRY DWTTP T
0x130c68…130dfc Dummy {f00=0x005f, f01=0x0190, f02=» P EJECT TOSSIO P* P* * P************* 4 P* EXTERNALS * J P************* ` P* v P* " P EXTRN SAVE8 SAVE 8 REGISTERS 0 P EXTRN IHRET8 RESTORE 8 REGISTERS AND RETURN 4 P EXTRN IHRTN RETURN WITHOUT ENABLING
0x130dfc…130f90 Dummy {f00=0x005f, f01=0x0190, f02=»SPATCHING j , P EXTRN QTJOB QUEUE TERM.PROG. FOR DISP. " P EXTRN MEXIT MONITOR TASK EXIT B P EXTRN TDISP DISPATCHER h 2 P EXTRN DISEND BRANCH TO DISPATCHER VIA TENDIO * P EXTRN LKMQDI QUEUE TASK AND DISPATCH , P EXTRN GETBLK PUT BLOCK IN P
0x130f90…131124 Dummy {f00=0x005f, f01=0x0190, f02=» & P EXTRN TTB:ID TASK IDENTIFICATION ( P EXTRN TTB:ST TASK STATUS AND LEVEL . & P EXTRN TTB:PW PROGRAM STATUS WORD Z P EXTRN TTB:SA SAVE AREA P EXTRN TTB:MT MMUTAB P EXTRN TIODM ENTRY FOR DM P EXTRN REQEND ENTRY FOR DM * P EXT
0x131124…1312b8 Dummy {f00=0x005f, f01=0x0190, f02=»* h P* P* CONDITIONAL ASSEMBLY P* 2 . P***************************************** < P* n . P* A PROGRAM VERSION USING TOSS MMU PAGING x * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG EQU 1 P* P* 6
0x1312b8…13144c Dummy {f00=0x005f, f01=0x0190, f02=» P* P* 0 P* A PROGRAM VERSION INCLUDING ATTACH/DETACH * P* IS OBTAINED BY SETTING ATTDET EQU 1. L P* z PX:A EQU 0 PATTDET EQU 1 P* P* 4 P* A PROGRAM VERSION SPECIALIZED FOR THE 857 CPU * P* IS OBTAINED BY S
0x13144c…1315e0 Dummy {f00=0x005f, f01=0x0190, f02=»*************** P* FORM STATEMENTS * P******************* 4 P* P P* Z PBYTES FORM 8,8 d P* z P EJECT TOSSIO P* P* P********************* P* DWT DISPLACEMENTS * P*********************
0x1315e0…131774 (1, 128) Dummy {f00=0x005f, f01=0x0190, f02=»C EQU /03 BYTE COUNTER PDWTECB EQU /04 ECB ADDRESS " PDWTOR EQU /06 INDEX AND ORDER @ ( PDWTOCH EQU /06 LAST OUTPUT CHARACTER f ( PDWTADR EQU /08 DRIVER ADDRESS BLOCK PDWTTAB EQU /0A TTAB ADDRESS * PDWTWAT EQU /0C WAIT/ACTIVATE INDICATOR
0x131774…131908 Dummy {f00=0x005f, f01=0x0190, f02=» MMUPAG=0 4 PDWTDRD EQU DWTTQ+2 START OF DRIVER DEFINED PART P XIF J P* V P IFT MMUPAG=1 ` 4 PDWTDRD EQU DWTMEC+2 START OF DRIVER DEFINED PART v P XIF P* P EJECT TOSSIO P* , P* DWT DISPLACEMENTS: DRIVER DEFINE
0x131908…131a9c Dummy {f00=0x005f, f01=0x0190, f02=»DWTDRD+/02 SAVE AREA A2 & PDWTA3 EQU DWTDRD+/02 SAVE AREA A3 & PDWTA4 EQU DWTDRD+/04 SAVE AREA A4 J & PDWTA5 EQU DWTDRD+/06 SAVE AREA A5 t . PDWTSB1 EQU DWTDRD+/0A STACK BASE 1 IN DWT . PDWTSB2 EQU DWTDRD+/0E STACK BASE 2 IN DWT & PDWTTP
0x131a9c…131c30 Dummy {f00=0x005f, f01=0x0190, f02=» DWTDRD+/1C DISC VOLUME NAME P* $ P EJECT TOSSIO . P* F P* P * P************************************** Z * P* DRIVER ADDRESS BLOCK DISPLACEMENTS * * P************************************** P* P* & PKEYLEN EQU -6 DW
0x131c30…131dc4 Dummy {f00=0x005f, f01=0x018e, f02=» PABTADR EQU 2 ABORT ADDRESS " PINTADR EQU 4 INTERRUPT ADDRESS & $ PPOLADR EQU 4 BUFFER POOL ADDRESS L " PRECADR EQU 6 RECOVERY ADDRESS t PECHADR EQU 8 ECHO ADDRESS P* P* P*********************** P* DEVICE INDEX VALUES *
0x131dc4…131f58 Dummy {f00=0x005f, f01=0x0190, f02=» F P* FROM ADDRESS TABLES TIOTAB AND TENTAB AT READ/WRITE REQUESTS. P* N $ PDC:DIX EQU -2 DATA COMMUNICATION X PDM:DIX EQU 0 DATA MANAGEMENT $ PPC:DIX EQU 2 PROGRAMMED CHANNEL " PMX:DIX EQU 4 MULTIPLEX CHANNEL PKB:DIX EQU 6 KEYBOARD/
0x131f58…1320ec Dummy {f00=0x005f, f01=0x0190, f02=» P* ECB DISPLACEMENTS * P********************* " P* @ P* J PECBFC EQU /01 FILE CODE T PECBBA EQU /02 BUFFER ADDRESS t " PECBRL EQU /04 REQUESTED LENGTH " PECBEL EQU /06 EFFECTIVE LENGTH PECBRC EQU /08 RETURN CODE PEC
0x1320ec…132280 Dummy {f00=0x005f, f01=0x0190, f02=»PAG=1 P* P* P********** " P* TIOTAB * 4 P********** F P* X < P* TIOTAB CONTAINS ADDRESSES TO ROUTINES ENTERED FROM TIO b P* 2 PTIOTAB EQU * DEVICE TYPE/ROUTINE ADDRESS TABLE . P DATA TIO:DM DATA MANAGEMENT, INPUT/OU
0x132280…132414 (1, 129) Dummy {f00=0x005f, f01=0x0190, f02=» PTINDEX EQU *-TIOTAB 0 P DATA TIOITI INTERTASK COMMUNICATION, INPUT , P DATA TIOPCO PROGRAMMED CHANNEL, OUTPUT T P DATA TIOMXO MUX, OUTPUT & P DATA TIOKBO KEYBOARD/CTW, OUTPUT 0 P DATA TIOITO INTERTASK COMMUNICATION, OUTPUT P*
0x132414…1325a8 Dummy {f00=0x005f, f01=0x0190, f02=»SES TO ROUTINES ENTERED FROM TENDIO x P* , 2 PTENTAB EQU * DEVICE TYPE/ROUTINE ADDRESS TABLE 6 . P DATA TEN:DM DATA MANAGEMENT, INPUT/OUTPUT l * P DATA TENPCI PROGRAMMED CHANNEL, INPUT P DATA TENMXI MUX, INPUT $ P DATA TENKBI KEYBOARD/CTW, I
0x1325a8…13273c Dummy {f00=0x005f, f01=0x0190, f02=» x & P DATA TENKBO KEYBOARD/CTW, OUTPUT 0 P DATA TENITO INTERTASK COMMUNICATION, OUTPUT 2 P XIF f P* r P EJECT TOSSIO | P* P* P********** P* MONMMU * P********** P* P* MONITOR (SYSTEM) MMU TABLE
0x13273c…1328d0 Dummy {f00=0x005f, f01=0x0190, f02=»400,/1800,/1C00 " P DATA /2000,/2400,/2800,/2C00 " P DATA /3000,/3400,/3800,/3C00 > P XIF d P* p P EJECT TOSSIO z P* P* P IFT ATTDET=1 P* 2 P* SUBROUTINES BELOW ARE USED BY ATTACH/DETACH P* P*
0x1328d0…132a64 Dummy {f00=0x005f, f01=0x0190, f02=» = BLOCK ADDRESS P* A5 = TTAB ADDRESS P* A6 = DWT ADDRESS < " P* A1-A3 ARE DESTROYED ^ P* PTIMOUT LDR A6,A1 & P LDR* A2,A2 TIMER POINTER ADDRESS P LD A5,2,A2 GET TTAB ADDRESS P* P IFT MMUPA
0x132a64…132bf8 Dummy {f00=0x005f, f01=0x018e, f02=»,A4 " P STR A1,A2 REMOVE FROM ATT:CH P CF A15,FREBLK 2 P* H P EJECT TOSSIO R P* j & P* REMOVE TTAB FROM DEVICE QUEUE t P* P LDR A1,A6 & P ADK A1,DWTTQ QUEUE ANCHOR ADDRESS P* PTIM:10 LDR A2,A1 SAVE
0x132bf8…132d8c Dummy {f00=0x005f, f01=0x018e, f02=» P EJECT TOSSIO P* & P* TTAB FOUND - REMOVE FROM QUEUE & P* P P LDR* A1,A1 Z P STR A1,A2 n P* PTIM:20 EQU * P LDK A3,4 . P ADS A3,TTB:SA,A5 UPDATE DISPATCH ADDRESS : P LD A8,TTB:SA+16,A5 GET ECB ADDRESS FR
0x132d8c…132f20 Dummy {f00=0x005f, f01=0x0190, f02=» P XIF P* P IFT ATTDET=1 P IFT MMUPAG=1 0 * P ES A3,ECBRC,A8 INDICATE ERROR IN ECB F . P TL MONMMU LOAD MONITOR (SYSTEM) MMU TABLE t P XIF P* P IFT ATTDET=1 & P RF TIORTN QUEUE TASK AND DISPATCH P* P E
0x132f20…1330b4 (1, 130) Dummy {f00=0x0060, f01=0x0190, f02=»B ADDRESS ~ P* 6 P* OUTPUT: A2 = ADDRESS TO PRECEDING BLOCK IN CHAIN 2 P* A4 = BLOCK ADDRESS IF FOUND, ELSE 0 V P* ( PFNDBLK LDKL A4,ATT:CH ANCHOR ADDRESS P* PFND:10 LDR A2,A4 SAVE A4 P LDR* A4,A4 P RF(Z) F
0x1330b4…133248 Dummy {f00=0x0060, f01=0x0190, f02=»BL IHRTN RETURN P XIF P* $ P IFT ATTDET=1 . P IFT CPU852=0 D P RTN A15 RETURN Z P XIF r P* ~ P IFT ATTDET=1 & PATT:CH DATA 0 ATTACH CHAIN ANCHOR P* P EJECT TOSSIO P* P* F D B A T T / F D
0x133248…1333dc Dummy {f00=0x0060, f01=0x0190, f02=»A5 = TTAB ADDRESS P* A6 = FDB ADDRESS $ P* A10 = /800 (ATTACH BIT) < P* d " P* OUTPUT: A2-A4 AREA DESTROYED n P* PFDBDET EQU * P C1R A10,A10 A10=F7FF P* PFDBATT EQU * P LDR A4,A6 FDB ADDRESS
0x1333dc…133570 Dummy {f00=0x0060, f01=0x0190, f02=»A2,A4 NEXT FDB P RF(Z) FDB:20 NO FDB? ! P LDR A10,A10 ! 4 " P RF(N) FDB:15 DETACH REQUEST? ! H $ P ORS A10,DWTST,A2 ATTACH REQUEST ! n P ST A5,DWTTAB,A2 ! P RF FDB:20 ! P* ! * PFDB:15 ANS A10,DWTST,A2 DETACH REQUEST ! P CF A15,QREQ UPD
0x133570…133704 Dummy {f00=0x0060, f01=0x0190, f02=»E Q ! P* " 8 P* SUBROUTINE TO QUEUE TASK IN DEVICE QUEUE (IF ANY) " P* " R P* INPUT: A2 = DWT ADDRESS " P* " ~ " P* OUTPUT: A7, A9 ARE DESTROYED " P* " PQREQ EQU * " & P LDR A9,A5 SAVE A5 (TTAB ADDRESS) " & P LD A5,DWTTQ,A2 ANY
0x133704…133898 Dummy {f00=0x0060, f01=0x0190, f02=»TASK " | P* # PQRE:10 EQU * # $ P LDR A5,A9 RESTORE TTAB ADDRESS # * P IFT CPU852=1 # R P RB FND:20 RETURN # h P XIF # P* # P IFT ATTDET=1 # P IFT CPU852=0 # P RTN A15 RETURN # P XIF # P* # P IFT ATTDET=1 # P
0x133898…133a2c Dummy {f00=0x0060, f01=0x0190, f02=»MODULE IS CALLED FROM TIO WITH # P* THE FOLLOWING PARAMETERS: $ & P* $ J & P* A3 /8000 (REQUEST ERROR BIT) $ T & P* A4 I/O AND ACTIVATE INDICATOR $ ~ P* A5 TTAB ADDRESS $ P* A6 DWT ADDRESS $ P* A7 ORDER CODE $ P* A8 ECB AD
0x133a2c…133bc0 Dummy {f00=0x0060, f01=0x0190, f02=»CH EQU * ENTRY $ P ADK A4,0 SET CR % * P RF(NZ) TIOERR I/O AND ACTIVATE ERROR? % . P* % P IFT MMUPAG=0 % f " P CM ECBRC,A8 RESET RETURN CODE % | P XIF % P* % P IFT ATTDET=1 % P IFT MMUPAG=1 % & P ES A4,ECBRC,A8 RESET RETURN CODE %
0x133bc0…133d54 (1, 131) Dummy {f00=0x0060, f01=0x0190, f02=»ALREADY ATTACHED? % z P LDR A13,A13 & P RF(NN) ATT:50 DEVICE BUSY? & . P* & R P* ATTACH REQUESTING TASK & P* & P ORS A10,DWTST,A6 ATTACH & , P ST A5,DWTTAB,A6 PUT TTAB ADDRESS IN DWT & P CWK A12,TIODM & " P RF(NE) ATT:15 NO DM REQ
0x133d54…133ee8 Dummy {f00=0x0060, f01=0x0190, f02=»4,0 SET CR & P RF(Z) ATTRTN NO! ' P* ' , P EJECT TOSSIO ' 6 P* ' N & P* FREE BLOCK AND TIMER IN ATT:CH ' X P* ' P CM* 2,A4 FREE TIMER ' " P LDR* A3,A4 REMOVE FROM ATT:CH ' P STR A3,A2 ' P CF A15,FREBLK RELEASE BLOCK ' P RF
0x133ee8…13407c Dummy {f00=0x0060, f01=0x0190, f02=»A15,FNDBLK ' P ADK A4,0 SET CR ( $ P RF(NZ) ATT:70 IS TIMER ACTIVE? ( , P* ( T P* SET TIMER ( ^ P* ( v P IFT MMUPAG=0 ( P LD A1,ECBCW,A8 TIME ( P XIF ( P* ( P EJECT TOSSIO ( P* ( P* ( P IFT ATTDET=1 (
0x13407c…134210 Dummy {f00=0x0060, f01=0x0190, f02=»Z) ATT:80 END REQUEST? ( P* ) PATT:60 ST A1,ATTIM ) ( P LDR A1,A5 TTAB ADDRESS ) B P LD A3,ATT:CH ANCHOR ) b P CF A15,GETBLK GET BLOCK ) ~ P ST A4,ATT:CH UPDATE ANCHOR ) $ P ADK A4,2 TIMER POINTER ADDRESS ) P LDR A1,A6 DWT ADDRESS ) P
0x134210…1343a4 Dummy {f00=0x0060, f01=0x0190, f02=» P RF TIOQ20 * P* * & PATT:80 LDK A3,/40 SET TIME OUT BIT * P RF TIOERR RETURN * J P* * d P EJECT TOSSIO * n P* * P* * P********** * P* DETACH * * P********** * P* * * P* THIS MODULE IS CALLED FROM TIO WITH * $ P
0x1343a4…134538 Dummy {f00=0x0060, f01=0x0190, f02=» P TM A10,A13 + P RF(Z) TIOERR NOT ATTACHED? + P CW A5,DWTTAB,A6 + < * P RF(NE) TIOERR ATTACHED TO OTHER TASK? + T P XRS A10,DWTST,A6 DETACH + P CWK A12,TIODM + " P RF(NE) DET:05 NO DM REQUEST? + ( P CF A15,FDBDET DETACH FILE STRUCTURE +
0x134538…1346cc Dummy {f00=0x0060, f01=0x0190, f02=»ATTRTN EQU * COMMON ATTACH/DETACH NORMAL EXIT + PDETRTN LDK A3,0 RETURN CODE , 6 P XIF , Z P* , f P EJECT TOSSIO , p P* , P* , P********** , P* TIOERR * , P********** , P* , P* ERROR: FILE CODE UNKNOWN , ( P* TIOERR I
0x1346cc…134860 Dummy {f00=0x0060, f01=0x0190, f02=»,ECBRC,A8 INDICATE ERROR IN ECB , P XIF - ( P* - 4 P IFT MMUPAG=1 - > * P ES A3,ECBRC,A8 INDICATE ERROR IN ECB - T P XIF - P* - PTIORTN EQU * - ( P ABL LKMQDI QUEUE TASK AND DISPATCH - P* - P EJECT TOSSIO - P* - P* -
0x134860…1349f4 (1, 132) Dummy {f00=0x0060, f01=0x018e, f02=»ICE REQUESTS. - j > P* THE ROUTINE IS ENTERED AT DIFFERENT LABELS DEPENDING ON . @ P* WHETHER THE DEVICE IS AN ECHO DEVICE OR NOT, AND DEPENDING . X 8 P* ON WHETHER THE DEVICE IS ATTACHED OR NOT, AND WHEN . B P* ATTACHED, WHETHER THE DEVICE IS ATTACHED TO TH
0x1349f4…134b88 Dummy {f00=0x0060, f01=0x018e, f02=» P* / ( PTIOQ05 ADK A6,DWTTQ GET QUEUE ANCHOR / P LDR A2,A6 / : P LDR* A6,A6 / L $ P RF TIOQ40 INSERT FIRST IN QUEUE / ` P* / & PTIOQ10 LDR A6,A2 QUEUE ECHO DEVICE / P* / ( PTIOQ20 ADK A6,DWTTQ GET QUEUE ANCHOR / P LD A1,TTB:ST+1,A5 GET
0x134b88…134d1c Dummy {f00=0x0060, f01=0x0190, f02=» $ P LDR* A6,A6 FOLLOW QUEUE TO END 0 P RF(Z) TIOQ40 END FOUND? 0 , & P CC A1,TTB:ST+1,A6 COMPARE LEVELS 0 L P RB(NL) TIOQ30 TRY NEXT? 0 v P* 0 0 P* INSERT IN QUEUE AND UPDATE PROGRAM COUNTER 0 P* 0 PTIOQ40 LDKL A3,-4 0 P STR A6,A5 INSER
0x134d1c…134eb0 Dummy {f00=0x0060, f01=0x018e, f02=»OQ50 ADS A3,TTB:SA,A5 UPDATE PC TO REPEAT LKM 0 P* 1 6 PTIOQ60 EQU * 1 @ P ABL TDISP GO TO DISPATCHER 1 T P* 1 x P EJECT TOSSIO 1 P* 1 P* 1 P******* 1 P* TIO * 1 P******* 1 P* 1 P* 1 . P* THIS MODULE IS ENTER
0x134eb0…135044 Dummy {f00=0x0060, f01=0x0190, f02=» 2 P* AND THE TERMINAL PROGRAM SET IN WAIT STATE. 2 P* 2 : 2 P* WHEN RUNNING WITH MMU OPTION SPECIAL DEVICE 2 D * P* DEPENDENT SUBROUTINES ARE PERFORMED. 2 z P* 2 6 P* THIS MODULE IS CALLED BY THE LKM HANDLING MODULE 2 & P* WITH THE FOLLOWING PARAMET
0x135044…1351d8 Dummy {f00=0x0060, f01=0x018e, f02=»ZERO, I/O AND ACTIVATION 2 P* 3 P* A5 = TTAB ADDRESS 3 * P* 3 F P* A7 = ORDER CODE 3 P P* 3 j P* A8 = ECB ADDRESS 3 t P* 3 P EJECT TOSSIO 3 P* 3 P* 3 < P* THE 'TIO'-ROUTINE EXITS TO REQUESTED ACTIVATION DRIVER 3 * P*
0x1351d8…13536c Dummy {f00=0x0060, f01=0x0190, f02=» P* A7 = ORDER CODE 4 P* 4 P* A8 = ECB ADDRESS 4 ( P* 4 D , P* A12 = ADDRESS TO DRIVER ADDRESS BLOCK 4 N P* 4 ~ 0 P* A13 = 0, IF REQUEST ISSUED IN SYSTEM MODE 4 . P* = 1, " " " " USER MODE 4 P* 4 P* 4 , P* THE
0x13536c…135500 Dummy {f00=0x0060, f01=0x0190, f02=» AND ECHO FIELDS 4 P* -DWTTAB TTAB ADDRESS 5 & P* -DWTWAT WAIT/ACTIVATE INDICATOR 5 8 . P* -DWTUEC USER ECB ADDRESS (MMU SYSTEMS) 5 b P* 5 P* 5 * P* THE FOLLOWING ECB FIELDS ARE RESET:- 5 P* 5 P* -BIT 0 IN THE FIRST WORD 5 P* -
0x135500…135694 (1, 133) Dummy {f00=0x0060, f01=0x0190, f02=» REQUEST IS BUSY 5 r P* 6 ( PTIO CF A15,FNDDWT SEARCH DWT ADDRESS 6 " P LDKL A3,/8000 6 N P ADK A6,0 SET CR 6 d $ P RB(Z) TIOERR FILE CODE UNKNOWN? 6 | : P LD A12,DWTADR,A6 GET ADDRESS TO DRIVER ADDRESS BLOCK 6 $ P LD A13,DWTST,A6 GET DWT STATUS 6
0x135694…135828 Dummy {f00=0x0060, f01=0x0190, f02=»ATTACH ORDER? 6 P SUK A7,1 7 P RB(Z) DETACH DETACH ORDER? 7 ( " P ADK A7,/BC RESTORE ORDER CODE 7 L P XIF 7 r P* END OF =1 7 ~ " P LD A11,TTB:ID,A5 GET TASK ID 7 P ANKL A11,/FF44 7 P SUKL A11,'#D' CHECK TASK ID 7 " P RF(Z) TIO020 DMTA
0x135828…1359bc Dummy {f00=0x0060, f01=0x0190, f02=»SIO 7 P* 8 & P* CHECK IF DEVICE IS ATTACHED/BUSY 8 P* 8 @ P IFT ATTDET=1 8 J P TM A10,A13 8 ` P RF(Z) TIO020 NOT ATTACHED? 8 t P CW A5,DWTTAB,A6 8 * P RB(NE) TIOQ20 ATTACHED TO OTHER TASK? 8 P TM A3,A13 8 $ P RF(NZ) TIO030 DEVICE NO
0x1359bc…135b50 Dummy {f00=0x0060, f01=0x0190, f02=»USY? 8 z P* 9 P EJECT TOSSIO 9 P* 9 . H P* CHECK IF ECHO, AND WHEN TRUE CHECK IF ECHO DEVICE IS BUSY/ATTACHED 9 8 P* 9 * PTIO030 SC A2,DWTOR,A6 STORE DWT INDEX 9 P LDK A2,/40 CHECK IF ECHO 9 P ANR A2,A7 9 P RF(Z) TIO070 NOT ECHO?
0x135b50…135ce4 Dummy {f00=0x0060, f01=0x0190, f02=» P* : . PTIO040 LD A2,DWTECH,A6 GET ECHO DEVICE DWT : " P RF(Z) TIO070 NO ECHO DEVICE? : @ & P LD A9,DEVIND,A12 GET DEVICE INDEX : f $ P CWK A9,KB:DIX CHECK IF KEYBOARD : 4 P RF(NE) TIO070 ECHO NOT ALLOWED IF NOT KEYBOARD : ( P LD A14,DWTST,A2 GET ECH
0x135ce4…135e78 Dummy {f00=0x0060, f01=0x0190, f02=» : 6 P RB(NE) TIOQ10 ECHO DEVICE ATTACHED TO OTHER TASK? ; P TM A3,A14 ; B ( P RF(NZ) TIO060 ECHO DEVICE NOT BUSY? ; T & P RB TIOQ00 BUSY, QUEUE ECHO DEVICE ; P XIF ; P* ; P EJECT TOSSIO ; P* ; P* ; PTIO050 TM A3,A14 ; $ P RB(
0x135e78…13600c Dummy {f00=0x0060, f01=0x0190, f02=»* ; P* UPDATE ECB AND DWT FIELDS < P* < . @ PTIO070 XRS A3,DWTST,A6 UPDATE BUSY & ECHO BITS IN DWT STATUS < 8 P* < | P IFT MMUPAG=1 < P LD A13,TTB:PW,A5 GET PSW < ( P ANKL A13,1 GET SYSTEM/USER MODE BIT < $ P RF(NZ) TIO100 JUMP IF USER MO
0x13600c…1361a0 Dummy {f00=0x0060, f01=0x0190, f02=»L,A8 RESET EFFECTIVE LENGTH < $ P CM ECBRC,A8 RESET RETURN CODE = $ P RF TIO110 = L P* = ^ P EJECT TOSSIO = h P* = P* MOVE USER ECB TO DWT ECB = P* = PTIO100 EQU * = P LDKL A2,/4FFF = * P ELR A3,A8 LOAD FIRST WORD OF USER ECB =
0x1361a0…136334 (1, 134) Dummy {f00=0x0061, f01=0x0190, f02=»B,A6 SET ACTUAL ECB ADDRESS = P STR A3,A2 > $ * P ST A8,DWTUEC,A6 SAVE USER ECB ADDRESS > 6 P LDR A9,A8 > d P LDK A3,0 > v * P ES A3,ECBEL,A8 RESET EFFECTIVE LENGTH > & P ES A3,ECBRC,A8 RESET RETURN CODE > P* > P LDR A10,A1 SAVE PARAMETER >
0x136334…1364c8 Dummy {f00=0x0061, f01=0x0190, f02=» MOVE PART OF USER ECB TO DWT ECB > " P LDR A1,A10 RESTORE PARAMETER ? * P XIF ? P P* ? P IFT MMUPAG=0 ? f P LDKL A3,/7FFF ? | , P ANRS A3,A8 RESET BIT 0 IN ECB FILE CODE ? ( P CM ECBEL,A8 RESET EFFECTIVE LENGTH ? $ P CM ECBRC,A8 RESET RETURN
0x1364c8…13665c Dummy {f00=0x0061, f01=0x0190, f02=»/3F ? ( P SC A7,DWTOR+1,A6 STORE ORDER IN DWT @ P CWK A12,TIODM @ 8 * P RF(NE) TIO120 JUMP IF NOT DM REQUEST @ N 0 P ST A5,DWTTDM,A6 SAVE TTAB ADDRESS IN DWTTDM @ | P RF TIO130 @ P* @ PTIO120 EQU * @ 0 P ST A5,DWTTAB,A6 SAVE TTAB ADDRESS IN DW
0x13665c…1367f0 Dummy {f00=0x0061, f01=0x0190, f02=» DWTWAT (WAIT/ACTIVATE INDICATOR) @ P* A * P LDR A2,A4 CHECK PARAMETER A 4 & P RF(NZ) TIO210 I/O AND ACTIVATION? A V 4 P ANK A3,/80 NORMAL I/O. CHECK IF WAIT REQUESTED A P RF(Z) TIO220 NOT WAIT? A P LDK A4,1 INDICATE WAIT A P RF TIO230 A
0x1367f0…136984 Dummy {f00=0x0061, f01=0x0190, f02=» P* B 8 PTIO230 ST A4,DWTWAT,A6 STORE WAIT/ACTIVATE INDICATOR B P* B J P EJECT TOSSIO B T P* B l P* B v P IFT MMUPAG=1 B * P LDR A13,A13 CHECK IF SYSTEM/USER MODE B & P RF(Z) TIO250 JUMP IF SYSTEM MODE B & P LD A3,DEVIND,A12 GET DEVI
0x136984…136b18 Dummy {f00=0x0061, f01=0x0190, f02=»ER CODE B z P* C P LDR A4,A7 GET ORDER CODE C 0 P CF A15,RD:WR2 CHECK IF ORDER IS READ/WRITE C < . P RF(Z) TIO250 JUMP IF NO READ/WRITE ORDER C p P* C PTIO240 EQU * C P ENB C < P CFI A15,TIOTAB,A3 BRANCH TO RELEVANT READ/WRITE ROUTINE C
0x136b18…136cac Dummy {f00=0x0061, f01=0x0190, f02=»A6 C P INH D & P ABR* A12 GO TO DRIVER ACTIVATION D P* D @ P EJECT TOSSIO D J P* D b P* D l P IFT MMUPAG=1 D v P* D P* R D : W R D P* D @ P* THIS MODULE IS CALLED BY 'TIO' AND 'TENDIO' FOR SELECTING D @ P* THE APPROPRIAT
0x136cac…136e40 Dummy {f00=0x0061, f01=0x0190, f02=» REQUEST, CONDITION REGISTER ON STACK IS D ~ * P* SET TO ZERO, ELSE NOT EQUAL TO ZERO. E 0 P* E ^ P* INPUT: A3 = DEVICE INDEX E h P* A6 = DWT ADDRESS E P* E : P* OUTPUT: A3 = INDEX FOR USE IN THE INDEXED BRANCHING E . P* CR = 0 I
0x136e40…136fd4 (1, 135) Dummy {f00=0x0061, f01=0x0190, f02=» GET ORDER CODE FROM DWT E | P ANK A4,/3F F P* F 4 * PRD:WR2 ADKL A15,4 ADJUST STACKPOINTER F > $ P LC A4,ORDTAB,A4 GET ORDER INDEX F l P ANK A4,/FF F . P ABR(Z)* A15 RETURN IF NO READ/WRITE ORDER F P SUK A4,1 F $ P ADR A3,A4 ADD READ/WRITE IN
0x136fd4…137168 Dummy {f00=0x0061, f01=0x0190, f02=» * F P********** G P* G 2 P* ORDTAB CONTAINS ORDER CONSTANTS AS FOLLOWS: G & P* G P* =0: NO READ/WRITE ORDER G f P* =1: READ ORDER G P* =TINDEX+1: WRITE ORDER G P* G PORDTAB EQU * ORDER CONSTANTS G P BYTES 0,1 /00, /01 G
0x137168…1372fc Dummy {f00=0x0061, f01=0x0190, f02=» G v P BYTES 1,TINDEX+1 /0A, /0B H P BYTES 0,0 /0C, /0D H * P BYTES 0,0 /0E, /0F H F P BYTES 0,1 /10, /11 H b P BYTES 0,0 /12, /13 H ~ P BYTES 0,TINDEX+1 /14, /15 H P BYTES 0,0 /16, /17 H P BYTES 0,0 /18, /19 H P BYTES 0,0 /1A, /1B
0x1372fc…137490 Dummy {f00=0x0061, f01=0x0190, f02=»ES 0,0 /24, /25 H P BYTES 0,0 /26, /27 I P BYTES 0,0 /28, /29 I 4 P BYTES 0,0 /2A, /2B I P P BYTES 0,1 /2C, /2D I l P BYTES 1,TINDEX+1 /2E, /2F I P BYTES 0,0 /30, /31 I P BYTES 0,0 /32, /33 I P BYTES 0,0 /34, /35 I P BYTES 0,0
0x137490…137624 Dummy {f00=0x0061, f01=0x0190, f02=» P EJECT TOSSIO J P* J P* T I O : D M J & P* J < 4 P* THIS MODULE IS CALLED BY 'TIO' WHEN A REQUEST J F * P* FOR DATA MANAGEMENT HAS BEEN ISSUED. J ~ P* J & P* INPUT: A8 = FDB MMU ECB ADDRESS J $ P* A9 = USER ECB ADDRESS J P
0x137624…1377b8 Dummy {f00=0x0061, f01=0x0190, f02=»ADDRESS J p P ST A2,ECBBA,A8 K , P EL A2,ECBCW2,A9 GET SECOND CONTROL WORD K ( P ST A2,ECBCW2,A8 K X P* K p PA15RTN EQU * K z P RTN A15 K P* K P EJECT TOSSIO K P* K P* T I O P C I K P* K B P* THIS MODULE IS CALLED BY 'TI
0x1377b8…13794c Dummy {f00=0x0061, f01=0x0190, f02=»UFFER ADDRESSES SO THAT BOTH ARE K r < P* EVEN OR UNEVEN, DEPENDING ON THE USER BUFFER ADDRESS. L ( 4 P* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT L h , P* COMPLETION OF THE REQUEST IS 'TENPCI'. L 4 P* NOTICE THAT ENTRY TIPI05 IS USED BY 'TIOKBI'. L P
0x13794c…137ae0 Dummy {f00=0x0061, f01=0x0190, f02=»* L P* OUTPUT: A1 IS DESTROYED M P* M , * PTIOPCI EQU * PROGRAMMED CHANNEL, INPUT M 6 ( P LD A1,ECBRL,A8 GET REQUESTED LENGTH M d 2 P CW A1,BUFLEN,A12 COMPARE WITH DWT BUFFER SIZE M 6 P RF(G) IO:ERR REQ. LENGTH EXCEEDS DWT BUFFER SIZE? M P* M .
0x137ae0…137c74 (1, 136) Dummy {f00=0x0061, f01=0x0190, f02=» BUFFER ADDRESS EVEN? M ~ P ORS A1,ECBBA,A8 N P RTN A15 N 6 P* N F 0 PTIPI10 SUK A1,2 MAKE DWT BUFFER ADDRESS EVEN N P P ANS A1,ECBBA,A8 N P RTN A15 N P* N P EJECT TOSSIO N P* N P* T I O M X I N P* N B P* THIS MODULE IS
0x137c74…137e08 Dummy {f00=0x0061, f01=0x0190, f02=»ES THE FULL 18 BIT BUFFER ADDRESS WHICH IS N , P* TRANSFERRED TO THE MUX BY THE DRIVER. O 2 4 P* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT O b , P* COMPLETION OF THE REQUEST IS 'TENMXI'. O 6 P* NOTICE THAT MODULE 'TIOMXO' IS EQUAL TO TIOMXI. O P* O
0x137e08…137f9c Dummy {f00=0x0061, f01=0x0190, f02=»2 ARE DESTROYED O B P* 18 BIT USER BUFFER ADDRESS IS TRANSFERRED TO DWT ECB P P* P ^ PTIOMXI EQU * MUX, INPUT P h , P EL A1,ECBBA,A9 GET USER BUFFER ADDRESS P P ECR A2,A1 P & P ANKL A1,/FFF SKIP 4 LEFTMOST BITS P P SRL A2,3 P & P A
0x137f9c…138130 Dummy {f00=0x0061, f01=0x0190, f02=» P P ANK A2,/3F Q 4 P SCR A2,A8 STORE BITS 16-17 IN DWT ECB 1ST WORD Q P ANK A2,/0F Q T P SRC A2,4 Q h P ORR A1,A2 Q z 2 P ST A1,ECBBA,A8 STORE MODIFIED BUFFER ADDRESS Q P RTN A15 Q P* Q P EJECT TOSSIO Q P* Q P* T I O K
0x138130…1382c4 Dummy {f00=0x0061, f01=0x0190, f02=»KBI WILL SET BUFFER ADDRESSES Q d 6 P* AND MOVE KEYTABLE (IF ANY) BY USING ENTRY TIPI05 R & 0 P* IN 'TIOPCI' AND ENTRY TIPO05 IN 'TIOPCO'. R ` 4 P* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT R , P* COMPLETION OF THE REQUEST IS 'TENKBI'. R P* R P*
0x1382c4…138458 Dummy {f00=0x0061, f01=0x0190, f02=»ADDRESS TO DRIVER ADDRESS BLOCK R P* S ( " P* OUTPUT: A1-A4 ARE DESTROYED S 2 P* S X PTIOKBI EQU * KEYBOARD/CTW S b ( P LD A1,ECBRL,A8 GET REQUESTED LENGTH S 2 P CW A1,BUFLEN,A12 COMPARE WITH DWT BUFFER SIZE S 6 P RF(G) IO:ERR REQ. LENGTH EXCEEDS
0x138458…1385ec Dummy {f00=0x0061, f01=0x018e, f02=»TABLE IF BASIC READ S | . P LD A4,ECBCW,A8 GET USER KEYTABLE ADDRESS T P RF(Z) TIKB20 NO KEYTABLE? T N P* T p P EJECT TOSSIO T z P* T P* T P LDR A1,A9 T P ADK A1,8 T P ADKL A8,12 T * P ST A8,-2,A8 SET DWT KEYTABLE ADDRESS T
0x1385ec…138780 Dummy {f00=0x0061, f01=0x0190, f02=» , P ECR A3,A3 NO, PUT LENGTH IN RIGHT BYTE U P* U 4 * PTIKB10 ANK A3,/FF SKIP LEFT CHARACTER U > P ADK A3,1 U l 0 P CW A3,KEYLEN,A12 CHECK KEYTABLE BUFFER SIZE U ~ P RF(G) IO:ERR TOO SMALL? U P CF A15,TIPO05 U & P SUKL A8,8 ADJUST DWT ECB ADDRES
0x138780…138914 (1, 137) Dummy {f00=0x0061, f01=0x018e, f02=»TI EQU A15RTN INTERTASK COMMUNICATION, INPUT U P* V 4 P EJECT TOSSIO V > P* V V P* T I O P C O V ` P* V v B P* THIS MODULE IS CALLED BY 'TIO' WHEN A WRITE REQUEST HAS BEEN V > P* ISSUED AND THE DEVICE IS RUNNING ON PROGRAMMED CHANNEL. V B P
0x138914…138aa8 Dummy {f00=0x0061, f01=0x0190, f02=» V N P* BUFFER TO THE DWT BUFFER. W 4 P* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT W , , P* COMPLETION OF THE REQUEST IS 'TENPCO'. W d 6 P* NOTICE THAT MODULE 'TIOKBO' IS EQUAL TO TIOPCO. W F P* NOTICE ALSO THAT ENTRY TIPO05 IS USED BY 'TIOKBI' AND 'T
0x138aa8…138c3c Dummy {f00=0x0061, f01=0x0190, f02=» P* X " P* OUTPUT: A1-A4 ARE DESTROYED X P* X 4 , PTIOPCO EQU * PROGRAMMED CHANNEL, OUTPUT X > 8 P LD A2,DWTADR,A6 GET ADDRESS TO DRIVER ADDRESS BLOCK X n ( P LD A3,ECBRL,A8 GET REQUESTED LENGTH X * P RF(NP) TIPO20 REQUESTED LENGTH <= 0? X 2 P CW
0x138c3c…138dd0 Dummy {f00=0x0061, f01=0x0190, f02=»B ADDRESS X t P* Y P EJECT TOSSIO Y P* Y 4 P* Y > : PTIPO05 EQU * ENTRY POINT USED BY 'TIOKBI' AND 'TENITO' Y H P ADK A3,1 Y . P ANKL A3,/FFFE MAKE REQUESTED LENGTH EVEN Y , P EL A1,ECBBA,A1 GET USER BUFFER ADDRESS Y * P LD A2,ECBBA,A
0x138dd0…138f64 Dummy {f00=0x0061, f01=0x0190, f02=»SER BUFFER ADDRESS UNEVEN? Y P ST A2,ECBBA,A8 Z " P* Z : 6 PTIPO10 MVUS A3 MOVE (USER BUFFER) TO SYSTEM BUFFER Z D P* Z ~ PTIPO20 RTN A15 Z P* Z 0 PTIPO30 EQU * USER BUFFER ADDRESS WAS UNEVEN Z 4 P ORS A4,ECBBA,A8 MAKE DWT BUFFER ADDRESS UNE
0x138f64…1390f8 Dummy {f00=0x0061, f01=0x0190, f02=»TE USER BUFFER POINTER Z ( P ADK A2,2 UPDATE DWT BUFFER POINTER [ ( P RB TIPO10 MOVE REMAINING CHARACTERS [ J P* [ v P EJECT TOSSIO [ P* [ P* I O : E R R [ P* [ , P* DRIVER (DWT) MMU BUFFER IS TOO SMALL. [ B P* SET RETURN CODE /800
0x1390f8…13928c Dummy {f00=0x0061, f01=0x0190, f02=»MMU ROUTINES [ l P INH $ P ADKL A15,4 ADJUST STACKPOINTER " P LD A1,DWTST,A6 GET DWT STATUS H P SLL A1,2 CHECK ECHO BIT n P RF(NN) IO:E10 NOT ECHO? P LDR A1,A6 SAVE DWT ADDRESS * P LD A6,DWTECH,A6 GET ECHO DWT ADDRESS P CF A15,
0x13928c…139420 Dummy {f00=0x0061, f01=0x0190, f02=»CH TO DISPATCHER VIA TENDIO P* ] $ P EJECT TOSSIO ] . P* ] F P* T I O M X O ] P P* ] f " PTIOMXO EQU TIOMXI MUX, OUTPUT ] p P* ] P* T I O K B O ] P* ] * PTIOKBO EQU TIOPCO KEYBOARD/CTW, OUTPUT ] P* ] P* T I O I T O ]
0x139420…1395b4 (1, 138) Dummy {f00=0x0062, f01=0x0190, f02=» P* ^ 6 P* THIS MODULE IS CALLED BY 'TENDIO' WHEN A REQUEST ^ . P* FOR DATA MANAGEMENT HAS BEEN COMPLETED. ^ H P* ^ z P* INPUT: A6 = FDB ADDRESS ^ $ P* A8 = USER ECB ADDRESS ^ P* ^ " P* OUTPUT: A1-A2 ARE DESTROYED ^ P* ^ . P
0x1395b4…139748 Dummy {f00=0x0062, f01=0x0190, f02=»1,A1 ^ P ES A2,ECBCW2,A8 _ P RTN A15 _ $ P* _ 4 P EJECT TOSSIO _ > P* _ V P* T E N P C I _ ` P* _ v D P* THIS MODULE IS CALLED BY 'TENDIO' WHEN A READ REQUEST HAS BEEN _ @ P* COMPLETED AND THE DEVICE IS RUNNING ON PROGRAMMED CHANNEL. _
0x139748…1398dc Dummy {f00=0x0062, f01=0x0190, f02=» _ V & P* ISSUING THE REQUEST IS 'TIOPCI'. ` D P* NOTICE THAT MODULES 'TENKBI' AND 'TENITI' ARE EQUAL TO TENPCI. ` 2 8 P* NOTICE ALSO THAT ENTRY TEN:DC IS USED BY 'DC:MIN'. ` z P* ` P* INPUT: A6 = DWT ADDRESS ` $ P* A8 = USER ECB ADDRESS `
0x1398dc…139a70 Dummy {f00=0x0062, f01=0x018e, f02=»CB ADDRESS ` v ( P LD A4,ECBEL,A2 GET EFFECTIVE LENGTH a " P RF(NP) TEPI30 NO MOVE IF ZERO a > * P LD A1,ECBBA,A2 GET DWT BUFFER ADDRESS a d P* a . PTEN:DC EQU * ENTRY POINT USED BY 'DC:MIN' a , P EL A2,ECBBA,A8 GET USER BUFFER ADDRESS a $ P LDK A3,1
0x139a70…139c04 Dummy {f00=0x0062, f01=0x018e, f02=» a f , P RF(Z) TEPI60 USER BUFFER ADDRESS EVEN? b P* b 8 P EJECT TOSSIO b B P* b Z P* b d 2 PTEPI10 EQU * BOTH BUFFER ADDRESSES WERE UNEVEN b n 4 P LDR* A3,A1 GET FIRST CHARACTER FROM DWT BUFFER b P ELR A8,A2 b P* b * PTEPI15 ANK A3,/F
0x139c04…139d98 Dummy {f00=0x0062, f01=0x0190, f02=» b d $ P ADK A1,1 UPDATE BUFFER POINTERS c P ADK A2,1 c 0 P SUK A4,1 c B * P RF(P) TEPI25 MORE CHARACTERS TO MOVE? c T P RTN A15 NO, RETURN c P* c PTEPI20 TM A3,A2 c , P RF(Z) TEPI25 USER BUFFER ADDRESS EVEN? c & P LDR A3,A1 GET DWT BUFFE
0x139d98…139f2c Dummy {f00=0x0062, f01=0x0190, f02=»R. ONE BYTE TO THE RIGHT c x & P SUK A3,1 POINT TO NEXT CHARACTER d 4 P CWR A3,A1 COMPARE WITH START ADDRESS OF BUFFER d J , P RB(NE) TEPI23 MORE CHARACTERS TO MOVE? d 0 P ADK A1,1 NO, MAKE DWT BUFFER ADDRESS UNEVEN d P RB TEPI10 d P* d P EJECT
0x139f2c…13a0c0 Dummy {f00=0x0062, f01=0x0190, f02=»UNEVEN? d p 0 P MVSU A4 MOVE (SYSTEM BUFFER) TO USER BUFFER e P* e D PTEPI30 RTN A15 e N P* e d , PTEPI40 EQU * EFFECTIVE LENGTH WAS UNEVEN e n ( P SUK A4,1 MAKE EFFECTIVE LENGTH EVEN e . P RF(Z) TEPI50 ONLY ONE CHARACTER TO MOVE? e P LDR A8,A4 N
0x13a0c0…13a254 (1, 139) Dummy {f00=0x0062, f01=0x0190, f02=» PTEPI50 EQU * f 2 P LDR* A8,A1 GET LAST CHARACTER FROM DWT BUFFER f P ELR A3,A2 f N P RB TEPI15 f ` P* f r . PTEPI60 EQU * DWT BUFFER ADDRESS WAS UNEVEN f | & P LDR A3,A1 GET DWT BUFFER ADDRESS f $ P ADR A1,A4 ADD EFFECTIVE LENGTH f P* f &
0x13a254…13a3e8 Dummy {f00=0x0062, f01=0x0190, f02=» f n * P CWR A3,A1 COMPARE WITH ENDING ADDRESS g , P RB(NE) TEPI70 MORE CHARACTERS TO MOVE? g 6 . P SUR A1,A4 NO, RESTORE DWT BUFFER ADDRESS g f * P SUK A1,1 MAKE DWT BUFFER ADDRESS EVEN g P RB TEPI25 g P* g P EJECT TOSSIO g P* g P* T
0x13a3e8…13a57c Dummy {f00=0x0062, f01=0x018e, f02=»PUT g r P* h P* T E N I T I h P* h , 4 PTENITI EQU TENPCI INTERTASK COMMUNICATION, INPUT h 6 P* h n P* T E N P C O h x P* h 0 PTENPCO EQU A15RTN PROGRAMMED CHANNEL, OUTPUT h P* h P* T E N M X O h P* h " PTENMXO EQU A15RTN
0x13a57c…13a710 Dummy {f00=0x0062, f01=0x0190, f02=» h ~ P* i P* T E N I T O i P* i ( F P* THIS MODULE IS CALLED BY 'TENDIO' WHEN A WRITE REQUEST HAS BEEN i 2 L P* COMPLETED FOR INTERTASK COMMUNICATION, IN PURPOSE TO MOVE THE CONTENTS i | J P* OF THE USER BUFFER TO THE DRIVER BUFFER. THE ENTRY TIPO05
0x13a710…13a8a4 Dummy {f00=0x0062, f01=0x018e, f02=» A8 ARE DESTROYED i P* j 0 PTENITO EQU * INTERTASK COMMUNICATION, OUTPUT j $ ( P LD A8,DWTECB,A6 GET DWT ECB ADDRESS j X ( P LD A3,ECBEL,A8 GET EFFECTIVE LENGTH j P RF(NP) TEIO10 NO MOVE? j * P LD A1,DWTUEC,A6 GET USER ECB ADDRESS j ( P CF A15,TI
0x13a8a4…13aa38 Dummy {f00=0x0062, f01=0x0190, f02=» j < P* THIS MODULE IS CALLED BY THE DATA COMMUNICATION DRIVER k < P* IN PURPOSE TO MOVE THE CONTENTS OF THE USER BUFFER TO k H < P* THE DRIVER BUFFER. THE MOVE ROUTINE IN MODULE 'TIOPCO' k " P* IS USED FOR MOVING THE DATA. k P* k P* INPUT: A6 = D
0x13aa38…13abcc Dummy {f00=0x0062, f01=0x0190, f02=»,A15 SAVE A1-A8 ON STACK k $ P SUKL A15,32 ADJUST STACKPOINTER l * P TS 2,A15 SAVE MMU REGISTERS ON STACK l H & P LD A5,DWTTAB,A6 GET TTAB ADDRESS l v $ P TL TTB:MT,A5 LOAD MMU REGISTERS l ( P LD A8,DWTMEC,A6 GET DWT ECB ADDRESS l P ENB l ( P CF A15,
0x13abcc…13ad60 Dummy {f00=0x0062, f01=0x0190, f02=» ADKL A15,32 ADJUST STACKPOINTER l * P MLR 8,A15 RESTORE A1-A8 FROM STACK... m ( P RTN A15 ...AND RETURN m V P XIF m t P* m P EJECT TOSSIO m P* m P* D C : M I N m P* m < P* THIS MODULE IS CALLED BY THE DATA COMMUNICATION DRIVER m
0x13ad60…13aef4 (1, 140) Dummy {f00=0x0062, f01=0x0190, f02=» A4 = DRIVER BUFFER ADDRESS m P* A6 = DWT ADDRESS n & P* n H ( P* OUTPUT: NO REGISTERS ARE DESTROYED n R P* n ~ PDC:MIN EQU * n P IFT MMUPAG=0 n P IFT CPU852=1 n & P CF A15,SAVE8 SAVE A1-A8 ON STACK n P XIF n P* n P
0x13aef4…13b088 Dummy {f00=0x0062, f01=0x0190, f02=»2,A15 SAVE MMU REGISTERS ON STACK n " P LD A5,DWTTAB,A6 TTAB ADDRESS o * $ P TL TTB:MT,A5 LOAD MMU REGISTERS o P P XIF o x P* o P EJECT TOSSIO o P* o & P* CHECK MESSAGE LENGTH AND DECIDE o $ P* IF TTMJOB IS TO BE ACTIVATED. o P* o
0x13b088…13b21c Dummy {f00=0x0062, f01=0x018e, f02=»2=1 o P LDK A7,128 852 CPU p ( P ANK A5,1 CHECK USER BUFFER ADDRESS p ( . P RF(NZ) DCMI00 USER BUFFER ADDRESS UNEVEN p T P ADK A7,128 A7 := 256 p P XIF p P* p P IFT MMUPAG=0 p P IFT CPU852=0 p P IFT CPU857=0 p P LDK A7,80 8
0x13b21c…13b3b0 Dummy {f00=0x0062, f01=0x0190, f02=» P XIF q P* q P IFT MMUPAG=0 q P IFT CPU852=0 q 0 P IFT CPU857=1 q F P LDKL A7,256 857 CPU q ( P ANK A5,1 CHECK USER BUFFER ADDRESS q x . P RF(NZ) DCMI00 USER BUFFER ADDRESS UNEVEN q P ADR A7,A7 A7 := 512 q P XIF q P* q P
0x13b3b0…13b544 Dummy {f00=0x0062, f01=0x0190, f02=»ADDRESS q t P LDKL A7,256 r ( P ANK A5,1 CHECK USER BUFFER ADDRESS r $ . P RF(NZ) DCMI00 USER BUFFER ADDRESS UNEVEN r P P SLL A7,3 A7 := 2048 r P XIF r P* r PDCMI00 EQU * r 8 P CW A7,ECBEL,A3 CHECK IF USER BUFFER IS LARGE ENOUGH r 2 P RF(
0x13b544…13b6d8 Dummy {f00=0x0062, f01=0x018e, f02=» r p P IFT CPU852=1 s ( P ABL IHRET8 RESTORE A1-A8 AND RETURN s P XIF s J P* s V P IFT MMUPAG=0 s ` P IFT CPU852=0 s v * P MLR 8,A15 RESTORE A1-A8 FROM STACK... s P* s PDC:MOT RTN A15 ...AND RETURN s P XIF s P* s P IFT MMUPA
0x13b6d8…13b86c Dummy {f00=0x0062, f01=0x0190, f02=» P* INPUT: A1 = RETURN CODE t P* A3 = ECB ADDRESS t & ( P* A4 = DRIVER BUFFER ADDRESS t H P* A6 = DWT ADDRESS t t P* t & P* OUTPUT: A1-A5, A7 ARE DESTROYED t P* t " PMINMOV EQU * DC:MIN MOVE ENTRY t P ENB t * P L
0x13b86c…13ba00 Dummy {f00=0x0062, f01=0x0190, f02=»3 CHECK IF USER BUFFER IS LARGE ENOUGH t $ P RF(G) MIN:70 NO, REQUEST ERROR u . P* u V P IFT MMUPAG=0 u ` ( P LD A5,ECBBA,A3 USER BUFFER ADDRESS u v P LDR A3,A5 u ( P ANK A3,1 CHECK USER BUFFER ADDRESS u . P RF(NZ) MIN:30 USER BUFFER ADDRESS UNEVE
0x13ba00…13bb94 (1, 141) Dummy {f00=0x0062, f01=0x0190, f02=» P* v PMIN:10 EQU * v P LDR* A3,A7 MOVE ONE WORD v " P STR A3,A5 v D ( P ADK A7,2 INCREMENT BUFFER POINTERS v V P ADK A5,2 v $ P SUK A2,2 DECREMENT LOOP COUNTER v 2 P RB(NN) MIN:10 AT LEAST ONE MORE WORD TO MOVE v P* v PMIN:20 EQU *
0x13bb94…13bd28 Dummy {f00=0x0062, f01=0x0190, f02=» MOVE ONE CHARACTER v P SCR A3,A5 w ( P ADK A7,1 INCREMENT BUFFER POINTERS w . P ADK A5,1 w Z $ P SUK A2,1 DECREMENT LOOP COUNTER w l 6 P RB(P) MIN:30 AT LEAST ONE MORE CHARACTER TO MOVE w P XIF w P* w P IFT MMUPAG=1 w * P ST A1,ECBRC,A
0x13bd28…13bebc Dummy {f00=0x0062, f01=0x0190, f02=»DRESS w t ( P CF A15,TEN:DC MOVE BUFFER CONTENTS x & P LDR A4,A7 RESTORE BUFFER ADDRESS x : P LDK A1,0 x d P XIF x v P* x P EJECT TOSSIO x P* x P* x PMIN:40 EQU * x P INH x " P CF A15,TENDIO PERFORM TENDIO x P* x P
0x13bebc…13c050 Dummy {f00=0x0062, f01=0x0190, f02=»N:50 EQU * x " P LDR A2,A1 SAVE BUFFER ADDRESS y $ P LDR* A1,A2 NEXT BUFFER ADDRESS y 8 , P RB(NZ) MIN:50 NOT LAST BUFFER IN CHAIN y ` P* y $ P* INSERT BUFFER AT END OF CHAIN y P* y " P SUK A4,6 REAL BUFFER ADDRESS y " P STR A4,A2 UPDATE QUEU
0x13c050…13c1e4 Dummy {f00=0x0062, f01=0x0190, f02=»8008 REQUEST ERROR/INCORRECT LENGTH y $ P RB MIN:40 RETURN VIA TENDIO ETC z , P* z T P EJECT TOSSIO z ^ P* z v P* D C M I N T z P* z 2 P* TTMJOB WILL BE DISPATCHED HERE TO CARRY OUT z 2 P* THE MOVE OF THE DC DRIVER BUFFER CONTENTS TO z
0x13c1e4…13c378 Dummy {f00=0x0062, f01=0x018e, f02=» ( P* A4 = DRIVER BUFFER ADDRESS { P* { 0 * PDCMINT EQU * TTMJOB MOVE BUFFER ENTRY { : P LDR A6,A3 DWT ADDRESS { h P LD A3,DWTECB,A6 ECB ADDRESS { P* { P IFT MMUPAG=1 { P INH { " P LD A5,DWTTAB,A6 TTAB ADDRESS { $ P TL TTB:MT,A
0x13c378…13c50c Dummy {f00=0x0062, f01=0x0190, f02=» { ( P CF A15,MINMOV MOVE BUFFER CONTENTS | P ABL MEXIT EXIT TTMJOB | 4 P* | R P EJECT TOSSIO | P* | t P* Q M T A S K | ~ P* | : P* WHEN THE MOVE WILL TAKE TOO LONG TIME TTMJOB WILL BE | 6 P* ACTIVATED AT ENTRY 'DCMINT' TO PERFORM THE
0x13c50c…13c6a0 Dummy {f00=0x0062, f01=0x0190, f02=»R BUFFER ADDRESS | | P* A6 = DWT ADDRESS } P* } : PQMTASK EQU * ACTIVATE TTMJOB } D $ P LDKL A2,DCMINT DISPATCH ADDRESS } h P LDR A3,A6 DWT ADDRESS } " P CF A15,QMJOB ACTIVATE TTMJOB } P LDKL A1,/8000 NOT BUSY BIT } " P ORS A1,DWTST,A6
0x13c6a0…13c834 (1, 142) Dummy {f00=0x0063, f01=0x0190, f02=» IFT CPU852=1 } PDC:MOT INH ~ 2 P ABL IHRTN RETURN WITHOUT ENABLING INTERRUPTS ~ ( P XIF ~ ^ P* ~ j P EJECT TOSSIO ~ t P* ~ P* ~ P********** ~ P* TENDIO * ~ P********** ~ P* ~ P* ~ . P* THIS MODULE IS CALLED WHEN C
0x13c834…13c9c8 Dummy {f00=0x0063, f01=0x0190, f02=»THE TASK ~ r P* P* -IF NORMAL I/O WITH WAIT:- P* > * P* QTJOB IS CALLED TO QUEUE THE TASK H 8 P* FOR DISPATCHING WITH THE FOLLOWING PARAMETERS:- v P* P* A5 = TTAB ADDRESS P* $ P* -IF NORMAL I/O WITH NO WAIT:-
0x13c9c8…13cb5c Dummy {f00=0x0063, f01=0x0190, f02=»UT IN DISPATCHER QUEUE TO REPEAT THE LKM INSTRUCTION. P* > P EJECT TOSSIO H P* ` P* j 0 P* ENTRY PARAMETERS TO THIS SUBROUTINE ARE:- t P* P* A1 = RETURN CODE P* P* A6 = DWT ADDRESS P* P* NO REGIS
0x13cb5c…13ccf0 Dummy {f00=0x0063, f01=0x0190, f02=»* P EJECT TOSSIO P* " P* END I/O ENTRY , P* D PTENDIO EQU * N P IFT CPU852=1 b & P CF A15,SAVE8 SAVE A1-A8 ON STACK x P XIF P* P IFT CPU852=0 P INH " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF
0x13ccf0…13ce84 Dummy {f00=0x0063, f01=0x018e, f02=»,DWTTQ,A6 GET TERMINAL QUEUE LINK " P RF(Z) TEN110 NO TASK QUEUED? * P LD A2,TTB:ID,A5 GET TASK ID P P ANKL A2,/FF44 t P CWK A2,'#D' CHECK TASK ID " P RF(E) TEN100 DM REQUEST NEXT? P LDKL A2,/800 ATTACH BIT P ANR* A2,A4 & P R
0x13ce84…13d018 Dummy {f00=0x0063, f01=0x0190, f02=» P EJECT TOSSIO P* P* * PTEN100 EQU * 4 , P LDR* A3,A5 UPDATE QUEUE ANCHOR ADDRESS H P ST A3,DWTTQ,A6 x . P CF A15,QTJOB QUEUE TASK TO REPEAT REQUEST P* P* UPDATE ECB AND DWT P* 4 PTEN110 LD A5,DWTTAB,A6
0x13d018…13d1ac Dummy {f00=0x0063, f01=0x0190, f02=»ET TTAB ADDRESS ~ 4 P CF A15,REQEND RESET REQUEST BUSY FOR ALL FILES P* P PTEN120 LDKL A2,/8000 Z , P ORRS A2,A4 INDICATE DEVICE READY IN DWT v P LDKL A3,/DBFF ( P ANRS A3,A4 RESET ECHO BIT AND BIT 5 $ P LD A3,DWTECB,A6 GET ECB ADDRESS
0x13d1ac…13d340 Dummy {f00=0x0063, f01=0x0190, f02=»SET EVENT COMPLETED IN ECB , P ORS A1,ECBRC,A3 SET RETURN CODE IN ECB " P* R P IFT MMUPAG=1 P LD A4,TTB:PW,A5 GET PSW r & P ANK A4,1 GET SYSTEM/USER MODE BIT P RF(Z) TEN200 SYSTEM MODE? P* P* LOAD MMU REGISTERS P*
0x13d340…13d4d4 (1, 143) Dummy {f00=0x0063, f01=0x018e, f02=»EGISTERS FROM TTAB x P* P EJECT TOSSIO $ P* < P* MOVE DWT ECB TO USER ECB F P* h * P LD A8,DWTUEC,A6 GET USER ECB ADDRESS r P ELR A4,A8 * P ORR A4,A2 SET EVENT COMPLETED IN ECB P ESR A4,A8 P LDR A1,A3 P ADK
0x13d4d4…13d668 Dummy {f00=0x0063, f01=0x0190, f02=» 8 P LD A3,DWTADR,A6 GET ADDRESS TO DRIVER ADDRESS BLOCK & P LD A3,DEVIND,A3 GET DEVICE INDEX D . P RF(N) TEN160 NO SPECIAL ACTION REQUIRED? n " P RF(Z) TEN140 DATA MANAGEMENT? P* " P* PERFORM CHECK ON ORDER CODE P* , P CF A15,
0x13d668…13d7fc Dummy {f00=0x0063, f01=0x0190, f02=» A15,TENTAB,A3 BRANCH TO RELEVANT READ/WRITE ROUTINE P* < P EJECT TOSSIO F P* ^ P* RESTORE MMU REGISTERS h P* PTEN150 EQU * P INH P* PTEN160 EQU * . P TL 2,A15 RESTORE MMU REGISTERS FROM STACK $ P ADKL
0x13d7fc…13d990 Dummy {f00=0x0063, f01=0x0190, f02=»IVATION b P* PTEN200 EQU * 0 P LD A4,DWTWAT,A6 GET WAIT/ACTIVATE INDICATOR . * P RF(Z) TEN250 NOT WAIT OR ACTIVATION? b P SUK A4,1 P RF(Z) TEN240 WAIT? P ADK A4,1 P LDR A3,A4 P ANK A3,1 P RF(Z) TEN230 ACTIVA
0x13d990…13db24 Dummy {f00=0x0063, f01=0x018e, f02=» RF(Z) TEN210 SYSTEM MODE? . P LD A8,DWTUEC,A6 NO, GET USER ECB ADDRESS " P XIF T P* ` PTEN210 EQU * j 4 P ST A8,TTB:SA+16,A5 SET TO A8 IN TTAB SAVE AREA ~ P* : PTEN220 ADK A4,DWTWAT POINT TO WAIT/ACTIVATE INDICATOR $ P LDR* A3,A
0x13db24…13dcb8 Dummy {f00=0x0063, f01=0x0190, f02=» P* P EJECT TOSSIO P* & P* 0 PTEN230 EQU * : 8 P CF A15,FREBLK ACTIVATE: GET PARAMETER AND DISP ADDR N . P CF A15,ACTOTP ACTIVATE TASK ON LIFO BASIS P RF TEN250 P* PTEN240 EQU * 2 P CF A15,QTJOB WAIT: QUEUE TA
0x13dcb8…13de4c Dummy {f00=0x0063, f01=0x40d2, f02=»2=1 P ABL IHRET8 P XIF P* , P IFT CPU852=0 6 * P MLR 8,A15 RESTORE A1-A8 FROM STACK... L P RTN A15 ...AND RETURN z P XIF P* P* P* P END @ PTEN240 EQU * 2 P CF A15,QTJOB WAIT: QUEUE TA
0x13de4c…13dfe0 Dummy {f00=0x0063, f01=0x2008, f02=» NT TOSSIO END @ &
0x13dfe0…13e174 (1, 144) Dummy {f00=0x0063, f01=0x0190, f02=» @ T @ X W A I ~ , ( * ! @ @ @ , ( 3 A ! @ XN ! T @ N , ( S P ! ! _h /T @ X @ P ~ , ( s ! ! A _ A < , ( P" A @ T _, _0 @ T W @
0x13e174…13e308 Dummy {f00=0x0063, f01=0x0190, f02=» l DC:MOT, , ( @ T _ A C , ( J ) B B A A A A L * & C A ! ! A _^_V @ P X | , ( a R X P T T Y , ( ( { W P C A ,
0x13e308…13e49c Dummy {f00=0x0063, f01=0x0190, f02=» j , ( ]6W P _@ @ @ E ! P , ( ! 4 _$ ! 2_l / A : , ( 7 T W ,W A A W W W j , ( $D W A A ! @ ! @ ! , ( w ! ! B J 4 ! ! , ( T@ @ @
0x13e49c…13e630 Dummy {f00=0x0063, f01=0x0190, f02=» T W ! P " ! " :A , ( *@ H T 0 ! W R ! * , ( * 5 A @ @ U Zx Q P Z , ( U Q T 0 ! A 0 ! A ! , ( u " ! " ! v A _" IH1501 INTSAVL
0x13e630…13e7c4 Dummy {f00=0x0063, f01=0x0190, f02=» A " ? _ I " P , ( U@ A < A 4 A _$" $ , ( P H B P W ! _ T , ( @@ + ! ! 1 4 A 8 @ ` DC15ON b , ( K @ P 0 M A 8 4 ? @ A , ( P k @
0x13e7c4…13e958 Dummy {f00=0x0063, f01=0x0190, f02=» 4 A < ! @ P ! V ! , ( R @ P a A 4 A A A & , ( ?a :a# P @ @ @ V # 4 , ( * - A ! ( ! A @ (:H DW1500 P , ( M 4
0x13e958…13eaec Dummy {f00=0x0063, f01=0x0190, f02=»OPQR$]*);^-/ST v , ( % UVWXYZ@,%_>?0123456789:[ '=" , ( % F , ( & v &' H D ! Z R ~ B R ~ GP, KP OP SP( WP YW _P cP gP o H D !
0x13eaec…13ec80 Dummy {f00=0x0063, f01=0x0190, f02=» ~ P H D ! P P P P P R2 T* P& WP gP kT s wT { H D ! W * T P P < * Tf X H D !U+ Tb Q !P ' P )TR - * /TL 5 * 7TD ;T@ ? CT8 G WP _ c : H D ! m i V o : sT w P {
0x13ec80…13ee14 (1, 145) Opaque[0x194]
0x13ee14…13efa8 # DirEnt {nam=»SYSLDM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0c78, f03=0x0000}
0x13ee14…13efa8 IdxSect {
0x13ee14…13efa8 f00 = 0x0063 // 0x13ee14 @0x0
0x13ee14…13efa8 f01 = 0x0036 // 0x13ee16 @0x2
0x13ee14…13efa8 gno = [ // 0x13ee18 @0x4
0x13ee14…13efa8 [0x00]: C0x0063.0x3.0
0x13ee14…13efa8 [0x01]: C0x0064.0x0.0
0x13ee14…13efa8 [0x02]: C0x0064.0x1.0
0x13ee14…13efa8 [0x03]: C0x0064.0x2.0
0x13ee14…13efa8 [0x04]: C0x0064.0x3.0
0x13ee14…13efa8 [0x05]: C0x0065.0x0.0
0x13ee14…13efa8 [0x06]: C0x0065.0x1.0
0x13ee14…13efa8 [0x07]: C0x0065.0x2.0
0x13ee14…13efa8 [0x08]: C0x0065.0x3.0
0x13ee14…13efa8 [0x09]: C0x0066.0x0.0
0x13ee14…13efa8 [0x0a]: C0x0066.0x1.0
0x13ee14…13efa8 [0x0b]: C0x0066.0x2.0
0x13ee14…13efa8 [0x0c]: C0x0066.0x3.0
0x13ee14…13efa8 [0x0d]: C0x0067.0x0.0
0x13ee14…13efa8 [0x0e]: C0x0067.0x1.0
0x13ee14…13efa8 [0x0f]: C0x0067.0x2.0
0x13ee14…13efa8 [0x10]: C0x0067.0x3.0
0x13ee14…13efa8 [0x11]: C0x0068.0x0.0
0x13ee14…13efa8 [0x12]: C0x0068.0x1.0
0x13ee14…13efa8 [0x13]: C0x0068.0x2.0
0x13ee14…13efa8 [0x14]: C0x0068.0x3.0
0x13ee14…13efa8 [0x15]: C0x0069.0x0.0
0x13ee14…13efa8 [0x16]: C0x0069.0x1.0
0x13ee14…13efa8 [0x17]: C0x0069.0x2.0
0x13ee14…13efa8 [0x18]: C0x0069.0x3.0
0x13ee14…13efa8 [0x19]: C0x006a.0x0.0
0x13ee14…13efa8 [0x1a]: C0x006a.0x1.0
0x13ee14…13efa8 ]
0x13ee14…13efa8 }
0x13efa8…13f13c Dummy {f00=0x0063, f01=0x0190, f02=» 2 P IDENT SYSLDM REL 9.2 79-12-20 870105040920 P : : P =1,FAULTY LENGTH OF TEMPORARY BUFFER,USED BY XMOVE B P REL 9.2 79-12-20 ST P ENTRY SYSLDM P*************************** P* * P* ENTRIES A
0x13f13c…13f2d0 Dummy {f00=0x0063, f01=0x0190, f02=» P EXTRN REL P EXTRN SCLASS P EXTRN SCTADA , P EXTRN SCTANO B P EXTRN SCTBLK X P EXTRN SCTBUG n P EXTRN SCTCDT P EXTRN SCTDCT P EXTRN SCTDMC P EXTRN SCTDMI P EXTRN SCTDML P EXTRN SCTDMT P
0x13f2d0…13f464 Dummy {f00=0x0063, f01=0x0190, f02=»RN SCTPAG P EXTRN SCTPLD P EXTRN STTPSZ ( P EXTRN SCTPSZ > P EXTRN SCTSEG T P EXTRN SCTSFA j P EXTRN SCTSWB P EXTRN SCTTCT P EXTRN SYSBAS P EXTRN SYSLOD P EXTRN TCLASS P EXTRN TTMJOB P EXT
0x13f464…13f5f8 Dummy {f00=0x0063, f01=0x0190, f02=»XTRN CONVRT P EXTRN NXTBLK P EXTRN SYSLDA * P EXTRN SAVE01 @ P EXTRN SAVE02 V P EXTRN SAVE03 l P EXTRN SAVE04 P EXTRN SAVE05 P EXTRN SAVE06 P EXTRN SAVE07 P EXTRN SAVE08 P EXTRN SAVE09 P E
0x13f5f8…13f78c Dummy {f00=0x0063, f01=0x0190, f02=» SAVE16 P EXTRN SAVE17 P EXTRN SAVE18 & P EXTRN SAVE19 < P EXTRN SAVE20 R P EXTRN SAVE21 h P EXTRN NUMSEG ~ P EXTRN SAVE23 P EXTRN SAVE24 P EXTRN SAVE25 P EXTRN BUFSIZ P EXTRN SYSBUF P EXTRN
0x13f78c…13f920 Dummy {f00=0x0063, f01=0x0190, f02=» P P , P*************************************** , P* CONDITIONAL ASSEMBLY * D , P*************************************** t P ( PMMUPAG EQU 1 MEMORY MANAGEMENT UNIT & PSWPBLK EQU 0 SWAPPABLE WORK BLOCKS $ PCREDIT
0x13f920…13fab4 (1, 146) Dummy {f00=0x0064, f01=0x0190, f02=»SS l 0 PUP:REC EQU 6 RECORD LENGTH IN INITIAL S:BTAB PUPNAME EQU 4 PROTOTYPE NAME > $ PWBLEN EQU -4 LENGTH OF WORKBLOCK b P P $ P******************************* $ P* SAVE01URATION FILE (SAVE01) * $ P**********************
0x13fab4…13fc48 Dummy {f00=0x0064, f01=0x0190, f02=» , PTDBID EQU TDBNT+2 6A TASK ID START VALUE , PTDBMC EQU TDBID+6 6A MATCHING TASK CLASS 4 $ PTDBTL EQU TDBMC+6 6A TASK LEVEL d : PTDBNC EQU TDBTL+6 2N NUMBER OF TERMINAL DEVICE CLASSES P* & PTDBFST EQU TDBNC+2 FIRST TERM DEF $ PTDC EQU 7
0x13fc48…13fddc Dummy {f00=0x0064, f01=0x0190, f02=»DEVICE CLASS-RECORD ~ P* P* COMMON DEVICE DEF. BLOCK: & PCDBBT EQU 0 1A BLOCK TYPE J 6 PCDBNC EQU CDBBT+1 2N NUMBER OF SPEC. DEV. CLASSES l ( PSDCFST EQU CDBNC+2 FIRST SDC-RECORD P* P* & P* USER WORK BLOCK TYPE DEF. BLOCK
0x13fddc…13ff70 Dummy {f00=0x0064, f01=0x0190, f02=» l PNAMUWB EQU 3 NAME OF UWB " PNUMUBL EQU 3 NUMBER OF BLOCKS ( . PUDBREC EQU NAMUWB+NUMUBL UDB RECORD-LENGTH N P EJECT P**************** P* SOP-HANDLING * P**************** PSOP EQU /2E DEVICE ADDRESS P PLMP1 EQU
0x13ff70…140104 Dummy {f00=0x0064, f01=0x0190, f02=»QU /10 PLMP8 EQU 8 PLMP9 EQU 4 PLMP10 EQU 2 2 PLMP11 EQU 1 F P Z F P***************************************************************** f F P* CALL-FORMAT, PERFORMS: CFR A14,A13 * F P*
0x140104…140298 Dummy {f00=0x0064, f01=0x0190, f02=»*************************************************************** P H P T P ` PCALL FORM 16=/F697,16 l P EJECT F P***************************************************************** F P* CONSTANTS USED IN SYS
0x140298…14042c Dummy {f00=0x0064, f01=0x018e, f02=» ********** P* * TTAB * P* ********** 8 P* PTTB:MT EQU -34 f PTTB:SB EQU -2 | PTTB:ID EQU 2 PTTB:ST EQU 4 PTTB:PP EQU 6 PTTB:PW EQU 8 PTTB:SA EQU 10 PTTB:TD EQU 40
0x14042c…1405c0 Dummy {f00=0x0064, f01=0x0190, f02=» " PDWTCHP EQU 0 CHANNEL PARAMETER PDWTST EQU 2 STATUS . PDWTECB EQU 4 ECB ADDRESS H PDWTOR EQU 6 ORDER h PDWTADR EQU 8 ADDRESS BLOCK PDWTTAB EQU 10 TTAB ADDRESS * PDWTWAT EQU 12 WAIT/ACTIVATE INDICATOR PDWTTQ EQU 14 TERMINA
0x1405c0…140754 (1, 147) Dummy {f00=0x0064, f01=0x0190, f02=» *********** " P* * PAGTAB * " P* *********** < P* b PPAGQF EQU 0 l PPAGQB EQU 2 PPAGPA EQU 4 PPAGSB EQU 6 P EJECT P* & P* ************* & P*
0x140754…1408e8 Dummy {f00=0x0064, f01=0x0190, f02=»CT P* * P* ******************* * P* * MISCELLANOUES * B * P* ******************* p P* PBUFLEN EQU -4 PDEVIND EQU -2 PDWTLEN EQU 6 PTDCDD1 EQU 5 PTDCDD2 EQU 6
0x1408e8…140a7c Dummy {f00=0x0064, f01=0x0190, f02=» P EJECT : P****************************************************** : P* * P : P* * : P* THIS IS THE MONITOR CONFIGURATION PROGRAM ENTRY * :
0x140a7c…140c10 Dummy {f00=0x0064, f01=0x0190, f02=»TERS: * : P* * 4 : P* A1 - POINTER TO CURRENT LOCATION OF SYSLDA * r : P* A2 - POINTER TO PREVIOUS LOCATION OF SYSLDA * : P*
0x140c10…140da4 Dummy {f00=0x0064, f01=0x0190, f02=»**************** j PSYSLDM EQU * ( P ST P,SCTSFA+2 SAVE LOCATION COUNTER , . P LDKL A11,SYSBAS GET SYSBAS START ADDRESS X , P ST A11,SCTSFA UPDATE START OF FREE AREA P LDR A8,P INIT STACK POINTER & P ADK A1,2 RELOCATION ROUTINE ENTRY P
0x140da4…140f38 Dummy {f00=0x0064, f01=0x0190, f02=»RESS TO SCLASS? v $ P RF(E) NO:TCL YES:DUMMY TCLASS! , P CALL CHPTRS RELOCATE POINTERS IN TCLASS @ 6 P ST A2,SAVE18,A13 SAVE RELOCATED POINTER TO TCLASS p 0 PNO:TCL LDKL A2,SCLASS GET ADDRESS TO SCLASS , P CALL CHPTRS RELOCATE POINTERS IN SCLASS
0x140f38…1410cc Dummy {f00=0x0064, f01=0x0190, f02=»EFA P LD A2,SCTSFA PCLRSYS EQU * " P SUK A1,2 6 P CMR A1 H P CWR A1,A2 X P RB(NE) CLRSYS j P LDKL A1,CONMON P AD A1,M:REL,A13 P ABR A1 P EJECT 4 /*********************************************** 4 /*
0x1410cc…141260 Dummy {f00=0x0064, f01=0x0190, f02=»POINTER TO TCLASS/SCLASS ( P* A11 - SYSLOD START ADDRESS ( #* A12 - RELOCATION CONSTANT L * x 2 .* EXIT: A2 - POINTER TO MOVED TCLASS/SCLASS * * WORK REGISTER:A1-A7 * * SUBROUTINES: *
0x141260…1413f4 (1, 148) Dummy {f00=0x0064, f01=0x0190, f02=» OF TCLASS/SCLASS z CHPT10 EQU * . ) SUK A4,2 MOORE ENTRIES I TCLASS/SCLASS ? . RF(Z) CHPT30 NO! ` ADK A3,2 NEXT ENTRY z $ ! LDR* A5,A3 GET POINTER TO CLASS ADR A5,A12 RELOCATE STR A5,A3 STORE $ LDR* A6,A5 GET LENGTH
0x1413f4…141588 Dummy {f00=0x0064, f01=0x0190, f02=» LDR* A7,A5 GET DWT-ADDRESS P LDR A9,A7 GET DWT-ADDRESS ( " P CALL CMPADR COMPARE ADDRESSES J P RB(G) CHPT20 DWT IN DRIVER! p ADR A7,A12 RELOCATE * % STR A7,A5 STORE RELOCATED DW-ADDRESS " P LD A8,SCTOPT GET OPTION WORD P ANK
0x141588…14171c Dummy {f00=0x0064, f01=0x0190, f02=»SS p * P ANKL A9,1 ADDRESS ALREADY RELOCATED? P RB(NZ) CHPT20 YES! 8 P ADR A8,A12 RELOCATE T . P ADKL A8,1 INDICATE DWT-ADDRESS RELOCATED p , P ST A8,DWTMEC,A7 STORE RELOCATED ADDRESS RB CHPT20 CHPT30 EQU * P RTN A14 P
0x14171c…1418b0 Dummy {f00=0x0064, f01=0x0190, f02=»******************************************** * 4 * REFERENCED IN: MONCON > * ^ 2 P* ENTRY: SAVE01 - START OF SAVE01URATION DATA h P EJECT 6 2************************************************** 6 2* B:TCT - BUILD TASK CONTROL TABL
0x1418b0…141a44 Dummy {f00=0x0064, f01=0x0190, f02=» ENTRY: SAVE01 - START OF SAVE01URATION DATA * 4 " * EXIT: A6 - START OF TC:TAB > $ * A7 - LENGTH OF TC:TAB d * * WORK REGISTERS: A2,A3 * * SUBROUTINES: * . )* TASK CONTROL TABLE L
0x141a44…141bd8 Dummy {f00=0x0064, f01=0x0190, f02=»___________________ z . ** I TTMJOB I . )* _________________________ N . ** I MONITOR TASKS I . )* _________________________ . ** I USER TASKS
0x141bd8…141d6c Dummy {f00=0x0064, f01=0x0190, f02=» OF SAVE01URATION DATA t ( $ LD A7,SCTSFA GET START OF FREE AREA LDR A6,A7 SAVE J & " LDKL A2,TTMJOB GET TTMJOB ADDRESS b ST A2,2,A7 STORE IN TC:TAB * % ADK A7,4 CONTINUE WITH MONITOR TASKS ( P LD A2,SCTOPT ANY OPTIONS AVALIABLE?
0x141d6c…141f00 Dummy {f00=0x0064, f01=0x0190, f02=»PTIONS AVALIABLE * h @ P* - TO BE PROVIDED * @ P*********************************************************** ` PBTCT15 EQU * " P LD A2,SCTDMT DATA MANAGEMENT? P RF(Z) BTCT30 NO! P LDR A3,A2 SAVE
0x141f00…142094 (1, 149) Dummy {f00=0x0064, f01=0x0190, f02=» A2,A3 GET SCTDMT P ANK A2,2 DM-TASK D1? P RF(Z) BTCT25 NO! 8 * P ADK A7,2 RESERV ENTRY FOR DM-TASK D0 R PBTCT25 EQU * P LDR A2,A3 GET SCTDMT P ANK A2,4 DMTASK D2? P RF(Z) BTCT30 NO! ( P ADK A7,2 RESERV ENTRY FOR DMTAS
0x142094…142228 Dummy {f00=0x0064, f01=0x0190, f02=»SK DEFINITION BLOCK z * 2 P ST A7,SAVE13,A13 SAVE CURRENT USER TASK ENTRY & , P ST A7,SAVE02,A13 FIRST USER TASK ENTRY LCR A2,A11 GET BLOCK TYPE ( # CCK A2,'TT' TASK DEFINITION BLOCK? RF(E) BTCT35 YES P LDKL A1,LMP4 FORMAT
0x142228…1423bc Dummy {f00=0x0064, f01=0x0190, f02=» EQU * $ CALL GETTSK GET NUMBER OF TASKS PBTCT50 EQU * 6 , P ADK A7,2 RESERV ANOTHER ENTRY IN TC:TAB J & P CW A7,SCTEFA CHECK IF MEMORY LEFT z P RF(NE) BTCT55 YES! P LDKL A1,LMP3 ( P CALL ERROR INDICATE MEMORY OVERFLOW PBTCT55
0x1423bc…142550 Dummy {f00=0x0064, f01=0x0190, f02=» TASK DEFINITION BLOCK? RB(E) BTCT40 YES ! * ! : 4 0* ENTRIES FOR ALL USER TASKS RESERVED IN TC:TAB ! D * ! | * % ST A7,SCTSFA UPDATE END OF FREE AREA ! SUR A7,A6 LENGTH OF TC:TAB ! & ! STR A7,A6 STORE LENGTH IN TC:TAB ! * P ST A6
0x142550…1426e4 Dummy {f00=0x0064, f01=0x0190, f02=»TT - BUILD DATA MANAGEMENT TASK TABLES * ! 6 1************************************************* " 2 * " l * &* ENTRY: SCTSFA - START OF FREE AREA " v * P* SCTTCT - ADDRESS TO TC:TAB " 2 -* SCTDMT - DATA MANAGEMENT INDICATOR "
0x1426e4…142878 Dummy {f00=0x0064, f01=0x0190, f02=» EQU * " * % LD A12,SCTSFA GET START OF FREE AREA # ( P LD A7,SCTTCT GET POINTER TO TC:TAB # < " ADK A7,4 FIRST DM-TASK ENTRY # h $ LD A2,SCTDMT DATA MANAGEMENT? # RF(Z) DMTTEX NO! # . ) LDR A3,A2 SAVE DATA MANAGEMENT INDICATOR # . * LD A6
0x142878…142a0c Dummy {f00=0x0064, f01=0x0190, f02=»L DMTGEN # DMTT10 EQU * $ , ( LDR A2,A3 GET DATA MANAGEMENT INDICATOR $ $ ANK A2,2 DM-TASK D1? $ T RF(Z) DMTT20 NO! $ r P LDKL A1,'#E' TASK ID $ CALL DMTGEN $ DMTT20 EQU * $ , ( LDR A2,A3 GET DATA MANAGEMENT INDICATOR $ ANK A
0x142a0c…142ba0 Dummy {f00=0x0064, f01=0x018e, f02=» RTN A14 % EJECT % 6 2************************************************** % " 6 2* DMTGEN - GENERATE DATA MANAGEMENT TASK TABLE * % 6 2************************************************** % * % * ENTRY: A1 - TASK ID % , (* A6
0x142ba0…142d34 (1, 150) Dummy {f00=0x0065, f01=0x0190, f02=» * EXIT: & * & * WORK REGISTERS: & * & 8 * SUBROUTINES: & B * & Z PDMTGEN EQU * & d " P LD A2,SCTOPT GET OPTION WORD & x P ANK A2,1 MMU OPTION? & P RF(Z) DMTG20 NO! & P LDK A4,0 RESET PAGE POINTER & PDMTG10 EQU * &
0x142d34…142ec8 Dummy {f00=0x0065, f01=0x0190, f02=»ER & n , P ADKL A12,2 INCREMENT MMU ENTRY POINTER ' P RB DMTG10 ' : PDMTG20 EQU * ' L " P LD A2,SCTOPT GET OPTION WORD ' ` P ANK A2,2 DISC PAGING? ' P RF(Z) DMTG40 NO! ' PDMTG30 EQU * ' & P ADKL A12,2 SEGMENT BLOCK ADDRESS ' PDMTG40 EQU *
0x142ec8…14305c Dummy {f00=0x0065, f01=0x0190, f02=»N ' l P LDKL A1,/0031 TASK LEVEL ( P ST A1,TTB:ST,A12 STORE ( , & P SLL A1,10 MOVE LEVEL TO LEFT BYTE ( L " P ORKL A1,/00C0 PROGRAM STATUS ( v $ P ST A1,TTB:PW,A12 STORE IN TTAB ( " ADKL A12,40 TERMINAL DEVICES ( LDK A1,6 LENGTH ( STR A
0x14305c…1431f0 Dummy {f00=0x0065, f01=0x0190, f02=»DR A12,A1 RESERV SPACE FOR BUFFERS ( P LD A2,SCTSFA ) * P SUK A2,2 ) @ PDMTG50 ADK A2,2 ) R * P CW A2,SCTEFA CHECK IF MEMORY OVERFLOW ) j P RF(NE) DMTG60 NO! ) P LDKL A1,LMP3 ) ( P CALL ERROR INDICATE MEMORY OVERFLOW ) PDMTG60 CWR A2,A12 )
0x1431f0…143384 Dummy {f00=0x0065, f01=0x0190, f02=» ) r " * B:TT - BUILD TASK TABLES * * " ****************************** * . * * T * REFERENCED IN: MONCON * ^ * * ~ 4 P* ENTRY: SAVE01 - START OF SAVE01URATION DATA * * * 8 4* EXIT: TC:TAB CONTAIN POINTERS TO ALL TASK TABLES * *
0x143384…143518 Dummy {f00=0x0065, f01=0x0190, f02=»* TASK TABLE LAYOUT * * &* ________________________ + , * &* I MMU I + Z * &* I TABLE I + * &* I 16 I + * &* I WORDS
0x143518…1436ac Dummy {f00=0x0065, f01=0x0190, f02=»---- + n * &* TASK ENTRY I QUEUE I , * &* ------------------------ , : * &* TTB:ID I TASK IDENTIFICATION I , h * &* ------------------------ , * &* TTB:ST I STATUS/LEVEL I , * &* --------
0x1436ac…143840 Dummy {f00=0x0065, f01=0x0190, f02=»RAM STATUS WORD I , | * &* ------------------------ - * &* TTB:SA I DISPATCH ADDRESS I - H * &* ------------------------ - v * &* I REGISTER I - * &* I SAVE I - * &*
0x143840…1439d4 (1, 151) Dummy {f00=0x0065, f01=0x0190, f02=» ------------------------ - * &* TTB:TD I TASK I . ( * P* I SAVE01URATION I . V * &* I TABLE I . * &* : : . * &* : : .
0x1439d4…143b68 Dummy {f00=0x0065, f01=0x018e, f02=» ______________________________ . 0 ,* I LENGTH I / * 0 ,* ------------------------------ / ^ 0 ,* I INDEX/FILCODE I / 0 ,* ------------------------------ / 0 ,*
0x143b68…143cfc Dummy {f00=0x0065, f01=0x0190, f02=» / b 0 ,* : : 0 0 ,* ------------------------------ 0 < 0 ,* I INDEX/FILECODE I 0 p 0 ,* ------------------------------ 0 0 ,* I DWT-ADDRESS I 0
0x143cfc…143e90 Dummy {f00=0x0065, f01=0x0190, f02=»D A11,SAVE01,A13 GET START OF SAVE01URATION DATA 0 . P LD A2,SCTDML GET NUMBER OF LOCAL DM-FILES 1 8 P SLL A2,2 MULTIPLY BY 4 1 j 6 P ST A2,SAVE04,A13 SAVE NUMBER OF BYTES TO RESERVE 1 PBTT10 EQU * 1 $ LCR A2,A11 GET FIRST BLOCK TYPE 1 ( # CCK A2,
0x143e90…144024 Dummy {f00=0x0065, f01=0x0190, f02=» 1 ( $* GET NUMBER OF TASKS IN THIS CLASS 2 * 2 4 CALL GETTSK 2 > P ST A1,SAVE19,A13 SAVE 2 R * 2 p * GET TASK ID START VALUE 2 z * 2 ( P LC A5,TDBID+4,A11 GET FIRST ID CHAR 2 SLL A5,8 MOVE TO LEFT BYTE 2 * P LC A5,TDBID+5,A11
0x144024…1441b8 Dummy {f00=0x0065, f01=0x0190, f02=» VALUE 2 v P* 3 , P LC A5,TDBMC+4,A11 GET FIRST CHAR IN TCL 3 P SLL A5,8 MOVE TO LEFT BYTE 3 H . P LC A5,TDBMC+5,A11 GET SECOND CHAR IN TCL 3 l $ P CALL GETTCL GET TCL START VALUE 3 P ST A5,SAVE17,A13 SAVE 3 P XIF 3 P EJECT 3 * 3
0x1441b8…14434c Dummy {f00=0x0065, f01=0x0190, f02=»+5,A11 GET SECOND DIGIT IN LEVEL 3 " CALL CONVRT CONVERT TO BINARY 4 ( P ST A1,SAVE24,A13 SAVE 4 N * 4 l B P* COMPUTE SIZE OF SAVE01URATION DEPENDENT PART OF TASK TABLE 4 v * 4 $ LDKL A10,TTB:TD STANDARD LENGTH 4 " P LD A5,SCTOPT GET OPTION W
0x14434c…1444e0 Dummy {f00=0x0065, f01=0x0190, f02=»V SPACE FOR EXTRA WORDS 4 z RF BTT30 5 PBTT25 EQU * 5 2 " P LD A5,SCTOPT GET OPTION WORD 5 F P ANK A5,2 DISC PAGING? 5 l RF(Z) BTT30 NO 5 2 . SUKL A10,TTB:SB ONE WORD EXTRA IF DISC PAGING 5 0 , SUKL A12,TTB:SB RESERV SPACE FOR EXTRA WORD 5
0x1444e0…144674 (1, 152) Dummy {f00=0x0065, f01=0x0190, f02=»* COMPUTE SIZE OF TERMINAL DEVICE CLASS DEPENDENT PART 5 " P* OF TASK SAVE01URATION TABLE 6 @ * 6 f LDK A6,0 RESET LENGTH 6 p : 5 LDR A9,A11 INIT SUB-POINTER IN TASK DEFINITION BLOCK 6 4 0 ADKL A9,TDBFST TERMINAL DEVICE CLASS DEFINITION 6 $ CAL
0x144674…144808 Dummy {f00=0x0065, f01=0x0190, f02=» 6 l & " ADR A1,A1 2*(BINARY CLASS NUMBER) 7 , P LD A8,SAVE18,A13 GET POINTER TO TCLASS 7 2 P LDR* A2,A8 7 b P SUK A2,2 7 v P CWR A1,A2 7 P RF(NG) BTT37 7 P LDKL A1,LMP4 7 & P CALL ERROR INDICATE FORMAT ERROR 7 PBTT37 EQU * 7 " P ADR
0x144808…14499c Dummy {f00=0x0065, f01=0x0190, f02=»GTH WORD 7 z ( $ ADR A10,A8 ADD TO TOTAL TTAB LENGTH 8 . ) ADR A6,A8 ADD TO TASK CONF. TABLE LENGTH 8 < ADKL A9,TDC+TLC NEXT CLASS 8 n ( # SUK A7,1 DECREMENT NUMBER OF TDC:S 8 RB BTT35 8 P EJECT 8 PBTT40 EQU * 8 * 8 > :* COMPUTE S
0x14499c…144b30 Dummy {f00=0x0065, f01=0x0190, f02=»EVICE CLASSES 8 l P ADKL A9,2 FIRST SDC RECORD 9 LDR A7,A1 SAVE 9 : PBTT50 EQU * 9 R RF(Z) BTT55 NO MOORE SDC:S 9 f ( $ CALL GETCLN GET CLASS NUMBER (1-99) 9 & " ADR A1,A1 2*(BINARY CLASS NUMBER) 9 , P LD A8,SAVE11,A13 GET POINTER TO SCLASS
0x144b30…144cc4 Dummy {f00=0x0065, f01=0x0190, f02=»ERROR 9 t PBTT52 EQU * : " P ADR A8,A1 GET ENTRY IN SCLASS : " $ P LDR* A8,A8 GET POINTER TO CLASS : H $ P LDR* A8,A8 GET LENGTH OF CLASS : p " SUKL A8,2 EXCLUDE LENGTH WORD : ( $ ADR A10,A8 ADD TO TOTAL TTAB LENGTH : . ) ADR A6,A8 ADD TO TASK CONF. T
0x144cc4…144e58 Dummy {f00=0x0065, f01=0x0190, f02=»D A7,SAVE04,A13 GET NUMBER OF BYTES TO RESERV : ( P ADR A10,A7 ADD TO TOTAL TTAB LENGTH ; 6 . P ADR A6,A7 ADD TO TASK CONF. TABLE LENGTH ; b " P ADK A6,2 INCLUDE LENGTH WORD ; 2 P LD A7,SAVE13,A13 GET CURRENT ENTRY IN TC:TAB ; 8 P LD A8,SAVE19,A13 GET NU
0x144e58…144fec Dummy {f00=0x0065, f01=0x0190, f02=»B ; ^ * < ST A6,TTB:TD,A12 < * < . : 6* STORE TASK LEVEL IN RIGHT BYTE OF STATUS/LEVEL WORD < 8 * < v $ P LD A5,SAVE24,A13 GET TASK LEVEL < $ ST A5,TTB:ST,A12 STORE IN TTAB < * < < 7* STORE TASK LEVEL IN LEFT BYTE OF PROGRAM ST
0x144fec…145180 Dummy {f00=0x0065, f01=0x0190, f02=»2,1 MMU OPTION? < P ORR A5,A2 SET BIT 15 IF MMU = $ ST A5,TTB:PW,A12 STORE IN TTAB = < * = d ( $* STORE TASK IDENTIFICATION IN TTAB = n * = & P LD A5,SAVE16,A13 GET THIS TASK ID = $ ST A5,TTB:ID,A12 STORE IN TTAB = ADK A5,1 INCREMEN
0x145180…145314 (1, 153) Dummy {f00=0x0065, f01=0x0190, f02=» IN TTAB = t P* > * P LD A5,SAVE17,A13 GET TCL START VALUE > " P ST A5,TTB:PP,A12 SAVE IN TTAB > H P ADK A5,1 INCREMENT TCL > n P ST A5,SAVE17,A13 SAVE > P XIF > , ' STR A12,A7 SAVE TTAB ADDRESS IN TC:TAB > " ADK A7,2 NEXT ENTRY IN TC:TAB >
0x145314…1454a8 Dummy {f00=0x0065, f01=0x0190, f02=» NUMBER OF TASKS IN THIS CLASS > | RB BTT60 ? & P EJECT ? 8 PBTT70 EQU * ? F * ? Z * &* RESET POINTER TO START OF FREE AREA ? d * ? " P LD A5,SCTOPT GET OPTION WORD ? P ANK A5,1 MMU PAGING? ? RF(Z) BTT80 NO ? ( # ADKL A12,TTB:MT
0x1454a8…14563c Dummy {f00=0x0065, f01=0x0190, f02=»F(Z) BTT90 NO ? & " ADKL A12,TTB:SB SUBTRACT ONE WORD @ PBTT90 EQU * @ @ CALL NXTBLK GET NEXT BLOCK @ T ( # CCK A2,'TT' TASK DEFINITION BLOCK? @ x P RF(NE) BTT95 @ P LDKL A2,BTT20 @ P SUKL A2,REL @ P ADR A2,A13 @ P ABR A2 @ P
0x14563c…1457d0 Dummy {f00=0x0065, f01=0x0190, f02=»,LMP3 @ ( P CALL ERROR INDICATE MEMORY OVERFLOW A PBTT105 CWR A2,A12 A : P RB(NE) BTT100 A T * & ST A12,SCTSFA SAVE START OF FREE AREA A j RTN A14 RETURN A P IFT CREDIT=1 A EJECT A ( $************************************ A ( $* SEGG
0x1457d0…145964 Dummy {f00=0x0065, f01=0x0190, f02=»* SCTEFA - END OF FREE AREA A , (* SCTLAC - START OF APPLICATION B , * B , (* EXIT: SCTPAG - ADDRESS TO PAGE TABLE B f * B * WORK REGISTERS: A1-A12 B * B * SUBROUTINES: GETCON B * B EJECT B PSEGG
0x145964…145af8 Dummy {f00=0x0065, f01=0x0190, f02=»,SCTADA APPLICATION DISC SECTOR ADDRESS B PSEG:05 EQU * C 0 0 P LD A2,SCTLAC LOGICAL ADDRESS OF COMMON PART C D P* C x " P* CHECK IF CREDIT APPLICATION C P* C P ADKL A2,PRGLG1 C P CALL GETCON C P CWK A1,'CR' C P RF(NE) SEGEX NOT CRED
0x145af8…145c8c Dummy {f00=0x0065, f01=0x0190, f02=»TABLE C p * P LDKL A1,/8400 STATUS FOR FIRST BLOCK D $ P STR A1,A12 STORE IN FIRST BLOCK D < 4 P LD A2,SCTLAC GET LOGICAL ADDRESS TO COMMON PART D d & P CALL GETCON GET POINTER TO P:MTAB D P LDR A2,A1 SAVE POINTER D P ADKL A2,6 ADDRESS TO P:BAS D
0x145c8c…145e20 Dummy {f00=0x0065, f01=0x0190, f02=»L ADDRESS TO COMMON PART D x * P ADKL A2,NUMSEG GET NUMBER OF SEGMENTS E CALL GETCON E N ( # LDR A4,A1 SAVE NUMBER OF SEGMENTSS E d P RF(Z) SEG:50 NO SEGMENTS! E " ADK A2,2 FIRST SEGMENT BLOCK E " P LDK A3,1 INIT SEGMENT NUMBER E PSEG:10 EQU
0x145e20…145fb4 (1, 154) Dummy {f00=0x0066, f01=0x0190, f02=»OPT GET OPTION WORD E P ANK A1,2 DISC PAGING? F P RF(NZ) SEG:35 YES! F : PSEG:30 EQU * F V * P LDKL A7,/8800 INDICATE LOADED IN CORE F j PSEG:35 EQU * F 2 P ORR A7,A3 INSERT SEGMENT NUMBER IN RIGHT BYTE F STR A7,A12 SET STATUS F $ ADKL A1
0x145fb4…146148 Dummy {f00=0x0066, f01=0x0190, f02=»SC PAGING? F RF(Z) SEG:40 G CALL GETCON G * , ( ADR A1,A5 PHYSICAL DISC SECTOR ADDRESS G > PSEG:40 EQU * G n STR A1,A12 SAVE IN SEGBLK G $ ADKL A12,2 NEXT ENTRY IN SEGBLK G ADK A2,2 EFFECTIVE LENGTH G CALL GETCON G STR A
0x146148…1462dc Dummy {f00=0x0066, f01=0x018e, f02=» SUK A4,1 DECREMENT NUMBER OF SEGMENTS G RB(P) SEG:10 H . PSEG:50 LD A2,SCTSFA H D P SUK A2,2 H ` PSEG:60 ADK A2,2 H r P CW A2,SCTEFA H P RF(NE) SEG:70 H P LDKL A1,LMP3 H ( P CALL ERROR INDICATE MEMORY OVERFLOW H PSEG:70 CWR A2,A1
0x1462dc…146470 Dummy {f00=0x0066, f01=0x0190, f02=» P EJECT I D P*************************************************************** I D P* * I Z D P* * I D P*
0x146470…146604 Dummy {f00=0x0066, f01=0x0190, f02=»============================== * I z D P* * J 2 D P* REFERENCED IN: SYSLDM * J z D P* * J D
0x146604…146798 Dummy {f00=0x0066, f01=0x0190, f02=»* J R D P* EXIT: * K D P* * K R D P* WORK REGISTERS: A1-A12 * K D P*
0x146798…14692c Dummy {f00=0x0066, f01=0x018e, f02=» - ADDRESS TO S:BTAB PROTOTYPE * K r D P* A10 - SWB BLOCK POINTER * L * D P* A11 - POINTER IN CONF. FILE * L r D P* A12 - ADDRESS TABLE POINTER * L D P*
0x14692c…146ac0 Dummy {f00=0x0066, f01=0x0190, f02=» D P* * M D P* * M L D P*************************************************************** M P EJECT M PB:SWBT EQU * M & P LD A12,SC
0x146ac0…146c54 (1, 155) Dummy {f00=0x0066, f01=0x0190, f02=»IN CONF. FILE M h P* N & PBSWT10 CALL NXTBLK GET NEXT BLOCK N ( P CCK A2,'TT' TASK DEFINITION BLOCK? N J P RB(E) BSWT10 YES! N v 0 P CCK A2,'CC' COMMON DEVICE DEFINITION BLOCK? N P RF(NE) BSWT20 NO! N P ADKL A11,1 N " P CALL NXTCOM SKIP COMM
0x146c54…146de8 Dummy {f00=0x0066, f01=0x0190, f02=» A6,A11 N & P CALL GETNUM NUMBER OF UWB RECORDS O P LDR A1,A5 SAVE O : $ P RF(Z) SWBERR ILLEGAL NUMBER!!! O R ( P ADKL A11,UDBFST-1 FIRST UWB RECORD O z ( PBSWT30 ADKL A11,6 BYPASS UWB RECORD O $ P SUK A1,1 DECR. NUMBER OF TYPES O P RB(P) BSWT30
0x146de8…146f7c Dummy {f00=0x0066, f01=0x018e, f02=» O ~ ( P LDKL A1,0 NO SWB DEFINITION BLOCK! P $ P ST A1,SCTSWB CLEAR SWB POINTER P 4 P RTN A14 P & PBSWT44 ADKL A11,1 NUMBER OF TYPES P l * P ST A11,SAVE23,A13 START OF CONF. DATA P P LDR A6,A11 P P CALL GETNUM GET 3 DIGITS P P LDR A5,A5 ZER
0x146f7c…147110 Dummy {f00=0x0066, f01=0x018e, f02=» P j P RF(NZ) BSWT48 FILE CREATED Q " PSWBERR LDKL A1,LMP6 SWB ERROR! Q , P CALL ERROR Q R 6 PBSWT48 ST A12,SCTSWB SAVE ADDRESS TO ADDRESS TABLE Q f , P ST A8,SAVE14,A13 SAVE ADDRESS TO $SWAP Q P ADKL A12,2 FIRST POINTER Q P LDR A10,A12 SAVE Q
0x147110…1472a4 Dummy {f00=0x0066, f01=0x0190, f02=» Q n P LDR A2,A1 SAVE R , P ADKL A2,S:BTAB DISPL. TO S:BTAB ADDRESS R $ P CALL GETCON GET S:BTAB ADDRESS R P * P LDR A2,A1 GET ADDRESS TO PROT. S:BTAB R x * P RB(Z) SWBERR NO SWB:S IN APPLICATION! R P ADK A1,2 ADDRESS TO NAME R P ST A1,SAVE21,A13
0x1472a4…147438 Dummy {f00=0x0066, f01=0x0190, f02=» SUK A1,2 SKIP LENGTH R . PBSWT50 ADKL A10,2 RESERV ENTRY FOR POINTER S 2 P SUK A1,6 DECREMENT LENGTH OF S:BTAB PROTOTYPE S P $ P RB(P) BSWT50 NEXT SWB-PROTOTYPE S P SUK A4,2 SKIP LENGTH WORD S " P LDKL A9,0 RESET BLOCK COUNTER S , PBSWT60 STR A10,A12
0x147438…1475cc Dummy {f00=0x0066, f01=0x018e, f02=»B RECORDS S r 0 PBSWT65 LD A2,SAVE21,A13 NAME RECORD IN PROT. T $ P CALL GETCON GET TWO FIRST CHAR. T F ( P ADKL A11,NAMUWB NAME IN CONF. FILE T n P LCR A3,A11 GET FIRST CHAR. T P SLL A3,8 MOVE TO LEFT BYTE T " P LC A3,1,A11 GET SECOND CHAR. T & P
0x1475cc…147760 Dummy {f00=0x0066, f01=0x0190, f02=» T r P SRL A1,8 ISOLATE CHAR. U 0 P LC A3,2,A11 GET THIRD CHAR. FROM CONF. FILE U ( P ANK A3,/FF ISOLATE CHAR. U " P CWR A1,A3 THIRD CHAR. EQUAL? U ~ P RF(E) BSWT75 YES! U $ PBSWT70 ADKL A11,NAMUWB SKIP NAME U ( P SUK A7,1 DECREMENT NUMBER OF TYPE
0x147760…1478f4 (1, 156) Dummy {f00=0x0066, f01=0x0190, f02=» U P STR A7,A10 1:ST WORD V P ST A7,2,A10 2:ND WORD V & P ST A7,4,A10 3:RD WORD V D P ST A7,6,A10 4:TH WORD V b P RF BSWT95 V PBSWT75 EQU * V P* V P* MATCHING NAME FOUND V P* V & P ADKL A11,NAMUWB NUMBER OF COPIES V P LDR A
0x1478f4…147a88 Dummy {f00=0x0066, f01=0x0190, f02=» RESTORE POINTER V $ P SUK A2,UPNAME PROTOTYPE ADDRESS W & P CALL GETCON GET PROTOTYPE ADDRESS W @ P LDR A2,A1 SAVE W j & P SUK A2,UPNAME LENGTH OF WORKBLOCK W P CALL GETCON W * P ST A1,SWBLEN,A10 STORE LENGTH OF SWB W 0 P ST A8,2,A10 STORE DISC AD
0x147a88…147c1c Dummy {f00=0x0066, f01=0x0190, f02=»REMENT SECTOR NUMBER W | & P ADK A1,1 INCREMENT SECTOR COUNTER X " P SUKL A3,400 DECREMENT LENGTH X F P RB(P) BSWT90 MOORE SECTORS? X l P SUK A5,1 MOORE COPIES? X P RB(P) BSWT85 YES! X * P ST A1,SWBSEC,A10 STORE SECTOR LENGTH X ( P CW A8,SAVE25,A1
0x147c1c…147db0 Dummy {f00=0x0066, f01=0x018e, f02=»OINTER X ~ & P ADKL A9,1 INCREMENT BLOCK COUNTER Y 4 P LD A2,SAVE21,A13 CURRENT RECORD IN PROT. S:BTAB Y 8 . P ADK A2,UP:REC NEXT RECORD IN PROT. S:BTAB Y p P ST A2,SAVE21,A13 SAVE Y 0 P LD A4,SAVE19,A13 GET LENGTH OF PROT. S:BTAB Y P SUK A4,UP:REC DECRE
0x147db0…147f44 Dummy {f00=0x0066, f01=0x0190, f02=» Y P CALL ERROR SWB ERROR! Z 2 PBSWT99 ST* A9,SCTSWB SAVE NUMBER OF SWB TYPES Z & , P ST A10,SCTSFA UPDATE START OF FREE AREA Z P RTN A14 Z P XIF Z EJECT Z * &************************************** Z * &* MONBLK - GENERATE MONITOR BLOCKS
0x147f44…1480d8 Dummy {f00=0x0066, f01=0x018e, f02=»N SYSTEM) Z v $ P* WHERE N IS A SYSTEM CONSTANT [ $ P* DEFINED AT SYSTEM GENERATION [ : P* [ b * [ l * REFERENCED IN: SYSLOD [ v * [ * &* ENTRY: SCTSFA - START OF FREE AREA [ ( $* SCTEFA - END OF FREE AREA [ * [ . ** E
0x1480d8…14826c Dummy {f00=0x0066, f01=0x018e, f02=» * EJECT PMONBLK EQU * LDK A1,0 0 & ! LD A12,SCTSFA START OF FREE AREA B . P ST A12,FREQUE SAVE POINTER TO FIRST BLOCK l * $ * GET NUMBER OF TASKS IN SYSTEM * ( P LD* A7,SCTTCT GET LENGTH OF TC:TAB P*
0x14826c…148400 Dummy {f00=0x0066, f01=0x0190, f02=» x RF(Z) MON:20 NO ] P CALL BLKGEN ] " RB MON:10 ] 6 PMON:20 EQU * ] H * ] * GENERATE 19 MOORE BLOCKS ] f * ] LDK A2,19 ] P CALL BLKGEN ] * ] * GENERATE END BLOCK ] * ] STR A1,A12 ] ST A1,2
0x148400…148594 (1, 157) Dummy {f00=0x0066, f01=0x0190, f02=» MONITOR BLOCK AS BUFFER ] | P* ^ & P LD A1,BUFSIZ,A13 GET BUFFER SIZE ^ * P CWK A1,6 >6? ^ T $ P RF(NL) MON:30 NOT LESS ANYWAY! ^ j P LDK A1,6 BUFFER SIZE ^ P ST A1,BUFSIZ,A13 STORE ^ & P ST A12,SYSBUF,A13 START OF BUFFER ^ PMON:30 EQU * ^
0x148594…148728 Dummy {f00=0x0066, f01=0x0190, f02=»DKL A1,LMP3 ^ P CALL ERROR _ PMON:50 CWR A2,A12 _ ( P RB(NE) MON:40 _ B * & ST A12,SCTSFA UPDATE END OF FREE AREA _ X RTN A14 _ EJECT _ * %************************************* _ * %* BLKGEN - GENERATE MONITOR BLOCK * _ * %********
0x148728…1488bc Dummy {f00=0x0066, f01=0x0190, f02=»ER OF BLOCKS TO BE GENERATED _ | $ * A12 - NEXT FREE ENTRY ` $ * ` L * EXIT: A1=0 ` V " * A12 - NEXT FREE ENTRY ` l * ` * WORK REGISTES: A3 ` * ` * SUBROUTINES: ` * ` 0 ,* MONITOR BLOC
0x1488bc…148a50 Dummy {f00=0x0066, f01=0x0190, f02=» -------------------- ` 0 ,* I DATA 0 I a $ 0 ,* -------------------- a X 0 ,* I DATA 0 I a 0 ,* -------------------- a * a EJECT a
0x148a50…148be4 Dummy {f00=0x0066, f01=0x0190, f02=»A12 a ST A1,-2,A12 b SUK A3,1 b " RB BLK:10 b 4 PBLKEX EQU * b F RTN A14 b Z EJECT b j L J************************************************************************ b x J J* B:DWTS - BUILD DWT:S FOR SPECIAL DEVICES AND CONNECT TO TASK
0x148be4…148d78 Dummy {f00=0x0066, f01=0x018e, f02=»* b , (* ENTRY: SCTSFA - START OF FREE ARE (X) c 2 P* SAVE01 - START OF SAVE01URATION FILE c : ( #* SCTEFA - END OF FREE AREA c p * c * EXIT: c * c * WORK REGISTERS: A1-A12 c * c < 8* SUBROUTINES: GETTSK,GETTD
0x148d78…148f0c Dummy {f00=0x0066, f01=0x0190, f02=» c 2 P LD A11,SAVE01,A13 START OF SAVE01URATION FILE d & ! LD A12,SCTSFA START OF FREE AREA d > * d h 6 2* CHECK IF FIRST BLOCK IS A TASK DEFINITION BLOCK d r * d $ LCR A2,A11 GET FIRST CHARACTER d ( # CCK A2,'TT' TASK DEFINITION BLOCK? d
0x148f0c…1490a0 Dummy {f00=0x0066, f01=0x0190, f02=» * e , P LD A7,SAVE02,A13 FIRST USER TASK ENTRY e P SUK A7,2 e > EJECT e P PDWTS10 EQU * e ^ * e r . )* GET NUMBER OF TASKS IN THIS TASK CLASS e | * e CALL GETTSK e PDWTS20 EQU * e P ST A1,SAVE19,A13 SAVE e * e * &
0x1490a0…149234 (1, 158) Dummy {f00=0x0067, f01=0x0190, f02=»ADDRESS e z 6 P ADKL A10,TTB:TD+2 TASK SAVE01URATION TABLE ENTRY f * f J 0 ,* INIT SUB-POINTER IN TASK DEFINITION BLOCK f T * f . * LDR A9,A11 START OF TASK DEFINITION BLOCK f , ' ADKL A9,TDBFST START OF TDC DEFINITION f P EJECT f * f
0x149234…1493c8 Dummy {f00=0x0067, f01=0x018e, f02=»WTS40 f P CALL GETCLN GET TDC ID g P ADR A1,A1 g . , P LD A8,SAVE18,A13 GET POINTER TO TCLASS g @ P ADR A8,A1 GET CLASS ENTRY g p $ P LDR* A8,A8 GET POINTER TO CLASS g $ P LDR* A8,A8 GET LENGTH OF CLASS g " P SUKL A8,2 EXCLUDE LENGTH WORD g * P
0x1493c8…14955c Dummy {f00=0x0067, f01=0x0190, f02=» g j P RB DWTS30 h PDWTS40 EQU * h * h . , '* GET NUMBER OF SPECIAL DEVICE CLASSES h 8 * h h CALL GETSDC h r ADKL A9,SDCFST-CDBNC h LDR A1,A1 h PDWTS50 EQU * h P RF(Z) DWTS90 h P ST A1,SAVE17,A13 SAVE h * h * &
0x14955c…1496f0 Dummy {f00=0x0067, f01=0x0190, f02=» CORRESPONDING SPECIAL DEVICE CLASS IN SCLASS h * i 6 ADR A1,A1 i @ ( P LD A6,SAVE11,A13 POINTER TO SCLASS i R P ADR A6,A1 SELECT ENTRY i ~ $ P LDR* A6,A6 GET POINTER TO CLASS i P LDR A5,A6 SAVE i P LDR* A6,A6 GET LENGTH i " P SUK A6,2 EX
0x1496f0…149884 Dummy {f00=0x0067, f01=0x0190, f02=»ENERATION OF DWT? i ~ P RF(Z) DWTS70 NO j * j 2 * COPY DWT j < * j P LDR A2,A12 TO-ADDRESS j Z , ' ADR A12,A3 UPDATE POINTER TO FREE AREA j x CALL MOVE COPY DWT j P EJECT j P* j 4 P* RELOCATE MONITOR ECB ADDRESS IF MMU IN SY
0x149884…149a18 Dummy {f00=0x0067, f01=0x0190, f02=»TOTYPE DWT-ADDRESS j ~ * P SUR A3,A2 COMPUTE RELOCATION CONSTANT k , P LD A4,DWTMEC,A2 GET MONITOR ECB-ADDRESS k H P SUR A4,A3 RELOCATE k x $ P ANKL A4,/FFFE MAKE EVEN ADDRESS k " P ST A4,DWTMEC,A2 STORE IT BACK k PDWTS65 EQU * k $ LDR A1,A2 DT-ADDR
0x149a18…149bac Dummy {f00=0x0067, f01=0x0190, f02=»DDRESS k x $ LD A1,-2,A5 GET INDEX/FILECODE l STR A1,A10 SAVE IN TTAB l 6 2 P ADKL A10,4 UPDATE TASK SAVE01URATION POINTER l V PDWTS80 EQU * l * % SUK A6,4 DECREMENT NUMBER OF DEVICES l RB(P) DWTS60 NEXT DEVICE l P EJECT l * l 4 /
0x149bac…149d40 Dummy {f00=0x0067, f01=0x018e, f02=»DWTS50 l PDWTS90 EQU * m * m " 8 P* CHECK IF MOORE TASKS WITH THE SAME SAVE01URATION m , * m h P LD A1,SAVE19,A13 m r SUK A1,1 m RB(P) DWTS20 m * m , (* CHECK IF MOORE TASK DEFINITION BLOCKS m * m CALL NXTBLK m
0x149d40…149ed4 (1, 159) Dummy {f00=0x0067, f01=0x0190, f02=» P CW A2,SCTEFA n P RF(NE) DWTS99 n P LDKL A1,LMP3 n 0 ( P CALL ERROR INDICATE MEMORY OVERFLOW n F PDWTS99 CWR A2,A12 n r P RB(NE) DWTS95 n ST A12,SCTSFA n RTN A14 RETURN n EJECT n 4 0******************************************
0x149ed4…14a068 Dummy {f00=0x0067, f01=0x018e, f02=»************************************** n * o . * REFERENCED IN: MONCON o 8 * o X * ENTRY: o b * o t * EXIT: o ~ * o * WORK REGISTERS: A1-A12 o * o D @* SUBROUTINES: ERROR,GETTSK,GETTDC,GETCLN,GETLCN,DWTGEN,NXTBLK o
0x14a068…14a1fc Dummy {f00=0x0067, f01=0x0190, f02=» o P LDK A1,0 p 0 P LDKL A11,BDWT05 GET END OF TEMP. WORK AREA p & P AD A11,M:REL,A13 RELOCATE ADDRESS p N P LDR A7,A11 SAVE p x 2 P SU A7,SCTSFA+2 COMPUTE SIZE OF TEMP WORK AREA p $ P CWK A7,1808 IS AREA BIG ENOUGH? p P RF(L) BDWT02 NO! p , P
0x14a1fc…14a390 Dummy {f00=0x0067, f01=0x0190, f02=»NTERRUPT TABLE AT END OF FREE AREA p n * q * PBDWT02 EQU * q 4 ( P LD A11,SCTEFA GET END OF FREE AREA q H ( $ LD A9,SCTSFA GET START OF FREE AREA q t PBDWT05 EQU * q LDK A7,0 RESET WORD COUNTER q PBDWT10 EQU * q CWR A11,A9 MEMORY OVERFLOW?
0x14a390…14a524 Dummy {f00=0x0067, f01=0x0190, f02=»WORDS RESERVED? q RF(E) BDWT20 YES r $ SUKL A11,2 RESERV ANOTHER WORD r 2 P CMR A11 CLEAR MEMORY WORD r Z $ ADK A7,1 INCREMENT WORD COUNTER r | RB BDWT10 r PBDWT20 EQU * r * r 6 2* INIT POINTERS TO THE TEMPORARY INTERRUPT TABLES r
0x14a524…14a6b8 Dummy {f00=0x0067, f01=0x0190, f02=»2 r PBDWT30 EQU * s , ( STR A11,A7 SAVE INTERRUPT TABLE ADDRESS s & " ADK A7,2 NEXT ADDRESS TABLE ENTRY s N . * ADKL A11,224 NEXT INTERRUPT TABLE ADDRESS s x * % CW A11,SCTEFA ALL POINTERS INTIATED? s RB(NE) BDWT30 NO s * P ST A1,SCTEFA UPDATE E
0x14a6b8…14a84c Dummy {f00=0x0067, f01=0x0190, f02=» OF FREE AREA s x * t B >* INIT TC:TAB ENTRY POINTER TO POINT AT FIRST USER TASK ENTRY t * t f 0 P LD A5,SAVE02,A13 GET FIRST USER TASK ENTRY t p 6 P ST A5,SAVE13,A13 STORE IN CURRENT USER TASK ENTRY t PBDWT40 EQU * t * t . )* GET NUMBE
0x14a84c…14a9e0 Dummy {f00=0x0067, f01=0x0190, f02=»Y VALUE t t * u @ ;* GET NUMBER OF TERMINAL DEVICE CLASSES IN THIS TASK CLASS u * u ^ CALL GETTDC u h * u | $ * CHECK IF TASK WITHOUT DEVICES u * u $ LDR A1,A1 ANY TERMINAL DEVICES? u RF(Z) BDW100 NO u 6 P ST A1,SAVE15,A1
0x14a9e0…14ab74 (1, 160) Dummy {f00=0x0067, f01=0x0190, f02=» u ^ * v ( #* GET TERMINAL DEVICE CLASS NUMBER v * v > . * LDR A9,A11 START OF TASK DEFINITION BLOCK v H 4 0 ADKL A9,TDBFST TERMINAL DEVICE CLASS DEFINITION v z PBDWT55 EQU * v " CALL GETCLN GET CLASS NUMBER v ( P ST A1,SAVE14,A13 SAVE BINAR
0x14ab74…14ad08 Dummy {f00=0x0067, f01=0x018e, f02=»TLCN GET LINE CONNECTION NUMBER v LDR A6,A1 SAVE BINARY VALUE w ( . * ADK A1,1 INCREMENT LINE CONNECTION NUMBER w L 4 / CALL BINASC CONVERT INCREMENTED VALUE TO ASCII w ~ , ' SC A5,TDC+4,A9 STORE RIGHT ASCII DIGIT w 2 - SRL A5,8 MOVE LEFT ASCII DIGIT TI
0x14ad08…14ae9c Dummy {f00=0x0067, f01=0x0190, f02=» * x 2 P LD A2,SAVE14,A13 GET BINARY VALUE OF CLASS ID x ADR A2,A2 2*ID x D ( P LD A7,SAVE18,A13 POINTER TO TCLASS x P ADR A7,A2 GET ENTRY x P* x : P* CHECK IF THIS IS AN ENTRY IN TCLASS -TO BE SUPPLIED x P* x $ P LDR* A7,A7 GET PO
0x14ae9c…14b030 Dummy {f00=0x0067, f01=0x0190, f02=» , (* A7 - POINTER TO TERMINAL DEVICE CLASS y * y 4 . ** THE ENTRY IN TEMPORARY INTERRUPT TABLE y > . ** IS DERIVED FROM LINE CONNECTION NUMBER, y p : 6* DEVICE ADDRESS AND TYPE OF DEVICE (INPUT OR OUTPUT) y * y CALL DWTGEN y PBDWT90 EQU
0x14b030…14b1c4 Dummy {f00=0x0067, f01=0x0190, f02=»NO y , P ST A1,SAVE15,A13 SAVE REMAINING NUMBER z $ ADKL A9,TDC+TLC NEXT TDC RECORD z : RB BDWT55 z b PBDW100 EQU * z t 2 P LD A1,SAVE13,A13 GET CURRENT ENTRY IN TC:TAB z & ! ADK A1,2 INCREMENT ENTRY POINTER z P ST A1,SAVE13,A13 SAVE z 8 P L
0x14b1c4…14b358 Dummy {f00=0x0067, f01=0x0190, f02=»TASK DEFINITION BLOCKS z ~ * { $ CALL NXTBLK SKIP TO NEXT BLOCK { ( ( # CCK A2,'TT' TASK DEFINITION BLOCK? { P RB(E) BDWT40 YES { | * { 0 ,* ALL TERMINAL DEVICE WORK TABLES GENERATED { * { P LD A2,SCTSFA { P SUK A2,2 { PBD
0x14b358…14b4ec Dummy {f00=0x0067, f01=0x0190, f02=»B(NE) BDW105 { , P ST A12,SCTSFA UPDATE START OF FREE AREA | RTN A14 RETURN | D EJECT | , (**************************************** | l , P* B:CDT - BUILD COMMON DEVICE TABLE * | , (**************************************** | * | *
0x14b4ec…14b680 Dummy {f00=0x0067, f01=0x018e, f02=» | ` ( $* SCTEFA - END OF FREE AREA } * } 4 4 0* EXIT: CDTAB - POINTER TO COMMON DEVICE TABLE } > * } v * WORK REGISTERS: A1-A12 } * } < P* SUBROUTINES: NXTBLK,GETCTC,GETLCN,GETSDC,GETCLN,MOVE } * } EJECT } PB:CD
0x14b680…14b814 (1, 161) Dummy {f00=0x0067, f01=0x0190, f02=» } x * ~ * %* GET COMMON DEVICE DEFINITION BLOCK ~ * ~ @ PCDG:10 EQU * ~ J CALL NXTBLK ~ ^ ( # CCK A2,'TT' TASK DEFINITION BLOCK? ~ r RB(E) CDG:10 YES ~ ( $ CCK A2,'CC' COMMON DEV. DEF. BLOCK? ~ P RF(NE) BCDTEX NO ~ P EJECT ~
0x14b814…14b9a8 Dummy {f00=0x0067, f01=0x0190, f02=»* ~ 0 P LDR A9,A11 START OF COMMON DEFINITION BLOCK 6 P ADKL A9,SDCFST NUMBER OF COMMON TERMINAL CLASSES > & P CALL GETCTC GET NUMBER OF C.T.C. x P LDR A6,A1 SAVE " PB:CT10 RF(Z) B:CT30 NO MOORE! . P CALL GETCLN GET CLASS IDENT NUMBER (1-9
0x14b9a8…14bb3c Dummy {f00=0x0067, f01=0x0190, f02=»SS r P SUK A2,2 EXCLUDE LENGTH & P CWR A1,A2 MAKE SURE CLASS EXISTS * P RF(NG) B:CT20 OK! T P LDKL A1,LMP4 FORMAT ERROR! n P CALL ERROR , PB:CT20 ADR A1,A5 SELECT ENTRY IN TCLASS $ P LDR* A1,A1 GET POINTER TO CLASS $ P LDR* A1,A
0x14bb3c…14bcd0 Dummy {f00=0x0067, f01=0x0190, f02=»RD IN CONF. FILE v " P SUK A6,1 DECR. NBR OF C.T.C. P RB B:CT10 > P EJECT P PB:CT30 EQU * ^ P* r : P* RESERVE AREA IN COMMON DEVICE TABLE FOR FILE-CODES | 8 P* AND DWT-ADDRESSES USED BY COMMON SPECIAL DEVICES P* CALL GE
0x14bcd0…14be64 Dummy {f00=0x0067, f01=0x018e, f02=» , P LD A5,SAVE11,A13 GET POINTER TO SCLASS P LDR* A2,A5 4 P SUK A2,2 H P CWR A1,A2 Z P RF(NG) BCDT15 l P LDKL A1,LMP4 P CALL ERROR PBCDT15 EQU * P ADR A1,A5 SELECT ENTRY $ P LDR* A1,A1 GET POINTER TO CLASS P
0x14be64…14bff8 Dummy {f00=0x0067, f01=0x0190, f02=» P EJECT P* < P* RESERV ENTRIES IN COMMON DEVICE TABLE FOR FILE-CODES 6 P* AND DWT-ADDRESSES USED FOR PHYSICAL I/O ON DISC ` P* 6 P* ALSO RESERVE ENTRIES IN COMMON DEVICE TABLE FOR @ P* FILE-CODES AND DWT-ADDRESSES USED FOR D
0x14bff8…14c18c Dummy {f00=0x0067, f01=0x0190, f02=»T DATA COMMUNICATION? " P LD A6,SCTDMT DATA MANAGEMENT P ORR A6,A1 DM OR DC? D " P LD A1,SCTOPT GET OPTION WORD ` $ P ANK A1,/A DISC PAGING OR SWB:S? , P ORR A6,A1 COPY LAST SCLASS IF NOT ZERO P RF(Z) CDG:15 NO! , P LD A6,SAVE11,A1
0x14c18c…14c320 Dummy {f00=0x0067, f01=0x018e, f02=»CLASS v * P LDR* A6,A6 GET POINTER TO LAST CLASS ( P LDR* A6,A6 GET LENGTH OF LAST CLASS < " P SUK A6,2 EXCLUDE LENGTH WORD h & P ADR A7,A6 ADD TO LENGTH OF CD:TAB PCDG:15 EQU * , P LD A6,SCTDMC GET NUMBER OF GLOBAL FILES P SLL A6,2 MU
0x14c320…14c4b4 (1, 162) Dummy {f00=0x0068, f01=0x0190, f02=» EJECT * 6 1* INIT POINTER TO START OF FREE AREA AND TO CDTAB * Z ( P LD A10,SCTCDT FIRST ENTRY IN SCTCDT d $ P LCR A2,A11 COMMON DEVICE BLOCK? P CCK A2,'CC' P RF(E) CDG:18 * P ADKL A10,2 FIRST FREE ENTRY IN CDTAB
0x14c4b4…14c648 Dummy {f00=0x0068, f01=0x0190, f02=» P* * P LDR A9,A11 START OF COMMON DEF. BLOCK 6 P ADKL A9,SDCFST NUMBER OF COMMON TERMINAL CLASSES < & P CALL GETCTC GET NUMBER OF C.T.C. v , P LDR A1,A1 ANY COMMON TERMINAL CLASSES? PB:CT40 RF(Z) B:CT50 NO! P ST A1,SAVE15,A13 SAVE
0x14c648…14c7dc Dummy {f00=0x0068, f01=0x0190, f02=»A1 SAVE , P LD A2,SAVE14,A13 GET CLASS IDENT NUMBER & P ADR A2,A2 CONVERT TO DISPLACEMENT @ , P LD A7,SAVE18,A13 GET POINTER TO TCLASS j & P ADR A7,A2 SELECT ENTRY IN TCLASS $ P LDR* A7,A7 GET POINTER TO CLASS . P CALL DWTGEN GENERATE DWT:S
0x14c7dc…14c970 Dummy {f00=0x0068, f01=0x0190, f02=»T COUNTER ~ P RB B:CT40 . PB:CT50 ADKL A10,2 NEXT FREE ENTRY IN CDTAB $ P EJECT V * d , '* GET NUMBER OF SPECIAL DEVICE CLASSES n * CALL GETSDC ADKL A9,SDCFST-CDBNC P LDR A8,A1 PCDG:20 EQU * P RF(NP)
0x14c970…14cb04 Dummy {f00=0x0068, f01=0x0190, f02=»ASS IN SCLASS r * ADR A1,A1 T , P LD A6,SAVE11,A13 GET POINTER TO SCLASS 6 PCDG:25 EQU * f P ADR A6,A1 SELECT CLASS z & P LDR* A5,A6 SAVE POINTER TO CLASS $ P LDR* A6,A6 GET POINTER TO CLASS $ P LDR* A6,A6 GET LENGTH OF CL
0x14cb04…14cc98 Dummy {f00=0x0068, f01=0x0190, f02=» LD A3,DWTLEN,A1 GENERATION OF DWT? RF(Z) CDG:40 NO , * D * COPY DWT N * b LDR A2,A12 TO-ADDRESS l , ' ADR A12,A3 UPDATE POINTER TO FREE AREA CALL MOVE COPY DWT P* 4 P* RELOCATE MONITOR ECB ADDRESS IF MMU I
0x14cc98…14ce2c Dummy {f00=0x0068, f01=0x0190, f02=» PROTOTYPE DWT-ADDRESS * P SUR A3,A2 COMPUTE RELOCATION CONSTANT , P LD A4,DWTMEC,A2 GET MONITOR ECB-ADDRESS L P ANKL A4,/FFFE MAKE IT EVEN! | P SUR A4,A3 RELOCATE " P ST A4,DWTMEC,A2 STORE IT BACK PCDG:35 EQU * " LDR A1,A2 DWT-ADD
0x14ce2c…14cfc0 Dummy {f00=0x0068, f01=0x0190, f02=»RESS v LD A1,-2,A5 GET FILE CODE STR A1,A10 STORE IN TTAB . $ ADKL A10,4 NEXT ENTRY IN CD:TAB P & " SUK A6,4 DECREMENT DEVICE COUNTER x RB(P) CDG:30 NEXT DEVICE P EJECT * , (* CHECK IF MOORE SPECIAL DEVICE CLASSES
0x14cfc0…14d154 (1, 163) Dummy {f00=0x0068, f01=0x0190, f02=»CTDMT DATA MANAGEMENT $ P LD A5,SCTDCT DATA COMMUNICATION P ORR A1,A5 DM OR DC? F " P LD A5,SCTOPT GET OPTION WORD b $ P ANK A5,/A DISC PAGING OR SWB:S? , P ORR A1,A5 COPY LAST SCLASS IF NOT ZERO P RF(Z) CDG:EX NO! , P LD A5,SAVE11,
0x14d154…14d2e8 Dummy {f00=0x0068, f01=0x0190, f02=»Y x * P LDR* A5,A5 GET POINTER TO LAST CLASS ( P LDR* A6,A5 GET LENGTH OF LAST CLASS 8 " P SUK A6,2 EXCLUDE LENGTH WORD d P RB CDG:30 PCDG:EX EQU * P LD A2,SCTSFA P SUK A2,2 PCDG:50 ADK A2,2 P CW A2,SCTEFA P R
0x14d2e8…14d47c Dummy {f00=0x0068, f01=0x0190, f02=»T A12,SCTSFA UPDATE START OF FREE AREA RTN A14 RETURN . EJECT F J F********************************************************************** T H C* DWTGEN - GENERATE DEVICE WORK TABLES FOR A TERMINAL DEVICE CLASS J F**************************
0x14d47c…14d610 Dummy {f00=0x0068, f01=0x0190, f02=»INTER TO TERMINAL DEVICE CLASS IN TCLASS ~ * &* A6 - LINE CONNECTION NUMBER 0 * ^ * EXIT: h * x * WORK REGISTERS: A1-A8 * * SUBROUTINES: I:CHP,MOVE * EJECT PDWTGEN EQU * 2 P ST A6,SAVE08,
0x14d610…14d7a4 Dummy {f00=0x0068, f01=0x0190, f02=»RST FILECODE PDWT10 EQU * . ) LD A1,2,A7 GET ADDRESS OF PROTOTYPE DWT ( * Z 4 /* DERIVE CONTENT OF CHANNEL PARAMETER AND ALSO d 8 4* THE ENTRY TO BE USED IN TEMPORARY INTERRUPT TABLE 4 0* FROM LINE CONNECTION NUMBER AND PROTOTYPE DWT
0x14d7a4…14d938 Dummy {f00=0x0068, f01=0x0190, f02=»TS ENTRY) | * 0 P* SAVE05 HOLDS 2*(NUMBER STORED IN BIS 4-6) 4 P* SAVE06 HOLDS THE NUMBER STORED IN BITS 12-15 P * %* OF THE GENERATED CHANNEL PARAMETER 2 P LD A4,SAVE05,A13 GET SAVED NUMBER IN BITS 4-6 , P LD A3,SCTSFA+2 FIRST INT TA
0x14d938…14dacc Dummy {f00=0x0068, f01=0x0190, f02=»AMETER v PDWT15 EQU * " RF(Z) DWT17 LINE ENTRY FOUND * ADK A4,28 NEXT LINE P & " SUK A3,1 DECREMENT LINE PARAMETER l RB DWT15 EJECT PDWT17 EQU * 6 P ST A4,SAVE07,A13 SAVE INTERRUPT TABLE LINE ENTRY *
0x14dacc…14dc60 Dummy {f00=0x0068, f01=0x0190, f02=» DEVICE ADDRESSES 8-14 FOR OUTPUT DEVICES * 2 0 + LDR* A6,A1 GET FIRST WORD OF PROTOTYPE DWT < P LDR A2,A6 SAVE p : 5 ANKL A6,/7100 GET DEVICE ADDRESS AND DEVICE TYPE BIT $ SLC A6,7 CHECK IF INPUT DEVICE P RF(N) DWT20 YES! P
0x14dc60…14ddf4 (1, 164) Dummy {f00=0x0068, f01=0x0190, f02=»WT20 NO! P SRL A6,2 P ADK A6,12 " RF DWT30 4 PDWT20 EQU * F P SRL A6,2 Z P SUK A6,2 l PDWT30 EQU * ~ ANK A6,/1E * 2 .* CHECK IF DWT ALREADY GENERATED ON THIS LINE * ADR A6,A4 TABLE ENTRY
0x14ddf4…14df88 Dummy {f00=0x0068, f01=0x0190, f02=»T A2,DWTECH,A5 STORE REAL ECHODEVICE-DWTADDRESS , P CM DWTECB,A1 RESET POINTER TO INPUT-DWT 8 P RF DWT70 h P EJECT z P* P* CHECK IF DWT IN DRIVER P* PDWT32 LDKL A2,SYSLOD P TNM A1,A2 P RF(NN) DWT34 P CWR A
0x14df88…14e11c Dummy {f00=0x0068, f01=0x0190, f02=»T70 PDWT38 EQU * STR A12,A6 SAVE DWT-ADDRESS * D * COPY DEVICE TYPE DWT N * n LDR A2,A12 TO-ADDRESS x P LD A3,DWTOR,A1 LENGTH ADR A12,A3 NEXT FREE ENTRY CALL MOVE P EJECT * $ * A1
0x14e11c…14e2b0 Dummy {f00=0x0068, f01=0x0190, f02=»HECK IF INPUT DEVICE * * & LDR* A3,A1 GET FIRST WORD OF TYPE DWT & ANKL A3,/0100 INPUT DEVICE? T RF(Z) DWT50 NO x * * INPUT DEVICE: * CHECK IF KEYBOARD * LD A3,DWTADR,A1 LD A3,DEVIND,A3
0x14e2b0…14e444 Dummy {f00=0x0068, f01=0x0190, f02=»F KEYBOARD DWT IN THIRD WORD ~ . )* OF PROTOTYPE DWT OF OUTPUT ECHO DEVICE $ * V P LD A5,DWTECH,A1 ECHO? ` RF(Z) DWT40 NO ~ 6 P AD A5,M:REL,A13 RELOCATE ECHO DEVICE DWT-ADDRESS & P ST A2,4,A5 SAVE INPUT DWT-ADDRESS P EJECT P
0x14e444…14e5d8 Dummy {f00=0x0068, f01=0x0190, f02=»,DWTSQ DISPLACEMENT TO START OF BUFFER $ ST A5,DWTSQ-4,A2 STORE POINTER . $ ST A5,DWTSQ-2,A2 STORE POINTER V * ~ * IF DOUBLE KEYBOARD: D @* ADD 1 TO DWT-ADDRESS AND SAVE IT IN TEMPORARY INTERRUPT TABLE 6 2* IN ENTRY CORRESPONDING
0x14e5d8…14e76c Dummy {f00=0x0068, f01=0x0190, f02=» DWT60 NOT DOUBLE KEYBOARD $ LDR A5,A2 GET REAL DWT-ADDRESS " ADK A5,1 ADD ONE J 0 , SUK A3,1 DISPLACEMENT=0 IF DEVICE ADDRESS=1 d ADR A3,A3 BYTE DISPLACEMENT . P AD A3,SAVE07,A13 ENTRY IN INTERRUPT TABLE $ STR A5,A3 STORE DEVICE-AD
0x14e76c…14e900 Dummy {f00=0x0068, f01=0x0190, f02=» GET CORRESPONDING INPUT DWT-ADDRESS FROM THIRD WORD * IN THE DWT. < 8 3* SAVE ADDRESS OF THIS DWT IN WORD 18 OF INPUT DWT R $ * AND CLEAR WORD 3 OF THIS DWT. * 0 P LD A5,DWTECB,A2 GET THIRD WORD IN REAL DWT ( # RF(Z) DWT60 NOT ECH
0x14e900…14ea94 (1, 165) Dummy {f00=0x0068, f01=0x0190, f02=»DWT60 EQU * * * CHECK IF PAGING * 8 " P LD A5,SCTOPT GET OPTION WORD B P ANK A5,1 MMU PAGING? h RF(Z) DWT70 P EJECT , P LD A5,DWTMEC,A2 GET MONITOR ECB ADDRESS ( P LDR A4,A1 GET PROTOTYPE DWT-ADDRESS * P SUR
0x14ea94…14ec28 Dummy {f00=0x0068, f01=0x0190, f02=»,DWTMEC,A2 STORE IT BACK * < P* PAGING: CHECK IF INTERNAL BUFFER SHOULD BE ALLOCATED * P* j & P LD A5,DWTADR,A2 GET ADDRESS BLOCK t 2 P LD A4,BUFLEN,A5 GET LENGTH OF INTERNAL BUFFER $ P RF(Z) DWT70 ALLOCATE NO BUFFER! * L P*
0x14ec28…14edbc Dummy {f00=0x0068, f01=0x0190, f02=» LDR A3,A12 INTERNAL BUFFER ADDRESS ADK A3,1 , , ( ANKL A3,/FFFE MAKE SURE OF EVEN ADDRESS @ P ST A3,2,A5 SAVE p P LDR A3,A4 GET LENGTH & P ADK A3,3 ADD BO FERMS CONSTANT+1 $ P ANKL A3,/FFFE MAKE LENGTH EVEN P EJECT
0x14edbc…14ef50 Dummy {f00=0x0068, f01=0x018e, f02=»AN STORE THE ADDRESS AND SIZE OF THE , P* INTERNAL BUFFER IN SYSBUF AND BUFSIZ. , * CW A3,BUFSIZ,A13 f RF(NG) DWT65 ST A3,BUFSIZ,A13 P ST A12,SYSBUF,A13 PDWT65 EQU * ADR A12,A3 NEXT FREE ENTRY P EJE
0x14ef50…14f0e4 Dummy {f00=0x0068, f01=0x0190, f02=» " P LDR* A5,A7 GET INDEX/FILECODE * P STR A5,A10 STORE IN TASK CONF. TABLE * " P ADKL A10,2 NEXT ENTRY IN TTAB X " P STR A2,A10 STORE DWT-ADDRESS ~ P* , '* CHECK IF MOORE DEVICES IN THIS CLASS * SUKL A8,4 RF(Z) DWTEX
0x14f0e4…14f278 Dummy {f00=0x0068, f01=0x0190, f02=»DWTEX EQU * RTN A14 RETURN EJECT , * %************************************* : * %* I:CHP - INIT CHANNEL PARAMETER * h * %************************************* * * REFERENCED IN: DWTGEN * , (* ENTRY: A1 -
0x14f278…14f40c Dummy {f00=0x0068, f01=0x0190, f02=»- POINTER TO TDC RECORD * & !* EXIT: A5 - CHANNEL PARAMETER * @ P* SAVE05 - SELECTS INTERRUPT TABLE (INTLT1-INTRT4) T 0 P* SAVE06 - SELECTS LINE ENTRY (1-8) * * WORK REGISTERS: A3,A4,A5 * * S
0x14f40c…14f5a0 Dummy {f00=0x0068, f01=0x018e, f02=»E CONNECTION NUMBER | 0 + LDR* A5,A1 GET FIRST WOED OF PROTOTYPE DWT ( # ANKL A5,/F1F0 CLEAR BITS TO MODIFY P 2 . LDR A3,A6 GET MODIFIED LINE CONNECTION NUMBER | & " LC A4,TDC+5,A9 CHECK TYPE OF LINE CCK A4,'LL' LOCAL LINE? RF(NE) I:CH
0x14f5a0…14f734 (1, 166) Dummy {f00=0x0069, f01=0x0190, f02=» & " ORR A5,A3 MERGE WITH OLD CONTENTS * % LDR A3,A6 GET LINE CONNECTION NUMBER . ANK A3,/18 GET BITS 11-12 SRL A3,2 MOVE TO BITS 13-14 ~ P ST A3,SAVE05,A13 SAVE SRL A3,1 MOVE TO BITS 14-15 & " ORR A5,A3 MERGE WITH OLD CONTENTS
0x14f734…14f8c8 Dummy {f00=0x0069, f01=0x0190, f02=»NZ) I:CH10 0 , ANKL A5,/F1FF CLEAR BITS 4-6 (= STORE ZERO) * P ST A3,SAVE06,A13 SAVE ENTRY SELECTOR F RF I:CH50 t PI:CH10 EQU * ANK A3,2 GET BIT 14 RF(NZ) I:CH20 & " ORKL A5,/0800 STORE 4 IN BITS 4-6 LDK A3,4 ENTRY SE
0x14f8c8…14fa5c Dummy {f00=0x0069, f01=0x018e, f02=»T 15 RF(NZ) I:CH30 & " ORKL A5,/0200 STORE 1 IN BITS 4-6 " LDK A3,1 ENTRY SELECTOR L P ST A3,SAVE06,A13 SAVE l RF I:CH50 PI:CH30 EQU * & " ORKL A5,/0A00 STORE 5 IN BITS 4-6 LDK A3,5 ENTRY SELECTOR P ST A3,SAVE06,
0x14fa5c…14fbf0 Dummy {f00=0x0069, f01=0x0190, f02=» . * SUK A3,2 DECREMENT LINE CONNECTION NUMBER RF(N) I:CH70 6 & " ADK A4,1 INCREMENT TABLE SELECTOR L RB I:CH60 v PI:CH70 EQU * ( $ ORR A5,A4 STORE COMPUTED BITS 12-15 SUK A4,4 ANK A4,6 ADK A4,8 P ST A4,SAV
0x14fbf0…14fd84 Dummy {f00=0x0069, f01=0x0190, f02=»:ITAB - BUILD REAL-TIME INTERRUPT TABLE * 2 .********************************************** 2 * h * REFERENCED IN: DWTGEN r * * &* ENTRY: SCTSFA - START OF FREE AREA * 8 4* EXIT: INTLT1-INTRT4 - REAL TIME INTERRUPT TABL
0x14fd84…14ff18 Dummy {f00=0x0069, f01=0x0190, f02=» > P* A4 - LENGTH OF LINE SAVE01URATION TABLE * %* A5 - DEVICE COUNTER F ( #* A6 - LINE COUNTER t 2 P* A7 - DISPLACEMENT IN SAVE21 @ ;* A10- ADDRESS TO TEMPORARY INTERR
0x14ff18…1500ac Dummy {f00=0x0069, f01=0x0190, f02=»INTERRUPT TABLE f * * SUBROUTINES " * 8 P EJECT B PB:ITAB EQU * P 2 - LD A12,SCTSFA INIT POINTER TO FIRST R. I. T. d P LDR A11,A12 $ LDK A7,0 RESET POINTER IN IABAT PBIT10 EQU * P LDK A1,0 P ST A1,SAVE2
0x1500ac…150240 Dummy {f00=0x0069, f01=0x0190, f02=»Y INTERRUPT TABLE v * P LD A10,SCTSFA+2 $ ADR A10,A7 < LDR* A10,A10 P & P LDK A6,0 RESET LINE ENTRY POINTER f PBIT20 EQU * * 8 P* SAVE POINTER TO START OF LINE SAVE01URATION TABLE F P* IN TEMPORARY AREA AND RESET
0x150240…1503d4 (1, 167) Dummy {f00=0x0069, f01=0x018e, f02=»LENGTH OF LINE CONF.TABLE * " 0 -* INIT POINTER IN TEMPORARY INTERRUPT TABLE , * &* TO POINT AT LAST INPUT DEVICE ENTRY ` * ADKL A10,12 LDK A5,7 ADKL A11,14 P EJECT * < 9* CHECK INPUT PART OF TEMPORA
0x1503d4…150568 Dummy {f00=0x0069, f01=0x0190, f02=» RF(NZ) BIT40 YES PBIT35 EQU * , ( SUK A5,1 NO; CHECK IF LAST DEVICE ENTRY 2 RF(Z) BIT50 YES b * z < 7* NO ENTRIES IN THE INPUT DEVICE PART OF THE TEMPORARY 0 +* INTERRUPT TABLE HAS BEEN OCCUPIED SO FAR * . P SUKL
0x150568…1506fc Dummy {f00=0x0069, f01=0x0190, f02=» ENTRY IN THE TEMPORARY INTERRUPT TABLE HAS OCURRED. D @* COPY THE CONTENTS OF THE INPUT DEVICE PART (INCLUDING ZEROES) < H C* OF THE TEMPORARY INTERRUPT TABLE UP TO AND INCLUDING THIS ENTRY. * PBIT40 EQU * * % STR A1,A11 STORE CONTENT
0x1506fc…150890 Dummy {f00=0x0069, f01=0x0190, f02=» IN T.I.T. z $ SUKL A11,2 NEXT ENTRY IN R.I.T. * & LDR* A1,A10 GET CONTENT OF NEXT ENTRY : RB BIT40 h EJECT z PBIT50 EQU * * B >* ALL ENTRIES OF THE INPUT DEVICE PART IN TEMPORARY INTERRUPT * TABLE HAS BEEN SCANNED.
0x150890…150a24 Dummy {f00=0x0069, f01=0x0190, f02=»R. z * ADKL A10,14 LDK A5,7 ( * : L G* SCAN ENTRIES IN OUTPUT DEVICE PART OF THE TEMPORARY INTERRUPT TABLE. D $ * -IF AN OCCUPIED ENTRY OCCUR: L P* FIND FIRST UNOCCUPIED ENTRY (CONTENT=ZERO) IN THE LINE SAVE01URATION
0x150a24…150bb8 Dummy {f00=0x0069, f01=0x0190, f02=» * INCREMENT LENGTH * PBIT70 EQU * * LDR* A1,A10 OCCUPIED ENTRY? > RF(NZ) BIT90 YES b SUK A5,1 LAST ENTRY | RF(Z) BIT120 YES PBIT80 EQU * ADKL A10,2 NEXT ENTRY RB BIT70 PBIT90 EQU *
0x150bb8…150d4c Dummy {f00=0x0069, f01=0x0190, f02=»IN LINE SAVE01URATION TABLE d * OF REAL INTERRUPT TABLE. $ * H P LDR* A2,A11 R RF(Z) BIT100 f P ADKL A11,2 | RB BIT90 EJECT PBIT100 EQU * * F P* AN UNOCCUPIED ENTRY HAS BEEN FOUND IN LINE SAVE01URATIO
0x150d4c…150ee0 Dummy {f00=0x0069, f01=0x0190, f02=»CONTENT ~ * P LD A1,SAVE23,A13 GET START OF L.C.T. " LDR A3,A11 GET CURRENT ENTRY > P SUR A3,A1 COMPUTE LENGTH d CWR A3,A4 L.C.T. EXTENDED? RF(NG) BIT110 LDR A4,A3 SAVE NEW LENGTH PBIT110 EQU * SUK A5,1 LAST ENT
0x150ee0…151074 (1, 168) Dummy {f00=0x0069, f01=0x0190, f02=»NE J D ?* -IF ANY ENTRY WAS OCCUPIED (LENGTH>0): STORE POINTER TO LINE L P* SAVE01URATION TABLE IN THIS LINE ENTRY AND STORE LENGTH IN FIRST WOR R * " LDR A4,A4 ANY ENTRY OCCUPIED? RF(Z) BIT130 NO , P IM SAVE24,A13 INDICATE DEVICE
0x151074…151208 Dummy {f00=0x0069, f01=0x018e, f02=»ST WORD OF L.C.T. r LDR A11,A1 START OF L.C.T. . ) ADR A11,A4 LAST OCCUPIED ENTRY IN L.C.T. > ADKL A11,2 NEXT FREE ENTRY p RF BIT140 EJECT PBIT130 EQU * * * NO DEVICES ON THIS LINE. . P* -NO LINE SAVE01
0x151208…15139c Dummy {f00=0x0069, f01=0x0190, f02=» r PBIT140 EQU * $ ADKL A10,2 NEXT ENTRY IN T.I.T. $ ADK A6,1 INCREMENT LINE COUNTER D CWK A6,8 ALL LINES SCANNED? l RF(E) BIT150 YES ADKL A12,2 NEXT LINE ENTRY P RB BIT20 PBIT150 EQU * P* 6 P* STORE A
0x15139c…151530 Dummy {f00=0x0069, f01=0x0190, f02=»NT? n P RF(Z) BIT155 NO! 2 P LD A1,SAVE21,A13 GET INTERRUPT TABLE ADDRESS & P ST A1,INTLT1,A7 SAVE P RF BIT158 z PBIT155 EQU * . P LD A11,SAVE21,A13 GET START OF FREE AREA PBIT158 EQU * * : 6* ALL LINES OF THIS INT
0x151530…1516c4 Dummy {f00=0x0069, f01=0x0190, f02=»XT ENTRY IN ITAB CWK A7,16 LAST ENTRY? RF(E) BIT160 YES 6 $ LDR A12,A11 GET NEXT FREE ENTRY P RB BIT10 x PBIT160 EQU * * D @* ALL ENTRIES IN THE TEMPORARY INTERRUPT TABLE HAS BEEN SCANNED < 8* AND ALL THE REAL INTE
0x1516c4…151858 Dummy {f00=0x0069, f01=0x0190, f02=»CTSFA P SUK A2,2 PBIT165 ADK A2,2 * P CW A2,SCTEFA CHECK IF MEMORY OVERFLOW 8 P RF(NE) BIT170 f P LDKL A1,LMP3 | ( P CALL ERROR INDICATE MEMORY OVERFLOW PBIT170 CWR A2,A11 P RB(NE) BIT165 ( P ST A13,SCTEFA SKIP TEMP.
0x151858…1519ec Dummy {f00=0x0069, f01=0x0190, f02=»*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*= p 6 1* GENERAL SUBROUTINES * 8 T P*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*= r 8 4**************************************
0x1519ec…151b80 Dummy {f00=0x0069, f01=0x0190, f02=»ASSES d P* 8 4**************************************************** * T " P* REFERENCED IN: B:TCT,B:CDT ^ * > :* ENTRY: A11 - POINTER TO START OF TASK DEFINITION BLOCK * F A* EXIT: A1 - NUMBER OF TASKS IN THE TASK C
0x151b80…151d14 (1, 169) Dummy {f00=0x0069, f01=0x0190, f02=» PGETCTC EQU * P LC A5,TDBNT,A11 SLL A5,8 0 P LC A5,TDBNT+1,A11 B CALL CONVRT RTN A14 p EJECT 8 4**************************************************** 8 4* GETTDC - GET NUMBER OF TERMINAL DEVICE CLASSES * 8 4**
0x151d14…151ea8 Dummy {f00=0x0069, f01=0x0190, f02=»O START OF TASK DEFINITION BLOCK v * ( D @* EXIT: A1 - NUMBER OF TERMINAL DEVICE CLASSES (BINRY VALUE) 2 * z * WORK REGISTERS: A5 * * SUBROUTINES: CONVRT * PGETTDC EQU * LC A5,TDBNC,A11 SLL A5,
0x151ea8…15203c Dummy {f00=0x0069, f01=0x018e, f02=»* ^ 8 3* GETSDC - GET NUMBER OF SPECIAL DEVICE CLASSES * 8 3*************************************************** F * * REFERENCED IN: B:TT * 4 /* ENTRY: A9 - POINTER TO NUMBER OF SDC RECORD * D ?* EXIT: A1 -
0x15203c…1521d0 Dummy {f00=0x0069, f01=0x0190, f02=» * PGETSDC EQU * LCR A5,A9 " P SLL A5,8 4 LC A5,1,A9 F CALL CONVRT Z RTN A14 n EJECT ~ 2 .********************************************** 2 .* GETCLN - GET CLASS IDENTIFICATION NUMBER * 2 .****************
0x1521d0…152364 Dummy {f00=0x0069, f01=0x0190, f02=»CORD b * > :* EXIT: A1 - CLASS IDENTIFICATION NUMBER (BINARY VALUE) * X * WORK REGISTERS: A5 b * * SUBROUTINES: CONVRT * PGETCLN EQU * P LC A5,TDCDD1,A9 P SLL A5,8 P LC A5,TDCDD2,A9
0x152364…1524f8 Dummy {f00=0x0069, f01=0x0190, f02=»CTION NUMBER * v . )***************************************** * J * REFERENCED IN: B:DWTT T * v 8 3* ENTRY: A9 - POINTER TO CLASS DEFINITION RECORD * : 5* EXIT: A1 - LINE CONNECTION NUMBER (BINARY VALUE) *
0x1524f8…15268c Dummy {f00=0x0069, f01=0x0190, f02=» A5,8 P LC A5,LCND2,A9 P CALL CONVRT & RTN A14 : P IFT CREDIT=1 J P EJECT ` : P***************************************************** n : P* * : P* GETTCL - GET TASK CLASS TO
0x15268c…152820 Dummy {f00=0x0069, f01=0x0190, f02=» * f : P* REFERENCED IN: B:TT * : P* * R : P* ENTRY: A5 - TCL IN CURRENT TASK DEF. BLOCK * : P* *
0x152820…1529b4 (1, 170) Dummy {f00=0x006a, f01=0x0190, f02=»REGISTERS: A1-A7,A10 * : P* * 6 : P* SUBROUTINES: GETTSK,NXTBLK * t : P* * : P************************
0x1529b4…152b48 Dummy {f00=0x006a, f01=0x0190, f02=»,A11 SAVE POINTER TO CURRENT TASK DEF. BLOCK 2 P LD A11,SAVE01,A13 START OF CONFIGURATION DATA 4 4 PTCL:10 CWR A11,A10 ALL PREVIOUS BLOCKS SCANNED? j P RF(E) TCL:60 YES! . P LC A5,TDBMC+4,A11 GET FIRST CHAR. IN TCL P SLL A5,8 MOVE TO LEFT BYT
0x152b48…152cdc Dummy {f00=0x006a, f01=0x0190, f02=»R OF COPIES z P ADR A7,A1 INCREMENT TCL 0 PTCL:50 CALL NXTBLK GET NEXT TASK DEF. BLOCK 4 P RB TCL:10 h , PTCL:60 LDR A5,A7 SAVE START VALUE OF TCL z P RTN A14 P XIF EJECT B >****************************************************
0x152cdc…152e70 Dummy {f00=0x006a, f01=0x018e, f02=»ONVERTED * j * " B >************************************************************** , * r * REFERENCED IN: B:DWTT | * , (* ENTRY: A1 - BINARY NUMBER TO CONVERT * 0 ,* EXIT: A5 - TWO-DIGIT ASCII-CODED
0x152e70…153004 Dummy {f00=0x006a, f01=0x0190, f02=» P SLL A5,8 P LCK A5,'00' LDK A2,0 * LDR A1,A1 < PBIN:20 EQU * N RF(Z) BINEX b ADK A2,1 v CWK A2,10 RF(E) BIN:30 SUK A1,1 RB BIN:20 PBIN:30 EQU * ADKL A5,/0100 LDK A2,0
0x153004…153198 Dummy {f00=0x006a, f01=0x018e, f02=»***************** x . )* GETCON - GET CONTENT IN MEMORY WORD * . )***************************************** L * ~ * REFERENCED IN: SEGGEN * " * ENTRY: A2 - MEMORY ADDRESS . )* MMUOPT - MMU OPTION SWITCH (X)
0x153198…15332c Dummy {f00=0x006a, f01=0x0190, f02=» PGETCON EQU * " P LD A1,SCTOPT GET OPTION WORD P ANK A1,1 MMU OPTION B P RF(Z) GCON10 NO MMU ^ ELR A1,A2 z P RF GCON20 PGCON10 EQU * LDR* A1,A2 PGCON20 EQU * RTN A14 RETURN P EJECT PCONMON E
0x15332c…1534c0 Dummy {f00=0x006a, f01=0x0190, f02=» * D P**************************************************************** " P CALL B:TCT BUILD TASK TABLES 2 P CALL B:DMTT BUILD DATA MANAGEMENT TASK TABLES & P CALL B:TT BUILD USER TASK TABLES P IFT CREDIT=1 $ P CALL SEGGEN BUI
0x1534c0…153654 (1, 171) Dummy {f00=0x006a, f01=0x0190, f02=»MONBLK GENERATE MONITOR BLOCKS 2 P CALL B:DWTS BUILD SPECIAL DEVICE WORK TABLES & 2 P CALL B:DWTT BUILD TERMINAL DEVICE WORK TABLES * P CALL B:CDT BUILD COMMON DEVICE TABLES & P CALL B:ITAB BUILD INTERRUPT TABLE P IFT CREDIT=1 P EJECT
0x153654…1537e8 Dummy {f00=0x006a, f01=0x0190, f02=»1,'CR' P RF(NE) SLDM70 P* $ : P* STORE OPTION WORD (SCTOPT) IN USER AREA (P:MTAB+34) . P* l " P LD A1,SCTOPT GET OPTION WORD v P ANK A1,1 MMU OPTION? P RF(Z) SLDM50 ( P EL* A1,SCTLAC GET ADDRESS TO P:MTAB " P LD A2,SCTOP
0x1537e8…15397c Dummy {f00=0x006a, f01=0x0190, f02=»D A2,SCTOPT GET OPTION WORD $ P ST A2,34,A1 STORE IN USER AREA $ PSLDM70 EQU * L P XIF ` P EJECT l F P***************************************************************** z F P* END OF MONITOR SAVE01URATION PART *
0x15397c…153b10 Dummy {f00=0x006a, f01=0x40c2, f02=»********* X P LDKL A8,/FFFF * P ST A8,SCTEFA MODIFY END OF FREE AREA ( P LDR A8,A13 GET BASE-ADDRESS V $ P ADKL A8,SYSLDA START OF SYSLODA z P ABR A8 P END @ P* END OF MONITOR SAVE01URATION PART *
0x153b10…153ca4 Dummy {f00=0x006a, f01=0x403c, f02=» 0 P******************************************** @ 8 END OF FREE AREA ( P LDR A8,A13 GET BASE-ADDRESS V $ P ADKL A8,SYSLDA START OF SYSLODA z P ABR A8 P END @ P* END OF MONITOR SAVE01URATION PART *
0x153ca4…153e38 Dummy {f00=0x006a, f01=0x2008, f02=» P X ` h p
0x153e38…153fcc Dummy {f00=0x006a, f01=0x0190, f02=» n $ P LD A2,SAVE03,A13 GET TO ADDRESS . P LDR A3,A9 GET P:MTAB START (=END OF DDIV 0 P SUR A3,A1 => LENGTH b P XIF ~ P IFT CREDIT-MMUPAG=1 . P LD A8,SCTNOS ANY SEGMENTS IN APPLICATION? P RF(Z) NOSGMT NO! ( P LDKL A8,0 RESET FSTAD
0x153fcc…154160 Dummy {f00=0x006a, f01=0x0190, f02=»XT LDR* A4,A1 GET WORD P STR A4,A2 STORE P ADK A1,2 6 P ADK A2,2 H P SUK A3,2 DEC LENGTH Z P RB(NN) MOVNXT v P XIF P IFT CREDIT+MMUPAG=2 P CALL XMOVE & P* REMOVE DDIV ENTRIES IN MM-TABLE P " P LDR A1,A9 GET
0x154160…1542f4 (1, 172) Opaque[0x194]
0x1542f4…154488 # DirEnt {nam=»SYSLDA«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0d50, f03=0x0000}
0x1542f4…154488 IdxSect {
0x1542f4…154488 f00 = 0x006a // 0x1542f4 @0x0
0x1542f4…154488 f01 = 0x0054 // 0x1542f6 @0x2
0x1542f4…154488 gno = [ // 0x1542f8 @0x4
0x1542f4…154488 [0x00]: C0x006a.0x2.0
0x1542f4…154488 [0x01]: C0x006a.0x3.0
0x1542f4…154488 [0x02]: C0x006b.0x0.0
0x1542f4…154488 [0x03]: C0x006b.0x1.0
0x1542f4…154488 [0x04]: C0x006b.0x2.0
0x1542f4…154488 [0x05]: C0x006b.0x3.0
0x1542f4…154488 [0x06]: C0x006c.0x0.0
0x1542f4…154488 [0x07]: C0x006c.0x1.0
0x1542f4…154488 [0x08]: C0x006c.0x2.0
0x1542f4…154488 [0x09]: C0x006c.0x3.0
0x1542f4…154488 [0x0a]: C0x006d.0x0.0
0x1542f4…154488 [0x0b]: C0x006d.0x1.0
0x1542f4…154488 [0x0c]: C0x006d.0x2.0
0x1542f4…154488 [0x0d]: C0x006d.0x3.0
0x1542f4…154488 [0x0e]: C0x006e.0x0.0
0x1542f4…154488 [0x0f]: C0x006e.0x1.0
0x1542f4…154488 [0x10]: C0x006e.0x2.0
0x1542f4…154488 [0x11]: C0x006e.0x3.0
0x1542f4…154488 [0x12]: C0x006f.0x0.0
0x1542f4…154488 [0x13]: C0x006f.0x1.0
0x1542f4…154488 [0x14]: C0x006f.0x2.0
0x1542f4…154488 [0x15]: C0x006f.0x3.0
0x1542f4…154488 [0x16]: C0x0070.0x0.0
0x1542f4…154488 [0x17]: C0x0070.0x1.0
0x1542f4…154488 [0x18]: C0x0070.0x2.0
0x1542f4…154488 [0x19]: C0x0070.0x3.0
0x1542f4…154488 [0x1a]: C0x0071.0x0.0
0x1542f4…154488 [0x1b]: C0x0071.0x1.0
0x1542f4…154488 [0x1c]: C0x0071.0x2.0
0x1542f4…154488 [0x1d]: C0x0071.0x3.0
0x1542f4…154488 [0x1e]: C0x0072.0x0.0
0x1542f4…154488 [0x1f]: C0x0072.0x1.0
0x1542f4…154488 [0x20]: C0x0072.0x2.0
0x1542f4…154488 [0x21]: C0x0072.0x3.0
0x1542f4…154488 [0x22]: C0x0073.0x0.0
0x1542f4…154488 [0x23]: C0x0073.0x1.0
0x1542f4…154488 [0x24]: C0x0073.0x2.0
0x1542f4…154488 [0x25]: C0x0073.0x3.0
0x1542f4…154488 [0x26]: C0x0074.0x0.0
0x1542f4…154488 [0x27]: C0x0074.0x1.0
0x1542f4…154488 [0x28]: C0x0074.0x2.0
0x1542f4…154488 [0x29]: C0x0074.0x3.0
0x1542f4…154488 ]
0x1542f4…154488 }
0x154488…15461c Dummy {f00=0x006a, f01=0x0190, f02=» 2 P IDENT SYSLDA REL 9.2 79-12-21 870105040920 P : ( P =5,MOVING AREAS>32K DOES NOT WORK B P REL 9.2 79-12-21 ST n . P =4, FAULTY STACK BASE & CWB/UWB BLOCKS P REL 9.1 79-07-17 , P =3, IMPOSSIBLE TO LOAD NON MMU SYSTEM
0x15461c…1547b0 Dummy {f00=0x006a, f01=0x0190, f02=»ILIPS TERMINAL SYSTEM PTS P* " > P* SYSLDA = SYSTEM LOAD - APPLICATION CONFIGURATION PART , P* n P* x P* P* P* P* > P********************************************************** P* P* F P* THIS
0x1547b0…154944 Dummy {f00=0x006a, f01=0x0190, f02=»* ENTERED AFTER MONITOR CONFIGURATION (PERFORMED BY SYSLDM), AND H P* IS AT THAT TIME LOCATED AT HIGHEST FREE ADDRESS OF SYSTEM AREA. J P* P* ASSEMBLER APPLICATION: J P* NO CONFIGURATION WILL TAKE PLACE. FIRST USER TASK IS ACTIVATED
0x154944…154ad8 Dummy {f00=0x006a, f01=0x0190, f02=»CREDIT APPLICATION: F P* SYSLDA READS CONFIGURATION FILE (ALREADY IN CORE) AND BUILD B P* SHADOW-TABLES (TABLES CONTAINING NUMBER OF REAL TASKS & f . P* NUMBER OF USER WORK-BLOCK COPIES). H P* SYSLDA THEN MOVES ITSELF TO FOLLOW
0x154ad8…154c6c Dummy {f00=0x006a, f01=0x0190, f02=»STACK AND TABLES ARE NOW d H P* BUILT FROM 'BOTTOM' (HIGHEST FREE ADDRESS) OF MEMORY. BUFFERS H P* ARE, IN CASE OF MMU IN SYSTEM, ALSO ALLOCATED AT 'BOTTOM' OF l H P* MEMORY; ELSE, IF NO MMU, BUFFERS ARE ALLOCATED AFTER MONITOR P*
0x154c6c…154e00 Dummy {f00=0x006a, f01=0x0190, f02=»'S ARE FILLED. A BRANCH IS FINALLY MADE TO x . P* P F I N I T TO START APPLICATION. 2 P EJECT d P r P*************************** ~ P* * P* ENTRIES AND EXTERNALS * P* *
0x154e00…154f94 (1, 173) Dummy {f00=0x006a, f01=0x018e, f02=»LDA P ENTRY REL START OF CODE P ENTRY LDALEN PROGRAM LENGTH , P P P* SUBROUTINE ENTRIES X P ENTRY MOVE t P ENTRY ERROR $ P ENTRY CMPADR COMPARE ADDRESSES 2 P ENTRY NXTBLK SKIP TO NEXT CONFIGURATION BLOCK 4 P ENTRY NXTCOM
0x154f94…155128 Dummy {f00=0x006a, f01=0x0190, f02=» ` P P* SAVE AND WORK AREA ENTRIES " P ENTRY MMTAB WORK-TABLE 1 (MMU 4 6 P ENTRY TABBE ABSOLUTE START ADDRESS OF WORK-TAB 1 Z 4 P ENTRY MMEND ABSOLUTE END ADDRESS OF WORK-TAB 1 2 P ENTRY MMDDIV WORK-TABLE 2 (MM) RELATIVE 'REL' , P ENTRY
0x155128…1552bc Dummy {f00=0x006a, f01=0x0190, f02=»!!! d & P ENTRY SAVE01,SAVE12,SAVE03,SAVE04 & P ENTRY SAVE05,SAVE06,SAVE07,SAVE08 6 & P ENTRY SAVE09,SAVE10,SAVE11,SAVE02 ` & P ENTRY SAVE13,SAVE14,SAVE15,SAVE16 & P ENTRY SAVE17,SAVE18,SAVE19,SAVE20 . P ENTRY SAVE21,SAVE22,SAVE23,SAVE24,SAVE25
0x1552bc…155450 Dummy {f00=0x006a, f01=0x0190, f02=»RESS TO COMMON PART v P EXTRN SCTTCT TC:TAB ADDRESS P EXTRN SCTSTB A15 STACK-BASE @ " P EXTRN SCTEFA END OF FREE AREA d $ P EXTRN SCTNOS NUMBER OF SEGMENTS " P EXTRN SCTNOP NUMBER OF PAGES P EXTRN SCTPSZ PAGE SIZE P EXTRN SCTMMC =
0x155450…1555e4 Dummy {f00=0x006a, f01=0x0190, f02=»XTRN SCTSWB ADDRESS TO SWB CONTROL BLOCK TABLE P EXTRN SCTBUG BUGGER ADDRESS 6 P Z P* EXTERNAL LABELS b 6 P EXTRN SYSLDM START OF MONITOR CONFIGURATION PART | $ P EXTRN PAGQUE PAGE QUEUE POINTER P P* EXTERNAL SUBROUTINES P EXT
0x1555e4…155778 Dummy {f00=0x006a, f01=0x0190, f02=»TCHER ENTRY ~ P P* , P EXTRN TTB:SA START OF SAVE AREA IN TTAB & P EJECT V P d P l , P*************************************** t , P* CONDITIONAL ASSEMBLY * , P*************************************** P
0x155778…15590c Dummy {f00=0x006a, f01=0x0190, f02=»MMUSWB EQU MMUPAG+SWPBLK P PSWBMMU EQU SWPBLK-MMUPAG ( P EJECT H P V P PROGRAM STRUCTURE: ^ P | F P* ------------------------------------------------------- L P* ! RELOCATION ROUTINE
0x15590c…155aa0 Dummy {f00=0x006a, f01=0x0190, f02=»-------------------------! h F P* ! SAVE & COMMUNICATION AREA. MMU - WORK TABLES ! " F P* !-----------------------------------------------------! l F P* ! SUBROUTINES. -COMMON TO ALL PARTS IN PROGRAM. ! F P*
0x155aa0…155c34 (1, 174) Dummy {f00=0x006b, f01=0x0190, f02=»T 2.B J F P* ! BUILD REAL TASK-LOCAL DATA AREAS ! F P* ! -QUEUE TASK VIA 'ACTOT' ! X F P* ! -FILL MM-TABLE IN TTAB ! F P* ! -COPY T:A'S AC
0x155c34…155dc8 Dummy {f00=0x006b, f01=0x0190, f02=»LLOCATE FIXED BUFFERS AND STACK ! F P* ! -UPDATE TID IN T:A AND SAVE TID IN T:AID TABLE ! : F P* ! -START DEBUGGER (IF ANY) AND START APPLICATION ! F P* !----------------------------------------------
0x155dc8…155f5c Dummy {f00=0x006b, f01=0x0190, f02=»O FOLLOW SYSLDA ! l F P* ! ! & F P* ! C O M D A T ! p F P* ! GENERATE COMMON DATA AREA. PROCESS CWB'S & UWB'S. ! F P*
0x155f5c…1560f0 Dummy {f00=0x006b, f01=0x0190, f02=» N F P* ! ! F P* ! C L A D A T ! R F P* ! BUILD TASK CLASS DATA AREAS. PROCESS CWB'S, UWB'S ! F P* ! AND DWB'S.
0x1560f0…156284 Dummy {f00=0x006b, f01=0x0190, f02=»D ! z F P* ! -MOVE D.T. & W.B., COPY UWB'S ! 4 F P* ! -MOVE D.T.'S OF SWB'S AND TWB'S ! ~ F P* ! -SEARCH DBLK-TAB FOR DWB'S. MOVE D.T. AND UPDATE
0x156284…156418 Dummy {f00=0x006b, f01=0x0190, f02=» ! F P* ! P R O D A T ! F P* ! BUILD PROTOTYPE TASK-LOCAL DATA AREAS. ! ` F P* ! -GENERATE TWB'S AND RESERVE FOR SWB'S ! F P* ! -ALLOC
0x156418…1565ac Dummy {f00=0x006b, f01=0x0190, f02=» ! -INCLUDE DDIV-PROTOTYPE & PART 2.A IN FREE AREA. ! F P* ! -CONTINUE IN PART 2.B ! B F P* !-----------------------------------------------------! N P* ! SUBROUTINES
0x1565ac…156740 Dummy {f00=0x006b, f01=0x0190, f02=»ON: ! ASSEMBLER APPLICATION: ! r F P* ! READ CUNFIGURATION FILE ! -FILL MM-TABLES IN ! , F P* ! AND BUILD SHADOW-TABLES. ! USER TASK TTAB'S. ! v F P* ! ! -QUEUE 1:ST USER TASK ! F
0x156740…1568d4 (1, 175) Dummy {f00=0x006b, f01=0x0190, f02=»-----! T F P* ! REAL TASKS' IS BUILT AT ! F P* ! THE END OF MONITOR. ! X F P* ! U:BTAB: ! F P* ! -A TABLE OF 'N
0x1568d4…156a68 Dummy {f00=0x006b, f01=0x0190, f02=» ! F P* ! -RELOCATE ALL W.B.-ADDRESSES IN DDIV-PROTOTYPE. ! : F P* ! -REMOVE NOT USED ENTRIES IN T:ATAB ! F P* ! -RELOCATE ADDRESSES IN U:BTAB
0x156a68…156bfc Dummy {f00=0x006b, f01=0x0190, f02=» ! b F P* ! -CONTINUE IN PART 2.A ! F P* !-----------------------------------------------------! f P EJECT P P ***************** P ***************** P **
0x156bfc…156d90 Dummy {f00=0x006b, f01=0x0190, f02=» P********** P* P:MTAB * P********** . PT:ATAB EQU 0 @ PU:BTAB EQU 2 T PP:BAS EQU 6 SEGMENT BASE h . PT:AID EQU 32 ADDRESS TO 'TABLE OF T:A TID' ( PS:BTAB EQU 40 DISP TO S:BTAB ADDRESS P P P********** P
0x156d90…156f24 Dummy {f00=0x006b, f01=0x0190, f02=» 4 PROTOTYPE NAME 8 PUPNUMB EQU 7 SAVE AREA NUMBER OF COPIES (SHADOW-TBL) P* V . PUR:REC EQU 6 RECORD LENGTH IN REAL U:BTAB ` * PURADDR EQU 2 ADDRESS TO FIRST REAL UWB PURNUMB EQU 4 NUMBER OF UWB'S PURLENG EQU 6 LENGTH OF UWB P E
0x156f24…1570b8 Dummy {f00=0x006b, f01=0x0190, f02=»*********************** P P* TASK DEFINITION BLOCK: , PTDBBT EQU 0 1A BLOCK TYPE L ( PTDBNT EQU TDBBT+1 2N NUMBER OF TASKS n , PTDBID EQU TDBNT+2 6A TASK ID START VALUE , PTDBMC EQU TDBID+6 6A MATCHING TASK CLASS $ PTDBTL EQU TDBM
0x1570b8…15724c Dummy {f00=0x006b, f01=0x0190, f02=» $ PTDC EQU 7 TERMINAL DEVICE CLASS PTLC EQU 6 LINE CONNECTION , ( PTDBREC EQU TDC+TLC TDB-RECORD LENGTH N P* z * PSDC EQU 7 SPECIAL DEVICE CLASS-RECORD P* P* COMMON DEVICE DEF. BLOCK: PCDBBT EQU 0 1A BLOCK TYPE 6 PCDBNC
0x15724c…1573e0 Dummy {f00=0x006b, f01=0x018e, f02=»PE DEF. BLOCK | PUDBBT EQU 0 1A BLOCK TYPE , PUDBNU EQU UDBBT+1 3A NUMBER OF UWB TYPES 8 P* h ( PUDBFST EQU UDBNU+3 FIRST UDB-RECORD r PNAMUWB EQU 3 NAME OF UWB " PNUMUBL EQU 3 NUMBER OF BLOCKS . PUDBREC EQU NAMUWB+NUMUBL UDB RECORD-
0x1573e0…157574 (1, 176) Dummy {f00=0x006b, f01=0x0190, f02=» 6 PCSE EQU -14 CURRENT SEGMENT END (HERE: STACKSIZE) $ PCSB EQU -12 CURRENT SEGMENT BASE > 4 PCSN EQU -10 CURRENT SEGMENT NUMBER (HERE LENGTH f 2 P OF ALL DSCB-RECORDS PT:DAD EQU -8 ADDRESS TO T:D * PCIA EQU -6 CURRE
0x157574…157708 Dummy {f00=0x006b, f01=0x0190, f02=»D | PPA EQU 0 STACK POINTER PSTKB EQU 2 STACK BASE ( " PWATFST EQU 4 FIRST WAT-ELEMENT F P* l P* DSCB-RECORD: v PDSCBL EQU 20 RECORD LENGTH PBA EQU 2 BUFFER ADDRESS PRL EQU 4 REQ. LENGTH PEL EQU 6 EFF. LENGTH " PBL
0x157708…15789c Dummy {f00=0x006b, f01=0x0190, f02=»0 DISPLACEMENT TO FCB IN T:A , PT:DTID EQU 2 TASK IDENTIFIER (PROTOTYPE) $ , PDATLEN EQU 4 NUMBER OF DATASETS (DSCB'S) T & PWATLEN EQU 6 NUMBER OF WATELEMENTS 0 PTWBMSK EQU 8 MASK FOR TWB'S (ONE BIT/ENTRY) * PSWBMSK EQU 10 MASK FOR SWB'S -"-
0x15789c…157a30 Dummy {f00=0x006b, f01=0x018e, f02=» l P ! . PSTPREC EQU 4 RECORD LENGTH OF START-POINTS ! P ! B P ! J P**************** ! R P* SOP-HANDLING * ! j P**************** ! PSOP EQU /2E DEVICE ADDRESS ! P ! P LAMP CODE MEANING ! P --------- ------- ! PLMP1 EQU
0x157a30…157bc4 Dummy {f00=0x006b, f01=0x0190, f02=» PLMP5 EQU /40 TID ERROR " " PLMP6 EQU /20 UWB OR SWB ERROR " " " PLMP7 EQU /10 MM-TABLE OVERFLOW " H PLMP8 EQU 8 " n PLMP9 EQU 4 " PLMP10 EQU 2 " PLMP11 EQU 1 " P EJECT " P********************* " P* OTHER CONSTANTS * " P****
0x157bc4…157d58 Dummy {f00=0x006b, f01=0x0190, f02=»QU 4 DISP TO LENGTH OF SWB " P # " $ PFCBDD1 EQU 8 DISP TO FIRST DSET # . $ PFCBDD2 EQU 10 DISP TO 2:ND DSET # V P # ~ $ PSTKSZ EQU 128 DEFAULT STACK-SIZE # P # & PCREID EQU 2 CREDIT IDENTIFICATION # ( PSEGREC EQU 6 RECORD LENGTH IN S:
0x157d58…157eec Dummy {f00=0x006b, f01=0x0190, f02=»D-ADDRESS IN TTAB # x * PTTB:PP EQU 6 SAVE AREA FOR TCL IN TTAB $ P $ H ( PNTPA EQU 4 INTERPRETER START ADDRESS $ P & PIHRTC EQU 4 RTC INTERRUPT ADDRESS $ | $ PRTCDA EQU /1B RTC DEVICE ADDRESS $ P $ F P**********************************************
0x157eec…158080 Dummy {f00=0x006b, f01=0x0190, f02=» [REL-ADDRESS] * $ n F P* * % ( F P***************************************************************** % r P % P % P % PCALL FORM 16=/F697,16 % P EJECT %
0x158080…158214 (1, 177) Dummy {f00=0x006b, f01=0x0190, f02=» ** % 6 P** RELOCATION ROUTINE & STACK INITIALLISATION ** & 6 6 P** ** & p 6 P************************************************** & 6 P************************************
0x158214…1583a8 Dummy {f00=0x006b, f01=0x0190, f02=» & P* ADJUST FOR PSW-ROUTINE * ' P************************** ' * 6 P LDK A3,GETPSW RELATIVE ADDRESS TO 'PSWSW-ADDRESS' ' L P ADR A3,A13 ABSOLUT DITO ' 4 P ST A3,PSW,A13 STORE ADDRESS TO 'GETPSW'-ROUTINE ' P* LOAD STACKBASE * ' P****************
0x1583a8…15853c Dummy {f00=0x006b, f01=0x0190, f02=»*** ' P* ( P RES 12 ( PSTACKB EQU *-REL-2 ( & P EJECT ( @ P ( N P ( Z P* ADDRESS TO PSW-ROUTINE * ( f P************************** ( P* ( PPSW EQU *-REL ( P DATA GETPSW ( P ( D P******************************
0x15853c…1586d0 Dummy {f00=0x006b, f01=0x0190, f02=» PUT PSW IN STACK FOR CALLING SUBROUTINE * ( z D P**************************************************************** ) 2 P ) z PGETPSW EQU *-REL ) $ P STR A2,A14 SAVE A2 ON A14-STACK ) 0 P LD A2,2,A14 GET PSW FROM CALLING SUBROUTINE ) . P ST A2,6,A14 R
0x1586d0…158864 Dummy {f00=0x006b, f01=0x0190, f02=»*** ) r & P* * * & P* SUBROUTINE-HANDLER * * 6 & P* * * ` & P********************************* * P * PSUBSUB EQU *-REL * " PSUBBA ST A10,MUL,A13 SAVE A10 * . P LD* A10,4,A14
0x158864…1589f8 Dummy {f00=0x006b, f01=0x0190, f02=»N * f P STR A10,A14 PUT ON STACK + P LD A10,MUL,A13 RESTORE A10 + , P ABR* A14 + P P + b P + j P + r < P******************************************************* + z < P* JUMP TO SYSLDM (FROM SYSLOD) ALWAYS VIA THIS MODULE * + < P**************
0x1589f8…158b8c Dummy {f00=0x006b, f01=0x0190, f02=»******** + t ( P** ** , ( P** SAVE, AND COMMUNICATION AREA ** , < ( P** ** , h ( P************************************ , P , * PT:ATOD EQU *-REL T:ATAB 'OLD' ADDRESS , P DATA 0 , *
0x158b8c…158d20 Dummy {f00=0x006b, f01=0x0190, f02=»-REL U:BTAB NEW ADDRESS , P DATA 0 - ( PS:BTOD EQU *-REL S:BTAB OLD ADDRESS - 0 P DATA 0 - ( PS:BTNW EQU *-REL S:BTAB NEW ADDRESS - l P DATA 0 - . PMOVADD EQU *-REL ADDRESS-CHANGE AFTER MOVE - P DATA 0 - 4 PMOVED EQU *-REL INDICATOR IF B
0x158d20…158eb4 (1, 178) Dummy {f00=0x006c, f01=0x0190, f02=»TADR EQU *-REL LAST ADDRESS WHEN BUILDING DATA PART - P DATA 0 . < @ PFSTADR EQU *-REL FIRST FREE ADDRESS WHEN ALLOCATING BUFFERS . L P DATA 0 . * PNEWAD1 EQU *-REL SAVE FOR W.B. ADDRESS . P DATA 0 . * PNEWAD2 EQU *-REL SAVE FORD.T. ADDRESS .
0x158eb4…159048 Dummy {f00=0x006c, f01=0x0190, f02=»ATA 0 . " PUWB EQU *-REL U.W.B. INDICATOR / P DATA 0 / 4 $ PSAVE01 EQU *-REL TEMPORARY SAVE / D P DATA 0 / l PSAVE02 EQU *-REL / | P DATA 0 / PSAVE03 EQU *-REL / P DATA 0 / PSAVE04 EQU *-REL / P DATA 0 / PSAVE05 EQU *-REL /
0x159048…1591dc Dummy {f00=0x006c, f01=0x0190, f02=» PSAVE09 EQU *-REL SAVE AREAS 0 P DATA 0 0 ( PSAVE10 EQU *-REL 0 8 P DATA 0 0 P PSAVE11 EQU *-REL 0 ` P DATA 0 0 x PSAVE12 EQU *-REL 0 P DATA 0 0 PSAVE13 EQU *-REL 0 P DATA 0 0 PSAVE22 EQU *-REL 0 P DATA 0 0 PSAVE25 E
0x1591dc…159370 Dummy {f00=0x006c, f01=0x0190, f02=» DATA 0 0 & PBIT EQU *-REL SAVE FOR SUPER-LOOP 1 P DATA 0 1 : 8 PTADISP EQU *-REL DISPLACEMENT IN T:A TO W.B. ADDRESS 1 J P DATA 0 1 * PDATEND EQU *-REL END OF DDIV PROTOTYPE 1 P DATA 0 1 ( PMMREL1 EQU *-REL PHYSICALL PAGE BASE 1 P DATA 0
0x159370…159504 Dummy {f00=0x006c, f01=0x0190, f02=» & PBUFSIZ EQU *-REL TEMP. BUFFER SIZE 2 P DATA 0 2 . " PMMTO EQU *-REL MMTABLE ADDRESS 2 > P DATA 0 2 d * PMMFROM EQU *-REL 2:ND MMTABLE ADDRESS 2 t P DATA 0 2 0 PFYSPAG EQU *-REL LAST PHYSICALLY PAGE NUMBER 2 P DATA 0 2 PFSTPAG EQU *-REL 2
0x159504…159698 Dummy {f00=0x006c, f01=0x0190, f02=»ATA LDAEND-REL 2 PXMSAV EQU *-REL 3 P DATA 0,0 3 . P 3 @ P 3 H P 3 P P 3 X & P********************************* 3 ` & P* EQUATES FOR SYSLDM SAVE-WORDS * 3 & P********************************* 3 P 3 PSAVE14 EQU U:BTOD 3 PSAVE15 E
0x159698…15982c Dummy {f00=0x006c, f01=0x0190, f02=»ED 3 PSAVE21 EQU NEWAD1 4 PSAVE23 EQU SWITCH 4 $ PSAVE24 EQU FLAG 4 > P EJECT 4 V P 4 d P* MMU TABLES * 4 l P 4 P 4 . PMMDDIV EQU *-REL DDIV (& SYSLDA) MM-TABLE 4 P IFT MMUPAG=1 4 P RES 16 4 P XIF 4 P 4 $ PMMTAB EQU
0x15982c…1599c0 Dummy {f00=0x006c, f01=0x0190, f02=» 4 PMMEND EQU * 5 4 PTTPAG DATA 0 LAST ENTRY (FROM BOTTOM) IN MM-TAB 5 P 5 T PMMBEG EQU TABBE-* 5 0 PLSTPAG EQU TTPAG-* DISPL. TO 'ENTRY-POINTER' 5 v P EJECT 5 P 5 6 P*** *** 5 6 P*** S
0x1599c0…159b54 (1, 179) Dummy {f00=0x006c, f01=0x0190, f02=» *** 5 r 6 P************************************************* 6 6 P************************************************* 6 V P 6 P 6 , P** E R R O R ** 6 , P** ** 6 , P
0x159b54…159ce8 Dummy {f00=0x006c, f01=0x0190, f02=» 6 h , P** INPUT :A1=SOP-MESSAGE ** 7 , P** OUTPUT:A2=RELATIVE CALLING ADDRESS** 7 8 , P** (REG-CONTENTS IS SAVED) ** 7 h , P**************************************** 7 P 7 PERROR EQU * 7 P ST A2,SAVE01,A13 SAVE A2 7 . P L
0x159ce8…159e7c Dummy {f00=0x006c, f01=0x0190, f02=»NG PURPOS) 7 | P EJECT 8 P 8 & P** M O V E ** 8 ( & P** ** 8 R & P** ** 8 | & P** MOVE BLOCKS INSIDE MEMORY ** 8 & P** ** 8 & P** INPUT:A1=F
0x159e7c…15a010 Dummy {f00=0x006c, f01=0x0190, f02=» ** 8 x & P** WORK-REG: A4 ** 9 & P********************************* 9 < P 9 f PMOVE EQU * 9 r $ PMOVES ADR A1,A3 END OF FROM AREA 9 P ADR A2,A3 END OF TO-AREA 9 & P LD A4,SCTEFA GET END OF FREE AREA 9 P TNM A2,A4 EQUAL
0x15a010…15a1a4 Dummy {f00=0x006c, f01=0x0190, f02=» SIGN 9 n 8 PMOVCK RF(NG) MOVE10 END OF TO-AREA<=END OF FREE AREA : P LDKL A1,LMP3 : J ( P CALL ERROR INDICATE MEMORY OVERFLOW : ` PMOVE10 SUK A3,1 DEC LENGTH : P RF(N) MOVE20 ALL DONE : P SUK A1,1 : P SUK A2,1 : P LCR A4,A1 GET CHARACTER
0x15a1a4…15a338 Dummy {f00=0x006c, f01=0x0190, f02=» : 4 P** M O V I N G ** ; 4 P** ** ; D 4 P** ** ; | 4 P** USES ROUTINE 'MOVE' ABOVE. TO-ADDRESS IS ** ; 4 P** ASSUMED TO BE DATA-PART
0x15a338…15a4cc Dummy {f00=0x006c, f01=0x0190, f02=» 4 P** ** < 4 P** INPUT:A3 & A1 AS IN 'MOVE' ** < < 4 P** OUTPUT: A2=TO-ADDRESS (LSTADR UPDATED) ** < t 4 P** WORK-REG: A4 ** < 4 P************************************
0x15a4cc…15a660 Dummy {f00=0x006c, f01=0x0190, f02=»FE MAKE EVEN ADDRESS < P ST A11,SAVE01,A13 SAVE A11 = P ST A9,SAVE12,A13 SAVE A9 = @ P LDR A11,A2 = b * P LD A9,DATEND,A13 END OF PROTOTYP AREA = v " P CALL CMPADR COMPARE ADDRESSES = P RF(NL) MOV020 = ( PMOV010 LDKL A1,LMP3 MEMORY OVERFLOW =
0x15a660…15a7f4 (1, 180) Dummy {f00=0x006c, f01=0x0190, f02=»A13 NEW ADDRESS = ( P LD A9,SAVE12,A13 RESTORE REGISTERS > P LD A11,SAVE01,A13 > D P RB MOVES > ^ P XIF > p P IFT CREDIT+MMUPAG=2 > | P EJECT > > 4 P** X M O V E ** > 4 P**
0x15a7f4…15a988 Dummy {f00=0x006c, f01=0x0190, f02=» TWO PHASES:-MOVE TO SYSTEM AREA (BUFBEG) ** > 4 P** -MOVE TO USER AREA ** ? 6 4 P** IF 'BUFSIZ' (TEMPORARY MOVE-BUFFER) IS NOT** ? n 4 P** BIG ENOUGH THE MOVE IS REPEATED ** ? 4 P**
0x15a988…15ab1c Dummy {f00=0x006c, f01=0x0190, f02=» A3=LENGTH (IN BYTES) ** ? 4 P** WORK.REGS:A4,A10 ** @ . 4 P************************************************ @ f P @ PXMOVE EQU * @ P ST A1,SAVE09,A13 @ P ST A1,SAVE07,A13 @ P ST A2,SAVE10,A13 @ P
0x15ab1c…15acb0 Dummy {f00=0x006c, f01=0x018e, f02=» PXMOV05 EQU * A LDR A10,A3 SAVE LENGTH A , ( LDK A4,0 RESET 'NUMBER-OF-MOVE' COUNTER A 8 * P LDR A11,A3 GET LENGTH OF AREA TO MOVE A h 0 P LD A9,BUFSIZ,A13 GET TEMPORARY BUFFER SIZE A P CALL CMPADR COMPARE A " RF(G) SPLIT NO! SEVERAL MOVE A
0x15acb0…15ae44 Dummy {f00=0x006c, f01=0x0190, f02=» $ P TL* MMFROM,A13 LOAD FROM-TABLE B , ( MVUS A3 MOVE DATA-BLOCK TO TEMP. BUFFER B , 0 P ST A1,SAVE09,A13 SAVE END OF 'FROM' ADDRESS B P LD A1,SYSBUF,A13 B 0 P LD A2,SAVE08,A13 GET START OF 'TO' ADDRESS B LDR A3,A10 GET LENGTH B P TL* MMTO,A1
0x15ae44…15afd8 Dummy {f00=0x006c, f01=0x0190, f02=» A2,A10 B 0 P ST A2,SAVE08,A13 SAVE START OF 'TO' ADDRESS C * P LD A3,SAVE11,A13 GET REQUESTED LENGTH C D $ SUR A3,A10 SUBTRACT MOVED PART C r P ST A3,SAVE11,A13 SAVE C P CWR A3,A10 C P RB(NL) XMOV10 C P LDR A10,A3 LAST LENGTH C P RB XM
0x15afd8…15b16c Dummy {f00=0x006c, f01=0x0190, f02=»ND DIVIDE C 2 P LDR A4,A2 GET QUOTIENT (=NUMBER OF MOVES - 1) D & " LD A10,BUFSIZ,A13 MOVE MAX LENGTH D H P RB XMOV10 D r D 0 PXMOV30 LD A2,SAVE10,A13 RESTORE 'TO-ADDRESS' D , P LD A1,SAVE07,A13 RESTORE 'FROM-ADDRESS' D P LD A9,XMSAV,A13 RESTORE
0x15b16c…15b300 Dummy {f00=0x006c, f01=0x018e, f02=»* D b 4 P** ** E 4 P** ** E B 4 P** USES SUBROUTINE 'XMOVE' TO MOVE A BLOCK ** E z 4 P** VIA TWO MM-TABLES.PHYSICALL TO-ADDRESS ** E 4 P** IS ALWAYS ASSUMED TO BE DA
0x15b300…15b494 (1, 181) Dummy {f00=0x006c, f01=0x0190, f02=» 4 P** IS UPDATED AND CHECKED. ** F 4 P** ** F < 4 P** INPUT :A1 & A3 AS IN 'XMOVE' ** F t 4 P** TTAB=POINTER TO TTAB (OR LIKELY) ** F 4 P** OUTPUT:A2=LOGICALL TO-ADDRESS
0x15b494…15b628 Dummy {f00=0x006c, f01=0x0190, f02=» PMOVING EQU * G P ST A11,SAVE01,A13 SAVE A11 G P ST A9,SAVE12,A13 SAVE A9 G < . ) LD A4,FYSPAG,A13 GET ACT. PHYSICALL PAGE G ^ & P LD A10,TTAB,A13 LOAD TTAB-ADDRESS G 2 . LD A2,LSTPAG,A10 GET LAST TABLE-ENTRY IN TTAB G " LDR* A9,A2 GET PAGE IN
0x15b628…15b7bc Dummy {f00=0x006c, f01=0x0190, f02=»TTAB' G t $ P CALL SETTAB NEW PAGE IN TABLE! H 6 PMOV010 LD A11,LSTADR,A13 GET LAST LOGICALL ADDRESS H 6 ANKL A11,/FFF H p * P LDR A9,A3 GET LENGTH OF AREA TO MOVE H 0 P CALL CMPADR ENOUGTH SPACE IN CURRENT PAGE? H P RF(NL) MOV020 YES H 0 P SUR A
0x15b7bc…15b950 Dummy {f00=0x006c, f01=0x0190, f02=» PHYSICAL PAGE INCREMENT H P RB MOV015 I 6 PMOV020 SUR A11,A3 COMPUTE DISPLACEMENT WITHIN PAGE I 2 PMOV025 RF(NN) MOV050 I l * PMOV030 CALL SETTAB NEW PAGE IN TABLE! I & ! ADKL A11,4096 NEW PAGE INCREMENT I ( P RB(N) MOV030 NOT ENOUGH. NEW PAGE! I
0x15b950…15bae4 Dummy {f00=0x006c, f01=0x0190, f02=»A2=CURRENT ENTRY IN MM-TABLE I J $ PMOV050 EQU * J , , ( ST A2,LSTPAG,A10 SAVE MMU-ENTRY IN TTAB J @ 0 , ST A4,FYSPAG,A13 SAVE PHYSICALL PAGE NUMBER J p 4 P LDKL A4,MMBEG CALCULATE TABLE ENTRY DISPLACEM. J & " ADR A4,A10 ABSOLUTE ENTRY ADDRESS J & P S
0x15bae4…15bc78 Dummy {f00=0x006c, f01=0x0190, f02=»2,A11 GET DISPLACEM. WITHIN PAGE J P ANKL A2,/FFFE EVEN ADDRESS K ( , ' ST A2,LSTADR,A13 SAVE LOGICALL ADDRESS K L P* CHECK ADDRESSES * K | P K * P LD A9,FSTPAG,A13 GET FIRST FREE PAGE K P ST A11,SAVE07,A13 SAVE A11 K P LD A11,FYSPAG,A13 K
0x15bc78…15be0c Dummy {f00=0x006c, f01=0x0190, f02=»,FSTADR,A13 K P CALL CMPADR L P RF(NL) MOV090 OK! L ( PMOV070 LDKL A1,LMP3 L B P CALL ERROR L ^ PMOV090 EQU * L r P CALL XMOVE MOVE L P LD A9,SAVE12,A13 L ( P LD A11,SAVE01,A13 RESTORE REGISTERS L $ P TL* MMFROM,A13 RESTORE MM-TABLE L
0x15be0c…15bfa0 Dummy {f00=0x006c, f01=0x0190, f02=» ** L l 6 P** ** M 6 P** SET NEW PAGE IN MM-TABLE & CHECK IF TABLE ** M P 6 P** OVERFLOW. ** M 6 P** ** M 6 P** INPUT
0x15bfa0…15c134 (1, 182) Dummy {f00=0x006d, f01=0x0190, f02=» ** M r 6 P** WORK.REG: A9 ** N 6 P************************************************* N V P N PSETTAB EQU * N SUKL A4,/400 GET NEXT PAGE N SUK A2,2 GET NEXT ENTRY N P N " P* CHECK IF MM-TA
0x15c134…15c2c8 Dummy {f00=0x006d, f01=0x0190, f02=»F(NN) SETT00 N P CWR A9,A2 O P RF SETT05 O & PSETT00 CWR A2,A9 OVERFLOW? O 8 PSETT05 RF(NL) SETT10 NO O Z P LDK A1,LMP7 O z P CALL ERROR O PSETT10 EQU * O STR A4,A2 STORE IN TABLE O RTN A14 O P XIF O P IFF CREDIT=0 O
0x15c2c8…15c45c Dummy {f00=0x006d, f01=0x0190, f02=» 4 P** ** P 4 P** GET WORK BLOCK ADDRESS AND DISPLACE- ** P < 4 P** MENT IN T:A ** P t 4 P** ** P 4 P** INPUT : A8= POINTER TO T:A-ADD I
0x15c45c…15c5f0 Dummy {f00=0x006d, f01=0x0190, f02=» TADISP=A4 ** P 4 P** A11=W.B.-ADDRESS ** Q 4 4 P** WBADD=POINTER TO W.B.-ADD IN T:A ** Q l 4 P*********************************************** Q P Q PGETWB EQU * Q " P LD A4,BIT,A
0x15c5f0…15c784 Dummy {f00=0x006d, f01=0x0190, f02=»FT CREDIT-MMUPAG=1 Q P LDR* A11,A8 GET T:A-ADDRESS R P ADR A11,A4 ADD DISPLACEMENT R > P ST A11,WBADD,A13 SAVE R b " P LDR* A11,A11 GET W.B.-ADDRESS R P XIF R P IFT CREDIT+MMUPAG=2 R 0 P LD A11,FLAG,A13 REAL TASK-DATA PROCESSING? R P RF(Z)
0x15c784…15c918 Dummy {f00=0x006d, f01=0x0190, f02=»T A11,WBADD,A13 SAVE R " P ELR A11,A11 GET W.B.-ADDRESS S & P TL* MMFROM,A13 RELOAD FROM-TABLE S B P XIF S l P IFF CREDIT=0 S x P RTN A14 S P EJECT S P S P S 8 P** M O V W B ** S 8 P**
0x15c918…15caac Dummy {f00=0x006d, f01=0x0190, f02=».-ADDRESS IS UPDATED ** S x 8 P** ** T $ 8 P** INPUT: A11=W.B.-ADDRESS ** T ` 8 P** OUTPUT: 'WBADD'=POINTER TO MOVED W.B.ADDRESS ** T 8 P** WORK-REGS: A1-A4
0x15caac…15cc40 Dummy {f00=0x006d, f01=0x0190, f02=» ADKL A1,WBLEN FROM-ADDRESS T P IFT CREDIT-MMUPAG=1 U $ P LDR* A3,A1 LENGTH U @ P CALL MOVING U Z 6 P SUKL A2,WBLEN ADJUST TO-ADDRESS FOR DISPLACEMENT U n 4 P ST* A2,WBADD,A13 UPDATE W.B.-ADDRESS AFTER MOVE U P XIF U P IFT CREDIT+MMUPAG=2 U P
0x15cc40…15cdd4 (1, 183) Dummy {f00=0x006d, f01=0x0190, f02=»ROCESSING? U p P RF(Z) MOVW10 NO! V P TL* MMTO,A13 LOAD TO-TABLE V , : PMOVW10 ES* A2,WBADD,A13 UPDATE W.B.-ADDRESS AFTER MOVE V P & P TL* MMFROM,A13 RELOAD FROM-TABLE V P XIF V P IFF CREDIT=0 V P RTN A14 V P EJECT V P V P
0x15cdd4…15cf68 Dummy {f00=0x006d, f01=0x0190, f02=» ** V : P** MOVE DISCRIPTOR TABLE. D.T.-ADDRESS IS UPDATED ** W : : P** ** W x : P** INPUT :WBADD POINTS TO W.B.-ADDRESS IN T:A ** W : P** OUTPUT: A3=POINT
0x15cf68…15d0fc Dummy {f00=0x006d, f01=0x0190, f02=»********************* W p P X PMOVDT EQU * X * 6 P LD A1,WBADD,A13 GET POINTER TO W.B-ADDRESS IN WAT X > & P SUK A1,2 POINTER TO D.T.-ADDRESS X x P IFT CREDIT-MMUPAG=1 X P LDR* A1,A1 D.T.-ADDRESS X * P ADKL A1,DTLEN ADJUST FOR LENGTH WORD X
0x15d0fc…15d290 Dummy {f00=0x006d, f01=0x018e, f02=»A1,DTLEN X 4 P ST A2,-2,A3 UPDATE D.T-ADDRESS. A2=NEW ADDRESS Y P XIF Y H P IFT CREDIT+MMUPAG=2 Y T P ELR A1,A1 D.T.-ADDRESS Y p * P ADKL A1,DTLEN ADJUST FOR LENGTH WORD Y P AD A1,MOVADD,A13 RELOCATE Y P ELR A3,A1 LENGTH Y P CALL MOVING Y
0x15d290…15d424 Dummy {f00=0x006d, f01=0x0190, f02=» Y P IFF CREDIT=0 Z P RTN A14 Z P EJECT Z . P Z < < P** M O V D W B ** Z H < P** ** Z < P** ** Z < P
0x15d424…15d5b8 Dummy {f00=0x006d, f01=0x0190, f02=» ** Z < P** INPUT : A12=T:D-ADDRESS ** [ 8 < P** A8= POINTER TO T:A-ADDRESS ** [ x < P** BIT=BIT NUMBER SAT IN DWBMSK ( 0-15 ) ** [ < P** WORK.REGS: A
0x15d5b8…15d74c Dummy {f00=0x006d, f01=0x0190, f02=» [ P ST A6,SAVE05,A13 SAVE A5 P LDK A6,0 * ( PMOVD10 LD A4,BIT,A13 GET BIT NUMBER < " P ADK A4,1 FIRST WAT-ELEMENT =1 h P IFT CREDIT-MMUPAG=1 P LD A2,WATLEN,A12 P XIF P IFT CREDIT+MMUPAG=2 P EL A2,WATLEN,A12 P X
0x15d74c…15d8e0 Dummy {f00=0x006d, f01=0x018e, f02=» r P SUK A2,1 ALL? ] P RF(N) MOVD60 YES! ] P IFT CREDIT-MMUPAG=1 ] 8 " P CC A4,DWBFST,A6 SHARED W.B.? ] T P XIF ] z P IFT CREDIT+MMUPAG=2 ] * P EL A10,DWBFST,A6 CHECK IF SHARED W.B. ] " P SRC A6,1 RIGHT OR LEFT BYTE? ] P RF(N) MOVD30 RIGH
0x15d8e0…15da74 (1, 184) Dummy {f00=0x006d, f01=0x0190, f02=» P CWR A4,A10 SHARED W.B.? ^ P XIF ^ $ P IFF CREDIT=0 ^ 0 P RB(NE) MOVD20 NO! ^ F P* DWB FOUND * ^ ` , P NGR A4,A2 CALCULATE DISPLACEMENT IN T:A ^ v P IFT CREDIT-MMUPAG=1 ^ P AD A4,WATLEN,A12 ^ P XIF ^ P IFT CREDIT+MMUPAG=2 ^ P EL
0x15da74…15dc08 Dummy {f00=0x006d, f01=0x0190, f02=»4,2 ^ P ADK A4,WATFST+2 _ * P LD A3,NEWAD2,A13 GET NEW W.B.-ADDRESS _ $ P IFT CREDIT-MMUPAG=1 _ R 2 P ADR* A4,A8 A4=POINTER TO W.B.-ADDRESS IN T:A _ n " P STR A3,A4 CHANGE W.B.-ADDRESS _ P XIF _ P IFT CREDIT+MMUPAG=2 _ . P LD A2,FLAG,A13 REAL D
0x15dc08…15dd9c Dummy {f00=0x006d, f01=0x018e, f02=»W.B.-ADDR IN T:A _ v P ADR A4,A10 ` " P ESR A3,A4 CHANGE W.B.-ADDRESS ` , & P TL* MMFROM,A13 RELOAD FROM-TABLE ` R P XIF ` | P IFF CREDIT=0 ` P ST A4,WBADD,A13 ` . P LD A2,SWITCH,A13 WB-ADDRESS CHANGE ONLY? ` P RB(NZ) MOVD10 YES! ` P CAL
0x15dd9c…15df30 Dummy {f00=0x006d, f01=0x0190, f02=» P a 4 P** T W B S W B ** a 4 P** ** a D 4 P** COPY TWB'S AND RESERVE SPACE FOR SWB'S ** a | 4 P** ** a 4 P** INPUT : A8=ACTUAL T:A-AD
0x15df30…15e0c4 Dummy {f00=0x006d, f01=0x0190, f02=» 4 P************************************************ b P b < PTWBSWB EQU * b D P ST A7,SAVE04,A13 SAVE A7 b X " P LD A7,TWBMSK,A12 GET TWB MASK b z P IFT CREDIT+MMUPAG=2 b " P EL A7,TWBMSK,A12 GET TWB MASK b P XIF b P IFF CREDIT=0 b P CAL
0x15e0c4…15e258 Dummy {f00=0x006d, f01=0x0190, f02=» & P CALL MOVDWB CHANGE DWB-ADDRESSES c P CALL SKIFTA c . P RB TWSW10 c B PTWSW20 EQU * c T P IFT CREDIT+SWPBLK=2 c h P EJECT c P c P c P* RESERVE SPACE FOR SWB'S * c P*************************** c P XIF c P IFT CREDI
0x15e258…15e3ec Dummy {f00=0x006d, f01=0x0190, f02=»PBLK=2 c P CALL SHIFT d PTWSW30 RF(Z) TARZAN ALL DONE d " P CALL GETWB d F P CALL MOVWB RESERVE SPACE d Z ( P ST A2,NEWAD2,A13 SAVE W.B.-ADDRESS d | & P CALL MOVDWB CHANGE DWB- ADDRESSES d P CALL SKIFTA d P RB TWSW30 d PTARZAN EQU * d
0x15e3ec…15e580 Dummy {f00=0x006d, f01=0x0190, f02=» A L L B U F ** d 4 P** ** e ( 4 P** ALLOCATE FIXED DATA SET BUFFERS AND ** e ` 4 P** TERMINAL STACK ** e 4 P** ** e 4 P
0x15e580…15e714 (1, 185) Dummy {f00=0x006d, f01=0x0190, f02=»=LENGTH OF DSCB'S ** e x 4 P** CIA (IN T:A)=DISPL. TO T:A-START ** f 4 P** CSE (IN T:A)=STACKSIZE ** f X 4 P** WORK-REGS. :A1-A4,A9,A11 ** f 4 P************************************************ f P f P
0x15e714…15e8a8 Dummy {f00=0x006d, f01=0x0190, f02=»D A3,CSN,A1 GET DSCB TOTAL LENGTH f P RF(Z) ALLB70 NO DSCB'S g * . P ADKL A1,T:ASTA CALC START OF DSCB RECORDS g J " P LDR A10,A1 SAVE START ADDRESS g | P XIF g P IFT CREDIT+MMUPAG=2 g P ELR A1,A8 GET T:A-ADDRESS g ( P EL A3,CSN,A1 GET DSCB TOTAL
0x15e8a8…15ea3c Dummy {f00=0x006d, f01=0x0190, f02=»IF g P IFF CREDIT=0 h P SUR A3,A1 h P NGR A3,A3 h 2 P SUK A3,DSCBL END CONDITION h D : P ST A3,SAVE04,A13 SAVE ADDRESS TO END OF DSCB-RECORDS h h : PALLB10 SUK A1,DSCBL A1=FIRST WORD IN FIRST DSCB-RECORD h P CW A1,SAVE04,A13 ALL? h P RF(E)
0x15ea3c…15ebd0 Dummy {f00=0x006d, f01=0x0190, f02=» NO! h P ST A9,BA,A1 BUFFER START i P LD A3,RL,A1 BUFFER LENGTH i . P ST A3,BL,A1 i P P LD A2,EL,A1 SHARED BUFFER? i d P RF(Z) NOTSH NO! i & P LDR A4,A1 RESTORE START OF DSCB'S i P XIF i P IFT CREDIT+MMUPAG=2 i $ P ELR A3,A1 GET FIRST W
0x15ebd0…15ed64 Dummy {f00=0x006d, f01=0x0190, f02=»,EL,A1 SHARED BUFFER? i P RF(Z) NOTSH NO! j & P LDR A4,A1 RESTORE START OF DSCB'S j 6 P XIF j ` P IFF CREDIT=0 j l P ADK A4,DSCBL FIRST WORD j PALLB20 SUK A2,1 A2=INDEX j P RF(NN) ALLB30 j P LDK A1,LMP4 FORMAT ERROR j P CALL ERROR j
0x15ed64…15eef8 Dummy {f00=0x006d, f01=0x018e, f02=») ALLB20 j " P LDK A1,LMP4 BUFFER NOT FOUND k P CALL ERROR k 6 P IFT CREDIT-MMUPAG=1 k J ( PALLB40 LD A4,BA,A4 BUFFER ALLOCATED? k f P RF(NZ) ALLB50 YES! k P LDK A1,LMP4 FORMAT ERROR k P CALL ERROR k PALLB50 EQU * k * P ST A4,BA,A1 AND
0x15eef8…15f08c Dummy {f00=0x006d, f01=0x0190, f02=» k z P LDK A1,LMP4 FORMAT ERROR l P CALL ERROR l * PALLB50 EQU * l > * P ES A4,BA,A1 AND ESORE IN CURRENT ECB l R P XIF l P IFF CREDIT=0 l P RB ALLB10 l P l P IFT CREDIT-MMUPAG=1 l PNOTSH LDR A9,A9 PAGING? l P RF(NZ) NOTS10 N
0x15f08c…15f220 Dummy {f00=0x006d, f01=0x0190, f02=»LLOCATE BUFFER FROM TOP l ~ P ADKL A9,1 m P ANKL A9,/FFFE EVEN ADDRESS m 2 P* CHECK ADDRESS: m V P m n " P LD A11,LSTADR,A13 DATA START m z P CALL CMPADR m P RF(NL) ALLB60 OK! m P LDKL A1,LMP3 m P CALL ERROR m PALLB60 EQU * m
0x15f220…15f3b4 (1, 186) Dummy {f00=0x006e, f01=0x018e, f02=»TTOM' m f & P ES A2,BA,A1 STORE BUFFER ADDRESS n P XIF n 8 P IFF CREDIT=0 n D P RB ALLB10 n Z P n l , P* RESERVE STACK AND SET STACKPOINTERS * n x P n PALLB70 EQU * n P IFT CREDIT-MMUPAG=1 n P LDR* A1,A8 GET T:A-ADDRESS n P LD
0x15f3b4…15f548 Dummy {f00=0x006e, f01=0x0190, f02=» PALLB80 EQU * o P ST A4,STKB,A1 SET STACKBASE o P STR A4,A1 STACK POINTER o < P CALL MOVING ALLOCATE STACK o P ST A2,STKE,A1 SET STACK-END o P XIF o P IFT CREDIT+MMUPAG=2 o P ELR A1,A8 GET T:A-ADDRESS o P EL A3,CSE,A1 GET STACK SI
0x15f548…15f6dc Dummy {f00=0x006e, f01=0x0190, f02=» P CALL MOVING ALLOCATE STACK p " P ES A2,STKE,A1 STORE STACK END p ( " P EL A3,STKB,A1 GET STACK SIZE p N " P ADR A2,A3 COMPUTE STACK BASE p t $ P ES A2,STKB,A1 STORE STACK BASE p * P ESR A2,A1 STORE CURRENT STACK POINTER p P XIF p P IFF CREDIT=
0x15f6dc…15f870 Dummy {f00=0x006e, f01=0x0190, f02=» ** p p 4 P** MOVE T:A AND UPDATE DATA SET ADDRESSES IN ** q 4 P** FORMAT CONTROL BLOCK ** q P 4 P** ** q 4 P** INPUT : A8=T:A-ADDRESS ** q 4 P** A12=
0x15f870…15fa04 Dummy {f00=0x006e, f01=0x018e, f02=» ** q h 4 P** WORKREGS: A1-A4 ** r 4 P************************************************ r H P r PMOVT:A EQU * r P IFT CREDIT-MMUPAG=1 r P LDR* A1,A8 GET T:A-ADDRESS r ( P LD A3,WATLEN,A12 GET LENGTH OF WAT r P
0x15fa04…15fb98 Dummy {f00=0x006e, f01=0x018e, f02=» P CALL MOVING s P LDR* A4,A8 s " P SU A2,CIA,A4 NEW T:A-ADDRESS s , $ P SU A1,CIA,A4 'OLD' T:A-ADDRESS s R P s z 8 P* COMPUTE AND STORE ADDRESSES TO DATA-SETS IN FCB * s P s P LD A3,FCD,A12 ANY FCD? s P RF(Z) MOVT10 NO! s P ADR A3,
0x15fb98…15fd2c Dummy {f00=0x006e, f01=0x0190, f02=» : P SUR A4,A1 ADJUST FOR OLD RELOCATION (OLD T:A-ADDRESS) t PMOVT05 EQU * t B P ADS A4,FCBDD1,A3 t V P ADS A4,FCBDD2,A3 t p PMOVT10 RTN A14 t P XIF t P IFT CREDIT+MMUPAG=2 t P t P ELR A1,A8 GET T:A-ADDRESS t ( P EL A3,WATLEN,A12 GET
0x15fd2c…15fec0 Dummy {f00=0x006e, f01=0x0190, f02=» P ADR A1,A10 FROM-ADDRESS u P CALL MOVING u $ P ELR A4,A8 u 8 P EL A10,CIA,A4 u J P SUR A2,A10 NEW T:A-ADDRESS u ` " P SUR A1,A10 'OLD' T:A-ADDRESS u 8 P* COMPUTE AND STORE ADDRESSES TO DATA-SETS IN FCB * u P u P EL A3,FCD,A12 ANY FCD? u
0x15fec0…160054 (1, 187) Dummy {f00=0x006e, f01=0x0190, f02=» u ~ 8 P SUR A4,A1 ADJUST FOR OLD RELOCATION (OLD T:A-ADDR.) v PMOVT05 EQU * v D P ADR A3,A2 START OF FCB v X P TL* MMTO,13 LOAD TO-TABLE v x P EL A10,FCBDD1,A3 v P ADR A10,A4 v P ES A10,FCBDD1,A3 v P EL A10,FCBDD2,A3 v P ADR A10,A4
0x160054…1601e8 Dummy {f00=0x006e, f01=0x0190, f02=» P w 6 P** C M P A D R ** w 6 P** ** w F 6 P** ** w 6 P** COMPARE ADDRESSES. RESULT IN PSW ON RETURN ** w 6 P**
0x1601e8…16037c Dummy {f00=0x006e, f01=0x0190, f02=» ** w h 6 P** OUTPUT: RESULT IN A14-STACK ** x 6 P************************************************** x L P x PCMPADR EQU * x P TNM A11,A9 x P RF(NN) CMPA10 x P CWR A9,A11 x P RF CMPA20 x PCMPA10 CWR A11,A9
0x16037c…160510 Dummy {f00=0x006e, f01=0x018e, f02=»************************************* x v D P* * y . D P* ICBMVD - INDICATE CURRENT BLOCK MOVED * y v D P* ===================================== * y D P*
0x160510…1606a4 Dummy {f00=0x006e, f01=0x0190, f02=» y N D P* * z D P* ENTRY: A8 - FIRST T:A POINTER * z P D P* A6 - SECOND T:A POINTER * z D P* BIT - BIT NUMBER SET IN CWB- O
0x1606a4…160838 Dummy {f00=0x006e, f01=0x0190, f02=»URRENT STATCK POINTER * z p D P* IN T:A IS SET * { ( D P* * { p D P* WORK REGISTERS: A1,A2 * { D P*
0x160838…1609cc Dummy {f00=0x006e, f01=0x018e, f02=»* * { D P*************************************************************** | H P EJECT | PICBMVD EQU * | P LDKL A1,/8000 SET BIT 0 | 6 P LD A2,BIT,A13 GET BIT NUMBER IN CWB- OR UWB-MASK |
0x1609cc…160b60 Dummy {f00=0x006e, f01=0x0190, f02=» | P* } & P* UPDATE MOVED MASK IN FIRST T:A } P* } < P XIF } F P IFT CREDIT-MMUPAG=1 } R & PIBAM20 LDR* A2,A8 GET T:A POINTER } n $ P LDR* A3,A2 GET MOVED BLOCK MASK } , P ORR A3,A1 INDICATE CURRENT BLOCK MOVED } * P STR A3,A2 STORE NEW MOV
0x160b60…160cf4 (1, 188) Dummy {f00=0x006e, f01=0x0190, f02=»MOVED BLOCK MASK } , P ORR A3,A1 INDICATE CURRENT BLOCK MOVED ~ * P STR A3,A2 STORE NEW MOVED BLOCK MASK ~ H P XIF ~ v P IFT CREDIT+MMUPAG=2 ~ $ PIBAM20 ELR A2,A8 GET T:A POINTER ~ $ P ELR A3,A2 GET MOVED BLOCK MASK ~ , P ORR A3,A1 INDICATE CURREN
0x160cf4…160e88 Dummy {f00=0x006e, f01=0x0190, f02=»2,A6 GET T:A POINTER ~ $ P ELR A3,A2 GET MOVED BLOCK MASK , P ORR A3,A1 INDICATE CURRENT BLOCK MOVED D * P ESR A3,A2 STORE NEW MOVED BLOCK MASK t P XIF P IFF CREDIT=0 P RTN A14 P EJECT J P**************************************
0x160e88…16101c Dummy {f00=0x006e, f01=0x0190, f02=»KMVD - CHECK IF BLOCK ALREADY MOVED * ~ J P* ===================================== * < J P* * J P* REFERENCED IN: MOVCOM,MOVCLA
0x16101c…1611b0 Dummy {f00=0x006e, f01=0x0190, f02=»:A * t J P* BIT - BIT NUMBER IN CWB- OR UWB-MASK * 2 J P* * J P* EXIT: IF BLOCK ALREADY MOVED THEN CR=2 ELSE CR<>2
0x1611b0…161344 Dummy {f00=0x006e, f01=0x0190, f02=» * j J P* * ( J P* SUBROUTINES: * v J P*
0x161344…1614d8 Dummy {f00=0x006e, f01=0x0190, f02=»UPAG=1 P LDR* A1,A8 GET T:A POINTER $ P LDR* A1,A1 GET MOVED BLOCK MASK 2 P XIF Z P IFT CREDIT+MMUPAG=2 f P ELR A1,A8 GET T:A POINTER $ P ELR A1,A1 GET MOVED BLOCK MASK P XIF P IFF CREDIT=0 2 P LD A2,BIT,A13 GET BIT SET
0x1614d8…16166c Dummy {f00=0x006e, f01=0x0190, f02=» A2,1 DECREMENT BIT COUNTER P RB CHKM10 $ PCHKM20 ADK A1,0 SET CR 6 * P CFI A14,PSW,A13 PUT CONDITION IN PSW T P RTN A14 P EJECT P P : P***** S * U * P * E * R * L * O * O * P **** : P**
0x16166c…161800 Dummy {f00=0x006e, f01=0x0190, f02=» ** r : P** CALCULATES BIT NUMBER SAT IN MASK-WORD ** : P** INPUT : A7=MASK WORD ** ^ : P** OUTPUT: BIT=BIT NUMBER ** : P** CONDITION CODE IN PSW ON RETURN
0x161800…161994 (1, 189) Dummy {f00=0x006e, f01=0x0190, f02=»TER v P LDR A7,A7 P RF SHIF20 & PSKIFTA EQU * ENTRY: CONTINUE SHIFT 0 PSHIF10 IM BIT,A13 Z P SLL A7,1 t PSHIF20 EQU * $ P RF(Z) SHIF30 NO MOORE BITS SAT P RB(NN) SHIF10 * PSHIF30 CFI A14,PSW,A13 PUT COND IN PSW P R
0x161994…161b28 Dummy {f00=0x006e, f01=0x0190, f02=» ** 4 P** ** ( 4 P** MULTIPLICATION (A2) X A3(), A2#0 ** ` 4 P** ** 4 P** INPUT : A3,A2 ** 4 P
0x161b28…161cbc Dummy {f00=0x006e, f01=0x0190, f02=»,MUL,A13 " P STR A2,A14 SAVE A2 TEMPORARY P LDK A3,0 6 PADD AD A3,MUL,A13 H P SUK A2,1 b P RB(NZ) ADD t P LDR* A2,A14 P RTN A14 P P IFT MMUPAG=1 P EJECT P 4 P** M M E N T
0x161cbc…161e50 Dummy {f00=0x006e, f01=0x0190, f02=» LAST USED ENTRY IN MM-TAB. SCAN ** 4 P** FROM LOW ADDRESS. NOT USED ENTRY=0. ** 0 4 P** ** h 4 P** INPUT :A3=MM-TABLE ADDRESS ** 4 P** OUTPUT:A3=ENTRY ADDRESS **
0x161e50…161fe4 Dummy {f00=0x006e, f01=0x0190, f02=»NTENTS OF 1:ST USED ENTRY ** 4 P*********************************************** ( P ` PMMENT EQU * h P LDR A9,A3 GET TABLE ADDRESS | 6 P SUKL A9,MMBEG ADJUST A9 (LOOKS LIKE TTAB POINTER) P SUK A3,2 & PMMEN10 ADK A3,2 INCREMENT AD
0x161fe4…162178 Dummy {f00=0x006e, f01=0x0190, f02=»G,A9 SAVE FIRST FREE PAGE-ADDRESS P RTN A14 * P XIF : P IFF CREDIT=0 F P EJECT P j 2 P** G E T T A B ** r 2 P** ** 2 P**
0x162178…16230c Dummy {f00=0x006e, f01=0x0190, f02=»INTER TO T:A IN T:ATAB ** 2 P** OUTPUT:A2=TTAB-ADDRESS ** & 2 P** A1=TID ** 2 P** WORKREGS:A3,A4,A10 ** 2 P********************************************** P PGE
0x16230c…1624a0 Dummy {f00=0x006e, f01=0x0190, f02=»DAD,A10 T:D-ADDRESS P XIF P IFT MMUPAG=1 ( P ELR A10,A8 T:A-ADDRESS > P EL A1,T:ATID,A10 GET TID ^ P EL A12,T:DAD,A10 P XIF & PGETTTB EQU * ENTRY. INPUT: A1=TID $ P LD A4,SCTTCT GET TC:TAB ADDRESS P LDR* A3,A4 TCTA
0x1624a0…162634 (1, 190) Dummy {f00=0x006f, f01=0x0190, f02=»DK A1,LMP5 TID ERROR P CALL ERROR " PGETT20 LDR* A2,A4 TTAB-ADDRESS 0 P CW A1,TTB:PP,A2 TCL EQUAL? V P RB(NE) GETT10 NO! z P ST A2,TTAB,A13 SAVE P RTN A14 P IFF CREDIT=0 P EJECT P P 8 P**
0x162634…1627c8 Dummy {f00=0x006f, f01=0x0190, f02=» ** l 8 P** QUEUE TASK VIA 'ACTOT' AND SWITCH TO LEVEL ** 8 P** 0, ENB. ** T 8 P** ** 8 P** INPUT: A10=T:A-ADDRESS ** 8 P
0x1627c8…16295c Dummy {f00=0x006f, f01=0x0190, f02=»*********************************** P , PQUEJOB EQU * 4 P* QUEUE THIS TASK (THIS TID) H P l 0 P LDKL A3,RETUR GET RETURN (FROM A15) ADDRESS t P ADR A3,A13 RELOCATE P STR A3,A15 PUT ON STACK * P LDKL A3,/00C0 SET LEVEL 0 AND ENABL
0x16295c…162af0 Dummy {f00=0x006f, f01=0x0190, f02=»RESS t P LDR A5,A2 GET TTAB-ADDRESS P IFT CREDIT-MMUPAG=1 0 , P LD A4,WATLEN,A12 NUMBER OF WAT-ELEMENTS L P ADK A4,2 | P ANKL A4,/FFFE P ADK A4,DWBFST+4 8 P ADR A4,A12 ADD T:A-ADDRESS => START OF START-POINTS & P LDR* A6,A4 NUMB
0x162af0…162c84 Dummy {f00=0x006f, f01=0x0190, f02=»D A3,2,A4 SEGMENT NUMBER , P LD A2,NTPA,A8 INTERPRETER START ADDRESS P XIF P P IFT CREDIT+MMUPAG=2 , P EL A4,WATLEN,A12 NUMBER OF WAT-ELEMENTS x P ADK A4,2 P ANKL A4,/FFFE P ADK A4,DWBFST+4 8 P ADR A4,A12 ADD T:A-ADDRESS => S
0x162c84…162e18 Dummy {f00=0x006f, f01=0x0190, f02=»L! P EL A1,4,A4 DISP ADDRESS P EL A3,2,A4 SEGMENT NUMBER * , P EL A2,NTPA,A8 INTERPRETER START ADDRESS L P XIF | P IFF CREDIT=0 P CF A15,ACTOT $ P ADK A4,STPREC NEXT START-POINT P RB GETT30 $ PGETT40 ABL RETUR8 RELOAD 8
0x162e18…162fac Dummy {f00=0x006f, f01=0x0190, f02=»T ** v 4 P** ** 4 P** ** V 4 P** MOVE MM-TABLE ** 4 P** ** 4 P** INPUT
0x162fac…163140 Dummy {f00=0x006f, f01=0x0190, f02=» TTAB ** n 4 P** A9=TTAB ADDRESS ** 4 P** WORKREGS:A1,A3 ** N 4 P*********************************************** P PMOVMMT EQU * ( P ADKL A2,MMBEG GET TO-TABLE ADDRESS " P T
0x163140…1632d4 (1, 191) Dummy {f00=0x006f, f01=0x0190, f02=»LOAD TABLE ~ P RTN A14 P XIF " P IFF CREDIT=0 . P EJECT D @ P************************************************************ R @ P* * @ P* CHTAID - CHANGE T:A-ID AND CLEAR TCL SAVE A
0x1632d4…163468 Dummy {f00=0x006f, f01=0x0190, f02=»=========== * b @ P* * @ P* * Z @ P* REFERENCED IN: SYSLDA PART 2 B. * @ P*
0x163468…1635fc Dummy {f00=0x006f, f01=0x0190, f02=»NTRY IN REAL T:ATAB * j @ P* * @ P* EXIT: * b @ P* * @ P* WORK REGISTERS: A1,A3,A6,A8
0x1635fc…163790 Dummy {f00=0x006f, f01=0x0190, f02=» * r @ P* * & @ P************************************************************ j PCHTAID EQU * 2 P LDR A8,A7 GET NEXT FREE ENTRY IN REAL T:ATAB $ P LDR* A6,A5 GET
0x163790…163924 Dummy {f00=0x006f, f01=0x0190, f02=» ( P LDR* A1,A8 GET POINTER TO REAL T:A $ P LD A1,T:ATID,A1 GET TCL IN T:A 0 . PCHT:20 CALL GETTTB GET CORRESPONDING TTAB X , P LD A4,TTBTID,A2 GET REAL TID IN TTAB =3 6 P LD A3,TTB:SA+26,A2 GET CORRESPONDING T:A-ADDRESS * P ST A4,T:ATID,A3 REP
0x163924…163ab8 Dummy {f00=0x006f, f01=0x0190, f02=» SAVE TID FOR DEBUGGER PURPOSE =3 P XIF * P IFT CREDIT+MMUPAG=2 6 & P ELR A1,A8 GET POINTER TO REAL T:A R $ P EL A1,T:ATID,A1 GET TCL IN T:A | . PCHT:20 CALL GETTTB GET CORRESPONDING TTAB ( P LDR A3,A2 GET POINTER TO TTAB ENTRY 2 P ADKL
0x163ab8…163c4c Dummy {f00=0x006f, f01=0x0190, f02=»CORRESPONDING T:A-ADDRESS x * P ES A4,T:ATID,A3 REPLACE TCL IN T:A =3 " 0 P EL* A3,T:ATNW,A13 GET LENGTH OF REAL T:ATAB P $ P NGR A3,A3 NEGATIVE DISPLACEMENT . P ADR A3,A8 COMPUTE ENTRY IN AUX. TID TABLE 0 P ESR A4,A3 SAVE TID FOR DEBUGGER PURPOSE =
0x163c4c…163de0 Dummy {f00=0x006f, f01=0x0190, f02=»NT ~ ( P SUK A6,1 DECREMENT NUMBER OF COPIES P RB(P) CHT:20 NEXT COPY 6 PCHT:90 RTN A14 V P EJECT l P z P 4 P************************************************ 4 P*** *** 4 P**
0x163de0…163f74 (1, 192) Dummy {f00=0x006f, f01=0x0190, f02=»********** j P 4 P* BUILD REAL T:A'S. COPY T:A'S ACCORDING TO * 4 P* SHADOW TABLE * R 4 P* * 4 P************************************************ P PPART2B
0x163f74…164108 Dummy {f00=0x006f, f01=0x0190, f02=»S h * P LD A7,T:ATNW,A13 REAL T:ATAB ADDRESS P ADK A7,2 8 P ST A8,SAVE03,A13 SAVE A8 J & PSYA310 LD A8,SAVE03,A13 RESTORE A8 l P ADKL A8,2 P CW A8,ENDADD,A13 ALL? P RF(E) SYA350 YES! P ST A8,SAVE03,A13 SAVE $ P ADK A5,2
0x164108…16429c Dummy {f00=0x006f, f01=0x0190, f02=»A10,TTB:SA+26,A2 SAVE T:A ADDR. IN TTAB (SAVE-A13) P LDR* A1,A8 GET T:A ADDRESS : $ P STR A1,A7 STORE IN REAL T:ATAB ^ P ADK A7,2 $ P LDR* A6,A5 GET NUMBER OF COPIES P EJECT PSYA340 SUK A6,1 P RF(P) SYA345 NEXT TASK 2 P C
0x16429c…164430 Dummy {f00=0x006f, f01=0x0190, f02=»L MOVT:A MOVE T:A P IM T:ATID,A2 UPDATE TID $ P STR A2,A7 STORE IN REAL T:ATAB : " P LDR A8,A7 CHANGE T:A TO COPY b 2 P CALL GETTAB GET CORRESPONDING TTAB AND QUEUE P CALL QUEJOB QUEUE THIS TASK 2 P ST A10,TTB:SA+26,A2 SAVE T:A-ADDRESS
0x164430…1645c4 Dummy {f00=0x006f, f01=0x0190, f02=»BUFFERS z P XIF P IFT CREDIT+MMUPAG=2 * P* GET ACTUAL MM-TABLE ADDRESS AND LOAD 8 P f P LDR A1,A5 n * P AD* A1,SCTSFA ADD SHADOW-TABLE LENGTH $ P LDR* A1,A1 GET MM-TABLE ADDRESS P TLR A1 LOAD " P ST A1,MMFROM,A13 SAVE ADDRESS
0x1645c4…164758 Dummy {f00=0x006f, f01=0x0190, f02=»LASS-LOCAL LAST ENTRY z P CALL QUEJOB QUEUE THIS TASK * P LDKL A2,MMTAB GET WORK TABLE ADDRESS B P ADR A2,A13 p " P TSR A2 SAVE CLASS-DATA TABLE , P* REMOVE TASK-LOCAL ENTRIES IN MM-TABLE P P SUK A2,2 START OF TABLE P LDKL
0x164758…1648ec Dummy {f00=0x006f, f01=0x0190, f02=»B SYA320 PSYA330 EQU * P ELR A1,A8 GET T:A ADDRESS $ $ P ESR A1,A7 STORE IN REAL T:ATAB F $ P EL A12,T:DAD,A1 GET T:D ADDRESS n P EL A1,T:ATID,A1 GET TID ( P ADK A7,2 NEXT ENTRY IN REAL T:ATAB $ P LDR* A6,A5 GET NUMBER OF COPIES
0x1648ec…164a80 Dummy {f00=0x006f, f01=0x0190, f02=»SS x PSYA345 ADK A1,1 NEXT T:A ID ( P CALL GETTTB FIND CORRESPONDING TTAB . P CALL QUEJOB QUEUE THIS TASK Z & P CALL MOVMMT MOVE MM-TABLE TO TTAB ~ P CALL MOVT:A MOVE T:A $ P ESR A2,A7 STORE IN REAL T:ATAB @ P ST A2,TTB:SA+26,A9 PUT T:
0x164a80…164c14 (1, 193) Dummy {f00=0x006f, f01=0x0190, f02=»W ADDRESS 0 P CALL TWBSWB MOVE TWB'S & RESERVE FOR SWB'S P LD A1,MMTO,A13 GET TO-TABLE F . P ST A1,MMFROM,A13 CHANGE T:A ADDRESS-TABLE j P TLR A1 " P CALL ALLBUF ALLOCATE BUFFERS $ P LD A1,TTAB,A13 GET TTAB-ADDRESS * P CM LSTPAG,A1
0x164c14…164da8 Dummy {f00=0x006f, f01=0x018e, f02=» ES A1,T:ATID,A10 RESTORE IN T:A P XIF ( P IFF CREDIT=0 4 P RB SYA340 J P XIF P EJECT h PFINISH EQU *-REL v P P* ADJUST START OF FREE AREA P PSYA350 EQU * P IFF CREDIT=0 * P LD A1,LSTADR,A13 GET END OF
0x164da8…164f3c Dummy {f00=0x006f, f01=0x0190, f02=» P XIF P IFF CREDIT=1 P LD A1,SCTLAC * P XIF @ P IFT MMUPAG-CREDIT=1 L P ANKL A1,/03FF h P SLL A1,2 ~ P XIF P ST A1,SCTEFA+2 P IFT CREDIT=1 P LD A1,FYSPAG,A13 P IFT MMUPAG-CREDIT=1 P LD A1,S
0x164f3c…1650d0 Dummy {f00=0x006f, f01=0x0190, f02=»MMUPAG=1 ( P LD A1,FSTADR,A13 START OF FREE AREA P RF(NZ) SYA355 < P XIF R P LD A1,SCTSFA ^ PSYA355 ST A1,SCTSFA+2 t P CM SCTSFA P IFT CREDIT=1 P EJECT D ?***************************************************************
0x1650d0…165264 Dummy {f00=0x006f, f01=0x0190, f02=» * X D ?* ========================= * D ?* * X D ?* REFERENCED IN: SYSLDA * D ?*
0x165264…1653f8 Dummy {f00=0x006f, f01=0x0190, f02=»OF FREE AREA * x D ?* SCTNOS - NUMBER OF SEGMENTS * 0 D ?* SCTNOP - NUMBER OF PAGES * x D ?* SCTPSZ - PAGE SIZE * D ?
0x1653f8…16558c Dummy {f00=0x006f, f01=0x0190, f02=» P D ?* EXIT: PAGQUE - POINTER TO FIRST FREE PAGE BLOCK * D ?* PAGQUE+2 - POINTER TO LAST FREE PAGE BLOCK+2 * P D ?* * D ?* WORK REGISTERS: A1-A12
0x16558c…165720 Dummy {f00=0x006f, f01=0x0190, f02=» * p D ?* * ( D ?* * p D ?*************************************************************** PAGGEN E
0x165720…1658b4 (1, 194) Dummy {f00=0x0070, f01=0x0190, f02=» NO! " LD A1,SCTOPT GET OPTION WORD ANK A1,3 PAGING? 2 P ABR(Z) A2 NO! L * b L G* RESERV SPACE FOR PAGE BLOCKS CORRESPONDING TO CORE RESIDENT SEGMENTS l * , ' LD A11,SCTSFA+2 GET START OF FREE AREA " ST A11,SCTPAG STO
0x1658b4…165a48 Dummy {f00=0x0070, f01=0x0190, f02=» t PAG:10 EQU * , ' CW A7,SCTNOP EQUAL TO NUMBER OF PAGES? RF(E) PAG:30 YES! L $ LDK A1,0 RESET NUMBER OF WORDS f PAG:20 EQU * " ADKL A11,2 INCLUDE NEXT WORD 0 + RF(Z) MEMOFL MEMORY OVERFLOW (64 KB LIMIT) $ ADK A1,1 IN
0x165a48…165bdc Dummy {f00=0x0070, f01=0x0190, f02=»F(E) MEMOFL MEMORY OVERFLOW! RB PAG:20 $ 0 ,PAG:25 ADK A7,1 INCREMENT PAGE BLOCK COUNTER 6 RB PAG:10 j PAG:30 EQU * | * 4 /* RESERV MEMORY PAGES IN UNUSED PART OF MEMORY 6 2* AND EXTEND PAGE TABLE WITH CORRESPONDING NUMBER
0x165bdc…165d70 Dummy {f00=0x0070, f01=0x0190, f02=» X 4 P SLL A1,14 TWO MOST SIGN BITS OF 16-BITS ADDRESS 4 / LD A2,SCTEFA+2 GET BIT 2-18 OF 18-BITS ADDRESS @ & ! SRL A2,2 SKIP TWO RIGHTMOST BITS x , P ORR A1,A2 16 BITS PHYSICAL PAGE ADDRESS P LDR A3,A1 SAVE LD A2,SCTPSZ GET PAGE SIZE
0x165d70…165f04 Dummy {f00=0x0070, f01=0x0190, f02=»00 MODIFY FOR PAGE SIZE P ANR A2,A3 EVEN 1-KB LIMIT ( $ ORR A1,A2 MODIFY PAGE ADDRESS LIMIT B P XIF n P IFT CREDIT-MMUPAG=1 z $ P LD A1,SCTEFA+2 END OF FREE AREA P LD A10,SCTPSZ PAGE SIZE P XIF P IFT CREDIT=1 LDR A9,
0x165f04…166098 Dummy {f00=0x0070, f01=0x0190, f02=»F PAG:33 PPAG:32 CWR A6,A10 PPAG:33 RF(NG) PAG:40 * , P SUR A6,A10 COMPUTE ADDRESS TO NEXT PAGE F LDR A1,A6 GET PAGE ADDRESS v P IFT CREDIT+MMUPAG=2 * & ANKL A1,/C000 ADDRESS IN SYSTEM AREA? RF(NZ) PAG:34 NO! . * LDR A1,
0x166098…16622c Dummy {f00=0x0070, f01=0x0190, f02=»E AREA v P XIF P IFT CREDIT=1 & "PAG:36 LDK A2,0 RESET WORD COUNTER 0 * %PAG:38 ADKL A11,2 RESERV ANOTHER WORD Z RF(Z) PAG:40 64 KB LIMIT $ ADK A2,1 INCREMENT WORD COUNTER CWK A2,4 BLOCK COMPLETE? RF(E) PAG:45 YES!
0x16622c…1663c0 Dummy {f00=0x0070, f01=0x0190, f02=»WR A11,A1 P RF PAG384 PPAG382 CWR A1,A11 $ 4 PPAG384 RF(NG) PAG:40 NO MOORE MEMORY AVALIABLE! > PPAG:39 EQU * v " CWR A11,A8 PROGRAM OVERWRITE RB(NE) PAG:38 NO! PAG:40 EQU * 6 1 CW A7,SCTNOP ONLY PAGES FOR CORE RESIDENT
0x1663c0…166554 (1, 195) Dummy {f00=0x0070, f01=0x0190, f02=»MOFL LDKL A1,LMP3 * & OTR A1,0,SOP INDICATE MEMORY OVERFLOW HLT HALT PROGRAM H , 'PAG:45 CW A7,SCTNOS MOORE PAGES WANTED? b RF(E) PAG:50 YES! $ ADK A7,1 INCREMENT PAGE COUNTER LDR A9,A6 SAVE PAGE ADDRESS P RB PAG:31
0x166554…1666e8 Dummy {f00=0x0070, f01=0x0190, f02=» A1,A9 GET ADDRESS TO FIRST PAGE LDR A2,A1 SAVE ( P XIF @ P IFT CREDIT+MMUPAG=2 L * P SRL A1,14 BIT 0-1 OF 18-BITS ADDRESS h ST A1,SCTEFA SAVE . * SLL A2,2 GET BITS 2-15 OF 18-BITS ADDRESS P XIF P IFT CREDIT=1 ST
0x1666e8…16687c Dummy {f00=0x0070, f01=0x0190, f02=»LOCKS h * LDK A1,0 @ ; LD A8,SAVE22,A13 PHYSICAL ADDRESS TO FIRST CORE RES. SEGM. * * % LD A11,SCTSEG START OF SEGMENT TABLE n , ( LDK A4,0 RESET RESIDENT SEGMENT COUNTER & " LD A12,SCTPAG START OF PAGE TABLE $ LD A6,SCTNOS NUMB
0x16687c…166a10 Dummy {f00=0x0070, f01=0x0190, f02=»OT LOADED IN CORE x * & ST A12,6,A11 STORE PAGE BLOCK ADDRESS , ' STR A1,A12 RESET QUEUE POINTER FORWARD H . ) ST A1,2,A12 RESET QUEUE POINTER BACKWARD x $ ST A8,4,A12 STORE PAGE ADDRESS . ) ST A11,6,A12 STORE SEGMENT BLOCK ADDRESS 0 , ADK
0x166a10…166ba4 Dummy {f00=0x0070, f01=0x0190, f02=» A6,1 DECREMENT SEGMENT BLOCK COUNTER RB(P) PAG:60 . * D < 8* INITIATE PAGE BLOCK FOR FREE PAGES AND LINK TO PAGQUE N * CWR A4,A7 ANY FREE BLOCKS? P RF(E) PAG:90 NO! 4 / ST A12,PAGQUE POINTER TO FIRST FREE PAGE BLOCK
0x166ba4…166d38 Dummy {f00=0x0070, f01=0x0190, f02=»2 STORE BACKWARD POINTER ~ $ ST A9,4,A12 STORE PAGE ADDRESS $ ST A2,6,A12 INDICATE PAGE FREE H * & ADK A4,1 INCREMENT PAGE BLOCK COUNTER p CWR A4,A7 LAST PAGE BLOCK? RF(E) PAG:80 YES! , ' LDR A11,A12 SAVE ADDRESS TO PAGE BLOCK
0x166d38…166ecc Dummy {f00=0x0070, f01=0x0190, f02=»0 NEXT PAGE RB PAG:70 PAG:80 EQU * & & ! LDKL A1,PAGQUE POINTER TO PAGQUE : $ STR A1,A12 STORE IN LAST BLOCK d & " ST A12,PAGQUE+2 STORE IN PAGQUE+2 PPAG:90 EQU * PPAGEX EQU *-REL P EJECT P XIF P P
0x166ecc…167060 Dummy {f00=0x0070, f01=0x0190, f02=»PPLICATION r P XIF P IFT CREDIT=1 , P LD A14,SAVE13,A13 TRUE START OF S:GTAB 4 P XIF d P SUKL A14,8 ADJUST FOR MAP p * P ADKL A13,SYA360 CONTINUATION ADDRESS $ P LDK A1,0 INDICATE SYSLOAD ENDED P OTR A1,0,SOP $ P LD A1,SCT
0x167060…1671f4 (1, 196) Dummy {f00=0x0070, f01=0x0190, f02=»A370 RESTORE PROGRAM BASE OINTER P* ( P* INIT A15 STACK 2 P* L P LD A15,SCTSTB V P SUKL A15,4 l P P* START APPLICATION P . P LD A1,IHRTC GET INTERRUPT ADDRESS FOR RTC P ST A1,SAVRTC,A13 SAVE 4 P LDKL A1,IHR
0x1671f4…167388 Dummy {f00=0x0070, f01=0x018e, f02=»TIALIZE DEVICES ~ P CF A15,SAVE8 SAVE REGISTERS P* < F P* WAIT APPROXIMATELY 0.62 SECONDS BEFORE BRANCHING TO DISPATCHER F P* P LDKL A1,/FFFF SET COUNTER PDELAY SRC A2,31 P SUK A1,1 P RB(NZ) DELAY P INH ( P
0x167388…16751c Dummy {f00=0x0070, f01=0x0190, f02=» P* * P* TEMPORARY INTERRUPT ROUTINE FOR RTC P* < PIHRTCO EQU *-REL F P RIT RTCDA ^ P RTN A15 p P IFF CREDIT=0 P EJECT P 6 P************************************************* 6 P***
0x16751c…1676b0 Dummy {f00=0x0070, f01=0x0190, f02=» ^ 6 P************************************************* P B 6 P* BUILD COMMON AND TASKCLASS DATA AREAS. * J 6 P* BUILD TASKDATA PROTOTYPE AREA * 6 P* * 6 P****************
0x1676b0…167844 Dummy {f00=0x0070, f01=0x0190, f02=»* *** 0 P** S U B R O U T I N E S ** 2 0 P******************************************** f P P 4 P** T : D A D D ** 4 P**
0x167844…1679d8 Dummy {f00=0x0070, f01=0x0190, f02=» ** 4 P** INPUT : A8=POINTER TO T:A (IN T:ATAB) ** 6 4 P** OUTPUT: A12=T:D ADDRESS ** n 4 P************************************************ PT:DADD EQU * P IFT CREDIT-MMUPAG=1
0x1679d8…167b6c Dummy {f00=0x0070, f01=0x0190, f02=» EL A12,T:DAD,A12 P XIF P IFF CREDIT=0 & P AD A12,MOVADD,A13 RELOCATE < P RTN A14 ` P EJECT p P ~ P 6 P** M O V C O M ** 6 P** ** 6
0x167b6c…167d00 Dummy {f00=0x0070, f01=0x0190, f02=»AT LEAST TWO T:A'S, AND MOVE ** ~ 6 P** TO COMMON AREA ** ( 6 P** ** b 6 P** INPUT : A8=POINTER IN T:ATAB ** 6 P** BIT=BIT NUMBER, SAT IN MASK **
0x167d00…167e94 (1, 197) Dummy {f00=0x0070, f01=0x0190, f02=»S: A1-A6,A9,A11,A12 ** 6 P************************************************* . P h PMOVCOM EQU * t & P CALL CHKMVD BLOCK ALREADY MOVED? P RF(N) MOVC20 YES! : P CALL GETWB POINTER TO WB ADD TO 'WBADD',A5=T:A-DISPL (
0x167e94…168028 Dummy {f00=0x0070, f01=0x0190, f02=» P CW A6,ENDADD,A13 ALL DONE? P RF(NE) MOVC30 NO ( PMOVC20 RTN A14 YES! B P IFT CREDIT-MMUPAG=1 ^ PMOVC30 LDR* A11,A6 z P LD A2,T:DAD,A11 T:D-ADDRESS P AD A2,MOVADD,A13 RELOCATE P ST A2,SAVE03,A13 SAVE , P LD A2,WATLEN,A2
0x168028…1681bc Dummy {f00=0x0070, f01=0x0190, f02=»,A13 W.B.-ADDRESS TO EXAMINE P LDR* A11,A11 $ . P CW A11,SAVE06,A13 COMPARE W.B.-ADDRESSES : P XIF l P IFT CREDIT+MMUPAG=2 x PMOVC30 ELR A11,A6 P EL A2,T:DAD,A11 T:D-ADDRESS P AD A2,MOVADD,A13 RELOCATE 0 P ST A2,SAVE03,A13 SA
0x1681bc…168350 Dummy {f00=0x0070, f01=0x0190, f02=»T ELEMENTS. TAKE NEXT T:A x . P AD A11,TADISP,A13 W.B.-ADDRESS TO EXAMINE " P ELR A11,A11 T . P CW A11,SAVE06,A13 COMPARE W.B.-ADDRESSES h P XIF P IFF CREDIT=0 P RB(NE) MOVC10 .NEQ. ( P LD A9,MOVED,A13 W.B. ALREADY MOVED? . P RF(
0x168350…1684e4 Dummy {f00=0x0070, f01=0x0190, f02=»MOVWB MOV WORK BLOCK P IM MOVED,A13 INDICATE MOVED P LD A4,UWB,A13 UWB-BLOCKS? @ P RF(Z) MOVC40 NO! b " P CALL GETPRO CREATE REAL UWB'S | 4 PMOVC40 ST A2,NEWAD2,A13 SAVE NEW ADDRESS TO W.B. P CALL MOVDWB & PMOVC50 CALL CHADR CHANGE A
0x1684e4…168678 Dummy {f00=0x0070, f01=0x0190, f02=»S n & P LDR A8,A6 REPLACE POINTER TO T:A * P LD A12,SAVE03,A13 REPLACE T:D-ADDRESS 4 P CALL MOVDWB b P LDR A8,A11 v * P LD A12,SAVE25,A13 RELOAD T:D-ADDRESS P RB MOVC10 P EJECT P P 4 P** G E T P
0x168678…16880c Dummy {f00=0x0070, f01=0x0190, f02=» ` 4 P** SEARCH U:BTAB PROTOTYPE AND GET NUMBER OF ** 4 P** COPIES. FILL REAL U:BTAB ** @ 4 P** ** x 4 P** INPUT : A11=PROTOTYPE ADDRESS ** 4 P** A2=LAST W.B. - ADDRE
0x16880c…1689a0 Dummy {f00=0x0070, f01=0x0190, f02=»************************************************ P 8 PGETPRO EQU * D ( P LD A3,U:BTOD,A13 GET U:BTAB ADDRESS X P IFT CREDIT-MMUPAG=1 P LDR* A4,A3 LENGTH PGETP10 EQU * 6 P SUK A4,UP:REC SUB RECORD LENGTH FRM TABLE LENGTH P
0x1689a0…168b34 (1, 198) Dummy {f00=0x0071, f01=0x0190, f02=»F(E) GETP30 YES! GET NUMBER OF COPIES P ADK A3,UP:REC NEXT . P RB GETP10 J P 0 P* GET NUMBER OF COPIES * h 0 P* A3 POINTS AT PROTOTYPE ADDRESS IN U:BTAB * P PGETP30 EQU * P LD A4,WBLEN,A11 W.B.-LENGTH
0x168b34…168cc8 Dummy {f00=0x0071, f01=0x0190, f02=»A13 ADD TO NEW TABLE ADDRESS P LDR A9,A3 $ " P ST A4,URLENG,A9 STORE LENGTH 6 * P ST A5,URNUMB,A9 STORE IN REAL U:BTAB 0 P* COPY NUMBER OF WORKBLOCKS TO COMMON AREA * 0 P******************************************** . P SUK A5,1 ONE ALREADY
0x168cc8…168e5c Dummy {f00=0x0071, f01=0x0190, f02=» POINTER IN REAL U:BTAB * & P********************************* " PGETP50 EQU * L 6 P ST A2,URADDR,A9 STORE ADDRESS TO FIRST IN U:BTAB ` P XIF P IFT CREDIT+MMUPAG=2 P ELR A4,A3 LENGTH PGETP10 EQU * 6 P SUK A4,UP:REC SUB RECOR
0x168e5c…168ff0 Dummy {f00=0x0071, f01=0x0190, f02=»A10,UPADDR,A3 CHECK IF SAME W.B. P CWR A11,A10 ( , P RF(E) GETP30 YES! GET NUMBER OF COPIES < P ADK A3,UP:REC NEXT l P RB GETP10 P 0 P* GET NUMBER OF COPIES * 0 P* A3 POINTS AT PROTOTYPE ADDRESS IN U:BTAB *
0x168ff0…169184 Dummy {f00=0x0071, f01=0x0190, f02=»1,A3 GET NUMBER OF COPIES P ANK A5,/FF " , P SU A3,U:BTOD,A13 GET TABLE DISPLACEMENT 6 . P AD A3,U:BTNW,A13 ADD TO NEW TABLE ADDRESS f P LDR A9,A3 P TL* MMTO,A13 LOAD TO-TABLE * P ES A5,URNUMB,A9 ESORE IN REAL U:BTAB " P ES A4,URLEN
0x169184…169318 Dummy {f00=0x0071, f01=0x018e, f02=»**************************** . P SUK A5,1 ONE ALREADY MOVED (IN 'MOVCOM') $ P RF(NP) GETP50 V PGETP40 CALL MOVWB l P SUK A5,1 P RB(NZ) GETP40 P & P* UPDATE POINTER IN REAL U:BTAB * & P*********************************
0x169318…1694ac Dummy {f00=0x0071, f01=0x0190, f02=» P IFF CREDIT=0 P RTN A14 P EJECT . P < 2 P** M O V C L A ** H 2 P** ** ~ 2 P** ** 2 P** CHECKS IF W.B. ALREADY MOV
0x1694ac…169640 Dummy {f00=0x0071, f01=0x0190, f02=» ** 2 P** A LOT OF WORKREGS. ** 2 2 P********************************************* h P PMOVCLA EQU * P CALL SHIFT P RF(Z) MVCL30 * PMVCL10 CALL GETWB W.B.-ADDRESS TO A1
0x169640…1697d4 (1, 199) Dummy {f00=0x0071, f01=0x0190, f02=»CL10 PMVCL30 RTN A14 PMVCL40 CALL MOVDT " P CALL MOVWB < P LD A4,UWB,A13 UWB-SCANNING P P RF(Z) MVCL50 NO! t P CALL GETPRO DUPLICATE WB'S . PMVCL50 ST A2,NEWAD2,A13 SAVE W.B.-ADDRESS P CALL MOVDWB PROCESS DWB'S P R
0x1697d4…169968 Dummy {f00=0x0071, f01=0x0190, f02=» ** x 6 P** ** " 6 P** CHANGE ADDRESS TO W.B. & D.T. IN T:A, ** 6 P** BLOCKS ALREDY MOVED ** 6 P** ** 6
0x169968…169afc Dummy {f00=0x0071, f01=0x0190, f02=»= NEW W.B.-ADDRESS ** ~ 6 P** TADISP=DISPLACEMENT TO WB-ADDR ** ( 6 P** WORK.REGS: A1,A2 ** b 6 P************************************************* P PCHADR EQU * P IFT CREDIT-MMUPAG
0x169afc…169c90 Dummy {f00=0x0071, f01=0x0190, f02=» SUK A1,2 ADDRESS TO D.T.-ADDRESS P LD A2,NEWAD1,A13 * P STR A2,A1 D P XIF V P IFT CREDIT+MMUPAG=2 b P ELR A1,A6 T:A-ADDRESS ~ . P AD A1,TADISP,A13 ADDRESS TO W.B.-ADDRESS P LD A2,NEWAD2,A13 P ESR A2,A1 & P SUK A1,2 ADDR
0x169c90…169e24 Dummy {f00=0x0071, f01=0x0190, f02=»FT CREDIT+SWPBLK=2 P EJECT B P************************************************************** ( B P* * n B P* * B P* B:RSWT - BU
0x169e24…169fb8 Dummy {f00=0x0071, f01=0x0190, f02=» * B P* REFERENCED IN: SYSLDA * < B P* * B P* ENTRY: A2 - POINTER TO FIRST RECORD IN REAL S:BTAB *
0x169fb8…16a14c Dummy {f00=0x0071, f01=0x0190, f02=» * T B P* EXIT: * B P* * P B P* WORK REGISTERS: A1-A7 * B P*
0x16a14c…16a2e0 Dummy {f00=0x0071, f01=0x0190, f02=» * h B P************************************************************** P EJECT d PB:RSWT EQU * r * P LDR A8,A2 SAVE POINTER TO FIRST BLOCK , P LD A1,SCTSWB POINTER TO SWB BLOCK TABLE * P RF(Z) RSWBEX NO SWB:S IN APPLICATIO
0x16a2e0…16a474 (1, 200) Dummy {f00=0x0071, f01=0x0190, f02=» v P LDR* A4,A1 POINTER TO BLOCK P LDR* A6,A4 NUMBER OF COPIES , $ P LD A7,SWBLEN,A4 LENGTH IN BYTES P P XIF x P IFT CREDIT+MMUSWB=3 & P ES A6,2,A2 STORE NUMBER OF COPIES , P ES A7,4,A2 STORE LENGTH OF SWB IN BYTES P XIF P I
0x16a474…16a608 Dummy {f00=0x0071, f01=0x0190, f02=»DIT+SWPBLK=2 & P SUK A5,6 DECREMENTS S:BTAB LENGTH ( P ADK A2,6 INCREMENT POINTER IN BLOCK > ( P SUK A3,1 DECREMENT NUMBER OF TYPES j P RB(P) RSWB10 P LDR A4,A2 P* 4 P* INIT POINTERS TO TID BLOCKS FOR EACH SWB TYPE ( P* AND R
0x16a608…16a79c Dummy {f00=0x0071, f01=0x0190, f02=»EMENT v P IFT CREDIT+SWBMMU=2 P LD A1,2,A8 NUMBER OF COPIES * P RF(Z) RSWB50 NO COPIES! N * P STR A6,A8 STORE POINTER TO TID BLOCK n PRSWB30 STR A3,A2 RESET TID , P ADK A2,2 INCREMENT POINTER IN TID BLOCK . P SUK A5,2 DECREMENT LENGTH
0x16a79c…16a930 Dummy {f00=0x0071, f01=0x0190, f02=» EL A1,2,A8 GET NUMBER OF COPIES P RF(Z) RSWB50 NO COPIES! ( * P ESR A6,A8 STORE POINTER TO TID BLOCK H PRSWB40 ESR A3,A2 RESET TID v , P ADK A2,2 INCREMENT POINTER IN TID BLOCK . P SUK A5,2 DECREMENT LENGTH OF REAL S:BTAB ( P SUK A1,1 DECR
0x16a930…16aac4 Dummy {f00=0x0071, f01=0x0190, f02=» P RB(NE) RSWB20 " P LDR A5,A5 S:BTAB CONSISTENT? P RF(Z) RSWBEX YES D P LDKL A1,LMP6 SWB ERROR! ^ P CALL ERROR ~ PRSWBEX RTN A14 P XIF P IFF CREDIT=0 P EJECT P P* ************************** " P* ST
0x16aac4…16ac58 Dummy {f00=0x0071, f01=0x0190, f02=» P* A5=START-ADDRESS P* A9=P:MTAB ADDRESS P* SAVE03=DDIV TO-ADDRESS : P* SAVE04=DDIV FROM ADDRESS Z " P* SAVE05=LENGTH OF REAL T:ATAB | " P* SAVE06=LENGTH OF REAL U:BTAB P PSTART2 EQU *-REL " P LDR A8,P LOAD TEMP. STACKBA
0x16ac58…16adec Dummy {f00=0x0071, f01=0x0190, f02=» n $ P LD A2,SAVE03,A13 GET TO ADDRESS . P LDR A3,A9 GET P:MTAB START (=END OF DDIV 0 P SUR A3,A1 => LENGTH b P XIF ~ P IFT CREDIT-MMUPAG=1 . P LD A8,SCTNOS ANY SEGMENTS IN APPLICATION? P RF(Z) NOSGMT NO! ( P LDKL A8,0 RESET FSTAD
0x16adec…16af80 Dummy {f00=0x0071, f01=0x0190, f02=»XT LDR* A4,A1 GET WORD P STR A4,A2 STORE P ADK A1,2 6 P ADK A2,2 H P SUK A3,2 DEC LENGTH Z P RB(NN) MOVNXT v P XIF P IFT CREDIT+MMUPAG=2 P CALL XMOVE & P* REMOVE DDIV ENTRIES IN MM-TABLE P " P LDR A1,A9 GET
0x16af80…16b114 (1, 201) Dummy {f00=0x0071, f01=0x0190, f02=»3 RELOCATE " P ADR A1,A2 P:MTAB START ENTRY P LDKL A4,/FC00 8 PSYA205 CWR A1,A2 ALL? N P RF(E) SYA207 YES! l , P STR A4,A1 REPLACE ENTRY WITH PAGE ERROR P SUK A1,2 P RB SYA205 PSYA207 EQU * P* CHANGE TABLE-ADDRESSES
0x16b114…16b2a8 Dummy {f00=0x0071, f01=0x0190, f02=» P ANKL A9,/FFFE EVEN ADDRESS , P ST A9,LSTADR,A13 SAVE END OF FREE AREA ( P X P ` P h . P* RESERVE SPACE FOR REAL T:A- AND U:BTAB * t P P IFT CREDIT+MMUPAG=2 ( P LDKL A3,MMTAB GET CURRENT MM-TABLE P ADR A3,A13 ,
0x16b2a8…16b43c Dummy {f00=0x0071, f01=0x0190, f02=»AGE n * P LD A3,SAVE05,A13 GET LENGTH OF T:ATAB P LDR A5,A3 SAVE : * P CALL MOVING RESERVE SPACE FOR T:ATAB R $ P TL* MMTO,A13 SET CORRECT TABLE " P ESR A5,A2 STORE T:ATAB LENGTH . P ST A2,T:ATNW,A13 SAVE NEW T:ATAB ADDRESS P ADK A2,
0x16b43c…16b5d0 Dummy {f00=0x0071, f01=0x0190, f02=»E r P P LDR A3,A5 GET LENGTH P CALL MOVING 0 P TL* MMTO,A13 D P LDR A3,A9 GET P:MTAB Z & P ADK A3,T:AID ADD TO ADDRESS WORD x 0 P ESR A5,A2 STORE TABLE LENGTH IN T:TID-TABLE " P ADK A2,2 ADJUST TABLE ADDRESS P ESR A2,A3 S
0x16b5d0…16b764 Dummy {f00=0x0071, f01=0x0190, f02=» RESERVE SPACE 4 P ST A2,U:BTNW,A13 SAVE NEW (REAL) U:BTAB ADDRESS P IFT CREDIT-MMUPAG=1 N P STR A5,A2 STORE LENGTH j P ADK A2,2 : P ST A2,U:BTAB,A9 SAVE 'REAL' U:BTAB-ADDRESS IN P:MTAB * P LD A3,SAVE05,A13 GET LENGTH OF T:ATAB P
0x16b764…16b8f8 Dummy {f00=0x0071, f01=0x018e, f02=»:ATAB ADDRESS t P ADK A2,2 & P ST A2,T:ATAB,A9 SAVE REAL ADDRESS ( P* RESERVE FOR T:AID TABLE R P t P LDR A3,A5 LENGTH | P CALL MOVING P STR A5,A2 STORE LENGTH $ P ADK A2,2 ADJUST FOR LENGTH-WORD , P ST A2,T:AID,A9 STORE
0x16b8f8…16ba8c Dummy {f00=0x0071, f01=0x0190, f02=» P ADK A2,2 SKIP LENGTH WORD $ P ES A2,U:BTAB,A9 STORE IN P:MTAB & P XIF N P IFT SWPBLK+CREDIT=2 Z P* v * P* RESERV SPACE FOR REAL S:BTAB TABLE P* , P LD A3,SAVE25,A13 LENGTH OF REAL S:BTAB P LDR A5,A3 SAVE P CALL MO
0x16ba8c…16bc20 Dummy {f00=0x0071, f01=0x018e, f02=» ES A2,S:BTAB,A9 P CALL B:RSWT P XIF , P IFT CREDIT+SWBMMU=2 8 P STR A5,A2 T P ADK A2,2 f P ST A2,S:BTAB,A9 x P CALL B:RSWT P XIF P IFT CREDIT+MMUPAG=2 " P TL* MMFROM,A13 RELOAD TABLE P XIF P IFF CREDI
0x16bc20…16bdb4 (1, 202) Dummy {f00=0x0072, f01=0x0190, f02=» ( P LD A8,T:ATOD,A13 GET T:ATAB ADDRESS P IFT CREDIT-MMUPAG=1 4 P LDR* A3,A8 GET LENGTH P P XIF n P IFT CREDIT+MMUPAG=2 z P ELR A3,A8 GET LENGTH P XIF P IFF CREDIT=0 P ADR A3,A8 0 P ST A3,ENDADD,A13 SAVE END OF T:
0x16bdb4…16bf48 Dummy {f00=0x0072, f01=0x0190, f02=» RF(E) CLADAT YES! $ P CALL T:DADD T:D-ADDRESS TO A12 P IFT CREDIT-MMUPAG=1 B " P LD A7,CWBMSK,A12 GET CWB-MASK ^ P XIF P IFT CREDIT+MMUPAG=2 P EL A7,CWBMSK,A12 P XIF P IFF CREDIT=0 P CALL SHIFT SUPER-LOOPA P
0x16bf48…16c0dc Dummy {f00=0x0072, f01=0x0190, f02=»QU * P* SEARCH UWB'S: P* $ & P IM UWB,A13 INDICATE UWB-SCANNING . P IFT CREDIT-MMUPAG=1 X P LD A7,UWBMSK,A12 t P XIF P IFT CREDIT+MMUPAG=2 P EL A7,UWBMSK,A12 P XIF P IFF CREDIT=0 P CALL SHIFT " PSY
0x16c0dc…16c270 Dummy {f00=0x0072, f01=0x0190, f02=»SK CLASS DATA CONFIGURATION PART * * P************************************** * P X PCLADAT EQU * ` 4 P LD A8,T:ATOD,A13 SET POINTER TO LENGTH INT:ATAB t P IFT CREDIT-MMUPAG=1 " PSYA250 CM UWB,A13 INDICATE CWB ( P ADKL A8,2 STEP TO NEXT T:
0x16c270…16c404 Dummy {f00=0x0072, f01=0x0190, f02=»LCULATE LENGTH OF T:D P 2 P LD A1,WATLEN,A12 NUMBER OF BYTES-1 IN DBLKTAB & P ADK A1,2 P ANKL A1,/FFFE EVEN ADDRESS n ( P ADK A1,DWBFST+4 ADD DISPL. TO FIRST * P LDR A3,A1 GET NUMBER OF START-POINTS P ADR A3,A12 ADD T:D-ADDRESS
0x16c404…16c598 Dummy {f00=0x0072, f01=0x0190, f02=»' z P ADR A3,A1 =>LENGTH P LDR A1,A12 FROM-ADDRESS & P CALL MOVING MOVE T:D F P LDR* A1,A8 GET T:A ADDRESS d * P ST A2,T:DAD,A1 STORE NEW T:D ADDRESS " P LD A7,CWBMSK,A12 GET CWBMASK P XIF P IFT CREDIT+MMUPAG=2 ( P* IN
0x16c598…16c72c Dummy {f00=0x0072, f01=0x0190, f02=»,SAVE06,A13 SAVE " PSYA250 CM UWB,A13 INDICATE CWB ( P ADKL A8,2 STEP TO NEXT T:A ADDRESS > P CW A8,ENDADD,A13 j " P RF(E) SYA270 ALL T:A'S DONE! " P CALL GETTAB GET TTAB-ADDRESS P CALL MOVMMT MOVE MM-TABLE " P* FILL MM-TABLE ADDRES
0x16c72c…16c8c0 Dummy {f00=0x0072, f01=0x0190, f02=» FILL TABLE ( P CALL T:DADD GET T:D ADDRESS TO A12 4 P ST A12,T:DSAV,A9 SAVE 'OLD' T:D-ADDRESS IN TTAB @ P x P* CALCULATE LENGTH OF T:D P 2 P EL A1,WATLEN,A12 NUMBER OF BYTES-1 IN DBLKTAB P ADK A1,2 P ANKL A1,/FFFE EVEN AD
0x16c8c0…16ca54 (1, 203) Dummy {f00=0x0072, f01=0x0190, f02=»A3 . 0 P LDK A2,STPREC GET STARTPOINTS RECORD LENGTH P CALL MULT AND MULTIPLY @ P ADK A3,2 'NUMBER-WORD' ` P ADR A3,A1 =>LENGTH P LDR A1,A12 FROM-ADDRESS P CALL MOVING MOVE T:D P ELR A1,A8 GET T:A ADDRESS * P ES A2,T:DAD
0x16ca54…16cbe8 Dummy {f00=0x0072, f01=0x0190, f02=» P P P* TASK CLASS DATA UWB'S * P************************* > & P IM UWB,A13 INDICATE UWB SCANNING ` P IFT CREDIT-MMUPAG=1 " P LD A7,UWBMSK,A12 GET UWBMASK P XIF P IFT CREDIT+MMUPAG=2 P EL A7,UWBMSK,A12
0x16cbe8…16cd7c Dummy {f00=0x0072, f01=0x0190, f02=»****************************** P & PSYA260 EQU * . P IFT CREDIT-MMUPAG=1 B P LD A7,SWBMSK,A12 ^ P RF(Z) SYA265 NONE x P CALL SKRITT PSYA265 LD A7,TWBMSK,A12 P XIF P IFT CREDIT+MMUPAG=2 P EL A7,SWBMSK,A12 P
0x16cd7c…16cf10 Dummy {f00=0x0072, f01=0x0190, f02=»ALL SKRITT P RB SYA250 P $ PSYA270 RF PRODAT 0 P EJECT H P V P b 4 P** S K R I T T ** n 4 P** ** 4 P** MOVE D.T
0x16cf10…16d0a4 Dummy {f00=0x0072, f01=0x0190, f02=» * P CALL SHIFT PNO RF(NZ) NES P RTN A14 4 PNES CALL GETWB D P CALL MOVDT Z . P CM NEWAD2,A13 NO NEW W.B.-ADDRESS (YET!) n P CALL MOVDWB P CALL SKIFTA P RB NO P EJECT P & P* BUILD TASKDATA PROTOTY
0x16d0a4…16d238 Dummy {f00=0x0072, f01=0x018e, f02=»? j P RF(Z) SYA275 NO! 2 P CALL GETTTB GET TTAB ADDRESS. TID 'TB' IN A1 $ & P CM TTB:PP,A2 CLEAR TCL SAVE AREA Z P IFT CREDIT+MMUPAG=2 =00001 P CALL MOVMMT MOVE MM-TABLE P XIF =00001 P IFF CREDIT=0 =00001 PSYA275 EQU
0x16d238…16d3cc Dummy {f00=0x0072, f01=0x0190, f02=» PSYA280 ADKL A8,2 P CW A8,ENDADD,A13 P RF(E) SYA290 ALL DONE 6 P IFT CREDIT-MMUPAG=1 T " P LDR* A12,A8 GET T:D ADDRESS.. p P LD A12,T:DAD,A12 . 0 P CALL TWBSWB MOVE TWB'S & RESERVE FOR SWB'S P " P* CALCULATE LENGTH OF
0x16d3cc…16d560 Dummy {f00=0x0072, f01=0x0190, f02=» n P LDK A2,DSCBL DSCB-LENGTH ( P CALL MULT A3() X (A2) RESULT IN A3 * & P ST A3,CSN,A1 SAVE LENG OF DSCB'S V ( P LD A2,FCD,A12 GET FCB-DISPLACEMENT P RF(NZ) SYA285 FCB PRESENT & P SUR A2,A3 MOVD30E A3(DSCB-LENGTH) , P ADKL A2,T:ASTA
0x16d560…16d6f4 (1, 204) Dummy {f00=0x0072, f01=0x0190, f02=»SE,A1 AND SAVE TEMPORARY * P LD A2,SCTLAC GET START OF COMMON PART P LD A2,P:BAS,A2 GET P:BAS N P ST A2,CSB,A1 AND SAVE p " P CALL ALLBUF ALLOCATE BUFFERS P CALL MOVT:A MOVE T:A * P STR A2,A8 STORE NEW ADDRESS IN T:ATAB P XIF
0x16d6f4…16d888 Dummy {f00=0x0072, f01=0x0190, f02=»GET LAST USED ENTRY IN CLASS-LOCAL MM-TABLE P 4 ( P TL MMBEG,A2 LOAD CLASS LOCAL TABLE < * P LDKL A3,MMTAB GET WORK TABLE ADDRESS h P ADR A3,A13 $ P TSR A3 STORE TABLE IN WORK-AREA $ P TL MMDDIV,A13 RELOAD DDIV TABLE P CALL MMENT GE
0x16d888…16da1c Dummy {f00=0x0072, f01=0x0190, f02=» r " P*** *** P . P ELR A1,A8 GET T:A-ADDRESS : & P EL A3,DATLEN,A12 A12=T:D-ADDRESS P LDK A2,DSCBL DSCB-LENGTH ( P CALL MULT A3() X (A2) RESULT IN A3 & P ES A3,CSN,A1 SAVE LENG OF DSCB'S ( P EL A2,FCD
0x16da1c…16dbb0 Dummy {f00=0x0072, f01=0x0190, f02=»TO FIRST WORD v 6 PSYA285 ES A2,CIA,A1 SAVE DISPLACEMENT TO T:A-ESART " P EL A2,STKB,A1 GET STACK SIZE P & P ES A2,CSE,A1 AND SAVE (TEMPORARY) v & P LD A2,SCTLAC GET START OF P:MTAB $ P TL* MMTO,A13 LOAD CORRECT TABLE P EL A2,P:BAS,A2 GET P:
0x16dbb0…16dd44 Dummy {f00=0x0072, f01=0x0190, f02=»OVE T:A * P ESR A2,A8 STORE NEW ADDRESS IN T:ATAB P XIF > P IFF CREDIT=0 J P RB SYA280 NEXT ` P EJECT x PSYA290 EQU * 4 P IM FLAG,A13 INDICATE REAL DATA-PART PROCESSING , P* INCLUDE DDIV AND PART 2.A IN FREE AREA P .
0x16dd44…16ded8 Dummy {f00=0x0072, f01=0x018e, f02=»A3,/F000 $ P SRL A3,2 GET NEW PHYSICALL PAGE P ST A3,FSTPAG,A13 SAVE 8 ( P ANKL A2,/FFF GET NEW PAGE INCREMENT V P ST A2,FSTADR,A13 SAVE P* MOVE T:ATAB P * P LD A2,T:ATNW,A13 GET REAL T:A-ADDRESS P XIF P IFT CREDIT-MMUP
0x16ded8…16e06c Dummy {f00=0x0072, f01=0x0190, f02=» P LDR* A1,A2 REAL LENGTH $ P ADR A2,A1 END OF TABLE ADDRESS $ P ST A2,ENDADD,A13 SAVE L & P LD A1,T:ATOD,A13 GET FROM-ADDRESS j P LDR* A3,A1 MOVE-LENGTH P SUR A2,A3 TO-ADDRESS P ST A2,T:ATOD,A13 SAVE P CALL MOVE P XIF
0x16e06c…16e200 Dummy {f00=0x0072, f01=0x0190, f02=»AD TABLE | P ADR A2,A1 END ADDRESS 4 P ST A2,ENDADD,A13 SAVE 'END-OF-T:ATAB-CONDITION' . * P LD A1,T:ATOD,A13 GET PROTOTYP T:ATAB f P ELR A3,A1 GET LENGTH P SUR A2,A3 TO-ADDRESS P ST A2,T:ATOD,A13 SAVE P CALL XMOVE P XIF
0x16e200…16e394 (1, 205) Dummy {f00=0x0072, f01=0x0190, f02=»D BASE ADDRESS P ABR A5 & PLENGT2 EQU *-REL LENGTH OF PART 2 & P EJECT P P ^ P j 2 P********************************************* v 2 P******* ******* 2 P**
0x16e394…16e528 Dummy {f00=0x0072, f01=0x0190, f02=» ***** 2 P********************************************* * P ` 2 P* READ CONFIGURATION FILE & BUILD * l 2 P* SHADOW-TABLES * 2 P* *
0x16e528…16e6bc Dummy {f00=0x0072, f01=0x0190, f02=»********* t * P*** *** * P** S U B R O U T I N E S ** @ ( P** -USED IN THIS PART ONLY * n * P************************************* P EJECT P P 6 P** C O N
0x16e6bc…16e850 Dummy {f00=0x0072, f01=0x0190, f02=» ** b 6 P** CONVERSION OF TWO ASCII-DIGITS TO BINARY ** 6 P** ** F 6 P** INPUT : A5=ASCII DIGITS ** 6 P** OUTPUT: A1=BINARY RESULT ** 6 P** WORK.REGS: A3,A2
0x16e850…16e9e4 Dummy {f00=0x0072, f01=0x0190, f02=»0 CLEAR RESULT REG P LDR A3,A5 P SRL A3,8 GET TEN'S , P SUK A3,/30 H P ADR A1,A3 P LDR A2,A1 MULT BY 10 n P ADR A1,A1 . P SLL A2,3 . P ADR A1,A2 .... P LDR A3,A5 P ANK A3,/F GET ONE'S P ADR A1,A3
0x16e9e4…16eb78 Dummy {f00=0x0072, f01=0x0190, f02=» ** l 6 P** ** 6 P** SKIP TO NEXT BLOCK IN CONFIGURATION FILE ** P 6 P** ** 6 P** INPUT: A11=ADDRESS TO CURRENT BLOCK-START ** 6 P** OUTPUT
0x16eb78…16ed0c Dummy {f00=0x0072, f01=0x018e, f02=» ** r 6 P************************************************** P V PNXTBLK EQU * ^ 6 P ADKL A11,TDBNC NUMBER OF TERMINAL DEVICE CLASSES r 2 PNXTCOM EQU * ENTRY: SKIP TO NEXT COMMON-BLOCK P LCR A5,A11 P SLL A5,8 P
0x16ed0c…16eea0 Dummy {f00=0x0072, f01=0x0190, f02=» 0 P LCR A5,A11 GET NUMBER OF SPEC, DEV. CLASSES P SLL A5,8 8 P LC A5,1,A11 J P CALL CONVRT ^ , P LDK A2,SDC SPEC. DEV. CL. RECORD LENGTH r P LDR A3,A1 P CALL MULT P ADR A11,A3 A11=NEXT BLOCK P ADKL A11,2 $ P LC A2,TDBBT
0x16eea0…16f034 (1, 206) Dummy {f00=0x0073, f01=0x0190, f02=» ** 8 P** ** 4 8 P** CONVERT 3 ASCII-DIGITS TO BINARY ** p 8 P** ** 8 P** INPUT : A6=ADDRESS TO FIRST
0x16f034…16f1c8 Dummy {f00=0x0073, f01=0x0190, f02=» ** ` 8 P**************************************************** P H PGETNUM EQU * T P LDK A4,100 FIRST INCREMENT h P LDK A5,0 CLEAR RESULT REG P SUK A6,1 INIT POINTER PGET030 ADK A6,1 NEXT DIGIT P LCR A2,A6 GET CHAR
0x16f1c8…16f35c Dummy {f00=0x0073, f01=0x0190, f02=» SUK A4,90 NEXT INCREMENT (TEN'S) P RB(P) GET030 * & P ADK A4,81 NEXT INCREMENT (ONE'S) @ P RB(P) GET030 THIRD DIGIT j P RTN A14 P EJECT P P* START OF PROGRAM PART 1 * P 4 P* SAVE02=POINTER TO 1:ST USER TASK TTAB-AD
0x16f35c…16f4f0 Dummy {f00=0x0073, f01=0x0190, f02=» P* P LD A15,SCTSTB P SUKL A15,4 $ P 8 & P LD A2,SCTLAC GET S:GTAB (IF ANY) @ P IFT MMUPAG=0 j . P LD A2,CREID,A2 GET CREDIT IDENTIFICATION P XIF P IFT MMUPAG=1 P TL MMTAB,A13 %%## P EL A2,CREID,A2 P X
0x16f4f0…16f684 Dummy {f00=0x0073, f01=0x0190, f02=»0 YES! START CONFIGURATE P IFF CREDIT=1 P 6 P* ASSEMBLER APPLICATION > P ^ P* SWITCH TO LEVEL 0 ENB f P ( P LDKL A4,SYA103 CONTINUATION ADDRESS P ADR A4,A13 RELOCATE P STR A4,A15 PUT ON STACK P LDKL A4,/00C0
0x16f684…16f818 Dummy {f00=0x0073, f01=0x0190, f02=»ET MM-TABLE ADDRESS P ADR A4,A13 RELOCATE P ST A4,MMFROM,A13 SAVE 8 ( P* FILL MM-TABLES IN USER TASK TTAB'S V P ( P LD* A5,SCTTCT GET LENGTH OF TC:TAB $ P LD A6,SAVE02,A13 1:ST USER TASK P LDR A3,A6 SAVE 0 P SU A3,SCTTCT GET
0x16f818…16f9ac Dummy {f00=0x0073, f01=0x0190, f02=»DKL A1,/FC00 P LDKL A2,MMTAB P ADR A2,A13 * P LDR A4,A2 =00002 > P SUKL A4,MMBEG X P AD A4,SCTMMC n PSYA:10 CWR A4,A2 P RF(E) SYA105 P SUK A4,2 P STR A1,A4 P RB SYA:10 PSYA105 SUK A5,2 ALL? P RF(
0x16f9ac…16fb40 Dummy {f00=0x0073, f01=0x018e, f02=»A107 EQU * P XIF P IFF CREDIT=1 2 P LD* A5,SAVE02,A13 1:ST USER TASK TTAB ADDRESS 4 . P LD A2,SAVE09,A13 EXECUTION START ADDRESS j ( P AD A2,SCTLAC ADD RELOCATION ADDRESS P LDK A3,0 SEGMENT NUMBER P CF A15,ACTOT QUEUE TASK " P
0x16fb40…16fcd4 (1, 207) Dummy {f00=0x0073, f01=0x018e, f02=» P , P* READ CONFIG FILE AND BUILD SHADOWTABLE P D 0 P CM SAVE02,A13 CLEAR 'BUGGER TASK INDICATOR' P P IFT CREDIT-MMUPAG=1 & P LD* A2,SCTLAC GET START OF P:MTAB $ P LD A12,T:ATAB,A2 T:ATAB ADDRESS & P SUKL A12,2 ADJUST FOR
0x16fcd4…16fe68 Dummy {f00=0x0073, f01=0x0190, f02=» $ P ST A4,U:BTOD,A13 SAVE IN SYSLDA P XIF , P IFT CREDIT+SWBMMU=2 8 ( P LD A4,S:BTAB,A2 GET S:BTAB ADDRESS T $ P SUK A4,2 ADJUST FOR LENGTH WORD P ST A4,S:BTOD,A13 SAVE P XIF P IFT CREDIT-MMUPAG=1 P* T:ATAB PROCESSING:
0x16fe68…16fffc Dummy {f00=0x0073, f01=0x0190, f02=» ~ P " P LDR A11,A3 END OF SHADOW-TAB P LDR A9,A13 START OF SYSLDA 6 P CALL CMPADR Z P RF(L) SYA110 OK! n " P LDKL A1,LMP3 MEMORY OVERFLOW P CALL ERROR ( PSYA110 LDR A9,A2 GET P:MTAB ADDRESS P LDK A2,0 P* CLEAR
0x16fffc…170190 Dummy {f00=0x0073, f01=0x0190, f02=» " P STR A4,A3 STORE TABLE LENGTH ( P LD A11,SAVE01,A13 GET CONFIG START * " P LC A2,TDBBT,A11 GET BLOCKTYPE V P CCK A2,'TT' TASK DEF? | P RF(E) SYA120 OK! P LDK A1,LMP4 NO TASK PRESENT P CALL ERROR ( PSYA120 LC A2,TDBMC+4,A11 GET
0x170190…170324 Dummy {f00=0x0073, f01=0x0190, f02=»E02,A13 INDICATE BUGGER TASK PRESENT =00001 " P RF SYA136 SKIP TO NEXT BLOCK 4 PSYA125 LDR A8,A12 SAVE Z P LDR* A4,A12 T:ATAB LENGTH x PSYA130 ADKL A8,2 NEXT T:A P LDR* A6,A8 GET T:A ADDRESS P SUK A4,2 P RF(NZ) SYA135 0 P
0x170324…1704b8 Dummy {f00=0x0073, f01=0x0190, f02=»SYA130 NO! P SUR* A4,A12 T:ATAB LENGTH P XIF 4 P IFT CREDIT+MMUPAG=2 @ & P EL* A2,SCTLAC GET START OF P:MTAB $ P EL A12,T:ATAB,A2 T:ATAB ADDRESS $ P SUKL A12,2 INCLUDE LENGTH WORD & P ST A12,T:ATOD,A13 SAVE IN SYSLDA $ P EL A4,U
0x1704b8…17064c Dummy {f00=0x0073, f01=0x0190, f02=»MMUSWB=3 ( P EL A4,S:BTAB,A2 GET S:BTAB ADDRESS $ P SUK A4,2 ADJUST FOR LENGTH WORD < P ST A4,S:BTOD,A13 SAVE d P XIF P IFT CREDIT+MMUPAG=2 P* T:ATAB PROCESSING: P P ELR A4,A12 T:ATAB-LENGTH P LDR A3,A4 SAVE
0x17064c…1707e0 Dummy {f00=0x0073, f01=0x0190, f02=» LDR A11,A3 END OF SHADOW-TABLE P LDR A9,A13 START OF SYSLDA ( P CALL CMPADR L P RF(L) SYA110 OK! ` " P LDKL A1,LMP3 MEMORY OVERFLOW z P CALL ERROR ( PSYA110 LDR A9,A2 GET P:MTAB ADDRESS P* CLEAR T:ATAB SHADOW-TABLE: P
0x1707e0…170974 (1, 208) Dummy {f00=0x0073, f01=0x0190, f02=»GTH v ( P LD A11,SAVE01,A13 GET CONFIG START " P LC A2,TDBBT,A11 GET BLOCKTYPE 8 P CCK A2,'TT' TASK DEF? ^ P RF(E) SYA120 OK! | P LDK A1,LMP4 NO TASK PRESENT P CALL ERROR ( PSYA120 LC A2,TDBMC+4,A11 GET TASK ID P SLL A2,8 .
0x170974…170b08 Dummy {f00=0x0073, f01=0x0190, f02=»PRESENT' h P RF SYA136 SKIP THIS BLOCK PSYA125 LDR A8,A12 SAVE 2 P ELR A4,A12 T:ATAB LENGTH P PSYA130 ADKL A8,2 NEXT T:A r P ELR A6,A8 GET T:A ADDRESS P SUK A4,2 P RF(NZ) SYA135 , P LDK A1,LMP5 NO PROT. FOUND (TID ERROR)
0x170b08…170c9c Dummy {f00=0x0073, f01=0x018e, f02=» ELR A10,A12 P SUR A4,A10 T:ATAB LENGTH P XIF 6 P IFF CREDIT=0 B . P NGR A4,A4 => A4=DISPLACEM. IN SHADOW-TAB X ( P LC A5,TDBNT,A11 GET NUMBER OF TASKS P SLL A5,8 P LC A5,TDBNT+1,A11 P CALL CONVRT ( P LD A2,SCTSFA STAR
0x170c9c…170e30 Dummy {f00=0x0073, f01=0x0190, f02=» z P ! PSYA136 CALL NXTBLK ! PSYA137 EQU * ! . P CCK A2,'TT' ! B & P RB(E) SYA120 NEXT TASK DEF BLOCK ! V P CCK A2,'CC' ! P RF(NE) SYA140 ! * P ADKL A11,1 STEP TO NUMBER OF COM.DEV. ! P CALL NXTCOM SKIP COMMON DEF ! PSYA140 CCK A
0x170e30…170fc4 Dummy {f00=0x0073, f01=0x0190, f02=» IN PROTOTYPE ! l PSYA141 EQU * " P XIF " * P IFT CREDIT+SWPBLK=2 " 6 P LCR A2,A11 " R P CCK A2,'SS' " f P RF(NE) SYA152 " z P LD A8,S:BTOD,A13 " P CALL USWBTP " P XIF " P IFT CREDIT=1 " P RF SYA152 " P EJECT " L P********
0x170fc4…171158 Dummy {f00=0x0073, f01=0x0190, f02=» * " P L P* USWBTP - INSERT NUMBER OF COPIES IN U:BTAB/S:BTAB PROTOTYPE TABLE * # L P* ================================================================= * # ` L P* * # L P* REFER
0x171158…1712ec Dummy {f00=0x0073, f01=0x0190, f02=» * # P L P* ENTRY: A8 - MODIFIED ADDRESS TO U:BTAB/S:BTAB PROTOTYPE TABLE * $ L P* A11- POINTER IN CONFIGURATION TABLE TO 'U' OR 'S' BLOCK * $ ` L P* * $ L P* EXIT:
0x1712ec…171480 Dummy {f00=0x0073, f01=0x0190, f02=» * $ P L P* WORK REGISTERS: * % L P* * % ` L P* SUBROUTINES: GETNUM,ERROR * % L P*
0x171480…171614 (1, 209) Dummy {f00=0x0073, f01=0x0190, f02=»******* % P P & PUSWBTP EQU * & P & , P XIF & 4 P IFT CREDIT-MMUPAG=1 & @ P ADKL A11,1 & P LDR A6,A11 & p * P CALL GETNUM PACK 3 DIG. RESULT IN A5 & $ P LDR A1,A5 SAVE NUMBER OF UWB'S & PSYA142 EQU * & P LDR A12,A8 & " P LDR*
0x171614…1717a8 Dummy {f00=0x0073, f01=0x0190, f02=»FIG & h P SLL A2,8 ' P LC A2,1,A11 GET 2:ND CHAR ' 6 P CW A2,UPNAME,A12 COMPARE W. 1:ST WORD IN PROTOTYP ' @ * P RF(E) FRSTOK FIRST TWO CHARACTERS OK! ' z 0 PSYA147 SUK A3,UP:REC DEC. NUMBER OF PROT.'S ' P RF(NN) SYA150 ' P LDK A1,LMP6 UWB NOT F
0x1717a8…17193c Dummy {f00=0x0073, f01=0x0190, f02=» 3:RD CHAR ' z P CC A2,UPNAME+2,A12 ( P RB(NE) SYA147 .NEQ. ( . P EJECT ( J P ( X P* PROTOTYPE FOUND * ( d P ( 8 P ADKL A11,NAMUWB SKIP TO 'NUMBER OF BOCKS' IN CONFIG ( P LDR A6,A11 ( P CALL GETNUM CONVERT ( 2 P SC A5,UPNUMB,A1
0x17193c…171ad0 Dummy {f00=0x0073, f01=0x018e, f02=» RTN A14 ( P XIF ) P IFT CREDIT+MMUPAG=2 ) P ADKL A11,1 ) 8 P LDR A6,A11 ) L * P CALL GETNUM PACK 3 DIG. RESULT IN A5 ) ` $ P LDR A1,A5 SAVE NUMBER OF UWB'S ) PSYA142 EQU * ) P LDR A12,A8 START OF TABLE ) P ELR A3,A12 LENGTH OF U:BTAB
0x171ad0…171c64 Dummy {f00=0x0073, f01=0x0190, f02=» ) P LC A2,1,A11 GET 2:ND CHAR * 2 P EL A10,UPNAME,A12 GET FIRST WORD IN PROTOTYPE * * P CWR A2,A10 * ` P RF(E) FRSTOK FIRST WORD OK! * t 0 PSYA147 SUK A3,UP:REC DEC. NUMBER OF PROT.'S * P RF(NN) SYA150 * P LDK A1,LMP6 UWB NOT FOUND * P CAL
0x171c64…171df8 Dummy {f00=0x0073, f01=0x0190, f02=» CONFIG * j 0 P EL A2,UPNAME+2,A12 GET 3:RD CHAR FROM PROY + P SRL A2,8 + D P ANKL A10,/FF + V P CWR A10,A2 + l P RB(NE) SYA147 .NEQ. + P EJECT + P + P* PROTOTYPE FOUND * + P******************* + P + 8 P ADKL A11,NAMU
0x171df8…171f8c Dummy {f00=0x0073, f01=0x0190, f02=»-TABLE + f P ANKL A10,/FF00 , P ORR A10,A5 , & P ES A10,UPNUMB-1,A12 , : . P SUK A1,1 DEC. NO OF TYPES IN CONFIG FILE , V P RB(P) SYA142 , P ADKL A11,UDBFST-1 , P RTN A14 , P XIF , P IFT CREDIT=1 , P EJECT , PSYA152 EQU * ,
0x171f8c…172120 Dummy {f00=0x0073, f01=0x0190, f02=»OF T:ATAB , r P XIF - P IFT CREDIT+MMUPAG=2 - ( P EL* A7,T:ATOD,A13 GET T:ATAB LENGTH - : * P SLL A7,1 RESERVE FOR MM-ADDRESS-TABLE - f P XIF - P IFF CREDIT=0 - 0 P AD A7,SCTSFA TO-ADDRESS (AFTER SHADOW-TABLE - P ADK A7,1 - P ANKL A7,/FF
0x172120…1722b4 (1, 210) Dummy {f00=0x0074, f01=0x0190, f02=»2,A2 - 4 P ST A2,SAVE04,A13 SAVE NEW RELOCATION TEMPORARY . P IFT CREDIT+MMUPAG=2 . D & P* CREATE SYSLDA & DDIV MM-TABLE * . ` P . " P LDR A2,A7 TO-ADDRESS (SYSLDA) . P ANKL A2,/F000 FIRST PAGE . ( P ST A2,MMREL1,A13 SAVE PHYSICAL PAGE . " P S
0x1722b4…172448 Dummy {f00=0x0074, f01=0x0190, f02=» ( PSYA157 STR A2,A11 STORE PAGE-POINTER / P ADKL A11,2 NEXT ENTRY / 0 P ADKL A2,/400 PAGE INCREMENT / N P SUK A3,1 ALL? / r P RB(NZ) SYA157 NO! / ( P ANKL A7,/FFF GET DISPLACEM. IN PAGE / P XIF / P IFF CREDIT=0 / 0 P ST A7,SAVE12,A13 SAVE (
0x172448…1725dc Dummy {f00=0x0074, f01=0x0190, f02=» / $ P* CALCULATE DDIV FROM-ADDRESS * 0 P 0 2 P LD A1,SCTLAC GET S:GTAB 0 : * P ST A1,SAVE13,A13 SAVE S:GTAB ADDRESS 0 Z & P ST A9,SCTLAC SAVE START OF P:MTAB 0 P IFT CREDIT-MMUPAG=1 0 ( P LD A3,NUMSEG,A1 NUMBER OF SEGMENTS 0 P XIF 0 P I
0x1725dc…172770 Dummy {f00=0x0074, f01=0x0190, f02=»ORD LENGTH 0 p P CALL MULT 1 P ADR A1,A3 1 $ & P ADK A1,NUMSEG+2 => START OF DDIV 1 6 2 P LD A2,SAVE04,A13 GET NEW RELOCATION INCREMENT 1 ` 0 P ADS A2,M:REL,A13 AND ADJUST RELOCATION BASE 1 P IFT CREDIT+MMUPAG=2 1 P 1 . P ST A1,SAVE04,A13 SAVE DDI
0x172770…172904 Dummy {f00=0x0074, f01=0x0190, f02=»0 1 " P SUR A6,A1 RELOCATION FOR DDIV 2 P EJECT 2 0 P 2 > P 2 F P 2 R 0 P* RELOCATE ADDRESSES IN T:ATAB AFTER MOVE * 2 ^ . P* CALCULATE TOTAL (=REAL) LENGTH * 2 . P* REMOVE NOT USED ENTRIES IN T:ATAB * 2 . P* A9=P:MTAB A6=M
0x172904…172a98 Dummy {f00=0x0074, f01=0x018e, f02=»S 2 ~ P 3 ( P LD A8,T:ATOD,A13 GET T:ATAB ADDRESS 3 P LDR* A3,A8 GET LENGTH 3 > P ADR A3,A8 END OF T:ATAB 3 P ST A3,ENDADD,A13 SAVE 3 | 0 P LD A5,SCTSFA GET START OF T:ATAB SHADOW-TAB 3 P LDR A4,A5 2:ND POINTER 3 & P LDR A2,A8 2:ND POINTER IN
0x172a98…172c2c Dummy {f00=0x0074, f01=0x018e, f02=» P 4 " PSYA160 ADKL A8,2 TAKE NEXT T:A 4 $ P ADK A5,2 NEXT T:A IN SHADOW-TAB 4 2 P CW A8,ENDADD,A13 4 Z P RF(E) SYA170 ALL DONE 4 t P LDR* A1,A8 GET T:A 4 * P LDR* A7,A5 GET CONTENTS OF SHADOW-TAB 4 , P RB(Z) SYA160 THIS T:A IS NOT USED!!!!! 4
0x172c2c…172dc0 Dummy {f00=0x0074, f01=0x0190, f02=» ( P ADK A2,2 UPDATE 2:ND T:ATAB ADDRESS 5 8 P STR A7,A4 STORE NUMBER OF T:A'S (EV. ON NEW PLACE) 5 0 P LDR* A10,A8 GET T:A-ADDRESS 5 l P ADR A10,A6 RELOCATE 5 . P STR A10,A2 STORE ADDR. (EV. ON NEW PLACE) 5 P* RELOCATE W.B.-ADDRESSES 5 P 5 $ P
0x172dc0…172f54 (1, 211) Dummy {f00=0x0074, f01=0x0190, f02=» SUK A7,1 DEC. COUNTER 5 P RB(N) SYA160 TAKE NEXT T:A 6 P ADRS A6,A1 RELOCATE 6 B P XIF 6 ^ P IFT CREDIT+MMUPAG=2 6 j P 6 P* INITIATE POINTERS 6 P 6 P LD A8,T:ATOD,A13 T:ATAB 6 P ELR A3,A8 GET LENGTH 6 P ADR A3,A8 END OF T:ATAB
0x172f54…1730e8 Dummy {f00=0x0074, f01=0x0190, f02=»D POINTER IN T:ATAB 6 & P LDK A3,2 SET 'NEW' T:ATAB COUNTER 7 . P SUR A11,A11 CLEAR REAL LENGTH ACCUMULATOR 7 F P 7 x P* SCAN T:ATAB: 7 P 7 " PSYA160 ADKL A8,2 TAKE NEXT T:A 7 $ P ADK A5,2 NEXT T:A IN SHADOW-TAB 7 P CW A8,ENDADD,A13 7 P R
0x1730e8…17327c Dummy {f00=0x0074, f01=0x018e, f02=»!!! 7 l " P ADR A11,A7 ACCUMULATE LENGTH 8 , P ADK A3,2 INCREMENT 'NEW' T:ATAB LENGTH 8 2 , P ADK A4,2 UPDATE 2:ND SHADOW-TAB ADDRESS 8 b ( P ADK A2,2 UPDATE 2:ND T:ATAB ADDRESS 8 8 P STR A7,A4 STORE NUMBER OF T:A'S (EV. ON NEW PLACE) 8 P ELR A10,A8 GE
0x17327c…173410 Dummy {f00=0x0074, f01=0x0190, f02=» 8 $ P EL A12,T:DAD,A1 GET T:D-ADDRESS 9 $ P EL A7,WATLEN,A12 LENGTH OF WAT 9 0 . P ADK A1,WATFST+2 ADD TO FIRST W.B.-ADDRESS 9 X PSYA165 SUK A7,1 DEC. COUNTER 9 P RB(N) SYA160 TAKE NEXT T:A 9 P ELR A10,A1 GET ADDRESS 9 P ADR A10,A6 RELOCATE 9
0x173410…1735a4 Dummy {f00=0x0074, f01=0x0190, f02=»T A6,MOVADD,A13 SAVE 9 8 P ST* A3,SCTSFA STORE NEW TABLE LENGTH IN SHADOW-TAB : P IFT CREDIT+MMUPAG=2 : X $ P ES* A3,T:ATOD,A13 AND IN T:ATAB : t P XIF : P IFT CREDIT-MMUPAG=1 : $ P ST* A3,T:ATOD,A13 AND IN T:ATAB : P XIF : P IFF CREDIT=0 :
0x1735a4…173738 Dummy {f00=0x0074, f01=0x018e, f02=»3 SAVE TOT. NUMBER OF T:A'S : P ; $ P EJECT ; 0 " P****************************** ; > $ P* RELOCATE ADDRESSES IN U:BTAB * ; d $ P* (REAL LENGTH=PROTOTYPE LEN.) * ; $ P******************************** ; P ; P IFT CREDIT-MMUPAG=1 ; $ P LD A5,U
0x173738…1738cc Dummy {f00=0x0074, f01=0x018e, f02=» ; ~ " PSYA180 RF(Z) SYA185 ALL DONE! < P ADRS A6,A5 RELOCATE < . P XIF < J P IFT CREDIT+MMUPAG=2 < V $ P LD A5,U:BTOD,A13 U:BTAB ADDRESS < r P ELR A3,A5 TABLE LENGTH < , P ST A3,SAVE06,A13 SAVE LENGTH OF U:BTAB < P ADK A5,2 < P SUK A3,2 SU
0x1738cc…173a60 Dummy {f00=0x0074, f01=0x0190, f02=» < P IFF CREDIT=0 = 8 P ADK A5,UP:REC ADD TO NEXT RECORD IN U:BTAB PROTOTYP = P SUK A3,UP:REC = Z P RB SYA180 = p P EJECT = PSYA185 EQU * = P IFT CREDIT+MMUSWB=3 = P* = $ P* COMPUTE REAL LENGTH OF S:BTAB = P* = $ P LD A5,S:BTO
0x173a60…173bf4 (1, 212) Dummy {f00=0x0074, f01=0x0190, f02=»F(Z) SYA199 ALL RECORDS SCANNED! = $ P EL A4,2,A5 GET PROT. W.B.-ADDR. > ( P ADR A4,A6 RELOCATE > P P ES A4,2,A5 STORE IT BACK > l , P EL A4,UPNUMB-1,A5 GET NUMBER OF COPIES > P ANK A4,/FF GET RIGHT BYTE > . PSYA192 RF(Z) SYA194 NO MOORE OF THIS TYP
0x173bf4…173d88 Dummy {f00=0x0074, f01=0x0190, f02=»RD IN S:BTAB PROTOTYPE > r $ P SUK A3,UP:REC DECREMENT LENGTH ? P RB SYA190 ? F P XIF ? X P IFT CREDIT+SWBMMU=2 ? d $ P LD A5,S:BTOD,A13 S:BTAB ADDRESS ? * P LDR* A3,A5 LENGTH OF S:BTAB PROTOTYPE ? P LDR A2,A3 SAVE ? " P SUK A3,2 EXCLUDE LENGTH W
0x173d88…173f1c Dummy {f00=0x0074, f01=0x0190, f02=»,A5 STORE IT BACK ? , P LD A4,UPNUMB-1,A5 GET NUMBER OF COPIES @ P ANK A4,/FF @ J . PSYA196 RF(Z) SYA198 NO MOORE OF THIS TYPE! @ ^ P ADK A2,2 INCREMENT LENGTH @ ( P SUK A4,1 DECREMENT NUMBER OF COPIES @ P RB SYA196 @ 8 PSYA198 ADK A5,UP:REC NEX
0x173f1c…1740b0 Dummy {f00=0x0074, f01=0x0190, f02=»A199 ST A2,SAVE25,A13 SAVE COMPUTED LENGTH @ P XIF A 2 P IFT CREDIT=1 A > P EJECT A T P A b 6 P* RELOCATE T:ATAB- AND U:BTAB-ADDRESSES IN P:MTAB A j P A P ADS A6,T:ATOD,A13 A P ADS A6,U:BTOD,A13 A P IFT CREDIT+SWPBLK=2 A P ADS A6,
0x1740b0…174244 Dummy {f00=0x0074, f01=0x0190, f02=»D-START A | $ P AD A5,SAVE12,A13 ADD NEW START B P ST A5,DATEND,A13 SAVE B 8 P XIF B V P IFT CREDIT+MMUPAG=2 B b P B ~ P B P* STORE MMTABLE ADDRESSES B P B P LDK A4,MMDDIV B " P ADR A4,A13 GET TABLE ADDRESS B & P LDR A5,A13 CALC. RE
0x174244…1743d8 Dummy {f00=0x0074, f01=0x0190, f02=»DK A4,MMTAB B $ P ADR A4,A13 'WORK-TABLE' ADDRESS C P SUR A4,A5 RELOCATE C < P ST A4,MMFROM,A13 C X P* CALCULATE DDIV END C r P C P LDR A5,A9 DDIV END C P SU A5,SAVE04,A13 ENT-START C $ P AD A5,SAVE12,A13 ADD NEW START C P LDR A6,A5
0x1743d8…17456c Dummy {f00=0x0074, f01=0x0190, f02=»DRESS C l P ADR A6,A13 RELOCATE D & P LDR* A6,A6 GET MM-TABLE CONTENTS D * P ST A6,FSTPAG,A13 SAVE D T " P ANKL A5,/FFF GET DISPLACEMENT D r P ST A5,FSTADR,A13 AND SAVE D P XIF D P IFF CREDIT=0 D P* CONTINUE IN PART 2 * D P D . P L
0x17456c…174700 Dummy {f00=0x0074, f01=0x0190, f02=»EXECUTION START ADDRESS D | P ADR A7,A2 E " P LDKL A3,LENGT2 SYSLDA LENGTH E 2 P LDR A1,A13 FROM-ADDRESS E X P E x P* MOVE SYSLDA * E P E P IFT CREDIT-MMUPAG=1 E PNXTMOV LDR* A4,A1 GET WORD E P STR A4,A2 STORE WORD E P ADK A1,2 E
0x174700…174894 (1, 213) Dummy {f00=0x0074, f01=0x40e4, f02=» E P IFF CREDIT=0 F P F * P ABR A7 HEJ SVEJS! VI SES I PART 2... F & P XIF F T P IFT CREDIT=0 F ` P LDKL A1,LMP9 F v $ P CALL ERROR INCONSISTENT MONITOR F P XIF F PLDAEND EQU * F P END F @ F
0x174894…174a28 Dummy {f00=0x0074, f01=0x2008, f02=» G -ADDRESS w v PHINKAS SUK A1,1 DEC. COUNTER x P RB(N) HINKA TAKE NEXT T:A x < P ADRS A6,A2 RELOCATE x ^ P ADK A2,4 NEXT W.B. x z P RB HINKAS x P x PSTICK EQU * x P* CONTINUE IN PART 2 * x P x P LDKL A1,START2 x " P A
0x174a28…174bbc Dummy {f00=0x0074, f01=0x0190, f02=» P DATA 0 QUEUE P DATA 0 SECOND QUEUE P* 6 P IFT ACKMUL=1 @ P* V P DATA 0 NAK-ACKUMULATOR ` $ P DATA 0 RETR. FAULT-ACKUMULATOR , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR P*
0x174bbc…174d50 Dummy {f00=0x0074, f01=0x0190, f02=»ST OUTPUT DWT P DATA 0 LAST OUTPUT WORD P DATA INTLT2 INTERRUPT TABLE 6 P INR A2,0,DWA2 INR Z P OTR A2,0,DWA2 OTR t P CIO A2,1,DWA2 CIO-START " P DATA 0 RETRANSMISSION COUNTER P DATA 0 QUEUE P DATA 0 SECOND QUEUE P*
0x174d50…174ee4 Dummy {f00=0x0074, f01=0x0190, f02=»RUPT-ACKUMULATOR x ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR P* D P XIF N P* Z P IFT LOCHAN=4 d P* z P* P* PDWA2 EQU /13 DEVICE ADDRESS P* P DATA 0 LAST OUTPUT DWT P DATA 0 LAST OUTPUT WORD P D
0x174ee4…175078 Dummy {f00=0x0074, f01=0x0190, f02=»SION COUNTER ~ P DATA 0 QUEUE P DATA 0 SECOND QUEUE * P* F P IFT ACKMUL=1 P P* f P DATA 0 NAK-ACKUMULATOR p $ P DATA 0 RETR. FAULT-ACKUMULATOR , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR ( P DATA 0 PRINTER TIMEOUT ACKUMULA
0x175078…17520c Dummy {f00=0x0074, f01=0x0190, f02=» : P* C W T L T 3 * : P***************************************************** B P* 4 P* CONTROL WORK TABLE FOR LOCAL CHANNEL NO. 3 P* PCWTLT3 EQU * P* P IFT LOCHAN=3 P*
0x17520c…1753a0 Dummy {f00=0x0074, f01=0x0190, f02=»A INTLT3 INTERRUPT TABLE P INR A2,0,DWA3 INR P OTR A2,0,DWA3 OTR : P CIO A2,1,DWA3 CIO-START T " P DATA 0 RETRANSMISSION COUNTER t P DATA 0 QUEUE P DATA 0 SECOND QUEUE P* P IFT ACKMUL=1 P* P DATA 0 NAK-ACKUMU
0x1753a0…175534 (1, 214) Opaque[0x194]
0x175534…1756c8 # DirEnt {nam=»LDTASK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0ea0, f03=0x0000}
0x175534…1756c8 IdxSect {
0x175534…1756c8 f00 = 0x0075 // 0x175534 @0x0
0x175534…1756c8 f01 = 0x000c // 0x175536 @0x2
0x175534…1756c8 gno = [ // 0x175538 @0x4
0x175534…1756c8 [0x00]: C0x0075.0x0.0
0x175534…1756c8 [0x01]: C0x0075.0x1.0
0x175534…1756c8 [0x02]: C0x0075.0x2.0
0x175534…1756c8 [0x03]: C0x0075.0x3.0
0x175534…1756c8 [0x04]: C0x0076.0x0.0
0x175534…1756c8 [0x05]: C0x0076.0x1.0
0x175534…1756c8 ]
0x175534…1756c8 }
0x1756c8…17585c Dummy {f00=0x0075, f01=0x018e, f02=» 2 P IDENT LDTASK REL 9.2 79-12-06 870105040920 P : ( P =2, DEVICE TABLE LENGTH DATA WORD B P REL 9.2 79-11-16 n " P =1, QLTASK RETURN IN ENABLE P REL 9.1 79-05-23 P* 6 P**************************************************
0x17585c…1759f0 Dummy {f00=0x0075, f01=0x018e, f02=» 6 P************************************************** P* > P* H * P* THIS MODULE CONTAINS THE LOAD TASK R 0 P* USED IN TOSS MEMORY MANAGEMENT SYSTEMS. P* & P* IT CONTAINS TWO ENTRY POINTS: P* . P* - LT:DSK USED IN
0x1759f0…175b84 Dummy {f00=0x0075, f01=0x0190, f02=» P* P*********** P* ENTRIES * & P*********** : P* N P* X $ P ENTRY LT:DSK DISC PAGING ENTRY b , P ENTRY LT:SWB SWAPPABLE WORK BLOCK ENTRY P ENTRY TTABLD LOAD TASK TTAB 2 P ENTRY QLTDSK ACTIVATE LDTASK AT ENTRY LT:
0x175b84…175d18 Dummy {f00=0x0075, f01=0x0190, f02=» P* P************* P* EXTERNALS * ( P************* > P* T P* ^ " P EXTRN TLDS15 ENTRY IN TLDSEG h " P EXTRN TLDS20 ENTRY IN TLDSEG " P EXTRN MEXIT MONITOR TASK EXIT 4 P EXTRN LKMERR HALT SYSTEM DUE TO FATAL LKM ERR
0x175d18…175eac Dummy {f00=0x0075, f01=0x0190, f02=» PAG:QB QUEUE LINK BACKWARDS P EXTRN PAG:PA PAGE ADDRESS $ ( P EXTRN PAG:SB SEGMENT BLOCK ADDRESS F & P EXTRN SEG:DS DISC SECTOR ADDRESS r P EXTRN SEG:EL SEGMENT LENGTH $ P EXTRN SEG:PB PAGE BLOCK ADDRESS 4 P EXTRN SWB:DS DISC SECTOR ADDRES
0x175eac…176040 Dummy {f00=0x0075, f01=0x0190, f02=»S r P EXTRN ECBRC ECB RETURN CODE " P EXTRN ECBCW ECB CONTROL WORD . P EXTRN TTB:SA TTAB SAVE AREA T P EXTRN TTB:MT MMU TABLE x ( P EXTRN TTB:SB SEGMENT BLOCK ADDRESS ( P EXTRN SCTPLD PROGRAM LOADING DEVICE P EXTRN SCTPSZ PAGE SIZE
0x176040…1761d4 (1, 215) Dummy {f00=0x0075, f01=0x0190, f02=» . P***************************************** P* 6 P* CONDITIONAL ASSEMBLY @ P* ^ . P***************************************** h P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P*
0x1761d4…176368 Dummy {f00=0x0075, f01=0x018e, f02=»852 EQU 0. p P* PCPU852 EQU 0 P* 0 P* : 6 P* A PROGRAM VERSION INCLUDING TOSS SWAPPABLE WORK D 2 P* BLOCKS IS OBTAINED BY SETTING SWPBLK EQU 1. ~ P* PSWPBLK EQU 0 P* * 4 P* A PROGRAM VERSION USING TOSS ASS
0x176368…1764fc Dummy {f00=0x0075, f01=0x018e, f02=» " P* LDTASK ECB AND BUFFER AREAS P* . 4 PLD:ECB DATA 0,0,410,0,0,0 ECB AREA FOR LOAD TASK 8 P* p 4 PLD:BUF RES 205 INTERMEDIATE BUFFER FOR LOAD TASK z P* & P RES 2 LOAD TASK STACK (ONE LEVEL) ( PLD:STB EQU *-2 LOAD TASK STACK BAS
0x1764fc…176690 Dummy {f00=0x0075, f01=0x0190, f02=» t P* P IFT MMUPAG=1 P RES 16 LDTASK MMU TABLE ( P XIF H P* T " P DATA 0 SEGMENT BLOCK ADDRESS ^ P* PTTABLD EQU * TTABLD ENTRY " P DATA 0 DISPATCHER QUEUE LINK " P DATA '#L' TASK IDENTIFICATION P DATA 49 PRI
0x176690…176824 Dummy {f00=0x0075, f01=0x0190, f02=»0,0,0,0,0,0,0 REGISTER SAVE AREA, A1-A14 P DATA 0,0,0,0,0,0,0 0 " P DATA 2 DEVICE TABLE LENGTH =2 L P* r P EJECT LDTASK | P* P* P********** P* LT:DSK * P********** P* P* D P* LT:DSK PERFORMS LO
0x176824…1769b8 Dummy {f00=0x0075, f01=0x0190, f02=»OF CALLING TASK r P* P* " * PLT:DSK EQU * LDTASK DISC PAGING ENTRY , 4 P LD A13,TTB:SA+26,A3 GET A13 FROM TTAB SAVE AREA Z , P LDKL A5,TTABLD GET LDTASK TTAB ADDRESS " P LDR* A2,A1 GET SEGMENT STATUS . P RF(NN) LTD:05 SEGMENT NOT LOADE
0x1769b8…176b4c Dummy {f00=0x0075, f01=0x0190, f02=»A3 SAVE A3 P LDR A5,A3 , P LD A1,SEG:PB,A1 GET PAGE BLOCK ADDRESS $ P CF A15,TLDS15 T 0 P LDR A5,A7 GET TTAB ADDRESS OF CALLING TASK j P ABL LTD:80 P* P EJECT LDTASK P* 6 P* NO PAGE AVAILABLE. PAUSE LDTASK UNTIL RE
0x176b4c…176ce0 Dummy {f00=0x0075, f01=0x0190, f02=» LKM P DATA 5 PAUSE LDTASK P* ( P* GET ONE PAGE FROM PAGQUE 2 P* T PLTD:05 EQU * ^ P LD A2,PAGQUE+2 r P CWK A2,PAGQUE $ P RB(E) LTD:00 NO PAGE AVAILABLE? P* P EJECT LDTASK P* $ P* TAKE FOUND PAGE OU
0x176ce0…176e74 (1, 216) Dummy {f00=0x0075, f01=0x0190, f02=»A2 GET PAGQUE ADDRESS AND UPDATE... 4 P STR A12,A4 ...QUEUE LINK FORWARD FOR NEXT BLOCK , 4 P CMR A2 RESET QUEUE LINK FORWARD OF REMOVED BLK d , P LDKL A6,/4000 SEGMENT UNDER LOADING BIT 2 P LD A4,PAG:SB,A2 GET OLD SEGMENT BLOCK ADDRESS P RF(Z)
0x176e74…177008 Dummy {f00=0x0075, f01=0x0190, f02=»EG:PB,A1 SET NEW PAGE BLOCK ADDRESS 2 P ST A1,PAG:SB,A2 SET NEW SEGMENT BLOCK ADDRESS , P* b P IFT MMUPAG=1 l P* 2 P* UPDATE MMU TABLE FOR CALLING TASK AND LDTASK P* P INH 2 P MS 3,TTB:SA+2,A5 SAVE A1-A3 IN TTAB SAVE AREA
0x177008…17719c Dummy {f00=0x0075, f01=0x0190, f02=»ADDRESS OF LDTASK . P CF A15,TLDS20 UPDATE MMU TABLE FOR LDTASK 6 P TS TTB:MT,A3 STORE NEW MMU TABLE FOR CALLING TASK L P ENB P XIF P* P EJECT LDTASK P* $ P* PREPARE FOR READING OF SEGMENT P* ( P LD A6,SEG:E
0x17719c…177330 Dummy {f00=0x0075, f01=0x0190, f02=»O WORDS v 0 P LDR A5,A3 GET TTAB ADDRESS OF CALLING TASK 0 P LD A3,PAG:PA,A2 GET PAGE ADDRESS (PHYSICAL) D . P LD A2,SEG:DS,A1 GET SEGMENT DISC ADDRESS x * P LDR A9,A1 SAVE SEGMENT BLOCK ADDRESS 0 P LDR A11,A5 INDICATE DISC PAGING (A11 <> 0)
0x177330…1774c4 Dummy {f00=0x0075, f01=0x0190, f02=»BY LT:SWB x P LDK A7,/91 PHYSICAL READ P* 4 P* SET ECB PARAMETERS > P* Z & PLTD:40 EQU * ENTRY USED BY LT:SWB d , P LDKL A14,LD:STB LOAD LDTASK STACK BASE & P LDKL A8,LD:ECB GET LD:ECB ADDRESS P ST A2,ECBCW,A8 P*
0x1774c4…177658 Dummy {f00=0x0075, f01=0x0190, f02=»CBBA,A8 SET BUFFER ADDRESS P RF LTD:60 " P XIF 4 P* @ P EJECT LDTASK J P* b P* l P IFT ASSOLY=1 v , P LD A2,SCTPLD GET PROGRAM DISC FILE CODE P STR A2,A8 . P LDKL A1,LD:BUF GET LDTASK BUFFER ADDRESS P ST A1,E
0x177658…1777ec Dummy {f00=0x0075, f01=0x0190, f02=» A11,A11 CHECK DISC PAGING/SWB FLAG ( P RF(NZ) LTD:43 DISC PAGING REQUEST? , P* X P EJECT LDTASK b P* z P* , P LDR A12,A3 SAVE LOGICAL BUFFER ADDRESS 2 P ECR A2,A3 CONVERT LOGICAL ADDRESS TO PHYSICAL P ANKL A3,/FFF
0x1777ec…177980 Dummy {f00=0x0075, f01=0x0190, f02=»RESS j P SRL A2,2 P ECR A1,A2 P ANK A2,/0F 0 P SRC A2,4 D P ORR A3,A2 V P RF(NZ) LTD:48 h P SUKL A1,/1000 ~ P RF LTD:48 P* PLTD:43 EQU * P XIF P* P IFT MMUPAG=1 P LDR A1,A3 P SRL A
0x177980…177b14 (1, 217) Dummy {f00=0x0075, f01=0x0190, f02=»QU * P LDR A12,A3 6 P ANKL A12,/FFF CONVERT PHYSICAL ADDRESS TO LOGICAL P OR A12,SCTLAP Z P* p PLTD:48 EQU * z P SUK A3,2 & P ST A3,ECBBA,A8 SET BUFFER ADDRESS P ANKL A1,/3000 , P OR A1,SCTPLD GET PROGRAM DISC FILE CODE
0x177b14…177ca8 Dummy {f00=0x0075, f01=0x0190, f02=» P* $ P* MOVE FIRST SECTOR TO PAGE AREA P* 6 P LDKL A1,LD:BUF+2 @ P LDR A2,A12 Z P LDKL A3,376 n & P MVSU A3 MOVE FIRST SECTOR TO PAGE P SUKL A12,2 P XIF P* P EJECT LDTASK P* P* PLTD:50
0x177ca8…177e3c Dummy {f00=0x0075, f01=0x0190, f02=»SSOLY=1 P LDK A1,188 P XIF $ P* 0 2 P SUR A6,A1 GET REMAINING LENGTH OF SEGMENT/SWB : 2 P RF(NP) LTD:75 SEGMENT/SWB HANDLING FINISHED? p , P SUR A4,A1 GET REMAINING LENGTH OF PAGE P ADR A1,A1 ( P ADR A12,A1 UPDATE PAGE AREA POI
0x177e3c…177fd0 Dummy {f00=0x0075, f01=0x0190, f02=»FFER ADDRESS v P RF LTD:60 P* & PLTD:55 EQU * 0 * P ADS A1,ECBBA,A8 UPDATE BUFFER ADDRESS D P RF(N) LTD:60 NOT OVERFLOW? r & P LDKL A1,/1000 OVERFLOW CORRECTION P ADRS A1,A8 P XIF P* P IFT MMUPAG=0 * P ADS A1,
0x177fd0…178164 Dummy {f00=0x0075, f01=0x0190, f02=»CHECK REMAINING LENGTH OF PAGE 8 P RF(L) LTD:65 NOT ROOM FOR ONE MORE SECTOR IN PAGE? & P* b P IFT MMUPAG=1 l : P ELR A10,A12 SAVE WORD TO BE DESTROYED BY DISC CYL-ID ( P CF A14,LTD:85 READ/WRITE ONE SECTOR $ P ESR A10,A12 RESTORE SAVED W
0x178164…1782f8 Dummy {f00=0x0075, f01=0x0190, f02=» CF A14,LTD:85 READ/WRITE ONE SECTOR $ P STR A10,A12 RESTORE SAVED WORD , P RB LTD:50 T P XIF f P* r P EJECT LDTASK | P* . P* NOT ROOM ENOUGH IN PAGE FOR LAST SECTOR: 0 P* READ IT TO MEMORY VIA INTERMEDIATE BUFFER P*
0x1782f8…17848c Dummy {f00=0x0075, f01=0x0190, f02=»ATE BUFFER NOW IN SYSTEM AREA , P CF A14,LTD:85 READ ONE SECTOR TO LD:BUF & P ADK A1,2 SKIP CYLINDER ID V P LDR A2,A12 GET PAGE POINTER x P ADK A2,2 & P ADR A6,A6 CONVERT LENGTH TO BYTES P* P IFT MMUPAG=1 2 P MVSU A6 MOVE LA
0x17848c…178620 Dummy {f00=0x0075, f01=0x0190, f02=» STR A10,A2 ( P ADK A1,2 INCREMENT BUFFER POINTERS P ADK A2,2 @ P SUK A6,2 DECREMENT COUNTER R P RB(P) LTD:70 v P XIF P* P EJECT LDTASK P* P* PLTD:75 EQU * P IFT SWPBLK=1 , P LDR A11,A11 CHE
0x178620…1787b4 (1, 218) Dummy {f00=0x0076, f01=0x0190, f02=»OADED b P XRRS A4,A9 P* " PLTD:80 EQU * , , P CF A15,QTJOB QUEUE TASK FOR DISPATCHING @ & P ABL MEXIT PERFORM EXIT ON LDTASK p P* P EJECT LDTASK P* P* READ ONE SECTOR FROM DISC P* PLTD:85 EQU * P
0x1787b4…178948 Dummy {f00=0x0076, f01=0x0190, f02=» P RTN A14 NO, RETURN P* ( P* ERROR: INSERT PAGE IN PAGQUE AGAIN * P* V PLTD:95 ANK A2,1 ` P NGR A2,A2 x . P SUK A2,2 ERROR, SET RETURN CODE -2 OR -3 . P ST A2,TTB:SA+14,A5 SET RETURN CODE IN A7 P* P IFT SWPBLK=1
0x178948…178adc Dummy {f00=0x0076, f01=0x0190, f02=»ENT BLOCK ADDRESS x , P LD A3,SEG:PB,A9 GET PAGE BLOCK ADDRESS & P LDKL A4,PAGQUE GET PAGQUE ADDRESS J P ST A4,PAG:QB,A3 t 4 P LDR* A4,A4 GET ADDRESS OF FIRST BLOCK IN PAGQUE " P STR A4,A3 UPDATE QUEUE LINKS P ST A3,PAGQUE P ST A3,P
0x178adc…178c70 Dummy {f00=0x0076, f01=0x0190, f02=»* P********** ! P* QLTDSK * ! P* QLTSWB * ! . P********** ! @ P* ! R P* ! : P* THIS ROUTINE PERFORMS ACTIVATION OF THE LOAD TASK. ! f P* ! : P* ACTIVATION IS AT LT:DSK WHEN DISC PAGING REQUEST. ! B P* ACTIVATION IS AT LT:SWB
0x178c70…178e04 Dummy {f00=0x0076, f01=0x0190, f02=»LOCK ADDRESS (LT:SWB) ! t 2 P* A3 = TTAB ADDRESS OF CALLING TASK " P* " T $ P* OUTPUT: A2, A5 ARE DESTROYED " ^ P* " P* " 0 PQLTSWB EQU * ACTIVATE LDTASK AT ENTRY LT:SWB " ( P LDKL A2,LT:SWB GET DISPATCH ADDRESS " P RF QLTASK "
0x178e04…178f98 Dummy {f00=0x0076, f01=0x0190, f02=» , P LDKL A5,TTABLD GET LDTASK TTAB ADDRESS # " P ABL ACTOT ACTIVATE LDTASK =1 # 4 P* # Z P EJECT LDTASK # d P* # | P* # P IFT SWPBLK=1 # P* # P* # P********** # P* LT:SWB * # P********** # P* # P* # D P*
0x178f98…17912c Dummy {f00=0x0076, f01=0x018e, f02=» A3 = TTAB ADDRESS OF CALLING TASK # P* $ 2 P* $ < * PLT:SWB EQU * LDTASK SWB HANDLING ENTRY $ F P IFT MMUPAG=1 $ t P INH $ , P LDKL A5,TTABLD GET LDTASK TTAB ADDRESS $ , P TL TTB:MT,A3 LOAD MMU WITH CALLING TASK $ , P TS TTB:MT,A5 STOR
0x17912c…1792c0 Dummy {f00=0x0076, f01=0x0190, f02=» 0 P LDR A5,A3 GET TTAB ADDRESS OF CALLING TASK % 4 P LD A3,TTB:SA+16,A5 GET MEMORY ADDRESS (LOGICAL) % 8 4 P LD A4,SWB:DS,A1 GET DISC ADDRESS OF FIRST COPY % p 0 P LD A6,SWB:EL,A1 GET SWB COPY LENGTH (BYTES) % 2 P LD A2,SWB:NS,A1 GET SWB COPY LENGTH (SECTOR
0x1792c0…179454 (1, 219) Dummy {f00=0x0076, f01=0x018e, f02=»* % P* & PLTS:10 EQU * & P SUK A1,1 & ( P* & : P IFT CPU852=1 & D P RF(NP) LTS:20 & Z 4 P ADR A4,A2 COMPUTE DISC ADDRESS OF REQUESTED SWB & p P RB LTS:10 & P* & PLTS:20 EQU * & 0 P LDR A2,A4 GET DISC ADDRESS OF REQUESTED SWB &
0x179454…1795e8 Dummy {f00=0x0076, f01=0x0190, f02=» & P XIF ' P* ' P IFT SWPBLK=1 ' P ADK A6,1 ' 4 * P SRL A6,1 CONVERT SWB LENGTH TO WORDS ' F P LDR A4,A6 ' t . P ANK A7,1 GET LOAD/STORE SWB REQUEST FLAG ' $ P ABL(Z) LTD:35 LOAD SWB REQUEST? ' : P LDKL A4,/7FFF PARAMETER TO AVOID INTERM
0x1795e8…17977c Dummy {f00=0x0076, f01=0x406e, f02=» , PLT:SWB ABL LKMERR INDICATE SYSGEN ERROR ( P XIF ( 4 P* ( @ P* ( J P* ( T END ( ^@ ( j F P LDR A4,A6 ' t . P ANK A7,1 GET LOAD/STORE SWB REQUEST FLAG ' $ P ABL(Z) LTD:35 LOAD SWB REQUEST? ' : P LDKL A4,/7FFF PARAMETER TO AVOID INTERM
0x17977c…179910 Dummy {f00=0x0076, f01=0x2008, f02=» ) NT LDTASK PRR 9.1 79-01-17 870105040910 END <@ H* L 6 P************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TLDSEG = LOAD SEGMENT P* P* P*
0x179910…179aa4 Dummy {f00=0x0076, f01=0x0190, f02=»*** ) r & P* * * & P* SUBROUTINE-HANDLER * * 6 & P* * * ` & P********************************* * P * PSUBSUB EQU *-REL * " PSUBBA ST A10,MUL,A13 SAVE A10 * . P LD* A10,4,A14
0x179aa4…179c38 Dummy {f00=0x0076, f01=0x0190, f02=»N * f P STR A10,A14 PUT ON STACK + P LD A10,MUL,A13 RESTORE A10 + , P ABR* A14 + P P + b P + j P + r < P******************************************************* + z < P* JUMP TO SYSLDM (FROM SYSLOD) ALWAYS VIA THIS MODULE * + < P**************
0x179c38…179dcc Dummy {f00=0x0076, f01=0x0190, f02=»******** + t ( P** ** , ( P** SAVE, AND COMMUNICATION AREA ** , < ( P** ** , h ( P************************************ , P , * PT:ATOD EQU *-REL T:ATAB 'OLD' ADDRESS , P DATA 0 , *
0x179dcc…179f60 Dummy {f00=0x0076, f01=0x0190, f02=»-REL U:BTAB NEW ADDRESS , P DATA 0 - ( PS:BTOD EQU *-REL S:BTAB OLD ADDRESS - 0 P DATA 0 - ( PS:BTNW EQU *-REL S:BTAB NEW ADDRESS - l P DATA 0 - . PMOVADD EQU *-REL ADDRESS-CHANGE AFTER MOVE - P DATA 0 - 4 PMOVED EQU *-REL INDICATOR IF B
0x179f60…17a0f4 (1, 220) Opaque[0x194]
0x17a0f4…17a288 # DirEnt {nam=»PFTAB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0ed0, f03=0x0000}
0x17a0f4…17a288 IdxSect {
0x17a0f4…17a288 f00 = 0x0076 // 0x17a0f4 @0x0
0x17a0f4…17a288 f01 = 0x0002 // 0x17a0f6 @0x2
0x17a0f4…17a288 gno = [ // 0x17a0f8 @0x4
0x17a0f4…17a288 [0x00]: C0x0076.0x2.0
0x17a0f4…17a288 ]
0x17a0f4…17a288 }
0x17a288…17a41c Dummy {f00=0x0076, f01=0x0190, f02=» 0 P IDENT PFTAB REL 9.2 79-11-16 870105040920 P 8 P* @ P* J P* POWER FAIL TABLE T P* n D P* THIS TABLE HOLDS ADDRESSES TO MODULES THAT SHOULD BE EXECUTED x P* AFTER MASTER CLEAR P* P* P ENTRY PFTAB TABLE ENTRY
0x17a41c…17a5b0 Dummy {f00=0x0076, f01=0x0190, f02=» l P EXTRN FDON P EXTRN LPON JOS 77-05012 P EXTRN DUON DISC UNIT < 0 P EXTRN DMINIT DATA MANAGEMENT INITIALIZATION Z $ PPFTAB DATA PFTABE-* TABLE LENGTH P DATA DC15ON P DATA SOPR P* P DATA CHLTON P D
0x17a5b0…17a744 Dummy {f00=0x0076, f01=0x4018, f02=» P END @ P EXTRN LPON JOS 77-05012 P EXTRN DUON DISC UNIT < 0 P EXTRN DMINIT DATA MANAGEMENT INITIALIZATION Z $ PPFTAB DATA PFTABE-* TABLE LENGTH P DATA DC15ON P DATA SOPR P* P DATA CHLTON P D
0x17a744…17a8d8 Dummy {f00=0x0076, 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
0x17a8d8…17aa6c Dummy {f00=0x0076, f01=0x0190, f02=» v P EXTRN IHDU1 DISC UNIT NO. 1 $ P EXTRN ILLINT ILLEGAL INTERRUPT , P EXTRN HALT HALT ROUTINE T P* EXTRN BUG DEBUGGER t PX:A EQU 0 MONITOR OPTION ( PX:B EQU 0 DATA MAN .TASKS IN SYSTEM * PX:C EQU 0 DM INDEX RECORD BUFFER SIZE &
0x17aa6c…17ac00 Dummy {f00=0x0076, f01=0x0190, f02=»DISPLACEMENTS IN SEGTAB, PAGTAB, SWBTAB AND T:A P* 8 PSEG:ST EQU 0 STATUS B $ PSEG:DS EQU 2 DISC SECTOR ADDRESS ^ " PSEG:EL EQU 4 EFFECTIVE LENGTH $ PSEG:PB EQU 6 PAGE BLOCK ADDRESS P* & PPAG:QF EQU 0 QUEUE POINTER FORWARD ( P
0x17ac00…17ad94 (1, 221) Opaque[0x194]
0x17ad94…17af28 # DirEnt {nam=»LKMAL «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0ed8, f03=0x0000}
0x17ad94…17af28 IdxSect {
0x17ad94…17af28 f00 = 0x0076 // 0x17ad94 @0x0
0x17ad94…17af28 f01 = 0x0002 // 0x17ad96 @0x2
0x17ad94…17af28 gno = [ // 0x17ad98 @0x4
0x17ad94…17af28 [0x00]: C0x0076.0x3.0
0x17ad94…17af28 ]
0x17ad94…17af28 }
0x17af28…17b0bc Dummy {f00=0x0076, f01=0x0190, f02=» 0 P IDENT LKMAL REL 9.2 79-11-16 870105040920 P 8 P* @ $ P* LINK TO MONITOR REQUEST TABLE J @ P* THIS TABLE HOLDS INFORMATION ABOUT MODULES THAT HANDLE THE r ( P* DIFFERENT LINK TO MONITOR REQUESTS P* 2 P ENTRY LKMAL TABLE ENTRY CON
0x17b0bc…17b250 Dummy {f00=0x0076, f01=0x0190, f02=» EXTRN TACTOT ACTIVATE OTHER TERMINAL P EXTRN TPAUSE PAUSE TERMINAL . P EXTRN TIMER TIMER R P EXTRN TMWAIT MULTIPLE WAIT l & P EXTRN TLUSEG LOCK/UNLOCK SEGMENT P EXTRN TLDSEG SEGMENT TLDSEG P EXTRN TABORT ABORT FUNCTION , P EXTRN
0x17b250…17b3e4 Dummy {f00=0x0076, f01=0x0190, f02=» P EJECT P* $ PLKMAL DATA LKMALE-* TABLE LENGTH P DATA TIO TERMINAL I/O D P DATA TWAIT TERMINAL WAIT b P DATA TEXIT TERMINAL EXIT ( P DATA TACTOT ACTIVATE OTHER TERMINAL P DATA TPAUSE TERMINAL PAUSE P DATA TIMER TIMER
0x17b3e4…17b578 Dummy {f00=0x0076, f01=0x413c, f02=» FUNCTION ~ P DATA 0 P DATA 0 . P DATA 0 J P DATA 0 f * P DATA TASS ASSIGN FILE CODE AND INDEX P DATA IXTASS P DATA TCHPAG CHANGE MMU PAGE " P DATA TCHMMU CHANGE MMU TABLE
0x17b578…17b70c Dummy {f00=0x0076, 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
0x17b70c…17b8a0 Dummy {f00=0x0076, f01=0x0190, f02=» x " P* 2 = NO FREE ENTRY IN TABLE P* 3 = NO FDB AVAILABLE . ( P* 4 = ONE OR MORE VOLUMES UNKNOWN N " P* 5 = FILE CODE ALREADY USED z P* 6 = FILE NAME UNKNOWN 0 P* 7 = FILE SECTION MISSING OR FOUND TWICE P* 8 = FAULTY DIS
0x17b8a0…17ba34 (1, 222) Opaque[0x194]
0x17ba34…17bbc8 # DirEnt {nam=»CTABX «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0ee0, f03=0x0000}
0x17ba34…17bbc8 IdxSect {
0x17ba34…17bbc8 f00 = 0x0077 // 0x17ba34 @0x0
0x17ba34…17bbc8 f01 = 0x0002 // 0x17ba36 @0x2
0x17ba34…17bbc8 gno = [ // 0x17ba38 @0x4
0x17ba34…17bbc8 [0x00]: C0x0077.0x0.0
0x17ba34…17bbc8 ]
0x17ba34…17bbc8 }
0x17bbc8…17bd5c Dummy {f00=0x0077, f01=0x0190, f02=» 0 P IDENT CTABX REL 9.2 79-11-16 870105040920 P 8 P* @ P* CODE CONVERSION TABLE J P* l P* v P ENTRY CTABX P* P* * PC0 EQU 0 CODE CONVERSION COLUMN NO. 0 ( PC1 EQU 0 1 ( PC2 EQU
0x17bd5c…17bef0 Dummy {f00=0x0077, f01=0x4142, f02=» 5 ( PC6 EQU 0 6 " ( PC7 EQU 0 7 N P* z P* P* PCTABX DATA C0 P DATA C1 P DATA C2 P DATA C3 P DATA C4 P DATA C5 P DATA C6
0x17bef0…17c084 Dummy {f00=0x0077, 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 @
0x17c084…17c218 Dummy {f00=0x0077, 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
0x17c218…17c3ac Dummy {f00=0x0077, f01=0x0190, f02=» DRFD01 P* P************* P* * 2 P* EXTERNALS * H P* * ^ P************* t P* P EXTRN TDISP DISPATCHER P EXTRN TENDIO ENDIO P EXTRN DISIOE REQUEST ERROR EXTRN DWTST STATUS
0x17c3ac…17c540 Dummy {f00=0x0077, f01=0x0190, f02=»EA A5 | & ! EXTRN DWTSB2 STACK BASE 2 IN DWT ( P EXTRN SCTPLD PROGRAM LOADING DEVICE 8 ( P EXTRN SAVE8 SAVE A1-A8 ON A15 STACK d P EXTRN SETIMP TIMER & P EXTRN INTSAV INTERRUPT SAVE AREA & P EXTRN INIFLG INITIALIZATION FLAG & P EXTRN T
0x17c540…17c6d4 (1, 223) Opaque[0x194]
0x17c6d4…17c868 # DirEnt {nam=»DVTKB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0ee8, f03=0x0000}
0x17c6d4…17c868 IdxSect {
0x17c6d4…17c868 f00 = 0x0077 // 0x17c6d4 @0x0
0x17c6d4…17c868 f01 = 0x0002 // 0x17c6d6 @0x2
0x17c6d4…17c868 gno = [ // 0x17c6d8 @0x4
0x17c6d4…17c868 [0x00]: C0x0077.0x1.0
0x17c6d4…17c868 ]
0x17c6d4…17c868 }
0x17c868…17c9fc Dummy {f00=0x0077, f01=0x0190, f02=» 0 P IDENT DVTKB REL 9.2 79-11-16 870105040920 P 8 " P* KEYBOARD DEVICE WORK TABLE @ P* f P ENTRY DVTKB TABLE ENTRY p P*** ( P EXTRN KBAD POINTER TO ADDRESSBLOCK P EXTRN ECH PMMUPAG EQU 0 P* PDVTKB EQU * TABL
0x17c9fc…17cb90 Dummy {f00=0x0077, f01=0x0190, f02=»ATA DWTEND-DVTKB ORDER ( P DATA KBAD POINTER TO ADDRESS BLOCK P DATA 'KB' TTAB-ADDRESS J $ P DATA 0 WAIT/ACTIVATE INDICATOR j P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB ADD
0x17cb90…17cd24 Dummy {f00=0x0077, f01=0x0190, f02=»ATA 0 SAVE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER 6 P DATA ECH ECHO DEVICE T $ P DATA /BCA BACKSPACE AND CANCEL r " P DATA /ED0 EOR AND DOUBLE ZERO 6 P DATA DWTSQ+DVTKB POINTER TO FIRST PLACE IN QUEUE 4 P DATA DWTSQ+DV
0x17cd24…17ceb8 Dummy {f00=0x0077, f01=0x40de, f02=»0,0,0 P IFT MMUPAG=1 PDEVECB EQU * $ P DATA 0,0,0,0,0,0 8 P DATA 0,0,0,0,0,0,0,0 R P DATA 0,0,0,0,0,0,0,0 p P DATA 0,0,0,0 P XIF PDWTEND EQU * P* P END @ IRST PLACE IN QUEUE 4 P DATA DWTSQ+DV
0x17ceb8…17d04c Dummy {f00=0x0077, 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
0x17d04c…17d1e0 Dummy {f00=0x0077, f01=0x417c, f02=» @ @ T T ! & 'T /P f H D ! 3 R 7 AV E OP _P$ kR { W PH P> P P R Q " H D ! P R R W Wr W T W P 'W 1P 9 IP g kQf n H D ! mR$ uP {R6 V2 P P8 R2 V. P T W T T W H D !
0x17d1e0…17d374 (1, 224) Opaque[0x194]
0x17d374…17d508 # DirEnt {nam=»DVTTP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0ef0, f03=0x0000}
0x17d374…17d508 IdxSect {
0x17d374…17d508 f00 = 0x0077 // 0x17d374 @0x0
0x17d374…17d508 f01 = 0x0002 // 0x17d376 @0x2
0x17d374…17d508 gno = [ // 0x17d378 @0x4
0x17d374…17d508 [0x00]: C0x0077.0x2.0
0x17d374…17d508 ]
0x17d374…17d508 }
0x17d508…17d69c Dummy {f00=0x0077, f01=0x0190, f02=» 0 P IDENT DVTTP REL 9.2 79-11-16 870105040920 P 8 4 P* DEVICE WORK TABLE FOR TELLER TERMINAL PRINTER @ P* x P ENTRY DVTTP TABLE ENTRY P* P* ( P EXTRN TPAD POINTER TO ADDRESS-BLOCK $ PMMUPAG EQU 0 MEM. MAN.UNIT COND.
0x17d69c…17d830 Dummy {f00=0x0077, f01=0x0190, f02=»ATA 0 ECB ADDRESS P DATA DWTEND-DVTTP ORDER ( P DATA TPAD POINTER TO ADDRESS BLOCK : P DATA 'TP' TTAB-ADDRESS f $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS
0x17d830…17d9c4 Dummy {f00=0x0077, f01=0x40ec, f02=»ATA 0,0,0,0 STACK P DATA 0 TIMER POINTER ( P DATA 0 REQUESTED,ACTUAL LINE NUMBER 8 P IFT MMUPAG=1 d PDEVECB EQU * z P DATA 0,0,0,0,0,0 P XIF PDWTEND EQU * P* P* P END @ VE AREA USER ECB ADDRESS
0x17d9c4…17db58 Dummy {f00=0x0077, 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
0x17db58…17dcec Dummy {f00=0x0077, f01=0x0190, f02=»EQUEST ERROR + P SUK A2,18 , P ABL(P) FD:DIS REQUEST ERROR , & P ADK A2,25 , J P SLL A2,3 BIO , P LDK A3,80 LENGTH , r P LDKL A4,BUF , P CF A5,FD:REA , P LDR A1,A3 RETURN CODE , P SLL A1,4 CHECK NO DATA BIT , P RF(NN) LOA:60 N
0x17dcec…17de80 Dummy {f00=0x0077, f01=0x0190, f02=»,A8 DATA SET LABEL SECTOR , P LDK A1,DWTDSS - " P CF A5,STDWT SAVE IN DWT - 8 P ADK A4,BOE BOE ADDRESS - X . P CF A5,LOGSEC TRANSFORM TO LOGICAL SECTOR - x P LDK A1,DWTBOE - $ P CF A5,STDWT STORE BOE NO IN DWT - P SUK A3,1 CRN - P LDK A1,DW
0x17de80…17e014 (1, 225) Opaque[0x194]
0x17e014…17e1a8 # DirEnt {nam=»DVTGP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0ef8, f03=0x0000}
0x17e014…17e1a8 IdxSect {
0x17e014…17e1a8 f00 = 0x0077 // 0x17e014 @0x0
0x17e014…17e1a8 f01 = 0x0002 // 0x17e016 @0x2
0x17e014…17e1a8 gno = [ // 0x17e018 @0x4
0x17e014…17e1a8 [0x00]: C0x0077.0x3.0
0x17e014…17e1a8 ]
0x17e014…17e1a8 }
0x17e1a8…17e33c Dummy {f00=0x0077, f01=0x0190, f02=» 0 P IDENT DVTGP REL 9.2 79-11-16 870105040920 P 8 , P* DEVICE WORK TABLE FOR GENERAL PRINTER @ P* p P ENTRY DVTGP TABLE ENTRY z P* P* ( P EXTRN GPAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 0 P* PDVTGP EQU * TABL
0x17e33c…17e4d0 Dummy {f00=0x0077, f01=0x0190, f02=»ATA DWTEND-DVTGP ORDER ( P DATA GPAD POINTER TO ADDRESS-BLOCK P DATA 'GP' TTAB-ADDRESS J $ P DATA 0 WAIT/ACTIVATE INDICATOR j P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB ADD
0x17e4d0…17e664 Dummy {f00=0x0077, f01=0x40e8, f02=»REA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER * " P DATA 0 HEAD POSITIPN POINTER H P IFT MMUPAG=1 n PDEVECB DATA 0,0,0,0,0,0 P XIF PDWTEND EQU * P* P* P END @ DATA DEVECB MMU ECB ADD
0x17e664…17e7f8 Dummy {f00=0x0077, 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
0x17e7f8…17e98c Dummy {f00=0x0077, f01=0x0190, f02=»A5,DSOPCH 3 P CMR A2 INDICATE NOT OPEN 4 P* 4 4 P* UNLOCK 4 > P* 4 R P XIF 4 PUNL:70 EQU * 4 h P LDK A2,/C UNLOCK 4 | P CF A5,FD:REA 4 P ORS A3,DWTRCW,A6 4 P ANK A3,1 4 , P RF(NZ) UNL:80 NOT OPERABLE,STILL LOCKED 4 P
0x17e98c…17eb20 Dummy {f00=0x0077, f01=0x0190, f02=»S+IBM=0 4 P* 5 P* UNLOAD RETURN CODE CHECK 5 P* 5 > PUNL:RC ORS A3,DWTRCW,A6 5 H P ANK A3,/7 FATAL ERROR? 5 h P RB(NZ) UNL:80 ENDIO 5 P RTN A5 5 P XIF 5 P IFT IBM=1 5 P EJECT DRFD01 5 P* 5 P*******************
0x17eb20…17ecb4 (1, 226) Opaque[0x194]
0x17ecb4…17ee48 # DirEnt {nam=»DVTDI «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f00, f03=0x0000}
0x17ecb4…17ee48 IdxSect {
0x17ecb4…17ee48 f00 = 0x0078 // 0x17ecb4 @0x0
0x17ecb4…17ee48 f01 = 0x0002 // 0x17ecb6 @0x2
0x17ecb4…17ee48 gno = [ // 0x17ecb8 @0x4
0x17ecb4…17ee48 [0x00]: C0x0078.0x0.0
0x17ecb4…17ee48 ]
0x17ecb4…17ee48 }
0x17ee48…17efdc Dummy {f00=0x0078, f01=0x0190, f02=» 0 P IDENT DVTDI REL 9.2 79-11-16 870105040920 P 8 P =1,HANG UP AT /03 OUTPUT @ P REL 9.1 79-05-23 d P* . P* DEVICE WORK TABLE FOR DISPLAY INDICATOR P* P* & P ENTRY DVTDI DISPLAY INDICATOR 03 P* P*
0x17efdc…17f170 Dummy {f00=0x0078, f01=0x0190, f02=»METER x 0 P DATA /8000 STATUS. /8000 MEANS DEVICE READY P DATA 0 ECB ADDRESS B P DATA DWTEND-DVTDI ORDER ^ ( P DATA DIAD POINTER TO ADDRESS-BLOCK ~ 6 P DATA 'DI',0 TERM.NUMBER AND PROGRAM START ADDRESS $ P DATA 0 ECB QUEUE ANCHOR ADDRESS
0x17f170…17f304 Dummy {f00=0x0078, f01=0x415e, f02=» | P DATA /2010 P DATA /3F4F,/5F6F * P DATA 0 SAVE AREA FOR FLASHING LIGHTS 6 P DATA 0 TIMER POINTER d P DATA 0 DUMMY WORD =1 P DATA 0 DUMMY WORD =1 " P DATA 0 DUMMY TIMER POINTER =1 P IFT MMUPAG=1 PDEVECB DATA 0,
0x17f304…17f498 Dummy {f00=0x0078, 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
0x17f498…17f62c Dummy {f00=0x0078, f01=0x018e, f02=» P LDKL A1,/C000 WORDS,WRITE < P XIF < & P IFT CHAN=1 < 2 ( P CM DWTRW,A6 INDICATOR TO WRITE MODE < F P XIF < r P RF FD:800 < ~ P* < PFD:REA EQU * < P IFT CHAN=1 < P LDK A1,1 < P ST A1,DWTRW,A6 READ MODE < P XIF < P IFT C
0x17f62c…17f7c0 Dummy {f00=0x0078, f01=0x0190, f02=» P* = P IFT MMUPAG=1 = & P ORR* A1,A8 GET FIRST WORD OF ECB = $ * P ANKL A1,/F000 KEEP FOUR LEFTMOST BITS = N P XIF = | P* = P IFT CHAN=0 = P ORR A3,A1 = PWER1 WER A3,MUXADR FIRST WER = $ PWER2 WER A4,MUXADR+1 SECOND WER = P XIF
0x17f7c0…17f954 (1, 227) Opaque[0x194]
0x17f954…17fae8 # DirEnt {nam=»DVTDY «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f08, f03=0x0000}
0x17f954…17fae8 IdxSect {
0x17f954…17fae8 f00 = 0x0078 // 0x17f954 @0x0
0x17f954…17fae8 f01 = 0x0002 // 0x17f956 @0x2
0x17f954…17fae8 gno = [ // 0x17f958 @0x4
0x17f954…17fae8 [0x00]: C0x0078.0x1.0
0x17f954…17fae8 ]
0x17f954…17fae8 }
0x17fae8…17fc7c Dummy {f00=0x0078, f01=0x0190, f02=» 0 P IDENT DVTDY REL 9.2 79-11-16 870105040920 P 8 * P* DEVICE WORK TABLE FOR VIDEO DISPLAY @ P* n P ENTRY DVTDY TABLE ENTRY x P* P* ( P EXTRN DYAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 0 P* PDVTDY EQU * TABLE
0x17fc7c…17fe10 Dummy {f00=0x0078, f01=0x0190, f02=»A DWTEND-DVTDY ORDER ( P DATA DYAD POINTER TO ADDRESS-BLOCK P DATA 'DY' TTAB-ADDRESS H $ P DATA 0 WAIT/ACTIVATE INDICATOR h P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB ADDRE
0x17fe10…17ffa4 Dummy {f00=0x0078, f01=0x4150, f02=»A FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER ( P DATA /101 CURSOR POINTER F ( P DATA /ABC LEFT BYTE=NUMBER OF LINES h " P RIGHT BYTE=CHARACTERS/LINE P DATA 0 BUFFER INDEX P IFT MMUPAG=1 PDEVECB DATA 0,0,0,0,0,0
0x17ffa4…180138 Dummy {f00=0x0078, 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
0x180138…1802cc Dummy {f00=0x0078, f01=0x0190, f02=» P LD A7,DWTOR,A6 L P ANK A7,/3F ORDER L P LD A8,DWTECB,A6 ECB ADDRESS L 6 P ABL FDAD REACTIVATE L Z P EJECT DRFD01 L v P* L P********************* L P* * L P* INTERRUPT HANDLER * L P* *
0x1802cc…180460 Dummy {f00=0x0078, f01=0x018e, f02=» L r P IFT CPU852=1 M * P CF A15,SAVE8 SAVE REGISTERS ON STACK M P XIF M L P* M X P IFT CPU852=0 M b " P MSR 8,A15 SAVE A1-A8 ON STACK M x P XIF M P* M P LDKL A6,DWFD01 DWT ADDRESS M P IFT CHAN=1 M P ENB M & P LD A1,DWTUB,A6
0x180460…1805f4 (1, 228) Opaque[0x194]
0x1805f4…180788 # DirEnt {nam=»DWII01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f10, f03=0x0000}
0x1805f4…180788 IdxSect {
0x1805f4…180788 f00 = 0x0078 // 0x1805f4 @0x0
0x1805f4…180788 f01 = 0x0002 // 0x1805f6 @0x2
0x1805f4…180788 gno = [ // 0x1805f8 @0x4
0x1805f4…180788 [0x00]: C0x0078.0x2.0
0x1805f4…180788 ]
0x1805f4…180788 }
0x180788…18091c Dummy {f00=0x0078, f01=0x0190, f02=» 2 P IDENT DWII01 REL 9.2 79-11-16 870105040920 P : P* B P* L ( P* INTERTASK COMMUNICATION INPUT DWT V P* P ENTRY DWII01 TABLE ENTRY P P EXTRN ITAD DRIVER ENTRY & P EXTRN IT:BUF INTERTASK MMU BUFFER PMMUPAG E
0x18091c…180ab0 Dummy {f00=0x0078, f01=0x0190, f02=»I01 ORDER " P DATA ITAD+1 ACTIVATION ENTRY P DATA 0 TTAB ADDRESS 8 $ P DATA 0 WAIT/ACTIVATE INDICATOR T P DATA 0 TERMINAL QUEUE | P* P IFT MMUPAG=1 P DATA 0 USER ECB ADDRESS P DATA ITECB MMU ECB ADDRESS P XIF
0x180ab0…180c44 Dummy {f00=0x0078, f01=0x40e8, f02=» p P DATA 0,0 SAVE AREA P* $ P IFT MMUPAG=1 . PITECB EQU * MMU ECB D P DATA 0 ` P DATA IT:BUF p P DATA 0,0,0,0 P XIF PDWTEND EQU * P* P* P* P END @ U ECB ADDRESS P XIF
0x180c44…180dd8 Dummy {f00=0x0078, 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
0x180dd8…180f6c Dummy {f00=0x0078, f01=0x0190, f02=»CORRESPONDING T:A-ADDRESS x * P ES A4,T:ATID,A3 REPLACE TCL IN T:A =3 " 0 P EL* A3,T:ATNW,A13 GET LENGTH OF REAL T:ATAB P $ P NGR A3,A3 NEGATIVE DISPLACEMENT . P ADR A3,A8 COMPUTE ENTRY IN AUX. TID TABLE 0 P ESR A4,A3 SAVE TID FOR DEBUGGER PURPOSE =
0x180f6c…181100 Dummy {f00=0x0078, f01=0x0190, f02=»NT ~ ( P SUK A6,1 DECREMENT NUMBER OF COPIES P RB(P) CHT:20 NEXT COPY 6 PCHT:90 RTN A14 V P EJECT l P z P 4 P************************************************ 4 P*** *** 4 P**
0x181100…181294 (1, 229) Opaque[0x194]
0x181294…181428 # DirEnt {nam=»DWIO01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f18, f03=0x0000}
0x181294…181428 IdxSect {
0x181294…181428 f00 = 0x0078 // 0x181294 @0x0
0x181294…181428 f01 = 0x0002 // 0x181296 @0x2
0x181294…181428 gno = [ // 0x181298 @0x4
0x181294…181428 [0x00]: C0x0078.0x3.0
0x181294…181428 ]
0x181294…181428 }
0x181428…1815bc Dummy {f00=0x0078, f01=0x0190, f02=» 2 P IDENT DWIO01 REL 9.2 79-11-16 870105040920 P : P* B P* L * P* INTERTASK COMMUNICATION OUTPUT DWT V P* P ENTRY DWIO01 TABLE ENTRY P P EXTRN ITAD DRIVER ENTRY & P EXTRN IT:BUF INTERTASK MMU BUFFER PMMUPAG
0x1815bc…181750 Dummy {f00=0x0078, f01=0x0190, f02=»WIO01 ORDER P DATA ITAD ACTIVATION ENTRY P DATA 0 TTAB ADDRESS 8 $ P DATA 0 WAIT/ACTIVATE INDICATOR T P DATA 0 TERMINAL QUEUE | P* P IFT MMUPAG=1 P DATA 0 USER ECB ADDRESS P DATA ITECB MMU ECB ADDRESS P XIF
0x181750…1818e4 Dummy {f00=0x0078, f01=0x40e8, f02=» p P DATA 0,0 SAVE AREA P* $ P IFT MMUPAG=1 . PITECB EQU * MMU ECB D P DATA 0 ` P DATA IT:BUF p P DATA 0,0,0,0 P XIF PDWTEND EQU * P* P* P* P END @ U ECB ADDRESS P XIF
0x1818e4…181a78 Dummy {f00=0x0078, 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
0x181a78…181c0c Dummy {f00=0x0078, f01=0x0190, f02=»RC-PROCESS TERMINAL 2 C z & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 D & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 D H , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) D r $ P DATA 0 BLOCK SENDING INDICATOR D P XIF D P EJECT D $ P******************************** D
0x181c0c…181da0 Dummy {f00=0x0078, f01=0x018e, f02=»ANNEL NO. 2 D f " P* CONNECTED TO FOURTH CHRT E P* E : PCWTRT8 EQU * E D P* E X P IFT RECHAN=4 E b P DATA 0 LAST OUTPUT DWT E x P DATA 0 LAST OUTPUT WORD E P DATA INTRT4 INTERRUPT TABLE E P INR A2,0,DWA8 INR E P OTR A2,1,DWA8 OTR
0x181da0…181f34 (1, 230) Opaque[0x194]
0x181f34…1820c8 # DirEnt {nam=»DW1501«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f20, f03=0x0000}
0x181f34…1820c8 IdxSect {
0x181f34…1820c8 f00 = 0x0079 // 0x181f34 @0x0
0x181f34…1820c8 f01 = 0x0002 // 0x181f36 @0x2
0x181f34…1820c8 gno = [ // 0x181f38 @0x4
0x181f34…1820c8 [0x00]: C0x0079.0x0.0
0x181f34…1820c8 ]
0x181f34…1820c8 }
0x1820c8…18225c Dummy {f00=0x0079, f01=0x0190, f02=» 2 P IDENT DW1501 9.2DK 1 81-11-05 870105040920 P DK1 EXTRA DWTINF : P ORG: REL 9.2 79-11-16 V P v P* ~ : P* DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 P* P ENTRY DW1501 TABLE ENTRY * P EXTRN DC15AD POINTER
0x18225c…1823f0 Dummy {f00=0x0079, f01=0x0190, f02=»/8000 STATUS./8000 MEANS DEVICE READY P DATA 0 ECB-ADDRESS . P DATA DWTEND-DW1501 J P RIGHT BYTE=ORDER f * P DATA DC15AD POINTER TO ADDRESS-BLOCK P DATA 'DC' TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL
0x1823f0…182584 Dummy {f00=0x0079, f01=0x418c, f02=» DATA 0 TIMER POINTER P DATA 0 WRITE QUEUE P DATA 0 STATUS QUEUE : P DATA 0 RECEIVE QUEUE V P DATA 0 BUFFER ADDRESS t P DATA 0 CURSOR ADDRESS " P DATA 0 REQUEST TIMEOUT VALUE " P DATA 0 DEVICE INFORMATION DK1 P* P I
0x182584…182718 Dummy {f00=0x0079, f01=0x2008, f02=» ATUS QUEUE P DATA 0 RECEIVE QUEUE P DATA 0 BUFFER ADDRESS 8 P DATA 0 CURSOR ADDRESS V , P DATA 50 REQUEST TIMEOUT. DEFAULT 5 SEC. t P* P IFT MMUPAG=1 PDC:ECB EQU * MMU ECB P DATA 0,0,0,0,0,0 P XIF P*
0x182718…1828ac Dummy {f00=0x0079, f01=0x40e4, f02=» : H IDENT T:DTC0 TRA 4.2 81-03-20 F1 O1111 04.01.XXX.1 T:DTC0 B T:DTC0D T REENTC REGGO h * & TC * " * @ " $ ,
0x1828ac…182a40 Dummy {f00=0x0079, f01=0x018e, f02=» : H IDENT T:AKA0 TRA 4.2 81-03-20 F1 O1111 04.01.XXX.1 T:AKA0 B T:AKA0A T . * T:DKA0 D:CB90 C:CB90 D:TB90 Z:TB90 h * & @ * & P * & =
0x182a40…182bd4 (1, 231) Opaque[0x194]
0x182bd4…182d68 # DirEnt {nam=»DRKB03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f28, f03=0x0000}
0x182bd4…182d68 IdxSect {
0x182bd4…182d68 f00 = 0x0079 // 0x182bd4 @0x0
0x182bd4…182d68 f01 = 0x0010 // 0x182bd6 @0x2
0x182bd4…182d68 gno = [ // 0x182bd8 @0x4
0x182bd4…182d68 [0x00]: C0x0079.0x1.0
0x182bd4…182d68 [0x01]: C0x0079.0x2.0
0x182bd4…182d68 [0x02]: C0x0079.0x3.0
0x182bd4…182d68 [0x03]: C0x007a.0x0.0
0x182bd4…182d68 [0x04]: C0x007a.0x1.0
0x182bd4…182d68 [0x05]: C0x007a.0x2.0
0x182bd4…182d68 [0x06]: C0x007a.0x3.0
0x182bd4…182d68 [0x07]: C0x007b.0x0.0
0x182bd4…182d68 ]
0x182bd4…182d68 }
0x182d68…182efc Dummy {f00=0x0079, f01=0x0190, f02=» 2 P IDENT DRKB03 REL 9.2 79-11-16 870105040920 P : P* B 0 P******************************************* L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* DRKB01 = DRIVER KEYBOARD P* P* P* P* P
0x182efc…183090 Dummy {f00=0x0079, f01=0x0190, f02=» d . P* AND ALPHANUMERIC KEYBOARDS PTS 6236, , P* CONNECTED TO CPU VIA CHLT OR CHRT. : P* j : P* ONLY INPUT DATA FROM DEPRESSED KEYS AND KEY-LOCKS t $ P* ARE HANDLED BY THE DRIVER. P* 0 P* AN ECHO-DEVICE CAN BE ATTACHED
0x183090…183224 Dummy {f00=0x0079, f01=0x0190, f02=»PARTS: j P* " P* A C K B : ACTIVATION PART P* > $ P* I H K B : INTERRUPT HANDLER H P* p P* E C H O : ECHO HANDLER z P* $ P* R C K B : RECOVERY ROUTINE P* P EJECT P* P* , P* THE FOL
0x183224…1833b8 Dummy {f00=0x0079, f01=0x0190, f02=»IC READ | & P* ORDER 31: RESET INPUT BUFFER P* : P* D P* NORMAL REGISTER USAGE : N P* r " P* REGISTER A1 : RETURN CODE | & P* A2 : INPUT CHARACTER $ P* A3 : BUFFER INDEX $ P* A4 : W
0x1833b8…18354c Dummy {f00=0x0079, f01=0x0190, f02=» A8 : ECB-ADDRESS P* P* ( P* 2 P* SYSTEM ADAPTATION < P* Z 8 P* CODES FOR SPECIAL CHARACTERS CLEAR, BACKSPACE, d 8 P* MULTIPLE ZERO AND STANDARD EOR MUST BE DEFINED P* IN DWT. P* 2 P* DWT-ADDRE
0x18354c…1836e0 Dummy {f00=0x0079, f01=0x0190, f02=»T MUST BE SET UNEQUAL TO ZERO. 2 P* STANDARD VALUE FOR TIME-OUT IS 30 SECONDS & 4 P* SINCE LAST DEPRESSED KEY. IF ANOTHER VALUE * P* IS WANTED FOR A SYSTEM, INDICATOR $ P* IN DRIVER MUST BE CHANGED. P* 4 P* THE LENGTH OF T
0x1836e0…183874 (1, 232) Dummy {f00=0x0079, f01=0x018e, f02=»AME FOR ALL h P* DWT:S IN SYSTEM P EJECT 0 P* > 8 P* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE H 8 P* TO EXCLUDE FROM THE DRIVER FOLLOWING FUNCTIONS: P* P* -----ECHO-FUNCTION " P* -----POWER ON INDICATION
0x183874…183a08 Dummy {f00=0x0079, f01=0x0190, f02=» P* ENTRIES P* P* & P ENTRY KBAD3 ADDRESS-BLOCK 0 P* R P* P* f & P* EXTERNAL TOSS MODULE ENTRIES p P* P* P* $ P EXTRN DISIOE I/O REQUEST ERROR . P EXTRN DISEND END I/O AND GO TO DISPATCH
0x183a08…183b9c Dummy {f00=0x0079, f01=0x0190, f02=» STREG STORE REGISTERS AND GO TO DISPATCER , P EXTRN LDREGE RETURN FROM ECHOE HANDLING 2 P EXTRN LDREGF PANIK EXTERN b P EXTRN SETIME SET TIME P EXTRN SETIMP SET TIME " P EXTRN SAVE8 SAVE 8 REGISTERS " P EXTRN ECHRTN RETURN FROM ECHO
0x183b9c…183d30 Dummy {f00=0x0079, f01=0x0190, f02=» P* P* " P EXTRN DWTCHP CHANEL PARAMETER P EXTRN DWTST STATUS > P EXTRN DWTBC BYTE COUNTER Z & P EXTRN DWTADR DRIVER ADDRESS BLOCK | P EXTRN DWTA3 SAVE AREA A3 P EXTRN DWTA4 SAVE AREA A4 P EXTRN DWTA5 SAVE AREA A5
0x183d30…183ec4 Dummy {f00=0x0079, f01=0x0190, f02=» INPUT DWT ~ P EJECT P* P* * P* 4 P* CONSTANTS > P* V P* ` P* j * POVMASK EQU /2 OVERFLOW IN INPUT BUFFER t P* . PX:F EQU 20 LENGTH OF CIRCULAR INPUT BUFFER 2 PDWTLNG EQU 40 NUMBER OF BYTES IN DECIMAL F
0x183ec4…184058 Dummy {f00=0x0079, f01=0x018e, f02=» P* P* , P**************************************** , P* CONDITIONAL ASSEMBLY * H , P**************************************** x P* . P* TIME OUT FUNCTION MAY BE EXCLUDED BY P* SETTING X:A = 0. P*
0x184058…1841ec Dummy {f00=0x0079, f01=0x0190, f02=» PX:B EQU 1 PCECHO EQU 1 P* * > P* BY SETTING X:E = 1 THE FOLOWING POWER OFF FUNCTION 4 & P* IS INCLUDED IN THE DRIVER. v < P* IF THERE IS A READ REQUEST THIS IS COMPLETED WITH , P* ZERO IN THE CONTROL WORD OF ECB.
0x1841ec…184380 Dummy {f00=0x0079, f01=0x0190, f02=» T P* OF ECB P* P* ( PX:E EQU 0 2 PPOWOFF EQU 1 D P* X P* b P* l N P* BY SETTING X:H = 1 THE KEY A15IS USED AS A NUMERIC SHIFT ON KB 71/72 v PX:H EQU 0 PNSHIFT EQU 1 P* P* B P*
0x184380…184514 (1, 233) Dummy {f00=0x0079, f01=0x0190, f02=»RSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. $ P* R PMMUPAG EQU 1 P* p P* z 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0
0x184514…1846a8 Dummy {f00=0x0079, f01=0x0190, f02=» MMU KEY TABLE SIZE P* P* & PX:K EQU 10 0 PDVBKTB EQU 50 B P* X P EJECT b P* p P* z P* DWT-DISPLACEMENT P* P* 0 PDWTDRD EQU /10 START OF DRIVER DEFINED PART P* P IFT MMUPAG=0
0x1846a8…18483c Dummy {f00=0x0079, f01=0x0190, f02=»00 CONVERSION TABLE ~ 8 PDWTINQ EQU START+/18 POINTER TO FIRST PLACE IN QUEUE 8 PDWTUTQ EQU START+/1A POINTER TO LAST PLACE IN QUEUE X & PDWTSQ EQU START+/1C START OF QUEUE ( PDWTEQ EQU DWTSQ+DWTLNG END OF QUEUE P* ( P* SPECIAL KEYS
0x18483c…1849d0 Dummy {f00=0x0079, f01=0x0190, f02=»R n . PKBMZ2 EQU START+/17 DOUBLE ZERO CHARACTER PKBMZ3 EQU START+/16 < P* X P EJECT b P* TABLES p P* P* $ P DATA DVBKTB MMU KEY TABLE SIZE P DATA DVBLEN MMU BUFFER SIZE P DATA 6 DEVICE INDEX P*
0x1849d0…184b64 Dummy {f00=0x0079, f01=0x0190, f02=» IFT POWOFF=1 P DATA RCKB RECOVERY ROUTINE P XIF : P IFT POWOFF=0 F P DATA 0 NO RECOVERY P XIF x P* P IFT POWOFF=1 P EJECT P* RCKB P* P* RECOVERY PART P* P* PRCKB EQU *
0x184b64…184cf8 Dummy {f00=0x0079, f01=0x0190, f02=» MSR 8,A15 SAVE A1-A8 ON STACK P XIF & P* 2 P IFT POWOFF=1 < P LD A3,DWTST,A6 BUSY? R P RF(NN) RCKB10 p P LDKL A1,/200 ( P ORS A1,DWTST,A6 INDICATE POWER OFF P ABL TDISP & PRCKB10 CF A5,LDREGE LOAD REGISTERS P RF
0x184cf8…184e8c Dummy {f00=0x0079, f01=0x0190, f02=»ERS AND b P* @ P* EXAMINES INPUT BUFFER TO SEE IF SOME QUEUED CHARACTER P* ^ P* TO THREAT h P* P* P* P* PACKB EQU * P LDKL A1,/FEFF 2 P ANS A1,DWTST,A6 RESET INETRRUPT ALLOWED FLAG P L
0x184e8c…185020 Dummy {f00=0x0079, f01=0x0190, f02=»0 ORDER 1,2 OR 3 P SUK A4,/2D P RF(Z) AKB110 ORDER 31 , * PAKB100 ORKL A1,/8000 I/0 REQUEST ERROR J P ABL ENDI10 x P EJECT P* P* P* & P* ORDER 31 RESET INPUT BUFFER P* P* P* PAKB110 E
0x185020…1851b4 (1, 234) Dummy {f00=0x007a, f01=0x0190, f02=» P* P* P* ORDER 1,2,3 P* 2 P* < P* F PAKB200 EQU * P P IFT POWOFF=1 d P LD A2,DWTST,A6 z P ANKL A2,/200 POWER OFF? P RF(E) AKB205 NO! ( P XRS A2,DWTST,A6 RESET POWER OFF BIT PAKB202 EQU *
0x1851b4…185348 Dummy {f00=0x007a, f01=0x0190, f02=» P XIF PAKB205 EQU * P IFT CTIMUT=1 $ P LDR* A1,A6 : P ANK A1,/40 TIMING? N , P RF(E) AKB210 NO TIMING FOR THIS DEVICE! j , P LD A4,DWTTP,A6 CHECK IF ALREADY TIMING P RF(E) AKBTIM P LDKL A4,-TIME P ST* A4,DWTTP,A6
0x185348…1854dc Dummy {f00=0x007a, f01=0x0190, f02=»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* P EJECT P* IF ANY KEY-LOCK: P* : P* RESET "CHANGED-KEY" FLAG AND MAKE KEY-CHARACTER
0x1854dc…185670 Dummy {f00=0x007a, f01=0x0190, f02=»ND END I/O. ELSE CONTINUE. P* " P* , PAKB210 EQU * 6 " P LD A2,DWTST,A6 ANY KEY-LOCK? J P ANK A2,/F p P RF(Z) AKB219 P SLL A2,1 P SRN A2,A4 P LDR A1,A4 P CWK A4,3 P RF(N) AKB212 P RF(P) AKB211
0x185670…185804 Dummy {f00=0x007a, f01=0x0190, f02=» A4,4 P AN A4,DWTST,A6 P STR A4,A15 SAVE A4 & P STR A3,A15 B P SRN A2,A3 ORDER 1 V " P ADR A3,A3 MAKE CHARACTER FLAG p P LDR A4,A4 P RF(NE) AKB213 P ADK A3,1 PAKB213 ADK A3,/70 P LDR A2,A3 P LDR* A3,A
0x185804…185998 Dummy {f00=0x007a, f01=0x0190, f02=»AD r " PAKB214 NGR A2,A1 MAKE ECB CODE P LDR A4,A4 KEY FLAG 0 P RF(E) AKB215 L P SUK A2,4 b , PAKB215 ST A2,10,A8 KEY-LOCK CODE IN ECB t PAKB218 ABL AKB380 ( PAKB219 LD A2,4,A8 REQUESTED LENGTH=0 PAKB220 ABL(E) AKB380 " PAK
0x185998…185b2c Dummy {f00=0x007a, f01=0x0190, f02=»30 SCR A3,A1 CLEAR ECB BUFFER P SUK A1,1 & P SUK A2,1 8 P RB(NE) AKB230 J PAKB240 EQU * ` P LD A1,DWTUTQ,A6 t P LCR A2,A1 PAKB245 LDR A4,A2 P XRK A4,/FF OVERFLOW? P RF(NE) AKB250 N0! PAKB247 SCR A4,A1 YES!
0x185b2c…185cc0 Dummy {f00=0x007a, f01=0x0190, f02=» " P CF A5,STREG NOTHING IN QUEUE P IFT CTIMUT=1 * * P LDR A1,A1 CHECK TIME OUT RETURN CODE @ P RF(Z) AKB257 NO TIME OUT n $ P ABL ENDI05 END I/O AT TIME OUT P XIF P IFT CTIMUT=0 P RF AKB257 P XIF * PAKB255 CF A15,EO
0x185cc0…185e54 (1, 235) Dummy {f00=0x007a, f01=0x0190, f02=»AKB310 ORDER 2 OR 3 P EJECT P* * P* 4 P* ORDER 1 BASIC READ > P* ^ P* h P* r 6 PAKB305 CF A15,STORE STORE CHARACTER IN ECB-BUFFER | P IFT CECHO=1 P CF A5,ECHO P XIF PAKB307 CW A3,4,A8 , P RF(
0x185e54…185fe8 Dummy {f00=0x007a, f01=0x0190, f02=» EJECT P* P* P* " 4 P* ORDER 2 OR 3 STANDARD AND NUMERIC READ , P* d B P* CHECK IF READ CHARACTER IS FOUND IN KEY-TABLE (IF ANY) n P* P* P* P* PAKB310 EQU * " P LD A1,10,A8 KEY-TABLE A
0x185fe8…18617c Dummy {f00=0x007a, f01=0x0190, f02=»EY-TABLE v P ADK A1,1 PAKB355 SUK A4,1 " , P RF(N) AKB360 KEY NOT FOUND IN KEY-TABLE : P SUK A1,1 NEXT KEY j P CCR A2,A1 EOR? P RB(NE) AKB355 NO! P ADK A4,1 , P ST A4,10,A8 STORE INDEX IN CONTROL WORD " P CF A15,STORE ST
0x18617c…186310 Dummy {f00=0x007a, f01=0x0190, f02=»F AKB380 PAKB360 EQU * ! P LDR A4,A2 ! $ P CC A4,KBMZ2,A6 ! 6 P RF(E) KBMZ20 ! N P CC A4,KBMZ3,A6 ! d P RF(E) KBMZ30 ! | P CC A4,KBBSP,A6 ! P RF(E) KBSP10 ! P CC A4,KBCLR,A6 ! P RF(E) KBCL10 ! , P CF A15,STORE STORE CHARAC
0x186310…1864a4 Dummy {f00=0x007a, f01=0x0190, f02=»ACTER > /7F ! P RF(P) AKB364 YES " P CWK A7,2 " . $ P RF(E) AKB366 STANDARD READ OK " @ P ADK A4,/4F " h P RF(N) AKB364 " | P SUK A4,/A " " P RF(N) AKB366 NUMERIC READ OK " PAKB364 LDK A1,4 ERROR CODE " P RF ENDIO " PAKB366 EQU
0x1864a4…186638 Dummy {f00=0x007a, f01=0x0190, f02=»10 NO RETURN " ~ & PAKB368 LDK A1,8 YES SET ERROR CODE # P RF ENDIO END I/O # > P EJECT # X PKBMZ30 EQU * TRIPPLE ZERO # f P LDK A4,3 # P RF KBMZ25 # PKBMZ20 LDK A4,2 DOUBLE ZERO # PKBMZ25 LDK A2,/30 # P SUK A4,1 # P RB(L) AKB36
0x186638…1867cc Dummy {f00=0x007a, f01=0x0190, f02=» P RB(L) KBMZ25 $ PKBMZ27 EQU * $ P SUK A4,1 ANY MORE ZEROES $ . $ P RB(L) AKB368 NO,SET RETURN CODE $ P P INH $ x * P LD A1,DWTUTQ,A6 GET OUTQUEUE POINTER $ P SUR A1,A6 $ " P CWK A1,DWTSQ FIRST POSITION ? $ P RF(NE) KBMZ29 NO $ , P LDK
0x1867cc…186960 Dummy {f00=0x007a, f01=0x0190, f02=»OSITION $ j P SUK A1,1 % , PKBMZ40 CW A1,DWTINQ,A6 ANY SPACE LEFT ? % " P RF(E) KBMZ90 NO NOT REALY. % R 0 P ST A1,DWTUTQ,A6 STORE NEW OUTQUEUE POINTER % v & P LDK A2,/30 STORE ZERO IN CIRKULAR % P SCR A2,A1 INPUT BUFFER % P RB KBMZ27 % PKB
0x186960…186af4 (1, 236) Dummy {f00=0x007a, f01=0x0190, f02=»ETURN CODE FOR BOTH % . PENDIX RF ENDIO LENGTH AND THRUGHPUT ERRORS & P* & N P* & X P* & b PKBCL10 EQU * CLEAR & l P LDK A3,0 & P LDK A2,/18 & P RB AKB366 & P* & P* & P* & PKBSP10 EQU * & P LDR A3,A3 & P RF(Z)
0x186af4…186c88 Dummy {f00=0x007a, f01=0x0190, f02=»/8 & P RB AKB366 ' P* ' P* ' & PAKB380 LDK A1,0 RETURN CODE ' 0 P EJECT ' T P* ' b P* ' l , P* THIS IS A COMMON END OF THE DRIVER ' v P* ' 2 P* SET EFFECTIVE LENGTH AND PERFORM END I/O ' $ P* ON KEYBOARD AND ECHO-DEVICE '
0x186c88…186e1c Dummy {f00=0x007a, f01=0x018e, f02=»G ON THIS DEVICE ' z P CM* DWTTP,A6 RESET TIMER ( P CM DWTTP,A6 ( : P XIF ( N P* ( Z , PENDI05 ST A3,6,A8 STORE EFFECTIVE LENGTH ( d PENDI10 EQU * ( P* ( P IFT CECHO=1 ( P LDR A4,A1 SAVE A1 ( ( P CF A5,ECHEND END I/O ON ECHO DEVICE (
0x186e1c…186fb0 Dummy {f00=0x007a, f01=0x0190, f02=» P* ) P* ) F P* THIS IS THE INTERRUPT HANDLER ENTERED FROM CHLT/CHRT DRIVER ) P* ) b P* ) l P* ) v PIHKB EQU * ) P ANK A2,/FF ) * P CF A15,KONVER CONVERT INPUT CHARACTER ) P LDR A4,A4 TEST TYPE OF CHAR ) P RF(P) EXIT SHIF
0x186fb0…187144 Dummy {f00=0x007a, f01=0x0190, f02=» RF(Z) EXIT ) P LD A3,DWTST,A6 I/O REQUEST? * P XIF * 8 * P RF(N) IHKB15 NO READ REQUEST PENDING * D " P SLL A3,7 INTERRUPT ALLOWED ? * r 4 P RF(NN) IHKB15 NO, STORE CHARACTER IN DWT-BUFFER * P IFT CTIMUT=1 * P LD A3,DWTTP,A6 * * P RF(E) IHK
0x187144…1872d8 Dummy {f00=0x007a, f01=0x0190, f02=»EAD ROUTINE * t , PIHKB12 CF A15,KEYSET SET KEY CODE IN DWT + P LDR A3,A3 + D P RF(Z) EXIT NO KEY CHANGE + V P LD A3,DWTST,A6 + x ( P RF(N) EXIT NO READ REQUEST PENDING + P SLL A3,7 + & P RF(NN) EXIT INERRUPT NOT ALLOWED + ( P LD A3,DWTA3,A6
0x1872d8…18746c Dummy {f00=0x007a, f01=0x018e, f02=»A1 + " P XRK A4,/FF ALREADY OVERFLOW? , P RF(E) EXIT YES , 0 P LDR A3,A1 , H 4 P CF A15,EOQUEU GET NEXT OUTQUEUE POINTER ADDRESS , Z P CW A1,DWTUTQ,A6 OVERFLOW? , ( P RF(NZ) IHKB20 SAVE KEY-LOCK IF ANY , 0 P ORK A2,/FF SET OVERFLOWBIT IN INPUT BUF
0x18746c…187600 Dummy {f00=0x007a, f01=0x0190, f02=» P EJECT - P* - P* - P* - & P* AKBTUT - 0 P* - D & P* THIS IS THE TIME-OUT ROUTINE - N P* - x P* - P* - P IFT CTIMUT=1 - PAKBTUT EQU * - " P LDR A6,A1 RESTART DWT-ADDRESS - P LDK A1,/40 SET RETURNE CODE -
0x187600…187794 (1, 237) Dummy {f00=0x007a, f01=0x0190, f02=» P XIF . P EJECT . P* . P* . ( P* . 2 P* . < P* KEYSET . F P* . Z P* . d P* . n , P* ON ENTRY: A4= NEG KEY-LOCK VALUE . x P* . @ P* ON EXIT: A3= ZERO IF IF NO CHANGE IN KEYS, ELSE POS . P* . P* .
0x187794…187928 Dummy {f00=0x007a, f01=0x0190, f02=»0=ON . x P RB(N) SET100 / $ P ANR A3,A2 CHEC OLD KEY POSITION / " " P RF(NZ) SET300 JUMP IF KEY ON / J P LDR A4,A4 / p P RF(NZ) SET500 / P RF SET400 / PSET300 LDR A4,A4 / P RF(Z) SET500 / PSET400 LD A3,DWTST,A6 / P XRR A3,A2 / P
0x187928…187abc Dummy {f00=0x007a, f01=0x018e, f02=» A15 / P EJECT 0 P* 0 P* 0 $ P* 0 . P* KONVER 0 8 P* 0 L * P* KONVER CONVERTS INPUT CHARACTER 0 V P* 0 P* 0 ( P* ON ENTRY: A2= INPUT CHARACTER 0 P* 0 P* 0 * P* ON EXIT: A2=COVERTED CHARACTER 0 L P*
0x187abc…187c50 Dummy {f00=0x007a, f01=0x0190, f02=» PKONVER EQU * 1 P LDR A4,A2 1 P IFT NSHIFT=0 1 * P SUK A4,/7C CODE > /7B 1 @ P RF(NN) KON500 YES 1 ^ P LDR A4,A2 RESTORE CHARACTER 1 x P XIF 1 8 P STR A2,A15 STORE CHARACTER IN CASE OF NO CONVERSION 1 P LDR* A5,A6 1 P SUK A4,/20 1
0x187c50…187de4 Dummy {f00=0x007a, f01=0x0190, f02=» NO 1 P SUK A2,/40 YES 2 PKON105 EQU * 2 $ P ANK A5,/10 2 8 P SRL A5,3 2 L P RF KON200 2 ^ * PKON110 SUK A4,8 (UN)CTRL OR (UN)SHIFT 2 p P RF(N) KON400 KEY-LOCK 2 P RF(Z) KON140 SHIFT ON 2 P SUK A4,2 2 P RF(N) KON160 SHIFT OFF 2
0x187de4…187f78 Dummy {f00=0x007a, f01=0x018e, f02=»IFT ON 2 v " P RF KON160 NUMERICAL SHIFT OFF 3 P XIF 3 4 PKON125 EQU * 3 @ P LDKL A2,/FFDF UNCTRL 3 T PKON120 ANR A5,A2 3 r PKON130 STR A5,A6 DWTCHP 3 P LDK A4,/10 3 P RF KON400 GO HOME! 3 PKON140 EQU * 3 P IFT NSHIFT=1 3 P LDR
0x187f78…18810c Dummy {f00=0x007a, f01=0x0190, f02=» P LDK A2,/10 SHIFT 4 PKON150 ORR A5,A2 4 P RB KON130 4 6 PKON160 EQU * 4 H P IFT NSHIFT=1 4 P LDR A4,A5 4 r P ANK A4,/80 4 P RF(Z) KON165 4 P LDKL A2,/FF7F 4 P RB KON120 4 P XIF 4 PKON165 EQU * 4 P LDKL A2,/FFEF 4
0x18810c…1882a0 Dummy {f00=0x007a, f01=0x0190, f02=» 4 P SRL A5,3 5 P ADK A5,4 5 8 PKON200 LD A4,DWTCON,A6 GET CONVERSION TABLE ADDRESS 5 , P ADR A4,A5 5 h P LDR* A4,A4 5 z P RF(Z) KON400 5 P ADR A4,A2 5 * P LDR* A2,A15 RESTORE A2 AND A15-STACK 5 ( P LCR A2,A4 GET CHARACTER FROM TABLE
0x1882a0…188434 (1, 238) Dummy {f00=0x007b, f01=0x0190, f02=»KON300 5 P IFT NSHIFT=0 6 PKON500 EQU * 6 $ P LDR A4,A4 KEY CODE /7C 6 8 P RF(Z) KON600 YES 6 X & P LDK A4,1 INDICATE SKIP CHARACTER 6 r P RTN A15 6 PKON600 EQU * 6 P SUR A2,A2 6 P RB KONVER DO START AGAIN 6 P XIF 6 P EJECT 6
0x188434…1885c8 Dummy {f00=0x007b, f01=0x0190, f02=» P* ON ENTRY: 7 P* 7 P* A2 = CHARACTER TO STORE 7 $ P* A3 = BUFFER INDEX 7 H P* 7 f P* 7 p PSTORE EQU * 7 z P LD A4,2,A8 BUFFER ADDRESS 7 P ADR A4,A3 ADD BUFFER INDEX 7 ( P SCR A2,A4 STORE CHARACTER IN BUFFER 7 $ P ADK A3,
0x1885c8…18875c Dummy {f00=0x007b, f01=0x0190, f02=» TO GET NEXT QUEUE POINTER 7 x P* 8 " P* ON ENTRY: 8 , P* 8 B P* A1 = QUEUE POINTER 8 L P* A6 = DWT-ADDRESS 8 l P* 8 P* ON EXIT: 8 P* 8 P* A1 = NEW QUEUE POINTER 8 PEOQUEU EQU * 8 P ADK A1,1 8 P SUR A1,A6
0x18875c…1888f0 Dummy {f00=0x007b, f01=0x4022, f02=» RB STORTN 8 P END 9 @ 9 * 8 " P* ON ENTRY: 8 , P* 8 B P* A1 = QUEUE POINTER 8 L P* A6 = DWT-ADDRESS 8 l P* 8 P* ON EXIT: 8 P* 8 P* A1 = NEW QUEUE POINTER 8 PEOQUEU EQU * 8 P ADK A1,1 8 P SUR A1,A6
0x1888f0…188a84 Dummy {f00=0x007b, 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
0x188a84…188c18 Dummy {f00=0x007b, f01=0x0190, f02=» _2 V V tPJ S ( V | S =J @ " S V l S W l V p S W p W _L @ % P W @ % P V !TTT @ @ T : @ ! P @ @ CRT 3 @ S
0x188c18…188dac Dummy {f00=0x007b, f01=0x0190, f02=» : ` @ P _ 3 S S V V W @ @ T : P S S _ : . !TTP V W t * P r _ Ph W p W V
0x188dac…188f40 Dummy {f00=0x007b, f01=0x0190, f02=» @ T : V @ R @ T P / _ T @ A V W W t PT W f ( W d X G =h G V d V r < V f P W f _B V W V t Yr V !TTX
0x188f40…1890d4 (1, 239) Opaque[0x194]
0x1890d4…189268 # DirEnt {nam=»DRTP02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f68, f03=0x0000}
0x1890d4…189268 IdxSect {
0x1890d4…189268 f00 = 0x007b // 0x1890d4 @0x0
0x1890d4…189268 f01 = 0x0012 // 0x1890d6 @0x2
0x1890d4…189268 gno = [ // 0x1890d8 @0x4
0x1890d4…189268 [0x00]: C0x007b.0x1.0
0x1890d4…189268 [0x01]: C0x007b.0x2.0
0x1890d4…189268 [0x02]: C0x007b.0x3.0
0x1890d4…189268 [0x03]: C0x007c.0x0.0
0x1890d4…189268 [0x04]: C0x007c.0x1.0
0x1890d4…189268 [0x05]: C0x007c.0x2.0
0x1890d4…189268 [0x06]: C0x007c.0x3.0
0x1890d4…189268 [0x07]: C0x007d.0x0.0
0x1890d4…189268 [0x08]: C0x007d.0x1.0
0x1890d4…189268 ]
0x1890d4…189268 }
0x189268…1893fc Dummy {f00=0x007b, f01=0x0190, f02=» 2 P IDENT DRTP02 REL 9.2 79-11-16 870105040920 P : P =4,CUT AND PERF CORRECTED B P REL 9.1 79-05-23 f P UPDATE PRR 9.1 - REL 9.1 P PRR 9.1 79-04-25 P REL 9.1 79-04-06 & P =1-3,GEN UPDATE TO 8.2+ STATUS P
0x1893fc…189590 Dummy {f00=0x007b, f01=0x0190, f02=» REL 8.2 79-03-16 P =1,IMPRROV. OF TEST ORDER P REL 8.2 78-09-15 @ < P******************************************************* < P* * < P* PHILIPS TERMINAL SYSTEM PTS
0x189590…189724 Dummy {f00=0x007b, f01=0x0190, f02=» * < P* * < P* * L P* P* P* < P* * < P******************************
0x189724…1898b8 Dummy {f00=0x007b, f01=0x0190, f02=» TO CPU VIA CHLT OR CHRT v P* P* * 4 P* THIS DRIVER CONSISTS OF THE FOLLOWING PARTS: 4 P* l $ P* A C T P : ACTIVATION PART v P* & P* I H T P : INTERRUPT HANDLER P* $ P* R C T P : RECOVERY ROUTINE P*
0x1898b8…189a4c Dummy {f00=0x007b, f01=0x0190, f02=» SEND THEM P* 6 P* B C D T B Y : CONVERT TO BINARY FROM DECIMAL P* V D P* B U F C H R : SEND THE NUMBER OF CHARACTERS GIVEN IN FIRST ` $ P* CHARACTER IN OUTPUT BUFFER P* . P* G R A S P : SEND GRASP TO VOUCHER
0x189a4c…189be0 Dummy {f00=0x007b, f01=0x0190, f02=» P* $ P* ORDER 00 : TEST STATUS P* ORDER 06 : WRITE 6 0 P* ORDER 0B : POSITION LIFT AND WRITE X $ P* ORDER 22 : CUT JOURNAL * P* ORDER 26 : PERFORATE JOURNAL . P* ORDER 37 : GRASP VOUCHER/PASS
0x189be0…189d74 (1, 240) Dummy {f00=0x007b, f01=0x0190, f02=»BIT 0 : REQUEST ERROR 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 : NOT OPERABLE P* P* P*
0x189d74…189f08 Dummy {f00=0x007b, f01=0x0190, f02=» A3: BUFFER POINTER $ P* A4: OUTPUT COUNTER " P* A5: STACK POINTER D P* A6: DWT-ADDRESS j P* A7: ORDER P* A8: ECB-ADDRESS P* P* P* P* P* SYSTEM ADAPT
0x189f08…18a09c Dummy {f00=0x007b, f01=0x0190, f02=»TURN CODE IS SET IF RECOVERY IS EXECUTED ON REQUEST 4 P* CUT/PERFORATE JOURNAL TAPE (PTS 6221,6222) < 0 P* ACCAPTANCE OF SPECIAL CHARACTER /13,/14 t H P* COMPLETION OF REQUEST AT 'VOUCHER OUT' BEFORE MESSAGE IS WRITTEN P* P* @ P
0x18a09c…18a230 Dummy {f00=0x007b, f01=0x018e, f02=» P* P EJECT P* P*********** * P* ENTRIES * > P*********** R P* f P* p P ENTRY TPAD ADDRESS BLOCK z P* P* P* P************* P* EXTERNALS * P************* P* P*
0x18a230…18a3c4 Dummy {f00=0x007b, f01=0x0190, f02=» P EXTRN TENDIO END I/O & P EXTRN OUTPUT OUTPUT ONE CHARACTER " " P EXTRN LDREG RESTORE REGISTERS L 8 P EXTRN STREG STORE REGISTERS AND WAIT FOR INTERRUPT r P EXTRN SAVE8 SAVE REG. A1-A8 P* P EXTRN DWTST STATUS EXTRN DWTBC BYT
0x18a3c4…18a558 Dummy {f00=0x007b, f01=0x0190, f02=» P* ECB DISPLACEMENTS P* $ P EXTRN ECBBA BUFFER ADDRESS . " P EXTRN ECBRL REQUESTED LENGTH R " P EXTRN ECBEL EFFECTIVE LENGTH x P EXTRN ECBRC RETURN CODE P EXTRN ECBCW CONTROL WORD P EJECT P************************
0x18a558…18a6ec Dummy {f00=0x007b, f01=0x0190, f02=»ODE IS SET b P* BY SETTING X:A = 1 P* 0 P* : PX:A EQU 0 D PRECOV EQU 0 V P* j P* t : P* JOURNAL TAPE MAY BE CUT/PERFORATED FOR PTS 6223 BY ~ P* SETTING X:B = 1 P* P* PX:B EQU 0 PCUTPER EQU
0x18a6ec…18a880 Dummy {f00=0x007b, f01=0x0190, f02=»* P* PX:C EQU 0 PCHR13 EQU 0 & P* : P* D PX:D EQU 0 N PCHR14 EQU 0 ` P* t P* ~ 2 P* PRINTING VOUCHER/PASSBOOK, IS COMPLETED IF : P* PRINT OBJECT IS REMOVED UNDER PRINTING IF X:E = 1 P* P*
0x18a880…18aa14 (1, 241) Dummy {f00=0x007b, f01=0x0190, f02=»T X < P* IS INACTIVE,END OF REQUEST MAY BE CHOSEN BY SETTING > P* THE CONSTANT RELEND=1. RETURN CODE NOT OPERABLE IS SET J P* P* PX:F EQU 0 PRELEND EQU 0 P* P* . P* A PROGRAM VERSION USING TOSS MMU PAGING
0x18aa14…18aba8 Dummy {f00=0x007b, f01=0x0190, f02=»ED INSTRUCTION l . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* H PCPU852 EQU 0 R P* f P* p P* MMU BUFFER SIZE z P* P* PX:H EQU 20 PDVBLEN EQU 100 P* P EJECT P* P* P**********
0x18aba8…18ad3c Dummy {f00=0x007b, f01=0x0190, f02=»/20 RETURN CODE. END OF JOURNAL TAPE P* , P* 6 0 PVOIN EQU /8 'VOUCHER IN' BIT IN DATA-REQUEST @ 2 PEOJT EQU /4 'END OF JOURNAL' BIT IN DATA-REQ. t @ PVOCHA EQU /200 BIT #6 DWTTST;VOUCHER STATUS CH. NOT ALLOWED 4 PMESS EQU /400 BIT #5 DWTTS
0x18ad3c…18aed0 Dummy {f00=0x007b, f01=0x0190, f02=»UMMY ~ , PREMOT EQU /01 RESET PRINT BUFFER REMOTE * PTAB EQU /11 TABULATION CHAR IN BUFFER < PCR1 EQU /0D CR JOURNAL TAPE j PLF1 EQU /18 LF JOURNAL TAPE . PCR2 EQU /09 CR TALLY ROLL,VOUCHER/PASSBOOK PLF2 EQU /19 LF TALLY ROLL $ PLD
0x18aed0…18b064 Dummy {f00=0x007b, f01=0x0190, f02=»OR INSERTION OF VOUCHER/PASSBOOK ~ ( PREL EQU /1B RELEASE VOUCHER/PASSBOOK ( " PAPH EQU /1D ATTACH PRINT HEAD T " PRPH EQU /1E RETURN PRINT HEAD z 4 PTETX EQU /83 LAST DUMMY AFTER GRASP AND RELEASE P* P* P*********************
0x18b064…18b1f8 Dummy {f00=0x007b, f01=0x0190, f02=» P IFT MMUPAG=0 PSTART EQU DWTDRD P XIF 6 P* B P IFT MMUPAG=1 L PSTART EQU DWTDRD+4 b P XIF | P* . PDWTRLN EQU START+/12 REQUESTED LINE NUMBER , PDWTALN EQU START+/13 ACTUAL LINE NUMBER P* P EJECT
0x18b1f8…18b38c Dummy {f00=0x007b, f01=0x018e, f02=» IFT CUTPER=0 PBUF2 DATA /0382 STX P XIF 2 P IFT CUTPER=1 > PBUF2 DATA /0482 STX T P XIF p $ P DATA /091D,/2000 CR2,APH,SPACE | & PBUF3 DATA /0382,/091D STX,CR2,APH 4 PBUF5 DATA /041B,/9783,/8200 REL,ETB,DUMMY,STB =2 P*
0x18b38c…18b520 Dummy {f00=0x007b, f01=0x0190, f02=» P DATA 2 DEVICE INDEX PTPAD EQU * ADDRESS BLOCK P DATA ACTP ACTIVATIONDRIVER @ " P DATA 0 ABORT ROUTINE ADDRESS d P DATA IHTP INTERRUPTHANDLER P DATA RCTP RECOVERY ROUTINE P* $ P* TABLE TO GET ROOMLESS POINT P*
0x18b520…18b6b4 (1, 242) Dummy {f00=0x007c, f01=0x0190, f02=» PLFTAB EQU * , P DATA /1819 LINE FEED JOURNAL/TALLY ROLL P* L P* V P IFT CUTPER=1 ` : PCPTAB DATA /1F0F CODES FOR PERFORATE/CUT JOURNAL TAPE v P XIF PTPTAB EQU * ORDER TABLE P DATA /0002,/0607,/080D P IFT CUT
0x18b6b4…18b848 Dummy {f00=0x007c, f01=0x0190, f02=»P P* 2 P* THIS IS THE ACTIVATION PART OF THE DRIVER > P* CHECKS VALIDITY OF ORDERS AND JUMPS TO ORDER PROCESSOR J P* P* P* PACTP EQU * ACTIVATION ENTRY P* P* < P* GET DWT INDEX: 0=JOURNAL,1=TALLY,2
0x18b848…18b9dc Dummy {f00=0x007c, f01=0x0190, f02=»WTOR+1,A6 SAVE NEW ORDER IN DWT P LDK A4,0 ACTIVATION ( PACT005 LDK A3,TPLEN-1 D 2 PACT010 CC A7,TPTAB,A3 FIND OUT IF LEGAL ORDER b P RF(E) ACT020 VALID ORDER P SUK A3,1 P RB(NN) ACT010 TRY NEXT P* P ABL DISIOE ILLEGA
0x18b9dc…18bb70 Dummy {f00=0x007c, f01=0x0190, f02=»,A3 EXECUTE ORDER : PTPFUC DATA TPTEST,TPTEST,TP200,TP405,ACT055,ACT050 =1 P IFT CUTPER=1 X P DATA TP700,TP750 n P XIF P DATA TP800,TP900 P EJECT =1 P* =1 P* =1 P* ORDER 00: TEST =1 J P*
0x18bb70…18bd04 Dummy {f00=0x007c, f01=0x0190, f02=»TPTEST LDK A2,STX SEND STX =2 P CF A5,OUTPUT =2 & P LDK A2,/02 SEND CHAR /02 =2 @ P CF A5,OUTPUT =1 d * P LDK A2,0 SEND CHAR /00=END OF TEST =1 ~ P CF A5,OUTPUT =1 P RF TPDUMY =1 P EJECT P* P* , P* ORDER
0x18bd04…18be98 Dummy {f00=0x007c, f01=0x0190, f02=»T050 LD A1,ECBCW,A8 GET LINE NUMBER FROM CONTROL WORD IN ECB P RF ACT085 D P* V , PACT055 LD A3,ECBBA,A8 GET BUFFER ADDRESS ` & P LC A3,1,A3 GET CONTROL CHARACTER $ P ANK A3,/FF REQUESTED LINE STEPS P SUK A3,/39 P RF(G) ACT070 > /3
0x18be98…18c02c Dummy {f00=0x007c, f01=0x0190, f02=»1-9 LF r P ADK A3,/5 P RF(Z) TP605 /2B = NO LF PACT070 LDK A3,1 ONE LF @ 4 PACT080 LC A1,DWTRLN,A6 GET LINE NUMBER FROM DWT ^ * P SUR A1,A3 GET REQUESTED LINE POSITION 2 PACT085 RF(NN) ACT090 LINE POSITION LESS ZERO ? * P LDK A1,0 YES;
0x18c02c…18c1c0 Dummy {f00=0x007c, f01=0x0190, f02=»LINE NUMBER p P RF TP605 P EJECT & P* 4 P* > P* H P* ORDER 06 : PRINT JOURNAL R P* v P* P* * PTP200 LDKL A3,BUF1 SEND CR1 AND ATTACH PTP210 EQU * 0 P LC A1,DWTST,A6 GET LEFT BYTE IN STATUS WORD $
0x18c1c0…18c354 (1, 243) Dummy {f00=0x007c, f01=0x018e, f02=»1,3 REQUESTED LENGTH 0-2 ? & P RF(N) TP230 YES; COMPLETE REQUEST " P RF(P) TP215 L P LD A1,2,A8 BUFFER ADDRESS ` P LC A2,2,A1 THIRD CHARACTER $ P CCK A2,/2020 CONTROL CHARACTER P RF(NL) TP215 P LDR A4,A2 SAVE CHAR =2 P LDK
0x18c354…18c4e8 Dummy {f00=0x007c, f01=0x0190, f02=» v P CF A5,OUTPUT =2 P RF TP220 " PTP215 EQU * 4 P CF A5,BUFCHR SEND BUFFER H " P CF A5,PRBUF PRINT ECB-BUFFER j PTP220 EQU * P LDK A1,0 6 PTP230 LDKL A2,/FDFF VOUCHER STATUS CHANGE ALLOWED P ANS A2,DWTST,A6 P
0x18c4e8…18c67c Dummy {f00=0x007c, f01=0x0190, f02=» PTPLF EQU * P LDK A2,STX SEND STX =2 P CF A5,OUTPUT =2 : P LDR A1,A1 T P RF(NE) TPLF10 f " P LDK A2,RPH DETACH PRINT HEAD | P CF A5,OUTPUT SEND PTPLF10 EQU * P SUK A7,8 ( P RF(NN) TPL010 NOT JOURNAL AND TALLY
0x18c67c…18c810 Dummy {f00=0x007c, f01=0x0190, f02=»8 GET REQUESTED LENGTH | * P ST A1,ECBEL,A8 STORE EFFECTIVE LENGTH ! P EJECT ! L P* ! Z P* ! d P* COMMON END OF PRINT ! n P* ! P* ! " P* SEND LAST DUMMY CHARACTER ! P* ! PTPDUMY EQU * ! P LDK A2,ETB SEND ETB =2 ! P C
0x18c810…18c9a4 Dummy {f00=0x007c, f01=0x0190, f02=»ARACTER ! l P* " PTPTST EQU * " . P SUK A7,2 TEST STATUS : VOUCHER/PASSBOOK ? " . P RF(NZ) TST010 NO " ` $ PTST005 ANK A2,VOIN VOUCHER OUT ? " z P RF(NZ) ENDIO NO " P RF TST015 YES " P* " PTST010 SUK A7,4 " P IFT CUTPER=0 " * P
0x18c9a4…18cb38 Dummy {f00=0x007c, f01=0x0190, f02=» * " P XIF # & P ANK A2,EOJT END OF JOURNAL TAPE? # $ P RF(NZ) ENDIO NO: PERFORM ENDIO # @ ( PTST015 ORK A1,PROUT SET RETURN CODE: # h ( P END OF JOURNAL TAPE, VOUCHER OUT # P* # P* # , P* PERFORM END I/O AND GO TO DISPATCHER # P* #
0x18cb38…18cccc Dummy {f00=0x007c, f01=0x0190, f02=» # PTST020 SUK A7,16 $ " P RB(L) ENDIO VOUCHER/PASSBOOK $ P SUK A7,4 $ F P RB(G) ENDIO GRASP,RELEASE $ X P RB TST012 CUT,PERFORATE $ z P XIF $ P EJECT $ P* $ P* $ P* $ $ P* ORDER 06 : PRINT TALLY ROLL $ P* $ P* $
0x18cccc…18ce60 Dummy {f00=0x007c, f01=0x0190, f02=» LDKL A1,VOCHA $ @ P ORS A1,DWTST,A6 INDICATE VOUCHER STATUS CHANGE NOT ALLOWED % P RB TP210 % Z P* % l P EJECT % v P* % P* % P* % * P* ORDER 06 : WRITE VOUCHER/PASSBOOK % * P* OB : POSITION LIFT AND WRITE % P* % P
0x18ce60…18cff4 (1, 244) Dummy {f00=0x007c, f01=0x0190, f02=» % P* & P* & * P* SEND ELEVATOR UP/DOWN UNTIL ACTUAL & & P* LINE NUMBER IS EQUAL REQUESTED & J P* & t P* & ~ . PTP610 CC A3,DWTRLN,A6 COMPARE LINE NUMBER & P RF(E) TP650 EQUAL & " P RF(G) TP630 SEND ELEVATOR UP & " P LDK A2,LDO SE
0x18cff4…18d188 Dummy {f00=0x007c, f01=0x0190, f02=»3,1 DECREMENT ACTUAL LINE NUMBER & P* ' ( & PTP640 CF A5,OUTPUT SEND LIFT CHAR ' 2 P* ' , P SC A3,DWTALN,A6 SAVE ACTUAL LINE NUMBER ' f P ANK A2,VOIN VOUCHER IN ? ' P IFT COMPL=0 ' & P ABL(Z) RCTP01 NO: ERROR RECOVERY ' , P RB TP610 YES: CHE
0x18d188…18d31c Dummy {f00=0x007c, f01=0x0190, f02=»VOUCHER OUT' ' | , P ORS A1,ECBRC,A8 INDICATE IN RETURN CODE ( P RB TPDUMY ( D P XIF ( V P EJECT ( b P* ( p P* ( z , P* ORDER 06 AND 0B: LIFT IS POSITIONED ( * P* ATTACH AND PRINT ( P* ( P* ( PTP650 EQU * ( &
0x18d31c…18d4b0 Dummy {f00=0x007c, f01=0x0190, f02=» AND 26 CUT AND PERFORATE JOURNAL ( P* ) , PTP700 EQU * ) 6 P LDK A3,1 SET INDEX =4 ) J P RF TP760 ) h PTP750 EQU * ) z P LDK A3,0 SET INDEX =4 ) PTP760 LDK A2,STX SEND STX =4 ) P CF A5,OUTPUT =4 ) P LC A2,CPTAB,A3 GET CHAR =4 )
0x18d4b0…18d644 Dummy {f00=0x007c, f01=0x0190, f02=»ASE VOUCHER/PASSBOOK ) l P* * PTP800 EQU * * & P CF A5,GRASPA * : P RB TPDUMY * P PTP900 EQU * * b P CF A5,RELEAS * v P RB TPDUMY * P * P EJECT * P* * P* P R B U F * P* * F P* SUBROUTINE TO SEND CHARACTERS FROM ECB
0x18d644…18d7d8 Dummy {f00=0x007c, f01=0x018e, f02=»ST REQUESTED LENGTH * " P LD A3,ECBBA,A8 BUFFER ADDRESS + ( P* SKIP PRECEDING SPACES IN BUFFER + B P ADK A3,2 + n " PPRB010 LCR A1,A3 GET CHARACTER + P CCK A1,/2020 + P RF(NE) PRB050 NOT BLANK + P ADK A3,1 BLANK + P SUK A4,1 + " P R
0x18d7d8…18d96c Dummy {f00=0x007c, f01=0x0190, f02=» + n ( P ADR A1,A4 LAST CHARACTER IN BUFFER , P LC A1,-1,A1 GET CHAR , 4 * P CCK A1,/0909 CARRIAGE RETURN - CR2 ? , R P RF(E) PRB060 YES , * P CCK A1,/0D0D CARRIAGE RETURN - CR1 ? , P RF(E) PRB060 YES , P LDK A1,0 DUMMY CHARACTER , P RF
0x18d96c…18db00 Dummy {f00=0x007c, f01=0x0190, f02=»00 SUK A4,1 DECREMENT REQUESTED LENGTH , P RF(NN) PRB105 PRINT BUFFER - . 6 P LD A2,ECBEL,A8 GET CARRIAGE RETURN CHAR (/09,/0D) - R P RF(E) PRB101 - P CF A5,OUTPUT SEND CHAR - PPRB101 EQU * - P LDK A2,ETB - & P CF A5,OUTPUT SEND END OF MESS
0x18db00…18dc94 (1, 245) Dummy {f00=0x007c, f01=0x018e, f02=» ORS A1,DWTST,A6 - PPRB102 RTN A5 . P EJECT . . P* . < P* . F P* . P P* PRINT BUFFER . Z P* . r P* . | PPRB105 EQU * . 2 P ADR A3,A4 ADDRESS TO CHARACTER TO BE PRINTED . P SUK A7,7 CHECK ORDER . P RF(L) PRB200 PRINT JOURNA
0x18dc94…18de28 Dummy {f00=0x007c, f01=0x0190, f02=» P* / P ANK A2,VOIN VOUCHER IN ? / " P RF(Z) PRB200 NO. GO AND PRINT / 0 " P ADK A5,4 RESET STACK POINTER / V * P RB TP405 SEND LIFT TO TOP AND RELEAS / | P* / P* / P* / P* PRINT VOUCHER/PASSBOOK / P* / P* / $ PPRB110 ANK
0x18de28…18dfbc Dummy {f00=0x007c, f01=0x018e, f02=»45 / P XIF 0 $ P LDR A1,A4 COPY REQUESTED LENGTH 0 P SUK A1,2 R.L. < 3? 0 > $ P RF(N) PRB200 YES: NO TABULATION 0 Z P LDK A1,TAB 0 P CC A1,-2,A3 TABULATION? 0 P RF(NE) PRB200 NO 0 P EJECT 0 P* 0 P* 0 4 P* IF TABULATION CHAR
0x18dfbc…18e150 Dummy {f00=0x007c, f01=0x0190, f02=» 0 P* 1 ( PPRB115 LDK A2,RPH DETACH PRINT HEAD 1 P CF A5,OUTPUT SEND DETACH 1 > , PPRB117 LC A2,-1,A3 GET 1ST TAB POS CHAR 1 ` $ P LCR A1,A3 GET 2ND TAB POS CHAR 1 P ANK A1,/F LINE UNIT 1 P SLL A2,4 1 P ANK A2,/F0 LINE DECADE 1 " P O
0x18e150…18e2e4 Dummy {f00=0x007c, f01=0x018e, f02=»BC,A6 COMPARE WITH ACTUAL TAB. POS. 1 P RF(NG) PRB125 PRINT 2 , P* 2 H P* 2 R P* 2 P LDK A2,/20 LOAD BLANK 2 f ( P CF A5,OUTPUT SEND BLANKS OR DETACH 2 P RB PRB117 2 P* 2 P* 2 P* 2 . PPRB125 SUK A4,2 DECREMENT REQUESTED LENG
0x18e2e4…18e478 Dummy {f00=0x007c, f01=0x0190, f02=» 2 P* 3 2 P* GET OUTPUT CHARACTER FROM BUFFER. CHECK IF 3 P* - ROOMLESS POINT 3 H P* - ILLEGAL CHARACTER 3 d & P* - SPECIAL CHARACTER (/13,/14) 3 P* 3 PPRB200 EQU * 3 * PPRB205 LCR A7,A3 LOAD OUTPUT CHARACTER 3 " P CCK A7,/AEAE
0x18e478…18e60c Dummy {f00=0x007c, f01=0x0190, f02=»ACTER 3 v P ANK A7,/F MASK 4 & P LC A7,ROMTAB,A7 GET CODE IN TABLE 4 & P* 4 P P* 4 Z P* 4 d , PPRB210 CCK A7,/2020 ILLEGAL CHARACTER ? 4 n P RF(L) PRB225 YES 4 , PPRB215 CCK A7,/5F5F ILLEGAL CHARACTER ? 4 P RF(NG) PRB230 NO 4 P* 4
0x18e60c…18e7a0 Dummy {f00=0x007c, f01=0x0190, f02=»FT CHR14=1 4 & P CCK A7,/1414 SPECIAL CHARACTER ? 5 P RF(E) PRB230 YES 5 < P XIF 5 V P* 5 b " P LDK A1,CCERR CODE CHECK ERROR 5 l * P ORS A1,ECBRC,A8 STORE IN RETURN CODE 5 P LD A7,DWTOR,A6 GET ORDER 5 P ANK A7,/FF 5 P RF PRB245 5 P
0x18e7a0…18e934 (1, 246) Dummy {f00=0x007d, f01=0x018e, f02=»PUT SEND CHARACTER 5 , PPRB245 SUR A3,A4 START OF BUFFER ADDRESS 6 P RB PRB100 6 J P* 6 P* 6 f P* 6 p P EJECT 6 z P* 6 P* I H T P 6 P* 6 0 P* INTERRUPT HANDLER: PROCESS OF INTERRUPT 6 P* 6 P* 6 P* 6 PIHTP E
0x18e934…18eac8 Dummy {f00=0x007d, f01=0x018e, f02=» P RF(NG) IHTP20 YES =1 7 , P LDR A1,A1 RETURN CODE FROM CHANNEL UNIT 7 " P =1 7 R P IFT RELEND=0 7 ` * P RF(NZ) RCTP10 YES GO TO DISPATCHER =1 7 v P XIF 7 P IFT RELEND=1 7 ( P RF(NZ) IHTP30 YES FINISH REQUEST =1 7 P XIF 7 8 PIHTP10 ABL
0x18eac8…18ec5c Dummy {f00=0x007d, f01=0x0190, f02=» 7 P ABL ENDIO 8 P* 8 P* 8 $ P* 8 . P EJECT 8 8 P* 8 F P* R C T P 8 P P* 8 d > P* RECOVERY ROUTINE: REPRINTS RUNNING REQUEST AT POWER ON 8 n P* 8 PRCTP EQU * 8 P IFT CPU852=1 8 & P CF A15,SAVE8 SAVE A1-A8 ON STACK 8
0x18ec5c…18edf0 Dummy {f00=0x007d, f01=0x0190, f02=»SY =3 8 t P ANS A2,DWTST,A6 =3 9 P LD A2,DWTECB,A6 =3 9 * ( P RF(Z) RCTP05 REQUEST NOT RUNNING =3 9 F P* 9 r $ PRCTP01 LDKL A5,DWTSB2 STACK BASE 9 | P ADR A5,A6 9 < P LDK A2,REMOT RESET PRINT BUFFER REMOTE AND LOCAL DUMMY 9 P CF A5,OUTPUT SEND
0x18edf0…18ef84 Dummy {f00=0x007d, f01=0x018e, f02=» 2 P SC A2,DWTALN,A6 STORE 0 AS ACTUAL LINE NUMBER : P LDK A2,LFF LIFT TO TOP : : P CF A5,OUTPUT : Z P LD A2,DWTECB,A6 =3 : p & P RF(NZ) RCTP07 REQUEST RUNNING =3 : 0 P LDK A2,ETX SEND LAST DUMMY TO STOP TIMER =3 : P CF A5,OUTPUT =3 : P ABL
0x18ef84…18f118 Dummy {f00=0x007d, f01=0x0190, f02=» P XIF ; P LDK A4,1 IND RECOVERY ; * P ABL ACT005 START RECOVERY OF PRINTER ; . & PRCTP10 ABL TDISP GO TO DISPATCHER ; P EJECT ; P* ; P* B C D T B Y ; P* ; 4 P* SUBROUTINE TO CONVERT TO BINARY FROM DECIMAL ; P* ; P* ;
0x18f118…18f2ac Dummy {f00=0x007d, f01=0x0190, f02=»BY 6 ; | P RB BCDTB1 < " PBCDTB2 RTN A5 RETURN TO CALLER < P* < F P* < P P* < Z P* < d P* < n P* G R A S P < x P* < 4 P* SUBROUTINE TO SEND GRASP TO VOUCHER/PASSBOOK < P* < P* < PGRASPA EQU * < P LDK A2,STX SEND
0x18f2ac…18f440 Dummy {f00=0x007d, f01=0x0190, f02=»DK A2,GRA GRASP < P CF A5,OUTPUT = P ANK A2,VOIN VOUCHER IN ? = . P RF(NZ) GRAS10 YES = P P LDK A2,ETB SEND ETB =2 = j P CF A5,OUTPUT =2 = " P LDK A2,TETX DUMMY AFTER GRASP = P CF A5,OUTPUT = P LDK A2,STX SEND STX =2 = P CF A5,O
0x18f440…18f5d4 (1, 247) Dummy {f00=0x007d, f01=0x0190, f02=» = P* > P EJECT > P* > P* > * P* R E L E A S > 4 P* > L 2 P* SUBROUTINE TO SEND LIFT TO TOP AND RELEASE > V P* > P* > P* > PRELEAS EQU * > P LDK A1,0 > 0 P SC A1,DWTALN,A6 SET ACTUAL LINE NUMBER TO 0 > ( P LDK
0x18f5d4…18f768 Dummy {f00=0x007d, f01=0x0190, f02=»,OUTPUT > P ANK A2,VOIN VOUCHER IN ? ? P RF(Z) BUFRTN ? 2 P* ? H P* B U F C H R ? R P* ? j < P* SUBROUTINE TO OUTPUT A NUMBER OF CHARACTERS GIVEN IN ? t ( P* FIRST CHARACTER IN OUTPUT BUFFER ? P* ? P* ? 4 PBUFCHR LCR A4,A3 GET
0x18f768…18f8fc Dummy {f00=0x007d, f01=0x40fe, f02=»TER ? t P CF A5,OUTPUT SEND CHARACTER @ P SUK A4,1 DECREMENT COUNTER @ 0 & P RB(NZ) BUFC10 NOT LAST CHARACTER @ T PBUFRTN EQU * @ ~ P RTN A5 RETURN TO CALLER @ P* @ P* @ P* @ P* @ P* @ P* @ P END @ @ @ A4,A3 GET
0x18f8fc…18fa90 Dummy {f00=0x007d, f01=0x2008, f02=» A * 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
0x18fa90…18fc24 Dummy {f00=0x007d, f01=0x018e, f02=» , ( Y _` B P $$ R % C , ( y * ! W Y +P Y *P Y ( 4 , ( P Y )P R _Q P OR d , ( R W " ! B W W , ( @ 0 Z ! B Z Z& , ( X . 0
0x18fc24…18fdb8 Dummy {f00=0x007d, f01=0x0190, f02=» DISEND , ( OA Y C ! " * & i @ Q R X # P X R ;GV X J LDREG x , ( @ P y P X DWTA3 DWTSB2 , ( @ R ;GV X X , *
0x18fdb8…18ff4c Dummy {f00=0x007d, f01=0x0190, f02=» h , ( :d Y > > ? 8 R @R , ( ) V @% =cW R P R P R P W 8 , ( I 9 W $ P W _ $ P h , ( i _$ _*_, _ %0=c X , ( 0P > 0 > >_ B 1 >
0x18ff4c…1900e0 Dummy {f00=0x007d, f01=0x417c, f02=» @ @ T T ! & 'T /P f H D ! 3 R 7 AV E OP _P$ kR { W PH P> P P R Q " H D ! P R R W Wr W T W P 'W 1P 9 IP g kQf n H D ! mR$ uP {R6 V2 P P8 R2 V. P T W T T W H D !
0x1900e0…190274 (1, 248) Opaque[0x194]
0x190274…190408 # DirEnt {nam=»DRGP01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0fb0, f03=0x0000}
0x190274…190408 IdxSect {
0x190274…190408 f00 = 0x007d // 0x190274 @0x0
0x190274…190408 f01 = 0x000e // 0x190276 @0x2
0x190274…190408 gno = [ // 0x190278 @0x4
0x190274…190408 [0x00]: C0x007d.0x2.0
0x190274…190408 [0x01]: C0x007d.0x3.0
0x190274…190408 [0x02]: C0x007e.0x0.0
0x190274…190408 [0x03]: C0x007e.0x1.0
0x190274…190408 [0x04]: C0x007e.0x2.0
0x190274…190408 [0x05]: C0x007e.0x3.0
0x190274…190408 [0x06]: C0x007f.0x0.0
0x190274…190408 ]
0x190274…190408 }
0x190408…19059c Dummy {f00=0x007d, f01=0x0190, f02=» 2 P IDENT DRGP01 REL 9.2 80-01-03 870105040920 P : P =4,MMU BUFFER CONDITION B P REL 9.2 79-11-16 d P =3,RB - ABL P REL 9.1 79-05-23 P UPDATE PRR 9.1 - REL 9.1 P PRR 9.1 79-04-25 P REL 9.1 79-04-06
0x19059c…190730 Dummy {f00=0x007d, f01=0x0190, f02=» " P =1,ECHO OF LF AND CR, ABIS P REL 8.2 78-09-15 * P* F P* P 6 P************************************************** Z P* $ P* PHILIPS TERMINAL SYSTEM PTS P* ( P* DRGP01 = DRIVER GENERAL PRINTER P* P*
0x190730…1908c4 Dummy {f00=0x007d, f01=0x018e, f02=»DRIVER HANDLES GENERAL TERMINAL PRINTER < P* PTS 6321 CONNECTED TO THE SYSTEM VIA CHLT OR CHRT. 0 P* p 8 P* THE DRIVER ALSO INCLUDES DEVICE DEPENDENT ECHO z 6 P* FUNCTIONS, WHICH MAKES IT POSSIBLE TO USE THE 6 P* GENERAL PRINTER AS
0x1908c4…190a58 Dummy {f00=0x007d, f01=0x0190, f02=» 0 P* THE DRIVER CONSISTS OF FOLLOWING PARTS: P* 8 & P* A C G P ACTIVATION PART B P* l ( P* I H G P INTERRUPT HANDLER v P* ( P* R C G P RECOVERY ROUTINE P* & P* E C H O G P ECHO FUNCTIONS
0x190a58…190bec Dummy {f00=0x007d, f01=0x0190, f02=» 05: BASIC WRITE " P* 06: STANDARD WRITE P* @ P* NORMAL REGISTER USAGE J P* l " P* REGISTER A1 = RETURN CODE v ( P* A2 = OUTPUT CHARACTER $ P* A3 = BUFFER INDEX $ P* A4 = WORK
0x190bec…190d80 Dummy {f00=0x007d, f01=0x018e, f02=» A8 = ECB-ADDRESS P* P* $ P* SYSTEM ADAPTATION . P* L : P* THE CODES FOR ECHO OF BACKSPACE (GPBSP) AND CLEAR V ( P* (GPCLR) KEYS SHOULD BE DEFINED. P* 8 P* BY MEANS OF CONDITIONAL ASSEMBLY THE DRIVER IS 0 P*
0x190d80…190f14 (1, 249) Dummy {f00=0x007d, f01=0x0190, f02=» X P* D P* --EXCLUDE ECHOING OF AN EXTRA SPACE BETWEEN EACH CHARACTER 6 P* --SUPPRESS ECHOING OF END OF RECORD CHARACTER Z * P** --SUPPRESION OF TRAILING BLANKS @ P* --END OF REQUEST WHEN PRINTER HARDWARE BECOMES INACTIVE P*
0x190f14…1910a8 Dummy {f00=0x007d, f01=0x0190, f02=» P EJECT P* P* P* & P* 0 P*********** : P* ENTRIES * N P*********** b P* v P* P* ( P ENTRY GPAD ADDRESS TO ADDRESSBLOCK 0 P ENTRY ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE P* P* P
0x1910a8…19123c Dummy {f00=0x007d, f01=0x0190, f02=»************************* P* " P* , $ P EXTRN DISIOE I/O REQUEST ERROR 6 . P EXTRN OUTPUT SUBROUTINE TO SEND CHARACTER ^ P EXTRN TDISP DISPATCHER > P EXTRN LDREG LOAD REGISTERS A4, A3, A5, A7, A8 AND RETURN P EXTRN TENDIO END I/O
0x19123c…1913d0 Dummy {f00=0x007d, f01=0x0190, f02=»R FROM ECB-BUFFER v P EJECT P* ( P* 2 P************************ < P* DWT PARAMETERS * P************************ | P* P* P EXTRN DWTST STATUS EXTRN DWTBC BYTE COUNTER P EXTRN DWTOR ORDER P
0x1913d0…191564 Dummy {f00=0x007d, f01=0x018e, f02=» P* P* : PSOH EQU /01 RESET PRINT BUFFER REMOTE AND LOCAL DUMMY PSTX EQU /82 START OF MESSAGE Z PETB EQU /97 END OF MESSAGE ~ PETX EQU /03 LAST DUMMY PCR EQU /0D CARRIAGE RETURN PLF EQU /0A LINE FEED PFFED EQU /0C
0x191564…1916f8 Dummy {f00=0x007d, f01=0x0190, f02=» * P************************************** * P* CONDITIONAL ASSEMBLY * 6 * P************************************** d P* 2 P* IT IS POSSIBLE TO EXCLUDE ROOMLESS POINT $ P* FUNCTION BY SETTING X:A = 0 P* PX:A
0x1916f8…19188c Dummy {f00=0x007d, f01=0x0190, f02=»NG X:B=1 l P* PX:B EQU 0 PTRETON EQU 0 , P* @ 4 P* ACCEPTANCE OF SPECIAL CHARACTER /14 CAN BE J 0 P* INCLUDED IN THE DRIVER BY SETTING X:C=1 P* PX:C EQU 0 PFJOTON EQU 0 P* . P* IT IS POSSIBLE TO E
0x19188c…191a20 Dummy {f00=0x007d, f01=0x0190, f02=» EQU 0 P* P EJECT P* & P* 0 8 P* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE : 8 P* TO SUPPRESS ECHOING OF END OF RECORD CHARACTER. v 8 P* THIS IS ATTAINED BY SETTING THE CONSTANT X:E=0. P* PX:E EQU 0
0x191a20…191bb4 (1, 250) Dummy {f00=0x007e, f01=0x018e, f02=»0 PSUPSPA EQU 1 P* ( P* END OF REQUEST IN SITUATIONS WHERE ( , P* THE SELECTOR UNIT OR PRINTER HARDWARE T * P* IS INACTIVE CAN BE CHOSEN BY SETTING P* THE CONSTANT RECEND = 1 PX:G EQU 0 PRECEND EQU 0 P* . P* A
0x191bb4…191d48 Dummy {f00=0x007e, f01=0x0190, f02=» 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. B P* t PCPU852 EQU 0 ~ P* P* MMU BUFFER SIZE P* PX:H EQU 120 PDVBLEN EQU 162 P* =1 , P* SPECIAL CO
0x191d48…191edc Dummy {f00=0x007e, f01=0x018e, f02=» DWT-DISPLACEMENT * $ P******************************** $ P* L P* V 0 PDWTDRD EQU /10 START OF DRIVER DEFINED PART ` P* P IFT MMUPAG=0 PSTART EQU DWTDRD P XIF P* P IFT MMUPAG=1 PSTART EQU DWTDRD
0x191edc…192070 Dummy {f00=0x007e, f01=0x0190, f02=» , P* SPECIAL KEYS FOR ECHO FUNCTION * * P************************************** 4 P* b PGPBSP EQU /2D BACK SPACE l PGPCLR EQU /3F CLEAR P* P******************** P* RETURN CODES * P******************** P*
0x192070…192204 Dummy {f00=0x007e, f01=0x0190, f02=»OPERR EQU /1 NOT OPERABLE, POWER OFF P* , P EJECT 6 P* D P* N P********** X P* TABLES * j P********** | P* P* P IFT CROOM=1 P* PROMTAB EQU * * P TABLE FOR ROOMLESS POINT CHARACTERS ( P DATA
0x192204…192398 Dummy {f00=0x007e, f01=0x0190, f02=»DEVICE INDEX PGPAD EQU * ADDRESS BLOCK P DATA ACGP ACTIVATION DRIVER 4 " P DATA 0 ABORT ROUTINE ADDRESS X P DATA IHGP INTERRUPT HANDLER ~ P DATA RCGP RECOVERY ROUTINE . P DATA ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE P EJECT P*
0x192398…19252c Dummy {f00=0x007e, f01=0x0190, f02=»IS SENT TO PRINTER AND RETURN CODE n < P* IS SET IF PAPER OUT OR READY SWITCH OFF. * H P* RETURN CODE IS ALSO SET IF TIME-OUT IS SIGNALLED FROM j P* CHANNEL UNIT. P* > P* ORDER 05: BASIC WRITE. CHARACTE
0x19252c…1926c0 Dummy {f00=0x007e, f01=0x0190, f02=»TER FROM V < P* ECB-BUFFER AFTER INDIVIDUAL CODE CHECK. P* P PACGP EQU * Z P LDK A2,STX START OF MESSAGE l P LDR A3,A7 =1 P RF(Z) ACGP10 ORDER 0 =2 P SUK A3,5 =1 P RF(E) ACGP09 ORDER 5 =1 P SUK A3,1 =
0x1926c0…192854 (1, 251) Dummy {f00=0x007e, f01=0x0190, f02=»8 GET BUFFER ADDRESS =1 ( P LC A3,1,A3 GET CONTROL CHARACTER =1 P ANK A3,/FF =1 L PACGP01 SUK A3,/2B =1 d $ P RF(E) ACGP06 CONTROL CHAR 2B =1 P CF A5,OUTPUT SEND STX =1 P LDK A2,CR =1 P CF A5,OUTPUT =1 P IFT ABIS=1
0x192854…1929e8 Dummy {f00=0x007e, f01=0x0190, f02=» P SUK A3,/30-/2B =1 * P RF(NE) ACGP03 NOT CONTROL CHAR 30 =1 $ P CF A5,OUTPUT =1 R P LDK A2,LF =1 l , PACGP03 LDK A1,1 RESET HEAD POS COUNTR =1 P ST A1,DWTAP,A6 =1 * PACGP06 LDK A3,2 START BUFFER INDEX =1 PACGP09 CF A5
0x1929e8…192b7c Dummy {f00=0x007e, f01=0x0190, f02=»ST OF BOTH SUM OFF AND PRINTER NOT THERE =2 t P* =2 6 $ PACGP10 LDK A2,2 SEND CHAR /02 =2 F P CF A5,OUTPUT =2 n * P LDK A2,0 SEND CHAR /00=END OF TEST =2 P CF A5,OUTPUT =2 P RF AGP410 =2 P EJECT P* & P* GET,
0x192b7c…192d10 Dummy {f00=0x007e, f01=0x0190, f02=»TER UPDATING p PACGP19 EQU * * P LDKL A4,/400 INDICATE LINE FEED DONE ( P ORS A4,DWTST,A6 V P IFT SUPSPA=1 n 4 P CF A15,SKIPSP SKIP SPACES IN END OF ECB-BUFFER P XIF P LDK A4,0 6 PACGP20 CF A15,GETCHR GET CHARACTER FROM ECB-BU
0x192d10…192ea4 Dummy {f00=0x007e, f01=0x0190, f02=»WRITE | $ P SUK A1,9 HARDWARE TABULATION ? P RF(NE) ACGP22 6 0 P ST A4,DWTAP,A6 RESET HEAD POSITION POINTER L P RB ACGP17 * PACGP22 SUK A1,8 TABULATION CHARACTER ? P RF(E) ACGP40 P IFT ABIS=1 =1 P CWK A2,/07 BELL ? =1
0x192ea4…193038 Dummy {f00=0x007e, f01=0x0190, f02=» ? x P* P XIF P* P IFT TRETON=0 * P IFT FJOTON=1 @ P* V P SUK A1,3 /14? ` P RB(E) ACGP17 v P SUK A1,/C LESS THAN /20 ? P* P XIF P* P* P IFT TRETON=1 P IFT FJOTON=0 P*
0x193038…1931cc Dummy {f00=0x007e, f01=0x0190, f02=» P IFT FJOTON=1 P* P SUK A1,2 /13? $ P RB(E) ACGP17 : P SUK A1,1 /14? P P RB(E) ACGP17 f P SUK A1,/C LESS THAN /20 ? | P* P XIF P* & P RF(N) ACGP30 YES,CODE CHECK ERROR & P SUK A1,/8E ROOMLESS POINT? (AE
0x1931cc…193360 Dummy {f00=0x007e, f01=0x0190, f02=» SUK A2,/20 TRANSFORM CHARACTER BETWEEN /60 TO /7F & P TO CHARACTER BETWEEN /40 TO /5F : P RB ACGP17 d PACGP24 EQU * v P SUK A1,/D P RF(NZ) ACGP26 NOT CR " P CM DWTST,A6 SET POS LTR.TO 0 ( P CM DWTAP,A6 RESET HEAD POS.POIINTER
0x193360…1934f4 (1, 252) Dummy {f00=0x007e, f01=0x0190, f02=»17 P EJECT P* P* CODE CHECK ERROR " P* @ PACGP30 EQU * J P LDK A1,CCERR ^ P ORS A1,8,A8 RETURN CODE t P RB ACGP20 P EJECT P* P* TABULATION P* PACGP40 EQU * , P CF A15,GETCHR GET F
0x1934f4…193688 Dummy {f00=0x007e, f01=0x0190, f02=»E) ACGP44 0 PACGP43 ADK A2,/A FROM DECIMAL TO HEXADECIMAL P SUK A4,1 F P RB(NE) ACGP43 X 8 PACGP44 SU A2,DWTAP,A6 SUBTRACT HEAD POSITION POINTER n P LC A4,DWTBC,A6 , P SUR A2,A4 AND REQUESTS POSITION COUNTER & P TO GET NUMBER OF SP
0x193688…19381c Dummy {f00=0x007e, f01=0x0190, f02=»UTPUT ( P IM DWTST,A6 INCREMENT BUFFER INDEX P SUK A4,1 : P RB(P) ACGP45 L P LDR A3,A3 RECOVERY? b P RB(NE) ACGP20 ~ * P SC A4,DWTBC,A6 RESET POSITION POINTER P LDK A3,2 START BUFFER INDEX P RB ACGP19 P EJECT P*
0x19381c…1939b0 Dummy {f00=0x007e, f01=0x0190, f02=»O SEND r P ANK A2,/F ! P LC A2,ROMTAB,A2 TRANSFORM ! P* ! B P XIF ! L P* ! X P* ! b P IFF CROOM=1 ! l P* ! P ANK A2,/7F ! P* ! P XIF ! P* ! P RB ACGP17 ! P EJECT ! P* ! P* ! ( P* SEND LAST DUMMY ,
0x1939b0…193b44 Dummy {f00=0x007e, f01=0x0190, f02=»SEND ! PAGP410 LDK A2,ETX LAST DUMMY " P CF A5,OUTPUT SEND " 0 PAGP415 EQU * =1 " J P IFT ABIS=1 =1 " b P ANK A2,/4 PAPER IN ? =1 " z P RF(NZ) AGP420 YES =1 " " P LDK A1,/20 SET RETURN CODE =1 " P XIF =1 " PAGP420 EQU * " 0 P CF
0x193b44…193cd8 Dummy {f00=0x007e, f01=0x0190, f02=» " P LD A3,DWTA3,A6 # P ST A3,6,A8 EFF. LENGTH # P RB AGP415 =1 # @ P EJECT # V P* # d P* # n , P* UPDAPP = SUBROUTINE TO UPDATE HEAD # x , P* POSITION POINTER WHEN END # ( P* OF REQUEST IS REACHED # PUPDA
0x193cd8…193e6c Dummy {f00=0x007e, f01=0x0190, f02=»A3,DWTBC,A6 RESET POSITION COUNTER # P RTN A15 $ , P IFT SUPSPA=1 $ < P EJECT $ R P* $ ` P* $ j * P* SKIPSP = SUBROTINE TO SKIP SPACES $ t ( P* IN END OF ECB-BUFFER. $ 6 P* REQUESTED LENGTH IN ECB IS UPDATED. $ & P
0x193e6c…194000 Dummy {f00=0x007e, f01=0x0190, f02=»ESTED LENGTH(RL) $ | $ P ADR A1,A2 GET ADD END OF BUFFER % PSKIP05 CWK A2,2 % @ P RF(NG) SKIP30 RL < 3 % X P SUK A1,1 DECR. BA % v P LCR A4,A1 GET CHAR % P CCK A4,/2020 SPACE ? % P RF(NE) SKIP20 NO % PSKIP07 SUK A2,1 DECR RL % P RB
0x194000…194194 (1, 253) Dummy {f00=0x007e, f01=0x018e, f02=»R ? % t P RF(NE) SKIP30 NO & P SUK A1,2 DECR BA & & P SUK A2,2 DECR RL & @ P RB SKIP07 GET NEXT & Z P* & v " PSKIP30 ST A2,4,A8 STORE NEW RL & P RTN A15 & P XIF & P EJECT & P* & P* I H G P & P* & P* INTERRUPT &
0x194194…194328 Dummy {f00=0x007e, f01=0x0190, f02=» P LDR A7,A7 ORDER 0? ' P RF(Z) IHGP20 =2 ' . P LDR A1,A1 RETURN CODE FROM CHANNEL UNIT ? ' : P IFT RECEND=0 ' l P RB(NZ) EXIT ' P XIF ' P IFT RECEND=1 ' P RB(NZ) AGP430 ' P XIF ' P ' 4 PIHGP10 ABL LDREG RELOAD A3-A5 AND RETU
0x194328…1944bc Dummy {f00=0x007e, f01=0x018e, f02=» P* E C H O G P ( P* ( 0 P* ECHOGP = DEVICE-DEPENDENT ECHO-ROUTINE ( & P* ( Z PECHOGP EQU * ( d P LDK A4,COSPAC ( x P LDR A7,A7 EOR? ( P RF(N) ECGP17 YES ( P* ( P IFT EORECH=0 ( P* ( P SUK A2,/80 EOR-CHARACTER (
0x1944bc…194650 Dummy {f00=0x007e, f01=0x0190, f02=» P RF(E) ECGP40 BACKSPACE ) P SUK A1,/2 LINE FEED =1 ) $ P RF(E) ECGP10 YES =1 ) D P SUK A1,/3 CR =1 ) ` P RF(E) ECGP10 YES =1 ) x P SUK A1,/B =1 ) P RF(E) ECGP50 CLEAR ) 8 P SUK A1,/20-/8-/10 CHECK THAT CHAR IS WITHIN /20-/5F ) P RF(N)
0x194650…1947e4 Dummy {f00=0x007e, f01=0x0190, f02=»NTER ) p P SUK A4,1 READY ? * P RF(N) ECGP20 YES * & * P RF(P) ECGP60 NO, GO TO CLEAR SECTION * @ P* * n P IFT COSPAC=1 * x P* * P LDK A2,SPACE NO SEND SPACE * P RB ECGP10 * P* * P XIF * P* * 6 PECGP17 CF A15,UPDAPP UPDAT
0x1947e4…194978 Dummy {f00=0x007e, f01=0x0190, f02=»40 EQU * * & P LDK A2,GPBSP BACKSPACE CHARACTER + P RB ECGP10 + : P* + L P* CANCEL + V P* + j PECGP50 EQU * + t " P LDK A2,GPCLR CLEAR CHARACTER + P LDK A4,3 + P RB ECGP10 + PECGP60 LDK A2,LF LINE FEED + P LC A3,DWTBC,A6 +
0x194978…194b0c Dummy {f00=0x007e, f01=0x018e, f02=» A3,0 + * P SC A3,DWTBC,A6 RESET POSITION COUNTER , P RB ECGP20 , < P EJECT , N P* , P* R C G P , f P* , z 0 P* RCGP = RECOVERY ROUTINE GENERAL PRINTER , P* , P* , ( P* RECOVERY IS CARRIED OUT ONLY IF , P* ORDER 6 IS
0x194b0c…194ca0 Dummy {f00=0x007e, f01=0x0190, f02=» , x PRCGP EQU * - P IFT CPU852=1 - & P CF A15,SAVE8 SAVE A1-A8 ON STACK - 0 P XIF - Z P* - f P IFT CPU852=0 - p " P MSR 8,A15 SAVE A1-A8 ON STACK - P XIF - P* - P LD A2,DWTST,A6 BUSY ? - P RB(N) EXIT NO - ( P LDK A2,SOH RESET
0x194ca0…194e34 (1, 254) Dummy {f00=0x007f, f01=0x0190, f02=»YES - P CWK A7,0 ORDER 0? . P ABL(E) ENDIO =3 . & P ABL EXIT =3 . @ PRCGP05 EQU * . V 0 P LC A2,DWTST,A6 GET LEFT BYTE OF STATUS WORD . j P ANK A2,/4 LINE FEED DONE ? . P ABL(E) ACGP NO . P LDK A2,SPACE . P CF A5,OUTPUT SEND SPACE
0x194e34…194fc8 Dummy {f00=0x007f, f01=0x407e, f02=» OF SPACES TO SEND . v P ABL ACGP46 / ( PRCGP10 LDK A1,TPERR SET RETURN CODE / . P ABL AGP430 / Z P END / n@ / zLEFT BYTE OF STATUS WORD . j P ANK A2,/4 LINE FEED DONE ? . P ABL(E) ACGP NO . P LDK A2,SPACE . P CF A5,OUTPUT SEND SPACE
0x194fc8…19515c Dummy {f00=0x007f, f01=0x2008, f02=» 0 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 & (
0x19515c…1952f0 Dummy {f00=0x007f, f01=0x0190, f02=» PRINT HEAD 0 P* 1 P* 1 ( PPRB115 LDK A2,RPH DETACH PRINT HEAD 1 ( P CF A5,OUTPUT SEND DETACH 1 T , PPRB117 LC A2,-1,A3 GET 1ST TAB POS CHAR 1 v $ P LCR A1,A3 GET 2ND TAB POS CHAR 1 P ANK A1,/F LINE UNIT 1 P SLL A2,4 1 P ANK A2,/F0
0x1952f0…195484 Dummy {f00=0x007f, f01=0x0190, f02=»TER 1 j 2 P CC A1,DWTBC,A6 COMPARE WITH ACTUAL TAB. POS. 2 P RF(NG) PRB125 PRINT 2 B P* 2 ^ P* 2 h P* 2 r P LDK A2,/20 LOAD BLANK 2 | ( P CF A5,OUTPUT SEND BLANKS OR DETACH 2 P RB PRB117 2 P* 2 P* 2 P* 2 . PPRB125 SUK A4,2 DE
0x195484…195618 Dummy {f00=0x007f, f01=0x0190, f02=» 2 P* 3 P* 3 P* 3 2 P* GET OUTPUT CHARACTER FROM BUFFER. CHECK IF 3 & P* - ROOMLESS POINT 3 P* - ILLEGAL CHARACTER 3 x & P* - SPECIAL CHARACTER (/13,/14) 3 P* 3 PPRB200 EQU * 3 * PPRB205 LCR A7,A3 LOAD OUTPUT CHARACTER 3
0x195618…1957ac Dummy {f00=0x007f, f01=0x018e, f02=»7,A3 GET OUTPUT CHARACTER 3 P ANK A7,/F MASK 4 " & P LC A7,ROMTAB,A7 GET CODE IN TABLE 4 : P* 4 d P* 4 n P* 4 x , PPRB210 CCK A7,/2020 ILLEGAL CHARACTER ? 4 P RF(L) PRB225 YES 4 , PPRB215 CCK A7,/5F5F ILLEGAL CHARACTER ? 4 P RF(NG) PRB2
0x1957ac…195940 Dummy {f00=0x007f, f01=0x018e, f02=» 4 | P XIF 5 P IFT CHR14=1 5 & P CCK A7,/1414 SPECIAL CHARACTER ? 5 ( P RF(E) PRB230 YES 5 R P XIF 5 l P* 5 x " P LDK A1,CCERR CODE CHECK ERROR 5 * P ORS A1,ECBRC,A8 STORE IN RETURN CODE 5 P LD A7,DWTOR,A6 GET ORDER 5 P ANK A7,/FF 5
0x195940…195ad4 (1, 255) Opaque[0x194]
0x195ad4…195c68 # DirEnt {nam=»DRDI01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0fe8, f03=0x0000}
0x195ad4…195c68 IdxSect {
0x195ad4…195c68 f00 = 0x007f // 0x195ad4 @0x0
0x195ad4…195c68 f01 = 0x0008 // 0x195ad6 @0x2
0x195ad4…195c68 gno = [ // 0x195ad8 @0x4
0x195ad4…195c68 [0x00]: C0x007f.0x1.0
0x195ad4…195c68 [0x01]: C0x007f.0x2.0
0x195ad4…195c68 [0x02]: C0x007f.0x3.0
0x195ad4…195c68 [0x03]: C0x0080.0x0.0
0x195ad4…195c68 ]
0x195ad4…195c68 }
0x195c68…195dfc Dummy {f00=0x007f, f01=0x0190, f02=» 2 P IDENT DRDI01 REL 9.2 79-11-16 870105040920 P : P* B P* L < P******************************************************* V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* * P* DRDI01 = DRIVER INDICATOR DISPLAY P*
0x195dfc…195f90 Dummy {f00=0x007f, f01=0x0190, f02=»* THIS DRIVER HANDLES OUTPUT TO SIGNAL DISPLAYS PTS 6241 > P* AND 6242. IT ALSO CONTROLS LAMPS ON KEYBOARDS PTS 6232 B " P* 6233, 6236 AND 633, 62361. P* @ P* THESE DEVICES MUST BE CONNECTED TO CPU VIA CHLT OR CHRT P* 4 P* TH
0x195f90…196124 Dummy {f00=0x007f, f01=0x0190, f02=»LER t P* " P* R C D I : RECOVERY ROUTINE P* < * P* THE FOLLOWING ORDERS ARE TREATED: F P* t " P* ORDER 05: WRITE LIGHTS ON ~ " P* 06: WRITE LIGHTS OFF ( P* 07: WRITE PROGRAM DISPLAY , P* 39:
0x196124…1962b8 Dummy {f00=0x007f, f01=0x0190, f02=» t P* A2: OUTPUT " P* A3: WORK REGISTER ( " P* A4: WORK REGISTER N " P* A5: WORK REGISTER t P* A6: DWT-ADDRESS P* A7: ORDER P* A8: ECB-ADDRESS P*
0x1962b8…19644c Dummy {f00=0x007f, f01=0x0190, f02=» 1 IF PROGRAM DISPLAY (PTS 6241) , P* BIT 11 = 1 FOR PTS 6232,6331,6236 , , P* BIT 11 = 0 FOR PTS 6241,6242,6233 P* : P* ORDER 07, WRITE PROGRAM DISPLAY MAY BE EXCLUDED BY P* CONDITIONAL ASSEMBLY P* P EJECT
0x19644c…1965e0 Dummy {f00=0x007f, f01=0x0190, f02=»-BLOCK r P* P******************* P* EXTERNALS * 4 P******************* P P* l P EXTRN SAVE8 SAVE REGS v P EXTRN TENDIO END I/O . P EXTRN DISEND PERFORM END I/O AND DISPATCH * P EXTRN TDISP DISPATCHER ORDINARY INT
0x1965e0…196774 (1, 256) Dummy {f00=0x007f, f01=0x0190, f02=» STATUS EXTRN DWTBC BYTE COUNTER EXTRN DWTECB ECB ADDRESS 2 P* T P EXTRN SETIMP SET TIMER ^ P* ~ P* P EJECT P* P* P*************** P* TABLES * P*************** P* P*
0x196774…196908 Dummy {f00=0x007f, f01=0x0190, f02=»DRIVER z " P DATA 0 ABORT ROUTINE ADDRESS P DATA IHDI INTERRUPT HANDLER 4 P DATA RCDI RECOVERY ROUTINE X P* | " PCCERR EQU /4 CODE CHECK ERROR P* P EJECT P* P* P************************* P* CONDITIONAL
0x196908…196a9c Dummy {f00=0x007f, f01=0x0190, f02=»* SETTING X:A=0 P* PX:A EQU 0 $ PORD7 EQU 0 6 P* H P* R 8 P* THIS DRIVER CAN BE MADE TO HANDLE CREDIT ORDERS P* BY SETTING CREDIT = 1 0 P* ORDERS 05,06AND 07 ARE THEN REPLACED BY P* ORDERS 37,38 AND 06
0x196a9c…196c30 Dummy {f00=0x007f, f01=0x0190, f02=»Y SETTING X:B=1 | P* PX:B EQU 0 " PFLASH EQU 0 4 P* H P* R . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG EQU 1 P* P* 6 P* A PROGRAM VERSION USING
0x196c30…196dc4 Dummy {f00=0x007f, f01=0x018e, f02=»* P* P* MMU BUFFER SIZE P* 0 PX:C EQU 4 : PDVBLEN EQU X:C L P* b P* l P********************* v P* DWT-DISPLACEMENTS * P********************* P* P* 0 PDWTDRD EQU /10 START OF DRIVER DEFIN
0x196dc4…196f58 Dummy {f00=0x007f, f01=0x0190, f02=» | P XIF P* " PDWTDIB EQU START+/02 SAVE AREA 2 PDWTFLA EQU START+/08 SAVE AREA FOR FLASH IMAGE D & PDWTTP EQU START+/0A TIMER POINTER z PTIME EQU 5 FLASH TIME P* P EJECT P* P* A C D I P* > P* AC
0x196f58…1970ec Dummy {f00=0x007f, f01=0x0190, f02=»EDIT=1 P CCK A7,/0707 P RF(E) ADI050 ORDER /07 $ P XIF D P IFT ORD7+CREDIT=2 P P CCK A7,/0606 j P RF(E) ADI050 ORDER /06 P XIF $ P LD A4,10,A8 CONTROL WORD TO A4 P LDR* A3,A6 4 P ANK A3,/10 TEST IF ONE OR TWO C
0x1970ec…197280 Dummy {f00=0x007f, f01=0x0190, f02=» P SLL A3,4 P ORR A4,A3 LAMPCODES IN A4 PADI005 EQU * < P IFT FLASH=1 P P CCK A7,/3939 d P RF(E) FLA05 z P XIF P IFT CREDIT=0 P SUK A7,5 P XIF P IFT CREDIT=1 P SUK A7,/37 P XIF P RF(
0x197280…197414 (1, 257) Dummy {f00=0x007f, f01=0x0190, f02=»* P* P IFT FLASH=1 P* ( P* FLASH ORDER /39 2 P* R P* , PFLA05 ORS A4,DWTFLA,A6 SAVE FLASH IMMAGE f & P LD A1,DWTTP,A6 GET TIMER POINTER ( P RF(NZ) FLA10 TIMER ALREADY STARTED P LDK A4,DWTTP START TIMER
0x197414…1975a8 Dummy {f00=0x007f, f01=0x0190, f02=»NRS A4,A6 CHECK ON-OFF INDICATOR PFLA10 EQU * ( P LD A4,DWTFLA,A6 < & P LDR* A2,A6 CHECK ON-OFF INDICATOR T P ANK A2,/40 ~ * P RF(Z) FLA20 WRITE FLASHING LIGHTS OFF P ORS A4,DWTDIB,A6 ON + FLASH P RF ADI030 TURN ON LAMPS PFLA2
0x1975a8…19773c Dummy {f00=0x007f, f01=0x0190, f02=»A1 P LD A4,DWTFLA,A6 < P RF(Z) FLA30 IF NO MORE LAMPS TO FLASH GO TO DISPATCHER " P LDKL A1,-TIME RESTART TIMER b P ST* A1,DWTTP,A6 P LDK A4,/40 " P XRRS A4,A6 SWITCH 0N-OFF FLAG P RB FLA10 PFLA30 CM DWTTP,A6 P RF
0x19773c…1978d0 Dummy {f00=0x007f, f01=0x0190, f02=» A4,DWTDIB,A6 RESET BITS IN DWT-BUFFER P IFT FLASH=1 . 0 P ANS A4,DWTFLA,A6 RESET BITS IN FLASH IMAGE B P XIF v P RF ADI030 P* P* P EJECT P* P* P* ORDER 05: TURN ON LAMPS P* P* P*
0x1978d0…197a64 Dummy {f00=0x007f, f01=0x0190, f02=»AGE h P XIF . PADI030 LC A2,DWTDIB,A6 GET FIRST CHARACTER PADI035 LDK A1,1 J 6 P SC A1,DWTST+1,A6 SET START VALUE IN BYTE COUNTER b P LDR* A3,A6 TWO OUTPUTS ? P ANK A3,/10 P RF(NZ) IHDI10 NO P RF IHDI20 YES P*
0x197a64…197bf8 Dummy {f00=0x007f, f01=0x0190, f02=»0 & PADI060 CF A15,GETCHR GET CHARACTER P LDR A1,A1 LAST CHARACTER ? 4 P RF(Z) ADI070 YES X P LDR A4,A2 r P SRL A4,4 $ P SUK A4,3 UNDEFINED CHARACTER ? P RF(L) ADI100 YES P CWK A4,3 UNDEFINED ? P RF(G) ADI100 YES
0x197bf8…197d8c Dummy {f00=0x007f, f01=0x0190, f02=» < PADI070 SC A1,DWTST+1,A6 SET START VALUE IN BYTE COUNTER P RF IHDI10 SEND CHARACTERS D P* f P* p P* CODE CHECK ERROR z P* ( PADI100 LDK A1,CCERR SET RETURN CODE P ORS A1,8,A8 IN ECB " P RB ADI060 GET NEXT CHARACTER
0x197d8c…197f20 Dummy {f00=0x007f, f01=0x0190, f02=»* PIHDI EQU * P LDR A1,A1 RETURN CODE 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 IFT ORD7=1 P RF(NZ) IHDI05 NO & P LDR* A3,A6 GET CHANNEL PARAMETER
0x197f20…1980b4 (1, 258) Dummy {f00=0x0080, f01=0x018e, f02=»RFORM ENDIO | PIHDI10 LDKL A2,DWTDIB P ADR A2,A6 2 P LD A4,DWTST,A6 F P ANK A4,/FF ^ P ADR A2,A4 r P LCR A2,A2 GET CHARACTER P XIF P IFT ORD7=0 P RF(Z) ENDIO 2 PIHDI10 LC A2,DWTDIB+1,A6 GET SECOND CHARACTER
0x1980b4…198248 Dummy {f00=0x0080, f01=0x0190, f02=» P ORK A2,/40 INDICATE BELL P* & . POUTPUT IM DWTST,A6 INCREMENT BYTE COUNTER 0 & PIHDI20 CF A15,OUTLIN OUTPUT CHAR. b PEXIT ABL TDISP 2 PENDIO ABL DISEND PERFORM END I/O AND DISPATCH P* P EJECT P* P* R C D I
0x198248…1983dc Dummy {f00=0x0080, f01=0x018e, f02=»RMATION Z , P* OM PROGRAM DISPLAY IS ALSO RESTORED P* @ P* J PRCDI EQU * T P IFT CPU852=1 f & P CF A15,SAVE8 SAVE A1-A8 ON STACK | P XIF P* P IFT CPU852=0 " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P*
0x1983dc…198570 Dummy {f00=0x0080, f01=0x4014, f02=» P @ OM PROGRAM DISPLAY IS ALSO RESTORED P* @ P* J PRCDI EQU * T P IFT CPU852=1 f & P CF A15,SAVE8 SAVE A1-A8 ON STACK | P XIF P* P IFT CPU852=0 " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P*
0x198570…198704 Dummy {f00=0x0080, 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
0x198704…198898 Dummy {f00=0x0080, f01=0x0190, f02=» p P DATA 2 DEVICE INDEX PGPAD EQU * ADDRESS BLOCK $ P DATA ACGP ACTIVATION DRIVER D " P DATA 0 ABORT ROUTINE ADDRESS h P DATA IHGP INTERRUPT HANDLER P DATA RCGP RECOVERY ROUTINE . P DATA ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE P
0x198898…198a2c Dummy {f00=0x0080, f01=0x0190, f02=»T STATUS. DUMMY IS SENT TO PRINTER AND RETURN CODE ~ < P* IS SET IF PAPER OUT OR READY SWITCH OFF. : H P* RETURN CODE IS ALSO SET IF TIME-OUT IS SIGNALLED FROM z P* CHANNEL UNIT. P* > P* ORDER 05: BASIC
0x198a2c…198bc0 Dummy {f00=0x0080, f01=0x018e, f02=»ARE SENT TO PRINTER FROM f < P* ECB-BUFFER AFTER INDIVIDUAL CODE CHECK. P* ` PACGP EQU * j P LDK A2,STX START OF MESSAGE | P LDR A3,A7 =1 P RF(Z) ACGP10 ORDER 0 =2 P SUK A3,5 =1 P RF(E) ACGP09 ORDER 5 =1
0x198bc0…198d54 (1, 259) Opaque[0x194]
0x198d54…198ee8 # DirEnt {nam=»DRDY01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1010, f03=0x0000}
0x198d54…198ee8 IdxSect {
0x198d54…198ee8 f00 = 0x0080 // 0x198d54 @0x0
0x198d54…198ee8 f01 = 0x0018 // 0x198d56 @0x2
0x198d54…198ee8 gno = [ // 0x198d58 @0x4
0x198d54…198ee8 [0x00]: C0x0080.0x2.0
0x198d54…198ee8 [0x01]: C0x0081.0x0.0
0x198d54…198ee8 [0x02]: C0x0081.0x1.0
0x198d54…198ee8 [0x03]: C0x0081.0x2.0
0x198d54…198ee8 [0x04]: C0x00b1.0x1.0
0x198d54…198ee8 [0x05]: C0x00b1.0x2.0
0x198d54…198ee8 [0x06]: C0x00b1.0x3.0
0x198d54…198ee8 [0x07]: C0x00b2.0x0.0
0x198d54…198ee8 [0x08]: C0x00b2.0x1.0
0x198d54…198ee8 [0x09]: C0x00b2.0x2.0
0x198d54…198ee8 [0x0a]: C0x00b2.0x3.0
0x198d54…198ee8 [0x0b]: C0x00b3.0x0.0
0x198d54…198ee8 ]
0x198d54…198ee8 }
0x198ee8…19907c Dummy {f00=0x0080, f01=0x018e, f02=» 2 P IDENT DRDY01 9.2DK 2 83-12-15 870105040921 P : P DK2 HANDLE COPY 80 B $ P NB. CHANNEL PARAM IN DWT = 50 ` P *DK,POS 80 ON VDU P REL 9.2 80-02-12 P =4,ABORT ROUTINE INCLUDED P REL 9.1 79-05-23 * P =3,ST
0x19907c…199210 Dummy {f00=0x0080, f01=0x0190, f02=» z . P =1 DRIVER ADAPTAD TO HANDLE PTS 6385 P PRR 9.1 79-01-12 : P V P* ^ 6 P************************************************** h P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P* DRDY01 = DRIVER VIDEO AND GRAPHIC DISP
0x199210…1993a4 Dummy {f00=0x0080, f01=0x0190, f02=» P* : P* THIS DRIVER HANDLES OUTPUT TO THE VIDEO DISPLAYS @ P* PTS 6344, PTS 6342 AND TO THE PLASMA DISPLAYS PTS 6351 L P* AND PTS 6386 6 P* THE DISPLAYS MUST BE CONNECTED TO THE SYSTEM P* VIA CHLT OR CHRT. P*
0x1993a4…199538 Dummy {f00=0x0080, f01=0x018e, f02=»CHO-DEVICE TO ANY KEYBOARD, THAT RUNS UNDER THE ( P* GENERAL KEYBOARD DRIVER DRKB01. 8 P* d P* n 0 P* THE DRIVER CONSISTS OF FOLLOWING PARTS: x P* & P* A C D Y ACTIVATION PART P* ( P* I H D Y INTERRUPT H
0x199538…1996cc Dummy {f00=0x0080, f01=0x0190, f02=» P P P* * P* THE FOLLOWING ORDERS ARE TREATED: P* L P* ORDER 00: TEST STATUS V P* 05: BASIC WRITE x " P* 06: STANDARD WRITE ( P* 07: WRITE GRAPHIC DISPLAY & P* 0B: CURSOR POSITI
0x1996cc…199860 Dummy {f00=0x0080, f01=0x0190, f02=» A2 = OUTPUT CHARACTER $ P* A3 = BUFFER INDEX * $ P* A4 = WORK REGISTER R " P* A5 = STACK BASE z " P* A6 = DWT-ADDRESS P* A7 = ORDER " P* A8 = ECB-ADDRESS
0x199860…1999f4 (1, 260) Dummy {f00=0x0081, f01=0x0190, f02=»IN DWT. ` P* * P* --------------------------------- P* BIT: 10 11 H P* -------------- b " P* 0 0 PTS 6344 | * P* 0 1 PTS 6351 & 6342 * P* 1 0 PTS 6386 & 6385 * P* ------
0x1999f4…199b88 Dummy {f00=0x0081, f01=0x0190, f02=»PTS 6351 OR NOT p , P* -IS ADAPTED TO CONTROL ONLY PTS 6344 : P* -CAN USE LOWER CASE CHAR. GENERATOR COLUMN 6 AND 7 H 8 P* -CAN SUPPRESS ECHOING OF END OF RECORD CHARACTER & P* -CAN SUPPRESS TRAILING BLANKS F P* AND ALSO UNDERLINE STAR
0x199b88…199d1c Dummy {f00=0x0081, f01=0x0190, f02=» P*********** P* P* " P* , ( P ENTRY DYAD ADDRESS TO ADDRESSBLOCK 6 0 P ENTRY ECHODY DEVICE-DEPENDENT ECHO-ROUTINE b P* P* P* P* . P***************************************** . P* EXTERNAL TOSS MODUL
0x199d1c…199eb0 Dummy {f00=0x0081, f01=0x0190, f02=» EXTRN OUTPUT SUBROUTINE TO SEND CHARACTER P EXTRN TDISP DISPATCHER 2 > P EXTRN LDREG LOAD REGISTERS A4, A3, A5, A7, A8 AND RETURN R P EXTRN TENDIO END I/O . P EXTRN SAVE8 SAVE 8 REGISTERS ON A15 STACK 0 P EXTRN ECHRTN RETURN TO KEYBOARD AFT
0x199eb0…19a044 Dummy {f00=0x0081, f01=0x0190, f02=»AMETERS * P************************ P* 4 P EXTRN DWTST STATUS > P EXTRN DWTBC BYTE COUNTER Z P EXTRN DWTOR ORDER | P* P EJECT P************* P* CONSTANTS * P************* P* PFASTO EQU /14
0x19a044…19a1d8 Dummy {f00=0x0081, f01=0x0190, f02=»LISTAR EQU /1E LOW INTENSITY START & PLISTOP EQU /1F LOW INTENSITY STOP * PBACKSP EQU /08 BACKSPACE T PLF EQU /0A LINE FEED t PHOME EQU /0B CURSOR HOME ( PCLEHOM EQU /0C CLEAR AND CURSOR HOME PCR EQU /0D CARRIAGE RETURN PCURRIG EQU
0x19a1d8…19a36c Dummy {f00=0x0081, f01=0x0190, f02=»LAST DUMMY . PRETURN EQU /12 RETURN TO ALPHANUMERIC MODE * PESCAPE EQU /11 ESCAPE TO GRAPHIC MODE D " PPOINT EQU /2E POINT CHARACTER r 2 PEQU EQU 6 THRESHOLD FOR AUTOMATIC FAST OUTPUT PSTILL EQU /18 CURSOR STEADY $ PCTYCOD EQU /1B SET COU
0x19a36c…19a500 Dummy {f00=0x0081, f01=0x018e, f02=»ODE CHECK ERROR ( POPERR EQU /1 NOT OPERABLE, POWER OFF P* D P EJECT N P* P* f . P***************************************** p . P* CONDITIONAL ASSEMBLY * . P***************************************** P*
0x19a500…19a694 (1, 261) Dummy {f00=0x0081, f01=0x0190, f02=» P* < P* BY SETTING X:B = 1 THE DRIVER HANDLES ONLY PTS 6344 P* R PX:B EQU 1 PWHATDY EQU 0 n P* P* 8 P* BY SETTING X:C TO 1 LOWER CASE CHAR. GENERATOR & P* (COLUMNS 6 AND 7) CAN BE USED PX:C EQU 0
0x19a694…19a828 Dummy {f00=0x0081, f01=0x0190, f02=»D OF RECORD CHARACTER. r 8 P* THIS IS ATTAINED BY SETTING THE CONSTANT X:G=0 P* Z PX:D EQU 0 d PEORECH EQU 0 v P* 0 P* BY SETTING THE CONSTANT TRASPA = 1 IT IS @ P* POSSIBLE TO SUPPRESS TRAILING BLANKS, /12, /1E AND /1F.
0x19a828…19a9bc Dummy {f00=0x0081, f01=0x0190, f02=»STEAD OF BLINKING PX:F EQU 0 PSTEADY EQU 1 , P* @ < P* THIS DRIVER CAN BE ADAPTED TO MEMORY MANAGEMENT UNIT J P* BY SETTING MMUPAG = 1 P* PMMUPAG EQU 1 P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INS
0x19a9bc…19ab50 Dummy {f00=0x0081, f01=0x018e, f02=»SEMBLY IT IS POSSIBLE r < P* TO CHOOSE BETWEEN NINE (9) DIFFERENT CHARACTER SETS. P ^ P f P* CODE COUNTRY n P P* 0 GB/NL/B P* 1 D/A/L/CH P* 2 F/CH/B/L P* 3 E P* 4 I/CH P* 5 S/SF P* 6 DK/N P*
0x19ab50…19ace4 Dummy {f00=0x0081, f01=0x0190, f02=» P* PX:H EQU 64 PDVBLEN EQU 162 $ P* : P EJECT D P* R P* $ P******************************** f $ P* DWT-DISPLACEMENT * $ P******************************** P* P* 0 PDWTDRD EQU /10 START O
0x19ace4…19ae78 Dummy {f00=0x0081, f01=0x0190, f02=»EQU DWTDRD+4 P XIF P* . PDWTAP EQU START+/12 HEAD POSITION POINTER * " PDWTPOS EQU START+/15 POSITIONS PDWTLIN EQU START+/14 LINES & PDWTBIN EQU START+/16 BUFFER INDEX P* P EJECT P* P* P**********
0x19ae78…19b00c Dummy {f00=0x0081, f01=0x0190, f02=»RESS BLOCK P DATA ACDY ACTIVATION DRIVER $ P DATA ABDY ABORT ROUTINE ADDRESS 6 P DATA IHDY INTERRUPT HANDLER ^ P DATA RCDY RECOVERY ROUTINE . P DATA ECHODY DEVICE-DEPENDENT ECHO-ROUTINE P* P* , PTABSPE EQU * TABLE OF SPECIA
0x19b00c…19b1a0 Dummy {f00=0x0081, f01=0x0190, f02=»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 f P* P* > P* ORDER 05: BASIC WRITE. CHARACTER ARE SENT TO DISPLAY 6 P* FROM EC
0x19b1a0…19b334 (1, 262) Dummy {f00=0x0081, f01=0x0190, f02=»ECB-BUFFER AFTER INDIVIDUAL CODE CHECK. P* 0 L P* IF A PREDEFINED NUMBER OF CHARACTERS (SEE CONSTANT 'EQU') : J P* ARE FOUND EQUAL, FAST OUTPUT IS EXECUTED FOR THE NUMBER F P* OF CHARACTERS FOUND EQUAL (> 'EQU
0x19b334…19b4c8 Dummy {f00=0x0081, f01=0x0190, f02=» TO GRAPHIC MODE AND INFORMATION IN ECB-BUFFER * P* IS SENT TO THE DISPLAY. < P* j P XIF t : P* ORDER /B: CURSOR POSITIONING AND STANDARD WRITE. < P* THE CURSOR IS SENT TO THE POSITION GIVEN > P*
0x19b4c8…19b65c Dummy {f00=0x0081, f01=0x018e, f02=» IS EXECUTED. P* < P* ORDER 31: ERASE. THE DISPLAY IS ERASED ON THE LINE " < P* WHERE THE CURSOR IS POSITIONED THE NUMBER b @ P* OF CHARACTERS THAT ARE DEFINED IN THE CONTROL @ P* WORD OF ECB. 0-80 C
0x19b65c…19b7f0 Dummy {f00=0x0081, f01=0x0190, f02=» h PACDY EQU * P LDK A3,0 START BUFFER INDEX P LDK A4,0 COUNTER > P LDR A7,A7 ORDER 0 ? X P ABL(E) ADY410 YES t P LDK A2,STX START OF MESSAGE P CF A5,OUTPUT SEND P IFT WHATDY=0 " P LDR* A1,A6 CHANNEL PARAMETER P
0x19b7f0…19b984 Dummy {f00=0x0081, f01=0x0190, f02=» P IFT WHATDY=0 . P LDK A2,/12 INDICATE SWITCH TO ALPHA MODE P CF A5,OUTPUT P P* f P XIF p P* | PACDY02 EQU * P CWK A7,5 ORDER 5 P RF(E) ACDY90 YES P SUK A7,6 ORDER 6 ? P RF(E) ACDY20 YES P SUK
0x19b984…19bb18 Dummy {f00=0x0081, f01=0x0190, f02=» I/O REQUEST ERROR P EJECT : P* ACTIONS SPECIFIED BY USER IN RIGHT BYTE IN BUFFER ( P* ARE CARRIED OUT. f 0 P* /2B NO MOVING OF PRINT HEAD " P* /30 CR, LF, LF B P* /31 ERASE DISPLAY AND WRIT
0x19bb18…19bcac Dummy {f00=0x0081, f01=0x0190, f02=»E) ACDY25 P LDK A3,2 START BUFFER INDEX " P LD A2,2,A8 GET BUFFER ADDRESS 6 & P LC A2,1,A2 GET CONTROL CHARACTER P ANK A2,/FF PACDY25 EQU * * P SUK A2,/2B POSITIONING BEFORE WRITE ? P RF(E) ACDY90 P SUK A2,6 /31 ?
0x19bcac…19be40 Dummy {f00=0x0081, f01=0x0190, f02=»TE DOUBLE LINE FEED P P $ $ PACDY30 LDK A2,CR CARRIAGE RETURN , PACDY35 LDK A1,1 T 2 P SC A1,DWTAP+1,A6 RESET HEAD POSITION COUNTER l 8 P* SEND CARRIAGE RETURN AND ONE OR TWO LINE FEEDS P* PACDY50 EQU * P CF A5,OUTPU
0x19be40…19bfd4 (1, 263) Dummy {f00=0x00b1, f01=0x0190, f02=»LAST LINE ? P RF(L) ACDY55 ( P LDKL A2,/100 INCREMENT LINE COUNTER * P ADS A2,DWTAP,A6 V PACDY55 EQU * n & P LDR* A1,A6 GET CHANNEL PARAM DK2 P ANK A1,/40 COPY80? DK2 P RB(NE) ACDY52 YES DK2 P LDK A2,LF LINE FEED TO SEND
0x19bfd4…19c168 Dummy {f00=0x00b1, f01=0x0190, f02=»35 P EJECT P* & P* GET, CHECK AND SEND CHARACTER " P* (IF ORDER 5 NO CHECK) L P* n PACDY70 EQU * x P IFT WHATDY=0 & P LDR* A4,A6 GET CHANNEL PARAMETER P ANK A4,/10 $ P RF(NZ) ACDY75 NOT 6344 OR 6386 P
0x19c168…19c2fc Dummy {f00=0x00b1, f01=0x0190, f02=»ECK YES! PACDY75 EQU * P CF A5,OUTPUT $ 2 PACDY80 CF A15,POSUPD POSITION COUNTER UPDATING : P IFT TRASPA=1 p ( 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 PSK
0x19c2fc…19c490 Dummy {f00=0x00b1, f01=0x0190, f02=» RF(NE) SKIP20 NO PSKIP07 SUK A2,1 DECR RL ! P RB SKIP05 GET NEXT ! : PSKIP20 CWK A2,4 ! V P RF(NG) SKIP30 RL < 5 ! n 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 S
0x19c490…19c624 Dummy {f00=0x00b1, f01=0x0190, f02=»NE START? ! | P RB(Z) SKIP07 YES! SKIP IT! " P SUK A4,/C LOW INT. START? " 6 P RB(Z) SKIP07 YES! " X P SUK A4,1 LOW INT. STOP? " r P RB(Z) SKIP07 YES! " P* " " PSKIP30 ST A2,4,A8 STORE NEW RL " P XIF " PACDY90 LDK A4,0 " 6 PADY100 C
0x19c624…19c7b8 Dummy {f00=0x00b1, f01=0x0190, f02=»B(E) ACDY75 " P ANK A2,/7F # P LDK A1,5 SET TABLE POINTER # ( " P CC A2,TABSPE,A1 FAST OUTPUT? # L P RF(E) ADY125 # r 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,
0x19c7b8…19c94c Dummy {f00=0x00b1, f01=0x0190, f02=»NE) ADY122 NO # P LDK A4,/80 $ , PADY120 ORRS A4,A6 SET LOW INTENSITY MODE $ * P LDK A4,0 $ Z P RB ACDY50 $ l $ PADY122 CCK A2,/1212 UNDERLINE ? $ ~ P RF(NE) ADY125 $ " P LDK A4,/40 SET UNDERLINE MODE $ P RB ADY120 $ & PADY125 CCK A2,/1414
0x19c94c…19cae0 Dummy {f00=0x00b1, f01=0x018e, f02=»A2 $ P LDR A2,A4 % P LD A4,4,A8 REQ LENGTH % P SUR A4,A3 NUMBER OF CHARS % : P RF(Z) ADY127 NONE % P* % v P IFT WHATDY=0 % & P LDR* A7,A6 GET CHANNEL PARAMETER % P ANK A7,/10 % 2 P RF(NZ) OTHER OTHER DISPLAY THAN 6344 OR 6386? %
0x19cae0…19cc74 (1, 264) Dummy {f00=0x00b1, f01=0x018e, f02=» P ABL ADY405 & PADY128 EQU * & P SUK A1,1 GET NEXT & , P RB(NN) ADY110 NOT AT END & F P LDR A1,A2 MOVE CHARACTER & h 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 &
0x19cc74…19ce08 Dummy {f00=0x00b1, f01=0x0190, f02=» & & P TO CHARACTER BETWEEN /40 TO /5F ' P XIF ' 2 P RB ACDY70 ' > P* ' P P* ' Z P IFT WHATDY=0 ' d POTHER EQU * ' z P************************ ' P* A3 = INDEX ' P* A1 = CHARACTER ' P* A4 = NUMBER ' P************************
0x19ce08…19cf9c Dummy {f00=0x00b1, f01=0x018e, f02=»WTPOS,A6 GET MAX-POS AND ' P ANK A3,/FF ( P ST A4,10,A8 SAVE LENGTH ( 4 P SUR A3,A2 COMPARE ( T P RF(NN) OT030 LENGTH OK ( n P ADR A4,A3 ( P ST A4,10,A8 SAVE LENGTH ( 0 P ADK A4,1 ADJUST NUMBER OF OUTPUT CHARACTERS ( POT030 EQU * ( & P
0x19cf9c…19d130 Dummy {f00=0x00b1, f01=0x0190, f02=» ( r P RB(P) OT010 ) P LD A4,10,A8 GET ACT. LENGTH ) POT040 LDK A2,BACKSP ) @ P CF A5,OUTPUT SENDBACKSPACE ) P SUK A4,1 DECREMENT LENGTH ) P RB(P) OT040 ) P RB ADY127 ) P XIF ) P EJECT ) P* ) P* CODE CHECK ERROR )
0x19d130…19d2c4 Dummy {f00=0x00b1, f01=0x0190, f02=»ULATION ) P* * PADY140 EQU * * , P CF A15,GETCHR GET FIRST ASCII CHARACTER * . P LDR A4,A2 * ^ . P CF A15,GETCHR GET SECOND ASCII CHARACTER * p P ANK A2,/F * P ANK A4,/F * P RF(E) ADY144 * 0 PADY143 ADK A2,/A FROM DECIMAL TO HEXADECIMAL
0x19d2c4…19d458 Dummy {f00=0x00b1, f01=0x018e, f02=»,DWTBC,A6 * , P SUR A2,A4 AND REQUESTS POSITION COUNTER + & P TO GET NUMBER OF SPACES TO SEND + B P RB(NP) ADY100 + l P LDR A4,A2 + & PADY145 LDK A2,CURRIG CURSOR RIGHT + PADY146 CF A5,OUTPUT + , P CF A15,POSUPD POSITION COUNTER UPDATING +
0x19d458…19d5ec Dummy {f00=0x00b1, f01=0x0190, f02=» 2 PADY160 LD A4,10,A8 GET NUMBER OF CHAR TO ERASE , P IFT WHATDY=0 , : " P LDR* A1,A6 CHANNEL PARAMETER , P P ANK A1,/10 GRAFIC DISPLAY? , v P RF(NE) ADY166 YES =2 , P XIF , & P CF A5,ERA GET LENGTH TO ERASE =2 , P LDK A3,/20 , P CF A5
0x19d5ec…19d780 Dummy {f00=0x00b1, f01=0x0190, f02=»66 EQU * YES =2 , & P CF A5,ERA GET LENGTH TO ERASE =2 - P* - B $ PADY170 SUK A4,1 DECR NO OF CHAR - L P RF(N) ADY180 ERASE READY - t P LDK A2,/20 SPACE - P CF A5,OUTPUT SEND IT - P RB ADY170 - PADY180 LD A4,10,A8 - & P CF A5,ERA GET
0x19d780…19d914 (1, 265) Dummy {f00=0x00b1, f01=0x0190, f02=» P SUK A4,1 DECREMENT =2 . , P RB(N) ADY165 CURSOR IN ORIGIN POSITION . " P LDK A2,BACKSP CURSOR LEFT . R P CF A5,OUTPUT SEND IT . t P RB ADY186 AGAIN . P XIF . P EJECT . P* . * P* ORDER /B CURSOR POSITIONING PART . P* . PAD
0x19d914…19daa8 Dummy {f00=0x00b1, f01=0x0190, f02=»05 YES . 2 P* IF VIDEO (6344) SET CURSOR ADDRESS DIRECT / P XIF / D * P LD A4,10,A8 GET REQUESTED CURSOR POS / P . P ST A4,DWTAP,A6 UPDATE LINE & POS COUNTER / ~ P CF A5,CURPOS SET CURSOR / P RF ADY380 / P IFT WHATDY=0 / P* GET LINE /
0x19daa8…19dc3c Dummy {f00=0x00b1, f01=0x0190, f02=»ES! SET CURSOR AT END OF LINE / ~ PADY207 EQU * 0 & $ P LC A3,DWTAP,A6 GET ACTUAL LINE 0 : PADY210 CWR A4,A3 0 b . P RF(N) ADY250 REQUESTED LINE ABOVE ACTUAL 0 z P RF(E) ADY300 SAME LINE 0 P LDK A2,LF LINE FEED 0 * P ADK A3,1 INCREMENT ACTUAL LINE
0x19dc3c…19ddd0 Dummy {f00=0x00b1, f01=0x0190, f02=» RF ADY300 0 PADY250 LDK A2,HOME HOME 1 & P LDK A3,1 RESET ACTUAL LINE NUMBER 1 2 " P ST A3,DWTAP,A6 RESET POSITION 1 P RB ADY230 1 P* 1 P* GET POSITION 1 P* 1 2 PADY300 SC A4,DWTAP,A6 UPDATE HEAD LINE COUNTER 1 ( P LC A4,11,A8 GET
0x19ddd0…19df64 Dummy {f00=0x00b1, f01=0x0190, f02=»03 EQU * 1 P CWK A4,1 FIRST POSITION ? 2 P RF(NE) ADY305 NO 2 2 P CWR A4,A3 FIRST LINE ? 2 L P RF(NE) ADY305 NO 2 l P LDK A2,HOME CURSOR GO HOME 2 P RF ADY330 2 * PADY305 RF(NL) ADY307 REQ. POS NOT ZERO 2 P LDK A4,1 2 0 PADY307 LC A3
0x19df64…19e0f8 Dummy {f00=0x00b1, f01=0x0190, f02=»ORWARDS OR BACKWARDS 2 ~ P RF(E) ADY370 POSITION FOUND 3 P RF(N) ADY340 BACK 3 @ P LDK A2,CURRIG CURSOR RIGHT 3 Z & P ADK A3,1 UPDATE POSITION COUNTER 3 ~ PADY330 CF A5,OUTPUT SEND 3 P RB ADY310 3 . PADY340 SUR A3,A4 ACTUAL POS. - WANTED POS. 3
0x19e0f8…19e28c Dummy {f00=0x00b1, f01=0x018e, f02=»CATE FIRST POSITION 3 P RB ADY330 4 " PADY345 LDK A2,BACKSP BACKSPACE 4 . P CF A5,OUTPUT SEND 4 T P SUK A3,1 LAST BACKSPACE ? 4 n P RB(NE) ADY345 4 8 PADY370 SC A4,DWTAP+1,A6 UPDATE HEAD POSITION POINTER 4 P XIF 4 & PADY380 LDK A3,2 START BUFF
0x19e28c…19e420 Dummy {f00=0x00b1, f01=0x018e, f02=» 4 P XIF 5 P* 5 P EJECT 5 P* 5 , P* 5 6 8 P* SEND LAST DUMMY, SET CURSOR POSITION IN CONTROL 5 @ 4 P* WORD, LOAD A1 WITH RETURN CODE AND END I/0. 5 | P* 5 PADY405 EQU * 5 & P LDR* A1,A6 GET CHANNEL PARAMETER 5 P ANK A1,/30
0x19e420…19e5b4 (1, 266) Dummy {f00=0x00b2, f01=0x0190, f02=» " P LDK A2,ULSTOP UNDERLINE STOP 6 P CF A5,OUTPUT 6 * * PADY406 ANK A4,/80 LOW INTENSITY MODE ? 6 @ P RF(E) ADY407 6 n & P LDK A2,LISTOP LOW INTENSITY STOP 6 P CF A5,OUTPUT 6 PADY407 EQU * 6 & P LDR* A1,A6 GET CHANNEL PARAM DK2 6 P ANK A
0x19e5b4…19e748 Dummy {f00=0x00b2, f01=0x0190, f02=»F A15,UPDAPP UPDATE HEAD POSITION COUNTER 6 PADY410 LDK A2,ETX LAST DUMMY 7 2 P CF A5,OUTPUT SEND DUMMY 7 V PADY415 EQU * 7 v P SUK A7,5 ORDER 5 ? 7 P RF(NE) ADY420 7 P LDKL A4,/101 HOME POSITION 7 P ST A4,DWTAP,A6 7 PADY420 EQU * 7
0x19e748…19e8dc Dummy {f00=0x00b2, f01=0x0190, f02=»W *DK 7 x PENDIO CF A15,TENDIO END I/O 8 $ PEXIT ABL TDISP GO TO DISPATCHER 8 2 P* 8 Z P IFT GRAFIC=1 8 d P* 8 z P EJECT 8 P* 8 P* GRAPHIC PART 8 P* 8 PADY500 EQU * 8 P LDK A2,/11 8 ( P CF A5,OUTPUT SWITCH TO GRAFIC M
0x19e8dc…19ea70 Dummy {f00=0x00b2, f01=0x0190, f02=»TCHR GET NEXT CHARACTER 8 P LDR A1,A4 9 P ANK A4,/80 ADDRESS OR DATA 9 2 P RF(E) ADY530 DATA MESSAGE 9 V P* 9 x P* ADDRESS MESSAGE 9 P* 9 P* SET FIRST OUT PUT IN A2 9 P* AND SECOND IN A4 9 P* 9 P SLL A1,4 9 P L
0x19ea70…19ec04 Dummy {f00=0x00b2, f01=0x0190, f02=»IRST CHARACTER 9 v $ P LDR A2,A4 GET SECOND CHARACTER : ( P CF A5,OUTPUT SEND SECOND CHARACTER : > P RB ADY510 : j P EJECT : | P* : P* DATA MESSAGE : P* : " P* FIRST OUTPUT IS SET IN A2 : P* AND SECOND IN A4 : P* : PAD
0x19ec04…19ed98 Dummy {f00=0x00b2, f01=0x0190, f02=» RF(NN) ADY550 : P ORKL A2,/200 ; PADY550 SUK A7,1 ; , P RF(E) ADY560 ; D P SRL A2,1 ; Z P RB ADY540 ; l PADY560 LDR A4,A2 ; ~ P SRL A4,4 ; P ANK A4,/3F ; P ANK A2,/F ; P ORK A2,/60 ; P RB ADY515 ; P* ; P XIF ;
0x19ed98…19ef2c Dummy {f00=0x00b2, f01=0x0190, f02=» OF REQUEST IS REACHED ; PUPDAPP EQU * < ( ( P LC A3,DWTBC,A6 GET POSITION COUNTER < < 2 P ADS A3,DWTAP,A6 UPDATE HEAD POSITION POINTER < h P LDK A3,0 < , P SC A3,DWTBC,A6 RESET POSITION COUNTER < P RTN A15 < P* < 6 P* POSUPD =
0x19ef2c…19f0c0 Dummy {f00=0x00b2, f01=0x0190, f02=»XCEEDS 80 IS DONE < h P* = PPOSUPD EQU * = $ ( P LC A2,DWTBC,A6 GET POSITION POINTER = 8 P ANK A2,/FF = d 2 P AD A2,DWTAP,A6 INCLUDE HEAD POSITION POINTER = x P ANK A2,/FF = " P CC A2,DWTPOS,A6 END OF ROW ? = P RF(P) POSU10 = , P IM DWTST,
0x19f0c0…19f254 (1, 267) Dummy {f00=0x00b2, f01=0x0190, f02=»* = PIHDY EQU * > P LD A4,DWTST,A6 BUSY? > P RB(N) EXIT NO > : P SLL A4,2 ECHO MODE ? > P P RF(N) IHDY10 > n . P LDR A1,A1 RETURN CODE FROM CHANNEL UNIT ? > P RB(NE) ADY420 YES > 4 PIHDY10 ABL LDREG RELOAD A3-A5 AND RETURN VIA A5 > P
0x19f254…19f3e8 Dummy {f00=0x00b2, f01=0x018e, f02=»ARRIED OUT ONLY IF > ~ P* ORDER 6 IS RUNNING ? P* ? : P* AT ENTRY: ? D P* ? Z P* A6 = DWT-ADDRESS ? d P* A7 = ORDER ? P* A8 = ECB-ADDRESS ? PRCDY EQU * ? P IFT CPU852=1 ? & P CF A15,SAVE8 SAVE A1-A8 ON STACK ?
0x19f3e8…19f57c Dummy {f00=0x00b2, f01=0x0190, f02=» ? P ANS A2,DWTST,A6 SET BUSY @ P =1 @ * P =1 @ 8 P =1 @ F P =1 @ T P =1 @ b P =1 @ p P =1 @ ~ P =1 @ P* @ P IFT WHATDY=0 @ P* @ " P LDR* A2,A6 CHANNEL PARAMETER @ " P ANK A2,/10 GRAPHIC DISPLAY ?
0x19f57c…19f710 Dummy {f00=0x00b2, f01=0x0190, f02=» EJECT @ PRCDY10 EQU * A P LDK A2,/00 DUMMY TO SEND A " P CF A5,OUTPUT A D $ P LDR A4,A4 LRC-ERROR IN BLOCK ? A Z P RF(NE) RCDY20 A P IFT WHATDY=0 =1 A P IFF STEADY+COUNTRY=0 =1 A * P LDR* A2,A6 GET CHANNEL PARAMETERS =1 A " P ANK A
0x19f710…19f8a4 Dummy {f00=0x00b2, f01=0x0190, f02=»URSOR BLINKING =3 A r , P ADK A2,STEADY ADJUST TO STEADY IF SO =3 B $ P CF A5,OUTPUT SEND CURSOR INF =3 B J & P SUK A3,1 DEC TRANSFER COUNTER =3 B r , P RB(P) RCDY12 NOT ENOUGH OF TRANSFERS =3 B . P LDK A2,CTYCOD SEND 'SET COUNTRY CODE' =1 B P CF A5,OUT
0x19f8a4…19fa38 Dummy {f00=0x00b2, f01=0x0190, f02=» PRCDY14 EQU * =3 C P XIF =1 C ( P LD A3,DWTST,A6 SAVE STATUS WORD =3 C . " P LDK A2,CLEHOM CLEAR AND HOME C Z P CF A5,OUTPUT SEND C P LDKL A2,/101 C 6 P ST A2,DWTAP,A6 SET HEAD LINE-AND-POSITION COUNTER C P LDR A3,A3 GET OLD STATUS C
0x19fa38…19fbcc Dummy {f00=0x00b2, f01=0x0190, f02=» IN BLOCK SENT REMOTE C P* D PRCDY20 EQU * D ( P SUK A7,5 ORDER 5 ? D < P RF(NE) RCDY25 NO D X ( P LDK A1,2 INDICATE THROUGHPUT ERROR D r P RB RCDY15 D & PRCDY25 LDK A2,STX START OF MESSAGE D P CF A5,OUTPUT D 4 P LC A4,DWTBC,A6 GET NUMB
0x19fbcc…19fd60 Dummy {f00=0x00b2, f01=0x018e, f02=»ART BUFFER INDEX D PRCDY30 ABL ACDY90 E P EJECT E 2 P* E @ P* E C H O D Y E J P* E b 0 P* ECHODY = DEVICE-DEPENDENT ECHO-ROUTINE E l P* E PECHODY EQU * E P LDR A7,A7 EOR? E P RF(N) ECDY17 YES E P LDR A3,A2 SAVE CHARACTE
0x19fd60…19fef4 (1, 268) Dummy {f00=0x00b2, f01=0x0190, f02=» E P XIF F P* F P SUK A3,/8 F P RF(E) ECDY40 BACKSPACE F 0 P SUK A3,/10 F P P RF(E) ECDY50 CLEAR F d & PECDY10 CF A5,OUTPUT SEND CHARACTER F , P CF A15,POSUPD POSITION COUNTER UPDATING F P RF ECDY20 F 4 PECDY17 CF A15,UPDAPP UPDATE
0x19fef4…1a0088 Dummy {f00=0x00b2, f01=0x0190, f02=»C A4,DWTBC,A6 GET POSITION COUNTER F P ANK A4,/FF G * P RB(E) ECDY20 FIRST POSITION G > $ P LDK A4,1 INDICATE ONE BACKSTEP G b P CF A5,BACCAN BACK G P RB ECDY20 G P EJECT G P* G P* CLEAR G P* G PECDY50 EQU * G ( P LC A4,DWT
0x1a0088…1a021c Dummy {f00=0x00b2, f01=0x0190, f02=»PARAMETER G x P ANK A1,/10 GRAFIC DISPLAY H P RF(E) ECDY60 N H 4 P CF A5,BACCAN BACK H L P RB ECDY20 H f P XIF H x * PECDY60 LDR A3,A4 SAVE POSITION COUNTER H 6 P LD A4,DWTAP,A6 GET HEAD LINE-AND-POSITION COUNTER H P CF A5,CURPOS SET CURSOR H
0x1a021c…1a03b0 Dummy {f00=0x00b2, f01=0x0190, f02=»0 H * P SC A2,DWTBC,A6 RESET POSITION COUNTER I P RB ECDY20 I 8 P EJECT I J P* I X P* I b 0 P* BACCAN = SUBROUTINE TO POSITION CURSOR I l 0 P* AT THE PLACE BEFORE REQUEST IF I 0 P* CLEAR OR BACKWARDS ONE STEP IF I P
0x1a03b0…1a0544 Dummy {f00=0x00b2, f01=0x0190, f02=» I . P AD A2,DWTAP,A6 ADD HEAD POSITION COUNTER J P ANK A2,/FF J : " P CC A2,DWTPOS,A6 LAST POSITION J N P RF(NP) BACA10 NO J t $ P LDK A2,SPACE DESTRUCTIVE SPACE J P RF BACA20 J " PBACA10 LDK A2,BACKSP BACKSPACE J P CF A5,OUTPUT SEND J $ P
0x1a0544…1a06d8 Dummy {f00=0x00b2, f01=0x0190, f02=»4,1 J P RB(NE) BACA10 K P NGR A3,A3 NEGATE REGISTER K " , P ADS A3,DWTST,A6 UPDATE POSITION COUNTER K D P RTN A5 K t P EJECT K 4 P*********************************************** K 4 P* CHECK = SUBROUTIN TO CHECK USER BUFFER IN * K 4 P*
0x1a06d8…1a086c Dummy {f00=0x00b2, f01=0x0190, f02=» * K r 4 P*********************************************** L PCHECK EQU * L R P* L f P* L p P LD A1,4,A8 L z P SUR A1,A3 END OF BUFFER? L P ABL(NP) ACDY75 YES! L , P LDR A7,A2 SAVE CHER TO SEND (AND CHECK) L ( P LDR A2,A4 S
0x1a086c…1a0a00 Dummy {f00=0x00b2, f01=0x018e, f02=» RF(NP) OUT YES! L P ADK A2,1 INCREMENT POINTER M $ P CCR A7,A2 CHAR EQU TO PREVIUS? M < P RB(E) NEXT YES! M d POUT EQU * M | 6 P CWK A4,EQU CONDITION FOR FAST OUTPUT FULLFILLED? M P RF(L) NOFAST NO! M & P********************************** M
0x1a0a00…1a0b94 (1, 269) Dummy {f00=0x00b2, f01=0x0190, f02=» " P ADR A3,A4 UPDATE BUFFER-INDEX N P ST A3,DWTBIN,A6 SAVE INDEX N * 0 P LC A3,DWTPOS,A6 GET MAXNUMBER OF CHAR/LINE N N P SUR A3,A2 AND COMPARE N P SUR A3,A4 N P RF(NN) HIT N P ADR A4,A3 N P ADK A4,1 N ( PHIT ADS A4,DWTST,A6 UPDATE POS
0x1a0b94…1a0d28 Dummy {f00=0x00b2, f01=0x018e, f02=»************** N P* SET CURSOR * O " P LD A4,DWTST,A6 GET ACTUAL POS O , P ANK A4,/FF O R ( P AD A4,DWTAP,A6 INC HEAD POS POINTER O f P CF A5,CURPOS O " P***************************** O " P* RESTORE A3 (BUFFER INDEX) * O * P LD A3,DWTBIN,A6 RES
0x1a0d28…1a0ebc Dummy {f00=0x00b2, f01=0x0190, f02=» P ABL ACDY75 P P EJECT P P* P & P* P 0 < P* FASTER = SUBROUTINE TO OUTPUT SPACE AT FAST OUTPUT P : 4 P* AT ENTRY A4 = NUMBER OF CHARACTERS P z P* P PFASTER EQU * P P CWK A4,/60 P . P RF(L) FAS010 NUMBER OF CHAR NOT TOO
0x1a0ebc…1a1050 Dummy {f00=0x00b2, f01=0x0190, f02=»ND P P LDR A2,A4 NO OF CHAR Q P CF A5,OUTPUT SEND Q ( P LDR A2,A3 Q B P CF A5,OUTPUT SEND Q T P RTN A5 Q n P EJECT Q ~ P* Q P* Q * P* CURPOS = SUBROUTINE TO SET CURSOR Q > P* AT ENTRY A4 = CURSOR POS (POSITION AND LINE)
0x1a1050…1a11e4 Dummy {f00=0x00b2, f01=0x0190, f02=» POS. X < /80? Q P LDR A2,A2 R P RF(NN) CURR05 YES! R ( P LCK A4,/7F00 R D PCURR05 EQU * R Z P LDR A2,A4 R n & P CF A5,OUTPUT OUTPUT POSITION (X) R P LDR A2,A4 R P RF(NN) CURR10 Y < /80! R P LDK A2,/7F R P RF CURR15 R PCURR10
0x1a11e4…1a1378 Dummy {f00=0x00b2, f01=0x0190, f02=» R P* =2 S P* =2 S 8 P* ERA - SUBROUTINE TO AVOID UNNECESSARY OUTPUT =2 S $ P* =2 S ` P* =2 S n 0 P* AT ENTRY A4 = CHAR TO ERASE FROM USER =2 S | . P* AT EXIT A4 = CHAR TO END OF SCREEN =2 S P* =2 S PERA EQU * =2 S " P L
0x1a1378…1a150c Dummy {f00=0x00b2, f01=0x0190, f02=» =2 S 2 P SUR A2,A3 NUMBER OF CHAR. TO END OF SCREEN =2 T P ADK A2,1 ADJUST LENGTH =2 T B P CWR A4,A2 OUTSIDE SCREEN =2 T f P RF(L) ERAEND NO =2 T . P LDR A4,A2 OUTSIDE SCREEN MODIFY LENGTH =2 T P LDKL A3,/FFFF SET OVER EDGE T " PERAEND EQU *
0x1a150c…1a16a0 Dummy {f00=0x00b2, f01=0x4034, f02=» RTN A15 RETURN TO CALLER =4 T P END U $@ U 0EEN =2 T P ADK A2,1 ADJUST LENGTH =2 T B P CWR A4,A2 OUTSIDE SCREEN =2 T f P RF(L) ERAEND NO =2 T . P LDR A4,A2 OUTSIDE SCREEN MODIFY LENGTH =2 T P LDKL A3,/FFFF SET OVER EDGE T " PERAEND EQU *
0x1a16a0…1a1834 (1, 270) Dummy {f00=0x00b3, f01=0x2008, f02=» V PP UPDATE CURSOR POSITION =4 S P RTN A15 RETURN TO CALLER =4 T , P END T P@ T EEN =2 S 8 P ADK A2,1 ADJUST LENGTH =2 S n P CWR A4,A2 OUTSIDE SCREEN =2 S P RF(L) ERAEND NO =2 S . P LDR A4,A2 OUTSIDE SCREEN MODIFY LENGTH =2 S P LDK
0x1a1834…1a19c8 Dummy {f00=0x00b3, f01=0x0190, f02=» dN A^ _" A^ A^ ! ! % ! R ! ! @ ! 8 ! X ! 9a D^ ! X ! P ! T & ! _b B J B ! ! 4 A ? ^ J T A^ T 2P ! H 4 ! ^ A ? ^ _ I " P A^ [ ^ A[X ] 4 A _$" P H B P W ! ^ _ !fJ ! 1
0x1a19c8…1a1b5c Dummy {f00=0x00b3, f01=0x0190, f02=»] A[T a[ ] 4 + f X A[ > + Z A^ 4 A^ [ !f. @^ P !d. !f ^ @^ P a^ A^ 4 A A A ?a :a# P @ @ @ 4 @^ T A^ !fJ gp !fJ A^ @gp:H 4 [b g p ! " :A *@
0x1a1b5c…1a1cf0 Dummy {f00=0x00b3, f01=0x0190, f02=» dN A^ _" A^ A^ ! ! % ! R ! ! @ ! 8 ! X ! 9a D^ ! X ! P ! T & ! _b B J B ! ! 4 A ? ^ J T A^ T 2P ! H 4 ! ^ A ? ^ _ I " P A^ [ ^ A[X ] 4 A _$" P H B P W ! ^ _ !fJ ! 1
0x1a1cf0…1a1e84 Dummy {f00=0x00b3, f01=0x0190, f02=»] A[T a[ ] 4 + f X A[ > + Z A^ 4 A^ [ !f. @^ P !d. !f ^ @^ P a^ A^ 4 A A A ?a :a# P @ @ @ 4 @^ T A^ !fJ gp !fJ A^ @gp:H 4 [b g p ! " :A *@
0x1a1e84…1a2018 Dummy {f00=0x00b3, f01=0x0190, f02=» dN A^ _" A^ A^ ! ! % ! R ! ! @ ! 8 ! X ! 9a D^ ! X ! P ! T & ! _b B J B ! ! 4 A ? ^ J T A^ T 2P ! H 4 ! ^ A ? ^ _ I " P A^ [ ^ A[X ] 4 A _$" P H B P W ! ^ _ !fJ ! 1
0x1a2018…1a21ac Dummy {f00=0x00b3, f01=0x0190, f02=»] A[T a[ ] 4 + f X A[ > + Z A^ 4 A^ [ !f. @^ P !d. !f ^ @^ P a^ A^ 4 A A A ?a :a# P @ @ @ 4 @^ T A^ !fJ gp !fJ A^ @gp:H 4 [b g p ! " :A *@
0x1a21ac…1a2340 Dummy {f00=0x00b3, f01=0x0190, f02=» dN A^ _" A^ A^ ! ! % ! R ! ! @ ! 8 ! X ! 9a D^ ! X ! P ! T & ! _b B J B ! ! 4 A ? ^ J T A^ T 2P ! H 4 ! ^ A ? ^ _ I " P A^ [ ^ A[X ] 4 A _$" P H B P W ! ^ _ !fJ ! 1
0x1a2340…1a24d4 (1, 271) Opaque[0x194]
0x1a24d4…1a2668 # DirEnt {nam=»DRRT01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1068, f03=0x0000}
0x1a24d4…1a2668 IdxSect {
0x1a24d4…1a2668 f00 = 0x0083 // 0x1a24d4 @0x0
0x1a24d4…1a2668 f01 = 0x002c // 0x1a24d6 @0x2
0x1a24d4…1a2668 gno = [ // 0x1a24d8 @0x4
0x1a24d4…1a2668 [0x00]: C0x0083.0x1.0
0x1a24d4…1a2668 [0x01]: C0x0083.0x2.0
0x1a24d4…1a2668 [0x02]: C0x0083.0x3.0
0x1a24d4…1a2668 [0x03]: C0x0084.0x0.0
0x1a24d4…1a2668 [0x04]: C0x0084.0x1.0
0x1a24d4…1a2668 [0x05]: C0x0084.0x2.0
0x1a24d4…1a2668 [0x06]: C0x0084.0x3.0
0x1a24d4…1a2668 [0x07]: C0x0085.0x0.0
0x1a24d4…1a2668 [0x08]: C0x0085.0x1.0
0x1a24d4…1a2668 [0x09]: C0x0085.0x2.0
0x1a24d4…1a2668 [0x0a]: C0x0085.0x3.0
0x1a24d4…1a2668 [0x0b]: C0x0086.0x0.0
0x1a24d4…1a2668 [0x0c]: C0x0086.0x1.0
0x1a24d4…1a2668 [0x0d]: C0x0086.0x2.0
0x1a24d4…1a2668 [0x0e]: C0x0086.0x3.0
0x1a24d4…1a2668 [0x0f]: C0x0087.0x0.0
0x1a24d4…1a2668 [0x10]: C0x0087.0x1.0
0x1a24d4…1a2668 [0x11]: C0x0087.0x2.0
0x1a24d4…1a2668 [0x12]: C0x0087.0x3.0
0x1a24d4…1a2668 [0x13]: C0x0088.0x0.0
0x1a24d4…1a2668 [0x14]: C0x0088.0x1.0
0x1a24d4…1a2668 [0x15]: C0x0088.0x2.0
0x1a24d4…1a2668 ]
0x1a24d4…1a2668 }
0x1a2668…1a27fc Dummy {f00=0x0083, f01=0x0190, f02=» 2 P IDENT DRRT01 9.2DK 1 79-11-16 870105040920 P : P =DK1, BLOCK - LOGGBUFFER B P 80-03-11 f ( P =9,TIMER RESET,TEST ORDER,INH-A15 z P REL 9.1 79-06-26 * P =8, INTERRUPT ADDRESS DISPLACEMENT P REL 9.1 79-05-23
0x1a27fc…1a2990 Dummy {f00=0x0083, f01=0x0190, f02=»6,C.U. PRESENT CHECK ERROR P REL 8.2 79-03-20 " P =5,HANG UP PREVENT > P REL 8.2 79-03-19 P =4,TIME OUT ROUTINE ERROR x P REL 8.2 79-03-18 P =3,DISPL. RECOVERY P REL 8.2 79-03-17 P =2,LOOP TEST ERROR
0x1a2990…1a2b24 Dummy {f00=0x0083, f01=0x0190, f02=»********************** v P* $ P* PHILIPS TERMINAL SYSTEM PTS ( P* P . P* DRRT01 = DRIVER CHANNEL UNIT FOR LOCAL Z & P* AND REMOTE TERMINALS P* P* P* P* P* 4 P********************************
0x1a2b24…1a2cb8 Dummy {f00=0x0083, f01=0x0190, f02=»PUT WORD IS READ TO REGISTER A2. IF DATA z D P* INPUT OR DATA REQUEST A BRANCH IS MADE TO INTERRUPT HANDLER 0 P* FOR ACTUAL DEVICE. x D P* IF CONTROL CHARACTER, THIS IS EXAMINED AND NECESSARY ACTIONS P* ARE CARRIED OUT. P* P*
0x1a2cb8…1a2e4c Dummy {f00=0x0083, f01=0x0190, f02=» < P* - CHLTON EXECUTE CIO-START ON EVERY CHLT IN SYSTEM P* D 4 P* - GETCHR GET ONE CHARACTER FROM ECB-BUFFER N P* 2 P* CONTROL WORK TABLES FOR THE CHANNELS ARE P* INCLUDED IN THE DRIVER. P EJECT P* P*
0x1a2e4c…1a2fe0 Dummy {f00=0x0083, f01=0x0190, f02=»-A5 AND RETURN TO DISPATCHER f P* $ 6 P* - STREG SAVE A3-A5 AND RETURN TO DISPATCHER . P* h D P* - LDREG IF INTERRUPT IS ALLOWED, RESTORE A3-A5 AND RETURN r " P* TO USER VIA A5 P* : P* - LDREGE RESTORE A3-A5 A
0x1a2fe0…1a3174 (1, 272) Dummy {f00=0x0083, f01=0x0190, f02=»N CODE P* A2 = INPUT WORD P* A3 = LINE NUMBER * 2 * P* A4 = DEVICE NUMBER * 2 J P* A5 = CWT-ADDRESS l P* A6 = DWT-ADDRESS P* A7 = ORDER P* A8 = ECB-ADDRESS P* P* P* P EJECT P*
0x1a3174…1a3308 Dummy {f00=0x0083, f01=0x0190, f02=»L UNIT h : P ENTRY CHLT2 INTERRUPT FROM SECOND CHANNEL UNIT LOCAL 2 P ENTRY CHLT3 INTERRUPT FROM THIRD CHANEL LOCAL L 4 P ENTRY CHLT4 INTERRUPT FROM FOURtH CHANEL LOCAL : P ENTRY CHRT1 INTERRUPT FROM FIRST CHANNEL UNIT REMOTE : P ENTRY CHRT2 INT
0x1a3308…1a349c Dummy {f00=0x0083, f01=0x0190, f02=»HANEL REMOTE l $ P ENTRY OUTLIN SEND ONE CHARACTER P ENTRY CHLTON START OF CHLT < 0 P ENTRY OUTPUT SAVE REGISTERS, SEND CHARACTER ` P ENTRY CHTAB CHANNEL TABLE P AND GO TO DISPATCHER , P ENTRY LDREG RELOAD REGISTERS AND RETURN , P E
0x1a349c…1a3630 Dummy {f00=0x0083, f01=0x018e, f02=»RY GETCHR GET ONE CHARACTER FROM ECB-BUFFER P 4 @ P ENTRY DWREMU DWT-DUMMY FOR LOOP-TESTING OF REMOTE CHANNELS < 0 P ENTRY LOCHAN NUMBER OF LOCAL CHANNEL UNITS 0 P ENTRY RECHAN NUMBER OF REMOTE CHANNEL UNITS & P ENTRY REMFC REMOTE TEST FILE CO
0x1a3630…1a37c4 Dummy {f00=0x0083, f01=0x0190, f02=» P* * P************************************** * P* EXTERNAL TOSS MODULE ENTRIES * < * P************************************** j P* P* & P EXTRN SAVE8 SAVE REGISTERS A1-A8 P EXTRN TDISP DISPATCHER P EXTRN RETUR4 REST
0x1a37c4…1a3958 Dummy {f00=0x0083, f01=0x0190, f02=»UPT TABLE FOR LOCAL TERMINALS | , P EXTRN INTLT2 INTERRUPT TABLE FOR CHLT2 & & P EXTRN INTLT3 INTERRUPT FROM CHLT3 V & P EXTRN INTLT4 INTERRUPT FROM CHLT4 6 P EXTRN INTRT1 INTERRUPT TABLE FOR REMOTE TERMINALS 2 P EXTRN INTRT2 INTERRUPT TABLE REMOTE
0x1a3958…1a3aec Dummy {f00=0x0083, f01=0x0190, f02=»XTRN DISIOE I/O REQUEST ERROR & P EXTRN DISEND END I/O AND DISPATCH & * P EXTRN INTSAV SAVE AREA LAST INTERRUPT P P EXTRN TENDIO ~ . P EXTRN IHRET8 RESTORE A1-A8 WITHOUT ENABLE P* P* P* P* P***********************
0x1a3aec…1a3c80 Dummy {f00=0x0083, f01=0x0190, f02=»ACTER r P EXTRN DWTECB ECB-ADDRESS * P EXTRN DWTADR ADDRESS TO ADDRESS-BLOCK 0 P EXTRN DWTST STATUS ^ P EXTRN DWTWAT z P EXTRN DWTOTQ OUTPUT QUEUE P EXTRN DWTA3 SAVE AREA A3 P EXTRN DWTA4 SAVE AREA A4 P EXTRN DWTA5 SAVE
0x1a3c80…1a3e14 (1, 273) Dummy {f00=0x0083, f01=0x0190, f02=» INTADR INTERRUPT ADDRESS DISPLACEMENT 0 P EXTRN RECADR RECOVERY ADDRESS DISPLACEMENT . , P EXTRN ECHADR ECHO ADDRESS DISPLACEMENT b P* P EJECT P* P* P******************** P* CONSTANTS * P******************
0x1a3e14…1a3fa8 Dummy {f00=0x0083, f01=0x0190, f02=»SPECIAL DUMMY TO GET DATA REQUEST ( P FIRST WHEN PRINTERBUFFER IS EMPTY * 0 PDRQTIM EQU 30 TIME TO NEXT ACK FOR PRINTERS V P EJECT P* , P*************************************** , P* CONDITIONAL ASSEMBLY * , P******
0x1a3fa8…1a413c Dummy {f00=0x0083, f01=0x0190, f02=» INCLUDED TO THE DRIVER BY SETTING X:A=1 P* 2 PX:A EQU 1 < PLOGING EQU 0 N P* b P* l > P* BY SETTING X:B TO 1,2,3 OR 4 THIS DRIVER HANDLES ONE v & P* OR UP TO FOUR LOCAL CHANNELS. P* PX:B EQU 1 PLOCHAN EQU
0x1a413c…1a42d0 Dummy {f00=0x0083, f01=0x0190, f02=»IN b 8 P* THE DRIVER. THIS FUNCTION CAN BE EXCLUDED FROM $ P* DRIVER BY SETTING X:C = 0. F P* n PX:C EQU 1 x PACKMUL EQU 0 P* P* > P* BY SETTING X:D TO 1,2,3 OR 4 THIS DRIVER HANDLES ONE , P* OR UP TO FOUR R
0x1a42d0…1a4464 Dummy {f00=0x0083, f01=0x0190, f02=»LE CODE " r P* STANDARD IS /15 P* . PX:E EQU /15 8 PREMFC EQU /15 L P* b * P* ECHO FUNCTION CAN BE EXCLUDED BY l P* SETTING X:F = 0 P* PX:F EQU 1 PCECHO EQU 01 P* P* 6 P* A PROGRAM
0x1a4464…1a45f8 Dummy {f00=0x0083, f01=0x018e, f02=» DB P* 8 P* BY SETTING BLOCK=1 BLOCKSENDING IS PERMITTED < P* BY SETTING BLOCK=0 BLOCKSENDING IS NOT PERMITTED T P* PBLOCK EQU 0 DK1 P* P DE P EJECT : P********************************************
0x1a45f8…1a478c Dummy {f00=0x0083, f01=0x0190, f02=» X P* 4 P* CONTROL WORK TABLE FOR LOCAL CHANNEL NO. 1 P* J PDWA1 EQU /03 DEVICEADDRESS T P* v PCWTLT1 EQU * TABLE ENTRY PCWTLDW EQU *-CWTLT1 P DATA 0 LAST OUTPUT DWT PCWTLOW EQU *-CWTLT1 P DATA 0 LAST OUT
0x1a478c…1a4920 Dummy {f00=0x0083, f01=0x0190, f02=»NR PCWTOTR EQU *-CWTLT1 P OTR A2,0,DWA1 OTR & PCWTCIS EQU *-CWTLT1 @ P CIO A2,1,DWA1 CIO-START PCWTRTC EQU *-CWTLT1 | " P DATA 0 RETRANSMISSION COUNTER PCWTEQ EQU *-CWTLT1 P DATA 0 QUEUE P DATA 0 QUEUE 2 PCW
0x1a4920…1a4ab4 (1, 274) Dummy {f00=0x0084, f01=0x0190, f02=» , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR PACKTIM EQU *-CWTLT1 4 ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR P P* | P XIF P* P EJECT P* P* : P***************************************************** : P* C W T L
0x1a4ab4…1a4c48 Dummy {f00=0x0084, f01=0x018e, f02=»ORK TABLE FOR LOCAL CHANNEL NO. 2 P* * PCWTLT2 EQU * 4 P* H P IFT LOCHAN=2 R P* h P* r P* | PDWA2 EQU /13 DEVICE ADDRESS P* P DATA 0 LAST OUTPUT DWT P DATA 0 LAST OUTPUT WORD P DATA INTLT2 INTERRU
0x1a4c48…1a4ddc Dummy {f00=0x0084, f01=0x0190, f02=» P DATA 0 QUEUE P DATA 0 SECOND QUEUE P* 6 P IFT ACKMUL=1 @ P* V P DATA 0 NAK-ACKUMULATOR ` $ P DATA 0 RETR. FAULT-ACKUMULATOR , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR P*
0x1a4ddc…1a4f70 Dummy {f00=0x0084, f01=0x0190, f02=»ST OUTPUT DWT P DATA 0 LAST OUTPUT WORD P DATA INTLT2 INTERRUPT TABLE 6 P INR A2,0,DWA2 INR Z P OTR A2,0,DWA2 OTR t P CIO A2,1,DWA2 CIO-START " P DATA 0 RETRANSMISSION COUNTER P DATA 0 QUEUE P DATA 0 SECOND QUEUE P*
0x1a4f70…1a5104 Dummy {f00=0x0084, f01=0x0190, f02=»RUPT-ACKUMULATOR x ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR P* D P XIF N P* Z P IFT LOCHAN=4 d P* z P* P* PDWA2 EQU /13 DEVICE ADDRESS P* P DATA 0 LAST OUTPUT DWT P DATA 0 LAST OUTPUT WORD P D
0x1a5104…1a5298 Dummy {f00=0x0084, f01=0x0190, f02=»SION COUNTER ~ P DATA 0 QUEUE P DATA 0 SECOND QUEUE * P* F P IFT ACKMUL=1 P P* f P DATA 0 NAK-ACKUMULATOR p $ P DATA 0 RETR. FAULT-ACKUMULATOR , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR ( P DATA 0 PRINTER TIMEOUT ACKUMULA
0x1a5298…1a542c Dummy {f00=0x0084, f01=0x0190, f02=» : P* C W T L T 3 * : P***************************************************** B P* 4 P* CONTROL WORK TABLE FOR LOCAL CHANNEL NO. 3 P* PCWTLT3 EQU * P* P IFT LOCHAN=3 P*
0x1a542c…1a55c0 Dummy {f00=0x0084, f01=0x0190, f02=»A INTLT3 INTERRUPT TABLE P INR A2,0,DWA3 INR P OTR A2,0,DWA3 OTR : P CIO A2,1,DWA3 CIO-START T " P DATA 0 RETRANSMISSION COUNTER t P DATA 0 QUEUE P DATA 0 SECOND QUEUE P* P IFT ACKMUL=1 P* P DATA 0 NAK-ACKUMU
0x1a55c0…1a5754 (1, 275) Dummy {f00=0x0084, f01=0x0190, f02=»R n P* P XIF P* P IFT LOCHAN=4 * P* @ P* J P* T PDWA3 EQU /23 DEVICE ADDRESS ^ P* P DATA 0 LAST OUTPUT DWT P DATA 0 LAST OUTPUT WORD P DATA INTLT3 INTERRUPT TABLE P INR A2,0,DWA3 INR
0x1a5754…1a58e8 Dummy {f00=0x0084, f01=0x0190, f02=»UEUE P* P IFT ACKMUL=1 P* , P DATA 0 NAK-ACKUMULATOR 6 $ P DATA 0 RETR. FAULT-ACKUMULATOR V , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR ~ ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR P* P XIF P* P EJECT P
0x1a58e8…1a5a7c Dummy {f00=0x0084, f01=0x0190, f02=» Z : P***************************************************** P* F 4 P* CONTROL WORK TABLE FOR LOCAL CHANNEL NO. 4 P P* PCWTLT4 EQU * P* P IFT LOCHAN=4 P* P* P* PDWA4 EQU /33 P* P DATA
0x1a5a7c…1a5c10 Dummy {f00=0x0084, f01=0x0190, f02=»TR P CIO A2,1,DWA4 CIO-START ! " P DATA 0 RETRANSMISSION COUNTER ! * P DATA 0 QUEUE ! P P DATA 0 SECOND QUEUE ! f P* ! P IFT ACKMUL=1 ! P* ! P DATA 0 NAK-ACKUMULATOR ! $ P DATA 0 RETR. FAULT-ACKUMULATOR ! , P DATA 0 UNDEFINED- I
0x1a5c10…1a5da4 Dummy {f00=0x0084, f01=0x0190, f02=»************* ! ~ $ P* C W T R T 1 * " $ P******************************* " > 4 P* CONTROL WORK TABLE FOR REMOTE CHANNEL NO. 1 " f P* CONNECTED TO FIRST CHRT " P* " PDWA5 EQU /1 DEVICE ADDRESS " PCWTRT1 EQU * " P DATA
0x1a5da4…1a5f38 Dummy {f00=0x0084, f01=0x0190, f02=»TR " P CIO A2,1,DWA5 CIO-START # " P DATA 0 RETRANSMISSION COUNTER # * P DATA 0 QUEUE TERMINAL 1 # P P DATA 0 QUEUE TERMINAL 2 # p P* # P IFT ACKMUL=1 # P* # P DATA 0 NAK-ACKUMULATOR # $ P DATA 0 BLOCK ERROR ACKUMULATOR # , P DATA
0x1a5f38…1a60cc Dummy {f00=0x0084, f01=0x0190, f02=» # ~ P DATA 0 TIMER POINTER $ PCWSYNC EQU *-CWTRT1 $ & P DATA /7055 SYNC CHARACTER $ B PLRCDWT EQU *-CWTRT1 $ d 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 $ 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 $ PLRCACK EQU *-CWTRT1 $ & P DAT
0x1a60cc…1a6260 Dummy {f00=0x0084, f01=0x0190, f02=»(LOOP-TESTS) $ t 0 PCWTBLK EQU *-CWTRT1 BLOCK SENDING INDICATOR % ( P DATA 0 BIT 0: BLOCKSENDING RUNNING % H $ P BIT 15: BLOCKSENDING ALLOWED % t P EJECT % $ P******************************** % $ P* C W T R T 2 * % $ P**************
0x1a6260…1a63f4 (1, 276) Dummy {f00=0x0084, f01=0x0190, f02=»TRT2 EQU * % P DATA 0 LAST OUTPUT DWT & P DATA 0 LAST OUTPUT WORD & 2 P & R P DATA INTRT1 INTERRUPT TABLE & Z P INR A2,0,DWA5 INR & ~ P OTR A2,1,DWA5 OTR & P CIO A2,1,DWA5 CIO-START & " P DATA 0 RETRANSMISSION COUNTER & P DATA 0 QUEUE TE
0x1a63f4…1a6588 Dummy {f00=0x0084, f01=0x018e, f02=»ERROR ACKUMULATOR & , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR ' ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR ' J P* ' v P XIF ' P* ' P DATA 0 TIMER POINTER ' P DATA /7255 SYNC-CHARACTER ' 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 ' 0
0x1a6588…1a671c Dummy {f00=0x0084, f01=0x0190, f02=» , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) ( $ P DATA 0 BLOCK SENDING INDICATOR ( 4 P EJECT ( $ P******************************** ( j $ P* C W T R T 3 * ( $ P******************************** ( P* ( : P* CHANNEL UNIT WORK TABLE
0x1a671c…1a68b0 Dummy {f00=0x0084, f01=0x0190, f02=» ( PDWA6 EQU /11 DEVICE ADDRESS ) P* ) , P DATA 0 LAST OUTPUT DWT ) 6 P DATA 0 LAST OUTPUT WORD ) V P DATA INTRT2 INTERRUPT TABLE ) v P INR A2,0,DWA6 INR ) P OTR A2,0,DWA6 OTR ) P CIO A2,1,DWA6 CIO-START ) " P DATA 0 RETRANSMISSION COU
0x1a68b0…1a6a44 Dummy {f00=0x0084, f01=0x0190, f02=» $ P DATA 0 BLOCK ERROR ACKUMULATOR * , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR * , ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR * P* * P XIF * P IFT RECHAN=3 * PDWA6 EQU /11 DEVICE ADDRESS * P* * P DATA 0 LAST OUTPUT DWT * P DATA
0x1a6a44…1a6bd8 Dummy {f00=0x0084, f01=0x0190, f02=»RT * z " P DATA 0 RETRANSMISSION COUNTER + P DATA 0 QUEUE TERMINAL 1 + 0 P DATA 0 QUEUE TERMINAL 2 + P P* + p P IFT ACKMUL=1 + z P DATA 0 NAK-ACKUMULATOR + $ P DATA 0 BLOCK ERROR ACKUMULATOR + , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR + ( P
0x1a6bd8…1a6d6c Dummy {f00=0x0084, f01=0x0190, f02=»ATA 0 LAST OUTPUT DWT + P DATA 0 LAST OUTPUT WORD , P DATA INTRT2 INTERRUPT TABLE , > P INR A2,0,DWA6 INR , b P OTR A2,0,DWA6 OTR , | P CIO A2,1,DWA6 CIO-START , " P DATA 0 RETRANSMISSION COUNTER , P DATA 0 QUEUE TERMINAL 1 , P DATA 0 QUEU
0x1a6d6c…1a6f00 Dummy {f00=0x0084, f01=0x0190, f02=»FINED-INTERRUPT-ACKUMULATOR , ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR - $ P* - P P XIF - Z P IFT RECHAN=2 - f P DATA 0 TIMER POINTER - | P DATA /7055 SYNC-CHARACTER - 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 - 0 P DATA 0 DWT OF GOING LRC
0x1a6f00…1a7094 (1, 277) Dummy {f00=0x0084, f01=0x0190, f02=»ORD (LOOP-TESTS) - x $ P DATA 0 BLOCK SENDING INDICATOR . P XIF . @ P IFT RECHAN=3 . L P DATA 0 TIMER POINTER . b 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 TERMINAL 2 . &
0x1a7094…1a7228 Dummy {f00=0x0084, f01=0x0190, f02=»ATA 0 BLOCK SENDING INDICATOR . P XIF / & P IFT RECHAN=4 / 2 P DATA 0 TIMER POINTER / H P DATA /7055 SYNC-CHARACTER / f 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 LRC-ACKUMULATOR
0x1a7228…1a73bc Dummy {f00=0x0084, f01=0x0190, f02=»TOR / t P XIF 0 P EJECT 0 $ P******************************** 0 & $ P* C W T R T 4 * 0 N $ P******************************** 0 v P* 0 : P* CHANNEL UNIT WORK TABLE FOR REMOTE CHANNEL NO. 2 0 " P* CONNECTED TO SECOND CHRT 0
0x1a73bc…1a7550 Dummy {f00=0x0084, f01=0x0190, f02=»INTRT2 INTERRUPT TABLE 0 P INR A2,0,DWA6 INR 1 P OTR A2,1,DWA6 OTR 1 8 P CIO A2,1,DWA6 CIO-START 1 R " P DATA 0 RETRANSMISSION COUNTER 1 r P DATA 0 QUEUE TERMINAL 1 1 P DATA 0 QUEUE TERMINAL 2 1 P* 1 P IFT ACKMUL=1 1 P DATA 0 NAK-ACKU
0x1a7550…1a76e4 Dummy {f00=0x0084, f01=0x0190, f02=»TOR 1 p P XIF 2 P IFT RECHAN=3 2 P DATA 0 LAST OUTPUT DWT 2 . P DATA 0 LAST OUTPUT WORD 2 N P DATA INTRT2 INTERRUPT TABLE 2 n P INR A2,0,DWA6 INR 2 P OTR A2,1,DWA6 OTR 2 P CIO A2,1,DWA6 CIO-START 2 " P DATA 0 RETRANSMISSION COUNTER 2
0x1a76e4…1a7878 Dummy {f00=0x0084, f01=0x0190, f02=»A 0 BLOCK ERROR ACKUMULATOR 2 , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR 3 $ ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR 3 T P XIF 3 P IFT RECHAN=4 3 P DATA 0 LAST OUTPUT DWT 3 P DATA 0 LAST OUTPUT WORD 3 P DATA INTRT2 INTERRUPT TABLE 3 P I
0x1a7878…1a7a0c Dummy {f00=0x0084, f01=0x0190, f02=»RMINAL 1 3 P DATA 0 QUEUE TERMINAL 2 4 P* 4 0 P IFT ACKMUL=1 4 : P DATA 0 NAK-ACKUMULATOR 4 P $ P DATA 0 BLOCK ERROR ACKUMULATOR 4 p , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR 4 ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR 4 P XIF 4 P IFT REC
0x1a7a0c…1a7ba0 Dummy {f00=0x0084, f01=0x0190, f02=» 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 5 & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 5 8 & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 5 b , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) 5 $ P DATA 0 BLOCK SENDING INDICATOR 5 P* 5 P XIF 5 P* 5 P IFT
0x1a7ba0…1a7d34 (1, 278) Dummy {f00=0x0085, f01=0x0190, f02=»ATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 5 & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 6 2 & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 6 , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) 6 $ P DATA 0 BLOCK SENDING INDICATOR 6 P* 6 P XIF 6 P* 6 P IFT RECHA
0x1a7d34…1a7ec8 Dummy {f00=0x0085, f01=0x0190, f02=»DWT OF GOING LRC-PROCESS TERMINAL 2 6 & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 7 , & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 7 V , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) 7 $ P DATA 0 BLOCK SENDING INDICATOR 7 P* 7 P XIF 7 P* 7 P EJECT 7 $ P**
0x1a7ec8…1a805c Dummy {f00=0x0085, f01=0x0190, f02=»NNEL UNIT WORK TABLE FOR REMOTE CHANNEL NO. 1 7 P* CONNECTED TO THIRD CHRT 8 6 P 8 Z P* 8 b PCWTRT5 EQU * 8 l P* 8 P IFT RECHAN=3 8 P* 8 PDWA7 EQU /21 DEVICE ADDRESS 8 P* 8 P DATA 0 LAST OUTPUT DWT 8 P DATA 0 LAST OUT
0x1a805c…1a81f0 Dummy {f00=0x0085, f01=0x0190, f02=» DATA 0 RETRANSMISSION COUNTER 8 P DATA 0 QUEUE TERMINAL 1 9 & P DATA 0 QUEUE TERMINAL 2 9 F P* 9 f P IFT ACKMUL=1 9 p P DATA 0 NAK-ACKUMULATOR 9 $ P DATA 0 BLOCK ERROR ACKUMULATOR 9 , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR 9 ( P DATA 0 PR
0x1a81f0…1a8384 Dummy {f00=0x0085, f01=0x0190, f02=»ATA 0 LAST OUTPUT DWT 9 P DATA 0 LAST OUTPUT WORD : P DATA INTRT3 INTERRUPT TABLE : > P INR A2,0,DWA7 INR : b P OTR A2,0,DWA7 OTR : | P CIO A2,1,DWA7 CIO-START : " P DATA 0 RETRANSMISSION COUNTER : P DATA 0 QUEUE TERMINAL 1 : P DATA 0 QUEU
0x1a8384…1a8518 Dummy {f00=0x0085, f01=0x0190, f02=»FINED-INTERRUPT-ACKUMULATOR : ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR ; $ P* ; P P XIF ; Z P IFT RECHAN=3 ; f P DATA 0 TIMER POINTER ; | P DATA /7055 SYNC-CHARACTER ; 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 ; 0 P DATA 0 DWT OF GOING LRC
0x1a8518…1a86ac Dummy {f00=0x0085, f01=0x0190, f02=»ORD (LOOP-TESTS) ; x $ P DATA 0 BLOCK SENDING INDICATOR < P XIF < @ P IFT RECHAN=4 < L P DATA 0 TIMER POINTER < b 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 TERMINAL 2 < &
0x1a86ac…1a8840 Dummy {f00=0x0085, f01=0x0190, f02=»ATA 0 BLOCK SENDING INDICATOR < P XIF = & P EJECT = 2 $ P******************************** = @ $ P* C W T R T 6 * = h $ P******************************** = P* = : P* CHANNEL UNIT WORK TABLE FOR REMOTE CHANNEL NO. 2 = P* CON
0x1a8840…1a89d4 (1, 279) Dummy {f00=0x0085, f01=0x0190, f02=»UTPUT WORD = P DATA INTRT3 INTERRUPT TABLE > P INR A2,0,DWA7 INR > 6 P OTR A2,1,DWA7 OTR > P P CIO A2,1,DWA7 CIO-START > j " P DATA 0 RETRANSMISSION COUNTER > P DATA 0 QUEUE TERMINAL 1 > P DATA 0 QUEUE TERMINAL 2 > P* > P IFT ACKMUL=1
0x1a89d4…1a8b68 Dummy {f00=0x0085, f01=0x0190, f02=»PRINTER TIMEOUT ACKUMULATOR > P XIF ? $ P IFT RECHAN=4 ? 0 P DATA 0 LAST OUTPUT DWT ? F P DATA 0 LAST OUTPUT WORD ? f P DATA INTRT3 INTERRUPT TABLE ? P INR A2,0,DWA7 INR ? P OTR A2,1,DWA7 OTR ? P CIO A2,1,DWA7 CIO-START ? " P DATA 0 RE
0x1a8b68…1a8cfc Dummy {f00=0x0085, f01=0x018e, f02=»ACKUMULATOR ? $ P DATA 0 BLOCK ERROR ACKUMULATOR @ , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR @ < ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR @ l P XIF @ P* @ P IFT RECHAN=3 @ P DATA 0 TIMER POINTER @ P DATA /7255 SYNC-CHARACTER @ 0 P DAT
0x1a8cfc…1a8e90 Dummy {f00=0x0085, f01=0x0190, f02=» @ l & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 A , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) A 2 $ P DATA 0 BLOCK SENDING INDICATOR A b P* A P XIF A P* A P IFT RECHAN=4 A P* A P DATA 0 TIMER POINTER A P DATA /7255 SYNC-CHARACTER A 0
0x1a8e90…1a9024 Dummy {f00=0x0085, f01=0x0190, f02=»AL 1 A r & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 B , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) B 6 $ P DATA 0 BLOCK SENDING INDICATOR B f P* B P XIF B P* B P EJECT B $ P******************************** B $ P* C W T R T 7 * B
0x1a9024…1a91b8 Dummy {f00=0x0085, f01=0x0190, f02=»URTH CHRT B | P* C PCWTRT7 EQU * C P* C 0 P IFT RECHAN=4 C : P* C P PDWA8 EQU /31 DEVICE ADDRESS C Z P* C ~ P DATA 0 LAST OUTPUT DWT C P DATA 0 LAST OUTPUT WORD C P DATA INTRT4 INTERRUPT TABLE C P INR A2,0,DWA8 INR C P O
0x1a91b8…1a934c Dummy {f00=0x0085, f01=0x0190, f02=»EUE TERMINAL 2 C P* D P IFT ACKMUL=1 D P DATA 0 NAK-ACKUMULATOR D 6 $ P DATA 0 BLOCK ERROR ACKUMULATOR D V , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR D ~ ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR D P* D P XIF D P IFT RECHAN=4 D P D
0x1a934c…1a94e0 Dummy {f00=0x0085, f01=0x0190, f02=»RC-PROCESS TERMINAL 2 D z & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 E & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 E H , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) E r $ P DATA 0 BLOCK SENDING INDICATOR E P XIF E P EJECT E $ P******************************** E
0x1a94e0…1a9674 (1, 280) Dummy {f00=0x0085, f01=0x018e, f02=»ANNEL NO. 2 E f " P* CONNECTED TO FOURTH CHRT F P* F : PCWTRT8 EQU * F D P* F X P IFT RECHAN=4 F b P DATA 0 LAST OUTPUT DWT F x P DATA 0 LAST OUTPUT WORD F P DATA INTRT4 INTERRUPT TABLE F P INR A2,0,DWA8 INR F P OTR A2,1,DWA8 OTR
0x1a9674…1a9808 Dummy {f00=0x0085, f01=0x0190, f02=» F v P* G P IFT ACKMUL=1 G P DATA 0 NAK-ACKUMULATOR G ( $ P DATA 0 BLOCK ERROR ACKUMULATOR G H , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR G p ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR G P XIF G P IFT RECHAN=4 G P* G P DATA 0 TIMER PO
0x1a9808…1a999c Dummy {f00=0x0085, f01=0x0190, f02=»MINAL 2 G l & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 H & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 H : , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) H d $ P DATA 0 BLOCK SENDING INDICATOR H P* H P XIF H P* H P EJECT H 6 P******************************
0x1a999c…1a9b30 Dummy {f00=0x0085, f01=0x0190, f02=» H ^ P* I 6 P* THIS TABLE HOLDS ADDRESSES OF CONTROLLER WORK I 8 P* TABLES CWT TO CHANNEL UNITS FOR LOCAL OR REMOTE I L P* TERMINALS. I P* I P* I P* I PCHTAB EQU * I P DATA CHTABE-* TABLE LENGTH I P IFT LOCHAN=1 I
0x1a9b30…1a9cc4 Dummy {f00=0x0085, f01=0x0190, f02=» DATA CWTLT2 I P DATA 0 J P DATA 0 J $ P XIF J 4 P* J @ P IFT LOCHAN=3 J J P DATA CWTLT1 J ` P DATA CWTLT2 J t P DATA CWTLT3 J P DATA 0 J P XIF J P IFT LOCHAN=4 J P DATA CWTLT1 J P DATA CWTLT2 J P DATA CWTLT3 J
0x1a9cc4…1a9e58 Dummy {f00=0x0085, f01=0x0190, f02=» DATA CWTRT4 J P DATA CWTRT5 K P DATA CWTRT6 K ( P* K < P XIF K F P* K R P IFT RECHAN=2 K P DATA CWTRT3 K r P DATA CWTRT4 K P XIF K P* K P IFT RECHAN=4 K P DATA CWTRT3 K P DATA CWTRT4 K P DATA CWTRT5 K P DATA
0x1a9e58…1a9fec Dummy {f00=0x0085, f01=0x0190, f02=» K P* L ( P************************************ L ( P* D W R E M U * L > ( P************************************ L j P* L . P* DUMMY TABLE USED WHEN LOOP-TESTING OF L $ P* REMOTE CHANNELS ARE NEEDED. L P* L PDWRE
0x1a9fec…1aa180 Dummy {f00=0x0085, f01=0x0190, f02=» P EJECT M P* M P* M * P* L O O P - T E S T S E C T I O N M & P* M T P* M ^ 2 P* ORDER /00: TEST REMOTE CHANNEL CONNECTION M h P* M : P* CHANNEL TO TEST IS GIVEN IN CONTROL WORD OF ECB. M 6 P* THE REQUEST IS COMPLETED WITH
0x1aa180…1aa314 (1, 281) Dummy {f00=0x0085, f01=0x0190, f02=» M . P* BIT 14: ACK NOT RECEIVED AFTER OUTPUT N P* N : 0 P* BIT 15: SYNC NOT RECEIVED AFTER OUTPUT N D PAREM DATA LOPTST N x " P DATA 0 ABORT ROUTINE ADDRESS N " P DATA IHLOP INTERRUPT HANDLER N PLOPTST EQU * N $ P LD A2,10,A8 GET CHANNEL
0x1aa314…1aa4a8 Dummy {f00=0x0085, f01=0x0190, f02=» N & P LD A2,CHTAB+8,A2 GET CWT-ADDRESS O P RF(E) DISIIE O 2 P LDR A7,A7 WRONG ORDER ? O H P RF(E) LOPT10 NO O h ( PDISIIE ABL DISIOE I/O REQUEST ERROR O PLOPT10 EQU * O , P LD A1,CWTRST,A2 GET CHANNEL LOOP STATUS O P ANK A1,/40 O ( P RF(
0x1aa4a8…1aa63c Dummy {f00=0x0085, f01=0x0190, f02=»SP O P EJECT P P* P P* P " P* END OF LOOP-TEST P , P* P J PIHLOP EQU * P T P LDR A5,A1 GET CWT-ADDRESS P h , P LD A1,CWTRST,A5 GET CHANNEL LOOP STATUS P P ANK A1,3 P P XRK A1,3 P PIHLP10 EQU * P P LDK A2,0 P : P SC
0x1aa63c…1aa7d0 Dummy {f00=0x0085, f01=0x0190, f02=» 2 P x P* Q P* C H R T 1 / C H R T 2 Q P* Q 6 8 P* THIS IS THE INTERRUPT HANDLER FOR CHLT AND CHRT Q @ P* Q | 2 P* WHEN INTERRUPT FROM A CHANNEL UNIT OCCURS Q 2 P* DRIVER FIRST RELATES INTERRUPT TO A CWT. Q 0 P* THEN DRIVER GETS
0x1aa7d0…1aa964 Dummy {f00=0x0085, f01=0x0190, f02=»* INTERRUPT. Q P* R 2 P* FOLLOWING TYPES OF INTERRUPT ARE RELEVANT R " P* R X . P* D = DEVICE ADDRESS C = CHARACTER R b P* R 8 P* ACK OUTPUT ACKNOWLEDGED D = 0 C = 7 R 8 P* NAK OUTPUT ERROR D = 0
0x1aa964…1aaaf8 Dummy {f00=0x0085, f01=0x0190, f02=» DRI DATA REQUEST IMMEDIATE SIGN BIT SET R 8 P* ABC+ BLOCK TR. ACKNOWLEDGED D = 0 C = 8 S : 8 P* ABC-L LRC ERROR IN BLOCK D = 0 C = A S v 8 P* ABC-V VRC ERROR IN BLOCK D = 0 C = C S 8 P* ABC-LV LRC O VRC E
0x1aaaf8…1aac8c Dummy {f00=0x0085, f01=0x018e, f02=» BE DIFFERENT FROM ZERO S f 8 P* STD STATUS MESSAGE D # 0 C # 0 T 2 P* DIN DATA INPUT D # 0 T P EJECT T P* T P* C H L T 1 T P* T P* INTERRUPT FROM CHLT1 T P* T PCHLT1 EQU * T
0x1aac8c…1aae20 Dummy {f00=0x0085, f01=0x0190, f02=» P* U P IFT CPU852=0 U " P MSR 8,A15 SAVE A1-A8 ON STACK U $ P XIF U J P* U V P LDK A7,2 INDICATE CHLT1 U ` P RF CLT010 U P* U PCHLT2 EQU * U P* U P* U P* U P* U P* C H L T 2 U P* U P* INTERRUPT F
0x1aae20…1aafb4 (1, 282) Dummy {f00=0x0086, f01=0x018e, f02=»SAVE A1-A8 ON STACK U P XIF V P* V ( P IFT LOCHAN=2 V 2 P IFT CPU852=0 V H " P MSR 8,A15 SAVE A1-A8 ON STACK V ^ P XIF V P* V P IFT LOCHAN=2 V P LDK A7,4 INDICATE CHLT2 V P RF CLT010 V P* V P XIF V P* V P IFT L
0x1aafb4…1ab148 Dummy {f00=0x0086, f01=0x018e, f02=» V P* W P IFT LOCHAN=3 W P IFT CPU852=0 W ( " P MSR 8,A15 SAVE A1-A8 ON STACK W > P XIF W d P* W p P IFT LOCHAN=3 W z P LDK A7,4 INDICATE CHLT2 W P RF CLT010 W P* W P XIF W P* W P IFT LOCHAN=4 W $ P ST P,INTSAV SAV
0x1ab148…1ab2dc Dummy {f00=0x0086, f01=0x0190, f02=» W P IFT CPU852=0 X " P MSR 8,A15 SAVE A1-A8 ON STACK X P XIF X D P* X P P IFT LOCHAN=4 X Z P LDK A7,4 INDICATE CHLT2 X p P RF CLT010 X P* X P XIF X P* X PCHLT3 EQU * X P* X P* X P* X P* C H L T 3 X
0x1ab2dc…1ab470 Dummy {f00=0x0086, f01=0x0190, f02=»852=1 X & P CF A15,SAVE8 SAVE A1-A8 ON STACK Y P XIF Y 8 P* Y D P IFT LOCHAN=4 Y N P IFT CPU852=0 Y d " P MSR 8,A15 SAVE A1-A8 ON STACK Y z P XIF Y P* Y P IFT LOCHAN=4 Y P LDK A7,6 INDICATE CHLT3 Y P RF CLT010 Y P XIF Y
0x1ab470…1ab604 Dummy {f00=0x0086, f01=0x0190, f02=»1-A8 ON STACK Y | P XIF Z P* Z " P IFT LOCHAN=3 Z , P IFT CPU852=0 Z B " P MSR 8,A15 SAVE A1-A8 ON STACK Z X P XIF Z ~ P* Z P IFT LOCHAN=3 Z P LDK A7,6 INDICATE CHLT3 Z P RF CLT010 Z P* Z P XIF Z P* Z PCHLT4 EQU *
0x1ab604…1ab798 Dummy {f00=0x0086, f01=0x0190, f02=» ST P,INTSAV SAVE LAST INTERRUPT Z P* [ ( P IFT CPU852=1 [ 2 & P CF A15,SAVE8 SAVE A1-A8 ON STACK [ H P XIF [ r P* [ ~ P IFT LOCHAN=4 [ P IFT CPU852=0 [ " P MSR 8,A15 SAVE A1-A8 ON STACK [ P XIF [ P* [ P IFT LOCHAN=4 [ P L
0x1ab798…1ab92c Dummy {f00=0x0086, f01=0x0190, f02=»* INTERRUPT FROM CHRT1 [ P* " PCHRT1 EQU * , P ST P,INTSAV @ P* T P IFT CPU852=1 ^ & P CF A15,SAVE8 SAVE A1-A8 ON STACK t P XIF P* P IFT CPU852=0 " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P* P L
0x1ab92c…1abac0 Dummy {f00=0x0086, f01=0x0190, f02=»CHRT2 EQU * P IFT RECHAN=2 ] $ P ST P,INTSAV SAVE LAST INTERRUPT ] * P* ] R P IFT CPU852=1 ] & P CF A15,SAVE8 SAVE A1-A8 ON STACK ] r P XIF ] P* ] P IFT RECHAN=2 ] P IFT CPU852=0 ] " P MSR 8,A15 SAVE A1-A8 ON STACK ] P XIF
0x1abac0…1abc54 (1, 283) Dummy {f00=0x0086, f01=0x0190, f02=» ST P,INTSAV STORE LAST INTERRUPT ] P* ^ * P IFT CPU852=1 ^ 4 & P CF A15,SAVE8 SAVE A1-A8 ON STACK ^ J P XIF ^ t P* ^ P IFT RECHAN=3 ^ P IFT CPU852=0 ^ " P MSR 8,A15 SAVE A1-A8 ON STACK ^ P XIF ^ P* ^ P IFT RECHAN=3 ^ P
0x1abc54…1abde8 Dummy {f00=0x0086, f01=0x018e, f02=»* ^ P IFT CPU852=1 _ & P CF A15,SAVE8 SAVE A1-A8 ON STACK _ P XIF _ J P* _ V P IFT RECHAN=4 _ ` P IFT CPU852=0 _ v " P MSR 8,A15 SAVE A1-A8 ON STACK _ P XIF _ P* _ P IFT RECHAN=4 _ P LDK A7,14 INDICATE CHRT2 _ P RF CLT0
0x1abde8…1abf7c Dummy {f00=0x0086, f01=0x0190, f02=» P IFT RECHAN=3 ` $ P ST P,INTSAV SAVE LAST INTERRUPT ` P* ` B P IFT CPU852=1 ` L & P CF A15,SAVE8 SAVE A1-A8 ON STACK ` b P XIF ` P* ` P IFT RECHAN=3 ` P IFT CPU852=0 ` " P MSR 8,A15 SAVE A1-A8 ON STACK ` P XIF ` P* `
0x1abf7c…1ac110 Dummy {f00=0x0086, f01=0x018e, f02=»E LAST INTERRUPT ` P* a P IFT CPU852=1 a " & P CF A15,SAVE8 SAVE A1-A8 ON STACK a 8 P XIF a b P* a n P IFT RECHAN=4 a x P IFT CPU852=0 a " P MSR 8,A15 SAVE A1-A8 ON STACK a P XIF a P* a P IFT RECHAN=4 a P LDK A7,18 INDICAT
0x1ac110…1ac2a4 Dummy {f00=0x0086, f01=0x0190, f02=» a PCHRT4 EQU * b P IFT RECHAN=4 b $ P ST P,INTSAV SAVE LAST INTERRUPT b 2 P* b Z P IFT CPU852=1 b d & P CF A15,SAVE8 SAVE A1-A8 ON STACK b z P XIF b P* b P IFT RECHAN=4 b P IFT CPU852=0 b " P MSR 8,A15 SAVE A1-A8 ON STACK b
0x1ac2a4…1ac438 Dummy {f00=0x0086, f01=0x0190, f02=»DRESS b p P* c P XIF c P* c $ * P EX CWTINR,A5 EXECUTE INR-INSTRUCTION c . P* c P IFT LOGING=1 c f P* c | 4 PCLT012 CF A15,LOGG ** LOGG OF INPUT CHARACTER ** c P* c P XIF c P EJECT c P* c & P* DETERMINE TYPE OF INTER
0x1ac438…1ac5cc Dummy {f00=0x0086, f01=0x0190, f02=»UK A7,10 c " P RF(N) CLT018 LOCAL INTERRUPT d P LDR A3,A2 d 6 . P SLC A3,6 REMOTE FIRST OR SECOND CHANNEL ? d H P RF(NN) CLT015 FIRST d z > P LD A5,CHTAB+12,A7 GET CWT-ADDRESS SECOND CHANNEL OF CHRT d 4 PCLT015 CF A15,RESTSY START OR RESTART SYNC-TIMER
0x1ac5cc…1ac760 Dummy {f00=0x0086, f01=0x0190, f02=»(N) CLT170 YES d & PCLT018 LDK A1,0 RESET RETURN CODE e ( P LDR A3,A2 DATA REQUEST IMMEDIATE ? e @ P RF(N) CLT050 e l $ P ANKL A3,/7000 DEVICE ADDRESS ? e ( P ABL(NE) CLT100 YES, DIN, STD OR DRD e P EJECT e P* e P* e , P* DETERMINE T
0x1ac760…1ac8f4 (1, 284) Dummy {f00=0x0086, f01=0x018e, f02=» SUK A3,7 e P RF(E) CLT050 ACK f P ADK A3,2 f , P ABL(E) CLT080 NAK f > P ADK A3,2 f X P ABL(E) CLT100 POWER ON f j P LDR A7,A7 LOCAL ? f P RF(N) CLTQUE YES f P LC A4,LRCACK,A7 f $ P LDK A6,/80 ABC-ANSWER ALLOWED ? f P TM A6,A4
0x1ac8f4…1aca88 Dummy {f00=0x0086, f01=0x0190, f02=» P RF(E) EXIIT g P ANK A4,/7F g P RF(Z) CLT046 YES g , * P CM LRCDWT,A7 RESET LRC-DEVICE POINTER g F ( P LDK A4,1 RESET BLOCKSENDING RUNNING g t P ANS A4,CWTBLK,A5 g P SUK A3,5 g & P RF(E) CLT043 ABC+ , GO TO DRIVER g P IFT ACKMUL=1 g
0x1aca88…1acc1c Dummy {f00=0x0086, f01=0x0190, f02=» P LDK A4,1 h P SUK A3,2 h P RF(E) CLT033 h ( P ADK A3,4 h > P RF(E) CLT033 h P P EJECT h f P* h t 0 P* RESOLVE QUEUE AND EXAMINE RECOVERY BIT. h ~ . P* ONE RECOVERY ATTEMPT IS MADE AND THEN h , P* RETURN CODE NOT OPERABLE IS SEN
0x1acc1c…1acdb0 Dummy {f00=0x0086, f01=0x0190, f02=»C-DEVICE ? h P RF(NE) CLTQUE i * P CM LRCDWT,A7 RESET LRC-DEVICE POINTER i ( P LDK A4,1 i V 2 P ANS A4,CWTBLK,A5 RESET BLOCKSENDING RUNNNING i h & PCLTQUE CF A15,QUEUE RESOLVE QUEUE i 6 PCLT031 LC A2,DWTST,A6 GET LEFT BYTE OF STATUS WORD i P LDR A
0x1acdb0…1acf44 Dummy {f00=0x0086, f01=0x0190, f02=»,A6 STORE i PCLT032 LDK A4,0 j 0 PCLT033 LDK A3,2 INDICATE RECOVERY OF DEVICE j * P LDK A4,1 =3 j ^ P RF CPO025 j t P EJECT j P* j P* ABC- VRC-ERROR j P* j 8 P* IF BLOCKSENDING SAME PROCEDURE AS FOR THE OTHER j P* ERR
0x1acf44…1ad0d8 Dummy {f00=0x0086, f01=0x0190, f02=»DR* A4,A6 BLOCK SENDING ? j P RB(N) CLT031 k " PCLT043 ABL CLT107 k 8 P EJECT k R P* k ` P* POWER ON k j P* k 8 P* RECOVERY ROUTINES ARE STARTED FOR EVERY DEVICE k < P* ON ACTUAL LINE EXCEPT THOSE OCCUPYING CHANNEL UNIT k P*
0x1ad0d8…1ad26c Dummy {f00=0x0086, f01=0x0190, f02=»T-ADDRESS k P* l PCHPOWO EQU * l , P LDR* A2,A5 GET CHANNEL OCCUPYING DEVICE l 0 . P CM CWTRTC,A5 RESET RETRANSMISSION COUNTER l ` P LDR A7,A7 REMOTE ? l P RF(N) CPO010 NO l * P CM LRCDWT,A7 RESET LRC-DEVICE POINTER l P LDK A7,1 l 0 P A
0x1ad26c…1ad400 Dummy {f00=0x0086, f01=0x018e, f02=»NTER l v PCPO020 ADK A1,2 m P LDR* A6,A1 GET DWT-ADDRESS m $ P RF(E) CPO030 m H P SRC A6,1 m ^ P RF(N) CPO030 m p P SLC A6,1 m ( P LCR A7,A6 GET LEFT OF CHANNEL PAR. m P ANK A7,1 INPUT DEVICE ? m P RF(NE) CPO025 YES m & P LDKL A7,/
0x1ad400…1ad594 (1, 285) Dummy {f00=0x0086, f01=0x0190, f02=» 0 P CWR A6,A2 DEVICE WAITING FOR CHANNEL ANSWER n P RF(E) CPO030 YES n 8 : PCPO025 LD A7,DWTADR,A6 ADDRESS TO ADDRESS-BLOCK IN A7 n R 6 P LD A7,RECADR,A7 ADDRESS TO RECOVERY ROUTINE IN A7 n P RF(E) CPO030 n P LDKL A5,DWTSB2 STACK BASE n P ADR A
0x1ad594…1ad728 Dummy {f00=0x0086, f01=0x0190, f02=»EXT n x PEXIIT RF EXIT o P EJECT o " P* o 0 6 P* INDICATE NOT OPERABLE BEFORE GOING TO DRIVER o : P* o t PCLT045 EQU * o ~ ( P LDK A1,NOERR INDICATE NOT OPERABLE o PCLT046 EQU * o P ABL CLT110 o P EJECT o P* o P* A C K
0x1ad728…1ad8bc Dummy {f00=0x0086, f01=0x0190, f02=»OR AND GO TO DISPATCHER. IF SYNC-ACK o P* DROP IT. p , 8 P* NORMAL ACK OR DRI WILL RESULT IN A RESETTING OF p B 8 P* RECOVERY BIT IN DWT. THEN A SIMULATION OF DATA p ~ < P* REQUEST FOR DEVICES WITHOUT DATA REQUEST IS CARRIED p < P* OUT. FOR
0x1ad8bc…1ada50 Dummy {f00=0x0086, f01=0x018e, f02=»MADE TO THE DATA REQUEST SECTION. p x * P* IF ACK WE HAVE TO WAIT FOR A DRD. q * PCLT050 EQU * q X & P LC A3,CWTLOW,A5 LAST OUTPUT WORD q l " P ANK A3,/F0 KEEP DEVICE NUMBER q P CF A15,QUEUE RESOLVE QUEUE q P LDKL A4,/EFFF q 6 P ANS A4,DWTST,A6 R
0x1ada50…1adbe4 Dummy {f00=0x0086, f01=0x018e, f02=» q z P RF(NE) CLT052 r P LDKL A3,/8000 r * P ORS A3,LRCACK,A7 INDICATE ABC ALLOWED r 4 P RF CLT055 r b PCLT052 EQU * r t . P LDR* A3,A6 DEVICE WITHOUT DATA REQUEST ? r P RF(NN) CLT055 r P CW A6,LRCDWT,A7 r P ABL(NE) CLT110 r P EJECT r
0x1adbe4…1add78 Dummy {f00=0x0086, f01=0x0190, f02=» r h P RF(E) CLT060 s P* s P* RESTART TIMER s ( P* s B " P LDKL A3,-DRQTIM RESTART TIMER s L P ST* A3,DWTTP,A6 s r P RF CLT068 s P* s P* START TIMER s P* s PCLT060 EQU * s P LDR A1,A6 PARAMETER s P LDKL A4,DWTTP T
0x1add78…1adf0c Dummy {f00=0x0086, f01=0x0190, f02=»INE AND DELAY s d PCLT068 EQU * t P LDR A8,A8 OBC-ACK ? t * P RF(E) EXIT YES t F P LDK A1,0 t ^ & P LDR* A4,A6 GET CHANNEL PARAMETER t p . P RF(N) CLT110 DEVICE WITHOUT DATA REQUEST t ( P LDR A2,A2 DATA REQUEST IMMEDIATE ? t P RF(N) CLT125 YE
0x1adf0c…1ae0a0 Dummy {f00=0x0086, f01=0x0190, f02=» FROM PRINTERS AND , FOR REMOTLY CONNECTED DEVICES t 8 P* USING THE LRC-FUNCTION , MISSING BLOCK CONTROL u : . P* CHARACTERS (ABC) FROM SELECTOR UNIT. u v P* u PDRQTUT EQU * u P LDR A6,A1 GET DWT-ADDRESS u . P CM DWTTP,A6 RESET POINTER TO TI
0x1ae0a0…1ae234 (1, 286) Dummy {f00=0x0087, f01=0x018e, f02=»L PARAMETER u ~ P ANK A5,/F v P SLL A5,1 2 * INDEX v & P LDK A2,/83 v B P CC A2,DWTOCH,A6 v V P RF(NE) DRQT10 v n P SUK A5,8 LOCAL DEVICE ? =4 v P RB(N) EXIT v P CF A15,OUTLIN v P RB EXIT v PDRQT10 EQU * v P* v P IFT ACK
0x1ae234…1ae3c8 Dummy {f00=0x0087, f01=0x0190, f02=» v $ P LD A7,DWTOR,A6 TEST ORDER ? =1 w P ANK A7,/FE U =9(=1) w 0 2 P RB(E) CLT045 YES, GO TO DEV. INT. HANDLER =1 w L , P ABL CLT032 NO, EXECUTE DEV. RECOVERY =1 w P EJECT w P* w P* N A K w P* w 8 P* ERROR ACKUMULATOR AND RETRANS
0x1ae3c8…1ae55c Dummy {f00=0x0087, f01=0x0190, f02=»UCCESS w ^ < P* RETURN CODE NOT OPERABLE IS SENT TO DEVICE DRIVER. x P* x N PCLT080 EQU * x X $ P LDR* A6,A5 GET LAST OUTPUT DWT x l P RB(E) EXIT x P* x P IFT ACKMUL=1 x P* x * P IM CWTADD,A5 UPDATE ERROR ACKUMULATOR x P* x
0x1ae55c…1ae6f0 Dummy {f00=0x0087, f01=0x0190, f02=» LD A4,CWTRTC,A5 GET COUNTER x P SUK A4,7 SEVEN TIMES ? y $ P ABL(E) CLT030 y D * P LD A2,CWTLOW,A5 GET LAST OUTPUT WORD y Z $ P EX CWTOTR,A5 EXECUTE OTR-INSTR. y P IFT LOGING=1 y 2 P CF A15,LOGG ** LOGG INPUT CHARACTER ** y P XIF y P
0x1ae6f0…1ae884 Dummy {f00=0x0087, f01=0x018e, f02=» A2,/FF y , P XRS A2,LRCACK,A7 UPDATE LRC-ACKUMULATOR z . P CF A15,RESTSY START OR RESTART SYNC-TIMER z @ PCLT090 ABL TDISP z r P EJECT z P* z P* z $ P* DATA INPUT AND DATA REQUEST z P* z 6 P* LOCAL DEVICES: GET DWT-ADDRESS, GET O
0x1ae884…1aea18 Dummy {f00=0x0087, f01=0x0190, f02=» P* { > P* DATA INPUT: SAME PROCEDURE AS FOR LOCAL DEVICES { : P* DATA REQUEST: INPUT WORD IS COMPLEMENTED WITH { P 8 P* STATUS FROM CHANNEL PARAMETER. { : P* STATUS MESSAGE: NEW STATUS IS STORED IN CHANNEL { @ P
0x1aea18…1aebac Dummy {f00=0x0087, f01=0x0190, f02=» WAITING FOR A STATUS CHANGE. IF SO { > P* GET ORDER AND ECB-ADDRESS AND GO TO | < < P* DEVICE WITH THE NEW STATUS. IF NO | ~ > P* WAITING FOR STATUS, CONTROL IS GIVEN | ( P*
0x1aebac…1aed40 Dummy {f00=0x0087, f01=0x0190, f02=»3,/E 2 * LINE NUMBER | P SRL A4,3 } P ANK A4,/E 2 * DEVICE NUMBER } . P CWK A4,/E SYNC-INPUT ? } R P RF(E) CLT150 YES } r P LOOP SWITCH SET } 0 P LD* A8,CWTITA,A5 ADDRESS TO INTERRUPT TABLE } P RB(Z) EXIT =7 } P ADR A8,A3 } , P LDR
0x1aed40…1aeed4 (1, 287) Dummy {f00=0x0087, f01=0x0190, f02=»T UNDEFINED INTERRUPT } " P LDR A4,A4 NO DEVICE NUMBER ? ~ P ABL(E) CHPOWO POWER ON ~ D & P ADR A8,A4 ADDRESS TO DWT-ADDRESS ~ d P LDR* A6,A8 GET DWT-ADDRESS ~ P RB(E) EXIT ~ P ANKL A6,/FFFE ~ 2 P LCR A3,A6 GET FIRST BYTE IN CHANNEL PARAMET
0x1aeed4…1af068 Dummy {f00=0x0087, f01=0x0190, f02=»A7 REMOTE ? ~ P RF(NN) CLT120 YES PCLT105 LC A3,DWTOCH,A6 . P ANK A3,/7F L P SUK A3,DUMMSP ` P RF(NE) CLT110 v . P LDR* A3,A6 DEVICE WITHOUT DATA REQUEST =9 4 P RF(N) CLT110 YES, DO NOT TOUCH TIMER POINTER =9 P* P********
0x1af068…1af1fc Dummy {f00=0x0087, f01=0x0190, f02=»Y RESET v P* P************************* P* < P CM* DWTTP,A6 F P CM DWTTP,A6 PCLT110 LD A7,DWTOR,A6 ORDER p P ANK A7,/FF P LD A8,DWTECB,A6 ECB-ADDRESS , P LD A3,DWTADR,A6 ADDRESS TO ADDRESSBLOCK P ENB * P
0x1af1fc…1af390 Dummy {f00=0x0087, f01=0x0190, f02=» $ P CWR* A6,A5 DRD BEFORE ANSWER ? P RB(E) EXIT YES 0 PCLT125 SRL A4,4 H P ANK A4,/C ` P ORR A2,A4 STATUS IN A2 r P RB CLT105 PCLT130 EQU * P LDR A3,A4 SAVE OLD STATUS P ANK A4,/3F RESET OLD STATUS P SLL A2,4
0x1af390…1af524 Dummy {f00=0x0087, f01=0x0190, f02=»A4,/200 STATUS CHANGE ALLOWED ? P RF(E) CLT154 EG. EXIT ( P XRS A4,DWTST,A6 RESET BIT F ( P XRR A3,A2 VOUCHER STATUS CHANGED ? h P ANK A3,/80 P RF(E) CLT154 EG. EXIT P ABL CLT033 P EJECT P* P* P* TFU IN
0x1af524…1af6b8 Dummy {f00=0x0087, f01=0x0190, f02=»NDICATE LOOP MODE AND SYNC-ACK RECEIVED PCLT152 EQU * 0 P ORS A4,CWTRST,A5 D PCLT154 ABL EXIT ^ P EJECT v P* P* LOOP MODE P* PCLT170 EQU * P LDR A3,A2 P ANK A3,/FF P SUK A3,3 POWER ON ? P RF(
0x1af6b8…1af84c Dummy {f00=0x0087, f01=0x018e, f02=» A1,NOERR INDICATE NOT OPERABLE PCLT177 RB CLT110 ( PCLT178 EQU * @ P SUK A3,4 ACK ? T P RF(NE) EXITA NO l $ P LDK A4,2 INDICATE ACK RECEIVED P RB CLT152 P EJECT P* P* POWER ON P* PCLT179 EQU *
0x1af84c…1af9e0 Dummy {f00=0x0087, f01=0x018e, f02=» 2 P* GET LAST OUTPUT DWT AND SET CHANNEL FREE. 4 P* IF LOCAL DEVICE CHECK OUTPUT QUEUE AND SEND : P* IF SOMETHING THERE. r 8 P* IF REMOTE DEVICE CHECK QUEUE OF CHANNEL'S OTHER < P* TERMINAL AND SEND IF SOMETHING THERE. IF NOTHING I
0x1af9e0…1afb74 (1, 288) Dummy {f00=0x0087, f01=0x0190, f02=» P STR A2,A15 SAVE A2 $ P LDR* A4,A5 GET LAST OUTPUT DWT $ . P CM CWTRTC,A5 RESET RETRANSMISSION COUNTER L P CMR A5 SET CHANNEL FREE ~ P LDK A1,0 P LDR A7,A7 LOCAL ? P RF(N) QUEU01 YES " P LDK A1,1 INDICATE FIRST TRIAL "
0x1afb74…1afd08 Dummy {f00=0x0087, f01=0x0190, f02=»WT-TABLE-ADDRESS z PQUEU04 EQU * P LDR* A6,A8 QUEUE EMPTY ? , P RF(E) QUEU10 YES N P LDR A7,A7 =5 h $ P RF(N) QUEU06 PREVENT HANG UP =5 ~ P LD A2,CWTBLK,A5 P LD A2,CWTBLK,A5 ( P RF(N) QUEU05 BLOCK SENDING RUNNING PQUEU06
0x1afd08…1afe9c Dummy {f00=0x0087, f01=0x0190, f02=»OUTPUT CHARACTER v P CF A15,OUTLIN SEND IT PQUEU05 LDR* A2,A15 RELOAD A2 6 0 P CWR A6,A4 DEVICE ALREADY IN OUTPUT QUEUE ? Z P RF(E) QUEU30 " P LDR A6,A4 GET LAST OUTPUT DWT & P RF(E) QUEU30 UNDEFINED INTERRUPT P CWK A6,1 SYNC ANSWE
0x1afe9c…1b0030 Dummy {f00=0x0087, f01=0x0190, f02=»1,0 " P CWR A7,A5 TERMINAL 2 REMOTE ? P RB(E) QUEU01 NO 2 & PQUEU20 LDKL A8,CWTEQ+2 NEXT QUEUE J P RB QUEU03 t PQUEU30 ADKL A15,4 P RF EXITA P EJECT P* P* 0 P* RESTSY = SUBROUTINE TO START OR RESTART * P
0x1b0030…1b01c4 Dummy {f00=0x0087, f01=0x0190, f02=» P RF(NE) RESY20 P LDR A1,A5 P LDK A4,CWTTP TIMER POINTER , P ADR A4,A5 ADD CWT-ADDRESS P P CF A15,SETIMP SET TIMER r P DATA SYNCUT,TIME P RF RESY30 PRESY20 LDKL A4,-TIME " P ST* A4,CWTTP,A5 RESTART TIME PRESY30 L
0x1b01c4…1b0358 Dummy {f00=0x0087, f01=0x0190, f02=»DING n 0 P* IF NOTHING HAPPENS ON A LINE IN 500 MS P* SYNC-CHARACTER IS SENT. @ P* d PSYNCUT EQU * n $ P CM CWTTP,A1 RESET TIMER POINTER P LDR A5,A1 ( P LD A2,CWSYNC,A1 GET SYNC CHARACTER ( P XRKL A2,/800 CHANGE TERMINAL NU
0x1b0358…1b04ec Dummy {f00=0x0087, f01=0x0190, f02=» OUTPUT DWT t P* P IFT LOGING=1 P* 4 * P CF A15,LOGG LOGG OF OUTPUT CHARACTER > P XIF l P* x P LDR A3,A2 P SLL A3,4 P RF(NN) SYNC05 P ADK A5,2 PSYNC05 EQU * P ANK A2,/FF , P XRS A2,LRCACK,A5
0x1b04ec…1b0680 Dummy {f00=0x0087, f01=0x0190, f02=»/60 P RF(E) SYNC20 THIRD SYNC P SUK A3,/20 , P RF(NE) SYNC10 FIRST SYNC @ P LDK A3,/20 SECOND SYNC b * PSYNC10 XRS A3,CWTRST,A1 CHANGE COUNTER PEXITA ABL TDISP DISPATCH * PSYNC20 LDKL A6,DWREMU SET DWT-ADDRESS P RB CLT177
0x1b0680…1b0814 (1, 289) Dummy {f00=0x0087, f01=0x018e, f02=»LOWED AND SAVE A3-A5 IN DWT. P* $ POUTPUT EQU * . P ANK A2,/FF B P LDR A1,A2 V P SUK A1,/82 STX ? h P RF(E) OUTP05 P SUK A1,/15 ETB ? P RF(NE) OUTP10 ( POUTP05 LDR* A1,A6 CHANNEL PARAMETER P ANK A1,/C REMOTE ?
0x1b0814…1b09a8 Dummy {f00=0x0087, f01=0x0190, f02=» P* : P* INDICATE INTERRUPTS ALLOWED AND SAVE A3-A5 IN DWT P* P PSTREG EQU * Z P INH n P LDKL A1,/100 z 0 P ORS A1,DWTST,A6 INDICATE INTERRUPTS ALLOWED $ P ST A3,DWTA3,A6 SAVE REGISTER A3 $ P ST A4,DWTA4,A6
0x1b09a8…1b0b3c Dummy {f00=0x0087, f01=0x018e, f02=»NTERRUPT ALLOWED RESTORE A3-A5 FROM DWT AND RETURN & P* VIA A5. ELSE GO TO DISPATCHER. : P* d P* n PLDREG EQU * x P LD A3,DWTST,A6 P ANKL A3,/100 P RB(Z) EXITA P XRS A3,DWTST,A6 P* P* P* L D R E G
0x1b0b3c…1b0cd0 Dummy {f00=0x0087, f01=0x018e, f02=» l PLDREGE EQU * & P LD A3,DWTA3,A6 RELOAD REGISTER A3 & P LD A4,DWTA4,A6 A4 F $ PLDRE10 LD A7,DWTOR,A6 GET ORDER p P ANK A7,/FF P LD A8,DWTECB,A6 P RTN A5 RETURN VIA A5-STACK P EJECT P* P*
0x1b0cd0…1b0e64 Dummy {f00=0x0087, f01=0x0190, f02=» P* A3 = BUFFER INDEX P* A8 = ECB-ADDRESS " P* @ P* ON EXIT: J P* ` P* A2 = CHARACTER j * P* A1 = 0 IF LAST CHARACTER ELSE # 0 P* J P* IF LAST CHARACTER IS REACHED A3 IS STORED IN ECB EFFECTIVE LENGTH
0x1b0e64…1b0ff8 Dummy {f00=0x0087, f01=0x0190, f02=» j " P LD A2,2,A8 GET BUFFER ADDRESS P ADR A2,A3 . P LCR A2,A2 CHAR. TO A2 @ P ANK A2,/FF ^ $ P ADK A3,1 INCREMENT BUFFER INDEX r P RF GCH020 , PGCH010 ST A3,6,A8 STORE EFFECTIVE LENGTH PGCH020 EQU * ( PRTNA15 ADKL A15,2 RETURN
0x1b0ff8…1b118c Dummy {f00=0x0087, f01=0x0190, f02=» ^ P* CHANNEL UNIT P* * P* 4 B P* GET CWT-ADDRESS AND IF CHANNEL UNIT FREE SEND CHARACTER. > 8 P* RUNNING LRC-PROCESS CAN STOP OUTPUT FROM OTHER 8 P* DEVICES ON SAME LINE. IF CHANNEL UNIT NOT FREE P* QUEUE O
0x1b118c…1b1320 Dummy {f00=0x0087, f01=0x0190, f02=»PU852=0 " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF 6 P* B P ANK A2,/FF L " P LDR* A7,A6 CHANNEL PARAMETER ` P ANK A7,/F P SLL A7,1 DOUBLE INDEX & P LD A5,CHTAB+2,A7 GET CWT-ADDRESS P SUK A7,8 REMOTE ? P RF(N) OUL100
0x1b1320…1b14b4 (1, 290) Dummy {f00=0x0088, f01=0x0190, f02=»ET CWT-ADDRESS , P ADR A7,A3 TERMINAL ADJUSTED CWT-ADDRESS P EJECT F POUL100 INH T P* f ( P* IF UNIT NOT FREE QUEUE OUTPUT. p 2 P* IF REMOTE DEVICE AND LRC-PROCESS ALREADY 0 P* RUNNINGON TERMINAL FOR ANOTHER DEVICE, 0 P*
0x1b14b4…1b1648 Dummy {f00=0x0088, f01=0x0190, f02=»NEL UNIT FREE ? P RF(NE) OUL800 NO P LDR A7,A7 REMOTE ? 2 P RF(N) OUL500 N P LDR A3,A2 d P SUK A3,/82 STX ? v P RF(NE) OUL200 NO P EJECT P* P* S T X P* * P LD A3,LRCDWT,A7 LRC-PROCESS RUNNING ?
0x1b1648…1b17dc Dummy {f00=0x0088, f01=0x0190, f02=» INDICATE FIRST OBC , POUL150 LDR* A3,A6 GET CHANNEL PARAMETER , P ANKL A3,/E00 SET DEVICE NUMBER TO ZERO N P RF OUL510 ~ & POUL175 CWR A3,A6 SAME LRC-DEVICE ? P RF(NE) OUL800 QUEUE OUTPUT P RF OUL350 POUL200 SUK A3,/15 ETB ?
0x1b17dc…1b1970 Dummy {f00=0x0088, f01=0x0190, f02=»RCACK+1,A7 GET LRC-ACKUMULATOR P RB OUL150 & P* 8 P* OTHER OUTPUT B P* 8 POUL300 CW A6,LRCDWT,A7 SAME DEVICE SENDING WITH LRC f P RF(Z) OUL350 YES P LD A3,CWTBLK,A5 , P RF(NN) OUL500 BLOCKSENDING NOT RUNNING * P RF
0x1b1970…1b1b04 Dummy {f00=0x0088, f01=0x0190, f02=» P LD A3,CWTBLK,A5 P RF(Z) OUL500 ( P ORKL A2,/8000 INDICATE BLOCKSENDING 2 P LDK A3,/80 ^ 2 P SC A3,CWTBLK,A5 INDICATE BLOCKSENDING RUNNING r P EJECT P* P* & P* SEND CHARACTER SECTION. 2 P* CHARACTER
0x1b1b04…1b1c98 Dummy {f00=0x0088, f01=0x0190, f02=»ERS FOR f . P* DWT AND ACKUMULATOR IS UPDATED. P B POUL500 EQU * J " P LDR* A3,A6 CHANNEL PARAMETER ^ P ANKL A3,/7E00 & POUL510 ORR A2,A3 OUTPUT WORD IN A2 P* P* P* POUL515 EX CWTOTR,A5 OTR P RF(R)
0x1b1c98…1b1e2c Dummy {f00=0x0088, f01=0x0190, f02=»ESSBLOCK p . P ABI INTADR,A2 GO TO INTERRUPT HANDLER =8 POUL520 EQU * B P* V P IFT LOGING=1 ` P* v 0 P CF A15,LOGG ** LOGG OF OUTPUT CHARACTER ** P* P XIF P* P STR A6,A5 SET CHANNEL BUSY , P ST A2,CWTLOW,A5
0x1b1e2c…1b1fc0 Dummy {f00=0x0088, f01=0x018e, f02=»ULATOR n . P CF A15,RESTSY START OR RESTART SYNC-TIMER 4 POUL600 SC A2,DWTOCH,A6 SET LAST OUTPUT CHARACTER @ POUL700 EQU * x P IFT CPU852=1 ( P ABL IHRET8 RESTORE A1-A8 AND RETURN P XIF P* P IFT CPU852=0 * P MLR 8,A15 RES
0x1b1fc0…1b2154 (1, 291) Dummy {f00=0x0088, f01=0x0190, f02=» P EJECT P* : P* NORMALLY DWT-ADDRESS IS PUT LAST IN OUTPUT QUEUE P* Z POUL800 EQU * d P LDR A7,A7 REMOTE ? x P RF(NN) OUL805 YES P LDR A7,A5 CWT-ADDRESS , POUL805 LD A4,CWTEQ,A7 GET QUEUE POINTER P RF(E) OUL82
0x1b2154…1b22e8 Dummy {f00=0x0088, f01=0x0190, f02=»LOW THE THREAD P RB OUL810 $ POUL820 ST A6,CWTEQ,A7 QUEUE DWT ( P RF OUL840 P $ POUL830 ST A6,DWTOTQ,A4 QUEUE DWT b P LDK A4,0 : POUL840 ST A4,DWTOTQ,A6 SET OR RESET OUTPUT QUEUE LINK P RB OUL600 P EJECT P* P*
0x1b22e8…1b247c Dummy {f00=0x0088, f01=0x0190, f02=»TINE IS ENTERED FROM 'PFINIT' r P* & P* 0 P* : PCHLTON EQU * D P LD A4,CHTAB X " PCON010 SUK A4,2 ALL TREATED ? l P RF(NZ) CON020 NO TAKE NEXT P ABL RTNA15 PCON020 EQU * P INH $ P LD A5,CHTAB,A4 LOAD CWT-ADDRE
0x1b247c…1b2610 Dummy {f00=0x0088, f01=0x0190, f02=» BUSY p $ P EX CWTCIS,A5 EXECUTE CIO-START P RF(U) CON027 6 $ P LDK A3,0 INDICATE CHANNEL BUSY L . P CF A15,RESTSY START OR RESTART SYNC-TIMER t PCON027 EQU * 4 P ST A3,CWTRST,A5 INDICATE C.U. PRESENT OR NOT =6 P LD* A1,CWTITA,A5
0x1b2610…1b27a4 Dummy {f00=0x0088, f01=0x0190, f02=»OWED n . P LD A2,10,A1 ANY DEVICE ON SECOND TERMONAL 0 P RF(NZ) CON029 YES BLOCK SENDING NOT ALLOWED > 8 PCON028 LDK A2,BLOCK INDICATE BLOCKSENDING OR NOT DK1 r PCONRET ST A2,CWTBLK,A5 P RF CON035 PCON029 LDK A2,0 4 P RB CONRET INDICAT
0x1b27a4…1b2938 Dummy {f00=0x0088, f01=0x018e, f02=»ST DWT ~ P RB(Z) CON010 P CWK A6,1 SYNC ? $ P RB(E) CON010 < P CMR A5 RESET LAST OUTPUT R P LDK A2,/00 DUMMY t P CF A15,OUTLIN SEND IT P RB CON010 P EJECT P* P* P* L O G G P* 8 P* IF CON
0x1b2938…1b2acc Dummy {f00=0x0088, f01=0x0190, f02=» P* PLOGG STR A1,A15 P LD A1,POINT * P ADK A1,2 > & P CWK A1,BUFE BUFE IS MAX LOGG AREA P P RF(NE) L1 z ( P LDKL A1,BUF SET FIRST LOGG ADDRESS PL1 ST A1,POINT & P STR A2,A1 LOGG OF INR OR OTR WORD P LDR* A1,A15
0x1b2acc…1b2c60 Dummy {f00=0x0088, f01=0x0190, f02=»EA (500) DK1 | PBUFE EQU * P* & P XIF 0 P* < P EJECT F P* T P* ^ P* E C H O , E C H E N D h P* < P* SUBROUTINE TO ECHO CHARACTER CONTAINING TWO PARTS, . P* ONE GENERAL AND ONE DEVICE-DEPENDENT P*
0x1b2c60…1b2df4 (1, 292) Dummy {f00=0x0088, f01=0x0190, f02=»DEVICE-DEPENDENT ECHO-ROUTINE ~ P* & . P* PART TWO: ECHO ONE OR MORE CHARACTERS 0 2 P* CORRESPONDING TO ONE CHARACTER b 4 P* TO BE STORED IN INPUT ECB-BUFFER P* P* 4 P* PART ONE FOLLOWS AND PART TWO C
0x1b2df4…1b2f88 Dummy {f00=0x0088, f01=0x0190, f02=»ICE DEPENDENT ECHO DRIVER x P* " " P* A7 MUST NOT BE DESTROYED , 6 P* THE ECHO-ROUTINE SHOULD BE TERMINATED WITH A R P* JUMP TO 'ECHRTN'. P* PECHEND EQU * P* P IFT CECHO=1 P* $ P LDKL A7,/8000 INDICATE
0x1b2f88…1b311c Dummy {f00=0x0088, f01=0x0190, f02=»A5,DWTA5,A6 P LD A1,DWTST,A6 STATUS P SLL A1,2 2 $ P RF(NN) RETUR NO ECHO REQUESTED D 0 P LDR A4,A6 SAVE DWT-ADDRESS OF INPUT DEVICE l 2 P LD A6,DWTECH,A6 DWT-ADDRESS OF OUTPUT DEVICE 6 P ST A4,DWTWAT,A6 SAVE DWT-ADDRESS OF INPUT DEVICE
0x1b311c…1b32b0 Dummy {f00=0x0088, f01=0x414a, f02=»A1 GO TO ECHO-ROUTINE DEVICE-DEPENDENT P XIF . PECHRTN EQU * : P IFT CECHO=1 N P LDR A7,A7 END? b P RF(NN) ERETUR NO z ( P CF A15,TENDIO END I/O OUTPUT DEVICE > PERETUR LD A6,DWTWAT,A6 RELOAD DWT-ADDRESS OF INPUT DEVICE 4 PRETUR
0x1b32b0…1b3444 Dummy {f00=0x0088, 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
0x1b3444…1b35d8 Dummy {f00=0x0088, f01=0x0190, f02=» J F IDENT TASS REL 9.2 79-11-16 870105040920 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 TASMXAP T
0x1b35d8…1b376c Dummy {f00=0x0088, f01=0x0190, f02=» TASCVOC TASVOL TASCXO 0 TASSEX D , ( X TASXLB $ TASFDB 4 TASVRL 6 TASVLEC 8 TASVRN : TASECB < , ( !
0x1b376c…1b3900 Dummy {f00=0x0088, f01=0x0190, f02=» TASTBE T TASLFD# V , ( A , a TASCAQT n TTB:SA QTJOB , ( D H @ P 4 A U W A VOLCHE , ( ( A @ U : A V A
0x1b3900…1b3a94 (1, 293) Opaque[0x194]
0x1b3a94…1b3c28 # DirEnt {nam=»DRSOP1«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1118, f03=0x0000}
0x1b3a94…1b3c28 IdxSect {
0x1b3a94…1b3c28 f00 = 0x0088 // 0x1b3a94 @0x0
0x1b3a94…1b3c28 f01 = 0x000a // 0x1b3a96 @0x2
0x1b3a94…1b3c28 gno = [ // 0x1b3a98 @0x4
0x1b3a94…1b3c28 [0x00]: C0x0088.0x3.0
0x1b3a94…1b3c28 [0x01]: C0x0089.0x0.0
0x1b3a94…1b3c28 [0x02]: C0x0089.0x1.0
0x1b3a94…1b3c28 [0x03]: C0x0089.0x2.0
0x1b3a94…1b3c28 [0x04]: C0x0089.0x3.0
0x1b3a94…1b3c28 ]
0x1b3a94…1b3c28 }
0x1b3c28…1b3dbc Dummy {f00=0x0088, f01=0x018e, f02=» 2 P IDENT DRSOP1 REL 9.2 79-11-16 870105040920 P : P* B P* L @ P************************************************************ V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P* DRSOP1 = DRIVER FOR SYSTEM OPERATORS PANEL
0x1b3dbc…1b3f50 Dummy {f00=0x0088, f01=0x0190, f02=» P* B P* THIS DRIVER HANDLES INPUT AND OUTPUT ON SYSTEM OPERATOR'S , P* PANEL CONNECTED TO CPU VIA CHCR-SOP X P* P* > P* ON AN INPUT REQUEST THE DEVICE SOFTWARE STATUS IS SET : P* 'BUSY' UNTIL THE INPUT INTERRUPT IS TA
0x1b3f50…1b40e4 Dummy {f00=0x0088, f01=0x0190, f02=»ING READ REQUEST,POWER UP r > P* IS INDICATED AND NEXT READ REQUEST IS TERMINATED WITH " P* -2 IN CONTROL WORD d P* P* > P* ON AN OUTPUT REQUEST THE DEVICE SOFTWARE STATUS IS SET > P* 'READY' IMMEDIATELY, SINCE THE OUTPUT DOES N
0x1b40e4…1b4278 Dummy {f00=0x0088, f01=0x0190, f02=» ` P* ( P* S O P A S : READ SWITCHES ENTRY P* > * P* S O P A L : ACTIVATE LIGHTS ENTRY H P* v & P* I H S O P : INTERRUPT HANDLER P* " P* S O P R : RECOVERY ROUTINE P* P* P* * P* THE FOLLOWIN
0x1b4278…1b440c Dummy {f00=0x0088, f01=0x018e, f02=»IGHTS OFF z , P* 39 : WRITE FLASHING LIGHTS P* B P* NORMAL REGISTER USAGE: L P* n " P* REGISTER A1: INPUT/OUTPUT x " P* A2: WORK REGISTER " P* A3: WORK REGISTER " P* A4: WORK REGISTER
0x1b440c…1b45a0 Dummy {f00=0x0088, f01=0x0190, f02=» r P* P* P EJECT P* * P************ 4 P* ENTRIES: * H P************ P* p P* z * P ENTRY SOPCT S.O.P. CHANNEL UNIT TABLE ( P ENTRY SOPR S.O.P. RECOVERY ROUTINE 2 P ENTRY IHSOP S.O.P. INTERRUPT HANDLER (ALI
0x1b45a0…1b4734 (1, 294) Dummy {f00=0x0089, f01=0x0190, f02=»**** P* EXTERNALS: * P************** " P* 8 P* TOSS GLOBALS: B P* Z , P EXTRN SAVE8 PUSH REGS A1-A8 ONTO STACK d 4 P EXTRN DISIOE DISPATCHER I/O REQUEST ERROR ENTRY & P EXTRN TDISP DISPATCHER LKM ENTRY . P EXTRN RETUR8 POP
0x1b4734…1b48c8 Dummy {f00=0x0089, f01=0x018e, f02=»I DATA SOP LIGHTS AND FD POWER P EJECT & P 4 P* < ( P************************************ F P* r P* DWT DISPLACEMENTS | P* ( P************************************ P* $ EXTRN DWTCHP CHANNEL PARAMETER EXTRN
0x1b48c8…1b4a5c Dummy {f00=0x0089, f01=0x0190, f02=» EXTRN DWTTAB TTAB ADDRESS * % EXTRN DWTWAT WAIT/ACTIVATE INDICATOR & EXTRN DWTTQ TERMINAL QUEUE T . P EXTRN INTSAV SAVE AREA FOR LAST INTERRUPT x ( P EXTRN ECBEL EFFECTIVE LENGTH IN ECB " P EXTRN ECBCW ECB CONTROL WORD PTIME EQU 5 F
0x1b4a5c…1b4bf0 Dummy {f00=0x0089, f01=0x0190, f02=» P PX:A EQU 0 PSOPX EQU 0 " P** 4 P** > 8 P* THIS DRIVER CAN BE MADE TO HANDLE CREDIT ORDERS H P* BY SETTING CREDIT = 1 4 P* ORDERS 05 AND 06 ARE THEN REPLACED BY ORDERS P* /37 AND /38 RESPECTIVLY B P* BY
0x1b4bf0…1b4d84 Dummy {f00=0x0089, f01=0x0190, f02=»N ZERO IS STORED IN THE CONTROL WORD z P* OF THE ECB. , P** D P N PCREDIT EQU 1 V P** j P** t @ P* THE ORDER /39, WRITE FLASHING LIGHTS CAN BE INCLUDED BY ~ P* SETTING X:B=1 P* PX:B EQU 0 PWRFLA EQU 0
0x1b4d84…1b4f18 Dummy {f00=0x0089, f01=0x0190, f02=» EQU 1 P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION " . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0 P* PDVBLEN EQU 0 MMU BUFFER SIZE " PDEVIND EQU -2 SOP DEVICE INDEX P*
0x1b4f18…1b50ac Dummy {f00=0x0089, f01=0x018e, f02=» P XIF P* P IFT MMUPAG=1 PSTART EQU DWTDRD+4 4 P XIF N P* Z & PDWTTP EQU START+/00 TIMER POINTER d P* P EJECT P* P************************** P* S.O.P. DEVICE ADDRESS: * P********************
0x1b50ac…1b5240 Dummy {f00=0x0089, f01=0x0190, f02=» " P* * " P* S.O.P. CHANNEL UNIT TABLE * * " P* * P " P****************************** v P* P* 0 PSOPCT EQU * TABLE STARTS WITH ADDRESS BLOCK: P* P DATA DVBLEN MMU BUFFER SI
0x1b5240…1b53d4 (1, 295) Dummy {f00=0x0089, f01=0x0190, f02=»TCHES ENTRY x " P DATA 0 ABORT ROUTINE ADDRESS P* : P DATA DVBLEN MMU BUFFER SIZE D P DATA DEVIND DEVICE INDEX h & PSOPADU EQU * ACTIVATE LIGHTS ENTRY P* & P DATA SOPAL ACTIVATE LIGHTS ENTRY " P DATA 0 ABORT ROUTINE ADDRESS
0x1b53d4…1b5568 Dummy {f00=0x0089, f01=0x0190, f02=» " P* * " P* S.O.P. ACTIVATION ROUTINE: * * " P* * P " P****************************** v P* > P* THE ORDER IS ANALYZED AND THE CORRESPONDING I/O ACTION P* IS CARRIED OUT. P*
0x1b5568…1b56fc Dummy {f00=0x0089, f01=0x0190, f02=» P* * P RF(NZ) SOPER ERROR IF NOT READ ORDER P* < P* INPUT SWITCH VALUE F P* d * PSOPIN LDR* A2,A6 POWER UP INDICATION ? n P IFT CREDIT=0 P RF(Z) EXIT NO $ P CMR A6 YES CLEAR FOR NEXT REQ. P XIF P IFT CREDIT=
0x1b56fc…1b5890 Dummy {f00=0x0089, f01=0x0190, f02=»HANGES OF S.O.P. LIGHTS P* & PSOPAL EQU * ACTIVATE LIGHTS ENTRY * P* T P LD A3,10,A8 CHANGED LIGHTS ^ , P ANKL A3,/07FF BITS 5-15 CONTROLS LIGHTS P* P LDR A4,A7 COPY ORDER P IFT WRFLA=1 P CCK A4,/3939 P RF(
0x1b5890…1b5a24 Dummy {f00=0x0089, f01=0x0190, f02=»/37 P XIF & P RF(Z) SOPON IF SO, TURN ON LIGHTS P* B & P SUK A4,1 SEE IF LIGHTS OFF ORDER L P RF(Z) SOPOFF v & PSOPER ABL(NZ) DISIOE ILLEGAL ORDER P IFT WRFLA=1 P EJECT P* P* P* FLASH LIGHTS P*
0x1b5a24…1b5bb8 Dummy {f00=0x0089, f01=0x018e, f02=»A6 P LDR A1,A6 P CF A15,SETIMP P DATA FLTUT,TIME 2 P ST A4,DWTTP,A6 J P LDKL A1,/FFBF b P ANS A1,DWTST,A6 SET ON FLAG x PFL010 EQU * . P* A3 CONTAINS LIGHTS THAT SHOULD FLASH * P ORS A3,FLASH STORE NEW LAMPS TO FLASH
0x1b5bb8…1b5d4c Dummy {f00=0x0089, f01=0x0190, f02=» PFL020 EQU * P C1R A3,A3 P ANS A3,SPDLCI * P RF SOPONOF @ P* T P EJECT ^ P* l PFLTUT EQU * FLASH TIME OUT v P LDKL A6,DWSO01 P LD A3,FLASH 0 P RF(Z) FL030 NO MORE FLASHING FOR THIS TIME P LDKL A1,-TIME R
0x1b5d4c…1b5ee0 Dummy {f00=0x0089, f01=0x0190, f02=»EXIT END I/O P XIF P EJECT P* . PSOPOFF EQU * 8 , P C1R A3,A3 GET COMPLEMENTED CONTROL WORD L 4 P ANS A3,SPDLCI MASK OUT LIGHTS TO BE TURNED OFF | P IFT WRFLA=1 $ P ANS A3,FLASH STOP SOME FLASHING P XIF , P RF SOPONOF
0x1b5ee0…1b6074 (1, 296) Dummy {f00=0x0089, f01=0x0190, f02=» A3 CONTAINS CONTROL WORD . P ORS A3,SPDLCI SET LIGHTS TO BE TURNED ON $ P IFT WRFLA=1 V P C1R A3,A3 j * P ANS A3,FLASH STOP SOME OTHER FLASHING | P XIF P* P* COMMON ON/OFF PATH: P* 0 PSOPONOFF LD A1,SPDLCI GET LIGHTS
0x1b6074…1b6208 Dummy {f00=0x0089, f01=0x0190, f02=»********************** P* * P* S.O.P. INTERRUPT HANDLER * B P* * f P**************************** P* P* @ P* THE INTERRUPT HANDLER WILL TAKE CARE OF ALL INTERRUPTS. P*
0x1b6208…1b639c Dummy {f00=0x0089, f01=0x018e, f02=» CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF * P* 6 P IFT CPU852=0 @ " P MSR 8,A15 SAVE A1-A8 ON STACK V P XIF | P* $ P ST P,INTSAV SAVE LAST INTERRUPT P INR A1,0,SOPDA GET SWITCH P SRN A1,A2 CALC INDEX P IFT CREDIT=0
0x1b639c…1b6530 Dummy {f00=0x0089, f01=0x0190, f02=» " P LDKL A6,DWSI02 ANY REQUEST ON P LD A4,DWTST,A6 STATUS WORD * P RF(N) IHSOP2 NO N $ P LD A8,DWTECB,A6 GET ECB-ADDRESS f P ST A2,ECBCW,A8 STORE INDEX ( P CM ECBEL,A8 RESET EFFECTIVE LENGTH P LDK A1,0 P CF A15,TENDIO END I/O
0x1b6530…1b66c4 Dummy {f00=0x0089, f01=0x0190, f02=»WTECB,A6 GET ECB-ADDRESS P & PIHSOP3 ST A2,ECBCW,A8 STORE INDEX ( P R , PENDIO CM ECBEL,A8 RESET EFFECTIVE LENGTH Z P LDK A1,0 P CF A15,TENDIO END I/O P $ PEXIT ABL TDISP GO TO DISPATCHER P EJECT P* * P******
0x1b66c4…1b6858 Dummy {f00=0x0089, f01=0x0190, f02=» * * P************************************* * P* X P* b : P* THIS ROUTINE IS A SUBROUTINE TO THE POWER FAILURE l 8 P* RECOVERY ROUTINE (PFAR). IT'S ENTRY POINT SHOULD @ P* BE PRESENT IN THE POWER FAILUR
0x1b6858…1b69ec Dummy {f00=0x0089, f01=0x018e, f02=»DWTCHP j P* P* PSOPR EQU * ENTRY POINT " P IFT CPU852=1 B & P CF A15,SAVE8 SAVE A1-A8 ON STACK X P XIF P* P IFT CPU852=0 " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P* " P CIO A1,1,SOPDA ACTIVATE INPUT
0x1b69ec…1b6b80 Dummy {f00=0x0089, f01=0x0190, f02=» " P LDKL A2,-2 POWER UP INDICATOR P XIF . P IFT CREDIT=1 : P LDK A2,0 P P XIF b P n P IFF SOPX=0 v " P LDKL A6,DWSI02 ANY REQUEST ON $ P LD A4,DWTST,A6 GET STATUS WORD P RF(NN) SOPR1 YES P STR A2,A6 IND POWER U
0x1b6b80…1b6d14 (1, 297) Dummy {f00=0x0089, f01=0x0190, f02=» STR A2,A6 IND POWER UP P PSOPR2 RB IHSOP1 ( P EJECT @ P* N P* D W S I 0 1 : INPUT DWT X P* | PDWSI01 EQU * , P DATA 0 CHANNEL PARAMETER: POWER UP IND , P DATA /8000 /8000 MEANS DEVICE IS READY P DATA 0 ECB AD
0x1b6d14…1b6ea8 Dummy {f00=0x0089, f01=0x0190, f02=» & " DATA 0 SAVE AREA USER ECB ADDRESS P DATA DEVECI MMU ECB ADDRESS . PDEVECI EQU * R P DATA 0,0,0,0,0,0 f P XIF P* P* D W S O 0 1 : OUTPUT DWT P* P* PDWSO01 EQU * " P DATA /0040 CHANNEL PARAMETER , P
0x1b6ea8…1b703c Dummy {f00=0x0089, f01=0x0190, f02=» j P DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR $ P DATA 0 TERMINAL QUEUE L IFT MMUPAG=1 j & " DATA 0 SAVE AREA USER ECB ADDRESS P DATA DEVECO MMU ECB ADDRESS XIF P DATA 0 TIMER POINTER . PFLASH DATA 0 SAV
0x1b703c…1b71d0 Dummy {f00=0x0089, f01=0x0190, f02=»* * P* D W S I 0 2 : EXTENDED INPUT DWT ! P* ! 8 P ! B PDWSI02 EQU * ! J P IFF SOPX=0 ! ^ P DATA 0 ! r P DATA /8000 ! P DATA 0 ECB ADDRESS ! P DATA 0 ORDER ! P DATA SOPADI ! P DATA 0,0,0 ! IFT MMUPAG=1 ! & " D
0x1b71d0…1b7364 Dummy {f00=0x0089, f01=0x402c, f02=» ! P* " P* " P END " @ " (DWT ! P* ! 8 P ! B PDWSI02 EQU * ! J P IFF SOPX=0 ! ^ P DATA 0 ! r P DATA /8000 ! P DATA 0 ECB ADDRESS ! P DATA 0 ORDER ! P DATA SOPADI ! P DATA 0,0,0 ! IFT MMUPAG=1 ! & " D
0x1b7364…1b74f8 Dummy {f00=0x0089, 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
0x1b74f8…1b768c Dummy {f00=0x0089, f01=0x0190, f02=»*-CWTRT1 # P DATA 0 TIMER POINTER $ PCWSYNC EQU *-CWTRT1 $ . P DATA /7055 SYNC CHARACTER $ J PLRCDWT EQU *-CWTRT1 $ l 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 $ 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 $ PLRCACK EQU *-CWTRT1 $
0x1b768c…1b7820 Dummy {f00=0x0089, f01=0x018e, f02=»US WORD (LOOP-TESTS) $ | 0 PCWTBLK EQU *-CWTRT1 BLOCK SENDING INDICATOR % ( P DATA 0 BIT 0: BLOCKSENDING RUNNING % P $ P BIT 15: BLOCKSENDING ALLOWED % | P EJECT % $ P******************************** % $ P* C W T R T 2 * % $ P******
0x1b7820…1b79b4 (1, 298) Opaque[0x194]
0x1b79b4…1b7b48 # DirEnt {nam=»DRDU01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1140, f03=0x0000}
0x1b79b4…1b7b48 IdxSect {
0x1b79b4…1b7b48 f00 = 0x008a // 0x1b79b4 @0x0
0x1b79b4…1b7b48 f01 = 0x0012 // 0x1b79b6 @0x2
0x1b79b4…1b7b48 gno = [ // 0x1b79b8 @0x4
0x1b79b4…1b7b48 [0x00]: C0x008a.0x0.0
0x1b79b4…1b7b48 [0x01]: C0x008a.0x1.0
0x1b79b4…1b7b48 [0x02]: C0x008a.0x2.0
0x1b79b4…1b7b48 [0x03]: C0x008a.0x3.0
0x1b79b4…1b7b48 [0x04]: C0x008b.0x0.0
0x1b79b4…1b7b48 [0x05]: C0x008b.0x1.0
0x1b79b4…1b7b48 [0x06]: C0x008b.0x2.0
0x1b79b4…1b7b48 [0x07]: C0x008b.0x3.0
0x1b79b4…1b7b48 [0x08]: C0x008c.0x0.0
0x1b79b4…1b7b48 ]
0x1b79b4…1b7b48 }
0x1b7b48…1b7cdc Dummy {f00=0x008a, f01=0x0190, f02=» 2 P IDENT DRDU01 REL 9.2 79-11-16 870105040920 P : P* B P* L 2 P********************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* D P* DRDU01 = DRIVER FOR ONE/TWO DISC UNITS X/1215 AND/OR X/1216
0x1b7cdc…1b7e70 Dummy {f00=0x008a, f01=0x0190, f02=»* P* 0 P* THIS DISC DRIVER HANDLES UP TO TWO DISC 6 P* DRIVES X/1215,X/1216 CONNECTED TO CPU VIA IOP H P* ON MULTIPLEX CHANNEL P* P* * P* THE FOLLOWING ORDERS ARE TREATED : P* P* /00 TEST STATUS
0x1b7e70…1b8004 Dummy {f00=0x008a, f01=0x0190, f02=» P EJECT DRDU01 DRDU01 P* $ P* . P*********** 8 P* ENTRIES * L P*********** ` P* t P* ~ $ P ENTRY DUADR ACTIVATION ADDRESS P ENTRY DUON RECOVERY ROUTINE 2 P ENTRY IHDU1 INTERRUPT HANDLER DISC UNIT NO. 1 2
0x1b8004…1b8198 Dummy {f00=0x008a, f01=0x0190, f02=»DISC UNIT NO. 1 v . P ENTRY DWDU02 DWT ADDRESS DISC UNIT NO. 2 P EJECT DRDU01 J P* b P* l P************* v P* EXTERNALS * P************* P* P* P EXTRN TDISP DISPATCHER P EXTRN TENDIO END I/O .
0x1b8198…1b832c Dummy {f00=0x008a, f01=0x0190, f02=» INTSAV SAVE AREA LAST INTERRUPT P EXTRN SETIMP TIMER ( EXTRN DWTST STATUS D EXTRN DWTECB ECB ADDRESS ` $ EXTRN DWTOR DWT INDEX AND ORDER EXTRN DWTA2 SAVE AREA A2 EXTRN DWTA4 SAVE AREA A4 EXTRN DWTA5 SAVE AREA A5
0x1b832c…1b84c0 Dummy {f00=0x008a, f01=0x0190, f02=»************************** P* * " P* CONDITIONAL ASSEMBLY * D P* * f P************************** P* P* 6 P* READ AFTER WRITE MAY BE EXCLUDED FOR ORDER /15 P* BY SETTING X
0x1b84c0…1b8654 (1, 299) Dummy {f00=0x008a, f01=0x0190, f02=» X:B := 2 P* PX:B EQU 1 PNUNITS EQU 1 . P* B P* L 4 P* DRIVE 1 MAY BE A X/1216 INSTEAD OF A X/1215 V P* BY SETTING X:C = 1 P* PX:C EQU 0 PTYPE1 EQU 1 P* P* 4 P* DRIVE 2 MAY BE A X/1
0x1b8654…1b87e8 Dummy {f00=0x008a, f01=0x0190, f02=» P* P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. N P* | PMMUPAG EQU 1 P* P* 6 P* IF DISC ACCESSES ARE MADE EXCLUSIVELY BY DATA 8 P* MANAGEMENT, AND MMUPAG=1, TH
0x1b87e8…1b897c Dummy {f00=0x008a, f01=0x0190, f02=»NSTRUCTION h . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* D PCPU852 EQU 0 N P* b * l . ** A PROGRAM VERSION USING TOSS DISC PAGING v * &* IS OBTAINED BY SETTING DSKPAG EQU 1. * PDSKPAG EQU 1 * P EJECT D
0x1b897c…1b8b10 Dummy {f00=0x008a, f01=0x0190, f02=» /28 DEVICE ADDRESS FIXED DISC NO. 1 4 PDAC1 EQU /08 DEVICE ADDRESS CARTRIDGE DISC NO. 1 , 0 PDAF2 EQU /38 DEVICE ADDRESS FIXED DISC NO. 2 d 4 PDAC2 EQU /18 DEVICE ADDRESS CARTRIDGE DISC NO. 2 $ PWER1 EQU /10 MULTIPLEXOR ADDRESS & PCUADR EQU /08 CO
0x1b8b10…1b8ca4 Dummy {f00=0x008a, f01=0x0190, f02=»QU 410 SECTOR LENGTH, CHARACTERS PQRETRY EQU 4 NO OF RETRIES ( PTIME EQU 1000 1 MIN 40 SEC J P* l P EJECT DRDU01 DRDU01 v P* P* $ P DATA 0 INDICATES NO MMU BUFFER P DATA 4 DISC DEVICE INDEX & PDUADR DATA DUAD ACTI
0x1b8ca4…1b8e38 Dummy {f00=0x008a, f01=0x0190, f02=» 200 READ AFTER WRITE BUFFER P XIF $ P* 0 P EJECT DRDU01 : P* R ( P* RETRY IS USED TO DETECT RETRIES P* PRETRY DATA 0 MAX NO OF TRIES P* P* 6 P* TABLE FOR CONVERSION FROM LOGICAL TO PHYSICAL P*
0x1b8e38…1b8fcc Dummy {f00=0x008a, f01=0x0190, f02=»215,/181B,/1E11,/1417,/1A1D v P* $ P EJECT DRDU01 DRDU01 . P* N P* X P***************** b P* * | P* ACTIVATION * P* * P***************** P* P* PDUAD EQU * ACTIV
0x1b8fcc…1b9160 Dummy {f00=0x008a, f01=0x0190, f02=»ISC UNIT BUSY t P XIF P* " PDUA:00 EQU * , 0 P LDK A4,QRETRY GET MAX NO OF RETRIES TO MAKE @ P ADK A7,0 SET CR t " P RF(Z) TEST TEST STATUS ORDER P* P IFT MMUPAG=1 P IFF 1-ONLYDM+DSKPAG=0 & P LDR* A1,A8 GET FIRST WO
0x1b9160…1b92f4 (1, 300) Dummy {f00=0x008a, f01=0x0190, f02=»RDU01 P* P* " P LD A2,2,A8 GET BUFFER ADDRESS " P LDR A3,A2 H P ANKL A2,/F000 Z P SRL A2,2 p P SLL A1,2 P ORR A1,A2 4 P ST A1,DWT:PA,A6 PAGE NUMBER (PSEUDO MMU TABLE) P ANKL A3,/FFF P LDR A1,A3 ( P O
0x1b92f4…1b9488 Dummy {f00=0x008a, f01=0x0190, f02=»JECT DRDU01 P* P* ( P LD A2,DWTOR,A6 GET INDEX AND ORDER * * P ST A2,DWTORD,A6 SAVE IT FOR RECOVERY V " P SRL A2,7 GET INDEX (DOUBLED) P ADR A2,A6 P LD A1,DWTBSY,A2 P ABL(NZ) END:15 P LDR A1,A7 CHECK ORDER
0x1b9488…1b961c Dummy {f00=0x008a, f01=0x0190, f02=»0 PHYSICAL READ P SUK A1,4 P RF(Z) DUA:30 PHYSICAL WRITE * P* N " PDUERR ABL DISIOE REQUEST ERROR X P* ~ P EJECT DRDU01 DRDU01 P* P* P********************* P* * P* TEST STATUS
0x1b961c…1b97b0 Dummy {f00=0x008a, f01=0x0190, f02=»E NAME x P RF DENDIO PERFORM ENDIO P* . P EJECT DRDU01 8 P* P P* Z & PDUA:30 LD A1,4,A8 REQUESTED LENGTH d P SUKL A1,LENGTH ( P RB(NZ) DUERR REQUESTED LENGTH # 410 ( P LD A2,10,A8 RELATIVE SECTOR NUMBER P LDR A3,A2
0x1b97b0…1b9944 Dummy {f00=0x008a, f01=0x0190, f02=»2,5 CYLINDER NUMBER P CW A2,DWTCMX,A6 . P RB(G) DUERR CYLINDER NO GREATER THAN MAX. 4 : P CW A2,DWTCYL,A6 COMPARE WITH CURRENT CYLINDER NUMBER f . P RF(E) DU:030 DISC HEAD ALREADY POSITIONED * P ST A2,DWTCYL,A6 SAVE CYLINDER NUMBER P*
0x1b9944…1b9ad8 Dummy {f00=0x008a, f01=0x0190, f02=» x P************************ P* ( P* 2 & PDU:010 CF A5,SEEK SEEK CYLINDER N < P SLC A1,5 f $ P RF(N) DU:030 OK. SEEK COMPLETED x P* P EJECT DRDU01 P* P* P************************ P*
0x1b9ad8…1b9c6c Dummy {f00=0x008a, f01=0x0190, f02=» CF A5,SEEKZ SEEK CYLINDER 0 P SLC A1,6 $ $ P RF(N) DU:020 SECTOR 0 NOT FOUND 6 P SUK A4,1 ^ P RB(NZ) DU:010 TRY AGAIN p P* * PDU:020 LDKL A3,/FFFF ALL RETRIES DONE 0 P ST A3,DWTCYL,A6 SET ILLEGAL CYLINDER NUMBER ( P LDKL A1,/20
0x1b9c6c…1b9e00 Dummy {f00=0x008a, f01=0x0190, f02=»**************** P* * P* GO AND EXECUTE ORDER * : P* * P************************** ~ P* P* PDU:030 LDR A1,A7 ORDER P SUK A1,5 P RF(Z) WRIT:N BASIC WRITE P S
0x1b9e00…1b9f94 (1, 301) Dummy {f00=0x008a, f01=0x0190, f02=» SECTOR N-1 * P* * P************************ 8 P* X P* b 0 PP:WRIT CF A5,WER:R5 EXECUTE WER INSTRUCTIONS l P CF A5,READ5 READ FIVE WORDS P ANK A1,2 , P RF(Z) P:WR10 OK. CHECK CYLINDER NUMBER & P S
0x1b9f94…1ba128 Dummy {f00=0x008a, f01=0x0190, f02=»D A2,DWTCYL,A6 CYLINDER NUMBER 6 P CW A2,BUF+1 COMPARE WITH CURRENT CYLINDER NUMBER & ( P RB(NE) DU:015 ERROR.SEEK CYLINDER 0 ` P* P EJECT DRDU01 P* P* P********************* P* * P* WRITE
0x1ba128…1ba2bc Dummy {f00=0x008a, f01=0x0190, f02=»UCTIONS l P CF A5,WRITE WRITE SECTOR N P ANK A1,/1F 4 $ P RF(Z) WRIT20 OK. NO RETURN CODE H & P SUK A4,1 DECREMENT RETRY COUNTER p P RB(NZ) WRIT:N TRY AGAIN? ( P RF DENDIO ALL RETRIES DONE, GIVE UP P* PWRIT20 EQU * P I
0x1ba2bc…1ba450 Dummy {f00=0x008a, f01=0x0190, f02=»F A5,WER:R EXECUTE WER INSTRUCTIONS P CF A5,READ READ SECTOR N , P ANK A1,/F N P RF(Z) DENDIO JUMP IF OK ` & P SUK A4,1 DECREMENT RETRY COUNTER P RB(NZ) WRIT30 TRY AGAIN? P XIF P* ( P RF DENDIO ALL RETRIES DONE, GIVE UP
0x1ba450…1ba5e4 Dummy {f00=0x008a, f01=0x0190, f02=» SECTOR N * P* * P********************** 4 P* R P* 0 PREAD:N CF A5,WER:R EXECUTE WER INSTRUCTIONS f P CF A5,READ READ SECTOR N P ANK A1,/F $ P RF(Z) READ10 OK. NO RETURN CODE & P SUK A4,1 DECREMEN
0x1ba5e4…1ba778 Dummy {f00=0x008a, f01=0x0190, f02=»E t P* P EJECT DRDU01 P* , P* 6 P*************************** @ P* * d P* CHECK CYLINDER NUMBER * P* * P*************************** P* P* P
0x1ba778…1ba90c Dummy {f00=0x008a, f01=0x0190, f02=»FF 1-ONLYDM+DSKPAG=0 4 P LD A2,DWT:LA,A6 GET FLAG/LOGICAL BUFFER ADDRESS 0 P RF(Z) READ30 JUMP IF BUFFER IN SYSTEM AREA T , P TS -30,A15 SAVE MMU REGISTERS ON STACK ( P TL DWT:PA,A6 LOAD PSEUDO MMU TABLE * P ELR A2,A2 GET CURRENT CYLINDER NUMB
0x1ba90c…1baaa0 Dummy {f00=0x008a, f01=0x0190, f02=»YLINDER NUMBER v P XIF P* " P EJECT DRDU01 , P* D P* N P IFT MMUPAG=1 X P IFT ONLYDM-DSKPAG=1 n , P LD* A2,2,A8 GET CURRENT CYLINDER NUMBER P XIF P* PREAD40 EQU * < P CW A2,DWTCYL,A6 COMPARE WITH REQUES
0x1baaa0…1bac34 (1, 302) Dummy {f00=0x008b, f01=0x0190, f02=» DRDU01 P* P* " P****************************** $ " P* * J " P* EXECUTE WER INSTRUCTIONS * p " P* * " P****************************** P* P* & PWER:R5 LDKL A2,/80
0x1bac34…1badc8 Dummy {f00=0x008b, f01=0x018e, f02=» CWK A3,BUF P RF(E) EX:WER P RF WER:WB * P* < & PWER:W LDKL A2,/C0CD WRITE 1 SECTOR F P* p P EJECT DRDU01 z P* P* * PWER:WB LD A3,2,A8 USER BUFFER ADDRESS P* P IFT MMUPAG=1 P IFF 1-ONLYDM+DSKPAG
0x1badc8…1baf5c Dummy {f00=0x008b, f01=0x0190, f02=» P* PEX:WER EQU * " P EX DWTWR1,A6 EXECUTE 1:ST WER " " P EX DWTWR2,A6 EXECUTE 2:ND WER H P RTN A5 n P* ~ P EJECT DRDU01 DRDU01 P* P* P******************* P* * P* SEEK CYLINDER *
0x1baf5c…1bb0f0 Dummy {f00=0x008b, f01=0x0190, f02=»3 P ORK A2,2 ! P RF CIO EXECUTE CIO-START ! P* ! > PSEEKZ EQU * ! H P LDK A2,3 ! P RF CIO EXECUTE CIO-START ! n P* ! ( PREAD5 LC A2,DWTSEC,A6 SECTOR NUMBER ! P ANK A2,/1F ! P SUK A2,3 SECTOR N-1 ! P ANK A2,/1F !
0x1bb0f0…1bb284 Dummy {f00=0x008b, f01=0x0190, f02=» SECTOR NUMBER ! | P ANK A2,/1F " P SLL A2,2 " * P RF CIO EXECUTE CIO-START " < P* " ^ * PWRITE LD A2,DWTCYL,A6 CYLINDER NUMBER " h P* " P IFT MMUPAG=0 " , P ST* A2,2,A8 PUT CYL. NR IN USER BUFFER " P XIF " P* " P IFT MMUPAG=
0x1bb284…1bb418 Dummy {f00=0x008b, f01=0x0190, f02=»REA " h , P TS -30,A15 SAVE MMU REGISTERS ON STACK # ( P TL DWT:PA,A6 LOAD PSEUDO MMU TABLE # < * P ESR A2,A1 PUT CYL. NR IN USER BUFFER # h 0 P TL -30,A15 RESTORE MMU REGISTERS FROM STACK # P RF WRITE4 # P* # PWRITE3 EQU * # , P ST* A2,2,A8 P
0x1bb418…1bb5ac Dummy {f00=0x008b, f01=0x0190, f02=»KPAG=1 # , P ST* A2,2,A8 PUT CYLNMB. IN USER BUFFER $ P XIF $ > P* $ J PWRITE4 EQU * $ T " P LC A2,DWTSEC,A6 SECTOR NUMBER $ h P SLL A2,2 $ P ADK A2,1 $ P* $ P EJECT DRDU01 DRDU01 $ P* $ P* $ PCIO EQU * $ P LC A
0x1bb5ac…1bb740 Dummy {f00=0x008b, f01=0x018e, f02=»DK A1,1 $ * P ABL(3) END:20 DEVICE ADDRESS UNKNOWN? % " P ST A4,DWTA4,A6 A4 % > " P ST A5,DWTA5,A6 A5 % d P* % & PT:DISP ABL TDISP GO TO DISPATCHER % P* % P EJECT DRDU01 DRDU01 % P* % P* % P************
0x1bb740…1bb8d4 (1, 303) Dummy {f00=0x008b, f01=0x018e, f02=» P* & P* & PDUON EQU * & P IFT CPU852=1 & * & P CF A15,SAVE8 SAVE A1-A8 ON STACK & @ P XIF & j P* & v P IFT CPU852=0 & " P MSR 8,A15 SAVE A1-A8 ON STACK & P XIF & P* & P LDKL A6,DWDU01 & & P LD A1,INIFLG INITIALIZATION F
0x1bb8d4…1bba68 Dummy {f00=0x008b, f01=0x0190, f02=» P* ' P IFT NUNITS=2 ' & P LDR* A6,A6 GET OTHER DWT ADDRESS ' $ " P ANS A1,DWTST,A6 SET DWT BUSY ' N P XIF ' t P* ' P EJECT DRDU01 ' P* ' P* ' PDUON05 EQU * ' P LDKL A5,DWTSB2 STACK BASE ' P ADR A5,A6 STACK BASE '
0x1bba68…1bbbfc Dummy {f00=0x008b, f01=0x0190, f02=»2 ' P ADR A5,A6 STACK BASE ( " P CF A5,VO:NAM GET VOLUME NAME ( ( $ P LD A8,DWTECB,A6 GET ECB ADDRESS ( N " P RF(NZ) DUON10 ANY REQUEST ON? ( v $ P LDR* A6,A6 NO, CHECK NEXT DRIVE ( P XIF ( P* ( $ P LD A8,DWTECB,A6 GET ECB ADDRESS ( P RF(Z)
0x1bbbfc…1bbd90 Dummy {f00=0x008b, f01=0x0190, f02=»/3F ( P ABL DUA:00 REPEAT REQUEST ) P* ) . P EJECT DRDU01 ) 8 P* ) P P* ) Z PDUON15 CF A15,TENDIO ) d P* ) P IFT NUNITS=2 ) & P LDR* A6,A6 GET OTHER DWT ADDRESS ) P CF A15,TENDIO ) P XIF ) P RB T:DISP DISPATCH ) P
0x1bbd90…1bbf24 Dummy {f00=0x008b, f01=0x0190, f02=» ) P CM* TIMER KILL TIMER * P RF DUON40 * & P XIF * 8 P* * D P RB T:DISP TIMER ACTIVE * N P* * n P EJECT DRDU01 * x P* * $ P* SET DISC BUSY AND START TIMER * P* * PDUON20 LDKL A1,/7FFF * P IFT NUNITS=2 * " P ANS A1,DW
0x1bbf24…1bc0b8 Dummy {f00=0x008b, f01=0x0190, f02=»STACK BASE * | P ADR A5,A6 + " P CF A5,VO:NAM READ VOLUME NAME + $ P* + J P IFT NUNITS=2 + T P LDR A4,A1 SAVE RETURN CODE + j & P LDR* A6,A6 GET OTHER DWT ADDRESS + " P LDKL A5,DWTSB2 GET STACK BASE + P ADR A5,A6 + " P CF A5,VO:NAM READ VOLUM
0x1bc0b8…1bc24c Dummy {f00=0x008b, f01=0x0190, f02=» ADK A1,0 CHECK RETURN CODE + " P RB(Z) DUON10 REPEAT REQUEST? , $ P* , J PDUON23 EQU * , T & P LDR* A6,A6 GET OTHER DWT ADDRESS , h 2 P LDR A1,A4 RESTORE RETURN CODE FROM OTHER DISC , P XIF , P* , $ P LD A8,DWTECB,A6 GET ECB ADDRESS , * P R
0x1bc24c…1bc3e0 Dummy {f00=0x008b, f01=0x018e, f02=» DRDU01 , P* - P* - PDUON26 EQU * - $ P IFT NUNITS=2 - 8 " P ADR A1,A3 CHECK RETURN CODES - N 0 P RB(Z) DUON15 NO REQUESTS AND BOTH OPERABLE? - t P XIF - P* - P IFT NUNITS=1 - P ADK A1,0 SET CR - * P RB(Z) DUON15 NO REQUEST AND
0x1bc3e0…1bc574 (1, 304) Dummy {f00=0x008b, f01=0x0190, f02=» - p P LDKL A1,-TIME . P STR A1,A3 RESTART TIMER . P RB T:DISP . > P* . P $ PDUON30 CF A15,SETIMP START TIMER . Z , P DATA DUON40,TIME TIME OUT ADDRESS, TIME . P RB T:DISP . P* . P* TIME OUT . P* . PDUON40 LDKL A6,DWDU01 .
0x1bc574…1bc708 Dummy {f00=0x008b, f01=0x018e, f02=» * . P* INTERRUPT HANDLER * / P* * / < P*********************** / P* / | P* / PIHDU2 EQU * / P IFT NUNITS=2 / $ P ST P,INTSAV SAVE LAST INTERRUPT / P IFT CPU852=1 / & P CF A15,SAVE8 SA
0x1bc708…1bc89c Dummy {f00=0x008b, f01=0x0190, f02=» / P* 0 P IFT NUNITS=2 0 $ P LDKL A6,DWDU02 DISC UNIT NO. 2 0 ( P RF IHDU10 0 P P XIF 0 b P* 0 n P EJECT DRDU01 0 x P* 0 P* 0 PIHDU EQU * 0 PIHDU1 EQU * 0 $ P ST P,INTSAV SAVE LAST INTERRUPT 0 P IFT CPU852=1 0 & P
0x1bc89c…1bca30 Dummy {f00=0x008b, f01=0x0190, f02=»* 0 $ P LDKL A6,DWDU01 DISC UNIT NO. 1 1 P* 1 2 P EJECT DRDU01 1 < P* 1 T P* 1 ^ " PIHDU10 SST A1,CUADR GET STATUS 1 h P IFT NUNITS=2 1 P LDR A2,A1 1 P ANK A2,/40 1 P RF(Z) IHDU20 1 P LDKL A6,DWDU02 1 P XIF 1 P* 1
0x1bca30…1bcbc4 Dummy {f00=0x008b, f01=0x0190, f02=»SAV,A6 1 P RF(NN) GET 2 P LDR A3,A1 2 " P ANK A3,1 2 4 * P RF(NZ) END:IO DISC UNIT NOT OPERABLE 2 F P* 2 t * PGET LD A5,DWTA5,A6 RELOAD REGISTERS A5 2 ~ ( P LD A4,DWTA4,A6 A4 2 P LD A7,DWTOR,A6 2 P ANK A7,/3F ORDER 2
0x1bcbc4…1bcd58 Dummy {f00=0x008b, f01=0x0190, f02=» 2 | P* * 3 P* PERFORM ENDIO * 3 $ P* * 3 @ P******************* 3 P* 3 x P* 3 PEND:IO EQU * 3 " P ANKL A1,/20F MASK RETURN CODE 3 P RF(NZ) END:10 ERROR 3 " P LD A2,4,A8 REQUESTED LENGTH = 3 P
0x1bcd58…1bceec Dummy {f00=0x008b, f01=0x0190, f02=»F(E) END:15 NO RETRY 3 " P ORKL A1,/100 BIT 7 = RETRIES 4 P* 4 B PEND:15 EQU * 4 L P LC A2,DWTOR,A6 ORDER 4 ` P ANK A2,1 INDEX 4 ~ P ADR A2,A2 4 P ADR A2,A6 4 " P CM DWTBSY,A2 RESET READY WORD 4 P* 4 P EJECT DRDU01 4 P* 4
0x1bceec…1bd080 Dummy {f00=0x008b, f01=0x0190, f02=» , P LDR* A6,A6 ACTIVE DISC UNIT DWT ADDRESS 5 P XIF 5 4 P* 5 @ P CF A15,TENDIO PERFORM ENDIO 5 J P ABL TDISP GO TO DISPATCHER 5 n P* 5 P EJECT DRDU01 5 P* 5 P* 5 PVO:NAM EQU * 5 . P CM DWTSAV,A6 INDICATE VOLUME NAME READING 5
0x1bd080…1bd214 (1, 305) Dummy {f00=0x008b, f01=0x0190, f02=» SEEK-,THROUGHPUT ERROR,NOT OPERABLE 5 * P CF A5,WER:R5 EXECUTE WER INSTRUCTIONS 6 , " P LDK A2,0 CYLINDER NUMBER = 0 6 Z P ST A2,DWTCYL,A6 6 P CF A5,CIO READ VOLUME LABEL 6 P ANK A1,3 6 0 P RF(NZ) VO:NA8 THROUGHPUT ERROR,NOT OPERABLE 6 P LDK A
0x1bd214…1bd3a8 Dummy {f00=0x008b, f01=0x0190, f02=»CT DRDU01 6 P* 7 P* 7 , PDUNA10 LDKL A3,BUF+2 GET BUFFER ADDRESS 7 ( & P ST A4,DWTA4,A6 SAVE RETRY COUNTER 7 X P LDK A4,6 7 P* 7 & PDUNA20 LDR* A7,A3 GET VOLUME NAME 7 . P CWR* A7,A2 COMPARE WITH LAST VOLUME NAME 7 P RF(E) DUNA30
0x1bd3a8…1bd53c Dummy {f00=0x008b, f01=0x0190, f02=» P ADK A3,2 8 P SUK A4,2 8 P RB(NZ) DUNA20 GET NEXT WORD 8 ( P ADK A1,0 SET CR 8 L P RF(Z) DUNA40 VOLUME MATCH 8 d , P LD A4,INIFLG CHECK INITIALIZATION FLAG 8 P RF(NZ) DUNA40 NOT POWER UP? 8 P LC A4,DWTOR,A6 INDEX 8 P ADR A4,A4 8
0x1bd53c…1bd6d0 Dummy {f00=0x008b, f01=0x0190, f02=» LD A4,DWTA4,A6 RESTORE RETRY COUNTER 8 P LD A1,DWTOR,A6 ORDER 9 . P RF(NZ) VO:NA6 9 L P LDK A1,1 9 b P SC A1,DWTOR,A6 INDEX=1 9 t P RB VO:NA5 9 P* 9 & PVO:NA6 LDK A1,0 RESET RETURN CODE 9 P* 9 PVO:NA8 EQU * 9 P LDKL A2,-1 9
0x1bd6d0…1bd864 Dummy {f00=0x008b, f01=0x0190, f02=»JECT DRDU01 DRDU01 9 P* : P* : ( * P* DEVICE WORK TABLE DISC UNIT NO. 2 : 2 P* : ` P* : j PDWDU02 EQU * : t P IFT NUNITS=2 : & P DATA DWDU01 POINTER TO OTHER DWT : P DATA /8000 DWT STATUS : P DATA 0 ECB ADDRESS : P DATA
0x1bd864…1bd9f8 Dummy {f00=0x008b, f01=0x0190, f02=»AL QUEUE : IFT MMUPAG=1 ; & " DATA 0 SAVE AREA USER ECB ADDRESS ; & P DATA ECBDU2 MMU ECB ADDRESS ; P XIF ; t P IFT NUNITS=2 ; ( P DATA /00FF LEFT BYTE=SECTOR NUMBER ; ( P DATA 0,0,0 SAVE AREA FOR REGISTERS ; P DATA 0,0 STACK ; P D
0x1bd9f8…1bdb8c Dummy {f00=0x008b, f01=0x0190, f02=» FIXED DISC ; x , P CIO A2,1,DAC2 CIO-START CARTRIDGE DISC < P* < D P EJECT DRDU01 < N P* < f P* < p P WER A2,WER1 < z P WER A3,WER1+1 < & P DATA 0,0,0 VOLUME NAME FIXED DISC < * P DATA 0,0,0 VOLUME NAME CARTRIDGE DISC < P DATA -1 <
0x1bdb8c…1bdd20 Dummy {f00=0x008b, f01=0x0190, f02=»2=3 < P DATA MAXCY6 MAX CYLINDER NO = P XIF = 0 P* = < P IFT NUNITS=2 = F P IFT MMUPAG=1 = * P DATA 0 PAGE NUMBER (PSEUDO MMU TABLE) = r * P DATA 0 16 BIT LOGICAL BUFFER ADDRESS = PECBDU2 EQU * = P DATA 0,0,0,0,0,0 = P XIF = P
0x1bdd20…1bdeb4 (1, 306) Dummy {f00=0x008c, f01=0x0190, f02=»QU * = & P DATA DWDU02 POINTER TO OTHER DWT > P DATA /8000 DWT STATUS > 6 P DATA 0 ECB ADDRESS > T P DATA 0 ORDER > p " P DATA DUADR ACTIVATION ADDRESS > P DATA 0 TTAB ADDRESS > $ P DATA 0 WAIT/ACTIVATE INDICATOR > P DATA 0 TERMINAL QUEUE >
0x1bdeb4…1be048 Dummy {f00=0x008c, f01=0x0190, f02=»1 > ~ ( P DATA /00FF LEFT BYTE=SECTOR NUMBER ? ( P DATA 0,0,0 SAVE AREA FOR REGISTERS ? 6 P DATA 0,0 STACK ? b P DATA 0,0 ? z PDWTBSY EQU *-DWDU01 ? P DATA 0 UNIT BUSY INDICATOR ? P DATA 0 UNIT BUSY INDICATOR ? " PDWTCIO EQU *-DWDU01 CIO-
0x1be048…1be1dc Dummy {f00=0x008c, f01=0x018e, f02=» WER INSTRUCTION ? x P WER A2,WER1 @ , PDWTWR2 EQU *-DWDU01 2:ND WER INSTRUCTION @ , P WER A3,WER1+1 @ PDWTNAM EQU *-DWDU01 @ r & P DATA 0,0,0 VOLUME NAME FIXED DISC @ * P DATA 0,0,0 VOLUME NAME CARTRIDGE DISC @ PDWTSAV EQU *-DWDU01 @ P DATA
0x1be1dc…1be370 Dummy {f00=0x008c, f01=0x0190, f02=» PDWTCMX EQU *-DWDU01 A $ P DATA MAXCY5 MAX CYLINDER X/1215 A P XIF A H P IFT TYPE1=1 A T PDWTCMX EQU *-DWDU01 A h ( P DATA MAXCY6 MAX CYLINDER NO X/1216 A P XIF A P* A P EJECT DRDU01 A P* A P* A P IFT MMUPAG=1 A P
0x1be370…1be504 Dummy {f00=0x008c, f01=0x4074, f02=»ESS A n PECBDU1 EQU * B P DATA 0,0,0,0,0,0 B P XIF B : P* B F P* B P P* B Z P END B d@ B p-DWDU01 A h ( P DATA MAXCY6 MAX CYLINDER NO X/1216 A P XIF A P* A P EJECT DRDU01 A P* A P* A P IFT MMUPAG=1 A P
0x1be504…1be698 Dummy {f00=0x008c, f01=0x2008, f02=» C -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 . @
0x1be698…1be82c Dummy {f00=0x008c, f01=0x018e, f02=»T ROUTINE AND DELAY s j PCLT068 EQU * t P LDR A8,A8 OBC-ACK ? t 0 P RF(E) EXIT YES t L P LDK A1,0 t d & P LDR* A4,A6 GET CHANNEL PARAMETER t v . P RF(N) CLT110 DEVICE WITHOUT DATA REQUEST t ( P LDR A2,A2 DATA REQUEST IMMEDIATE ? t P RF(N) CLT
0x1be82c…1be9c0 Dummy {f00=0x008c, f01=0x0190, f02=» : P* FROM PRINTERS AND , FOR REMOTLY CONNECTED DEVICES u 8 P* USING THE LRC-FUNCTION , MISSING BLOCK CONTROL u B . P* CHARACTERS (ABC) FROM SELECTOR UNIT. u ~ P* u PDRQTUT EQU * u P LDR A6,A1 GET DWT-ADDRESS u . P CM DWTTP,A6 RESET POINT
0x1be9c0…1beb54 (1, 307) Opaque[0x194]
0x1beb54…1bece8 # DirEnt {nam=»DRLP01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1188, f03=0x0000}
0x1beb54…1bece8 IdxSect {
0x1beb54…1bece8 f00 = 0x008c // 0x1beb54 @0x0
0x1beb54…1bece8 f01 = 0x0008 // 0x1beb56 @0x2
0x1beb54…1bece8 gno = [ // 0x1beb58 @0x4
0x1beb54…1bece8 [0x00]: C0x008c.0x1.0
0x1beb54…1bece8 [0x01]: C0x008c.0x2.0
0x1beb54…1bece8 [0x02]: C0x008c.0x3.0
0x1beb54…1bece8 [0x03]: C0x008d.0x0.0
0x1beb54…1bece8 ]
0x1beb54…1bece8 }
0x1bece8…1bee7c Dummy {f00=0x008c, f01=0x0190, f02=» 2 P IDENT DRLP01 REL 9.2 79-11-16 870105040920 P : $ P =1, INTERFACE UNKNOWN HANG-UP B P REL 9.1 79-05-23 j P* P* > P********************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS
0x1bee7c…1bf010 Dummy {f00=0x008c, f01=0x0190, f02=»************************************** | P* . P* 8 @ P* THIS DRIVER HANDLES ONE LINE PRINTER PTS 6881 CONNECTED B < P* TO CPU VIA CHLP ON MULTIPLEX CHANNEL OR PROGRAMMED P* CHANNEL P* P EJECT DRLP01 P* P*
0x1bf010…1bf1a4 Dummy {f00=0x008c, f01=0x0190, f02=» ADDRESS BLOCK " P ENTRY ACLP ACTIVATION DRIVER " P ENTRY IHLP INTERRUPT HANDLER < P ENTRY LPON RECOVERY ROUTINE b & P ENTRY DWLP01 DWT FOR LINE PRINTER P P P P* P* , P****************************************
0x1bf1a4…1bf338 Dummy {f00=0x008c, f01=0x0190, f02=»PATCHER P EXTRN TENDIO END I/O & P EXTRN SAVE8 SAVE 8 REGS ON STACK . P EXTRN DISIOE REQUEST ERROR X EXTRN DWTST STATUS | EXTRN DWTBC BYTE COUNTER EXTRN DWTECB ECB ADDRESS $ EXTRN DWTOR DWT INDEX AND ORDER P EXT
0x1bf338…1bf4cc Dummy {f00=0x008c, f01=0x018e, f02=» * P EXTRN INTSAV SAVE AREA LAST INTERRUPT P EJECT DRLP01 2 P* J P* T " P***************************** ^ " P* CONSTANTS * " P***************************** P* P* PDWALP EQU /0F & PMUXLP EQU DWAL
0x1bf4cc…1bf660 Dummy {f00=0x008c, f01=0x018e, f02=» P* CONDITIONAL ASSEMBLY P* & . P***************************************** 0 P* b 2 P* PROGRAMMED CHANNEL MAY BE USED INSTEAD OF l , P* MULTIPLEX CHANNEL BY SETTING X:A=1 P* PX:A EQU 0 PCHAN EQU 0 P* .
0x1bf660…1bf7f4 (1, 308) Dummy {f00=0x008c, f01=0x0190, f02=» P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. H P* z PCPU852 EQU 0 P* P* MMU BUFFER SIZE P* PX:B EQU 67 PDVBLEN EQU 126 P* P* MMU DEVICE
0x1bf7f4…1bf988 Dummy {f00=0x008c, 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*
0x1bf988…1bfb1c Dummy {f00=0x008c, 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
0x1bfb1c…1bfcb0 Dummy {f00=0x008c, 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
0x1bfcb0…1bfe44 Dummy {f00=0x008c, f01=0x0190, f02=»CHARACTER. z P* P EJECT DRLP01 P* 4 P* > ( P************************************ H ( P* NORMAL REGISTER USAGE * t ( P************************************ P* P* P* A1 = RETURN CODE P* A2 =
0x1bfe44…1bffd8 Dummy {f00=0x008c, f01=0x0190, f02=» z P* A7 = ORDER P* A8 = ECB ADDRESS P* > P* H $ P******************************** R $ P* TABLES * z $ P******************************** P* P* * P DATA DVBLEN+DVBLEN MMU BUFFER LENGTH
0x1bffd8…1c016c Dummy {f00=0x008c, f01=0x0190, f02=» DRLP01 P* P* P* A C T I V A T I O N $ P* D P* N PACLP EQU * X P LDK A1,/0D CARRIAGE RETURN j P LDR A7,A7 ORDER 0 ? P RF(NE) ACLP05 NO P LDKL A4,DWTBC BYTE COUNTER P ADR A4,A6 ADD DWT ADDRESS $
0x1c016c…1c0300 Dummy {f00=0x008c, f01=0x0190, f02=»,A8 REQ. LENGTH P SUK A7,5 ORDER 5 ? P RF(E) ACLP30 4 P SUK A7,1 ORDER 6 ? J P RF(E) ACLP10 f P* | PACERR ABL DISIOE P* P EJECT DRLP01 P* P* PACLP10 EQU * P CWK A2,2 REQ. LENGTH < 2 ?
0x1c0300…1c0494 (1, 309) Dummy {f00=0x008c, f01=0x018e, f02=»ADDRESS ~ & P ADR A3,A2 ADDED WITH REQ. LENGTH $ P SCR A1,A3 STORE PRINT CHARACTER : P ADK A2,1 b P LCR A3,A4 t P ECR A3,A3 & P LC A3,1,A4 GET CONTROL CHARACTER P ST A3,CONCHA P ANK A3,/FF $ P SUK A3,/2B SUPER POSITIONIN
0x1c0494…1c0628 Dummy {f00=0x008c, f01=0x0190, f02=» P* PACLP15 LDK A1,/0A LINE FEED * P SC A1,1,A4 SECOND CHARACTER IN BUFFER 2 P SUK A3,5 TWO LINE FEEDS ? ` P RF(E) ACLP20 YES P LDK A1,/0C TOP OF FORM P SUK A3,1 WANTED ? P RF(E) ACLP20 YES P LDK A1,/0D CARRIAGE RET
0x1c0628…1c07bc Dummy {f00=0x008c, f01=0x0190, f02=»IOSTA SEND BUFFER P SUK A7,6 ORDER 6 ? P RF(NE) ENDIO 6 P LDR A2,A2 L P RF(NN) ACLP35 ^ 4 P IM 6,A8 ADD FOR EXTRA CHAR. AT BUFFER END (/0D) t P* PACLP35 EQU * P LD A4,2,A8 BUFFER ADDRESS P LDKL A3,0 PCONCHA EQU
0x1c07bc…1c0950 Dummy {f00=0x008c, f01=0x0190, f02=»DIO CF A15,TENDIO END REQUEST PEXIT ABL TDISP & P* < P EJECT DRLP01 F P* ^ P* h P* CIOSTA r " P* SUBROUTINE TO SEND BUFFER P* P* PCIOSTA EQU * P ST A5,DWTA5,A6 SAVE A5 P IFT CHAN=0 6 P
0x1c0950…1c0ae4 Dummy {f00=0x008c, f01=0x0190, f02=»FIRST WRITE EXTERNAL REGISTER 2 P WER A4,MUXLP+1 SECOND WRITE EXTERNAL REGISTER & P XIF P* h P IFT CHAN=1 r ( P ST A4,DWTA3,A6 SAVE BUFFER ADDRESS P ADR A4,A2 . P ST A4,DWTA4,A6 SAVE BUFFER END ADDRESS+1 P XIF P*
0x1c0ae4…1c0c78 Dummy {f00=0x008c, f01=0x0190, f02=»1 P* P* P* RECOVERY ROUTINE P* < P* F PLPON EQU * P P IFT CPU852=1 b & P CF A15,SAVE8 SAVE A1-A8 ON STACK x P XIF P* P IFT CPU852=0 " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P*
0x1c0c78…1c0e0c Dummy {f00=0x008c, f01=0x018e, f02=»LP30 P* P EJECT DRLP01 P* . P* 8 P* I N T E R R U P T B P* ` P* j PIHLP EQU * t $ P ST P,INTSAV SAVE LAST INTERRUPT P IFT CHAN=0 P IFT CPU852=1 & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF
0x1c0e0c…1c0fa0 Dummy {f00=0x008c, f01=0x0190, f02=» P STR A1,A15 P STR A2,A15 P LDKL A2,DWLP01 DWT-ADDRESS , 2 P LD A1,DWTA3,A2 POINTER AT NEXT BYTE IN BUFFER P P LCR A2,A1 NEXT BYTE " P OTR A2,0,DWALP WRITE ONE BYTE P RF(NA) IHLP20 NOT ACCEPTED P LDKL A2,DWLP01 DWT-ADDRESS
0x1c0fa0…1c1134 (1, 310) Dummy {f00=0x008d, f01=0x018e, f02=»ALP CIO HALT PIHLP10 EQU * P LDR* A2,A15 ( P LDR* A1,A15 < P RTN A15 P P* ` P* j P* t PIHLP20 STR A3,A15 ~ P STR A4,A15 P STR A5,A15 P STR A6,A15 P STR A7,A15 P STR A8,A15 P XIF P
0x1c1134…1c12c8 Dummy {f00=0x008d, f01=0x0190, f02=» P ANK A7,/FF P LD A8,DWTECB,A6 ECB ADDRESS P* < P IFT CHAN=0 F 4 P RER A3,MUXLP GET NUMBER OF NOT TRANSFERED CHAR. Z P ANKL A3,/FFF 8 P LD A2,4,A8 CALCULATE NUMB. OF TRANSFERED CHARACTERS P SUR A2,A3 P XIF P*
0x1c12c8…1c145c Dummy {f00=0x008d, f01=0x0190, f02=» RF(NE) IHLP35 P ADK A2,1 YES PIHLP35 EQU * , 8 P SU A2,2,A8 CALCULATE NUMB. OF TRANSFERED CHARACTERS @ P XIF | " P ST A2,6,A8 STORE EFF. LENGTH $ P LD A5,DWTA5,A6 GET STACK VALUE P RTN A5 P* P EJECT DRLP01 P
0x1c145c…1c15f0 Dummy {f00=0x008d, f01=0x0190, f02=»L PARAMETER P DATA /8000 STATUS P DATA 0 ECB ADDRESS . P DATA 0 ORDER J ( P DATA LPADR ADDRESS TO ADDRESS BLOCK ` P DATA 0 TTAB ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DAT
0x1c15f0…1c1784 Dummy {f00=0x008d, f01=0x4118, f02=»A FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 0 P RES 4 DWT STACK P P* h P IFT MMUPAG=1 r PDEVECB EQU * P DATA 0 P DATA LP:BUF P DATA 0,0,0,0 PLP:BUF RES DVBLEN+1 P XIF P* P
0x1c1784…1c1918 Dummy {f00=0x008d, 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
0x1c1918…1c1aac Dummy {f00=0x008d, f01=0x0190, f02=» ADDRESS TO ADDRESSBLOCK . P ABI INTADR,A2 GO TO INTERRUPT HANDLER =8 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
0x1c1aac…1c1c40 Dummy {f00=0x008d, 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 EQU * P IFT CPU852=1 ( P ABL IHRET8 RESTORE A1-A8 AND RETURN P XIF P* P IFT CPU852=0 *
0x1c1c40…1c1dd4 (1, 311) Opaque[0x194]
0x1c1dd4…1c1f68 # DirEnt {nam=»DRIC01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x11a8, f03=0x0000}
0x1c1dd4…1c1f68 IdxSect {
0x1c1dd4…1c1f68 f00 = 0x008d // 0x1c1dd4 @0x0
0x1c1dd4…1c1f68 f01 = 0x000a // 0x1c1dd6 @0x2
0x1c1dd4…1c1f68 gno = [ // 0x1c1dd8 @0x4
0x1c1dd4…1c1f68 [0x00]: C0x008d.0x1.0
0x1c1dd4…1c1f68 [0x01]: C0x008d.0x2.0
0x1c1dd4…1c1f68 [0x02]: C0x008d.0x3.0
0x1c1dd4…1c1f68 [0x03]: C0x008e.0x0.0
0x1c1dd4…1c1f68 [0x04]: C0x008e.0x1.0
0x1c1dd4…1c1f68 ]
0x1c1dd4…1c1f68 }
0x1c1f68…1c20fc Dummy {f00=0x008d, f01=0x0190, f02=» 2 P IDENT DRIC01 9.2DK 1 83-09-16 870105040920 P : & P DK1, TID IN ECBCW RECV'NG TASK B P =DK0, MMU BUF SIZE l P 80-03-11 P* P* 2 P********************************************** P* $ P* PHILIPS TERMINAL S
0x1c20fc…1c2290 Dummy {f00=0x008d, f01=0x0190, f02=» 2 P********************************************** P* : 8 P* THIS MODULE HANDLES THE INTERTASK COMMUNICATION D P* P EJECT DRIC01 P* P* ORDERS: P* P* /02 READ, NOT ADDRESSED " P* /06 WRITE, NOT ADDRES
0x1c2290…1c2424 Dummy {f00=0x008d, f01=0x0190, f02=»: | P* P* A5 STACK BASE 2 P* A6 DWT ADDRESS 2 P* A7 ORDER CODE N P* A8 ECB ADDRESS j , P* A12 ADDRESS TO DRIVER ADDRESS BLOCK P* P EJECT DRIC01 P* P* P*********** P* ENTRIE
0x1c2424…1c25b8 Dummy {f00=0x008d, f01=0x0190, f02=»RY IT:BUF INTERTASK DRIVER BUFFER (MMU) P EJECT DRIC01 0 P* H P* R P************* P* EXTERNALS * r P************* P* P* P EXTRN TDISP DISPATCHER P EXTRN TENDIO ENDIO P EXTRN DISIOE REQUEST ERRO
0x1c25b8…1c274c Dummy {f00=0x008d, f01=0x0190, f02=»ER ADDRESS BLOCK ~ " P EXTRN DWTTAB DWT TTAB ADDRESS & P EXTRN DWTSB1 STACK BASE 1 IN DWT > & P EXTRN BUFLEN DRIVER BUFFER LENGTH h P EXTRN SETIMP TIMER , P EXTRN FNDTID FIND TTAB ADDRESS FROM TID P EXTRN TTB:ST TASK STATUS " P EXTRN T
0x1c274c…1c28e0 Dummy {f00=0x008d, f01=0x0190, f02=»RL ECB REQUESTED LENGTH & P EXTRN ECBEL ECB EFFECTIVE LENGTH P EXTRN ECBRC ECB RETURN CODE J " P EXTRN ECBCW ECB CONTROL WORD n P EJECT DRIC01 TOSSIO P* P* . P***************************************** P* P* CO
0x1c28e0…1c2a74 (1, 312) Dummy {f00=0x008d, f01=0x018e, f02=»G h * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* 8 PMMUPAG EQU 1 B P* V 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION ` . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0 P* P* MMU BUFFER SIZE
0x1c2a74…1c2c08 Dummy {f00=0x008d, f01=0x018e, f02=» PX:B EQU 8 PDEVIND EQU X:B P* 0 P EJECT DRIC01 : P* R P* P********************* f P* DWT DISPLACEMENTS * P********************* P* P* 0 PDWTDRD EQU /10 START OF DRIVER DEFINED PART P
0x1c2c08…1c2d9c Dummy {f00=0x008d, f01=0x0190, f02=» P* & PDWTTP EQU START+/00 TIMER POINTER PDWTIME EQU START+/02 TIME 8 6 PDWTANC EQU START+/04 POINTER TO FIRST DWT IN QUEUE Z . PDWTQUE EQU START+/06 QUEUE ANCHOR ADDRESS P* P EJECT DRIC01 P* P* P************
0x1c2d9c…1c2f30 Dummy {f00=0x008d, f01=0x0190, f02=»DEVIND INTERTASK DEVICE INDEX & PITAD DATA ICAD ACTIVATION ADDRESS & P DATA ITABRT ABORT ADDRESS P P* r P* | 6 PRD:QUE DATA 0 QUEUE ANCHOR NOT ADDRESSED READ REQ. 8 PWR:QUE DATA 0 QUEUE ANCHOR NOT ADDRESSED WRITE REQ. P* $ P*
0x1c2f30…1c30c4 Dummy {f00=0x008d, f01=0x0190, f02=»* P EJECT DRIC01 P* " P* A C T I V A T I O N , P* J PICAD EQU * T P LDR A1,A7 ORDER CODE TO A1 f P SUK A1,2 & P RF(Z) RD:NAD READ NOT ADDRESSED? P SUK A1,4 ( P ABL(Z) WR:NAD WRITE NOT ADDRESSED? P SUK
0x1c30c4…1c3258 Dummy {f00=0x008d, f01=0x0190, f02=»DIS:OE REQUEST ERROR? P* P* S E T T I M E O U T ( P* J P LD A2,ECBCW,A8 GET TIME T P ST A2,DWTIME,A6 t P RF END:IO P* P EJECT DRIC01 P* P* R E A D, A D D R E S S E D P* " P* W R I T E, A D
0x1c3258…1c33ec Dummy {f00=0x008d, f01=0x0190, f02=»DRESSED TASK | P* P LD A7,ECBCW,A8 TID & P CF A15,FNDTID TTAB ADDRESS TO A2 : P ADK A2,0 SET CR d P RF(Z) DIS:OE NOT FOUND? | P CW A2,DWTTAB,A6 P RF(E) DIS:OE ILLEGAL TID? 4 P ADKL A2,TTB:TD ADDRESS TO TERMINAL DEVICE TABLE
0x1c33ec…1c3580 Dummy {f00=0x008d, f01=0x018e, f02=»* P EJECT DRIC01 P* " $ P* FIND DWT OF ADDRESSED TASK , P* T 0 PADR:20 ADK A2,4 ADDRESS TO NEXT DWT ADDRESS ^ P SUK A1,4 P RF(N) DIS:OE NOT FOUND? P* P LDR* A4,A2 DWT ADDRESS " P CW A7,DWTADR,A4 SEARCHED
0x1c3580…1c3714 (1, 313) Dummy {f00=0x008d, f01=0x0190, f02=» P* . P LD A1,DWTQUE,A2 GET QUEUE ANCHOR ADDRESS " P CWR A1,A6 CHECK QUEUE ANCHOR @ 0 P RF(E) ADR:30 REQUEST ISSUED FOR THIS TASK? f P* P ANK A7,1 P RF(Z) ADR:25 READ? P CWK A1,RD:QUE ( P RF(E) ADR:30 COMPLEMENTARY REQU
0x1c3714…1c38a8 Dummy {f00=0x008d, f01=0x0190, f02=»MPLEMENTARY REQUEST? | P* P* ABORT TIMER IF ANY & P* F > PADR:30 CF A15,ITAB05 ABORT TIMER AND REMOVE DWT FROM QUEUE P P ANK A7,1 P RF(Z) RD:N05 READ? P* P* MOVE BUFFER P* PADR:35 EQU * " P LDKL A5
0x1c38a8…1c3a3c Dummy {f00=0x008d, f01=0x0190, f02=»MUPAG=1 . P LD A3,ECBBA,A8 GET SENDING BUFFER ADDRESS P ANK A3,1 B & P RF(Z) ADR:38 BUFFER ADDRESS EVEN? T : P ORS A3,ECBBA,A9 MAKE RECEIVING BUFFER ADDRESS UNEVEN ~ P RF END:IO P* PADR:38 EQU * P SUK A3,2 A3 := /FFFE 8
0x1c3a3c…1c3bd0 Dummy {f00=0x008d, f01=0x0190, f02=»SP ABL TDISP P* P EJECT DRIC01 P* 6 P* OUEUE REQUEST @ P* X . PADR:40 LDK A7,0 INDICATE ADDRESSED REQUEST b P* PADR:50 EQU * P LD A3,DWTIME,A6 TIME P RF(Z) TWR:30 P ADK A3,1 $ P RF(Z) ADR:70 NO
0x1c3bd0…1c3d64 Dummy {f00=0x008d, f01=0x0190, f02=» LDK A4,DWTTP P ADR A4,A6 TIMER POINTER P ST A3,TIME 6 P CF A15,SETIMP SET TIMER J P DATA TIMOUT TIMEOUT ADDRESS j PTIME DATA 0 P* P EJECT DRIC01 P* ( P* INSERT IN QUEUE WITHIN PRIORITY P* PADR:
0x1c3d64…1c3ef8 Dummy {f00=0x008d, f01=0x0190, f02=» SUK A7,1 ( P RF(P) ADR:80 NOT-ADDRESSED REQUEST? : P ADK A2,DWTANC POINT TO ADDRESS OF FIRST DWT IN QUEUE > P* | PADR:80 LDR A4,A2 SAVE P LDR* A2,A2 NEXT IN QUEUE P RF(Z) ADR:90 END FOUND? " P LD A5,DWTTAB,A2 TTAB ADDRESS
0x1c3ef8…1c408c Dummy {f00=0x008d, f01=0x0190, f02=» RB T:DISP P* $ PDIS:OE ABL DISIOE REQUEST ERROR P* D P EJECT DRIC01 N P* f ( P* R E A D, N O T A D D R E S S E D p P* $ PRD:NAD EQU * READ, NOT ADDRESSED < P LD A2,DWTANC,A6 CHECK QUEUE OF ADDRESSED WRITE REQUESTS
0x1c408c…1c4220 Dummy {f00=0x008d, f01=0x018e, f02=» v & P LDR* A3,A2 NO, REMOVE FROM QUEUE & P ST A3,WR:QUE UPDATE QUEUE ANCHOR 2 P* PRD:N00 EQU * f & P CF A15,ABTIM2 ABORT TIMER IF ANY z P* PRD:N05 EQU * " P LDR A4,A6 EXCHANGE A2 AND A6 P LDR A6,A2 P LDR A2,A4
0x1c4220…1c43b4 (1, 314) Dummy {f00=0x008e, f01=0x0190, f02=» P* , PRD:N20 LDKL A2,RD:QUE GET RD:QUE ADDRESS P RB ADR:50 INSERT IN QUEUE > P* ` P EJECT DRIC01 j P* * P* W R I T E, N O T A D D R E S S E D P* & PWR:NAD EQU * WRITE, NOT ADDRESSED < P LD A2,DWTANC,A6 CHECK QUE
0x1c43b4…1c4548 Dummy {f00=0x008e, f01=0x0190, f02=» P RF(Z) WR:N20 QUEUE EMPTY? & P LDR* A3,A2 NO, REMOVE FROM QUEUE & & P ST A3,RD:QUE UPDATE QUEUE ANCHOR P P* z , PWR:N05 CF A15,ABTIM2 ABORT TIMER IF ANY P RB ADR:35 P* ( PWR:N10 LDR* A3,A2 REMOVE FROM QUEUE ( P ST A3,DWTAN
0x1c4548…1c46dc Dummy {f00=0x008e, f01=0x0190, f02=» EJECT DRIC01 P* P* T I M E O U T " P* : PTIMOUT LDR A6,A1 DWT ADDRESS D " P CM* 0,A2 RESET TIMER POINTER h P LDR A2,A6 $ P CF A15,ITAB10 REMOVE FROM QUEUE P* PTWR:30 EQU * P CMR A6 RESET QUEUE LINK P L
0x1c46dc…1c4870 Dummy {f00=0x008e, f01=0x0190, f02=»OUTINE IS CALLED FROM TABORT. 6 P* IT WILL UPDATE QUEUE AND ABORT TIMER (IF ANY). & P* ` P* INPUT: A6 = DWT ADDRESS j P* " P* OUTPUT: A1-A4 ARE DESTROYED P* PITABRT EQU * P LDR A2,A6 P* PITAB05 EQU *
0x1c4870…1c4a04 Dummy {f00=0x008e, f01=0x0190, f02=» ACHHOR v P CWK A1,RD:QUE . P RF(E) ITAB20 NOT-ADDRESSED READ REQUEST? & P CWK A1,WR:QUE X . P RF(E) ITAB20 NOT-ADDRESSED WRITE REQUEST? n : P ADK A1,DWTANC POINT TO ADDRESS OF FIRST DWT IN QUEUE P* P EJECT DRIC01 P*
0x1c4a04…1c4b98 Dummy {f00=0x008e, f01=0x0190, f02=»DR* A3,A1 REMOVE FROM QUEUE " P STR A3,A4 UPDATE QUEUE LINKS $ P CMR A2 RESET QUEUE LINK J P* j P IFT CPU852=1 t P RF IH:RTN P XIF P* P IFT CPU852=0 P RTN A15 P XIF P* P EJECT DRIC01 P*
0x1c4b98…1c4d2c Dummy {f00=0x008e, f01=0x0190, f02=» $ P* OUTPUT: A1, A3 ARE DESTROYED P* 0 PABTIM2 EQU * : P CMR A2 RESET QUEUE LINK N P* n PABTIM LDK A1,DWTTP x $ P ADR A1,A2 TIMER POINTER ADDRESS P LDR* A3,A1 " P RF(Z) IH:RTN NO TIMER ACTIVE? P CM* 0,A1 " P C
0x1c4d2c…1c4ec0 Dummy {f00=0x008e, f01=0x0190, f02=»IH:RTN RTN A15 P XIF P* " P EJECT DRIC01 , P* D P* M O V B U F N P* d 4 P* SUBROUTINE TO MOVE BUFFER FROM SENDING TASK n P* TO ADDRESSED TASK. > P* EFFECTIVE LENGTH IN BOTH INPUT AND OUTPUT ECB ARE SET. B P*
0x1c4ec0…1c5054 (1, 315) Dummy {f00=0x008e, f01=0x0190, f02=»ILL PERFORM THE MOVE IN SYSTEMS WITH MMU. P* 2 P* INPUT PARAMETERS: < P* A2 RECEIVING DWT Z P* A5 STACK POINTER x P* A6 SENDING DWT P* P* REGISTER USAGE: P* A1 RETURN CODE P* A2 DWT RECEIVIN
0x1c5054…1c51e8 Dummy {f00=0x008e, f01=0x0190, f02=»* A7 RECEIVING BUFFER POINTER $ P* A8 ECB ADDRESS SENDING TASK ( & P* A9 ECB ADDRESS RECEIVING TASK P P* z PMOVBUF EQU * P LD A8,DWTECB,A6 SENDING ECB $ P ENB GIVE OTHER TASKS A CHANCE P* P EJECT DRIC01 P*
0x1c51e8…1c537c Dummy {f00=0x008e, f01=0x0190, f02=»A1,ECBCW,A9 GIVE IT TO RECEIVER DK1 * P LDK A1,0 ORIG. INSTRUCTION MOVED DK1 , , P LD A3,ECBRL,A8 SENDING REQUESTED LENGTH Z P RB(N) DIS:OE P CW A3,ECBRL,A9 P RF(NG) MOV:05 , P LDK A1,8 RETURN CODE (INCORRECT LENGTH) P LD A3,ECB
0x1c537c…1c5510 Dummy {f00=0x008e, f01=0x0190, f02=»K ` * P CW A3,BUFLEN,A4 CHECK MMU BUFFER SIZE ! , P RF(NG) MOV:10 MMU BUFFER LARGE ENOUGH? ! 8 & P LDKL A1,/8008 NO, INDICATE ERROR ! h 0 P ABL DISEND BRANCH TO DISPATCHER VIA TENDIO ! P* ! PMOV:10 EQU * ! P XIF ! P* ! P ! $ P ST A3
0x1c5510…1c56a4 Dummy {f00=0x008e, f01=0x0190, f02=»PAG=0 ! * P LD A4,ECBBA,A8 SENDING BUFFER ADDRESS " , P LD A7,ECBBA,A9 RECEIVING BUFFER ADDRESS " < P* " l PMOV:15 EQU * " v P SUK A3,1 " ( P RF(N) MOV:20 ALL CHARACTERS MOVED? " P LCR A9,A4 " P SCR A9,A7 " P ADK A4,1 " P ADK A7,1
0x1c56a4…1c5838 Dummy {f00=0x008e, f01=0x4010, f02=» END " @ # D A4,ECBBA,A8 SENDING BUFFER ADDRESS " , P LD A7,ECBBA,A9 RECEIVING BUFFER ADDRESS " < P* " l PMOV:15 EQU * " v P SUK A3,1 " ( P RF(N) MOV:20 ALL CHARACTERS MOVED? " P LCR A9,A4 " P SCR A9,A7 " P ADK A4,1 " P ADK A7,1
0x1c5838…1c59cc Dummy {f00=0x008e, 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
0x1c59cc…1c5b60 Dummy {f00=0x008e, f01=0x0190, f02=» ^ $P T I R $ 5 % > ? W ? W ? T T U U U U T U U 2 > > 4 T - 1_( U T P 0 U _t ? @ T 0 A 1 Q Q > > 0 @ 1 P P > ? X " R Y
0x1c5b60…1c5cf4 (1, 316) Opaque[0x194]
0x1c5cf4…1c5e88 # DirEnt {nam=»DRDC15«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x11d0, f03=0x0000}
0x1c5cf4…1c5e88 IdxSect {
0x1c5cf4…1c5e88 f00 = 0x008e // 0x1c5cf4 @0x0
0x1c5cf4…1c5e88 f01 = 0x002c // 0x1c5cf6 @0x2
0x1c5cf4…1c5e88 gno = [ // 0x1c5cf8 @0x4
0x1c5cf4…1c5e88 [0x00]: C0x008e.0x2.0
0x1c5cf4…1c5e88 [0x01]: C0x008e.0x3.0
0x1c5cf4…1c5e88 [0x02]: C0x008f.0x0.0
0x1c5cf4…1c5e88 [0x03]: C0x008f.0x1.0
0x1c5cf4…1c5e88 [0x04]: C0x008f.0x2.0
0x1c5cf4…1c5e88 [0x05]: C0x008f.0x3.0
0x1c5cf4…1c5e88 [0x06]: C0x0090.0x0.0
0x1c5cf4…1c5e88 [0x07]: C0x0090.0x1.0
0x1c5cf4…1c5e88 [0x08]: C0x0090.0x2.0
0x1c5cf4…1c5e88 [0x09]: C0x0090.0x3.0
0x1c5cf4…1c5e88 [0x0a]: C0x0091.0x0.0
0x1c5cf4…1c5e88 [0x0b]: C0x0091.0x1.0
0x1c5cf4…1c5e88 [0x0c]: C0x0091.0x2.0
0x1c5cf4…1c5e88 [0x0d]: C0x0091.0x3.0
0x1c5cf4…1c5e88 [0x0e]: C0x0092.0x0.0
0x1c5cf4…1c5e88 [0x0f]: C0x0092.0x1.0
0x1c5cf4…1c5e88 [0x10]: C0x0092.0x2.0
0x1c5cf4…1c5e88 [0x11]: C0x0092.0x3.0
0x1c5cf4…1c5e88 [0x12]: C0x0093.0x0.0
0x1c5cf4…1c5e88 [0x13]: C0x0093.0x1.0
0x1c5cf4…1c5e88 [0x14]: C0x0093.0x2.0
0x1c5cf4…1c5e88 [0x15]: C0x0093.0x3.0
0x1c5cf4…1c5e88 ]
0x1c5cf4…1c5e88 }
0x1c5e88…1c601c Dummy {f00=0x008e, f01=0x0190, f02=» 0 P IDENT DRDC15 9.2DK 7 83-10-12 870105040924 " P DK7,READ-MODIFIED, MODIFIED 8 P 82-10-02 ^ P DK6, READ MODIFIED r , P DK5, LP, DWTINF, ST.PR.BIT, 81-11-05 P P DK3, RBUFNR=1 ALLOWED P DK2, TBUFL P 80-03-1
0x1c601c…1c61b0 Dummy {f00=0x008e, f01=0x018e, f02=»UZ v P REL 9.1 79-07-19 & P =7, ACK IN CONVERSATIONAL MODE & P REL 9.1 79-07-19 P * P =6, DCTASK BUFFER ADDRESS DESTROYED l P REL 9.1 79-05-23 $ P =5, INCOMPLETE POLL SEQUENCE P REL 9.1 79-05-23 P =3, TRANSFE
0x1c61b0…1c6344 Dummy {f00=0x008e, f01=0x018e, f02=» P PRR 9.1 78-11-29 P =1, MSR-INSTRUCTION P PRR 9.1 78-11-14 > P REL 8.2 78-11-14 Z P v P* ~ P* 2 P********************************************* P* $ P* PHILIPS TERMINAL SYSTEM PTS P* * P*
0x1c6344…1c64d8 Dummy {f00=0x008e, f01=0x0190, f02=» P* P* P* P* " 8 P**************************************************** , P h P* r P* | P* ENTRY POINTS P* 2 P ENTRY DC15AD ADDRESS BLOCK TERMINAL REQUESTS " P ENTRY IH1501 INPUT INTERRUPT " P ENTRY
0x1c64d8…1c666c Dummy {f00=0x008e, f01=0x0190, f02=»AL REFERENCES P* P* " P EXTRN TDISP DISPATCHER ENTRY * ( P EXTRN SAVE8 SAVE A1-A8 ON A15 STACK P $ P EXTRN TENDIO COMPLETE I/O EVENT | P EXTRN DISIOE REQUEST ERROR P EXTRN SETIME SET TIMER P EXTRN DWTST DWT STATUS P
0x1c666c…1c6800 Dummy {f00=0x008e, f01=0x018e, f02=» TABLE r ( P EXTRN TASCII EBCDIC TO ASCII TABLE $ P EXTRN ECBBA ECB BUFFER ADDRESS : & P EXTRN ECBRL ECB REQUESTED LENGTH b & P EXTRN ECBEL ECB EFFECTIVE LENGTH P EXTRN ECBRC ECB RETURN CODE " P EXTRN ECBCW ECB CONTROL WORD * P EXTRN D
0x1c6800…1c6994 (1, 317) Dummy {f00=0x008e, f01=0x018e, f02=» P P* P* P* " P* , 6 P* STANDARD INTERFACE PART FOR DATA COMMUNICATION 6 P* p P* z P* P* P* DWT CONTENTS P* J P* DWTCHP TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15) P*
0x1c6994…1c6b28 Dummy {f00=0x008e, f01=0x0190, f02=» P* ( PXRVI EQU /5C STANDARD:/40, DK:/5C DK * PX:D EQU 0 BASE FOR RBUFL AND TBUFL DK : " PX:X EQU 500 VALUE FOR BASE DK h & PX:A EQU 2000 RECEIVE BUFFER LENGTH PRBUFL EQU 650+X:X DK PX:B EQU /60 DCTASK FILE CODE PDC15FC EQU /60
0x1c6b28…1c6cbc Dummy {f00=0x008e, f01=0x0190, f02=»US AND RVI HANDLING IF=1 PSTAT EQU X:E ( PX:F EQU 1 READ COMMAND HANDLING IF=1 4 PRCOM EQU X:F ` & PX:G EQU 252 TRANSMIT BLOCK LENGTH t PTBLEN EQU X:G ( PX:H EQU 1 CODE , 0=ASCII , 1=EBCDIC PCODE EQU X:H * PX:I EQU 0 IF 1 SPECI
0x1c6cbc…1c6e50 Dummy {f00=0x008e, f01=0x0190, f02=» PSPEED EQU X:J * PX:K EQU 0 IF 1 SIEMENS MSV1 PROCEDURE PMSV1 EQU X:K H . PX:L EQU 2 NUMBER OF RECEIVE BUFFERS (2-5) PRBUFNR EQU 2 ( PX:M EQU 0 IF = 1 PTS 6805 ADAPTION PP6805 EQU X:M PX:N EQU /02 P IFT P6805=0
0x1c6e50…1c6fe4 Dummy {f00=0x008e, f01=0x018e, f02=» PX:O EQU 0 . PIBMCHR EQU X:O IF 1 IBM CHARACTER HANDLING . PX:P EQU 0 IF 1 MESSAGE PASSING TO DC TASK L PMESPAS EQU X:P ~ 4 PX:Q EQU 1 IBM-3270 EMULATION PACKAGE, IF NOT = 0 PEM3270 EQU X:Q PX:R EQU 1000 P DK2 * PBI
0x1c6fe4…1c7178 Dummy {f00=0x008e, f01=0x018e, f02=» f 4 PNOWACK EQU 0 WHEN 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". t , P ONLY WORKING IF STAT IS SET TO "ONE". P IFT P6805=0 6 PLCUUT EQU LCUIN+/10 DEVICE
0x1c7178…1c730c Dummy {f00=0x008e, f01=0x0190, f02=» P* P P* P* " . P***************************************** , P* ^ P* CONDITIONAL ASSEMBLY h P* . P***************************************** P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAI
0x1c730c…1c74a0 Dummy {f00=0x008e, f01=0x0190, f02=» P XIF DK2 P* P IFT MMUPAG=1 DK2 * PTBUFL EQU 650+X:X MMU BUFFER LENGTH DK : P XIF DK2 h P DE z P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* P
0x1c74a0…1c7634 (1, 318) Dummy {f00=0x008f, f01=0x0190, f02=» P P* P* DWT DISPLACEMENTS P* 4 0 PDWTDRD EQU /10 START OF DRIVER DEFINED PART > P* r P IFT MMUPAG=0 | PSTART EQU DWTDRD P XIF P* P IFT MMUPAG=1 PSTART EQU DWTDRD+4 P XIF P* 4 PDW
0x1c7634…1c77c8 Dummy {f00=0x008f, f01=0x0190, f02=» p & PDWTRQ EQU START+/06 RECEIVE QUEUE . PDWTBUF EQU START+/08 DEVICE BUFFER ADDRESS 2 ( PDWTCUR EQU START+/0A CURSOR ADDRESS d , PDWTTIM EQU START+/0C REQUEST TIMER VALUE . PDWTINF EQU START+/0E DEVICE INFO, 1=LP DK5 P* P P*
0x1c77c8…1c795c Dummy {f00=0x008f, f01=0x0190, f02=»1: TRANSFER DWTINF DK5 " P* /33: READ MODIFIED RESPONSE P* /37: TRANSFER PARAMETERS F P* /38: SET STATUS h $ P* /39: SET REQUEST TIMEOUT VALUE P* P* P* CONSTANTS AND WORK AREAS P* P* & PDCONOF DATA 0 ON- /
0x1c795c…1c7af0 Dummy {f00=0x008f, f01=0x018e, f02=» p , PDCTPGP DATA 0 TIMER POINTER GENERAL POLL P 8 P* B P* DC TASK ADDRESS BLOCK L P* l $ P DATA 0 INDICATES NO MMU BUFFER v P DATA DEVIND DEVICE INDEX * PDC15DC DATA DCACTD ACTIVATION ADDRESS & P DATA ABORT ABORT ROUTINE
0x1c7af0…1c7c84 Dummy {f00=0x008f, f01=0x0190, f02=» r P DATA DEVIND DEVICE INDEX ( PDC15AD DATA DCACT ACTIVATION ADDRESS * 4 P DATA ABORT ABORT ROUTINE ABORT ROUTINE ADDRESS V $ P DATA DCRBUF REC. BUFFER ANCHOR P* , P RES 15 SUBROUTINE STACK FOR INTERRUPTS PSTB RES 1 " P RES 1
0x1c7c84…1c7e18 Dummy {f00=0x008f, f01=0x0190, f02=»PEED EQU 0 P XIF P P* ( P* 2 $ P* ACTIVATION FROM TERMINAL TASKS < P* d PDCACT EQU * n P LDK A1,0 PRESET RETURN CODE P IFT EM3270=1 =4 P LDR A7,A7 =4 & P RF(Z) ANYMSG ANY MESSAGE ORDER =4 P XIF
0x1c7e18…1c7fac Dummy {f00=0x008f, f01=0x0190, f02=» TRINF TRANSFER DWTINF DK5 P SUK A7,/33-/31 DK7 " , P RF(E) RESTRM RESPONSE TO READ MODIFIED > P SUK A7,/37-/33 DK5 n $ P RF(Z) DCTP TRANSFER PARAMETERS P IFF STAT=0 P SUK A7,/38-/37 P ABL(Z) DCSS SET STATUS DK4 P SUK A
0x1c7fac…1c8140 Dummy {f00=0x008f, f01=0x0190, f02=»SET REQUEST TIMER P XIF P RF DCA100 & P 8 P* B P* L P* ACTIVATION FROM DCTASK V P* v P* PDCACTD EQU * $ P SUR A1,A1 PRESET RETURN CODE =4 P IFT EM3270=1 =4 P LDR A7,A7 =4 & P RF(Z) ANYMSG ANY
0x1c8140…1c82d4 (1, 319) Dummy {f00=0x008f, f01=0x0190, f02=»S r P PDCA100 EQU * REQUEST ERROR P ABL DISIOE INVALID ORDER 4 P* V P* ` P* READ FROM DCTASK j P* P* P* REQUEST FROM DC-TASK P* COMPLETE WHEN: & P* STATUS CHANGE ON DC EQUIPMENT $ P* SPONTANOUS M
0x1c82d4…1c8468 Dummy {f00=0x008f, f01=0x0190, f02=»TO DISPATCHER P IFT EM3270=1 =4 P 0 . P***************************************** : P* l P* ANY MESSAGE ORDER v P* " P***************************** P 2 PANYMSG LD A4,DWTRQ,A6 ANY QUEUED MESSAGE ?? =4 P RF(Z)
0x1c8468…1c85fc Dummy {f00=0x008f, f01=0x018e, f02=»K5 PTRINF EQU * DK5 P LD A2,ECBCW,A8 GET INFO DK5 " & P ORS A2,DWTINF,A6 OR AND STORE DK5 F " P RF ENDIO COMPLETE REQUEST DK5 p P* P* RESPONSE TO READ MODIFIED P* PRESTRM EQU * DK7 4 P LD A1,DWTINF,A6 WAS READ MODIFI
0x1c85fc…1c8790 Dummy {f00=0x008f, f01=0x018e, f02=» h P EJECT P* DK5 P* * P* TRANSFER PARAMETERS 4 P* R P* > P* REQUEST FROM DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS f : P* FROM TERMINALS: TRANSFER TERMINAL ADDRESSES P* P* P IFF CODE=1
0x1c8790…1c8924 Dummy {f00=0x008f, f01=0x0190, f02=» P RF(Z) DCTP10 ( P LC A2,TASCII,A2 TRANSLATE TO ASCII P SLL A2,8 J PDCTP10 EQU * $ P LC A3,ECBCW+1,A8 GET TCP OR DV p P ANK A3,/FF ( P LC A2,TASCII,A3 TRANSLATE TO ASCII P XIF * P ST A2,DWTBUF,A6 SAVE TERM. ADDR. DK
0x1c8924…1c8ab8 Dummy {f00=0x008f, f01=0x0190, f02=»NO QUEUE DK4 t & P LDR A3,A6 ADJUST ADDR. VALUE DK4 P ADKL A3,DWTSQ DK4 > , P CWR A1,A3 SOMETHING QUEUED OUR DWT? DK4 Z 4 P RF(E) DCTP16 YES, WAIT BEFORE TRANS. PARAM. DK4 & P LDR* A1,A1 NOT OURS, GET NEXT DK4 P RB DCTP14 DK4 PDCTP
0x1c8ab8…1c8c4c Dummy {f00=0x008f, f01=0x0190, f02=»DK4 r . P* POLL TIMEOUT, REMOVE FROM STATUS QUEUE P CF A15,REMOVS DK4 > PDCTP17 EQU * 831012 DK4 E Z ( P LDR A1,A6 SAVE DWT AS PARAMETER DK4 | 0 P CF A15,SETIME WAIT UNTIL STATUS IS SENT DK4 ( P DATA TPTOUT,20 DELAY= 2 SECONDS DK4 P
0x1c8c4c…1c8de0 Dummy {f00=0x008f, f01=0x0190, f02=» , P LD A2,DWTBUF,A6 RESTORE TERM ADDR. DK4 ( P STR A2,A6 SAVE IN FIRST WORD OF DWT : P f P IFT RCOM=1 n 2 P ST A8,DWTBUF,A6 SAVE ECB FOR RD. MODIFIED DK6 P XIF " P CWK A6,DW1500 DCTASK DWT ??? 2 P RF(E) DCTP30 YES!!! SHOULD N
0x1c8de0…1c8f74 (1, 320) Dummy {f00=0x008f, f01=0x0190, f02=» REQUEST ERROR | P P P ( PDCTP20 EQU * 0 " P LD A4,DCTAB DC:TAB ADDRESS =3 D $ P AD* A4,DCTAB LAST TABLE POS. =3 j * PDCTP22 SUK A4,2 ADDR. TO NEXT ENTRY =3 * P CW A4,DCTAB ALL ENTRIES CHECKED?? =3 * P RF(E) DCTP25 YES.DWT NOT
0x1c8f74…1c9108 Dummy {f00=0x008f, f01=0x0190, f02=»=3 P $ P STR A6,A1 INSERT DWT IN DC:TAB P LDK A1,2 : * P ADS A1,DC:IN UPDATE DC:TAB IN POINTER L P z * P ADS A1,DC:TAB INCREMENT DC:TAB LENGTH P IFT STAT=1 P LDK A1,4 DEVICE END P ORS A1,DWTST,A6 ( P CF A15,INSSQ IN
0x1c9108…1c929c Dummy {f00=0x008f, f01=0x0190, f02=»ETE REQUEST | P RB DCRTN P & P* 0 P* : P* WRITE D P* T P* ^ P* COMPLETE WHEN: h P* SUCCESFUL TRANSMISSION P* TIME OUT P* P* PDCWR EQU * P IFT MMUPAG=1 $ P LD A1,ECBRL,A8 REQUES
0x1c929c…1c9430 Dummy {f00=0x008f, f01=0x0190, f02=»INSWQ QUEUE REQUEST 2 P LD A1,DWTOR,A6 RESPONSE TO READ MODIFIED? DK7 ! P ANK A1,/FF MASK ORDER DK7 ! R * P CWK A1,/0033 READ-MOD. RESPONSE? DK7 ! t 2 P ABL(E) SPOLLX YES TREAT AS SPECIFIC POLL DK7 ! P RB DCRTN ! P* ! P* ! P* ! P
0x1c9430…1c95c4 Dummy {f00=0x008f, f01=0x0190, f02=» ! P LD A8,DWTECB,A6 GET ECB " . P LD A4,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE " ( " P RF(Z) DCRD10 NOTHING IN QUEUE " Z P " P " P " ( P LDR* A2,A4 TAKE THE FIRST IN QUEUE " P ST A2,DWTRQ,A6 " P ADK A4,6 " " P LD A3,-4,A4 EFFECTIVE LEN
0x1c95c4…1c9758 Dummy {f00=0x008f, f01=0x0190, f02=» " P # $ PDCRD10 CF A15,TIMERE START TIMER # P ABL DCRTN # 8 P # J P* # T P* # ^ P* SET STATUS # h P* # | P* # P IFF STAT=0 # PDCSS EQU * # * P LD A1,ECBCW,A8 GET STATUS INFORMATION # P ANK A1,3 MASK DB,IR # P RF(Z) D
0x1c9758…1c98ec Dummy {f00=0x008f, f01=0x0190, f02=»,A6 # P ANK A1,9 $ ( P RB(Z) DCSS10 WACK HAS NOT BEEN SENT $ PDCSS30 EQU * $ J , P CF A15,INSSQ INSERT DWT IN STATUS QUEUE $ ^ P LDK A1,4 SET DE $ P RB DCSS10 $ P XIF $ P $ P $ P* $ " P* SET REQUEST TIMEOUT VALUE $ P*
0x1c98ec…1c9a80 Dummy {f00=0x008f, f01=0x0190, f02=»ENDIO & DISPATCH $ P % P* % ( P* ILLEGAL APPLICATION BUFFER SIZE % * P* % V P % ` 8 PIL:LEN LDKL A1,/8008 REQUEST ERROR + ILLEGAL LENGTH % h P ABL DISEND COMPLETE REQUEST % P % P* % P* % P* % P* TIMER HANDLING PART %
0x1c9a80…1c9c14 (1, 321) Dummy {f00=0x008f, f01=0x0190, f02=»UEST TIMEOUT VALUE % x P RF(Z) TIME10 NO TIMING & P ST A2,TIMERR & : P CF A15,SETIME & P P DATA TOUTRE & f PTIMERR DATA 0 & z ( P ST A4,DWTTP,A6 STORE TIMER POINTER & PTIME10 EQU * & P RF GBUF10 RETURN & P* & P* TIMEOUT READ TIMER
0x1c9c14…1c9da8 Dummy {f00=0x008f, f01=0x018e, f02=» & r $ PTOUTR2 RB ENDIO COMPLETE REQUEST ' P* ' 0 P* WRITE TIMER=TIMWR ' : P* ' V PTIMEWR LDR A1,A6 ' ` . P LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE ' x P RB(Z) TIME10 NO TIMING ' P ST A2,TIMWR ' P CF A15,SETIME ' P DATA TOUTWR ' P
0x1c9da8…1c9f3c Dummy {f00=0x008f, f01=0x018e, f02=» ' P LDR A6,A1 FETCH DWT ( P CM DWTTP,A6 ( $ * P CF A15,REMOVW REMOVE FROM WRITE QUEUE ( 8 P* ( f & P* THIS INSTRUCTION DOES NOT BELONG ( p P* TO THE STANDARD INTERFACE ( P LD A2,FDWTUT ( P CWR A2,A6 ( * P RB(NE) TOUTR1 THIS DWT IS NOT WRI
0x1c9f3c…1ca0d0 Dummy {f00=0x008f, 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
0x1ca0d0…1ca264 Dummy {f00=0x008f, f01=0x0190, f02=» P* * $ P* CALLING SEQUENCE: CF A15,GRBUF * P* A4=0 IF NO BUFFER IS FREE * 6 & P* ELSE A4 CONTAINS BUFFER ADDRESS * Z P* A2 AND A3 ARE DESTROYED * P* * P* * ( PGRBUF LDKL A2,DCRBUF RECEIVE BUFFERS * PGBUF INH * P LDR* A4,A2 *
0x1ca264…1ca3f8 Dummy {f00=0x008f, f01=0x0190, f02=» POINTER * r P ABR* A15 RETURN TO CALLER + P + 2 P* + < P* + F ( P* INSERT DWT IN WRITE REQUEST QUEUE + P P* + | P* A2,A3,A4 DESTROYED + P* A6=DWT + P* + ( PINSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR + PINSWQ1 LDK A4,DWTWQ + PINSW
0x1ca3f8…1ca58c Dummy {f00=0x008f, f01=0x0190, f02=»ERT IN QUEUE + " P CMR A4 INDICATE END OF QUEUE , P RB GBUF10 RETURN , : P* , T P* , ^ * P* REMOVE DWT FROM WRITE REQUEST QUEUE , h P* , P* A2,A3,A4 DESTROYED , P* A6=DWT , P* , * PREMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR , 2 PREM0
0x1ca58c…1ca720 Dummy {f00=0x008f, f01=0x0190, f02=»UEUE: RETURN , z P CWR A3,A4 - P RF(E) REM15 - & P LDR A2,A3 GET NEXT - : P RB REM10 - V PREM15 LDR* A3,A4 REMOVE - h P STR A3,A2 - P RB GBUF10 RETURN - P - P* - P* - P* INSERT DWT IN STATUS QUEUE - P* - P IFF STA
0x1ca720…1ca8b4 (1, 322) Dummy {f00=0x0090, f01=0x0190, f02=»2,/FF IF ADDRESS = 00 OR /7F DK4 - ( P RB(Z) GBUF10 DONT PUT IN STATUS DK4 . ( P LDR A4,A2 SET A4=A2 DK4 . T " P* EBCDIC /7F = ASCII /22 DK4 . t , P SUK A2,/22 QUEUE, TERMINAL HAS BEEN DK4 . $ P RB(Z) GBUF10 MADE INACTIVE DK4 . P SUK A4,/7F DK4 .
0x1ca8b4…1caa48 Dummy {f00=0x0090, f01=0x0190, f02=» DWT FROM STATUS QUEUE . P* / P* A2,A3,A4 DESTROYED / ( P* A6=DWT / D P* / T * PREMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR / ^ P LDK A4,DWTSQ / P RB REM06 / P XIF / P / P* / P* / $ P* QUEUE ALLOCATED RECEIVE BUFFER / P*
0x1caa48…1cabdc Dummy {f00=0x0090, f01=0x0190, f02=»C-TASK DWT / v P XIF 0 P IFT MESPAS=0 0 $ P LDR A2,A6 QUEUE ON TERMINAL DWT 0 4 P XIF 0 , P ADK A2,DWTRQ BEGINNING OF RECEIVE QUEUE 0 h PQR100 EQU * 0 P LDR* A3,A2 0 $ P RF(Z) QR200 END OF QUEUE FOUND 0 P LDR A2,A3 0 P RB QR100 0
0x1cabdc…1cad70 Dummy {f00=0x0090, f01=0x0190, f02=»K IF UNEXPECTED MESSAGE OR STATUS CHANGE 0 P* 1 0 4 P* REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED 1 : P* 1 r PCKMESS LDKL A6,DW1500 1 | P LD A1,DWTST,A6 1 P RF(N) CKM110 NO REQUEST 1 P LDK A1,2 READ REQUEST ? 1 P CW A1,DWTOR,A6 1
0x1cad70…1caf04 Dummy {f00=0x0090, f01=0x0190, f02=»IN QUEUE 1 z P 2 P 2 , P LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER 2 . P ST A2,DWTRQ,A6 STORE THIS ADDR INTO QUEUE 2 P " P ADK A3,6 MOVE POINTER TO TEXT 2 & P DONT DESTROY BUFFER ADDRESS =6 2 P LD A4,-4,A3 2 0 P ST A4,ECBEL,A8 STORE NUMBERS OF C
0x1caf04…1cb098 Dummy {f00=0x0090, f01=0x0190, f02=» A4,A3 RECEIVE BUFFER ADDRESS 2 , P CF A15,DC:MIN MOVE DATA TO USER BUFFER 3 & * PCKM110 ADKL A15,4 ADJUST STACK POINTER 3 V P ABR* A15 RETURN 3 8 PCKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHECK STATUS 3 , P OR A1,DCONOF TAKE CARE OF POLL TIME OUT 3 P
0x1cb098…1cb22c Dummy {f00=0x0090, f01=0x0190, f02=»A15,TENDIO COMPLETE READ GENERAL REQUEST 3 P RB CKM110 4 0 P 4 B P 4 L @ P************************************************************ 4 T P* 4 P* ABORT ROUTINE 4 P* 4 P************************ 4 P 4 & PABORT LD A1,DWTTP,A6 TIMER
0x1cb22c…1cb3c0 Dummy {f00=0x0090, f01=0x0190, f02=»RDER CODE 4 z P SUK A1,2 5 * P RF(Z) AB:RTN READ REQUEST. NO ACTION 5 $ P SUK A1,4 5 R . P RF(NZ) AB:RTN NO ACTION IF NOT READ/WRITE 5 d P 5 . P CF A15,REMOVW REMOVE DWT FROM WRITE QUEUE 5 & P LD A2,FDWTUT WRITING DWT ADDRESS 5 P CWR A2,A6 5
0x1cb3c0…1cb554 (1, 323) Dummy {f00=0x0090, f01=0x0190, f02=» P IFT CPU852=1 6 P ADKL A15,4 6 $ P ABR* A15 RETURN IN INHIBIT MODE 6 . P XIF 6 V P IFF CPU852=1 6 b P RTN A15 6 x P XIF 6 P 6 P 6 P 6 P* 6 P* 6 P* STORE REGISTER A3-A8 6 $ P* CALLING SEQUENSE: CF A15,STREG 6
0x1cb554…1cb6e8 Dummy {f00=0x0090, f01=0x018e, f02=»T A5,LCA5 6 P ST A6,LCA6 7 P ST A7,LCA7 7 & P ST A8,LCA8 7 : P RF RTNA15 RETURN 7 N P 7 h PLDREG LDKL A3,0 7 r PLCA3 EQU *-2 7 P LDKL A4,0 7 PLCA4 EQU *-2 7 P LDKL A5,0 7 PLCA5 EQU *-2 7 P LDKL A6,0 7 PLCA6 EQU *-2
0x1cb6e8…1cb87c Dummy {f00=0x0090, f01=0x0190, f02=» 7 P 8 P* 8 P* 8 P* TIMER VALUES 8 & P* 8 < P* 8 F * PTIMPRO EQU 90 PROCEDURE TIMER 9 SEC DK 8 P " PTIMNAK EQU 3 DELAY FOR NAK DK 8 ~ P* 8 P* 8 P* CHARACTER EQUATES 8 P* 8 & PSF EQU X'1D' START FIELD CHARACTER 8 P
0x1cb87c…1cba10 Dummy {f00=0x0090, f01=0x0190, f02=» PDLE EQU /10 9 PEOT EQU /04 9 PNAK EQU /15 9 , PESC EQU /1B 9 @ PSBA EQU /11 9 T PGP EQU /22 9 h PRDBCOM EQU /32 9 z PRDMCOM EQU /36 9 P IFT CODE=0 9 PPAR EQU /80 9 PRVI EQU /3C 9 PACK0 EQU /30 9 PACK1 EQU /31 9
0x1cba10…1cbba4 Dummy {f00=0x0090, f01=0x0190, f02=»IEMENS MSV1 PROCEDURE 9 z P XIF : P IFT CODE=1 : * PPAR EQU /00 : > PWACK EQU /2C : R PRVI EQU XRVI DK : f PACK0 EQU /18 : ~ PACK1 EQU /2F : PSYNEBC EQU /32 : P XIF : P : P* : P* : P* PROCEDURE WORK AREAS : P* :
0x1cbba4…1cbd38 Dummy {f00=0x0090, f01=0x0190, f02=» : x PXSEL DATA 0 SELECTED ; PXETX DATA 0 ETX SENT ; $ 2 PXSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT ; @ " PXRB DATA 0 READ BUFFER SWITCH ; v PCACK DATA 0 ACK COUNTER ; * PSYNSW DATA 0 0=SKIP SYNS, 1=DON'T SKIP ; P* ; PFECB RES 1 WRITING E
0x1cbd38…1cbecc Dummy {f00=0x0090, f01=0x0190, f02=»TA 0 START OF LAST TRANSMITTED BLOCK ; $ PDCSTQ DATA 0 STATUS QUEUE ANCHOR < , . PDCTPP DATA 0 POINTER FOR PROCEDURE TIMING < T , PRESEND DATA 0 CONTROL SEQUENCE SAVE AREA < ( PCRDBUF DATA 0 READ BUFFER COUNTER DK < P* < P* < $ P* 3270 SENSE/STATU
0x1cbecc…1cc060 Dummy {f00=0x0090, f01=0x018e, f02=»A /4248 < P DATA /4242 = P* = $ 2 PNOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED = . , PIR EQU /26 S/S 1 : INTERVENTION REQUIRED = d P XIF = P = P* = P* = P* BASIC RECEIVE MODE = P* = " P* ENTERED EVERY TIME A MESSAGE = &
0x1cc060…1cc1f4 (1, 324) Dummy {f00=0x0090, f01=0x0190, f02=» = PBRM EQU * > P LDKL A5,STB LOAD STACKBASE > P IFT P6805=0 > > 2 P CF A5,HALTIN HALT RECEIVER AND UPDATE STATUS > T P XIF > P IFT P6805=1 > * P CF A15,CKMESS CHECK IF STATUS CHANGE > P XIF > PBRM010 EQU * > P IFT CODE+
0x1cc1f4…1cc388 Dummy {f00=0x0090, f01=0x0190, f02=»0+LSPEED+SYNEBC SPECIFY SYN PATTERN > P XIF ? , P IFT P6805=0 ? : " P CIO A2,1,LCUIN START RECEIVER ? P P XIF ? v P IFT P6805=1 ? P IFF CODE=1 ? P LDK A2,/0C ? " P CIO A2,1,LCUIN START RECEIVER ? P LDK A2,SYN ? * P OTR A2,1,LC
0x1cc388…1cc51c Dummy {f00=0x0090, f01=0x0190, f02=»T RECEIVER ? | P LDK A2,SYNEBC @ * P OTR A2,1,LCUIN SPECIFY SYNC CHARACTER @ * P RB(NA) BRMHLT @ X P XIF @ p PBRM100 EQU * @ ~ $ P CF A5,READP READ ONE CHARACTER @ P RF(NZ) BRM150 PARITY ERROR @ P LDR A1,A2 @ P SUK A1,STX @ P RF(
0x1cc51c…1cc6b0 Dummy {f00=0x0090, f01=0x0190, f02=»VED @ x P SUK A1,DLE-ENQ A P ABL(Z) BRM600 DLE RECEIVED A $ P SUK A1,NAK-DLE A H P ABL(Z) BRM500 NAK RECEIVED A ` P IFT MSV1=0 A P LDR A8,A2 A $ P CF A5,READP READ ONE CHARACTER A P RF(NZ) BRM150 PARITY ERROR A P CWR A2,A8 A & P
0x1cc6b0…1cc844 Dummy {f00=0x0090, f01=0x018e, f02=» A P CC A2,DW1500 B P RF(NE) BRM150 NOT THIS TCU B PBRM110 EQU * B B P CF A5,READP READ 1:ST STA B V P RF(NZ) BRM150 PARITY ERROR B x P LDR A8,A2 B P IFT MSV1=0 B P CF A5,READP READ 2:ND STA B P RF(NZ) BRM150 PARITY ERROR B P
0x1cc844…1cc9d8 Dummy {f00=0x0090, f01=0x018e, f02=» P SUK A2,ENQ+PAR C P XIF C P IFT P6805=1 C * P SUK A2,ENQ C @ P XIF C T P RF(NZ) BRM150 NOT ENQ C b P IFT P6805=0 C $ P CF A5,READ READ LAST CHARACTER C P C " P* TRAILING PAD CAN BE CHECKED C P C P CIO A1,0,LCUIN HALT
0x1cc9d8…1ccb6c Dummy {f00=0x0090, f01=0x0190, f02=» C p P XIF D P LDK A1,1 D P ST A1,CACK LOAD ACK COUNTER D ( P LDR A2,A8 D L P SUK A3,2 D ^ P RF(Z) BRM120 SELECTING D p P CWK A8,GP D P ABL(E) GPOLL GENERAL POLL D P IFT MSV1=1 D 6 P CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS
0x1ccb6c…1ccd00 Dummy {f00=0x0090, f01=0x0190, f02=»Z) SPOLL SPECIFIC POLL D P RB BRM INVALID POLL E PBRM120 EQU * E : & P CF A5,FINTER CHECK IF STA PRESENT E N P LDR A6,A3 LOAD DWT TO A6 E x P RF(NZ) BRM130 STA FOUND E P IFT MSV1=0 E $ P LDKL A6,DW1500 SELECT TO DCTASK E PBRM130 EQU * E
0x1ccd00…1cce94 (1, 325) Dummy {f00=0x0090, f01=0x0190, f02=»K HOLD TO RESYNCHRONIZE E P* F PBRM150 EQU * F * P ANK A2,/7F F > P SUK A2,/7F F R P RB(Z) BRM RESYNCHRONIZE F f & P CF A5,READ READ ANOTHER CHARACTER F P RB BRM150 F P F P* F P* F P* EOT HAS BEEN RECEIVED F P* F
0x1cce94…1cd028 Dummy {f00=0x0090, f01=0x0190, f02=» P LD A1,XACK G & P RF(Z) BRM220 ACK IS NOT EXPECTED G " P LD A6,FDWTUT GET WRITING DWT G B P RF(Z) BRM210 NO ONE WRITING G h P LDK A1,2 SET RC=2 G ( P CF A5,CWRITE COMPLETE WRITE REQUEST G PBRM210 EQU * G " P CM XACK RESET 'ACK EXPECTED' G
0x1cd028…1cd1bc Dummy {f00=0x0090, f01=0x0190, f02=»* G P* H PBRM300 EQU * H P CF A5,HPTIM H ( P LD A1,XSEL H < P RF(Z) BRM315 NOT SELECTED H P P LD A1,DCRBUF H r & P RB(Z) BRM150 NO BUFFER AVAILABLE H PBRM305 EQU * H P CF A5,RDMESS READ MESSAGE H P SUK A7,1 H P RF(NZ) BRM320
0x1cd1bc…1cd350 Dummy {f00=0x0090, f01=0x0190, f02=»BL BRM H PBRM315 EQU * I P IFT RCOM=1 I " P LD A1,XACK I 6 & P RF(Z) BRM316 ACK IS NOT EXPECTED I J P LD A1,DCRBUF I t & P RF(Z) BRM316 NO BUFFER AVAILABLE I " P LD A6,FDWTUT GET WRITING DWT I 0 P ABL(Z) BRM150 NO ONE WRITING. RESYNCHRONIZE I
0x1cd350…1cd4e4 Dummy {f00=0x0090, f01=0x0190, f02=»CURRENT ECB DK6 I z P ST A1,DWTCUR,A6 DK6 J P LDK A1,0 SET RC=0 J 6 ( P CF A5,CWRITE COMPLETE WRITE REQUEST J P P CM CACK PRESET ACK-1 =7 J | P RB BRM305 READ THE MESSAGE J P XIF J ( PBRM316 CF A5,READ READ ONE CHARACTER J P IFF P6805=1 =8
0x1cd4e4…1cd678 Dummy {f00=0x0090, f01=0x018e, f02=»D ABORT SEQUENCE J | P RB BRM220 K PBRM320 EQU * K * P IM XSTA INDICATE MESSAGE OK K > $ P LD A4,DCRBUF GET BUFFER ADDRESS K b P ADK A4,6 K P CW A4,FBLST K " P RF(NE) BRM325 NOT FIRST BLOCK K P IFF RCOM=0 K P LDK A1,ESC K P CCR A1,A4
0x1cd678…1cd80c Dummy {f00=0x0090, f01=0x018e, f02=» ( P RF(Z) RDBUF READ MODIFIED RECEIVED L P SUK A1,RDMCOM-RDBCOM L 0 & P RF(Z) RDMOD READ BUFFER RECEIVED L N P XIF L x PBRM325 EQU * L P SUK A7,1 L & P RF(Z) BRM340 MESSAGE ENDED BY ETB L P CM FBAX L * P CF A15,GRBUF ALLOCATE RECEIVE BUFFE
0x1cd80c…1cd9a0 Dummy {f00=0x0090, f01=0x0190, f02=» L P LDR* A2,A6 M P LC A2,TEBCDIC,A2 M P LD A1,DCRBUF M 6 P RF(Z) BRM326 M L P ST A2,+4,A1 M b P XIF M v PBRM326 EQU * M P CWK A6,DW1500 M , P RF(E) BRM330 MESSAGE IS MENT FOR DCTASK M P LD A2,DWTST,A6 GET STATUS M P RF(N) BRM
0x1cd9a0…1cdb34 (1, 326) Dummy {f00=0x0091, f01=0x0190, f02=» P LDK A2,2 N P CW A2,DWTOR,A6 N " P RF(NE) BRM330 NO READ REQUEST N . PBRM327 EQU * N T P LDK A1,0 SET RC=0 N h $ P LD A8,DWTECB,A6 GET ECB ADDRESS N P LD A3,-4,A4 GET LENGTH N * P ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH N & P CF A15,CTIME ST
0x1cdb34…1cdcc8 Dummy {f00=0x0091, f01=0x0190, f02=»CCC/WCC N l P* O P* O P IFT STAT=1 O $ P LC A2,+2,A4 GET WCC/CCC O 8 P ANK A2,/FF O X P LC A2,TEBCDI,A2 TRANSLATE O l & P LD A3,DWTINF,A6 GET DWT INFO DK5 O P ANK A3,1 GET LPBIT DK5 O P RF(Z) BRM328 NOT LP DK5 O P ANK A2,8 O
0x1cdcc8…1cde5c Dummy {f00=0x0091, f01=0x018e, f02=» P XIF P P IFT EM3270=1 =4 P P LD A2,DWTOR,A6 ORDER =4 P * , P RF(NZ) BRM329 NOT ANY MESSAGE ORDER =4 P J & P SUK A4,6 ADJUST BUFFER ADDRESS =4 P z ( P CF A5,QRBUF QUEUE MESSAGE ON DWT =4 P P RF BRM32A =4 P P XIF =4 P PBRM329 EQU * =4 P
0x1cde5c…1cdff0 Dummy {f00=0x0091, f01=0x0190, f02=» P $ P CF A15,TENDIO COMPLETE REQUEST Q P RF BRM345 Q 0 P Q B PBRM330 EQU * Q L P IFT EM3270=1 =4 Q ` P LD A1,DWTST,A6 STATUS =4 Q z P RF(N) BRM335 NO REQUEST =4 Q P LD A1,DWTOR,A6 ORDER =4 Q , P RF(NZ) BRM335 NOT ANY MESSAGE ORDER =4
0x1cdff0…1ce184 Dummy {f00=0x0091, f01=0x0190, f02=»UF QUEUE BUFFER FOR DCTASK Q . P CF A15,CKMESS COMPLETE DCTASK READ IF ANY R " PBRM340 EQU * R T P CF A5,TRACK SEND ACK 0/1 R h P ABL BRM R PBRM345 EQU * R P IFT STAT=1 R , P LD A1,DWTINF,A6 READ-MOD. RECEIVED? DK7 R P ANKL A1,/0002 DK7 R
0x1ce184…1ce318 Dummy {f00=0x0091, f01=0x0190, f02=» R p P CF A5,TRWACK SEND WACK S P RF BRM410 S ( P XIF S : P IFF STAT=1 S F P RB BRM340 S Z P XIF S l P S x P* S P* S , P* READ MODIFIED OR READ BUFFER RECEIVED S P* S P* S P IFF RCOM=0 S $ PRDBUF EQU * READ BUFFER CO
0x1ce318…1ce4ac Dummy {f00=0x0091, f01=0x0190, f02=»1 S & P XRS A1,CACK INCREMENT ACK COUNTER T P DB T 4 0 P LDK A1,/02 INDICATE READ-MOD. RECEIVED DK7 T B P ORS A1,DWTINF,A6 DK7 T v 2 P LDKL A1,/4000 SET RETURN CODE =READ-MOD. DK7 T ( P RB BRM32A COMPLETE THE REQUEST DK7 T P XIF T P* T
0x1ce4ac…1ce640 Dummy {f00=0x0091, f01=0x0190, f02=»ACK T , P RF(NZ) BRM510 RETRANSMISSION OF MESSAGE U P OR A1,XSEL U < " P RF(Z) BRM410 IN CONTROL STATE U P . P CF A5,TRREP REPEAT LAST CONTROL SEQUENCE U v PBRM410 EQU * U P ABL BRM U P U P* U P* U P* NAK HAS BEEN RECEIVED U
0x1ce640…1ce7d4 (1, 327) Dummy {f00=0x0091, f01=0x0190, f02=» P OR A1,XSEL V " P RB(Z) BRM410 IN CONTROL STATE V P RF BRM636 V > PBRM510 EQU * V P P DB V d P LDK A1,0 V r P CIO A1,0,LCUIN DK V P SST A1,LCUIN DK V P CF A15,STREG DK V P CF A15,SETIME DK V P DATA BRM520,TIMNAK DK V
0x1ce7d4…1ce968 Dummy {f00=0x0091, f01=0x0190, f02=»TAT=0 V P LD A1,XSTA W 0 P ABL(NZ) POL050 STATUS HAS BEEN TRANSMITTED W " P XIF W V 0 P LD A1,FBLST GET START POINT FOR LAST BLOCK W b & P SU A1,FECBBA COMPUTE BUFFER INDEX W P ST A1,FBAX W P ABL POL130 W P* W P* W P* DLE HAS BE
0x1ce968…1ceafc Dummy {f00=0x0091, f01=0x0190, f02=»ACK NOT EXPECTED W & P CF A5,READ READ SECOND CHARACTER X P IFF P6805=1 =8 X B P CWK A2,ACK0+PAR X Z P XIF =8 X r P IFT P6805=1 =8 X P CWK A2,ACK0 =8 X P XIF =8 X P RF(NE) BRM620 X P* X P* ACK , 0 RECEIVED X P* X
0x1ceafc…1cec90 Dummy {f00=0x0091, f01=0x0190, f02=»TART PROCEDURE TIMER X P RB BRM410 Y PBRM620 EQU * Y . P CWK A2,ACK1 Y B P RF(NE) BRM650 Y V P* Y l P* ACK , 1 RECEIVED Y v P* Y P LD A1,CACK GET ACK COUNTER Y $ P RB(Z) BRM610 ACK,1 NOT EXPECTED Y PBRM630 EQU * Y P LD A1,XETX Y
0x1cec90…1cee24 Dummy {f00=0x0091, f01=0x0190, f02=» Y ~ PBRM635 EQU * Z P IFF STAT=0 Z P LD A2,XSTA Z 0 . P RF(NZ) BRM670 STATUS HAS BEEN TRANSMITTED Z D P XIF Z v ( P CF A5,CWRITE COMPLETE WRITE REQUEST Z PBRM636 EQU * Z P CF A5,TREOT SEND EOT Z P IFT RCOM=1 Z P Z P CM XRB RESE
0x1cee24…1cefb8 Dummy {f00=0x0091, f01=0x0190, f02=» POL130 Z PBRM650 EQU * [ P IFF P6805=1 =8 [ $ P CWK A2,RVI+PAR [ < P XIF =8 [ T P IFT P6805=1 =8 [ f P CWK A2,RVI =8 [ ~ P XIF =8 [ ( P RB(NE) BRM610 INVALID DLE SEQUENCE [ " P CM XACK RESET 'EXPECTING ACK' [ P LD A1,XETX [
0x1cefb8…1cf14c Dummy {f00=0x0091, f01=0x0190, f02=» RB BRM635 [ P IFF STAT=0 P & P* 0 P* : " P* STATUS HAS BEEN TRANSMITTED D P* j P* t PBRM670 EQU * ~ " P LD A6,FDWTUT GET DWT ADDRESS , P CF A15,REMOVS REMOVE FROM STATUS QUEUE P CM XSTA CLEAR 'STATUS SENT'
0x1cf14c…1cf2e0 Dummy {f00=0x0091, f01=0x0190, f02=» " P ANS A1,DWTST,A6 CLEAR STATUS ] P RB BRM636 ] . P XIF ] @ P ] L P* ] V P* ] ` P* SELECT HAS BEEN RECEIVED ] j P* ] P* ] PSELECT EQU * ] P LD A1,XACK =5 ] * P RF(NZ) POL010 ERROR. ACK EXPECTED =5 ] P IFF STAT=0 ]
0x1cf2e0…1cf474 (1, 328) Dummy {f00=0x0091, f01=0x0190, f02=»I ] | P XIF ^ P IFF STAT=1 ^ P RF SEL110 ^ * P XIF ^ < PSEL100 EQU * ^ H P ABL BRM ^ PSEL110 EQU * ^ l P IFT STAT+NOWACK=1 ^ P ANK A3,8 ^ P RF(NZ) SEL115 BUSY ^ P XIF ^ P IFT STAT+NOWACK=2 ^ P ANK A3,8 ^ " P RF(Z) S
0x1cf474…1cf608 Dummy {f00=0x0091, f01=0x0190, f02=» RF(NZ) SEL120 BUFFER AVAILABLE ^ PSEL115 EQU * _ ( P IFF STAT+NOWACK=2 _ < P CF A5,TRWACK SEND WACK _ V P XIF _ v P RB SEL100 _ PSEL120 EQU * _ , P CF A5,PRREC PREPARE FOR TEXT RECEPTION _ P CF A5,TRACK SEND ACK,0 _ P RB SEL100 _
0x1cf608…1cf79c Dummy {f00=0x0091, f01=0x0190, f02=» P CM FBAX RESET BUFFER INDEX ` P IFT CODE=1 ` ( . P LC A2,TEBCDIC,A2 TRANSLATE STA TO EBCDIC ` < P XIF ` n $ P ST A2,+4,A1 SAVE STA IN BUFFER ` z P IM XSTA ` " P ST A6,FDWTIN STORE INPUT DWT ` P RTN A5 ` P ` P* ` P* ` $ P*
0x1cf79c…1cf930 Dummy {f00=0x0091, f01=0x0190, f02=» ` n " PPOL010 CF A5,TRENQ SEND ENQ =5 a * P CF A5,SPTIM START PROCEDURE TIMER =5 a . " P ABL BRM WAIT FOR RESPONSE =5 a PPOL020 EQU * =5 a " P CF A5,CPTIM CHECK POLL TIMER a P IFF STAT=0 a P LD A6,DCSTQ a & P RF(Z) POL110 NO STATUS TO BE
0x1cf930…1cfac4 Dummy {f00=0x0091, f01=0x018e, f02=» a n P IM XACK SET 'ACK EXPECTED' b P XIF b , P IFF STAT=1 b 8 P RF POL110 b L P XIF b ^ PPOL100 EQU * b j P ABL BRM b ~ PPOL110 EQU * b P LD A6,DCWRQ b " P RF(NZ) POL120 WRITE ON QUEUE b PPOL115 EQU * b P CF A5,TREOT SEND EOT b
0x1cfac4…1cfc58 Dummy {f00=0x0091, f01=0x0190, f02=» b n P RF(NZ) POL126 c P CF A15,REMOVW c P RB POL115 c 4 PPOL126 EQU * c F P ST A8,FECB SAVE ECB ADDRESS c Z P ST A6,FDWTUT SAVE A6 c ~ P c P IFF MMUPAG=0 c $ P LDKL A4,MMUBUF MMU WORK BUFFER c P ST A4,ECBBA,A8 c . P CF A15,DC:MOT
0x1cfc58…1cfdec Dummy {f00=0x0091, f01=0x0190, f02=» c & P ST A4,FECBBA SAVE BUFFER ADDRESS d ( P SUK A3,2 SKIP FIRST WORD OF BUFFER d 2 P ST A3,FECBRL SAVE LENGTH d ^ P CM FBAX RESET BUFFER INDEX d PPOL130 EQU * d P CM XETX RESET 'ETX SENT' d P CM XSTA d P CF A5,TRTEXT SEND ONE BLOCK d
0x1cfdec…1cff80 Dummy {f00=0x0091, f01=0x0190, f02=»S RESPONSE TO READ MODIFIED d P* e $ PSPOLLX EQU * DK7 e . & P LDK A1,/06 FAKE A WRITE REQUEST e H P ST A1,DWTOR,A6 DK7 e r 6 P LDKL A1,/FFFF-/0002 CLEAR READ MODIFIED FLAG DK7 e P ANS A1,DWTINF,A6 e $ P LDKL A5,STB SET STACK BASE DK7 e *
0x1cff80…1d0114 (1, 329) Dummy {f00=0x0091, f01=0x0190, f02=» PSPOLL EQU * f P IFF STAT+SPECP=0 f P LD A1,XACK =5 f 2 " P RB(NZ) POL010 ACK EXPECTED =5 f J P LDR A7,A6 SAVE A6 f p P CF A5,CPTIM CHECK POLLTIMER f P LDR A6,A7 RESTORE A6 f P IFT STAT=1 f P LD A1,DWTST,A6 GET STATUS f P ANK A
0x1d0114…1d02a8 Dummy {f00=0x0091, f01=0x0190, f02=» f x P LD A1,DWTOR,A6 GET ORDER g P SUK A1,6 g * P RB(Z) POL125 WRITE REQUEST g < P SUK A1,2 g ` " P RB(Z) POL125 EXCHANGE REQUEST g r P XIF g P RB POL115 SEND EOT g P g P* g P* g 8 P* CHECK IF THERE IS A WRITE REQUEST TO BE
0x1d02a8…1d043c Dummy {f00=0x0091, f01=0x0190, f02=»NG ON g v P IFT RCOM=1 h $ P LD A2,XRB IF RCOM, SKIP IT DK6 h " P RF(NZ) CWR900 DK6 h J P XIF h f P LD A2,DWTST,A6 h v P RF(N) CWR900 NO REQUEST h P LD A2,DWTOR,A6 GET ORDER h P SUK A2,6 h P RF(Z) CWR100 WRITE REQUEST h P S
0x1d043c…1d05d0 Dummy {f00=0x0091, f01=0x0190, f02=» A2,2 TRANMISSION OK h ( P ST A2,DWTOR,A6 INDICATE READ ORDER i P RF CWR150 i H & PCWR100 LD A8,FECB GET ECB ADDRESS i Z P CF A15,CTIME STOP TIMING i P LDR A8,A8 i P RF(Z) CWR150 i P ST A2,ECBCW,A8 i $ P CF A15,TENDIO COMPLETE REQUEST i
0x1d05d0…1d0764 Dummy {f00=0x0091, f01=0x0190, f02=»CTED' i x P CM FDWTUT j P IFT RCOM=1 j " P LD A2,XRB READ MODIFIED ? DK6 j 4 P RF(Z) CWR910 DK6 j Z $ P LD A2,DWTCUR,A6 RESTORE ECB DK6 j t P ST A2,DWTECB,A6 DK6 j PCWR910 EQU * DK6 j P XIF j P RTN A5 j P j P* j P*
0x1d0764…1d08f8 Dummy {f00=0x0091, f01=0x0190, f02=» OR PARITY ERROR , BUFFER OVERFLOW j ( P* 2 : IF CORRECT ETB BLOCK RECEIVED k * P* k V PRDMESS EQU * k ` $ P LD A4,DCRBUF GET BUFFER ADDRESS k t P ADK A4,6 RESERVE HEADER k P LDK A3,0 k P LD A1,XSTA k $ P RF(NZ) RDM050 LAST INPUT WAS OK k "
0x1d08f8…1d0a8c Dummy {f00=0x0091, f01=0x0190, f02=»T A4,FBLST REMEMBER START OF BLOCK k PRDM075 EQU * l * P CM XSTA l > P LDK A7,0 RESET LRC l N P l j P IFT IBMCHR=1 l r P LD A1,FBAX l " P RF(NZ) RDM100 NOT FIRST BLOCK l P CF A5,READP l P RF(NZ) RDM120 PARITY ERROR l P CWK A2,ESC l
0x1d0a8c…1d0c20 Dummy {f00=0x0091, f01=0x0190, f02=»DP READ ONE CHARACTER l P RF(NZ) RDM120 PARITY ERROR m PRDM110 EQU * m B P CWK A2,ETX m V P RF(E) RDM130 ETX RECEIVED m j P CWK A2,ETB m P RF(E) RDM160 ETB RECEIVED m P CWK A2,ITB m P RF(E) RDM170 ITB RECEIVED m P CWK A2,ENQ m
0x1d0c20…1d0db4 (1, 330) Dummy {f00=0x0092, f01=0x0190, f02=»0 m P IFT BINTRM=1 n P n P LDR A1,A2 n ( P SUK A1,DC1+3 n : P RF(P) RDM115 NOT DC1-DC3 n P P ADK A1,3 n r P RF(N) RDM115 NOT DC1-DC3 n P SLL A1,6 n P LDR A8,A1 n * P CF A5,READP 8-BIT CHAR GET NEXT PART n P RF(NZ) RDM120 P
0x1d0db4…1d0f48 Dummy {f00=0x0092, f01=0x0190, f02=»TORE CHARACTER n P ADK A4,1 INCREMENT POINTER o $ P IM FBAX INCREMENT BUFFER INDEX o : P LD A1,FBAX o b P CWK A1,RBUFL+RBUFL o v P RB(NG) RDM100 NOT OVERFLOW o P* o P* BUFFER OVERFLOW o P* o P RF RDM140 ABORT INPUT o PRDM120
0x1d0f48…1d10dc Dummy {f00=0x0092, f01=0x0190, f02=» o P* ETX RECEIVED p P* p PRDM130 EQU * p ( $ P LD A1,DCRBUF GET BUFFER ADDRESS p < P LD A2,FBAX GET BUFFER INDEX p d 2 P ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER p P IFF CODE=1 p P CF A5,RDLRC p P RF(Z) RDM150 LRC WAS OK p P X
0x1d10dc…1d1270 Dummy {f00=0x0092, f01=0x0190, f02=» LDK A3,1 INDICATE INVALID MESSAGE p PRDM150 EQU * q * $ P LDR A7,A3 SAVE RESULT REGISTER q > P CF A5,HALTIN HALT INPUT q f P IFT P6805=1 q P ORR A7,A1 PARITY ERROR q P XIF q P RTN A5 q P* q P* ETB RECEIVED q P* q PRDM160
0x1d1270…1d1404 Dummy {f00=0x0092, f01=0x0190, f02=»* ITB RECEIVED q P* r PRDM170 EQU * r P IFF CODE=1 r 4 P CF A5,RDLRC r H " P RB(NZ) RDM120 LRC WAS NOT OK r P XIF r P IFT CODE=1 r & P CF A5,RDCRC READ CRC AND CHECK IT r " P RB(NE) RDM120 CRC WAS NOT OK r P XIF r P RB RDM100
0x1d1404…1d1598 Dummy {f00=0x0092, f01=0x0190, f02=» INCREMENT ACK COUNTER r P RF(NZ) TRDLE s P LDK A3,ACK0 LOAD ACK0 s 4 P RF TRDLE s R P* s d P* TRANSMIT WACK s n P* s PTRWACK LDK A3,WACK LOAD WACK s P RF TRDLE s P* s P* TRANSMIT RVI s P* s P IFF STAT=0 s PTRRV
0x1d1598…1d172c Dummy {f00=0x0092, f01=0x0190, f02=»INSAVE AREA s ~ P SC A3,RESEND+1 t P RF TRREP t , P t > P* t H P* TRANSMIT NAK t R P* t h PTRNAK LDK A3,NAK LOAD NAK t r P RF TREN10 t P* t P* TRANSMIT EOT t P* t PTREOT LDK A3,EOT LOAD EOT t P RF TREN10 t P* t
0x1d172c…1d18c0 Dummy {f00=0x0092, f01=0x0190, f02=»F t P SC A2,RESEND+1 u $ PTRREP CF A5,TRSYNC START OUTPUT u " & P LC A2,RESEND GET FIRST CHARACTER u J P CF A5,WRITEP SEND IT u t & P LC A2,RESEND+1 GET NEXT CHARACTER u P CF A5,WRITEP SEND IT u PTRRE10 LDK A2,/FF u P CF A5,WRIT05 SEND P
0x1d18c0…1d1a54 (1, 331) Dummy {f00=0x0092, f01=0x0190, f02=»A5,READ WAIT FOR END u P XIF v & P SST A2,LCUUT PERFORM SST AT ONCE v * P IFF LOGG=0 v T ( P CF A5,LOGSST LOG TRANSMITTER STATUS v h P XIF v P RTN A5 v P v P* v P* v P* TRANSMIT ONE TEXT BLOCK v P* v P* v PTRTE
0x1d1a54…1d1be8 Dummy {f00=0x0092, f01=0x0190, f02=» v P LD A4,FBAX w ( P RF(NZ) TRT050 NOT START OF MESSAGE w P w H 2 P LD A1,XRB READ BUFFER COMMAND IN PROCESS ??? w P P RF(NZ) TRT050 YES !! w P w P LD A4,FECBBA w " P LC A3,+2,A4 GET AID CHARACTER w P SUK A3,/30 w $ P RF(NZ) TRT0
0x1d1be8…1d1d7c Dummy {f00=0x0092, f01=0x0190, f02=»TE SEND % w P LDK A2,'/' x P CF A5,WRITE SEND / x & P LDK A2,STX x B P CF A5,WRITE SEND STX x V ( P ST A4,FBLST REMEMBER START OF BLOCK x t ( P ADK A4,5 SKIP AID + CURSOR ADDRESS x P LDK A3,5 ADJUST LENGTH x P LDK A2,3 x P ST A2,FBA
0x1d1d7c…1d1f10 Dummy {f00=0x0092, f01=0x018e, f02=» P LDK A7,0 RESET LRC y $ P LD A4,FECBBA GET BUFFER ADDRESS y P AD A4,FBAX ADD BUFFER INDEX y H ( P ST A4,FBLST REMEMBER START OF BLOCK y l ( P ADK A4,2 SKIP FIRST WORD OF BUFFER y & P LDK A3,0 RESET CHARACTER COUNTER y P LD A1,FBAX GET BUFFER IND
0x1d1f10…1d20a4 Dummy {f00=0x0092, f01=0x0190, f02=» P CF A5,WRITEP SEND STA z P IFT IBMCHR=1 z " P IFF RCOM=1 z 8 " P LDK A2,/27 SEND ENTER AS AID z L P CF A5,WRITEP z r " P LDK A2,/20 AND CURSOR ADDRESS z P CF A5,WRITEP z P LDK A2,/20 z P CF A5,WRITEP z P XIF z P IFT RCOM=1 z
0x1d20a4…1d2238 Dummy {f00=0x0092, f01=0x0190, f02=»SEND AID z | P { $ P LD* A3,DWTCUR,A6 CURSOR ADDRESS { . P CF A5,LINCOL SEND LINE AND COLUMN NUMBER { @ P LDK A3,5 SET BLOCK COUNT { r P RF TRT100 { PTRT070 EQU * { P XIF { P { P LDK A3,2 { PTRT100 EQU * { P LCR A2,A4 GET ONE C
0x1d2238…1d23cc Dummy {f00=0x0092, f01=0x0190, f02=»************************************************ { P* | 8 , P* CHECK IF ATTRIBUTE CHARACTER OR NULL | B P* | r 4 P*********************************************** | | P | & P CWK A2,X'20' ATTRIBUTE CHARACTER | P RF(L) TRT101 YES!!! | P XIF |
0x1d23cc…1d2560 Dummy {f00=0x0092, f01=0x0190, f02=» CWK A2,/7D END OF MESSAGE ? | " P RF(NE) TRT103 NO,GO TO TRT103 } $ P LDK A2,/19 } J PTRT103 EQU * } ^ P CWK A2,X'7F' NULL ?? } r P RF(NE) TRT105 } P SUK A2,1 } P XIF } P IFT RCOM=1 } P RF TRT105 } P } PTRT101 EQU * } P }
0x1d2560…1d26f4 (1, 332) Dummy {f00=0x0092, f01=0x0190, f02=» LDR A1,A2 CONVERT TO IBM ATTRIBUTE } P ANK A1,1 ~ , P ANK A2,/1E MASK ~ > P SLL A2,1 ~ V & P ORR A2,A1 IBM ATTRIBUTE COMPOSED ~ h " P ORK A2,/40 BIT ALWAYS SET ONE ~ P LC A2,TASCII,A2 ~ & P CWK A2,/18 CHECK SPECIAL ATTRIBUT ~ P RF(NE) TRT104
0x1d26f4…1d2888 Dummy {f00=0x0092, f01=0x0190, f02=» P XIF P P CWK A2,/07 ( P RF(L) TRT110 ILLEGAL CODE : SKIP IT . P CF A5,WRITEP SEND CHARACTER Z PTRT110 EQU * ~ $ P IM FBAX INCREMENT BUFFER INDEX & P LD A1,FECBRL GET REQUESTED LENGTH P CW A1,FBAX " P RF(NG) TRT130 E
0x1d2888…1d2a1c Dummy {f00=0x0092, f01=0x0190, f02=»1 , P LDK A1,SBA CHECK IF SBA AT END OF BLOCK P CC A1,-2,A4 : P RF(E) TRT115 YES N P CC A1,-1,A4 h P RF(NE) TRT116 NO SEND ETB | ( P LCR A2,A4 GET FIRST BYTE AFTER SBA P ADK A4,1 INREMENT POINTER P CF A5,WRITEP SEND IT
0x1d2a1c…1d2bb0 Dummy {f00=0x0092, f01=0x0190, f02=»EX z P XIF PTRT116 EQU * P LDK A2,ETB LOAD ETB * PTRT120 EQU * F P CF A5,WRITEP SEND IT Z P IFF CODE=1 x P LDR A2,A7 GET LRC P CF A5,WRITEP SEND LRC P XIF P IFT CODE=1 P LDR A8,A7 SAVE CURRENT CRC P
0x1d2bb0…1d2d44 Dummy {f00=0x0092, f01=0x0190, f02=» BYTE 2 z P XIF P ABL TRRE10 HALT OUTPUT PTRT130 EQU * < P IM XETX INDICATE 'ETX SENT' P PTRT140 EQU * t P LDK A2,ETX LOAD ETX P RB TRT120 SEND ETX AND LRC P P* P* P* TRANSMIT STATUS MESSAGE P
0x1d2d44…1d2ed8 Dummy {f00=0x0092, f01=0x0190, f02=»,TRSYNC START OUTPUT P LDK A2,SOH P CF A5,WRITE SEND SOH 0 P LDK A7,0 REST LRC N P LDK A2,'%' h P CF A5,WRITEP SEND '%' | P LDK A2,'R' P CF A5,WRITEP SEND 'R' P LDK A2,STX P CF A5,WRITE SEND STX P LC A2,DW1
0x1d2ed8…1d306c Dummy {f00=0x0092, f01=0x018e, f02=»/06 MASK FOR S/S 0 P SRL A1,1 $ P LC A2,SSTAB,A1 GET STATUS BYTE , P CF A5,WRITEP SEND S/S 0 T P LDK A2,NOIR PRELOAD S/S 1 t P LD A1,DWTST,A6 GET STATUS P ANK A1,5 P RF(Z) TRST10 NOT 'IR' P ANK A1,4 P RF(NZ) TRST10
0x1d306c…1d3200 Dummy {f00=0x0092, f01=0x018e, f02=» P P* P* P* TRANSMIT SYNC SEQUENCE " P* B P* L PTRSYNC EQU * V P LDK A2,0 j * P CIO A2,0,LCUIN HALT INPUT IF NOT DONE | P SST A2,LCUIN PERFORM SST P IFT P6805=0 & P CIO A2,1,LCUUT START TRANSMITTER
0x1d3200…1d3394 (1, 333) Dummy {f00=0x0092, f01=0x018e, f02=» P SST A1,LCUUT P RF(A) TRS005 P ABL BRM 4 PTRS005 CIO A2,1,LCUUT F PTRS010 EQU * d P LDK A2,SYNEBC z * P OTR A2,1,LCUUT SPECIFY SYNC CHARACTER P XIF P IFT P6805=1 P IFT CODE=0 P LDK A2,/0C
0x1d3394…1d3528 Dummy {f00=0x0092, f01=0x0190, f02=» x PTRS010 EQU * P LDK A2,SYN * P OTR A2,1,LCUUT SPECIFY SYNC CHARACTER 0 P XIF ^ * P CF A5,READ WAIT FOR OUTPUT INTERRUPT l P LDK A3,4 4 SYNS PTRS100 LDK A2,SYN P CF A5,WRITE SEND SYN P SUK A3,1 P RB(NZ) TRS1
0x1d3528…1d36bc Dummy {f00=0x0092, f01=0x0190, f02=»AV P IFT CPU852=1 P CF A15,SAVE8 SAVE A1-A8 P XIF @ P L P IFF CPU852=1 T P MSR 8,A15 SAVE A1-A8 =1 j P XIF * P CF A15,LDREG RESTORE DC REGS A3 - A8 P INR A2,0,LCUIN READ CHAR , P RF(NA) IHIN20 NOT ACCEPTED,CHECK
0x1d36bc…1d3850 Dummy {f00=0x0092, f01=0x0190, f02=»IHLCI2 P CWK A2,SYN SKIP SYNS P RF(E) READ , " PIHLCI2 XRR A7,A2 CALCULATE LRC @ P XIF f P IFT CODE=1 r P C2 SYNSW 2 P RF(NZ) IHLCI1 DO NOT SKIP SYNCS IN BCC FRAME P CWK A2,SYNEBC P RF(E) READ SKIP EBCDIC SYN P
0x1d3850…1d39e4 Dummy {f00=0x0092, f01=0x0190, f02=»FT P6805=0 PIHIN20 CF A5,SST PERFORM SST P ABL BRM 8 P XIF H P IFT P6805=1 V PIHIN20 RF SST PERFORM SST l P XIF P P* P* P* TRANSMITTER INTERRUPT P* P* PIH1502 EQU * P ST
0x1d39e4…1d3b78 Dummy {f00=0x0092, f01=0x018e, f02=»=1 z P XIF * P CF A15,LDREG RESTORE DC REGS A3 - A8 P RB IHIN10 D P V P* ` P* j & P* SST INSTRUCTION AND STATUS CHECK t P* ( P* LCU STATUS : BIT 10=CARRIER OFF & P* BIT 13=PARITY ERROR (6805 ONLY) , P*
0x1d3b78…1d3d0c Dummy {f00=0x0092, f01=0x0190, f02=» & P RF(NA) SST200 ALREADY INACTIVE P XIF 2 P LDR A2,A1 @ P IFF LOGG=0 R & P CF A5,LOGSST LOG SST INFORMATION f P XIF P IFT P6805=0 P ANK A2,2 P RF(Z) SST100 P XIF P IFT P6805=1 P ANK A2,6
0x1d3d0c…1d3ea0 Dummy {f00=0x0092, f01=0x0190, f02=» XIF PSST050 EQU * P CM XSTA TROUHHPUT ERROR $ P LDKL A5,STB D P ABL BRM010 X PSST100 EQU * l P ST A1,DCSTCU P IFT P6805=0 * P CF A15,CKMESS CHECK IF STATUS CHANGE P RTN A5 P XIF P IFT P6805=1
0x1d3ea0…1d4034 (1, 334) Dummy {f00=0x0093, f01=0x0190, f02=»ATA 2 WAIT TIME P RF READ P* * PSST200 LDK A1,0 4 PSSTRET ADK A5,4 L P LDR A1,A1 SET CR d P ABR* A5 RETURN ~ P XIF P* P* P* HALT INPUT P* P* PHALTIN LDK A1,0 P CIO A1,0,LCUIN
0x1d4034…1d41c8 Dummy {f00=0x0093, f01=0x0190, f02=»FOR SST INTERRUPT P XIF P ( P* 2 P* < , P* WRITE FROM OR READ ONE CHARACTER TO A2 F P* v P* PWRITE EQU * P IFT CODE=1 P ANK A2,/FF P CWK A2,/FF 0 P RF(E) WRIT05 NO TRANSLATION OF TRAILING PAD
0x1d41c8…1d435c Dummy {f00=0x0093, f01=0x018e, f02=» P RF READ THROUGHPUT ERROR P IFF CODE=1 * $ PWRIT10 XRR A7,A2 ACCUMULATE BCC > P XIF f P IFT CODE=1 r & PWRIT10 CF A5,CRCCAL CALCULATE CRC P XIF P IFF LOGG=0 & P CF A5,LOGOUT LOG OUTPUT CHARACTER P XIF P*
0x1d435c…1d44f0 Dummy {f00=0x0093, f01=0x0190, f02=» v P* P* P IFT CODE+P6805=0 PWRITEP ANK A2,/FF 6 P ECR A1,A2 P P ORK A2,/80 b PWRI100 SLL A1,1 v P RB(P) WRI100 P RB(Z) WRITE WRITE P XRK A2,/80 P RB WRI100 P XIF P IFF CODE+P6805=0
0x1d44f0…1d4684 Dummy {f00=0x0093, f01=0x0190, f02=»Y h P* P* PREADP CF A5,READ P IFT CODE+P6805=0 6 P ECR A1,A2 P PRE100 SLL A1,1 b P RF(Z) RE110 x P RB(NN) RE100 P XRK A2,/80 P RB RE100 PRE110 LDR A1,A2 P ANK A2,/7F P XIF P IFF COD
0x1d4684…1d4818 Dummy {f00=0x0093, f01=0x0190, f02=» P P* < P* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2 P* $ P* CALLING SEQUENCE: CF A5,FINTER f P* A2=SUBTERMINAL ADDRESS P* A4 DESTROYED " P* A3#0: DWT TO FOUND TERMINAL P* B P* NOTE: FOR SIEMENS
0x1d4818…1d49ac Dummy {f00=0x0093, f01=0x0190, f02=» h P* . PRBYTE DATA 0 IF 1 COMPARE WITH RIGTH BYTE P* D P* N PFINTEP EQU * X P IFT MSV1=0 l PFINTER EQU * P XIF P IM RBYTE P IFT MSV1=1 PFINTER EQU * P XIF & P LD A4,DCTAB GET ADDRESS TO DC:TAB
0x1d49ac…1d4b40 Dummy {f00=0x0093, f01=0x018e, f02=» v ( P RF(E) FINT20 SUBTERMINAL NOT FOUND P LDR* A3,A4 LOAD DWT ADDRESS 4 P IFT MSV1=1 X $ P AD A3,RBYTE CHOOSE ADDRESS TYPE l * P CCR A2,A3 COMPARE SUBTERMINAL ADDRESS P XIF P IFT MSV1=0 . P CC A2,1,A3 COMPARE TO SUBTERMINAL ADD
0x1d4b40…1d4cd4 (1, 335) Dummy {f00=0x0093, f01=0x0190, f02=» P* P* P* POWER ON FUNCTIONS P* 4 P* > PDC15ON EQU * H P IFT CPU852=1 P CF A15,SAVE8 SAVE A1-A8 r P XIF P P IFF CPU852=1 P MSR 8,A15 SAVE A1-A8 =1 P XIF P IFT STAT=1 P LDK A5,4 SE
0x1d4cd4…1d4e68 Dummy {f00=0x0093, f01=0x018e, f02=»F(E) DRDC06 END OF TABLE P LDR* A6,A1 GET DWT ADDRESS 0 P ORS A5,DWTST,A6 STORE DEVICE END FOR DEVICE D ( P CF A15,INSSQ INSERT IN STATUS QUEUE x P RB DRDC05 PDRDC06 EQU * P XIF P LDK A2,/40 P ORS A2,DCONOF P CF A15,
0x1d4e68…1d4ffc Dummy {f00=0x0093, f01=0x0190, f02=» h PDRDC20 ABL BRM P P* ( P* POLL TIME OUT 2 P* J ( PPTOUT LDKL A5,STB LOAD A5 STACK BASE T P LDK A2,/40 ( P ST A2,DCONOF INDICATE POLL TIME OUT * P CF A15,CKMESS CHECK IF STATUS CHANGE $ P CF A15,SPOTIM START POLL
0x1d4ffc…1d5190 Dummy {f00=0x0093, f01=0x0190, f02=»LING t P LDKL A2,-TIMPOL P ST* A2,DCTPGP RESTART TIMER $ * P CF A15,CKMESS CHECK IF STATUS CHANGE H P RTN A5 v P* P* START POLL TIMER P* $ PSPOTIM CF A15,SETIME START TIMER P DATA PTOUT,TIMPOL & P ST A4,DCTPGP STOR
0x1d5190…1d5324 Dummy {f00=0x0093, f01=0x0190, f02=» $ P LDR A1,A6 LOAD DWT AS PARAMETER P CF A15,SETIME 0 P DATA PRTOUT,TIMPRO F $ P ST A4,DCTPP SAVE TIMER POINTER b P RTN A5 P* P* PROCEDURE TIMEOUT P* PPRTOUT CM DCTPP P LDR A6,A1 RELOAD A6 P LDKL A5,S
0x1d5324…1d54b8 Dummy {f00=0x0093, f01=0x0190, f02=» SEND ENQ & P CF A5,SPTIM START PROCEDURE TIMER PPRT10 ABL BRM < P R P* P* STOP PROCEDURE TIMER f P* ( PHPTIM LD A1,DCTPP GET TIMER POINTER P RF(Z) HPT10 NOT RUNNING P CM* DCTPP STOP TIMER P CM DCTPP
0x1d54b8…1d564c Dummy {f00=0x0093, f01=0x0190, f02=»A7 = ACCUMULATED CRC P* P* & PCRCCAL EQU * 0 P ST A1,CRCSAV D P ST A2,CRCSAV+2 Z P ST A3,CRCSAV+4 r P LDK A1,8 PCRC100 LDR A3,A7 P SRL A7,1 P XRR A3,A2 P SRL A2,1 P ANK A3,1 P RF(Z) CRC11
0x1d564c…1d57e0 Dummy {f00=0x0093, f01=0x0190, f02=»V+4 P RTN A5 PCRCSAV RES 3 P 0 P* : P* D ( P* READ CRC CHARACTERS AND CHECK THEM N P* CR = (E) IF CRC WAS OK z P* P* $ PRDCRC LDR A6,A7 SAVE CURRENT CRC $ P IM SYNSW DO NOT SKIP SYNCS NOW P CF A5,REA
0x1d57e0…1d5974 (1, 336) Dummy {f00=0x0093, f01=0x0190, f02=»,CRCSAV+2 SAVE IT P SLL A2,8 P XRR A2,A8 , P ADK A5,4 > . P CWR A2,A6 COMPARE RECEIVED WITH COMPUTED P P ABR* A5 P XIF P IFT CODE=0 P* & P* RDLRC READ LRC CHARACTER " P* CR=0 IF LRC OK
0x1d5974…1d5b08 Dummy {f00=0x0093, f01=0x0190, f02=»CEND EQU * P CM SYNSW P ABR* A5 $ P 4 P XIF < P H 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
0x1d5b08…1d5c9c Dummy {f00=0x0093, f01=0x018e, f02=»CATOR v P DATA 0 TASK QUEUE P* ( P IFT MMUPAG=1 2 P DATA 0 USER ECB ADDRESS H P DATA DC:ECB MMU ECB ADDRESS h P XIF P* P DATA 0 TIMER POINTER ( P DATA 0 WRITE QUEUE OR BUFFER QUEUE . P DATA 0 STATUS QUEUE (NOT US
0x1d5c9c…1d5e30 Dummy {f00=0x0093, f01=0x018e, f02=» " P DATA 0 REQUEST TIMEOUT VALUE " P DATA 0 EXTRA DEVICE INFO DK5 * P* P P IFT MMUPAG=1 Z PDC:ECB EQU * MMU ECB p P DATA 0,0,0,0,0,0 P XIF P* P P* P* P* DC RECEIVE BUFFER POOL P* PRLIN
0x1d5e30…1d5fc4 Dummy {f00=0x0093, f01=0x0190, f02=» P DATA *+RLINK P RES RBUFL+3 P IFF RBUFNR=3 2 P DATA *+RLINK H P RES RBUFL+3 ^ P IFF RBUFNR=4 r P DATA *+RLINK P RES RBUFL+3 P XIF P IFF RBUFNR=1 DK3 P DATA *+RLINK P RES RBUFL+3 P XIF
0x1d5fc4…1d6158 Dummy {f00=0x0093, f01=0x0190, f02=» P P* P* P* INTERRUPT LOGGING ROUTINE & P* J P* T P IFF LOGG=0 ^ PLOGSST ST A2,SAVE2 r P ORKL A2,/F000 P RF LOG10 PLOGOUT ST A2,SAVE2 P ORKL A2,/0F00 P RF LOG10 PLOGIN CWK A2,/FF
0x1d6158…1d62ec Dummy {f00=0x0093, f01=0x0190, f02=» A3,LOGEND P RF(L) LOGEXI P LDKL A3,LOGSTA ( PLOGEXI ST A3,LOGPNT @ P LD A2,SAVE2 P LD A3,SAVE3 p PLOGE10 RTN A5 P P* P* PLOGPNT DATA LOGSTA PLOGSTA EQU * P RES 300 PLOGEND EQU *-4
0x1d62ec…1d6480 Dummy {f00=0x0093, f01=0x0190, f02=»*********************************** | P* , P* L I N C O L 6 P* P : P* CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER Z P* > P********************************************************** P PLINCOL EQU * " P LDR A2,
0x1d6480…1d6614 (1, 337) Dummy {f00=0x0093, f01=0x0190, f02=»NUMBER x 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 NUMBER j P RTN A5 RETURN P* P* P* P P P* SCANDINAVIAN ALPHABET P DB
0x1d6614…1d67a8 Dummy {f00=0x0093, f01=0x0190, f02=»E,/4F50 /10-/17 z * P DATA /5152,/245D,/2A29,/3B5E /18-/1F * P DATA /2D2F,/5354,/5556,/5758 /20-/27 F * P DATA /595A,/402C,/255F,/3E3F /28-/2F t ( P DATA /3031,/3233,/3435,/3637 /30-37 ( P DATA /3839,/3A5B,/5C27,/3D22 /38-3F P DE P
0x1d67a8…1d693c Dummy {f00=0x0093, f01=0x4086, f02=»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 * N P* b P* l P END v@ /255F,/3E3F /28-/2F t ( P DATA /3031,/3233,/3435,/3637 /30-37 ( P DATA /3839,/3A5B,/5C27,/3D22 /38-3F P DE P
0x1d693c…1d6ad0 Dummy {f00=0x0093, f01=0x2008, f02=» H P X ` h p x
0x1d6ad0…1d6c64 Dummy {f00=0x0093, f01=0x0000, f02=»
[…0x3…]
0x1d7120…1d72b4 (1, 338) Opaque[0x194]
0x1d72b4…1d7448 # DirEnt {nam=»EBCDIC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1280, f03=0x0000}
0x1d72b4…1d7448 IdxSect {
0x1d72b4…1d7448 f00 = 0x0094 // 0x1d72b4 @0x0
0x1d72b4…1d7448 f01 = 0x0004 // 0x1d72b6 @0x2
0x1d72b4…1d7448 gno = [ // 0x1d72b8 @0x4
0x1d72b4…1d7448 [0x00]: C0x0094.0x0.0
0x1d72b4…1d7448 [0x01]: C0x0094.0x1.0
0x1d72b4…1d7448 ]
0x1d72b4…1d7448 }
0x1d7448…1d75dc Dummy {f00=0x0094, f01=0x018e, f02=» 0 P IDENT EBCDIC 9.2DK 3 82-10-05 870105040920 P 8 P* @ 4 P************************************************ J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* EBCDIC = EBCDIC/ASCII TABLE P* P* P* P*
0x1d75dc…1d7770 Dummy {f00=0x0094, f01=0x018e, 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* : P* VERSION FOR SCAND
0x1d7770…1d7904 Dummy {f00=0x0094, f01=0x018e, f02=» P* 7C 5C P* 00 7C P* 5A 24 $ P* 6A 40 4 0 P* 2F 06 USM (2F) TIL SKIP (06) DK3 D . P* 1C 7B DUP (1C) TIL DUP (7B) DK3 x P EJECT P* P* 2 P* TABLE FOR CONVERSION OF EBCDIC CODE TO ASCII P*
0x1d7904…1d7a98 Dummy {f00=0x0094, f01=0x0190, f02=» j ( P DATA /1011,/1213,/000A,/0000 10-17 ( P DATA /0019,/0000,/7B1D,/1E1F 18-1F 4 ( P DATA /0000,/0000,/0000,/171B 20-27 ` ( P DATA /0000,/0000,/0005,/0006 28-2F ( P DATA /0000,/1600,/0000,/0004 30-37 ( P DATA /0000,/0000,/1415,/001A 38-3F
0x1d7a98…1d7c2c Dummy {f00=0x0094, f01=0x0190, f02=» ( P DATA /5152,/245D,/2A29,/3B5E 58-5F ( P DATA /2D2F,/5354,/5556,/5758 60-67 0 ( P DATA /595A,/402C,/255F,/3E3F 68-6F ( P DATA /1831,/3233,/3435,/3637 70-77 ( P DATA /3839,/3A5B,/5C27,/3D22 78-7F ( P DATA /2061,/6263,/6465,/6667 80-87
0x1d7c2c…1d7dc0 Dummy {f00=0x0094, f01=0x0190, f02=» DATA /2D2F,/7374,/7576,/7778 A0-A7 ( P DATA /797A,/7C2C,/255F,/3E3F A8-AF , ( P DATA /3031,/3233,/3435,/3637 B0-B7 X ( P DATA /3839,/3A23,/4027,/3D22 B8-BF ( P DATA /2041,/4243,/4445,/4647 C0-C7 ( P DATA /4849,/5B2E,/3C28,/2B21 C8-CF ( P
0x1d7dc0…1d7f54 (1, 339) Dummy {f00=0x0094, f01=0x0190, f02=»A /595A,/7C2C,/255F,/3E3F E8-EF ( P DATA /3031,/3233,/3435,/3637 F0-F7 ( ( P DATA /3839,/3A23,/4027,/3DFF F8-FF T P XIF P EJECT P* P* 2 P* TABLE FOR CONVERSION OF ASCII CODE TO EBCDIC P* P* PTEBCDIC EQU *
0x1d7f54…1d80e8 Dummy {f00=0x0094, f01=0x0190, f02=»/3C3D,/3226 10-17 ~ ( P DATA /7019,/3F27,/1C1D,/1E1F 18-1F ( P DATA /404F,/7F4A,/5A6C,/507D 20-27 F ( P DATA /4D5D,/5C4E,/6B60,/4B61 28-2F r ( P DATA /F0F1,/F2F3,/F4F5,/F6F7 30-37 ( P DATA /F8F9,/7A5E,/4C7E,/6E6F 38-3F ( P DATA /6AC1,/C2C3,
0x1d80e8…1d827c Dummy {f00=0x0094, f01=0x411a, f02=»B,/5F6D 58-5F z ( P DATA /0081,/8283,/8485,/8687 60-67 ( P DATA /8889,/9192,/9394,/9596 68-6F B ( P DATA /9798,/99A2,/A3A4,/A5A6 70-77 n ( P DATA /A7A8,/A91C,/0000,/00E0 78-7F 4 P DATA /544F,/5353 SPEC. FLEX CHAR. 'TOSS' 80-84 P XIF
0x1d827c…1d8410 Dummy {f00=0x0094, f01=0x2008, f02=» 68-6F z ( P DATA /9798,/99A2,/A3A4,/A5A6 70-77 ( P DATA /A7A8,/A91C,/0000,/00E0 78-7F B 4 P DATA /544F,/5353 SPEC. FLEX CHAR. 'TOSS' 80-84 n P XIF P END @ ( P DATA /C8C9,/D1D2,/D3D4,/D5D6 48-4F ( P DATA /D7D8,/D9E2,
0x1d8410…1d85a4 Dummy {f00=0x0094, f01=0x0190, f02=»P( PP P< P@ 6 B + | Z ! 6* X , X P ! ! W< ! 6* _ ! 6* _& ! : X , X P ! X , X P B B ! ! ! T Y *W X * ! # & ! ! v " 0 TOT 0 SST X Y ,W 0 X Y , Y * ! ! v X *
0x1d85a4…1d8738 Dummy {f00=0x0094, f01=0x0190, f02=» ! N ! f ! ! ^ ! ( ! ! V ! X Y . X * " ! _ Y * 4 ! PT C ! ! ! (@ ! R _ ! $ 1 ;h 1 ! 1 ! ! * ! ! ! ) ! Y *# T X Y ._ Y *# 4 ! Z ( C V ! : ! B B
0x1d8738…1d88cc Dummy {f00=0x0094, f01=0x0190, f02=» LW Y L Y H Y J Y B S W W B C & Z _ ? V Y " X $ T X Y $ Y X (P y (_> ( A0 _N Y ( " X . P Y : ! p ! X # P Y .:A , X $ Y Y $ Y X Y & X '? n A d ? V(@ X H X J K P6 X LT $
0x1d88cc…1d8a60 Dummy {f00=0x0094, f01=0x0190, f02=»<C ! 9 4 X " _ W B RZ X , X P W P Q8 U _ T,: B R(' P Q 9BW Q 9C B ! T 4 P ;A _ 4 X 0 # P _ 4(@ R D? 1_ W (@ R 0 D@ ] _ ! 4 ! L ;E :B 9A ! L
0x1d8a60…1d8bf4 (1, 340) Opaque[0x194]
0x1d8bf4…1d8d88 # DirEnt {nam=»TIMER «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1290, f03=0x0000}
0x1d8bf4…1d8d88 IdxSect {
0x1d8bf4…1d8d88 f00 = 0x0094 // 0x1d8bf4 @0x0
0x1d8bf4…1d8d88 f01 = 0x0006 // 0x1d8bf6 @0x2
0x1d8bf4…1d8d88 gno = [ // 0x1d8bf8 @0x4
0x1d8bf4…1d8d88 [0x00]: C0x0094.0x2.0
0x1d8bf4…1d8d88 [0x01]: C0x0094.0x3.0
0x1d8bf4…1d8d88 [0x02]: C0x0095.0x0.0
0x1d8bf4…1d8d88 ]
0x1d8bf4…1d8d88 }
0x1d8d88…1d8f1c Dummy {f00=0x0094, f01=0x0190, f02=» 0 P IDENT TIMER REL 9.2 79-11-16 870105040920 P 8 P* @ P* J 8 P*************************************************** T P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TIMER = TIMER FUNCTIONS P* P* P*
0x1d8f1c…1d90b0 Dummy {f00=0x0094, f01=0x0190, f02=»AINS TIMER LKM PROCESSORS AND | " P* THE FOLLOWING SUBROUTINES: & P* L * P* -SETIME: SET BLOCK IN TIMER QUEUE V . P* -SETIMP: SETIME + STORE TIMER POINTER P* P* P EJECT TIMER P* P* P*********** P
0x1d90b0…1d9244 Dummy {f00=0x0094, f01=0x0190, f02=» . P ENTRY SETIMP SETIME + STORE TIMER POINTER P 6 P > P F P* N P* X P*********** b P* EXTRNALS * v P************ P* P* P EXTRN TDISP DISPATCHER . P EXTRN LKMQDI QUEUE TERMINAL AND DISPATCH $ P EXT
0x1d9244…1d93d8 Dummy {f00=0x0094, f01=0x018e, f02=»ADDRESS x $ P EXTRN ACTOT ACTIVATE A TERMINAL * P EXTRN SAVE8 SAVE 8 REGISTERS ON STACK 8 8 P EXTRN TIMQUE POINTER TO FIRST BLOCK IN TIMER QUEUE f 0 P EXTRN IHRET8 RESTORE 8 REGISTERS FROM STACK P EJECT TIMER P* P* . P********
0x1d93d8…1d956c Dummy {f00=0x0094, f01=0x0190, f02=» d P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. L P* ~ PCPU852 EQU 0 P* P EJECT TIMER P* P* P* T I M E R P* ( P* THIS IS THE TIMER LK
0x1d956c…1d9700 Dummy {f00=0x0094, f01=0x018e, f02=»ELAY P* P* A4 = 0 P* A5 = TTAB ADDRESS ( P* A8 = DELAY F P* P* f P* 2. TIMING AND ACTIVATION p P* P* A1 = PARAMETER 8 P* A4 = DISPATCH ADDRESS OF PROGRAM TO BE ACTIVATED , P* A5 = TTAB ADDRES
0x1d9700…1d9894 (1, 341) Dummy {f00=0x0094, f01=0x0190, f02=» PTIMER EQU * P ADK A4,0 SET CR * P RF(NZ) TIM010 TIMING AND ACTIVATION? 0 P* ^ P EJECT TIMER h P* ~ P* PROGRAM DELAY P* P LDR A1,A5 SET PARAMETER P ST A8,PAR1+2 SET TIME P CF A15,SETIME PPAR1 DAT
0x1d9894…1d9a28 Dummy {f00=0x0094, f01=0x0190, f02=» PTIM010 EQU * $ P CF A15,FNDTID FIND TTAB ADDRESS P ADK A2,0 SET CR D " P ABL(Z) LKMRQE TTAB NOT FOUND? ( P LDR A3,A2 IN BLOCK: A3=TTAB ADDRESS , P LDR A2,A4 A2=DISPATCH ADDRESS ( P CF A15,GETBLK A1=PARAMETER .
0x1d9a28…1d9bbc Dummy {f00=0x0094, f01=0x0190, f02=» PQUEDIS EQU * P ABL LKMQDI P* , P EJECT TIMER 6 P* L P* V P* RETURN AFTER TIME OUT ` P* P* 1.PROGRAM DELAY P* PDELAY EQU * P LDR A5,A1 SET TTAB ADDRESS * P RB QUEDIS QUEUE TASK FOR DISP
0x1d9bbc…1d9d50 Dummy {f00=0x0094, f01=0x0190, f02=»FREBLK AND SET IT FREE P LDR A5,A3 SET TTAB ADDRESS * P LDK A7,0 MONITOR ACTIVATION PARAMETER B ( P CF A15,ACTOT AND ACTIVATE TERMINAL p P RB TTDIS P* P EJECT TIMER P* P* " P* S E T I M E , S E T I M P P
0x1d9d50…1d9ee4 Dummy {f00=0x0094, f01=0x0190, f02=»RS:- ~ P* P* A1 = PARAMETER . P* A4 = IF SETIMP: TIMER POINTER ADDRESS 0 , P* P1 = DISPATCH ADDRESS AFTER TIME OUT b P* P2 = DELAY P* : P* P1 AND P2 ARE STORED AFTER THE SUBROUTINE REQUEST. P* P* EXIT PARAM
0x1d9ee4…1da078 Dummy {f00=0x0094, f01=0x018e, f02=» * P IFT CPU852=1 & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF J P* V P IFT CPU852=0 ` P INH v " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P* P EJECT TIMER P* P* * P LDR A6,A4 SAVE TIMER POINTER AD
0x1da078…1da20c Dummy {f00=0x0094, f01=0x0190, f02=» P LDR* A8,A5 TIME IN A8 P ADK A5,2 & ( P ST A5,20,A15 ADJUST PROGRAM COUNTER 8 $ P CF A15,GETBLK GET A FREE BLOCK d P LDR A2,A4 P C1R A1,A8 " P CF A15,GETBLK GET TIMER BLOCK P LD A1,TIMQUE " P STR A1,A4 SET BLOCK IN QUEU
0x1da20c…1da3a0 Dummy {f00=0x0094, f01=0x417a, f02=»ETIME? , P STR A4,A6 -SETIMP. STORE TIMER POINTER P* > P EJECT TIMER H P* ^ P* h PSETEND EQU * r P IFT CPU852=1 ( P ABL IHRET8 RESTORE A1-A8 AND RETURN P XIF P* P IFT CPU852=0 * P MLR 8,A15 RESTORE A
0x1da3a0…1da534 (1, 342) Dummy {f00=0x0095, 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
0x1da534…1da6c8 Dummy {f00=0x0095, f01=0x0004, f02=» 0 P
0x1da6c8…1da85c Dummy {f00=0x0095, f01=0x0190, f02=» J F IDENT TOSSIO REL 9.2 79-11-16 870105040920 H D !dTIO TENDIO DC:MIN DC:MOT MONMMU ECBFC ECBBA ECBRL ECBEL ECBRC R D @ ECBCW ECBCW2 BUFLENA ACTADRA ABTADR INTADR` POLADR RECADR F B ECHADR DC:DIXV DM:DIX PC:DIX8
0x1da85c…1da9f0 Dummy {f00=0x0095, f01=0x018e, f02=»UEC# DWTMEC DWTA2 DWTA3 DWTA4 DWTA5 DWTSB1 z * & DWTSB2f DWTTP DWTECHj DWTSQ DWTVOLW 4 DWTCHP b DWTST v DWTBC DWTECB DWTOR DWTOCH DWTADR DWTTAB DWTWAT
0x1da9f0…1dab84 Dummy {f00=0x0095, f01=0x0190, f02=» DWTA4 DWTA5 DWTSB1 , DWTSB2f " @ DWTTP $ T DWTECHj & f DWTSQ 0 z DWTVOLW 0 BUFLENA ACTADRA ABTADR INTADR` POLADR R
0x1dab84…1dad18 Dummy {f00=0x0095, f01=0x0190, f02=» IT:DIX ECBFC ECBBA & ECBRL 8 ECBEL J ECBRC ECBCW n ECBCW2 , ( MONMMU $ , ( ! $ ( , 0 4
0x1dad18…1daeac Dummy {f00=0x0095, f01=0x0190, f02=» n , ( y @ C @ $W 0P P > FDBADF > , ( Z 0P R I P QTJOB * & W _" H P 4 I TIODM , ( > T C T V Y * & @
0x1daeac…1db040 Dummy {f00=0x0095, f01=0x0190, f02=» A D , ( I W @W T P X T T LKMQDIR P , ( D g W C 8 b TTB:ST , ( W T 8P Y ^ 5 TDISP FNDDWT |TIO , (
0x1db040…1db1d4 (1, 343) Opaque[0x194]
0x1db1d4…1db368 # DirEnt {nam=»TMMLKM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12a8, f03=0x0000}
0x1db1d4…1db368 IdxSect {
0x1db1d4…1db368 f00 = 0x0095 // 0x1db1d4 @0x0
0x1db1d4…1db368 f01 = 0x0006 // 0x1db1d6 @0x2
0x1db1d4…1db368 gno = [ // 0x1db1d8 @0x4
0x1db1d4…1db368 [0x00]: C0x0095.0x1.0
0x1db1d4…1db368 [0x01]: C0x0095.0x2.0
0x1db1d4…1db368 [0x02]: C0x0095.0x3.0
0x1db1d4…1db368 ]
0x1db1d4…1db368 }
0x1db368…1db4fc Dummy {f00=0x0095, f01=0x0190, f02=» 2 P IDENT TMMLKM REL 9.2 79-11-16 870105040920 P : P* B P* L 6 P************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* ( P* TMMLKM = TOSS MMU LKM PROCESSORS P* P*
0x1db4fc…1db690 Dummy {f00=0x0095, f01=0x0190, f02=»WING n P* TOSS MMU LKM PROCESSORS: P* 0 " P* - TCHPAG = CHANGE MMU PAGE : P* ` $ P* - TCHMMU = CHANGE MMU TABLE j P* & P* - TLUSEG = LOCK/UNLOCK SEGMENT P* P* P EJECT TMMLKM P* P* P**
0x1db690…1db824 Dummy {f00=0x0095, f01=0x0190, f02=» MMU TABLE | & P ENTRY TLUSEG LOCK/UNLOCK SEGMENT P < P D P L P* T P* ^ P************* h P* EXTERNALS * ~ P************* P* P* 0 P EXTRN FNDTID FIND TTAB ADDRESS FROM TASK ID , P EXTRN LKMQDI QUEUE TA
0x1db824…1db9b8 Dummy {f00=0x0095, f01=0x0190, f02=»AB ADDRESS ~ $ P EXTRN SCTNOS NUMBER OF SEGMENTS P EJECT TMMLKM : P* R P* P********** f P* TCHPAG * x P********** P* P* 2 P* THIS IS THE CHANGE MMU PAGE LKM PROCESSOR. P* B P* TCHPAG WILL CHANGE T
0x1db9b8…1dbb4c Dummy {f00=0x0095, f01=0x0190, f02=»TERED FROM THE LKM HANDLER & P* WITH THE FOLLOWING PARAMETERS: " P* L P* A5 = TTAB ADDRESS V ( P* A7 = PAGE TO BE CHANGED, 0 - 15 t * P* A8 = NEW LOCATION OF PAGE, 0 - 63 P* < P* IT RETURNS TO CALLING TASK WITH A7 AND A8 UN
0x1dbb4c…1dbce0 Dummy {f00=0x0095, f01=0x0190, f02=»XING IN MMU TABLE v P ADR A7,A5 ADD TTAB ADDRESS P LDR A2,A8 NEW PAGE LOCATION > . P ANK A2,/3F SKIP IRRELEVANT BITS (IF ANY) b P SLL A2,2 < P SC A2,TTB:MT,A7 STORE NEW LOCATION OF PAGE IN MMU TABLE P* 0 PT:DISP ABL LKMQDI QUEUE
0x1dbce0…1dbe74 (1, 344) Dummy {f00=0x0095, f01=0x018e, f02=»* P* 4 P* THIS IS THE CHANGE MMU TABLE LKM PROCESSOR. P* L D P* TCHMMU WILL CHANGE THE MMU TABLE CONTENTS OF REQUESTING TASK V 4 P* TO THE MMU TABLE CONTENTS OF SPECIFIED TASK. P* * P* IT IS ENTERED FROM THE LKM HANDLER
0x1dbe74…1dc008 Dummy {f00=0x0095, f01=0x0190, f02=» ` P* ( P* IT RETURNS TO CALLING TASK WITH P* THE FOLLOWING PARAMETER: > P* b 2 P* A7 = UNCHANGED IF REQUEST SUCCESSFUL, ELSE l & P* A7 = -1 IF TASK NOT IN SYSTEM P* " PTCHMMU EQU * CHANGE MMU TABLE * P CF A15,FNDT
0x1dc008…1dc19c Dummy {f00=0x0095, f01=0x0190, f02=»NTENTS h 4 P TS TTB:MT,A5 STORE IN MMU TABLE OF CALLING TASK * P RB T:DISP QUEUE TASK FOR DISPATCHING F P* t P EJECT TMMLKM ~ P* P* P********** P* TLUSEG * P********** P* P* 6 P* THIS IS THE LOCK
0x1dc19c…1dc330 Dummy {f00=0x0095, f01=0x0190, f02=»OCK SEGMENT REQUEST IS ISSUED FOR THAT SEGMENT. P* 8 * P* IT IS ENTERED FROM THE LKM HANDLER B & P* WITH THE FOLLOWING PARAMETERS: p P* P* A5 = TTAB ADDRESS P* A7 = SEGMENT NUMBER & P* A8 = 0 IF LOCK SEGMENT REQUEST
0x1dc330…1dc4c4 Dummy {f00=0x0095, f01=0x0190, f02=» P* > P* A7 = UNCHANGED IF SEGMENT LOADING IS SUCCESSFUL, ELSE & P* A7 = -1 IF REQUEST ERROR, ELSE P P* z P* P EJECT TMMLKM P* P* $ PTLUSEG EQU * LOCK/UNLOCK SEGMENT * P LDR A1,A7 CHECK IF SEGMENT NUMBER < 0
0x1dc4c4…1dc658 Dummy {f00=0x0095, f01=0x0190, f02=»TLCERR EQU * , P ABL LKMRQE BRANCH TO LKM REQUEST ERROR P* D PTLUS00 EQU * N , P SLL A1,3 ADJUST FOR INDEXING IN SEGTAB b $ P AD A1,SCTSEG ADD SEGTAB ADDRESS " P LCR A4,A1 GET SEGMENT STATUS P ANK A4,/8 " P RB(NZ) TLCERR CORE RE
0x1dc658…1dc7ec Dummy {f00=0x0095, f01=0x4164, f02=» P EJECT TMMLKM P* P* LOCK SEGMENT & P* < 4 P ORRS A4,A1 INDICATE SEGMENT TO BE CORE RESIDENT F P RB T:DISP ~ P* P* UNLOCK SEGMENT P* PTLUS10 EQU * P C1R A4,A4 A4 := /FDFF 2 P ANRS A4,A1 INDICATE SEGME
0x1dc7ec…1dc980 Dummy {f00=0x0095, f01=0x2008, f02=» NT TCHPAG PRR 9.1 78-10-16 870105040910 END <@ H
0x1dc980…1dcb14 (1, 345) Dummy {f00=0x0095, f01=0x0190, f02=» n P LDK A3,0 P* P IFT MMUPAG=0 $ * P LDR* A1,A7 GET NO OF ECB:S IN ECBBLK : P XIF h P* t P IFT MMUPAG=1 ~ ( P ELR A1,A7 GET NO OF ECB:S IN ECBBLK P XIF P* ( P RF(NP) TP:RQE REQUEST ERROR IF <= 0 P*
0x1dcb14…1dcca8 Dummy {f00=0x0095, f01=0x0190, f02=»S v & P LDR* A2,A8 GET FIRST WORD OF ECB P XIF 4 P* @ P IFT MMUPAG=1 J P ELR A8,A7 GET ECB ADDRESS ` $ P ELR A2,A8 GET FIRST WORD OF ECB P XIF P* ( P RF(N) TMW:30 I/O ALREADY COMPLETED? 8 P CF A15,FNDDWT NO, SEARCH DW
0x1dcca8…1dce3c Dummy {f00=0x0095, f01=0x0190, f02=» " P LD A2,DWTST,A6 GET DWT STATUS P RF(N) TP:RQE NOT BUSY? * P CW A5,DWTTAB,A6 J 4 P RF(NE) TP:RQE REQUEST NOT ISSUED BY THIS TASK? b 0 P LD A2,DWTWAT,A6 GET WAIT/ACTIVATE INDICATOR , P RF(NZ) TP:RQE REQUEST ISSUED WITH WAIT? P ORK A6,1
0x1dce3c…1dcfd0 Dummy {f00=0x0095, f01=0x0190, f02=»AVE FIRST DWT ADDRESS P LDR A3,A6 P* 0 PTMW:20 EQU * : 8 P ST A6,DWTWAT,A9 CHAIN THIS DWT WITH THE ONE BEFORE N $ P LDR A9,A6 SAVE THIS DWT ADDRESS P SUK A1,1 ( P RB(P) TMW:10 MORE ECB:S IN ECBBLK? : P ST A3,DWTWAT,A9 NO, SET
0x1dcfd0…1dd164 Dummy {f00=0x0095, f01=0x0190, f02=» TTAB SAVE AREA p 2 P ADK A3,0 CHECK FLAG IF FIRST ECB TO WAIT FOR & P RF(Z) TP:QDI FIRST ECB IN ECBBLK? N P* x : PTMW:40 ADKL A3,DWTWAT POINT TO WAIT/ACTIVATE INDICATOR $ P LDR* A2,A3 GET NEXT DWT ADDRESS P RF(Z) TP:QDI NO MORE DWT:S?
0x1dd164…1dd2f8 Dummy {f00=0x0095, f01=0x40aa, f02=»QU * " P ABL LKMRQE LKM REQUEST ERROR P* 2 PTP:QDI EQU * < ( P ABL LKMQDI QUEUE TASK AND DISPATCH P P* | P* P* P END @ VATE INDICATOR $ P LDR* A2,A3 GET NEXT DWT ADDRESS P RF(Z) TP:QDI NO MORE DWT:S?
0x1dd2f8…1dd48c Dummy {f00=0x0095, 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
0x1dd48c…1dd620 Dummy {f00=0x0095, f01=0x0000, f02=»
0x1dd620…1dd7b4 (1, 346) Opaque[0x194]
0x1dd7b4…1dd948 # DirEnt {nam=»TLDSEG«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12c0, f03=0x0000}
0x1dd7b4…1dd948 IdxSect {
0x1dd7b4…1dd948 f00 = 0x0096 // 0x1dd7b4 @0x0
0x1dd7b4…1dd948 f01 = 0x0006 // 0x1dd7b6 @0x2
0x1dd7b4…1dd948 gno = [ // 0x1dd7b8 @0x4
0x1dd7b4…1dd948 [0x00]: C0x0096.0x0.0
0x1dd7b4…1dd948 [0x01]: C0x0096.0x1.0
0x1dd7b4…1dd948 [0x02]: C0x0096.0x2.0
0x1dd7b4…1dd948 ]
0x1dd7b4…1dd948 }
0x1dd948…1ddadc Dummy {f00=0x0096, f01=0x0190, f02=» 2 P IDENT TLDSEG REL 9.2 79-11-16 870105040920 P : P* B P* L 6 P************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TLDSEG = LOAD SEGMENT P* P* P*
0x1ddadc…1ddc70 Dummy {f00=0x0096, f01=0x0190, f02=»M PROCESSOR, d 0 P* USED IN TOSS MEMORY MANAGEMENT SYSTEMS. P* H P* R P EJECT TLDSEG P* t P* ~ P*********** P* ENTRIES * P*********** P* P* P ENTRY TLDSEG LOAD SEGMENT & P ENTRY TLDS15
0x1ddc70…1dde04 Dummy {f00=0x0096, f01=0x0190, f02=»* EXTERNALS * P************* P* , P* 6 0 P EXTRN PRUN TTAB ADDRESS OF RUNNING PROGRAM @ P EXTRN TDISP DISPATCHER t $ P EXTRN LKM030 LKM REQUEST ERROR & P EXTRN PAG:QB QUEUE LINK BACKWARDS P EXTRN PAG:PA PAGE ADDRESS & P
0x1dde04…1ddf98 Dummy {f00=0x0096, f01=0x018e, f02=»A TTAB SAVE AREA P EXTRN TTB:MT MMU TABLE ( P EXTRN TTB:SB SEGMENT BLOCK ADDRESS 8 2 P EXTRN QLTDSK ACTIVATE LDTASK AT ENTRY LT:DSK d P EXTRN SCTSEG SEGTAB ADDRESS $ P EXTRN SCTNOS NUMBER OF SEGMENTS & P EXTRN SCTMMP MMU TABLE PAGE ENTRY
0x1ddf98…1de12c Dummy {f00=0x0096, f01=0x0190, f02=» . P***************************************** P* : P* CONDITIONAL ASSEMBLY D P* b . P***************************************** l P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P
0x1de12c…1de2c0 Dummy {f00=0x0096, f01=0x0190, f02=» CPU852 EQU 0. t P* PCPU852 EQU 0 P* 4 * > . ** A PROGRAM VERSION USING TOSS DISC PAGING H * &* IS OBTAINED BY SETTING DSKPAG EQU 1. z * PDSKPAG EQU 1 * P* 4 P* A PROGRAM VERSION USING TOSS ASSEMBLER OVERL
0x1de2c0…1de454 (1, 347) Dummy {f00=0x0096, f01=0x0190, f02=» P********** P* TLDSEG * P********** ( P* : P* D 0 P* THIS IS THE LOAD SEGMENT LKM PROCESSOR. N P* * P* IT IS ENTERED FROM THE LKM HANDLER & P* WITH THE FOLLOWING PARAMETERS: P* 4 P* A2 = DISPATCH ADDRESS
0x1de454…1de5e8 Dummy {f00=0x0096, f01=0x0190, f02=»S) d P* ( P* IT RETURNS TO CALLING TASK WITH " P* THE FOLLOWING PARAMETERS: @ P* f > P* A7 = UNCHANGED IF SEGMENT LOADING IS SUCCESSFUL, ELSE p & P* A7 = -1 IF REQUEST ERROR, ELSE ( P* A7 = -2 IF DISC I/O ERROR, ELSE $ P
0x1de5e8…1de77c Dummy {f00=0x0096, f01=0x018e, f02=»UGH THE DISPATCHER AFTER p > P* COMPLETION, THUS NO TASK SWITCHING WILL BE PERFORMED, < P* IN PURPOSE TO MAKE THE REQUEST AS FAST AS POSSIBLE. b P* : P* WHEN REQUESTED SEGMENT IS NOT IN CORE TLDSEG WILL : P* ACTIVATE LDTASK WHICH WILL
0x1de77c…1de910 Dummy {f00=0x0096, f01=0x018e, f02=» PTLDSEG EQU * LOAD SEGMENT * P LDR A1,A7 CHECK IF SEGMENT NUMBER < 0 & P RF(N) TLDERR REQUEST ERROR? T 2 P CW A1,SCTNOS CHECK IF SEGMENT NUMBER TOO BIG x P RF(NG) TLDS00 OK? P* $ PTLDERR LDK A6,/FF INDICATE ERROR , P ABL LKM030 BR
0x1de910…1deaa4 Dummy {f00=0x0096, f01=0x0190, f02=» P LDR A3,A5 GET TTAB ADDRESS , P SLL A1,3 ADJUST FOR INDEXING IN SEGTAB , $ P AD A1,SCTSEG ADD SEGTAB ADDRESS & P ADK A2,2 UPDATE DISPATCH ADDRESS P* P IFT DSKPAG=0 $ P SUKL A15,4 ADJUST STACKPOINTER . P ST A2,4,A15 SET D
0x1deaa4…1dec38 Dummy {f00=0x0096, f01=0x0190, f02=»,TTB:SB,A3 RESET SEGMENT BLOCK ADDRESS 6 P LD A1,SEG:DS,A1 GET LOGICAL ADDRESS OF SEGMENT 0 . P* h P IFT DSKPAG=1 r $ P SUKL A15,4 ADJUST STACKPOINTER . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK P XIF P* P RF TLDS40
0x1dec38…1dedcc Dummy {f00=0x0096, f01=0x0190, f02=»ADDRESS j " P LDR* A4,A1 GET SEGMENT STATUS * P RF(N) TLDS10 SEGMENT LOADED IN CORE? 6 P ST A2,TTB:SA,A3 d P CM PRUN | P* P* ACTIVATE LOAD TASK P* 6 P CF A15,QLTDSK ACTIVATE LOAD TASK AT ENTRY LT:DSK P ABL TDISP GO TO D
0x1dedcc…1def60 Dummy {f00=0x0096, f01=0x0190, f02=»4 ADJUST STACKPOINTER . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK P* P ( P* REMOVE PAGE BLOCK FROM PAGE QUEUE Z P* P XIF P* & PTLDS15 EQU * ENTRY USED BY LDTASK P IFT DSKPAG=1 & P LDR* A2,A1 GET QUEUE LINK FORWARD
0x1def60…1df0f4 (1, 348) Dummy {f00=0x0096, f01=0x0190, f02=»F REMOVED BLK n " P STR A2,A4 UPDATE QUEUE LINKS P ST A4,PAG:QB,A2 < P XIF T P* ` P EJECT TLDSEG j P* , P* GET PAGE ADDRESS OF REQUESTED SEGMENT P* & PTLDS20 EQU * ENTRY USED BY LDTASK & P LD A1,PAG:PA,A1 GET PAG
0x1df0f4…1df288 Dummy {f00=0x0096, f01=0x0190, f02=»MMU TABLE j P* 0 P AD A3,SCTMMP POINT TO FIRST USED PAGE ENTRY , P LD A4,SCTNPE GET NUMBER OF PAGE ENTRIES P P* P* UPDATE PAGE ENTRY/ENTRIES P* PTLDS25 EQU * P SCR A2,A3 UPDATE PAGE ENTRY P SUK A4,1 ( P RF(NP
0x1df288…1df41c Dummy {f00=0x0096, f01=0x0190, f02=»* P EJECT TLDSEG P* " P* , 4 PTLDS30 ANKL A1,/300 COMPUTE CURRENT SEGMENT BASE 6 P SLL A1,2 n P OR A1,SCTLAP $ P TL TTB:MT,A5 LOAD MMU REGISTERS P* PTLDS40 EQU * P IFT ASSOLY=0 2 P ES A1,T:ACSB,A13 UPDA
0x1df41c…1df5b0 Dummy {f00=0x0096, f01=0x0190, f02=» BASE h P XIF P* P IFT CPU852=0 $ P LDR A6,A5 : $ P ML 6,TTB:SA+2,A6 RESTORE A1-A6 L $ P RTN A15 RETURN TO CALLING TASK t P XIF P* P IFT CPU852=1 $ P LD A1,TTB:SA+2,A5 RESTORE A1-A6 P LD A2,TTB:SA+4,A5
0x1df5b0…1df744 Dummy {f00=0x0096, f01=0x4048, f02=» TASK v P XIF P* P* $ P* . END 8@ D $ P ML 6,TTB:SA+2,A6 RESTORE A1-A6 L $ P RTN A15 RETURN TO CALLING TASK t P XIF P* P IFT CPU852=1 $ P LD A1,TTB:SA+2,A5 RESTORE A1-A6 P LD A2,TTB:SA+4,A5
0x1df744…1df8d8 Dummy {f00=0x0096, f01=0x2008, f02=» NT TLDSEG PREREL.9.1 780907 BOFE END 6@ B
0x1df8d8…1dfa6c Dummy {f00=0x0096, f01=0x0190, f02=»D OF QUEUE P IM 4,A4 INCREMENT TIMER P RB(N) CLK10 NOT TIME OUT? 2 P RF(Z) CLK30 TIME OUT? T P LDR* A3,A4 RELEASE TIMER r P STR A3,A6 P CF A15,FREBLK P LDR A4,A2 P CF A15,FREBLK P RB CLK20 P* P EJECT
0x1dfa6c…1dfc00 Dummy {f00=0x0096, f01=0x018e, f02=» P IFT CPU852=1 & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF H P* T P IFT CPU852=0 ^ " P MSR 8,A15 SAVE A1-A8 ON STACK t P XIF P* $ P CF A15,SWL48 SWITCH TO LEVEL 48 P INH P LD A2,2,A4 LOAD DISP BLOCK P
0x1dfc00…1dfd94 (1, 349) Opaque[0x194]
0x1dfd94…1dff28 # DirEnt {nam=»TABORT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12d8, f03=0x0000}
0x1dfd94…1dff28 IdxSect {
0x1dfd94…1dff28 f00 = 0x0096 // 0x1dfd94 @0x0
0x1dfd94…1dff28 f01 = 0x0004 // 0x1dfd96 @0x2
0x1dfd94…1dff28 gno = [ // 0x1dfd98 @0x4
0x1dfd94…1dff28 [0x00]: C0x0096.0x3.0
0x1dfd94…1dff28 [0x01]: C0x0097.0x0.0
0x1dfd94…1dff28 ]
0x1dfd94…1dff28 }
0x1dff28…1e00bc Dummy {f00=0x0096, f01=0x0190, f02=» 2 P IDENT TABORT REL 9.2 79-11-16 870105040920 P : P* B P* L 6 P************************************************* V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* " P* TABORT = ABORT I/O REQUEST P* P* P*
0x1e00bc…1e0250 Dummy {f00=0x0096, f01=0x0190, f02=»AINS THE | ( P* ABORT I/O REQUEST LKM PROCESSOR. P* < P* F P EJECT TABORT P P* h P* r P*********** | P* ENTRIES * P*********** P* P* P ENTRY TABORT P P P P* P*
0x1e0250…1e03e4 Dummy {f00=0x0096, f01=0x0190, f02=» DWTST DWT STATUS & P EXTRN DWTADR DRIVER ADDRESS BLOCK & P EXTRN DWTTAB TTAB ADDRESS IN DWT D 0 P EXTRN DWTWAT WAIT ACTIVATE INDICATOR IN DWT n " P EXTRN DWTECH ECHO DEVICE DWT ( P EXTRN ABTADR ABORT ROUTINE ADDRESS P EXTRN TENDIO END I/
0x1e03e4…1e0578 Dummy {f00=0x0096, f01=0x0190, f02=» TABORT P* P* . P***************************************** & P* X P* CONDITIONAL ASSEMBLY b P* . P***************************************** P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY
0x1e0578…1e070c Dummy {f00=0x0096, f01=0x0190, f02=»BORT * P********** P* P* * 4 P* THIS IS THE ABORT I/O REQUEST LKM PROCESSOR. 4 P* l * P* IT IS ENTERED FROM THE LKM HANDLER v & P* WITH THE FOLLOWING PARAMETERS: P* P* A5 = TTAB ADDRESS P* A8 = ECB ADDRE
0x1e070c…1e08a0 Dummy {f00=0x0096, f01=0x0190, f02=»AT MADE THE I/O REQUEST. THUS I/O WITH WAIT CAN P* NOT BE ABORTED. 8 P* T P* ^ PTABORT EQU * h P IFT MMUPAG=0 | & P LDR* A3,A8 GET FIRST WORD OF ECB P XIF P* P IFT MMUPAG=1 $ P ELR A3,A8 GET FIRST WORD OF ECB
0x1e08a0…1e0a34 (1, 350) Dummy {f00=0x0097, f01=0x0190, f02=» P RF(Z) TABOER DWT UNKNOWN? P* & P EJECT TABORT 0 P* H P* R P CW A5,DWTTAB,A6 P RF(NE) TABOER ILLEGAL TASK? t P LD A7,DWTST,A6 " P RF(N) TABOER DEVICE NOT BUSY? P SLC A7,2 $ P RF(NN) TABO20 NOT ECHO REQUEST?
0x1e0a34…1e0bc8 Dummy {f00=0x0097, f01=0x018e, f02=»RESS BLOCK f 8 P LD A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) , P RF(Z) TABO10 NO SPECIAL ABORT ROUTINE? N & P CFR A15,A2 PERFORM ABORT ROUTINE ~ P* PTABO10 EQU * $ P CF A15,TENDIO ABORT ECHO DEVICE P LDR A6,A8 RESTORE DWT
0x1e0bc8…1e0d5c Dummy {f00=0x0097, f01=0x0190, f02=» n : P CF A15,FREBLK I/O AND ACTIVATE. FREE DISPATCHER BLOCK " P CM DWTWAT,A6 INDICATE NO WAIT F P* l PTABO30 EQU * v 8 P LD A2,DWTADR,A6 GET ADDRESS TO DRIVER ADDRESS BLOCK 8 P LD A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) , P RF(Z)
0x1e0d5c…1e0ef0 Dummy {f00=0x0097, f01=0x40c8, f02=»CODE z P CF A15,TENDIO ABORT 0 P ABL LKMQDI QUEUE TASK AND GO TO DISPATCHER ( P* 0 PTABOER ABL LKMRQE GO AND INDICATE LKM ERROR f P* P* P* P END @ D A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) , P RF(Z)
0x1e0ef0…1e1084 Dummy {f00=0x0097, f01=0x2008, f02=»
0x1e1084…1e1218 Dummy {f00=0x0097, f01=0x0190, f02=»,TTB:SB,A3 RESET SEGMENT BLOCK ADDRESS 6 P LD A1,SEG:DS,A1 GET LOGICAL ADDRESS OF SEGMENT 0 . P* h P IFT DSKPAG=1 r $ P SUKL A15,4 ADJUST STACKPOINTER . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK P XIF P* P RF TLDS40
0x1e1218…1e13ac Dummy {f00=0x0097, f01=0x0190, f02=»ADDRESS j " P LDR* A4,A1 GET SEGMENT STATUS * P RF(N) TLDS10 SEGMENT LOADED IN CORE? 6 P ST A2,TTB:SA,A3 d P CM PRUN | P* P* ACTIVATE LOAD TASK P* 6 P CF A15,QLTDSK ACTIVATE LOAD TASK AT ENTRY LT:DSK P ABL TDISP GO TO D
0x1e13ac…1e1540 Dummy {f00=0x0097, f01=0x0190, f02=»4 ADJUST STACKPOINTER . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK P* P ( P* REMOVE PAGE BLOCK FROM PAGE QUEUE Z P* P XIF P* & PTLDS15 EQU * ENTRY USED BY LDTASK P IFT DSKPAG=1 & P LDR* A2,A1 GET QUEUE LINK FORWARD
0x1e1540…1e16d4 (1, 351) Opaque[0x194]
0x1e16d4…1e1868 # DirEnt {nam=»TASS «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12e8, f03=0x0000}
0x1e16d4…1e1868 IdxSect {
0x1e16d4…1e1868 f00 = 0x0097 // 0x1e16d4 @0x0
0x1e16d4…1e1868 f01 = 0x000c // 0x1e16d6 @0x2
0x1e16d4…1e1868 gno = [ // 0x1e16d8 @0x4
0x1e16d4…1e1868 [0x00]: C0x0097.0x1.0
0x1e16d4…1e1868 [0x01]: C0x0097.0x2.0
0x1e16d4…1e1868 [0x02]: C0x0097.0x3.0
0x1e16d4…1e1868 [0x03]: C0x0098.0x0.0
0x1e16d4…1e1868 [0x04]: C0x0098.0x1.0
0x1e16d4…1e1868 [0x05]: C0x0098.0x2.0
0x1e16d4…1e1868 ]
0x1e16d4…1e1868 }
0x1e1868…1e19fc Dummy {f00=0x0097, f01=0x0190, f02=» 0 P IDENT TASS REL 9.2 79-11-16 870105040920 P 8 P =1, PR 4313 @ P* REL 9.1 78-10-25 V P r P* z P* 8 P**************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P*
0x1e19fc…1e1b90 Dummy {f00=0x0097, f01=0x0190, f02=»**************************** x P* $ " P* THIS MODULE IS ENTERED VIA . $ P* ASSIGN REQUEST (DATA 15) OR T ( P* ASSIGN INDEX REQUEST (DATA 16). | P* P* LDK A7,TC P* LDKL A8,ASBLK P* LKM P* DATA 15 P
0x1e1b90…1e1d24 Dummy {f00=0x0097, f01=0x018e, f02=»K IS A PARAMETER BLOCK z D P* AND TC = 1 WHEN TASK LOCAL ASSIGN IN TTAB IS WANTED B P* TC = 0 WHEN GLOBAL ASSIGN IN SCTCDT IS WANETED f P* P EJECT P* +----------+----------+ $ P* ASBLK I NO OF VOL FC I
0x1e1d24…1e1eb8 Dummy {f00=0x0097, f01=0x0190, f02=» t . P* I I P* +---------------------+ : P* I I P* I VOL NAME I ~ P* I I P* +---------------------+ P* I I P*
0x1e1eb8…1e204c Dummy {f00=0x0097, f01=0x018e, f02=»* CREATED IN TTAB/CD:TAB. P* $ F P* THE FDB IS INITIALIZED WITH INFORMATION FROM THE VTOC:S OF THE . $ P* VOLUMES MENTIONED IN ASBLK. x P* J P* UPON COMPLETION OF THE ASSIGN REQUEST REG A7 WILL HAVE ONE OF THE P* FOLLOWING RE
0x1e204c…1e21e0 Dummy {f00=0x0097, f01=0x0190, f02=» x " P* 2 = NO FREE ENTRY IN TABLE P* 3 = NO FDB AVAILABLE . ( P* 4 = ONE OR MORE VOLUMES UNKNOWN N " P* 5 = FILE CODE ALREADY USED z P* 6 = FILE NAME UNKNOWN 0 P* 7 = FILE SECTION MISSING OR FOUND TWICE P* 8 = FAULTY DIS
0x1e21e0…1e2374 (1, 352) Dummy {f00=0x0097, f01=0x0190, f02=»K P* LKM P* DATA 16 P* 0 " P* INPUT A5 = TTAB ADDRESS : " P* A8 = ASBLK ADDRESS ` 0 P* WHERE ASBLK IS A PARAMETER BLOCK P* +----------+----------+ $ P* ASBLK I NO OF VOL FC I P* +
0x1e2374…1e2508 Dummy {f00=0x0097, f01=0x0190, f02=»---------------------+ P* I I P* I VOL NAME I @ P* I I b P* +---------------------+ $ P* I MASTER INDEX " P* I FILE NAME P* D P* UPON C
0x1e2508…1e269c Dummy {f00=0x0097, f01=0x0190, f02=»ORMED j P* -1 = REQUEST ERROR P* 1 = DISC I/O ERROR , " P* 2 = NO FREE ENTRY IN TABLE J 8 P* 3 = NO FDB AVAILABLE OR MASTER INDEX CORE AVAIL p ( P* 4 = ONE OR MORE VOLUMES UNKNOWN " P* 5 = FILE CODE ALREADY USED P* 6 = FI
0x1e269c…1e2830 Dummy {f00=0x0097, f01=0x0190, f02=»S EXIST v " P* 10= NO DATA FILE ASSIGNED * P* 11= 4 INDEX FILES ALREADY ASSIGNED 6 $ P* 12= MAX KEY LENGTH TOO SMALL d 0 P* 13= REQUEST BUSY. REPEAT ASSIGN REQUEST P EJECT P* P*************** P* ENTRIES * P
0x1e2830…1e29c4 Dummy {f00=0x0097, f01=0x0190, f02=»TTA P ENTRY TASASB P ENTRY TASCVO " P ENTRY TASVOL 8 P ENTRY TASCXO N P ENTRY TASSEX d P ENTRY TASXLB z P ENTRY TASFDB P ENTRY TASVRL P ENTRY TASVLE P ENTRY TASVRN P ENTRY TASECB & P ENTRY TAS
0x1e29c4…1e2b58 Dummy {f00=0x0097, f01=0x0190, f02=»HLT HALT SYSTEM DUE TO DM (SYSGEN) ERROR P EJECT 0 P* > P***************** H P* EXTERNALS * b P***************** | P* P EXTRN DFTAB P EXTRN DFTABE P EXTRN SCTCDT P EXTRN DWTVOL P EXTRN FNDTID
0x1e2b58…1e2cec Dummy {f00=0x0097, f01=0x0190, f02=» TTB:TD,DMTASX P EXTRN ECBFC,ECBRC 0 P EXTRN MOV:US MOVE FROM USER TO SYSTEM AREA 0 $ P EXTRN HALT HALT SYSTEM ROUTINE d P EJECT TOSSIO P* P* . P***************************************** P* P* CONDITIONAL ASSEMB
0x1e2cec…1e2e80 Dummy {f00=0x0097, f01=0x018e, f02=»BTAINED BY SETTING MMUPAG EQU 1. P* ( PMMUPAG EQU 1 2 P* F P EJECT P P* ^ P******************* h P* DATA AREAS * P******************* P* PTASBLK DATA 0 USE INDICATOR $ PTASQUE DATA 0 ASSIGN QUEUE ANC
0x1e2e80…1e3014 (1, 353) Dummy {f00=0x0097, f01=0x018e, f02=» 0 PTASVOL DATA 0 VOLUME IDENTIFICATION (DMI,FC) " P DATA 0,0,0 THREE MORE ENTRIES 8 6 PTASCXO DATA 0 CURRENT OFFSET IN TASSEX AND TASXLB ^ 0 PTASSEX DATA 0 SECTION NUMBER, EXTENT NUMBER * P DATA 0 OFFSET IN TASVOL FOR THIS EXT ( P DATA 0,0,0,0,
0x1e3014…1e31a8 Dummy {f00=0x0097, f01=0x0190, f02=» PTASFDB DATA 0 FDB ADDRESS $ PTASVRL DATA 0 VTOC RECORD LENGTH & PTASVLE DATA 0 VTOC LENGTH N PTASVRN DATA 0 VTOC RECORD NO p PTASECB DATA 0,0 ECBFC,ECBBA P DATA 410 ECBRL P DATA 0,0,0 ECBEL,-RC,-CW P DATA 0 CW2 0 PTA
0x1e31a8…1e333c Dummy {f00=0x0097, f01=0x0190, f02=»TASSPW DATA 0 TTAB ADDRESS DMTASK $ PTASFDD DATA 0 FDB ADDR DATA FILE * ( PTASTBE DATA 0 TTAB/SCTCDT ENTRY ADDR R 2 PTASLFD DATA 0,0 LOCKED FLEXDISC FILE CODES =1 ~ P DATA 0,0 P DATA 0,0 " PTASS14 EQU *-2 TASS A14 STACK P* P
0x1e333c…1e34d0 Dummy {f00=0x0097, f01=0x0190, f02=» * P************** P* , P* ENTRY TASCAQ CHECK ASSIGN QUEUE * P* Z P* A7= RETURN CODE d P* * P* SET OFF USE BIT IN TASBLK H P* IF TASQUE = 0 THEN RETURN ELSE QUEUE FIRST IN CHAIN AND 2 P
0x1e34d0…1e3664 Dummy {f00=0x0097, f01=0x0190, f02=»QUE P RF(Z) TASCEX EMPTY QUEUE " P LDR* A1,A5 GET NEXT IN CHAIN . , P ST A1,TASQUE AND PUT IT FIRST IN QUEUE T P LDKL A1,-4 ( P ADS A1,TTB:SA,A5 UPD DISPATCH ADDR P CF A15,QTJOB NEXT ASSIGN P RF TASC05 & PTASCEX CM TASQUE
0x1e3664…1e37f8 Dummy {f00=0x0097, f01=0x0190, f02=» CODE IN SAVED A7 r P RTN A14 P EJECT * 8 P****DESCRIPTION************************************* 8 P* t : P* VOLCHE WILL COMPARE EACH VOLUME NAME IN ASBLK WITH ~ & P* VOLUME NAMES IN DWT FOR DISCS P* 8 P****ENTRY PARAMETERS****
0x1e37f8…1e398c Dummy {f00=0x0097, f01=0x0190, f02=»S WANTED. v : P* 1 LOCK WANTED. ONLY FROM DMTASS FOR FLEXDISC P* P 8 P****EXIT PARAMETERS********************************* Z P* P* A1 = 0 OK P* 1 VOLUME UNKNOWN P* A5 = TTAB ADDR P* 8 P****USED REG
0x1e398c…1e3b20 Dummy {f00=0x0097, f01=0x0190, f02=»************** h PVOLCHE EQU * P CM TASLFD =1 * $ P CM TASLFD+2 LOCKED FLEXDISCS =1 @ P SLL A2,1 h P SUK A2,2 z 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
0x1e3b20…1e3cb4 (1, 354) Dummy {f00=0x0098, f01=0x0190, f02=» ADDRESS IN CD:TAB AND COMPARE DWTVOL P* . P LD* A6,SCTCDT 8 PTAS130 SUK A6,4 N 2 P RF(N) TASHLT FC NOT FOUND? SHOULD NOT OCCUR. f P LD A5,SCTCDT P ADR A5,A6 P CC A1,1,A5 P RB(NE) TAS130 NOT THIS FC P LDR A11,A11
0x1e3cb4…1e3e48 Dummy {f00=0x0098, f01=0x0190, f02=» P* LOCK FLEXDISC P* P LDKL A8,TASECB ( " P ST A1,ECBFC,A8 FLEX FILE CODE @ P SUR A12,A12 f P LDK A7,/A6 LOCK,WAIT z P LKM P DATA 1 P LD A7,ECBRC,A8 P RF(Z) TAS131 P ANKL A7,/7FFF " P RF(NZ) TASF10 N
0x1e3e48…1e3fdc Dummy {f00=0x0098, f01=0x0190, f02=»NZ) TAS150 GRAVE ERR PTAS131 EQU * P ST A1,TASVOL,A2 SAVE FC 0 P P P AD A6,SCTCDT X P LDR* A5,A6 INDEX n $ P LDK A1,0 DISC NAME DISPLACEMENT P SRL A5,8 P RF(Z) TAS135 , P* DECIDE DISC DISPL FOR THIS FILE CODE $ P
0x1e3fdc…1e4170 Dummy {f00=0x0098, f01=0x0190, f02=»AS132 PTAS135 EQU * P LD A6,2,A6 DWT ADDR " & P RF(Z) TASHLT NO DWT ADDRESS FOUND > & P ADR A6,A1 POINTER TO VOLUME NAME h P LDK A1,3 VOL NAMES 3 WORDS & P LDR A5,A4 POINTER ASBLK VOL NAME P* , P* CHECK VOLUME NAMES IN DWT
0x1e4170…1e4304 Dummy {f00=0x0098, f01=0x0190, f02=»2 P SUK A1,1 . P RB(P) TAS140 CHECK NEXT WORD IN VOL NAME P* N P* VOL NAME MATCH X P* STORE DMI , FC IN TASVOL r P* P LD A1,TASVOL,A2 P ANK A1,/0F P CWK A1,/8 $ P RF(L) TAS143 NOT FLEXIBLE DISC P L
0x1e4304…1e4498 Dummy {f00=0x0098, f01=0x0190, f02=» t P* 1 FOR DRIVE 2 " P* 2 FOR FLEXDISC , P* R P SC A1,TASVOL,A2 P* t 6 P* SAVE FILE CODES FOR NEWLY LOCKED FLEXDISCS =1 ~ 2 P* (ONLY SIGNIFICANT WHEN A11 = 1 ) =1 START P* P SUK A1,2
0x1e4498…1e462c Dummy {f00=0x0098, f01=0x0190, f02=»,TASVOL+1,A2 FILE CODE P SC A3,TASLFD,A1 SAVE PTAS147 EQU * =1 END < P* X P* CHECK NEXT VOL IN ASBLK b P* P LDK A1,0 RET CODE P ADK A4,6 P SUK A2,2 ( P RB(NN) TAS110 MORE VOLUMES TO CHECK * P RF TAS155 OK
0x1e462c…1e47c0 Dummy {f00=0x0098, f01=0x0190, f02=» P ANK A1,/F8 P SUK A1,/F8 P RF(NZ) TAS150 NO FLEXDISC , P LDR A12,A12 LFLAG N P RF(NZ) TAS150 LOCKED BEFORE h P* P* UNLOCK P* P LDK A7,/B8 UNLOAD,WAIT P LKM P DATA 1 P* & P* NO MATCH TRY
0x1e47c0…1e4954 (1, 355) Dummy {f00=0x0098, f01=0x0190, f02=» LDK A1,1 PTAS155 EQU * P RTN A14 & P* 6 ( PTASHLT LDK A1,/11 INDICATE DM ERROR @ P CF A15,HALT HALT SYSTEM l P* P EJECT P* P************ P* TASS * P************ P* PIXTASS EQU * P
0x1e4954…1e4ae8 Dummy {f00=0x0098, f01=0x0190, f02=» A7,A8 GET FIRST WORD OF USER ASSIGN BLOCK $ P ANK A7,/FF SKIP LEFT CHARACTER 2 0 P ORKL A7,/8100 BIT 0+7 IND. ASSIGN ONE INDEX Z ( P ESR A7,A8 SET WORD IN ASSIGN BLOCK P XIF P*~ ( P LDK A7,0 ONLY GLOBAL ASSIGN ALLOWED P* PTA
0x1e4ae8…1e4c7c Dummy {f00=0x0098, f01=0x0190, f02=»NOT COMPLETED t 4 P* AND IF SO QUEUE THIS REQUEST VIA THE TASQUE P* N P LD A1,TASBLK X & P RF(Z) TAS050 NO CONCURRENT ASSIGN n * P LDKL A1,TASQUE START OF ASSIGN QUEUE ( PTAS020 EQU * QUEUE AS FOR GETBUFFER P LDR A2,A1 P LDR
0x1e4c7c…1e4e10 Dummy {f00=0x0098, f01=0x0190, f02=»QU * & P IM TASBLK INDICATE ASSIGN STARTED ! " P CM TASFDD FDB ADDR DATA FILE ! 6 P* ! 6 P ST A5,TASTTA SAVE TTAB ADDRESS OF REQUESTING TASK ! f P* ! P IFT MMUPAG=1 ! P* ! 2 P* MOVE USER ASSIGN BLOCK TO SYSTEM AREA MASBLK ! P* ! ,
0x1e4e10…1e4fa4 Dummy {f00=0x0098, f01=0x0190, f02=»BLOCK ADDRESS ! p , P LDK A3,34 ASSIGN BLOCK LENGTH IN BYTES " $ P CF A14,MOV:US MOVE ASSIGN BLOCK " F P XIF " n P* " z $ P ST A8,TASASB SAVE ASBLK ADDRESS " P* " P LDK A1,16 " : P ST A1,TASCXO INIT. TASCXO TO LAST ENTRY IN TASSEXXLB " P*
0x1e4fa4…1e5138 Dummy {f00=0x0098, f01=0x0190, f02=» " P LCR A2,A8 NO OF VOLUMES # . P ANK A2,/1F REMOVE INDEX BIT +DELAY+BASIC # ( P RF(Z) TAS090 NO VOL # Z P CWK A2,4 # v P RF(NG) TAS100 <=4 # PTAS090 RF TASSEM # P EJECT # P* # $ P* CHECK IF VOLUMES ARE ON LINE # P* # PTAS1
0x1e5138…1e52cc Dummy {f00=0x0098, f01=0x0190, f02=»1,0 SET CR # $ P RF(Z) TAS160 ALL VOLUMES FOUND $ P* $ : , P* ALL VOL NOT FOUND. ACT FLEXDISCTASK $ D P* $ t P LD A1,TASCVO $ ~ P LDK A2,2 ID DMTASK FLEXDISC $ P SC A2,TASVOL,A1 SEE TAS195 $ P EJECT $ P* $ , P* CHECK IF FILE CO
0x1e52cc…1e5460 Dummy {f00=0x0098, f01=0x0190, f02=»D $ j P LDR A10,A10 TC % P RF(Z) TAS165 GLOBAL ASSIGN % " P LD A2,TASTTA TTAB ADDR % F P LDR A4,A2 % f P LD A2,TTB:TD,A4 % x P ADKL A4,TTB:TD+1 % P RF TAS170 % PTAS165 EQU * % P LD A4,SCTCDT % P LDR* A2,A4 % P ADK A4,1 %
0x1e5460…1e55f4 (1, 356) Dummy {f00=0x0098, f01=0x0190, f02=»S170 NO MATCH % P* & P* FILE CODE USED & . P* OK WHEN REQ = ASS INDEX AND INDEX = 1 & : P* & l P LDR* A2,A8 ASBLK 1ST WORD & v P RF(NN) TASSE5 NORMAL ASSIGN & P LDK A2,1 & P CC A2,-1,A1 INDEX & * P RF(NE) TASSE5 FILE CODE ALREADY
0x1e55f4…1e5788 Dummy {f00=0x0098, f01=0x0190, f02=»* & P* ' > P* FIND A FREE ENTRY IN TTAB/CD:TAB (FC AND DWTADR = 0 ) ' P* ' V PTAS180 EQU * ' ` P LDK A1,0 ' t P LDR A10,A10 TC ' P RF(Z) TAS185 GLOBAL ASSIGN ' P LD A2,TASTTA TTAB ADDR ' P LDR A4,A2 ' P LD A2,TTB:TD,A4 '
0x1e5788…1e591c Dummy {f00=0x0098, f01=0x0190, f02=»UK A2,4 ' ( P RF(L) TASSE2 NO FREE ENTRY IN TABLE ( P LDR A9,A4 ( < P ADR A9,A2 ( N P CCR A1,A9 FILE CODE ( ` " P RB(NE) TAS190 FC NOT EQUAL 0 ( | P CW A1,1,A9 ( & P RB(NE) TAS190 DWTADR NOT EQUAL 0 ( P LDR* A1,A8 ASBLK 1ST WORD ( P RF(N)
0x1e591c…1e5ab0 Dummy {f00=0x0098, f01=0x0190, f02=»Y ( f P ST A9,TASTBE SAVE ENTRY ) P* ) * 0 P* GET FIRST VOLUME AND ACTIVATE ITS DMTASK ) 4 P* ) h P LD A1,TASCVO ) r P LDK A7,0 ) P LC A7,TASVOL,A1 ) P ADKL A7,'#D' TID DMTASK ) P CF A15,FNDTID ) " P LDR A5,A2 TTAB ADDRESS DMTASK )
0x1e5ab0…1e5c44 Dummy {f00=0x0098, f01=0x0190, f02=»RY ) | P LDK A7,4 VOL UNKNOWN * P RF TASSEM * ( PTAS200 EQU * * : P LDK A2,2 * N 4 P ST A2,TASFIL MASTER INDEX LOOP IDENT IN DMTSAK * ` & P LDKL A2,DMTASS ASSIGN INDEX ENTRY * P LDR* A6,A8 * P RF(N) TAS210 INDEX ASSIGN * P CM TASFIL *
0x1e5c44…1e5dd8 Dummy {f00=0x0098, f01=0x4182, f02=»F A15,ACTOT ACTIVATE DMTASK * P ABL TDISP GO TO DISPATCHER + $ P EJECT + H P* + V P* ERROR RETURNS + ` P* + z PTASSE5 ADK A7,1 + PTASSE4 ADK A7,1 + PTASSE3 ADK A7,1 + PTASSE2 ADK A7,1 + PTASSE1 ADK A7,1 + P ADK A7,1 +
0x1e5dd8…1e5f6c Dummy {f00=0x0098, f01=0x2008, f02=» ,
0x1e5f6c…1e6100 Dummy {f00=0x0098, 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* +
0x1e6100…1e6294 (1, 357) Opaque[0x194]
0x1e6294…1e6428 # DirEnt {nam=»TIODM «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1318, f03=0x0000}
0x1e6294…1e6428 IdxSect {
0x1e6294…1e6428 f00 = 0x0098 // 0x1e6294 @0x0
0x1e6294…1e6428 f01 = 0x000c // 0x1e6296 @0x2
0x1e6294…1e6428 gno = [ // 0x1e6298 @0x4
0x1e6294…1e6428 [0x00]: C0x0098.0x3.0
0x1e6294…1e6428 [0x01]: C0x0099.0x0.0
0x1e6294…1e6428 [0x02]: C0x0099.0x1.0
0x1e6294…1e6428 [0x03]: C0x0099.0x2.0
0x1e6294…1e6428 [0x04]: C0x0099.0x3.0
0x1e6294…1e6428 [0x05]: C0x009a.0x0.0
0x1e6294…1e6428 ]
0x1e6294…1e6428 }
0x1e6428…1e65bc Dummy {f00=0x0098, f01=0x0190, f02=» 0 P IDENT TIODM REL 9.2 79-11-16 870105040920 P 8 P =1, PR 5649 @ P REL 9.1 79-05-23 V P* r 8 P**************************************************** | P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P* TIODM = DATA MA
0x1e65bc…1e6750 Dummy {f00=0x0098, f01=0x018e, f02=»******** d P* B P* THIS MODULE IS ENTERED IN THE SAME WAY AS A DRIVER VIA TIO . P* AND THE DWTADR IN FDB FOR CURRENT FILE ` P* H P* THE DM REQUEST IS PROCESSED HERE UP TO THE POINT WHERE A SECTOR $ P* FROM A DISC MUST BE ACCESSED
0x1e6750…1e68e4 Dummy {f00=0x0098, f01=0x0190, f02=» P* A7 = ORDER P* A8 = ECB ADDRESS " P* F P* USED REGISTERS A1 - A10 P P* t D P* BEFORE EXIT A DMTASK IS ACTIVATED WITH THE FDB ADDRESS IN A1 ~ P* AS THE ONLY PARAMETER P* 4 P* THE FOLLOWING WORD
0x1e68e4…1e6a78 Dummy {f00=0x0098, f01=0x0190, f02=» FOR CALLING TASK x . P* FDBCEX CURRENT EXTENT BLOCK POINTER P* L P* V D P* IF AN ERROR CONDITION IS DETECTED THE ERROR RETURN WILL BE: ` P* LDKL A1,/<RETURN CODE> P* ABL DISEND P* P* P EJECT P
0x1e6a78…1e6c0c Dummy {f00=0x0098, f01=0x0190, f02=»DBLNK P ENTRY FDBECB P ENTRY FDBSNR $ P ENTRY FDBRRO : P ENTRY FDBRLE P P ENTRY FDBBLF f P ENTRY FDBTNR | P ENTRY FDBVTO P ENTRY FDBCEX P ENTRY FDBEXT P ENTRY EXTDMI P ENTRY EXTFC P ENTRY EXT
0x1e6c0c…1e6da0 Dummy {f00=0x0098, f01=0x0190, f02=»NTRY FDBAI1,CRNTID,CRNCDF,CRNCIF P ENTRY FDBMRN,FDBDBR,FDBMRO ( & P ENTRY FDBMEC MMU ECB DISPLACEMENT L 6 P ENTRY FDBKEY SAVE AREA FOR KEY IN INDEXED ACCESS v P EJECT P* P***************** P* EXTERNALS * P************
0x1e6da0…1e6f34 (1, 358) Dummy {f00=0x0099, f01=0x0190, f02=» P EXTRN DISEND EXTRN DWTECB ECB ADDRESS $ EXTRN DWTOR DWT INDEX AND ORDER < & P EXTRN DWTTDM DM TASK TTAB ADDRESS d P EXTRN TTB:ID TASK ID 0 P EXTRN MOV:US MOVE FROM USER TO SYSTEM AREA " P EXTRN DMTGCA GET CRN ADDRESS , P E
0x1e6f34…1e70c8 Dummy {f00=0x0099, f01=0x0190, f02=» ECBRL P EXTRN ECBEL P EXTRN ECBRC " P EXTRN ECBCW 6 & P EXTRN ECBCW2 SECOND CONTROL WORD J P EXTRN FDBLEN t " P EXTRN SQR SEQ READ ORDER CODE & P EXTRN EARELB,DWTST,CRNGET,EATEST & P EXTRN TASHLT HALT SYSTEM ROUTINE P EJE
0x1e70c8…1e725c Dummy {f00=0x0099, f01=0x0190, f02=»* A VERSION CONTAINING INDEXED REQUEST ORDERS IS OBTAINED P* BY SETTING INDXAC EQU 1 D * P* INDXAC EQU 0 OTHRERWISE h PX:A EQU 0 PINDXAC EQU 00000 P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINE
0x1e725c…1e73f0 Dummy {f00=0x0099, f01=0x0190, f02=»TA DEFINITIONS * P************************ P* : P* D P DATA 0,0 4 WORDS N P DATA 0,0 h " PTIOD14 EQU *-2 TIODM A14 STACK z P* P* & PTIODMF EQU * TIODM FUNCTION TABLE P DATA CLOSE CLOSE " P DATA REVTOC REA
0x1e73f0…1e7584 Dummy {f00=0x0099, f01=0x0190, f02=»DELETE | P DATA IXREWR INDEXED REWRITE $ P DATA IXRARE INDEXED RANDOM READ 2 P XIF Z P IFF INDXAC=1 f P DATA TIODME | P DATA TIODME P DATA TIODME P DATA TIODME P DATA TIODME P XIF P DATA RANDEL RANDOM DELETE
0x1e7584…1e7718 Dummy {f00=0x0099, f01=0x0190, f02=» SEQUENTIAL WRITE " P DATA SEQREAD SEQUENTIAL READ P DATA GETCUR GET CURRENCY @ P IFT INDXAC=1 b $ P DATA INSIXR INSERT INDEX RECORD x $ P DATA DELIXR DELETE INDEX RECORD P XIF P IFF INDXAC=1 P DATA TIODME P DATA TIOD
0x1e7718…1e78ac Dummy {f00=0x0099, f01=0x0190, f02=»LETE r $ P DATA RANREB RAND READ REL BUFF P DATA SETLRN SET LRN 4 P* P P* Z PTIODMO EQU * DM ORDERS d $ P DATA /221E CLOSE,IND READ NEXT & P DATA /1D1C IND INSERT,IND DELETE . P DATA /1B1A INDEXED REWRITE,IND RAND READ $ P D
0x1e78ac…1e7a40 Dummy {f00=0x0099, f01=0x0190, f02=»SEQ WR. , BASIC WRITE $ P DATA /0302 READ VTOC, SEQ READ ( P DATA /0123 BASIC READ,GET CURRENCY F * P DATA /1F20 INS INDEXREC,DEL INDEXREC r . P DATA /240D GET CURR INDEX,DELAYED RAND WR 0 P DATA /0E0F DELAY RAN DEL,RAN READ REL BUFF P D
0x1e7a40…1e7bd4 (1, 359) Dummy {f00=0x0099, f01=0x0190, f02=»ATA /0E10 P DATA /1214 P DATA /1616 & P DATA /1616 : P DATA /0218 N P DATA /181A b P DATA /1C1E v P DATA /2022 P DATA /2426 P DATA /281A SET LRN P* $ PNOOFOR EQU 25 NO OF ORDER CODES P*
0x1e7bd4…1e7d68 Dummy {f00=0x0099, f01=0x0190, f02=»RD P XIF P* P IFT MMUPAG=1 PSTART EQU DWTDRD+4 6 P XIF P P* P* f P* FDB OFFSET DEFINITIONS p P* " PFDBLNK EQU 0 LINK TO NEXT FDB PFDBECB EQU START+2 ECB START & PFDBSNR EQU START+16 SECTOR NUMBER
0x1e7d68…1e7efc Dummy {f00=0x0099, f01=0x0190, f02=» l 0 PFDBTNR EQU START+23 TASK NUMBER CALLING TASK & PFDBVTO EQU START+24 VTOC RECORD NO < 4 PFDBCEX EQU START+26 CURRENT EXTENT BLOCK POINTER f 0 PFDBEXT EQU START+28 FIRST EXTENT BLOCK START PEXTDMI EQU 0 DMTAST IDENT PEXTFC EQU 1 VOLUME F
0x1e7efc…1e8090 Dummy {f00=0x0099, f01=0x0190, f02=»+53 LAST RECORD NUMBER * PFDBNIF EQU START+52 NO OF INDEX FILES $ PFDBEAL EQU START+56 EA LINK ROOT L & PFDBCRL EQU START+58 CRN LINK ROOT t 0 PFDBKA EQU START+60 KEY ADDRESS IN DATA FILE 0 PFDBMIA EQU START+62 ADDRESS OF MASTER INDEX 0 PFD
0x1e8090…1e8224 Dummy {f00=0x0099, f01=0x0190, f02=»AND REL BUFFER FLAGS p , PFDBMRN EQU START+75 LAST REC NR IN FILE " PFDBMRO EQU START+78 MAX FDBRRO L , PFDBMEC EQU START+80 MMU ECB DISPLACEMENT r < PFDBKEY EQU START+94 SAVE AREA FOR KEY IN INDEXED ACCESS P* & P* CRN BUFFER OFFSET DEFINI
0x1e8224…1e83b8 Dummy {f00=0x0099, f01=0x0190, f02=» P EJECT P* P************* P* TIODM * 2 P************* H P* ^ P* h ( P DATA 0 DATA MANAGEMENT DEVICE INDEX r & PTIODM DATA *+2 TIODM START ADDRESS P* P* SET UP A14 STACK P* P LDKL A14,TIOD14
0x1e83b8…1e854c Dummy {f00=0x0099, f01=0x018e, f02=» A1,A2 P LD A3,2,A1 P CW A3,DWTTDM,A6 " P RF(E) TIOD10 THIS TASK : P ADK A2,2 NO Z P RB TIOD05 TRY NEXT n PTIOD10 EQU * P LC A1,TTB:ID,A3 GET TASK ID P CCK A1,'##' ( P RF(E) TIO13 JUMP IF DMTASK CALLING P*
0x1e854c…1e86e0 Dummy {f00=0x0099, f01=0x0190, f02=» P LDKL A4,/4000 REQ BUSY BIT PTIO11 EQU * ( P SUK A3,2 < P RF(N) TIO13 ALL FDB READY N P LDR* A5,A1 FDB ADDR p P RF(E) TIO12 NO FDB P SC A2,FDBTNR,A5 TASK ID " P ORS A4,DWTST,A5 REQ BUSY BIT PTIO12 EQU * P ADK A
0x1e86e0…1e8874 (1, 360) Dummy {f00=0x0099, f01=0x0190, f02=»R IN A7 , P* PUT ORDER INDEX IN DWTOR RIGHT BYTE P* @ P LDKL A1,/8000 REQUEST ERROR J & P LDK A2,NOOFOR-1 NO OF ORDERS - 1 n 2 PTIOD15 CC A7,TIODMO,A2 START AT END OF TIODMO P RF(E) TIOD20 MATCH P SUK A2,1 P RB(NN) TIOD
0x1e8874…1e8a08 Dummy {f00=0x0099, f01=0x0190, f02=»BI TIODMF,A2 BRANCH TO DM FUNCTION P EJECT * P* 8 $ PIXRARE EQU * INDEXED RANDOM READ B P LD A3,ECBCW2,A8 =1 j P ANK A3,/FF REQ KEY LGTH =1 P LD A4,FDBRLE,A6 =1 P SUK A4,6 MAX LGTH =1 P CWR A3,A4 =1 P RF(NG) IXRAR1
0x1e8a08…1e8b9c Dummy {f00=0x0099, f01=0x0190, f02=»GET USER KEY ADDRESS 0 P LDK A2,FDBKEY GET FDB KEY AREA DISPLACEMENT P ADR A2,A6 ADD FDB ADDRESS P P* =1 r 2 P CF A14,MOV:US MOVE KEY FROM USER TO FDB AREA P XIF P* $ PDELIXR EQU * DELETE INDEX RECORD P* $ PINSIXR E
0x1e8b9c…1e8d30 Dummy {f00=0x0099, f01=0x018e, f02=»U * CLOSE A FILE P LDK A4,0 PTIOC10 EQU * * $ P ST A4,FDBRRO,A6 MARK ORDER TYPE > P LDK A2,0 f , P ST A2,FDBSNR,A6 SECTOR #0 VOLUME LABLE x P* ( P* LET FDBCEX POINT TO FIRST EXTENT P* P LDR A4,A6 P ADK A4,FDBEXT
0x1e8d30…1e8ec4 Dummy {f00=0x0099, f01=0x0190, f02=» P LDR A1,A6 FDB ADDR 0 P LDKL A2,/C000 REMOVE BUFFERS FOR THIS TASK P CF A14,EARELB T PREL090 EQU * j P LDK A1,0 CORRECT RETURN ~ P ABL TIODME P EJECT ( PSETLRN EQU * SET LAST RECORD NUMBER P LC A1,ECBCW+3,A8 P S
0x1e8ec4…1e9058 Dummy {f00=0x0099, f01=0x0190, f02=»DATA REC p P RF GET010 . PGETCUX LDK A7,CRNCIF+1 GET CURR INDEX REC " PGET010 LDR A1,A6 FDB ADDR T " P CF A14,CRNGET GET CRN BUFFER v P ADR A7,A2 ADDR CURR REC NO P LDK A2,0 P LC A3,-1,A7 FILE CODE P CC A3,ECBFC,A8 P
0x1e9058…1e91ec Dummy {f00=0x0099, f01=0x0190, f02=»REC NO ~ P LD A2,1,A7 PGET030 EQU * " P ST A2,ECBCW,A8 6 P RB REL090 N P EJECT ` " PSEQREAD EQU * SEQUENTIAL READ n P* $ P* FIND CRN+1 AND TEST IF > LRN P* P LDR A1,A6 FDB ADDR " P CF A14,CRNGET GET CRN-BUFFE
0x1e91ec…1e9380 Dummy {f00=0x0099, f01=0x018e, f02=»ERFLOW P RF SEQR20 PSEQR10 EQU * " P ANKL A2,/7FFF REMOVE OVERFLOW 4 P ADK A1,1 ADD CARRY Z PSEQR20 EQU * v P SC A1,ECBCW+3,A8 REC NO P ST A2,ECBCW,A8 P* $ P* CONTINUE AS FOR RANDOM READ P* P EJECT
0x1e9380…1e9514 (1, 361) Dummy {f00=0x0099, f01=0x0190, f02=» P LDK A2,0 P LC A2,ECBCW+3,A8 REC NO P LD A3,ECBCW,A8 6 P LDK A1,/8 INCORRECT LENGTH N P LD A4,ECBRL,A8 r * P RF(NP) TIODME ERROR RETURN IF RL <= 0 P* * P* EA MUST NOT BE SET FOR OTHER TASK P* P LDR A1,A6 FDB
0x1e9514…1e96a8 Dummy {f00=0x0099, f01=0x018e, f02=»EQU * INDEXED INSRERT P IFT MMUPAG=1 P* 4 " P* MOVE KEYS TO FDB KEY AREAS > P* d P LDK A5,8 n PIXINS3 EQU * P LDR A2,A6 FDB DATA P ADR A2,A5 P LD A3,FDBADF,A2 FDB INDEX P RF(Z) IXINS4 NO INDEX P LD A1
0x1e96a8…1e983c Dummy {f00=0x0099, f01=0x0190, f02=» P LD A3,FDBRLE,A3 REC LGTH P SUK A3,6 KEY LGTH & " P CF A14,MOV:US KEY TO FDB AREA @ PIXINS4 EQU * f P SUK A5,2 z P RB(NZ) IXINS3 MORE INDEXS P XIF P* $ PSEQWRITE EQU * SEQUENTIAL WRITE P* 2 P* GET LRN+1 INTO
0x1e983c…1e99d0 Dummy {f00=0x0099, f01=0x0190, f02=» x P LDK A1,0 ! P LC A1,FDBMRN,A6 LAST REC NR ! P LD A2,FDBMRN+1,A6 ! > P LDK A6,0 ! X P LC A6,FDBLRN,A5 ! j P LD A7,FDBLRN+1,A5 LRN ! P CF A14,DSUMOD SUBTRACT ! P SUK A2,1 ! P LDR A1,A1 ! P RF(Z) SEQ005 NOT MANY ! P LDKL
0x1e99d0…1e9b64 Dummy {f00=0x0099, f01=0x0190, f02=»,FDBLRN+1,A6 LRN ! P IFT INDXAC=1 " P RF IXR020 STORE LOG REC NO " . P EJECT " R $ PIXRDNX EQU * INDEXED EREAD NEXT " ` P* " P* GET CRN " P* " P LD A1,FDBADF,A6 FDB ADDR " " P CF A14,CRNGET GET CRN BUFFER " P LDR A4,A2 BUFFA
0x1e9b64…1e9cf8 Dummy {f00=0x0099, f01=0x0190, f02=»C A5,CRNCIF,A4 " . P RF(NE) IXR020 OTHER INDEX FILE IS CURRENT # P LC A1,CRNCIF+1,A4 # H " P LD A2,CRNCIF+2,A4 LOG REC NO # b PIXR020 EQU * # P XIF # P ADK A2,1 # P RF(O) IXR030 OVERFLOW # P RF IXR040 # , PIXR030 ANKL A2,/7FFF REMOVE OV
0x1e9cf8…1e9e8c Dummy {f00=0x0099, f01=0x0190, f02=»NOT CHECK EOF CONDITION # P EJECT $ P* $ . PIXREWR EQU * INDEXED REWRITE $ 8 P* $ PIXDEL EQU * INDEXED DELETE $ f P* $ PRANWRITE EQU * RANDOM WRITE $ P* $ & PRANWRD EQU * DELAYED RANDOM WRITE $ P* $ & PRANDLD EQU * DELAYED
0x1e9e8c…1ea020 Dummy {f00=0x0099, f01=0x018e, f02=» $ P************************* % P* DMTASK ACTIVATION * % * P************************* % L P* % n PTIODMA EQU * % x P* % P* SET EOF IF CRN > LRN % P* % P LDK A1,0 % P LC A1,ECBCW+3,A8 REC NO % P LD A2,ECBCW,A8 DITTO
0x1ea020…1ea1b4 (1, 362) Dummy {f00=0x009a, f01=0x0190, f02=» % t P RF(NG) TIOD25 CRN <= LRN & PTIOD23 EQU * & * P LDKL A3,/1000 END OF FILE & > P ORS A3,ECBRC,A8 & ` P ANK A7,/3F & x P SUKL A7,SQR SEQ READ & P RF(NE) TIOD25 NOT SR & P LDR A1,A3 & P RF TIODME & PTIOD25 EQU * & 6 P CF A14,
0x1ea1b4…1ea348 Dummy {f00=0x009a, f01=0x0190, f02=»TE DMTASK WITH FDB ADDRESS IN A1 & P* ' ( PTIOD68 EQU * ' 2 P ENB ' F P ENB ' R P INH ' ^ P LDR A1,A6 FDB ADDRESS ' j P LDK A7,0 ' $ P LC A7,EXTDMI,A4 TID FOR DMTASK ' P ADKL A7,'#D' ' P CF A15,FNDTID A2:=TTAB ADDR ' P LDR A5,A2 '
0x1ea348…1ea4dc Dummy {f00=0x009a, f01=0x0190, f02=»TE DMTASK ' | P* ( P* EXIT TO TDISP ( P* ( 6 P ABL TDISP ( @ P* ( R P EJECT ( P* ( j P************** ( t P* TIODME * ( P************** ( P* ( J P* TIODM ERROR CALL TENDIO WITH RETURN CODE IN A1 AND GOTO DISPATCHER (
0x1ea4dc…1ea670 Dummy {f00=0x009a, f01=0x4056, f02=»RESS ( , P ABL DISEND CALL TENDIO GOTO DISPATCHER ) P* ) < P END ) F@ ) R R P EJECT ( P* ( j P************** ( t P* TIODME * ( P************** ( P* ( J P* TIODM ERROR CALL TENDIO WITH RETURN CODE IN A1 AND GOTO DISPATCHER (
0x1ea670…1ea804 Dummy {f00=0x009a, f01=0x2008, f02=» *
0x1ea804…1ea998 Dummy {f00=0x009a, f01=0x0190, f02=» 2 P* 3 < P* NOW CHECK DEVICE CODES. WHEN LAST FILE IS CLOSED ON 3 > P* A FLEXIBLE DISC UNIT, AN UNLOC IS MADE FOR THIS VOLUME 3 R P* 3 P LDK A1,4 EXTENT COUNTER 3 P LDR A5,A6 FDB ADDR 3 . P ADKL A5,FDBEXT+1 ZADDR OF FIRST VOL CODE 3
0x1ea998…1eab2c Dummy {f00=0x009a, f01=0x0190, f02=»1 LOOP 3 & P ABL(NN) DMT900 CHECK THIS EXTENT 4 P XIF 4 8 P IFT INDXAC=1 4 D P EJECT 4 Z P* 4 h P* ALL EXTENTS CHECKED 4 r P* RELEASE MASRTER INDEX 4 P* 4 P INH 4 & P LD A1,FDBMIA,A6 MASTER INDEX ADDR 4 P RF(Z) DMT894 NO MAT
0x1eab2c…1eacc0 Dummy {f00=0x009a, f01=0x018e, f02=» DMT894 NO MATER IX 4 P CW A1,MXIND+2,A5 5 P RB(NE) DMT885 5 6 P LD A4,MXIND,A5 5 L & P RF(N) DMT890 PREVIOUS ENTRY USED 5 d " P LD A4,MXIND+4,A5 NO OF WORDS 5 P ANKL A4,/7FFF REMOV USE BIT 5 P ADS A4,MXIND,A5 NR OF WORDS 5 P* 5 P*
0x1eacc0…1eae54 (1, 363) Opaque[0x194]
0x1eae54…1eafe8 # DirEnt {nam=»DMTASK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1348, f03=0x0000}
0x1eae54…1eafe8 IdxSect {
0x1eae54…1eafe8 f00 = 0x009a // 0x1eae54 @0x0
0x1eae54…1eafe8 f01 = 0x0026 // 0x1eae56 @0x2
0x1eae54…1eafe8 gno = [ // 0x1eae58 @0x4
0x1eae54…1eafe8 [0x00]: C0x009a.0x1.0
0x1eae54…1eafe8 [0x01]: C0x009a.0x2.0
0x1eae54…1eafe8 [0x02]: C0x009a.0x3.0
0x1eae54…1eafe8 [0x03]: C0x009b.0x0.0
0x1eae54…1eafe8 [0x04]: C0x009b.0x1.0
0x1eae54…1eafe8 [0x05]: C0x009b.0x2.0
0x1eae54…1eafe8 [0x06]: C0x009b.0x3.0
0x1eae54…1eafe8 [0x07]: C0x009c.0x0.0
0x1eae54…1eafe8 [0x08]: C0x009c.0x1.0
0x1eae54…1eafe8 [0x09]: C0x009c.0x2.0
0x1eae54…1eafe8 [0x0a]: C0x009c.0x3.0
0x1eae54…1eafe8 [0x0b]: C0x009d.0x0.0
0x1eae54…1eafe8 [0x0c]: C0x009d.0x1.0
0x1eae54…1eafe8 [0x0d]: C0x009d.0x2.0
0x1eae54…1eafe8 [0x0e]: C0x009d.0x3.0
0x1eae54…1eafe8 [0x0f]: C0x009e.0x0.0
0x1eae54…1eafe8 [0x10]: C0x009e.0x1.0
0x1eae54…1eafe8 [0x11]: C0x009e.0x2.0
0x1eae54…1eafe8 [0x12]: C0x009e.0x3.0
0x1eae54…1eafe8 ]
0x1eae54…1eafe8 }
0x1eafe8…1eb17c Dummy {f00=0x009a, f01=0x0190, f02=» 2 P IDENT DMTASK REL 9.2 79-11-16 870105040920 P : P =5, PR5649 B P REL 9.1 79-11-01 X P =4,CURRENCY INSERT t P REL 9.1 79-07-02 P =3,TEST KEY P REL 9.1 79-07-02 P =2,CH REQ P REL 8.2 P
0x1eb17c…1eb310 Dummy {f00=0x009a, f01=0x0190, f02=»M PTS v P* 0 P* DMTASK = HANDLES DATAMANAGEMENT DISC I/O P* L P* V P* ` P* j P* t 8 P**************************************************** ~ P* , P* THIS MODULE IS ACTIVATED FROM TIODM. P* P* INPUT
0x1eb310…1eb4a4 Dummy {f00=0x009a, f01=0x0190, f02=» TO BE ACCESSED IS DEFINED IN FDB (FDBDMI, -FC, -SNR). : P* ALL BUFFERS ARE CHECKED TO FIND OUT IF THIS SECTOR > 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
0x1eb4a4…1eb638 Dummy {f00=0x009a, f01=0x0190, f02=»N AND ARE V ( P* FOLLOWED BY AN EXIT LKM REQUEST. : P* INDEX FILES ARE HANDLED IN SUBROUTINE RDNXTR WHERE > & P* ALL I/O ARE MADE IN WAIT MODE | P* D P* BY MEANS OF CONDITIONAL ASSEMBLY THE EXCLUSIVE ACCESS CHECK 6 P* FOR INDEXED
0x1eb638…1eb7cc Dummy {f00=0x009a, f01=0x018e, f02=»SIVE ACCESS CHECK INCLUDED | 2 P* QNOEXA=0 EXCLUSIVE ACCESS CHECK EXCLUDED " P EJECT X P* f P*************** p P* ENTRIES * P*************** P* P* P ENTRY DMTASK & P ENTRY SQR EXTERNAL CODE SEQ READ
0x1eb7cc…1eb960 Dummy {f00=0x009a, f01=0x0190, f02=» | P***************** P* " P* , P EXTRN SCTTCT,SCTCDT 6 & P EXTRN TTB:ID TASK IDENTIFICATION R P EXTRN TTB:TD,FDBSTA | P EXTRN FNDTID P EXTRN TENDIO P EXTRN FDBECB P EXTRN FDBSNR P EXTRN FDBRRO P E
0x1eb960…1ebaf4 (1, 364) Dummy {f00=0x009a, f01=0x0190, f02=» EXTDMI P EXTRN EXTFC P EXTRN EXTLEN $ P EXTRN EXTBAS : P EXTRN EXTELE P P EXTRN FDBLRN f P EXTRN FDBMIA | P EXTRN FDBEAL P EXTRN FDBADF P EXTRN FDBAI1 P EXTRN FDBCRL P EXTRN FDBDBR,FDBMRN,FDBMRO
0x1ebaf4…1ebc88 Dummy {f00=0x009a, f01=0x0190, f02=»BUF P EXTRN BUFLNK P EXTRN BUFDMI " P EXTRN BUFFC 8 P EXTRN BUFSNR L P EXTRN BUFOR b P EXTRN BUFSTA v P EXTRN CURBUF P EXTRN DWTECB P EXTRN DWTUEC P EXTRN DWTOR P EXTRN DWTST,DWTTDM,DWTTQ P EXT
0x1ebc88…1ebe1c Dummy {f00=0x009a, f01=0x0190, f02=»DIVMOD P EXTRN MPYMOD,CHKKEY P EXTRN CALSNO * P EXTRN DSUMOD @ . P EXTRN EATEST,EASETB,CRNGET,EARELB,GTBKBU V P EXTRN QTJOB,GTLGRN P EXTRN FNDKEY P EXTRN CRNCIF,CRNCDF,CRNQUE P EXTRN MXIND P EXTRN FDBKA,FDBNIF,RD
0x1ebe1c…1ebfb0 Dummy {f00=0x009a, f01=0x0190, f02=»VE FROM USER TO SYSTEM AREA 0 P EXTRN MOV:SU MOVE FROM SYSTEM TO USER AREA $ P EXTRN MONMMU X , P EXTRN PRUN TTAB ADDRESS OF RUNNING TASK n P EXTRN TTB:MT MMU TABLE ( P EXTRN SCTPLD PROGRAM LOADING DEVICE P EJECT P* P*
0x1ebfb0…1ec144 Dummy {f00=0x009a, f01=0x0190, f02=»LUSIVE ACCESS BIT CAN BE EXCLUDED AT 8 P* RANDOM WRITE AND RANDOM DELETE BY SETTING X:A=0. , P* h P* r PX:A EQU 1 | PX:B EQU 0 PX:C EQU 0 PX:D EQU 1 PX:E EQU 0 P* PQNOEXA EQU 00001 6 P* INDEXED ACCE
0x1ec144…1ec2d8 Dummy {f00=0x009a, f01=0x018e, f02=»TED b PINDXAC EQU 00000 6 PRECBFZ EQU 00004 INDEX RECORD BUFFER SIZE IN WORDS $ 4 PFLXDSC EQU X:D FLEXIBLE DISC INCLUDED WHEN EQU 1 ^ 0 PINSLAS EQU X:E INSERT SAME KEY LAST WHEN = 1 P* P EJECT DMTASK P* P* . P* A PROG
0x1ec2d8…1ec46c Dummy {f00=0x009a, f01=0x0190, f02=» . ** A PROGRAM VERSION USING TOSS DISC PAGING * &* IS OBTAINED BY SETTING DSKPAG EQU 1. 6 * d PDSKPAG EQU 1 n * P* 6 P* A PROGRAM VERSION INCLUDING TOSS SWAPPABLE WORK 2 P* BLOCKS IS OBTAINED BY SETTING SWPBLK EQU 1. P*
0x1ec46c…1ec600 Dummy {f00=0x009a, f01=0x0190, f02=»************** P* P* , PEABIT EQU /20 EA-BIT IN DWT STATUS BYTE * P* Z & PVTOBLK EQU 9 VTOC BLOCKING FACTOR d P* : P* THE FOLLOWING INTERNAL ORDER CODES IS THE RELATIVE & P* POSITION IN TIODM-TABLE TIODMF P*
0x1ec600…1ec794 (1, 365) Dummy {f00=0x009a, f01=0x0190, f02=»XAC=1 " P DATA DMIRN INDEXED READ NEXT PQINS EQU 6 4 P DATA DMINS INDEXED INSERT F PQDEL EQU 8 h P DATA DMDEL INDEXED DELETE z PQIRW EQU 10 P DATA DMIRW INDEXED REWRITE $ P DATA DMIRR INDEXED RANDOM RESAD P XIF P
0x1ec794…1ec928 Dummy {f00=0x009a, f01=0x0190, f02=»DOM DELETE PQRW EQU 16 P DATA DMRDWR RANDOM WRITE $ PQRR EQU 18 F P DATA DMRDRE RANDOM READ X PQREA EQU 20 x * P DATA DMTERR RELEASE EXCLUSIVE ACCESS PQSW EQU 22 " P DATA DMSQWR SEQUENTIAL WRITE * PSQR EQU 2 EXTERNAL ORD
0x1ec928…1ecabc Dummy {f00=0x009a, f01=0x0190, f02=» INDXAC=1 PQINIX EQU 28 P DATA DMINIX INSERT INDEX & PQDELX EQU 30 H P DATA DMDELX DELETE INDEX P XIF ~ P IFF INDXAC=1 P DATA DMTERR,DMTERR P XIF PQGCURX EQU 32 " P DATA DMTERR GET CURRENT INDEX PQRWD
0x1ecabc…1ecc50 Dummy {f00=0x009a, f01=0x0190, f02=» $ P DATA DMRRRB RAND READ REL BUFF P* , $ PVTOCRL DATA 0 VTOC RECORD LENGTH 6 P EJECT ^ P* l P************** v P* DMTFRL * P************** P* , P* ENTRY DMTFRL FIND RECORD LENGTH P* 4 P* INPUT
0x1ecc50…1ecde4 Dummy {f00=0x009a, f01=0x0190, f02=»OUTPUT A2 = RECORD LENGTH TO BE USED < P* A1 IS ORED INTO ECBRC IF ECBRL < REC LENGTH . & P* A2 IS STORED IN ECBEL n P* PDMTFRL EQU * P LD A2,ECBRL,A9 P CW A2,FDBRLE,A6 $ P RF(E) DMTF20 ECBRL = REC LENGTH
0x1ecde4…1ecf78 Dummy {f00=0x009a, f01=0x0190, f02=»ETURN CODE t . PDMTF20 ST A2,ECBEL,A9 SET EFFECTIVE LENGTH P RTN A14 D P EJECT T P* b P************ l P* DMTWM * P************ P* " P* ENTRY DMTWM WORD MOVE P* " P* INPUT A1 = FROM ADDRESS , P
0x1ecf78…1ed10c Dummy {f00=0x009a, f01=0x0190, f02=» P* PDMTWM EQU * P SUK A2,2 & " P RF(N) DMTW10 LAST WORD MOVED 8 P LDR* A4,A1 ^ P STR A4,A3 r P ADK A1,2 P ADK A3,2 P RB DMTWM PDMTW10 ANK A2,/01 P RF(E) DMTW20 P LCR A4,A1 MOVE LAST CHAR
0x1ed10c…1ed2a0 Dummy {f00=0x009a, f01=0x0190, f02=» " P* ENTRY DMTBM BYTE MOVE P* . " P* INPUT A1 = FROM ADDRESS 8 , P* A2 = NO OF BYTES TO BE MOVED ^ P* A3 = TO ADDRESS P* $ P* A4 WILL BE DESTROYED P* P* OUTPUT A3 = NEXT CHAR
0x1ed2a0…1ed434 (1, 366) Dummy {f00=0x009b, f01=0x0190, f02=» P ADK A1,1 P ADK A3,1 P RB DMTBM ( PDMTB10 RTN A14 : P* P 2 P* DMTBMR HAS THE SAME FUNCTION AS DMTBM BUT Z P* MOVES FROM THE END P* PDMTBMR ADR A1,A2 P ADR A3,A2 PDMTB20 SUK A2,1 P RB(N) DMTB10
0x1ed434…1ed5c8 Dummy {f00=0x009b, f01=0x0190, f02=»**************************** x P* $ : P* FNDFDB WILL SEARCH TTAB AND SCTCDT FOR A FILE CODE . P* l 8 P****ENTRY PARAMETERS******************************** v P* P* A1 = TTAB ADDR $ P* A2 = FILE CODE TO SEARCH FOR 4 P* A5 NOT
0x1ed5c8…1ed75c Dummy {f00=0x009b, f01=0x0190, f02=»NCHANGED 2 P* A2 = FILE CODE. = 0 WHEN NO CODE IS FOUND 6 P* A4 = TTAB/SCTCDT ENTRY ADDR WHEN CODE IS FOUND F 2 P* A5 = 0 WHEN FOUND IN SCTCDT = 1 WHEN TTAB P* 8 P****USED REGISTERS********************************** P* P*
0x1ed75c…1ed8f0 Dummy {f00=0x009b, f01=0x0190, f02=»* PFNDFDB EQU * & P LD A3,TTB:TD,A1 LENGTH DEV DESCR PFND030 EQU * H P SUK A3,4 ( P RF(NP) FND040 FILE CODE NOT IN TTAB n P LDR A4,A1 P ADKL A4,TTB:TD =1 P ADR A4,A3 P CWR* A2,A4 =1 P RB(NE) FND030 P
0x1ed8f0…1eda84 Dummy {f00=0x009b, f01=0x0190, f02=» EQU * P LDR A5,A5 ( P RF(NZ) FND060 ONLY TTAB IS SEACHED P LD* A4,SCTCDT L PFND050 EQU * b P SUK A4,4 v ( P RF(NP) FND060 CODE NOT FOUND AT ALL P LD A3,SCTCDT P ADR A3,A4 P CWR* A2,A3 =1 P RB(NE) FND050
0x1eda84…1edc18 Dummy {f00=0x009b, f01=0x0190, f02=» EJECT P* P************** P* DMTREM * . P************** D P* Z D P* ENTRY DMTREM MOVE RECORD FROM BUFFER TO USER RECORD AREA d P* 0 P* INPUT RELATIVE REC OFFSET IN FDBRRO,A6 $ P* BUFFER ADDRESS IN
0x1edc18…1eddac Dummy {f00=0x009b, f01=0x0190, f02=»HE RECORD > P* IF (FROM) AND (TO) ADDRESSES BOTH EVEN THEN WORD MOVE B P* IF (FROM AND (TO) ADDRESSES BOTH ODD THEN MOVE FIRST BYTE T > P* WITH BYTE INSTRUCTIONS AND THE REST WITH WORD MOVE : P* ELSE USE BYTE MOVE INSTRUCTIONS FOR THE
0x1eddac…1edf40 Dummy {f00=0x009b, f01=0x0190, f02=» LDR A4,A1 P LD A3,ECBBA,A9 TO ADDRESS P XRR A4,A3 4 P ANK A4,/01 F ( P RF(Z) DMT210 BOTH ODD OR BOTH EVEN Z & P CF A14,DMTBM ONE ODD AND ONE EVEN P RF DMT225 P* PDMT210 LDR A4,A1 P ANK A4,/01 P RF(E) DMT220 BO
0x1edf40…1ee0d4 (1, 367) Dummy {f00=0x009b, f01=0x0190, f02=»RD MOVE z PDMT225 EQU * P XIF $ P* 0 P IFT MMUPAG=1 : & P LD A4,DWTTDM,A6 GET TTAB ADDRESS P $ P LC A3,TTB:ID,A4 ID CALLING TASK z P CCK A3,'##' P RF(NE) DMTREN NOT DMTASK P LDK A3,QRR P CC A3,DWTOR+1,A6 " P R
0x1ee0d4…1ee268 Dummy {f00=0x009b, f01=0x0190, f02=»SER TTAB ~ PDMTREN EQU * P INH $ $ P TL TTB:MT,A4 LOAD MMU REGISTERS 0 PDMTREP EQU * X $ P LD A4,PRUN GET DM TTAB ADDRESS l 0 P TS TTB:MT,A4 STORE USER MMU IN DM MMU TABLE P ENB P LDR A3,A2 GET LENGTH 0 P LD A2,ECBBA,A9 GET RE
0x1ee268…1ee3fc Dummy {f00=0x009b, f01=0x018e, f02=»PAG=1 PDMTREQ INH P TL MONMMU SYSTEM MMU P RB DMTREP > P XIF P P EJECT P* j P* SET UP A14 STACK t P* PGETA14 EQU * $ P LD A14,PRUN GET DM TTAB ADDRESS * P AD A14,TTB:TD,A14 LENGTH DEVICE DESCR P ADK
0x1ee3fc…1ee590 Dummy {f00=0x009b, f01=0x0190, f02=» P************** ! P* ! P* ! ( PDMTASK EQU * ! 2 P* ! F P* SET UP A14 STACK ! P P* ! l P CF A15,GETA14 ! v P LDR A6,A1 FDB ADDR ! P LDKL A5,-1 ! * P CW A5,FDBRRO,A6 SPECIAL PARAMETER -1 ! 2 P RF(E) DMT090 FOR ORDERS XR,DX
0x1ee590…1ee724 Dummy {f00=0x009b, f01=0x0190, f02=»1 ! P ANK A2,/3F " P CWK A2,QCL " P RF(E) DMT024 CLOSE " 2 P CWK A2,QRV " N P RF(E) DMT024 READ VTOC " b P SUK A2,QRRRB " & P RF(E) DMT024 RAND READ REL BUFFER " P ORKL A4,/100 " PDMT024 EQU * " P ST A4,FDBDBR,A1 " PDMT0
0x1ee724…1ee8b8 Dummy {f00=0x009b, f01=0x0190, f02=»80 BUFFER WAS BEFORE " P* # ( P* READ SECTOR INTO BUFFER AND EXIT # & P* # R P SUK A5,QCL # P RF(Z) DMT030 CLOSE # p P LDK A7,/11 PHYSICAL READ # P LKM # P DATA -1 I/O AND ACTIVATION # " P DATA DMTAR1 DMTASK RESTART #1 # P LKM
0x1ee8b8…1eea4c Dummy {f00=0x009b, f01=0x0190, f02=»T050 CHECK RETURN CODES # P EJECT $ P************** $ . P* DMTAR1 * $ D P************** $ Z P* RESTART POINT AFTER READ $ p P* $ PDMTAR1 EQU * $ P* $ P* SET UP A14 STACK $ P* $ P CF A15,GETA14 $ PDMT050 EQU * $
0x1eea4c…1eebe0 Dummy {f00=0x009b, f01=0x0190, f02=» $ 0 PDMT080 EQU * ENTRY IF SECT ALREADY IN BUFFER % P LDR A5,A3 % < P ADK A5,8 SKIP BUFFER HEADER % N * P ST A5,ECBBA,A8 PUT BUFFER ADDR IN ECB % r PDMT090 EQU * % P* % 4 P* HANDLE ACTUAL ORDER ORDER INDEX IN DWTOR % P* % P ADK A5,
0x1eebe0…1eed74 (1, 368) Dummy {f00=0x009b, f01=0x0190, f02=» TABLE % r P EJECT & $ PDMRRRB EQU * RAND READ REL BUFF & P* & D PDMSQRE EQU * SEQUENTIAL READ & N P* & r PDMRDRE EQU * RANDOM READ & | P* & 4 P* CHECK STATUS IF NOT USED THEN ERROR RETURN & P* & P LD A2,FDBRRO,A6 & P AD A2,F
0x1eed74…1eef08 Dummy {f00=0x009b, f01=0x018e, f02=»A & | P ABL DMTERR ' & PDMT200 LDK A1,/8 INCORRECT LENGTH ' & P CF A14,DMTFRL A2 := RECORD LENGTH ' H P* ' r P* MOVE THE RECORD ' | P* ' P CF A14,DMTREM ' P* ' 0 P* UPDATE CRN AND SET EXCLUSIVE ACCESS BIT ' P* ' PDMT230 E
0x1eef08…1ef09c Dummy {f00=0x009b, f01=0x0190, f02=» ' t P* ( P LD A2,FDBSNR,A6 ( ( P RF(NZ) DMT270 VTOC SECTOR IN BUFFER ( * P* ( V P* VOLUME LABEL IN BUFFER ( ` H P* FIND VTOC SECTOR NUMBER AND RELATIVE RECORD OFFSET WITHIN SECTOR ( 8 P* FOR VTOC RECORD AND READ THIS SECTOR INTO BUFFER (
0x1ef09c…1ef230 Dummy {f00=0x009b, f01=0x0190, f02=»OBLK VTOC BLOCKING FACTIOR ( ( P LD A2,FDBVTO,A10 VTOC RECORD NUMBER ) " P LDK A1,0 ) N , P CF A14,DIVMOD A2=A1,A2/A6.A1=REMAINDRER ) ` P LDR A3,A2 QUOTIENT ) P LDR A6,A10 FDB ADDR ) P LDR A2,A1 REST ) P RF(Z) DMT240 REST = 0 ) $ P ADK A3,1
0x1ef230…1ef3c4 Dummy {f00=0x009b, f01=0x0190, f02=» P ST A3,FDBSNR,A6 * P LDK A3,0 * PDMT255 SUK A2,1 * . P RF(Z) DMT260 * F P AD A3,VLVRL-2,A5 * P ADK A3,1 SKIP STATUS BYTE * v P RB DMT255 * PDMT260 ST A3,FDBRRO,A6 * P* * P* RELEASE BUFFER * P* * P LD A3,ECBBA,A9 *
0x1ef3c4…1ef558 Dummy {f00=0x009b, f01=0x0190, f02=» ADDR * P RB DMT020 READ VTOC SECTOR + P EJECT + 2 PDMT270 EQU * + @ P SUK A7,QRV + T $ P ABL(Z) DMT500 READ VTOC RECORD + h P* CLOSE FILE + & P* UPDATE VTOC LAST RECORD NUMBER + & P* AND WRITE SECTOR BACK ON DISC + P AD A5,FDBRRO,
0x1ef558…1ef6ec Dummy {f00=0x009b, f01=0x0190, f02=»E FILE. WRITE VTOC + P* , P LDK A7,/95 , $ P LKM , 8 P DATA 1 , D P* , T P LDR A1,A6 FDBADDRESS IN A1 , ^ & P CF A14,DMTIOT CHECK RETURN CODES , P LDR A1,A1 , P RF(NZ) DMT724 ERROR , PDMT720 EQU * , P LD A1,DWTTDM,A6 TTAB ADDR
0x1ef6ec…1ef880 Dummy {f00=0x009b, f01=0x0190, f02=» A2,1 0 OR 1 , P ECR A2,A2 =1 END - P LC A2,ECBFC,A9 FILE CODE - . " P LDK A5,0 TRY LOCAL AND GLOBAL - P . P CF A14,FNDFDB GET ENTRY IN TTAB CDTADTAB - v & P LDR A13,A5 LOCAL/GLOBAL INDICATOR - P LDR A2,A2 - P RF(NZ) DMT725 FC FOUND - P LDK
0x1ef880…1efa14 (1, 369) Dummy {f00=0x009b, f01=0x0190, f02=»R - p P LDR A12,A1 SAVE TTEAB ADDR . 4 P SUR A10,A10 MARK THAT FDB NOT SHALL BE RELEASED . . P EJECT . f 0 P* CHECK IF THIS FDB ADDR IS USED ELEWHERE . t P* . P* SEARCH ALL TTABS . P* . P LD* A2,SCTTCT . PDMT730 EQU * . P SUK A
0x1efa14…1efba8 Dummy {f00=0x009b, f01=0x018e, f02=»K ID . | P CCK A3,'##' / & P RB(E) DMT730 JUMP IF MONITOR TASK / P LD A3,TTB:TD,A1 / J ( P ADKL A1,TTB:TD+2 DEV DESCR TABLE +2 / b PDMT770 EQU * / P SUK A3,4 / $ P RB(NP) DMT730 NOT IN THIS TTAB / P LDR A4,A1 / P ADR A4,A3 / P CWR* A5
0x1efba8…1efd3c Dummy {f00=0x009b, f01=0x0190, f02=» / v & P RF DMT895 MORE USERS ON THIS FDB 0 P* 0 2 P* NOW SEARCH SCTCDT 0 < P* 0 Z PDMT780 EQU * 0 d P LD* A4,SCTCDT 0 x PDMT790 EQU * 0 P SUK A4,4 0 . P RF(NP) DMT800 THIS FDB HAS NO OTHER USER 0 P LD A2,SCTCDT 0 P ADR A2,A4 0
0x1efd3c…1efed0 Dummy {f00=0x009b, f01=0x018e, f02=» & P RF DMT895 THIS FDB HAS MORE USERS 1 P EJECT 1 . P* 1 < P* NOW RELEASE THIS FDB 1 F P* 1 f PDMT800 EQU * 1 p P* 1 P* RELEASE EA-BUFFERS 1 P* 1 . P LDKL A2,/8000 ALL EA-BUFFERS ARE RELEASED 1 P LDR A1,A6 FDB ADDR 1 P CF
0x1efed0…1f0064 Dummy {f00=0x009b, f01=0x0190, f02=» 1 P CMR A5 CLEAR FDB 2 P RF DMT830 2 " PDMT820 EQU * 2 4 P LDR A4,A5 BUFFER ADDRESS 2 H PDMT830 EQU * 2 j & P RF(Z) DMT840 ALL BUFFER S REMOVED 2 ~ $ P LDR* A5,A4 NEXT BUFFER ADDRESS 2 P* 2 P* RETIURN BUFFER TO POOL 2 P* 2 P I
0x1f0064…1f01f8 Dummy {f00=0x009b, f01=0x0190, f02=» 2 P* 3 < P* NOW CHECK DEVICE CODES. WHEN LAST FILE IS CLOSED ON 3 > P* A FLEXIBLE DISC UNIT, AN UNLOC IS MADE FOR THIS VOLUME 3 R P* 3 P LDK A1,4 EXTENT COUNTER 3 P LDR A5,A6 FDB ADDR 3 . P ADKL A5,FDBEXT+1 ZADDR OF FIRST VOL CODE 3
0x1f01f8…1f038c Dummy {f00=0x009b, f01=0x0190, f02=»1 LOOP 3 & P ABL(NN) DMT900 CHECK THIS EXTENT 4 P XIF 4 8 P IFT INDXAC=1 4 D P EJECT 4 Z P* 4 h P* ALL EXTENTS CHECKED 4 r P* RELEASE MASRTER INDEX 4 P* 4 P INH 4 & P LD A1,FDBMIA,A6 MASTER INDEX ADDR 4 P RF(Z) DMT894 NO MAT
0x1f038c…1f0520 Dummy {f00=0x009b, f01=0x018e, f02=» DMT894 NO MATER IX 4 P CW A1,MXIND+2,A5 5 P RB(NE) DMT885 5 6 P LD A4,MXIND,A5 5 L & P RF(N) DMT890 PREVIOUS ENTRY USED 5 d " P LD A4,MXIND+4,A5 NO OF WORDS 5 P ANKL A4,/7FFF REMOV USE BIT 5 P ADS A4,MXIND,A5 NR OF WORDS 5 P* 5 P*
0x1f0520…1f06b4 (1, 370) Dummy {f00=0x009c, f01=0x0190, f02=» P LD A2,MXIND 6 P SUR A2,A5 6 P SUK A2,2 NO OF CHAR 6 * P CF A14,DMTWM MOVE UOP 6 F P RF DMT894 6 d PDMT890 EQU * 6 v P LDKL A4,/7FFF 6 & P ANS A4,MXIND+4,A5 REMOVE USE BIT 6 P XIF 6 P EJECT 6 PDMT894 EQU * 6 0 P LDKL A10,1 MARK
0x1f06b4…1f0848 Dummy {f00=0x009c, f01=0x0190, f02=»11 FILE CODE 6 P CM 2,A11 FDB ADDR 7 P* 7 . * P* RELEASE DWT-QUEUQ IN THIS FDB-DWT 7 8 P* 7 f P LDR A1,A6 FDBADDR 7 p $ P ADKL A1,DWTTQ ADDR QUEUE START 7 P LDR* A5,A1 NEXT TTAB ADDR 7 P RF(Z) DMTA20 NO Q 7 P CMR A1 KILL ROOT 7 $ P
0x1f0848…1f09dc Dummy {f00=0x009c, f01=0x0190, f02=» 7 P* 8 " P* NEXT ENTRY IN TTAB/CDATAB 8 P* 8 8 P LDR A1,A12 TTAB ADDR 8 B P LDK A2,0 8 ` ( P LC A2,ECBFC,A9 FILE CODE USERT ECB 8 r & P LDR A5,A13 LOCAL/GLOBAL INDICATOR 8 & P CF A14,FNDFDB SEARCH TTAB SCTCDT 8 P LDK A7,0 INDICATES A2
0x1f09dc…1f0b70 Dummy {f00=0x009c, f01=0x018e, f02=»ALL ALSO BE RELEASED 8 | P* 9 & P LD A7,2,A4 NEXT FDB ADDR TO CLOSE 9 & P LDK A1,2 9 P P ADR A1,A6 FROM ADDR 9 b P LDK A3,2 9 ~ P ADR A3,A7 TO ADDR 9 P LDK A2,12 NO OF BYTES 9 P CF A14,DMTWM MOVE DWT 9 P IFT MMUPAG=1 9 P LD A3,DWTUE
0x1f0b70…1f0d04 Dummy {f00=0x009c, f01=0x018e, f02=» 9 x P CM FDBSNR,A7 SECTOR NR : P LDKL A3,FDBEXT : ( P ADR A3,A7 : @ P ST A3,FDBCEX,A7 1ST EXTENT : R P LDR A10,A10 =1 : v P RF(Z) DMTA30 NO RELEASE =1 : P LDKL A3,/8000 : P ST A3,DWTST,A6 NOT BUSY : PDMTA30 EQU * : P XIF : P
0x1f0d04…1f0e98 Dummy {f00=0x009c, f01=0x0190, f02=» P* RELEASE FDB ; P* ; P LDR A10,A10 ; & P RF(Z) DMTA40 NO RELEASE ; : P IFT INDXAC=1 ; Z P* ; p 0 P* REMOVE ALL OTHER REFERAENCES TO THIS FDB ; z P* ; P LDK A1,10 2*MAX NR OF FDBS ; PDMTA50 SUK A1,2 ; " P RF(N) DMTA70 ALL FD
0x1f0e98…1f102c Dummy {f00=0x009c, f01=0x0190, f02=»OF FDBS ; | PDMTA60 SUK A4,2 < 0 P RB(N) DMTA50 ALL ADDR CHECKED IN OTHER FDB < ( P LDR A5,A3 < P ADR A5,A4 < n P CW A6,FDBADF,A5 < P RB(NE) DMTA60 < P* < @ P* DELETE THIS REFERENCE TO THE FDB THAT SHALL BE RELEASED < P* < P C
0x1f102c…1f11c0 Dummy {f00=0x009c, f01=0x0190, f02=»SET FDB FREE < PDMTA40 EQU * = * P CF A14,CLRBUF REMOVE ALL FREE BUFFERS = ( P LDR A1,A7 NEW FDB ADDR = V P ABL(Z) DMTERX NO MORE FDBS = v P IFT INDXAC=1 = P ENB ENB = P* = 4 P* FIND WHICH DMTASK IS NEXT AND ACTIVATE THAT = P* =
0x1f11c0…1f1354 (1, 371) Dummy {f00=0x009c, f01=0x0190, f02=» P LKM > P DATA 3 EXIT > P XIF > $ P IFT FLXDSC=1 > 0 P EJECT > F PDMT900 EQU * > T $ P* UNLOCK FLEXDISC IN THIS LOOP > h P* > P* REGISTERS > P* A1 = EXTENT COUNTER > 6 P* A4 = LAST VOL CODE FLEXDOISC A5 = EXT ADDR >
0x1f1354…1f14e8 Dummy {f00=0x009c, f01=0x0190, f02=»NGTH IN FDB > z P LCR A7,A5 VOLUME CODE ? P ANK A7,/FF ? 2 P ABL(Z) DMT880 NO CODE ? F P* ? d & P* FLEXDICSC IF BIT 8-13 = 111110 ? n P* ? P ANK A7,/F8 ? P SUK A7,/F8 ? P ABL(NE) DMT880 NO FLEXDISC ? P* ? 6 P* IF SAME FLEX
0x1f14e8…1f167c Dummy {f00=0x009c, f01=0x0190, f02=»THOIS FLEXIBLE DISC VOL CODE ? t P* @ $ PDMT910 EQU * @ . P LCR A4,A5 SAVE VOL CODE @ B " P LDKL A3,FDBSTA FDB LINK ROOT @ b P INH INH @ P RF DMT925 @ PDMT920 EQU * @ P LDR* A3,A3 FDB ADDR @ PDMT925 EQU * @ P ANKL A3,/FFFE FDB ADD
0x1f167c…1f1810 Dummy {f00=0x009c, f01=0x018e, f02=» DMT920 CURRENT FDB @ P LDK A7,4 EXTENT COUNTER A P LDR A2,A3 FDB ADDR A < P ADKL A2,FDBEXT+1 A X P* ADDR OF 1ST VOL CODE A r & P SUKL A2,EXTELE EXT LENGTH IN FDB A PDMT930 EQU * A P SUK A7,1 A & P RB(N) DMT920 ALL EXTENTS CHECKED A
0x1f1810…1f19a4 Dummy {f00=0x009c, f01=0x018e, f02=» A & P* ALL FSDBS CHECKED. MAKE UNLOAD B P* B 2 PDMT980 EQU * B < P ENB ENB B P P* B b 6 P* NOTE THAT ECBBUF IS ASSUMED NOT TO BE CHANGED B l P* WITH THIS REQUEST B P* B P SC A4,ECBFC,A8 VOL CODE B P* B P IFF DSKPAG+SWPB
0x1f19a4…1f1b38 Dummy {f00=0x009c, f01=0x0190, f02=» P IFT FLXDSC=1 C P LDK A7,/B8 UNLOAD WAIT C P LKM C : P DATA 1 C F P LD A1,ECBRC,A8 C V P ANK A1,1 INOPER C n P ABL(NZ) DMTERR C P ABL DMT880 CHECK NEXT EXT C P XIF C P EJECT C " PDMT500 EQU * READ VTOC RECORD C P* C "
0x1f1b38…1f1ccc Dummy {f00=0x009c, f01=0x0190, f02=»H C v ( P ORS A1,ECBRC,A9 SET RC BUT CONTINUE D , P LD A2,ECBRL,A9 MOVE WHAT USER TOLD YOU D 6 PDMT510 EQU * D f P ST A2,ECBEL,A9 D z P CF A14,DMTREM MOVE RECORD D PDMAEX EQU * D P ABL DMTAEX EXIT D P EJECT D " PDMSQWR EQU * SEQUENTIAL WR
0x1f1ccc…1f1e60 Dummy {f00=0x009c, f01=0x0190, f02=» D v P* E PDMDEL EQU * INDEXED DELETE E P* E 4 PDMIRW EQU * INDEXED REWRITE E > P* E b & PDMRDWD EQU * DELAYED RANDOM WRITE E l P* E & PDMRDDD EQU * DELAYED RANDOM DELETE E P* E P* TEST STATUS E P LD A10,FDBRRO,A6 E P A
0x1f1e60…1f1ff4 (1, 372) Dummy {f00=0x009c, f01=0x0190, f02=»+2,A9 E P ANK A2,/FF F P LD A3,ECBCW,A9 LOG REC NR F " P LDK A4,0 F D P CCR A4,A10 F V P RF(E) DMS010 FREE F j P IFT INDXAC=1 F P LDR A4,A7 F P SUK A4,QINS F P RF(E) DMEAER INDEXED INSERT F P XIF F P LDR A4,A7 F P SUK A
0x1f1ff4…1f2188 Dummy {f00=0x009c, f01=0x0190, f02=» P ANK A4,EABIT G " P RF(NZ) DMS020 EA=1, NO CHECK G P* EA MUST BE SET G @ P* G Z P CF A14,EATEST G d P LDR A4,A4 RTN CODE G z " P RF(NP) DMEAER NO EA THIS TASK G P XIF G P RF DMS100 G PDMS010 EQU * G P IFT INDXAC=1 G P LDR
0x1f2188…1f231c Dummy {f00=0x009c, f01=0x0190, f02=»TE G v P XIF H PDMS020 EQU * H P CF A14,EATEST H * P LDR A4,A4 RTN CODE H @ P RF(N) DMEAER EA OTHER TASK H PDMS100 EQU * H P LDK A1,0 SET STATUS FREE H P IFT INDXAC=1 H P LDR A2,A7 H P SUK A2,QIRW H " P RF(E) CHK010 INDEXED
0x1f231c…1f24b0 Dummy {f00=0x009c, f01=0x0190, f02=»HK010 INDEXED DELETE H P XIF I P LDR A2,A7 I ( P SUK A2,QRD I : P RF(E) DMT350 RANDOM DELETE I N P LDR A2,A7 I r P SUK A2,QRDD I ( P RF(E) DMT350 DELAYED RANDOM DELETE I P RF DMT310 RW,RWD,SW I P IFT INDXAC=1 I P EJECT I PCHK0
0x1f24b0…1f2644 Dummy {f00=0x009c, f01=0x0190, f02=»* COMPARE KEYS IN FILE AND USER BUFFER I P* J 0 P LDR A1,A6 FDB ADDR J : P LDK A5,8 MAX 4 INDEX J V P SUR A12,A12 INDEX COUNTER J t PCHK040 EQU * J P SUK A5,2 J $ P RF(N) CHK100 ALL INDEX CHECKED J P LDR A2,A1 FDB ADD J P ADR A2,A5
0x1f2644…1f27d8 Dummy {f00=0x009c, f01=0x0190, f02=»ORDER =3 J P ANK A2,/3F ORDER INDEX K P SUK A2,QIRW K 0 & P RB(NE) CHK040 NOT INDEXED REWRITE K D P* K n P IFT MMUPAG=1 K x P LDR A7,A1 SAVE A1 K * P LD A1,FDBKA,A6 GET KEY START ADDRESS K P AD A1,ECBBA,A9 K 2 P LDKL A2,FDBKEY GET KEY SA
0x1f27d8…1f296c Dummy {f00=0x009c, f01=0x0190, f02=»6 KEY LENGTH K P INH L & P LD A4,DWTTDM,A7 GET TTAB ADDRESS L $ P TL TTB:MT,A4 LOAD MMU REGISTERS L J $ P LD A4,PRUN GET DM TTAB ADDRESS L r 0 P TS TTB:MT,A4 STORE USER MMU IN DM MMU TABLE L P ENB L , P CF A14,MOV:US MOVE KEY TO FDB KEY AREA L
0x1f296c…1f2b00 Dummy {f00=0x009c, f01=0x0190, f02=»NDXAC=1 L P IFT MMUPAG=0 M " P LD A2,FDBKA,A6 KEY START ADDR M & P LDR A3,A2 M L " P AD A2,ECBBA,A9 KEY IN BUFFER M ^ P XIF M P* M P IFT INDXAC=1 M P AD A3,FDBRRO,A1 M P ADR A3,A11 KEY IN FILE M P LDK A7,0 M " P LD A6,FDBRLE,
0x1f2b00…1f2c94 (1, 373) Dummy {f00=0x009c, f01=0x0190, f02=»ECK NEXT M r P LDR A6,A1 FDB ADDR N P LDKL A1,/4000 KEY NOT FOUND N , P RF DMERR N P PCHK100 EQU * N b P LDR A6,A1 FDB ADDR N v P LD A7,DWTOR,A6 N P ANK A7,/3F ORDER INDEX N P LDK A2,0 N P LC A2,FDBNIF,A6 N P CWR A2,A12 N ( P
0x1f2c94…1f2e28 Dummy {f00=0x009c, f01=0x0190, f02=»R N P XIF O $ PDMEAER LDKL A1,/2000 EA PROTECT O PDMERR ABL DMTERR O > P EJECT O V P* O d P* MOVE RECORD O n P* O PDMT310 EQU * O P IFT INDXAC=1 O P LDR A2,A7 O P SUK A2,QDEL O " P ABL(E) DMXDEL INDEXED DELETE O P X
0x1f2e28…1f2fbc Dummy {f00=0x009c, f01=0x0190, f02=»FROM ADDRESS O P* P P IFT MMUPAG=0 P P XRR A4,A1 P 4 P ANK A4,/01 P F ( P RF(E) DMT320 BOTH ODD OR BOTH EVEN P Z & P CF A14,DMTBM ONE ODD AND ONE EVEN P P RF DMT340 P P* P PDMT320 LDR A4,A3 P P ANK A4,/01 P P RF(E) DMT330 BO
0x1f2fbc…1f3150 Dummy {f00=0x009c, f01=0x018e, f02=»RD MOVE P z P* Q P XIF Q P* Q & P IFT MMUPAG=1 Q 0 P LDR A3,A2 GET LENGTH Q F , P LDR A2,A4 GET RECEIVING BUFFER ADDRESS Q d P INH Q & P LD A4,DWTTDM,A6 GET TTAB ADDRESS Q $ P TL TTB:MT,A4 LOAD MMU REGISTERS Q $ P LD A4,PRUN GET DM TTA
0x1f3150…1f32e4 Dummy {f00=0x009c, f01=0x0190, f02=» Q Z P XIF R P* R PDMT340 EQU * R P* R 2 P* SET STATUS USED R < P* R X P LDK A1,/FF R b PDMT350 SCR A1,A10 R v P LD A3,FDBDBR,A6 R P RF(NN) DMT394 NO DELAY R P LDR A2,A7 R P SUK A2,QSW R " P RF(E) DMT360 SEQUENTIAL W
0x1f32e4…1f3478 Dummy {f00=0x009c, f01=0x0190, f02=»NDOM DELETE R x P RF DMT390 S $ P* WRITE IF LAST REC IN SECTOR S & P* S N PDMT360 LD A4,FDBRRO,A6 S X P CW A4,FDBMRO,A6 S v " P RF(NE) DMT400 NOT LAST RECORD S " PDMT390 LDK A7,/05 BASIC WRITE S P SLL A3,1 S P RF(N) DMT395 BASIC WANTED S
0x1f3478…1f360c Dummy {f00=0x009c, f01=0x0190, f02=»1,A6 FDB ADDRESS AS PARAMETER S P LKM T & P DATA -1 I/O AND ACTIVATION T 2 " P DATA DMTAR2 DMTASK RESTART #2 T V P LKM T | P DATA 3 EXIT T P EJECT T P* T P************** T P* DMTAR2 * T P************** T P* T P* T ,
0x1f360c…1f37a0 Dummy {f00=0x009c, f01=0x0190, f02=»4,DMTIOT CHECK DISC I/O T P LDR A1,A1 U P RF(NZ) DMTERR U 2 P LDKL A1,/C0FF U H $ P ANS A1,FDBDBR,A6 RELEASE BUFFER U ^ PDMT400 EQU * U " P LDR A1,A6 FDB ADDR DATA FILE U P LD A2,ECBCW+2,A9 U P ANK A2,/FF U P LD A3,ECBCW,A9 LOG REC NR
0x1f37a0…1f3934 (1, 374) Dummy {f00=0x009d, f01=0x0190, f02=» RF(E) DMT460 SEQ WRITE U P LDK A4,QRD V P CWR A7,A4 V 4 P RF(E) DMT420 RAND DEL V F P LDK A4,QRDD V d P CWR A7,A4 V x ( P RF(E) DMT420 DELAYED RANDEOM DELETE V P IFT INDXAC=1 V P LDK A4,QDEL V P CWR A7,A4 V P RF(E) DMT420 INDEXED
0x1f3934…1f3ac8 Dummy {f00=0x009d, f01=0x0190, f02=»ET GET CRN BUFFER V P LDR A10,A2 BUFFER ADDR W P IFT INDXAC=1 =2 START W : P LDK A3,QIRW W Z P CWR A7,A3 W n " P RF(E) DMT410 INDEXED REWRITE W P XIF =2 END W P CM CRNCIF,A2 W P* CLEAR INDEX CRN W P CM CRNCIF+2,A2 W PDM
0x1f3ac8…1f3c5c Dummy {f00=0x009d, f01=0x018e, f02=»NCDF,A10 CRN FIL E CODE W P IFT INDXAC=1 X P LDK A4,QINS X 6 P CWR A7,A4 X J P RF(E) DMT460 INDEXED INSERT X P XIF X PDMT420 EQU * X P LDK A4,QSR X P CWR A7,A4 X P RF(E) DMT450 SEQ READ X P LDK A4,QRR X P CWR A7,A4 X
0x1f3c5c…1f3df0 Dummy {f00=0x009d, f01=0x018e, f02=» P* Y P* RELEASE EA Y P* Y $ P CF A14,EARELB REL EA Y . P RF DMTAEX Y L PDMT450 EQU * Y ^ P LC A4,DWTST,A1 DWTSTATUS Y r P ANK A4,EABIT EA-BIT Y & P RF(NZ) DMTAEX EA=1. NO EA WANTED Y P* Y " P* CHECK IF EA IS SET ALREADY Y
0x1f3df0…1f3f84 Dummy {f00=0x009d, f01=0x0190, f02=» P CF A14,EASETB Z P RF DMTAEX Z PDMT460 EQU * Z , P* Z @ P* UPDATE LRN Z J P* Z ` P SC A2,FDBLRN,A1 Z j P ST A3,FDBLRN+1,A1 Z P IFT INDXAC=1 Z P LDK A4,QINS Z P CWR A7,A4 Z " P ABL(E) DMINS2 INDEXED INSERT Z P XIF Z
0x1f3f84…1f4118 Dummy {f00=0x009d, f01=0x0190, f02=»3F00 Z ( P RF(NZ) DMTERX NO RELEASE OF BUFFER [ PDMTEX1 LD A3,ECBBA,A8 [ 8 P SUK A3,8 [ V PDMTEX2 EQU * [ h ( P CF A14,DMTRBU RELEASE BUFFER AT A3 [ | PDMTERX EQU * [ P INH [ P* A1 = RET CODE [ P* A6 = DWT ADDR [ P CF A15,TEND
0x1f4118…1f42ac Dummy {f00=0x009d, f01=0x0190, f02=»RANDOM READ [ 2 P********************************************* " P LD A9,DWTECB,A1 USER ECB ADDR J P IFT MMUPAG=0 p P LD A8,ECBCW,A9 ADDR OF KEY P XIF P IFT INDXAC=1 P IFT MMUPAG=1 P LDR A8,A1 FDB ADDR " P ADKL A8,F
0x1f42ac…1f4440 Dummy {f00=0x009d, f01=0x018e, f02=» LDR A13,A1 P ADKL A13,FDBECB ECB ADDR ] $ P CF A14,FNDKEY GET INDEX RECORD ] 6 ( PDMR006 EQU * FROM INDEXED READ NEXT ] ^ P LD A9,DWTECB,A1 ] P LDR A6,A1 FDB ADR ] P LDKL A8,FDBECB ] P ADR A8,A6 ECB ADDRESS ] P LDR A2,A2 RETURN CODE
0x1f4440…1f45d4 (1, 375) Dummy {f00=0x009d, f01=0x018e, f02=» ] " P LD A2,FDBRRO,A1 RECORD OFFSET ^ P ADK A2,10 BUFFER HEADER ^ . P ADR A2,A3 REC ADDR ^ N P LD A4,FDBRLE,A1 REC LENGTH ^ j P SUK A4,6 KEY LENGTH ^ P ADR A2,A4 ^ " P CC A4,2,A2 DUPLICATE KEY CHAR ^ $ P RF(NE) DMR020 NEXT KEY NOT SAME ^
0x1f45d4…1f4768 Dummy {f00=0x009d, f01=0x0190, f02=» ^ P LDK A5,0 _ P LC A5,3,A2 _ P SC A5,ECBCW+3,A8 _ . P LC A5,4,A2 _ H P ECR A5,A5 _ P LC A5,5,A2 _ n P ST A5,ECBCW,A8 _ P* _ P* RELEASE BLOCK BUFFER _ P* _ P CF A14,DMTRBU _ P EJECT _ P* _ 0 P* PERFORM
0x1f4768…1f48fc Dummy {f00=0x009d, f01=0x018e, f02=» BIT _ | P SLL A2,1 ` " P LDK A7,/A RANDOM READ NO WAIT ` P ORR A7,A2 EA BIT ` D P* ` ^ P* MOVE USER ECB ` h P* ` P LDR A1,A9 FROM ECB ADDR ` P LDR A3,A8 TO ECB ADDR ` P LDK A2,6 NO OF CHAR ` P CF A14,DMTWM MOVE ECB ` P LDR
0x1f48fc…1f4a90 Dummy {f00=0x009d, f01=0x0190, f02=» P DATA 3 EXIT a PDMTAR4 EQU * a P* a , P* SET UP A14 STACK a 6 P* a R P CF A15,GETA14 a P LDR A6,A1 a r P LDKL A8,FDBECB a P ADR A8,A6 RR ECB a P LD A9,DWTECB,A6 USER ECB a P LD A1,ECBRC,A8 a & P ORS A1,ECBRC,A9 RET COD
0x1f4a90…1f4c24 Dummy {f00=0x009d, f01=0x0190, f02=»LE a x P* b ( P LD A1,FDBADF,A6 FDB ADDR DATA FILEP b & P CF A14,CRNGET GET CRN BUFFER ADDR b @ P LDR A10,A2 CRN BUFFER ADDR b j " P LDR A1,A6 FDB ADDR INDEX FILE b ( P CF A14,GTLGRN GET INDE X LOG REC NO b P SC A2,CRNCIF+1,A10 b & P ST A3,CRNCI
0x1f4c24…1f4db8 Dummy {f00=0x009d, f01=0x0190, f02=»URN CODEXS b P* c $ P LD A2,ECBEL,A8 EFFECTIVE LENGTH c P ST A2,ECBEL,A9 c D P LDK A1,0 RETURN CODE c P ABL DMTERX TENDIO c z P EJECT c " PDMIRN EQU * INDEXED READ NEXT c 2 P********************************************* c P LDR A1,A6
0x1f4db8…1f4f4c Dummy {f00=0x009d, f01=0x0190, f02=»UFFADR c P ADK A2,10 RECORD ADDR d ( P AD A2,FDBRLE,A1 ADDR OF STATUS CHAR d , P LDK A5,/FF USED MARK d X P CCR A5,A2 STATUS d v P RF(E) DMI120 USED d P LD A4,FDBMRO,A1 d & P ST A4,FDBRRO,A1 LAST REC IN SECT d P* d P* CHECK IF END O
0x1f4f4c…1f50e0 Dummy {f00=0x009d, f01=0x0190, f02=» RF(G) DMI105 EOF d P CW A3,FDBLRN+1,A1 e P RF(L) DMI106 NOT EOF e 4 PDMI105 LDR A3,A9 e R P RF DMI030 EOF e j PDMI106 LDR A3,A9 RESTORE e P RF DMI010 NEXT REC e PDMI120 EQU * e P* INDEX RECORD IS FOUND e P* e P LDK A2,0
0x1f50e0…1f5274 (1, 376) Dummy {f00=0x009d, f01=0x0190, f02=»DMI100 RECORD FOUND e P LDR A6,A1 FDB ADDR f & PDMI030 LDKL A1,/4000 KEY NOT FOUND f 8 PDMI035 EQU * f b P LDR A3,A3 BUFFER ADDR f v P ABL(Z) DMTERX NO BUFFER f P ABL DMTERR ERROR AND BUFFER f P EJECT f P* f & PDMINS2 EQU * INDEXED INS
0x1f5274…1f5408 Dummy {f00=0x009d, f01=0x0190, f02=»FSTA f " P CF A14,DMTRBU RELEASE BUFFER g PDMXDEL EQU * INDEXED DELETE g 2 6 P************************************************* g V P LDR A11,A7 ORDER CODE g P LDR A12,A8 PHYS ECB ADDR g P LDK A5,0 g . P SC A5,FDBDBR,A1 ZEROE INDEX FILE COUN
0x1f5408…1f559c Dummy {f00=0x009d, f01=0x0190, f02=» A6,A10 g P ADR A6,A5 h ( P LD A1,FDBAI1,A6 FDB ADDR INDEX FILE h " P RB(Z) DXI020 NO INDEX h N P* h l ( P* GET FILE CODE FOR THIS FDB ADDR h v P* h P LD* A6,SCTCDT h PDXI030 SUK A6,4 h P LD A7,SCTCDT h P ADR A7,A6 h P CW A1
0x1f559c…1f5730 Dummy {f00=0x009d, f01=0x0190, f02=»CBFC,A8 INDEX FILE h P LDR A6,A11 i P SUK A6,QINS i . P RF(E) DXI080 INDEXED DELETE i B P* i f $ P* GET ADDRESSS OF DATA RECORD i p P* i P LD A6,ECBBA,A12 SECTOR ADDR i P ADK A6,2 CYLID i $ P AD A6,FDBRRO,A10 ADDR DATA REC i P A
0x1f5730…1f58c4 Dummy {f00=0x009d, f01=0x0190, f02=» ADDR i v $ P LD A6,ECBBA,A9 USER BUFFER ADDR j P AD A6,FDBKA,A1 KEY OFFSET j 6 P IFT MMUPAG=1 j X P LDR A6,A1 j n " P ADKL A6,FDBKEY ADDR KEY AREA j P XIF j P IFT INDXAC=1 j $ P LDK A7,/1F INSERT INDEX NOWAIT j PDXI090 EQU * j P* j
0x1f58c4…1f5a58 Dummy {f00=0x009d, f01=0x0190, f02=» DATA DMTAR5 j P LD A7,ECBRC,A8 k P RF(N) DMTAR5 REQ ERR k , P RB DXI020 NEXT INDEX DIRECT k J PDXI100 LKM k n P DATA 3 EXIT k PDMTAR5 EQU * k " P LD A6,FDBADF,A1 FDB DATA FILE k P LD A9,DWTECB,A6 USER ECB k P LDKL A8,FDBECB k P
0x1f5a58…1f5bec Dummy {f00=0x009d, f01=0x0190, f02=»A9 RC TO USER k P LDK A1,0 RETURN CODE l & P LC A2,FDBDBR,A6 NR OF READY INDEX l 4 P ADK A2,1 COUNT INDEXES l ^ $ P CC A2,FDBNIF,A6 TOT NR OF INDEX l ~ P RF(NE) DXI200 l P LD A7,DWTOR,A6 l P ANK A7,/3F ORDER CODE l P SUK A7,QINS INDEXED I
0x1f5bec…1f5d80 Dummy {f00=0x009d, f01=0x0190, f02=» P ADKL A10,2 CYLID m P AD A10,FDBRRO,A6 m & P AD A10,FDBRLE,A6 ADDR STATUS CHAR m 8 P LDK A1,0 STATUS FREE m b . P ABL DMT350 CONTINUE AS FOR RANDOM DELETE m PDXI200 EQU * m P SC A2,FDBDBR,A6 m P LKM m " P DATA 3 EXIT. MORE INDEX LEFT
0x1f5d80…1f5f14 (1, 377) Dummy {f00=0x009d, f01=0x0190, f02=»*************** m r " P LD A9,DWTECB,A1 USER ECB ADDR n $ P LD A8,ECBBA,A9 BUFFER ADDR USER n > P LDR A12,A8 n f $ P LD A11,FDBRLE,A1 RECORD LENGTH n z P SUKL A11,6 KEY LENGTH n P LDR A13,A14 n 0 P ADKL A13,2 ECB ADDR TO RECORD BUFFER AREASS n $ P
0x1f5f14…1f60a8 Dummy {f00=0x009d, f01=0x0190, f02=»OR FOUND n z P LDR A13,A3 BUFFER ADDR o " P LD A4,FDBADF,A6 FDB DATA FILE o 0 P LD A5,DWTECB,A4 USER ECB o V P LD A1,DWTOR,A6 o x P ANK A1,/3F o P SUK A1,QDELX o & P ABL(E) DEL000 DELETE INDEX RECORD o P* o ( P* SET RC BIT 6 TO USER I
0x1f60a8…1f623c Dummy {f00=0x009d, f01=0x018e, f02=»EY NOT ALLOWED IN FILE) o P* p P LC A4,ECBFC,A5 FILE CODE p * P CC A4,FDBECB+1,A6 p L * P RF(NE) INS049 NOT REQUESTED FILE CODE p f P LDKL A4,/200 BIT 6 p " P ORS A4,ECBRC,A5 NEXT KEY SAME p PINS049 EQU * p P IFT INSLAS=1 p P* p
0x1f623c…1f63d0 Dummy {f00=0x009d, f01=0x018e, f02=» P CF A14,RDNXTR GET NEXT REC q P RF INS100 OK q ( P ABL DEL045 ERROR q > PINS100 EQU * q X P ADR A2,A3 q l P ADK A2,10 REC ADDR q ~ P AD A2,FDBRLE,A1 ADDR STATUS q P LDK A5,/FF q P CCR A5,A2 q P RF(E) INS150 USED q P LD A5,FDB
0x1f63d0…1f6564 Dummy {f00=0x009d, f01=0x0190, f02=» P CWR A5,A11 KEY LENGTH r $ P RB(E) INS080 NEXT SAME GET NEXT r " P* r J P* UPDATE LAST SAME RECORD r T P* r x P SC A11,-4,A2 NEXT SAME r P LD A7,FDBRRO,A1 r P CW A7,FDBMRO,A1 r & P RF(NE) INS160 SECT WRITTEN LATER r P* r P*
0x1f6564…1f66f8 Dummy {f00=0x009d, f01=0x018e, f02=» P ABL(NZ) DMTERR s P* s P* GET NEXT RECORD s & P* s B PINS160 EQU * s L " P LDR A7,A5 NR OF SAME IN NEXT s ` P LDR A1,A6 FDB s P CF A14,RDNXTR GET NEXT RC s P RF INS170 OK s P ABL DEL045 ERROR s PINS170 EQU * s P LDR A
0x1f66f8…1f688c Dummy {f00=0x009d, f01=0x0190, f02=» s P* t ( P* CREATE AN INDE XRECORD IN AREA 1 t P* t > P LDR A1,A12 FROM ADDR t H P* t f P LDR A3,A14 t p P ADK A3,2 TO ADDR t P LDR A2,A11 KEY LENGTH t P CF A14,DMTBM MOVE KEY t P LDK A2,0 t P SCR A2,A3 DUMMY t P ADK
0x1f688c…1f6a20 Dummy {f00=0x009d, f01=0x0190, f02=»R t t P LD A2,ECBCW+2,A5 u ( P LD A3,ECBCW,A5 REC NR DATA FILE REC u $ P SCR A2,A7 u P P ADK A7,2 u b P SCR A3,A7 u t P ECR A3,A3 u P SUK A7,1 u P SCR A3,A7 LOG REC NR u P ADK A7,2 u P LDK A1,/FF USED u P SCR A1,A7 STATUS CHAR
0x1f6a20…1f6bb4 (1, 378) Dummy {f00=0x009e, f01=0x0190, f02=» u P ST A2,-28,A14 v P ST A3,-26,A14 v P EJECT v 4 P* v B : P* BELOW IS A NEW INDEX RECORD INSERTED AND FOLLOWING v L $ P* USED RECORDS ROLLED FORWARD v $ P* A6,A11,A13 IS USED AT ENTRY v $ P ADKL A11,7 RECORD LENGTH TOTAL v P* v
0x1f6bb4…1f6d48 Dummy {f00=0x009e, f01=0x0190, f02=»A12 = AREA INDEX 0=BUFAR1,1=BUFAR2 v $ P* A13 = BUFFER ADDRESS SECTOR w , P* w T PINS190 EQU * w ^ P LDKL A12,1 BUFADR2 w r PINS200 EQU * w P LDK A1,0 w P LDR A12,A12 w P RF(Z) INS210 BUFAR1 w ( P LDKL A1,RECBFZ RECORD BUUFFER SIZE
0x1f6d48…1f6edc Dummy {f00=0x009e, f01=0x0190, f02=» LAST RECORD w P* x P LDR A1,A13 x P ADK A1,10 BUFSTA+2 x 2 . P AD A1,FDBMRO,A6 ADDR OF LAST REC IN SECT x N P LDR A2,A11 x P LDR A3,A10 x " P CF A14,DMTBM SAVE LAST RECORD x P* MOVE REST OF SECTOR x P* x P LDR A1,A13 x
0x1f6edc…1f7070 Dummy {f00=0x009e, f01=0x0190, f02=» x t P LDR A3,A1 y P ADR A3,A11 TO ADDR y P CF A14,DMTBMR MOVE y 6 P* INSERT NEW RECORD y R P* y p P LDKL A1,RECBFZ BUFFER SIZE y z P SLL A1,1 BYTE NO y P LDR A12,A12 y P RF(Z) INS250 BUFAR1 y " P LDK A1,0 SELECT OTHER BUFFER y
0x1f7070…1f7204 Dummy {f00=0x009e, f01=0x0190, f02=» P CF A14,DMTBM MOVE z P* WRITE BUFFER z P* z 6 P LDR A8,A14 USE STACK AS ECB z @ P SUKL A8,24 z d $ P LC A2,FDBEXT+1,A6 VOL DEV CODE z x P ANK A2,/FF z P STR A2,A8 z P LDR A2,A13 z P ADK A2,8 BUFSTA z P ST A2,ECBBA,A8 SECT
0x1f7204…1f7398 Dummy {f00=0x009e, f01=0x0190, f02=» z v P LDK A7,/95 WRITE , WAIT { P LKM { ( P DATA 1 { 4 P LDR A1,A6 FDB INDEX { D P CF A14,DMTIOZ IO CHECK { ` P LDR A1,A1 { P ABL(NZ) DMTERR { P* { 6 P* IF SPILLED RECORD IS FREE, OPERATION IS READY { P* { P LDR A2,A10 RECO
0x1f7398…1f752c Dummy {f00=0x009e, f01=0x0190, f02=»T IN SECT { v P CCR A1,A2 | P RF(Z) INS400 FREE RECORD | $ P* | F P* GET NEXT SECTOR | P P* | l P LDR A1,A6 FDB ADDR | v P LDR A3,A13 BUFFER ADDR | 2 P CF A14,RDNXTR GET FIRST RECORD IN NEXT SECTOR | P RF INS260 OK | P LDR A1,A5
0x1f752c…1f76c0 Dummy {f00=0x009e, f01=0x0190, f02=»D BUFFERS | v P SUR A12,A12 } P RB INS200 } & P EJECT } 8 PINS400 EQU * } F P* } Z ( P* UPDATE LRN IF EOF IS ENCOUNTERED } d P* } P LDR A1,A6 FDB INDEX } P CF A14,GTLGRN } P CC A2,FDBLRN,A1 } P RF(L) INS430 NO EOF } P RF(G)
0x1f76c0…1f7854 (1, 379) Dummy {f00=0x009e, f01=0x0190, f02=»T A3,FDBLRN+1,A6 } P LDKL A1,/1000 EOF ~ P ORS A1,ECBRC,A9 EOF TO USER ~ 4 PINS430 EQU * ~ X P* ~ l 0 P* UPDATE CRN-LINK FOR MOVED INDEX RECORDS ~ v P* ~ P LDKL A12,1 ADD ON E TO CRN ~ P LDR A8,A2 ~ P LDR A9,A3 LAST REC NR MOVED ~
0x1f7854…1f79e8 Dummy {f00=0x009e, f01=0x0190, f02=»TE CRN IF SAME FILE CODE ~ P* P LD A1,FDBADF,A5 FDB DATA F * " P CF A14,CRNGET GET CRN BUFFER N & P LD A9,DWTECB,A1 USER ECB ADDR =4 t " P LC A4,ECBFC,A9 USER FILE CODE P CC A4,FDBECB+1,A5 P RF(NE) INS440 OTHRER FILE P ST A10,
0x1f79e8…1f7b7c Dummy {f00=0x009e, f01=0x0190, f02=»DK A1,0 OK RET CODE P LDR A3,A13 BUFFER ADDR P ABL DMTEX2 < P EJECT P * PDEL000 EQU * DELETE INDEX RECORD CONT ^ P LDR A12,A5 USER ECB ADDR P LDR A2,A2 PDEL010 EQU * " P ABL(NZ) DMI030 KEY NOT FOUND P* P*
0x1f7b7c…1f7d10 Dummy {f00=0x009e, f01=0x0190, f02=»7 BUFSTA+2-3=ADDR REC NR P LCR A2,A1 P CC A2,ECBCW+3,A12 REC NR 2 P RF(NE) DEL030 WRONG RECORD T P LC A2,1,A1 x P ECR A2,A2 P LC A2,2,A1 REC NR P CW A2,ECBCW,A12 P RF(E) DEL200 RECORD FOUND PDEL030 EQU * P*
0x1f7d10…1f7ea4 Dummy {f00=0x009e, f01=0x018e, f02=»DB INDEX PDEL040 EQU * ( P CF A14,RDNXTR GET NEXT INDEX RECORD $ P RF DEL050 OK P PDEL045 LDR A1,A5 ERROR CODE f P ABL DMI035 ERROR PDEL050 EQU * P* P* CHECK IF RECORD IS USED P* P LDR A13,A3 NEW BUFFER A
0x1f7ea4…1f8038 Dummy {f00=0x009e, f01=0x0190, f02=» P RB(E) DEL020 USED P LD A4,FDBMRO,A1 ( P ST A4,FDBRRO,A1 LAST REC IN SECTOR 6 P RB DEL040 NEXT REC b P EJECT ~ PDEL200 EQU * RECORD FOUND P* & P* SET RC BIT 6 IF NEXT KEY SAME P* $ P LC A2,ECBFC,A12 USER FILE C
0x1f8038…1f81cc Dummy {f00=0x009e, f01=0x0190, f02=»A6 * P RF(NE) DEL220 NOT REQUESTED FILE CODE P CWR A11,A7 KEY LENGTH : $ P RF(NE) DEL220 NEXT KEY NOT SAME X P LDKL A4,/200 $ P ORS A4,ECBRC,A12 NEXT KEY SAME PDEL220 EQU * P* $ P* MOVE UP RECORDS OVER DELETED P*
0x1f81cc…1f8360 Dummy {f00=0x009e, f01=0x0190, f02=» P ADR A1,A11 FROM ADDR P LD A2,FDBMRO,A6 & P SU A2,FDBRRO,A6 NR OF CHAR > P CF A14,DMTBM MOVE b P* | P* SET LAST RECORD FREE P* P ADR A3,A11 P SUK A3,1 P LDK A1,0 P SCR A1,A3 STATUS FREE P*
0x1f8360…1f84f4 (1, 380) Dummy {f00=0x009e, f01=0x018e, f02=» " P LDR A11,A3 FIRST REC NR MOVED P LD A12,FDBRRO,A6 OLD OFFSET * P LD A4,FDBMRO,A6 N P ST A4,FDBRRO,A6 MAX OFFSET f $ P CF A14,GTLGRN LAST REC NR MOVED P LDR A8,A2 P LDR A9,A3 REC NR " P ST A12,FDBRRO,A6 RESET OFFSET P LDK
0x1f84f4…1f8688 Dummy {f00=0x009e, f01=0x0190, f02=» ~ $ P RF(NZ) DEL290 NOT FIRST RECORD P LDR A1,A5 FDB 0 P CF A14,GTLGRN GET REC NR F P LDR A1,A2 h P LDR A2,A3 z P LDK A6,0 P LDK A7,1 $ P CF A14,DSUMOD A1,A2 = A1,A2 - 1 P RF(Z) DEL600 FILE START P LDR A6,A5 FDB A
0x1f8688…1f881c Dummy {f00=0x009e, f01=0x0190, f02=»A14 P ADKL A8,2 ECB ADDR P LDR A12,A12 ( $ P RF(Z) DEL245 BUFFER NOT CHANGED < P* d P* WRITE SECTOR n P* P LDK A7,/95 WRITE WAIT P LKM P DATA 1 P LDR A1,A5 FDB P CF A14,DMTIOZ IO CHECK P LDR A1,
0x1f881c…1f89b0 Dummy {f00=0x009e, f01=0x018e, f02=»EASE BUFFER ~ P* P* GET PREVIOUS SECTOR P* > P LDR A1,A5 FDB ADDR H P LDK A3,0 d P CF A14,RDNXTR GET SECTOR v P RF DEL250 OK P LDR A6,A1 FDB ADDR P RB DEL045 PDEL250 EQU * P LDR A5,A1 FDB P L
0x1f89b0…1f8b44 Dummy {f00=0x009e, f01=0x018e, f02=» PDEL300 EQU * * P ST A4,FDBRRO,A5 PREVIOS RECORD OFFSET P ADK A4,10 BUFSTA+2 F P ADR A4,A13 RECORD ADDR b & P AD A4,FDBRLE,A5 STATUS CHAR ADDR P LDK A2,/FF P CCR A2,A4 P RB(NE) DEL240 FREE . P LC A2,17,A14 NR OF SAME I
0x1f8b44…1f8cd8 Dummy {f00=0x009e, f01=0x0190, f02=» v PDEL600 EQU * P LDR A12,A12 $ P RF(Z) DEL900 BUFFER NOT CHANGED 0 P* X P* WRITE SECTOR b P* z PDEL700 EQU * P LDR A8,A14 P ADKL A8,2 ECB ADDR P LDK A7,/95 WRITE WAIT P LKM P DATA 1 P LDR A
0x1f8cd8…1f8e6c Dummy {f00=0x009e, f01=0x401c, f02=» XIF P END @ LDR A12,A12 $ P RF(Z) DEL900 BUFFER NOT CHANGED 0 P* X P* WRITE SECTOR b P* z PDEL700 EQU * P LDR A8,A14 P ADKL A8,2 ECB ADDR P LDK A7,/95 WRITE WAIT P LKM P DATA 1 P LDR A
0x1f8e6c…1f9000 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* +
0x1f9000…1f9194 (1, 381) Dummy {f00=0x009e, f01=0x0190, f02=» MPYMODF , ( 0 D $ V T 2 T , ( 4 ^ S W B MOV:US r , ( : U ; $ T $ T $ T x : : , ( $ T $ ) ] $ ) Y _$ , ( U x 0 )_8 $_ $
0x1f9194…1f9328 Dummy {f00=0x009e, f01=0x0002, f02=»
0x1f9328…1f94bc Dummy {f00=0x009e, f01=0x0190, f02=» 2 P IDENT DVKB02 REL 9.2 79-11-16 870105040920 P : " P* KEYBOARD DEVICE WORK TABLE B P* h P ENTRY DVKB02 TABLE ENTRY r P EXTRN CTAB03 ( P EXTRN KBAD3 POINTER TO ADDRESSBLOCK P EXTRN DVDY02 PMMUPAG EQU 1 P*
0x1f94bc…1f9650 Dummy {f00=0x009e, f01=0x0190, f02=»ADDRESS P DATA DWTEND-DVKB02 ORDER ( P DATA KBAD3 POINTER TO ADDRESS BLOCK 2 P DATA 'KB' TTAB-ADDRESS ^ $ P DATA 0 WAIT/ACTIVATE INDICATOR ~ P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DAT
0x1f9650…1f97e4 Dummy {f00=0x009e, f01=0x0190, f02=»VE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-STACK 6 P DATA 0 TIMER POINTER N P DATA DVDY02 DVDY02O DEVICE l $ P DATA /FFFF BACKSPACE AND CANCEL $ P DATA /FFBA EOR AND DOUBLE ZERO 6 P DATA DWTSQ+DVKB02 POINTER TO FIRST PLAC
0x1f97e4…1f9978 Dummy {f00=0x009e, f01=0x4100, f02=»A 0,0,0,0,0,0,0,0 P DATA 0,0,0,0 P IFT MMUPAG=1 0 PDEVECB EQU * F P DATA 0,0,0,0,0,0 Z P DATA 0,0,0,0,0,0,0,0 t P DATA 0,0,0,0,0,0,0,0 P DATA 0,0,0,0 P XIF PDWTEND EQU * P* P END @ RST PLAC
0x1f9978…1f9b0c Dummy {f00=0x009e, 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
0x1f9b0c…1f9ca0 Dummy {f00=0x009e, f01=0x0190, f02=» $ t P % P* % P* % P* % & P* TIMER HANDLING PART % 0 P* % N P* % X P* % b P* READ TIMER=TIMERR % l P* % PTIMERE EQU * % P LDR A1,A6 % . P LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE % P RF(Z) TIME10 NO TIMING %
0x1f9ca0…1f9e34 (1, 382) Opaque[0x194]
0x1f9e34…1f9fc8 # DirEnt {nam=»DMINIT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x13e0, f03=0x0000}
0x1f9e34…1f9fc8 IdxSect {
0x1f9e34…1f9fc8 f00 = 0x009f // 0x1f9e34 @0x0
0x1f9e34…1f9fc8 f01 = 0x0004 // 0x1f9e36 @0x2
0x1f9e34…1f9fc8 gno = [ // 0x1f9e38 @0x4
0x1f9e34…1f9fc8 [0x00]: C0x009f.0x0.0
0x1f9e34…1f9fc8 [0x01]: C0x009f.0x1.0
0x1f9e34…1f9fc8 ]
0x1f9e34…1f9fc8 }
0x1f9fc8…1fa15c Dummy {f00=0x009f, f01=0x0190, f02=» 2 P IDENT DMINIT REL 9.2 79-11-16 870105040920 P : P* B 8 P**************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P* DMINIT = DATA MANAGEMENT INITIALIZATION P* P*
0x1fa15c…1fa2f0 Dummy {f00=0x009f, f01=0x018e, f02=»FDB:S IN THE FDB AREA z > P* CLEAR THE USE BIT AND THE BUFFER HEADER IN DM BUFFERS 0 P* CLEAR USE BIT AND QUEUE ANCHOR IN TASBLK ` , P* CLEAR DM FILE CODE ENTRIES IN CD:TAB P* , P* DMINIT IS CALLED AS A PFINIT ROUTINE P* " P
0x1fa2f0…1fa484 Dummy {f00=0x009f, f01=0x0190, f02=» P EXTRN FDBSTA P EXTRN FDBEND P EXTRN CURBUF 0 P EXTRN BUFDMI F P EXTRN BUFSNR P EXTRN BUFOR r P EXTRN TASBLK P EXTRN TASQUE P EXTRN CRNQUE,CRNEND P EXTRN CRBUFL P EJECT P* P* P*
0x1fa484…1fa618 Dummy {f00=0x009f, f01=0x0190, f02=» P* DIV W. 2 FOR 16 K LIMIT P* ( P LDR A5,A4 2 P SRL A5,1 D P LDR A1,A6 V P SRL A1,1 h P CWR A5,A1 z " P RF(G) DMIN40 END OF FDB AREA P STR A4,A3 CHAIN P LDR A3,A4 P RB DMIN30 PDMIN40 EQU * P SUR A
0x1fa618…1fa7ac Dummy {f00=0x009f, f01=0x0190, f02=»ALIZATIONS IF POWER FAIL RESTART P* ( P LD A1,INIFLG 2 P RF(Z) DMINEX H P LDKL A2,QFDBFL FDB LENGTH ^ P* $ P* CHAIN FDB:S IN THE FDB AREA P* P LDKL A3,FDBSTA P LDKL A6,FDBEND P CF A15,DMIN30 P*
0x1fa7ac…1fa940 Dummy {f00=0x009f, f01=0x0190, f02=» P CF A15,DMIN30 P* < P* CLEAR USE BIT AND BUFFER HEADER WORDS IN DM BUFFERS $ P* d P LDKL A2,/FFFE n P LD A3,CURBUF PDMIN50 LDR* A3,A3 P ANRS A2,A3 CLEAR USE BIT P CM BUFDMI,A3 P CM BUFSNR,A3 P CM BU
0x1fa940…1faad4 (1, 383) Dummy {f00=0x009f, f01=0x405a, f02=»LK P CM TASQUE P* PDMINEX EQU * & P RTN A15 : P END J@ V
0x1faad4…1fac68 Dummy {f00=0x009f, 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
0x1fac68…1fadfc Dummy {f00=0x009f, f01=0x0190, f02=» J F IDENT DMTASS REL 9.2 79-11-16 870105040920 ( $ DMTASSK VTLRN VLVBA VLVRL SECTLEA R VLVBA ~ VLVRL VTLRN SECTLEA TASECB ECBBA ECBRC , (
0x1fadfc…1faf90 Dummy {f00=0x009f, f01=0x018e, f02=» : t TASMXAE TASASB & VOLCHE 8 , ( 7H@ A A " P "" J TASCVO z CLRBUF * & Q H P @ TASVOL ECBFC ECBRL ECBCW
0x1faf90…1fb124 Dummy {f00=0x009f, f01=0x0190, f02=» TASVLEP , ( L " TOP A " L TASVRL F , ( B A $ L C & @ $ X TASFIL , ( " A $Q @ A @ DMTRBU , ( ( B * D
0x1fb124…1fb2b8 Dummy {f00=0x009f, f01=0x018e, f02=» j , ( G & @ (T , ( a A " 0" : , ( U _ L !SSP !LL j TASCXOS , ( W L @ , A ,V TASSEXR TASXLBP , (
0x1fb2b8…1fb44c Dummy {f00=0x009f, f01=0x0190, f02=» FDBVTO , ( H 4 2% P R 6 X T R FDBMIA# J , ( 8 @ "T R :T @ ( , ( 6 4 2% P QFDBFL , ( = 2 < P % DWTST
0x1fb44c…1fb5e0 Dummy {f00=0x009f, f01=0x0190, f02=» E 3 P S F P S FDBRLE " FDBBLF 4 FDBNIF F * & F P S H P S J P % S X FDBKA FDBMEC * & L P & S N @ " S 8 DWTMEC , ( @ P S R B
0x1fb5e0…1fb774 (1, 384) Opaque[0x194]
0x1fb774…1fb908 # DirEnt {nam=»DMTASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x13f0, f03=0x0000}
0x1fb774…1fb908 IdxSect {
0x1fb774…1fb908 f00 = 0x009f // 0x1fb774 @0x0
0x1fb774…1fb908 f01 = 0x0010 // 0x1fb776 @0x2
0x1fb774…1fb908 gno = [ // 0x1fb778 @0x4
0x1fb774…1fb908 [0x00]: C0x009f.0x2.0
0x1fb774…1fb908 [0x01]: C0x009f.0x3.0
0x1fb774…1fb908 [0x02]: C0x00a0.0x0.0
0x1fb774…1fb908 [0x03]: C0x00a0.0x1.0
0x1fb774…1fb908 [0x04]: C0x00a0.0x2.0
0x1fb774…1fb908 [0x05]: C0x00a0.0x3.0
0x1fb774…1fb908 [0x06]: C0x00a1.0x0.0
0x1fb774…1fb908 [0x07]: C0x00a1.0x1.0
0x1fb774…1fb908 ]
0x1fb774…1fb908 }
0x1fb908…1fba9c Dummy {f00=0x009f, f01=0x0190, f02=» 2 P IDENT DMTASS REL 9.2 79-11-16 870105040920 P : P* =3 PR 5141 B P* = 79-04-06 X P* =2 WAIT AT VTOC READ n P* REL 9.1 79-04-06 P* =1, PR 3413 P* REL 9.1 78-10-25 P P P* P* 8 P******
0x1fba9c…1fbc30 Dummy {f00=0x009f, f01=0x0190, f02=»LE CODE DISC I/O HANDLING z P* " P* , P* 6 P* @ P* J P* T 8 P**************************************************** ^ P* * P* THIS MODULE IS ACTIVATED FROM TASS P* B P* INPUT A2 = TID TASK IDENT OF DMTASK AT
0x1fbc30…1fbdc4 Dummy {f00=0x009f, f01=0x0190, f02=» ASSIGNED CAN X L P* RECIDE ARE DEFINED. ON THESE VOLUMES THE VTOC:S ARE SEARCHED TO FIND D P* ALL EXTENTS FOR THE FILE TO BE ASSIGNED. FOR EACH EXTENT ITS f > P* FILE-SECTION-NO, FILE-EXTENT-NO,FILE-EXTENT-LENGTH AND . P* FILE-EXTENT-BASE ARE
0x1fbdc4…1fbf58 Dummy {f00=0x009f, f01=0x0190, f02=»-LENGTH, BLOCKING-FACTOR AND VTOC-REC-NO r P* ARE SAVED TOO. 0 L P* WHEN THE FIRST EXTENT HAS BEEN FOUND EXISTING FDB:S CAN BE SEARCHED J L P* TO CHECK IF THE FILE TO BE ASSIGNED HAS PREVIOUSLY BEEN ASSIGNED TO L P* ANOTHER FILE CODE. IF SO T
0x1fbf58…1fc0ec Dummy {f00=0x009f, f01=0x0190, f02=»EN A NEW FDB MUST BE INITIALIZED AND THE REST OF THE 4 P* VOLUMES ARE CHECKED TO FIND ALL FILE EXTENTS < P* t 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
0x1fc0ec…1fc280 Dummy {f00=0x009f, f01=0x018e, f02=»MTASS P ENTRY VTLRN P ENTRY VLVBA " P ENTRY VLVRL 6 P ENTRY SECTLE J P EJECT ` P* n P***************** x P* EXTERNALS * P***************** P* P EXTRN QTJOB P EXTRN FNDTID,TTB:TD P*
0x1fc280…1fc414 (1, 385) Dummy {f00=0x009f, f01=0x0190, f02=» P EXTRN ECBRL P EXTRN ECBRC P EXTRN ECBCW , P* @ P EXTRN TIODM J P EXTRN DMTGBU ^ P EXTRN DMTRBU t P EXTRN CLRBUF P EXTRN BUFSTA P EXTRN BUFSNR P EXTRN BUFDMI P* P EXTRN QFDBFL P EXTRN
0x1fc414…1fc5a8 Dummy {f00=0x009f, f01=0x0190, f02=»BAS P EXTRN FDBRLE P EXTRN FDBBLF " P EXTRN FDBVTO 8 P EXTRN FDBLRN N P EXTRN FDBNIF,FDBKA d & P EXTRN FDBMIA,FDBAI1,FDBADF,FDBCRL . P EXTRN FDBSNR,FDBMRN,GTLGRN,EXTELE,FDBCEX P EXTRN FDBDBR,FDBMRO . P EXTRN FDBMEC MM
0x1fc5a8…1fc73c Dummy {f00=0x009f, f01=0x0190, f02=» P EXTRN TASCXO P EXTRN TASSEX P EXTRN TASXLB 0 P EXTRN TASFDB F P EXTRN TASVRL P EXTRN TASVLE r P EXTRN TASVRN P EXTRN TASECB P EXTRN TASFIL,TASTID,TASMXA P EXTRN TASSPW,TASFDD,TASTBE P EXTRN TASCA
0x1fc73c…1fc8d0 Dummy {f00=0x009f, f01=0x018e, f02=» PX:B EQU 0 4 PINDXAC EQU 00000 INDEX ACCESS FUNCTIONS WHEN = 1 P* N . P* A PROGRAM VERSION USING TOSS MMU PAGING X * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG EQU 1 P* P EJECT P* P************
0x1fc8d0…1fca64 Dummy {f00=0x009f, f01=0x0190, f02=» PVLVRL EQU 14 PVLVER EQU 34 P* , PVTFSNO EQU 8 6 PVTFXNO EQU 10 J PVTFXLE EQU 14 ` PVTFXBA EQU 18 v PVTLRN EQU 21 PVTRLE EQU 24 PVTBLF EQU 26 PVTFIOR EQU 27 PVTNIF EQU 37 PVTKA EQU 38 P*
0x1fca64…1fcbf8 Dummy {f00=0x009f, f01=0x0190, f02=»RDS P DATA 0,0 STACK PDMTA14 EQU *-2 $ P EJECT : P* H P************** R P* DMTIOC * h P************** ~ P* : P* ENTRY DMTIOC CHECK RETURN CODES AFTER DISC I/O > P* RETURN TO DMTASX WITH A
0x1fcbf8…1fcd8c Dummy {f00=0x009f, f01=0x0190, f02=»FF BIT 7 ONLY RETRIES P RF(Z) DMTIOX P ADKL A14,4 4 P ANK A1,/80 H $ P RF(NZ) DMT060 NEW VOLUME LOADED P SUKL A3,BUFSTA , P CM BUFDMI,A3 CLEAR VOL IDENT IN BUFFER P LDK A7,1 P ABL DMTASX DISC I/O ERROR PDMTIOX E
0x1fcd8c…1fcf20 Dummy {f00=0x009f, f01=0x0190, f02=»QU * 8 P LDKL A14,DMTA14 INITIALIZE DMTASK A14 STACK POINTER P ST A2,TASTID TASK IDENT H P CM TASMXA MASTER INDEX ADDR h P ANK A2,/2 P RF(Z) DMT010 NOT FLEXTASC P* & P* PERFORM VOLUME CHECK WITH LOCK P* P LD A8,TAS
0x1fcf20…1fd0b4 (1, 386) Dummy {f00=0x00a0, f01=0x0190, f02=»DR A1,A1 P RF(Z) DMT010 OK P LDK A7,4 VOL UNKNOWN ( P SUR A8,A8 NO BUFFER =3 F P ABL DMTASX f PDMT010 EQU * z P* P LDKL A8,TASECB P* 6 P LD A1,TASCVO OFFSET INTO TASVOL FOR FIRST VOLUME PDMT050 EQU * , P
0x1fd0b4…1fd248 Dummy {f00=0x00a0, f01=0x0190, f02=» LDKL A2,SECTLE " P ST A2,ECBRL,A8 SECTOR LENGTH P LDK A2,0 > 0 P ST A2,ECBCW,A8 SECTOR #0 VL (VOLUME LABEL) P P* P* 2 P CF A14,DMTGBU GET A DM BUFFER ADDRESS IN A3 P DATA /5700 NOP. READ ALWAYS P ADKL A3,BUFSTA &
0x1fd248…1fd3dc Dummy {f00=0x00a0, f01=0x0190, f02=»IT =2 P LKM P DATA 1 =2 . P LDKL A14,DMTA14 SET UP A14 STACK POINTER . P CF A14,DMTIOC I/O CHECK ` P LD A2,VLVER,A3 VERSION & P CWK A2,'TO' DTOSS FORMATED DISC? P RF(E) DMT100 YES P LDK A7,8 NO P ABL DMTASX ERRO
0x1fd3dc…1fd570 Dummy {f00=0x00a0, f01=0x018e, f02=»3 VTOC BASE . P ST A2,ECBCW,A8 1:ST VTOC SECTOR NO = FSAT & P LD A9,VLVRL,A3 VTOC RECORD LENGTH F P ST A9,TASVRL p P EJECT P* P* SEARCH ALL VTOC:S P* PDMT110 EQU * P LD A6,TASVLE P SUK A6,1 P ST A6
0x1fd570…1fd704 Dummy {f00=0x00a0, f01=0x018e, f02=» P LD A1,TASCVO P SUK A1,2 & P ABL(N) DMT300 ALL VOLUMES CHECKED 0 P ST A1,TASCVO UPDATE TASCVO Z $ P LDK A7,7 TOO MANY FILE SECTIONS ~ P LD A3,TASFIL " P ABL(NZ) DMTASX NOT DATA FILE P LD A3,ECBBA,A8 P SUKL A3,BUFST
0x1fd704…1fd898 Dummy {f00=0x00a0, f01=0x0190, f02=» P* ACTIVATE NEXT DM TASK P* * P ADKL A7,'#D' 4 P LKM J P DATA -4 V P DATA DMTASS f P LKM z P DATA 3 EXIT P EJECT P* & P* READ NEXT VTOC SECTOR AND EXIT P* PDMT115 EQU * P LD A3,ECBBA,A
0x1fd898…1fda2c Dummy {f00=0x00a0, f01=0x0190, f02=» LD A1,TASVOL,A1 P CF A14,DMTGBU GET BUFFER P DATA /5700 NOP. READ ALWAYS : P ADKL A3,BUFSTA ^ P ST A3,ECBBA,A8 v P ST A2,ECBCW,A8 P LDK A7,/91 WAIT =2 P LKM P DATA 1 =2 P LDKL A14,DMTA14 P CF A14,DMTIOC
0x1fda2c…1fdbc0 Dummy {f00=0x00a0, f01=0x0190, f02=» $ P RF(NE) DMT135 NOT MASTER INDEX " P ADKL A11,14 MX FILE NAME ADDR , PDMT135 EQU * R P ADK A3,2 SKIP CYLID f PDMT120 EQU * ( P IM TASVRN INCREMENT VTOC RECORD NO P LDR A4,A3 " P ADR A4,A9 ADDRESS STATUS BYTE P LCR A2,A4
0x1fdbc0…1fdd54 (1, 387) Dummy {f00=0x00a0, f01=0x0190, f02=»AME MAX 4 WORDS PDMT150 EQU * P LDR* A10,A4 , P CWR* A10,A7 @ P ABL(NE) DMT250 NO MATCH T P SUK A2,1 t . P RF(NP) DMT160 ALL 4 FILE NAME WORDS MATCH P ADK A4,2 P ADK A7,2 P RB DMT150 CHECK NEXT WORD P* ( P
0x1fdd54…1fdee8 Dummy {f00=0x00a0, f01=0x0190, f02=»F(E) DMT165 YES P CCK A2,'LL' LIBRARY FILE ? P ABL(NZ) DMT250 NO < P LDK A2,0 FILE EXTENT NUMBER V P RF DMT167 z . PDMT165 LD A2,VTFSNO,A3 FILE SECTION NUMBER P EJECT PDMT167 EQU * P* . P* GET INFO FROM VTOC AND SAV
0x1fdee8…1fe07c Dummy {f00=0x00a0, f01=0x0190, f02=»1,4 P ST A1,TASCXO P RF(NN) DMT170 <= 4 EXTENTS " P LDK A7,9 F * P ABL DMTASX MORE THAN 4 EXTENTS EXIST X PDMT170 EQU * " P ECR A2,A2 TO LEFT HALF OF A2 4 P LC A2,VTFXNO+1,A4 EXT NO INTO RIGHT HALF OF A2 P ST A2,TASSEX,A1
0x1fe07c…1fe210 Dummy {f00=0x00a0, f01=0x0190, f02=» P LD A2,VTFXBA,A4 EXTENT BASE P ST A2,TASXLB+2,A1 ( P LD A2,TASSEX,A1 B $ P RF(NZ) DMT250 NOT FIRST EXTENT Z P EJECT P* FIRST FILE EXTENT < P* CHECK IF AN FDB DESCRIBING THE FILE ALREADY EXISTS. P* P LD A12,TASFDB
0x1fe210…1fe3a4 Dummy {f00=0x00a0, f01=0x0190, f02=»A12,FDBSTA PDMT200 EQU * P LDR* A5,A12 & P ANK A5,/01 : P RF(Z) DMT210 FREE N P LD A2,FDBEXT,A12 h P CW A2,TASVOL,A6 " P RF(NE) DMT210 NOT SAME VOLUME P LD A2,FDBVTO,A12 P CW A2,TASVRN $ P RF(NE) DMT210 NOT SAME
0x1fe3a4…1fe538 Dummy {f00=0x00a0, f01=0x0190, f02=»DB FOUND n PDMT205 EQU * P LDK A7,5 FILE CODE USED $ P ABL DMTASX D P* X $ PDMT210 LDR* A12,A12 GET NEXT FDB b P ANKL A12,/FFFE ( P RB(NE) DMT200 MORE FDB:S TO SEARCH P* 0 P* NO MATCHING FDB EXIST FIND A FREE FDB
0x1fe538…1fe6cc Dummy {f00=0x00a0, f01=0x0190, f02=» v P ANKL A12,/FFFE & P RB(NE) DMT220 MORE FDB:S TO CHECK P LDK A7,3 J P ABL DMTASX NO FDB AVAILABLE ( P* INITIALIZE FDB ZERO FROM FDB+2 P* PDMT230 EQU * P ST A12,TASFDB P LDR A10,A12 P ADKL A10,QFDBFL
0x1fe6cc…1fe860 Dummy {f00=0x00a0, f01=0x0190, f02=» RB DMT233 PDMT237 EQU * P LDKL A2,/8000 & P* DEV NOT BUSY < P ST A2,DWTST,A12 T P LDKL A2,TIODM l P ST A2,DWTADR,A12 P LDKL A2,SECTLE P LDR A1,A12 P ADKL A1,FDBECB P ST A2,ECBRL,A1 P LDK A2,/01
0x1fe860…1fe9f4 (1, 388) Dummy {f00=0x00a0, f01=0x0190, f02=» P LD A2,VTRLE,A4 P ST A2,FDBRLE,A12 P LC A2,VTBLF,A4 6 P SC A2,FDBBLF,A12 N P LC A2,VTNIF,A4 h P SC A2,FDBNIF,A12 P LD A2,VTKA,A4 P ST A2,FDBKA,A12 P LD A2,TASVRN P ST A2,FDBVTO,A12 P* P IFT M
0x1fe9f4…1feb88 Dummy {f00=0x00a0, f01=0x0190, f02=» ECB IN FDB l P XIF P* P EJECT * P* 8 P* CHECK NEXT VTOC RECORD B P* d PDMT250 EQU * n 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 P SU A2
0x1feb88…1fed1c Dummy {f00=0x00a0, f01=0x0190, f02=»* ALL VTOCS IN ALL VOLUMES ARE SEARCHED AT THIS POINT P* @ PDMT300 EQU * J P LDK A3,16 ^ P SU A3,TASCXO p P RF(NZ) DMT310 P LDK A7,6 P RF DMTASX FILE NAME UNKNOWN PDMT310 EQU * P LD A12,TASFDB P RF(NZ) DMT3
0x1fed1c…1feeb0 Dummy {f00=0x00a0, f01=0x0190, f02=»ENDING ORDER f 8 P* ACCORDING TO INCREASING SECTOR NO AND EXTENT NO ! P* ! P PDMT320 EQU * ! Z P* ! n @ P* CHECK IF RECORD BUFFERS ARE LARGE ENOUGH FOR INDEX FILE ! x P* ! P LD A6,TASFIL ! P RF(Z) DMT330 DATA FILE ASS ! $ P LD A6,F
0x1feeb0…1ff044 Dummy {f00=0x00a0, f01=0x0190, f02=» OK ! P LDK A7,12 " * P RF DMTASX RECORD BUFFER IS TOO SMALL " PDMT330 EQU * " L P LDR A6,A12 " ` P* FDB ADDR " t P ADKL A6,FDBEXT " P LDK A2,0 " P LDR A5,A3 " P SRL A5,2 NUMBER OF EXTENTS " PDMT340 EQU * " P LDK A4,16 "
0x1ff044…1ff1d8 Dummy {f00=0x00a0, f01=0x0190, f02=»E EXTENTS TO CHECK " ~ P* # , P* THE EXTENT SEARCHED FOR IS NOT FOUND # $ 2 P* CHECK IF RIGHT HALF OF A2 = 0 (EXT-NO = 0) # T P* # P LDR A1,A2 # P ANK A1,/FF # $ P RF(NZ) DMT370 TRY NEXT SECTION # P* # PDMT355 EQU * # P LDK A7,
0x1ff1d8…1ff36c Dummy {f00=0x00a0, f01=0x0190, f02=» LD A1,TASSEX+2,A4 # P LD A1,TASVOL,A1 $ P ST A1,EXTDMI,A6 $ 2 P LD A1,TASXLB,A4 $ J P ST A1,EXTLEN,A6 $ b P LD A1,TASXLB+2,A4 $ z P ST A1,EXTBAS,A6 $ P ADK A6,6 $ P SUK A5,1 $ & P RF(NP) DMT500 ALL EXTENTS HANDLED $ P* $ : P*
0x1ff36c…1ff500 Dummy {f00=0x00a0, f01=0x0190, f02=» A1,3 $ " P RF(NE) DMT380 NOT EXT-NO = 3 % PDMT370 EQU * % 4 P ECR A1,A2 % H P ANK A1,/FF % Z P SUK A1,3 % n P RB(E) DMT355 SECTION-NO = 3 % " P ADK A1,4 INCREMENT SECTION-NO % P ECR A2,A1 EXT-NO = 0 % P RB DMT340 % $ PDMT380 ADK A2,
0x1ff500…1ff694 (1, 389) Dummy {f00=0x00a0, f01=0x018e, f02=»CH WERE UNLOCKED BEFORE % j P* & P LDR A5,A7 & * P LDR A6,A8 SAVE & < P LDK A1,3 LOOP & T PDMTASY EQU * & j P LC A2,TASLFD,A1 FILE CODES & ~ P ANK A2,/FF & P RF(Z) DMTASZ NO CODE & P LDKL A8,TASECB & P SC A2,TASECB+1 & P LDK
0x1ff694…1ff828 Dummy {f00=0x00a0, f01=0x0190, f02=» & P LDR A8,A6 ' P RF DMT401 =1 END ' P* ' 4 ( P* PUT FDB ADDRESS INTO TTAB/CD:TAB ' > P* ' j PDMT400 EQU * ' t P LDK A7,0 ' PDMT401 EQU * =1 ' , P LD A2,TASTBE TTAB/CDTAB FILE CODE ADDR ' P LDR A7,A7 ' P RF(Z) DMT420 CORREC
0x1ff828…1ff9bc Dummy {f00=0x00a0, f01=0x018e, f02=»DDR ' t " P RF(Z) DMT410 NO MASTER INDEX ( P INH INH ( 2 ( P LD A2,MXIND SIEZE MASTERINDEXINDEX ( D P SUK A2,2 ( p PDMT405 EQU * ( P SUK A2,4 NEXT OFFSET ( P RF(NN) DMT407 OK ( * P RF DMT408 MASTER INDEX MUST BE FOUND ( PDMT407 CW A4
0x1ff9bc…1ffb50 Dummy {f00=0x00a0, f01=0x0190, f02=» ( ~ PDMT410 EQU * ) P LD A3,TASFDB ) P RF(Z) DMT430 NO FDB USED ) 2 P LDKL A2,/FFFE ) T " P ANRS A2,A3 CLEAR FDB USE BIT ) j P RF DMT430 ) PDMT420 EQU * ) P ST A12,1,A2 FDB ADDR ) PDMT430 EQU * ) P LDR A8,A8 ) P RF(Z) DMT440
0x1ffb50…1ffce4 Dummy {f00=0x00a0, f01=0x0190, f02=»UF RELEASE ALL FREE BUFFERS ) & P CF A14,TASCAQ CHECK ASSIGN QUEUE * $ $ P CF A15,QTJOB QUEUE CALLING TASK * N P ENB * v P LKM * P DATA 3 * P EJECT * PDMT500 EQU * * P LD A6,TASFIL * P ABL(Z) DMT700 DATA FILE * P IFF INDXAC=1 *
0x1ffce4…1ffe78 Dummy {f00=0x00a0, f01=0x018e, f02=» EJECT * P* + " P* THIS IS MASTER INDEX LOOP. + 8 P* CONNECT FDB TO FILE CODE IN DMTASK TTAB AND READ + > < P* MASTER INDEX WITH SEQUENTIAL READ ON THIS FILE CODE + z P* + P LD A7,TASTID DMTASK ID + P INH + " P CF A15,FNDTID TTAB ADDR
0x1ffe78…20000c Dummy {f00=0x00a0, f01=0x0190, f02=» P SC A3,TASECB+1 , " P ST A3,TTB:TD+2,A2 TTAB ENTRY , P ST A12,TTB:TD+4,A2 FDB ADR , B P LD A3,ECBBA,A8 , f P SUKL A3,BUFSTA , ~ " P CF A14,DMTRBU RELEASE BUFFER , P* , 0 P* CALC NO OF WORDS NEEDED IN MASTRE INDEX , P* , P LD
0x20000c…2001a0 Dummy {f00=0x00a0, f01=0x018e, f02=»RR A2,A1 GET MOST SIGN BIT , P ADK A2,5 - " P SRL A2,1 NO OF WORDS NEEDED - 4 P RF(Z) DMT570 WRONG SIZE - X P INH - x P LD A4,MXIND LENGTH MXIND - P SUK A4,4 MAX A5 VALUE - P LDKL A5,-2 OFFSET - PDMT540 EQU * - P ADK A5,4 GET ENTRY -
0x2001a0…200334 (1, 390) Dummy {f00=0x00a1, f01=0x0190, f02=» - | P RB(N) DMT540 ENTRY USED . P SUR A6,A2 NO OF SPARE WORDS . ( & P RB(N) DMT540 LARGER ENTRY NEEDED . L P* . v P* SUFFICIENT SPACE FOUND . P* . P LDKL A1,/8000 USED BIT . & P ORS A1,MXIND+2,A5 MARK ENTRY USED . $ P ST A3,TASMXA MAST
0x200334…2004c8 Dummy {f00=0x00a1, f01=0x0190, f02=»T A1,2,A3 ENTRY LENGTH . P ADK A3,4 SKIP MX HEADRER / P ST A3,ECBBA,A8 BUFFER ADDR / @ P ST A1,ECBRL,A8 REQ LGTH / d . P LDR A1,A5 MXIND ENTRY PAR TO REACTIVATION / P CWR A1,A4 MXIND ENTRY / P RF(NL) DMT590 LAST ENTRY / P LD A3,MXIND+6,A1
0x2004c8…20065c Dummy {f00=0x00a1, f01=0x0190, f02=»NKL A2,/7FFF REMOVE USE BIT / P SUR A2,A6 0 $ P ORKL A2,/8000 USE BIT 0 6 P ST A2,MXIND+2,A1 0 T . P ADS A6,MXIND+6,A1 MAKE NEXT ENTRY LARGER 0 n $ P LD A7,MXIND,A1 PREVIOUS POINTER 0 P SLL A2,1 NO OF BYTES 0 P ADR A7,A2 0 P ST A7,MXIND+4,A
0x20065c…2007f0 Dummy {f00=0x00a1, f01=0x0190, f02=» 0 8 P* OTHER REQ TO THE SAME FILE CODE ARE NOT POSSIBLE 1 < P* BECAUSE AN INDEX FILE MUST ALWAYS BE ASSIGNED COMMON 1 D P* 1 PDMT550 EQU * 1 & P LDK A7,/42 SEQ READ,NOWAIT,NO EA 1 P LKM 1 P DATA -1 1 P DATA DMTAR5 1 P LKM 1 P
0x2007f0…200984 Dummy {f00=0x00a1, f01=0x0190, f02=»NKL A2,/FEFF BIT 7 ONLY RETRIES 1 P RF(Z) DMT560 NO ERROR 2 ( P* 2 F " P* REMOVE THE ONLY CRN BUFFER 2 P P* 2 v P LD A4,TASFDB FDB ADDR 2 P LD A5,FDBCRL,A4 CRN BUF ADR 2 P RF(Z) DMT553 NO CRN 2 P CM FDBCRL,A4 2 P INH 2 P LD A6,C
0x200984…200b18 Dummy {f00=0x00a1, f01=0x018e, f02=»EADY ,WHOLIE MXINDEX IS READ 2 P LDK A7,7 3 $ PDMT555 SUR A8,A8 NO BUFFER 3 6 P ABL DMTASX DISC IO ERR 3 X PDMT560 EQU * 3 x P* 3 P* RECORD READ,READ NEXRT 3 P* 3 P LD A2,ECBRL,A8 3 P ADS A2,ECBBA,A8 REC LENGTH 3 P RB DMT550
0x200b18…200cac Dummy {f00=0x00a1, f01=0x0190, f02=» 3 P* 4 2 P* MASTER INDE X READUY. RERUN FOR INDEX FILE 4 P* 4 H P LDK A1,1 4 R P ST A1,TASFIL INDEX FILE 4 d " P LD A3,TASSPW TTAB ADR DMTASK 4 P CM TTB:TD+2,A3 DELETE ENTRY 4 P CM TTB:TD+4,A3 4 P LD A3,TASFDB FDB ADDR 4 P LDK
0x200cac…200e40 Dummy {f00=0x00a1, f01=0x0190, f02=» ENTRY POSSIBLE 4 ~ P LDK A1,0 5 2 P* TASCVO REMAINS ZERO FROM MASTER INDEX LOOP 5 * P ABL DMT050 ASSIGN INDEX 5 ` P EJECT 5 PDMT600 EQU * 5 P* 5 P* INDEX FILE ASSIGN 5 P* 5 P LDK A7,10 RET CODE 5 & P LD A10,TASFDD FDB ADDR
0x200e40…200fd4 (1, 391) Dummy {f00=0x00a1, f01=0x0190, f02=» LC A3,DWTST,A10 5 P ANK A3,/40 6 & P RF(NZ) DMT639 OTHER REQUEST BUSY 6 , P LDK A3,8 MAX NO OF INDE*2 6 V PDMT620 EQU * 6 x P SUK A3,2 6 $ P RF(N) DMT640 MORE THAN 4 INDEX 6 P LDR A6,A10 6 P ADR A6,A3 6 P LD A2,FDBAI1,A6 6 P RB(
0x200fd4…201168 Dummy {f00=0x00a1, f01=0x0190, f02=» 6 X P* 7 P LDK A5,8 NR OF INDEX *2 7 PDMT625 EQU * 7 2 P SUK A5,2 7 F " P RF(N) DMT635 ALL FDB UPPDATED 7 X P LDR A1,A10 FDB DATA 7 ~ P ADR A1,A5 7 $ P LD A3,FDBAI1,A1 FDB ADDR INDEX 7 P RB(Z) DMT625 NO INDEX FILE 7 P LDKL A1,FDBADF
0x201168…2012fc Dummy {f00=0x00a1, f01=0x0190, f02=»25 7 PDMT635 EQU * 8 P LC A1,DWTST,A10 8 0 P SC A1,DWTST,A12 SAME BUSY BITS AS DATA FILE 8 6 P ENB ENB 8 j P LD A1,TASMXA 8 | ( P ST A1,FDBMIA,A12 MASTER INDEX ADDR 8 P RF DMT720 8 ( PDMT639 ADK A7,2 A7=13=OTHER REQ BUSY 8 * PDMT640 ADK A
0x2012fc…201490 Dummy {f00=0x00a1, f01=0x0190, f02=»IGN DATA FILE 8 & P ST A12,FDBADF,A12 FDB ADDR TO FDB 9 P LD* A1,TASASB ASBLK ADDR 9 @ P ANKL A1,/6000 9 b P SLL A1,1 9 x $ P ORS A1,FDBDBR,A12 DELAY + BASIC 9 PDMT720 EQU * 9 P* 9 ( P* SET FDBMRN TO MAX REC NO IN FILE 9 P* 9 P L
0x201490…201624 Dummy {f00=0x00a1, f01=0x018e, f02=»750 9 P AD A2,-2,A1 : P SUKL A1,EXTELE-2 : P ST A1,FDBCEX,A12 : : P SUK A2,1 : T P ST A2,FDBSNR,A12 : f P LDR A1,A12 : " P CF A14,GTLGRN GET LOG REC NO : P LDK A1,0 : " P LC A1,FDBBLF,A12 BLOCK FACTOR : P SUK A1,1 : P ADR
0x201624…2017b8 Dummy {f00=0x00a1, f01=0x4154, f02=» P ST A3,FDBMRN+1,A12 ; P* ; 4 P* CALCULATE FDBMRO WHICH IS MAX FDBRRO IN FILE ; * P* ; b P LD A6,FDBRLE,A12 REC LENGTH ; l P ADK A6,1 ; P LDK A7,0 ; P LC A7,FDBBLF,A12 BLOCK FACT ; P SUK A7,1 ; P CF A14,MPYMOD A1,A2=A6*A7 ;
0x2017b8…20194c Dummy {f00=0x00a1, 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
0x20194c…201ae0 Dummy {f00=0x00a1, f01=0x0190, f02=»SET FDB FREE < PDMTA40 EQU * = * P CF A14,CLRBUF REMOVE ALL FREE BUFFERS = ( P LDR A1,A7 NEW FDB ADDR = V P ABL(Z) DMTERX NO MORE FDBS = v P IFT INDXAC=1 = P ENB ENB = P* = 4 P* FIND WHICH DMTASK IS NEXT AND ACTIVATE THAT = P* =
0x201ae0…201c74 (1, 392) Opaque[0x194]
0x201c74…201e08 # DirEnt {nam=»DMBUF «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1430, f03=0x0000}
0x201c74…201e08 IdxSect {
0x201c74…201e08 f00 = 0x00a1 // 0x201c74 @0x0
0x201c74…201e08 f01 = 0x0008 // 0x201c76 @0x2
0x201c74…201e08 gno = [ // 0x201c78 @0x4
0x201c74…201e08 [0x00]: C0x00a1.0x2.0
0x201c74…201e08 [0x01]: C0x00a1.0x3.0
0x201c74…201e08 [0x02]: C0x00a2.0x0.0
0x201c74…201e08 [0x03]: C0x00a2.0x1.0
0x201c74…201e08 ]
0x201c74…201e08 }
0x201e08…201f9c Dummy {f00=0x00a1, f01=0x0190, f02=» 0 P IDENT DMBUF REL 9.2 79-11-16 870105040920 P 8 P* @ 8 P**************************************************** J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* . P* DMBUF = DATA MANAGEMENT BUFFER AREAS P* P* P
0x201f9c…202130 Dummy {f00=0x00a1, 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
0x202130…2022c4 Dummy {f00=0x00a1, 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
0x2022c4…202458 Dummy {f00=0x00a1, f01=0x0190, f02=» P EJECT $ PX:A EQU 8 NUMBER OF DISC BUFFERS PQNBUF EQU 00008 : P* R P* PCURBUF DATA BUF1 f PNEWBUF DATA 0 ~ P* P* PBUFLNK EQU 0 2 PBUF1 DATA BUF2 BUFFER LINK STATUS IN BIT 15 PBUFDMI EQU *-BUF1 DMI
0x202458…2025ec Dummy {f00=0x00a1, f01=0x0190, f02=» LRU-WORD " P DATA 0 BUFFER STATUS,DM ORDER ( PBUFSTA EQU *-BUF1 DATA BUFFER START 8 P RES 205 d P* t P* ~ P IFT QNBUF=1 PBUF2 EQU BUF1 P XIF P* P* P IFF QNBUF=1 PBUF2 DATA BUF3 P DATA 0,0,0
0x2025ec…202780 Dummy {f00=0x00a1, f01=0x018e, f02=»NBUF=1 P IFF QNBUF=2 PBUF3 DATA BUF4 " P DATA 0,0,0 8 P RES 205 L P XIF P* h P* r P IFT QNBUF=3 | PBUF4 EQU BUF1 P XIF P* P* P IFF QNBUF=1 P IFF QNBUF=2 P IFF QNBUF=3 PBUF4 D
0x202780…202914 (1, 393) Dummy {f00=0x00a1, f01=0x0190, f02=» P* P* P IFF QNBUF=1 P IFF QNBUF=2 , P IFF QNBUF=3 @ P IFF QNBUF=4 T PBUF5 DATA BUF6 h P DATA 0,0,0 ~ P RES 205 P XIF P* P* P IFT QNBUF=5 PBUF6 EQU BUF1 P XIF P* P*
0x202914…202aa8 Dummy {f00=0x00a1, f01=0x018e, f02=»0 P RES 205 P XIF P* & P* 0 P IFT QNBUF=6 : PBUF7 EQU BUF1 N P XIF d P* p P* z 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 BU
0x202aa8…202c3c Dummy {f00=0x00a1, f01=0x018e, f02=» P* P IFF QNBUF=1 P IFF QNBUF=2 & P IFF QNBUF=3 : P IFF QNBUF=4 N P IFF QNBUF=5 b P IFF QNBUF=6 v P IFF QNBUF=7 PBUF8 DATA BUF9 P DATA 0,0,0 P RES 205 P XIF P* P* P IFT QNBUF=8
0x202c3c…202dd0 Dummy {f00=0x00a1, f01=0x0190, f02=» P IFF QNBUF=5 P IFF QNBUF=6 P IFF QNBUF=7 , P IFF QNBUF=8 @ PBUF9 DATA BUF10 T P DATA 0,0,0 l P RES 205 P XIF P* P* P IFT QNBUF=9 PBUF10 EQU BUF1 P XIF P* P* P IFF QNBUF=1
0x202dd0…202f64 Dummy {f00=0x00a1, f01=0x0190, f02=»=8 P IFF QNBUF=9 PBUF10 DATA BUF11 P DATA 0,0,0 6 P RES 205 J P XIF Z P IFT QNBUF=10 f PBUF11 EQU BUF1 | P XIF P* P* P IFF QNBUF=1 P IFF QNBUF=2 P IFF QNBUF=3 P IFF QNBUF=4 P IFF Q
0x202f64…2030f8 Dummy {f00=0x00a1, f01=0x0190, f02=» P DATA 0,0,0 P RES 205 P XIF ( P IFT QNBUF=11 4 PBUF12 EQU BUF1 J P XIF ` P* l P* v P IFF QNBUF=1 P IFF QNBUF=2 P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5 P IFF QNBUF=6 P IFF QNBUF=7
0x2030f8…20328c Dummy {f00=0x00a1, f01=0x018e, f02=» 205 P XIF P IFT QNBUF=12 PBUF13 EQU BUF1 . P XIF D P* P P* Z P IFF QNBUF=1 d P IFF QNBUF=2 x 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
0x20328c…203420 Dummy {f00=0x00a1, f01=0x0190, f02=» P XIF P IFT QNBUF=13 PBUF14 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
0x203420…2035b4 (1, 394) Dummy {f00=0x00a2, f01=0x018e, f02=» P RES 205 P XIF P IFT QNBUF=14 $ PBUF15 EQU BUF1 : P XIF P P* P* f P IFF QNBUF=1 p 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
0x2035b4…203748 Dummy {f00=0x00a2, f01=0x0190, f02=» PBUF15 DATA BUF16 P DATA 0,0,0 P RES 205 0 P XIF @ P IFT QNBUF=15 L PBUF16 EQU BUF1 b P XIF x 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
0x203748…2038dc Dummy {f00=0x00a2, f01=0x0190, f02=»FF QNBUF=13 P IFF QNBUF=14 P IFF QNBUF=15 * PBUF16 DATA BUF1 @ P DATA 0,0,0 X P RES 205 l P XIF | P EJECT P* P************** P* DMTGBU * P************** P* * P* ENTRY DMTGBU GET A D
0x2038dc…203a70 Dummy {f00=0x00a2, f01=0x0190, f02=»ER t P* $ P* OUTPUT A3 = BUFFER ADDRESS J P* SKIP RETURN (+2) IF SECTOR MUST BE READ INTO BUFFER AT A3 < , P* A5 AND A7 WILL BE DESTROYED P* 8 P* CURBUF, BUFDMI, -FC AND -SNR WILL BE SET < P*
0x203a70…203c04 Dummy {f00=0x00a2, f01=0x0190, f02=»* SEARCHED 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
0x203c04…203d98 Dummy {f00=0x00a2, f01=0x0190, f02=») DMT020 WRONG VOLUME P CW A2,BUFSNR,A3 P RF(E) DMT050 SAME SECTOR NO 6 PDMT020 EQU * Z P LDK A7,/01 n & 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,/F
0x203d98…203f2c Dummy {f00=0x00a2, f01=0x0190, f02=»T A3,NEWBUF PDMT041 EQU * P CW A3,CURBUF ( * P RB(NE) DMT010 MORE BUFFERS TO SERARCH > P LDR A5,A5 l P RF(NZ) DMT043 BUFFER FOUND ~ P LDK A1,3 LAMP 10 AND 11 P CF A15,HALT NO MORE BUFFERS PDMT043 LD A3,NEWBUF P*
0x203f2c…2040c0 Dummy {f00=0x00a2, f01=0x0190, f02=» t " P ST A2,BUFSNR,A3 SECTOR NUMBER PDMT050 EQU * . " P CM BUFOR,A3 RESET OLD-COUNTER B P ST A3,CURBUF h P LDK A7,/01 ~ ( P ORRS A7,A3 SET STATUS USED BIT 15 P ENB ENB P RTN A14 P EJECT P* P**************
0x2040c0…204254 (1, 395) Dummy {f00=0x00a2, f01=0x0190, f02=» BUFFER ADDRESS P* A2 IS DESTROYED P* < P* F PDMTRBU EQU * P P LDKL A2,/FFFE d P ANRS A2,A3 SET OFF BIT 15 z P RTN A14 P* P* ( PCLRBUF EQU * CLEAR ALL FREE BUFFERS @ P****************************
0x204254…2043e8 Dummy {f00=0x00a2, f01=0x40b4, f02=» P AN A2,BUFLNK,A3 P RF(NZ) DMT750 USED P CM BUFDMI,A3 REMOVE 8 PDMT750 CW A3,CURBUF T P RB(NE) DMT700 MORE BUFFERS p P RTN A14 P END @ P* ( PCLRBUF EQU * CLEAR ALL FREE BUFFERS @ P****************************
0x2043e8…20457c Dummy {f00=0x00a2, 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
0x20457c…204710 Dummy {f00=0x00a2, f01=0x018e, f02=»U * CLOSE A FILE P LDK A4,0 PTIOC10 EQU * * $ P ST A4,FDBRRO,A6 MARK ORDER TYPE > P LDK A2,0 f , P ST A2,FDBSNR,A6 SECTOR #0 VOLUME LABLE x P* ( P* LET FDBCEX POINT TO FIRST EXTENT P* P LDR A4,A6 P ADK A4,FDBEXT
0x204710…2048a4 Dummy {f00=0x00a2, f01=0x0190, f02=» P LDR A1,A6 FDB ADDR 0 P LDKL A2,/C000 REMOVE BUFFERS FOR THIS TASK P CF A14,EARELB T PREL090 EQU * j P LDK A1,0 CORRECT RETURN ~ P ABL TIODME P EJECT ( PSETLRN EQU * SET LAST RECORD NUMBER P LC A1,ECBCW+3,A8 P S
0x2048a4…204a38 Dummy {f00=0x00a2, f01=0x0190, f02=»DATA REC p P RF GET010 . PGETCUX LDK A7,CRNCIF+1 GET CURR INDEX REC " PGET010 LDR A1,A6 FDB ADDR T " P CF A14,CRNGET GET CRN BUFFER v P ADR A7,A2 ADDR CURR REC NO P LDK A2,0 P LC A3,-1,A7 FILE CODE P CC A3,ECBFC,A8 P
0x204a38…204bcc Dummy {f00=0x00a2, f01=0x0190, f02=»REC NO ~ P LD A2,1,A7 PGET030 EQU * " P ST A2,ECBCW,A8 6 P RB REL090 N P EJECT ` " PSEQREAD EQU * SEQUENTIAL READ n P* $ P* FIND CRN+1 AND TEST IF > LRN P* P LDR A1,A6 FDB ADDR " P CF A14,CRNGET GET CRN-BUFFE
0x204bcc…204d60 Dummy {f00=0x00a2, f01=0x018e, f02=»ERFLOW P RF SEQR20 PSEQR10 EQU * " P ANKL A2,/7FFF REMOVE OVERFLOW 4 P ADK A1,1 ADD CARRY Z PSEQR20 EQU * v P SC A1,ECBCW+3,A8 REC NO P ST A2,ECBCW,A8 P* $ P* CONTINUE AS FOR RANDOM READ P* P EJECT
0x204d60…204ef4 (1, 396) Opaque[0x194]
0x204ef4…205088 # DirEnt {nam=»DMFDB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1450, f03=0x0000}
0x204ef4…205088 IdxSect {
0x204ef4…205088 f00 = 0x00a2 // 0x204ef4 @0x0
0x204ef4…205088 f01 = 0x0004 // 0x204ef6 @0x2
0x204ef4…205088 gno = [ // 0x204ef8 @0x4
0x204ef4…205088 [0x00]: C0x00a2.0x2.0
0x204ef4…205088 [0x01]: C0x00a2.0x3.0
0x204ef4…205088 ]
0x204ef4…205088 }
0x205088…20521c Dummy {f00=0x00a2, f01=0x0190, f02=» 0 P IDENT DMFDB REL 9.2 79-11-16 870105040920 P 8 P @ P* H P* R 8 P**************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* , P* DMFDB = FILE DESCRIPTOR BLOCKS FDB P*
0x20521c…2053b0 Dummy {f00=0x00a2, f01=0x0190, f02=»TE FDB AREA H P* BY MEANS OF CONDITIONAL ASSEMBLY QFDBAR WORDS WILL BE ALLOCATED P* ` P ENTRY FDBSTA j P ENTRY FDBEND P ENTRY QFDBFL P ENTRY CRNQUE,CRBUFL P ENTRY CRNEND P ENTRY MXIND P EJECT P* 6
0x2053b0…205544 Dummy {f00=0x00a2, f01=0x0190, f02=»REA r " PCRBUFL EQU 12 SIZE CRN BUFFER P* 2 < P* CRNBAR IS THE SIZE OF THE CRN BUFFER ARERA IN WORDS < 4 P* WHERE CRBUFL BYTES ARE USED FOR EACH BUFFER | P* PX:B EQU 50 " PCRNBAR EQU 00240 CURRENCY AREA P* P*
0x205544…2056d8 Dummy {f00=0x00a2, f01=0x0190, f02=» P* PQFDBAR EQU 02280 P* & PX:D EQU 96 0 ( PQFDBFL EQU 00114 FDB FIX PART LENGTH B P* n P EJECT x P* PFDBSTA EQU * P RES QFDBAR PFDBEND EQU * PCRNQUE DATA 0 CRN LINK ROOT P RES CRNBAR PCRNE
0x2056d8…20586c Dummy {f00=0x00a2, f01=0x410a, f02=» IFF MXSIZ=0 * 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 B P XIF p PMXINDE EQU * END INDEX INDEX | 2 P DATA 0,0 SIGNIFICANT ZEROES AFTER INDEXINDEX PMXAR EQU * P RES MXSIZ P END @
0x20586c…205a00 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*
0x205a00…205b94 (1, 397) Dummy {f00=0x00a2, f01=0x0190, f02=»MAX 4 WORDS | PDMT150 EQU * P LDR* A10,A4 ( P CWR* A10,A7 < P ABL(NE) DMT250 NO MATCH P P SUK A2,1 p . P RF(NP) DMT160 ALL 4 FILE NAME WORDS MATCH P ADK A4,2 P ADK A7,2 P RB DMT150 CHECK NEXT WORD P* ( P*
0x205b94…205d28 Dummy {f00=0x00a2, f01=0x0190, f02=» DMT165 YES P CCK A2,'LL' LIBRARY FILE ? P ABL(NZ) DMT250 NO 8 P LDK A2,0 FILE EXTENT NUMBER R P RF DMT167 v . PDMT165 LD A2,VTFSNO,A3 FILE SECTION NUMBER P EJECT PDMT167 EQU * P* . P* GET INFO FROM VTOC AND SAVE IN
0x205d28…205ebc Dummy {f00=0x00a2, f01=0x0190, f02=» P ST A1,TASCXO P RF(NN) DMT170 <= 4 EXTENTS P LDK A7,9 B * P ABL DMTASX MORE THAN 4 EXTENTS EXIST T PDMT170 EQU * " P ECR A2,A2 TO LEFT HALF OF A2 4 P LC A2,VTFXNO+1,A4 EXT NO INTO RIGHT HALF OF A2 P ST A2,TASSEX,A1
0x205ebc…206050 Dummy {f00=0x00a2, f01=0x0190, f02=» LD A2,VTFXBA,A4 EXTENT BASE P ST A2,TASXLB+2,A1 $ P LD A2,TASSEX,A1 > $ P RF(NZ) DMT250 NOT FIRST EXTENT V P EJECT ~ P* FIRST FILE EXTENT < P* CHECK IF AN FDB DESCRIBING THE FILE ALREADY EXISTS. P* P LD A12,TASFDB *
0x206050…2061e4 Dummy {f00=0x00a2, f01=0x0190, f02=»FDBSTA PDMT200 EQU * P LDR* A5,A12 " P ANK A5,/01 6 P RF(Z) DMT210 FREE J P LD A2,FDBEXT,A12 d P CW A2,TASVOL,A6 ~ " P RF(NE) DMT210 NOT SAME VOLUME P LD A2,FDBVTO,A12 P CW A2,TASVRN $ P RF(NE) DMT210 NOT SAME VTOC
0x2061e4…206378 Dummy {f00=0x00a2, f01=0x0190, f02=»OUND j PDMT205 EQU * P LDK A7,5 FILE CODE USED P ABL DMTASX @ P* T $ PDMT210 LDR* A12,A12 GET NEXT FDB ^ P ANKL A12,/FFFE ( P RB(NE) DMT200 MORE FDB:S TO SEARCH P* 0 P* NO MATCHING FDB EXIST FIND A FREE FDB P
0x206378…20650c Dummy {f00=0x00a2, f01=0x0190, f02=» P ANKL A12,/FFFE & P RB(NE) DMT220 MORE FDB:S TO CHECK P LDK A7,3 F P ABL DMTASX NO FDB AVAILABLE X ( P* INITIALIZE FDB ZERO FROM FDB+2 | P* PDMT230 EQU * P ST A12,TASFDB P LDR A10,A12 P ADKL A10,QFDBFL P
0x20650c…2066a0 Dummy {f00=0x00a2, f01=0x0190, f02=»DMT233 PDMT237 EQU * P LDKL A2,/8000 " P* DEV NOT BUSY 8 P ST A2,DWTST,A12 P P LDKL A2,TIODM h P ST A2,DWTADR,A12 ~ P LDKL A2,SECTLE P LDR A1,A12 P ADKL A1,FDBECB P ST A2,ECBRL,A1 P LDK A2,/01 P
0x2066a0…206834 (1, 398) Opaque[0x194]
0x206834…2069c8 # DirEnt {nam=»DFTAB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1460, f03=0x0000}
0x206834…2069c8 IdxSect {
0x206834…2069c8 f00 = 0x00a3 // 0x206834 @0x0
0x206834…2069c8 f01 = 0x0002 // 0x206836 @0x2
0x206834…2069c8 gno = [ // 0x206838 @0x4
0x206834…2069c8 [0x00]: C0x00a3.0x0.0
0x206834…2069c8 ]
0x206834…2069c8 }
0x2069c8…206b5c Dummy {f00=0x00a3, f01=0x0190, f02=» 0 P IDENT DFTAB REL 9.2 79-11-16 870105040920 P 8 P* @ 8 P**************************************************** J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* & P* DFTAB = DISC FILE CODE TABLE P* P* P* LEVE
0x206b5c…206cf0 Dummy {f00=0x00a3, f01=0x40c8, f02=»** ^ P* P* DISC FILE CODE TABLE P* 4 P ENTRY DFTAB > P ENTRY DFTABE R P* h P* r PDFTAB EQU * | P DATA /F0F1 PDFTABE EQU * P END @ TAB = DISC FILE CODE TABLE P* P* P* LEVE
0x206cf0…206e84 Dummy {f00=0x00a3, 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*
0x206e84…207018 Dummy {f00=0x00a3, f01=0x0190, f02=»-LENGTH, BLOCKING-FACTOR AND VTOC-REC-NO r P* ARE SAVED TOO. 0 L P* WHEN THE FIRST EXTENT HAS BEEN FOUND EXISTING FDB:S CAN BE SEARCHED J L P* TO CHECK IF THE FILE TO BE ASSIGNED HAS PREVIOUSLY BEEN ASSIGNED TO L P* ANOTHER FILE CODE. IF SO T
0x207018…2071ac Dummy {f00=0x00a3, f01=0x0190, f02=»EN A NEW FDB MUST BE INITIALIZED AND THE REST OF THE 4 P* VOLUMES ARE CHECKED TO FIND ALL FILE EXTENTS < P* t 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
0x2071ac…207340 Dummy {f00=0x00a3, f01=0x018e, f02=»MTASS P ENTRY VTLRN P ENTRY VLVBA " P ENTRY VLVRL 6 P ENTRY SECTLE J P EJECT ` P* n P***************** x P* EXTERNALS * P***************** P* P EXTRN QTJOB P EXTRN FNDTID,TTB:TD P*
0x207340…2074d4 (1, 399) Opaque[0x194]
0x2074d4…207668 # DirEnt {nam=»DMSUBX«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1468, f03=0x0000}
0x2074d4…207668 IdxSect {
0x2074d4…207668 f00 = 0x00a3 // 0x2074d4 @0x0
0x2074d4…207668 f01 = 0x000c // 0x2074d6 @0x2
0x2074d4…207668 gno = [ // 0x2074d8 @0x4
0x2074d4…207668 [0x00]: C0x00a3.0x1.0
0x2074d4…207668 [0x01]: C0x00a3.0x2.0
0x2074d4…207668 [0x02]: C0x00a3.0x3.0
0x2074d4…207668 [0x03]: C0x00a4.0x0.0
0x2074d4…207668 [0x04]: C0x00a4.0x1.0
0x2074d4…207668 [0x05]: C0x00a4.0x2.0
0x2074d4…207668 ]
0x2074d4…207668 }
0x207668…2077fc Dummy {f00=0x00a3, f01=0x0190, f02=» 2 P IDENT DMSUBX REL 9.2 79-11-16 870105040920 P : P* B 8 P**************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P* DMSUBX = DM-ROUTINES FOR INDEXED REQUESTS P* P*
0x2077fc…207990 Dummy {f00=0x00a3, f01=0x0190, f02=»ROM :***************** r P* P* DMTASK ( P* : P*************** D P* ENTRIES * P*************** t P* P ENTRY FNDKMX,CHKKEY P ENTRY RDNXTR P ENTRY FNDKEY P ENTRY CRNUPD P* P**********
0x207990…207b24 Dummy {f00=0x00a3, f01=0x0190, f02=»DBRLE,FDBSNR,ECBCW l . P EXTRN FDBRRO,FDBCEX,FDBBLF,EXTBAS,BUFSNR . P EXTRN FDBLRN,FDBMRO,FDBCRL,FDBADF,CRNCIF L 4 P EXTRN DMTIOT,GTLGRN,GTBKBU,ADDMOD,CALSNO,DMTRBU ~ P EXTRN DMTIOZ P EJECT 8 P****DESCRIPTION*******************************
0x207b24…207cb8 Dummy {f00=0x00a3, f01=0x0190, f02=»1 ALG. U. ` 4 P* THE SEARCH KEY MAY BE TERMINATED WITH A /EE. 0 P* THE FIRST TWO WORDS IN MASTER INDEX IS : J P* - NO OF ENTRIES N ~ $ P* - NO OF CHARACTERS PER ENTRY P* 8 P****ENTRY PARAMETERS********************************
0x207cb8…207e4c Dummy {f00=0x00a3, f01=0x0190, f02=»CF A14,FNDKMX P* 8 P****EXIT PARAMETERS********************************* " P* ^ 0 P* A1,A2 = LODGICAL RECORD NO IN INDEX FILE h P* A8,A11= UNCHANGED P* 8 P****USED REGISTERS********************************** P*
0x207e4c…207fe0 Dummy {f00=0x00a3, f01=0x0190, f02=»9,A2 P ANKL A9,/1 GET BIT 15 P SRA A2,1 * 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 P LDR* A7,A5 ENTRY LENGTH P LDR A6,A9 I P SUK A6,1 $ P
0x207fe0…208174 (1, 400) Dummy {f00=0x00a3, f01=0x0190, f02=»25 EQU * " P ADR A2,A5 ADD MI BASE ADR - 2 P ADK A2,2 ENTRY KEY ADR 6 P LDR A1,A2 SAVE ENTRY ADR V P LDR A3,A8 SEARCH KEY ADR x P LDR A6,A11 MAX KEY LENGTH P LDK A7,0 CHAR ADR P CF A14,CHKKEY COMPARE KEYS P LDR A7,A10 M
0x208174…208308 Dummy {f00=0x00a3, f01=0x0190, f02=» v . P RF(NG) FND040 SEARCHED KEY LESS OR EQUAL P* : P* SEARCHED KEY GREATER D P* d P LDR A10,A10 M n P RF(Z) FND050 SEARCH READY P ADR A9,A6 I=I+(M/2 CEIL) PFND030 EQU * P LDR A10,A7 M=M/2 FLOOR P RB FND020
0x208308…20849c Dummy {f00=0x00a3, f01=0x0190, f02=»D045 EQU * NO MASTER INDEX P LDK A1,0 " P LDK A2,1 REC NR 1 4 P RF FND070 N PFND050 EQU * ` P ADR* A1,A5 ARDR NEXT ENTRY t PFND060 EQU * P LDR A3,A1 ENTRY ADR P SUK A3,3 P ADR* A3,A5 ADR REC NO P* P* MO
0x20849c…208630 Dummy {f00=0x00a3, f01=0x0190, f02=»2,A2 P LCR A2,A3 PFND070 EQU * P RTN A14 2 P EJECT B 8 P****DESCRIPTION************************************* P P* D P* CHKKEY COMPARE TWO CHARACTER STRINGS. THE SEARCH KEY MAY BE P* TERMINATED WITH A /EE. P* 8
0x208630…2087c4 Dummy {f00=0x00a3, f01=0x0190, f02=» * P* A6 = MAX NO OF CAHARACTERS IN KEY 2 P* A7 = REL NO OF FIRST CHAR TO CHECK IN KEY 2 P* h P* CF A14,CHKKEY r P* 8 P****EXIT PARAMETERS********************************* P* : P* A3 = 0 WHEN SEARCED KEY IS CONTAINED I
0x2087c4…208958 Dummy {f00=0x00a3, f01=0x0190, f02=»CHAR TO CHECK = NO OF SAME CHARACTERS IN WHOLE KEY x " P* A6 = MAX NO OF CHAR IN KEY : P* ` 8 P****USED REGISTERS********************************** j P* P* A2-A4,A6-A7 < P******************************************************** P
0x208958…208aec Dummy {f00=0x00a3, f01=0x0190, f02=»CR A4,A3 SEARCED KEY CHAR P CCK A4,/EE00 " " P RF(E) CHK060 END OF KEY CHAR 8 P CCR A4,A2 SC=EC? ^ P RF(G) CHK100 SC GT TH EC x " P RF(L) CHK120 SC LESS THAN EC P ADK A7,1 NO OF SAME CHAR P CWR A7,A6 NO OF CHAR $ P RF(NL)
0x208aec…208c80 Dummy {f00=0x00a3, f01=0x0190, f02=» LDK A3,0 FOUND P RF CHK140 PCHK120 EQU * * $ P LDKL A3,-1 SEARCHED KEY SMALLER > P RF CHK140 f PCHK100 EQU * x $ P LDK A3,1 SEARCHED KEY SGREATER PCHK140 EQU * P RTN A14 P EJECT 8 P****DESCRIPTION*******************
0x208c80…208e14 (1, 401) Dummy {f00=0x00a3, f01=0x0190, f02=»WHEN NO RECORD IS READ BEFORE, THE FIRST RECORD IN SPECIFIED & P* SECTOR WILL BE MADE AVAILABLE D P* n 8 P****ENTRY PARAMETERS******************************** x P* : P* A1 = FDB ADDRESS FOR CURRENT RECORD (BEFORE NEXT) P* FDB
0x208e14…208fa8 Dummy {f00=0x00a3, f01=0x0190, f02=»NTED ` : P* A3 = ADDRESS OF BLOCK BUFFER FROM PREVIOUS CALL IN > P* SAME DM-REQUEST. =0 WHEN NO BYUFFER IS ALLOCATED J P* A8 = ECB ADDRESS P* 8 P****EXIT PARAMETERS********************************* P* 2 P* RETURN AT AD
0x208fa8…20913c Dummy {f00=0x00a3, f01=0x018e, f02=»DE FOM PHYS I/O) WHEN NO BUFFER IS ALLOCATED r $ P* A2 = FDBRRO = RECORD OFFSET 4 P* A3 = BUFFER ADDRESS * P* = 0 WHEN NO BUFFER IS ALLOCATED | P* A8 = ECB ADDRESS P* 8 P****USED REGISTERS**********************************
0x20913c…2092d0 Dummy {f00=0x00a3, f01=0x0190, f02=» X P EJECT PRDNXTR EQU * P LDR A10,A3 SAVE BUFFER ADDR * P RF(NZ) RDN200 BUFFER EXIST N P STR A7,A14 r P SUKL A14,4 P ST A6,2,A14 P* P* GET A BUFFER P* PRDN040 EQU * & P CF A14,GTBKBU GET BLOCKBU
0x2092d0…209464 Dummy {f00=0x00a3, f01=0x0190, f02=»DR A10,A3 BUFFER ADDR $ P LDK A7,/91 PHYS READ WITH WAIT P LKM F P DATA 1 R & P CF A14,DMTIOZ CHECK RETURN CODES b P LDR A1,A1 P RF(NZ) RDN900 ERROR P LDR A1,A6 FDB ADDR PRDN080 EQU * P LDR A6,A1 FDB ADDR P L
0x209464…2095f8 Dummy {f00=0x00a3, f01=0x0190, f02=»RDN200 EQU * $ P LD A2,FDBRRO,A1 REC ORD OFFSET P RF(NN) RDN220 NOT FIRST REC < P STR A7,A14 ` P SUKL A14,4 t P ST A6,2,A14 P RB RDN080 FIRST REC WANTED P* : P* CHECK IF THIS OFFSET POINTS TO LAST REC IN BUFFER P
0x2095f8…20978c Dummy {f00=0x00a3, f01=0x0190, f02=»EC IN CURRENT BLOCKBUFFER P* " $ P AD A2,FDBRLE,A1 RECOR D LENGTH , P ADK A2,1 STATUS CHAR T P ST A2,FDBRRO,A1 NEW OFFSET r P RF RDN950 RETURN P* 4 P* CHECK IF THIS RECORD ALSO IS LAST IN EXTENT P* PRDN300 EQU *
0x20978c…209920 Dummy {f00=0x00a3, f01=0x0190, f02=» AD A5,EXTLEN,A3 EXTENT LENGTH P SUK A5,1 & $ P CW A5,FDBSNR,A1 SECT NO CURRENT 8 , P RF(NG) RDN400 IT WAS LAST REC IN EXTENT ` P* P* NEW SECTOR P* P IM FDBSNR,A1 SECT NO P LDR A6,A1 FDB ADDR P RF RDN500 P*
0x209920…209ab4 (1, 402) Dummy {f00=0x00a4, f01=0x0190, f02=» NO v P LDR A1,A2 P LDR A2,A3 P LDK A6,0 0 P LDK A7,1 B P CF A14,ADDMOD NEXT REC NO T P LDR A6,A5 RESTORE FDB ADDR v * P CF A14,CALSNO GET NEXT REC ADDR PHYS P LDR A8,A13 $ P LDR A1,A1 CHECK EN D OF MEDIUM P RF(
0x209ab4…209c48 Dummy {f00=0x00a4, f01=0x0190, f02=» x " P CF A14,DMTRBU RELEASE BUFFER P LDR A1,A6 FDB ADDR . P RB RDN040 NEXT SECTOR J P* h P* EXIT r P* PRDN900 EQU * P LDR A5,A1 RET CODE P LDR A1,A6 FDB ADDR P LDR A3,A10 BUFFER ADDR P RF(Z) RDN960 NO
0x209c48…209ddc Dummy {f00=0x00a4, f01=0x0190, f02=»ER ADDR PRDN940 EQU * P LD A6,2,A14 $ P ADKL A14,4 8 P LDR* A7,A14 L PRDN950 EQU * ` P RTN A14 t P EJECT 8 P****DESCRIPTION************************************* P* > P* FNDKEY WILL READ THE FIRST USED INDEX RECORD
0x209ddc…209f70 Dummy {f00=0x00a4, f01=0x0190, f02=»ENTRY PARAMETERS******************************** P* 8 P* A1 = FDB ADDRESS B P* A8 = SEARCH KEY ADDR ^ & P* A11 = NO OF CHARACTERS IN KEY ~ " P* A13= PHYSICAL ECB ADDRESS P* 8 P****EXIT PARAMETERS*****************************
0x209f70…20a104 Dummy {f00=0x00a4, f01=0x0190, f02=» 2 P* = /4000 WHEN NEXT HIGHER KEY IS FOUND . P* = RETURN CODE WHEN KEY IS NOT FOUND : 4 P* BIT 1 CAN NEVBER BE SET BY DISC DRIVER l P* A3 = BUFFER ADDRESS & P* = 0 WHEN NO RECORD IS FOUND " P* A7 = NO OF SAME CHARAC
0x20a104…20a298 Dummy {f00=0x00a4, f01=0x0190, f02=»**** ` P* , P* A1 - A11,A13 + 4 WORDS ON A14 STACK P* F : P****************************************************** P P EJECT PFNDKEY EQU * P* & P* FIRST SEARCH THE NMASTER INDEX P* * P LD A5,FDBMIA,A1 ADDR OF M
0x20a298…20a42c Dummy {f00=0x00a4, f01=0x0190, f02=» GET KEY ENTRY IN MASTER INDEX P LD A6,8,A14 FDB ADDR & P CF A14,CALSNO GET PHYS ADDR D P LDR A1,A1 h P RF(NZ) FKY900 ERROR z P LDR A1,A6 FDBADDR " P LDR A6,A11 NO OF CHAR IN KEY $ P LDK A7,0 START CHAR KEY SEARCH & P SUR A9,A9
0x20a42c…20a5c0 Dummy {f00=0x00a4, f01=0x018e, f02=»ECORD v P RF FKY150 P LDR A1,A5 RET CODE P RF FKY900 ERROR EXIT < P* Z " P* BUFFER AND ADATA IS FOUND d P* PFKY150 EQU * P LDR A9,A3 BUFFER ADDR P ADR A2,A3 BUFFER ADR P ADK A2,10 REC ADDR P LDR A10
0x20a5c0…20a754 (1, 403) Dummy {f00=0x00a4, f01=0x0190, f02=» P RF(E) FKY200 USED RECORD P* & & P* NO MORE RECORDS IN THIS SECTOR 0 P* Z * P LD A13,FDBRRO,A1 SAVE CURRENT OFFSET d P LD A4,FDBMRO,A1 & P ST A4,FDBRRO,A1 LAST REC IN SECT P* P* *CHECK IF EOF P* P LDR
0x20a754…20a8e8 Dummy {f00=0x00a4, f01=0x0190, f02=»N,A1 P RB(L) FKY100 NOT EOF P RF(G) FKY180 EOF * P CW A3,FDBLRN+1,A1 D P RB(L) FKY100 NOT EOF ^ PFKY180 EQU * | P* P* EOF IS IN THIS SECTOR P* 2 P ST A13,FDBRRO,A1 OFFSET TO FIRST FREE RECORD P LDK A7,0 NR
0x20a8e8…20aa7c Dummy {f00=0x00a4, f01=0x0190, f02=» P LD A3,6,A14 SEARCH KEY ADDR P CF A14,CHKKEY COMPARE KEYS , P LDR A3,A3 P & P RF(P) FKY840 SEARCHED KEY GREATER b " P RF(N) FKY850 SEARCH KEY LESS P RF FKY870 KEY FOUNFD PFKY840 EQU * P CC A7,-4,A10 NEXT KEY FLAG 0 P
0x20aa7c…20ac10 Dummy {f00=0x00a4, f01=0x0190, f02=» THAT HAS BEEN CHECKED FOR THIS KEY . P LC A7,-4,A10 REDUCE NO OF SAME CHARACTERS ! 0 P RB FKY100 NEXT KEY ! b PFKY850 EQU * ! ~ P LDKL A2,/4000 KEY NOT FOUND ! P RF FKY950 ! PFKY870 EQU * ! P LDK A2,0 KEY FOUND ! P RF FKY950 !
0x20ac10…20ada4 Dummy {f00=0x00a4, f01=0x0190, f02=» P ADKL A14,8 RESTORE STACK " P LDR* A1,A14 FDB ADDR " & P LDR A3,A9 BUFFER ADDR " D P RTN A14 " b P EJECT " r P* " J P* CRNUPD UPDATES CRN-BUFFERS SO THAT RECORD NUMBERS FOR MOVED INDEX " P* RECORDS ARE UPDATED " P* " P* IN
0x20ada4…20af38 Dummy {f00=0x00a4, f01=0x0190, f02=»2 = ADD PARAMETER +1, -1 " P* # $ P* USED REGISTERS: # . P* A1 -A12 # J P* # ^ P* OUT: # h P* A5 = FDB ADDR INDEX # x P* A10,A11 = UNCHANGED # P* # PCRNUPD EQU * # P STR A12,A14 # P SUKL A14,2 # $ P LD A12,FD
0x20af38…20b0cc Dummy {f00=0x00a4, f01=0x0190, f02=»F(Z) CRU900 END OF LINK # P LC A7,FDBECB+1,A5 FILE CODE $ P CC A7,CRNCIF,A12 $ D P RB(NE) CRU100 WRONG FC $ ^ P CC A10,CRNCIF+1,A12 $ ~ P RB(G) CRU100 $ P RF(L) CRU200 $ P CW A11,CRNCIF+2,A12 $ P RB(G) CRU100 $ PCRU200 EQU * $
0x20b0cc…20b260 Dummy {f00=0x00a4, f01=0x018e, f02=» * $ P* % P* UPDATE CRN % P* % * P LD A7,2,A14 ADD PARAM % 4 P LDR A6,A7 % R P RF(N) CRU230 -1 % d P LDK A6,0 % | PCRU230 EQU * % P ANKL A7,/7FFF % P LDK A1,0 % P LC A1,CRNCIF+1,A12 % P LD A2,CRNCIF+2,A12 % P CF A1
0x20b260…20b3f4 (1, 404) Dummy {f00=0x00a4, f01=0x4028, f02=» % P RTN A14 & P END & @ & $
0x20b3f4…20b588 Dummy {f00=0x00a4, 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* +
0x20b588…20b71c Dummy {f00=0x00a4, f01=0x0190, f02=»TASSPW DATA 0 TTAB ADDRESS DMTASK $ PTASFDD DATA 0 FDB ADDR DATA FILE * ( PTASTBE DATA 0 TTAB/SCTCDT ENTRY ADDR R 2 PTASLFD DATA 0,0 LOCKED FLEXDISC FILE CODES =1 ~ P DATA 0,0 P DATA 0,0 " PTASS14 EQU *-2 TASS A14 STACK P* P
0x20b71c…20b8b0 Dummy {f00=0x00a4, f01=0x0190, f02=» * P************** P* , P* ENTRY TASCAQ CHECK ASSIGN QUEUE * P* Z P* A7= RETURN CODE d P* * P* SET OFF USE BIT IN TASBLK H P* IF TASQUE = 0 THEN RETURN ELSE QUEUE FIRST IN CHAIN AND 2 P
0x20b8b0…20ba44 Dummy {f00=0x00a4, f01=0x0190, f02=»QUE P RF(Z) TASCEX EMPTY QUEUE " P LDR* A1,A5 GET NEXT IN CHAIN . , P ST A1,TASQUE AND PUT IT FIRST IN QUEUE T P LDKL A1,-4 ( P ADS A1,TTB:SA,A5 UPD DISPATCH ADDR P CF A15,QTJOB NEXT ASSIGN P RF TASC05 & PTASCEX CM TASQUE
0x20ba44…20bbd8 Dummy {f00=0x00a4, f01=0x0190, f02=» CODE IN SAVED A7 r P RTN A14 P EJECT * 8 P****DESCRIPTION************************************* 8 P* t : P* VOLCHE WILL COMPARE EACH VOLUME NAME IN ASBLK WITH ~ & P* VOLUME NAMES IN DWT FOR DISCS P* 8 P****ENTRY PARAMETERS****
0x20bbd8…20bd6c Dummy {f00=0x00a4, f01=0x0190, f02=»S WANTED. v : P* 1 LOCK WANTED. ONLY FROM DMTASS FOR FLEXDISC P* P 8 P****EXIT PARAMETERS********************************* Z P* P* A1 = 0 OK P* 1 VOLUME UNKNOWN P* A5 = TTAB ADDR P* 8 P****USED REG
0x20bd6c…20bf00 Dummy {f00=0x00a4, f01=0x0190, f02=»************** h PVOLCHE EQU * P CM TASLFD =1 * $ P CM TASLFD+2 LOCKED FLEXDISCS =1 @ P SLL A2,1 h P SUK A2,2 z 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
0x20bf00…20c094 (1, 405) Opaque[0x194]
0x20c094…20c228 # DirEnt {nam=»ADDMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1498, f03=0x0000}
0x20c094…20c228 IdxSect {
0x20c094…20c228 f00 = 0x00a4 // 0x20c094 @0x0
0x20c094…20c228 f01 = 0x0004 // 0x20c096 @0x2
0x20c094…20c228 gno = [ // 0x20c098 @0x4
0x20c094…20c228 [0x00]: C0x00a4.0x3.0
0x20c094…20c228 [0x01]: C0x00a5.0x0.0
0x20c094…20c228 ]
0x20c094…20c228 }
0x20c228…20c3bc Dummy {f00=0x00a4, f01=0x0190, f02=» 2 P IDENT ADDMOD REL 9.2 79-11-16 870105040920 P : P* =1 RETURN CONDITION B P* b 8 P**************************************************** l P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P*
0x20c3bc…20c550 Dummy {f00=0x00a4, f01=0x0190, f02=»CTION ON THE ALPHA ^ P* COMPUTER P*CALLING SEQUENCE: , $ P* A1-A2 = ARG1 F $ P* AG-A7 = ARG2 n P* CF A14,ADDMOD & P*RETURN : RESULT IN A1-A2 4 P* CAUTION REGISTERS A3,A4,A6,A7 A
0x20c550…20c6e4 Dummy {f00=0x00a4, f01=0x0190, f02=»NDITIONAL ASSEMBLY P* . P***************************************** $ P* V 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION ` . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0 P* P EJECT PADDMOD
0x20c6e4…20c878 Dummy {f00=0x00a4, f01=0x0190, f02=».L A7,/7FFF P ANK.L A2,/7FFF P ADR A2,A7 8 P RF(3) OVER1 X 0 PNOVER ADR A1,A6 * NO OVERFLOW x P RF(1) END1 P RF(2) END2 P RF(3) END3 PNO
0x20c878…20ca0c Dummy {f00=0x00a4, f01=0x018e, f02=» A1,1 P RF(3) OVER3 P RB(7) NOVER 0 POVER3 ADR A1,A6 P P RF(2) END3 p P ADK A1,0 P RF(1) END1 P RB(7) NOVER1 P XIF =1 P IFT CPU852=
0x20ca0c…20cba0 Dummy {f00=0x00a4, f01=0x4184, f02=» t PEND2 ADK A3,/80 PEND1 ADK A3,/80 * B PEND0 SLL A3,1 ********************************** L P ANK.L A3,/0300 P LDK.L A4,/FCFF P AN.S A4,2,A14 B P OR.S
0x20cba0…20cd34 (1, 406) Dummy {f00=0x00a5, 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
0x20cd34…20cec8 Dummy {f00=0x00a5, f01=0x0190, f02=»* & P* ' > P* FIND A FREE ENTRY IN TTAB/CD:TAB (FC AND DWTADR = 0 ) ' P* ' V PTAS180 EQU * ' ` P LDK A1,0 ' t P LDR A10,A10 TC ' P RF(Z) TAS185 GLOBAL ASSIGN ' P LD A2,TASTTA TTAB ADDR ' P LDR A4,A2 ' P LD A2,TTB:TD,A4 '
0x20cec8…20d05c Dummy {f00=0x00a5, f01=0x0190, f02=»UK A2,4 ' ( P RF(L) TASSE2 NO FREE ENTRY IN TABLE ( P LDR A9,A4 ( < P ADR A9,A2 ( N P CCR A1,A9 FILE CODE ( ` " P RB(NE) TAS190 FC NOT EQUAL 0 ( | P CW A1,1,A9 ( & P RB(NE) TAS190 DWTADR NOT EQUAL 0 ( P LDR* A1,A8 ASBLK 1ST WORD ( P RF(N)
0x20d05c…20d1f0 Dummy {f00=0x00a5, f01=0x0190, f02=»Y ( f P ST A9,TASTBE SAVE ENTRY ) P* ) * 0 P* GET FIRST VOLUME AND ACTIVATE ITS DMTASK ) 4 P* ) h P LD A1,TASCVO ) r P LDK A7,0 ) P LC A7,TASVOL,A1 ) P ADKL A7,'#D' TID DMTASK ) P CF A15,FNDTID ) " P LDR A5,A2 TTAB ADDRESS DMTASK )
0x20d1f0…20d384 Dummy {f00=0x00a5, f01=0x0190, f02=»RY ) | P LDK A7,4 VOL UNKNOWN * P RF TASSEM * ( PTAS200 EQU * * : P LDK A2,2 * N 4 P ST A2,TASFIL MASTER INDEX LOOP IDENT IN DMTSAK * ` & P LDKL A2,DMTASS ASSIGN INDEX ENTRY * P LDR* A6,A8 * P RF(N) TAS210 INDEX ASSIGN * P CM TASFIL *
0x20d384…20d518 Dummy {f00=0x00a5, f01=0x4182, f02=»F A15,ACTOT ACTIVATE DMTASK * P ABL TDISP GO TO DISPATCHER + $ P EJECT + H P* + V P* ERROR RETURNS + ` P* + z PTASSE5 ADK A7,1 + PTASSE4 ADK A7,1 + PTASSE3 ADK A7,1 + PTASSE2 ADK A7,1 + PTASSE1 ADK A7,1 + P ADK A7,1 +
0x20d518…20d6ac Dummy {f00=0x00a5, f01=0x2008, f02=» ,
0x20d6ac…20d840 Dummy {f00=0x00a5, f01=0x0190, f02=»****************************************** T 6 P* * U 2 6 P* RDBLK - READ ONE CASSETTE BLOCK * U l 6 P* =============================== * U 6 P*
0x20d840…20d9d4 (1, 407) Opaque[0x194]
0x20d9d4…20db68 # DirEnt {nam=»DSUMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x14a8, f03=0x0000}
0x20d9d4…20db68 IdxSect {
0x20d9d4…20db68 f00 = 0x00a5 // 0x20d9d4 @0x0
0x20d9d4…20db68 f01 = 0x0004 // 0x20d9d6 @0x2
0x20d9d4…20db68 gno = [ // 0x20d9d8 @0x4
0x20d9d4…20db68 [0x00]: C0x00a5.0x1.0
0x20d9d4…20db68 [0x01]: C0x00a5.0x2.0
0x20d9d4…20db68 ]
0x20d9d4…20db68 }
0x20db68…20dcfc Dummy {f00=0x00a5, f01=0x0190, f02=» 2 P IDENT DSUMOD REL 9.2 79-11-16 870105040920 P : P* =1 RETURN CONDITION B P* b 8 P**************************************************** l P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P*
0x20dcfc…20de90 Dummy {f00=0x00a5, f01=0x0190, f02=»STRUCTION ON THE ALPHA ^ P*COMPUTER P*CALLING SEQUENCE 0 $ P* A1-A2 = ARG1 J $ P* A6-A7 = ARG2 r P* CF A14,DSUMOD & P*RETURN: RESULT IN A1-A2 4 P* CAUTION REGISTERS A3,A4,A6,A
0x20de90…20e024 Dummy {f00=0x00a5, f01=0x0190, f02=»* CONDITIONAL ASSEMBLY P* . P***************************************** ( P* Z 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION d . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0 P* P EJECT PDS
0x20e024…20e1b8 Dummy {f00=0x00a5, f01=0x0190, f02=» C1R A6,A6 P C1R A7,A7 P ANK.L A7,X'7FFF' 8 P ANK.L A2,/7FFF P ADK A7,1 ~ P RF(1) NOVER1 P ADK A6,1 P RF(3) OVER4 P RF(7)
0x20e1b8…20e34c Dummy {f00=0x00a5, f01=0x0190, f02=» z P RF(2) END2 P RF(3) END3 & P ADK A2,0 D P RF(0) END0 b P RF(7) END1 POVER1 ANK.L A2,X'7FFF' P ADK A1,1 P RF(3) OVER4 P
0x20e34c…20e4e0 Dummy {f00=0x00a5, f01=0x0190, f02=»VER2 | P XIF =1 P IFT CPU852=0 6813 =1 P RF(0) END0 =1 < P RF(1) END1 =1 T P RF(2) END2 =1 l P XIF =1 PEND3 ADK A3,/80 PEND2 ADK A3,/80 PEND1 ADK A3,/80 F PEND0 SLL
0x20e4e0…20e674 (1, 408) Dummy {f00=0x00a5, f01=0x40a8, f02=» AN.S A4,2,A14 B P OR.S A3,2,A14 UPDATE CR IN PSW CALLING PROGRAM P* =1 b P RTN A14 r P END @
0x20e674…20e808 Dummy {f00=0x00a5, 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
0x20e808…20e99c Dummy {f00=0x00a5, f01=0x0190, f02=» 0 P IDENT DMFDB REL 9.2 79-11-16 870105040920 P 8 P @ P* H P* R 8 P**************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* , P* DMFDB = FILE DESCRIPTOR BLOCKS FDB P*
0x20e99c…20eb30 Dummy {f00=0x00a5, f01=0x0190, f02=»TE FDB AREA H P* BY MEANS OF CONDITIONAL ASSEMBLY QFDBAR WORDS WILL BE ALLOCATED P* ` P ENTRY FDBSTA j P ENTRY FDBEND P ENTRY QFDBFL P ENTRY CRNQUE,CRBUFL P ENTRY CRNEND P ENTRY MXIND P EJECT P* 6
0x20eb30…20ecc4 Dummy {f00=0x00a5, f01=0x0190, f02=»A r " PCRBUFL EQU 12 SIZE CRN BUFFER P* 0 < P* CRNBAR IS THE SIZE OF THE CRN BUFFER ARERA IN WORDS : 4 P* WHERE CRBUFL BYTES ARE USED FOR EACH BUFFER z P* PX:B EQU 50 PCRNBAR EQU X:B CURRENCY AREA P* P* PX:
0x20ecc4…20ee58 Dummy {f00=0x00a5, f01=0x0190, f02=»* PQFDBAR EQU X:A P* PX:D EQU 96 * & PQFDBFL EQU X:D FDB FIX PART LENGTH < P* f P EJECT p P* ~ PFDBSTA EQU * P RES QFDBAR PFDBEND EQU * PCRNQUE DATA 0 CRN LINK ROOT P RES CRNBAR PCRNEND EQU *
0x20ee58…20efec Dummy {f00=0x00a5, f01=0x4102, f02=»IZ=0 * 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 : P XIF h PMXINDE EQU * END INDEX INDEX t 2 P DATA 0,0 SIGNIFICANT ZEROES AFTER INDEXINDEX PMXAR EQU * P RES MXSIZ P END @ EQU *
0x20efec…20f180 Dummy {f00=0x00a5, 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*
0x20f180…20f314 (1, 409) Opaque[0x194]
0x20f314…20f4a8 # DirEnt {nam=»MPYMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x14b8, f03=0x0000}
0x20f314…20f4a8 IdxSect {
0x20f314…20f4a8 f00 = 0x00a5 // 0x20f314 @0x0
0x20f314…20f4a8 f01 = 0x0004 // 0x20f316 @0x2
0x20f314…20f4a8 gno = [ // 0x20f318 @0x4
0x20f314…20f4a8 [0x00]: C0x00a5.0x3.0
0x20f314…20f4a8 [0x01]: C0x00a6.0x0.0
0x20f314…20f4a8 ]
0x20f314…20f4a8 }
0x20f4a8…20f63c Dummy {f00=0x00a5, f01=0x0190, f02=» 2 P IDENT MPYMOD REL 9.2 79-11-16 870105040920 P : P* =1 RETURN CONDITIONS B P* b 8 P**************************************************** l P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P*
0x20f63c…20f7d0 Dummy {f00=0x00a5, f01=0x0190, f02=»N THE ALPLA COMPUTER ^ P* CALLING SEQUENCE: ( P* LD A6,ARG1 8 ( P* LD A7,ARG1 d P* CF A14,MPYMOD ( P* RETURN : RESULT IN A1,A2 0 P* REGISTERS A3,A4,A6,A7, ARE CRU
0x20f7d0…20f964 Dummy {f00=0x00a5, f01=0x0190, f02=»L ASSEMBLY P* . P***************************************** P* N 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION X . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0 P* P EJECT PMPYMOD EQU *
0x20f964…20faf8 Dummy {f00=0x00a5, f01=0x0190, f02=»A3,/8000 IF A6=A7=/8000 RETURN IN ERROR EXIT ~ P CWR A3,A6 8 P RF(4) SUITE X P CWR A3,A7 x P RF(0) END3 < P LDR A6,A7 * A6= X'8000' A7# X'8000' 4 P LDR
0x20faf8…20fc8c Dummy {f00=0x00a5, f01=0x0190, f02=»A3,0 ~ P LDK A4,15 P ADK A6,0 , P RF(0) END0 J P RF(6) ARG1PS h 0 P ADK A3,1 *ARG1 NEGATIVE P C1R A6,A6 P ADK A6,1 PARG1PS ADK
0x20fc8c…20fe20 Dummy {f00=0x00a5, f01=0x0190, f02=» C1R A7,A7 P ADK A7,1 P RF(3) CASSPE 8 PARG2PS SRC A7,1 X P RF(6) NOVER1 v P ADR A1,A6 PNOVER1 SRA A2,1 P SRC A1,1 P RF(6) NOVE
0x20fe20…20ffb4 (1, 410) Dummy {f00=0x00a6, f01=0x0190, f02=» 4 PNOVER3 ADK A3,0 *END* RESTORE SI=N P RF(0) END1 < P C1R A1,A1 Z P C1R A2,A2 z P ADK A2,1 D P*CAUTION THE NEXT INSTRUCTION IS ABSOLUTELY NECESSARY TO SET CR < P* WHEN T
0x20ffb4…210148 Dummy {f00=0x00a6, f01=0x0190, f02=»A1,1 ~ PNOVER4 ANK.L A2,/7FFF P RF(7) END2 . P XIF =1 L P IFT CPU852=0 6813 =1 ^ P RF(0) END0 =1 | P RF(1) END1 =1 P RF(2) END2 =1 P XIF =1 PEND3 ADK A3,/81 PEND2 ADK
0x210148…2102dc Dummy {f00=0x00a6, f01=0x4168, f02=» v P AN.S A4,2,A14 B P OR.S A3,2,A14 UPDATE CR IN PSW CALLING PROGRAM * P* =1 p P RTN A14 P IFT CPU852=1 : PCASSPE LDR A1,A6 *A7=X'8000' THEN A4= 1 . P*
0x2102dc…210470 Dummy {f00=0x00a6, 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 @
0x210470…210604 Dummy {f00=0x00a6, f01=0x0190, f02=»DBRLE,FDBSNR,ECBCW l . P EXTRN FDBRRO,FDBCEX,FDBBLF,EXTBAS,BUFSNR . P EXTRN FDBLRN,FDBMRO,FDBCRL,FDBADF,CRNCIF L 4 P EXTRN DMTIOT,GTLGRN,GTBKBU,ADDMOD,CALSNO,DMTRBU ~ P EXTRN DMTIOZ P EJECT 8 P****DESCRIPTION*******************************
0x210604…210798 Dummy {f00=0x00a6, f01=0x0190, f02=»1 ALG. U. ` 4 P* THE SEARCH KEY MAY BE TERMINATED WITH A /EE. 0 P* THE FIRST TWO WORDS IN MASTER INDEX IS : J P* - NO OF ENTRIES N ~ $ P* - NO OF CHARACTERS PER ENTRY P* 8 P****ENTRY PARAMETERS********************************
0x210798…21092c Dummy {f00=0x00a6, f01=0x0190, f02=»CF A14,FNDKMX P* 8 P****EXIT PARAMETERS********************************* " P* ^ 0 P* A1,A2 = LODGICAL RECORD NO IN INDEX FILE h P* A8,A11= UNCHANGED P* 8 P****USED REGISTERS********************************** P*
0x21092c…210ac0 Dummy {f00=0x00a6, f01=0x0190, f02=»9,A2 P ANKL A9,/1 GET BIT 15 P SRA A2,1 * 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 P LDR* A7,A5 ENTRY LENGTH P LDR A6,A9 I P SUK A6,1 $ P
0x210ac0…210c54 (1, 411) Opaque[0x194]
0x210c54…210de8 # DirEnt {nam=»DIVMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x14c8, f03=0x0000}
0x210c54…210de8 IdxSect {
0x210c54…210de8 f00 = 0x00a6 // 0x210c54 @0x0
0x210c54…210de8 f01 = 0x0004 // 0x210c56 @0x2
0x210c54…210de8 gno = [ // 0x210c58 @0x4
0x210c54…210de8 [0x00]: C0x00a6.0x1.0
0x210c54…210de8 [0x01]: C0x00a6.0x2.0
0x210c54…210de8 ]
0x210c54…210de8 }
0x210de8…210f7c Dummy {f00=0x00a6, f01=0x0190, f02=» 2 P IDENT DIVMOD REL 9.2 79-11-16 870105040920 P : P* =1 RET COND B P* Z 8 P**************************************************** d P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P* P*
0x210f7c…211110 Dummy {f00=0x00a6, f01=0x018e, f02=»A COMPUTER V P* CALLING SEQUENCE & P* A1-A2= DIVIDEND , $ P* A6 = DIVISOR V P* CF A14,DIVMOD ~ B P*RETURN* RESUT IN A1-A2 ; A1= REMAINDER;A2= QUOTIENT 6 P* CAUTION : REGISTERS A3,A4,A6,A
0x211110…2112a4 Dummy {f00=0x00a6, f01=0x0190, f02=» P* CONDITIONAL ASSEMBLY P* " . P***************************************** , P* ^ 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION h . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0 P* P EJECT
0x2112a4…211438 Dummy {f00=0x00a6, f01=0x0190, f02=»,A1 SAVE DIVIDEND SIGN | P* =1 $ P ADK A6,0 4 @ P RF(0) END3 * IF DIVISOR IS NULL, OVREFLOW R P ADK A1,0 P RF(4) SIGNE P ANK.L A2,/7FFF @ P RF(0)
0x211438…2115cc Dummy {f00=0x00a6, f01=0x018e, f02=» P LDK A4,16 4 P ADK A1,0 *SIGN OF DIVIDEND $ P RF(6) DIVENP 8 P ADK A3,1 * DIVIDEND IS NEGATIVE | P C1R A1,A1 P C1R A2,A2 P ANK.L
0x2115cc…211760 Dummy {f00=0x00a6, f01=0x018e, f02=» x 2 PDIVENP ADK A6,0 *SIGN OF DIVISOR P RF(6) DIVORP > 4 P SUK A3,1 *NEGATIVE DIVISOR ^ P C1R A6,A6 P ADK A6,1 < P ADK A6,0 RESET IF OVER
0x211760…2118f4 (1, 412) Dummy {f00=0x00a6, f01=0x0190, f02=» 2 PSHIFT SUK A4,1 *A1 LESS THAN A6 P RF(0) END : P SLL A1,1 X P SLL A7,1 v P SLL A2,1 P RF(6) *+4 P ADK A1,1 P ADK A1,0
0x2118f4…211a88 Dummy {f00=0x00a6, f01=0x0190, f02=» ADK A7,1 P RB(7) SHIFT 4 P*THIS SEQUENCE RESTORES THE SIGN OF THE RESULTS : PEND LDR A2,A7 r P ADK A3,0 P RF(0) NOSIGN 8 P RF(2) AA DIVIDEND +. DIVISOR +
0x211a88…211c1c Dummy {f00=0x00a6, f01=0x018e, f02=» 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) ` P ADK A2,0 P XIF =1 P IFT CPU852=0 6813 =1 P RF(1) END1 =1 P
0x211c1c…211db0 Dummy {f00=0x00a6, f01=0x0190, f02=» v PEND1 ADK A3,/81 B PEND0 SLL A3,1 ********************************** ( P ANK.L A3,/0300 n P LDK.L A4,/FCFF P AN.S A4,2,A14 B P OR.S A3,2,A14 UPDATE CR IN PSW CALLI
0x211db0…211f44 Dummy {f00=0x00a6, f01=0x0190, f02=»N ^ P RF(6) BB 6 P C1R A1,A1 DIVIDEND- .DIVISOR - & . P ADK A1,1 REMAINDER - ` PBB ADK A2,0 P RB(0) END0 P RB(2) END2 P RB(7) END1
0x211f44…2120d8 Dummy {f00=0x00a6, f01=0x4056, f02=» LDK A1,0 P RB(7) END P XIF 2 P END >@ R - & . P ADK A1,1 REMAINDER - ` PBB ADK A2,0 P RB(0) END0 P RB(2) END2 P RB(7) END1
0x2120d8…21226c Dummy {f00=0x00a6, 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
0x21226c…212400 Dummy {f00=0x00a6, f01=0x018e, f02=»ECORD v P RF FKY150 P LDR A1,A5 RET CODE P RF FKY900 ERROR EXIT < P* Z " P* BUFFER AND ADATA IS FOUND d P* PFKY150 EQU * P LDR A9,A3 BUFFER ADDR P ADR A2,A3 BUFFER ADR P ADK A2,10 REC ADDR P LDR A10
0x212400…212594 (1, 413) Opaque[0x194]
0x212594…212728 # DirEnt {nam=»DMSUBR«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x14d8, f03=0x0000}
0x212594…212728 IdxSect {
0x212594…212728 f00 = 0x00a6 // 0x212594 @0x0
0x212594…212728 f01 = 0x0012 // 0x212596 @0x2
0x212594…212728 gno = [ // 0x212598 @0x4
0x212594…212728 [0x00]: C0x00a6.0x3.0
0x212594…212728 [0x01]: C0x00a7.0x0.0
0x212594…212728 [0x02]: C0x00a7.0x1.0
0x212594…212728 [0x03]: C0x00a7.0x2.0
0x212594…212728 [0x04]: C0x00a7.0x3.0
0x212594…212728 [0x05]: C0x00a8.0x0.0
0x212594…212728 [0x06]: C0x00a8.0x1.0
0x212594…212728 [0x07]: C0x00a8.0x2.0
0x212594…212728 [0x08]: C0x00a8.0x3.0
0x212594…212728 ]
0x212594…212728 }
0x212728…2128bc Dummy {f00=0x00a6, f01=0x0190, f02=» 2 P IDENT DMSUBR REL 9.2 79-11-16 870105040920 P : P =1 CLEAR ECB B P REL 9.1 79-04-06 Z P* v 8 P**************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* DMSUBR = COM
0x2128bc…212a50 Dummy {f00=0x00a6, f01=0x0190, f02=» 8 P****THIS MODULE IS ACTIVATED FROM :***************** P* D P* DMTASK,TIODM,DMTASS N P* n P*************** x P* ENTRIES * P*************** P* P* & P ENTRY EATEST,EASETB,EARELB,CRNGET P ENTRY CAL
0x212a50…212be4 Dummy {f00=0x00a6, f01=0x0190, f02=»USER TO SYSTEM AREA x 0 P ENTRY MOV:SU MOVE FROM SYSTEM TO USER AREA P* P P***************** Z P* EXTERNALS * t P***************** P* P* 4 P EXTRN FDBEAL,FDBTNR,FDBCRL,FDBRLE,FDBSNR,FDBRRO P EXTRN FDBCEX,FDBBLF
0x212be4…212d78 Dummy {f00=0x00a6, f01=0x0190, f02=»D | P EXTRN DWTTDM,DWTTQ P EXTRN QTJOB & P EXTRN ECBRL,SECTLE : P EXTRN DIVMOD,MPYMOD V P EXTRN EXTELE r P EXTRN CRNTID P EXTRN DMTGBU P EXTRN EXTLEN,EXTBAS P EXTRN CRNQUE,GETBLK,FREQUE P EXTRN HALT P
0x212d78…212f0c Dummy {f00=0x00a6, f01=0x0190, f02=»UTINE t P EJECT DMSUBR TOSSIO P* . P* 8 . P***************************************** B P* t P* CONDITIONAL ASSEMBLY ~ P* . P***************************************** P* . P* A PROGRAM VERSION USING TOSS MMU PAG
0x212f0c…2130a0 Dummy {f00=0x00a6, f01=0x0190, f02=»CHKIND IS USED FROM FNDDWT TO SELECT DM-DWT 2 P* INDEX FILE (INDEX 0) SHALL BE SELECTED FOR 4 ( P* DX,IX,XR,XN, DATA FILE OTHERWISE j P* PCHKIND EQU * P STR A1,A15 P STR A2,A15 " P LDK A2,1 INDEX FOR DATA FILE P LDR A
0x2130a0…213234 (1, 414) Dummy {f00=0x00a7, f01=0x0190, f02=»AD x P ANK A1,/3E REMOVE BIT 15 P SUK A1,/1E , 4 P RF(E) FND320 INSERT INDEX OR INDEXED READ NEXT @ P RF FND340 x ( PFND320 LDK A2,0 INDEX FOR INDEX FILE PFND340 EQU * P CCR A2,A6 INDEX P RF(E) FND390 ENTRY FOUND P LDK
0x213234…2133c8 Dummy {f00=0x00a7, f01=0x0190, f02=»ED IN TENDIO TO RESET REQUEST BUSY BIT P* FOR ALL FILES . " P* AND TO RESOLVE ALL QUEUES H P* n PREQEND EQU * x P LC A2,TTB:ID,A5 GET TASK ID P CCK A2,'##' ( P RF(E) TEN117 JUMP IF DMTASK CALLING P* , P* RESET REQU
0x2133c8…21355c Dummy {f00=0x00a7, f01=0x0190, f02=»QU * P SUK A2,2 P RF(N) TEN115 NO MORE FILES P LDR A3,A6 B P ADR A3,A2 T P LD A3,FDBADF,A3 FDB ADDR f P RB(Z) TEN112 P CWR A3,A6 DWT ADDR P RF(E) TEN114 MASTER DWT P LD A5,DWTTQ,A3 P RF(Z) TEN113 NO QUEUE
0x21355c…2136f0 Dummy {f00=0x00a7, f01=0x0190, f02=»TEN114 EQU * $ P LDKL A4,/BFFF REQUEST BUSY BIT P ANS A4,DWTST,A3 RESET < P LDKL A4,/8000 Z $ P ORS A4,DWTST,A3 DEVICE NOT BUSY r P RB TEN112 PTEN115 EQU * P LDR* A4,A15 RESTORE A4 P* PTEN117 EQU * P ABL IHRTN
0x2136f0…213884 Dummy {f00=0x00a7, f01=0x0190, f02=» FOR A LOG RECORD NO. n P* 8 P****ENTRY PARAMETERS******************************** ( P* d P* A1 = FDB ADRESS n P* A2,A3 = LOG RECORD NO P* P* CF A14,EATEST P* 8 P****EXIT PARAMETERS*************************
0x213884…213a18 Dummy {f00=0x00a7, f01=0x018e, f02=»* = -1 EA FOUND FO R OTHER TASK P* . 8 P****USED REGISTERS********************************** 8 P* t P* A1 - A4 ~ P EJECT DMSUBR PEATEST EQU * " P LD A4,FDBEAL,A1 BUFFER QUEUE P RF EAT030 PEAT020 EQU *
0x213a18…213bac Dummy {f00=0x00a7, f01=0x018e, f02=» P* P CC A2,3,A4 FIRST CHAR P RB(NE) EAT020 , P CW A3,4,A4 2 AND 3 CHAR B P RB(NE) EAT020 b P* x P* RECORD NO FOUND P* P LC A4,2,A4 P CC A4,FDBTNR,A1 TASK ID P RF(E) EAT060 P LDKL A4,-1 EA OTHER T
0x213bac…213d40 Dummy {f00=0x00a7, f01=0x0190, f02=» ~ 8 P****DESCRIPTION************************************* P* D B P* EASETB WILL UNCONDITIONALLY PUT A NEW EA BUFFER IN EA-LINK N L P* IF NO BUFFERS ARE AVAILABLE THE SYSTEM WILL HALT AND LITE SOP-LAMPS P* 8 P****ENTRY PARAMETERS******
0x213d40…213ed4 (1, 415) Dummy {f00=0x00a7, f01=0x018e, f02=»B ~ P* 8 P****EXIT PARAMETERS********************************* P* P P* A6 = FDB ADDR Z P* t 8 P****USED REGISTERS********************************** ~ P* P* A1-A4,A6 P* < P**************************************
0x213ed4…214068 Dummy {f00=0x00a7, f01=0x0190, f02=» 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 h P* P LD A2,FDBEAL,A6 LINK ROOT P STR A2,A4 THREAD P ST A4,FDBEAL,A6 NEW ROOT P RTN A14 P EJECT D
0x214068…2141fc Dummy {f00=0x00a7, f01=0x0190, f02=» P* TIO THE FREE LINK. P* & 8 P****ENTRY PARAMETERS******************************** 0 P* l P* A1 = FDB-ADDRESS v " P* A2,A3 = LOGICAL RECORD NO B P* A2: BIT 0=1,BIT 1=1 ALL BUFFERS WITH TASK ID SAME AS FDB ( P*
0x2141fc…214390 Dummy {f00=0x00a7, f01=0x0190, f02=»FER WITH TASK ID AND LOG REC NO j 0 P* AS SPEC IS REMOVED. ( P* 8 P****EXIT PARAMETERS********************************* f P* P* A1 = UNCHANGED P* 8 P****USED REGISTERS**********************************
0x214390…214524 Dummy {f00=0x00a7, f01=0x0190, f02=»,A5 EA ROOT P RF EAR030 PEAR020 EQU * & P LDR A5,A4 SAVE OLD ROOT : P LDR* A4,A4 NEXT BUFFER ADR Z PEAR030 EQU * ~ P RF(Z) EAR100 EA LINK END P LDR A2,A2 REC NO & P RF(N) EAR050 RELEASE MANY BUFFERS P* P* SE
0x214524…2146b8 Dummy {f00=0x00a7, f01=0x018e, f02=»EAR050 EQU * P CWK A2,/A000 CHECK BIT 1 0 P RF(L) EAR080 BIT 1 ZERO,ALL BUFFERS REMOVED 6 PEAR060 EQU * j P* ~ P* SEARCH TASK IDENT P* P LC A3,FDBTNR,A1 TAK ID P CC A3,2,A4 P RB(NE) EAR020 P* P*
0x2146b8…21484c Dummy {f00=0x00a7, f01=0x0190, f02=» P* RETURN BUFFER TO POOL P* & P INH 0 P LD A3,FREQUE < P STR A3,A4 NEXT FREE R P ST A4,FREQUE NEW ROOT n P LDR A4,A5 BUFFER ROOT P LDR A2,A2 P RB(N) EAR020 RELEASE MORE PEAR100 EQU * P RTN A14 P EJECT
0x21484c…2149e0 Dummy {f00=0x00a7, f01=0x0190, f02=» IF NO BUFFER IS ` D P* FOUND A NEW IS FETCHED FROM THE FREE LINK AND B FILLED WITH H P* ZEROES AND PUT ON THE CRN LINK. IF NO FREE BUFFERS ARE AVAILABLE ` 0 P* THE SYSTEM WILL HALT AND LITE SOP-LAMPS. ( P* TASK ID IS PLACED IN THE BUFFER
0x2149e0…214b74 (1, 416) Dummy {f00=0x00a7, f01=0x0190, f02=»EXIT PARAMETERS********************************* P* 8 P* A1 = UNCHANGED B ( P* A2 = ADDRESS OF FOUND CRN-BUFFER P* 8 P****USED REGISTERS********************************** P* P* A1 - A4 P EJECT DMSUBR PCRNG
0x214b74…214d08 Dummy {f00=0x00a7, f01=0x0190, f02=» P RF(Z) CRN100 LINK END P* " P* CHECK ATASK IDENT , P* J P LC A3,FDBTNR,A1 TASK ID T P CC A3,CRNTID,A2 t P RB(NE) CRN020 OTHER TASK P RF CRN200 BUFFER FOUND P* P* GET NEW BUFFER P* PCRN100 EQU *
0x214d08…214e9c Dummy {f00=0x00a7, f01=0x018e, f02=»RS v PCRN120 EQU * P LDR* A3,A2 NEXT FREE P ST A3,CRNQUE UPD ROOT < P* Z P* FILL BUFFER WITH ZEROES d P* * P LDKL A3,CRBUFL BUFFER LENGTH IN BYTES PCRN140 EQU * P SUK A3,2 ZEROE WORDS 2 - N P RF(NP) CRN160 B
0x214e9c…215030 Dummy {f00=0x00a7, f01=0x0190, f02=» " P* CONNECT NEW BUFFER TO LINK P* . PCRN160 EQU * 8 P LC A3,FDBTNR,A1 L P SC A3,CRNTID,A2 TASK ID d P LD A3,FDBCRL,A1 LINK ROOT P STR A3,A2 THREAD P ST A2,FDBCRL,A1 NEW ROOT PCRN200 EQU * P RTN A14 P E
0x215030…2151c4 Dummy {f00=0x00a7, f01=0x018e, f02=»TO d P* SECTOR AND OFFSET P* ( 8 P****ENTRY PARAMETERS******************************** 2 P* n " P* A1,A2 = LOGICAL RECORD NO x P* A6 = FDB ADDR P* P* CF A14,CALSNO P* 8 P****EXIT PARAMETERS*************
0x2151c4…215358 Dummy {f00=0x00a7, f01=0x0190, f02=» P* A6 = UNCHANGED $ P* IN FDB : FDBSNR = SECTOR NR , P* FDBRRO = OFFSET IN SECTOR F * P* FDBCEX = CURRENT EXTENT v P* 8 P****USED REGISTERS********************************** P* P* A1 - A9 P
0x215358…2154ec Dummy {f00=0x00a7, f01=0x0190, f02=»DK A6,0 $ P LC A6,FDBBLF,A5 BLOCKING FACTOR , P CF A14,DIVMOD A2=A1,A2//A6,A1=REMAINDER 8 P RF(O) TIOD99 OVERFLOW h P LDR A3,A2 QUOTIENT P LDR A6,A5 FDB ADDR P LDR A2,A1 REMAINDER P RF(Z) TIOD30 REST = 0 $ P ADK A3,1 RECORD
0x2154ec…215680 Dummy {f00=0x00a7, f01=0x018e, f02=» PTIOD40 EQU * P LDR A4,A6 & P ADKL A4,FDBEXT FIRST FILE EXTENT * , P LD A9,EXTLEN,A4 LENGTH OF FIRST EXTENT T P LDK A5,4 NUMBER OF EXTENTS PTIOD45 CWR A3,A9 ( P RF(NG) TIOD55 SECTOR IN THIS EXTENT P SUK A5,1 NO & P RF(NP)
0x215680…215814 (1, 417) Dummy {f00=0x00a7, f01=0x0190, f02=» P* * P* SAVE CURRENT EXTENT BLOCK POINTER P* < PTIOD55 ST A4,FDBCEX,A6 F P* d * P* FIND LOGICAL SECTOR NUMBER ON DISC n P* 6 P SU A9,EXTLEN,A4 NO OF SECTORS IN PREVIOUS EXTENTS $ P SUR A3,A9 SECTOR NO WITHIN EXT P
0x215814…2159a8 Dummy {f00=0x00a7, f01=0x0190, f02=»GICAL SECTOR NUMBER x 2 P* FIND RELATIVE RECORD OFFSET WITHIN SECTOR P* R P LDK A3,0 & PTIOD60 SUK A2,1 A2=RELATIVE REC NO n ( P RF(Z) TIOD65 REL REC OFFS IN A3 NOW * P AD A3,FDBRLE,A6 NO ADD RECORD LENGTH P ADK A3,1 SKIP STATUS
0x2159a8…215b3c Dummy {f00=0x00a7, f01=0x0190, f02=»RELATIVE REC OFFSET IN FBDRRO P* & PTIOD65 EQU * 0 P LDK A1,0 OK D P ST A3,FDBRRO,A6 X PTIODMF EQU * p P RTN A14 P EJECT DMSUBR P* P************** P* DMTIOT P************** P* > P* ENTRY
0x215b3c…215cd0 Dummy {f00=0x00a7, f01=0x0190, f02=»RESS x P* A1 = 0 WHEN OK ! $ P* = ERROR CODE ELSE ! . $ P* A9 = DM ECB ADDRESS ! V * P* A8 = PHYS I/O ECB ADDRESS ! ~ $ P* A2 WILL BE DESTROYED ! P* ! ( P* USED REGISTERS : A1,A2,A6,A8,A9 !
0x215cd0…215e64 Dummy {f00=0x00a7, f01=0x0190, f02=»B ADDRESS ! z PDMTIT0 EQU * " P LD A1,ECBRC,A8 " & P RF(Z) DMTIOX DISC I/O OK " > P ANKL A1,/FEFF " ` $ P RF(NZ) DMTIT1 NOT ONLY RETRIES " v P LDKL A2,/100 " P ORS A2,ECBRC,A9 USER RC " P RF DMTIOX " PDMTIT1 EQU * " P LD A2,FDBDBR,
0x215e64…215ff8 Dummy {f00=0x00a7, f01=0x0190, f02=» A2,8 BUFSTA " , P CM BUFDMI,A2 CLEAR VOL IDENT IN BUFFER # P LDK A1,/02 DISC IO ERROR # D " P LDKL A2,/FF7E NOT BIT 8 OR 15 # f P AN A2,ECBRC,A8 # P RF(NZ) DMTIOX # P LD A1,ECBRC,A8 BIT 8 OR 15 # PDMTIOX RTN A14 # P EJECT # P* #
0x215ff8…21618c Dummy {f00=0x00a7, f01=0x0190, f02=» P* A8 = ECB ADDR $ P* OUT: $ P* A1 = RET CODE $ . P* A2 = DESTROYED $ H P* A6 = FDB ADDR $ b P* A8 = ECB ADDR $ | P* A9 == USER ECB $ P* $ PDMTIOZ LDR A6,A1 $ P LD A2,DWTOR,A6 ORDER $ P ANK A2,/3F $ P CWK
0x21618c…216320 Dummy {f00=0x00a7, f01=0x0190, f02=»DB DATA FILE $ ~ PDMTIZ1 EQU * % P LD A9,DWTECB,A1 USER ECB % ( P RB DMTIT0 % J P EJECT DMSUBR % 8 P****DESCRIPTION************************************* % t P* % 8 P* GTBKBU WILL GET A BLOCK BUFFER FOR DISC I/O AND % 2 P* PREPARE IT. EC
0x216320…2164b4 (1, 418) Dummy {f00=0x00a8, f01=0x0190, f02=» % | , P* FDB-CEX,ECB,SNR,RRO & 8 P* ECB-FC,CW,BA,DWT-OR,ECB,EXTDMI & 8 P* A8 = ECB ADDR & t P* & 8 P****EXIT PARAMETERS********************************* & P* & P* A1 = A6 = FDB ADDR & 0 P* A2 = FDB
0x2164b4…216648 Dummy {f00=0x00a8, f01=0x0190, f02=» THE FOUND CORE BUFFER & v P* A3 = BUFFER ADDRESS ' & P* A5 = ORDE R CODE ' F P* A8 = ECB ADDR ' b P* A9 = DM ECB ADDR ' | P* ' 8 P****USED REGISTERS********************************** ' P* ' P* A1 - A9 ' P* ' : P**
0x216648…2167dc Dummy {f00=0x00a8, f01=0x0190, f02=»RENT EXTENT BLOCK POINTER ' | P LD A1,EXTDMI,A4 DMIDENT, FC ( " " P LD A2,FDBSNR,A6 SECTOR NUMBER ( F P LD A9,DWTECB,A6 DM ECB ( l P ANK A1,/FF =1 ( $ P STR A1,A8 DISC VOL FILE CODE =1 ( P LDR A4,A2 SAVE ( P LDKL A5,SECTLE ( " P ST A5,ECBRL
0x2167dc…216970 Dummy {f00=0x00a8, f01=0x0190, f02=»SECTOR MUST BE READ FROM DISC ( P LDKL A2,-1 RET CODE ) & PGTB040 EQU * ) B P ST A4,ECBCW,A8 SECTOR NR ) V P LDR A5,A3 ) x 2 P ADKL A5,BUFSTA A5 = DATA BUFFER START ADDRESS ) P ST A5,ECBBA,A8 ) P LD A5,DWTOR,A6 ) P ANK A5,/3F ) ( P LDR
0x216970…216b04 Dummy {f00=0x00a8, f01=0x018e, f02=» ORDER CODE ) P EJECT DMSUBR * 8 P****DESCRIPTION************************************* * , P* * h D P* GTLGRN WILL CONVERT FDBSNR AND FDBRRO TO A LOGICAL RECORD NO * r P* * 8 P****ENTRY PARAMETERS******************************** * P* *
0x216b04…216c98 Dummy {f00=0x00a8, f01=0x0190, f02=» * Z P* + P* A1=A5=A6= FDB ADDRESS + P* A2,A3 = LOG RECORD NO + 4 P* + V 8 P****USED REGISTERS********************************** + ` P* + P* A1 - A7 + P* + : P****************************************************** + P EJECT
0x216c98…216e2c Dummy {f00=0x00a8, f01=0x0190, f02=» + p P LD A7,FDBCEX,A1 EXT ADDR , ( P ADKL A7,EXTLEN ADDR TO LAST LENGTH , * PGTL050 EQU * , V P CWR A3,A7 , j . 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 ADKL
0x216e2c…216fc0 Dummy {f00=0x00a8, f01=0x0190, f02=»OTAL NO OF SECTORS , ~ ( P AD A6,FDBSNR,A1 TOTAL NR OF SECTORS - P* - F ( P* CONVERT FDBRRO TO NO OF RECORDS - P 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,F
0x216fc0…217154 (1, 419) Dummy {f00=0x00a8, f01=0x0190, f02=» PGTL150 EQU * . P ADK A7,1 RECORD COUNTER . P SUR A6,A4 . 8 * P RB(NN) GTL150 COUNT RECORDS IN SECTOR . J P* . x , P* ADD SECT*BLOCFACT AND RECINCURRSECT . P* . P ADR A2,A7 . P RF(O) GTL160 OVERFLOW . P RF GTL170 . PGTL160 EQU
0x217154…2172e8 Dummy {f00=0x00a8, f01=0x0190, f02=» LDR A1,A5 FDB ADDR . P LDR A6,A5 / P RTN A14 / . P EJECT DMSUBR / > P* / V P* / ` P IFT MMUPAG=1 / j P* / P* M O V : U S / P* / D P* THIS ROUTINE MOVES DATA FROM THE USER AREA (SENDING BUFFER) TO / L P* THE SYSTEM AREA (REC
0x2172e8…21747c Dummy {f00=0x00a8, f01=0x0190, f02=»* / 8 P* INPUT: A1 = ADDRESS OF SENDING BUFFER (USER AREA) 0 < P* A2 = ADDRESS OF RECEIVING BUFFER (SYSTEM AREA) 0 F . P* A3 = NUMBER OF BYTES TO BE MOVED 0 P* 0 " P* OUTPUT: A1-A4 ARE DESTROYED 0 P* 0 , PMOV:US LDR A3,A3 CHECK
0x21747c…217610 Dummy {f00=0x00a8, f01=0x0190, f02=»ER ADDRESS 0 v P ANK A4,1 1 . P RF(NZ) MVUS40 USER BUFFER ADDRESS UNEVEN? 1 $ . P LDR A4,A2 NO, CHECK SYSTEM BUFFER ADDRESS 1 V P ANK A4,1 1 0 P RF(NZ) MVUS55 SYSTEM BUFFER ADDRESS UNEVEN? 1 P* 1 , PMVUS10 LDR A4,A3 CHECK REQUESTED LENGTH 1 P
0x217610…2177a4 Dummy {f00=0x00a8, f01=0x0190, f02=»5 1 t P* 2 PMVUS35 RTN A14 2 P* 2 * P EJECT DMSUBR 2 4 P* 2 L P* 2 V 0 PMVUS40 EQU * USER BUFFER ADDRESS WAS UNEVEN 2 ` * P LDR A4,A2 CHECK SYSTEM BUFFER ADDRESS 2 P ANK A4,1 2 0 P RF(NZ) MVUS80 SYSTEM BUFFER ADDRESS UNEVEN? 2 4 P
0x2177a4…217938 Dummy {f00=0x00a8, f01=0x0190, f02=» SYSTEM BUFFER ADDRESS 2 ( P SUK A3,1 DECREMENT REQUESTED LENGTH 3 $ P RB(NP) MVUS30 LAST CHAR. MOVED? 3 J , P ADK A1,2 NO, UPDATE USER BUFFER ADDRESS 3 r P* 3 8 PMVUS55 ELR A4,A1 GET NEXT TWO CHAR. FROM USER BUFFER 3 P ECR A5,A4 3 0 P SCR A5,A2 STO
0x217938…217acc Dummy {f00=0x00a8, f01=0x0190, f02=»VUS50 MORE CHAR. TO MOVE? 3 P RB MVUS30 NO, RETURN 4 " P* 4 @ P EJECT DMSUBR 4 J P* 4 b P* 4 l , PMVUS60 EQU * REQUESTED LENGTH WAS UNEVEN 4 v ( P SUK A3,1 MAKE REQUESTED LENGTH EVEN 4 * P RF(NP) MVUS70 ONLY ONE CHAR. TO MOVE? 4 P LDR A4,
0x217acc…217c60 Dummy {f00=0x00a8, f01=0x0190, f02=»FROM USER BUFFER 4 v P* 5 PMVUS65 ECR A5,A5 5 " 0 P SCR A5,A2 STORE LAST CHAR. IN SYSTEM BUFFER 5 : P RB MVUS30 RETURN 5 n P* 5 4 PMVUS70 ELR A5,A1 GET LAST CHAR. FROM USER BUFFER 5 P RB MVUS65 5 P* 5 2 PMVUS80 EQU * BOTH BUFFER ADDRESSES
0x217c60…217df4 (1, 420) Dummy {f00=0x00a8, f01=0x0190, f02=»UPDATE BUFFER ADDRESSES 5 P ADK A2,1 6 ( P SUK A3,1 DECREMENT REQUESTED LENGTH 6 2 & P RB(P) MVUS10 MORE CHAR. TO MOVE? 6 ^ P RB MVUS30 NO, RETURN 6 P* 6 P EJECT DMSUBR 6 P* 6 P* M O V : S U 6 P* 6 F P* THIS ROUTINE MOVES D
0x217df4…217f88 Dummy {f00=0x00a8, f01=0x0190, f02=»USED, DEPENDING ON WHETHER THE BUFFER ADDRESSES ARE EVEN OR NOT. 6 P* 7 H : P* INPUT: A1 = ADDRESS OF SENDING BUFFER (SYSTEM AREA) 7 R : P* A2 = ADDRESS OF RECEIVING BUFFER (USER AREA) 7 . P* A3 = NUMBER OF BYTES TO BE MOVED 7 P* 7 "
0x217f88…21811c Dummy {f00=0x00a8, f01=0x0190, f02=»F REQUESTED LENGTH <= 0 7 x P STR A5,A14 SAVE A5 8 ( P LDR A4,A2 CHECK USER BUFFER ADDRESS 8 < P ANK A4,1 8 h . P RF(NZ) MVSU40 USER BUFFER ADDRESS UNEVEN? 8 z . P LDR A4,A1 NO, CHECK SYSTEM BUFFER ADDRESS 8 P ANK A4,1 8 0 P RF(NZ) MVSU60 SYSTEM BU
0x21811c…2182b0 Dummy {f00=0x00a8, f01=0x018e, f02=»UNEVEN? 8 p P* 9 PMVSU20 MVSU A3 9 P* 9 0 " PMVSU30 LDR* A5,A14 RESTORE A5 9 : P* 9 ` PMVSU35 RTN A14 9 j P* 9 P EJECT DMSUBR 9 P* 9 P* 9 0 PMVSU40 EQU * USER BUFFER ADDRESS WAS UNEVEN 9 * P LDR A4,A1 CHECK SYSTEM BUFFER
0x2182b0…218444 Dummy {f00=0x00a8, f01=0x0190, f02=» 9 ^ P RF MVSU65 : P* : 2 PMVSU60 EQU * SYSTEM BUFFER ADDRESS WAS UNEVEN : $ 0 P LCR A4,A1 GET ONE CHAR. FROM SYSTEM BUFFER : Z P ECR A4,A4 : * P ADK A1,1 UPDATE SYSTEM BUFFER ADDRESS : ( P SUK A3,1 DECREMENT REQUESTED LENGTH : * P RF(NP) MVSU70
0x218444…2185d8 Dummy {f00=0x00a8, f01=0x0190, f02=»ER BUFFER : p & P ADK A1,1 UPDATE BUFFER ADDRESSES ; P ADK A2,2 ; < ( P SUK A3,1 DECREMENT REQUESTED LENGTH ; N & P RB(P) MVSU60 MORE CHAR. TO MOVE? ; z P RB MVSU30 NO, RETURN ; P* ; 4 PMVSU70 ELR A3,A2 GET LAST CHAR. FROM USER BUFFER ; $ P ANK
0x2185d8…21876c Dummy {f00=0x00a8, f01=0x018e, f02=»FFER ; j P RB MVSU30 RETURN < P* < & P EJECT DMSUBR < 0 P* < H P* < R 2 PMVSU80 EQU * BOTH BUFFER ADDRESSES WERE UNEVEN < 2 P LDR* A4,A1 GET FIRST CHAR. FROM SYSTEM BUFFER < 0 P ELR A5,A2 GET FIRST CHAR. FROM USER BUFFER < $ P ANK A4,/FF
0x21876c…218900 Dummy {f00=0x00a8, f01=0x0190, f02=» < b & P ADK A1,1 UPDATE BUFFER ADDRESSES = P ADK A2,1 = 2 ( P SUK A3,1 DECREMENT REQUESTED LENGTH = D * P RB(P) MVSU10 MORE CHARACTERS TO MOVE? = p P RB MVSU30 NO, RETURN = P* = , PMVSU90 EQU * REQUESTED LENGTH WAS UNEVEN = ( P SUK A3,1 MAKE REQ
0x218900…218a94 (1, 421) Dummy {f00=0x00a8, f01=0x0190, f02=» = & P ADR A4,A5 UPDATE BUFFER ADDRESSES > P ADR A2,A5 > 2 2 P LDR* A4,A4 GET LAST CHAR. FROM SYSTEM BUFFER > D P RB MVSU70 > z P* > 8 PMVSU95 LDR* A4,A1 GET LAST CHAR. FROM SYSTEM BUFFER > P RB MVSU70 > P XIF > P* > P IFT MMUPAG=0
0x218a94…218c28 Dummy {f00=0x00a8, f01=0x402e, f02=»IF > P* ? P* ? P END ? @ ? * P ADR A2,A5 > 2 2 P LDR* A4,A4 GET LAST CHAR. FROM SYSTEM BUFFER > D P RB MVSU70 > z P* > 8 PMVSU95 LDR* A4,A1 GET LAST CHAR. FROM SYSTEM BUFFER > P RB MVSU70 > P XIF > P* > P IFT MMUPAG=0
0x218c28…218dbc 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* +
0x218dbc…218f50 Dummy {f00=0x00a8, f01=0x0190, f02=» v PEND1 ADK A3,/81 B PEND0 SLL A3,1 ********************************** ( P ANK.L A3,/0300 n P LDK.L A4,/FCFF P AN.S A4,2,A14 B P OR.S A3,2,A14 UPDATE CR IN PSW CALLI
0x218f50…2190e4 Dummy {f00=0x00a8, f01=0x0190, f02=»N ^ P RF(6) BB 6 P C1R A1,A1 DIVIDEND- .DIVISOR - & . P ADK A1,1 REMAINDER - ` PBB ADK A2,0 P RB(0) END0 P RB(2) END2 P RB(7) END1
0x2190e4…219278 Dummy {f00=0x00a8, f01=0x4056, f02=» LDK A1,0 P RB(7) END P XIF 2 P END >@ R - & . P ADK A1,1 REMAINDER - ` PBB ADK A2,0 P RB(0) END0 P RB(2) END2 P RB(7) END1
0x219278…21940c Dummy {f00=0x00a8, 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
0x21940c…2195a0 Dummy {f00=0x00a8, f01=0x018e, f02=» 4 | P XIF 5 P IFT CHR14=1 5 & P CCK A7,/1414 SPECIAL CHARACTER ? 5 ( P RF(E) PRB230 YES 5 R P XIF 5 l P* 5 x " P LDK A1,CCERR CODE CHECK ERROR 5 * P ORS A1,ECBRC,A8 STORE IN RETURN CODE 5 P LD A7,DWTOR,A6 GET ORDER 5 P ANK A7,/FF 5
0x2195a0…219734 (1, 422) Opaque[0x194]
0x219734…2198c8 # DirEnt {nam=»DVKB00«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1520, f03=0x0000}
0x219734…2198c8 IdxSect {
0x219734…2198c8 f00 = 0x00a9 // 0x219734 @0x0
0x219734…2198c8 f01 = 0x0002 // 0x219736 @0x2
0x219734…2198c8 gno = [ // 0x219738 @0x4
0x219734…2198c8 [0x00]: C0x00a9.0x0.0
0x219734…2198c8 ]
0x219734…2198c8 }
0x2198c8…219a5c Dummy {f00=0x00a9, f01=0x0190, f02=» 2 P IDENT DVKB00 REL 9.2 79-11-16 870105040920 P : " P* KEYBOARD DEVICE WORK TABLE B P* h P ENTRY DVKB00 TABLE ENTRY r P EXTRN CTAB01 ( P EXTRN KBAD3 POINTER TO ADDRESSBLOCK P EXTRN DVDY00 PMMUPAG EQU 1 P*
0x219a5c…219bf0 Dummy {f00=0x00a9, f01=0x0190, f02=»ADDRESS P DATA DWTEND-DVKB00 ORDER ( P DATA KBAD3 POINTER TO ADDRESS BLOCK 2 P DATA 'KB' TTAB-ADDRESS ^ $ P DATA 0 WAIT/ACTIVATE INDICATOR ~ P DATA 0 TERMINAL QUEUE P IFT MMUPAG=1 & P DATA 0 SAVE AREA USER ECB ADDRESS P DAT
0x219bf0…219d84 Dummy {f00=0x00a9, f01=0x0190, f02=»VE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-STACK 6 P DATA 0 TIMER POINTER N P DATA DVDY00 DVDY00O DEVICE l $ P DATA /FFFF BACKSPACE AND CANCEL $ P DATA /FFFF EOR AND DOUBLE ZERO 6 P DATA DWTSQ+DVKB00 POINTER TO FIRST PLAC
0x219d84…219f18 Dummy {f00=0x00a9, f01=0x4118, f02=»A 0,0,0,0,0,0,0,0 P DATA 0,0,0,0 P IFT MMUPAG=1 0 PDEVECB EQU * F P DATA 0,0,0,0,0,0 Z P DATA 0,0,0,0,0,0,0,0 t P DATA 0,0,0,0,0,0,0,0 P DATA 0,0,0,0 P DATA 0,0,0,0,0 P XIF PDWTEND EQU * P* P
0x219f18…21a0ac Dummy {f00=0x00a9, 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
0x21a0ac…21a240 Dummy {f00=0x00a9, f01=0x4090, f02=» SCTBLK SCTDCT ( _ D Z z@ NPE SCTSTB SCTOPT SCTTCT SCTCDT bBUG SCTBUG~
0x21a240…21a3d4 (1, 423) Opaque[0x194]
0x21a3d4…21a568 # DirEnt {nam=»DVDY00«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1528, f03=0x0000}
0x21a3d4…21a568 IdxSect {
0x21a3d4…21a568 f00 = 0x00a9 // 0x21a3d4 @0x0
0x21a3d4…21a568 f01 = 0x0002 // 0x21a3d6 @0x2
0x21a3d4…21a568 gno = [ // 0x21a3d8 @0x4
0x21a3d4…21a568 [0x00]: C0x00a9.0x1.0
0x21a3d4…21a568 ]
0x21a3d4…21a568 }
0x21a568…21a6fc Dummy {f00=0x00a9, f01=0x0190, f02=» 2 P IDENT DVDY00 REL 9.2 79-11-16 870105040920 P : * P* DEVICE WORK TABLE FOR VIDEO DISPLAY B P* p P ENTRY DVDY00 TABLE ENTRY z P* P* ( P EXTRN DYAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 1 P* PDVDY00 EQU * T
0x21a6fc…21a890 Dummy {f00=0x00a9, f01=0x0190, f02=» DATA DWTEND-DVDY00 ORDER ( P DATA DYAD POINTER TO ADDRESS-BLOCK " P DATA 'DY' TTAB-ADDRESS N $ P DATA 0 WAIT/ACTIVATE INDICATOR n P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB
0x21a890…21aa24 Dummy {f00=0x00a9, f01=0x4158, f02=»VE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER . P DATA /101 CURSOR POINTER L * P DATA /1850 LEFT BYTE=NUMBER OF LINES n " P RIGHT BYTE=CHARACTERS/LINE P DATA 0 BUFFER INDEX P IFT MMUPAG=1 PDEVECB DATA 0,0,0,0,
0x21aa24…21abb8 Dummy {f00=0x00a9, 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
0x21abb8…21ad4c Dummy {f00=0x00a9, f01=0x0190, f02=»A ILLINT 60 P DATA ILLINT 61 P DATA ILLINT 62 4 P DATA IHINPT IHINPT ROUTINE P P EJECT SYSTAB t P P* " P* SYSTEM CONTROL TABLE POINTER P* P DATA SCT P P P* P* SYSTEM TRAP
0x21ad4c…21aee0 Dummy {f00=0x00a9, f01=0x0190, f02=» P XRR A13,A13 P XRR A14,A14 P LD A1,SCTBUG 0 P ABR(NZ) A1 F P HLT Z P f P EJECT SYSTAB n P P* P* SYSTEM CONTROL TABLE P* P PSCT EQU * P * PSCTMSZ DATA 0 MEMORY SIZE MOD K BYTES
0x21aee0…21b074 (1, 424) Opaque[0x194]
0x21b074…21b208 # DirEnt {nam=»DVKB01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1530, f03=0x0000}
0x21b074…21b208 IdxSect {
0x21b074…21b208 f00 = 0x00a9 // 0x21b074 @0x0
0x21b074…21b208 f01 = 0x0002 // 0x21b076 @0x2
0x21b074…21b208 gno = [ // 0x21b078 @0x4
0x21b074…21b208 [0x00]: C0x00a9.0x2.0
0x21b074…21b208 ]
0x21b074…21b208 }
0x21b208…21b39c Dummy {f00=0x00a9, f01=0x0190, f02=» 2 P IDENT DVKB01 REL 9.2 79-11-16 870105040920 P : " P* KEYBOARD DEVICE WORK TABLE B P* h P ENTRY DVKB01 TABLE ENTRY r P EXTRN CTAB02 ( P EXTRN KBAD3 POINTER TO ADDRESSBLOCK P EXTRN DVDY01 PMMUPAG EQU 1 P*
0x21b39c…21b530 Dummy {f00=0x00a9, f01=0x0190, f02=»ADDRESS P DATA DWTEND-DVKB01 ORDER ( P DATA KBAD3 POINTER TO ADDRESS BLOCK 2 P DATA 'KB' TTAB-ADDRESS ^ $ P DATA 0 WAIT/ACTIVATE INDICATOR ~ P DATA 0 TERMINAL QUEUE P IFT MMUPAG=1 & P DATA 0 SAVE AREA USER ECB ADDRESS P DAT
0x21b530…21b6c4 Dummy {f00=0x00a9, f01=0x0190, f02=»VE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-STACK 6 P DATA 0 TIMER POINTER N P DATA DVDY01 DVDY01O DEVICE l $ P DATA /FFFF BACKSPACE AND CANCEL $ P DATA /FFBA EOR AND DOUBLE ZERO 6 P DATA DWTSQ+DVKB01 POINTER TO FIRST PLAC
0x21b6c4…21b858 Dummy {f00=0x00a9, f01=0x4118, f02=»A 0,0,0,0,0,0,0,0 P DATA 0,0,0,0 P IFT MMUPAG=1 0 PDEVECB EQU * F P DATA 0,0,0,0,0,0 Z P DATA 0,0,0,0,0,0,0,0 t P DATA 0,0,0,0,0,0,0,0 P DATA 0,0,0,0 P DATA 0,0,0,0,0 P XIF PDWTEND EQU * P* P
0x21b858…21b9ec Dummy {f00=0x00a9, 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
0x21b9ec…21bb80 Dummy {f00=0x00a9, f01=0x0190, f02=» h , ( # RE RN ME MN W R , ( C ( T ( W P T $ ; V 8 , ( c ; W &~ P &`P 6 P @ h , ( $ P $W $ T P , ( #~ > V . >A P Y X , ( W ^ ?
0x21bb80…21bd14 (1, 425) Opaque[0x194]
0x21bd14…21bea8 # DirEnt {nam=»DVTP01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1538, f03=0x0000}
0x21bd14…21bea8 IdxSect {
0x21bd14…21bea8 f00 = 0x00a9 // 0x21bd14 @0x0
0x21bd14…21bea8 f01 = 0x0002 // 0x21bd16 @0x2
0x21bd14…21bea8 gno = [ // 0x21bd18 @0x4
0x21bd14…21bea8 [0x00]: C0x00a9.0x3.0
0x21bd14…21bea8 ]
0x21bd14…21bea8 }
0x21bea8…21c03c Dummy {f00=0x00a9, f01=0x018e, f02=» 2 P IDENT DVTP01 REL 9.2 79-11-16 870105040920 P : 4 P* DEVICE WORK TABLE FOR TELLER TERMINAL PRINTER B P* z P ENTRY DVTP01 TABLE ENTRY P* P* ( P EXTRN TPAD POINTER TO ADDRESS-BLOCK $ PMMUPAG EQU 1 MEM. MAN.UNIT COND.
0x21c03c…21c1d0 Dummy {f00=0x00a9, f01=0x018e, f02=» P DATA 0 ECB ADDRESS P DATA DWTEND-DVTP01 ORDER ( P DATA TPAD POINTER TO ADDRESS BLOCK B P DATA 'TP' TTAB-ADDRESS n $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADD
0x21c1d0…21c364 Dummy {f00=0x00a9, f01=0x40f6, f02=» f P DATA 0,0,0,0 STACK P DATA 0 TIMER POINTER $ ( P DATA 0 REQUESTED,ACTUAL LINE NUMBER B P IFT MMUPAG=1 n PDEVECB EQU * P DATA 0,0,0,0,0,0 P XIF PDWTEND EQU * P* P* P END @ AREA USER ECB ADD
0x21c364…21c4f8 Dummy {f00=0x00a9, 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
0x21c4f8…21c68c Dummy {f00=0x00a9, f01=0x0190, f02=»VUS50 MORE CHAR. TO MOVE? 3 P RB MVUS30 NO, RETURN 4 " P* 4 @ P EJECT DMSUBR 4 J P* 4 b P* 4 l , PMVUS60 EQU * REQUESTED LENGTH WAS UNEVEN 4 v ( P SUK A3,1 MAKE REQUESTED LENGTH EVEN 4 * P RF(NP) MVUS70 ONLY ONE CHAR. TO MOVE? 4 P LDR A4,
0x21c68c…21c820 Dummy {f00=0x00a9, f01=0x0190, f02=»FROM USER BUFFER 4 v P* 5 PMVUS65 ECR A5,A5 5 " 0 P SCR A5,A2 STORE LAST CHAR. IN SYSTEM BUFFER 5 : P RB MVUS30 RETURN 5 n P* 5 4 PMVUS70 ELR A5,A1 GET LAST CHAR. FROM USER BUFFER 5 P RB MVUS65 5 P* 5 2 PMVUS80 EQU * BOTH BUFFER ADDRESSES
0x21c820…21c9b4 (1, 426) Opaque[0x194]
0x21c9b4…21cb48 # DirEnt {nam=»DVDY01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1540, f03=0x0000}
0x21c9b4…21cb48 IdxSect {
0x21c9b4…21cb48 f00 = 0x00aa // 0x21c9b4 @0x0
0x21c9b4…21cb48 f01 = 0x0002 // 0x21c9b6 @0x2
0x21c9b4…21cb48 gno = [ // 0x21c9b8 @0x4
0x21c9b4…21cb48 [0x00]: C0x00aa.0x0.0
0x21c9b4…21cb48 ]
0x21c9b4…21cb48 }
0x21cb48…21ccdc Dummy {f00=0x00aa, f01=0x0190, f02=» 2 P IDENT DVDY01 REL 9.2 79-11-16 870105040920 P : * P* DEVICE WORK TABLE FOR VIDEO DISPLAY B P* p P ENTRY DVDY01 TABLE ENTRY z P* P* ( P EXTRN DYAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 1 P* PDVDY01 EQU * T
0x21ccdc…21ce70 Dummy {f00=0x00aa, f01=0x0190, f02=» DATA DWTEND-DVDY01 ORDER ( P DATA DYAD POINTER TO ADDRESS-BLOCK " P DATA 'DY' TTAB-ADDRESS N $ P DATA 0 WAIT/ACTIVATE INDICATOR n P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB
0x21ce70…21d004 Dummy {f00=0x00aa, f01=0x4158, f02=»VE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER . P DATA /101 CURSOR POINTER L * P DATA /1850 LEFT BYTE=NUMBER OF LINES n " P RIGHT BYTE=CHARACTERS/LINE P DATA 0 BUFFER INDEX P IFT MMUPAG=1 PDEVECB DATA 0,0,0,0,
0x21d004…21d198 Dummy {f00=0x00aa, 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
0x21d198…21d32c Dummy {f00=0x00aa, f01=0x0190, f02=»1,0 SET CR # $ P RF(Z) TAS160 ALL VOLUMES FOUND $ P* $ : , P* ALL VOL NOT FOUND. ACT FLEXDISCTASK $ D P* $ t P LD A1,TASCVO $ ~ P LDK A2,2 ID DMTASK FLEXDISC $ P SC A2,TASVOL,A1 SEE TAS195 $ P EJECT $ P* $ , P* CHECK IF FILE CO
0x21d32c…21d4c0 Dummy {f00=0x00aa, f01=0x0190, f02=»D $ j P LDR A10,A10 TC % P RF(Z) TAS165 GLOBAL ASSIGN % " P LD A2,TASTTA TTAB ADDR % F P LDR A4,A2 % f P LD A2,TTB:TD,A4 % x P ADKL A4,TTB:TD+1 % P RF TAS170 % PTAS165 EQU * % P LD A4,SCTCDT % P LDR* A2,A4 % P ADK A4,1 %
0x21d4c0…21d654 (1, 427) Opaque[0x194]
0x21d654…21d7e8 # DirEnt {nam=»DVKB02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1548, f03=0x0000}
0x21d654…21d7e8 IdxSect {
0x21d654…21d7e8 f00 = 0x00aa // 0x21d654 @0x0
0x21d654…21d7e8 f01 = 0x0002 // 0x21d656 @0x2
0x21d654…21d7e8 gno = [ // 0x21d658 @0x4
0x21d654…21d7e8 [0x00]: C0x00aa.0x1.0
0x21d654…21d7e8 ]
0x21d654…21d7e8 }
0x21d7e8…21d97c Dummy {f00=0x00aa, f01=0x0190, f02=» 2 P IDENT DVKB02 REL 9.2 79-11-16 870105040920 P : " P* KEYBOARD DEVICE WORK TABLE B P* h P ENTRY DVKB02 TABLE ENTRY r P EXTRN CTAB03 ( P EXTRN KBAD3 POINTER TO ADDRESSBLOCK P EXTRN DVDY02 PMMUPAG EQU 1 P*
0x21d97c…21db10 Dummy {f00=0x00aa, f01=0x0190, f02=»ADDRESS P DATA DWTEND-DVKB02 ORDER ( P DATA KBAD3 POINTER TO ADDRESS BLOCK 2 P DATA 'KB' TTAB-ADDRESS ^ $ P DATA 0 WAIT/ACTIVATE INDICATOR ~ P DATA 0 TERMINAL QUEUE P IFT MMUPAG=1 & P DATA 0 SAVE AREA USER ECB ADDRESS P DAT
0x21db10…21dca4 Dummy {f00=0x00aa, f01=0x0190, f02=»VE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-STACK 6 P DATA 0 TIMER POINTER N P DATA DVDY02 DVDY02O DEVICE l $ P DATA /FFFF BACKSPACE AND CANCEL $ P DATA /FFBA EOR AND DOUBLE ZERO 6 P DATA DWTSQ+DVKB02 POINTER TO FIRST PLAC
0x21dca4…21de38 Dummy {f00=0x00aa, f01=0x4118, f02=»A 0,0,0,0,0,0,0,0 P DATA 0,0,0,0 P IFT MMUPAG=1 0 PDEVECB EQU * F P DATA 0,0,0,0,0,0 Z P DATA 0,0,0,0,0,0,0,0 t P DATA 0,0,0,0,0,0,0,0 P DATA 0,0,0,0 P DATA 0,0,0,0,0 P XIF PDWTEND EQU * P* P
0x21de38…21dfcc Dummy {f00=0x00aa, 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
0x21dfcc…21e160 Dummy {f00=0x00aa, f01=0x0190, f02=» P 3P C @ P @ x @ P @ Q A . @ B A " T @ W @ A 2 A .P @ j_2 .T 4 0 P j pP _ @ j . d 0 @ @ @ P d 0 @ A B b 9 Y 4>a Y t c x
0x21e160…21e2f4 (1, 428) Opaque[0x194]
0x21e2f4…21e488 # DirEnt {nam=»DVDI02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1550, f03=0x0000}
0x21e2f4…21e488 IdxSect {
0x21e2f4…21e488 f00 = 0x00aa // 0x21e2f4 @0x0
0x21e2f4…21e488 f01 = 0x0002 // 0x21e2f6 @0x2
0x21e2f4…21e488 gno = [ // 0x21e2f8 @0x4
0x21e2f4…21e488 [0x00]: C0x00aa.0x2.0
0x21e2f4…21e488 ]
0x21e2f4…21e488 }
0x21e488…21e61c Dummy {f00=0x00aa, f01=0x0190, f02=» 2 P IDENT DVDI02 REL 9.2 79-11-16 870105040920 P : P =1,HANG UP AT /03 OUTPUT B P REL 9.1 79-05-23 f P* . P* DEVICE WORK TABLE FOR DISPLAY INDICATOR P* P* & P ENTRY DVDI02 DISPLAY INDICATOR 03 P* P*
0x21e61c…21e7b0 Dummy {f00=0x00aa, f01=0x0190, f02=»RAMETER z 0 P DATA /8000 STATUS. /8000 MEANS DEVICE READY P DATA 0 ECB ADDRESS D P DATA DWTEND-DVDI02 ORDER ` ( P DATA DIAD POINTER TO ADDRESS-BLOCK 6 P DATA 'DI',0 TERM.NUMBER AND PROGRAM START ADDRESS $ P DATA 0 ECB QUEUE ANCHOR ADDRESS
0x21e7b0…21e944 Dummy {f00=0x00aa, f01=0x4162, f02=»UEUE P DATA /0000 P DATA /3F4F,/5F6F * P DATA 0 SAVE AREA FOR FLASHING LIGHTS : P DATA 0 TIMER POINTER h P DATA 0 DUMMY WORD =1 P DATA 0 DUMMY WORD =1 " P DATA 0 DUMMY TIMER POINTER =1 P IFT MMUPAG=1 PDEVECB DAT
0x21e944…21ead8 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
0x21ead8…21ec6c Dummy {f00=0x00aa, f01=0x0190, f02=»1 LOOP 3 & P ABL(NN) DMT900 CHECK THIS EXTENT 4 P XIF 4 8 P IFT INDXAC=1 4 D P EJECT 4 Z P* 4 h P* ALL EXTENTS CHECKED 4 r P* RELEASE MASRTER INDEX 4 P* 4 P INH 4 & P LD A1,FDBMIA,A6 MASTER INDEX ADDR 4 P RF(Z) DMT894 NO MAT
0x21ec6c…21ee00 Dummy {f00=0x00aa, f01=0x018e, f02=» DMT894 NO MATER IX 4 P CW A1,MXIND+2,A5 5 P RB(NE) DMT885 5 6 P LD A4,MXIND,A5 5 L & P RF(N) DMT890 PREVIOUS ENTRY USED 5 d " P LD A4,MXIND+4,A5 NO OF WORDS 5 P ANKL A4,/7FFF REMOV USE BIT 5 P ADS A4,MXIND,A5 NR OF WORDS 5 P* 5 P*
0x21ee00…21ef94 (1, 429) Opaque[0x194]
0x21ef94…21f128 # DirEnt {nam=»DVDY02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1558, f03=0x0000}
0x21ef94…21f128 IdxSect {
0x21ef94…21f128 f00 = 0x00aa // 0x21ef94 @0x0
0x21ef94…21f128 f01 = 0x0002 // 0x21ef96 @0x2
0x21ef94…21f128 gno = [ // 0x21ef98 @0x4
0x21ef94…21f128 [0x00]: C0x00aa.0x3.0
0x21ef94…21f128 ]
0x21ef94…21f128 }
0x21f128…21f2bc Dummy {f00=0x00aa, f01=0x0190, f02=» 2 P IDENT DVDY02 REL 9.2 79-11-16 870105040920 P : * P* DEVICE WORK TABLE FOR VIDEO DISPLAY B P* p P ENTRY DVDY02 TABLE ENTRY z P* P* ( P EXTRN DYAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 1 P* PDVDY02 EQU * T
0x21f2bc…21f450 Dummy {f00=0x00aa, f01=0x0190, f02=» DATA DWTEND-DVDY02 ORDER ( P DATA DYAD POINTER TO ADDRESS-BLOCK " P DATA 'DY' TTAB-ADDRESS N $ P DATA 0 WAIT/ACTIVATE INDICATOR n P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB
0x21f450…21f5e4 Dummy {f00=0x00aa, f01=0x4158, f02=»VE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER . P DATA /101 CURSOR POINTER L * P DATA /1850 LEFT BYTE=NUMBER OF LINES n " P RIGHT BYTE=CHARACTERS/LINE P DATA 0 BUFFER INDEX P IFT MMUPAG=1 PDEVECB DATA 0,0,0,0,
0x21f5e4…21f778 Dummy {f00=0x00aa, 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
0x21f778…21f90c Dummy {f00=0x00aa, f01=0x0190, f02=»OF FDBS ; | PDMTA60 SUK A4,2 < 0 P RB(N) DMTA50 ALL ADDR CHECKED IN OTHER FDB < ( P LDR A5,A3 < P ADR A5,A4 < n P CW A6,FDBADF,A5 < P RB(NE) DMTA60 < P* < @ P* DELETE THIS REFERENCE TO THE FDB THAT SHALL BE RELEASED < P* < P C
0x21f90c…21faa0 Dummy {f00=0x00aa, f01=0x0190, f02=»SET FDB FREE < PDMTA40 EQU * = * P CF A14,CLRBUF REMOVE ALL FREE BUFFERS = ( P LDR A1,A7 NEW FDB ADDR = V P ABL(Z) DMTERX NO MORE FDBS = v P IFT INDXAC=1 = P ENB ENB = P* = 4 P* FIND WHICH DMTASK IS NEXT AND ACTIVATE THAT = P* =
0x21faa0…21fc34 (1, 430) Opaque[0x194]
0x21fc34…21fdc8 # DirEnt {nam=»DVGP03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1560, f03=0x0000}
0x21fc34…21fdc8 IdxSect {
0x21fc34…21fdc8 f00 = 0x00ab // 0x21fc34 @0x0
0x21fc34…21fdc8 f01 = 0x0002 // 0x21fc36 @0x2
0x21fc34…21fdc8 gno = [ // 0x21fc38 @0x4
0x21fc34…21fdc8 [0x00]: C0x00ab.0x0.0
0x21fc34…21fdc8 ]
0x21fc34…21fdc8 }
0x21fdc8…21ff5c Dummy {f00=0x00ab, f01=0x018e, f02=» 2 P IDENT DVGP03 REL 9.2 79-11-16 870105040920 P : , P* DEVICE WORK TABLE FOR GENERAL PRINTER B P* r P ENTRY DVGP03 TABLE ENTRY | P* P* ( P EXTRN GPAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 1 P* PDVGP03 EQU *
0x21ff5c…2200f0 Dummy {f00=0x00ab, f01=0x0190, f02=» P DATA DWTEND-DVGP03 ORDER ( P DATA GPAD POINTER TO ADDRESS-BLOCK & P DATA 'GP' TTAB-ADDRESS R $ P DATA 0 WAIT/ACTIVATE INDICATOR r P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU
0x2200f0…220284 Dummy {f00=0x00ab, f01=0x40f0, f02=»0 SAVE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER 2 " P DATA 0 HEAD POSITIPN POINTER P P IFT MMUPAG=1 v PDEVECB DATA 0,0,0,0,0,0 P XIF PDWTEND EQU * P* P* P END @ DATA DEVECB MMU
0x220284…220418 Dummy {f00=0x00ab, 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
0x220418…2205ac Dummy {f00=0x00ab, f01=0x0190, f02=»6 KEY LENGTH K P INH L & P LD A4,DWTTDM,A7 GET TTAB ADDRESS L $ P TL TTB:MT,A4 LOAD MMU REGISTERS L J $ P LD A4,PRUN GET DM TTAB ADDRESS L r 0 P TS TTB:MT,A4 STORE USER MMU IN DM MMU TABLE L P ENB L , P CF A14,MOV:US MOVE KEY TO FDB KEY AREA L
0x2205ac…220740 Dummy {f00=0x00ab, f01=0x0190, f02=»NDXAC=1 L P IFT MMUPAG=0 M " P LD A2,FDBKA,A6 KEY START ADDR M & P LDR A3,A2 M L " P AD A2,ECBBA,A9 KEY IN BUFFER M ^ P XIF M P* M P IFT INDXAC=1 M P AD A3,FDBRRO,A1 M P ADR A3,A11 KEY IN FILE M P LDK A7,0 M " P LD A6,FDBRLE,
0x220740…2208d4 (1, 431) Opaque[0x194]
0x2208d4…220a68 # DirEnt {nam=»DVTP04«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1568, f03=0x0000}
0x2208d4…220a68 IdxSect {
0x2208d4…220a68 f00 = 0x00ab // 0x2208d4 @0x0
0x2208d4…220a68 f01 = 0x0002 // 0x2208d6 @0x2
0x2208d4…220a68 gno = [ // 0x2208d8 @0x4
0x2208d4…220a68 [0x00]: C0x00ab.0x1.0
0x2208d4…220a68 ]
0x2208d4…220a68 }
0x220a68…220bfc Dummy {f00=0x00ab, f01=0x018e, f02=» 2 P IDENT DVTP04 REL 9.2 79-11-16 870105040920 P : 4 P* DEVICE WORK TABLE FOR TELLER TERMINAL PRINTER B P* z P ENTRY DVTP04 TABLE ENTRY P* P* ( P EXTRN TPAD POINTER TO ADDRESS-BLOCK $ PMMUPAG EQU 1 MEM. MAN.UNIT COND.
0x220bfc…220d90 Dummy {f00=0x00ab, f01=0x018e, f02=» P DATA 0 ECB ADDRESS P DATA DWTEND-DVTP04 ORDER ( P DATA TPAD POINTER TO ADDRESS BLOCK B P DATA 'TP' TTAB-ADDRESS n $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADD
0x220d90…220f24 Dummy {f00=0x00ab, f01=0x40f6, f02=» f P DATA 0,0,0,0 STACK P DATA 0 TIMER POINTER $ ( P DATA 0 REQUESTED,ACTUAL LINE NUMBER B P IFT MMUPAG=1 n PDEVECB EQU * P DATA 0,0,0,0,0,0 P XIF PDWTEND EQU * P* P* P END @ AREA USER ECB ADD
0x220f24…2210b8 Dummy {f00=0x00ab, 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
0x2210b8…22124c Dummy {f00=0x00ab, f01=0x4134, f02=»03 z PTC03E EQU * PTC04 DATA TC04E-* & P DATA /0030 H P DATA DVTP04 h P DATA /0231 P DATA DVTP04 P DATA /0132 P DATA DVTP04 P
0x22124c…2213e0 Dummy {f00=0x00ab, f01=0x2008, f02=» NT TCLASS * * $ * . ENTRY TCLASS 8 * N * X * b * l * v * * TCLASS DATALTCLASE-* TCLASE EQU * END @ 1 INTLT2 INTRT1
0x2213e0…221574 (1, 432) Opaque[0x194]
0x221574…221708 # DirEnt {nam=»M:92SP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x1050, f03=0x0000}
0x221574…221708 IdxSect {
0x221574…221708 f00 = 0x0082 // 0x221574 @0x0
0x221574…221708 f01 = 0x0026 // 0x221576 @0x2
0x221574…221708 gno = [ // 0x221578 @0x4
0x221574…221708 [0x00]: C0x0082.0x2.0
0x221574…221708 [0x01]: C0x0082.0x3.0
0x221574…221708 [0x02]: C0x00b4.0x0.0
0x221574…221708 [0x03]: C0x00b4.0x1.0
0x221574…221708 [0x04]: C0x00b4.0x2.0
0x221574…221708 [0x05]: C0x00b4.0x3.0
0x221574…221708 [0x06]: C0x00b5.0x0.0
0x221574…221708 [0x07]: C0x00b5.0x1.0
0x221574…221708 [0x08]: C0x00b5.0x2.0
0x221574…221708 [0x09]: C0x00b5.0x3.0
0x221574…221708 [0x0a]: C0x0143.0x2.0
0x221574…221708 [0x0b]: C0x0143.0x3.0
0x221574…221708 [0x0c]: C0x0144.0x0.0
0x221574…221708 [0x0d]: C0x0144.0x1.0
0x221574…221708 [0x0e]: C0x0144.0x2.0
0x221574…221708 [0x0f]: C0x0144.0x3.0
0x221574…221708 [0x10]: C0x0145.0x0.0
0x221574…221708 [0x11]: C0x0145.0x1.0
0x221574…221708 [0x12]: C0x0145.0x2.0
0x221574…221708 ]
0x221574…221708 }
0x221708…22189c Dummy {f00=0x0082, f01=0x0190, f02=» Z x x x x x x ` x xY Y HI| R x x x x x x H x x x x xI| x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x ~ c @ Tg t z ^ b bLPL H b2 Z ` z
0x22189c…221a30 Dummy {f00=0x0082, f01=0x0190, f02=» 4c @S{ D d 2Z $"z y B % y D Dbf d * F :P }B W [~ ? d j% L "~ T &b ICn 1 d _ A t " w$ _ @w$ > > U # T @ x H ( ( P c P W~ T P> , T6 L v M 0 - Av Q @ ~P A ~
0x221a30…221bc4 Dummy {f00=0x0082, f01=0x0190, f02=» A D ^_* F 8 w* Q Z P 0 9 _ 4 P _, ? P H H #P x A t A VQ ? @w" J ) Aw"_ P P A X 8 Aw$_ ? ? ? ? ? ^ A _ _ ^ w" $P T I R $ 5 % > ? W ? W ? T T$
0x221bc4…221d58 Dummy {f00=0x0082, f01=0x0190, f02=»T ~ 0 Av 1 Q Q > > 0 @v 1 Av P P > ? * X " R" Y T ? X D T> @ W8 > _& @ 8 R" Y T ? X D T @ W > _& W2 > 8 X W( ? ` @ @ P $ H W W > > > > > > @D V ? D > _ > ? _ > > ? ^ ! Y ^
0x221d58…221eec Dummy {f00=0x0082, f01=0x0190, f02=» A D _* F 8 Q Z P 0 9 _ 4 _, ? P H H #P x A A VQ ? @ J ) A _ P P A X A _ ? ? ? ? ? ^ A _ _ ^ $P T I R $ 5 % > ? W ? W ? T T
0x221eec…222080 Dummy {f00=0x0082, f01=0x0190, f02=»T ~ 0 A 1 Q Q > > 0 @ 1 P P > ? X " R" Y #L 1 $ $V D A ~( @v v X H Av ) @ H P 1 % E I L U M (@ D >a @ <a H D |
0x222080…222214 (1, 433) Dummy {f00=0x0082, f01=0x0190, f02=» # p ' w*( B T :" U U F v M 0 - Av Q '_D >W v J B B w J B B pU w J BAB rU w J B B pU w J BQB rU
0x222214…2223a8 Dummy {f00=0x0082, f01=0x0190, f02=» A t ? W A t ? W A t ? W U R ; V # T R p X # PJ P X RL P 4 ] P $ P ] U PD P< P0 P, R 4T ] U : X "0Tp+ Y WH 8Z 4 U R ] U # $P4> R0> 8'
0x2223a8…22253c Dummy {f00=0x0082, f01=0x0190, f02=» y $W $ ^ P 8R R wB Y $ X Z ;BR 8% =A Y T Z& _, X ' X 4X< XB U T T U 5 U R " ] wB ;h # <c$ P X X " Z & "X 8# T& 8Z V2 X # T 8R X $P y $ Y $ X ' X (@
0x22253c…2226d0 Dummy {f00=0x0082, f01=0x0190, f02=»_ ? 4 U 5 R PF "P2 R T T R X # X > P P P X XF _H Wj ? T T ^ W u > > E D E E S( % ;DV " U D $ P #`P T E wB _ " P T 8! P6 Y Y Y Y
0x2226d0…222864 Dummy {f00=0x0082, f01=0x0190, f02=»RT T T ] ] 8 W< TrW T ] _ P T V WT 8V T P U 8 ~ U Q2P X H 5 U R " ] Y > > V P X P P _ ] W Q Y _: @ T P X R4 @ U S U t " D P D T U
0x222864…2229f8 Dummy {f00=0x0082, f01=0x0190, f02=» T 8TV 9WD B 7P P w: Aw W Aw @w A.W ? A tI.9 X R C C wB ?A @w A. X V 9_: @ $ T E _ " P T 8! P Y Y Y Y
0x2229f8…222b8c Dummy {f00=0x0082, f01=0x0190, f02=»RT T T ] ] 8 W< TrW T ] _ P T V WT 8V T P U 8 ~ U Q2P X H 5 U R " ] Y > > V P X P P _ ] W Q Y _: @ T P X R4 @ U S U
0x222b8c…222d20 Dummy {f00=0x0082, f01=0x0190, f02=» # L Y :e X BY, X @P& Y @ ! 9 R ! 9 R Y @ Wb P UH ! ! ! P WF X @ @ @ ! ! 8! P W* P& ! ! .! P W ! ! .! P > X FP _ X D ( ^ W b X @X$_ W P W B " 0 Y , Y . 4 X @:C* WB W>
0x222d20…222eb4 (1, 434) Dummy {f00=0x00b4, f01=0x0190, f02=» " ! n P X > Y '? _< @ X2 a W<_J Y " ! n P X> X4 0P -_z ^ _ A _v A t ? I F 9AZf9a X <V # T X X X '? 4 T B C X P X " I $ wB Y < Y ! Td ! Y @ ! ^! TR 0 X
0x222eb4…223048 Dummy {f00=0x00b4, f01=0x0190, f02=» B B r s L T 1 WP B B PD P w: V - 0 P A # +T W Q P P 1 ! T V C B Q 1 wB Y @ r t B X _ ? & X Z&W A t ?I & X '
0x223048…2231dc Dummy {f00=0x00b4, f01=0x0190, f02=» ! P X Y '? _< @ X2 a W _J Y ! P X> X4 0P -_z _ A _v A t ? I F 9AZf9a X V # T X X X '? 4 T B C X P X " I 8 8 ,
0x2231dc…223370 Dummy {f00=0x00b4, f01=0x0190, f02=»Z 0P R I W _" H P 4 I > T C T, V. Y T Pn q 0 ) W` X P T& B RNP" A @ ` A ^ W> @W& T" P X T T W C 8W T 8P Y ^ 5 ) P U
0x223370…223504 Dummy {f00=0x00b4, f01=0x0190, f02=» T P H T _ X I Y T # C C W4 O " # X Y ) C C x '? Y T Y W Y T # P W ` Y P R R P HP (@ T(@ " 2 X $? P Z$ > >
0x223504…223698 Dummy {f00=0x00b4, f01=0x0190, f02=»: C > B R Q~ P0 B P* 0$ T # R QL L > X B U( H Q2 X D B $ T C x > C $ ) _ X 9BV X & w> X B D C > X H UJ H B P PL $ # Q > P
0x223698…22382c Dummy {f00=0x00b4, f01=0x0190, f02=» > > ? _ X T X X T % T ?C L Rl _@(@ L U L Q0 M X D ( ) 1 > _" X X T U w* Y _| ?(@ X P& T D #DP 0P X T 4 Y X X T X A
0x22382c…2239c0 Dummy {f00=0x00b4, f01=0x0190, f02=»P T P 0P 1 _ W Y > > T H wB ` B L _ _< ? ^ 4 _ ` ` @ F 1 A F _ P 9 > > R @ U 9C @ T M D _ W^ M $R M Aw$ 2
0x2239c0…223b54 (1, 435) Dummy {f00=0x00b4, f01=0x0190, f02=» T H !Z!Z" " " " " "v"v! !r",! ! " " ! "v"v! ! " # $ % "$&( b @ D X P _ L !##P T @ R $P U + U _ (@(@ I P ^ " H Y H d B # X ( U " B r C
0x223b54…223ce8 Dummy {f00=0x00b4, f01=0x0190, f02=»A H H S W C C B B B U A^ R Wp H TP L P B r L ( C $ X _ X ` T I T J @v P C X I X J S W C C W, B B Y IR Q X JU C '? T W6 B< T.(@(@ P #D B #
0x223ce8…223e7c Dummy {f00=0x00b4, f01=0x0190, f02=» - _ : Z $ -_ D ( U ( 0 W T ` U @ , @ W : X & X P !##T Y T( X P P P @w$ Q (@ F D : @ x_ w$ ( H > # X &Pj D ^V" D "? P P &P E ^ C V, P ( $L( (
0x223e7c…224010 Dummy {f00=0x00b4, f01=0x0190, f02=» P W T Y $ P T _ Y & F ((@ _ & X & X I U X J U ( B T$ X X RP F # T (( P ` U0 @ , D !##X D ( * ]" 0 X Wf ` U @ H @ X WF A N 4 5W
0x224010…2241a4 Dummy {f00=0x00b4, f01=0x0190, f02=» 9 ( (> 4' % ' % 5 % 4 , W , P& ,' X X 1 Z" ) % _ (@ C A % ( B ! (( % @# F U G F G # (& & ( F " F +P P* X $ T A^ U W A^ R P> $P8W (( X ( X &
0x2241a4…224338 Dummy {f00=0x00b4, f01=0x0190, f02=» F " F D '? P P( $ P" A I I K K P P & P A W D $ T A^ T A W E I E J X ^V ? T B (@( B B P ! Tn M + : (P A A " P "" X P + @
0x224338…2244cc Dummy {f00=0x00b4, f01=0x0190, f02=» @ + A @ + B D E X #D( (|( B B @ D W C C ( (P (R @ T A 0" + + U _ L !SSP !LL + W L @ A V + P E @ E P E P E
0x2244cc…224660 Dummy {f00=0x00b4, f01=0x0190, f02=» P %_ S S E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | ) ) @ T W T Wz @ P R ( >a U Wb 0 =b P P @ ! T. W< P D Y P Y P Y U ! T !
0x224660…2247f4 (1, 436) Dummy {f00=0x00b4, f01=0x0190, f02=» -W P B ( , (@( @ ,H _ T ` ` 9A S ^ H $X D S . S $ CX R * S W S _ S ` R ( R * @ S b + U _ L !SSP !LL W L @ A V P E @ E P E P E
0x2247f4…224988 Dummy {f00=0x00b4, f01=0x0190, f02=» P %_ S S E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | ) ) @ T W T W @ P R ( >a U W 0 =b P P @ ! T W P D Y P Y P Y U ! T !
0x224988…224b1c Dummy {f00=0x00b4, f01=0x0190, f02=» -W P B (@( @ ,H _ T ` ` 9A S ^ H $X D S . S $ R * S W S _ S ` R ( R * S b + U _ L !SSP !LL W L @ A V P E @ E P E P E
0x224b1c…224cb0 Dummy {f00=0x00b4, f01=0x0190, f02=» P %_ S S E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | ) ) @ T W T W @ P R ( >a U W 0 =b P P @ ! T W P D Y P Y P Y U ! T !
0x224cb0…224e44 Dummy {f00=0x00b4, f01=0x0190, f02=» -W P B (@( @ ,H _ T ` ` 9A S ^ H $X D S . S $ R * S W S _ S ` R ( R * S b + U _ L !SSP !LL W L @ A V P E @ E P E P E
0x224e44…224fd8 Dummy {f00=0x00b4, f01=0x0190, f02=» P %_ S S E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | ) ) @ T W T W @ P R ( >a U W 0 =b P P @ ! T W P D Y P Y P Y U ! T !
0x224fd8…22516c Dummy {f00=0x00b4, f01=0x0190, f02=» -W P B (@( @ ,H _ T ` ` 9A S ^ H $X D S . S $ R * S W S _ S ` R ( R * S b + U _ L !SSP !LL W L @ A V P E @ E P E P E
0x22516c…225300 Dummy {f00=0x00b4, f01=0x0190, f02=» P %_ S S E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | ) ) @ T W T W @ P R ( >a U W 0 =b P P @ ! T W P D Y P Y P Y U ! T !
0x225300…225494 (1, 437) Dummy {f00=0x00b4, f01=0x0190, f02=» -W P B (@( @ ,H _ T ` ` 9A S ^ H $X D S . S $ R * S W S _ S ` R ( R * S b + U _ L !SSP !LL W L @ A V P E @ E P E P E
0x225494…225628 Dummy {f00=0x00b4, f01=0x0190, f02=» P %_ S S E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | ) ) @ T W T W @ P R ( >a U W 0 =b P P @ ! T W P D Y P Y P Y U ! T !
0x225628…2257bc Dummy {f00=0x00b4, f01=0x0190, f02=» -W P B (@( @ ,H _ T ` ` 9A S ^ H $X D S . S $ R * S W S _ S ` R ( R * S b + U _ L !SSP !LL W L @ A V P E @ E P E P E
0x2257bc…225950 Dummy {f00=0x00b4, f01=0x0190, f02=» P %_ S S E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | ) ) @ T W T W @ P R ( >a U W 0 =b P P @ ! T W P D Y P Y P Y U ! T !
0x225950…225ae4 Dummy {f00=0x00b4, f01=0x0190, f02=» -W P B (@( @ ,H _ T ` ` 9A S ^ H $X D S . S $ R * S W S _ S ` R ( R * S b + U _ L !SSP !LL W L @ V P E @ E P E P E
0x225ae4…225c78 Dummy {f00=0x00b4, f01=0x0190, f02=» P %_ S S E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | ) ) @ T W T W @ P R ( >a U W 0 =b P P @ ! T W P D Y P Y P Y U ! T !
0x225c78…225e0c Dummy {f00=0x00b4, f01=0x0190, f02=»P Q R ;A [ [ : Q R P ;A [ [ : ? ? !? P P !> P W 9P _ 0 T !##P> ? R4 L TX P L P 4 M X M M _8 > 6 D LW 0P Q P P E +P W : X + ` X L 1 Y L :
0x225e0c…225fa0 Dummy {f00=0x00b4, f01=0x0190, f02=» U 1_ D + I D N ) E N : T * @ SP P W X * 0 U U. _ Y . R P Y $ P X ( _ W Y & : B P6 T G W& X ^ Y ^ B I ~ B T B : X "? P P X T _ X . P X $
0x225fa0…226134 (1, 438) Dummy {f00=0x00b5, f01=0x0190, f02=» T ( T & ^ S W : U ; $ T $ T $ T&x : : $ T2 $ ) ] $ ) Y _$ U x 0 )_8 $_ $ ) YP_J U ; $ T $ T $ TNp : : $ T* (W $ U $ ) Y _& (# )_4 $ ($ ) YR_L U p 0_8 $
0x226134…2262c8 Dummy {f00=0x00b5, f01=0x0190, f02=»:b9B Y v Y x ) L C Y z E PX P( PP P< P@ G6 6 G G + H, w: !J,* X , X P !J !HNWb !J,* _ !J,* _& !J0 X , X P K !HT X zP B L _ X vp ^ X | C W X , X P B B !J Hr !HN ! T Y *W X * H| !HT#
0x2262c8…22645c Dummy {f00=0x00b5, f01=0x0190, f02=» P _ X " X ! Tr X !& Ph B E` E` :C P K !HT 9DV !G&(@ B n !K !J N !K f !K !J ^ !K ( !J !K V !K X Y . X * Hr " !HT_ Y * K 4 !K PT C !K !HT !G (@ !K R _ !Kv L 1 ;h 1 !Kv 1 !K !K * !HN
0x22645c…2265f0 Dummy {f00=0x00b5, f01=0x0190, f02=»X@ ^ !K C (Q !J, !J * !HN !K ! T )WL WP !K Xz N !K ( - f !K ) W. Y LW Y L Y H Y J Y B S W W B C wB _ ? LL Y " @ XP@ @ R8 !Kf !J Y . Y , K !HT @ !J DK ) Y X $ T X Y $ Y X (P y
0x2265f0…226784 Dummy {f00=0x00b5, f01=0x0190, f02=» '? D A t ? LL(@ X H X J K P6 X LT $ D C Y B wBK & E % Y B K LL X ;AR@;a X &P Y & P 7P < $ <C ! 9 4 X H " _ W B RZ X , X P W P Q8 U _ T,: B R(' P Q
0x226784…226918 Dummy {f00=0x00b5, f01=0x0190, f02=» ]K _ K !K 4 !KB ;E :B 9A !KB U L P jW kQ 4 Y * !K G 0" Z Y" P Z _ 4 AHh;D AHh 4 R _ ;H 4 n !K (:C K 4 V !K ( 4 X " 4 !K ) 4 X P H 4 T X Y Y X P y
0x226918…226aac Dummy {f00=0x00b5, f01=0x0190, f02=» L P 7P < $ <C ! 9 4 X H " _ W B R X X P W P Q U _ T : B R ' P Q
0x226aac…226c40 Dummy {f00=0x00b5, f01=0x0190, f02=» ] _ ! 4 ! ;E :B 9A ! U P jW kQ 4 Y ! G 0" Z Y" P Z _ 4 AHh;D AHh 4 R _ ;H 4 ! (:C 4 ! ( 4 X " 4 !K ) 4 X P H 4 T X Y Y X
0x226c40…226dd4 (1, 439) Dummy {f00=0x00b5, f01=0x0190, f02=»P, w: Q~ wB X P W B Y "W X " w:W B " P H v:H B # L v Y @R`P* P $_ @N !@P Qd O _l _0 X 9 [ P8 @v v w: @v `v @v P 0P _ % Av Av Y QJ _ B Ql P Q X ! 3 V`_ X P 0 Y P C
0x226dd4…226f68 Dummy {f00=0x00b5, f01=0x0190, f02=» P Y _& Y Q0 @RF 0 ARH ARF_: X P ( y Y W [L (P 0 ) > N (P _ ) 1_ N (X( P _ 0 )_6 X " X> "XD XH R` _D R` _6 (P _ ) 1 4 [ X R2 X T* X P& , Y L C L C h > @N @N @N AN
0x226f68…2270fc Dummy {f00=0x00b5, f01=0x0190, f02=» > B Y BHBB O !Y 2B !Y T P P T T T !Y Tf Tb A[ P A[ TR !Y TL !Y TD T@ !Y T8 !Y A I ARR P " U !Y Vt_ !Y T [ U " X !Y _ !Z ARP @RHP @RFP !V ARH ARJ_ !Z @RJP @[L
0x2270fc…227290 Dummy {f00=0x00b5, f01=0x0190, f02=»P P AR Q @RD 8 H v @[LP E [ Pf X R` X P X TR P C P C P " H v X "# P " P X * Y X T !QlW hW( W" X R X T !Ql Q~ !W Rl X " T< X ! X !W W. ARJ @RD ARR Y " @ _Z !Z @RHT @RJP !W Rl !Z @RHT @
0x227290…227424 Dummy {f00=0x00b5, f01=0x0190, f02=»P @RNT0 !V !W ARP_ ARR VJ B ARH @RLT _2 _6 @RF Qd ARN ARH X ! XD Y _N @RHTL X ! P !W Rl# T @[LT !W _ !U !W _ ARJ AR H v E ARN ARD 4 @RHP !W !Z Rl !Z^ @R`P !X !Z ARH Rl @N T !W _ T Q0_ RV ARF mV C @ B
0x227424…2275b8 Dummy {f00=0x00b5, f01=0x0190, f02=»T6 X R0 X P T$ T Y W RV P P C Q0 ARH ARF @RPP X Y 4 @[L @RNT @R^ AR @R AR^ ARN !Y T2 P4 PJ PL P P. 1 AR @R ]6W P _@ @[L @R E !Z P !Y 4 _$ !Z 2_l / ARRT W ,W ARd AReW W
0x2275b8…22774c Dummy {f00=0x00b5, f01=0x0190, f02=» !vT W 0 " WL R ~T }T T0 W, !Y P " ! " :A *@ H v T 0 !Y W R !Y AR @RZ @R UH Zt Q P Q T 0 !Y AR 0 !Y AR !Y " !Y " !Y W ARL _" ARN ARF !YB !Y % !Y R !Y !Y @[ !Y 8 !Y X ! 9a DRh
0x22774c…2278e0 Dummy {f00=0x00b5, f01=0x0190, f02=»" P ARN O Rt AN Q~ 4 A _$" P H vB P W !Z R wB_ !Y ! 1 4 AY @v `v @v P 0 M AY 4 ? @v `v @v P $ Y QJ_ @ AN Q~ @N T Zp Rl O @ AN Q~ Zp wB AN aN Q~ 4 ZH X AN > Z Z ARb 4 ARb O !Y
0x2278e0…227a74 (1, 440) Dummy {f00=0x00b5, f01=0x0190, f02=»Z :H 4 N [@ [NdR ! " :A *@ H T 0 ! W R ! AR @RZ @R U Zt Q P Q T 0 ! AR 0 ! AR ! " ! " ! W ARL _" ARN ARF ! ! % ! R ! ! @ ! 8 ! X ! 9a DRh
0x227a74…227c08 Dummy {f00=0x00b5, f01=0x0190, f02=»" P ARN O Rt AN Q~ 4 A _$" P H B P W ! R _ !Y ! 1 4 AY @ ` @ P 0 M AY 4 ? @ ` @ P $ Y QJ_ @ AN Q~ @N T Rl O @ AN Q~ AN aN Q~ 4 ZH X AN > Z ARb 4 ARb O !Y
0x227c08…227d9c Dummy {f00=0x00b5, f01=0x0190, f02=»Z :H 4 N [NdR ! " :A *@ H T 0 ! W R ! AR @RZ @R U Zt Q P Q T 0 ! AR 0 ! AR ! " ! " ! W ARL _" ARN ARF ! ! % ! R ! ! @ ! 8 ! X ! 9a DRh
0x227d9c…227f30 Dummy {f00=0x00b5, f01=0x0190, f02=»" P ARN O Rt AN Q~ 4 A _$" P H B P W ! R _ !Y ! 1 4 AY @ ` @ P 0 M AY 4 ? @ ` @ P $ Y QJ_ @ AN Q~ @N T Rl O @ AN Q~ AN aN Q~ 4 ZH X AN > Z ARb 4 ARb O !Y
0x227f30…2280c4 Dummy {f00=0x00b5, f01=0x0190, f02=»Z :H 4 N [NdR ! " :A *@ H T 0 ! W R ! AR @RZ @R U Zt Q P Q T 0 ! AR 0 ! AR ! " ! " ! W ARL _" ARN ARF ! ! % ! R ! ! @ ! 8 ! X ! 9a DRh
0x2280c4…228258 Dummy {f00=0x00b5, f01=0x0190, f02=»" P ARN O Rt AN Q~ 4 A _$" P H B P W ! R _ !Y ! 1 4 AY @ ` @ P 0 M AY 4 ? @ ` @ P $ Y QJ_ @ AN Q~ @N T Rl O @ AN Q~ AN aN Q~ 4 ZH X AN > Z ARb 4 ARb O !Y
0x228258…2283ec Dummy {f00=0x00b5, f01=0x0190, f02=»Z :H 4 N [NdR ! " :A *@ H T 0 ! W R ! AR @RZ R U Zt Q P Q T 0 ! AR 0 ! AR ! " ! " ! W ARL _" ARN ARF ! ! % ! R ! ! @ ! 8 ! X ! 9a DRh
0x2283ec…228580 Dummy {f00=0x00b5, f01=0x0190, f02=»" P ARN O Rt AN Q~ 4 A _$" P H B P W ! R _ !Y ! 1 4 AY @ ` @ P 0 M AY 4 ? @ ` @ P $ Y QJ_ @ AN Q~ @N T Rl O @ AN Q~ AN aN Q~ 4 ZH X AN > Z ARb 4 ARb O !Y
0x228580…228714 (1, 441) Dummy {f00=0x00b5, f01=0x0190, f02=»Z :H 4 N [NdR ! " :A *@ H T 0 ! W R ! AR @RZ R U Zt Q P Q T 0 ! AR 0 ! AR ! " ! " ! W ARL _" ARN ARF ! ! % ! R ! ! @ ! 8 ! X ! 9a DRh
0x228714…2288a8 Dummy {f00=0x00b5, f01=0x0190, f02=»" P ARN O Rt AN Q~ 4 A _$" P H B P W ! R _ !Y ! 1 4 AY @ ` @ P 0 M AY 4 ? @ ` @ P $ Y QJ_ @ AN Q~ @N T Rl O @ AN Q~ AN aN Q~ 4 ZH X AN > Z ARb 4 ARb O !Y
0x2288a8…228a3c Dummy {f00=0x00b5, f01=0x0190, f02=»Z :H 4 N [NdR ! " :A *@ H T 0 ! W R ! AR @RZ R U Zt Q P Q T 0 ! AR 0 ! AR ! " ! " ! W ARL _" ARN ARF ! ! % ! R ! ! @ ! 8 ! X ! 9a DRh
0x228a3c…228bd0 Dummy {f00=0x00b5, f01=0x0190, f02=»" P ARN O Rt AN Q~ 4 A _$" P H B P W ! R _ !Y ! 1 4 AY @ ` @ P 0 M AY 4 ? @ ` @ P $ Y QJ_ @ AN Q~ @N T Rl O @ AN Q~ AN aN Q~ 4 ZH X AN > Z ARb 4 ARb O !Y
0x228bd0…228d64 Dummy {f00=0x00b5, f01=0x0190, f02=»Z :H 4 N [NdR ! " :A *@ H T 0 ! W R ! AR @RZ R U Zt Q P Q T 0 ! AR 0 ! AR ! " ! " ! W ARL _" ARN ARF ! ! % ! R ! ! @ ! 8 ! X ! 9a DRh
0x228d64…228ef8 Dummy {f00=0x00b5, f01=0x0190, f02=»" P ARN O Rt AN Q~ 4 A _$" P H B P W ! R _ !Y ! 1 4 AY @ ` @ P 0 M AY 4 ? @ ` @ P $ Y QJ_ @ AN Q~ @N T Rl O @ AN Q~ AN aN Q~ 4 ZH X AN > Z ARb 4 ARb O !Y
0x228ef8…22908c Dummy {f00=0x00b5, f01=0x0190, f02=»Z :H 4 N [NdR ! " :A *@ H T 0 ! W R ! AR @RZ R U Zt Q P Q T 0 ! AR 0 ! AR ! " ! " ! W ARL _" ARN ARF ! ! % ! R ! ! @ ! 8 ! X ! 9a DRh
0x22908c…229220 Dummy {f00=0x00b5, f01=0x0190, f02=»" P ARN O Rt AN Q~ 4 A _$" P H B P W ! R _ !Y ! 1 4 AY @ ` @ P 0 M AY 4 ? @ ` @ P $ Y QJ_ @ AN Q~ @N T Rl O @ AN Q~ AN aN Q~ 4 ZH X AN > Z ARb 4 ARb O !Y
0x229220…2293b4 (1, 442) Dummy {f00=0x0143, f01=0x0190, f02=»Z :H 4 N [NdR ! " :A *@ H T 0 ! W R ! AR @RZ R U Zt Q P Q T 0 ! AR 0 ! AR ! " ! " ! W ARL _" ARN ARF ! ! % ! R ! ! @ ! 8 ! X ! 9a DRh
0x2293b4…229548 Dummy {f00=0x0143, f01=0x0190, f02=»" P ARN O Rt AN Q~ 4 A _$" P H B P W ! R _ !Y ! 1 4 AY @ ` @ P 0 M AY 4 ? @ ` @ P $ Y QJ_ @ AN Q~ @N T Rl O @ AN Q~ AN aN Q~ 4 ZH X AN > Z ARb 4 ARb O !Y
0x229548…2296dc Dummy {f00=0x0143, f01=0x0190, f02=»Z :H 4 N [NdR ! " :A *@ H T 0 ! W R ! AR @RZ R U Zt Q P Q T 0 ! AR 0 ! AR ! " ! " ! W ARL _" ARN ARF ! :f"? Hvp !Y "? Hvp !Y 4 ABCDEFGHI#.<(+!&JKLMNOP
0x2296dc…229870 Dummy {f00=0x0143, f01=0x0190, f02=» x || 8 > > @w$ @ Aw$W ^ ! Z( w" (X0 @w$P T M ]@ , ) L P $R 2_, Aw$ P* P Y U ( ) 5 & > > [ [ w$ Z PJ D 0P P - I 1 P Z $ " @ @ - P _ Z 9B @ U W
0x229870…229a04 Dummy {f00=0x0143, f01=0x0190, f02=»T0. T G Y6 G _b P ,P - _ 2 ( x { x ? X V Y wB ! VW< Y U R -P { X , ) Y . z X P Y P C W~ 8!@P$ X $P P y $W $ ^{ Y $ X " PP:A: R Q W Y <D X ? ?: T
0x229a04…229b98 Dummy {f00=0x0143, f01=0x0190, f02=» V |D ! B P X " _` B P$ $$ R % C |D* ! W Y +PH Y *P> Y (P Y )P |D R _Q P OR R W " ! B yD Wr W 0 Z |D ! B Z Z& X . 0T X W X ,P Y . 0 %_. % Y . W _p P |D _ X
0x229b98…229d2c Dummy {f00=0x0143, f01=0x0190, f02=» $4 P |T X .T * W Y , - wB @ Y $ X Z _X ? X :a Z T T W P X :d Y > > ? 8 R @RT V @% =cWP R`P R&P8 R P W 9 WD $ P W _ $ P _$ _*_, _ %0=c X 0P > 0 > >_ B 1 > XT 0 _
0x229d2c…229ec0 Dummy {f00=0x0143, f01=0x0190, f02=» ! ! W B W$ B L # 9Q T W Q P X & V T Y &W |d X ! T6 B R0Q$ B D ! V ! ! ! W ! !~ Y ! T ! V | ! B C ! ! T " T W Q " T ) w> ! |n Y _ ! ! d Y &P Q W
0x229ec0…22a054 (1, 443) Dummy {f00=0x0143, f01=0x0190, f02=» ! Y 4 RNQ " PH _ " P R: M T2 ! L ,! :D" ! L Y Y U ! _$ W4 , ! T ,' | ! R !__U C X ' W Y ! _ X RT U TJ D X } ? Y X P " ! Y ' ! X T ! w> | wB R _ 4
0x22a054…22a1e8 Dummy {f00=0x0143, f01=0x0190, f02=» F b PB P8 w: B P B L # +P ! ! T ! Y & ! W ! ! W ! Y Y j U P" T Y &_. P4 R( Pj O]> V _F T Y Y & V Y _^ C _P j j" $ P X & X ]r ! Y Y Y _
0x22a1e8…22a37c Dummy {f00=0x0143, f01=0x0190, f02=» C > X Z^<BR P j D X _x R0 V0 ! P* P P P" R ?Q ! Y R Q -_ ? _ X # ! ^ Y _( ? X Z ! P4 P X " ! ! X & B 8# T $ # ;D 7P P w: Y W Y
0x22a37c…22a510 Dummy {f00=0x0143, f01=0x0190, f02=» P P w: B P B L # +P ! ! T ! Y & ! W ! ! W ! Y Y j U P T Y &_. P R P O]> V _F T Y Y & V Y _^ C _P j j" $ P X & X ]r ! Y Y Y _
0x22a510…22a6a4 Dummy {f00=0x0143, f01=0x0190, f02=» C > X Z^<BR P j D X _x R0 V0 ! P* P P P" R ?Q ! Y R Q -_ ? _ X # ! ^ Y _( ? X Z ! P4 P X " ! ! X & B 8# T $ # ;D 7P P w: Y W Y
0x22a6a4…22a838 Dummy {f00=0x0143, f01=0x0190, f02=» P P w: B P B L # +P ! ! T ! Y & ! W ! ! W ! Y Y j U P T Y &_. P R P O]> V _F T Y Y & V Y _^ C _P j j" $ P X & X ]r ! Y Y Y _
0x22a838…22a9cc Dummy {f00=0x0143, f01=0x0190, f02=» C > X Z^<BR P j D X _x R0 V0 ! P* P P P" R ?Q ! Y R Q -_ ? _ X # ! ^ Y _( ? X Z ! P4 P X " ! ! X & B 8# T $ # ;D 7P P w: Y W Y
0x22a9cc…22ab60 Dummy {f00=0x0143, f01=0x0190, f02=» P P w: B P B L # +P ! ! T ! Y & ! W ! ! W ! Y Y j U P T Y &_. P R P O]> V _F T Y Y & V Y _^ C _P j j" $ P X & X ]r ! Y Y Y _
0x22ab60…22acf4 (1, 444) Dummy {f00=0x0144, f01=0x0190, f02=» C > X Z^<BR P j D X _x R0 V0 ! P* P P P" R ?Q ! Y R Q -_ ? _ X # ! ^ Y _( ? X Z ! P4 P X " ! ! X & B 8# T $ # ;D 7P P w: Y W Y
0x22acf4…22ae88 Dummy {f00=0x0144, f01=0x0190, f02=» P P P P P .T B Y Wx B P X P ( ( 7 R ( P H RN H P ' P P W< T6 ' P ! , B # P G W G wB X P P R: A ` ^ Y X T Q (P H U ^ 9 1_N w: X
0x22ae88…22b01c Dummy {f00=0x0144, f01=0x0190, f02=»P P $ $ 1 ) > ) $P e % > (@ X D G B Z F U F Z P U w> C G 4 { BCDEFGHI#.<(+!&JKLMNOPQR$]*);^-/STUVWXYZ@,%_>? 123456789:[ '=" abcdefghi[.<(+!&j
0x22b01c…22b1b0 Dummy {f00=0x0144, f01=0x0190, f02=» 7- <=2&p ?' @O JZlP}M] Nk`Ka z^L~noj {|[_m TOSS' "?:B ] P H U _ U @ U 9C @ $$ T %_< %_B "RT PL X TF X R@? V X & X H P X
0x22b1b0…22b344 Dummy {f00=0x0144, f01=0x0190, f02=» ) $P e % > (@ X D @ P 4 A U W A A @ U : A A :A A H , ` R @ U P. ,% T& C ( B P T W ' T| I @ 8 =hP Y X Pl 0T< Y H ! R
0x22b344…22b4d8 Dummy {f00=0x0144, f01=0x0190, f02=» ) 5 wB A A A " C A "" P U W X P @ E "# P P @ P ( )W @ 0 R % "V E T D A _" P @ P ( )W @ 0 Rb ' F "R G @ D #D T G W, A
0x22b4d8…22b66c Dummy {f00=0x0144, f01=0x0190, f02=» ) $P e % > (@ X D @ P 4 A U W A A @ U : A A :A A , ` R @ U P ,% T C ( B P T W ' T I @ 8 =hP Y X P 0T Y H ! R
0x22b66c…22b800 Dummy {f00=0x0144, f01=0x0190, f02=» ) 5 wB A A A " C A "" P U W X P @ E "# P P @ P ( )W @ 0 R % "V E T D A _" P @ P ( )W @ 0 Rb ' F "R G @ D #D T G W, A
0x22b800…22b994 (1, 445) Dummy {f00=0x0144, f01=0x0190, f02=» $P e % > (@ X D @ P 4 A U W A A @ U : A A :A A , ` R @ U P ,% T C ( B P T W ' T I @ 8 =hP Y X P 0T Y H ! R
0x22b994…22bb28 Dummy {f00=0x0144, f01=0x0190, f02=» ) 5 wB A A A " C A "" P ( X P @ E "# P P @ P ( )W @ 0 R % "V E T D A _" P @ P ( )W @ 0 Rb ' F "R G @ D #D T G W, A
0x22bb28…22bcbc Dummy {f00=0x0144, f01=0x0190, f02=» $P e % > (@ X D @ P 4 A U W A A @ U : :A A , ` R @ U P ,% T C ( B P T W ' T I @ 8 =hP Y X P 0T Y H ! R
0x22bcbc…22be50 Dummy {f00=0x0144, f01=0x0190, f02=» ) 5 wB A A A " C A "" P X P @ E "# P P @ P ( )W @ 0 R % "V l A _" P @ P ( )W @ 0 Rb ' F "R G @ D #D T G W, A
0x22be50…22bfe4 Dummy {f00=0x0144, f01=0x0190, f02=» $P e % > (@ X D @ P 4 A U W A A @ U : :A A , ` R @ U P ,% T C ( B P W ' T I @ 8 =hP Y X P 0T Y H ! R
0x22bfe4…22c178 Dummy {f00=0x0144, f01=0x0190, f02=» ) 5 wB A A A " C A "" P X P @ E "# P P @ P ( )W @ 0 R % "V A _" P @ P ( )W @ 0 Rb ' F "R G @ #D T G W, A
0x22c178…22c30c Dummy {f00=0x0144, f01=0x0190, f02=» $P e % > (@ X D @ P 4 A U W A A @ U : :A A , ` R @ U P ,% T C ( B P W ' T I @ 8 =hP Y X P 0T Y H ! R
0x22c30c…22c4a0 Dummy {f00=0x0144, f01=0x0190, f02=» -(@ : - : @ , L T M @ : =a 9a Q - _ - > @ XPJ r , > J > A> @l J @ , - M M M @ A A > 4 t 4 t 0123456789 & 0123456789 &
0x22c4a0…22c634 (1, 446) Dummy {f00=0x0144, f01=0x0190, f02=» @ABCDEFGHIJKLMNOPQRSTUVWXYZ []* < +,-. 0123456789 `ABCDEFGHIJKLMNOPQRSTUVWXYZ [] > ?;_: =!"#$%&/() @ABCDEFGHIJKLMNOPQRSTUVWXYZ [] H @ b ! 8! P ! P P & @ w: B P B H " +P P4
0x22c634…22c7c8 Dummy {f00=0x0144, f01=0x0190, f02=»T _ U D ! T _ $$ X" X& X* C j 4 X`" E BP( 8'0P E BTJ ! T 9 _ ! T @_ ! j B P 8' T( ! D B C 4 ^T PR RF ?] _ X X &" X )# C V C ! Y B ! Y _` C _ j
0x22c7c8…22c95c Dummy {f00=0x0144, f01=0x0190, f02=» ! _ 8! T B Y & ! bW B Y (U X ( X & R P ! W Y &_ Y & B Y )U X ) T T W V X ' Y )U P"R ! _ R _ ! Y ' 8 " ! 8!0T 8 !@P ! $ P ! 8!@T ! ! T Y & T X & C wB
0x22c95c…22caf0 Dummy {f00=0x0144, f01=0x0190, f02=» ! *0 ! X ! Y & Z t T _ ! X $ P ! 8 R V P P" ! W X $ X ! _ X $ X 8! P ! _( X & ! b ! D Y _D X " X &" Y )U W ! ! ! Y 4 B U )X R@ X
0x22caf0…22cc84 Dummy {f00=0x0144, f01=0x0190, f02=»V ! V W :h ! 4 X )" X '# R 4 > ($SWAP A A A A. | UU @ @ ! P$>B @ Z A Z @ Z E D P _ $ % $P _ % A @ " Q A : R W2 A A D P. R_ " :c*
0x22cc84…22ce18 Dummy {f00=0x0144, f01=0x0190, f02=» F CR F W =J F CRTT F PN A @ $ P( @ R W 8 !RRT W V P A Y W @ " T> W @ V W Q | z Y P @ T W - zP _ T <B
0x22ce18…22cfac Dummy {f00=0x0144, f01=0x0190, f02=» Y* P Z( = :L < P W <9B @ V W Q | W @ Z @ A @ j CRT @ P @ ! P W @ V P _ @ ! P j !RRP V @ P W _: j j : V @
0x22cfac…22d140 Dummy {f00=0x0144, f01=0x0190, f02=» W P R TJ V 0 !;;P P V P$ _ P !;;T X$ W _J | T W W W v V 0 !;;P P V Xb _ P !;;T X$ W nP XZ_V S A A ? @
0x22d140…22d2d4 (1, 447) Dummy {f00=0x0144, f01=0x0190, f02=» : C. J X C.9h! # " :A K : A T.I T P 1 I P < R P A _> | : A D A v A A A A A 2 A 6 : 9e9C) A I " 9A ! 9B r @ r A I ! ( : z A D A v A A
0x22d2d4…22d468 Dummy {f00=0x0144, f01=0x0190, f02=» 9PJ S Y T@ $ 1T: C !CCTt : 1P P$_ P =H P @ T X W n : YX d C !CCTZ B. J X B.9 H Q D_ _ !SST& 0 U R X A X W : @ ' R xW V W$ V P
0x22d468…22d5fc Dummy {f00=0x0144, f01=0x0190, f02=» D_ 0V , - P X 9A_ : @ ! P (W ( :W> 2 W 0 . " A T I T P 1 I 2 ; Z [ : : [ [ : j A v A A
0x22d5fc…22d790 Dummy {f00=0x0144, f01=0x0190, f02=» W W W W W Q@ V V v x W V V v p R( W V W ^< _@ V _P V V : V J P r V U _ V Z K W W :K W r
0x22d790…22d924 Dummy {f00=0x0144, f01=0x0190, f02=» v : $ F V |P v w v : V $ V l $ F V M : W V R RR > R W > <B V x V |P v 1 v W V z ` `_f V : W R R RP < W x Z_ V : " D Pd
0x22d924…22dab8 Dummy {f00=0x0144, f01=0x0190, f02=» D E % : " R ;B F " R P( |P v v : V W 0 : V P 9a _ " ( ) 8 ( ) : " $ V P 9A _ 0 : W W W ?AP ^ 0 : W ; V : : , X G : J @ 0 V
0x22dab8…22dc4c Dummy {f00=0x0144, f01=0x0190, f02=» : 4P: " D , H H $ M v b - I Y0 : @ ` V b pP ` $ $ W $ H ) P _ " = D 4 Q $_d = G $ V W $ ( V E J K _N V r
0x22dc4c…22dde0 Dummy {f00=0x0144, f01=0x0190, f02=»:b @ :b V W U6 T 9BW P P( P V W U " @ Q @ P A. @ P _b A 9n A :B A @ .V 3 S Y& P4 v v S P 3 _ v
0x22dde0…22df74 (1, 448) Dummy {f00=0x0145, f01=0x0190, f02=»R W n V pT : N V l W H V ]" . nT" ` W v < W n V ~P W x $ _v V d , V | P _ N L % V d V f v G G v U < v G v : RP :V Z : ` < V ~P
0x22df74…22e108 Dummy {f00=0x0145, f01=0x0190, f02=» ~ W V F v ) W b G F v ) - V F W f v ) G v ` " W p W ~ pP0 R RP Z_ W ~ R RX4 Z_ ` @ ` W W ~ pPn V W % R , j F " E
0x22e108…22e29c Dummy {f00=0x0145, f01=0x0190, f02=» H - V ~ I " R j E R T E D E @ v H v E ( #_v W | ;b W W t V b v ( v W p V ` $ W ` ;h 0 :C # : .=H N j .=H N j N
0x22e29c…22e430 Dummy {f00=0x0145, f01=0x0190, f02=» R | - @ - N !TTP | N :H N TBT W W8 2 " T @ | N =H N @ ) !TTXX !CCT !UUT d Wh 2 .:H N P V | _ R :h " YV
0x22e430…22e5c4 Dummy {f00=0x0145, f01=0x0190, f02=» W W ` " W p @ pP. " 4X 1 R Z0 _ W l a w ` :A W V d 4 W P _ W ` W d V V W W V V >k 8 W W t V V : x A
0x22e5c4…22e758 Dummy {f00=0x0145, f01=0x0190, f02=» * _6 : @ ] @ P @ P " P " P " P W W . !TTP | V @ T | Y !TTX" A 9 A : @ @ P. @ " P #D > " P #E > " P #F > : @ " P @ P 3 _ @ " P S
0x22e758…22e8ec Dummy {f00=0x0145, f01=0x0190, f02=»=H N W l N =H N W p N =H N W | ( @ % P W @ % P f P0 r " U | _2 v P0 " U | _2 V V tPJ S ( V | S =J @ " S V
0x22e8ec…22ea80 Dummy {f00=0x0145, f01=0x0190, f02=» : @ ! P @ @ CRT 3 @ S @ PP !RRP @ ! T 3 @ & P 3 3 YL @ @ T | : v ` @ P _ 3 S S V V
0x22ea80…22ec14 (1, 449) Dummy {f00=0x0145, f01=0x0190, f02=» * f P r _ v Ph W p W V 8 8 4 D P$ @ # P H I K T + Y@ V p _j V t Y !TTX @ @ T | : @ R @ T
0x22ec14…22eda8 Dummy {f00=0x0145, f01=0x0190, f02=» G =h G V d V r < V f P W f _B V W V t Yr !TTX @ @ T | : !TTX !CCTr V P, V r 4 U | $ $ _. v P, V 4 U | $ $ _. @ @ @
0x22eda8…22ef3c Dummy {f00=0x0145, f01=0x0190, f02=» V f _2 v U^ V 8 8 8 4 D P$ @ # P H I K T + Y@ _`R& @ @ @ % P V 4 4 4 _r @ @ T | : W V @ 0 V P _ W $ q > R P
0x22ef3c…22f0d0 Dummy {f00=0x0145, f01=0x0190, f02=» 0 I , I . $# P V -W H P U & I @ % PD H I H T P( H U V U W < + + P V : V $ F !LLT # W ;I # ;b W ;a WR# T W W,# T W W # T W W W
0x22f0d0…22f264 Dummy {f00=0x0145, f01=0x0190, f02=» *T P$ _ .P _ / V z U Y$ P W | V z 3 % W P _ V |P V v ]v W v P _ @ @ T | : N =H N : N =H N : &=H F : F =H F : F =H F : P N =H
0x22f264…22f3f8 Dummy {f00=0x0145, f01=0x0190, f02=» Z @ CRT" @ ! P ` @ E "W ` @ E " ! 1 p 0 > 1 > 2 > P r @ @ P r 0 0 1 2 0 R ~ a & " `[ LL LL LL LL P 8 8DY F
0x22f3f8…22f58c Dummy {f00=0x0145, f01=0x0190, f02=» 0N DC x KB 2 P p 8 8DY : P
0x22f58c…22f720 Dummy {f00=0x0145, f01=0x0190, f02=» 4||TP f 8 8DY P x KB r
0x22f720…22f8b4 (1, 450) Dummy {f00=0x0145, f01=0x0190, f02=» P 4 GP 4||TP 8 8DY : P
0x22f8b4…22fa48 Dummy {f00=0x0145, f01=0x0190, f02=» Q h_ _ !SST& 0 U R X A X W : @ ' R xW V W$ V P P l W P V V T l V T W P V W @ $ P p W T : A h_ 0V , - P X 9A_ : @
0x22fa48…22fbdc Dummy {f00=0x0145, f01=0x0190, f02=» j A A A A ! T A W Z A. c @ V W U R $ )_ : W W W W W ,Q@
0x22fbdc…22fd70 Dummy {f00=0x0145, f01=0x0190, f02=» J P r ,V U _ V Z K W W :K W r ,Q R t ,V v : V W V ) : V <B W |P v v : $ j V |P v w v
0x22fd70…22ff04 Dummy {f00=0x0145, f01=0x0190, f02=» V x V |P v 1 v W V z ` _f V : W R R vP : ` W x ~_ V : " D Pd W V PL $;A^ D E D P. V P P T E _J j E _T " D T E j E D E % : " R ;B j "
0x22ff04…230098 Dummy {f00=0x0145, f01=0x0190, f02=»9A _ 0 : W W W ?AP ^ 0 : W ; V : : , X G : J @ 0 V @ 0 H W : ? ? R 0 R P P B h _ : V ) v : 4P: " D , H H $ M
0x230098…23022c Dummy {f00=0x0145, f01=0x0190, f02=»P _ " = D 4 Q H_d 2 = G $ V W $ L V E J K _N V r V :B A V 9n A @ A A , @ @ ! @ P P P P|_ _ @ 9N @ :b @ :b V W U6
0x23022c…2303c0 Dummy {f00=0x0145, f01=0x0190, f02=» @ .V 3 S Y& P4 t t S P 3 _ t 3 v B A. @ D @ W x A : A > l : ^R : W n V pT : N V l W H
0x2303c0…230554 (1, 451) Opaque[0x194]
0x230554…2306e8 # DirEnt {nam=»CTAB01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1600, f03=0x0000}
0x230554…2306e8 IdxSect {
0x230554…2306e8 f00 = 0x00b0 // 0x230554 @0x0
0x230554…2306e8 f01 = 0x0004 // 0x230556 @0x2
0x230554…2306e8 gno = [ // 0x230558 @0x4
0x230554…2306e8 [0x00]: C0x00b0.0x0.0
0x230554…2306e8 [0x01]: C0x00b0.0x1.0
0x230554…2306e8 ]
0x230554…2306e8 }
0x2306e8…23087c Dummy {f00=0x00b0, f01=0x0190, f02=» . P IDENT CTAB01 83.05.19 NJ NORDJYLLANDS AMT ENTRY CTAB01 6 P ENTRY CTAB02 L P ENTRY CTAB03 b P ENTRY CTAB04 x 8 PCTAB01 DATA FUNC,FUNCSH,DEBUG1,DEBUG2,DEBUG1,DEBUG2 PCTAB02 EQU * PCTAB03 EQU * 2 PCTAB04 DATA FUNC,FUNCS
0x23087c…230a10 Dummy {f00=0x00b0, f01=0x0190, f02=» | P DATA /9E99 C17,D15 P DATA /9A9B D16,D17 $ P DATA /BFB5 A16,A17 @ P DATA /AAA3 A18,C18 DATA /8BA5 D18,A23 x DATA /3031 DATA /3233 DATA /3435 DATA /3637 DATA /3839 DATA /BA26 A20,
0x230a10…230ba4 Dummy {f00=0x00b0, f01=0x0190, f02=»E20,E21 DATA /B0B1 E22,E23 DATA /7F7F , DATA /7F7F @ DATA /7F7F T DATA /7F7F h * | PFUNCSH EQU * P DATA /7F9F A15,B15 P DATA /BDBE B16,B17 P DATA /9C9D C15,C16 P DATA /9E99 C17,D15
0x230ba4…230d38 Dummy {f00=0x00b0, f01=0x018e, f02=»ATA /3233 DATA /3435 DATA /3637 & DATA /3839 : DATA /BA26 A20,A21 N P DATA /ABB4 A22,C22 j P DATA /B2A2 D22,D23 DATA /A1A0 E15,E17 DATA /AEAF E18,E19 DATA /8C80 E20,E21 DATA /B0B1 E22,E2
0x230d38…230ecc Dummy {f00=0x00b0, f01=0x0190, f02=» ~ P DATA /7F7F P DATA /7F7F P DATA /7F27 ,C12 0 P DATA /B63C E00,A00 H P DATA /7F2B ,E11 d P DATA /2C2D B08,B10 | P DATA /2E7F B09 P DATA /3031 P DATA /3233 P DATA /3435 P DATA /3637 P DATA /3
0x230ecc…231060 Dummy {f00=0x00b0, f01=0x018e, f02=» P DATA /4445 P DATA /4647 P DATA /4849 , P DATA /4A4B @ P DATA /4C4D T P DATA /4E4F h P DATA /5051 | P DATA /5253 P DATA /5455 P DATA /5657 P DATA /5859 P DATA /5A5C P DATA /5B5D P
0x231060…2311f4 (1, 452) Dummy {f00=0x00b0, f01=0x0190, f02=» ~ P DATA /B63E E00,A00 P DATA /7F3F ,E11 $ P DATA /3B5F B08,B10 < P DATA /3A7F B09 X P DATA /3D21 p P DATA /2223 P DATA /2425 P DATA /262F P DATA /2829 P DATA /ACA9 B12,C13 P DATA /ADA7 E13,D13
0x2311f4…231388 Dummy {f00=0x00b0, f01=0x0190, f02=» DATA /4A4B P DATA /4C4D P DATA /4E4F ( P DATA /5051 < P DATA /5253 P P DATA /5455 d P DATA /5657 x P DATA /5859 P DATA /5A5C P DATA /5B5D P DATA /2A7F D12 P* PDEBUG1 EQU * P DATA /207
0x231388…23151c Dummy {f00=0x00b0, f01=0x0190, f02=»ATA /2C2D B08,B10 P DATA /2E7F B09 P DATA /3031 2 P DATA /3233 F P DATA /3435 Z P DATA /3637 n P DATA /3839 P DATA /ACA9 B12,C13 P DATA /ADA7 E13,D13 P DATA /A8A6 D14,E14 P DATA /6041 E12 P DATA
0x23151c…2316b0 Dummy {f00=0x00b0, f01=0x0190, f02=»ATA /5051 P DATA /5253 P DATA /5455 & P DATA /5657 : P DATA /5859 N P DATA /5A5C b P DATA /5B5D v P DATA /7F7F D12 P* PDEBUG2 EQU * P DATA /207F A01 P DATA /7F7F P DATA /7F7F P DATA /7
0x2316b0…231844 Dummy {f00=0x00b0, f01=0x0190, f02=» P DATA /2223 P DATA /2425 P DATA /262F 0 P DATA /2829 D P DATA /ACA9 B12,C13 X P DATA /ADA7 E13,D13 t P DATA /A8A6 D14,E14 P DATA /4041 E12 P DATA /4243 P DATA /4445 P DATA /4647 P DATA /4
0x231844…2319d8 Dummy {f00=0x00b0, f01=0x4092, f02=»A /5657 P DATA /5859 P DATA /5A5C $ P DATA /5B5D 8 P DATA /7F7F D12 L P* d P* n P* x END @ ATA /A8A6 D14,E14 P DATA /4041 E12 P DATA /4243 P DATA /4445 P DATA /4647 P DATA /4
0x2319d8…231b6c Dummy {f00=0x00b0, f01=0x2008, f02=» 233 DATA /3435 DATA /3637 ( DATA /3839 < DATA /BA26 A20,A21 P DATA /ABB3 A22,C22 l DATA /B292 D22,D23 DATA /A1A0 E15,E17 DATA /AEAF E18,E19 DATA /8C80 E20,E21 DATA /B0B1 E22,
0x231b6c…231d00 Dummy {f00=0x00b0, f01=0x412c, f02=»U h # 4 + : / 4 9 P = T C X GT [ _ 8 v H D !, aT eW i mW q u 8 wT {W P& T W T 2 H D !)B W T W ?R EW" K h OW U h YW ]W aW eW k oW ~ H D ! u yPL } T T P T$ 'R> /P6 7T. =P EW ]T k
0x231d00…231e94 (1, 453) Opaque[0x194]
0x231e94…232028 # DirEnt {nam=»SYSBUG«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1610, f03=0x0000}
0x231e94…232028 IdxSect {
0x231e94…232028 f00 = 0x00b0 // 0x231e94 @0x0
0x231e94…232028 f01 = 0x0006 // 0x231e96 @0x2
0x231e94…232028 gno = [ // 0x231e98 @0x4
0x231e94…232028 [0x00]: C0x00b0.0x2.0
0x231e94…232028 [0x01]: C0x00b0.0x3.0
0x231e94…232028 [0x02]: C0x00b1.0x0.0
0x231e94…232028 ]
0x231e94…232028 }
0x232028…2321bc Dummy {f00=0x00b0, f01=0x0190, f02=» 2 P IDENT SYSBUG REL 9.2 79-11-16 870105040920 P : P* B P* L 8 P*************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P* SYSBUG = INTERRUPT VECTORS, SYSTEM CONTROL 2 P*
0x2321bc…232350 Dummy {f00=0x00b0, f01=0x0190, f02=»*************** l P* P* " P , P 4 P < P D P L P T P P d P l P t P | P P P EJECT SYSBUG P P 4 P ENTRY SCTMSZ,SCTSFA,SCTEFA SYSTEM CONTROL TABLE P ENTRY SCTPLD
0x232350…2324e4 Dummy {f00=0x00b0, f01=0x0190, f02=» SCTMMP,SCTLAP,SCTNPE P ENTRY SCTSTB P ENTRY SCTOPT 4 P ENTRY SCTTCT,SCTCDT J P ENTRY SCTBUG f & P ENTRY SCTDMT,SCTDMI,SCTDML,SCTDMC | P ENTRY SCTBLK,SCTDCT & P ENTRY SEG:ST,SEG:DS,SEG:EL,SEG:PB & P ENTRY PAG:QF,PAG:QB,PAG:PA,
0x2324e4…232678 Dummy {f00=0x00b0, f01=0x0190, f02=»O RESTART r P EXTRN IHLKM LKM INTERRUPT P EXTRN IHRTC REAL TIME CLOCK 4 P EXTRN IH1501 X P EXTRN IH1502 x ( P EXTRN IHSOP SYSTEM OPERATORS PANEL P P P P P * P EXTRN CHRT1 REMOTE CHANNEL
0x232678…23280c Dummy {f00=0x00b0, f01=0x0190, f02=» EXTRN IHLP LINE PRINTER P EXTRN IHDU1 DISC UNIT NO. 1 $ P EXTRN ILLINT ILLEGAL INTERRUPT D P EXTRN HALT HALT ROUTINE l P EXTRN BUG DEBUGGER PX:A EQU 0 MONITOR OPTION ( PX:B EQU 0 DATA MAN .TASKS IN SYSTEM * PX:C EQU 0 DM INDEX R
0x23280c…2329a0 Dummy {f00=0x00b0, f01=0x0190, f02=»TEM x P* 6 P* DISPLACEMENTS IN SEGTAB, PAGTAB, SWBTAB AND T:A P* P PSEG:ST EQU 0 STATUS Z $ PSEG:DS EQU 2 DISC SECTOR ADDRESS v " PSEG:EL EQU 4 EFFECTIVE LENGTH $ PSEG:PB EQU 6 PAGE BLOCK ADDRESS P* & PPAG:QF EQU 0 QUEUE
0x2329a0…232b34 (1, 454) Dummy {f00=0x00b0, f01=0x0190, f02=» n P* 2 PSWB:NC EQU 0 NUMBER OF COPIES WITHIN SWB TYPE 2 PSWB:DS EQU 2 DISC SECTOR ADDRESS OF FIRST COPY H $ PSWB:EL EQU 4 SWB LENGTH (BYTES) ~ & PSWB:NS EQU 6 SWB LENGTH (SECTORS) P* ( PT:ACSB EQU -12 CURRENT SEGMENT BASE P E
0x232b34…232cc8 Dummy {f00=0x00b0, f01=0x0190, f02=»C 2 P DATA ILLINT 3 P DATA ILLINT 4 . P DATA ILLINT 5 J P DATA ILLINT 6 f P DATA ILLINT P DATA ILLINT P DATA IHSOP 9 P DATA ILLINT 10 P DATA ILLINT
0x232cc8…232e5c Dummy {f00=0x00b0, f01=0x0190, f02=»RT1 16 P DATA CHRT2 17 P DATA ILLINT 0 P DATA ILLINT P P DATA ILLINT p P DATA ILLINT P DATA ILLINT 22 P DATA ILLINT P DATA CHLT1 24 P
0x232e5c…232ff0 Dummy {f00=0x00b0, f01=0x0190, f02=» 29 P DATA IHFD P DATA ILLINT 31 . P DATA ILLINT 32 J P DATA ILLINT 33 f P DATA IHLP 34 P DATA ILLINT P DATA ILLINT 36 P DATA ILLINT 37 P DATA ILLINT 38
0x232ff0…233184 Dummy {f00=0x00b0, f01=0x0190, f02=» 43 P DATA ILLINT P DATA ILLINT 45 0 P DATA ILLINT 46 L P DATA ILLINT 47 h P DATA ILLINT 48 P DATA ILLINT 49 P DATA ILLINT 50 P DATA ILLINT 51 P DATA ILLINT 52
0x233184…233318 Dummy {f00=0x00b0, f01=0x018e, f02=» 57 P DATA ILLINT 58 P DATA ILLINT 59 ( P DATA ILLINT 60 D P DATA ILLINT 61 ` P DATA ILLINT 62 | P DATA TRAP TRAP ROUTINE P EJECT SYSBUG P P* " P* SYSTEM CONTROL TABLE POINTER P
0x233318…2334ac Dummy {f00=0x00b0, f01=0x0190, f02=» P HLT P P* P* DEBUG RESTART ENTRY & P* D P XRR A13,A13 N P XRR A14,A14 b P LD A1,SCTBUG v P ABR(NZ) A1 P HLT P P EJECT SYSBUG P P* P* SYSTEM CONTROL TABLE P* P
0x2334ac…233640 Dummy {f00=0x00b0, f01=0x0190, f02=»END OF FREE AREA & PSCTPLD DATA 0 PROGRAM LOAD DEVICE ( P C0,C1 CAS F0,F1 DISC F8,F9 FLOPP B $ PSCTANO DATA 0 APPLICATION NUMBER n 2 PSCTADA DATA 0 APPLICATION DISC SECTOR ADDRESS PSCTPAG DATA 0 PAGTAB ADDRESS PSCTSEG DATA 0 SEGTAB ADD
0x233640…2337d4 (1, 455) Dummy {f00=0x00b1, f01=0x0190, f02=»A 0 PAGE SIZE . PSCTMMC DATA 0 MMU TABLE COMMON PART ENTRY P INDEX REL TTAB H 0 PSCTLAC DATA 0 LOGICAL ADDRESS OF COMMON PART b & PSCTMMP DATA 0 MMU TABLE PAGE ENTRY P INDEX REL TTAB * PSCTLAP DATA 0 LOGICAL ADDRESS OF PAGES ( P
0x2337d4…233968 Dummy {f00=0x00b1, f01=0x018e, f02=»ASSOLY,14:DSKPAG,15:MMUPAG PSCTTCT DATA 0 TCTAB ADDRESS " PSCTCDT DATA 0 CDTAB ADDRESS F PSCTBUG DATA BUG DEBUGGER j ( PSCTDMT DATA 00001 DMTASKS IN SYSTEM P BIT 13:D2,14:D1,15:D0 2 PSCTDMI DATA 00004 DM INDEX RECORD BUFFER SIZE
0x233968…233afc Dummy {f00=0x00b1, f01=0x414e, f02=» j ( PSCTDCT DATA 00001 DC-TASK IN SYSTEM P EJECT SYSBUG 4 P L P* T P* SYSTEM STACK ^ P* t P RES 145 ~ P DATA /FCC0 AND PSW & PSTB DATA LOOP AND PC FOR IDLE LOOP P P P* P* IDLE LOOP P*
0x233afc…233c90 Dummy {f00=0x00b1, 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
0x233c90…233e24 Dummy {f00=0x00b1, f01=0x0190, f02=»V A n @ y H D ! ' 3 7 C G S W c g s w " H D ! P h L R h h : F # + P 1P 5W ; h ? L n H D ! C G Z I P M S W [ _ c g k o s w { H D !
0x233e24…233fb8 Dummy {f00=0x00b1, f01=0x0190, f02=» p R H D !+^ T P T W 6 W Z W P F b W H D !5 #W +PP = b C IT M SP W f ] h a 0 i Z m F s : y h 8 P Z H D ! T W T W P F F 8 F F H D ! p Z W b %
0x233fb8…23414c Dummy {f00=0x00b1, f01=0x0190, f02=» ` Z P ) Z 7 8 = X U n c Z m } 8 n Z T P@ H D !x PB p p Z $ T AR, GT KW UT ]V mW~ uP yP }P P F H D ! < W TR PJ V P W P W P W & " W 3P H D ! 9 h IT UT ] kV o w {
0x23414c…2342e0 Dummy {f00=0x00b1, f01=0x412c, f02=»U h # 4 + : / 4 9 P = T C X GT [ _ 8 v H D !, aT eW i mW q u 8 wT {W P& T W T 2 H D !)B W T W ?R EW" K h OW U h YW ]W aW eW k oW ~ H D ! u yPL } T T P T$ 'R> /P6 7T. =P EW ]T k
0x2342e0…234474 (1, 456) Opaque[0x194]
0x234474…234608 # DirEnt {nam=»M:BUG «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x1060, f03=0x0000}
0x234474…234608 IdxSect {
0x234474…234608 f00 = 0x0083 // 0x234474 @0x0
0x234474…234608 f01 = 0x0028 // 0x234476 @0x2
0x234474…234608 gno = [ // 0x234478 @0x4
0x234474…234608 [0x00]: C0x0083.0x0.0
0x234474…234608 [0x01]: C0x00b3.0x1.0
0x234474…234608 [0x02]: C0x00b3.0x2.0
0x234474…234608 [0x03]: C0x00b3.0x3.0
0x234474…234608 [0x04]: C0x00b8.0x1.0
0x234474…234608 [0x05]: C0x0146.0x1.0
0x234474…234608 [0x06]: C0x0146.0x2.0
0x234474…234608 [0x07]: C0x0146.0x3.0
0x234474…234608 [0x08]: C0x0147.0x0.0
0x234474…234608 [0x09]: C0x0147.0x1.0
0x234474…234608 [0x0a]: C0x0147.0x2.0
0x234474…234608 [0x0b]: C0x0147.0x3.0
0x234474…234608 [0x0c]: C0x0148.0x0.0
0x234474…234608 [0x0d]: C0x0148.0x1.0
0x234474…234608 [0x0e]: C0x0148.0x2.0
0x234474…234608 [0x0f]: C0x0148.0x3.0
0x234474…234608 [0x10]: C0x0149.0x0.0
0x234474…234608 [0x11]: C0x0149.0x1.0
0x234474…234608 [0x12]: C0x0149.0x2.0
0x234474…234608 [0x13]: C0x0149.0x3.0
0x234474…234608 ]
0x234474…234608 }
0x234608…23479c Dummy {f00=0x0083, f01=0x0190, f02=» : X e f U U #v ! c @ Tg t z ^ b bLPL H b2 Z ` z
0x23479c…234930 Dummy {f00=0x0083, f01=0x0190, f02=» 4c @S{ D d 2Z $"z y B % y D Dbf d * F :P }B W [~ ? d j% L "~ T &b ICn 1 d _ A U A @ * A A , @ ~ A A ~ @ A A @ A A @ A A @ A
0x234930…234ac4 Dummy {f00=0x0083, f01=0x0190, f02=» $ ( , 0 4 8 < 2 _ t S A _ Z r V @ & T :a R
0x234ac4…234c58 Dummy {f00=0x0083, f01=0x0190, f02=» Q ( R " S T Y G P H L V I U . V h_v A B _ NO! A A A A A A A A z *T A _ P A A d . , , < + - ; t : X " H W X " H H A A A _T @ P A 1+X A
0x234c58…234dec Dummy {f00=0x0083, f01=0x0190, f02=» & .T @ W @ A @W dW 0 Z P & l_, W W PP @ & l 0 & T A P P p r :_b d P D r_J A B Z .T @ W @ T @ W @ @ >a Z P & P @ A B P P
0x234dec…234f80 Dummy {f00=0x0083, f01=0x0190, f02=» P 3P C @ P @ x @ P @ Q A . @ B A " T @ W @ A 2 A .P @ j_2 .T 4 0 P j pP _ @ j . d 0 @ @ @ P d 0 @ A B b 9 Y 4>a Y t c x
0x234f80…235114 (1, 457) Dummy {f00=0x00b3, f01=0x0190, f02=» A A P@ @ PB z z d . @ ! T A @ A # A . & RE RN ME MN W R, ( T ( W P T $ ; V ; W~&~ P &`P 6 P @ $ P $W $ TR PJ#~ > V . >A P Y X W ^ ? ?
0x235114…2352a8 Dummy {f00=0x00b3, f01=0x0190, f02=» " ^ T @ 9J A T _ 1@ _ ^ 9 V >! D A A > > > > > > > > ^ _ ^ _ ? ? ? ? ? A ^ @ ? ? > > > > > > > @ > ? ? ? ? ? ? ? A > A >
0x2352a8…23543c Dummy {f00=0x00b3, f01=0x0190, f02=» 0:D A z_* A " A A b P & T A A " @ R _U . r " A >: D A > " A Z A ^ b$ T ! " A @ BT 0W 0W A @ BT 1W 1 @ " P& A UT @ W T @ W T @ W @ " " ? ?
0x23543c…2355d0 Dummy {f00=0x00b3, f01=0x0190, f02=» ! R :W" r W r W W ?W /W : A W ! A A PL _ @ _ I T " T A P I T$! A A A A A A A A J A A @ A @ > @ _ . I d 0R> M A P6 T @
0x2355d0…235764 Dummy {f00=0x00b3, f01=0x0190, f02=» H ( ( P c P W~ T P> , T6 L t M 0 - A t Q @ P A 2 T _ P, A V ( U P" @, V L, W @, U 2 A A Q > ? A ~ V _* 8 Q Z P 0 9 _ _, ? P
0x235764…2358f8 Dummy {f00=0x00b3, f01=0x0190, f02=» ^ $P T I R $ 5 % > ? &W ? W ? T T$ U U U U T U U 2 > > 4 T - 1_( U T P 0 U _t ? @ rT 0 A r 1 Q Q > > 0 @ r 1 A r P P > ? * X " R" Y T
0x2358f8…235a8c Dummy {f00=0x00b3, f01=0x0190, f02=» W W > > > > > > @Q V ? Q > _ > ? _ > > ? ^ ! Y ^ _ ? A. $ ( , 0 4 8 < #M 1 A ~ _* 8 Q Z P 0 9 _ _, ? P
0x235a8c…235c20 Dummy {f00=0x00b3, f01=0x0190, f02=» ^ $P T I R $ 5 % > ? W ? W ? T T U U U U T U U 2 > > 4 T - 1_( U T P 0 U _t ? @ T 0 A 1 Q Q > > 0 @ 1 P P > ? X " R Y
0x235c20…235db4 (1, 458) Dummy {f00=0x00b3, f01=0x0190, f02=» 1 % E I L U ,| M (@ D >a @ <a H D P C 9b;BT C 0 @ # W( C UH R C W C R # R l _8 C # l p ' 2 ( B T :" U U F t M 0
0x235db4…235f48 Dummy {f00=0x00b3, f01=0x0190, f02=» J B B pU J BQB rU 6 z B " P Q :A H `P P H !@T I T ! 1 U A ? W A ? W A ? W X U R ; V d # T R
0x235f48…2360dc Dummy {f00=0x00b3, f01=0x0190, f02=» X "0Tp+ Y WH 8Z $ 4 U R ] U # $P4> R0> 8' T Y X ' T P X P " >Wh 4 T # Y U T ] W 8V 4 X $P y $W $ + h P 8R R Y $ X Z ;BR 8% =A Y T
0x2360dc…236270 Dummy {f00=0x00b3, f01=0x0190, f02=» "X 8# T& 8Z V2 X # T 8R X $P y $ Y $ X ' X (@ L ' T 4X <d$ _D $?:D" Y X P Y # P 4T U d # P 4 4 P _r T _$ U _ ? 4 U 5 R PF "P2 R T T R X # X > P P
0x236270…236404 Dummy {f00=0x00b3, f01=0x0190, f02=» D $ P #`P T E j_ " P T 8! P6 Y Y Y Y _8 X XB Y X X X X ' 4 B U B (" W C (@ > ?" 8' ?A Z R 8;b# 4T RT T T ] ] 8 W< TrW T ] _ P T V WT 8V T P
0x236404…236598 Dummy {f00=0x00b3, f01=0x0190, f02=» Y _: @ X T P XX R4 @ U S U t " D P D T U W _ U 4XR XX 5 _b Y Y Y X 9BV$ X & Y " X D V * X T 8TV 9WD B 7P P A W A @ A.W ? A I.9 " X
0x236598…23672c Dummy {f00=0x00b3, f01=0x0190, f02=» * T E j_ " P T 8! P Y Y Y Y _8 X XB Y X X X X ' 4 B U B (" W C (@ > ?" 8' ?A Z R 8;b# 4T R T T ] ] 8 W T W T ] _ P T V W 8V T P
0x23672c…2368c0 Dummy {f00=0x00b3, f01=0x0190, f02=» Y _: @ X T P XX R4 @ U S U PR " 0 P B :b9B Y D ) Y F X Y >:g H $ ! P P P P !! W B B # L Y :e X BY, X @P& Y @ ! 9 R ! 9 R Y @ Wb P UH
0x2368c0…236a54 (1, 459) Dummy {f00=0x00b3, f01=0x0190, f02=»W b X @X$_ nW nP W B " 0 Y , Y . 4 X @:C* WB W> X " " :BW0 X " :BW& X @ X FP _ X D % ^ W c X :B X ! E ( ! Y Y ? "l @ P: Y " !! P X > Y '? * * _< @"jX2 a"jW<_J Y " !! P
0x236a54…236be8 Dummy {f00=0x00b3, f01=0x0190, f02=» X P X " I $ * Y < Y ! Td ! ^ Y @ ! ! TR 0 X P p Y , (P ) P @ T X Q $ X X T Y _l Y < 4 "l j " B B r s " T
0x236be8…236d7c Dummy {f00=0x00b3, f01=0x0190, f02=» Q 1 * Y @ r t B X _ ? # X Z&W A ?I # X ' { B C X 4 " # c X # E Y Y ? @ P Y ! P X Y '? * _< @ X2 a W _J Y ! P
0x236d7c…236f10 Dummy {f00=0x00b3, f01=0x0190, f02=» X P X " I( (((H(n(&( (H( (&) )*(&)*)*(&(&(&) $ ( , 0 4 8 < ( H T %T 0 ) $P $ ) U @ C @$ W %f 0P P > T Z 0P R I W % _" H P 4 I 2 > T C T, V. Y
0x236f10…2370a4 Dummy {f00=0x00b3, f01=0x0190, f02=» -@T %hW % C P 8W T 8P Y ^ 5 ) P U XH ' X X D #DP @ b P X l T _| Xv Y @ P< -@T W0 X &P* T P H T _ X I Y T # C C W4
0x2370a4…237238 Dummy {f00=0x00b3, f01=0x0190, f02=» ' P (@ $ (@ " 2 X $? P' $ > > F C F C > B R Q F ! P C > C > F :c" H :b"? #" : C > B R Q~ (2 P0 B P* 0$ T # R QL (
0x237238…2373cc Dummy {f00=0x00b3, f01=0x0190, f02=» D C > X H UJ H B P PL $ # Q > P _0 # T p > P p (_H _2 B U X ( > ? _ X T (@ ( ^ > > ? _ X T X X T % T ?C L Rl * _@(@ L U L Q0
0x2373cc…237560 Dummy {f00=0x00b3, f01=0x0190, f02=» X P& T D #DP 0P X T 4 Y 2 X -@ X T X M 1 1 X P - M T $ PD _ T " # p X L R P ' P (@ $ ^ X P8 P0 # P T P 0P 1 _ `W 2 Y > > T + + +
0x237560…2376f4 (1, 460) Dummy {f00=0x00b8, f01=0x0190, f02=»P 9 > > R @ U 9C @ T M D _ W^ M $R M A D _ $P D % 1 I D " @ @ - U _ 9B @ T W X > && + , v - - /T/T/T/T/T. . .d- . .@. /T/T. . . .d- "
0x2376f4…237888 Dummy {f00=0x00b8, f01=0x0190, f02=»(@ I- P ^ /T H-$ Y H, B # X ( U /T B r P6 W Y & Y $ 0 Y . /& N /T B Y I B Y J_ W Nj C P C W < C C _H Nj H H S W C C B B B U M R Wp H TP L
0x237888…237a1c Dummy {f00=0x00b8, f01=0x0190, f02=»R Q X JU C '? T W6 N T.(@(@ P #D 0j h 1 1 4 4 4 4 4 3R3R0 4 3R0 4 4 4 4 3R3R0 F X (P R X (W G G : R $ - _ " P $ - : R $ - _ : Z $ -_ D ( U ( 0 W T ` U @ , @
0x237a1c…237bb0 Dummy {f00=0x00b8, f01=0x0190, f02=»Pj D ^V" D "? P P &P E ^ O V, P ( 0 ( ( W 0 O$ 4 B W C X '? /X X & X ( )T 4 / 0 4" X $TT T A/ J , M< P W T Y $ P T _ Y & F (@ _ 32 X & X I
0x237bb0…237d44 Dummy {f00=0x00b8, f01=0x0190, f02=» ]" 0 X Wf ` U @ H @ X WF N N 4 5W P 0 @K 1 AK (@_ 1 (@ 2 / O $P % 4 2 F / (@ B P 9 4 4' 2`' 2` 5 2` 4 96 W , P& ,' X X
0x237d44…237ed8 Dummy {f00=0x00b8, f01=0x0190, f02=» +P P* X $ T M U W M R P> $P8W 4 X ( X & F X P @ Q (@ P6 + X ^V" P "P8 $P4W X & X bT( ;AR ( 4 ( 0 O$ T Y ^ F " F D '? P P( $ P" Nj I I K K
0x237ed8…23806c Dummy {f00=0x00b8, f01=0x0190, f02=» ! Tn M 8* : 4 A p A r" P * "" P 8* ` @ , (@ D . C C C ,W C ( 4 4 L " TOP 8* A ^ L A L C Z @ A Q< @ , 7 A , @ n 8* B D . E 0X #D( 4 ( B B
0x23806c…238200 Dummy {f00=0x00b8, f01=0x0190, f02=» !SSP !LL 7 W L @ 6 A 6V 8* P E 8 @ , E : P E H P E J D 8T XP 8* 96 2% P( R 0 X .T R , @ ^T R RT @ n 8P 8* 6 96 2% P 8* X r P %_ S -@ S E 3 P S I P S J P S ( P S
0x238200…238394 (1, 461) Dummy {f00=0x0146, f01=0x0190, f02=» =b P 8P @ 6 ! T. W< P : D . Y P H Y P J Y U ! T ! X6 _R _V D z" P ` A a ( ^ W @ x P6 I @ rP @L V W HL IL (@ @ XP -W P B 2(@( @ n 8 _ T ` * ` 9A S ^
0x238394…238528 Dummy {f00=0x0146, f01=0x0190, f02=» !SSP !LL W L @ A V P E @ E P E P E D T P 2% P R 0 X T R , @ T R RT @ 6 2% P P %_ S -@ S E 3 P S I P S J P S ( P S
0x238528…2386bc Dummy {f00=0x0146, f01=0x0190, f02=» =b P P @ ! T. W< P D Y P Y P Y U ! T ! X6 _R _V D " P A ( ^ W @ P6 I @ P @ V W H I (@ @ P -W P B 2(@( @ 8 _ T ` ` 9A S ^
0x2386bc…238850 Dummy {f00=0x0146, f01=0x0190, f02=» !SSP !LL W L @ A V P E @ E P E P E D T P 2% P R 0 X T R , @ T R RT @ 6 2% P P %_ S -@ S E 3 P S I P S J P S ( P S
0x238850…2389e4 Dummy {f00=0x0146, f01=0x0190, f02=» =b P P @ ! T. W< P D Y P Y P Y U ! T ! X6 _R _V D " P A ( ^ W @ P6 I @ P @ V W H I (@ @ P -W P B 2(@( @ 8 _ T ` ` 9A S ^
0x2389e4…238b78 Dummy {f00=0x0146, f01=0x0190, f02=» !SSP !LL W L @ A V P E @ E P E P E D T P 2% P R 0 X T R , @ T R RT @ 6 2% P P %_ S -@ S E 3 P S I P S J P S ( P S
0x238b78…238d0c Dummy {f00=0x0146, f01=0x0190, f02=» =b P P @ ! T. W< P D Y P Y P Y U ! T ! X6 _R _V D " P A ( ^ W @ P6 I @ P @ V W H I (@ @ P -W P B 2(@( @ 8 _ T ` ` 9A S ^
0x238d0c…238ea0 Dummy {f00=0x0146, f01=0x0190, f02=» !SSP !LL W L @ A V P E @ E P E P E D T P 2% P R 0 X T R , @ T R RT @ 6 2% P P %_ S -@ S E 3 P S I P S J P S ( P S
0x238ea0…239034 (1, 462) Dummy {f00=0x0146, f01=0x0190, f02=» =b P P @ ! T. W< P D Y P Y P Y U ! T ! X6 _R _V D " P A ( ^ W @ P6 I @ P @ V W H I (@ @ P -W P B 2(@( @ 8 _ T ` ` 9A S ^
0x239034…2391c8 Dummy {f00=0x0146, f01=0x0190, f02=» !SSP !LL W L @ A V P E @ E P E P E D T P 2% P R 0 X T R , @ T R RT @ 6 2% P P %_ S -@ S E 3 P S I P S J P S ( P S
0x2391c8…23935c Dummy {f00=0x0146, f01=0x0190, f02=» =b P P @ ! T. W< P D Y P Y P Y U ! T ! X6 _R _V D " P A ( ^ W @ P6 I @ P @ V W H I (@ @ P -W P B 2(@( @ 8 _ T ` ` 9A S ^
0x23935c…2394f0 Dummy {f00=0x0146, f01=0x0190, f02=» !SSP !LL W L @ A V P E @ E P E P E D T P 2% P R 0 X T R , @ T R RT @ 6 2% P P %_ S -@ S E 3 P S I P S J P S ( P S
0x2394f0…239684 Dummy {f00=0x0146, f01=0x0190, f02=» =b P P @ ! T. W< P D Y P Y P Y U ! T ! X6 _R _V D " P A ( ^ W @ P6 I @ P @ V W H I (@ @ P -W P B 2(@( @ 8 _ T ` ` 9A S ^
0x239684…239818 Dummy {f00=0x0146, f01=0x0190, f02=» !SSP !LL W L @ V P E @ E P E P E D T P 2% P R 0 X T R , @ T R RT @ 6 2% P P %_ S -@ S E 3 P S I P S J P S ( P S
0x239818…2399ac Dummy {f00=0x0146, f01=0x0190, f02=» =b P P @ ! T. W< P D Y P Y P Y U ! T ! X6 _R _V D " P A ( ^ W @ L P Q R ;A [ [ : P Q R ;A [ [ : Q R P ;A [ [ : ? ?
0x2399ac…239b40 Dummy {f00=0x0146, f01=0x0190, f02=» D LW 0P Q P P E +P W : X + X L 1 Y L : L 4W 0P8 R Q P W R D + Q ( 0 5 @ r 1 A r Z> : D NW (P D + I W6 @K T ( AK U 1_ D + I D N ) E N : T * M<SP P W X * 0
0x239b40…239cd4 (1, 463) Dummy {f00=0x0146, f01=0x0190, f02=» ^ B I ~ B T B : X "? P P X T _ X . P X $ ! # C ,W C C X %? : X &_ 0 D . P , _ D . D $ D * M T ( T & ^ S W : U ; $ T $ T $ T&x : : $
0x239cd4…239e68 Dummy {f00=0x0146, f01=0x0190, f02=» U $ ) Y _& (# )_4 $ ($ ) YR_L U p 0_8 $_< f U #f Q. X !W Y * X . !W Y T & R R T B " 0 T V2 R, Y | :b9B Y v Y x ) YR C Y z Rb PX P( PP P< P@ S 6 T0
0x239e68…239ffc Dummy {f00=0x0146, f01=0x0190, f02=» | C W X , X P B B !W8 T !T ! T Y *W X * T !T # T XH & !T !S " 0 TOT 0 SST X Y ,W 0 X Y , Y * XH !T !S X *' P !W8 !W$ DXH ) P _ X " X ! Tr X !& Ph B Q Q :C P XH !T 9DV !S
0x239ffc…23a190 Dummy {f00=0x0146, f01=0x0190, f02=»PT C !X !T !T&(@ !X R _ !W X 1 ;h 1 !W 1 !X: !X * !T !T& !X ) !T Y *# T X Y ._ Y *# 4 !X ( C V !V XH !T B B !W8 f !X$W0 W !X X@ ^ !X$ C (Q !V !WR* !T !X ! T )WL WP !X Xz N !X$ ( - f !
0x23a190…23a324 Dummy {f00=0x0146, f01=0x0190, f02=» Y , XH !T @ !W( DXH ) Y X $ T X Y $ Y X (P y (_ ( + U _ Y ( " X . P Y : !W !T X # P Y .:A , X $ Y Y $ Y X U Y & X '? Q. A ? X (@ X H X J K P6 X LT $ D C Y B K & E
0x23a324…23a4b8 Dummy {f00=0x0146, f01=0x0190, f02=» W B RZ X , X P W P Q8 U _ T,: B R(' P Q 9BW Q 9C B ! T 4 U Q P ;A _ 4 X 0 # P _ 4(@ R XH D 1_ W (@ R 0 D ]XH_ XH !X: 4 !W ;E :B 9A !W U X P jW kQ 4
0x23a4b8…23a64c Dummy {f00=0x0146, f01=0x0190, f02=» ( 4 X " 4 !X$ ) 4 X P T 4 T X Y Y X P y _ + _ Y " X P Y : ! !T X # P Y :A , X Y Y Q* YF
0x23a64c…23a7e0 Dummy {f00=0x0146, f01=0x0190, f02=» W B R X X P W P Q U _ T : B R ' P Q 9BW Q 9C B ! T 4 U Q P ;A _ 4 X # P _ 4(@ R D 1_ W (@ R 0 D ] _ ! 4 ! ;E :B 9A ! U P jW kQ 4
0x23a7e0…23a974 (1, 464) Dummy {f00=0x0147, f01=0x0190, f02=» ( 4 X " 4 !X$ ) 4 X P T 4 T X Y Y X [ ^Xg [ ^Xg Y " X P Y : ! !T P> P +P8 P> PH ] W P P 5P, ] X P W B Y "W X " W B " P H :H B # L Y @
0x23a974…23ab08 Dummy {f00=0x0147, f01=0x0190, f02=» ] * _ B Ql ]8 ] X ! 3 b _ X P 0 Y P C ) [ ] [ B ! P Y _d X ! X ] _ B Y _~ X P A]& + ]. Y Wb Y @_ X X A]J + ]R Y _& Y ] @^ 0 A^ A^ _: X P ( y Y W g (P 0 )
0x23ab08…23ac9c Dummy {f00=0x0147, f01=0x0190, f02=» R2 X T* X P& , Y L C L C ) > @[X @[T @[V A[VX * _" X P y Y X P T ] @^ T A^ A^ > A^ A^ A^ A^ A^ ^ W > B Y BHBB [ !f. 2B !fTT P P
0x23ac9c…23ae30 Dummy {f00=0x0147, f01=0x0190, f02=»fd T g b " X !fJ_ !g. A^ @^ P @^ P !c A^ A^ _ !g. @^ P @g X@ !ct TD A^ !d& ^ @^ P( @g P" @^ _ 8 !b: X Y !c A^ _B !fJ X>_b A^ @g @^ T 1 Z 0 2P P P A^ ] @^ 8 H @g P E g Pf X R` X P X TR P C
0x23ae30…23afc4 Dummy {f00=0x0147, f01=0x0190, f02=» X ! X !d W. A^ @^ A^ Y " @ _Z !g. @^ T @^ P !d: ^ !g. @^ T @^ X Wx A I ^ + aX ^ @^ @^ br @^ @^ A^ b !g. @^ XV !fJ T @^ P !d. !f _p /T, @^ X @^ P @^ T0 !c !d* A^ _ A^ b B A^ @^ T _2 _6 @^ ] A^ A^ X
0x23afc4…23b158 Dummy {f00=0x0147, f01=0x0190, f02=»f @^ P !ed !f A^ ^ @[ZT !d*_ T ] _ ^ A^ y C ) B B A^ A^ A^ A^ A^ !db !f A^ _^ Y Y " [ W @^ !f X ! X Z X X X _ @^ P< @^ T6 X R0 X P T$ T Y W ^ ]n P C * ] A^ A^ @^ P X Y
0x23b158…23b2ec Dummy {f00=0x0147, f01=0x0190, f02=»^ E !gtP !f. 4 _$ !gt 2_l / A^ T W ,W A^ A^ W W W A^ A^ !e @^ !fR @^ !fR !f@ !f@ B J 4 !e !f4 @^ @^ A^ @^ T$ @g !fR 8 !fRW - !fR x ! W 0 " WL R ~T }T T0 W, !fR P " ! " :A *@
0x23b2ec…23b480 Dummy {f00=0x0147, f01=0x0190, f02=» dN A^ _" A^ A^ !e !f4 % !fR R !fR !f4 @g !fR 8 !fR X ! 9a D^ !fR X ! P ! T & !fR_b B J B !fJ !f4 4 A ? ^ J T A^ T 2PX !g> H 4 !f ^ A ? ^ _ I " P A^ [ ^ A[X ] 4 A _$" P H B P W !g> ^ _ !fJ ! 1
0x23b480…23b614 (1, 465) Dummy {f00=0x0147, f01=0x0190, f02=»] f A[T a[ ] 4 + f X A[ > + g Z A^ 4 A^ [ !f. @^ P !d. !f ^ @^ P a^ A^ 4 Agn Agp Agr ?a :a# P @gn @gp @gr 4 @^ T A^ !fJ gp !fJ A^ @gp:H 4 [b g g p ! " :A *@
0x23b614…23b7a8 Dummy {f00=0x0147, f01=0x0190, f02=» dN A^ _" A^ A^ ! ! % ! R ! ! @ ! 8 ! X ! 9a D^ ! X ! P ! T & ! _b B J B ! ! 4 A ? ^ J T A^ T 2P ! H 4 ! ^ A ? ^ _ I " P A^ [ ^ A[X ] 4 A _$" P H B P W ! ^ _ !fJ ! 1
0x23b7a8…23b93c Dummy {f00=0x0147, f01=0x0190, f02=»] A[T a[ ] 4 + f X A[ > + Z A^ 4 A^ [ !f. @^ P !d. !f ^ @^ P a^ A^ 4 A A A ?a :a# P @ @ @ 4 @^ T A^ !fJ gp !fJ A^ @gp:H 4 [b g p ! " :A *@
0x23b93c…23bad0 Dummy {f00=0x0147, f01=0x0190, f02=» dN A^ _" A^ A^ ! ! % ! R ! ! @ ! 8 ! X ! 9a D^ ! X ! P ! T & ! _b B J B ! ! 4 A ? ^ J T A^ T 2P ! H 4 ! ^ A ? ^ _ I " P A^ [ ^ A[X ] 4 A _$" P H B P W ! ^ _ !fJ ! 1
0x23bad0…23bc64 Dummy {f00=0x0147, f01=0x0190, f02=»] A[T a[ ] 4 + f X A[ > + Z A^ 4 A^ [ !f. @^ P !d. !f ^ @^ P a^ A^ 4 A A A ?a :a# P @ @ @ 4 @^ T A^ !fJ gp !fJ A^ @gp:H 4 [b g p ! " :A *@
0x23bc64…23bdf8 Dummy {f00=0x0147, f01=0x0190, f02=» dN A^ _" A^ A^ ! ! % ! R ! ! @ ! 8 ! X ! 9a D^ ! X ! P ! T & ! _b B J B ! ! 4 A ? ^ J T A^ T 2P ! H 4 ! ^ A ? ^ _ I " P A^ [ ^ A[X ] 4 A _$" P H B P W ! ^ _ !fJ ! 1
0x23bdf8…23bf8c Dummy {f00=0x0147, f01=0x0190, f02=»] A[T a[ ] 4 + f X A[ > + Z A^ 4 A^ [ !f. @^ P !d. !f ^ @^ P a^ A^ 4 A A A ?a :a# P @ @ @ 4 @^ T A^ !fJ gp !fJ A^ @gp:H 4 [b g p ! " :A *@
0x23bf8c…23c120 Dummy {f00=0x0147, f01=0x0190, f02=» dN A^ _" A^ A^ ! ! % ! R ! ! @ ! 8 ! X ! 9a D^ ! X ! P ! T & ! _b B J B ! ! 4 A ? ^ J T A^ T 2P ! H 4 ! ^ A ? ^ _ I " P A^ [ ^ A[X ] 4 A _$" P H B P W ! ^ _ !fJ ! 1
0x23c120…23c2b4 (1, 466) Dummy {f00=0x0147, f01=0x0190, f02=»] A[T a[ ] 4 + f X A[ > + Z A^ 4 A^ [ !f. @^ P !d. !f ^ @^ P a^ A^ 4 A A A ?a :a# P @ @ @ 4 @^ T A^ !fJ gp !fJ A^ @gp:H 4 [b g p ! " :A *@
0x23c2b4…23c448 Dummy {f00=0x0147, f01=0x0190, f02=» dN A^ _" A^ A^ ! ! % ! R ! ! @ ! 8 ! X ! 9a D^ ! X ! P ! T & ! _b B J B ! ! 4 A ? ^ J T A^ T 2P ! H 4 ! ^ A ? ^ _ I " P A^ [ ^ A[X ] 4 A _$" P H B P W ! ^ _ !fJ ! 1
0x23c448…23c5dc Dummy {f00=0x0147, f01=0x0190, f02=»] A[T a[ ] 4 + f X A[ > + Z A^ 4 A^ [ !f. @^ P !d. !f ^ @^ P a^ A^ 4 A A A ?a :a# P @ @ @ 4 @^ T A^ !fJ gp !fJ A^ @gp:H 4 [b g p ! " :A *@
0x23c5dc…23c770 Dummy {f00=0x0147, f01=0x0190, f02=» dN A^ _" A^ A^ ! ! % ! R ! ! @ ! 8 ! X ! 9a D^ ! X ! P ! T & ! _b B J B ! ! 4 A ? ^ J T A^ T 2P ! H 4 ! ^ A ? ^ _ I " P A^ [ ^ A[X ] 4 A _$" P H B P W ! ^ _ !fJ ! 1
0x23c770…23c904 Dummy {f00=0x0147, f01=0x0190, f02=»] A[T a[ ] 4 + f X A[ > + Z A^ 4 A^ [ !f. @^ P !d. !f ^ @^ P a^ A^ 4 A A A ?a :a# P @ @ @ 4 @^ T A^ !fJ gp !fJ A^ @gp:H 4 [b g p ! " :A *@
0x23c904…23ca98 Dummy {f00=0x0147, f01=0x0190, f02=» dN A^ _" A^ A^ ! ! % ! R ! ! @ ! 8 ! X ! 9a D^ ! X ! P ! T & ! _b B J B ! ! 4 A ? ^ J T A^ T 2P ! H 4 ! ^ A ? ^ _ I " P A^ [ ^ A[X ] 4 A _$" P H B P W ! ^ _ !fJ ! 1
0x23ca98…23cc2c Dummy {f00=0x0147, f01=0x0190, f02=»] A[T a[ ] 4 + f X A[ > + Z A^ 4 A^ [ !f. @^ P !d. !f ^ @^ P a^ A^ 4 A A A ?a :a# P @ @ @ 4 @^ T A^ !fJ gp !fJ A^ @gp:H 4 [b g p ! " :A *@
0x23cc2c…23cdc0 Dummy {f00=0x0147, f01=0x0190, f02=» dN A^ _" A^ A^ ! ! % ! R ! ! @ ! 8 ! X ! 9a D^ ! X ! P ! T & ! _b B J B ! ! 4 A ? ^ J T A^ T 2P ! H 4 ! ^ A ? ^ _ I " P A^ [ ^ A[X ] 4 A _$" P H B P W ! ^ _ !fJ ! 1
0x23cdc0…23cf54 (1, 467) Dummy {f00=0x0147, f01=0x0190, f02=»] A[T a[ ] 4 + f X A[ > + Z A^ 4 A^ [ !f. @^ P !d. !f ^ @^ P a^ A^ 4 A A A ?a :a# P @ @ @ 4 @^ T A^ !fJ gp !fJ A^ @gp:H 4 [b g p ! " :A *@
0x23cf54…23d0e8 Dummy {f00=0x0147, f01=0x0190, f02=» dN A^ _" A^ A^ ! ! % ! R ! ! @ ! 8 ! X ! 9a D^ ! X ! P ! T & ! _b B J B ! ! 4 A ? ^ J T A^ T 2P ! H 4 ! ^ A ? ^ _ I " P A^ [ ^ A[X ] 4 A _$" P H B P W ! ^ _ !fJ ! 1
0x23d0e8…23d27c Dummy {f00=0x0147, f01=0x0190, f02=»] A[T a[ ] 4 + f X A[ > + Z A^ 4 A^ [ !f. @^ P !d. !f ^ @^ P a^ A^ 4 A A A ?a :a# P @ @ @ 4 @^ T A^ !fJ gp !fJ A^ @gp:H 4 [b g p ! " :A *@
0x23d27c…23d410 Dummy {f00=0x0147, f01=0x0190, f02=» dN A^ _" A^ A^ ! :f"? H !fR "? H !fR 4 ABCDEFGHI#.<(+!&JKLMNOPQR$]*);^-/STUVWXYZ@,%_>?0123456789:[ '=" 2 0 : 8 D D , F > > @ A W *
0x23d410…23d5a4 Dummy {f00=0x0147, f01=0x0190, f02=»PJ D 0P P - I 1 P Z $ " @ @ - P _ Z 9B @ U W Z Z Z ? Z > P "R Y W Pl 2 T Pb h_ <UR "R4 PB X R< X T6 X T0. T G Y6 G _b P ,P - _ H P 2 ( N 4 ? X
0x23d5a4…23d738 Dummy {f00=0x0147, f01=0x0190, f02=» $W $ + Y $ X " PP:A: R Q W Y <D X ? ?: T p > > Ph P C f B f T B % X . $ 4 T % L X ,T ! P x Y . V ! X B P X " _` B P$ $$ R % C * ! XW Y +
0x23d738…23d8cc Dummy {f00=0x0147, f01=0x0190, f02=» 0T X W X ,P Y . 0 %_. % Y . W _p P _ X $P y $ Y $ C ! T " > QfR$ X # P X R6;GV2 X $P P y $ P8 X R2;GV. X " X , $4 P X .T * W Y , - @ Y $ X Z _X ? X :a Z T T W
0x23d8cc…23da60 Dummy {f00=0x0147, f01=0x0190, f02=»_*_, _ %0=c X 0P > 0 > >_ B 1 > XT 0 _ d j !"&';<>@^_ 9: X ! Y M P ^ Y L < L L . f ` r x ! ! ! W B W$ B L # 9Q T W Q P X & V T Y &W X
0x23da60…23dbf4 (1, 468) Dummy {f00=0x0148, f01=0x0190, f02=» ! T " T W Q " T ) ! Y _ ! ! Y &P Q W ! Y '" _" _< ! _n ! _t B B , ! T _ D ! P ! P W C V B P ! ! ! Y 4 RNQ " PH _ " P R: M T2 ! L ,! :D" ! Y
0x23dbf4…23dd88 Dummy {f00=0x0148, f01=0x0190, f02=» Y X P " ! Y ' ! X T ! " R _ 4 ! ! ! " T ! ! ! ! 4 X ' 4 Y ' ! ! " P ,$ , ! 4!"$&;<>@^_ P @ PB P8 B P B L # +P ! ! T ! Y &
0x23dd88…23df1c Dummy {f00=0x0148, f01=0x0190, f02=» _^ C _P " $ P X & X ]r ! Y Y Y _ " H 8_ ! ! x * X C _ X Y & Y > B B U$ $ ! T _ U D ! T _ C > X Z^<BR P j X _x R0 V0 ! P* P P P" R ?Q !
0x23df1c…23e0b0 Dummy {f00=0x0148, f01=0x0190, f02=» ! X & 2 n B 8# T $ # ;D 7P P Y W Y X Y 8# T W$ T( X $ P X P B V *@ Y ? X _F n , ! 4!"$&;<>@^_ P P B P B L # +P ! ! T ! Y &
0x23e0b0…23e244 Dummy {f00=0x0148, f01=0x0190, f02=» _^ C _P " $ P X & X ]r ! Y Y Y _ " H 8_ ! ! * X C _ X Y & Y > B B U $ ! T _ U D ! T _ C > X Z^<BR P j X _x R V ! P P P P R ?Q !
0x23e244…23e3d8 Dummy {f00=0x0148, f01=0x0190, f02=» ! X & 2 n B 8# T $ # ;D 7P P Y W Y X Y 8# T W$ T( X $ P X P B V *@ Y ? X _F , ! 4!"$&;<>@^_ P P B P B L # +P ! ! T ! Y &
0x23e3d8…23e56c Dummy {f00=0x0148, f01=0x0190, f02=» _^ C _P " $ P X & X ]r ! Y Y Y _ " H 8_ ! ! * X C _ X Y & Y > B B U $ ! T _ U D ! T _ C > X Z^<BR P j X _x R V ! P P P P R ?Q !
0x23e56c…23e700 Dummy {f00=0x0148, f01=0x0190, f02=» ! X & 2 n B 8# T $ # ;D 7P P Y W Y X Y 8# T W$ T( X $ P X P B V *@ Y ? X _F , ! 4!"$&;<>@^_ P P B P B L # +P ! ! T ! Y &
0x23e700…23e894 (1, 469) Dummy {f00=0x0148, f01=0x0190, f02=» _^ C _P " $ P X & X ]r ! Y Y Y _ " H 8_ ! ! * X C _ X Y & Y > B B U $ ! T _ U D ! T _ C > X Z^<BR P j X _x R V ! P P P P R ?Q !
0x23e894…23ea28 Dummy {f00=0x0148, f01=0x0190, f02=» ! X & 2 n B 8# T $ # ;D 7P P Y W Y X Y 8# T W$ T( X $ P X P B V *@ Y ? X _F , ! 4!"$&;<>@^_ P P P 6 P P .T B Y Wx B P X P
0x23ea28…23ebbc Dummy {f00=0x0148, f01=0x0190, f02=» P P R: A + Y X T Q (P H U ^ 9 1_N X T @ P ( A _ ( Y _ _x X T @ P ( A _ ( Y _ _ i t 9 @_ H P P $ $ 1 ) > ) $P e % > (@ X D G B Z F
0x23ebbc…23ed50 Dummy {f00=0x0148, f01=0x0190, f02=»FGHI#.<(+!&JKLMNOPQR$]*);^-/STUVWXYZ@,%_>? 123456789:[ '=" abcdefghi[.<(+!&jklmnopqr]$*);^-/stuvwxyz|,%_>?0123456789:#@'=" ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^ /STUVWXYZ|,%_>?0123456789:#@'= 7- <=2&p ?' @O JZlP}M] Nk`Ka z^L~noj
0x23ed50…23eee4 Dummy {f00=0x0148, f01=0x0190, f02=» $$ T %_< %_B "RT PL X TF X R@? V X & X H P * X P Y X H P * P H ) $P e % > (@ X D @ &P 4 A &
0x23eee4…23f078 Dummy {f00=0x0148, f01=0x0190, f02=» T W ' T| I . @ 8 =hP Y X Pl 0T< Y H .! R W 9a I . T T 9a H / E z ^ W P ,! T T ( : "' # @ $P & $ ) 5 A $ A v A ( " P6 * A 6 "" P U W *
0x23f078…23f20c Dummy {f00=0x0148, f01=0x0190, f02=» 0 Rb ' F "R G x @ , D . #D T G W, A n 4 "R A n A X h P ) $P e % > (@ X D @ &P 4 A &
0x23f20c…23f3a0 Dummy {f00=0x0148, f01=0x0190, f02=» T W ' T I . @ 8 =hP Y X P 0T Y H .! R W 9a I . T T 9a H / E z ^ W P ,! T T ( : "' # ` @ $P & $ ) 5 A $ A v A ( " P6 * A 6 "" P U W *
0x23f3a0…23f534 (1, 470) Dummy {f00=0x0148, f01=0x0190, f02=» 0 Rb ' F "R G x @ , D . #D T G W, A n 4 "R A n A X h P $P e % > (@ X D @ &P 4 A &
0x23f534…23f6c8 Dummy {f00=0x0148, f01=0x0190, f02=» T W ' T I . @ 8 =hP Y X P 0T Y H .! R W 9a I . T T 9a H / E z ^ W P ,! T T ( : "' # @ $P & $ ) 5 A $ A v A ( " P6 * A 6 "" P *
0x23f6c8…23f85c Dummy {f00=0x0148, f01=0x0190, f02=» 0 Rb ' F "R G x @ , D . #D T G W, A n 4 "R A n A X h P $P e % > (@ X D @ &P 4 A &
0x23f85c…23f9f0 Dummy {f00=0x0148, f01=0x0190, f02=» T W ' T I . @ 8 =hP Y X P 0T Y H .! R W 9a I . T T 9a H / E z ^ W P ,! T T ( : "' # @ $P & $ ) 5 A $ A v A ( " P6 * A 6 "" P *
0x23f9f0…23fb84 Dummy {f00=0x0148, f01=0x0190, f02=» 0 Rb ' F "R G x @ , D . #D T G W, A n 4 "R A n A X h P $P e % > (@ X D @ &P 4 A &
0x23fb84…23fd18 Dummy {f00=0x0148, f01=0x0190, f02=» W ' T I . @ 8 =hP Y X P 0T Y H .! R W 9a I . T T 9a H / E z ^ W P ,! T T ( : "' # @ $P & $ ) 5 A $ A v A ( " P6 * A 6 "" P *
0x23fd18…23feac Dummy {f00=0x0148, f01=0x0190, f02=» 0 Rb ' F "R G x @ , #D T G W, A n 4 "R A n A X h P $P e % > (@ X D @ &P 4 A &
0x23feac…240040 Dummy {f00=0x0148, f01=0x0190, f02=» W ' T I . @ 8 =hP Y X P 0T Y H .! R W 9a I @ , L T L PF L T M Q M L V L A @ : T @ [ [ M M M A -(@ : - : @ , L T M @ : =a 9a Q - _ -
0x240040…2401d4 (1, 471) Dummy {f00=0x0148, f01=0x0190, f02=» 0123456789 & 0123456789 & ' < +,-. 0123456789 `ABCDEFGHIJKLMNOPQRSTUVWXYZ [] * > ?;_: =!"#$%&/() @ABCDEFGHIJKLMNOPQRSTUVWXYZ []* < +,-. 0123456789 `ABCDEFG
0x2401d4…240368 Dummy {f00=0x0148, f01=0x0190, f02=» ! 8! P ! P P & B P B H " +P P4 T Y ' ! R X ( Y &R Y & 8!@ _$ Y &_4 8$ T B 1 X ! B B U4 $ ! T _ U D ! T _ $$ X" X& X* C X`" E P(
0x240368…2404fc Dummy {f00=0x0148, f01=0x0190, f02=» X &" X )# C V C ! Y B ! Y _` C _ " $ P X ' X ] ! B 8! T ! ! ! ! R ! _ B ! V Z, ! _ 8! T B Y & ! W B Y (U X ( X & R P ! W Y &
0x2404fc…240690 Dummy {f00=0x0148, f01=0x0190, f02=» !@P ! $ P ! 8!@T ! ! T Y & T X & C * X Y & Y > X " X &" Y )Q Y > X Z2<BR J ? Y 8" P ! ! T> 8" P d ! Y ! *0 ! X ! Y & Z T _ ! X $ P ! " R
0x240690…240824 Dummy {f00=0x0148, f01=0x0190, f02=» Y )U W ! ! ! Y 4 B d U )X R@ X X &" Y * X ) V Y ! X $ X & ! X * d `R Y ! ! ! 4 ! V ! V W :h ! 4 X )" X '# R 4 > ($SWAP
0x240824…2409b8 Dummy {f00=0x0148, f01=0x0190, f02=» @ " Q A * : R W2 A A P. _ " :c* A W " :d2 * A & W F ` W F W F CRT F A @ @ ! P2 @ P ;b=H F CR F W =J F CRTT F PN A @ $ P( @ R W
0x2409b8…240b4c Dummy {f00=0x0148, f01=0x0190, f02=» Y P @ T W - P _ T <B :L A W A A W T F W V = V W Y* P Z( = :L < P W <9B @ V W
0x240b4c…240ce0 Dummy {f00=0x0148, f01=0x0190, f02=» !RRP V @ P W _: V @ PZ W @ @ ! T _ P :l 9b ) V _ @ V W W P TJ V 0 !;;P P V P$ _ P !;;T
0x240ce0…240e74 (1, 472) Dummy {f00=0x0149, f01=0x0190, f02=» Xb _ P !;;T X$ W nP XZ_V S A u A < @ R @ ! T A A $ V @ R V V I W V $ ) H A I. : C. X C.9h! # " :A K :
0x240e74…241008 Dummy {f00=0x0149, f01=0x0190, f02=») A I " 9A ! 9B r @ *r A I ! ( : A A A B A X A ! T A A I ! : 9E @ *r s A I T ) A _ I N T : B X 9PJ S Y T@ $ 1T: C !CCTt : 1P P$_ P
0x241008…24119c Dummy {f00=0x0149, f01=0x0190, f02=» X A X W : @ ' R xW V W$ V P P W P V V T V T W P V W @ $ P p W T : A . _ 0V , - P X 9A_ : @ ! P (W ( :W> 2 W 0
0x24119c…241330 Dummy {f00=0x0149, f01=0x0190, f02=» j A A A A ! T A W Z A. c @ V W U R $ )_ : W W W W W Q@ V V v x W V V v
0x241330…2414c4 Dummy {f00=0x0149, f01=0x0190, f02=» V U p _ V p Z K W W :K W r Q R t V 4 v : V W V ) : V <B W |P v v : $ V |P v w v : V $ V l $ V
0x2414c4…241658 Dummy {f00=0x0149, f01=0x0190, f02=» ` _f V : W R R P W x _ V : " D Pd W V PL $;A^ D E D P. V P P T E _J E _T " D T E E D E % : " R ;B " R P( |P v
0x241658…2417ec Dummy {f00=0x0149, f01=0x0190, f02=» 0 : W ; V : : , X G : J @ 0 V @ 0 H W : ? ? R 0 R P P B h _ : V ) v : 4P: " D , H H $ M v b - I Y0 : @
0x2417ec…241980 Dummy {f00=0x0149, f01=0x0190, f02=» B 4 = G $ v V W $ V E J K _N V r V :B A V 9n A @ A A , @ @ ! @ P P P P|_ _ @ 9N @ :b @ :b V W U6 T 9BW P P(
0x241980…241b14 (1, 473) Dummy {f00=0x0149, f01=0x0190, f02=» 3 S Y& P4 t t S P 3 _ t 3 v B A. @ D @ W x A : A > l : R W n V pT : N V l W H V ]" . nT" W v
0x241b14…241ca8 Dummy {f00=0x0149, f01=0x0190, f02=» G v U v G v : P V : V ~P W x _$ 8 V V x % V v % : V V 4 9k! P % _ V V W W r W V v ) W b G v ) - V W f
0x241ca8…241e3c Dummy {f00=0x0149, f01=0x0190, f02=» pPn V W % | R , " E R l W ~ R l R P 8 R Xv 8_|W T : W x _ V P I W z ` pPl H - V I v " R E R T E D E @
0x241e3c…241fd0 Dummy {f00=0x0149, f01=0x0190, f02=» :C # : .=H N 0 .=H N 0 N : d 8" R _ ZY QY : @ V H W z W | CRP W ` ` H W d 2 ;A @ R - @ - N !TTP N :H N TBT W W8 2
0x241fd0…242164 Dummy {f00=0x0149, f01=0x0190, f02=»:H N P V _ R :h " YV : v `?A @ W W :b / W : W @ W D V W W ` " W p @ pP. " 4X 1 R
0x242164…2422f8 Dummy {f00=0x0149, f01=0x0190, f02=» V >k 8 W W t V V : x A * DP W r D W @ @ % V , P@ , - 4 ] 4 Y 5 X * _6 : @ & ] @ P @ P " P " P " P
0x2422f8…24248c Dummy {f00=0x0149, f01=0x0190, f02=»P #E " P #F : @ " P @ P 3 _ @ " P S 1 S 9J S ( 3 ( 9B @ @ T : @ :B W . !TTP W t N =H N W l N =H N W p N =H N 0 W | ( @ % P W @ % P
0x24248c…242620 Dummy {f00=0x0149, f01=0x0190, f02=» _2 V V tPJ S ( V | S =J @ " S V l S W l V p S W p W _L @ % P W @ % P J !TTT P @ @ T : @ ! P @ @ v CRT 3 @ v v S
0x242620…2427b4 (1, 474) Dummy {f00=0x0149, f01=0x0190, f02=» T : r ` @ P _ 3 S S V V W @ @ T : P S S _ : . !TTP V W t * P r _ Ph W p W
0x2427b4…242948 Dummy {f00=0x0149, f01=0x0190, f02=» @ T : J @ R @ T P / _ T @ A V W W t PT W f ( W d L G =h G V d V r < V f P W f _B V W V t Yr J !
0x242948…242adc Dummy {f00=0x0149, f01=0x0190, f02=» _. P, V 4 U $ $ _. @ @ @ ! P V 8 8 8 @ >B 3 . !CCP W P0 W f W d V d V r < V f _2 U^ V 8 8 8 4 D P$ @ #
0x242adc…242c70 Dummy {f00=0x0149, f01=0x0190, f02=» : W P V @ 0 V P _ W $ q > R P >b W >b & 8P D P U & E W : V W R 9 W D ) $ P@ D L T@ D &P V U 0 I , I . $# P V -W H P U & I @ % PD H I H
0x242c70…242e04 Dummy {f00=0x0149, f01=0x0190, f02=» # ;b W ;a WR# T W W,# T W W # T W W W R _ $ W : W | v z *T P _ / P *_ *T P$ _ .P _ / V z U Y$ P W | V z 3 % W
0x242e04…242f98 Dummy {f00=0x0149, f01=0x0190, f02=» N 0 : &=H F 0 : F =H F 0 : F =H F 0 : P N =H N T J_ : 00=H 00 P P _ _ : @ ! P (W ( : z . $ $ 4 @ v CRT" @ ! P ` @ E "W ` @ E "
0x242f98…24312c Dummy {f00=0x0149, f01=0x0190, f02=» a & # " `g j "l "l X X X X P 8 DY R _ P , , 0[lDC J ,KB
0x24312c…2432c0 Dummy {f00=0x0149, f01=0x0190, f02=» 8 DY 0 : P @ ,KB | D =H 00 T T 4 TP
0x2432c0…243454 (1, 475) Dummy {f00=0x0149, f01=0x0190, f02=» V V 2 DI ?O_o 8 DY P 4 FGP N
0x243454…2435e8 Dummy {f00=0x0149, f01=0x0000, f02=»
[…0x6…]
0x243f60…2440f4 (1, 476) Opaque[0x194]
0x2440f4…244288 # DirEnt {nam=»X «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x16c0, f03=0x0000}
0x2440f4…244288 IdxSect {
0x2440f4…244288 f00 = 0x00b6 // 0x2440f4 @0x0
0x2440f4…244288 f01 = 0x0010 // 0x2440f6 @0x2
0x2440f4…244288 gno = [ // 0x2440f8 @0x4
0x2440f4…244288 [0x00]: C0x00b6.0x0.0
0x2440f4…244288 [0x01]: C0x00b6.0x1.0
0x2440f4…244288 [0x02]: C0x00b6.0x2.0
0x2440f4…244288 [0x03]: C0x00b6.0x3.0
0x2440f4…244288 [0x04]: C0x00b7.0x0.0
0x2440f4…244288 [0x05]: C0x00b7.0x1.0
0x2440f4…244288 [0x06]: C0x00b7.0x2.0
0x2440f4…244288 [0x07]: C0x00b7.0x3.0
0x2440f4…244288 ]
0x2440f4…244288 }
0x244288…24441c Dummy {f00=0x00b6, f01=0x0190, f02=» 2 P IDENT DRKB03 REL 9.2 79-11-16 870105040920 P : P* B 0 P******************************************* L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* DRKB01 = DRIVER KEYBOARD P* P* P* P* P
0x24441c…2445b0 Dummy {f00=0x00b6, f01=0x0190, f02=» d . P* AND ALPHANUMERIC KEYBOARDS PTS 6236, , P* CONNECTED TO CPU VIA CHLT OR CHRT. : P* j : P* ONLY INPUT DATA FROM DEPRESSED KEYS AND KEY-LOCKS t $ P* ARE HANDLED BY THE DRIVER. P* 0 P* AN ECHO-DEVICE CAN BE ATTACHED
0x2445b0…244744 Dummy {f00=0x00b6, f01=0x0190, f02=»PARTS: j P* " P* A C K B : ACTIVATION PART P* > $ P* I H K B : INTERRUPT HANDLER H P* p P* E C H O : ECHO HANDLER z P* $ P* R C K B : RECOVERY ROUTINE P* P EJECT P* P* , P* THE FOL
0x244744…2448d8 Dummy {f00=0x00b6, f01=0x0190, f02=»IC READ | & P* ORDER 31: RESET INPUT BUFFER P* : P* D P* NORMAL REGISTER USAGE : N P* r " P* REGISTER A1 : RETURN CODE | & P* A2 : INPUT CHARACTER $ P* A3 : BUFFER INDEX $ P* A4 : W
0x2448d8…244a6c Dummy {f00=0x00b6, f01=0x0190, f02=» A8 : ECB-ADDRESS P* P* ( P* 2 P* SYSTEM ADAPTATION < P* Z 8 P* CODES FOR SPECIAL CHARACTERS CLEAR, BACKSPACE, d 8 P* MULTIPLE ZERO AND STANDARD EOR MUST BE DEFINED P* IN DWT. P* 2 P* DWT-ADDRE
0x244a6c…244c00 Dummy {f00=0x00b6, f01=0x0190, f02=»T MUST BE SET UNEQUAL TO ZERO. 2 P* STANDARD VALUE FOR TIME-OUT IS 30 SECONDS & 4 P* SINCE LAST DEPRESSED KEY. IF ANOTHER VALUE * P* IS WANTED FOR A SYSTEM, INDICATOR $ P* IN DRIVER MUST BE CHANGED. P* 4 P* THE LENGTH OF T
0x244c00…244d94 (1, 477) Dummy {f00=0x00b6, f01=0x018e, f02=»AME FOR ALL h P* DWT:S IN SYSTEM P EJECT 0 P* > 8 P* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE H 8 P* TO EXCLUDE FROM THE DRIVER FOLLOWING FUNCTIONS: P* P* -----ECHO-FUNCTION " P* -----POWER ON INDICATION
0x244d94…244f28 Dummy {f00=0x00b6, f01=0x0190, f02=» P* ENTRIES P* P* & P ENTRY KBAD3 ADDRESS-BLOCK 0 P* R P* P* f & P* EXTERNAL TOSS MODULE ENTRIES p P* P* P* $ P EXTRN DISIOE I/O REQUEST ERROR . P EXTRN DISEND END I/O AND GO TO DISPATCH
0x244f28…2450bc Dummy {f00=0x00b6, f01=0x0190, f02=» STREG STORE REGISTERS AND GO TO DISPATCER , P EXTRN LDREGE RETURN FROM ECHOE HANDLING 2 P EXTRN LDREGF PANIK EXTERN b P EXTRN SETIME SET TIME P EXTRN SETIMP SET TIME " P EXTRN SAVE8 SAVE 8 REGISTERS " P EXTRN ECHRTN RETURN FROM ECHO
0x2450bc…245250 Dummy {f00=0x00b6, f01=0x0190, f02=» P* P* " P EXTRN DWTCHP CHANEL PARAMETER P EXTRN DWTST STATUS > EXTRN DWTBC BYTE COUNTER Z & " EXTRN DWTADR DRIVER ADDRESS BLOCK | P EXTRN DWTA3 SAVE AREA A3 EXTRN DWTA4 SAVE AREA A4 EXTRN DWTA5 SAVE AREA A5
0x245250…2453e4 Dummy {f00=0x00b6, f01=0x0190, f02=» INPUT DWT ~ P EJECT P* P* * P* 4 P* CONSTANTS > P* V P* ` P* j * POVMASK EQU /2 OVERFLOW IN INPUT BUFFER t P* . PX:F EQU 20 LENGTH OF CIRCULAR INPUT BUFFER 2 PDWTLNG EQU 120 NUMBER OF BYTES IN DECIMAL
0x2453e4…245578 Dummy {f00=0x00b6, f01=0x018e, f02=» P* P* , P**************************************** , P* CONDITIONAL ASSEMBLY * H , P**************************************** x P* . P* TIME OUT FUNCTION MAY BE EXCLUDED BY P* SETTING X:A = 0. P*
0x245578…24570c Dummy {f00=0x00b6, f01=0x0190, f02=» PX:B EQU 1 PCECHO EQU 1 P* * > P* BY SETTING X:E = 1 THE FOLOWING POWER OFF FUNCTION 4 & P* IS INCLUDED IN THE DRIVER. v < P* IF THERE IS A READ REQUEST THIS IS COMPLETED WITH , P* ZERO IN THE CONTROL WORD OF ECB.
0x24570c…2458a0 Dummy {f00=0x00b6, f01=0x0190, f02=» T P* OF ECB P* P* ( PX:E EQU 0 2 PPOWOFF EQU 1 D P* X P* b P* l N P* BY SETTING X:H = 1 THE KEY A15IS USED AS A NUMERIC SHIFT ON KB 71/72 v PX:H EQU 0 PNSHIFT EQU 1 P* P* B P*
0x2458a0…245a34 (1, 478) Dummy {f00=0x00b6, f01=0x0190, f02=»RSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. $ P* R PMMUPAG EQU 1 P* p P* z 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0
0x245a34…245bc8 Dummy {f00=0x00b6, f01=0x0190, f02=» MMU KEY TABLE SIZE P* P* & PX:K EQU 10 0 PDVBKTB EQU 40 B P* X P EJECT b P* p P* z P* DWT-DISPLACEMENT P* P* 0 PDWTDRD EQU /10 START OF DRIVER DEFINED PART P* P IFT MMUPAG=0
0x245bc8…245d5c Dummy {f00=0x00b6, f01=0x0190, f02=»00 CONVERSION TABLE ~ 8 PDWTINQ EQU START+/18 POINTER TO FIRST PLACE IN QUEUE 8 PDWTUTQ EQU START+/1A POINTER TO LAST PLACE IN QUEUE X & PDWTSQ EQU START+/1C START OF QUEUE ( PDWTEQ EQU DWTSQ+DWTLNG END OF QUEUE P* ( P* SPECIAL KEYS
0x245d5c…245ef0 Dummy {f00=0x00b6, f01=0x0190, f02=»R n . PKBMZ2 EQU START+/17 DOUBLE ZERO CHARACTER PKBMZ3 EQU START+/16 < P* X P EJECT b P* TABLES p P* P* $ P DATA DVBKTB MMU KEY TABLE SIZE P DATA DVBLEN MMU BUFFER SIZE P DATA 6 DEVICE INDEX P*
0x245ef0…246084 Dummy {f00=0x00b6, f01=0x0190, f02=» IFT POWOFF=1 P DATA RCKB RECOVERY ROUTINE P XIF : P IFT POWOFF=0 F P DATA 0 NO RECOVERY P XIF x P* P IFT POWOFF=1 P EJECT P* RCKB P* P* RECOVERY PART P* P* PRCKB EQU *
0x246084…246218 Dummy {f00=0x00b6, f01=0x0190, f02=» MSR 8,A15 SAVE A1-A8 ON STACK P XIF & P* 2 P IFT POWOFF=1 < P LD A3,DWTST,A6 BUSY? R P RF(NN) RCKB10 p P LDKL A1,/200 ( P ORS A1,DWTST,A6 INDICATE POWER OFF P ABL TDISP & PRCKB10 CF A5,LDREGE LOAD REGISTERS P RF
0x246218…2463ac Dummy {f00=0x00b6, f01=0x0190, f02=»ERS AND b P* @ P* EXAMINES INPUT BUFFER TO SEE IF SOME QUEUED CHARACTER P* ^ P* TO THREAT h P* P* P* P* PACKB EQU * P LDKL A1,/FEFF 2 P ANS A1,DWTST,A6 RESET INETRRUPT ALLOWED FLAG P L
0x2463ac…246540 Dummy {f00=0x00b6, f01=0x0190, f02=»0 ORDER 1,2 OR 3 P SUK A4,/2D P RF(Z) AKB110 ORDER 31 , * PAKB100 ORKL A1,/8000 I/0 REQUEST ERROR J P ABL ENDI10 x P EJECT P* P* P* & P* ORDER 31 RESET INPUT BUFFER P* P* P* PAKB110 E
0x246540…2466d4 (1, 479) Dummy {f00=0x00b6, f01=0x0190, f02=» P* P* P* ORDER 1,2,3 P* 2 P* < P* F PAKB200 EQU * P P IFT POWOFF=1 d P LD A2,DWTST,A6 z P ANKL A2,/200 POWER OFF? P RF(E) AKB205 NO! ( P XRS A2,DWTST,A6 RESET POWER OFF BIT PAKB202 EQU *
0x2466d4…246868 Dummy {f00=0x00b6, f01=0x0190, f02=» P XIF PAKB205 EQU * P IFT CTIMUT=1 $ P LDR* A1,A6 : P ANK A1,/40 TIMING? N , P RF(E) AKB210 NO TIMING FOR THIS DEVICE! j , P LD A4,DWTTP,A6 CHECK IF ALREADY TIMING P RF(E) AKBTIM P LDKL A4,-TIME P ST* A4,DWTTP,A6
0x246868…2469fc Dummy {f00=0x00b6, f01=0x0190, f02=»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* P EJECT P* IF ANY KEY-LOCK: P* : P* RESET "CHANGED-KEY" FLAG AND MAKE KEY-CHARACTER
0x2469fc…246b90 Dummy {f00=0x00b6, f01=0x0190, f02=»ND END I/O. ELSE CONTINUE. P* " P* , PAKB210 EQU * 6 " P LD A2,DWTST,A6 ANY KEY-LOCK? J P ANK A2,/F p P RF(Z) AKB219 P SLL A2,1 P SRN A2,A4 P LDR A1,A4 P CWK A4,3 P RF(N) AKB212 P RF(P) AKB211
0x246b90…246d24 Dummy {f00=0x00b6, f01=0x0190, f02=» A4,4 P AN A4,DWTST,A6 P STR A4,A15 SAVE A4 & P STR A3,A15 B P SRN A2,A3 ORDER 1 V " P ADR A3,A3 MAKE CHARACTER FLAG p P LDR A4,A4 P RF(NE) AKB213 P ADK A3,1 PAKB213 ADK A3,/70 P LDR A2,A3 P LDR* A3,A
0x246d24…246eb8 Dummy {f00=0x00b6, f01=0x0190, f02=»AD r " PAKB214 NGR A2,A1 MAKE ECB CODE P LDR A4,A4 KEY FLAG 0 P RF(E) AKB215 L P SUK A2,4 b , PAKB215 ST A2,10,A8 KEY-LOCK CODE IN ECB t PAKB218 ABL AKB380 ( PAKB219 LD A2,4,A8 REQUESTED LENGTH=0 PAKB220 ABL(E) AKB380 " PAK
0x246eb8…24704c Dummy {f00=0x00b6, f01=0x0190, f02=»30 SCR A3,A1 CLEAR ECB BUFFER P SUK A1,1 & P SUK A2,1 8 P RB(NE) AKB230 J PAKB240 EQU * ` P LD A1,DWTUTQ,A6 t P LCR A2,A1 PAKB245 LDR A4,A2 P XRK A4,/FF OVERFLOW? P RF(NE) AKB250 N0! PAKB247 SCR A4,A1 YES!
0x24704c…2471e0 Dummy {f00=0x00b6, f01=0x0190, f02=» " P CF A5,STREG NOTHING IN QUEUE P IFT CTIMUT=1 * * P LDR A1,A1 CHECK TIME OUT RETURN CODE @ P RF(Z) AKB257 NO TIME OUT n $ P ABL ENDI05 END I/O AT TIME OUT P XIF P IFT CTIMUT=0 P RF AKB257 P XIF * PAKB255 CF A15,EO
0x2471e0…247374 (1, 480) Dummy {f00=0x00b7, f01=0x0190, f02=»AKB310 ORDER 2 OR 3 P EJECT P* * P* 4 P* ORDER 1 BASIC READ > P* ^ P* h P* r 6 PAKB305 CF A15,STORE STORE CHARACTER IN ECB-BUFFER | P IFT CECHO=1 P CF A5,ECHO P XIF PAKB307 CW A3,4,A8 , P RF(
0x247374…247508 Dummy {f00=0x00b7, f01=0x0190, f02=» EJECT P* P* P* " 4 P* ORDER 2 OR 3 STANDARD AND NUMERIC READ , P* d B P* CHECK IF READ CHARACTER IS FOUND IN KEY-TABLE (IF ANY) n P* P* P* P* PAKB310 EQU * " P LD A1,10,A8 KEY-TABLE A
0x247508…24769c Dummy {f00=0x00b7, f01=0x0190, f02=»EY-TABLE v P ADK A1,1 PAKB355 SUK A4,1 " , P RF(N) AKB360 KEY NOT FOUND IN KEY-TABLE : P SUK A1,1 NEXT KEY j P CCR A2,A1 EOR? P RB(NE) AKB355 NO! P ADK A4,1 , P ST A4,10,A8 STORE INDEX IN CONTROL WORD " P CF A15,STORE ST
0x24769c…247830 Dummy {f00=0x00b7, f01=0x0190, f02=»F AKB380 PAKB360 EQU * ! P LDR A4,A2 ! $ P CC A4,KBMZ2,A6 ! 6 P RF(E) KBMZ20 ! N P CC A4,KBMZ3,A6 ! d P RF(E) KBMZ30 ! | P CC A4,KBBSP,A6 ! P RF(E) KBSP10 ! P CC A4,KBCLR,A6 ! P RF(E) KBCL10 ! , P CF A15,STORE STORE CHARAC
0x247830…2479c4 Dummy {f00=0x00b7, f01=0x0190, f02=»ACTER > /7F ! P RF(P) AKB364 YES " P CWK A7,2 " . $ P RF(E) AKB366 STANDARD READ OK " @ P ADK A4,/4F " h P RF(N) AKB364 " | P SUK A4,/A " " P RF(N) AKB366 NUMERIC READ OK " PAKB364 LDK A1,4 ERROR CODE " P RF ENDIO " PAKB366 EQU
0x2479c4…247b58 Dummy {f00=0x00b7, f01=0x0190, f02=»10 NO RETURN " ~ & PAKB368 LDK A1,8 YES SET ERROR CODE # P RF ENDIO END I/O # > P EJECT # X PKBMZ30 EQU * TRIPPLE ZERO # f P LDK A4,3 # P RF KBMZ25 # PKBMZ20 LDK A4,2 DOUBLE ZERO # PKBMZ25 LDK A2,/30 # P SUK A4,1 # P RB(L) AKB36
0x247b58…247cec Dummy {f00=0x00b7, f01=0x0190, f02=» P RB(L) KBMZ25 $ PKBMZ27 EQU * $ P SUK A4,1 ANY MORE ZEROES $ . $ P RB(L) AKB368 NO,SET RETURN CODE $ P P INH $ x * P LD A1,DWTUTQ,A6 GET OUTQUEUE POINTER $ P SUR A1,A6 $ " P CWK A1,DWTSQ FIRST POSITION ? $ P RF(NE) KBMZ29 NO $ , P LDK
0x247cec…247e80 Dummy {f00=0x00b7, f01=0x0190, f02=»OSITION $ j P SUK A1,1 % , PKBMZ40 CW A1,DWTINQ,A6 ANY SPACE LEFT ? % " P RF(E) KBMZ90 NO NOT REALY. % R 0 P ST A1,DWTUTQ,A6 STORE NEW OUTQUEUE POINTER % v & P LDK A2,/30 STORE ZERO IN CIRKULAR % P SCR A2,A1 INPUT BUFFER % P RB KBMZ27 % PKB
0x247e80…248014 (1, 481) Dummy {f00=0x00b7, f01=0x0190, f02=»ETURN CODE FOR BOTH % . PENDIX RF ENDIO LENGTH AND THRUGHPUT ERRORS & P* & N P* & X P* & b PKBCL10 EQU * CLEAR & l P LDK A3,0 & P LDK A2,/18 & P RB AKB366 & P* & P* & P* & PKBSP10 EQU * & P LDR A3,A3 & P RF(Z)
0x248014…2481a8 Dummy {f00=0x00b7, f01=0x0190, f02=»/8 & P RB AKB366 ' P* ' P* ' & PAKB380 LDK A1,0 RETURN CODE ' 0 P EJECT ' T P* ' b P* ' l , P* THIS IS A COMMON END OF THE DRIVER ' v P* ' 2 P* SET EFFECTIVE LENGTH AND PERFORM END I/O ' $ P* ON KEYBOARD AND ECHO-DEVICE '
0x2481a8…24833c Dummy {f00=0x00b7, f01=0x018e, f02=»G ON THIS DEVICE ' z P CM* DWTTP,A6 RESET TIMER ( P CM DWTTP,A6 ( : P XIF ( N P* ( Z , PENDI05 ST A3,6,A8 STORE EFFECTIVE LENGTH ( d PENDI10 EQU * ( P* ( P IFT CECHO=1 ( P LDR A4,A1 SAVE A1 ( ( P CF A5,ECHEND END I/O ON ECHO DEVICE (
0x24833c…2484d0 Dummy {f00=0x00b7, f01=0x0190, f02=» P* ) P* ) F P* THIS IS THE INTERRUPT HANDLER ENTERED FROM CHLT/CHRT DRIVER ) P* ) b P* ) l P* ) v PIHKB EQU * ) P ANK A2,/FF ) * P CF A15,KONVER CONVERT INPUT CHARACTER ) P LDR A4,A4 TEST TYPE OF CHAR ) P RF(P) EXIT SHIF
0x2484d0…248664 Dummy {f00=0x00b7, f01=0x0190, f02=» RF(Z) EXIT ) P LD A3,DWTST,A6 I/O REQUEST? * P XIF * 8 * P RF(N) IHKB15 NO READ REQUEST PENDING * D " P SLL A3,7 INTERRUPT ALLOWED ? * r 4 P RF(NN) IHKB15 NO, STORE CHARACTER IN DWT-BUFFER * P IFT CTIMUT=1 * P LD A3,DWTTP,A6 * * P RF(E) IHK
0x248664…2487f8 Dummy {f00=0x00b7, f01=0x0190, f02=»EAD ROUTINE * t , PIHKB12 CF A15,KEYSET SET KEY CODE IN DWT + P LDR A3,A3 + D P RF(Z) EXIT NO KEY CHANGE + V P LD A3,DWTST,A6 + x ( P RF(N) EXIT NO READ REQUEST PENDING + P SLL A3,7 + & P RF(NN) EXIT INERRUPT NOT ALLOWED + ( P LD A3,DWTA3,A6
0x2487f8…24898c Dummy {f00=0x00b7, f01=0x018e, f02=»A1 + " P XRK A4,/FF ALREADY OVERFLOW? , P RF(E) EXIT YES , 0 P LDR A3,A1 , H 4 P CF A15,EOQUEU GET NEXT OUTQUEUE POINTER ADDRESS , Z P CW A1,DWTUTQ,A6 OVERFLOW? , ( P RF(NZ) IHKB20 SAVE KEY-LOCK IF ANY , 0 P ORK A2,/FF SET OVERFLOWBIT IN INPUT BUF
0x24898c…248b20 Dummy {f00=0x00b7, f01=0x0190, f02=» P EJECT - P* - P* - P* - & P* AKBTUT - 0 P* - D & P* THIS IS THE TIME-OUT ROUTINE - N P* - x P* - P* - P IFT CTIMUT=1 - PAKBTUT EQU * - " P LDR A6,A1 RESTART DWT-ADDRESS - P LDK A1,/40 SET RETURNE CODE -
0x248b20…248cb4 (1, 482) Dummy {f00=0x00b7, f01=0x0190, f02=» P XIF . P EJECT . P* . P* . ( P* . 2 P* . < P* KEYSET . F P* . Z P* . d P* . n , P* ON ENTRY: A4= NEG KEY-LOCK VALUE . x P* . @ P* ON EXIT: A3= ZERO IF IF NO CHANGE IN KEYS, ELSE POS . P* . P* .
0x248cb4…248e48 Dummy {f00=0x00b7, f01=0x0190, f02=»0=ON . x P RB(N) SET100 / $ P ANR A3,A2 CHEC OLD KEY POSITION / " " P RF(NZ) SET300 JUMP IF KEY ON / J P LDR A4,A4 / p P RF(NZ) SET500 / P RF SET400 / PSET300 LDR A4,A4 / P RF(Z) SET500 / PSET400 LD A3,DWTST,A6 / P XRR A3,A2 / P
0x248e48…248fdc Dummy {f00=0x00b7, f01=0x018e, f02=» A15 / P EJECT 0 P* 0 P* 0 $ P* 0 . P* KONVER 0 8 P* 0 L * P* KONVER CONVERTS INPUT CHARACTER 0 V P* 0 P* 0 ( P* ON ENTRY: A2= INPUT CHARACTER 0 P* 0 P* 0 * P* ON EXIT: A2=COVERTED CHARACTER 0 L P*
0x248fdc…249170 Dummy {f00=0x00b7, f01=0x0190, f02=» PKONVER EQU * 1 P LDR A4,A2 1 P IFT NSHIFT=0 1 * P SUK A4,/7C CODE > /7B 1 @ P RF(NN) KON500 YES 1 ^ P LDR A4,A2 RESTORE CHARACTER 1 x P XIF 1 8 P STR A2,A15 STORE CHARACTER IN CASE OF NO CONVERSION 1 P LDR* A5,A6 1 P SUK A4,/20 1
0x249170…249304 Dummy {f00=0x00b7, f01=0x0190, f02=» NO 1 P SUK A2,/40 YES 2 PKON105 EQU * 2 $ P ANK A5,/10 2 8 P SRL A5,3 2 L P RF KON200 2 ^ * PKON110 SUK A4,8 (UN)CTRL OR (UN)SHIFT 2 p P RF(N) KON400 KEY-LOCK 2 P RF(Z) KON140 SHIFT ON 2 P SUK A4,2 2 P RF(N) KON160 SHIFT OFF 2
0x249304…249498 Dummy {f00=0x00b7, f01=0x018e, f02=»IFT ON 2 v " P RF KON160 NUMERICAL SHIFT OFF 3 P XIF 3 4 PKON125 EQU * 3 @ P LDKL A2,/FFDF UNCTRL 3 T PKON120 ANR A5,A2 3 r PKON130 STR A5,A6 DWTCHP 3 P LDK A4,/10 3 P RF KON400 GO HOME! 3 PKON140 EQU * 3 P IFT NSHIFT=1 3 P LDR
0x249498…24962c Dummy {f00=0x00b7, f01=0x0190, f02=» P LDK A2,/10 SHIFT 4 PKON150 ORR A5,A2 4 P RB KON130 4 6 PKON160 EQU * 4 H P IFT NSHIFT=1 4 P LDR A4,A5 4 r P ANK A4,/80 4 P RF(Z) KON165 4 P LDKL A2,/FF7F 4 P RB KON120 4 P XIF 4 PKON165 EQU * 4 P LDKL A2,/FFEF 4
0x24962c…2497c0 Dummy {f00=0x00b7, f01=0x0190, f02=» 4 P SRL A5,3 5 P ADK A5,4 5 8 PKON200 LD A4,DWTCON,A6 GET CONVERSION TABLE ADDRESS 5 , P ADR A4,A5 5 h P LDR* A4,A4 5 z P RF(Z) KON400 5 P ADR A4,A2 5 * P LDR* A2,A15 RESTORE A2 AND A15-STACK 5 ( P LCR A2,A4 GET CHARACTER FROM TABLE
0x2497c0…249954 (1, 483) Dummy {f00=0x00b7, f01=0x0190, f02=»KON300 5 P IFT NSHIFT=0 6 PKON500 EQU * 6 $ P LDR A4,A4 KEY CODE /7C 6 8 P RF(Z) KON600 YES 6 X & P LDK A4,1 INDICATE SKIP CHARACTER 6 r P RTN A15 6 PKON600 EQU * 6 P SUR A2,A2 6 P RB KONVER DO START AGAIN 6 P XIF 6 P EJECT 6
0x249954…249ae8 Dummy {f00=0x00b7, f01=0x0190, f02=» P* ON ENTRY: 7 P* 7 P* A2 = CHARACTER TO STORE 7 $ P* A3 = BUFFER INDEX 7 H P* 7 f P* 7 p PSTORE EQU * 7 z P LD A4,2,A8 BUFFER ADDRESS 7 P ADR A4,A3 ADD BUFFER INDEX 7 ( P SCR A2,A4 STORE CHARACTER IN BUFFER 7 $ P ADK A3,
0x249ae8…249c7c Dummy {f00=0x00b7, f01=0x0190, f02=» TO GET NEXT QUEUE POINTER 7 x P* 8 " P* ON ENTRY: 8 , P* 8 B P* A1 = QUEUE POINTER 8 L P* A6 = DWT-ADDRESS 8 l P* 8 P* ON EXIT: 8 P* 8 P* A1 = NEW QUEUE POINTER 8 PEOQUEU EQU * 8 P ADK A1,1 8 P SUR A1,A6
0x249c7c…249e10 Dummy {f00=0x00b7, f01=0x4022, f02=» RB STORTN 8 P END 9 @ 9 * 8 " P* ON ENTRY: 8 , P* 8 B P* A1 = QUEUE POINTER 8 L P* A6 = DWT-ADDRESS 8 l P* 8 P* ON EXIT: 8 P* 8 P* A1 = NEW QUEUE POINTER 8 PEOQUEU EQU * 8 P ADK A1,1 8 P SUR A1,A6
0x249e10…249fa4 Dummy {f00=0x00b7, 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
0x249fa4…24a138 Dummy {f00=0x00b7, f01=0x0190, f02=» P %_ S S E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | ) ) @ T W T W @ P R ( >a U W 0 =b P P @ ! T W P D Y P Y P Y U ! T !
0x24a138…24a2cc Dummy {f00=0x00b7, f01=0x0190, f02=»P Q R ;A [ [ : Q R P ;A [ [ : ? ? !? P P !> P W 9P _ 0 T !##P> ? R4 L TX P L P 4 M X M M _8 > 6 D LW 0P Q P P E +P W : X + ` X L 1 Y L :
0x24a2cc…24a460 Dummy {f00=0x00b7, f01=0x0190, f02=» U 1_ D + I D N ) E N : T * @ SP P W X * 0 U U. _ Y . R P Y $ P X ( _ W Y & : B P6 T G W& X ^ Y ^ B I ~ B T B : X "? P P X T _ X . P X $
0x24a460…24a5f4 (1, 484) Opaque[0x194]
0x24a5f4…24a788 # DirEnt {nam=»MONGEN«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1700, f03=0x0000}
0x24a5f4…24a788 IdxSect {
0x24a5f4…24a788 f00 = 0x00b8 // 0x24a5f4 @0x0
0x24a5f4…24a788 f01 = 0x0002 // 0x24a5f6 @0x2
0x24a5f4…24a788 gno = [ // 0x24a5f8 @0x4
0x24a5f4…24a788 [0x00]: C0x00b8.0x0.0
0x24a5f4…24a788 ]
0x24a5f4…24a788 }
0x24a788…24a91c Dummy {f00=0x00b8, f01=0x017a, f02=» 8 4MES ************************************************ 8 4MES * MONITOR GENERATION NORDJYLLANDS AMT * @ 8 4MES ************************************************ | SCR ASG 2,LP0F INC SYSTAB LKE M KPF /L,M:92SP
0x24a91c…24aab0 Dummy {f00=0x00b8, f01=0x2008, f02=» ************************************************ 8 4MES * MONITOR GENERATION NORDJYLLANDS AMT * @ 8 4MES ************************************************ | SCR ASG 2,LP0F INC SYSTAB LKE M KPF /L,M:92SP
0x24aab0…24ac44 Dummy {f00=0x00b8, f01=0x412a, f02=»ATA 0 STATUS QUEUE P DATA 0 RECEIVE QUEUE P DATA 0 BUFFER ADDRESS 8 P DATA 0 CURSOR ADDRESS V " P DATA 0 REQUEST TIMEOUT VALUE t P* P IFT MMUPAG=1 PDC:ECB EQU * MMU ECB P DATA 0,0,0,0,0,0 P XIF P* PDW
0x24ac44…24add8 Dummy {f00=0x00b8, f01=0x2008, f02=» ATUS QUEUE P DATA 0 RECEIVE QUEUE P DATA 0 BUFFER ADDRESS 8 P DATA 0 CURSOR ADDRESS V , P DATA 50 REQUEST TIMEOUT. DEFAULT 5 SEC. t P* P IFT MMUPAG=1 PDC:ECB EQU * MMU ECB P DATA 0,0,0,0,0,0 P XIF P*
0x24add8…24af6c Dummy {f00=0x00b8, f01=0x0190, f02=» k z P LDK A1,LMP4 FORMAT ERROR l P CALL ERROR l * PALLB50 EQU * l > * P ES A4,BA,A1 AND ESORE IN CURRENT ECB l R P XIF l P IFF CREDIT=0 l P RB ALLB10 l P l P IFT CREDIT-MMUPAG=1 l PNOTSH LDR A9,A9 PAGING? l P RF(NZ) NOTS10 N
0x24af6c…24b100 Dummy {f00=0x00b8, f01=0x0190, f02=»LLOCATE BUFFER FROM TOP l ~ P ADKL A9,1 m P ANKL A9,/FFFE EVEN ADDRESS m 2 P* CHECK ADDRESS: m V P m n " P LD A11,LSTADR,A13 DATA START m z P CALL CMPADR m P RF(NL) ALLB60 OK! m P LDKL A1,LMP3 m P CALL ERROR m PALLB60 EQU * m
0x24b100…24b294 (1, 485) Opaque[0x194]
0x24b294…24b428 # DirEnt {nam=»A «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1008, f03=0x0000}
0x24b294…24b428 IdxSect {
0x24b294…24b428 f00 = 0x0080 // 0x24b294 @0x0
0x24b294…24b428 f01 = 0x0002 // 0x24b296 @0x2
0x24b294…24b428 gno = [ // 0x24b298 @0x4
0x24b294…24b428 [0x00]: C0x0080.0x1.0
0x24b294…24b428 ]
0x24b294…24b428 }
0x24b428…24b5bc Dummy {f00=0x0080, f01=0x00a0, f02=» SKF 1 ASM DRDY01 SCR $ SKF 1 0 INC SYSBUG > INC DEBUGM P LKE M b KPF /L,M:BUG p SCR ASG /E0,TY10 (X
0x24b5bc…24b750 Dummy {f00=0x0080, f01=0x2008, f02=» 1 ASM DRDY01 SCR $ SKF 1 0 INC SYSBUG > INC DEBUGM P LKE M b KPF /L,M:BUG p SCR ASG /E0,TY10 (X
0x24b750…24b8e4 Dummy {f00=0x0080, f01=0x018e, f02=» , ( X ' X ] ! * & B ! ! ! 4 , ( B Y & ! W 8!0 b , ( T 8 !@P ! $ P ! 8 , ( !@T ! ! T TENDIO T
0x24b8e4…24ba78 Dummy {f00=0x0080, f01=0x0190, f02=» , ( S Y )Q Y > X Z2<BR J * & o ? Y ! T X 4 , ( ! Y & Zl " b , ( T _ ! X $ P ! ECHODY , ( R V P P ! F
0x24ba78…24bc0c Dummy {f00=0x0080, f01=0x0190, f02=» X &" Y )U W x , ( 3" ! ! ! Y , ( M 4 B U ) H , ( k X R X X &" Y * X ) x , ( V Y ! X $ X & , ( @ ! X * `R Y , (
0x24bc0c…24bda0 Dummy {f00=0x0080, f01=0x0190, f02=» h 4 6 > H D ! ^ p )P -P 3 9 CP SP WP4 ]T oR yR " H D ! P F U4 T U T P( P TD !T /T MP S _ iP n H D !> mR P F W T P P T 6 T %T WQ H D !
0x24bda0…24bf34 (1, 486) Opaque[0x194]
0x24bf34…24c0c8 # DirEnt {nam=»DRFD01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1710, f03=0x0000}
0x24bf34…24c0c8 IdxSect {
0x24bf34…24c0c8 f00 = 0x00b8 // 0x24bf34 @0x0
0x24bf34…24c0c8 f01 = 0x0020 // 0x24bf36 @0x2
0x24bf34…24c0c8 gno = [ // 0x24bf38 @0x4
0x24bf34…24c0c8 [0x00]: C0x00b8.0x2.0
0x24bf34…24c0c8 [0x01]: C0x00b8.0x3.0
0x24bf34…24c0c8 [0x02]: C0x00b9.0x0.0
0x24bf34…24c0c8 [0x03]: C0x00b9.0x1.0
0x24bf34…24c0c8 [0x04]: C0x00b9.0x2.0
0x24bf34…24c0c8 [0x05]: C0x00b9.0x3.0
0x24bf34…24c0c8 [0x06]: C0x00ba.0x0.0
0x24bf34…24c0c8 [0x07]: C0x00ba.0x1.0
0x24bf34…24c0c8 [0x08]: C0x00ba.0x2.0
0x24bf34…24c0c8 [0x09]: C0x00ba.0x3.0
0x24bf34…24c0c8 [0x0a]: C0x00bb.0x0.0
0x24bf34…24c0c8 [0x0b]: C0x00bb.0x1.0
0x24bf34…24c0c8 [0x0c]: C0x00bb.0x2.0
0x24bf34…24c0c8 [0x0d]: C0x00bb.0x3.0
0x24bf34…24c0c8 [0x0e]: C0x00bc.0x0.0
0x24bf34…24c0c8 [0x0f]: C0x00bc.0x1.0
0x24bf34…24c0c8 ]
0x24bf34…24c0c8 }
0x24c0c8…24c25c Dummy {f00=0x00b8, f01=0x0190, f02=» 2 P IDENT DRFD01 REL 9.2 79-12-05 870105040920 P : * P =2,TIMING PROBLEMS IN INT. HANDLER B P REL 9.2 79-11-16 p $ P =1,CHANGED INTERRUPT HANDLER P REL 9.1 79-05-23 P* 2 P**********************************************
0x24c25c…24c3f0 Dummy {f00=0x00b8, f01=0x0190, f02=» P* P* P* 2 P********************************************* " 0 P* THIS DISK DRIVER HANDLES UP TO FOUR DAISY X . P* CHAINED FLEXIBLE DISK DRIVES PTS 6879, 0 P* CONNECTED TO CPU VIA CHANNEL UNIT CHFD ON & P* MULTIPLEX OR PROGRA
0x24c3f0…24c584 Dummy {f00=0x00b8, f01=0x0190, f02=»L READ B P* /02 SEQUENTIAL READ -IBM DISC ONLY- P* /05 BASIC WRITE T D P* /06 SEQUENTIAL WRITE -IBM DISC ONLY- p P* /11 PHYSICAL READ P* /15 PHYSICAL WRITE P* /1A SEARCH KE
0x24c584…24c718 Dummy {f00=0x00b8, f01=0x0190, f02=» -IBM DISC ONLY- t P* /37 LOAD , P* /38 UNLOAD B P* Z P* ENTRY PARAMETERS: d P* P* A5 STACK BASE P* A6 DWT-ADDRESS P* A7 ORDER P* A8 ECB-ADDRESS P EJECT DRFD01
0x24c718…24c8ac Dummy {f00=0x00b8, f01=0x0190, f02=»R ACTIVATION ADDRESS " P ENTRY IHFD INTERRUPT HANDLER P ENTRY FDON RECOVERY ROUTINE B P ENTRY DWFD01 DWT-ADDRESS f P EJECT DRFD01 P* P************* P* * P* EXTERNALS * P* * P******
0x24c8ac…24ca40 Dummy {f00=0x00b8, f01=0x0190, f02=»TATUS EXTRN DWTECB ECB ADDRESS $ EXTRN DWTOR DWT INDEX AND ORDER 0 EXTRN DWTA2 SAVE AREA A2 X EXTRN DWTA5 SAVE AREA A5 z & ! EXTRN DWTSB2 STACK BASE 2 IN DWT ( P EXTRN SCTPLD PROGRAM LOADING DEVICE ( P EXTRN SAVE8 SAVE A1-A
0x24ca40…24cbd4 (1, 487) Dummy {f00=0x00b8, f01=0x0190, f02=»XTRN TASCII EBCDIC TO ASCII TAB & P EXTRN TEBCDIC ASCII TO EBCDIC TAB ( 0 P EXTRN SPDLCI OPEN/CLOSE STATUS FOR FD DRIVE R $ P EXTRN ECBBA ECB BUFFER ADDRESS & P EXTRN ECBRL ECB REQUESTED LENGTH & P EXTRN ECBEL ECB EFFECTIVE LENGTH P EXTRN
0x24cbd4…24cd68 Dummy {f00=0x00b8, f01=0x0190, f02=» * P* CONDITIONAL ASSEMBLY * P* * > P************************ ^ P* ~ . P* MULTIPLEX CHANNEL INSTEAD OF PROGRAMMED P* CHANNEL BY SETTING X:A = 0 P* PX:A EQU 1 PCHAN EQU 1
0x24cd68…24cefc Dummy {f00=0x00b8, f01=0x0190, f02=» PTOSS EQU 1 P* 2 P* A PROGRAM VERSION INCLUDING IBM DISC FORMAT ( P* IS OBTAINED BY SETTING IBM EQU 1. V P* PX:C EQU 0 PIBM EQU 1 P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMU
0x24cefc…24d090 Dummy {f00=0x00b8, f01=0x0190, f02=»BTAINED BY SETTING CPU852 EQU 0. P* ( PCPU852 EQU 0 2 P* F P EJECT DRFD01 P P* h * r . ** A PROGRAM VERSION USING TOSS DISC PAGING | * &* IS OBTAINED BY SETTING DSKPAG EQU 1. * PDSKPAG EQU 1 * P*
0x24d090…24d224 Dummy {f00=0x00b8, f01=0x0190, f02=»QU 0 P* P* @ P* ORDERS /21 OPEN AND /22 CLOSE WHICH CONTROLS THE POWER D P* TO THE DISK DRIVE UNIT CAN BE INCLUDED BY SETTING OPCLOS =1 d P* PX:D EQU 0 POPCLOS EQU 0 P* P EJECT DRFD01 P* P
0x24d224…24d3b8 Dummy {f00=0x00b8, f01=0x018e, f02=»CE INDEX P* P* P IFT CHAN=1 $ PDEVIND EQU 2 8 P XIF L P* X P IFT CHAN=0 b PDEVIND EQU 4-IBM-IBM v P XIF P* P EJECT DRFD01 P* P************* P* * P* CONSTANTS *
0x24d3b8…24d54c Dummy {f00=0x00b8, f01=0x0190, f02=» l ( PSOPDA EQU /2E S.O.P. DEVICE ADDRESS * PSTALEN EQU 512 MAX STANDARD SEC. LEN. 4 ( PTOSLEN EQU 410 MAX TOSS SEC. LENGTH b " PIBMLEN EQU 128 IBM SEC. LENGTH ( PBOE EQU 28 BEGIN OF EXTENT POSITION & PEOE EQU 34 END OF EXTENT POSITION $
0x24d54c…24d6e0 Dummy {f00=0x00b8, f01=0x018e, f02=»************** P* * P* DWT-DISPLACEMENTS* 2 P* * N P******************** j P* 0 PDWTDRD EQU /10 START OF DRIVER DEFINED PART P* P IFT MMUPAG=0 PSTART EQU DWTDRD P XIF P
0x24d6e0…24d874 (1, 488) Dummy {f00=0x00b9, f01=0x018e, f02=» ~ P* P********** P* * $ P* TABLES * 6 P* * H P********** Z P* l P IFT DEVIND=2 v ( P DATA DVBLEN+DVBLEN MMU BUFFER SIZE P XIF P* P IFT DEVIND=4 " P DATA 0 INDICATE NO MMU BUFFER
0x24d874…24da08 Dummy {f00=0x00b9, f01=0x0190, f02=» P* P EJECT DRFD01 P* & P************** 0 P* * F P* ACTIVATION * P* * r P************** P* PFDAD EQU * ACTIVATION ENTRY P* P IFT OPCLOS=1 & P* CHECK IF OPEN OR CLOSE
0x24da08…24db9c Dummy {f00=0x00b9, f01=0x0190, f02=»* P EJECT P XIF P* $ P LDK A3,0 . P LC A3,DWTOR,A6 INDEX @ P LDR A2,A3 SAVE FOR FDIX ^ P* ~ & P* PUT DRIVE NO IN CIO-INSTRUCTION P* P CF A5,SETCIO A3,A4 AFFECTED ( P CM DWTRCW,A6 SAVE RETURN CODE WORD
0x24db9c…24dd30 Dummy {f00=0x00b9, f01=0x0190, f02=»WTA3,A6 SAVE DRIVE INDEX MASK P ANR A1,A3 & P RF(NZ) FD:ORD LOCKED 8 P LDR A1,A7 V P SUK A1,/26 h P ABL(Z) LOAD LOCK ORDER | P SUK A1,/11 P ABL(Z) LOAD LOAD ORDER P LDKL A1,/8001 RETURN CODE P ABL END:IO ENDIO
0x24dd30…24dec4 Dummy {f00=0x00b9, f01=0x0190, f02=» DSKPAG+SWPBLK=0 & P LD A2,ECBBA,A8 GET BUFFER ADDRESS & P LDR* A1,A8 GET FIRST WORD OF ECB B 4 P ANKL A1,/3000 GET BITS 16-17 IN BUFFER ADDRESS l . P RF(NZ) FD:000 BUFFER NOT IN SYSTEM AREA? P LDR A3,A2 P RF(NN) FD:005 6 P ADKL A3,T
0x24dec4…24e058 Dummy {f00=0x00b9, f01=0x018e, f02=» LDR A3,A2 P ANKL A2,/F000 P SRL A2,2 ( P SLL A1,2 : P ORR A1,A2 L P ANKL A3,/FFF ^ 2 P ST A1,DWT:PA,A6 6 BIT PHYSICAL BUFFER ADDRESS t , P ADKL A1,/400 CREATE ONE MORE MMU ENTRY P ST A1,DWT:PA+2,A6 P LDR A1,A3 ( P O
0x24e058…24e1ec Dummy {f00=0x00b9, f01=0x0190, f02=» ` P* 8 PFD:005 ST A1,DWT:LA,A6 16 BIT LOGICAL BUFFER ADDRESS P* N P EJECT DRFD01 X P XIF p P* | P LDR A1,A7 P ABL(Z) FD:070 TEST STATUS P SUK A1,1 P RF(Z) FD:040 PHYSICAL READ P SUK A1,4 P RF(Z)
0x24e1ec…24e380 Dummy {f00=0x00b9, f01=0x018e, f02=» SUK A1,15 $ P RF(Z) FD:030 WRITE DELETED DATA P SUK A1,/14 : P ABL(Z) UNLOAD UNLOAD ORDER N P IFT IBM=1 r P ADK A1,/36 " P ABL(Z) SQREAD SEQUENTIAL READ P SUK A1,4 $ P ABL(Z) SQWRIT SEQUENTIAL WRITE P SUK A1,/2B
0x24e380…24e514 (1, 489) Dummy {f00=0x00b9, f01=0x0190, f02=» v P XIF P PFD:DIS EQU * P ABL DISIOE REQUEST ERROR 0 P* R P IFT OPCLOS=1 P EJECT r P* P******** P* * P* OPEN * P* * P******** P* 4 P* OPEN IS PERFORMED BY WRITING A
0x24e514…24e6a8 Dummy {f00=0x00b9, f01=0x0190, f02=» ( P ANS A1,SPDLCI CLEAR OPEN/CLOSE BIT 0 P LD A1,SPDLCI SOP LIGHTS AND OPEN/CLOSE DATA 0 " P OTR A1,0,SOPDA OPEN FD DRIVE d P* * P* WAIT FOR DRIVE TO BECOME OPERABLE ( P LDK A4,DWTTP2 TIMER POINTER OFFSET ( P ADR A4,A6 A4:=TIMER POINT
0x24e6a8…24e83c Dummy {f00=0x00b9, f01=0x0190, f02=»SP EXIT P* POPENRE EQU * P* TIME HAS EXPIRED . P LDR A6,A1 GET DWT-ADDR L , P CM DWTTP2,A6 INDICATE NO TIMER RUNNING l & P RF OCLEXI COMMON OPEN/CLOSE EXIT P* P EJECT P* P********* P* *
0x24e83c…24e9d0 Dummy {f00=0x00b9, f01=0x0190, f02=» THE SOP LIGHTS EXTERNAL REGISTER P* * PCLOSE EQU * 4 " P LDKL A1,/8000 MASK FOR BIT 0 H & P ORS A1,SPDLCI SET OPEN/CLOSE BIT n 0 P LD A1,SPDLCI SOP LIGHTS AND OPEN/CLOSE DATA " P OTR A1,0,SOPDA CLOSE FD DRIVE P* POCLEXI EQU *
0x24e9d0…24eb64 Dummy {f00=0x00b9, f01=0x0190, f02=»JECT DRFD01 P* P*************** P* * 8 P* BASIC WRITE * P P* * h P*************** P* PFD:010 CF A5,BIO P ORK A2,1 PFD:015 EQU * P IFT TOSS+IBM=2 P LD A1,DWTLAB,A6
0x24eb64…24ecf8 Dummy {f00=0x00b9, f01=0x0190, f02=» P CF A5,EBCDIC PFD:018 EQU * P XIF . P* : P IFT CHAN+TOSS=2 D P IFT MMUPAG+SWPBLK=2 4 P LD A1,DWT:LA,A6 GET FLAG/LOGICAL BUFFER ADDRESS x ( P RF(Z) FD:019 BUFFER IN SYSTEM AREA? ( P LD A7,ECBRL,A8 GET REQUESTED LENGTH P
0x24ecf8…24ee8c Dummy {f00=0x00b9, f01=0x0190, f02=»MMU TABLE v 2 P MVUS A7 MOVE BUFFER FROM USER TO SYSTEM AREA & P TL -30,A15 RESTORE MMU FROM STACK H P LDR A2,A8 RESTORE A2 r P* P EJECT DRFD01 P* P* PFD:019 EQU * P XIF P* " P CF A5,FD:WRITE PERFORME
0x24ee8c…24f020 Dummy {f00=0x00b9, f01=0x0190, f02=» WAS IN SYSTEM AREA? | . P LD A1,DWT:BF,A6 GET SAVED BUFFER ADDRESS & P ST A1,ECBBA,A8 RESTORE IT IN ECB N P* x PFD:025 EQU * P XIF P* P RF FD:048 GOTO FD:RC P* P****************** P* * P
0x24f020…24f1b4 (1, 490) Dummy {f00=0x00b9, f01=0x018e, f02=»S 13-15 x P RB FD:015 P EJECT DRFD01 " P* : P********************** D P* * b P* WRITE DELETED DATA * P* * P********************** P* PFD:030 CF A5,BIO P ORK A2,6
0x24f1b4…24f348 Dummy {f00=0x00b9, f01=0x0190, f02=» P***************** P* PFD:040 CF A5,BIO:RE ( P IFT TOSS+IBM=2 D P LD A1,DWTLAB,A6 P AN A1,DWTA3,A6 t 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
0x24f348…24f4dc Dummy {f00=0x00b9, f01=0x0190, f02=»SKPAG+SWPBLK=0 4 P LD A2,DWT:LA,A6 GET FLAG/LOGICAL BUFFER ADDRESS ( P RF(Z) FD:046 BUFFER IN SYSTEM AREA? N ( P LD A7,ECBRL,A8 GET REQUESTED LENGTH z * P LDKL A1,FD:BUF GET DWT BUFFER ADDRESS & P TS -30,A15 SAVE RUNNING TASK MMU ( P TL DWT:PA
0x24f4dc…24f670 Dummy {f00=0x00b9, f01=0x0190, f02=»,DWT:BF,A6 GET SAVED BUFFER ADDRESS & P ST A2,ECBBA,A8 RESTORE IT IN ECB ! , P RF FD:048 ! V P* ! h PFD:046 EQU * ! r P XIF ! P* ! P IFT TOSS+IBM=2 ! P LD A1,DWTLAB,A6 ! P AN A1,DWTA3,A6 ! P RF(Z) FD:047 NOT IBM ! P XIF !
0x24f670…24f804 Dummy {f00=0x00b9, f01=0x0190, f02=» P XIF " PFD:048 EQU * " P ABL FD:RC " $ P* " 6 P EJECT DRFD01 " @ P* " X P IFT TOSS+IBM=0 " b P IFT MMUPAG=0 " z P* " P************** " P* * " P* SEARCH KEY * " P* * " P************** " P
0x24f804…24f998 Dummy {f00=0x00b9, f01=0x018e, f02=»0 ILLEGAL LENGTH " P SUK A1,128 # " P ABL(P) END:10 ILLEGAL LENGTH # , P LDR A3,A2 # R P* # d * P* IF ODD CHANGE TO EVEN NO OF BYTES # n P* # P ADK A3,1 # P SRL A3,1 # P SLL A3,1 # P* # P SLL A2,3 # P ORK A2,7 BIO #
0x24f998…24fb2c Dummy {f00=0x00b9, f01=0x0190, f02=» P* $ P EJECT DRFD01 $ P* $ & $ P* READ RECORD WITH KEY COMMAND $ 0 P* $ X PFD:060 EQU * $ b P LDK A2,4 BIO $ v P LD A3,4,A8 REQUESTED LENGTH $ P CWK A3,130 $ " P ABL(NE) END:10 ILLEGAL LENGTH $ P LD A4,2,A8 BUFFER ADDRESS $
0x24fb2c…24fcc0 Dummy {f00=0x00b9, f01=0x0190, f02=»TUS * $ P* * % P*************** % & P* % > PFD:070 EQU * % H P LDKL A2,/FFF9 BIO DUMMY % P CF A5,FD:WRI % | P LDR A1,A3 % P ANK A1,1 % & P RF(NZ) FD:090 DISC NOT OPERABEL? % " P ANKL A3,/200 WRITE PROTECTED? % P O
0x24fcc0…24fe54 (1, 491) Dummy {f00=0x00b9, f01=0x018e, f02=»RCW,A6 GET RETURN CODE % PFD:090 ABL END:IO & P* & 8 P EJECT DRFD01 & B P* & Z P******** & d P* * & t P* LOAD * & P* * & P******** & P* & PLOAD EQU * & P LDK A2,/14 LOCK & P CF A5,FD:REA & P ANK A3,1
0x24fe54…24ffe8 Dummy {f00=0x00b9, f01=0x0190, f02=» & P LDK A2,0 BIO ' P LDKL A4,BUF ' P LDK A3,38 NO OF BYTES ' 2 P CF A5,FD:REA ' P P CF A5,LD:RC ' f P ADK A4,34 ' z P LDR* A2,A4 ' P CWK A2,'TO' ' ( P RF(NE) LOA:10 IBM LABEL PREASSUMED ' P ADK A4,2 ' P LDR* A2,A4 ' P C
0x24ffe8…25017c Dummy {f00=0x00b9, f01=0x0190, f02=»* ' P* READ VOLUME NAME ( P* ( & P LDK A3,8 LENGTH ( 0 P LDK A2,0 BIO ( H * P C1 A1,DWTA3,A6 1 COMP. DRIVE BIT MASK ( ^ * P ANS A1,DWTLAB,A6 INDICATE TOSS LABEL ( P RF LOA:15 ( P XIF ( P IFT IBM=1 ( PLOA:10 LDK A3,10 LENGTH (
0x25017c…250310 Dummy {f00=0x00b9, f01=0x018e, f02=»BIT 10 ( x P ORS A1,DWTRCW,A6 ) P XIF ) ( P IFF TOSS+IBM=0 ) 4 PLOA:15 EQU * ) L P LDKL A4,BUF BUFFER ADDRESS ) ` 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,/20 CHECK
0x250310…2504a4 Dummy {f00=0x00b9, f01=0x0190, f02=» ) P XIF * P* * P EJECT DRFD01 * P* * 6 P* * @ P IFF TOSS+IBM=0 * J P* * b P* GET DWT VOL NAME ADDRESS * l P* * P CF A5,VOLADR ADDRESS TO A2 * P* * P* STORE NAME IN DWT * P* * P LDK A3,3 * PLOA:40 L
0x2504a4…250638 Dummy {f00=0x00b9, f01=0x018e, f02=»50 EQU * * P LC A2,DWTOR+1,A6 GET ORDER + P ANK A2,/FF + 4 & P RB(Z) FD:075 JUMP IF TEST STATUS + H P XIF + r P IFT IBM=1 + ~ P* + P* DATA SET OPENING WANTED? + P* + " P ANK A1,/2 A1: TOSS=6, IBM=8 + P RF(NZ) LOA:70 TOSS LABEL +
0x250638…2507cc Dummy {f00=0x00b9, f01=0x0190, f02=» + P LD A2,ECBCW,A8 SECTOR NO , P SUK A2,7 , * P ABL(N) FD:DIS REQUEST ERROR , < P SUK A2,18 , ` P ABL(P) FD:DIS REQUEST ERROR , r P ADK A2,25 , P SLL A2,3 BIO , P LDK A3,80 LENGTH , P LDKL A4,BUF , P CF A5,FD:REA , P LDR A
0x2507cc…250960 Dummy {f00=0x00b9, f01=0x0190, f02=»ABEL , f PLOA:60 EQU * - P CF A5,LD:RC - P ENB - 4 * P LD A3,ECBCW,A8 DATA SET LABEL SECTOR - @ P LDK A1,DWTDSS - n P CF A5,STDWT SAVE IN DWT - P ADK A4,BOE BOE ADDRESS - . P CF A5,LOGSEC TRANSFORM TO LOGICAL SECTOR - P LDK A1,DWTBOE -
0x250960…250af4 (1, 492) Dummy {f00=0x00ba, f01=0x0190, f02=» - t P CF A5,LOGSEC . P LDK A1,DWTEOE . $ P CF A5,STDWT STORE EOE NO IN DWT . 4 P ADK A4,EOD-EOE EOD ADDRESS . P CF A5,LOGSEC . P CF A5,SETINH INHIBIT . P LDK A1,DWTEOD . $ P CF A5,STDWT STORE EOD NO IN DWT . P* . PLOA:70 EQU *
0x250af4…250c88 Dummy {f00=0x00ba, f01=0x0190, f02=»D:RC . P* / P EJECT DRFD01 / P* / . P* / 8 P IFF TOSS+IBM=0 / B P* / Z P* ERROR , UNLOCK / d P* / ~ PLOA:90 EQU * / P LDR A5,A6 / P ADKL A5,DWTSB2 STACK BASE / P LDK A2,/C UNLOCK / P CF A5,FD:REA / P RB LOA:
0x250c88…250e1c Dummy {f00=0x00ba, f01=0x0190, f02=»WTRCW,A6 / P ANKL A3,/2007 FATAL ERROR 0 P RB(NZ) LOA:90 0 2 & P LDKL A4,BUF DRIVER BUFFER ADDRESS 0 H P RTN A5 0 r P XIF 0 P EJECT DRFD01 0 P* 0 P********** 0 P* * 0 P* UNLOAD * 0 P* * 0 P********** 0
0x250e1c…250fb0 Dummy {f00=0x00ba, f01=0x0190, f02=» A7,A7 EOD 0 P RF(Z) UNL:70 NOT OPEN 1 4 P ST A7,10,A8 STORE EOD-NO IN CONTROL WORD OF ECB 1 0 P* 1 h , P* READ DATA SET LABEL TO DRIVER BUFFER 1 r P* 1 P CF A5,DSLIO PREPARE FOR I/O 1 & P CF A5,FD:REA READ DATA SET LABEL 1 $ P CF A5,UNL:RC
0x250fb0…251144 Dummy {f00=0x00ba, f01=0x0190, f02=»C-CODED) 1 ` P* 2 P CF A5,DSOPCH EOD-NO TO A7 2 P* 2 < P* DIVIDE EOD BY 26 2 F P* 2 b P LDK A1,0 2 l PUNL:10 SUK A7,26 2 ~ P RF(N) UNL:20 2 P ADK A1,1 2 P RB UNL:10 2 PUNL:20 ADK A7,27 2 P* 2 P* A1 = BINARY TRACK
0x251144…2512d8 Dummy {f00=0x00ba, f01=0x0190, f02=» TO POS 79 2 v P SCR A3,A4 3 P SUK A4,1 3 $ P SRL A3,8 LEFT BYTE 3 6 P SCR A3,A4 STORE IN BUFFER 3 R P LDR A7,A1 TRACK 3 t ( P CF A5,BINDEC DEC EBCDIC-CODED IN A3 3 P SUK A4,3 3 P STR A3,A4 TRACK INTO BUF 3 P CF A5,SETINH INHIBIT 3
0x2512d8…25146c Dummy {f00=0x00ba, f01=0x0190, f02=»E WRITE DATA SET LEBEL 3 $ P CF A5,UNL:RC CHECK RETURN CODE 4 P CF A5,DSOPCH 4 F P CMR A2 INDICATE NOT OPEN 4 P* 4 ~ P* UNLOCK 4 P* 4 P XIF 4 PUNL:70 EQU * 4 P LDK A2,/C UNLOCK 4 P CF A5,FD:REA 4 P ORS A3,DWTRCW,A6
0x25146c…251600 Dummy {f00=0x00ba, f01=0x018e, f02=»LOCK IN DWT 4 t PUNL:80 EQU * 5 P RB LOA:75 END:IO 5 ( P IFF TOSS+IBM=0 5 B P* 5 Z P* UNLOAD RETURN CODE CHECK 5 d P* 5 PUNL:RC ORS A3,DWTRCW,A6 5 P ANK A3,/7 FATAL ERROR? 5 P RB(NZ) UNL:80 ENDIO 5 P RTN A5 5 P XIF 5
0x251600…251794 (1, 493) Dummy {f00=0x00ba, f01=0x0190, f02=» P* 6 PSQREAD EQU * 6 * P CF A5,DSOPCH GET EOD AND EOD ADDRESS 6 " P LDR A7,A7 EOD 6 P " PSQR:05 ABL(Z) DISIOE NOT OPEN 6 f . P ADK A2,DWTCRN-DWTEOD A2 = ADDRESS TO CRN 6 P LDR* A3,A2 CRN 6 P ADK A3,1 CRN+1 6 & P ST A3,ECBCW,A8 STORE CRN+
0x251794…251928 Dummy {f00=0x00ba, f01=0x0190, f02=»REA READ SECTOR POINTED AT BY CRN+1 6 ( P LD A4,ECBBA,A8 USER BUFFER ADDRESS 7 , $ P LD A7,ECBRL,A8 REQUESTED LENGTH 7 X $ P CF A5,ASCII TRANSFORM TO ASCII 7 P LDK A1,DWTCRN 7 P CF A5,DSPAD 7 P RF SQW:10 UPDATE CRN 7 P* 7 P* END OF DA
0x251928…251abc Dummy {f00=0x00ba, f01=0x0190, f02=» P* SEQUENTIAL WRITE * 8 P******************* 8 P* 8 < PSQWRIT EQU * 8 F P CF A5,DSOPCH GET EOD 8 Z P ADK A7,0 EOD-NO (SET CR) 8 x P RB(Z) SQR:05 NOT OPEN 8 P* 8 P* CHECK IF END OF EXTENT 8 P* 8 P LDK A1,DWTEOE 8 & P CF
0x251abc…251c50 Dummy {f00=0x00ba, f01=0x018e, f02=»F A5,BIO 8 P LDK A7,128 9 , P CF A5,EBCDIC TRANSFORM AND MOVE TO BUF 9 $ P ORK A2,5 PHYS. WRITE 9 T P CF A5,FD:WRI 9 r P CF A5,DSOPCH 9 PSQW:10 LDR A1,A3 RETURN CODE 9 P ANK A1,/1 9 P RF(NZ) SQW:15 NOT OPERABLE 9 * P IMR A2 EOD=EOD+
0x251c50…251de4 Dummy {f00=0x00ba, f01=0x0190, f02=» P RF END:IO : P EJECT DRFD01 : P* : . P********** : 8 P* REWIND * : J P********** : P* : n PREWIND EQU * : x P CF A5,DSOPCH : P ADK A7,0 EOD (SET CR) : $ P RB(Z) SQR:05 DATA SET NOT OPEN : P LDR A3,A2 SAVE EOD ADDRESS :
0x251de4…251f78 Dummy {f00=0x00ba, f01=0x0190, f02=» 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 ; n P EJECT DRFD01 ; z P* ; P***************** ; P* * ; P* PERFORM ORDER * ; P* * ; P****
0x251f78…25210c Dummy {f00=0x00ba, f01=0x018e, f02=» A4 BUFFER ADDRESS ; P* < PFD:WRI EQU * < * P IFT CHAN=0 < > P LDKL A1,/C000 WORDS,WRITE < R P XIF < t P IFT CHAN=1 < ( P CM DWTRW,A6 INDICATOR TO WRITE MODE < P XIF < P RF FD:800 < P* < PFD:REA EQU * < P IFT CHAN=1
0x25210c…2522a0 Dummy {f00=0x00ba, f01=0x0190, f02=» PFD:800 EQU * = P IFT CHAN=0 = " P SRL A3,1 FROM BYTES TO WORDS = , P* = R P IFT MMUPAG=1 = & P ORR* A1,A8 GET FIRST WORD OF ECB = r * P ANKL A1,/F000 KEEP FOUR LEFTMOST BITS = P XIF = P* = P IFT CHAN=0 = P ORR A3,A1 = PWE
0x2522a0…252434 (1, 494) Dummy {f00=0x00ba, f01=0x0190, f02=» P* > . P* PUT BUFFER START AND END ADDRESS IN DWT > P* > @ P ST A4,DWTUB,A6 > J P ADR A3,A4 > b " P ST A3,DWTUBE,A6 END ADDRESS+2 > t P XIF > PFD:820 EQU * > & P ST A5,DWTA5,A6 SAVE STACK POINTER > $ PFD:CIO CIO A2,1,CUADR CIO-START >
0x252434…2525c8 Dummy {f00=0x00ba, f01=0x0190, f02=» > P* ? * P************************************* ? * P* * ? @ * P* FD:RC - STORE EFF LEN, END:IO * ? n * P* * ? * P************************************* ? P* ? P* INP
0x2525c8…25275c Dummy {f00=0x00ba, f01=0x0190, f02=»D A2,ECBRL,A8 REQ LENGTH ? P ST A2,ECBEL,A8 EFF LENGTH @ P EJECT DRFD01 @ B P* @ Z P********** @ d P* * @ v P* END:IO * @ P* * @ P********** @ P* @ PEND:IO EQU * @ P CF A15,TENDIO @ PT:DISP ABL TDISP @
0x25275c…2528f0 Dummy {f00=0x00ba, f01=0x018e, f02=»END:10 LDK A1,8 RETURN CODE @ P RB END:IO A $ P EJECT DRFD01 A 6 P* A N P******************** A X P* * A t P* RECOVERY ROUTINE * A P* * A P******************** A P* A PFDON EQU * A P IFT CPU
0x2528f0…252a84 Dummy {f00=0x00ba, f01=0x0190, f02=» P XIF B P* B P LDKL A6,DWFD01 DWT ADDRESS B P* B > PFDON05 EQU * B H P IM DWTA2,A6 SET FDON FLAG B P LDKL A5,DWTSB2 B ~ P ADR A5,A6 GET STACK BASE B P* B P IFF DSKPAG+SWPBLK=0 B , P LD A2,INIFLG CHECK INITIALIZATION FLAG B
0x252a84…252c18 Dummy {f00=0x00ba, f01=0x0190, f02=»T FLEXIBLE DISC? B P LDR A3,A2 C . P CF A5,SETCIO DRIVE NR IN CIO INSTRUCTION C * ( P CF A5,FDIX GET DRIVE BIT INDICATOR C * P ORS A3,DWTLC,A6 INDICATE DRIVE LOCKED C P* C P EJECT DRFD01 C P* C P* C P C1R A3,A3 C * P ANS A3,DW
0x252c18…252dac Dummy {f00=0x00ba, f01=0x0190, f02=» P CF A5,FD:REA D P LD A3,SCTPLD D 0 P CF A5,VOLA05 GET VOLUME NAME ADDRESS IN DWT D 0 P LDK A1,2 D d P LDK A3,3 D v P* D P* MOVE VOLUME NAME TO DWT D P* D PFDON06 LD A4,BUF,A1 D P STR A4,A2 D P ADK A1,2 D P ADK A2,2
0x252dac…252f40 Dummy {f00=0x00ba, f01=0x0190, f02=» SAVE DWTST TO DWTST2 IF NOT ALREADY DONE. D P* DWTST IS SET BUSY E 2 P* E P P LD A2,DWTST2,A6 E Z P CWK A2,-1 E r P RF(NE) FDON08 ALREADY SAVED E P LD A2,DWTST,A6 E P ST A2,DWTST2,A6 E PFDON08 CM DWTST,A6 SET BUSY E P* E P I
0x252f40…2530d4 (1, 495) Dummy {f00=0x00ba, f01=0x0190, f02=»ER POINTER E | P RF(Z) FDON09 NOT RUNNING F P CMR A4 STOP TIMER F 4 $ P CM DWTTP2,A6 INDICATE NO TIMER F N PFDON09 EQU * F v P* F 6 P* OPEN FD TO MAKE FOLLOWING LOCK ORDER POSSIBLE F 2 P LDKL A4,SPDLCI OPEN/CLOSE STATUS WORD ADDRESS F P* F
0x2530d4…253268 Dummy {f00=0x00ba, f01=0x0190, f02=»ATUS WORD TO OPEN F ~ P* G P LDR* A2,A4 G $ & P OTR A2,0,SOPDA SET DRIVE TO OPEN G 8 P* G b P XIF G l P* G x P EJECT G P* G P* DELAY 2 SEC G P* G P LD A4,DWTTP,A6 G P RF(Z) FDON10 NO TIMER SET G P LDKL A4,-TIME G "
0x253268…2533fc Dummy {f00=0x00ba, f01=0x018e, f02=»5,SETIMP G P DATA FDON20,TIME H P RB T:DISP H * P* H < P* TIME OUT ROUTINE H F P* H b PFDON20 LDR A6,A1 H l P CM DWTTP,A6 H P LDKL A5,DWTSB2 H P ADR A5,A6 STACK BASE H P* H P* LOCK DOORS H P* H P LDK A2,1 H
0x2533fc…253590 Dummy {f00=0x00ba, f01=0x0190, f02=» P* I P EJECT I P* I P* PUT DRIVE NO IN CIO INSTR I & P* I J P SRN A2,A3 DRIVE NO IN A3 I T * P CF A5,SETCIO PUT DRVE NO IN CIO-INSTR I v P LDK A2,/14 LOCK I P CF A5,FD:REA I P LD A2,DWTA3,A6 DRIVE IND. I P ANK A3,1 I P R
0x253590…253724 Dummy {f00=0x00ba, f01=0x018e, f02=» I P* J P IFT OPCLOS=1 J P* J ( D P* RESTORE OPEN/CLOSE STATUS TO SAME VALUE AS BEFORE POWER OFF J 2 $ P LD A2,DWTOCF,A6 OPEN/CLOSE FLAG J z " P ORS A2,SPDLCI TO STATUS WORD J P CM DWTOCF,A6 CLEAR FLAG J P* J $ P LD A2,SPDLCI OPEN/CLO
0x253724…2538b8 Dummy {f00=0x00ba, f01=0x018e, f02=» P* K P* ANY REQUEST? K P* K & . P* RESTORE STATUS SAVED IN DWST2 TO DWTST. K 0 P* SET DWTST2 TO -1 K b " P LD A2,DWTST2,A6 SAVED STATUS K ~ * P ST A2,DWTST,A6 PUT IN CUURENT STATUS K P LDKL A2,-1 K ( P ST A2,DWTST2,A6 INDICATE NOT SAVE
0x2538b8…253a4c Dummy {f00=0x00ba, f01=0x0190, f02=» K b P* L P* RETRY REQUEST L P* L * P IM DWTRTY,A6 INDICATE RETRY L 4 P LD A7,DWTOR,A6 L X P ANK A7,/3F ORDER L p P LD A8,DWTECB,A6 ECB ADDRESS L P ABL FDAD REACTIVATE L P EJECT DRFD01 L P* L P********************* L
0x253a4c…253be0 Dummy {f00=0x00ba, f01=0x0190, f02=» EQU * L $ P ST P,INTSAV SAVE LAST INTERRUPT M " P******************** =1 START M 6 P IFT CPU852=1 M * P CF A15,SAVE8 SAVE REGISTERS ON STACK M r P XIF M P* M P IFT CPU852=0 M " P MSR 8,A15 SAVE A1-A8 ON STACK M P XIF M P* M P
0x253be0…253d74 (1, 496) Dummy {f00=0x00bb, f01=0x0190, f02=»FFER M v P SUR A2,A1 LENGTH N PIH005 EQU * N & P SST A3,CUADR GET STATUS N : " P RF(A) IH:000 READY INTERRUPT N Z ( P LD A3,DWTRW,A6 READ/WRITE INDICATOR N P RF(NZ) IH050 READ N P* N P EJECT DRFD01 N P* N P* N PIH010 EQU * N
0x253d74…253f08 Dummy {f00=0x00bb, f01=0x0190, f02=»WRITE N P RB(NA) IH005 O $ P ADK A1,2 UPDATE BUFFER POINTER O $ P SUK A2,2 O L P RB(P) IH010 O ^ P CIO A2,0,CUADR CIO HALT O r P ABL TDISP GOTO DISPATCHER O P* O PIH050 EQU * O P INR A3,0,CUADR READ O P RB(NA) IH005 O $ P SC
0x253f08…25409c Dummy {f00=0x00bb, f01=0x0190, f02=» A2,2 O P RB(P) IH050 P P CIO A2,0,CUADR CIO HALT P " P SST A3,CUADR STATUS =2 P B P RB(NA) *-2 =2 P b PIH:000 EQU * =1 P z P XIF P P* P P EJECT DRFD01 P P* P P* P P******************** =1 END P P IFT CHAN=0 =2 P
0x25409c…254230 Dummy {f00=0x00bb, f01=0x0190, f02=»,A6 STACK POINTER P P SLL A3,1 Q P RF(N) FDRE READY INTERRUPT Q , P SRL A3,1 Q P P LD A2,DWTRTY,A6 RETRY? Q b P RF(Z) IH:10 NO Q " P CM DWTRTY,A6 RESET RETRY FLAG Q P LDR A1,A3 Q P ANKL A1,/0405 Q P RF(Z) IH:10 RETURN CODE OK Q
0x254230…2543c4 Dummy {f00=0x00bb, f01=0x0190, f02=» CU - ECB Q x P* R P ANKL A3,/FF37 R P RF(Z) IH:80 R 2 P LDR A1,A3 R F " P ANKL A3,/0A05 UNCHANGED BITS R X P LDR A4,A1 R ~ P ANKL A4,/0400 BIT 5 R P SLC A4,7 TO BIT 14 R P ORR A3,A4 R P IFT TOSS+IBM=0 R P LDR A4,A1 R P ANK
0x2543c4…254558 Dummy {f00=0x00bb, f01=0x0190, f02=» BIT 7 R P ORR A3,A4 S P ANK A1,/10 BIT 11 S P SRC A1,5 TO BIT 0 S : P ORR A3,A1 S T PIH:80 EQU * S f P IFT CHAN=1 =1 S z P INH =1 S P XIF =1 S P RTN A5 S P EJECT DRFD01 S P* S P******************** S P*
0x254558…2546ec Dummy {f00=0x00bb, f01=0x0190, f02=»,DWTA2,A6 S , P ABL(NZ) T:DISP POWER ON ROUTINE ACTIVE T P LDKL A5,DWTSB2 T B P ADR A5,A6 STACK BASE T Z P RB FDON60 T x P EJECT DRFD01 T P* T 0 P******************************************* T 0 P*
0x2546ec…254880 Dummy {f00=0x00bb, f01=0x0190, f02=»*********************** T | P* U P******* U * P* * U : P* BIO * U J P* * U Z P******* U j P* U z P* U P* INPUT: A8 ECB ADDRESS U P* U > P* OUTPUT: A2 BITS 0-12 OF CONTROL WORD USED BY CIO START U 0 P* A
0x254880…254a14 (1, 497) Dummy {f00=0x00bb, f01=0x0190, f02=»10 U PBIO:RE LDK A4,1 V PBIO010 EQU * V " P LD A3,ECBRL,A8 REQ LEN V 6 P RF(N) BIOERR ILLEGAL LENGTH V V P IFT TOSS+IBM=2 V z P LD A2,DWTLAB,A6 V P AN A2,DWTA3,A6 V P RF(Z) BIO020 TOSS DISC V P XIF V P IFT IBM=1 V P LDK A7,
0x254a14…254ba8 Dummy {f00=0x00bb, f01=0x0190, f02=»LEN V ~ P LDK A2,3 W PBIO030 EQU * W P XIF W 2 P IFF TOSS+IBM=0 W > P ADK A4,0 SET CR W V P RF(Z) BIO060 WRITE W n P LDK A2,0 W P LDR A1,A3 REQ LEN W & P CWR A3,A7 REQ LENGTH WITHIN RANGE W P RF(G) BIOERR NO W PBIO040 SUK A1,12
0x254ba8…254d3c Dummy {f00=0x00bb, f01=0x018e, f02=»* W PBIO060 CWR A3,A7 X " P RF(NE) BIOERR ILLEGAL REQ LEN X " P XIF X H P IFT TOSS+IBM=0 X T P* X l > P* FIND NO OF SECTORS TO BE READ/WRITTEN, CHECK REQ LENGTH X v P* X P LDR A1,A3 REQ LENGTH X P LDK A2,0 NO OF SECTORS-1 X $ PBIO015
0x254d3c…254ed0 Dummy {f00=0x00bb, f01=0x0190, f02=» P* Y PBIO035 SUK A1,128 Y & P RF(NP) BIO100 REQ LENGTH ACCEPTED Y ( PBIO045 ADK A2,1 Y R P CWK A2,3 Y j P RB(NG) BIO015 Y | $ P RF BIOERR REQ LEN OUTSIDE RANGE Y P XIF Y P* Y 6 PBIO100 SRC A2,2 SHIFT NO OF SECTORS-1 INTO POS 0-1 Y
0x254ed0…255064 Dummy {f00=0x00bb, f01=0x0190, f02=»SECTOR NO Y P RF(N) BIOER2 OUTSIDE RANGE Z P IFT TOSS+IBM=2 Z 6 P ANK A7,/A Z N P RF(Z) BIO110 IBM DISC Z ` P XIF Z ~ P IFT TOSS=1 Z P CWK A1,499 Z P RF(G) BIOER2 OUT OF RANGE Z , P SLL A1,2 MULTIPLY BY 4TO GET DM SECTOR Z P XIF
0x255064…2551f8 Dummy {f00=0x00bb, f01=0x0190, f02=» P XIF [ P IFT TOSS+IBM=0 [ ( P CWK A1,2001 SECTOR NO OUT OF RANGE [ ( P RF(G) BIOER2 YES! [ T P XIF [ n PBIO120 EQU * [ z P SLL A1,3 [ P ORR A2,A1 [ " P LD A4,ECBBA,A8 BUFFER ADDRESS [ P LDR A1,A3 REQ LENGTH [ P ANK A1,1 [ $ P
0x2551f8…25538c Dummy {f00=0x00bb, f01=0x0190, f02=» PBIOERR ABL END:10 P* ILLEGAL SECTOR NO PBIOER2 ABL FD:DIS < P* V P EJECT DRFD01 ` P* x P********* P* * P* FDIX * P* * P********* P* P* INPUT: A2 X P*
0x25538c…255520 Dummy {f00=0x00bb, f01=0x018e, f02=»LL A3,1 P SUK A2,1 ] P RB FDIX10 ] " PFDIX20 RTN A5 ] 4 P EJECT DRFD01 ] J P IFF TOSS+IBM=0 ] b P****************** ] z P* * ] P* VOLADR * ] P* * ] P****************** ] P* ] P*
0x255520…2556b4 (1, 498) Dummy {f00=0x00bb, f01=0x0190, f02=» ] P LC A3,DWTOR,A6 DRIVE NO ^ PVOLA05 EQU * ^ ( P LDK A2,DWTVO0 ^ < P ADR A2,A6 ^ R P ANK A3,/3 ^ d PVOLA10 EQU * ^ v P RF(Z) VOLA20 ^ P ADK A2,6 UPDATE ADDRESS ^ P SUK A3,1 ^ P RB VOLA10 ^ PVOLA20 RTN A5 ^ P XIF ^ P ^
0x2556b4…255848 Dummy {f00=0x00bb, f01=0x0190, f02=»ASCII TRANSFORMS A STRING FROM EBCDIC TO ^ P* ASCII CODE _ 0 . P* INPUT STRING ADDRESS IS BUF _ P & P* INPUT: A7 NO OF CHARACTERS _ , P* A4 OUTPUT STRING ADDRESS _ P* OUTPUT: A1 CHANGED _ P*
0x255848…2559dc Dummy {f00=0x00bb, f01=0x0190, f02=»C:10 SUK A7,1 _ P RF(N) ASC:20 ` P SUK A4,1 ` , " P LC A1,BUF,A7 GET EBCDIC CHAR ` > ( P LC A1,TASCII,A1 TRANSFORM TO ASCII ` d 0 P SCR A1,A4 PUT ASCII CHAR. IN OUTPUT BUFFER ` P RB ASC:10 ` PASC:20 EQU * ` " P RF EBC:90 SET INH AND RETURN
0x2559dc…255b70 Dummy {f00=0x00bb, f01=0x018e, f02=»ES A STRING FROM ASCII TO ` r P* EBCDIC CODE a " 8 P* OUTPUT STRING IS PUT IN DRIVER BUFFER a D P* a & P* INPUT: A7 NO OF CHARACTERS a * P* A4 INPUT STRING ADDRESS a P* a P* OUTPUT: A1 CHANGED a
0x255b70…255d04 Dummy {f00=0x00bb, f01=0x0190, f02=» P LDK A1,0 b PEBC:10 SUK A7,1 b P RF(N) EBC:80 b . P SUK A4,1 b D P LCR A1,A4 GET ASCII CHAR. b V P LC A1,TEBCDIC,A1 b x P SC A1,BUF,A7 b P RB EBC:10 b PEBC:80 EQU * b P LDKL A4,BUF b PEBC:90 EQU * b P CF A5,SETINH b
0x255d04…255e98 Dummy {f00=0x00bb, f01=0x0190, f02=»EC TRANSFORMS PHYSICAL SECTOR TO STANDARD b ~ , P* LOGICAL SECTOR (BINARY). c 2 < P* FORMAT OF PHYS. SEC. TT0SS (EBCDIC CODE) c b * P* TT = TRACK, SS=SECTOR c P* c , P* INPUT: A4 ADDRESS TO PHYS. SECTOR c
0x255e98…25602c Dummy {f00=0x00bb, f01=0x0190, f02=»F A5,DECBIN c P LDR A3,A1 SAVE d P ADK A4,2 d , P* d > P* MULTIPLY BY 26 d H P* d b P SLL A3,5 *32 d l P LDR A2,A1 d P SLL A2,2 d P SUR A3,A2 *28 d P SLL A1,1 d P SUR A3,A1 *26 d P CF A5,DECBIN d P SUK A1,1 d
0x25602c…2561c0 Dummy {f00=0x00bb, f01=0x0190, f02=»F+EOD+4 EOD? d P RF(E) LOG:02 YES! e P SUKL A1,1898 e . P RF LOG:04 e D P* e V " P* CHECK EOD LESS/EQUAL 74001 e ` P* e PLOG:02 SUKL A1,1899 e PLOG:04 EQU * e " P RF(P) LOG:10 NOT ACC SEC. NO e " P SUK A4,4 RESET BUFFER POINTER e
0x2561c0…256354 (1, 499) Dummy {f00=0x00bb, f01=0x0190, f02=»DE e r P ORS A1,DWTRCW,A6 f P CF A5,SETINH f $ P ABL LOA:90 ERROR ROUTINE f : P* f P EJECT DRFD01 f f P* f ~ P********** f P* DECBIN* f P********** f P* f > P* FUNCTION: DECBIN TRANSFORMS TWO EBCDIC CODED DIGITS TO f D
0x256354…2564e8 Dummy {f00=0x00bb, f01=0x0190, f02=» BINARY f P* WORKING REG: A2,A7 g P* g 0 PDECBIN LDK A1,0 g : P LDK A7,2 g R PDEC:10 LCR A2,A4 DIGIT g d P ANK A2,/FF g P SUK A2,/F0 g P RB(N) LOG:05 g P SUK A2,9 g P RB(P) LOG:05 NOT DIGIT g P ADK A2,9 g P SUK
0x2564e8…25667c Dummy {f00=0x00bb, f01=0x0190, f02=»DK A1,/A MULTIPLY BY 10 g P RB DEC:20 h PDEC:30 ADR A1,A2 h 2 P RTN A5 h J P XIF h Z P EJECT DRFD01 h f P* h ~ P********** h P* SETCIO * h P********** h P* h 2 P* FUNCTION: PUT DRIVE NO IN CIO INSTRUCTION h P* h 8 P
0x25667c…256810 Dummy {f00=0x00bb, f01=0x0190, f02=» PSETCIO LDKL A4,/FFCF i P ANS A4,FD:CIO i P SLL A3,4 i 6 P ORS A3,FD:CIO i H P RTN A5 i ^ P IFT IBM=1 i n P EJECT DRFD01 i P* i P********** i P* BINDEC * i P********** i P* i : P* FUNCTION: BINDEC TRANSFORMS A BINA
0x256810…2569a4 Dummy {f00=0x00bb, f01=0x0190, f02=»UTPUT: A3 EBCDIC CODED DECIMAL DIGITS i P* A7 CHANGED j . P* j L PBINDEC LDK A3,0 j V PBIN:10 SUK A7,10 j n P RF(N) BIN:20 j P ADK A3,1 j P RB BIN:10 j PBIN:20 ADK A7,10 j P SLL A3,8 j * P ORR A3,A7 DECIMAL CONVERTED N
0x2569a4…256b38 Dummy {f00=0x00bb, f01=0x0190, f02=»* j P* k 4 P* FUNCTION: PREPARE FOR READING DATA SET LABEL k P* k L P* INPUT: A6 DWT ADDRESS k V P* k x : P* OUTPUT: A2 BITS 0-12 SECTOR NO, BITS 13-15 ZEROES k P* A3 128 k ( P* A4 DRIVER BUFFER ADDRESS k P
0x256b38…256ccc Dummy {f00=0x00bb, f01=0x018e, f02=»2 k P SLL A2,3 l P LDK A3,128 l P LDKL A4,BUF l 0 P RTN A5 l D P EJECT DRFD01 l T P* l l P********** l v P* DSOPCH * l P********** l P* l 6 P* FUNCTION: GET EOD-NO AND EOD-NO ADDRESS IN DWT l P* l P* INPUT: A6
0x256ccc…256e60 Dummy {f00=0x00bb, f01=0x0190, f02=» l x PDSOPCH LDK A1,DWTEOD m P CF A5,DSPAD m $ P LDR* A7,A2 EOD-NO m 8 P RTN A5 m R P EJECT DRFD01 m b P* m z P********* m P* DSPAD * m P********* m P* m 2 P* FUNCTION: GET ABSOLUTE ADDRESS OF SPECIFIED m 6 P* T
0x256e60…256ff4 (1, 500) Dummy {f00=0x00bc, f01=0x0190, f02=»UTPUT: A2 ADDRESS TO DATA m P* A6 DWT ADDRESS n " P* n D " PDSPAD LC A2,DWTOR,A6 DRIVE NO n N P ANK A2,/3 n t P ADR A2,A2 n P ADR A2,A6 n P ADR A2,A1 n P RTN A5 n P EJECT DRFD01 n P* n P********* n P* STDWT
0x256ff4…257188 Dummy {f00=0x00bc, f01=0x018e, f02=» ( P* INPUT: A1 OFFSET TO DWT AREA o . P* A3 WORD TO BE STORED IN DWT o 0 P* A6 DWT ADDRESS o b P* o P* OUTPUT: A1 UNCHANGED o 0 P* A2 ADDRESS TO WORD IN DWT AREA o P* A3 UNCHANGED o P
0x257188…25731c Dummy {f00=0x00bc, f01=0x018e, f02=» o ~ P* p P********** p P* SETINH * p $ P********** p 6 P* p H @ P* FUNCTION: INHIBIT INTERRUPTS, IF FDON ROUTINE IS ACTIVE p R > P* ESCAPE VIA DISPATCHER ELSE RESET DWTENB AND p P* RETURN p P* p " P* INPUT:
0x25731c…2574b0 Dummy {f00=0x00bc, f01=0x0190, f02=» p | PSET:10 RTN A5 q P XIF q P* q * " P* D R I V E R B U F F E R q 4 PBUF DATA 0,0,0,0 q Z P* q r P IFT IBM=1 q | P RES 60 q P XIF q P* q P EJECT DRFD01 q P* q P********************* q P*
0x2574b0…257644 Dummy {f00=0x00bc, f01=0x0190, f02=»0 q P DATA /8000 DWT STATUS r P DATA 0 ECB ADDRESS r ( P DATA 0 ORDER r D " P DATA FDADR ACTIVATION ADDRESS r Z P DATA 0 TTAB-ADDRESS r $ P DATA 0 WAIT/ACTIVATE INDICATOR r P DATA 0 TERMINAL QUEUE r P* r IFT MMUPAG=1 r & " DATA
0x257644…2577d8 Dummy {f00=0x00bc, f01=0x0190, f02=» DATA 0 r P DATA 0 s P DATA 0,0,0,0 STACK s ( PDWTST2 EQU *-DWFD01 SAVE STATUS WORD s < P DATA -1 s h * PDWTRTY EQU *-DWFD01 RETRY REQUEST FLAG s x P DATA 0 s $ PDWTTP EQU *-DWFD01 TIMER POINTER s P DATA 0 s ( PDWTRCW EQU *-DWFD01 TEMP R
0x2577d8…25796c Dummy {f00=0x00bc, f01=0x0190, f02=»R s j P DATA 0 t ( PDWTVO0 EQU *-DWFD01 VOLUME NAME NO 0 t P DATA 0,0,0 t F ( PDWTVO1 EQU *-DWFD01 VOLUME NAME NO 1 t Z P DATA 0,0,0 t ( PDWTVO2 EQU *-DWFD01 VOLUME NAME NO 2 t P DATA 0,0,0 t ( PDWTVO3 EQU *-DWFD01 VOLUME NAME NO 3 t P D
0x25796c…257b00 Dummy {f00=0x00bc, f01=0x0190, f02=» FLAG AT POWER ON t r P DATA 0 u P XIF u * P* u 6 P IFT CHAN=1 u @ 6 PDWTUB EQU *-DWFD01 POINTER AT NEXT WORD IN BUFFER u T P DATA 0 u , PDWTUBE EQU *-DWFD01 BUFFER END ADDRESS+2 u P DATA 0 u , PDWTRW EQU *-DWFD01 READ/WRITE INDICATOR u
0x257b00…257c94 (1, 501) Dummy {f00=0x00bc, f01=0x0190, f02=»OD EQU *-DWFD01 END OF DATA u P DATA 0,0,0,0 v $ & PDWTEOE EQU *-DWFD01 END OF EXTENT v : P DATA 0,0,0,0 v d * PDWTCRN EQU *-DWFD01 CURRENT RECORD NO v z P DATA 0,0,0,0 v . PDWTDSS EQU *-DWFD01 DATA SET LABEL SECTOR v P DATA 0,0,0,0 v P X
0x257c94…257e28 Dummy {f00=0x00bc, f01=0x0190, f02=»PHYSICAL BUFFER ADDRESS v P DATA 0 SECOND MMU ENTRY w P* w @ PDWT:LA EQU *-DWFD01 w J * P DATA 0 16 BIT LOGICAL BUFFER ADDRESS w f P* w PDWT:BF EQU *-DWFD01 w $ P DATA 0 SAVE AREA BUFFER ADDRESS w P XIF w P* w P IFT MMUPAG=1 w
0x257e28…257fbc Dummy {f00=0x00bc, f01=0x4098, f02=» w | P XIF x P* x P IFT MMUPAG=1 x P IFT DEVIND=4 x 4 PFD:BUF EQU 0 x J P XIF x ^ P* x j P* x t P* x ~ P END x @ x PDWT:BF EQU *-DWFD01 w $ P DATA 0 SAVE AREA BUFFER ADDRESS w P XIF w P* w P IFT MMUPAG=1 w
0x257fbc…258150 Dummy {f00=0x00bc, f01=0x2008, f02=» y END @
0x258150…2582e4 Dummy {f00=0x00bc, f01=0x0190, f02=» ADDRESS BLOCK " P ENTRY ACLP ACTIVATION DRIVER " P ENTRY IHLP INTERRUPT HANDLER < P ENTRY LPON RECOVERY ROUTINE b & P ENTRY DWLP01 DWT FOR LINE PRINTER P P P P* P* , P****************************************
0x2582e4…258478 Dummy {f00=0x00bc, f01=0x0190, f02=»PATCHER P EXTRN TENDIO END I/O & P EXTRN SAVE8 SAVE 8 REGS ON STACK . P EXTRN DISIOE REQUEST ERROR X EXTRN DWTST STATUS | EXTRN DWTBC BYTE COUNTER EXTRN DWTECB ECB ADDRESS $ EXTRN DWTOR DWT INDEX AND ORDER P EXT
0x258478…25860c Dummy {f00=0x00bc, f01=0x018e, f02=» * P EXTRN INTSAV SAVE AREA LAST INTERRUPT P EJECT DRLP01 2 P* J P* T " P***************************** ^ " P* CONSTANTS * " P***************************** P* P* PDWALP EQU /0F & PMUXLP EQU DWAL
0x25860c…2587a0 Dummy {f00=0x00bc, f01=0x0190, f02=» P* CONDITIONAL ASSEMBLY P* & . P***************************************** 0 P* b 2 P* PROGRAMMED CHANNEL MAY BE USED INSTEAD OF l , P* MULTIPLEX CHANNEL BY SETTING X:A=1 P* PX:A EQU 0 PCHAN EQU X:A P*
0x2587a0…258934 (1, 502) Opaque[0x194]
0x258934…258ac8 # DirEnt {nam=»DVDY05«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0868, f03=0x0000}
0x258934…258ac8 IdxSect {
0x258934…258ac8 f00 = 0x0043 // 0x258934 @0x0
0x258934…258ac8 f01 = 0x0002 // 0x258936 @0x2
0x258934…258ac8 gno = [ // 0x258938 @0x4
0x258934…258ac8 [0x00]: C0x0043.0x1.0
0x258934…258ac8 ]
0x258934…258ac8 }
0x258ac8…258c5c Dummy {f00=0x0043, f01=0x0190, f02=» 6 P IDENT DVDY05 REL 9.2 COPY80 831215 870105040920 * P DK1 CHANGE CHANNEL PARAM FROM B000 > P USED IN DRDY01 l P * P* DEVICE WORK TABLE FOR VIDEO DISPLAY P* P ENTRY DVDY05 TABLE ENTRY P* P* ( P EXTRN DYAD
0x258c5c…258df0 Dummy {f00=0x0043, f01=0x018e, f02=»A /8000 STATUS./8000 MEANS DEVICE READY P DATA 0 ECB ADDRESS 0 P DATA DWTEND-DVDY05 ORDER L ( P DATA DYAD POINTER TO ADDRESS-BLOCK n P DATA 'DY' TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE P IFT MMU
0x258df0…258f84 Dummy {f00=0x0043, f01=0x018e, f02=» P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 $ P DATA 0 SAVE AREA FOR A5 D P RES 4 DWT-STACK d P DATA 0 TIMER POINTER | P DATA /101 CURSOR POINTER * P DATA /1850 LEFT BYTE=NUMBER OF LINES " P RIGHT BYTE=CHARACTERS/LINE
0x258f84…259118 Dummy {f00=0x0043, f01=0x4018, f02=» P END @ R A3 P DATA 0 SAVE AREA FOR A4 $ P DATA 0 SAVE AREA FOR A5 D P RES 4 DWT-STACK d P DATA 0 TIMER POINTER | P DATA /101 CURSOR POINTER * P DATA /1850 LEFT BYTE=NUMBER OF LINES " P RIGHT BYTE=CHARACTERS/LINE
0x259118…2592ac Dummy {f00=0x0043, 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
0x2592ac…259440 Dummy {f00=0x0043, f01=0x2008, f02=» NT TCLASS * * $ * . ENTRY TCLASS 8 * N * X * b * l * v * * TCLASS DATALTCLASE-* TCLASE EQU * END @ 1 INTLT2 INTRT1
0x259440…25a0e0 (2, 0) DirGranule ((2, 0)) {
0x259440…25a0e0 DirEnt {nam=»M:92NA«, typ=» «, f00=0x0000, f01=0x0000, f02=0x1790, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»M:92NA«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1798, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»TCLASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x17e0, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x17e8, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»SCLASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1a58, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»MONTAB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1a60, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»SYSTAB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1a68, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»TDISP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1a80, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»LRPINT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1aa0, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»TPROC «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1ac8, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»MSUBS «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1ae0, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»TTMJOB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1b10, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»TOSSIO«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1b20, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»SYSLDM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1bb8, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»SYSLDA«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c90, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»LDTASK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1de0, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»PFTAB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e10, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»LKMAL «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e18, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»CTABX «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e28, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DVTKB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e30, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DVTTP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e38, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DVTGP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e40, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DVTDI «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e48, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DVTDY «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e50, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DWII01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e58, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DWIO01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e60, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DW1501«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e68, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DRKB03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e70, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DRTP02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1eb0, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DRGP01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1ef8, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DRDI01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1f30, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DRDY01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1f50, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DRRT01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1fb0, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DRSOP1«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2060, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DRFD01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2088, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DRIC01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2108, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DRDC15«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2130, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»EBCDIC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x21e0, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»TIMER «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x21f0, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»TMMLKM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2208, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»TLDSEG«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2220, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»TABORT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2238, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»MONTIM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2248, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»TASS «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2260, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»TIODM «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2290, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DMTASK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x22c0, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DMINIT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2358, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DMTASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2368, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DMBUF «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x23a8, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DMFDB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x23c8, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DFTAB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x23d8, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DMSUBX«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x23e0, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»ADDMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2410, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DSUMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2420, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»MPYMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2430, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DIVMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2440, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DMSUBR«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2450, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DVKB00«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2498, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DVDY00«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24a0, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DVKB01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24a8, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DVTP01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24b0, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DVDY01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24b8, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DVKB02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24c0, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DVDI02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24c8, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DVDY02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24d0, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»DVGP03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24d8, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»M:92NA«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x24e0, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»CTAB01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2560, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»M:92NE«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2570, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»M:92NE«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x2578, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»M:92N1«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x25f8, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»M:92N1«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x2600, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»NJDC15«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2678, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»TEST «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2720, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»M:92LP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x2728, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»GLDC15«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x27a8, f03=0x0000}
0x259440…25a0e0 DirEnt {nam=»A «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2850, f03=0x0000}
0x259440…25a0e0 }
0x25a0e0…25a274 (2, 1) Opaque[0x194]
0x25a274…25a408 # DirEnt {nam=»M:92NA«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1798, f03=0x0000}
0x25a274…25a408 IdxSect {
0x25a274…25a408 f00 = 0x00bc // 0x25a274 @0x0
0x25a274…25a408 f01 = 0x0012 // 0x25a276 @0x2
0x25a274…25a408 gno = [ // 0x25a278 @0x4
0x25a274…25a408 [0x00]: C0x00bc.0x3.0
0x25a274…25a408 [0x01]: C0x00bd.0x0.0
0x25a274…25a408 [0x02]: C0x00bd.0x1.0
0x25a274…25a408 [0x03]: C0x00bd.0x2.0
0x25a274…25a408 [0x04]: C0x00bd.0x3.0
0x25a274…25a408 [0x05]: C0x00be.0x0.0
0x25a274…25a408 [0x06]: C0x00be.0x1.0
0x25a274…25a408 [0x07]: C0x00be.0x2.0
0x25a274…25a408 [0x08]: C0x00be.0x3.0
0x25a274…25a408 ]
0x25a274…25a408 }
0x25a408…25a59c Dummy {f00=0x00bc, f01=0x0190, f02=» ASG /02,NO MOV TCLASS,/S,TOSSWORK KPF /S,TCLASS 4 SCR J INC TCLASS,TOSSWORK V KPF /O r MOV SCLASS,/S,TOSSWORK KPF /S,SCLASS SCR INC SCLASS,TOSSWORK KPF /O MOV MONTAB,/S,TOSSWORK
0x25a59c…25a730 Dummy {f00=0x00bc, f01=0x0190, f02=» MOV TDISP,/S,TOSSWORK KPF /S,TDISP " SCR 6 MOV LRPINT,/S,TOSSWORK B KPF /S,LRPINT ` SCR v MOV TPROC,/S,TOSSWORK KPF /S,TPROC SCR MOV MSUBS,/S,TOSSWORK KPF /S,MSUBS SCR MOV TTMJOB
0x25a730…25a8c4 Dummy {f00=0x00bc, f01=0x0190, f02=»WORK ~ KPF /S,SYSLDM SCR " MOV SYSLDA,/S,TOSSWORK . KPF /S,SYSLDA L SCR b MOV LDTASK,/S,TOSSWORK n KPF /S,LDTASK SCR MOV PFTAB,/S,TOSSWORK KPF /S,PFTAB SCR MOV LKMAL,/S,TOSSWORK
0x25a8c4…25aa58 Dummy {f00=0x00bc, f01=0x0190, f02=»REDIT EQU 1$$ z ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ B !!EN n ASM /S z KPF /O KPF /S SCR LED TDISP ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPA
0x25aa58…25abec Dummy {f00=0x00bc, f01=0x0190, f02=»NT ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 6 ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ b !!EN ASM /S KPF /O KPF /S SCR LED TPROC ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$
0x25abec…25ad80 Dummy {f00=0x00bc, f01=0x018e, f02=»F /S SCR LED MSUBS ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ * ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ V ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN ASM /S KPF /O KPF /S SCR LED TTMJOB ( #!!CH $
0x25ad80…25af14 (2, 2) Dummy {f00=0x00bd, f01=0x0190, f02=» ASM /S KPF /O KPF /S SCR . LED TOSSIO : ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ L ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ x ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN ASM /S KPF /O KPF /S SC
0x25af14…25b0a8 Dummy {f00=0x00bd, f01=0x0190, f02=»$CPU852 EQU 0$$ | !!EN ASM /S $ KPF /O 2 KPF /S @ SCR N LED SYSLDA Z ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ l ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN ASM /S
0x25b0a8…25b23c Dummy {f00=0x00bd, f01=0x0190, f02=»1$$ p ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN 8 ASM /S D KPF /O R KPF /S ` SCR n MOV DVTKB,/S,TOSSWORK z KPF /S,DVTKB SCR MOV DVTTP,/S,TOSSWORK KPF /S,DVTTP SCR MOV DVTGP,/S,TOSS
0x25b23c…25b3d0 Dummy {f00=0x00bd, f01=0x0190, f02=»KPF /S,DVTDY SCR MOV DWII01,/S,TOSSWORK KPF /S,DWII01 > SCR T INC DWII01,TOSSWORK ` KPF /O | MOV DWIO01,/S,TOSSWORK KPF /S,DWIO01 SCR INC DWIO01,TOSSWORK KPF /O MOV DW1501,/S,TOSSWO
0x25b3d0…25b564 Dummy {f00=0x00bd, f01=0x0190, f02=»1$$ p ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 8 !!EN d ASM /S p KPF /O ~ KPF /S SCR LED DWIO01 ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$
0x25b564…25b6f8 Dummy {f00=0x00bd, f01=0x0190, f02=»!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ , ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ X !!EN ASM /S KPF /O KPF /S SCR MOV DRKB03,/S,TOSSWORK KPF /S,DRKB03 SCR MO
0x25b6f8…25b88c Dummy {f00=0x00bd, f01=0x0190, f02=»,/S,TOSSWORK KPF /S,DRDI01 SCR * MOV DRDY01,/S,TOSSWORK 6 KPF /S,DRDY01 T SCR j MOV DRRT01,/S,TOSSWORK v KPF /S,DRRT01 SCR MOV DRSOP1,/S,TOSSWORK KPF /S,DRSOP1 SCR MOV DRFD01,/S,TOSS
0x25b88c…25ba20 Dummy {f00=0x00bd, f01=0x0190, f02=» KPF /S,DRDC15 SCR LED DRKB03 & !!CH $$ X:A$$ 1$$ 8 !!CH $$ X:B$$ 1$$ R !!CH $$ X:C$$ 1$$ l !!CH $$ X:D$$ 2$$ !!CH $$ X:E$$ 1$$ !!CH $$ X:F$$ 40$$ !!CH $$ X:G$$ 1$$ !!CH $$ X:H$$ 1$$
0x25ba20…25bbb4 (2, 3) Dummy {f00=0x00bd, f01=0x0190, f02=»G EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN L ASM /S X KPF /O f KPF /S t SCR LED DRTP02 !!CH $$ X:A$$ 0$$ !!CH $$ X:B$$ 0$$ !!CH $$ X:C$$ 0$$ !!CH $$ X:D$$ 0$$
0x25bbb4…25bd48 Dummy {f00=0x00bd, f01=0x0190, f02=»,/5E5F$$/2122,/2627,/3B3C,/3E40,/5E5F$$ r ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ 0 ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN ASM /S KPF /O KPF /S SCR LED DRGP01
0x25bd48…25bedc Dummy {f00=0x00bd, f01=0x0190, f02=»$ X:F$$ 1$$ !!CH $$ X:G$$ 0$$ !!CH $$ X:H$$ 162$$ . ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ J ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ v ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN ASM /S KPF /O KPF /S SCR
0x25bedc…25c070 Dummy {f00=0x00bd, f01=0x0190, f02=»EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN J ASM /S V KPF /O d KPF /S r SCR LED DRDY01 !!CH $$ X:A$$ 0$$ !!CH $$ X:B$$ 1$$ !!CH $$ X:C$$ 0$$ !!CH $$ X:D$$ 0$$ !!
0x25c070…25c204 Dummy {f00=0x00bd, f01=0x0190, f02=»1$$ p ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 8 !!EN d ASM /S p KPF /O ~ KPF /S SCR LED DRRT01 !!CH $$ X:A$$ 0$$ !!CH $$ X:B$$ 1$$ !!CH $$ X:C$$ 0$$ !!
0x25c204…25c398 Dummy {f00=0x00bd, f01=0x0190, f02=»EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN J ASM /S V KPF /O d KPF /S r SCR LED DRSOP1 !!CH $$ X:A$$ 0$$ !!CH $$ X:B$$ 0$$ ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMU
0x25c398…25c52c Dummy {f00=0x00bd, f01=0x018e, f02=» LED DRFD01 !!CH $$ X:A$$ 1$$ !!CH $$ X:B$$ 1$$ 4 !!CH $$ X:C$$ 1$$ N !!CH $$ X:D$$ 1$$ h !!CH $$ X:E$$ 256$$ ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU
0x25c52c…25c6c0 Dummy {f00=0x00bd, f01=0x0190, f02=» ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 0 ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN ASM /S KPF /O KPF /S SCR LED DRDC15 !!CH $$ X:A$$ 650$$ !!CH $$ X:B$$ /6
0x25c6c0…25c854 (2, 4) Dummy {f00=0x00bd, f01=0x0190, f02=»$ ~ !!CH $$ X:H$$ 0$$ !!CH $$ X:I$$ 0$$ $ !!CH $$ X:J$$ 1$$ > !!CH $$ X:K$$ 0$$ X !!CH $$ X:L$$ 2$$ r !!CH $$ X:M$$ 00$$ !!CH $$ X:N$$ 02$$ !!CH $$ X:O$$ 0$$ !!CH $$ X:P$$ 0$$ !!CH $$ X:Q$$ 1$$
0x25c854…25c9e8 Dummy {f00=0x00bd, f01=0x0190, f02=»EQU 1$$CPU852 EQU 0$$ !!EN ASM /S * KPF /O 8 KPF /S F SCR T MOV EBCDIC,/S,TOSSWORK ` KPF /S,EBCDIC ~ SCR LED EBCDIC ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ (
0x25c9e8…25cb7c Dummy {f00=0x00bd, f01=0x0190, f02=»$ X:A$$ 1$$ !!CH $$ X:B$$ 1$$ !!CH $$ X:C$$ 1$$ . !!CH $$ X:D$$ 2$$ H !!CH $$ X:E$$ 1$$ b !!CH $$ X:F$$ 40$$ | !!CH $$ X:G$$ 1$$ !!CH $$ X:H$$ 1$$ !!CH $$ X:I$$ 1$$ !!CH $$ X:J$$ 040$$ !!CH $$
0x25cb7c…25cd10 Dummy {f00=0x00bd, f01=0x0190, f02=»U 0$$ r !!EN ASM /S KPF /O ( KPF /S 6 SCR D LED DVTKB P !!DL 35 b DATA 0,0,0,0,0,0,0,0 r DATA 0,0,0,0,0,0,0,0 DATA 0,0,0,0, !!IL 38 DATA 0,0,0,0,0,0,0,0 DATA 0,0,0,0,0,0,0,0
0x25cd10…25cea4 Dummy {f00=0x00bd, f01=0x018e, f02=»ER SCR MOV TPROC,/S,TOSSWORK KPF /S,TPROC 4 SCR H MOV TMMLKM,/S,TOSSWORK T KPF /S,TMMLKM r SCR MOV TLDSEG,/S,TOSSWORK KPF /S,TLDSEG SCR MOV TABORT,/S,TOSSWORK KPF /S,TABORT
0x25cea4…25d038 Dummy {f00=0x00bd, f01=0x0190, f02=» LED TIMER ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ B ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ n !!EN ASM /S KPF /O KPF /S SCR LED TPROC ( #!!CH $$CREDIT EQU 0$$CREDI
0x25d038…25d1cc Dummy {f00=0x00bd, f01=0x018e, f02=»/O KPF /S SCR LED TMMLKM $ ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ 6 ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ b ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN ASM /S KPF /O KPF /S SCR LED TLDSEG
0x25d1cc…25d360 Dummy {f00=0x00bd, f01=0x0190, f02=» !!EN ASM /S KPF /O KPF /S , SCR : LED TABORT F ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ X ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN ASM /S KPF /O KPF
0x25d360…25d4f4 (2, 5) Dummy {f00=0x00bd, f01=0x0190, f02=»PU852 EQU 1$$CPU852 EQU 0$$ !!EN $ ASM /S 0 KPF /O > KPF /S L SCR Z LED TASS f ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ x ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN
0x25d4f4…25d688 Dummy {f00=0x00bd, f01=0x0190, f02=»!!DL 042 DATA 00 !!DL 045 , DATA 00 < !!DL 050 X !!DL 051 h !!EN x ASM /S KPF /O KPF /S SCR LED LRPINT !!CH $$ X:A$$ 1$$ !!EN ASM /S KPF /O
0x25d688…25d81c Dummy {f00=0x00bd, f01=0x0190, f02=»K SCR MOV DMINIT,/S,TOSSWORK KPF /S,DMINIT 4 SCR J MOV TASS,/S,TOSSWORK V KPF /S,TASSI t SCR MOV DMTASS,/S,TOSSWORK KPF /S,DMTASS SCR MOV DMBUF,/S,TOSSWORK KPF /S,DMBUF SC
0x25d81c…25d9b0 Dummy {f00=0x00bd, f01=0x0190, f02=»V DMSUBX,/S,TOSSWORK KPF /S,DMSUBX ! SCR ! 2 MOV ADDMOD,/S,TOSSWORK ! > KPF /S,ADDMOD ! SCR ! r MOV DSUMOD,/S,TOSSWORK ! ~ KPF /S,DSUMOD ! SCR ! MOV MPYMOD,/S,TOSSWORK ! KPF /S,MPYMOD ! SCR ! MOV DIVMOD
0x25d9b0…25db44 Dummy {f00=0x00bd, f01=0x0190, f02=»!!CH $$ X:A$$ 00000$$ ! ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ " ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ " J ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ " v !!EN " ASM /S " KPF /O " KPF /S " SCR " LED DMBUF " !!CH $$ X:A$$ 0000
0x25db44…25dcd8 Dummy {f00=0x00bd, f01=0x0190, f02=» " l !!EN # ASM /S # KPF /O # " KPF /S # 0 SCR # > LED DMTASK # J !!CH $$ X:A$$ 00001$$ # !!CH $$ X:B$$ 00000$$ # z !!CH $$ X:C$$ 00004$$ # ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ # ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ #
0x25dcd8…25de6c Dummy {f00=0x00bd, f01=0x0190, f02=»CH $$ X:A$$ 00004$$ # !!CH $$ X:B$$ 00000$$ $ ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ $ : ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ $ f ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ $ !!EN $ ASM /S $ KPF /O $ KPF /S $ SCR $ LED DFTA
0x25de6c…25e000 Dummy {f00=0x00bd, f01=0x0190, f02=» !!CH $$ X:B$$ 00360$$ % !!CH $$ X:C$$ 00000$$ % " !!CH $$ X:D$$ 00114$$ % @ ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ % ^ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ % ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ % !!EN % ASM /S % KPF /O %
0x25e000…25e194 (2, 6) Dummy {f00=0x00be, f01=0x0190, f02=»CH $$CPU852 EQU 1$$CPU852 EQU 0$$ % !!EN & * ASM /S & 6 KPF /O & D KPF /S & R SCR & ` LED TASS & l ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ & ~ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ & ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ & !!EN &
0x25e194…25e328 Dummy {f00=0x00be, f01=0x0190, f02=»EQU 0$$MMUPAG EQU 1$$ & ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ ' !!EN ' J ASM /S ' V KPF /O ' d KPF /S ' r SCR ' LED ADDMOD ' ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ' ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ' ( #!!CH $$CPU852 EQU
0x25e328…25e4bc Dummy {f00=0x00be, f01=0x018e, f02=»T EQU 1$$ ' v ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ ( > !!EN ( j ASM /S ( v KPF /O ( KPF /S ( SCR ( LED MPYMOD ( ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQ
0x25e4bc…25e650 Dummy {f00=0x00be, f01=0x0190, f02=» ( ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ) ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ) 4 ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ ) ` !!EN ) ASM /S ) KPF /O ) KPF /S ) SCR ) LED DMSUBR ) ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ )
0x25e650…25e7e4 Dummy {f00=0x00be, f01=0x018e, f02=»/S ) SCR * LED SYSTAB * !!CH $$IHINPT$$TRAP$$ * ( !!CH $$ X:A$$ 00001$$ * F !!CH $$ EXTRN BUG$$*$$ * d !!CH $$ BUG$$ 0$$ * !!CH $$ X:B$$ 00004$$ * !!CH $$ X:C$$ 00004$$ * !!CH $$ X:D$$ 00000$$ * !!CH $$ X:E$$ 0001
0x25e7e4…25e978 Dummy {f00=0x00be, f01=0x0190, f02=» !!IL 55 + EXTRN IH1501 + EXTRN IH1502 + 4 !!DL 056 + T !!DL 057 + d !!DL 067 + t !!DL 068 + !!DL 069 + !!DL 070 + !!DL 071 + !!DL 073 + !!DL 074 + !!DL 075 + !!DL 077 + !!DL
0x25e978…25eb0c Dummy {f00=0x00be, f01=0x0190, f02=» DATA ILLINT , !!DL 133 , $ DATA ILLINT , 4 !!DL 134 , T DATA ILLINT , d !!DL 135 , DATA ILLINT , !!DL 136 , DATA ILLINT , !!DL 138 , DATA IL
0x25eb0c…25eca0 Dummy {f00=0x00be, f01=0x0190, f02=»A ILLINT , !!DL 149 - DATA ILLINT - $ !!DL 150 - D DATA ILLINT - T !!DL 155 - t DATA ILLINT - !!DL 156 - DATA ILLINT - !!DL 159 - DATA ILLINT - !!EN
0x25eca0…25ee34 (2, 7) Dummy {f00=0x00be, f01=0x0190, f02=» - !!DL 014 . !!DL 018 . !!DL 019 . ( !!DL 020 . 8 !!DL 022 . H !!DL 023 . X !!DL 024 . h !!DL 025 . x !!DL 026 . !!DL 027 . !!DL 028 . !!DL 029 . !!DL 030 . !!DL 031 . !!DL 032 . !!DL 034 .
0x25ee34…25efc8 Dummy {f00=0x00be, f01=0x0190, f02=» . !!DL 046 / !!DL 047 / !!DL 048 / ( !!DL 050 / 8 !!DL 051 / H !!DL 052 / X !!DL 053 / h !!DL 054 / x !!DL 055 / !!DL 056 / !!DL 057 / !!DL 058 / !!DL 059 / !!DL 060 / !!DL 062 / !!DL 063 /
0x25efc8…25f15c Dummy {f00=0x00be, f01=0x0190, f02=» $$CREDIT EQU 0$$CREDIT EQU 1$$ / ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 0 ( ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 0 T !!CH $$DVTKB$$DVKB00$$ 0 !!CH $$KBAD$$KBAD3$$ 0 !!CH $$/1111$$/1100$$ 0 !!CH $$BCA$$FFFF$$ 0 !!CH $$ED0$$FFBA$$ 0
0x25f15c…25f2f0 Dummy {f00=0x00be, f01=0x018e, f02=»/O 0 KPF /S 1 SCR 1 LED DVTDY 1 $ ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ 1 6 ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 1 b ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 1 !!CH $$DVTDY$$DVDY00$$ 1 !!CH $$/ABC$$/1850$$ 1 !!CH $$/1111$$/C000$
0x25f2f0…25f484 Dummy {f00=0x00be, f01=0x0190, f02=» ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 2 ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 2 0 !!CH $$DVTKB$$DVKB01$$ 2 !!CH $$KBAD$$KBAD3$$ 2 z !!CH $$/1111$$/1140$$ 2 !!CH $$BCA$$FFFF$$ 2 !!CH $$ED0$$FFBA$$ 2 " !!CH $$0 CODE $$CTAB02 CODE $$ 2
0x25f484…25f618 Dummy {f00=0x00be, f01=0x0190, f02=»LED DVTTP 2 ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ 3 ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 3 > ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 3 j !!CH $$DVTTP$$DVTP01$$ 3 !!CH $$/1111$$/2000$$ 3 !!EN 3 ASM /S 3 KPF /O 3 KPF /S 3
0x25f618…25f7ac Dummy {f00=0x00be, f01=0x018e, f02=»1$$CPU852 EQU 0$$ 3 ~ !!CH $$DVTTP$$DVTP01$$ 4 !!CH $$/1111$$/2000$$ 4 8 !!EN 4 V ASM /S 4 b KPF /O 4 p KPF /S 4 ~ SCR 4 LED DVTTP 4 ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ 4 ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 4 ( #!!CH $
0x25f7ac…25f940 Dummy {f00=0x00be, f01=0x0190, f02=» KPF /S 5 SCR 5 LED DVTDY 5 ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ 5 0 ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 5 ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 5 !!CH $$DVTDY$$DVDY01$$ 5 !!CH $$/ABC$$/1850$$ 5 !!CH $$/1111$$/C000$$ 5
0x25f940…25fad4 (2, 8) Dummy {f00=0x00be, f01=0x0190, f02=» $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 5 ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 6 ( !!CH $$DVTKB$$DVKB02$$ 6 T !!CH $$KBAD$$KBAD3$$ 6 r !!CH $$/1111$$/1100$$ 6 !!CH $$BCA$$FFFF$$ 6 !!CH $$ED0$$FFBA$$ 6 " !!CH $$0 CODE $$CTAB03 CODE $$ 6 !!
0x25fad4…25fc68 Dummy {f00=0x00be, f01=0x018e, f02=»DI 6 ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ 7 ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 7 6 ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 7 b !!CH $$DVTDI$$DVDI02$$ 7 !!CH $$2010$$0000$$ 7 !!CH $$/1111$$/9010$$ 7 !!EN 7 ASM /S 7 KPF /O 7
0x25fc68…25fdfc Dummy {f00=0x00be, f01=0x0190, f02=» ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 8 !!CH $$DVTDY$$DVDY02$$ 8 0 !!CH $$/ABC$$/1850$$ 8 N !!CH $$/1111$$/C000$$ 8 j !!EN 8 ASM /S 8 KPF /O 8 KPF /S 8 SCR 8 LED DVTGP 8 ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ 8 ( #
0x25fdfc…25ff90 Dummy {f00=0x00be, f01=0x0190, f02=»0$$ 8 ~ !!EN 9 ASM /S 9 KPF /O 9 & KPF /S 9 4 SCR 9 B LED TCLASS 9 N !!IL 6 9 ` EXTRN DVKB00 9 n EXTRN DVDY00 9 EXTRN DVKB01 9 EXTRN DVTP01 9 EXTRN DVDY01 9
0x25ff90…260124 Dummy {f00=0x00be, f01=0x018e, f02=»IL 11 9 DATA TC00 : DATA TC01 : , DATA TC02 : J DATA TC03 : h !!IL 12 : TC00 DATA TC00E-* : DATA /0021 : DATA DVKB00 : DATA
0x260124…2602b8 Dummy {f00=0x00be, f01=0x0190, f02=» : v DATA DVKB01 ; DATA /00301 ; ( DATA DVTP01 ; H DATA /02311 ; h DATA DVTP01 ; DATA /01321 ; DATA DVTP01 ; DATA /00501 ;
0x2602b8…26044c Dummy {f00=0x00be, f01=0x018e, f02=»ATA DVKB02 ; DATA /00402 < DATA DVDI02 < 6 DATA /00502 < V DATA DVDY02 < v TC02E EQU * < TC03 DATA TC03E-* < DATA /00302 < DATA DV
0x26044c…2605e0 Dummy {f00=0x00be, f01=0x0190, f02=» EXTRN DWSI01 = EXTRN DWSO01 = $ EXTRN DWII01 = D EXTRN DWIO01 = d EXTRN DW1501 = EXTRN DW1500 = EXTRN DWREMU = EXTRN DWFD01 = !!IL 11 =
0x2605e0…260774 (2, 9) Dummy {f00=0x00be, f01=0x0190, f02=» TC04 = !!IL 12 > TC00 DATA TC00E-* > DATA /00101 > B DATA DWSI01 > b DATA /00111 > DATA DWSO01 > TC00E EQU * > TC01 DATA TC01E-* >
0x260774…260908 Dummy {f00=0x00be, f01=0x0190, f02=»/00E11 > ~ DATA DWIO01 ? TC02E EQU * ? . TC03 DATA TC03E-* ? J DATA /00611 ? l DATA DW1501 ? TC03E EQU * ? TC04 DATA TC04E-* ? DATA /00601 ?
0x260908…260a9c Dummy {f00=0x00be, f01=0x0190, f02=»ATA /01F90 ? DATA DWFD01 @ DATA /02FA0 @ , DATA DWFD01 @ L DATA /03FB0 @ b DATA DWFD01 @ TC04E EQU * @ !!EN @ ASM /S @ KPF /O @ KPF /S @ SCR @ LED MONTAB @
0x260a9c…260c30 Dummy {f00=0x00be, f01=0x018e, f02=»24 @ !!DL 027 A !!DL 029 A !!DL 030 A * !!DL 031 A : !!DL 032 A J !!DL 033 A Z !!IL 47 A j **** A z DATA CTAB01 A DATA CTAB02 A DATA CTAB03 A DATA ITAD A !!DL 049 A !!DL 052 A !!DL 055 A
0x260c30…260dc4 Dummy {f00=0x00be, f01=0x0076, f02=» SCR B ASG /02,LP0F B SCR B $ INC SYSTAB B 0 LKE M B B KPF /L,M:92NA B P ASG /E0,TY10 B f **** A z DATA CTAB01 A DATA CTAB02 A DATA CTAB03 A DATA ITAD A !!DL 049 A !!DL 052 A !!DL 055 A
0x260dc4…260f58 Dummy {f00=0x00be, f01=0x2008, f02=» C B ASG /02,LP0F B SCR B $ INC SYSTAB B 0 LKE M B B KPF /L,M:92NA B P ASG /E0,TY10 B f **** A z DATA CTAB01 A DATA CTAB02 A DATA CTAB03 A DATA ITAD A !!DL 049 A !!DL 052 A !!DL 055 A
0x260f58…2610ec Dummy {f00=0x00be, f01=0x0190, f02=» O N Z_ (@P B ] ] N " T : N "0 :d HF R _ 0" 1 V " 2 P W X }T 9 ~T 5 aR = _X = R 0" ZZ_" pR GH V 0" 1 V " 2 P W X {T * =
0x2610ec…261280 Dummy {f00=0x00be, f01=0x0190, f02=» ( Z 0 O ( B : C ( : O N T B O N - O N N " P N " O N " P N " O W B H, : C C C ( :H Q ( P _@
0x261280…261414 (2, 10) Opaque[0x194]
0x261414…2615a8 # DirEnt {nam=»TCLASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x17e0, f03=0x0000}
0x261414…2615a8 IdxSect {
0x261414…2615a8 f00 = 0x00bf // 0x261414 @0x0
0x261414…2615a8 f01 = 0x0002 // 0x261416 @0x2
0x261414…2615a8 gno = [ // 0x261418 @0x4
0x261414…2615a8 [0x00]: C0x00bf.0x0.0
0x261414…2615a8 ]
0x261414…2615a8 }
0x2615a8…26173c Dummy {f00=0x00bf, f01=0x0190, f02=» 2 P IDENT TCLASS REL 9.2 79-11-16 870105040920 P : P* B P* L P ENTRY TCLASS V P* l P* v P EXTRN DVKB00 P EXTRN DVDY00 P EXTRN DVKB01 P EXTRN DVTP01 P
0x26173c…2618d0 Dummy {f00=0x00bf, f01=0x0190, f02=» DVGP03 P* P* P* $ P* . PTCLASS DATA TCLASE-* 8 P DATA TC00 T P DATA TC01 r P DATA TC02 P DATA TC03 PTCLASE EQU * PTC00 DATA TC00E-* P
0x2618d0…261a64 Dummy {f00=0x00bf, f01=0x0190, f02=» * PTC01 DATA TC01E-* P DATA /0020 0 P DATA DVKB01 P P DATA /0030 p P DATA DVTP01 P DATA /0231 P DATA DVTP01 P DATA /0132
0x261a64…261bf8 Dummy {f00=0x00bf, f01=0x4188, f02=» DATA TC02E-* P DATA /0020 P DATA DVKB02 > P DATA /0040 ^ P DATA DVDI02 ~ P DATA /0050 P DATA DVDY02 PTC02E EQU * PTC03 DATA
0x261bf8…261d8c Dummy {f00=0x00bf, f01=0x2008, f02=» NT TCLASS * * $ * . ENTRY TCLASS 8 * N * X * b * l * v * * TCLASS DATALTCLASE-* TCLASE EQU * END @ 1 INTLT2 INTRT1
0x261d8c…261f20 Dummy {f00=0x00bf, f01=0x0000, f02=»
0x261f20…2620b4 (2, 11) Opaque[0x194]
0x2620b4…262248 # DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x17e8, f03=0x0000}
0x2620b4…262248 IdxSect {
0x2620b4…262248 f00 = 0x00bf // 0x2620b4 @0x0
0x2620b4…262248 f01 = 0x0098 // 0x2620b6 @0x2
0x2620b4…262248 gno = [ // 0x2620b8 @0x4
0x2620b4…262248 [0x00]: C0x00bf.0x1.0
0x2620b4…262248 [0x01]: C0x00bf.0x2.0
0x2620b4…262248 [0x02]: C0x00bf.0x3.0
0x2620b4…262248 [0x03]: C0x00c0.0x2.0
0x2620b4…262248 [0x04]: C0x00c0.0x3.0
0x2620b4…262248 [0x05]: C0x00c1.0x0.0
0x2620b4…262248 [0x06]: C0x00c1.0x1.0
0x2620b4…262248 [0x07]: C0x00c1.0x2.0
0x2620b4…262248 [0x08]: C0x00c1.0x3.0
0x2620b4…262248 [0x09]: C0x00c2.0x0.0
0x2620b4…262248 [0x0a]: C0x00c2.0x1.0
0x2620b4…262248 [0x0b]: C0x00c2.0x2.0
0x2620b4…262248 [0x0c]: C0x00c2.0x3.0
0x2620b4…262248 [0x0d]: C0x00c3.0x0.0
0x2620b4…262248 [0x0e]: C0x00c3.0x1.0
0x2620b4…262248 [0x0f]: C0x00c3.0x2.0
0x2620b4…262248 [0x10]: C0x00c3.0x3.0
0x2620b4…262248 [0x11]: C0x00c4.0x0.0
0x2620b4…262248 [0x12]: C0x00c4.0x1.0
0x2620b4…262248 [0x13]: C0x00c4.0x2.0
0x2620b4…262248 [0x14]: C0x00c4.0x3.0
0x2620b4…262248 [0x15]: C0x00c5.0x0.0
0x2620b4…262248 [0x16]: C0x00c5.0x1.0
0x2620b4…262248 [0x17]: C0x00c5.0x2.0
0x2620b4…262248 [0x18]: C0x00c5.0x3.0
0x2620b4…262248 [0x19]: C0x00c6.0x0.0
0x2620b4…262248 [0x1a]: C0x00c6.0x1.0
0x2620b4…262248 [0x1b]: C0x00c6.0x2.0
0x2620b4…262248 [0x1c]: C0x00c6.0x3.0
0x2620b4…262248 [0x1d]: C0x00c7.0x0.0
0x2620b4…262248 [0x1e]: C0x00c7.0x1.0
0x2620b4…262248 [0x1f]: C0x00c7.0x2.0
0x2620b4…262248 [0x20]: C0x00c7.0x3.0
0x2620b4…262248 [0x21]: C0x00c8.0x0.0
0x2620b4…262248 [0x22]: C0x00c8.0x1.0
0x2620b4…262248 [0x23]: C0x00c8.0x2.0
0x2620b4…262248 [0x24]: C0x00c8.0x3.0
0x2620b4…262248 [0x25]: C0x00c9.0x0.0
0x2620b4…262248 [0x26]: C0x00c9.0x1.0
0x2620b4…262248 [0x27]: C0x00c9.0x2.0
0x2620b4…262248 [0x28]: C0x00c9.0x3.0
0x2620b4…262248 [0x29]: C0x00ca.0x0.0
0x2620b4…262248 [0x2a]: C0x00ca.0x1.0
0x2620b4…262248 [0x2b]: C0x00ca.0x2.0
0x2620b4…262248 [0x2c]: C0x00ca.0x3.0
0x2620b4…262248 [0x2d]: C0x00cb.0x0.0
0x2620b4…262248 [0x2e]: C0x00cb.0x1.0
0x2620b4…262248 [0x2f]: C0x00cb.0x2.0
0x2620b4…262248 [0x30]: C0x00cb.0x3.0
0x2620b4…262248 [0x31]: C0x00cc.0x0.0
0x2620b4…262248 [0x32]: C0x00cc.0x1.0
0x2620b4…262248 [0x33]: C0x00cc.0x2.0
0x2620b4…262248 [0x34]: C0x00cc.0x3.0
0x2620b4…262248 [0x35]: C0x00cd.0x0.0
0x2620b4…262248 [0x36]: C0x00cd.0x1.0
0x2620b4…262248 [0x37]: C0x00cd.0x2.0
0x2620b4…262248 [0x38]: C0x00cd.0x3.0
0x2620b4…262248 [0x39]: C0x00ce.0x0.0
0x2620b4…262248 [0x3a]: C0x00ce.0x1.0
0x2620b4…262248 [0x3b]: C0x00ce.0x2.0
0x2620b4…262248 [0x3c]: C0x00ce.0x3.0
0x2620b4…262248 [0x3d]: C0x00cf.0x0.0
0x2620b4…262248 [0x3e]: C0x00cf.0x1.0
0x2620b4…262248 [0x3f]: C0x00cf.0x2.0
0x2620b4…262248 [0x40]: C0x00cf.0x3.0
0x2620b4…262248 [0x41]: C0x00d0.0x0.0
0x2620b4…262248 [0x42]: C0x00d0.0x1.0
0x2620b4…262248 [0x43]: C0x00d0.0x2.0
0x2620b4…262248 [0x44]: C0x00d0.0x3.0
0x2620b4…262248 [0x45]: C0x00d1.0x0.0
0x2620b4…262248 [0x46]: C0x00d1.0x1.0
0x2620b4…262248 [0x47]: C0x00d1.0x2.0
0x2620b4…262248 [0x48]: C0x00d1.0x3.0
0x2620b4…262248 [0x49]: C0x00d2.0x0.0
0x2620b4…262248 [0x4a]: C0x00d2.0x1.0
0x2620b4…262248 [0x4b]: C0x00d2.0x2.0
0x2620b4…262248 ]
0x2620b4…262248 }
0x262248…2623dc Dummy {f00=0x00bf, f01=0x0190, f02=» J F IDENT MONTAB REL 9.2 79-11-16 870105040920 F B MONTABK SPDLCI FREQUE PAGQUE INTLT1 INTLT2 INTLT3L INTLT4 R & " INTRT1 INTRT2 INTRT3 INTRT4 MONTABK FREQUE PAGQUE INT
0x2623dc…262570 Dummy {f00=0x00bf, f01=0x4154, f02=» INTRT4 SYSLOD CTAB01L $ CTAB02 6 * & H CTAB03 v ITADN KBAD3 TPADN GPADN DIADN DYADN , (
0x262570…262704 Dummy {f00=0x00bf, f01=0x0190, f02=» J F IDENT SYSTAB REL 9.2 79-11-16 870105040920 F B SCTMSZK SCTSFA SCTEFA SCTPLD SCTANO SCTADA SCTPAGL SCTSEG R F B SCTSWB SCTNOS SCTNOP SCTPSZ SCTMMC SCTLACL SCTMMP SCTLAP F B SCTNPE SCTSTB SCTOPT SCTTCT
0x262704…262898 Dummy {f00=0x00bf, f01=0x0190, f02=»:PA PAG:SB SWB:NC SWB:DS SWB:ELS SWB:NS0 z T:ACSB 4 SEG:ST F SEG:DSL Z SEG:EL n SEG:PBI PAG:QF PAG:QBV PAG:PA PAG:SB SWB:NC SWB:DS
0x262898…262a2c Dummy {f00=0x00bf, f01=0x018e, f02=» IHSOP . IH1501W > IH1502 P CHLT1 b IHFDN r CHRT1 , ( CHRT2 , ( ! , ( 1
0x262a2c…262bc0 Dummy {f00=0x00bf, f01=0x0190, f02=» , ( a , ( q 4 HALTN d t SCTMSZK SCTSFA SCTEFA SCTPLD SCTANO SCTADA S
0x262bc0…262d54 (2, 12) Dummy {f00=0x00bf, f01=0x0190, f02=» SCTPSZ SCTMMC SCTLACL 0 SCTMMP D SCTLAP X SCTNPE l SCTSTB SCTOPT SCTTCT SCTCDT SCTBUG~ SCTDMT , (
0x262d54…262ee8 Dummy {f00=0x00bf, f01=0x4062, f02=» _ , L@ ^ X SCTNPE l SCTSTB SCTOPT SCTTCT SCTCDT SCTBUG~ SCTDMT , (
0x262ee8…26307c Dummy {f00=0x00bf, f01=0x0190, f02=» J F IDENT TDISP REL 9.2 79-11-16 870105040920 8 4 TDISP MEXIT DISIOE DISEND DISQUE PRUNY RETUR8 R DISQUE PRUNY RETUR8 MEXIT EXITN DISIOE TENDIO
0x26307c…263210 Dummy {f00=0x00bf, f01=0x4130, f02=» (X0 @ P T x * & @ = M ]@ , ) A P P Y TTB:SA` F , ( W B U ( ) 5 > X TTB:PWN TTB:MT , ( q$$ > [ [ Z Z Z ? Z > W 9P O
0x263210…2633a4 Dummy {f00=0x00bf, f01=0x0190, f02=» J F IDENT LRPINT 9.2DK 1 79-11-16 870105040920 J F " IHLKM LKM030 LKMRQE LKMERR LKMQDI IHRTC TIMQUE@ MONCLO IHPFARC R INIFLG IHLKM INTSAV PRUNN TTB:SA , ( A$ A
0x2633a4…263538 Dummy {f00=0x00bf, f01=0x0190, f02=» SWL48 , ( 5 $P c P W P A LKMAL @ , ( Q V ( U P @ V P LKMERR x HALTN LKMRQE ~ * & mD L W @ U LKMQDI QTJOB
0x263538…2636cc Dummy {f00=0x00bf, f01=0x0190, f02=» A Q | , ( _0 A < Q P Q Z MONCLO L MEXIT ` , ( Y _ 8 p FREBLK0 , ( Q Z P 0 9 _ TIMQUE@ , , ( @ _,
0x2636cc…263860 Dummy {f00=0x00bf, f01=0x40f4, f02=» OA @ 0 ) A _ 6 6 A PFINIT 0 k$ > A _ B H D ! . %T 5P ;P ?W: EP, SV cP" iV qW * Q * Q b , ( , P ; ^ KQ v @ ( @ _,
0x263860…2639f4 (2, 13) Dummy {f00=0x00bf, f01=0x0190, f02=» J F IDENT TPROC REL 9.2 79-11-16 870105040920 * & TWAIT TEXIT TACTOT TPAUSE TMWAIT R FNDDWT TWAIT DWTWAT TEXIT EXITN TDISP * & @ P "R Y W
0x2639f4…263b88 Dummy {f00=0x00bf, f01=0x018a, f02=» P n TPAUSE TMWAIT 6 " DWTST 6 , ( 1@ _ <U "R P F DWTTAB v , ( MD@ X R X T X T . T , ( g G Y6 G _b P LKMRQE LKMQDI
0x263b88…263d1c Dummy {f00=0x00bf, f01=0x4008, f02=»@ n TPAUSE TMWAIT 6 " DWTST 6 , ( 1@ _ <U "R P F DWTTAB v , ( MD@ X R X T X T . T , ( g G Y6 G _b P LKMRQE LKMQDI
0x263d1c…263eb0 Dummy {f00=0x00bf, f01=0x0190, f02=» J F IDENT MSUBS REL 9.2 79-11-16 870105040920 D @ SAVE8 QTJOB QMJOB ACTOT ACTOTP EXITY GETBLK FREBLKL FNDDWT R H D ! FNDTID PFINIT SWL48 SWLXY ILLINT INTSAV@ HALTY IHRET8 IHRET2 IHRET1 IHRTN SAVE8
0x263eb0…264044 Dummy {f00=0x00bf, f01=0x0190, f02=»P T I v QMJOB J TTMJOB ( ACTOTP T : , ( ; R $ 5 % > ? W ? N ACTOT ~ TTB:SA , ( Y $ W ? T T U U U TTB:ID TTB:SB, , ( s H U
0x264044…2641d8 Dummy {f00=0x00bf, f01=0x0190, f02=» T P 0 U z GETBLK FREQUE . , ( _t ? @ T @ FREBLKL p * & 0 A 1 Q Q > > 0 @ FNDDWT TTB:TD , ( 1 A P P > ?
0x2641d8…26436c Dummy {f00=0x00bf, f01=0x0190, f02=»W > _& @ 8 | * & K R Y T ? X D T FNDTID | J SCTTCTD ^ * & e W > _& W > 8 X W ? ` p , ( @ @ P $ H W IHRET8 IHRET2 IHRET1
0x26436c…264500 Dummy {f00=0x00bf, f01=0x4154, f02=» , ( > _ > ? _ > > ? ^ INTSAV@ 4 ILLINT H HALTY , ( ! Y ^ _ ? n A. H D ! 4 $ 1P ;R SW [W gT$ T P T R" #T < 8 3T> 9
0x264500…264694 (2, 14) Dummy {f00=0x00c0, f01=0x0190, f02=» J F IDENT TTMJOB REL 9.2 79-11-16 870105040920 F B TTB:LAK TTB:MT TTB:SB TTMJOB TTB:QL TTB:ID TTB:STL TTB:PP R TTB:PW TTB:SA TTB:TD , ( $ ( , 0 4 8 < TTB:LAK TTB
0x264694…264828 Dummy {f00=0x00c0, f01=0x40ac, f02=» TTB:PW TTB:SA , ( ! #M 1 & TTB:TD ( V A j K L @ A TTB:TD , ( $ ( , 0 4 8 < TTB:LAK TTB
0x264828…2649bc Dummy {f00=0x00c0, f01=0x0190, f02=» J F IDENT TOSSIO REL 9.2 79-11-16 870105040920 H D !dTIO TENDIO DC:MIN DC:MOT MONMMU ECBFC ECBBA ECBRL ECBEL ECBRC R D @ ECBCW ECBCW2 BUFLENA ACTADRA ABTADR INTADR` POLADR RECADR F B ECHADR DC:DIXV DM:DIX PC:DIX8
0x2649bc…264b50 Dummy {f00=0x00c0, f01=0x018e, f02=»UEC# DWTMEC DWTA2 DWTA3 DWTA4 DWTA5 DWTSB1 z * & DWTSB2f DWTTP DWTECHj DWTSQ DWTVOLW 4 DWTCHP b DWTST v DWTBC DWTECB DWTOR DWTOCH DWTADR DWTTAB DWTWAT
0x264b50…264ce4 Dummy {f00=0x00c0, f01=0x0190, f02=» DWTA4 DWTA5 DWTSB1 , DWTSB2f " @ DWTTP $ T DWTECHj & f DWTSQ 0 z DWTVOLW 0 BUFLENA ACTADRA ABTADR INTADR` POLADR R
0x264ce4…264e78 Dummy {f00=0x00c0, f01=0x0190, f02=» IT:DIX ECBFC ECBBA & ECBRL 8 ECBEL J ECBRC ECBCW n ECBCW2 , ( MONMMU $ , ( ! $ ( , 0 4
0x264e78…26500c Dummy {f00=0x00c0, f01=0x018e, f02=»P l TDISP FNDDWT |TIO . , ( yI U XH > TTB:ID n , ( D #DP @ R XV Y TIODM , ( @ P T W X &P TTB:PW , (
0x26500c…2651a0 Dummy {f00=0x00c0, f01=0x0190, f02=» , ( - x '? Y T Y GETBLKP 4 QTJOB F , ( K W Y T # P W V , ( g Y P R R P P (@ (@ , ( " 2 X $? P $ > > , (
0x2651a0…265334 (2, 15) Dummy {f00=0x00c0, f01=0x0190, f02=» F :c" v TTB:MTE , ( ' H :b"? #" : C > B R ( , ( E Q P B P X , ( e 0$ T # R Q > , ( X B U H Q X D B , ( $ T C x > C
0x265334…2654c8 Dummy {f00=0x00c0, f01=0x0190, f02=» U H B P P $ # , ( # Q > P * , ( C _0 # T p > P p (_H Z , ( c _2 B U DC:MOT , ( X > ? _ X T DC:MIN
0x2654c8…26565c Dummy {f00=0x00c0, f01=0x0190, f02=» Q M r , ( X D ( * & ) 1 > _" X X T B TTMJOBP p MEXIT QMJOB , ( B = U . TENDIO b , ( U@ Y _| ?(@
0x26565c…2657f0 Dummy {f00=0x00c0, f01=0x0190, f02=» 1 1 X P - M T , ( @ $ P _ T " # ( , ( p X L R P P (@ X , ( @ ^ X P P # P , ( ' @ T P 0P 1 FREBLK ACTOTPN
0x2657f0…265984 Dummy {f00=0x00c0, f01=0x4154, f02=» x UW cP uP P P, T W P T T W4 GT MW UT H D ! YP ]W mP sR uP { }P Q P GQ~ QP0 WP* mT yQL } B H D ! U( Q2 T V b UJ P PL +Q 1P KT SP U T Rl H D ! U Q0 b sP& P P T T P PD
0x265984…265b18 Dummy {f00=0x00c0, f01=0x018e, f02=» J F IDENT SYSLDM REL 9.2 79-12-20 870105040920 SYSLDMK R SYSLDMK d SCTSFA x SYSBAS SCTEFA TCLASSV , ( I A SCLASS SAV
0x265b18…265cac Dummy {f00=0x00c0, f01=0x0190, f02=» f , ( K , P , - 4 ] CMPADR 8 SCTOPT: J , ( i @ 4 Y 5 X SAVE01f * & * _6 : @ TTMJOB SCTDMT , ( " ]
0x265cac…265e40 Dummy {f00=0x00c0, f01=0x0190, f02=» . !TTP @ NXTBLK $ , ( T Y " !TTX" 6 SCTTCTW f , ( B$ A 9 A $ : @ $ x SCTDMI , ( %B @ P @ &" P #D " , ( A P #E " P #F
0x265e40…265fd4 (2, 16) Dummy {f00=0x00c1, f01=0x0190, f02=»9B @ @ z * & T : SCTDML@ F SAVE04 X , ( @ (:B W * . !TTP j SAVE19E SAVE16E , ( W , N =H N W SAVE17T , (
0x265fd4…266168 Dummy {f00=0x00c1, f01=0x0190, f02=»W @ % P , ( Y P " U $ , ( w _2 T , ( P " U , ( _2 , ( A V * V ,P S
0x266168…2662fc Dummy {f00=0x00c1, f01=0x0190, f02=» % P p , ( 7 W @ % P " !TTT bREL @ , ( @ S 6 @ @ T N , ( m : @ ! ~ SCTADA SCTLAC PRGLG1 , ( $ P @ 8 @ : < CR
0x2662fc…266490 Dummy {f00=0x00c1, f01=0x0190, f02=» h , ( @ !RRP @ ! T , ( 3 @ & P 3 8 , ( 3 YL @ @ h , ( 1 T : FREQUE SCTBLK , ( K @ B ` $ @
0x266490…266624 Dummy {f00=0x00c1, f01=0x0190, f02=» @ T p , ( : P , ( H S S _ : . ! @ , ( TTP V W , p * & * P , ( _ SAVE03N
0x266624…2667b8 Dummy {f00=0x00c1, f01=0x0190, f02=» H I K T , ( } + Y@ V 0 _j V , , ( Y " !TTX @ @ T P * & : , ( $ @ R @ , ( T P
0x2667b8…26694c Dummy {f00=0x00c1, f01=0x0190, f02=» W , P W N SAVE14G , ( K ( W P 0 , ( g G =h G V P V < ` , ( V N P W N _B V , ( $ W V , Yr " !TTX @ , ( @ T
0x26694c…266ae0 Dummy {f00=0x00c1, f01=0x0190, f02=» $ $ , ( % _. P V 4 SCTDCTN P , ( C U $ $ _. b , ( aH @ R @ @ ! P V SCTDMC SCTCDT * & y 8 8 8 @ T>B
0x266ae0…266c74 (2, 17) Dummy {f00=0x00c1, f01=0x018e, f02=» V t , ( N _2 U V * & 8 8 8 4 D P B , ( ! L @ # P H I p , ( = K T + Y@ _`R , ( ]H @ @ R @ % P V , ( u
0x266c74…266e08 Dummy {f00=0x00c1, f01=0x0190, f02=» * & V Z @ 0 V SAVE072 6 , ( P _ W ^ $ q > R H DWTECH x * & P >b W >b & 8P D P U SYSLOD , ( ` E W b V W R 9 , ( W
0x266e08…266f9c Dummy {f00=0x00c1, f01=0x0190, f02=» V j , ( o ^ -W H P U ` I @ % , ( P H I H T P H : , ( U V FU W j , ( F H < + + P , ( @ V : V X $ * & F !
0x266f9c…267130 Dummy {f00=0x00c1, f01=0x0190, f02=» W R _ $ SAVE21S ( , ( qD W Z : W 4 f : SAVE23I j , ( @ h | , ( *T P _ / P , ( *_ *T P _ .P
0x267130…2672c4 Dummy {f00=0x00c1, f01=0x0190, f02=» _ V 4P V f ] ~ , ( ; jW f P _ @ , ( U @ T N , ( o @ : N =H N 2 : N =H N ~ , ( 2 : &=H F 2 : F =H , ( F 2 : F =H F 2 :
0x2672c4…267458 Dummy {f00=0x00c1, f01=0x0190, f02=» ! n , ( P (W ( : ~ F , ( = v @ : < > , ( Y CRT @ ! P ` : @ E "W n SYSLDA * & sH ` : @ E " l H D !p P # N / N G &
0x267458…2675ec Dummy {f00=0x00c1, f01=0x0190, f02=» g uU P0 U PJ 5P ;W CP QT kT P T H D ! PP P T P 3T [P _ g {V T P H H D !m P r P ! )Ph 1 OP$ _P T R T P T H D ! * 7 r ? CPT Y a i P T
0x2675ec…267780 Dummy {f00=0x00c1, f01=0x410e, f02=» P W P P W V W R W 3P@ AT@ x H D ! GP cP sW yP PD P( U P T !WR %T /W, 3T ?W ET QW 4 H D ! cR T P P T P$ P U P W 'P 3P =W IP [T P ( $ T P P P !W [T" cP qW @
0x267780…267914 (2, 18) Dummy {f00=0x00c1, f01=0x0190, f02=» J F IDENT SYSLDA REL 9.2 79-12-21 870105040920 D @ JUMPY SYSLDA dREL LDALEN MOVEY ERROR CMPADR NXTBLKL NXTCOM R F B CONVRT GETNUM MMTAB TABBE MMEND MMDDIV BUFSIZ` SYSBUF M:REL F B SAVE01 SAVE120 SAVE03 SAVE04 S
0x267914…267aa8 Dummy {f00=0x00c1, f01=0x0190, f02=»9( SAVE20 SAVE21 SAVE22 SAVE23F SAVE24V x SAVE25 2 |REL D $ W W " T , ( 1 ; Z [ : : [ [ | SYSLDMP JUMPY , ( Q : SAVE0
0x267aa8…267c3c Dummy {f00=0x00c1, f01=0x0190, f02=»AVE08 , ( o SAVE09 @ SAVE10 T SAVE11 h SAVE120 | SAVE13D SAVE22 SAVE25 M:REL SYSBUF BUFSIZ` , (
0x267c3c…267dd0 Dummy {f00=0x00c1, f01=0x0190, f02=» p SAVE18 r SAVE19( t SAVE20 n 2 SAVE21 v F SAVE23F z Z SAVE24V | n MMDDIV MMTAB TABBE MMEND , (
0x267dd0…267f64 Dummy {f00=0x00c1, f01=0x0190, f02=» U R $ )_ : , ( ? W W W W W $ , ( _ Q V V v x W T , ( V V v p R W V , ( W ^< _@ V _P V , ( V : V
0x267f64…2680f8 Dummy {f00=0x00c1, f01=0x0190, f02=»:K W r t , ( ? Q R t , ( _ V > v : D , ( V W V ) : V t , ( <B W |P v v , ( : $ V |P v w , (
0x2680f8…26828c Dummy {f00=0x00c1, f01=0x0190, f02=» , ( ? <B V x V |P v , ( _ 1 v W V z ` _f V 4 , ( : W R R P W x d , ( @ _ V : " D P , ( W V P $;A^ D E D , ( P V
0x26828c…268420 Dummy {f00=0x00c1, f01=0x0190, f02=» ;B " , ( _ R P |P v $ CMPADR T , ( v : V W 0 : h , ( V P 9a _ " ( ) 8 ( ) , ( : " $ V P 9A _ 0 : W , ( W W ?A
0x268420…2685b4 (2, 19) Dummy {f00=0x00c1, f01=0x018e, f02=» j SAVE8 , ( = 0 H W : ? ? SCTLAC J , ( ] R 0 ACTOT RETUR8P , ( y R P P B _ : , ( V ) v : 4P
0x2685b4…268748 Dummy {f00=0x00c1, f01=0x0190, f02=» , ( ` V b pP , ( ` $ $ W H 4 , ( @ - L ) P _ " = d , ( E M D 4 Q _d * L , ( P m > = G V W , ( $ V E
0x268748…2688dc Dummy {f00=0x00c1, f01=0x0190, f02=» @ @ x SCTPAG SCTNOPN * * & ! @ < , ( P P P P _ _ j SCTPSZ , ( D @ 9N @ :b @ :b , ( / V W U
0x2688dc…268a70 Dummy {f00=0x00c1, f01=0x0190, f02=» l SCTSEG , ( A A 9n A :B A , ( D @ .V N PAGQUE ~ , ( 3 S Y& P , ( S P , ( 3 _
0x268a70…268c04 Dummy {f00=0x00c1, f01=0x0190, f02=» @ W A & TDISP & , ( k : A ( > 6 , ( @ l : R W n f , ( V pT : N V l W H V ]" , ( " . nT W v W , ( D n V ~P
0x268c04…268d98 Dummy {f00=0x00c1, f01=0x0190, f02=» v G G v U , ( i v G v : P V & , ( : V ~P W x V , ( _$ 8 V V x % V v % : V , ( V > 9k! , ( P % _ V V W W
0x268d98…268f2c Dummy {f00=0x00c1, f01=0x018e, f02=» f v ) G v , ( g v ` " W p W ~ pP , ( @ R P _ W ~ R F , ( $ X4 _ ` @ ` W v , ( P W ~ pP V W , ( % R , , (
0x268f2c…2690c0 Dummy {f00=0x00c1, f01=0x0190, f02=» f , ( c P * I W z ` p , ( P H - V I 8 , ( " R E R T h , ( E D E @ v H v , ( E > #_v W | , ( ;b W
0x2690c0…269254 (2, 20) Dummy {f00=0x00c2, f01=0x0190, f02=» , ( A 0 :C # : .=H N , ( D a : .=H N : 4 GETNUM d , ( N : d 8" x SYSLDA , ( BR _ ZY QY : $ @ , ( V H W z W | CR
0x269254…2693e8 Dummy {f00=0x00c2, f01=0x0190, f02=» !TTP N x , ( 3 :H N TBT W W 2 " T , ( S @ N =H N H , ( s : @ ) T !TTXX !CCT x , ( @ X !UUT d W , ( 2 .:H N P V , (
0x2693e8…26957c Dummy {f00=0x00c2, f01=0x0190, f02=» h , ( / :b / W , ( O : W @ W D 8 , ( k V W W ` " h , ( W p @ pP " , ( 4X 1 R , ( @Z0
0x26957c…269710 Dummy {f00=0x00c2, f01=0x0190, f02=» W V V >k 8 W , ( G W t V V : ( g x X H D ! W> 2 0 . 1 2 C S Y j V !W %U 1R g iQ@ R( l H D !e P z V U z V z M OQ QR ] _V V W V H D !
0x269710…2698a4 Dummy {f00=0x00c2, f01=0x4152, f02=» , P H D ! P P P P| ?V CW GU6 QT WW aP iP( mP qV uW yU H D ! Q P P V P4 P 7 B W x [ R T T" P %V X H D ! 0 3P _U {P V P P P0 P Pn /P 3 B = B AW GT eP Pl H D ! T R P R 'P
0x2698a4…269a38 Dummy {f00=0x00c2, f01=0x0190, f02=» J F IDENT LDTASK REL 9.2 79-12-06 870105040920 6 2 LT:DSKK LT:SWB TTABLD QLTDSK QLTSWB PQEMTY R PQEMTY TTABLD , ( #L 1
0x269a38…269bcc Dummy {f00=0x00c2, f01=0x0190, f02=»AGQUEA , ( @ A ( @ PAG:QB > PAG:SB P * & % X H A ) @ H b TTB:MT , ( = D P 1 % E I L TLDS20 SEG:EL * & U U
0x269bcc…269d60 Dummy {f00=0x00c2, f01=0x0190, f02=»CW , ( ( C 9b;BT SCTLAP : ECBBA L SCTPLDT , ( " C 0 @ # n * & W C U R C , ( W C R # R , ( _8
0x269d60…269ef4 (2, 21) Dummy {f00=0x00c2, f01=0x4152, f02=»TB:SBH * & ) HT :" U U ( F QLTSWB X < , ( A M 0 - A Q '_D P QLTDSK ^ ACTOT LKMERR LT:SWB j & " Y W * , D @ @4 V ?P T
0x269ef4…26a088 Dummy {f00=0x00c2, f01=0x4114, f02=» J F IDENT DWII01 REL 9.2 79-11-16 870105040920 DWII01K R DWII01K d ITADN x , ( IT:BUF @ , ,
0x26a088…26a21c Dummy {f00=0x00c2, f01=0x4114, f02=» J F IDENT DWIO01 REL 9.2 79-11-16 870105040920 DWIO01K R DWIO01K d ITADN x , ( IT:BUF @ , ,
0x26a21c…26a3b0 Dummy {f00=0x00c2, f01=0x4106, f02=» J F IDENT DW1501 9.2DK 1 81-11-05 870105040920 DW1501K R DW1501K d DC15AD x , ( DC @ 0 $ 0 @
0x26a3b0…26a544 Dummy {f00=0x00c2, f01=0x0190, f02=» J F IDENT DRKB03 REL 9.2 79-11-16 870105040920 KBAD3 R KBAD3 b DWTST t * & @ 2 ( ? X V Y TDISP LDREGE , ( ! W Y , (
0x26a544…26a6d8 Dummy {f00=0x00c2, f01=0x0190, f02=» W t SETIMP , ( ` Y X " P :A & * & : R Q W Y <D X V , ( ? ?: T p > > , ( P P C B T , ( B % X . $ 4 T
0x26a6d8…26a86c Dummy {f00=0x00c2, f01=0x018e, f02=» , ( Y _` B P $$ R % C , ( y * ! W Y +P Y *P Y ( 4 , ( P Y )P R _Q P OR d , ( R W " ! B W W , ( @ 0 Z ! B Z Z& , ( X . 0
0x26a86c…26aa00 Dummy {f00=0x00c2, f01=0x0190, f02=» DISEND , ( OA Y C ! " * & i @ Q R X # P X R ;GV X J LDREG x , ( @ P y P X DWTA3 DWTSB2 , ( @ R ;GV X X , *
0x26aa00…26ab94 (2, 22) Dummy {f00=0x00c2, f01=0x0190, f02=» h , ( :d Y > > ? 8 R @R , ( ) V @% =cW R P R P R P W 8 , ( I 9 W $ P W _ $ P h , ( i _$ _*_, _ %0=c X , ( 0P > 0 > >_ B 1 >
0x26ab94…26ad28 Dummy {f00=0x00c2, f01=0x417c, f02=» @ @ T T ! & 'T /P f H D ! 3 R 7 AV E OP _P$ kR { W PH P> P P R Q " H D ! P R R W Wr W T W P 'W 1P 9 IP g kQf n H D ! mR$ uP {R6 V2 P P8 R2 V. P T W T T W H D !
0x26ad28…26aebc Dummy {f00=0x00c2, f01=0x0190, f02=» J F IDENT DRTP02 REL 9.2 79-11-16 870105040920 TPADY R TPADY b , ( d t DWTOR , ( ! !"&';<>@^_ 9: X ! Y DISIOE DWTBC , (
0x26aebc…26b050 Dummy {f00=0x00c2, f01=0x0190, f02=» , ( w ! W B W B L , ( # 9Q T W Q P X & V 8 DWTST h ECBRL x , ( T Y &W X ! T B , ( R Q B D ! V ! ! * & ! W ! !
0x26b050…26b1e4 Dummy {f00=0x00c2, f01=0x0190, f02=» , ( 5 T " T W Q " T ) ! , ( Q Y _ ! ! Y 8 , ( m @ &P Q W ! Y '" h * & _" _< ! _n ! _t B B , ( , ! T _ D ! , ( P ! P
0x26b1e4…26b378 Dummy {f00=0x00c2, f01=0x0190, f02=»T ! L ,! :D" ! Y , ( 7 Y U ! _$ W , & ECBRC V , ( Q ! T ,' ! R !__U f , ( qHD C X ' W Y ! LDREG , ( _ X R U T X
0x26b378…26b50c Dummy {f00=0x00c2, f01=0x0190, f02=»SP , ( @ B R _ , ( 4 ! ! ! " T : , ( "" ! ! ! ! j * & % 4 X ' 4 Y ' ! ! ( $ A @ " P ,$ , ! 4 H D ! 4 IP
0x26b50c…26b6a0 Dummy {f00=0x00c2, f01=0x40d6, f02=» 9T =T ?W CQ GT Q , i oP qQ wW , T P P H D ! @ W V P RN Q PH P R: T2 3 =U MW4 UT gR mU {W H ( $ RT U TJ P T R T EP X @ P ,$ , ! 4 H D ! 4 IP
0x26b6a0…26b834 (2, 23) Dummy {f00=0x00c2, f01=0x0190, f02=» J F IDENT DRGP01 REL 9.2 80-01-03 870105040920 GPADY ECHOGP R GPADY j , ( !"$&;<>@^_ P | DISIOE OUTPUT , ( ! P B P B L # +P ! , ( ?
0x26b834…26b9c8 Dummy {f00=0x00c2, f01=0x0190, f02=» Y , ( U P T Y &_. P R P , ( @ O]> V _F T Y Y & V P , ( @D Y _^ C _P " DWTBC * & $ P X & X ]r ! * & Y Y
0x26b9c8…26bb5c Dummy {f00=0x00c2, f01=0x0190, f02=» X C _ X Y ~ , ( G & Y > B B U $ , ( e ! T _ U D ! T _ N LDREG ~ , ( C > X Z^<BR P j ECHOGP , ( X _x R V ! P P , (
0x26bb5c…26bcf0 Dummy {f00=0x00c2, f01=0x416a, f02=» ? X Z t , ( @ ! P P . 2 X , ( 1 " ! ! X D $ K & 6 t H D ! PB !P8 -P ;P KT _W mW P U P" T P4 H D ! R( Pj V T P - @ _U$ iT sU }T
0x26bcf0…26be84 Dummy {f00=0x00c2, f01=0x0190, f02=» J F IDENT DRDI01 REL 9.2 79-11-16 870105040920 DIADY R DIADY b , ( B 8# T $ # ;D t DISIOE` DWTST , ( ! 7P P Y W Y X , ( ?@ Y 8#
0x26be84…26c018 Dummy {f00=0x00c2, f01=0x4088, f02=»END u ? X _F @ < p J z T #P 'P 3W GT IW$ MT( WP aP gV . r@ B 8# T $ # ;D t DISIOE` DWTST , ( ! 7P P Y W Y X , ( ?@ Y 8#
0x26c018…26c1ac Dummy {f00=0x00c2, f01=0x0190, f02=» J F IDENT DRDY01 9.2DK 1 80-02-12 870105040921 DYADY ECHODY R DYADY j OUTPUT | , ( DISIOE * & !@ ! P P & , ( =
0x26c1ac…26c340 Dummy {f00=0x00c2, f01=0x0190, f02=» ! B B U , ( $ ! T _ U D ! T . GETCHR ^ , ( _ $$ X" X& X* C p , ( X`" E P 8'0P E , ( T ! T 9 _ ! T @_ ! , ( 5
0x26c340…26c4d4 (2, 24) Dummy {f00=0x00c3, f01=0x018e, f02=» DWTBC , ( X ' X ] ! , ( B ! ! ! @ , ( @ B Y & ! W 8!0T 8 !@ p , ( DP ! $ P ! ! , ( ! T Y & T X & C TENDI
0x26c4d4…26c668 Dummy {f00=0x00c3, f01=0x0190, f02=» LDREG , ( U Z2<BR J ? Y , ( o! ! T X ! Y D * & & Zl T _ ! X t ECHODY , ( $ P ! R V ECHRTN * & P P !
0x26c668…26c7fc Dummy {f00=0x00c3, f01=0x0190, f02=» X &" Y )U W ! ! , ( 1 ! Y 4 B $ * & @ K U )X R X T , ( i X &" Y * X ) V Y , ( ! X $ X & ! X * , ( H `R Y !
0x26c7fc…26c990 Dummy {f00=0x00c3, f01=0x4184, f02=» 4 * > r H D ! R d )P -P 3 9 CP SP WP. ]T oR| yR H D ! D : U4 T U T P( P TD T )T GP M Y cP ^ H D !> gR P : W T P P * T T KQ [R H D ! p wT T P
0x26c990…26cb24 Dummy {f00=0x00c3, f01=0x0190, f02=» J F IDENT DRRT01 9.2DK 1 79-11-16 870105040920 F B CHLT1 CHLT2 CHLT3 CHLT4 CHRT1 CHRT2 CHRT3 CHRT4 OUTLIN` CHLTON R H D ! OUTPUTN CHTAB LDREG LDREGE LDREGF STREG GETCHRC DWREMU LOCHAN * & RECHAN REMFC ECHRTN` ECHOY E
0x26cb24…26ccb8 Dummy {f00=0x00c3, f01=0x0190, f02=» J B t , ( B pU INTRT2 D , ( ; J BAB rU V , ( [ J B B pU , ( y J BQB rU CHTAB DWREMU
0x26ccb8…26ce4c Dummy {f00=0x00c3, f01=0x0190, f02=» P P H !@T I DISEND . CHLT1 @ INTSAV R , ( H T ! 1 U A ? d CHLT2 CHLT3 CHLT4 CHRT1 CHRT2 CHRT3 $ CHRT4
0x26ce4c…26cfe0 Dummy {f00=0x00c3, f01=0x0190, f02=» P r , ( k R P 4 ] P , ( $ P ] U P P P P B DWTST r , ( R 4T ] U X , ( "0T + Y W 8Z 4 , ( U R ] U # $P
0x26cfe0…26d174 (2, 25) Dummy {f00=0x00c3, f01=0x0190, f02=» > x , ( = W T # Y U DWTTP H , ( [ T ] W 8V X X SETIMP * & { P y W , ( P 8R R Y DWTOCHf ,
0x26d174…26d308 Dummy {f00=0x00c3, f01=0x0190, f02=» T U 5 U z , ( R " ] ;h # <c$ , ( % P X X " Z " J , ( E X 8# T 8Z V X # T z , ( c 8R X P y Y X DWTECB INTADR , ( {$@'
0x26d308…26d49c Dummy {f00=0x00c3, f01=0x0190, f02=»@ # P 4 4 P _r T _$ , ( U _ ? 4 U 5 R P . DWTOTQ ^ , ( "P R T T R X $ # X p , ( / > P P P , ( M X XF _H W ? T T , ( m
0x26d49c…26d630 Dummy {f00=0x00c3, f01=0x0190, f02=» OUTPUTN , ( @ _ " P T 8! P STREG D DWTA3 V DWTA4 f DWTA5 v , ( Y Y & Y ( Y * LDREG LDREGF LDREGE , ( _8 X XB Y
0x26d630…26d7c4 Dummy {f00=0x00c3, f01=0x0190, f02=» (@ > ?" 8' x , ( S ?A R 8;b# 4T R , ( s T T ] ] 8 W T H , ( W T ] _ P T V W 8 x , ( V T P U 8 ~ U Q , ( P X H " 5 U R " , (
0x26d7c4…26d958 Dummy {f00=0x00c3, f01=0x0190, f02=» T B P X | , ( G R @ U S ` U t " , ( g D P D T U W _ U 4XR L ECHENDT | ECHOY , ( XX 5 J_b Y & Y ( DWTECH DWTWAT , ( H$ Y * X
0x26d958…26daec Dummy {f00=0x00c3, f01=0x0190, f02=» . H D !p P Q P P T W W #W /R 5V = ` K H D !L QR Y _PJ cP i o sRL }P P P PD P< P0 P, R T ` H D ! Tp WH f R P4 R0 T T #P -P =Wh C v M _T iW H D !H( mV u v }P
0x26daec…26dc80 Dummy {f00=0x00c3, f01=0x40fa, f02=» ! 9P =P CP I B _Wj gT s wW S( V P P T P T P6 H D ! J /U =W [R kT oRT uT {T W< Tr W T P V WT V L H D ! P Q2 P R V P P #W 7T IR4 QS kP qT yW V$ V @ H( mV u v }P
0x26dc80…26de14 (2, 26) Dummy {f00=0x00c3, f01=0x018e, f02=» J F IDENT DRSOP1 REL 9.2 79-11-16 870105040920 0 , SOPCT SOPRY IHSOP DWSI01 DWSI02A DWSO01A R SOPCT , ( T 8T 9W B DISIOE SPDLCI , ( ! D 7P P
0x26de14…26dfa8 Dummy {f00=0x00c3, f01=0x0190, f02=» ECBCW ECBEL TENDIO $ , ( W"H X R C C 6 TDISP f SOPRY t v * & o ?A @ A. X DWSI01 , ( @ V 9_: DWSO01A
0x26dfa8…26e13c Dummy {f00=0x00c3, f01=0x403e, f02=» ;W GW W ]R V p (@ : X R C C 6 TDISP f SOPRY t v * & o ?A @ A. X DWSI01 , ( @ V 9_: DWSO01A
0x26e13c…26e2d0 Dummy {f00=0x00c3, f01=0x0190, f02=» J F IDENT DRFD01 REL 9.2 79-12-05 870105040920 FDADR IHFDY FDONY DWFD01 R FDADR v DWTOR , ( !P P X ! , ( Y X ! Y T & , ( ?
0x26e2d0…26e464 Dummy {f00=0x00c3, f01=0x0190, f02=» } A @ A. TDISP * , ( Y W A : , ( @ @ A. W ! * X X P ! j , ( ! W ! * _ ! * _& ! X ECBRL ECBBA , ( X P ! X X
0x26e464…26e5f8 Dummy {f00=0x00c3, f01=0x0190, f02=»TOT 0 SST z , ( i X Y W 0 X Y Y , ( ! ! X ' P ! ! J , ( @ D ) P _ X " X ! T X z ECBCW , ( $ !& P B z z :C , ( P ! 9DV !
0x26e5f8…26e78c Dummy {f00=0x00c3, f01=0x0190, f02=» A ! _ Y , ( _ 4 ! P C ! ! ! (@ , , ( ! R _ ! 1 ;h 1 , ( ! 1 ! ! * ! ! ! , ( ) ! Y # T X Y _ Y # , ( 4 ! (
0x26e78c…26e920 Dummy {f00=0x00c3, f01=0x0190, f02=»* ! ! ! T )W | , ( U W ! Xz ! ( - ! DWTA5 L , ( u ) W Y W Y Y Y Y ECBEL TENDIO * & H B S W W B C FDONY DWTA2 , (
0x26e920…26eab4 (2, 27) Dummy {f00=0x00c3, f01=0x0190, f02=» 0B. X n , ( P y _^ _n , ( Y X P Y : ! > , ( ; ! X # P Y :A , X n , ( [B A Y @ B. X Y DWTECB , ( @ u Y Y X Y X '?
0x26eab4…26ec48 Dummy {f00=0x00c3, f01=0x0190, f02=» , ( @ K & E % Y B K , ( $ X ;AR ;a X P Y 4 , ( P 7P < d * & % $ <C ! 9 4 X , ( A _ W B R X X P , ( ] W
0x26ec48…26eddc Dummy {f00=0x00c3, f01=0x018e, f02=»_ 4 X # P _ 4 TASCII " , ( @(@ R D " 1_ W (@ 4 TEBCDI0 d , ( R 0 D $ ] _ ! 4 v , ( ! ;E :B 9A ! , ( 3 U P jW kQ 4 Y , (
0x26eddc…26ef70 Dummy {f00=0x00c3, f01=0x0190, f02=» f , ( @ 4 ! ( 4 X " 4 , ( @ ! ) 4 X P 4 8 DWFD01 f h , ( g | , ( , (
0x26ef70…26f104 Dummy {f00=0x00c3, f01=0x0190, f02=»P ]Pv R H D !z& aPz g d m s y Z H H W Wx F , P | W< H D ! p F F J , P , P | !T ) * +W / * Z H D ! 3 9 ? E K O T YT cT o , qW } , * T * H D !q P
0x26f104…26f298 Dummy {f00=0x00c3, f01=0x0190, f02=»PT s w { R 4 | * H D ! T . * V J j W0 W # ) b F H D ! T - 5Q 9 F ? E | I OT SWL YWP ] e R i o j s {W. P H D ! W P L N S W W f $
0x26f298…26f42c Dummy {f00=0x00c3, f01=0x410c, f02=» f R@ & P & P P IW QRZ U , [P v H D ! aW kP sQ8 wU T, R( P Q W Q T P 0 P R 2 H D !> W R ) 3U 7 4 9P ?W EQ S * W qP R ~ ( $ k r Z P y @
0x26f42c…26f5c0 Dummy {f00=0x00c3, f01=0x0190, f02=» J F IDENT DRIC01 9.2DK 0 80-01-02 870105040920 ITADY ITABRT IT:BUF R ITADY r IT:BUF ECBCW , ( P P P .T B Y FNDTID`
0x26f5c0…26f754 (2, 28) Dummy {f00=0x00c4, f01=0x0190, f02=»R ( P H z , ( " [ R H P ' P P W T DWTSB1A H TENDIO Z ECBBA l * & y ' P ! B | TDISP , ( $ # P G W G SETIMP , (
0x26f754…26f8e8 Dummy {f00=0x00c4, f01=0x0190, f02=» U ^ 9 1_N X , ( T @ P ( A _ ( Y , ( D _ _x X T @ P ( A P , ( = _ ( Y _ _ i 9 @ ITABRT ^ , ( ] _ H P P $ DWTECB * &
0x26f8e8…26fa7c Dummy {f00=0x00c4, f01=0x4148, f02=» ECBEL , ( A F Z P U " C $ G $ 4 H H D ! ^ P & P P !T +Wx 7P =P MR ]RN eP iP oP qW< f H D !Pa wT6 { ` P P W P P R: L Q P T P 0 , 8 +T 1
0x26fa7c…26fc10 Dummy {f00=0x00c4, f01=0x0190, f02=» J F IDENT EBCDIC 9.2DK 3 82-10-05 870105040920 TASCIIK TEBCDI R TASCIIK l , ( { , ( ! , ( A BCDEFGHI#.<(+!&JKLMNOPQR$]*);^
0x26fc10…26fda4 Dummy {f00=0x00c4, f01=0x416e, f02=»89:#@'=" p , ( ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^ TEBCDI @ , ( /STUVWXYZ|,%_>?0123456789:#@'= T , ( 7- <=2&p ?' , ( ! @O JZlP}M] Nk`Ka z^L~no , ( A j {
0x26fda4…26ff38 Dummy {f00=0x00c4, f01=0x4140, f02=» J F IDENT DVTKB REL 9.2 79-11-16 870105040920 DVTKB R DVTKB b KBADN t & " KB bECH , ( !@ " ?
0x26ff38…2700cc Dummy {f00=0x00c4, f01=0x0190, f02=» J F IDENT TIMER REL 9.2 79-11-16 870105040920 TIMER SETIME SETIMP R TIMER r TDISP FNDTIDC LKMRQE , ( $ T GETBLK@ LKMQDI
0x2700cc…270260 Dummy {f00=0x00c4, f01=0x40ee, f02=» _ _< , ( S ? ^ 4 _ & TIMQUE V , ( qH @ 1 A _ P 9 h > > ( $ ~ T N : - 4 1 N 3 > P @ BLK@ LKMQDI
0x270260…2703f4 (2, 29) Dummy {f00=0x00c4, f01=0x0190, f02=» J F IDENT TMMLKM REL 9.2 79-11-16 870105040920 TCHPAGK TCHMMU TLUSEG R TCHPAGK t TTB:MTL LKMQDI TCHMMU FNDTID , ( $' "?:B ] TLU
0x2703f4…270588 Dummy {f00=0x00c4, f01=0x4060, f02=»$ T %_< z O %_B P )U /U GT . R J@ MMU TLUSEG R TCHPAGK t TTB:MTL LKMQDI TCHMMU FNDTID , ( $' "?:B ] TLU
0x270588…27071c Dummy {f00=0x00c4, f01=0x0190, f02=» J F IDENT TLDSEG REL 9.2 79-11-16 870105040920 TLDSEGK TLDS15 TLDS20 R TLDSEGK t SCTNOS LKM030 SCTSEG , ( R @ U 9C @ TTB:SB@ SEG:D
0x27071c…2708b0 Dummy {f00=0x00c4, f01=0x4114, f02=» SCTMMP SCTNPE , ( 5B@ D " @ @ - U " SCTLAP` R TTB:MT d T:ACSBN v TTB:SA * & O _ 9B @ T W X g > R U %T /W. IU j
0x2708b0…270a44 Dummy {f00=0x00c4, f01=0x0190, f02=» J F IDENT TABORT REL 9.2 79-11-16 870105040920 TABORTK R TABORTK d FNDDWT x DWTTAB DWTST , ( "R P X T X R ? DWTECH DWTADR ABTAD
0x270a44…270bd8 Dummy {f00=0x00c4, f01=0x40a8, f02=» X H x LKMQDI LKMRQE * & " I P < ( $ RT PL TF R@ V )P 7P IP f @ , ( "R P X T X R ? DWTECH DWTADR ABTAD
0x270bd8…270d6c Dummy {f00=0x00c4, f01=0x0190, f02=» J F IDENT MONTIM REL 9.2 79-11-16 870105040920 GETTIMK SETTIM R GETTIMK l MONCLO , ( @ < ? < ? <(@ , ( $ P B $ 9H C ">h # TTB:SA L
0x270d6c…270f00 Dummy {f00=0x00c4, f01=0x40b4, f02=» P ?_" = > = > = =_D , ( R _ 00 > & <h$ P * > Z ( $ !P AP gP u yP R P r @ , ( $ P B $ 9H C ">h # TTB:SA L
0x270f00…271094 (2, 30) Dummy {f00=0x00c4, f01=0x0190, f02=» J F IDENT TASS REL 9.2 79-11-16 870105040920 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 TASMXAP T
0x271094…271228 Dummy {f00=0x00c4, f01=0x0190, f02=» TASCVOC TASVOL TASCXO 0 TASSEX D , ( X TASXLB $ TASFDB 4 TASVRL 6 TASVLEC 8 TASVRN : TASECB < , ( !
0x271228…2713bc Dummy {f00=0x00c4, f01=0x0190, f02=» TASTBE T TASLFD# V , ( A , a TASCAQT n TTB:SA QTJOB , ( D H @ P 4 A U W A VOLCHE , ( ( A @ U : A V A
0x2713bc…271550 Dummy {f00=0x00c4, f01=0x0190, f02=»% T < C z ECBRC , ( ( B P T W ' T I * , ( @ 8 =hP Y X P Z DWTVOL , ( 3 T Y H ! R , ( Q W 9a I T T 9a H E V DFTABE(
0x271550…2716e4 Dummy {f00=0x00c4, f01=0x0190, f02=» : "' # TDISP ( , ( I ` @ P $ ) 5 8 MOV:US h , ( T A A R A b " z , ( A "" P U W , ( A P @ E "# P P
0x2716e4…271878 Dummy {f00=0x00c4, f01=0x0190, f02=» P W @ | , ( } 0 R ' F "R G FNDTID L , ( ) T @ D #D T G ^ DMTASSV ACTOT , ( W A J "R A J A 4 LKMQDI * & H
0x271878…271a0c Dummy {f00=0x00c4, f01=0x4076, f02=» T P P U W P #P 'P 7W CR OV WT gP wW Rb R T W, R < `@ r
0x271a0c…271ba0 Dummy {f00=0x00c4, f01=0x018e, f02=» J F IDENT LKMAL REL 9.2 79-11-16 870105040920 LKMAL R LKMAL b bTIO t TWAIT TEXIT TACTOT TPAUSE TIMER TMWAIT TLUSEGC * & UT
0x271ba0…271d34 (2, 31) Dummy {f00=0x00c4, f01=0x4096, f02=» TCHPAG , ( J TCHMMU F # X & p & @ EXIT TACTOT TPAUSE TIMER TMWAIT TLUSEGC * & UT
0x271d34…271ec8 Dummy {f00=0x00c4, f01=0x0190, f02=» J F IDENT TIODM REL 9.2 79-11-16 870105040920 D @ TIODM FDBLNK FDBECB FDBSNR FDBRRO FDBRLE FDBBLF FDBTNRC R D @ FDBVTO FDBCEX FDBEXT EXTDMI EXTFC EXTLEN@ EXTBAS EXTELE D @ FDBLRN FDBNIF FDBEAL FDBCRL` FDB
0x271ec8…27205c Dummy {f00=0x00c4, f01=0x0190, f02=» t , ( ! " , ( A # $ % D FDBLNK t FDBECB FDBSNR $ FDBRRO & FDBRLE ( FDBBLF * FDBTNRC + FDBVT
0x27205c…2721f0 Dummy {f00=0x00c4, f01=0x0190, f02=»ELE FDBLRN I FDBNIF H " FDBEAL L 6 FDBCRL` N J FDBKA P ^ FDBMIAT R p FDBADFN T FDBAI1 V FDBDBR ^ FDBMRN _ FDBMROV b FDBMEC d FDBKEY r
0x2721f0…272384 Dummy {f00=0x00c4, f01=0x0190, f02=» j @ D X TTB:ID , ( } P _ L !##P T 2 DWTST b , ( @ R $P U + U _ (@(@ r DWTOR ECBCW2 , ( ! I 2P ^ H L Y H ECBCW , (
0x272384…272518 Dummy {f00=0x00c4, f01=0x0190, f02=» Y . B CRNGET ( , ( + Y I B Y J_ W : ECBFC j , ( G C P C W < C z , ( a! C _H H H S * & } W C C B B
0x272518…2726ac Dummy {f00=0x00c4, f01=0x0190, f02=» j DSUMOD , ( $ X _ X ` T I T J ECBEL J , ( P C X I X J Z * & S W C C W B ECBRC * & B Y IR Q X JU C bSQR C
0x2726ac…272840 Dummy {f00=0x00c4, f01=0x418a, f02=»#D ( * | ACTOT TDISP * DISEND : ( $ m , . 0 2 L H D ! | | | | | ! h # 8 % | ' | x H D ! + ) < + - / 1 & P P R P P | U | W N % |
0x272840…2729d4 (2, 32) Dummy {f00=0x00c5, f01=0x0190, f02=» J F IDENT DMBUF REL 9.2 79-11-16 870105040920 J F " CURBUFK BUFLNK BUFDMI BUFFC BUFSNR BUFOR BUFSTA@ DMTGBU DMTRBUC R CLRBUF CURBUFK BUFLNK BUFDMI BUFFC BUFSN
0x2729d4…272b68 Dummy {f00=0x00c5, f01=0x018e, f02=» DMTGBU , ( @ , L T L P L " , ( T M Q M L V L A @ R HALTN , ( : T @ [ [ M M DMTRBUC CLRBUF , ( M A -(@ :
0x272b68…272cfc Dummy {f00=0x00c5, f01=0x4008, f02=»@ DMTGBU , ( @ , L T L P L " , ( T M Q M L V L A @ R HALTN , ( : T @ [ [ M M DMTRBUC CLRBUF , ( M A -(@ :
0x272cfc…272e90 Dummy {f00=0x00c5, f01=0x0190, f02=» J F IDENT DMTASK REL 9.2 79-11-16 870105040920 ( $ DMTASKKdSQRdQSW DMTWM QIRNY QIRR R QIRNY ~ QIRR tQSW tSQR , ( ECBRL FDB
0x272e90…273024 Dummy {f00=0x00c5, f01=0x0190, f02=»R $ - _ " v , ( W P $ - : R $ - _ : Z TTB:TDC F , ( w $ -_ D U 0 X SCTCDT@ , ( W T ` U @ , FDBRRO DWTTDM TTB:ID , ( A
0x273024…2731b8 Dummy {f00=0x00c5, f01=0x018e, f02=» PRUNN ECBBA MOV:SU $ , ( $ P @ Q (@ F 6 MONMMU f * & H : @ _ x DMTASKK FDBDBR , ( D > X P D "V , ( )
0x2731b8…27334c Dummy {f00=0x00c5, f01=0x0190, f02=» , ( @ a ( ( W ( , ( A B W C X '? 4 , ( H X X )T d FDBSNR@ VLVRL , ( * X *T T , A ( FDBVTO DIVMOD
0x27334c…2734e0 Dummy {f00=0x00c5, f01=0x0190, f02=»LRBUFV , ( D F 4 6(@ _ FDBLRN > VTLRN P , ( D X X 8 U : X 8 U : ` FDBMIA , ( 5 $ ( ( T X X <P ECBFC , ( O F > T
0x2734e0…273674 (2, 33) Dummy {f00=0x00c5, f01=0x0190, f02=» X W ` U @ H EARELB $ FDBCRL 6 , ( @ X W B H CRNQUE x * & D 4 5W P 0 @ F 1 A FDBEXT: EXTELER , ( F(@_ H J (@
0x273674…273808 Dummy {f00=0x00c5, f01=0x0190, f02=» 4 P 9 6 , ( a J 4' ' 5 * FDBSTA Z , ( 4 P W , P ,' X X l , ( $ H J Z" J ) _ , ( (@ C > ( B ! @ , ( !$ ( F
0x273808…27399c Dummy {f00=0x00c5, f01=0x0190, f02=» @ F R +P P X T$ T , ( V U W V R P $ , * & ; P W X X F * & U H X P @ Q MOV:USX , ( k @ (@ X + X "V P FDBMROU
0x27399c…273b30 Dummy {f00=0x00c5, f01=0x0190, f02=» l CRNGETR CRNCIF , ( '? P P $ P 0 CRNCDF ` * & HH I ^ I ^ K ` K ` r , ( ` P P & P BW D EASETB: , ( % " T$ T V T bW E
0x273b30…273cc4 Dummy {f00=0x00c5, f01=0x0190, f02=» B B B B B B v H D ! ! B # % ' 3P 5R ;W IR WP aR U W T U W T 2 H D ! T( !Pj 'V" 7P =P AP WV, [P c p oW } B W T B TT ~ H D ! P W P CT$ MP cT k B }U0 Wf U WF W P
0x273cc4…273e58 Dummy {f00=0x00c5, f01=0x4058, f02=»P P( P" P P P b !W )T 1T 7W GV MT d B@ TP aR U W T U W T 2 H D ! T( !Pj 'V" 7P =P AP WV, [P c p oW } B W T B TT ~ H D ! P W P CT$ MP cT k B }U0 Wf U WF W P
0x273e58…273fec Dummy {f00=0x00c5, f01=0x0190, f02=» J F IDENT DMTASS REL 9.2 79-11-16 870105040920 ( $ DMTASSK VTLRN VLVBA VLVRL SECTLEA R VLVBA ~ VLVRL VTLRN SECTLEA TASECB ECBBA ECBRC , (
0x273fec…274180 Dummy {f00=0x00c5, f01=0x018e, f02=» : t TASMXAE TASASB & VOLCHE 8 , ( 7H@ A A " P "" J TASCVO z CLRBUF * & Q H P @ TASVOL ECBFC ECBRL ECBCW
0x274180…274314 (2, 34) Dummy {f00=0x00c5, f01=0x0190, f02=» TASVLEP , ( L " TOP A " L TASVRL F , ( B A $ L C & @ $ X TASFIL , ( " A $Q @ A @ DMTRBU , ( ( B * D
0x274314…2744a8 Dummy {f00=0x00c5, f01=0x018e, f02=» j , ( G & @ (T , ( a A " 0" : , ( U _ L !SSP !LL j TASCXOS , ( W L @ , A ,V TASSEXR TASXLBP , (
0x2744a8…27463c Dummy {f00=0x00c5, f01=0x0190, f02=» FDBVTO , ( H 4 2% P R 6 X T R FDBMIA# J , ( 8 @ "T R :T @ ( , ( 6 4 2% P QFDBFL , ( = 2 < P % DWTST
0x27463c…2747d0 Dummy {f00=0x00c5, f01=0x0190, f02=» E 3 P S F P S FDBRLE " FDBBLF 4 FDBNIF F * & F P S H P S J P % S X FDBKA FDBMEC * & L P & S N @ " S 8 DWTMEC , ( @ P S R B
0x2747d0…274964 Dummy {f00=0x00c5, f01=0x0190, f02=»P @ , t EXTDMIH EXTLENT & , ( ! ! T W P . D Y T P 0 8 EXTBAS h , ( 9I Y V P 0 Y X U ! T z TASLFD , ( S ! X6 _R _V D Z" TASTBE , ( q$ P
0x274964…274af8 Dummy {f00=0x00c5, f01=0x0190, f02=» @ 2 n , ( $P -W P B TASCAQ > QTJOB P * & @ * ` b(@( @ ` FDBADF& FDBDBR , ( ( _ d ` ` 9A EXTELE , ( D S f
0x274af8…274c8c Dummy {f00=0x00c5, f01=0x0190, f02=»MRN , ( =@ R J S W S p S p MPYMODW < FDBMRO N , ( WB$ R H R J r S t ` o H D !%l P !Tn / d AP UP ] d P d Q< d _T u U P H D ! W V d T
0x274c8c…274e20 Dummy {f00=0x00c5, f01=0x4038, f02=»W P W P ES GW p "@ 4 MPYMODW < FDBMRO N , ( WB$ R H R J r S t ` o H D !%l P !Tn / d AP UP ] d P d Q< d _T u U P H D ! W V d T
0x274e20…274fb4 (2, 35) Dummy {f00=0x00c5, f01=0x40ba, f02=» J F IDENT DFTAB REL 9.2 79-11-16 870105040920 DFTAB DFTABE R DFTAB j DFTABE | @ B PDFTABE EQU * P END @ P* P* P* LEVE
0x274fb4…275148 Dummy {f00=0x00c5, f01=0x4172, f02=» J F IDENT DMFDB REL 9.2 79-11-16 870105040920 < 8 FDBSTAK FDBEND QFDBFL CRNQUE CRBUFL CRNEND MXIND R CRBUFL QFDBFL r FDBSTAK FDBEND X CRNQUE X Y
0x275148…2752dc Dummy {f00=0x00c5, f01=0x0190, f02=» J F IDENT DMINIT REL 9.2 79-11-16 870105040920 DMINITK R DMINITK d INIFLG x , ( =a 9a Q - _ - > QFDBFL FDBSTA FDBEND CRNQUE , ( !
0x2752dc…275470 Dummy {f00=0x00c5, f01=0x40da, f02=» h BUFDMIL BUFSNR BUFOR , , ( Q , - M M M @ < TASBLK l TASQUE ~ g$ A A > Q %PJ r @ FDBEND CRNQUE , ( !
0x275470…275604 Dummy {f00=0x00c5, f01=0x0190, f02=» J F IDENT DMSUBX REL 9.2 79-11-16 870105040920 . * FNDKMXK CHKKEY RDNXTR FNDKEY CRNUPD R FNDKMXK MPYMOD * & 4U :! 4 U , ( 9 & ?! , (
0x275604…275798 Dummy {f00=0x00c5, f01=0x0190, f02=»V _ W W | RDNXTR GTBKBU 0 , ( @ : T ; [ V ( B DMTIOZ r FDBRRO , ( " T E W D FDBMROP FDBRLE , ( V ; [ _ D V
0x275798…27592c Dummy {f00=0x00c5, f01=0x0190, f02=» GTLGRN# , ( D U E W ADDMODH B CALSNOT T DMTRBU f , ( ! @ P W x , ( =@ _ P [ FNDKEY d FDBMIA , ( Y Z
0x27592c…275ac0 Dummy {f00=0x00c5, 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 FDBCRL , ( " : : " $
0x275ac0…275c54 (2, 36) Dummy {f00=0x00c6, 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
0x275c54…275de8 Dummy {f00=0x00c6, f01=0x40ea, f02=» J F IDENT ADDMOD REL 9.2 79-11-16 870105040920 ADDMODK R ADDMODK d , ( P Q R ;A [ [ x ! : P Q R $ @ ,2,A14 B P OR.S
0x275de8…275f7c Dummy {f00=0x00c6, f01=0x40ea, f02=» J F IDENT DSUMOD REL 9.2 79-11-16 870105040920 DSUMODK R DSUMODK d , ( P Q R ;A [ [ x ! : P Q R $ @
0x275f7c…276110 Dummy {f00=0x00c6, f01=0x40ec, f02=» J F IDENT MPYMOD REL 9.2 79-11-16 870105040920 MPYMODK R MPYMODK d , ( P Q R ;A [ x ! [ : P Q R & @ . P*
0x276110…2762a4 Dummy {f00=0x00c6, f01=0x40ea, f02=» J F IDENT DIVMOD REL 9.2 79-11-16 870105040920 DIVMODK R DIVMODK d , ( Q R P ;A [ [ x ! : Q R P $ @ P RB(7) END1
0x2762a4…276438 Dummy {f00=0x00c6, f01=0x0190, f02=» J F IDENT DMSUBR REL 9.2 79-11-16 870105040920 F B EATESTK EASETB EARELB CRNGET CALSNO GTBKBU GTLGRNL DMTIOT R . * CHKIND REQEND DMTIOZ MOV:US MOV:SU CHKIND , ( ? ? !? P P !> P W
0x276438…2765cc Dummy {f00=0x00c6, f01=0x0190, f02=»WTTQ , ( = R L X P L P 4 M QTJOB < DWTTDM L DWTST ^ , ( Y X M M n IHRTN EATESTK z FDBEALL , ( q _8 > D W 0P Q F
0x2765cc…276760 Dummy {f00=0x00c6, f01=0x0190, f02=» X 1 Y : , ( 4W 0P R Q P FREQUEW P * & W R D Q ( 0 5 @ b CRNGET FDBCRL , ( 1 A Z> : D W (P CRNTID CRNQUE
0x276760…2768f4 (2, 37) Dummy {f00=0x00c6, f01=0x018e, f02=»SNO X FDBBLF , ( G I D ) E : T DIVMOD P FDBEXT~ b , ( _ $ &S P W X $ t EXTLEN FDBCEX , ( yH ( * U U *_ EXTBAS
0x2768f4…276a88 Dummy {f00=0x00c6, f01=0x0190, f02=» , ( P X 2 _ W Y 4 : DWTECB 8 ECBRC J , ( D 6 8 B :P T Z FDBDBR ECBBA BUFDMIT , ( D$ G :W X < Y < B > DMTIOZ DWT
0x276a88…276c1c Dummy {f00=0x00c6, f01=0x0190, f02=» GTBKBU , EXTDMI , ( ) 8_ X , P H X 0 8 & SECTLE V ECBRL h DMTGBU x ECBCW , ( ? ! # J C L NW C BUFSTAH , ( Y P R C > X B%? : X
0x276c1c…276db0 Dummy {f00=0x00c6, f01=0x0190, f02=» MPYMODF , ( 0 D $ V T 2 T , ( 4 ^ S W B MOV:US r , ( : U ; $ T $ T $ T x : : , ( $ T $ ) ] $ ) Y _$ , ( U x 0 )_8 $_ $
0x276db0…276f44 Dummy {f00=0x00c6, f01=0x418e, f02=» Y _& (# )_4 $ ($ , ( ) YR_L U p 0_8 $ * _< Z H D ! P P P W #P 7P> ?R4 MP SP W P P W W P8 R l H D ! W R W P W6 'T ;U eSP mP qW U U. R P W P6 H D !
0x276f44…2770d8 Dummy {f00=0x00c6, f01=0x4116, f02=» J F IDENT PFTAB REL 9.2 79-11-16 870105040920 PFTAB R PFTAB b DC15ON t SOPRN CHLTON FDONN DMINITA " U@
0x2770d8…27726c Dummy {f00=0x00c6, f01=0x0190, f02=» J F IDENT DVKB00 REL 9.2 79-11-16 870105040920 DVKB00K R DVKB00K d KBAD3 x CTAB01 , ( KB DVDY00 , ( %@
0x27726c…277400 Dummy {f00=0x00c6, f01=0x4032, f02=» p X - 0 / 0 @ .2 79-11-16 870105040920 DVKB00K R DVKB00K d KBAD3 x CTAB01 , ( KB DVDY00 , ( %@
0x277400…277594 (2, 38) Dummy {f00=0x00c6, f01=0x4104, f02=» J F IDENT DVDY00 REL 9.2 79-11-16 870105040920 DVDY00K R DVDY00K d DYADN x * & DY % P @ 8 , 8 @
0x277594…277728 Dummy {f00=0x00c6, f01=0x0190, f02=» J F IDENT DVKB01 REL 9.2 79-11-16 870105040920 DVKB01K R DVKB01K d KBAD3 x CTAB02 , ( @ KB DVDY01 , ( %@
0x277728…2778bc Dummy {f00=0x00c6, f01=0x4032, f02=» p X - 0 / 0 @ .2 79-11-16 870105040920 DVKB01K R DVKB01K d KBAD3 x CTAB02 , ( @ KB DVDY01 , ( %@
0x2778bc…277a50 Dummy {f00=0x00c6, f01=0x4108, f02=» J F IDENT DVTP01 REL 9.2 79-11-16 870105040920 DVTP01K R DVTP01K d TPADN x , ( TP " @ 4 ( 4 @
0x277a50…277be4 Dummy {f00=0x00c6, f01=0x4104, f02=» J F IDENT DVDY01 REL 9.2 79-11-16 870105040920 DVDY01K R DVDY01K d DYADN x * & DY % P @ 8 , 8 @
0x277be4…277d78 Dummy {f00=0x00c6, f01=0x0190, f02=» J F IDENT DVKB02 REL 9.2 79-11-16 870105040920 DVKB02K R DVKB02K d KBAD3 x CTAB03 , ( KB DVDY02 , ( %@
0x277d78…277f0c Dummy {f00=0x00c6, f01=0x4032, f02=» p X - 0 / 0 @ .2 79-11-16 870105040920 DVKB02K R DVKB02K d KBAD3 x CTAB03 , ( KB DVDY02 , ( %@
0x277f0c…2780a0 Dummy {f00=0x00c6, f01=0x4106, f02=» J F IDENT DVDI02 REL 9.2 79-11-16 870105040920 DVDI02K R DVDI02K d DIADN x , ( DI ?O_o @ 2 & 2 @ 0,
0x2780a0…278234 (2, 39) Dummy {f00=0x00c6, f01=0x4104, f02=» J F IDENT DVDY02 REL 9.2 79-11-16 870105040920 DVDY02K R DVDY02K d DYADN x * & DY % P @ 8 , 8 @
0x278234…2783c8 Dummy {f00=0x00c6, f01=0x4100, f02=» J F IDENT DVGP03 REL 9.2 79-11-16 870105040920 DVGP03K R DVGP03K d GPADN x * & GP % @ 4 ( 4 @ ECB ADD
0x2783c8…27855c Dummy {f00=0x00c6, f01=0x0190, f02=» J F IDENT TCLASS REL 9.2 79-11-16 870105040920 TCLASSK R TCLASSK d DVKB00 x DVDY00 DVKB01 , ( " ! 1 DVTP01 DVDY01 DVK
0x27855c…2786f0 Dummy {f00=0x00c6, f01=0x4054, f02=» 0 z , ( x * 8 + 9 > >@ P TCLASSK R TCLASSK d DVKB00 x DVDY00 DVKB01 , ( " ! 1 DVTP01 DVDY01 DVK
0x2786f0…278884 Dummy {f00=0x00c6, f01=0x0190, f02=» J F IDENT SCLASS REL 9.2 79-11-16 870105040920 SCLASSK R SCLASSK d DWSI01 x DWSO01 DWII01 * & DWIO01 DW1501 DW150
0x278884…278a18 Dummy {f00=0x00c6, f01=0x404e, f02=» | " ( # ) B 8@ J SCLASSK R SCLASSK d DWSI01 x DWSO01 DWII01 * & DWIO01 DW1501 DW150
0x278a18…278bac Dummy {f00=0x00c6, f01=0x0190, f02=» J F IDENT DRDC15 9.2DK 7 83-10-12 870105040924 . * DC15ADK IH1501 IH1502 DC15ON DW1500 R DC15ADK * & , ( C P P +P P P DISIOEC , (
0x278bac…278d40 Dummy {f00=0x00c6, f01=0x0190, f02=»I , ( W B " P H :H B , ( # L Y @ P P : SETIME j , ( $_ @ !@P _l | , ( _0 X 9 P @ , ( @ ` @ P 0P _ % A A
0x278d40…278ed4 (2, 40) Dummy {f00=0x00c7, f01=0x0190, f02=» I Q X ! 3 _ ECBEL 0 DC:MIN @ , ( g X P 0 Y P C R , ( B B ! P Y , ( _d X ! X _ B Y _~ DISEND , (
0x278ed4…279068 Dummy {f00=0x00c7, f01=0x0190, f02=» _: X P ( y Y W , ( 1 (P 0 ) > (P _ " , ( Q ) 1_ (X( P _ 0 ) R , ( q _6 X " X> "XD XH _D , ( _6 (P _ ) 1 4 X , ( R X T X P , Y
0x279068…2791fc Dummy {f00=0x00c7, f01=0x0190, f02=» P T r , ( ! X @ T A A > A A A , ( A A A W B a > r q , ( @ BHBB < ! 2B ! , ( T P P
0x2791fc…279390 Dummy {f00=0x00c7, f01=0x0190, f02=»_ ! l , ( % T " X ! _ ! A , ( E x @ pP @ nP ! A p A r_ ! < , ( e @ rP @ X@ ! T A v ! l * & @ pP @ P @ n 2 8 ! X , ( Y ! A z_B ! X>_b A , ( v @
0x279390…279524 Dummy {f00=0x00c7, f01=0x0190, f02=» X l * & T P C C * & 3 P " H X "# P " P X : , ( M * Y X T ! W h , ( g W W X R X T , ( ! ! X " T , ( R @ X !
0x279524…2796b8 Dummy {f00=0x00c7, f01=0x0190, f02=» N @ n @ v @ , ( @ A ! @ pXV ! ( , ( 7 T @ zP ! ! _p /T @ zX @ X , ( W tP @ vT ! ! A x_ A z , ( w B A p @ tT _2 _6 @ n , ( T A v A p X ! XD
0x2796b8…27984c Dummy {f00=0x00c7, f01=0x0190, f02=» 4 @ pP ! ! x , ( D ! @ P ! ! A p , ( @ / @ T ! _ T X_ ~ H ECBBA x DC:MOT, , ( @ M A n C B B , ( J e A A A A t A v ! ! A , ( p_^
0x27984c…2799e0 Dummy {f00=0x00c7, f01=0x0190, f02=» P T T Y W ~ , ( * P C X A p A n @ * , ( xP X Y 4 @ @ vT @ Z , ( @ 1 A @ A A v ! T , ( Q P P P P P 1 A , ( q @ ]6W P _@
0x2799e0…279b74 (2, 41) Dummy {f00=0x00c7, f01=0x0190, f02=» A ! @ ! z , ( @ ! ! ! B J 4 ! , ( ! @ @ A @ T J , ( 1 @ ! 8 ! W - ! x ! z , ( Q W 0 " W R ~T }T , ( q T W ! P " ! " :A ,
0x279b74…279d08 Dummy {f00=0x00c7, f01=0x0190, f02=» j , ( ! " ! " ! A t , ( ( _" A v A n ! ! % ! R ! : , ( / ! @ ! 8 ! X ! 9a j , ( @ M D ! X ! P ! T & ! _b IH1501 INTSAVL , ( k B J B !
0x279d08…279e9c Dummy {f00=0x00c7, f01=0x018e, f02=» , ( U@ A v < A 4 A _$" , ( P H B P W ! 4 _ 4 , ( @@ ! ! 1 4 A @ ` d DC15ON 8 , ( ! @ P 0 M A 4 ? @ , ( A ` @ P $ Y r_ @ A , (
0x279e9c…27a030 Dummy {f00=0x00c7, f01=0x0190, f02=» f , ( 4 A < ! @ pP ! ! , ( R @ P a A 4 A A A 8 , ( ?a :a# P @ @ @ h 4 , ( * ! A | ! ! A | @ :H DW1500 D , ( A 4
0x27a030…27a1c4 Dummy {f00=0x00c7, f01=0x0190, f02=» DEFGHI#.<(+!&JKLMNOPQR$]*);^-/ST , ( ' UVWXYZ@,%_>?0123456789:[ '=" * , ( ' Z , ( ' ( H D ! l t B t GP> M d QP UP8 YP> ]PH c i
0x27a1c4…27a358 Dummy {f00=0x00c7, f01=0x0190, f02=» KQl O S B a mP d H D ![ P r P Wb X n p n P -W 1 t 7P H D !4 KP gP P D R2 T* P& P P T % n )T - p 1 n l H D ! 7 P ; T ? X C G ` K d MW T P P $ H D !*
0x27a358…27a4ec Dummy {f00=0x00c7, f01=0x0190, f02=» yTD P H D ! P( t P" t T P P P t P D Pf H D ! R` P TR EP IP YT aW iW( oW" uR {T T< W. X H D !3 T P T Wx # r ' 1 7T =P A E MT, H D !8 YP aT0 e i y r
0x27a4ec…27a680 Dummy {f00=0x00c7, f01=0x0190, f02=» P T$ T W P P # t -T I KT2 QP4 WPJ ]PL cP iP. H D !6 }W P t P T W W W W W j D H D ! ` j /T$ 3 E 7 = ?W E M'| QW [WL aR gT oT H D !) wT0 {W, T W R UH P
0x27a680…27a814 (2, 42) Dummy {f00=0x00c7, f01=0x40a6, f02=» W ' ' #' %P ?' C' I' KP t H D !s gT k P P P W h' ' ' ' 0 ' ' ' ' | ( @ T$ 3 E 7 = ?W E M'| QW [WL aR gT oT H D !) wT0 {W, T W R UH P
0x27a814…27a9a8 Dummy {f00=0x00c7, f01=0x0190, f02=» H F IDENT CTAB01 83.05.19 NJ NORDJYLLANDS AMT & " CTAB01K CTAB02 CTAB03 CTAB04 P CTAB01K z CTAB02 CTAB03 CTAB04 , ( , ( !
0x27a9a8…27ab3c Dummy {f00=0x00c7, f01=0x0190, f02=» < +,-. 0123456789 `ABCDEFG , ( HIJKLMNOPQRSTUVWXYZ [] * * , ( > ?;_: =!"#$%&/() @ABCDEFG Z , ( HIJKLMNOPQRSTUVWXYZ []* , ( < +,-. 0123456789 `ABCDEFG , ( ! HIJKLMNOPQRSTUVWXYZ []
0x27ab3c…27acd0 Dummy {f00=0x00c7, f01=0x4034, f02=» H x x r x @ 0JKLMNOPQRSTUVWXYZ [] * * , ( > ?;_: =!"#$%&/() @ABCDEFG Z , ( HIJKLMNOPQRSTUVWXYZ []* , ( < +,-. 0123456789 `ABCDEFG , ( ! HIJKLMNOPQRSTUVWXYZ []
0x27acd0…27ae64 Dummy {f00=0x00c7, f01=0x2008, f02=» L = KMD20 DATE = 81 01 12 1216PACK NBR = 0001 O
0x27ae64…27aff8 Dummy {f00=0x00c7, f01=0x0190, f02=» ( ^ W @ P6 I @ P @ V W H I (@ @ P -W P B (@( @ QN _ T ` ` 9A S ^ H $X D S . S $ R * S W S _ S ` R ( R * S b P U _ L
0x27aff8…27b18c Dummy {f00=0x00c7, f01=0x0190, f02=» T R , @ T R RT @ 6 2% P P %_ S E S E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | N N @ T W T W @ P R ( >a U W 0
0x27b18c…27b320 Dummy {f00=0x00c7, f01=0x0190, f02=» ( ^ W @ P6 I @ P @ V W H I (@ @ P -W P B (@( @ QN _ T ` ` 9A S ^ H $X D S . S $ R * S W S _ S ` R ( R * S b W :
0x27b320…27b4b4 (2, 43) Dummy {f00=0x00c7, f01=0x0190, f02=» M _8 > D LW 0P Q P P E +P W : X + D X L 1 Y L : L 4W 0P8 R Q P W R D + Q ( 0 5 @[x 1 A[x Z> : D NW (P D + I W6 @V4T b ( AV4 U 1_ D + I D N ) E N : T * W SP P W
0x27b4b4…27b648 Dummy {f00=0x00c7, f01=0x0190, f02=» W& X ^ Y ^ B I ~ B T B : X "? P P X T _ X . P X $ ! # C }0W C C X %? : X &_ 0 D . P , _ D . D $ D * W T ( T & ^ S W : U ; $ T $ T
0x27b648…27b7dc Dummy {f00=0x00c7, f01=0x0190, f02=»$ T* (W $ U $ ) Y _& (# )_4 $ ($ ) YR_L U p 0_8 $_< } b~Ng ~d `.bvb > > @[ ( A[ W C ^ ! Z( [ (X0 @[ P T M ]@ , ) A[ P* P Y U ( ) 5 & > > [ [
0x27b7dc…27b970 Dummy {f00=0x00c7, f01=0x0190, f02=»T6 X T0. T G Y6 G _b P ,P - _ d _R_n!"&';<>@^_ 9: X ! Y M P ^ [ Y L]$]4]4] ^ ]N]H^Z^` ! 6 ! 6 ! 6W B W$ B L # 9Q T W Q P X & V T Y &W X ! T6 B
0x27b970…27bb04 Dummy {f00=0x00c7, f01=0x0190, f02=»T " T W Q " T ) [ !_ Y _ ! 6 !_ Y &P Q W ! 6 Y '" _~_" _< !_ _n !_ _t B B , ! T _ D ! P ! P W C V B P ! 6 ! 6 ! 6 Y 4 RNQ " PH _ " P R: M T2 ! 6 L ,! :D" !_ Y Y U
0x27bb04…27bc98 Dummy {f00=0x00c7, f01=0x0190, f02=» X P " ! 6 Y ' ! 6 X T ! 6 [ ] [ R _ 4 ! 6 ! 6 ! 6" T ! 6 ! 6 ! 6 ! 6 4 X ' 4 Y ' ! 6 ! 6" P ,$ , ! 6 4!"$&;<>@^_ x `8 a b(a PB P8 [ B P B L # +P ! 6 ! 6 T ! 6 Y & ! 6W
0x27bc98…27be2c Dummy {f00=0x00c7, f01=0x0190, f02=» _P " $ P X & X ]r ! 6 Y Y Y _ " H` _ ! 6 ! 6 a` C [ X C _ X Y & Y > B B U$ $ ! T _ U D ! T _ C > X Z^<BR P j d X _x R0 V0 ! P* P P P" R ?Q ! 6 Y
0x27be2c…27bfc0 Dummy {f00=0x00c7, f01=0x0190, f02=» a aV b~ b b B 8# T $ # ;D 7P P [ Y W Y X Y 8# T W$ T( X $ P X P B V *@ Y [ [ ? X _F c g eFeXe d ! 6 P P d & d [ B P B H " +P P. T Y ' ! 6 R| X ( Y &R
0x27bfc0…27c154 (2, 44) Dummy {f00=0x00c8, f01=0x0190, f02=» d X`" Ec P( 8'0P Ec TD ! T 9 _ ! T @_ ! B P !f B C d ^N P R ?] _ C _ " $ P X ' X ] ! 6 e. c B !f !f ! 6 d B Y & !f W c 8!0T 8 !@P ! 6$ P
0x27c154…27c2e8 Dummy {f00=0x00c8, f01=0x0190, f02=» ? Y ! 6 T X ! 6 Y & Zl e T _ ! 6 X $ P !f c R V P P" ! 6 e.W e ( X $ X !f _ X $ X X & !f !f Y _8 X " X &" Y )U W ! 6 ! 6 ! 6 Y 4 B c U )X R@ X X
0x27c2e8…27c47c Dummy {f00=0x00c8, f01=0x0190, f02=» A3,A2 % * PGBUF10 ADKL A15,4 ADJUST STACK POINTER & P ABR* A15 RETURN TO CALLER & < P EJECT & ^ P* & l P* & v ( P* INSERT DWT IN WRITE REQUEST QUEUE & P* & P* A2,A3,A4 DESTROYED & P* A6=DWT & P* & ( PINSWQ LDKL A2,DCWRQ GET QUEU
0x27c47c…27c610 Dummy {f00=0x00c8, f01=0x018e, f02=»Q2 & PINSWQ3 ADR A4,A6 ' P STR A4,A2 INSERT IN QUEUE ' " " P CMR A4 INDICATE END OF QUEUE ' D P RB GBUF10 RETURN ' j P* ' P* ' * P* REMOVE DWT FROM WRITE REQUEST QUEUE ' P* ' P* A2,A3,A4 DESTROYED ' P* A6=DWT ' P* ' * PRE
0x27c610…27c7a4 Dummy {f00=0x00c8, f01=0x0190, f02=» PREM10 LDR* A3,A2 ( & P RB(Z) GBUF10 NOT ON QUEUE: RETURN ( P CWR A3,A4 ( F P RF(E) REM15 ( X P LDR A2,A3 GET NEXT ( l P RB REM10 ( PREM15 LDR* A3,A4 REMOVE ( P STR A3,A2 ( P RB GBUF10 RETURN ( P EJECT ( P* ( P* ( P
0x27c7a4…27c938 Dummy {f00=0x00c8, f01=0x0190, f02=»STQ GET QUEUE ANCHOR ( P LDK A4,DWTSQ ) P RB INSWQ2 ) 2 P* ) D P* ) N " P* REMOVE DWT FROM STATUS QUEUE ) X P* ) ~ P* A2,A3,A4 DESTROYED ) P* A6=DWT ) P* ) * PREMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR ) P LDK A4,DWTSQ ) P RB RE
0x27c938…27cacc Dummy {f00=0x00c8, f01=0x0190, f02=»,A3 DESTROYED ) P* * PQRBUF EQU * * P IFT MESPAS=1 * 4 ( P LDKL A2,DW1500 QUEUE ON DC-TASK DWT * J P XIF * v P IFT MESPAS=0 * $ P LDR A2,A6 QUEUE ON TERMINAL DWT * P XIF * , P ADK A2,DWTRQ BEGINNING OF RECEIVE QUEUE * PQR100 EQU *
0x27cacc…27cc60 Dummy {f00=0x00c8, f01=0x0190, f02=»E * p " P CMR A4 INDICATE END OF QUEUE + P RTN A5 + 0 P EJECT + @ P* + N P* + X 2 P* CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE + b P* + 4 P* REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED + P* + PCKMESS LDKL A6,DW1500 + P LD A1
0x27cc60…27cdf4 (2, 45) Dummy {f00=0x00c8, f01=0x018e, f02=»A8,DWTECB,A6 ECB ADDR TO A8 + * P LD A3,DWTRQ,A6 A3=ADDR TO READ QUEUE , $ " P RF(Z) CKM200 NO READ IN QUEUE , R P , x P , , P LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER , . P ST A2,DWTRQ,A6 STORE THIS ADDR INTO QUEUE , " P ADK A3,6 MOVE POINTER TO TEXT
0x27cdf4…27cf88 Dummy {f00=0x00c8, f01=0x0190, f02=» , . P ST A4,ECBCW,A8 STORE LINE DEVICE ADDRESS - P - : P LDK A1,0 RESET RETURN CODE - B & P LDR A4,A3 RECEIVE BUFFER ADDRESS - f , P CF A15,DC:MIN MOVE DATA TO USER BUFFER - * PCKM110 ADKL A15,4 ADJUST STACK POINTER - P ABR* A15 RETURN - 8 PCK
0x27cf88…27d11c Dummy {f00=0x00c8, f01=0x0190, f02=»A5,READP SKIP NEXT TWO CHARACTERS e P CF A5,READP f * P XIF f > PRDM100 EQU * f J $ P CF A5,READP READ ONE CHARACTER f ^ P RF(NZ) RDM120 PARITY ERROR f PRDM110 EQU * f P CWK A2,ETX f P RF(E) RDM130 ETX RECEIVED f P CWK A2,ETB f P
0x27d11c…27d2b0 Dummy {f00=0x00c8, f01=0x0190, f02=»BEDDED IN MESSAGE f t P CWK A2,/FF g $ P RF(E) RDM140 MARK HOLD RECEIVED g . P g V P IFT CODE=0 g ^ P IFT BINTRM=1 g r P g P LDR A1,A2 g P SUK A1,DC1+3 g P RF(P) RDM115 NOT DC1-DC3 g P ADK A1,3 g P RF(N) RDM115 NOT DC1-DC3 g
0x27d2b0…27d444 Dummy {f00=0x00c8, f01=0x0190, f02=»ASSEMBLE TO ONE CHARACTER g P ORR A2,A8 h " PRDM115 EQU * h 4 P XIF h H P h T P SCR A2,A4 STORE CHARACTER h P ADK A4,1 INCREMENT POINTER h ~ $ P IM FBAX INCREMENT BUFFER INDEX h P LD A1,FBAX h P CWK A1,RBUFL+RBUFL h P RB(NG) RDM100
0x27d444…27d5d8 Dummy {f00=0x00c8, f01=0x0190, f02=» INVALID MESSAGE h ~ P SUK A2,/7F i $ P RF(Z) RDM150 MARK HOLD RECEIVED i , P RB RDM100 i T P* i f P* ETX RECEIVED i p P* i PRDM130 EQU * i $ P LD A1,DCRBUF GET BUFFER ADDRESS i P LD A2,FBAX GET BUFFER INDEX i 2 P ST A2,+2,A1 STORE EFFEC
0x27d5d8…27d76c Dummy {f00=0x00c8, f01=0x0190, f02=»F A5,RDCRC READ CRC AND CHECK IT i P RF(E) RDM150 CRC WAS OK j ( P XIF j H PRDM140 EQU * j T & P LDK A3,1 INDICATE INVALID MESSAGE j h PRDM150 EQU * j $ P LDR A7,A3 SAVE RESULT REGISTER j P CF A5,HALTIN HALT INPUT j P IFT P6805=1 j " P ORR A
0x27d76c…27d900 Dummy {f00=0x00c8, f01=0x0190, f02=» A3,A3 j " P RB(NZ) RDM130 ALREADY INVALID k " P LDK A3,2 INDICATE CORRECT ETB k 4 P RB RDM130 k Z P* k l P* ITB RECEIVED k v P* k PRDM170 EQU * k P IFF CODE=1 k P CF A5,RDLRC k " P RB(NZ) RDM120 LRC WAS NOT OK k P XIF k P IFT
0x27d900…27da94 (2, 46) Dummy {f00=0x00c8, f01=0x0190, f02=» P* l P* TRANSMIT ACK 0 OR 1 l P* l , PTRACK LDK A2,1 l 6 P LDK A3,ACK1 PRELOAD ACK1 l L & P XRS A2,CACK INCREMENT ACK COUNTER l n P RF(NZ) TRDLE l P LDK A3,ACK0 LOAD ACK0 l P RF TRDLE l P* l P* TRANSMIT WACK l P* l
0x27da94…27dc28 Dummy {f00=0x00c8, f01=0x0190, f02=»OAD RVI l ~ P XIF m P* m P* TRANSMIT DLE m & P* m < PTRDLE LDK A2,DLE LOAD DLE m F " P SC A2,RESEND PUT INSAVE AREA m h P SC A3,RESEND+1 m P RF TRREP m P EJECT m P* m P* TRANSMIT NAK m P* m PTRNAK LDK A3,NAK LOAD NA
0x27dc28…27ddbc Dummy {f00=0x00c8, f01=0x0190, f02=» p V ` $ W ` ;h 0 :C # : .=H N .=H N N : d 8" R _ ZY QY : @ V H W z W | CRP W ` ` H W d 2 ;A @ >R - @ - N !TTP
0x27ddbc…27df50 Dummy {f00=0x00c8, f01=0x0190, f02=»T d TWh B 2 .:H N P V _ R :h " B YV : v `?A @ W W :b / W W @ W D V W W ` " W p @
0x27df50…27e0e4 Dummy {f00=0x00c8, f01=0x0190, f02=» V V W W V V >k 8 W W t V V v x ( % , 8 @ W A R 6 P E r 6 E @ @ W @ @ %
0x27e0e4…27e278 Dummy {f00=0x00c8, f01=0x0190, f02=»P @ P " P " P " P W W . !TTP @ T Y !TTX" A 9 A : @ @ P. @ " P #D " P #E " P #F : @ " P @ P 3 _ @ " P S 1 S 9J S ( 3 ( 9B @ @
0x27e278…27e40c Dummy {f00=0x00c8, f01=0x0190, f02=» ( @ % P W @ % P P0 ( r " U _2 P0 ( " U _2 V V tPJ S ( V | S =J @ " S V l S W l V p S W p W _L @
0x27e40c…27e5a0 Dummy {f00=0x00c8, f01=0x0190, f02=» A V W W t PT W f ( ( W d 8 t G =h G V d V r < V f P W f _B V W V t Yr !TTX @ @ T : W > V 0 V P _ W $ q > R
0x27e5a0…27e734 (2, 47) Dummy {f00=0x00c8, f01=0x0190, f02=» 0 I , I . $# P V -W H P U & I @ % PH H I H T P, H U V U W < + + P : V $ F !LLT # W ;I # ;b W ;a WR# T W W,# T W W # T W W W
0x27e734…27e8c8 Dummy {f00=0x00c8, f01=0x0190, f02=»_ *T P$ _ .P _ / V z U Y$ P W | V z 3 % W P _ V |P V v ][~ P _ @ @ T @ A : . !TTP V W t * P ( r _
0x27e8c8…27ea5c Dummy {f00=0x00c8, f01=0x0190, f02=» _j V t Y !TTX @ @ T : !TTX !CCTr P, ( V r 4 U $ $ _. P, ( V 4 U $ $ _. @ @ @ ! P V 8 8 8 @ >B 3 . !CCP
0x27ea5c…27ebf0 Dummy {f00=0x00c8, f01=0x0190, f02=» 8 8 8 4 D P$ @ # P H I K T + Y@ _pR& @ @ @ % P V 4 4 4 _r @ @ T : @ ! P @ @ l CRT 3 @ l l S @ l PP l !RRP @
0x27ebf0…27ed84 Dummy {f00=0x00c8, f01=0x0190, f02=» [x ` @ P _ 3 S S V V W @ @ T : P S S _ : N =H N : N =H N : &=H F : F =H F : F =H F : P N =H N T _ : 00=H 00 P
0x27ed84…27ef18 Dummy {f00=0x00c8, f01=0x0190, f02=» 0 | 1 | 2 | P ! ! 1 j @ $ P L 0 B L R X ^ t a `!V ,g g ,g g . TDC 2 U
0x27ef18…27f0ac Dummy {f00=0x00c8, f01=0x0190, f02=» 4 TP 8b DY : P P ~dKB 6~N : & j 8b DY
0x27f0ac…27f240 Dummy {f00=0x00c8, f01=0x0190, f02=» (bvDI @ ?O_o 8b DY x ,g P 4`.GP . TDC 2 U
0x27f240…27f3d4 (2, 48) Dummy {f00=0x00c9, f01=0x0190, f02=» [ Q@ [ R { R [ _ L Z ! Z $ Z %_N [ Q* L R [ Z { L z 9e! W Z : V I _ , " -! 9H X" ,9 -9d_ Z H D & H D % [ ( !!
0x27f3d4…27f568 Dummy {f00=0x00c9, f01=0x0190, f02=» 6WD K K K K V K : V V V Z P 2 " T W "@T '?W "? H X" K :e J J " J _Z Z Z [ Z P [ V 6 [ 7 V R (Q V : (
0x27f568…27f6fc Dummy {f00=0x00c9, f01=0x0190, f02=» T& P r l Z T T8 W l H D ! F T X J P p W T l )T ; P e i ( H D ! @ wP6 }R0 P T$ T W P F T 2 T2 P4 PJ PL P P. t H D !6 W P ! F - /P 7 E ST WW [W gW kW oW " "
0x27f6fc…27f890 Dummy {f00=0x00c9, f01=0x001e, f02=» p x
0x27f890…27fa24 Dummy {f00=0x00c9, f01=0x0190, f02=» t B J r r b c @ Tg t z ^ ^ bHPH H ^2 Z ` z
0x27fa24…27fbb8 Dummy {f00=0x00c9, f01=0x0190, f02=» 4c @Sw D d 2Z $"z y B % y D Dbb d & B 6P yB W [~ ? d f% L "~ T &b ECn 1 d _ A X " , _ @ , > > U # T @ l H ( ( P c P W: P, A , 4 V ( U P" @E V LE W @E
0x27fbb8…27fd4c Dummy {f00=0x00c9, f01=0x0190, f02=» 6 8 2 Q Z P 0 9 h h_ $ 4 _, ? P H H #P h A X A FQ ? @ * : ) A *_ @ @ A H A ,_ ? ? ? ? ? ^ A _ _ ^ * $P T I R $ 5 % > ? W ? W ? T T U U U T
0x27fd4c…27fee0 Dummy {f00=0x00c9, f01=0x0190, f02=» 0 @ 1 A P P > ? * X " R" Y T ? X D FpT> X@W8 > _& @ 8 R" Y T ? X D FpT X@W > _& W2 > 8 X W( ? ` @ @ P $ H W W > > > > > > @[ V ? [ > _ > ? _ > > ? ^ ! Y ^ _ b ? ZA.
0x27fee0…280074 (2, 49) Dummy {f00=0x00c9, f01=0x0190, f02=» pU J BAB rU J B B pU J BQB rU & P B " P Q :A H P P B H &!@T I & J T &! 1 U ' F A
0x280074…280208 Dummy {f00=0x00c9, f01=0x0190, f02=» P 4 ] " P $ P ] U ( PH U P< P0 P, R 4T ] U ( X "0Tp+ Y WH 8Z R 4 U R ] U ( # $P4> R0> 8' T Y X ' T P X P " >Wh b T # Y U & T ] "W 8V b X $
0x280208…28039c Dummy {f00=0x00c9, f01=0x0190, f02=» "K : A T 2 ; Z [ : : [ [ : A I ! ( : A A A W Z A. c R $ )_
0x28039c…280530 Dummy {f00=0x00c9, f01=0x0002, f02=» X
0x280530…2806c4 Dummy {f00=0x00c9, f01=0x0190, f02=» J F IDENT TLDSEG REL 9.2 79-11-16 870105040920 TLDSEGK TLDS15 TLDS20 R TLDSEGK t SCTNOS LKM030 SCTSEG , ( R @ U 9C @ TTB:SB@ SEG:D
0x2806c4…280858 Dummy {f00=0x00c9, f01=0x4114, f02=» SCTMMP SCTNPE , ( 5B@ D " @ @ - U " SCTLAP` R TTB:MT d T:ACSBN v TTB:SA * & O _ 9B @ T W X g > R U %T /W. IU j
0x280858…2809ec Dummy {f00=0x00c9, f01=0x2008, f02=»
[…0x1…]
0x280b80…280d14 (2, 50) Dummy {f00=0x00c9, f01=0x0190, f02=» P _ N L % V d V f v G G v U r v G v : NP L V V : r V ~P W x _$ 8 V V x % V v % : V V 9k! P % _ V V W W r W V v ) W b G
0x280d14…280ea8 Dummy {f00=0x00c9, f01=0x0190, f02=»X4 B V_ ` @ ` W W ~ pPn D V W % 6 R , " E R & W ~ R & R P R Xv _|W NT : L W x V_ V P I D W z ` pPl H - V I 0 " R
0x280ea8…28103c Dummy {f00=0x00c9, f01=0x0190, f02=» 4 Z ! ( 4 X " 4 ! ) 4 X P 4 X P y _^ _n Y X P Y : ! ! ^ X # P Y :A , X A Y @ B. X Y
0x28103c…2811d0 Dummy {f00=0x00c9, f01=0x0190, f02=» _ W B R X X P W P Q U _ T : B R ' P Q 9BW Q 9C B ! T 4 V P ;A _ 4 X # P _ 4(@ R D 1_ W (@ R 0 D ] _ ! 4 ! ;E :B 9A ! U P jW kQ
0x2811d0…281364 Dummy {f00=0x00c9, f01=0x0190, f02=» 4 Z ! ( 4 X " 4 ! ) 4 X P 4 X P y _^ 6 6 X P Y : ! ! ^ X # P P4 P P 1P0 P W P P 5P B B J X P WL B 9 B Y B Y ! P. @=r = B @=t `=t @=tP 0P _ %
0x281364…2814f8 Dummy {f00=0x00c9, f01=0x0190, f02=» F X P A E Y Wb Y @_ X X A 0 E 8 Y _& Y @ 0 A A _: X P ( y Y W " (P 0 ) > " (P _ ) 1_ (P _ ) 1_0 (X< P _ 0 )_J (P _ ) 1 4 ! X R< X T4 X P0 , Y L C L
0x2814f8…28168c Dummy {f00=0x00c9, f01=0x0190, f02=» A A W > 4 y ! B ! T P P " ! Tf Tb A! P A! TR ! TL ! TD T@ ! T8 ! A I A P " !! 8_ !! T ! " X ! _ !! A @
0x28168c…281820 Dummy {f00=0x00c9, f01=0x0190, f02=» @" @ T 1 R 0 2P P P A h @ 8 H> @" P E ! PH X RB X P X T4 P C T C X T ! W D | D W" X R X T D ! ! _ A @ X A A A @ A !! @ T @ P ! D !! @ T @
0x281820…2819b4 (2, 51) Dummy {f00=0x00c9, f01=0x0190, f02=» 4 A _ A " < A @ T _, _0 @ T8W @" T ! _ ! ! _ A A E A A 4 @ P ! 8 !! !!fW @ T ! 4_ T _ A 4 C D4 B B A A A A A ! l !! A _^_V @ P6 X R0 X P T$ T Y W T
0x2819b4…281b48 Dummy {f00=0x00c9, f01=0x0190, f02=» ]6W P _@ @" @ E !! P ! 4 _$ !! 2_l 1 A T 0W ;W A A W W W A A ! j @ ! @ ! ! ! B J 4 ! j ! @ @ A @ T( @! ! 8 ! @ P - ! x != W 0 " @ PL R ~T }T T0
0x281b48…281cdc Dummy {f00=0x00c9, f01=0x0190, f02=» P U _ L !SSP !LL P W L @tL AtLV Q> P EtN @tB EtP P Et^ P Et` DtNT tnP Q> RJ 2% P( R 0 XtDT R , @ttT R RT @t Qd Q> 6 RJ 2% P Q> tn r P %_ S Fp S E 3 P
0x281cdc…281e70 Dummy {f00=0x00c9, f01=0x0190, f02=»P R ( >a U Wb 0 =b PtNP @tL ! T. W< PtP DtD Y Pt^ Y Pt` Y U ! T ! X6 _R _V Dt " P tv Atw ( ^ W @t P6 I @t P @X( V W HX* IX,(@ @tnP -W P B ~* ~2 t (@( @t
0x281e70…282004 Dummy {f00=0x00c9, f01=0x0190, f02=»X6 S b Qd U _ L !SSP !LL W L @ A V P E @ E P E P E D T P 2% P R 0 X T R , @ T R RT @ 6 2% P P %_ S Fp S E 3 P
0x282004…282198 Dummy {f00=0x00c9, f01=0x0190, f02=»P R ( >a U W 0 =b P P @ ! T W P D Y P Y P Y U ! T ! X6 _R _V D " P A ( ^ W @ P I @ P @ V W H I (@ @ P -W P B (@( @
0x282198…28232c Dummy {f00=0x00c9, f01=0x0190, f02=» S b Qd U _ L !SSP !LL W L @ A V P E @ E P E P E D T P 2% P R 0 X T R , @ T R RT @ 6 2% P P %_ S Fp S E 3 P
0x28232c…2824c0 Dummy {f00=0x00c9, f01=0x0190, f02=»P R ( >a U W 0 =b P P @ ! T W P D Y P Y P Y U ! T ! X6 _R _V D " P A ( ^ W @ P I @ P @ V W H I (@ @ P -W P B (@( @
0x2824c0…282654 (2, 52) Dummy {f00=0x00ca, f01=0x0190, f02=» S b X2 : : : ? ? !? P P !> P W 9P _ T !##P> ? R4 L TX P L P 4 M X M M _8 > D LW 0P Q P P E +P W : X + D X L 1 Y L : L 4W 0P8 R Q P W R
0x282654…2827e8 Dummy {f00=0x00ca, f01=0x0190, f02=» T * X<SP P W X * 0 U U. _ Y . R P Y $ P X ( _ W Y & : B P6 T G W& X ^ Y ^ B I ~ B T B : X "? P P X T _ X . P X $ ! # C } W C
0x2827e8…28297c Dummy {f00=0x00ca, f01=0x0190, f02=» ADDRESS IN CD:TAB AND COMPARE DWTVOL P* . P LD* A6,SCTCDT 8 PTAS130 SUK A6,4 N 2 P RF(N) TASHLT FC NOT FOUND? SHOULD NOT OCCUR. f P LD A5,SCTCDT P ADR A5,A6 P CC A1,1,A5 P RB(NE) TAS130 NOT THIS FC P LDR A11,A11
0x28297c…282b10 Dummy {f00=0x00ca, f01=0x0190, f02=» P* LOCK FLEXDISC P* P LDKL A8,TASECB ( " P ST A1,ECBFC,A8 FLEX FILE CODE @ P SUR A12,A12 f P LDK A7,/A6 LOCK,WAIT z P LKM P DATA 1 P LD A7,ECBRC,A8 P RF(Z) TAS131 P ANKL A7,/7FFF " P RF(NZ) TASF10 N
0x282b10…282ca4 Dummy {f00=0x00ca, f01=0x0190, f02=»NZ) TAS150 GRAVE ERR PTAS131 EQU * P ST A1,TASVOL,A2 SAVE FC 0 P P P AD A6,SCTCDT X P LDR* A5,A6 INDEX n $ P LDK A1,0 DISC NAME DISPLACEMENT P SRL A5,8 P RF(Z) TAS135 , P* DECIDE DISC DISPL FOR THIS FILE CODE $ P
0x282ca4…282e38 Dummy {f00=0x00ca, f01=0x0190, f02=»AS132 PTAS135 EQU * P LD A6,2,A6 DWT ADDR " & P RF(Z) TASHLT NO DWT ADDRESS FOUND > & P ADR A6,A1 POINTER TO VOLUME NAME h P LDK A1,3 VOL NAMES 3 WORDS & P LDR A5,A4 POINTER ASBLK VOL NAME P* , P* CHECK VOLUME NAMES IN DWT
0x282e38…282fcc Dummy {f00=0x00ca, f01=0x0190, f02=»2 P SUK A1,1 . P RB(P) TAS140 CHECK NEXT WORD IN VOL NAME P* N P* VOL NAME MATCH X P* STORE DMI , FC IN TASVOL r P* P LD A1,TASVOL,A2 P ANK A1,/0F P CWK A1,/8 $ P RF(L) TAS143 NOT FLEXIBLE DISC P L
0x282fcc…283160 Dummy {f00=0x00ca, f01=0x0190, f02=» t P* 1 FOR DRIVE 2 " P* 2 FOR FLEXDISC , P* R P SC A1,TASVOL,A2 P* t 6 P* SAVE FILE CODES FOR NEWLY LOCKED FLEXDISCS =1 ~ 2 P* (ONLY SIGNIFICANT WHEN A11 = 1 ) =1 START P* P SUK A1,2
0x283160…2832f4 (2, 53) Dummy {f00=0x00ca, f01=0x0190, f02=»,TASVOL+1,A2 FILE CODE P SC A3,TASLFD,A1 SAVE PTAS147 EQU * =1 END < P* X P* CHECK NEXT VOL IN ASBLK b P* P LDK A1,0 RET CODE P ADK A4,6 P SUK A2,2 ( P RB(NN) TAS110 MORE VOLUMES TO CHECK * P RF TAS155 OK
0x2832f4…283488 Dummy {f00=0x00ca, f01=0x0190, f02=» P ANK A1,/F8 P SUK A1,/F8 P RF(NZ) TAS150 NO FLEXDISC , P LDR A12,A12 LFLAG N P RF(NZ) TAS150 LOCKED BEFORE h P* P* UNLOCK P* P LDK A7,/B8 UNLOAD,WAIT P LKM P DATA 1 P* & P* NO MATCH TRY
0x283488…28361c Dummy {f00=0x00ca, f01=0x0190, f02=» LABEL = KMD08 DATE = 790830 PACK NBR = 001 f : ] =IR E
0x28361c…2837b0 Dummy {f00=0x00ca, f01=0x0002, f02=»
0x2837b0…283944 Dummy {f00=0x00ca, f01=0x00a4, f02=» ASM START PSCR /O ASM VDUPRT $ PSCR /O 6 ASM PRT D ASM TB3270 T PSCR /O f TRA DATDIV t SCR /O ASG /E0,TY10
0x283944…283ad8 Dummy {f00=0x00ca, f01=0x2008, f02=» START PSCR /O ASM VDUPRT $ PSCR /O 6 ASM PRT D ASM TB3270 T PSCR /O f TRA DATDIV t SCR /O ASG /E0,TY10
0x283ad8…283c6c Dummy {f00=0x00ca, f01=0x40a2, f02=» L H IDENT S:BTAB TRA 4.1 79-05-07 F1 O1111 REL 2.1 79-05-07 87015054012 S:BTAB T S:BTABB f z :B @ T :A @ D0 * @
0x283c6c…283e00 Dummy {f00=0x00ca, f01=0x0190, f02=» L H IDENT Z:TB10 TRA 4.1 79-05-07 F1 O1111 REL 2.1 79-05-07 87015054012 Z:TB10 T Z:TB10T f * & z * & * & = * &
0x283e00…283f94 (2, 54) Dummy {f00=0x00ca, f01=0x0190, f02=» * & , * & Z * & * & - * & K
0x283f94…284128 Dummy {f00=0x00ca, f01=0x0190, f02=» n * & * & : * & h * & * & ; * & Y
0x284128…2842bc Dummy {f00=0x00ca, f01=0x0190, f02=» % t P RF(NG) TIOD25 CRN <= LRN & PTIOD23 EQU * & * P LDKL A3,/1000 END OF FILE & > P ORS A3,ECBRC,A8 & ` P ANK A7,/3F & x P SUKL A7,SQR SEQ READ & P RF(NE) TIOD25 NOT SR & P LDR A1,A3 & P RF TIODME & PTIOD25 EQU * & 6 P CF A14,
0x2842bc…284450 Dummy {f00=0x00ca, f01=0x0190, f02=»TE DMTASK WITH FDB ADDRESS IN A1 & P* ' ( PTIOD68 EQU * ' 2 P ENB ' F P ENB ' R P INH ' ^ P LDR A1,A6 FDB ADDRESS ' j P LDK A7,0 ' $ P LC A7,EXTDMI,A4 TID FOR DMTASK ' P ADKL A7,'#D' ' P CF A15,FNDTID A2:=TTAB ADDR ' P LDR A5,A2 '
0x284450…2845e4 Dummy {f00=0x00ca, f01=0x0190, f02=»TE DMTASK ' | P* ( P* EXIT TO TDISP ( P* ( 6 P ABL TDISP ( @ P* ( R P EJECT ( P* ( j P************** ( t P* TIODME * ( P************** ( P* ( J P* TIODM ERROR CALL TENDIO WITH RETURN CODE IN A1 AND GOTO DISPATCHER (
0x2845e4…284778 Dummy {f00=0x00ca, f01=0x4056, f02=»RESS ( , P ABL DISEND CALL TENDIO GOTO DISPATCHER ) P* ) < P END ) F@ ) R R P EJECT ( P* ( j P************** ( t P* TIODME * ( P************** ( P* ( J P* TIODM ERROR CALL TENDIO WITH RETURN CODE IN A1 AND GOTO DISPATCHER (
0x284778…28490c Dummy {f00=0x00ca, f01=0x2008, f02=» *
0x28490c…284aa0 Dummy {f00=0x00ca, f01=0x0190, f02=» P STR A1,A4 P ST A4,FREQUE SET BLOCK FREE P LD A2,2,A4 > P LD A1,4,A4 R P* f P IFT CPU852=1 p P RF IHRTN P XIF P* P IFT CPU852=0 P RTN A15 P XIF P* P EJECT MSUBS P*
0x284aa0…284c34 (2, 55) Dummy {f00=0x00ca, f01=0x0190, f02=» A5 = TTAB ADDRESS 8 P* A7 = ORDER CODE WHEN CALLED FROM DATA MANAGEMENT P* A8 = ECB ADDRESS X P* t P* EXIT PARAMETERS:- ~ P* P* A2 = DWT INDEX * P* A6 = DWT ADDRESS IF FOUND, ELSE 0 P* P* PFNDDWT
0x284c34…284dc8 Dummy {f00=0x00ca, f01=0x0190, f02=»GTH v P* P IFT MMUPAG=1 & P ELR A2,A8 LOAD FILE CODE FROM ECB , P XIF V P* b P IFT MMUPAG=0 l ( P LDR* A2,A8 LOAD FILE CODE FROM ECB P XIF P* P EJECT MSUBS P* P* PFND100 SUK A1,4 ( P R
0x284dc8…284f5c Dummy {f00=0x00ca, f01=0x0000, f02=»
[…0x5…]
0x285740…2858d4 (2, 56) Dummy {f00=0x00cb, f01=0x0000, f02=»
[…0x9…]
0x286708…28689c Dummy {f00=0x00cb, f01=0x0190, f02=»ECK NEXT M r P LDR A6,A1 FDB ADDR N P LDKL A1,/4000 KEY NOT FOUND N , P RF DMERR N P PCHK100 EQU * N b P LDR A6,A1 FDB ADDR N v P LD A7,DWTOR,A6 N P ANK A7,/3F ORDER INDEX N P LDK A2,0 N P LC A2,FDBNIF,A6 N P CWR A2,A12 N ( P
0x28689c…286a30 Dummy {f00=0x00cb, f01=0x0190, f02=»R N P XIF O $ PDMEAER LDKL A1,/2000 EA PROTECT O PDMERR ABL DMTERR O > P EJECT O V P* O d P* MOVE RECORD O n P* O PDMT310 EQU * O P IFT INDXAC=1 O P LDR A2,A7 O P SUK A2,QDEL O " P ABL(E) DMXDEL INDEXED DELETE O P X
0x286a30…286bc4 Dummy {f00=0x00cb, f01=0x0190, f02=»FROM ADDRESS O P* P P IFT MMUPAG=0 P P XRR A4,A1 P 4 P ANK A4,/01 P F ( P RF(E) DMT320 BOTH ODD OR BOTH EVEN P Z & P CF A14,DMTBM ONE ODD AND ONE EVEN P P RF DMT340 P P* P PDMT320 LDR A4,A3 P P ANK A4,/01 P P RF(E) DMT330 BO
0x286bc4…286d58 Dummy {f00=0x00cb, f01=0x018e, f02=»RD MOVE P z P* Q P XIF Q P* Q & P IFT MMUPAG=1 Q 0 P LDR A3,A2 GET LENGTH Q F , P LDR A2,A4 GET RECEIVING BUFFER ADDRESS Q d P INH Q & P LD A4,DWTTDM,A6 GET TTAB ADDRESS Q $ P TL TTB:MT,A4 LOAD MMU REGISTERS Q $ P LD A4,PRUN GET DM TTA
0x286d58…286eec Dummy {f00=0x00cb, f01=0x0190, f02=» Q Z P XIF R P* R PDMT340 EQU * R P* R 2 P* SET STATUS USED R < P* R X P LDK A1,/FF R b PDMT350 SCR A1,A10 R v P LD A3,FDBDBR,A6 R P RF(NN) DMT394 NO DELAY R P LDR A2,A7 R P SUK A2,QSW R " P RF(E) DMT360 SEQUENTIAL W
0x286eec…287080 Dummy {f00=0x00cb, f01=0x0190, f02=»NDOM DELETE R x P RF DMT390 S $ P* WRITE IF LAST REC IN SECTOR S & P* S N PDMT360 LD A4,FDBRRO,A6 S X P CW A4,FDBMRO,A6 S v " P RF(NE) DMT400 NOT LAST RECORD S " PDMT390 LDK A7,/05 BASIC WRITE S P SLL A3,1 S P RF(N) DMT395 BASIC WANTED S
0x287080…287214 (2, 58) Dummy {f00=0x00cb, f01=0x0190, f02=»1,A6 FDB ADDRESS AS PARAMETER S P LKM T & P DATA -1 I/O AND ACTIVATION T 2 " P DATA DMTAR2 DMTASK RESTART #2 T V P LKM T | P DATA 3 EXIT T P EJECT T P* T P************** T P* DMTAR2 * T P************** T P* T P* T ,
0x287214…2873a8 Dummy {f00=0x00cb, f01=0x0190, f02=»4,DMTIOT CHECK DISC I/O T P LDR A1,A1 U P RF(NZ) DMTERR U 2 P LDKL A1,/C0FF U H $ P ANS A1,FDBDBR,A6 RELEASE BUFFER U ^ PDMT400 EQU * U " P LDR A1,A6 FDB ADDR DATA FILE U P LD A2,ECBCW+2,A9 U P ANK A2,/FF U P LD A3,ECBCW,A9 LOG REC NR
0x2873a8…28753c Dummy {f00=0x00cb, f01=0x0190, f02=» RF(E) DMT460 SEQ WRITE U P LDK A4,QRD V P CWR A7,A4 V 4 P RF(E) DMT420 RAND DEL V F P LDK A4,QRDD V d P CWR A7,A4 V x ( P RF(E) DMT420 DELAYED RANDEOM DELETE V P IFT INDXAC=1 V P LDK A4,QDEL V P CWR A7,A4 V P RF(E) DMT420 INDEXED
0x28753c…2876d0 Dummy {f00=0x00cb, f01=0x0190, f02=»ET GET CRN BUFFER V P LDR A10,A2 BUFFER ADDR W P IFT INDXAC=1 =2 START W : P LDK A3,QIRW W Z P CWR A7,A3 W n " P RF(E) DMT410 INDEXED REWRITE W P XIF =2 END W P CM CRNCIF,A2 W P* CLEAR INDEX CRN W P CM CRNCIF+2,A2 W PDM
0x2876d0…287864 Dummy {f00=0x00cb, f01=0x018e, f02=»NCDF,A10 CRN FIL E CODE W P IFT INDXAC=1 X P LDK A4,QINS X 6 P CWR A7,A4 X J P RF(E) DMT460 INDEXED INSERT X P XIF X PDMT420 EQU * X P LDK A4,QSR X P CWR A7,A4 X P RF(E) DMT450 SEQ READ X P LDK A4,QRR X P CWR A7,A4 X
0x287864…2879f8 Dummy {f00=0x00cb, f01=0x018e, f02=» P* Y P* RELEASE EA Y P* Y $ P CF A14,EARELB REL EA Y . P RF DMTAEX Y L PDMT450 EQU * Y ^ P LC A4,DWTST,A1 DWTSTATUS Y r P ANK A4,EABIT EA-BIT Y & P RF(NZ) DMTAEX EA=1. NO EA WANTED Y P* Y " P* CHECK IF EA IS SET ALREADY Y
0x2879f8…287b8c Dummy {f00=0x00cb, f01=0x0190, f02=» P CF A14,EASETB Z P RF DMTAEX Z PDMT460 EQU * Z , P* Z @ P* UPDATE LRN Z J P* Z ` P SC A2,FDBLRN,A1 Z j P ST A3,FDBLRN+1,A1 Z P IFT INDXAC=1 Z P LDK A4,QINS Z P CWR A7,A4 Z " P ABL(E) DMINS2 INDEXED INSERT Z P XIF Z
0x287b8c…287d20 Dummy {f00=0x00cb, f01=0x0190, f02=»3F00 Z ( P RF(NZ) DMTERX NO RELEASE OF BUFFER [ PDMTEX1 LD A3,ECBBA,A8 [ 8 P SUK A3,8 [ V PDMTEX2 EQU * [ h ( P CF A14,DMTRBU RELEASE BUFFER AT A3 [ | PDMTERX EQU * [ P INH [ P* A1 = RET CODE [ P* A6 = DWT ADDR [ P CF A15,TEND
0x287d20…287eb4 (2, 59) Dummy {f00=0x00cb, f01=0x0190, f02=»RANDOM READ [ 2 P********************************************* " P LD A9,DWTECB,A1 USER ECB ADDR J P IFT MMUPAG=0 p P LD A8,ECBCW,A9 ADDR OF KEY P XIF P IFT INDXAC=1 P IFT MMUPAG=1 P LDR A8,A1 FDB ADDR " P ADKL A8,F
0x287eb4…288048 Dummy {f00=0x00cb, f01=0x018e, f02=» LDR A13,A1 P ADKL A13,FDBECB ECB ADDR ] $ P CF A14,FNDKEY GET INDEX RECORD ] 6 ( PDMR006 EQU * FROM INDEXED READ NEXT ] ^ P LD A9,DWTECB,A1 ] P LDR A6,A1 FDB ADR ] P LDKL A8,FDBECB ] P ADR A8,A6 ECB ADDRESS ] P LDR A2,A2 RETURN CODE
0x288048…2881dc Dummy {f00=0x00cb, f01=0x0190, f02=»1,A1 P RF(Z) DMT010 OK P LDK A7,4 VOL UNKNOWN $ P SUR A8,A8 NO BUFFER =3 B P ABL DMTASX b PDMT010 EQU * v P* P LDKL A8,TASECB P* 6 P LD A1,TASCVO OFFSET INTO TASVOL FOR FIRST VOLUME PDMT050 EQU * , P CF
0x2881dc…288370 Dummy {f00=0x00cb, f01=0x0190, f02=»L A2,SECTLE " P ST A2,ECBRL,A8 SECTOR LENGTH P LDK A2,0 : 0 P ST A2,ECBCW,A8 SECTOR #0 VL (VOLUME LABEL) L P* P* 2 P CF A14,DMTGBU GET A DM BUFFER ADDRESS IN A3 P DATA /5700 NOP. READ ALWAYS P ADKL A3,BUFSTA & P S
0x288370…288504 Dummy {f00=0x00cb, f01=0x0190, f02=»2 ~ P LKM P DATA 1 =2 . P LDKL A14,DMTA14 SET UP A14 STACK POINTER * P CF A14,DMTIOC I/O CHECK P LD A2,VLVER,A3 VERSION | & P CWK A2,'TO' DTOSS FORMATED DISC? P RF(E) DMT100 YES P LDK A7,8 NO P ABL DMTASX ERROR RE
0x288504…288698 Dummy {f00=0x00cb, f01=0x018e, f02=»OC BASE ~ . P ST A2,ECBCW,A8 1:ST VTOC SECTOR NO = FSAT & P LD A9,VLVRL,A3 VTOC RECORD LENGTH B P ST A9,TASVRL l P EJECT P* P* SEARCH ALL VTOC:S P* PDMT110 EQU * P LD A6,TASVLE P SUK A6,1 P ST A6,TAS
0x288698…28882c Dummy {f00=0x00cb, f01=0x018e, f02=» P LD A1,TASCVO P SUK A1,2 & P ABL(N) DMT300 ALL VOLUMES CHECKED , P ST A1,TASCVO UPDATE TASCVO V $ P LDK A7,7 TOO MANY FILE SECTIONS z P LD A3,TASFIL " P ABL(NZ) DMTASX NOT DATA FILE P LD A3,ECBBA,A8 P SUKL A3,BUFSTA
0x28882c…2889c0 Dummy {f00=0x00cb, f01=0x0190, f02=» P* ACTIVATE NEXT DM TASK P* & P ADKL A7,'#D' 0 P LKM F P DATA -4 R P DATA DMTASS b P LKM v P DATA 3 EXIT P EJECT P* & P* READ NEXT VTOC SECTOR AND EXIT P* PDMT115 EQU * P LD A3,ECBBA,A8
0x2889c0…288b54 (2, 60) Dummy {f00=0x00cc, f01=0x0190, f02=»A1,TASVOL,A1 P CF A14,DMTGBU GET BUFFER P DATA /5700 NOP. READ ALWAYS 6 P ADKL A3,BUFSTA Z P ST A3,ECBBA,A8 r P ST A2,ECBCW,A8 P LDK A7,/91 WAIT =2 P LKM P DATA 1 =2 P LDKL A14,DMTA14 P CF A14,DMTIOC
0x288b54…288ce8 Dummy {f00=0x00cc, f01=0x0190, f02=» RF(NE) DMT135 NOT MASTER INDEX " P ADKL A11,14 MX FILE NAME ADDR ( PDMT135 EQU * N P ADK A3,2 SKIP CYLID b PDMT120 EQU * ~ ( P IM TASVRN INCREMENT VTOC RECORD NO P LDR A4,A3 " P ADR A4,A9 ADDRESS STATUS BYTE P LCR A2,A4 P
0x288ce8…288e7c Dummy {f00=0x00cc, f01=0x018e, f02=»ERE UNLOCKED BEFORE % f P* & P LDR A5,A7 & & P LDR A6,A8 SAVE & 8 P LDK A1,3 LOOP & P PDMTASY EQU * & f P LC A2,TASLFD,A1 FILE CODES & z P ANK A2,/FF & P RF(Z) DMTASZ NO CODE & P LDKL A8,TASECB & P SC A2,TASECB+1 & P LDK A7,
0x288e7c…289010 Dummy {f00=0x00cc, f01=0x0190, f02=» P LDR A8,A6 ' P RF DMT401 =1 END ' P* ' 0 ( P* PUT FDB ADDRESS INTO TTAB/CD:TAB ' : P* ' f PDMT400 EQU * ' p P LDK A7,0 ' PDMT401 EQU * =1 ' , P LD A2,TASTBE TTAB/CDTAB FILE CODE ADDR ' P LDR A7,A7 ' P RF(Z) DMT420 CORRECT RE
0x289010…2891a4 Dummy {f00=0x00cc, f01=0x018e, f02=» ' p " P RF(Z) DMT410 NO MASTER INDEX ( P INH INH ( . ( P LD A2,MXIND SIEZE MASTERINDEXINDEX ( @ P SUK A2,2 ( l PDMT405 EQU * ( ~ P SUK A2,4 NEXT OFFSET ( P RF(NN) DMT407 OK ( * P RF DMT408 MASTER INDEX MUST BE FOUND ( PDMT407 CW A4,MXI
0x2891a4…289338 Dummy {f00=0x00cc, f01=0x0190, f02=» PDMT410 EQU * ) P LD A3,TASFDB ) P RF(Z) DMT430 NO FDB USED ) . P LDKL A2,/FFFE ) P " P ANRS A2,A3 CLEAR FDB USE BIT ) f P RF DMT430 ) PDMT420 EQU * ) P ST A12,1,A2 FDB ADDR ) PDMT430 EQU * ) P LDR A8,A8 ) P RF(Z) DMT440 NO B
0x289338…2894cc Dummy {f00=0x00cc, f01=0x0190, f02=»ELEASE ALL FREE BUFFERS ) & P CF A14,TASCAQ CHECK ASSIGN QUEUE * $ P CF A15,QTJOB QUEUE CALLING TASK * J P ENB * r P LKM * ~ P DATA 3 * P EJECT * PDMT500 EQU * * P LD A6,TASFIL * P ABL(Z) DMT700 DATA FILE * P IFF INDXAC=1 * P
0x2894cc…289660 Dummy {f00=0x00cc, f01=0x0190, f02=»CT * P* + " P* THIS IS MASTER INDEX LOOP. + 8 P* CONNECT FDB TO FILE CODE IN DMTASK TTAB AND READ + : < P* MASTER INDEX WITH SEQUENTIAL READ ON THIS FILE CODE + v P* + P LD A7,TASTID DMTASK ID + P INH + " P CF A15,FNDTID TTAB ADDR TO
0x289660…2897f4 (2, 61) Dummy {f00=0x00cc, f01=0x0190, f02=»C A3,TASECB+1 + " P ST A3,TTB:TD+2,A2 TTAB ENTRY , P ST A12,TTB:TD+4,A2 FDB ADR , < P LD A3,ECBBA,A8 , ` P SUKL A3,BUFSTA , x " P CF A14,DMTRBU RELEASE BUFFER , P* , 0 P* CALC NO OF WORDS NEEDED IN MASTRE INDEX , P* , P LD A6,FDB
0x2897f4…289988 Dummy {f00=0x00cc, f01=0x0190, f02=»A1 GET MOST SIGN BIT , P ADK A2,5 - P SRL A2,1 NO OF WORDS NEEDED - . P RF(Z) DMT570 WRONG SIZE - R P INH - r P LD A4,MXIND LENGTH MXIND - ~ P SUK A4,4 MAX A5 VALUE - P LDKL A5,-2 OFFSET - PDMT540 EQU * - P ADK A5,4 GET ENTRY - P
0x289988…289b1c Dummy {f00=0x00cc, f01=0x018e, f02=» ] " P LD A2,FDBRRO,A1 RECORD OFFSET ^ P ADK A2,10 BUFFER HEADER ^ . P ADR A2,A3 REC ADDR ^ N P LD A4,FDBRLE,A1 REC LENGTH ^ j P SUK A4,6 KEY LENGTH ^ P ADR A2,A4 ^ " P CC A4,2,A2 DUPLICATE KEY CHAR ^ $ P RF(NE) DMR020 NEXT KEY NOT SAME ^
0x289b1c…289cb0 Dummy {f00=0x00cc, f01=0x0190, f02=» ^ P LDK A5,0 _ P LC A5,3,A2 _ P SC A5,ECBCW+3,A8 _ . P LC A5,4,A2 _ H P ECR A5,A5 _ P LC A5,5,A2 _ n P ST A5,ECBCW,A8 _ P* _ P* RELEASE BLOCK BUFFER _ P* _ P CF A14,DMTRBU _ P EJECT _ P* _ 0 P* PERFORM
0x289cb0…289e44 Dummy {f00=0x00cc, f01=0x018e, f02=» BIT _ | P SLL A2,1 ` " P LDK A7,/A RANDOM READ NO WAIT ` P ORR A7,A2 EA BIT ` D P* ` ^ P* MOVE USER ECB ` h P* ` P LDR A1,A9 FROM ECB ADDR ` P LDR A3,A8 TO ECB ADDR ` P LDK A2,6 NO OF CHAR ` P CF A14,DMTWM MOVE ECB ` P LDR
0x289e44…289fd8 Dummy {f00=0x00cc, f01=0x0190, f02=» P DATA 3 EXIT a PDMTAR4 EQU * a P* a , P* SET UP A14 STACK a 6 P* a R P CF A15,GETA14 a P LDR A6,A1 a r P LDKL A8,FDBECB a P ADR A8,A6 RR ECB a P LD A9,DWTECB,A6 USER ECB a P LD A1,ECBRC,A8 a & P ORS A1,ECBRC,A9 RET COD
0x289fd8…28a16c Dummy {f00=0x00cc, f01=0x0190, f02=»LE a x P* b ( P LD A1,FDBADF,A6 FDB ADDR DATA FILEP b & P CF A14,CRNGET GET CRN BUFFER ADDR b @ P LDR A10,A2 CRN BUFFER ADDR b j " P LDR A1,A6 FDB ADDR INDEX FILE b ( P CF A14,GTLGRN GET INDE X LOG REC NO b P SC A2,CRNCIF+1,A10 b & P ST A3,CRNCI
0x28a16c…28a300 Dummy {f00=0x00cc, f01=0x0190, f02=»URN CODEXS b P* c $ P LD A2,ECBEL,A8 EFFECTIVE LENGTH c P ST A2,ECBEL,A9 c D P LDK A1,0 RETURN CODE c P ABL DMTERX TENDIO c z P EJECT c " PDMIRN EQU * INDEXED READ NEXT c 2 P********************************************* c P LDR A1,A6
0x28a300…28a494 (2, 62) Dummy {f00=0x00cc, f01=0x0190, f02=»UFFADR c P ADK A2,10 RECORD ADDR d ( P AD A2,FDBRLE,A1 ADDR OF STATUS CHAR d , P LDK A5,/FF USED MARK d X P CCR A5,A2 STATUS d v P RF(E) DMI120 USED d P LD A4,FDBMRO,A1 d & P ST A4,FDBRRO,A1 LAST REC IN SECT d P* d P* CHECK IF END O
0x28a494…28a628 Dummy {f00=0x00cc, f01=0x0190, f02=» RF(G) DMI105 EOF d P CW A3,FDBLRN+1,A1 e P RF(L) DMI106 NOT EOF e 4 PDMI105 LDR A3,A9 e R P RF DMI030 EOF e j PDMI106 LDR A3,A9 RESTORE e P RF DMI010 NEXT REC e PDMI120 EQU * e P* INDEX RECORD IS FOUND e P* e P LDK A2,0
0x28a628…28a7bc Dummy {f00=0x00cc, f01=0x0190, f02=» LDK A1,1 PTAS155 EQU * P RTN A14 & P* 6 ( PTASHLT LDK A1,/11 INDICATE DM ERROR @ P CF A15,HALT HALT SYSTEM l P* P EJECT P* P************ P* TASS * P************ P* PIXTASS EQU * P
0x28a7bc…28a950 Dummy {f00=0x00cc, f01=0x0190, f02=» A7,A8 GET FIRST WORD OF USER ASSIGN BLOCK $ P ANK A7,/FF SKIP LEFT CHARACTER 2 0 P ORKL A7,/8100 BIT 0+7 IND. ASSIGN ONE INDEX Z ( P ESR A7,A8 SET WORD IN ASSIGN BLOCK P XIF P*~ ( P LDK A7,0 ONLY GLOBAL ASSIGN ALLOWED P* PTA
0x28a950…28aae4 Dummy {f00=0x00cc, f01=0x0190, f02=»NOT COMPLETED t 4 P* AND IF SO QUEUE THIS REQUEST VIA THE TASQUE P* N P LD A1,TASBLK X & P RF(Z) TAS050 NO CONCURRENT ASSIGN n * P LDKL A1,TASQUE START OF ASSIGN QUEUE ( PTAS020 EQU * QUEUE AS FOR GETBUFFER P LDR A2,A1 P LDR
0x28aae4…28ac78 Dummy {f00=0x00cc, f01=0x0190, f02=»QU * & P IM TASBLK INDICATE ASSIGN STARTED ! " P CM TASFDD FDB ADDR DATA FILE ! 6 P* ! 6 P ST A5,TASTTA SAVE TTAB ADDRESS OF REQUESTING TASK ! f P* ! P IFT MMUPAG=1 ! P* ! 2 P* MOVE USER ASSIGN BLOCK TO SYSTEM AREA MASBLK ! P* ! ,
0x28ac78…28ae0c Dummy {f00=0x00cc, f01=0x0190, f02=»BLOCK ADDRESS ! p , P LDK A3,34 ASSIGN BLOCK LENGTH IN BYTES " $ P CF A14,MOV:US MOVE ASSIGN BLOCK " F P XIF " n P* " z $ P ST A8,TASASB SAVE ASBLK ADDRESS " P* " P LDK A1,16 " : P ST A1,TASCXO INIT. TASCXO TO LAST ENTRY IN TASSEXXLB " P*
0x28ae0c…28afa0 Dummy {f00=0x00cc, f01=0x0190, f02=» " P LCR A2,A8 NO OF VOLUMES # . P ANK A2,/1F REMOVE INDEX BIT +DELAY+BASIC # ( P RF(Z) TAS090 NO VOL # Z P CWK A2,4 # v P RF(NG) TAS100 <=4 # PTAS090 RF TASSEM # P EJECT # P* # $ P* CHECK IF VOLUMES ARE ON LINE # P* # PTAS1
0x28afa0…28b134 (2, 63) Dummy {f00=0x00cc, f01=0x0190, f02=»1,0 SET CR # $ P RF(Z) TAS160 ALL VOLUMES FOUND $ P* $ : , P* ALL VOL NOT FOUND. ACT FLEXDISCTASK $ D P* $ t P LD A1,TASCVO $ ~ P LDK A2,2 ID DMTASK FLEXDISC $ P SC A2,TASVOL,A1 SEE TAS195 $ P EJECT $ P* $ , P* CHECK IF FILE CO
0x28b134…28b2c8 Dummy {f00=0x00cc, f01=0x0190, f02=»D $ j P LDR A10,A10 TC % P RF(Z) TAS165 GLOBAL ASSIGN % " P LD A2,TASTTA TTAB ADDR % F P LDR A4,A2 % f P LD A2,TTB:TD,A4 % x P ADKL A4,TTB:TD+1 % P RF TAS170 % PTAS165 EQU * % P LD A4,SCTCDT % P LDR* A2,A4 % P ADK A4,1 %
0x28b2c8…28b45c Dummy {f00=0x00cc, f01=0x0190, f02=»ST,A10 5 P ANK A3,/40 6 & P RF(NZ) DMT639 OTHER REQUEST BUSY 6 " P LDK A3,8 MAX NO OF INDE*2 6 L PDMT620 EQU * 6 n P SUK A3,2 6 $ P RF(N) DMT640 MORE THAN 4 INDEX 6 P LDR A6,A10 6 P ADR A6,A3 6 P LD A2,FDBAI1,A6 6 P RB(NZ) DMT620
0x28b45c…28b5f0 Dummy {f00=0x00cc, f01=0x0190, f02=» 6 P LDK A5,8 NR OF INDEX *2 7 PDMT625 EQU * 7 ( P SUK A5,2 7 < " P RF(N) DMT635 ALL FDB UPPDATED 7 N P LDR A1,A10 FDB DATA 7 t P ADR A1,A5 7 $ P LD A3,FDBAI1,A1 FDB ADDR INDEX 7 P RB(Z) DMT625 NO INDEX FILE 7 P LDKL A1,FDBADF 7 P A
0x28b5f0…28b784 Dummy {f00=0x00cc, f01=0x0190, f02=»DMT635 EQU * 7 P LC A1,DWTST,A10 8 0 P SC A1,DWTST,A12 SAME BUSY BITS AS DATA FILE 8 , P ENB ENB 8 ` P LD A1,TASMXA 8 r ( P ST A1,FDBMIA,A12 MASTER INDEX ADDR 8 P RF DMT720 8 ( PDMT639 ADK A7,2 A7=13=OTHER REQ BUSY 8 * PDMT640 ADK A7,1 A7=11=
0x28b784…28b918 Dummy {f00=0x00cc, f01=0x018e, f02=»ILE 8 v & P ST A12,FDBADF,A12 FDB ADDR TO FDB 9 P LD* A1,TASASB ASBLK ADDR 9 6 P ANKL A1,/6000 9 X P SLL A1,1 9 n $ P ORS A1,FDBDBR,A12 DELAY + BASIC 9 PDMT720 EQU * 9 P* 9 ( P* SET FDBMRN TO MAX REC NO IN FILE 9 P* 9 P LDR A1,A12
0x28b918…28baac Dummy {f00=0x00cc, f01=0x0190, f02=» P AD A2,-2,A1 : P SUKL A1,EXTELE-2 : P ST A1,FDBCEX,A12 : 2 P SUK A2,1 : L P ST A2,FDBSNR,A12 : ^ P LDR A1,A12 : x " P CF A14,GTLGRN GET LOG REC NO : P LDK A1,0 : " P LC A1,FDBBLF,A12 BLOCK FACTOR : P SUK A1,1 : P ADR A3,A1 :
0x28baac…28bc40 Dummy {f00=0x00cc, f01=0x414a, f02=»,FDBMRN+1,A12 : P* ; 4 P* CALCULATE FDBMRO WHICH IS MAX FDBRRO IN FILE ; P* ; X P LD A6,FDBRLE,A12 REC LENGTH ; b P ADK A6,1 ; P LDK A7,0 ; P LC A7,FDBBLF,A12 BLOCK FACT ; P SUK A7,1 ; P CF A14,MPYMOD A1,A2=A6*A7 ; P ST A2
0x28bc40…28bdd4 (2, 64) Dummy {f00=0x00cd, 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
0x28bdd4…28bf68 Dummy {f00=0x00cd, f01=0x0190, f02=»AT MADE THE I/O REQUEST. THUS I/O WITH WAIT CAN P* NOT BE ABORTED. 8 P* T P* ^ PTABORT EQU * h P IFT MMUPAG=0 | & P LDR* A3,A8 GET FIRST WORD OF ECB P XIF P* P IFT MMUPAG=1 $ P ELR A3,A8 GET FIRST WORD OF ECB
0x28bf68…28c0fc Dummy {f00=0x00cd, f01=0x0190, f02=»RSOR ADDRESS E z P CF A14,RDMOD READ MODIFIED F " P RB TRANS SEND MODIFIED FIELDS F 8 P EJECT F ^ P* F l P* F v $ P* DISPLAY MODIFIED FIELDS ON VDU F P* F P* F P* A3=VDU POSITION F P* A4=VDU IMAGE POINTER F P* A5=MODIFIED INDICA
0x28c0fc…28c290 Dummy {f00=0x00cd, f01=0x0002, f02=»
0x28c290…28c424 Dummy {f00=0x00cd, f01=0x0190, f02=» 0 P IDENT DFTAB REL 9.2 79-11-16 870105040920 P 8 P* @ 8 P**************************************************** J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* & P* DFTAB = DISC FILE CODE TABLE P* P* P* LEVE
0x28c424…28c5b8 Dummy {f00=0x00cd, f01=0x40e8, f02=»** ^ P* P* DISC FILE CODE TABLE P* 4 P ENTRY DFTAB > P ENTRY DFTABE R P* h P* r PDFTAB EQU * | P DATA /F0F1,/F2F3 P DATA /F8F9,/FAFB PDFTABE EQU * P END @ P* P* P* LEVE
0x28c5b8…28c74c Dummy {f00=0x00cd, 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*
0x28c74c…28c8e0 Dummy {f00=0x00cd, 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*
0x28c8e0…28ca74 (2, 65) Dummy {f00=0x00cd, f01=0x0190, f02=»D A3,4,A8 REQUESTED LENGTH # P CWK A3,130 $ " " P ABL(NE) END:10 ILLEGAL LENGTH $ 6 P LD A4,2,A8 BUFFER ADDRESS $ P RB FD:045 $ ~ P XIF $ P* $ P EJECT DRFD01 $ P* $ P*************** $ P* * $ P* TEST STATUS *
0x28ca74…28cc08 Dummy {f00=0x00cd, f01=0x018e, f02=» P LDR A1,A3 % P ANK A1,1 % & P RF(NZ) FD:090 DISC NOT OPERABEL? % ( " P ANKL A3,/200 WRITE PROTECTED? % R P ORS A3,DWTRCW,A6 % x P IFF TOSS+IBM=0 % P RF LOA:05 READ VOLUME NAME % P* % PFD:075 EQU * % P XIF % $ P LD A1,DWTRCW,A6
0x28cc08…28cd9c Dummy {f00=0x00cd, f01=0x0190, f02=»WHEN NO RECORD IS READ BEFORE, THE FIRST RECORD IN SPECIFIED & P* SECTOR WILL BE MADE AVAILABLE D P* n 8 P****ENTRY PARAMETERS******************************** x P* : P* A1 = FDB ADDRESS FOR CURRENT RECORD (BEFORE NEXT) P* FDB
0x28cd9c…28cf30 Dummy {f00=0x00cd, f01=0x0190, f02=»NTED ` : P* A3 = ADDRESS OF BLOCK BUFFER FROM PREVIOUS CALL IN > P* SAME DM-REQUEST. =0 WHEN NO BYUFFER IS ALLOCATED J P* A8 = ECB ADDRESS P* 8 P****EXIT PARAMETERS********************************* P* 2 P* RETURN AT AD
0x28cf30…28d0c4 Dummy {f00=0x00cd, f01=0x018e, f02=»DE FOM PHYS I/O) WHEN NO BUFFER IS ALLOCATED r $ P* A2 = FDBRRO = RECORD OFFSET 4 P* A3 = BUFFER ADDRESS * P* = 0 WHEN NO BUFFER IS ALLOCATED | P* A8 = ECB ADDRESS P* 8 P****USED REGISTERS**********************************
0x28d0c4…28d258 Dummy {f00=0x00cd, f01=0x0190, f02=» X P EJECT PRDNXTR EQU * P LDR A10,A3 SAVE BUFFER ADDR * P RF(NZ) RDN200 BUFFER EXIST N P STR A7,A14 r P SUKL A14,4 P ST A6,2,A14 P* P* GET A BUFFER P* PRDN040 EQU * & P CF A14,GTBKBU GET BLOCKBU
0x28d258…28d3ec Dummy {f00=0x00cd, f01=0x0190, f02=»DR A10,A3 BUFFER ADDR $ P LDK A7,/91 PHYS READ WITH WAIT P LKM F P DATA 1 R & P CF A14,DMTIOZ CHECK RETURN CODES b P LDR A1,A1 P RF(NZ) RDN900 ERROR P LDR A1,A6 FDB ADDR PRDN080 EQU * P LDR A6,A1 FDB ADDR P L
0x28d3ec…28d580 Dummy {f00=0x00cd, f01=0x0190, f02=»RDN200 EQU * $ P LD A2,FDBRRO,A1 REC ORD OFFSET P RF(NN) RDN220 NOT FIRST REC < P STR A7,A14 ` P SUKL A14,4 t P ST A6,2,A14 P RB RDN080 FIRST REC WANTED P* : P* CHECK IF THIS OFFSET POINTS TO LAST REC IN BUFFER P
0x28d580…28d714 (2, 66) Dummy {f00=0x00cd, f01=0x0190, f02=»EC IN CURRENT BLOCKBUFFER P* " $ P AD A2,FDBRLE,A1 RECOR D LENGTH , P ADK A2,1 STATUS CHAR T P ST A2,FDBRRO,A1 NEW OFFSET r P RF RDN950 RETURN P* 4 P* CHECK IF THIS RECORD ALSO IS LAST IN EXTENT P* PRDN300 EQU *
0x28d714…28d8a8 Dummy {f00=0x00cd, f01=0x0190, f02=» AD A5,EXTLEN,A3 EXTENT LENGTH P SUK A5,1 & $ P CW A5,FDBSNR,A1 SECT NO CURRENT 8 , P RF(NG) RDN400 IT WAS LAST REC IN EXTENT ` P* P* NEW SECTOR P* P IM FDBSNR,A1 SECT NO P LDR A6,A1 FDB ADDR P RF RDN500 P*
0x28d8a8…28da3c Dummy {f00=0x00cd, f01=0x4028, f02=» % P RTN A14 & P END & @ & $
0x28da3c…28dbd0 Dummy {f00=0x00cd, 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* +
0x28dbd0…28dd64 Dummy {f00=0x00cd, f01=0x0190, f02=» A6,A10 g P ADR A6,A5 h ( P LD A1,FDBAI1,A6 FDB ADDR INDEX FILE h " P RB(Z) DXI020 NO INDEX h N P* h l ( P* GET FILE CODE FOR THIS FDB ADDR h v P* h P LD* A6,SCTCDT h PDXI030 SUK A6,4 h P LD A7,SCTCDT h P ADR A7,A6 h P CW A1
0x28dd64…28def8 Dummy {f00=0x00cd, f01=0x0190, f02=»CBFC,A8 INDEX FILE h P LDR A6,A11 i P SUK A6,QINS i . P RF(E) DXI080 INDEXED DELETE i B P* i f $ P* GET ADDRESSS OF DATA RECORD i p P* i P LD A6,ECBBA,A12 SECTOR ADDR i P ADK A6,2 CYLID i $ P AD A6,FDBRRO,A10 ADDR DATA REC i P A
0x28def8…28e08c Dummy {f00=0x00cd, f01=0x0190, f02=» ADDR i v $ P LD A6,ECBBA,A9 USER BUFFER ADDR j P AD A6,FDBKA,A1 KEY OFFSET j 6 P IFT MMUPAG=1 j X P LDR A6,A1 j n " P ADKL A6,FDBKEY ADDR KEY AREA j P XIF j P IFT INDXAC=1 j $ P LDK A7,/1F INSERT INDEX NOWAIT j PDXI090 EQU * j P* j
0x28e08c…28e220 Dummy {f00=0x00cd, f01=0x0190, f02=» DATA DMTAR5 j P LD A7,ECBRC,A8 k P RF(N) DMTAR5 REQ ERR k , P RB DXI020 NEXT INDEX DIRECT k J PDXI100 LKM k n P DATA 3 EXIT k PDMTAR5 EQU * k " P LD A6,FDBADF,A1 FDB DATA FILE k P LD A9,DWTECB,A6 USER ECB k P LDKL A8,FDBECB k P
0x28e220…28e3b4 (2, 67) Dummy {f00=0x00cd, f01=0x0190, f02=»A9 RC TO USER k P LDK A1,0 RETURN CODE l & P LC A2,FDBDBR,A6 NR OF READY INDEX l 4 P ADK A2,1 COUNT INDEXES l ^ $ P CC A2,FDBNIF,A6 TOT NR OF INDEX l ~ P RF(NE) DXI200 l P LD A7,DWTOR,A6 l P ANK A7,/3F ORDER CODE l P SUK A7,QINS INDEXED I
0x28e3b4…28e548 Dummy {f00=0x00cd, f01=0x0190, f02=» P ADKL A10,2 CYLID m P AD A10,FDBRRO,A6 m & P AD A10,FDBRLE,A6 ADDR STATUS CHAR m 8 P LDK A1,0 STATUS FREE m b . P ABL DMT350 CONTINUE AS FOR RANDOM DELETE m PDXI200 EQU * m P SC A2,FDBDBR,A6 m P LKM m " P DATA 3 EXIT. MORE INDEX LEFT
0x28e548…28e6dc Dummy {f00=0x00cd, f01=0x0000, f02=»
[…0x5…]
0x28eec0…28f054 (2, 68) Dummy {f00=0x00ce, f01=0x0000, f02=»
[…0x9…]
0x28fe88…29001c Dummy {f00=0x00ce, f01=0x018e, f02=»0,C1 CAS F0,F1 DISC F8,F9 FLOPP $ PSCTANO DATA 0 APPLICATION NUMBER ( 2 PSCTADA DATA 0 APPLICATION DISC SECTOR ADDRESS P PSCTPAG DATA 0 PAGTAB ADDRESS PSCTSEG DATA 0 SEGTAB ADDRESS PSCTSWB DATA 0 SWBTAB ADDRESS $ PSCTNOS DATA 0 NUMBER O
0x29001c…2901b0 Dummy {f00=0x00ce, f01=0x0190, f02=» P INDEX REL TTAB 0 PSCTLAC DATA 0 LOGICAL ADDRESS OF COMMON PART & PSCTMMP DATA 0 MMU TABLE PAGE ENTRY R P INDEX REL TTAB | * PSCTLAP DATA 0 LOGICAL ADDRESS OF PAGES ( PSCTNPE DATA 0 NUMBER OF PAGE ENTRIES & PSCTSTB DATA STB SYSTEM S
0x2901b0…290344 Dummy {f00=0x00ce, f01=0x018e, f02=»SCTCDT DATA 0 CDTAB ADDRESS PSCTBUG DATA BUG DEBUGGER $ & PSCTDMT DATA X:B DMTASKS IN SYSTEM D P BIT 13:D2,14:D1,15:D0 n 0 PSCTDMI DATA X:C DM INDEX RECORD BUFFER SIZE ( PSCTDML DATA X:D DM NO OF LOCAL FILES * PSCTDMC DATA X:E DM NO OF C
0x290344…2904d8 Dummy {f00=0x00ce, f01=0x40fe, f02=» P* P* SYSTEM STACK P* $ P RES 145 . P DATA /FCC0 AND PSW > & PSTB DATA LOOP AND PC FOR IDLE LOOP Z P P P* P* IDLE LOOP P* P PLOOP RB * P P P P END @ DM NO OF C
0x2904d8…29066c Dummy {f00=0x00ce, 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
0x29066c…290800 Dummy {f00=0x00ce, f01=0x0190, f02=» T:DTC0 T:DTC0D REGGO & * & TC * 6 * d * : H IDENT T:AKA0 TRA 4.2 80-07-30 F1 O1111 02.01.XXX.1 T:AKA0 T:AKA0A . * T:DKA0 D:CB9
0x290800…290994 (2, 70) Dummy {f00=0x00ce, f01=0x0190, f02=» * & [ a $ , ( y * KA R y : H IDENT T:DKA0 TRA 4.2 80-07-30 F1 O1111 02.01.XXX.1 T:DKA0 T:DKA0D
0x290994…290b28 Dummy {f00=0x00ce, f01=0x0190, f02=»XX.1 ^ T:AGA0 T:AGA0A ^ . * T:DGA0 D:CB90 C:CB90 D:TB90 Z:TB90 2 * & 0 d * & * & = a & " Y P GA
0x290b28…290cbc Dummy {f00=0x00ce, f01=0x0190, f02=»EXIT PARAMETERS********************************* P* 8 P* A1 = UNCHANGED B ( P* A2 = ADDRESS OF FOUND CRN-BUFFER P* 8 P****USED REGISTERS********************************** P* P* A1 - A4 P EJECT DMSUBR PCRNG
0x290cbc…290e50 Dummy {f00=0x00ce, f01=0x0004, f02=» P X
0x290e50…290fe4 Dummy {f00=0x00ce, f01=0x0190, f02=» J F IDENT SYSTAB REL 9.2 79-11-16 870105040920 F B SCTMSZK SCTSFA SCTEFA SCTPLD SCTANO SCTADA SCTPAGL SCTSEG R F B SCTSWB SCTNOS SCTNOP SCTPSZ SCTMMC SCTLACL SCTMMP SCTLAP F B SCTNPE SCTSTB SCTOPT SCTTCT
0x290fe4…291178 Dummy {f00=0x00ce, f01=0x0190, f02=»:PA PAG:SB SWB:NC SWB:DS SWB:ELS SWB:NS0 z T:ACSB 4 SEG:ST F SEG:DSL Z SEG:EL n SEG:PBI PAG:QF PAG:QBV PAG:PA PAG:SB SWB:NC SWB:DS
0x291178…29130c Dummy {f00=0x00ce, f01=0x018e, f02=» IHSOP . IH1501W > IH1502 P CHLT1 b IHFDN r CHRT1 , ( CHRT2 , ( ! , ( 1
0x29130c…2914a0 Dummy {f00=0x00ce, f01=0x0190, f02=» , ( a , ( q 4 HALTN d t SCTMSZK SCTSFA SCTEFA SCTPLD SCTANO SCTADA S
0x2914a0…291634 (2, 71) Dummy {f00=0x00ce, f01=0x0190, f02=» SCTPSZ SCTMMC SCTLACL 0 SCTMMP D SCTLAP X SCTNPE l SCTSTB SCTOPT SCTTCT SCTCDT SCTBUG~ SCTDMT , (
0x291634…2917c8 Dummy {f00=0x00ce, f01=0x4062, f02=» _ , L@ ^ X SCTNPE l SCTSTB SCTOPT SCTTCT SCTCDT SCTBUG~ SCTDMT , (
0x2917c8…29195c Dummy {f00=0x00ce, f01=0x0190, f02=» % | , P* FDB-CEX,ECB,SNR,RRO & 8 P* ECB-FC,CW,BA,DWT-OR,ECB,EXTDMI & 8 P* A8 = ECB ADDR & t P* & 8 P****EXIT PARAMETERS********************************* & P* & P* A1 = A6 = FDB ADDR & 0 P* A2 = FDB
0x29195c…291af0 Dummy {f00=0x00ce, f01=0x0190, f02=» THE FOUND CORE BUFFER & v P* A3 = BUFFER ADDRESS ' & P* A5 = ORDE R CODE ' F P* A8 = ECB ADDR ' b P* A9 = DM ECB ADDR ' | P* ' 8 P****USED REGISTERS********************************** ' P* ' P* A1 - A9 ' P* ' : P**
0x291af0…291c84 Dummy {f00=0x00ce, f01=0x0190, f02=»RENT EXTENT BLOCK POINTER ' | P LD A1,EXTDMI,A4 DMIDENT, FC ( " " P LD A2,FDBSNR,A6 SECTOR NUMBER ( F P LD A9,DWTECB,A6 DM ECB ( l P ANK A1,/FF =1 ( $ P STR A1,A8 DISC VOL FILE CODE =1 ( P LDR A4,A2 SAVE ( P LDKL A5,SECTLE ( " P ST A5,ECBRL
0x291c84…291e18 Dummy {f00=0x00ce, f01=0x0190, f02=»SECTOR MUST BE READ FROM DISC ( P LDKL A2,-1 RET CODE ) & PGTB040 EQU * ) B P ST A4,ECBCW,A8 SECTOR NR ) V P LDR A5,A3 ) x 2 P ADKL A5,BUFSTA A5 = DATA BUFFER START ADDRESS ) P ST A5,ECBBA,A8 ) P LD A5,DWTOR,A6 ) P ANK A5,/3F ) ( P LDR
0x291e18…291fac Dummy {f00=0x00ce, f01=0x018e, f02=» ORDER CODE ) P EJECT DMSUBR * 8 P****DESCRIPTION************************************* * , P* * h D P* GTLGRN WILL CONVERT FDBSNR AND FDBRRO TO A LOGICAL RECORD NO * r P* * 8 P****ENTRY PARAMETERS******************************** * P* *
0x291fac…292140 Dummy {f00=0x00ce, f01=0x0190, f02=» * Z P* + P* A1=A5=A6= FDB ADDRESS + P* A2,A3 = LOG RECORD NO + 4 P* + V 8 P****USED REGISTERS********************************** + ` P* + P* A1 - A7 + P* + : P****************************************************** + P EJECT
0x292140…2922d4 (2, 72) Dummy {f00=0x00cf, f01=0x0190, f02=» + p P LD A7,FDBCEX,A1 EXT ADDR , ( P ADKL A7,EXTLEN ADDR TO LAST LENGTH , * PGTL050 EQU * , V P CWR A3,A7 , j . 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 ADKL
0x2922d4…292468 Dummy {f00=0x00cf, f01=0x0190, f02=»OTAL NO OF SECTORS , ~ ( P AD A6,FDBSNR,A1 TOTAL NR OF SECTORS - P* - F ( P* CONVERT FDBRRO TO NO OF RECORDS - P 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,F
0x292468…2925fc Dummy {f00=0x00cf, f01=0x0190, f02=»UPDATE BUFFER ADDRESSES 5 P ADK A2,1 6 ( P SUK A3,1 DECREMENT REQUESTED LENGTH 6 2 & P RB(P) MVUS10 MORE CHAR. TO MOVE? 6 ^ P RB MVUS30 NO, RETURN 6 P* 6 P EJECT DMSUBR 6 P* 6 P* M O V : S U 6 P* 6 F P* THIS ROUTINE MOVES D
0x2925fc…292790 Dummy {f00=0x00cf, f01=0x0190, f02=»USED, DEPENDING ON WHETHER THE BUFFER ADDRESSES ARE EVEN OR NOT. 6 P* 7 H : P* INPUT: A1 = ADDRESS OF SENDING BUFFER (SYSTEM AREA) 7 R : P* A2 = ADDRESS OF RECEIVING BUFFER (USER AREA) 7 . P* A3 = NUMBER OF BYTES TO BE MOVED 7 P* 7 "
0x292790…292924 Dummy {f00=0x00cf, f01=0x0190, f02=»F REQUESTED LENGTH <= 0 7 x P STR A5,A14 SAVE A5 8 ( P LDR A4,A2 CHECK USER BUFFER ADDRESS 8 < P ANK A4,1 8 h . P RF(NZ) MVSU40 USER BUFFER ADDRESS UNEVEN? 8 z . P LDR A4,A1 NO, CHECK SYSTEM BUFFER ADDRESS 8 P ANK A4,1 8 0 P RF(NZ) MVSU60 SYSTEM BU
0x292924…292ab8 Dummy {f00=0x00cf, f01=0x018e, f02=»UNEVEN? 8 p P* 9 PMVSU20 MVSU A3 9 P* 9 0 " PMVSU30 LDR* A5,A14 RESTORE A5 9 : P* 9 ` PMVSU35 RTN A14 9 j P* 9 P EJECT DMSUBR 9 P* 9 P* 9 0 PMVSU40 EQU * USER BUFFER ADDRESS WAS UNEVEN 9 * P LDR A4,A1 CHECK SYSTEM BUFFER
0x292ab8…292c4c Dummy {f00=0x00cf, f01=0x0190, f02=» 9 ^ P RF MVSU65 : P* : 2 PMVSU60 EQU * SYSTEM BUFFER ADDRESS WAS UNEVEN : $ 0 P LCR A4,A1 GET ONE CHAR. FROM SYSTEM BUFFER : Z P ECR A4,A4 : * P ADK A1,1 UPDATE SYSTEM BUFFER ADDRESS : ( P SUK A3,1 DECREMENT REQUESTED LENGTH : * P RF(NP) MVSU70
0x292c4c…292de0 Dummy {f00=0x00cf, f01=0x0190, f02=»ER BUFFER : p & P ADK A1,1 UPDATE BUFFER ADDRESSES ; P ADK A2,2 ; < ( P SUK A3,1 DECREMENT REQUESTED LENGTH ; N & P RB(P) MVSU60 MORE CHAR. TO MOVE? ; z P RB MVSU30 NO, RETURN ; P* ; 4 PMVSU70 ELR A3,A2 GET LAST CHAR. FROM USER BUFFER ; $ P ANK
0x292de0…292f74 (2, 73) Dummy {f00=0x00cf, f01=0x018e, f02=»FFER ; j P RB MVSU30 RETURN < P* < & P EJECT DMSUBR < 0 P* < H P* < R 2 PMVSU80 EQU * BOTH BUFFER ADDRESSES WERE UNEVEN < 2 P LDR* A4,A1 GET FIRST CHAR. FROM SYSTEM BUFFER < 0 P ELR A5,A2 GET FIRST CHAR. FROM USER BUFFER < $ P ANK A4,/FF
0x292f74…293108 Dummy {f00=0x00cf, f01=0x0190, f02=» < b & P ADK A1,1 UPDATE BUFFER ADDRESSES = P ADK A2,1 = 2 ( P SUK A3,1 DECREMENT REQUESTED LENGTH = D * P RB(P) MVSU10 MORE CHARACTERS TO MOVE? = p P RB MVSU30 NO, RETURN = P* = , PMVSU90 EQU * REQUESTED LENGTH WAS UNEVEN = ( P SUK A3,1 MAKE REQ
0x293108…29329c Dummy {f00=0x00cf, f01=0x0000, f02=»
0x29329c…293430 Dummy {f00=0x00cf, f01=0x0004, f02=»!(!0
0x293430…2935c4 Dummy {f00=0x00cf, f01=0x0190, f02=» J F IDENT DMSUBR REL 9.2 79-11-16 870105040920 F B EATESTK EASETB EARELB CRNGET CALSNO GTBKBU GTLGRNL DMTIOT R . * CHKIND REQEND DMTIOZ MOV:US MOV:SU CHKIND , ( ? ? !? P P !> P W
0x2935c4…293758 Dummy {f00=0x00cf, f01=0x0190, f02=»WTTQ , ( = R L X P L P 4 M QTJOB < DWTTDM L DWTST ^ , ( Y X M M n IHRTN EATESTK z FDBEALL , ( q _8 > D W 0P Q F
0x293758…2938ec Dummy {f00=0x00cf, f01=0x0190, f02=» X 1 Y : , ( 4W 0P R Q P FREQUEW P * & W R D Q ( 0 5 @ b CRNGET FDBCRL , ( 1 A Z> : D W (P CRNTID CRNQUE
0x2938ec…293a80 Dummy {f00=0x00cf, f01=0x018e, f02=»SNO X FDBBLF , ( G I D ) E : T DIVMOD P FDBEXT~ b , ( _ $ &S P W X $ t EXTLEN FDBCEX , ( yH ( * U U *_ EXTBAS
0x293a80…293c14 (2, 74) Dummy {f00=0x00cf, f01=0x0190, f02=» , ( P X 2 _ W Y 4 : DWTECB 8 ECBRC J , ( D 6 8 B :P T Z FDBDBR ECBBA BUFDMIT , ( D$ G :W X < Y < B > DMTIOZ DWT
0x293c14…293da8 Dummy {f00=0x00cf, f01=0x0190, f02=» GTBKBU , EXTDMI , ( ) 8_ X , P H X 0 8 & SECTLE V ECBRL h DMTGBU x ECBCW , ( ? ! # J C L NW C BUFSTAH , ( Y P R C > X B%? : X
0x293da8…293f3c Dummy {f00=0x00cf, f01=0x0000, f02=»
[…0xd…]
0x2953c0…295554 (2, 76) Dummy {f00=0x00d0, f01=0x0000, f02=»
[…0x1f…]
0x298640…2987d4 (2, 80) Dummy {f00=0x00d1, f01=0x0000, f02=»
[…0x9…]
0x299608…29979c Dummy {f00=0x00d1, f01=0x2008, f02=»
0x29979c…299930 Dummy {f00=0x00d1, f01=0x0002, f02=»!
0x299930…299ac4 Dummy {f00=0x00d1, f01=0x0190, f02=» J F IDENT MONTAB REL 9.2 79-11-16 870105040920 F B MONTABK SPDLCI FREQUE PAGQUE INTLT1 INTLT2 INTLT3L INTLT4 R & " INTRT1 INTRT2 INTRT3 INTRT4 MONTABK FREQUE PAGQUE INT
0x299ac4…299c58 Dummy {f00=0x00d1, f01=0x4154, f02=» INTRT4 SYSLOD CTAB01L $ CTAB02 6 * & H CTAB03 v ITADN KBAD3 TPADN GPADN DIADN DYADN , (
0x299c58…299dec Dummy {f00=0x00d1, f01=0x2008, f02=»
0x299dec…299f80 Dummy {f00=0x00d1, f01=0x0000, f02=»
[…0x2…]
0x29a2a8…29a43c Dummy {f00=0x00d1, f01=0x0190, f02=» =b P P @ ! T. W< P D Y P Y P Y U ! T ! X6 _R _V D " P A ( ^ W @ P6 I @ P @ V W H I (@ @ P -W P B 2(@( @ 8 _ T ` ` 9A S ^
0x29a43c…29a5d0 Dummy {f00=0x00d1, f01=0x0190, f02=» !SSP !LL W L @ A V P E @ E P E P E D T P 2% P R 0 X T R , @ T R RT @ 6 2% P P %_ S -@ S E 3 P S I P S J P S ( P S
0x29a5d0…29a764 Dummy {f00=0x00d1, f01=0x0190, f02=» =b P P @ ! T. W< P D Y P Y P Y U ! T ! X6 _R _V D " P A ( ^ W @ P6 I @ P @ V W H I (@ @ P -W P B 2(@( @ 8 _ T ` ` 9A S ^
0x29a764…29a8f8 Dummy {f00=0x00d1, f01=0x0190, f02=» !SSP !LL W L @ A V P E @ E P E P E D T P 2% P R 0 X T R , @ T R RT @ 6 2% P P %_ S -@ S E 3 P S I P S J P S ( P S
0x29a8f8…29aa8c Dummy {f00=0x00d1, f01=0x0190, f02=» =b P P @ ! T. W< P D Y P Y P Y U ! T ! X6 _R _V D " P A ( ^ W @ P6 I @ P @ V W H I (@ @ P -W P B 2(@( @ 8 _ T ` ` 9A S ^
0x29aa8c…29ac20 Dummy {f00=0x00d1, f01=0x0190, f02=» !SSP !LL W L @ V P E @ E P E P E D T P 2% P R 0 X T R , @ T R RT @ 6 2% P P %_ S -@ S E 3 P S I P S J P S ( P S
0x29ac20…29adb4 (2, 83) Dummy {f00=0x00d1, f01=0x0190, f02=» =b P P @ ! T. W< P D Y P Y P Y U ! T ! X6 _R _V D " P A ( ^ W @ L P Q R ;A [ [ : P Q R ;A [ [ : Q R P ;A [ [ : ? ?
0x29adb4…29af48 Dummy {f00=0x00d1, f01=0x0190, f02=» D LW 0P Q P P E +P W : X + X L 1 Y L : L 4W 0P8 R Q P W R D + Q ( 0 5 @ 1 A Z> : D NW (P D + I W6 @K T ( AK U 1_ D + I D N ) E N : T * M<SP P W X * 0
0x29af48…29b0dc Dummy {f00=0x00d1, f01=0x0190, f02=» ^ B I ~ B T B : X "? P P X T _ X . P X $ ! # C W C C X %? : X &_ 0 D . P , _ D . D $ D * M T ( T & ^ S W : U ; $ T $ T $ T&x : : $
0x29b0dc…29b270 Dummy {f00=0x00d1, f01=0x0190, f02=» U $ ) Y _& (# )_4 $ ($ ) YR_L U p 0_8 $_< | #f x Q T ] QhT ] 5 @ 1 A Z> : D NW (P D + P> Rj P +P8 P> PH R R W P P 5P, 2 S : X P W B Y "W X " 2W| B
0x29b270…29b404 Dummy {f00=0x00d1, f01=0x0190, f02=» * _ B Qh R SD X ! 3 X~_ X P 0 Y P C ) _ R _ B ! P Y _` X ! X St _ B Y _z 6 X P AR + R Y Wb Y @_ X X AR + S Y _& Y SZ @Tx 0 ATz ATx_: X P ( y Y W ] (P 0 ) > Q,
0x29b404…29b598 Dummy {f00=0x00d1, f01=0x0190, f02=» X T* X P& , Y L C L C ) > @Q* @Q& @Q( AQ(X * _" X P y Y X P T SZ @Tx T ATz ATx > ATZ AT^ ATb ATf ATj TnW > P 5 BHBB Qb ![ B ![ T P P
0x29b598…29b72c Dummy {f00=0x00d1, f01=0x0190, f02=» T W " X ![ _ ! AT @TzP @TxP !X ATz AT|_ ! @T|P @] X@ !Y TD AT !Y T @TzP( @] P" @Tx U< 8 !W X Y !X AT _B ![ X>_b AT @] @T T 1 Z 0 2P P P AT S0 @Tv 8 H @] P E P^ X RX X P X TJ P C
0x29b72c…29b8c0 Dummy {f00=0x00d1, f01=0x0190, f02=» @Tv AT Y " @ _R ! @TzT @T|P !Y T ! @TzT @T|X Wx A I T> + V : TX @Tx @T X @T @T AT Xh ! @TzXV ![ T @T P !Y ! _p 1T, @T X @T~P @T T0 !X !Y AT _ AT Xh B ATz @T~T _2 _6 @Tx S AT ATz X ! XD Y _N @
0x29b8c0…29ba54 (2, 84) Dummy {f00=0x00d2, f01=0x0190, f02=» T @Q,T !Y _ T SZ_ T ATx o C ) B B AT AT AT AT~ AT !Z ! ATz_^ Y Y " QbW @Tz ! l X ! X Z X X X _ @TxP< @T T6 X R0 X P T$ T Y W T S P C * SZ ATz ATx @T P X Y 4 @] @T T @T
0x29ba54…29bbe8 Dummy {f00=0x00d2, f01=0x0190, f02=» _$ ! 2_l 1 AT T 0W ;W < AT AT W W W AT AT ![B @T ![ @T ![ ![ ![ B J 4 ![B ![ @T @T AT @T T$ @ ![ 8 ![ W - ![ x !x W 0 " WL R ~T }T T0 W, ![ P " ! " :A *@ H T 0 ![ W
0x29bbe8…29bd7c Dummy {f00=0x00d2, f01=0x0190, f02=» ![ 8 ![ X ! 9a DT ![ X ! P ! T & ![ _P B J B ![ ![ 4 A TXJ T AT T PF 4 ![ T A TX_ I " P AT Qb T AQ* S 4 A _$B P W T> :" * 9AY X 2 _ ![ 9AP ^ 2 _ " ! 1 4 A[ @x| `x| @x|P 0 M A[
0x29bd7c…29bf10 Dummy {f00=0x00d2, f01=0x0190, f02=»Q. > + Z AT 4 AT Qb ![ @TzP !Y ! T @T P aT AT 4 AT ![ T ' AT 4 Q4 ] ] f ! 8 ! W - ! x ! W 0 " W R ~T }T T W ! P " ! " :A *@ H T 0 ! W
0x29bf10…29c0a4 Dummy {f00=0x00d2, f01=0x0190, f02=» ! 8 ! X ! 9a DT ! X ! P ! T & ! _P B J B ! ! 4 A TXJ T AT T P 4 ! T A TX_ I " P AT Qb T AQ* S 4 A _$B P W T> " * 9AY X 2 _ ![ 9AP ^ 2 _ " ! 1 4 A[ @ ` @ P 0 M A[
0x29c0a4…29c238 Dummy {f00=0x00d2, f01=0x0190, f02=»Q. > + Z AT 4 AT Qb ![ @TzP !Y ! T @T P aT AT 4 AT ![ T ' AT 4 Q4 ] f ! 8 ! W - ! x ! W 0 " W R ~T }T T W ! P " ! " :A *@ H T 0 ! W
0x29c238…29c3cc Dummy {f00=0x00d2, f01=0x0190, f02=» ! 8 ! X ! 9a DT ! X ! P ! T & ! _P B J B ! ! 4 A TXJ T AT T P 4 ! T A TX_ I " P AT Qb T AQ* S 4 A _$B P W T> " * 9AY X 2 _ ![ 9AP ^ 2 _ " ! 1 4 A[ @ ` @ P 0 M A[
0x29c3cc…29c560 Dummy {f00=0x00d2, f01=0x0190, f02=»Q. > + Z AT 4 AT Qb ![ @TzP !Y ! T @T P aT AT 4 AT ![ T ' AT 4 Q4 ] f ! 8 ! W - ! x ! W 0 " W R ~T }T T W ! P " ! " :A *@ H T 0 ! W
0x29c560…29c6f4 (2, 85) Dummy {f00=0x00d2, f01=0x0190, f02=» ! 8 ! X ! 9a DT ! X ! P ! T & ! _P B J B ! ! 4 A TXJ T AT T P 4 ! T A TX_ I " P AT Qb T AQ* S 4 A _$B P W T> " * 9AY X 2 _ ![ 9AP ^ 2 _ " ! 1 4 A[ @ ` @ P 0 M A[
0x29c6f4…29c888 Dummy {f00=0x00d2, f01=0x0190, f02=»Q. > + Z AT 4 AT Qb ![ @TzP !Y ! T @T P aT AT 4 AT ![ T ' AT 4 Q4 ] f ! 8 ! W - ! x ! W 0 " W R ~ }T T W ! P " ! " :A *@ H T 0 ! W
0x29c888…29ca1c Dummy {f00=0x00d2, f01=0x0190, f02=» P T r , ( ! X @ T A A > A A A , ( A A A W B a > r q , ( @ BHBB < ! 2B ! , ( T P P
0x29ca1c…29cbb0 Dummy {f00=0x00d2, f01=0x0190, f02=»_ ! l , ( % T " X ! _ ! A , ( E x @ pP @ nP ! A p A r_ ! < , ( e @ rP @ X@ ! T A v ! l * & @ pP @ P @ n 2 8 ! X , ( Y ! A z_B ! X>_b A , ( v @
0x29cbb0…29cd44 Dummy {f00=0x00d2, f01=0x0190, f02=» X l * & T P C C * & 3 P " H X "# P " P X : , ( M * Y X T ! W h , ( g W W X R X T , ( ! ! X " T , ( R @ X !
0x29cd44…29ced8 Dummy {f00=0x00d2, f01=0x0190, f02=» N @ n @ v @ , ( @ A ! @ pXV ! ( , ( 7 T @ zP ! ! _p /T @ zX @ X , ( W tP @ vT ! ! A x_ A z , ( w B A p @ tT _2 _6 @ n , ( T A v A p X ! XD
0x29ced8…29d06c Dummy {f00=0x00d2, f01=0x0190, f02=» 4 @ pP ! ! x , ( D ! @ P ! ! A p , ( @ / @ T ! _ T X_ ~ H ECBBA x DC:MOT, , ( @ M A n C B B , ( J e A A A A t A v ! ! A , ( p_^
0x29d06c…29d200 Dummy {f00=0x00d2, f01=0x0190, f02=» P T T Y W ~ , ( * P C X A p A n @ * , ( xP X Y 4 @ @ vT @ Z , ( @ 1 A @ A A v ! T , ( Q P P P P P 1 A , ( q @ ]6W P _@
0x29d200…29d394 (2, 86) Dummy {f00=0x00d2, f01=0x0190, f02=» A ! @ ! z , ( @ ! ! ! B J 4 ! , ( ! @ @ A @ T J , ( 1 @ ! 8 ! W - ! x ! z , ( Q W 0 " W R ~T }T , ( q T W ! P " ! " :A ,
0x29d394…29d528 Dummy {f00=0x00d2, f01=0x0190, f02=» j , ( ! " ! " ! A t , ( ( _" A v A n ! ! % ! R ! : , ( / ! @ ! 8 ! X ! 9a j , ( @ M D ! X ! P ! T & ! _b IH1501 INTSAVL , ( k B J B !
0x29d528…29d6bc Dummy {f00=0x00d2, f01=0x0190, f02=» &V PP= ;@ R P W ;a=a P " R & R V T W V E + : V & [ [ [ [ $ [ [ z z z z " ! ! R 2` { z " P ! R 2` { 1 ! { [
0x29d6bc…29d850 Dummy {f00=0x00d2, f01=0x0190, f02=» $ Z %_N [ Q* z z r R [ Z { z z 9e! W Z : V I _ , " -! 9H X" ,9 -9d_ Z H D & H D % [ ( !! gg++ L h V
0x29d850…29d9e4 Dummy {f00=0x00d2, f01=0x0190, f02=» > V V Z P 2 " T W "@T '?W "? H " K :e J J " J _Z Z [ Z P J [ V 7_ Z J Z 7 Z Z P J : V R (Q V :
0x29d9e4…29db78 Dummy {f00=0x00d2, f01=0x0190, f02=» W. _& X W X & J K : V : 1 * : ! P ! P ! P ! P ! P W : ! )P9H # T &W &" :I : : P & _ &X _ : : : : b : { : . PX 9
0x29db78…29dd0c Dummy {f00=0x00d2, f01=0x0190, f02=»W R # P W ) V E WV . [ : Z !0P. 4 R :d" 8 R ! :DW ! 9 R R Y, : : jP kT T : & 9! " : $ : $ : 2 & >A >A 2 $ & V
0x29dd0c…29dea0 Dummy {f00=0x00d2, f01=0x0190, f02=» 9 X ( 9 8 ? X Q , V ( - 4T V 5 ( W, V P& W$ U V X 9T I Y F : + [ [ < !AAP !TTT W !**T * [ R !FFP !EET W I . 6 *
0x29dea0…29e034 (2, 87) Opaque[0x194]
0x29e034…29e1c8 # DirEnt {nam=»SCLASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1a58, f03=0x0000}
0x29e034…29e1c8 IdxSect {
0x29e034…29e1c8 f00 = 0x00d2 // 0x29e034 @0x0
0x29e034…29e1c8 f01 = 0x0002 // 0x29e036 @0x2
0x29e034…29e1c8 gno = [ // 0x29e038 @0x4
0x29e034…29e1c8 [0x00]: C0x00d2.0x3.0
0x29e034…29e1c8 ]
0x29e034…29e1c8 }
0x29e1c8…29e35c Dummy {f00=0x00d2, f01=0x0190, f02=» 2 P IDENT SCLASS REL 9.2 79-11-16 870105040920 P : P* B P* L P ENTRY SCLASS V P* l P* v P EXTRN DWSI01 P EXTRN DWSO01 P EXTRN DWII01 P EXTRN DWIO01 P
0x29e35c…29e4f0 Dummy {f00=0x00d2, f01=0x018e, f02=» P* PSCLASS DATA TCLASE-* P DATA TC00 * P DATA TC01 H P DATA TC02 f P DATA TC03 P DATA TC04 PTCLASE EQU * PTC00 DATA TC00E-* P DATA
0x29e4f0…29e684 Dummy {f00=0x00d2, f01=0x0190, f02=» PTC01 DATA TC01E-* P DATA /00E0 & P DATA DWII01 F PTC01E EQU * f PTC02 DATA TC02E-* P DATA /00E1 P DATA DWIO01 PTC02E EQU * PTC03
0x29e684…29e818 Dummy {f00=0x00d2, f01=0x417a, f02=»TC04E-* ~ P DATA /0060 P DATA DW1500 0 P DATA /015 P P DATA DWREMU b P DATA /00F8 v P DATA DWFD01 P DATA /01F9 P DATA DWFD01 P DATA /02FA P DATA
0x29e818…29e9ac Dummy {f00=0x00d2, f01=0x2008, f02=» NT TCLASS * * $ * . ENTRY TCLASS 8 * N * X * b * l * v * * TCLASS DATALTCLASE-* TCLASE EQU * END @ 1 INTLT2 INTRT1
0x29e9ac…29eb40 Dummy {f00=0x00d2, f01=0x0190, f02=» P ST P,INTSAV * P CF A15,IHSAV8 SAVE A1-A8 ON A15 STACK $ P LDKL A6,DW1701 LOAD DWT ADDRESS F , P INR A2,0,DAMI01 GET CHARACTER FROM LINR n PIHI100 EQU * P ABL(NA) SSTIN P**LOGG P IFF LOGG=0 P LD A5,DWTSAV+4,A6 & P CF
0x29eb40…29ecd4 (2, 88) Opaque[0x194]
0x29ecd4…29ee68 # DirEnt {nam=»MONTAB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1a60, f03=0x0000}
0x29ecd4…29ee68 IdxSect {
0x29ecd4…29ee68 f00 = 0x00d3 // 0x29ecd4 @0x0
0x29ecd4…29ee68 f01 = 0x0002 // 0x29ecd6 @0x2
0x29ecd4…29ee68 gno = [ // 0x29ecd8 @0x4
0x29ecd4…29ee68 [0x00]: C0x00d3.0x0.0
0x29ecd4…29ee68 ]
0x29ecd4…29ee68 }
0x29ee68…29effc Dummy {f00=0x00d3, f01=0x0190, f02=» 2 P IDENT MONTAB REL 9.2 79-11-16 870105040920 P : P* B 6 P* THIS TABLE CONTAINS ADDRESSES TO CONFIGURATION L P* DEPENDENT MONITOR TABLES P* P* P ENTRY MONTAB,SPDLCI P ENTRY FREQUE P ENTRY PAGQUE P E
0x29effc…29f190 Dummy {f00=0x00d3, f01=0x0190, f02=» INTRT3 P ENTRY INTRT4 P* & P EXTRN SYSLOD 0 P**** F P EXTRN CTAB01 R P EXTRN CTAB02 h P EXTRN CTAB03 ~ P EXTRN ITAD P EXTRN KBAD3 P EXTRN TPAD P EXTRN GPAD P EXTRN DIAD P EXTRN DYAD
0x29f190…29f324 Dummy {f00=0x00d3, f01=0x0190, f02=» PINTLT3 DATA 0 PINTLT4 DATA 0 PINTRT1 DATA 0 0 PINTRT2 DATA 0 F PINTRT3 DATA 0 PINTRT4 DATA 0 r P DATA SYSLOD P**** P DATA CTAB01 P DATA CTAB02 P DATA CTAB03 P DATA ITAD P DATA KBAD
0x29f324…29f4b8 Dummy {f00=0x00d3, f01=0x4018, f02=» d P END @ PINTLT4 DATA 0 PINTRT1 DATA 0 0 PINTRT2 DATA 0 F PINTRT3 DATA 0 PINTRT4 DATA 0 r P DATA SYSLOD P**** P DATA CTAB01 P DATA CTAB02 P DATA CTAB03 P DATA ITAD P DATA KBAD
0x29f4b8…29f64c Dummy {f00=0x00d3, 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
0x29f64c…29f7e0 Dummy {f00=0x00d3, f01=0x018e, f02=» < P IFT NUNITS+TYPE2=3 = P DATA MAXCY6 MAX CYLINDER NO = $ P XIF = H P* = T P IFT NUNITS=2 = ^ P IFT MMUPAG=1 = t * P DATA 0 PAGE NUMBER (PSEUDO MMU TABLE) = * P DATA 0 16 BIT LOGICAL BUFFER ADDRESS = PECBDU2 EQU * = P DATA 0,0,0,0,
0x29f7e0…29f974 (2, 89) Opaque[0x194]
0x29f974…29fb08 # DirEnt {nam=»SYSTAB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1a68, f03=0x0000}
0x29f974…29fb08 IdxSect {
0x29f974…29fb08 f00 = 0x00d3 // 0x29f974 @0x0
0x29f974…29fb08 f01 = 0x0006 // 0x29f976 @0x2
0x29f974…29fb08 gno = [ // 0x29f978 @0x4
0x29f974…29fb08 [0x00]: C0x00d3.0x1.0
0x29f974…29fb08 [0x01]: C0x00d3.0x2.0
0x29f974…29fb08 [0x02]: C0x00d3.0x3.0
0x29f974…29fb08 ]
0x29f974…29fb08 }
0x29fb08…29fc9c Dummy {f00=0x00d3, f01=0x0190, f02=» 2 P IDENT SYSTAB REL 9.2 79-11-16 870105040920 P : P* B P* L 8 P*************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P* SYSTAB = INTERRUPT VECTORS, SYSTEM CONTROL 2 P*
0x29fc9c…29fe30 Dummy {f00=0x00d3, f01=0x0190, f02=»*************** l P* P* " P , P 4 P < P D P L P T P P d P l P t P | P P P EJECT SYSTAB P P 4 P ENTRY SCTMSZ,SCTSFA,SCTEFA SYSTEM CONTROL TABLE P ENTRY SCTPLD
0x29fe30…29ffc4 Dummy {f00=0x00d3, f01=0x0190, f02=» SCTMMP,SCTLAP,SCTNPE P ENTRY SCTSTB P ENTRY SCTOPT 4 P ENTRY SCTTCT,SCTCDT J P ENTRY SCTBUG f & P ENTRY SCTDMT,SCTDMI,SCTDML,SCTDMC | P ENTRY SCTBLK,SCTDCT & P ENTRY SEG:ST,SEG:DS,SEG:EL,SEG:PB & P ENTRY PAG:QF,PAG:QB,PAG:PA,
0x29ffc4…2a0158 Dummy {f00=0x00d3, f01=0x0190, f02=»O RESTART r P EXTRN IHLKM LKM INTERRUPT P EXTRN IHRTC REAL TIME CLOCK 4 P EXTRN IH1501 X P EXTRN IH1502 x ( P EXTRN IHSOP SYSTEM OPERATORS PANEL P P P P P P * P EXTRN CHRT1 REMOTE
0x2a0158…2a02ec Dummy {f00=0x00d3, f01=0x0190, f02=» DISCEN ~ $ P EXTRN ILLINT ILLEGAL INTERRUPT P EXTRN HALT HALT ROUTINE 8 P* DEBUGGER X PX:A EQU 0 MONITOR OPTION j ( PX:B EQU 0 DATA MAN .TASKS IN SYSTEM * PX:C EQU 0 DM INDEX RECORD BUFFER SIZE & PX:D EQU 0 DM NUMBER OF LOCAL FILES
0x2a02ec…2a0480 Dummy {f00=0x00d3, f01=0x0190, f02=»B AND T:A h P* PSEG:ST EQU 0 STATUS $ PSEG:DS EQU 2 DISC SECTOR ADDRESS 8 " PSEG:EL EQU 4 EFFECTIVE LENGTH ` $ PSEG:PB EQU 6 PAGE BLOCK ADDRESS P* & PPAG:QF EQU 0 QUEUE POINTER FORWARD ( PPAG:QB EQU 2 QUEUE POINTER BACKWARD
0x2a0480…2a0614 (2, 90) Dummy {f00=0x00d3, f01=0x0190, f02=»E d 2 PSWB:DS EQU 2 DISC SECTOR ADDRESS OF FIRST COPY $ PSWB:EL EQU 4 SWB LENGTH (BYTES) @ & PSWB:NS EQU 6 SWB LENGTH (SECTORS) h P* ( PT:ACSB EQU -12 CURRENT SEGMENT BASE P EJECT SYSTAB P* P* INTERRUPT VECTORS P*
0x2a0614…2a07a8 Dummy {f00=0x00d3, f01=0x0190, f02=» 4 P DATA ILLINT 5 P DATA ILLINT 6 ( P DATA ILLINT D P DATA ILLINT d P DATA IHSOP 9 P DATA ILLINT 10 P DATA ILLINT 11 P DATA IH1501 12 P DATA IH1502 13
0x2a07a8…2a093c Dummy {f00=0x00d3, f01=0x0190, f02=»ILLINT ~ P DATA ILLINT P DATA ILLINT . P DATA ILLINT N P DATA ILLINT 22 n P DATA ILLINT P DATA CHLT1 24 P DATA ILLINT P DATA ILLINT P
0x2a093c…2a0ad0 Dummy {f00=0x00d3, f01=0x0190, f02=» P DATA ILLINT 32 P DATA ILLINT 33 P DATA ILLINT < P DATA ILLINT P DATA ILLINT 36 | P DATA ILLINT 37 P DATA ILLINT 38 P DATA ILLINT 39 P DATA ILLINT
0x2a0ad0…2a0c64 Dummy {f00=0x00d3, f01=0x0190, f02=» 45 P DATA ILLINT 46 P DATA ILLINT 47 , P DATA ILLINT 48 H P DATA ILLINT 49 d P DATA ILLINT 50 P DATA ILLINT 51 P DATA ILLINT 52 P DATA ILLINT 53 P DATA ILLINT 54
0x2a0c64…2a0df8 Dummy {f00=0x00d3, f01=0x018e, f02=» | P DATA ILLINT 60 P DATA ILLINT 61 $ P DATA ILLINT 62 @ P DATA TRAP TRAP ROUTINE P EJECT SYSTAB | P P* " P* SYSTEM CONTROL TABLE POINTER P* P DATA SCT P P P* P* SYST
0x2a0df8…2a0f8c Dummy {f00=0x00d3, f01=0x018e, f02=» x P* P XRR A13,A13 P XRR A14,A14 & P LD A1,SCTBUG : P ABR(NZ) A1 P P HLT d P p P EJECT SYSTAB x P P* P* SYSTEM CONTROL TABLE P* P PSCT EQU * P * PSCTMSZ DATA 0 MEMORY SIZE MO
0x2a0f8c…2a1120 Dummy {f00=0x00d3, f01=0x0190, f02=» l ( P C0,C1 CAS F0,F1 DISC F8,F9 FLOPP $ PSCTANO DATA 0 APPLICATION NUMBER 4 2 PSCTADA DATA 0 APPLICATION DISC SECTOR ADDRESS PSCTPAG DATA 0 PAGTAB ADDRESS PSCTSEG DATA 0 SEGTAB ADDRESS PSCTSWB DATA 0 SWBTAB ADDRESS $ PSCTNOS DAT
0x2a1120…2a12b4 (2, 91) Dummy {f00=0x00d3, f01=0x0190, f02=»ENTRY l P INDEX REL TTAB 0 PSCTLAC DATA 0 LOGICAL ADDRESS OF COMMON PART ( & PSCTMMP DATA 0 MMU TABLE PAGE ENTRY P INDEX REL TTAB * PSCTLAP DATA 0 LOGICAL ADDRESS OF PAGES ( PSCTNPE DATA 0 NUMBER OF PAGE ENTRIES & PSCTSTB DATA ST
0x2a12b4…2a1448 Dummy {f00=0x00d3, f01=0x0190, f02=»ESS x PSCTCDT DATA 0 CDTAB ADDRESS PSCTBUG DATA 0 DEBUGGER 0 ( PSCTDMT DATA 00004 DMTASKS IN SYSTEM N P BIT 13:D2,14:D1,15:D0 z 2 PSCTDMI DATA 00004 DM INDEX RECORD BUFFER SIZE * PSCTDML DATA 00000 DM NO OF LOCAL FILES , PSCTDMC DAT
0x2a1448…2a15dc Dummy {f00=0x00d3, f01=0x4110, f02=»YSTAB P P* P* SYSTEM STACK P* 6 P RES 145 @ P DATA /FCC0 AND PSW P & PSTB DATA LOOP AND PC FOR IDLE LOOP l P P P* P* IDLE LOOP P* P PLOOP RB * P P P P END
0x2a15dc…2a1770 Dummy {f00=0x00d3, 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
0x2a1770…2a1904 Dummy {f00=0x00d3, f01=0x0190, f02=»,A5 EA ROOT P RF EAR030 PEAR020 EQU * & P LDR A5,A4 SAVE OLD ROOT : P LDR* A4,A4 NEXT BUFFER ADR Z PEAR030 EQU * ~ P RF(Z) EAR100 EA LINK END P LDR A2,A2 REC NO & P RF(N) EAR050 RELEASE MANY BUFFERS P* P* SE
0x2a1904…2a1a98 Dummy {f00=0x00d3, f01=0x018e, f02=»EAR050 EQU * P CWK A2,/A000 CHECK BIT 1 0 P RF(L) EAR080 BIT 1 ZERO,ALL BUFFERS REMOVED 6 PEAR060 EQU * j P* ~ P* SEARCH TASK IDENT P* P LC A3,FDBTNR,A1 TAK ID P CC A3,2,A4 P RB(NE) EAR020 P* P*
0x2a1a98…2a1c2c Dummy {f00=0x00d3, f01=0x0190, f02=» P* RETURN BUFFER TO POOL P* & P INH 0 P LD A3,FREQUE < P STR A3,A4 NEXT FREE R P ST A4,FREQUE NEW ROOT n P LDR A4,A5 BUFFER ROOT P LDR A2,A2 P RB(N) EAR020 RELEASE MORE PEAR100 EQU * P RTN A14 P EJECT
0x2a1c2c…2a1dc0 Dummy {f00=0x00d3, f01=0x0190, f02=» IF NO BUFFER IS ` D P* FOUND A NEW IS FETCHED FROM THE FREE LINK AND B FILLED WITH H P* ZEROES AND PUT ON THE CRN LINK. IF NO FREE BUFFERS ARE AVAILABLE ` 0 P* THE SYSTEM WILL HALT AND LITE SOP-LAMPS. ( P* TASK ID IS PLACED IN THE BUFFER
0x2a1dc0…2a1f54 (2, 92) Opaque[0x194]
0x2a1f54…2a20e8 # DirEnt {nam=»TDISP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1a80, f03=0x0000}
0x2a1f54…2a20e8 IdxSect {
0x2a1f54…2a20e8 f00 = 0x00d4 // 0x2a1f54 @0x0
0x2a1f54…2a20e8 f01 = 0x0008 // 0x2a1f56 @0x2
0x2a1f54…2a20e8 gno = [ // 0x2a1f58 @0x4
0x2a1f54…2a20e8 [0x00]: C0x00d4.0x0.0
0x2a1f54…2a20e8 [0x01]: C0x00d4.0x1.0
0x2a1f54…2a20e8 [0x02]: C0x00d4.0x2.0
0x2a1f54…2a20e8 [0x03]: C0x00d4.0x3.0
0x2a1f54…2a20e8 ]
0x2a1f54…2a20e8 }
0x2a20e8…2a227c Dummy {f00=0x00d4, f01=0x0190, f02=» 0 P IDENT TDISP REL 9.2 79-11-16 870105040920 P 8 P* @ P* J 6 P************************************************** T P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TDISP = TOSS DISPATCHER P* P* P*
0x2a227c…2a2410 Dummy {f00=0x00d4, f01=0x0190, f02=»PATCHER IN TOSS. x > P* ENTRY POINT IS 'TDISP' WITH 8 REGISTERS ON A15 STACK. > P* THE DISPATCHER CHECKS IF THERE IS A TASK IN DISPATCHER Z < P* QUEUE WITH HIGHER PRIORITY THAN INTERRUPTED PROGRAM. : P* - IF SO, THE RUNNING TASK IS QUEUED AND
0x2a2410…2a25a4 Dummy {f00=0x00d4, f01=0x0190, f02=»TRY 'DISEND' CALLS TENDIO BEFORE TDSIP P* . 6 P* ENTRY 'DISIOE' SETS BIT 0 IN A1 BEFORE DISEND. 8 P* r 8 P* ENTRY 'MEXIT' EXITS A MONITOR TASK BEFORE TDISP. | P* D P* ENTRY 'RETUR8' LOADS 8 REGISTERS FROM A15 STACK AND RETURNS.
0x2a25a4…2a2738 Dummy {f00=0x00d4, f01=0x0190, f02=»NTRY TDISP DISPATCHER ENTRY ( P ENTRY MEXIT EXIT FOR MONITOR TASKS $ " P ENTRY DISIOE I/O ERROR ENTRY P & P ENTRY DISEND END I/O AND DISPATCH v 8 P ENTRY DISQUE POINTER TO FIRST PLACE IN DISP. QUEUE 0 P ENTRY PRUN TTAB ADDRESS OF RUNNING PROGRAM
0x2a2738…2a28cc Dummy {f00=0x00d4, f01=0x018e, f02=» P************* P* P* ( P EXTRN TTB:SA SAVE AREA 2 P EXTRN TTB:ST STATUS R & P EXTRN TTB:PW PROGRAM STATUS WORD n P EXTRN TTB:MT MMUTAB ( P EXTRN TTB:SB SEGMENT BLOCK ADDRESS , P EXTRN SEG:PB SEGMENT PAGE BLOCK ADDRESS
0x2a28cc…2a2a60 Dummy {f00=0x00d4, f01=0x018e, f02=» d P EXTRN TENDIO END I/O P EXTRN EXIT PROGRAM EXIT & 2 P EXTRN QLTDSK ACTIVATE LDTASK AT ENTRY LT:DSK F . P EXTRN SCTLAP LOGICAL ADDRESS OF CODE PAGE | & P EXTRN SCTMMP MMU TABLE PAGE ENTRY ( P EXTRN SCTNPE NUMBER OF PAGE ENTRIES P EJE
0x2a2a60…2a2bf4 (2, 93) Dummy {f00=0x00d4, f01=0x0190, f02=» . P***************************************** P* 6 . P* A PROGRAM VERSION USING TOSS MMU PAGING @ * P* IS OBTAINED BY SETTING MMUPAG EQU 1. r P* PMMUPAG EQU 1 P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION
0x2a2bf4…2a2d88 Dummy {f00=0x00d4, f01=0x0190, f02=»ISC PAGING p * &* IS OBTAINED BY SETTING DSKPAG EQU 1. * @ PDSKPAG EQU 0 J * ^ P* h @ P* A PROGRAM VERSION PREVENTING SEGMENTS TO MOVE WHEN HAVING r > P* APPLICATION TASKS AT DIFFERENT PRIORITY LEVELS USING THE 8 P* SAME SEGMENT I
0x2a2d88…2a2f1c Dummy {f00=0x00d4, f01=0x018e, f02=»VERLAY f * P* IS OBTAINED BY SETTING ASSOLY EQU 1 P* < PASSOLY EQU 0 F P* Z P EJECT TDISP d P* z P* D I S Q U E P* 2 P* POINTER TO FIRST PLACE IN DISPATCHER QUEUE P* PDISQUE DATA 0 P* P*
0x2a2f1c…2a30b0 Dummy {f00=0x00d4, f01=0x0190, f02=» P* R E T U R 8 P* . P* LOAD 8 REGISTERS FROM STACK AND RETURN * P* PRETUR8 EQU * f P z P IFT CPU852=0 P MLR 8,A15 P XIF P P IFT CPU852=1 P LDR* A8,A15 P LDR* A7,A15 P LDR* A6,A15
0x2a30b0…2a3244 Dummy {f00=0x00d4, f01=0x0190, f02=» P EJECT TDISP P P* & P* M E X I T 0 P* F 0 P* DO EXIT ON MONITOR TASK AND GO TO TDISP P P* PMEXIT INH P LD A5,PRUN P CF A15,EXIT P CM PRUN P RF TDISP P P* P* D I S I
0x2a3244…2a33d8 Dummy {f00=0x00d4, f01=0x0190, f02=»* D I S E N D P* $ P* CALL TENDIO AND GO TO TDISP " P* J PDISEND CF A15,TENDIO T P EJECT TDISP p P* P* T D I S P P* $ P* THIS IS THE DISPATCHER ENTRY P* PTDISP INH & P LC A1,18,A15 LOAD P
0x2a33d8…2a356c Dummy {f00=0x00d4, f01=0x0190, f02=»CHER QUEUE P* PTDISCQ LDKL A2,DISQUE P LDR* A3,A2 : P RB(Z) RETUR8 QUEUE EMPTY N P p P LD A5,PRUN x $ P RF(Z) TDCQ10 IDLE LOOP RUNNING & P LD A4,TTB:ST+1,A5 COMPARE RUNNING 4 P CC A4,TTB:ST+1,A3 AND QUEUED TASK'S PRIOR
0x2a356c…2a3700 Dummy {f00=0x00d4, f01=0x0190, f02=» P P IFT DSKPAG=1 , P LD A1,TTB:SB,A3 GET SEGMENT BLOCK ADDR " P RF(Z) TDISSW NONE R P LDR* A7,A1 l P RF(N) TDISSW SEGMENT LOADED 2 P CF A15,QLTDSK SEGM NOT LOADED QUEUE LOAD TASK & P RB TDISCQ TAKE NEXT TASK INSTEAD P XIF
0x2a3700…2a3894 (2, 94) Dummy {f00=0x00d4, f01=0x0190, f02=»D RUNNING TASK ~ P RF(Z) TDISST IDLE LOOP P 6 . P ADK A6,0 QUEUE OLD TASK FIRST ON PRIORITY > P RF(Z) TDSW20 EMPTY QUEUE p 0 PTDSW10 CC A4,TTB:ST+1,A6 COMPARE PRIORITIES 0 P RF(NG) TDSW20 SAME OR LOWER PRIORITY FOUND P LDR A2,A6
0x2a3894…2a3a28 Dummy {f00=0x00d4, f01=0x0190, f02=» ST A14,TTB:SA+28,A5 SAVE REGISTERS P LDR A14,A5 , P @ P IFT CPU852=0 H P MLR 8,A15 ^ P MS 13,TTB:SA+2,A14 p P MLR 2,A15 P P XIF P IFT CPU852=1 P LDR* A8,A15 P LDR* A7,A15 P LDR* A6,A15 P LDR
0x2a3a28…2a3bbc Dummy {f00=0x00d4, f01=0x0190, f02=»B:SA+24,A14 P ST A11,TTB:SA+22,A14 P ST A10,TTB:SA+20,A14 2 P ST A9,TTB:SA+18,A14 P P ST A8,TTB:SA+16,A14 l P ST A7,TTB:SA+14,A14 P ST A6,TTB:SA+12,A14 P ST A5,TTB:SA+10,A14 P ST A4,TTB:SA+8,A14 P ST A3,TTB:SA+6,
0x2a3bbc…2a3d50 Dummy {f00=0x00d4, f01=0x0190, f02=»TB:SA,A14 AND PC & P ST A2,TTB:PW,A14 AND PSW IN TTAB P IFT DSKPAG+DIFPRI=2 B P ^ * P LD A1,TTB:SB,A14 GET SEGM BLOCK ADDR f P RF(Z) TDISST NONE P LDR* A2,A1 GET SEGM STATUS P LDKL A3,/1000 , P TM A2,A3 CHECK IF SEGM USED BY
0x2a3d50…2a3ee4 Dummy {f00=0x00d4, f01=0x018e, f02=»AT IT WAS THIS TASK x P XIF P EJECT TDISP ( P* > P* START NEW TASK H P* ` PTDISST LD A14,PRUN j P IFT DSKPAG=1 P * P LD A1,TTB:SB,A14 GET SEGM BLOCK ADDR P RF(Z) TDST30 NONE ( P LD A4,SEG:PB,A1 GET PAGE BLOC
0x2a3ee4…2a4078 Dummy {f00=0x00d4, f01=0x0190, f02=» P IFT DSKPAG+DIFPRI=2 P $ ( P LDR* A2,A4 CHECK IF PAGE IN PAGQUE , P RF(NZ) TDST10 YES X " P LDR* A3,A1 NO GET SEGM STATUS r 2 P ANKL A3,/1000 CHECK IF SEGM USED BY INT TASK P RF(Z) TDST20 NO 4 P CW A14,PAG:QB,A4 YES CHECK IF IT
0x2a4078…2a420c Dummy {f00=0x00d4, f01=0x018e, f02=» DSKPAG=1 P 2 PTDST10 LD A3,PAG:QB,A4 TAKE PAGE OUT OF QUEUE P STR A2,A3 P P ST A3,PAG:QB,A2 b P CMR A4 z P , PTDST20 LD A1,PAG:PA,A4 GET PAGE ADDRESS ( P LD A5,TTB:SA+26,A14 AND T:A ADDRESS P P IFT MMUPAG=1
0x2a420c…2a43a0 Dummy {f00=0x00d4, f01=0x0190, f02=» , P LD A4,SCTNPE AND GET NUMBER OF ENTRIES P 4 2 PTDST22 SCR A2,A3 UPDATE MMU TABLE JUST IN CASE < P SUK A4,1 r P RF(Z) TDST25 P ADK A2,4 P ADK A3,2 P RB TDST22 P PTDST25 EQU * P IFT ASSOLY=0 " P TL TT
0x2a43a0…2a4534 (2, 95) Dummy {f00=0x00d4, f01=0x0190, f02=»,T:ACSB,A5 P RF TDST35 P $ P XIF , P IFT DSKPAG-MMUPAG=1 8 4 P ST A1,T:ACSB,A5 UPDATE BASE IN T:A JUST IN CASE T P XIF P PTDST30 EQU * P IFT MMUPAG=1 " P TL TTB:MT,A14 LOAD MMU TABLE P XIF P & PTDST
0x2a4534…2a46c8 Dummy {f00=0x00d4, f01=0x0190, f02=» n & P ML 14,TTB:SA+2,A14 LOAD REGISTERS P 2 P XIF : P IFT CPU852=1 F P P STR A1,A15 PUT PC d P STR A2,A15 AND PSW ON STACK ~ & P LD A1,TTB:SA+2,A14 LOAD REGISTERS P LD A2,TTB:SA+4,A14 P LD A3,TTB:SA+6,A14 P LD
0x2a46c8…2a485c Dummy {f00=0x00d4, f01=0x4106, f02=» LD A9,TTB:SA+18,A14 P LD A10,TTB:SA+20,A14 P LD A11,TTB:SA+22,A14 : P LD A12,TTB:SA+24,A14 X P LD A13,TTB:SA+26,A14 v P LD A14,TTB:SA+28,A14 P P XIF P P RTN A15 START THE TASK P P END @ D
0x2a485c…2a49f0 Dummy {f00=0x00d4, 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
0x2a49f0…2a4b84 Dummy {f00=0x00d4, f01=0x0190, f02=» IHTWN IHTCN , ( IHSOP N CHLT1 ^ IHFDN n CHRT1 ~ , ( CHRT2 CHRT3 CHRT4 IHCC1 IHCC2
0x2a4b84…2a4d18 Dummy {f00=0x00d4, f01=0x018e, f02=» $ & ~ IHLPN IHCRN . IHDU1 > , ( A ( * N IHDU2 ~ IHMTN , ( Q , . 0 , ( a IHINPTI
0x2a4d18…2a4eac Dummy {f00=0x00d4, f01=0x0190, f02=» SCTEFA SCTPLD SCTANO , SCTADA @ SCTPAGL T , ( @ h SCTSEG SCTSWB SCTNOS SCTNOP SCTPSZ SCTMMC
0x2a4eac…2a5040 Dummy {f00=0x00d4, f01=0x414e, f02=»T SCTCDT bBUG SCTBUG~ . , ( 6 B SCTDMT r SCTDMI SCTDML SCTDMC SCTBLK SCTDCT
0x2a5040…2a51d4 (2, 96) Opaque[0x194]
0x2a51d4…2a5368 # DirEnt {nam=»LRPINT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1aa0, f03=0x0000}
0x2a51d4…2a5368 IdxSect {
0x2a51d4…2a5368 f00 = 0x00d5 // 0x2a51d4 @0x0
0x2a51d4…2a5368 f01 = 0x000a // 0x2a51d6 @0x2
0x2a51d4…2a5368 gno = [ // 0x2a51d8 @0x4
0x2a51d4…2a5368 [0x00]: C0x00d5.0x0.0
0x2a51d4…2a5368 [0x01]: C0x00d5.0x1.0
0x2a51d4…2a5368 [0x02]: C0x00d5.0x2.0
0x2a51d4…2a5368 [0x03]: C0x00d5.0x3.0
0x2a51d4…2a5368 [0x04]: C0x00d6.0x0.0
0x2a51d4…2a5368 ]
0x2a51d4…2a5368 }
0x2a5368…2a54fc Dummy {f00=0x00d5, f01=0x0190, f02=» 2 P IDENT LRPINT 9.2DK 1 79-11-16 870105040920 P : P =DK1, HANGING REM. TERM. B P 80-03-11 f P* z P* 6 P************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P*
0x2a54fc…2a5690 Dummy {f00=0x00d5, f01=0x0190, f02=»************************************************** P* : P* D : P* THIS MODULE CONTAINS MANDATORY INTERRUPT HANDLERS N P* FOR TOSS. THESE ARE: P* P* -IHLKM: LKM INTERRUPT P* P* -IHRTC: RTC INTERRUPT P*
0x2a5690…2a5824 Dummy {f00=0x00d5, f01=0x0190, f02=»THESE ARE: P* 4 P* -LKMRQE: SET A7 = -1, QUEUE JOB AND DISPATCH P* T ( P* -LKMQDI: QUEUE JOB AND DISPATCH ^ P* P EJECT LRPINT P* P* P*********** P* ENTRIES * P*********** P* P*
0x2a5824…2a59b8 Dummy {f00=0x00d5, f01=0x0190, f02=»R r 4 P ENTRY LKMERR HALT SYSTEM DUE TO FATAL LKM ERROR ( P ENTRY LKMQDI QUEUE JOB AND DISPATCH B & P ENTRY IHRTC RTC INTERRUPT HANDLER n 8 P ENTRY TIMQUE POINTER TO FIRST BLOCK IN TIMER QUEUE P ENTRY MONCLO MONITOR CLOCK 2 P ENTRY IHPFAR PO
0x2a59b8…2a5b4c Dummy {f00=0x00d5, f01=0x0190, f02=»* P* EXTERNALS * P************* P* 6 P* @ P EXTRN TDISP DISPATCHER J " P EXTRN DISQUE DISPATCHER QUEUE j ( P EXTRN PRUN TTAB OF RUNNING PROGRAM " P EXTRN MEXIT MONITOR TASK EXIT , P EXTRN MONMMU MONITOR (SYSTEM) MMU TAB
0x2a5b4c…2a5ce0 Dummy {f00=0x00d5, f01=0x0190, f02=»TCH TO LEVEL XY P EXTRN FREBLK SET BLOCK FREE " P EXTRN SAVE8 SAVE 8 REGISTERS < $ P EXTRN PFINIT RESTART OF DEVICES b P EXTRN HALT HALT MODULE ( P EXTRN INTSAV INTERRUPT SAVE MODULE P EXTRN TTABLD LOAD TASK TTAB ( P EXTRN PQEMTY
0x2a5ce0…2a5e74 (2, 97) Dummy {f00=0x00d5, f01=0x0190, f02=»KWARD t ( P EXTRN TTB:SB SEGMENT BLOCK POINTER & P EXTRN TTB:PW PROGRAM STATUS WORD : 2 P EXTRN TTB:SA FIRST WORD OF SAVE AREA IN TTAB d " P EXTRN LKMAL LKM REQUEST TABLE P EJECT LRPINT P* P* . P****************************
0x2a5e74…2a6008 Dummy {f00=0x00d5, f01=0x018e, f02=»PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. . P* PMMUPAG EQU 1 f P* z P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU8
0x2a6008…2a619c Dummy {f00=0x00d5, f01=0x018e, f02=» DSKPAG EQU 0 * P* & 8 P* A PROGRAM VERSION USING NO MONITOR CLOCK FUNCTIONS 0 * P* IS OBTAINED BY SETTING MCLOCK EQU 0. l P* PX:A EQU 1 PMONCLK EQU 1 P* P EJECT LRPINT P* P* P* I H
0x2a619c…2a6330 Dummy {f00=0x00d5, f01=0x0190, f02=» * P* - IF STACK OVERFLOW SYSTEM HALTS. P* 2 @ P* - ELSE REGISTERS A1 - A14 ARE SAVED IN TTAB FOR RUNNING < P* PROGRAM. P* : P* - EXIT CONDITIONS ARE SET AND A BRANCH IS MADE TO $ P* APPROPRIATE LKM PROCESSOR. P*
0x2a6330…2a64c4 Dummy {f00=0x00d5, f01=0x0190, f02=»KM REQUEST) h , P* A5 = TTAB ADDRESS OF CALLING PROGRAM P* A2, A3 AND A6 ARE LOST. D P* h : P* ALL OTHER REGISTERS REMAIN UNCHANGED FROM CALLING r P* PROGRAM. P* P* P* PIHLKM EQU * $ P ST P,INTSAV SAVE
0x2a64c4…2a6658 Dummy {f00=0x00d5, f01=0x0190, f02=» SAVE A15 " P LD A15,PRUN LOAD TTAB ADDRESS P* 8 P IFT CPU852=1 B 4 P ADKL A15,TTB:SA+28 SET A15 TO LAST IN SAVE AREA X * P STR A14,A15 SAVE USER REGISTERS, -A14 P STR A13,A15 -A13 P STR A12,A15 -A12 P STR A11,A15 -A11
0x2a6658…2a67ec Dummy {f00=0x00d5, f01=0x0190, f02=»5 -A5 P STR A4,A15 -A4 P STR A3,A15 -A3 & P STR A2,A15 -A2 > P STR A1,A15 -A1 V P XIF n P* z P IFT CPU852=0 6 P MS 14,TTB:SA+2,A15 SAVE A1-A14 IN TTAB SAVE AREA P XIF P* 0 P LD A5,PRUN GET TTAB ADDRESS O
0x2a67ec…2a6980 Dummy {f00=0x00d5, f01=0x0190, f02=» GET LKM REQUEST PARAMETERS P* $ P LDR* A3,A15 . 4 P LDR* A2,A15 LOAD P.C. AND ADJUST STACK POINTER B & P ST A3,TTB:PW,A5 STORE PSW IN TTAB z P* P IFT MMUPAG=0 & P LD A3,-2,A2 GET INSTRUCTION CODE " P LDR* A6,A2 GET DATA DIREC
0x2a6980…2a6b14 (2, 98) Dummy {f00=0x00d5, f01=0x018e, f02=»MMU TABLE t P* PLKM015 EQU * & P EL A3,-2,A2 GET INSTRUCTION CODE 0 " P ELR A6,A2 GET DATA DIRECTIVE Z P XIF P* P CWK A3,/2804 P RF(E) LKM025 LKM? P CWK A3,/6300 P RF(E) LKM025 TRAP? P* $ P* ST
0x2a6b14…2a6ca8 Dummy {f00=0x00d5, f01=0x0190, f02=» P EJECT LRPINT P* P* & PLKM025 EQU * 0 P IFT DSKPAG=1 D . P LD A3,TTB:SB,A5 GET SEGMENT BLOCK ADDRESS Z P RF(Z) LKM027 NO SEGMENT? " P LDR* A4,A3 GET SEGMENT STATUS 0 P ANKL A4,/1E00 CHECK IF CORE RESIDENT OR... 2 P
0x2a6ca8…2a6e3c Dummy {f00=0x00d5, f01=0x0190, f02=»ET PAGE BLOCK ADDRESS ~ & P LDKL A4,PAGQUE GET PAGQUE ADDRESS P ST A4,PAG:QB,A3 H 4 P LDR* A4,A4 GET ADDRESS OF FIRST BLOCK IN PAGQUE ` " P STR A4,A3 UPDATE QUEUE LINKS P ST A3,PAGQUE P ST A3,PAG:QB,A4 4 P LD A3,PQEMTY CHECK IF LOAD
0x2a6e3c…2a6fd0 Dummy {f00=0x00d5, f01=0x0190, f02=»K | P* , P CM PQEMTY INDICATE PAGE QUEUE NOT EMPTY P LDR A4,A5 SAVE A5 D , P LDKL A5,TTABLD GET LDTASK TTAB ADDRESS ^ $ P CF A15,QTJOB RESTART LOAD TASK P LDR A5,A4 RESTORE A5 P LD A4,TTB:PW,A5 GET PSW & P ST A4,-2,A15 RESTOR
0x2a6fd0…2a7164 Dummy {f00=0x00d5, f01=0x0190, f02=» ( P RF(E) LKM060 LOAD SEGMENT REQUEST? P XIF 0 P* < P EJECT LRPINT F P* ^ P* h PLKM030 EQU * r ( P CM PRUN INDICATE IDLE LOOP RUNNING $ P CF A15,SWL48 SWITCH TO LEVEL 48 P LDK A4,0 " P LDR A3,A6 GET DATA DIRECTIV
0x2a7164…2a72f8 Dummy {f00=0x00d5, f01=0x0190, f02=»IRECTIVE POSITIVE z P* P IFT MMUPAG=0 $ P LDR* A4,A2 GET LABEL : P XIF X P* d P IFT MMUPAG=1 n P ELR A4,A2 GET LABEL P XIF P* P EJECT LRPINT P* . P* UPDATE TTB:SA AND GO TO LKM PROCESSOR
0x2a72f8…2a748c Dummy {f00=0x00d5, f01=0x0190, f02=»MAL v * P RF(Z) LKMQDI PROGRAM SWITCH REQUEST? P CW A3,LKMAL : * P RF(NL) LKMRQE INVALID DATA DIRECTIVE? N P INH | P LD A3,LKMAL,A3 P* P IFF MMUPAG+DSKPAG=0 P RF LKM065 P* . PLKM060 EQU * LOAD SEGMENT REQUEST (DAT
0x2a748c…2a7620 Dummy {f00=0x00d5, f01=0x018e, f02=» P* P EJECT LRPINT P* & P* 0 P* L K M E R R : P* R P* > PLKMERR LDK A1,15 INDICATE REQUESTED LKM PROC. NOT PRESENT f P* PLKM070 EQU * P CF A15,HALT HALT SYSTEM P* P* P* L K M R Q
0x2a7620…2a77b4 (2, 99) Dummy {f00=0x00d5, f01=0x0190, f02=» PLKMRQE EQU * P LDKL A2,-1 . P ST A2,TTB:SA+14,A5 SET -1 IN SAVE AREA A7 , P* ^ P* h P* L K M Q D I r P* ( P* QUEUE TERMINAL JOB AND DISPATCH. P* P* A5 = TTAB ADDRESS P* P* PLKMQDI EQU *
0x2a77b4…2a7948 Dummy {f00=0x00d5, f01=0x0190, f02=»CT LRPINT P* P* I H R T C P* 4 6 P* THIS IS THE REAL TIME CLOCK INTERRUPT HANDLER. > 6 P* THE TIMER QUEUE WILL BE PROCESSED EACH 100 MS. x P* * PIHRTC ST P,INTSAV SAVE LAST INTERRUPT " P RIT /1B RESET INTERRUPT FLAG
0x2a7948…2a7adc Dummy {f00=0x00d5, f01=0x0190, f02=»F A15,SAVE8 SAVE A1-A8 ON STACK P XIF ( P* 4 P IFT CPU852=0 > " P MSR 8,A15 SAVE A1-A8 ON STACK T P XIF z P* " P LDKL A4,-4 SET 100 MS SWITCH P ST A4,COUNT . P LDKL A2,CLOCK QUEUE CLOCK ROUTINE AS MJOB P CF A15,QMJO
0x2a7adc…2a7c70 Dummy {f00=0x00d5, f01=0x0190, f02=» * $ P CF A15,SWLXY SWITCH TO LEVEL XY P RB T:DISP 2 P* D P EJECT LRPINT N P* f P* p P IFT MONCLK=1 z P* < P* MONITOR CLOCK UPDATING ROUTINE STARTED EACH SECOND. P* PMCLOCK EQU * ( PRTC025 LDKL A4,-
0x2a7c70…2a7e04 Dummy {f00=0x00d5, f01=0x0190, f02=»20 IM MONCLO+2,A4 INCREMENT TIME 0 P XR A3,MONCLO+2,A4 CHANGE MINUTES OR HOURS ? ( $ P RB(NE) RTC020 GO TO DISPATCHER? ( P CM MONCLO+2,A4 RESTART TIME COUNTER P SUK A4,2 END? " P RB(N) MCLO20 MIDNIGHT CARRY? " P RB(P) MCLO10 UPDATE MINUTES
0x2a7e04…2a7f98 Dummy {f00=0x00d5, f01=0x0190, f02=»MONCLO EQU * P IFT MONCLK=1 & P DATA 0 ACCUMULATED 24 HOUR CARRY * P DATA 0 HOUR T P DATA 0 MINUTE h P DATA 0 SECOND ~ PSECOND DATA 0 SECOND SWITCH P XIF P* P EJECT LRPINT P* * P* CLOCK ROUTINE STARTE
0x2a7f98…2a812c Dummy {f00=0x00d5, f01=0x0190, f02=»0 LDR* A4,A6 GET TIMER BLOCK P ABL(Z) MEXIT END OF QUEUE $ P IM 4,A4 INCREMENT TIMER F P RB(N) CLK10 NOT TIME OUT? f P RF(Z) CLK30 TIME OUT? P LDR* A3,A4 RELEASE TIMER P STR A3,A6 P CF A15,FREBLK P LDR A4,A2 P CF A1
0x2a812c…2a82c0 Dummy {f00=0x00d5, f01=0x0190, f02=» CF A15,SWL48 SWITCH TO LEVEL 48 DK1 P INH , P RB CLK10 8 P* J PCLK40 EQU * T P IFT CPU852=1 h & P CF A15,SAVE8 SAVE A1-A8 ON STACK ~ P XIF P* P IFT CPU852=0 " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P*
0x2a82c0…2a8454 (2, 100) Dummy {f00=0x00d6, f01=0x0190, f02=»NE r P* P* PCOUNT DATA 0 100 MS SWITCH P* @ P* J P* T I M Q U E T P* l . P* POINTER TO FIRST BLOCK IN TIMER QUEUE v P* P* PTIMQUE EQU * P DATA 0 P* P EJECT LRPINT P*
0x2a8454…2a85e8 Dummy {f00=0x00d6, f01=0x0190, f02=»ATA 0 & PTTABPF DATA 0 TTAB FOR POWER FAIL P DATA '#P' 8 P DATA 0 J PA15SAV DATA 0 Z P DATA /00C0 p P DATA POWOFF P* P* P* WORK AREAS P* P* & PPFX DATA 1 POWER ON/OFF INDICATOR P*
0x2a85e8…2a877c Dummy {f00=0x00d6, f01=0x018e, f02=»INTERRUPT t P* P* PIHPFAR EQU * & $ P ST P,INTSAV SAVE LAST INTERRUPT < & P RIT /17 RESET INTERNAL INTERRUPT d & P C1S PFX INDICATE POWER ON OR OFF P RF(P) POWON POWER ON? P* P* POWER OFF P* P IFT CPU
0x2a877c…2a8910 Dummy {f00=0x00d6, f01=0x0190, f02=» P XIF ! P* ! 4 P LD A1,DISQUE QUEUE PFTASK FIRST FOR DISPATCHING ! P LDKL A2,TTABPF ! R P STR A1,A2 ! j P ST A2,DISQUE ! | P RB T:DISP ! P* ! 2 PPOWOFF ST A15,A15SAV SAVE A15 FOR BETTER TIMES ! P HLT ! P* ! P EJECT LRPIN
0x2a8910…2a8aa4 Dummy {f00=0x00d6, f01=0x4058, f02=» ! P CM PRUN " P RB T:DISP " P* " * P* " 4 P* " > P END " H@ " TA2,TTABPF ! R P STR A1,A2 ! j P ST A2,DISQUE ! | P RB T:DISP ! P* ! 2 PPOWOFF ST A15,A15SAV SAVE A15 FOR BETTER TIMES ! P HLT ! P* ! P EJECT LRPIN
0x2a8aa4…2a8c38 Dummy {f00=0x00d6, 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
0x2a8c38…2a8dcc Dummy {f00=0x00d6, f01=0x2008, f02=» ,
0x2a8dcc…2a8f60 Dummy {f00=0x00d6, f01=0x0190, f02=»****************************************** T 6 P* * U 2 6 P* RDBLK - READ ONE CASSETTE BLOCK * U l 6 P* =============================== * U 6 P*
0x2a8f60…2a90f4 (2, 101) Opaque[0x194]
0x2a90f4…2a9288 # DirEnt {nam=»TPROC «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1ac8, f03=0x0000}
0x2a90f4…2a9288 IdxSect {
0x2a90f4…2a9288 f00 = 0x00d6 // 0x2a90f4 @0x0
0x2a90f4…2a9288 f01 = 0x0006 // 0x2a90f6 @0x2
0x2a90f4…2a9288 gno = [ // 0x2a90f8 @0x4
0x2a90f4…2a9288 [0x00]: C0x00d6.0x1.0
0x2a90f4…2a9288 [0x01]: C0x00d6.0x2.0
0x2a90f4…2a9288 [0x02]: C0x00d6.0x3.0
0x2a90f4…2a9288 ]
0x2a90f4…2a9288 }
0x2a9288…2a941c Dummy {f00=0x00d6, f01=0x0190, f02=» 0 P IDENT TPROC REL 9.2 79-11-16 870105040920 P 8 P* @ P* J 6 P************************************************** T P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* TPROC = TOSS LKM PROCESSORS P* P* P*
0x2a941c…2a95b0 Dummy {f00=0x00d6, f01=0x0190, f02=»AINS THE FOLLOWING | P* TOSS LKM PROCESSORS: P* : P* - TWAIT = WAIT D P* ` P* - TEXIT = EXIT j P* ( P* - TACTOT = ACTIVATE/RESTART TASK P* P* - TPAUSE = PAUSE TASK P* P* - TMWAIT = MULTIPL
0x2a95b0…2a9744 Dummy {f00=0x00d6, f01=0x018e, f02=»* P* P ENTRY TWAIT WAIT PROCESSOR P ENTRY TEXIT EXIT PROCESSOR 8 , P ENTRY TACTOT ACTIVATE/RESTART PROCESSOR " P ENTRY TPAUSE PAUSE PROCESSOR * P ENTRY TMWAIT MULTIPLE WAIT PROCESSOR P P P P* P*
0x2a9744…2a98d8 Dummy {f00=0x00d6, f01=0x0190, f02=» P EXTRN TDISP DISPATCHER * P EXTRN LKMQDI QUEUE TASK AND DISPATCH $ $ P EXTRN LKMRQE LKM REQUEST ERROR R P EXTRN EXIT PROGRAM EXIT z 2 P EXTRN FNDDWT FIND DWT ADDRESS FROM FILE CODE 0 P EXTRN FNDTID FIND TTAB ADDRESS FROM TASK ID P EXT
0x2a98d8…2a9a6c Dummy {f00=0x00d6, f01=0x018e, f02=»RN DWTWAT WAIT/ACTIVATE INDICATOR P EJECT TPROC * P* @ P* J . P***************************************** T P* P* CONDITIONAL ASSEMBLY P* . P***************************************** P* . P* A PROGRAM VERSION
0x2a9a6c…2a9c00 Dummy {f00=0x00d6, f01=0x0190, f02=» P* P* P******** P* WAIT * ( P******** 8 P* H P* R ( P* THIS IS THE WAIT LKM PROCESSOR. P* , P* THIS MODULE IS ENTERED WHEN THE TASK 6 P* WANTS TO SYNCHRONIZE WITH A PARTICULAR EVENT. P* * P*
0x2a9c00…2a9d94 (2, 102) Dummy {f00=0x00d6, f01=0x0190, f02=»CB ADDRESS P* P* * PTWAIT CF A15,FNDDWT SEARCH DWT ADDRESS & P ADK A6,0 SET CR T & P RF(Z) TP:RQE FILE CODE NOT FOUND? l P* P IFT MMUPAG=0 * P LDR* A1,A8 RETURN IF EVENT COMPLETED P XIF P* P IFT MMUPAG=1
0x2a9d94…2a9f28 Dummy {f00=0x00d6, f01=0x0190, f02=»SET WAIT INDICATOR IN DWT ~ P RF T:DISP GO TO DISPATCHER " P* F P EJECT TPROC P P* f P* p P******** z P* EXIT * P******** P* P* ( P* THIS IS THE EXIT LKM PROCESSOR. P* * P* THIS MODULE IS E
0x2a9f28…2aa0bc Dummy {f00=0x00d6, f01=0x0190, f02=»D FROM THE LKM HANDLER & P* WITH THE FOLLOWING PARAMETERS: P* H P* A5 = TTAB ADDRESS R P* p P* z PTEXIT EQU * " P CF A15,EXIT CALL PROGRAM EXIT P* & PT:DISP ABL TDISP GO TO DISPATCHER P* P EJECT TPR
0x2aa0bc…2aa250 Dummy {f00=0x00d6, f01=0x0190, f02=» TASK LKM PROCESSOR. p P* 4 P* THIS MODULE IS ENTERED FROM THE LKM HANDLER & ( P* WHEN A TASK HAS TO BE ACTIVATED. ^ P* 0 P* THE FOLLOWING PARAMETERS ARE SUPPLIED:- P* ( P* A1 = PARAMETER WHEN A4 NOT ZERO 4 P* A4 = S
0x2aa250…2aa3e4 Dummy {f00=0x00d6, f01=0x0190, f02=» PTACTOT EQU * $ P CF A15,FNDTID FIND TTAB ADDRESS P ADK A2,0 SET CR D $ P RF(Z) TP:RQE TASK NOT IN SYSTEM 4 P CF A15,QTJOB QUEUE CALLING TASK FOR DISPATCHING * P LD A3,TTB:SA+6,A5 GET SEGMENT NUMBER P LDR A5,A2 P LDR A2,A4
0x2aa3e4…2aa578 Dummy {f00=0x00d6, f01=0x0190, f02=» EJECT TPROC P* P* P********** * P* TPAUSE * < P********** N P* ` P* j ( P* THIS IS THE PAUSE LKM PROCESSOR. t P* : P* THIS MODULE IS ENTERED FROM THE LKM HANDLER WHEN A : P* TASK WANTS TO (TEMPORARILY)
0x2aa578…2aa70c Dummy {f00=0x00d6, f01=0x0190, f02=» P********** P* TMWAIT * P********** , P* > P* H 0 P* THIS IS THE MULTIPLE WAIT LKM PROCESSOR. R P* * P* IT IS ENTERED FROM THE LKM HANDLER & P* WITH THE FOLLOWING PARAMETERS: P* P* A5 = TTAB ADDRESS
0x2aa70c…2aa8a0 Dummy {f00=0x00d6, f01=0x018e, f02=»LLING TASK VIA TENDIO t & P* WITH THE FOLLOWING PARAMETERS: P* H , P* A8 = ECB ADDRESS OF COMPLETED EVENT R P* > P* IF REQUEST ERROR, A7 := -1 (AND NO RETURN VIA TENDIO). P* ( P* NOTICE THAT ALL EVENTS MUST HAVE ( P*
0x2aa8a0…2aaa34 (2, 103) Dummy {f00=0x00d6, f01=0x0190, f02=» n P LDK A3,0 P* P IFT MMUPAG=0 $ * P LDR* A1,A7 GET NO OF ECB:S IN ECBBLK : P XIF h P* t P IFT MMUPAG=1 ~ ( P ELR A1,A7 GET NO OF ECB:S IN ECBBLK P XIF P* ( P RF(NP) TP:RQE REQUEST ERROR IF <= 0 P*
0x2aaa34…2aabc8 Dummy {f00=0x00d6, f01=0x0190, f02=»S v & P LDR* A2,A8 GET FIRST WORD OF ECB P XIF 4 P* @ P IFT MMUPAG=1 J P ELR A8,A7 GET ECB ADDRESS ` $ P ELR A2,A8 GET FIRST WORD OF ECB P XIF P* ( P RF(N) TMW:30 I/O ALREADY COMPLETED? 8 P CF A15,FNDDWT NO, SEARCH DW
0x2aabc8…2aad5c Dummy {f00=0x00d6, f01=0x0190, f02=» " P LD A2,DWTST,A6 GET DWT STATUS P RF(N) TP:RQE NOT BUSY? * P CW A5,DWTTAB,A6 J 4 P RF(NE) TP:RQE REQUEST NOT ISSUED BY THIS TASK? b 0 P LD A2,DWTWAT,A6 GET WAIT/ACTIVATE INDICATOR , P RF(NZ) TP:RQE REQUEST ISSUED WITH WAIT? P ORK A6,1
0x2aad5c…2aaef0 Dummy {f00=0x00d6, f01=0x0190, f02=»AVE FIRST DWT ADDRESS P LDR A3,A6 P* 0 PTMW:20 EQU * : 8 P ST A6,DWTWAT,A9 CHAIN THIS DWT WITH THE ONE BEFORE N $ P LDR A9,A6 SAVE THIS DWT ADDRESS P SUK A1,1 ( P RB(P) TMW:10 MORE ECB:S IN ECBBLK? : P ST A3,DWTWAT,A9 NO, SET
0x2aaef0…2ab084 Dummy {f00=0x00d6, f01=0x0190, f02=» TTAB SAVE AREA p 2 P ADK A3,0 CHECK FLAG IF FIRST ECB TO WAIT FOR & P RF(Z) TP:QDI FIRST ECB IN ECBBLK? N P* x : PTMW:40 ADKL A3,DWTWAT POINT TO WAIT/ACTIVATE INDICATOR $ P LDR* A2,A3 GET NEXT DWT ADDRESS P RF(Z) TP:QDI NO MORE DWT:S?
0x2ab084…2ab218 Dummy {f00=0x00d6, f01=0x40aa, f02=»QU * " P ABL LKMRQE LKM REQUEST ERROR P* 2 PTP:QDI EQU * < ( P ABL LKMQDI QUEUE TASK AND DISPATCH P P* | P* P* P END @ VATE INDICATOR $ P LDR* A2,A3 GET NEXT DWT ADDRESS P RF(Z) TP:QDI NO MORE DWT:S?
0x2ab218…2ab3ac Dummy {f00=0x00d6, 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
0x2ab3ac…2ab540 Dummy {f00=0x00d6, f01=0x0000, f02=»
0x2ab540…2ab6d4 (2, 104) Opaque[0x194]
0x2ab6d4…2ab868 # DirEnt {nam=»MSUBS «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1ae0, f03=0x0000}
0x2ab6d4…2ab868 IdxSect {
0x2ab6d4…2ab868 f00 = 0x00d7 // 0x2ab6d4 @0x0
0x2ab6d4…2ab868 f01 = 0x000c // 0x2ab6d6 @0x2
0x2ab6d4…2ab868 gno = [ // 0x2ab6d8 @0x4
0x2ab6d4…2ab868 [0x00]: C0x00d7.0x0.0
0x2ab6d4…2ab868 [0x01]: C0x00d7.0x1.0
0x2ab6d4…2ab868 [0x02]: C0x00d7.0x2.0
0x2ab6d4…2ab868 [0x03]: C0x00d7.0x3.0
0x2ab6d4…2ab868 [0x04]: C0x00d8.0x0.0
0x2ab6d4…2ab868 [0x05]: C0x00d8.0x1.0
0x2ab6d4…2ab868 ]
0x2ab6d4…2ab868 }
0x2ab868…2ab9fc Dummy {f00=0x00d7, f01=0x0190, f02=» 0 P IDENT MSUBS REL 9.2 79-11-16 870105040920 P 8 P* @ P* J 6 P************************************************** T P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* MSUBS = MONITOR SUBROUTINES P* P* P*
0x2ab9fc…2abb90 Dummy {f00=0x00d7, f01=0x0190, f02=»OLLOWING MONITOR r P* SUBROUTINES: P* 0 , P* -SAVE8 SAVE 8 REGISTERS ON STACK : , P* -QTJOB QUEUE TASK FOR DISPATCHING j 4 P* -QMJOB QUEUE MONITOR JOB FOR DISPATCHING . P* -ACTOT ACTIVATE TASK ON FIFO BASIS . P*
0x2abb90…2abd24 Dummy {f00=0x00d7, f01=0x018e, f02=»K SET A MONITOR BLOCK FREE " P* -FNDDWT FIND DWT ADDRESS $ * P* -FNDTID FIND TASK IDENTIFICATION J P* -PFINIT RESTART DEVICE x $ P* -SWL48 SWITCH TO LEVEL 48 $ P* -SWLXY SWITCH TO LEVEL XY P* -HALT HALT MODULE
0x2abd24…2abeb8 Dummy {f00=0x00d7, f01=0x0190, f02=» " P ENTRY SAVE8 SAVE 8 REGISTERS P ENTRY QTJOB QUEUE TASK * " P ENTRY QMJOB QUEUE MONITOR JOB J & P ENTRY ACTOT ACTIVATE TASK (FIFO) p & P ENTRY ACTOTP ACTIVATE TASK (LIFO) P ENTRY EXIT PROGRAM EXIT P ENTRY GETBLK GET BLOCK P ENT
0x2abeb8…2ac04c Dummy {f00=0x00d7, f01=0x0190, f02=»CE v $ P ENTRY SWL48 SWITCH TO LEVEL 48 $ P ENTRY SWLXY SWITCH TO LEVEL XY 2 , P ENTRY ILLINT ILLEGAL INTERRUPT ROUTINE Z * P ENTRY INTSAV SAVE AREA LAST INTERRUPT P ENTRY HALT HALT MODULE P* 2 P* ENTRIES TO RESTORE REGISTERS A8-A1
0x2ac04c…2ac1e0 Dummy {f00=0x00d7, f01=0x018e, f02=» A1 ~ 2 P ENTRY IHRTN RETURN WITHOUT ENABLE INTERRUPTS P EJECT MSUBS J P* ` P* j P************* t P* EXTERNALS * P************* P* P* : P EXTRN DISQUE POINTER TO 1ST PLACE IN DISPATCHER QUEUE & P
0x2ac1e0…2ac374 (2, 105) Dummy {f00=0x00d7, f01=0x0190, f02=» & P EXTRN TTB:ID TASK IDENTIFICATION P EXTRN TTB:SA SAVE AREA . * P EXTRN TTB:PP POINTER TO PENDING QUEUE N ( P EXTRN TTB:TD TERMINAL DEVICE TABLE | 6 P EXTRN FREQUE POINTER TO FIRST FREE MONITOR BLOCK P EXTRN DWTADR -ADDRESS BLOCK $ P E
0x2ac374…2ac508 Dummy {f00=0x00d7, f01=0x0190, f02=»XTRN TIODM DM ENTRY P EXTRN CHKIND DM ENTRY P* : P* D " PSOP EQU /2E SOP DEVICE ADDRESS N P* t P EJECT MSUBS ~ P* P* . P***************************************** P* P* CONDITIONAL ASSEMBLY P*
0x2ac508…2ac69c Dummy {f00=0x00d7, f01=0x0190, f02=»NG MMUPAG EQU 1. z P* PMMUPAG EQU 1 " P* 6 P* @ 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION J . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0 P* * . ** A PROGRAM VERSION USING TOSS D
0x2ac69c…2ac830 Dummy {f00=0x00d7, f01=0x0190, f02=»* P* S A V E 8 P* 0 P* SUBROUTINE TO SAVE 8 REGISTERS ON STACK * $ P* WITHOUT ENABLING INTERRUPTS. ^ P* P* PSAVE8 EQU * P INH INHIBIT INTERRUPTS P STR A3,A15 P STR A4,A15 P STR A5,A15
0x2ac830…2ac9c4 Dummy {f00=0x00d7, f01=0x0190, f02=»RANCH ADDRESS v P ST A2,14,A15 P ST A1,16,A15 , P LD A3,12,A15 RESTORE A3 B & P ABL 0 THIS IS USED TO BRANCH BACK b PSAVE81 EQU *-2 P* P EJECT MSUBS P* P* P* Q T J O B P* 2 P* SUBROUTINE TO
0x2ac9c4…2acb58 Dummy {f00=0x00d7, f01=0x0190, f02=» P* 8 P* THE REQUESTED JOB IS PUT IN DISPATCHER QUEUE ON 8 P* PRIORITY BASIS. WITHIN ONE PRIORITY LEVEL JOB IS J P* PUT LAST IN QUEUE. P* P* PQTJOB EQU * P INH P* P IFT CPU852=1 $ P STR A1,A15 SAVE
0x2acb58…2accec Dummy {f00=0x00d7, f01=0x0190, f02=»CK t P XIF P* . P LDKL A1,DISQUE LOAD QUEUE ANCHOR ADDRESS 2 P LDR* A2,A1 GET ADDRESS OF FIRST TASK IN QUEUE R P RF(Z) QTJ020 DISQUE EMPTY? * P LD A3,TTB:ST+1,A5 GET PRIORITY LEVEL P* P EJECT MSUBS P* P*
0x2accec…2ace80 Dummy {f00=0x00d7, f01=0x0190, f02=»1 GET NEXT TTAB ADDRESS IN QUEUE $ P RB(NZ) QTJ010 NOT END OF QUEUE? ( P* P ( PQTJ020 STR A2,A5 UPDATE QUEUE LINKS Z P STR A5,A1 P* P IFT CPU852=1 P ABL IHRET3 P XIF P* P IFT CPU852=0 * P MLR 3,A15 RESTO
0x2ace80…2ad014 (2, 106) Dummy {f00=0x00d7, f01=0x018e, f02=»B P* 6 P* SUBROUTINE TO QUEUE MONITOR JOBS ON LEVEL 49. P* N P* ENTRY PARAMETERS:- X P* v P* A1 = PARAMETER P* A2 = DISPATCH ADDRESS P* : P* A5 IS SET TO TTAB ADDRESS OF MONITOR JOBS AND THE < P*
0x2ad014…2ad1a8 Dummy {f00=0x00d7, f01=0x0190, f02=» & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF . P* : P IFT CPU852=0 D P INH Z " P MSR 8,A15 SAVE A1-A8 ON STACK f P XIF P* $ P LDKL A5,TTMJOB SET TTAB ADDRESS P RF ACT01 P* P EJECT MSUBS P* P*
0x2ad1a8…2ad33c Dummy {f00=0x00d7, f01=0x0190, f02=»* P* A1 = PARAMETER 1 P* A2 = DISPATCH ADDRESS & P* A3 = SEGMENT NUMBER H P* A4 = PARAMETER 2 h P* A5 = TTAB ADDRESS P* < P* - IF REQUESTED PROGRAM IS NOT ACTIVE THE PROGRAM IS : P* PUT IN DISPATCHER QUEU
0x2ad33c…2ad4d0 Dummy {f00=0x00d7, f01=0x0190, f02=»LL PUT REQUEST IN PENDING QUEUE ON FIFO BASIS. B P* - ACTOTP WILL PUT REQUEST IN PENDING QUEUE ON LIFO BASIS. 6 P* | P* PACTOTP EQU * P IFT CPU852=1 & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF P* P IFT CPU852=0
0x2ad4d0…2ad664 Dummy {f00=0x00d7, f01=0x0190, f02=» P EJECT MSUBS P* P* $ PACTOT EQU * . P IFT CPU852=1 B & P CF A15,SAVE8 SAVE A1-A8 ON STACK X P XIF P* P IFT CPU852=0 P INH " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P* PACT01 LDK A6,0 IND
0x2ad664…2ad7f8 Dummy {f00=0x00d7, f01=0x0190, f02=» " P ST A1,TTB:SA+2,A5 PARAMETER 1 0 P ST A2,TTB:SA,A5 SAVE (NEW) DISPATCH ADDRESS * & P ST A3,TTB:SA+6,A5 SEGMENT NUMBER ^ " P ST A4,TTB:SA+8,A5 PARAMETER 2 $ P LD A4,TTB:ID,A5 SET TERMINAL ID * P ST A4,TTB:SA+4,A5 TO A2 IN SAVE AREA P*
0x2ad7f8…2ad98c Dummy {f00=0x00d7, f01=0x0190, f02=»E JOB z P* P EJECT MSUBS P* . P* 8 PACT010 EQU * B P IFT CPU852=1 V ( P ABL IHRET8 RESTORE A1-A8 AND RETURN l P XIF P* P IFT CPU852=0 * P MLR 8,A15 RESTORE A1-A8 FROM STACK... P RTN A15 ...AND RETURN
0x2ad98c…2adb20 Dummy {f00=0x00d7, f01=0x0190, f02=»K GET A FREE BLOCK P LDR A1,A7 PARAMETER 2 P LDR A2,A4 8 P CF A15,GETBLK J P ADKL A5,TTB:PP ` P* x " PACT030 LDR A3,A5 SAVE ADDRESS ( P LDR* A5,A5 FOLLOW THE QUEUE THREAD P ADK A6,0 SET CR & P RF(NZ) ACT040 QUEUE ON LIFO
0x2adb20…2adcb4 (2, 107) Dummy {f00=0x00d7, f01=0x0190, f02=»E t P STR A5,A4 P RB ACT010 P* . P EJECT MSUBS 8 P* N P* X P* E X I T b P* v 8 P* SUBROUTINE TO SET A PROGRAM FREE AND QUEUE FIRST P* PENDING PROGRAM. P* P* ENTRY PARAMETER: P* P
0x2adcb4…2ade48 Dummy {f00=0x00d7, f01=0x018e, f02=»OGRAM COUNTER z 0 P LD A4,TTB:PP,A5 GET PENDING PROGRAM POINTER $ P RF(Z) IHRTN NO PENDING PROGRAM J P LDR* A3,A4 GET QUEUE THREAD r 0 P ST A3,TTB:PP,A5 AND SAVE IN PENDING POINTER 4 P CF A15,FREBLK RELEASE BLOCK AND GET PARAMETERS P LDR A
0x2ade48…2adfdc Dummy {f00=0x00d7, f01=0x0190, f02=» P EJECT MSUBS P* P* ( P* G E T B L K 2 P* J 4 P* SUBROUTINE TO GET A FREE BLOCK FROM MONITOR T 8 P* BLOCK POOL. REGISTERS A3-A1 ARE STORED IN FOUND P* FREE BLOCK. P* P* EXIT PARAMETER:- P*
0x2adfdc…2ae170 Dummy {f00=0x00d7, f01=0x0190, f02=»A4,FREQUE GET FIRST BLOCK IN FREE QUEUE P RF(NZ) GBL010 0 P LDK A1,/B HALT PARAMETER F , P CF A15,HALT HALT IF NO MORE FREE BLOCKS h P* PGBL010 LDR* A5,A4 . P ST A5,FREQUE TAKE BLOCK OUT OF FREE QUEUE $ P STR A3,A4 STORE A3-A1 IN
0x2ae170…2ae304 Dummy {f00=0x00d7, f01=0x0190, f02=» XIF P* P IFT CPU852=0 P RTN A15 , P XIF < P* H P EJECT MSUBS R P* h P* r P* F R E B L K | P* : P* SUBROUTINE TO GET PARAMETERS FROM A MONITOR BLOCK P* AND SET THIS BLOCK FREE. P*
0x2ae304…2ae498 Dummy {f00=0x00d7, f01=0x0190, f02=» PARAMETER IN BLOCK $ P* A2 = SECOND " " $ P* A1 = THIRD " " D P* l P* v PFREBLK EQU * P INH P LDR* A3,A4 UPDATE A3 P LD A1,FREQUE P STR A1,A4 P ST A4,FREQUE SET BLOCK FREE
0x2ae498…2ae62c Dummy {f00=0x00d7, f01=0x0190, f02=» RTN A15 P XIF P* P EJECT MSUBS & P* < P* F P* F N D D W T P P* h " P* SUBROUTINE TO FIND A DWT. r P* P* ENTRY PARAMETERS:- P* P* A5 = TTAB ADDRESS 8 P* A7 = ORDER CODE WHEN CALLED
0x2ae62c…2ae7c0 Dummy {f00=0x00d7, f01=0x0190, f02=»A6 = DWT ADDRESS IF FOUND, ELSE 0 P* * P* 4 PFNDDWT STR A1,A15 SAVE A1 > P LDKL A6,TTB:TD+2 ` 4 P ADR A6,A5 GET ADDRESS TO TERMINAL DEVICE TABLE z " P LD A1,-2,A6 GET TABLE LENGTH P* P IFT MMUPAG=1 & P ELR A2,A8 LOAD
0x2ae7c0…2ae954 (2, 108) Dummy {f00=0x00d8, f01=0x0190, f02=» EJECT MSUBS P* P* PFND100 SUK A1,4 * ( P RF(N) FND110 FILE CODE NOT IN TTAB? B & P CC A2,1,A6 SEARCH IN DEVICE TABLE n & P RF(NE) FND106 BRANCH IF NOT FOUND P STR A1,A15 P LD A1,2,A6 DWT ADDRESS " P LD A1,DWTADR,A1 A
0x2ae954…2aeae8 Dummy {f00=0x00d8, f01=0x0190, f02=» OK P LDR* A1,A15 P* PFND106 EQU * * ( P ADK A6,4 ADDRESS TO NEXT FILE CODE > P RB FND100 TRY NEXT j P* $ P* SEARCH IN COMMON DEVICE TABLE P* & PFND110 LD A6,SCTCDT CDTAB ADDRESS P LDR* A1,A6 CDTAB LENGTH
0x2aeae8…2aec7c Dummy {f00=0x00d8, f01=0x0190, f02=»LE CODE NOT FOUND? P CC A2,1,A6 ( P RF(NE) FND126 FILE CODE NOT FOUND? . P STR A1,A15 Z P LD A1,2,A6 n P LD A1,DWTADR,A1 P CWK A1,TIODM " P RF(NE) FND200 NOT DM REQUEST? $ P CF A15,CHKIND CHECK INDEX IN DM P RF FND200
0x2aec7c…2aee10 Dummy {f00=0x00d8, f01=0x0190, f02=»6,0 P RF IHRET1 ! P* ! " PFND200 LDR* A1,A15 RESET STACK ! ( P LCR A2,A6 LOAD DWT INDEX ! N P LD A6,2,A6 LOAD DWT ADDRESS ! p P* ! PFND210 RF IHRET1 ! P* ! P EJECT MSUBS ! P* ! P* ! P* F N D T I D ! P* !
0x2aee10…2aefa4 Dummy {f00=0x00d8, f01=0x0190, f02=»IDENTIFICATION ! P* " P* EXIT PARAMETER: " P* " < P* A2 = TTAB ADDRESS " F 0 P* A2 = 0 INDICATES ILLEGAL IDENTIFICATION " d P* " P* " PFNDTID STR A1,A15 SAVE A1 " P LD* A1,SCTTCT TCTAB LENGTH " P AD A1,SCTTCT " P
0x2aefa4…2af138 Dummy {f00=0x00d8, f01=0x0190, f02=»,TTB:ID,A2 COMPARE IDENTIFICATIONS " P RB(NE) FTI010 NO MATCH? # * P RF IHRET1 # J P* # ^ * PFTI030 LDK A2,0 ILLEGAL IDENTIFICATION # h P RF IHRET1 # P* # P EJECT MSUBS # P* # P* # , P* RESTORE REGISTERS AND RETURN WITHOUT #
0x2af138…2af2cc Dummy {f00=0x00d8, f01=0x0190, f02=»DR* A6,A15 # PIHRET5 LDR* A5,A15 $ PIHRET4 LDR* A4,A15 $ , PIHRET3 LDR* A3,A15 $ F PIHRET2 LDR* A2,A15 $ ` PIHRET1 LDR* A1,A15 $ z PIHRTN INH $ $ P ADKL A15,4 ADJUST STACK POINTER $ P ABR* A15 AND RETURN $ P XIF $ P* $ P IFT CPU
0x2af2cc…2af460 Dummy {f00=0x00d8, f01=0x0190, f02=» FROM STACK... $ r P RTN A15 ...AND RETURN % P* % 4 0 PIHRET1 LDR* A1,A15 RESTORE A1 FROM STACK... % > P* % r PIHRTN RTN A15 ...AND RETURN % | P XIF % P* % P EJECT MSUBS % P* % P* % P* P F I N I T % P* % & P* SU
0x2af460…2af5f4 (2, 109) Dummy {f00=0x00d8, f01=0x0190, f02=»E AVAILABLE FOR THE RESTART ROUTINES. % z P* & . P* & 8 PPFINIT EQU * & B ( P LDK A1,2 SET INDEX TO FIRST ROUTINE & V P* & $ PPFI100 CW A1,PFTAB CHECK IF LAST & " P RF(NL) PFI110 ALL RESTARTED? & P STR A1,A15 SAVE A1 & P INH & * P CFI A
0x2af5f4…2af788 Dummy {f00=0x00d8, f01=0x0190, f02=» RTN A15 RETURN WHEN ALL STARTED & P* ' ( P EJECT MSUBS ' 2 P* ' H P* ' R P* S W L 4 8 ' P* ' r & P* SWITCH TO LEVEL 48 AND ENABLE. ' | P* ' P* ' PSWL48 EQU * ' P STR A1,A15 SAVE A1 ' P* ' PSWL481 EQU * ' $ P
0x2af788…2af91c Dummy {f00=0x00d8, f01=0x018e, f02=» ' x P RTN A15 ( P* ( P EJECT MSUBS ( " P* ( 8 P* ( B P* S W L X Y ( L P* ( b & P* SWITCH TO LEVEL XY AND ENABLE. ( l P* ( . P* LEVEL := 48 IF LEVEL ON STACK IS >= 48 ( 0 P* LEVEL := XY " " " " " XY < 48 ( P*
0x2af91c…2afab0 Dummy {f00=0x00d8, f01=0x0190, f02=» ( z & P LC A1,24,A15 GET LEVEL FROM STACK ) P ANK A1,/FC ) 2 P SUK A1,/BC ) F P RB(G) SWL481 ) Z P LD A1,24,A15 ) p " P ANKL A1,/FFFE SYSTEM MODE BIT ) P RB SWL482 ) P* ) P EJECT MSUBS ) P* ) P* ) & P* INTERRUPT SAVE AND
0x2afab0…2afc44 Dummy {f00=0x00d8, f01=0x0190, f02=»A15,HALT ) P* * PHALT EQU * * P IFT CPU852=1 * , & P CF A15,SAVE8 SAVE A1-A8 ON STACK * B $ P STR A9,A15 SAVE A9-A14 ON STACK * l P STR A10,A15 * P STR A11,A15 * P STR A12,A15 * P STR A13,A15 * P STR A14,A15 * P XIF * P* *
0x2afc44…2afdd8 Dummy {f00=0x00d8, f01=0x404e, f02=»YPE OF HALT * x P HLT + P* + P* + * P* + 4 P END + >@ + J8 SAVE A1-A8 ON STACK * B $ P STR A9,A15 SAVE A9-A14 ON STACK * l P STR A10,A15 * P STR A11,A15 * P STR A12,A15 * P STR A13,A15 * P STR A14,A15 * P XIF * P* *
0x2afdd8…2aff6c Dummy {f00=0x00d8, 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. "
0x2aff6c…2b0100 Dummy {f00=0x00d8, f01=0x0190, f02=» B 0 $ * & 0 0 0 0 0 #0 *0 10 % & = 8 ? % T B % j : H IDENT Z:GB20 TRA 4.2 80-07-30 F1 O1111 02.01.XXX.1 % | Z:GB20 % Z:GB20G % * & %
0x2b0100…2b0294 (2, 110) Opaque[0x194]
0x2b0294…2b0428 # DirEnt {nam=»TTMJOB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1b10, f03=0x0000}
0x2b0294…2b0428 IdxSect {
0x2b0294…2b0428 f00 = 0x00d8 // 0x2b0294 @0x0
0x2b0294…2b0428 f01 = 0x0004 // 0x2b0296 @0x2
0x2b0294…2b0428 gno = [ // 0x2b0298 @0x4
0x2b0294…2b0428 [0x00]: C0x00d8.0x2.0
0x2b0294…2b0428 [0x01]: C0x00d8.0x3.0
0x2b0294…2b0428 ]
0x2b0294…2b0428 }
0x2b0428…2b05bc Dummy {f00=0x00d8, f01=0x018e, f02=» 2 P IDENT TTMJOB REL 9.2 79-11-16 870105040920 P : P* B P* L P* MONITOR JOB TASK TABLE V P* v P* P********* P*ENTRIES* P********* P* P* $ P ENTRY TTB:LA LAST LOAD ADDRESS P ENTRY TTB:M
0x2b05bc…2b0750 Dummy {f00=0x00d8, f01=0x0190, f02=» j & P ENTRY TTB:ID TASK IDENTIFICATION P ENTRY TTB:ST TASK STATUS 2 " P ENTRY TTB:PP PENDING POINTER T & P ENTRY TTB:PW PROGRAM STATUS WORD z $ P ENTRY TTB:SA TERMINAL SAVE AREA " P ENTRY TTB:TD TERMINAL DEVICES P* P EJECT TTM
0x2b0750…2b08e4 Dummy {f00=0x00d8, f01=0x0190, f02=»************************************* P* . . P* A PROGRAM VERSION USING TOSS MMU PAGING 8 * P* IS OBTAINED BY SETTING MMUPAG EQU 1. j P* PMMUPAG EQU 1 P* * . ** A PROGRAM VERSION USING TOSS DISC PAGING * &* IS OBTAINE
0x2b08e4…2b0a78 Dummy {f00=0x00d8, f01=0x018e, f02=» * P* IS OBTAINED BY SETTING ASSOLY EQU 1. P* 2 PASSOLY EQU 0 < P* P " P EJECT TTMJOB TTMJOB Z P* P* PLA:DUM EQU * P IFT ASSOLY=1 P DATA 0 LAST LOAD ADDRESS P XIF P* PMMUDUM EQU *
0x2b0a78…2b0c0c Dummy {f00=0x00d8, f01=0x0190, f02=» " P DATA /3000,/3400,/3800,/3C00 P XIF * P* 6 PSB:DUM EQU * @ P IFF MMUPAG+DSKPAG=0 T " P DATA 0 SEGMENT BLOCK ADDRESS p P XIF 6 PTTB:LA EQU LA:DUM-* LAST LOAD ADDRESS DISPLACEMENT . PTTB:MT EQU MMUDUM-* MMU TABLE DISPLACEMENT
0x2b0c0c…2b0da0 Dummy {f00=0x00d8, f01=0x018e, f02=»TMJOB ENTRY . PTTB:QL EQU *-TTMJOB DISPATCHER QUEUE LINK P DATA 0 F P* V , PTTB:ID EQU *-TTMJOB TASK IDENTIFICATION ` P DATA '#M' P* $ PTTB:ST EQU *-TTMJOB TASK STATUS P DATA 49 P* ( PTTB:PP EQU *-TTMJOB PENDIN
0x2b0da0…2b0f34 (2, 111) Dummy {f00=0x00d8, f01=0x4168, f02=» P EJECT TTMJOB P* P* & * PTTB:SA EQU *-TTMJOB TERMINAL SAVE AREA 0 P DATA 0 DISPATCH ADDRESS ^ 2 P DATA 0,0,0,0,0,0,0 SAVE AREA, REGISTER A1-A14 ~ P DATA 0,0,0,0,0,0,0 P* ( PTTB:TD EQU *-TTMJOB TERMINAL DEVICES P D
0x2b0f34…2b10c8 Dummy {f00=0x00d8, 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,
0x2b10c8…2b125c Dummy {f00=0x00d8, f01=0x0190, f02=»NG MMUPAG EQU 1. z P* PMMUPAG EQU 0 " P* 6 P* @ 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION J . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 1 P* * . ** A PROGRAM VERSION USING TOSS D
0x2b125c…2b13f0 Dummy {f00=0x00d8, f01=0x0190, f02=»* P* S A V E 8 P* 0 P* SUBROUTINE TO SAVE 8 REGISTERS ON STACK * $ P* WITHOUT ENABLING INTERRUPTS. ^ P* P* PSAVE8 EQU * P INH INHIBIT INTERRUPTS P STR A3,A15 P STR A4,A15 P STR A5,A15
0x2b13f0…2b1584 Dummy {f00=0x00d8, f01=0x0190, f02=»RANCH ADDRESS v P ST A2,14,A15 P ST A1,16,A15 , P LD A3,12,A15 RESTORE A3 B & P ABL 0 THIS IS USED TO BRANCH BACK b PSAVE81 EQU *-2 P* P EJECT MSUBS P* P* P* Q T J O B P* 2 P* SUBROUTINE TO
0x2b1584…2b1718 Dummy {f00=0x00d8, f01=0x0190, f02=» P* 8 P* THE REQUESTED JOB IS PUT IN DISPATCHER QUEUE ON 8 P* PRIORITY BASIS. WITHIN ONE PRIORITY LEVEL JOB IS J P* PUT LAST IN QUEUE. P* P* PQTJOB EQU * P INH P* P IFT CPU852=1 $ P STR A1,A15 SAVE
0x2b1718…2b18ac Dummy {f00=0x00d8, f01=0x0190, f02=»CK t P XIF P* . P LDKL A1,DISQUE LOAD QUEUE ANCHOR ADDRESS 2 P LDR* A2,A1 GET ADDRESS OF FIRST TASK IN QUEUE R P RF(Z) QTJ020 DISQUE EMPTY? * P LD A3,TTB:ST+1,A5 GET PRIORITY LEVEL P* P EJECT MSUBS P* P*
0x2b18ac…2b1a40 Dummy {f00=0x00d8, f01=0x0190, f02=»1 GET NEXT TTAB ADDRESS IN QUEUE $ P RB(NZ) QTJ010 NOT END OF QUEUE? ( P* P ( PQTJ020 STR A2,A5 UPDATE QUEUE LINKS Z P STR A5,A1 P* P IFT CPU852=1 P ABL IHRET3 P XIF P* P IFT CPU852=0 * P MLR 3,A15 RESTO
0x2b1a40…2b1bd4 (2, 112) Opaque[0x194]
0x2b1bd4…2b1d68 # DirEnt {nam=»TOSSIO«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1b20, f03=0x0000}
0x2b1bd4…2b1d68 IdxSect {
0x2b1bd4…2b1d68 f00 = 0x00d9 // 0x2b1bd4 @0x0
0x2b1bd4…2b1d68 f01 = 0x0026 // 0x2b1bd6 @0x2
0x2b1bd4…2b1d68 gno = [ // 0x2b1bd8 @0x4
0x2b1bd4…2b1d68 [0x00]: C0x00d9.0x0.0
0x2b1bd4…2b1d68 [0x01]: C0x00d9.0x1.0
0x2b1bd4…2b1d68 [0x02]: C0x00d9.0x2.0
0x2b1bd4…2b1d68 [0x03]: C0x00d9.0x3.0
0x2b1bd4…2b1d68 [0x04]: C0x00da.0x0.0
0x2b1bd4…2b1d68 [0x05]: C0x00da.0x1.0
0x2b1bd4…2b1d68 [0x06]: C0x00da.0x2.0
0x2b1bd4…2b1d68 [0x07]: C0x00da.0x3.0
0x2b1bd4…2b1d68 [0x08]: C0x00db.0x0.0
0x2b1bd4…2b1d68 [0x09]: C0x00db.0x1.0
0x2b1bd4…2b1d68 [0x0a]: C0x00db.0x2.0
0x2b1bd4…2b1d68 [0x0b]: C0x00db.0x3.0
0x2b1bd4…2b1d68 [0x0c]: C0x00dc.0x0.0
0x2b1bd4…2b1d68 [0x0d]: C0x00dc.0x1.0
0x2b1bd4…2b1d68 [0x0e]: C0x00dc.0x2.0
0x2b1bd4…2b1d68 [0x0f]: C0x00dc.0x3.0
0x2b1bd4…2b1d68 [0x10]: C0x00dd.0x0.0
0x2b1bd4…2b1d68 [0x11]: C0x00dd.0x1.0
0x2b1bd4…2b1d68 [0x12]: C0x00dd.0x2.0
0x2b1bd4…2b1d68 ]
0x2b1bd4…2b1d68 }
0x2b1d68…2b1efc Dummy {f00=0x00d9, f01=0x018e, f02=» 2 P IDENT TOSSIO REL 9.2 79-11-16 870105040920 P : P =1, DM ATTACH HANG UP B P REL 9.1 79-05-23 b P* ~ P* 6 P************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* ( P
0x2b1efc…2b2090 Dummy {f00=0x00d9, f01=0x0190, f02=» P* , P* THIS IS THE TOSS I/O LKM PROCESSOR. 6 P* IT CONTAINS THE FOLLOWING MONITOR SUBROUTINES: B P* | P* -TIO INITIALIZE I/O P* P* -TENDIO END I/O P* P* -ATTACH ATTACH DEVICE P* P*
0x2b2090…2b2224 Dummy {f00=0x00d9, f01=0x0190, f02=» j P* 8 P* THIS MODULE ALSO CONTAINS STANDARD DISPLACEMENT 8 P* VALUES FOR ECB AND DWT AREAS, AS WELL AS SPECIAL N . P* MOVE ROUTINES FOR DATA COMMUNICATION. P* P EJECT TOSSIO P* P* P*********** P*
0x2b2224…2b23b8 Dummy {f00=0x00d9, f01=0x0190, f02=» DC:MIN MOVE ROUTINE FOR DATACOM, INPUT 2 P ENTRY DC:MOT MOVE ROUTINE FOR DATACOM, OUTPUT 0 , P ENTRY MONMMU MONITOR (SYSTEM) MMU TABLE f P* P ENTRY ECBFC FILE CODE P ENTRY ECBBA BUFFER ADDRESS " P ENTRY ECBRL REQUESTED LENGTH " P
0x2b23b8…2b254c Dummy {f00=0x00d9, f01=0x0190, f02=»D (USED BY DM) p P* $ P ENTRY BUFLEN MMU BUFFER LENGTH $ P ENTRY ACTADR ACTIVATION ADDRESS H P ENTRY ABTADR ABORT ADDRESS p $ P ENTRY INTADR INTERRUPT ADDRESS 2 P ENTRY POLADR BUFFER POOL ADDRESS (DC DRIVERS) " P ENTRY RECADR RECOVERY
0x2b254c…2b26e0 Dummy {f00=0x00d9, f01=0x0190, f02=»NDEX DATA MANAGEMENT z 2 P ENTRY PC:DIX DEVICE INDEX PROGRAMMED CHANNEL 0 P ENTRY MX:DIX DEVICE INDEX MULTIPLEX CHANNEL R , P ENTRY KB:DIX DEVICE INDEX KEYBOARD/CTW 6 P ENTRY IT:DIX DEVICE INDEX INTERTASK COMMUNICATION P* P EJECT TOSSI
0x2b26e0…2b2874 (2, 113) Dummy {f00=0x00d9, f01=0x0190, f02=»RY DWTECB ECB ADDRESS P ENTRY DWTOR INDEX AND ORDER ( P ENTRY DWTOCH LAST OUTPUT CHARACTER B & P ENTRY DWTADR DRIVER ADDRESS BLOCK n P ENTRY DWTTAB TTAB ADDRESS * P ENTRY DWTWAT WAIT/ACTIVATE INDICATOR P ENTRY DWTTQ TERMINAL QUEUE
0x2b2874…2b2a08 Dummy {f00=0x00d9, f01=0x018e, f02=»WTMEC MMU ECB ADDRESS P ENTRY DWTA2 SAVE AREA A2 P ENTRY DWTA3 SAVE AREA A3 @ P ENTRY DWTA4 SAVE AREA A4 b P ENTRY DWTA5 SAVE AREA A5 & P ENTRY DWTSB1 STACK BASE 1 IN DWT & P ENTRY DWTSB2 STACK BASE 2 IN DWT P ENTRY DWTTP T
0x2b2a08…2b2b9c Dummy {f00=0x00d9, f01=0x0190, f02=» P EJECT TOSSIO P* P* * P************* 4 P* EXTERNALS * J P************* ` P* v P* " P EXTRN SAVE8 SAVE 8 REGISTERS 0 P EXTRN IHRET8 RESTORE 8 REGISTERS AND RETURN 4 P EXTRN IHRTN RETURN WITHOUT ENABLING
0x2b2b9c…2b2d30 Dummy {f00=0x00d9, f01=0x0190, f02=»SPATCHING j , P EXTRN QTJOB QUEUE TERM.PROG. FOR DISP. " P EXTRN MEXIT MONITOR TASK EXIT B P EXTRN TDISP DISPATCHER h 2 P EXTRN DISEND BRANCH TO DISPATCHER VIA TENDIO * P EXTRN LKMQDI QUEUE TASK AND DISPATCH , P EXTRN GETBLK PUT BLOCK IN P
0x2b2d30…2b2ec4 Dummy {f00=0x00d9, f01=0x0190, f02=» & P EXTRN TTB:ID TASK IDENTIFICATION ( P EXTRN TTB:ST TASK STATUS AND LEVEL . & P EXTRN TTB:PW PROGRAM STATUS WORD Z P EXTRN TTB:SA SAVE AREA P EXTRN TTB:MT MMUTAB P EXTRN TIODM ENTRY FOR DM P EXTRN REQEND ENTRY FOR DM * P EXT
0x2b2ec4…2b3058 Dummy {f00=0x00d9, f01=0x0190, f02=»* h P* P* CONDITIONAL ASSEMBLY P* 2 . P***************************************** < P* n . P* A PROGRAM VERSION USING TOSS MMU PAGING x * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG EQU 1 P* P* 6
0x2b3058…2b31ec Dummy {f00=0x00d9, f01=0x0190, f02=» P* P* 0 P* A PROGRAM VERSION INCLUDING ATTACH/DETACH * P* IS OBTAINED BY SETTING ATTDET EQU 1. L P* z PX:A EQU 0 PATTDET EQU X:A P* P* 4 P* A PROGRAM VERSION SPECIALIZED FOR THE 857 CPU * P* IS OBTAINED BY
0x2b31ec…2b3380 Dummy {f00=0x00d9, f01=0x0190, f02=»***************** P* FORM STATEMENTS * P******************* 6 P* R P* PBYTES FORM 8,8 f P* | P EJECT TOSSIO P* P* P********************* P* DWT DISPLACEMENTS * P*********************
0x2b3380…2b3514 (2, 114) Dummy {f00=0x00d9, f01=0x0190, f02=»TBC EQU /03 BYTE COUNTER PDWTECB EQU /04 ECB ADDRESS " PDWTOR EQU /06 INDEX AND ORDER B ( PDWTOCH EQU /06 LAST OUTPUT CHARACTER h ( PDWTADR EQU /08 DRIVER ADDRESS BLOCK PDWTTAB EQU /0A TTAB ADDRESS * PDWTWAT EQU /0C WAIT/ACTIVATE INDICAT
0x2b3514…2b36a8 Dummy {f00=0x00d9, f01=0x0190, f02=»FT MMUPAG=0 4 PDWTDRD EQU DWTTQ+2 START OF DRIVER DEFINED PART P XIF L P* X P IFT MMUPAG=1 b 4 PDWTDRD EQU DWTMEC+2 START OF DRIVER DEFINED PART x P XIF P* P EJECT TOSSIO P* , P* DWT DISPLACEMENTS: DRIVER DEFI
0x2b36a8…2b383c Dummy {f00=0x00d9, f01=0x0190, f02=»U DWTDRD+/02 SAVE AREA A2 & PDWTA3 EQU DWTDRD+/02 SAVE AREA A3 " & PDWTA4 EQU DWTDRD+/04 SAVE AREA A4 L & PDWTA5 EQU DWTDRD+/06 SAVE AREA A5 v . PDWTSB1 EQU DWTDRD+/0A STACK BASE 1 IN DWT . PDWTSB2 EQU DWTDRD+/0E STACK BASE 2 IN DWT & PDWTT
0x2b383c…2b39d0 Dummy {f00=0x00d9, f01=0x018e, f02=»QU DWTDRD+/1C DISC VOLUME NAME P* & P EJECT TOSSIO 0 P* H P* R * P************************************** * P* DRIVER ADDRESS BLOCK DISPLACEMENTS * * P************************************** P* P* & PKEYLEN EQU -6
0x2b39d0…2b3b64 Dummy {f00=0x00d9, f01=0x018e, f02=» n PABTADR EQU 2 ABORT ADDRESS " PINTADR EQU 4 INTERRUPT ADDRESS * $ PPOLADR EQU 4 BUFFER POOL ADDRESS P " PRECADR EQU 6 RECOVERY ADDRESS x PECHADR EQU 8 ECHO ADDRESS P* P* P*********************** P* DEVICE INDEX VALUE
0x2b3b64…2b3cf8 Dummy {f00=0x00d9, f01=0x0190, f02=» H F P* FROM ADDRESS TABLES TIOTAB AND TENTAB AT READ/WRITE REQUESTS. P* R $ PDC:DIX EQU -2 DATA COMMUNICATION PDM:DIX EQU 0 DATA MANAGEMENT $ PPC:DIX EQU 2 PROGRAMMED CHANNEL " PMX:DIX EQU 4 MULTIPLEX CHANNEL PKB:DIX EQU 6 KEYBO
0x2b3cf8…2b3e8c Dummy {f00=0x00d9, f01=0x0190, f02=» z P* ECB DISPLACEMENTS * P********************* & P* D P* N PECBFC EQU /01 FILE CODE X PECBBA EQU /02 BUFFER ADDRESS x " PECBRL EQU /04 REQUESTED LENGTH " PECBEL EQU /06 EFFECTIVE LENGTH PECBRC EQU /08 RETURN CODE
0x2b3e8c…2b4020 Dummy {f00=0x00d9, f01=0x0190, f02=» MMUPAG=1 P* P* P********** & P* TIOTAB * 8 P********** J P* < P* TIOTAB CONTAINS ADDRESSES TO ROUTINES ENTERED FROM TIO f P* 2 PTIOTAB EQU * DEVICE TYPE/ROUTINE ADDRESS TABLE . P DATA TIO:DM DATA MANAGEMENT, INPU
0x2b4020…2b41b4 (2, 115) Dummy {f00=0x00d9, f01=0x0190, f02=» PTINDEX EQU *-TIOTAB 0 P DATA TIOITI INTERTASK COMMUNICATION, INPUT $ , P DATA TIOPCO PROGRAMMED CHANNEL, OUTPUT X P DATA TIOMXO MUX, OUTPUT & P DATA TIOKBO KEYBOARD/CTW, OUTPUT 0 P DATA TIOITO INTERTASK COMMUNICATION, OUTPUT P*
0x2b41b4…2b4348 Dummy {f00=0x00d9, f01=0x0190, f02=»DRESSES TO ROUTINES ENTERED FROM TENDIO | P* 0 2 PTENTAB EQU * DEVICE TYPE/ROUTINE ADDRESS TABLE : . P DATA TEN:DM DATA MANAGEMENT, INPUT/OUTPUT p * P DATA TENPCI PROGRAMMED CHANNEL, INPUT P DATA TENMXI MUX, INPUT $ P DATA TENKBI KEYBOARD/CT
0x2b4348…2b44dc Dummy {f00=0x00d9, f01=0x0190, f02=»TPUT | & P DATA TENKBO KEYBOARD/CTW, OUTPUT 0 P DATA TENITO INTERTASK COMMUNICATION, OUTPUT 6 P XIF j P* v P EJECT TOSSIO P* P* P********** P* MONMMU * P********** P* P* MONITOR (SYSTEM) MMU TABLE
0x2b44dc…2b4670 Dummy {f00=0x00d9, f01=0x0190, f02=»0,/1400,/1800,/1C00 " P DATA /2000,/2400,/2800,/2C00 " P DATA /3000,/3400,/3800,/3C00 B P XIF h P* t P EJECT TOSSIO ~ P* P* P IFT ATTDET=1 P* 2 P* SUBROUTINES BELOW ARE USED BY ATTACH/DETACH P*
0x2b4670…2b4804 Dummy {f00=0x00d9, f01=0x0190, f02=»: A4 = BLOCK ADDRESS P* A5 = TTAB ADDRESS P* A6 = DWT ADDRESS @ " P* A1-A3 ARE DESTROYED b P* PTIMOUT LDR A6,A1 & P LDR* A2,A2 TIMER POINTER ADDRESS P LD A5,2,A2 GET TTAB ADDRESS P* P IFT M
0x2b4804…2b4998 Dummy {f00=0x00d9, f01=0x018e, f02=»* A1,A4 " P STR A1,A2 REMOVE FROM ATT:CH P CF A15,FREBLK 6 P* L P EJECT TOSSIO V P* n & P* REMOVE TTAB FROM DEVICE QUEUE x P* P LDR A1,A6 & P ADK A1,DWTTQ QUEUE ANCHOR ADDRESS P* PTIM:10 LDR A2,A1 SAVE
0x2b4998…2b4b2c Dummy {f00=0x00d9, f01=0x018e, f02=» P EJECT TOSSIO P* & P* TTAB FOUND - REMOVE FROM QUEUE * P* T P LDR* A1,A1 ^ P STR A1,A2 r P* PTIM:20 EQU * P LDK A3,4 . P ADS A3,TTB:SA,A5 UPDATE DISPATCH ADDRESS : P LD A8,TTB:SA+16,A5 GET ECB ADDRES
0x2b4b2c…2b4cc0 Dummy {f00=0x00d9, f01=0x0190, f02=» h P XIF P* P IFT ATTDET=1 P IFT MMUPAG=1 4 * P ES A3,ECBRC,A8 INDICATE ERROR IN ECB J . P TL MONMMU LOAD MONITOR (SYSTEM) MMU TABLE x P XIF P* P IFT ATTDET=1 & P RF TIORTN QUEUE TASK AND DISPATCH P*
0x2b4cc0…2b4e54 (2, 116) Dummy {f00=0x00da, f01=0x018e, f02=» TTAB ADDRESS P* 6 P* OUTPUT: A2 = ADDRESS TO PRECEDING BLOCK IN CHAIN 2 P* A4 = BLOCK ADDRESS IF FOUND, ELSE 0 Z P* ( PFNDBLK LDKL A4,ATT:CH ANCHOR ADDRESS P* PFND:10 LDR A2,A4 SAVE A4 P LDR* A4,A4 P RF(
0x2b4e54…2b4fe8 Dummy {f00=0x00da, f01=0x0190, f02=» P ABL IHRTN RETURN P XIF P* * P IFT ATTDET=1 4 P IFT CPU852=0 J P RTN A15 RETURN ` P XIF x P* P IFT ATTDET=1 & PATT:CH DATA 0 ATTACH CHAIN ANCHOR P* P EJECT TOSSIO P* P* F D B A T T
0x2b4fe8…2b517c Dummy {f00=0x00da, f01=0x0190, f02=»PUT: A5 = TTAB ADDRESS P* A6 = FDB ADDRESS $ P* A10 = /800 (ATTACH BIT) B P* j " P* OUTPUT: A2-A4 AREA DESTROYED t P* PFDBDET EQU * P C1R A10,A10 A10=F7FF P* PFDBATT EQU * P LDR A4,A6 FDB ADDRE
0x2b517c…2b5310 Dummy {f00=0x00da, f01=0x0190, f02=» LDR* A2,A4 NEXT FDB P RF(Z) FDB:20 NO FDB? ! P LDR A10,A10 ! : " P RF(N) FDB:15 DETACH REQUEST? ! N $ P ORS A10,DWTST,A2 ATTACH REQUEST ! t P ST A5,DWTTAB,A2 ! P RF FDB:20 ! P* ! * PFDB:15 ANS A10,DWTST,A2 DETACH REQUEST ! P CF A15,QR
0x2b5310…2b54a4 Dummy {f00=0x00da, f01=0x0190, f02=»* Q R E Q ! P* " 8 P* SUBROUTINE TO QUEUE TASK IN DEVICE QUEUE (IF ANY) " P* " X P* INPUT: A2 = DWT ADDRESS " b P* " " P* OUTPUT: A7, A9 ARE DESTROYED " P* " PQREQ EQU * " & P LDR A9,A5 SAVE A5 (TTAB ADDRESS) " & P LD A5,DWTTQ,A
0x2b54a4…2b5638 Dummy {f00=0x00da, f01=0x0190, f02=»QUEUE TASK " P* # PQRE:10 EQU * # $ P LDR A5,A9 RESTORE TTAB ADDRESS # 0 P IFT CPU852=1 # X P RB FND:20 RETURN # n P XIF # P* # P IFT ATTDET=1 # P IFT CPU852=0 # P RTN A15 RETURN # P XIF # P* # P IFT ATTDET=1 #
0x2b5638…2b57cc Dummy {f00=0x00da, f01=0x018e, f02=» THIS MODULE IS CALLED FROM TIO WITH # P* THE FOLLOWING PARAMETERS: $ , P* $ P & P* A3 /8000 (REQUEST ERROR BIT) $ Z & P* A4 I/O AND ACTIVATE INDICATOR $ P* A5 TTAB ADDRESS $ P* A6 DWT ADDRESS $ P* A7 ORDER CODE $ P* A8
0x2b57cc…2b5960 Dummy {f00=0x00da, f01=0x0190, f02=» PATTACH EQU * ENTRY % P ADK A4,0 SET CR % * P RF(NZ) TIOERR I/O AND ACTIVATE ERROR? % 6 P* % d P IFT MMUPAG=0 % n " P CM ECBRC,A8 RESET RETURN CODE % P XIF % P* % P IFT ATTDET=1 % P IFT MMUPAG=1 % & P ES A4,ECBRC,A8 RESET RETURN
0x2b5960…2b5af4 (2, 117) Dummy {f00=0x00da, f01=0x018e, f02=» DEVICE ALREADY ATTACHED? % P LDR A13,A13 & " P RF(NN) ATT:50 DEVICE BUSY? & 6 P* & Z P* ATTACH REQUESTING TASK & d P* & P ORS A10,DWTST,A6 ATTACH & , P ST A5,DWTTAB,A6 PUT TTAB ADDRESS IN DWT & P CWK A12,TIODM & " P RF(NE) ATT:15 N
0x2b5af4…2b5c88 Dummy {f00=0x00da, f01=0x0190, f02=» P ADK A4,0 SET CR ' P RF(Z) ATTRTN NO! ' P* ' 6 P EJECT TOSSIO ' @ P* ' X & P* FREE BLOCK AND TIMER IN ATT:CH ' b P* ' P CM* 2,A4 FREE TIMER ' " P LDR* A3,A4 REMOVE FROM ATT:CH ' P STR A3,A2 ' P CF A15,FREBLK RELEASE BLOCK '
0x2b5c88…2b5e1c Dummy {f00=0x00da, f01=0x018e, f02=»ATT:50 CF A15,FNDBLK ' P ADK A4,0 SET CR ( $ P RF(NZ) ATT:70 IS TIMER ACTIVE? ( 6 P* ( ^ P* SET TIMER ( h P* ( P IFT MMUPAG=0 ( P LD A1,ECBCW,A8 TIME ( P XIF ( P* ( P EJECT TOSSIO ( P* ( P* ( P IFT ATTDE
0x2b5e1c…2b5fb0 Dummy {f00=0x00da, f01=0x0190, f02=» ( r P RF(Z) ATT:80 END REQUEST? ) P* ) * PATT:60 ST A1,ATTIM ) 4 P LDR A1,A5 TTAB ADDRESS ) N P LD A3,ATT:CH ANCHOR ) n P CF A15,GETBLK GET BLOCK ) P ST A4,ATT:CH UPDATE ANCHOR ) $ P ADK A4,2 TIMER POINTER ADDRESS ) P LDR A1,A6 DWT ADD
0x2b5fb0…2b6144 Dummy {f00=0x00da, f01=0x0190, f02=»ARAMETER ) p P RF TIOQ20 * P* * " & PATT:80 LDK A3,/40 SET TIME OUT BIT * , P RF TIOERR RETURN * V P* * p P EJECT TOSSIO * z P* * P* * P********** * P* DETACH * * P********** * P* * * P* THIS MODULE IS CALLED FROM TIO W
0x2b6144…2b62d8 Dummy {f00=0x00da, f01=0x018e, f02=»E ERROR? * r P TM A10,A13 + P RF(Z) TIOERR NOT ATTACHED? + $ P CW A5,DWTTAB,A6 + H * P RF(NE) TIOERR ATTACHED TO OTHER TASK? + ` P XRS A10,DWTST,A6 DETACH + P CWK A12,TIODM + " P RF(NE) DET:05 NO DM REQUEST? + ( P CF A15,FDBDET DETACH FILE STR
0x2b62d8…2b646c Dummy {f00=0x00da, f01=0x0190, f02=» P* , 2 PATTRTN EQU * COMMON ATTACH/DETACH NORMAL EXIT , PDETRTN LDK A3,0 RETURN CODE , D P XIF , h P* , t P EJECT TOSSIO , ~ P* , P* , P********** , P* TIOERR * , P********** , P* , P* ERROR: FILE CODE UNKNOWN ,
0x2b646c…2b6600 Dummy {f00=0x00da, f01=0x0190, f02=» , * P ST A3,ECBRC,A8 INDICATE ERROR IN ECB - P XIF - 6 P* - B P IFT MMUPAG=1 - L * P ES A3,ECBRC,A8 INDICATE ERROR IN ECB - b P XIF - P* - PTIORTN EQU * - ( P ABL LKMQDI QUEUE TASK AND DISPATCH - P* - P EJECT TOSSIO - P
0x2b6600…2b6794 (2, 118) Dummy {f00=0x00da, f01=0x0190, f02=»R QUEUEING DEVICE REQUESTS. - x > P* THE ROUTINE IS ENTERED AT DIFFERENT LABELS DEPENDING ON . $ @ P* WHETHER THE DEVICE IS AN ECHO DEVICE OR NOT, AND DEPENDING . f 8 P* ON WHETHER THE DEVICE IS ATTACHED OR NOT, AND WHEN . B P* ATTACHED, WHETHER THE DEVICE IS
0x2b6794…2b6928 Dummy {f00=0x00da, f01=0x0190, f02=»CE FIRST . P* / ( PTIOQ05 ADK A6,DWTTQ GET QUEUE ANCHOR / P LDR A2,A6 / F P LDR* A6,A6 / X $ P RF TIOQ40 INSERT FIRST IN QUEUE / l P* / & PTIOQ10 LDR A6,A2 QUEUE ECHO DEVICE / P* / ( PTIOQ20 ADK A6,DWTTQ GET QUEUE ANCHOR / P LD A1,TTB
0x2b6928…2b6abc Dummy {f00=0x00da, f01=0x0190, f02=» A2,A6 / $ P LDR* A6,A6 FOLLOW QUEUE TO END 0 P RF(Z) TIOQ40 END FOUND? 0 6 & P CC A1,TTB:ST+1,A6 COMPARE LEVELS 0 V P RB(NL) TIOQ30 TRY NEXT? 0 P* 0 0 P* INSERT IN QUEUE AND UPDATE PROGRAM COUNTER 0 P* 0 PTIOQ40 LDKL A3,-4 0 P STR A
0x2b6abc…2b6c50 Dummy {f00=0x00da, f01=0x0190, f02=» 0 4 PTIOQ50 ADS A3,TTB:SA,A5 UPDATE PC TO REPEAT LKM 1 P* 1 @ PTIOQ60 EQU * 1 J P ABL TDISP GO TO DISPATCHER 1 ^ P* 1 P EJECT TOSSIO 1 P* 1 P* 1 P******* 1 P* TIO * 1 P******* 1 P* 1 P* 1 . P* THIS MODUL
0x2b6c50…2b6de4 Dummy {f00=0x00da, f01=0x0190, f02=»EUED 1 d 2 P* AND THE TERMINAL PROGRAM SET IN WAIT STATE. 2 P* 2 B 2 P* WHEN RUNNING WITH MMU OPTION SPECIAL DEVICE 2 L * P* DEPENDENT SUBROUTINES ARE PERFORMED. 2 P* 2 6 P* THIS MODULE IS CALLED BY THE LKM HANDLING MODULE 2 & P* WITH THE FOLLOWING
0x2b6de4…2b6f78 Dummy {f00=0x00da, f01=0x0190, f02=» NOT ZERO, I/O AND ACTIVATION 2 P* 3 ( P* A5 = TTAB ADDRESS 3 2 P* 3 N P* A7 = ORDER CODE 3 X P* 3 r P* A8 = ECB ADDRESS 3 | P* 3 P EJECT TOSSIO 3 P* 3 P* 3 < P* THE 'TIO'-ROUTINE EXITS TO REQUESTED ACTIVATION DRIVER 3
0x2b6f78…2b710c Dummy {f00=0x00da, f01=0x0190, f02=»* 3 P* A7 = ORDER CODE 4 P* 4 $ P* A8 = ECB ADDRESS 4 . P* 4 J , P* A12 = ADDRESS TO DRIVER ADDRESS BLOCK 4 T P* 4 0 P* A13 = 0, IF REQUEST ISSUED IN SYSTEM MODE 4 . P* = 1, " " " " USER MODE 4 P* 4 P* 4 , P
0x2b710c…2b72a0 Dummy {f00=0x00da, f01=0x0190, f02=» READY AND ECHO FIELDS 4 P* -DWTTAB TTAB ADDRESS 5 & P* -DWTWAT WAIT/ACTIVATE INDICATOR 5 > . P* -DWTUEC USER ECB ADDRESS (MMU SYSTEMS) 5 h P* 5 P* 5 * P* THE FOLLOWING ECB FIELDS ARE RESET:- 5 P* 5 P* -BIT 0 IN THE FIRST WORD 5
0x2b72a0…2b7434 (2, 119) Dummy {f00=0x00da, f01=0x0190, f02=»ECK IF REQUEST IS BUSY 5 x P* 6 ( PTIO CF A15,FNDDWT SEARCH DWT ADDRESS 6 ( P LDKL A3,/8000 6 T P ADK A6,0 SET CR 6 j $ P RB(Z) TIOERR FILE CODE UNKNOWN? 6 : P LD A12,DWTADR,A6 GET ADDRESS TO DRIVER ADDRESS BLOCK 6 $ P LD A13,DWTST,A6 GET DWT STATUS
0x2b7434…2b75c8 Dummy {f00=0x00da, f01=0x0190, f02=»TTACH ATTACH ORDER? 6 P SUK A7,1 7 P RB(Z) DETACH DETACH ORDER? 7 . " P ADK A7,/BC RESTORE ORDER CODE 7 R P XIF 7 x P* END OF =1 7 " P LD A11,TTB:ID,A5 GET TASK ID 7 P ANKL A11,/FF44 7 P SUKL A11,'#D' CHECK TASK ID 7 " P RF(Z) TIO02
0x2b75c8…2b775c Dummy {f00=0x00da, f01=0x0190, f02=» TOSSIO 7 P* 8 & P* CHECK IF DEVICE IS ATTACHED/BUSY 8 P* 8 F P IFT ATTDET=1 8 P P TM A10,A13 8 f P RF(Z) TIO020 NOT ATTACHED? 8 z P CW A5,DWTTAB,A6 8 * P RB(NE) TIOQ20 ATTACHED TO OTHER TASK? 8 P TM A3,A13 8 $ P RF(NZ) TIO030 DEV
0x2b775c…2b78f0 Dummy {f00=0x00da, f01=0x0190, f02=»VICE BUSY? 8 P* 9 P EJECT TOSSIO 9 P* 9 4 H P* CHECK IF ECHO, AND WHEN TRUE CHECK IF ECHO DEVICE IS BUSY/ATTACHED 9 > P* 9 * PTIO030 SC A2,DWTOR,A6 STORE DWT INDEX 9 P LDK A2,/40 CHECK IF ECHO 9 P ANR A2,A7 9 P RF(Z) TIO070 NOT
0x2b78f0…2b7a84 Dummy {f00=0x00da, f01=0x0190, f02=»70 9 P* : . PTIO040 LD A2,DWTECH,A6 GET ECHO DEVICE DWT : " P RF(Z) TIO070 NO ECHO DEVICE? : F & P LD A9,DEVIND,A12 GET DEVICE INDEX : l $ P CWK A9,KB:DIX CHECK IF KEYBOARD : 4 P RF(NE) TIO070 ECHO NOT ALLOWED IF NOT KEYBOARD : ( P LD A14,DWTST,A2 G
0x2b7a84…2b7c18 Dummy {f00=0x00da, f01=0x018e, f02=»TAB,A2 : 6 P RB(NE) TIOQ10 ECHO DEVICE ATTACHED TO OTHER TASK? ; P TM A3,A14 ; H ( P RF(NZ) TIO060 ECHO DEVICE NOT BUSY? ; Z & P RB TIOQ00 BUSY, QUEUE ECHO DEVICE ; P XIF ; P* ; P EJECT TOSSIO ; P* ; P* ; PTIO050 TM A3,A14 ; $
0x2b7c18…2b7dac Dummy {f00=0x00da, f01=0x0190, f02=» ; X P* < P* UPDATE ECB AND DWT FIELDS < P* < 6 @ PTIO070 XRS A3,DWTST,A6 UPDATE BUSY & ECHO BITS IN DWT STATUS < @ P* < P IFT MMUPAG=1 < P LD A13,TTB:PW,A5 GET PSW < ( P ANKL A13,1 GET SYSTEM/USER MODE BIT < $ P RF(NZ) TIO100 JUMP IF
0x2b7dac…2b7f40 Dummy {f00=0x00da, f01=0x0190, f02=» CM ECBEL,A8 RESET EFFECTIVE LENGTH < $ P CM ECBRC,A8 RESET RETURN CODE = , P RF TIO110 = T P* = f P EJECT TOSSIO = p P* = P* MOVE USER ECB TO DWT ECB = P* = PTIO100 EQU * = P LDKL A2,/4FFF = * P ELR A3,A8 LOAD FIRST WORD OF US
0x2b7f40…2b80d4 (2, 120) Dummy {f00=0x00db, f01=0x0190, f02=»A2,DWTECB,A6 SET ACTUAL ECB ADDRESS = P STR A3,A2 > , * P ST A8,DWTUEC,A6 SAVE USER ECB ADDRESS > > P LDR A9,A8 > l P LDK A3,0 > ~ * P ES A3,ECBEL,A8 RESET EFFECTIVE LENGTH > & P ES A3,ECBRC,A8 RESET RETURN CODE > P* > P LDR A10,A1 SAVE PARAM
0x2b80d4…2b8268 Dummy {f00=0x00db, f01=0x0190, f02=» MVUS A3 MOVE PART OF USER ECB TO DWT ECB > " P LDR A1,A10 RESTORE PARAMETER ? 2 P XIF ? X P* ? d P IFT MMUPAG=0 ? n P LDKL A3,/7FFF ? , P ANRS A3,A8 RESET BIT 0 IN ECB FILE CODE ? ( P CM ECBEL,A8 RESET EFFECTIVE LENGTH ? $ P CM ECBRC,A8 RESE
0x2b8268…2b83fc Dummy {f00=0x00db, f01=0x0190, f02=» ANK A7,/3F ? ( P SC A7,DWTOR+1,A6 STORE ORDER IN DWT @ P CWK A12,TIODM @ @ * P RF(NE) TIO120 JUMP IF NOT DM REQUEST @ V 0 P ST A5,DWTTDM,A6 SAVE TTAB ADDRESS IN DWTTDM @ P RF TIO130 @ P* @ PTIO120 EQU * @ 0 P ST A5,DWTTAB,A6 SAVE TTAB ADDRE
0x2b83fc…2b8590 Dummy {f00=0x00db, f01=0x0190, f02=»* UPDATE DWTWAT (WAIT/ACTIVATE INDICATOR) @ P* A 2 P LDR A2,A4 CHECK PARAMETER A < & P RF(NZ) TIO210 I/O AND ACTIVATION? A ^ 4 P ANK A3,/80 NORMAL I/O. CHECK IF WAIT REQUESTED A P RF(Z) TIO220 NOT WAIT? A P LDK A4,1 INDICATE WAIT A P RF TIO2
0x2b8590…2b8724 Dummy {f00=0x00db, f01=0x0190, f02=»HING A f P* B 8 PTIO230 ST A4,DWTWAT,A6 STORE WAIT/ACTIVATE INDICATOR B P* B R P EJECT TOSSIO B P* B t P* B ~ P IFT MMUPAG=1 B * P LDR A13,A13 CHECK IF SYSTEM/USER MODE B & P RF(Z) TIO250 JUMP IF SYSTEM MODE B & P LD A3,DEVIND,A12
0x2b8724…2b88b8 Dummy {f00=0x00db, f01=0x0190, f02=»K ON ORDER CODE B P* C P LDR A4,A7 GET ORDER CODE C " 0 P CF A15,RD:WR2 CHECK IF ORDER IS READ/WRITE C D . P RF(Z) TIO250 JUMP IF NO READ/WRITE ORDER C x P* C PTIO240 EQU * C P ENB C < P CFI A15,TIOTAB,A3 BRANCH TO RELEVANT READ/WRITE ROU
0x2b88b8…2b8a4c Dummy {f00=0x00db, f01=0x0190, f02=» ADR A5,A6 C P INH D & P ABR* A12 GO TO DRIVER ACTIVATION D P* D H P EJECT TOSSIO D R P* D j P* D t P IFT MMUPAG=1 D ~ P* D P* R D : W R D P* D @ P* THIS MODULE IS CALLED BY 'TIO' AND 'TENDIO' FOR SELECTING D @ P* THE AP
0x2b8a4c…2b8be0 Dummy {f00=0x00db, f01=0x0190, f02=»AD/WRITE REQUEST, CONDITION REGISTER ON STACK IS D * P* SET TO ZERO, ELSE NOT EQUAL TO ZERO. E 8 P* E f P* INPUT: A3 = DEVICE INDEX E p P* A6 = DWT ADDRESS E P* E : P* OUTPUT: A3 = INDEX FOR USE IN THE INDEXED BRANCHING E . P*
0x2b8be0…2b8d74 (2, 121) Dummy {f00=0x00db, f01=0x0190, f02=»DWTOR,A6 GET ORDER CODE FROM DWT E P ANK A4,/3F F ( P* F < * PRD:WR2 ADKL A15,4 ADJUST STACKPOINTER F F $ P LC A4,ORDTAB,A4 GET ORDER INDEX F t P ANK A4,/FF F . P ABR(Z)* A15 RETURN IF NO READ/WRITE ORDER F P SUK A4,1 F $ P ADR A3,A4 ADD READ/
0x2b8d74…2b8f08 Dummy {f00=0x00db, f01=0x0190, f02=»* ORDTAB * F P********** G P* G $ 2 P* ORDTAB CONTAINS ORDER CONSTANTS AS FOLLOWS: G . P* G d P* =0: NO READ/WRITE ORDER G n P* =1: READ ORDER G P* =TINDEX+1: WRITE ORDER G P* G PORDTAB EQU * ORDER CONSTANTS G P BYTES 0,1 /00
0x2b8f08…2b909c Dummy {f00=0x00db, f01=0x0190, f02=»/08, /09 G ~ P BYTES 1,TINDEX+1 /0A, /0B H P BYTES 0,0 /0C, /0D H 2 P BYTES 0,0 /0E, /0F H N P BYTES 0,1 /10, /11 H j P BYTES 0,0 /12, /13 H P BYTES 0,TINDEX+1 /14, /15 H P BYTES 0,0 /16, /17 H P BYTES 0,0 /18, /19 H P BYTES 0,0 /
0x2b909c…2b9230 Dummy {f00=0x00db, f01=0x018e, f02=» P BYTES 0,0 /24, /25 I P BYTES 0,0 /26, /27 I P BYTES 0,0 /28, /29 I < P BYTES 0,0 /2A, /2B I X P BYTES 0,1 /2C, /2D I t P BYTES 1,TINDEX+1 /2E, /2F I P BYTES 0,0 /30, /31 I P BYTES 0,0 /32, /33 I P BYTES 0,0 /34, /35 I P B
0x2b9230…2b93c4 Dummy {f00=0x00db, f01=0x0190, f02=» P* J P EJECT TOSSIO J P* J & P* T I O : D M J 0 P* J F 4 P* THIS MODULE IS CALLED BY 'TIO' WHEN A REQUEST J P * P* FOR DATA MANAGEMENT HAS BEEN ISSUED. J P* J & P* INPUT: A8 = FDB MMU ECB ADDRESS J $ P* A9 = USER ECB ADDRES
0x2b93c4…2b9558 Dummy {f00=0x00db, f01=0x0190, f02=»ER BUFFER ADDRESS J z P ST A2,ECBBA,A8 K , P EL A2,ECBCW2,A9 GET SECOND CONTROL WORD K 2 P ST A2,ECBCW2,A8 K b P* K z PA15RTN EQU * K P RTN A15 K P* K P EJECT TOSSIO K P* K P* T I O P C I K P* K B P* THIS MODULE IS CAL
0x2b9558…2b96ec Dummy {f00=0x00db, f01=0x0190, f02=» AND DWT BUFFER ADDRESSES SO THAT BOTH ARE K | < P* EVEN OR UNEVEN, DEPENDING ON THE USER BUFFER ADDRESS. L 2 4 P* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT L r , P* COMPLETION OF THE REQUEST IS 'TENPCI'. L 4 P* NOTICE THAT ENTRY TIPI05 IS USED BY 'TIOKBI'
0x2b96ec…2b9880 Dummy {f00=0x00db, f01=0x0190, f02=»K L j P* M P* OUTPUT: A1 IS DESTROYED M P* M 6 * PTIOPCI EQU * PROGRAMMED CHANNEL, INPUT M @ ( P LD A1,ECBRL,A8 GET REQUESTED LENGTH M n 2 P CW A1,BUFLEN,A12 COMPARE WITH DWT BUFFER SIZE M 6 P RF(G) IO:ERR REQ. LENGTH EXCEEDS DWT BUFFER SIZE? M
0x2b9880…2b9a14 (2, 122) Dummy {f00=0x00db, f01=0x0190, f02=»IPI10 USER BUFFER ADDRESS EVEN? M P ORS A1,ECBBA,A8 N ( P RTN A15 N @ P* N P 0 PTIPI10 SUK A1,2 MAKE DWT BUFFER ADDRESS EVEN N Z P ANS A1,ECBBA,A8 N P RTN A15 N P* N P EJECT TOSSIO N P* N P* T I O M X I N P* N B P* THIS
0x2b9a14…2b9ba8 Dummy {f00=0x00db, f01=0x0190, f02=»XI ASSEMBLES THE FULL 18 BIT BUFFER ADDRESS WHICH IS N , P* TRANSFERRED TO THE MUX BY THE DRIVER. O < 4 P* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT O l , P* COMPLETION OF THE REQUEST IS 'TENMXI'. O 6 P* NOTICE THAT MODULE 'TIOMXO' IS EQUAL TO TIOMXI. O
0x2b9ba8…2b9d3c Dummy {f00=0x00db, f01=0x0190, f02=»TPUT: A1-A2 ARE DESTROYED O B P* 18 BIT USER BUFFER ADDRESS IS TRANSFERRED TO DWT ECB P " P* P h PTIOMXI EQU * MUX, INPUT P r , P EL A1,ECBBA,A9 GET USER BUFFER ADDRESS P P ECR A2,A1 P & P ANKL A1,/FFF SKIP 4 LEFTMOST BITS P P SRL A2,3
0x2b9d3c…2b9ed0 Dummy {f00=0x00db, f01=0x0190, f02=» SRL A2,2 P P ANK A2,/3F Q 4 P SCR A2,A8 STORE BITS 16-17 IN DWT ECB 1ST WORD Q & P ANK A2,/0F Q ^ P SRC A2,4 Q r P ORR A1,A2 Q 2 P ST A1,ECBBA,A8 STORE MODIFIED BUFFER ADDRESS Q P RTN A15 Q P* Q P EJECT TOSSIO Q P* Q P
0x2b9ed0…2ba064 Dummy {f00=0x00db, f01=0x018e, f02=»D/CTW. TIOKBI WILL SET BUFFER ADDRESSES Q n 6 P* AND MOVE KEYTABLE (IF ANY) BY USING ENTRY TIPI05 R 0 0 P* IN 'TIOPCI' AND ENTRY TIPO05 IN 'TIOPCO'. R j 4 P* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT R , P* COMPLETION OF THE REQUEST IS 'TENKBI'. R P*
0x2ba064…2ba1f8 Dummy {f00=0x00db, f01=0x0190, f02=» , P* A12 = ADDRESS TO DRIVER ADDRESS BLOCK S P* S 4 " P* OUTPUT: A1-A4 ARE DESTROYED S > P* S d PTIOKBI EQU * KEYBOARD/CTW S n ( P LD A1,ECBRL,A8 GET REQUESTED LENGTH S 2 P CW A1,BUFLEN,A12 COMPARE WITH DWT BUFFER SIZE S 6 P RF(G) IO:ERR REQ. LEN
0x2ba1f8…2ba38c Dummy {f00=0x00db, f01=0x0190, f02=»IKB20 NO KEYTABLE IF BASIC READ S . P LD A4,ECBCW,A8 GET USER KEYTABLE ADDRESS T ( P RF(Z) TIKB20 NO KEYTABLE? T Z P* T | P EJECT TOSSIO T P* T P* T P LDR A1,A9 T P ADK A1,8 T P ADKL A8,12 T * P ST A8,-2,A8 SET DWT KEYTABLE
0x2ba38c…2ba520 Dummy {f00=0x00db, f01=0x018e, f02=»EVEN? T n , P ECR A3,A3 NO, PUT LENGTH IN RIGHT BYTE U P* U > * PTIKB10 ANK A3,/FF SKIP LEFT CHARACTER U H P ADK A3,1 U v 0 P CW A3,KEYLEN,A12 CHECK KEYTABLE BUFFER SIZE U P RF(G) IO:ERR TOO SMALL? U P CF A15,TIPO05 U & P SUKL A8,8 ADJUST DWT
0x2ba520…2ba6b4 (2, 123) Dummy {f00=0x00db, f01=0x0190, f02=» U 4 PTIOITI EQU A15RTN INTERTASK COMMUNICATION, INPUT V P* V @ P EJECT TOSSIO V J P* V b P* T I O P C O V l P* V B P* THIS MODULE IS CALLED BY 'TIO' WHEN A WRITE REQUEST HAS BEEN V > P* ISSUED AND THE DEVICE IS RUNNING ON PROGRAMMED CHANN
0x2ba6b4…2ba848 Dummy {f00=0x00db, f01=0x0190, f02=»F THE USER V Z P* BUFFER TO THE DWT BUFFER. W 4 P* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT W 6 , P* COMPLETION OF THE REQUEST IS 'TENPCO'. W n 6 P* NOTICE THAT MODULE 'TIOKBO' IS EQUAL TO TIOPCO. W F P* NOTICE ALSO THAT ENTRY TIPO05 IS USED BY 'TIOK
0x2ba848…2ba9dc Dummy {f00=0x00db, f01=0x0190, f02=»DDRESS W x P* X " P* OUTPUT: A1-A4 ARE DESTROYED X P* X > , PTIOPCO EQU * PROGRAMMED CHANNEL, OUTPUT X H 8 P LD A2,DWTADR,A6 GET ADDRESS TO DRIVER ADDRESS BLOCK X x ( P LD A3,ECBRL,A8 GET REQUESTED LENGTH X * P RF(NP) TIPO20 REQUESTED LENGTH <= 0? X
0x2ba9dc…2bab70 Dummy {f00=0x00db, f01=0x0190, f02=»ET USER ECB ADDRESS X ~ P* Y P EJECT TOSSIO Y & P* Y > P* Y H : PTIPO05 EQU * ENTRY POINT USED BY 'TIOKBI' AND 'TENITO' Y R P ADK A3,1 Y . P ANKL A3,/FFFE MAKE REQUESTED LENGTH EVEN Y , P EL A1,ECBBA,A1 GET USER BUFFER ADDRESS Y * P LD
0x2bab70…2bad04 Dummy {f00=0x00db, f01=0x0190, f02=») TIPO30 USER BUFFER ADDRESS UNEVEN? Y P ST A2,ECBBA,A8 Z , P* Z D 6 PTIPO10 MVUS A3 MOVE (USER BUFFER) TO SYSTEM BUFFER Z N P* Z PTIPO20 RTN A15 Z P* Z 0 PTIPO30 EQU * USER BUFFER ADDRESS WAS UNEVEN Z 4 P ORS A4,ECBBA,A8 MAKE DWT BUFFER A
0x2bad04…2bae98 Dummy {f00=0x00db, f01=0x0190, f02=» A1,1 UPDATE USER BUFFER POINTER Z ( P ADK A2,2 UPDATE DWT BUFFER POINTER [ ( ( P RB TIPO10 MOVE REMAINING CHARACTERS [ T P* [ P EJECT TOSSIO [ P* [ P* I O : E R R [ P* [ , P* DRIVER (DWT) MMU BUFFER IS TOO SMALL. [ B P* SET RETURN
0x2bae98…2bb02c Dummy {f00=0x00db, f01=0x0190, f02=» EXIT FOR MMU ROUTINES [ v P INH $ P ADKL A15,4 ADJUST STACKPOINTER * " P LD A1,DWTST,A6 GET DWT STATUS R P SLL A1,2 CHECK ECHO BIT x P RF(NN) IO:E10 NOT ECHO? P LDR A1,A6 SAVE DWT ADDRESS * P LD A6,DWTECH,A6 GET ECHO DWT ADDRESS
0x2bb02c…2bb1c0 Dummy {f00=0x00db, f01=0x0190, f02=»ISEND BRANCH TO DISPATCHER VIA TENDIO P* ] . P EJECT TOSSIO ] 8 P* ] P P* T I O M X O ] Z P* ] p " PTIOMXO EQU TIOMXI MUX, OUTPUT ] z P* ] P* T I O K B O ] P* ] * PTIOKBO EQU TIOPCO KEYBOARD/CTW, OUTPUT ] P* ] P* T I
0x2bb1c0…2bb354 (2, 124) Dummy {f00=0x00dc, f01=0x0190, f02=»: D M ] P* ^ 6 P* THIS MODULE IS CALLED BY 'TENDIO' WHEN A REQUEST ^ . P* FOR DATA MANAGEMENT HAS BEEN COMPLETED. ^ R P* ^ P* INPUT: A6 = FDB ADDRESS ^ $ P* A8 = USER ECB ADDRESS ^ P* ^ " P* OUTPUT: A1-A2 ARE DESTROYED ^ P
0x2bb354…2bb4e8 Dummy {f00=0x00dc, f01=0x0190, f02=»A2,ECBCW2+1,A1 ^ P ES A2,ECBCW2,A8 _ P RTN A15 _ . P* _ > P EJECT TOSSIO _ H P* _ ` P* T E N P C I _ j P* _ D P* THIS MODULE IS CALLED BY 'TENDIO' WHEN A READ REQUEST HAS BEEN _ @ P* COMPLETED AND THE DEVICE IS RUNNING ON PROGRAMMED CH
0x2bb4e8…2bb67c Dummy {f00=0x00dc, f01=0x0190, f02=»Y 'TIO' AT _ ` & P* ISSUING THE REQUEST IS 'TIOPCI'. ` D P* NOTICE THAT MODULES 'TENKBI' AND 'TENITI' ARE EQUAL TO TENPCI. ` < 8 P* NOTICE ALSO THAT ENTRY TEN:DC IS USED BY 'DC:MIN'. ` P* ` P* INPUT: A6 = DWT ADDRESS ` $ P* A8 = USER ECB ADDR
0x2bb67c…2bb810 Dummy {f00=0x00dc, f01=0x0190, f02=» GET DWT ECB ADDRESS ` ( P LD A4,ECBEL,A2 GET EFFECTIVE LENGTH a " P RF(NP) TEPI30 NO MOVE IF ZERO a H * P LD A1,ECBBA,A2 GET DWT BUFFER ADDRESS a n P* a . PTEN:DC EQU * ENTRY POINT USED BY 'DC:MIN' a , P EL A2,ECBBA,A8 GET USER BUFFER ADDRESS a $ P
0x2bb810…2bb9a4 Dummy {f00=0x00dc, f01=0x0190, f02=»ADDRESS a p , P RF(Z) TEPI60 USER BUFFER ADDRESS EVEN? b P* b @ P EJECT TOSSIO b J P* b b P* b l 2 PTEPI10 EQU * BOTH BUFFER ADDRESSES WERE UNEVEN b v 4 P LDR* A3,A1 GET FIRST CHARACTER FROM DWT BUFFER b P ELR A8,A2 b P* b * PTEPI15 A
0x2bb9a4…2bbb38 Dummy {f00=0x00dc, f01=0x0190, f02=»UFFER b l $ P ADK A1,1 UPDATE BUFFER POINTERS c P ADK A2,1 c 6 P SUK A4,1 c H * P RF(P) TEPI25 MORE CHARACTERS TO MOVE? c Z P RTN A15 NO, RETURN c P* c PTEPI20 TM A3,A2 c , P RF(Z) TEPI25 USER BUFFER ADDRESS EVEN? c & P LDR A3,A1 GET DWT
0x2bbb38…2bbccc Dummy {f00=0x00dc, f01=0x0190, f02=»IS CHAR. ONE BYTE TO THE RIGHT c ~ & P SUK A3,1 POINT TO NEXT CHARACTER d & 4 P CWR A3,A1 COMPARE WITH START ADDRESS OF BUFFER d P , P RB(NE) TEPI23 MORE CHARACTERS TO MOVE? d 0 P ADK A1,1 NO, MAKE DWT BUFFER ADDRESS UNEVEN d P RB TEPI10 d P* d P
0x2bbccc…2bbe60 Dummy {f00=0x00dc, f01=0x0190, f02=»ENGTH UNEVEN? d v 0 P MVSU A4 MOVE (SYSTEM BUFFER) TO USER BUFFER e P* e J PTEPI30 RTN A15 e T P* e j , PTEPI40 EQU * EFFECTIVE LENGTH WAS UNEVEN e t ( P SUK A4,1 MAKE EFFECTIVE LENGTH EVEN e . P RF(Z) TEPI50 ONLY ONE CHARACTER TO MOVE? e P LDR A
0x2bbe60…2bbff4 (2, 125) Dummy {f00=0x00dc, f01=0x0190, f02=»* e PTEPI50 EQU * f 2 P LDR* A8,A1 GET LAST CHARACTER FROM DWT BUFFER f P ELR A3,A2 f T P RB TEPI15 f f P* f x . PTEPI60 EQU * DWT BUFFER ADDRESS WAS UNEVEN f & P LDR A3,A1 GET DWT BUFFER ADDRESS f $ P ADR A1,A4 ADD EFFECTIVE LENGTH f P*
0x2bbff4…2bc188 Dummy {f00=0x00dc, f01=0x0190, f02=»ACTER f t * P CWR A3,A1 COMPARE WITH ENDING ADDRESS g , P RB(NE) TEPI70 MORE CHARACTERS TO MOVE? g < . P SUR A1,A4 NO, RESTORE DWT BUFFER ADDRESS g l * P SUK A1,1 MAKE DWT BUFFER ADDRESS EVEN g P RB TEPI25 g P* g P EJECT TOSSIO g P* g
0x2bc188…2bc31c Dummy {f00=0x00dc, f01=0x0190, f02=»RD, INPUT g x P* h P* T E N I T I h P* h 2 4 PTENITI EQU TENPCI INTERTASK COMMUNICATION, INPUT h < P* h t P* T E N P C O h ~ P* h 0 PTENPCO EQU A15RTN PROGRAMMED CHANNEL, OUTPUT h P* h P* T E N M X O h P* h " PTENMXO EQU A
0x2bc31c…2bc4b0 Dummy {f00=0x00dc, f01=0x0190, f02=»SIO h P* i P* T E N I T O i P* i , F P* THIS MODULE IS CALLED BY 'TENDIO' WHEN A WRITE REQUEST HAS BEEN i 6 L P* COMPLETED FOR INTERTASK COMMUNICATION, IN PURPOSE TO MOVE THE CONTENTS i J P* OF THE USER BUFFER TO THE DRIVER BUFFER. THE ENTRY TIP
0x2bc4b0…2bc644 Dummy {f00=0x00dc, f01=0x0190, f02=»-A4, A8 ARE DESTROYED i P* j 0 PTENITO EQU * INTERTASK COMMUNICATION, OUTPUT j ( ( P LD A8,DWTECB,A6 GET DWT ECB ADDRESS j ( P LD A3,ECBEL,A8 GET EFFECTIVE LENGTH j P RF(NP) TEIO10 NO MOVE? j * P LD A1,DWTUEC,A6 GET USER ECB ADDRESS j ( P CF A1
0x2bc644…2bc7d8 Dummy {f00=0x00dc, f01=0x0190, f02=»* j < P* THIS MODULE IS CALLED BY THE DATA COMMUNICATION DRIVER k < P* IN PURPOSE TO MOVE THE CONTENTS OF THE USER BUFFER TO k J < P* THE DRIVER BUFFER. THE MOVE ROUTINE IN MODULE 'TIOPCO' k " P* IS USED FOR MOVING THE DATA. k P* k P* INPUT: A6 =
0x2bc7d8…2bc96c Dummy {f00=0x00dc, f01=0x018e, f02=» 8,A15 SAVE A1-A8 ON STACK k $ P SUKL A15,32 ADJUST STACKPOINTER l " * P TS 2,A15 SAVE MMU REGISTERS ON STACK l J & P LD A5,DWTTAB,A6 GET TTAB ADDRESS l x $ P TL TTB:MT,A5 LOAD MMU REGISTERS l ( P LD A8,DWTMEC,A6 GET DWT ECB ADDRESS l P ENB l ( P CF A1
0x2bc96c…2bcb00 Dummy {f00=0x00dc, f01=0x0190, f02=» $ P ADKL A15,32 ADJUST STACKPOINTER m * P MLR 8,A15 RESTORE A1-A8 FROM STACK... m , P RTN A15 ...AND RETURN m Z P XIF m x P* m P EJECT TOSSIO m P* m P* D C : M I N m P* m < P* THIS MODULE IS CALLED BY THE DATA COMMUNICATION DRIVER
0x2bcb00…2bcc94 (2, 126) Dummy {f00=0x00dc, f01=0x0190, f02=» A4 = DRIVER BUFFER ADDRESS m P* A6 = DWT ADDRESS n * P* n L ( P* OUTPUT: NO REGISTERS ARE DESTROYED n V P* n PDC:MIN EQU * n P IFT MMUPAG=0 n P IFT CPU852=1 n & P CF A15,SAVE8 SAVE A1-A8 ON STACK n P XIF n P* n
0x2bcc94…2bce28 Dummy {f00=0x00dc, f01=0x0190, f02=» TS 2,A15 SAVE MMU REGISTERS ON STACK n " P LD A5,DWTTAB,A6 TTAB ADDRESS o . $ P TL TTB:MT,A5 LOAD MMU REGISTERS o T P XIF o | P* o P EJECT TOSSIO o P* o & P* CHECK MESSAGE LENGTH AND DECIDE o $ P* IF TTMJOB IS TO BE ACTIVATED. o P*
0x2bce28…2bcfbc Dummy {f00=0x00dc, f01=0x018e, f02=»PU852=1 o P LDK A7,128 852 CPU p ( P ANK A5,1 CHECK USER BUFFER ADDRESS p , . P RF(NZ) DCMI00 USER BUFFER ADDRESS UNEVEN p X P ADK A7,128 A7 := 256 p P XIF p P* p P IFT MMUPAG=0 p P IFT CPU852=0 p P IFT CPU857=0 p P LDK A7,
0x2bcfbc…2bd150 Dummy {f00=0x00dc, f01=0x0190, f02=» p x P XIF q P* q P IFT MMUPAG=0 q P IFT CPU852=0 q 4 P IFT CPU857=1 q J P LDKL A7,256 857 CPU q ` ( P ANK A5,1 CHECK USER BUFFER ADDRESS q | . P RF(NZ) DCMI00 USER BUFFER ADDRESS UNEVEN q P ADR A7,A7 A7 := 512 q P XIF q P* q
0x2bd150…2bd2e4 Dummy {f00=0x00dc, f01=0x0190, f02=»FER ADDRESS q x P LDKL A7,256 r ( P ANK A5,1 CHECK USER BUFFER ADDRESS r ( . P RF(NZ) DCMI00 USER BUFFER ADDRESS UNEVEN r T P SLL A7,3 A7 := 2048 r P XIF r P* r PDCMI00 EQU * r 8 P CW A7,ECBEL,A3 CHECK IF USER BUFFER IS LARGE ENOUGH r 2 P
0x2bd2e4…2bd478 Dummy {f00=0x00dc, f01=0x018e, f02=»IVER r t P IFT CPU852=1 s ( P ABL IHRET8 RESTORE A1-A8 AND RETURN s " P XIF s N P* s Z P IFT MMUPAG=0 s d P IFT CPU852=0 s z * P MLR 8,A15 RESTORE A1-A8 FROM STACK... s P* s PDC:MOT RTN A15 ...AND RETURN s P XIF s P* s P IFT M
0x2bd478…2bd60c Dummy {f00=0x00dc, f01=0x0190, f02=» s P* INPUT: A1 = RETURN CODE t P* A3 = ECB ADDRESS t * ( P* A4 = DRIVER BUFFER ADDRESS t L P* A6 = DWT ADDRESS t x P* t & P* OUTPUT: A1-A5, A7 ARE DESTROYED t P* t " PMINMOV EQU * DC:MIN MOVE ENTRY t P ENB t *
0x2bd60c…2bd7a0 Dummy {f00=0x00dc, f01=0x0190, f02=»RL,A3 CHECK IF USER BUFFER IS LARGE ENOUGH t $ P RF(G) MIN:70 NO, REQUEST ERROR u 2 P* u Z P IFT MMUPAG=0 u d ( P LD A5,ECBBA,A3 USER BUFFER ADDRESS u z P LDR A3,A5 u ( P ANK A3,1 CHECK USER BUFFER ADDRESS u . P RF(NZ) MIN:30 USER BUFFER ADDRESS U
0x2bd7a0…2bd934 (2, 127) Dummy {f00=0x00dc, f01=0x0190, f02=» u P* v PMIN:10 EQU * v P LDR* A3,A7 MOVE ONE WORD v & P STR A3,A5 v H ( P ADK A7,2 INCREMENT BUFFER POINTERS v Z P ADK A5,2 v $ P SUK A2,2 DECREMENT LOOP COUNTER v 2 P RB(NN) MIN:10 AT LEAST ONE MORE WORD TO MOVE v P* v PMIN:20 E
0x2bd934…2bdac8 Dummy {f00=0x00dc, f01=0x0190, f02=»3,A7 MOVE ONE CHARACTER v P SCR A3,A5 w ( P ADK A7,1 INCREMENT BUFFER POINTERS w 2 P ADK A5,1 w ^ $ P SUK A2,1 DECREMENT LOOP COUNTER w p 6 P RB(P) MIN:30 AT LEAST ONE MORE CHARACTER TO MOVE w P XIF w P* w P IFT MMUPAG=1 w * P ST A1,ECB
0x2bdac8…2bdc5c Dummy {f00=0x00dc, f01=0x018e, f02=»B ADDRESS w x ( P CF A15,TEN:DC MOVE BUFFER CONTENTS x & P LDR A4,A7 RESTORE BUFFER ADDRESS x > P LDK A1,0 x h P XIF x z P* x P EJECT TOSSIO x P* x P* x PMIN:40 EQU * x P INH x " P CF A15,TENDIO PERFORM TENDIO x P* x
0x2bdc5c…2bddf0 Dummy {f00=0x00dc, f01=0x0190, f02=» PMIN:50 EQU * y " P LDR A2,A1 SAVE BUFFER ADDRESS y $ P LDR* A1,A2 NEXT BUFFER ADDRESS y > , P RB(NZ) MIN:50 NOT LAST BUFFER IN CHAIN y f P* y $ P* INSERT BUFFER AT END OF CHAIN y P* y " P SUK A4,6 REAL BUFFER ADDRESS y " P STR A4,A2 UPDAT
0x2bddf0…2bdf84 Dummy {f00=0x00dc, f01=0x0190, f02=»L A1,/8008 REQUEST ERROR/INCORRECT LENGTH y $ P RB MIN:40 RETURN VIA TENDIO ETC z 2 P* z Z P EJECT TOSSIO z d P* z | P* D C M I N T z P* z 2 P* TTMJOB WILL BE DISPATCHED HERE TO CARRY OUT z 2 P* THE MOVE OF THE DC DRIVER BUFFER CONTENTS
0x2bdf84…2be118 Dummy {f00=0x00dc, f01=0x018e, f02=»SS z x ( P* A4 = DRIVER BUFFER ADDRESS { P* { 6 * PDCMINT EQU * TTMJOB MOVE BUFFER ENTRY { @ P LDR A6,A3 DWT ADDRESS { n P LD A3,DWTECB,A6 ECB ADDRESS { P* { P IFT MMUPAG=1 { P INH { " P LD A5,DWTTAB,A6 TTAB ADDRESS { $ P TL TT
0x2be118…2be2ac Dummy {f00=0x00dc, f01=0x0190, f02=» P* | ( P CF A15,MINMOV MOVE BUFFER CONTENTS | P ABL MEXIT EXIT TTMJOB | : P* | X P EJECT TOSSIO | b P* | z P* Q M T A S K | P* | : P* WHEN THE MOVE WILL TAKE TOO LONG TIME TTMJOB WILL BE | 6 P* ACTIVATED AT ENTRY 'DCMINT' TO PERFO
0x2be2ac…2be440 Dummy {f00=0x00dc, f01=0x018e, f02=» DRIVER BUFFER ADDRESS | P* A6 = DWT ADDRESS } P* } @ PQMTASK EQU * ACTIVATE TTMJOB } J $ P LDKL A2,DCMINT DISPATCH ADDRESS } n P LDR A3,A6 DWT ADDRESS } " P CF A15,QMJOB ACTIVATE TTMJOB } P LDKL A1,/8000 NOT BUSY BIT } " P ORS A1,DW
0x2be440…2be5d4 (2, 128) Dummy {f00=0x00dd, f01=0x0190, f02=» } P IFT CPU852=1 ~ PDC:MOT INH ~ 2 P ABL IHRTN RETURN WITHOUT ENABLING INTERRUPTS ~ 0 P XIF ~ f P* ~ r P EJECT TOSSIO ~ | P* ~ P* ~ P********** ~ P* TENDIO * ~ P********** ~ P* ~ P* ~ . P* THIS MODULE IS CALLE
0x2be5d4…2be768 Dummy {f00=0x00dd, f01=0x0190, f02=»O START THE TASK ~ z P* P* -IF NORMAL I/O WITH WAIT:- " P* F * P* QTJOB IS CALLED TO QUEUE THE TASK P 8 P* FOR DISPATCHING WITH THE FOLLOWING PARAMETERS:- ~ P* P* A5 = TTAB ADDRESS P* $ P* -IF NORMAL I/O WITH NO WAI
0x2be768…2be8fc Dummy {f00=0x00dd, f01=0x0190, f02=»ASK IS PUT IN DISPATCHER QUEUE TO REPEAT THE LKM INSTRUCTION. P* F P EJECT TOSSIO P P* h P* r 0 P* ENTRY PARAMETERS TO THIS SUBROUTINE ARE:- | P* P* A1 = RETURN CODE P* P* A6 = DWT ADDRESS P* P*
0x2be8fc…2bea90 Dummy {f00=0x00dd, f01=0x018e, f02=» j P* P EJECT TOSSIO P* * P* END I/O ENTRY 4 P* L PTENDIO EQU * V P IFT CPU852=1 j & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF P* P IFT CPU852=0 P INH " P MSR 8,A15 SAVE A1-A8 ON STACK P
0x2bea90…2bec24 Dummy {f00=0x00dd, f01=0x018e, f02=» , P LD A5,DWTTQ,A6 GET TERMINAL QUEUE LINK " P RF(Z) TEN110 NO TASK QUEUED? 4 P LD A2,TTB:ID,A5 GET TASK ID Z P ANKL A2,/FF44 ~ P CWK A2,'#D' CHECK TASK ID " P RF(E) TEN100 DM REQUEST NEXT? P LDKL A2,/800 ATTACH BIT P ANR* A2,A4
0x2bec24…2bedb8 Dummy {f00=0x00dd, f01=0x0190, f02=» j P* P EJECT TOSSIO P* * P* 4 PTEN100 EQU * > , P LDR* A3,A5 UPDATE QUEUE ANCHOR ADDRESS R P ST A3,DWTTQ,A6 . P CF A15,QTJOB QUEUE TASK TO REPEAT REQUEST P* P* UPDATE ECB AND DWT P* 4 PTEN110 LD A5
0x2bedb8…2bef4c Dummy {f00=0x00dd, f01=0x0190, f02=»WTTDM,A6 GET TTAB ADDRESS 4 P CF A15,REQEND RESET REQUEST BUSY FOR ALL FILES " P* Z PTEN120 LDKL A2,/8000 d , P ORRS A2,A4 INDICATE DEVICE READY IN DWT P LDKL A3,/DBFF ( P ANRS A3,A4 RESET ECHO BIT AND BIT 5 $ P LD A3,DWTECB,A6 GET E
0x2bef4c…2bf0e0 Dummy {f00=0x00dd, f01=0x0190, f02=»RRS A2,A3 SET EVENT COMPLETED IN ECB , P ORS A1,ECBRC,A3 SET RETURN CODE IN ECB , P* P IFT MMUPAG=1 f P LD A4,TTB:PW,A5 GET PSW | & P ANK A4,1 GET SYSTEM/USER MODE BIT P RF(Z) TEN200 SYSTEM MODE? P* P* LOAD MMU REGISTERS
0x2bf0e0…2bf274 (2, 129) Dummy {f00=0x00dd, f01=0x018e, f02=»LOAD MMU REGISTERS FROM TTAB P* $ P EJECT TOSSIO . P* F P* MOVE DWT ECB TO USER ECB P P* r * P LD A8,DWTUEC,A6 GET USER ECB ADDRESS | P ELR A4,A8 * P ORR A4,A2 SET EVENT COMPLETED IN ECB P ESR A4,A8 P LDR A1,A3
0x2bf274…2bf408 Dummy {f00=0x00dd, f01=0x018e, f02=» ^ P* 8 P LD A3,DWTADR,A6 GET ADDRESS TO DRIVER ADDRESS BLOCK & P LD A3,DEVIND,A3 GET DEVICE INDEX N . P RF(N) TEN160 NO SPECIAL ACTION REQUIRED? x " P RF(Z) TEN140 DATA MANAGEMENT? P* " P* PERFORM CHECK ON ORDER CODE P* ,
0x2bf408…2bf59c Dummy {f00=0x00dd, f01=0x0190, f02=» < P CFI A15,TENTAB,A3 BRANCH TO RELEVANT READ/WRITE ROUTINE P* H P EJECT TOSSIO R P* j P* RESTORE MMU REGISTERS t P* PTEN150 EQU * P INH P* PTEN160 EQU * . P TL 2,A15 RESTORE MMU REGISTERS FROM STACK
0x2bf59c…2bf730 Dummy {f00=0x00dd, f01=0x0190, f02=» WAIT OR ACTIVATION n P* PTEN200 EQU * & 0 P LD A4,DWTWAT,A6 GET WAIT/ACTIVATE INDICATOR : * P RF(Z) TEN250 NOT WAIT OR ACTIVATION? n P SUK A4,1 P RF(Z) TEN240 WAIT? P ADK A4,1 P LDR A3,A4 P ANK A3,1 P RF(Z) T
0x2bf730…2bf8c4 Dummy {f00=0x00dd, f01=0x0190, f02=»BIT j P RF(Z) TEN210 SYSTEM MODE? . P LD A8,DWTUEC,A6 NO, GET USER ECB ADDRESS . P XIF ` P* l PTEN210 EQU * v 4 P ST A8,TTB:SA+16,A5 SET TO A8 IN TTAB SAVE AREA P* : PTEN220 ADK A4,DWTWAT POINT TO WAIT/ACTIVATE INDICATOR $
0x2bf8c4…2bfa58 Dummy {f00=0x00dd, f01=0x0190, f02=»TEN220 P* P EJECT TOSSIO P* 0 P* : PTEN230 EQU * D 8 P CF A15,FREBLK ACTIVATE: GET PARAMETER AND DISP ADDR X . P CF A15,ACTOTP ACTIVATE TASK ON LIFO BASIS P RF TEN250 P* PTEN240 EQU * 2 P CF A15,QTJOB WAIT
0x2bfa58…2bfbec Dummy {f00=0x00dd, f01=0x40dc, f02=» IFT CPU852=1 P ABL IHRET8 P XIF * P* 6 P IFT CPU852=0 @ * P MLR 8,A15 RESTORE A1-A8 FROM STACK... V P RTN A15 ...AND RETURN P XIF P* P* P* P END @ PTEN240 EQU * 2 P CF A15,QTJOB WAIT
0x2bfbec…2bfd80 Dummy {f00=0x00dd, f01=0x2008, f02=» NT TOSSIO END @ &
0x2bfd80…2bff14 (2, 130) Dummy {f00=0x00dd, f01=0x0190, f02=» M h * & g 2 KOR g g + C N * & 6y8 - W 2 * * 4 N 6 * & U T NETTO H R E N d * & r = U L e N * & L d N * & 1 V ` * Y
0x2bff14…2c00a8 Dummy {f00=0x00dd, f01=0x0190, f02=» DK Az A N x * & - t ] ] X * O * & K JD6SO.-,.O.++.*)(EE()(''( O D * & $A>&% A AA>=C84< 367M# ## O r * & ;:/"! 65 9)(IG()(''($ O * & ! O * & ?
0x2c00a8…2c023c Dummy {f00=0x00dd, f01=0x0190, f02=» 8 : < > @ B D O * & F G H I J K L P $ * & M N P R T W Z ^ P R * & b f j n s x } P * & P * & / P *
0x2c023c…2c03d0 Dummy {f00=0x00dd, f01=0x0190, f02=» * & * 0 G0 Q * & H0 I0 J0 K0 L0 M0 N0 O Q 2 * & 0 P0 R0 T0 V0 X Q ` * & Q * & " % Q * & = ( + / 3 7 ;
0x2c03d0…2c0564 Dummy {f00=0x00dd, f01=0x0190, f02=» Q t * & R * & * 6 B N Z f R @ * & r R n * & ! 0 A R * & !- R c t R * & !K
0x2c0564…2c06f8 Dummy {f00=0x00dd, f01=0x0190, f02=» " $ & R * & ! ( * , . 0 2 4 S * & ! 6 8 : < > A D G S N * & ! K O S W [ _ c S | * & " g k o s w { S * & "; S * &
0x2c06f8…2c088c Dummy {f00=0x00dd, f01=0x0190, f02=» " r } S * & " $ T . * & " 3 B R b r T * & # * T * & #+ > R h ~ T * & #I % A ] z
0x2c088c…2c0a20 Dummy {f00=0x00dd, f01=0x40e4, f02=»@ @ T p # @ U T:LIT# U $ # * U 6 T:PIC# U J # ^ U T:KEY# U p # !V { U T:FMT# U # !n U P:END# U # U @ U & #I % A ] z
0x2c0a20…2c0bb4 (2, 131) Opaque[0x194]
0x2c0bb4…2c0d48 # DirEnt {nam=»SYSLDM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1bb8, f03=0x0000}
0x2c0bb4…2c0d48 IdxSect {
0x2c0bb4…2c0d48 f00 = 0x00dd // 0x2c0bb4 @0x0
0x2c0bb4…2c0d48 f01 = 0x0036 // 0x2c0bb6 @0x2
0x2c0bb4…2c0d48 gno = [ // 0x2c0bb8 @0x4
0x2c0bb4…2c0d48 [0x00]: C0x00dd.0x3.0
0x2c0bb4…2c0d48 [0x01]: C0x00de.0x0.0
0x2c0bb4…2c0d48 [0x02]: C0x00de.0x1.0
0x2c0bb4…2c0d48 [0x03]: C0x00de.0x2.0
0x2c0bb4…2c0d48 [0x04]: C0x00de.0x3.0
0x2c0bb4…2c0d48 [0x05]: C0x00df.0x0.0
0x2c0bb4…2c0d48 [0x06]: C0x00df.0x1.0
0x2c0bb4…2c0d48 [0x07]: C0x00df.0x2.0
0x2c0bb4…2c0d48 [0x08]: C0x00df.0x3.0
0x2c0bb4…2c0d48 [0x09]: C0x00e0.0x0.0
0x2c0bb4…2c0d48 [0x0a]: C0x00e0.0x1.0
0x2c0bb4…2c0d48 [0x0b]: C0x00e0.0x2.0
0x2c0bb4…2c0d48 [0x0c]: C0x00e0.0x3.0
0x2c0bb4…2c0d48 [0x0d]: C0x00e1.0x0.0
0x2c0bb4…2c0d48 [0x0e]: C0x00e1.0x1.0
0x2c0bb4…2c0d48 [0x0f]: C0x00e1.0x2.0
0x2c0bb4…2c0d48 [0x10]: C0x00e1.0x3.0
0x2c0bb4…2c0d48 [0x11]: C0x00e2.0x0.0
0x2c0bb4…2c0d48 [0x12]: C0x00e2.0x1.0
0x2c0bb4…2c0d48 [0x13]: C0x00e2.0x2.0
0x2c0bb4…2c0d48 [0x14]: C0x00e2.0x3.0
0x2c0bb4…2c0d48 [0x15]: C0x00e3.0x0.0
0x2c0bb4…2c0d48 [0x16]: C0x00e3.0x1.0
0x2c0bb4…2c0d48 [0x17]: C0x00e3.0x2.0
0x2c0bb4…2c0d48 [0x18]: C0x00e3.0x3.0
0x2c0bb4…2c0d48 [0x19]: C0x00e4.0x0.0
0x2c0bb4…2c0d48 [0x1a]: C0x00e4.0x1.0
0x2c0bb4…2c0d48 ]
0x2c0bb4…2c0d48 }
0x2c0d48…2c0edc Dummy {f00=0x00dd, f01=0x0190, f02=» 2 P IDENT SYSLDM REL 9.2 79-12-20 870105040920 P : : P =1,FAULTY LENGTH OF TEMPORARY BUFFER,USED BY XMOVE B P REL 9.2 79-12-20 ST P ENTRY SYSLDM P*************************** P* * P* ENTRIES A
0x2c0edc…2c1070 Dummy {f00=0x00dd, f01=0x0190, f02=» P EXTRN REL P EXTRN SCLASS P EXTRN SCTADA , P EXTRN SCTANO B P EXTRN SCTBLK X P EXTRN SCTBUG n P EXTRN SCTCDT P EXTRN SCTDCT P EXTRN SCTDMC P EXTRN SCTDMI P EXTRN SCTDML P EXTRN SCTDMT P
0x2c1070…2c1204 Dummy {f00=0x00dd, f01=0x0190, f02=»RN SCTPAG P EXTRN SCTPLD P EXTRN STTPSZ ( P EXTRN SCTPSZ > P EXTRN SCTSEG T P EXTRN SCTSFA j P EXTRN SCTSWB P EXTRN SCTTCT P EXTRN SYSBAS P EXTRN SYSLOD P EXTRN TCLASS P EXTRN TTMJOB P EXT
0x2c1204…2c1398 Dummy {f00=0x00dd, f01=0x0190, f02=»XTRN CONVRT P EXTRN NXTBLK P EXTRN SYSLDA * P EXTRN SAVE01 @ P EXTRN SAVE02 V P EXTRN SAVE03 l P EXTRN SAVE04 P EXTRN SAVE05 P EXTRN SAVE06 P EXTRN SAVE07 P EXTRN SAVE08 P EXTRN SAVE09 P E
0x2c1398…2c152c Dummy {f00=0x00dd, f01=0x0190, f02=» SAVE16 P EXTRN SAVE17 P EXTRN SAVE18 & P EXTRN SAVE19 < P EXTRN SAVE20 R P EXTRN SAVE21 h P EXTRN NUMSEG ~ P EXTRN SAVE23 P EXTRN SAVE24 P EXTRN SAVE25 P EXTRN BUFSIZ P EXTRN SYSBUF P EXTRN
0x2c152c…2c16c0 Dummy {f00=0x00dd, f01=0x0190, f02=» P P , P*************************************** , P* CONDITIONAL ASSEMBLY * D , P*************************************** t P ( PMMUPAG EQU 1 MEMORY MANAGEMENT UNIT & PSWPBLK EQU 0 SWAPPABLE WORK BLOCKS $ PCREDIT
0x2c16c0…2c1854 (2, 132) Dummy {f00=0x00de, f01=0x0190, f02=»SS l 0 PUP:REC EQU 6 RECORD LENGTH IN INITIAL S:BTAB PUPNAME EQU 4 PROTOTYPE NAME > $ PWBLEN EQU -4 LENGTH OF WORKBLOCK b P P $ P******************************* $ P* SAVE01URATION FILE (SAVE01) * $ P**********************
0x2c1854…2c19e8 Dummy {f00=0x00de, f01=0x0190, f02=» , PTDBID EQU TDBNT+2 6A TASK ID START VALUE , PTDBMC EQU TDBID+6 6A MATCHING TASK CLASS 4 $ PTDBTL EQU TDBMC+6 6A TASK LEVEL d : PTDBNC EQU TDBTL+6 2N NUMBER OF TERMINAL DEVICE CLASSES P* & PTDBFST EQU TDBNC+2 FIRST TERM DEF $ PTDC EQU 7
0x2c19e8…2c1b7c Dummy {f00=0x00de, f01=0x0190, f02=»DEVICE CLASS-RECORD ~ P* P* COMMON DEVICE DEF. BLOCK: & PCDBBT EQU 0 1A BLOCK TYPE J 6 PCDBNC EQU CDBBT+1 2N NUMBER OF SPEC. DEV. CLASSES l ( PSDCFST EQU CDBNC+2 FIRST SDC-RECORD P* P* & P* USER WORK BLOCK TYPE DEF. BLOCK
0x2c1b7c…2c1d10 Dummy {f00=0x00de, f01=0x0190, f02=» l PNAMUWB EQU 3 NAME OF UWB " PNUMUBL EQU 3 NUMBER OF BLOCKS ( . PUDBREC EQU NAMUWB+NUMUBL UDB RECORD-LENGTH N P EJECT P**************** P* SOP-HANDLING * P**************** PSOP EQU /2E DEVICE ADDRESS P PLMP1 EQU
0x2c1d10…2c1ea4 Dummy {f00=0x00de, f01=0x0190, f02=»QU /10 PLMP8 EQU 8 PLMP9 EQU 4 PLMP10 EQU 2 2 PLMP11 EQU 1 F P Z F P***************************************************************** f F P* CALL-FORMAT, PERFORMS: CFR A14,A13 * F P*
0x2c1ea4…2c2038 Dummy {f00=0x00de, f01=0x0190, f02=»*************************************************************** P H P T P ` PCALL FORM 16=/F697,16 l P EJECT F P***************************************************************** F P* CONSTANTS USED IN SYS
0x2c2038…2c21cc Dummy {f00=0x00de, f01=0x018e, f02=» ********** P* * TTAB * P* ********** 8 P* PTTB:MT EQU -34 f PTTB:SB EQU -2 | PTTB:ID EQU 2 PTTB:ST EQU 4 PTTB:PP EQU 6 PTTB:PW EQU 8 PTTB:SA EQU 10 PTTB:TD EQU 40
0x2c21cc…2c2360 Dummy {f00=0x00de, f01=0x0190, f02=» " PDWTCHP EQU 0 CHANNEL PARAMETER PDWTST EQU 2 STATUS . PDWTECB EQU 4 ECB ADDRESS H PDWTOR EQU 6 ORDER h PDWTADR EQU 8 ADDRESS BLOCK PDWTTAB EQU 10 TTAB ADDRESS * PDWTWAT EQU 12 WAIT/ACTIVATE INDICATOR PDWTTQ EQU 14 TERMINA
0x2c2360…2c24f4 (2, 133) Dummy {f00=0x00de, f01=0x0190, f02=» *********** " P* * PAGTAB * " P* *********** < P* b PPAGQF EQU 0 l PPAGQB EQU 2 PPAGPA EQU 4 PPAGSB EQU 6 P EJECT P* & P* ************* & P*
0x2c24f4…2c2688 Dummy {f00=0x00de, f01=0x0190, f02=»CT P* * P* ******************* * P* * MISCELLANOUES * B * P* ******************* p P* PBUFLEN EQU -4 PDEVIND EQU -2 PDWTLEN EQU 6 PTDCDD1 EQU 5 PTDCDD2 EQU 6
0x2c2688…2c281c Dummy {f00=0x00de, f01=0x0190, f02=» P EJECT : P****************************************************** : P* * P : P* * : P* THIS IS THE MONITOR CONFIGURATION PROGRAM ENTRY * :
0x2c281c…2c29b0 Dummy {f00=0x00de, f01=0x0190, f02=»TERS: * : P* * 4 : P* A1 - POINTER TO CURRENT LOCATION OF SYSLDA * r : P* A2 - POINTER TO PREVIOUS LOCATION OF SYSLDA * : P*
0x2c29b0…2c2b44 Dummy {f00=0x00de, f01=0x0190, f02=»**************** j PSYSLDM EQU * ( P ST P,SCTSFA+2 SAVE LOCATION COUNTER , . P LDKL A11,SYSBAS GET SYSBAS START ADDRESS X , P ST A11,SCTSFA UPDATE START OF FREE AREA P LDR A8,P INIT STACK POINTER & P ADK A1,2 RELOCATION ROUTINE ENTRY P
0x2c2b44…2c2cd8 Dummy {f00=0x00de, f01=0x0190, f02=»RESS TO SCLASS? v $ P RF(E) NO:TCL YES:DUMMY TCLASS! , P CALL CHPTRS RELOCATE POINTERS IN TCLASS @ 6 P ST A2,SAVE18,A13 SAVE RELOCATED POINTER TO TCLASS p 0 PNO:TCL LDKL A2,SCLASS GET ADDRESS TO SCLASS , P CALL CHPTRS RELOCATE POINTERS IN SCLASS
0x2c2cd8…2c2e6c Dummy {f00=0x00de, f01=0x0190, f02=»EFA P LD A2,SCTSFA PCLRSYS EQU * " P SUK A1,2 6 P CMR A1 H P CWR A1,A2 X P RB(NE) CLRSYS j P LDKL A1,CONMON P AD A1,M:REL,A13 P ABR A1 P EJECT 4 /*********************************************** 4 /*
0x2c2e6c…2c3000 Dummy {f00=0x00de, f01=0x0190, f02=»POINTER TO TCLASS/SCLASS ( P* A11 - SYSLOD START ADDRESS ( #* A12 - RELOCATION CONSTANT L * x 2 .* EXIT: A2 - POINTER TO MOVED TCLASS/SCLASS * * WORK REGISTER:A1-A7 * * SUBROUTINES: *
0x2c3000…2c3194 (2, 134) Dummy {f00=0x00de, f01=0x0190, f02=» OF TCLASS/SCLASS z CHPT10 EQU * . ) SUK A4,2 MOORE ENTRIES I TCLASS/SCLASS ? . RF(Z) CHPT30 NO! ` ADK A3,2 NEXT ENTRY z $ ! LDR* A5,A3 GET POINTER TO CLASS ADR A5,A12 RELOCATE STR A5,A3 STORE $ LDR* A6,A5 GET LENGTH
0x2c3194…2c3328 Dummy {f00=0x00de, f01=0x0190, f02=» LDR* A7,A5 GET DWT-ADDRESS P LDR A9,A7 GET DWT-ADDRESS ( " P CALL CMPADR COMPARE ADDRESSES J P RB(G) CHPT20 DWT IN DRIVER! p ADR A7,A12 RELOCATE * % STR A7,A5 STORE RELOCATED DW-ADDRESS " P LD A8,SCTOPT GET OPTION WORD P ANK
0x2c3328…2c34bc Dummy {f00=0x00de, f01=0x0190, f02=»SS p * P ANKL A9,1 ADDRESS ALREADY RELOCATED? P RB(NZ) CHPT20 YES! 8 P ADR A8,A12 RELOCATE T . P ADKL A8,1 INDICATE DWT-ADDRESS RELOCATED p , P ST A8,DWTMEC,A7 STORE RELOCATED ADDRESS RB CHPT20 CHPT30 EQU * P RTN A14 P
0x2c34bc…2c3650 Dummy {f00=0x00de, f01=0x0190, f02=»******************************************** * 4 * REFERENCED IN: MONCON > * ^ 2 P* ENTRY: SAVE01 - START OF SAVE01URATION DATA h P EJECT 6 2************************************************** 6 2* B:TCT - BUILD TASK CONTROL TABL
0x2c3650…2c37e4 Dummy {f00=0x00de, f01=0x0190, f02=» ENTRY: SAVE01 - START OF SAVE01URATION DATA * 4 " * EXIT: A6 - START OF TC:TAB > $ * A7 - LENGTH OF TC:TAB d * * WORK REGISTERS: A2,A3 * * SUBROUTINES: * . )* TASK CONTROL TABLE L
0x2c37e4…2c3978 Dummy {f00=0x00de, f01=0x0190, f02=»___________________ z . ** I TTMJOB I . )* _________________________ N . ** I MONITOR TASKS I . )* _________________________ . ** I USER TASKS
0x2c3978…2c3b0c Dummy {f00=0x00de, f01=0x0190, f02=» OF SAVE01URATION DATA t ( $ LD A7,SCTSFA GET START OF FREE AREA LDR A6,A7 SAVE J & " LDKL A2,TTMJOB GET TTMJOB ADDRESS b ST A2,2,A7 STORE IN TC:TAB * % ADK A7,4 CONTINUE WITH MONITOR TASKS ( P LD A2,SCTOPT ANY OPTIONS AVALIABLE?
0x2c3b0c…2c3ca0 Dummy {f00=0x00de, f01=0x0190, f02=»PTIONS AVALIABLE * h @ P* - TO BE PROVIDED * @ P*********************************************************** ` PBTCT15 EQU * " P LD A2,SCTDMT DATA MANAGEMENT? P RF(Z) BTCT30 NO! P LDR A3,A2 SAVE
0x2c3ca0…2c3e34 (2, 135) Dummy {f00=0x00de, f01=0x0190, f02=» A2,A3 GET SCTDMT P ANK A2,2 DM-TASK D1? P RF(Z) BTCT25 NO! 8 * P ADK A7,2 RESERV ENTRY FOR DM-TASK D0 R PBTCT25 EQU * P LDR A2,A3 GET SCTDMT P ANK A2,4 DMTASK D2? P RF(Z) BTCT30 NO! ( P ADK A7,2 RESERV ENTRY FOR DMTAS
0x2c3e34…2c3fc8 Dummy {f00=0x00de, f01=0x0190, f02=»SK DEFINITION BLOCK z * 2 P ST A7,SAVE13,A13 SAVE CURRENT USER TASK ENTRY & , P ST A7,SAVE02,A13 FIRST USER TASK ENTRY LCR A2,A11 GET BLOCK TYPE ( # CCK A2,'TT' TASK DEFINITION BLOCK? RF(E) BTCT35 YES P LDKL A1,LMP4 FORMAT
0x2c3fc8…2c415c Dummy {f00=0x00de, f01=0x0190, f02=» EQU * $ CALL GETTSK GET NUMBER OF TASKS PBTCT50 EQU * 6 , P ADK A7,2 RESERV ANOTHER ENTRY IN TC:TAB J & P CW A7,SCTEFA CHECK IF MEMORY LEFT z P RF(NE) BTCT55 YES! P LDKL A1,LMP3 ( P CALL ERROR INDICATE MEMORY OVERFLOW PBTCT55
0x2c415c…2c42f0 Dummy {f00=0x00de, f01=0x0190, f02=» TASK DEFINITION BLOCK? RB(E) BTCT40 YES ! * ! : 4 0* ENTRIES FOR ALL USER TASKS RESERVED IN TC:TAB ! D * ! | * % ST A7,SCTSFA UPDATE END OF FREE AREA ! SUR A7,A6 LENGTH OF TC:TAB ! & ! STR A7,A6 STORE LENGTH IN TC:TAB ! * P ST A6
0x2c42f0…2c4484 Dummy {f00=0x00de, f01=0x0190, f02=»TT - BUILD DATA MANAGEMENT TASK TABLES * ! 6 1************************************************* " 2 * " l * &* ENTRY: SCTSFA - START OF FREE AREA " v * P* SCTTCT - ADDRESS TO TC:TAB " 2 -* SCTDMT - DATA MANAGEMENT INDICATOR "
0x2c4484…2c4618 Dummy {f00=0x00de, f01=0x0190, f02=» EQU * " * % LD A12,SCTSFA GET START OF FREE AREA # ( P LD A7,SCTTCT GET POINTER TO TC:TAB # < " ADK A7,4 FIRST DM-TASK ENTRY # h $ LD A2,SCTDMT DATA MANAGEMENT? # RF(Z) DMTTEX NO! # . ) LDR A3,A2 SAVE DATA MANAGEMENT INDICATOR # . * LD A6
0x2c4618…2c47ac Dummy {f00=0x00de, f01=0x0190, f02=»L DMTGEN # DMTT10 EQU * $ , ( LDR A2,A3 GET DATA MANAGEMENT INDICATOR $ $ ANK A2,2 DM-TASK D1? $ T RF(Z) DMTT20 NO! $ r P LDKL A1,'#E' TASK ID $ CALL DMTGEN $ DMTT20 EQU * $ , ( LDR A2,A3 GET DATA MANAGEMENT INDICATOR $ ANK A
0x2c47ac…2c4940 Dummy {f00=0x00de, f01=0x018e, f02=» RTN A14 % EJECT % 6 2************************************************** % " 6 2* DMTGEN - GENERATE DATA MANAGEMENT TASK TABLE * % 6 2************************************************** % * % * ENTRY: A1 - TASK ID % , (* A6
0x2c4940…2c4ad4 (2, 136) Dummy {f00=0x00df, f01=0x0190, f02=» * EXIT: & * & * WORK REGISTERS: & * & 8 * SUBROUTINES: & B * & Z PDMTGEN EQU * & d " P LD A2,SCTOPT GET OPTION WORD & x P ANK A2,1 MMU OPTION? & P RF(Z) DMTG20 NO! & P LDK A4,0 RESET PAGE POINTER & PDMTG10 EQU * &
0x2c4ad4…2c4c68 Dummy {f00=0x00df, f01=0x0190, f02=»ER & n , P ADKL A12,2 INCREMENT MMU ENTRY POINTER ' P RB DMTG10 ' : PDMTG20 EQU * ' L " P LD A2,SCTOPT GET OPTION WORD ' ` P ANK A2,2 DISC PAGING? ' P RF(Z) DMTG40 NO! ' PDMTG30 EQU * ' & P ADKL A12,2 SEGMENT BLOCK ADDRESS ' PDMTG40 EQU *
0x2c4c68…2c4dfc Dummy {f00=0x00df, f01=0x0190, f02=»N ' l P LDKL A1,/0031 TASK LEVEL ( P ST A1,TTB:ST,A12 STORE ( , & P SLL A1,10 MOVE LEVEL TO LEFT BYTE ( L " P ORKL A1,/00C0 PROGRAM STATUS ( v $ P ST A1,TTB:PW,A12 STORE IN TTAB ( " ADKL A12,40 TERMINAL DEVICES ( LDK A1,6 LENGTH ( STR A
0x2c4dfc…2c4f90 Dummy {f00=0x00df, f01=0x0190, f02=»DR A12,A1 RESERV SPACE FOR BUFFERS ( P LD A2,SCTSFA ) * P SUK A2,2 ) @ PDMTG50 ADK A2,2 ) R * P CW A2,SCTEFA CHECK IF MEMORY OVERFLOW ) j P RF(NE) DMTG60 NO! ) P LDKL A1,LMP3 ) ( P CALL ERROR INDICATE MEMORY OVERFLOW ) PDMTG60 CWR A2,A12 )
0x2c4f90…2c5124 Dummy {f00=0x00df, f01=0x0190, f02=» ) r " * B:TT - BUILD TASK TABLES * * " ****************************** * . * * T * REFERENCED IN: MONCON * ^ * * ~ 4 P* ENTRY: SAVE01 - START OF SAVE01URATION DATA * * * 8 4* EXIT: TC:TAB CONTAIN POINTERS TO ALL TASK TABLES * *
0x2c5124…2c52b8 Dummy {f00=0x00df, f01=0x0190, f02=»* TASK TABLE LAYOUT * * &* ________________________ + , * &* I MMU I + Z * &* I TABLE I + * &* I 16 I + * &* I WORDS
0x2c52b8…2c544c Dummy {f00=0x00df, f01=0x0190, f02=»---- + n * &* TASK ENTRY I QUEUE I , * &* ------------------------ , : * &* TTB:ID I TASK IDENTIFICATION I , h * &* ------------------------ , * &* TTB:ST I STATUS/LEVEL I , * &* --------
0x2c544c…2c55e0 Dummy {f00=0x00df, f01=0x0190, f02=»RAM STATUS WORD I , | * &* ------------------------ - * &* TTB:SA I DISPATCH ADDRESS I - H * &* ------------------------ - v * &* I REGISTER I - * &* I SAVE I - * &*
0x2c55e0…2c5774 (2, 137) Dummy {f00=0x00df, f01=0x0190, f02=» ------------------------ - * &* TTB:TD I TASK I . ( * P* I SAVE01URATION I . V * &* I TABLE I . * &* : : . * &* : : .
0x2c5774…2c5908 Dummy {f00=0x00df, f01=0x018e, f02=» ______________________________ . 0 ,* I LENGTH I / * 0 ,* ------------------------------ / ^ 0 ,* I INDEX/FILCODE I / 0 ,* ------------------------------ / 0 ,*
0x2c5908…2c5a9c Dummy {f00=0x00df, f01=0x0190, f02=» / b 0 ,* : : 0 0 ,* ------------------------------ 0 < 0 ,* I INDEX/FILECODE I 0 p 0 ,* ------------------------------ 0 0 ,* I DWT-ADDRESS I 0
0x2c5a9c…2c5c30 Dummy {f00=0x00df, f01=0x0190, f02=»D A11,SAVE01,A13 GET START OF SAVE01URATION DATA 0 . P LD A2,SCTDML GET NUMBER OF LOCAL DM-FILES 1 8 P SLL A2,2 MULTIPLY BY 4 1 j 6 P ST A2,SAVE04,A13 SAVE NUMBER OF BYTES TO RESERVE 1 PBTT10 EQU * 1 $ LCR A2,A11 GET FIRST BLOCK TYPE 1 ( # CCK A2,
0x2c5c30…2c5dc4 Dummy {f00=0x00df, f01=0x0190, f02=» 1 ( $* GET NUMBER OF TASKS IN THIS CLASS 2 * 2 4 CALL GETTSK 2 > P ST A1,SAVE19,A13 SAVE 2 R * 2 p * GET TASK ID START VALUE 2 z * 2 ( P LC A5,TDBID+4,A11 GET FIRST ID CHAR 2 SLL A5,8 MOVE TO LEFT BYTE 2 * P LC A5,TDBID+5,A11
0x2c5dc4…2c5f58 Dummy {f00=0x00df, f01=0x0190, f02=» VALUE 2 v P* 3 , P LC A5,TDBMC+4,A11 GET FIRST CHAR IN TCL 3 P SLL A5,8 MOVE TO LEFT BYTE 3 H . P LC A5,TDBMC+5,A11 GET SECOND CHAR IN TCL 3 l $ P CALL GETTCL GET TCL START VALUE 3 P ST A5,SAVE17,A13 SAVE 3 P XIF 3 P EJECT 3 * 3
0x2c5f58…2c60ec Dummy {f00=0x00df, f01=0x0190, f02=»+5,A11 GET SECOND DIGIT IN LEVEL 3 " CALL CONVRT CONVERT TO BINARY 4 ( P ST A1,SAVE24,A13 SAVE 4 N * 4 l B P* COMPUTE SIZE OF SAVE01URATION DEPENDENT PART OF TASK TABLE 4 v * 4 $ LDKL A10,TTB:TD STANDARD LENGTH 4 " P LD A5,SCTOPT GET OPTION W
0x2c60ec…2c6280 Dummy {f00=0x00df, f01=0x0190, f02=»V SPACE FOR EXTRA WORDS 4 z RF BTT30 5 PBTT25 EQU * 5 2 " P LD A5,SCTOPT GET OPTION WORD 5 F P ANK A5,2 DISC PAGING? 5 l RF(Z) BTT30 NO 5 2 . SUKL A10,TTB:SB ONE WORD EXTRA IF DISC PAGING 5 0 , SUKL A12,TTB:SB RESERV SPACE FOR EXTRA WORD 5
0x2c6280…2c6414 (2, 138) Dummy {f00=0x00df, f01=0x0190, f02=»* COMPUTE SIZE OF TERMINAL DEVICE CLASS DEPENDENT PART 5 " P* OF TASK SAVE01URATION TABLE 6 @ * 6 f LDK A6,0 RESET LENGTH 6 p : 5 LDR A9,A11 INIT SUB-POINTER IN TASK DEFINITION BLOCK 6 4 0 ADKL A9,TDBFST TERMINAL DEVICE CLASS DEFINITION 6 $ CAL
0x2c6414…2c65a8 Dummy {f00=0x00df, f01=0x0190, f02=» 6 l & " ADR A1,A1 2*(BINARY CLASS NUMBER) 7 , P LD A8,SAVE18,A13 GET POINTER TO TCLASS 7 2 P LDR* A2,A8 7 b P SUK A2,2 7 v P CWR A1,A2 7 P RF(NG) BTT37 7 P LDKL A1,LMP4 7 & P CALL ERROR INDICATE FORMAT ERROR 7 PBTT37 EQU * 7 " P ADR
0x2c65a8…2c673c Dummy {f00=0x00df, f01=0x0190, f02=»GTH WORD 7 z ( $ ADR A10,A8 ADD TO TOTAL TTAB LENGTH 8 . ) ADR A6,A8 ADD TO TASK CONF. TABLE LENGTH 8 < ADKL A9,TDC+TLC NEXT CLASS 8 n ( # SUK A7,1 DECREMENT NUMBER OF TDC:S 8 RB BTT35 8 P EJECT 8 PBTT40 EQU * 8 * 8 > :* COMPUTE S
0x2c673c…2c68d0 Dummy {f00=0x00df, f01=0x0190, f02=»EVICE CLASSES 8 l P ADKL A9,2 FIRST SDC RECORD 9 LDR A7,A1 SAVE 9 : PBTT50 EQU * 9 R RF(Z) BTT55 NO MOORE SDC:S 9 f ( $ CALL GETCLN GET CLASS NUMBER (1-99) 9 & " ADR A1,A1 2*(BINARY CLASS NUMBER) 9 , P LD A8,SAVE11,A13 GET POINTER TO SCLASS
0x2c68d0…2c6a64 Dummy {f00=0x00df, f01=0x0190, f02=»ERROR 9 t PBTT52 EQU * : " P ADR A8,A1 GET ENTRY IN SCLASS : " $ P LDR* A8,A8 GET POINTER TO CLASS : H $ P LDR* A8,A8 GET LENGTH OF CLASS : p " SUKL A8,2 EXCLUDE LENGTH WORD : ( $ ADR A10,A8 ADD TO TOTAL TTAB LENGTH : . ) ADR A6,A8 ADD TO TASK CONF. T
0x2c6a64…2c6bf8 Dummy {f00=0x00df, f01=0x0190, f02=»D A7,SAVE04,A13 GET NUMBER OF BYTES TO RESERV : ( P ADR A10,A7 ADD TO TOTAL TTAB LENGTH ; 6 . P ADR A6,A7 ADD TO TASK CONF. TABLE LENGTH ; b " P ADK A6,2 INCLUDE LENGTH WORD ; 2 P LD A7,SAVE13,A13 GET CURRENT ENTRY IN TC:TAB ; 8 P LD A8,SAVE19,A13 GET NU
0x2c6bf8…2c6d8c Dummy {f00=0x00df, f01=0x0190, f02=»B ; ^ * < ST A6,TTB:TD,A12 < * < . : 6* STORE TASK LEVEL IN RIGHT BYTE OF STATUS/LEVEL WORD < 8 * < v $ P LD A5,SAVE24,A13 GET TASK LEVEL < $ ST A5,TTB:ST,A12 STORE IN TTAB < * < < 7* STORE TASK LEVEL IN LEFT BYTE OF PROGRAM ST
0x2c6d8c…2c6f20 Dummy {f00=0x00df, f01=0x0190, f02=»2,1 MMU OPTION? < P ORR A5,A2 SET BIT 15 IF MMU = $ ST A5,TTB:PW,A12 STORE IN TTAB = < * = d ( $* STORE TASK IDENTIFICATION IN TTAB = n * = & P LD A5,SAVE16,A13 GET THIS TASK ID = $ ST A5,TTB:ID,A12 STORE IN TTAB = ADK A5,1 INCREMEN
0x2c6f20…2c70b4 (2, 139) Dummy {f00=0x00df, f01=0x0190, f02=» IN TTAB = t P* > * P LD A5,SAVE17,A13 GET TCL START VALUE > " P ST A5,TTB:PP,A12 SAVE IN TTAB > H P ADK A5,1 INCREMENT TCL > n P ST A5,SAVE17,A13 SAVE > P XIF > , ' STR A12,A7 SAVE TTAB ADDRESS IN TC:TAB > " ADK A7,2 NEXT ENTRY IN TC:TAB >
0x2c70b4…2c7248 Dummy {f00=0x00df, f01=0x0190, f02=» NUMBER OF TASKS IN THIS CLASS > | RB BTT60 ? & P EJECT ? 8 PBTT70 EQU * ? F * ? Z * &* RESET POINTER TO START OF FREE AREA ? d * ? " P LD A5,SCTOPT GET OPTION WORD ? P ANK A5,1 MMU PAGING? ? RF(Z) BTT80 NO ? ( # ADKL A12,TTB:MT
0x2c7248…2c73dc Dummy {f00=0x00df, f01=0x0190, f02=»F(Z) BTT90 NO ? & " ADKL A12,TTB:SB SUBTRACT ONE WORD @ PBTT90 EQU * @ @ CALL NXTBLK GET NEXT BLOCK @ T ( # CCK A2,'TT' TASK DEFINITION BLOCK? @ x P RF(NE) BTT95 @ P LDKL A2,BTT20 @ P SUKL A2,REL @ P ADR A2,A13 @ P ABR A2 @ P
0x2c73dc…2c7570 Dummy {f00=0x00df, f01=0x0190, f02=»,LMP3 @ ( P CALL ERROR INDICATE MEMORY OVERFLOW A PBTT105 CWR A2,A12 A : P RB(NE) BTT100 A T * & ST A12,SCTSFA SAVE START OF FREE AREA A j RTN A14 RETURN A P IFT CREDIT=1 A EJECT A ( $************************************ A ( $* SEGG
0x2c7570…2c7704 Dummy {f00=0x00df, f01=0x0190, f02=»* SCTEFA - END OF FREE AREA A , (* SCTLAC - START OF APPLICATION B , * B , (* EXIT: SCTPAG - ADDRESS TO PAGE TABLE B f * B * WORK REGISTERS: A1-A12 B * B * SUBROUTINES: GETCON B * B EJECT B PSEGG
0x2c7704…2c7898 Dummy {f00=0x00df, f01=0x0190, f02=»,SCTADA APPLICATION DISC SECTOR ADDRESS B PSEG:05 EQU * C 0 0 P LD A2,SCTLAC LOGICAL ADDRESS OF COMMON PART C D P* C x " P* CHECK IF CREDIT APPLICATION C P* C P ADKL A2,PRGLG1 C P CALL GETCON C P CWK A1,'CR' C P RF(NE) SEGEX NOT CRED
0x2c7898…2c7a2c Dummy {f00=0x00df, f01=0x0190, f02=»TABLE C p * P LDKL A1,/8400 STATUS FOR FIRST BLOCK D $ P STR A1,A12 STORE IN FIRST BLOCK D < 4 P LD A2,SCTLAC GET LOGICAL ADDRESS TO COMMON PART D d & P CALL GETCON GET POINTER TO P:MTAB D P LDR A2,A1 SAVE POINTER D P ADKL A2,6 ADDRESS TO P:BAS D
0x2c7a2c…2c7bc0 Dummy {f00=0x00df, f01=0x0190, f02=»L ADDRESS TO COMMON PART D x * P ADKL A2,NUMSEG GET NUMBER OF SEGMENTS E CALL GETCON E N ( # LDR A4,A1 SAVE NUMBER OF SEGMENTSS E d P RF(Z) SEG:50 NO SEGMENTS! E " ADK A2,2 FIRST SEGMENT BLOCK E " P LDK A3,1 INIT SEGMENT NUMBER E PSEG:10 EQU
0x2c7bc0…2c7d54 (2, 140) Dummy {f00=0x00e0, f01=0x0190, f02=»OPT GET OPTION WORD E P ANK A1,2 DISC PAGING? F P RF(NZ) SEG:35 YES! F : PSEG:30 EQU * F V * P LDKL A7,/8800 INDICATE LOADED IN CORE F j PSEG:35 EQU * F 2 P ORR A7,A3 INSERT SEGMENT NUMBER IN RIGHT BYTE F STR A7,A12 SET STATUS F $ ADKL A1
0x2c7d54…2c7ee8 Dummy {f00=0x00e0, f01=0x0190, f02=»SC PAGING? F RF(Z) SEG:40 G CALL GETCON G * , ( ADR A1,A5 PHYSICAL DISC SECTOR ADDRESS G > PSEG:40 EQU * G n STR A1,A12 SAVE IN SEGBLK G $ ADKL A12,2 NEXT ENTRY IN SEGBLK G ADK A2,2 EFFECTIVE LENGTH G CALL GETCON G STR A
0x2c7ee8…2c807c Dummy {f00=0x00e0, f01=0x018e, f02=» SUK A4,1 DECREMENT NUMBER OF SEGMENTS G RB(P) SEG:10 H . PSEG:50 LD A2,SCTSFA H D P SUK A2,2 H ` PSEG:60 ADK A2,2 H r P CW A2,SCTEFA H P RF(NE) SEG:70 H P LDKL A1,LMP3 H ( P CALL ERROR INDICATE MEMORY OVERFLOW H PSEG:70 CWR A2,A1
0x2c807c…2c8210 Dummy {f00=0x00e0, f01=0x0190, f02=» P EJECT I D P*************************************************************** I D P* * I Z D P* * I D P*
0x2c8210…2c83a4 Dummy {f00=0x00e0, f01=0x0190, f02=»============================== * I z D P* * J 2 D P* REFERENCED IN: SYSLDM * J z D P* * J D
0x2c83a4…2c8538 Dummy {f00=0x00e0, f01=0x0190, f02=»* J R D P* EXIT: * K D P* * K R D P* WORK REGISTERS: A1-A12 * K D P*
0x2c8538…2c86cc Dummy {f00=0x00e0, f01=0x018e, f02=» - ADDRESS TO S:BTAB PROTOTYPE * K r D P* A10 - SWB BLOCK POINTER * L * D P* A11 - POINTER IN CONF. FILE * L r D P* A12 - ADDRESS TABLE POINTER * L D P*
0x2c86cc…2c8860 Dummy {f00=0x00e0, f01=0x0190, f02=» D P* * M D P* * M L D P*************************************************************** M P EJECT M PB:SWBT EQU * M & P LD A12,SC
0x2c8860…2c89f4 (2, 141) Dummy {f00=0x00e0, f01=0x0190, f02=»IN CONF. FILE M h P* N & PBSWT10 CALL NXTBLK GET NEXT BLOCK N ( P CCK A2,'TT' TASK DEFINITION BLOCK? N J P RB(E) BSWT10 YES! N v 0 P CCK A2,'CC' COMMON DEVICE DEFINITION BLOCK? N P RF(NE) BSWT20 NO! N P ADKL A11,1 N " P CALL NXTCOM SKIP COMM
0x2c89f4…2c8b88 Dummy {f00=0x00e0, f01=0x0190, f02=» A6,A11 N & P CALL GETNUM NUMBER OF UWB RECORDS O P LDR A1,A5 SAVE O : $ P RF(Z) SWBERR ILLEGAL NUMBER!!! O R ( P ADKL A11,UDBFST-1 FIRST UWB RECORD O z ( PBSWT30 ADKL A11,6 BYPASS UWB RECORD O $ P SUK A1,1 DECR. NUMBER OF TYPES O P RB(P) BSWT30
0x2c8b88…2c8d1c Dummy {f00=0x00e0, f01=0x018e, f02=» O ~ ( P LDKL A1,0 NO SWB DEFINITION BLOCK! P $ P ST A1,SCTSWB CLEAR SWB POINTER P 4 P RTN A14 P & PBSWT44 ADKL A11,1 NUMBER OF TYPES P l * P ST A11,SAVE23,A13 START OF CONF. DATA P P LDR A6,A11 P P CALL GETNUM GET 3 DIGITS P P LDR A5,A5 ZER
0x2c8d1c…2c8eb0 Dummy {f00=0x00e0, f01=0x018e, f02=» P j P RF(NZ) BSWT48 FILE CREATED Q " PSWBERR LDKL A1,LMP6 SWB ERROR! Q , P CALL ERROR Q R 6 PBSWT48 ST A12,SCTSWB SAVE ADDRESS TO ADDRESS TABLE Q f , P ST A8,SAVE14,A13 SAVE ADDRESS TO $SWAP Q P ADKL A12,2 FIRST POINTER Q P LDR A10,A12 SAVE Q
0x2c8eb0…2c9044 Dummy {f00=0x00e0, f01=0x0190, f02=» Q n P LDR A2,A1 SAVE R , P ADKL A2,S:BTAB DISPL. TO S:BTAB ADDRESS R $ P CALL GETCON GET S:BTAB ADDRESS R P * P LDR A2,A1 GET ADDRESS TO PROT. S:BTAB R x * P RB(Z) SWBERR NO SWB:S IN APPLICATION! R P ADK A1,2 ADDRESS TO NAME R P ST A1,SAVE21,A13
0x2c9044…2c91d8 Dummy {f00=0x00e0, f01=0x0190, f02=» SUK A1,2 SKIP LENGTH R . PBSWT50 ADKL A10,2 RESERV ENTRY FOR POINTER S 2 P SUK A1,6 DECREMENT LENGTH OF S:BTAB PROTOTYPE S P $ P RB(P) BSWT50 NEXT SWB-PROTOTYPE S P SUK A4,2 SKIP LENGTH WORD S " P LDKL A9,0 RESET BLOCK COUNTER S , PBSWT60 STR A10,A12
0x2c91d8…2c936c Dummy {f00=0x00e0, f01=0x018e, f02=»B RECORDS S r 0 PBSWT65 LD A2,SAVE21,A13 NAME RECORD IN PROT. T $ P CALL GETCON GET TWO FIRST CHAR. T F ( P ADKL A11,NAMUWB NAME IN CONF. FILE T n P LCR A3,A11 GET FIRST CHAR. T P SLL A3,8 MOVE TO LEFT BYTE T " P LC A3,1,A11 GET SECOND CHAR. T & P
0x2c936c…2c9500 Dummy {f00=0x00e0, f01=0x0190, f02=» T r P SRL A1,8 ISOLATE CHAR. U 0 P LC A3,2,A11 GET THIRD CHAR. FROM CONF. FILE U ( P ANK A3,/FF ISOLATE CHAR. U " P CWR A1,A3 THIRD CHAR. EQUAL? U ~ P RF(E) BSWT75 YES! U $ PBSWT70 ADKL A11,NAMUWB SKIP NAME U ( P SUK A7,1 DECREMENT NUMBER OF TYPE
0x2c9500…2c9694 (2, 142) Dummy {f00=0x00e0, f01=0x0190, f02=» U P STR A7,A10 1:ST WORD V P ST A7,2,A10 2:ND WORD V & P ST A7,4,A10 3:RD WORD V D P ST A7,6,A10 4:TH WORD V b P RF BSWT95 V PBSWT75 EQU * V P* V P* MATCHING NAME FOUND V P* V & P ADKL A11,NAMUWB NUMBER OF COPIES V P LDR A
0x2c9694…2c9828 Dummy {f00=0x00e0, f01=0x0190, f02=» RESTORE POINTER V $ P SUK A2,UPNAME PROTOTYPE ADDRESS W & P CALL GETCON GET PROTOTYPE ADDRESS W @ P LDR A2,A1 SAVE W j & P SUK A2,UPNAME LENGTH OF WORKBLOCK W P CALL GETCON W * P ST A1,SWBLEN,A10 STORE LENGTH OF SWB W 0 P ST A8,2,A10 STORE DISC AD
0x2c9828…2c99bc Dummy {f00=0x00e0, f01=0x0190, f02=»REMENT SECTOR NUMBER W | & P ADK A1,1 INCREMENT SECTOR COUNTER X " P SUKL A3,400 DECREMENT LENGTH X F P RB(P) BSWT90 MOORE SECTORS? X l P SUK A5,1 MOORE COPIES? X P RB(P) BSWT85 YES! X * P ST A1,SWBSEC,A10 STORE SECTOR LENGTH X ( P CW A8,SAVE25,A1
0x2c99bc…2c9b50 Dummy {f00=0x00e0, f01=0x018e, f02=»OINTER X ~ & P ADKL A9,1 INCREMENT BLOCK COUNTER Y 4 P LD A2,SAVE21,A13 CURRENT RECORD IN PROT. S:BTAB Y 8 . P ADK A2,UP:REC NEXT RECORD IN PROT. S:BTAB Y p P ST A2,SAVE21,A13 SAVE Y 0 P LD A4,SAVE19,A13 GET LENGTH OF PROT. S:BTAB Y P SUK A4,UP:REC DECRE
0x2c9b50…2c9ce4 Dummy {f00=0x00e0, f01=0x0190, f02=» Y P CALL ERROR SWB ERROR! Z 2 PBSWT99 ST* A9,SCTSWB SAVE NUMBER OF SWB TYPES Z & , P ST A10,SCTSFA UPDATE START OF FREE AREA Z P RTN A14 Z P XIF Z EJECT Z * &************************************** Z * &* MONBLK - GENERATE MONITOR BLOCKS
0x2c9ce4…2c9e78 Dummy {f00=0x00e0, f01=0x018e, f02=»N SYSTEM) Z v $ P* WHERE N IS A SYSTEM CONSTANT [ $ P* DEFINED AT SYSTEM GENERATION [ : P* [ b * [ l * REFERENCED IN: SYSLOD [ v * [ * &* ENTRY: SCTSFA - START OF FREE AREA [ ( $* SCTEFA - END OF FREE AREA [ * [ . ** E
0x2c9e78…2ca00c Dummy {f00=0x00e0, f01=0x018e, f02=» * EJECT PMONBLK EQU * LDK A1,0 0 & ! LD A12,SCTSFA START OF FREE AREA B . P ST A12,FREQUE SAVE POINTER TO FIRST BLOCK l * $ * GET NUMBER OF TASKS IN SYSTEM * ( P LD* A7,SCTTCT GET LENGTH OF TC:TAB P*
0x2ca00c…2ca1a0 Dummy {f00=0x00e0, f01=0x0190, f02=» x RF(Z) MON:20 NO ] P CALL BLKGEN ] " RB MON:10 ] 6 PMON:20 EQU * ] H * ] * GENERATE 19 MOORE BLOCKS ] f * ] LDK A2,19 ] P CALL BLKGEN ] * ] * GENERATE END BLOCK ] * ] STR A1,A12 ] ST A1,2
0x2ca1a0…2ca334 (2, 143) Dummy {f00=0x00e0, f01=0x0190, f02=» MONITOR BLOCK AS BUFFER ] | P* ^ & P LD A1,BUFSIZ,A13 GET BUFFER SIZE ^ * P CWK A1,6 >6? ^ T $ P RF(NL) MON:30 NOT LESS ANYWAY! ^ j P LDK A1,6 BUFFER SIZE ^ P ST A1,BUFSIZ,A13 STORE ^ & P ST A12,SYSBUF,A13 START OF BUFFER ^ PMON:30 EQU * ^
0x2ca334…2ca4c8 Dummy {f00=0x00e0, f01=0x0190, f02=»DKL A1,LMP3 ^ P CALL ERROR _ PMON:50 CWR A2,A12 _ ( P RB(NE) MON:40 _ B * & ST A12,SCTSFA UPDATE END OF FREE AREA _ X RTN A14 _ EJECT _ * %************************************* _ * %* BLKGEN - GENERATE MONITOR BLOCK * _ * %********
0x2ca4c8…2ca65c Dummy {f00=0x00e0, f01=0x0190, f02=»ER OF BLOCKS TO BE GENERATED _ | $ * A12 - NEXT FREE ENTRY ` $ * ` L * EXIT: A1=0 ` V " * A12 - NEXT FREE ENTRY ` l * ` * WORK REGISTES: A3 ` * ` * SUBROUTINES: ` * ` 0 ,* MONITOR BLOC
0x2ca65c…2ca7f0 Dummy {f00=0x00e0, f01=0x0190, f02=» -------------------- ` 0 ,* I DATA 0 I a $ 0 ,* -------------------- a X 0 ,* I DATA 0 I a 0 ,* -------------------- a * a EJECT a
0x2ca7f0…2ca984 Dummy {f00=0x00e0, f01=0x0190, f02=»A12 a ST A1,-2,A12 b SUK A3,1 b " RB BLK:10 b 4 PBLKEX EQU * b F RTN A14 b Z EJECT b j L J************************************************************************ b x J J* B:DWTS - BUILD DWT:S FOR SPECIAL DEVICES AND CONNECT TO TASK
0x2ca984…2cab18 Dummy {f00=0x00e0, f01=0x018e, f02=»* b , (* ENTRY: SCTSFA - START OF FREE ARE (X) c 2 P* SAVE01 - START OF SAVE01URATION FILE c : ( #* SCTEFA - END OF FREE AREA c p * c * EXIT: c * c * WORK REGISTERS: A1-A12 c * c < 8* SUBROUTINES: GETTSK,GETTD
0x2cab18…2cacac Dummy {f00=0x00e0, f01=0x0190, f02=» c 2 P LD A11,SAVE01,A13 START OF SAVE01URATION FILE d & ! LD A12,SCTSFA START OF FREE AREA d > * d h 6 2* CHECK IF FIRST BLOCK IS A TASK DEFINITION BLOCK d r * d $ LCR A2,A11 GET FIRST CHARACTER d ( # CCK A2,'TT' TASK DEFINITION BLOCK? d
0x2cacac…2cae40 Dummy {f00=0x00e0, f01=0x0190, f02=» * e , P LD A7,SAVE02,A13 FIRST USER TASK ENTRY e P SUK A7,2 e > EJECT e P PDWTS10 EQU * e ^ * e r . )* GET NUMBER OF TASKS IN THIS TASK CLASS e | * e CALL GETTSK e PDWTS20 EQU * e P ST A1,SAVE19,A13 SAVE e * e * &
0x2cae40…2cafd4 (2, 144) Dummy {f00=0x00e1, f01=0x0190, f02=»ADDRESS e z 6 P ADKL A10,TTB:TD+2 TASK SAVE01URATION TABLE ENTRY f * f J 0 ,* INIT SUB-POINTER IN TASK DEFINITION BLOCK f T * f . * LDR A9,A11 START OF TASK DEFINITION BLOCK f , ' ADKL A9,TDBFST START OF TDC DEFINITION f P EJECT f * f
0x2cafd4…2cb168 Dummy {f00=0x00e1, f01=0x018e, f02=»WTS40 f P CALL GETCLN GET TDC ID g P ADR A1,A1 g . , P LD A8,SAVE18,A13 GET POINTER TO TCLASS g @ P ADR A8,A1 GET CLASS ENTRY g p $ P LDR* A8,A8 GET POINTER TO CLASS g $ P LDR* A8,A8 GET LENGTH OF CLASS g " P SUKL A8,2 EXCLUDE LENGTH WORD g * P
0x2cb168…2cb2fc Dummy {f00=0x00e1, f01=0x0190, f02=» g j P RB DWTS30 h PDWTS40 EQU * h * h . , '* GET NUMBER OF SPECIAL DEVICE CLASSES h 8 * h h CALL GETSDC h r ADKL A9,SDCFST-CDBNC h LDR A1,A1 h PDWTS50 EQU * h P RF(Z) DWTS90 h P ST A1,SAVE17,A13 SAVE h * h * &
0x2cb2fc…2cb490 Dummy {f00=0x00e1, f01=0x0190, f02=» CORRESPONDING SPECIAL DEVICE CLASS IN SCLASS h * i 6 ADR A1,A1 i @ ( P LD A6,SAVE11,A13 POINTER TO SCLASS i R P ADR A6,A1 SELECT ENTRY i ~ $ P LDR* A6,A6 GET POINTER TO CLASS i P LDR A5,A6 SAVE i P LDR* A6,A6 GET LENGTH i " P SUK A6,2 EX
0x2cb490…2cb624 Dummy {f00=0x00e1, f01=0x0190, f02=»ENERATION OF DWT? i ~ P RF(Z) DWTS70 NO j * j 2 * COPY DWT j < * j P LDR A2,A12 TO-ADDRESS j Z , ' ADR A12,A3 UPDATE POINTER TO FREE AREA j x CALL MOVE COPY DWT j P EJECT j P* j 4 P* RELOCATE MONITOR ECB ADDRESS IF MMU IN SY
0x2cb624…2cb7b8 Dummy {f00=0x00e1, f01=0x0190, f02=»TOTYPE DWT-ADDRESS j ~ * P SUR A3,A2 COMPUTE RELOCATION CONSTANT k , P LD A4,DWTMEC,A2 GET MONITOR ECB-ADDRESS k H P SUR A4,A3 RELOCATE k x $ P ANKL A4,/FFFE MAKE EVEN ADDRESS k " P ST A4,DWTMEC,A2 STORE IT BACK k PDWTS65 EQU * k $ LDR A1,A2 DT-ADDR
0x2cb7b8…2cb94c Dummy {f00=0x00e1, f01=0x0190, f02=»DDRESS k x $ LD A1,-2,A5 GET INDEX/FILECODE l STR A1,A10 SAVE IN TTAB l 6 2 P ADKL A10,4 UPDATE TASK SAVE01URATION POINTER l V PDWTS80 EQU * l * % SUK A6,4 DECREMENT NUMBER OF DEVICES l RB(P) DWTS60 NEXT DEVICE l P EJECT l * l 4 /
0x2cb94c…2cbae0 Dummy {f00=0x00e1, f01=0x018e, f02=»DWTS50 l PDWTS90 EQU * m * m " 8 P* CHECK IF MOORE TASKS WITH THE SAME SAVE01URATION m , * m h P LD A1,SAVE19,A13 m r SUK A1,1 m RB(P) DWTS20 m * m , (* CHECK IF MOORE TASK DEFINITION BLOCKS m * m CALL NXTBLK m
0x2cbae0…2cbc74 (2, 145) Dummy {f00=0x00e1, f01=0x0190, f02=» P CW A2,SCTEFA n P RF(NE) DWTS99 n P LDKL A1,LMP3 n 0 ( P CALL ERROR INDICATE MEMORY OVERFLOW n F PDWTS99 CWR A2,A12 n r P RB(NE) DWTS95 n ST A12,SCTSFA n RTN A14 RETURN n EJECT n 4 0******************************************
0x2cbc74…2cbe08 Dummy {f00=0x00e1, f01=0x018e, f02=»************************************** n * o . * REFERENCED IN: MONCON o 8 * o X * ENTRY: o b * o t * EXIT: o ~ * o * WORK REGISTERS: A1-A12 o * o D @* SUBROUTINES: ERROR,GETTSK,GETTDC,GETCLN,GETLCN,DWTGEN,NXTBLK o
0x2cbe08…2cbf9c Dummy {f00=0x00e1, f01=0x0190, f02=» o P LDK A1,0 p 0 P LDKL A11,BDWT05 GET END OF TEMP. WORK AREA p & P AD A11,M:REL,A13 RELOCATE ADDRESS p N P LDR A7,A11 SAVE p x 2 P SU A7,SCTSFA+2 COMPUTE SIZE OF TEMP WORK AREA p $ P CWK A7,1808 IS AREA BIG ENOUGH? p P RF(L) BDWT02 NO! p , P
0x2cbf9c…2cc130 Dummy {f00=0x00e1, f01=0x0190, f02=»NTERRUPT TABLE AT END OF FREE AREA p n * q * PBDWT02 EQU * q 4 ( P LD A11,SCTEFA GET END OF FREE AREA q H ( $ LD A9,SCTSFA GET START OF FREE AREA q t PBDWT05 EQU * q LDK A7,0 RESET WORD COUNTER q PBDWT10 EQU * q CWR A11,A9 MEMORY OVERFLOW?
0x2cc130…2cc2c4 Dummy {f00=0x00e1, f01=0x0190, f02=»WORDS RESERVED? q RF(E) BDWT20 YES r $ SUKL A11,2 RESERV ANOTHER WORD r 2 P CMR A11 CLEAR MEMORY WORD r Z $ ADK A7,1 INCREMENT WORD COUNTER r | RB BDWT10 r PBDWT20 EQU * r * r 6 2* INIT POINTERS TO THE TEMPORARY INTERRUPT TABLES r
0x2cc2c4…2cc458 Dummy {f00=0x00e1, f01=0x0190, f02=»2 r PBDWT30 EQU * s , ( STR A11,A7 SAVE INTERRUPT TABLE ADDRESS s & " ADK A7,2 NEXT ADDRESS TABLE ENTRY s N . * ADKL A11,224 NEXT INTERRUPT TABLE ADDRESS s x * % CW A11,SCTEFA ALL POINTERS INTIATED? s RB(NE) BDWT30 NO s * P ST A1,SCTEFA UPDATE E
0x2cc458…2cc5ec Dummy {f00=0x00e1, f01=0x0190, f02=» OF FREE AREA s x * t B >* INIT TC:TAB ENTRY POINTER TO POINT AT FIRST USER TASK ENTRY t * t f 0 P LD A5,SAVE02,A13 GET FIRST USER TASK ENTRY t p 6 P ST A5,SAVE13,A13 STORE IN CURRENT USER TASK ENTRY t PBDWT40 EQU * t * t . )* GET NUMBE
0x2cc5ec…2cc780 Dummy {f00=0x00e1, f01=0x0190, f02=»Y VALUE t t * u @ ;* GET NUMBER OF TERMINAL DEVICE CLASSES IN THIS TASK CLASS u * u ^ CALL GETTDC u h * u | $ * CHECK IF TASK WITHOUT DEVICES u * u $ LDR A1,A1 ANY TERMINAL DEVICES? u RF(Z) BDW100 NO u 6 P ST A1,SAVE15,A1
0x2cc780…2cc914 (2, 146) Dummy {f00=0x00e1, f01=0x0190, f02=» u ^ * v ( #* GET TERMINAL DEVICE CLASS NUMBER v * v > . * LDR A9,A11 START OF TASK DEFINITION BLOCK v H 4 0 ADKL A9,TDBFST TERMINAL DEVICE CLASS DEFINITION v z PBDWT55 EQU * v " CALL GETCLN GET CLASS NUMBER v ( P ST A1,SAVE14,A13 SAVE BINAR
0x2cc914…2ccaa8 Dummy {f00=0x00e1, f01=0x018e, f02=»TLCN GET LINE CONNECTION NUMBER v LDR A6,A1 SAVE BINARY VALUE w ( . * ADK A1,1 INCREMENT LINE CONNECTION NUMBER w L 4 / CALL BINASC CONVERT INCREMENTED VALUE TO ASCII w ~ , ' SC A5,TDC+4,A9 STORE RIGHT ASCII DIGIT w 2 - SRL A5,8 MOVE LEFT ASCII DIGIT TI
0x2ccaa8…2ccc3c Dummy {f00=0x00e1, f01=0x0190, f02=» * x 2 P LD A2,SAVE14,A13 GET BINARY VALUE OF CLASS ID x ADR A2,A2 2*ID x D ( P LD A7,SAVE18,A13 POINTER TO TCLASS x P ADR A7,A2 GET ENTRY x P* x : P* CHECK IF THIS IS AN ENTRY IN TCLASS -TO BE SUPPLIED x P* x $ P LDR* A7,A7 GET PO
0x2ccc3c…2ccdd0 Dummy {f00=0x00e1, f01=0x0190, f02=» , (* A7 - POINTER TO TERMINAL DEVICE CLASS y * y 4 . ** THE ENTRY IN TEMPORARY INTERRUPT TABLE y > . ** IS DERIVED FROM LINE CONNECTION NUMBER, y p : 6* DEVICE ADDRESS AND TYPE OF DEVICE (INPUT OR OUTPUT) y * y CALL DWTGEN y PBDWT90 EQU
0x2ccdd0…2ccf64 Dummy {f00=0x00e1, f01=0x0190, f02=»NO y , P ST A1,SAVE15,A13 SAVE REMAINING NUMBER z $ ADKL A9,TDC+TLC NEXT TDC RECORD z : RB BDWT55 z b PBDW100 EQU * z t 2 P LD A1,SAVE13,A13 GET CURRENT ENTRY IN TC:TAB z & ! ADK A1,2 INCREMENT ENTRY POINTER z P ST A1,SAVE13,A13 SAVE z 8 P L
0x2ccf64…2cd0f8 Dummy {f00=0x00e1, f01=0x0190, f02=»TASK DEFINITION BLOCKS z ~ * { $ CALL NXTBLK SKIP TO NEXT BLOCK { ( ( # CCK A2,'TT' TASK DEFINITION BLOCK? { P RB(E) BDWT40 YES { | * { 0 ,* ALL TERMINAL DEVICE WORK TABLES GENERATED { * { P LD A2,SCTSFA { P SUK A2,2 { PBD
0x2cd0f8…2cd28c Dummy {f00=0x00e1, f01=0x0190, f02=»B(NE) BDW105 { , P ST A12,SCTSFA UPDATE START OF FREE AREA | RTN A14 RETURN | D EJECT | , (**************************************** | l , P* B:CDT - BUILD COMMON DEVICE TABLE * | , (**************************************** | * | *
0x2cd28c…2cd420 Dummy {f00=0x00e1, f01=0x018e, f02=» | ` ( $* SCTEFA - END OF FREE AREA } * } 4 4 0* EXIT: CDTAB - POINTER TO COMMON DEVICE TABLE } > * } v * WORK REGISTERS: A1-A12 } * } < P* SUBROUTINES: NXTBLK,GETCTC,GETLCN,GETSDC,GETCLN,MOVE } * } EJECT } PB:CD
0x2cd420…2cd5b4 (2, 147) Dummy {f00=0x00e1, f01=0x0190, f02=» } x * ~ * %* GET COMMON DEVICE DEFINITION BLOCK ~ * ~ @ PCDG:10 EQU * ~ J CALL NXTBLK ~ ^ ( # CCK A2,'TT' TASK DEFINITION BLOCK? ~ r RB(E) CDG:10 YES ~ ( $ CCK A2,'CC' COMMON DEV. DEF. BLOCK? ~ P RF(NE) BCDTEX NO ~ P EJECT ~
0x2cd5b4…2cd748 Dummy {f00=0x00e1, f01=0x0190, f02=»* ~ 0 P LDR A9,A11 START OF COMMON DEFINITION BLOCK 6 P ADKL A9,SDCFST NUMBER OF COMMON TERMINAL CLASSES > & P CALL GETCTC GET NUMBER OF C.T.C. x P LDR A6,A1 SAVE " PB:CT10 RF(Z) B:CT30 NO MOORE! . P CALL GETCLN GET CLASS IDENT NUMBER (1-9
0x2cd748…2cd8dc Dummy {f00=0x00e1, f01=0x0190, f02=»SS r P SUK A2,2 EXCLUDE LENGTH & P CWR A1,A2 MAKE SURE CLASS EXISTS * P RF(NG) B:CT20 OK! T P LDKL A1,LMP4 FORMAT ERROR! n P CALL ERROR , PB:CT20 ADR A1,A5 SELECT ENTRY IN TCLASS $ P LDR* A1,A1 GET POINTER TO CLASS $ P LDR* A1,A
0x2cd8dc…2cda70 Dummy {f00=0x00e1, f01=0x0190, f02=»RD IN CONF. FILE v " P SUK A6,1 DECR. NBR OF C.T.C. P RB B:CT10 > P EJECT P PB:CT30 EQU * ^ P* r : P* RESERVE AREA IN COMMON DEVICE TABLE FOR FILE-CODES | 8 P* AND DWT-ADDRESSES USED BY COMMON SPECIAL DEVICES P* CALL GE
0x2cda70…2cdc04 Dummy {f00=0x00e1, f01=0x018e, f02=» , P LD A5,SAVE11,A13 GET POINTER TO SCLASS P LDR* A2,A5 4 P SUK A2,2 H P CWR A1,A2 Z P RF(NG) BCDT15 l P LDKL A1,LMP4 P CALL ERROR PBCDT15 EQU * P ADR A1,A5 SELECT ENTRY $ P LDR* A1,A1 GET POINTER TO CLASS P
0x2cdc04…2cdd98 Dummy {f00=0x00e1, f01=0x0190, f02=» P EJECT P* < P* RESERV ENTRIES IN COMMON DEVICE TABLE FOR FILE-CODES 6 P* AND DWT-ADDRESSES USED FOR PHYSICAL I/O ON DISC ` P* 6 P* ALSO RESERVE ENTRIES IN COMMON DEVICE TABLE FOR @ P* FILE-CODES AND DWT-ADDRESSES USED FOR D
0x2cdd98…2cdf2c Dummy {f00=0x00e1, f01=0x0190, f02=»T DATA COMMUNICATION? " P LD A6,SCTDMT DATA MANAGEMENT P ORR A6,A1 DM OR DC? D " P LD A1,SCTOPT GET OPTION WORD ` $ P ANK A1,/A DISC PAGING OR SWB:S? , P ORR A6,A1 COPY LAST SCLASS IF NOT ZERO P RF(Z) CDG:15 NO! , P LD A6,SAVE11,A1
0x2cdf2c…2ce0c0 Dummy {f00=0x00e1, f01=0x018e, f02=»CLASS v * P LDR* A6,A6 GET POINTER TO LAST CLASS ( P LDR* A6,A6 GET LENGTH OF LAST CLASS < " P SUK A6,2 EXCLUDE LENGTH WORD h & P ADR A7,A6 ADD TO LENGTH OF CD:TAB PCDG:15 EQU * , P LD A6,SCTDMC GET NUMBER OF GLOBAL FILES P SLL A6,2 MU
0x2ce0c0…2ce254 (2, 148) Dummy {f00=0x00e2, f01=0x0190, f02=» EJECT * 6 1* INIT POINTER TO START OF FREE AREA AND TO CDTAB * Z ( P LD A10,SCTCDT FIRST ENTRY IN SCTCDT d $ P LCR A2,A11 COMMON DEVICE BLOCK? P CCK A2,'CC' P RF(E) CDG:18 * P ADKL A10,2 FIRST FREE ENTRY IN CDTAB
0x2ce254…2ce3e8 Dummy {f00=0x00e2, f01=0x0190, f02=» P* * P LDR A9,A11 START OF COMMON DEF. BLOCK 6 P ADKL A9,SDCFST NUMBER OF COMMON TERMINAL CLASSES < & P CALL GETCTC GET NUMBER OF C.T.C. v , P LDR A1,A1 ANY COMMON TERMINAL CLASSES? PB:CT40 RF(Z) B:CT50 NO! P ST A1,SAVE15,A13 SAVE
0x2ce3e8…2ce57c Dummy {f00=0x00e2, f01=0x0190, f02=»A1 SAVE , P LD A2,SAVE14,A13 GET CLASS IDENT NUMBER & P ADR A2,A2 CONVERT TO DISPLACEMENT @ , P LD A7,SAVE18,A13 GET POINTER TO TCLASS j & P ADR A7,A2 SELECT ENTRY IN TCLASS $ P LDR* A7,A7 GET POINTER TO CLASS . P CALL DWTGEN GENERATE DWT:S
0x2ce57c…2ce710 Dummy {f00=0x00e2, f01=0x0190, f02=»T COUNTER ~ P RB B:CT40 . PB:CT50 ADKL A10,2 NEXT FREE ENTRY IN CDTAB $ P EJECT V * d , '* GET NUMBER OF SPECIAL DEVICE CLASSES n * CALL GETSDC ADKL A9,SDCFST-CDBNC P LDR A8,A1 PCDG:20 EQU * P RF(NP)
0x2ce710…2ce8a4 Dummy {f00=0x00e2, f01=0x0190, f02=»ASS IN SCLASS r * ADR A1,A1 T , P LD A6,SAVE11,A13 GET POINTER TO SCLASS 6 PCDG:25 EQU * f P ADR A6,A1 SELECT CLASS z & P LDR* A5,A6 SAVE POINTER TO CLASS $ P LDR* A6,A6 GET POINTER TO CLASS $ P LDR* A6,A6 GET LENGTH OF CL
0x2ce8a4…2cea38 Dummy {f00=0x00e2, f01=0x0190, f02=» LD A3,DWTLEN,A1 GENERATION OF DWT? RF(Z) CDG:40 NO , * D * COPY DWT N * b LDR A2,A12 TO-ADDRESS l , ' ADR A12,A3 UPDATE POINTER TO FREE AREA CALL MOVE COPY DWT P* 4 P* RELOCATE MONITOR ECB ADDRESS IF MMU I
0x2cea38…2cebcc Dummy {f00=0x00e2, f01=0x0190, f02=» PROTOTYPE DWT-ADDRESS * P SUR A3,A2 COMPUTE RELOCATION CONSTANT , P LD A4,DWTMEC,A2 GET MONITOR ECB-ADDRESS L P ANKL A4,/FFFE MAKE IT EVEN! | P SUR A4,A3 RELOCATE " P ST A4,DWTMEC,A2 STORE IT BACK PCDG:35 EQU * " LDR A1,A2 DWT-ADD
0x2cebcc…2ced60 Dummy {f00=0x00e2, f01=0x0190, f02=»RESS v LD A1,-2,A5 GET FILE CODE STR A1,A10 STORE IN TTAB . $ ADKL A10,4 NEXT ENTRY IN CD:TAB P & " SUK A6,4 DECREMENT DEVICE COUNTER x RB(P) CDG:30 NEXT DEVICE P EJECT * , (* CHECK IF MOORE SPECIAL DEVICE CLASSES
0x2ced60…2ceef4 (2, 149) Dummy {f00=0x00e2, f01=0x0190, f02=»CTDMT DATA MANAGEMENT $ P LD A5,SCTDCT DATA COMMUNICATION P ORR A1,A5 DM OR DC? F " P LD A5,SCTOPT GET OPTION WORD b $ P ANK A5,/A DISC PAGING OR SWB:S? , P ORR A1,A5 COPY LAST SCLASS IF NOT ZERO P RF(Z) CDG:EX NO! , P LD A5,SAVE11,
0x2ceef4…2cf088 Dummy {f00=0x00e2, f01=0x0190, f02=»Y x * P LDR* A5,A5 GET POINTER TO LAST CLASS ( P LDR* A6,A5 GET LENGTH OF LAST CLASS 8 " P SUK A6,2 EXCLUDE LENGTH WORD d P RB CDG:30 PCDG:EX EQU * P LD A2,SCTSFA P SUK A2,2 PCDG:50 ADK A2,2 P CW A2,SCTEFA P R
0x2cf088…2cf21c Dummy {f00=0x00e2, f01=0x0190, f02=»T A12,SCTSFA UPDATE START OF FREE AREA RTN A14 RETURN . EJECT F J F********************************************************************** T H C* DWTGEN - GENERATE DEVICE WORK TABLES FOR A TERMINAL DEVICE CLASS J F**************************
0x2cf21c…2cf3b0 Dummy {f00=0x00e2, f01=0x0190, f02=»INTER TO TERMINAL DEVICE CLASS IN TCLASS ~ * &* A6 - LINE CONNECTION NUMBER 0 * ^ * EXIT: h * x * WORK REGISTERS: A1-A8 * * SUBROUTINES: I:CHP,MOVE * EJECT PDWTGEN EQU * 2 P ST A6,SAVE08,
0x2cf3b0…2cf544 Dummy {f00=0x00e2, f01=0x0190, f02=»RST FILECODE PDWT10 EQU * . ) LD A1,2,A7 GET ADDRESS OF PROTOTYPE DWT ( * Z 4 /* DERIVE CONTENT OF CHANNEL PARAMETER AND ALSO d 8 4* THE ENTRY TO BE USED IN TEMPORARY INTERRUPT TABLE 4 0* FROM LINE CONNECTION NUMBER AND PROTOTYPE DWT
0x2cf544…2cf6d8 Dummy {f00=0x00e2, f01=0x0190, f02=»TS ENTRY) | * 0 P* SAVE05 HOLDS 2*(NUMBER STORED IN BIS 4-6) 4 P* SAVE06 HOLDS THE NUMBER STORED IN BITS 12-15 P * %* OF THE GENERATED CHANNEL PARAMETER 2 P LD A4,SAVE05,A13 GET SAVED NUMBER IN BITS 4-6 , P LD A3,SCTSFA+2 FIRST INT TA
0x2cf6d8…2cf86c Dummy {f00=0x00e2, f01=0x0190, f02=»AMETER v PDWT15 EQU * " RF(Z) DWT17 LINE ENTRY FOUND * ADK A4,28 NEXT LINE P & " SUK A3,1 DECREMENT LINE PARAMETER l RB DWT15 EJECT PDWT17 EQU * 6 P ST A4,SAVE07,A13 SAVE INTERRUPT TABLE LINE ENTRY *
0x2cf86c…2cfa00 Dummy {f00=0x00e2, f01=0x0190, f02=» DEVICE ADDRESSES 8-14 FOR OUTPUT DEVICES * 2 0 + LDR* A6,A1 GET FIRST WORD OF PROTOTYPE DWT < P LDR A2,A6 SAVE p : 5 ANKL A6,/7100 GET DEVICE ADDRESS AND DEVICE TYPE BIT $ SLC A6,7 CHECK IF INPUT DEVICE P RF(N) DWT20 YES! P
0x2cfa00…2cfb94 (2, 150) Dummy {f00=0x00e2, f01=0x0190, f02=»WT20 NO! P SRL A6,2 P ADK A6,12 " RF DWT30 4 PDWT20 EQU * F P SRL A6,2 Z P SUK A6,2 l PDWT30 EQU * ~ ANK A6,/1E * 2 .* CHECK IF DWT ALREADY GENERATED ON THIS LINE * ADR A6,A4 TABLE ENTRY
0x2cfb94…2cfd28 Dummy {f00=0x00e2, f01=0x0190, f02=»T A2,DWTECH,A5 STORE REAL ECHODEVICE-DWTADDRESS , P CM DWTECB,A1 RESET POINTER TO INPUT-DWT 8 P RF DWT70 h P EJECT z P* P* CHECK IF DWT IN DRIVER P* PDWT32 LDKL A2,SYSLOD P TNM A1,A2 P RF(NN) DWT34 P CWR A
0x2cfd28…2cfebc Dummy {f00=0x00e2, f01=0x0190, f02=»T70 PDWT38 EQU * STR A12,A6 SAVE DWT-ADDRESS * D * COPY DEVICE TYPE DWT N * n LDR A2,A12 TO-ADDRESS x P LD A3,DWTOR,A1 LENGTH ADR A12,A3 NEXT FREE ENTRY CALL MOVE P EJECT * $ * A1
0x2cfebc…2d0050 Dummy {f00=0x00e2, f01=0x0190, f02=»HECK IF INPUT DEVICE * * & LDR* A3,A1 GET FIRST WORD OF TYPE DWT & ANKL A3,/0100 INPUT DEVICE? T RF(Z) DWT50 NO x * * INPUT DEVICE: * CHECK IF KEYBOARD * LD A3,DWTADR,A1 LD A3,DEVIND,A3
0x2d0050…2d01e4 Dummy {f00=0x00e2, f01=0x0190, f02=»F KEYBOARD DWT IN THIRD WORD ~ . )* OF PROTOTYPE DWT OF OUTPUT ECHO DEVICE $ * V P LD A5,DWTECH,A1 ECHO? ` RF(Z) DWT40 NO ~ 6 P AD A5,M:REL,A13 RELOCATE ECHO DEVICE DWT-ADDRESS & P ST A2,4,A5 SAVE INPUT DWT-ADDRESS P EJECT P
0x2d01e4…2d0378 Dummy {f00=0x00e2, f01=0x0190, f02=»,DWTSQ DISPLACEMENT TO START OF BUFFER $ ST A5,DWTSQ-4,A2 STORE POINTER . $ ST A5,DWTSQ-2,A2 STORE POINTER V * ~ * IF DOUBLE KEYBOARD: D @* ADD 1 TO DWT-ADDRESS AND SAVE IT IN TEMPORARY INTERRUPT TABLE 6 2* IN ENTRY CORRESPONDING
0x2d0378…2d050c Dummy {f00=0x00e2, f01=0x0190, f02=» DWT60 NOT DOUBLE KEYBOARD $ LDR A5,A2 GET REAL DWT-ADDRESS " ADK A5,1 ADD ONE J 0 , SUK A3,1 DISPLACEMENT=0 IF DEVICE ADDRESS=1 d ADR A3,A3 BYTE DISPLACEMENT . P AD A3,SAVE07,A13 ENTRY IN INTERRUPT TABLE $ STR A5,A3 STORE DEVICE-AD
0x2d050c…2d06a0 Dummy {f00=0x00e2, f01=0x0190, f02=» GET CORRESPONDING INPUT DWT-ADDRESS FROM THIRD WORD * IN THE DWT. < 8 3* SAVE ADDRESS OF THIS DWT IN WORD 18 OF INPUT DWT R $ * AND CLEAR WORD 3 OF THIS DWT. * 0 P LD A5,DWTECB,A2 GET THIRD WORD IN REAL DWT ( # RF(Z) DWT60 NOT ECH
0x2d06a0…2d0834 (2, 151) Dummy {f00=0x00e2, f01=0x0190, f02=»DWT60 EQU * * * CHECK IF PAGING * 8 " P LD A5,SCTOPT GET OPTION WORD B P ANK A5,1 MMU PAGING? h RF(Z) DWT70 P EJECT , P LD A5,DWTMEC,A2 GET MONITOR ECB ADDRESS ( P LDR A4,A1 GET PROTOTYPE DWT-ADDRESS * P SUR
0x2d0834…2d09c8 Dummy {f00=0x00e2, f01=0x0190, f02=»,DWTMEC,A2 STORE IT BACK * < P* PAGING: CHECK IF INTERNAL BUFFER SHOULD BE ALLOCATED * P* j & P LD A5,DWTADR,A2 GET ADDRESS BLOCK t 2 P LD A4,BUFLEN,A5 GET LENGTH OF INTERNAL BUFFER $ P RF(Z) DWT70 ALLOCATE NO BUFFER! * L P*
0x2d09c8…2d0b5c Dummy {f00=0x00e2, f01=0x0190, f02=» LDR A3,A12 INTERNAL BUFFER ADDRESS ADK A3,1 , , ( ANKL A3,/FFFE MAKE SURE OF EVEN ADDRESS @ P ST A3,2,A5 SAVE p P LDR A3,A4 GET LENGTH & P ADK A3,3 ADD BO FERMS CONSTANT+1 $ P ANKL A3,/FFFE MAKE LENGTH EVEN P EJECT
0x2d0b5c…2d0cf0 Dummy {f00=0x00e2, f01=0x018e, f02=»AN STORE THE ADDRESS AND SIZE OF THE , P* INTERNAL BUFFER IN SYSBUF AND BUFSIZ. , * CW A3,BUFSIZ,A13 f RF(NG) DWT65 ST A3,BUFSIZ,A13 P ST A12,SYSBUF,A13 PDWT65 EQU * ADR A12,A3 NEXT FREE ENTRY P EJE
0x2d0cf0…2d0e84 Dummy {f00=0x00e2, f01=0x0190, f02=» " P LDR* A5,A7 GET INDEX/FILECODE * P STR A5,A10 STORE IN TASK CONF. TABLE * " P ADKL A10,2 NEXT ENTRY IN TTAB X " P STR A2,A10 STORE DWT-ADDRESS ~ P* , '* CHECK IF MOORE DEVICES IN THIS CLASS * SUKL A8,4 RF(Z) DWTEX
0x2d0e84…2d1018 Dummy {f00=0x00e2, f01=0x0190, f02=»DWTEX EQU * RTN A14 RETURN EJECT , * %************************************* : * %* I:CHP - INIT CHANNEL PARAMETER * h * %************************************* * * REFERENCED IN: DWTGEN * , (* ENTRY: A1 -
0x2d1018…2d11ac Dummy {f00=0x00e2, f01=0x0190, f02=»- POINTER TO TDC RECORD * & !* EXIT: A5 - CHANNEL PARAMETER * @ P* SAVE05 - SELECTS INTERRUPT TABLE (INTLT1-INTRT4) T 0 P* SAVE06 - SELECTS LINE ENTRY (1-8) * * WORK REGISTERS: A3,A4,A5 * * S
0x2d11ac…2d1340 Dummy {f00=0x00e2, f01=0x018e, f02=»E CONNECTION NUMBER | 0 + LDR* A5,A1 GET FIRST WOED OF PROTOTYPE DWT ( # ANKL A5,/F1F0 CLEAR BITS TO MODIFY P 2 . LDR A3,A6 GET MODIFIED LINE CONNECTION NUMBER | & " LC A4,TDC+5,A9 CHECK TYPE OF LINE CCK A4,'LL' LOCAL LINE? RF(NE) I:CH
0x2d1340…2d14d4 (2, 152) Dummy {f00=0x00e3, f01=0x0190, f02=» & " ORR A5,A3 MERGE WITH OLD CONTENTS * % LDR A3,A6 GET LINE CONNECTION NUMBER . ANK A3,/18 GET BITS 11-12 SRL A3,2 MOVE TO BITS 13-14 ~ P ST A3,SAVE05,A13 SAVE SRL A3,1 MOVE TO BITS 14-15 & " ORR A5,A3 MERGE WITH OLD CONTENTS
0x2d14d4…2d1668 Dummy {f00=0x00e3, f01=0x0190, f02=»NZ) I:CH10 0 , ANKL A5,/F1FF CLEAR BITS 4-6 (= STORE ZERO) * P ST A3,SAVE06,A13 SAVE ENTRY SELECTOR F RF I:CH50 t PI:CH10 EQU * ANK A3,2 GET BIT 14 RF(NZ) I:CH20 & " ORKL A5,/0800 STORE 4 IN BITS 4-6 LDK A3,4 ENTRY SE
0x2d1668…2d17fc Dummy {f00=0x00e3, f01=0x018e, f02=»T 15 RF(NZ) I:CH30 & " ORKL A5,/0200 STORE 1 IN BITS 4-6 " LDK A3,1 ENTRY SELECTOR L P ST A3,SAVE06,A13 SAVE l RF I:CH50 PI:CH30 EQU * & " ORKL A5,/0A00 STORE 5 IN BITS 4-6 LDK A3,5 ENTRY SELECTOR P ST A3,SAVE06,
0x2d17fc…2d1990 Dummy {f00=0x00e3, f01=0x0190, f02=» . * SUK A3,2 DECREMENT LINE CONNECTION NUMBER RF(N) I:CH70 6 & " ADK A4,1 INCREMENT TABLE SELECTOR L RB I:CH60 v PI:CH70 EQU * ( $ ORR A5,A4 STORE COMPUTED BITS 12-15 SUK A4,4 ANK A4,6 ADK A4,8 P ST A4,SAV
0x2d1990…2d1b24 Dummy {f00=0x00e3, f01=0x0190, f02=»:ITAB - BUILD REAL-TIME INTERRUPT TABLE * 2 .********************************************** 2 * h * REFERENCED IN: DWTGEN r * * &* ENTRY: SCTSFA - START OF FREE AREA * 8 4* EXIT: INTLT1-INTRT4 - REAL TIME INTERRUPT TABL
0x2d1b24…2d1cb8 Dummy {f00=0x00e3, f01=0x0190, f02=» > P* A4 - LENGTH OF LINE SAVE01URATION TABLE * %* A5 - DEVICE COUNTER F ( #* A6 - LINE COUNTER t 2 P* A7 - DISPLACEMENT IN SAVE21 @ ;* A10- ADDRESS TO TEMPORARY INTERR
0x2d1cb8…2d1e4c Dummy {f00=0x00e3, f01=0x0190, f02=»INTERRUPT TABLE f * * SUBROUTINES " * 8 P EJECT B PB:ITAB EQU * P 2 - LD A12,SCTSFA INIT POINTER TO FIRST R. I. T. d P LDR A11,A12 $ LDK A7,0 RESET POINTER IN IABAT PBIT10 EQU * P LDK A1,0 P ST A1,SAVE2
0x2d1e4c…2d1fe0 Dummy {f00=0x00e3, f01=0x0190, f02=»Y INTERRUPT TABLE v * P LD A10,SCTSFA+2 $ ADR A10,A7 < LDR* A10,A10 P & P LDK A6,0 RESET LINE ENTRY POINTER f PBIT20 EQU * * 8 P* SAVE POINTER TO START OF LINE SAVE01URATION TABLE F P* IN TEMPORARY AREA AND RESET
0x2d1fe0…2d2174 (2, 153) Dummy {f00=0x00e3, f01=0x018e, f02=»LENGTH OF LINE CONF.TABLE * " 0 -* INIT POINTER IN TEMPORARY INTERRUPT TABLE , * &* TO POINT AT LAST INPUT DEVICE ENTRY ` * ADKL A10,12 LDK A5,7 ADKL A11,14 P EJECT * < 9* CHECK INPUT PART OF TEMPORA
0x2d2174…2d2308 Dummy {f00=0x00e3, f01=0x0190, f02=» RF(NZ) BIT40 YES PBIT35 EQU * , ( SUK A5,1 NO; CHECK IF LAST DEVICE ENTRY 2 RF(Z) BIT50 YES b * z < 7* NO ENTRIES IN THE INPUT DEVICE PART OF THE TEMPORARY 0 +* INTERRUPT TABLE HAS BEEN OCCUPIED SO FAR * . P SUKL
0x2d2308…2d249c Dummy {f00=0x00e3, f01=0x0190, f02=» ENTRY IN THE TEMPORARY INTERRUPT TABLE HAS OCURRED. D @* COPY THE CONTENTS OF THE INPUT DEVICE PART (INCLUDING ZEROES) < H C* OF THE TEMPORARY INTERRUPT TABLE UP TO AND INCLUDING THIS ENTRY. * PBIT40 EQU * * % STR A1,A11 STORE CONTENT
0x2d249c…2d2630 Dummy {f00=0x00e3, f01=0x0190, f02=» IN T.I.T. z $ SUKL A11,2 NEXT ENTRY IN R.I.T. * & LDR* A1,A10 GET CONTENT OF NEXT ENTRY : RB BIT40 h EJECT z PBIT50 EQU * * B >* ALL ENTRIES OF THE INPUT DEVICE PART IN TEMPORARY INTERRUPT * TABLE HAS BEEN SCANNED.
0x2d2630…2d27c4 Dummy {f00=0x00e3, f01=0x0190, f02=»R. z * ADKL A10,14 LDK A5,7 ( * : L G* SCAN ENTRIES IN OUTPUT DEVICE PART OF THE TEMPORARY INTERRUPT TABLE. D $ * -IF AN OCCUPIED ENTRY OCCUR: L P* FIND FIRST UNOCCUPIED ENTRY (CONTENT=ZERO) IN THE LINE SAVE01URATION
0x2d27c4…2d2958 Dummy {f00=0x00e3, f01=0x0190, f02=» * INCREMENT LENGTH * PBIT70 EQU * * LDR* A1,A10 OCCUPIED ENTRY? > RF(NZ) BIT90 YES b SUK A5,1 LAST ENTRY | RF(Z) BIT120 YES PBIT80 EQU * ADKL A10,2 NEXT ENTRY RB BIT70 PBIT90 EQU *
0x2d2958…2d2aec Dummy {f00=0x00e3, f01=0x0190, f02=»IN LINE SAVE01URATION TABLE d * OF REAL INTERRUPT TABLE. $ * H P LDR* A2,A11 R RF(Z) BIT100 f P ADKL A11,2 | RB BIT90 EJECT PBIT100 EQU * * F P* AN UNOCCUPIED ENTRY HAS BEEN FOUND IN LINE SAVE01URATIO
0x2d2aec…2d2c80 Dummy {f00=0x00e3, f01=0x0190, f02=»CONTENT ~ * P LD A1,SAVE23,A13 GET START OF L.C.T. " LDR A3,A11 GET CURRENT ENTRY > P SUR A3,A1 COMPUTE LENGTH d CWR A3,A4 L.C.T. EXTENDED? RF(NG) BIT110 LDR A4,A3 SAVE NEW LENGTH PBIT110 EQU * SUK A5,1 LAST ENT
0x2d2c80…2d2e14 (2, 154) Dummy {f00=0x00e3, f01=0x0190, f02=»NE J D ?* -IF ANY ENTRY WAS OCCUPIED (LENGTH>0): STORE POINTER TO LINE L P* SAVE01URATION TABLE IN THIS LINE ENTRY AND STORE LENGTH IN FIRST WOR R * " LDR A4,A4 ANY ENTRY OCCUPIED? RF(Z) BIT130 NO , P IM SAVE24,A13 INDICATE DEVICE
0x2d2e14…2d2fa8 Dummy {f00=0x00e3, f01=0x018e, f02=»ST WORD OF L.C.T. r LDR A11,A1 START OF L.C.T. . ) ADR A11,A4 LAST OCCUPIED ENTRY IN L.C.T. > ADKL A11,2 NEXT FREE ENTRY p RF BIT140 EJECT PBIT130 EQU * * * NO DEVICES ON THIS LINE. . P* -NO LINE SAVE01
0x2d2fa8…2d313c Dummy {f00=0x00e3, f01=0x0190, f02=» r PBIT140 EQU * $ ADKL A10,2 NEXT ENTRY IN T.I.T. $ ADK A6,1 INCREMENT LINE COUNTER D CWK A6,8 ALL LINES SCANNED? l RF(E) BIT150 YES ADKL A12,2 NEXT LINE ENTRY P RB BIT20 PBIT150 EQU * P* 6 P* STORE A
0x2d313c…2d32d0 Dummy {f00=0x00e3, f01=0x0190, f02=»NT? n P RF(Z) BIT155 NO! 2 P LD A1,SAVE21,A13 GET INTERRUPT TABLE ADDRESS & P ST A1,INTLT1,A7 SAVE P RF BIT158 z PBIT155 EQU * . P LD A11,SAVE21,A13 GET START OF FREE AREA PBIT158 EQU * * : 6* ALL LINES OF THIS INT
0x2d32d0…2d3464 Dummy {f00=0x00e3, f01=0x0190, f02=»XT ENTRY IN ITAB CWK A7,16 LAST ENTRY? RF(E) BIT160 YES 6 $ LDR A12,A11 GET NEXT FREE ENTRY P RB BIT10 x PBIT160 EQU * * D @* ALL ENTRIES IN THE TEMPORARY INTERRUPT TABLE HAS BEEN SCANNED < 8* AND ALL THE REAL INTE
0x2d3464…2d35f8 Dummy {f00=0x00e3, f01=0x0190, f02=»CTSFA P SUK A2,2 PBIT165 ADK A2,2 * P CW A2,SCTEFA CHECK IF MEMORY OVERFLOW 8 P RF(NE) BIT170 f P LDKL A1,LMP3 | ( P CALL ERROR INDICATE MEMORY OVERFLOW PBIT170 CWR A2,A11 P RB(NE) BIT165 ( P ST A13,SCTEFA SKIP TEMP.
0x2d35f8…2d378c Dummy {f00=0x00e3, f01=0x0190, f02=»*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*= p 6 1* GENERAL SUBROUTINES * 8 T P*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*= r 8 4**************************************
0x2d378c…2d3920 Dummy {f00=0x00e3, f01=0x0190, f02=»ASSES d P* 8 4**************************************************** * T " P* REFERENCED IN: B:TCT,B:CDT ^ * > :* ENTRY: A11 - POINTER TO START OF TASK DEFINITION BLOCK * F A* EXIT: A1 - NUMBER OF TASKS IN THE TASK C
0x2d3920…2d3ab4 (2, 155) Dummy {f00=0x00e3, f01=0x0190, f02=» PGETCTC EQU * P LC A5,TDBNT,A11 SLL A5,8 0 P LC A5,TDBNT+1,A11 B CALL CONVRT RTN A14 p EJECT 8 4**************************************************** 8 4* GETTDC - GET NUMBER OF TERMINAL DEVICE CLASSES * 8 4**
0x2d3ab4…2d3c48 Dummy {f00=0x00e3, f01=0x0190, f02=»O START OF TASK DEFINITION BLOCK v * ( D @* EXIT: A1 - NUMBER OF TERMINAL DEVICE CLASSES (BINRY VALUE) 2 * z * WORK REGISTERS: A5 * * SUBROUTINES: CONVRT * PGETTDC EQU * LC A5,TDBNC,A11 SLL A5,
0x2d3c48…2d3ddc Dummy {f00=0x00e3, f01=0x018e, f02=»* ^ 8 3* GETSDC - GET NUMBER OF SPECIAL DEVICE CLASSES * 8 3*************************************************** F * * REFERENCED IN: B:TT * 4 /* ENTRY: A9 - POINTER TO NUMBER OF SDC RECORD * D ?* EXIT: A1 -
0x2d3ddc…2d3f70 Dummy {f00=0x00e3, f01=0x0190, f02=» * PGETSDC EQU * LCR A5,A9 " P SLL A5,8 4 LC A5,1,A9 F CALL CONVRT Z RTN A14 n EJECT ~ 2 .********************************************** 2 .* GETCLN - GET CLASS IDENTIFICATION NUMBER * 2 .****************
0x2d3f70…2d4104 Dummy {f00=0x00e3, f01=0x0190, f02=»CORD b * > :* EXIT: A1 - CLASS IDENTIFICATION NUMBER (BINARY VALUE) * X * WORK REGISTERS: A5 b * * SUBROUTINES: CONVRT * PGETCLN EQU * P LC A5,TDCDD1,A9 P SLL A5,8 P LC A5,TDCDD2,A9
0x2d4104…2d4298 Dummy {f00=0x00e3, f01=0x0190, f02=»CTION NUMBER * v . )***************************************** * J * REFERENCED IN: B:DWTT T * v 8 3* ENTRY: A9 - POINTER TO CLASS DEFINITION RECORD * : 5* EXIT: A1 - LINE CONNECTION NUMBER (BINARY VALUE) *
0x2d4298…2d442c Dummy {f00=0x00e3, f01=0x0190, f02=» A5,8 P LC A5,LCND2,A9 P CALL CONVRT & RTN A14 : P IFT CREDIT=1 J P EJECT ` : P***************************************************** n : P* * : P* GETTCL - GET TASK CLASS TO
0x2d442c…2d45c0 Dummy {f00=0x00e3, f01=0x0190, f02=» * f : P* REFERENCED IN: B:TT * : P* * R : P* ENTRY: A5 - TCL IN CURRENT TASK DEF. BLOCK * : P* *
0x2d45c0…2d4754 (2, 156) Dummy {f00=0x00e4, f01=0x0190, f02=»REGISTERS: A1-A7,A10 * : P* * 6 : P* SUBROUTINES: GETTSK,NXTBLK * t : P* * : P************************
0x2d4754…2d48e8 Dummy {f00=0x00e4, f01=0x0190, f02=»,A11 SAVE POINTER TO CURRENT TASK DEF. BLOCK 2 P LD A11,SAVE01,A13 START OF CONFIGURATION DATA 4 4 PTCL:10 CWR A11,A10 ALL PREVIOUS BLOCKS SCANNED? j P RF(E) TCL:60 YES! . P LC A5,TDBMC+4,A11 GET FIRST CHAR. IN TCL P SLL A5,8 MOVE TO LEFT BYT
0x2d48e8…2d4a7c Dummy {f00=0x00e4, f01=0x0190, f02=»R OF COPIES z P ADR A7,A1 INCREMENT TCL 0 PTCL:50 CALL NXTBLK GET NEXT TASK DEF. BLOCK 4 P RB TCL:10 h , PTCL:60 LDR A5,A7 SAVE START VALUE OF TCL z P RTN A14 P XIF EJECT B >****************************************************
0x2d4a7c…2d4c10 Dummy {f00=0x00e4, f01=0x018e, f02=»ONVERTED * j * " B >************************************************************** , * r * REFERENCED IN: B:DWTT | * , (* ENTRY: A1 - BINARY NUMBER TO CONVERT * 0 ,* EXIT: A5 - TWO-DIGIT ASCII-CODED
0x2d4c10…2d4da4 Dummy {f00=0x00e4, f01=0x0190, f02=» P SLL A5,8 P LCK A5,'00' LDK A2,0 * LDR A1,A1 < PBIN:20 EQU * N RF(Z) BINEX b ADK A2,1 v CWK A2,10 RF(E) BIN:30 SUK A1,1 RB BIN:20 PBIN:30 EQU * ADKL A5,/0100 LDK A2,0
0x2d4da4…2d4f38 Dummy {f00=0x00e4, f01=0x018e, f02=»***************** x . )* GETCON - GET CONTENT IN MEMORY WORD * . )***************************************** L * ~ * REFERENCED IN: SEGGEN * " * ENTRY: A2 - MEMORY ADDRESS . )* MMUOPT - MMU OPTION SWITCH (X)
0x2d4f38…2d50cc Dummy {f00=0x00e4, f01=0x0190, f02=» PGETCON EQU * " P LD A1,SCTOPT GET OPTION WORD P ANK A1,1 MMU OPTION B P RF(Z) GCON10 NO MMU ^ ELR A1,A2 z P RF GCON20 PGCON10 EQU * LDR* A1,A2 PGCON20 EQU * RTN A14 RETURN P EJECT PCONMON E
0x2d50cc…2d5260 Dummy {f00=0x00e4, f01=0x0190, f02=» * D P**************************************************************** " P CALL B:TCT BUILD TASK TABLES 2 P CALL B:DMTT BUILD DATA MANAGEMENT TASK TABLES & P CALL B:TT BUILD USER TASK TABLES P IFT CREDIT=1 $ P CALL SEGGEN BUI
0x2d5260…2d53f4 (2, 157) Dummy {f00=0x00e4, f01=0x0190, f02=»MONBLK GENERATE MONITOR BLOCKS 2 P CALL B:DWTS BUILD SPECIAL DEVICE WORK TABLES & 2 P CALL B:DWTT BUILD TERMINAL DEVICE WORK TABLES * P CALL B:CDT BUILD COMMON DEVICE TABLES & P CALL B:ITAB BUILD INTERRUPT TABLE P IFT CREDIT=1 P EJECT
0x2d53f4…2d5588 Dummy {f00=0x00e4, f01=0x0190, f02=»1,'CR' P RF(NE) SLDM70 P* $ : P* STORE OPTION WORD (SCTOPT) IN USER AREA (P:MTAB+34) . P* l " P LD A1,SCTOPT GET OPTION WORD v P ANK A1,1 MMU OPTION? P RF(Z) SLDM50 ( P EL* A1,SCTLAC GET ADDRESS TO P:MTAB " P LD A2,SCTOP
0x2d5588…2d571c Dummy {f00=0x00e4, f01=0x0190, f02=»D A2,SCTOPT GET OPTION WORD $ P ST A2,34,A1 STORE IN USER AREA $ PSLDM70 EQU * L P XIF ` P EJECT l F P***************************************************************** z F P* END OF MONITOR SAVE01URATION PART *
0x2d571c…2d58b0 Dummy {f00=0x00e4, f01=0x40c2, f02=»********* X P LDKL A8,/FFFF * P ST A8,SCTEFA MODIFY END OF FREE AREA ( P LDR A8,A13 GET BASE-ADDRESS V $ P ADKL A8,SYSLDA START OF SYSLODA z P ABR A8 P END @ P* END OF MONITOR SAVE01URATION PART *
0x2d58b0…2d5a44 Dummy {f00=0x00e4, f01=0x403c, f02=» 0 P******************************************** @ 8 END OF FREE AREA ( P LDR A8,A13 GET BASE-ADDRESS V $ P ADKL A8,SYSLDA START OF SYSLODA z P ABR A8 P END @ P* END OF MONITOR SAVE01URATION PART *
0x2d5a44…2d5bd8 Dummy {f00=0x00e4, f01=0x2008, f02=» P X ` h p
0x2d5bd8…2d5d6c Dummy {f00=0x00e4, f01=0x0190, f02=» 0 7 > E L { ~ * & ) T d m v | * & G | J * & e $ | x * & ! * | * & 5 @ K V a l w | * &
0x2d5d6c…2d5f00 Dummy {f00=0x00e4, f01=0x4088, f02=» C ^ E J J 0 O z [ a $ | 7 @ @ @ } * G Z } J K v 0 } ^ N } r@ } $ | x * & ! * | * & 5 @ K V a l w | * &
0x2d5f00…2d6094 (2, 158) Opaque[0x194]
0x2d6094…2d6228 # DirEnt {nam=»SYSLDA«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c90, f03=0x0000}
0x2d6094…2d6228 IdxSect {
0x2d6094…2d6228 f00 = 0x00e4 // 0x2d6094 @0x0
0x2d6094…2d6228 f01 = 0x0054 // 0x2d6096 @0x2
0x2d6094…2d6228 gno = [ // 0x2d6098 @0x4
0x2d6094…2d6228 [0x00]: C0x00e4.0x2.0
0x2d6094…2d6228 [0x01]: C0x00e4.0x3.0
0x2d6094…2d6228 [0x02]: C0x00e5.0x0.0
0x2d6094…2d6228 [0x03]: C0x00e5.0x1.0
0x2d6094…2d6228 [0x04]: C0x00e5.0x2.0
0x2d6094…2d6228 [0x05]: C0x00e5.0x3.0
0x2d6094…2d6228 [0x06]: C0x00e6.0x0.0
0x2d6094…2d6228 [0x07]: C0x00e6.0x1.0
0x2d6094…2d6228 [0x08]: C0x00e6.0x2.0
0x2d6094…2d6228 [0x09]: C0x00e6.0x3.0
0x2d6094…2d6228 [0x0a]: C0x00e7.0x0.0
0x2d6094…2d6228 [0x0b]: C0x00e7.0x1.0
0x2d6094…2d6228 [0x0c]: C0x00e7.0x2.0
0x2d6094…2d6228 [0x0d]: C0x00e7.0x3.0
0x2d6094…2d6228 [0x0e]: C0x00e8.0x0.0
0x2d6094…2d6228 [0x0f]: C0x00e8.0x1.0
0x2d6094…2d6228 [0x10]: C0x00e8.0x2.0
0x2d6094…2d6228 [0x11]: C0x00e8.0x3.0
0x2d6094…2d6228 [0x12]: C0x00e9.0x0.0
0x2d6094…2d6228 [0x13]: C0x00e9.0x1.0
0x2d6094…2d6228 [0x14]: C0x00e9.0x2.0
0x2d6094…2d6228 [0x15]: C0x00e9.0x3.0
0x2d6094…2d6228 [0x16]: C0x00ea.0x0.0
0x2d6094…2d6228 [0x17]: C0x00ea.0x1.0
0x2d6094…2d6228 [0x18]: C0x00ea.0x2.0
0x2d6094…2d6228 [0x19]: C0x00ea.0x3.0
0x2d6094…2d6228 [0x1a]: C0x00eb.0x0.0
0x2d6094…2d6228 [0x1b]: C0x00eb.0x1.0
0x2d6094…2d6228 [0x1c]: C0x00eb.0x2.0
0x2d6094…2d6228 [0x1d]: C0x00eb.0x3.0
0x2d6094…2d6228 [0x1e]: C0x00ec.0x0.0
0x2d6094…2d6228 [0x1f]: C0x00ec.0x1.0
0x2d6094…2d6228 [0x20]: C0x00ec.0x2.0
0x2d6094…2d6228 [0x21]: C0x00ec.0x3.0
0x2d6094…2d6228 [0x22]: C0x00ed.0x0.0
0x2d6094…2d6228 [0x23]: C0x00ed.0x1.0
0x2d6094…2d6228 [0x24]: C0x00ed.0x2.0
0x2d6094…2d6228 [0x25]: C0x00ed.0x3.0
0x2d6094…2d6228 [0x26]: C0x00ee.0x0.0
0x2d6094…2d6228 [0x27]: C0x00ee.0x1.0
0x2d6094…2d6228 [0x28]: C0x00ee.0x2.0
0x2d6094…2d6228 [0x29]: C0x00ee.0x3.0
0x2d6094…2d6228 ]
0x2d6094…2d6228 }
0x2d6228…2d63bc Dummy {f00=0x00e4, f01=0x0190, f02=» 2 P IDENT SYSLDA REL 9.2 79-12-21 870105040920 P : ( P =5,MOVING AREAS>32K DOES NOT WORK B P REL 9.2 79-12-21 ST n . P =4, FAULTY STACK BASE & CWB/UWB BLOCKS P REL 9.1 79-07-17 , P =3, IMPOSSIBLE TO LOAD NON MMU SYSTEM
0x2d63bc…2d6550 Dummy {f00=0x00e4, f01=0x0190, f02=»ILIPS TERMINAL SYSTEM PTS P* " > P* SYSLDA = SYSTEM LOAD - APPLICATION CONFIGURATION PART , P* n P* x P* P* P* P* > P********************************************************** P* P* F P* THIS
0x2d6550…2d66e4 Dummy {f00=0x00e4, f01=0x0190, f02=»* ENTERED AFTER MONITOR CONFIGURATION (PERFORMED BY SYSLDM), AND H P* IS AT THAT TIME LOCATED AT HIGHEST FREE ADDRESS OF SYSTEM AREA. J P* P* ASSEMBLER APPLICATION: J P* NO CONFIGURATION WILL TAKE PLACE. FIRST USER TASK IS ACTIVATED
0x2d66e4…2d6878 Dummy {f00=0x00e4, f01=0x0190, f02=»CREDIT APPLICATION: F P* SYSLDA READS CONFIGURATION FILE (ALREADY IN CORE) AND BUILD B P* SHADOW-TABLES (TABLES CONTAINING NUMBER OF REAL TASKS & f . P* NUMBER OF USER WORK-BLOCK COPIES). H P* SYSLDA THEN MOVES ITSELF TO FOLLOW
0x2d6878…2d6a0c Dummy {f00=0x00e4, f01=0x0190, f02=»STACK AND TABLES ARE NOW d H P* BUILT FROM 'BOTTOM' (HIGHEST FREE ADDRESS) OF MEMORY. BUFFERS H P* ARE, IN CASE OF MMU IN SYSTEM, ALSO ALLOCATED AT 'BOTTOM' OF l H P* MEMORY; ELSE, IF NO MMU, BUFFERS ARE ALLOCATED AFTER MONITOR P*
0x2d6a0c…2d6ba0 Dummy {f00=0x00e4, f01=0x0190, f02=»'S ARE FILLED. A BRANCH IS FINALLY MADE TO x . P* P F I N I T TO START APPLICATION. 2 P EJECT d P r P*************************** ~ P* * P* ENTRIES AND EXTERNALS * P* *
0x2d6ba0…2d6d34 (2, 159) Dummy {f00=0x00e4, f01=0x018e, f02=»LDA P ENTRY REL START OF CODE P ENTRY LDALEN PROGRAM LENGTH , P P P* SUBROUTINE ENTRIES X P ENTRY MOVE t P ENTRY ERROR $ P ENTRY CMPADR COMPARE ADDRESSES 2 P ENTRY NXTBLK SKIP TO NEXT CONFIGURATION BLOCK 4 P ENTRY NXTCOM
0x2d6d34…2d6ec8 Dummy {f00=0x00e4, f01=0x0190, f02=» ` P P* SAVE AND WORK AREA ENTRIES " P ENTRY MMTAB WORK-TABLE 1 (MMU 4 6 P ENTRY TABBE ABSOLUTE START ADDRESS OF WORK-TAB 1 Z 4 P ENTRY MMEND ABSOLUTE END ADDRESS OF WORK-TAB 1 2 P ENTRY MMDDIV WORK-TABLE 2 (MM) RELATIVE 'REL' , P ENTRY
0x2d6ec8…2d705c Dummy {f00=0x00e4, f01=0x0190, f02=»!!! d & P ENTRY SAVE01,SAVE12,SAVE03,SAVE04 & P ENTRY SAVE05,SAVE06,SAVE07,SAVE08 6 & P ENTRY SAVE09,SAVE10,SAVE11,SAVE02 ` & P ENTRY SAVE13,SAVE14,SAVE15,SAVE16 & P ENTRY SAVE17,SAVE18,SAVE19,SAVE20 . P ENTRY SAVE21,SAVE22,SAVE23,SAVE24,SAVE25
0x2d705c…2d71f0 Dummy {f00=0x00e4, f01=0x0190, f02=»RESS TO COMMON PART v P EXTRN SCTTCT TC:TAB ADDRESS P EXTRN SCTSTB A15 STACK-BASE @ " P EXTRN SCTEFA END OF FREE AREA d $ P EXTRN SCTNOS NUMBER OF SEGMENTS " P EXTRN SCTNOP NUMBER OF PAGES P EXTRN SCTPSZ PAGE SIZE P EXTRN SCTMMC =
0x2d71f0…2d7384 Dummy {f00=0x00e4, f01=0x0190, f02=»XTRN SCTSWB ADDRESS TO SWB CONTROL BLOCK TABLE P EXTRN SCTBUG BUGGER ADDRESS 6 P Z P* EXTERNAL LABELS b 6 P EXTRN SYSLDM START OF MONITOR CONFIGURATION PART | $ P EXTRN PAGQUE PAGE QUEUE POINTER P P* EXTERNAL SUBROUTINES P EXT
0x2d7384…2d7518 Dummy {f00=0x00e4, f01=0x0190, f02=»TCHER ENTRY ~ P P* , P EXTRN TTB:SA START OF SAVE AREA IN TTAB & P EJECT V P d P l , P*************************************** t , P* CONDITIONAL ASSEMBLY * , P*************************************** P
0x2d7518…2d76ac Dummy {f00=0x00e4, f01=0x0190, f02=»MMUSWB EQU MMUPAG+SWPBLK P PSWBMMU EQU SWPBLK-MMUPAG ( P EJECT H P V P PROGRAM STRUCTURE: ^ P | F P* ------------------------------------------------------- L P* ! RELOCATION ROUTINE
0x2d76ac…2d7840 Dummy {f00=0x00e4, f01=0x0190, f02=»-------------------------! h F P* ! SAVE & COMMUNICATION AREA. MMU - WORK TABLES ! " F P* !-----------------------------------------------------! l F P* ! SUBROUTINES. -COMMON TO ALL PARTS IN PROGRAM. ! F P*
0x2d7840…2d79d4 (2, 160) Dummy {f00=0x00e5, f01=0x0190, f02=»T 2.B J F P* ! BUILD REAL TASK-LOCAL DATA AREAS ! F P* ! -QUEUE TASK VIA 'ACTOT' ! X F P* ! -FILL MM-TABLE IN TTAB ! F P* ! -COPY T:A'S AC
0x2d79d4…2d7b68 Dummy {f00=0x00e5, f01=0x0190, f02=»LLOCATE FIXED BUFFERS AND STACK ! F P* ! -UPDATE TID IN T:A AND SAVE TID IN T:AID TABLE ! : F P* ! -START DEBUGGER (IF ANY) AND START APPLICATION ! F P* !----------------------------------------------
0x2d7b68…2d7cfc Dummy {f00=0x00e5, f01=0x0190, f02=»O FOLLOW SYSLDA ! l F P* ! ! & F P* ! C O M D A T ! p F P* ! GENERATE COMMON DATA AREA. PROCESS CWB'S & UWB'S. ! F P*
0x2d7cfc…2d7e90 Dummy {f00=0x00e5, f01=0x0190, f02=» N F P* ! ! F P* ! C L A D A T ! R F P* ! BUILD TASK CLASS DATA AREAS. PROCESS CWB'S, UWB'S ! F P* ! AND DWB'S.
0x2d7e90…2d8024 Dummy {f00=0x00e5, f01=0x0190, f02=»D ! z F P* ! -MOVE D.T. & W.B., COPY UWB'S ! 4 F P* ! -MOVE D.T.'S OF SWB'S AND TWB'S ! ~ F P* ! -SEARCH DBLK-TAB FOR DWB'S. MOVE D.T. AND UPDATE
0x2d8024…2d81b8 Dummy {f00=0x00e5, f01=0x0190, f02=» ! F P* ! P R O D A T ! F P* ! BUILD PROTOTYPE TASK-LOCAL DATA AREAS. ! ` F P* ! -GENERATE TWB'S AND RESERVE FOR SWB'S ! F P* ! -ALLOC
0x2d81b8…2d834c Dummy {f00=0x00e5, f01=0x0190, f02=» ! -INCLUDE DDIV-PROTOTYPE & PART 2.A IN FREE AREA. ! F P* ! -CONTINUE IN PART 2.B ! B F P* !-----------------------------------------------------! N P* ! SUBROUTINES
0x2d834c…2d84e0 Dummy {f00=0x00e5, f01=0x0190, f02=»ON: ! ASSEMBLER APPLICATION: ! r F P* ! READ CUNFIGURATION FILE ! -FILL MM-TABLES IN ! , F P* ! AND BUILD SHADOW-TABLES. ! USER TASK TTAB'S. ! v F P* ! ! -QUEUE 1:ST USER TASK ! F
0x2d84e0…2d8674 (2, 161) Dummy {f00=0x00e5, f01=0x0190, f02=»-----! T F P* ! REAL TASKS' IS BUILT AT ! F P* ! THE END OF MONITOR. ! X F P* ! U:BTAB: ! F P* ! -A TABLE OF 'N
0x2d8674…2d8808 Dummy {f00=0x00e5, f01=0x0190, f02=» ! F P* ! -RELOCATE ALL W.B.-ADDRESSES IN DDIV-PROTOTYPE. ! : F P* ! -REMOVE NOT USED ENTRIES IN T:ATAB ! F P* ! -RELOCATE ADDRESSES IN U:BTAB
0x2d8808…2d899c Dummy {f00=0x00e5, f01=0x0190, f02=» ! b F P* ! -CONTINUE IN PART 2.A ! F P* !-----------------------------------------------------! f P EJECT P P ***************** P ***************** P **
0x2d899c…2d8b30 Dummy {f00=0x00e5, f01=0x0190, f02=» P********** P* P:MTAB * P********** . PT:ATAB EQU 0 @ PU:BTAB EQU 2 T PP:BAS EQU 6 SEGMENT BASE h . PT:AID EQU 32 ADDRESS TO 'TABLE OF T:A TID' ( PS:BTAB EQU 40 DISP TO S:BTAB ADDRESS P P P********** P
0x2d8b30…2d8cc4 Dummy {f00=0x00e5, f01=0x0190, f02=» 4 PROTOTYPE NAME 8 PUPNUMB EQU 7 SAVE AREA NUMBER OF COPIES (SHADOW-TBL) P* V . PUR:REC EQU 6 RECORD LENGTH IN REAL U:BTAB ` * PURADDR EQU 2 ADDRESS TO FIRST REAL UWB PURNUMB EQU 4 NUMBER OF UWB'S PURLENG EQU 6 LENGTH OF UWB P E
0x2d8cc4…2d8e58 Dummy {f00=0x00e5, f01=0x0190, f02=»*********************** P P* TASK DEFINITION BLOCK: , PTDBBT EQU 0 1A BLOCK TYPE L ( PTDBNT EQU TDBBT+1 2N NUMBER OF TASKS n , PTDBID EQU TDBNT+2 6A TASK ID START VALUE , PTDBMC EQU TDBID+6 6A MATCHING TASK CLASS $ PTDBTL EQU TDBM
0x2d8e58…2d8fec Dummy {f00=0x00e5, f01=0x0190, f02=» $ PTDC EQU 7 TERMINAL DEVICE CLASS PTLC EQU 6 LINE CONNECTION , ( PTDBREC EQU TDC+TLC TDB-RECORD LENGTH N P* z * PSDC EQU 7 SPECIAL DEVICE CLASS-RECORD P* P* COMMON DEVICE DEF. BLOCK: PCDBBT EQU 0 1A BLOCK TYPE 6 PCDBNC
0x2d8fec…2d9180 Dummy {f00=0x00e5, f01=0x018e, f02=»PE DEF. BLOCK | PUDBBT EQU 0 1A BLOCK TYPE , PUDBNU EQU UDBBT+1 3A NUMBER OF UWB TYPES 8 P* h ( PUDBFST EQU UDBNU+3 FIRST UDB-RECORD r PNAMUWB EQU 3 NAME OF UWB " PNUMUBL EQU 3 NUMBER OF BLOCKS . PUDBREC EQU NAMUWB+NUMUBL UDB RECORD-
0x2d9180…2d9314 (2, 162) Dummy {f00=0x00e5, f01=0x0190, f02=» 6 PCSE EQU -14 CURRENT SEGMENT END (HERE: STACKSIZE) $ PCSB EQU -12 CURRENT SEGMENT BASE > 4 PCSN EQU -10 CURRENT SEGMENT NUMBER (HERE LENGTH f 2 P OF ALL DSCB-RECORDS PT:DAD EQU -8 ADDRESS TO T:D * PCIA EQU -6 CURRE
0x2d9314…2d94a8 Dummy {f00=0x00e5, f01=0x0190, f02=»D | PPA EQU 0 STACK POINTER PSTKB EQU 2 STACK BASE ( " PWATFST EQU 4 FIRST WAT-ELEMENT F P* l P* DSCB-RECORD: v PDSCBL EQU 20 RECORD LENGTH PBA EQU 2 BUFFER ADDRESS PRL EQU 4 REQ. LENGTH PEL EQU 6 EFF. LENGTH " PBL
0x2d94a8…2d963c Dummy {f00=0x00e5, f01=0x0190, f02=»0 DISPLACEMENT TO FCB IN T:A , PT:DTID EQU 2 TASK IDENTIFIER (PROTOTYPE) $ , PDATLEN EQU 4 NUMBER OF DATASETS (DSCB'S) T & PWATLEN EQU 6 NUMBER OF WATELEMENTS 0 PTWBMSK EQU 8 MASK FOR TWB'S (ONE BIT/ENTRY) * PSWBMSK EQU 10 MASK FOR SWB'S -"-
0x2d963c…2d97d0 Dummy {f00=0x00e5, f01=0x018e, f02=» l P ! . PSTPREC EQU 4 RECORD LENGTH OF START-POINTS ! P ! B P ! J P**************** ! R P* SOP-HANDLING * ! j P**************** ! PSOP EQU /2E DEVICE ADDRESS ! P ! P LAMP CODE MEANING ! P --------- ------- ! PLMP1 EQU
0x2d97d0…2d9964 Dummy {f00=0x00e5, f01=0x0190, f02=» PLMP5 EQU /40 TID ERROR " " PLMP6 EQU /20 UWB OR SWB ERROR " " " PLMP7 EQU /10 MM-TABLE OVERFLOW " H PLMP8 EQU 8 " n PLMP9 EQU 4 " PLMP10 EQU 2 " PLMP11 EQU 1 " P EJECT " P********************* " P* OTHER CONSTANTS * " P****
0x2d9964…2d9af8 Dummy {f00=0x00e5, f01=0x0190, f02=»QU 4 DISP TO LENGTH OF SWB " P # " $ PFCBDD1 EQU 8 DISP TO FIRST DSET # . $ PFCBDD2 EQU 10 DISP TO 2:ND DSET # V P # ~ $ PSTKSZ EQU 128 DEFAULT STACK-SIZE # P # & PCREID EQU 2 CREDIT IDENTIFICATION # ( PSEGREC EQU 6 RECORD LENGTH IN S:
0x2d9af8…2d9c8c Dummy {f00=0x00e5, f01=0x0190, f02=»D-ADDRESS IN TTAB # x * PTTB:PP EQU 6 SAVE AREA FOR TCL IN TTAB $ P $ H ( PNTPA EQU 4 INTERPRETER START ADDRESS $ P & PIHRTC EQU 4 RTC INTERRUPT ADDRESS $ | $ PRTCDA EQU /1B RTC DEVICE ADDRESS $ P $ F P**********************************************
0x2d9c8c…2d9e20 Dummy {f00=0x00e5, f01=0x0190, f02=» [REL-ADDRESS] * $ n F P* * % ( F P***************************************************************** % r P % P % P % PCALL FORM 16=/F697,16 % P EJECT %
0x2d9e20…2d9fb4 (2, 163) Dummy {f00=0x00e5, f01=0x0190, f02=» ** % 6 P** RELOCATION ROUTINE & STACK INITIALLISATION ** & 6 6 P** ** & p 6 P************************************************** & 6 P************************************
0x2d9fb4…2da148 Dummy {f00=0x00e5, f01=0x0190, f02=» & P* ADJUST FOR PSW-ROUTINE * ' P************************** ' * 6 P LDK A3,GETPSW RELATIVE ADDRESS TO 'PSWSW-ADDRESS' ' L P ADR A3,A13 ABSOLUT DITO ' 4 P ST A3,PSW,A13 STORE ADDRESS TO 'GETPSW'-ROUTINE ' P* LOAD STACKBASE * ' P****************
0x2da148…2da2dc Dummy {f00=0x00e5, f01=0x0190, f02=»*** ' P* ( P RES 12 ( PSTACKB EQU *-REL-2 ( & P EJECT ( @ P ( N P ( Z P* ADDRESS TO PSW-ROUTINE * ( f P************************** ( P* ( PPSW EQU *-REL ( P DATA GETPSW ( P ( D P******************************
0x2da2dc…2da470 Dummy {f00=0x00e5, f01=0x0190, f02=» PUT PSW IN STACK FOR CALLING SUBROUTINE * ( z D P**************************************************************** ) 2 P ) z PGETPSW EQU *-REL ) $ P STR A2,A14 SAVE A2 ON A14-STACK ) 0 P LD A2,2,A14 GET PSW FROM CALLING SUBROUTINE ) . P ST A2,6,A14 R
0x2da470…2da604 Dummy {f00=0x00e5, f01=0x0190, f02=»*** ) r & P* * * & P* SUBROUTINE-HANDLER * * 6 & P* * * ` & P********************************* * P * PSUBSUB EQU *-REL * " PSUBBA ST A10,MUL,A13 SAVE A10 * . P LD* A10,4,A14
0x2da604…2da798 Dummy {f00=0x00e5, f01=0x0190, f02=»N * f P STR A10,A14 PUT ON STACK + P LD A10,MUL,A13 RESTORE A10 + , P ABR* A14 + P P + b P + j P + r < P******************************************************* + z < P* JUMP TO SYSLDM (FROM SYSLOD) ALWAYS VIA THIS MODULE * + < P**************
0x2da798…2da92c Dummy {f00=0x00e5, f01=0x0190, f02=»******** + t ( P** ** , ( P** SAVE, AND COMMUNICATION AREA ** , < ( P** ** , h ( P************************************ , P , * PT:ATOD EQU *-REL T:ATAB 'OLD' ADDRESS , P DATA 0 , *
0x2da92c…2daac0 Dummy {f00=0x00e5, f01=0x0190, f02=»-REL U:BTAB NEW ADDRESS , P DATA 0 - ( PS:BTOD EQU *-REL S:BTAB OLD ADDRESS - 0 P DATA 0 - ( PS:BTNW EQU *-REL S:BTAB NEW ADDRESS - l P DATA 0 - . PMOVADD EQU *-REL ADDRESS-CHANGE AFTER MOVE - P DATA 0 - 4 PMOVED EQU *-REL INDICATOR IF B
0x2daac0…2dac54 (2, 164) Dummy {f00=0x00e6, f01=0x0190, f02=»TADR EQU *-REL LAST ADDRESS WHEN BUILDING DATA PART - P DATA 0 . < @ PFSTADR EQU *-REL FIRST FREE ADDRESS WHEN ALLOCATING BUFFERS . L P DATA 0 . * PNEWAD1 EQU *-REL SAVE FOR W.B. ADDRESS . P DATA 0 . * PNEWAD2 EQU *-REL SAVE FORD.T. ADDRESS .
0x2dac54…2dade8 Dummy {f00=0x00e6, f01=0x0190, f02=»ATA 0 . " PUWB EQU *-REL U.W.B. INDICATOR / P DATA 0 / 4 $ PSAVE01 EQU *-REL TEMPORARY SAVE / D P DATA 0 / l PSAVE02 EQU *-REL / | P DATA 0 / PSAVE03 EQU *-REL / P DATA 0 / PSAVE04 EQU *-REL / P DATA 0 / PSAVE05 EQU *-REL /
0x2dade8…2daf7c Dummy {f00=0x00e6, f01=0x0190, f02=» PSAVE09 EQU *-REL SAVE AREAS 0 P DATA 0 0 ( PSAVE10 EQU *-REL 0 8 P DATA 0 0 P PSAVE11 EQU *-REL 0 ` P DATA 0 0 x PSAVE12 EQU *-REL 0 P DATA 0 0 PSAVE13 EQU *-REL 0 P DATA 0 0 PSAVE22 EQU *-REL 0 P DATA 0 0 PSAVE25 E
0x2daf7c…2db110 Dummy {f00=0x00e6, f01=0x0190, f02=» DATA 0 0 & PBIT EQU *-REL SAVE FOR SUPER-LOOP 1 P DATA 0 1 : 8 PTADISP EQU *-REL DISPLACEMENT IN T:A TO W.B. ADDRESS 1 J P DATA 0 1 * PDATEND EQU *-REL END OF DDIV PROTOTYPE 1 P DATA 0 1 ( PMMREL1 EQU *-REL PHYSICALL PAGE BASE 1 P DATA 0
0x2db110…2db2a4 Dummy {f00=0x00e6, f01=0x0190, f02=» & PBUFSIZ EQU *-REL TEMP. BUFFER SIZE 2 P DATA 0 2 . " PMMTO EQU *-REL MMTABLE ADDRESS 2 > P DATA 0 2 d * PMMFROM EQU *-REL 2:ND MMTABLE ADDRESS 2 t P DATA 0 2 0 PFYSPAG EQU *-REL LAST PHYSICALLY PAGE NUMBER 2 P DATA 0 2 PFSTPAG EQU *-REL 2
0x2db2a4…2db438 Dummy {f00=0x00e6, f01=0x0190, f02=»ATA LDAEND-REL 2 PXMSAV EQU *-REL 3 P DATA 0,0 3 . P 3 @ P 3 H P 3 P P 3 X & P********************************* 3 ` & P* EQUATES FOR SYSLDM SAVE-WORDS * 3 & P********************************* 3 P 3 PSAVE14 EQU U:BTOD 3 PSAVE15 E
0x2db438…2db5cc Dummy {f00=0x00e6, f01=0x0190, f02=»ED 3 PSAVE21 EQU NEWAD1 4 PSAVE23 EQU SWITCH 4 $ PSAVE24 EQU FLAG 4 > P EJECT 4 V P 4 d P* MMU TABLES * 4 l P 4 P 4 . PMMDDIV EQU *-REL DDIV (& SYSLDA) MM-TABLE 4 P IFT MMUPAG=1 4 P RES 16 4 P XIF 4 P 4 $ PMMTAB EQU
0x2db5cc…2db760 Dummy {f00=0x00e6, f01=0x0190, f02=» 4 PMMEND EQU * 5 4 PTTPAG DATA 0 LAST ENTRY (FROM BOTTOM) IN MM-TAB 5 P 5 T PMMBEG EQU TABBE-* 5 0 PLSTPAG EQU TTPAG-* DISPL. TO 'ENTRY-POINTER' 5 v P EJECT 5 P 5 6 P*** *** 5 6 P*** S
0x2db760…2db8f4 (2, 165) Dummy {f00=0x00e6, f01=0x0190, f02=» *** 5 r 6 P************************************************* 6 6 P************************************************* 6 V P 6 P 6 , P** E R R O R ** 6 , P** ** 6 , P
0x2db8f4…2dba88 Dummy {f00=0x00e6, f01=0x0190, f02=» 6 h , P** INPUT :A1=SOP-MESSAGE ** 7 , P** OUTPUT:A2=RELATIVE CALLING ADDRESS** 7 8 , P** (REG-CONTENTS IS SAVED) ** 7 h , P**************************************** 7 P 7 PERROR EQU * 7 P ST A2,SAVE01,A13 SAVE A2 7 . P L
0x2dba88…2dbc1c Dummy {f00=0x00e6, f01=0x0190, f02=»NG PURPOS) 7 | P EJECT 8 P 8 & P** M O V E ** 8 ( & P** ** 8 R & P** ** 8 | & P** MOVE BLOCKS INSIDE MEMORY ** 8 & P** ** 8 & P** INPUT:A1=F
0x2dbc1c…2dbdb0 Dummy {f00=0x00e6, f01=0x0190, f02=» ** 8 x & P** WORK-REG: A4 ** 9 & P********************************* 9 < P 9 f PMOVE EQU * 9 r $ PMOVES ADR A1,A3 END OF FROM AREA 9 P ADR A2,A3 END OF TO-AREA 9 & P LD A4,SCTEFA GET END OF FREE AREA 9 P TNM A2,A4 EQUAL
0x2dbdb0…2dbf44 Dummy {f00=0x00e6, f01=0x0190, f02=» SIGN 9 n 8 PMOVCK RF(NG) MOVE10 END OF TO-AREA<=END OF FREE AREA : P LDKL A1,LMP3 : J ( P CALL ERROR INDICATE MEMORY OVERFLOW : ` PMOVE10 SUK A3,1 DEC LENGTH : P RF(N) MOVE20 ALL DONE : P SUK A1,1 : P SUK A2,1 : P LCR A4,A1 GET CHARACTER
0x2dbf44…2dc0d8 Dummy {f00=0x00e6, f01=0x0190, f02=» : 4 P** M O V I N G ** ; 4 P** ** ; D 4 P** ** ; | 4 P** USES ROUTINE 'MOVE' ABOVE. TO-ADDRESS IS ** ; 4 P** ASSUMED TO BE DATA-PART
0x2dc0d8…2dc26c Dummy {f00=0x00e6, f01=0x0190, f02=» 4 P** ** < 4 P** INPUT:A3 & A1 AS IN 'MOVE' ** < < 4 P** OUTPUT: A2=TO-ADDRESS (LSTADR UPDATED) ** < t 4 P** WORK-REG: A4 ** < 4 P************************************
0x2dc26c…2dc400 Dummy {f00=0x00e6, f01=0x0190, f02=»FE MAKE EVEN ADDRESS < P ST A11,SAVE01,A13 SAVE A11 = P ST A9,SAVE12,A13 SAVE A9 = @ P LDR A11,A2 = b * P LD A9,DATEND,A13 END OF PROTOTYP AREA = v " P CALL CMPADR COMPARE ADDRESSES = P RF(NL) MOV020 = ( PMOV010 LDKL A1,LMP3 MEMORY OVERFLOW =
0x2dc400…2dc594 (2, 166) Dummy {f00=0x00e6, f01=0x0190, f02=»A13 NEW ADDRESS = ( P LD A9,SAVE12,A13 RESTORE REGISTERS > P LD A11,SAVE01,A13 > D P RB MOVES > ^ P XIF > p P IFT CREDIT+MMUPAG=2 > | P EJECT > > 4 P** X M O V E ** > 4 P**
0x2dc594…2dc728 Dummy {f00=0x00e6, f01=0x0190, f02=» TWO PHASES:-MOVE TO SYSTEM AREA (BUFBEG) ** > 4 P** -MOVE TO USER AREA ** ? 6 4 P** IF 'BUFSIZ' (TEMPORARY MOVE-BUFFER) IS NOT** ? n 4 P** BIG ENOUGH THE MOVE IS REPEATED ** ? 4 P**
0x2dc728…2dc8bc Dummy {f00=0x00e6, f01=0x0190, f02=» A3=LENGTH (IN BYTES) ** ? 4 P** WORK.REGS:A4,A10 ** @ . 4 P************************************************ @ f P @ PXMOVE EQU * @ P ST A1,SAVE09,A13 @ P ST A1,SAVE07,A13 @ P ST A2,SAVE10,A13 @ P
0x2dc8bc…2dca50 Dummy {f00=0x00e6, f01=0x018e, f02=» PXMOV05 EQU * A LDR A10,A3 SAVE LENGTH A , ( LDK A4,0 RESET 'NUMBER-OF-MOVE' COUNTER A 8 * P LDR A11,A3 GET LENGTH OF AREA TO MOVE A h 0 P LD A9,BUFSIZ,A13 GET TEMPORARY BUFFER SIZE A P CALL CMPADR COMPARE A " RF(G) SPLIT NO! SEVERAL MOVE A
0x2dca50…2dcbe4 Dummy {f00=0x00e6, f01=0x0190, f02=» $ P TL* MMFROM,A13 LOAD FROM-TABLE B , ( MVUS A3 MOVE DATA-BLOCK TO TEMP. BUFFER B , 0 P ST A1,SAVE09,A13 SAVE END OF 'FROM' ADDRESS B P LD A1,SYSBUF,A13 B 0 P LD A2,SAVE08,A13 GET START OF 'TO' ADDRESS B LDR A3,A10 GET LENGTH B P TL* MMTO,A1
0x2dcbe4…2dcd78 Dummy {f00=0x00e6, f01=0x0190, f02=» A2,A10 B 0 P ST A2,SAVE08,A13 SAVE START OF 'TO' ADDRESS C * P LD A3,SAVE11,A13 GET REQUESTED LENGTH C D $ SUR A3,A10 SUBTRACT MOVED PART C r P ST A3,SAVE11,A13 SAVE C P CWR A3,A10 C P RB(NL) XMOV10 C P LDR A10,A3 LAST LENGTH C P RB XM
0x2dcd78…2dcf0c Dummy {f00=0x00e6, f01=0x0190, f02=»ND DIVIDE C 2 P LDR A4,A2 GET QUOTIENT (=NUMBER OF MOVES - 1) D & " LD A10,BUFSIZ,A13 MOVE MAX LENGTH D H P RB XMOV10 D r D 0 PXMOV30 LD A2,SAVE10,A13 RESTORE 'TO-ADDRESS' D , P LD A1,SAVE07,A13 RESTORE 'FROM-ADDRESS' D P LD A9,XMSAV,A13 RESTORE
0x2dcf0c…2dd0a0 Dummy {f00=0x00e6, f01=0x018e, f02=»* D b 4 P** ** E 4 P** ** E B 4 P** USES SUBROUTINE 'XMOVE' TO MOVE A BLOCK ** E z 4 P** VIA TWO MM-TABLES.PHYSICALL TO-ADDRESS ** E 4 P** IS ALWAYS ASSUMED TO BE DA
0x2dd0a0…2dd234 (2, 167) Dummy {f00=0x00e6, f01=0x0190, f02=» 4 P** IS UPDATED AND CHECKED. ** F 4 P** ** F < 4 P** INPUT :A1 & A3 AS IN 'XMOVE' ** F t 4 P** TTAB=POINTER TO TTAB (OR LIKELY) ** F 4 P** OUTPUT:A2=LOGICALL TO-ADDRESS
0x2dd234…2dd3c8 Dummy {f00=0x00e6, f01=0x0190, f02=» PMOVING EQU * G P ST A11,SAVE01,A13 SAVE A11 G P ST A9,SAVE12,A13 SAVE A9 G < . ) LD A4,FYSPAG,A13 GET ACT. PHYSICALL PAGE G ^ & P LD A10,TTAB,A13 LOAD TTAB-ADDRESS G 2 . LD A2,LSTPAG,A10 GET LAST TABLE-ENTRY IN TTAB G " LDR* A9,A2 GET PAGE IN
0x2dd3c8…2dd55c Dummy {f00=0x00e6, f01=0x0190, f02=»TTAB' G t $ P CALL SETTAB NEW PAGE IN TABLE! H 6 PMOV010 LD A11,LSTADR,A13 GET LAST LOGICALL ADDRESS H 6 ANKL A11,/FFF H p * P LDR A9,A3 GET LENGTH OF AREA TO MOVE H 0 P CALL CMPADR ENOUGTH SPACE IN CURRENT PAGE? H P RF(NL) MOV020 YES H 0 P SUR A
0x2dd55c…2dd6f0 Dummy {f00=0x00e6, f01=0x0190, f02=» PHYSICAL PAGE INCREMENT H P RB MOV015 I 6 PMOV020 SUR A11,A3 COMPUTE DISPLACEMENT WITHIN PAGE I 2 PMOV025 RF(NN) MOV050 I l * PMOV030 CALL SETTAB NEW PAGE IN TABLE! I & ! ADKL A11,4096 NEW PAGE INCREMENT I ( P RB(N) MOV030 NOT ENOUGH. NEW PAGE! I
0x2dd6f0…2dd884 Dummy {f00=0x00e6, f01=0x0190, f02=»A2=CURRENT ENTRY IN MM-TABLE I J $ PMOV050 EQU * J , , ( ST A2,LSTPAG,A10 SAVE MMU-ENTRY IN TTAB J @ 0 , ST A4,FYSPAG,A13 SAVE PHYSICALL PAGE NUMBER J p 4 P LDKL A4,MMBEG CALCULATE TABLE ENTRY DISPLACEM. J & " ADR A4,A10 ABSOLUTE ENTRY ADDRESS J & P S
0x2dd884…2dda18 Dummy {f00=0x00e6, f01=0x0190, f02=»2,A11 GET DISPLACEM. WITHIN PAGE J P ANKL A2,/FFFE EVEN ADDRESS K ( , ' ST A2,LSTADR,A13 SAVE LOGICALL ADDRESS K L P* CHECK ADDRESSES * K | P K * P LD A9,FSTPAG,A13 GET FIRST FREE PAGE K P ST A11,SAVE07,A13 SAVE A11 K P LD A11,FYSPAG,A13 K
0x2dda18…2ddbac Dummy {f00=0x00e6, f01=0x0190, f02=»,FSTADR,A13 K P CALL CMPADR L P RF(NL) MOV090 OK! L ( PMOV070 LDKL A1,LMP3 L B P CALL ERROR L ^ PMOV090 EQU * L r P CALL XMOVE MOVE L P LD A9,SAVE12,A13 L ( P LD A11,SAVE01,A13 RESTORE REGISTERS L $ P TL* MMFROM,A13 RESTORE MM-TABLE L
0x2ddbac…2ddd40 Dummy {f00=0x00e6, f01=0x0190, f02=» ** L l 6 P** ** M 6 P** SET NEW PAGE IN MM-TABLE & CHECK IF TABLE ** M P 6 P** OVERFLOW. ** M 6 P** ** M 6 P** INPUT
0x2ddd40…2dded4 (2, 168) Dummy {f00=0x00e7, f01=0x0190, f02=» ** M r 6 P** WORK.REG: A9 ** N 6 P************************************************* N V P N PSETTAB EQU * N SUKL A4,/400 GET NEXT PAGE N SUK A2,2 GET NEXT ENTRY N P N " P* CHECK IF MM-TA
0x2dded4…2de068 Dummy {f00=0x00e7, f01=0x0190, f02=»F(NN) SETT00 N P CWR A9,A2 O P RF SETT05 O & PSETT00 CWR A2,A9 OVERFLOW? O 8 PSETT05 RF(NL) SETT10 NO O Z P LDK A1,LMP7 O z P CALL ERROR O PSETT10 EQU * O STR A4,A2 STORE IN TABLE O RTN A14 O P XIF O P IFF CREDIT=0 O
0x2de068…2de1fc Dummy {f00=0x00e7, f01=0x0190, f02=» 4 P** ** P 4 P** GET WORK BLOCK ADDRESS AND DISPLACE- ** P < 4 P** MENT IN T:A ** P t 4 P** ** P 4 P** INPUT : A8= POINTER TO T:A-ADD I
0x2de1fc…2de390 Dummy {f00=0x00e7, f01=0x0190, f02=» TADISP=A4 ** P 4 P** A11=W.B.-ADDRESS ** Q 4 4 P** WBADD=POINTER TO W.B.-ADD IN T:A ** Q l 4 P*********************************************** Q P Q PGETWB EQU * Q " P LD A4,BIT,A
0x2de390…2de524 Dummy {f00=0x00e7, f01=0x0190, f02=»FT CREDIT-MMUPAG=1 Q P LDR* A11,A8 GET T:A-ADDRESS R P ADR A11,A4 ADD DISPLACEMENT R > P ST A11,WBADD,A13 SAVE R b " P LDR* A11,A11 GET W.B.-ADDRESS R P XIF R P IFT CREDIT+MMUPAG=2 R 0 P LD A11,FLAG,A13 REAL TASK-DATA PROCESSING? R P RF(Z)
0x2de524…2de6b8 Dummy {f00=0x00e7, f01=0x0190, f02=»T A11,WBADD,A13 SAVE R " P ELR A11,A11 GET W.B.-ADDRESS S & P TL* MMFROM,A13 RELOAD FROM-TABLE S B P XIF S l P IFF CREDIT=0 S x P RTN A14 S P EJECT S P S P S 8 P** M O V W B ** S 8 P**
0x2de6b8…2de84c Dummy {f00=0x00e7, f01=0x0190, f02=».-ADDRESS IS UPDATED ** S x 8 P** ** T $ 8 P** INPUT: A11=W.B.-ADDRESS ** T ` 8 P** OUTPUT: 'WBADD'=POINTER TO MOVED W.B.ADDRESS ** T 8 P** WORK-REGS: A1-A4
0x2de84c…2de9e0 Dummy {f00=0x00e7, f01=0x0190, f02=» ADKL A1,WBLEN FROM-ADDRESS T P IFT CREDIT-MMUPAG=1 U $ P LDR* A3,A1 LENGTH U @ P CALL MOVING U Z 6 P SUKL A2,WBLEN ADJUST TO-ADDRESS FOR DISPLACEMENT U n 4 P ST* A2,WBADD,A13 UPDATE W.B.-ADDRESS AFTER MOVE U P XIF U P IFT CREDIT+MMUPAG=2 U P
0x2de9e0…2deb74 (2, 169) Dummy {f00=0x00e7, f01=0x0190, f02=»ROCESSING? U p P RF(Z) MOVW10 NO! V P TL* MMTO,A13 LOAD TO-TABLE V , : PMOVW10 ES* A2,WBADD,A13 UPDATE W.B.-ADDRESS AFTER MOVE V P & P TL* MMFROM,A13 RELOAD FROM-TABLE V P XIF V P IFF CREDIT=0 V P RTN A14 V P EJECT V P V P
0x2deb74…2ded08 Dummy {f00=0x00e7, f01=0x0190, f02=» ** V : P** MOVE DISCRIPTOR TABLE. D.T.-ADDRESS IS UPDATED ** W : : P** ** W x : P** INPUT :WBADD POINTS TO W.B.-ADDRESS IN T:A ** W : P** OUTPUT: A3=POINT
0x2ded08…2dee9c Dummy {f00=0x00e7, f01=0x0190, f02=»********************* W p P X PMOVDT EQU * X * 6 P LD A1,WBADD,A13 GET POINTER TO W.B-ADDRESS IN WAT X > & P SUK A1,2 POINTER TO D.T.-ADDRESS X x P IFT CREDIT-MMUPAG=1 X P LDR* A1,A1 D.T.-ADDRESS X * P ADKL A1,DTLEN ADJUST FOR LENGTH WORD X
0x2dee9c…2df030 Dummy {f00=0x00e7, f01=0x018e, f02=»A1,DTLEN X 4 P ST A2,-2,A3 UPDATE D.T-ADDRESS. A2=NEW ADDRESS Y P XIF Y H P IFT CREDIT+MMUPAG=2 Y T P ELR A1,A1 D.T.-ADDRESS Y p * P ADKL A1,DTLEN ADJUST FOR LENGTH WORD Y P AD A1,MOVADD,A13 RELOCATE Y P ELR A3,A1 LENGTH Y P CALL MOVING Y
0x2df030…2df1c4 Dummy {f00=0x00e7, f01=0x0190, f02=» Y P IFF CREDIT=0 Z P RTN A14 Z P EJECT Z . P Z < < P** M O V D W B ** Z H < P** ** Z < P** ** Z < P
0x2df1c4…2df358 Dummy {f00=0x00e7, f01=0x0190, f02=» ** Z < P** INPUT : A12=T:D-ADDRESS ** [ 8 < P** A8= POINTER TO T:A-ADDRESS ** [ x < P** BIT=BIT NUMBER SAT IN DWBMSK ( 0-15 ) ** [ < P** WORK.REGS: A
0x2df358…2df4ec Dummy {f00=0x00e7, f01=0x0190, f02=» [ P ST A6,SAVE05,A13 SAVE A5 P LDK A6,0 * ( PMOVD10 LD A4,BIT,A13 GET BIT NUMBER < " P ADK A4,1 FIRST WAT-ELEMENT =1 h P IFT CREDIT-MMUPAG=1 P LD A2,WATLEN,A12 P XIF P IFT CREDIT+MMUPAG=2 P EL A2,WATLEN,A12 P X
0x2df4ec…2df680 Dummy {f00=0x00e7, f01=0x018e, f02=» r P SUK A2,1 ALL? ] P RF(N) MOVD60 YES! ] P IFT CREDIT-MMUPAG=1 ] 8 " P CC A4,DWBFST,A6 SHARED W.B.? ] T P XIF ] z P IFT CREDIT+MMUPAG=2 ] * P EL A10,DWBFST,A6 CHECK IF SHARED W.B. ] " P SRC A6,1 RIGHT OR LEFT BYTE? ] P RF(N) MOVD30 RIGH
0x2df680…2df814 (2, 170) Dummy {f00=0x00e7, f01=0x0190, f02=» P CWR A4,A10 SHARED W.B.? ^ P XIF ^ $ P IFF CREDIT=0 ^ 0 P RB(NE) MOVD20 NO! ^ F P* DWB FOUND * ^ ` , P NGR A4,A2 CALCULATE DISPLACEMENT IN T:A ^ v P IFT CREDIT-MMUPAG=1 ^ P AD A4,WATLEN,A12 ^ P XIF ^ P IFT CREDIT+MMUPAG=2 ^ P EL
0x2df814…2df9a8 Dummy {f00=0x00e7, f01=0x0190, f02=»4,2 ^ P ADK A4,WATFST+2 _ * P LD A3,NEWAD2,A13 GET NEW W.B.-ADDRESS _ $ P IFT CREDIT-MMUPAG=1 _ R 2 P ADR* A4,A8 A4=POINTER TO W.B.-ADDRESS IN T:A _ n " P STR A3,A4 CHANGE W.B.-ADDRESS _ P XIF _ P IFT CREDIT+MMUPAG=2 _ . P LD A2,FLAG,A13 REAL D
0x2df9a8…2dfb3c Dummy {f00=0x00e7, f01=0x018e, f02=»W.B.-ADDR IN T:A _ v P ADR A4,A10 ` " P ESR A3,A4 CHANGE W.B.-ADDRESS ` , & P TL* MMFROM,A13 RELOAD FROM-TABLE ` R P XIF ` | P IFF CREDIT=0 ` P ST A4,WBADD,A13 ` . P LD A2,SWITCH,A13 WB-ADDRESS CHANGE ONLY? ` P RB(NZ) MOVD10 YES! ` P CAL
0x2dfb3c…2dfcd0 Dummy {f00=0x00e7, f01=0x0190, f02=» P a 4 P** T W B S W B ** a 4 P** ** a D 4 P** COPY TWB'S AND RESERVE SPACE FOR SWB'S ** a | 4 P** ** a 4 P** INPUT : A8=ACTUAL T:A-AD
0x2dfcd0…2dfe64 Dummy {f00=0x00e7, f01=0x0190, f02=» 4 P************************************************ b P b < PTWBSWB EQU * b D P ST A7,SAVE04,A13 SAVE A7 b X " P LD A7,TWBMSK,A12 GET TWB MASK b z P IFT CREDIT+MMUPAG=2 b " P EL A7,TWBMSK,A12 GET TWB MASK b P XIF b P IFF CREDIT=0 b P CAL
0x2dfe64…2dfff8 Dummy {f00=0x00e7, f01=0x0190, f02=» & P CALL MOVDWB CHANGE DWB-ADDRESSES c P CALL SKIFTA c . P RB TWSW10 c B PTWSW20 EQU * c T P IFT CREDIT+SWPBLK=2 c h P EJECT c P c P c P* RESERVE SPACE FOR SWB'S * c P*************************** c P XIF c P IFT CREDI
0x2dfff8…2e018c Dummy {f00=0x00e7, f01=0x0190, f02=»PBLK=2 c P CALL SHIFT d PTWSW30 RF(Z) TARZAN ALL DONE d " P CALL GETWB d F P CALL MOVWB RESERVE SPACE d Z ( P ST A2,NEWAD2,A13 SAVE W.B.-ADDRESS d | & P CALL MOVDWB CHANGE DWB- ADDRESSES d P CALL SKIFTA d P RB TWSW30 d PTARZAN EQU * d
0x2e018c…2e0320 Dummy {f00=0x00e7, f01=0x0190, f02=» A L L B U F ** d 4 P** ** e ( 4 P** ALLOCATE FIXED DATA SET BUFFERS AND ** e ` 4 P** TERMINAL STACK ** e 4 P** ** e 4 P
0x2e0320…2e04b4 (2, 171) Dummy {f00=0x00e7, f01=0x0190, f02=»=LENGTH OF DSCB'S ** e x 4 P** CIA (IN T:A)=DISPL. TO T:A-START ** f 4 P** CSE (IN T:A)=STACKSIZE ** f X 4 P** WORK-REGS. :A1-A4,A9,A11 ** f 4 P************************************************ f P f P
0x2e04b4…2e0648 Dummy {f00=0x00e7, f01=0x0190, f02=»D A3,CSN,A1 GET DSCB TOTAL LENGTH f P RF(Z) ALLB70 NO DSCB'S g * . P ADKL A1,T:ASTA CALC START OF DSCB RECORDS g J " P LDR A10,A1 SAVE START ADDRESS g | P XIF g P IFT CREDIT+MMUPAG=2 g P ELR A1,A8 GET T:A-ADDRESS g ( P EL A3,CSN,A1 GET DSCB TOTAL
0x2e0648…2e07dc Dummy {f00=0x00e7, f01=0x0190, f02=»IF g P IFF CREDIT=0 h P SUR A3,A1 h P NGR A3,A3 h 2 P SUK A3,DSCBL END CONDITION h D : P ST A3,SAVE04,A13 SAVE ADDRESS TO END OF DSCB-RECORDS h h : PALLB10 SUK A1,DSCBL A1=FIRST WORD IN FIRST DSCB-RECORD h P CW A1,SAVE04,A13 ALL? h P RF(E)
0x2e07dc…2e0970 Dummy {f00=0x00e7, f01=0x0190, f02=» NO! h P ST A9,BA,A1 BUFFER START i P LD A3,RL,A1 BUFFER LENGTH i . P ST A3,BL,A1 i P P LD A2,EL,A1 SHARED BUFFER? i d P RF(Z) NOTSH NO! i & P LDR A4,A1 RESTORE START OF DSCB'S i P XIF i P IFT CREDIT+MMUPAG=2 i $ P ELR A3,A1 GET FIRST W
0x2e0970…2e0b04 Dummy {f00=0x00e7, f01=0x0190, f02=»,EL,A1 SHARED BUFFER? i P RF(Z) NOTSH NO! j & P LDR A4,A1 RESTORE START OF DSCB'S j 6 P XIF j ` P IFF CREDIT=0 j l P ADK A4,DSCBL FIRST WORD j PALLB20 SUK A2,1 A2=INDEX j P RF(NN) ALLB30 j P LDK A1,LMP4 FORMAT ERROR j P CALL ERROR j
0x2e0b04…2e0c98 Dummy {f00=0x00e7, f01=0x018e, f02=») ALLB20 j " P LDK A1,LMP4 BUFFER NOT FOUND k P CALL ERROR k 6 P IFT CREDIT-MMUPAG=1 k J ( PALLB40 LD A4,BA,A4 BUFFER ALLOCATED? k f P RF(NZ) ALLB50 YES! k P LDK A1,LMP4 FORMAT ERROR k P CALL ERROR k PALLB50 EQU * k * P ST A4,BA,A1 AND
0x2e0c98…2e0e2c Dummy {f00=0x00e7, f01=0x0190, f02=» k z P LDK A1,LMP4 FORMAT ERROR l P CALL ERROR l * PALLB50 EQU * l > * P ES A4,BA,A1 AND ESORE IN CURRENT ECB l R P XIF l P IFF CREDIT=0 l P RB ALLB10 l P l P IFT CREDIT-MMUPAG=1 l PNOTSH LDR A9,A9 PAGING? l P RF(NZ) NOTS10 N
0x2e0e2c…2e0fc0 Dummy {f00=0x00e7, f01=0x0190, f02=»LLOCATE BUFFER FROM TOP l ~ P ADKL A9,1 m P ANKL A9,/FFFE EVEN ADDRESS m 2 P* CHECK ADDRESS: m V P m n " P LD A11,LSTADR,A13 DATA START m z P CALL CMPADR m P RF(NL) ALLB60 OK! m P LDKL A1,LMP3 m P CALL ERROR m PALLB60 EQU * m
0x2e0fc0…2e1154 (2, 172) Dummy {f00=0x00e8, f01=0x018e, f02=»TTOM' m f & P ES A2,BA,A1 STORE BUFFER ADDRESS n P XIF n 8 P IFF CREDIT=0 n D P RB ALLB10 n Z P n l , P* RESERVE STACK AND SET STACKPOINTERS * n x P n PALLB70 EQU * n P IFT CREDIT-MMUPAG=1 n P LDR* A1,A8 GET T:A-ADDRESS n P LD
0x2e1154…2e12e8 Dummy {f00=0x00e8, f01=0x0190, f02=» PALLB80 EQU * o P ST A4,STKB,A1 SET STACKBASE o P STR A4,A1 STACK POINTER o < P CALL MOVING ALLOCATE STACK o P ST A2,STKE,A1 SET STACK-END o P XIF o P IFT CREDIT+MMUPAG=2 o P ELR A1,A8 GET T:A-ADDRESS o P EL A3,CSE,A1 GET STACK SI
0x2e12e8…2e147c Dummy {f00=0x00e8, f01=0x0190, f02=» P CALL MOVING ALLOCATE STACK p " P ES A2,STKE,A1 STORE STACK END p ( " P EL A3,STKB,A1 GET STACK SIZE p N " P ADR A2,A3 COMPUTE STACK BASE p t $ P ES A2,STKB,A1 STORE STACK BASE p * P ESR A2,A1 STORE CURRENT STACK POINTER p P XIF p P IFF CREDIT=
0x2e147c…2e1610 Dummy {f00=0x00e8, f01=0x0190, f02=» ** p p 4 P** MOVE T:A AND UPDATE DATA SET ADDRESSES IN ** q 4 P** FORMAT CONTROL BLOCK ** q P 4 P** ** q 4 P** INPUT : A8=T:A-ADDRESS ** q 4 P** A12=
0x2e1610…2e17a4 Dummy {f00=0x00e8, f01=0x018e, f02=» ** q h 4 P** WORKREGS: A1-A4 ** r 4 P************************************************ r H P r PMOVT:A EQU * r P IFT CREDIT-MMUPAG=1 r P LDR* A1,A8 GET T:A-ADDRESS r ( P LD A3,WATLEN,A12 GET LENGTH OF WAT r P
0x2e17a4…2e1938 Dummy {f00=0x00e8, f01=0x018e, f02=» P CALL MOVING s P LDR* A4,A8 s " P SU A2,CIA,A4 NEW T:A-ADDRESS s , $ P SU A1,CIA,A4 'OLD' T:A-ADDRESS s R P s z 8 P* COMPUTE AND STORE ADDRESSES TO DATA-SETS IN FCB * s P s P LD A3,FCD,A12 ANY FCD? s P RF(Z) MOVT10 NO! s P ADR A3,
0x2e1938…2e1acc Dummy {f00=0x00e8, f01=0x0190, f02=» : P SUR A4,A1 ADJUST FOR OLD RELOCATION (OLD T:A-ADDRESS) t PMOVT05 EQU * t B P ADS A4,FCBDD1,A3 t V P ADS A4,FCBDD2,A3 t p PMOVT10 RTN A14 t P XIF t P IFT CREDIT+MMUPAG=2 t P t P ELR A1,A8 GET T:A-ADDRESS t ( P EL A3,WATLEN,A12 GET
0x2e1acc…2e1c60 Dummy {f00=0x00e8, f01=0x0190, f02=» P ADR A1,A10 FROM-ADDRESS u P CALL MOVING u $ P ELR A4,A8 u 8 P EL A10,CIA,A4 u J P SUR A2,A10 NEW T:A-ADDRESS u ` " P SUR A1,A10 'OLD' T:A-ADDRESS u 8 P* COMPUTE AND STORE ADDRESSES TO DATA-SETS IN FCB * u P u P EL A3,FCD,A12 ANY FCD? u
0x2e1c60…2e1df4 (2, 173) Dummy {f00=0x00e8, f01=0x0190, f02=» u ~ 8 P SUR A4,A1 ADJUST FOR OLD RELOCATION (OLD T:A-ADDR.) v PMOVT05 EQU * v D P ADR A3,A2 START OF FCB v X P TL* MMTO,13 LOAD TO-TABLE v x P EL A10,FCBDD1,A3 v P ADR A10,A4 v P ES A10,FCBDD1,A3 v P EL A10,FCBDD2,A3 v P ADR A10,A4
0x2e1df4…2e1f88 Dummy {f00=0x00e8, f01=0x0190, f02=» P w 6 P** C M P A D R ** w 6 P** ** w F 6 P** ** w 6 P** COMPARE ADDRESSES. RESULT IN PSW ON RETURN ** w 6 P**
0x2e1f88…2e211c Dummy {f00=0x00e8, f01=0x0190, f02=» ** w h 6 P** OUTPUT: RESULT IN A14-STACK ** x 6 P************************************************** x L P x PCMPADR EQU * x P TNM A11,A9 x P RF(NN) CMPA10 x P CWR A9,A11 x P RF CMPA20 x PCMPA10 CWR A11,A9
0x2e211c…2e22b0 Dummy {f00=0x00e8, f01=0x018e, f02=»************************************* x v D P* * y . D P* ICBMVD - INDICATE CURRENT BLOCK MOVED * y v D P* ===================================== * y D P*
0x2e22b0…2e2444 Dummy {f00=0x00e8, f01=0x0190, f02=» y N D P* * z D P* ENTRY: A8 - FIRST T:A POINTER * z P D P* A6 - SECOND T:A POINTER * z D P* BIT - BIT NUMBER SET IN CWB- O
0x2e2444…2e25d8 Dummy {f00=0x00e8, f01=0x0190, f02=»URRENT STATCK POINTER * z p D P* IN T:A IS SET * { ( D P* * { p D P* WORK REGISTERS: A1,A2 * { D P*
0x2e25d8…2e276c Dummy {f00=0x00e8, f01=0x018e, f02=»* * { D P*************************************************************** | H P EJECT | PICBMVD EQU * | P LDKL A1,/8000 SET BIT 0 | 6 P LD A2,BIT,A13 GET BIT NUMBER IN CWB- OR UWB-MASK |
0x2e276c…2e2900 Dummy {f00=0x00e8, f01=0x0190, f02=» | P* } & P* UPDATE MOVED MASK IN FIRST T:A } P* } < P XIF } F P IFT CREDIT-MMUPAG=1 } R & PIBAM20 LDR* A2,A8 GET T:A POINTER } n $ P LDR* A3,A2 GET MOVED BLOCK MASK } , P ORR A3,A1 INDICATE CURRENT BLOCK MOVED } * P STR A3,A2 STORE NEW MOV
0x2e2900…2e2a94 (2, 174) Dummy {f00=0x00e8, f01=0x0190, f02=»MOVED BLOCK MASK } , P ORR A3,A1 INDICATE CURRENT BLOCK MOVED ~ * P STR A3,A2 STORE NEW MOVED BLOCK MASK ~ H P XIF ~ v P IFT CREDIT+MMUPAG=2 ~ $ PIBAM20 ELR A2,A8 GET T:A POINTER ~ $ P ELR A3,A2 GET MOVED BLOCK MASK ~ , P ORR A3,A1 INDICATE CURREN
0x2e2a94…2e2c28 Dummy {f00=0x00e8, f01=0x0190, f02=»2,A6 GET T:A POINTER ~ $ P ELR A3,A2 GET MOVED BLOCK MASK , P ORR A3,A1 INDICATE CURRENT BLOCK MOVED D * P ESR A3,A2 STORE NEW MOVED BLOCK MASK t P XIF P IFF CREDIT=0 P RTN A14 P EJECT J P**************************************
0x2e2c28…2e2dbc Dummy {f00=0x00e8, f01=0x0190, f02=»KMVD - CHECK IF BLOCK ALREADY MOVED * ~ J P* ===================================== * < J P* * J P* REFERENCED IN: MOVCOM,MOVCLA
0x2e2dbc…2e2f50 Dummy {f00=0x00e8, f01=0x0190, f02=»:A * t J P* BIT - BIT NUMBER IN CWB- OR UWB-MASK * 2 J P* * J P* EXIT: IF BLOCK ALREADY MOVED THEN CR=2 ELSE CR<>2
0x2e2f50…2e30e4 Dummy {f00=0x00e8, f01=0x0190, f02=» * j J P* * ( J P* SUBROUTINES: * v J P*
0x2e30e4…2e3278 Dummy {f00=0x00e8, f01=0x0190, f02=»UPAG=1 P LDR* A1,A8 GET T:A POINTER $ P LDR* A1,A1 GET MOVED BLOCK MASK 2 P XIF Z P IFT CREDIT+MMUPAG=2 f P ELR A1,A8 GET T:A POINTER $ P ELR A1,A1 GET MOVED BLOCK MASK P XIF P IFF CREDIT=0 2 P LD A2,BIT,A13 GET BIT SET
0x2e3278…2e340c Dummy {f00=0x00e8, f01=0x0190, f02=» A2,1 DECREMENT BIT COUNTER P RB CHKM10 $ PCHKM20 ADK A1,0 SET CR 6 * P CFI A14,PSW,A13 PUT CONDITION IN PSW T P RTN A14 P EJECT P P : P***** S * U * P * E * R * L * O * O * P **** : P**
0x2e340c…2e35a0 Dummy {f00=0x00e8, f01=0x0190, f02=» ** r : P** CALCULATES BIT NUMBER SAT IN MASK-WORD ** : P** INPUT : A7=MASK WORD ** ^ : P** OUTPUT: BIT=BIT NUMBER ** : P** CONDITION CODE IN PSW ON RETURN
0x2e35a0…2e3734 (2, 175) Dummy {f00=0x00e8, f01=0x0190, f02=»TER v P LDR A7,A7 P RF SHIF20 & PSKIFTA EQU * ENTRY: CONTINUE SHIFT 0 PSHIF10 IM BIT,A13 Z P SLL A7,1 t PSHIF20 EQU * $ P RF(Z) SHIF30 NO MOORE BITS SAT P RB(NN) SHIF10 * PSHIF30 CFI A14,PSW,A13 PUT COND IN PSW P R
0x2e3734…2e38c8 Dummy {f00=0x00e8, f01=0x0190, f02=» ** 4 P** ** ( 4 P** MULTIPLICATION (A2) X A3(), A2#0 ** ` 4 P** ** 4 P** INPUT : A3,A2 ** 4 P
0x2e38c8…2e3a5c Dummy {f00=0x00e8, f01=0x0190, f02=»,MUL,A13 " P STR A2,A14 SAVE A2 TEMPORARY P LDK A3,0 6 PADD AD A3,MUL,A13 H P SUK A2,1 b P RB(NZ) ADD t P LDR* A2,A14 P RTN A14 P P IFT MMUPAG=1 P EJECT P 4 P** M M E N T
0x2e3a5c…2e3bf0 Dummy {f00=0x00e8, f01=0x0190, f02=» LAST USED ENTRY IN MM-TAB. SCAN ** 4 P** FROM LOW ADDRESS. NOT USED ENTRY=0. ** 0 4 P** ** h 4 P** INPUT :A3=MM-TABLE ADDRESS ** 4 P** OUTPUT:A3=ENTRY ADDRESS **
0x2e3bf0…2e3d84 Dummy {f00=0x00e8, f01=0x0190, f02=»NTENTS OF 1:ST USED ENTRY ** 4 P*********************************************** ( P ` PMMENT EQU * h P LDR A9,A3 GET TABLE ADDRESS | 6 P SUKL A9,MMBEG ADJUST A9 (LOOKS LIKE TTAB POINTER) P SUK A3,2 & PMMEN10 ADK A3,2 INCREMENT AD
0x2e3d84…2e3f18 Dummy {f00=0x00e8, f01=0x0190, f02=»G,A9 SAVE FIRST FREE PAGE-ADDRESS P RTN A14 * P XIF : P IFF CREDIT=0 F P EJECT P j 2 P** G E T T A B ** r 2 P** ** 2 P**
0x2e3f18…2e40ac Dummy {f00=0x00e8, f01=0x0190, f02=»INTER TO T:A IN T:ATAB ** 2 P** OUTPUT:A2=TTAB-ADDRESS ** & 2 P** A1=TID ** 2 P** WORKREGS:A3,A4,A10 ** 2 P********************************************** P PGE
0x2e40ac…2e4240 Dummy {f00=0x00e8, f01=0x0190, f02=»DAD,A10 T:D-ADDRESS P XIF P IFT MMUPAG=1 ( P ELR A10,A8 T:A-ADDRESS > P EL A1,T:ATID,A10 GET TID ^ P EL A12,T:DAD,A10 P XIF & PGETTTB EQU * ENTRY. INPUT: A1=TID $ P LD A4,SCTTCT GET TC:TAB ADDRESS P LDR* A3,A4 TCTA
0x2e4240…2e43d4 (2, 176) Dummy {f00=0x00e9, f01=0x0190, f02=»DK A1,LMP5 TID ERROR P CALL ERROR " PGETT20 LDR* A2,A4 TTAB-ADDRESS 0 P CW A1,TTB:PP,A2 TCL EQUAL? V P RB(NE) GETT10 NO! z P ST A2,TTAB,A13 SAVE P RTN A14 P IFF CREDIT=0 P EJECT P P 8 P**
0x2e43d4…2e4568 Dummy {f00=0x00e9, f01=0x0190, f02=» ** l 8 P** QUEUE TASK VIA 'ACTOT' AND SWITCH TO LEVEL ** 8 P** 0, ENB. ** T 8 P** ** 8 P** INPUT: A10=T:A-ADDRESS ** 8 P
0x2e4568…2e46fc Dummy {f00=0x00e9, f01=0x0190, f02=»*********************************** P , PQUEJOB EQU * 4 P* QUEUE THIS TASK (THIS TID) H P l 0 P LDKL A3,RETUR GET RETURN (FROM A15) ADDRESS t P ADR A3,A13 RELOCATE P STR A3,A15 PUT ON STACK * P LDKL A3,/00C0 SET LEVEL 0 AND ENABL
0x2e46fc…2e4890 Dummy {f00=0x00e9, f01=0x0190, f02=»RESS t P LDR A5,A2 GET TTAB-ADDRESS P IFT CREDIT-MMUPAG=1 0 , P LD A4,WATLEN,A12 NUMBER OF WAT-ELEMENTS L P ADK A4,2 | P ANKL A4,/FFFE P ADK A4,DWBFST+4 8 P ADR A4,A12 ADD T:A-ADDRESS => START OF START-POINTS & P LDR* A6,A4 NUMB
0x2e4890…2e4a24 Dummy {f00=0x00e9, f01=0x0190, f02=»D A3,2,A4 SEGMENT NUMBER , P LD A2,NTPA,A8 INTERPRETER START ADDRESS P XIF P P IFT CREDIT+MMUPAG=2 , P EL A4,WATLEN,A12 NUMBER OF WAT-ELEMENTS x P ADK A4,2 P ANKL A4,/FFFE P ADK A4,DWBFST+4 8 P ADR A4,A12 ADD T:A-ADDRESS => S
0x2e4a24…2e4bb8 Dummy {f00=0x00e9, f01=0x0190, f02=»L! P EL A1,4,A4 DISP ADDRESS P EL A3,2,A4 SEGMENT NUMBER * , P EL A2,NTPA,A8 INTERPRETER START ADDRESS L P XIF | P IFF CREDIT=0 P CF A15,ACTOT $ P ADK A4,STPREC NEXT START-POINT P RB GETT30 $ PGETT40 ABL RETUR8 RELOAD 8
0x2e4bb8…2e4d4c Dummy {f00=0x00e9, f01=0x0190, f02=»T ** v 4 P** ** 4 P** ** V 4 P** MOVE MM-TABLE ** 4 P** ** 4 P** INPUT
0x2e4d4c…2e4ee0 Dummy {f00=0x00e9, f01=0x0190, f02=» TTAB ** n 4 P** A9=TTAB ADDRESS ** 4 P** WORKREGS:A1,A3 ** N 4 P*********************************************** P PMOVMMT EQU * ( P ADKL A2,MMBEG GET TO-TABLE ADDRESS " P T
0x2e4ee0…2e5074 (2, 177) Dummy {f00=0x00e9, f01=0x0190, f02=»LOAD TABLE ~ P RTN A14 P XIF " P IFF CREDIT=0 . P EJECT D @ P************************************************************ R @ P* * @ P* CHTAID - CHANGE T:A-ID AND CLEAR TCL SAVE A
0x2e5074…2e5208 Dummy {f00=0x00e9, f01=0x0190, f02=»=========== * b @ P* * @ P* * Z @ P* REFERENCED IN: SYSLDA PART 2 B. * @ P*
0x2e5208…2e539c Dummy {f00=0x00e9, f01=0x0190, f02=»NTRY IN REAL T:ATAB * j @ P* * @ P* EXIT: * b @ P* * @ P* WORK REGISTERS: A1,A3,A6,A8
0x2e539c…2e5530 Dummy {f00=0x00e9, f01=0x0190, f02=» * r @ P* * & @ P************************************************************ j PCHTAID EQU * 2 P LDR A8,A7 GET NEXT FREE ENTRY IN REAL T:ATAB $ P LDR* A6,A5 GET
0x2e5530…2e56c4 Dummy {f00=0x00e9, f01=0x0190, f02=» ( P LDR* A1,A8 GET POINTER TO REAL T:A $ P LD A1,T:ATID,A1 GET TCL IN T:A 0 . PCHT:20 CALL GETTTB GET CORRESPONDING TTAB X , P LD A4,TTBTID,A2 GET REAL TID IN TTAB =3 6 P LD A3,TTB:SA+26,A2 GET CORRESPONDING T:A-ADDRESS * P ST A4,T:ATID,A3 REP
0x2e56c4…2e5858 Dummy {f00=0x00e9, f01=0x0190, f02=» SAVE TID FOR DEBUGGER PURPOSE =3 P XIF * P IFT CREDIT+MMUPAG=2 6 & P ELR A1,A8 GET POINTER TO REAL T:A R $ P EL A1,T:ATID,A1 GET TCL IN T:A | . PCHT:20 CALL GETTTB GET CORRESPONDING TTAB ( P LDR A3,A2 GET POINTER TO TTAB ENTRY 2 P ADKL
0x2e5858…2e59ec Dummy {f00=0x00e9, f01=0x0190, f02=»CORRESPONDING T:A-ADDRESS x * P ES A4,T:ATID,A3 REPLACE TCL IN T:A =3 " 0 P EL* A3,T:ATNW,A13 GET LENGTH OF REAL T:ATAB P $ P NGR A3,A3 NEGATIVE DISPLACEMENT . P ADR A3,A8 COMPUTE ENTRY IN AUX. TID TABLE 0 P ESR A4,A3 SAVE TID FOR DEBUGGER PURPOSE =
0x2e59ec…2e5b80 Dummy {f00=0x00e9, f01=0x0190, f02=»NT ~ ( P SUK A6,1 DECREMENT NUMBER OF COPIES P RB(P) CHT:20 NEXT COPY 6 PCHT:90 RTN A14 V P EJECT l P z P 4 P************************************************ 4 P*** *** 4 P**
0x2e5b80…2e5d14 (2, 178) Dummy {f00=0x00e9, f01=0x0190, f02=»********** j P 4 P* BUILD REAL T:A'S. COPY T:A'S ACCORDING TO * 4 P* SHADOW TABLE * R 4 P* * 4 P************************************************ P PPART2B
0x2e5d14…2e5ea8 Dummy {f00=0x00e9, f01=0x0190, f02=»S h * P LD A7,T:ATNW,A13 REAL T:ATAB ADDRESS P ADK A7,2 8 P ST A8,SAVE03,A13 SAVE A8 J & PSYA310 LD A8,SAVE03,A13 RESTORE A8 l P ADKL A8,2 P CW A8,ENDADD,A13 ALL? P RF(E) SYA350 YES! P ST A8,SAVE03,A13 SAVE $ P ADK A5,2
0x2e5ea8…2e603c Dummy {f00=0x00e9, f01=0x0190, f02=»A10,TTB:SA+26,A2 SAVE T:A ADDR. IN TTAB (SAVE-A13) P LDR* A1,A8 GET T:A ADDRESS : $ P STR A1,A7 STORE IN REAL T:ATAB ^ P ADK A7,2 $ P LDR* A6,A5 GET NUMBER OF COPIES P EJECT PSYA340 SUK A6,1 P RF(P) SYA345 NEXT TASK 2 P C
0x2e603c…2e61d0 Dummy {f00=0x00e9, f01=0x0190, f02=»L MOVT:A MOVE T:A P IM T:ATID,A2 UPDATE TID $ P STR A2,A7 STORE IN REAL T:ATAB : " P LDR A8,A7 CHANGE T:A TO COPY b 2 P CALL GETTAB GET CORRESPONDING TTAB AND QUEUE P CALL QUEJOB QUEUE THIS TASK 2 P ST A10,TTB:SA+26,A2 SAVE T:A-ADDRESS
0x2e61d0…2e6364 Dummy {f00=0x00e9, f01=0x0190, f02=»BUFFERS z P XIF P IFT CREDIT+MMUPAG=2 * P* GET ACTUAL MM-TABLE ADDRESS AND LOAD 8 P f P LDR A1,A5 n * P AD* A1,SCTSFA ADD SHADOW-TABLE LENGTH $ P LDR* A1,A1 GET MM-TABLE ADDRESS P TLR A1 LOAD " P ST A1,MMFROM,A13 SAVE ADDRESS
0x2e6364…2e64f8 Dummy {f00=0x00e9, f01=0x0190, f02=»LASS-LOCAL LAST ENTRY z P CALL QUEJOB QUEUE THIS TASK * P LDKL A2,MMTAB GET WORK TABLE ADDRESS B P ADR A2,A13 p " P TSR A2 SAVE CLASS-DATA TABLE , P* REMOVE TASK-LOCAL ENTRIES IN MM-TABLE P P SUK A2,2 START OF TABLE P LDKL
0x2e64f8…2e668c Dummy {f00=0x00e9, f01=0x0190, f02=»B SYA320 PSYA330 EQU * P ELR A1,A8 GET T:A ADDRESS $ $ P ESR A1,A7 STORE IN REAL T:ATAB F $ P EL A12,T:DAD,A1 GET T:D ADDRESS n P EL A1,T:ATID,A1 GET TID ( P ADK A7,2 NEXT ENTRY IN REAL T:ATAB $ P LDR* A6,A5 GET NUMBER OF COPIES
0x2e668c…2e6820 Dummy {f00=0x00e9, f01=0x0190, f02=»SS x PSYA345 ADK A1,1 NEXT T:A ID ( P CALL GETTTB FIND CORRESPONDING TTAB . P CALL QUEJOB QUEUE THIS TASK Z & P CALL MOVMMT MOVE MM-TABLE TO TTAB ~ P CALL MOVT:A MOVE T:A $ P ESR A2,A7 STORE IN REAL T:ATAB @ P ST A2,TTB:SA+26,A9 PUT T:
0x2e6820…2e69b4 (2, 179) Dummy {f00=0x00e9, f01=0x0190, f02=»W ADDRESS 0 P CALL TWBSWB MOVE TWB'S & RESERVE FOR SWB'S P LD A1,MMTO,A13 GET TO-TABLE F . P ST A1,MMFROM,A13 CHANGE T:A ADDRESS-TABLE j P TLR A1 " P CALL ALLBUF ALLOCATE BUFFERS $ P LD A1,TTAB,A13 GET TTAB-ADDRESS * P CM LSTPAG,A1
0x2e69b4…2e6b48 Dummy {f00=0x00e9, f01=0x018e, f02=» ES A1,T:ATID,A10 RESTORE IN T:A P XIF ( P IFF CREDIT=0 4 P RB SYA340 J P XIF P EJECT h PFINISH EQU *-REL v P P* ADJUST START OF FREE AREA P PSYA350 EQU * P IFF CREDIT=0 * P LD A1,LSTADR,A13 GET END OF
0x2e6b48…2e6cdc Dummy {f00=0x00e9, f01=0x0190, f02=» P XIF P IFF CREDIT=1 P LD A1,SCTLAC * P XIF @ P IFT MMUPAG-CREDIT=1 L P ANKL A1,/03FF h P SLL A1,2 ~ P XIF P ST A1,SCTEFA+2 P IFT CREDIT=1 P LD A1,FYSPAG,A13 P IFT MMUPAG-CREDIT=1 P LD A1,S
0x2e6cdc…2e6e70 Dummy {f00=0x00e9, f01=0x0190, f02=»MMUPAG=1 ( P LD A1,FSTADR,A13 START OF FREE AREA P RF(NZ) SYA355 < P XIF R P LD A1,SCTSFA ^ PSYA355 ST A1,SCTSFA+2 t P CM SCTSFA P IFT CREDIT=1 P EJECT D ?***************************************************************
0x2e6e70…2e7004 Dummy {f00=0x00e9, f01=0x0190, f02=» * X D ?* ========================= * D ?* * X D ?* REFERENCED IN: SYSLDA * D ?*
0x2e7004…2e7198 Dummy {f00=0x00e9, f01=0x0190, f02=»OF FREE AREA * x D ?* SCTNOS - NUMBER OF SEGMENTS * 0 D ?* SCTNOP - NUMBER OF PAGES * x D ?* SCTPSZ - PAGE SIZE * D ?
0x2e7198…2e732c Dummy {f00=0x00e9, f01=0x0190, f02=» P D ?* EXIT: PAGQUE - POINTER TO FIRST FREE PAGE BLOCK * D ?* PAGQUE+2 - POINTER TO LAST FREE PAGE BLOCK+2 * P D ?* * D ?* WORK REGISTERS: A1-A12
0x2e732c…2e74c0 Dummy {f00=0x00e9, f01=0x0190, f02=» * p D ?* * ( D ?* * p D ?*************************************************************** PAGGEN E
0x2e74c0…2e7654 (2, 180) Dummy {f00=0x00ea, f01=0x0190, f02=» NO! " LD A1,SCTOPT GET OPTION WORD ANK A1,3 PAGING? 2 P ABR(Z) A2 NO! L * b L G* RESERV SPACE FOR PAGE BLOCKS CORRESPONDING TO CORE RESIDENT SEGMENTS l * , ' LD A11,SCTSFA+2 GET START OF FREE AREA " ST A11,SCTPAG STO
0x2e7654…2e77e8 Dummy {f00=0x00ea, f01=0x0190, f02=» t PAG:10 EQU * , ' CW A7,SCTNOP EQUAL TO NUMBER OF PAGES? RF(E) PAG:30 YES! L $ LDK A1,0 RESET NUMBER OF WORDS f PAG:20 EQU * " ADKL A11,2 INCLUDE NEXT WORD 0 + RF(Z) MEMOFL MEMORY OVERFLOW (64 KB LIMIT) $ ADK A1,1 IN
0x2e77e8…2e797c Dummy {f00=0x00ea, f01=0x0190, f02=»F(E) MEMOFL MEMORY OVERFLOW! RB PAG:20 $ 0 ,PAG:25 ADK A7,1 INCREMENT PAGE BLOCK COUNTER 6 RB PAG:10 j PAG:30 EQU * | * 4 /* RESERV MEMORY PAGES IN UNUSED PART OF MEMORY 6 2* AND EXTEND PAGE TABLE WITH CORRESPONDING NUMBER
0x2e797c…2e7b10 Dummy {f00=0x00ea, f01=0x0190, f02=» X 4 P SLL A1,14 TWO MOST SIGN BITS OF 16-BITS ADDRESS 4 / LD A2,SCTEFA+2 GET BIT 2-18 OF 18-BITS ADDRESS @ & ! SRL A2,2 SKIP TWO RIGHTMOST BITS x , P ORR A1,A2 16 BITS PHYSICAL PAGE ADDRESS P LDR A3,A1 SAVE LD A2,SCTPSZ GET PAGE SIZE
0x2e7b10…2e7ca4 Dummy {f00=0x00ea, f01=0x0190, f02=»00 MODIFY FOR PAGE SIZE P ANR A2,A3 EVEN 1-KB LIMIT ( $ ORR A1,A2 MODIFY PAGE ADDRESS LIMIT B P XIF n P IFT CREDIT-MMUPAG=1 z $ P LD A1,SCTEFA+2 END OF FREE AREA P LD A10,SCTPSZ PAGE SIZE P XIF P IFT CREDIT=1 LDR A9,
0x2e7ca4…2e7e38 Dummy {f00=0x00ea, f01=0x0190, f02=»F PAG:33 PPAG:32 CWR A6,A10 PPAG:33 RF(NG) PAG:40 * , P SUR A6,A10 COMPUTE ADDRESS TO NEXT PAGE F LDR A1,A6 GET PAGE ADDRESS v P IFT CREDIT+MMUPAG=2 * & ANKL A1,/C000 ADDRESS IN SYSTEM AREA? RF(NZ) PAG:34 NO! . * LDR A1,
0x2e7e38…2e7fcc Dummy {f00=0x00ea, f01=0x0190, f02=»E AREA v P XIF P IFT CREDIT=1 & "PAG:36 LDK A2,0 RESET WORD COUNTER 0 * %PAG:38 ADKL A11,2 RESERV ANOTHER WORD Z RF(Z) PAG:40 64 KB LIMIT $ ADK A2,1 INCREMENT WORD COUNTER CWK A2,4 BLOCK COMPLETE? RF(E) PAG:45 YES!
0x2e7fcc…2e8160 Dummy {f00=0x00ea, f01=0x0190, f02=»WR A11,A1 P RF PAG384 PPAG382 CWR A1,A11 $ 4 PPAG384 RF(NG) PAG:40 NO MOORE MEMORY AVALIABLE! > PPAG:39 EQU * v " CWR A11,A8 PROGRAM OVERWRITE RB(NE) PAG:38 NO! PAG:40 EQU * 6 1 CW A7,SCTNOP ONLY PAGES FOR CORE RESIDENT
0x2e8160…2e82f4 (2, 181) Dummy {f00=0x00ea, f01=0x0190, f02=»MOFL LDKL A1,LMP3 * & OTR A1,0,SOP INDICATE MEMORY OVERFLOW HLT HALT PROGRAM H , 'PAG:45 CW A7,SCTNOS MOORE PAGES WANTED? b RF(E) PAG:50 YES! $ ADK A7,1 INCREMENT PAGE COUNTER LDR A9,A6 SAVE PAGE ADDRESS P RB PAG:31
0x2e82f4…2e8488 Dummy {f00=0x00ea, f01=0x0190, f02=» A1,A9 GET ADDRESS TO FIRST PAGE LDR A2,A1 SAVE ( P XIF @ P IFT CREDIT+MMUPAG=2 L * P SRL A1,14 BIT 0-1 OF 18-BITS ADDRESS h ST A1,SCTEFA SAVE . * SLL A2,2 GET BITS 2-15 OF 18-BITS ADDRESS P XIF P IFT CREDIT=1 ST
0x2e8488…2e861c Dummy {f00=0x00ea, f01=0x0190, f02=»LOCKS h * LDK A1,0 @ ; LD A8,SAVE22,A13 PHYSICAL ADDRESS TO FIRST CORE RES. SEGM. * * % LD A11,SCTSEG START OF SEGMENT TABLE n , ( LDK A4,0 RESET RESIDENT SEGMENT COUNTER & " LD A12,SCTPAG START OF PAGE TABLE $ LD A6,SCTNOS NUMB
0x2e861c…2e87b0 Dummy {f00=0x00ea, f01=0x0190, f02=»OT LOADED IN CORE x * & ST A12,6,A11 STORE PAGE BLOCK ADDRESS , ' STR A1,A12 RESET QUEUE POINTER FORWARD H . ) ST A1,2,A12 RESET QUEUE POINTER BACKWARD x $ ST A8,4,A12 STORE PAGE ADDRESS . ) ST A11,6,A12 STORE SEGMENT BLOCK ADDRESS 0 , ADK
0x2e87b0…2e8944 Dummy {f00=0x00ea, f01=0x0190, f02=» A6,1 DECREMENT SEGMENT BLOCK COUNTER RB(P) PAG:60 . * D < 8* INITIATE PAGE BLOCK FOR FREE PAGES AND LINK TO PAGQUE N * CWR A4,A7 ANY FREE BLOCKS? P RF(E) PAG:90 NO! 4 / ST A12,PAGQUE POINTER TO FIRST FREE PAGE BLOCK
0x2e8944…2e8ad8 Dummy {f00=0x00ea, f01=0x0190, f02=»2 STORE BACKWARD POINTER ~ $ ST A9,4,A12 STORE PAGE ADDRESS $ ST A2,6,A12 INDICATE PAGE FREE H * & ADK A4,1 INCREMENT PAGE BLOCK COUNTER p CWR A4,A7 LAST PAGE BLOCK? RF(E) PAG:80 YES! , ' LDR A11,A12 SAVE ADDRESS TO PAGE BLOCK
0x2e8ad8…2e8c6c Dummy {f00=0x00ea, f01=0x0190, f02=»0 NEXT PAGE RB PAG:70 PAG:80 EQU * & & ! LDKL A1,PAGQUE POINTER TO PAGQUE : $ STR A1,A12 STORE IN LAST BLOCK d & " ST A12,PAGQUE+2 STORE IN PAGQUE+2 PPAG:90 EQU * PPAGEX EQU *-REL P EJECT P XIF P P
0x2e8c6c…2e8e00 Dummy {f00=0x00ea, f01=0x0190, f02=»PPLICATION r P XIF P IFT CREDIT=1 , P LD A14,SAVE13,A13 TRUE START OF S:GTAB 4 P XIF d P SUKL A14,8 ADJUST FOR MAP p * P ADKL A13,SYA360 CONTINUATION ADDRESS $ P LDK A1,0 INDICATE SYSLOAD ENDED P OTR A1,0,SOP $ P LD A1,SCT
0x2e8e00…2e8f94 (2, 182) Dummy {f00=0x00ea, f01=0x0190, f02=»A370 RESTORE PROGRAM BASE OINTER P* ( P* INIT A15 STACK 2 P* L P LD A15,SCTSTB V P SUKL A15,4 l P P* START APPLICATION P . P LD A1,IHRTC GET INTERRUPT ADDRESS FOR RTC P ST A1,SAVRTC,A13 SAVE 4 P LDKL A1,IHR
0x2e8f94…2e9128 Dummy {f00=0x00ea, f01=0x018e, f02=»TIALIZE DEVICES ~ P CF A15,SAVE8 SAVE REGISTERS P* < F P* WAIT APPROXIMATELY 0.62 SECONDS BEFORE BRANCHING TO DISPATCHER F P* P LDKL A1,/FFFF SET COUNTER PDELAY SRC A2,31 P SUK A1,1 P RB(NZ) DELAY P INH ( P
0x2e9128…2e92bc Dummy {f00=0x00ea, f01=0x0190, f02=» P* * P* TEMPORARY INTERRUPT ROUTINE FOR RTC P* < PIHRTCO EQU *-REL F P RIT RTCDA ^ P RTN A15 p P IFF CREDIT=0 P EJECT P 6 P************************************************* 6 P***
0x2e92bc…2e9450 Dummy {f00=0x00ea, f01=0x0190, f02=» ^ 6 P************************************************* P B 6 P* BUILD COMMON AND TASKCLASS DATA AREAS. * J 6 P* BUILD TASKDATA PROTOTYPE AREA * 6 P* * 6 P****************
0x2e9450…2e95e4 Dummy {f00=0x00ea, f01=0x0190, f02=»* *** 0 P** S U B R O U T I N E S ** 2 0 P******************************************** f P P 4 P** T : D A D D ** 4 P**
0x2e95e4…2e9778 Dummy {f00=0x00ea, f01=0x0190, f02=» ** 4 P** INPUT : A8=POINTER TO T:A (IN T:ATAB) ** 6 4 P** OUTPUT: A12=T:D ADDRESS ** n 4 P************************************************ PT:DADD EQU * P IFT CREDIT-MMUPAG=1
0x2e9778…2e990c Dummy {f00=0x00ea, f01=0x0190, f02=» EL A12,T:DAD,A12 P XIF P IFF CREDIT=0 & P AD A12,MOVADD,A13 RELOCATE < P RTN A14 ` P EJECT p P ~ P 6 P** M O V C O M ** 6 P** ** 6
0x2e990c…2e9aa0 Dummy {f00=0x00ea, f01=0x0190, f02=»AT LEAST TWO T:A'S, AND MOVE ** ~ 6 P** TO COMMON AREA ** ( 6 P** ** b 6 P** INPUT : A8=POINTER IN T:ATAB ** 6 P** BIT=BIT NUMBER, SAT IN MASK **
0x2e9aa0…2e9c34 (2, 183) Dummy {f00=0x00ea, f01=0x0190, f02=»S: A1-A6,A9,A11,A12 ** 6 P************************************************* . P h PMOVCOM EQU * t & P CALL CHKMVD BLOCK ALREADY MOVED? P RF(N) MOVC20 YES! : P CALL GETWB POINTER TO WB ADD TO 'WBADD',A5=T:A-DISPL (
0x2e9c34…2e9dc8 Dummy {f00=0x00ea, f01=0x0190, f02=» P CW A6,ENDADD,A13 ALL DONE? P RF(NE) MOVC30 NO ( PMOVC20 RTN A14 YES! B P IFT CREDIT-MMUPAG=1 ^ PMOVC30 LDR* A11,A6 z P LD A2,T:DAD,A11 T:D-ADDRESS P AD A2,MOVADD,A13 RELOCATE P ST A2,SAVE03,A13 SAVE , P LD A2,WATLEN,A2
0x2e9dc8…2e9f5c Dummy {f00=0x00ea, f01=0x0190, f02=»,A13 W.B.-ADDRESS TO EXAMINE P LDR* A11,A11 $ . P CW A11,SAVE06,A13 COMPARE W.B.-ADDRESSES : P XIF l P IFT CREDIT+MMUPAG=2 x PMOVC30 ELR A11,A6 P EL A2,T:DAD,A11 T:D-ADDRESS P AD A2,MOVADD,A13 RELOCATE 0 P ST A2,SAVE03,A13 SA
0x2e9f5c…2ea0f0 Dummy {f00=0x00ea, f01=0x0190, f02=»T ELEMENTS. TAKE NEXT T:A x . P AD A11,TADISP,A13 W.B.-ADDRESS TO EXAMINE " P ELR A11,A11 T . P CW A11,SAVE06,A13 COMPARE W.B.-ADDRESSES h P XIF P IFF CREDIT=0 P RB(NE) MOVC10 .NEQ. ( P LD A9,MOVED,A13 W.B. ALREADY MOVED? . P RF(
0x2ea0f0…2ea284 Dummy {f00=0x00ea, f01=0x0190, f02=»MOVWB MOV WORK BLOCK P IM MOVED,A13 INDICATE MOVED P LD A4,UWB,A13 UWB-BLOCKS? @ P RF(Z) MOVC40 NO! b " P CALL GETPRO CREATE REAL UWB'S | 4 PMOVC40 ST A2,NEWAD2,A13 SAVE NEW ADDRESS TO W.B. P CALL MOVDWB & PMOVC50 CALL CHADR CHANGE A
0x2ea284…2ea418 Dummy {f00=0x00ea, f01=0x0190, f02=»S n & P LDR A8,A6 REPLACE POINTER TO T:A * P LD A12,SAVE03,A13 REPLACE T:D-ADDRESS 4 P CALL MOVDWB b P LDR A8,A11 v * P LD A12,SAVE25,A13 RELOAD T:D-ADDRESS P RB MOVC10 P EJECT P P 4 P** G E T P
0x2ea418…2ea5ac Dummy {f00=0x00ea, f01=0x0190, f02=» ` 4 P** SEARCH U:BTAB PROTOTYPE AND GET NUMBER OF ** 4 P** COPIES. FILL REAL U:BTAB ** @ 4 P** ** x 4 P** INPUT : A11=PROTOTYPE ADDRESS ** 4 P** A2=LAST W.B. - ADDRE
0x2ea5ac…2ea740 Dummy {f00=0x00ea, f01=0x0190, f02=»************************************************ P 8 PGETPRO EQU * D ( P LD A3,U:BTOD,A13 GET U:BTAB ADDRESS X P IFT CREDIT-MMUPAG=1 P LDR* A4,A3 LENGTH PGETP10 EQU * 6 P SUK A4,UP:REC SUB RECORD LENGTH FRM TABLE LENGTH P
0x2ea740…2ea8d4 (2, 184) Dummy {f00=0x00eb, f01=0x0190, f02=»F(E) GETP30 YES! GET NUMBER OF COPIES P ADK A3,UP:REC NEXT . P RB GETP10 J P 0 P* GET NUMBER OF COPIES * h 0 P* A3 POINTS AT PROTOTYPE ADDRESS IN U:BTAB * P PGETP30 EQU * P LD A4,WBLEN,A11 W.B.-LENGTH
0x2ea8d4…2eaa68 Dummy {f00=0x00eb, f01=0x0190, f02=»A13 ADD TO NEW TABLE ADDRESS P LDR A9,A3 $ " P ST A4,URLENG,A9 STORE LENGTH 6 * P ST A5,URNUMB,A9 STORE IN REAL U:BTAB 0 P* COPY NUMBER OF WORKBLOCKS TO COMMON AREA * 0 P******************************************** . P SUK A5,1 ONE ALREADY
0x2eaa68…2eabfc Dummy {f00=0x00eb, f01=0x0190, f02=» POINTER IN REAL U:BTAB * & P********************************* " PGETP50 EQU * L 6 P ST A2,URADDR,A9 STORE ADDRESS TO FIRST IN U:BTAB ` P XIF P IFT CREDIT+MMUPAG=2 P ELR A4,A3 LENGTH PGETP10 EQU * 6 P SUK A4,UP:REC SUB RECOR
0x2eabfc…2ead90 Dummy {f00=0x00eb, f01=0x0190, f02=»A10,UPADDR,A3 CHECK IF SAME W.B. P CWR A11,A10 ( , P RF(E) GETP30 YES! GET NUMBER OF COPIES < P ADK A3,UP:REC NEXT l P RB GETP10 P 0 P* GET NUMBER OF COPIES * 0 P* A3 POINTS AT PROTOTYPE ADDRESS IN U:BTAB *
0x2ead90…2eaf24 Dummy {f00=0x00eb, f01=0x0190, f02=»1,A3 GET NUMBER OF COPIES P ANK A5,/FF " , P SU A3,U:BTOD,A13 GET TABLE DISPLACEMENT 6 . P AD A3,U:BTNW,A13 ADD TO NEW TABLE ADDRESS f P LDR A9,A3 P TL* MMTO,A13 LOAD TO-TABLE * P ES A5,URNUMB,A9 ESORE IN REAL U:BTAB " P ES A4,URLEN
0x2eaf24…2eb0b8 Dummy {f00=0x00eb, f01=0x018e, f02=»**************************** . P SUK A5,1 ONE ALREADY MOVED (IN 'MOVCOM') $ P RF(NP) GETP50 V PGETP40 CALL MOVWB l P SUK A5,1 P RB(NZ) GETP40 P & P* UPDATE POINTER IN REAL U:BTAB * & P*********************************
0x2eb0b8…2eb24c Dummy {f00=0x00eb, f01=0x0190, f02=» P IFF CREDIT=0 P RTN A14 P EJECT . P < 2 P** M O V C L A ** H 2 P** ** ~ 2 P** ** 2 P** CHECKS IF W.B. ALREADY MOV
0x2eb24c…2eb3e0 Dummy {f00=0x00eb, f01=0x0190, f02=» ** 2 P** A LOT OF WORKREGS. ** 2 2 P********************************************* h P PMOVCLA EQU * P CALL SHIFT P RF(Z) MVCL30 * PMVCL10 CALL GETWB W.B.-ADDRESS TO A1
0x2eb3e0…2eb574 (2, 185) Dummy {f00=0x00eb, f01=0x0190, f02=»CL10 PMVCL30 RTN A14 PMVCL40 CALL MOVDT " P CALL MOVWB < P LD A4,UWB,A13 UWB-SCANNING P P RF(Z) MVCL50 NO! t P CALL GETPRO DUPLICATE WB'S . PMVCL50 ST A2,NEWAD2,A13 SAVE W.B.-ADDRESS P CALL MOVDWB PROCESS DWB'S P R
0x2eb574…2eb708 Dummy {f00=0x00eb, f01=0x0190, f02=» ** x 6 P** ** " 6 P** CHANGE ADDRESS TO W.B. & D.T. IN T:A, ** 6 P** BLOCKS ALREDY MOVED ** 6 P** ** 6
0x2eb708…2eb89c Dummy {f00=0x00eb, f01=0x0190, f02=»= NEW W.B.-ADDRESS ** ~ 6 P** TADISP=DISPLACEMENT TO WB-ADDR ** ( 6 P** WORK.REGS: A1,A2 ** b 6 P************************************************* P PCHADR EQU * P IFT CREDIT-MMUPAG
0x2eb89c…2eba30 Dummy {f00=0x00eb, f01=0x0190, f02=» SUK A1,2 ADDRESS TO D.T.-ADDRESS P LD A2,NEWAD1,A13 * P STR A2,A1 D P XIF V P IFT CREDIT+MMUPAG=2 b P ELR A1,A6 T:A-ADDRESS ~ . P AD A1,TADISP,A13 ADDRESS TO W.B.-ADDRESS P LD A2,NEWAD2,A13 P ESR A2,A1 & P SUK A1,2 ADDR
0x2eba30…2ebbc4 Dummy {f00=0x00eb, f01=0x0190, f02=»FT CREDIT+SWPBLK=2 P EJECT B P************************************************************** ( B P* * n B P* * B P* B:RSWT - BU
0x2ebbc4…2ebd58 Dummy {f00=0x00eb, f01=0x0190, f02=» * B P* REFERENCED IN: SYSLDA * < B P* * B P* ENTRY: A2 - POINTER TO FIRST RECORD IN REAL S:BTAB *
0x2ebd58…2ebeec Dummy {f00=0x00eb, f01=0x0190, f02=» * T B P* EXIT: * B P* * P B P* WORK REGISTERS: A1-A7 * B P*
0x2ebeec…2ec080 Dummy {f00=0x00eb, f01=0x0190, f02=» * h B P************************************************************** P EJECT d PB:RSWT EQU * r * P LDR A8,A2 SAVE POINTER TO FIRST BLOCK , P LD A1,SCTSWB POINTER TO SWB BLOCK TABLE * P RF(Z) RSWBEX NO SWB:S IN APPLICATIO
0x2ec080…2ec214 (2, 186) Dummy {f00=0x00eb, f01=0x0190, f02=» v P LDR* A4,A1 POINTER TO BLOCK P LDR* A6,A4 NUMBER OF COPIES , $ P LD A7,SWBLEN,A4 LENGTH IN BYTES P P XIF x P IFT CREDIT+MMUSWB=3 & P ES A6,2,A2 STORE NUMBER OF COPIES , P ES A7,4,A2 STORE LENGTH OF SWB IN BYTES P XIF P I
0x2ec214…2ec3a8 Dummy {f00=0x00eb, f01=0x0190, f02=»DIT+SWPBLK=2 & P SUK A5,6 DECREMENTS S:BTAB LENGTH ( P ADK A2,6 INCREMENT POINTER IN BLOCK > ( P SUK A3,1 DECREMENT NUMBER OF TYPES j P RB(P) RSWB10 P LDR A4,A2 P* 4 P* INIT POINTERS TO TID BLOCKS FOR EACH SWB TYPE ( P* AND R
0x2ec3a8…2ec53c Dummy {f00=0x00eb, f01=0x0190, f02=»EMENT v P IFT CREDIT+SWBMMU=2 P LD A1,2,A8 NUMBER OF COPIES * P RF(Z) RSWB50 NO COPIES! N * P STR A6,A8 STORE POINTER TO TID BLOCK n PRSWB30 STR A3,A2 RESET TID , P ADK A2,2 INCREMENT POINTER IN TID BLOCK . P SUK A5,2 DECREMENT LENGTH
0x2ec53c…2ec6d0 Dummy {f00=0x00eb, f01=0x0190, f02=» EL A1,2,A8 GET NUMBER OF COPIES P RF(Z) RSWB50 NO COPIES! ( * P ESR A6,A8 STORE POINTER TO TID BLOCK H PRSWB40 ESR A3,A2 RESET TID v , P ADK A2,2 INCREMENT POINTER IN TID BLOCK . P SUK A5,2 DECREMENT LENGTH OF REAL S:BTAB ( P SUK A1,1 DECR
0x2ec6d0…2ec864 Dummy {f00=0x00eb, f01=0x0190, f02=» P RB(NE) RSWB20 " P LDR A5,A5 S:BTAB CONSISTENT? P RF(Z) RSWBEX YES D P LDKL A1,LMP6 SWB ERROR! ^ P CALL ERROR ~ PRSWBEX RTN A14 P XIF P IFF CREDIT=0 P EJECT P P* ************************** " P* ST
0x2ec864…2ec9f8 Dummy {f00=0x00eb, f01=0x0190, f02=» P* A5=START-ADDRESS P* A9=P:MTAB ADDRESS P* SAVE03=DDIV TO-ADDRESS : P* SAVE04=DDIV FROM ADDRESS Z " P* SAVE05=LENGTH OF REAL T:ATAB | " P* SAVE06=LENGTH OF REAL U:BTAB P PSTART2 EQU *-REL " P LDR A8,P LOAD TEMP. STACKBA
0x2ec9f8…2ecb8c Dummy {f00=0x00eb, f01=0x0190, f02=» n $ P LD A2,SAVE03,A13 GET TO ADDRESS . P LDR A3,A9 GET P:MTAB START (=END OF DDIV 0 P SUR A3,A1 => LENGTH b P XIF ~ P IFT CREDIT-MMUPAG=1 . P LD A8,SCTNOS ANY SEGMENTS IN APPLICATION? P RF(Z) NOSGMT NO! ( P LDKL A8,0 RESET FSTAD
0x2ecb8c…2ecd20 Dummy {f00=0x00eb, f01=0x0190, f02=»XT LDR* A4,A1 GET WORD P STR A4,A2 STORE P ADK A1,2 6 P ADK A2,2 H P SUK A3,2 DEC LENGTH Z P RB(NN) MOVNXT v P XIF P IFT CREDIT+MMUPAG=2 P CALL XMOVE & P* REMOVE DDIV ENTRIES IN MM-TABLE P " P LDR A1,A9 GET
0x2ecd20…2eceb4 (2, 187) Dummy {f00=0x00eb, f01=0x0190, f02=»3 RELOCATE " P ADR A1,A2 P:MTAB START ENTRY P LDKL A4,/FC00 8 PSYA205 CWR A1,A2 ALL? N P RF(E) SYA207 YES! l , P STR A4,A1 REPLACE ENTRY WITH PAGE ERROR P SUK A1,2 P RB SYA205 PSYA207 EQU * P* CHANGE TABLE-ADDRESSES
0x2eceb4…2ed048 Dummy {f00=0x00eb, f01=0x0190, f02=» P ANKL A9,/FFFE EVEN ADDRESS , P ST A9,LSTADR,A13 SAVE END OF FREE AREA ( P X P ` P h . P* RESERVE SPACE FOR REAL T:A- AND U:BTAB * t P P IFT CREDIT+MMUPAG=2 ( P LDKL A3,MMTAB GET CURRENT MM-TABLE P ADR A3,A13 ,
0x2ed048…2ed1dc Dummy {f00=0x00eb, f01=0x0190, f02=»AGE n * P LD A3,SAVE05,A13 GET LENGTH OF T:ATAB P LDR A5,A3 SAVE : * P CALL MOVING RESERVE SPACE FOR T:ATAB R $ P TL* MMTO,A13 SET CORRECT TABLE " P ESR A5,A2 STORE T:ATAB LENGTH . P ST A2,T:ATNW,A13 SAVE NEW T:ATAB ADDRESS P ADK A2,
0x2ed1dc…2ed370 Dummy {f00=0x00eb, f01=0x0190, f02=»E r P P LDR A3,A5 GET LENGTH P CALL MOVING 0 P TL* MMTO,A13 D P LDR A3,A9 GET P:MTAB Z & P ADK A3,T:AID ADD TO ADDRESS WORD x 0 P ESR A5,A2 STORE TABLE LENGTH IN T:TID-TABLE " P ADK A2,2 ADJUST TABLE ADDRESS P ESR A2,A3 S
0x2ed370…2ed504 Dummy {f00=0x00eb, f01=0x0190, f02=» RESERVE SPACE 4 P ST A2,U:BTNW,A13 SAVE NEW (REAL) U:BTAB ADDRESS P IFT CREDIT-MMUPAG=1 N P STR A5,A2 STORE LENGTH j P ADK A2,2 : P ST A2,U:BTAB,A9 SAVE 'REAL' U:BTAB-ADDRESS IN P:MTAB * P LD A3,SAVE05,A13 GET LENGTH OF T:ATAB P
0x2ed504…2ed698 Dummy {f00=0x00eb, f01=0x018e, f02=»:ATAB ADDRESS t P ADK A2,2 & P ST A2,T:ATAB,A9 SAVE REAL ADDRESS ( P* RESERVE FOR T:AID TABLE R P t P LDR A3,A5 LENGTH | P CALL MOVING P STR A5,A2 STORE LENGTH $ P ADK A2,2 ADJUST FOR LENGTH-WORD , P ST A2,T:AID,A9 STORE
0x2ed698…2ed82c Dummy {f00=0x00eb, f01=0x0190, f02=» P ADK A2,2 SKIP LENGTH WORD $ P ES A2,U:BTAB,A9 STORE IN P:MTAB & P XIF N P IFT SWPBLK+CREDIT=2 Z P* v * P* RESERV SPACE FOR REAL S:BTAB TABLE P* , P LD A3,SAVE25,A13 LENGTH OF REAL S:BTAB P LDR A5,A3 SAVE P CALL MO
0x2ed82c…2ed9c0 Dummy {f00=0x00eb, f01=0x018e, f02=» ES A2,S:BTAB,A9 P CALL B:RSWT P XIF , P IFT CREDIT+SWBMMU=2 8 P STR A5,A2 T P ADK A2,2 f P ST A2,S:BTAB,A9 x P CALL B:RSWT P XIF P IFT CREDIT+MMUPAG=2 " P TL* MMFROM,A13 RELOAD TABLE P XIF P IFF CREDI
0x2ed9c0…2edb54 (2, 188) Dummy {f00=0x00ec, f01=0x0190, f02=» ( P LD A8,T:ATOD,A13 GET T:ATAB ADDRESS P IFT CREDIT-MMUPAG=1 4 P LDR* A3,A8 GET LENGTH P P XIF n P IFT CREDIT+MMUPAG=2 z P ELR A3,A8 GET LENGTH P XIF P IFF CREDIT=0 P ADR A3,A8 0 P ST A3,ENDADD,A13 SAVE END OF T:
0x2edb54…2edce8 Dummy {f00=0x00ec, f01=0x0190, f02=» RF(E) CLADAT YES! $ P CALL T:DADD T:D-ADDRESS TO A12 P IFT CREDIT-MMUPAG=1 B " P LD A7,CWBMSK,A12 GET CWB-MASK ^ P XIF P IFT CREDIT+MMUPAG=2 P EL A7,CWBMSK,A12 P XIF P IFF CREDIT=0 P CALL SHIFT SUPER-LOOPA P
0x2edce8…2ede7c Dummy {f00=0x00ec, f01=0x0190, f02=»QU * P* SEARCH UWB'S: P* $ & P IM UWB,A13 INDICATE UWB-SCANNING . P IFT CREDIT-MMUPAG=1 X P LD A7,UWBMSK,A12 t P XIF P IFT CREDIT+MMUPAG=2 P EL A7,UWBMSK,A12 P XIF P IFF CREDIT=0 P CALL SHIFT " PSY
0x2ede7c…2ee010 Dummy {f00=0x00ec, f01=0x0190, f02=»SK CLASS DATA CONFIGURATION PART * * P************************************** * P X PCLADAT EQU * ` 4 P LD A8,T:ATOD,A13 SET POINTER TO LENGTH INT:ATAB t P IFT CREDIT-MMUPAG=1 " PSYA250 CM UWB,A13 INDICATE CWB ( P ADKL A8,2 STEP TO NEXT T:
0x2ee010…2ee1a4 Dummy {f00=0x00ec, f01=0x0190, f02=»LCULATE LENGTH OF T:D P 2 P LD A1,WATLEN,A12 NUMBER OF BYTES-1 IN DBLKTAB & P ADK A1,2 P ANKL A1,/FFFE EVEN ADDRESS n ( P ADK A1,DWBFST+4 ADD DISPL. TO FIRST * P LDR A3,A1 GET NUMBER OF START-POINTS P ADR A3,A12 ADD T:D-ADDRESS
0x2ee1a4…2ee338 Dummy {f00=0x00ec, f01=0x0190, f02=»' z P ADR A3,A1 =>LENGTH P LDR A1,A12 FROM-ADDRESS & P CALL MOVING MOVE T:D F P LDR* A1,A8 GET T:A ADDRESS d * P ST A2,T:DAD,A1 STORE NEW T:D ADDRESS " P LD A7,CWBMSK,A12 GET CWBMASK P XIF P IFT CREDIT+MMUPAG=2 ( P* IN
0x2ee338…2ee4cc Dummy {f00=0x00ec, f01=0x0190, f02=»,SAVE06,A13 SAVE " PSYA250 CM UWB,A13 INDICATE CWB ( P ADKL A8,2 STEP TO NEXT T:A ADDRESS > P CW A8,ENDADD,A13 j " P RF(E) SYA270 ALL T:A'S DONE! " P CALL GETTAB GET TTAB-ADDRESS P CALL MOVMMT MOVE MM-TABLE " P* FILL MM-TABLE ADDRES
0x2ee4cc…2ee660 Dummy {f00=0x00ec, f01=0x0190, f02=» FILL TABLE ( P CALL T:DADD GET T:D ADDRESS TO A12 4 P ST A12,T:DSAV,A9 SAVE 'OLD' T:D-ADDRESS IN TTAB @ P x P* CALCULATE LENGTH OF T:D P 2 P EL A1,WATLEN,A12 NUMBER OF BYTES-1 IN DBLKTAB P ADK A1,2 P ANKL A1,/FFFE EVEN AD
0x2ee660…2ee7f4 (2, 189) Dummy {f00=0x00ec, f01=0x0190, f02=»A3 . 0 P LDK A2,STPREC GET STARTPOINTS RECORD LENGTH P CALL MULT AND MULTIPLY @ P ADK A3,2 'NUMBER-WORD' ` P ADR A3,A1 =>LENGTH P LDR A1,A12 FROM-ADDRESS P CALL MOVING MOVE T:D P ELR A1,A8 GET T:A ADDRESS * P ES A2,T:DAD
0x2ee7f4…2ee988 Dummy {f00=0x00ec, f01=0x0190, f02=» P P P* TASK CLASS DATA UWB'S * P************************* > & P IM UWB,A13 INDICATE UWB SCANNING ` P IFT CREDIT-MMUPAG=1 " P LD A7,UWBMSK,A12 GET UWBMASK P XIF P IFT CREDIT+MMUPAG=2 P EL A7,UWBMSK,A12
0x2ee988…2eeb1c Dummy {f00=0x00ec, f01=0x0190, f02=»****************************** P & PSYA260 EQU * . P IFT CREDIT-MMUPAG=1 B P LD A7,SWBMSK,A12 ^ P RF(Z) SYA265 NONE x P CALL SKRITT PSYA265 LD A7,TWBMSK,A12 P XIF P IFT CREDIT+MMUPAG=2 P EL A7,SWBMSK,A12 P
0x2eeb1c…2eecb0 Dummy {f00=0x00ec, f01=0x0190, f02=»ALL SKRITT P RB SYA250 P $ PSYA270 RF PRODAT 0 P EJECT H P V P b 4 P** S K R I T T ** n 4 P** ** 4 P** MOVE D.T
0x2eecb0…2eee44 Dummy {f00=0x00ec, f01=0x0190, f02=» * P CALL SHIFT PNO RF(NZ) NES P RTN A14 4 PNES CALL GETWB D P CALL MOVDT Z . P CM NEWAD2,A13 NO NEW W.B.-ADDRESS (YET!) n P CALL MOVDWB P CALL SKIFTA P RB NO P EJECT P & P* BUILD TASKDATA PROTOTY
0x2eee44…2eefd8 Dummy {f00=0x00ec, f01=0x018e, f02=»? j P RF(Z) SYA275 NO! 2 P CALL GETTTB GET TTAB ADDRESS. TID 'TB' IN A1 $ & P CM TTB:PP,A2 CLEAR TCL SAVE AREA Z P IFT CREDIT+MMUPAG=2 =00001 P CALL MOVMMT MOVE MM-TABLE P XIF =00001 P IFF CREDIT=0 =00001 PSYA275 EQU
0x2eefd8…2ef16c Dummy {f00=0x00ec, f01=0x0190, f02=» PSYA280 ADKL A8,2 P CW A8,ENDADD,A13 P RF(E) SYA290 ALL DONE 6 P IFT CREDIT-MMUPAG=1 T " P LDR* A12,A8 GET T:D ADDRESS.. p P LD A12,T:DAD,A12 . 0 P CALL TWBSWB MOVE TWB'S & RESERVE FOR SWB'S P " P* CALCULATE LENGTH OF
0x2ef16c…2ef300 Dummy {f00=0x00ec, f01=0x0190, f02=» n P LDK A2,DSCBL DSCB-LENGTH ( P CALL MULT A3() X (A2) RESULT IN A3 * & P ST A3,CSN,A1 SAVE LENG OF DSCB'S V ( P LD A2,FCD,A12 GET FCB-DISPLACEMENT P RF(NZ) SYA285 FCB PRESENT & P SUR A2,A3 MOVD30E A3(DSCB-LENGTH) , P ADKL A2,T:ASTA
0x2ef300…2ef494 (2, 190) Dummy {f00=0x00ec, f01=0x0190, f02=»SE,A1 AND SAVE TEMPORARY * P LD A2,SCTLAC GET START OF COMMON PART P LD A2,P:BAS,A2 GET P:BAS N P ST A2,CSB,A1 AND SAVE p " P CALL ALLBUF ALLOCATE BUFFERS P CALL MOVT:A MOVE T:A * P STR A2,A8 STORE NEW ADDRESS IN T:ATAB P XIF
0x2ef494…2ef628 Dummy {f00=0x00ec, f01=0x0190, f02=»GET LAST USED ENTRY IN CLASS-LOCAL MM-TABLE P 4 ( P TL MMBEG,A2 LOAD CLASS LOCAL TABLE < * P LDKL A3,MMTAB GET WORK TABLE ADDRESS h P ADR A3,A13 $ P TSR A3 STORE TABLE IN WORK-AREA $ P TL MMDDIV,A13 RELOAD DDIV TABLE P CALL MMENT GE
0x2ef628…2ef7bc Dummy {f00=0x00ec, f01=0x0190, f02=» r " P*** *** P . P ELR A1,A8 GET T:A-ADDRESS : & P EL A3,DATLEN,A12 A12=T:D-ADDRESS P LDK A2,DSCBL DSCB-LENGTH ( P CALL MULT A3() X (A2) RESULT IN A3 & P ES A3,CSN,A1 SAVE LENG OF DSCB'S ( P EL A2,FCD
0x2ef7bc…2ef950 Dummy {f00=0x00ec, f01=0x0190, f02=»TO FIRST WORD v 6 PSYA285 ES A2,CIA,A1 SAVE DISPLACEMENT TO T:A-ESART " P EL A2,STKB,A1 GET STACK SIZE P & P ES A2,CSE,A1 AND SAVE (TEMPORARY) v & P LD A2,SCTLAC GET START OF P:MTAB $ P TL* MMTO,A13 LOAD CORRECT TABLE P EL A2,P:BAS,A2 GET P:
0x2ef950…2efae4 Dummy {f00=0x00ec, f01=0x0190, f02=»OVE T:A * P ESR A2,A8 STORE NEW ADDRESS IN T:ATAB P XIF > P IFF CREDIT=0 J P RB SYA280 NEXT ` P EJECT x PSYA290 EQU * 4 P IM FLAG,A13 INDICATE REAL DATA-PART PROCESSING , P* INCLUDE DDIV AND PART 2.A IN FREE AREA P .
0x2efae4…2efc78 Dummy {f00=0x00ec, f01=0x018e, f02=»A3,/F000 $ P SRL A3,2 GET NEW PHYSICALL PAGE P ST A3,FSTPAG,A13 SAVE 8 ( P ANKL A2,/FFF GET NEW PAGE INCREMENT V P ST A2,FSTADR,A13 SAVE P* MOVE T:ATAB P * P LD A2,T:ATNW,A13 GET REAL T:A-ADDRESS P XIF P IFT CREDIT-MMUP
0x2efc78…2efe0c Dummy {f00=0x00ec, f01=0x0190, f02=» P LDR* A1,A2 REAL LENGTH $ P ADR A2,A1 END OF TABLE ADDRESS $ P ST A2,ENDADD,A13 SAVE L & P LD A1,T:ATOD,A13 GET FROM-ADDRESS j P LDR* A3,A1 MOVE-LENGTH P SUR A2,A3 TO-ADDRESS P ST A2,T:ATOD,A13 SAVE P CALL MOVE P XIF
0x2efe0c…2effa0 Dummy {f00=0x00ec, f01=0x0190, f02=»AD TABLE | P ADR A2,A1 END ADDRESS 4 P ST A2,ENDADD,A13 SAVE 'END-OF-T:ATAB-CONDITION' . * P LD A1,T:ATOD,A13 GET PROTOTYP T:ATAB f P ELR A3,A1 GET LENGTH P SUR A2,A3 TO-ADDRESS P ST A2,T:ATOD,A13 SAVE P CALL XMOVE P XIF
0x2effa0…2f0134 (2, 191) Dummy {f00=0x00ec, f01=0x0190, f02=»D BASE ADDRESS P ABR A5 & PLENGT2 EQU *-REL LENGTH OF PART 2 & P EJECT P P ^ P j 2 P********************************************* v 2 P******* ******* 2 P**
0x2f0134…2f02c8 Dummy {f00=0x00ec, f01=0x0190, f02=» ***** 2 P********************************************* * P ` 2 P* READ CONFIGURATION FILE & BUILD * l 2 P* SHADOW-TABLES * 2 P* *
0x2f02c8…2f045c Dummy {f00=0x00ec, f01=0x0190, f02=»********* t * P*** *** * P** S U B R O U T I N E S ** @ ( P** -USED IN THIS PART ONLY * n * P************************************* P EJECT P P 6 P** C O N
0x2f045c…2f05f0 Dummy {f00=0x00ec, f01=0x0190, f02=» ** b 6 P** CONVERSION OF TWO ASCII-DIGITS TO BINARY ** 6 P** ** F 6 P** INPUT : A5=ASCII DIGITS ** 6 P** OUTPUT: A1=BINARY RESULT ** 6 P** WORK.REGS: A3,A2
0x2f05f0…2f0784 Dummy {f00=0x00ec, f01=0x0190, f02=»0 CLEAR RESULT REG P LDR A3,A5 P SRL A3,8 GET TEN'S , P SUK A3,/30 H P ADR A1,A3 P LDR A2,A1 MULT BY 10 n P ADR A1,A1 . P SLL A2,3 . P ADR A1,A2 .... P LDR A3,A5 P ANK A3,/F GET ONE'S P ADR A1,A3
0x2f0784…2f0918 Dummy {f00=0x00ec, f01=0x0190, f02=» ** l 6 P** ** 6 P** SKIP TO NEXT BLOCK IN CONFIGURATION FILE ** P 6 P** ** 6 P** INPUT: A11=ADDRESS TO CURRENT BLOCK-START ** 6 P** OUTPUT
0x2f0918…2f0aac Dummy {f00=0x00ec, f01=0x018e, f02=» ** r 6 P************************************************** P V PNXTBLK EQU * ^ 6 P ADKL A11,TDBNC NUMBER OF TERMINAL DEVICE CLASSES r 2 PNXTCOM EQU * ENTRY: SKIP TO NEXT COMMON-BLOCK P LCR A5,A11 P SLL A5,8 P
0x2f0aac…2f0c40 Dummy {f00=0x00ec, f01=0x0190, f02=» 0 P LCR A5,A11 GET NUMBER OF SPEC, DEV. CLASSES P SLL A5,8 8 P LC A5,1,A11 J P CALL CONVRT ^ , P LDK A2,SDC SPEC. DEV. CL. RECORD LENGTH r P LDR A3,A1 P CALL MULT P ADR A11,A3 A11=NEXT BLOCK P ADKL A11,2 $ P LC A2,TDBBT
0x2f0c40…2f0dd4 (2, 192) Dummy {f00=0x00ed, f01=0x0190, f02=» ** 8 P** ** 4 8 P** CONVERT 3 ASCII-DIGITS TO BINARY ** p 8 P** ** 8 P** INPUT : A6=ADDRESS TO FIRST
0x2f0dd4…2f0f68 Dummy {f00=0x00ed, f01=0x0190, f02=» ** ` 8 P**************************************************** P H PGETNUM EQU * T P LDK A4,100 FIRST INCREMENT h P LDK A5,0 CLEAR RESULT REG P SUK A6,1 INIT POINTER PGET030 ADK A6,1 NEXT DIGIT P LCR A2,A6 GET CHAR
0x2f0f68…2f10fc Dummy {f00=0x00ed, f01=0x0190, f02=» SUK A4,90 NEXT INCREMENT (TEN'S) P RB(P) GET030 * & P ADK A4,81 NEXT INCREMENT (ONE'S) @ P RB(P) GET030 THIRD DIGIT j P RTN A14 P EJECT P P* START OF PROGRAM PART 1 * P 4 P* SAVE02=POINTER TO 1:ST USER TASK TTAB-AD
0x2f10fc…2f1290 Dummy {f00=0x00ed, f01=0x0190, f02=» P* P LD A15,SCTSTB P SUKL A15,4 $ P 8 & P LD A2,SCTLAC GET S:GTAB (IF ANY) @ P IFT MMUPAG=0 j . P LD A2,CREID,A2 GET CREDIT IDENTIFICATION P XIF P IFT MMUPAG=1 P TL MMTAB,A13 %%## P EL A2,CREID,A2 P X
0x2f1290…2f1424 Dummy {f00=0x00ed, f01=0x0190, f02=»0 YES! START CONFIGURATE P IFF CREDIT=1 P 6 P* ASSEMBLER APPLICATION > P ^ P* SWITCH TO LEVEL 0 ENB f P ( P LDKL A4,SYA103 CONTINUATION ADDRESS P ADR A4,A13 RELOCATE P STR A4,A15 PUT ON STACK P LDKL A4,/00C0
0x2f1424…2f15b8 Dummy {f00=0x00ed, f01=0x0190, f02=»ET MM-TABLE ADDRESS P ADR A4,A13 RELOCATE P ST A4,MMFROM,A13 SAVE 8 ( P* FILL MM-TABLES IN USER TASK TTAB'S V P ( P LD* A5,SCTTCT GET LENGTH OF TC:TAB $ P LD A6,SAVE02,A13 1:ST USER TASK P LDR A3,A6 SAVE 0 P SU A3,SCTTCT GET
0x2f15b8…2f174c Dummy {f00=0x00ed, f01=0x0190, f02=»DKL A1,/FC00 P LDKL A2,MMTAB P ADR A2,A13 * P LDR A4,A2 =00002 > P SUKL A4,MMBEG X P AD A4,SCTMMC n PSYA:10 CWR A4,A2 P RF(E) SYA105 P SUK A4,2 P STR A1,A4 P RB SYA:10 PSYA105 SUK A5,2 ALL? P RF(
0x2f174c…2f18e0 Dummy {f00=0x00ed, f01=0x018e, f02=»A107 EQU * P XIF P IFF CREDIT=1 2 P LD* A5,SAVE02,A13 1:ST USER TASK TTAB ADDRESS 4 . P LD A2,SAVE09,A13 EXECUTION START ADDRESS j ( P AD A2,SCTLAC ADD RELOCATION ADDRESS P LDK A3,0 SEGMENT NUMBER P CF A15,ACTOT QUEUE TASK " P
0x2f18e0…2f1a74 (2, 193) Dummy {f00=0x00ed, f01=0x018e, f02=» P , P* READ CONFIG FILE AND BUILD SHADOWTABLE P D 0 P CM SAVE02,A13 CLEAR 'BUGGER TASK INDICATOR' P P IFT CREDIT-MMUPAG=1 & P LD* A2,SCTLAC GET START OF P:MTAB $ P LD A12,T:ATAB,A2 T:ATAB ADDRESS & P SUKL A12,2 ADJUST FOR
0x2f1a74…2f1c08 Dummy {f00=0x00ed, f01=0x0190, f02=» $ P ST A4,U:BTOD,A13 SAVE IN SYSLDA P XIF , P IFT CREDIT+SWBMMU=2 8 ( P LD A4,S:BTAB,A2 GET S:BTAB ADDRESS T $ P SUK A4,2 ADJUST FOR LENGTH WORD P ST A4,S:BTOD,A13 SAVE P XIF P IFT CREDIT-MMUPAG=1 P* T:ATAB PROCESSING:
0x2f1c08…2f1d9c Dummy {f00=0x00ed, f01=0x0190, f02=» ~ P " P LDR A11,A3 END OF SHADOW-TAB P LDR A9,A13 START OF SYSLDA 6 P CALL CMPADR Z P RF(L) SYA110 OK! n " P LDKL A1,LMP3 MEMORY OVERFLOW P CALL ERROR ( PSYA110 LDR A9,A2 GET P:MTAB ADDRESS P LDK A2,0 P* CLEAR
0x2f1d9c…2f1f30 Dummy {f00=0x00ed, f01=0x0190, f02=» " P STR A4,A3 STORE TABLE LENGTH ( P LD A11,SAVE01,A13 GET CONFIG START * " P LC A2,TDBBT,A11 GET BLOCKTYPE V P CCK A2,'TT' TASK DEF? | P RF(E) SYA120 OK! P LDK A1,LMP4 NO TASK PRESENT P CALL ERROR ( PSYA120 LC A2,TDBMC+4,A11 GET
0x2f1f30…2f20c4 Dummy {f00=0x00ed, f01=0x0190, f02=»E02,A13 INDICATE BUGGER TASK PRESENT =00001 " P RF SYA136 SKIP TO NEXT BLOCK 4 PSYA125 LDR A8,A12 SAVE Z P LDR* A4,A12 T:ATAB LENGTH x PSYA130 ADKL A8,2 NEXT T:A P LDR* A6,A8 GET T:A ADDRESS P SUK A4,2 P RF(NZ) SYA135 0 P
0x2f20c4…2f2258 Dummy {f00=0x00ed, f01=0x0190, f02=»SYA130 NO! P SUR* A4,A12 T:ATAB LENGTH P XIF 4 P IFT CREDIT+MMUPAG=2 @ & P EL* A2,SCTLAC GET START OF P:MTAB $ P EL A12,T:ATAB,A2 T:ATAB ADDRESS $ P SUKL A12,2 INCLUDE LENGTH WORD & P ST A12,T:ATOD,A13 SAVE IN SYSLDA $ P EL A4,U
0x2f2258…2f23ec Dummy {f00=0x00ed, f01=0x0190, f02=»MMUSWB=3 ( P EL A4,S:BTAB,A2 GET S:BTAB ADDRESS $ P SUK A4,2 ADJUST FOR LENGTH WORD < P ST A4,S:BTOD,A13 SAVE d P XIF P IFT CREDIT+MMUPAG=2 P* T:ATAB PROCESSING: P P ELR A4,A12 T:ATAB-LENGTH P LDR A3,A4 SAVE
0x2f23ec…2f2580 Dummy {f00=0x00ed, f01=0x0190, f02=» LDR A11,A3 END OF SHADOW-TABLE P LDR A9,A13 START OF SYSLDA ( P CALL CMPADR L P RF(L) SYA110 OK! ` " P LDKL A1,LMP3 MEMORY OVERFLOW z P CALL ERROR ( PSYA110 LDR A9,A2 GET P:MTAB ADDRESS P* CLEAR T:ATAB SHADOW-TABLE: P
0x2f2580…2f2714 (2, 194) Dummy {f00=0x00ed, f01=0x0190, f02=»GTH v ( P LD A11,SAVE01,A13 GET CONFIG START " P LC A2,TDBBT,A11 GET BLOCKTYPE 8 P CCK A2,'TT' TASK DEF? ^ P RF(E) SYA120 OK! | P LDK A1,LMP4 NO TASK PRESENT P CALL ERROR ( PSYA120 LC A2,TDBMC+4,A11 GET TASK ID P SLL A2,8 .
0x2f2714…2f28a8 Dummy {f00=0x00ed, f01=0x0190, f02=»PRESENT' h P RF SYA136 SKIP THIS BLOCK PSYA125 LDR A8,A12 SAVE 2 P ELR A4,A12 T:ATAB LENGTH P PSYA130 ADKL A8,2 NEXT T:A r P ELR A6,A8 GET T:A ADDRESS P SUK A4,2 P RF(NZ) SYA135 , P LDK A1,LMP5 NO PROT. FOUND (TID ERROR)
0x2f28a8…2f2a3c Dummy {f00=0x00ed, f01=0x018e, f02=» ELR A10,A12 P SUR A4,A10 T:ATAB LENGTH P XIF 6 P IFF CREDIT=0 B . P NGR A4,A4 => A4=DISPLACEM. IN SHADOW-TAB X ( P LC A5,TDBNT,A11 GET NUMBER OF TASKS P SLL A5,8 P LC A5,TDBNT+1,A11 P CALL CONVRT ( P LD A2,SCTSFA STAR
0x2f2a3c…2f2bd0 Dummy {f00=0x00ed, f01=0x0190, f02=» z P ! PSYA136 CALL NXTBLK ! PSYA137 EQU * ! . P CCK A2,'TT' ! B & P RB(E) SYA120 NEXT TASK DEF BLOCK ! V P CCK A2,'CC' ! P RF(NE) SYA140 ! * P ADKL A11,1 STEP TO NUMBER OF COM.DEV. ! P CALL NXTCOM SKIP COMMON DEF ! PSYA140 CCK A
0x2f2bd0…2f2d64 Dummy {f00=0x00ed, f01=0x0190, f02=» IN PROTOTYPE ! l PSYA141 EQU * " P XIF " * P IFT CREDIT+SWPBLK=2 " 6 P LCR A2,A11 " R P CCK A2,'SS' " f P RF(NE) SYA152 " z P LD A8,S:BTOD,A13 " P CALL USWBTP " P XIF " P IFT CREDIT=1 " P RF SYA152 " P EJECT " L P********
0x2f2d64…2f2ef8 Dummy {f00=0x00ed, f01=0x0190, f02=» * " P L P* USWBTP - INSERT NUMBER OF COPIES IN U:BTAB/S:BTAB PROTOTYPE TABLE * # L P* ================================================================= * # ` L P* * # L P* REFER
0x2f2ef8…2f308c Dummy {f00=0x00ed, f01=0x0190, f02=» * # P L P* ENTRY: A8 - MODIFIED ADDRESS TO U:BTAB/S:BTAB PROTOTYPE TABLE * $ L P* A11- POINTER IN CONFIGURATION TABLE TO 'U' OR 'S' BLOCK * $ ` L P* * $ L P* EXIT:
0x2f308c…2f3220 Dummy {f00=0x00ed, f01=0x0190, f02=» * $ P L P* WORK REGISTERS: * % L P* * % ` L P* SUBROUTINES: GETNUM,ERROR * % L P*
0x2f3220…2f33b4 (2, 195) Dummy {f00=0x00ed, f01=0x0190, f02=»******* % P P & PUSWBTP EQU * & P & , P XIF & 4 P IFT CREDIT-MMUPAG=1 & @ P ADKL A11,1 & P LDR A6,A11 & p * P CALL GETNUM PACK 3 DIG. RESULT IN A5 & $ P LDR A1,A5 SAVE NUMBER OF UWB'S & PSYA142 EQU * & P LDR A12,A8 & " P LDR*
0x2f33b4…2f3548 Dummy {f00=0x00ed, f01=0x0190, f02=»FIG & h P SLL A2,8 ' P LC A2,1,A11 GET 2:ND CHAR ' 6 P CW A2,UPNAME,A12 COMPARE W. 1:ST WORD IN PROTOTYP ' @ * P RF(E) FRSTOK FIRST TWO CHARACTERS OK! ' z 0 PSYA147 SUK A3,UP:REC DEC. NUMBER OF PROT.'S ' P RF(NN) SYA150 ' P LDK A1,LMP6 UWB NOT F
0x2f3548…2f36dc Dummy {f00=0x00ed, f01=0x0190, f02=» 3:RD CHAR ' z P CC A2,UPNAME+2,A12 ( P RB(NE) SYA147 .NEQ. ( . P EJECT ( J P ( X P* PROTOTYPE FOUND * ( d P ( 8 P ADKL A11,NAMUWB SKIP TO 'NUMBER OF BOCKS' IN CONFIG ( P LDR A6,A11 ( P CALL GETNUM CONVERT ( 2 P SC A5,UPNUMB,A1
0x2f36dc…2f3870 Dummy {f00=0x00ed, f01=0x018e, f02=» RTN A14 ( P XIF ) P IFT CREDIT+MMUPAG=2 ) P ADKL A11,1 ) 8 P LDR A6,A11 ) L * P CALL GETNUM PACK 3 DIG. RESULT IN A5 ) ` $ P LDR A1,A5 SAVE NUMBER OF UWB'S ) PSYA142 EQU * ) P LDR A12,A8 START OF TABLE ) P ELR A3,A12 LENGTH OF U:BTAB
0x2f3870…2f3a04 Dummy {f00=0x00ed, f01=0x0190, f02=» ) P LC A2,1,A11 GET 2:ND CHAR * 2 P EL A10,UPNAME,A12 GET FIRST WORD IN PROTOTYPE * * P CWR A2,A10 * ` P RF(E) FRSTOK FIRST WORD OK! * t 0 PSYA147 SUK A3,UP:REC DEC. NUMBER OF PROT.'S * P RF(NN) SYA150 * P LDK A1,LMP6 UWB NOT FOUND * P CAL
0x2f3a04…2f3b98 Dummy {f00=0x00ed, f01=0x0190, f02=» CONFIG * j 0 P EL A2,UPNAME+2,A12 GET 3:RD CHAR FROM PROY + P SRL A2,8 + D P ANKL A10,/FF + V P CWR A10,A2 + l P RB(NE) SYA147 .NEQ. + P EJECT + P + P* PROTOTYPE FOUND * + P******************* + P + 8 P ADKL A11,NAMU
0x2f3b98…2f3d2c Dummy {f00=0x00ed, f01=0x0190, f02=»-TABLE + f P ANKL A10,/FF00 , P ORR A10,A5 , & P ES A10,UPNUMB-1,A12 , : . P SUK A1,1 DEC. NO OF TYPES IN CONFIG FILE , V P RB(P) SYA142 , P ADKL A11,UDBFST-1 , P RTN A14 , P XIF , P IFT CREDIT=1 , P EJECT , PSYA152 EQU * ,
0x2f3d2c…2f3ec0 Dummy {f00=0x00ed, f01=0x0190, f02=»OF T:ATAB , r P XIF - P IFT CREDIT+MMUPAG=2 - ( P EL* A7,T:ATOD,A13 GET T:ATAB LENGTH - : * P SLL A7,1 RESERVE FOR MM-ADDRESS-TABLE - f P XIF - P IFF CREDIT=0 - 0 P AD A7,SCTSFA TO-ADDRESS (AFTER SHADOW-TABLE - P ADK A7,1 - P ANKL A7,/FF
0x2f3ec0…2f4054 (2, 196) Dummy {f00=0x00ee, f01=0x0190, f02=»2,A2 - 4 P ST A2,SAVE04,A13 SAVE NEW RELOCATION TEMPORARY . P IFT CREDIT+MMUPAG=2 . D & P* CREATE SYSLDA & DDIV MM-TABLE * . ` P . " P LDR A2,A7 TO-ADDRESS (SYSLDA) . P ANKL A2,/F000 FIRST PAGE . ( P ST A2,MMREL1,A13 SAVE PHYSICAL PAGE . " P S
0x2f4054…2f41e8 Dummy {f00=0x00ee, f01=0x0190, f02=» ( PSYA157 STR A2,A11 STORE PAGE-POINTER / P ADKL A11,2 NEXT ENTRY / 0 P ADKL A2,/400 PAGE INCREMENT / N P SUK A3,1 ALL? / r P RB(NZ) SYA157 NO! / ( P ANKL A7,/FFF GET DISPLACEM. IN PAGE / P XIF / P IFF CREDIT=0 / 0 P ST A7,SAVE12,A13 SAVE (
0x2f41e8…2f437c Dummy {f00=0x00ee, f01=0x0190, f02=» / $ P* CALCULATE DDIV FROM-ADDRESS * 0 P 0 2 P LD A1,SCTLAC GET S:GTAB 0 : * P ST A1,SAVE13,A13 SAVE S:GTAB ADDRESS 0 Z & P ST A9,SCTLAC SAVE START OF P:MTAB 0 P IFT CREDIT-MMUPAG=1 0 ( P LD A3,NUMSEG,A1 NUMBER OF SEGMENTS 0 P XIF 0 P I
0x2f437c…2f4510 Dummy {f00=0x00ee, f01=0x0190, f02=»ORD LENGTH 0 p P CALL MULT 1 P ADR A1,A3 1 $ & P ADK A1,NUMSEG+2 => START OF DDIV 1 6 2 P LD A2,SAVE04,A13 GET NEW RELOCATION INCREMENT 1 ` 0 P ADS A2,M:REL,A13 AND ADJUST RELOCATION BASE 1 P IFT CREDIT+MMUPAG=2 1 P 1 . P ST A1,SAVE04,A13 SAVE DDI
0x2f4510…2f46a4 Dummy {f00=0x00ee, f01=0x0190, f02=»0 1 " P SUR A6,A1 RELOCATION FOR DDIV 2 P EJECT 2 0 P 2 > P 2 F P 2 R 0 P* RELOCATE ADDRESSES IN T:ATAB AFTER MOVE * 2 ^ . P* CALCULATE TOTAL (=REAL) LENGTH * 2 . P* REMOVE NOT USED ENTRIES IN T:ATAB * 2 . P* A9=P:MTAB A6=M
0x2f46a4…2f4838 Dummy {f00=0x00ee, f01=0x018e, f02=»S 2 ~ P 3 ( P LD A8,T:ATOD,A13 GET T:ATAB ADDRESS 3 P LDR* A3,A8 GET LENGTH 3 > P ADR A3,A8 END OF T:ATAB 3 P ST A3,ENDADD,A13 SAVE 3 | 0 P LD A5,SCTSFA GET START OF T:ATAB SHADOW-TAB 3 P LDR A4,A5 2:ND POINTER 3 & P LDR A2,A8 2:ND POINTER IN
0x2f4838…2f49cc Dummy {f00=0x00ee, f01=0x018e, f02=» P 4 " PSYA160 ADKL A8,2 TAKE NEXT T:A 4 $ P ADK A5,2 NEXT T:A IN SHADOW-TAB 4 2 P CW A8,ENDADD,A13 4 Z P RF(E) SYA170 ALL DONE 4 t P LDR* A1,A8 GET T:A 4 * P LDR* A7,A5 GET CONTENTS OF SHADOW-TAB 4 , P RB(Z) SYA160 THIS T:A IS NOT USED!!!!! 4
0x2f49cc…2f4b60 Dummy {f00=0x00ee, f01=0x0190, f02=» ( P ADK A2,2 UPDATE 2:ND T:ATAB ADDRESS 5 8 P STR A7,A4 STORE NUMBER OF T:A'S (EV. ON NEW PLACE) 5 0 P LDR* A10,A8 GET T:A-ADDRESS 5 l P ADR A10,A6 RELOCATE 5 . P STR A10,A2 STORE ADDR. (EV. ON NEW PLACE) 5 P* RELOCATE W.B.-ADDRESSES 5 P 5 $ P
0x2f4b60…2f4cf4 (2, 197) Dummy {f00=0x00ee, f01=0x0190, f02=» SUK A7,1 DEC. COUNTER 5 P RB(N) SYA160 TAKE NEXT T:A 6 P ADRS A6,A1 RELOCATE 6 B P XIF 6 ^ P IFT CREDIT+MMUPAG=2 6 j P 6 P* INITIATE POINTERS 6 P 6 P LD A8,T:ATOD,A13 T:ATAB 6 P ELR A3,A8 GET LENGTH 6 P ADR A3,A8 END OF T:ATAB
0x2f4cf4…2f4e88 Dummy {f00=0x00ee, f01=0x0190, f02=»D POINTER IN T:ATAB 6 & P LDK A3,2 SET 'NEW' T:ATAB COUNTER 7 . P SUR A11,A11 CLEAR REAL LENGTH ACCUMULATOR 7 F P 7 x P* SCAN T:ATAB: 7 P 7 " PSYA160 ADKL A8,2 TAKE NEXT T:A 7 $ P ADK A5,2 NEXT T:A IN SHADOW-TAB 7 P CW A8,ENDADD,A13 7 P R
0x2f4e88…2f501c Dummy {f00=0x00ee, f01=0x018e, f02=»!!! 7 l " P ADR A11,A7 ACCUMULATE LENGTH 8 , P ADK A3,2 INCREMENT 'NEW' T:ATAB LENGTH 8 2 , P ADK A4,2 UPDATE 2:ND SHADOW-TAB ADDRESS 8 b ( P ADK A2,2 UPDATE 2:ND T:ATAB ADDRESS 8 8 P STR A7,A4 STORE NUMBER OF T:A'S (EV. ON NEW PLACE) 8 P ELR A10,A8 GE
0x2f501c…2f51b0 Dummy {f00=0x00ee, f01=0x0190, f02=» 8 $ P EL A12,T:DAD,A1 GET T:D-ADDRESS 9 $ P EL A7,WATLEN,A12 LENGTH OF WAT 9 0 . P ADK A1,WATFST+2 ADD TO FIRST W.B.-ADDRESS 9 X PSYA165 SUK A7,1 DEC. COUNTER 9 P RB(N) SYA160 TAKE NEXT T:A 9 P ELR A10,A1 GET ADDRESS 9 P ADR A10,A6 RELOCATE 9
0x2f51b0…2f5344 Dummy {f00=0x00ee, f01=0x0190, f02=»T A6,MOVADD,A13 SAVE 9 8 P ST* A3,SCTSFA STORE NEW TABLE LENGTH IN SHADOW-TAB : P IFT CREDIT+MMUPAG=2 : X $ P ES* A3,T:ATOD,A13 AND IN T:ATAB : t P XIF : P IFT CREDIT-MMUPAG=1 : $ P ST* A3,T:ATOD,A13 AND IN T:ATAB : P XIF : P IFF CREDIT=0 :
0x2f5344…2f54d8 Dummy {f00=0x00ee, f01=0x018e, f02=»3 SAVE TOT. NUMBER OF T:A'S : P ; $ P EJECT ; 0 " P****************************** ; > $ P* RELOCATE ADDRESSES IN U:BTAB * ; d $ P* (REAL LENGTH=PROTOTYPE LEN.) * ; $ P******************************** ; P ; P IFT CREDIT-MMUPAG=1 ; $ P LD A5,U
0x2f54d8…2f566c Dummy {f00=0x00ee, f01=0x018e, f02=» ; ~ " PSYA180 RF(Z) SYA185 ALL DONE! < P ADRS A6,A5 RELOCATE < . P XIF < J P IFT CREDIT+MMUPAG=2 < V $ P LD A5,U:BTOD,A13 U:BTAB ADDRESS < r P ELR A3,A5 TABLE LENGTH < , P ST A3,SAVE06,A13 SAVE LENGTH OF U:BTAB < P ADK A5,2 < P SUK A3,2 SU
0x2f566c…2f5800 Dummy {f00=0x00ee, f01=0x0190, f02=» < P IFF CREDIT=0 = 8 P ADK A5,UP:REC ADD TO NEXT RECORD IN U:BTAB PROTOTYP = P SUK A3,UP:REC = Z P RB SYA180 = p P EJECT = PSYA185 EQU * = P IFT CREDIT+MMUSWB=3 = P* = $ P* COMPUTE REAL LENGTH OF S:BTAB = P* = $ P LD A5,S:BTO
0x2f5800…2f5994 (2, 198) Dummy {f00=0x00ee, f01=0x0190, f02=»F(Z) SYA199 ALL RECORDS SCANNED! = $ P EL A4,2,A5 GET PROT. W.B.-ADDR. > ( P ADR A4,A6 RELOCATE > P P ES A4,2,A5 STORE IT BACK > l , P EL A4,UPNUMB-1,A5 GET NUMBER OF COPIES > P ANK A4,/FF GET RIGHT BYTE > . PSYA192 RF(Z) SYA194 NO MOORE OF THIS TYP
0x2f5994…2f5b28 Dummy {f00=0x00ee, f01=0x0190, f02=»RD IN S:BTAB PROTOTYPE > r $ P SUK A3,UP:REC DECREMENT LENGTH ? P RB SYA190 ? F P XIF ? X P IFT CREDIT+SWBMMU=2 ? d $ P LD A5,S:BTOD,A13 S:BTAB ADDRESS ? * P LDR* A3,A5 LENGTH OF S:BTAB PROTOTYPE ? P LDR A2,A3 SAVE ? " P SUK A3,2 EXCLUDE LENGTH W
0x2f5b28…2f5cbc Dummy {f00=0x00ee, f01=0x0190, f02=»,A5 STORE IT BACK ? , P LD A4,UPNUMB-1,A5 GET NUMBER OF COPIES @ P ANK A4,/FF @ J . PSYA196 RF(Z) SYA198 NO MOORE OF THIS TYPE! @ ^ P ADK A2,2 INCREMENT LENGTH @ ( P SUK A4,1 DECREMENT NUMBER OF COPIES @ P RB SYA196 @ 8 PSYA198 ADK A5,UP:REC NEX
0x2f5cbc…2f5e50 Dummy {f00=0x00ee, f01=0x0190, f02=»A199 ST A2,SAVE25,A13 SAVE COMPUTED LENGTH @ P XIF A 2 P IFT CREDIT=1 A > P EJECT A T P A b 6 P* RELOCATE T:ATAB- AND U:BTAB-ADDRESSES IN P:MTAB A j P A P ADS A6,T:ATOD,A13 A P ADS A6,U:BTOD,A13 A P IFT CREDIT+SWPBLK=2 A P ADS A6,
0x2f5e50…2f5fe4 Dummy {f00=0x00ee, f01=0x0190, f02=»D-START A | $ P AD A5,SAVE12,A13 ADD NEW START B P ST A5,DATEND,A13 SAVE B 8 P XIF B V P IFT CREDIT+MMUPAG=2 B b P B ~ P B P* STORE MMTABLE ADDRESSES B P B P LDK A4,MMDDIV B " P ADR A4,A13 GET TABLE ADDRESS B & P LDR A5,A13 CALC. RE
0x2f5fe4…2f6178 Dummy {f00=0x00ee, f01=0x0190, f02=»DK A4,MMTAB B $ P ADR A4,A13 'WORK-TABLE' ADDRESS C P SUR A4,A5 RELOCATE C < P ST A4,MMFROM,A13 C X P* CALCULATE DDIV END C r P C P LDR A5,A9 DDIV END C P SU A5,SAVE04,A13 ENT-START C $ P AD A5,SAVE12,A13 ADD NEW START C P LDR A6,A5
0x2f6178…2f630c Dummy {f00=0x00ee, f01=0x0190, f02=»DRESS C l P ADR A6,A13 RELOCATE D & P LDR* A6,A6 GET MM-TABLE CONTENTS D * P ST A6,FSTPAG,A13 SAVE D T " P ANKL A5,/FFF GET DISPLACEMENT D r P ST A5,FSTADR,A13 AND SAVE D P XIF D P IFF CREDIT=0 D P* CONTINUE IN PART 2 * D P D . P L
0x2f630c…2f64a0 Dummy {f00=0x00ee, f01=0x0190, f02=»EXECUTION START ADDRESS D | P ADR A7,A2 E " P LDKL A3,LENGT2 SYSLDA LENGTH E 2 P LDR A1,A13 FROM-ADDRESS E X P E x P* MOVE SYSLDA * E P E P IFT CREDIT-MMUPAG=1 E PNXTMOV LDR* A4,A1 GET WORD E P STR A4,A2 STORE WORD E P ADK A1,2 E
0x2f64a0…2f6634 (2, 199) Dummy {f00=0x00ee, f01=0x40e4, f02=» E P IFF CREDIT=0 F P F * P ABR A7 HEJ SVEJS! VI SES I PART 2... F & P XIF F T P IFT CREDIT=0 F ` P LDKL A1,LMP9 F v $ P CALL ERROR INCONSISTENT MONITOR F P XIF F PLDAEND EQU * F P END F @ F
0x2f6634…2f67c8 Dummy {f00=0x00ee, f01=0x2008, f02=» G -ADDRESS w v PHINKAS SUK A1,1 DEC. COUNTER x P RB(N) HINKA TAKE NEXT T:A x < P ADRS A6,A2 RELOCATE x ^ P ADK A2,4 NEXT W.B. x z P RB HINKAS x P x PSTICK EQU * x P* CONTINUE IN PART 2 * x P x P LDKL A1,START2 x " P A
0x2f67c8…2f695c Dummy {f00=0x00ee, f01=0x4014, f02=» HNOD x @ x "y b * & 3 >. c " * & c P * & % c ~ * & + 1 8 @ I0 Z0 [0 c * & ]0 _0 a0 c0 e0 g0 i0 k c * &
0x2f695c…2f6af0 Dummy {f00=0x00ee, f01=0x0190, f02=» IDENT P:S002 y D 8 8 < @ y " * & 4 4 y @ * & - 4 4 4 y n * & K 4 @ 8 I 6 L0 0 W y * & i C0 W<6 0 W 0 6 y * & 0
0x2f6af0…2f6c84 Dummy {f00=0x00ee, f01=0x0190, f02=» W 0 : @ + 2 y * & ! I0 ! 3 z * & 2 I W 0 ) _ z N * & ; | 0 ! ? 2 W50 ! z | * & Y A H ( 2 z * & w 4 90 _;0 W 0 z * &
0x2f6c84…2f6e18 Dummy {f00=0x00ee, f01=0x0190, f02=» WK0 ) ? 0% ? I z * & H 0 S 0 P 0 Q { . * & + 4 0 C! m! i '0& ( { * & I 1 W{! w 0 1 { * & g H 0 6 0' W 0' { * & W 0' $ 8 2 _
0x2f6e18…2f6fac Dummy {f00=0x00ee, f01=0x0190, f02=» 1 { p * & ! 4! R 6 0' W | * & 0' W 0' $2 _, 4 | < * & 9 6 0'V W 0'V W 0'V | j * & W 4 0 1 4 4 | * & u % L% B! ) : u | * & I ! u* vb
0x2f6fac…2f7140 Dummy {f00=0x00ee, f01=0x0190, f02=» W }4 # | ~ * & % v W 4 ) } * & ) | 4 # &! " w 2 } J * & G % u " 3 $ 4 4 4 } x * & e 4 ! u 4 4 0 } * & ! = 6 6 4 K } * &
0x2f7140…2f72d4 (2, 200) Opaque[0x194]
0x2f72d4…2f7468 # DirEnt {nam=»LDTASK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1de0, f03=0x0000}
0x2f72d4…2f7468 IdxSect {
0x2f72d4…2f7468 f00 = 0x00ef // 0x2f72d4 @0x0
0x2f72d4…2f7468 f01 = 0x000c // 0x2f72d6 @0x2
0x2f72d4…2f7468 gno = [ // 0x2f72d8 @0x4
0x2f72d4…2f7468 [0x00]: C0x00ef.0x0.0
0x2f72d4…2f7468 [0x01]: C0x00ef.0x1.0
0x2f72d4…2f7468 [0x02]: C0x00ef.0x2.0
0x2f72d4…2f7468 [0x03]: C0x00ef.0x3.0
0x2f72d4…2f7468 [0x04]: C0x00f0.0x0.0
0x2f72d4…2f7468 [0x05]: C0x00f0.0x1.0
0x2f72d4…2f7468 ]
0x2f72d4…2f7468 }
0x2f7468…2f75fc Dummy {f00=0x00ef, f01=0x018e, f02=» 2 P IDENT LDTASK REL 9.2 79-12-06 870105040920 P : ( P =2, DEVICE TABLE LENGTH DATA WORD B P REL 9.2 79-11-16 n " P =1, QLTASK RETURN IN ENABLE P REL 9.1 79-05-23 P* 6 P**************************************************
0x2f75fc…2f7790 Dummy {f00=0x00ef, f01=0x018e, f02=» 6 P************************************************** P* > P* H * P* THIS MODULE CONTAINS THE LOAD TASK R 0 P* USED IN TOSS MEMORY MANAGEMENT SYSTEMS. P* & P* IT CONTAINS TWO ENTRY POINTS: P* . P* - LT:DSK USED IN
0x2f7790…2f7924 Dummy {f00=0x00ef, f01=0x0190, f02=» P* P*********** P* ENTRIES * & P*********** : P* N P* X $ P ENTRY LT:DSK DISC PAGING ENTRY b , P ENTRY LT:SWB SWAPPABLE WORK BLOCK ENTRY P ENTRY TTABLD LOAD TASK TTAB 2 P ENTRY QLTDSK ACTIVATE LDTASK AT ENTRY LT:
0x2f7924…2f7ab8 Dummy {f00=0x00ef, f01=0x0190, f02=» P* P************* P* EXTERNALS * ( P************* > P* T P* ^ " P EXTRN TLDS15 ENTRY IN TLDSEG h " P EXTRN TLDS20 ENTRY IN TLDSEG " P EXTRN MEXIT MONITOR TASK EXIT 4 P EXTRN LKMERR HALT SYSTEM DUE TO FATAL LKM ERR
0x2f7ab8…2f7c4c Dummy {f00=0x00ef, f01=0x0190, f02=» PAG:QB QUEUE LINK BACKWARDS P EXTRN PAG:PA PAGE ADDRESS $ ( P EXTRN PAG:SB SEGMENT BLOCK ADDRESS F & P EXTRN SEG:DS DISC SECTOR ADDRESS r P EXTRN SEG:EL SEGMENT LENGTH $ P EXTRN SEG:PB PAGE BLOCK ADDRESS 4 P EXTRN SWB:DS DISC SECTOR ADDRES
0x2f7c4c…2f7de0 Dummy {f00=0x00ef, f01=0x0190, f02=»S r P EXTRN ECBRC ECB RETURN CODE " P EXTRN ECBCW ECB CONTROL WORD . P EXTRN TTB:SA TTAB SAVE AREA T P EXTRN TTB:MT MMU TABLE x ( P EXTRN TTB:SB SEGMENT BLOCK ADDRESS ( P EXTRN SCTPLD PROGRAM LOADING DEVICE P EXTRN SCTPSZ PAGE SIZE
0x2f7de0…2f7f74 (2, 201) Dummy {f00=0x00ef, f01=0x0190, f02=» . P***************************************** P* 6 P* CONDITIONAL ASSEMBLY @ P* ^ . P***************************************** h P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P*
0x2f7f74…2f8108 Dummy {f00=0x00ef, f01=0x018e, f02=»852 EQU 0. p P* PCPU852 EQU 0 P* 0 P* : 6 P* A PROGRAM VERSION INCLUDING TOSS SWAPPABLE WORK D 2 P* BLOCKS IS OBTAINED BY SETTING SWPBLK EQU 1. ~ P* PSWPBLK EQU 0 P* * 4 P* A PROGRAM VERSION USING TOSS ASS
0x2f8108…2f829c Dummy {f00=0x00ef, f01=0x018e, f02=» " P* LDTASK ECB AND BUFFER AREAS P* . 4 PLD:ECB DATA 0,0,410,0,0,0 ECB AREA FOR LOAD TASK 8 P* p 4 PLD:BUF RES 205 INTERMEDIATE BUFFER FOR LOAD TASK z P* & P RES 2 LOAD TASK STACK (ONE LEVEL) ( PLD:STB EQU *-2 LOAD TASK STACK BAS
0x2f829c…2f8430 Dummy {f00=0x00ef, f01=0x0190, f02=» t P* P IFT MMUPAG=1 P RES 16 LDTASK MMU TABLE ( P XIF H P* T " P DATA 0 SEGMENT BLOCK ADDRESS ^ P* PTTABLD EQU * TTABLD ENTRY " P DATA 0 DISPATCHER QUEUE LINK " P DATA '#L' TASK IDENTIFICATION P DATA 49 PRI
0x2f8430…2f85c4 Dummy {f00=0x00ef, f01=0x0190, f02=»0,0,0,0,0,0,0 REGISTER SAVE AREA, A1-A14 P DATA 0,0,0,0,0,0,0 0 " P DATA 2 DEVICE TABLE LENGTH =2 L P* r P EJECT LDTASK | P* P* P********** P* LT:DSK * P********** P* P* D P* LT:DSK PERFORMS LO
0x2f85c4…2f8758 Dummy {f00=0x00ef, f01=0x0190, f02=»OF CALLING TASK r P* P* " * PLT:DSK EQU * LDTASK DISC PAGING ENTRY , 4 P LD A13,TTB:SA+26,A3 GET A13 FROM TTAB SAVE AREA Z , P LDKL A5,TTABLD GET LDTASK TTAB ADDRESS " P LDR* A2,A1 GET SEGMENT STATUS . P RF(NN) LTD:05 SEGMENT NOT LOADE
0x2f8758…2f88ec Dummy {f00=0x00ef, f01=0x0190, f02=»A3 SAVE A3 P LDR A5,A3 , P LD A1,SEG:PB,A1 GET PAGE BLOCK ADDRESS $ P CF A15,TLDS15 T 0 P LDR A5,A7 GET TTAB ADDRESS OF CALLING TASK j P ABL LTD:80 P* P EJECT LDTASK P* 6 P* NO PAGE AVAILABLE. PAUSE LDTASK UNTIL RE
0x2f88ec…2f8a80 Dummy {f00=0x00ef, f01=0x0190, f02=» LKM P DATA 5 PAUSE LDTASK P* ( P* GET ONE PAGE FROM PAGQUE 2 P* T PLTD:05 EQU * ^ P LD A2,PAGQUE+2 r P CWK A2,PAGQUE $ P RB(E) LTD:00 NO PAGE AVAILABLE? P* P EJECT LDTASK P* $ P* TAKE FOUND PAGE OU
0x2f8a80…2f8c14 (2, 202) Dummy {f00=0x00ef, f01=0x0190, f02=»A2 GET PAGQUE ADDRESS AND UPDATE... 4 P STR A12,A4 ...QUEUE LINK FORWARD FOR NEXT BLOCK , 4 P CMR A2 RESET QUEUE LINK FORWARD OF REMOVED BLK d , P LDKL A6,/4000 SEGMENT UNDER LOADING BIT 2 P LD A4,PAG:SB,A2 GET OLD SEGMENT BLOCK ADDRESS P RF(Z)
0x2f8c14…2f8da8 Dummy {f00=0x00ef, f01=0x0190, f02=»EG:PB,A1 SET NEW PAGE BLOCK ADDRESS 2 P ST A1,PAG:SB,A2 SET NEW SEGMENT BLOCK ADDRESS , P* b P IFT MMUPAG=1 l P* 2 P* UPDATE MMU TABLE FOR CALLING TASK AND LDTASK P* P INH 2 P MS 3,TTB:SA+2,A5 SAVE A1-A3 IN TTAB SAVE AREA
0x2f8da8…2f8f3c Dummy {f00=0x00ef, f01=0x0190, f02=»ADDRESS OF LDTASK . P CF A15,TLDS20 UPDATE MMU TABLE FOR LDTASK 6 P TS TTB:MT,A3 STORE NEW MMU TABLE FOR CALLING TASK L P ENB P XIF P* P EJECT LDTASK P* $ P* PREPARE FOR READING OF SEGMENT P* ( P LD A6,SEG:E
0x2f8f3c…2f90d0 Dummy {f00=0x00ef, f01=0x0190, f02=»O WORDS v 0 P LDR A5,A3 GET TTAB ADDRESS OF CALLING TASK 0 P LD A3,PAG:PA,A2 GET PAGE ADDRESS (PHYSICAL) D . P LD A2,SEG:DS,A1 GET SEGMENT DISC ADDRESS x * P LDR A9,A1 SAVE SEGMENT BLOCK ADDRESS 0 P LDR A11,A5 INDICATE DISC PAGING (A11 <> 0)
0x2f90d0…2f9264 Dummy {f00=0x00ef, f01=0x0190, f02=»BY LT:SWB x P LDK A7,/91 PHYSICAL READ P* 4 P* SET ECB PARAMETERS > P* Z & PLTD:40 EQU * ENTRY USED BY LT:SWB d , P LDKL A14,LD:STB LOAD LDTASK STACK BASE & P LDKL A8,LD:ECB GET LD:ECB ADDRESS P ST A2,ECBCW,A8 P*
0x2f9264…2f93f8 Dummy {f00=0x00ef, f01=0x0190, f02=»CBBA,A8 SET BUFFER ADDRESS P RF LTD:60 " P XIF 4 P* @ P EJECT LDTASK J P* b P* l P IFT ASSOLY=1 v , P LD A2,SCTPLD GET PROGRAM DISC FILE CODE P STR A2,A8 . P LDKL A1,LD:BUF GET LDTASK BUFFER ADDRESS P ST A1,E
0x2f93f8…2f958c Dummy {f00=0x00ef, f01=0x0190, f02=» A11,A11 CHECK DISC PAGING/SWB FLAG ( P RF(NZ) LTD:43 DISC PAGING REQUEST? , P* X P EJECT LDTASK b P* z P* , P LDR A12,A3 SAVE LOGICAL BUFFER ADDRESS 2 P ECR A2,A3 CONVERT LOGICAL ADDRESS TO PHYSICAL P ANKL A3,/FFF
0x2f958c…2f9720 Dummy {f00=0x00ef, f01=0x0190, f02=»RESS j P SRL A2,2 P ECR A1,A2 P ANK A2,/0F 0 P SRC A2,4 D P ORR A3,A2 V P RF(NZ) LTD:48 h P SUKL A1,/1000 ~ P RF LTD:48 P* PLTD:43 EQU * P XIF P* P IFT MMUPAG=1 P LDR A1,A3 P SRL A
0x2f9720…2f98b4 (2, 203) Dummy {f00=0x00ef, f01=0x0190, f02=»QU * P LDR A12,A3 6 P ANKL A12,/FFF CONVERT PHYSICAL ADDRESS TO LOGICAL P OR A12,SCTLAP Z P* p PLTD:48 EQU * z P SUK A3,2 & P ST A3,ECBBA,A8 SET BUFFER ADDRESS P ANKL A1,/3000 , P OR A1,SCTPLD GET PROGRAM DISC FILE CODE
0x2f98b4…2f9a48 Dummy {f00=0x00ef, f01=0x0190, f02=» P* $ P* MOVE FIRST SECTOR TO PAGE AREA P* 6 P LDKL A1,LD:BUF+2 @ P LDR A2,A12 Z P LDKL A3,376 n & P MVSU A3 MOVE FIRST SECTOR TO PAGE P SUKL A12,2 P XIF P* P EJECT LDTASK P* P* PLTD:50
0x2f9a48…2f9bdc Dummy {f00=0x00ef, f01=0x0190, f02=»SSOLY=1 P LDK A1,188 P XIF $ P* 0 2 P SUR A6,A1 GET REMAINING LENGTH OF SEGMENT/SWB : 2 P RF(NP) LTD:75 SEGMENT/SWB HANDLING FINISHED? p , P SUR A4,A1 GET REMAINING LENGTH OF PAGE P ADR A1,A1 ( P ADR A12,A1 UPDATE PAGE AREA POI
0x2f9bdc…2f9d70 Dummy {f00=0x00ef, f01=0x0190, f02=»FFER ADDRESS v P RF LTD:60 P* & PLTD:55 EQU * 0 * P ADS A1,ECBBA,A8 UPDATE BUFFER ADDRESS D P RF(N) LTD:60 NOT OVERFLOW? r & P LDKL A1,/1000 OVERFLOW CORRECTION P ADRS A1,A8 P XIF P* P IFT MMUPAG=0 * P ADS A1,
0x2f9d70…2f9f04 Dummy {f00=0x00ef, f01=0x0190, f02=»CHECK REMAINING LENGTH OF PAGE 8 P RF(L) LTD:65 NOT ROOM FOR ONE MORE SECTOR IN PAGE? & P* b P IFT MMUPAG=1 l : P ELR A10,A12 SAVE WORD TO BE DESTROYED BY DISC CYL-ID ( P CF A14,LTD:85 READ/WRITE ONE SECTOR $ P ESR A10,A12 RESTORE SAVED W
0x2f9f04…2fa098 Dummy {f00=0x00ef, f01=0x0190, f02=» CF A14,LTD:85 READ/WRITE ONE SECTOR $ P STR A10,A12 RESTORE SAVED WORD , P RB LTD:50 T P XIF f P* r P EJECT LDTASK | P* . P* NOT ROOM ENOUGH IN PAGE FOR LAST SECTOR: 0 P* READ IT TO MEMORY VIA INTERMEDIATE BUFFER P*
0x2fa098…2fa22c Dummy {f00=0x00ef, f01=0x0190, f02=»ATE BUFFER NOW IN SYSTEM AREA , P CF A14,LTD:85 READ ONE SECTOR TO LD:BUF & P ADK A1,2 SKIP CYLINDER ID V P LDR A2,A12 GET PAGE POINTER x P ADK A2,2 & P ADR A6,A6 CONVERT LENGTH TO BYTES P* P IFT MMUPAG=1 2 P MVSU A6 MOVE LA
0x2fa22c…2fa3c0 Dummy {f00=0x00ef, f01=0x0190, f02=» STR A10,A2 ( P ADK A1,2 INCREMENT BUFFER POINTERS P ADK A2,2 @ P SUK A6,2 DECREMENT COUNTER R P RB(P) LTD:70 v P XIF P* P EJECT LDTASK P* P* PLTD:75 EQU * P IFT SWPBLK=1 , P LDR A11,A11 CHE
0x2fa3c0…2fa554 (2, 204) Dummy {f00=0x00f0, f01=0x0190, f02=»OADED b P XRRS A4,A9 P* " PLTD:80 EQU * , , P CF A15,QTJOB QUEUE TASK FOR DISPATCHING @ & P ABL MEXIT PERFORM EXIT ON LDTASK p P* P EJECT LDTASK P* P* READ ONE SECTOR FROM DISC P* PLTD:85 EQU * P
0x2fa554…2fa6e8 Dummy {f00=0x00f0, f01=0x0190, f02=» P RTN A14 NO, RETURN P* ( P* ERROR: INSERT PAGE IN PAGQUE AGAIN * P* V PLTD:95 ANK A2,1 ` P NGR A2,A2 x . P SUK A2,2 ERROR, SET RETURN CODE -2 OR -3 . P ST A2,TTB:SA+14,A5 SET RETURN CODE IN A7 P* P IFT SWPBLK=1
0x2fa6e8…2fa87c Dummy {f00=0x00f0, f01=0x0190, f02=»ENT BLOCK ADDRESS x , P LD A3,SEG:PB,A9 GET PAGE BLOCK ADDRESS & P LDKL A4,PAGQUE GET PAGQUE ADDRESS J P ST A4,PAG:QB,A3 t 4 P LDR* A4,A4 GET ADDRESS OF FIRST BLOCK IN PAGQUE " P STR A4,A3 UPDATE QUEUE LINKS P ST A3,PAGQUE P ST A3,P
0x2fa87c…2faa10 Dummy {f00=0x00f0, f01=0x0190, f02=»* P********** ! P* QLTDSK * ! P* QLTSWB * ! . P********** ! @ P* ! R P* ! : P* THIS ROUTINE PERFORMS ACTIVATION OF THE LOAD TASK. ! f P* ! : P* ACTIVATION IS AT LT:DSK WHEN DISC PAGING REQUEST. ! B P* ACTIVATION IS AT LT:SWB
0x2faa10…2faba4 Dummy {f00=0x00f0, f01=0x0190, f02=»LOCK ADDRESS (LT:SWB) ! t 2 P* A3 = TTAB ADDRESS OF CALLING TASK " P* " T $ P* OUTPUT: A2, A5 ARE DESTROYED " ^ P* " P* " 0 PQLTSWB EQU * ACTIVATE LDTASK AT ENTRY LT:SWB " ( P LDKL A2,LT:SWB GET DISPATCH ADDRESS " P RF QLTASK "
0x2faba4…2fad38 Dummy {f00=0x00f0, f01=0x0190, f02=» , P LDKL A5,TTABLD GET LDTASK TTAB ADDRESS # " P ABL ACTOT ACTIVATE LDTASK =1 # 4 P* # Z P EJECT LDTASK # d P* # | P* # P IFT SWPBLK=1 # P* # P* # P********** # P* LT:SWB * # P********** # P* # P* # D P*
0x2fad38…2faecc Dummy {f00=0x00f0, f01=0x018e, f02=» A3 = TTAB ADDRESS OF CALLING TASK # P* $ 2 P* $ < * PLT:SWB EQU * LDTASK SWB HANDLING ENTRY $ F P IFT MMUPAG=1 $ t P INH $ , P LDKL A5,TTABLD GET LDTASK TTAB ADDRESS $ , P TL TTB:MT,A3 LOAD MMU WITH CALLING TASK $ , P TS TTB:MT,A5 STOR
0x2faecc…2fb060 Dummy {f00=0x00f0, f01=0x0190, f02=» 0 P LDR A5,A3 GET TTAB ADDRESS OF CALLING TASK % 4 P LD A3,TTB:SA+16,A5 GET MEMORY ADDRESS (LOGICAL) % 8 4 P LD A4,SWB:DS,A1 GET DISC ADDRESS OF FIRST COPY % p 0 P LD A6,SWB:EL,A1 GET SWB COPY LENGTH (BYTES) % 2 P LD A2,SWB:NS,A1 GET SWB COPY LENGTH (SECTOR
0x2fb060…2fb1f4 (2, 205) Dummy {f00=0x00f0, f01=0x018e, f02=»* % P* & PLTS:10 EQU * & P SUK A1,1 & ( P* & : P IFT CPU852=1 & D P RF(NP) LTS:20 & Z 4 P ADR A4,A2 COMPUTE DISC ADDRESS OF REQUESTED SWB & p P RB LTS:10 & P* & PLTS:20 EQU * & 0 P LDR A2,A4 GET DISC ADDRESS OF REQUESTED SWB &
0x2fb1f4…2fb388 Dummy {f00=0x00f0, f01=0x0190, f02=» & P XIF ' P* ' P IFT SWPBLK=1 ' P ADK A6,1 ' 4 * P SRL A6,1 CONVERT SWB LENGTH TO WORDS ' F P LDR A4,A6 ' t . P ANK A7,1 GET LOAD/STORE SWB REQUEST FLAG ' $ P ABL(Z) LTD:35 LOAD SWB REQUEST? ' : P LDKL A4,/7FFF PARAMETER TO AVOID INTERM
0x2fb388…2fb51c Dummy {f00=0x00f0, f01=0x406e, f02=» , PLT:SWB ABL LKMERR INDICATE SYSGEN ERROR ( P XIF ( 4 P* ( @ P* ( J P* ( T END ( ^@ ( j F P LDR A4,A6 ' t . P ANK A7,1 GET LOAD/STORE SWB REQUEST FLAG ' $ P ABL(Z) LTD:35 LOAD SWB REQUEST? ' : P LDKL A4,/7FFF PARAMETER TO AVOID INTERM
0x2fb51c…2fb6b0 Dummy {f00=0x00f0, f01=0x2008, f02=» ) NT LDTASK PRR 9.1 79-01-17 870105040910 END <@ H* L 6 P************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TLDSEG = LOAD SEGMENT P* P* P*
0x2fb6b0…2fb844 Dummy {f00=0x00f0, f01=0x0190, f02=»*** ) r & P* * * & P* SUBROUTINE-HANDLER * * 6 & P* * * ` & P********************************* * P * PSUBSUB EQU *-REL * " PSUBBA ST A10,MUL,A13 SAVE A10 * . P LD* A10,4,A14
0x2fb844…2fb9d8 Dummy {f00=0x00f0, f01=0x0190, f02=»N * f P STR A10,A14 PUT ON STACK + P LD A10,MUL,A13 RESTORE A10 + , P ABR* A14 + P P + b P + j P + r < P******************************************************* + z < P* JUMP TO SYSLDM (FROM SYSLOD) ALWAYS VIA THIS MODULE * + < P**************
0x2fb9d8…2fbb6c Dummy {f00=0x00f0, f01=0x0190, f02=»******** + t ( P** ** , ( P** SAVE, AND COMMUNICATION AREA ** , < ( P** ** , h ( P************************************ , P , * PT:ATOD EQU *-REL T:ATAB 'OLD' ADDRESS , P DATA 0 , *
0x2fbb6c…2fbd00 Dummy {f00=0x00f0, f01=0x0190, f02=»-REL U:BTAB NEW ADDRESS , P DATA 0 - ( PS:BTOD EQU *-REL S:BTAB OLD ADDRESS - 0 P DATA 0 - ( PS:BTNW EQU *-REL S:BTAB NEW ADDRESS - l P DATA 0 - . PMOVADD EQU *-REL ADDRESS-CHANGE AFTER MOVE - P DATA 0 - 4 PMOVED EQU *-REL INDICATOR IF B
0x2fbd00…2fbe94 (2, 206) Opaque[0x194]
0x2fbe94…2fc028 # DirEnt {nam=»PFTAB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e10, f03=0x0000}
0x2fbe94…2fc028 IdxSect {
0x2fbe94…2fc028 f00 = 0x00f0 // 0x2fbe94 @0x0
0x2fbe94…2fc028 f01 = 0x0002 // 0x2fbe96 @0x2
0x2fbe94…2fc028 gno = [ // 0x2fbe98 @0x4
0x2fbe94…2fc028 [0x00]: C0x00f0.0x2.0
0x2fbe94…2fc028 ]
0x2fbe94…2fc028 }
0x2fc028…2fc1bc Dummy {f00=0x00f0, f01=0x0190, f02=» 0 P IDENT PFTAB REL 9.2 79-11-16 870105040920 P 8 P* @ P* J P* POWER FAIL TABLE T P* n D P* THIS TABLE HOLDS ADDRESSES TO MODULES THAT SHOULD BE EXECUTED x P* AFTER MASTER CLEAR P* P* P ENTRY PFTAB TABLE ENTRY
0x2fc1bc…2fc350 Dummy {f00=0x00f0, f01=0x415e, f02=» l P* P EXTRN FDON LINE PRINTER 0 P EXTRN DMINIT DATA MANAGEMENT INITIALIZATION 2 $ PPFTAB DATA PFTABE-* TABLE LENGTH f P DATA DC15ON P DATA SOPR P* P DATA CHLTON P* P DATA FDON P DATA DMINIT
0x2fc350…2fc4e4 Dummy {f00=0x00f0, 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
0x2fc4e4…2fc678 Dummy {f00=0x00f0, f01=0x0190, f02=»O RESTART r P EXTRN IHLKM LKM INTERRUPT P EXTRN IHRTC REAL TIME CLOCK 4 P EXTRN IHTW TYPEWRITER X P EXTRN IHTC CASSETTE TAPE v ( P EXTRN IHSOP SYSTEM OPERATORS PANEL P P P P P P * P EXTRN CHRT1 REMOTE
0x2fc678…2fc80c Dummy {f00=0x00f0, f01=0x0190, f02=»ANGER NO. 1 x ( P EXTRN IHCC2 2 ( P EXTRN IHCC3 3 @ * P EXTRN CHLT1 LOCAL CHANNEL UNIT NO. 1 l * P EXTRN CHLT2 LOCAL CHANNEL UNIT NO. 2 P EXTRN CHLT3 P EXTRN CHLT4 P EXTRN IHFD FLOPPY DISCE
0x2fc80c…2fc9a0 Dummy {f00=0x00f0, f01=0x018e, f02=» 2 v P EXTRN IHMT MAG. TAPE $ P EXTRN ILLINT ILLEGAL INTERRUPT ( P EXTRN HALT HALT ROUTINE P P EXTRN BUG DEBUGGER p P EXTRN IHINPT PX:A EQU 0 MONITOR OPTION ( PX:B EQU 0 DATA MAN .TASKS IN SYSTEM * PX:C EQU 0 DM INDEX RECORD
0x2fc9a0…2fcb34 (2, 207) Opaque[0x194]
0x2fcb34…2fccc8 # DirEnt {nam=»LKMAL «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e18, f03=0x0000}
0x2fcb34…2fccc8 IdxSect {
0x2fcb34…2fccc8 f00 = 0x00f0 // 0x2fcb34 @0x0
0x2fcb34…2fccc8 f01 = 0x0004 // 0x2fcb36 @0x2
0x2fcb34…2fccc8 gno = [ // 0x2fcb38 @0x4
0x2fcb34…2fccc8 [0x00]: C0x00f0.0x3.0
0x2fcb34…2fccc8 [0x01]: C0x00f1.0x0.0
0x2fcb34…2fccc8 ]
0x2fcb34…2fccc8 }
0x2fccc8…2fce5c Dummy {f00=0x00f0, f01=0x0190, f02=» 0 P IDENT LKMAL REL 9.2 79-11-16 870105040920 P 8 P* @ $ P* LINK TO MONITOR REQUEST TABLE J @ P* THIS TABLE HOLDS INFORMATION ABOUT MODULES THAT HANDLE THE r ( P* DIFFERENT LINK TO MONITOR REQUESTS P* 2 P ENTRY LKMAL TABLE ENTRY CON
0x2fce5c…2fcff0 Dummy {f00=0x00f0, f01=0x018e, f02=» EXTRN TACTOT ACTIVATE OTHER TERMINAL P EXTRN TPAUSE PAUSE TERMINAL . P EXTRN TIMER TIMER R P EXTRN TMWAIT MULTIPLE WAIT l & P EXTRN TLUSEG LOCK/UNLOCK SEGMENT P EXTRN TLDSEG SEGMENT TLDSEG P EXTRN TABORT ABORT FUNCTION $ P EXTRN
0x2fcff0…2fd184 Dummy {f00=0x00f0, f01=0x0190, f02=» P EXTRN IXTASS " P EXTRN TCHPAG CHANGE MMU PAGE " P EXTRN TCHMMU CHANGE MMU TABLE @ P EJECT f P* t $ PLKMAL DATA LKMALE-* TABLE LENGTH ~ P DATA TIO TERMINAL I/O P DATA TWAIT TERMINAL WAIT P DATA TEXIT TERMINAL EXIT ( P
0x2fd184…2fd318 Dummy {f00=0x00f0, f01=0x018e, f02=» $ P DATA TLUSEG LOCK/UNLOCK SEGMENT P DATA TLDSEG SEGMENT TLDSEG , P DATA TABORT ABORT FUNCTION P P DATA 0 t 4 P DATA GETTIM GET CURRENT VALUE OF MONITOR CLOCK " P DATA SETTIM SET MONITOR CLOCK P DATA 0 *
0x2fd318…2fd4ac Dummy {f00=0x00f0, f01=0x4036, f02=» p PLKMALE EQU * P* P END &@ 2EG SEGMENT TLDSEG , P DATA TABORT ABORT FUNCTION P P DATA 0 t 4 P DATA GETTIM GET CURRENT VALUE OF MONITOR CLOCK " P DATA SETTIM SET MONITOR CLOCK P DATA 0 *
0x2fd4ac…2fd640 Dummy {f00=0x00f0, 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
0x2fd640…2fd7d4 (2, 208) Dummy {f00=0x00f1, f01=0x0190, f02=»K P* LKM P* DATA 16 P* 0 " P* INPUT A5 = TTAB ADDRESS : " P* A8 = ASBLK ADDRESS ` 0 P* WHERE ASBLK IS A PARAMETER BLOCK P* +----------+----------+ $ P* ASBLK I NO OF VOL FC I P* +
0x2fd7d4…2fd968 Dummy {f00=0x00f1, f01=0x0190, f02=»---------------------+ P* I I P* I VOL NAME I @ P* I I b P* +---------------------+ $ P* I MASTER INDEX " P* I FILE NAME P* D P* UPON C
0x2fd968…2fdafc Dummy {f00=0x00f1, f01=0x0190, f02=»ORMED j P* -1 = REQUEST ERROR P* 1 = DISC I/O ERROR , " P* 2 = NO FREE ENTRY IN TABLE J 8 P* 3 = NO FDB AVAILABLE OR MASTER INDEX CORE AVAIL p ( P* 4 = ONE OR MORE VOLUMES UNKNOWN " P* 5 = FILE CODE ALREADY USED P* 6 = FI
0x2fdafc…2fdc90 Dummy {f00=0x00f1, f01=0x0190, f02=»S EXIST v " P* 10= NO DATA FILE ASSIGNED * P* 11= 4 INDEX FILES ALREADY ASSIGNED 6 $ P* 12= MAX KEY LENGTH TOO SMALL d 0 P* 13= REQUEST BUSY. REPEAT ASSIGN REQUEST P EJECT P* P*************** P* ENTRIES * P
0x2fdc90…2fde24 Dummy {f00=0x00f1, f01=0x0190, f02=»TTA P ENTRY TASASB P ENTRY TASCVO " P ENTRY TASVOL 8 P ENTRY TASCXO N P ENTRY TASSEX d P ENTRY TASXLB z P ENTRY TASFDB P ENTRY TASVRL P ENTRY TASVLE P ENTRY TASVRN P ENTRY TASECB & P ENTRY TAS
0x2fde24…2fdfb8 Dummy {f00=0x00f1, f01=0x0190, f02=»HLT HALT SYSTEM DUE TO DM (SYSGEN) ERROR P EJECT 0 P* > P***************** H P* EXTERNALS * b P***************** | P* P EXTRN DFTAB P EXTRN DFTABE P EXTRN SCTCDT P EXTRN DWTVOL P EXTRN FNDTID
0x2fdfb8…2fe14c Dummy {f00=0x00f1, f01=0x0190, f02=» TTB:TD,DMTASX P EXTRN ECBFC,ECBRC 0 P EXTRN MOV:US MOVE FROM USER TO SYSTEM AREA 0 $ P EXTRN HALT HALT SYSTEM ROUTINE d P EJECT TOSSIO P* P* . P***************************************** P* P* CONDITIONAL ASSEMB
0x2fe14c…2fe2e0 Dummy {f00=0x00f1, f01=0x018e, f02=»BTAINED BY SETTING MMUPAG EQU 1. P* ( PMMUPAG EQU 0 2 P* F P EJECT P P* ^ P******************* h P* DATA AREAS * P******************* P* PTASBLK DATA 0 USE INDICATOR $ PTASQUE DATA 0 ASSIGN QUEUE ANC
0x2fe2e0…2fe474 (2, 209) Opaque[0x194]
0x2fe474…2fe608 # DirEnt {nam=»CTABX «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e28, f03=0x0000}
0x2fe474…2fe608 IdxSect {
0x2fe474…2fe608 f00 = 0x00f1 // 0x2fe474 @0x0
0x2fe474…2fe608 f01 = 0x0002 // 0x2fe476 @0x2
0x2fe474…2fe608 gno = [ // 0x2fe478 @0x4
0x2fe474…2fe608 [0x00]: C0x00f1.0x1.0
0x2fe474…2fe608 ]
0x2fe474…2fe608 }
0x2fe608…2fe79c Dummy {f00=0x00f1, f01=0x0190, f02=» 0 P IDENT CTABX REL 9.2 79-11-16 870105040920 P 8 P* @ P* CODE CONVERSION TABLE J P* l P* v P ENTRY CTABX P* P* * PC0 EQU 0 CODE CONVERSION COLUMN NO. 0 ( PC1 EQU 0 1 ( PC2 EQU
0x2fe79c…2fe930 Dummy {f00=0x00f1, f01=0x4142, f02=» 5 ( PC6 EQU 0 6 " ( PC7 EQU 0 7 N P* z P* P* PCTABX DATA C0 P DATA C1 P DATA C2 P DATA C3 P DATA C4 P DATA C5 P DATA C6
0x2fe930…2feac4 Dummy {f00=0x00f1, 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 @
0x2feac4…2fec58 Dummy {f00=0x00f1, 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
0x2fec58…2fedec Dummy {f00=0x00f1, f01=0x0190, f02=» DRFD01 P* P************* P* * 2 P* EXTERNALS * H P* * ^ P************* t P* P EXTRN TDISP DISPATCHER P EXTRN TENDIO ENDIO P EXTRN DISIOE REQUEST ERROR EXTRN DWTST STATUS
0x2fedec…2fef80 Dummy {f00=0x00f1, f01=0x0190, f02=»EA A5 | & ! EXTRN DWTSB2 STACK BASE 2 IN DWT ( P EXTRN SCTPLD PROGRAM LOADING DEVICE 8 ( P EXTRN SAVE8 SAVE A1-A8 ON A15 STACK d P EXTRN SETIMP TIMER & P EXTRN INTSAV INTERRUPT SAVE AREA & P EXTRN INIFLG INITIALIZATION FLAG & P EXTRN T
0x2fef80…2ff114 (2, 210) Opaque[0x194]
0x2ff114…2ff2a8 # DirEnt {nam=»DVTKB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e30, f03=0x0000}
0x2ff114…2ff2a8 IdxSect {
0x2ff114…2ff2a8 f00 = 0x00f1 // 0x2ff114 @0x0
0x2ff114…2ff2a8 f01 = 0x0002 // 0x2ff116 @0x2
0x2ff114…2ff2a8 gno = [ // 0x2ff118 @0x4
0x2ff114…2ff2a8 [0x00]: C0x00f1.0x2.0
0x2ff114…2ff2a8 ]
0x2ff114…2ff2a8 }
0x2ff2a8…2ff43c Dummy {f00=0x00f1, f01=0x0190, f02=» 0 P IDENT DVTKB REL 9.2 79-11-16 870105040920 P 8 " P* KEYBOARD DEVICE WORK TABLE @ P* f P ENTRY DVTKB TABLE ENTRY p P*** ( P EXTRN KBAD POINTER TO ADDRESSBLOCK P EXTRN ECH PMMUPAG EQU 0 P* PDVTKB EQU * TABL
0x2ff43c…2ff5d0 Dummy {f00=0x00f1, f01=0x0190, f02=»ATA DWTEND-DVTKB ORDER ( P DATA KBAD POINTER TO ADDRESS BLOCK P DATA 'KB' TTAB-ADDRESS J $ P DATA 0 WAIT/ACTIVATE INDICATOR j P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB ADD
0x2ff5d0…2ff764 Dummy {f00=0x00f1, f01=0x0190, f02=»ATA 0 SAVE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER 6 P DATA ECH ECHO DEVICE T $ P DATA /BCA BACKSPACE AND CANCEL r " P DATA /ED0 EOR AND DOUBLE ZERO 6 P DATA DWTSQ+DVTKB POINTER TO FIRST PLACE IN QUEUE 4 P DATA DWTSQ+DV
0x2ff764…2ff8f8 Dummy {f00=0x00f1, f01=0x40de, f02=»0,0,0 P IFT MMUPAG=1 PDEVECB EQU * $ P DATA 0,0,0,0,0,0 8 P DATA 0,0,0,0,0,0,0,0 R P DATA 0,0,0,0,0,0,0,0 p P DATA 0,0,0,0 P XIF PDWTEND EQU * P* P END @ IRST PLACE IN QUEUE 4 P DATA DWTSQ+DV
0x2ff8f8…2ffa8c Dummy {f00=0x00f1, 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
0x2ffa8c…2ffc20 Dummy {f00=0x00f1, f01=0x417c, f02=» @ @ T T ! & 'T /P f H D ! 3 R 7 AV E OP _P$ kR { W PH P> P P R Q " H D ! P R R W Wr W T W P 'W 1P 9 IP g kQf n H D ! mR$ uP {R6 V2 P P8 R2 V. P T W T T W H D !
0x2ffc20…2ffdb4 (2, 211) Opaque[0x194]
0x2ffdb4…2fff48 # DirEnt {nam=»DVTTP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e38, f03=0x0000}
0x2ffdb4…2fff48 IdxSect {
0x2ffdb4…2fff48 f00 = 0x00f1 // 0x2ffdb4 @0x0
0x2ffdb4…2fff48 f01 = 0x0002 // 0x2ffdb6 @0x2
0x2ffdb4…2fff48 gno = [ // 0x2ffdb8 @0x4
0x2ffdb4…2fff48 [0x00]: C0x00f1.0x3.0
0x2ffdb4…2fff48 ]
0x2ffdb4…2fff48 }
0x2fff48…3000dc Dummy {f00=0x00f1, f01=0x0190, f02=» 0 P IDENT DVTTP REL 9.2 79-11-16 870105040920 P 8 4 P* DEVICE WORK TABLE FOR TELLER TERMINAL PRINTER @ P* x P ENTRY DVTTP TABLE ENTRY P* P* ( P EXTRN TPAD POINTER TO ADDRESS-BLOCK $ PMMUPAG EQU 0 MEM. MAN.UNIT COND.
0x3000dc…300270 Dummy {f00=0x00f1, f01=0x0190, f02=»ATA 0 ECB ADDRESS P DATA DWTEND-DVTTP ORDER ( P DATA TPAD POINTER TO ADDRESS BLOCK : P DATA 'TP' TTAB-ADDRESS f $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS
0x300270…300404 Dummy {f00=0x00f1, f01=0x40ec, f02=»ATA 0,0,0,0 STACK P DATA 0 TIMER POINTER ( P DATA 0 REQUESTED,ACTUAL LINE NUMBER 8 P IFT MMUPAG=1 d PDEVECB EQU * z P DATA 0,0,0,0,0,0 P XIF PDWTEND EQU * P* P* P END @ VE AREA USER ECB ADDRESS
0x300404…300598 Dummy {f00=0x00f1, 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
0x300598…30072c Dummy {f00=0x00f1, f01=0x0190, f02=»EQUEST ERROR + P SUK A2,18 , P ABL(P) FD:DIS REQUEST ERROR , & P ADK A2,25 , J P SLL A2,3 BIO , P LDK A3,80 LENGTH , r P LDKL A4,BUF , P CF A5,FD:REA , P LDR A1,A3 RETURN CODE , P SLL A1,4 CHECK NO DATA BIT , P RF(NN) LOA:60 N
0x30072c…3008c0 Dummy {f00=0x00f1, f01=0x0190, f02=»,A8 DATA SET LABEL SECTOR , P LDK A1,DWTDSS - " P CF A5,STDWT SAVE IN DWT - 8 P ADK A4,BOE BOE ADDRESS - X . P CF A5,LOGSEC TRANSFORM TO LOGICAL SECTOR - x P LDK A1,DWTBOE - $ P CF A5,STDWT STORE BOE NO IN DWT - P SUK A3,1 CRN - P LDK A1,DW
0x3008c0…300a54 (2, 212) Opaque[0x194]
0x300a54…300be8 # DirEnt {nam=»DVTGP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e40, f03=0x0000}
0x300a54…300be8 IdxSect {
0x300a54…300be8 f00 = 0x00f2 // 0x300a54 @0x0
0x300a54…300be8 f01 = 0x0002 // 0x300a56 @0x2
0x300a54…300be8 gno = [ // 0x300a58 @0x4
0x300a54…300be8 [0x00]: C0x00f2.0x0.0
0x300a54…300be8 ]
0x300a54…300be8 }
0x300be8…300d7c Dummy {f00=0x00f2, f01=0x0190, f02=» 0 P IDENT DVTGP REL 9.2 79-11-16 870105040920 P 8 , P* DEVICE WORK TABLE FOR GENERAL PRINTER @ P* p P ENTRY DVTGP TABLE ENTRY z P* P* ( P EXTRN GPAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 0 P* PDVTGP EQU * TABL
0x300d7c…300f10 Dummy {f00=0x00f2, f01=0x0190, f02=»ATA DWTEND-DVTGP ORDER ( P DATA GPAD POINTER TO ADDRESS-BLOCK P DATA 'GP' TTAB-ADDRESS J $ P DATA 0 WAIT/ACTIVATE INDICATOR j P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB ADD
0x300f10…3010a4 Dummy {f00=0x00f2, f01=0x40e8, f02=»REA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER * " P DATA 0 HEAD POSITIPN POINTER H P IFT MMUPAG=1 n PDEVECB DATA 0,0,0,0,0,0 P XIF PDWTEND EQU * P* P* P END @ DATA DEVECB MMU ECB ADD
0x3010a4…301238 Dummy {f00=0x00f2, 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
0x301238…3013cc Dummy {f00=0x00f2, f01=0x0190, f02=»A5,DSOPCH 3 P CMR A2 INDICATE NOT OPEN 4 P* 4 4 P* UNLOCK 4 > P* 4 R P XIF 4 PUNL:70 EQU * 4 h P LDK A2,/C UNLOCK 4 | P CF A5,FD:REA 4 P ORS A3,DWTRCW,A6 4 P ANK A3,1 4 , P RF(NZ) UNL:80 NOT OPERABLE,STILL LOCKED 4 P
0x3013cc…301560 Dummy {f00=0x00f2, f01=0x0190, f02=»S+IBM=0 4 P* 5 P* UNLOAD RETURN CODE CHECK 5 P* 5 > PUNL:RC ORS A3,DWTRCW,A6 5 H P ANK A3,/7 FATAL ERROR? 5 h P RB(NZ) UNL:80 ENDIO 5 P RTN A5 5 P XIF 5 P IFT IBM=1 5 P EJECT DRFD01 5 P* 5 P*******************
0x301560…3016f4 (2, 213) Opaque[0x194]
0x3016f4…301888 # DirEnt {nam=»DVTDI «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e48, f03=0x0000}
0x3016f4…301888 IdxSect {
0x3016f4…301888 f00 = 0x00f2 // 0x3016f4 @0x0
0x3016f4…301888 f01 = 0x0002 // 0x3016f6 @0x2
0x3016f4…301888 gno = [ // 0x3016f8 @0x4
0x3016f4…301888 [0x00]: C0x00f2.0x1.0
0x3016f4…301888 ]
0x3016f4…301888 }
0x301888…301a1c Dummy {f00=0x00f2, f01=0x0190, f02=» 0 P IDENT DVTDI REL 9.2 79-11-16 870105040920 P 8 P =1,HANG UP AT /03 OUTPUT @ P REL 9.1 79-05-23 d P* . P* DEVICE WORK TABLE FOR DISPLAY INDICATOR P* P* & P ENTRY DVTDI DISPLAY INDICATOR 03 P* P*
0x301a1c…301bb0 Dummy {f00=0x00f2, f01=0x0190, f02=»METER x 0 P DATA /8000 STATUS. /8000 MEANS DEVICE READY P DATA 0 ECB ADDRESS B P DATA DWTEND-DVTDI ORDER ^ ( P DATA DIAD POINTER TO ADDRESS-BLOCK ~ 6 P DATA 'DI',0 TERM.NUMBER AND PROGRAM START ADDRESS $ P DATA 0 ECB QUEUE ANCHOR ADDRESS
0x301bb0…301d44 Dummy {f00=0x00f2, f01=0x415e, f02=» | P DATA /2010 P DATA /3F4F,/5F6F * P DATA 0 SAVE AREA FOR FLASHING LIGHTS 6 P DATA 0 TIMER POINTER d P DATA 0 DUMMY WORD =1 P DATA 0 DUMMY WORD =1 " P DATA 0 DUMMY TIMER POINTER =1 P IFT MMUPAG=1 PDEVECB DATA 0,
0x301d44…301ed8 Dummy {f00=0x00f2, 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
0x301ed8…30206c Dummy {f00=0x00f2, f01=0x018e, f02=» P LDKL A1,/C000 WORDS,WRITE < P XIF < & P IFT CHAN=1 < 2 ( P CM DWTRW,A6 INDICATOR TO WRITE MODE < F P XIF < r P RF FD:800 < ~ P* < PFD:REA EQU * < P IFT CHAN=1 < P LDK A1,1 < P ST A1,DWTRW,A6 READ MODE < P XIF < P IFT C
0x30206c…302200 Dummy {f00=0x00f2, f01=0x0190, f02=» P* = P IFT MMUPAG=1 = & P ORR* A1,A8 GET FIRST WORD OF ECB = $ * P ANKL A1,/F000 KEEP FOUR LEFTMOST BITS = N P XIF = | P* = P IFT CHAN=0 = P ORR A3,A1 = PWER1 WER A3,MUXADR FIRST WER = $ PWER2 WER A4,MUXADR+1 SECOND WER = P XIF
0x302200…302394 (2, 214) Opaque[0x194]
0x302394…302528 # DirEnt {nam=»DVTDY «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e50, f03=0x0000}
0x302394…302528 IdxSect {
0x302394…302528 f00 = 0x00f2 // 0x302394 @0x0
0x302394…302528 f01 = 0x0002 // 0x302396 @0x2
0x302394…302528 gno = [ // 0x302398 @0x4
0x302394…302528 [0x00]: C0x00f2.0x2.0
0x302394…302528 ]
0x302394…302528 }
0x302528…3026bc Dummy {f00=0x00f2, f01=0x0190, f02=» 0 P IDENT DVTDY REL 9.2 79-11-16 870105040920 P 8 * P* DEVICE WORK TABLE FOR VIDEO DISPLAY @ P* n P ENTRY DVTDY TABLE ENTRY x P* P* ( P EXTRN DYAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 0 P* PDVTDY EQU * TABLE
0x3026bc…302850 Dummy {f00=0x00f2, f01=0x0190, f02=»A DWTEND-DVTDY ORDER ( P DATA DYAD POINTER TO ADDRESS-BLOCK P DATA 'DY' TTAB-ADDRESS H $ P DATA 0 WAIT/ACTIVATE INDICATOR h P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB ADDRE
0x302850…3029e4 Dummy {f00=0x00f2, f01=0x4150, f02=»A FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER ( P DATA /101 CURSOR POINTER F ( P DATA /ABC LEFT BYTE=NUMBER OF LINES h " P RIGHT BYTE=CHARACTERS/LINE P DATA 0 BUFFER INDEX P IFT MMUPAG=1 PDEVECB DATA 0,0,0,0,0,0
0x3029e4…302b78 Dummy {f00=0x00f2, 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
0x302b78…302d0c Dummy {f00=0x00f2, f01=0x0190, f02=» P LD A7,DWTOR,A6 L P ANK A7,/3F ORDER L P LD A8,DWTECB,A6 ECB ADDRESS L 6 P ABL FDAD REACTIVATE L Z P EJECT DRFD01 L v P* L P********************* L P* * L P* INTERRUPT HANDLER * L P* *
0x302d0c…302ea0 Dummy {f00=0x00f2, f01=0x018e, f02=» L r P IFT CPU852=1 M * P CF A15,SAVE8 SAVE REGISTERS ON STACK M P XIF M L P* M X P IFT CPU852=0 M b " P MSR 8,A15 SAVE A1-A8 ON STACK M x P XIF M P* M P LDKL A6,DWFD01 DWT ADDRESS M P IFT CHAN=1 M P ENB M & P LD A1,DWTUB,A6
0x302ea0…303034 (2, 215) Opaque[0x194]
0x303034…3031c8 # DirEnt {nam=»DWII01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e58, f03=0x0000}
0x303034…3031c8 IdxSect {
0x303034…3031c8 f00 = 0x00f2 // 0x303034 @0x0
0x303034…3031c8 f01 = 0x0002 // 0x303036 @0x2
0x303034…3031c8 gno = [ // 0x303038 @0x4
0x303034…3031c8 [0x00]: C0x00f2.0x3.0
0x303034…3031c8 ]
0x303034…3031c8 }
0x3031c8…30335c Dummy {f00=0x00f2, f01=0x0190, f02=» 2 P IDENT DWII01 REL 9.2 79-11-16 870105040920 P : P* B P* L ( P* INTERTASK COMMUNICATION INPUT DWT V P* P ENTRY DWII01 TABLE ENTRY P P EXTRN ITAD DRIVER ENTRY & P EXTRN IT:BUF INTERTASK MMU BUFFER PMMUPAG E
0x30335c…3034f0 Dummy {f00=0x00f2, f01=0x0190, f02=»I01 ORDER " P DATA ITAD+1 ACTIVATION ENTRY P DATA 0 TTAB ADDRESS 8 $ P DATA 0 WAIT/ACTIVATE INDICATOR T P DATA 0 TERMINAL QUEUE | P* P IFT MMUPAG=1 P DATA 0 USER ECB ADDRESS P DATA ITECB MMU ECB ADDRESS P XIF
0x3034f0…303684 Dummy {f00=0x00f2, f01=0x40e8, f02=» p P DATA 0,0 SAVE AREA P* $ P IFT MMUPAG=1 . PITECB EQU * MMU ECB D P DATA 0 ` P DATA IT:BUF p P DATA 0,0,0,0 P XIF PDWTEND EQU * P* P* P* P END @ U ECB ADDRESS P XIF
0x303684…303818 Dummy {f00=0x00f2, 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
0x303818…3039ac Dummy {f00=0x00f2, f01=0x0190, f02=»CORRESPONDING T:A-ADDRESS x * P ES A4,T:ATID,A3 REPLACE TCL IN T:A =3 " 0 P EL* A3,T:ATNW,A13 GET LENGTH OF REAL T:ATAB P $ P NGR A3,A3 NEGATIVE DISPLACEMENT . P ADR A3,A8 COMPUTE ENTRY IN AUX. TID TABLE 0 P ESR A4,A3 SAVE TID FOR DEBUGGER PURPOSE =
0x3039ac…303b40 Dummy {f00=0x00f2, f01=0x0190, f02=»NT ~ ( P SUK A6,1 DECREMENT NUMBER OF COPIES P RB(P) CHT:20 NEXT COPY 6 PCHT:90 RTN A14 V P EJECT l P z P 4 P************************************************ 4 P*** *** 4 P**
0x303b40…303cd4 (2, 216) Opaque[0x194]
0x303cd4…303e68 # DirEnt {nam=»DWIO01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e60, f03=0x0000}
0x303cd4…303e68 IdxSect {
0x303cd4…303e68 f00 = 0x00f3 // 0x303cd4 @0x0
0x303cd4…303e68 f01 = 0x0002 // 0x303cd6 @0x2
0x303cd4…303e68 gno = [ // 0x303cd8 @0x4
0x303cd4…303e68 [0x00]: C0x00f3.0x0.0
0x303cd4…303e68 ]
0x303cd4…303e68 }
0x303e68…303ffc Dummy {f00=0x00f3, f01=0x0190, f02=» 2 P IDENT DWIO01 REL 9.2 79-11-16 870105040920 P : P* B P* L * P* INTERTASK COMMUNICATION OUTPUT DWT V P* P ENTRY DWIO01 TABLE ENTRY P P EXTRN ITAD DRIVER ENTRY & P EXTRN IT:BUF INTERTASK MMU BUFFER PMMUPAG
0x303ffc…304190 Dummy {f00=0x00f3, f01=0x0190, f02=»WIO01 ORDER P DATA ITAD ACTIVATION ENTRY P DATA 0 TTAB ADDRESS 8 $ P DATA 0 WAIT/ACTIVATE INDICATOR T P DATA 0 TERMINAL QUEUE | P* P IFT MMUPAG=1 P DATA 0 USER ECB ADDRESS P DATA ITECB MMU ECB ADDRESS P XIF
0x304190…304324 Dummy {f00=0x00f3, f01=0x40e8, f02=» p P DATA 0,0 SAVE AREA P* $ P IFT MMUPAG=1 . PITECB EQU * MMU ECB D P DATA 0 ` P DATA IT:BUF p P DATA 0,0,0,0 P XIF PDWTEND EQU * P* P* P* P END @ U ECB ADDRESS P XIF
0x304324…3044b8 Dummy {f00=0x00f3, 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
0x3044b8…30464c Dummy {f00=0x00f3, f01=0x0190, f02=»RC-PROCESS TERMINAL 2 C z & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 D & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 D H , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) D r $ P DATA 0 BLOCK SENDING INDICATOR D P XIF D P EJECT D $ P******************************** D
0x30464c…3047e0 Dummy {f00=0x00f3, f01=0x018e, f02=»ANNEL NO. 2 D f " P* CONNECTED TO FOURTH CHRT E P* E : PCWTRT8 EQU * E D P* E X P IFT RECHAN=4 E b P DATA 0 LAST OUTPUT DWT E x P DATA 0 LAST OUTPUT WORD E P DATA INTRT4 INTERRUPT TABLE E P INR A2,0,DWA8 INR E P OTR A2,1,DWA8 OTR
0x3047e0…304974 (2, 217) Opaque[0x194]
0x304974…304b08 # DirEnt {nam=»DW1501«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e68, f03=0x0000}
0x304974…304b08 IdxSect {
0x304974…304b08 f00 = 0x00f3 // 0x304974 @0x0
0x304974…304b08 f01 = 0x0002 // 0x304976 @0x2
0x304974…304b08 gno = [ // 0x304978 @0x4
0x304974…304b08 [0x00]: C0x00f3.0x1.0
0x304974…304b08 ]
0x304974…304b08 }
0x304b08…304c9c Dummy {f00=0x00f3, f01=0x0190, f02=» 2 P IDENT DW1501 9.2DK 1 81-11-05 870105040920 P DK1 EXTRA DWTINF : P ORG: REL 9.2 79-11-16 V P v P* ~ : P* DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 P* P ENTRY DW1501 TABLE ENTRY * P EXTRN DC15AD POINTER
0x304c9c…304e30 Dummy {f00=0x00f3, f01=0x0190, f02=»/8000 STATUS./8000 MEANS DEVICE READY P DATA 0 ECB-ADDRESS . P DATA DWTEND-DW1501 J P RIGHT BYTE=ORDER f * P DATA DC15AD POINTER TO ADDRESS-BLOCK P DATA 'DC' TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL
0x304e30…304fc4 Dummy {f00=0x00f3, f01=0x418c, f02=» DATA 0 TIMER POINTER P DATA 0 WRITE QUEUE P DATA 0 STATUS QUEUE : P DATA 0 RECEIVE QUEUE V P DATA 0 BUFFER ADDRESS t P DATA 0 CURSOR ADDRESS " P DATA 0 REQUEST TIMEOUT VALUE " P DATA 0 DEVICE INFORMATION DK1 P* P I
0x304fc4…305158 Dummy {f00=0x00f3, f01=0x2008, f02=» ATUS QUEUE P DATA 0 RECEIVE QUEUE P DATA 0 BUFFER ADDRESS 8 P DATA 0 CURSOR ADDRESS V , P DATA 50 REQUEST TIMEOUT. DEFAULT 5 SEC. t P* P IFT MMUPAG=1 PDC:ECB EQU * MMU ECB P DATA 0,0,0,0,0,0 P XIF P*
0x305158…3052ec Dummy {f00=0x00f3, f01=0x40e4, f02=» : H IDENT T:DTC0 TRA 4.2 81-03-20 F1 O1111 04.01.XXX.1 T:DTC0 B T:DTC0D T REENTC REGGO h * & TC * " * @ " $ ,
0x3052ec…305480 Dummy {f00=0x00f3, f01=0x018e, f02=» : H IDENT T:AKA0 TRA 4.2 81-03-20 F1 O1111 04.01.XXX.1 T:AKA0 B T:AKA0A T . * T:DKA0 D:CB90 C:CB90 D:TB90 Z:TB90 h * & @ * & P * & =
0x305480…305614 (2, 218) Opaque[0x194]
0x305614…3057a8 # DirEnt {nam=»DRKB03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e70, f03=0x0000}
0x305614…3057a8 IdxSect {
0x305614…3057a8 f00 = 0x00f3 // 0x305614 @0x0
0x305614…3057a8 f01 = 0x0010 // 0x305616 @0x2
0x305614…3057a8 gno = [ // 0x305618 @0x4
0x305614…3057a8 [0x00]: C0x00f3.0x2.0
0x305614…3057a8 [0x01]: C0x00f3.0x3.0
0x305614…3057a8 [0x02]: C0x00f4.0x0.0
0x305614…3057a8 [0x03]: C0x00f4.0x1.0
0x305614…3057a8 [0x04]: C0x00f4.0x2.0
0x305614…3057a8 [0x05]: C0x00f4.0x3.0
0x305614…3057a8 [0x06]: C0x00f5.0x0.0
0x305614…3057a8 [0x07]: C0x00f5.0x1.0
0x305614…3057a8 ]
0x305614…3057a8 }
0x3057a8…30593c Dummy {f00=0x00f3, f01=0x0190, f02=» 2 P IDENT DRKB03 REL 9.2 79-11-16 870105040920 P : P* B 0 P******************************************* L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* DRKB01 = DRIVER KEYBOARD P* P* P* P* P
0x30593c…305ad0 Dummy {f00=0x00f3, f01=0x0190, f02=» d . P* AND ALPHANUMERIC KEYBOARDS PTS 6236, , P* CONNECTED TO CPU VIA CHLT OR CHRT. : P* j : P* ONLY INPUT DATA FROM DEPRESSED KEYS AND KEY-LOCKS t $ P* ARE HANDLED BY THE DRIVER. P* 0 P* AN ECHO-DEVICE CAN BE ATTACHED
0x305ad0…305c64 Dummy {f00=0x00f3, f01=0x0190, f02=»PARTS: j P* " P* A C K B : ACTIVATION PART P* > $ P* I H K B : INTERRUPT HANDLER H P* p P* E C H O : ECHO HANDLER z P* $ P* R C K B : RECOVERY ROUTINE P* P EJECT P* P* , P* THE FOL
0x305c64…305df8 Dummy {f00=0x00f3, f01=0x0190, f02=»IC READ | & P* ORDER 31: RESET INPUT BUFFER P* : P* D P* NORMAL REGISTER USAGE : N P* r " P* REGISTER A1 : RETURN CODE | & P* A2 : INPUT CHARACTER $ P* A3 : BUFFER INDEX $ P* A4 : W
0x305df8…305f8c Dummy {f00=0x00f3, f01=0x0190, f02=» A8 : ECB-ADDRESS P* P* ( P* 2 P* SYSTEM ADAPTATION < P* Z 8 P* CODES FOR SPECIAL CHARACTERS CLEAR, BACKSPACE, d 8 P* MULTIPLE ZERO AND STANDARD EOR MUST BE DEFINED P* IN DWT. P* 2 P* DWT-ADDRE
0x305f8c…306120 Dummy {f00=0x00f3, f01=0x0190, f02=»T MUST BE SET UNEQUAL TO ZERO. 2 P* STANDARD VALUE FOR TIME-OUT IS 30 SECONDS & 4 P* SINCE LAST DEPRESSED KEY. IF ANOTHER VALUE * P* IS WANTED FOR A SYSTEM, INDICATOR $ P* IN DRIVER MUST BE CHANGED. P* 4 P* THE LENGTH OF T
0x306120…3062b4 (2, 219) Dummy {f00=0x00f3, f01=0x018e, f02=»AME FOR ALL h P* DWT:S IN SYSTEM P EJECT 0 P* > 8 P* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE H 8 P* TO EXCLUDE FROM THE DRIVER FOLLOWING FUNCTIONS: P* P* -----ECHO-FUNCTION " P* -----POWER ON INDICATION
0x3062b4…306448 Dummy {f00=0x00f3, f01=0x0190, f02=» P* ENTRIES P* P* & P ENTRY KBAD3 ADDRESS-BLOCK 0 P* R P* P* f & P* EXTERNAL TOSS MODULE ENTRIES p P* P* P* $ P EXTRN DISIOE I/O REQUEST ERROR . P EXTRN DISEND END I/O AND GO TO DISPATCH
0x306448…3065dc Dummy {f00=0x00f3, f01=0x0190, f02=» STREG STORE REGISTERS AND GO TO DISPATCER , P EXTRN LDREGE RETURN FROM ECHOE HANDLING 2 P EXTRN LDREGF PANIK EXTERN b P EXTRN SETIME SET TIME P EXTRN SETIMP SET TIME " P EXTRN SAVE8 SAVE 8 REGISTERS " P EXTRN ECHRTN RETURN FROM ECHO
0x3065dc…306770 Dummy {f00=0x00f3, f01=0x0190, f02=» P* P* " P EXTRN DWTCHP CHANEL PARAMETER P EXTRN DWTST STATUS > P EXTRN DWTBC BYTE COUNTER Z & P EXTRN DWTADR DRIVER ADDRESS BLOCK | P EXTRN DWTA3 SAVE AREA A3 P EXTRN DWTA4 SAVE AREA A4 P EXTRN DWTA5 SAVE AREA A5
0x306770…306904 Dummy {f00=0x00f3, f01=0x018e, f02=» INPUT DWT ~ P EJECT P* P* * P* 4 P* CONSTANTS > P* V P* ` P* j * POVMASK EQU /2 OVERFLOW IN INPUT BUFFER t P* . PX:F EQU 20 LENGTH OF CIRCULAR INPUT BUFFER 2 PDWTLNG EQU 40 NUMBER OF BYTES IN DECIMAL F
0x306904…306a98 Dummy {f00=0x00f3, f01=0x018e, f02=» P* P* , P**************************************** , P* CONDITIONAL ASSEMBLY * L , P**************************************** | P* . P* TIME OUT FUNCTION MAY BE EXCLUDED BY P* SETTING X:A = 0. P*
0x306a98…306c2c Dummy {f00=0x00f3, f01=0x0190, f02=» PX:B EQU 1 PCECHO EQU 1 P* . > P* BY SETTING X:E = 1 THE FOLOWING POWER OFF FUNCTION 8 & P* IS INCLUDED IN THE DRIVER. z < P* IF THERE IS A READ REQUEST THIS IS COMPLETED WITH , P* ZERO IN THE CONTROL WORD OF E
0x306c2c…306dc0 Dummy {f00=0x00f3, f01=0x0190, f02=»WORD X P* OF ECB P* " P* , PX:E EQU 0 6 PPOWOFF EQU 1 H P* P* f P* p N P* BY SETTING X:H = 1 THE KEY A15IS USED AS A NUMERIC SHIFT ON KB 71/72 z PX:H EQU 0 PNSHIFT EQU 1 P* P* B P*
0x306dc0…306f54 (2, 220) Dummy {f00=0x00f4, f01=0x018e, f02=»M VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. ( P* V PMMUPAG EQU 1 ` P* t P* ~ 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU
0x306f54…3070e8 Dummy {f00=0x00f4, f01=0x0190, f02=» P* MMU KEY TABLE SIZE P* " P* , PX:K EQU 10 6 PDVBKTB EQU 50 H P* ^ P EJECT h P* v P* P* DWT-DISPLACEMENT P* P* 0 PDWTDRD EQU /10 START OF DRIVER DEFINED PART P* P IFT MMUPAG=0
0x3070e8…30727c Dummy {f00=0x00f4, f01=0x0190, f02=»TART+/00 CONVERSION TABLE 8 PDWTINQ EQU START+/18 POINTER TO FIRST PLACE IN QUEUE " 8 PDWTUTQ EQU START+/1A POINTER TO LAST PLACE IN QUEUE ^ & PDWTSQ EQU START+/1C START OF QUEUE ( PDWTEQ EQU DWTSQ+DWTLNG END OF QUEUE P* ( P* SPECIA
0x30727c…307410 Dummy {f00=0x00f4, f01=0x018e, f02=»ARACTER t . PKBMZ2 EQU START+/17 DOUBLE ZERO CHARACTER PKBMZ3 EQU START+/16 B P* ^ P EJECT h P* TABLES v P* P* $ P DATA DVBKTB MMU KEY TABLE SIZE P DATA DVBLEN MMU BUFFER SIZE P DATA 6 DEVICE INDEX P
0x307410…3075a4 Dummy {f00=0x00f4, f01=0x0190, f02=» r P IFT POWOFF=1 P DATA RCKB RECOVERY ROUTINE P XIF B P IFT POWOFF=0 N P DATA 0 NO RECOVERY d P XIF P* P IFT POWOFF=1 P EJECT P* RCKB P* P* RECOVERY PART P* P* PRCKB
0x3075a4…307738 Dummy {f00=0x00f4, f01=0x0190, f02=» " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF . P* : P IFT POWOFF=1 D P LD A3,DWTST,A6 BUSY? Z P RF(NN) RCKB10 x P LDKL A1,/200 ( P ORS A1,DWTST,A6 INDICATE POWER OFF P ABL TDISP & PRCKB10 CF A5,LDREGE LOAD REGISTERS
0x307738…3078cc Dummy {f00=0x00f4, f01=0x0190, f02=»Y OF ORDERS AND j P* @ P* EXAMINES INPUT BUFFER TO SEE IF SOME QUEUED CHARACTER " P* f P* TO THREAT p P* P* P* P* PACKB EQU * P LDKL A1,/FEFF 2 P ANS A1,DWTST,A6 RESET INETRRUPT ALLOWED FLAG
0x3078cc…307a60 Dummy {f00=0x00f4, f01=0x0190, f02=»N) AKB200 ORDER 1,2 OR 3 P SUK A4,/2D P RF(Z) AKB110 ORDER 31 4 * PAKB100 ORKL A1,/8000 I/0 REQUEST ERROR R P ABL ENDI10 P EJECT P* P* P* & P* ORDER 31 RESET INPUT BUFFER P* P* P* P
0x307a60…307bf4 (2, 221) Dummy {f00=0x00f4, f01=0x0190, f02=»JECT P* P* P* ORDER 1,2,3 P* : P* D P* N PAKB200 EQU * X P IFT POWOFF=1 l P LD A2,DWTST,A6 P ANKL A2,/200 POWER OFF? P RF(E) AKB205 NO! ( P XRS A2,DWTST,A6 RESET POWER OFF BIT PAKB202 E
0x307bf4…307d88 Dummy {f00=0x00f4, f01=0x0190, f02=»B218 P XIF PAKB205 EQU * P IFT CTIMUT=1 , P LDR* A1,A6 B P ANK A1,/40 TIMING? V , P RF(E) AKB210 NO TIMING FOR THIS DEVICE! r , P LD A4,DWTTP,A6 CHECK IF ALREADY TIMING P RF(E) AKBTIM P LDKL A4,-TIME P ST* A4,DW
0x307d88…307f1c Dummy {f00=0x00f4, f01=0x0190, f02=» 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 X P XIF P* P EJECT P* IF ANY KEY-LOCK: P* : P* RESET "CHANGED-KEY" FLAG AND MAKE KEY-CHA
0x307f1c…3080b0 Dummy {f00=0x00f4, f01=0x0190, f02=»* AND END I/O. ELSE CONTINUE. P* * P* 4 PAKB210 EQU * > " P LD A2,DWTST,A6 ANY KEY-LOCK? R P ANK A2,/F x P RF(Z) AKB219 P SLL A2,1 P SRN A2,A4 P LDR A1,A4 P CWK A4,3 P RF(N) AKB212 P RF(P) AKB
0x3080b0…308244 Dummy {f00=0x00f4, f01=0x0190, f02=» P SLL A4,4 P AN A4,DWTST,A6 P STR A4,A15 SAVE A4 . P STR A3,A15 J P SRN A2,A3 ORDER 1 ^ " P ADR A3,A3 MAKE CHARACTER FLAG x P LDR A4,A4 P RF(NE) AKB213 P ADK A3,1 PAKB213 ADK A3,/70 P LDR A2,A3 P L
0x308244…3083d8 Dummy {f00=0x00f4, f01=0x0190, f02=»BASIC READ z " PAKB214 NGR A2,A1 MAKE ECB CODE P LDR A4,A4 KEY FLAG 8 P RF(E) AKB215 T P SUK A2,4 j , PAKB215 ST A2,10,A8 KEY-LOCK CODE IN ECB | PAKB218 ABL AKB380 ( PAKB219 LD A2,4,A8 REQUESTED LENGTH=0 PAKB220 ABL(E) AKB380
0x3083d8…30856c Dummy {f00=0x00f4, f01=0x0190, f02=» & PAKB230 SCR A3,A1 CLEAR ECB BUFFER P SUK A1,1 . P SUK A2,1 @ P RB(NE) AKB230 R PAKB240 EQU * h P LD A1,DWTUTQ,A6 | P LCR A2,A1 PAKB245 LDR A4,A2 P XRK A4,/FF OVERFLOW? P RF(NE) AKB250 N0! PAKB247 SCR A4,A1 Y
0x30856c…308700 Dummy {f00=0x00f4, f01=0x0190, f02=»55 " P CF A5,STREG NOTHING IN QUEUE P IFT CTIMUT=1 2 * P LDR A1,A1 CHECK TIME OUT RETURN CODE H P RF(Z) AKB257 NO TIME OUT v $ P ABL ENDI05 END I/O AT TIME OUT P XIF P IFT CTIMUT=0 P RF AKB257 P XIF * PAKB255 C
0x308700…308894 (2, 222) Dummy {f00=0x00f4, f01=0x0190, f02=» RF(NN) AKB310 ORDER 2 OR 3 P EJECT $ P* 2 P* < P* ORDER 1 BASIC READ F P* f P* p P* z 6 PAKB305 CF A15,STORE STORE CHARACTER IN ECB-BUFFER P IFT CECHO=1 P CF A5,ECHO P XIF PAKB307 CW A3,4,A8
0x308894…308a28 Dummy {f00=0x00f4, f01=0x0190, f02=» P EJECT P* P* P* * 4 P* ORDER 2 OR 3 STANDARD AND NUMERIC READ 4 P* l B P* CHECK IF READ CHARACTER IS FOUND IN KEY-TABLE (IF ANY) v P* P* P* P* PAKB310 EQU * " P LD A1,10,A8 KEY
0x308a28…308bbc Dummy {f00=0x00f4, f01=0x018e, f02=»ACE IN KEY-TABLE ~ P ADK A1,1 PAKB355 SUK A4,1 * , P RF(N) AKB360 KEY NOT FOUND IN KEY-TABLE B P SUK A1,1 NEXT KEY r P CCR A2,A1 EOR? P RB(NE) AKB355 NO! P ADK A4,1 , P ST A4,10,A8 STORE INDEX IN CONTROL WORD " P CF A15,
0x308bbc…308d50 Dummy {f00=0x00f4, f01=0x0190, f02=» P RF AKB380 ! PAKB360 EQU * ! P LDR A4,A2 ! . P CC A4,KBMZ2,A6 ! @ P RF(E) KBMZ20 ! X P CC A4,KBMZ3,A6 ! n P RF(E) KBMZ30 ! P CC A4,KBBSP,A6 ! P RF(E) KBSP10 ! P CC A4,KBCLR,A6 ! P RF(E) KBCL10 ! , P CF A15,STORE ST
0x308d50…308ee4 Dummy {f00=0x00f4, f01=0x0190, f02=»4,/5F CHARACTER > /7F ! P RF(P) AKB364 YES " P CWK A7,2 " 8 $ P RF(E) AKB366 STANDARD READ OK " J P ADK A4,/4F " r P RF(N) AKB364 " P SUK A4,/A " " P RF(N) AKB366 NUMERIC READ OK " PAKB364 LDK A1,4 ERROR CODE " P RF ENDIO " P
0x308ee4…309078 Dummy {f00=0x00f4, f01=0x0190, f02=»BL(L) AKB210 NO RETURN " & PAKB368 LDK A1,8 YES SET ERROR CODE # P RF ENDIO END I/O # H P EJECT # b PKBMZ30 EQU * TRIPPLE ZERO # p P LDK A4,3 # P RF KBMZ25 # PKBMZ20 LDK A4,2 DOUBLE ZERO # PKBMZ25 LDK A2,/30 # P SUK A4,1 # P R
0x309078…30920c Dummy {f00=0x00f4, f01=0x0190, f02=»,4,A8 # P RB(L) KBMZ25 $ PKBMZ27 EQU * $ $ P SUK A4,1 ANY MORE ZEROES $ 8 $ P RB(L) AKB368 NO,SET RETURN CODE $ Z P INH $ * P LD A1,DWTUTQ,A6 GET OUTQUEUE POINTER $ P SUR A1,A6 $ " P CWK A1,DWTSQ FIRST POSITION ? $ P RF(NE) KBMZ29 NO $
0x30920c…3093a0 Dummy {f00=0x00f4, f01=0x0190, f02=» POINTER POSITION $ t 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 STORE NEW OUTQUEUE POINTER % & P LDK A2,/30 STORE ZERO IN CIRKULAR % P SCR A2,A1 INPUT BUFFER % P RB KBMZ27
0x3093a0…309534 (2, 223) Dummy {f00=0x00f4, f01=0x0190, f02=»1,/A SET RETURN CODE FOR BOTH % . PENDIX RF ENDIO LENGTH AND THRUGHPUT ERRORS & & P* & X P* & b P* & l PKBCL10 EQU * CLEAR & v P LDK A3,0 & P LDK A2,/18 & P RB AKB366 & P* & P* & P* & PKBSP10 EQU * & P LDR A3,A3 &
0x309534…3096c8 Dummy {f00=0x00f4, f01=0x0190, f02=»15 LDK A2,/8 & P RB AKB366 ' P* ' & P* ' 0 PAKB380 LDK A1,0 RETURN CODE ' : P EJECT ' ^ P* ' l P* ' v , P* THIS IS A COMMON END OF THE DRIVER ' P* ' 2 P* SET EFFECTIVE LENGTH AND PERFORM END I/O ' $ P* ON KEYBOARD AND ECH
0x3096c8…30985c Dummy {f00=0x00f4, f01=0x0190, f02=»5 NO TIMING ON THIS DEVICE ' P CM* DWTTP,A6 RESET TIMER ( " P CM DWTTP,A6 ( D P XIF ( X P* ( d , PENDI05 ST A3,6,A8 STORE EFFECTIVE LENGTH ( n PENDI10 EQU * ( P* ( P IFT CECHO=1 ( P LDR A4,A1 SAVE A1 ( ( P CF A5,ECHEND END I/O ON ECHO
0x30985c…3099f0 Dummy {f00=0x00f4, f01=0x0190, f02=»IHKB ( P* ) P* ) F P* THIS IS THE INTERRUPT HANDLER ENTERED FROM CHLT/CHRT DRIVER ) P* ) j P* ) t P* ) ~ PIHKB EQU * ) P ANK A2,/FF ) * P CF A15,KONVER CONVERT INPUT CHARACTER ) P LDR A4,A4 TEST TYPE OF CHAR ) P RF(P) E
0x3099f0…309b84 Dummy {f00=0x00f4, f01=0x0190, f02=» ) P RF(Z) EXIT * P LD A3,DWTST,A6 I/O REQUEST? * P XIF * @ * P RF(N) IHKB15 NO READ REQUEST PENDING * L " P SLL A3,7 INTERRUPT ALLOWED ? * z 4 P RF(NN) IHKB15 NO, STORE CHARACTER IN DWT-BUFFER * P IFT CTIMUT=1 * P LD A3,DWTTP,A6 * * P R
0x309b84…309d18 Dummy {f00=0x00f4, f01=0x0190, f02=»URN TO READ ROUTINE * | , PIHKB12 CF A15,KEYSET SET KEY CODE IN DWT + P LDR A3,A3 + L P RF(Z) EXIT NO KEY CHANGE + ^ P LD A3,DWTST,A6 + ( P RF(N) EXIT NO READ REQUEST PENDING + P SLL A3,7 + & P RF(NN) EXIT INERRUPT NOT ALLOWED + ( P LD A3,D
0x309d18…309eac Dummy {f00=0x00f4, f01=0x0190, f02=» LCR A4,A1 + " P XRK A4,/FF ALREADY OVERFLOW? , P RF(E) EXIT YES , 8 P LDR A3,A1 , P 4 P CF A15,EOQUEU GET NEXT OUTQUEUE POINTER ADDRESS , b P CW A1,DWTUTQ,A6 OVERFLOW? , ( P RF(NZ) IHKB20 SAVE KEY-LOCK IF ANY , 0 P ORK A2,/FF SET OVERFLOWBIT IN I
0x309eac…30a040 Dummy {f00=0x00f4, f01=0x0190, f02=»* , P EJECT - P* - P* - " P* - , P* AKBTUT - 6 P* - J & P* THIS IS THE TIME-OUT ROUTINE - T P* - ~ P* - P* - P IFT CTIMUT=1 - PAKBTUT EQU * - " P LDR A6,A1 RESTART DWT-ADDRESS - P LDK A1,/40 SET RETURNE CODE
0x30a040…30a1d4 (2, 224) Dummy {f00=0x00f5, f01=0x0190, f02=»O - j P XIF . P EJECT . P* . $ P* . . P* . 8 P* . B P* KEYSET . L P* . ` P* . j P* . t , P* ON ENTRY: A4= NEG KEY-LOCK VALUE . ~ P* . @ P* ON EXIT: A3= ZERO IF IF NO CHANGE IN KEYS, ELSE POS . P* . P*
0x30a1d4…30a368 Dummy {f00=0x00f5, f01=0x018e, f02=»=OFF 0=ON . ~ P RB(N) SET100 / $ P ANR A3,A2 CHEC OLD KEY POSITION / ( " P RF(NZ) SET300 JUMP IF KEY ON / P P LDR A4,A4 / v P RF(NZ) SET500 / P RF SET400 / PSET300 LDR A4,A4 / P RF(Z) SET500 / PSET400 LD A3,DWTST,A6 / P XRR A3,A2 /
0x30a368…30a4fc Dummy {f00=0x00f5, f01=0x0190, f02=» P RTN A15 0 P EJECT 0 P* 0 " P* 0 , P* 0 6 P* KONVER 0 @ P* 0 T * P* KONVER CONVERTS INPUT CHARACTER 0 ^ P* 0 P* 0 ( P* ON ENTRY: A2= INPUT CHARACTER 0 P* 0 P* 0 * P* ON EXIT: A2=COVERTED CHARACTER 0
0x30a4fc…30a690 Dummy {f00=0x00f5, f01=0x0190, f02=»* 0 PKONVER EQU * 1 P LDR A4,A2 1 P IFT NSHIFT=0 1 0 P SUK A4,/7C CODE > /7B 1 F P RF(NN) KON500 YES 1 d P LDR A4,A2 RESTORE CHARACTER 1 ~ P XIF 1 8 P STR A2,A15 STORE CHARACTER IN CASE OF NO CONVERSION 1 P LDR* A5,A6 1 P SUK A4,/2
0x30a690…30a824 Dummy {f00=0x00f5, f01=0x0190, f02=»KON110 NO 1 P SUK A2,/40 YES 2 PKON105 EQU * 2 * P ANK A5,/10 2 > P SRL A5,3 2 R P RF KON200 2 d * PKON110 SUK A4,8 (UN)CTRL OR (UN)SHIFT 2 v P RF(N) KON400 KEY-LOCK 2 P RF(Z) KON140 SHIFT ON 2 P SUK A4,2 2 P RF(N) KON160 SHIFT OF
0x30a824…30a9b8 Dummy {f00=0x00f5, f01=0x0190, f02=»CAL SHIFT ON 2 | " P RF KON160 NUMERICAL SHIFT OFF 3 P XIF 3 : PKON125 EQU * 3 F P LDKL A2,/FFDF UNCTRL 3 Z PKON120 ANR A5,A2 3 x PKON130 STR A5,A6 DWTCHP 3 P LDK A4,/10 3 P RF KON400 GO HOME! 3 PKON140 EQU * 3 P IFT NSHIFT=1 3
0x30a9b8…30ab4c Dummy {f00=0x00f5, f01=0x0190, f02=» 3 P LDK A2,/10 SHIFT 4 PKON150 ORR A5,A2 4 " P RB KON130 4 : PKON160 EQU * 4 L P IFT NSHIFT=1 4 ` P LDR A4,A5 4 v P ANK A4,/80 4 P RF(Z) KON165 4 P LDKL A2,/FF7F 4 P RB KON120 4 P XIF 4 PKON165 EQU * 4 P LDKL A2,/FFEF
0x30ab4c…30ace0 Dummy {f00=0x00f5, f01=0x0190, f02=»/30 4 P SRL A5,3 5 P ADK A5,4 5 8 PKON200 LD A4,DWTCON,A6 GET CONVERSION TABLE ADDRESS 5 0 P ADR A4,A5 5 l P LDR* A4,A4 5 ~ P RF(Z) KON400 5 P ADR A4,A2 5 * P LDR* A2,A15 RESTORE A2 AND A15-STACK 5 ( P LCR A2,A4 GET CHARACTER FROM TA
0x30ace0…30ae74 (2, 225) Dummy {f00=0x00f5, f01=0x0190, f02=» RB KON300 5 P IFT NSHIFT=0 6 PKON500 EQU * 6 ( P LDR A4,A4 KEY CODE /7C 6 < P RF(Z) KON600 YES 6 & P LDK A4,1 INDICATE SKIP CHARACTER 6 v P RTN A15 6 PKON600 EQU * 6 P SUR A2,A2 6 P RB KONVER DO START AGAIN 6 P XIF 6 P EJE
0x30ae74…30b008 Dummy {f00=0x00f5, f01=0x0190, f02=» 6 P* ON ENTRY: 7 P* 7 P* A2 = CHARACTER TO STORE 7 ( P* A3 = BUFFER INDEX 7 L P* 7 j P* 7 t PSTORE EQU * 7 ~ P LD A4,2,A8 BUFFER ADDRESS 7 P ADR A4,A3 ADD BUFFER INDEX 7 ( P SCR A2,A4 STORE CHARACTER IN BUFFER 7 $ P ADK
0x30b008…30b19c Dummy {f00=0x00f5, f01=0x0190, f02=»TINE TO GET NEXT QUEUE POINTER 7 | P* 8 & P* ON ENTRY: 8 0 P* 8 F P* A1 = QUEUE POINTER 8 P P* A6 = DWT-ADDRESS 8 p P* 8 P* ON EXIT: 8 P* 8 P* A1 = NEW QUEUE POINTER 8 PEOQUEU EQU * 8 P ADK A1,1 8 P SUR A
0x30b19c…30b330 Dummy {f00=0x00f5, f01=0x4026, f02=» P RB STORTN 9 P END 9 @ 9 "* 8 & P* ON ENTRY: 8 0 P* 8 F P* A1 = QUEUE POINTER 8 P P* A6 = DWT-ADDRESS 8 p P* 8 P* ON EXIT: 8 P* 8 P* A1 = NEW QUEUE POINTER 8 PEOQUEU EQU * 8 P ADK A1,1 8 P SUR A
0x30b330…30b4c4 Dummy {f00=0x00f5, 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
0x30b4c4…30b658 Dummy {f00=0x00f5, f01=0x0190, f02=» 9a H E ^ W P ,! T T ( : "' # @ P $ ) 5 : A A A " P6 A "" P f P @ E "# P P @ P ( )W @ 0 R % "V z A _" P @
0x30b658…30b7ec Dummy {f00=0x00f5, f01=0x0190, f02=» h : : P * B # P G W G * @ P 4 A U 2W A A @ U : :A A , ` R @ U P ,% T C
0x30b7ec…30b980 Dummy {f00=0x00f5, f01=0x0190, f02=» 9a H E ^ W P ,! T T ( : "' # @ P $ ) 5 : A A A " P6 A "" P f P @ E "# P P @ P ( )W @ 0 R % "V A _" P @
0x30b980…30bb14 (2, 226) Opaque[0x194]
0x30bb14…30bca8 # DirEnt {nam=»DRTP02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1eb0, f03=0x0000}
0x30bb14…30bca8 IdxSect {
0x30bb14…30bca8 f00 = 0x00f5 // 0x30bb14 @0x0
0x30bb14…30bca8 f01 = 0x0012 // 0x30bb16 @0x2
0x30bb14…30bca8 gno = [ // 0x30bb18 @0x4
0x30bb14…30bca8 [0x00]: C0x00f5.0x2.0
0x30bb14…30bca8 [0x01]: C0x00f5.0x3.0
0x30bb14…30bca8 [0x02]: C0x00f6.0x0.0
0x30bb14…30bca8 [0x03]: C0x00f6.0x1.0
0x30bb14…30bca8 [0x04]: C0x00f6.0x2.0
0x30bb14…30bca8 [0x05]: C0x00f6.0x3.0
0x30bb14…30bca8 [0x06]: C0x00f7.0x0.0
0x30bb14…30bca8 [0x07]: C0x00f7.0x1.0
0x30bb14…30bca8 [0x08]: C0x00f7.0x2.0
0x30bb14…30bca8 ]
0x30bb14…30bca8 }
0x30bca8…30be3c Dummy {f00=0x00f5, f01=0x0190, f02=» 2 P IDENT DRTP02 REL 9.2 79-11-16 870105040920 P : P =4,CUT AND PERF CORRECTED B P REL 9.1 79-05-23 f P UPDATE PRR 9.1 - REL 9.1 P PRR 9.1 79-04-25 P REL 9.1 79-04-06 & P =1-3,GEN UPDATE TO 8.2+ STATUS P
0x30be3c…30bfd0 Dummy {f00=0x00f5, f01=0x0190, f02=» REL 8.2 79-03-16 P =1,IMPRROV. OF TEST ORDER P REL 8.2 78-09-15 @ < P******************************************************* < P* * < P* PHILIPS TERMINAL SYSTEM PTS
0x30bfd0…30c164 Dummy {f00=0x00f5, f01=0x0190, f02=» * < P* * < P* * L P* P* P* < P* * < P******************************
0x30c164…30c2f8 Dummy {f00=0x00f5, f01=0x0190, f02=» TO CPU VIA CHLT OR CHRT v P* P* * 4 P* THIS DRIVER CONSISTS OF THE FOLLOWING PARTS: 4 P* l $ P* A C T P : ACTIVATION PART v P* & P* I H T P : INTERRUPT HANDLER P* $ P* R C T P : RECOVERY ROUTINE P*
0x30c2f8…30c48c Dummy {f00=0x00f5, f01=0x0190, f02=» SEND THEM P* 6 P* B C D T B Y : CONVERT TO BINARY FROM DECIMAL P* V D P* B U F C H R : SEND THE NUMBER OF CHARACTERS GIVEN IN FIRST ` $ P* CHARACTER IN OUTPUT BUFFER P* . P* G R A S P : SEND GRASP TO VOUCHER
0x30c48c…30c620 Dummy {f00=0x00f5, f01=0x0190, f02=» P* $ P* ORDER 00 : TEST STATUS P* ORDER 06 : WRITE 6 0 P* ORDER 0B : POSITION LIFT AND WRITE X $ P* ORDER 22 : CUT JOURNAL * P* ORDER 26 : PERFORATE JOURNAL . P* ORDER 37 : GRASP VOUCHER/PASS
0x30c620…30c7b4 (2, 227) Dummy {f00=0x00f5, f01=0x0190, f02=»BIT 0 : REQUEST ERROR 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 : NOT OPERABLE P* P* P*
0x30c7b4…30c948 Dummy {f00=0x00f5, f01=0x0190, f02=» A3: BUFFER POINTER $ P* A4: OUTPUT COUNTER " P* A5: STACK POINTER D P* A6: DWT-ADDRESS j P* A7: ORDER P* A8: ECB-ADDRESS P* P* P* P* P* SYSTEM ADAPT
0x30c948…30cadc Dummy {f00=0x00f5, f01=0x0190, f02=»TURN CODE IS SET IF RECOVERY IS EXECUTED ON REQUEST 4 P* CUT/PERFORATE JOURNAL TAPE (PTS 6221,6222) < 0 P* ACCAPTANCE OF SPECIAL CHARACTER /13,/14 t H P* COMPLETION OF REQUEST AT 'VOUCHER OUT' BEFORE MESSAGE IS WRITTEN P* P* @ P
0x30cadc…30cc70 Dummy {f00=0x00f5, f01=0x018e, f02=» P* P EJECT P* P*********** * P* ENTRIES * > P*********** R P* f P* p P ENTRY TPAD ADDRESS BLOCK z P* P* P* P************* P* EXTERNALS * P************* P* P*
0x30cc70…30ce04 Dummy {f00=0x00f5, f01=0x0190, f02=» P EXTRN TENDIO END I/O & P EXTRN OUTPUT OUTPUT ONE CHARACTER " " P EXTRN LDREG RESTORE REGISTERS L 8 P EXTRN STREG STORE REGISTERS AND WAIT FOR INTERRUPT r P EXTRN SAVE8 SAVE REG. A1-A8 P* P EXTRN DWTST STATUS EXTRN DWTBC BYT
0x30ce04…30cf98 Dummy {f00=0x00f5, f01=0x0190, f02=» P* ECB DISPLACEMENTS P* $ P EXTRN ECBBA BUFFER ADDRESS . " P EXTRN ECBRL REQUESTED LENGTH R " P EXTRN ECBEL EFFECTIVE LENGTH x P EXTRN ECBRC RETURN CODE P EXTRN ECBCW CONTROL WORD P EJECT P************************
0x30cf98…30d12c Dummy {f00=0x00f5, f01=0x0190, f02=»ODE IS SET b P* BY SETTING X:A = 1 P* 0 P* : PX:A EQU 0 D PRECOV EQU 0 V P* j P* t : P* JOURNAL TAPE MAY BE CUT/PERFORATED FOR PTS 6223 BY ~ P* SETTING X:B = 1 P* P* PX:B EQU 0 PCUTPER EQU
0x30d12c…30d2c0 Dummy {f00=0x00f5, f01=0x0190, f02=»* P* PX:C EQU 0 PCHR13 EQU 0 & P* : P* D PX:D EQU 0 N PCHR14 EQU 0 ` P* t P* ~ 2 P* PRINTING VOUCHER/PASSBOOK, IS COMPLETED IF : P* PRINT OBJECT IS REMOVED UNDER PRINTING IF X:E = 1 P* P*
0x30d2c0…30d454 (2, 228) Dummy {f00=0x00f6, f01=0x0190, f02=»T X < P* IS INACTIVE,END OF REQUEST MAY BE CHOSEN BY SETTING > P* THE CONSTANT RELEND=1. RETURN CODE NOT OPERABLE IS SET J P* P* PX:F EQU 0 PRELEND EQU 0 P* P* . P* A PROGRAM VERSION USING TOSS MMU PAGING
0x30d454…30d5e8 Dummy {f00=0x00f6, f01=0x0190, f02=»ED INSTRUCTION l . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* H PCPU852 EQU 0 R P* f P* p P* MMU BUFFER SIZE z P* P* PX:H EQU 20 PDVBLEN EQU 100 P* P EJECT P* P* P**********
0x30d5e8…30d77c Dummy {f00=0x00f6, f01=0x0190, f02=»/20 RETURN CODE. END OF JOURNAL TAPE P* , P* 6 0 PVOIN EQU /8 'VOUCHER IN' BIT IN DATA-REQUEST @ 2 PEOJT EQU /4 'END OF JOURNAL' BIT IN DATA-REQ. t @ PVOCHA EQU /200 BIT #6 DWTTST;VOUCHER STATUS CH. NOT ALLOWED 4 PMESS EQU /400 BIT #5 DWTTS
0x30d77c…30d910 Dummy {f00=0x00f6, f01=0x0190, f02=»UMMY ~ , PREMOT EQU /01 RESET PRINT BUFFER REMOTE * PTAB EQU /11 TABULATION CHAR IN BUFFER < PCR1 EQU /0D CR JOURNAL TAPE j PLF1 EQU /18 LF JOURNAL TAPE . PCR2 EQU /09 CR TALLY ROLL,VOUCHER/PASSBOOK PLF2 EQU /19 LF TALLY ROLL $ PLD
0x30d910…30daa4 Dummy {f00=0x00f6, f01=0x0190, f02=»OR INSERTION OF VOUCHER/PASSBOOK ~ ( PREL EQU /1B RELEASE VOUCHER/PASSBOOK ( " PAPH EQU /1D ATTACH PRINT HEAD T " PRPH EQU /1E RETURN PRINT HEAD z 4 PTETX EQU /83 LAST DUMMY AFTER GRASP AND RELEASE P* P* P*********************
0x30daa4…30dc38 Dummy {f00=0x00f6, f01=0x0190, f02=» P IFT MMUPAG=0 PSTART EQU DWTDRD P XIF 6 P* B P IFT MMUPAG=1 L PSTART EQU DWTDRD+4 b P XIF | P* . PDWTRLN EQU START+/12 REQUESTED LINE NUMBER , PDWTALN EQU START+/13 ACTUAL LINE NUMBER P* P EJECT
0x30dc38…30ddcc Dummy {f00=0x00f6, f01=0x018e, f02=» IFT CUTPER=0 PBUF2 DATA /0382 STX P XIF 2 P IFT CUTPER=1 > PBUF2 DATA /0482 STX T P XIF p $ P DATA /091D,/2000 CR2,APH,SPACE | & PBUF3 DATA /0382,/091D STX,CR2,APH 4 PBUF5 DATA /041B,/9783,/8200 REL,ETB,DUMMY,STB =2 P*
0x30ddcc…30df60 Dummy {f00=0x00f6, f01=0x0190, f02=» P DATA 2 DEVICE INDEX PTPAD EQU * ADDRESS BLOCK P DATA ACTP ACTIVATIONDRIVER @ " P DATA 0 ABORT ROUTINE ADDRESS d P DATA IHTP INTERRUPTHANDLER P DATA RCTP RECOVERY ROUTINE P* $ P* TABLE TO GET ROOMLESS POINT P*
0x30df60…30e0f4 (2, 229) Dummy {f00=0x00f6, f01=0x0190, f02=» PLFTAB EQU * , P DATA /1819 LINE FEED JOURNAL/TALLY ROLL P* L P* V P IFT CUTPER=1 ` : PCPTAB DATA /1F0F CODES FOR PERFORATE/CUT JOURNAL TAPE v P XIF PTPTAB EQU * ORDER TABLE P DATA /0002,/0607,/080D P IFT CUT
0x30e0f4…30e288 Dummy {f00=0x00f6, f01=0x0190, f02=»P P* 2 P* THIS IS THE ACTIVATION PART OF THE DRIVER > P* CHECKS VALIDITY OF ORDERS AND JUMPS TO ORDER PROCESSOR J P* P* P* PACTP EQU * ACTIVATION ENTRY P* P* < P* GET DWT INDEX: 0=JOURNAL,1=TALLY,2
0x30e288…30e41c Dummy {f00=0x00f6, f01=0x0190, f02=»WTOR+1,A6 SAVE NEW ORDER IN DWT P LDK A4,0 ACTIVATION ( PACT005 LDK A3,TPLEN-1 D 2 PACT010 CC A7,TPTAB,A3 FIND OUT IF LEGAL ORDER b P RF(E) ACT020 VALID ORDER P SUK A3,1 P RB(NN) ACT010 TRY NEXT P* P ABL DISIOE ILLEGA
0x30e41c…30e5b0 Dummy {f00=0x00f6, f01=0x0190, f02=»,A3 EXECUTE ORDER : PTPFUC DATA TPTEST,TPTEST,TP200,TP405,ACT055,ACT050 =1 P IFT CUTPER=1 X P DATA TP700,TP750 n P XIF P DATA TP800,TP900 P EJECT =1 P* =1 P* =1 P* ORDER 00: TEST =1 J P*
0x30e5b0…30e744 Dummy {f00=0x00f6, f01=0x0190, f02=»TPTEST LDK A2,STX SEND STX =2 P CF A5,OUTPUT =2 & P LDK A2,/02 SEND CHAR /02 =2 @ P CF A5,OUTPUT =1 d * P LDK A2,0 SEND CHAR /00=END OF TEST =1 ~ P CF A5,OUTPUT =1 P RF TPDUMY =1 P EJECT P* P* , P* ORDER
0x30e744…30e8d8 Dummy {f00=0x00f6, f01=0x0190, f02=»T050 LD A1,ECBCW,A8 GET LINE NUMBER FROM CONTROL WORD IN ECB P RF ACT085 D P* V , PACT055 LD A3,ECBBA,A8 GET BUFFER ADDRESS ` & P LC A3,1,A3 GET CONTROL CHARACTER $ P ANK A3,/FF REQUESTED LINE STEPS P SUK A3,/39 P RF(G) ACT070 > /3
0x30e8d8…30ea6c Dummy {f00=0x00f6, f01=0x0190, f02=»1-9 LF r P ADK A3,/5 P RF(Z) TP605 /2B = NO LF PACT070 LDK A3,1 ONE LF @ 4 PACT080 LC A1,DWTRLN,A6 GET LINE NUMBER FROM DWT ^ * P SUR A1,A3 GET REQUESTED LINE POSITION 2 PACT085 RF(NN) ACT090 LINE POSITION LESS ZERO ? * P LDK A1,0 YES;
0x30ea6c…30ec00 Dummy {f00=0x00f6, f01=0x0190, f02=»LINE NUMBER p P RF TP605 P EJECT & P* 4 P* > P* H P* ORDER 06 : PRINT JOURNAL R P* v P* P* * PTP200 LDKL A3,BUF1 SEND CR1 AND ATTACH PTP210 EQU * 0 P LC A1,DWTST,A6 GET LEFT BYTE IN STATUS WORD $
0x30ec00…30ed94 (2, 230) Dummy {f00=0x00f6, f01=0x018e, f02=»1,3 REQUESTED LENGTH 0-2 ? & P RF(N) TP230 YES; COMPLETE REQUEST " P RF(P) TP215 L P LD A1,2,A8 BUFFER ADDRESS ` P LC A2,2,A1 THIRD CHARACTER $ P CCK A2,/2020 CONTROL CHARACTER P RF(NL) TP215 P LDR A4,A2 SAVE CHAR =2 P LDK
0x30ed94…30ef28 Dummy {f00=0x00f6, f01=0x0190, f02=» v P CF A5,OUTPUT =2 P RF TP220 " PTP215 EQU * 4 P CF A5,BUFCHR SEND BUFFER H " P CF A5,PRBUF PRINT ECB-BUFFER j PTP220 EQU * P LDK A1,0 6 PTP230 LDKL A2,/FDFF VOUCHER STATUS CHANGE ALLOWED P ANS A2,DWTST,A6 P
0x30ef28…30f0bc Dummy {f00=0x00f6, f01=0x0190, f02=» PTPLF EQU * P LDK A2,STX SEND STX =2 P CF A5,OUTPUT =2 : P LDR A1,A1 T P RF(NE) TPLF10 f " P LDK A2,RPH DETACH PRINT HEAD | P CF A5,OUTPUT SEND PTPLF10 EQU * P SUK A7,8 ( P RF(NN) TPL010 NOT JOURNAL AND TALLY
0x30f0bc…30f250 Dummy {f00=0x00f6, f01=0x0190, f02=»8 GET REQUESTED LENGTH | * P ST A1,ECBEL,A8 STORE EFFECTIVE LENGTH ! P EJECT ! L P* ! Z P* ! d P* COMMON END OF PRINT ! n P* ! P* ! " P* SEND LAST DUMMY CHARACTER ! P* ! PTPDUMY EQU * ! P LDK A2,ETB SEND ETB =2 ! P C
0x30f250…30f3e4 Dummy {f00=0x00f6, f01=0x0190, f02=»ARACTER ! l P* " PTPTST EQU * " . P SUK A7,2 TEST STATUS : VOUCHER/PASSBOOK ? " . P RF(NZ) TST010 NO " ` $ PTST005 ANK A2,VOIN VOUCHER OUT ? " z P RF(NZ) ENDIO NO " P RF TST015 YES " P* " PTST010 SUK A7,4 " P IFT CUTPER=0 " * P
0x30f3e4…30f578 Dummy {f00=0x00f6, f01=0x0190, f02=» * " P XIF # & P ANK A2,EOJT END OF JOURNAL TAPE? # $ P RF(NZ) ENDIO NO: PERFORM ENDIO # @ ( PTST015 ORK A1,PROUT SET RETURN CODE: # h ( P END OF JOURNAL TAPE, VOUCHER OUT # P* # P* # , P* PERFORM END I/O AND GO TO DISPATCHER # P* #
0x30f578…30f70c Dummy {f00=0x00f6, f01=0x0190, f02=» # PTST020 SUK A7,16 $ " P RB(L) ENDIO VOUCHER/PASSBOOK $ P SUK A7,4 $ F P RB(G) ENDIO GRASP,RELEASE $ X P RB TST012 CUT,PERFORATE $ z P XIF $ P EJECT $ P* $ P* $ P* $ $ P* ORDER 06 : PRINT TALLY ROLL $ P* $ P* $
0x30f70c…30f8a0 Dummy {f00=0x00f6, f01=0x0190, f02=» LDKL A1,VOCHA $ @ P ORS A1,DWTST,A6 INDICATE VOUCHER STATUS CHANGE NOT ALLOWED % P RB TP210 % Z P* % l P EJECT % v P* % P* % P* % * P* ORDER 06 : WRITE VOUCHER/PASSBOOK % * P* OB : POSITION LIFT AND WRITE % P* % P
0x30f8a0…30fa34 (2, 231) Dummy {f00=0x00f6, f01=0x0190, f02=» % P* & P* & * P* SEND ELEVATOR UP/DOWN UNTIL ACTUAL & & P* LINE NUMBER IS EQUAL REQUESTED & J P* & t P* & ~ . PTP610 CC A3,DWTRLN,A6 COMPARE LINE NUMBER & P RF(E) TP650 EQUAL & " P RF(G) TP630 SEND ELEVATOR UP & " P LDK A2,LDO SE
0x30fa34…30fbc8 Dummy {f00=0x00f6, f01=0x0190, f02=»3,1 DECREMENT ACTUAL LINE NUMBER & P* ' ( & PTP640 CF A5,OUTPUT SEND LIFT CHAR ' 2 P* ' , P SC A3,DWTALN,A6 SAVE ACTUAL LINE NUMBER ' f P ANK A2,VOIN VOUCHER IN ? ' P IFT COMPL=0 ' & P ABL(Z) RCTP01 NO: ERROR RECOVERY ' , P RB TP610 YES: CHE
0x30fbc8…30fd5c Dummy {f00=0x00f6, f01=0x0190, f02=»VOUCHER OUT' ' | , P ORS A1,ECBRC,A8 INDICATE IN RETURN CODE ( P RB TPDUMY ( D P XIF ( V P EJECT ( b P* ( p P* ( z , P* ORDER 06 AND 0B: LIFT IS POSITIONED ( * P* ATTACH AND PRINT ( P* ( P* ( PTP650 EQU * ( &
0x30fd5c…30fef0 Dummy {f00=0x00f6, f01=0x0190, f02=» AND 26 CUT AND PERFORATE JOURNAL ( P* ) , PTP700 EQU * ) 6 P LDK A3,1 SET INDEX =4 ) J P RF TP760 ) h PTP750 EQU * ) z P LDK A3,0 SET INDEX =4 ) PTP760 LDK A2,STX SEND STX =4 ) P CF A5,OUTPUT =4 ) P LC A2,CPTAB,A3 GET CHAR =4 )
0x30fef0…310084 Dummy {f00=0x00f6, f01=0x0190, f02=»ASE VOUCHER/PASSBOOK ) l P* * PTP800 EQU * * & P CF A5,GRASPA * : P RB TPDUMY * P PTP900 EQU * * b P CF A5,RELEAS * v P RB TPDUMY * P * P EJECT * P* * P* P R B U F * P* * F P* SUBROUTINE TO SEND CHARACTERS FROM ECB
0x310084…310218 Dummy {f00=0x00f6, f01=0x018e, f02=»ST REQUESTED LENGTH * " P LD A3,ECBBA,A8 BUFFER ADDRESS + ( P* SKIP PRECEDING SPACES IN BUFFER + B P ADK A3,2 + n " PPRB010 LCR A1,A3 GET CHARACTER + P CCK A1,/2020 + P RF(NE) PRB050 NOT BLANK + P ADK A3,1 BLANK + P SUK A4,1 + " P R
0x310218…3103ac Dummy {f00=0x00f6, f01=0x0190, f02=» + n ( P ADR A1,A4 LAST CHARACTER IN BUFFER , P LC A1,-1,A1 GET CHAR , 4 * P CCK A1,/0909 CARRIAGE RETURN - CR2 ? , R P RF(E) PRB060 YES , * P CCK A1,/0D0D CARRIAGE RETURN - CR1 ? , P RF(E) PRB060 YES , P LDK A1,0 DUMMY CHARACTER , P RF
0x3103ac…310540 Dummy {f00=0x00f6, f01=0x0190, f02=»00 SUK A4,1 DECREMENT REQUESTED LENGTH , P RF(NN) PRB105 PRINT BUFFER - . 6 P LD A2,ECBEL,A8 GET CARRIAGE RETURN CHAR (/09,/0D) - R P RF(E) PRB101 - P CF A5,OUTPUT SEND CHAR - PPRB101 EQU * - P LDK A2,ETB - & P CF A5,OUTPUT SEND END OF MESS
0x310540…3106d4 (2, 232) Dummy {f00=0x00f7, f01=0x018e, f02=» ORS A1,DWTST,A6 - PPRB102 RTN A5 . P EJECT . . P* . < P* . F P* . P P* PRINT BUFFER . Z P* . r P* . | PPRB105 EQU * . 2 P ADR A3,A4 ADDRESS TO CHARACTER TO BE PRINTED . P SUK A7,7 CHECK ORDER . P RF(L) PRB200 PRINT JOURNA
0x3106d4…310868 Dummy {f00=0x00f7, f01=0x0190, f02=» P* / P ANK A2,VOIN VOUCHER IN ? / " P RF(Z) PRB200 NO. GO AND PRINT / 0 " P ADK A5,4 RESET STACK POINTER / V * P RB TP405 SEND LIFT TO TOP AND RELEAS / | P* / P* / P* / P* PRINT VOUCHER/PASSBOOK / P* / P* / $ PPRB110 ANK
0x310868…3109fc Dummy {f00=0x00f7, f01=0x018e, f02=»45 / P XIF 0 $ P LDR A1,A4 COPY REQUESTED LENGTH 0 P SUK A1,2 R.L. < 3? 0 > $ P RF(N) PRB200 YES: NO TABULATION 0 Z P LDK A1,TAB 0 P CC A1,-2,A3 TABULATION? 0 P RF(NE) PRB200 NO 0 P EJECT 0 P* 0 P* 0 4 P* IF TABULATION CHAR
0x3109fc…310b90 Dummy {f00=0x00f7, f01=0x0190, f02=» 0 P* 1 ( PPRB115 LDK A2,RPH DETACH PRINT HEAD 1 P CF A5,OUTPUT SEND DETACH 1 > , PPRB117 LC A2,-1,A3 GET 1ST TAB POS CHAR 1 ` $ P LCR A1,A3 GET 2ND TAB POS CHAR 1 P ANK A1,/F LINE UNIT 1 P SLL A2,4 1 P ANK A2,/F0 LINE DECADE 1 " P O
0x310b90…310d24 Dummy {f00=0x00f7, f01=0x018e, f02=»BC,A6 COMPARE WITH ACTUAL TAB. POS. 1 P RF(NG) PRB125 PRINT 2 , P* 2 H P* 2 R P* 2 P LDK A2,/20 LOAD BLANK 2 f ( P CF A5,OUTPUT SEND BLANKS OR DETACH 2 P RB PRB117 2 P* 2 P* 2 P* 2 . PPRB125 SUK A4,2 DECREMENT REQUESTED LENG
0x310d24…310eb8 Dummy {f00=0x00f7, f01=0x0190, f02=» 2 P* 3 2 P* GET OUTPUT CHARACTER FROM BUFFER. CHECK IF 3 P* - ROOMLESS POINT 3 H P* - ILLEGAL CHARACTER 3 d & P* - SPECIAL CHARACTER (/13,/14) 3 P* 3 PPRB200 EQU * 3 * PPRB205 LCR A7,A3 LOAD OUTPUT CHARACTER 3 " P CCK A7,/AEAE
0x310eb8…31104c Dummy {f00=0x00f7, f01=0x0190, f02=»ACTER 3 v P ANK A7,/F MASK 4 & P LC A7,ROMTAB,A7 GET CODE IN TABLE 4 & P* 4 P P* 4 Z P* 4 d , PPRB210 CCK A7,/2020 ILLEGAL CHARACTER ? 4 n P RF(L) PRB225 YES 4 , PPRB215 CCK A7,/5F5F ILLEGAL CHARACTER ? 4 P RF(NG) PRB230 NO 4 P* 4
0x31104c…3111e0 Dummy {f00=0x00f7, f01=0x0190, f02=»FT CHR14=1 4 & P CCK A7,/1414 SPECIAL CHARACTER ? 5 P RF(E) PRB230 YES 5 < P XIF 5 V P* 5 b " P LDK A1,CCERR CODE CHECK ERROR 5 l * P ORS A1,ECBRC,A8 STORE IN RETURN CODE 5 P LD A7,DWTOR,A6 GET ORDER 5 P ANK A7,/FF 5 P RF PRB245 5 P
0x3111e0…311374 (2, 233) Dummy {f00=0x00f7, f01=0x018e, f02=»PUT SEND CHARACTER 5 , PPRB245 SUR A3,A4 START OF BUFFER ADDRESS 6 P RB PRB100 6 J P* 6 P* 6 f P* 6 p P EJECT 6 z P* 6 P* I H T P 6 P* 6 0 P* INTERRUPT HANDLER: PROCESS OF INTERRUPT 6 P* 6 P* 6 P* 6 PIHTP E
0x311374…311508 Dummy {f00=0x00f7, f01=0x018e, f02=» P RF(NG) IHTP20 YES =1 7 , P LDR A1,A1 RETURN CODE FROM CHANNEL UNIT 7 " P =1 7 R P IFT RELEND=0 7 ` * P RF(NZ) RCTP10 YES GO TO DISPATCHER =1 7 v P XIF 7 P IFT RELEND=1 7 ( P RF(NZ) IHTP30 YES FINISH REQUEST =1 7 P XIF 7 8 PIHTP10 ABL
0x311508…31169c Dummy {f00=0x00f7, f01=0x0190, f02=» 7 P ABL ENDIO 8 P* 8 P* 8 $ P* 8 . P EJECT 8 8 P* 8 F P* R C T P 8 P P* 8 d > P* RECOVERY ROUTINE: REPRINTS RUNNING REQUEST AT POWER ON 8 n P* 8 PRCTP EQU * 8 P IFT CPU852=1 8 & P CF A15,SAVE8 SAVE A1-A8 ON STACK 8
0x31169c…311830 Dummy {f00=0x00f7, f01=0x0190, f02=»SY =3 8 t P ANS A2,DWTST,A6 =3 9 P LD A2,DWTECB,A6 =3 9 * ( P RF(Z) RCTP05 REQUEST NOT RUNNING =3 9 F P* 9 r $ PRCTP01 LDKL A5,DWTSB2 STACK BASE 9 | P ADR A5,A6 9 < P LDK A2,REMOT RESET PRINT BUFFER REMOTE AND LOCAL DUMMY 9 P CF A5,OUTPUT SEND
0x311830…3119c4 Dummy {f00=0x00f7, f01=0x018e, f02=» 2 P SC A2,DWTALN,A6 STORE 0 AS ACTUAL LINE NUMBER : P LDK A2,LFF LIFT TO TOP : : P CF A5,OUTPUT : Z P LD A2,DWTECB,A6 =3 : p & P RF(NZ) RCTP07 REQUEST RUNNING =3 : 0 P LDK A2,ETX SEND LAST DUMMY TO STOP TIMER =3 : P CF A5,OUTPUT =3 : P ABL
0x3119c4…311b58 Dummy {f00=0x00f7, f01=0x0190, f02=» P XIF ; P LDK A4,1 IND RECOVERY ; * P ABL ACT005 START RECOVERY OF PRINTER ; . & PRCTP10 ABL TDISP GO TO DISPATCHER ; P EJECT ; P* ; P* B C D T B Y ; P* ; 4 P* SUBROUTINE TO CONVERT TO BINARY FROM DECIMAL ; P* ; P* ;
0x311b58…311cec Dummy {f00=0x00f7, f01=0x0190, f02=»BY 6 ; | P RB BCDTB1 < " PBCDTB2 RTN A5 RETURN TO CALLER < P* < F P* < P P* < Z P* < d P* < n P* G R A S P < x P* < 4 P* SUBROUTINE TO SEND GRASP TO VOUCHER/PASSBOOK < P* < P* < PGRASPA EQU * < P LDK A2,STX SEND
0x311cec…311e80 Dummy {f00=0x00f7, f01=0x0190, f02=»DK A2,GRA GRASP < P CF A5,OUTPUT = P ANK A2,VOIN VOUCHER IN ? = . P RF(NZ) GRAS10 YES = P P LDK A2,ETB SEND ETB =2 = j P CF A5,OUTPUT =2 = " P LDK A2,TETX DUMMY AFTER GRASP = P CF A5,OUTPUT = P LDK A2,STX SEND STX =2 = P CF A5,O
0x311e80…312014 (2, 234) Dummy {f00=0x00f7, f01=0x0190, f02=» = P* > P EJECT > P* > P* > * P* R E L E A S > 4 P* > L 2 P* SUBROUTINE TO SEND LIFT TO TOP AND RELEASE > V P* > P* > P* > PRELEAS EQU * > P LDK A1,0 > 0 P SC A1,DWTALN,A6 SET ACTUAL LINE NUMBER TO 0 > ( P LDK
0x312014…3121a8 Dummy {f00=0x00f7, f01=0x0190, f02=»,OUTPUT > P ANK A2,VOIN VOUCHER IN ? ? P RF(Z) BUFRTN ? 2 P* ? H P* B U F C H R ? R P* ? j < P* SUBROUTINE TO OUTPUT A NUMBER OF CHARACTERS GIVEN IN ? t ( P* FIRST CHARACTER IN OUTPUT BUFFER ? P* ? P* ? 4 PBUFCHR LCR A4,A3 GET
0x3121a8…31233c Dummy {f00=0x00f7, f01=0x40fe, f02=»TER ? t P CF A5,OUTPUT SEND CHARACTER @ P SUK A4,1 DECREMENT COUNTER @ 0 & P RB(NZ) BUFC10 NOT LAST CHARACTER @ T PBUFRTN EQU * @ ~ P RTN A5 RETURN TO CALLER @ P* @ P* @ P* @ P* @ P* @ P* @ P END @ @ @ A4,A3 GET
0x31233c…3124d0 Dummy {f00=0x00f7, f01=0x2008, f02=» A * 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
0x3124d0…312664 Dummy {f00=0x00f7, f01=0x018e, f02=» , ( Y _` B P $$ R % C , ( y * ! W Y +P Y *P Y ( 4 , ( P Y )P R _Q P OR d , ( R W " ! B W W , ( @ 0 Z ! B Z Z& , ( X . 0
0x312664…3127f8 Dummy {f00=0x00f7, f01=0x0190, f02=» DISEND , ( OA Y C ! " * & i @ Q R X # P X R ;GV X J LDREG x , ( @ P y P X DWTA3 DWTSB2 , ( @ R ;GV X X , *
0x3127f8…31298c Dummy {f00=0x00f7, f01=0x0190, f02=» h , ( :d Y > > ? 8 R @R , ( ) V @% =cW R P R P R P W 8 , ( I 9 W $ P W _ $ P h , ( i _$ _*_, _ %0=c X , ( 0P > 0 > >_ B 1 >
0x31298c…312b20 Dummy {f00=0x00f7, f01=0x417c, f02=» @ @ T T ! & 'T /P f H D ! 3 R 7 AV E OP _P$ kR { W PH P> P P R Q " H D ! P R R W Wr W T W P 'W 1P 9 IP g kQf n H D ! mR$ uP {R6 V2 P P8 R2 V. P T W T T W H D !
0x312b20…312cb4 (2, 235) Opaque[0x194]
0x312cb4…312e48 # DirEnt {nam=»DRGP01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1ef8, f03=0x0000}
0x312cb4…312e48 IdxSect {
0x312cb4…312e48 f00 = 0x00f7 // 0x312cb4 @0x0
0x312cb4…312e48 f01 = 0x000e // 0x312cb6 @0x2
0x312cb4…312e48 gno = [ // 0x312cb8 @0x4
0x312cb4…312e48 [0x00]: C0x00f7.0x3.0
0x312cb4…312e48 [0x01]: C0x00f8.0x0.0
0x312cb4…312e48 [0x02]: C0x00f8.0x1.0
0x312cb4…312e48 [0x03]: C0x00f8.0x2.0
0x312cb4…312e48 [0x04]: C0x00f8.0x3.0
0x312cb4…312e48 [0x05]: C0x00f9.0x0.0
0x312cb4…312e48 [0x06]: C0x00f9.0x1.0
0x312cb4…312e48 ]
0x312cb4…312e48 }
0x312e48…312fdc Dummy {f00=0x00f7, f01=0x0190, f02=» 2 P IDENT DRGP01 REL 9.2 80-01-03 870105040920 P : P =4,MMU BUFFER CONDITION B P REL 9.2 79-11-16 d P =3,RB - ABL P REL 9.1 79-05-23 P UPDATE PRR 9.1 - REL 9.1 P PRR 9.1 79-04-25 P REL 9.1 79-04-06
0x312fdc…313170 Dummy {f00=0x00f7, f01=0x0190, f02=» " P =1,ECHO OF LF AND CR, ABIS P REL 8.2 78-09-15 * P* F P* P 6 P************************************************** Z P* $ P* PHILIPS TERMINAL SYSTEM PTS P* ( P* DRGP01 = DRIVER GENERAL PRINTER P* P*
0x313170…313304 Dummy {f00=0x00f7, f01=0x018e, f02=»DRIVER HANDLES GENERAL TERMINAL PRINTER < P* PTS 6321 CONNECTED TO THE SYSTEM VIA CHLT OR CHRT. 0 P* p 8 P* THE DRIVER ALSO INCLUDES DEVICE DEPENDENT ECHO z 6 P* FUNCTIONS, WHICH MAKES IT POSSIBLE TO USE THE 6 P* GENERAL PRINTER AS
0x313304…313498 Dummy {f00=0x00f7, f01=0x0190, f02=» 0 P* THE DRIVER CONSISTS OF FOLLOWING PARTS: P* 8 & P* A C G P ACTIVATION PART B P* l ( P* I H G P INTERRUPT HANDLER v P* ( P* R C G P RECOVERY ROUTINE P* & P* E C H O G P ECHO FUNCTIONS
0x313498…31362c Dummy {f00=0x00f7, f01=0x0190, f02=» 05: BASIC WRITE " P* 06: STANDARD WRITE P* @ P* NORMAL REGISTER USAGE J P* l " P* REGISTER A1 = RETURN CODE v ( P* A2 = OUTPUT CHARACTER $ P* A3 = BUFFER INDEX $ P* A4 = WORK
0x31362c…3137c0 Dummy {f00=0x00f7, f01=0x018e, f02=» A8 = ECB-ADDRESS P* P* $ P* SYSTEM ADAPTATION . P* L : P* THE CODES FOR ECHO OF BACKSPACE (GPBSP) AND CLEAR V ( P* (GPCLR) KEYS SHOULD BE DEFINED. P* 8 P* BY MEANS OF CONDITIONAL ASSEMBLY THE DRIVER IS 0 P*
0x3137c0…313954 (2, 236) Dummy {f00=0x00f8, f01=0x0190, f02=» X P* D P* --EXCLUDE ECHOING OF AN EXTRA SPACE BETWEEN EACH CHARACTER 6 P* --SUPPRESS ECHOING OF END OF RECORD CHARACTER Z * P** --SUPPRESION OF TRAILING BLANKS @ P* --END OF REQUEST WHEN PRINTER HARDWARE BECOMES INACTIVE P*
0x313954…313ae8 Dummy {f00=0x00f8, f01=0x0190, f02=» P EJECT P* P* P* & P* 0 P*********** : P* ENTRIES * N P*********** b P* v P* P* ( P ENTRY GPAD ADDRESS TO ADDRESSBLOCK 0 P ENTRY ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE P* P* P
0x313ae8…313c7c Dummy {f00=0x00f8, f01=0x0190, f02=»************************* P* " P* , $ P EXTRN DISIOE I/O REQUEST ERROR 6 . P EXTRN OUTPUT SUBROUTINE TO SEND CHARACTER ^ P EXTRN TDISP DISPATCHER > P EXTRN LDREG LOAD REGISTERS A4, A3, A5, A7, A8 AND RETURN P EXTRN TENDIO END I/O
0x313c7c…313e10 Dummy {f00=0x00f8, f01=0x0190, f02=»R FROM ECB-BUFFER v P EJECT P* ( P* 2 P************************ < P* DWT PARAMETERS * P************************ | P* P* P EXTRN DWTST STATUS EXTRN DWTBC BYTE COUNTER P EXTRN DWTOR ORDER P
0x313e10…313fa4 Dummy {f00=0x00f8, f01=0x018e, f02=» P* P* : PSOH EQU /01 RESET PRINT BUFFER REMOTE AND LOCAL DUMMY PSTX EQU /82 START OF MESSAGE Z PETB EQU /97 END OF MESSAGE ~ PETX EQU /03 LAST DUMMY PCR EQU /0D CARRIAGE RETURN PLF EQU /0A LINE FEED PFFED EQU /0C
0x313fa4…314138 Dummy {f00=0x00f8, f01=0x0190, f02=» * P************************************** * P* CONDITIONAL ASSEMBLY * 6 * P************************************** d P* 2 P* IT IS POSSIBLE TO EXCLUDE ROOMLESS POINT $ P* FUNCTION BY SETTING X:A = 0 P* PX:A
0x314138…3142cc Dummy {f00=0x00f8, f01=0x0190, f02=»NG X:B=1 l P* PX:B EQU 0 PTRETON EQU 0 , P* @ 4 P* ACCEPTANCE OF SPECIAL CHARACTER /14 CAN BE J 0 P* INCLUDED IN THE DRIVER BY SETTING X:C=1 P* PX:C EQU 0 PFJOTON EQU 0 P* . P* IT IS POSSIBLE TO E
0x3142cc…314460 Dummy {f00=0x00f8, f01=0x0190, f02=» EQU 0 P* P EJECT P* & P* 0 8 P* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE : 8 P* TO SUPPRESS ECHOING OF END OF RECORD CHARACTER. v 8 P* THIS IS ATTAINED BY SETTING THE CONSTANT X:E=0. P* PX:E EQU 0
0x314460…3145f4 (2, 237) Dummy {f00=0x00f8, f01=0x018e, f02=»0 PSUPSPA EQU 1 P* ( P* END OF REQUEST IN SITUATIONS WHERE ( , P* THE SELECTOR UNIT OR PRINTER HARDWARE T * P* IS INACTIVE CAN BE CHOSEN BY SETTING P* THE CONSTANT RECEND = 1 PX:G EQU 0 PRECEND EQU 0 P* . P* A
0x3145f4…314788 Dummy {f00=0x00f8, f01=0x0190, f02=» 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. B P* t PCPU852 EQU 0 ~ P* P* MMU BUFFER SIZE P* PX:H EQU 120 PDVBLEN EQU 162 P* =1 , P* SPECIAL CO
0x314788…31491c Dummy {f00=0x00f8, f01=0x018e, f02=» DWT-DISPLACEMENT * $ P******************************** $ P* L P* V 0 PDWTDRD EQU /10 START OF DRIVER DEFINED PART ` P* P IFT MMUPAG=0 PSTART EQU DWTDRD P XIF P* P IFT MMUPAG=1 PSTART EQU DWTDRD
0x31491c…314ab0 Dummy {f00=0x00f8, f01=0x0190, f02=» , P* SPECIAL KEYS FOR ECHO FUNCTION * * P************************************** 4 P* b PGPBSP EQU /2D BACK SPACE l PGPCLR EQU /3F CLEAR P* P******************** P* RETURN CODES * P******************** P*
0x314ab0…314c44 Dummy {f00=0x00f8, f01=0x0190, f02=»OPERR EQU /1 NOT OPERABLE, POWER OFF P* , P EJECT 6 P* D P* N P********** X P* TABLES * j P********** | P* P* P IFT CROOM=1 P* PROMTAB EQU * * P TABLE FOR ROOMLESS POINT CHARACTERS ( P DATA
0x314c44…314dd8 Dummy {f00=0x00f8, f01=0x0190, f02=»DEVICE INDEX PGPAD EQU * ADDRESS BLOCK P DATA ACGP ACTIVATION DRIVER 4 " P DATA 0 ABORT ROUTINE ADDRESS X P DATA IHGP INTERRUPT HANDLER ~ P DATA RCGP RECOVERY ROUTINE . P DATA ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE P EJECT P*
0x314dd8…314f6c Dummy {f00=0x00f8, f01=0x0190, f02=»IS SENT TO PRINTER AND RETURN CODE n < P* IS SET IF PAPER OUT OR READY SWITCH OFF. * H P* RETURN CODE IS ALSO SET IF TIME-OUT IS SIGNALLED FROM j P* CHANNEL UNIT. P* > P* ORDER 05: BASIC WRITE. CHARACTE
0x314f6c…315100 Dummy {f00=0x00f8, f01=0x0190, f02=»TER FROM V < P* ECB-BUFFER AFTER INDIVIDUAL CODE CHECK. P* P PACGP EQU * Z P LDK A2,STX START OF MESSAGE l P LDR A3,A7 =1 P RF(Z) ACGP10 ORDER 0 =2 P SUK A3,5 =1 P RF(E) ACGP09 ORDER 5 =1 P SUK A3,1 =
0x315100…315294 (2, 238) Dummy {f00=0x00f8, f01=0x0190, f02=»8 GET BUFFER ADDRESS =1 ( P LC A3,1,A3 GET CONTROL CHARACTER =1 P ANK A3,/FF =1 L PACGP01 SUK A3,/2B =1 d $ P RF(E) ACGP06 CONTROL CHAR 2B =1 P CF A5,OUTPUT SEND STX =1 P LDK A2,CR =1 P CF A5,OUTPUT =1 P IFT ABIS=1
0x315294…315428 Dummy {f00=0x00f8, f01=0x0190, f02=» P SUK A3,/30-/2B =1 * P RF(NE) ACGP03 NOT CONTROL CHAR 30 =1 $ P CF A5,OUTPUT =1 R P LDK A2,LF =1 l , PACGP03 LDK A1,1 RESET HEAD POS COUNTR =1 P ST A1,DWTAP,A6 =1 * PACGP06 LDK A3,2 START BUFFER INDEX =1 PACGP09 CF A5
0x315428…3155bc Dummy {f00=0x00f8, f01=0x0190, f02=»ST OF BOTH SUM OFF AND PRINTER NOT THERE =2 t P* =2 6 $ PACGP10 LDK A2,2 SEND CHAR /02 =2 F P CF A5,OUTPUT =2 n * P LDK A2,0 SEND CHAR /00=END OF TEST =2 P CF A5,OUTPUT =2 P RF AGP410 =2 P EJECT P* & P* GET,
0x3155bc…315750 Dummy {f00=0x00f8, f01=0x0190, f02=»TER UPDATING p PACGP19 EQU * * P LDKL A4,/400 INDICATE LINE FEED DONE ( P ORS A4,DWTST,A6 V P IFT SUPSPA=1 n 4 P CF A15,SKIPSP SKIP SPACES IN END OF ECB-BUFFER P XIF P LDK A4,0 6 PACGP20 CF A15,GETCHR GET CHARACTER FROM ECB-BU
0x315750…3158e4 Dummy {f00=0x00f8, f01=0x0190, f02=»WRITE | $ P SUK A1,9 HARDWARE TABULATION ? P RF(NE) ACGP22 6 0 P ST A4,DWTAP,A6 RESET HEAD POSITION POINTER L P RB ACGP17 * PACGP22 SUK A1,8 TABULATION CHARACTER ? P RF(E) ACGP40 P IFT ABIS=1 =1 P CWK A2,/07 BELL ? =1
0x3158e4…315a78 Dummy {f00=0x00f8, f01=0x0190, f02=» ? x P* P XIF P* P IFT TRETON=0 * P IFT FJOTON=1 @ P* V P SUK A1,3 /14? ` P RB(E) ACGP17 v P SUK A1,/C LESS THAN /20 ? P* P XIF P* P* P IFT TRETON=1 P IFT FJOTON=0 P*
0x315a78…315c0c Dummy {f00=0x00f8, f01=0x0190, f02=» P IFT FJOTON=1 P* P SUK A1,2 /13? $ P RB(E) ACGP17 : P SUK A1,1 /14? P P RB(E) ACGP17 f P SUK A1,/C LESS THAN /20 ? | P* P XIF P* & P RF(N) ACGP30 YES,CODE CHECK ERROR & P SUK A1,/8E ROOMLESS POINT? (AE
0x315c0c…315da0 Dummy {f00=0x00f8, f01=0x0190, f02=» SUK A2,/20 TRANSFORM CHARACTER BETWEEN /60 TO /7F & P TO CHARACTER BETWEEN /40 TO /5F : P RB ACGP17 d PACGP24 EQU * v P SUK A1,/D P RF(NZ) ACGP26 NOT CR " P CM DWTST,A6 SET POS LTR.TO 0 ( P CM DWTAP,A6 RESET HEAD POS.POIINTER
0x315da0…315f34 (2, 239) Dummy {f00=0x00f8, f01=0x0190, f02=»17 P EJECT P* P* CODE CHECK ERROR " P* @ PACGP30 EQU * J P LDK A1,CCERR ^ P ORS A1,8,A8 RETURN CODE t P RB ACGP20 P EJECT P* P* TABULATION P* PACGP40 EQU * , P CF A15,GETCHR GET F
0x315f34…3160c8 Dummy {f00=0x00f8, f01=0x0190, f02=»E) ACGP44 0 PACGP43 ADK A2,/A FROM DECIMAL TO HEXADECIMAL P SUK A4,1 F P RB(NE) ACGP43 X 8 PACGP44 SU A2,DWTAP,A6 SUBTRACT HEAD POSITION POINTER n P LC A4,DWTBC,A6 , P SUR A2,A4 AND REQUESTS POSITION COUNTER & P TO GET NUMBER OF SP
0x3160c8…31625c Dummy {f00=0x00f8, f01=0x0190, f02=»UTPUT ( P IM DWTST,A6 INCREMENT BUFFER INDEX P SUK A4,1 : P RB(P) ACGP45 L P LDR A3,A3 RECOVERY? b P RB(NE) ACGP20 ~ * P SC A4,DWTBC,A6 RESET POSITION POINTER P LDK A3,2 START BUFFER INDEX P RB ACGP19 P EJECT P*
0x31625c…3163f0 Dummy {f00=0x00f8, f01=0x0190, f02=»O SEND r P ANK A2,/F ! P LC A2,ROMTAB,A2 TRANSFORM ! P* ! B P XIF ! L P* ! X P* ! b P IFF CROOM=1 ! l P* ! P ANK A2,/7F ! P* ! P XIF ! P* ! P RB ACGP17 ! P EJECT ! P* ! P* ! ( P* SEND LAST DUMMY ,
0x3163f0…316584 Dummy {f00=0x00f8, f01=0x0190, f02=»SEND ! PAGP410 LDK A2,ETX LAST DUMMY " P CF A5,OUTPUT SEND " 0 PAGP415 EQU * =1 " J P IFT ABIS=1 =1 " b P ANK A2,/4 PAPER IN ? =1 " z P RF(NZ) AGP420 YES =1 " " P LDK A1,/20 SET RETURN CODE =1 " P XIF =1 " PAGP420 EQU * " 0 P CF
0x316584…316718 Dummy {f00=0x00f8, f01=0x0190, f02=» " P LD A3,DWTA3,A6 # P ST A3,6,A8 EFF. LENGTH # P RB AGP415 =1 # @ P EJECT # V P* # d P* # n , P* UPDAPP = SUBROUTINE TO UPDATE HEAD # x , P* POSITION POINTER WHEN END # ( P* OF REQUEST IS REACHED # PUPDA
0x316718…3168ac Dummy {f00=0x00f8, f01=0x0190, f02=»A3,DWTBC,A6 RESET POSITION COUNTER # P RTN A15 $ , P IFT SUPSPA=1 $ < P EJECT $ R P* $ ` P* $ j * P* SKIPSP = SUBROTINE TO SKIP SPACES $ t ( P* IN END OF ECB-BUFFER. $ 6 P* REQUESTED LENGTH IN ECB IS UPDATED. $ & P
0x3168ac…316a40 Dummy {f00=0x00f8, f01=0x0190, f02=»ESTED LENGTH(RL) $ | $ P ADR A1,A2 GET ADD END OF BUFFER % PSKIP05 CWK A2,2 % @ P RF(NG) SKIP30 RL < 3 % X P SUK A1,1 DECR. BA % v P LCR A4,A1 GET CHAR % P CCK A4,/2020 SPACE ? % P RF(NE) SKIP20 NO % PSKIP07 SUK A2,1 DECR RL % P RB
0x316a40…316bd4 (2, 240) Dummy {f00=0x00f9, f01=0x018e, f02=»R ? % t P RF(NE) SKIP30 NO & P SUK A1,2 DECR BA & & P SUK A2,2 DECR RL & @ P RB SKIP07 GET NEXT & Z P* & v " PSKIP30 ST A2,4,A8 STORE NEW RL & P RTN A15 & P XIF & P EJECT & P* & P* I H G P & P* & P* INTERRUPT &
0x316bd4…316d68 Dummy {f00=0x00f9, f01=0x0190, f02=» P LDR A7,A7 ORDER 0? ' P RF(Z) IHGP20 =2 ' . P LDR A1,A1 RETURN CODE FROM CHANNEL UNIT ? ' : P IFT RECEND=0 ' l P RB(NZ) EXIT ' P XIF ' P IFT RECEND=1 ' P RB(NZ) AGP430 ' P XIF ' P ' 4 PIHGP10 ABL LDREG RELOAD A3-A5 AND RETU
0x316d68…316efc Dummy {f00=0x00f9, f01=0x018e, f02=» P* E C H O G P ( P* ( 0 P* ECHOGP = DEVICE-DEPENDENT ECHO-ROUTINE ( & P* ( Z PECHOGP EQU * ( d P LDK A4,COSPAC ( x P LDR A7,A7 EOR? ( P RF(N) ECGP17 YES ( P* ( P IFT EORECH=0 ( P* ( P SUK A2,/80 EOR-CHARACTER (
0x316efc…317090 Dummy {f00=0x00f9, f01=0x0190, f02=» P RF(E) ECGP40 BACKSPACE ) P SUK A1,/2 LINE FEED =1 ) $ P RF(E) ECGP10 YES =1 ) D P SUK A1,/3 CR =1 ) ` P RF(E) ECGP10 YES =1 ) x P SUK A1,/B =1 ) P RF(E) ECGP50 CLEAR ) 8 P SUK A1,/20-/8-/10 CHECK THAT CHAR IS WITHIN /20-/5F ) P RF(N)
0x317090…317224 Dummy {f00=0x00f9, f01=0x0190, f02=»NTER ) p P SUK A4,1 READY ? * P RF(N) ECGP20 YES * & * P RF(P) ECGP60 NO, GO TO CLEAR SECTION * @ P* * n P IFT COSPAC=1 * x P* * P LDK A2,SPACE NO SEND SPACE * P RB ECGP10 * P* * P XIF * P* * 6 PECGP17 CF A15,UPDAPP UPDAT
0x317224…3173b8 Dummy {f00=0x00f9, f01=0x0190, f02=»40 EQU * * & P LDK A2,GPBSP BACKSPACE CHARACTER + P RB ECGP10 + : P* + L P* CANCEL + V P* + j PECGP50 EQU * + t " P LDK A2,GPCLR CLEAR CHARACTER + P LDK A4,3 + P RB ECGP10 + PECGP60 LDK A2,LF LINE FEED + P LC A3,DWTBC,A6 +
0x3173b8…31754c Dummy {f00=0x00f9, f01=0x018e, f02=» A3,0 + * P SC A3,DWTBC,A6 RESET POSITION COUNTER , P RB ECGP20 , < P EJECT , N P* , P* R C G P , f P* , z 0 P* RCGP = RECOVERY ROUTINE GENERAL PRINTER , P* , P* , ( P* RECOVERY IS CARRIED OUT ONLY IF , P* ORDER 6 IS
0x31754c…3176e0 Dummy {f00=0x00f9, f01=0x0190, f02=» , x PRCGP EQU * - P IFT CPU852=1 - & P CF A15,SAVE8 SAVE A1-A8 ON STACK - 0 P XIF - Z P* - f P IFT CPU852=0 - p " P MSR 8,A15 SAVE A1-A8 ON STACK - P XIF - P* - P LD A2,DWTST,A6 BUSY ? - P RB(N) EXIT NO - ( P LDK A2,SOH RESET
0x3176e0…317874 (2, 241) Dummy {f00=0x00f9, f01=0x0190, f02=»YES - P CWK A7,0 ORDER 0? . P ABL(E) ENDIO =3 . & P ABL EXIT =3 . @ PRCGP05 EQU * . V 0 P LC A2,DWTST,A6 GET LEFT BYTE OF STATUS WORD . j P ANK A2,/4 LINE FEED DONE ? . P ABL(E) ACGP NO . P LDK A2,SPACE . P CF A5,OUTPUT SEND SPACE
0x317874…317a08 Dummy {f00=0x00f9, f01=0x407e, f02=» OF SPACES TO SEND . v P ABL ACGP46 / ( PRCGP10 LDK A1,TPERR SET RETURN CODE / . P ABL AGP430 / Z P END / n@ / zLEFT BYTE OF STATUS WORD . j P ANK A2,/4 LINE FEED DONE ? . P ABL(E) ACGP NO . P LDK A2,SPACE . P CF A5,OUTPUT SEND SPACE
0x317a08…317b9c Dummy {f00=0x00f9, f01=0x2008, f02=» 0 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 & (
0x317b9c…317d30 Dummy {f00=0x00f9, f01=0x0190, f02=» PRINT HEAD 0 P* 1 P* 1 ( PPRB115 LDK A2,RPH DETACH PRINT HEAD 1 ( P CF A5,OUTPUT SEND DETACH 1 T , PPRB117 LC A2,-1,A3 GET 1ST TAB POS CHAR 1 v $ P LCR A1,A3 GET 2ND TAB POS CHAR 1 P ANK A1,/F LINE UNIT 1 P SLL A2,4 1 P ANK A2,/F0
0x317d30…317ec4 Dummy {f00=0x00f9, f01=0x0190, f02=»TER 1 j 2 P CC A1,DWTBC,A6 COMPARE WITH ACTUAL TAB. POS. 2 P RF(NG) PRB125 PRINT 2 B P* 2 ^ P* 2 h P* 2 r P LDK A2,/20 LOAD BLANK 2 | ( P CF A5,OUTPUT SEND BLANKS OR DETACH 2 P RB PRB117 2 P* 2 P* 2 P* 2 . PPRB125 SUK A4,2 DE
0x317ec4…318058 Dummy {f00=0x00f9, f01=0x0190, f02=» 2 P* 3 P* 3 P* 3 2 P* GET OUTPUT CHARACTER FROM BUFFER. CHECK IF 3 & P* - ROOMLESS POINT 3 P* - ILLEGAL CHARACTER 3 x & P* - SPECIAL CHARACTER (/13,/14) 3 P* 3 PPRB200 EQU * 3 * PPRB205 LCR A7,A3 LOAD OUTPUT CHARACTER 3
0x318058…3181ec Dummy {f00=0x00f9, f01=0x018e, f02=»7,A3 GET OUTPUT CHARACTER 3 P ANK A7,/F MASK 4 " & P LC A7,ROMTAB,A7 GET CODE IN TABLE 4 : P* 4 d P* 4 n P* 4 x , PPRB210 CCK A7,/2020 ILLEGAL CHARACTER ? 4 P RF(L) PRB225 YES 4 , PPRB215 CCK A7,/5F5F ILLEGAL CHARACTER ? 4 P RF(NG) PRB2
0x3181ec…318380 Dummy {f00=0x00f9, f01=0x018e, f02=» 4 | P XIF 5 P IFT CHR14=1 5 & P CCK A7,/1414 SPECIAL CHARACTER ? 5 ( P RF(E) PRB230 YES 5 R P XIF 5 l P* 5 x " P LDK A1,CCERR CODE CHECK ERROR 5 * P ORS A1,ECBRC,A8 STORE IN RETURN CODE 5 P LD A7,DWTOR,A6 GET ORDER 5 P ANK A7,/FF 5
0x318380…318514 (2, 242) Opaque[0x194]
0x318514…3186a8 # DirEnt {nam=»DRDI01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1f30, f03=0x0000}
0x318514…3186a8 IdxSect {
0x318514…3186a8 f00 = 0x00f9 // 0x318514 @0x0
0x318514…3186a8 f01 = 0x0008 // 0x318516 @0x2
0x318514…3186a8 gno = [ // 0x318518 @0x4
0x318514…3186a8 [0x00]: C0x00f9.0x2.0
0x318514…3186a8 [0x01]: C0x00f9.0x3.0
0x318514…3186a8 [0x02]: C0x00fa.0x0.0
0x318514…3186a8 [0x03]: C0x00fa.0x1.0
0x318514…3186a8 ]
0x318514…3186a8 }
0x3186a8…31883c Dummy {f00=0x00f9, f01=0x0190, f02=» 2 P IDENT DRDI01 REL 9.2 79-11-16 870105040920 P : P* B P* L < P******************************************************* V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* * P* DRDI01 = DRIVER INDICATOR DISPLAY P*
0x31883c…3189d0 Dummy {f00=0x00f9, f01=0x0190, f02=»* THIS DRIVER HANDLES OUTPUT TO SIGNAL DISPLAYS PTS 6241 > P* AND 6242. IT ALSO CONTROLS LAMPS ON KEYBOARDS PTS 6232 B " P* 6233, 6236 AND 633, 62361. P* @ P* THESE DEVICES MUST BE CONNECTED TO CPU VIA CHLT OR CHRT P* 4 P* TH
0x3189d0…318b64 Dummy {f00=0x00f9, f01=0x0190, f02=»LER t P* " P* R C D I : RECOVERY ROUTINE P* < * P* THE FOLLOWING ORDERS ARE TREATED: F P* t " P* ORDER 05: WRITE LIGHTS ON ~ " P* 06: WRITE LIGHTS OFF ( P* 07: WRITE PROGRAM DISPLAY , P* 39:
0x318b64…318cf8 Dummy {f00=0x00f9, f01=0x0190, f02=» t P* A2: OUTPUT " P* A3: WORK REGISTER ( " P* A4: WORK REGISTER N " P* A5: WORK REGISTER t P* A6: DWT-ADDRESS P* A7: ORDER P* A8: ECB-ADDRESS P*
0x318cf8…318e8c Dummy {f00=0x00f9, f01=0x0190, f02=» 1 IF PROGRAM DISPLAY (PTS 6241) , P* BIT 11 = 1 FOR PTS 6232,6331,6236 , , P* BIT 11 = 0 FOR PTS 6241,6242,6233 P* : P* ORDER 07, WRITE PROGRAM DISPLAY MAY BE EXCLUDED BY P* CONDITIONAL ASSEMBLY P* P EJECT
0x318e8c…319020 Dummy {f00=0x00f9, f01=0x0190, f02=»-BLOCK r P* P******************* P* EXTERNALS * 4 P******************* P P* l P EXTRN SAVE8 SAVE REGS v P EXTRN TENDIO END I/O . P EXTRN DISEND PERFORM END I/O AND DISPATCH * P EXTRN TDISP DISPATCHER ORDINARY INT
0x319020…3191b4 (2, 243) Dummy {f00=0x00f9, f01=0x0190, f02=» STATUS EXTRN DWTBC BYTE COUNTER EXTRN DWTECB ECB ADDRESS 2 P* T P EXTRN SETIMP SET TIMER ^ P* ~ P* P EJECT P* P* P*************** P* TABLES * P*************** P* P*
0x3191b4…319348 Dummy {f00=0x00f9, f01=0x0190, f02=»DRIVER z " P DATA 0 ABORT ROUTINE ADDRESS P DATA IHDI INTERRUPT HANDLER 4 P DATA RCDI RECOVERY ROUTINE X P* | " PCCERR EQU /4 CODE CHECK ERROR P* P EJECT P* P* P************************* P* CONDITIONAL
0x319348…3194dc Dummy {f00=0x00f9, f01=0x0190, f02=»* SETTING X:A=0 P* PX:A EQU 0 $ PORD7 EQU 0 6 P* H P* R 8 P* THIS DRIVER CAN BE MADE TO HANDLE CREDIT ORDERS P* BY SETTING CREDIT = 1 0 P* ORDERS 05,06AND 07 ARE THEN REPLACED BY P* ORDERS 37,38 AND 06
0x3194dc…319670 Dummy {f00=0x00f9, f01=0x0190, f02=»Y SETTING X:B=1 | P* PX:B EQU 0 " PFLASH EQU 0 4 P* H P* R . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG EQU 1 P* P* 6 P* A PROGRAM VERSION USING
0x319670…319804 Dummy {f00=0x00f9, f01=0x018e, f02=»* P* P* MMU BUFFER SIZE P* 0 PX:C EQU 4 : PDVBLEN EQU X:C L P* b P* l P********************* v P* DWT-DISPLACEMENTS * P********************* P* P* 0 PDWTDRD EQU /10 START OF DRIVER DEFIN
0x319804…319998 Dummy {f00=0x00f9, f01=0x0190, f02=» | P XIF P* " PDWTDIB EQU START+/02 SAVE AREA 2 PDWTFLA EQU START+/08 SAVE AREA FOR FLASH IMAGE D & PDWTTP EQU START+/0A TIMER POINTER z PTIME EQU 5 FLASH TIME P* P EJECT P* P* A C D I P* > P* AC
0x319998…319b2c Dummy {f00=0x00f9, f01=0x0190, f02=»EDIT=1 P CCK A7,/0707 P RF(E) ADI050 ORDER /07 $ P XIF D P IFT ORD7+CREDIT=2 P P CCK A7,/0606 j P RF(E) ADI050 ORDER /06 P XIF $ P LD A4,10,A8 CONTROL WORD TO A4 P LDR* A3,A6 4 P ANK A3,/10 TEST IF ONE OR TWO C
0x319b2c…319cc0 Dummy {f00=0x00f9, f01=0x0190, f02=» P SLL A3,4 P ORR A4,A3 LAMPCODES IN A4 PADI005 EQU * < P IFT FLASH=1 P P CCK A7,/3939 d P RF(E) FLA05 z P XIF P IFT CREDIT=0 P SUK A7,5 P XIF P IFT CREDIT=1 P SUK A7,/37 P XIF P RF(
0x319cc0…319e54 (2, 244) Dummy {f00=0x00fa, f01=0x0190, f02=»* P* P IFT FLASH=1 P* ( P* FLASH ORDER /39 2 P* R P* , PFLA05 ORS A4,DWTFLA,A6 SAVE FLASH IMMAGE f & P LD A1,DWTTP,A6 GET TIMER POINTER ( P RF(NZ) FLA10 TIMER ALREADY STARTED P LDK A4,DWTTP START TIMER
0x319e54…319fe8 Dummy {f00=0x00fa, f01=0x0190, f02=»NRS A4,A6 CHECK ON-OFF INDICATOR PFLA10 EQU * ( P LD A4,DWTFLA,A6 < & P LDR* A2,A6 CHECK ON-OFF INDICATOR T P ANK A2,/40 ~ * P RF(Z) FLA20 WRITE FLASHING LIGHTS OFF P ORS A4,DWTDIB,A6 ON + FLASH P RF ADI030 TURN ON LAMPS PFLA2
0x319fe8…31a17c Dummy {f00=0x00fa, f01=0x0190, f02=»A1 P LD A4,DWTFLA,A6 < P RF(Z) FLA30 IF NO MORE LAMPS TO FLASH GO TO DISPATCHER " P LDKL A1,-TIME RESTART TIMER b P ST* A1,DWTTP,A6 P LDK A4,/40 " P XRRS A4,A6 SWITCH 0N-OFF FLAG P RB FLA10 PFLA30 CM DWTTP,A6 P RF
0x31a17c…31a310 Dummy {f00=0x00fa, f01=0x0190, f02=» A4,DWTDIB,A6 RESET BITS IN DWT-BUFFER P IFT FLASH=1 . 0 P ANS A4,DWTFLA,A6 RESET BITS IN FLASH IMAGE B P XIF v P RF ADI030 P* P* P EJECT P* P* P* ORDER 05: TURN ON LAMPS P* P* P*
0x31a310…31a4a4 Dummy {f00=0x00fa, f01=0x0190, f02=»AGE h P XIF . PADI030 LC A2,DWTDIB,A6 GET FIRST CHARACTER PADI035 LDK A1,1 J 6 P SC A1,DWTST+1,A6 SET START VALUE IN BYTE COUNTER b P LDR* A3,A6 TWO OUTPUTS ? P ANK A3,/10 P RF(NZ) IHDI10 NO P RF IHDI20 YES P*
0x31a4a4…31a638 Dummy {f00=0x00fa, f01=0x0190, f02=»0 & PADI060 CF A15,GETCHR GET CHARACTER P LDR A1,A1 LAST CHARACTER ? 4 P RF(Z) ADI070 YES X P LDR A4,A2 r P SRL A4,4 $ P SUK A4,3 UNDEFINED CHARACTER ? P RF(L) ADI100 YES P CWK A4,3 UNDEFINED ? P RF(G) ADI100 YES
0x31a638…31a7cc Dummy {f00=0x00fa, f01=0x0190, f02=» < PADI070 SC A1,DWTST+1,A6 SET START VALUE IN BYTE COUNTER P RF IHDI10 SEND CHARACTERS D P* f P* p P* CODE CHECK ERROR z P* ( PADI100 LDK A1,CCERR SET RETURN CODE P ORS A1,8,A8 IN ECB " P RB ADI060 GET NEXT CHARACTER
0x31a7cc…31a960 Dummy {f00=0x00fa, f01=0x0190, f02=»* PIHDI EQU * P LDR A1,A1 RETURN CODE 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 IFT ORD7=1 P RF(NZ) IHDI05 NO & P LDR* A3,A6 GET CHANNEL PARAMETER
0x31a960…31aaf4 (2, 245) Dummy {f00=0x00fa, f01=0x018e, f02=»RFORM ENDIO | PIHDI10 LDKL A2,DWTDIB P ADR A2,A6 2 P LD A4,DWTST,A6 F P ANK A4,/FF ^ P ADR A2,A4 r P LCR A2,A2 GET CHARACTER P XIF P IFT ORD7=0 P RF(Z) ENDIO 2 PIHDI10 LC A2,DWTDIB+1,A6 GET SECOND CHARACTER
0x31aaf4…31ac88 Dummy {f00=0x00fa, f01=0x0190, f02=» P ORK A2,/40 INDICATE BELL P* & . POUTPUT IM DWTST,A6 INCREMENT BYTE COUNTER 0 & PIHDI20 CF A15,OUTLIN OUTPUT CHAR. b PEXIT ABL TDISP 2 PENDIO ABL DISEND PERFORM END I/O AND DISPATCH P* P EJECT P* P* R C D I
0x31ac88…31ae1c Dummy {f00=0x00fa, f01=0x018e, f02=»RMATION Z , P* OM PROGRAM DISPLAY IS ALSO RESTORED P* @ P* J PRCDI EQU * T P IFT CPU852=1 f & P CF A15,SAVE8 SAVE A1-A8 ON STACK | P XIF P* P IFT CPU852=0 " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P*
0x31ae1c…31afb0 Dummy {f00=0x00fa, f01=0x4014, f02=» P @ OM PROGRAM DISPLAY IS ALSO RESTORED P* @ P* J PRCDI EQU * T P IFT CPU852=1 f & P CF A15,SAVE8 SAVE A1-A8 ON STACK | P XIF P* P IFT CPU852=0 " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P*
0x31afb0…31b144 Dummy {f00=0x00fa, 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
0x31b144…31b2d8 Dummy {f00=0x00fa, f01=0x0190, f02=» p P DATA 2 DEVICE INDEX PGPAD EQU * ADDRESS BLOCK $ P DATA ACGP ACTIVATION DRIVER D " P DATA 0 ABORT ROUTINE ADDRESS h P DATA IHGP INTERRUPT HANDLER P DATA RCGP RECOVERY ROUTINE . P DATA ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE P
0x31b2d8…31b46c Dummy {f00=0x00fa, f01=0x0190, f02=»T STATUS. DUMMY IS SENT TO PRINTER AND RETURN CODE ~ < P* IS SET IF PAPER OUT OR READY SWITCH OFF. : H P* RETURN CODE IS ALSO SET IF TIME-OUT IS SIGNALLED FROM z P* CHANNEL UNIT. P* > P* ORDER 05: BASIC
0x31b46c…31b600 Dummy {f00=0x00fa, f01=0x018e, f02=»ARE SENT TO PRINTER FROM f < P* ECB-BUFFER AFTER INDIVIDUAL CODE CHECK. P* ` PACGP EQU * j P LDK A2,STX START OF MESSAGE | P LDR A3,A7 =1 P RF(Z) ACGP10 ORDER 0 =2 P SUK A3,5 =1 P RF(E) ACGP09 ORDER 5 =1
0x31b600…31b794 (2, 246) Opaque[0x194]
0x31b794…31b928 # DirEnt {nam=»DRDY01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1f50, f03=0x0000}
0x31b794…31b928 IdxSect {
0x31b794…31b928 f00 = 0x00fa // 0x31b794 @0x0
0x31b794…31b928 f01 = 0x0018 // 0x31b796 @0x2
0x31b794…31b928 gno = [ // 0x31b798 @0x4
0x31b794…31b928 [0x00]: C0x00fa.0x2.0
0x31b794…31b928 [0x01]: C0x00fa.0x3.0
0x31b794…31b928 [0x02]: C0x00fb.0x0.0
0x31b794…31b928 [0x03]: C0x00fb.0x1.0
0x31b794…31b928 [0x04]: C0x00fb.0x2.0
0x31b794…31b928 [0x05]: C0x00fb.0x3.0
0x31b794…31b928 [0x06]: C0x00fc.0x0.0
0x31b794…31b928 [0x07]: C0x00fc.0x1.0
0x31b794…31b928 [0x08]: C0x00fc.0x2.0
0x31b794…31b928 [0x09]: C0x00fc.0x3.0
0x31b794…31b928 [0x0a]: C0x00fd.0x0.0
0x31b794…31b928 [0x0b]: C0x00fd.0x1.0
0x31b794…31b928 ]
0x31b794…31b928 }
0x31b928…31babc Dummy {f00=0x00fa, f01=0x0190, f02=» 2 P IDENT DRDY01 9.2DK 1 80-02-12 870105040921 P : P *DK,POS 80 ON VDU B P REL 9.2 80-02-12 ^ P =4,ABORT ROUTINE INCLUDED z P REL 9.1 79-05-23 * P =3,STEADY CURSOR PROBLEM CORRECTED P PRR 9.1 79-04-06 , P =
0x31babc…31bc50 Dummy {f00=0x00fa, f01=0x0190, f02=»01-12 P P* 6 P************************************************** P* Z $ P* PHILIPS TERMINAL SYSTEM PTS d P* 2 P* DRDY01 = DRIVER VIDEO AND GRAPHIC DISPLAY P* P* P* P* P* P* 6 P
0x31bc50…31bde4 Dummy {f00=0x00fa, f01=0x0190, f02=» @ P* PTS 6344, PTS 6342 AND TO THE PLASMA DISPLAYS PTS 6351 P* AND PTS 6386 H 6 P* THE DISPLAYS MUST BE CONNECTED TO THE SYSTEM b P* VIA CHLT OR CHRT. P* < P* THE DRIVER INCLUDES DEVICE DEPENDENT ECHO-FUNCTIONS : P*
0x31bde4…31bf78 Dummy {f00=0x00fa, f01=0x018e, f02=»BOARD DRIVER DRKB01. P* P* & 0 P* THE DRIVER CONSISTS OF FOLLOWING PARTS: 0 P* d & P* A C D Y ACTIVATION PART n P* ( P* I H D Y INTERRUPT HANDLER P* ( P* R C D Y RECOVERY ROUTINE P*
0x31bf78…31c10c Dummy {f00=0x00fa, f01=0x0190, f02=» P* P* ORDER 00: TEST STATUS P* 05: BASIC WRITE 0 " P* 06: STANDARD WRITE R ( P* 07: WRITE GRAPHIC DISPLAY x & P* 0B: CURSOR POSITIONING P* 31: ERASE P* P* NORMAL REGISTER
0x31c10c…31c2a0 Dummy {f00=0x00fa, f01=0x0190, f02=»X r $ P* A4 = WORK REGISTER " P* A5 = STACK BASE 2 " P* A6 = DWT-ADDRESS X P* A7 = ORDER ~ " P* A8 = ECB-ADDRESS P* P EJECT P* P* P* SYSTEM ADAPTATION
0x31c2a0…31c434 (2, 247) Dummy {f00=0x00fa, f01=0x0190, f02=»* BIT: 10 11 P* -------------- " P* 0 0 PTS 6344 4 * P* 0 1 PTS 6351 & 6342 Z * P* 1 0 PTS 6386 & 6385 * P* --------------------------------- P* 6 P* BY MEANS OF CONDITION
0x31c434…31c5c8 Dummy {f00=0x00fa, f01=0x0190, f02=»* -CAN USE LOWER CASE CHAR. GENERATOR COLUMN 6 AND 7 8 P* -CAN SUPPRESS ECHOING OF END OF RECORD CHARACTER > & P* -CAN SUPPRESS TRAILING BLANKS z F P* AND ALSO UNDERLINE START (/12), LOW INT (/1E), HIGH INT (/1F) P EJECT P* P*
0x31c5c8…31c75c Dummy {f00=0x00fa, f01=0x0190, f02=»S TO ADDRESSBLOCK ~ 0 P ENTRY ECHODY DEVICE-DEPENDENT ECHO-ROUTINE P* N P* X P* b P* l . P***************************************** v . P* EXTERNAL TOSS MODULE ENTRIES * . P*****************************************
0x31c75c…31c8f0 Dummy {f00=0x00fa, f01=0x0190, f02=»R z > P EXTRN LDREG LOAD REGISTERS A4, A3, A5, A7, A8 AND RETURN P EXTRN TENDIO END I/O L . P EXTRN SAVE8 SAVE 8 REGISTERS ON A15 STACK j 0 P EXTRN ECHRTN RETURN TO KEYBOARD AFTER ECHO 0 P EXTRN GETCHR GET CHARACTER FROM ECB-BUFFER P EJE
0x31c8f0…31ca84 Dummy {f00=0x00fa, f01=0x0190, f02=»ST STATUS EXTRN DWTBC BYTE COUNTER P EXTRN DWTOR ORDER 4 P* N P EJECT X P************* f P* CONSTANTS * | P************* P* PFASTO EQU /14 FAST OUTPUT $ PSCADD EQU /11 SET CURSOR ADDRESS " PULSTAR EQU /
0x31ca84…31cc18 Dummy {f00=0x00fa, f01=0x0190, f02=»TOP r PBACKSP EQU /08 BACKSPACE PLF EQU /0A LINE FEED , PHOME EQU /0B CURSOR HOME H ( PCLEHOM EQU /0C CLEAR AND CURSOR HOME h PCR EQU /0D CARRIAGE RETURN PCURRIG EQU /10 CURSOR RIGHT PSPACE EQU /20 SPACE PSTX EQU /82 START
0x31cc18…31cdac Dummy {f00=0x00fa, f01=0x018e, f02=»PE EQU /11 ESCAPE TO GRAPHIC MODE " PPOINT EQU /2E POINT CHARACTER * 2 PEQU EQU 6 THRESHOLD FOR AUTOMATIC FAST OUTPUT P PSTILL EQU /18 CURSOR STEADY $ PCTYCOD EQU /1B SET COUNTRY CODE P* P******************** P* RETURN CODE
0x31cdac…31cf40 Dummy {f00=0x00fa, f01=0x0190, f02=» P EJECT P* P* . P***************************************** * . P* CONDITIONAL ASSEMBLY * . P***************************************** P* P* H P* BY SETTING X:A TO 1 DRIVER CAN HANDLE GRAFIC MO
0x31cf40…31d0d4 (2, 248) Dummy {f00=0x00fb, f01=0x0190, f02=»44 Z P* PX:B EQU 1 PWHATDY EQU 1 & P* : P* D 8 P* BY SETTING X:C TO 1 LOWER CASE CHAR. GENERATOR N & P* (COLUMNS 6 AND 7) CAN BE USED PX:C EQU 0 PLOWCHA EQU 0 P* P* 8 P* BY MEANS OF CONDITION
0x31d0d4…31d268 Dummy {f00=0x00fb, f01=0x018e, f02=»ANT X:G=0 f P* PX:D EQU 0 PEORECH EQU 0 . P* B 0 P* BY SETTING THE CONSTANT TRASPA = 1 IT IS L @ P* POSSIBLE TO SUPPRESS TRAILING BLANKS, /12, /1E AND /1F. P* PX:E EQU 0 PTRASPA EQU 1 P EJECT P*
0x31d268…31d3fc Dummy {f00=0x00fb, f01=0x0190, f02=» < P* THIS DRIVER CAN BE ADAPTED TO MEMORY MANAGEMENT UNIT P* BY SETTING MMUPAG = 1 D P* f PMMUPAG EQU 1 p P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P*
0x31d3fc…31d590 Dummy {f00=0x00fb, f01=0x0190, f02=» CHARACTER SETS. h P P P* CODE COUNTRY ( P > P* 0 GB/NL/B F P* 1 D/A/L/CH Z P* 2 F/CH/B/L n P* 3 E P* 4 I/CH P* 5 S/SF P* 6 DK/N P* 7 P P* 8 YU P* 9 US PX:G EQU 0 PCOUNTRY EQU
0x31d590…31d724 Dummy {f00=0x00fb, f01=0x0190, f02=»CT P* P* $ P******************************** $ P* DWT-DISPLACEMENT * F $ P******************************** n P* P* 0 PDWTDRD EQU /10 START OF DRIVER DEFINED PART P* P IFT MMUPAG=0 PSTART EQU
0x31d724…31d8b8 Dummy {f00=0x00fb, f01=0x0190, f02=»ION POINTER r " PDWTPOS EQU START+/15 POSITIONS PDWTLIN EQU START+/14 LINES : & PDWTBIN EQU START+/16 BUFFER INDEX P* P EJECT P* P* P********** P* TABLES * P********** P* P* P DATA DVBLEN
0x31d8b8…31da4c Dummy {f00=0x00fb, f01=0x0190, f02=»OUTINE ADDRESS ~ P DATA IHDY INTERRUPT HANDLER P DATA RCDY RECOVERY ROUTINE : . P DATA ECHODY DEVICE-DEPENDENT ECHO-ROUTINE ^ P* P* , PTABSPE EQU * TABLE OF SPECIAL CHARACTERS P DATA /0712,/131E,/1F14 P EJECT P*
0x31da4c…31dbe0 Dummy {f00=0x00fb, f01=0x0190, f02=»ISPLAY AND RETURN CODE b 2 P* IS SET IF DISPLAY NOT OPERABLE P* T P* ^ > P* ORDER 05: BASIC WRITE. CHARACTER ARE SENT TO DISPLAY h 6 P* FROM ECB-BUFFER WITHOUT ANY CHECK. P* F P* ORDER 06: STANDARD WR
0x31dbe0…31dd74 (2, 249) Dummy {f00=0x00fb, f01=0x0190, f02=» IF A PREDEFINED NUMBER OF CHARACTERS (SEE CONSTANT 'EQU') J P* ARE FOUND EQUAL, FAST OUTPUT IS EXECUTED FOR THE NUMBER B F P* OF CHARACTERS FOUND EQUAL (> 'EQU') ON 6344 & 6386> P* P IFT GRAFIC=1 B P* ORDER 07:
0x31dd74…31df08 Dummy {f00=0x00fb, f01=0x0190, f02=» IS SENT TO THE DISPLAY. P* " P XIF , : P* ORDER /B: CURSOR POSITIONING AND STANDARD WRITE. 8 < P* THE CURSOR IS SENT TO THE POSITION GIVEN v > P* IN CONTROL WORD. NO INFORMATION ON DISPLAY @ P* I
0x31df08…31e09c Dummy {f00=0x00fb, f01=0x0190, f02=»RASED ON THE LINE j < P* WHERE THE CURSOR IS POSITIONED THE NUMBER @ P* OF CHARACTERS THAT ARE DEFINED IN THE CONTROL Z @ P* WORD OF ECB. 0-80 CHARACTERS. ERASING STARTS : P* IN THE CURSOR POSITION.
0x31e09c…31e230 Dummy {f00=0x00fb, f01=0x018e, f02=»UNTER P LDR A7,A7 ORDER 0 ? P ABL(E) ADY410 YES * P LDK A2,STX START OF MESSAGE D P CF A5,OUTPUT SEND h P IFT WHATDY=0 " P LDR* A1,A6 CHANNEL PARAMETER P ANK A1,/10 GRAPHIC DISPLAY P RF(E) ACDY02 NO P IFT GRAFIC=1
0x31e230…31e3c4 Dummy {f00=0x00fb, f01=0x0190, f02=» d P CF A5,OUTPUT P* P XIF ( P* 4 PACDY02 EQU * > P CWK A7,5 ORDER 5 R P RF(E) ACDY90 YES l P SUK A7,6 ORDER 6 ? P RF(E) ACDY20 YES P SUK A7,5 ORDER /B ? P ABL(E) ADY200 YES P SUK A7,/26 ORDER ERAS
0x31e3c4…31e558 Dummy {f00=0x00fb, f01=0x0190, f02=»N RIGHT BYTE IN BUFFER p P* ARE CARRIED OUT. 0 P* /2B NO MOVING OF PRINT HEAD < " P* /30 CR, LF, LF p B P* /31 ERASE DISPLAY AND WRITE FROM HOME POSITION P* OTHER VALUE CR, LF P* P
0x31e558…31e6ec Dummy {f00=0x00fb, f01=0x0190, f02=»FFER ADDRESS ~ & P LC A2,1,A2 GET CONTROL CHARACTER P ANK A2,/FF > PACDY25 EQU * R * P SUK A2,/2B POSITIONING BEFORE WRITE ? f P RF(E) ACDY90 P SUK A2,6 /31 ? P RF(E) ACDY65 P LDK A4,1 INDICATE LINE FEED " P ADK A2,1 DO
0x31e6ec…31e880 Dummy {f00=0x00fb, f01=0x0190, f02=»TURN t PACDY35 LDK A1,1 2 P SC A1,DWTAP+1,A6 RESET HEAD POSITION COUNTER $ 8 P* SEND CARRIAGE RETURN AND ONE OR TWO LINE FEEDS Z P* PACDY50 EQU * P CF A5,OUTPUT SEND CHARACTER PACDY52 SUK A4,1 & P RF(N) ACDY90 START SECT
0x31e880…31ea14 (2, 250) Dummy {f00=0x00fb, f01=0x0190, f02=»OUNTER r P ADS A2,DWTAP,A6 & PACDY55 LDK A2,LF LINE FEED TO SEND & P RB ACDY50 P ( PACDY65 LDK A2,CLEHOM CLEAR AND HOME b P LDK A1,1 & P SC A1,DWTAP,A6 RESET LINE COUNTER P RB ACDY35 P EJECT P* & P* GET, CHECK AND
0x31ea14…31eba8 Dummy {f00=0x00fb, f01=0x0190, f02=»METER t P ANK A4,/10 $ P RF(NZ) ACDY75 NOT 6344 OR 6386 " P XIF J P LD A4,2,A8 V 2 P ADR A4,A3 GET ADDRESS TO NEXT CHAR IN BUFFER j $ P CCR A2,A4 CHAR EQU TO CURRENT? P ABL(E) CHECK YES! PACDY75 EQU * P CF A5,OUTPUT
0x31eba8…31ed3c Dummy {f00=0x00fb, f01=0x0190, f02=»GET REQUESTED LENGTH(RL) $ P ADR A1,A2 GET ADD END OF BUFFER PSKIP05 CWK A2,2 H P RF(NG) SKIP30 RL < 3 ` P SUK A1,1 DECR. BA ~ P LCR A4,A1 GET CHAR P CCK A4,/2020 SPACE ? P RF(NE) SKIP20 NO PSKIP07 SUK A2,1 DECR RL
0x31ed3c…31eed0 Dummy {f00=0x00fb, f01=0x0190, f02=»TION CHAR ? | P RF(NE) SKIP25 NO! ! P SUK A1,2 DECR BA ! . P SUK A2,2 DECR RL ! H P RB SKIP07 GET NEXT ! b ( PSKIP25 LCR A4,A1 GET CHARACTER AGAIN ! ~ P ANK A4,/FF ! " P SUK A4,/12 UNDER LINE START? ! P RB(Z) SKIP07 YES! SKIP IT! ! P
0x31eed0…31f064 Dummy {f00=0x00fb, f01=0x018e, f02=»T A2,4,A8 STORE NEW RL ! P XIF " PACDY90 LDK A4,0 " * 6 PADY100 CF A15,GETCHR GET CHARACTER FROM ECB-BUFFER " B P LDR A1,A1 LAST CHARACTER? " | P ABL(NP) ADY405 " P SUK A7,5 ORDER 5? " P RB(E) ACDY75 " P ANK A2,/7F " P LDK A1,5 SET
0x31f064…31f1f8 Dummy {f00=0x00fb, f01=0x0190, f02=» " p P ANK A7,/30 GRAFIC DISPLAY ? # P RF(E) ADY110 NO # , P LDK A1,0 SET TABLE PONTER # D * PADY110 CC A2,TABSPE,A1 CHARACTER FOUND # f P RF(NE) ADY128 # " P CCK A2,/1E1E LOW INTENSITY ? # P RF(NE) ADY122 NO # P LDK A4,/80 # , PADY120 ORR
0x31f1f8…31f38c Dummy {f00=0x00fb, f01=0x0190, f02=» LDK A4,/40 SET UNDERLINE MODE # P RB ADY120 $ & & PADY125 CCK A2,/1414 FAST OUTPUT ? $ 8 P LDK A4,0 $ b P RB(NE) ACDY50 NO $ t P LDR A4,A2 $ ( P CF A15,GETCHR GET OUTPUT CHARACTER $ P LDR A1,A2 $ P LDR A2,A4 $ P LD A4,4,A8 REQ LENGTH $
0x31f38c…31f520 Dummy {f00=0x00fb, f01=0x018e, f02=» P ANK A7,/10 % 2 P RF(NZ) OTHER OTHER DISPLAY THAN 6344 OR 6386? % P XIF % N P LDR A3,A1 NO! % Z P CF A5,FASTER % p PADY127 EQU * % P LD A3,4,A8 REQ LENGTH % P ST A3,6,A8 EFF LENGTH % P ABL ADY405 % PADY128 EQU * % P SUK A1,1
0x31f520…31f6b4 (2, 251) Dummy {f00=0x00fb, f01=0x0190, f02=» % P SUK A1,/F LESS THAN /20 ? & " P RF(N) ADY130 CODE CHECK ERROR & * P SUK A1,/3F GREATER THAN /5F & P P RB(NP) ACDY70 & t P IFT LOWCHA=0 & 6 P SUK A2,/20 TRANSFORM CHARACTER BETWEEN /60 TO /7F & & P TO CHARACTER BETWEEN /40 TO /5F & P XIF
0x31f6b4…31f848 Dummy {f00=0x00fb, f01=0x018e, f02=» P* A1 = CHARACTER ' P* A4 = NUMBER ' P************************ ' 2 P LC A2,DWTBC,A6 ' R P AD A2,DWTAP,A6 GET POSITION ' j P ANK A2,/FF ' $ P ADR A2,A4 ADD LENGTH OF REQUEST ' $ P LD A3,DWTPOS,A6 GET MAX-POS AND ' P ANK A3,/FF ' P S
0x31f848…31f9dc Dummy {f00=0x00fb, f01=0x0190, f02=» 0 P ADK A4,1 ADJUST NUMBER OF OUTPUT CHARACTERS ( POT030 EQU * ( 8 & P LDR A3,A1 SAVE CHARACTER TO SEND ( L POT010 LDR A2,A3 ( v $ P CF A5,OUTPUT SENT CHAR (IN A2) ( P SUK A4,1 DECREMENT COUNTER ( P RB(P) OT010 ( P LD A4,10,A8 GET ACT. LENG
0x31f9dc…31fb70 Dummy {f00=0x00fb, f01=0x0190, f02=»27 ( P XIF ) P EJECT ) P* ) $ P* CODE CHECK ERROR ) . P* ) L PADY130 EQU * ) V P LDK A1,CCERR ) j P ORS A1,8,A8 RETURN CODE ) P RB ADY100 ) P EJECT ) P* ) P* TABULATION ) P* ) PADY140 EQU * ) , P CF A15,
0x31fb70…31fd04 Dummy {f00=0x00fb, f01=0x0190, f02=» ) P RF(E) ADY144 * 0 PADY143 ADK A2,/A FROM DECIMAL TO HEXADECIMAL * P SUK A4,1 * R P RB(NE) ADY143 * d PADY144 LC A4,DWTAP+1,A6 * z . P SUR A2,A4 SUBTRACT HEAD POSITION POINTER * P LC A4,DWTBC,A6 * , P SUR A2,A4 AND REQUESTS POSITION COU
0x31fd04…31fe98 Dummy {f00=0x00fb, f01=0x0190, f02=»ADY146 CF A5,OUTPUT * , P CF A15,POSUPD POSITION COUNTER UPDATING + P SUK A4,1 READY ? + L P RB(NE) ADY145 NO + f P ABL ADY100 + P EJECT + P* + P* ERASE ORDER /31 + P* + 2 PADY160 LD A4,10,A8 GET NUMBER OF CHAR TO ERASE +
0x31fe98…32002c Dummy {f00=0x00fb, f01=0x0190, f02=» & P CF A5,ERA GET LENGTH TO ERASE =2 , P LDK A3,/20 , . P CF A5,FASTER FAST OUTPUT , B PADY165 LDK A2,ETB , d P CF A5,OUTPUT , ~ P ABL ADY410 END OF REQUEST , P IFT WHATDY=0 , PADY166 EQU * YES =2 , & P CF A5,ERA GET LENGTH TO ERASE =
0x32002c…3201c0 Dummy {f00=0x00fb, f01=0x0190, f02=»ND IT , P RB ADY170 - PADY180 LD A4,10,A8 - & P CF A5,ERA GET LENGTH TO ERASE =2 - : P LDR A3,A3 OVER EDGE =2 - d P RF(NN) ADY186 NO =2 - P SUK A4,1 ADJUST LENGTH - PADY186 EQU * - P SUK A4,1 DECREMENT =2 - , P RB(N) ADY165 CURSOR I
0x3201c0…320354 (2, 252) Dummy {f00=0x00fc, f01=0x0190, f02=» P* . * P* ORDER /B CURSOR POSITIONING PART . P* . < PADY200 EQU * . F P* . Z P IFT WHATDY=0 . d " P LDR* A1,A6 CHANNEL PARAMETER . z P ANK A1,/10 GRAFIC DISPLAY? . P RF(NE) ADY205 YES . 2 P* IF VIDEO (6344) SET CURSOR ADDRESS DI
0x320354…3204e8 Dummy {f00=0x00fc, f01=0x0190, f02=»T CURSOR . P RF ADY380 / P IFT WHATDY=0 / " P* GET LINE / 8 * PADY205 LC A4,10,A8 GET REQUESTED LINE / N $ P CC A4,DWTLIN,A6 OUTSIDE SCREEN? / | P RF(NG) ADY207 NO! / 4 P LC A4,DWTLIN,A6 YES! SET CURSOR AT END OF LINE / PADY207 EQU * / $
0x3204e8…32067c Dummy {f00=0x00fc, f01=0x018e, f02=»INE / | P LDK A2,LF LINE FEED 0 * P ADK A3,1 INCREMENT ACTUAL LINE NUMBER 0 ( PADY230 CF A5,OUTPUT SEND 0 V P LDR A4,A4 REQUESTED LINE 0 v " P RB(NZ) ADY210 NOT EQUAL ZERO 0 P LDK A4,1 0 P RF ADY300 0 PADY250 LDK A2,HOME HOME 0 & P LDK A
0x32067c…320810 Dummy {f00=0x00fc, f01=0x0190, f02=» 2 PADY300 SC A4,DWTAP,A6 UPDATE HEAD LINE COUNTER 1 ( P LC A4,11,A8 GET REQUESTED POSITION 1 : $ P CC A4,DWTPOS,A6 OUTSIDE SCREEN? 1 f P RF(NG) ADY303 NO! 1 " P LC A4,DWTPOS,A6 SET LAST LINE 1 PADY303 EQU * 1 P CWK A4,1 FIRST POSITION ? 1 P RF(
0x320810…3209a4 Dummy {f00=0x00fc, f01=0x0190, f02=»Y305 RF(NL) ADY307 REQ. POS NOT ZERO 1 P LDK A4,1 2 , 0 PADY307 LC A3,DWTAP+1,A6 GET ACTUAL POSITION 2 > P CC A3,DWTPOS,A6 MAX-POS? 2 r P RF(NG) ADY310 NO! 2 P SUK A3,1 2 * PADY310 CWR A4,A3 FORWARDS OR BACKWARDS 2 P RF(E) ADY370 POSITION FOU
0x3209a4…320b38 Dummy {f00=0x00fc, f01=0x0190, f02=»ND 2 z P RB ADY310 3 . PADY340 SUR A3,A4 ACTUAL POS. - WANTED POS. 3 , P CWR A3,A4 COMPARE BACKSTEPS WITH CR-WAY 3 N P RF(L) ADY345 BACKSPACE WAY 3 ~ P LDK A2,CR CARRIAGE RETURN 3 & P LDK A3,1 INDICATE FIRST POSITION 3 P RB ADY330 3 " PADY345 L
0x320b38…320ccc Dummy {f00=0x00fc, f01=0x0190, f02=»UPDATE HEAD POSITION POINTER 3 x P XIF 4 $ & PADY380 LDK A3,2 START BUFFER INDEX 4 0 P ABL ACDY90 4 Z P IFT WHATDY=0 4 n P* 4 & PADY400 LDK A2,/22 START CHARACTER 4 P CF A5,OUTPUT 4 P* 4 P XIF 4 P* 4 P EJECT 4 P* 4 P*
0x320ccc…320e60 Dummy {f00=0x00fc, f01=0x018e, f02=»Y405 EQU * 4 & P LDR* A1,A6 GET CHANNEL PARAMETER 5 P ANK A1,/30 6344 ? 5 < P RF(NE) ADY407 NO 5 V P LDR* A1,A6 5 p P LDR A4,A1 5 P ANK A1,/40 UNDERLINE MODE ? 5 P RF(E) ADY406 NO 5 " P LDK A2,ULSTOP UNDERLINE STOP 5 P CF A5,OUTPUT 5
0x320e60…320ff4 (2, 253) Dummy {f00=0x00fc, f01=0x018e, f02=» PADY407 EQU * 6 $ P LDK A2,ETB END OF TEXT MESSAGE 6 P CF A5,OUTPUT SEND CHARACTER 6 @ 0 P CF A15,UPDAPP UPDATE HEAD POSITION COUNTER 6 d PADY410 LDK A2,ETX LAST DUMMY 6 P CF A5,OUTPUT SEND DUMMY 6 PADY415 EQU * 6 P SUK A7,5 ORDER 5 ? 6
0x320ff4…321188 Dummy {f00=0x00fc, f01=0x0190, f02=» P RF(NE) ENDIO NO *DK 7 , P LD A4,DWTAP,A6 GET CURSOR POSITION. *DK 7 " P ST A4,10,A8 PUT IN ECBCW *DK 7 P PENDIO CF A15,TENDIO END I/O 7 v $ PEXIT ABL TDISP GO TO DISPATCHER 7 P* 7 P IFT GRAFIC=1 7 P* 7 P EJECT 7 P* 7 P*
0x321188…32131c Dummy {f00=0x00fc, f01=0x018e, f02=» GET CHARACTER 7 | P LDR A1,A1 BUFFER EMPTY 8 P RB(E) ADY400 8 6 P LDR A4,A2 8 L & P CF A15,GETCHR GET NEXT CHARACTER 8 ^ P LDR A1,A4 8 P ANK A4,/80 ADDRESS OR DATA 8 P RF(E) ADY530 DATA MESSAGE 8 P* 8 P* ADDRESS MESSAGE 8 P*
0x32131c…3214b0 Dummy {f00=0x00fc, f01=0x0190, f02=» P ORR A4,A1 9 P ANK A2,/F 9 P ANK A4,/7F 9 ( P ORK A2,/20 9 < , PADY515 CF A5,OUTPUT SEND FIRST CHARACTER 9 P $ P LDR A2,A4 GET SECOND CHARACTER 9 ( P CF A5,OUTPUT SEND SECOND CHARACTER 9 P RB ADY510 9 P EJECT 9 P* 9 P* DATA
0x3214b0…321644 Dummy {f00=0x00fc, f01=0x018e, f02=»A2 9 P SLL A2,5 : P ORR A1,A2 : P LDK A7,10 : . P LDK A2,0 : @ PADY540 SLL A1,1 : R P RF(NN) ADY550 : j P ORKL A2,/200 : PADY550 SUK A7,1 : P RF(E) ADY560 : P SRL A2,1 : P RB ADY540 : PADY560 LDR A4,A2 : P SRL A4,
0x321644…3217d8 Dummy {f00=0x00fc, f01=0x0190, f02=» : , P* UPDAPP = SUBROUTINE TO UPDATE HEAD ; , P* POSITION POINTER WHEN END ; 8 ( P* OF REQUEST IS REACHED ; h PUPDAPP EQU * ; ( P LC A3,DWTBC,A6 GET POSITION COUNTER ; 2 P ADS A3,DWTAP,A6 UPDATE HEAD POSITION POINTER ;
0x3217d8…32196c Dummy {f00=0x00fc, f01=0x0190, f02=»POSITION ; f 0 P* POINTER WHEN REQUEST RUNNING. < > P* A CHECK THAT POINTER NOT EXCEEDS 80 IS DONE < D P* < PPOSUPD EQU * < ( P LC A2,DWTBC,A6 GET POSITION POINTER < P ANK A2,/FF < 2 P AD A2,DWTAP,A6 INCLUDE HEAD POSITIO
0x32196c…321b00 Dummy {f00=0x00fc, f01=0x0190, f02=»R < j PPOSU10 RTN A15 = P EJECT = P* = . P* I H D Y = 8 P* = L P* INTERRUPT = V P* = l PIHDY EQU * = v P LD A4,DWTST,A6 BUSY? = P RB(N) EXIT NO = P SLL A4,2 ECHO MODE ? = P RF(N) IHDY10 = . P LDR A1,A1 RETURN CODE F
0x321b00…321c94 (2, 254) Dummy {f00=0x00fc, f01=0x0190, f02=» R C D Y = P* > ( P* RCDY = RECOVERY ROUTINE DISPLAY > P* > F P* > P ( P* RECOVERY IS CARRIED OUT ONLY IF > Z P* ORDER 6 IS RUNNING > P* > P* AT ENTRY: > P* > P* A6 = DWT-ADDRESS > P* A7 = ORDER > P*
0x321c94…321e28 Dummy {f00=0x00fc, f01=0x018e, f02=» CPU852=0 > " P MSR 8,A15 SAVE A1-A8 ON STACK ? P XIF ? 8 P* ? D P =3 ? N P LDKL A2,/7FFF ? P ANS A2,DWTST,A6 SET BUSY ? r P =1 ? P =1 ? P =1 ? P =1 ? P =1 ? P =1 ? P =1 ? P =1 ? P* ?
0x321e28…321fbc Dummy {f00=0x00fc, f01=0x0190, f02=» . P LDK A2,RETURN RETURN TO ALPHANUMERIC MODE @ P CF A5,OUTPUT @ 6 P* @ L P XIF @ V P* @ b P EJECT @ l PRCDY10 EQU * @ z P LDK A2,/00 DUMMY TO SEND @ P CF A5,OUTPUT @ $ P LDR A4,A4 LRC-ERROR IN BLOCK ? @ P RF(NE) RCDY20 @ P IFT
0x321fbc…322150 Dummy {f00=0x00fc, f01=0x0190, f02=» P RF(Z) RCDY14 NO =3 A * P LDK A3,100 SET UP TRANSFER COUNTER =3 A 4 PRCDY12 LDK A2,STILL-1 SET UP CURSOR BLINKING =3 A N , P ADK A2,STEADY ADJUST TO STEADY IF SO =3 A $ P CF A5,OUTPUT SEND CURSOR INF =3 A & P SUK A3,1 DEC TRANSFER COUNTER =3 A , P
0x322150…3222e4 Dummy {f00=0x00fc, f01=0x018e, f02=»TRY SEND 'COUNTRY CODE' =1 A P ORK A2,/30 =1 B " P CF A5,OUTPUT =1 B : P =3 B T P =3 B b PRCDY14 EQU * =3 B p P XIF =1 B ( P LD A3,DWTST,A6 SAVE STATUS WORD =3 B " P LDK A2,CLEHOM CLEAR AND HOME B P CF A5,OUTPUT SEND B P L
0x3222e4…322478 Dummy {f00=0x00fc, f01=0x018e, f02=» B x " P LDK A1,OPERR SET RETURN CODE C PRCDY15 ABL ADY420 C . P EJECT C H P* C V ( P* LRC-ERROR IN BLOCK SENT REMOTE C ` P* C PRCDY20 EQU * C P SUK A7,5 ORDER 5 ? C P RF(NE) RCDY25 NO C ( P LDK A1,2 INDICATE THROUGHPUT ERROR C
0x322478…32260c Dummy {f00=0x00fc, f01=0x0190, f02=» C ^ P ANK A4,/FF D P RF(E) RCDY30 D . P CF A5,BACCAN SEND BACKSPACES AND RUB OUT D 2 P LDK A3,2 START BUFFER INDEX D d PRCDY30 ABL ACDY90 D P EJECT D P* D P* E C H O D Y D P* D 0 P* ECHODY = DEVICE-DEPENDENT ECHO-ROUTINE
0x32260c…3227a0 Dummy {f00=0x00fc, f01=0x018e, f02=» EORECH=0 D P* E P SUK A2,/80 E $ P RF(NN) ECDY20 NOT TO BE ECHOED E 0 P ADK A2,/80 E X P* E l P XIF E v P* E P SUK A3,/8 E P RF(E) ECDY40 BACKSPACE E P SUK A3,/10 E P RF(E) ECDY50 CLEAR E & PECDY10 CF A5,OUTPUT SEND C
0x3227a0…322934 (2, 255) Dummy {f00=0x00fc, f01=0x0190, f02=» ( PECDY20 ABL ECHRTN RETURN TO KEYBOARD F P* F 0 P* BACKSPACE F : P* F P PECDY40 EQU * F Z ( P LC A4,DWTBC,A6 GET POSITION COUNTER F n P ANK A4,/FF F P RB(E) ECDY20 FIRST POSITION F $ P LDK A4,1 INDICATE ONE BACKSTEP F P CF A5,BACCAN
0x322934…322ac8 Dummy {f00=0x00fc, f01=0x0190, f02=»ER F n P ANK A4,/FF G P RB(E) ECDY20 FIRST POSITION G P IFT WHATDY=0 G B & P LDR* A1,A6 GET CHANNEL PARAMETER G X P ANK A1,/10 GRAFIC DISPLAY G P RF(E) ECDY60 N G P CF A5,BACCAN BACK G P RB ECDY20 G P XIF G * PECDY60 LDR A3,A4 SAV
0x322ac8…322c5c Dummy {f00=0x00fc, f01=0x0190, f02=»OUNTER G | P ADK A4,1 UPDATE POS COUNTER H P LDK A3,/20 H 2 P CF A5,FASTER FAST OUTPUT H F P LDK A2,0 H h * P SC A2,DWTBC,A6 RESET POSITION COUNTER H z P RB ECDY20 H P EJECT H P* H P* H 0 P* BACCAN = SUBROUTINE TO POSITION CURSOR
0x322c5c…322df0 Dummy {f00=0x00fc, f01=0x0190, f02=» H x P* I PBACCAN EQU * I P LDR A3,A4 I & ( P LC A2,DWTBC,A6 GET POSITION COUNTER I 8 P ANK A2,/FF I d . P AD A2,DWTAP,A6 ADD HEAD POSITION COUNTER I x P ANK A2,/FF I " P CC A2,DWTPOS,A6 LAST POSITION I P RF(NP) BACA10 NO I $ P LDK A2,SP
0x322df0…322f84 Dummy {f00=0x00fc, f01=0x0190, f02=»E SPACE I x P CF A5,OUTPUT SEND J P LDK A2,BACKSP BACKSPACE J * PBACA20 CF A5,OUTPUT SEND J J P SUK A4,1 J j P RB(NE) BACA10 J | P NGR A3,A3 NEGATE REGISTER J , P ADS A3,DWTST,A6 UPDATE POSITION COUNTER J P RTN A5 J P EJECT J 4 P******
0x322f84…323118 Dummy {f00=0x00fc, f01=0x0190, f02=»SON FOR USING * J r 4 P* 'FAST OUTPUT FACILITY' ON 6344 * K 4 P* AND 6386 * K R 4 P*********************************************** K PCHECK EQU * K P* K P* K P LD A1,4,A8 K P SUR A1,A3
0x323118…3232ac Dummy {f00=0x00fc, f01=0x0190, f02=» K l P LDK A4,1 RESET COUNTER L $ PNEXT ADK A4,1 INCREMENT COUNTER L ( P SUK A1,1 END OF BUFFER? L P P RF(NP) OUT YES! L p P ADK A2,1 INCREMENT POINTER L $ P CCR A7,A2 CHAR EQU TO PREVIUS? L P RB(E) NEXT YES! L POUT EQU * L 6 P CWK A4,EQ
0x3232ac…323440 Dummy {f00=0x00fc, f01=0x0190, f02=»TION POINTER * L | , PFASTOK LC A2,DWTBC,A6 GET HEAD POSITION M P AD A2,DWTAP,A6 M F P ANK A2,/FF M ^ " P ADR A3,A4 UPDATE BUFFER-INDEX M r P ST A3,DWTBIN,A6 SAVE INDEX M 0 P LC A3,DWTPOS,A6 GET MAXNUMBER OF CHAR/LINE M P SUR A3,A2 AND COMPARE M
0x323440…3235d4 (2, 256) Dummy {f00=0x00fd, f01=0x0190, f02=»*********** M P* EXECUTE FAST OUTPUT * N P LDR A3,A7 GET CHAR TO SEND N 4 P CF A5,FASTER N X P************** N n P* SET CURSOR * N " P LD A4,DWTST,A6 GET ACTUAL POS N P ANK A4,/FF N ( P AD A4,DWTAP,A6 INC HEAD POS POINTER N P CF A5,C
0x3235d4…323768 Dummy {f00=0x00fd, f01=0x018e, f02=» SUK A3,1 N P ABL ACDY90 READ NEXT CHAR O P* O 4 . PNOFAST LDR A2,A7 RESTORE OUTPUT CHARACTER O > P ABL ACDY75 O p P EJECT O P* O P* O < P* FASTER = SUBROUTINE TO OUTPUT SPACE AT FAST OUTPUT O 4 P* AT ENTRY A4 = NUMBER
0x323768…3238fc Dummy {f00=0x00fd, f01=0x0190, f02=» O PFAS010 EQU * P P ADK A4,/20 ADD CONSTANT P P LDK A2,FASTO FAST OUTPUT P < P CF A5,OUTPUT SEND P ^ P LDR A2,A4 NO OF CHAR P x P CF A5,OUTPUT SEND P P LDR A2,A3 P P CF A5,OUTPUT SEND P P RTN A5 P P EJECT P P* P P* P
0x3238fc…323a90 Dummy {f00=0x00fd, f01=0x0190, f02=»QU * P P ADKL A4,/1F1F CONVERT Q P LDK A2,SCADD SET CURSOR Q * P CF A5,OUTPUT SEND Q J P ECR A2,A4 POS. X < /80? Q d P LDR A2,A2 Q P RF(NN) CURR05 YES! Q P LCK A4,/7F00 Q PCURR05 EQU * Q P LDR A2,A4 Q & P CF A5,OUTPUT OUTPUT POSIT
0x323a90…323c24 Dummy {f00=0x00fd, f01=0x0190, f02=»IFT RIGHT Q PCURR15 EQU * R P CF A5,OUTPUT OUTPUT LINE(Y) R & P RTN A5 R J P EJECT R Z P* =2 R h P* =2 R v P* =2 R 8 P* ERA - SUBROUTINE TO AVOID UNNECESSARY OUTPUT =2 R P* =2 R P* =2 R 0 P* AT ENTRY A4 = CHAR TO ERASE
0x323c24…323db8 Dummy {f00=0x00fd, f01=0x0190, f02=»2 R t P ANK A2,/FF GET MAX CHAR. =2 S 0 P LC A3,DWTAP+1,A6 CURRENT POS. ON SCREEN =2 S . P ANK A3,/FF =2 S b 2 P SUR A2,A3 NUMBER OF CHAR. TO END OF SCREEN =2 S z P ADK A2,1 ADJUST LENGTH =2 S P CWR A4,A2 OUTSIDE SCREEN =2 S P RF(L) ERAEND NO
0x323db8…323f4c Dummy {f00=0x00fd, f01=0x40a2, f02=» RTN A5 RETURN =2 S PABDY EQU * ABORT ROUTINE =4 T , P CF A15,UPDAPP UPDATE CURSOR POSITION =4 T > P RTN A15 RETURN TO CALLER =4 T n P END T @ T EEN =2 S z P ADK A2,1 ADJUST LENGTH =2 S P CWR A4,A2 OUTSIDE SCREEN =2 S P RF(L) ERAEND NO
0x323f4c…3240e0 Dummy {f00=0x00fd, f01=0x2008, f02=» U PP UPDATE CURSOR POSITION =4 S P RTN A15 RETURN TO CALLER =4 T , P END T P@ T EEN =2 S 8 P ADK A2,1 ADJUST LENGTH =2 S n P CWR A4,A2 OUTSIDE SCREEN =2 S P RF(L) ERAEND NO =2 S . P LDR A4,A2 OUTSIDE SCREEN MODIFY LENGTH =2 S P LDK
0x3240e0…324274 (2, 257) Dummy {f00=0x00fd, f01=0x0190, f02=» P RF(NZ) BRM150 PARITY ERROR > P LDR A8,A2 > ( P IFT MSV1=0 > : P CF A5,READP READ 2:ND STA > N P RF(NZ) BRM150 PARITY ERROR > p P CWR A2,A8 > , P RF(NE) BRM150 INVALID ADDRESS SEQUENCE > P XIF > " P CF A5,READ READ ONE CHARACTER > P
0x324274…324408 Dummy {f00=0x00fd, f01=0x0190, f02=» SALCUZ > P RF(NZ) BRM150 NOT ENQ ? P IFT P6805=0 SALCUZ ? . $ P CF A5,READ READ LAST CHARACTER ? J P ? r " P* TRAILING PAD CAN BE CHECKED ? z P ? P CIO A1,0,LCUIN HALT INPUT ? P SST A1,LCUIN ? P XIF SALCUZ ? P IFT P6805=1 SALC
0x324408…32459c Dummy {f00=0x00fd, f01=0x0190, f02=» P ST A1,CACK LOAD ACK COUNTER @ P LDR A2,A8 @ ( P SUK A3,2 @ : P RF(Z) BRM120 SELECTING @ L P CWK A8,GP @ l P ABL(E) GPOLL GENERAL POLL @ ~ P IFT MSV1=1 @ 6 P CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS) @ P XIF @ P IFT MSV1=0 @
0x32459c…324730 Dummy {f00=0x00fd, f01=0x018e, f02=»M INVALID POLL @ PBRM120 EQU * A & P CF A5,FINTER CHECK IF STA PRESENT A * P LDR A6,A3 LOAD DWT TO A6 A T P RF(NZ) BRM130 STA FOUND A v P IFT MSV1=0 A $ P LDKL A6,DW1500 SELECT TO DCTASK A PBRM130 EQU * A P ABL SELECT A P XIF A
0x324730…3248c4 Dummy {f00=0x00fd, f01=0x0190, f02=» A PBRM150 EQU * B P ANK A2,/7F B P SUK A2,/7F B 0 P RB(Z) BRM RESYNCHRONIZE B D & P CF A5,READ READ ANOTHER CHARACTER B d P RB BRM150 B P EJECT B P* B P* B P* EOT HAS BEEN RECEIVED B P* B P* B PBRM200 EQU * B &
0x3248c4…324a58 Dummy {f00=0x00fd, f01=0x0190, f02=» BRM220 ACK IS NOT EXPECTED B " P LD A6,FDWTUT GET WRITING DWT C $ P RF(Z) BRM210 NO ONE WRITING C J P LDK A1,2 SET RC=2 C n ( P CF A5,CWRITE COMPLETE WRITE REQUEST C PBRM210 EQU * C " P CM XACK RESET 'ACK EXPECTED' C PBRM220 EQU * C P CM XS
0x324a58…324bec Dummy {f00=0x00fd, f01=0x0190, f02=» EQU * C P CF A5,HPTIM D P LD A1,XSEL D " P RF(Z) BRM315 NOT SELECTED D 6 P LD A1,DCRBUF D X ( P*********************CHAINED COMMAND D n & P RB(Z) BRM150 NO BUFFER AVAILABLE D P********************* D PBRM305 EQU * D P CF A5,RDMESS READ
0x324bec…324d80 Dummy {f00=0x00fd, f01=0x0190, f02=»12 EQU * D P CF A5,TRNAK SEND NAK E P ABL BRM E . PBRM315 EQU * E > P IFT RCOM=1 E R P LD A1,XACK E f & P RF(Z) BRM316 ACK IS NOT EXPECTED E z P LD A1,DCRBUF E & P RF(Z) BRM316 NO BUFFER AVAILABLE E " P LD A6,FDWTUT GET WRITING DWT E 0
0x324d80…324f14 (2, 258) Opaque[0x194]
0x324f14…3250a8 # DirEnt {nam=»DRRT01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1fb0, f03=0x0000}
0x324f14…3250a8 IdxSect {
0x324f14…3250a8 f00 = 0x00fd // 0x324f14 @0x0
0x324f14…3250a8 f01 = 0x002c // 0x324f16 @0x2
0x324f14…3250a8 gno = [ // 0x324f18 @0x4
0x324f14…3250a8 [0x00]: C0x00fd.0x2.0
0x324f14…3250a8 [0x01]: C0x00fd.0x3.0
0x324f14…3250a8 [0x02]: C0x00fe.0x0.0
0x324f14…3250a8 [0x03]: C0x00fe.0x1.0
0x324f14…3250a8 [0x04]: C0x00fe.0x2.0
0x324f14…3250a8 [0x05]: C0x00fe.0x3.0
0x324f14…3250a8 [0x06]: C0x00ff.0x0.0
0x324f14…3250a8 [0x07]: C0x00ff.0x1.0
0x324f14…3250a8 [0x08]: C0x00ff.0x2.0
0x324f14…3250a8 [0x09]: C0x00ff.0x3.0
0x324f14…3250a8 [0x0a]: C0x0100.0x0.0
0x324f14…3250a8 [0x0b]: C0x0100.0x1.0
0x324f14…3250a8 [0x0c]: C0x0100.0x2.0
0x324f14…3250a8 [0x0d]: C0x0100.0x3.0
0x324f14…3250a8 [0x0e]: C0x0101.0x0.0
0x324f14…3250a8 [0x0f]: C0x0101.0x1.0
0x324f14…3250a8 [0x10]: C0x0101.0x2.0
0x324f14…3250a8 [0x11]: C0x0101.0x3.0
0x324f14…3250a8 [0x12]: C0x0102.0x0.0
0x324f14…3250a8 [0x13]: C0x0102.0x1.0
0x324f14…3250a8 [0x14]: C0x0102.0x2.0
0x324f14…3250a8 [0x15]: C0x0102.0x3.0
0x324f14…3250a8 ]
0x324f14…3250a8 }
0x3250a8…32523c Dummy {f00=0x00fd, f01=0x0190, f02=» 2 P IDENT DRRT01 9.2DK 1 79-11-16 870105040920 P : P =DK1, BLOCK - LOGGBUFFER B P 80-03-11 f ( P =9,TIMER RESET,TEST ORDER,INH-A15 z P REL 9.1 79-06-26 * P =8, INTERRUPT ADDRESS DISPLACEMENT P REL 9.1 79-05-23
0x32523c…3253d0 Dummy {f00=0x00fd, f01=0x0190, f02=»6,C.U. PRESENT CHECK ERROR P REL 8.2 79-03-20 " P =5,HANG UP PREVENT > P REL 8.2 79-03-19 P =4,TIME OUT ROUTINE ERROR x P REL 8.2 79-03-18 P =3,DISPL. RECOVERY P REL 8.2 79-03-17 P =2,LOOP TEST ERROR
0x3253d0…325564 Dummy {f00=0x00fd, f01=0x0190, f02=»********************** v P* $ P* PHILIPS TERMINAL SYSTEM PTS ( P* P . P* DRRT01 = DRIVER CHANNEL UNIT FOR LOCAL Z & P* AND REMOTE TERMINALS P* P* P* P* P* 4 P********************************
0x325564…3256f8 Dummy {f00=0x00fd, f01=0x0190, f02=»PUT WORD IS READ TO REGISTER A2. IF DATA z D P* INPUT OR DATA REQUEST A BRANCH IS MADE TO INTERRUPT HANDLER 0 P* FOR ACTUAL DEVICE. x D P* IF CONTROL CHARACTER, THIS IS EXAMINED AND NECESSARY ACTIONS P* ARE CARRIED OUT. P* P*
0x3256f8…32588c Dummy {f00=0x00fd, f01=0x0190, f02=» < P* - CHLTON EXECUTE CIO-START ON EVERY CHLT IN SYSTEM P* D 4 P* - GETCHR GET ONE CHARACTER FROM ECB-BUFFER N P* 2 P* CONTROL WORK TABLES FOR THE CHANNELS ARE P* INCLUDED IN THE DRIVER. P EJECT P* P*
0x32588c…325a20 Dummy {f00=0x00fd, f01=0x0190, f02=»-A5 AND RETURN TO DISPATCHER f P* $ 6 P* - STREG SAVE A3-A5 AND RETURN TO DISPATCHER . P* h D P* - LDREG IF INTERRUPT IS ALLOWED, RESTORE A3-A5 AND RETURN r " P* TO USER VIA A5 P* : P* - LDREGE RESTORE A3-A5 A
0x325a20…325bb4 (2, 259) Dummy {f00=0x00fd, f01=0x0190, f02=»N CODE P* A2 = INPUT WORD P* A3 = LINE NUMBER * 2 * P* A4 = DEVICE NUMBER * 2 J P* A5 = CWT-ADDRESS l P* A6 = DWT-ADDRESS P* A7 = ORDER P* A8 = ECB-ADDRESS P* P* P* P EJECT P*
0x325bb4…325d48 Dummy {f00=0x00fd, f01=0x0190, f02=»L UNIT h : P ENTRY CHLT2 INTERRUPT FROM SECOND CHANNEL UNIT LOCAL 2 P ENTRY CHLT3 INTERRUPT FROM THIRD CHANEL LOCAL L 4 P ENTRY CHLT4 INTERRUPT FROM FOURtH CHANEL LOCAL : P ENTRY CHRT1 INTERRUPT FROM FIRST CHANNEL UNIT REMOTE : P ENTRY CHRT2 INT
0x325d48…325edc Dummy {f00=0x00fd, f01=0x0190, f02=»HANEL REMOTE l $ P ENTRY OUTLIN SEND ONE CHARACTER P ENTRY CHLTON START OF CHLT < 0 P ENTRY OUTPUT SAVE REGISTERS, SEND CHARACTER ` P ENTRY CHTAB CHANNEL TABLE P AND GO TO DISPATCHER , P ENTRY LDREG RELOAD REGISTERS AND RETURN , P E
0x325edc…326070 Dummy {f00=0x00fd, f01=0x018e, f02=»RY GETCHR GET ONE CHARACTER FROM ECB-BUFFER P 4 @ P ENTRY DWREMU DWT-DUMMY FOR LOOP-TESTING OF REMOTE CHANNELS < 0 P ENTRY LOCHAN NUMBER OF LOCAL CHANNEL UNITS 0 P ENTRY RECHAN NUMBER OF REMOTE CHANNEL UNITS & P ENTRY REMFC REMOTE TEST FILE CO
0x326070…326204 Dummy {f00=0x00fd, f01=0x0190, f02=» P* * P************************************** * P* EXTERNAL TOSS MODULE ENTRIES * < * P************************************** j P* P* & P EXTRN SAVE8 SAVE REGISTERS A1-A8 P EXTRN TDISP DISPATCHER P EXTRN RETUR4 REST
0x326204…326398 Dummy {f00=0x00fd, f01=0x0190, f02=»UPT TABLE FOR LOCAL TERMINALS | , P EXTRN INTLT2 INTERRUPT TABLE FOR CHLT2 & & P EXTRN INTLT3 INTERRUPT FROM CHLT3 V & P EXTRN INTLT4 INTERRUPT FROM CHLT4 6 P EXTRN INTRT1 INTERRUPT TABLE FOR REMOTE TERMINALS 2 P EXTRN INTRT2 INTERRUPT TABLE REMOTE
0x326398…32652c Dummy {f00=0x00fd, f01=0x0190, f02=»XTRN DISIOE I/O REQUEST ERROR & P EXTRN DISEND END I/O AND DISPATCH & * P EXTRN INTSAV SAVE AREA LAST INTERRUPT P P EXTRN TENDIO ~ . P EXTRN IHRET8 RESTORE A1-A8 WITHOUT ENABLE P* P* P* P* P***********************
0x32652c…3266c0 Dummy {f00=0x00fd, f01=0x0190, f02=»ACTER r P EXTRN DWTECB ECB-ADDRESS * P EXTRN DWTADR ADDRESS TO ADDRESS-BLOCK 0 P EXTRN DWTST STATUS ^ P EXTRN DWTWAT z P EXTRN DWTOTQ OUTPUT QUEUE P EXTRN DWTA3 SAVE AREA A3 P EXTRN DWTA4 SAVE AREA A4 P EXTRN DWTA5 SAVE
0x3266c0…326854 (2, 260) Dummy {f00=0x00fe, f01=0x0190, f02=» INTADR INTERRUPT ADDRESS DISPLACEMENT 0 P EXTRN RECADR RECOVERY ADDRESS DISPLACEMENT . , P EXTRN ECHADR ECHO ADDRESS DISPLACEMENT b P* P EJECT P* P* P******************** P* CONSTANTS * P******************
0x326854…3269e8 Dummy {f00=0x00fe, f01=0x0190, f02=»SPECIAL DUMMY TO GET DATA REQUEST ( P FIRST WHEN PRINTERBUFFER IS EMPTY * 0 PDRQTIM EQU 30 TIME TO NEXT ACK FOR PRINTERS V P EJECT P* , P*************************************** , P* CONDITIONAL ASSEMBLY * , P******
0x3269e8…326b7c Dummy {f00=0x00fe, f01=0x0190, f02=» INCLUDED TO THE DRIVER BY SETTING X:A=1 P* 2 PX:A EQU 1 < PLOGING EQU 0 N P* b P* l > P* BY SETTING X:B TO 1,2,3 OR 4 THIS DRIVER HANDLES ONE v & P* OR UP TO FOUR LOCAL CHANNELS. P* PX:B EQU 1 PLOCHAN EQU
0x326b7c…326d10 Dummy {f00=0x00fe, f01=0x0190, f02=»IN b 8 P* THE DRIVER. THIS FUNCTION CAN BE EXCLUDED FROM $ P* DRIVER BY SETTING X:C = 0. F P* n PX:C EQU 1 x PACKMUL EQU 0 P* P* > P* BY SETTING X:D TO 1,2,3 OR 4 THIS DRIVER HANDLES ONE , P* OR UP TO FOUR R
0x326d10…326ea4 Dummy {f00=0x00fe, f01=0x0190, f02=»LE CODE " r P* STANDARD IS /15 P* . PX:E EQU /15 8 PREMFC EQU /15 L P* b * P* ECHO FUNCTION CAN BE EXCLUDED BY l P* SETTING X:F = 0 P* PX:F EQU 1 PCECHO EQU 01 P* P* 6 P* A PROGRAM
0x326ea4…327038 Dummy {f00=0x00fe, f01=0x018e, f02=» DB P* 8 P* BY SETTING BLOCK=1 BLOCKSENDING IS PERMITTED < P* BY SETTING BLOCK=0 BLOCKSENDING IS NOT PERMITTED T P* PBLOCK EQU 1 DK1 P* P DE P EJECT : P********************************************
0x327038…3271cc Dummy {f00=0x00fe, f01=0x0190, f02=» X P* 4 P* CONTROL WORK TABLE FOR LOCAL CHANNEL NO. 1 P* J PDWA1 EQU /03 DEVICEADDRESS T P* v PCWTLT1 EQU * TABLE ENTRY PCWTLDW EQU *-CWTLT1 P DATA 0 LAST OUTPUT DWT PCWTLOW EQU *-CWTLT1 P DATA 0 LAST OUT
0x3271cc…327360 Dummy {f00=0x00fe, f01=0x0190, f02=»NR PCWTOTR EQU *-CWTLT1 P OTR A2,0,DWA1 OTR & PCWTCIS EQU *-CWTLT1 @ P CIO A2,1,DWA1 CIO-START PCWTRTC EQU *-CWTLT1 | " P DATA 0 RETRANSMISSION COUNTER PCWTEQ EQU *-CWTLT1 P DATA 0 QUEUE P DATA 0 QUEUE 2 PCW
0x327360…3274f4 (2, 261) Dummy {f00=0x00fe, f01=0x0190, f02=» , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR PACKTIM EQU *-CWTLT1 4 ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR P P* | P XIF P* P EJECT P* P* : P***************************************************** : P* C W T L
0x3274f4…327688 Dummy {f00=0x00fe, f01=0x018e, f02=»ORK TABLE FOR LOCAL CHANNEL NO. 2 P* * PCWTLT2 EQU * 4 P* H P IFT LOCHAN=2 R P* h P* r P* | PDWA2 EQU /13 DEVICE ADDRESS P* P DATA 0 LAST OUTPUT DWT P DATA 0 LAST OUTPUT WORD P DATA INTLT2 INTERRU
0x327688…32781c Dummy {f00=0x00fe, f01=0x0190, f02=» P DATA 0 QUEUE P DATA 0 SECOND QUEUE P* 6 P IFT ACKMUL=1 @ P* V P DATA 0 NAK-ACKUMULATOR ` $ P DATA 0 RETR. FAULT-ACKUMULATOR , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR P*
0x32781c…3279b0 Dummy {f00=0x00fe, f01=0x0190, f02=»ST OUTPUT DWT P DATA 0 LAST OUTPUT WORD P DATA INTLT2 INTERRUPT TABLE 6 P INR A2,0,DWA2 INR Z P OTR A2,0,DWA2 OTR t P CIO A2,1,DWA2 CIO-START " P DATA 0 RETRANSMISSION COUNTER P DATA 0 QUEUE P DATA 0 SECOND QUEUE P*
0x3279b0…327b44 Dummy {f00=0x00fe, f01=0x0190, f02=»RUPT-ACKUMULATOR x ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR P* D P XIF N P* Z P IFT LOCHAN=4 d P* z P* P* PDWA2 EQU /13 DEVICE ADDRESS P* P DATA 0 LAST OUTPUT DWT P DATA 0 LAST OUTPUT WORD P D
0x327b44…327cd8 Dummy {f00=0x00fe, f01=0x0190, f02=»SION COUNTER ~ P DATA 0 QUEUE P DATA 0 SECOND QUEUE * P* F P IFT ACKMUL=1 P P* f P DATA 0 NAK-ACKUMULATOR p $ P DATA 0 RETR. FAULT-ACKUMULATOR , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR ( P DATA 0 PRINTER TIMEOUT ACKUMULA
0x327cd8…327e6c Dummy {f00=0x00fe, f01=0x0190, f02=» : P* C W T L T 3 * : P***************************************************** B P* 4 P* CONTROL WORK TABLE FOR LOCAL CHANNEL NO. 3 P* PCWTLT3 EQU * P* P IFT LOCHAN=3 P*
0x327e6c…328000 Dummy {f00=0x00fe, f01=0x0190, f02=»A INTLT3 INTERRUPT TABLE P INR A2,0,DWA3 INR P OTR A2,0,DWA3 OTR : P CIO A2,1,DWA3 CIO-START T " P DATA 0 RETRANSMISSION COUNTER t P DATA 0 QUEUE P DATA 0 SECOND QUEUE P* P IFT ACKMUL=1 P* P DATA 0 NAK-ACKUMU
0x328000…328194 (2, 262) Dummy {f00=0x00fe, f01=0x0190, f02=»R n P* P XIF P* P IFT LOCHAN=4 * P* @ P* J P* T PDWA3 EQU /23 DEVICE ADDRESS ^ P* P DATA 0 LAST OUTPUT DWT P DATA 0 LAST OUTPUT WORD P DATA INTLT3 INTERRUPT TABLE P INR A2,0,DWA3 INR
0x328194…328328 Dummy {f00=0x00fe, f01=0x0190, f02=»UEUE P* P IFT ACKMUL=1 P* , P DATA 0 NAK-ACKUMULATOR 6 $ P DATA 0 RETR. FAULT-ACKUMULATOR V , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR ~ ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR P* P XIF P* P EJECT P
0x328328…3284bc Dummy {f00=0x00fe, f01=0x0190, f02=» Z : P***************************************************** P* F 4 P* CONTROL WORK TABLE FOR LOCAL CHANNEL NO. 4 P P* PCWTLT4 EQU * P* P IFT LOCHAN=4 P* P* P* PDWA4 EQU /33 P* P DATA
0x3284bc…328650 Dummy {f00=0x00fe, f01=0x0190, f02=»TR P CIO A2,1,DWA4 CIO-START ! " P DATA 0 RETRANSMISSION COUNTER ! * P DATA 0 QUEUE ! P P DATA 0 SECOND QUEUE ! f P* ! P IFT ACKMUL=1 ! P* ! P DATA 0 NAK-ACKUMULATOR ! $ P DATA 0 RETR. FAULT-ACKUMULATOR ! , P DATA 0 UNDEFINED- I
0x328650…3287e4 Dummy {f00=0x00fe, f01=0x0190, f02=»************* ! ~ $ P* C W T R T 1 * " $ P******************************* " > 4 P* CONTROL WORK TABLE FOR REMOTE CHANNEL NO. 1 " f P* CONNECTED TO FIRST CHRT " P* " PDWA5 EQU /1 DEVICE ADDRESS " PCWTRT1 EQU * " P DATA
0x3287e4…328978 Dummy {f00=0x00fe, f01=0x0190, f02=»TR " P CIO A2,1,DWA5 CIO-START # " P DATA 0 RETRANSMISSION COUNTER # * P DATA 0 QUEUE TERMINAL 1 # P P DATA 0 QUEUE TERMINAL 2 # p P* # P IFT ACKMUL=1 # P* # P DATA 0 NAK-ACKUMULATOR # $ P DATA 0 BLOCK ERROR ACKUMULATOR # , P DATA
0x328978…328b0c Dummy {f00=0x00fe, f01=0x0190, f02=» # ~ P DATA 0 TIMER POINTER $ PCWSYNC EQU *-CWTRT1 $ & P DATA /7055 SYNC CHARACTER $ B PLRCDWT EQU *-CWTRT1 $ d 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 $ 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 $ PLRCACK EQU *-CWTRT1 $ & P DAT
0x328b0c…328ca0 Dummy {f00=0x00fe, f01=0x0190, f02=»(LOOP-TESTS) $ t 0 PCWTBLK EQU *-CWTRT1 BLOCK SENDING INDICATOR % ( P DATA 0 BIT 0: BLOCKSENDING RUNNING % H $ P BIT 15: BLOCKSENDING ALLOWED % t P EJECT % $ P******************************** % $ P* C W T R T 2 * % $ P**************
0x328ca0…328e34 (2, 263) Dummy {f00=0x00fe, f01=0x0190, f02=»TRT2 EQU * % P DATA 0 LAST OUTPUT DWT & P DATA 0 LAST OUTPUT WORD & 2 P & R P DATA INTRT1 INTERRUPT TABLE & Z P INR A2,0,DWA5 INR & ~ P OTR A2,1,DWA5 OTR & P CIO A2,1,DWA5 CIO-START & " P DATA 0 RETRANSMISSION COUNTER & P DATA 0 QUEUE TE
0x328e34…328fc8 Dummy {f00=0x00fe, f01=0x018e, f02=»ERROR ACKUMULATOR & , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR ' ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR ' J P* ' v P XIF ' P* ' P DATA 0 TIMER POINTER ' P DATA /7255 SYNC-CHARACTER ' 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 ' 0
0x328fc8…32915c Dummy {f00=0x00fe, f01=0x0190, f02=» , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) ( $ P DATA 0 BLOCK SENDING INDICATOR ( 4 P EJECT ( $ P******************************** ( j $ P* C W T R T 3 * ( $ P******************************** ( P* ( : P* CHANNEL UNIT WORK TABLE
0x32915c…3292f0 Dummy {f00=0x00fe, f01=0x0190, f02=» ( PDWA6 EQU /11 DEVICE ADDRESS ) P* ) , P DATA 0 LAST OUTPUT DWT ) 6 P DATA 0 LAST OUTPUT WORD ) V P DATA INTRT2 INTERRUPT TABLE ) v P INR A2,0,DWA6 INR ) P OTR A2,0,DWA6 OTR ) P CIO A2,1,DWA6 CIO-START ) " P DATA 0 RETRANSMISSION COU
0x3292f0…329484 Dummy {f00=0x00fe, f01=0x0190, f02=» $ P DATA 0 BLOCK ERROR ACKUMULATOR * , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR * , ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR * P* * P XIF * P IFT RECHAN=3 * PDWA6 EQU /11 DEVICE ADDRESS * P* * P DATA 0 LAST OUTPUT DWT * P DATA
0x329484…329618 Dummy {f00=0x00fe, f01=0x0190, f02=»RT * z " P DATA 0 RETRANSMISSION COUNTER + P DATA 0 QUEUE TERMINAL 1 + 0 P DATA 0 QUEUE TERMINAL 2 + P P* + p P IFT ACKMUL=1 + z P DATA 0 NAK-ACKUMULATOR + $ P DATA 0 BLOCK ERROR ACKUMULATOR + , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR + ( P
0x329618…3297ac Dummy {f00=0x00fe, f01=0x0190, f02=»ATA 0 LAST OUTPUT DWT + P DATA 0 LAST OUTPUT WORD , P DATA INTRT2 INTERRUPT TABLE , > P INR A2,0,DWA6 INR , b P OTR A2,0,DWA6 OTR , | P CIO A2,1,DWA6 CIO-START , " P DATA 0 RETRANSMISSION COUNTER , P DATA 0 QUEUE TERMINAL 1 , P DATA 0 QUEU
0x3297ac…329940 Dummy {f00=0x00fe, f01=0x0190, f02=»FINED-INTERRUPT-ACKUMULATOR , ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR - $ P* - P P XIF - Z P IFT RECHAN=2 - f P DATA 0 TIMER POINTER - | P DATA /7055 SYNC-CHARACTER - 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 - 0 P DATA 0 DWT OF GOING LRC
0x329940…329ad4 (2, 264) Dummy {f00=0x00ff, f01=0x0190, f02=»ORD (LOOP-TESTS) - x $ P DATA 0 BLOCK SENDING INDICATOR . P XIF . @ P IFT RECHAN=3 . L P DATA 0 TIMER POINTER . b 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 TERMINAL 2 . &
0x329ad4…329c68 Dummy {f00=0x00ff, f01=0x0190, f02=»ATA 0 BLOCK SENDING INDICATOR . P XIF / & P IFT RECHAN=4 / 2 P DATA 0 TIMER POINTER / H P DATA /7055 SYNC-CHARACTER / f 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 LRC-ACKUMULATOR
0x329c68…329dfc Dummy {f00=0x00ff, f01=0x0190, f02=»TOR / t P XIF 0 P EJECT 0 $ P******************************** 0 & $ P* C W T R T 4 * 0 N $ P******************************** 0 v P* 0 : P* CHANNEL UNIT WORK TABLE FOR REMOTE CHANNEL NO. 2 0 " P* CONNECTED TO SECOND CHRT 0
0x329dfc…329f90 Dummy {f00=0x00ff, f01=0x0190, f02=»INTRT2 INTERRUPT TABLE 0 P INR A2,0,DWA6 INR 1 P OTR A2,1,DWA6 OTR 1 8 P CIO A2,1,DWA6 CIO-START 1 R " P DATA 0 RETRANSMISSION COUNTER 1 r P DATA 0 QUEUE TERMINAL 1 1 P DATA 0 QUEUE TERMINAL 2 1 P* 1 P IFT ACKMUL=1 1 P DATA 0 NAK-ACKU
0x329f90…32a124 Dummy {f00=0x00ff, f01=0x0190, f02=»TOR 1 p P XIF 2 P IFT RECHAN=3 2 P DATA 0 LAST OUTPUT DWT 2 . P DATA 0 LAST OUTPUT WORD 2 N P DATA INTRT2 INTERRUPT TABLE 2 n P INR A2,0,DWA6 INR 2 P OTR A2,1,DWA6 OTR 2 P CIO A2,1,DWA6 CIO-START 2 " P DATA 0 RETRANSMISSION COUNTER 2
0x32a124…32a2b8 Dummy {f00=0x00ff, f01=0x0190, f02=»A 0 BLOCK ERROR ACKUMULATOR 2 , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR 3 $ ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR 3 T P XIF 3 P IFT RECHAN=4 3 P DATA 0 LAST OUTPUT DWT 3 P DATA 0 LAST OUTPUT WORD 3 P DATA INTRT2 INTERRUPT TABLE 3 P I
0x32a2b8…32a44c Dummy {f00=0x00ff, f01=0x0190, f02=»RMINAL 1 3 P DATA 0 QUEUE TERMINAL 2 4 P* 4 0 P IFT ACKMUL=1 4 : P DATA 0 NAK-ACKUMULATOR 4 P $ P DATA 0 BLOCK ERROR ACKUMULATOR 4 p , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR 4 ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR 4 P XIF 4 P IFT REC
0x32a44c…32a5e0 Dummy {f00=0x00ff, f01=0x0190, f02=» 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 5 & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 5 8 & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 5 b , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) 5 $ P DATA 0 BLOCK SENDING INDICATOR 5 P* 5 P XIF 5 P* 5 P IFT
0x32a5e0…32a774 (2, 265) Dummy {f00=0x00ff, f01=0x0190, f02=»ATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 5 & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 6 2 & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 6 , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) 6 $ P DATA 0 BLOCK SENDING INDICATOR 6 P* 6 P XIF 6 P* 6 P IFT RECHA
0x32a774…32a908 Dummy {f00=0x00ff, f01=0x0190, f02=»DWT OF GOING LRC-PROCESS TERMINAL 2 6 & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 7 , & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 7 V , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) 7 $ P DATA 0 BLOCK SENDING INDICATOR 7 P* 7 P XIF 7 P* 7 P EJECT 7 $ P**
0x32a908…32aa9c Dummy {f00=0x00ff, f01=0x0190, f02=»NNEL UNIT WORK TABLE FOR REMOTE CHANNEL NO. 1 7 P* CONNECTED TO THIRD CHRT 8 6 P 8 Z P* 8 b PCWTRT5 EQU * 8 l P* 8 P IFT RECHAN=3 8 P* 8 PDWA7 EQU /21 DEVICE ADDRESS 8 P* 8 P DATA 0 LAST OUTPUT DWT 8 P DATA 0 LAST OUT
0x32aa9c…32ac30 Dummy {f00=0x00ff, f01=0x0190, f02=» DATA 0 RETRANSMISSION COUNTER 8 P DATA 0 QUEUE TERMINAL 1 9 & P DATA 0 QUEUE TERMINAL 2 9 F P* 9 f P IFT ACKMUL=1 9 p P DATA 0 NAK-ACKUMULATOR 9 $ P DATA 0 BLOCK ERROR ACKUMULATOR 9 , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR 9 ( P DATA 0 PR
0x32ac30…32adc4 Dummy {f00=0x00ff, f01=0x0190, f02=»ATA 0 LAST OUTPUT DWT 9 P DATA 0 LAST OUTPUT WORD : P DATA INTRT3 INTERRUPT TABLE : > P INR A2,0,DWA7 INR : b P OTR A2,0,DWA7 OTR : | P CIO A2,1,DWA7 CIO-START : " P DATA 0 RETRANSMISSION COUNTER : P DATA 0 QUEUE TERMINAL 1 : P DATA 0 QUEU
0x32adc4…32af58 Dummy {f00=0x00ff, f01=0x0190, f02=»FINED-INTERRUPT-ACKUMULATOR : ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR ; $ P* ; P P XIF ; Z P IFT RECHAN=3 ; f P DATA 0 TIMER POINTER ; | P DATA /7055 SYNC-CHARACTER ; 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 ; 0 P DATA 0 DWT OF GOING LRC
0x32af58…32b0ec Dummy {f00=0x00ff, f01=0x0190, f02=»ORD (LOOP-TESTS) ; x $ P DATA 0 BLOCK SENDING INDICATOR < P XIF < @ P IFT RECHAN=4 < L P DATA 0 TIMER POINTER < b 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 TERMINAL 2 < &
0x32b0ec…32b280 Dummy {f00=0x00ff, f01=0x0190, f02=»ATA 0 BLOCK SENDING INDICATOR < P XIF = & P EJECT = 2 $ P******************************** = @ $ P* C W T R T 6 * = h $ P******************************** = P* = : P* CHANNEL UNIT WORK TABLE FOR REMOTE CHANNEL NO. 2 = P* CON
0x32b280…32b414 (2, 266) Dummy {f00=0x00ff, f01=0x0190, f02=»UTPUT WORD = P DATA INTRT3 INTERRUPT TABLE > P INR A2,0,DWA7 INR > 6 P OTR A2,1,DWA7 OTR > P P CIO A2,1,DWA7 CIO-START > j " P DATA 0 RETRANSMISSION COUNTER > P DATA 0 QUEUE TERMINAL 1 > P DATA 0 QUEUE TERMINAL 2 > P* > P IFT ACKMUL=1
0x32b414…32b5a8 Dummy {f00=0x00ff, f01=0x0190, f02=»PRINTER TIMEOUT ACKUMULATOR > P XIF ? $ P IFT RECHAN=4 ? 0 P DATA 0 LAST OUTPUT DWT ? F P DATA 0 LAST OUTPUT WORD ? f P DATA INTRT3 INTERRUPT TABLE ? P INR A2,0,DWA7 INR ? P OTR A2,1,DWA7 OTR ? P CIO A2,1,DWA7 CIO-START ? " P DATA 0 RE
0x32b5a8…32b73c Dummy {f00=0x00ff, f01=0x018e, f02=»ACKUMULATOR ? $ P DATA 0 BLOCK ERROR ACKUMULATOR @ , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR @ < ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR @ l P XIF @ P* @ P IFT RECHAN=3 @ P DATA 0 TIMER POINTER @ P DATA /7255 SYNC-CHARACTER @ 0 P DAT
0x32b73c…32b8d0 Dummy {f00=0x00ff, f01=0x0190, f02=» @ l & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 A , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) A 2 $ P DATA 0 BLOCK SENDING INDICATOR A b P* A P XIF A P* A P IFT RECHAN=4 A P* A P DATA 0 TIMER POINTER A P DATA /7255 SYNC-CHARACTER A 0
0x32b8d0…32ba64 Dummy {f00=0x00ff, f01=0x0190, f02=»AL 1 A r & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 B , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) B 6 $ P DATA 0 BLOCK SENDING INDICATOR B f P* B P XIF B P* B P EJECT B $ P******************************** B $ P* C W T R T 7 * B
0x32ba64…32bbf8 Dummy {f00=0x00ff, f01=0x0190, f02=»URTH CHRT B | P* C PCWTRT7 EQU * C P* C 0 P IFT RECHAN=4 C : P* C P PDWA8 EQU /31 DEVICE ADDRESS C Z P* C ~ P DATA 0 LAST OUTPUT DWT C P DATA 0 LAST OUTPUT WORD C P DATA INTRT4 INTERRUPT TABLE C P INR A2,0,DWA8 INR C P O
0x32bbf8…32bd8c Dummy {f00=0x00ff, f01=0x0190, f02=»EUE TERMINAL 2 C P* D P IFT ACKMUL=1 D P DATA 0 NAK-ACKUMULATOR D 6 $ P DATA 0 BLOCK ERROR ACKUMULATOR D V , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR D ~ ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR D P* D P XIF D P IFT RECHAN=4 D P D
0x32bd8c…32bf20 Dummy {f00=0x00ff, f01=0x0190, f02=»RC-PROCESS TERMINAL 2 D z & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 E & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 E H , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) E r $ P DATA 0 BLOCK SENDING INDICATOR E P XIF E P EJECT E $ P******************************** E
0x32bf20…32c0b4 (2, 267) Dummy {f00=0x00ff, f01=0x018e, f02=»ANNEL NO. 2 E f " P* CONNECTED TO FOURTH CHRT F P* F : PCWTRT8 EQU * F D P* F X P IFT RECHAN=4 F b P DATA 0 LAST OUTPUT DWT F x P DATA 0 LAST OUTPUT WORD F P DATA INTRT4 INTERRUPT TABLE F P INR A2,0,DWA8 INR F P OTR A2,1,DWA8 OTR
0x32c0b4…32c248 Dummy {f00=0x00ff, f01=0x0190, f02=» F v P* G P IFT ACKMUL=1 G P DATA 0 NAK-ACKUMULATOR G ( $ P DATA 0 BLOCK ERROR ACKUMULATOR G H , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR G p ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR G P XIF G P IFT RECHAN=4 G P* G P DATA 0 TIMER PO
0x32c248…32c3dc Dummy {f00=0x00ff, f01=0x0190, f02=»MINAL 2 G l & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 H & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 H : , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) H d $ P DATA 0 BLOCK SENDING INDICATOR H P* H P XIF H P* H P EJECT H 6 P******************************
0x32c3dc…32c570 Dummy {f00=0x00ff, f01=0x0190, f02=» H ^ P* I 6 P* THIS TABLE HOLDS ADDRESSES OF CONTROLLER WORK I 8 P* TABLES CWT TO CHANNEL UNITS FOR LOCAL OR REMOTE I L P* TERMINALS. I P* I P* I P* I PCHTAB EQU * I P DATA CHTABE-* TABLE LENGTH I P IFT LOCHAN=1 I
0x32c570…32c704 Dummy {f00=0x00ff, f01=0x0190, f02=» DATA CWTLT2 I P DATA 0 J P DATA 0 J $ P XIF J 4 P* J @ P IFT LOCHAN=3 J J P DATA CWTLT1 J ` P DATA CWTLT2 J t P DATA CWTLT3 J P DATA 0 J P XIF J P IFT LOCHAN=4 J P DATA CWTLT1 J P DATA CWTLT2 J P DATA CWTLT3 J
0x32c704…32c898 Dummy {f00=0x00ff, f01=0x0190, f02=» DATA CWTRT4 J P DATA CWTRT5 K P DATA CWTRT6 K ( P* K < P XIF K F P* K R P IFT RECHAN=2 K P DATA CWTRT3 K r P DATA CWTRT4 K P XIF K P* K P IFT RECHAN=4 K P DATA CWTRT3 K P DATA CWTRT4 K P DATA CWTRT5 K P DATA
0x32c898…32ca2c Dummy {f00=0x00ff, f01=0x0190, f02=» K P* L ( P************************************ L ( P* D W R E M U * L > ( P************************************ L j P* L . P* DUMMY TABLE USED WHEN LOOP-TESTING OF L $ P* REMOTE CHANNELS ARE NEEDED. L P* L PDWRE
0x32ca2c…32cbc0 Dummy {f00=0x00ff, f01=0x0190, f02=» P EJECT M P* M P* M * P* L O O P - T E S T S E C T I O N M & P* M T P* M ^ 2 P* ORDER /00: TEST REMOTE CHANNEL CONNECTION M h P* M : P* CHANNEL TO TEST IS GIVEN IN CONTROL WORD OF ECB. M 6 P* THE REQUEST IS COMPLETED WITH
0x32cbc0…32cd54 (2, 268) Dummy {f00=0x0100, f01=0x0190, f02=» M . P* BIT 14: ACK NOT RECEIVED AFTER OUTPUT N P* N : 0 P* BIT 15: SYNC NOT RECEIVED AFTER OUTPUT N D PAREM DATA LOPTST N x " P DATA 0 ABORT ROUTINE ADDRESS N " P DATA IHLOP INTERRUPT HANDLER N PLOPTST EQU * N $ P LD A2,10,A8 GET CHANNEL
0x32cd54…32cee8 Dummy {f00=0x0100, f01=0x0190, f02=» N & P LD A2,CHTAB+8,A2 GET CWT-ADDRESS O P RF(E) DISIIE O 2 P LDR A7,A7 WRONG ORDER ? O H P RF(E) LOPT10 NO O h ( PDISIIE ABL DISIOE I/O REQUEST ERROR O PLOPT10 EQU * O , P LD A1,CWTRST,A2 GET CHANNEL LOOP STATUS O P ANK A1,/40 O ( P RF(
0x32cee8…32d07c Dummy {f00=0x0100, f01=0x0190, f02=»SP O P EJECT P P* P P* P " P* END OF LOOP-TEST P , P* P J PIHLOP EQU * P T P LDR A5,A1 GET CWT-ADDRESS P h , P LD A1,CWTRST,A5 GET CHANNEL LOOP STATUS P P ANK A1,3 P P XRK A1,3 P PIHLP10 EQU * P P LDK A2,0 P : P SC
0x32d07c…32d210 Dummy {f00=0x0100, f01=0x0190, f02=» 2 P x P* Q P* C H R T 1 / C H R T 2 Q P* Q 6 8 P* THIS IS THE INTERRUPT HANDLER FOR CHLT AND CHRT Q @ P* Q | 2 P* WHEN INTERRUPT FROM A CHANNEL UNIT OCCURS Q 2 P* DRIVER FIRST RELATES INTERRUPT TO A CWT. Q 0 P* THEN DRIVER GETS
0x32d210…32d3a4 Dummy {f00=0x0100, f01=0x0190, f02=»* INTERRUPT. Q P* R 2 P* FOLLOWING TYPES OF INTERRUPT ARE RELEVANT R " P* R X . P* D = DEVICE ADDRESS C = CHARACTER R b P* R 8 P* ACK OUTPUT ACKNOWLEDGED D = 0 C = 7 R 8 P* NAK OUTPUT ERROR D = 0
0x32d3a4…32d538 Dummy {f00=0x0100, f01=0x0190, f02=» DRI DATA REQUEST IMMEDIATE SIGN BIT SET R 8 P* ABC+ BLOCK TR. ACKNOWLEDGED D = 0 C = 8 S : 8 P* ABC-L LRC ERROR IN BLOCK D = 0 C = A S v 8 P* ABC-V VRC ERROR IN BLOCK D = 0 C = C S 8 P* ABC-LV LRC O VRC E
0x32d538…32d6cc Dummy {f00=0x0100, f01=0x018e, f02=» BE DIFFERENT FROM ZERO S f 8 P* STD STATUS MESSAGE D # 0 C # 0 T 2 P* DIN DATA INPUT D # 0 T P EJECT T P* T P* C H L T 1 T P* T P* INTERRUPT FROM CHLT1 T P* T PCHLT1 EQU * T
0x32d6cc…32d860 Dummy {f00=0x0100, f01=0x0190, f02=» P* U P IFT CPU852=0 U " P MSR 8,A15 SAVE A1-A8 ON STACK U $ P XIF U J P* U V P LDK A7,2 INDICATE CHLT1 U ` P RF CLT010 U P* U PCHLT2 EQU * U P* U P* U P* U P* U P* C H L T 2 U P* U P* INTERRUPT F
0x32d860…32d9f4 (2, 269) Dummy {f00=0x0100, f01=0x018e, f02=»SAVE A1-A8 ON STACK U P XIF V P* V ( P IFT LOCHAN=2 V 2 P IFT CPU852=0 V H " P MSR 8,A15 SAVE A1-A8 ON STACK V ^ P XIF V P* V P IFT LOCHAN=2 V P LDK A7,4 INDICATE CHLT2 V P RF CLT010 V P* V P XIF V P* V P IFT L
0x32d9f4…32db88 Dummy {f00=0x0100, f01=0x018e, f02=» V P* W P IFT LOCHAN=3 W P IFT CPU852=0 W ( " P MSR 8,A15 SAVE A1-A8 ON STACK W > P XIF W d P* W p P IFT LOCHAN=3 W z P LDK A7,4 INDICATE CHLT2 W P RF CLT010 W P* W P XIF W P* W P IFT LOCHAN=4 W $ P ST P,INTSAV SAV
0x32db88…32dd1c Dummy {f00=0x0100, f01=0x0190, f02=» W P IFT CPU852=0 X " P MSR 8,A15 SAVE A1-A8 ON STACK X P XIF X D P* X P P IFT LOCHAN=4 X Z P LDK A7,4 INDICATE CHLT2 X p P RF CLT010 X P* X P XIF X P* X PCHLT3 EQU * X P* X P* X P* X P* C H L T 3 X
0x32dd1c…32deb0 Dummy {f00=0x0100, f01=0x0190, f02=»852=1 X & P CF A15,SAVE8 SAVE A1-A8 ON STACK Y P XIF Y 8 P* Y D P IFT LOCHAN=4 Y N P IFT CPU852=0 Y d " P MSR 8,A15 SAVE A1-A8 ON STACK Y z P XIF Y P* Y P IFT LOCHAN=4 Y P LDK A7,6 INDICATE CHLT3 Y P RF CLT010 Y P XIF Y
0x32deb0…32e044 Dummy {f00=0x0100, f01=0x0190, f02=»1-A8 ON STACK Y | P XIF Z P* Z " P IFT LOCHAN=3 Z , P IFT CPU852=0 Z B " P MSR 8,A15 SAVE A1-A8 ON STACK Z X P XIF Z ~ P* Z P IFT LOCHAN=3 Z P LDK A7,6 INDICATE CHLT3 Z P RF CLT010 Z P* Z P XIF Z P* Z PCHLT4 EQU *
0x32e044…32e1d8 Dummy {f00=0x0100, f01=0x0190, f02=» ST P,INTSAV SAVE LAST INTERRUPT Z P* [ ( P IFT CPU852=1 [ 2 & P CF A15,SAVE8 SAVE A1-A8 ON STACK [ H P XIF [ r P* [ ~ P IFT LOCHAN=4 [ P IFT CPU852=0 [ " P MSR 8,A15 SAVE A1-A8 ON STACK [ P XIF [ P* [ P IFT LOCHAN=4 [ P L
0x32e1d8…32e36c Dummy {f00=0x0100, f01=0x0190, f02=»* INTERRUPT FROM CHRT1 [ P* " PCHRT1 EQU * , P ST P,INTSAV @ P* T P IFT CPU852=1 ^ & P CF A15,SAVE8 SAVE A1-A8 ON STACK t P XIF P* P IFT CPU852=0 " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P* P L
0x32e36c…32e500 Dummy {f00=0x0100, f01=0x0190, f02=»CHRT2 EQU * P IFT RECHAN=2 ] $ P ST P,INTSAV SAVE LAST INTERRUPT ] * P* ] R P IFT CPU852=1 ] & P CF A15,SAVE8 SAVE A1-A8 ON STACK ] r P XIF ] P* ] P IFT RECHAN=2 ] P IFT CPU852=0 ] " P MSR 8,A15 SAVE A1-A8 ON STACK ] P XIF
0x32e500…32e694 (2, 270) Dummy {f00=0x0100, f01=0x0190, f02=» ST P,INTSAV STORE LAST INTERRUPT ] P* ^ * P IFT CPU852=1 ^ 4 & P CF A15,SAVE8 SAVE A1-A8 ON STACK ^ J P XIF ^ t P* ^ P IFT RECHAN=3 ^ P IFT CPU852=0 ^ " P MSR 8,A15 SAVE A1-A8 ON STACK ^ P XIF ^ P* ^ P IFT RECHAN=3 ^ P
0x32e694…32e828 Dummy {f00=0x0100, f01=0x018e, f02=»* ^ P IFT CPU852=1 _ & P CF A15,SAVE8 SAVE A1-A8 ON STACK _ P XIF _ J P* _ V P IFT RECHAN=4 _ ` P IFT CPU852=0 _ v " P MSR 8,A15 SAVE A1-A8 ON STACK _ P XIF _ P* _ P IFT RECHAN=4 _ P LDK A7,14 INDICATE CHRT2 _ P RF CLT0
0x32e828…32e9bc Dummy {f00=0x0100, f01=0x0190, f02=» P IFT RECHAN=3 ` $ P ST P,INTSAV SAVE LAST INTERRUPT ` P* ` B P IFT CPU852=1 ` L & P CF A15,SAVE8 SAVE A1-A8 ON STACK ` b P XIF ` P* ` P IFT RECHAN=3 ` P IFT CPU852=0 ` " P MSR 8,A15 SAVE A1-A8 ON STACK ` P XIF ` P* `
0x32e9bc…32eb50 Dummy {f00=0x0100, f01=0x018e, f02=»E LAST INTERRUPT ` P* a P IFT CPU852=1 a " & P CF A15,SAVE8 SAVE A1-A8 ON STACK a 8 P XIF a b P* a n P IFT RECHAN=4 a x P IFT CPU852=0 a " P MSR 8,A15 SAVE A1-A8 ON STACK a P XIF a P* a P IFT RECHAN=4 a P LDK A7,18 INDICAT
0x32eb50…32ece4 Dummy {f00=0x0100, f01=0x0190, f02=» a PCHRT4 EQU * b P IFT RECHAN=4 b $ P ST P,INTSAV SAVE LAST INTERRUPT b 2 P* b Z P IFT CPU852=1 b d & P CF A15,SAVE8 SAVE A1-A8 ON STACK b z P XIF b P* b P IFT RECHAN=4 b P IFT CPU852=0 b " P MSR 8,A15 SAVE A1-A8 ON STACK b
0x32ece4…32ee78 Dummy {f00=0x0100, f01=0x0190, f02=»DRESS b p P* c P XIF c P* c $ * P EX CWTINR,A5 EXECUTE INR-INSTRUCTION c . P* c P IFT LOGING=1 c f P* c | 4 PCLT012 CF A15,LOGG ** LOGG OF INPUT CHARACTER ** c P* c P XIF c P EJECT c P* c & P* DETERMINE TYPE OF INTER
0x32ee78…32f00c Dummy {f00=0x0100, f01=0x0190, f02=»UK A7,10 c " P RF(N) CLT018 LOCAL INTERRUPT d P LDR A3,A2 d 6 . P SLC A3,6 REMOTE FIRST OR SECOND CHANNEL ? d H P RF(NN) CLT015 FIRST d z > P LD A5,CHTAB+12,A7 GET CWT-ADDRESS SECOND CHANNEL OF CHRT d 4 PCLT015 CF A15,RESTSY START OR RESTART SYNC-TIMER
0x32f00c…32f1a0 Dummy {f00=0x0100, f01=0x0190, f02=»(N) CLT170 YES d & PCLT018 LDK A1,0 RESET RETURN CODE e ( P LDR A3,A2 DATA REQUEST IMMEDIATE ? e @ P RF(N) CLT050 e l $ P ANKL A3,/7000 DEVICE ADDRESS ? e ( P ABL(NE) CLT100 YES, DIN, STD OR DRD e P EJECT e P* e P* e , P* DETERMINE T
0x32f1a0…32f334 (2, 271) Dummy {f00=0x0100, f01=0x018e, f02=» SUK A3,7 e P RF(E) CLT050 ACK f P ADK A3,2 f , P ABL(E) CLT080 NAK f > P ADK A3,2 f X P ABL(E) CLT100 POWER ON f j P LDR A7,A7 LOCAL ? f P RF(N) CLTQUE YES f P LC A4,LRCACK,A7 f $ P LDK A6,/80 ABC-ANSWER ALLOWED ? f P TM A6,A4
0x32f334…32f4c8 Dummy {f00=0x0100, f01=0x0190, f02=» P RF(E) EXIIT g P ANK A4,/7F g P RF(Z) CLT046 YES g , * P CM LRCDWT,A7 RESET LRC-DEVICE POINTER g F ( P LDK A4,1 RESET BLOCKSENDING RUNNING g t P ANS A4,CWTBLK,A5 g P SUK A3,5 g & P RF(E) CLT043 ABC+ , GO TO DRIVER g P IFT ACKMUL=1 g
0x32f4c8…32f65c Dummy {f00=0x0100, f01=0x0190, f02=» P LDK A4,1 h P SUK A3,2 h P RF(E) CLT033 h ( P ADK A3,4 h > P RF(E) CLT033 h P P EJECT h f P* h t 0 P* RESOLVE QUEUE AND EXAMINE RECOVERY BIT. h ~ . P* ONE RECOVERY ATTEMPT IS MADE AND THEN h , P* RETURN CODE NOT OPERABLE IS SEN
0x32f65c…32f7f0 Dummy {f00=0x0100, f01=0x0190, f02=»C-DEVICE ? h P RF(NE) CLTQUE i * P CM LRCDWT,A7 RESET LRC-DEVICE POINTER i ( P LDK A4,1 i V 2 P ANS A4,CWTBLK,A5 RESET BLOCKSENDING RUNNNING i h & PCLTQUE CF A15,QUEUE RESOLVE QUEUE i 6 PCLT031 LC A2,DWTST,A6 GET LEFT BYTE OF STATUS WORD i P LDR A
0x32f7f0…32f984 Dummy {f00=0x0100, f01=0x0190, f02=»,A6 STORE i PCLT032 LDK A4,0 j 0 PCLT033 LDK A3,2 INDICATE RECOVERY OF DEVICE j * P LDK A4,1 =3 j ^ P RF CPO025 j t P EJECT j P* j P* ABC- VRC-ERROR j P* j 8 P* IF BLOCKSENDING SAME PROCEDURE AS FOR THE OTHER j P* ERR
0x32f984…32fb18 Dummy {f00=0x0100, f01=0x0190, f02=»DR* A4,A6 BLOCK SENDING ? j P RB(N) CLT031 k " PCLT043 ABL CLT107 k 8 P EJECT k R P* k ` P* POWER ON k j P* k 8 P* RECOVERY ROUTINES ARE STARTED FOR EVERY DEVICE k < P* ON ACTUAL LINE EXCEPT THOSE OCCUPYING CHANNEL UNIT k P*
0x32fb18…32fcac Dummy {f00=0x0100, f01=0x0190, f02=»T-ADDRESS k P* l PCHPOWO EQU * l , P LDR* A2,A5 GET CHANNEL OCCUPYING DEVICE l 0 . P CM CWTRTC,A5 RESET RETRANSMISSION COUNTER l ` P LDR A7,A7 REMOTE ? l P RF(N) CPO010 NO l * P CM LRCDWT,A7 RESET LRC-DEVICE POINTER l P LDK A7,1 l 0 P A
0x32fcac…32fe40 Dummy {f00=0x0100, f01=0x018e, f02=»NTER l v PCPO020 ADK A1,2 m P LDR* A6,A1 GET DWT-ADDRESS m $ P RF(E) CPO030 m H P SRC A6,1 m ^ P RF(N) CPO030 m p P SLC A6,1 m ( P LCR A7,A6 GET LEFT OF CHANNEL PAR. m P ANK A7,1 INPUT DEVICE ? m P RF(NE) CPO025 YES m & P LDKL A7,/
0x32fe40…32ffd4 (2, 272) Dummy {f00=0x0101, f01=0x0190, f02=» 0 P CWR A6,A2 DEVICE WAITING FOR CHANNEL ANSWER n P RF(E) CPO030 YES n 8 : PCPO025 LD A7,DWTADR,A6 ADDRESS TO ADDRESS-BLOCK IN A7 n R 6 P LD A7,RECADR,A7 ADDRESS TO RECOVERY ROUTINE IN A7 n P RF(E) CPO030 n P LDKL A5,DWTSB2 STACK BASE n P ADR A
0x32ffd4…330168 Dummy {f00=0x0101, f01=0x0190, f02=»EXT n x PEXIIT RF EXIT o P EJECT o " P* o 0 6 P* INDICATE NOT OPERABLE BEFORE GOING TO DRIVER o : P* o t PCLT045 EQU * o ~ ( P LDK A1,NOERR INDICATE NOT OPERABLE o PCLT046 EQU * o P ABL CLT110 o P EJECT o P* o P* A C K
0x330168…3302fc Dummy {f00=0x0101, f01=0x0190, f02=»OR AND GO TO DISPATCHER. IF SYNC-ACK o P* DROP IT. p , 8 P* NORMAL ACK OR DRI WILL RESULT IN A RESETTING OF p B 8 P* RECOVERY BIT IN DWT. THEN A SIMULATION OF DATA p ~ < P* REQUEST FOR DEVICES WITHOUT DATA REQUEST IS CARRIED p < P* OUT. FOR
0x3302fc…330490 Dummy {f00=0x0101, f01=0x018e, f02=»MADE TO THE DATA REQUEST SECTION. p x * P* IF ACK WE HAVE TO WAIT FOR A DRD. q * PCLT050 EQU * q X & P LC A3,CWTLOW,A5 LAST OUTPUT WORD q l " P ANK A3,/F0 KEEP DEVICE NUMBER q P CF A15,QUEUE RESOLVE QUEUE q P LDKL A4,/EFFF q 6 P ANS A4,DWTST,A6 R
0x330490…330624 Dummy {f00=0x0101, f01=0x018e, f02=» q z P RF(NE) CLT052 r P LDKL A3,/8000 r * P ORS A3,LRCACK,A7 INDICATE ABC ALLOWED r 4 P RF CLT055 r b PCLT052 EQU * r t . P LDR* A3,A6 DEVICE WITHOUT DATA REQUEST ? r P RF(NN) CLT055 r P CW A6,LRCDWT,A7 r P ABL(NE) CLT110 r P EJECT r
0x330624…3307b8 Dummy {f00=0x0101, f01=0x0190, f02=» r h P RF(E) CLT060 s P* s P* RESTART TIMER s ( P* s B " P LDKL A3,-DRQTIM RESTART TIMER s L P ST* A3,DWTTP,A6 s r P RF CLT068 s P* s P* START TIMER s P* s PCLT060 EQU * s P LDR A1,A6 PARAMETER s P LDKL A4,DWTTP T
0x3307b8…33094c Dummy {f00=0x0101, f01=0x0190, f02=»INE AND DELAY s d PCLT068 EQU * t P LDR A8,A8 OBC-ACK ? t * P RF(E) EXIT YES t F P LDK A1,0 t ^ & P LDR* A4,A6 GET CHANNEL PARAMETER t p . P RF(N) CLT110 DEVICE WITHOUT DATA REQUEST t ( P LDR A2,A2 DATA REQUEST IMMEDIATE ? t P RF(N) CLT125 YE
0x33094c…330ae0 Dummy {f00=0x0101, f01=0x0190, f02=» FROM PRINTERS AND , FOR REMOTLY CONNECTED DEVICES t 8 P* USING THE LRC-FUNCTION , MISSING BLOCK CONTROL u : . P* CHARACTERS (ABC) FROM SELECTOR UNIT. u v P* u PDRQTUT EQU * u P LDR A6,A1 GET DWT-ADDRESS u . P CM DWTTP,A6 RESET POINTER TO TI
0x330ae0…330c74 (2, 273) Dummy {f00=0x0101, f01=0x018e, f02=»L PARAMETER u ~ P ANK A5,/F v P SLL A5,1 2 * INDEX v & P LDK A2,/83 v B P CC A2,DWTOCH,A6 v V P RF(NE) DRQT10 v n P SUK A5,8 LOCAL DEVICE ? =4 v P RB(N) EXIT v P CF A15,OUTLIN v P RB EXIT v PDRQT10 EQU * v P* v P IFT ACK
0x330c74…330e08 Dummy {f00=0x0101, f01=0x0190, f02=» v $ P LD A7,DWTOR,A6 TEST ORDER ? =1 w P ANK A7,/FE U =9(=1) w 0 2 P RB(E) CLT045 YES, GO TO DEV. INT. HANDLER =1 w L , P ABL CLT032 NO, EXECUTE DEV. RECOVERY =1 w P EJECT w P* w P* N A K w P* w 8 P* ERROR ACKUMULATOR AND RETRANS
0x330e08…330f9c Dummy {f00=0x0101, f01=0x0190, f02=»UCCESS w ^ < P* RETURN CODE NOT OPERABLE IS SENT TO DEVICE DRIVER. x P* x N PCLT080 EQU * x X $ P LDR* A6,A5 GET LAST OUTPUT DWT x l P RB(E) EXIT x P* x P IFT ACKMUL=1 x P* x * P IM CWTADD,A5 UPDATE ERROR ACKUMULATOR x P* x
0x330f9c…331130 Dummy {f00=0x0101, f01=0x0190, f02=» LD A4,CWTRTC,A5 GET COUNTER x P SUK A4,7 SEVEN TIMES ? y $ P ABL(E) CLT030 y D * P LD A2,CWTLOW,A5 GET LAST OUTPUT WORD y Z $ P EX CWTOTR,A5 EXECUTE OTR-INSTR. y P IFT LOGING=1 y 2 P CF A15,LOGG ** LOGG INPUT CHARACTER ** y P XIF y P
0x331130…3312c4 Dummy {f00=0x0101, f01=0x018e, f02=» A2,/FF y , P XRS A2,LRCACK,A7 UPDATE LRC-ACKUMULATOR z . P CF A15,RESTSY START OR RESTART SYNC-TIMER z @ PCLT090 ABL TDISP z r P EJECT z P* z P* z $ P* DATA INPUT AND DATA REQUEST z P* z 6 P* LOCAL DEVICES: GET DWT-ADDRESS, GET O
0x3312c4…331458 Dummy {f00=0x0101, f01=0x0190, f02=» P* { > P* DATA INPUT: SAME PROCEDURE AS FOR LOCAL DEVICES { : P* DATA REQUEST: INPUT WORD IS COMPLEMENTED WITH { P 8 P* STATUS FROM CHANNEL PARAMETER. { : P* STATUS MESSAGE: NEW STATUS IS STORED IN CHANNEL { @ P
0x331458…3315ec Dummy {f00=0x0101, f01=0x0190, f02=» WAITING FOR A STATUS CHANGE. IF SO { > P* GET ORDER AND ECB-ADDRESS AND GO TO | < < P* DEVICE WITH THE NEW STATUS. IF NO | ~ > P* WAITING FOR STATUS, CONTROL IS GIVEN | ( P*
0x3315ec…331780 Dummy {f00=0x0101, f01=0x0190, f02=»3,/E 2 * LINE NUMBER | P SRL A4,3 } P ANK A4,/E 2 * DEVICE NUMBER } . P CWK A4,/E SYNC-INPUT ? } R P RF(E) CLT150 YES } r P LOOP SWITCH SET } 0 P LD* A8,CWTITA,A5 ADDRESS TO INTERRUPT TABLE } P RB(Z) EXIT =7 } P ADR A8,A3 } , P LDR
0x331780…331914 (2, 274) Dummy {f00=0x0101, f01=0x0190, f02=»T UNDEFINED INTERRUPT } " P LDR A4,A4 NO DEVICE NUMBER ? ~ P ABL(E) CHPOWO POWER ON ~ D & P ADR A8,A4 ADDRESS TO DWT-ADDRESS ~ d P LDR* A6,A8 GET DWT-ADDRESS ~ P RB(E) EXIT ~ P ANKL A6,/FFFE ~ 2 P LCR A3,A6 GET FIRST BYTE IN CHANNEL PARAMET
0x331914…331aa8 Dummy {f00=0x0101, f01=0x0190, f02=»A7 REMOTE ? ~ P RF(NN) CLT120 YES PCLT105 LC A3,DWTOCH,A6 . P ANK A3,/7F L P SUK A3,DUMMSP ` P RF(NE) CLT110 v . P LDR* A3,A6 DEVICE WITHOUT DATA REQUEST =9 4 P RF(N) CLT110 YES, DO NOT TOUCH TIMER POINTER =9 P* P********
0x331aa8…331c3c Dummy {f00=0x0101, f01=0x0190, f02=»Y RESET v P* P************************* P* < P CM* DWTTP,A6 F P CM DWTTP,A6 PCLT110 LD A7,DWTOR,A6 ORDER p P ANK A7,/FF P LD A8,DWTECB,A6 ECB-ADDRESS , P LD A3,DWTADR,A6 ADDRESS TO ADDRESSBLOCK P ENB * P
0x331c3c…331dd0 Dummy {f00=0x0101, f01=0x0190, f02=» $ P CWR* A6,A5 DRD BEFORE ANSWER ? P RB(E) EXIT YES 0 PCLT125 SRL A4,4 H P ANK A4,/C ` P ORR A2,A4 STATUS IN A2 r P RB CLT105 PCLT130 EQU * P LDR A3,A4 SAVE OLD STATUS P ANK A4,/3F RESET OLD STATUS P SLL A2,4
0x331dd0…331f64 Dummy {f00=0x0101, f01=0x0190, f02=»A4,/200 STATUS CHANGE ALLOWED ? P RF(E) CLT154 EG. EXIT ( P XRS A4,DWTST,A6 RESET BIT F ( P XRR A3,A2 VOUCHER STATUS CHANGED ? h P ANK A3,/80 P RF(E) CLT154 EG. EXIT P ABL CLT033 P EJECT P* P* P* TFU IN
0x331f64…3320f8 Dummy {f00=0x0101, f01=0x0190, f02=»NDICATE LOOP MODE AND SYNC-ACK RECEIVED PCLT152 EQU * 0 P ORS A4,CWTRST,A5 D PCLT154 ABL EXIT ^ P EJECT v P* P* LOOP MODE P* PCLT170 EQU * P LDR A3,A2 P ANK A3,/FF P SUK A3,3 POWER ON ? P RF(
0x3320f8…33228c Dummy {f00=0x0101, f01=0x018e, f02=» A1,NOERR INDICATE NOT OPERABLE PCLT177 RB CLT110 ( PCLT178 EQU * @ P SUK A3,4 ACK ? T P RF(NE) EXITA NO l $ P LDK A4,2 INDICATE ACK RECEIVED P RB CLT152 P EJECT P* P* POWER ON P* PCLT179 EQU *
0x33228c…332420 Dummy {f00=0x0101, f01=0x018e, f02=» 2 P* GET LAST OUTPUT DWT AND SET CHANNEL FREE. 4 P* IF LOCAL DEVICE CHECK OUTPUT QUEUE AND SEND : P* IF SOMETHING THERE. r 8 P* IF REMOTE DEVICE CHECK QUEUE OF CHANNEL'S OTHER < P* TERMINAL AND SEND IF SOMETHING THERE. IF NOTHING I
0x332420…3325b4 (2, 275) Dummy {f00=0x0101, f01=0x0190, f02=» P STR A2,A15 SAVE A2 $ P LDR* A4,A5 GET LAST OUTPUT DWT $ . P CM CWTRTC,A5 RESET RETRANSMISSION COUNTER L P CMR A5 SET CHANNEL FREE ~ P LDK A1,0 P LDR A7,A7 LOCAL ? P RF(N) QUEU01 YES " P LDK A1,1 INDICATE FIRST TRIAL "
0x3325b4…332748 Dummy {f00=0x0101, f01=0x0190, f02=»WT-TABLE-ADDRESS z PQUEU04 EQU * P LDR* A6,A8 QUEUE EMPTY ? , P RF(E) QUEU10 YES N P LDR A7,A7 =5 h $ P RF(N) QUEU06 PREVENT HANG UP =5 ~ P LD A2,CWTBLK,A5 P LD A2,CWTBLK,A5 ( P RF(N) QUEU05 BLOCK SENDING RUNNING PQUEU06
0x332748…3328dc Dummy {f00=0x0101, f01=0x0190, f02=»OUTPUT CHARACTER v P CF A15,OUTLIN SEND IT PQUEU05 LDR* A2,A15 RELOAD A2 6 0 P CWR A6,A4 DEVICE ALREADY IN OUTPUT QUEUE ? Z P RF(E) QUEU30 " P LDR A6,A4 GET LAST OUTPUT DWT & P RF(E) QUEU30 UNDEFINED INTERRUPT P CWK A6,1 SYNC ANSWE
0x3328dc…332a70 Dummy {f00=0x0101, f01=0x0190, f02=»1,0 " P CWR A7,A5 TERMINAL 2 REMOTE ? P RB(E) QUEU01 NO 2 & PQUEU20 LDKL A8,CWTEQ+2 NEXT QUEUE J P RB QUEU03 t PQUEU30 ADKL A15,4 P RF EXITA P EJECT P* P* 0 P* RESTSY = SUBROUTINE TO START OR RESTART * P
0x332a70…332c04 Dummy {f00=0x0101, f01=0x0190, f02=» P RF(NE) RESY20 P LDR A1,A5 P LDK A4,CWTTP TIMER POINTER , P ADR A4,A5 ADD CWT-ADDRESS P P CF A15,SETIMP SET TIMER r P DATA SYNCUT,TIME P RF RESY30 PRESY20 LDKL A4,-TIME " P ST* A4,CWTTP,A5 RESTART TIME PRESY30 L
0x332c04…332d98 Dummy {f00=0x0101, f01=0x0190, f02=»DING n 0 P* IF NOTHING HAPPENS ON A LINE IN 500 MS P* SYNC-CHARACTER IS SENT. @ P* d PSYNCUT EQU * n $ P CM CWTTP,A1 RESET TIMER POINTER P LDR A5,A1 ( P LD A2,CWSYNC,A1 GET SYNC CHARACTER ( P XRKL A2,/800 CHANGE TERMINAL NU
0x332d98…332f2c Dummy {f00=0x0101, f01=0x0190, f02=» OUTPUT DWT t P* P IFT LOGING=1 P* 4 * P CF A15,LOGG LOGG OF OUTPUT CHARACTER > P XIF l P* x P LDR A3,A2 P SLL A3,4 P RF(NN) SYNC05 P ADK A5,2 PSYNC05 EQU * P ANK A2,/FF , P XRS A2,LRCACK,A5
0x332f2c…3330c0 Dummy {f00=0x0101, f01=0x0190, f02=»/60 P RF(E) SYNC20 THIRD SYNC P SUK A3,/20 , P RF(NE) SYNC10 FIRST SYNC @ P LDK A3,/20 SECOND SYNC b * PSYNC10 XRS A3,CWTRST,A1 CHANGE COUNTER PEXITA ABL TDISP DISPATCH * PSYNC20 LDKL A6,DWREMU SET DWT-ADDRESS P RB CLT177
0x3330c0…333254 (2, 276) Dummy {f00=0x0102, f01=0x018e, f02=»LOWED AND SAVE A3-A5 IN DWT. P* $ POUTPUT EQU * . P ANK A2,/FF B P LDR A1,A2 V P SUK A1,/82 STX ? h P RF(E) OUTP05 P SUK A1,/15 ETB ? P RF(NE) OUTP10 ( POUTP05 LDR* A1,A6 CHANNEL PARAMETER P ANK A1,/C REMOTE ?
0x333254…3333e8 Dummy {f00=0x0102, f01=0x0190, f02=» P* : P* INDICATE INTERRUPTS ALLOWED AND SAVE A3-A5 IN DWT P* P PSTREG EQU * Z P INH n P LDKL A1,/100 z 0 P ORS A1,DWTST,A6 INDICATE INTERRUPTS ALLOWED $ P ST A3,DWTA3,A6 SAVE REGISTER A3 $ P ST A4,DWTA4,A6
0x3333e8…33357c Dummy {f00=0x0102, f01=0x018e, f02=»NTERRUPT ALLOWED RESTORE A3-A5 FROM DWT AND RETURN & P* VIA A5. ELSE GO TO DISPATCHER. : P* d P* n PLDREG EQU * x P LD A3,DWTST,A6 P ANKL A3,/100 P RB(Z) EXITA P XRS A3,DWTST,A6 P* P* P* L D R E G
0x33357c…333710 Dummy {f00=0x0102, f01=0x018e, f02=» l PLDREGE EQU * & P LD A3,DWTA3,A6 RELOAD REGISTER A3 & P LD A4,DWTA4,A6 A4 F $ PLDRE10 LD A7,DWTOR,A6 GET ORDER p P ANK A7,/FF P LD A8,DWTECB,A6 P RTN A5 RETURN VIA A5-STACK P EJECT P* P*
0x333710…3338a4 Dummy {f00=0x0102, f01=0x0190, f02=» P* A3 = BUFFER INDEX P* A8 = ECB-ADDRESS " P* @ P* ON EXIT: J P* ` P* A2 = CHARACTER j * P* A1 = 0 IF LAST CHARACTER ELSE # 0 P* J P* IF LAST CHARACTER IS REACHED A3 IS STORED IN ECB EFFECTIVE LENGTH
0x3338a4…333a38 Dummy {f00=0x0102, f01=0x0190, f02=» j " P LD A2,2,A8 GET BUFFER ADDRESS P ADR A2,A3 . P LCR A2,A2 CHAR. TO A2 @ P ANK A2,/FF ^ $ P ADK A3,1 INCREMENT BUFFER INDEX r P RF GCH020 , PGCH010 ST A3,6,A8 STORE EFFECTIVE LENGTH PGCH020 EQU * ( PRTNA15 ADKL A15,2 RETURN
0x333a38…333bcc Dummy {f00=0x0102, f01=0x0190, f02=» ^ P* CHANNEL UNIT P* * P* 4 B P* GET CWT-ADDRESS AND IF CHANNEL UNIT FREE SEND CHARACTER. > 8 P* RUNNING LRC-PROCESS CAN STOP OUTPUT FROM OTHER 8 P* DEVICES ON SAME LINE. IF CHANNEL UNIT NOT FREE P* QUEUE O
0x333bcc…333d60 Dummy {f00=0x0102, f01=0x0190, f02=»PU852=0 " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF 6 P* B P ANK A2,/FF L " P LDR* A7,A6 CHANNEL PARAMETER ` P ANK A7,/F P SLL A7,1 DOUBLE INDEX & P LD A5,CHTAB+2,A7 GET CWT-ADDRESS P SUK A7,8 REMOTE ? P RF(N) OUL100
0x333d60…333ef4 (2, 277) Dummy {f00=0x0102, f01=0x0190, f02=»ET CWT-ADDRESS , P ADR A7,A3 TERMINAL ADJUSTED CWT-ADDRESS P EJECT F POUL100 INH T P* f ( P* IF UNIT NOT FREE QUEUE OUTPUT. p 2 P* IF REMOTE DEVICE AND LRC-PROCESS ALREADY 0 P* RUNNINGON TERMINAL FOR ANOTHER DEVICE, 0 P*
0x333ef4…334088 Dummy {f00=0x0102, f01=0x0190, f02=»NEL UNIT FREE ? P RF(NE) OUL800 NO P LDR A7,A7 REMOTE ? 2 P RF(N) OUL500 N P LDR A3,A2 d P SUK A3,/82 STX ? v P RF(NE) OUL200 NO P EJECT P* P* S T X P* * P LD A3,LRCDWT,A7 LRC-PROCESS RUNNING ?
0x334088…33421c Dummy {f00=0x0102, f01=0x0190, f02=» INDICATE FIRST OBC , POUL150 LDR* A3,A6 GET CHANNEL PARAMETER , P ANKL A3,/E00 SET DEVICE NUMBER TO ZERO N P RF OUL510 ~ & POUL175 CWR A3,A6 SAME LRC-DEVICE ? P RF(NE) OUL800 QUEUE OUTPUT P RF OUL350 POUL200 SUK A3,/15 ETB ?
0x33421c…3343b0 Dummy {f00=0x0102, f01=0x0190, f02=»RCACK+1,A7 GET LRC-ACKUMULATOR P RB OUL150 & P* 8 P* OTHER OUTPUT B P* 8 POUL300 CW A6,LRCDWT,A7 SAME DEVICE SENDING WITH LRC f P RF(Z) OUL350 YES P LD A3,CWTBLK,A5 , P RF(NN) OUL500 BLOCKSENDING NOT RUNNING * P RF
0x3343b0…334544 Dummy {f00=0x0102, f01=0x0190, f02=» P LD A3,CWTBLK,A5 P RF(Z) OUL500 ( P ORKL A2,/8000 INDICATE BLOCKSENDING 2 P LDK A3,/80 ^ 2 P SC A3,CWTBLK,A5 INDICATE BLOCKSENDING RUNNING r P EJECT P* P* & P* SEND CHARACTER SECTION. 2 P* CHARACTER
0x334544…3346d8 Dummy {f00=0x0102, f01=0x0190, f02=»ERS FOR f . P* DWT AND ACKUMULATOR IS UPDATED. P B POUL500 EQU * J " P LDR* A3,A6 CHANNEL PARAMETER ^ P ANKL A3,/7E00 & POUL510 ORR A2,A3 OUTPUT WORD IN A2 P* P* P* POUL515 EX CWTOTR,A5 OTR P RF(R)
0x3346d8…33486c Dummy {f00=0x0102, f01=0x0190, f02=»ESSBLOCK p . P ABI INTADR,A2 GO TO INTERRUPT HANDLER =8 POUL520 EQU * B P* V P IFT LOGING=1 ` P* v 0 P CF A15,LOGG ** LOGG OF OUTPUT CHARACTER ** P* P XIF P* P STR A6,A5 SET CHANNEL BUSY , P ST A2,CWTLOW,A5
0x33486c…334a00 Dummy {f00=0x0102, f01=0x018e, f02=»ULATOR n . P CF A15,RESTSY START OR RESTART SYNC-TIMER 4 POUL600 SC A2,DWTOCH,A6 SET LAST OUTPUT CHARACTER @ POUL700 EQU * x P IFT CPU852=1 ( P ABL IHRET8 RESTORE A1-A8 AND RETURN P XIF P* P IFT CPU852=0 * P MLR 8,A15 RES
0x334a00…334b94 (2, 278) Dummy {f00=0x0102, f01=0x0190, f02=» P EJECT P* : P* NORMALLY DWT-ADDRESS IS PUT LAST IN OUTPUT QUEUE P* Z POUL800 EQU * d P LDR A7,A7 REMOTE ? x P RF(NN) OUL805 YES P LDR A7,A5 CWT-ADDRESS , POUL805 LD A4,CWTEQ,A7 GET QUEUE POINTER P RF(E) OUL82
0x334b94…334d28 Dummy {f00=0x0102, f01=0x0190, f02=»LOW THE THREAD P RB OUL810 $ POUL820 ST A6,CWTEQ,A7 QUEUE DWT ( P RF OUL840 P $ POUL830 ST A6,DWTOTQ,A4 QUEUE DWT b P LDK A4,0 : POUL840 ST A4,DWTOTQ,A6 SET OR RESET OUTPUT QUEUE LINK P RB OUL600 P EJECT P* P*
0x334d28…334ebc Dummy {f00=0x0102, f01=0x0190, f02=»TINE IS ENTERED FROM 'PFINIT' r P* & P* 0 P* : PCHLTON EQU * D P LD A4,CHTAB X " PCON010 SUK A4,2 ALL TREATED ? l P RF(NZ) CON020 NO TAKE NEXT P ABL RTNA15 PCON020 EQU * P INH $ P LD A5,CHTAB,A4 LOAD CWT-ADDRE
0x334ebc…335050 Dummy {f00=0x0102, f01=0x0190, f02=» BUSY p $ P EX CWTCIS,A5 EXECUTE CIO-START P RF(U) CON027 6 $ P LDK A3,0 INDICATE CHANNEL BUSY L . P CF A15,RESTSY START OR RESTART SYNC-TIMER t PCON027 EQU * 4 P ST A3,CWTRST,A5 INDICATE C.U. PRESENT OR NOT =6 P LD* A1,CWTITA,A5
0x335050…3351e4 Dummy {f00=0x0102, f01=0x0190, f02=»OWED n . P LD A2,10,A1 ANY DEVICE ON SECOND TERMONAL 0 P RF(NZ) CON029 YES BLOCK SENDING NOT ALLOWED > 8 PCON028 LDK A2,BLOCK INDICATE BLOCKSENDING OR NOT DK1 r PCONRET ST A2,CWTBLK,A5 P RF CON035 : PCON029 LDK A2,BLOCK INDICATE BLOCK PERMIT.
0x3351e4…335378 Dummy {f00=0x0102, f01=0x018e, f02=»CON035 EQU * P LDR* A6,A5 GET LAST DWT P RB(Z) CON010 4 P CWK A6,1 SYNC ? J P RB(E) CON010 b P CMR A5 RESET LAST OUTPUT x P LDK A2,/00 DUMMY P CF A15,OUTLIN SEND IT P RB CON010 P EJECT P* P* P*
0x335378…33550c Dummy {f00=0x0102, f01=0x0190, f02=» P* P* P IFT LOGING=1 P* . PLOGG STR A1,A15 8 P LD A1,POINT P P ADK A1,2 d & P CWK A1,BUFE BUFE IS MAX LOGG AREA v P RF(NE) L1 ( P LDKL A1,BUF SET FIRST LOGG ADDRESS PL1 ST A1,POINT & P STR A2,A1 LOGG OF I
0x33550c…3356a0 Dummy {f00=0x0102, f01=0x0190, f02=» t P* $ PBUF RES 2000 LOGG AREA (500) DK1 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
0x3356a0…335834 (2, 279) Dummy {f00=0x0102, 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
0x335834…3359c8 Dummy {f00=0x0102, 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
0x3359c8…335b5c Dummy {f00=0x0102, 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
0x335b5c…335cf0 Dummy {f00=0x0102, f01=0x4170, f02=» TO ADDRESS-BLOCK x 6 P ABI ECHADR,A1 GO TO ECHO-ROUTINE DEVICE-DEPENDENT P XIF T PECHRTN EQU * ` P IFT CECHO=1 t 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-
0x335cf0…335e84 Dummy {f00=0x0102, 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
0x335e84…336018 Dummy {f00=0x0102, f01=0x0000, f02=»
[…0x2…]
0x336340…3364d4 (2, 280) Opaque[0x194]
0x3364d4…336668 # DirEnt {nam=»DRSOP1«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2060, f03=0x0000}
0x3364d4…336668 IdxSect {
0x3364d4…336668 f00 = 0x0103 // 0x3364d4 @0x0
0x3364d4…336668 f01 = 0x000a // 0x3364d6 @0x2
0x3364d4…336668 gno = [ // 0x3364d8 @0x4
0x3364d4…336668 [0x00]: C0x0103.0x0.0
0x3364d4…336668 [0x01]: C0x0103.0x1.0
0x3364d4…336668 [0x02]: C0x0103.0x2.0
0x3364d4…336668 [0x03]: C0x0103.0x3.0
0x3364d4…336668 [0x04]: C0x0104.0x0.0
0x3364d4…336668 ]
0x3364d4…336668 }
0x336668…3367fc Dummy {f00=0x0103, f01=0x018e, f02=» 2 P IDENT DRSOP1 REL 9.2 79-11-16 870105040920 P : P* B P* L @ P************************************************************ V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P* DRSOP1 = DRIVER FOR SYSTEM OPERATORS PANEL
0x3367fc…336990 Dummy {f00=0x0103, f01=0x0190, f02=» P* B P* THIS DRIVER HANDLES INPUT AND OUTPUT ON SYSTEM OPERATOR'S , P* PANEL CONNECTED TO CPU VIA CHCR-SOP X P* P* > P* ON AN INPUT REQUEST THE DEVICE SOFTWARE STATUS IS SET : P* 'BUSY' UNTIL THE INPUT INTERRUPT IS TA
0x336990…336b24 Dummy {f00=0x0103, f01=0x0190, f02=»ING READ REQUEST,POWER UP r > P* IS INDICATED AND NEXT READ REQUEST IS TERMINATED WITH " P* -2 IN CONTROL WORD d P* P* > P* ON AN OUTPUT REQUEST THE DEVICE SOFTWARE STATUS IS SET > P* 'READY' IMMEDIATELY, SINCE THE OUTPUT DOES N
0x336b24…336cb8 Dummy {f00=0x0103, f01=0x0190, f02=» ` P* ( P* S O P A S : READ SWITCHES ENTRY P* > * P* S O P A L : ACTIVATE LIGHTS ENTRY H P* v & P* I H S O P : INTERRUPT HANDLER P* " P* S O P R : RECOVERY ROUTINE P* P* P* * P* THE FOLLOWIN
0x336cb8…336e4c Dummy {f00=0x0103, f01=0x018e, f02=»IGHTS OFF z , P* 39 : WRITE FLASHING LIGHTS P* B P* NORMAL REGISTER USAGE: L P* n " P* REGISTER A1: INPUT/OUTPUT x " P* A2: WORK REGISTER " P* A3: WORK REGISTER " P* A4: WORK REGISTER
0x336e4c…336fe0 Dummy {f00=0x0103, f01=0x0190, f02=» r P* P* P EJECT P* * P************ 4 P* ENTRIES: * H P************ P* p P* z * P ENTRY SOPCT S.O.P. CHANNEL UNIT TABLE ( P ENTRY SOPR S.O.P. RECOVERY ROUTINE 2 P ENTRY IHSOP S.O.P. INTERRUPT HANDLER (ALI
0x336fe0…337174 (2, 281) Dummy {f00=0x0103, f01=0x0190, f02=»**** P* EXTERNALS: * P************** " P* 8 P* TOSS GLOBALS: B P* Z , P EXTRN SAVE8 PUSH REGS A1-A8 ONTO STACK d 4 P EXTRN DISIOE DISPATCHER I/O REQUEST ERROR ENTRY & P EXTRN TDISP DISPATCHER LKM ENTRY . P EXTRN RETUR8 POP
0x337174…337308 Dummy {f00=0x0103, f01=0x018e, f02=»I DATA SOP LIGHTS AND FD POWER P EJECT & P 4 P* < ( P************************************ F P* r P* DWT DISPLACEMENTS | P* ( P************************************ P* $ EXTRN DWTCHP CHANNEL PARAMETER EXTRN
0x337308…33749c Dummy {f00=0x0103, f01=0x0190, f02=» EXTRN DWTTAB TTAB ADDRESS * % EXTRN DWTWAT WAIT/ACTIVATE INDICATOR & EXTRN DWTTQ TERMINAL QUEUE T . P EXTRN INTSAV SAVE AREA FOR LAST INTERRUPT x ( P EXTRN ECBEL EFFECTIVE LENGTH IN ECB " P EXTRN ECBCW ECB CONTROL WORD PTIME EQU 5 F
0x33749c…337630 Dummy {f00=0x0103, f01=0x0190, f02=» P PX:A EQU 0 PSOPX EQU 0 " P** 4 P** > 8 P* THIS DRIVER CAN BE MADE TO HANDLE CREDIT ORDERS H P* BY SETTING CREDIT = 1 4 P* ORDERS 05 AND 06 ARE THEN REPLACED BY ORDERS P* /37 AND /38 RESPECTIVLY B P* BY
0x337630…3377c4 Dummy {f00=0x0103, f01=0x0190, f02=»N ZERO IS STORED IN THE CONTROL WORD z P* OF THE ECB. , P** D P N PCREDIT EQU 1 V P** j P** t @ P* THE ORDER /39, WRITE FLASHING LIGHTS CAN BE INCLUDED BY ~ P* SETTING X:B=1 P* PX:B EQU 0 PWRFLA EQU 0
0x3377c4…337958 Dummy {f00=0x0103, f01=0x0190, f02=» EQU 1 P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION " . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0 P* PDVBLEN EQU 0 MMU BUFFER SIZE " PDEVIND EQU -2 SOP DEVICE INDEX P*
0x337958…337aec Dummy {f00=0x0103, f01=0x018e, f02=» P XIF P* P IFT MMUPAG=1 PSTART EQU DWTDRD+4 4 P XIF N P* Z & PDWTTP EQU START+/00 TIMER POINTER d P* P EJECT P* P************************** P* S.O.P. DEVICE ADDRESS: * P********************
0x337aec…337c80 Dummy {f00=0x0103, f01=0x0190, f02=» " P* * " P* S.O.P. CHANNEL UNIT TABLE * * " P* * P " P****************************** v P* P* 0 PSOPCT EQU * TABLE STARTS WITH ADDRESS BLOCK: P* P DATA DVBLEN MMU BUFFER SI
0x337c80…337e14 (2, 282) Dummy {f00=0x0103, f01=0x0190, f02=»TCHES ENTRY x " P DATA 0 ABORT ROUTINE ADDRESS P* : P DATA DVBLEN MMU BUFFER SIZE D P DATA DEVIND DEVICE INDEX h & PSOPADU EQU * ACTIVATE LIGHTS ENTRY P* & P DATA SOPAL ACTIVATE LIGHTS ENTRY " P DATA 0 ABORT ROUTINE ADDRESS
0x337e14…337fa8 Dummy {f00=0x0103, f01=0x0190, f02=» " P* * " P* S.O.P. ACTIVATION ROUTINE: * * " P* * P " P****************************** v P* > P* THE ORDER IS ANALYZED AND THE CORRESPONDING I/O ACTION P* IS CARRIED OUT. P*
0x337fa8…33813c Dummy {f00=0x0103, f01=0x0190, f02=» P* * P RF(NZ) SOPER ERROR IF NOT READ ORDER P* < P* INPUT SWITCH VALUE F P* d * PSOPIN LDR* A2,A6 POWER UP INDICATION ? n P IFT CREDIT=0 P RF(Z) EXIT NO $ P CMR A6 YES CLEAR FOR NEXT REQ. P XIF P IFT CREDIT=
0x33813c…3382d0 Dummy {f00=0x0103, f01=0x0190, f02=»HANGES OF S.O.P. LIGHTS P* & PSOPAL EQU * ACTIVATE LIGHTS ENTRY * P* T P LD A3,10,A8 CHANGED LIGHTS ^ , P ANKL A3,/07FF BITS 5-15 CONTROLS LIGHTS P* P LDR A4,A7 COPY ORDER P IFT WRFLA=1 P CCK A4,/3939 P RF(
0x3382d0…338464 Dummy {f00=0x0103, f01=0x0190, f02=»/37 P XIF & P RF(Z) SOPON IF SO, TURN ON LIGHTS P* B & P SUK A4,1 SEE IF LIGHTS OFF ORDER L P RF(Z) SOPOFF v & PSOPER ABL(NZ) DISIOE ILLEGAL ORDER P IFT WRFLA=1 P EJECT P* P* P* FLASH LIGHTS P*
0x338464…3385f8 Dummy {f00=0x0103, f01=0x018e, f02=»A6 P LDR A1,A6 P CF A15,SETIMP P DATA FLTUT,TIME 2 P ST A4,DWTTP,A6 J P LDKL A1,/FFBF b P ANS A1,DWTST,A6 SET ON FLAG x PFL010 EQU * . P* A3 CONTAINS LIGHTS THAT SHOULD FLASH * P ORS A3,FLASH STORE NEW LAMPS TO FLASH
0x3385f8…33878c Dummy {f00=0x0103, f01=0x0190, f02=» PFL020 EQU * P C1R A3,A3 P ANS A3,SPDLCI * P RF SOPONOF @ P* T P EJECT ^ P* l PFLTUT EQU * FLASH TIME OUT v P LDKL A6,DWSO01 P LD A3,FLASH 0 P RF(Z) FL030 NO MORE FLASHING FOR THIS TIME P LDKL A1,-TIME R
0x33878c…338920 Dummy {f00=0x0103, f01=0x0190, f02=»EXIT END I/O P XIF P EJECT P* . PSOPOFF EQU * 8 , P C1R A3,A3 GET COMPLEMENTED CONTROL WORD L 4 P ANS A3,SPDLCI MASK OUT LIGHTS TO BE TURNED OFF | P IFT WRFLA=1 $ P ANS A3,FLASH STOP SOME FLASHING P XIF , P RF SOPONOF
0x338920…338ab4 (2, 283) Dummy {f00=0x0103, f01=0x0190, f02=» A3 CONTAINS CONTROL WORD . P ORS A3,SPDLCI SET LIGHTS TO BE TURNED ON $ P IFT WRFLA=1 V P C1R A3,A3 j * P ANS A3,FLASH STOP SOME OTHER FLASHING | P XIF P* P* COMMON ON/OFF PATH: P* 0 PSOPONOFF LD A1,SPDLCI GET LIGHTS
0x338ab4…338c48 Dummy {f00=0x0103, f01=0x0190, f02=»********************** P* * P* S.O.P. INTERRUPT HANDLER * B P* * f P**************************** P* P* @ P* THE INTERRUPT HANDLER WILL TAKE CARE OF ALL INTERRUPTS. P*
0x338c48…338ddc Dummy {f00=0x0103, f01=0x018e, f02=» CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF * P* 6 P IFT CPU852=0 @ " P MSR 8,A15 SAVE A1-A8 ON STACK V P XIF | P* $ P ST P,INTSAV SAVE LAST INTERRUPT P INR A1,0,SOPDA GET SWITCH P SRN A1,A2 CALC INDEX P IFT CREDIT=0
0x338ddc…338f70 Dummy {f00=0x0103, f01=0x0190, f02=» " P LDKL A6,DWSI02 ANY REQUEST ON P LD A4,DWTST,A6 STATUS WORD * P RF(N) IHSOP2 NO N $ P LD A8,DWTECB,A6 GET ECB-ADDRESS f P ST A2,ECBCW,A8 STORE INDEX ( P CM ECBEL,A8 RESET EFFECTIVE LENGTH P LDK A1,0 P CF A15,TENDIO END I/O
0x338f70…339104 Dummy {f00=0x0103, f01=0x0190, f02=»WTECB,A6 GET ECB-ADDRESS P & PIHSOP3 ST A2,ECBCW,A8 STORE INDEX ( P R , PENDIO CM ECBEL,A8 RESET EFFECTIVE LENGTH Z P LDK A1,0 P CF A15,TENDIO END I/O P $ PEXIT ABL TDISP GO TO DISPATCHER P EJECT P* * P******
0x339104…339298 Dummy {f00=0x0103, f01=0x0190, f02=» * * P************************************* * P* X P* b : P* THIS ROUTINE IS A SUBROUTINE TO THE POWER FAILURE l 8 P* RECOVERY ROUTINE (PFAR). IT'S ENTRY POINT SHOULD @ P* BE PRESENT IN THE POWER FAILUR
0x339298…33942c Dummy {f00=0x0103, f01=0x018e, f02=»DWTCHP j P* P* PSOPR EQU * ENTRY POINT " P IFT CPU852=1 B & P CF A15,SAVE8 SAVE A1-A8 ON STACK X P XIF P* P IFT CPU852=0 " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P* " P CIO A1,1,SOPDA ACTIVATE INPUT
0x33942c…3395c0 Dummy {f00=0x0103, f01=0x0190, f02=» " P LDKL A2,-2 POWER UP INDICATOR P XIF . P IFT CREDIT=1 : P LDK A2,0 P P XIF b P n P IFF SOPX=0 v " P LDKL A6,DWSI02 ANY REQUEST ON $ P LD A4,DWTST,A6 GET STATUS WORD P RF(NN) SOPR1 YES P STR A2,A6 IND POWER U
0x3395c0…339754 (2, 284) Dummy {f00=0x0104, f01=0x0190, f02=» STR A2,A6 IND POWER UP P PSOPR2 RB IHSOP1 ( P EJECT @ P* N P* D W S I 0 1 : INPUT DWT X P* | PDWSI01 EQU * , P DATA 0 CHANNEL PARAMETER: POWER UP IND , P DATA /8000 /8000 MEANS DEVICE IS READY P DATA 0 ECB AD
0x339754…3398e8 Dummy {f00=0x0104, f01=0x0190, f02=» & " DATA 0 SAVE AREA USER ECB ADDRESS P DATA DEVECI MMU ECB ADDRESS . PDEVECI EQU * R P DATA 0,0,0,0,0,0 f P XIF P* P* D W S O 0 1 : OUTPUT DWT P* P* PDWSO01 EQU * " P DATA /0040 CHANNEL PARAMETER , P
0x3398e8…339a7c Dummy {f00=0x0104, f01=0x0190, f02=» j P DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR $ P DATA 0 TERMINAL QUEUE L IFT MMUPAG=1 j & " DATA 0 SAVE AREA USER ECB ADDRESS P DATA DEVECO MMU ECB ADDRESS XIF P DATA 0 TIMER POINTER . PFLASH DATA 0 SAV
0x339a7c…339c10 Dummy {f00=0x0104, f01=0x0190, f02=»* * P* D W S I 0 2 : EXTENDED INPUT DWT ! P* ! 8 P ! B PDWSI02 EQU * ! J P IFF SOPX=0 ! ^ P DATA 0 ! r P DATA /8000 ! P DATA 0 ECB ADDRESS ! P DATA 0 ORDER ! P DATA SOPADI ! P DATA 0,0,0 ! IFT MMUPAG=1 ! & " D
0x339c10…339da4 Dummy {f00=0x0104, f01=0x402c, f02=» ! P* " P* " P END " @ " (DWT ! P* ! 8 P ! B PDWSI02 EQU * ! J P IFF SOPX=0 ! ^ P DATA 0 ! r P DATA /8000 ! P DATA 0 ECB ADDRESS ! P DATA 0 ORDER ! P DATA SOPADI ! P DATA 0,0,0 ! IFT MMUPAG=1 ! & " D
0x339da4…339f38 Dummy {f00=0x0104, 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
0x339f38…33a0cc Dummy {f00=0x0104, f01=0x0190, f02=»*-CWTRT1 # P DATA 0 TIMER POINTER $ PCWSYNC EQU *-CWTRT1 $ . P DATA /7055 SYNC CHARACTER $ J PLRCDWT EQU *-CWTRT1 $ l 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 $ 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 $ PLRCACK EQU *-CWTRT1 $
0x33a0cc…33a260 Dummy {f00=0x0104, f01=0x018e, f02=»US WORD (LOOP-TESTS) $ | 0 PCWTBLK EQU *-CWTRT1 BLOCK SENDING INDICATOR % ( P DATA 0 BIT 0: BLOCKSENDING RUNNING % P $ P BIT 15: BLOCKSENDING ALLOWED % | P EJECT % $ P******************************** % $ P* C W T R T 2 * % $ P******
0x33a260…33a3f4 (2, 285) Opaque[0x194]
0x33a3f4…33a588 # DirEnt {nam=»DRFD01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2088, f03=0x0000}
0x33a3f4…33a588 IdxSect {
0x33a3f4…33a588 f00 = 0x0104 // 0x33a3f4 @0x0
0x33a3f4…33a588 f01 = 0x0020 // 0x33a3f6 @0x2
0x33a3f4…33a588 gno = [ // 0x33a3f8 @0x4
0x33a3f4…33a588 [0x00]: C0x0104.0x1.0
0x33a3f4…33a588 [0x01]: C0x0104.0x2.0
0x33a3f4…33a588 [0x02]: C0x0104.0x3.0
0x33a3f4…33a588 [0x03]: C0x0105.0x0.0
0x33a3f4…33a588 [0x04]: C0x0105.0x1.0
0x33a3f4…33a588 [0x05]: C0x0105.0x2.0
0x33a3f4…33a588 [0x06]: C0x0105.0x3.0
0x33a3f4…33a588 [0x07]: C0x0106.0x0.0
0x33a3f4…33a588 [0x08]: C0x0106.0x1.0
0x33a3f4…33a588 [0x09]: C0x0106.0x2.0
0x33a3f4…33a588 [0x0a]: C0x0106.0x3.0
0x33a3f4…33a588 [0x0b]: C0x0107.0x0.0
0x33a3f4…33a588 [0x0c]: C0x0107.0x1.0
0x33a3f4…33a588 [0x0d]: C0x0107.0x2.0
0x33a3f4…33a588 [0x0e]: C0x0107.0x3.0
0x33a3f4…33a588 [0x0f]: C0x0108.0x0.0
0x33a3f4…33a588 ]
0x33a3f4…33a588 }
0x33a588…33a71c Dummy {f00=0x0104, f01=0x0190, f02=» 2 P IDENT DRFD01 REL 9.2 79-12-05 870105040920 P : * P =2,TIMING PROBLEMS IN INT. HANDLER B P REL 9.2 79-11-16 p $ P =1,CHANGED INTERRUPT HANDLER P REL 9.1 79-05-23 P* 2 P**********************************************
0x33a71c…33a8b0 Dummy {f00=0x0104, f01=0x0190, f02=» P* P* P* 2 P********************************************* " 0 P* THIS DISK DRIVER HANDLES UP TO FOUR DAISY X . P* CHAINED FLEXIBLE DISK DRIVES PTS 6879, 0 P* CONNECTED TO CPU VIA CHANNEL UNIT CHFD ON & P* MULTIPLEX OR PROGRA
0x33a8b0…33aa44 Dummy {f00=0x0104, f01=0x0190, f02=»L READ B P* /02 SEQUENTIAL READ -IBM DISC ONLY- P* /05 BASIC WRITE T D P* /06 SEQUENTIAL WRITE -IBM DISC ONLY- p P* /11 PHYSICAL READ P* /15 PHYSICAL WRITE P* /1A SEARCH KE
0x33aa44…33abd8 Dummy {f00=0x0104, f01=0x0190, f02=» -IBM DISC ONLY- t P* /37 LOAD , P* /38 UNLOAD B P* Z P* ENTRY PARAMETERS: d P* P* A5 STACK BASE P* A6 DWT-ADDRESS P* A7 ORDER P* A8 ECB-ADDRESS P EJECT DRFD01
0x33abd8…33ad6c Dummy {f00=0x0104, f01=0x0190, f02=»R ACTIVATION ADDRESS " P ENTRY IHFD INTERRUPT HANDLER P ENTRY FDON RECOVERY ROUTINE B P ENTRY DWFD01 DWT-ADDRESS f P EJECT DRFD01 P* P************* P* * P* EXTERNALS * P* * P******
0x33ad6c…33af00 Dummy {f00=0x0104, f01=0x0190, f02=»TATUS EXTRN DWTECB ECB ADDRESS $ EXTRN DWTOR DWT INDEX AND ORDER 0 EXTRN DWTA2 SAVE AREA A2 X EXTRN DWTA5 SAVE AREA A5 z & ! EXTRN DWTSB2 STACK BASE 2 IN DWT ( P EXTRN SCTPLD PROGRAM LOADING DEVICE ( P EXTRN SAVE8 SAVE A1-A
0x33af00…33b094 (2, 286) Dummy {f00=0x0104, f01=0x0190, f02=»XTRN TASCII EBCDIC TO ASCII TAB & P EXTRN TEBCDIC ASCII TO EBCDIC TAB ( 0 P EXTRN SPDLCI OPEN/CLOSE STATUS FOR FD DRIVE R $ P EXTRN ECBBA ECB BUFFER ADDRESS & P EXTRN ECBRL ECB REQUESTED LENGTH & P EXTRN ECBEL ECB EFFECTIVE LENGTH P EXTRN
0x33b094…33b228 Dummy {f00=0x0104, f01=0x0190, f02=» * P* CONDITIONAL ASSEMBLY * P* * > P************************ ^ P* ~ . P* MULTIPLEX CHANNEL INSTEAD OF PROGRAMMED P* CHANNEL BY SETTING X:A = 0 P* PX:A EQU 1 PCHAN EQU 1
0x33b228…33b3bc Dummy {f00=0x0104, f01=0x0190, f02=» PTOSS EQU 1 P* 2 P* A PROGRAM VERSION INCLUDING IBM DISC FORMAT ( P* IS OBTAINED BY SETTING IBM EQU 1. V P* PX:C EQU 0 PIBM EQU 1 P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMU
0x33b3bc…33b550 Dummy {f00=0x0104, f01=0x0190, f02=»BTAINED BY SETTING CPU852 EQU 0. P* ( PCPU852 EQU 0 2 P* F P EJECT DRFD01 P P* h * r . ** A PROGRAM VERSION USING TOSS DISC PAGING | * &* IS OBTAINED BY SETTING DSKPAG EQU 1. * PDSKPAG EQU 0 * P*
0x33b550…33b6e4 Dummy {f00=0x0104, f01=0x0190, f02=»QU 0 P* P* @ P* ORDERS /21 OPEN AND /22 CLOSE WHICH CONTROLS THE POWER D P* TO THE DISK DRIVE UNIT CAN BE INCLUDED BY SETTING OPCLOS =1 d P* PX:D EQU 0 POPCLOS EQU 1 P* P EJECT DRFD01 P* P
0x33b6e4…33b878 Dummy {f00=0x0104, f01=0x018e, f02=»CE INDEX P* P* P IFT CHAN=1 $ PDEVIND EQU 2 8 P XIF L P* X P IFT CHAN=0 b PDEVIND EQU 4-IBM-IBM v P XIF P* P EJECT DRFD01 P* P************* P* * P* CONSTANTS *
0x33b878…33ba0c Dummy {f00=0x0104, f01=0x0190, f02=» l ( PSOPDA EQU /2E S.O.P. DEVICE ADDRESS * PSTALEN EQU 512 MAX STANDARD SEC. LEN. 4 ( PTOSLEN EQU 410 MAX TOSS SEC. LENGTH b " PIBMLEN EQU 128 IBM SEC. LENGTH ( PBOE EQU 28 BEGIN OF EXTENT POSITION & PEOE EQU 34 END OF EXTENT POSITION $
0x33ba0c…33bba0 Dummy {f00=0x0104, f01=0x018e, f02=»************** P* * P* DWT-DISPLACEMENTS* 2 P* * N P******************** j P* 0 PDWTDRD EQU /10 START OF DRIVER DEFINED PART P* P IFT MMUPAG=0 PSTART EQU DWTDRD P XIF P
0x33bba0…33bd34 (2, 287) Dummy {f00=0x0104, f01=0x018e, f02=» ~ P* P********** P* * $ P* TABLES * 6 P* * H P********** Z P* l P IFT DEVIND=2 v ( P DATA DVBLEN+DVBLEN MMU BUFFER SIZE P XIF P* P IFT DEVIND=4 " P DATA 0 INDICATE NO MMU BUFFER
0x33bd34…33bec8 Dummy {f00=0x0104, f01=0x0190, f02=» P* P EJECT DRFD01 P* & P************** 0 P* * F P* ACTIVATION * P* * r P************** P* PFDAD EQU * ACTIVATION ENTRY P* P IFT OPCLOS=1 & P* CHECK IF OPEN OR CLOSE
0x33bec8…33c05c Dummy {f00=0x0104, f01=0x0190, f02=»* P EJECT P XIF P* $ P LDK A3,0 . P LC A3,DWTOR,A6 INDEX @ P LDR A2,A3 SAVE FOR FDIX ^ P* ~ & P* PUT DRIVE NO IN CIO-INSTRUCTION P* P CF A5,SETCIO A3,A4 AFFECTED ( P CM DWTRCW,A6 SAVE RETURN CODE WORD
0x33c05c…33c1f0 Dummy {f00=0x0104, f01=0x0190, f02=»WTA3,A6 SAVE DRIVE INDEX MASK P ANR A1,A3 & P RF(NZ) FD:ORD LOCKED 8 P LDR A1,A7 V P SUK A1,/26 h P ABL(Z) LOAD LOCK ORDER | P SUK A1,/11 P ABL(Z) LOAD LOAD ORDER P LDKL A1,/8001 RETURN CODE P ABL END:IO ENDIO
0x33c1f0…33c384 Dummy {f00=0x0104, f01=0x0190, f02=» DSKPAG+SWPBLK=0 & P LD A2,ECBBA,A8 GET BUFFER ADDRESS & P LDR* A1,A8 GET FIRST WORD OF ECB B 4 P ANKL A1,/3000 GET BITS 16-17 IN BUFFER ADDRESS l . P RF(NZ) FD:000 BUFFER NOT IN SYSTEM AREA? P LDR A3,A2 P RF(NN) FD:005 6 P ADKL A3,T
0x33c384…33c518 Dummy {f00=0x0104, f01=0x018e, f02=» LDR A3,A2 P ANKL A2,/F000 P SRL A2,2 ( P SLL A1,2 : P ORR A1,A2 L P ANKL A3,/FFF ^ 2 P ST A1,DWT:PA,A6 6 BIT PHYSICAL BUFFER ADDRESS t , P ADKL A1,/400 CREATE ONE MORE MMU ENTRY P ST A1,DWT:PA+2,A6 P LDR A1,A3 ( P O
0x33c518…33c6ac Dummy {f00=0x0104, f01=0x0190, f02=» ` P* 8 PFD:005 ST A1,DWT:LA,A6 16 BIT LOGICAL BUFFER ADDRESS P* N P EJECT DRFD01 X P XIF p P* | P LDR A1,A7 P ABL(Z) FD:070 TEST STATUS P SUK A1,1 P RF(Z) FD:040 PHYSICAL READ P SUK A1,4 P RF(Z)
0x33c6ac…33c840 Dummy {f00=0x0104, f01=0x018e, f02=» SUK A1,15 $ P RF(Z) FD:030 WRITE DELETED DATA P SUK A1,/14 : P ABL(Z) UNLOAD UNLOAD ORDER N P IFT IBM=1 r P ADK A1,/36 " P ABL(Z) SQREAD SEQUENTIAL READ P SUK A1,4 $ P ABL(Z) SQWRIT SEQUENTIAL WRITE P SUK A1,/2B
0x33c840…33c9d4 (2, 288) Dummy {f00=0x0105, f01=0x0190, f02=» v P XIF P PFD:DIS EQU * P ABL DISIOE REQUEST ERROR 0 P* R P IFT OPCLOS=1 P EJECT r P* P******** P* * P* OPEN * P* * P******** P* 4 P* OPEN IS PERFORMED BY WRITING A
0x33c9d4…33cb68 Dummy {f00=0x0105, f01=0x0190, f02=» ( P ANS A1,SPDLCI CLEAR OPEN/CLOSE BIT 0 P LD A1,SPDLCI SOP LIGHTS AND OPEN/CLOSE DATA 0 " P OTR A1,0,SOPDA OPEN FD DRIVE d P* * P* WAIT FOR DRIVE TO BECOME OPERABLE ( P LDK A4,DWTTP2 TIMER POINTER OFFSET ( P ADR A4,A6 A4:=TIMER POINT
0x33cb68…33ccfc Dummy {f00=0x0105, f01=0x0190, f02=»SP EXIT P* POPENRE EQU * P* TIME HAS EXPIRED . P LDR A6,A1 GET DWT-ADDR L , P CM DWTTP2,A6 INDICATE NO TIMER RUNNING l & P RF OCLEXI COMMON OPEN/CLOSE EXIT P* P EJECT P* P********* P* *
0x33ccfc…33ce90 Dummy {f00=0x0105, f01=0x0190, f02=» THE SOP LIGHTS EXTERNAL REGISTER P* * PCLOSE EQU * 4 " P LDKL A1,/8000 MASK FOR BIT 0 H & P ORS A1,SPDLCI SET OPEN/CLOSE BIT n 0 P LD A1,SPDLCI SOP LIGHTS AND OPEN/CLOSE DATA " P OTR A1,0,SOPDA CLOSE FD DRIVE P* POCLEXI EQU *
0x33ce90…33d024 Dummy {f00=0x0105, f01=0x0190, f02=»JECT DRFD01 P* P*************** P* * 8 P* BASIC WRITE * P P* * h P*************** P* PFD:010 CF A5,BIO P ORK A2,1 PFD:015 EQU * P IFT TOSS+IBM=2 P LD A1,DWTLAB,A6
0x33d024…33d1b8 Dummy {f00=0x0105, f01=0x0190, f02=» P CF A5,EBCDIC PFD:018 EQU * P XIF . P* : P IFT CHAN+TOSS=2 D P IFT MMUPAG+SWPBLK=2 4 P LD A1,DWT:LA,A6 GET FLAG/LOGICAL BUFFER ADDRESS x ( P RF(Z) FD:019 BUFFER IN SYSTEM AREA? ( P LD A7,ECBRL,A8 GET REQUESTED LENGTH P
0x33d1b8…33d34c Dummy {f00=0x0105, f01=0x0190, f02=»MMU TABLE v 2 P MVUS A7 MOVE BUFFER FROM USER TO SYSTEM AREA & P TL -30,A15 RESTORE MMU FROM STACK H P LDR A2,A8 RESTORE A2 r P* P EJECT DRFD01 P* P* PFD:019 EQU * P XIF P* " P CF A5,FD:WRITE PERFORME
0x33d34c…33d4e0 Dummy {f00=0x0105, f01=0x0190, f02=» WAS IN SYSTEM AREA? | . P LD A1,DWT:BF,A6 GET SAVED BUFFER ADDRESS & P ST A1,ECBBA,A8 RESTORE IT IN ECB N P* x PFD:025 EQU * P XIF P* P RF FD:048 GOTO FD:RC P* P****************** P* * P
0x33d4e0…33d674 (2, 289) Dummy {f00=0x0105, f01=0x018e, f02=»S 13-15 x P RB FD:015 P EJECT DRFD01 " P* : P********************** D P* * b P* WRITE DELETED DATA * P* * P********************** P* PFD:030 CF A5,BIO P ORK A2,6
0x33d674…33d808 Dummy {f00=0x0105, f01=0x0190, f02=» P***************** P* PFD:040 CF A5,BIO:RE ( P IFT TOSS+IBM=2 D P LD A1,DWTLAB,A6 P AN A1,DWTA3,A6 t 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
0x33d808…33d99c Dummy {f00=0x0105, f01=0x0190, f02=»SKPAG+SWPBLK=0 4 P LD A2,DWT:LA,A6 GET FLAG/LOGICAL BUFFER ADDRESS ( P RF(Z) FD:046 BUFFER IN SYSTEM AREA? N ( P LD A7,ECBRL,A8 GET REQUESTED LENGTH z * P LDKL A1,FD:BUF GET DWT BUFFER ADDRESS & P TS -30,A15 SAVE RUNNING TASK MMU ( P TL DWT:PA
0x33d99c…33db30 Dummy {f00=0x0105, f01=0x0190, f02=»,DWT:BF,A6 GET SAVED BUFFER ADDRESS & P ST A2,ECBBA,A8 RESTORE IT IN ECB ! , P RF FD:048 ! V P* ! h PFD:046 EQU * ! r P XIF ! P* ! P IFT TOSS+IBM=2 ! P LD A1,DWTLAB,A6 ! P AN A1,DWTA3,A6 ! P RF(Z) FD:047 NOT IBM ! P XIF !
0x33db30…33dcc4 Dummy {f00=0x0105, f01=0x0190, f02=» P XIF " PFD:048 EQU * " P ABL FD:RC " $ P* " 6 P EJECT DRFD01 " @ P* " X P IFT TOSS+IBM=0 " b P IFT MMUPAG=0 " z P* " P************** " P* * " P* SEARCH KEY * " P* * " P************** " P
0x33dcc4…33de58 Dummy {f00=0x0105, f01=0x018e, f02=»0 ILLEGAL LENGTH " P SUK A1,128 # " P ABL(P) END:10 ILLEGAL LENGTH # , P LDR A3,A2 # R P* # d * P* IF ODD CHANGE TO EVEN NO OF BYTES # n P* # P ADK A3,1 # P SRL A3,1 # P SLL A3,1 # P* # P SLL A2,3 # P ORK A2,7 BIO #
0x33de58…33dfec Dummy {f00=0x0105, f01=0x0190, f02=» P* $ P EJECT DRFD01 $ P* $ & $ P* READ RECORD WITH KEY COMMAND $ 0 P* $ X PFD:060 EQU * $ b P LDK A2,4 BIO $ v P LD A3,4,A8 REQUESTED LENGTH $ P CWK A3,130 $ " P ABL(NE) END:10 ILLEGAL LENGTH $ P LD A4,2,A8 BUFFER ADDRESS $
0x33dfec…33e180 Dummy {f00=0x0105, f01=0x0190, f02=»TUS * $ P* * % P*************** % & P* % > PFD:070 EQU * % H P LDKL A2,/FFF9 BIO DUMMY % P CF A5,FD:WRI % | P LDR A1,A3 % P ANK A1,1 % & P RF(NZ) FD:090 DISC NOT OPERABEL? % " P ANKL A3,/200 WRITE PROTECTED? % P O
0x33e180…33e314 (2, 290) Dummy {f00=0x0105, f01=0x018e, f02=»RCW,A6 GET RETURN CODE % PFD:090 ABL END:IO & P* & 8 P EJECT DRFD01 & B P* & Z P******** & d P* * & t P* LOAD * & P* * & P******** & P* & PLOAD EQU * & P LDK A2,/14 LOCK & P CF A5,FD:REA & P ANK A3,1
0x33e314…33e4a8 Dummy {f00=0x0105, f01=0x0190, f02=» & P LDK A2,0 BIO ' P LDKL A4,BUF ' P LDK A3,38 NO OF BYTES ' 2 P CF A5,FD:REA ' P P CF A5,LD:RC ' f P ADK A4,34 ' z P LDR* A2,A4 ' P CWK A2,'TO' ' ( P RF(NE) LOA:10 IBM LABEL PREASSUMED ' P ADK A4,2 ' P LDR* A2,A4 ' P C
0x33e4a8…33e63c Dummy {f00=0x0105, f01=0x0190, f02=»* ' P* READ VOLUME NAME ( P* ( & P LDK A3,8 LENGTH ( 0 P LDK A2,0 BIO ( H * P C1 A1,DWTA3,A6 1 COMP. DRIVE BIT MASK ( ^ * P ANS A1,DWTLAB,A6 INDICATE TOSS LABEL ( P RF LOA:15 ( P XIF ( P IFT IBM=1 ( PLOA:10 LDK A3,10 LENGTH (
0x33e63c…33e7d0 Dummy {f00=0x0105, f01=0x018e, f02=»BIT 10 ( x P ORS A1,DWTRCW,A6 ) P XIF ) ( P IFF TOSS+IBM=0 ) 4 PLOA:15 EQU * ) L P LDKL A4,BUF BUFFER ADDRESS ) ` 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,/20 CHECK
0x33e7d0…33e964 Dummy {f00=0x0105, f01=0x0190, f02=» ) P XIF * P* * P EJECT DRFD01 * P* * 6 P* * @ P IFF TOSS+IBM=0 * J P* * b P* GET DWT VOL NAME ADDRESS * l P* * P CF A5,VOLADR ADDRESS TO A2 * P* * P* STORE NAME IN DWT * P* * P LDK A3,3 * PLOA:40 L
0x33e964…33eaf8 Dummy {f00=0x0105, f01=0x018e, f02=»50 EQU * * P LC A2,DWTOR+1,A6 GET ORDER + P ANK A2,/FF + 4 & P RB(Z) FD:075 JUMP IF TEST STATUS + H P XIF + r P IFT IBM=1 + ~ P* + P* DATA SET OPENING WANTED? + P* + " P ANK A1,/2 A1: TOSS=6, IBM=8 + P RF(NZ) LOA:70 TOSS LABEL +
0x33eaf8…33ec8c Dummy {f00=0x0105, f01=0x0190, f02=» + P LD A2,ECBCW,A8 SECTOR NO , P SUK A2,7 , * P ABL(N) FD:DIS REQUEST ERROR , < P SUK A2,18 , ` P ABL(P) FD:DIS REQUEST ERROR , r P ADK A2,25 , P SLL A2,3 BIO , P LDK A3,80 LENGTH , P LDKL A4,BUF , P CF A5,FD:REA , P LDR A
0x33ec8c…33ee20 Dummy {f00=0x0105, f01=0x0190, f02=»ABEL , f PLOA:60 EQU * - P CF A5,LD:RC - P ENB - 4 * P LD A3,ECBCW,A8 DATA SET LABEL SECTOR - @ P LDK A1,DWTDSS - n P CF A5,STDWT SAVE IN DWT - P ADK A4,BOE BOE ADDRESS - . P CF A5,LOGSEC TRANSFORM TO LOGICAL SECTOR - P LDK A1,DWTBOE -
0x33ee20…33efb4 (2, 291) Dummy {f00=0x0105, f01=0x0190, f02=» - t P CF A5,LOGSEC . P LDK A1,DWTEOE . $ P CF A5,STDWT STORE EOE NO IN DWT . 4 P ADK A4,EOD-EOE EOD ADDRESS . P CF A5,LOGSEC . P CF A5,SETINH INHIBIT . P LDK A1,DWTEOD . $ P CF A5,STDWT STORE EOD NO IN DWT . P* . PLOA:70 EQU *
0x33efb4…33f148 Dummy {f00=0x0105, f01=0x0190, f02=»D:RC . P* / P EJECT DRFD01 / P* / . P* / 8 P IFF TOSS+IBM=0 / B P* / Z P* ERROR , UNLOCK / d P* / ~ PLOA:90 EQU * / P LDR A5,A6 / P ADKL A5,DWTSB2 STACK BASE / P LDK A2,/C UNLOCK / P CF A5,FD:REA / P RB LOA:
0x33f148…33f2dc Dummy {f00=0x0105, f01=0x0190, f02=»WTRCW,A6 / P ANKL A3,/2007 FATAL ERROR 0 P RB(NZ) LOA:90 0 2 & P LDKL A4,BUF DRIVER BUFFER ADDRESS 0 H P RTN A5 0 r P XIF 0 P EJECT DRFD01 0 P* 0 P********** 0 P* * 0 P* UNLOAD * 0 P* * 0 P********** 0
0x33f2dc…33f470 Dummy {f00=0x0105, f01=0x0190, f02=» A7,A7 EOD 0 P RF(Z) UNL:70 NOT OPEN 1 4 P ST A7,10,A8 STORE EOD-NO IN CONTROL WORD OF ECB 1 0 P* 1 h , P* READ DATA SET LABEL TO DRIVER BUFFER 1 r P* 1 P CF A5,DSLIO PREPARE FOR I/O 1 & P CF A5,FD:REA READ DATA SET LABEL 1 $ P CF A5,UNL:RC
0x33f470…33f604 Dummy {f00=0x0105, f01=0x0190, f02=»C-CODED) 1 ` P* 2 P CF A5,DSOPCH EOD-NO TO A7 2 P* 2 < P* DIVIDE EOD BY 26 2 F P* 2 b P LDK A1,0 2 l PUNL:10 SUK A7,26 2 ~ P RF(N) UNL:20 2 P ADK A1,1 2 P RB UNL:10 2 PUNL:20 ADK A7,27 2 P* 2 P* A1 = BINARY TRACK
0x33f604…33f798 Dummy {f00=0x0105, f01=0x0190, f02=» TO POS 79 2 v P SCR A3,A4 3 P SUK A4,1 3 $ P SRL A3,8 LEFT BYTE 3 6 P SCR A3,A4 STORE IN BUFFER 3 R P LDR A7,A1 TRACK 3 t ( P CF A5,BINDEC DEC EBCDIC-CODED IN A3 3 P SUK A4,3 3 P STR A3,A4 TRACK INTO BUF 3 P CF A5,SETINH INHIBIT 3
0x33f798…33f92c Dummy {f00=0x0105, f01=0x0190, f02=»E WRITE DATA SET LEBEL 3 $ P CF A5,UNL:RC CHECK RETURN CODE 4 P CF A5,DSOPCH 4 F P CMR A2 INDICATE NOT OPEN 4 P* 4 ~ P* UNLOCK 4 P* 4 P XIF 4 PUNL:70 EQU * 4 P LDK A2,/C UNLOCK 4 P CF A5,FD:REA 4 P ORS A3,DWTRCW,A6
0x33f92c…33fac0 Dummy {f00=0x0105, f01=0x018e, f02=»LOCK IN DWT 4 t PUNL:80 EQU * 5 P RB LOA:75 END:IO 5 ( P IFF TOSS+IBM=0 5 B P* 5 Z P* UNLOAD RETURN CODE CHECK 5 d P* 5 PUNL:RC ORS A3,DWTRCW,A6 5 P ANK A3,/7 FATAL ERROR? 5 P RB(NZ) UNL:80 ENDIO 5 P RTN A5 5 P XIF 5
0x33fac0…33fc54 (2, 292) Dummy {f00=0x0106, f01=0x0190, f02=» P* 6 PSQREAD EQU * 6 * P CF A5,DSOPCH GET EOD AND EOD ADDRESS 6 " P LDR A7,A7 EOD 6 P " PSQR:05 ABL(Z) DISIOE NOT OPEN 6 f . P ADK A2,DWTCRN-DWTEOD A2 = ADDRESS TO CRN 6 P LDR* A3,A2 CRN 6 P ADK A3,1 CRN+1 6 & P ST A3,ECBCW,A8 STORE CRN+
0x33fc54…33fde8 Dummy {f00=0x0106, f01=0x0190, f02=»REA READ SECTOR POINTED AT BY CRN+1 6 ( P LD A4,ECBBA,A8 USER BUFFER ADDRESS 7 , $ P LD A7,ECBRL,A8 REQUESTED LENGTH 7 X $ P CF A5,ASCII TRANSFORM TO ASCII 7 P LDK A1,DWTCRN 7 P CF A5,DSPAD 7 P RF SQW:10 UPDATE CRN 7 P* 7 P* END OF DA
0x33fde8…33ff7c Dummy {f00=0x0106, f01=0x0190, f02=» P* SEQUENTIAL WRITE * 8 P******************* 8 P* 8 < PSQWRIT EQU * 8 F P CF A5,DSOPCH GET EOD 8 Z P ADK A7,0 EOD-NO (SET CR) 8 x P RB(Z) SQR:05 NOT OPEN 8 P* 8 P* CHECK IF END OF EXTENT 8 P* 8 P LDK A1,DWTEOE 8 & P CF
0x33ff7c…340110 Dummy {f00=0x0106, f01=0x018e, f02=»F A5,BIO 8 P LDK A7,128 9 , P CF A5,EBCDIC TRANSFORM AND MOVE TO BUF 9 $ P ORK A2,5 PHYS. WRITE 9 T P CF A5,FD:WRI 9 r P CF A5,DSOPCH 9 PSQW:10 LDR A1,A3 RETURN CODE 9 P ANK A1,/1 9 P RF(NZ) SQW:15 NOT OPERABLE 9 * P IMR A2 EOD=EOD+
0x340110…3402a4 Dummy {f00=0x0106, f01=0x0190, f02=» P RF END:IO : P EJECT DRFD01 : P* : . P********** : 8 P* REWIND * : J P********** : P* : n PREWIND EQU * : x P CF A5,DSOPCH : P ADK A7,0 EOD (SET CR) : $ P RB(Z) SQR:05 DATA SET NOT OPEN : P LDR A3,A2 SAVE EOD ADDRESS :
0x3402a4…340438 Dummy {f00=0x0106, f01=0x0190, f02=» 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 ; n P EJECT DRFD01 ; z P* ; P***************** ; P* * ; P* PERFORM ORDER * ; P* * ; P****
0x340438…3405cc Dummy {f00=0x0106, f01=0x018e, f02=» A4 BUFFER ADDRESS ; P* < PFD:WRI EQU * < * P IFT CHAN=0 < > P LDKL A1,/C000 WORDS,WRITE < R P XIF < t P IFT CHAN=1 < ( P CM DWTRW,A6 INDICATOR TO WRITE MODE < P XIF < P RF FD:800 < P* < PFD:REA EQU * < P IFT CHAN=1
0x3405cc…340760 Dummy {f00=0x0106, f01=0x0190, f02=» PFD:800 EQU * = P IFT CHAN=0 = " P SRL A3,1 FROM BYTES TO WORDS = , P* = R P IFT MMUPAG=1 = & P ORR* A1,A8 GET FIRST WORD OF ECB = r * P ANKL A1,/F000 KEEP FOUR LEFTMOST BITS = P XIF = P* = P IFT CHAN=0 = P ORR A3,A1 = PWE
0x340760…3408f4 (2, 293) Dummy {f00=0x0106, f01=0x0190, f02=» P* > . P* PUT BUFFER START AND END ADDRESS IN DWT > P* > @ P ST A4,DWTUB,A6 > J P ADR A3,A4 > b " P ST A3,DWTUBE,A6 END ADDRESS+2 > t P XIF > PFD:820 EQU * > & P ST A5,DWTA5,A6 SAVE STACK POINTER > $ PFD:CIO CIO A2,1,CUADR CIO-START >
0x3408f4…340a88 Dummy {f00=0x0106, f01=0x0190, f02=» > P* ? * P************************************* ? * P* * ? @ * P* FD:RC - STORE EFF LEN, END:IO * ? n * P* * ? * P************************************* ? P* ? P* INP
0x340a88…340c1c Dummy {f00=0x0106, f01=0x0190, f02=»D A2,ECBRL,A8 REQ LENGTH ? P ST A2,ECBEL,A8 EFF LENGTH @ P EJECT DRFD01 @ B P* @ Z P********** @ d P* * @ v P* END:IO * @ P* * @ P********** @ P* @ PEND:IO EQU * @ P CF A15,TENDIO @ PT:DISP ABL TDISP @
0x340c1c…340db0 Dummy {f00=0x0106, f01=0x018e, f02=»END:10 LDK A1,8 RETURN CODE @ P RB END:IO A $ P EJECT DRFD01 A 6 P* A N P******************** A X P* * A t P* RECOVERY ROUTINE * A P* * A P******************** A P* A PFDON EQU * A P IFT CPU
0x340db0…340f44 Dummy {f00=0x0106, f01=0x0190, f02=» P XIF B P* B P LDKL A6,DWFD01 DWT ADDRESS B P* B > PFDON05 EQU * B H P IM DWTA2,A6 SET FDON FLAG B P LDKL A5,DWTSB2 B ~ P ADR A5,A6 GET STACK BASE B P* B P IFF DSKPAG+SWPBLK=0 B , P LD A2,INIFLG CHECK INITIALIZATION FLAG B
0x340f44…3410d8 Dummy {f00=0x0106, f01=0x0190, f02=»T FLEXIBLE DISC? B P LDR A3,A2 C . P CF A5,SETCIO DRIVE NR IN CIO INSTRUCTION C * ( P CF A5,FDIX GET DRIVE BIT INDICATOR C * P ORS A3,DWTLC,A6 INDICATE DRIVE LOCKED C P* C P EJECT DRFD01 C P* C P* C P C1R A3,A3 C * P ANS A3,DW
0x3410d8…34126c Dummy {f00=0x0106, f01=0x0190, f02=» P CF A5,FD:REA D P LD A3,SCTPLD D 0 P CF A5,VOLA05 GET VOLUME NAME ADDRESS IN DWT D 0 P LDK A1,2 D d P LDK A3,3 D v P* D P* MOVE VOLUME NAME TO DWT D P* D PFDON06 LD A4,BUF,A1 D P STR A4,A2 D P ADK A1,2 D P ADK A2,2
0x34126c…341400 Dummy {f00=0x0106, f01=0x0190, f02=» SAVE DWTST TO DWTST2 IF NOT ALREADY DONE. D P* DWTST IS SET BUSY E 2 P* E P P LD A2,DWTST2,A6 E Z P CWK A2,-1 E r P RF(NE) FDON08 ALREADY SAVED E P LD A2,DWTST,A6 E P ST A2,DWTST2,A6 E PFDON08 CM DWTST,A6 SET BUSY E P* E P I
0x341400…341594 (2, 294) Dummy {f00=0x0106, f01=0x0190, f02=»ER POINTER E | P RF(Z) FDON09 NOT RUNNING F P CMR A4 STOP TIMER F 4 $ P CM DWTTP2,A6 INDICATE NO TIMER F N PFDON09 EQU * F v P* F 6 P* OPEN FD TO MAKE FOLLOWING LOCK ORDER POSSIBLE F 2 P LDKL A4,SPDLCI OPEN/CLOSE STATUS WORD ADDRESS F P* F
0x341594…341728 Dummy {f00=0x0106, f01=0x0190, f02=»ATUS WORD TO OPEN F ~ P* G P LDR* A2,A4 G $ & P OTR A2,0,SOPDA SET DRIVE TO OPEN G 8 P* G b P XIF G l P* G x P EJECT G P* G P* DELAY 2 SEC G P* G P LD A4,DWTTP,A6 G P RF(Z) FDON10 NO TIMER SET G P LDKL A4,-TIME G "
0x341728…3418bc Dummy {f00=0x0106, f01=0x018e, f02=»5,SETIMP G P DATA FDON20,TIME H P RB T:DISP H * P* H < P* TIME OUT ROUTINE H F P* H b PFDON20 LDR A6,A1 H l P CM DWTTP,A6 H P LDKL A5,DWTSB2 H P ADR A5,A6 STACK BASE H P* H P* LOCK DOORS H P* H P LDK A2,1 H
0x3418bc…341a50 Dummy {f00=0x0106, f01=0x0190, f02=» P* I P EJECT I P* I P* PUT DRIVE NO IN CIO INSTR I & P* I J P SRN A2,A3 DRIVE NO IN A3 I T * P CF A5,SETCIO PUT DRVE NO IN CIO-INSTR I v P LDK A2,/14 LOCK I P CF A5,FD:REA I P LD A2,DWTA3,A6 DRIVE IND. I P ANK A3,1 I P R
0x341a50…341be4 Dummy {f00=0x0106, f01=0x018e, f02=» I P* J P IFT OPCLOS=1 J P* J ( D P* RESTORE OPEN/CLOSE STATUS TO SAME VALUE AS BEFORE POWER OFF J 2 $ P LD A2,DWTOCF,A6 OPEN/CLOSE FLAG J z " P ORS A2,SPDLCI TO STATUS WORD J P CM DWTOCF,A6 CLEAR FLAG J P* J $ P LD A2,SPDLCI OPEN/CLO
0x341be4…341d78 Dummy {f00=0x0106, f01=0x018e, f02=» P* K P* ANY REQUEST? K P* K & . P* RESTORE STATUS SAVED IN DWST2 TO DWTST. K 0 P* SET DWTST2 TO -1 K b " P LD A2,DWTST2,A6 SAVED STATUS K ~ * P ST A2,DWTST,A6 PUT IN CUURENT STATUS K P LDKL A2,-1 K ( P ST A2,DWTST2,A6 INDICATE NOT SAVE
0x341d78…341f0c Dummy {f00=0x0106, f01=0x0190, f02=» K b P* L P* RETRY REQUEST L P* L * P IM DWTRTY,A6 INDICATE RETRY L 4 P LD A7,DWTOR,A6 L X P ANK A7,/3F ORDER L p P LD A8,DWTECB,A6 ECB ADDRESS L P ABL FDAD REACTIVATE L P EJECT DRFD01 L P* L P********************* L
0x341f0c…3420a0 Dummy {f00=0x0106, f01=0x0190, f02=» EQU * L $ P ST P,INTSAV SAVE LAST INTERRUPT M " P******************** =1 START M 6 P IFT CPU852=1 M * P CF A15,SAVE8 SAVE REGISTERS ON STACK M r P XIF M P* M P IFT CPU852=0 M " P MSR 8,A15 SAVE A1-A8 ON STACK M P XIF M P* M P
0x3420a0…342234 (2, 295) Dummy {f00=0x0106, f01=0x0190, f02=»FFER M v P SUR A2,A1 LENGTH N PIH005 EQU * N & P SST A3,CUADR GET STATUS N : " P RF(A) IH:000 READY INTERRUPT N Z ( P LD A3,DWTRW,A6 READ/WRITE INDICATOR N P RF(NZ) IH050 READ N P* N P EJECT DRFD01 N P* N P* N PIH010 EQU * N
0x342234…3423c8 Dummy {f00=0x0106, f01=0x0190, f02=»WRITE N P RB(NA) IH005 O $ P ADK A1,2 UPDATE BUFFER POINTER O $ P SUK A2,2 O L P RB(P) IH010 O ^ P CIO A2,0,CUADR CIO HALT O r P ABL TDISP GOTO DISPATCHER O P* O PIH050 EQU * O P INR A3,0,CUADR READ O P RB(NA) IH005 O $ P SC
0x3423c8…34255c Dummy {f00=0x0106, f01=0x0190, f02=» A2,2 O P RB(P) IH050 P P CIO A2,0,CUADR CIO HALT P " P SST A3,CUADR STATUS =2 P B P RB(NA) *-2 =2 P b PIH:000 EQU * =1 P z P XIF P P* P P EJECT DRFD01 P P* P P* P P******************** =1 END P P IFT CHAN=0 =2 P
0x34255c…3426f0 Dummy {f00=0x0106, f01=0x0190, f02=»,A6 STACK POINTER P P SLL A3,1 Q P RF(N) FDRE READY INTERRUPT Q , P SRL A3,1 Q P P LD A2,DWTRTY,A6 RETRY? Q b P RF(Z) IH:10 NO Q " P CM DWTRTY,A6 RESET RETRY FLAG Q P LDR A1,A3 Q P ANKL A1,/0405 Q P RF(Z) IH:10 RETURN CODE OK Q
0x3426f0…342884 Dummy {f00=0x0106, f01=0x0190, f02=» CU - ECB Q x P* R P ANKL A3,/FF37 R P RF(Z) IH:80 R 2 P LDR A1,A3 R F " P ANKL A3,/0A05 UNCHANGED BITS R X P LDR A4,A1 R ~ P ANKL A4,/0400 BIT 5 R P SLC A4,7 TO BIT 14 R P ORR A3,A4 R P IFT TOSS+IBM=0 R P LDR A4,A1 R P ANK
0x342884…342a18 Dummy {f00=0x0106, f01=0x0190, f02=» BIT 7 R P ORR A3,A4 S P ANK A1,/10 BIT 11 S P SRC A1,5 TO BIT 0 S : P ORR A3,A1 S T PIH:80 EQU * S f P IFT CHAN=1 =1 S z P INH =1 S P XIF =1 S P RTN A5 S P EJECT DRFD01 S P* S P******************** S P*
0x342a18…342bac Dummy {f00=0x0106, f01=0x0190, f02=»,DWTA2,A6 S , P ABL(NZ) T:DISP POWER ON ROUTINE ACTIVE T P LDKL A5,DWTSB2 T B P ADR A5,A6 STACK BASE T Z P RB FDON60 T x P EJECT DRFD01 T P* T 0 P******************************************* T 0 P*
0x342bac…342d40 Dummy {f00=0x0106, f01=0x0190, f02=»*********************** T | P* U P******* U * P* * U : P* BIO * U J P* * U Z P******* U j P* U z P* U P* INPUT: A8 ECB ADDRESS U P* U > P* OUTPUT: A2 BITS 0-12 OF CONTROL WORD USED BY CIO START U 0 P* A
0x342d40…342ed4 (2, 296) Dummy {f00=0x0107, f01=0x0190, f02=»10 U PBIO:RE LDK A4,1 V PBIO010 EQU * V " P LD A3,ECBRL,A8 REQ LEN V 6 P RF(N) BIOERR ILLEGAL LENGTH V V P IFT TOSS+IBM=2 V z P LD A2,DWTLAB,A6 V P AN A2,DWTA3,A6 V P RF(Z) BIO020 TOSS DISC V P XIF V P IFT IBM=1 V P LDK A7,
0x342ed4…343068 Dummy {f00=0x0107, f01=0x0190, f02=»LEN V ~ P LDK A2,3 W PBIO030 EQU * W P XIF W 2 P IFF TOSS+IBM=0 W > P ADK A4,0 SET CR W V P RF(Z) BIO060 WRITE W n P LDK A2,0 W P LDR A1,A3 REQ LEN W & P CWR A3,A7 REQ LENGTH WITHIN RANGE W P RF(G) BIOERR NO W PBIO040 SUK A1,12
0x343068…3431fc Dummy {f00=0x0107, f01=0x018e, f02=»* W PBIO060 CWR A3,A7 X " P RF(NE) BIOERR ILLEGAL REQ LEN X " P XIF X H P IFT TOSS+IBM=0 X T P* X l > P* FIND NO OF SECTORS TO BE READ/WRITTEN, CHECK REQ LENGTH X v P* X P LDR A1,A3 REQ LENGTH X P LDK A2,0 NO OF SECTORS-1 X $ PBIO015
0x3431fc…343390 Dummy {f00=0x0107, f01=0x0190, f02=» P* Y PBIO035 SUK A1,128 Y & P RF(NP) BIO100 REQ LENGTH ACCEPTED Y ( PBIO045 ADK A2,1 Y R P CWK A2,3 Y j P RB(NG) BIO015 Y | $ P RF BIOERR REQ LEN OUTSIDE RANGE Y P XIF Y P* Y 6 PBIO100 SRC A2,2 SHIFT NO OF SECTORS-1 INTO POS 0-1 Y
0x343390…343524 Dummy {f00=0x0107, f01=0x0190, f02=»SECTOR NO Y P RF(N) BIOER2 OUTSIDE RANGE Z P IFT TOSS+IBM=2 Z 6 P ANK A7,/A Z N P RF(Z) BIO110 IBM DISC Z ` P XIF Z ~ P IFT TOSS=1 Z P CWK A1,499 Z P RF(G) BIOER2 OUT OF RANGE Z , P SLL A1,2 MULTIPLY BY 4TO GET DM SECTOR Z P XIF
0x343524…3436b8 Dummy {f00=0x0107, f01=0x0190, f02=» P XIF [ P IFT TOSS+IBM=0 [ ( P CWK A1,2001 SECTOR NO OUT OF RANGE [ ( P RF(G) BIOER2 YES! [ T P XIF [ n PBIO120 EQU * [ z P SLL A1,3 [ P ORR A2,A1 [ " P LD A4,ECBBA,A8 BUFFER ADDRESS [ P LDR A1,A3 REQ LENGTH [ P ANK A1,1 [ $ P
0x3436b8…34384c Dummy {f00=0x0107, f01=0x0190, f02=» PBIOERR ABL END:10 P* ILLEGAL SECTOR NO PBIOER2 ABL FD:DIS < P* V P EJECT DRFD01 ` P* x P********* P* * P* FDIX * P* * P********* P* P* INPUT: A2 X P*
0x34384c…3439e0 Dummy {f00=0x0107, f01=0x018e, f02=»LL A3,1 P SUK A2,1 ] P RB FDIX10 ] " PFDIX20 RTN A5 ] 4 P EJECT DRFD01 ] J P IFF TOSS+IBM=0 ] b P****************** ] z P* * ] P* VOLADR * ] P* * ] P****************** ] P* ] P*
0x3439e0…343b74 (2, 297) Dummy {f00=0x0107, f01=0x0190, f02=» ] P LC A3,DWTOR,A6 DRIVE NO ^ PVOLA05 EQU * ^ ( P LDK A2,DWTVO0 ^ < P ADR A2,A6 ^ R P ANK A3,/3 ^ d PVOLA10 EQU * ^ v P RF(Z) VOLA20 ^ P ADK A2,6 UPDATE ADDRESS ^ P SUK A3,1 ^ P RB VOLA10 ^ PVOLA20 RTN A5 ^ P XIF ^ P ^
0x343b74…343d08 Dummy {f00=0x0107, f01=0x0190, f02=»ASCII TRANSFORMS A STRING FROM EBCDIC TO ^ P* ASCII CODE _ 0 . P* INPUT STRING ADDRESS IS BUF _ P & P* INPUT: A7 NO OF CHARACTERS _ , P* A4 OUTPUT STRING ADDRESS _ P* OUTPUT: A1 CHANGED _ P*
0x343d08…343e9c Dummy {f00=0x0107, f01=0x0190, f02=»C:10 SUK A7,1 _ P RF(N) ASC:20 ` P SUK A4,1 ` , " P LC A1,BUF,A7 GET EBCDIC CHAR ` > ( P LC A1,TASCII,A1 TRANSFORM TO ASCII ` d 0 P SCR A1,A4 PUT ASCII CHAR. IN OUTPUT BUFFER ` P RB ASC:10 ` PASC:20 EQU * ` " P RF EBC:90 SET INH AND RETURN
0x343e9c…344030 Dummy {f00=0x0107, f01=0x018e, f02=»ES A STRING FROM ASCII TO ` r P* EBCDIC CODE a " 8 P* OUTPUT STRING IS PUT IN DRIVER BUFFER a D P* a & P* INPUT: A7 NO OF CHARACTERS a * P* A4 INPUT STRING ADDRESS a P* a P* OUTPUT: A1 CHANGED a
0x344030…3441c4 Dummy {f00=0x0107, f01=0x0190, f02=» P LDK A1,0 b PEBC:10 SUK A7,1 b P RF(N) EBC:80 b . P SUK A4,1 b D P LCR A1,A4 GET ASCII CHAR. b V P LC A1,TEBCDIC,A1 b x P SC A1,BUF,A7 b P RB EBC:10 b PEBC:80 EQU * b P LDKL A4,BUF b PEBC:90 EQU * b P CF A5,SETINH b
0x3441c4…344358 Dummy {f00=0x0107, f01=0x0190, f02=»EC TRANSFORMS PHYSICAL SECTOR TO STANDARD b ~ , P* LOGICAL SECTOR (BINARY). c 2 < P* FORMAT OF PHYS. SEC. TT0SS (EBCDIC CODE) c b * P* TT = TRACK, SS=SECTOR c P* c , P* INPUT: A4 ADDRESS TO PHYS. SECTOR c
0x344358…3444ec Dummy {f00=0x0107, f01=0x0190, f02=»F A5,DECBIN c P LDR A3,A1 SAVE d P ADK A4,2 d , P* d > P* MULTIPLY BY 26 d H P* d b P SLL A3,5 *32 d l P LDR A2,A1 d P SLL A2,2 d P SUR A3,A2 *28 d P SLL A1,1 d P SUR A3,A1 *26 d P CF A5,DECBIN d P SUK A1,1 d
0x3444ec…344680 Dummy {f00=0x0107, f01=0x0190, f02=»F+EOD+4 EOD? d P RF(E) LOG:02 YES! e P SUKL A1,1898 e . P RF LOG:04 e D P* e V " P* CHECK EOD LESS/EQUAL 74001 e ` P* e PLOG:02 SUKL A1,1899 e PLOG:04 EQU * e " P RF(P) LOG:10 NOT ACC SEC. NO e " P SUK A4,4 RESET BUFFER POINTER e
0x344680…344814 (2, 298) Dummy {f00=0x0107, f01=0x0190, f02=»DE e r P ORS A1,DWTRCW,A6 f P CF A5,SETINH f $ P ABL LOA:90 ERROR ROUTINE f : P* f P EJECT DRFD01 f f P* f ~ P********** f P* DECBIN* f P********** f P* f > P* FUNCTION: DECBIN TRANSFORMS TWO EBCDIC CODED DIGITS TO f D
0x344814…3449a8 Dummy {f00=0x0107, f01=0x0190, f02=» BINARY f P* WORKING REG: A2,A7 g P* g 0 PDECBIN LDK A1,0 g : P LDK A7,2 g R PDEC:10 LCR A2,A4 DIGIT g d P ANK A2,/FF g P SUK A2,/F0 g P RB(N) LOG:05 g P SUK A2,9 g P RB(P) LOG:05 NOT DIGIT g P ADK A2,9 g P SUK
0x3449a8…344b3c Dummy {f00=0x0107, f01=0x0190, f02=»DK A1,/A MULTIPLY BY 10 g P RB DEC:20 h PDEC:30 ADR A1,A2 h 2 P RTN A5 h J P XIF h Z P EJECT DRFD01 h f P* h ~ P********** h P* SETCIO * h P********** h P* h 2 P* FUNCTION: PUT DRIVE NO IN CIO INSTRUCTION h P* h 8 P
0x344b3c…344cd0 Dummy {f00=0x0107, f01=0x0190, f02=» PSETCIO LDKL A4,/FFCF i P ANS A4,FD:CIO i P SLL A3,4 i 6 P ORS A3,FD:CIO i H P RTN A5 i ^ P IFT IBM=1 i n P EJECT DRFD01 i P* i P********** i P* BINDEC * i P********** i P* i : P* FUNCTION: BINDEC TRANSFORMS A BINA
0x344cd0…344e64 Dummy {f00=0x0107, f01=0x0190, f02=»UTPUT: A3 EBCDIC CODED DECIMAL DIGITS i P* A7 CHANGED j . P* j L PBINDEC LDK A3,0 j V PBIN:10 SUK A7,10 j n P RF(N) BIN:20 j P ADK A3,1 j P RB BIN:10 j PBIN:20 ADK A7,10 j P SLL A3,8 j * P ORR A3,A7 DECIMAL CONVERTED N
0x344e64…344ff8 Dummy {f00=0x0107, f01=0x0190, f02=»* j P* k 4 P* FUNCTION: PREPARE FOR READING DATA SET LABEL k P* k L P* INPUT: A6 DWT ADDRESS k V P* k x : P* OUTPUT: A2 BITS 0-12 SECTOR NO, BITS 13-15 ZEROES k P* A3 128 k ( P* A4 DRIVER BUFFER ADDRESS k P
0x344ff8…34518c Dummy {f00=0x0107, f01=0x018e, f02=»2 k P SLL A2,3 l P LDK A3,128 l P LDKL A4,BUF l 0 P RTN A5 l D P EJECT DRFD01 l T P* l l P********** l v P* DSOPCH * l P********** l P* l 6 P* FUNCTION: GET EOD-NO AND EOD-NO ADDRESS IN DWT l P* l P* INPUT: A6
0x34518c…345320 Dummy {f00=0x0107, f01=0x0190, f02=» l x PDSOPCH LDK A1,DWTEOD m P CF A5,DSPAD m $ P LDR* A7,A2 EOD-NO m 8 P RTN A5 m R P EJECT DRFD01 m b P* m z P********* m P* DSPAD * m P********* m P* m 2 P* FUNCTION: GET ABSOLUTE ADDRESS OF SPECIFIED m 6 P* T
0x345320…3454b4 (2, 299) Dummy {f00=0x0107, f01=0x0190, f02=»UTPUT: A2 ADDRESS TO DATA m P* A6 DWT ADDRESS n " P* n D " PDSPAD LC A2,DWTOR,A6 DRIVE NO n N P ANK A2,/3 n t P ADR A2,A2 n P ADR A2,A6 n P ADR A2,A1 n P RTN A5 n P EJECT DRFD01 n P* n P********* n P* STDWT
0x3454b4…345648 Dummy {f00=0x0107, f01=0x018e, f02=» ( P* INPUT: A1 OFFSET TO DWT AREA o . P* A3 WORD TO BE STORED IN DWT o 0 P* A6 DWT ADDRESS o b P* o P* OUTPUT: A1 UNCHANGED o 0 P* A2 ADDRESS TO WORD IN DWT AREA o P* A3 UNCHANGED o P
0x345648…3457dc Dummy {f00=0x0107, f01=0x018e, f02=» o ~ P* p P********** p P* SETINH * p $ P********** p 6 P* p H @ P* FUNCTION: INHIBIT INTERRUPTS, IF FDON ROUTINE IS ACTIVE p R > P* ESCAPE VIA DISPATCHER ELSE RESET DWTENB AND p P* RETURN p P* p " P* INPUT:
0x3457dc…345970 Dummy {f00=0x0107, f01=0x0190, f02=» p | PSET:10 RTN A5 q P XIF q P* q * " P* D R I V E R B U F F E R q 4 PBUF DATA 0,0,0,0 q Z P* q r P IFT IBM=1 q | P RES 60 q P XIF q P* q P EJECT DRFD01 q P* q P********************* q P*
0x345970…345b04 Dummy {f00=0x0107, f01=0x0190, f02=»0 q P DATA /8000 DWT STATUS r P DATA 0 ECB ADDRESS r ( P DATA 0 ORDER r D " P DATA FDADR ACTIVATION ADDRESS r Z P DATA 0 TTAB-ADDRESS r $ P DATA 0 WAIT/ACTIVATE INDICATOR r P DATA 0 TERMINAL QUEUE r P* r IFT MMUPAG=1 r & " DATA
0x345b04…345c98 Dummy {f00=0x0107, f01=0x0190, f02=» DATA 0 r P DATA 0 s P DATA 0,0,0,0 STACK s ( PDWTST2 EQU *-DWFD01 SAVE STATUS WORD s < P DATA -1 s h * PDWTRTY EQU *-DWFD01 RETRY REQUEST FLAG s x P DATA 0 s $ PDWTTP EQU *-DWFD01 TIMER POINTER s P DATA 0 s ( PDWTRCW EQU *-DWFD01 TEMP R
0x345c98…345e2c Dummy {f00=0x0107, f01=0x0190, f02=»R s j P DATA 0 t ( PDWTVO0 EQU *-DWFD01 VOLUME NAME NO 0 t P DATA 0,0,0 t F ( PDWTVO1 EQU *-DWFD01 VOLUME NAME NO 1 t Z P DATA 0,0,0 t ( PDWTVO2 EQU *-DWFD01 VOLUME NAME NO 2 t P DATA 0,0,0 t ( PDWTVO3 EQU *-DWFD01 VOLUME NAME NO 3 t P D
0x345e2c…345fc0 Dummy {f00=0x0107, f01=0x0190, f02=» FLAG AT POWER ON t r P DATA 0 u P XIF u * P* u 6 P IFT CHAN=1 u @ 6 PDWTUB EQU *-DWFD01 POINTER AT NEXT WORD IN BUFFER u T P DATA 0 u , PDWTUBE EQU *-DWFD01 BUFFER END ADDRESS+2 u P DATA 0 u , PDWTRW EQU *-DWFD01 READ/WRITE INDICATOR u
0x345fc0…346154 (2, 300) Dummy {f00=0x0108, f01=0x0190, f02=»OD EQU *-DWFD01 END OF DATA u P DATA 0,0,0,0 v $ & PDWTEOE EQU *-DWFD01 END OF EXTENT v : P DATA 0,0,0,0 v d * PDWTCRN EQU *-DWFD01 CURRENT RECORD NO v z P DATA 0,0,0,0 v . PDWTDSS EQU *-DWFD01 DATA SET LABEL SECTOR v P DATA 0,0,0,0 v P X
0x346154…3462e8 Dummy {f00=0x0108, f01=0x0190, f02=»PHYSICAL BUFFER ADDRESS v P DATA 0 SECOND MMU ENTRY w P* w @ PDWT:LA EQU *-DWFD01 w J * P DATA 0 16 BIT LOGICAL BUFFER ADDRESS w f P* w PDWT:BF EQU *-DWFD01 w $ P DATA 0 SAVE AREA BUFFER ADDRESS w P XIF w P* w P IFT MMUPAG=1 w
0x3462e8…34647c Dummy {f00=0x0108, f01=0x4098, f02=» w | P XIF x P* x P IFT MMUPAG=1 x P IFT DEVIND=4 x 4 PFD:BUF EQU 0 x J P XIF x ^ P* x j P* x t P* x ~ P END x @ x PDWT:BF EQU *-DWFD01 w $ P DATA 0 SAVE AREA BUFFER ADDRESS w P XIF w P* w P IFT MMUPAG=1 w
0x34647c…346610 Dummy {f00=0x0108, f01=0x2008, f02=» y END @
0x346610…3467a4 Dummy {f00=0x0108, 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
0x3467a4…346938 Dummy {f00=0x0108, f01=0x0190, f02=» ABC-LV LRC O VRC ERROR IN BLOCK D = 0 C = E R 8 P* DRD DATA REQUEST DELAYED D # 0 C = 0 S 8 F P* LOCAL CHAR. MAY BE DIFFERENT FROM ZERO S t 8 P* STD STATUS MESSAGE D # 0 C # 0 S 2 P* DIN
0x346938…346acc Dummy {f00=0x0108, f01=0x0190, f02=» PCHLT1 EQU * T P* T $ P ST P,INTSAV SAVE LAST INTERRUPT T " P* T J P IFT CPU852=1 T T & P CF A15,SAVE8 SAVE A1-A8 ON STACK T j P XIF T P* T P IFT CPU852=0 T " P MSR 8,A15 SAVE A1-A8 ON STACK T P XIF T P* T P LDK A7,2 IN
0x346acc…346c60 Dummy {f00=0x0108, f01=0x0190, f02=» P* INTERRUPT FROM CHLT2 U P* U & P IFT LOCHAN=2 U 0 $ P ST P,INTSAV SAVE LAST INTERRUPT U F P* U n P IFT CPU852=1 U x & P CF A15,SAVE8 SAVE A1-A8 ON STACK U P XIF U P* U P IFT LOCHAN=2 U P IFT CPU852=0 U " P MSR 8,A15 SAV
0x346c60…346df4 (2, 301) Opaque[0x194]
0x346df4…346f88 # DirEnt {nam=»DRIC01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2108, f03=0x0000}
0x346df4…346f88 IdxSect {
0x346df4…346f88 f00 = 0x0108 // 0x346df4 @0x0
0x346df4…346f88 f01 = 0x000a // 0x346df6 @0x2
0x346df4…346f88 gno = [ // 0x346df8 @0x4
0x346df4…346f88 [0x00]: C0x0108.0x1.0
0x346df4…346f88 [0x01]: C0x0108.0x2.0
0x346df4…346f88 [0x02]: C0x0108.0x3.0
0x346df4…346f88 [0x03]: C0x0109.0x0.0
0x346df4…346f88 [0x04]: C0x0109.0x1.0
0x346df4…346f88 ]
0x346df4…346f88 }
0x346f88…34711c Dummy {f00=0x0108, f01=0x0190, f02=» 2 P IDENT DRIC01 9.2DK 0 80-01-02 870105040920 P : P =DK0, MMU BUF SIZE B P 80-03-11 ` P* t P* ~ 2 P********************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P* DRIC01 = I
0x34711c…3472b0 Dummy {f00=0x0108, f01=0x0190, f02=»******** j P* 8 P* THIS MODULE HANDLES THE INTERTASK COMMUNICATION P* V P EJECT DRIC01 ` P* x P* ORDERS: P* P* /02 READ, NOT ADDRESSED " P* /06 WRITE, NOT ADDRESSED P* /0A READ, ADDRESSED
0x3472b0…347444 Dummy {f00=0x0108, f01=0x018e, f02=» z P* A6 DWT ADDRESS P* A7 ORDER CODE $ P* A8 ECB ADDRESS @ , P* A12 ADDRESS TO DRIVER ADDRESS BLOCK P* P EJECT DRIC01 P* P* P*********** P* ENTRIES * P*********** P* P
0x347444…3475d8 Dummy {f00=0x0108, f01=0x0190, f02=» b P EJECT DRIC01 P* P* * P************* 4 P* EXTERNALS * J P************* ` P* v P* P EXTRN TDISP DISPATCHER P EXTRN TENDIO ENDIO P EXTRN DISIOE REQUEST ERROR & P EXTRN DISEND TENDIO AND DISPA
0x3475d8…34776c Dummy {f00=0x0108, f01=0x0190, f02=»T TTAB ADDRESS & P EXTRN DWTSB1 STACK BASE 1 IN DWT & P EXTRN BUFLEN DRIVER BUFFER LENGTH @ P EXTRN SETIMP TIMER j , P EXTRN FNDTID FIND TTAB ADDRESS FROM TID P EXTRN TTB:ST TASK STATUS " P EXTRN TTB:TD TERMINAL DEVICES 4 P EXTRN IHR
0x34776c…347900 Dummy {f00=0x0108, f01=0x0190, f02=»CBEL ECB EFFECTIVE LENGTH P EXTRN ECBRC ECB RETURN CODE " " P EXTRN ECBCW ECB CONTROL WORD F P EJECT DRIC01 TOSSIO l P* P* . P***************************************** P* P* CONDITIONAL ASSEMBLY P* . P****
0x347900…347a94 (2, 302) Dummy {f00=0x0108, f01=0x018e, f02=»G EQU 1. r P* PMMUPAG EQU 1 P* . 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION 8 . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. r P* PCPU852 EQU 0 P* P* MMU BUFFER SIZE P* PX:A EQU 50 PX:Q EQ
0x347a94…347c28 Dummy {f00=0x0108, f01=0x0190, f02=» P* P EJECT DRIC01 P* * P* 4 P********************* > P* DWT DISPLACEMENTS * P********************* z P* P* 0 PDWTDRD EQU /10 START OF DRIVER DEFINED PART P* P IFT MMUPAG=0 PSTART EQ
0x347c28…347dbc Dummy {f00=0x0108, f01=0x0190, f02=»INTER t PDWTIME EQU START+/02 TIME 6 PDWTANC EQU START+/04 POINTER TO FIRST DWT IN QUEUE 0 . PDWTQUE EQU START+/06 QUEUE ANCHOR ADDRESS j P* P EJECT DRIC01 P* P* P***************** P* ADDRESS BLOCK * P**
0x347dbc…347f50 Dummy {f00=0x0108, f01=0x018e, f02=» DATA ICAD ACTIVATION ADDRESS P DATA ITABRT ABORT ADDRESS & P* H P* R 6 PRD:QUE DATA 0 QUEUE ANCHOR NOT ADDRESSED READ REQ. 8 PWR:QUE DATA 0 QUEUE ANCHOR NOT ADDRESSED WRITE REQ. P* $ P* INTERTASK DRIVER BUFFER (MMU) P*
0x347f50…3480e4 Dummy {f00=0x0108, f01=0x0190, f02=» P* A C T I V A T I O N P* " PICAD EQU * , P LDR A1,A7 ORDER CODE TO A1 > P SUK A1,2 b & P RF(Z) RD:NAD READ NOT ADDRESSED? t P SUK A1,4 ( P ABL(Z) WR:NAD WRITE NOT ADDRESSED? P SUK A1,4 " P RF(Z) RD:ADR READ ADDRESS
0x3480e4…348278 Dummy {f00=0x0108, f01=0x0190, f02=»* S E T T I M E O U T P* " P LD A2,ECBCW,A8 GET TIME , P ST A2,DWTIME,A6 L P RF END:IO d P* v P EJECT DRIC01 P* P* R E A D, A D D R E S S E D P* " P* W R I T E, A D D R E S S E D P* PRD:ADR E
0x348278…34840c Dummy {f00=0x0108, f01=0x0190, f02=»CW,A8 TID & P CF A15,FNDTID TTAB ADDRESS TO A2 P ADK A2,0 SET CR < P RF(Z) DIS:OE NOT FOUND? T P CW A2,DWTTAB,A6 t P RF(E) DIS:OE ILLEGAL TID? 4 P ADKL A2,TTB:TD ADDRESS TO TERMINAL DEVICE TABLE P LDR* A1,A2 TABLE LENGTH $ P L
0x34840c…3485a0 Dummy {f00=0x0108, f01=0x0190, f02=» $ P* FIND DWT OF ADDRESSED TASK P* , 0 PADR:20 ADK A2,4 ADDRESS TO NEXT DWT ADDRESS 6 P SUK A1,4 j P RF(N) DIS:OE NOT FOUND? | P* P LDR* A4,A2 DWT ADDRESS " P CW A7,DWTADR,A4 SEARCHED DWT? P RB(NE) ADR:20 NO, TRY NEXT
0x3485a0…348734 (2, 303) Dummy {f00=0x0108, f01=0x0190, f02=»NCHOR ADDRESS t " P CWR A1,A6 CHECK QUEUE ANCHOR 0 P RF(E) ADR:30 REQUEST ISSUED FOR THIS TASK? < P* p P ANK A7,1 z P RF(Z) ADR:25 READ? P CWK A1,RD:QUE ( P RF(E) ADR:30 COMPLEMENTARY REQUEST? P RF ADR:50 NO P*
0x348734…3488c8 Dummy {f00=0x0108, f01=0x0190, f02=» ABORT TIMER IF ANY P* > PADR:30 CF A15,ITAB05 ABORT TIMER AND REMOVE DWT FROM QUEUE & P ANK A7,1 h P RF(Z) RD:N05 READ? z P* P* MOVE BUFFER P* PADR:35 EQU * " P LDKL A5,DWTSB1 GET STACK BASE P ADR A5,A6
0x3488c8…348a5c Dummy {f00=0x0108, f01=0x0190, f02=»G BUFFER ADDRESS v P ANK A3,1 & P RF(Z) ADR:38 BUFFER ADDRESS EVEN? * : P ORS A3,ECBBA,A9 MAKE RECEIVING BUFFER ADDRESS UNEVEN T P RF END:IO P* PADR:38 EQU * P SUK A3,2 A3 := /FFFE 8 P ANS A3,ECBBA,A9 MAKE RECEIVING BUFFER A
0x348a5c…348bf0 Dummy {f00=0x0108, f01=0x0190, f02=»C01 P* P* OUEUE REQUEST P* . . PADR:40 LDK A7,0 INDICATE ADDRESSED REQUEST 8 P* j PADR:50 EQU * t P LD A3,DWTIME,A6 TIME P RF(Z) TWR:30 P ADK A3,1 $ P RF(Z) ADR:70 NO TIMING WANTED? P SUK A3,1 P
0x348bf0…348d84 Dummy {f00=0x0108, f01=0x0190, f02=»NTER | P ST A3,TIME P CF A15,SETIMP SET TIMER P DATA TIMOUT TIMEOUT ADDRESS @ PTIME DATA 0 d P* x P EJECT DRIC01 P* ( P* INSERT IN QUEUE WITHIN PRIORITY P* PADR:70 EQU * . P ST A2,DWTQUE,A6 STORE QUE
0x348d84…348f18 Dummy {f00=0x0108, f01=0x0190, f02=»SED REQUEST? x : P ADK A2,DWTANC POINT TO ADDRESS OF FIRST DWT IN QUEUE P* R PADR:80 LDR A4,A2 SAVE P LDR* A2,A2 NEXT IN QUEUE z P RF(Z) ADR:90 END FOUND? " P LD A5,DWTTAB,A2 TTAB ADDRESS & P CC A1,TTB:ST+1,A5 COMPARE LEVELS
0x348f18…3490ac Dummy {f00=0x0108, f01=0x0190, f02=»IOE REQUEST ERROR P* P EJECT DRIC01 $ P* < ( P* R E A D, N O T A D D R E S S E D F P* r $ PRD:NAD EQU * READ, NOT ADDRESSED | < P LD A2,DWTANC,A6 CHECK QUEUE OF ADDRESSED WRITE REQUESTS & P RF(NZ) RD:N10 ANYTHING IN QUEUE?
0x3490ac…349240 Dummy {f00=0x0108, f01=0x0190, f02=» n & P ST A3,WR:QUE UPDATE QUEUE ANCHOR P* 2 PRD:N00 EQU * < & P CF A15,ABTIM2 ABORT TIMER IF ANY P P* z PRD:N05 EQU * " P LDR A4,A6 EXCHANGE A2 AND A6 P LDR A6,A2 P LDR A2,A4 P RB ADR:35 P* ( PRD:N10 LDR
0x349240…3493d4 (2, 304) Dummy {f00=0x0109, f01=0x0190, f02=»UE ADDRESS r P RB ADR:50 INSERT IN QUEUE P* 4 P EJECT DRIC01 > P* V * P* W R I T E, N O T A D D R E S S E D ` P* & PWR:NAD EQU * WRITE, NOT ADDRESSED < P LD A2,DWTANC,A6 CHECK QUEUE OF ADDRESSED READ REQUESTS & P RF(NZ
0x3493d4…349568 Dummy {f00=0x0109, f01=0x0190, f02=»A3,A2 NO, REMOVE FROM QUEUE & P ST A3,RD:QUE UPDATE QUEUE ANCHOR $ P* N , PWR:N05 CF A15,ABTIM2 ABORT TIMER IF ANY X P RB ADR:35 P* ( PWR:N10 LDR* A3,A2 REMOVE FROM QUEUE ( P ST A3,DWTANC,A6 UPDATE QUEUE ANCHOR P RB WR:N05
0x349568…3496fc Dummy {f00=0x0109, f01=0x0190, f02=»O U T P* PTIMOUT LDR A6,A1 DWT ADDRESS " P CM* 0,A2 RESET TIMER POINTER < P LDR A2,A6 b $ P CF A15,ITAB10 REMOVE FROM QUEUE t P* PTWR:30 EQU * P CMR A6 RESET QUEUE LINK P LDK A1,/40 RETURN CODE P RB END:IO
0x3496fc…349890 Dummy {f00=0x0109, f01=0x0190, f02=»WILL UPDATE QUEUE AND ABORT TIMER (IF ANY). P* 4 P* INPUT: A6 = DWT ADDRESS > P* b " P* OUTPUT: A1-A4 ARE DESTROYED l P* PITABRT EQU * P LDR A2,A6 P* PITAB05 EQU * P CF A15,ABTIM ABORT TIMER P*
0x349890…349a24 Dummy {f00=0x0109, f01=0x0190, f02=» ITAB20 NOT-ADDRESSED READ REQUEST? P CWK A1,WR:QUE , . P RF(E) ITAB20 NOT-ADDRESSED WRITE REQUEST? B : P ADK A1,DWTANC POINT TO ADDRESS OF FIRST DWT IN QUEUE t P* P EJECT DRIC01 P* P* PITAB20 LDR A4,A1 SAVE P L
0x349a24…349bb8 Dummy {f00=0x0109, f01=0x0190, f02=»A4 UPDATE QUEUE LINKS P CMR A2 RESET QUEUE LINK P* > P IFT CPU852=1 H P RF IH:RTN ^ P XIF p P* | P IFT CPU852=0 P RTN A15 P XIF P* P EJECT DRIC01 P* P* A B T I M P* . P* SUB
0x349bb8…349d4c Dummy {f00=0x0109, f01=0x0190, f02=» P* PABTIM2 EQU * P CMR A2 RESET QUEUE LINK " P* B PABTIM LDK A1,DWTTP L $ P ADR A1,A2 TIMER POINTER ADDRESS f P LDR* A3,A1 " P RF(Z) IH:RTN NO TIMER ACTIVE? P CM* 0,A1 " P CMR A1 INDICATE NO TIMER SET P*
0x349d4c…349ee0 Dummy {f00=0x0109, f01=0x018e, f02=» EJECT DRIC01 P* P* M O V B U F " P* 8 4 P* SUBROUTINE TO MOVE BUFFER FROM SENDING TASK B P* TO ADDRESSED TASK. z > P* EFFECTIVE LENGTH IN BOTH INPUT AND OUTPUT ECB ARE SET. B P* A1 WILL CONTAIN RETURN CODE /8 IF SENDING
0x349ee0…34a074 (2, 305) Dummy {f00=0x0109, f01=0x0190, f02=» X P* P* INPUT PARAMETERS: P* A2 RECEIVING DWT 0 P* A5 STACK POINTER N P* A6 SENDING DWT l P* P* REGISTER USAGE: P* A1 RETURN CODE P* A2 DWT RECEIVING TASK P* A3 WORKING REGISTER
0x34a074…34a208 Dummy {f00=0x0109, f01=0x0190, f02=» A8 ECB ADDRESS SENDING TASK & P* A9 ECB ADDRESS RECEIVING TASK & P* P PMOVBUF EQU * Z P LD A8,DWTECB,A6 SENDING ECB n $ P ENB GIVE OTHER TASKS A CHANCE P* P EJECT DRIC01 P* P* P LDK A1,0 " P LD A9
0x34a208…34a39c Dummy {f00=0x0109, f01=0x0190, f02=»V:05 , P LDK A1,8 RETURN CODE (INCORRECT LENGTH) P LD A3,ECBRL,A9 < P RB(N) DIS:OE T P* j PMOV:05 EQU * t P IFT MMUPAG=1 6 P LDKL A4,ITAD GET ADDRESS TO DRIVER ADDRESS BLOCK * P CW A3,BUFLEN,A4 CHECK MMU BUFFER SIZE , P R
0x34a39c…34a530 Dummy {f00=0x0109, f01=0x018e, f02=» P* ! PMOV:10 EQU * ! P XIF ! " P* ! . P ! 8 $ P ST A3,ECBEL,A8 EFFECTIVE LENGTH ! @ $ P ST A3,ECBEL,A9 EFFECTIVE LENGTH ! h P* ! P EJECT DRIC01 ! P* ! P* ! P IFT MMUPAG=0 ! * P LD A4,ECBBA,A8 SENDING BUFFER ADDRESS ! ,
0x34a530…34a6c4 Dummy {f00=0x0109, f01=0x40e0, f02=» ! j P LCR A9,A4 " P SCR A9,A7 " P ADK A4,1 " , P ADK A7,1 " > P RB MOV:15 " P P* " b PMOV:20 EQU * " l P XIF " P* " P INH " P RTN A5 " P* " P* " P* " P END " @ " A4,ECBBA,A8 SENDING BUFFER ADDRESS ! ,
0x34a6c4…34a858 Dummy {f00=0x0109, 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
0x34a858…34a9ec Dummy {f00=0x0109, f01=0x018e, f02=»-ADDRESS v ( PSOPDA EQU /2E S.O.P. DEVICE ADDRESS * PSTALEN EQU 512 MAX STANDARD SEC. LEN. < ( PTOSLEN EQU 410 MAX TOSS SEC. LENGTH j " PIBMLEN EQU 128 IBM SEC. LENGTH ( PBOE EQU 28 BEGIN OF EXTENT POSITION & PEOE EQU 34 END OF EXTENT POSITIO
0x34a9ec…34ab80 Dummy {f00=0x0109, f01=0x0190, f02=» P******************** P* * P* DWT-DISPLACEMENTS* < P* * X P******************** t P* 0 PDWTDRD EQU /10 START OF DRIVER DEFINED PART P* P IFT MMUPAG=0 PSTART EQU DWTDRD P X
0x34ab80…34ad14 (2, 306) Opaque[0x194]
0x34ad14…34aea8 # DirEnt {nam=»DRDC15«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2130, f03=0x0000}
0x34ad14…34aea8 IdxSect {
0x34ad14…34aea8 f00 = 0x0109 // 0x34ad14 @0x0
0x34ad14…34aea8 f01 = 0x002c // 0x34ad16 @0x2
0x34ad14…34aea8 gno = [ // 0x34ad18 @0x4
0x34ad14…34aea8 [0x00]: C0x0109.0x2.0
0x34ad14…34aea8 [0x01]: C0x0109.0x3.0
0x34ad14…34aea8 [0x02]: C0x010a.0x0.0
0x34ad14…34aea8 [0x03]: C0x010a.0x1.0
0x34ad14…34aea8 [0x04]: C0x010a.0x2.0
0x34ad14…34aea8 [0x05]: C0x010a.0x3.0
0x34ad14…34aea8 [0x06]: C0x010b.0x0.0
0x34ad14…34aea8 [0x07]: C0x010b.0x1.0
0x34ad14…34aea8 [0x08]: C0x010b.0x2.0
0x34ad14…34aea8 [0x09]: C0x010b.0x3.0
0x34ad14…34aea8 [0x0a]: C0x010c.0x0.0
0x34ad14…34aea8 [0x0b]: C0x010c.0x1.0
0x34ad14…34aea8 [0x0c]: C0x010c.0x2.0
0x34ad14…34aea8 [0x0d]: C0x010c.0x3.0
0x34ad14…34aea8 [0x0e]: C0x010d.0x0.0
0x34ad14…34aea8 [0x0f]: C0x010d.0x1.0
0x34ad14…34aea8 [0x10]: C0x010d.0x2.0
0x34ad14…34aea8 [0x11]: C0x010d.0x3.0
0x34ad14…34aea8 [0x12]: C0x010e.0x0.0
0x34ad14…34aea8 [0x13]: C0x010e.0x1.0
0x34ad14…34aea8 [0x14]: C0x010e.0x2.0
0x34ad14…34aea8 [0x15]: C0x010e.0x3.0
0x34ad14…34aea8 ]
0x34ad14…34aea8 }
0x34aea8…34b03c Dummy {f00=0x0109, f01=0x0190, f02=» 0 P IDENT DRDC15 9.2DK 7 83-10-12 870105040924 " P DK7,READ-MODIFIED, MODIFIED 8 P 82-10-02 ^ P DK6, READ MODIFIED r , P DK5, LP, DWTINF, ST.PR.BIT, 81-11-05 P P DK3, RBUFNR=1 ALLOWED P DK2, TBUFL P 80-03-1
0x34b03c…34b1d0 Dummy {f00=0x0109, f01=0x018e, f02=»UZ v P REL 9.1 79-07-19 & P =7, ACK IN CONVERSATIONAL MODE & P REL 9.1 79-07-19 P * P =6, DCTASK BUFFER ADDRESS DESTROYED l P REL 9.1 79-05-23 $ P =5, INCOMPLETE POLL SEQUENCE P REL 9.1 79-05-23 P =3, TRANSFE
0x34b1d0…34b364 Dummy {f00=0x0109, f01=0x018e, f02=» P PRR 9.1 78-11-29 P =1, MSR-INSTRUCTION P PRR 9.1 78-11-14 > P REL 8.2 78-11-14 Z P v P* ~ P* 2 P********************************************* P* $ P* PHILIPS TERMINAL SYSTEM PTS P* * P*
0x34b364…34b4f8 Dummy {f00=0x0109, f01=0x0190, f02=» P* P* P* P* " 8 P**************************************************** , P h P* r P* | P* ENTRY POINTS P* 2 P ENTRY DC15AD ADDRESS BLOCK TERMINAL REQUESTS " P ENTRY IH1501 INPUT INTERRUPT " P ENTRY
0x34b4f8…34b68c Dummy {f00=0x0109, f01=0x0190, f02=»AL REFERENCES P* P* " P EXTRN TDISP DISPATCHER ENTRY * ( P EXTRN SAVE8 SAVE A1-A8 ON A15 STACK P $ P EXTRN TENDIO COMPLETE I/O EVENT | P EXTRN DISIOE REQUEST ERROR P EXTRN SETIME SET TIMER P EXTRN DWTST DWT STATUS P
0x34b68c…34b820 Dummy {f00=0x0109, f01=0x018e, f02=» TABLE r ( P EXTRN TASCII EBCDIC TO ASCII TABLE $ P EXTRN ECBBA ECB BUFFER ADDRESS : & P EXTRN ECBRL ECB REQUESTED LENGTH b & P EXTRN ECBEL ECB EFFECTIVE LENGTH P EXTRN ECBRC ECB RETURN CODE " P EXTRN ECBCW ECB CONTROL WORD * P EXTRN D
0x34b820…34b9b4 (2, 307) Dummy {f00=0x0109, f01=0x018e, f02=» P P* P* P* " P* , 6 P* STANDARD INTERFACE PART FOR DATA COMMUNICATION 6 P* p P* z P* P* P* DWT CONTENTS P* J P* DWTCHP TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15) P*
0x34b9b4…34bb48 Dummy {f00=0x0109, f01=0x0190, f02=» P* ( PXRVI EQU /5C STANDARD:/40, DK:/5C DK * PX:D EQU 0 BASE FOR RBUFL AND TBUFL DK : " PX:X EQU 500 VALUE FOR BASE DK h & PX:A EQU 2000 RECEIVE BUFFER LENGTH PRBUFL EQU 650+X:X DK PX:B EQU /60 DCTASK FILE CODE PDC15FC EQU /60
0x34bb48…34bcdc Dummy {f00=0x0109, f01=0x0190, f02=»US AND RVI HANDLING IF=1 PSTAT EQU X:E ( PX:F EQU 1 READ COMMAND HANDLING IF=1 4 PRCOM EQU X:F ` & PX:G EQU 252 TRANSMIT BLOCK LENGTH t PTBLEN EQU X:G ( PX:H EQU 1 CODE , 0=ASCII , 1=EBCDIC PCODE EQU X:H * PX:I EQU 0 IF 1 SPECI
0x34bcdc…34be70 Dummy {f00=0x0109, f01=0x0190, f02=» PSPEED EQU X:J * PX:K EQU 0 IF 1 SIEMENS MSV1 PROCEDURE PMSV1 EQU X:K H . PX:L EQU 2 NUMBER OF RECEIVE BUFFERS (2-5) PRBUFNR EQU 2 ( PX:M EQU 0 IF = 1 PTS 6805 ADAPTION PP6805 EQU X:M PX:N EQU /02 P IFT P6805=0
0x34be70…34c004 Dummy {f00=0x0109, f01=0x018e, f02=» PX:O EQU 0 . PIBMCHR EQU X:O IF 1 IBM CHARACTER HANDLING . PX:P EQU 0 IF 1 MESSAGE PASSING TO DC TASK L PMESPAS EQU X:P ~ 4 PX:Q EQU 1 IBM-3270 EMULATION PACKAGE, IF NOT = 0 PEM3270 EQU X:Q PX:R EQU 1000 P DK2 * PBI
0x34c004…34c198 Dummy {f00=0x0109, f01=0x018e, f02=» f 4 PNOWACK EQU 0 WHEN 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". t , P ONLY WORKING IF STAT IS SET TO "ONE". P IFT P6805=0 6 PLCUUT EQU LCUIN+/10 DEVICE
0x34c198…34c32c Dummy {f00=0x0109, f01=0x0190, f02=» P* P P* P* " . P***************************************** , P* ^ P* CONDITIONAL ASSEMBLY h P* . P***************************************** P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAI
0x34c32c…34c4c0 Dummy {f00=0x0109, f01=0x0190, f02=» P XIF DK2 P* P IFT MMUPAG=1 DK2 * PTBUFL EQU 650+X:X MMU BUFFER LENGTH DK : P XIF DK2 h P DE z P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* P
0x34c4c0…34c654 (2, 308) Dummy {f00=0x010a, f01=0x0190, f02=» P P* P* DWT DISPLACEMENTS P* 4 0 PDWTDRD EQU /10 START OF DRIVER DEFINED PART > P* r P IFT MMUPAG=0 | PSTART EQU DWTDRD P XIF P* P IFT MMUPAG=1 PSTART EQU DWTDRD+4 P XIF P* 4 PDW
0x34c654…34c7e8 Dummy {f00=0x010a, f01=0x0190, f02=» p & PDWTRQ EQU START+/06 RECEIVE QUEUE . PDWTBUF EQU START+/08 DEVICE BUFFER ADDRESS 2 ( PDWTCUR EQU START+/0A CURSOR ADDRESS d , PDWTTIM EQU START+/0C REQUEST TIMER VALUE . PDWTINF EQU START+/0E DEVICE INFO, 1=LP DK5 P* P P*
0x34c7e8…34c97c Dummy {f00=0x010a, f01=0x0190, f02=»1: TRANSFER DWTINF DK5 " P* /33: READ MODIFIED RESPONSE P* /37: TRANSFER PARAMETERS F P* /38: SET STATUS h $ P* /39: SET REQUEST TIMEOUT VALUE P* P* P* CONSTANTS AND WORK AREAS P* P* & PDCONOF DATA 0 ON- /
0x34c97c…34cb10 Dummy {f00=0x010a, f01=0x018e, f02=» p , PDCTPGP DATA 0 TIMER POINTER GENERAL POLL P 8 P* B P* DC TASK ADDRESS BLOCK L P* l $ P DATA 0 INDICATES NO MMU BUFFER v P DATA DEVIND DEVICE INDEX * PDC15DC DATA DCACTD ACTIVATION ADDRESS & P DATA ABORT ABORT ROUTINE
0x34cb10…34cca4 Dummy {f00=0x010a, f01=0x0190, f02=» r P DATA DEVIND DEVICE INDEX ( PDC15AD DATA DCACT ACTIVATION ADDRESS * 4 P DATA ABORT ABORT ROUTINE ABORT ROUTINE ADDRESS V $ P DATA DCRBUF REC. BUFFER ANCHOR P* , P RES 15 SUBROUTINE STACK FOR INTERRUPTS PSTB RES 1 " P RES 1
0x34cca4…34ce38 Dummy {f00=0x010a, f01=0x0190, f02=»PEED EQU 0 P XIF P P* ( P* 2 $ P* ACTIVATION FROM TERMINAL TASKS < P* d PDCACT EQU * n P LDK A1,0 PRESET RETURN CODE P IFT EM3270=1 =4 P LDR A7,A7 =4 & P RF(Z) ANYMSG ANY MESSAGE ORDER =4 P XIF
0x34ce38…34cfcc Dummy {f00=0x010a, f01=0x0190, f02=» TRINF TRANSFER DWTINF DK5 P SUK A7,/33-/31 DK7 " , P RF(E) RESTRM RESPONSE TO READ MODIFIED > P SUK A7,/37-/33 DK5 n $ P RF(Z) DCTP TRANSFER PARAMETERS P IFF STAT=0 P SUK A7,/38-/37 P ABL(Z) DCSS SET STATUS DK4 P SUK A
0x34cfcc…34d160 Dummy {f00=0x010a, f01=0x0190, f02=»SET REQUEST TIMER P XIF P RF DCA100 & P 8 P* B P* L P* ACTIVATION FROM DCTASK V P* v P* PDCACTD EQU * $ P SUR A1,A1 PRESET RETURN CODE =4 P IFT EM3270=1 =4 P LDR A7,A7 =4 & P RF(Z) ANYMSG ANY
0x34d160…34d2f4 (2, 309) Dummy {f00=0x010a, f01=0x0190, f02=»S r P PDCA100 EQU * REQUEST ERROR P ABL DISIOE INVALID ORDER 4 P* V P* ` P* READ FROM DCTASK j P* P* P* REQUEST FROM DC-TASK P* COMPLETE WHEN: & P* STATUS CHANGE ON DC EQUIPMENT $ P* SPONTANOUS M
0x34d2f4…34d488 Dummy {f00=0x010a, f01=0x0190, f02=»TO DISPATCHER P IFT EM3270=1 =4 P 0 . P***************************************** : P* l P* ANY MESSAGE ORDER v P* " P***************************** P 2 PANYMSG LD A4,DWTRQ,A6 ANY QUEUED MESSAGE ?? =4 P RF(Z)
0x34d488…34d61c Dummy {f00=0x010a, f01=0x018e, f02=»K5 PTRINF EQU * DK5 P LD A2,ECBCW,A8 GET INFO DK5 " & P ORS A2,DWTINF,A6 OR AND STORE DK5 F " P RF ENDIO COMPLETE REQUEST DK5 p P* P* RESPONSE TO READ MODIFIED P* PRESTRM EQU * DK7 4 P LD A1,DWTINF,A6 WAS READ MODIFI
0x34d61c…34d7b0 Dummy {f00=0x010a, f01=0x018e, f02=» h P EJECT P* DK5 P* * P* TRANSFER PARAMETERS 4 P* R P* > P* REQUEST FROM DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS f : P* FROM TERMINALS: TRANSFER TERMINAL ADDRESSES P* P* P IFF CODE=1
0x34d7b0…34d944 Dummy {f00=0x010a, f01=0x0190, f02=» P RF(Z) DCTP10 ( P LC A2,TASCII,A2 TRANSLATE TO ASCII P SLL A2,8 J PDCTP10 EQU * $ P LC A3,ECBCW+1,A8 GET TCP OR DV p P ANK A3,/FF ( P LC A2,TASCII,A3 TRANSLATE TO ASCII P XIF * P ST A2,DWTBUF,A6 SAVE TERM. ADDR. DK
0x34d944…34dad8 Dummy {f00=0x010a, f01=0x0190, f02=»NO QUEUE DK4 t & P LDR A3,A6 ADJUST ADDR. VALUE DK4 P ADKL A3,DWTSQ DK4 > , P CWR A1,A3 SOMETHING QUEUED OUR DWT? DK4 Z 4 P RF(E) DCTP16 YES, WAIT BEFORE TRANS. PARAM. DK4 & P LDR* A1,A1 NOT OURS, GET NEXT DK4 P RB DCTP14 DK4 PDCTP
0x34dad8…34dc6c Dummy {f00=0x010a, f01=0x0190, f02=»DK4 r . P* POLL TIMEOUT, REMOVE FROM STATUS QUEUE P CF A15,REMOVS DK4 > PDCTP17 EQU * 831012 DK4 E Z ( P LDR A1,A6 SAVE DWT AS PARAMETER DK4 | 0 P CF A15,SETIME WAIT UNTIL STATUS IS SENT DK4 ( P DATA TPTOUT,20 DELAY= 2 SECONDS DK4 P
0x34dc6c…34de00 Dummy {f00=0x010a, f01=0x0190, f02=» , P LD A2,DWTBUF,A6 RESTORE TERM ADDR. DK4 ( P STR A2,A6 SAVE IN FIRST WORD OF DWT : P f P IFT RCOM=1 n 2 P ST A8,DWTBUF,A6 SAVE ECB FOR RD. MODIFIED DK6 P XIF " P CWK A6,DW1500 DCTASK DWT ??? 2 P RF(E) DCTP30 YES!!! SHOULD N
0x34de00…34df94 (2, 310) Dummy {f00=0x010a, f01=0x0190, f02=» REQUEST ERROR | P P P ( PDCTP20 EQU * 0 " P LD A4,DCTAB DC:TAB ADDRESS =3 D $ P AD* A4,DCTAB LAST TABLE POS. =3 j * PDCTP22 SUK A4,2 ADDR. TO NEXT ENTRY =3 * P CW A4,DCTAB ALL ENTRIES CHECKED?? =3 * P RF(E) DCTP25 YES.DWT NOT
0x34df94…34e128 Dummy {f00=0x010a, f01=0x0190, f02=»=3 P $ P STR A6,A1 INSERT DWT IN DC:TAB P LDK A1,2 : * P ADS A1,DC:IN UPDATE DC:TAB IN POINTER L P z * P ADS A1,DC:TAB INCREMENT DC:TAB LENGTH P IFT STAT=1 P LDK A1,4 DEVICE END P ORS A1,DWTST,A6 ( P CF A15,INSSQ IN
0x34e128…34e2bc Dummy {f00=0x010a, f01=0x0190, f02=»ETE REQUEST | P RB DCRTN P & P* 0 P* : P* WRITE D P* T P* ^ P* COMPLETE WHEN: h P* SUCCESFUL TRANSMISSION P* TIME OUT P* P* PDCWR EQU * P IFT MMUPAG=1 $ P LD A1,ECBRL,A8 REQUES
0x34e2bc…34e450 Dummy {f00=0x010a, f01=0x0190, f02=»INSWQ QUEUE REQUEST 2 P LD A1,DWTOR,A6 RESPONSE TO READ MODIFIED? DK7 ! P ANK A1,/FF MASK ORDER DK7 ! R * P CWK A1,/0033 READ-MOD. RESPONSE? DK7 ! t 2 P ABL(E) SPOLLX YES TREAT AS SPECIFIC POLL DK7 ! P RB DCRTN ! P* ! P* ! P* ! P
0x34e450…34e5e4 Dummy {f00=0x010a, f01=0x0190, f02=» ! P LD A8,DWTECB,A6 GET ECB " . P LD A4,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE " ( " P RF(Z) DCRD10 NOTHING IN QUEUE " Z P " P " P " ( P LDR* A2,A4 TAKE THE FIRST IN QUEUE " P ST A2,DWTRQ,A6 " P ADK A4,6 " " P LD A3,-4,A4 EFFECTIVE LEN
0x34e5e4…34e778 Dummy {f00=0x010a, f01=0x0190, f02=» " P # $ PDCRD10 CF A15,TIMERE START TIMER # P ABL DCRTN # 8 P # J P* # T P* # ^ P* SET STATUS # h P* # | P* # P IFF STAT=0 # PDCSS EQU * # * P LD A1,ECBCW,A8 GET STATUS INFORMATION # P ANK A1,3 MASK DB,IR # P RF(Z) D
0x34e778…34e90c Dummy {f00=0x010a, f01=0x0190, f02=»,A6 # P ANK A1,9 $ ( P RB(Z) DCSS10 WACK HAS NOT BEEN SENT $ PDCSS30 EQU * $ J , P CF A15,INSSQ INSERT DWT IN STATUS QUEUE $ ^ P LDK A1,4 SET DE $ P RB DCSS10 $ P XIF $ P $ P $ P* $ " P* SET REQUEST TIMEOUT VALUE $ P*
0x34e90c…34eaa0 Dummy {f00=0x010a, f01=0x0190, f02=»ENDIO & DISPATCH $ P % P* % ( P* ILLEGAL APPLICATION BUFFER SIZE % * P* % V P % ` 8 PIL:LEN LDKL A1,/8008 REQUEST ERROR + ILLEGAL LENGTH % h P ABL DISEND COMPLETE REQUEST % P % P* % P* % P* % P* TIMER HANDLING PART %
0x34eaa0…34ec34 (2, 311) Dummy {f00=0x010a, f01=0x0190, f02=»UEST TIMEOUT VALUE % x P RF(Z) TIME10 NO TIMING & P ST A2,TIMERR & : P CF A15,SETIME & P P DATA TOUTRE & f PTIMERR DATA 0 & z ( P ST A4,DWTTP,A6 STORE TIMER POINTER & PTIME10 EQU * & P RF GBUF10 RETURN & P* & P* TIMEOUT READ TIMER
0x34ec34…34edc8 Dummy {f00=0x010a, f01=0x018e, f02=» & r $ PTOUTR2 RB ENDIO COMPLETE REQUEST ' P* ' 0 P* WRITE TIMER=TIMWR ' : P* ' V PTIMEWR LDR A1,A6 ' ` . P LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE ' x P RB(Z) TIME10 NO TIMING ' P ST A2,TIMWR ' P CF A15,SETIME ' P DATA TOUTWR ' P
0x34edc8…34ef5c Dummy {f00=0x010a, f01=0x018e, f02=» ' P LDR A6,A1 FETCH DWT ( P CM DWTTP,A6 ( $ * P CF A15,REMOVW REMOVE FROM WRITE QUEUE ( 8 P* ( f & P* THIS INSTRUCTION DOES NOT BELONG ( p P* TO THE STANDARD INTERFACE ( P LD A2,FDWTUT ( P CWR A2,A6 ( * P RB(NE) TOUTR1 THIS DWT IS NOT WRI
0x34ef5c…34f0f0 Dummy {f00=0x010a, 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
0x34f0f0…34f284 Dummy {f00=0x010a, f01=0x0190, f02=» P* * $ P* CALLING SEQUENCE: CF A15,GRBUF * P* A4=0 IF NO BUFFER IS FREE * 6 & P* ELSE A4 CONTAINS BUFFER ADDRESS * Z P* A2 AND A3 ARE DESTROYED * P* * P* * ( PGRBUF LDKL A2,DCRBUF RECEIVE BUFFERS * PGBUF INH * P LDR* A4,A2 *
0x34f284…34f418 Dummy {f00=0x010a, f01=0x0190, f02=» POINTER * r P ABR* A15 RETURN TO CALLER + P + 2 P* + < P* + F ( P* INSERT DWT IN WRITE REQUEST QUEUE + P P* + | P* A2,A3,A4 DESTROYED + P* A6=DWT + P* + ( PINSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR + PINSWQ1 LDK A4,DWTWQ + PINSW
0x34f418…34f5ac Dummy {f00=0x010a, f01=0x0190, f02=»ERT IN QUEUE + " P CMR A4 INDICATE END OF QUEUE , P RB GBUF10 RETURN , : P* , T P* , ^ * P* REMOVE DWT FROM WRITE REQUEST QUEUE , h P* , P* A2,A3,A4 DESTROYED , P* A6=DWT , P* , * PREMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR , 2 PREM0
0x34f5ac…34f740 Dummy {f00=0x010a, f01=0x0190, f02=»UEUE: RETURN , z P CWR A3,A4 - P RF(E) REM15 - & P LDR A2,A3 GET NEXT - : P RB REM10 - V PREM15 LDR* A3,A4 REMOVE - h P STR A3,A2 - P RB GBUF10 RETURN - P - P* - P* - P* INSERT DWT IN STATUS QUEUE - P* - P IFF STA
0x34f740…34f8d4 (2, 312) Dummy {f00=0x010b, f01=0x0190, f02=»2,/FF IF ADDRESS = 00 OR /7F DK4 - ( P RB(Z) GBUF10 DONT PUT IN STATUS DK4 . ( P LDR A4,A2 SET A4=A2 DK4 . T " P* EBCDIC /7F = ASCII /22 DK4 . t , P SUK A2,/22 QUEUE, TERMINAL HAS BEEN DK4 . $ P RB(Z) GBUF10 MADE INACTIVE DK4 . P SUK A4,/7F DK4 .
0x34f8d4…34fa68 Dummy {f00=0x010b, f01=0x0190, f02=» DWT FROM STATUS QUEUE . P* / P* A2,A3,A4 DESTROYED / ( P* A6=DWT / D P* / T * PREMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR / ^ P LDK A4,DWTSQ / P RB REM06 / P XIF / P / P* / P* / $ P* QUEUE ALLOCATED RECEIVE BUFFER / P*
0x34fa68…34fbfc Dummy {f00=0x010b, f01=0x0190, f02=»C-TASK DWT / v P XIF 0 P IFT MESPAS=0 0 $ P LDR A2,A6 QUEUE ON TERMINAL DWT 0 4 P XIF 0 , P ADK A2,DWTRQ BEGINNING OF RECEIVE QUEUE 0 h PQR100 EQU * 0 P LDR* A3,A2 0 $ P RF(Z) QR200 END OF QUEUE FOUND 0 P LDR A2,A3 0 P RB QR100 0
0x34fbfc…34fd90 Dummy {f00=0x010b, f01=0x0190, f02=»K IF UNEXPECTED MESSAGE OR STATUS CHANGE 0 P* 1 0 4 P* REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED 1 : P* 1 r PCKMESS LDKL A6,DW1500 1 | P LD A1,DWTST,A6 1 P RF(N) CKM110 NO REQUEST 1 P LDK A1,2 READ REQUEST ? 1 P CW A1,DWTOR,A6 1
0x34fd90…34ff24 Dummy {f00=0x010b, f01=0x0190, f02=»IN QUEUE 1 z P 2 P 2 , P LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER 2 . P ST A2,DWTRQ,A6 STORE THIS ADDR INTO QUEUE 2 P " P ADK A3,6 MOVE POINTER TO TEXT 2 & P DONT DESTROY BUFFER ADDRESS =6 2 P LD A4,-4,A3 2 0 P ST A4,ECBEL,A8 STORE NUMBERS OF C
0x34ff24…3500b8 Dummy {f00=0x010b, f01=0x0190, f02=» A4,A3 RECEIVE BUFFER ADDRESS 2 , P CF A15,DC:MIN MOVE DATA TO USER BUFFER 3 & * PCKM110 ADKL A15,4 ADJUST STACK POINTER 3 V P ABR* A15 RETURN 3 8 PCKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHECK STATUS 3 , P OR A1,DCONOF TAKE CARE OF POLL TIME OUT 3 P
0x3500b8…35024c Dummy {f00=0x010b, f01=0x0190, f02=»A15,TENDIO COMPLETE READ GENERAL REQUEST 3 P RB CKM110 4 0 P 4 B P 4 L @ P************************************************************ 4 T P* 4 P* ABORT ROUTINE 4 P* 4 P************************ 4 P 4 & PABORT LD A1,DWTTP,A6 TIMER
0x35024c…3503e0 Dummy {f00=0x010b, f01=0x0190, f02=»RDER CODE 4 z P SUK A1,2 5 * P RF(Z) AB:RTN READ REQUEST. NO ACTION 5 $ P SUK A1,4 5 R . P RF(NZ) AB:RTN NO ACTION IF NOT READ/WRITE 5 d P 5 . P CF A15,REMOVW REMOVE DWT FROM WRITE QUEUE 5 & P LD A2,FDWTUT WRITING DWT ADDRESS 5 P CWR A2,A6 5
0x3503e0…350574 (2, 313) Dummy {f00=0x010b, f01=0x0190, f02=» P IFT CPU852=1 6 P ADKL A15,4 6 $ P ABR* A15 RETURN IN INHIBIT MODE 6 . P XIF 6 V P IFF CPU852=1 6 b P RTN A15 6 x P XIF 6 P 6 P 6 P 6 P* 6 P* 6 P* STORE REGISTER A3-A8 6 $ P* CALLING SEQUENSE: CF A15,STREG 6
0x350574…350708 Dummy {f00=0x010b, f01=0x018e, f02=»T A5,LCA5 6 P ST A6,LCA6 7 P ST A7,LCA7 7 & P ST A8,LCA8 7 : P RF RTNA15 RETURN 7 N P 7 h PLDREG LDKL A3,0 7 r PLCA3 EQU *-2 7 P LDKL A4,0 7 PLCA4 EQU *-2 7 P LDKL A5,0 7 PLCA5 EQU *-2 7 P LDKL A6,0 7 PLCA6 EQU *-2
0x350708…35089c Dummy {f00=0x010b, f01=0x0190, f02=» 7 P 8 P* 8 P* 8 P* TIMER VALUES 8 & P* 8 < P* 8 F * PTIMPRO EQU 90 PROCEDURE TIMER 9 SEC DK 8 P " PTIMNAK EQU 3 DELAY FOR NAK DK 8 ~ P* 8 P* 8 P* CHARACTER EQUATES 8 P* 8 & PSF EQU X'1D' START FIELD CHARACTER 8 P
0x35089c…350a30 Dummy {f00=0x010b, f01=0x0190, f02=» PDLE EQU /10 9 PEOT EQU /04 9 PNAK EQU /15 9 , PESC EQU /1B 9 @ PSBA EQU /11 9 T PGP EQU /22 9 h PRDBCOM EQU /32 9 z PRDMCOM EQU /36 9 P IFT CODE=0 9 PPAR EQU /80 9 PRVI EQU /3C 9 PACK0 EQU /30 9 PACK1 EQU /31 9
0x350a30…350bc4 Dummy {f00=0x010b, f01=0x0190, f02=»IEMENS MSV1 PROCEDURE 9 z P XIF : P IFT CODE=1 : * PPAR EQU /00 : > PWACK EQU /2C : R PRVI EQU XRVI DK : f PACK0 EQU /18 : ~ PACK1 EQU /2F : PSYNEBC EQU /32 : P XIF : P : P* : P* : P* PROCEDURE WORK AREAS : P* :
0x350bc4…350d58 Dummy {f00=0x010b, f01=0x0190, f02=» : x PXSEL DATA 0 SELECTED ; PXETX DATA 0 ETX SENT ; $ 2 PXSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT ; @ " PXRB DATA 0 READ BUFFER SWITCH ; v PCACK DATA 0 ACK COUNTER ; * PSYNSW DATA 0 0=SKIP SYNS, 1=DON'T SKIP ; P* ; PFECB RES 1 WRITING E
0x350d58…350eec Dummy {f00=0x010b, f01=0x0190, f02=»TA 0 START OF LAST TRANSMITTED BLOCK ; $ PDCSTQ DATA 0 STATUS QUEUE ANCHOR < , . PDCTPP DATA 0 POINTER FOR PROCEDURE TIMING < T , PRESEND DATA 0 CONTROL SEQUENCE SAVE AREA < ( PCRDBUF DATA 0 READ BUFFER COUNTER DK < P* < P* < $ P* 3270 SENSE/STATU
0x350eec…351080 Dummy {f00=0x010b, f01=0x018e, f02=»A /4248 < P DATA /4242 = P* = $ 2 PNOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED = . , PIR EQU /26 S/S 1 : INTERVENTION REQUIRED = d P XIF = P = P* = P* = P* BASIC RECEIVE MODE = P* = " P* ENTERED EVERY TIME A MESSAGE = &
0x351080…351214 (2, 314) Dummy {f00=0x010b, f01=0x0190, f02=» = PBRM EQU * > P LDKL A5,STB LOAD STACKBASE > P IFT P6805=0 > > 2 P CF A5,HALTIN HALT RECEIVER AND UPDATE STATUS > T P XIF > P IFT P6805=1 > * P CF A15,CKMESS CHECK IF STATUS CHANGE > P XIF > PBRM010 EQU * > P IFT CODE+
0x351214…3513a8 Dummy {f00=0x010b, f01=0x0190, f02=»0+LSPEED+SYNEBC SPECIFY SYN PATTERN > P XIF ? , P IFT P6805=0 ? : " P CIO A2,1,LCUIN START RECEIVER ? P P XIF ? v P IFT P6805=1 ? P IFF CODE=1 ? P LDK A2,/0C ? " P CIO A2,1,LCUIN START RECEIVER ? P LDK A2,SYN ? * P OTR A2,1,LC
0x3513a8…35153c Dummy {f00=0x010b, f01=0x0190, f02=»T RECEIVER ? | P LDK A2,SYNEBC @ * P OTR A2,1,LCUIN SPECIFY SYNC CHARACTER @ * P RB(NA) BRMHLT @ X P XIF @ p PBRM100 EQU * @ ~ $ P CF A5,READP READ ONE CHARACTER @ P RF(NZ) BRM150 PARITY ERROR @ P LDR A1,A2 @ P SUK A1,STX @ P RF(
0x35153c…3516d0 Dummy {f00=0x010b, f01=0x0190, f02=»VED @ x P SUK A1,DLE-ENQ A P ABL(Z) BRM600 DLE RECEIVED A $ P SUK A1,NAK-DLE A H P ABL(Z) BRM500 NAK RECEIVED A ` P IFT MSV1=0 A P LDR A8,A2 A $ P CF A5,READP READ ONE CHARACTER A P RF(NZ) BRM150 PARITY ERROR A P CWR A2,A8 A & P
0x3516d0…351864 Dummy {f00=0x010b, f01=0x018e, f02=» A P CC A2,DW1500 B P RF(NE) BRM150 NOT THIS TCU B PBRM110 EQU * B B P CF A5,READP READ 1:ST STA B V P RF(NZ) BRM150 PARITY ERROR B x P LDR A8,A2 B P IFT MSV1=0 B P CF A5,READP READ 2:ND STA B P RF(NZ) BRM150 PARITY ERROR B P
0x351864…3519f8 Dummy {f00=0x010b, f01=0x018e, f02=» P SUK A2,ENQ+PAR C P XIF C P IFT P6805=1 C * P SUK A2,ENQ C @ P XIF C T P RF(NZ) BRM150 NOT ENQ C b P IFT P6805=0 C $ P CF A5,READ READ LAST CHARACTER C P C " P* TRAILING PAD CAN BE CHECKED C P C P CIO A1,0,LCUIN HALT
0x3519f8…351b8c Dummy {f00=0x010b, f01=0x0190, f02=» C p P XIF D P LDK A1,1 D P ST A1,CACK LOAD ACK COUNTER D ( P LDR A2,A8 D L P SUK A3,2 D ^ P RF(Z) BRM120 SELECTING D p P CWK A8,GP D P ABL(E) GPOLL GENERAL POLL D P IFT MSV1=1 D 6 P CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS
0x351b8c…351d20 Dummy {f00=0x010b, f01=0x0190, f02=»Z) SPOLL SPECIFIC POLL D P RB BRM INVALID POLL E PBRM120 EQU * E : & P CF A5,FINTER CHECK IF STA PRESENT E N P LDR A6,A3 LOAD DWT TO A6 E x P RF(NZ) BRM130 STA FOUND E P IFT MSV1=0 E $ P LDKL A6,DW1500 SELECT TO DCTASK E PBRM130 EQU * E
0x351d20…351eb4 (2, 315) Dummy {f00=0x010b, f01=0x0190, f02=»K HOLD TO RESYNCHRONIZE E P* F PBRM150 EQU * F * P ANK A2,/7F F > P SUK A2,/7F F R P RB(Z) BRM RESYNCHRONIZE F f & P CF A5,READ READ ANOTHER CHARACTER F P RB BRM150 F P F P* F P* F P* EOT HAS BEEN RECEIVED F P* F
0x351eb4…352048 Dummy {f00=0x010b, f01=0x0190, f02=» P LD A1,XACK G & P RF(Z) BRM220 ACK IS NOT EXPECTED G " P LD A6,FDWTUT GET WRITING DWT G B P RF(Z) BRM210 NO ONE WRITING G h P LDK A1,2 SET RC=2 G ( P CF A5,CWRITE COMPLETE WRITE REQUEST G PBRM210 EQU * G " P CM XACK RESET 'ACK EXPECTED' G
0x352048…3521dc Dummy {f00=0x010b, f01=0x0190, f02=»* G P* H PBRM300 EQU * H P CF A5,HPTIM H ( P LD A1,XSEL H < P RF(Z) BRM315 NOT SELECTED H P P LD A1,DCRBUF H r & P RB(Z) BRM150 NO BUFFER AVAILABLE H PBRM305 EQU * H P CF A5,RDMESS READ MESSAGE H P SUK A7,1 H P RF(NZ) BRM320
0x3521dc…352370 Dummy {f00=0x010b, f01=0x0190, f02=»BL BRM H PBRM315 EQU * I P IFT RCOM=1 I " P LD A1,XACK I 6 & P RF(Z) BRM316 ACK IS NOT EXPECTED I J P LD A1,DCRBUF I t & P RF(Z) BRM316 NO BUFFER AVAILABLE I " P LD A6,FDWTUT GET WRITING DWT I 0 P ABL(Z) BRM150 NO ONE WRITING. RESYNCHRONIZE I
0x352370…352504 Dummy {f00=0x010b, f01=0x0190, f02=»CURRENT ECB DK6 I z P ST A1,DWTCUR,A6 DK6 J P LDK A1,0 SET RC=0 J 6 ( P CF A5,CWRITE COMPLETE WRITE REQUEST J P P CM CACK PRESET ACK-1 =7 J | P RB BRM305 READ THE MESSAGE J P XIF J ( PBRM316 CF A5,READ READ ONE CHARACTER J P IFF P6805=1 =8
0x352504…352698 Dummy {f00=0x010b, f01=0x018e, f02=»D ABORT SEQUENCE J | P RB BRM220 K PBRM320 EQU * K * P IM XSTA INDICATE MESSAGE OK K > $ P LD A4,DCRBUF GET BUFFER ADDRESS K b P ADK A4,6 K P CW A4,FBLST K " P RF(NE) BRM325 NOT FIRST BLOCK K P IFF RCOM=0 K P LDK A1,ESC K P CCR A1,A4
0x352698…35282c Dummy {f00=0x010b, f01=0x018e, f02=» ( P RF(Z) RDBUF READ MODIFIED RECEIVED L P SUK A1,RDMCOM-RDBCOM L 0 & P RF(Z) RDMOD READ BUFFER RECEIVED L N P XIF L x PBRM325 EQU * L P SUK A7,1 L & P RF(Z) BRM340 MESSAGE ENDED BY ETB L P CM FBAX L * P CF A15,GRBUF ALLOCATE RECEIVE BUFFE
0x35282c…3529c0 Dummy {f00=0x010b, f01=0x0190, f02=» L P LDR* A2,A6 M P LC A2,TEBCDIC,A2 M P LD A1,DCRBUF M 6 P RF(Z) BRM326 M L P ST A2,+4,A1 M b P XIF M v PBRM326 EQU * M P CWK A6,DW1500 M , P RF(E) BRM330 MESSAGE IS MENT FOR DCTASK M P LD A2,DWTST,A6 GET STATUS M P RF(N) BRM
0x3529c0…352b54 (2, 316) Dummy {f00=0x010c, f01=0x0190, f02=» P LDK A2,2 N P CW A2,DWTOR,A6 N " P RF(NE) BRM330 NO READ REQUEST N . PBRM327 EQU * N T P LDK A1,0 SET RC=0 N h $ P LD A8,DWTECB,A6 GET ECB ADDRESS N P LD A3,-4,A4 GET LENGTH N * P ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH N & P CF A15,CTIME ST
0x352b54…352ce8 Dummy {f00=0x010c, f01=0x0190, f02=»CCC/WCC N l P* O P* O P IFT STAT=1 O $ P LC A2,+2,A4 GET WCC/CCC O 8 P ANK A2,/FF O X P LC A2,TEBCDI,A2 TRANSLATE O l & P LD A3,DWTINF,A6 GET DWT INFO DK5 O P ANK A3,1 GET LPBIT DK5 O P RF(Z) BRM328 NOT LP DK5 O P ANK A2,8 O
0x352ce8…352e7c Dummy {f00=0x010c, f01=0x018e, f02=» P XIF P P IFT EM3270=1 =4 P P LD A2,DWTOR,A6 ORDER =4 P * , P RF(NZ) BRM329 NOT ANY MESSAGE ORDER =4 P J & P SUK A4,6 ADJUST BUFFER ADDRESS =4 P z ( P CF A5,QRBUF QUEUE MESSAGE ON DWT =4 P P RF BRM32A =4 P P XIF =4 P PBRM329 EQU * =4 P
0x352e7c…353010 Dummy {f00=0x010c, f01=0x0190, f02=» P $ P CF A15,TENDIO COMPLETE REQUEST Q P RF BRM345 Q 0 P Q B PBRM330 EQU * Q L P IFT EM3270=1 =4 Q ` P LD A1,DWTST,A6 STATUS =4 Q z P RF(N) BRM335 NO REQUEST =4 Q P LD A1,DWTOR,A6 ORDER =4 Q , P RF(NZ) BRM335 NOT ANY MESSAGE ORDER =4
0x353010…3531a4 Dummy {f00=0x010c, f01=0x0190, f02=»UF QUEUE BUFFER FOR DCTASK Q . P CF A15,CKMESS COMPLETE DCTASK READ IF ANY R " PBRM340 EQU * R T P CF A5,TRACK SEND ACK 0/1 R h P ABL BRM R PBRM345 EQU * R P IFT STAT=1 R , P LD A1,DWTINF,A6 READ-MOD. RECEIVED? DK7 R P ANKL A1,/0002 DK7 R
0x3531a4…353338 Dummy {f00=0x010c, f01=0x0190, f02=» R p P CF A5,TRWACK SEND WACK S P RF BRM410 S ( P XIF S : P IFF STAT=1 S F P RB BRM340 S Z P XIF S l P S x P* S P* S , P* READ MODIFIED OR READ BUFFER RECEIVED S P* S P* S P IFF RCOM=0 S $ PRDBUF EQU * READ BUFFER CO
0x353338…3534cc Dummy {f00=0x010c, f01=0x0190, f02=»1 S & P XRS A1,CACK INCREMENT ACK COUNTER T P DB T 4 0 P LDK A1,/02 INDICATE READ-MOD. RECEIVED DK7 T B P ORS A1,DWTINF,A6 DK7 T v 2 P LDKL A1,/4000 SET RETURN CODE =READ-MOD. DK7 T ( P RB BRM32A COMPLETE THE REQUEST DK7 T P XIF T P* T
0x3534cc…353660 Dummy {f00=0x010c, f01=0x0190, f02=»ACK T , P RF(NZ) BRM510 RETRANSMISSION OF MESSAGE U P OR A1,XSEL U < " P RF(Z) BRM410 IN CONTROL STATE U P . P CF A5,TRREP REPEAT LAST CONTROL SEQUENCE U v PBRM410 EQU * U P ABL BRM U P U P* U P* U P* NAK HAS BEEN RECEIVED U
0x353660…3537f4 (2, 317) Dummy {f00=0x010c, f01=0x0190, f02=» P OR A1,XSEL V " P RB(Z) BRM410 IN CONTROL STATE V P RF BRM636 V > PBRM510 EQU * V P P DB V d P LDK A1,0 V r P CIO A1,0,LCUIN DK V P SST A1,LCUIN DK V P CF A15,STREG DK V P CF A15,SETIME DK V P DATA BRM520,TIMNAK DK V
0x3537f4…353988 Dummy {f00=0x010c, f01=0x0190, f02=»TAT=0 V P LD A1,XSTA W 0 P ABL(NZ) POL050 STATUS HAS BEEN TRANSMITTED W " P XIF W V 0 P LD A1,FBLST GET START POINT FOR LAST BLOCK W b & P SU A1,FECBBA COMPUTE BUFFER INDEX W P ST A1,FBAX W P ABL POL130 W P* W P* W P* DLE HAS BE
0x353988…353b1c Dummy {f00=0x010c, f01=0x0190, f02=»ACK NOT EXPECTED W & P CF A5,READ READ SECOND CHARACTER X P IFF P6805=1 =8 X B P CWK A2,ACK0+PAR X Z P XIF =8 X r P IFT P6805=1 =8 X P CWK A2,ACK0 =8 X P XIF =8 X P RF(NE) BRM620 X P* X P* ACK , 0 RECEIVED X P* X
0x353b1c…353cb0 Dummy {f00=0x010c, f01=0x0190, f02=»TART PROCEDURE TIMER X P RB BRM410 Y PBRM620 EQU * Y . P CWK A2,ACK1 Y B P RF(NE) BRM650 Y V P* Y l P* ACK , 1 RECEIVED Y v P* Y P LD A1,CACK GET ACK COUNTER Y $ P RB(Z) BRM610 ACK,1 NOT EXPECTED Y PBRM630 EQU * Y P LD A1,XETX Y
0x353cb0…353e44 Dummy {f00=0x010c, f01=0x0190, f02=» Y ~ PBRM635 EQU * Z P IFF STAT=0 Z P LD A2,XSTA Z 0 . P RF(NZ) BRM670 STATUS HAS BEEN TRANSMITTED Z D P XIF Z v ( P CF A5,CWRITE COMPLETE WRITE REQUEST Z PBRM636 EQU * Z P CF A5,TREOT SEND EOT Z P IFT RCOM=1 Z P Z P CM XRB RESE
0x353e44…353fd8 Dummy {f00=0x010c, f01=0x0190, f02=» POL130 Z PBRM650 EQU * [ P IFF P6805=1 =8 [ $ P CWK A2,RVI+PAR [ < P XIF =8 [ T P IFT P6805=1 =8 [ f P CWK A2,RVI =8 [ ~ P XIF =8 [ ( P RB(NE) BRM610 INVALID DLE SEQUENCE [ " P CM XACK RESET 'EXPECTING ACK' [ P LD A1,XETX [
0x353fd8…35416c Dummy {f00=0x010c, f01=0x0190, f02=» RB BRM635 [ P IFF STAT=0 P & P* 0 P* : " P* STATUS HAS BEEN TRANSMITTED D P* j P* t PBRM670 EQU * ~ " P LD A6,FDWTUT GET DWT ADDRESS , P CF A15,REMOVS REMOVE FROM STATUS QUEUE P CM XSTA CLEAR 'STATUS SENT'
0x35416c…354300 Dummy {f00=0x010c, f01=0x0190, f02=» " P ANS A1,DWTST,A6 CLEAR STATUS ] P RB BRM636 ] . P XIF ] @ P ] L P* ] V P* ] ` P* SELECT HAS BEEN RECEIVED ] j P* ] P* ] PSELECT EQU * ] P LD A1,XACK =5 ] * P RF(NZ) POL010 ERROR. ACK EXPECTED =5 ] P IFF STAT=0 ]
0x354300…354494 (2, 318) Dummy {f00=0x010c, f01=0x0190, f02=»I ] | P XIF ^ P IFF STAT=1 ^ P RF SEL110 ^ * P XIF ^ < PSEL100 EQU * ^ H P ABL BRM ^ PSEL110 EQU * ^ l P IFT STAT+NOWACK=1 ^ P ANK A3,8 ^ P RF(NZ) SEL115 BUSY ^ P XIF ^ P IFT STAT+NOWACK=2 ^ P ANK A3,8 ^ " P RF(Z) S
0x354494…354628 Dummy {f00=0x010c, f01=0x0190, f02=» RF(NZ) SEL120 BUFFER AVAILABLE ^ PSEL115 EQU * _ ( P IFF STAT+NOWACK=2 _ < P CF A5,TRWACK SEND WACK _ V P XIF _ v P RB SEL100 _ PSEL120 EQU * _ , P CF A5,PRREC PREPARE FOR TEXT RECEPTION _ P CF A5,TRACK SEND ACK,0 _ P RB SEL100 _
0x354628…3547bc Dummy {f00=0x010c, f01=0x0190, f02=» P CM FBAX RESET BUFFER INDEX ` P IFT CODE=1 ` ( . P LC A2,TEBCDIC,A2 TRANSLATE STA TO EBCDIC ` < P XIF ` n $ P ST A2,+4,A1 SAVE STA IN BUFFER ` z P IM XSTA ` " P ST A6,FDWTIN STORE INPUT DWT ` P RTN A5 ` P ` P* ` P* ` $ P*
0x3547bc…354950 Dummy {f00=0x010c, f01=0x0190, f02=» ` n " PPOL010 CF A5,TRENQ SEND ENQ =5 a * P CF A5,SPTIM START PROCEDURE TIMER =5 a . " P ABL BRM WAIT FOR RESPONSE =5 a PPOL020 EQU * =5 a " P CF A5,CPTIM CHECK POLL TIMER a P IFF STAT=0 a P LD A6,DCSTQ a & P RF(Z) POL110 NO STATUS TO BE
0x354950…354ae4 Dummy {f00=0x010c, f01=0x018e, f02=» a n P IM XACK SET 'ACK EXPECTED' b P XIF b , P IFF STAT=1 b 8 P RF POL110 b L P XIF b ^ PPOL100 EQU * b j P ABL BRM b ~ PPOL110 EQU * b P LD A6,DCWRQ b " P RF(NZ) POL120 WRITE ON QUEUE b PPOL115 EQU * b P CF A5,TREOT SEND EOT b
0x354ae4…354c78 Dummy {f00=0x010c, f01=0x0190, f02=» b n P RF(NZ) POL126 c P CF A15,REMOVW c P RB POL115 c 4 PPOL126 EQU * c F P ST A8,FECB SAVE ECB ADDRESS c Z P ST A6,FDWTUT SAVE A6 c ~ P c P IFF MMUPAG=0 c $ P LDKL A4,MMUBUF MMU WORK BUFFER c P ST A4,ECBBA,A8 c . P CF A15,DC:MOT
0x354c78…354e0c Dummy {f00=0x010c, f01=0x0190, f02=» c & P ST A4,FECBBA SAVE BUFFER ADDRESS d ( P SUK A3,2 SKIP FIRST WORD OF BUFFER d 2 P ST A3,FECBRL SAVE LENGTH d ^ P CM FBAX RESET BUFFER INDEX d PPOL130 EQU * d P CM XETX RESET 'ETX SENT' d P CM XSTA d P CF A5,TRTEXT SEND ONE BLOCK d
0x354e0c…354fa0 Dummy {f00=0x010c, f01=0x0190, f02=»S RESPONSE TO READ MODIFIED d P* e $ PSPOLLX EQU * DK7 e . & P LDK A1,/06 FAKE A WRITE REQUEST e H P ST A1,DWTOR,A6 DK7 e r 6 P LDKL A1,/FFFF-/0002 CLEAR READ MODIFIED FLAG DK7 e P ANS A1,DWTINF,A6 e $ P LDKL A5,STB SET STACK BASE DK7 e *
0x354fa0…355134 (2, 319) Dummy {f00=0x010c, f01=0x0190, f02=» PSPOLL EQU * f P IFF STAT+SPECP=0 f P LD A1,XACK =5 f 2 " P RB(NZ) POL010 ACK EXPECTED =5 f J P LDR A7,A6 SAVE A6 f p P CF A5,CPTIM CHECK POLLTIMER f P LDR A6,A7 RESTORE A6 f P IFT STAT=1 f P LD A1,DWTST,A6 GET STATUS f P ANK A
0x355134…3552c8 Dummy {f00=0x010c, f01=0x0190, f02=» f x P LD A1,DWTOR,A6 GET ORDER g P SUK A1,6 g * P RB(Z) POL125 WRITE REQUEST g < P SUK A1,2 g ` " P RB(Z) POL125 EXCHANGE REQUEST g r P XIF g P RB POL115 SEND EOT g P g P* g P* g 8 P* CHECK IF THERE IS A WRITE REQUEST TO BE
0x3552c8…35545c Dummy {f00=0x010c, f01=0x0190, f02=»NG ON g v P IFT RCOM=1 h $ P LD A2,XRB IF RCOM, SKIP IT DK6 h " P RF(NZ) CWR900 DK6 h J P XIF h f P LD A2,DWTST,A6 h v P RF(N) CWR900 NO REQUEST h P LD A2,DWTOR,A6 GET ORDER h P SUK A2,6 h P RF(Z) CWR100 WRITE REQUEST h P S
0x35545c…3555f0 Dummy {f00=0x010c, f01=0x0190, f02=» A2,2 TRANMISSION OK h ( P ST A2,DWTOR,A6 INDICATE READ ORDER i P RF CWR150 i H & PCWR100 LD A8,FECB GET ECB ADDRESS i Z P CF A15,CTIME STOP TIMING i P LDR A8,A8 i P RF(Z) CWR150 i P ST A2,ECBCW,A8 i $ P CF A15,TENDIO COMPLETE REQUEST i
0x3555f0…355784 Dummy {f00=0x010c, f01=0x0190, f02=»CTED' i x P CM FDWTUT j P IFT RCOM=1 j " P LD A2,XRB READ MODIFIED ? DK6 j 4 P RF(Z) CWR910 DK6 j Z $ P LD A2,DWTCUR,A6 RESTORE ECB DK6 j t P ST A2,DWTECB,A6 DK6 j PCWR910 EQU * DK6 j P XIF j P RTN A5 j P j P* j P*
0x355784…355918 Dummy {f00=0x010c, f01=0x0190, f02=» OR PARITY ERROR , BUFFER OVERFLOW j ( P* 2 : IF CORRECT ETB BLOCK RECEIVED k * P* k V PRDMESS EQU * k ` $ P LD A4,DCRBUF GET BUFFER ADDRESS k t P ADK A4,6 RESERVE HEADER k P LDK A3,0 k P LD A1,XSTA k $ P RF(NZ) RDM050 LAST INPUT WAS OK k "
0x355918…355aac Dummy {f00=0x010c, f01=0x0190, f02=»T A4,FBLST REMEMBER START OF BLOCK k PRDM075 EQU * l * P CM XSTA l > P LDK A7,0 RESET LRC l N P l j P IFT IBMCHR=1 l r P LD A1,FBAX l " P RF(NZ) RDM100 NOT FIRST BLOCK l P CF A5,READP l P RF(NZ) RDM120 PARITY ERROR l P CWK A2,ESC l
0x355aac…355c40 Dummy {f00=0x010c, f01=0x0190, f02=»DP READ ONE CHARACTER l P RF(NZ) RDM120 PARITY ERROR m PRDM110 EQU * m B P CWK A2,ETX m V P RF(E) RDM130 ETX RECEIVED m j P CWK A2,ETB m P RF(E) RDM160 ETB RECEIVED m P CWK A2,ITB m P RF(E) RDM170 ITB RECEIVED m P CWK A2,ENQ m
0x355c40…355dd4 (2, 320) Dummy {f00=0x010d, f01=0x0190, f02=»0 m P IFT BINTRM=1 n P n P LDR A1,A2 n ( P SUK A1,DC1+3 n : P RF(P) RDM115 NOT DC1-DC3 n P P ADK A1,3 n r P RF(N) RDM115 NOT DC1-DC3 n P SLL A1,6 n P LDR A8,A1 n * P CF A5,READP 8-BIT CHAR GET NEXT PART n P RF(NZ) RDM120 P
0x355dd4…355f68 Dummy {f00=0x010d, f01=0x0190, f02=»TORE CHARACTER n P ADK A4,1 INCREMENT POINTER o $ P IM FBAX INCREMENT BUFFER INDEX o : P LD A1,FBAX o b P CWK A1,RBUFL+RBUFL o v P RB(NG) RDM100 NOT OVERFLOW o P* o P* BUFFER OVERFLOW o P* o P RF RDM140 ABORT INPUT o PRDM120
0x355f68…3560fc Dummy {f00=0x010d, f01=0x0190, f02=» o P* ETX RECEIVED p P* p PRDM130 EQU * p ( $ P LD A1,DCRBUF GET BUFFER ADDRESS p < P LD A2,FBAX GET BUFFER INDEX p d 2 P ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER p P IFF CODE=1 p P CF A5,RDLRC p P RF(Z) RDM150 LRC WAS OK p P X
0x3560fc…356290 Dummy {f00=0x010d, f01=0x0190, f02=» LDK A3,1 INDICATE INVALID MESSAGE p PRDM150 EQU * q * $ P LDR A7,A3 SAVE RESULT REGISTER q > P CF A5,HALTIN HALT INPUT q f P IFT P6805=1 q P ORR A7,A1 PARITY ERROR q P XIF q P RTN A5 q P* q P* ETB RECEIVED q P* q PRDM160
0x356290…356424 Dummy {f00=0x010d, f01=0x0190, f02=»* ITB RECEIVED q P* r PRDM170 EQU * r P IFF CODE=1 r 4 P CF A5,RDLRC r H " P RB(NZ) RDM120 LRC WAS NOT OK r P XIF r P IFT CODE=1 r & P CF A5,RDCRC READ CRC AND CHECK IT r " P RB(NE) RDM120 CRC WAS NOT OK r P XIF r P RB RDM100
0x356424…3565b8 Dummy {f00=0x010d, f01=0x0190, f02=» INCREMENT ACK COUNTER r P RF(NZ) TRDLE s P LDK A3,ACK0 LOAD ACK0 s 4 P RF TRDLE s R P* s d P* TRANSMIT WACK s n P* s PTRWACK LDK A3,WACK LOAD WACK s P RF TRDLE s P* s P* TRANSMIT RVI s P* s P IFF STAT=0 s PTRRV
0x3565b8…35674c Dummy {f00=0x010d, f01=0x0190, f02=»INSAVE AREA s ~ P SC A3,RESEND+1 t P RF TRREP t , P t > P* t H P* TRANSMIT NAK t R P* t h PTRNAK LDK A3,NAK LOAD NAK t r P RF TREN10 t P* t P* TRANSMIT EOT t P* t PTREOT LDK A3,EOT LOAD EOT t P RF TREN10 t P* t
0x35674c…3568e0 Dummy {f00=0x010d, f01=0x0190, f02=»F t P SC A2,RESEND+1 u $ PTRREP CF A5,TRSYNC START OUTPUT u " & P LC A2,RESEND GET FIRST CHARACTER u J P CF A5,WRITEP SEND IT u t & P LC A2,RESEND+1 GET NEXT CHARACTER u P CF A5,WRITEP SEND IT u PTRRE10 LDK A2,/FF u P CF A5,WRIT05 SEND P
0x3568e0…356a74 (2, 321) Dummy {f00=0x010d, f01=0x0190, f02=»A5,READ WAIT FOR END u P XIF v & P SST A2,LCUUT PERFORM SST AT ONCE v * P IFF LOGG=0 v T ( P CF A5,LOGSST LOG TRANSMITTER STATUS v h P XIF v P RTN A5 v P v P* v P* v P* TRANSMIT ONE TEXT BLOCK v P* v P* v PTRTE
0x356a74…356c08 Dummy {f00=0x010d, f01=0x0190, f02=» v P LD A4,FBAX w ( P RF(NZ) TRT050 NOT START OF MESSAGE w P w H 2 P LD A1,XRB READ BUFFER COMMAND IN PROCESS ??? w P P RF(NZ) TRT050 YES !! w P w P LD A4,FECBBA w " P LC A3,+2,A4 GET AID CHARACTER w P SUK A3,/30 w $ P RF(NZ) TRT0
0x356c08…356d9c Dummy {f00=0x010d, f01=0x0190, f02=»TE SEND % w P LDK A2,'/' x P CF A5,WRITE SEND / x & P LDK A2,STX x B P CF A5,WRITE SEND STX x V ( P ST A4,FBLST REMEMBER START OF BLOCK x t ( P ADK A4,5 SKIP AID + CURSOR ADDRESS x P LDK A3,5 ADJUST LENGTH x P LDK A2,3 x P ST A2,FBA
0x356d9c…356f30 Dummy {f00=0x010d, f01=0x018e, f02=» P LDK A7,0 RESET LRC y $ P LD A4,FECBBA GET BUFFER ADDRESS y P AD A4,FBAX ADD BUFFER INDEX y H ( P ST A4,FBLST REMEMBER START OF BLOCK y l ( P ADK A4,2 SKIP FIRST WORD OF BUFFER y & P LDK A3,0 RESET CHARACTER COUNTER y P LD A1,FBAX GET BUFFER IND
0x356f30…3570c4 Dummy {f00=0x010d, f01=0x0190, f02=» P CF A5,WRITEP SEND STA z P IFT IBMCHR=1 z " P IFF RCOM=1 z 8 " P LDK A2,/27 SEND ENTER AS AID z L P CF A5,WRITEP z r " P LDK A2,/20 AND CURSOR ADDRESS z P CF A5,WRITEP z P LDK A2,/20 z P CF A5,WRITEP z P XIF z P IFT RCOM=1 z
0x3570c4…357258 Dummy {f00=0x010d, f01=0x0190, f02=»SEND AID z | P { $ P LD* A3,DWTCUR,A6 CURSOR ADDRESS { . P CF A5,LINCOL SEND LINE AND COLUMN NUMBER { @ P LDK A3,5 SET BLOCK COUNT { r P RF TRT100 { PTRT070 EQU * { P XIF { P { P LDK A3,2 { PTRT100 EQU * { P LCR A2,A4 GET ONE C
0x357258…3573ec Dummy {f00=0x010d, f01=0x0190, f02=»************************************************ { P* | 8 , P* CHECK IF ATTRIBUTE CHARACTER OR NULL | B P* | r 4 P*********************************************** | | P | & P CWK A2,X'20' ATTRIBUTE CHARACTER | P RF(L) TRT101 YES!!! | P XIF |
0x3573ec…357580 Dummy {f00=0x010d, f01=0x0190, f02=» CWK A2,/7D END OF MESSAGE ? | " P RF(NE) TRT103 NO,GO TO TRT103 } $ P LDK A2,/19 } J PTRT103 EQU * } ^ P CWK A2,X'7F' NULL ?? } r P RF(NE) TRT105 } P SUK A2,1 } P XIF } P IFT RCOM=1 } P RF TRT105 } P } PTRT101 EQU * } P }
0x357580…357714 (2, 322) Dummy {f00=0x010d, f01=0x0190, f02=» LDR A1,A2 CONVERT TO IBM ATTRIBUTE } P ANK A1,1 ~ , P ANK A2,/1E MASK ~ > P SLL A2,1 ~ V & P ORR A2,A1 IBM ATTRIBUTE COMPOSED ~ h " P ORK A2,/40 BIT ALWAYS SET ONE ~ P LC A2,TASCII,A2 ~ & P CWK A2,/18 CHECK SPECIAL ATTRIBUT ~ P RF(NE) TRT104
0x357714…3578a8 Dummy {f00=0x010d, f01=0x0190, f02=» P XIF P P CWK A2,/07 ( P RF(L) TRT110 ILLEGAL CODE : SKIP IT . P CF A5,WRITEP SEND CHARACTER Z PTRT110 EQU * ~ $ P IM FBAX INCREMENT BUFFER INDEX & P LD A1,FECBRL GET REQUESTED LENGTH P CW A1,FBAX " P RF(NG) TRT130 E
0x3578a8…357a3c Dummy {f00=0x010d, f01=0x0190, f02=»1 , P LDK A1,SBA CHECK IF SBA AT END OF BLOCK P CC A1,-2,A4 : P RF(E) TRT115 YES N P CC A1,-1,A4 h P RF(NE) TRT116 NO SEND ETB | ( P LCR A2,A4 GET FIRST BYTE AFTER SBA P ADK A4,1 INREMENT POINTER P CF A5,WRITEP SEND IT
0x357a3c…357bd0 Dummy {f00=0x010d, f01=0x0190, f02=»EX z P XIF PTRT116 EQU * P LDK A2,ETB LOAD ETB * PTRT120 EQU * F P CF A5,WRITEP SEND IT Z P IFF CODE=1 x P LDR A2,A7 GET LRC P CF A5,WRITEP SEND LRC P XIF P IFT CODE=1 P LDR A8,A7 SAVE CURRENT CRC P
0x357bd0…357d64 Dummy {f00=0x010d, f01=0x0190, f02=» BYTE 2 z P XIF P ABL TRRE10 HALT OUTPUT PTRT130 EQU * < P IM XETX INDICATE 'ETX SENT' P PTRT140 EQU * t P LDK A2,ETX LOAD ETX P RB TRT120 SEND ETX AND LRC P P* P* P* TRANSMIT STATUS MESSAGE P
0x357d64…357ef8 Dummy {f00=0x010d, f01=0x0190, f02=»,TRSYNC START OUTPUT P LDK A2,SOH P CF A5,WRITE SEND SOH 0 P LDK A7,0 REST LRC N P LDK A2,'%' h P CF A5,WRITEP SEND '%' | P LDK A2,'R' P CF A5,WRITEP SEND 'R' P LDK A2,STX P CF A5,WRITE SEND STX P LC A2,DW1
0x357ef8…35808c Dummy {f00=0x010d, f01=0x018e, f02=»/06 MASK FOR S/S 0 P SRL A1,1 $ P LC A2,SSTAB,A1 GET STATUS BYTE , P CF A5,WRITEP SEND S/S 0 T P LDK A2,NOIR PRELOAD S/S 1 t P LD A1,DWTST,A6 GET STATUS P ANK A1,5 P RF(Z) TRST10 NOT 'IR' P ANK A1,4 P RF(NZ) TRST10
0x35808c…358220 Dummy {f00=0x010d, f01=0x018e, f02=» P P* P* P* TRANSMIT SYNC SEQUENCE " P* B P* L PTRSYNC EQU * V P LDK A2,0 j * P CIO A2,0,LCUIN HALT INPUT IF NOT DONE | P SST A2,LCUIN PERFORM SST P IFT P6805=0 & P CIO A2,1,LCUUT START TRANSMITTER
0x358220…3583b4 (2, 323) Dummy {f00=0x010d, f01=0x018e, f02=» P SST A1,LCUUT P RF(A) TRS005 P ABL BRM 4 PTRS005 CIO A2,1,LCUUT F PTRS010 EQU * d P LDK A2,SYNEBC z * P OTR A2,1,LCUUT SPECIFY SYNC CHARACTER P XIF P IFT P6805=1 P IFT CODE=0 P LDK A2,/0C
0x3583b4…358548 Dummy {f00=0x010d, f01=0x0190, f02=» x PTRS010 EQU * P LDK A2,SYN * P OTR A2,1,LCUUT SPECIFY SYNC CHARACTER 0 P XIF ^ * P CF A5,READ WAIT FOR OUTPUT INTERRUPT l P LDK A3,4 4 SYNS PTRS100 LDK A2,SYN P CF A5,WRITE SEND SYN P SUK A3,1 P RB(NZ) TRS1
0x358548…3586dc Dummy {f00=0x010d, f01=0x0190, f02=»AV P IFT CPU852=1 P CF A15,SAVE8 SAVE A1-A8 P XIF @ P L P IFF CPU852=1 T P MSR 8,A15 SAVE A1-A8 =1 j P XIF * P CF A15,LDREG RESTORE DC REGS A3 - A8 P INR A2,0,LCUIN READ CHAR , P RF(NA) IHIN20 NOT ACCEPTED,CHECK
0x3586dc…358870 Dummy {f00=0x010d, f01=0x0190, f02=»IHLCI2 P CWK A2,SYN SKIP SYNS P RF(E) READ , " PIHLCI2 XRR A7,A2 CALCULATE LRC @ P XIF f P IFT CODE=1 r P C2 SYNSW 2 P RF(NZ) IHLCI1 DO NOT SKIP SYNCS IN BCC FRAME P CWK A2,SYNEBC P RF(E) READ SKIP EBCDIC SYN P
0x358870…358a04 Dummy {f00=0x010d, f01=0x0190, f02=»FT P6805=0 PIHIN20 CF A5,SST PERFORM SST P ABL BRM 8 P XIF H P IFT P6805=1 V PIHIN20 RF SST PERFORM SST l P XIF P P* P* P* TRANSMITTER INTERRUPT P* P* PIH1502 EQU * P ST
0x358a04…358b98 Dummy {f00=0x010d, f01=0x018e, f02=»=1 z P XIF * P CF A15,LDREG RESTORE DC REGS A3 - A8 P RB IHIN10 D P V P* ` P* j & P* SST INSTRUCTION AND STATUS CHECK t P* ( P* LCU STATUS : BIT 10=CARRIER OFF & P* BIT 13=PARITY ERROR (6805 ONLY) , P*
0x358b98…358d2c Dummy {f00=0x010d, f01=0x0190, f02=» & P RF(NA) SST200 ALREADY INACTIVE P XIF 2 P LDR A2,A1 @ P IFF LOGG=0 R & P CF A5,LOGSST LOG SST INFORMATION f P XIF P IFT P6805=0 P ANK A2,2 P RF(Z) SST100 P XIF P IFT P6805=1 P ANK A2,6
0x358d2c…358ec0 Dummy {f00=0x010d, f01=0x0190, f02=» XIF PSST050 EQU * P CM XSTA TROUHHPUT ERROR $ P LDKL A5,STB D P ABL BRM010 X PSST100 EQU * l P ST A1,DCSTCU P IFT P6805=0 * P CF A15,CKMESS CHECK IF STATUS CHANGE P RTN A5 P XIF P IFT P6805=1
0x358ec0…359054 (2, 324) Dummy {f00=0x010e, f01=0x0190, f02=»ATA 2 WAIT TIME P RF READ P* * PSST200 LDK A1,0 4 PSSTRET ADK A5,4 L P LDR A1,A1 SET CR d P ABR* A5 RETURN ~ P XIF P* P* P* HALT INPUT P* P* PHALTIN LDK A1,0 P CIO A1,0,LCUIN
0x359054…3591e8 Dummy {f00=0x010e, f01=0x0190, f02=»FOR SST INTERRUPT P XIF P ( P* 2 P* < , P* WRITE FROM OR READ ONE CHARACTER TO A2 F P* v P* PWRITE EQU * P IFT CODE=1 P ANK A2,/FF P CWK A2,/FF 0 P RF(E) WRIT05 NO TRANSLATION OF TRAILING PAD
0x3591e8…35937c Dummy {f00=0x010e, f01=0x018e, f02=» P RF READ THROUGHPUT ERROR P IFF CODE=1 * $ PWRIT10 XRR A7,A2 ACCUMULATE BCC > P XIF f P IFT CODE=1 r & PWRIT10 CF A5,CRCCAL CALCULATE CRC P XIF P IFF LOGG=0 & P CF A5,LOGOUT LOG OUTPUT CHARACTER P XIF P*
0x35937c…359510 Dummy {f00=0x010e, f01=0x0190, f02=» v P* P* P IFT CODE+P6805=0 PWRITEP ANK A2,/FF 6 P ECR A1,A2 P P ORK A2,/80 b PWRI100 SLL A1,1 v P RB(P) WRI100 P RB(Z) WRITE WRITE P XRK A2,/80 P RB WRI100 P XIF P IFF CODE+P6805=0
0x359510…3596a4 Dummy {f00=0x010e, f01=0x0190, f02=»Y h P* P* PREADP CF A5,READ P IFT CODE+P6805=0 6 P ECR A1,A2 P PRE100 SLL A1,1 b P RF(Z) RE110 x P RB(NN) RE100 P XRK A2,/80 P RB RE100 PRE110 LDR A1,A2 P ANK A2,/7F P XIF P IFF COD
0x3596a4…359838 Dummy {f00=0x010e, f01=0x0190, f02=» P P* < P* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2 P* $ P* CALLING SEQUENCE: CF A5,FINTER f P* A2=SUBTERMINAL ADDRESS P* A4 DESTROYED " P* A3#0: DWT TO FOUND TERMINAL P* B P* NOTE: FOR SIEMENS
0x359838…3599cc Dummy {f00=0x010e, f01=0x0190, f02=» h P* . PRBYTE DATA 0 IF 1 COMPARE WITH RIGTH BYTE P* D P* N PFINTEP EQU * X P IFT MSV1=0 l PFINTER EQU * P XIF P IM RBYTE P IFT MSV1=1 PFINTER EQU * P XIF & P LD A4,DCTAB GET ADDRESS TO DC:TAB
0x3599cc…359b60 Dummy {f00=0x010e, f01=0x018e, f02=» v ( P RF(E) FINT20 SUBTERMINAL NOT FOUND P LDR* A3,A4 LOAD DWT ADDRESS 4 P IFT MSV1=1 X $ P AD A3,RBYTE CHOOSE ADDRESS TYPE l * P CCR A2,A3 COMPARE SUBTERMINAL ADDRESS P XIF P IFT MSV1=0 . P CC A2,1,A3 COMPARE TO SUBTERMINAL ADD
0x359b60…359cf4 (2, 325) Dummy {f00=0x010e, f01=0x0190, f02=» P* P* P* POWER ON FUNCTIONS P* 4 P* > PDC15ON EQU * H P IFT CPU852=1 P CF A15,SAVE8 SAVE A1-A8 r P XIF P P IFF CPU852=1 P MSR 8,A15 SAVE A1-A8 =1 P XIF P IFT STAT=1 P LDK A5,4 SE
0x359cf4…359e88 Dummy {f00=0x010e, f01=0x018e, f02=»F(E) DRDC06 END OF TABLE P LDR* A6,A1 GET DWT ADDRESS 0 P ORS A5,DWTST,A6 STORE DEVICE END FOR DEVICE D ( P CF A15,INSSQ INSERT IN STATUS QUEUE x P RB DRDC05 PDRDC06 EQU * P XIF P LDK A2,/40 P ORS A2,DCONOF P CF A15,
0x359e88…35a01c Dummy {f00=0x010e, f01=0x0190, f02=» h PDRDC20 ABL BRM P P* ( P* POLL TIME OUT 2 P* J ( PPTOUT LDKL A5,STB LOAD A5 STACK BASE T P LDK A2,/40 ( P ST A2,DCONOF INDICATE POLL TIME OUT * P CF A15,CKMESS CHECK IF STATUS CHANGE $ P CF A15,SPOTIM START POLL
0x35a01c…35a1b0 Dummy {f00=0x010e, f01=0x0190, f02=»LING t P LDKL A2,-TIMPOL P ST* A2,DCTPGP RESTART TIMER $ * P CF A15,CKMESS CHECK IF STATUS CHANGE H P RTN A5 v P* P* START POLL TIMER P* $ PSPOTIM CF A15,SETIME START TIMER P DATA PTOUT,TIMPOL & P ST A4,DCTPGP STOR
0x35a1b0…35a344 Dummy {f00=0x010e, f01=0x0190, f02=» $ P LDR A1,A6 LOAD DWT AS PARAMETER P CF A15,SETIME 0 P DATA PRTOUT,TIMPRO F $ P ST A4,DCTPP SAVE TIMER POINTER b P RTN A5 P* P* PROCEDURE TIMEOUT P* PPRTOUT CM DCTPP P LDR A6,A1 RELOAD A6 P LDKL A5,S
0x35a344…35a4d8 Dummy {f00=0x010e, f01=0x0190, f02=» SEND ENQ & P CF A5,SPTIM START PROCEDURE TIMER PPRT10 ABL BRM < P R P* P* STOP PROCEDURE TIMER f P* ( PHPTIM LD A1,DCTPP GET TIMER POINTER P RF(Z) HPT10 NOT RUNNING P CM* DCTPP STOP TIMER P CM DCTPP
0x35a4d8…35a66c Dummy {f00=0x010e, f01=0x0190, f02=»A7 = ACCUMULATED CRC P* P* & PCRCCAL EQU * 0 P ST A1,CRCSAV D P ST A2,CRCSAV+2 Z P ST A3,CRCSAV+4 r P LDK A1,8 PCRC100 LDR A3,A7 P SRL A7,1 P XRR A3,A2 P SRL A2,1 P ANK A3,1 P RF(Z) CRC11
0x35a66c…35a800 Dummy {f00=0x010e, f01=0x0190, f02=»V+4 P RTN A5 PCRCSAV RES 3 P 0 P* : P* D ( P* READ CRC CHARACTERS AND CHECK THEM N P* CR = (E) IF CRC WAS OK z P* P* $ PRDCRC LDR A6,A7 SAVE CURRENT CRC $ P IM SYNSW DO NOT SKIP SYNCS NOW P CF A5,REA
0x35a800…35a994 (2, 326) Dummy {f00=0x010e, f01=0x0190, f02=»,CRCSAV+2 SAVE IT P SLL A2,8 P XRR A2,A8 , P ADK A5,4 > . P CWR A2,A6 COMPARE RECEIVED WITH COMPUTED P P ABR* A5 P XIF P IFT CODE=0 P* & P* RDLRC READ LRC CHARACTER " P* CR=0 IF LRC OK
0x35a994…35ab28 Dummy {f00=0x010e, f01=0x0190, f02=»CEND EQU * P CM SYNSW P ABR* A5 $ P 4 P XIF < P H 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
0x35ab28…35acbc Dummy {f00=0x010e, f01=0x018e, f02=»CATOR v P DATA 0 TASK QUEUE P* ( P IFT MMUPAG=1 2 P DATA 0 USER ECB ADDRESS H P DATA DC:ECB MMU ECB ADDRESS h P XIF P* P DATA 0 TIMER POINTER ( P DATA 0 WRITE QUEUE OR BUFFER QUEUE . P DATA 0 STATUS QUEUE (NOT US
0x35acbc…35ae50 Dummy {f00=0x010e, f01=0x018e, f02=» " P DATA 0 REQUEST TIMEOUT VALUE " P DATA 0 EXTRA DEVICE INFO DK5 * P* P P IFT MMUPAG=1 Z PDC:ECB EQU * MMU ECB p P DATA 0,0,0,0,0,0 P XIF P* P P* P* P* DC RECEIVE BUFFER POOL P* PRLIN
0x35ae50…35afe4 Dummy {f00=0x010e, f01=0x0190, f02=» P DATA *+RLINK P RES RBUFL+3 P IFF RBUFNR=3 2 P DATA *+RLINK H P RES RBUFL+3 ^ P IFF RBUFNR=4 r P DATA *+RLINK P RES RBUFL+3 P XIF P IFF RBUFNR=1 DK3 P DATA *+RLINK P RES RBUFL+3 P XIF
0x35afe4…35b178 Dummy {f00=0x010e, f01=0x0190, f02=» P P* P* P* INTERRUPT LOGGING ROUTINE & P* J P* T P IFF LOGG=0 ^ PLOGSST ST A2,SAVE2 r P ORKL A2,/F000 P RF LOG10 PLOGOUT ST A2,SAVE2 P ORKL A2,/0F00 P RF LOG10 PLOGIN CWK A2,/FF
0x35b178…35b30c Dummy {f00=0x010e, f01=0x0190, f02=» A3,LOGEND P RF(L) LOGEXI P LDKL A3,LOGSTA ( PLOGEXI ST A3,LOGPNT @ P LD A2,SAVE2 P LD A3,SAVE3 p PLOGE10 RTN A5 P P* P* PLOGPNT DATA LOGSTA PLOGSTA EQU * P RES 300 PLOGEND EQU *-4
0x35b30c…35b4a0 Dummy {f00=0x010e, f01=0x0190, f02=»*********************************** | P* , P* L I N C O L 6 P* P : P* CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER Z P* > P********************************************************** P PLINCOL EQU * " P LDR A2,
0x35b4a0…35b634 (2, 327) Dummy {f00=0x010e, f01=0x0190, f02=»NUMBER x 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 NUMBER j P RTN A5 RETURN P* P* P* P P P* SCANDINAVIAN ALPHABET P DB
0x35b634…35b7c8 Dummy {f00=0x010e, f01=0x0190, f02=»E,/4F50 /10-/17 z * P DATA /5152,/245D,/2A29,/3B5E /18-/1F * P DATA /2D2F,/5354,/5556,/5758 /20-/27 F * P DATA /595A,/402C,/255F,/3E3F /28-/2F t ( P DATA /3031,/3233,/3435,/3637 /30-37 ( P DATA /3839,/3A5B,/5C27,/3D22 /38-3F P DE P
0x35b7c8…35b95c Dummy {f00=0x010e, f01=0x4086, f02=»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 * N P* b P* l P END v@ /255F,/3E3F /28-/2F t ( P DATA /3031,/3233,/3435,/3637 /30-37 ( P DATA /3839,/3A5B,/5C27,/3D22 /38-3F P DE P
0x35b95c…35baf0 Dummy {f00=0x010e, f01=0x2008, f02=» H P X ` h p x
0x35baf0…35bc84 Dummy {f00=0x010e, f01=0x0000, f02=»
[…0x3…]
0x35c140…35c2d4 (2, 328) Opaque[0x194]
0x35c2d4…35c468 # DirEnt {nam=»EBCDIC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x21e0, f03=0x0000}
0x35c2d4…35c468 IdxSect {
0x35c2d4…35c468 f00 = 0x010f // 0x35c2d4 @0x0
0x35c2d4…35c468 f01 = 0x0004 // 0x35c2d6 @0x2
0x35c2d4…35c468 gno = [ // 0x35c2d8 @0x4
0x35c2d4…35c468 [0x00]: C0x010f.0x0.0
0x35c2d4…35c468 [0x01]: C0x010f.0x1.0
0x35c2d4…35c468 ]
0x35c2d4…35c468 }
0x35c468…35c5fc Dummy {f00=0x010f, f01=0x018e, f02=» 0 P IDENT EBCDIC 9.2DK 3 82-10-05 870105040920 P 8 P* @ 4 P************************************************ J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* EBCDIC = EBCDIC/ASCII TABLE P* P* P* P*
0x35c5fc…35c790 Dummy {f00=0x010f, f01=0x018e, 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* : P* VERSION FOR SCAND
0x35c790…35c924 Dummy {f00=0x010f, f01=0x018e, f02=» P* 7C 5C P* 00 7C P* 5A 24 $ P* 6A 40 4 0 P* 2F 06 USM (2F) TIL SKIP (06) DK3 D . P* 1C 7B DUP (1C) TIL DUP (7B) DK3 x P EJECT P* P* 2 P* TABLE FOR CONVERSION OF EBCDIC CODE TO ASCII P*
0x35c924…35cab8 Dummy {f00=0x010f, f01=0x0190, f02=» j ( P DATA /1011,/1213,/000A,/0000 10-17 ( P DATA /0019,/0000,/7B1D,/1E1F 18-1F 4 ( P DATA /0000,/0000,/0000,/171B 20-27 ` ( P DATA /0000,/0000,/0005,/0006 28-2F ( P DATA /0000,/1600,/0000,/0004 30-37 ( P DATA /0000,/0000,/1415,/001A 38-3F
0x35cab8…35cc4c Dummy {f00=0x010f, f01=0x0190, f02=» ( P DATA /5152,/245D,/2A29,/3B5E 58-5F ( P DATA /2D2F,/5354,/5556,/5758 60-67 0 ( P DATA /595A,/402C,/255F,/3E3F 68-6F ( P DATA /1831,/3233,/3435,/3637 70-77 ( P DATA /3839,/3A5B,/5C27,/3D22 78-7F ( P DATA /2061,/6263,/6465,/6667 80-87
0x35cc4c…35cde0 Dummy {f00=0x010f, f01=0x0190, f02=» DATA /2D2F,/7374,/7576,/7778 A0-A7 ( P DATA /797A,/7C2C,/255F,/3E3F A8-AF , ( P DATA /3031,/3233,/3435,/3637 B0-B7 X ( P DATA /3839,/3A23,/4027,/3D22 B8-BF ( P DATA /2041,/4243,/4445,/4647 C0-C7 ( P DATA /4849,/5B2E,/3C28,/2B21 C8-CF ( P
0x35cde0…35cf74 (2, 329) Dummy {f00=0x010f, f01=0x0190, f02=»A /595A,/7C2C,/255F,/3E3F E8-EF ( P DATA /3031,/3233,/3435,/3637 F0-F7 ( ( P DATA /3839,/3A23,/4027,/3DFF F8-FF T P XIF P EJECT P* P* 2 P* TABLE FOR CONVERSION OF ASCII CODE TO EBCDIC P* P* PTEBCDIC EQU *
0x35cf74…35d108 Dummy {f00=0x010f, f01=0x0190, f02=»/3C3D,/3226 10-17 ~ ( P DATA /7019,/3F27,/1C1D,/1E1F 18-1F ( P DATA /404F,/7F4A,/5A6C,/507D 20-27 F ( P DATA /4D5D,/5C4E,/6B60,/4B61 28-2F r ( P DATA /F0F1,/F2F3,/F4F5,/F6F7 30-37 ( P DATA /F8F9,/7A5E,/4C7E,/6E6F 38-3F ( P DATA /6AC1,/C2C3,
0x35d108…35d29c Dummy {f00=0x010f, f01=0x411a, f02=»B,/5F6D 58-5F z ( P DATA /0081,/8283,/8485,/8687 60-67 ( P DATA /8889,/9192,/9394,/9596 68-6F B ( P DATA /9798,/99A2,/A3A4,/A5A6 70-77 n ( P DATA /A7A8,/A91C,/0000,/00E0 78-7F 4 P DATA /544F,/5353 SPEC. FLEX CHAR. 'TOSS' 80-84 P XIF
0x35d29c…35d430 Dummy {f00=0x010f, f01=0x2008, f02=» 68-6F z ( P DATA /9798,/99A2,/A3A4,/A5A6 70-77 ( P DATA /A7A8,/A91C,/0000,/00E0 78-7F B 4 P DATA /544F,/5353 SPEC. FLEX CHAR. 'TOSS' 80-84 n P XIF P END @ ( P DATA /C8C9,/D1D2,/D3D4,/D5D6 48-4F ( P DATA /D7D8,/D9E2,
0x35d430…35d5c4 Dummy {f00=0x010f, f01=0x0190, f02=»P( PP P< P@ 6 B + | Z ! 6* X , X P ! ! W< ! 6* _ ! 6* _& ! : X , X P ! X , X P B B ! ! ! T Y *W X * ! # & ! ! v " 0 TOT 0 SST X Y ,W 0 X Y , Y * ! ! v X *
0x35d5c4…35d758 Dummy {f00=0x010f, f01=0x0190, f02=» ! N ! f ! ! ^ ! ( ! ! V ! X Y . X * " ! _ Y * 4 ! PT C ! ! ! (@ ! R _ ! $ 1 ;h 1 ! 1 ! ! * ! ! ! ) ! Y *# T X Y ._ Y *# 4 ! Z ( C V ! : ! B B
0x35d758…35d8ec Dummy {f00=0x010f, f01=0x0190, f02=» LW Y L Y H Y J Y B S W W B C & Z _ ? V Y " X $ T X Y $ Y X (P y (_> ( A0 _N Y ( " X . P Y : ! p ! X # P Y .:A , X $ Y Y $ Y X Y & X '? n A d ? V(@ X H X J K P6 X LT $
0x35d8ec…35da80 Dummy {f00=0x010f, f01=0x0190, f02=»<C ! 9 4 X " _ W B RZ X , X P W P Q8 U _ T,: B R(' P Q 9BW Q 9C B ! T 4 P ;A _ 4 X 0 # P _ 4(@ R D? 1_ W (@ R 0 D@ ] _ ! 4 ! L ;E :B 9A ! L
0x35da80…35dc14 (2, 330) Opaque[0x194]
0x35dc14…35dda8 # DirEnt {nam=»TIMER «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x21f0, f03=0x0000}
0x35dc14…35dda8 IdxSect {
0x35dc14…35dda8 f00 = 0x010f // 0x35dc14 @0x0
0x35dc14…35dda8 f01 = 0x0006 // 0x35dc16 @0x2
0x35dc14…35dda8 gno = [ // 0x35dc18 @0x4
0x35dc14…35dda8 [0x00]: C0x010f.0x2.0
0x35dc14…35dda8 [0x01]: C0x010f.0x3.0
0x35dc14…35dda8 [0x02]: C0x0110.0x0.0
0x35dc14…35dda8 ]
0x35dc14…35dda8 }
0x35dda8…35df3c Dummy {f00=0x010f, f01=0x0190, f02=» 0 P IDENT TIMER REL 9.2 79-11-16 870105040920 P 8 P* @ P* J 8 P*************************************************** T P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TIMER = TIMER FUNCTIONS P* P* P*
0x35df3c…35e0d0 Dummy {f00=0x010f, f01=0x0190, f02=»AINS TIMER LKM PROCESSORS AND | " P* THE FOLLOWING SUBROUTINES: & P* L * P* -SETIME: SET BLOCK IN TIMER QUEUE V . P* -SETIMP: SETIME + STORE TIMER POINTER P* P* P EJECT TIMER P* P* P*********** P
0x35e0d0…35e264 Dummy {f00=0x010f, f01=0x0190, f02=» . P ENTRY SETIMP SETIME + STORE TIMER POINTER P 6 P > P F P* N P* X P*********** b P* EXTRNALS * v P************ P* P* P EXTRN TDISP DISPATCHER . P EXTRN LKMQDI QUEUE TERMINAL AND DISPATCH $ P EXT
0x35e264…35e3f8 Dummy {f00=0x010f, f01=0x018e, f02=»ADDRESS x $ P EXTRN ACTOT ACTIVATE A TERMINAL * P EXTRN SAVE8 SAVE 8 REGISTERS ON STACK 8 8 P EXTRN TIMQUE POINTER TO FIRST BLOCK IN TIMER QUEUE f 0 P EXTRN IHRET8 RESTORE 8 REGISTERS FROM STACK P EJECT TIMER P* P* . P********
0x35e3f8…35e58c Dummy {f00=0x010f, f01=0x0190, f02=» d P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. L P* ~ PCPU852 EQU 0 P* P EJECT TIMER P* P* P* T I M E R P* ( P* THIS IS THE TIMER LK
0x35e58c…35e720 Dummy {f00=0x010f, f01=0x018e, f02=»ELAY P* P* A4 = 0 P* A5 = TTAB ADDRESS ( P* A8 = DELAY F P* P* f P* 2. TIMING AND ACTIVATION p P* P* A1 = PARAMETER 8 P* A4 = DISPATCH ADDRESS OF PROGRAM TO BE ACTIVATED , P* A5 = TTAB ADDRES
0x35e720…35e8b4 (2, 331) Dummy {f00=0x010f, f01=0x0190, f02=» PTIMER EQU * P ADK A4,0 SET CR * P RF(NZ) TIM010 TIMING AND ACTIVATION? 0 P* ^ P EJECT TIMER h P* ~ P* PROGRAM DELAY P* P LDR A1,A5 SET PARAMETER P ST A8,PAR1+2 SET TIME P CF A15,SETIME PPAR1 DAT
0x35e8b4…35ea48 Dummy {f00=0x010f, f01=0x0190, f02=» PTIM010 EQU * $ P CF A15,FNDTID FIND TTAB ADDRESS P ADK A2,0 SET CR D " P ABL(Z) LKMRQE TTAB NOT FOUND? ( P LDR A3,A2 IN BLOCK: A3=TTAB ADDRESS , P LDR A2,A4 A2=DISPATCH ADDRESS ( P CF A15,GETBLK A1=PARAMETER .
0x35ea48…35ebdc Dummy {f00=0x010f, f01=0x0190, f02=» PQUEDIS EQU * P ABL LKMQDI P* , P EJECT TIMER 6 P* L P* V P* RETURN AFTER TIME OUT ` P* P* 1.PROGRAM DELAY P* PDELAY EQU * P LDR A5,A1 SET TTAB ADDRESS * P RB QUEDIS QUEUE TASK FOR DISP
0x35ebdc…35ed70 Dummy {f00=0x010f, f01=0x0190, f02=»FREBLK AND SET IT FREE P LDR A5,A3 SET TTAB ADDRESS * P LDK A7,0 MONITOR ACTIVATION PARAMETER B ( P CF A15,ACTOT AND ACTIVATE TERMINAL p P RB TTDIS P* P EJECT TIMER P* P* " P* S E T I M E , S E T I M P P
0x35ed70…35ef04 Dummy {f00=0x010f, f01=0x0190, f02=»RS:- ~ P* P* A1 = PARAMETER . P* A4 = IF SETIMP: TIMER POINTER ADDRESS 0 , P* P1 = DISPATCH ADDRESS AFTER TIME OUT b P* P2 = DELAY P* : P* P1 AND P2 ARE STORED AFTER THE SUBROUTINE REQUEST. P* P* EXIT PARAM
0x35ef04…35f098 Dummy {f00=0x010f, f01=0x018e, f02=» * P IFT CPU852=1 & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF J P* V P IFT CPU852=0 ` P INH v " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P* P EJECT TIMER P* P* * P LDR A6,A4 SAVE TIMER POINTER AD
0x35f098…35f22c Dummy {f00=0x010f, f01=0x0190, f02=» P LDR* A8,A5 TIME IN A8 P ADK A5,2 & ( P ST A5,20,A15 ADJUST PROGRAM COUNTER 8 $ P CF A15,GETBLK GET A FREE BLOCK d P LDR A2,A4 P C1R A1,A8 " P CF A15,GETBLK GET TIMER BLOCK P LD A1,TIMQUE " P STR A1,A4 SET BLOCK IN QUEU
0x35f22c…35f3c0 Dummy {f00=0x010f, f01=0x417a, f02=»ETIME? , P STR A4,A6 -SETIMP. STORE TIMER POINTER P* > P EJECT TIMER H P* ^ P* h PSETEND EQU * r P IFT CPU852=1 ( P ABL IHRET8 RESTORE A1-A8 AND RETURN P XIF P* P IFT CPU852=0 * P MLR 8,A15 RESTORE A
0x35f3c0…35f554 (2, 332) Dummy {f00=0x0110, 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
0x35f554…35f6e8 Dummy {f00=0x0110, f01=0x0190, f02=»W ! f* T ! X $P y $ Y $ C ! [ 0 Z , ! B Z ZX X . 0T N W X ,P Y . 0 %_. % Y . _t _ P , _ ?" 8 T ! )_ W ! T "? 9 0 R Q > 4 >_ <k$ Y T #? 0R R * W ?W X P $ <c ,P $
0x35f6e8…35f87c Dummy {f00=0x0110, f01=0x0190, f02=» NT 0 (@ > ($SWAP A A A A. UU @ @ ! P$>B @ A @ E D P _ $ % $P _ % A @ " Q A R : R W2 A ( A ( P. _ " :c* A W " :d2 * A r & W F
0x35f87c…35fa10 Dummy {f00=0x0110, f01=0x0190, f02=» PN A @ $ P( @ R W 8 !RRT W V P A Y W @ " T> W @ V W Q h Y P @ T W - P _ T <B :L A W A A W
0x35fa10…35fba4 Dummy {f00=0x0110, f01=0x0190, f02=» < P W <9B @ V W Q W @ 6 @ CRT @ P @ ! P W @ V P _ @ ! P !RRP V @ P W _: V @ PZ W @ @ ! T _ P
0x35fba4…35fd38 Dummy {f00=0x0110, f01=0x0190, f02=» P$ _ P !;;T X$ W _J ( T (W R W W V 0 !;;P P V Xb _ P !;;T X$ W nP XZ_V S A A R @ R @ ! T A & A : V @ R V V
0x35fd38…35fecc Dummy {f00=0x0110, f01=0x0190, f02=»A K : A T.I T P 1 I P < R P A _> : A A A X A n A A A A : 9e9C) A I " 9A ! 9B r @ Rr A I ! ( : A A A X A n A &! T A * A & I ! : 9E @ Rr s A
0x35fecc…360060 Dummy {f00=0x0110, f01=0x0190, f02=»P P$_ P =H P @ T X W n : YX d C !CCT B. X B.9 H T Q _ r_ !SST( 0 U Z R X A X W : @ ' R xW V W$ V P P W P V T W V
0x360060…3601f4 (2, 333) Opaque[0x194]
0x3601f4…360388 # DirEnt {nam=»TMMLKM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2208, f03=0x0000}
0x3601f4…360388 IdxSect {
0x3601f4…360388 f00 = 0x0110 // 0x3601f4 @0x0
0x3601f4…360388 f01 = 0x0006 // 0x3601f6 @0x2
0x3601f4…360388 gno = [ // 0x3601f8 @0x4
0x3601f4…360388 [0x00]: C0x0110.0x1.0
0x3601f4…360388 [0x01]: C0x0110.0x2.0
0x3601f4…360388 [0x02]: C0x0110.0x3.0
0x3601f4…360388 ]
0x3601f4…360388 }
0x360388…36051c Dummy {f00=0x0110, f01=0x0190, f02=» 2 P IDENT TMMLKM REL 9.2 79-11-16 870105040920 P : P* B P* L 6 P************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* ( P* TMMLKM = TOSS MMU LKM PROCESSORS P* P*
0x36051c…3606b0 Dummy {f00=0x0110, f01=0x0190, f02=»WING n P* TOSS MMU LKM PROCESSORS: P* 0 " P* - TCHPAG = CHANGE MMU PAGE : P* ` $ P* - TCHMMU = CHANGE MMU TABLE j P* & P* - TLUSEG = LOCK/UNLOCK SEGMENT P* P* P EJECT TMMLKM P* P* P**
0x3606b0…360844 Dummy {f00=0x0110, f01=0x0190, f02=» MMU TABLE | & P ENTRY TLUSEG LOCK/UNLOCK SEGMENT P < P D P L P* T P* ^ P************* h P* EXTERNALS * ~ P************* P* P* 0 P EXTRN FNDTID FIND TTAB ADDRESS FROM TASK ID , P EXTRN LKMQDI QUEUE TA
0x360844…3609d8 Dummy {f00=0x0110, f01=0x0190, f02=»AB ADDRESS ~ $ P EXTRN SCTNOS NUMBER OF SEGMENTS P EJECT TMMLKM : P* R P* P********** f P* TCHPAG * x P********** P* P* 2 P* THIS IS THE CHANGE MMU PAGE LKM PROCESSOR. P* B P* TCHPAG WILL CHANGE T
0x3609d8…360b6c Dummy {f00=0x0110, f01=0x0190, f02=»TERED FROM THE LKM HANDLER & P* WITH THE FOLLOWING PARAMETERS: " P* L P* A5 = TTAB ADDRESS V ( P* A7 = PAGE TO BE CHANGED, 0 - 15 t * P* A8 = NEW LOCATION OF PAGE, 0 - 63 P* < P* IT RETURNS TO CALLING TASK WITH A7 AND A8 UN
0x360b6c…360d00 Dummy {f00=0x0110, f01=0x0190, f02=»XING IN MMU TABLE v P ADR A7,A5 ADD TTAB ADDRESS P LDR A2,A8 NEW PAGE LOCATION > . P ANK A2,/3F SKIP IRRELEVANT BITS (IF ANY) b P SLL A2,2 < P SC A2,TTB:MT,A7 STORE NEW LOCATION OF PAGE IN MMU TABLE P* 0 PT:DISP ABL LKMQDI QUEUE
0x360d00…360e94 (2, 334) Dummy {f00=0x0110, f01=0x018e, f02=»* P* 4 P* THIS IS THE CHANGE MMU TABLE LKM PROCESSOR. P* L D P* TCHMMU WILL CHANGE THE MMU TABLE CONTENTS OF REQUESTING TASK V 4 P* TO THE MMU TABLE CONTENTS OF SPECIFIED TASK. P* * P* IT IS ENTERED FROM THE LKM HANDLER
0x360e94…361028 Dummy {f00=0x0110, f01=0x0190, f02=» ` P* ( P* IT RETURNS TO CALLING TASK WITH P* THE FOLLOWING PARAMETER: > P* b 2 P* A7 = UNCHANGED IF REQUEST SUCCESSFUL, ELSE l & P* A7 = -1 IF TASK NOT IN SYSTEM P* " PTCHMMU EQU * CHANGE MMU TABLE * P CF A15,FNDT
0x361028…3611bc Dummy {f00=0x0110, f01=0x0190, f02=»NTENTS h 4 P TS TTB:MT,A5 STORE IN MMU TABLE OF CALLING TASK * P RB T:DISP QUEUE TASK FOR DISPATCHING F P* t P EJECT TMMLKM ~ P* P* P********** P* TLUSEG * P********** P* P* 6 P* THIS IS THE LOCK
0x3611bc…361350 Dummy {f00=0x0110, f01=0x0190, f02=»OCK SEGMENT REQUEST IS ISSUED FOR THAT SEGMENT. P* 8 * P* IT IS ENTERED FROM THE LKM HANDLER B & P* WITH THE FOLLOWING PARAMETERS: p P* P* A5 = TTAB ADDRESS P* A7 = SEGMENT NUMBER & P* A8 = 0 IF LOCK SEGMENT REQUEST
0x361350…3614e4 Dummy {f00=0x0110, f01=0x0190, f02=» P* > P* A7 = UNCHANGED IF SEGMENT LOADING IS SUCCESSFUL, ELSE & P* A7 = -1 IF REQUEST ERROR, ELSE P P* z P* P EJECT TMMLKM P* P* $ PTLUSEG EQU * LOCK/UNLOCK SEGMENT * P LDR A1,A7 CHECK IF SEGMENT NUMBER < 0
0x3614e4…361678 Dummy {f00=0x0110, f01=0x0190, f02=»TLCERR EQU * , P ABL LKMRQE BRANCH TO LKM REQUEST ERROR P* D PTLUS00 EQU * N , P SLL A1,3 ADJUST FOR INDEXING IN SEGTAB b $ P AD A1,SCTSEG ADD SEGTAB ADDRESS " P LCR A4,A1 GET SEGMENT STATUS P ANK A4,/8 " P RB(NZ) TLCERR CORE RE
0x361678…36180c Dummy {f00=0x0110, f01=0x4164, f02=» P EJECT TMMLKM P* P* LOCK SEGMENT & P* < 4 P ORRS A4,A1 INDICATE SEGMENT TO BE CORE RESIDENT F P RB T:DISP ~ P* P* UNLOCK SEGMENT P* PTLUS10 EQU * P C1R A4,A4 A4 := /FDFF 2 P ANRS A4,A1 INDICATE SEGME
0x36180c…3619a0 Dummy {f00=0x0110, f01=0x2008, f02=» NT TCHPAG PRR 9.1 78-10-16 870105040910 END <@ H
0x3619a0…361b34 (2, 335) Dummy {f00=0x0110, f01=0x0190, f02=» n P LDK A3,0 P* P IFT MMUPAG=0 $ * P LDR* A1,A7 GET NO OF ECB:S IN ECBBLK : P XIF h P* t P IFT MMUPAG=1 ~ ( P ELR A1,A7 GET NO OF ECB:S IN ECBBLK P XIF P* ( P RF(NP) TP:RQE REQUEST ERROR IF <= 0 P*
0x361b34…361cc8 Dummy {f00=0x0110, f01=0x0190, f02=»S v & P LDR* A2,A8 GET FIRST WORD OF ECB P XIF 4 P* @ P IFT MMUPAG=1 J P ELR A8,A7 GET ECB ADDRESS ` $ P ELR A2,A8 GET FIRST WORD OF ECB P XIF P* ( P RF(N) TMW:30 I/O ALREADY COMPLETED? 8 P CF A15,FNDDWT NO, SEARCH DW
0x361cc8…361e5c Dummy {f00=0x0110, f01=0x0190, f02=» " P LD A2,DWTST,A6 GET DWT STATUS P RF(N) TP:RQE NOT BUSY? * P CW A5,DWTTAB,A6 J 4 P RF(NE) TP:RQE REQUEST NOT ISSUED BY THIS TASK? b 0 P LD A2,DWTWAT,A6 GET WAIT/ACTIVATE INDICATOR , P RF(NZ) TP:RQE REQUEST ISSUED WITH WAIT? P ORK A6,1
0x361e5c…361ff0 Dummy {f00=0x0110, f01=0x0190, f02=»AVE FIRST DWT ADDRESS P LDR A3,A6 P* 0 PTMW:20 EQU * : 8 P ST A6,DWTWAT,A9 CHAIN THIS DWT WITH THE ONE BEFORE N $ P LDR A9,A6 SAVE THIS DWT ADDRESS P SUK A1,1 ( P RB(P) TMW:10 MORE ECB:S IN ECBBLK? : P ST A3,DWTWAT,A9 NO, SET
0x361ff0…362184 Dummy {f00=0x0110, f01=0x0190, f02=» TTAB SAVE AREA p 2 P ADK A3,0 CHECK FLAG IF FIRST ECB TO WAIT FOR & P RF(Z) TP:QDI FIRST ECB IN ECBBLK? N P* x : PTMW:40 ADKL A3,DWTWAT POINT TO WAIT/ACTIVATE INDICATOR $ P LDR* A2,A3 GET NEXT DWT ADDRESS P RF(Z) TP:QDI NO MORE DWT:S?
0x362184…362318 Dummy {f00=0x0110, f01=0x40aa, f02=»QU * " P ABL LKMRQE LKM REQUEST ERROR P* 2 PTP:QDI EQU * < ( P ABL LKMQDI QUEUE TASK AND DISPATCH P P* | P* P* P END @ VATE INDICATOR $ P LDR* A2,A3 GET NEXT DWT ADDRESS P RF(Z) TP:QDI NO MORE DWT:S?
0x362318…3624ac Dummy {f00=0x0110, 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
0x3624ac…362640 Dummy {f00=0x0110, f01=0x0000, f02=»
0x362640…3627d4 (2, 336) Opaque[0x194]
0x3627d4…362968 # DirEnt {nam=»TLDSEG«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2220, f03=0x0000}
0x3627d4…362968 IdxSect {
0x3627d4…362968 f00 = 0x0111 // 0x3627d4 @0x0
0x3627d4…362968 f01 = 0x0006 // 0x3627d6 @0x2
0x3627d4…362968 gno = [ // 0x3627d8 @0x4
0x3627d4…362968 [0x00]: C0x0111.0x0.0
0x3627d4…362968 [0x01]: C0x0111.0x1.0
0x3627d4…362968 [0x02]: C0x0111.0x2.0
0x3627d4…362968 ]
0x3627d4…362968 }
0x362968…362afc Dummy {f00=0x0111, f01=0x0190, f02=» 2 P IDENT TLDSEG REL 9.2 79-11-16 870105040920 P : P* B P* L 6 P************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TLDSEG = LOAD SEGMENT P* P* P*
0x362afc…362c90 Dummy {f00=0x0111, f01=0x0190, f02=»M PROCESSOR, d 0 P* USED IN TOSS MEMORY MANAGEMENT SYSTEMS. P* H P* R P EJECT TLDSEG P* t P* ~ P*********** P* ENTRIES * P*********** P* P* P ENTRY TLDSEG LOAD SEGMENT & P ENTRY TLDS15
0x362c90…362e24 Dummy {f00=0x0111, f01=0x0190, f02=»* EXTERNALS * P************* P* , P* 6 0 P EXTRN PRUN TTAB ADDRESS OF RUNNING PROGRAM @ P EXTRN TDISP DISPATCHER t $ P EXTRN LKM030 LKM REQUEST ERROR & P EXTRN PAG:QB QUEUE LINK BACKWARDS P EXTRN PAG:PA PAGE ADDRESS & P
0x362e24…362fb8 Dummy {f00=0x0111, f01=0x018e, f02=»A TTAB SAVE AREA P EXTRN TTB:MT MMU TABLE ( P EXTRN TTB:SB SEGMENT BLOCK ADDRESS 8 2 P EXTRN QLTDSK ACTIVATE LDTASK AT ENTRY LT:DSK d P EXTRN SCTSEG SEGTAB ADDRESS $ P EXTRN SCTNOS NUMBER OF SEGMENTS & P EXTRN SCTMMP MMU TABLE PAGE ENTRY
0x362fb8…36314c Dummy {f00=0x0111, f01=0x0190, f02=» . P***************************************** P* : P* CONDITIONAL ASSEMBLY D P* b . P***************************************** l P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P
0x36314c…3632e0 Dummy {f00=0x0111, f01=0x0190, f02=» CPU852 EQU 0. t P* PCPU852 EQU 0 P* 4 * > . ** A PROGRAM VERSION USING TOSS DISC PAGING H * &* IS OBTAINED BY SETTING DSKPAG EQU 1. z * PDSKPAG EQU 0 * P* 4 P* A PROGRAM VERSION USING TOSS ASSEMBLER OVERL
0x3632e0…363474 (2, 337) Dummy {f00=0x0111, f01=0x0190, f02=» P********** P* TLDSEG * P********** ( P* : P* D 0 P* THIS IS THE LOAD SEGMENT LKM PROCESSOR. N P* * P* IT IS ENTERED FROM THE LKM HANDLER & P* WITH THE FOLLOWING PARAMETERS: P* 4 P* A2 = DISPATCH ADDRESS
0x363474…363608 Dummy {f00=0x0111, f01=0x0190, f02=»S) d P* ( P* IT RETURNS TO CALLING TASK WITH " P* THE FOLLOWING PARAMETERS: @ P* f > P* A7 = UNCHANGED IF SEGMENT LOADING IS SUCCESSFUL, ELSE p & P* A7 = -1 IF REQUEST ERROR, ELSE ( P* A7 = -2 IF DISC I/O ERROR, ELSE $ P
0x363608…36379c Dummy {f00=0x0111, f01=0x018e, f02=»UGH THE DISPATCHER AFTER p > P* COMPLETION, THUS NO TASK SWITCHING WILL BE PERFORMED, < P* IN PURPOSE TO MAKE THE REQUEST AS FAST AS POSSIBLE. b P* : P* WHEN REQUESTED SEGMENT IS NOT IN CORE TLDSEG WILL : P* ACTIVATE LDTASK WHICH WILL
0x36379c…363930 Dummy {f00=0x0111, f01=0x018e, f02=» PTLDSEG EQU * LOAD SEGMENT * P LDR A1,A7 CHECK IF SEGMENT NUMBER < 0 & P RF(N) TLDERR REQUEST ERROR? T 2 P CW A1,SCTNOS CHECK IF SEGMENT NUMBER TOO BIG x P RF(NG) TLDS00 OK? P* $ PTLDERR LDK A6,/FF INDICATE ERROR , P ABL LKM030 BR
0x363930…363ac4 Dummy {f00=0x0111, f01=0x0190, f02=» P LDR A3,A5 GET TTAB ADDRESS , P SLL A1,3 ADJUST FOR INDEXING IN SEGTAB , $ P AD A1,SCTSEG ADD SEGTAB ADDRESS & P ADK A2,2 UPDATE DISPATCH ADDRESS P* P IFT DSKPAG=0 $ P SUKL A15,4 ADJUST STACKPOINTER . P ST A2,4,A15 SET D
0x363ac4…363c58 Dummy {f00=0x0111, f01=0x0190, f02=»,TTB:SB,A3 RESET SEGMENT BLOCK ADDRESS 6 P LD A1,SEG:DS,A1 GET LOGICAL ADDRESS OF SEGMENT 0 . P* h P IFT DSKPAG=1 r $ P SUKL A15,4 ADJUST STACKPOINTER . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK P XIF P* P RF TLDS40
0x363c58…363dec Dummy {f00=0x0111, f01=0x0190, f02=»ADDRESS j " P LDR* A4,A1 GET SEGMENT STATUS * P RF(N) TLDS10 SEGMENT LOADED IN CORE? 6 P ST A2,TTB:SA,A3 d P CM PRUN | P* P* ACTIVATE LOAD TASK P* 6 P CF A15,QLTDSK ACTIVATE LOAD TASK AT ENTRY LT:DSK P ABL TDISP GO TO D
0x363dec…363f80 Dummy {f00=0x0111, f01=0x0190, f02=»4 ADJUST STACKPOINTER . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK P* P ( P* REMOVE PAGE BLOCK FROM PAGE QUEUE Z P* P XIF P* & PTLDS15 EQU * ENTRY USED BY LDTASK P IFT DSKPAG=1 & P LDR* A2,A1 GET QUEUE LINK FORWARD
0x363f80…364114 (2, 338) Dummy {f00=0x0111, f01=0x0190, f02=»F REMOVED BLK n " P STR A2,A4 UPDATE QUEUE LINKS P ST A4,PAG:QB,A2 < P XIF T P* ` P EJECT TLDSEG j P* , P* GET PAGE ADDRESS OF REQUESTED SEGMENT P* & PTLDS20 EQU * ENTRY USED BY LDTASK & P LD A1,PAG:PA,A1 GET PAG
0x364114…3642a8 Dummy {f00=0x0111, f01=0x0190, f02=»MMU TABLE j P* 0 P AD A3,SCTMMP POINT TO FIRST USED PAGE ENTRY , P LD A4,SCTNPE GET NUMBER OF PAGE ENTRIES P P* P* UPDATE PAGE ENTRY/ENTRIES P* PTLDS25 EQU * P SCR A2,A3 UPDATE PAGE ENTRY P SUK A4,1 ( P RF(NP
0x3642a8…36443c Dummy {f00=0x0111, f01=0x0190, f02=»* P EJECT TLDSEG P* " P* , 4 PTLDS30 ANKL A1,/300 COMPUTE CURRENT SEGMENT BASE 6 P SLL A1,2 n P OR A1,SCTLAP $ P TL TTB:MT,A5 LOAD MMU REGISTERS P* PTLDS40 EQU * P IFT ASSOLY=0 2 P ES A1,T:ACSB,A13 UPDA
0x36443c…3645d0 Dummy {f00=0x0111, f01=0x0190, f02=» BASE h P XIF P* P IFT CPU852=0 $ P LDR A6,A5 : $ P ML 6,TTB:SA+2,A6 RESTORE A1-A6 L $ P RTN A15 RETURN TO CALLING TASK t P XIF P* P IFT CPU852=1 $ P LD A1,TTB:SA+2,A5 RESTORE A1-A6 P LD A2,TTB:SA+4,A5
0x3645d0…364764 Dummy {f00=0x0111, f01=0x4048, f02=» TASK v P XIF P* P* $ P* . END 8@ D $ P ML 6,TTB:SA+2,A6 RESTORE A1-A6 L $ P RTN A15 RETURN TO CALLING TASK t P XIF P* P IFT CPU852=1 $ P LD A1,TTB:SA+2,A5 RESTORE A1-A6 P LD A2,TTB:SA+4,A5
0x364764…3648f8 Dummy {f00=0x0111, f01=0x2008, f02=» NT TLDSEG PREREL.9.1 780907 BOFE END 6@ B
0x3648f8…364a8c Dummy {f00=0x0111, f01=0x0190, f02=»D OF QUEUE P IM 4,A4 INCREMENT TIMER P RB(N) CLK10 NOT TIME OUT? 2 P RF(Z) CLK30 TIME OUT? T P LDR* A3,A4 RELEASE TIMER r P STR A3,A6 P CF A15,FREBLK P LDR A4,A2 P CF A15,FREBLK P RB CLK20 P* P EJECT
0x364a8c…364c20 Dummy {f00=0x0111, f01=0x018e, f02=» P IFT CPU852=1 & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF H P* T P IFT CPU852=0 ^ " P MSR 8,A15 SAVE A1-A8 ON STACK t P XIF P* $ P CF A15,SWL48 SWITCH TO LEVEL 48 P INH P LD A2,2,A4 LOAD DISP BLOCK P
0x364c20…364db4 (2, 339) Opaque[0x194]
0x364db4…364f48 # DirEnt {nam=»TABORT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2238, f03=0x0000}
0x364db4…364f48 IdxSect {
0x364db4…364f48 f00 = 0x0111 // 0x364db4 @0x0
0x364db4…364f48 f01 = 0x0004 // 0x364db6 @0x2
0x364db4…364f48 gno = [ // 0x364db8 @0x4
0x364db4…364f48 [0x00]: C0x0111.0x3.0
0x364db4…364f48 [0x01]: C0x0112.0x0.0
0x364db4…364f48 ]
0x364db4…364f48 }
0x364f48…3650dc Dummy {f00=0x0111, f01=0x0190, f02=» 2 P IDENT TABORT REL 9.2 79-11-16 870105040920 P : P* B P* L 6 P************************************************* V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* " P* TABORT = ABORT I/O REQUEST P* P* P*
0x3650dc…365270 Dummy {f00=0x0111, f01=0x0190, f02=»AINS THE | ( P* ABORT I/O REQUEST LKM PROCESSOR. P* < P* F P EJECT TABORT P P* h P* r P*********** | P* ENTRIES * P*********** P* P* P ENTRY TABORT P P P P* P*
0x365270…365404 Dummy {f00=0x0111, f01=0x0190, f02=» DWTST DWT STATUS & P EXTRN DWTADR DRIVER ADDRESS BLOCK & P EXTRN DWTTAB TTAB ADDRESS IN DWT D 0 P EXTRN DWTWAT WAIT ACTIVATE INDICATOR IN DWT n " P EXTRN DWTECH ECHO DEVICE DWT ( P EXTRN ABTADR ABORT ROUTINE ADDRESS P EXTRN TENDIO END I/
0x365404…365598 Dummy {f00=0x0111, f01=0x0190, f02=» TABORT P* P* . P***************************************** & P* X P* CONDITIONAL ASSEMBLY b P* . P***************************************** P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY
0x365598…36572c Dummy {f00=0x0111, f01=0x0190, f02=»BORT * P********** P* P* * 4 P* THIS IS THE ABORT I/O REQUEST LKM PROCESSOR. 4 P* l * P* IT IS ENTERED FROM THE LKM HANDLER v & P* WITH THE FOLLOWING PARAMETERS: P* P* A5 = TTAB ADDRESS P* A8 = ECB ADDRE
0x36572c…3658c0 Dummy {f00=0x0111, f01=0x0190, f02=»AT MADE THE I/O REQUEST. THUS I/O WITH WAIT CAN P* NOT BE ABORTED. 8 P* T P* ^ PTABORT EQU * h P IFT MMUPAG=0 | & P LDR* A3,A8 GET FIRST WORD OF ECB P XIF P* P IFT MMUPAG=1 $ P ELR A3,A8 GET FIRST WORD OF ECB
0x3658c0…365a54 (2, 340) Dummy {f00=0x0112, f01=0x0190, f02=» P RF(Z) TABOER DWT UNKNOWN? P* & P EJECT TABORT 0 P* H P* R P CW A5,DWTTAB,A6 P RF(NE) TABOER ILLEGAL TASK? t P LD A7,DWTST,A6 " P RF(N) TABOER DEVICE NOT BUSY? P SLC A7,2 $ P RF(NN) TABO20 NOT ECHO REQUEST?
0x365a54…365be8 Dummy {f00=0x0112, f01=0x018e, f02=»RESS BLOCK f 8 P LD A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) , P RF(Z) TABO10 NO SPECIAL ABORT ROUTINE? N & P CFR A15,A2 PERFORM ABORT ROUTINE ~ P* PTABO10 EQU * $ P CF A15,TENDIO ABORT ECHO DEVICE P LDR A6,A8 RESTORE DWT
0x365be8…365d7c Dummy {f00=0x0112, f01=0x0190, f02=» n : P CF A15,FREBLK I/O AND ACTIVATE. FREE DISPATCHER BLOCK " P CM DWTWAT,A6 INDICATE NO WAIT F P* l PTABO30 EQU * v 8 P LD A2,DWTADR,A6 GET ADDRESS TO DRIVER ADDRESS BLOCK 8 P LD A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) , P RF(Z)
0x365d7c…365f10 Dummy {f00=0x0112, f01=0x40c8, f02=»CODE z P CF A15,TENDIO ABORT 0 P ABL LKMQDI QUEUE TASK AND GO TO DISPATCHER ( P* 0 PTABOER ABL LKMRQE GO AND INDICATE LKM ERROR f P* P* P* P END @ D A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) , P RF(Z)
0x365f10…3660a4 Dummy {f00=0x0112, f01=0x2008, f02=»
0x3660a4…366238 Dummy {f00=0x0112, f01=0x0190, f02=»,TTB:SB,A3 RESET SEGMENT BLOCK ADDRESS 6 P LD A1,SEG:DS,A1 GET LOGICAL ADDRESS OF SEGMENT 0 . P* h P IFT DSKPAG=1 r $ P SUKL A15,4 ADJUST STACKPOINTER . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK P XIF P* P RF TLDS40
0x366238…3663cc Dummy {f00=0x0112, f01=0x0190, f02=»ADDRESS j " P LDR* A4,A1 GET SEGMENT STATUS * P RF(N) TLDS10 SEGMENT LOADED IN CORE? 6 P ST A2,TTB:SA,A3 d P CM PRUN | P* P* ACTIVATE LOAD TASK P* 6 P CF A15,QLTDSK ACTIVATE LOAD TASK AT ENTRY LT:DSK P ABL TDISP GO TO D
0x3663cc…366560 Dummy {f00=0x0112, f01=0x0190, f02=»4 ADJUST STACKPOINTER . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK P* P ( P* REMOVE PAGE BLOCK FROM PAGE QUEUE Z P* P XIF P* & PTLDS15 EQU * ENTRY USED BY LDTASK P IFT DSKPAG=1 & P LDR* A2,A1 GET QUEUE LINK FORWARD
0x366560…3666f4 (2, 341) Opaque[0x194]
0x3666f4…366888 # DirEnt {nam=»MONTIM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2248, f03=0x0000}
0x3666f4…366888 IdxSect {
0x3666f4…366888 f00 = 0x0112 // 0x3666f4 @0x0
0x3666f4…366888 f01 = 0x0006 // 0x3666f6 @0x2
0x3666f4…366888 gno = [ // 0x3666f8 @0x4
0x3666f4…366888 [0x00]: C0x0112.0x1.0
0x3666f4…366888 [0x01]: C0x0112.0x2.0
0x3666f4…366888 [0x02]: C0x0112.0x3.0
0x3666f4…366888 ]
0x3666f4…366888 }
0x366888…366a1c Dummy {f00=0x0112, f01=0x0190, f02=» 2 P IDENT MONTIM REL 9.2 79-11-16 870105040920 P : P* B P* L < P******************************************************* V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* * P* MONTIM = MONITOR CLOCK PROCESSORS P*
0x366a1c…366bb0 Dummy {f00=0x0112, f01=0x0190, f02=»* THIS MODULE CONTAINS TOSS MONITOR CLOCK PROCESSORS P* @ 0 P* -GETTIM GET TIME FROM MONITOR CLOCK J P* ~ . P* -SETTIM SET TIME IN MONITOR CLOCK P* P EJECT MONTIM P* P* P*********** P* EN
0x366bb0…366d44 Dummy {f00=0x0112, f01=0x0190, f02=»TOR CLOCK r P P P " P* * P* 4 P************* > P* EXTERNALS * T P************* j P* P* P EXTRN MONCLO MONITOR CLOCK * P EXTRN LKMQDI QUEUE TASK AND DISPATCH P EXTRN TTB:SA TTAB SAVE AREA
0x366d44…366ed8 Dummy {f00=0x0112, f01=0x0190, f02=»* . P***************************************** P* < . P* A PROGRAM VERSION USING TOSS MMU PAGING F * P* IS OBTAINED BY SETTING MMUPAG EQU 1. x P* PMMUPAG EQU 1 P* P EJECT MONTIM P* P* P* G E T T I
0x366ed8…36706c Dummy {f00=0x0112, f01=0x0190, f02=»ADDRESS TO THE USER TIMER CONTROL 2 P* BLOCK IN A8. MONITOR CLOCK IS COPIED INTO * P* TIMER CONTROL BLOCK. ` P* P* PGETTIM EQU * 6 P LDKL A7,MONCLO+6 ADDRESS TO MONITOR CLOCK SECOND P LDK A3,6 COUNTER P INH
0x36706c…367200 Dummy {f00=0x0112, f01=0x018e, f02=» v P SUK A7,2 P LDR* A6,A7 HOURS P ENB 4 P* @ * PGETT10 CF A15,BYTASC CONVERT TO ASCII J P IFT MMUPAG=0 x * P SC A6,1,A8 STORE RIGHTHAND CHARACTER P ECR A6,A6 ( P SCR A6,A8 STORE LEFTHAND CHARACTER P XIF P*
0x367200…367394 (2, 342) Dummy {f00=0x0112, f01=0x0190, f02=» $ P RF(Z) GETT15 TCB ADDRESS EVEN? P LDR A1,A6 0 P EL A4,1,A8 B P ANK A4,/FF V P SLL A1,8 j P ORR A1,A4 | P ES A1,1,A8 P ELR A4,A8 P SRL A6,8 P ANKL A4,/FF00 P ORR A6,A4 P* 6 PGETT15 ESR A6,A8
0x367394…367528 Dummy {f00=0x0112, f01=0x0190, f02=»ET ACTUAL TIME FROM STACK P RB GETT10 " P* 4 P EJECT MONTIM > P* V P* ` PGETT20 SUK A7,2 j . P LDR* A6,A7 GET ACCUMULATED 24 HOUR CARRY 2 P ST A6,TTB:SA+14,A5 STORE IN TTAB SAVE AREA A7 P CMR A7 CLEAR MIDNIGTH CARRY
0x367528…3676bc Dummy {f00=0x0112, f01=0x0190, f02=»S IS THE SET TIME LKM PROCESSOR. P* ( 0 P* IT IS ENTERED FROM THE LKM HANDLER WITH 2 0 P* ADDRESS TO THE USER TIMER CONTROL BLOCK f 0 P* IN A8. VALUE IN TIMER CONTROL BLOCK IS $ P* COPIED INTO MONITOR CLOCK. P* P*
0x3676bc…367850 Dummy {f00=0x0112, f01=0x0190, f02=»QU * P IFT MMUPAG=0 & P LCR A6,A8 GET LEFTHAND CHARACTER " P ECR A6,A6 L ( P LC A6,1,A8 GET RIGHTHAND CHARACTER ^ P XIF P* P IFT MMUPAG=1 2 P ELR A6,A8 GET VALUE FROM TIMER CONTROL BLOCK . P LDR A4,A8 GET TIMER CONTROL
0x367850…3679e4 Dummy {f00=0x0112, f01=0x0190, f02=»LL A6,8 P SRL A4,8 P ORR A6,A4 " P* 4 PSETT15 EQU * > P XIF R P* ^ P EJECT MONTIM h P* P* $ P CF A15,ASCTBY CONVERT TO BINARY P SUK A3,2 END ? P RF(E) SETT20 P ADKL A8,2 0 P STR A6,A15
0x3679e4…367b78 Dummy {f00=0x0112, f01=0x0190, f02=» l P SUK A7,2 P LDR* A6,A15 ( P STR A6,A7 MINUTES TO MONITOR CLOCK . P SUK A7,2 Z P LDR* A6,A15 l & P STR A6,A7 HOURS TO MONITOR CLOCK P SUK A7,2 P CMR A7 RESET MIDNIGTH CARRY P RB TPDIS P* P EJECT MON
0x367b78…367d0c Dummy {f00=0x0112, f01=0x0190, f02=» RESULT IN A6. P* P* ( PBYTASC EQU * 2 P LDK A4,0 F P* X PBYTA10 SUK A6,/A b P RF(N) BYTA20 z P ADKL A4,/100 P RB BYTA10 P* PBYTA20 ADK A6,/A P ADR A6,A4 P ORKL A6,/3030 P RTN A
0x367d0c…367ea0 Dummy {f00=0x0112, f01=0x415c, f02=» ASCII TO BINARY. ~ P* RESULT IN A6. P* > P* H PASCTBY EQU * R P LDR A4,A6 f P ANK A6,/F x P SRL A4,8 P ANK A4,/F P RF(E) ASCT20 P* PASCT10 ADK A6,/A P SUK A4,1 P RB(NE) ASCT10
0x367ea0…368034 (2, 343) Dummy {f00=0x0112, 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
0x368034…3681c8 Dummy {f00=0x0112, f01=0x018e, f02=»RESS BLOCK f 8 P LD A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) , P RF(Z) TABO10 NO SPECIAL ABORT ROUTINE? N & P CFR A15,A2 PERFORM ABORT ROUTINE ~ P* PTABO10 EQU * $ P CF A15,TENDIO ABORT ECHO DEVICE P LDR A6,A8 RESTORE DWT
0x3681c8…36835c Dummy {f00=0x0112, f01=0x0190, f02=» n : P CF A15,FREBLK I/O AND ACTIVATE. FREE DISPATCHER BLOCK " P CM DWTWAT,A6 INDICATE NO WAIT F P* l PTABO30 EQU * v 8 P LD A2,DWTADR,A6 GET ADDRESS TO DRIVER ADDRESS BLOCK 8 P LD A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) , P RF(Z)
0x36835c…3684f0 Dummy {f00=0x0112, f01=0x40c8, f02=»CODE z P CF A15,TENDIO ABORT 0 P ABL LKMQDI QUEUE TASK AND GO TO DISPATCHER ( P* 0 PTABOER ABL LKMRQE GO AND INDICATE LKM ERROR f P* P* P* P END @ D A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) , P RF(Z)
0x3684f0…368684 Dummy {f00=0x0112, f01=0x2008, f02=»
0x368684…368818 Dummy {f00=0x0112, f01=0x0190, f02=» EJECT TPROC P* P* P********** * P* TPAUSE * < P********** N P* ` P* j ( P* THIS IS THE PAUSE LKM PROCESSOR. t P* : P* THIS MODULE IS ENTERED FROM THE LKM HANDLER WHEN A : P* TASK WANTS TO (TEMPORARILY)
0x368818…3689ac Dummy {f00=0x0112, f01=0x0190, f02=» P********** P* TMWAIT * P********** , P* > P* H 0 P* THIS IS THE MULTIPLE WAIT LKM PROCESSOR. R P* * P* IT IS ENTERED FROM THE LKM HANDLER & P* WITH THE FOLLOWING PARAMETERS: P* P* A5 = TTAB ADDRESS
0x3689ac…368b40 Dummy {f00=0x0112, f01=0x018e, f02=»LLING TASK VIA TENDIO t & P* WITH THE FOLLOWING PARAMETERS: P* H , P* A8 = ECB ADDRESS OF COMPLETED EVENT R P* > P* IF REQUEST ERROR, A7 := -1 (AND NO RETURN VIA TENDIO). P* ( P* NOTICE THAT ALL EVENTS MUST HAVE ( P*
0x368b40…368cd4 (2, 344) Opaque[0x194]
0x368cd4…368e68 # DirEnt {nam=»TASS «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2260, f03=0x0000}
0x368cd4…368e68 IdxSect {
0x368cd4…368e68 f00 = 0x0113 // 0x368cd4 @0x0
0x368cd4…368e68 f01 = 0x000c // 0x368cd6 @0x2
0x368cd4…368e68 gno = [ // 0x368cd8 @0x4
0x368cd4…368e68 [0x00]: C0x0113.0x0.0
0x368cd4…368e68 [0x01]: C0x0113.0x1.0
0x368cd4…368e68 [0x02]: C0x0113.0x2.0
0x368cd4…368e68 [0x03]: C0x0113.0x3.0
0x368cd4…368e68 [0x04]: C0x0114.0x0.0
0x368cd4…368e68 [0x05]: C0x0114.0x1.0
0x368cd4…368e68 ]
0x368cd4…368e68 }
0x368e68…368ffc Dummy {f00=0x0113, f01=0x0190, f02=» 0 P IDENT TASS REL 9.2 79-11-16 870105040920 P 8 P =1, PR 4313 @ P* REL 9.1 78-10-25 V P r P* z P* 8 P**************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P*
0x368ffc…369190 Dummy {f00=0x0113, f01=0x0190, f02=»**************************** x P* $ " P* THIS MODULE IS ENTERED VIA . $ P* ASSIGN REQUEST (DATA 15) OR T ( P* ASSIGN INDEX REQUEST (DATA 16). | P* P* LDK A7,TC P* LDKL A8,ASBLK P* LKM P* DATA 15 P
0x369190…369324 Dummy {f00=0x0113, f01=0x018e, f02=»K IS A PARAMETER BLOCK z D P* AND TC = 1 WHEN TASK LOCAL ASSIGN IN TTAB IS WANTED B P* TC = 0 WHEN GLOBAL ASSIGN IN SCTCDT IS WANETED f P* P EJECT P* +----------+----------+ $ P* ASBLK I NO OF VOL FC I
0x369324…3694b8 Dummy {f00=0x0113, f01=0x0190, f02=» t . P* I I P* +---------------------+ : P* I I P* I VOL NAME I ~ P* I I P* +---------------------+ P* I I P*
0x3694b8…36964c Dummy {f00=0x0113, f01=0x018e, f02=»* CREATED IN TTAB/CD:TAB. P* $ F P* THE FDB IS INITIALIZED WITH INFORMATION FROM THE VTOC:S OF THE . $ P* VOLUMES MENTIONED IN ASBLK. x P* J P* UPON COMPLETION OF THE ASSIGN REQUEST REG A7 WILL HAVE ONE OF THE P* FOLLOWING RE
0x36964c…3697e0 Dummy {f00=0x0113, f01=0x0190, f02=» x " P* 2 = NO FREE ENTRY IN TABLE P* 3 = NO FDB AVAILABLE . ( P* 4 = ONE OR MORE VOLUMES UNKNOWN N " P* 5 = FILE CODE ALREADY USED z P* 6 = FILE NAME UNKNOWN 0 P* 7 = FILE SECTION MISSING OR FOUND TWICE P* 8 = FAULTY DIS
0x3697e0…369974 (2, 345) Dummy {f00=0x0113, f01=0x0190, f02=»K P* LKM P* DATA 16 P* 0 " P* INPUT A5 = TTAB ADDRESS : " P* A8 = ASBLK ADDRESS ` 0 P* WHERE ASBLK IS A PARAMETER BLOCK P* +----------+----------+ $ P* ASBLK I NO OF VOL FC I P* +
0x369974…369b08 Dummy {f00=0x0113, f01=0x0190, f02=»---------------------+ P* I I P* I VOL NAME I @ P* I I b P* +---------------------+ $ P* I MASTER INDEX " P* I FILE NAME P* D P* UPON C
0x369b08…369c9c Dummy {f00=0x0113, f01=0x0190, f02=»ORMED j P* -1 = REQUEST ERROR P* 1 = DISC I/O ERROR , " P* 2 = NO FREE ENTRY IN TABLE J 8 P* 3 = NO FDB AVAILABLE OR MASTER INDEX CORE AVAIL p ( P* 4 = ONE OR MORE VOLUMES UNKNOWN " P* 5 = FILE CODE ALREADY USED P* 6 = FI
0x369c9c…369e30 Dummy {f00=0x0113, f01=0x0190, f02=»S EXIST v " P* 10= NO DATA FILE ASSIGNED * P* 11= 4 INDEX FILES ALREADY ASSIGNED 6 $ P* 12= MAX KEY LENGTH TOO SMALL d 0 P* 13= REQUEST BUSY. REPEAT ASSIGN REQUEST P EJECT P* P*************** P* ENTRIES * P
0x369e30…369fc4 Dummy {f00=0x0113, f01=0x0190, f02=»TTA P ENTRY TASASB P ENTRY TASCVO " P ENTRY TASVOL 8 P ENTRY TASCXO N P ENTRY TASSEX d P ENTRY TASXLB z P ENTRY TASFDB P ENTRY TASVRL P ENTRY TASVLE P ENTRY TASVRN P ENTRY TASECB & P ENTRY TAS
0x369fc4…36a158 Dummy {f00=0x0113, f01=0x0190, f02=»HLT HALT SYSTEM DUE TO DM (SYSGEN) ERROR P EJECT 0 P* > P***************** H P* EXTERNALS * b P***************** | P* P EXTRN DFTAB P EXTRN DFTABE P EXTRN SCTCDT P EXTRN DWTVOL P EXTRN FNDTID
0x36a158…36a2ec Dummy {f00=0x0113, f01=0x0190, f02=» TTB:TD,DMTASX P EXTRN ECBFC,ECBRC 0 P EXTRN MOV:US MOVE FROM USER TO SYSTEM AREA 0 $ P EXTRN HALT HALT SYSTEM ROUTINE d P EJECT TOSSIO P* P* . P***************************************** P* P* CONDITIONAL ASSEMB
0x36a2ec…36a480 Dummy {f00=0x0113, f01=0x018e, f02=»BTAINED BY SETTING MMUPAG EQU 1. P* ( PMMUPAG EQU 1 2 P* F P EJECT P P* ^ P******************* h P* DATA AREAS * P******************* P* PTASBLK DATA 0 USE INDICATOR $ PTASQUE DATA 0 ASSIGN QUEUE ANC
0x36a480…36a614 (2, 346) Dummy {f00=0x0113, f01=0x018e, f02=» 0 PTASVOL DATA 0 VOLUME IDENTIFICATION (DMI,FC) " P DATA 0,0,0 THREE MORE ENTRIES 8 6 PTASCXO DATA 0 CURRENT OFFSET IN TASSEX AND TASXLB ^ 0 PTASSEX DATA 0 SECTION NUMBER, EXTENT NUMBER * P DATA 0 OFFSET IN TASVOL FOR THIS EXT ( P DATA 0,0,0,0,
0x36a614…36a7a8 Dummy {f00=0x0113, f01=0x0190, f02=» PTASFDB DATA 0 FDB ADDRESS $ PTASVRL DATA 0 VTOC RECORD LENGTH & PTASVLE DATA 0 VTOC LENGTH N PTASVRN DATA 0 VTOC RECORD NO p PTASECB DATA 0,0 ECBFC,ECBBA P DATA 410 ECBRL P DATA 0,0,0 ECBEL,-RC,-CW P DATA 0 CW2 0 PTA
0x36a7a8…36a93c Dummy {f00=0x0113, f01=0x0190, f02=»TASSPW DATA 0 TTAB ADDRESS DMTASK $ PTASFDD DATA 0 FDB ADDR DATA FILE * ( PTASTBE DATA 0 TTAB/SCTCDT ENTRY ADDR R 2 PTASLFD DATA 0,0 LOCKED FLEXDISC FILE CODES =1 ~ P DATA 0,0 P DATA 0,0 " PTASS14 EQU *-2 TASS A14 STACK P* P
0x36a93c…36aad0 Dummy {f00=0x0113, f01=0x0190, f02=» * P************** P* , P* ENTRY TASCAQ CHECK ASSIGN QUEUE * P* Z P* A7= RETURN CODE d P* * P* SET OFF USE BIT IN TASBLK H P* IF TASQUE = 0 THEN RETURN ELSE QUEUE FIRST IN CHAIN AND 2 P
0x36aad0…36ac64 Dummy {f00=0x0113, f01=0x0190, f02=»QUE P RF(Z) TASCEX EMPTY QUEUE " P LDR* A1,A5 GET NEXT IN CHAIN . , P ST A1,TASQUE AND PUT IT FIRST IN QUEUE T P LDKL A1,-4 ( P ADS A1,TTB:SA,A5 UPD DISPATCH ADDR P CF A15,QTJOB NEXT ASSIGN P RF TASC05 & PTASCEX CM TASQUE
0x36ac64…36adf8 Dummy {f00=0x0113, f01=0x0190, f02=» CODE IN SAVED A7 r P RTN A14 P EJECT * 8 P****DESCRIPTION************************************* 8 P* t : P* VOLCHE WILL COMPARE EACH VOLUME NAME IN ASBLK WITH ~ & P* VOLUME NAMES IN DWT FOR DISCS P* 8 P****ENTRY PARAMETERS****
0x36adf8…36af8c Dummy {f00=0x0113, f01=0x0190, f02=»S WANTED. v : P* 1 LOCK WANTED. ONLY FROM DMTASS FOR FLEXDISC P* P 8 P****EXIT PARAMETERS********************************* Z P* P* A1 = 0 OK P* 1 VOLUME UNKNOWN P* A5 = TTAB ADDR P* 8 P****USED REG
0x36af8c…36b120 Dummy {f00=0x0113, f01=0x0190, f02=»************** h PVOLCHE EQU * P CM TASLFD =1 * $ P CM TASLFD+2 LOCKED FLEXDISCS =1 @ P SLL A2,1 h P SUK A2,2 z 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
0x36b120…36b2b4 (2, 347) Dummy {f00=0x0113, f01=0x0190, f02=» ADDRESS IN CD:TAB AND COMPARE DWTVOL P* . P LD* A6,SCTCDT 8 PTAS130 SUK A6,4 N 2 P RF(N) TASHLT FC NOT FOUND? SHOULD NOT OCCUR. f P LD A5,SCTCDT P ADR A5,A6 P CC A1,1,A5 P RB(NE) TAS130 NOT THIS FC P LDR A11,A11
0x36b2b4…36b448 Dummy {f00=0x0113, f01=0x0190, f02=» P* LOCK FLEXDISC P* P LDKL A8,TASECB ( " P ST A1,ECBFC,A8 FLEX FILE CODE @ P SUR A12,A12 f P LDK A7,/A6 LOCK,WAIT z P LKM P DATA 1 P LD A7,ECBRC,A8 P RF(Z) TAS131 P ANKL A7,/7FFF " P RF(NZ) TASF10 N
0x36b448…36b5dc Dummy {f00=0x0113, f01=0x0190, f02=»NZ) TAS150 GRAVE ERR PTAS131 EQU * P ST A1,TASVOL,A2 SAVE FC 0 P P P AD A6,SCTCDT X P LDR* A5,A6 INDEX n $ P LDK A1,0 DISC NAME DISPLACEMENT P SRL A5,8 P RF(Z) TAS135 , P* DECIDE DISC DISPL FOR THIS FILE CODE $ P
0x36b5dc…36b770 Dummy {f00=0x0113, f01=0x0190, f02=»AS132 PTAS135 EQU * P LD A6,2,A6 DWT ADDR " & P RF(Z) TASHLT NO DWT ADDRESS FOUND > & P ADR A6,A1 POINTER TO VOLUME NAME h P LDK A1,3 VOL NAMES 3 WORDS & P LDR A5,A4 POINTER ASBLK VOL NAME P* , P* CHECK VOLUME NAMES IN DWT
0x36b770…36b904 Dummy {f00=0x0113, f01=0x0190, f02=»2 P SUK A1,1 . P RB(P) TAS140 CHECK NEXT WORD IN VOL NAME P* N P* VOL NAME MATCH X P* STORE DMI , FC IN TASVOL r P* P LD A1,TASVOL,A2 P ANK A1,/0F P CWK A1,/8 $ P RF(L) TAS143 NOT FLEXIBLE DISC P L
0x36b904…36ba98 Dummy {f00=0x0113, f01=0x0190, f02=» t P* 1 FOR DRIVE 2 " P* 2 FOR FLEXDISC , P* R P SC A1,TASVOL,A2 P* t 6 P* SAVE FILE CODES FOR NEWLY LOCKED FLEXDISCS =1 ~ 2 P* (ONLY SIGNIFICANT WHEN A11 = 1 ) =1 START P* P SUK A1,2
0x36ba98…36bc2c Dummy {f00=0x0113, f01=0x0190, f02=»,TASVOL+1,A2 FILE CODE P SC A3,TASLFD,A1 SAVE PTAS147 EQU * =1 END < P* X P* CHECK NEXT VOL IN ASBLK b P* P LDK A1,0 RET CODE P ADK A4,6 P SUK A2,2 ( P RB(NN) TAS110 MORE VOLUMES TO CHECK * P RF TAS155 OK
0x36bc2c…36bdc0 Dummy {f00=0x0113, f01=0x0190, f02=» P ANK A1,/F8 P SUK A1,/F8 P RF(NZ) TAS150 NO FLEXDISC , P LDR A12,A12 LFLAG N P RF(NZ) TAS150 LOCKED BEFORE h P* P* UNLOCK P* P LDK A7,/B8 UNLOAD,WAIT P LKM P DATA 1 P* & P* NO MATCH TRY
0x36bdc0…36bf54 (2, 348) Dummy {f00=0x0114, f01=0x0190, f02=» LDK A1,1 PTAS155 EQU * P RTN A14 & P* 6 ( PTASHLT LDK A1,/11 INDICATE DM ERROR @ P CF A15,HALT HALT SYSTEM l P* P EJECT P* P************ P* TASS * P************ P* PIXTASS EQU * P
0x36bf54…36c0e8 Dummy {f00=0x0114, f01=0x0190, f02=» A7,A8 GET FIRST WORD OF USER ASSIGN BLOCK $ P ANK A7,/FF SKIP LEFT CHARACTER 2 0 P ORKL A7,/8100 BIT 0+7 IND. ASSIGN ONE INDEX Z ( P ESR A7,A8 SET WORD IN ASSIGN BLOCK P XIF P*~ ( P LDK A7,0 ONLY GLOBAL ASSIGN ALLOWED P* PTA
0x36c0e8…36c27c Dummy {f00=0x0114, f01=0x0190, f02=»NOT COMPLETED t 4 P* AND IF SO QUEUE THIS REQUEST VIA THE TASQUE P* N P LD A1,TASBLK X & P RF(Z) TAS050 NO CONCURRENT ASSIGN n * P LDKL A1,TASQUE START OF ASSIGN QUEUE ( PTAS020 EQU * QUEUE AS FOR GETBUFFER P LDR A2,A1 P LDR
0x36c27c…36c410 Dummy {f00=0x0114, f01=0x0190, f02=»QU * & P IM TASBLK INDICATE ASSIGN STARTED ! " P CM TASFDD FDB ADDR DATA FILE ! 6 P* ! 6 P ST A5,TASTTA SAVE TTAB ADDRESS OF REQUESTING TASK ! f P* ! P IFT MMUPAG=1 ! P* ! 2 P* MOVE USER ASSIGN BLOCK TO SYSTEM AREA MASBLK ! P* ! ,
0x36c410…36c5a4 Dummy {f00=0x0114, f01=0x0190, f02=»BLOCK ADDRESS ! p , P LDK A3,34 ASSIGN BLOCK LENGTH IN BYTES " $ P CF A14,MOV:US MOVE ASSIGN BLOCK " F P XIF " n P* " z $ P ST A8,TASASB SAVE ASBLK ADDRESS " P* " P LDK A1,16 " : P ST A1,TASCXO INIT. TASCXO TO LAST ENTRY IN TASSEXXLB " P*
0x36c5a4…36c738 Dummy {f00=0x0114, f01=0x0190, f02=» " P LCR A2,A8 NO OF VOLUMES # . P ANK A2,/1F REMOVE INDEX BIT +DELAY+BASIC # ( P RF(Z) TAS090 NO VOL # Z P CWK A2,4 # v P RF(NG) TAS100 <=4 # PTAS090 RF TASSEM # P EJECT # P* # $ P* CHECK IF VOLUMES ARE ON LINE # P* # PTAS1
0x36c738…36c8cc Dummy {f00=0x0114, f01=0x0190, f02=»1,0 SET CR # $ P RF(Z) TAS160 ALL VOLUMES FOUND $ P* $ : , P* ALL VOL NOT FOUND. ACT FLEXDISCTASK $ D P* $ t P LD A1,TASCVO $ ~ P LDK A2,2 ID DMTASK FLEXDISC $ P SC A2,TASVOL,A1 SEE TAS195 $ P EJECT $ P* $ , P* CHECK IF FILE CO
0x36c8cc…36ca60 Dummy {f00=0x0114, f01=0x0190, f02=»D $ j P LDR A10,A10 TC % P RF(Z) TAS165 GLOBAL ASSIGN % " P LD A2,TASTTA TTAB ADDR % F P LDR A4,A2 % f P LD A2,TTB:TD,A4 % x P ADKL A4,TTB:TD+1 % P RF TAS170 % PTAS165 EQU * % P LD A4,SCTCDT % P LDR* A2,A4 % P ADK A4,1 %
0x36ca60…36cbf4 (2, 349) Dummy {f00=0x0114, f01=0x0190, f02=»S170 NO MATCH % P* & P* FILE CODE USED & . P* OK WHEN REQ = ASS INDEX AND INDEX = 1 & : P* & l P LDR* A2,A8 ASBLK 1ST WORD & v P RF(NN) TASSE5 NORMAL ASSIGN & P LDK A2,1 & P CC A2,-1,A1 INDEX & * P RF(NE) TASSE5 FILE CODE ALREADY
0x36cbf4…36cd88 Dummy {f00=0x0114, f01=0x0190, f02=»* & P* ' > P* FIND A FREE ENTRY IN TTAB/CD:TAB (FC AND DWTADR = 0 ) ' P* ' V PTAS180 EQU * ' ` P LDK A1,0 ' t P LDR A10,A10 TC ' P RF(Z) TAS185 GLOBAL ASSIGN ' P LD A2,TASTTA TTAB ADDR ' P LDR A4,A2 ' P LD A2,TTB:TD,A4 '
0x36cd88…36cf1c Dummy {f00=0x0114, f01=0x0190, f02=»UK A2,4 ' ( P RF(L) TASSE2 NO FREE ENTRY IN TABLE ( P LDR A9,A4 ( < P ADR A9,A2 ( N P CCR A1,A9 FILE CODE ( ` " P RB(NE) TAS190 FC NOT EQUAL 0 ( | P CW A1,1,A9 ( & P RB(NE) TAS190 DWTADR NOT EQUAL 0 ( P LDR* A1,A8 ASBLK 1ST WORD ( P RF(N)
0x36cf1c…36d0b0 Dummy {f00=0x0114, f01=0x0190, f02=»Y ( f P ST A9,TASTBE SAVE ENTRY ) P* ) * 0 P* GET FIRST VOLUME AND ACTIVATE ITS DMTASK ) 4 P* ) h P LD A1,TASCVO ) r P LDK A7,0 ) P LC A7,TASVOL,A1 ) P ADKL A7,'#D' TID DMTASK ) P CF A15,FNDTID ) " P LDR A5,A2 TTAB ADDRESS DMTASK )
0x36d0b0…36d244 Dummy {f00=0x0114, f01=0x0190, f02=»RY ) | P LDK A7,4 VOL UNKNOWN * P RF TASSEM * ( PTAS200 EQU * * : P LDK A2,2 * N 4 P ST A2,TASFIL MASTER INDEX LOOP IDENT IN DMTSAK * ` & P LDKL A2,DMTASS ASSIGN INDEX ENTRY * P LDR* A6,A8 * P RF(N) TAS210 INDEX ASSIGN * P CM TASFIL *
0x36d244…36d3d8 Dummy {f00=0x0114, f01=0x4182, f02=»F A15,ACTOT ACTIVATE DMTASK * P ABL TDISP GO TO DISPATCHER + $ P EJECT + H P* + V P* ERROR RETURNS + ` P* + z PTASSE5 ADK A7,1 + PTASSE4 ADK A7,1 + PTASSE3 ADK A7,1 + PTASSE2 ADK A7,1 + PTASSE1 ADK A7,1 + P ADK A7,1 +
0x36d3d8…36d56c Dummy {f00=0x0114, f01=0x2008, f02=» ,
0x36d56c…36d700 Dummy {f00=0x0114, 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* +
0x36d700…36d894 (2, 350) Opaque[0x194]
0x36d894…36da28 # DirEnt {nam=»TIODM «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2290, f03=0x0000}
0x36d894…36da28 IdxSect {
0x36d894…36da28 f00 = 0x0114 // 0x36d894 @0x0
0x36d894…36da28 f01 = 0x000c // 0x36d896 @0x2
0x36d894…36da28 gno = [ // 0x36d898 @0x4
0x36d894…36da28 [0x00]: C0x0114.0x2.0
0x36d894…36da28 [0x01]: C0x0114.0x3.0
0x36d894…36da28 [0x02]: C0x0115.0x0.0
0x36d894…36da28 [0x03]: C0x0115.0x1.0
0x36d894…36da28 [0x04]: C0x0115.0x2.0
0x36d894…36da28 [0x05]: C0x0115.0x3.0
0x36d894…36da28 ]
0x36d894…36da28 }
0x36da28…36dbbc Dummy {f00=0x0114, f01=0x0190, f02=» 0 P IDENT TIODM REL 9.2 79-11-16 870105040920 P 8 P =1, PR 5649 @ P REL 9.1 79-05-23 V P* r 8 P**************************************************** | P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P* TIODM = DATA MA
0x36dbbc…36dd50 Dummy {f00=0x0114, f01=0x018e, f02=»******** d P* B P* THIS MODULE IS ENTERED IN THE SAME WAY AS A DRIVER VIA TIO . P* AND THE DWTADR IN FDB FOR CURRENT FILE ` P* H P* THE DM REQUEST IS PROCESSED HERE UP TO THE POINT WHERE A SECTOR $ P* FROM A DISC MUST BE ACCESSED
0x36dd50…36dee4 Dummy {f00=0x0114, f01=0x0190, f02=» P* A7 = ORDER P* A8 = ECB ADDRESS " P* F P* USED REGISTERS A1 - A10 P P* t D P* BEFORE EXIT A DMTASK IS ACTIVATED WITH THE FDB ADDRESS IN A1 ~ P* AS THE ONLY PARAMETER P* 4 P* THE FOLLOWING WORD
0x36dee4…36e078 Dummy {f00=0x0114, f01=0x0190, f02=» FOR CALLING TASK x . P* FDBCEX CURRENT EXTENT BLOCK POINTER P* L P* V D P* IF AN ERROR CONDITION IS DETECTED THE ERROR RETURN WILL BE: ` P* LDKL A1,/<RETURN CODE> P* ABL DISEND P* P* P EJECT P
0x36e078…36e20c Dummy {f00=0x0114, f01=0x0190, f02=»DBLNK P ENTRY FDBECB P ENTRY FDBSNR $ P ENTRY FDBRRO : P ENTRY FDBRLE P P ENTRY FDBBLF f P ENTRY FDBTNR | P ENTRY FDBVTO P ENTRY FDBCEX P ENTRY FDBEXT P ENTRY EXTDMI P ENTRY EXTFC P ENTRY EXT
0x36e20c…36e3a0 Dummy {f00=0x0114, f01=0x0190, f02=»NTRY FDBAI1,CRNTID,CRNCDF,CRNCIF P ENTRY FDBMRN,FDBDBR,FDBMRO ( & P ENTRY FDBMEC MMU ECB DISPLACEMENT L 6 P ENTRY FDBKEY SAVE AREA FOR KEY IN INDEXED ACCESS v P EJECT P* P***************** P* EXTERNALS * P************
0x36e3a0…36e534 (2, 351) Dummy {f00=0x0114, f01=0x0190, f02=» P EXTRN DISEND EXTRN DWTECB ECB ADDRESS $ EXTRN DWTOR DWT INDEX AND ORDER < & P EXTRN DWTTDM DM TASK TTAB ADDRESS d P EXTRN TTB:ID TASK ID 0 P EXTRN MOV:US MOVE FROM USER TO SYSTEM AREA " P EXTRN DMTGCA GET CRN ADDRESS , P E
0x36e534…36e6c8 Dummy {f00=0x0114, f01=0x0190, f02=» ECBRL P EXTRN ECBEL P EXTRN ECBRC " P EXTRN ECBCW 6 & P EXTRN ECBCW2 SECOND CONTROL WORD J P EXTRN FDBLEN t " P EXTRN SQR SEQ READ ORDER CODE & P EXTRN EARELB,DWTST,CRNGET,EATEST & P EXTRN TASHLT HALT SYSTEM ROUTINE P EJE
0x36e6c8…36e85c Dummy {f00=0x0114, f01=0x0190, f02=»* A VERSION CONTAINING INDEXED REQUEST ORDERS IS OBTAINED P* BY SETTING INDXAC EQU 1 D * P* INDXAC EQU 0 OTHRERWISE h PX:A EQU 0 PINDXAC EQU 00000 P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINE
0x36e85c…36e9f0 Dummy {f00=0x0114, f01=0x0190, f02=»TA DEFINITIONS * P************************ P* : P* D P DATA 0,0 4 WORDS N P DATA 0,0 h " PTIOD14 EQU *-2 TIODM A14 STACK z P* P* & PTIODMF EQU * TIODM FUNCTION TABLE P DATA CLOSE CLOSE " P DATA REVTOC REA
0x36e9f0…36eb84 Dummy {f00=0x0114, f01=0x0190, f02=»DELETE | P DATA IXREWR INDEXED REWRITE $ P DATA IXRARE INDEXED RANDOM READ 2 P XIF Z P IFF INDXAC=1 f P DATA TIODME | P DATA TIODME P DATA TIODME P DATA TIODME P DATA TIODME P XIF P DATA RANDEL RANDOM DELETE
0x36eb84…36ed18 Dummy {f00=0x0114, f01=0x0190, f02=» SEQUENTIAL WRITE " P DATA SEQREAD SEQUENTIAL READ P DATA GETCUR GET CURRENCY @ P IFT INDXAC=1 b $ P DATA INSIXR INSERT INDEX RECORD x $ P DATA DELIXR DELETE INDEX RECORD P XIF P IFF INDXAC=1 P DATA TIODME P DATA TIOD
0x36ed18…36eeac Dummy {f00=0x0114, f01=0x0190, f02=»LETE r $ P DATA RANREB RAND READ REL BUFF P DATA SETLRN SET LRN 4 P* P P* Z PTIODMO EQU * DM ORDERS d $ P DATA /221E CLOSE,IND READ NEXT & P DATA /1D1C IND INSERT,IND DELETE . P DATA /1B1A INDEXED REWRITE,IND RAND READ $ P D
0x36eeac…36f040 Dummy {f00=0x0114, f01=0x0190, f02=»SEQ WR. , BASIC WRITE $ P DATA /0302 READ VTOC, SEQ READ ( P DATA /0123 BASIC READ,GET CURRENCY F * P DATA /1F20 INS INDEXREC,DEL INDEXREC r . P DATA /240D GET CURR INDEX,DELAYED RAND WR 0 P DATA /0E0F DELAY RAN DEL,RAN READ REL BUFF P D
0x36f040…36f1d4 (2, 352) Dummy {f00=0x0115, f01=0x0190, f02=»ATA /0E10 P DATA /1214 P DATA /1616 & P DATA /1616 : P DATA /0218 N P DATA /181A b P DATA /1C1E v P DATA /2022 P DATA /2426 P DATA /281A SET LRN P* $ PNOOFOR EQU 25 NO OF ORDER CODES P*
0x36f1d4…36f368 Dummy {f00=0x0115, f01=0x0190, f02=»RD P XIF P* P IFT MMUPAG=1 PSTART EQU DWTDRD+4 6 P XIF P P* P* f P* FDB OFFSET DEFINITIONS p P* " PFDBLNK EQU 0 LINK TO NEXT FDB PFDBECB EQU START+2 ECB START & PFDBSNR EQU START+16 SECTOR NUMBER
0x36f368…36f4fc Dummy {f00=0x0115, f01=0x0190, f02=» l 0 PFDBTNR EQU START+23 TASK NUMBER CALLING TASK & PFDBVTO EQU START+24 VTOC RECORD NO < 4 PFDBCEX EQU START+26 CURRENT EXTENT BLOCK POINTER f 0 PFDBEXT EQU START+28 FIRST EXTENT BLOCK START PEXTDMI EQU 0 DMTAST IDENT PEXTFC EQU 1 VOLUME F
0x36f4fc…36f690 Dummy {f00=0x0115, f01=0x0190, f02=»+53 LAST RECORD NUMBER * PFDBNIF EQU START+52 NO OF INDEX FILES $ PFDBEAL EQU START+56 EA LINK ROOT L & PFDBCRL EQU START+58 CRN LINK ROOT t 0 PFDBKA EQU START+60 KEY ADDRESS IN DATA FILE 0 PFDBMIA EQU START+62 ADDRESS OF MASTER INDEX 0 PFD
0x36f690…36f824 Dummy {f00=0x0115, f01=0x0190, f02=»AND REL BUFFER FLAGS p , PFDBMRN EQU START+75 LAST REC NR IN FILE " PFDBMRO EQU START+78 MAX FDBRRO L , PFDBMEC EQU START+80 MMU ECB DISPLACEMENT r < PFDBKEY EQU START+94 SAVE AREA FOR KEY IN INDEXED ACCESS P* & P* CRN BUFFER OFFSET DEFINI
0x36f824…36f9b8 Dummy {f00=0x0115, f01=0x0190, f02=» P EJECT P* P************* P* TIODM * 2 P************* H P* ^ P* h ( P DATA 0 DATA MANAGEMENT DEVICE INDEX r & PTIODM DATA *+2 TIODM START ADDRESS P* P* SET UP A14 STACK P* P LDKL A14,TIOD14
0x36f9b8…36fb4c Dummy {f00=0x0115, f01=0x018e, f02=» A1,A2 P LD A3,2,A1 P CW A3,DWTTDM,A6 " P RF(E) TIOD10 THIS TASK : P ADK A2,2 NO Z P RB TIOD05 TRY NEXT n PTIOD10 EQU * P LC A1,TTB:ID,A3 GET TASK ID P CCK A1,'##' ( P RF(E) TIO13 JUMP IF DMTASK CALLING P*
0x36fb4c…36fce0 Dummy {f00=0x0115, f01=0x0190, f02=» P LDKL A4,/4000 REQ BUSY BIT PTIO11 EQU * ( P SUK A3,2 < P RF(N) TIO13 ALL FDB READY N P LDR* A5,A1 FDB ADDR p P RF(E) TIO12 NO FDB P SC A2,FDBTNR,A5 TASK ID " P ORS A4,DWTST,A5 REQ BUSY BIT PTIO12 EQU * P ADK A
0x36fce0…36fe74 (2, 353) Dummy {f00=0x0115, f01=0x0190, f02=»R IN A7 , P* PUT ORDER INDEX IN DWTOR RIGHT BYTE P* @ P LDKL A1,/8000 REQUEST ERROR J & P LDK A2,NOOFOR-1 NO OF ORDERS - 1 n 2 PTIOD15 CC A7,TIODMO,A2 START AT END OF TIODMO P RF(E) TIOD20 MATCH P SUK A2,1 P RB(NN) TIOD
0x36fe74…370008 Dummy {f00=0x0115, f01=0x0190, f02=»BI TIODMF,A2 BRANCH TO DM FUNCTION P EJECT * P* 8 $ PIXRARE EQU * INDEXED RANDOM READ B P LD A3,ECBCW2,A8 =1 j P ANK A3,/FF REQ KEY LGTH =1 P LD A4,FDBRLE,A6 =1 P SUK A4,6 MAX LGTH =1 P CWR A3,A4 =1 P RF(NG) IXRAR1
0x370008…37019c Dummy {f00=0x0115, f01=0x0190, f02=»GET USER KEY ADDRESS 0 P LDK A2,FDBKEY GET FDB KEY AREA DISPLACEMENT P ADR A2,A6 ADD FDB ADDRESS P P* =1 r 2 P CF A14,MOV:US MOVE KEY FROM USER TO FDB AREA P XIF P* $ PDELIXR EQU * DELETE INDEX RECORD P* $ PINSIXR E
0x37019c…370330 Dummy {f00=0x0115, f01=0x018e, f02=»U * CLOSE A FILE P LDK A4,0 PTIOC10 EQU * * $ P ST A4,FDBRRO,A6 MARK ORDER TYPE > P LDK A2,0 f , P ST A2,FDBSNR,A6 SECTOR #0 VOLUME LABLE x P* ( P* LET FDBCEX POINT TO FIRST EXTENT P* P LDR A4,A6 P ADK A4,FDBEXT
0x370330…3704c4 Dummy {f00=0x0115, f01=0x0190, f02=» P LDR A1,A6 FDB ADDR 0 P LDKL A2,/C000 REMOVE BUFFERS FOR THIS TASK P CF A14,EARELB T PREL090 EQU * j P LDK A1,0 CORRECT RETURN ~ P ABL TIODME P EJECT ( PSETLRN EQU * SET LAST RECORD NUMBER P LC A1,ECBCW+3,A8 P S
0x3704c4…370658 Dummy {f00=0x0115, f01=0x0190, f02=»DATA REC p P RF GET010 . PGETCUX LDK A7,CRNCIF+1 GET CURR INDEX REC " PGET010 LDR A1,A6 FDB ADDR T " P CF A14,CRNGET GET CRN BUFFER v P ADR A7,A2 ADDR CURR REC NO P LDK A2,0 P LC A3,-1,A7 FILE CODE P CC A3,ECBFC,A8 P
0x370658…3707ec Dummy {f00=0x0115, f01=0x0190, f02=»REC NO ~ P LD A2,1,A7 PGET030 EQU * " P ST A2,ECBCW,A8 6 P RB REL090 N P EJECT ` " PSEQREAD EQU * SEQUENTIAL READ n P* $ P* FIND CRN+1 AND TEST IF > LRN P* P LDR A1,A6 FDB ADDR " P CF A14,CRNGET GET CRN-BUFFE
0x3707ec…370980 Dummy {f00=0x0115, f01=0x018e, f02=»ERFLOW P RF SEQR20 PSEQR10 EQU * " P ANKL A2,/7FFF REMOVE OVERFLOW 4 P ADK A1,1 ADD CARRY Z PSEQR20 EQU * v P SC A1,ECBCW+3,A8 REC NO P ST A2,ECBCW,A8 P* $ P* CONTINUE AS FOR RANDOM READ P* P EJECT
0x370980…370b14 (2, 354) Dummy {f00=0x0115, f01=0x0190, f02=» P LDK A2,0 P LC A2,ECBCW+3,A8 REC NO P LD A3,ECBCW,A8 6 P LDK A1,/8 INCORRECT LENGTH N P LD A4,ECBRL,A8 r * P RF(NP) TIODME ERROR RETURN IF RL <= 0 P* * P* EA MUST NOT BE SET FOR OTHER TASK P* P LDR A1,A6 FDB
0x370b14…370ca8 Dummy {f00=0x0115, f01=0x018e, f02=»EQU * INDEXED INSRERT P IFT MMUPAG=1 P* 4 " P* MOVE KEYS TO FDB KEY AREAS > P* d P LDK A5,8 n PIXINS3 EQU * P LDR A2,A6 FDB DATA P ADR A2,A5 P LD A3,FDBADF,A2 FDB INDEX P RF(Z) IXINS4 NO INDEX P LD A1
0x370ca8…370e3c Dummy {f00=0x0115, f01=0x0190, f02=» P LD A3,FDBRLE,A3 REC LGTH P SUK A3,6 KEY LGTH & " P CF A14,MOV:US KEY TO FDB AREA @ PIXINS4 EQU * f P SUK A5,2 z P RB(NZ) IXINS3 MORE INDEXS P XIF P* $ PSEQWRITE EQU * SEQUENTIAL WRITE P* 2 P* GET LRN+1 INTO
0x370e3c…370fd0 Dummy {f00=0x0115, f01=0x0190, f02=» x P LDK A1,0 ! P LC A1,FDBMRN,A6 LAST REC NR ! P LD A2,FDBMRN+1,A6 ! > P LDK A6,0 ! X P LC A6,FDBLRN,A5 ! j P LD A7,FDBLRN+1,A5 LRN ! P CF A14,DSUMOD SUBTRACT ! P SUK A2,1 ! P LDR A1,A1 ! P RF(Z) SEQ005 NOT MANY ! P LDKL
0x370fd0…371164 Dummy {f00=0x0115, f01=0x0190, f02=»,FDBLRN+1,A6 LRN ! P IFT INDXAC=1 " P RF IXR020 STORE LOG REC NO " . P EJECT " R $ PIXRDNX EQU * INDEXED EREAD NEXT " ` P* " P* GET CRN " P* " P LD A1,FDBADF,A6 FDB ADDR " " P CF A14,CRNGET GET CRN BUFFER " P LDR A4,A2 BUFFA
0x371164…3712f8 Dummy {f00=0x0115, f01=0x0190, f02=»C A5,CRNCIF,A4 " . P RF(NE) IXR020 OTHER INDEX FILE IS CURRENT # P LC A1,CRNCIF+1,A4 # H " P LD A2,CRNCIF+2,A4 LOG REC NO # b PIXR020 EQU * # P XIF # P ADK A2,1 # P RF(O) IXR030 OVERFLOW # P RF IXR040 # , PIXR030 ANKL A2,/7FFF REMOVE OV
0x3712f8…37148c Dummy {f00=0x0115, f01=0x0190, f02=»NOT CHECK EOF CONDITION # P EJECT $ P* $ . PIXREWR EQU * INDEXED REWRITE $ 8 P* $ PIXDEL EQU * INDEXED DELETE $ f P* $ PRANWRITE EQU * RANDOM WRITE $ P* $ & PRANWRD EQU * DELAYED RANDOM WRITE $ P* $ & PRANDLD EQU * DELAYED
0x37148c…371620 Dummy {f00=0x0115, f01=0x018e, f02=» $ P************************* % P* DMTASK ACTIVATION * % * P************************* % L P* % n PTIODMA EQU * % x P* % P* SET EOF IF CRN > LRN % P* % P LDK A1,0 % P LC A1,ECBCW+3,A8 REC NO % P LD A2,ECBCW,A8 DITTO
0x371620…3717b4 (2, 355) Dummy {f00=0x0115, f01=0x0190, f02=» % t P RF(NG) TIOD25 CRN <= LRN & PTIOD23 EQU * & * P LDKL A3,/1000 END OF FILE & > P ORS A3,ECBRC,A8 & ` P ANK A7,/3F & x P SUKL A7,SQR SEQ READ & P RF(NE) TIOD25 NOT SR & P LDR A1,A3 & P RF TIODME & PTIOD25 EQU * & 6 P CF A14,
0x3717b4…371948 Dummy {f00=0x0115, f01=0x0190, f02=»TE DMTASK WITH FDB ADDRESS IN A1 & P* ' ( PTIOD68 EQU * ' 2 P ENB ' F P ENB ' R P INH ' ^ P LDR A1,A6 FDB ADDRESS ' j P LDK A7,0 ' $ P LC A7,EXTDMI,A4 TID FOR DMTASK ' P ADKL A7,'#D' ' P CF A15,FNDTID A2:=TTAB ADDR ' P LDR A5,A2 '
0x371948…371adc Dummy {f00=0x0115, f01=0x0190, f02=»TE DMTASK ' | P* ( P* EXIT TO TDISP ( P* ( 6 P ABL TDISP ( @ P* ( R P EJECT ( P* ( j P************** ( t P* TIODME * ( P************** ( P* ( J P* TIODM ERROR CALL TENDIO WITH RETURN CODE IN A1 AND GOTO DISPATCHER (
0x371adc…371c70 Dummy {f00=0x0115, f01=0x4056, f02=»RESS ( , P ABL DISEND CALL TENDIO GOTO DISPATCHER ) P* ) < P END ) F@ ) R R P EJECT ( P* ( j P************** ( t P* TIODME * ( P************** ( P* ( J P* TIODM ERROR CALL TENDIO WITH RETURN CODE IN A1 AND GOTO DISPATCHER (
0x371c70…371e04 Dummy {f00=0x0115, f01=0x2008, f02=» *
0x371e04…371f98 Dummy {f00=0x0115, f01=0x0190, f02=»TIMER P CM DCTPP PHPT10 RTN A5 P EJECT 4 P IFT CODE=1 B P* V P* ` P* CALCULATION OF CRC j P* P* A2 = CHARACTER P* A7 = ACCUMULATED CRC P* P* PCRCCAL EQU * P ST A1,CRCSAV P ST
0x371f98…37212c Dummy {f00=0x0115, f01=0x0190, f02=» P ANK A3,1 P RF(Z) CRC110 P XRKL A7,/A001 , PCRC110 SUK A1,1 B P RB(NZ) CRC100 Z P LD A1,CRCSAV p P LD A2,CRCSAV+2 P LD A3,CRCSAV+4 P RTN A5 PCRCSAV RES 3 P EJECT P* P* ( P* READ CRC C
0x37212c…3722c0 Dummy {f00=0x0115, f01=0x0190, f02=» NOT SKIP SYNCS NOW P CF A5,READ READ BYTE 1 P LD A8,CRCSAV+2 SAVE IT < 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 A2,A8 P ADK A5,4 . P CWR A2,A6
0x3722c0…372454 (2, 356) Opaque[0x194]
0x372454…3725e8 # DirEnt {nam=»DMTASK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x22c0, f03=0x0000}
0x372454…3725e8 IdxSect {
0x372454…3725e8 f00 = 0x0116 // 0x372454 @0x0
0x372454…3725e8 f01 = 0x0026 // 0x372456 @0x2
0x372454…3725e8 gno = [ // 0x372458 @0x4
0x372454…3725e8 [0x00]: C0x0116.0x0.0
0x372454…3725e8 [0x01]: C0x0116.0x1.0
0x372454…3725e8 [0x02]: C0x0116.0x2.0
0x372454…3725e8 [0x03]: C0x0116.0x3.0
0x372454…3725e8 [0x04]: C0x0117.0x0.0
0x372454…3725e8 [0x05]: C0x0117.0x1.0
0x372454…3725e8 [0x06]: C0x0117.0x2.0
0x372454…3725e8 [0x07]: C0x0117.0x3.0
0x372454…3725e8 [0x08]: C0x0118.0x0.0
0x372454…3725e8 [0x09]: C0x0118.0x1.0
0x372454…3725e8 [0x0a]: C0x0118.0x2.0
0x372454…3725e8 [0x0b]: C0x0118.0x3.0
0x372454…3725e8 [0x0c]: C0x0119.0x0.0
0x372454…3725e8 [0x0d]: C0x0119.0x1.0
0x372454…3725e8 [0x0e]: C0x0119.0x2.0
0x372454…3725e8 [0x0f]: C0x0119.0x3.0
0x372454…3725e8 [0x10]: C0x011a.0x0.0
0x372454…3725e8 [0x11]: C0x011a.0x1.0
0x372454…3725e8 [0x12]: C0x011a.0x2.0
0x372454…3725e8 ]
0x372454…3725e8 }
0x3725e8…37277c Dummy {f00=0x0116, f01=0x0190, f02=» 2 P IDENT DMTASK REL 9.2 79-11-16 870105040920 P : P =5, PR5649 B P REL 9.1 79-11-01 X P =4,CURRENCY INSERT t P REL 9.1 79-07-02 P =3,TEST KEY P REL 9.1 79-07-02 P =2,CH REQ P REL 8.2 P
0x37277c…372910 Dummy {f00=0x0116, f01=0x0190, f02=»M PTS v P* 0 P* DMTASK = HANDLES DATAMANAGEMENT DISC I/O P* L P* V P* ` P* j P* t 8 P**************************************************** ~ P* , P* THIS MODULE IS ACTIVATED FROM TIODM. P* P* INPUT
0x372910…372aa4 Dummy {f00=0x0116, f01=0x0190, f02=» TO BE ACCESSED IS DEFINED IN FDB (FDBDMI, -FC, -SNR). : P* ALL BUFFERS ARE CHECKED TO FIND OUT IF THIS SECTOR > 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
0x372aa4…372c38 Dummy {f00=0x0116, f01=0x0190, f02=»N AND ARE V ( P* FOLLOWED BY AN EXIT LKM REQUEST. : P* INDEX FILES ARE HANDLED IN SUBROUTINE RDNXTR WHERE > & P* ALL I/O ARE MADE IN WAIT MODE | P* D P* BY MEANS OF CONDITIONAL ASSEMBLY THE EXCLUSIVE ACCESS CHECK 6 P* FOR INDEXED
0x372c38…372dcc Dummy {f00=0x0116, f01=0x018e, f02=»SIVE ACCESS CHECK INCLUDED | 2 P* QNOEXA=0 EXCLUSIVE ACCESS CHECK EXCLUDED " P EJECT X P* f P*************** p P* ENTRIES * P*************** P* P* P ENTRY DMTASK & P ENTRY SQR EXTERNAL CODE SEQ READ
0x372dcc…372f60 Dummy {f00=0x0116, f01=0x0190, f02=» | P***************** P* " P* , P EXTRN SCTTCT,SCTCDT 6 & P EXTRN TTB:ID TASK IDENTIFICATION R P EXTRN TTB:TD,FDBSTA | P EXTRN FNDTID P EXTRN TENDIO P EXTRN FDBECB P EXTRN FDBSNR P EXTRN FDBRRO P E
0x372f60…3730f4 (2, 357) Dummy {f00=0x0116, f01=0x0190, f02=» EXTDMI P EXTRN EXTFC P EXTRN EXTLEN $ P EXTRN EXTBAS : P EXTRN EXTELE P P EXTRN FDBLRN f P EXTRN FDBMIA | P EXTRN FDBEAL P EXTRN FDBADF P EXTRN FDBAI1 P EXTRN FDBCRL P EXTRN FDBDBR,FDBMRN,FDBMRO
0x3730f4…373288 Dummy {f00=0x0116, f01=0x0190, f02=»BUF P EXTRN BUFLNK P EXTRN BUFDMI " P EXTRN BUFFC 8 P EXTRN BUFSNR L P EXTRN BUFOR b P EXTRN BUFSTA v P EXTRN CURBUF P EXTRN DWTECB P EXTRN DWTUEC P EXTRN DWTOR P EXTRN DWTST,DWTTDM,DWTTQ P EXT
0x373288…37341c Dummy {f00=0x0116, f01=0x0190, f02=»DIVMOD P EXTRN MPYMOD,CHKKEY P EXTRN CALSNO * P EXTRN DSUMOD @ . P EXTRN EATEST,EASETB,CRNGET,EARELB,GTBKBU V P EXTRN QTJOB,GTLGRN P EXTRN FNDKEY P EXTRN CRNCIF,CRNCDF,CRNQUE P EXTRN MXIND P EXTRN FDBKA,FDBNIF,RD
0x37341c…3735b0 Dummy {f00=0x0116, f01=0x0190, f02=»VE FROM USER TO SYSTEM AREA 0 P EXTRN MOV:SU MOVE FROM SYSTEM TO USER AREA $ P EXTRN MONMMU X , P EXTRN PRUN TTAB ADDRESS OF RUNNING TASK n P EXTRN TTB:MT MMU TABLE ( P EXTRN SCTPLD PROGRAM LOADING DEVICE P EJECT P* P*
0x3735b0…373744 Dummy {f00=0x0116, f01=0x0190, f02=»LUSIVE ACCESS BIT CAN BE EXCLUDED AT 8 P* RANDOM WRITE AND RANDOM DELETE BY SETTING X:A=0. , P* h P* r PX:A EQU 1 | PX:B EQU 0 PX:C EQU 0 PX:D EQU 1 PX:E EQU 0 P* PQNOEXA EQU 00001 6 P* INDEXED ACCE
0x373744…3738d8 Dummy {f00=0x0116, f01=0x018e, f02=»TED b PINDXAC EQU 00000 6 PRECBFZ EQU 00004 INDEX RECORD BUFFER SIZE IN WORDS $ 4 PFLXDSC EQU X:D FLEXIBLE DISC INCLUDED WHEN EQU 1 ^ 0 PINSLAS EQU X:E INSERT SAME KEY LAST WHEN = 1 P* P EJECT DMTASK P* P* . P* A PROG
0x3738d8…373a6c Dummy {f00=0x0116, f01=0x0190, f02=» . ** A PROGRAM VERSION USING TOSS DISC PAGING * &* IS OBTAINED BY SETTING DSKPAG EQU 1. 6 * d DSKPAG EQU 0 n * P* 6 P* A PROGRAM VERSION INCLUDING TOSS SWAPPABLE WORK 2 P* BLOCKS IS OBTAINED BY SETTING SWPBLK EQU 1. P*
0x373a6c…373c00 Dummy {f00=0x0116, f01=0x0190, f02=»************** P* P* , PEABIT EQU /20 EA-BIT IN DWT STATUS BYTE * P* Z & PVTOBLK EQU 9 VTOC BLOCKING FACTOR d P* : P* THE FOLLOWING INTERNAL ORDER CODES IS THE RELATIVE & P* POSITION IN TIODM-TABLE TIODMF P*
0x373c00…373d94 (2, 358) Dummy {f00=0x0116, f01=0x0190, f02=»XAC=1 " P DATA DMIRN INDEXED READ NEXT PQINS EQU 6 4 P DATA DMINS INDEXED INSERT F PQDEL EQU 8 h P DATA DMDEL INDEXED DELETE z PQIRW EQU 10 P DATA DMIRW INDEXED REWRITE $ P DATA DMIRR INDEXED RANDOM RESAD P XIF P
0x373d94…373f28 Dummy {f00=0x0116, f01=0x0190, f02=»DOM DELETE PQRW EQU 16 P DATA DMRDWR RANDOM WRITE $ PQRR EQU 18 F P DATA DMRDRE RANDOM READ X PQREA EQU 20 x * P DATA DMTERR RELEASE EXCLUSIVE ACCESS PQSW EQU 22 " P DATA DMSQWR SEQUENTIAL WRITE * PSQR EQU 2 EXTERNAL ORD
0x373f28…3740bc Dummy {f00=0x0116, f01=0x0190, f02=» INDXAC=1 PQINIX EQU 28 P DATA DMINIX INSERT INDEX & PQDELX EQU 30 H P DATA DMDELX DELETE INDEX P XIF ~ P IFF INDXAC=1 P DATA DMTERR,DMTERR P XIF PQGCURX EQU 32 " P DATA DMTERR GET CURRENT INDEX PQRWD
0x3740bc…374250 Dummy {f00=0x0116, f01=0x0190, f02=» $ P DATA DMRRRB RAND READ REL BUFF P* , $ PVTOCRL DATA 0 VTOC RECORD LENGTH 6 P EJECT ^ P* l P************** v P* DMTFRL * P************** P* , P* ENTRY DMTFRL FIND RECORD LENGTH P* 4 P* INPUT
0x374250…3743e4 Dummy {f00=0x0116, f01=0x0190, f02=»OUTPUT A2 = RECORD LENGTH TO BE USED < P* A1 IS ORED INTO ECBRC IF ECBRL < REC LENGTH . & P* A2 IS STORED IN ECBEL n P* PDMTFRL EQU * P LD A2,ECBRL,A9 P CW A2,FDBRLE,A6 $ P RF(E) DMTF20 ECBRL = REC LENGTH
0x3743e4…374578 Dummy {f00=0x0116, f01=0x0190, f02=»ETURN CODE t . PDMTF20 ST A2,ECBEL,A9 SET EFFECTIVE LENGTH P RTN A14 D P EJECT T P* b P************ l P* DMTWM * P************ P* " P* ENTRY DMTWM WORD MOVE P* " P* INPUT A1 = FROM ADDRESS , P
0x374578…37470c Dummy {f00=0x0116, f01=0x0190, f02=» P* PDMTWM EQU * P SUK A2,2 & " P RF(N) DMTW10 LAST WORD MOVED 8 P LDR* A4,A1 ^ P STR A4,A3 r P ADK A1,2 P ADK A3,2 P RB DMTWM PDMTW10 ANK A2,/01 P RF(E) DMTW20 P LCR A4,A1 MOVE LAST CHAR
0x37470c…3748a0 Dummy {f00=0x0116, f01=0x0190, f02=» " P* ENTRY DMTBM BYTE MOVE P* . " P* INPUT A1 = FROM ADDRESS 8 , P* A2 = NO OF BYTES TO BE MOVED ^ P* A3 = TO ADDRESS P* $ P* A4 WILL BE DESTROYED P* P* OUTPUT A3 = NEXT CHAR
0x3748a0…374a34 (2, 359) Dummy {f00=0x0116, f01=0x0190, f02=» P ADK A1,1 P ADK A3,1 P RB DMTBM ( PDMTB10 RTN A14 : P* P 2 P* DMTBMR HAS THE SAME FUNCTION AS DMTBM BUT Z P* MOVES FROM THE END P* PDMTBMR ADR A1,A2 P ADR A3,A2 PDMTB20 SUK A2,1 P RB(N) DMTB10
0x374a34…374bc8 Dummy {f00=0x0116, f01=0x0190, f02=»**************************** x P* $ : P* FNDFDB WILL SEARCH TTAB AND SCTCDT FOR A FILE CODE . P* l 8 P****ENTRY PARAMETERS******************************** v P* P* A1 = TTAB ADDR $ P* A2 = FILE CODE TO SEARCH FOR 4 P* A5 NOT
0x374bc8…374d5c Dummy {f00=0x0116, f01=0x0190, f02=»NCHANGED 2 P* A2 = FILE CODE. = 0 WHEN NO CODE IS FOUND 6 P* A4 = TTAB/SCTCDT ENTRY ADDR WHEN CODE IS FOUND F 2 P* A5 = 0 WHEN FOUND IN SCTCDT = 1 WHEN TTAB P* 8 P****USED REGISTERS********************************** P* P*
0x374d5c…374ef0 Dummy {f00=0x0116, f01=0x0190, f02=»* PFNDFDB EQU * & P LD A3,TTB:TD,A1 LENGTH DEV DESCR PFND030 EQU * H P SUK A3,4 ( P RF(NP) FND040 FILE CODE NOT IN TTAB n P LDR A4,A1 P ADKL A4,TTB:TD =1 P ADR A4,A3 P CWR* A2,A4 =1 P RB(NE) FND030 P
0x374ef0…375084 Dummy {f00=0x0116, f01=0x0190, f02=» EQU * P LDR A5,A5 ( P RF(NZ) FND060 ONLY TTAB IS SEACHED P LD* A4,SCTCDT L PFND050 EQU * b P SUK A4,4 v ( P RF(NP) FND060 CODE NOT FOUND AT ALL P LD A3,SCTCDT P ADR A3,A4 P CWR* A2,A3 =1 P RB(NE) FND050
0x375084…375218 Dummy {f00=0x0116, f01=0x0190, f02=» EJECT P* P************** P* DMTREM * . P************** D P* Z D P* ENTRY DMTREM MOVE RECORD FROM BUFFER TO USER RECORD AREA d P* 0 P* INPUT RELATIVE REC OFFSET IN FDBRRO,A6 $ P* BUFFER ADDRESS IN
0x375218…3753ac Dummy {f00=0x0116, f01=0x0190, f02=»HE RECORD > P* IF (FROM) AND (TO) ADDRESSES BOTH EVEN THEN WORD MOVE B P* IF (FROM AND (TO) ADDRESSES BOTH ODD THEN MOVE FIRST BYTE T > P* WITH BYTE INSTRUCTIONS AND THE REST WITH WORD MOVE : P* ELSE USE BYTE MOVE INSTRUCTIONS FOR THE
0x3753ac…375540 Dummy {f00=0x0116, f01=0x0190, f02=» LDR A4,A1 P LD A3,ECBBA,A9 TO ADDRESS P XRR A4,A3 4 P ANK A4,/01 F ( P RF(Z) DMT210 BOTH ODD OR BOTH EVEN Z & P CF A14,DMTBM ONE ODD AND ONE EVEN P RF DMT225 P* PDMT210 LDR A4,A1 P ANK A4,/01 P RF(E) DMT220 BO
0x375540…3756d4 (2, 360) Dummy {f00=0x0117, f01=0x0190, f02=»RD MOVE z PDMT225 EQU * P XIF $ P* 0 P IFT MMUPAG=1 : & P LD A4,DWTTDM,A6 GET TTAB ADDRESS P $ P LC A3,TTB:ID,A4 ID CALLING TASK z P CCK A3,'##' P RF(NE) DMTREN NOT DMTASK P LDK A3,QRR P CC A3,DWTOR+1,A6 " P R
0x3756d4…375868 Dummy {f00=0x0117, f01=0x0190, f02=»SER TTAB ~ PDMTREN EQU * P INH $ $ P TL TTB:MT,A4 LOAD MMU REGISTERS 0 PDMTREP EQU * X $ P LD A4,PRUN GET DM TTAB ADDRESS l 0 P TS TTB:MT,A4 STORE USER MMU IN DM MMU TABLE P ENB P LDR A3,A2 GET LENGTH 0 P LD A2,ECBBA,A9 GET RE
0x375868…3759fc Dummy {f00=0x0117, f01=0x018e, f02=»PAG=1 PDMTREQ INH P TL MONMMU SYSTEM MMU P RB DMTREP > P XIF P P EJECT P* j P* SET UP A14 STACK t P* PGETA14 EQU * $ P LD A14,PRUN GET DM TTAB ADDRESS * P AD A14,TTB:TD,A14 LENGTH DEVICE DESCR P ADK
0x3759fc…375b90 Dummy {f00=0x0117, f01=0x0190, f02=» P************** ! P* ! P* ! ( PDMTASK EQU * ! 2 P* ! F P* SET UP A14 STACK ! P P* ! l P CF A15,GETA14 ! v P LDR A6,A1 FDB ADDR ! P LDKL A5,-1 ! * P CW A5,FDBRRO,A6 SPECIAL PARAMETER -1 ! 2 P RF(E) DMT090 FOR ORDERS XR,DX
0x375b90…375d24 Dummy {f00=0x0117, f01=0x0190, f02=»1 ! P ANK A2,/3F " P CWK A2,QCL " P RF(E) DMT024 CLOSE " 2 P CWK A2,QRV " N P RF(E) DMT024 READ VTOC " b P SUK A2,QRRRB " & P RF(E) DMT024 RAND READ REL BUFFER " P ORKL A4,/100 " PDMT024 EQU * " P ST A4,FDBDBR,A1 " PDMT0
0x375d24…375eb8 Dummy {f00=0x0117, f01=0x0190, f02=»80 BUFFER WAS BEFORE " P* # ( P* READ SECTOR INTO BUFFER AND EXIT # & P* # R P SUK A5,QCL # P RF(Z) DMT030 CLOSE # p P LDK A7,/11 PHYSICAL READ # P LKM # P DATA -1 I/O AND ACTIVATION # " P DATA DMTAR1 DMTASK RESTART #1 # P LKM
0x375eb8…37604c Dummy {f00=0x0117, f01=0x0190, f02=»T050 CHECK RETURN CODES # P EJECT $ P************** $ . P* DMTAR1 * $ D P************** $ Z P* RESTART POINT AFTER READ $ p P* $ PDMTAR1 EQU * $ P* $ P* SET UP A14 STACK $ P* $ P CF A15,GETA14 $ PDMT050 EQU * $
0x37604c…3761e0 Dummy {f00=0x0117, f01=0x0190, f02=» $ 0 PDMT080 EQU * ENTRY IF SECT ALREADY IN BUFFER % P LDR A5,A3 % < P ADK A5,8 SKIP BUFFER HEADER % N * P ST A5,ECBBA,A8 PUT BUFFER ADDR IN ECB % r PDMT090 EQU * % P* % 4 P* HANDLE ACTUAL ORDER ORDER INDEX IN DWTOR % P* % P ADK A5,
0x3761e0…376374 (2, 361) Dummy {f00=0x0117, f01=0x0190, f02=» TABLE % r P EJECT & $ PDMRRRB EQU * RAND READ REL BUFF & P* & D PDMSQRE EQU * SEQUENTIAL READ & N P* & r PDMRDRE EQU * RANDOM READ & | P* & 4 P* CHECK STATUS IF NOT USED THEN ERROR RETURN & P* & P LD A2,FDBRRO,A6 & P AD A2,F
0x376374…376508 Dummy {f00=0x0117, f01=0x018e, f02=»A & | P ABL DMTERR ' & PDMT200 LDK A1,/8 INCORRECT LENGTH ' & P CF A14,DMTFRL A2 := RECORD LENGTH ' H P* ' r P* MOVE THE RECORD ' | P* ' P CF A14,DMTREM ' P* ' 0 P* UPDATE CRN AND SET EXCLUSIVE ACCESS BIT ' P* ' PDMT230 E
0x376508…37669c Dummy {f00=0x0117, f01=0x0190, f02=» ' t P* ( P LD A2,FDBSNR,A6 ( ( P RF(NZ) DMT270 VTOC SECTOR IN BUFFER ( * P* ( V P* VOLUME LABEL IN BUFFER ( ` H P* FIND VTOC SECTOR NUMBER AND RELATIVE RECORD OFFSET WITHIN SECTOR ( 8 P* FOR VTOC RECORD AND READ THIS SECTOR INTO BUFFER (
0x37669c…376830 Dummy {f00=0x0117, f01=0x0190, f02=»OBLK VTOC BLOCKING FACTIOR ( ( P LD A2,FDBVTO,A10 VTOC RECORD NUMBER ) " P LDK A1,0 ) N , P CF A14,DIVMOD A2=A1,A2/A6.A1=REMAINDRER ) ` P LDR A3,A2 QUOTIENT ) P LDR A6,A10 FDB ADDR ) P LDR A2,A1 REST ) P RF(Z) DMT240 REST = 0 ) $ P ADK A3,1
0x376830…3769c4 Dummy {f00=0x0117, f01=0x0190, f02=» P ST A3,FDBSNR,A6 * P LDK A3,0 * PDMT255 SUK A2,1 * . P RF(Z) DMT260 * F P AD A3,VLVRL-2,A5 * P ADK A3,1 SKIP STATUS BYTE * v P RB DMT255 * PDMT260 ST A3,FDBRRO,A6 * P* * P* RELEASE BUFFER * P* * P LD A3,ECBBA,A9 *
0x3769c4…376b58 Dummy {f00=0x0117, f01=0x0190, f02=» ADDR * P RB DMT020 READ VTOC SECTOR + P EJECT + 2 PDMT270 EQU * + @ P SUK A7,QRV + T $ P ABL(Z) DMT500 READ VTOC RECORD + h P* CLOSE FILE + & P* UPDATE VTOC LAST RECORD NUMBER + & P* AND WRITE SECTOR BACK ON DISC + P AD A5,FDBRRO,
0x376b58…376cec Dummy {f00=0x0117, f01=0x0190, f02=»E FILE. WRITE VTOC + P* , P LDK A7,/95 , $ P LKM , 8 P DATA 1 , D P* , T P LDR A1,A6 FDBADDRESS IN A1 , ^ & P CF A14,DMTIOT CHECK RETURN CODES , P LDR A1,A1 , P RF(NZ) DMT724 ERROR , PDMT720 EQU * , P LD A1,DWTTDM,A6 TTAB ADDR
0x376cec…376e80 Dummy {f00=0x0117, f01=0x0190, f02=» A2,1 0 OR 1 , P ECR A2,A2 =1 END - P LC A2,ECBFC,A9 FILE CODE - . " P LDK A5,0 TRY LOCAL AND GLOBAL - P . P CF A14,FNDFDB GET ENTRY IN TTAB CDTADTAB - v & P LDR A13,A5 LOCAL/GLOBAL INDICATOR - P LDR A2,A2 - P RF(NZ) DMT725 FC FOUND - P LDK
0x376e80…377014 (2, 362) Dummy {f00=0x0117, f01=0x0190, f02=»R - p P LDR A12,A1 SAVE TTEAB ADDR . 4 P SUR A10,A10 MARK THAT FDB NOT SHALL BE RELEASED . . P EJECT . f 0 P* CHECK IF THIS FDB ADDR IS USED ELEWHERE . t P* . P* SEARCH ALL TTABS . P* . P LD* A2,SCTTCT . PDMT730 EQU * . P SUK A
0x377014…3771a8 Dummy {f00=0x0117, f01=0x018e, f02=»K ID . | P CCK A3,'##' / & P RB(E) DMT730 JUMP IF MONITOR TASK / P LD A3,TTB:TD,A1 / J ( P ADKL A1,TTB:TD+2 DEV DESCR TABLE +2 / b PDMT770 EQU * / P SUK A3,4 / $ P RB(NP) DMT730 NOT IN THIS TTAB / P LDR A4,A1 / P ADR A4,A3 / P CWR* A5
0x3771a8…37733c Dummy {f00=0x0117, f01=0x0190, f02=» / v & P RF DMT895 MORE USERS ON THIS FDB 0 P* 0 2 P* NOW SEARCH SCTCDT 0 < P* 0 Z PDMT780 EQU * 0 d P LD* A4,SCTCDT 0 x PDMT790 EQU * 0 P SUK A4,4 0 . P RF(NP) DMT800 THIS FDB HAS NO OTHER USER 0 P LD A2,SCTCDT 0 P ADR A2,A4 0
0x37733c…3774d0 Dummy {f00=0x0117, f01=0x018e, f02=» & P RF DMT895 THIS FDB HAS MORE USERS 1 P EJECT 1 . P* 1 < P* NOW RELEASE THIS FDB 1 F P* 1 f PDMT800 EQU * 1 p P* 1 P* RELEASE EA-BUFFERS 1 P* 1 . P LDKL A2,/8000 ALL EA-BUFFERS ARE RELEASED 1 P LDR A1,A6 FDB ADDR 1 P CF
0x3774d0…377664 Dummy {f00=0x0117, f01=0x0190, f02=» 1 P CMR A5 CLEAR FDB 2 P RF DMT830 2 " PDMT820 EQU * 2 4 P LDR A4,A5 BUFFER ADDRESS 2 H PDMT830 EQU * 2 j & P RF(Z) DMT840 ALL BUFFER S REMOVED 2 ~ $ P LDR* A5,A4 NEXT BUFFER ADDRESS 2 P* 2 P* RETIURN BUFFER TO POOL 2 P* 2 P I
0x377664…3777f8 Dummy {f00=0x0117, f01=0x0190, f02=» 2 P* 3 < P* NOW CHECK DEVICE CODES. WHEN LAST FILE IS CLOSED ON 3 > P* A FLEXIBLE DISC UNIT, AN UNLOC IS MADE FOR THIS VOLUME 3 R P* 3 P LDK A1,4 EXTENT COUNTER 3 P LDR A5,A6 FDB ADDR 3 . P ADKL A5,FDBEXT+1 ZADDR OF FIRST VOL CODE 3
0x3777f8…37798c Dummy {f00=0x0117, f01=0x0190, f02=»1 LOOP 3 & P ABL(NN) DMT900 CHECK THIS EXTENT 4 P XIF 4 8 P IFT INDXAC=1 4 D P EJECT 4 Z P* 4 h P* ALL EXTENTS CHECKED 4 r P* RELEASE MASRTER INDEX 4 P* 4 P INH 4 & P LD A1,FDBMIA,A6 MASTER INDEX ADDR 4 P RF(Z) DMT894 NO MAT
0x37798c…377b20 Dummy {f00=0x0117, f01=0x018e, f02=» DMT894 NO MATER IX 4 P CW A1,MXIND+2,A5 5 P RB(NE) DMT885 5 6 P LD A4,MXIND,A5 5 L & P RF(N) DMT890 PREVIOUS ENTRY USED 5 d " P LD A4,MXIND+4,A5 NO OF WORDS 5 P ANKL A4,/7FFF REMOV USE BIT 5 P ADS A4,MXIND,A5 NR OF WORDS 5 P* 5 P*
0x377b20…377cb4 (2, 363) Dummy {f00=0x0117, f01=0x0190, f02=» P LD A2,MXIND 6 P SUR A2,A5 6 P SUK A2,2 NO OF CHAR 6 * P CF A14,DMTWM MOVE UOP 6 F P RF DMT894 6 d PDMT890 EQU * 6 v P LDKL A4,/7FFF 6 & P ANS A4,MXIND+4,A5 REMOVE USE BIT 6 P XIF 6 P EJECT 6 PDMT894 EQU * 6 0 P LDKL A10,1 MARK
0x377cb4…377e48 Dummy {f00=0x0117, f01=0x0190, f02=»11 FILE CODE 6 P CM 2,A11 FDB ADDR 7 P* 7 . * P* RELEASE DWT-QUEUQ IN THIS FDB-DWT 7 8 P* 7 f P LDR A1,A6 FDBADDR 7 p $ P ADKL A1,DWTTQ ADDR QUEUE START 7 P LDR* A5,A1 NEXT TTAB ADDR 7 P RF(Z) DMTA20 NO Q 7 P CMR A1 KILL ROOT 7 $ P
0x377e48…377fdc Dummy {f00=0x0117, f01=0x0190, f02=» 7 P* 8 " P* NEXT ENTRY IN TTAB/CDATAB 8 P* 8 8 P LDR A1,A12 TTAB ADDR 8 B P LDK A2,0 8 ` ( P LC A2,ECBFC,A9 FILE CODE USERT ECB 8 r & P LDR A5,A13 LOCAL/GLOBAL INDICATOR 8 & P CF A14,FNDFDB SEARCH TTAB SCTCDT 8 P LDK A7,0 INDICATES A2
0x377fdc…378170 Dummy {f00=0x0117, f01=0x018e, f02=»ALL ALSO BE RELEASED 8 | P* 9 & P LD A7,2,A4 NEXT FDB ADDR TO CLOSE 9 & P LDK A1,2 9 P P ADR A1,A6 FROM ADDR 9 b P LDK A3,2 9 ~ P ADR A3,A7 TO ADDR 9 P LDK A2,12 NO OF BYTES 9 P CF A14,DMTWM MOVE DWT 9 P IFT MMUPAG=1 9 P LD A3,DWTUE
0x378170…378304 Dummy {f00=0x0117, f01=0x018e, f02=» 9 x P CM FDBSNR,A7 SECTOR NR : P LDKL A3,FDBEXT : ( P ADR A3,A7 : @ P ST A3,FDBCEX,A7 1ST EXTENT : R P LDR A10,A10 =1 : v P RF(Z) DMTA30 NO RELEASE =1 : P LDKL A3,/8000 : P ST A3,DWTST,A6 NOT BUSY : PDMTA30 EQU * : P XIF : P
0x378304…378498 Dummy {f00=0x0117, f01=0x0190, f02=» P* RELEASE FDB ; P* ; P LDR A10,A10 ; & P RF(Z) DMTA40 NO RELEASE ; : P IFT INDXAC=1 ; Z P* ; p 0 P* REMOVE ALL OTHER REFERAENCES TO THIS FDB ; z P* ; P LDK A1,10 2*MAX NR OF FDBS ; PDMTA50 SUK A1,2 ; " P RF(N) DMTA70 ALL FD
0x378498…37862c Dummy {f00=0x0117, f01=0x0190, f02=»OF FDBS ; | PDMTA60 SUK A4,2 < 0 P RB(N) DMTA50 ALL ADDR CHECKED IN OTHER FDB < ( P LDR A5,A3 < P ADR A5,A4 < n P CW A6,FDBADF,A5 < P RB(NE) DMTA60 < P* < @ P* DELETE THIS REFERENCE TO THE FDB THAT SHALL BE RELEASED < P* < P C
0x37862c…3787c0 Dummy {f00=0x0117, f01=0x0190, f02=»SET FDB FREE < PDMTA40 EQU * = * P CF A14,CLRBUF REMOVE ALL FREE BUFFERS = ( P LDR A1,A7 NEW FDB ADDR = V P ABL(Z) DMTERX NO MORE FDBS = v P IFT INDXAC=1 = P ENB ENB = P* = 4 P* FIND WHICH DMTASK IS NEXT AND ACTIVATE THAT = P* =
0x3787c0…378954 (2, 364) Dummy {f00=0x0118, f01=0x0190, f02=» P LKM > P DATA 3 EXIT > P XIF > $ P IFT FLXDSC=1 > 0 P EJECT > F PDMT900 EQU * > T $ P* UNLOCK FLEXDISC IN THIS LOOP > h P* > P* REGISTERS > P* A1 = EXTENT COUNTER > 6 P* A4 = LAST VOL CODE FLEXDOISC A5 = EXT ADDR >
0x378954…378ae8 Dummy {f00=0x0118, f01=0x0190, f02=»NGTH IN FDB > z P LCR A7,A5 VOLUME CODE ? P ANK A7,/FF ? 2 P ABL(Z) DMT880 NO CODE ? F P* ? d & P* FLEXDICSC IF BIT 8-13 = 111110 ? n P* ? P ANK A7,/F8 ? P SUK A7,/F8 ? P ABL(NE) DMT880 NO FLEXDISC ? P* ? 6 P* IF SAME FLEX
0x378ae8…378c7c Dummy {f00=0x0118, f01=0x0190, f02=»THOIS FLEXIBLE DISC VOL CODE ? t P* @ $ PDMT910 EQU * @ . P LCR A4,A5 SAVE VOL CODE @ B " P LDKL A3,FDBSTA FDB LINK ROOT @ b P INH INH @ P RF DMT925 @ PDMT920 EQU * @ P LDR* A3,A3 FDB ADDR @ PDMT925 EQU * @ P ANKL A3,/FFFE FDB ADD
0x378c7c…378e10 Dummy {f00=0x0118, f01=0x018e, f02=» DMT920 CURRENT FDB @ P LDK A7,4 EXTENT COUNTER A P LDR A2,A3 FDB ADDR A < P ADKL A2,FDBEXT+1 A X P* ADDR OF 1ST VOL CODE A r & P SUKL A2,EXTELE EXT LENGTH IN FDB A PDMT930 EQU * A P SUK A7,1 A & P RB(N) DMT920 ALL EXTENTS CHECKED A
0x378e10…378fa4 Dummy {f00=0x0118, f01=0x018e, f02=» A & P* ALL FSDBS CHECKED. MAKE UNLOAD B P* B 2 PDMT980 EQU * B < P ENB ENB B P P* B b 6 P* NOTE THAT ECBBUF IS ASSUMED NOT TO BE CHANGED B l P* WITH THIS REQUEST B P* B P SC A4,ECBFC,A8 VOL CODE B P* B P IFF DSKPAG+SWPB
0x378fa4…379138 Dummy {f00=0x0118, f01=0x0190, f02=» P IFT FLXDSC=1 C P LDK A7,/B8 UNLOAD WAIT C P LKM C : P DATA 1 C F P LD A1,ECBRC,A8 C V P ANK A1,1 INOPER C n P ABL(NZ) DMTERR C P ABL DMT880 CHECK NEXT EXT C P XIF C P EJECT C " PDMT500 EQU * READ VTOC RECORD C P* C "
0x379138…3792cc Dummy {f00=0x0118, f01=0x0190, f02=»H C v ( P ORS A1,ECBRC,A9 SET RC BUT CONTINUE D , P LD A2,ECBRL,A9 MOVE WHAT USER TOLD YOU D 6 PDMT510 EQU * D f P ST A2,ECBEL,A9 D z P CF A14,DMTREM MOVE RECORD D PDMAEX EQU * D P ABL DMTAEX EXIT D P EJECT D " PDMSQWR EQU * SEQUENTIAL WR
0x3792cc…379460 Dummy {f00=0x0118, f01=0x0190, f02=» D v P* E PDMDEL EQU * INDEXED DELETE E P* E 4 PDMIRW EQU * INDEXED REWRITE E > P* E b & PDMRDWD EQU * DELAYED RANDOM WRITE E l P* E & PDMRDDD EQU * DELAYED RANDOM DELETE E P* E P* TEST STATUS E P LD A10,FDBRRO,A6 E P A
0x379460…3795f4 (2, 365) Dummy {f00=0x0118, f01=0x0190, f02=»+2,A9 E P ANK A2,/FF F P LD A3,ECBCW,A9 LOG REC NR F " P LDK A4,0 F D P CCR A4,A10 F V P RF(E) DMS010 FREE F j P IFT INDXAC=1 F P LDR A4,A7 F P SUK A4,QINS F P RF(E) DMEAER INDEXED INSERT F P XIF F P LDR A4,A7 F P SUK A
0x3795f4…379788 Dummy {f00=0x0118, f01=0x0190, f02=» P ANK A4,EABIT G " P RF(NZ) DMS020 EA=1, NO CHECK G P* EA MUST BE SET G @ P* G Z P CF A14,EATEST G d P LDR A4,A4 RTN CODE G z " P RF(NP) DMEAER NO EA THIS TASK G P XIF G P RF DMS100 G PDMS010 EQU * G P IFT INDXAC=1 G P LDR
0x379788…37991c Dummy {f00=0x0118, f01=0x0190, f02=»TE G v P XIF H PDMS020 EQU * H P CF A14,EATEST H * P LDR A4,A4 RTN CODE H @ P RF(N) DMEAER EA OTHER TASK H PDMS100 EQU * H P LDK A1,0 SET STATUS FREE H P IFT INDXAC=1 H P LDR A2,A7 H P SUK A2,QIRW H " P RF(E) CHK010 INDEXED
0x37991c…379ab0 Dummy {f00=0x0118, f01=0x0190, f02=»HK010 INDEXED DELETE H P XIF I P LDR A2,A7 I ( P SUK A2,QRD I : P RF(E) DMT350 RANDOM DELETE I N P LDR A2,A7 I r P SUK A2,QRDD I ( P RF(E) DMT350 DELAYED RANDOM DELETE I P RF DMT310 RW,RWD,SW I P IFT INDXAC=1 I P EJECT I PCHK0
0x379ab0…379c44 Dummy {f00=0x0118, f01=0x0190, f02=»* COMPARE KEYS IN FILE AND USER BUFFER I P* J 0 P LDR A1,A6 FDB ADDR J : P LDK A5,8 MAX 4 INDEX J V P SUR A12,A12 INDEX COUNTER J t PCHK040 EQU * J P SUK A5,2 J $ P RF(N) CHK100 ALL INDEX CHECKED J P LDR A2,A1 FDB ADD J P ADR A2,A5
0x379c44…379dd8 Dummy {f00=0x0118, f01=0x0190, f02=»ORDER =3 J P ANK A2,/3F ORDER INDEX K P SUK A2,QIRW K 0 & P RB(NE) CHK040 NOT INDEXED REWRITE K D P* K n P IFT MMUPAG=1 K x P LDR A7,A1 SAVE A1 K * P LD A1,FDBKA,A6 GET KEY START ADDRESS K P AD A1,ECBBA,A9 K 2 P LDKL A2,FDBKEY GET KEY SA
0x379dd8…379f6c Dummy {f00=0x0118, f01=0x0190, f02=»6 KEY LENGTH K P INH L & P LD A4,DWTTDM,A7 GET TTAB ADDRESS L $ P TL TTB:MT,A4 LOAD MMU REGISTERS L J $ P LD A4,PRUN GET DM TTAB ADDRESS L r 0 P TS TTB:MT,A4 STORE USER MMU IN DM MMU TABLE L P ENB L , P CF A14,MOV:US MOVE KEY TO FDB KEY AREA L
0x379f6c…37a100 Dummy {f00=0x0118, f01=0x0190, f02=»NDXAC=1 L P IFT MMUPAG=0 M " P LD A2,FDBKA,A6 KEY START ADDR M & P LDR A3,A2 M L " P AD A2,ECBBA,A9 KEY IN BUFFER M ^ P XIF M P* M P IFT INDXAC=1 M P AD A3,FDBRRO,A1 M P ADR A3,A11 KEY IN FILE M P LDK A7,0 M " P LD A6,FDBRLE,
0x37a100…37a294 (2, 366) Dummy {f00=0x0118, f01=0x0190, f02=»ECK NEXT M r P LDR A6,A1 FDB ADDR N P LDKL A1,/4000 KEY NOT FOUND N , P RF DMERR N P PCHK100 EQU * N b P LDR A6,A1 FDB ADDR N v P LD A7,DWTOR,A6 N P ANK A7,/3F ORDER INDEX N P LDK A2,0 N P LC A2,FDBNIF,A6 N P CWR A2,A12 N ( P
0x37a294…37a428 Dummy {f00=0x0118, f01=0x0190, f02=»R N P XIF O $ PDMEAER LDKL A1,/2000 EA PROTECT O PDMERR ABL DMTERR O > P EJECT O V P* O d P* MOVE RECORD O n P* O PDMT310 EQU * O P IFT INDXAC=1 O P LDR A2,A7 O P SUK A2,QDEL O " P ABL(E) DMXDEL INDEXED DELETE O P X
0x37a428…37a5bc Dummy {f00=0x0118, f01=0x0190, f02=»FROM ADDRESS O P* P P IFT MMUPAG=0 P P XRR A4,A1 P 4 P ANK A4,/01 P F ( P RF(E) DMT320 BOTH ODD OR BOTH EVEN P Z & P CF A14,DMTBM ONE ODD AND ONE EVEN P P RF DMT340 P P* P PDMT320 LDR A4,A3 P P ANK A4,/01 P P RF(E) DMT330 BO
0x37a5bc…37a750 Dummy {f00=0x0118, f01=0x018e, f02=»RD MOVE P z P* Q P XIF Q P* Q & P IFT MMUPAG=1 Q 0 P LDR A3,A2 GET LENGTH Q F , P LDR A2,A4 GET RECEIVING BUFFER ADDRESS Q d P INH Q & P LD A4,DWTTDM,A6 GET TTAB ADDRESS Q $ P TL TTB:MT,A4 LOAD MMU REGISTERS Q $ P LD A4,PRUN GET DM TTA
0x37a750…37a8e4 Dummy {f00=0x0118, f01=0x0190, f02=» Q Z P XIF R P* R PDMT340 EQU * R P* R 2 P* SET STATUS USED R < P* R X P LDK A1,/FF R b PDMT350 SCR A1,A10 R v P LD A3,FDBDBR,A6 R P RF(NN) DMT394 NO DELAY R P LDR A2,A7 R P SUK A2,QSW R " P RF(E) DMT360 SEQUENTIAL W
0x37a8e4…37aa78 Dummy {f00=0x0118, f01=0x0190, f02=»NDOM DELETE R x P RF DMT390 S $ P* WRITE IF LAST REC IN SECTOR S & P* S N PDMT360 LD A4,FDBRRO,A6 S X P CW A4,FDBMRO,A6 S v " P RF(NE) DMT400 NOT LAST RECORD S " PDMT390 LDK A7,/05 BASIC WRITE S P SLL A3,1 S P RF(N) DMT395 BASIC WANTED S
0x37aa78…37ac0c Dummy {f00=0x0118, f01=0x0190, f02=»1,A6 FDB ADDRESS AS PARAMETER S P LKM T & P DATA -1 I/O AND ACTIVATION T 2 " P DATA DMTAR2 DMTASK RESTART #2 T V P LKM T | P DATA 3 EXIT T P EJECT T P* T P************** T P* DMTAR2 * T P************** T P* T P* T ,
0x37ac0c…37ada0 Dummy {f00=0x0118, f01=0x0190, f02=»4,DMTIOT CHECK DISC I/O T P LDR A1,A1 U P RF(NZ) DMTERR U 2 P LDKL A1,/C0FF U H $ P ANS A1,FDBDBR,A6 RELEASE BUFFER U ^ PDMT400 EQU * U " P LDR A1,A6 FDB ADDR DATA FILE U P LD A2,ECBCW+2,A9 U P ANK A2,/FF U P LD A3,ECBCW,A9 LOG REC NR
0x37ada0…37af34 (2, 367) Dummy {f00=0x0118, f01=0x0190, f02=» RF(E) DMT460 SEQ WRITE U P LDK A4,QRD V P CWR A7,A4 V 4 P RF(E) DMT420 RAND DEL V F P LDK A4,QRDD V d P CWR A7,A4 V x ( P RF(E) DMT420 DELAYED RANDEOM DELETE V P IFT INDXAC=1 V P LDK A4,QDEL V P CWR A7,A4 V P RF(E) DMT420 INDEXED
0x37af34…37b0c8 Dummy {f00=0x0118, f01=0x0190, f02=»ET GET CRN BUFFER V P LDR A10,A2 BUFFER ADDR W P IFT INDXAC=1 =2 START W : P LDK A3,QIRW W Z P CWR A7,A3 W n " P RF(E) DMT410 INDEXED REWRITE W P XIF =2 END W P CM CRNCIF,A2 W P* CLEAR INDEX CRN W P CM CRNCIF+2,A2 W PDM
0x37b0c8…37b25c Dummy {f00=0x0118, f01=0x018e, f02=»NCDF,A10 CRN FIL E CODE W P IFT INDXAC=1 X P LDK A4,QINS X 6 P CWR A7,A4 X J P RF(E) DMT460 INDEXED INSERT X P XIF X PDMT420 EQU * X P LDK A4,QSR X P CWR A7,A4 X P RF(E) DMT450 SEQ READ X P LDK A4,QRR X P CWR A7,A4 X
0x37b25c…37b3f0 Dummy {f00=0x0118, f01=0x018e, f02=» P* Y P* RELEASE EA Y P* Y $ P CF A14,EARELB REL EA Y . P RF DMTAEX Y L PDMT450 EQU * Y ^ P LC A4,DWTST,A1 DWTSTATUS Y r P ANK A4,EABIT EA-BIT Y & P RF(NZ) DMTAEX EA=1. NO EA WANTED Y P* Y " P* CHECK IF EA IS SET ALREADY Y
0x37b3f0…37b584 Dummy {f00=0x0118, f01=0x0190, f02=» P CF A14,EASETB Z P RF DMTAEX Z PDMT460 EQU * Z , P* Z @ P* UPDATE LRN Z J P* Z ` P SC A2,FDBLRN,A1 Z j P ST A3,FDBLRN+1,A1 Z P IFT INDXAC=1 Z P LDK A4,QINS Z P CWR A7,A4 Z " P ABL(E) DMINS2 INDEXED INSERT Z P XIF Z
0x37b584…37b718 Dummy {f00=0x0118, f01=0x0190, f02=»3F00 Z ( P RF(NZ) DMTERX NO RELEASE OF BUFFER [ PDMTEX1 LD A3,ECBBA,A8 [ 8 P SUK A3,8 [ V PDMTEX2 EQU * [ h ( P CF A14,DMTRBU RELEASE BUFFER AT A3 [ | PDMTERX EQU * [ P INH [ P* A1 = RET CODE [ P* A6 = DWT ADDR [ P CF A15,TEND
0x37b718…37b8ac Dummy {f00=0x0118, f01=0x0190, f02=»RANDOM READ [ 2 P********************************************* " P LD A9,DWTECB,A1 USER ECB ADDR J P IFT MMUPAG=0 p P LD A8,ECBCW,A9 ADDR OF KEY P XIF P IFT INDXAC=1 P IFT MMUPAG=1 P LDR A8,A1 FDB ADDR " P ADKL A8,F
0x37b8ac…37ba40 Dummy {f00=0x0118, f01=0x018e, f02=» LDR A13,A1 P ADKL A13,FDBECB ECB ADDR ] $ P CF A14,FNDKEY GET INDEX RECORD ] 6 ( PDMR006 EQU * FROM INDEXED READ NEXT ] ^ P LD A9,DWTECB,A1 ] P LDR A6,A1 FDB ADR ] P LDKL A8,FDBECB ] P ADR A8,A6 ECB ADDRESS ] P LDR A2,A2 RETURN CODE
0x37ba40…37bbd4 (2, 368) Dummy {f00=0x0119, f01=0x018e, f02=» ] " P LD A2,FDBRRO,A1 RECORD OFFSET ^ P ADK A2,10 BUFFER HEADER ^ . P ADR A2,A3 REC ADDR ^ N P LD A4,FDBRLE,A1 REC LENGTH ^ j P SUK A4,6 KEY LENGTH ^ P ADR A2,A4 ^ " P CC A4,2,A2 DUPLICATE KEY CHAR ^ $ P RF(NE) DMR020 NEXT KEY NOT SAME ^
0x37bbd4…37bd68 Dummy {f00=0x0119, f01=0x0190, f02=» ^ P LDK A5,0 _ P LC A5,3,A2 _ P SC A5,ECBCW+3,A8 _ . P LC A5,4,A2 _ H P ECR A5,A5 _ P LC A5,5,A2 _ n P ST A5,ECBCW,A8 _ P* _ P* RELEASE BLOCK BUFFER _ P* _ P CF A14,DMTRBU _ P EJECT _ P* _ 0 P* PERFORM
0x37bd68…37befc Dummy {f00=0x0119, f01=0x018e, f02=» BIT _ | P SLL A2,1 ` " P LDK A7,/A RANDOM READ NO WAIT ` P ORR A7,A2 EA BIT ` D P* ` ^ P* MOVE USER ECB ` h P* ` P LDR A1,A9 FROM ECB ADDR ` P LDR A3,A8 TO ECB ADDR ` P LDK A2,6 NO OF CHAR ` P CF A14,DMTWM MOVE ECB ` P LDR
0x37befc…37c090 Dummy {f00=0x0119, f01=0x0190, f02=» P DATA 3 EXIT a PDMTAR4 EQU * a P* a , P* SET UP A14 STACK a 6 P* a R P CF A15,GETA14 a P LDR A6,A1 a r P LDKL A8,FDBECB a P ADR A8,A6 RR ECB a P LD A9,DWTECB,A6 USER ECB a P LD A1,ECBRC,A8 a & P ORS A1,ECBRC,A9 RET COD
0x37c090…37c224 Dummy {f00=0x0119, f01=0x0190, f02=»LE a x P* b ( P LD A1,FDBADF,A6 FDB ADDR DATA FILEP b & P CF A14,CRNGET GET CRN BUFFER ADDR b @ P LDR A10,A2 CRN BUFFER ADDR b j " P LDR A1,A6 FDB ADDR INDEX FILE b ( P CF A14,GTLGRN GET INDE X LOG REC NO b P SC A2,CRNCIF+1,A10 b & P ST A3,CRNCI
0x37c224…37c3b8 Dummy {f00=0x0119, f01=0x0190, f02=»URN CODEXS b P* c $ P LD A2,ECBEL,A8 EFFECTIVE LENGTH c P ST A2,ECBEL,A9 c D P LDK A1,0 RETURN CODE c P ABL DMTERX TENDIO c z P EJECT c " PDMIRN EQU * INDEXED READ NEXT c 2 P********************************************* c P LDR A1,A6
0x37c3b8…37c54c Dummy {f00=0x0119, f01=0x0190, f02=»UFFADR c P ADK A2,10 RECORD ADDR d ( P AD A2,FDBRLE,A1 ADDR OF STATUS CHAR d , P LDK A5,/FF USED MARK d X P CCR A5,A2 STATUS d v P RF(E) DMI120 USED d P LD A4,FDBMRO,A1 d & P ST A4,FDBRRO,A1 LAST REC IN SECT d P* d P* CHECK IF END O
0x37c54c…37c6e0 Dummy {f00=0x0119, f01=0x0190, f02=» RF(G) DMI105 EOF d P CW A3,FDBLRN+1,A1 e P RF(L) DMI106 NOT EOF e 4 PDMI105 LDR A3,A9 e R P RF DMI030 EOF e j PDMI106 LDR A3,A9 RESTORE e P RF DMI010 NEXT REC e PDMI120 EQU * e P* INDEX RECORD IS FOUND e P* e P LDK A2,0
0x37c6e0…37c874 (2, 369) Dummy {f00=0x0119, f01=0x0190, f02=»DMI100 RECORD FOUND e P LDR A6,A1 FDB ADDR f & PDMI030 LDKL A1,/4000 KEY NOT FOUND f 8 PDMI035 EQU * f b P LDR A3,A3 BUFFER ADDR f v P ABL(Z) DMTERX NO BUFFER f P ABL DMTERR ERROR AND BUFFER f P EJECT f P* f & PDMINS2 EQU * INDEXED INS
0x37c874…37ca08 Dummy {f00=0x0119, f01=0x0190, f02=»FSTA f " P CF A14,DMTRBU RELEASE BUFFER g PDMXDEL EQU * INDEXED DELETE g 2 6 P************************************************* g V P LDR A11,A7 ORDER CODE g P LDR A12,A8 PHYS ECB ADDR g P LDK A5,0 g . P SC A5,FDBDBR,A1 ZEROE INDEX FILE COUN
0x37ca08…37cb9c Dummy {f00=0x0119, f01=0x0190, f02=» A6,A10 g P ADR A6,A5 h ( P LD A1,FDBAI1,A6 FDB ADDR INDEX FILE h " P RB(Z) DXI020 NO INDEX h N P* h l ( P* GET FILE CODE FOR THIS FDB ADDR h v P* h P LD* A6,SCTCDT h PDXI030 SUK A6,4 h P LD A7,SCTCDT h P ADR A7,A6 h P CW A1
0x37cb9c…37cd30 Dummy {f00=0x0119, f01=0x0190, f02=»CBFC,A8 INDEX FILE h P LDR A6,A11 i P SUK A6,QINS i . P RF(E) DXI080 INDEXED DELETE i B P* i f $ P* GET ADDRESSS OF DATA RECORD i p P* i P LD A6,ECBBA,A12 SECTOR ADDR i P ADK A6,2 CYLID i $ P AD A6,FDBRRO,A10 ADDR DATA REC i P A
0x37cd30…37cec4 Dummy {f00=0x0119, f01=0x0190, f02=» ADDR i v $ P LD A6,ECBBA,A9 USER BUFFER ADDR j P AD A6,FDBKA,A1 KEY OFFSET j 6 P IFT MMUPAG=1 j X P LDR A6,A1 j n " P ADKL A6,FDBKEY ADDR KEY AREA j P XIF j P IFT INDXAC=1 j $ P LDK A7,/1F INSERT INDEX NOWAIT j PDXI090 EQU * j P* j
0x37cec4…37d058 Dummy {f00=0x0119, f01=0x0190, f02=» DATA DMTAR5 j P LD A7,ECBRC,A8 k P RF(N) DMTAR5 REQ ERR k , P RB DXI020 NEXT INDEX DIRECT k J PDXI100 LKM k n P DATA 3 EXIT k PDMTAR5 EQU * k " P LD A6,FDBADF,A1 FDB DATA FILE k P LD A9,DWTECB,A6 USER ECB k P LDKL A8,FDBECB k P
0x37d058…37d1ec Dummy {f00=0x0119, f01=0x0190, f02=»A9 RC TO USER k P LDK A1,0 RETURN CODE l & P LC A2,FDBDBR,A6 NR OF READY INDEX l 4 P ADK A2,1 COUNT INDEXES l ^ $ P CC A2,FDBNIF,A6 TOT NR OF INDEX l ~ P RF(NE) DXI200 l P LD A7,DWTOR,A6 l P ANK A7,/3F ORDER CODE l P SUK A7,QINS INDEXED I
0x37d1ec…37d380 Dummy {f00=0x0119, f01=0x0190, f02=» P ADKL A10,2 CYLID m P AD A10,FDBRRO,A6 m & P AD A10,FDBRLE,A6 ADDR STATUS CHAR m 8 P LDK A1,0 STATUS FREE m b . P ABL DMT350 CONTINUE AS FOR RANDOM DELETE m PDXI200 EQU * m P SC A2,FDBDBR,A6 m P LKM m " P DATA 3 EXIT. MORE INDEX LEFT
0x37d380…37d514 (2, 370) Dummy {f00=0x0119, f01=0x0190, f02=»*************** m r " P LD A9,DWTECB,A1 USER ECB ADDR n $ P LD A8,ECBBA,A9 BUFFER ADDR USER n > P LDR A12,A8 n f $ P LD A11,FDBRLE,A1 RECORD LENGTH n z P SUKL A11,6 KEY LENGTH n P LDR A13,A14 n 0 P ADKL A13,2 ECB ADDR TO RECORD BUFFER AREASS n $ P
0x37d514…37d6a8 Dummy {f00=0x0119, f01=0x0190, f02=»OR FOUND n z P LDR A13,A3 BUFFER ADDR o " P LD A4,FDBADF,A6 FDB DATA FILE o 0 P LD A5,DWTECB,A4 USER ECB o V P LD A1,DWTOR,A6 o x P ANK A1,/3F o P SUK A1,QDELX o & P ABL(E) DEL000 DELETE INDEX RECORD o P* o ( P* SET RC BIT 6 TO USER I
0x37d6a8…37d83c Dummy {f00=0x0119, f01=0x018e, f02=»EY NOT ALLOWED IN FILE) o P* p P LC A4,ECBFC,A5 FILE CODE p * P CC A4,FDBECB+1,A6 p L * P RF(NE) INS049 NOT REQUESTED FILE CODE p f P LDKL A4,/200 BIT 6 p " P ORS A4,ECBRC,A5 NEXT KEY SAME p PINS049 EQU * p P IFT INSLAS=1 p P* p
0x37d83c…37d9d0 Dummy {f00=0x0119, f01=0x018e, f02=» P CF A14,RDNXTR GET NEXT REC q P RF INS100 OK q ( P ABL DEL045 ERROR q > PINS100 EQU * q X P ADR A2,A3 q l P ADK A2,10 REC ADDR q ~ P AD A2,FDBRLE,A1 ADDR STATUS q P LDK A5,/FF q P CCR A5,A2 q P RF(E) INS150 USED q P LD A5,FDB
0x37d9d0…37db64 Dummy {f00=0x0119, f01=0x0190, f02=» P CWR A5,A11 KEY LENGTH r $ P RB(E) INS080 NEXT SAME GET NEXT r " P* r J P* UPDATE LAST SAME RECORD r T P* r x P SC A11,-4,A2 NEXT SAME r P LD A7,FDBRRO,A1 r P CW A7,FDBMRO,A1 r & P RF(NE) INS160 SECT WRITTEN LATER r P* r P*
0x37db64…37dcf8 Dummy {f00=0x0119, f01=0x018e, f02=» P ABL(NZ) DMTERR s P* s P* GET NEXT RECORD s & P* s B PINS160 EQU * s L " P LDR A7,A5 NR OF SAME IN NEXT s ` P LDR A1,A6 FDB s P CF A14,RDNXTR GET NEXT RC s P RF INS170 OK s P ABL DEL045 ERROR s PINS170 EQU * s P LDR A
0x37dcf8…37de8c Dummy {f00=0x0119, f01=0x0190, f02=» s P* t ( P* CREATE AN INDE XRECORD IN AREA 1 t P* t > P LDR A1,A12 FROM ADDR t H P* t f P LDR A3,A14 t p P ADK A3,2 TO ADDR t P LDR A2,A11 KEY LENGTH t P CF A14,DMTBM MOVE KEY t P LDK A2,0 t P SCR A2,A3 DUMMY t P ADK
0x37de8c…37e020 Dummy {f00=0x0119, f01=0x0190, f02=»R t t P LD A2,ECBCW+2,A5 u ( P LD A3,ECBCW,A5 REC NR DATA FILE REC u $ P SCR A2,A7 u P P ADK A7,2 u b P SCR A3,A7 u t P ECR A3,A3 u P SUK A7,1 u P SCR A3,A7 LOG REC NR u P ADK A7,2 u P LDK A1,/FF USED u P SCR A1,A7 STATUS CHAR
0x37e020…37e1b4 (2, 371) Dummy {f00=0x0119, f01=0x0190, f02=» u P ST A2,-28,A14 v P ST A3,-26,A14 v P EJECT v 4 P* v B : P* BELOW IS A NEW INDEX RECORD INSERTED AND FOLLOWING v L $ P* USED RECORDS ROLLED FORWARD v $ P* A6,A11,A13 IS USED AT ENTRY v $ P ADKL A11,7 RECORD LENGTH TOTAL v P* v
0x37e1b4…37e348 Dummy {f00=0x0119, f01=0x0190, f02=»A12 = AREA INDEX 0=BUFAR1,1=BUFAR2 v $ P* A13 = BUFFER ADDRESS SECTOR w , P* w T PINS190 EQU * w ^ P LDKL A12,1 BUFADR2 w r PINS200 EQU * w P LDK A1,0 w P LDR A12,A12 w P RF(Z) INS210 BUFAR1 w ( P LDKL A1,RECBFZ RECORD BUUFFER SIZE
0x37e348…37e4dc Dummy {f00=0x0119, f01=0x0190, f02=» LAST RECORD w P* x P LDR A1,A13 x P ADK A1,10 BUFSTA+2 x 2 . P AD A1,FDBMRO,A6 ADDR OF LAST REC IN SECT x N P LDR A2,A11 x P LDR A3,A10 x " P CF A14,DMTBM SAVE LAST RECORD x P* MOVE REST OF SECTOR x P* x P LDR A1,A13 x
0x37e4dc…37e670 Dummy {f00=0x0119, f01=0x0190, f02=» x t P LDR A3,A1 y P ADR A3,A11 TO ADDR y P CF A14,DMTBMR MOVE y 6 P* INSERT NEW RECORD y R P* y p P LDKL A1,RECBFZ BUFFER SIZE y z P SLL A1,1 BYTE NO y P LDR A12,A12 y P RF(Z) INS250 BUFAR1 y " P LDK A1,0 SELECT OTHER BUFFER y
0x37e670…37e804 Dummy {f00=0x0119, f01=0x0190, f02=» P CF A14,DMTBM MOVE z P* WRITE BUFFER z P* z 6 P LDR A8,A14 USE STACK AS ECB z @ P SUKL A8,24 z d $ P LC A2,FDBEXT+1,A6 VOL DEV CODE z x P ANK A2,/FF z P STR A2,A8 z P LDR A2,A13 z P ADK A2,8 BUFSTA z P ST A2,ECBBA,A8 SECT
0x37e804…37e998 Dummy {f00=0x0119, f01=0x0190, f02=» z v P LDK A7,/95 WRITE , WAIT { P LKM { ( P DATA 1 { 4 P LDR A1,A6 FDB INDEX { D P CF A14,DMTIOZ IO CHECK { ` P LDR A1,A1 { P ABL(NZ) DMTERR { P* { 6 P* IF SPILLED RECORD IS FREE, OPERATION IS READY { P* { P LDR A2,A10 RECO
0x37e998…37eb2c Dummy {f00=0x0119, f01=0x0190, f02=»T IN SECT { v P CCR A1,A2 | P RF(Z) INS400 FREE RECORD | $ P* | F P* GET NEXT SECTOR | P P* | l P LDR A1,A6 FDB ADDR | v P LDR A3,A13 BUFFER ADDR | 2 P CF A14,RDNXTR GET FIRST RECORD IN NEXT SECTOR | P RF INS260 OK | P LDR A1,A5
0x37eb2c…37ecc0 Dummy {f00=0x0119, f01=0x0190, f02=»D BUFFERS | v P SUR A12,A12 } P RB INS200 } & P EJECT } 8 PINS400 EQU * } F P* } Z ( P* UPDATE LRN IF EOF IS ENCOUNTERED } d P* } P LDR A1,A6 FDB INDEX } P CF A14,GTLGRN } P CC A2,FDBLRN,A1 } P RF(L) INS430 NO EOF } P RF(G)
0x37ecc0…37ee54 (2, 372) Dummy {f00=0x011a, f01=0x0190, f02=»T A3,FDBLRN+1,A6 } P LDKL A1,/1000 EOF ~ P ORS A1,ECBRC,A9 EOF TO USER ~ 4 PINS430 EQU * ~ X P* ~ l 0 P* UPDATE CRN-LINK FOR MOVED INDEX RECORDS ~ v P* ~ P LDKL A12,1 ADD ON E TO CRN ~ P LDR A8,A2 ~ P LDR A9,A3 LAST REC NR MOVED ~
0x37ee54…37efe8 Dummy {f00=0x011a, f01=0x0190, f02=»TE CRN IF SAME FILE CODE ~ P* P LD A1,FDBADF,A5 FDB DATA F * " P CF A14,CRNGET GET CRN BUFFER N & P LD A9,DWTECB,A1 USER ECB ADDR =4 t " P LC A4,ECBFC,A9 USER FILE CODE P CC A4,FDBECB+1,A5 P RF(NE) INS440 OTHRER FILE P ST A10,
0x37efe8…37f17c Dummy {f00=0x011a, f01=0x0190, f02=»DK A1,0 OK RET CODE P LDR A3,A13 BUFFER ADDR P ABL DMTEX2 < P EJECT P * PDEL000 EQU * DELETE INDEX RECORD CONT ^ P LDR A12,A5 USER ECB ADDR P LDR A2,A2 PDEL010 EQU * " P ABL(NZ) DMI030 KEY NOT FOUND P* P*
0x37f17c…37f310 Dummy {f00=0x011a, f01=0x0190, f02=»7 BUFSTA+2-3=ADDR REC NR P LCR A2,A1 P CC A2,ECBCW+3,A12 REC NR 2 P RF(NE) DEL030 WRONG RECORD T P LC A2,1,A1 x P ECR A2,A2 P LC A2,2,A1 REC NR P CW A2,ECBCW,A12 P RF(E) DEL200 RECORD FOUND PDEL030 EQU * P*
0x37f310…37f4a4 Dummy {f00=0x011a, f01=0x018e, f02=»DB INDEX PDEL040 EQU * ( P CF A14,RDNXTR GET NEXT INDEX RECORD $ P RF DEL050 OK P PDEL045 LDR A1,A5 ERROR CODE f P ABL DMI035 ERROR PDEL050 EQU * P* P* CHECK IF RECORD IS USED P* P LDR A13,A3 NEW BUFFER A
0x37f4a4…37f638 Dummy {f00=0x011a, f01=0x0190, f02=» P RB(E) DEL020 USED P LD A4,FDBMRO,A1 ( P ST A4,FDBRRO,A1 LAST REC IN SECTOR 6 P RB DEL040 NEXT REC b P EJECT ~ PDEL200 EQU * RECORD FOUND P* & P* SET RC BIT 6 IF NEXT KEY SAME P* $ P LC A2,ECBFC,A12 USER FILE C
0x37f638…37f7cc Dummy {f00=0x011a, f01=0x0190, f02=»A6 * P RF(NE) DEL220 NOT REQUESTED FILE CODE P CWR A11,A7 KEY LENGTH : $ P RF(NE) DEL220 NEXT KEY NOT SAME X P LDKL A4,/200 $ P ORS A4,ECBRC,A12 NEXT KEY SAME PDEL220 EQU * P* $ P* MOVE UP RECORDS OVER DELETED P*
0x37f7cc…37f960 Dummy {f00=0x011a, f01=0x0190, f02=» P ADR A1,A11 FROM ADDR P LD A2,FDBMRO,A6 & P SU A2,FDBRRO,A6 NR OF CHAR > P CF A14,DMTBM MOVE b P* | P* SET LAST RECORD FREE P* P ADR A3,A11 P SUK A3,1 P LDK A1,0 P SCR A1,A3 STATUS FREE P*
0x37f960…37faf4 (2, 373) Dummy {f00=0x011a, f01=0x018e, f02=» " P LDR A11,A3 FIRST REC NR MOVED P LD A12,FDBRRO,A6 OLD OFFSET * P LD A4,FDBMRO,A6 N P ST A4,FDBRRO,A6 MAX OFFSET f $ P CF A14,GTLGRN LAST REC NR MOVED P LDR A8,A2 P LDR A9,A3 REC NR " P ST A12,FDBRRO,A6 RESET OFFSET P LDK
0x37faf4…37fc88 Dummy {f00=0x011a, f01=0x0190, f02=» ~ $ P RF(NZ) DEL290 NOT FIRST RECORD P LDR A1,A5 FDB 0 P CF A14,GTLGRN GET REC NR F P LDR A1,A2 h P LDR A2,A3 z P LDK A6,0 P LDK A7,1 $ P CF A14,DSUMOD A1,A2 = A1,A2 - 1 P RF(Z) DEL600 FILE START P LDR A6,A5 FDB A
0x37fc88…37fe1c Dummy {f00=0x011a, f01=0x0190, f02=»A14 P ADKL A8,2 ECB ADDR P LDR A12,A12 ( $ P RF(Z) DEL245 BUFFER NOT CHANGED < P* d P* WRITE SECTOR n P* P LDK A7,/95 WRITE WAIT P LKM P DATA 1 P LDR A1,A5 FDB P CF A14,DMTIOZ IO CHECK P LDR A1,
0x37fe1c…37ffb0 Dummy {f00=0x011a, f01=0x018e, f02=»EASE BUFFER ~ P* P* GET PREVIOUS SECTOR P* > P LDR A1,A5 FDB ADDR H P LDK A3,0 d P CF A14,RDNXTR GET SECTOR v P RF DEL250 OK P LDR A6,A1 FDB ADDR P RB DEL045 PDEL250 EQU * P LDR A5,A1 FDB P L
0x37ffb0…380144 Dummy {f00=0x011a, f01=0x018e, f02=» PDEL300 EQU * * P ST A4,FDBRRO,A5 PREVIOS RECORD OFFSET P ADK A4,10 BUFSTA+2 F P ADR A4,A13 RECORD ADDR b & P AD A4,FDBRLE,A5 STATUS CHAR ADDR P LDK A2,/FF P CCR A2,A4 P RB(NE) DEL240 FREE . P LC A2,17,A14 NR OF SAME I
0x380144…3802d8 Dummy {f00=0x011a, f01=0x0190, f02=» v PDEL600 EQU * P LDR A12,A12 $ P RF(Z) DEL900 BUFFER NOT CHANGED 0 P* X P* WRITE SECTOR b P* z PDEL700 EQU * P LDR A8,A14 P ADKL A8,2 ECB ADDR P LDK A7,/95 WRITE WAIT P LKM P DATA 1 P LDR A
0x3802d8…38046c Dummy {f00=0x011a, f01=0x401c, f02=» XIF P END @ LDR A12,A12 $ P RF(Z) DEL900 BUFFER NOT CHANGED 0 P* X P* WRITE SECTOR b P* z PDEL700 EQU * P LDR A8,A14 P ADKL A8,2 ECB ADDR P LDK A7,/95 WRITE WAIT P LKM P DATA 1 P LDR A
0x38046c…380600 Dummy {f00=0x011a, 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* +
0x380600…380794 (2, 374) Dummy {f00=0x011a, f01=0x0000, f02=»
[…0x7…]
0x3812a0…381434 (2, 375) Opaque[0x194]
0x381434…3815c8 # DirEnt {nam=»DMINIT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2358, f03=0x0000}
0x381434…3815c8 IdxSect {
0x381434…3815c8 f00 = 0x011a // 0x381434 @0x0
0x381434…3815c8 f01 = 0x0004 // 0x381436 @0x2
0x381434…3815c8 gno = [ // 0x381438 @0x4
0x381434…3815c8 [0x00]: C0x011a.0x3.0
0x381434…3815c8 [0x01]: C0x011b.0x0.0
0x381434…3815c8 ]
0x381434…3815c8 }
0x3815c8…38175c Dummy {f00=0x011a, f01=0x0190, f02=» 2 P IDENT DMINIT REL 9.2 79-11-16 870105040920 P : P* B 8 P**************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P* DMINIT = DATA MANAGEMENT INITIALIZATION P* P*
0x38175c…3818f0 Dummy {f00=0x011a, f01=0x018e, f02=»FDB:S IN THE FDB AREA z > P* CLEAR THE USE BIT AND THE BUFFER HEADER IN DM BUFFERS 0 P* CLEAR USE BIT AND QUEUE ANCHOR IN TASBLK ` , P* CLEAR DM FILE CODE ENTRIES IN CD:TAB P* , P* DMINIT IS CALLED AS A PFINIT ROUTINE P* " P
0x3818f0…381a84 Dummy {f00=0x011a, f01=0x0190, f02=» P EXTRN FDBSTA P EXTRN FDBEND P EXTRN CURBUF 0 P EXTRN BUFDMI F P EXTRN BUFSNR P EXTRN BUFOR r P EXTRN TASBLK P EXTRN TASQUE P EXTRN CRNQUE,CRNEND P EXTRN CRBUFL P EJECT P* P* P*
0x381a84…381c18 Dummy {f00=0x011a, f01=0x0190, f02=» P* DIV W. 2 FOR 16 K LIMIT P* ( P LDR A5,A4 2 P SRL A5,1 D P LDR A1,A6 V P SRL A1,1 h P CWR A5,A1 z " P RF(G) DMIN40 END OF FDB AREA P STR A4,A3 CHAIN P LDR A3,A4 P RB DMIN30 PDMIN40 EQU * P SUR A
0x381c18…381dac Dummy {f00=0x011a, f01=0x0190, f02=»ALIZATIONS IF POWER FAIL RESTART P* ( P LD A1,INIFLG 2 P RF(Z) DMINEX H P LDKL A2,QFDBFL FDB LENGTH ^ P* $ P* CHAIN FDB:S IN THE FDB AREA P* P LDKL A3,FDBSTA P LDKL A6,FDBEND P CF A15,DMIN30 P*
0x381dac…381f40 Dummy {f00=0x011a, f01=0x0190, f02=» P CF A15,DMIN30 P* < P* CLEAR USE BIT AND BUFFER HEADER WORDS IN DM BUFFERS $ P* d P LDKL A2,/FFFE n P LD A3,CURBUF PDMIN50 LDR* A3,A3 P ANRS A2,A3 CLEAR USE BIT P CM BUFDMI,A3 P CM BUFSNR,A3 P CM BU
0x381f40…3820d4 (2, 376) Dummy {f00=0x011b, f01=0x405a, f02=»LK P CM TASQUE P* PDMINEX EQU * & P RTN A15 : P END J@ V
0x3820d4…382268 Dummy {f00=0x011b, 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
0x382268…3823fc Dummy {f00=0x011b, f01=0x0190, f02=» J F IDENT DMTASS REL 9.2 79-11-16 870105040920 ( $ DMTASSK VTLRN VLVBA VLVRL SECTLEA R VLVBA ~ VLVRL VTLRN SECTLEA TASECB ECBBA ECBRC , (
0x3823fc…382590 Dummy {f00=0x011b, f01=0x018e, f02=» : t TASMXAE TASASB & VOLCHE 8 , ( 7H@ A A " P "" J TASCVO z CLRBUF * & Q H P @ TASVOL ECBFC ECBRL ECBCW
0x382590…382724 Dummy {f00=0x011b, f01=0x0190, f02=» TASVLEP , ( L " TOP A " L TASVRL F , ( B A $ L C & @ $ X TASFIL , ( " A $Q @ A @ DMTRBU , ( ( B * D
0x382724…3828b8 Dummy {f00=0x011b, f01=0x018e, f02=» j , ( G & @ (T , ( a A " 0" : , ( U _ L !SSP !LL j TASCXOS , ( W L @ , A ,V TASSEXR TASXLBP , (
0x3828b8…382a4c Dummy {f00=0x011b, f01=0x0190, f02=» FDBVTO , ( H 4 2% P R 6 X T R FDBMIA# J , ( 8 @ "T R :T @ ( , ( 6 4 2% P QFDBFL , ( = 2 < P % DWTST
0x382a4c…382be0 Dummy {f00=0x011b, f01=0x0190, f02=» E 3 P S F P S FDBRLE " FDBBLF 4 FDBNIF F * & F P S H P S J P % S X FDBKA FDBMEC * & L P & S N @ " S 8 DWTMEC , ( @ P S R B
0x382be0…382d74 (2, 377) Opaque[0x194]
0x382d74…382f08 # DirEnt {nam=»DMTASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2368, f03=0x0000}
0x382d74…382f08 IdxSect {
0x382d74…382f08 f00 = 0x011b // 0x382d74 @0x0
0x382d74…382f08 f01 = 0x0010 // 0x382d76 @0x2
0x382d74…382f08 gno = [ // 0x382d78 @0x4
0x382d74…382f08 [0x00]: C0x011b.0x1.0
0x382d74…382f08 [0x01]: C0x011b.0x2.0
0x382d74…382f08 [0x02]: C0x011b.0x3.0
0x382d74…382f08 [0x03]: C0x011c.0x0.0
0x382d74…382f08 [0x04]: C0x011c.0x1.0
0x382d74…382f08 [0x05]: C0x011c.0x2.0
0x382d74…382f08 [0x06]: C0x011c.0x3.0
0x382d74…382f08 [0x07]: C0x011d.0x0.0
0x382d74…382f08 ]
0x382d74…382f08 }
0x382f08…38309c Dummy {f00=0x011b, f01=0x0190, f02=» 2 P IDENT DMTASS REL 9.2 79-11-16 870105040920 P : P* =3 PR 5141 B P* = 79-04-06 X P* =2 WAIT AT VTOC READ n P* REL 9.1 79-04-06 P* =1, PR 3413 P* REL 9.1 78-10-25 P P P* P* 8 P******
0x38309c…383230 Dummy {f00=0x011b, f01=0x0190, f02=»LE CODE DISC I/O HANDLING z P* " P* , P* 6 P* @ P* J P* T 8 P**************************************************** ^ P* * P* THIS MODULE IS ACTIVATED FROM TASS P* B P* INPUT A2 = TID TASK IDENT OF DMTASK AT
0x383230…3833c4 Dummy {f00=0x011b, f01=0x0190, f02=» ASSIGNED CAN X L P* RECIDE ARE DEFINED. ON THESE VOLUMES THE VTOC:S ARE SEARCHED TO FIND D P* ALL EXTENTS FOR THE FILE TO BE ASSIGNED. FOR EACH EXTENT ITS f > P* FILE-SECTION-NO, FILE-EXTENT-NO,FILE-EXTENT-LENGTH AND . P* FILE-EXTENT-BASE ARE
0x3833c4…383558 Dummy {f00=0x011b, f01=0x0190, f02=»-LENGTH, BLOCKING-FACTOR AND VTOC-REC-NO r P* ARE SAVED TOO. 0 L P* WHEN THE FIRST EXTENT HAS BEEN FOUND EXISTING FDB:S CAN BE SEARCHED J L P* TO CHECK IF THE FILE TO BE ASSIGNED HAS PREVIOUSLY BEEN ASSIGNED TO L P* ANOTHER FILE CODE. IF SO T
0x383558…3836ec Dummy {f00=0x011b, f01=0x0190, f02=»EN A NEW FDB MUST BE INITIALIZED AND THE REST OF THE 4 P* VOLUMES ARE CHECKED TO FIND ALL FILE EXTENTS < P* t 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
0x3836ec…383880 Dummy {f00=0x011b, f01=0x018e, f02=»MTASS P ENTRY VTLRN P ENTRY VLVBA " P ENTRY VLVRL 6 P ENTRY SECTLE J P EJECT ` P* n P***************** x P* EXTERNALS * P***************** P* P EXTRN QTJOB P EXTRN FNDTID,TTB:TD P*
0x383880…383a14 (2, 378) Dummy {f00=0x011b, f01=0x0190, f02=» P EXTRN ECBRL P EXTRN ECBRC P EXTRN ECBCW , P* @ P EXTRN TIODM J P EXTRN DMTGBU ^ P EXTRN DMTRBU t P EXTRN CLRBUF P EXTRN BUFSTA P EXTRN BUFSNR P EXTRN BUFDMI P* P EXTRN QFDBFL P EXTRN
0x383a14…383ba8 Dummy {f00=0x011b, f01=0x0190, f02=»BAS P EXTRN FDBRLE P EXTRN FDBBLF " P EXTRN FDBVTO 8 P EXTRN FDBLRN N P EXTRN FDBNIF,FDBKA d & P EXTRN FDBMIA,FDBAI1,FDBADF,FDBCRL . P EXTRN FDBSNR,FDBMRN,GTLGRN,EXTELE,FDBCEX P EXTRN FDBDBR,FDBMRO . P EXTRN FDBMEC MM
0x383ba8…383d3c Dummy {f00=0x011b, f01=0x0190, f02=» P EXTRN TASCXO P EXTRN TASSEX P EXTRN TASXLB 0 P EXTRN TASFDB F P EXTRN TASVRL P EXTRN TASVLE r P EXTRN TASVRN P EXTRN TASECB P EXTRN TASFIL,TASTID,TASMXA P EXTRN TASSPW,TASFDD,TASTBE P EXTRN TASCA
0x383d3c…383ed0 Dummy {f00=0x011b, f01=0x018e, f02=» PX:B EQU 0 4 PINDXAC EQU 00000 INDEX ACCESS FUNCTIONS WHEN = 1 P* N . P* A PROGRAM VERSION USING TOSS MMU PAGING X * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG EQU 1 P* P EJECT P* P************
0x383ed0…384064 Dummy {f00=0x011b, f01=0x0190, f02=» PVLVRL EQU 14 PVLVER EQU 34 P* , PVTFSNO EQU 8 6 PVTFXNO EQU 10 J PVTFXLE EQU 14 ` PVTFXBA EQU 18 v PVTLRN EQU 21 PVTRLE EQU 24 PVTBLF EQU 26 PVTFIOR EQU 27 PVTNIF EQU 37 PVTKA EQU 38 P*
0x384064…3841f8 Dummy {f00=0x011b, f01=0x0190, f02=»RDS P DATA 0,0 STACK PDMTA14 EQU *-2 $ P EJECT : P* H P************** R P* DMTIOC * h P************** ~ P* : P* ENTRY DMTIOC CHECK RETURN CODES AFTER DISC I/O > P* RETURN TO DMTASX WITH A
0x3841f8…38438c Dummy {f00=0x011b, f01=0x0190, f02=»FF BIT 7 ONLY RETRIES P RF(Z) DMTIOX P ADKL A14,4 4 P ANK A1,/80 H $ P RF(NZ) DMT060 NEW VOLUME LOADED P SUKL A3,BUFSTA , P CM BUFDMI,A3 CLEAR VOL IDENT IN BUFFER P LDK A7,1 P ABL DMTASX DISC I/O ERROR PDMTIOX E
0x38438c…384520 Dummy {f00=0x011b, f01=0x0190, f02=»QU * 8 P LDKL A14,DMTA14 INITIALIZE DMTASK A14 STACK POINTER P ST A2,TASTID TASK IDENT H P CM TASMXA MASTER INDEX ADDR h P ANK A2,/2 P RF(Z) DMT010 NOT FLEXTASC P* & P* PERFORM VOLUME CHECK WITH LOCK P* P LD A8,TAS
0x384520…3846b4 (2, 379) Dummy {f00=0x011b, f01=0x0190, f02=»DR A1,A1 P RF(Z) DMT010 OK P LDK A7,4 VOL UNKNOWN ( P SUR A8,A8 NO BUFFER =3 F P ABL DMTASX f PDMT010 EQU * z P* P LDKL A8,TASECB P* 6 P LD A1,TASCVO OFFSET INTO TASVOL FOR FIRST VOLUME PDMT050 EQU * , P
0x3846b4…384848 Dummy {f00=0x011b, f01=0x0190, f02=» LDKL A2,SECTLE " P ST A2,ECBRL,A8 SECTOR LENGTH P LDK A2,0 > 0 P ST A2,ECBCW,A8 SECTOR #0 VL (VOLUME LABEL) P P* P* 2 P CF A14,DMTGBU GET A DM BUFFER ADDRESS IN A3 P DATA /5700 NOP. READ ALWAYS P ADKL A3,BUFSTA &
0x384848…3849dc Dummy {f00=0x011b, f01=0x0190, f02=»IT =2 P LKM P DATA 1 =2 . P LDKL A14,DMTA14 SET UP A14 STACK POINTER . P CF A14,DMTIOC I/O CHECK ` P LD A2,VLVER,A3 VERSION & P CWK A2,'TO' DTOSS FORMATED DISC? P RF(E) DMT100 YES P LDK A7,8 NO P ABL DMTASX ERRO
0x3849dc…384b70 Dummy {f00=0x011b, f01=0x018e, f02=»3 VTOC BASE . P ST A2,ECBCW,A8 1:ST VTOC SECTOR NO = FSAT & P LD A9,VLVRL,A3 VTOC RECORD LENGTH F P ST A9,TASVRL p P EJECT P* P* SEARCH ALL VTOC:S P* PDMT110 EQU * P LD A6,TASVLE P SUK A6,1 P ST A6
0x384b70…384d04 Dummy {f00=0x011b, f01=0x018e, f02=» P LD A1,TASCVO P SUK A1,2 & P ABL(N) DMT300 ALL VOLUMES CHECKED 0 P ST A1,TASCVO UPDATE TASCVO Z $ P LDK A7,7 TOO MANY FILE SECTIONS ~ P LD A3,TASFIL " P ABL(NZ) DMTASX NOT DATA FILE P LD A3,ECBBA,A8 P SUKL A3,BUFST
0x384d04…384e98 Dummy {f00=0x011b, f01=0x0190, f02=» P* ACTIVATE NEXT DM TASK P* * P ADKL A7,'#D' 4 P LKM J P DATA -4 V P DATA DMTASS f P LKM z P DATA 3 EXIT P EJECT P* & P* READ NEXT VTOC SECTOR AND EXIT P* PDMT115 EQU * P LD A3,ECBBA,A
0x384e98…38502c Dummy {f00=0x011b, f01=0x0190, f02=» LD A1,TASVOL,A1 P CF A14,DMTGBU GET BUFFER P DATA /5700 NOP. READ ALWAYS : P ADKL A3,BUFSTA ^ P ST A3,ECBBA,A8 v P ST A2,ECBCW,A8 P LDK A7,/91 WAIT =2 P LKM P DATA 1 =2 P LDKL A14,DMTA14 P CF A14,DMTIOC
0x38502c…3851c0 Dummy {f00=0x011b, f01=0x0190, f02=» $ P RF(NE) DMT135 NOT MASTER INDEX " P ADKL A11,14 MX FILE NAME ADDR , PDMT135 EQU * R P ADK A3,2 SKIP CYLID f PDMT120 EQU * ( P IM TASVRN INCREMENT VTOC RECORD NO P LDR A4,A3 " P ADR A4,A9 ADDRESS STATUS BYTE P LCR A2,A4
0x3851c0…385354 (2, 380) Dummy {f00=0x011c, f01=0x0190, f02=»AME MAX 4 WORDS PDMT150 EQU * P LDR* A10,A4 , P CWR* A10,A7 @ P ABL(NE) DMT250 NO MATCH T P SUK A2,1 t . P RF(NP) DMT160 ALL 4 FILE NAME WORDS MATCH P ADK A4,2 P ADK A7,2 P RB DMT150 CHECK NEXT WORD P* ( P
0x385354…3854e8 Dummy {f00=0x011c, f01=0x0190, f02=»F(E) DMT165 YES P CCK A2,'LL' LIBRARY FILE ? P ABL(NZ) DMT250 NO < P LDK A2,0 FILE EXTENT NUMBER V P RF DMT167 z . PDMT165 LD A2,VTFSNO,A3 FILE SECTION NUMBER P EJECT PDMT167 EQU * P* . P* GET INFO FROM VTOC AND SAV
0x3854e8…38567c Dummy {f00=0x011c, f01=0x0190, f02=»1,4 P ST A1,TASCXO P RF(NN) DMT170 <= 4 EXTENTS " P LDK A7,9 F * P ABL DMTASX MORE THAN 4 EXTENTS EXIST X PDMT170 EQU * " P ECR A2,A2 TO LEFT HALF OF A2 4 P LC A2,VTFXNO+1,A4 EXT NO INTO RIGHT HALF OF A2 P ST A2,TASSEX,A1
0x38567c…385810 Dummy {f00=0x011c, f01=0x0190, f02=» P LD A2,VTFXBA,A4 EXTENT BASE P ST A2,TASXLB+2,A1 ( P LD A2,TASSEX,A1 B $ P RF(NZ) DMT250 NOT FIRST EXTENT Z P EJECT P* FIRST FILE EXTENT < P* CHECK IF AN FDB DESCRIBING THE FILE ALREADY EXISTS. P* P LD A12,TASFDB
0x385810…3859a4 Dummy {f00=0x011c, f01=0x0190, f02=»A12,FDBSTA PDMT200 EQU * P LDR* A5,A12 & P ANK A5,/01 : P RF(Z) DMT210 FREE N P LD A2,FDBEXT,A12 h P CW A2,TASVOL,A6 " P RF(NE) DMT210 NOT SAME VOLUME P LD A2,FDBVTO,A12 P CW A2,TASVRN $ P RF(NE) DMT210 NOT SAME
0x3859a4…385b38 Dummy {f00=0x011c, f01=0x0190, f02=»DB FOUND n PDMT205 EQU * P LDK A7,5 FILE CODE USED $ P ABL DMTASX D P* X $ PDMT210 LDR* A12,A12 GET NEXT FDB b P ANKL A12,/FFFE ( P RB(NE) DMT200 MORE FDB:S TO SEARCH P* 0 P* NO MATCHING FDB EXIST FIND A FREE FDB
0x385b38…385ccc Dummy {f00=0x011c, f01=0x0190, f02=» v P ANKL A12,/FFFE & P RB(NE) DMT220 MORE FDB:S TO CHECK P LDK A7,3 J P ABL DMTASX NO FDB AVAILABLE ( P* INITIALIZE FDB ZERO FROM FDB+2 P* PDMT230 EQU * P ST A12,TASFDB P LDR A10,A12 P ADKL A10,QFDBFL
0x385ccc…385e60 Dummy {f00=0x011c, f01=0x0190, f02=» RB DMT233 PDMT237 EQU * P LDKL A2,/8000 & P* DEV NOT BUSY < P ST A2,DWTST,A12 T P LDKL A2,TIODM l P ST A2,DWTADR,A12 P LDKL A2,SECTLE P LDR A1,A12 P ADKL A1,FDBECB P ST A2,ECBRL,A1 P LDK A2,/01
0x385e60…385ff4 (2, 381) Dummy {f00=0x011c, f01=0x0190, f02=» P LD A2,VTRLE,A4 P ST A2,FDBRLE,A12 P LC A2,VTBLF,A4 6 P SC A2,FDBBLF,A12 N P LC A2,VTNIF,A4 h P SC A2,FDBNIF,A12 P LD A2,VTKA,A4 P ST A2,FDBKA,A12 P LD A2,TASVRN P ST A2,FDBVTO,A12 P* P IFT M
0x385ff4…386188 Dummy {f00=0x011c, f01=0x0190, f02=» ECB IN FDB l P XIF P* P EJECT * P* 8 P* CHECK NEXT VTOC RECORD B P* d PDMT250 EQU * n 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 P SU A2
0x386188…38631c Dummy {f00=0x011c, f01=0x0190, f02=»* ALL VTOCS IN ALL VOLUMES ARE SEARCHED AT THIS POINT P* @ PDMT300 EQU * J P LDK A3,16 ^ P SU A3,TASCXO p P RF(NZ) DMT310 P LDK A7,6 P RF DMTASX FILE NAME UNKNOWN PDMT310 EQU * P LD A12,TASFDB P RF(NZ) DMT3
0x38631c…3864b0 Dummy {f00=0x011c, f01=0x0190, f02=»ENDING ORDER f 8 P* ACCORDING TO INCREASING SECTOR NO AND EXTENT NO ! P* ! P PDMT320 EQU * ! Z P* ! n @ P* CHECK IF RECORD BUFFERS ARE LARGE ENOUGH FOR INDEX FILE ! x P* ! P LD A6,TASFIL ! P RF(Z) DMT330 DATA FILE ASS ! $ P LD A6,F
0x3864b0…386644 Dummy {f00=0x011c, f01=0x0190, f02=» OK ! P LDK A7,12 " * P RF DMTASX RECORD BUFFER IS TOO SMALL " PDMT330 EQU * " L P LDR A6,A12 " ` P* FDB ADDR " t P ADKL A6,FDBEXT " P LDK A2,0 " P LDR A5,A3 " P SRL A5,2 NUMBER OF EXTENTS " PDMT340 EQU * " P LDK A4,16 "
0x386644…3867d8 Dummy {f00=0x011c, f01=0x0190, f02=»E EXTENTS TO CHECK " ~ P* # , P* THE EXTENT SEARCHED FOR IS NOT FOUND # $ 2 P* CHECK IF RIGHT HALF OF A2 = 0 (EXT-NO = 0) # T P* # P LDR A1,A2 # P ANK A1,/FF # $ P RF(NZ) DMT370 TRY NEXT SECTION # P* # PDMT355 EQU * # P LDK A7,
0x3867d8…38696c Dummy {f00=0x011c, f01=0x0190, f02=» LD A1,TASSEX+2,A4 # P LD A1,TASVOL,A1 $ P ST A1,EXTDMI,A6 $ 2 P LD A1,TASXLB,A4 $ J P ST A1,EXTLEN,A6 $ b P LD A1,TASXLB+2,A4 $ z P ST A1,EXTBAS,A6 $ P ADK A6,6 $ P SUK A5,1 $ & P RF(NP) DMT500 ALL EXTENTS HANDLED $ P* $ : P*
0x38696c…386b00 Dummy {f00=0x011c, f01=0x0190, f02=» A1,3 $ " P RF(NE) DMT380 NOT EXT-NO = 3 % PDMT370 EQU * % 4 P ECR A1,A2 % H P ANK A1,/FF % Z P SUK A1,3 % n P RB(E) DMT355 SECTION-NO = 3 % " P ADK A1,4 INCREMENT SECTION-NO % P ECR A2,A1 EXT-NO = 0 % P RB DMT340 % $ PDMT380 ADK A2,
0x386b00…386c94 (2, 382) Dummy {f00=0x011c, f01=0x018e, f02=»CH WERE UNLOCKED BEFORE % j P* & P LDR A5,A7 & * P LDR A6,A8 SAVE & < P LDK A1,3 LOOP & T PDMTASY EQU * & j P LC A2,TASLFD,A1 FILE CODES & ~ P ANK A2,/FF & P RF(Z) DMTASZ NO CODE & P LDKL A8,TASECB & P SC A2,TASECB+1 & P LDK
0x386c94…386e28 Dummy {f00=0x011c, f01=0x0190, f02=» & P LDR A8,A6 ' P RF DMT401 =1 END ' P* ' 4 ( P* PUT FDB ADDRESS INTO TTAB/CD:TAB ' > P* ' j PDMT400 EQU * ' t P LDK A7,0 ' PDMT401 EQU * =1 ' , P LD A2,TASTBE TTAB/CDTAB FILE CODE ADDR ' P LDR A7,A7 ' P RF(Z) DMT420 CORREC
0x386e28…386fbc Dummy {f00=0x011c, f01=0x018e, f02=»DDR ' t " P RF(Z) DMT410 NO MASTER INDEX ( P INH INH ( 2 ( P LD A2,MXIND SIEZE MASTERINDEXINDEX ( D P SUK A2,2 ( p PDMT405 EQU * ( P SUK A2,4 NEXT OFFSET ( P RF(NN) DMT407 OK ( * P RF DMT408 MASTER INDEX MUST BE FOUND ( PDMT407 CW A4
0x386fbc…387150 Dummy {f00=0x011c, f01=0x0190, f02=» ( ~ PDMT410 EQU * ) P LD A3,TASFDB ) P RF(Z) DMT430 NO FDB USED ) 2 P LDKL A2,/FFFE ) T " P ANRS A2,A3 CLEAR FDB USE BIT ) j P RF DMT430 ) PDMT420 EQU * ) P ST A12,1,A2 FDB ADDR ) PDMT430 EQU * ) P LDR A8,A8 ) P RF(Z) DMT440
0x387150…3872e4 Dummy {f00=0x011c, f01=0x0190, f02=»UF RELEASE ALL FREE BUFFERS ) & P CF A14,TASCAQ CHECK ASSIGN QUEUE * $ $ P CF A15,QTJOB QUEUE CALLING TASK * N P ENB * v P LKM * P DATA 3 * P EJECT * PDMT500 EQU * * P LD A6,TASFIL * P ABL(Z) DMT700 DATA FILE * P IFF INDXAC=1 *
0x3872e4…387478 Dummy {f00=0x011c, f01=0x018e, f02=» EJECT * P* + " P* THIS IS MASTER INDEX LOOP. + 8 P* CONNECT FDB TO FILE CODE IN DMTASK TTAB AND READ + > < P* MASTER INDEX WITH SEQUENTIAL READ ON THIS FILE CODE + z P* + P LD A7,TASTID DMTASK ID + P INH + " P CF A15,FNDTID TTAB ADDR
0x387478…38760c Dummy {f00=0x011c, f01=0x0190, f02=» P SC A3,TASECB+1 , " P ST A3,TTB:TD+2,A2 TTAB ENTRY , P ST A12,TTB:TD+4,A2 FDB ADR , B P LD A3,ECBBA,A8 , f P SUKL A3,BUFSTA , ~ " P CF A14,DMTRBU RELEASE BUFFER , P* , 0 P* CALC NO OF WORDS NEEDED IN MASTRE INDEX , P* , P LD
0x38760c…3877a0 Dummy {f00=0x011c, f01=0x018e, f02=»RR A2,A1 GET MOST SIGN BIT , P ADK A2,5 - " P SRL A2,1 NO OF WORDS NEEDED - 4 P RF(Z) DMT570 WRONG SIZE - X P INH - x P LD A4,MXIND LENGTH MXIND - P SUK A4,4 MAX A5 VALUE - P LDKL A5,-2 OFFSET - PDMT540 EQU * - P ADK A5,4 GET ENTRY -
0x3877a0…387934 (2, 383) Dummy {f00=0x011c, f01=0x0190, f02=» - | P RB(N) DMT540 ENTRY USED . P SUR A6,A2 NO OF SPARE WORDS . ( & P RB(N) DMT540 LARGER ENTRY NEEDED . L P* . v P* SUFFICIENT SPACE FOUND . P* . P LDKL A1,/8000 USED BIT . & P ORS A1,MXIND+2,A5 MARK ENTRY USED . $ P ST A3,TASMXA MAST
0x387934…387ac8 Dummy {f00=0x011c, f01=0x0190, f02=»T A1,2,A3 ENTRY LENGTH . P ADK A3,4 SKIP MX HEADRER / P ST A3,ECBBA,A8 BUFFER ADDR / @ P ST A1,ECBRL,A8 REQ LGTH / d . P LDR A1,A5 MXIND ENTRY PAR TO REACTIVATION / P CWR A1,A4 MXIND ENTRY / P RF(NL) DMT590 LAST ENTRY / P LD A3,MXIND+6,A1
0x387ac8…387c5c Dummy {f00=0x011c, f01=0x0190, f02=»NKL A2,/7FFF REMOVE USE BIT / P SUR A2,A6 0 $ P ORKL A2,/8000 USE BIT 0 6 P ST A2,MXIND+2,A1 0 T . P ADS A6,MXIND+6,A1 MAKE NEXT ENTRY LARGER 0 n $ P LD A7,MXIND,A1 PREVIOUS POINTER 0 P SLL A2,1 NO OF BYTES 0 P ADR A7,A2 0 P ST A7,MXIND+4,A
0x387c5c…387df0 Dummy {f00=0x011c, f01=0x0190, f02=» 0 8 P* OTHER REQ TO THE SAME FILE CODE ARE NOT POSSIBLE 1 < P* BECAUSE AN INDEX FILE MUST ALWAYS BE ASSIGNED COMMON 1 D P* 1 PDMT550 EQU * 1 & P LDK A7,/42 SEQ READ,NOWAIT,NO EA 1 P LKM 1 P DATA -1 1 P DATA DMTAR5 1 P LKM 1 P
0x387df0…387f84 Dummy {f00=0x011c, f01=0x0190, f02=»NKL A2,/FEFF BIT 7 ONLY RETRIES 1 P RF(Z) DMT560 NO ERROR 2 ( P* 2 F " P* REMOVE THE ONLY CRN BUFFER 2 P P* 2 v P LD A4,TASFDB FDB ADDR 2 P LD A5,FDBCRL,A4 CRN BUF ADR 2 P RF(Z) DMT553 NO CRN 2 P CM FDBCRL,A4 2 P INH 2 P LD A6,C
0x387f84…388118 Dummy {f00=0x011c, f01=0x018e, f02=»EADY ,WHOLIE MXINDEX IS READ 2 P LDK A7,7 3 $ PDMT555 SUR A8,A8 NO BUFFER 3 6 P ABL DMTASX DISC IO ERR 3 X PDMT560 EQU * 3 x P* 3 P* RECORD READ,READ NEXRT 3 P* 3 P LD A2,ECBRL,A8 3 P ADS A2,ECBBA,A8 REC LENGTH 3 P RB DMT550
0x388118…3882ac Dummy {f00=0x011c, f01=0x0190, f02=» 3 P* 4 2 P* MASTER INDE X READUY. RERUN FOR INDEX FILE 4 P* 4 H P LDK A1,1 4 R P ST A1,TASFIL INDEX FILE 4 d " P LD A3,TASSPW TTAB ADR DMTASK 4 P CM TTB:TD+2,A3 DELETE ENTRY 4 P CM TTB:TD+4,A3 4 P LD A3,TASFDB FDB ADDR 4 P LDK
0x3882ac…388440 Dummy {f00=0x011c, f01=0x0190, f02=» ENTRY POSSIBLE 4 ~ P LDK A1,0 5 2 P* TASCVO REMAINS ZERO FROM MASTER INDEX LOOP 5 * P ABL DMT050 ASSIGN INDEX 5 ` P EJECT 5 PDMT600 EQU * 5 P* 5 P* INDEX FILE ASSIGN 5 P* 5 P LDK A7,10 RET CODE 5 & P LD A10,TASFDD FDB ADDR
0x388440…3885d4 (2, 384) Dummy {f00=0x011d, f01=0x0190, f02=» LC A3,DWTST,A10 5 P ANK A3,/40 6 & P RF(NZ) DMT639 OTHER REQUEST BUSY 6 , P LDK A3,8 MAX NO OF INDE*2 6 V PDMT620 EQU * 6 x P SUK A3,2 6 $ P RF(N) DMT640 MORE THAN 4 INDEX 6 P LDR A6,A10 6 P ADR A6,A3 6 P LD A2,FDBAI1,A6 6 P RB(
0x3885d4…388768 Dummy {f00=0x011d, f01=0x0190, f02=» 6 X P* 7 P LDK A5,8 NR OF INDEX *2 7 PDMT625 EQU * 7 2 P SUK A5,2 7 F " P RF(N) DMT635 ALL FDB UPPDATED 7 X P LDR A1,A10 FDB DATA 7 ~ P ADR A1,A5 7 $ P LD A3,FDBAI1,A1 FDB ADDR INDEX 7 P RB(Z) DMT625 NO INDEX FILE 7 P LDKL A1,FDBADF
0x388768…3888fc Dummy {f00=0x011d, f01=0x0190, f02=»25 7 PDMT635 EQU * 8 P LC A1,DWTST,A10 8 0 P SC A1,DWTST,A12 SAME BUSY BITS AS DATA FILE 8 6 P ENB ENB 8 j P LD A1,TASMXA 8 | ( P ST A1,FDBMIA,A12 MASTER INDEX ADDR 8 P RF DMT720 8 ( PDMT639 ADK A7,2 A7=13=OTHER REQ BUSY 8 * PDMT640 ADK A
0x3888fc…388a90 Dummy {f00=0x011d, f01=0x0190, f02=»IGN DATA FILE 8 & P ST A12,FDBADF,A12 FDB ADDR TO FDB 9 P LD* A1,TASASB ASBLK ADDR 9 @ P ANKL A1,/6000 9 b P SLL A1,1 9 x $ P ORS A1,FDBDBR,A12 DELAY + BASIC 9 PDMT720 EQU * 9 P* 9 ( P* SET FDBMRN TO MAX REC NO IN FILE 9 P* 9 P L
0x388a90…388c24 Dummy {f00=0x011d, f01=0x018e, f02=»750 9 P AD A2,-2,A1 : P SUKL A1,EXTELE-2 : P ST A1,FDBCEX,A12 : : P SUK A2,1 : T P ST A2,FDBSNR,A12 : f P LDR A1,A12 : " P CF A14,GTLGRN GET LOG REC NO : P LDK A1,0 : " P LC A1,FDBBLF,A12 BLOCK FACTOR : P SUK A1,1 : P ADR
0x388c24…388db8 Dummy {f00=0x011d, f01=0x4154, f02=» P ST A3,FDBMRN+1,A12 ; P* ; 4 P* CALCULATE FDBMRO WHICH IS MAX FDBRRO IN FILE ; * P* ; b P LD A6,FDBRLE,A12 REC LENGTH ; l P ADK A6,1 ; P LDK A7,0 ; P LC A7,FDBBLF,A12 BLOCK FACT ; P SUK A7,1 ; P CF A14,MPYMOD A1,A2=A6*A7 ;
0x388db8…388f4c Dummy {f00=0x011d, 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
0x388f4c…3890e0 Dummy {f00=0x011d, f01=0x0190, f02=»SET FDB FREE < PDMTA40 EQU * = * P CF A14,CLRBUF REMOVE ALL FREE BUFFERS = ( P LDR A1,A7 NEW FDB ADDR = V P ABL(Z) DMTERX NO MORE FDBS = v P IFT INDXAC=1 = P ENB ENB = P* = 4 P* FIND WHICH DMTASK IS NEXT AND ACTIVATE THAT = P* =
0x3890e0…389274 (2, 385) Opaque[0x194]
0x389274…389408 # DirEnt {nam=»DMBUF «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x23a8, f03=0x0000}
0x389274…389408 IdxSect {
0x389274…389408 f00 = 0x011d // 0x389274 @0x0
0x389274…389408 f01 = 0x0008 // 0x389276 @0x2
0x389274…389408 gno = [ // 0x389278 @0x4
0x389274…389408 [0x00]: C0x011d.0x1.0
0x389274…389408 [0x01]: C0x011d.0x2.0
0x389274…389408 [0x02]: C0x011d.0x3.0
0x389274…389408 [0x03]: C0x011e.0x0.0
0x389274…389408 ]
0x389274…389408 }
0x389408…38959c Dummy {f00=0x011d, f01=0x0190, f02=» 0 P IDENT DMBUF REL 9.2 79-11-16 870105040920 P 8 P* @ 8 P**************************************************** J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* . P* DMBUF = DATA MANAGEMENT BUFFER AREAS P* P* P
0x38959c…389730 Dummy {f00=0x011d, 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
0x389730…3898c4 Dummy {f00=0x011d, 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
0x3898c4…389a58 Dummy {f00=0x011d, f01=0x0190, f02=» P EJECT $ PX:A EQU 8 NUMBER OF DISC BUFFERS PQNBUF EQU 00004 : P* R P* PCURBUF DATA BUF1 f PNEWBUF DATA 0 ~ P* P* PBUFLNK EQU 0 2 PBUF1 DATA BUF2 BUFFER LINK STATUS IN BIT 15 PBUFDMI EQU *-BUF1 DMI
0x389a58…389bec Dummy {f00=0x011d, f01=0x0190, f02=» LRU-WORD " P DATA 0 BUFFER STATUS,DM ORDER ( PBUFSTA EQU *-BUF1 DATA BUFFER START 8 P RES 205 d P* t P* ~ P IFT QNBUF=1 PBUF2 EQU BUF1 P XIF P* P* P IFF QNBUF=1 PBUF2 DATA BUF3 P DATA 0,0,0
0x389bec…389d80 Dummy {f00=0x011d, f01=0x018e, f02=»NBUF=1 P IFF QNBUF=2 PBUF3 DATA BUF4 " P DATA 0,0,0 8 P RES 205 L P XIF P* h P* r P IFT QNBUF=3 | PBUF4 EQU BUF1 P XIF P* P* P IFF QNBUF=1 P IFF QNBUF=2 P IFF QNBUF=3 PBUF4 D
0x389d80…389f14 (2, 386) Dummy {f00=0x011d, f01=0x0190, f02=» P* P* P IFF QNBUF=1 P IFF QNBUF=2 , P IFF QNBUF=3 @ P IFF QNBUF=4 T PBUF5 DATA BUF6 h P DATA 0,0,0 ~ P RES 205 P XIF P* P* P IFT QNBUF=5 PBUF6 EQU BUF1 P XIF P* P*
0x389f14…38a0a8 Dummy {f00=0x011d, f01=0x018e, f02=»0 P RES 205 P XIF P* & P* 0 P IFT QNBUF=6 : PBUF7 EQU BUF1 N P XIF d P* p P* z 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 BU
0x38a0a8…38a23c Dummy {f00=0x011d, f01=0x018e, f02=» P* P IFF QNBUF=1 P IFF QNBUF=2 & P IFF QNBUF=3 : P IFF QNBUF=4 N P IFF QNBUF=5 b P IFF QNBUF=6 v P IFF QNBUF=7 PBUF8 DATA BUF9 P DATA 0,0,0 P RES 205 P XIF P* P* P IFT QNBUF=8
0x38a23c…38a3d0 Dummy {f00=0x011d, f01=0x0190, f02=» P IFF QNBUF=5 P IFF QNBUF=6 P IFF QNBUF=7 , P IFF QNBUF=8 @ PBUF9 DATA BUF10 T P DATA 0,0,0 l P RES 205 P XIF P* P* P IFT QNBUF=9 PBUF10 EQU BUF1 P XIF P* P* P IFF QNBUF=1
0x38a3d0…38a564 Dummy {f00=0x011d, f01=0x0190, f02=»=8 P IFF QNBUF=9 PBUF10 DATA BUF11 P DATA 0,0,0 6 P RES 205 J P XIF Z P IFT QNBUF=10 f PBUF11 EQU BUF1 | P XIF P* P* P IFF QNBUF=1 P IFF QNBUF=2 P IFF QNBUF=3 P IFF QNBUF=4 P IFF Q
0x38a564…38a6f8 Dummy {f00=0x011d, f01=0x0190, f02=» P DATA 0,0,0 P RES 205 P XIF ( P IFT QNBUF=11 4 PBUF12 EQU BUF1 J P XIF ` P* l P* v P IFF QNBUF=1 P IFF QNBUF=2 P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5 P IFF QNBUF=6 P IFF QNBUF=7
0x38a6f8…38a88c Dummy {f00=0x011d, f01=0x018e, f02=» 205 P XIF P IFT QNBUF=12 PBUF13 EQU BUF1 . P XIF D P* P P* Z P IFF QNBUF=1 d P IFF QNBUF=2 x 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
0x38a88c…38aa20 Dummy {f00=0x011d, f01=0x0190, f02=» P XIF P IFT QNBUF=13 PBUF14 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
0x38aa20…38abb4 (2, 387) Dummy {f00=0x011d, f01=0x018e, f02=» P RES 205 P XIF P IFT QNBUF=14 $ PBUF15 EQU BUF1 : P XIF P P* P* f P IFF QNBUF=1 p 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
0x38abb4…38ad48 Dummy {f00=0x011d, f01=0x0190, f02=» PBUF15 DATA BUF16 P DATA 0,0,0 P RES 205 0 P XIF @ P IFT QNBUF=15 L PBUF16 EQU BUF1 b P XIF x 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
0x38ad48…38aedc Dummy {f00=0x011d, f01=0x0190, f02=»FF QNBUF=13 P IFF QNBUF=14 P IFF QNBUF=15 * PBUF16 DATA BUF1 @ P DATA 0,0,0 X P RES 205 l P XIF | P EJECT P* P************** P* DMTGBU * P************** P* * P* ENTRY DMTGBU GET A D
0x38aedc…38b070 Dummy {f00=0x011d, f01=0x0190, f02=»ER t P* $ P* OUTPUT A3 = BUFFER ADDRESS J P* SKIP RETURN (+2) IF SECTOR MUST BE READ INTO BUFFER AT A3 < , P* A5 AND A7 WILL BE DESTROYED P* 8 P* CURBUF, BUFDMI, -FC AND -SNR WILL BE SET < P*
0x38b070…38b204 Dummy {f00=0x011d, f01=0x0190, f02=»* SEARCHED 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
0x38b204…38b398 Dummy {f00=0x011d, f01=0x0190, f02=») DMT020 WRONG VOLUME P CW A2,BUFSNR,A3 P RF(E) DMT050 SAME SECTOR NO 6 PDMT020 EQU * Z P LDK A7,/01 n & 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,/F
0x38b398…38b52c Dummy {f00=0x011d, f01=0x0190, f02=»T A3,NEWBUF PDMT041 EQU * P CW A3,CURBUF ( * P RB(NE) DMT010 MORE BUFFERS TO SERARCH > P LDR A5,A5 l P RF(NZ) DMT043 BUFFER FOUND ~ P LDK A1,3 LAMP 10 AND 11 P CF A15,HALT NO MORE BUFFERS PDMT043 LD A3,NEWBUF P*
0x38b52c…38b6c0 Dummy {f00=0x011d, f01=0x0190, f02=» t " P ST A2,BUFSNR,A3 SECTOR NUMBER PDMT050 EQU * . " P CM BUFOR,A3 RESET OLD-COUNTER B P ST A3,CURBUF h P LDK A7,/01 ~ ( P ORRS A7,A3 SET STATUS USED BIT 15 P ENB ENB P RTN A14 P EJECT P* P**************
0x38b6c0…38b854 (2, 388) Dummy {f00=0x011e, f01=0x0190, f02=» BUFFER ADDRESS P* A2 IS DESTROYED P* < P* F PDMTRBU EQU * P P LDKL A2,/FFFE d P ANRS A2,A3 SET OFF BIT 15 z P RTN A14 P* P* ( PCLRBUF EQU * CLEAR ALL FREE BUFFERS @ P****************************
0x38b854…38b9e8 Dummy {f00=0x011e, f01=0x40b4, f02=» P AN A2,BUFLNK,A3 P RF(NZ) DMT750 USED P CM BUFDMI,A3 REMOVE 8 PDMT750 CW A3,CURBUF T P RB(NE) DMT700 MORE BUFFERS p P RTN A14 P END @ P* ( PCLRBUF EQU * CLEAR ALL FREE BUFFERS @ P****************************
0x38b9e8…38bb7c Dummy {f00=0x011e, 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
0x38bb7c…38bd10 Dummy {f00=0x011e, f01=0x018e, f02=»U * CLOSE A FILE P LDK A4,0 PTIOC10 EQU * * $ P ST A4,FDBRRO,A6 MARK ORDER TYPE > P LDK A2,0 f , P ST A2,FDBSNR,A6 SECTOR #0 VOLUME LABLE x P* ( P* LET FDBCEX POINT TO FIRST EXTENT P* P LDR A4,A6 P ADK A4,FDBEXT
0x38bd10…38bea4 Dummy {f00=0x011e, f01=0x0190, f02=» P LDR A1,A6 FDB ADDR 0 P LDKL A2,/C000 REMOVE BUFFERS FOR THIS TASK P CF A14,EARELB T PREL090 EQU * j P LDK A1,0 CORRECT RETURN ~ P ABL TIODME P EJECT ( PSETLRN EQU * SET LAST RECORD NUMBER P LC A1,ECBCW+3,A8 P S
0x38bea4…38c038 Dummy {f00=0x011e, f01=0x0190, f02=»DATA REC p P RF GET010 . PGETCUX LDK A7,CRNCIF+1 GET CURR INDEX REC " PGET010 LDR A1,A6 FDB ADDR T " P CF A14,CRNGET GET CRN BUFFER v P ADR A7,A2 ADDR CURR REC NO P LDK A2,0 P LC A3,-1,A7 FILE CODE P CC A3,ECBFC,A8 P
0x38c038…38c1cc Dummy {f00=0x011e, f01=0x0190, f02=»REC NO ~ P LD A2,1,A7 PGET030 EQU * " P ST A2,ECBCW,A8 6 P RB REL090 N P EJECT ` " PSEQREAD EQU * SEQUENTIAL READ n P* $ P* FIND CRN+1 AND TEST IF > LRN P* P LDR A1,A6 FDB ADDR " P CF A14,CRNGET GET CRN-BUFFE
0x38c1cc…38c360 Dummy {f00=0x011e, f01=0x018e, f02=»ERFLOW P RF SEQR20 PSEQR10 EQU * " P ANKL A2,/7FFF REMOVE OVERFLOW 4 P ADK A1,1 ADD CARRY Z PSEQR20 EQU * v P SC A1,ECBCW+3,A8 REC NO P ST A2,ECBCW,A8 P* $ P* CONTINUE AS FOR RANDOM READ P* P EJECT
0x38c360…38c4f4 (2, 389) Opaque[0x194]
0x38c4f4…38c688 # DirEnt {nam=»DMFDB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x23c8, f03=0x0000}
0x38c4f4…38c688 IdxSect {
0x38c4f4…38c688 f00 = 0x011e // 0x38c4f4 @0x0
0x38c4f4…38c688 f01 = 0x0004 // 0x38c4f6 @0x2
0x38c4f4…38c688 gno = [ // 0x38c4f8 @0x4
0x38c4f4…38c688 [0x00]: C0x011e.0x1.0
0x38c4f4…38c688 [0x01]: C0x011e.0x2.0
0x38c4f4…38c688 ]
0x38c4f4…38c688 }
0x38c688…38c81c Dummy {f00=0x011e, f01=0x0190, f02=» 0 P IDENT DMFDB REL 9.2 79-11-16 870105040920 P 8 P @ P* H P* R 8 P**************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* , P* DMFDB = FILE DESCRIPTOR BLOCKS FDB P*
0x38c81c…38c9b0 Dummy {f00=0x011e, f01=0x0190, f02=»TE FDB AREA H P* BY MEANS OF CONDITIONAL ASSEMBLY QFDBAR WORDS WILL BE ALLOCATED P* ` P ENTRY FDBSTA j P ENTRY FDBEND P ENTRY QFDBFL P ENTRY CRNQUE,CRBUFL P ENTRY CRNEND P ENTRY MXIND P EJECT P* 6
0x38c9b0…38cb44 Dummy {f00=0x011e, f01=0x0190, f02=»REA r " PCRBUFL EQU 12 SIZE CRN BUFFER P* 2 < P* CRNBAR IS THE SIZE OF THE CRN BUFFER ARERA IN WORDS < 4 P* WHERE CRBUFL BYTES ARE USED FOR EACH BUFFER | P* PX:B EQU 50 " PCRNBAR EQU 00360 CURRENCY AREA P* P*
0x38cb44…38ccd8 Dummy {f00=0x011e, f01=0x0190, f02=» P* PQFDBAR EQU 00684 P* & PX:D EQU 96 0 ( PQFDBFL EQU 00114 FDB FIX PART LENGTH B P* n P EJECT x P* PFDBSTA EQU * P RES QFDBAR PFDBEND EQU * PCRNQUE DATA 0 CRN LINK ROOT P RES CRNBAR PCRNE
0x38ccd8…38ce6c Dummy {f00=0x011e, f01=0x410a, f02=» IFF MXSIZ=0 * 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 B P XIF p PMXINDE EQU * END INDEX INDEX | 2 P DATA 0,0 SIGNIFICANT ZEROES AFTER INDEXINDEX PMXAR EQU * P RES MXSIZ P END @
0x38ce6c…38d000 Dummy {f00=0x011e, 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*
0x38d000…38d194 (2, 390) Dummy {f00=0x011e, f01=0x0190, f02=»MAX 4 WORDS | PDMT150 EQU * P LDR* A10,A4 ( P CWR* A10,A7 < P ABL(NE) DMT250 NO MATCH P P SUK A2,1 p . P RF(NP) DMT160 ALL 4 FILE NAME WORDS MATCH P ADK A4,2 P ADK A7,2 P RB DMT150 CHECK NEXT WORD P* ( P*
0x38d194…38d328 Dummy {f00=0x011e, f01=0x0190, f02=» DMT165 YES P CCK A2,'LL' LIBRARY FILE ? P ABL(NZ) DMT250 NO 8 P LDK A2,0 FILE EXTENT NUMBER R P RF DMT167 v . PDMT165 LD A2,VTFSNO,A3 FILE SECTION NUMBER P EJECT PDMT167 EQU * P* . P* GET INFO FROM VTOC AND SAVE IN
0x38d328…38d4bc Dummy {f00=0x011e, f01=0x0190, f02=» P ST A1,TASCXO P RF(NN) DMT170 <= 4 EXTENTS P LDK A7,9 B * P ABL DMTASX MORE THAN 4 EXTENTS EXIST T PDMT170 EQU * " P ECR A2,A2 TO LEFT HALF OF A2 4 P LC A2,VTFXNO+1,A4 EXT NO INTO RIGHT HALF OF A2 P ST A2,TASSEX,A1
0x38d4bc…38d650 Dummy {f00=0x011e, f01=0x0190, f02=» LD A2,VTFXBA,A4 EXTENT BASE P ST A2,TASXLB+2,A1 $ P LD A2,TASSEX,A1 > $ P RF(NZ) DMT250 NOT FIRST EXTENT V P EJECT ~ P* FIRST FILE EXTENT < P* CHECK IF AN FDB DESCRIBING THE FILE ALREADY EXISTS. P* P LD A12,TASFDB *
0x38d650…38d7e4 Dummy {f00=0x011e, f01=0x0190, f02=»FDBSTA PDMT200 EQU * P LDR* A5,A12 " P ANK A5,/01 6 P RF(Z) DMT210 FREE J P LD A2,FDBEXT,A12 d P CW A2,TASVOL,A6 ~ " P RF(NE) DMT210 NOT SAME VOLUME P LD A2,FDBVTO,A12 P CW A2,TASVRN $ P RF(NE) DMT210 NOT SAME VTOC
0x38d7e4…38d978 Dummy {f00=0x011e, f01=0x0190, f02=»OUND j PDMT205 EQU * P LDK A7,5 FILE CODE USED P ABL DMTASX @ P* T $ PDMT210 LDR* A12,A12 GET NEXT FDB ^ P ANKL A12,/FFFE ( P RB(NE) DMT200 MORE FDB:S TO SEARCH P* 0 P* NO MATCHING FDB EXIST FIND A FREE FDB P
0x38d978…38db0c Dummy {f00=0x011e, f01=0x0190, f02=» P ANKL A12,/FFFE & P RB(NE) DMT220 MORE FDB:S TO CHECK P LDK A7,3 F P ABL DMTASX NO FDB AVAILABLE X ( P* INITIALIZE FDB ZERO FROM FDB+2 | P* PDMT230 EQU * P ST A12,TASFDB P LDR A10,A12 P ADKL A10,QFDBFL P
0x38db0c…38dca0 Dummy {f00=0x011e, f01=0x0190, f02=»DMT233 PDMT237 EQU * P LDKL A2,/8000 " P* DEV NOT BUSY 8 P ST A2,DWTST,A12 P P LDKL A2,TIODM h P ST A2,DWTADR,A12 ~ P LDKL A2,SECTLE P LDR A1,A12 P ADKL A1,FDBECB P ST A2,ECBRL,A1 P LDK A2,/01 P
0x38dca0…38de34 (2, 391) Opaque[0x194]
0x38de34…38dfc8 # DirEnt {nam=»DFTAB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x23d8, f03=0x0000}
0x38de34…38dfc8 IdxSect {
0x38de34…38dfc8 f00 = 0x011e // 0x38de34 @0x0
0x38de34…38dfc8 f01 = 0x0002 // 0x38de36 @0x2
0x38de34…38dfc8 gno = [ // 0x38de38 @0x4
0x38de34…38dfc8 [0x00]: C0x011e.0x3.0
0x38de34…38dfc8 ]
0x38de34…38dfc8 }
0x38dfc8…38e15c Dummy {f00=0x011e, f01=0x0190, f02=» 0 P IDENT DFTAB REL 9.2 79-11-16 870105040920 P 8 P* @ 8 P**************************************************** J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* & P* DFTAB = DISC FILE CODE TABLE P* P* P* LEVE
0x38e15c…38e2f0 Dummy {f00=0x011e, f01=0x40ce, f02=»** ^ P* P* DISC FILE CODE TABLE P* 4 P ENTRY DFTAB > P ENTRY DFTABE R P* h P* r PDFTAB EQU * | P DATA /F8F9,/FAFB PDFTABE EQU * P END @ DISC FILE CODE TABLE P* P* P* LEVE
0x38e2f0…38e484 Dummy {f00=0x011e, 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*
0x38e484…38e618 Dummy {f00=0x011e, f01=0x0190, f02=»-LENGTH, BLOCKING-FACTOR AND VTOC-REC-NO r P* ARE SAVED TOO. 0 L P* WHEN THE FIRST EXTENT HAS BEEN FOUND EXISTING FDB:S CAN BE SEARCHED J L P* TO CHECK IF THE FILE TO BE ASSIGNED HAS PREVIOUSLY BEEN ASSIGNED TO L P* ANOTHER FILE CODE. IF SO T
0x38e618…38e7ac Dummy {f00=0x011e, f01=0x0190, f02=»EN A NEW FDB MUST BE INITIALIZED AND THE REST OF THE 4 P* VOLUMES ARE CHECKED TO FIND ALL FILE EXTENTS < P* t 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
0x38e7ac…38e940 Dummy {f00=0x011e, f01=0x018e, f02=»MTASS P ENTRY VTLRN P ENTRY VLVBA " P ENTRY VLVRL 6 P ENTRY SECTLE J P EJECT ` P* n P***************** x P* EXTERNALS * P***************** P* P EXTRN QTJOB P EXTRN FNDTID,TTB:TD P*
0x38e940…38ead4 (2, 392) Opaque[0x194]
0x38ead4…38ec68 # DirEnt {nam=»DMSUBX«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x23e0, f03=0x0000}
0x38ead4…38ec68 IdxSect {
0x38ead4…38ec68 f00 = 0x011f // 0x38ead4 @0x0
0x38ead4…38ec68 f01 = 0x000c // 0x38ead6 @0x2
0x38ead4…38ec68 gno = [ // 0x38ead8 @0x4
0x38ead4…38ec68 [0x00]: C0x011f.0x0.0
0x38ead4…38ec68 [0x01]: C0x011f.0x1.0
0x38ead4…38ec68 [0x02]: C0x011f.0x2.0
0x38ead4…38ec68 [0x03]: C0x011f.0x3.0
0x38ead4…38ec68 [0x04]: C0x0120.0x0.0
0x38ead4…38ec68 [0x05]: C0x0120.0x1.0
0x38ead4…38ec68 ]
0x38ead4…38ec68 }
0x38ec68…38edfc Dummy {f00=0x011f, f01=0x0190, f02=» 2 P IDENT DMSUBX REL 9.2 79-11-16 870105040920 P : P* B 8 P**************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P* DMSUBX = DM-ROUTINES FOR INDEXED REQUESTS P* P*
0x38edfc…38ef90 Dummy {f00=0x011f, f01=0x0190, f02=»ROM :***************** r P* P* DMTASK ( P* : P*************** D P* ENTRIES * P*************** t P* P ENTRY FNDKMX,CHKKEY P ENTRY RDNXTR P ENTRY FNDKEY P ENTRY CRNUPD P* P**********
0x38ef90…38f124 Dummy {f00=0x011f, f01=0x0190, f02=»DBRLE,FDBSNR,ECBCW l . P EXTRN FDBRRO,FDBCEX,FDBBLF,EXTBAS,BUFSNR . P EXTRN FDBLRN,FDBMRO,FDBCRL,FDBADF,CRNCIF L 4 P EXTRN DMTIOT,GTLGRN,GTBKBU,ADDMOD,CALSNO,DMTRBU ~ P EXTRN DMTIOZ P EJECT 8 P****DESCRIPTION*******************************
0x38f124…38f2b8 Dummy {f00=0x011f, f01=0x0190, f02=»1 ALG. U. ` 4 P* THE SEARCH KEY MAY BE TERMINATED WITH A /EE. 0 P* THE FIRST TWO WORDS IN MASTER INDEX IS : J P* - NO OF ENTRIES N ~ $ P* - NO OF CHARACTERS PER ENTRY P* 8 P****ENTRY PARAMETERS********************************
0x38f2b8…38f44c Dummy {f00=0x011f, f01=0x0190, f02=»CF A14,FNDKMX P* 8 P****EXIT PARAMETERS********************************* " P* ^ 0 P* A1,A2 = LODGICAL RECORD NO IN INDEX FILE h P* A8,A11= UNCHANGED P* 8 P****USED REGISTERS********************************** P*
0x38f44c…38f5e0 Dummy {f00=0x011f, f01=0x0190, f02=»9,A2 P ANKL A9,/1 GET BIT 15 P SRA A2,1 * 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 P LDR* A7,A5 ENTRY LENGTH P LDR A6,A9 I P SUK A6,1 $ P
0x38f5e0…38f774 (2, 393) Dummy {f00=0x011f, f01=0x0190, f02=»25 EQU * " P ADR A2,A5 ADD MI BASE ADR - 2 P ADK A2,2 ENTRY KEY ADR 6 P LDR A1,A2 SAVE ENTRY ADR V P LDR A3,A8 SEARCH KEY ADR x P LDR A6,A11 MAX KEY LENGTH P LDK A7,0 CHAR ADR P CF A14,CHKKEY COMPARE KEYS P LDR A7,A10 M
0x38f774…38f908 Dummy {f00=0x011f, f01=0x0190, f02=» v . P RF(NG) FND040 SEARCHED KEY LESS OR EQUAL P* : P* SEARCHED KEY GREATER D P* d P LDR A10,A10 M n P RF(Z) FND050 SEARCH READY P ADR A9,A6 I=I+(M/2 CEIL) PFND030 EQU * P LDR A10,A7 M=M/2 FLOOR P RB FND020
0x38f908…38fa9c Dummy {f00=0x011f, f01=0x0190, f02=»D045 EQU * NO MASTER INDEX P LDK A1,0 " P LDK A2,1 REC NR 1 4 P RF FND070 N PFND050 EQU * ` P ADR* A1,A5 ARDR NEXT ENTRY t PFND060 EQU * P LDR A3,A1 ENTRY ADR P SUK A3,3 P ADR* A3,A5 ADR REC NO P* P* MO
0x38fa9c…38fc30 Dummy {f00=0x011f, f01=0x0190, f02=»2,A2 P LCR A2,A3 PFND070 EQU * P RTN A14 2 P EJECT B 8 P****DESCRIPTION************************************* P P* D P* CHKKEY COMPARE TWO CHARACTER STRINGS. THE SEARCH KEY MAY BE P* TERMINATED WITH A /EE. P* 8
0x38fc30…38fdc4 Dummy {f00=0x011f, f01=0x0190, f02=» * P* A6 = MAX NO OF CAHARACTERS IN KEY 2 P* A7 = REL NO OF FIRST CHAR TO CHECK IN KEY 2 P* h P* CF A14,CHKKEY r P* 8 P****EXIT PARAMETERS********************************* P* : P* A3 = 0 WHEN SEARCED KEY IS CONTAINED I
0x38fdc4…38ff58 Dummy {f00=0x011f, f01=0x0190, f02=»CHAR TO CHECK = NO OF SAME CHARACTERS IN WHOLE KEY x " P* A6 = MAX NO OF CHAR IN KEY : P* ` 8 P****USED REGISTERS********************************** j P* P* A2-A4,A6-A7 < P******************************************************** P
0x38ff58…3900ec Dummy {f00=0x011f, f01=0x0190, f02=»CR A4,A3 SEARCED KEY CHAR P CCK A4,/EE00 " " P RF(E) CHK060 END OF KEY CHAR 8 P CCR A4,A2 SC=EC? ^ P RF(G) CHK100 SC GT TH EC x " P RF(L) CHK120 SC LESS THAN EC P ADK A7,1 NO OF SAME CHAR P CWR A7,A6 NO OF CHAR $ P RF(NL)
0x3900ec…390280 Dummy {f00=0x011f, f01=0x0190, f02=» LDK A3,0 FOUND P RF CHK140 PCHK120 EQU * * $ P LDKL A3,-1 SEARCHED KEY SMALLER > P RF CHK140 f PCHK100 EQU * x $ P LDK A3,1 SEARCHED KEY SGREATER PCHK140 EQU * P RTN A14 P EJECT 8 P****DESCRIPTION*******************
0x390280…390414 (2, 394) Dummy {f00=0x011f, f01=0x0190, f02=»WHEN NO RECORD IS READ BEFORE, THE FIRST RECORD IN SPECIFIED & P* SECTOR WILL BE MADE AVAILABLE D P* n 8 P****ENTRY PARAMETERS******************************** x P* : P* A1 = FDB ADDRESS FOR CURRENT RECORD (BEFORE NEXT) P* FDB
0x390414…3905a8 Dummy {f00=0x011f, f01=0x0190, f02=»NTED ` : P* A3 = ADDRESS OF BLOCK BUFFER FROM PREVIOUS CALL IN > P* SAME DM-REQUEST. =0 WHEN NO BYUFFER IS ALLOCATED J P* A8 = ECB ADDRESS P* 8 P****EXIT PARAMETERS********************************* P* 2 P* RETURN AT AD
0x3905a8…39073c Dummy {f00=0x011f, f01=0x018e, f02=»DE FOM PHYS I/O) WHEN NO BUFFER IS ALLOCATED r $ P* A2 = FDBRRO = RECORD OFFSET 4 P* A3 = BUFFER ADDRESS * P* = 0 WHEN NO BUFFER IS ALLOCATED | P* A8 = ECB ADDRESS P* 8 P****USED REGISTERS**********************************
0x39073c…3908d0 Dummy {f00=0x011f, f01=0x0190, f02=» X P EJECT PRDNXTR EQU * P LDR A10,A3 SAVE BUFFER ADDR * P RF(NZ) RDN200 BUFFER EXIST N P STR A7,A14 r P SUKL A14,4 P ST A6,2,A14 P* P* GET A BUFFER P* PRDN040 EQU * & P CF A14,GTBKBU GET BLOCKBU
0x3908d0…390a64 Dummy {f00=0x011f, f01=0x0190, f02=»DR A10,A3 BUFFER ADDR $ P LDK A7,/91 PHYS READ WITH WAIT P LKM F P DATA 1 R & P CF A14,DMTIOZ CHECK RETURN CODES b P LDR A1,A1 P RF(NZ) RDN900 ERROR P LDR A1,A6 FDB ADDR PRDN080 EQU * P LDR A6,A1 FDB ADDR P L
0x390a64…390bf8 Dummy {f00=0x011f, f01=0x0190, f02=»RDN200 EQU * $ P LD A2,FDBRRO,A1 REC ORD OFFSET P RF(NN) RDN220 NOT FIRST REC < P STR A7,A14 ` P SUKL A14,4 t P ST A6,2,A14 P RB RDN080 FIRST REC WANTED P* : P* CHECK IF THIS OFFSET POINTS TO LAST REC IN BUFFER P
0x390bf8…390d8c Dummy {f00=0x011f, f01=0x0190, f02=»EC IN CURRENT BLOCKBUFFER P* " $ P AD A2,FDBRLE,A1 RECOR D LENGTH , P ADK A2,1 STATUS CHAR T P ST A2,FDBRRO,A1 NEW OFFSET r P RF RDN950 RETURN P* 4 P* CHECK IF THIS RECORD ALSO IS LAST IN EXTENT P* PRDN300 EQU *
0x390d8c…390f20 Dummy {f00=0x011f, f01=0x0190, f02=» AD A5,EXTLEN,A3 EXTENT LENGTH P SUK A5,1 & $ P CW A5,FDBSNR,A1 SECT NO CURRENT 8 , P RF(NG) RDN400 IT WAS LAST REC IN EXTENT ` P* P* NEW SECTOR P* P IM FDBSNR,A1 SECT NO P LDR A6,A1 FDB ADDR P RF RDN500 P*
0x390f20…3910b4 (2, 395) Dummy {f00=0x011f, f01=0x0190, f02=» NO v P LDR A1,A2 P LDR A2,A3 P LDK A6,0 0 P LDK A7,1 B P CF A14,ADDMOD NEXT REC NO T P LDR A6,A5 RESTORE FDB ADDR v * P CF A14,CALSNO GET NEXT REC ADDR PHYS P LDR A8,A13 $ P LDR A1,A1 CHECK EN D OF MEDIUM P RF(
0x3910b4…391248 Dummy {f00=0x011f, f01=0x0190, f02=» x " P CF A14,DMTRBU RELEASE BUFFER P LDR A1,A6 FDB ADDR . P RB RDN040 NEXT SECTOR J P* h P* EXIT r P* PRDN900 EQU * P LDR A5,A1 RET CODE P LDR A1,A6 FDB ADDR P LDR A3,A10 BUFFER ADDR P RF(Z) RDN960 NO
0x391248…3913dc Dummy {f00=0x011f, f01=0x0190, f02=»ER ADDR PRDN940 EQU * P LD A6,2,A14 $ P ADKL A14,4 8 P LDR* A7,A14 L PRDN950 EQU * ` P RTN A14 t P EJECT 8 P****DESCRIPTION************************************* P* > P* FNDKEY WILL READ THE FIRST USED INDEX RECORD
0x3913dc…391570 Dummy {f00=0x011f, f01=0x0190, f02=»ENTRY PARAMETERS******************************** P* 8 P* A1 = FDB ADDRESS B P* A8 = SEARCH KEY ADDR ^ & P* A11 = NO OF CHARACTERS IN KEY ~ " P* A13= PHYSICAL ECB ADDRESS P* 8 P****EXIT PARAMETERS*****************************
0x391570…391704 Dummy {f00=0x011f, f01=0x0190, f02=» 2 P* = /4000 WHEN NEXT HIGHER KEY IS FOUND . P* = RETURN CODE WHEN KEY IS NOT FOUND : 4 P* BIT 1 CAN NEVBER BE SET BY DISC DRIVER l P* A3 = BUFFER ADDRESS & P* = 0 WHEN NO RECORD IS FOUND " P* A7 = NO OF SAME CHARAC
0x391704…391898 Dummy {f00=0x011f, f01=0x0190, f02=»**** ` P* , P* A1 - A11,A13 + 4 WORDS ON A14 STACK P* F : P****************************************************** P P EJECT PFNDKEY EQU * P* & P* FIRST SEARCH THE NMASTER INDEX P* * P LD A5,FDBMIA,A1 ADDR OF M
0x391898…391a2c Dummy {f00=0x011f, f01=0x0190, f02=» GET KEY ENTRY IN MASTER INDEX P LD A6,8,A14 FDB ADDR & P CF A14,CALSNO GET PHYS ADDR D P LDR A1,A1 h P RF(NZ) FKY900 ERROR z P LDR A1,A6 FDBADDR " P LDR A6,A11 NO OF CHAR IN KEY $ P LDK A7,0 START CHAR KEY SEARCH & P SUR A9,A9
0x391a2c…391bc0 Dummy {f00=0x011f, f01=0x018e, f02=»ECORD v P RF FKY150 P LDR A1,A5 RET CODE P RF FKY900 ERROR EXIT < P* Z " P* BUFFER AND ADATA IS FOUND d P* PFKY150 EQU * P LDR A9,A3 BUFFER ADDR P ADR A2,A3 BUFFER ADR P ADK A2,10 REC ADDR P LDR A10
0x391bc0…391d54 (2, 396) Dummy {f00=0x0120, f01=0x0190, f02=» P RF(E) FKY200 USED RECORD P* & & P* NO MORE RECORDS IN THIS SECTOR 0 P* Z * P LD A13,FDBRRO,A1 SAVE CURRENT OFFSET d P LD A4,FDBMRO,A1 & P ST A4,FDBRRO,A1 LAST REC IN SECT P* P* *CHECK IF EOF P* P LDR
0x391d54…391ee8 Dummy {f00=0x0120, f01=0x0190, f02=»N,A1 P RB(L) FKY100 NOT EOF P RF(G) FKY180 EOF * P CW A3,FDBLRN+1,A1 D P RB(L) FKY100 NOT EOF ^ PFKY180 EQU * | P* P* EOF IS IN THIS SECTOR P* 2 P ST A13,FDBRRO,A1 OFFSET TO FIRST FREE RECORD P LDK A7,0 NR
0x391ee8…39207c Dummy {f00=0x0120, f01=0x0190, f02=» P LD A3,6,A14 SEARCH KEY ADDR P CF A14,CHKKEY COMPARE KEYS , P LDR A3,A3 P & P RF(P) FKY840 SEARCHED KEY GREATER b " P RF(N) FKY850 SEARCH KEY LESS P RF FKY870 KEY FOUNFD PFKY840 EQU * P CC A7,-4,A10 NEXT KEY FLAG 0 P
0x39207c…392210 Dummy {f00=0x0120, f01=0x0190, f02=» THAT HAS BEEN CHECKED FOR THIS KEY . P LC A7,-4,A10 REDUCE NO OF SAME CHARACTERS ! 0 P RB FKY100 NEXT KEY ! b PFKY850 EQU * ! ~ P LDKL A2,/4000 KEY NOT FOUND ! P RF FKY950 ! PFKY870 EQU * ! P LDK A2,0 KEY FOUND ! P RF FKY950 !
0x392210…3923a4 Dummy {f00=0x0120, f01=0x0190, f02=» P ADKL A14,8 RESTORE STACK " P LDR* A1,A14 FDB ADDR " & P LDR A3,A9 BUFFER ADDR " D P RTN A14 " b P EJECT " r P* " J P* CRNUPD UPDATES CRN-BUFFERS SO THAT RECORD NUMBERS FOR MOVED INDEX " P* RECORDS ARE UPDATED " P* " P* IN
0x3923a4…392538 Dummy {f00=0x0120, f01=0x0190, f02=»2 = ADD PARAMETER +1, -1 " P* # $ P* USED REGISTERS: # . P* A1 -A12 # J P* # ^ P* OUT: # h P* A5 = FDB ADDR INDEX # x P* A10,A11 = UNCHANGED # P* # PCRNUPD EQU * # P STR A12,A14 # P SUKL A14,2 # $ P LD A12,FD
0x392538…3926cc Dummy {f00=0x0120, f01=0x0190, f02=»F(Z) CRU900 END OF LINK # P LC A7,FDBECB+1,A5 FILE CODE $ P CC A7,CRNCIF,A12 $ D P RB(NE) CRU100 WRONG FC $ ^ P CC A10,CRNCIF+1,A12 $ ~ P RB(G) CRU100 $ P RF(L) CRU200 $ P CW A11,CRNCIF+2,A12 $ P RB(G) CRU100 $ PCRU200 EQU * $
0x3926cc…392860 Dummy {f00=0x0120, f01=0x018e, f02=» * $ P* % P* UPDATE CRN % P* % * P LD A7,2,A14 ADD PARAM % 4 P LDR A6,A7 % R P RF(N) CRU230 -1 % d P LDK A6,0 % | PCRU230 EQU * % P ANKL A7,/7FFF % P LDK A1,0 % P LC A1,CRNCIF+1,A12 % P LD A2,CRNCIF+2,A12 % P CF A1
0x392860…3929f4 (2, 397) Dummy {f00=0x0120, f01=0x4028, f02=» % P RTN A14 & P END & @ & $
0x3929f4…392b88 Dummy {f00=0x0120, 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* +
0x392b88…392d1c Dummy {f00=0x0120, f01=0x0190, f02=»TASSPW DATA 0 TTAB ADDRESS DMTASK $ PTASFDD DATA 0 FDB ADDR DATA FILE * ( PTASTBE DATA 0 TTAB/SCTCDT ENTRY ADDR R 2 PTASLFD DATA 0,0 LOCKED FLEXDISC FILE CODES =1 ~ P DATA 0,0 P DATA 0,0 " PTASS14 EQU *-2 TASS A14 STACK P* P
0x392d1c…392eb0 Dummy {f00=0x0120, f01=0x0190, f02=» * P************** P* , P* ENTRY TASCAQ CHECK ASSIGN QUEUE * P* Z P* A7= RETURN CODE d P* * P* SET OFF USE BIT IN TASBLK H P* IF TASQUE = 0 THEN RETURN ELSE QUEUE FIRST IN CHAIN AND 2 P
0x392eb0…393044 Dummy {f00=0x0120, f01=0x0190, f02=»QUE P RF(Z) TASCEX EMPTY QUEUE " P LDR* A1,A5 GET NEXT IN CHAIN . , P ST A1,TASQUE AND PUT IT FIRST IN QUEUE T P LDKL A1,-4 ( P ADS A1,TTB:SA,A5 UPD DISPATCH ADDR P CF A15,QTJOB NEXT ASSIGN P RF TASC05 & PTASCEX CM TASQUE
0x393044…3931d8 Dummy {f00=0x0120, f01=0x0190, f02=» CODE IN SAVED A7 r P RTN A14 P EJECT * 8 P****DESCRIPTION************************************* 8 P* t : P* VOLCHE WILL COMPARE EACH VOLUME NAME IN ASBLK WITH ~ & P* VOLUME NAMES IN DWT FOR DISCS P* 8 P****ENTRY PARAMETERS****
0x3931d8…39336c Dummy {f00=0x0120, f01=0x0190, f02=»S WANTED. v : P* 1 LOCK WANTED. ONLY FROM DMTASS FOR FLEXDISC P* P 8 P****EXIT PARAMETERS********************************* Z P* P* A1 = 0 OK P* 1 VOLUME UNKNOWN P* A5 = TTAB ADDR P* 8 P****USED REG
0x39336c…393500 Dummy {f00=0x0120, f01=0x0190, f02=»************** h PVOLCHE EQU * P CM TASLFD =1 * $ P CM TASLFD+2 LOCKED FLEXDISCS =1 @ P SLL A2,1 h P SUK A2,2 z 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
0x393500…393694 (2, 398) Opaque[0x194]
0x393694…393828 # DirEnt {nam=»ADDMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2410, f03=0x0000}
0x393694…393828 IdxSect {
0x393694…393828 f00 = 0x0120 // 0x393694 @0x0
0x393694…393828 f01 = 0x0004 // 0x393696 @0x2
0x393694…393828 gno = [ // 0x393698 @0x4
0x393694…393828 [0x00]: C0x0120.0x2.0
0x393694…393828 [0x01]: C0x0120.0x3.0
0x393694…393828 ]
0x393694…393828 }
0x393828…3939bc Dummy {f00=0x0120, f01=0x0190, f02=» 2 P IDENT ADDMOD REL 9.2 79-11-16 870105040920 P : P* =1 RETURN CONDITION B P* b 8 P**************************************************** l P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P*
0x3939bc…393b50 Dummy {f00=0x0120, f01=0x0190, f02=»CTION ON THE ALPHA ^ P* COMPUTER P*CALLING SEQUENCE: , $ P* A1-A2 = ARG1 F $ P* AG-A7 = ARG2 n P* CF A14,ADDMOD & P*RETURN : RESULT IN A1-A2 4 P* CAUTION REGISTERS A3,A4,A6,A7 A
0x393b50…393ce4 Dummy {f00=0x0120, f01=0x0190, f02=»NDITIONAL ASSEMBLY P* . P***************************************** $ P* V 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION ` . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0 P* P EJECT PADDMOD
0x393ce4…393e78 Dummy {f00=0x0120, f01=0x0190, f02=».L A7,/7FFF P ANK.L A2,/7FFF P ADR A2,A7 8 P RF(3) OVER1 X 0 PNOVER ADR A1,A6 * NO OVERFLOW x P RF(1) END1 P RF(2) END2 P RF(3) END3 PNO
0x393e78…39400c Dummy {f00=0x0120, f01=0x018e, f02=» A1,1 P RF(3) OVER3 P RB(7) NOVER 0 POVER3 ADR A1,A6 P P RF(2) END3 p P ADK A1,0 P RF(1) END1 P RB(7) NOVER1 P XIF =1 P IFT CPU852=
0x39400c…3941a0 Dummy {f00=0x0120, f01=0x4184, f02=» t PEND2 ADK A3,/80 PEND1 ADK A3,/80 * B PEND0 SLL A3,1 ********************************** L P ANK.L A3,/0300 P LDK.L A4,/FCFF P AN.S A4,2,A14 B P OR.S
0x3941a0…394334 (2, 399) Dummy {f00=0x0120, 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
0x394334…3944c8 Dummy {f00=0x0120, f01=0x0190, f02=»* & P* ' > P* FIND A FREE ENTRY IN TTAB/CD:TAB (FC AND DWTADR = 0 ) ' P* ' V PTAS180 EQU * ' ` P LDK A1,0 ' t P LDR A10,A10 TC ' P RF(Z) TAS185 GLOBAL ASSIGN ' P LD A2,TASTTA TTAB ADDR ' P LDR A4,A2 ' P LD A2,TTB:TD,A4 '
0x3944c8…39465c Dummy {f00=0x0120, f01=0x0190, f02=»UK A2,4 ' ( P RF(L) TASSE2 NO FREE ENTRY IN TABLE ( P LDR A9,A4 ( < P ADR A9,A2 ( N P CCR A1,A9 FILE CODE ( ` " P RB(NE) TAS190 FC NOT EQUAL 0 ( | P CW A1,1,A9 ( & P RB(NE) TAS190 DWTADR NOT EQUAL 0 ( P LDR* A1,A8 ASBLK 1ST WORD ( P RF(N)
0x39465c…3947f0 Dummy {f00=0x0120, f01=0x0190, f02=»Y ( f P ST A9,TASTBE SAVE ENTRY ) P* ) * 0 P* GET FIRST VOLUME AND ACTIVATE ITS DMTASK ) 4 P* ) h P LD A1,TASCVO ) r P LDK A7,0 ) P LC A7,TASVOL,A1 ) P ADKL A7,'#D' TID DMTASK ) P CF A15,FNDTID ) " P LDR A5,A2 TTAB ADDRESS DMTASK )
0x3947f0…394984 Dummy {f00=0x0120, f01=0x0190, f02=»RY ) | P LDK A7,4 VOL UNKNOWN * P RF TASSEM * ( PTAS200 EQU * * : P LDK A2,2 * N 4 P ST A2,TASFIL MASTER INDEX LOOP IDENT IN DMTSAK * ` & P LDKL A2,DMTASS ASSIGN INDEX ENTRY * P LDR* A6,A8 * P RF(N) TAS210 INDEX ASSIGN * P CM TASFIL *
0x394984…394b18 Dummy {f00=0x0120, f01=0x4182, f02=»F A15,ACTOT ACTIVATE DMTASK * P ABL TDISP GO TO DISPATCHER + $ P EJECT + H P* + V P* ERROR RETURNS + ` P* + z PTASSE5 ADK A7,1 + PTASSE4 ADK A7,1 + PTASSE3 ADK A7,1 + PTASSE2 ADK A7,1 + PTASSE1 ADK A7,1 + P ADK A7,1 +
0x394b18…394cac Dummy {f00=0x0120, f01=0x2008, f02=» ,
0x394cac…394e40 Dummy {f00=0x0120, f01=0x0190, f02=»****************************************** T 6 P* * U 2 6 P* RDBLK - READ ONE CASSETTE BLOCK * U l 6 P* =============================== * U 6 P*
0x394e40…394fd4 (2, 400) Opaque[0x194]
0x394fd4…395168 # DirEnt {nam=»DSUMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2420, f03=0x0000}
0x394fd4…395168 IdxSect {
0x394fd4…395168 f00 = 0x0121 // 0x394fd4 @0x0
0x394fd4…395168 f01 = 0x0004 // 0x394fd6 @0x2
0x394fd4…395168 gno = [ // 0x394fd8 @0x4
0x394fd4…395168 [0x00]: C0x0121.0x0.0
0x394fd4…395168 [0x01]: C0x0121.0x1.0
0x394fd4…395168 ]
0x394fd4…395168 }
0x395168…3952fc Dummy {f00=0x0121, f01=0x0190, f02=» 2 P IDENT DSUMOD REL 9.2 79-11-16 870105040920 P : P* =1 RETURN CONDITION B P* b 8 P**************************************************** l P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P*
0x3952fc…395490 Dummy {f00=0x0121, f01=0x0190, f02=»STRUCTION ON THE ALPHA ^ P*COMPUTER P*CALLING SEQUENCE 0 $ P* A1-A2 = ARG1 J $ P* A6-A7 = ARG2 r P* CF A14,DSUMOD & P*RETURN: RESULT IN A1-A2 4 P* CAUTION REGISTERS A3,A4,A6,A
0x395490…395624 Dummy {f00=0x0121, f01=0x0190, f02=»* CONDITIONAL ASSEMBLY P* . P***************************************** ( P* Z 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION d . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0 P* P EJECT PDS
0x395624…3957b8 Dummy {f00=0x0121, f01=0x0190, f02=» C1R A6,A6 P C1R A7,A7 P ANK.L A7,X'7FFF' 8 P ANK.L A2,/7FFF P ADK A7,1 ~ P RF(1) NOVER1 P ADK A6,1 P RF(3) OVER4 P RF(7)
0x3957b8…39594c Dummy {f00=0x0121, f01=0x0190, f02=» z P RF(2) END2 P RF(3) END3 & P ADK A2,0 D P RF(0) END0 b P RF(7) END1 POVER1 ANK.L A2,X'7FFF' P ADK A1,1 P RF(3) OVER4 P
0x39594c…395ae0 Dummy {f00=0x0121, f01=0x0190, f02=»VER2 | P XIF =1 P IFT CPU852=0 6813 =1 P RF(0) END0 =1 < P RF(1) END1 =1 T P RF(2) END2 =1 l P XIF =1 PEND3 ADK A3,/80 PEND2 ADK A3,/80 PEND1 ADK A3,/80 F PEND0 SLL
0x395ae0…395c74 (2, 401) Dummy {f00=0x0121, f01=0x40a8, f02=» AN.S A4,2,A14 B P OR.S A3,2,A14 UPDATE CR IN PSW CALLING PROGRAM P* =1 b P RTN A14 r P END @
0x395c74…395e08 Dummy {f00=0x0121, 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
0x395e08…395f9c Dummy {f00=0x0121, f01=0x0190, f02=» 0 P IDENT DMFDB REL 9.2 79-11-16 870105040920 P 8 P @ P* H P* R 8 P**************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* , P* DMFDB = FILE DESCRIPTOR BLOCKS FDB P*
0x395f9c…396130 Dummy {f00=0x0121, f01=0x0190, f02=»TE FDB AREA H P* BY MEANS OF CONDITIONAL ASSEMBLY QFDBAR WORDS WILL BE ALLOCATED P* ` P ENTRY FDBSTA j P ENTRY FDBEND P ENTRY QFDBFL P ENTRY CRNQUE,CRBUFL P ENTRY CRNEND P ENTRY MXIND P EJECT P* 6
0x396130…3962c4 Dummy {f00=0x0121, f01=0x0190, f02=»A r " PCRBUFL EQU 12 SIZE CRN BUFFER P* 0 < P* CRNBAR IS THE SIZE OF THE CRN BUFFER ARERA IN WORDS : 4 P* WHERE CRBUFL BYTES ARE USED FOR EACH BUFFER z P* PX:B EQU 50 PCRNBAR EQU X:B CURRENCY AREA P* P* PX:
0x3962c4…396458 Dummy {f00=0x0121, f01=0x0190, f02=»* PQFDBAR EQU X:A P* PX:D EQU 96 * & PQFDBFL EQU X:D FDB FIX PART LENGTH < P* f P EJECT p P* ~ PFDBSTA EQU * P RES QFDBAR PFDBEND EQU * PCRNQUE DATA 0 CRN LINK ROOT P RES CRNBAR PCRNEND EQU *
0x396458…3965ec Dummy {f00=0x0121, f01=0x4102, f02=»IZ=0 * 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 : P XIF h PMXINDE EQU * END INDEX INDEX t 2 P DATA 0,0 SIGNIFICANT ZEROES AFTER INDEXINDEX PMXAR EQU * P RES MXSIZ P END @ EQU *
0x3965ec…396780 Dummy {f00=0x0121, 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*
0x396780…396914 (2, 402) Opaque[0x194]
0x396914…396aa8 # DirEnt {nam=»MPYMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2430, f03=0x0000}
0x396914…396aa8 IdxSect {
0x396914…396aa8 f00 = 0x0121 // 0x396914 @0x0
0x396914…396aa8 f01 = 0x0004 // 0x396916 @0x2
0x396914…396aa8 gno = [ // 0x396918 @0x4
0x396914…396aa8 [0x00]: C0x0121.0x2.0
0x396914…396aa8 [0x01]: C0x0121.0x3.0
0x396914…396aa8 ]
0x396914…396aa8 }
0x396aa8…396c3c Dummy {f00=0x0121, f01=0x0190, f02=» 2 P IDENT MPYMOD REL 9.2 79-11-16 870105040920 P : P* =1 RETURN CONDITIONS B P* b 8 P**************************************************** l P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P*
0x396c3c…396dd0 Dummy {f00=0x0121, f01=0x0190, f02=»N THE ALPLA COMPUTER ^ P* CALLING SEQUENCE: ( P* LD A6,ARG1 8 ( P* LD A7,ARG1 d P* CF A14,MPYMOD ( P* RETURN : RESULT IN A1,A2 0 P* REGISTERS A3,A4,A6,A7, ARE CRU
0x396dd0…396f64 Dummy {f00=0x0121, f01=0x0190, f02=»L ASSEMBLY P* . P***************************************** P* N 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION X . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0 P* P EJECT PMPYMOD EQU *
0x396f64…3970f8 Dummy {f00=0x0121, f01=0x0190, f02=»A3,/8000 IF A6=A7=/8000 RETURN IN ERROR EXIT ~ P CWR A3,A6 8 P RF(4) SUITE X P CWR A3,A7 x P RF(0) END3 < P LDR A6,A7 * A6= X'8000' A7# X'8000' 4 P LDR
0x3970f8…39728c Dummy {f00=0x0121, f01=0x0190, f02=»A3,0 ~ P LDK A4,15 P ADK A6,0 , P RF(0) END0 J P RF(6) ARG1PS h 0 P ADK A3,1 *ARG1 NEGATIVE P C1R A6,A6 P ADK A6,1 PARG1PS ADK
0x39728c…397420 Dummy {f00=0x0121, f01=0x0190, f02=» C1R A7,A7 P ADK A7,1 P RF(3) CASSPE 8 PARG2PS SRC A7,1 X P RF(6) NOVER1 v P ADR A1,A6 PNOVER1 SRA A2,1 P SRC A1,1 P RF(6) NOVE
0x397420…3975b4 (2, 403) Dummy {f00=0x0121, f01=0x0190, f02=» 4 PNOVER3 ADK A3,0 *END* RESTORE SI=N P RF(0) END1 < P C1R A1,A1 Z P C1R A2,A2 z P ADK A2,1 D P*CAUTION THE NEXT INSTRUCTION IS ABSOLUTELY NECESSARY TO SET CR < P* WHEN T
0x3975b4…397748 Dummy {f00=0x0121, f01=0x0190, f02=»A1,1 ~ PNOVER4 ANK.L A2,/7FFF P RF(7) END2 . P XIF =1 L P IFT CPU852=0 6813 =1 ^ P RF(0) END0 =1 | P RF(1) END1 =1 P RF(2) END2 =1 P XIF =1 PEND3 ADK A3,/81 PEND2 ADK
0x397748…3978dc Dummy {f00=0x0121, f01=0x4168, f02=» v P AN.S A4,2,A14 B P OR.S A3,2,A14 UPDATE CR IN PSW CALLING PROGRAM * P* =1 p P RTN A14 P IFT CPU852=1 : PCASSPE LDR A1,A6 *A7=X'8000' THEN A4= 1 . P*
0x3978dc…397a70 Dummy {f00=0x0121, 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 @
0x397a70…397c04 Dummy {f00=0x0121, f01=0x0190, f02=»DBRLE,FDBSNR,ECBCW l . P EXTRN FDBRRO,FDBCEX,FDBBLF,EXTBAS,BUFSNR . P EXTRN FDBLRN,FDBMRO,FDBCRL,FDBADF,CRNCIF L 4 P EXTRN DMTIOT,GTLGRN,GTBKBU,ADDMOD,CALSNO,DMTRBU ~ P EXTRN DMTIOZ P EJECT 8 P****DESCRIPTION*******************************
0x397c04…397d98 Dummy {f00=0x0121, f01=0x0190, f02=»1 ALG. U. ` 4 P* THE SEARCH KEY MAY BE TERMINATED WITH A /EE. 0 P* THE FIRST TWO WORDS IN MASTER INDEX IS : J P* - NO OF ENTRIES N ~ $ P* - NO OF CHARACTERS PER ENTRY P* 8 P****ENTRY PARAMETERS********************************
0x397d98…397f2c Dummy {f00=0x0121, f01=0x0190, f02=»CF A14,FNDKMX P* 8 P****EXIT PARAMETERS********************************* " P* ^ 0 P* A1,A2 = LODGICAL RECORD NO IN INDEX FILE h P* A8,A11= UNCHANGED P* 8 P****USED REGISTERS********************************** P*
0x397f2c…3980c0 Dummy {f00=0x0121, f01=0x0190, f02=»9,A2 P ANKL A9,/1 GET BIT 15 P SRA A2,1 * 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 P LDR* A7,A5 ENTRY LENGTH P LDR A6,A9 I P SUK A6,1 $ P
0x3980c0…398254 (2, 404) Opaque[0x194]
0x398254…3983e8 # DirEnt {nam=»DIVMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2440, f03=0x0000}
0x398254…3983e8 IdxSect {
0x398254…3983e8 f00 = 0x0122 // 0x398254 @0x0
0x398254…3983e8 f01 = 0x0004 // 0x398256 @0x2
0x398254…3983e8 gno = [ // 0x398258 @0x4
0x398254…3983e8 [0x00]: C0x0122.0x0.0
0x398254…3983e8 [0x01]: C0x0122.0x1.0
0x398254…3983e8 ]
0x398254…3983e8 }
0x3983e8…39857c Dummy {f00=0x0122, f01=0x0190, f02=» 2 P IDENT DIVMOD REL 9.2 79-11-16 870105040920 P : P* =1 RET COND B P* Z 8 P**************************************************** d P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P* P*
0x39857c…398710 Dummy {f00=0x0122, f01=0x018e, f02=»A COMPUTER V P* CALLING SEQUENCE & P* A1-A2= DIVIDEND , $ P* A6 = DIVISOR V P* CF A14,DIVMOD ~ B P*RETURN* RESUT IN A1-A2 ; A1= REMAINDER;A2= QUOTIENT 6 P* CAUTION : REGISTERS A3,A4,A6,A
0x398710…3988a4 Dummy {f00=0x0122, f01=0x0190, f02=» P* CONDITIONAL ASSEMBLY P* " . P***************************************** , P* ^ 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION h . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0 P* P EJECT
0x3988a4…398a38 Dummy {f00=0x0122, f01=0x0190, f02=»,A1 SAVE DIVIDEND SIGN | P* =1 $ P ADK A6,0 4 @ P RF(0) END3 * IF DIVISOR IS NULL, OVREFLOW R P ADK A1,0 P RF(4) SIGNE P ANK.L A2,/7FFF @ P RF(0)
0x398a38…398bcc Dummy {f00=0x0122, f01=0x018e, f02=» P LDK A4,16 4 P ADK A1,0 *SIGN OF DIVIDEND $ P RF(6) DIVENP 8 P ADK A3,1 * DIVIDEND IS NEGATIVE | P C1R A1,A1 P C1R A2,A2 P ANK.L
0x398bcc…398d60 Dummy {f00=0x0122, f01=0x018e, f02=» x 2 PDIVENP ADK A6,0 *SIGN OF DIVISOR P RF(6) DIVORP > 4 P SUK A3,1 *NEGATIVE DIVISOR ^ P C1R A6,A6 P ADK A6,1 < P ADK A6,0 RESET IF OVER
0x398d60…398ef4 (2, 405) Dummy {f00=0x0122, f01=0x0190, f02=» 2 PSHIFT SUK A4,1 *A1 LESS THAN A6 P RF(0) END : P SLL A1,1 X P SLL A7,1 v P SLL A2,1 P RF(6) *+4 P ADK A1,1 P ADK A1,0
0x398ef4…399088 Dummy {f00=0x0122, f01=0x0190, f02=» ADK A7,1 P RB(7) SHIFT 4 P*THIS SEQUENCE RESTORES THE SIGN OF THE RESULTS : PEND LDR A2,A7 r P ADK A3,0 P RF(0) NOSIGN 8 P RF(2) AA DIVIDEND +. DIVISOR +
0x399088…39921c Dummy {f00=0x0122, f01=0x018e, f02=» 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) ` P ADK A2,0 P XIF =1 P IFT CPU852=0 6813 =1 P RF(1) END1 =1 P
0x39921c…3993b0 Dummy {f00=0x0122, f01=0x0190, f02=» v PEND1 ADK A3,/81 B PEND0 SLL A3,1 ********************************** ( P ANK.L A3,/0300 n P LDK.L A4,/FCFF P AN.S A4,2,A14 B P OR.S A3,2,A14 UPDATE CR IN PSW CALLI
0x3993b0…399544 Dummy {f00=0x0122, f01=0x0190, f02=»N ^ P RF(6) BB 6 P C1R A1,A1 DIVIDEND- .DIVISOR - & . P ADK A1,1 REMAINDER - ` PBB ADK A2,0 P RB(0) END0 P RB(2) END2 P RB(7) END1
0x399544…3996d8 Dummy {f00=0x0122, f01=0x4056, f02=» LDK A1,0 P RB(7) END P XIF 2 P END >@ R - & . P ADK A1,1 REMAINDER - ` PBB ADK A2,0 P RB(0) END0 P RB(2) END2 P RB(7) END1
0x3996d8…39986c Dummy {f00=0x0122, 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
0x39986c…399a00 Dummy {f00=0x0122, f01=0x018e, f02=»ECORD v P RF FKY150 P LDR A1,A5 RET CODE P RF FKY900 ERROR EXIT < P* Z " P* BUFFER AND ADATA IS FOUND d P* PFKY150 EQU * P LDR A9,A3 BUFFER ADDR P ADR A2,A3 BUFFER ADR P ADK A2,10 REC ADDR P LDR A10
0x399a00…399b94 (2, 406) Opaque[0x194]
0x399b94…399d28 # DirEnt {nam=»DMSUBR«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2450, f03=0x0000}
0x399b94…399d28 IdxSect {
0x399b94…399d28 f00 = 0x0122 // 0x399b94 @0x0
0x399b94…399d28 f01 = 0x0012 // 0x399b96 @0x2
0x399b94…399d28 gno = [ // 0x399b98 @0x4
0x399b94…399d28 [0x00]: C0x0122.0x2.0
0x399b94…399d28 [0x01]: C0x0122.0x3.0
0x399b94…399d28 [0x02]: C0x0123.0x0.0
0x399b94…399d28 [0x03]: C0x0123.0x1.0
0x399b94…399d28 [0x04]: C0x0123.0x2.0
0x399b94…399d28 [0x05]: C0x0123.0x3.0
0x399b94…399d28 [0x06]: C0x0124.0x0.0
0x399b94…399d28 [0x07]: C0x0124.0x1.0
0x399b94…399d28 [0x08]: C0x0124.0x2.0
0x399b94…399d28 ]
0x399b94…399d28 }
0x399d28…399ebc Dummy {f00=0x0122, f01=0x0190, f02=» 2 P IDENT DMSUBR REL 9.2 79-11-16 870105040920 P : P =1 CLEAR ECB B P REL 9.1 79-04-06 Z P* v 8 P**************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* DMSUBR = COM
0x399ebc…39a050 Dummy {f00=0x0122, f01=0x0190, f02=» 8 P****THIS MODULE IS ACTIVATED FROM :***************** P* D P* DMTASK,TIODM,DMTASS N P* n P*************** x P* ENTRIES * P*************** P* P* & P ENTRY EATEST,EASETB,EARELB,CRNGET P ENTRY CAL
0x39a050…39a1e4 Dummy {f00=0x0122, f01=0x0190, f02=»USER TO SYSTEM AREA x 0 P ENTRY MOV:SU MOVE FROM SYSTEM TO USER AREA P* P P***************** Z P* EXTERNALS * t P***************** P* P* 4 P EXTRN FDBEAL,FDBTNR,FDBCRL,FDBRLE,FDBSNR,FDBRRO P EXTRN FDBCEX,FDBBLF
0x39a1e4…39a378 Dummy {f00=0x0122, f01=0x0190, f02=»D | P EXTRN DWTTDM,DWTTQ P EXTRN QTJOB & P EXTRN ECBRL,SECTLE : P EXTRN DIVMOD,MPYMOD V P EXTRN EXTELE r P EXTRN CRNTID P EXTRN DMTGBU P EXTRN EXTLEN,EXTBAS P EXTRN CRNQUE,GETBLK,FREQUE P EXTRN HALT P
0x39a378…39a50c Dummy {f00=0x0122, f01=0x0190, f02=»UTINE t P EJECT DMSUBR TOSSIO P* . P* 8 . P***************************************** B P* t P* CONDITIONAL ASSEMBLY ~ P* . P***************************************** P* . P* A PROGRAM VERSION USING TOSS MMU PAG
0x39a50c…39a6a0 Dummy {f00=0x0122, f01=0x0190, f02=»CHKIND IS USED FROM FNDDWT TO SELECT DM-DWT 2 P* INDEX FILE (INDEX 0) SHALL BE SELECTED FOR 4 ( P* DX,IX,XR,XN, DATA FILE OTHERWISE j P* PCHKIND EQU * P STR A1,A15 P STR A2,A15 " P LDK A2,1 INDEX FOR DATA FILE P LDR A
0x39a6a0…39a834 (2, 407) Dummy {f00=0x0122, f01=0x0190, f02=»AD x P ANK A1,/3E REMOVE BIT 15 P SUK A1,/1E , 4 P RF(E) FND320 INSERT INDEX OR INDEXED READ NEXT @ P RF FND340 x ( PFND320 LDK A2,0 INDEX FOR INDEX FILE PFND340 EQU * P CCR A2,A6 INDEX P RF(E) FND390 ENTRY FOUND P LDK
0x39a834…39a9c8 Dummy {f00=0x0122, f01=0x0190, f02=»ED IN TENDIO TO RESET REQUEST BUSY BIT P* FOR ALL FILES . " P* AND TO RESOLVE ALL QUEUES H P* n PREQEND EQU * x P LC A2,TTB:ID,A5 GET TASK ID P CCK A2,'##' ( P RF(E) TEN117 JUMP IF DMTASK CALLING P* , P* RESET REQU
0x39a9c8…39ab5c Dummy {f00=0x0122, f01=0x0190, f02=»QU * P SUK A2,2 P RF(N) TEN115 NO MORE FILES P LDR A3,A6 B P ADR A3,A2 T P LD A3,FDBADF,A3 FDB ADDR f P RB(Z) TEN112 P CWR A3,A6 DWT ADDR P RF(E) TEN114 MASTER DWT P LD A5,DWTTQ,A3 P RF(Z) TEN113 NO QUEUE
0x39ab5c…39acf0 Dummy {f00=0x0122, f01=0x0190, f02=»TEN114 EQU * $ P LDKL A4,/BFFF REQUEST BUSY BIT P ANS A4,DWTST,A3 RESET < P LDKL A4,/8000 Z $ P ORS A4,DWTST,A3 DEVICE NOT BUSY r P RB TEN112 PTEN115 EQU * P LDR* A4,A15 RESTORE A4 P* PTEN117 EQU * P ABL IHRTN
0x39acf0…39ae84 Dummy {f00=0x0122, f01=0x0190, f02=» FOR A LOG RECORD NO. n P* 8 P****ENTRY PARAMETERS******************************** ( P* d P* A1 = FDB ADRESS n P* A2,A3 = LOG RECORD NO P* P* CF A14,EATEST P* 8 P****EXIT PARAMETERS*************************
0x39ae84…39b018 Dummy {f00=0x0122, f01=0x018e, f02=»* = -1 EA FOUND FO R OTHER TASK P* . 8 P****USED REGISTERS********************************** 8 P* t P* A1 - A4 ~ P EJECT DMSUBR PEATEST EQU * " P LD A4,FDBEAL,A1 BUFFER QUEUE P RF EAT030 PEAT020 EQU *
0x39b018…39b1ac Dummy {f00=0x0122, f01=0x018e, f02=» P* P CC A2,3,A4 FIRST CHAR P RB(NE) EAT020 , P CW A3,4,A4 2 AND 3 CHAR B P RB(NE) EAT020 b P* x P* RECORD NO FOUND P* P LC A4,2,A4 P CC A4,FDBTNR,A1 TASK ID P RF(E) EAT060 P LDKL A4,-1 EA OTHER T
0x39b1ac…39b340 Dummy {f00=0x0122, f01=0x0190, f02=» ~ 8 P****DESCRIPTION************************************* P* D B P* EASETB WILL UNCONDITIONALLY PUT A NEW EA BUFFER IN EA-LINK N L P* IF NO BUFFERS ARE AVAILABLE THE SYSTEM WILL HALT AND LITE SOP-LAMPS P* 8 P****ENTRY PARAMETERS******
0x39b340…39b4d4 (2, 408) Dummy {f00=0x0123, f01=0x018e, f02=»B ~ P* 8 P****EXIT PARAMETERS********************************* P* P P* A6 = FDB ADDR Z P* t 8 P****USED REGISTERS********************************** ~ P* P* A1-A4,A6 P* < P**************************************
0x39b4d4…39b668 Dummy {f00=0x0123, f01=0x0190, f02=» 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 h P* P LD A2,FDBEAL,A6 LINK ROOT P STR A2,A4 THREAD P ST A4,FDBEAL,A6 NEW ROOT P RTN A14 P EJECT D
0x39b668…39b7fc Dummy {f00=0x0123, f01=0x0190, f02=» P* TIO THE FREE LINK. P* & 8 P****ENTRY PARAMETERS******************************** 0 P* l P* A1 = FDB-ADDRESS v " P* A2,A3 = LOGICAL RECORD NO B P* A2: BIT 0=1,BIT 1=1 ALL BUFFERS WITH TASK ID SAME AS FDB ( P*
0x39b7fc…39b990 Dummy {f00=0x0123, f01=0x0190, f02=»FER WITH TASK ID AND LOG REC NO j 0 P* AS SPEC IS REMOVED. ( P* 8 P****EXIT PARAMETERS********************************* f P* P* A1 = UNCHANGED P* 8 P****USED REGISTERS**********************************
0x39b990…39bb24 Dummy {f00=0x0123, f01=0x0190, f02=»,A5 EA ROOT P RF EAR030 PEAR020 EQU * & P LDR A5,A4 SAVE OLD ROOT : P LDR* A4,A4 NEXT BUFFER ADR Z PEAR030 EQU * ~ P RF(Z) EAR100 EA LINK END P LDR A2,A2 REC NO & P RF(N) EAR050 RELEASE MANY BUFFERS P* P* SE
0x39bb24…39bcb8 Dummy {f00=0x0123, f01=0x018e, f02=»EAR050 EQU * P CWK A2,/A000 CHECK BIT 1 0 P RF(L) EAR080 BIT 1 ZERO,ALL BUFFERS REMOVED 6 PEAR060 EQU * j P* ~ P* SEARCH TASK IDENT P* P LC A3,FDBTNR,A1 TAK ID P CC A3,2,A4 P RB(NE) EAR020 P* P*
0x39bcb8…39be4c Dummy {f00=0x0123, f01=0x0190, f02=» P* RETURN BUFFER TO POOL P* & P INH 0 P LD A3,FREQUE < P STR A3,A4 NEXT FREE R P ST A4,FREQUE NEW ROOT n P LDR A4,A5 BUFFER ROOT P LDR A2,A2 P RB(N) EAR020 RELEASE MORE PEAR100 EQU * P RTN A14 P EJECT
0x39be4c…39bfe0 Dummy {f00=0x0123, f01=0x0190, f02=» IF NO BUFFER IS ` D P* FOUND A NEW IS FETCHED FROM THE FREE LINK AND B FILLED WITH H P* ZEROES AND PUT ON THE CRN LINK. IF NO FREE BUFFERS ARE AVAILABLE ` 0 P* THE SYSTEM WILL HALT AND LITE SOP-LAMPS. ( P* TASK ID IS PLACED IN THE BUFFER
0x39bfe0…39c174 (2, 409) Dummy {f00=0x0123, f01=0x0190, f02=»EXIT PARAMETERS********************************* P* 8 P* A1 = UNCHANGED B ( P* A2 = ADDRESS OF FOUND CRN-BUFFER P* 8 P****USED REGISTERS********************************** P* P* A1 - A4 P EJECT DMSUBR PCRNG
0x39c174…39c308 Dummy {f00=0x0123, f01=0x0190, f02=» P RF(Z) CRN100 LINK END P* " P* CHECK ATASK IDENT , P* J P LC A3,FDBTNR,A1 TASK ID T P CC A3,CRNTID,A2 t P RB(NE) CRN020 OTHER TASK P RF CRN200 BUFFER FOUND P* P* GET NEW BUFFER P* PCRN100 EQU *
0x39c308…39c49c Dummy {f00=0x0123, f01=0x018e, f02=»RS v PCRN120 EQU * P LDR* A3,A2 NEXT FREE P ST A3,CRNQUE UPD ROOT < P* Z P* FILL BUFFER WITH ZEROES d P* * P LDKL A3,CRBUFL BUFFER LENGTH IN BYTES PCRN140 EQU * P SUK A3,2 ZEROE WORDS 2 - N P RF(NP) CRN160 B
0x39c49c…39c630 Dummy {f00=0x0123, f01=0x0190, f02=» " P* CONNECT NEW BUFFER TO LINK P* . PCRN160 EQU * 8 P LC A3,FDBTNR,A1 L P SC A3,CRNTID,A2 TASK ID d P LD A3,FDBCRL,A1 LINK ROOT P STR A3,A2 THREAD P ST A2,FDBCRL,A1 NEW ROOT PCRN200 EQU * P RTN A14 P E
0x39c630…39c7c4 Dummy {f00=0x0123, f01=0x018e, f02=»TO d P* SECTOR AND OFFSET P* ( 8 P****ENTRY PARAMETERS******************************** 2 P* n " P* A1,A2 = LOGICAL RECORD NO x P* A6 = FDB ADDR P* P* CF A14,CALSNO P* 8 P****EXIT PARAMETERS*************
0x39c7c4…39c958 Dummy {f00=0x0123, f01=0x0190, f02=» P* A6 = UNCHANGED $ P* IN FDB : FDBSNR = SECTOR NR , P* FDBRRO = OFFSET IN SECTOR F * P* FDBCEX = CURRENT EXTENT v P* 8 P****USED REGISTERS********************************** P* P* A1 - A9 P
0x39c958…39caec Dummy {f00=0x0123, f01=0x0190, f02=»DK A6,0 $ P LC A6,FDBBLF,A5 BLOCKING FACTOR , P CF A14,DIVMOD A2=A1,A2//A6,A1=REMAINDER 8 P RF(O) TIOD99 OVERFLOW h P LDR A3,A2 QUOTIENT P LDR A6,A5 FDB ADDR P LDR A2,A1 REMAINDER P RF(Z) TIOD30 REST = 0 $ P ADK A3,1 RECORD
0x39caec…39cc80 Dummy {f00=0x0123, f01=0x018e, f02=» PTIOD40 EQU * P LDR A4,A6 & P ADKL A4,FDBEXT FIRST FILE EXTENT * , P LD A9,EXTLEN,A4 LENGTH OF FIRST EXTENT T P LDK A5,4 NUMBER OF EXTENTS PTIOD45 CWR A3,A9 ( P RF(NG) TIOD55 SECTOR IN THIS EXTENT P SUK A5,1 NO & P RF(NP)
0x39cc80…39ce14 (2, 410) Dummy {f00=0x0123, f01=0x0190, f02=» P* * P* SAVE CURRENT EXTENT BLOCK POINTER P* < PTIOD55 ST A4,FDBCEX,A6 F P* d * P* FIND LOGICAL SECTOR NUMBER ON DISC n P* 6 P SU A9,EXTLEN,A4 NO OF SECTORS IN PREVIOUS EXTENTS $ P SUR A3,A9 SECTOR NO WITHIN EXT P
0x39ce14…39cfa8 Dummy {f00=0x0123, f01=0x0190, f02=»GICAL SECTOR NUMBER x 2 P* FIND RELATIVE RECORD OFFSET WITHIN SECTOR P* R P LDK A3,0 & PTIOD60 SUK A2,1 A2=RELATIVE REC NO n ( P RF(Z) TIOD65 REL REC OFFS IN A3 NOW * P AD A3,FDBRLE,A6 NO ADD RECORD LENGTH P ADK A3,1 SKIP STATUS
0x39cfa8…39d13c Dummy {f00=0x0123, f01=0x0190, f02=»RELATIVE REC OFFSET IN FBDRRO P* & PTIOD65 EQU * 0 P LDK A1,0 OK D P ST A3,FDBRRO,A6 X PTIODMF EQU * p P RTN A14 P EJECT DMSUBR P* P************** P* DMTIOT P************** P* > P* ENTRY
0x39d13c…39d2d0 Dummy {f00=0x0123, f01=0x0190, f02=»RESS x P* A1 = 0 WHEN OK ! $ P* = ERROR CODE ELSE ! . $ P* A9 = DM ECB ADDRESS ! V * P* A8 = PHYS I/O ECB ADDRESS ! ~ $ P* A2 WILL BE DESTROYED ! P* ! ( P* USED REGISTERS : A1,A2,A6,A8,A9 !
0x39d2d0…39d464 Dummy {f00=0x0123, f01=0x0190, f02=»B ADDRESS ! z PDMTIT0 EQU * " P LD A1,ECBRC,A8 " & P RF(Z) DMTIOX DISC I/O OK " > P ANKL A1,/FEFF " ` $ P RF(NZ) DMTIT1 NOT ONLY RETRIES " v P LDKL A2,/100 " P ORS A2,ECBRC,A9 USER RC " P RF DMTIOX " PDMTIT1 EQU * " P LD A2,FDBDBR,
0x39d464…39d5f8 Dummy {f00=0x0123, f01=0x0190, f02=» A2,8 BUFSTA " , P CM BUFDMI,A2 CLEAR VOL IDENT IN BUFFER # P LDK A1,/02 DISC IO ERROR # D " P LDKL A2,/FF7E NOT BIT 8 OR 15 # f P AN A2,ECBRC,A8 # P RF(NZ) DMTIOX # P LD A1,ECBRC,A8 BIT 8 OR 15 # PDMTIOX RTN A14 # P EJECT # P* #
0x39d5f8…39d78c Dummy {f00=0x0123, f01=0x0190, f02=» P* A8 = ECB ADDR $ P* OUT: $ P* A1 = RET CODE $ . P* A2 = DESTROYED $ H P* A6 = FDB ADDR $ b P* A8 = ECB ADDR $ | P* A9 == USER ECB $ P* $ PDMTIOZ LDR A6,A1 $ P LD A2,DWTOR,A6 ORDER $ P ANK A2,/3F $ P CWK
0x39d78c…39d920 Dummy {f00=0x0123, f01=0x0190, f02=»DB DATA FILE $ ~ PDMTIZ1 EQU * % P LD A9,DWTECB,A1 USER ECB % ( P RB DMTIT0 % J P EJECT DMSUBR % 8 P****DESCRIPTION************************************* % t P* % 8 P* GTBKBU WILL GET A BLOCK BUFFER FOR DISC I/O AND % 2 P* PREPARE IT. EC
0x39d920…39dab4 (2, 411) Dummy {f00=0x0123, f01=0x0190, f02=» % | , P* FDB-CEX,ECB,SNR,RRO & 8 P* ECB-FC,CW,BA,DWT-OR,ECB,EXTDMI & 8 P* A8 = ECB ADDR & t P* & 8 P****EXIT PARAMETERS********************************* & P* & P* A1 = A6 = FDB ADDR & 0 P* A2 = FDB
0x39dab4…39dc48 Dummy {f00=0x0123, f01=0x0190, f02=» THE FOUND CORE BUFFER & v P* A3 = BUFFER ADDRESS ' & P* A5 = ORDE R CODE ' F P* A8 = ECB ADDR ' b P* A9 = DM ECB ADDR ' | P* ' 8 P****USED REGISTERS********************************** ' P* ' P* A1 - A9 ' P* ' : P**
0x39dc48…39dddc Dummy {f00=0x0123, f01=0x0190, f02=»RENT EXTENT BLOCK POINTER ' | P LD A1,EXTDMI,A4 DMIDENT, FC ( " " P LD A2,FDBSNR,A6 SECTOR NUMBER ( F P LD A9,DWTECB,A6 DM ECB ( l P ANK A1,/FF =1 ( $ P STR A1,A8 DISC VOL FILE CODE =1 ( P LDR A4,A2 SAVE ( P LDKL A5,SECTLE ( " P ST A5,ECBRL
0x39dddc…39df70 Dummy {f00=0x0123, f01=0x0190, f02=»SECTOR MUST BE READ FROM DISC ( P LDKL A2,-1 RET CODE ) & PGTB040 EQU * ) B P ST A4,ECBCW,A8 SECTOR NR ) V P LDR A5,A3 ) x 2 P ADKL A5,BUFSTA A5 = DATA BUFFER START ADDRESS ) P ST A5,ECBBA,A8 ) P LD A5,DWTOR,A6 ) P ANK A5,/3F ) ( P LDR
0x39df70…39e104 Dummy {f00=0x0123, f01=0x018e, f02=» ORDER CODE ) P EJECT DMSUBR * 8 P****DESCRIPTION************************************* * , P* * h D P* GTLGRN WILL CONVERT FDBSNR AND FDBRRO TO A LOGICAL RECORD NO * r P* * 8 P****ENTRY PARAMETERS******************************** * P* *
0x39e104…39e298 Dummy {f00=0x0123, f01=0x0190, f02=» * Z P* + P* A1=A5=A6= FDB ADDRESS + P* A2,A3 = LOG RECORD NO + 4 P* + V 8 P****USED REGISTERS********************************** + ` P* + P* A1 - A7 + P* + : P****************************************************** + P EJECT
0x39e298…39e42c Dummy {f00=0x0123, f01=0x0190, f02=» + p P LD A7,FDBCEX,A1 EXT ADDR , ( P ADKL A7,EXTLEN ADDR TO LAST LENGTH , * PGTL050 EQU * , V P CWR A3,A7 , j . 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 ADKL
0x39e42c…39e5c0 Dummy {f00=0x0123, f01=0x0190, f02=»OTAL NO OF SECTORS , ~ ( P AD A6,FDBSNR,A1 TOTAL NR OF SECTORS - P* - F ( P* CONVERT FDBRRO TO NO OF RECORDS - P 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,F
0x39e5c0…39e754 (2, 412) Dummy {f00=0x0124, f01=0x0190, f02=» PGTL150 EQU * . P ADK A7,1 RECORD COUNTER . P SUR A6,A4 . 8 * P RB(NN) GTL150 COUNT RECORDS IN SECTOR . J P* . x , P* ADD SECT*BLOCFACT AND RECINCURRSECT . P* . P ADR A2,A7 . P RF(O) GTL160 OVERFLOW . P RF GTL170 . PGTL160 EQU
0x39e754…39e8e8 Dummy {f00=0x0124, f01=0x0190, f02=» LDR A1,A5 FDB ADDR . P LDR A6,A5 / P RTN A14 / . P EJECT DMSUBR / > P* / V P* / ` P IFT MMUPAG=1 / j P* / P* M O V : U S / P* / D P* THIS ROUTINE MOVES DATA FROM THE USER AREA (SENDING BUFFER) TO / L P* THE SYSTEM AREA (REC
0x39e8e8…39ea7c Dummy {f00=0x0124, f01=0x0190, f02=»* / 8 P* INPUT: A1 = ADDRESS OF SENDING BUFFER (USER AREA) 0 < P* A2 = ADDRESS OF RECEIVING BUFFER (SYSTEM AREA) 0 F . P* A3 = NUMBER OF BYTES TO BE MOVED 0 P* 0 " P* OUTPUT: A1-A4 ARE DESTROYED 0 P* 0 , PMOV:US LDR A3,A3 CHECK
0x39ea7c…39ec10 Dummy {f00=0x0124, f01=0x0190, f02=»ER ADDRESS 0 v P ANK A4,1 1 . P RF(NZ) MVUS40 USER BUFFER ADDRESS UNEVEN? 1 $ . P LDR A4,A2 NO, CHECK SYSTEM BUFFER ADDRESS 1 V P ANK A4,1 1 0 P RF(NZ) MVUS55 SYSTEM BUFFER ADDRESS UNEVEN? 1 P* 1 , PMVUS10 LDR A4,A3 CHECK REQUESTED LENGTH 1 P
0x39ec10…39eda4 Dummy {f00=0x0124, f01=0x0190, f02=»5 1 t P* 2 PMVUS35 RTN A14 2 P* 2 * P EJECT DMSUBR 2 4 P* 2 L P* 2 V 0 PMVUS40 EQU * USER BUFFER ADDRESS WAS UNEVEN 2 ` * P LDR A4,A2 CHECK SYSTEM BUFFER ADDRESS 2 P ANK A4,1 2 0 P RF(NZ) MVUS80 SYSTEM BUFFER ADDRESS UNEVEN? 2 4 P
0x39eda4…39ef38 Dummy {f00=0x0124, f01=0x0190, f02=» SYSTEM BUFFER ADDRESS 2 ( P SUK A3,1 DECREMENT REQUESTED LENGTH 3 $ P RB(NP) MVUS30 LAST CHAR. MOVED? 3 J , P ADK A1,2 NO, UPDATE USER BUFFER ADDRESS 3 r P* 3 8 PMVUS55 ELR A4,A1 GET NEXT TWO CHAR. FROM USER BUFFER 3 P ECR A5,A4 3 0 P SCR A5,A2 STO
0x39ef38…39f0cc Dummy {f00=0x0124, f01=0x0190, f02=»VUS50 MORE CHAR. TO MOVE? 3 P RB MVUS30 NO, RETURN 4 " P* 4 @ P EJECT DMSUBR 4 J P* 4 b P* 4 l , PMVUS60 EQU * REQUESTED LENGTH WAS UNEVEN 4 v ( P SUK A3,1 MAKE REQUESTED LENGTH EVEN 4 * P RF(NP) MVUS70 ONLY ONE CHAR. TO MOVE? 4 P LDR A4,
0x39f0cc…39f260 Dummy {f00=0x0124, f01=0x0190, f02=»FROM USER BUFFER 4 v P* 5 PMVUS65 ECR A5,A5 5 " 0 P SCR A5,A2 STORE LAST CHAR. IN SYSTEM BUFFER 5 : P RB MVUS30 RETURN 5 n P* 5 4 PMVUS70 ELR A5,A1 GET LAST CHAR. FROM USER BUFFER 5 P RB MVUS65 5 P* 5 2 PMVUS80 EQU * BOTH BUFFER ADDRESSES
0x39f260…39f3f4 (2, 413) Dummy {f00=0x0124, f01=0x0190, f02=»UPDATE BUFFER ADDRESSES 5 P ADK A2,1 6 ( P SUK A3,1 DECREMENT REQUESTED LENGTH 6 2 & P RB(P) MVUS10 MORE CHAR. TO MOVE? 6 ^ P RB MVUS30 NO, RETURN 6 P* 6 P EJECT DMSUBR 6 P* 6 P* M O V : S U 6 P* 6 F P* THIS ROUTINE MOVES D
0x39f3f4…39f588 Dummy {f00=0x0124, f01=0x0190, f02=»USED, DEPENDING ON WHETHER THE BUFFER ADDRESSES ARE EVEN OR NOT. 6 P* 7 H : P* INPUT: A1 = ADDRESS OF SENDING BUFFER (SYSTEM AREA) 7 R : P* A2 = ADDRESS OF RECEIVING BUFFER (USER AREA) 7 . P* A3 = NUMBER OF BYTES TO BE MOVED 7 P* 7 "
0x39f588…39f71c Dummy {f00=0x0124, f01=0x0190, f02=»F REQUESTED LENGTH <= 0 7 x P STR A5,A14 SAVE A5 8 ( P LDR A4,A2 CHECK USER BUFFER ADDRESS 8 < P ANK A4,1 8 h . P RF(NZ) MVSU40 USER BUFFER ADDRESS UNEVEN? 8 z . P LDR A4,A1 NO, CHECK SYSTEM BUFFER ADDRESS 8 P ANK A4,1 8 0 P RF(NZ) MVSU60 SYSTEM BU
0x39f71c…39f8b0 Dummy {f00=0x0124, f01=0x018e, f02=»UNEVEN? 8 p P* 9 PMVSU20 MVSU A3 9 P* 9 0 " PMVSU30 LDR* A5,A14 RESTORE A5 9 : P* 9 ` PMVSU35 RTN A14 9 j P* 9 P EJECT DMSUBR 9 P* 9 P* 9 0 PMVSU40 EQU * USER BUFFER ADDRESS WAS UNEVEN 9 * P LDR A4,A1 CHECK SYSTEM BUFFER
0x39f8b0…39fa44 Dummy {f00=0x0124, f01=0x0190, f02=» 9 ^ P RF MVSU65 : P* : 2 PMVSU60 EQU * SYSTEM BUFFER ADDRESS WAS UNEVEN : $ 0 P LCR A4,A1 GET ONE CHAR. FROM SYSTEM BUFFER : Z P ECR A4,A4 : * P ADK A1,1 UPDATE SYSTEM BUFFER ADDRESS : ( P SUK A3,1 DECREMENT REQUESTED LENGTH : * P RF(NP) MVSU70
0x39fa44…39fbd8 Dummy {f00=0x0124, f01=0x0190, f02=»ER BUFFER : p & P ADK A1,1 UPDATE BUFFER ADDRESSES ; P ADK A2,2 ; < ( P SUK A3,1 DECREMENT REQUESTED LENGTH ; N & P RB(P) MVSU60 MORE CHAR. TO MOVE? ; z P RB MVSU30 NO, RETURN ; P* ; 4 PMVSU70 ELR A3,A2 GET LAST CHAR. FROM USER BUFFER ; $ P ANK
0x39fbd8…39fd6c Dummy {f00=0x0124, f01=0x018e, f02=»FFER ; j P RB MVSU30 RETURN < P* < & P EJECT DMSUBR < 0 P* < H P* < R 2 PMVSU80 EQU * BOTH BUFFER ADDRESSES WERE UNEVEN < 2 P LDR* A4,A1 GET FIRST CHAR. FROM SYSTEM BUFFER < 0 P ELR A5,A2 GET FIRST CHAR. FROM USER BUFFER < $ P ANK A4,/FF
0x39fd6c…39ff00 Dummy {f00=0x0124, f01=0x0190, f02=» < b & P ADK A1,1 UPDATE BUFFER ADDRESSES = P ADK A2,1 = 2 ( P SUK A3,1 DECREMENT REQUESTED LENGTH = D * P RB(P) MVSU10 MORE CHARACTERS TO MOVE? = p P RB MVSU30 NO, RETURN = P* = , PMVSU90 EQU * REQUESTED LENGTH WAS UNEVEN = ( P SUK A3,1 MAKE REQ
0x39ff00…3a0094 (2, 414) Dummy {f00=0x0124, f01=0x0190, f02=» = & P ADR A4,A5 UPDATE BUFFER ADDRESSES > P ADR A2,A5 > 2 2 P LDR* A4,A4 GET LAST CHAR. FROM SYSTEM BUFFER > D P RB MVSU70 > z P* > 8 PMVSU95 LDR* A4,A1 GET LAST CHAR. FROM SYSTEM BUFFER > P RB MVSU70 > P XIF > P* > P IFT MMUPAG=0
0x3a0094…3a0228 Dummy {f00=0x0124, f01=0x402e, f02=»IF > P* ? P* ? P END ? @ ? * P ADR A2,A5 > 2 2 P LDR* A4,A4 GET LAST CHAR. FROM SYSTEM BUFFER > D P RB MVSU70 > z P* > 8 PMVSU95 LDR* A4,A1 GET LAST CHAR. FROM SYSTEM BUFFER > P RB MVSU70 > P XIF > P* > P IFT MMUPAG=0
0x3a0228…3a03bc Dummy {f00=0x0124, 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* +
0x3a03bc…3a0550 Dummy {f00=0x0124, f01=0x0190, f02=» v PEND1 ADK A3,/81 B PEND0 SLL A3,1 ********************************** ( P ANK.L A3,/0300 n P LDK.L A4,/FCFF P AN.S A4,2,A14 B P OR.S A3,2,A14 UPDATE CR IN PSW CALLI
0x3a0550…3a06e4 Dummy {f00=0x0124, f01=0x0190, f02=»N ^ P RF(6) BB 6 P C1R A1,A1 DIVIDEND- .DIVISOR - & . P ADK A1,1 REMAINDER - ` PBB ADK A2,0 P RB(0) END0 P RB(2) END2 P RB(7) END1
0x3a06e4…3a0878 Dummy {f00=0x0124, f01=0x4056, f02=» LDK A1,0 P RB(7) END P XIF 2 P END >@ R - & . P ADK A1,1 REMAINDER - ` PBB ADK A2,0 P RB(0) END0 P RB(2) END2 P RB(7) END1
0x3a0878…3a0a0c Dummy {f00=0x0124, 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
0x3a0a0c…3a0ba0 Dummy {f00=0x0124, f01=0x018e, f02=» 4 | P XIF 5 P IFT CHR14=1 5 & P CCK A7,/1414 SPECIAL CHARACTER ? 5 ( P RF(E) PRB230 YES 5 R P XIF 5 l P* 5 x " P LDK A1,CCERR CODE CHECK ERROR 5 * P ORS A1,ECBRC,A8 STORE IN RETURN CODE 5 P LD A7,DWTOR,A6 GET ORDER 5 P ANK A7,/FF 5
0x3a0ba0…3a0d34 (2, 415) Opaque[0x194]
0x3a0d34…3a0ec8 # DirEnt {nam=»DVKB00«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2498, f03=0x0000}
0x3a0d34…3a0ec8 IdxSect {
0x3a0d34…3a0ec8 f00 = 0x0124 // 0x3a0d34 @0x0
0x3a0d34…3a0ec8 f01 = 0x0002 // 0x3a0d36 @0x2
0x3a0d34…3a0ec8 gno = [ // 0x3a0d38 @0x4
0x3a0d34…3a0ec8 [0x00]: C0x0124.0x3.0
0x3a0d34…3a0ec8 ]
0x3a0d34…3a0ec8 }
0x3a0ec8…3a105c Dummy {f00=0x0124, f01=0x0190, f02=» 2 P IDENT DVKB00 REL 9.2 79-11-16 870105040920 P : " P* KEYBOARD DEVICE WORK TABLE B P* h P ENTRY DVKB00 TABLE ENTRY r P EXTRN CTAB01 ( P EXTRN KBAD3 POINTER TO ADDRESSBLOCK P EXTRN DVDY00 PMMUPAG EQU 1 P*
0x3a105c…3a11f0 Dummy {f00=0x0124, f01=0x0190, f02=»ADDRESS P DATA DWTEND-DVKB00 ORDER ( P DATA KBAD3 POINTER TO ADDRESS BLOCK 2 P DATA 'KB' TTAB-ADDRESS ^ $ P DATA 0 WAIT/ACTIVATE INDICATOR ~ P DATA 0 TERMINAL QUEUE P IFT MMUPAG=1 & P DATA 0 SAVE AREA USER ECB ADDRESS P DAT
0x3a11f0…3a1384 Dummy {f00=0x0124, f01=0x0190, f02=»VE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-STACK 6 P DATA 0 TIMER POINTER N P DATA DVDY00 DVDY00O DEVICE l $ P DATA /FFFF BACKSPACE AND CANCEL $ P DATA /FFBA EOR AND DOUBLE ZERO 6 P DATA DWTSQ+DVKB00 POINTER TO FIRST PLAC
0x3a1384…3a1518 Dummy {f00=0x0124, f01=0x4118, f02=»A 0,0,0,0,0,0,0,0 P DATA 0,0,0,0 P IFT MMUPAG=1 0 PDEVECB EQU * F P DATA 0,0,0,0,0,0 Z P DATA 0,0,0,0,0,0,0,0 t P DATA 0,0,0,0,0,0,0,0 P DATA 0,0,0,0 P DATA 0,0,0,0,0 P XIF PDWTEND EQU * P* P
0x3a1518…3a16ac Dummy {f00=0x0124, 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
0x3a16ac…3a1840 Dummy {f00=0x0124, f01=0x0190, f02=» J F IDENT DVKB02 REL 9.2 79-11-16 870105040920 DVKB02K R DVKB02K d KBAD3 x CTAB03 , ( KB DVDY02 , ( %@
0x3a1840…3a19d4 (2, 416) Opaque[0x194]
0x3a19d4…3a1b68 # DirEnt {nam=»DVDY00«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24a0, f03=0x0000}
0x3a19d4…3a1b68 IdxSect {
0x3a19d4…3a1b68 f00 = 0x0125 // 0x3a19d4 @0x0
0x3a19d4…3a1b68 f01 = 0x0002 // 0x3a19d6 @0x2
0x3a19d4…3a1b68 gno = [ // 0x3a19d8 @0x4
0x3a19d4…3a1b68 [0x00]: C0x0125.0x0.0
0x3a19d4…3a1b68 ]
0x3a19d4…3a1b68 }
0x3a1b68…3a1cfc Dummy {f00=0x0125, f01=0x0190, f02=» 2 P IDENT DVDY00 REL 9.2 79-11-16 870105040920 P : * P* DEVICE WORK TABLE FOR VIDEO DISPLAY B P* p P ENTRY DVDY00 TABLE ENTRY z P* P* ( P EXTRN DYAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 1 P* PDVDY00 EQU * T
0x3a1cfc…3a1e90 Dummy {f00=0x0125, f01=0x0190, f02=» DATA DWTEND-DVDY00 ORDER ( P DATA DYAD POINTER TO ADDRESS-BLOCK " P DATA 'DY' TTAB-ADDRESS N $ P DATA 0 WAIT/ACTIVATE INDICATOR n P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB
0x3a1e90…3a2024 Dummy {f00=0x0125, f01=0x4158, f02=»VE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER . P DATA /101 CURSOR POINTER L * P DATA /1850 LEFT BYTE=NUMBER OF LINES n " P RIGHT BYTE=CHARACTERS/LINE P DATA 0 BUFFER INDEX P IFT MMUPAG=1 PDEVECB DATA 0,0,0,0,
0x3a2024…3a21b8 Dummy {f00=0x0125, 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
0x3a21b8…3a234c Dummy {f00=0x0125, f01=0x0190, f02=»A ILLINT 60 P DATA ILLINT 61 P DATA ILLINT 62 4 P DATA IHINPT IHINPT ROUTINE P P EJECT SYSTAB t P P* " P* SYSTEM CONTROL TABLE POINTER P* P DATA SCT P P P* P* SYSTEM TRAP
0x3a234c…3a24e0 Dummy {f00=0x0125, f01=0x0190, f02=» P XRR A13,A13 P XRR A14,A14 P LD A1,SCTBUG 0 P ABR(NZ) A1 F P HLT Z P f P EJECT SYSTAB n P P* P* SYSTEM CONTROL TABLE P* P PSCT EQU * P * PSCTMSZ DATA 0 MEMORY SIZE MOD K BYTES
0x3a24e0…3a2674 (2, 417) Opaque[0x194]
0x3a2674…3a2808 # DirEnt {nam=»DVKB01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24a8, f03=0x0000}
0x3a2674…3a2808 IdxSect {
0x3a2674…3a2808 f00 = 0x0125 // 0x3a2674 @0x0
0x3a2674…3a2808 f01 = 0x0002 // 0x3a2676 @0x2
0x3a2674…3a2808 gno = [ // 0x3a2678 @0x4
0x3a2674…3a2808 [0x00]: C0x0125.0x1.0
0x3a2674…3a2808 ]
0x3a2674…3a2808 }
0x3a2808…3a299c Dummy {f00=0x0125, f01=0x0190, f02=» 2 P IDENT DVKB01 REL 9.2 79-11-16 870105040920 P : " P* KEYBOARD DEVICE WORK TABLE B P* h P ENTRY DVKB01 TABLE ENTRY r P EXTRN CTAB02 ( P EXTRN KBAD3 POINTER TO ADDRESSBLOCK P EXTRN DVDY01 PMMUPAG EQU 1 P*
0x3a299c…3a2b30 Dummy {f00=0x0125, f01=0x0190, f02=»ADDRESS P DATA DWTEND-DVKB01 ORDER ( P DATA KBAD3 POINTER TO ADDRESS BLOCK 2 P DATA 'KB' TTAB-ADDRESS ^ $ P DATA 0 WAIT/ACTIVATE INDICATOR ~ P DATA 0 TERMINAL QUEUE P IFT MMUPAG=1 & P DATA 0 SAVE AREA USER ECB ADDRESS P DAT
0x3a2b30…3a2cc4 Dummy {f00=0x0125, f01=0x0190, f02=»VE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-STACK 6 P DATA 0 TIMER POINTER N P DATA DVDY01 DVDY01O DEVICE l $ P DATA /FFFF BACKSPACE AND CANCEL $ P DATA /FFBA EOR AND DOUBLE ZERO 6 P DATA DWTSQ+DVKB01 POINTER TO FIRST PLAC
0x3a2cc4…3a2e58 Dummy {f00=0x0125, f01=0x4118, f02=»A 0,0,0,0,0,0,0,0 P DATA 0,0,0,0 P IFT MMUPAG=1 0 PDEVECB EQU * F P DATA 0,0,0,0,0,0 Z P DATA 0,0,0,0,0,0,0,0 t P DATA 0,0,0,0,0,0,0,0 P DATA 0,0,0,0 P DATA 0,0,0,0,0 P XIF PDWTEND EQU * P* P
0x3a2e58…3a2fec Dummy {f00=0x0125, 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
0x3a2fec…3a3180 Dummy {f00=0x0125, f01=0x0190, f02=» v G G v U v G v : P V : V ~P * W x _$ 8 V V x % V v % : V V L 9k! P % _ V V W W r W V v ) W b G v ) - V
0x3a3180…3a3314 (2, 418) Opaque[0x194]
0x3a3314…3a34a8 # DirEnt {nam=»DVTP01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24b0, f03=0x0000}
0x3a3314…3a34a8 IdxSect {
0x3a3314…3a34a8 f00 = 0x0125 // 0x3a3314 @0x0
0x3a3314…3a34a8 f01 = 0x0002 // 0x3a3316 @0x2
0x3a3314…3a34a8 gno = [ // 0x3a3318 @0x4
0x3a3314…3a34a8 [0x00]: C0x0125.0x2.0
0x3a3314…3a34a8 ]
0x3a3314…3a34a8 }
0x3a34a8…3a363c Dummy {f00=0x0125, f01=0x018e, f02=» 2 P IDENT DVTP01 REL 9.2 79-11-16 870105040920 P : 4 P* DEVICE WORK TABLE FOR TELLER TERMINAL PRINTER B P* z P ENTRY DVTP01 TABLE ENTRY P* P* ( P EXTRN TPAD POINTER TO ADDRESS-BLOCK $ PMMUPAG EQU 1 MEM. MAN.UNIT COND.
0x3a363c…3a37d0 Dummy {f00=0x0125, f01=0x018e, f02=» P DATA 0 ECB ADDRESS P DATA DWTEND-DVTP01 ORDER ( P DATA TPAD POINTER TO ADDRESS BLOCK B P DATA 'TP' TTAB-ADDRESS n $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADD
0x3a37d0…3a3964 Dummy {f00=0x0125, f01=0x40f6, f02=» f P DATA 0,0,0,0 STACK P DATA 0 TIMER POINTER $ ( P DATA 0 REQUESTED,ACTUAL LINE NUMBER B P IFT MMUPAG=1 n PDEVECB EQU * P DATA 0,0,0,0,0,0 P XIF PDWTEND EQU * P* P* P END @ AREA USER ECB ADD
0x3a3964…3a3af8 Dummy {f00=0x0125, 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
0x3a3af8…3a3c8c Dummy {f00=0x0125, f01=0x0190, f02=»VUS50 MORE CHAR. TO MOVE? 3 P RB MVUS30 NO, RETURN 4 " P* 4 @ P EJECT DMSUBR 4 J P* 4 b P* 4 l , PMVUS60 EQU * REQUESTED LENGTH WAS UNEVEN 4 v ( P SUK A3,1 MAKE REQUESTED LENGTH EVEN 4 * P RF(NP) MVUS70 ONLY ONE CHAR. TO MOVE? 4 P LDR A4,
0x3a3c8c…3a3e20 Dummy {f00=0x0125, f01=0x0190, f02=»FROM USER BUFFER 4 v P* 5 PMVUS65 ECR A5,A5 5 " 0 P SCR A5,A2 STORE LAST CHAR. IN SYSTEM BUFFER 5 : P RB MVUS30 RETURN 5 n P* 5 4 PMVUS70 ELR A5,A1 GET LAST CHAR. FROM USER BUFFER 5 P RB MVUS65 5 P* 5 2 PMVUS80 EQU * BOTH BUFFER ADDRESSES
0x3a3e20…3a3fb4 (2, 419) Opaque[0x194]
0x3a3fb4…3a4148 # DirEnt {nam=»DVDY01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24b8, f03=0x0000}
0x3a3fb4…3a4148 IdxSect {
0x3a3fb4…3a4148 f00 = 0x0125 // 0x3a3fb4 @0x0
0x3a3fb4…3a4148 f01 = 0x0002 // 0x3a3fb6 @0x2
0x3a3fb4…3a4148 gno = [ // 0x3a3fb8 @0x4
0x3a3fb4…3a4148 [0x00]: C0x0125.0x3.0
0x3a3fb4…3a4148 ]
0x3a3fb4…3a4148 }
0x3a4148…3a42dc Dummy {f00=0x0125, f01=0x0190, f02=» 2 P IDENT DVDY01 REL 9.2 79-11-16 870105040920 P : * P* DEVICE WORK TABLE FOR VIDEO DISPLAY B P* p P ENTRY DVDY01 TABLE ENTRY z P* P* ( P EXTRN DYAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 1 P* PDVDY01 EQU * T
0x3a42dc…3a4470 Dummy {f00=0x0125, f01=0x0190, f02=» DATA DWTEND-DVDY01 ORDER ( P DATA DYAD POINTER TO ADDRESS-BLOCK " P DATA 'DY' TTAB-ADDRESS N $ P DATA 0 WAIT/ACTIVATE INDICATOR n P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB
0x3a4470…3a4604 Dummy {f00=0x0125, f01=0x4158, f02=»VE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER . P DATA /101 CURSOR POINTER L * P DATA /1850 LEFT BYTE=NUMBER OF LINES n " P RIGHT BYTE=CHARACTERS/LINE P DATA 0 BUFFER INDEX P IFT MMUPAG=1 PDEVECB DATA 0,0,0,0,
0x3a4604…3a4798 Dummy {f00=0x0125, 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
0x3a4798…3a492c Dummy {f00=0x0125, f01=0x0190, f02=»1,0 SET CR # $ P RF(Z) TAS160 ALL VOLUMES FOUND $ P* $ : , P* ALL VOL NOT FOUND. ACT FLEXDISCTASK $ D P* $ t P LD A1,TASCVO $ ~ P LDK A2,2 ID DMTASK FLEXDISC $ P SC A2,TASVOL,A1 SEE TAS195 $ P EJECT $ P* $ , P* CHECK IF FILE CO
0x3a492c…3a4ac0 Dummy {f00=0x0125, f01=0x0190, f02=»D $ j P LDR A10,A10 TC % P RF(Z) TAS165 GLOBAL ASSIGN % " P LD A2,TASTTA TTAB ADDR % F P LDR A4,A2 % f P LD A2,TTB:TD,A4 % x P ADKL A4,TTB:TD+1 % P RF TAS170 % PTAS165 EQU * % P LD A4,SCTCDT % P LDR* A2,A4 % P ADK A4,1 %
0x3a4ac0…3a4c54 (2, 420) Opaque[0x194]
0x3a4c54…3a4de8 # DirEnt {nam=»DVKB02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24c0, f03=0x0000}
0x3a4c54…3a4de8 IdxSect {
0x3a4c54…3a4de8 f00 = 0x0126 // 0x3a4c54 @0x0
0x3a4c54…3a4de8 f01 = 0x0002 // 0x3a4c56 @0x2
0x3a4c54…3a4de8 gno = [ // 0x3a4c58 @0x4
0x3a4c54…3a4de8 [0x00]: C0x0126.0x0.0
0x3a4c54…3a4de8 ]
0x3a4c54…3a4de8 }
0x3a4de8…3a4f7c Dummy {f00=0x0126, f01=0x0190, f02=» 2 P IDENT DVKB02 REL 9.2 79-11-16 870105040920 P : " P* KEYBOARD DEVICE WORK TABLE B P* h P ENTRY DVKB02 TABLE ENTRY r P EXTRN CTAB03 ( P EXTRN KBAD3 POINTER TO ADDRESSBLOCK P EXTRN DVDY02 PMMUPAG EQU 1 P*
0x3a4f7c…3a5110 Dummy {f00=0x0126, f01=0x0190, f02=»ADDRESS P DATA DWTEND-DVKB02 ORDER ( P DATA KBAD3 POINTER TO ADDRESS BLOCK 2 P DATA 'KB' TTAB-ADDRESS ^ $ P DATA 0 WAIT/ACTIVATE INDICATOR ~ P DATA 0 TERMINAL QUEUE P IFT MMUPAG=1 & P DATA 0 SAVE AREA USER ECB ADDRESS P DAT
0x3a5110…3a52a4 Dummy {f00=0x0126, f01=0x0190, f02=»VE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-STACK 6 P DATA 0 TIMER POINTER N P DATA DVDY02 DVDY02O DEVICE l $ P DATA /FFFF BACKSPACE AND CANCEL $ P DATA /FFBA EOR AND DOUBLE ZERO 6 P DATA DWTSQ+DVKB02 POINTER TO FIRST PLAC
0x3a52a4…3a5438 Dummy {f00=0x0126, f01=0x4118, f02=»A 0,0,0,0,0,0,0,0 P DATA 0,0,0,0 P IFT MMUPAG=1 0 PDEVECB EQU * F P DATA 0,0,0,0,0,0 Z P DATA 0,0,0,0,0,0,0,0 t P DATA 0,0,0,0,0,0,0,0 P DATA 0,0,0,0 P DATA 0,0,0,0,0 P XIF PDWTEND EQU * P* P
0x3a5438…3a55cc Dummy {f00=0x0126, 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
0x3a55cc…3a5760 Dummy {f00=0x0126, f01=0x0190, f02=»TTX @ @ T : b @ R @ T P / _ T @ A V W W t PT W f ( W d ( d G =h G V d V r < V f P W f _B V W V t
0x3a5760…3a58f4 (2, 421) Opaque[0x194]
0x3a58f4…3a5a88 # DirEnt {nam=»DVDI02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24c8, f03=0x0000}
0x3a58f4…3a5a88 IdxSect {
0x3a58f4…3a5a88 f00 = 0x0126 // 0x3a58f4 @0x0
0x3a58f4…3a5a88 f01 = 0x0002 // 0x3a58f6 @0x2
0x3a58f4…3a5a88 gno = [ // 0x3a58f8 @0x4
0x3a58f4…3a5a88 [0x00]: C0x0126.0x1.0
0x3a58f4…3a5a88 ]
0x3a58f4…3a5a88 }
0x3a5a88…3a5c1c Dummy {f00=0x0126, f01=0x0190, f02=» 2 P IDENT DVDI02 REL 9.2 79-11-16 870105040920 P : P =1,HANG UP AT /03 OUTPUT B P REL 9.1 79-05-23 f P* . P* DEVICE WORK TABLE FOR DISPLAY INDICATOR P* P* & P ENTRY DVDI02 DISPLAY INDICATOR 03 P* P*
0x3a5c1c…3a5db0 Dummy {f00=0x0126, f01=0x0190, f02=»RAMETER z 0 P DATA /8000 STATUS. /8000 MEANS DEVICE READY P DATA 0 ECB ADDRESS D P DATA DWTEND-DVDI02 ORDER ` ( P DATA DIAD POINTER TO ADDRESS-BLOCK 6 P DATA 'DI',0 TERM.NUMBER AND PROGRAM START ADDRESS $ P DATA 0 ECB QUEUE ANCHOR ADDRESS
0x3a5db0…3a5f44 Dummy {f00=0x0126, f01=0x4162, f02=»UEUE P DATA /0000 P DATA /3F4F,/5F6F * P DATA 0 SAVE AREA FOR FLASHING LIGHTS : P DATA 0 TIMER POINTER h P DATA 0 DUMMY WORD =1 P DATA 0 DUMMY WORD =1 " P DATA 0 DUMMY TIMER POINTER =1 P IFT MMUPAG=1 PDEVECB DAT
0x3a5f44…3a60d8 Dummy {f00=0x0126, 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
0x3a60d8…3a626c Dummy {f00=0x0126, f01=0x0000, f02=»
[…0x1…]
0x3a6400…3a6594 (2, 422) Opaque[0x194]
0x3a6594…3a6728 # DirEnt {nam=»DVDY02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24d0, f03=0x0000}
0x3a6594…3a6728 IdxSect {
0x3a6594…3a6728 f00 = 0x0126 // 0x3a6594 @0x0
0x3a6594…3a6728 f01 = 0x0002 // 0x3a6596 @0x2
0x3a6594…3a6728 gno = [ // 0x3a6598 @0x4
0x3a6594…3a6728 [0x00]: C0x0126.0x2.0
0x3a6594…3a6728 ]
0x3a6594…3a6728 }
0x3a6728…3a68bc Dummy {f00=0x0126, f01=0x0190, f02=» 2 P IDENT DVDY02 REL 9.2 79-11-16 870105040920 P : * P* DEVICE WORK TABLE FOR VIDEO DISPLAY B P* p P ENTRY DVDY02 TABLE ENTRY z P* P* ( P EXTRN DYAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 1 P* PDVDY02 EQU * T
0x3a68bc…3a6a50 Dummy {f00=0x0126, f01=0x0190, f02=» DATA DWTEND-DVDY02 ORDER ( P DATA DYAD POINTER TO ADDRESS-BLOCK " P DATA 'DY' TTAB-ADDRESS N $ P DATA 0 WAIT/ACTIVATE INDICATOR n P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB
0x3a6a50…3a6be4 Dummy {f00=0x0126, f01=0x4158, f02=»VE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER . P DATA /101 CURSOR POINTER L * P DATA /1850 LEFT BYTE=NUMBER OF LINES n " P RIGHT BYTE=CHARACTERS/LINE P DATA 0 BUFFER INDEX P IFT MMUPAG=1 PDEVECB DATA 0,0,0,0,
0x3a6be4…3a6d78 Dummy {f00=0x0126, 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
0x3a6d78…3a6f0c Dummy {f00=0x0126, f01=0x0000, f02=»
[…0x1…]
0x3a70a0…3a7234 (2, 423) Opaque[0x194]
0x3a7234…3a73c8 # DirEnt {nam=»DVGP03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24d8, f03=0x0000}
0x3a7234…3a73c8 IdxSect {
0x3a7234…3a73c8 f00 = 0x0126 // 0x3a7234 @0x0
0x3a7234…3a73c8 f01 = 0x0002 // 0x3a7236 @0x2
0x3a7234…3a73c8 gno = [ // 0x3a7238 @0x4
0x3a7234…3a73c8 [0x00]: C0x0126.0x3.0
0x3a7234…3a73c8 ]
0x3a7234…3a73c8 }
0x3a73c8…3a755c Dummy {f00=0x0126, f01=0x018e, f02=» 2 P IDENT DVGP03 REL 9.2 79-11-16 870105040920 P : , P* DEVICE WORK TABLE FOR GENERAL PRINTER B P* r P ENTRY DVGP03 TABLE ENTRY | P* P* ( P EXTRN GPAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 1 P* PDVGP03 EQU *
0x3a755c…3a76f0 Dummy {f00=0x0126, f01=0x0190, f02=» P DATA DWTEND-DVGP03 ORDER ( P DATA GPAD POINTER TO ADDRESS-BLOCK & P DATA 'GP' TTAB-ADDRESS R $ P DATA 0 WAIT/ACTIVATE INDICATOR r P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU
0x3a76f0…3a7884 Dummy {f00=0x0126, f01=0x40f0, f02=»0 SAVE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER 2 " P DATA 0 HEAD POSITIPN POINTER P P IFT MMUPAG=1 v PDEVECB DATA 0,0,0,0,0,0 P XIF PDWTEND EQU * P* P* P END @ DATA DEVECB MMU
0x3a7884…3a7a18 Dummy {f00=0x0126, 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
0x3a7a18…3a7bac Dummy {f00=0x0126, f01=0x0000, f02=»
[…0x1…]
0x3a7d40…3a7ed4 (2, 424) Opaque[0x194]
0x3a7ed4…3a8068 # DirEnt {nam=»M:92NA«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x24e0, f03=0x0000}
0x3a7ed4…3a8068 IdxSect {
0x3a7ed4…3a8068 f00 = 0x0127 // 0x3a7ed4 @0x0
0x3a7ed4…3a8068 f01 = 0x0020 // 0x3a7ed6 @0x2
0x3a7ed4…3a8068 gno = [ // 0x3a7ed8 @0x4
0x3a7ed4…3a8068 [0x00]: C0x0127.0x0.0
0x3a7ed4…3a8068 [0x01]: C0x0127.0x1.0
0x3a7ed4…3a8068 [0x02]: C0x0127.0x2.0
0x3a7ed4…3a8068 [0x03]: C0x0127.0x3.0
0x3a7ed4…3a8068 [0x04]: C0x0128.0x0.0
0x3a7ed4…3a8068 [0x05]: C0x0128.0x1.0
0x3a7ed4…3a8068 [0x06]: C0x0128.0x2.0
0x3a7ed4…3a8068 [0x07]: C0x0128.0x3.0
0x3a7ed4…3a8068 [0x08]: C0x0129.0x0.0
0x3a7ed4…3a8068 [0x09]: C0x0129.0x1.0
0x3a7ed4…3a8068 [0x0a]: C0x0129.0x2.0
0x3a7ed4…3a8068 [0x0b]: C0x0129.0x3.0
0x3a7ed4…3a8068 [0x0c]: C0x012a.0x0.0
0x3a7ed4…3a8068 [0x0d]: C0x012a.0x1.0
0x3a7ed4…3a8068 [0x0e]: C0x012a.0x2.0
0x3a7ed4…3a8068 [0x0f]: C0x012a.0x3.0
0x3a7ed4…3a8068 ]
0x3a7ed4…3a8068 }
0x3a8068…3a81fc Dummy {f00=0x0127, f01=0x0190, f02=» w J h h h h h h < h h% % $ . 8 h h h h h h $ h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h n c @ Tg t z ^ b bLPL H b2 Z ` z
0x3a81fc…3a8390 Dummy {f00=0x0127, f01=0x0190, f02=» 4c @S{ D d 2Z $"z y B % y D Dbf d * F :P }B W [~ ? d j% L "~ T &b ICn 1 d _ A d " ]b _ @]b > > U # T @ H ( ( P c P W: P, A]b @ V ( U P" @DVV LDVW @Dh
0x3a8390…3a8524 Dummy {f00=0x0127, f01=0x0190, f02=» 6 8 ]h Q Z P 0 9 t t_ $ @ _, ? P H H #P h A d A FQ ? @]` : ) A]`_ @ @ A H ( A]b_ ? ? ? ? ? ^ A _ _ ^ ]` $P T I R $ 5 % > ? W ? W ? T T$ U U U U
0x3a8524…3a86b8 Dummy {f00=0x0127, f01=0x0190, f02=» Q Q > > 0 @]4 1 A]4 P P > ? * X " R" Y T ? X D D T> YrW8 > _& @ 8 R" Y T ? X D D T YrW > _& W2 > 8 X W( ? ` @ @ P $ H W W > > > > > > @](V ? ]( > _ > ? _ > > ? ^ ! Y ^ _ n ?
0x3a86b8…3a884c Dummy {f00=0x0127, f01=0x0190, f02=» < $ ( , 0 4 8 < C 8W T 8P Y ^ 5 ) P U ] XH D #DP @ R XV Y @ P, D T W X &P T X I Y T # C C W4 O " # X Y ) C
0x3a884c…3a89e0 Dummy {f00=0x0127, f01=0x0190, f02=» P j$ > > F C F C > B R Q F ! P C > C > F :c" H :b"? #" : C > B R Q~ P0 B P* 0$ T # R QL > X B U( H Q2 X
0x3a89e0…3a8b74 (2, 425) Dummy {f00=0x0127, f01=0x0190, f02=» P PL $ # Q > P _0 # T p > P p (_H _2 B U X > ? _ X T (@ H ^ > > ? _ X T X X T % T ?C L Rl _@(@ L U L Q0 M & X
0x3a8b74…3a8d08 Dummy {f00=0x0127, f01=0x0190, f02=» 0P X T 4 Y X D X T X Y 1 1 X P - M T $ PD _ T " # p X L R P RP (@ ^ X P8 P0 # P T P 0P 1 _ t W Y > > ]:J B B ]BJ B B pU
0x3a8d08…3a8e9c Dummy {f00=0x0127, f01=0x0190, f02=» 0 R t B " P Q :A H P P ]x H !@T I ] T ! 1 U ]| A d ? W A d ? W A d ? W U R ; V ~# T R p 4 # PJ P 4 RL P 4 ] P $ P ] U PD P< P0 P,
0x3a8e9c…3a9030 Dummy {f00=0x0127, f01=0x0190, f02=» ' T P X P " >Wh T # Y U T ] W 8V X $P y $W $ D P 8R R ] Y $ X Z ;BR 8% =A Y T Z& h_, X ' X 4X< XB U T T U 5 U R " ] ~ ] ;h # <c$
0x3a9030…3a91c4 Dummy {f00=0x0127, f01=0x0190, f02=»X <d$ _D $?:D" Y X P Y # P 4T U # P 4 4 P _r T _$ U _ ? 4 U 5 R PF "P2 R T T R X # X h > P P P ` X XF _H Wj ? T T D W u > > E D E
0x3a91c4…3a9358 Dummy {f00=0x0127, f01=0x0190, f02=»XB Y X X X X ' 4 B U B (" W C (@ > ?" 8' ?A R 8;b# 4T RT T T ] ] 8 W< TrW T ] _ P T V WT 8V T P U 8 ~ U Q2P X H 5 U R " ] ~ Y > > V P
0x3a9358…3a94ec Dummy {f00=0x0127, f01=0x0190, f02=» 4XR XX 5 h_b Y Y Y X 9BV$ X & Y " X D V & X . T 8TV 9WD B 7P P ]x A]^W A]^ @]^A.W ? A dI.9 X R C C & ] ?A @]^A. X V 9_: @
0x3a94ec…3a9680 Dummy {f00=0x0127, f01=0x0190, f02=» Pb P Pv Pz * 6 + ]x A]^ @]^A. H D d ] Y HW A]^ @]^A. Wx ! * X , X P ! ! BW< ! * _ ! * _& ! X , X P ! H X , X P B B ! f ! B ! T Y *W X * p ! H# f & ! H ! " 0 TOT
0x3a9680…3a9814 (2, 426) Dummy {f00=0x0127, f01=0x0190, f02=»& Ph B @ @ :C P ! H 9DV ! (@ B r ! ! R ! j ! ! b ! ( ! ! Z ! X Y . X * f " ! H_ Y * 4 ! ~ PT C ! l ! H ! (@ ! ~ R _ ! V 1 ;h 1 ! V 1 ! ! l* ! B ! ! ~ ) ! H Y *# T X
0x3a9814…3a99a8 Dummy {f00=0x0127, f01=0x0190, f02=» ! B ! ~ ! T )WL WP ! ~ Xz R ! ( - j ! ) W. Y PW Y P Y L Y N Y B S W W B C & ] _ ? , Y " X $ T X Y $ Y X HP 1 Y H ]^ 0 Y J 1 0B. X (P y (_^ ( D _n Y ( " X . P Y : ! F ! H X # P
0x3a99a8…3a9b3c Dummy {f00=0x0127, f01=0x0190, f02=» D C Y B ] K & E % Y B K , X ;AR@;a X &P Y & P 7P < $ <C ! 9 4 X t " _ W B RZ X , X P W P Q8 U _ T,: B R(' P Q 9BW Q 9C B ! T 4 x @ P ;A _ 4
0x3a9b3c…3a9cd0 Dummy {f00=0x0127, f01=0x0190, f02=»U P jW kQ 4 Y * ! 0" Z Y" P Z _ 4 A ;D A 4 R _ ;H 4 r ! (:C 4 Z ! ( 4 X " 4 ! ) 4 X P t 4 P y _^ _n Y " X P Y : ! ! H X # P
0x3a9cd0…3a9e64 Dummy {f00=0x0127, f01=0x0190, f02=» P Y P 7P < $ <C ! 9 4 X t " _ W B R X X P W P Q U _ T : B R ' P Q 9BW Q 9C B ! T 4 x @ P ;A _ 4
0x3a9e64…3a9ff8 Dummy {f00=0x0127, f01=0x0190, f02=»U P jW kQ 4 Y ! 0" Z Y" P Z _ 4 A ;D A 4 R _ ;H 4 ! (:C 4 ! ( 4 X " 4 ! ) 4 X P t 4 P y _^ X' X' P Y : ! ! H X # P
0x3a9ff8…3aa18c Dummy {f00=0x0127, f01=0x0190, f02=»:H B # LCD Y @ P P $_ D _` _$ X 9 'jP. @B CD ]x @C `C @C P 0P _ % AB AC &_ B QJ Z X ! 3 #P_ X P 0 Y P C x_ 6_ B Y _ ]| X P A H D P Y Wb Y @_ X X A l
0x3aa18c…3aa320 Dummy {f00=0x0127, f01=0x0190, f02=»X( P _ 0 )_6 (P _ ) 1 4 'j X R2 X T* X P& , Y L C L C x > @ @ @ A X &_" X P y Y X P T @ T A A > A A A A A W > ! H
0x3aa320…3aa4b4 (2, 427) Dummy {f00=0x0127, f01=0x0190, f02=»I A P " " !&T #d_ !&T T 'j " " X !&:_ !' A @ P @ P !#f A A _ !' @ P @' X@ !# TD A !$p @ P( @' P" @ 8 !" X Y !#f A _B !&: X>_b A @' @ T 1 Z 0 2P P P A @ 8 HCD @' P E 'j
0x3aa4b4…3aa648 Dummy {f00=0x0127, f01=0x0190, f02=» @ A Y " @ _D !' @ T @ P !$ !' @ T @ X Wj A I D " ] @ @ @ A #: !' @ XN !&: T @ P !$x !& _h /T& @ X @ P !#f !$t A _ A #: < A @ T _, _0 @ T<W @' T !$`_ !" !$R_ A A HCD E
0x3aa648…3aa7dc Dummy {f00=0x0127, f01=0x0190, f02=» !$ !& A _^ Y Y " W _j @ P< @ T6 X R0 X P T$ T Y W P C & A A @ P X Y 4 @' @ T @ A @ A A !&DT2 P4 PJ PL P P. 1 A @ ]6W P _@ @' @ E !'FP !& 4
0x3aa7dc…3aa970 Dummy {f00=0x0127, f01=0x0190, f02=» @ @ A @ T$ @'k !&B 8 !&BW - !&B x !B W 0 " WL R ~T }T T0 W, !&B P " ! " :A *@ HCD T 0 !&B W R !&B A @ @ UH Zt Q P Q T 0 !&B A 0 !&B A !&B " !&0 " !&0 $ A _" B J B !&: !
0x3aa970…3aab04 Dummy {f00=0x0127, f01=0x0190, f02=»B P W !' ] _ !&: ! 1 4 A&R @C `C @C P 0 M A&R 4 ? @ A @ T & @ A & ] A a 4 D & X A > D & Z A 4 A !& @ P !$x !& @ P a A 4 A'@ A'B A'D ?a :a# P @'@ @
0x3aab04…3aac98 Dummy {f00=0x0127, f01=0x0190, f02=» @ @ A @ T @ ! 8 ! W - ! x ! W 0 " W R ~T }T T W ! P " ! " :A *@ H T 0 ! W R ! A @ @ U Zt Q P Q T 0 ! A 0 ! A ! " ! " ! $ A _" B J B ! !
0x3aac98…3aae2c Dummy {f00=0x0127, f01=0x0190, f02=»B P W ! _ !&: ! 1 4 A&R @ ` @ P 0 M A&R 4 ? @ A @ T @ A A a 4 & X A > Z A 4 A !& @ P !$x !& @ P a A 4 A A A ?a :a# P @ @
0x3aae2c…3aafc0 Dummy {f00=0x0127, f01=0x0190, f02=» @ @ A @ T @ ! 8 ! W - ! x ! W 0 " W R ~T }T T W ! P " ! " :A *@ H T 0 ! W R ! A @ @ U Zt Q P Q T 0 ! A 0 ! A ! " ! " ! $ A _" B J B ! !
0x3aafc0…3ab154 (2, 428) Dummy {f00=0x0128, f01=0x0190, f02=»B P W ! _ !&: ! 1 4 A&R @ ` @ P 0 M A&R 4 ? @ A @ T @ A A a 4 & X A > Z A 4 A !& @ P !$x !& @ P a A 4 A A A ?a :a# P @ @
0x3ab154…3ab2e8 Dummy {f00=0x0128, f01=0x0190, f02=» @ @ A @ T @ ! 8 ! W - ! x ! W 0 " W R ~T }T T W ! P " ! " :A *@ H T 0 ! W R ! A @ @ U Zt Q P Q T 0 ! A 0 ! A ! " ! " ! $ A _" B J B ! !
0x3ab2e8…3ab47c Dummy {f00=0x0128, f01=0x0190, f02=»B P W ! _ !&: ! 1 4 A&R @ ` @ P 0 M A&R 4 ? @ A @ T @ A A a 4 & X A > Z A 4 A !& @ P !$x !& @ P a A 4 A A A ?a :a# P @ @
0x3ab47c…3ab610 Dummy {f00=0x0128, f01=0x0190, f02=» @ @ A @ T @ ! 8 ! W - x ! W 0 " W R ~T }T T W ! P " ! " :A *@ H T 0 ! W R ! A @ @ U Zt Q P Q T 0 ! A 0 ! A ! " ! " ! $ A _" B J B ! !
0x3ab610…3ab7a4 Dummy {f00=0x0128, f01=0x0190, f02=»B P W ! _ !&: ! 1 4 A&R @ ` @ P 0 M A&R 4 ? @ A @ T @ A A a 4 & X A > Z A 4 A !& @ P !$x !& @ P a A 4 A A A ?a :a# P @ @
0x3ab7a4…3ab938 Dummy {f00=0x0128, f01=0x0190, f02=» @ @ A @ T @ ! 8 ! W - x ! W 0 " W R ~T }T T W ! P " ! " :A *@ H T 0 ! W R ! A @ @ U Zt Q P Q T 0 ! A 0 ! A ! " ! " ! $ A _" B J B ! !
0x3ab938…3abacc Dummy {f00=0x0128, f01=0x0190, f02=»B P W ! _ !&: ! 1 4 A&R @ ` @ P 0 M A&R 4 ? @ A @ T @ A A a 4 & X A > Z A 4 A !& @ P !$x !& @ P a A 4 A A A ?a :a# P @ @
0x3abacc…3abc60 Dummy {f00=0x0128, f01=0x0190, f02=» @ @ A @ T @ ! 8 ! W - x ! W 0 " W R ~T }T T W ! P " ! " :A *@ H T 0 ! W R ! A @ @ U Zt Q P Q T 0 ! A 0 ! A ! " ! " ! $ A _" B J B ! !
0x3abc60…3abdf4 (2, 429) Dummy {f00=0x0128, f01=0x0190, f02=»B P W ! _ !&: ! 1 4 A&R @ ` @ P 0 M A&R 4 ? @ A @ T @ A A a 4 & X A > Z A 4 A !& @ P !$x !& @ P a A 4 A A A ?a :a# P @ @
0x3abdf4…3abf88 Dummy {f00=0x0128, f01=0x0190, f02=» @ @ A @ T @ ! 8 ! W - x ! W 0 " W R ~T }T T W ! P " ! " :A *@ H T 0 ! W R ! A @ @ U Zt Q P Q T 0 ! A 0 ! A ! " ! " ! $ A _" B J B ! !
0x3abf88…3ac11c Dummy {f00=0x0128, f01=0x0190, f02=»B P W ! _ !&: ! 1 4 A&R @ ` @ P 0 M A&R 4 ? @ A @ T @ A A a 4 & X A > Z A 4 A !& @ P !$x !& @ P a A 4 A A A ?a :a# P @ @
0x3ac11c…3ac2b0 Dummy {f00=0x0128, f01=0x0190, f02=» @ @ A @ T @ ! 8 ! W - x ! W 0 " W R ~T }T T W ! P " ! " :A *@ H T 0 ! W R ! A @ @ U Zt Q P Q T 0 ! A 0 ! A ! " ! " ! $ A _" B J B ! !
0x3ac2b0…3ac444 Dummy {f00=0x0128, f01=0x0190, f02=»B P W ! _ !&: ! 1 4 A&R @ ` @ P 0 M A&R 4 ? @ A @ T @ A A a 4 & X A > Z A 4 A !& @ P !$x !& @ P a A 4 A A A ?a :a# P @ @
0x3ac444…3ac5d8 Dummy {f00=0x0128, f01=0x0190, f02=» @ @ A @ T @ ! 8 ! W - x ! W 0 " W R ~T }T T W ! P " ! " :A *@ H T 0 ! W R ! A @ @ U Zt Q P Q T 0 ! A 0 ! A ! " ! " ! $ A _" B J B ! !
0x3ac5d8…3ac76c Dummy {f00=0x0128, f01=0x0190, f02=»B P W ! _ !&: ! 1 4 A&R @ ` @ P 0 M A&R 4 ? @ A @ T @ A A a 4 & X A > Z A 4 A !& @ P !$x !& @ P a A 4 A A A ?a :a# P @ @
0x3ac76c…3ac900 Dummy {f00=0x0128, f01=0x0190, f02=» @ @ A @ T @ ! 8 ! W - x ! W 0 " W R ~T }T T W ! P " ! " :A *@ H T 0 ! :f"? HB !&B "? HB !&B 4 ABCDEFGHI#.<(+!&JKLMNOPQR$]*);^-/STUVWXYZ@,%_>?0123456789:[ '="C C
0x3ac900…3aca94 (2, 430) Dummy {f00=0x0128, f01=0x0190, f02=» {|[_m TOSS T C D D ] P C D D _ t _< ? ^ 4 _ P P @ 6 1 A 6 _ P 9 > > & D] ^ ^ ^ C ^(w w x xvx z z w^wr EzEzF F F F F F F F
0x3aca94…3acc28 Dummy {f00=0x0128, f01=0x0190, f02=»P T @ R $P U + U _ (@(@ ID P ^ F HD Y HD B # X ( U F B r H W Y & Y $ 0 Y . F Z2 F B Y I B Y J_ W Z| C P C W < C C _H Z| H H S W C C B B
0x3acc28…3acdbc Dummy {f00=0x0128, f01=0x0190, f02=» S W C C W, B B Y IR Q X JU C '? T W6 Z T.(@(@ P #D z H ] ]|H H L>L>L>L>L>J J H L>J H L>L>L>L>J J H F X (P R X (W G G : R $ - _ " P $ - : R $ - _ : Z $ -_ D ( U
0x3acdbc…3acf50 Dummy {f00=0x0128, f01=0x0190, f02=» @ _ ]b ( H > H X &Pj D ^V" D "? P P &P E ^ [ V, P ( Hl( ( W H [6 L> B W C X '? F X & X ( )T L> G& G K X $TT T AG$ J , YN P W T Y $ P T _ Y &
0x3acf50…3ad0e4 Dummy {f00=0x0128, f01=0x0190, f02=» ` U0 @ , D !##X D ( * ]" 0 X Wf ` U @ H @ X WF Z2 N 4 5W P 0 @V( 1 AV((@_ 1 (@ J` / O $P % 4 F G| (@ B & P 9 . LT 4' J ' J 5
0x3ad0e4…3ad278 Dummy {f00=0x0128, f01=0x0190, f02=» L< & ( F " F +P P* X $ T Y U W Y R P> $P8W L> X ( X & F X P @]b Q (@ H + X ^V" P "P8 $P4W X & X bT( ;AR ( K ( H [6 T Y ^ F " F D '? P P( $ P" Z| I
0x3ad278…3ad40c Dummy {f00=0x0128, f01=0x0190, f02=» yr B B P ! Tn M O : Lf Ay Ay " P y< "" y P O yr @y> .(@ Dy@ C C C W C ( Lf Lh L " TOP O Ayp L Ayn L C yl @yn AynQ< @y> O4 Ay> @y O B & Dy@ EyBX #D
0x3ad40c…3ad5a0 Dummy {f00=0x0128, f01=0x0190, f02=» O U _ L !SSP !LL O W L @yH AyHV O P EyJ @y> EyL P EyZ P Ey DyJT yjP O P 2% P( R 0 Xy@T R , @ypT R RT @y O O 6 P 2% P O yj r P %_ S D S E 3 P
0x3ad5a0…3ad734 (2, 431) Dummy {f00=0x0128, f01=0x0190, f02=» R ( >a U Wb 0 =b PyJP @yH ! T. W< PyL Dy@ Y PyZ Y Py Y U ! T ! X6 _R _V Dy " P yr Ays ( ^ W @y P6 I @y P @X V W HX IX (@ @yjP -W P B & . y (@( @y P^
0x3ad734…3ad8c8 Dummy {f00=0x0128, f01=0x0190, f02=» S b O U _ L !SSP !LL W L @ A V P E @ E P E P E D T P 2% P R 0 X T R , @ T R RT @ 6 2% P P %_ S D S E 3 P
0x3ad8c8…3ada5c Dummy {f00=0x0128, f01=0x0190, f02=» R ( >a U W 0 =b P P @ ! T W P D Y P Y P Y U ! T ! X6 _R _V D " P A ( ^ W @ P I @ P @ V W H I (@ @ P -W P B (@( @
0x3ada5c…3adbf0 Dummy {f00=0x0128, f01=0x0190, f02=» S b O U _ L !SSP !LL W L @ A V P E @ E P E P E D T P 2% P R 0 X T R , @ T R RT @ 6 2% P P %_ S D S E 3 P
0x3adbf0…3add84 Dummy {f00=0x0128, f01=0x0190, f02=» R ( >a U W 0 =b P P @ ! T W P D Y P Y P Y U ! T ! X6 _R _V D " P A ( ^ W @ P I @ P @ V W H I (@ @ P -W P B (@( @
0x3add84…3adf18 Dummy {f00=0x0128, f01=0x0190, f02=» S b O U _ L !SSP !LL W L @ A V P E @ E P E P E D T P 2% P R 0 X T R , @ T R RT @ 6 2% P P %_ S D S E 3 P
0x3adf18…3ae0ac Dummy {f00=0x0128, f01=0x0190, f02=» R ( >a U W 0 =b P P @ ! T W P D Y P Y P Y U ! T ! X6 _R _V D " P A ( ^ W @ P I @ P @ V W H I (@ @ P -W Y P Q R ;A [ [ :
0x3ae0ac…3ae240 Dummy {f00=0x0128, f01=0x0190, f02=» _ T !##P> ? R4 L TX P L P 4 M X M M _8 > & D LW 0P Q P P E +P W : X + P X L 1 Y L : L 4W 0P8 R Q P W R D + Q ( 0 5 @]4 1 A]4 Z> : D NW (P D + I W6 @V(T n
0x3ae240…3ae3d4 (2, 432) Dummy {f00=0x0129, f01=0x0190, f02=»R P Y $ P X ( _ W Y & : B P6 T G W& X ^ Y ^ B I ~ B T B : X "? P P X T _ X . P X $ ! # C W C C X %? : X &_ 0 D . P , _ D . D $ D *
0x3ae3d4…3ae568 Dummy {f00=0x0129, f01=0x0190, f02=»U x 0 )_8 $_ $ ) YP_J U ; $ T $ T $ TNp : : $ T* (W $ U $ ) Y _& (# )_4 $ ($ ) YR_L U p 0_8 $_< &| h N | r l ^ bZe g hv > > @]b 0 A]bW & ^ ! Z( ]`
0x3ae568…3ae6fc Dummy {f00=0x0129, f01=0x0190, f02=» W 0 ] Pl T Pb _ <UR "R4 PB X R< X T6 X T0. T G Y6 G _b P ,P - _ ( ( ^ ` ^ ? X V Y ] ! 2W< Y U R -P ` X , ) Y . ` X P Y P C W~ 8!@P$ X $P
0x3ae6fc…3ae890 Dummy {f00=0x0129, f01=0x0190, f02=»` B ` T B % X . $ 4 T % ` X ,T ! P ` b2 Y . V b" ! B P X " _` B P$ $$ R % C b"* ! W Y +PH Y *P> Y (P Y )P b" R _Q P OR R W " ! B _" Wr W 0 Z b" ! B Z Z& X .
0x3ae890…3aea24 Dummy {f00=0x0129, f01=0x0190, f02=» QfR$ X # P X R6;GV2 X $P y $ an P8 X R2;GV. X " _" X , $4 P b2 X .T * W Y , - ] @ Y $ X Z _X ? X :a Z T T W P X :d Y > > ? 8 R @RT V @% =cWP R`P R&P8 R P W 9 WD $ P W _ $ P _$
0x3aea24…3aebb8 Dummy {f00=0x0129, f01=0x0190, f02=»>@^_ 9: X ! Y MbnP ^ ]x Y Lb b b b c b b c c ! ! ! W B W$ B L # 9Q T W Q P X & V T Y &W bB X ! T6 B R0Q$ B D ! V ! ! ! W !e !c Y ! T ! V bl ! B C !
0x3aebb8…3aed4c Dummy {f00=0x0129, f01=0x0190, f02=» B B , ! T _ D ! P ! P W C V B P ! ! ! Y 4 RNQ " PH _ " P R: M T2 ! L ,! :D" !e* Y Y U ! _$ W4 , ! T ,' bb ! R !__U C X ' W Y ! _ X RT U TJ X c
0x3aed4c…3aeee0 Dummy {f00=0x0129, f01=0x0190, f02=» ! ! 4 X ' 4 Y ' bP ! ! " P ,$ , ! 4!"$&;<>@^_ e g$g g@ PB P8 ]x B P B L # +P ! ! T ! Y & ! W ! ! W ! Y Y f F U P" T Y &_. P4 R( Pj O]> V _F T Y Y & V
0x3aeee0…3af074 (2, 433) Dummy {f00=0x0129, f01=0x0190, f02=» X C _ X Y & Y > B B U$ $ ! T _ U D ! T _ C > X Z^<BR P j X _x R0 V0 ! P* P P P" R ?Q ! Y R Q f -_ ? _ X # ! ^ Y _( ? X Z ! P4 P f f X " e !
0x3af074…3af208 Dummy {f00=0x0129, f01=0x0190, f02=» X P B V *@ Y h ] ]| ? X _F h l j j k& jv ! P P j: & j" ]x B P B H " +P P. T Y ' ! R| X ( Y &R Y & _ Y &_. B 1 k ! j B B U4 $ ! T _ U D ! T _ $$
0x3af208…3af39c Dummy {f00=0x0129, f01=0x0190, f02=» B C jN ^N P R ?] _ C _ F F" $ P X ' X ] ! j i` B !lf !l ! jv B Y & !l<W i^ 8!0T 8 !@P ! $ P ! ! j ! T Y & T X & C & ] X Y & Y > X " X &" Y )Q Y > X
0x3af39c…3af530 Dummy {f00=0x0129, f01=0x0190, f02=»P" ! j W j X $ X !k _ X $ X X & !l< !l Y _8 X " X &" Y )U W ! ! ! Y 4 B i U )X R@ X X &" Y * X ) V Y !l X $ X & !l< X * i^ i `R Y ! ! ! 4
0x3af530…3af6c4 Dummy {f00=0x0129, f01=0x0190, f02=» B C ^N P R ?] _ C _ F F" $ P X ' X ] ! i` B ! ! ! B Y & ! W i^ 8!0T 8 !@P ! $ P ! ! ! T Y & T X & C & ] X Y & Y > X " X &" Y )Q Y > X
0x3af6c4…3af858 Dummy {f00=0x0129, f01=0x0190, f02=»P" ! j W j X $ X !k _ X $ X X & !l< !l Y _8 X " X &" Y )U W ! ! ! Y 4 B i U )X R@ X X &" Y * X ) V Y !l X $ X & !l< X * i^ i `R Y ! ! ! 4
0x3af858…3af9ec Dummy {f00=0x0129, f01=0x0190, f02=» B C ^N P R ?] _ C _ F F" $ P X ' X ] ! i` B ! ! ! B Y & ! W i^ 8!0T 8 !@P ! $ P ! ! ! T Y & T X & C & ] X Y & Y > X " X &" Y )Q Y > X
0x3af9ec…3afb80 Dummy {f00=0x0129, f01=0x0190, f02=»P" ! j W j X $ X !k _ X $ X X & !l< !l Y _8 X " X &" Y )U W ! ! ! Y 4 B i U )X R@ X X &" Y * X ) V Y !l X $ X & !l< X * i^ i `R Y ! ! ! 4
0x3afb80…3afd14 (2, 434) Dummy {f00=0x0129, f01=0x0190, f02=» B C ^N P R ?] _ C _ F F" $ P X ' X ] ! i` B ! ! ! B Y & ! W i^ 8!0T 8 !@P ! $ P ! ! ! T Y & T X & C & ] X Y & Y > X " X &" Y )Q Y > X
0x3afd14…3afea8 Dummy {f00=0x0129, f01=0x0190, f02=»P" ! j W j X $ X !k _ X $ X X & !l< !l Y _8 X " X &" Y )U W ! ! ! Y 4 B i U )X R@ X X &" Y * X ) V Y !l X $ X & !l< X * i^ i `R Y ! ! ! 4
0x3afea8…3b003c Dummy {f00=0x0129, f01=0x0190, f02=» B C ^N P v P P .T B Y Wx B P X P ( ( 7 R ( P H RN H P ' P l P W< l T6 v ' P !w & B # P G W G & ] X P P R: AvT D v Y X T Q (P H U ^ 9 1_N ]x X T
0x3b003c…3b01d0 Dummy {f00=0x0129, f01=0x0190, f02=»l P $ $ 1 ) > ) $P e % > (@ B Z F U F Z l P U ]| C G 4' "?:B ] P H U _ U @ U 9C @ $$ T %_< %_B R @ U P 9C @ _ T M D W. D D " @ @ - U _
0x3b01d0…3b0364 Dummy {f00=0x0129, f01=0x0190, f02=» < ? < ? <(@ y $ P B $ 9H C ">h # P >_2 < U = (@ " $ P B >H<h y$ P ?_" = > = > = =_D R _ 00 > & <h$ P >
0x3b0364…3b04f8 Dummy {f00=0x0129, f01=0x0190, f02=»y Ay :A Ay> N , ` R @ U P. ,% T& yr C ( B P T W ' T| Iy@ @ 8 =hP Y X Pl 0T< Y Hy@! R W 9a Iy@ T T 9a HyA Ey ^ W P ,! T T ( R : n "' # y @y6P
0x3b04f8…3b068c Dummy {f00=0x0129, f01=0x0190, f02=»y: P ( )W @ 0 R % "V E T D Ay _" P @y: P ( )W @ 0 Rb ' F "R G y @y> Dy@ #D T G W, Ay L "R Ay Ayj ] y |. }
0x3b068c…3b0820 Dummy {f00=0x0129, f01=0x0190, f02=»y Ay :A Ay> , ` R @ U P ,% T yr C ( B P T W ' T Iy@ @ 8 =hP Y X P 0T Y Hy@! R W 9a Iy@ T T 9a HyA Ey ^ W P ,! T T ( : n "' # r @y6P
0x3b0820…3b09b4 (2, 435) Dummy {f00=0x0129, f01=0x0190, f02=»y: P ( )W @ 0 R % "V E T D Ay _" P @y: P ( )W @ 0 Rb ' F "R G y @y> Dy@ #D T G W, Ay L "R Ay Ayj ] y
0x3b09b4…3b0b48 Dummy {f00=0x0129, f01=0x0190, f02=»y Ay :A Ay> , ` R @ U P ,% T yr C ( B P T W ' T Iy@ @ 8 =hP Y X P 0T Y Hy@! R W 9a Iy@ T T 9a HyA Ey ^ W P ,! T T ( : n "' # @y6P
0x3b0b48…3b0cdc Dummy {f00=0x0129, f01=0x0190, f02=»y: P ( )W @ 0 R % "V E T D Ay _" P @y: P ( )W @ 0 Rb ' F "R G y @y> Dy@ #D T G W, Ay L "R Ay Ayj ] y
0x3b0cdc…3b0e70 Dummy {f00=0x0129, f01=0x0190, f02=» @|* , L T L PF L T M Q M L V L A|, @|* : T n @|, [ [ M M M A|* -(@ : - : @|* , L T M @|* : =a 9a Q - _ - > @ HPJ r P V( R V* AV( X R @|* , - M M M @|* Ay6 A
0x3b0e70…3b1004 Dummy {f00=0x0129, f01=0x0190, f02=» < +.-, 0123456789 `ABCDEFGHIJKLMNOPQRSTUVWXYZ []' ^ > ?:_; =!"#$%&/() @ABCDEFGHIJKLMNOPQRSTUVWXYZ []* < +.-, 0 23456789 `ABCDEFGHIJKLMNOPQRSTUVWXYZ []' ($SWAP A A A A. UU @ @ ! P$>B @
0x3b1004…3b1198 Dummy {f00=0x0129, f01=0x0190, f02=» P. _ " :c* A W " :d2 * A " H & W F ` W F W F CRT F A @ @ ! P2 @ P ;b=H F CR X F XW =J F CRTT F PN A @ $ P( @ R W 8 !RRT W V P A Y W @ " T> W
0x3b1198…3b132c Dummy {f00=0x0129, f01=0x0190, f02=» _ T <B :L A W A A W T F W V = V W Y* P Z( = :L < P W <9B @ V W Q W @ @ A @
0x3b132c…3b14c0 Dummy {f00=0x0129, f01=0x0190, f02=» | V @ PZ W @ @ ! T _ P :l 9b ) V _ @ V W W P TJ V 0 !;;P P V P$ _ P !;;T X$ W _J T W >
0x3b14c0…3b1654 (2, 436) Dummy {f00=0x012a, f01=0x0190, f02=»_V S A ; A @ R @ ! T A A V @ R V V I W V $ ) H A I. : C. X C.9h! # " :A K : A T.I T P 1 I P < R P A _>
0x3b1654…3b17e8 Dummy {f00=0x012a, f01=0x0190, f02=» A A A A A ! T A A I ! : 9E @ r s A I T ) A _ I N T : 9PJ S Y T@ $ 1T: C !CCTt : 1P P$_ P =H P @ T X W n : YX d C !CCTZ B.
0x3b17e8…3b197c Dummy {f00=0x012a, f01=0x0190, f02=» W$ V P P W P V V T V T W P V W @ $ P p W T : A _ 0V , - P X 9A_ : @ ! P (W ( :W> 2 W 0 . " A T I T P 1 I 2 ; Z [ : : [
0x3b197c…3b1b10 Dummy {f00=0x012a, f01=0x0190, f02=» A A A A ! T A W Z A. c @ V W U R $ )_ : W W W W W JQ@ V V v x W V V v p R( W V W ^< _@ V _P V V
0x3b1b10…3b1ca4 Dummy {f00=0x012a, f01=0x0190, f02=» W r JQ R t JV v : V W V ) : V <B W |P v v : $ V |P v w v : V $ V l $ V M : W V R RR > R W
0x3b1ca4…3b1e38 Dummy {f00=0x012a, f01=0x0190, f02=» : " D Pd W V PL $;A^ D E D P. V P P T E _J E _T " D T E E D E % : " R ;B " R P( |P v v : V W 0 : V P 9a _ " (
0x3b1e38…3b1fcc Dummy {f00=0x012a, f01=0x0190, f02=» @ 0 V @ 0 H W : ? ? R 0 R P P B _ ]d : V ) v : 4P: " D , H H $ M v b - I Y0 : @ ` V b pP ` $ $ W $ H
0x3b1fcc…3b2160 Dummy {f00=0x012a, f01=0x0190, f02=» K _N V r V :B A V 9n A @ A A , @ @ ! @ P P P P|_ _ @ 9N @ :b @ :b V W U6 T 9BW P P( P V W U " @ Q @ P A. @ P _b
0x3b2160…3b22f4 (2, 437) Dummy {f00=0x012a, f01=0x0190, f02=»P 3 _ ]6 3 ]8 B A. @ D @ W x A ( : A ] > l : |R X W n V pT : N V l W H V ]" . nT" W v ~ W n V ~P W x f Z _v
0x3b22f4…3b2488 Dummy {f00=0x012a, f01=0x0190, f02=» : ~ V ~P W x _$ 8 V V x % V v % : V V 9k! P % _ V V W W r W V v ) W b G v ) - V W f v ) G v ` " W p W ~ pP0 B R P
0x3b2488…3b261c Dummy {f00=0x012a, f01=0x0190, f02=» " E R 2 W ~ R 2 R P R Xv _|W T : X W x _ V P I P W z ` pPl H - V I < " R E R T E D E @ v H v E j #_v W | ;b W W
0x3b261c…3b27b0 Dummy {f00=0x012a, f01=0x0190, f02=» N : d 8" R _ ZY QY : @ V H W z W | CRP W ` ` H W d 2 ;A @ JR - @ - N !TTP N :H N TBT W W8 2 " T @ N =H N @ ) !TT
0x3b27b0…3b2944 Dummy {f00=0x012a, f01=0x0190, f02=» YV : v `?A @ W W :b / W : W @ W D V W W ` " W p @ pP. " 4X 1 R Z0 _ W l a w ` :A W V d 4 W P
0x3b2944…3b2ad8 Dummy {f00=0x012a, f01=0x0190, f02=» P t W r t W @ @ % L V , P@ , - 4 ] 4 JY 5 X * _6 : @ ] @ P @ P " P " P " P W W . !TTP @ T Y !TT
0x3b2ad8…3b2c6c Dummy {f00=0x012a, f01=0x0190, f02=»" P S 1 S 9J S ( 3 ( 9B @ @ T : @ :B W . !TTP W t N =H N W l N =H N W p N =H N W | ( @ % P W @ % P P0 r " U
0x3b2c6c…3b2e00 Dummy {f00=0x012a, f01=0x0190, f02=» @ " S V l S W l V p S W p W _L @ % P W @ % P !TTT @ @ T : @ ! P @ @ < CRT 3 @ < < S @ < PP < !RRP @ ! T 3
0x3b2e00…3b2f94 (2, 438) Dummy {f00=0x012a, f01=0x0190, f02=» S S V V W @ @ T : P S S _ : . !TTP V W t * P r _ Ph W p W V 8 8 4 D P$ @ # P H I
0x3b2f94…3b3128 Dummy {f00=0x012a, f01=0x0190, f02=» T P / _ T @ A V W W t PT W f ( W d G =h G V d V r < V f P W f _B V W V t Yr !TTX @ @ T : !TTX !
0x3b3128…3b32bc Dummy {f00=0x012a, f01=0x0190, f02=» _. @ @ @ ! P V 8 8 8 @ >B 3 . !CCP W P0 W f W d V d V r < V f _2 U^ V 8 8 8 4 D P$ @ # P H I K T + Y@ _`R& @ @
0x3b32bc…3b3450 Dummy {f00=0x012a, f01=0x0190, f02=» $ q > R P >b W >b & 8P D P U & E W V W R 9 W D ) $ P@ D L T@ D &P V U 0 I , I . $# P V -W H P U & I @ % PD H I H T P( H U V U W < +
0x3b3450…3b35e4 Dummy {f00=0x012a, f01=0x0190, f02=» W W W R _ $ W : W | v z *T P _ / P *_ *T P$ _ .P _ / V z U Y$ P W | V z 3 % W P _ V |P V v ]]:W v P _ @
0x3b35e4…3b3778 Dummy {f00=0x012a, f01=0x0190, f02=» P N =H N T _ : 00=H 00 P P _ _ : @ ! P (W ( : @ l @ < CRT" @ ! P ` @ E "W ` @ E " ! 1 H 0 1 2 P @ x @ P 6 0
0x3b3778…3b390c Dummy {f00=0x012a, f01=0x0190, f02=» ,l l 0 DC ^ KB * H 8hvDY t @
0x3b390c…3b3aa0 Dummy {f00=0x012a, f01=0x0190, f02=» 4bZTP 4 8hvDY l @ P ^ KB 6
0x3b3aa0…3b3c34 (2, 439) Dummy {f00=0x012a, f01=0x0190, f02=» ,l P 4e GP ^ KB * 8hvDY t @
0x3b3c34…3b3dc8 Dummy {f00=0x012a, f01=0x0190, f02=» n P* o PRDM130 EQU * o $ P LD A1,DCRBUF GET BUFFER ADDRESS o & P LD A2,FBAX GET BUFFER INDEX o N 2 P ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER o r P IFF CODE=1 o P CF A5,RDLRC o P RF(Z) RDM150 LRC WAS OK o P XIF o P IFT CODE=1
0x3b3dc8…3b3f5c Dummy {f00=0x012a, f01=0x0190, f02=»ALID MESSAGE o z PRDM150 EQU * p $ P LDR A7,A3 SAVE RESULT REGISTER p ( P CF A5,HALTIN HALT INPUT p P P IFT P6805=1 p p P ORR A7,A1 PARITY ERROR p P XIF p P RTN A5 p P* p P* ETB RECEIVED p P* p PRDM160 EQU * p P LDR A3,A3
0x3b3f5c…3b40f0 Dummy {f00=0x012a, f01=0x018e, f02=» p PRDM170 EQU * q P IFF CODE=1 q P CF A5,RDLRC q 0 " P RB(NZ) RDM120 LRC WAS NOT OK q D P XIF q j P IFT CODE=1 q v & P CF A5,RDCRC READ CRC AND CHECK IT q " P RB(NE) RDM120 CRC WAS NOT OK q P XIF q P RB RDM100 q P q P* q
0x3b40f0…3b4284 Dummy {f00=0x012a, f01=0x0190, f02=» q l P RF(NZ) TRDLE r P LDK A3,ACK0 LOAD ACK0 r P RF TRDLE r < P* r N P* TRANSMIT WACK r X P* r p PTRWACK LDK A3,WACK LOAD WACK r z P RF TRDLE r P* r P* TRANSMIT RVI r P* r P IFF STAT=0 r PTRRVI LDK A3,RVI LOAD RVI
0x3b4284…3b4418 Dummy {f00=0x012a, f01=0x0190, f02=»C A3,RESEND+1 r P RF TRREP s P s ( P* s 2 P* TRANSMIT NAK s < P* s R PTRNAK LDK A3,NAK LOAD NAK s P RF TREN10 s ~ P* s P* TRANSMIT EOT s P* s PTREOT LDK A3,EOT LOAD EOT s P RF TREN10 s P* s P* TRANSMIT ENQ s
0x3b4418…3b45ac Dummy {f00=0x012a, f01=0x0190, f02=»D+1 s $ PTRREP CF A5,TRSYNC START OUTPUT t & P LC A2,RESEND GET FIRST CHARACTER t 4 P CF A5,WRITEP SEND IT t ^ & P LC A2,RESEND+1 GET NEXT CHARACTER t | P CF A5,WRITEP SEND IT t PTRRE10 LDK A2,/FF t P CF A5,WRIT05 SEND PAD t P LDK A2,/FF
0x3b45ac…3b4740 Dummy {f00=0x012a, f01=0x018e, f02=» P XIF u & P SST A2,LCUUT PERFORM SST AT ONCE u P IFF LOGG=0 u : ( P CF A5,LOGSST LOG TRANSMITTER STATUS u N P XIF u z P RTN A5 u P u P* u P* u P* TRANSMIT ONE TEXT BLOCK u P* u P* u PTRTEXT EQU * u P CF A5,TRS
0x3b4740…3b48d4 (2, 440) Opaque[0x194]
0x3b48d4…3b4a68 # DirEnt {nam=»CTAB01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2560, f03=0x0000}
0x3b48d4…3b4a68 IdxSect {
0x3b48d4…3b4a68 f00 = 0x012b // 0x3b48d4 @0x0
0x3b48d4…3b4a68 f01 = 0x0004 // 0x3b48d6 @0x2
0x3b48d4…3b4a68 gno = [ // 0x3b48d8 @0x4
0x3b48d4…3b4a68 [0x00]: C0x012b.0x0.0
0x3b48d4…3b4a68 [0x01]: C0x012b.0x1.0
0x3b48d4…3b4a68 ]
0x3b48d4…3b4a68 }
0x3b4a68…3b4bfc Dummy {f00=0x012b, f01=0x0190, f02=» . P IDENT CTAB01 83.05.19 NJ NORDJYLLANDS AMT ENTRY CTAB01 6 P ENTRY CTAB02 L P ENTRY CTAB03 b P ENTRY CTAB04 x 8 PCTAB01 DATA FUNC,FUNCSH,DEBUG1,DEBUG2,DEBUG1,DEBUG2 PCTAB02 EQU * PCTAB03 EQU * 2 PCTAB04 DATA FUNC,FUNCS
0x3b4bfc…3b4d90 Dummy {f00=0x012b, f01=0x0190, f02=» | P DATA /9E99 C17,D15 P DATA /9A9B D16,D17 $ P DATA /BFB5 A16,A17 @ P DATA /AAA3 A18,C18 DATA /8BA5 D18,A23 x DATA /3031 DATA /3233 DATA /3435 DATA /3637 DATA /3839 DATA /BA26 A20,
0x3b4d90…3b4f24 Dummy {f00=0x012b, f01=0x0190, f02=»E20,E21 DATA /B0B1 E22,E23 DATA /7F7F , DATA /7F7F @ DATA /7F7F T DATA /7F7F h * | PFUNCSH EQU * P DATA /7F9F A15,B15 P DATA /BDBE B16,B17 P DATA /9C9D C15,C16 P DATA /9E99 C17,D15
0x3b4f24…3b50b8 Dummy {f00=0x012b, f01=0x018e, f02=»ATA /3233 DATA /3435 DATA /3637 & DATA /3839 : DATA /BA26 A20,A21 N P DATA /ABB4 A22,C22 j P DATA /B2A2 D22,D23 DATA /A1A0 E15,E17 DATA /AEAF E18,E19 DATA /8C80 E20,E21 DATA /B0B1 E22,E2
0x3b50b8…3b524c Dummy {f00=0x012b, f01=0x0190, f02=» ~ P DATA /7F7F P DATA /7F7F P DATA /7F27 ,C12 0 P DATA /B63C E00,A00 H P DATA /7F2B ,E11 d P DATA /2C2D B08,B10 | P DATA /2E7F B09 P DATA /3031 P DATA /3233 P DATA /3435 P DATA /3637 P DATA /3
0x3b524c…3b53e0 Dummy {f00=0x012b, f01=0x018e, f02=» P DATA /4445 P DATA /4647 P DATA /4849 , P DATA /4A4B @ P DATA /4C4D T P DATA /4E4F h P DATA /5051 | P DATA /5253 P DATA /5455 P DATA /5657 P DATA /5859 P DATA /5A5C P DATA /5B5D P
0x3b53e0…3b5574 (2, 441) Dummy {f00=0x012b, f01=0x0190, f02=» ~ P DATA /B63E E00,A00 P DATA /7F3F ,E11 $ P DATA /3B5F B08,B10 < P DATA /3A7F B09 X P DATA /3D21 p P DATA /2223 P DATA /2425 P DATA /262F P DATA /2829 P DATA /ACA9 B12,C13 P DATA /ADA7 E13,D13
0x3b5574…3b5708 Dummy {f00=0x012b, f01=0x0190, f02=» DATA /4A4B P DATA /4C4D P DATA /4E4F ( P DATA /5051 < P DATA /5253 P P DATA /5455 d P DATA /5657 x P DATA /5859 P DATA /5A5C P DATA /5B5D P DATA /2A7F D12 P* PDEBUG1 EQU * P DATA /207
0x3b5708…3b589c Dummy {f00=0x012b, f01=0x0190, f02=»ATA /2C2D B08,B10 P DATA /2E7F B09 P DATA /3031 2 P DATA /3233 F P DATA /3435 Z P DATA /3637 n P DATA /3839 P DATA /ACA9 B12,C13 P DATA /ADA7 E13,D13 P DATA /A8A6 D14,E14 P DATA /6041 E12 P DATA
0x3b589c…3b5a30 Dummy {f00=0x012b, f01=0x0190, f02=»ATA /5051 P DATA /5253 P DATA /5455 & P DATA /5657 : P DATA /5859 N P DATA /5A5C b P DATA /5B5D v P DATA /7F7F D12 P* PDEBUG2 EQU * P DATA /207F A01 P DATA /7F7F P DATA /7F7F P DATA /7
0x3b5a30…3b5bc4 Dummy {f00=0x012b, f01=0x0190, f02=» P DATA /2223 P DATA /2425 P DATA /262F 0 P DATA /2829 D P DATA /ACA9 B12,C13 X P DATA /ADA7 E13,D13 t P DATA /A8A6 D14,E14 P DATA /4041 E12 P DATA /4243 P DATA /4445 P DATA /4647 P DATA /4
0x3b5bc4…3b5d58 Dummy {f00=0x012b, f01=0x4092, f02=»A /5657 P DATA /5859 P DATA /5A5C $ P DATA /5B5D 8 P DATA /7F7F D12 L P* d P* n P* x END @ ATA /A8A6 D14,E14 P DATA /4041 E12 P DATA /4243 P DATA /4445 P DATA /4647 P DATA /4
0x3b5d58…3b5eec Dummy {f00=0x012b, f01=0x2008, f02=» 233 DATA /3435 DATA /3637 ( DATA /3839 < DATA /BA26 A20,A21 P DATA /ABB3 A22,C22 l DATA /B292 D22,D23 DATA /A1A0 E15,E17 DATA /AEAF E18,E19 DATA /8C80 E20,E21 DATA /B0B1 E22,
0x3b5eec…3b6080 Dummy {f00=0x012b, f01=0x412c, f02=»U h # 4 + : / 4 9 P = T C X GT [ _ 8 v H D !, aT eW i mW q u 8 wT {W P& T W T 2 H D !)B W T W ?R EW" K h OW U h YW ]W aW eW k oW ~ H D ! u yPL } T T P T$ 'R> /P6 7T. =P EW ]T k
0x3b6080…3b6214 (2, 442) Opaque[0x194]
0x3b6214…3b63a8 # DirEnt {nam=»M:92NE«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2570, f03=0x0000}
0x3b6214…3b63a8 IdxSect {
0x3b6214…3b63a8 f00 = 0x012b // 0x3b6214 @0x0
0x3b6214…3b63a8 f01 = 0x0002 // 0x3b6216 @0x2
0x3b6214…3b63a8 gno = [ // 0x3b6218 @0x4
0x3b6214…3b63a8 [0x00]: C0x012b.0x2.0
0x3b6214…3b63a8 ]
0x3b6214…3b63a8 }
0x3b63a8…3b653c Dummy {f00=0x012b, f01=0x0190, f02=» SCR LED DRDC15,/S * &!!CH $$TBLEN EQU 2300$$TBLEN EQU 252$$ & $ !!CH $$CODE EQU 0$$CODE EQU 1$$ T !!EN | ASM /S,NL KPF /O SCR LED EBCDIC,/S $ !!CH $$CODE EQU 0$$CODE EQU 1$$ !!EN ASM /S,NL
0x3b653c…3b66d0 Dummy {f00=0x012b, f01=0x004c, f02=»SCR ASM EBCDIC,NL KPF /O " SCR 0 ASG /E0,TY10 < & $ !!CH $$CODE EQU 0$$CODE EQU 1$$ T !!EN | ASM /S,NL KPF /O SCR LED EBCDIC,/S $ !!CH $$CODE EQU 0$$CODE EQU 1$$ !!EN ASM /S,NL
0x3b66d0…3b6864 Dummy {f00=0x012b, f01=0x2008, f02=» ASM EBCDIC,NL KPF /O " SCR 0 ASG /E0,TY10 < & $ !!CH $$CODE EQU 0$$CODE EQU 1$$ T !!EN | ASM /S,NL KPF /O SCR LED EBCDIC,/S $ !!CH $$CODE EQU 0$$CODE EQU 1$$ !!EN ASM /S,NL
0x3b6864…3b69f8 Dummy {f00=0x012b, f01=0x0190, f02=» , ( a , ( q 4 HALTN d t SCTMSZK SCTSFA SCTEFA SCTPLD SCTANO SCTADA S
0x3b69f8…3b6b8c Dummy {f00=0x012b, f01=0x0190, f02=» SCTPSZ SCTMMC SCTLACL 0 SCTMMP D SCTLAP X SCTNPE l SCTSTB SCTOPT SCTTCT SCTCDT SCTBUG~ SCTDMT , (
0x3b6b8c…3b6d20 Dummy {f00=0x012b, f01=0x4062, f02=» _ , L@ ^ X SCTNPE l SCTSTB SCTOPT SCTTCT SCTCDT SCTBUG~ SCTDMT , (
0x3b6d20…3b6eb4 (2, 443) Opaque[0x194]
0x3b6eb4…3b7048 # DirEnt {nam=»M:92NE«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x2578, f03=0x0000}
0x3b6eb4…3b7048 IdxSect {
0x3b6eb4…3b7048 f00 = 0x012b // 0x3b6eb4 @0x0
0x3b6eb4…3b7048 f01 = 0x0020 // 0x3b6eb6 @0x2
0x3b6eb4…3b7048 gno = [ // 0x3b6eb8 @0x4
0x3b6eb4…3b7048 [0x00]: C0x012b.0x3.0
0x3b6eb4…3b7048 [0x01]: C0x012c.0x0.0
0x3b6eb4…3b7048 [0x02]: C0x012c.0x1.0
0x3b6eb4…3b7048 [0x03]: C0x012c.0x2.0
0x3b6eb4…3b7048 [0x04]: C0x012c.0x3.0
0x3b6eb4…3b7048 [0x05]: C0x012d.0x0.0
0x3b6eb4…3b7048 [0x06]: C0x012d.0x1.0
0x3b6eb4…3b7048 [0x07]: C0x012d.0x2.0
0x3b6eb4…3b7048 [0x08]: C0x012d.0x3.0
0x3b6eb4…3b7048 [0x09]: C0x012e.0x0.0
0x3b6eb4…3b7048 [0x0a]: C0x012e.0x1.0
0x3b6eb4…3b7048 [0x0b]: C0x012e.0x2.0
0x3b6eb4…3b7048 [0x0c]: C0x012e.0x3.0
0x3b6eb4…3b7048 [0x0d]: C0x012f.0x0.0
0x3b6eb4…3b7048 [0x0e]: C0x012f.0x1.0
0x3b6eb4…3b7048 [0x0f]: C0x012f.0x2.0
0x3b6eb4…3b7048 ]
0x3b6eb4…3b7048 }
0x3b7048…3b71dc Dummy {f00=0x012b, f01=0x0190, f02=» y J h h h h h h < h hB(BT $ . 8 h h h h h h $ h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h n c @ Tg t z ^ b bLPL H b2 Z ` z
0x3b71dc…3b7370 Dummy {f00=0x012b, f01=0x0190, f02=» 4c @S{ D d 2Z $"z y B % y D Dbf d * F :P }B W [~ ? d j% L "~ T &b ICn 1 d _ A d " _ _ @_ > > U # T @ H ( ( P c P W: P, A_ @ V ( U P" @ V L W @
0x3b7370…3b7504 Dummy {f00=0x012b, f01=0x0190, f02=» 6 8 _ Q Z P 0 9 t t_ $ @ _, ? P H H #P h A d A FQ ? @_ : ) A_ _ @ @ A H ( A_ _ ? ? ? ? ? ^ A _ _ ^ _ $P T I R $ 5 % > ? W ? W ? T T$ U U U U
0x3b7504…3b7698 Dummy {f00=0x012b, f01=0x0190, f02=» Q Q > > 0 @_ 1 A_ P P > ? * X " R" Y T ? X D TT> 3 W8 > _& @ 8 R" Y T ? X D TT 3 W > _& W2 > 8 X W( ? ` @ @ P $ H W W > > > > > > @7 V ? 7 > _ > ? _ > > ? ^ ! Y ^ _ n ?
0x3b7698…3b782c Dummy {f00=0x012b, f01=0x0190, f02=» < $ ( , 0 4 8 < C 8W T 8P Y ^ 5 ) P U ` XH D #DP @ R XV Y @ P, TT W X &P T X I Y T # C C W4 O " # X Y ) C
0x3b782c…3b79c0 Dummy {f00=0x012b, f01=0x0190, f02=» P j$ > > F C F C > B R Q F ! P C > C > F :c" H :b"? #" : C > B R Q~ P0 B P* 0$ T # R QL > X B U( H Q2 X
0x3b79c0…3b7b54 (2, 444) Dummy {f00=0x012c, f01=0x0190, f02=» P PL $ # Q > P _0 # T p > P p (_H _2 B U X > ? _ X T (@ H ^ > > ? _ X T X X T % T ?C L Rl _@(@ L U L Q0 M & X
0x3b7b54…3b7ce8 Dummy {f00=0x012c, f01=0x0190, f02=» 0P X T 4 Y X T X T X 4 1 1 X P - M T $ PD _ T " # p X L R P RP (@ ^ X P8 P0 # P T P 0P 1 _ t W Y > > _ J B B _ J B B pU
0x3b7ce8…3b7e7c Dummy {f00=0x012c, f01=0x0190, f02=» 0 R t B " P Q :A H P P ` H !@T I ` T ! 1 U ` A d ? W A d ? W A d ? W U R ; V ~# T R p 4 # PJ P 4 RL P 4 ] P $ P ] U PD P< P0 P,
0x3b7e7c…3b8010 Dummy {f00=0x012c, f01=0x0190, f02=» ' T P X P " >Wh T # Y U T ] W 8V X $P y $W $ P 8R R ` Y $ X Z ;BR 8% =A Y T Z& h_, X ' X 4X< XB U T T U 5 U R " ] ~ ` ;h # <c$
0x3b8010…3b81a4 Dummy {f00=0x012c, f01=0x0190, f02=»X <d$ _D $?:D" Y X P Y # P 4T U # P 4 4 P _r T _$ U _ ? 4 U 5 R PF "P2 R T T R X # X h > P P P ` X XF _H Wj ? T T W u > > E D E
0x3b81a4…3b8338 Dummy {f00=0x012c, f01=0x0190, f02=»XB Y X X X X ' 4 B U B (" W C (@ > ?" 8' ?A R 8;b# 4T RT T T ] ] 8 W< TrW T ] _ P T V WT 8V T P U 8 ~ U Q2P X H 5 U R " ] ~ Y > > V P
0x3b8338…3b84cc Dummy {f00=0x012c, f01=0x0190, f02=» 4XR XX 5 h_b Y Y Y X 9BV$ X & Y " X D V & X . T 8TV 9WD B 7P P ` A_ W A_ @_ A.W ? A dI.9 X R C C & ` ?A @_ A. X V 9_: @
0x3b84cc…3b8660 Dummy {f00=0x012c, f01=0x0190, f02=» Pb P Pv Pz * 6 + ` A_ @_ A. H d ` Y HW A_ @_ A. Wx ! * X , X P ! ! BW< ! * _ ! * _& ! X , X P ! H X , X P B B ! f ! B ! T Y *W X * p ! H# f & ! H ! " 0 TOT
0x3b8660…3b87f4 (2, 445) Dummy {f00=0x012c, f01=0x0190, f02=»& Ph B @ @ :C P ! H 9DV ! (@ B r ! ! R ! j ! ! b ! ( ! ! Z ! X Y . X * f " ! H_ Y * 4 ! ~ PT C ! l ! H ! (@ ! ~ R _ ! V 1 ;h 1 ! V 1 ! ! l* ! B ! ! ~ ) ! H Y *# T X
0x3b87f4…3b8988 Dummy {f00=0x012c, f01=0x0190, f02=» ! B ! ~ ! T )WL WP ! ~ Xz R ! ( - j ! ) W. Y PW Y P Y L Y N Y B S W W B C & ` _ ? , Y " X $ T X Y $ Y X HP 1 Y H _ 0 Y J 1 0B. X (P y (_^ ( _n Y ( " X . P Y : ! F ! H X # P
0x3b8988…3b8b1c Dummy {f00=0x012c, f01=0x0190, f02=» D C Y B ` K & E % Y B K , X ;AR@;a X &P Y & P 7P < $ <C ! 9 4 X t " _ W B RZ X , X P W P Q8 U _ T,: B R(' P Q 9BW Q 9C B ! T 4 x @ P ;A _ 4
0x3b8b1c…3b8cb0 Dummy {f00=0x012c, f01=0x0190, f02=»U P jW kQ 4 Y * ! 0" Z Y" P Z _ 4 A ;D A 4 R _ ;H 4 r ! (:C 4 Z ! ( 4 X " 4 ! ) 4 X P t 4 P y _^ _n Y " X P Y : ! ! H X # P
0x3b8cb0…3b8e44 Dummy {f00=0x012c, f01=0x0190, f02=» P Y P 7P < $ <C ! 9 4 X t " _ W B R X X P W P Q U _ T : B R ' P Q 9BW Q 9C B ! T 4 x @ P ;A _ 4
0x3b8e44…3b8fd8 Dummy {f00=0x012c, f01=0x0190, f02=»U P jW kQ 4 Y ! 0" Z Y" P Z _ 4 A ;D A 4 R _ ;H 4 ! (:C 4 ! ( 4 X " 4 ! ) 4 X P t 4 P y _^ {
0x3b8fd8…3b916c Dummy {f00=0x012c, f01=0x0190, f02=»%_>?0123456789:#@'=" ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^ /STUVWXYZ|,%_>?0123456789:#@'= 7- <=2&p ?' @O JZlP}M] Nk`Ka z^L~noj {|[_m TOSS T H r ` P l
0x3b916c…3b9300 Dummy {f00=0x012c, f01=0x0190, f02=»z>z { { }p}dy z !h!h!h!h!h! ! x T $!h!h (! ! x " # $ % "$&( V @ D X P _ L !##P T @ R $P U + U _ (@(@ I P ^ !h H 8 Y H B # X ( U !h B r
0x3b9300…3b9494 (2, 446) Dummy {f00=0x012c, f01=0x0190, f02=» _H 4 H H S W C C B B B U 4 R Wp H TP L P B r L ( 6 $ X _ X ` T I T J 3t P C X I X J S W C C W, B B Y IR Q X JU C '? T W6 5: T.(@(@ P #D }^
0x3b9494…3b9628 Dummy {f00=0x012c, f01=0x0190, f02=» : R $ - _ : Z $ -_ D ( U ( 0 W T ` U @ , @ W : X & X P !##T Y T( X P P P @_ Q (@ F 7 : @ _ _ ( H > "p X &Pj D ^V" D "? P P &P E ^ 6 V, P ( "
0x3b9628…3b97bc Dummy {f00=0x012c, f01=0x0190, f02=» , 3 P W T Y $ P T _ Y & F (@ _ %< X & X I U X J U ( 5 T$ X X RP F ! T & P ` U0 @ , D !##X D ( * ]" 0 X Wf ` U @ H @ X WF 4 N
0x3b97bc…3b9950 Dummy {f00=0x012c, f01=0x0190, f02=» P 9 & 4' $t' $t 5 $t 4 +@ W , P& ,' X X 1 Z" ) $t_ (@ C ( B ! & $t @! F U G F G "$ & & ( F " F +P P* X $ T 4 U W 4 R P> $P8W & X ( X & F
0x3b9950…3b9ae4 Dummy {f00=0x012c, f01=0x0190, f02=» " F D '? P P( $ P" 4 I I K K P P & P 4 W D $ T 4 T 4 W E I E J X ^V ? T B &(@( | B B P ! Tn M *4 : & A| A| " P { "" |t P *4 | @{
0x3b9ae4…3b9c78 Dummy {f00=0x012c, f01=0x0190, f02=»{ ) A{ @| *4 B D{ E{ X #D( ' ( B B @{ D{ DW C C ( & & { { @| T A{ 0" ) ) U _ L !SSP !LL ) W L @{ A{ V *4 P E{ @{ E{ P E{ P E{ D
0x3b9c78…3b9e0c Dummy {f00=0x012c, f01=0x0190, f02=» P %_ S T S E 3 P S I P S J P S ( P S * P % S H P & S P @{ S , d S B | (6 ' @{ T W { T Wz @| P R ( >a U Wb 0 =b P{ P @{ ! T. W< P{ D{ Y P{ Y P{ Y U ! T !
0x3b9e0c…3b9fa0 Dummy {f00=0x012c, f01=0x0190, f02=»W P B |H (@( @| * _ T `{ ` 9A S ^ H $X D S . S $ 6V R * S W S _ S ` R ( R * 3 S b *Z U _ L !SSP !LL W L @ A V P E @ E P E P E D
0x3b9fa0…3ba134 (2, 447) Dummy {f00=0x012c, f01=0x0190, f02=» P %_ S T S E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | (6 ' @ T W T W @ P R ( >a U W 0 =b P P @ ! T W P D Y P Y P Y U ! T !
0x3ba134…3ba2c8 Dummy {f00=0x012c, f01=0x0190, f02=»W P B (@( @ * _ T ` ` 9A S ^ H $X D S . S $ R * S W S _ S ` R ( R * S b *Z U _ L !SSP !LL W L @ A V P E @ E P E P E D
0x3ba2c8…3ba45c Dummy {f00=0x012c, f01=0x0190, f02=» P %_ S T S E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | (6 ' @ T W T W @ P R ( >a U W 0 =b P P @ ! T W P D Y P Y P Y U ! T !
0x3ba45c…3ba5f0 Dummy {f00=0x012c, f01=0x0190, f02=»W P B (@( @ * _ T ` ` 9A S ^ H $X D S . S $ R * S W S _ S ` R ( R * S b *Z U _ L !SSP !LL W L @ A V P E @ E P E P E D
0x3ba5f0…3ba784 Dummy {f00=0x012c, f01=0x0190, f02=» P %_ S T S E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | (6 ' @ T W T W @ P R ( >a U W 0 =b P P @ ! T W P D Y P Y P Y U ! T !
0x3ba784…3ba918 Dummy {f00=0x012c, f01=0x0190, f02=»W 3t P Q R ;A [ [ : P Q R ;A [ [ : Q R P ;A [ [ : ? ? !? P P !> P W 9P _ T !##P> ? R4 L TX P L P 4 M X M M _8 > & D LW 0P Q P
0x3ba918…3baaac Dummy {f00=0x012c, f01=0x0190, f02=» A_ Z> : D NW (P D + I W6 @0 T n ( A0 U 1_ D + I D N ) E N : T * 3 SP P W X * 0 U U. _ Y . R P Y $ P X ( _ W Y & : B P6 T G W& X ^ Y ^ B I ~ B
0x3baaac…3bac40 Dummy {f00=0x012c, f01=0x0190, f02=» 0 D . P , _ D . D $ D * 3 T ( T & ^ S W : U ; $ T $ T $ T&x : : $ T2 $ ) ] $ ) Y _$ U x 0 )_8 $_ $ ) YP_J U ; $ T $ T $ TNp : : $ T* (W $ U $ ) Y _& (#
0x3bac40…3badd4 (2, 448) Dummy {f00=0x012d, f01=0x0190, f02=» A Z> : D NW (P P> 9 P +P8 P> PH 94 9RW P P 5P, ` :J ` X P W B Y "W X " ` W B " P H :H B # L Y @;,P* P $_ @7 !@P :0 8 _l _0 X 9 C P8 @_| _ ` @_~ `_~ @_~P 0P _ % A_| A_ Y
0x3badd4…3baf68 Dummy {f00=0x012d, f01=0x0190, f02=»X : _ B Y _~ ` X P A9v 9~ Y Wb Y @_ X X A9 9 Y _& Y 9 @; 0 A; A; _: X P ( y Y W D (P 0 ) > 7 (P _ ) 1_ 7 (X( P _ 0 )_6 X " X> "XD XH ;, _D ;, _6 (P _ ) 1 4 C X
0x3baf68…3bb0fc Dummy {f00=0x012d, f01=0x0190, f02=»T 9 @; T A; A; > A: A: A: A; A; ; W > B Y BHBB 7 !B~ 2B !B T P P =h = = !B Tf Tb AC P AC TR !B TL !B TD T@ !B T8 !B A I A; P " > !B ?@_ !
0x3bb0fc…3bb290 Dummy {f00=0x012d, f01=0x0190, f02=»; ; 8 !> X Y !?j A; _B !B X>_b A; @D @;*T 1 Z 0 2P P P A;( 9 @; 8 H @D P E C Pf X R` X P X TR P C 9 C P " H X "# P " P X * Y X T !:8W xW( &W" X R X T & !:8 :J !@V ;8 X " T<
0x3bb290…3bb424 Dummy {f00=0x012d, f01=0x0190, f02=» @; > @;* @;$ A;( ? !C~ @; XV !B T @; P !@~ !CN_p /T, @; X @; P @; T0 !?j !@z A; _ A; ? B A; @; T _2 _6 @; :0 A; A; X ! XD Y _N @; TL X ! P !@h ;8# T @D T !@d_ !> !@V_ A; A;( H E A; A; 4 @; P !@~ !CN ;8 !
0x3bb424…3bb5b8 Dummy {f00=0x012d, f01=0x0190, f02=»; _^ Y Y " 7 W @; !C* X ! X Z X X X _ @; P< @; T6 X R0 X P T$ T Y W ;" 9 P C & 9 A; A; @; P X Y 4 @D @; T @;* A;( @;( A;* A; !B T2 P4 PJ PL P P. 1 A;( @;( ]6W P _@ @D @
0x3bb5b8…3bb74c Dummy {f00=0x012d, f01=0x0190, f02=» !B !B B J 4 !B !B @;$ @;( A;* @;(T$ @C !B 8 !B W - !B x !_ W 0 " WL R ~T }T T0 W, !B P " ! " :A *@ H T 0 !B W R !B A;( @;& @;(UH Zt Q P Q T 0 !B A;( 0 !B A;( !B " !B " !B
0x3bb74c…3bb8e0 Dummy {f00=0x012d, f01=0x0190, f02=»B !B 4 A d ? : J T A; T 2PX !C H 4 !B` ;8 A d ? : _ I " P A; 7 ;@ A7 :J 4 A _$" P H B P W !C : ` _ !B ! 1 4 AB @_~ `_~ @_~P 0 M AB 4 ? @_~ `_~ @_~P $ Y : _ @ A7 :J @7 T C< ;8 7 @ A7
0x3bb8e0…3bba74 (2, 449) Dummy {f00=0x012d, f01=0x0190, f02=»C AC AC ?a :a# P @C @C @C 4 @;(T A; !B C !B A; @C :H 4 7 D D M ! " :A *@ H T 0 ! W R ! A;( @;& @;(U Zt Q P Q T 0 ! A;( 0 ! A;( ! " ! " !
0x3bba74…3bbc08 Dummy {f00=0x012d, f01=0x0190, f02=» ! 4 A d ? : J T A; T 2P ! H 4 ! ;8 A d ? : _ I " P A; 7 ;@ A7 :J 4 A _$" P H B P W ! : _ !B ! 1 4 AB @ ` @ P 0 M AB 4 ? @ ` @ P $ Y : _ @ A7 :J @7 T ;8 7 @ A7
0x3bbc08…3bbd9c Dummy {f00=0x012d, f01=0x0190, f02=» A A ?a :a# P @ @ @ 4 @;(T A; !B C !B A; @C :H 4 7 D M ! " :A *@ H T 0 ! W R ! A;( @;& @;(U Zt Q P Q T 0 ! A;( 0 ! A;( ! " ! " !
0x3bbd9c…3bbf30 Dummy {f00=0x012d, f01=0x0190, f02=» ! 4 A d ? : J T A; T 2P ! H 4 ! ;8 A d ? : _ I " P A; 7 ;@ A7 :J 4 A _$" P H B P W ! : _ !B ! 1 4 AB @ ` @ P 0 M AB 4 ? @ ` @ P $ Y : _ @ A7 :J @7 T ;8 7 @ A7
0x3bbf30…3bc0c4 Dummy {f00=0x012d, f01=0x0190, f02=» A A ?a :a# P @ @ @ 4 @;(T A; !B C !B A; @C :H 4 7 D M ! " :A *@ H T 0 ! W R ! A;( @;& @;(U Zt Q P Q T 0 ! A;( 0 ! A;( ! " ! " !
0x3bc0c4…3bc258 Dummy {f00=0x012d, f01=0x0190, f02=» ! 4 A d ? : J T A; T 2P ! H 4 ! ;8 A d ? : _ I " P A; 7 ;@ A7 :J 4 A _$" P H B P W ! : _ !B ! 1 4 AB @ ` @ P 0 M AB 4 ? @ ` @ P $ Y : _ @ A7 :J @7 T ;8 7 @ A7
0x3bc258…3bc3ec Dummy {f00=0x012d, f01=0x0190, f02=» A A ?a :a# P @ @ @ 4 @;(T A; !B C !B A; @C :H 4 7 D M ! " :A *@ H T 0 ! W R ! A;( @;& ;(U Zt Q P Q T 0 ! A;( 0 ! A;( ! " ! " !
0x3bc3ec…3bc580 Dummy {f00=0x012d, f01=0x0190, f02=» ! 4 A d ? : J T A; T 2P ! H 4 ! ;8 A d ? : _ I " P A; 7 ;@ A7 :J 4 A _$" P H B P W ! : _ !B ! 1 4 AB @ ` @ P 0 M AB 4 ? @ ` @ P $ Y : _ @ A7 :J @7 T ;8 7 @ A7
0x3bc580…3bc714 (2, 450) Dummy {f00=0x012d, f01=0x0190, f02=» A A ?a :a# P @ @ @ 4 @;(T A; !B C !B A; @C :H 4 7 D M ! " :A *@ H T 0 ! W R ! A;( @;& ;(U Zt Q P Q T 0 ! A;( 0 ! A;( ! " ! " !
0x3bc714…3bc8a8 Dummy {f00=0x012d, f01=0x0190, f02=» ! 4 A d ? : J T A; T 2P ! H 4 ! ;8 A d ? : _ I " P A; 7 ;@ A7 :J 4 A _$" P H B P W ! : _ !B ! 1 4 AB @ ` @ P 0 M AB 4 ? @ ` @ P $ Y : _ @ A7 :J @7 T ;8 7 @ A7
0x3bc8a8…3bca3c Dummy {f00=0x012d, f01=0x0190, f02=» A A ?a :a# P @ @ @ 4 @;(T A; !B C !B A; @C :H 4 7 D M ! " :A *@ H T 0 ! W R ! A;( @;& ;(U Zt Q P Q T 0 ! A;( 0 ! A;( ! " ! " !
0x3bca3c…3bcbd0 Dummy {f00=0x012d, f01=0x0190, f02=» ! 4 A d ? : J T A; T 2P ! H 4 ! ;8 A d ? : _ I " P A; 7 ;@ A7 :J 4 A _$" P H B P W ! : _ !B ! 1 4 AB @ ` @ P 0 M AB 4 ? @ ` @ P $ Y : _ @ A7 :J @7 T ;8 7 @ A7
0x3bcbd0…3bcd64 Dummy {f00=0x012d, f01=0x0190, f02=» A A ?a :a# P @ @ @ 4 @;(T A; !B C !B A; @C :H 4 7 D M ! " :A *@ H T 0 ! W R ! A;( @;& ;(U Zt Q P Q T 0 ! A;( 0 ! A;( ! " ! " !
0x3bcd64…3bcef8 Dummy {f00=0x012d, f01=0x0190, f02=» ! 4 A d ? : J T A; T 2P ! H 4 ! ;8 A d ? : _ I " P A; 7 ;@ A7 :J 4 A _$" P H B P W ! : _ !B ! 1 4 AB @ ` @ P 0 M AB 4 ? @ ` @ P $ Y : _ @ A7 :J @7 T ;8 7 @ A7
0x3bcef8…3bd08c Dummy {f00=0x012d, f01=0x0190, f02=» A A ?a :a# P @ @ @ 4 @;(T A; !B C !B A; @C :H 4 7 D M ! " :A *@ H T 0 ! W R ! A;( @;& ;(U Zt Q P Q T 0 ! A;( 0 ! A;( ! " ! " !
0x3bd08c…3bd220 Dummy {f00=0x012d, f01=0x0190, f02=» ! 4 A d ? : J T A; T 2P ! H 4 ! ;8 A d ? : _ I " P A; 7 ;@ A7 :J 4 A _$" P H B P W ! : _ !B ! 1 4 AB @ ` @ P 0 M AB 4 ? @ ` @ P $ Y : _ @ A7 :J @7 T ;8 7 @ A7
0x3bd220…3bd3b4 (2, 451) Dummy {f00=0x012d, f01=0x0190, f02=» A A ?a :a# P @ @ @ 4 @;(T A; !B C !B A; @C :H 4 7 D M ! " :A *@ H T 0 ! W R ! A;( @;& ;(U Zt Q P Q T 0 ! A;( 0 ! A;( ! " ! " !
0x3bd3b4…3bd548 Dummy {f00=0x012d, f01=0x0190, f02=» ! 4 A d ? : J T A; T 2P ! H 4 ! ;8 A d ? : _ I " P A; 7 ;@ A7 :J 4 A _$" P H B P W ! : _ !B ! 1 4 AB @ ` @ P 0 M AB 4 ? @ ` @ P $ Y : _ @ A7 :J @7 T ;8 7 @ A7
0x3bd548…3bd6dc Dummy {f00=0x012d, f01=0x0190, f02=» A A ?a :a# P @ @ @ 4 @;(T A; !B C !B A; @C :H 4 7 D M ! " :A *@ H T 0 ! W R ! A;( @;& ;(U Zt Q P Q T 0 ! A;( 0 ! A;( ! " ! " !
0x3bd6dc…3bd870 Dummy {f00=0x012d, f01=0x0190, f02=» '="_ _ R ^ ^o a d h6j k > > @_ 0 A_ W & ^ ! Z( _ (X0 @_ P T M ]@ , ) A_ P* P Y U ( ) 5 & > > [ [ _ Z Z Z ? Z >
0x3bd870…3bda04 Dummy {f00=0x012d, f01=0x0190, f02=»Y6 G _b P ,P - _ 2 ( a> cxa$ ? X V Y ` ! 2W< Y U R -P cl X , ) Y . cX X P Y P C W~ 8!@P$ X $P y $W $ c ` Y $ X " PP:A: R Q W Y <D X ? ?: T p > d > Ph
0x3bda04…3bdb98 Dummy {f00=0x012d, f01=0x0190, f02=» " _` B P$ $$ R % C d * ! W Y +PH Y *P> Y (P Y )P d R _Q P OR R W " ! B a Wr W 0 Z d ! B Z Z& X . 0T X W X ,P Y . 0 %_. % Y . W _p P d _ X $P y $ Y $ C !
0x3bdb98…3bdd2c Dummy {f00=0x012d, f01=0x0190, f02=»W Y , - ` @ Y $ X Z _X ? X :a Z T T W P X :d Y > > ? 8 R @RT V @% =cWP R`P R&P8 R P W 9 WD $ P W _ $ P _$ _*_, _ %0=c X 0P > 0 > >_ B 1 > XT 0 _ d
0x3bdd2c…3bdec0 Dummy {f00=0x012d, f01=0x0190, f02=» L # 9Q T W Q P X & V T Y &W d X ! T6 B R0Q$ B D ! V ! ! ! W !h !fn Y ! T ! V d ! B C ! ! T " T W Q " T ) ` !g d Y _ ! !g Y &P Q W ! Y '" g _" d
0x3bdec0…3be054 (2, 452) Dummy {f00=0x012e, f01=0x0190, f02=»Q " PH _ " P R: M T2 ! L ,! :D" !g Y Y U ! _$ W4 , ! T ,' d ! R !__U C X ' W Y ! _ X RT U TJ X f ? Y X P " ! Y ' ! X T ! ` e ` R _ 4 ! ! !
0x3be054…3be1e8 Dummy {f00=0x012e, f01=0x0190, f02=»P8 ` B P B L # +P ! ! T ! Y & ! W ! ! W ! Y Y ix F U P" T Y &_. P4 R( Pj O]> V _F T Y Y & V Y _^ C _P F F" $ P X & X ]r ! Y Y Y _ F" Hh(_ ! !
0x3be1e8…3be37c Dummy {f00=0x012e, f01=0x0190, f02=» j X _x R0 V0 ! P* P P P" R ?Q ! Y R Q ih -_ ? _ X # ! ^ Y _( ? X Z ! P4 P iV iZ X " h@ ! ! X & i" i^ j j j B 8# T $ # ;D 7P P ` Y W Y X Y 8# T W$
0x3be37c…3be510 Dummy {f00=0x012e, f01=0x0190, f02=»l ` B P B H " +P P. T Y ' ! R| X ( Y &R Y & _ Y &_. B 1 nD ! m: B B U4 $ ! T _ U D ! T _ $$ X" X& X* C F l X`" Ek P( 8'0P Ek TD ! T 9 _ ! T @_ ! F
0x3be510…3be6a4 Dummy {f00=0x012e, f01=0x0190, f02=» B !n !n ! m B Y & !n W k 8!0T 8 !@P ! $ P ! ! m* ! T Y & T X & C & ` X Y & Y > X " X &" Y )Q Y > X Z2<BR J ? Y ! T X ! Y & Zl m T _ ! X $ P !n k R
0x3be6a4…3be838 Dummy {f00=0x012e, f01=0x0190, f02=» ! ! ! Y 4 B k U )X R@ X X &" Y * X ) V Y !n X $ X & !n X * k k `R Y ! ! ! 4 ! V ! V W :h ! 4 X )" X '# R 4 m* > x yt F
0x3be838…3be9cc Dummy {f00=0x012e, f01=0x0190, f02=» B ! ! ! B Y & ! W k 8!0T 8 !@P ! $ P ! ! ! T Y & T X & C & ` X Y & Y > X " X &" Y )Q Y > X Z2<BR J ? Y ! T X ! Y & Zl m T _ ! X $ P ! k R
0x3be9cc…3beb60 Dummy {f00=0x012e, f01=0x0190, f02=» ! ! ! Y 4 B k U )X R@ X X &" Y * X ) V Y !n X $ X & !n X * k k `R Y ! ! ! 4 ! V ! V W :h ! 4 X )" X '# R 4 m* > F
0x3beb60…3becf4 (2, 453) Dummy {f00=0x012e, f01=0x0190, f02=» B ! ! ! B Y & ! W k 8!0T 8 !@P ! $ P ! ! ! T Y & T X & C & ` X Y & Y > X " X &" Y )Q Y > X Z2<BR J ? Y ! T X ! Y & Zl m T _ ! X $ P ! k R
0x3becf4…3bee88 Dummy {f00=0x012e, f01=0x0190, f02=» ! ! ! Y 4 B k U )X R@ X X &" Y * X ) V Y !n X $ X & !n X * k k `R Y ! ! ! 4 ! V ! V W :h ! 4 X )" X '# R 4 m* > F
0x3bee88…3bf01c Dummy {f00=0x012e, f01=0x0190, f02=» B ! ! ! B Y & ! W k 8!0T 8 !@P ! $ P ! ! ! T Y & T X & C & ` X Y & Y > X " X &" Y )Q Y > X Z2<BR J ? Y ! T X ! Y & Zl m T _ ! X $ P ! k R
0x3bf01c…3bf1b0 Dummy {f00=0x012e, f01=0x0190, f02=» ! ! ! Y 4 B k U )X R@ X X &" Y * X ) V Y !n X $ X & !n X * k k `R Y ! ! ! 4 ! V ! V W :h ! 4 X )" X '# R 4 m* > F
0x3bf1b0…3bf344 Dummy {f00=0x012e, f01=0x0190, f02=» RN H P ' P o P W< o T6 yv' P !y & B # P G W G & ` X P P R: Ax yb Y X T Q (P H U ^ 9 1_N ` X T @o P ( Ao y _ ( Y _ o _x X T @o P ( Ao y _ ( Y _ o _ i yz 9 @_
0x3bf344…3bf4d8 Dummy {f00=0x012e, f01=0x0190, f02=» 4' "?:B ] P H U _ U @ U 9C @ $$ T %_< %_B R @ U P 9C @ _ T M D W. D D " @ @ - U _ 9B @ T W X > "RT PL X TF X R@? V X & X H P & X P t Y X H
0x3bf4d8…3bf66c Dummy {f00=0x012e, f01=0x0190, f02=» (@ " $ P B >H<h { P ?_" = > = > = =_D R _ 00 > & <h$ P > o _x X T @o P ( Ao _ ( Y @{ P 4 A{ U W A{ A
0x3bf66c…3bf800 Dummy {f00=0x012e, f01=0x0190, f02=»{ @ 8 =hP Y X Pl 0T< Y H{ ! R W 9a I{ T T 9a H{ E| ^ W P ,! T T ( : n "' # |$ @{ P { $ ) 5 ` A{ A| A{ |& " 6 { A{ "" P U W |t { P @{ E
0x3bf800…3bf994 (2, 454) Dummy {f00=0x012e, f01=0x0190, f02=» F "R G | @{ D{ #D T G W, A| ' "R A| A{ ` |H ~ ^ o _x X T @o P ( Ao _ ( Y @{ P 4 A{ U W A{ A
0x3bf994…3bfb28 Dummy {f00=0x012e, f01=0x0190, f02=»{ @ 8 =hP Y X P 0T Y H{ ! R W 9a I{ T T 9a H{ E| ^ W P ,! T T ( : n "' # @{ P { $ ) 5 ` A{ A| A{ |& " 6 { A{ "" P U W |t { P @{ E
0x3bfb28…3bfcbc Dummy {f00=0x012e, f01=0x0190, f02=» F "R G | @{ D{ #D T G W, A| ' "R A| A{ ` |H o _x X T @o P ( Ao _ ( Y @{ P 4 A{ U W A{ A
0x3bfcbc…3bfe50 Dummy {f00=0x012e, f01=0x0190, f02=»{ @ 8 =hP Y X P 0T Y H{ ! R W 9a I{ T T 9a H{ E| ^ W P ,! T T ( : n "' # @{ P { $ ) 5 ` A{ A| A{ |& " 6 { A{ "" P ~ |t { P @{ E
0x3bfe50…3bffe4 Dummy {f00=0x012e, f01=0x0190, f02=» F "R G | @{ D{ #D T G W, A| ' "R A| A{ ` |H o _x X T @o P ( Ao _ ( Y @{ P 4 A{ U W A{ A
0x3bffe4…3c0178 Dummy {f00=0x012e, f01=0x0190, f02=» A~ -(@ : - : @~ , L T M @~ : =a 9a Q - _ - > @ HPJ r +@ 0 0 A0 3j @~ , - M M M @~ A{ A{ > j J J j 0123456789 & 012345
0x3c0178…3c030c Dummy {f00=0x012e, f01=0x0190, f02=»&/() @ABCDEFGHIJKLMNOPQRSTUVWXYZ []* < +,-. 0123456789 `ABCDEFGHIJKLMNOPQRSTUVWXYZ [] > ?;_: =!"#$%&/() @ABCDEFGHIJKLMNOPQRSTUVWXYZ [] ($SWAP A A A A. UU @ @ ! P$>B @ v A v @ v E D P
0x3c030c…3c04a0 Dummy {f00=0x012e, f01=0x0190, f02=» ` W " :d2 * A " & W F ` W F W F CRT F A @ @ ! P2 @ P ;b=H F CR 2 F 2W =J F CRTT F PN A @ $ P( @ R W 8 !RRT W V P A Y W @ " T> W @ V W
0x3c04a0…3c0634 (2, 455) Dummy {f00=0x012e, f01=0x0190, f02=» A W A A W T F W V = V W Y* P Z( = :L < P W <9B @ V W Q W @ v @ A @ CRT @ P @ ! P
0x3c0634…3c07c8 Dummy {f00=0x012e, f01=0x0190, f02=» W @ @ ! T _ P :l 9b ) V _ @ V W W P n TJ V 0 !;;P P V P$ _ P !;;T X$ W _J T W W W
0x3c07c8…3c095c Dummy {f00=0x012e, f01=0x0190, f02=»R @ ! T A A V @ R V V I W V $ ) H A I. : C. f X C.9h! # " :A K : A T.I T P 1 I P < R P A _> : " A ` A
0x3c095c…3c0af0 Dummy {f00=0x012e, f01=0x0190, f02=»! T A A I ! : 9E @ r s A I T ) A _ I N T : 9PJ S Y T@ $ 1T: C !CCTt : 1P P$_ P =H P @ T X W n : YX d C !CCTZ B. f X B.9 H
0x3c0af0…3c0c84 Dummy {f00=0x012e, f01=0x0190, f02=» d W P V V T d V T W P V W @ $ P p W T : A `_ 0V , - P X 9A_ : @ ! P (W ( :W> 2 W 0 . " A T I T P 1 I 2 ; Z [ : : [ [ :
0x3c0c84…3c0e18 Dummy {f00=0x012e, f01=0x0190, f02=»! T A W Z A. c @ V W U R $ )_ : W W W W W $Q@ V V v x W V V v p R( W V W ^< _@ V _P V V : V
0x3c0e18…3c0fac Dummy {f00=0x012e, f01=0x0190, f02=» $Q R t $V v : V W V ) : V <B W |P v v : $ b V |P v w v : V $ V l $ b V M : W V R RR > R W > <B
0x3c0fac…3c1140 Dummy {f00=0x012e, f01=0x0190, f02=» W V PL $;A^ D E D P. V P P T E _J b E _T " D T E b E D E % : " R ;B b " R P( |P v v : V W 0 : V P 9a _ " ( ) 8 ( ) : " $ V P
0x3c1140…3c12d4 (2, 456) Dummy {f00=0x012f, f01=0x0190, f02=» 0 H W : ? ? R 0 R P P B _ _ : V ) v : 4P: " D , H H $ M v b - I Y0 : @ ` V b pP ` $ $ W $ H )
0x3c12d4…3c1468 Dummy {f00=0x012f, f01=0x0190, f02=»:B A V 9n A @ A A , @ @ ! @ P P P P|_ _ @ 9N @ :b @ :b V W U6 T 9BW P P( P V W U " @ Q @ P A. @ P _b A 9n A :B A
0x3c1468…3c15fc Dummy {f00=0x012f, f01=0x0190, f02=»_ B A. @ D @ W x A ( : A ` > l : VR 2 W n V pT : N V l W H V ]" . nT" | W v X W n V ~P W x @ 4 _v V d , V
0x3c15fc…3c1790 Dummy {f00=0x012f, f01=0x0190, f02=» x _$ 8 V V x % V v % : V V 9k! P % _ V V W W r W V b v ) W b G b v ) - V b W f v ) G v ` " W p W ~ pP0 R nP ( v_ W ~ R nX4
0x3c1790…3c1924 Dummy {f00=0x012f, f01=0x0190, f02=» W ~ R R P R Xv _|W nT : 2 | W x v_ V P I * W z ` pPl H - V I " R E R T E D E @ v H v E D #_v W | ;b W W t V b v ( v W p
0x3c1924…3c1ab8 Dummy {f00=0x012f, f01=0x0190, f02=» d 8" R _ ZY QY : @ V H W z W | CRP W ` ` H W d 2 ;A @ $R - @ - N !TTP N :H N TBT W W8 2 " T @ N =H N @ ) !TTXX !CCT !UUT
0x3c1ab8…3c1c4c Dummy {f00=0x012f, f01=0x0190, f02=» : v `?A @ W W :b / W : W @ W D V W W ` " W p @ pP. " 4X 1 R Z0 _ W l a w ` :A W V d 4 W P _ W ` W d
0x3c1c4c…3c1de0 Dummy {f00=0x012f, f01=0x0190, f02=» P N W r N W @ @ % & V , P@ , - 4 ] 4 $Y 5 X * _6 : @ ] @ P @ P " P " P " P W W . !TTP r @ T Y !TTX" A 9 A : @
0x3c1de0…3c1f74 (2, 457) Dummy {f00=0x012f, f01=0x0190, f02=» 9J S ( 3 ( 9B @ @ T : @ :B W . !TTP r W t N =H N W l N =H N W p N =H N W | ( @ % P W @ % P P0 r " U _2
0x3c1f74…3c2108 Dummy {f00=0x012f, f01=0x0190, f02=» W l V p S W p W _L @ % P W @ % P !TTT @ @ T : @ ! P @ @ CRT 3 @ S @ PP !RRP @ ! T 3 @ & P 3
0x3c2108…3c229c Dummy {f00=0x012f, f01=0x0190, f02=» @ @ T : P S S _ : . !TTP V r W t * P r _ Ph W p W V 8 8 4 D P$ @ # P H I K T + Y@
0x3c229c…3c2430 Dummy {f00=0x012f, f01=0x0190, f02=» P / _ T @ A V W r W t PT W f ( W d G =h G V d V r < V f P W f _B V W V t Yr !TTX @ @ T : !TTX !CCTr r P,
0x3c2430…3c25c4 Dummy {f00=0x012f, f01=0x0190, f02=» P V 8 8 8 @ >B 3 . !CCP W r P0 W f W d V d V r < V f _2 U^ V 8 8 8 4 D P$ @ # P H I K T + Y@ _`R& @ @ @ % P V 4
0x3c25c4…3c2758 Dummy {f00=0x012f, f01=0x0190, f02=»W >b & 8P D P U & E W V W R 9 W D ) $ P@ D L T@ D &P V U 0 I , I . $# P V -W H P U & I @ % PD H I H T P( H U V U W < + + P V :
0x3c2758…3c28ec Dummy {f00=0x012f, f01=0x0190, f02=» R _ $ W : W | v z *T P _ / P *_ *T P$ _ .P _ / V z U Y$ P W | V z 3 % W P _ V |P V v ]_ W v P _ @ @ T
0x3c28ec…3c2a80 Dummy {f00=0x012f, f01=0x0190, f02=» T r _ : 00=H 00 P P _ _ : @ ! P (W ( : ~ F v @ CRT" @ ! P ` @ E "W ` @ E " ! 1 , d 0 1 2 P . f @ P . 0 f
0x3c2a80…3c2c14 (2, 458) Dummy {f00=0x012f, f01=0x0190, f02=» o" 07 DC a KB R * , 8k DY X T P
0x3c2c14…3c2da8 Dummy {f00=0x012f, f01=0x0190, f02=» 4d TP " 8k DY Z T" @ ! P a KB ^ .
0x3c2da8…3c2f3c Dummy {f00=0x012f, f01=0x0190, f02=» Z o" P 4h6GP R * 8k DY X T P
0x3c2f3c…3c30d0 Dummy {f00=0x012f, f01=0x018e, f02=»RD MOVE P z P* Q P XIF Q P* Q & P IFT MMUPAG=1 Q 0 P LDR A3,A2 GET LENGTH Q F , P LDR A2,A4 GET RECEIVING BUFFER ADDRESS Q d P INH Q & P LD A4,DWTTDM,A6 GET TTAB ADDRESS Q $ P TL TTB:MT,A4 LOAD MMU REGISTERS Q $ P LD A4,PRUN GET DM TTA
0x3c30d0…3c3264 Dummy {f00=0x012f, f01=0x0190, f02=» Q Z P XIF R P* R PDMT340 EQU * R P* R 2 P* SET STATUS USED R < P* R X P LDK A1,/FF R b PDMT350 SCR A1,A10 R v P LD A3,FDBDBR,A6 R P RF(NN) DMT394 NO DELAY R P LDR A2,A7 R P SUK A2,QSW R " P RF(E) DMT360 SEQUENTIAL W
0x3c3264…3c33f8 Dummy {f00=0x012f, f01=0x0190, f02=»NDOM DELETE R x P RF DMT390 S $ P* WRITE IF LAST REC IN SECTOR S & P* S N PDMT360 LD A4,FDBRRO,A6 S X P CW A4,FDBMRO,A6 S v " P RF(NE) DMT400 NOT LAST RECORD S " PDMT390 LDK A7,/05 BASIC WRITE S P SLL A3,1 S P RF(N) DMT395 BASIC WANTED S
0x3c33f8…3c358c Dummy {f00=0x012f, f01=0x0190, f02=»1,A6 FDB ADDRESS AS PARAMETER S P LKM T & P DATA -1 I/O AND ACTIVATION T 2 " P DATA DMTAR2 DMTASK RESTART #2 T V P LKM T | P DATA 3 EXIT T P EJECT T P* T P************** T P* DMTAR2 * T P************** T P* T P* T ,
0x3c358c…3c3720 Dummy {f00=0x012f, f01=0x0190, f02=»4,DMTIOT CHECK DISC I/O T P LDR A1,A1 U P RF(NZ) DMTERR U 2 P LDKL A1,/C0FF U H $ P ANS A1,FDBDBR,A6 RELEASE BUFFER U ^ PDMT400 EQU * U " P LDR A1,A6 FDB ADDR DATA FILE U P LD A2,ECBCW+2,A9 U P ANK A2,/FF U P LD A3,ECBCW,A9 LOG REC NR
0x3c3720…3c38b4 (2, 459) Opaque[0x194]
0x3c38b4…3c3a48 # DirEnt {nam=»M:92N1«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x25f8, f03=0x0000}
0x3c38b4…3c3a48 IdxSect {
0x3c38b4…3c3a48 f00 = 0x012f // 0x3c38b4 @0x0
0x3c38b4…3c3a48 f01 = 0x0002 // 0x3c38b6 @0x2
0x3c38b4…3c3a48 gno = [ // 0x3c38b8 @0x4
0x3c38b4…3c3a48 [0x00]: C0x012f.0x3.0
0x3c38b4…3c3a48 ]
0x3c38b4…3c3a48 }
0x3c3a48…3c3bdc Dummy {f00=0x012f, f01=0x010c, f02=» SCR LED DRDC15,/S ( #!!CH $$RBUFNR EQU 2$$RBUFNR EQU 1$$ & !!EN R ASM /S,NL ^ KPF /O p SCR ~ INC SYSTAB LKE M KPF /L,M:92N1 SCR ASM DRDC15,NL KPF /O SCR ASG /E0,TY10
0x3c3bdc…3c3d70 Dummy {f00=0x012f, f01=0x2008, f02=» LED DRDC15,/S ( #!!CH $$RBUFNR EQU 2$$RBUFNR EQU 1$$ & !!EN R ASM /S,NL ^ KPF /O p SCR ~ INC SYSTAB LKE M KPF /L,M:92N1 SCR ASM DRDC15,NL KPF /O SCR ASG /E0,TY10
0x3c3d70…3c3f04 Dummy {f00=0x012f, f01=0x0190, f02=» 6 = 1 [ B w p w P 8 J v 1 W . * s E = 2 S 3 ^ c . 0 < d!& &01GEBRATRTEASSIGN DISCFEJL ! & 0 F V
0x3c3f04…3c4098 Dummy {f00=0x012f, f01=0x018e, f02=» $ 4 D T d t C J F " D R2 RRRW50X ! L A H L R( 2 R
0x3c4098…3c422c Dummy {f00=0x012f, f01=0x0190, f02=» 4 B ( 8 H X h z J F " D L90X _;0XW 0XW 0XW 0XW 0XW 0XW 0XW 0X8R:R;R R L8R7 GG;GG;7;; .
0x3c422c…3c43c0 Dummy {f00=0x012f, f01=0x0190, f02=» 4 7 $ 9 & ; 6 = F J F " D ;7;7?R L1X L?R L0X T b ! L LA _ LWK0X ) L R?R0X K V B K N Q S * Z @
0x3c43c0…3c4554 (2, 460) Opaque[0x194]
0x3c4554…3c46e8 # DirEnt {nam=»M:92N1«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x2600, f03=0x0000}
0x3c4554…3c46e8 IdxSect {
0x3c4554…3c46e8 f00 = 0x0130 // 0x3c4554 @0x0
0x3c4554…3c46e8 f01 = 0x001e // 0x3c4556 @0x2
0x3c4554…3c46e8 gno = [ // 0x3c4558 @0x4
0x3c4554…3c46e8 [0x00]: C0x0130.0x0.0
0x3c4554…3c46e8 [0x01]: C0x0130.0x1.0
0x3c4554…3c46e8 [0x02]: C0x0130.0x2.0
0x3c4554…3c46e8 [0x03]: C0x0130.0x3.0
0x3c4554…3c46e8 [0x04]: C0x0131.0x0.0
0x3c4554…3c46e8 [0x05]: C0x0131.0x1.0
0x3c4554…3c46e8 [0x06]: C0x0131.0x2.0
0x3c4554…3c46e8 [0x07]: C0x0131.0x3.0
0x3c4554…3c46e8 [0x08]: C0x0132.0x0.0
0x3c4554…3c46e8 [0x09]: C0x0132.0x1.0
0x3c4554…3c46e8 [0x0a]: C0x0132.0x2.0
0x3c4554…3c46e8 [0x0b]: C0x0132.0x3.0
0x3c4554…3c46e8 [0x0c]: C0x0133.0x0.0
0x3c4554…3c46e8 [0x0d]: C0x0133.0x1.0
0x3c4554…3c46e8 [0x0e]: C0x0133.0x2.0
0x3c4554…3c46e8 ]
0x3c4554…3c46e8 }
0x3c46e8…3c487c Dummy {f00=0x0130, f01=0x0190, f02=»z p J h h h h h h < h h%>%d $ . 8 h h h h h h $ h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h n c @ Tg t z ^ b bLPL H b2 Z ` z
0x3c487c…3c4a10 Dummy {f00=0x0130, f01=0x0190, f02=» 4c @S{ D d 2Z $"z y B % y D Dbf d * F :P }B W [~ ? d j% L "~ T &b ICn 1 d _ A d " S _ @S > > U # T @ H ( ( P c P W: P, AS @ V ( U P" @: V L: W @:
0x3c4a10…3c4ba4 Dummy {f00=0x0130, f01=0x0190, f02=» 6 8 S Q Z P 0 9 t t_ $ @ _, ? P H H #P h A d A FQ ? @S : ) AS _ @ @ A H ( AS _ ? ? ? ? ? ^ A _ _ ^ S $P T I R $ 5 % > ? W ? W ? T T$ U U U U
0x3c4ba4…3c4d38 Dummy {f00=0x0130, f01=0x0190, f02=» Q Q > > 0 @Sh 1 ASh P P > ? * X " R" Y T ? X D ; T> O W8 > _& @ 8 R" Y T ? X D ; T O W > _& W2 > 8 X W( ? ` @ @ P $ H W W > > > > > > @S V ? S > _ > ? _ > > ? ^ ! Y ^ _ n ?
0x3c4d38…3c4ecc Dummy {f00=0x0130, f01=0x0190, f02=» < $ ( , 0 4 8 < C 8W T 8P Y ^ 5 ) P U S XH D #DP @ R XV Y @ P, ; T W X &P T X I Y T # C C W4 O " # X Y ) C
0x3c4ecc…3c5060 Dummy {f00=0x0130, f01=0x0190, f02=» P j$ > > F C F C > B R Q F ! P C > C > F :c" H :b"? #" : C > B R Q~ P0 B P* 0$ T # R QL > X B U( H Q2 X
0x3c5060…3c51f4 (2, 461) Dummy {f00=0x0130, f01=0x0190, f02=» P PL $ # Q > P _0 # T p > P p (_H _2 B U X > ? _ X T (@ H ^ > > ? _ X T X X T % T ?C L Rl _@(@ L U L Q0 M & X
0x3c51f4…3c5388 Dummy {f00=0x0130, f01=0x0190, f02=» 0P X T 4 Y X ; X T X O 1 1 X P - M T $ PD _ T " # p X L R P RP (@ ^ X P8 P0 # P T P 0P 1 _ t W Y > > SnJ B B SvJ B B pU
0x3c5388…3c551c Dummy {f00=0x0130, f01=0x0190, f02=» 0 R t B " P Q :A H P P S H !@T I S T ! 1 U S A d ? W A d ? W A d ? W U R ; V ~# T R p 4 # PJ P 4 RL P 4 ] P $ P ] U PD P< P0 P,
0x3c551c…3c56b0 Dummy {f00=0x0130, f01=0x0190, f02=» ' T P X P " >Wh T # Y U T ] W 8V X $P y $W $ :L P 8R R S Y $ X Z ;BR 8% =A Y T Z& h_, X ' X 4X< XB U T T U 5 U R " ] ~ S ;h # <c$
0x3c56b0…3c5844 Dummy {f00=0x0130, f01=0x0190, f02=»X <d$ _D $?:D" Y X P Y # P 4T U # P 4 4 P _r T _$ U _ ? 4 U 5 R PF "P2 R T T R X # X h > P P P ` X XF _H Wj ? T T :L W u > > E D E
0x3c5844…3c59d8 Dummy {f00=0x0130, f01=0x0190, f02=»XB Y X X X X ' 4 B U B (" W C (@ > ?" 8' ?A R 8;b# 4T RT T T ] ] 8 W< TrW T ] _ P T V WT 8V T P U 8 ~ U Q2P X H 5 U R " ] ~ Y > > V P
0x3c59d8…3c5b6c Dummy {f00=0x0130, f01=0x0190, f02=» 4XR XX 5 h_b Y Y Y X 9BV$ X & Y " X D V & X . T 8TV 9WD B 7P P S AS W AS @S A.W ? A dI.9 X R C C & S ?A @S A. X V 9_: @
0x3c5b6c…3c5d00 Dummy {f00=0x0130, f01=0x0190, f02=» Pb P Pv Pz * 6 + S AS @S A. H :L d S Y HW AS @S A. Wx ! * X , X P ! ! BW< ! * _ ! * _& ! X , X P ! H X , X P B B ! f ! B ! T Y *W X * p ! H# f & ! H ! " 0 TOT
0x3c5d00…3c5e94 (2, 462) Dummy {f00=0x0130, f01=0x0190, f02=»& Ph B @ @ :C P ! H 9DV ! (@ B r ! ! R ! j ! ! b ! ( ! ! Z ! X Y . X * f " ! H_ Y * 4 ! ~ PT C ! l ! H ! (@ ! ~ R _ ! V 1 ;h 1 ! V 1 ! ! l* ! B ! ! ~ ) ! H Y *# T X
0x3c5e94…3c6028 Dummy {f00=0x0130, f01=0x0190, f02=» ! B ! ~ ! T )WL WP ! ~ Xz R ! ( - j ! ) W. Y PW Y P Y L Y N Y B S W W B C & S _ ? , Y " X $ T X Y $ Y X HP 1 Y H S 0 Y J 1 0B. X (P y (_^ ( :L _n Y ( " X . P Y : ! F ! H X # P
0x3c6028…3c61bc Dummy {f00=0x0130, f01=0x0190, f02=» D C Y B S K & E % Y B K , X ;AR@;a X &P Y & P 7P < $ <C ! 9 4 X t " _ W B RZ X , X P W P Q8 U _ T,: B R(' P Q 9BW Q 9C B ! T 4 x @ P ;A _ 4
0x3c61bc…3c6350 Dummy {f00=0x0130, f01=0x0190, f02=»U P jW kQ 4 Y * ! 0" Z Y" P Z _ 4 A ;D A 4 R _ ;H 4 r ! (:C 4 Z ! ( 4 X " 4 ! ) 4 X P t 4 P y _^ _n Y " X P Y : ! ! H X # P
0x3c6350…3c64e4 Dummy {f00=0x0130, f01=0x0190, f02=» P Y P 7P < $ <C ! 9 4 X t " _ W B R X X P W P Q U _ T : B R ' P Q 9BW Q 9C B ! T 4 x @ P ;A _ 4
0x3c64e4…3c6678 Dummy {f00=0x0130, f01=0x0190, f02=»U P jW kQ 4 Y ! 0" Z Y" P Z _ 4 A ;D A 4 R _ ;H 4 ! (:C 4 ! ( 4 X " 4 ! ) 4 X P t 4 P y _^ & & P Y : ! ! H X # P
0x3c6678…3c680c Dummy {f00=0x0130, f01=0x0190, f02=» @94P 0P _ % A92 A96 &_^ B Q< R_r X P 0 Y P C x_ _ B Y _N S X P A :J Y Wb Y @_x X X A :J Y _& Y h @ 0 A ^ A _: X P ( y Y W & (P 0 ) > (P _ ) 1_
0x3c680c…3c69a0 Dummy {f00=0x0130, f01=0x0190, f02=» @ @ A X &_" X P y Y X P T h @ T A ^ A > A > A B A F A J A N RW > 4 " !% B !% T P P ! ! ! !% Tf Tb A& P A& TR !% TL !% TD T@ !%
0x3c69a0…3c6b34 (2, 463) Dummy {f00=0x0130, f01=0x0190, f02=» @ `P @& X@ !#: T< A d !# ~ @ ^P @& P @ 8 !"f !" A h_: !% X6_Z A d @& @ tT 1 R 0 2P P P A r > @ Z 8 H9x @& P E & PF X R@ X P X T2 P C * C X T ! W xW( &W" X R X T & ! !# ~_ A
0x3c6b34…3c6cc8 Dummy {f00=0x0130, f01=0x0190, f02=» @ @ t @ n A r " !&~ @ ^XN !% T @ hP !# !&N_h 1T& @ hX @ bP !" !# A f_ A h " < A ^ @ bT _, _0 @ ^T8W ~ @& T !# _ !"f !# _ A ` A r E A d A Z 4 @ ^P !# !&N ~ !&*W ~ @ T !# _ T h_ l A / C P B B A
0x3c6cc8…3c6e5c Dummy {f00=0x0130, f01=0x0190, f02=» @ dT @ t A r @ r A t A d !% T2 P4 PJ PL P P. 1 A r @ r ]6W P _@ @& @ r E !& P !% 4 _$ !& 2_l 1 A hT 0W ;W A z A {W W W A z A { !%$ @ z !% @ { !% !% !% B J 4 !%$ !% @ n @ r A t @ rT(
0x3c6e5c…3c6ff0 Dummy {f00=0x0130, f01=0x0190, f02=» T 0 !% W R !% A r @ p @ rU< Zx Q P Q T 0 !% A r 0 !% A r !% !% $ A b _ B J B !% !% 4 A d ? <J T A jT PD 4 !%p ~ A d ? <_ I " P A d A 4 A _$B P W " S " * 9AY X 2 _ !% 9AP ^
0x3c6ff0…3c7184 Dummy {f00=0x0130, f01=0x0190, f02=» a 4 :J& X A > :J&^ Z A x 4 A x !% @ ^P !# !&N ~ @ xP a x A x 4 A j !% T ' A j 4 & & {W W W A z A { ! @ z ! @ { ! ! ! B J 4 ! ! @ n @ r A t @ rT
0x3c7184…3c7318 Dummy {f00=0x0130, f01=0x0190, f02=» T 0 ! W R ! A r @ p @ rU Zx Q P Q T 0 ! A r 0 ! A r ! ! $ A b _ B J B ! ! 4 A d ? <J T A jT P 4 ! ~ A d ? <_ I " P A d A 4 A _$B P W " " * 9AY X 2 _ !% 9AP ^
0x3c7318…3c74ac Dummy {f00=0x0130, f01=0x0190, f02=» a 4 & X A > Z A x 4 A x !% @ ^P !# !&N ~ @ xP a x A x 4 A j !% T ' A j 4 & {W W W A z A { ! @ z ! @ { ! ! ! B J 4 ! ! @ n @ r A t @ rT
0x3c74ac…3c7640 Dummy {f00=0x0130, f01=0x0190, f02=» T 0 ! W R ! A r @ p @ rU Zx Q P Q T 0 ! A r 0 ! A r ! ! $ A b _ B J B ! ! 4 A d ? <J T A jT P 4 ! ~ A d ? <_ I " P A d A 4 A _$B P W " " * 9AY X 2 _ !% 9AP ^
0x3c7640…3c77d4 (2, 464) Dummy {f00=0x0131, f01=0x0190, f02=» a 4 & X A > Z A x 4 A x !% @ ^P !# !&N ~ @ xP a x A x 4 A j !% T ' A j 4 & {W W W A z A { ! @ z ! @ { ! ! ! B J 4 ! ! @ n @ r A t @ rT
0x3c77d4…3c7968 Dummy {f00=0x0131, f01=0x0190, f02=» T 0 ! W R ! A r @ p @ rU Zx Q P Q T 0 ! A r 0 ! A r ! ! $ A b _ B J B ! ! 4 A d ? <J T A jT P 4 ! ~ A d ? <_ I " P A d A 4 A _$B P W " " * 9AY X 2 _ !% 9AP ^
0x3c7968…3c7afc Dummy {f00=0x0131, f01=0x0190, f02=» a 4 & X A > Z A x 4 A x !% @ ^P !# !&N ~ @ xP a x A x 4 A j !% T ' A j 4 & {W W W A z A { ! @ z ! @ { ! ! ! B J 4 ! ! @ n @ r A t @ rT
0x3c7afc…3c7c90 Dummy {f00=0x0131, f01=0x0190, f02=» T 0 ! W R ! A r @ p @ rU Zx Q P Q T 0 ! A r 0 ! A r ! ! $ A b _ B J B ! ! 4 A d ? <J T A jT P 4 ! ~ A d ? <_ I " P A d A 4 A _$B P W " " * 9AY X 2 _ !% 9AP ^
0x3c7c90…3c7e24 Dummy {f00=0x0131, f01=0x0190, f02=» a 4 & X A > Z A x 4 A x !% @ ^P !# !&N ~ @ xP a x A x 4 A j !% T ' A j 4 & {W W W A z A { ! @ z ! @ { ! ! ! B J 4 ! ! @ n @ r A t @ rT
0x3c7e24…3c7fb8 Dummy {f00=0x0131, f01=0x0190, f02=» T 0 ! W R ! A r @ p @ rU Zx Q P Q T 0 ! A r 0 ! A r ! ! $ A b _ B J B ! ! 4 A d ? <J T A jT P 4 ! ~ A d ? <_ I " P A d A 4 A _$B P W " " * 9AY X 2 _ !% 9AP ^
0x3c7fb8…3c814c Dummy {f00=0x0131, f01=0x0190, f02=» a 4 & X A > Z A x 4 A x !% @ ^P !# !&N ~ @ xP a x A x 4 A j !% T ' A j 4 & {W W W A z A { ! @ z ! @ { ! ! ! B J 4 ! ! @ n @ r A t @ rT
0x3c814c…3c82e0 Dummy {f00=0x0131, f01=0x0190, f02=» T 0 ! W R ! A r @ p @ rU Zx Q P Q T 0 ! A r 0 ! A r ! ! $ A b _ B J B ! ! 4 A d ? <J T A jT P 4 ! ~ A d ? <_ I " P A d A 4 A _$B P W " " * 9AY X 2 _ !% 9AP ^
0x3c82e0…3c8474 (2, 465) Dummy {f00=0x0131, f01=0x0190, f02=» a 4 & X A > Z A x 4 A x !% @ ^P !# !&N ~ @ xP a x A x 4 A j !% T ' A j 4 & {W W W A z A { ! @ z ! @ { ! ! ! B J 4 ! ! @ n @ r A t @ r
0x3c8474…3c8608 Dummy {f00=0x0131, f01=0x0190, f02=» 7- <=2&p ?' @O JZlP}M] Nk`Ka z^L~noj {|[_m TOSS T : :J:6 S P :0 :J:: _ t _< ?
0x3c8608…3c879c Dummy {f00=0x0131, f01=0x0190, f02=»=,=,=,< < <<; < < ; =,=,; < < <<; " # $ % "$&( ; : @ D X P _ L !##P T @ R $P U + U _ (@(@ I: P ^ =, H: Y H: B # X ( U =, B r R| W Y & Y $ 0 Y . <
0x3c879c…3c8930 Dummy {f00=0x0131, f01=0x0190, f02=» C B B B U P R Wp H TP L P B r L ( R| $ X _ X ` T I T J O8 P C X I X J S W C C W, B B Y IR Q X JU C '? T W6 P T.(@(@ P #D q >B S S > > BrBrBrBrBrA
0x3c8930…3c8ac4 Dummy {f00=0x0131, f01=0x0190, f02=» D ( U ( 0 W T ` U @ , @ W : X & X P !##T Y T( X P P P @S Q (@ F R : @ _ S ( H > >4 X &Pj D ^V" D "? P P &P E ^ Q V, P ( > ( ( W >4 Qj Br B W
0x3c8ac4…3c8c58 Dummy {f00=0x0131, f01=0x0190, f02=» T _ Y & F yZ yb(@ _ A X & X I U X J U ( Qj T$ X X RP F = T Br P ` U0 @ , D !##X D ( * ]" 0 X Wf ` U @ H @ X WF Pf N 4 5W P 0 @L 1 AL (@_
0x3c8c58…3c8dec Dummy {f00=0x0131, f01=0x0190, f02=»' @8 5 @8 4 G W , P& ,' X X 1 Z" ) @8_ (@ C ( B ! Br @8 @=X F U G F G = Bp & ( F " F +P P* X $ T P U W P R P> $P8W Br X ( X & F X P @S Q (@ R| + X
0x3c8dec…3c8f80 Dummy {f00=0x0131, f01=0x0190, f02=» P I I K K P P & P PfW D $ T P T PJW E I E J X ^V ? T B yZ &(@( o B B P ! Tn M E : B Ao Ao " P op "" p P E o @or yb(@ Dot C C C x W
0x3c8f80…3c9114 (2, 466) Dummy {f00=0x0131, f01=0x0190, f02=»ot EovX #D( B ( B yZ B @or Dot x W C C ( B B o op @o T Ao 0" ER ER U _ L !SSP !LL ER W L @o| Ao|V E P Eo~ @or Eo P Eo P Eo Do~T o P E G 2% P( R 0 XotT
0x3c9114…3c92a8 Dummy {f00=0x0131, f01=0x0190, f02=» E 3 P S I P S J P S ( P S * P % S H P & S P @o S , d S B | C C^ @o|T W o T Wz @o P R ( >a U Wb 0 =b Po~P @o| ! T. W< Po Dot Y Po Y Po Y U ! T ! X6 _R _V Do " P o Ao
0x3c92a8…3c943c Dummy {f00=0x0131, f01=0x0190, f02=»( @o F _ T `op ` 9A S ^ H $X D S . S $ R R * S W S _ S ` R ( R * O S b F U _ L !SSP !LL W L @ A V P E @ E P E P E D T P 2% P R 0 X T
0x3c943c…3c95d0 Dummy {f00=0x0131, f01=0x0190, f02=» E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | C C^ @ T W T W @ P R ( >a U W 0 =b P P @ ! T W P D Y P Y P Y U ! T ! X6 _R _V D " P A
0x3c95d0…3c9764 Dummy {f00=0x0131, f01=0x0190, f02=»( @ F _ T ` ` 9A S ^ H $X D S . S $ R * S W S _ S ` R ( R * S b F U _ L !SSP !LL W L @ A V P E @ E P E P E D T P 2% P R 0 X T
0x3c9764…3c98f8 Dummy {f00=0x0131, f01=0x0190, f02=» E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | C C^ @ T W T W @ P R ( >a U W 0 =b P P @ ! T W P D Y P Y P Y U ! T ! X6 _R _V D " P A
0x3c98f8…3c9a8c Dummy {f00=0x0131, f01=0x0190, f02=»( @ F _ T ` ` 9A S ^ H $X D S . S $ R * S W S _ S ` R ( R * S b F U _ L !SSP !LL W L @ A V P E @ E P E P E D T P 2% P R 0 X T
0x3c9a8c…3c9c20 Dummy {f00=0x0131, f01=0x0190, f02=» E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | C C^ @ T W T W @ P R ( >a U W 0 =b P P @ ! T W P D Y P Y P Y U ! T ! X6 _R _V D " P A
0x3c9c20…3c9db4 (2, 467) Dummy {f00=0x0131, f01=0x0190, f02=» [ [ : P Q R ;A [ [ : Q R P ;A [ [ : ? ? !? P P !> P W 9P _ T !##P> ? R4 L TX P L P 4 M X M M _8 > & D LW 0P Q P P E +P W : X +
0x3c9db4…3c9f48 Dummy {f00=0x0131, f01=0x0190, f02=» @L T n ( AL U 1_ D + I D N ) E N : T * O SP P W X * 0 U U. _ Y . R P Y $ P X ( _ W Y & : B P6 T G W& X ^ Y ^ B I ~ B T B : X "? P P X T
0x3c9f48…3ca0dc Dummy {f00=0x0131, f01=0x0190, f02=» D $ D * O T ( T & ^ S W : U ; $ T $ T $ T&x : : $ T2 $ ) ] $ ) Y _$ U x 0 )_8 $_ $ ) YP_J U ; $ T $ T $ TNp : : $ T* (W $ U $ ) Y _& (# )_4 $ ($ ) YR_L
0x3ca0dc…3ca270 Dummy {f00=0x0131, f01=0x0190, f02=» ! Z( S (X0 @S P T M ]@ , ) AS P* P Y U ( ) 5 & > > [ [ S Z Z Z ? Z > P "R Y W 0 S Pl T Pb _ <UR "R4 PB X R< X T6 X T0. T G Y6 G _b P ,P - _ ( (
0x3ca270…3ca404 Dummy {f00=0x0131, f01=0x0190, f02=»P$ X $P y $W $ :LW ` Y $ X " PP:A: R Q W Y <D X ? ?: T p > XV > Ph P C V B V T B % X . $ 4 T % V X ,T ! P W Xf Y . V XV ! B P X " _` B P$ $$ R % C XV
0x3ca404…3ca598 Dummy {f00=0x0131, f01=0x0190, f02=»Z Z& X . 0T X W X ,P Y . 0 %_. % Y . W _p P XV _ X $P y $ Y $ C ! S " W QfR$ X # P X R6;GV2 X $P y $ W P8 X R2;GV. X " UV X , $4 P Xf X .T * W Y , - S @ Y $ X Z _X ? X :a
0x3ca598…3ca72c Dummy {f00=0x0131, f01=0x0190, f02=»$ P _$ _*_, _ %0=c X 0P > 0 > >_ B 1 > XT 0 _ d X [ [ !"&';<>@^_ 9: X ! Y MX P ^ S Y LX X X Y.Y X X Z Z ! ! ! W B W$ B L # 9Q T W Q P X & V T
0x3ca72c…3ca8c0 Dummy {f00=0x0131, f01=0x0190, f02=» B C ! ! T " T W Q " T ) S ![ X Y _ ! ![v Y &P Q W ! Y '" [,_" Xz_< ![j_n ![ _t B B , ! T _ D ! P ! P W C V B P ! ! ! Y 4 RNQ " PH _ " P R: M T2 ! L ,!
0x3ca8c0…3caa54 (2, 468) Dummy {f00=0x0132, f01=0x0190, f02=» X Y ? Y X P " ! Y ' ! X T ! S X S R _ 4 ! ! ! " T ! ! ! ! 4 X ' 4 Y ' X ! ! " P ,$ , ! 4!"$&;<>@^_ [ ]X] ]t PB P8 S B P B L # +P ! !
0x3caa54…3cabe8 Dummy {f00=0x0132, f01=0x0190, f02=» Y & V Y _^ C _P F F" $ P X & X ]r ! Y Y Y _ F" H[ _ ! ! ] & S X C _ X Y & Y > B B U$ $ ! T _ U D ! T _ C > X Z^<BR P j X _x R0 V0 ! P* P P
0x3cabe8…3cad7c Dummy {f00=0x0132, f01=0x0190, f02=»" [ ! ! X & ] ^0 ^n^ B 8# T $ # ;D 7P P S Y W Y X Y 8# T W$ T( X $ P X P B V *@ Y h S S ? X _F ^ b ` a aZ ` ! P P `n & `V S B P B H " +P P. T
0x3cad7c…3caf10 Dummy {f00=0x0132, f01=0x0190, f02=» _ $$ X" X& X* C F ` X`" E^ P( 8'0P E^ TD ! T 9 _ ! T @_ ! F B P !bR B C ` ^N P R ?] _ C _ F F" $ P X ' X ] ! ` _ B !b !bR ! ` B Y & !bpW
0x3caf10…3cb0a4 Dummy {f00=0x0132, f01=0x0190, f02=»Q Y > X Z2<BR J ? Y ! T X ! Y & Zl ` T _ ! X $ P !a _ R V P P" ! ` W ` X $ X !a _ X $ X X & !bp !bR Y _8 X " X &" Y )U W ! ! ! Y 4 B _B
0x3cb0a4…3cb238 Dummy {f00=0x0132, f01=0x0190, f02=» ! 4 ! V ! V W :h ! 4 X )" X '# R 4 ` > k m F B P ! B C ^N P R ?] _ C _ F F" $ P X ' X ] ! _ B ! ! ! B Y & ! W
0x3cb238…3cb3cc Dummy {f00=0x0132, f01=0x0190, f02=»Q Y > X Z2<BR J ? Y ! T X ! Y & Zl ` T _ ! X $ P ! _ R V P P ! ` W ` X $ X ! _ X $ X X & ! ! Y _8 X " X &" Y )U W ! ! ! Y 4 B _B
0x3cb3cc…3cb560 Dummy {f00=0x0132, f01=0x0190, f02=» ! 4 ! V ! V W :h ! 4 X )" X '# R 4 ` > F B P ! B C ^N P R ?] _ C _ F F" $ P X ' X ] ! _ B ! ! ! B Y & ! W
0x3cb560…3cb6f4 (2, 469) Dummy {f00=0x0132, f01=0x0190, f02=»Q Y > X Z2<BR J ? Y ! T X ! Y & Zl ` T _ ! X $ P ! _ R V P P ! ` W ` X $ X ! _ X $ X X & ! ! Y _8 X " X &" Y )U W ! ! ! Y 4 B _B
0x3cb6f4…3cb888 Dummy {f00=0x0132, f01=0x0190, f02=» ! 4 ! V ! V W :h ! 4 X )" X '# R 4 ` > F B P ! B C ^N P R ?] _ C _ F F" $ P X ' X ] ! _ B ! ! ! B Y & ! W
0x3cb888…3cba1c Dummy {f00=0x0132, f01=0x0190, f02=»Q Y > X Z2<BR J ? Y ! T X ! Y & Zl ` T _ ! X $ P ! _ R V P P ! ` W ` X $ X ! _ X $ X X & ! ! Y _8 X " X &" Y )U W ! ! ! Y 4 B _B
0x3cba1c…3cbbb0 Dummy {f00=0x0132, f01=0x0190, f02=» ! 4 ! V ! V W :h ! 4 X )" X '# R 4 ` > F B P ! B C ^N P l P P .T B Y Wx B P X P ( ( 7 R ( P H RN H P ' P b P W< b T6 m ' P
0x3cbbb0…3cbd44 Dummy {f00=0x0132, f01=0x0190, f02=»_N S X T @b P ( Ab mB _ ( Y _ b _x X T @b P ( Ab mB_ ( Y _ b _ i m 9 @_ mD H b P b P $ $ 1 ) > ) $P e % > (@ B Z F U F Z b P U S C G 4' "?:B ] P H U _
0x3cbd44…3cbed8 Dummy {f00=0x0132, f01=0x0190, f02=» - U _ 9B @ T W X > "RT PL X TF X R@? V X & X H P & X P t Y X H P & < ? < ? <(@ oB $ P B $ 9H C ">h # P >_2 < U = (@ " $ P B >H<h oX P ?_" =
0x3cbed8…3cc06c Dummy {f00=0x0132, f01=0x0190, f02=» b _x X T @b P ( Ab mB_ ( Y @olP 4 Aol U W Aol Aoj @on U : Ao Ao :A Aor y , ` R @ U P. ,% T& o C ( B P T W ' T| Iot @ 8 =hP Y X Pl 0T<
0x3cc06c…3cc200 Dummy {f00=0x0132, f01=0x0190, f02=»o @ojP ol $ ) 5 S Aoj Ao Aon o " R| op Ao| "" P U W p op P @or Eot "# P P @on P ( )W @ 0 R % "V E T D Ao _" P @on P ( )W @ 0 Rb ' F "R G o @or Dot #D
0x3cc200…3cc394 (2, 470) Dummy {f00=0x0132, f01=0x0190, f02=» b _x X T @b P ( Ab mB_ ( Y @olP 4 Aol U W Aol Aoj @on U : Ao Ao :A Aor , ` R @ U P ,% T o C ( B P T W ' T Iot @ 8 =hP Y X P 0T
0x3cc394…3cc528 Dummy {f00=0x0132, f01=0x0190, f02=» @ojP ol $ ) 5 S Aoj Ao Aon o " R| op Ao| "" P U W p op P @or Eot "# P P @on P ( )W @ 0 R % "V E T D Ao _" P @on P ( )W @ 0 Rb ' F "R G o @or Dot #D
0x3cc528…3cc6bc Dummy {f00=0x0132, f01=0x0190, f02=» wH b _x X T @b P ( Ab mB_ ( Y @olP 4 Aol U W Aol Aoj @on U : Ao Ao :A Aor , ` R @ U P ,% T o C ( B P T W ' T Iot @ 8 =hP Y X P 0T
0x3cc6bc…3cc850 Dummy {f00=0x0132, f01=0x0190, f02=» @ojP ol $ ) 5 S Aoj Ao Aon o " R| op Ao| "" P rb p op P @or Eot "# P P @on P ( )W @ 0 R % "V E T D Ao _" P @on P ( )W @ 0 Rb ' F "R G o @or Dot #D
0x3cc850…3cc9e4 Dummy {f00=0x0132, f01=0x0190, f02=» b _x X T @b P ( Ab mB_ ( Y @olP 4 Aol U W Aol Aoj @on U : @r^ , L T L PF L T M Q M L V L Ar` @r^ : T n @r` [ [ M M M Ar^ -(@ : - : @r^ , L T M
0x3cc9e4…3ccb78 Dummy {f00=0x0132, f01=0x0190, f02=» @r^ Aoj Aol >z z4zdz zdz 0123456789 & 0123456789 & < +.-, 0123456789 `ABCDEFGHIJKLMNOPQRSTUVWXYZ []' ^ > ?:_; =!"#$%&/() @ABCDEFGHIJKLMNOPQRSTUVWXYZ []* ($SWA
0x3ccb78…3ccd0c Dummy {f00=0x0132, f01=0x0190, f02=» @ " Q A z : R W2 A A z P. _ " :c* A z W " :d2 * A < & W F ` W F W F CRT F A @ @ ! P2 @ P ;b=H F CR }L F }LW =J F CRTT F PN A @ $ P( @ R W
0x3ccd0c…3ccea0 Dummy {f00=0x0132, f01=0x0190, f02=» Y P @ T W - P _ T <B :L A W A A W T F W V = V W Y* P Z( = :L < P W <9B @ V
0x3ccea0…3cd034 (2, 471) Dummy {f00=0x0132, f01=0x0190, f02=»P !RRP V @ P W _: p V @ PZ W @ @ ! T _ P :l 9b ) V _ @ V W W P TJ V 0 !;;P P V P$ _ P !;;
0x3cd034…3cd1c8 Dummy {f00=0x0132, f01=0x0190, f02=» V Xb _ P !;;T X$ W nP XZ_V S A / A u @ R @ ! T A A V @ R V V I W V $ ) H A I. : C. X C.9h! # " :A K :
0x3cd1c8…3cd35c Dummy {f00=0x0132, f01=0x0190, f02=»9C) A I " 9A ! 9B r @z r A I ! ( : A z A A A A ! T A A I ! : 9E @z r s A I T ) A _ I N T : 9PJ S Y T@ $ 1T: C !CCTt : 1P P$_ P
0x3cd35c…3cd4f0 Dummy {f00=0x0132, f01=0x0190, f02=» R X A X W : @ ' R xW V W$ V P P ~ W P V V T ~ V T W P V W @ $ P p W T : A z_ 0V , - P X 9A_ : @ ! P (W ( :W> 2 W 0
0x3cd4f0…3cd684 Dummy {f00=0x0132, f01=0x0190, f02=» j A A A A ! T A W Z A. c @ V W U R $ )_ : W W W W W >Q@ V V v x W V V
0x3cd684…3cd818 Dummy {f00=0x0132, f01=0x0190, f02=» >V U * _ V * Z K W W :K W r >Q R t >V v : V W V ) : V <B W |P v v : $ | V |P v w v : V $ V l $ | V
0x3cd818…3cd9ac Dummy {f00=0x0132, f01=0x0190, f02=» z ` _f V : W R R P L r W x _ V : " D Pd W V PL $;A^ D E D P. V P P T E _J | E _T " D T E | E D E % : " R ;B | " R P( |P v
0x3cd9ac…3cdb40 Dummy {f00=0x0132, f01=0x0190, f02=»^ 0 : W ; V : : , X G : J @ 0 V @ 0 H W : ? ? R 0 R P P B _ S : V ) v : 4P: " D , H H $ M v b - I Y0 : @
0x3cdb40…3cdcd4 (2, 472) Dummy {f00=0x0133, f01=0x0190, f02=»_d D = G $ 0 V W $ ^ V E J K _N V r V :B A V 9n A @ A A , @ @ ! @ P P P P|_ _ @ 9N @ :b @ :b V W U6 T 9BW P
0x3cdcd4…3cde68 Dummy {f00=0x0133, f01=0x0190, f02=» 3 S Y& P4 Sj Sj S P 3 _ Sj 3 Sl B A. @ D @ W x A ( : A S > l : pR L W n V pT : N V l W H V ]" . nT" W
0x3cde68…3cdffc Dummy {f00=0x0133, f01=0x0190, f02=» G G v U r v G v : P L pV : r V ~P W x _$ 8 V V x % V v % : V V 9k! P % _ V V W W r W V | v ) W b G | v ) - V | W
0x3cdffc…3ce190 Dummy {f00=0x0133, f01=0x0190, f02=» pPn D V W % 6 R , | " E R & W ~ R & R P R Xv _|W T : L W x _ V P I D W z ` pPl H - V I 0 " R E R T E D E
0x3ce190…3ce324 Dummy {f00=0x0133, f01=0x0190, f02=» 0 :C # : .=H N .=H N N : d 8" R _ ZY QY : @ V H W z W | CRP W ` ` H W d 2 ;A @ >R - @ - N !TTP N :H N TBT W W8 2
0x3ce324…3ce4b8 Dummy {f00=0x0133, f01=0x0190, f02=» .:H N P V _ R :h " B YV : v `?A @ W W :b / W : W @ W D V W W ` " W p @ pP. " 4X 1
0x3ce4b8…3ce64c Dummy {f00=0x0133, f01=0x0190, f02=» V >k 8 W W t V V : x A z P h W r h W @ @ % @ V , P@ , - 4 ] 4 >Y 5 X * _6 : @ ] @ P @ P " P " P "
0x3ce64c…3ce7e0 Dummy {f00=0x0133, f01=0x0190, f02=»" P #E t " P #F t : @ " P @ P 3 _ @ " P S 1 S 9J S ( 3 ( 9B @ @ T : @ :B W . !TTP W t N =H N W l N =H N W p N =H N W | ( @ % P W @ %
0x3ce7e0…3ce974 (2, 473) Dummy {f00=0x0133, f01=0x0190, f02=» _2 V V tPJ S ( V | S =J @ " S V l S W l V p S W p W _L @ % P W @ % P !TTT @ @ T : @ ! P @ @ 0 CRT 3 @ 0 0
0x3ce974…3ceb08 Dummy {f00=0x0133, f01=0x0190, f02=» @ T : Sh ` @ P _ 3 S S V V W @ @ T : P S S _ : . !TTP V W t * P r _ Ph W p W
0x3ceb08…3cec9c Dummy {f00=0x0133, f01=0x0190, f02=» @ T : @ R @ T P / _ T @ A V W W t PT W f ( W d G =h G V d V r < V f P W f _B V W V t Yr
0x3cec9c…3cee30 Dummy {f00=0x0133, f01=0x0190, f02=» _. P, V 4 U $ $ _. @ @ @ ! P V 8 8 8 @ >B 3 . !CCP W P0 W f W d V d V r < V f _2 U^ V 8 8 8 4 D P$ @
0x3cee30…3cefc4 Dummy {f00=0x0133, f01=0x0190, f02=» : W V @ 0 V P _ W $ q > R P >b W >b & 8P D P U & E W z V W R 9 W D ) $ P@ D L T@ D &P V U 0 I , I . $# P V -W H P U & I @ % PD H I H
0x3cefc4…3cf158 Dummy {f00=0x0133, f01=0x0190, f02=»;I # ;b W ;a WR# T W W,# T W W # T W W W R _ $ W : W | v z *T P _ / P *_ *T P$ _ .P _ / V z U Y$ P W | V z 3 %
0x3cf158…3cf2ec Dummy {f00=0x0133, f01=0x0190, f02=»=H N : &=H F : F =H F : F =H F : P N =H N T _ : 00=H 00 P P _ _ : @ ! P (W ( : 4 ` @ 0 CRT" @ ! P ` @ E "W ` @ E "
0x3cf2ec…3cf480 Dummy {f00=0x0133, f01=0x0190, f02=» , , , , ,b H b ,b t b . DC T KB y :
0x3cf480…3cf614 (2, 474) Dummy {f00=0x0133, f01=0x0190, f02=»=H N 2 4X TP & 8^ DY ^ @ P T KB y " (
0x3cf614…3cf7a8 Dummy {f00=0x0133, f01=0x0190, f02=» ?O_o 8^ DY T , P 4[ GP T KB y
0x3cf7a8…3cf93c Dummy {f00=0x0133, f01=0x018e, f02=» P ABL BRM SALCUZ " PTRS005 CIO A2,1,LCUUT SALCUZ PTRS010 EQU * SALCUZ B P LDK A2,SYNEBC SALCUZ ^ 2 P OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ | P XIF SALCUZ P IFT P6805=1 SALCUZ P IFT CODE=0 SALCUZ P LDK A2,
0x3cf93c…3cfad0 Dummy {f00=0x0133, f01=0x0190, f02=» x P ABL BRM SALCUZ " PTRS005 CIO A2,1,LCUUT SALCUZ PTRS010 EQU * F P LDK A2,SYN SALCUZ Z 2 P OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ v P XIF SALCUZ * P CF A5,READ WAIT FOR OUTPUT INTERRUPT P LDK A3,4 4 SYNS P
0x3cfad0…3cfc64 Dummy {f00=0x0133, f01=0x0190, f02=»* P* RECEIVER INTERRUPT P* ( P* 2 PIH1501 EQU * < P ST P,INTSAV P P IFT CPU852=1 d P CF A15,SAVE8 SAVE A1-A8 z P XIF P P IFF CPU852=1 P MSR 8,A15 SAVE A1-A8 =1 P XIF * P CF A15,LDREG RESTORE DC
0x3cfc64…3cfdf8 Dummy {f00=0x0133, f01=0x0190, f02=» LOG RECEIVED CHARACTER P XIF P IFF CODE=1 , P C2 SYNSW @ P RF(NZ) IHLCI2 R P CWK A2,SYN SKIP SYNS h P RF(E) READ " PIHLCI2 XRR A7,A2 CALCULATE LRC P XIF P IFT CODE=1 P C2 SYNSW 2 P RF(NZ) IHLCI1 DO NOT
0x3cfdf8…3cff8c Dummy {f00=0x0133, f01=0x0190, f02=»C v ( P LC A2,TASCII,A2 TRANSLATE TO ASCII P XIF 6 PIHIN10 RTN A5 B P IFT P6805=0 SALCUZ X PIHIN20 CF A5,SST PERFORM SST t P ABL BRM P XIF SALCUZ P IFT P6805=1 SALCUZ $ PIHIN20 RF SST PERFORM SST SALCUZ P XIF
0x3cff8c…3d0120 Dummy {f00=0x0133, f01=0x0190, f02=» P IFT CPU852=1 P CF A15,SAVE8 SAVE A1 - A8 P XIF @ P L P IFF CPU852=1 T P MSR 8,A15 SAVE A1-A8 =1 j P XIF * P CF A15,LDREG RESTORE DC REGS A3 - A8 P RB IHIN10 P EJECT P* P* & P* SST INSTRUCTIO
0x3d0120…3d02b4 (2, 475) Opaque[0x194]
0x3d02b4…3d0448 # DirEnt {nam=»NJDC15«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2678, f03=0x0000}
0x3d02b4…3d0448 IdxSect {
0x3d02b4…3d0448 f00 = 0x0133 // 0x3d02b4 @0x0
0x3d02b4…3d0448 f01 = 0x002a // 0x3d02b6 @0x2
0x3d02b4…3d0448 gno = [ // 0x3d02b8 @0x4
0x3d02b4…3d0448 [0x00]: C0x0133.0x3.0
0x3d02b4…3d0448 [0x01]: C0x0134.0x0.0
0x3d02b4…3d0448 [0x02]: C0x0134.0x1.0
0x3d02b4…3d0448 [0x03]: C0x0134.0x2.0
0x3d02b4…3d0448 [0x04]: C0x0134.0x3.0
0x3d02b4…3d0448 [0x05]: C0x0135.0x0.0
0x3d02b4…3d0448 [0x06]: C0x0135.0x1.0
0x3d02b4…3d0448 [0x07]: C0x0135.0x2.0
0x3d02b4…3d0448 [0x08]: C0x0135.0x3.0
0x3d02b4…3d0448 [0x09]: C0x0136.0x0.0
0x3d02b4…3d0448 [0x0a]: C0x0136.0x1.0
0x3d02b4…3d0448 [0x0b]: C0x0136.0x2.0
0x3d02b4…3d0448 [0x0c]: C0x0136.0x3.0
0x3d02b4…3d0448 [0x0d]: C0x0137.0x0.0
0x3d02b4…3d0448 [0x0e]: C0x0137.0x1.0
0x3d02b4…3d0448 [0x0f]: C0x0137.0x2.0
0x3d02b4…3d0448 [0x10]: C0x0137.0x3.0
0x3d02b4…3d0448 [0x11]: C0x0138.0x0.0
0x3d02b4…3d0448 [0x12]: C0x0138.0x1.0
0x3d02b4…3d0448 [0x13]: C0x0138.0x2.0
0x3d02b4…3d0448 [0x14]: C0x0138.0x3.0
0x3d02b4…3d0448 ]
0x3d02b4…3d0448 }
0x3d0448…3d05dc Dummy {f00=0x0133, f01=0x0190, f02=» 2 P IDENT DRDC15 9.2DK 3 80-01-03 870105040920 P : P DK3, RBUFNR = 1 ALLOWED B P DK2, TBUFL d P 80-03-11 z 0 P DK, COND.ASM., TIMPRO, TIMNAK, READ BUF. P 80-03-11 P REL 9.1 79-08-16 P =8, ASCII-MODE FOR
0x3d05dc…3d0770 Dummy {f00=0x0133, f01=0x018e, f02=»RESS DESTROYED x P REL 9.1 79-05-23 $ P =5, INCOMPLETE POLL SEQUENCE 2 P REL 9.1 79-05-23 Z P =3, TRANSFER PARAMETER v P PRR 9.1 79-04-06 P =4, ANY MESSAGE ORDER P PRR 9.1 79-04-06 P =2, ABORT HANDLING
0x3d0770…3d0904 Dummy {f00=0x0133, f01=0x0190, f02=» P* 2 P********************************************* P* D $ P* PHILIPS TERMINAL SYSTEM PTS N P* v * P* DRDC15: DRIVER DATA COMMUNICATION . P* BSC MULTIPOINT LINE PROCEDURE P* OR SIEMENS MSV1 P*
0x3d0904…3d0a98 Dummy {f00=0x0133, f01=0x0190, f02=»* ENTRY POINTS P* 2 P ENTRY DC15AD ADDRESS BLOCK TERMINAL REQUESTS " P ENTRY IH1501 INPUT INTERRUPT V " P ENTRY IH1502 OUTPUT INTERRUPT | " P ENTRY DC15ON POWER ON ROUTINE " P ENTRY DW1500 DWT FOR DC TASK P* P* P* EXTE
0x3d0a98…3d0c2c Dummy {f00=0x0133, f01=0x018e, f02=»DIO COMPLETE I/O EVENT P EXTRN DISIOE REQUEST ERROR P EXTRN SETIME SET TIMER B P EXTRN DWTST DWT STATUS b P EXTRN DWTOR DWT ORDER P EXTRN DWTECB DWT ECB * P EXTRN INTSAV SAVE AREA LAST INTERRUPT ( P EXTRN TEBCDIC ASCII TO EBCD
0x3d0c2c…3d0dc0 Dummy {f00=0x0133, f01=0x0190, f02=» l & P EXTRN ECBEL ECB EFFECTIVE LENGTH P EXTRN ECBRC ECB RETURN CODE 2 " P EXTRN ECBCW ECB CONTROL WORD V * P EXTRN DC:MIN MOVE DATA TO USER BUFFER | , P EXTRN DC:MOT MOVE DATA FROM USER BUFFER 0 P EXTRN DISEND COMPLETE REQUEST AND DISPATCH
0x3d0dc0…3d0f54 (2, 476) Dummy {f00=0x0134, f01=0x018e, f02=» P* P* DWT CONTENTS P* ( J P* DWTCHP TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15) 2 P* P < P******************************************************* P* * P* PARAMETERS FOR CONDITIONAL ASSEMBLY
0x3d0f54…3d10e8 Dummy {f00=0x0134, f01=0x0190, f02=» p & PX:A EQU 2000 RECEIVE BUFFER LENGTH PRBUFL EQU 650+X:X DK 2 PX:B EQU /60 DCTASK FILE CODE P PDC15FC EQU /60 t $ PX:C EQU 1 IF 1 INTERRUPT LOGGING PLOGG EQU 0 P* * PTIMPOL EQU 600 POLL TIMEOUT VALUE DK * PX:E EQU 1 ST
0x3d10e8…3d127c Dummy {f00=0x0134, f01=0x0190, f02=»LOCK LENGTH z PTBLEN EQU 2300 ( PX:H EQU 1 CODE , 0=ASCII , 1=EBCDIC * PCODE EQU 0 V * PX:I EQU 0 IF 1 SPECIFIC POLL HANDLING h PSPECP EQU 0 , PX:J EQU 1 IF = 1 LINE SPEED SET TO HIGH ( P IF = 0 LINE SPEED IS SET TO LOW PSP
0x3d127c…3d1410 Dummy {f00=0x0134, f01=0x0190, f02=»NR EQU 2 ( PX:M EQU 0 IF = 1 PTS 6805 ADAPTION PP6805 EQU 00 < PX:N EQU /02 P P IFT P6805=0 d , PLCUIN EQU 02 DEVICE ADDRESS OF RECEIVER x P XIF P IFT P6805=1 , PLCUIN EQU /0A DEVICE ADDRESS OF RECEIVER P XIF PX:O
0x3d1410…3d15a4 Dummy {f00=0x0134, f01=0x0190, f02=»EQU 0 IBM-3270 EMULATION PACKAGE, IF NOT = 0 PEM3270 EQU 1 4 PX:R EQU 1000 H P DK2 * PBINTRM EQU 0 IF 1 BINARY TRANSMISSION l , PTSTREQ EQU 0 IF 1 TEST REQUEST HANDLING , PDMRK EQU 1 SPECIAL CONDITION FOR DENMARK 4 PNOWACK EQU 0 W
0x3d15a4…3d1738 Dummy {f00=0x0134, f01=0x0190, f02=». f , P ONLY WORKING IF STAT IS SET TO "ONE". P IFT P6805=0 : 6 PLCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMITTER P P XIF P IFT P6805=1 6 PLCUUT EQU LCUIN+/01 DEVICE ADDRESS OF TRANSMITTER P XIF P* P P
0x3d1738…3d18cc Dummy {f00=0x0134, f01=0x0190, f02=»************************* P* " . P* A PROGRAM VERSION USING TOSS MMU PAGING , * P* IS OBTAINED BY SETTING MMUPAG EQU 1. ^ P* PMMUPAG EQU 1 P* P DB P IFT MMUPAG=0 DK2 PTBUFL EQU 0 DK2 P XIF DK2 P*
0x3d18cc…3d1a60 Dummy {f00=0x0134, f01=0x0190, f02=»RSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. , P* ^ PCPU852 EQU 0 h P* | 2 PDEVIND EQU -2 DEVICE INDEX DATA COMMUNICATION * PBUFLEN EQU TBUFL+TBUFL MMU BUFFER SIZE P* P P* P
0x3d1a60…3d1bf4 (2, 477) Dummy {f00=0x0134, f01=0x0190, f02=»RD P XIF P* P IFT MMUPAG=1 PSTART EQU DWTDRD+4 6 P XIF P P* 4 PDWTTP EQU START+/00 TIMER POINTER ORDER PROCESS f . PDWTWQ EQU START+/02 WRITE/GET BUFFER QUEUE $ PDWTSQ EQU START+/04 STATUS QUEUE & PDWTRQ EQU START+
0x3d1bf4…3d1d88 Dummy {f00=0x0134, f01=0x018e, f02=»+/0C REQUEST TIMER VALUE P* P * P* 4 P* REQUEST HANDLING > P* X P* b P* l P* A7=ORDER v P* P* /02: READ P* /06: WRITE P* /37: TRANSFER PARAMETERS P* /38: SET STATUS $ P* /39: SET REQUEST
0x3d1d88…3d1f1c Dummy {f00=0x0134, f01=0x0190, f02=» * PDCSTOL DATA 0 OLD DC EQUIPMENT STATUS PDCSTCU DATA 0 CURRENT STATUS 2 $ PDCWRQ DATA 0 WRITE REQUEST QUEUE V , PDCTPGP DATA 0 TIMER POINTER GENERAL POLL ~ P P* P* DC TASK ADDRESS BLOCK P* $ P DATA 0 INDICATES NO MMU BUF
0x3d1f1c…3d20b0 Dummy {f00=0x0134, f01=0x0190, f02=»ATA DCRBUF REC. BUFFER ANCHOR P* & P* DRIVER ADDRESS BLOCK 0 P* N P DATA BUFLEN MMU BUFFER SIZE X P DATA DEVIND DEVICE INDEX | ( PDC15AD DATA DCACT ACTIVATION ADDRESS 4 P DATA ABORT ABORT ROUTINE ABORT ROUTINE ADDRESS $ P DATA
0x3d20b0…3d2244 Dummy {f00=0x0134, f01=0x0190, f02=»RAM v PSTB2 RES 1 P P IFT SPEED=1 & PLSPEED EQU /0200 : P XIF R P IFT SPEED=0 ^ PLSPEED EQU 0 r P XIF P P* P* $ P* ACTIVATION FROM TERMINAL TASKS P* PDCACT EQU * P LDK A1,0 PRESET R
0x3d2244…3d23d8 Dummy {f00=0x0134, f01=0x0190, f02=» P RF(Z) DCRD READ SPECIFIC P SUK A7,/06-/02 & P RF(Z) DCWR > P SUK A7,/37-/06 R $ P RF(Z) DCTP TRANSFER PARAMETERS j P IFF STAT=0 P SUK A7,/38-/37 P RF(Z) DCSS SET STATUS P SUK A7,/39-/38 $ P ABL(Z) REQTIM SET R
0x3d23d8…3d256c Dummy {f00=0x0134, f01=0x0190, f02=» RF DCA100 P P* P* & P* ACTIVATION FROM DCTASK 0 P* P P* Z PDCACTD EQU * d $ P SUR A1,A1 PRESET RETURN CODE =4 x P IFT EM3270=1 =4 P LDR A7,A7 =4 & P RF(Z) ANYMSG ANY MESSAGE ORDER =4 P XIF P S
0x3d256c…3d2700 Dummy {f00=0x0134, f01=0x0190, f02=» ERROR | P ABL DISIOE INVALID ORDER P* 0 P* : P* READ FROM DCTASK D P* ^ P* h P* REQUEST FROM DC-TASK r P* COMPLETE WHEN: & P* STATUS CHANGE ON DC EQUIPMENT $ P* SPONTANOUS MESSAGE RECEPTION P* PDCRD
0x3d2700…3d2894 (2, 478) Dummy {f00=0x0134, f01=0x0190, f02=»4 P . P***************************************** P* F P* ANY MESSAGE ORDER P P* n " P***************************** x P 2 PANYMSG LD A4,DWTRQ,A6 ANY QUEUED MESSAGE ?? =4 P RF(Z) DCRD10 NO!! =4 ( P RF ENDIO YES!
0x3d2894…3d2a28 Dummy {f00=0x0134, f01=0x0190, f02=» DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS : P* FROM TERMINALS: TRANSFER TERMINAL ADDRESSES 4 P* r P* | 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
0x3d2a28…3d2bbc Dummy {f00=0x0134, f01=0x0190, f02=»,ECBCW+1,A8 GET TCP OR DV P ANK A3,/FF " ( P LC A2,TASCII,A3 TRANSLATE TO ASCII 6 P XIF b ( P STR A2,A6 SAVE IN FIRST WORD OF DWT n P P IFT RCOM=1 * P LD A3,ECBBA,A8 DEVICE BUFFER ADDRESS P ST A3,DWTBUF,A6 ( P LD A3,ECBRL
0x3d2bbc…3d2d50 Dummy {f00=0x0134, f01=0x0190, f02=»OT BE IN DC:TAB r * P LD A1,DC:IN GET DC:TAB INPUT POINTER * P CWK A1,DC:END TABLE ALREADY FULL ???? F & P ABL(E) DISIOE YES!! REQUEST ERROR t P P P PDCTP20 EQU * " P LD A4,DCTAB DC:TAB ADDRESS =3 $ P AD* A4,DCTAB LAST TAB
0x3d2d50…3d2ee4 Dummy {f00=0x0134, f01=0x0190, f02=»IN TABLE =3 v P CWR* A6,A4 IN TABLE ?? =3 P RF(E) DCTP30 YES!! =3 6 " P RB DCTP22 CHECK NEXT ENTRY =3 T PDCTP25 EQU * =3 z P $ P STR A6,A1 INSERT DWT IN DC:TAB P LDK A1,2 * P ADS A1,DC:IN UPDATE DC:TAB IN POINTER P *
0x3d2ee4…3d3078 Dummy {f00=0x0134, f01=0x0190, f02=»SERT IN STATUS QUEUE P XIF PDCTP30 EQU * ( P SUR A1,A1 RETURN CODE ::= 0 < PENDIO EQU * ` $ P CF A15,TENDIO COMPLETE REQUEST t P RB DCRTN P P* P* P* WRITE P* P* P* COMPLETE WHEN: P
0x3d3078…3d320c Dummy {f00=0x0134, f01=0x0190, f02=»TED LENGTH z " P CWK A1,BUFLEN ILLEGAL LENGTH? P RF(G) IL:LEN YES!! 8 P XIF T P CF A15,TIMEWR SET TIMER ` P CF A15,INSWQ QUEUE REQUEST P RB DCRTN P* P* P* P* READ P* P* P* COMPLETE WHEN:
0x3d320c…3d33a0 Dummy {f00=0x0134, f01=0x0190, f02=»,A6 AND RECEIVE MESSAGE QUEUE " P RF(Z) DCRD10 NOTHING IN QUEUE & P L P T P ( P LDR* A2,A4 TAKE THE FIRST IN QUEUE d P ST A2,DWTRQ,A6 P ADK A4,6 " P LD A3,-4,A4 EFFECTIVE LENGTH P ST A3,ECBEL,A8 P P LDK A1,
0x3d33a0…3d3534 (2, 479) Dummy {f00=0x0134, f01=0x0190, f02=» P RB DCRTN P P* P* * P* SET STATUS 4 P* H P* R P IFF STAT=0 PDCSS EQU * p * P LD A1,ECBCW,A8 GET STATUS INFORMATION P ANK A1,3 MASK DB,IR P RF(Z) DCSS20 DEVICE END PDCSS10 EQU * P ST A1,D
0x3d3534…3d36c8 Dummy {f00=0x0134, f01=0x0190, f02=» NOT BEEN SENT z PDCSS30 EQU * , P CF A15,INSSQ INSERT DWT IN STATUS QUEUE * P LDK A1,4 SET DE Z P RB DCSS10 r P XIF P P P* " P* SET REQUEST TIMEOUT VALUE P* P* P PREQTIM EQU * " P LD A2
0x3d36c8…3d385c Dummy {f00=0x0134, f01=0x018e, f02=»L APPLICATION BUFFER SIZE P* " P , 8 PIL:LEN LDKL A1,/8008 REQUEST ERROR + ILLEGAL LENGTH 4 P ABL DISEND COMPLETE REQUEST p P P* P* P* P* TIMER HANDLING PART P* P* P* P* READ TIMER=TIM
0x3d385c…3d39f0 Dummy {f00=0x0134, f01=0x0190, f02=» v P ST A2,TIMERR ! P CF A15,SETIME ! P DATA TOUTRE ! 4 PTIMERR DATA 0 ! H ( P ST A4,DWTTP,A6 STORE TIMER POINTER ! ^ PTIME10 EQU * ! P RF GBUF10 RETURN ! P* ! P* TIMEOUT READ TIMER ! P* ! PTOUTRE EQU * ! P LDR A6,A1 F
0x3d39f0…3d3b84 Dummy {f00=0x0134, f01=0x0190, f02=» ! P* WRITE TIMER=TIMWR " P* " $ PTIMEWR LDR A1,A6 " . . P LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE " F P RB(Z) TIME10 NO TIMING " x P ST A2,TIMWR " P CF A15,SETIME " P DATA TOUTWR " PTIMWR DATA 0 " P ST A4,DWTTP,A6 " P RB TI
0x3d3b84…3d3d18 Dummy {f00=0x0134, f01=0x0190, f02=» * P CF A15,REMOVW REMOVE FROM WRITE QUEUE # P* # 2 & P* THIS INSTRUCTION DOES NOT BELONG # < P* TO THE STANDARD INTERFACE # f P LD A2,FDWTUT # P CWR A2,A6 # * P RB(NE) TOUTR1 THIS DWT IS NOT WRITING # ( P CM XACK INDICATE 'ACK NOT EXPECTED' #
0x3d3d18…3d3eac Dummy {f00=0x0134, f01=0x0190, f02=»INING TIME IS RETURNED IN A2 # P* $ $ P* $ . PCTIME EQU * $ 8 & P LD A2,DWTTP,A6 GET TIMER POINTER $ L P RF(Z) CTIM10 NOT RUNNING $ v P LDR* A2,A2 $ " P NGR A2,A2 GET REMAINING TIME $ P CM* DWTTP,A6 STOP TIMER $ P CM DWTTP,A6 $ PCT
0x3d3eac…3d4040 Dummy {f00=0x0134, f01=0x0190, f02=»A4=0 IF NO BUFFER IS FREE $ & P* ELSE A4 CONTAINS BUFFER ADDRESS % " P* A2 AND A3 ARE DESTROYED % L P* % n P* % x ( PGRBUF LDKL A2,DCRBUF RECEIVE BUFFERS % PGBUF INH % P LDR* A4,A2 % P RF(Z) GBUF10 NO BUFFER FREE % . P LDR* A3,A4 REMOVE
0x3d4040…3d41d4 (2, 480) Dummy {f00=0x0135, f01=0x018e, f02=» P* & P* & ( P* INSERT DWT IN WRITE REQUEST QUEUE & P* & D P* A2,A3,A4 DESTROYED & N P* A6=DWT & j P* & z ( PINSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR & PINSWQ1 LDK A4,DWTWQ & PINSWQ2 LDR* A3,A2 & $ P RF(Z) INSWQ3 END OF QUEUE FOUND &
0x3d41d4…3d4368 Dummy {f00=0x0135, f01=0x0190, f02=» P RB GBUF10 RETURN ' P* ' P* ' ( * P* REMOVE DWT FROM WRITE REQUEST QUEUE ' 2 P* ' ` P* A2,A3,A4 DESTROYED ' j P* A6=DWT ' P* ' * PREMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR ' 2 PREM05 LDK A4,DWTWQ GET DWT-LINK TO BE REMOVED ' PREM0
0x3d4368…3d44fc Dummy {f00=0x0135, f01=0x0190, f02=» P LDR A2,A3 GET NEXT ( P RB REM10 ( PREM15 LDR* A3,A4 REMOVE ( 2 P STR A3,A2 ( R P RB GBUF10 RETURN ( d P ( ~ P* ( P* ( P* INSERT DWT IN STATUS QUEUE ( P* ( P IFF STAT=0 ( P* A2,A3,A4 DESTROYED ( P* A6=DWT (
0x3d44fc…3d4690 Dummy {f00=0x0135, f01=0x018e, f02=»ATUS QUEUE ( | P* ) P* A2,A3,A4 DESTROYED ) P* A6=DWT ) 8 P* ) H * PREMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR ) R P LDK A4,DWTSQ ) P RB REM06 ) P XIF ) P ) P* ) P* ) $ P* QUEUE ALLOCATED RECEIVE BUFFER ) P* ) P* A4
0x3d4690…3d4824 Dummy {f00=0x0135, f01=0x0190, f02=» ) j P XIF * P IFT MESPAS=0 * $ P LDR A2,A6 QUEUE ON TERMINAL DWT * * P XIF * R , P ADK A2,DWTRQ BEGINNING OF RECEIVE QUEUE * ^ PQR100 EQU * * P LDR* A3,A2 * $ P RF(Z) QR200 END OF QUEUE FOUND * P LDR A2,A3 * P RB QR100 * & PQR200
0x3d4824…3d49b8 Dummy {f00=0x0135, f01=0x018e, f02=»ECTED MESSAGE OR STATUS CHANGE * P* + & 4 P* REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED + 0 P* + h PCKMESS LDKL A6,DW1500 + r P LD A1,DWTST,A6 + P RF(N) CKM110 NO REQUEST + P LDK A1,2 READ REQUEST ? + P CW A1,DWTOR,A6 + P RF(NE)
0x3d49b8…3d4b4c Dummy {f00=0x0135, f01=0x0190, f02=» + p P , P , , P LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER , . P ST A2,DWTRQ,A6 STORE THIS ADDR INTO QUEUE , H " P ADK A3,6 MOVE POINTER TO TEXT , z & P DONT DESTROY BUFFER ADDRESS =6 , P LD A4,-4,A3 , 0 P ST A4,ECBEL,A8 STORE NUMBERS OF CHARACTER
0x3d4b4c…3d4ce0 Dummy {f00=0x0135, f01=0x0190, f02=»ECEIVE BUFFER ADDRESS , , P CF A15,DC:MIN MOVE DATA TO USER BUFFER - * PCKM110 ADKL A15,4 ADJUST STACK POINTER - N P ABR* A15 RETURN - | 8 PCKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHECK STATUS - , P OR A1,DCONOF TAKE CARE OF POLL TIME OUT - P CW A1,D
0x3d4ce0…3d4e74 (2, 481) Dummy {f00=0x0135, f01=0x0190, f02=»IO COMPLETE READ GENERAL REQUEST - P RB CKM110 . ( P . : P . D @ P************************************************************ . L P* . P* ABORT ROUTINE . P* . P************************ . P . & PABORT LD A1,DWTTP,A6 TIMER POINTER
0x3d4e74…3d5008 Dummy {f00=0x0135, f01=0x0190, f02=»E . r P SUK A1,2 / * P RF(Z) AB:RTN READ REQUEST. NO ACTION / P SUK A1,4 / J . P RF(NZ) AB:RTN NO ACTION IF NOT READ/WRITE / P / . P CF A15,REMOVW REMOVE DWT FROM WRITE QUEUE / & P LD A2,FDWTUT WRITING DWT ADDRESS / P CWR A2,A6 / P RF(
0x3d5008…3d519c Dummy {f00=0x0135, f01=0x0190, f02=» CPU852=1 / P ADKL A15,4 0 $ P ABR* A15 RETURN IN INHIBIT MODE 0 & P XIF 0 N P IFF CPU852=1 0 Z P RTN A15 0 p P XIF 0 P 0 P 0 P 0 P* 0 P* 0 P* STORE REGISTER A3-A8 0 $ P* CALLING SEQUENSE: CF A15,STREG 0 P* 0
0x3d519c…3d5330 Dummy {f00=0x0135, f01=0x0190, f02=»5 0 P ST A6,LCA6 1 P ST A7,LCA7 1 P ST A8,LCA8 1 2 P RF RTNA15 RETURN 1 F P 1 ` PLDREG LDKL A3,0 1 j 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
0x3d5330…3d54c4 Dummy {f00=0x0135, f01=0x0190, f02=» 1 P* 2 P* 2 P* TIMER VALUES 2 P* 2 2 P* 2 < * PTIMPRO EQU 90 PROCEDURE TIMER 9 SEC DK 2 F " PTIMNAK EQU 3 DELAY FOR NAK DK 2 t P* 2 P* 2 P* CHARACTER EQUATES 2 P* 2 & PSF EQU X'1D' START FIELD CHARACTER 2 PSYN EQU /1
0x3d54c4…3d5658 Dummy {f00=0x0135, f01=0x0190, f02=»U /10 2 PEOT EQU /04 3 PNAK EQU /15 3 " PESC EQU /1B 3 6 PSBA EQU /11 3 J PGP EQU /22 3 ^ PRDBCOM EQU /32 3 p PRDMCOM EQU /36 3 P IFT CODE=0 3 PPAR EQU /80 3 PRVI EQU /3C 3 PACK0 EQU /30 3 PACK1 EQU /31 3 PDC1 EQU
0x3d5658…3d57ec Dummy {f00=0x0135, f01=0x0190, f02=»1 PROCEDURE 3 p P XIF 4 P IFT CODE=1 4 PPAR EQU /00 4 4 PWACK EQU /2C 4 H PRVI EQU XRVI DK 4 PACK0 EQU /18 4 t PACK1 EQU /2F 4 PSYNEBC EQU /32 4 P XIF 4 P 4 P* 4 P* 4 P* PROCEDURE WORK AREAS 4 P* 4 P* 4
0x3d57ec…3d5980 Dummy {f00=0x0135, f01=0x0190, f02=»EL DATA 0 SELECTED 4 PXETX DATA 0 ETX SENT 5 2 PXSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT 5 6 " PXRB DATA 0 READ BUFFER SWITCH 5 l PCACK DATA 0 ACK COUNTER 5 * PSYNSW DATA 0 0=SKIP SYNS, 1=DON'T SKIP 5 P* 5 PFECB RES 1 WRITING ECB 5 ( P
0x3d5980…3d5b14 (2, 482) Dummy {f00=0x0135, f01=0x018e, f02=» OF LAST TRANSMITTED BLOCK 5 ~ $ PDCSTQ DATA 0 STATUS QUEUE ANCHOR 6 " . PDCTPP DATA 0 POINTER FOR PROCEDURE TIMING 6 J , PRESEND DATA 0 CONTROL SEQUENCE SAVE AREA 6 | ( PCRDBUF DATA 0 READ BUFFER COUNTER DK 6 P* 6 P* 6 $ P* 3270 SENSE/STATUS INFORMAT
0x3d5b14…3d5ca8 Dummy {f00=0x0135, f01=0x0190, f02=» 6 P DATA /4242 7 P* 7 2 PNOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED 7 & , PIR EQU /26 S/S 1 : INTERVENTION REQUIRED 7 P XIF 7 P 7 P* 7 P* 7 P* BASIC RECEIVE MODE 7 P* 7 " P* ENTERED EVERY TIME A MESSAGE 7 & P* IS E
0x3d5ca8…3d5e3c Dummy {f00=0x0135, f01=0x0190, f02=»M EQU * 7 P LDKL A5,STB LOAD STACKBASE 8 P IFT P6805=0 8 4 2 P CF A5,HALTIN HALT RECEIVER AND UPDATE STATUS 8 J P XIF 8 P IFT P6805=1 8 * P CF A15,CKMESS CHECK IF STATUS CHANGE 8 P XIF 8 PBRM010 EQU * 8 P IFT CODE+P6805=0 8
0x3d5e3c…3d5fd0 Dummy {f00=0x0135, f01=0x0190, f02=»YNEBC SPECIFY SYN PATTERN 8 z P XIF 9 " P IFT P6805=0 9 0 " P CIO A2,1,LCUIN START RECEIVER 9 F P XIF 9 l P IFT P6805=1 9 z P IFF CODE=1 9 P LDK A2,/0C 9 " P CIO A2,1,LCUIN START RECEIVER 9 P LDK A2,SYN 9 * P OTR A2,1,LCUIN SPECIF
0x3d5fd0…3d6164 Dummy {f00=0x0135, f01=0x018e, f02=» 9 r P LDK A2,SYNEBC : * P OTR A2,1,LCUIN SPECIFY SYNC CHARACTER : P RB(NA) BRMHLT : N P XIF : f PBRM100 EQU * : t $ P CF A5,READP READ ONE CHARACTER : P RF(NZ) BRM150 PARITY ERROR : P LDR A1,A2 : P SUK A1,STX : P RF(Z) BRM300
0x3d6164…3d62f8 Dummy {f00=0x0135, f01=0x0190, f02=» P SUK A1,DLE-ENQ ; P ABL(Z) BRM600 DLE RECEIVED ; P SUK A1,NAK-DLE ; @ P ABL(Z) BRM500 NAK RECEIVED ; X P IFT MSV1=0 ; | P LDR A8,A2 ; $ P CF A5,READP READ ONE CHARACTER ; P RF(NZ) BRM150 PARITY ERROR ; P CWR A2,A8 ; & P RF(NE)
0x3d62f8…3d648c Dummy {f00=0x0135, f01=0x0190, f02=» CC A2,DW1500 ; P RF(NE) BRM150 NOT THIS TCU < PBRM110 EQU * < : P CF A5,READP READ 1:ST STA < N P RF(NZ) BRM150 PARITY ERROR < p P LDR A8,A2 < P IFT MSV1=0 < P CF A5,READP READ 2:ND STA < P RF(NZ) BRM150 PARITY ERROR < P CWR A2,
0x3d648c…3d6620 Dummy {f00=0x0135, f01=0x0190, f02=»2,ENQ+PAR < P XIF = P IFT P6805=1 = P SUK A2,ENQ = 6 P XIF = J P RF(NZ) BRM150 NOT ENQ = X P IFT P6805=0 = v $ P CF A5,READ READ LAST CHARACTER = P = " P* TRAILING PAD CAN BE CHECKED = P = P CIO A1,0,LCUIN HALT INPUT =
0x3d6620…3d67b4 (2, 483) Dummy {f00=0x0135, f01=0x0190, f02=» = P LDK A1,1 > P ST A1,CACK LOAD ACK COUNTER > P LDR A2,A8 > @ P SUK A3,2 > R P RF(Z) BRM120 SELECTING > d P CWK A8,GP > P ABL(E) GPOLL GENERAL POLL > P IFT MSV1=1 > 6 P CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS) > P X
0x3d67b4…3d6948 Dummy {f00=0x0135, f01=0x0190, f02=»CIFIC POLL > ~ P RB BRM INVALID POLL ? PBRM120 EQU * ? . & P CF A5,FINTER CHECK IF STA PRESENT ? B P LDR A6,A3 LOAD DWT TO A6 ? l P RF(NZ) BRM130 STA FOUND ? P IFT MSV1=0 ? $ P LDKL A6,DW1500 SELECT TO DCTASK ? PBRM130 EQU * ? P ABL SEL
0x3d6948…3d6adc Dummy {f00=0x0135, f01=0x0190, f02=»SYNCHRONIZE ? t P* @ PBRM150 EQU * @ P ANK A2,/7F @ 2 P SUK A2,/7F @ F P RB(Z) BRM RESYNCHRONIZE @ Z & P CF A5,READ READ ANOTHER CHARACTER @ z P RB BRM150 @ P @ P* @ P* @ P* EOT HAS BEEN RECEIVED @ P* @ P* @ P
0x3d6adc…3d6c70 Dummy {f00=0x0135, f01=0x0190, f02=»ACK @ & P RF(Z) BRM220 ACK IS NOT EXPECTED A " P LD A6,FDWTUT GET WRITING DWT A 6 P RF(Z) BRM210 NO ONE WRITING A P LDK A1,2 SET RC=2 A ( P CF A5,CWRITE COMPLETE WRITE REQUEST A PBRM210 EQU * A " P CM XACK RESET 'ACK EXPECTED' A PBRM220 E
0x3d6c70…3d6e04 Dummy {f00=0x0135, f01=0x0190, f02=» A PBRM300 EQU * B P CF A5,HPTIM B P LD A1,XSEL B 0 P RF(Z) BRM315 NOT SELECTED B D P LD A1,DCRBUF B f ( P*********************CHAINED COMMAND B | & P RB(Z) BRM150 NO BUFFER AVAILABLE B P********************* B PBRM305 EQU * B P CF
0x3d6e04…3d6f98 Dummy {f00=0x0135, f01=0x0190, f02=»' B n PBRM312 EQU * C P CF A5,TRNAK SEND NAK C P ABL BRM C < PBRM315 EQU * C L P IFT RCOM=1 C ` P LD A1,XACK C t & P RF(Z) BRM316 ACK IS NOT EXPECTED C P LD A1,DCRBUF C & P RF(Z) BRM316 NO BUFFER AVAILABLE C " P LD A6,FDWTUT GET WRIT
0x3d6f98…3d712c Dummy {f00=0x0135, f01=0x0190, f02=»RREC PREPARE FOR TEXT RECEPTION C P LDK A1,0 SET RC=0 D ( ( P CF A5,CWRITE COMPLETE WRITE REQUEST D B P CM CACK PRESET ACK-1 =7 D n P RB BRM305 READ THE MESSAGE D P XIF D ( PBRM316 CF A5,READ READ ONE CHARACTER D P IFF P6805=1 =8 D P SUK A
0x3d712c…3d72c0 Dummy {f00=0x0135, f01=0x0190, f02=»CE D n P RB BRM220 E PBRM320 EQU * E P IM XSTA INDICATE MESSAGE OK E 0 $ P LD A4,DCRBUF GET BUFFER ADDRESS E T P ADK A4,6 E | P CW A4,FBLST E " P RF(NE) BRM325 NOT FIRST BLOCK E P IFF RCOM=0 E P LDK A1,ESC E P CCR A1,A4 E P RB(NE
0x3d72c0…3d7454 (2, 484) Dummy {f00=0x0136, f01=0x0190, f02=» READ MODIFIED RECEIVED E P SUK A1,RDMCOM-RDBCOM F & P RF(Z) RDMOD READ BUFFER RECEIVED F > P XIF F h PBRM325 EQU * F t P SUK A7,1 F & P RF(Z) BRM340 MESSAGE ENDED BY ETB F P CM FBAX F * P CF A15,GRBUF ALLOCATE RECEIVE BUFFER F P ADK A
0x3d7454…3d75e8 Dummy {f00=0x0136, f01=0x0190, f02=»6 F P LC A2,TEBCDIC,A2 G P LD A1,DCRBUF G $ P RF(Z) BRM326 G : P ST A2,+4,A1 G P P XIF G d PBRM326 EQU * G p P CWK A6,DW1500 G , P RF(E) BRM330 MESSAGE IS MENT FOR DCTASK G P LD A2,DWTST,A6 GET STATUS G P RF(N) BRM330 NO REQUEST G
0x3d75e8…3d777c Dummy {f00=0x0136, f01=0x0190, f02=» P CW A2,DWTOR,A6 H " P RF(NE) BRM330 NO READ REQUEST H PBRM327 EQU * H B P LDK A1,0 SET RC=0 H V $ P LD A8,DWTECB,A6 GET ECB ADDRESS H p P LD A3,-4,A4 GET LENGTH H * P ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH H & P CF A15,CTIME STOP REQUEST TIMING
0x3d777c…3d7910 Dummy {f00=0x0136, f01=0x0190, f02=» H P* I P IFT STAT=1 I P LC A2,+2,A4 GET WCC/CCC I & P ANK A2,/FF I F P LC A2,TEBCDI,A2 TRANSLATE I Z P ANK A2,8 I | P RF(Z) BRM328 I P LD A2,DWTST,A6 GET STATUS I P ORK A2,/A I P ST A2,DWTST,A6 I PBRM328 EQU * I P XIF
0x3d7910…3d7aa4 Dummy {f00=0x0136, f01=0x0190, f02=»R ADDRESS =4 I z ( P CF A5,QRBUF QUEUE MESSAGE ON DWT =4 J P RF BRM32A =4 J @ P XIF =4 J V PBRM329 EQU * =4 J f P J ~ P LDK A1,0 RESET RETURN CODE J & P CF A15,DC:MIN MOVE TO USER BUFFER J P RF BRM345 J PBRM32A EQU * =4 J P J $ P C
0x3d7aa4…3d7c38 Dummy {f00=0x0136, f01=0x0190, f02=»4 J x P RF(N) BRM335 NO REQUEST =4 K P LD A1,DWTOR,A6 ORDER =4 K . , P RF(NZ) BRM335 NOT ANY MESSAGE ORDER =4 K N & P CF A15,TENDIO COMPLETE REQUEST =4 K ~ PBRM335 EQU * =4 K P XIF =4 K P SUK A4,6 GET BUFFER BASE K ( P CF A5,QRBUF QUEUE B
0x3d7c38…3d7dcc Dummy {f00=0x0136, f01=0x0190, f02=» K PBRM345 EQU * L P IFT STAT=1 L P LD A1,DWTST,A6 L 0 P ANK A1,8 L H $ P RB(Z) BRM340 ACK SHOULD BE SENT L Z P CF A5,TRWACK SEND WACK L P RF BRM410 L P XIF L P IFF STAT=1 L P RB BRM340 L P XIF L P L P* L P*
0x3d7dcc…3d7f60 Dummy {f00=0x0136, f01=0x0190, f02=»RDMOD EQU * L " P CM XSEL RESET SELECT EXPECTED M 4 P LD A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL M : $ P LD A4,DWTBUF,A6 BUFFER ADDRESS M r $ P SUK A4,2 SDJUST BUFFER ADDRESS M " P LDKL A3,1922 REQUESTED LENGTH M " P IM XRB SET READ BUFFER SWITCH M
0x3d7f60…3d80f4 (2, 485) Dummy {f00=0x0136, f01=0x0190, f02=» M j P ADK A1,1 COUNTER DK N P ST A1,CRDBUF DK N $ P DE N > P ABL POL127 N L P XIF N ` P* N l P* N v P* ENQ HAS BEEN RECEIVED N P* N P* N PBRM400 EQU * N & P CF A5,HPTIM STOP PROCEDURE TIMER N P LD A1,XACK N , P R
0x3d80f4…3d8288 Dummy {f00=0x0136, f01=0x0190, f02=» SEQUENCE N p PBRM410 EQU * O P ABL BRM O & P O 6 P* O @ P* O J P* NAK HAS BEEN RECEIVED O T P* O t P* O ~ PBRM500 EQU * O & P CF A5,HPTIM STOP PROCEDURE TIMER O P LD A1,XACK O P RF(NZ) BRM510 ACK EXPECTED O P OR A1,XSE
0x3d8288…3d841c Dummy {f00=0x0136, f01=0x0190, f02=»K O ~ P SST A1,LCUIN DK P P CF A15,STREG DK P $ P CF A15,SETIME DK P > P DATA BRM520,TIMNAK DK P X P ABL TDISP DK P x PBRM520 EQU * DK P P CF A15,LDREG DK P P DE P " P LD A6,FDWTUT GET WRITING DWT P P IFF STAT=0 P P
0x3d841c…3d85b0 Dummy {f00=0x0136, f01=0x018e, f02=» SU A1,FECBBA COMPUTE BUFFER INDEX P P ST A1,FBAX Q * P ABL POL130 Q > P* Q R P* Q P* DLE HAS BEEN RECEIVED Q f P* Q P* Q PBRM600 EQU * Q & P CF A5,HPTIM STOP PROCEDURE TIMER Q P LD A1,XACK Q " P RB(Z) BRM410 ACK NOT EXPECT
0x3d85b0…3d8744 Dummy {f00=0x0136, f01=0x018e, f02=» Q ~ P CWK A2,ACK0 =8 R P XIF =8 R P RF(NE) BRM620 R 2 P* R H P* ACK , 0 RECEIVED R R P* R l P LD A1,CACK GET ACKCOUNTER R v P RF(Z) BRM630 ACK,0 EXPECTED R PBRM610 EQU * R P CF A5,TRENQ SEND ENQ R & P CF A5,SPTIM START PROCEDU
0x3d8744…3d88d8 Dummy {f00=0x0136, f01=0x0190, f02=» R P LD A1,CACK GET ACK COUNTER S $ P RB(Z) BRM610 ACK,1 NOT EXPECTED S , PBRM630 EQU * S T P LD A1,XETX S h P RF(Z) BRM640 ETX NOT SENT S | P S P* S , P* ACK HAS BEEN RECEIVED TO AN ETX BLOCK S P* S P LDK A1,0 SET RC=0 S PBR
0x3d88d8…3d8a6c Dummy {f00=0x0136, f01=0x0190, f02=»MPLETE WRITE REQUEST S PBRM636 EQU * T P CF A5,TREOT SEND EOT T 0 P IFT RCOM=1 T N P T b P CM XRB RESET READ BUFFER T j P XIF T P RB BRM410 T PBRM640 EQU * T P LDK A1,1 T & P XRS A1,CACK INCREMENT ACK COUNTER T P ABL POL130 T
0x3d8a6c…3d8c00 Dummy {f00=0x0136, f01=0x0190, f02=» P XIF =8 U ( P RB(NE) BRM610 INVALID DLE SEQUENCE U " P CM XACK RESET 'EXPECTING ACK' U B P LD A1,XETX U h $ P RF(NZ) BRM660 ETX HAS BEEN SENT U | P LDK A1,2 SET RC=2 U P RB BRM635 U PBRM660 EQU * U P LDK A1,0 SET RC=0 U P RB BRM635
0x3d8c00…3d8d94 (2, 486) Dummy {f00=0x0136, f01=0x0190, f02=» LD A6,FDWTUT GET DWT ADDRESS U , P CF A15,REMOVS REMOVE FROM STATUS QUEUE V & P CM XSTA CLEAR 'STATUS SENT' V V " P CM XACK CLEAR 'ACK EXPECTED' V z P LD A1,DWTST,A6 GET STATUS V P ANK A1,4 V P RB(Z) BRM636 NOT DE V P LDKL A1,/8000 V " P A
0x3d8d94…3d8f28 Dummy {f00=0x0136, f01=0x0190, f02=» P* W PSELECT EQU * W P LD A1,XACK =5 W " * P RF(NZ) POL010 ERROR. ACK EXPECTED =5 W : P IFF STAT=0 W h P LD A1,DWTST,A6 GET STATUS W | P LDR A3,A1 W P ANK A1,1 W $ P RF(Z) SEL110 NO PENDING STATUS W P CF A5,TRRVI SEND RVI W P
0x3d8f28…3d90bc Dummy {f00=0x0136, f01=0x018e, f02=» W ~ P ANK A3,8 X P RF(NZ) SEL115 BUSY X P XIF X 6 P IFT STAT+NOWACK=2 X B P ANK A3,8 X " P RF(Z) SEL111 DEVICE NOT BUSY X n P CF A5,TRWACK TRANSMIT WACK X P ABL BRM X PSEL111 EQU * X P XIF X P LD A1,DCRBUF X $ P RF(NZ) SE
0x3d90bc…3d9250 Dummy {f00=0x0136, f01=0x0190, f02=» PSEL120 EQU * Y , P CF A5,PRREC PREPARE FOR TEXT RECEPTION Y P CF A5,TRACK SEND ACK,0 Y H P RB SEL100 Y h P Y z P* Y P* Y P* PREPARE FOR TEXT RECEPTION Y P* Y P* Y PPRREC EQU * Y P IM XSEL SET 'SELECTED' Y P CM
0x3d9250…3d93e4 Dummy {f00=0x0136, f01=0x0190, f02=»IN BUFFER Y z P IM XSTA Z " P ST A6,FDWTIN STORE INPUT DWT Z " P RTN A5 Z H P Z X P* Z b P* Z l $ P* GENERAL POLL HAS BEEN RECEIVED Z v P* Z P* Z PGPOLL EQU * Z P LD A1,XACK =5 Z & P RF(Z) POL020 ACK NOT EXPECTED =5 Z " P
0x3d93e4…3d9578 Dummy {f00=0x0136, f01=0x0190, f02=»=5 Z " P CF A5,CPTIM CHECK POLL TIMER [ P IFF STAT=0 [ 0 P LD A6,DCSTQ [ D & P RF(Z) POL110 NO STATUS TO BE SENT [ Z " P SUK A6,DWTSQ GET DWT ADDRESS [ PPOL050 EQU * [ P CF A5,TRSTA SEND STATUS [ & P CF A5,SPTIM START PROCEDURE TIMER [ P
0x3d9578…3d970c Dummy {f00=0x0136, f01=0x0190, f02=»L110 EQU * [ P LD A6,DCWRQ " P RF(NZ) POL120 WRITE ON QUEUE & PPOL115 EQU * L P CF A5,TREOT SEND EOT ` P RB POL100 ~ PPOL120 EQU * " P SUK A6,DWTWQ GET DWT ADDRESS PPOL125 EQU * $ P LD A8,DWTECB,A6 GET ECB ADDRESS P R
0x3d970c…3d98a0 Dummy {f00=0x0136, f01=0x0190, f02=»6 | P ] P IFF MMUPAG=0 ] $ P LDKL A4,MMUBUF MMU WORK BUFFER ] ( P ST A4,ECBBA,A8 ] P . P CF A15,DC:MOT MOVE DATA FROM USER BUFFER ] h P XIF ] & P LD A4,ECBBA,A8 GET BUFFER ADDRESS ] P LD A3,ECBRL,A8 GET LENGTH ] PPOL127 EQU * ] & P S
0x3d98a0…3d9a34 (2, 487) Dummy {f00=0x0136, f01=0x0190, f02=»FER INDEX ] ~ PPOL130 EQU * ^ P CM XETX RESET 'ETX SENT' ^ & P CM XSTA ^ H P CF A5,TRTEXT SEND ONE BLOCK ^ X & P CF A5,SPTIM START PROCEDURE TIMER ^ | P IM XACK SET 'ACK EXPECTED' ^ P RB POL100 ^ P ^ P* ^ P* ^ & P* SPECIFIC POL
0x3d9a34…3d9bc8 Dummy {f00=0x0136, f01=0x0190, f02=» EXPECTED =5 ^ ~ P LDR A7,A6 SAVE A6 _ P CF A5,CPTIM CHECK POLLTIMER _ . P LDR A6,A7 RESTORE A6 _ R P IFT STAT=1 _ p P LD A1,DWTST,A6 GET STATUS _ P ANK A1,7 _ " P RB(NZ) POL050 PENDING STATUS _ P XIF _ P IFF STAT+SPECP=0 _ P LD
0x3d9bc8…3d9d5c Dummy {f00=0x0136, f01=0x0190, f02=» P SUK A1,2 ` " P RB(Z) POL125 EXCHANGE REQUEST ` P XIF ` < P RB POL115 SEND EOT ` H P ` d P* ` n P* ` x 8 P* CHECK IF THERE IS A WRITE REQUEST TO BE COMPLETED ` P* ` P* A1 CONTAINS RETURN CODE ` P* ` P* ` PCWRITE LD
0x3d9d5c…3d9ef0 Dummy {f00=0x0136, f01=0x0190, f02=»DER ` z P SUK A2,6 a P RF(Z) CWR100 WRITE REQUEST a P SUK A2,2 a B ( P RF(NZ) CWR900 NOT EXCHANGE REQUEST a T P LDR A1,A1 a 2 P RF(NZ) CWR100 TRANSMISSION ERROR, RC NOT ZERO a P LDK A2,2 TRANMISSION OK a ( P ST A2,DWTOR,A6 INDICATE READ OR
0x3d9ef0…3da084 Dummy {f00=0x0136, f01=0x0190, f02=»0 a P ST A2,ECBCW,A8 b $ P CF A15,TENDIO COMPLETE REQUEST b " PCWR150 EQU * b J * P CF A15,REMOVW REMOVE FROM WRITE QUEUE b ^ PCWR200 EQU * b PCWR900 EQU * b " P CM XACK RESET 'ACK EXPECTED' b P CM FDWTUT b P RTN A5 b P b P*
0x3da084…3da218 Dummy {f00=0x0136, f01=0x0190, f02=»1 : IF LRC OR PARITY ERROR , BUFFER OVERFLOW b ( P* 2 : IF CORRECT ETB BLOCK RECEIVED c 4 P* c ` PRDMESS EQU * c j $ P LD A4,DCRBUF GET BUFFER ADDRESS c ~ P ADK A4,6 RESERVE HEADER c P LDK A3,0 c P LD A1,XSTA c $ P RF(NZ) RDM050 LAST INPUT WA
0x3da218…3da3ac Dummy {f00=0x0136, f01=0x0190, f02=» c t ( P ST A4,FBLST REMEMBER START OF BLOCK d PRDM075 EQU * d 4 P CM XSTA d H P LDK A7,0 RESET LRC d X P d t P IFT IBMCHR=1 d | P LD A1,FBAX d " P RF(NZ) RDM100 NOT FIRST BLOCK d P CF A5,READP d P RF(NZ) RDM120 PARITY ERROR d P CWK
0x3da3ac…3da540 Dummy {f00=0x0136, f01=0x0190, f02=» CF A5,READP READ ONE CHARACTER d P RF(NZ) RDM120 PARITY ERROR e ( PRDM110 EQU * e L P CWK A2,ETX e ` P RF(E) RDM130 ETX RECEIVED e t P CWK A2,ETB e P RF(E) RDM160 ETB RECEIVED e P CWK A2,ITB e P RF(E) RDM170 ITB RECEIVED e P CWK A
0x3da540…3da6d4 (2, 488) Dummy {f00=0x0137, f01=0x0190, f02=» IFT CODE=0 e P IFT BINTRM=1 f P f * P LDR A1,A2 f 2 P SUK A1,DC1+3 f D P RF(P) RDM115 NOT DC1-DC3 f Z P ADK A1,3 f | P RF(N) RDM115 NOT DC1-DC3 f P SLL A1,6 f P LDR A8,A1 f * P CF A5,READP 8-BIT CHAR GET NEXT PART f P RF(NZ
0x3da6d4…3da868 Dummy {f00=0x0137, f01=0x0190, f02=»CR A2,A4 STORE CHARACTER f P ADK A4,1 INCREMENT POINTER g $ P IM FBAX INCREMENT BUFFER INDEX g D P LD A1,FBAX g l P CWK A1,RBUFL+RBUFL g P RB(NG) RDM100 NOT OVERFLOW g P* g P* BUFFER OVERFLOW g P* g P RF RDM140 ABORT INPUT g
0x3da868…3da9fc Dummy {f00=0x0137, f01=0x0190, f02=» g P* h P* ETX RECEIVED h P* h ( PRDM130 EQU * h 2 $ P LD A1,DCRBUF GET BUFFER ADDRESS h F P LD A2,FBAX GET BUFFER INDEX h n 2 P ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER h P IFF CODE=1 h P CF A5,RDLRC h P RF(Z) RDM150 LRC WAS OK
0x3da9fc…3dab90 Dummy {f00=0x0137, f01=0x0190, f02=» * h & P LDK A3,1 INDICATE INVALID MESSAGE i PRDM150 EQU * i 4 $ P LDR A7,A3 SAVE RESULT REGISTER i H P CF A5,HALTIN HALT INPUT i p P IFT P6805=1 i P ORR A7,A1 PARITY ERROR i P XIF i P RTN A5 i P* i P* ETB RECEIVED i P* i
0x3dab90…3dad24 Dummy {f00=0x0137, f01=0x0190, f02=»* i P* ITB RECEIVED j P* j PRDM170 EQU * j * P IFF CODE=1 j > P CF A5,RDLRC j R " P RB(NZ) RDM120 LRC WAS NOT OK j f P XIF j P IFT CODE=1 j & P CF A5,RDCRC READ CRC AND CHECK IT j " P RB(NE) RDM120 CRC WAS NOT OK j P XIF j P
0x3dad24…3daeb8 Dummy {f00=0x0137, f01=0x0190, f02=»RS A2,CACK INCREMENT ACK COUNTER j P RF(NZ) TRDLE k ( P LDK A3,ACK0 LOAD ACK0 k > P RF TRDLE k P* k n P* TRANSMIT WACK k x P* k PTRWACK LDK A3,WACK LOAD WACK k P RF TRDLE k P* k P* TRANSMIT RVI k P* k P IFF STAT=0 k
0x3daeb8…3db04c Dummy {f00=0x0137, f01=0x0190, f02=»ESEND PUT INSAVE AREA k P SC A3,RESEND+1 l P RF TRREP l 6 P l H P* l R P* TRANSMIT NAK l P* l r PTRNAK LDK A3,NAK LOAD NAK l | P RF TREN10 l P* l P* TRANSMIT EOT l P* l PTREOT LDK A3,EOT LOAD EOT l P RF TREN10 l
0x3db04c…3db1e0 Dummy {f00=0x0137, f01=0x018e, f02=» LDK A2,/FF l P SC A2,RESEND+1 m $ PTRREP CF A5,TRSYNC START OUTPUT m , & P LC A2,RESEND GET FIRST CHARACTER m T P CF A5,WRITEP SEND IT m ~ & P LC A2,RESEND+1 GET NEXT CHARACTER m P CF A5,WRITEP SEND IT m PTRRE10 LDK A2,/FF m P CF A5,WRI
0x3db1e0…3db374 (2, 489) Dummy {f00=0x0137, f01=0x0190, f02=» m P CF A5,READ WAIT FOR END n P XIF n ( & P SST A2,LCUUT PERFORM SST AT ONCE n 6 P IFF LOGG=0 n ` ( P CF A5,LOGSST LOG TRANSMITTER STATUS n t P XIF n P RTN A5 n P n P* n P* n P* TRANSMIT ONE TEXT BLOCK n P* n P*
0x3db374…3db508 Dummy {f00=0x0137, f01=0x018e, f02=»* n P* o P LD A4,FBAX o ( P RF(NZ) TRT050 NOT START OF MESSAGE o ( P o T 2 P LD A1,XRB READ BUFFER COMMAND IN PROCESS ??? o P RF(NZ) TRT050 YES !! o P o P LD A4,FECBBA o " P LC A3,+2,A4 GET AID CHARACTER o P SUK A3,/30 o $ P
0x3db508…3db69c Dummy {f00=0x0137, f01=0x0190, f02=» P CF A5,WRITE SEND % p P LDK A2,'/' p P CF A5,WRITE SEND / p 4 P LDK A2,STX p P P CF A5,WRITE SEND STX p d ( P ST A4,FBLST REMEMBER START OF BLOCK p ( P ADK A4,5 SKIP AID + CURSOR ADDRESS p P LDK A3,5 ADJUST LENGTH p P LDK A2,3 p
0x3db69c…3db830 Dummy {f00=0x0137, f01=0x0190, f02=» SEND STX p P LDK A7,0 RESET LRC q $ P LD A4,FECBBA GET BUFFER ADDRESS q . P AD A4,FBAX ADD BUFFER INDEX q V ( P ST A4,FBLST REMEMBER START OF BLOCK q z ( P ADK A4,2 SKIP FIRST WORD OF BUFFER q & P LDK A3,0 RESET CHARACTER COUNTER q P LD A1,FBAX
0x3db830…3db9c4 Dummy {f00=0x0137, f01=0x0190, f02=»GET STA q P CF A5,WRITEP SEND STA r P IFT IBMCHR=1 r . P IFF RCOM=1 r D " P LDK A2,/27 SEND ENTER AS AID r X P CF A5,WRITEP r ~ " P LDK A2,/20 AND CURSOR ADDRESS r P CF A5,WRITEP r P LDK A2,/20 r P CF A5,WRITEP r P XIF r P I
0x3db9c4…3dbb58 Dummy {f00=0x0137, f01=0x0190, f02=»DK A2,X'2D' AID FOR DISPLAY r PTRT060 CF A5,WRITEP SEND AID s $ P s H $ P LD* A3,DWTCUR,A6 CURSOR ADDRESS s P . P CF A5,LINCOL SEND LINE AND COLUMN NUMBER s x P LDK A3,5 SET BLOCK COUNT s P RF TRT100 s PTRT070 EQU * s P XIF s P s P L
0x3dbb58…3dbcec Dummy {f00=0x0137, f01=0x0190, f02=»M=1 s & P LD A1,XRB READ BUFFER COMMAND ??? t P RF(Z) TRT105 NO!! t 6 P t P @ P************************************************************ t X P* t , P* CHECK IF ATTRIBUTE CHARACTER OR NULL t P* t 4 P****************************************
0x3dbcec…3dbe80 Dummy {f00=0x0137, f01=0x0190, f02=»E LINE FEED ? t " P RF(NE) TRT102 NO,GO TO TRT102 u P LDK A2,/0A u < PTRT102 EQU * u P P CWK A2,/7D END OF MESSAGE ? u d " P RF(NE) TRT103 NO,GO TO TRT103 u P LDK A2,/19 u PTRT103 EQU * u P CWK A2,X'7F' NULL ?? u P RF(NE) TRT105 u
0x3dbe80…3dc014 (2, 490) Dummy {f00=0x0137, f01=0x0190, f02=»P SEND START FIELD u P v ( P LC A2,-1,A4 GET ATTRIBUTE CHARACTER v " P ANK A2,X'7F' v N ( P LDR A1,A2 CONVERT TO IBM ATTRIBUTE v d P ANK A1,1 v P ANK A2,/1E MASK v P SLL A2,1 v & P ORR A2,A1 IBM ATTRIBUTE COMPOSED v " P ORK A2,/40 BIT AL
0x3dc014…3dc1a8 Dummy {f00=0x0137, f01=0x0190, f02=»QU * v P CF A5,WRITEP SEND ATTRIBUTE w P ADK A3,1 w 0 P RF TRT110 w B PTRT105 EQU * w T P XIF w h P w t P CWK A2,/07 w ~ ( P RF(L) TRT110 ILLEGAL CODE : SKIP IT w P CF A5,WRITEP SEND CHARACTER w PTRT110 EQU * w $ P IM FBAX INCREMENT
0x3dc1a8…3dc33c Dummy {f00=0x0137, f01=0x0190, f02=»EMENT CHARACTER COUNTER w P CWK A3,TBLEN x P RB(L) TRT100 NOT FULL BLOCK x 6 P IFT RCOM=1 x Z , P LDK A1,SBA CHECK IF SBA AT END OF BLOCK x n P CC A1,-2,A4 x P RF(E) TRT115 YES x P CC A1,-1,A4 x P RF(NE) TRT116 NO SEND ETB x ( P LCR A
0x3dc33c…3dc4d0 Dummy {f00=0x0137, f01=0x018e, f02=»T115 LCR A2,A4 GET SECOND BYTE AFTER SBA x P CF A5,WRITEP SEND IT y 0 P IM FBAX INCREMENT INDEX y N P XIF y n PTRT116 EQU * y z P LDK A2,ETB LOAD ETB y PTRT120 EQU * y P CF A5,WRITEP SEND IT y P IFF CODE=1 y P LDR A2,A7 GET LRC y
0x3dc4d0…3dc664 Dummy {f00=0x0137, f01=0x018e, f02=» " P CF A5,WRIT05 SEND CRC BYTE 1 z P ECR A2,A8 z * P ANK A2,/FF z < " P CF A5,WRIT05 SEND CRC BYTE 2 z P P XIF z v P ABL TRRE10 HALT OUTPUT z PTRT130 EQU * z P IM XETX INDICATE 'ETX SENT' z PTRT140 EQU * z P LDK A2,ETX LOAD ETX z
0x3dc664…3dc7f8 Dummy {f00=0x0137, f01=0x0190, f02=» z PTRSTA EQU * { $ P IM XSTA INDICATE 'STATUS SENT' { P ST A6,FDWTUT SAVE A6 { D P CF A5,TRSYNC START OUTPUT { b P LDK A2,SOH { P CF A5,WRITE SEND SOH { P LDK A7,0 REST LRC { P LDK A2,'%' { P CF A5,WRITEP SEND '%' { P LDK A
0x3dc7f8…3dc98c Dummy {f00=0x0137, f01=0x018e, f02=» TCA { ~ P LDR* A2,A6 | P CF A5,WRITEP SEND STA | P LD A1,DWTST,A6 GET STATUS | > P ANK A1,/06 MASK FOR S/S 0 | ` P SRL A1,1 | $ P LC A2,SSTAB,A1 GET STATUS BYTE | P CF A5,WRITEP SEND S/S 0 | P LDK A2,NOIR PRELOAD S/S 1 | P LD A1,DWT
0x3dc98c…3dcb20 Dummy {f00=0x0137, f01=0x0190, f02=» | PTRST10 EQU * } P CF A5,WRITEP SEND S/S 1 } P RB TRT130 SEND ETX AND LRC } < P XIF } ` P } l P* } v P* } P* TRANSMIT SYNC SEQUENCE } P* } P* } PTRSYNC EQU * } P LDK A2,0 } * P CIO A2,0,LCUIN HALT INPUT IF NOT DO
0x3dcb20…3dccb4 (2, 491) Dummy {f00=0x0137, f01=0x0190, f02=» } P IFT CODE=1 ~ P LDK A2,0 ~ & P CIO A2,1,LCUUT START TRANSMITTER ~ . P RF(A) TRS010 ~ X P SST A1,LCUUT ~ n P RF(A) TRS005 ~ P ABL BRM ~ PTRS005 CIO A2,1,LCUUT ~ PTRS010 EQU * ~ P LDK A2,SYNEBC ~ * P OTR A2,1,LCUUT
0x3dccb4…3dce48 Dummy {f00=0x0137, f01=0x0190, f02=» TRS010 ~ P SST A1,LCUUT P RF(A) TRS005 & P ABL BRM < PTRS005 CIO A2,1,LCUUT N PTRS010 EQU * l P LDK A2,SYN * P OTR A2,1,LCUUT SPECIFY SYNC CHARACTER P XIF * P CF A5,READ WAIT FOR OUTPUT INTERRUPT P LDK A3,4
0x3dce48…3dcfdc Dummy {f00=0x0137, f01=0x0190, f02=»* P* P* RECEIVER INTERRUPT P* 2 P* < PIH1501 EQU * F P ST P,INTSAV Z P IFT CPU852=1 n P CF A15,SAVE8 SAVE A1-A8 P XIF P P IFF CPU852=1 P MSR 8,A15 SAVE A1-A8 =1 P XIF * P CF A15,LDREG
0x3dcfdc…3dd170 Dummy {f00=0x0137, f01=0x0190, f02=»F A5,LOGIN LOG RECEIVED CHARACTER P XIF * P IFF CODE=1 6 P C2 SYNSW J P RF(NZ) IHLCI2 P CWK A2,SYN SKIP SYNS r P RF(E) READ " PIHLCI2 XRR A7,A2 CALCULATE LRC P XIF P IFT CODE=1 P C2 SYNSW 2 P RF(NZ) IHLC
0x3dd170…3dd304 Dummy {f00=0x0137, f01=0x018e, f02=»LCULATE CRC ( P LC A2,TASCII,A2 TRANSLATE TO ASCII P XIF @ PIHIN10 RTN A5 L P IFT P6805=0 b PIHIN20 CF A5,SST PERFORM SST x P ABL BRM P XIF P IFT P6805=1 PIHIN20 RF SST PERFORM SST P XIF P
0x3dd304…3dd498 Dummy {f00=0x0137, f01=0x0190, f02=» P CF A15,SAVE8 SAVE A1 - A8 P XIF & P 2 P IFF CPU852=1 : P MSR 8,A15 SAVE A1-A8 =1 P P XIF p * P CF A15,LDREG RESTORE DC REGS A3 - A8 | P RB IHIN10 P P* P* & P* SST INSTRUCTION AND STATUS CHECK P*
0x3dd498…3dd62c Dummy {f00=0x0137, f01=0x0190, f02=» , P* BIT 15=MODEM NOT READY P* 4 PSST SST A1,LCUIN > P IFT P6805=1 V & P RF(NA) SST200 ALREADY INACTIVE l P XIF P LDR A2,A1 P IFF LOGG=0 & P CF A5,LOGSST LOG SST INFORMATION P XIF P IFT P68
0x3dd62c…3dd7c0 Dummy {f00=0x0137, f01=0x0190, f02=»2,2 P RF(NZ) SST050 THROUGH PUT P LDK A1,1 SET PARITY ERROR . P RF SSTRET P P XIF d PSST050 EQU * r P CM XSTA TROUHHPUT ERROR P LDKL A5,STB P ABL BRM010 PSST100 EQU * P ST A1,DCSTCU P IFT P6805=0
0x3dd7c0…3dd954 (2, 492) Dummy {f00=0x0138, f01=0x0190, f02=»200 LSALCUZ 0 P CF A15,SETIME LINE ERROR, WAIT 0.2 SECONDS P DATA BRM RESTART H P DATA 2 WAIT TIME b P RF READ | P* PSST200 LDK A1,0 PSSTRET ADK A5,4 P LDR A1,A1 SET CR P ABR* A5 RETURN P XIF P
0x3dd954…3ddae8 Dummy {f00=0x0138, f01=0x0190, f02=»T PERFORM SST INSTRUCTION AND STATUS CHECK P XIF 2 P IFT P6805=1 @ $ P RF READ WAIT FOR SST INTERRUPT V P XIF ~ P P* P* , P* WRITE FROM OR READ ONE CHARACTER TO A2 P* P* PWRITE EQU * P IFT C
0x3ddae8…3ddc7c Dummy {f00=0x0138, f01=0x0190, f02=» EBCDIC r P XIF PWRIT05 EQU * " P OTR A2,0,LCUUT SEND CHARACTER 0 P RF(A) WRIT10 V P RF READ THROUGHPUT ERROR l P IFF CODE=1 $ PWRIT10 XRR A7,A2 ACCUMULATE BCC P XIF P IFT CODE=1 & PWRIT10 CF A5,CRCCAL CALCULATE
0x3ddc7c…3dde10 Dummy {f00=0x0138, f01=0x0190, f02=»BL TDISP P P* P* $ P*** WRITEP . P* @ P* WRITE A2 WITH PARITY J P* j P* t P IFT CODE+P6805=0 ~ PWRITEP ANK A2,/FF P ECR A1,A2 P ORK A2,/80 PWRI100 SLL A1,1 P RB(P) WRI100 P R
0x3dde10…3ddfa4 Dummy {f00=0x0138, f01=0x0190, f02=»* P* P* P*** READP P* 0 . P* READ CHARACTER TO A2 AND CHECK PARITY : P* l P* v PREADP CF A5,READ P IFT CODE+P6805=0 P ECR A1,A2 PRE100 SLL A1,1 P RF(Z) RE110 P RB(NN) RE100 P XRK
0x3ddfa4…3de138 Dummy {f00=0x0138, f01=0x0190, f02=» XIF P ADK A5,4 P ANK A1,/80 P XRK A1,/80 2 P ABR* A5 F P* V P* ` P j P* t < P* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2 ~ P* $ P* CALLING SEQUENCE: CF A5,FINTER P* A2=SUBTERMINAL ADDRESS
0x3de138…3de2cc Dummy {f00=0x0138, f01=0x0190, f02=»SES V * P* ENTRY: FINTER - CHECK SELECT ADDRESS , P* FINTEP - CHECK SPECIFIC POLL ADDRESS : P* j . PRBYTE DATA 0 IF 1 COMPARE WITH RIGTH BYTE t P* P* PFINTEP EQU * P IFT MSV1=0 PFINTER EQU * P XIF P IM RB
0x3de2cc…3de460 Dummy {f00=0x0138, f01=0x0190, f02=»F DC:TAB r PFINT10 SUK A4,2 P LDK A3,0 DEFAULT VALUE ( P CW A4,DCTAB END OF TABLE H ( P RF(E) FINT20 SUBTERMINAL NOT FOUND j P LDR* A3,A4 LOAD DWT ADDRESS P IFT MSV1=1 $ P AD A3,RBYTE CHOOSE ADDRESS TYPE * P CCR A2,A3 COMPARE
0x3de460…3de5f4 (2, 493) Dummy {f00=0x0138, f01=0x0190, f02=» TAKE NEXT TERMINAL PFINT20 CM RBYTE P ANKL A3,/FFFE 4 P RTN A5 J P Z P* d P* n P* POWER ON FUNCTIONS x P* P* PDC15ON EQU * P IFT CPU852=1 P CF A15,SAVE8 SAVE A1-A8 P XIF P P I
0x3de5f4…3de788 Dummy {f00=0x0138, f01=0x0190, f02=» AD* A1,DCTAB GET ADDRESS TO END OF TABLE PDRDC05 SUK A1,2 2 P CW A1,DCTAB J P RF(E) DRDC06 END OF TABLE ^ P LDR* A6,A1 GET DWT ADDRESS 0 P ORS A5,DWTST,A6 STORE DEVICE END FOR DEVICE ( P CF A15,INSSQ INSERT IN STATUS QUEUE P RB
0x3de788…3de91c Dummy {f00=0x0138, f01=0x0190, f02=»ER POINTER v " P RF(NZ) DRDC20 ALREADY STARTED * PDRDC10 CF A15,SPOTIM START POLL TIMER 8 PDRDC20 ABL BRM f P | P* P* POLL TIME OUT P* ( PPTOUT LDKL A5,STB LOAD A5 STACK BASE P LDK A2,/40 ( P ST A2,DCONOF INDICATE
0x3de91c…3deab0 Dummy {f00=0x0138, f01=0x018e, f02=»* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED P* 8 $ PCPTIM CM DCONOF INDICATE POLLING B P LDKL A2,-TIMPOL j P ST* A2,DCTPGP RESTART TIMER * P CF A15,CKMESS CHECK IF STATUS CHANGE P RTN A5 P* P* START POLL TIMER P
0x3deab0…3dec44 Dummy {f00=0x0138, f01=0x0190, f02=» P ABR* A15 P P* P* START PROCEDURE TIMER * P* J PSPTIM EQU * T $ P LDR A1,A6 LOAD DWT AS PARAMETER h P CF A15,SETIME P DATA PRTOUT,TIMPRO $ P ST A4,DCTPP SAVE TIMER POINTER P RTN A5 P* P* PR
0x3dec44…3dedd8 Dummy {f00=0x0138, f01=0x0190, f02=»HALT INPUT IF OPEN P LD A1,XACK " P RF(Z) PRT10 ACK NOT EXPECTED . P CF A5,TRENQ SEND ENQ T & P CF A5,SPTIM START PROCEDURE TIMER r PPRT10 ABL BRM P P* P* STOP PROCEDURE TIMER P* ( PHPTIM LD A1,DCTPP GET TIME
0x3dedd8…3def6c Dummy {f00=0x0138, f01=0x0190, f02=»E=1 P* P* P* CALCULATION OF CRC P* < P* A2 = CHARACTER F P* A7 = ACCUMULATED CRC ^ P* | P* PCRCCAL EQU * P ST A1,CRCSAV P ST A2,CRCSAV+2 P ST A3,CRCSAV+4 P LDK A1,8 PCRC100 LDR A
0x3def6c…3df100 Dummy {f00=0x0138, f01=0x0190, f02=»UK A1,1 P RB(NZ) CRC100 P LD A1,CRCSAV & P LD A2,CRCSAV+2 < P LD A3,CRCSAV+4 T P RTN A5 l PCRCSAV RES 3 | P P* P* ( P* READ CRC CHARACTERS AND CHECK THEM P* CR = (E) IF CRC WAS OK P* P*
0x3df100…3df294 (2, 494) Dummy {f00=0x0138, f01=0x0190, f02=»VE IT ~ P CF A5,READ READ BYTE 2 ( P CM SYNSW SYNCS CAN BE SKIPPED AGAIN . P LD A2,CRCSAV+2 SAVE IT Z P SLL A2,8 z P XRR A2,A8 P ADK A5,4 . P CWR A2,A6 COMPARE RECEIVED WITH COMPUTED P ABR* A5 P XIF P IFT CODE=
0x3df294…3df428 Dummy {f00=0x0138, f01=0x0190, f02=»A5,READP P ADK A5,4 P LDR A1,A1 " P RF(NZ) LRCEND 4 P ANK A7,/7F J PLRCEND EQU * ^ P CM SYNSW r P ABR* A5 P P XIF P P* P* " P* DEVICE WORK TABLE FOR DCTASK P* P* PDW1500 E
0x3df428…3df5bc Dummy {f00=0x0138, f01=0x0190, f02=»A DC15DC POINTER TO ADDRESS BLOCK P DATA 0 TTAB ADDRESS * $ P DATA 0 WAIT/ACTIVATE INDICATOR F P DATA 0 TASK QUEUE n P* P IFT MMUPAG=1 P DATA 0 USER ECB ADDRESS P DATA DC:ECB MMU ECB ADDRESS P XIF P* P DATA
0x3df5bc…3df750 Dummy {f00=0x0138, f01=0x0190, f02=»SSAGE QUEUE ~ , P DATA 0 SIMULATED DEVICE BUFFER ADDRESS P DATA 0 CURSOR ADDRESS D " P DATA 0 REQUEST TIMEOUT VALUE b P* P IFT MMUPAG=1 PDC:ECB EQU * MMU ECB P DATA 0,0,0,0,0,0 P XIF P* P P* P
0x3df750…3df8e4 Dummy {f00=0x0138, f01=0x0190, f02=»ANCHOR z P IFF RBUFNR=1 DK3 P IFF RBUFNR=2 ( P DATA *+RLINK > P RES RBUFL+3 T P IFF RBUFNR=3 h P DATA *+RLINK ~ P RES RBUFL+3 P IFF RBUFNR=4 P DATA *+RLINK P RES RBUFL+3 P XIF P IFF RBUFNR=1 DK3
0x3df8e4…3dfa78 Dummy {f00=0x0138, f01=0x0190, f02=» & PMMUBUF RES TBUFL+1 MMU WORK BUFFER P XIF 2 P > P* H P* R P* INTERRUPT LOGGING ROUTINE P* P* P IFF LOGG=0 PLOGSST ST A2,SAVE2 P ORKL A2,/F000 P RF LOG10 PLOGOUT ST A2,SAVE2 P ORK
0x3dfa78…3dfc0c Dummy {f00=0x0138, f01=0x0190, f02=»OGPNT P STR A2,A3 P ADK A3,2 P CWK A3,LOGEND 2 P RF(L) LOGEXI H P LDKL A3,LOGSTA ^ PLOGEXI ST A3,LOGPNT v P LD A2,SAVE2 P LD A3,SAVE3 PLOGE10 RTN A5 P P* P* PLOGPNT DATA LOGSTA P
0x3dfc0c…3dfda0 Dummy {f00=0x0138, f01=0x0190, f02=» P IFT RCOM=1 P < P******************************************************* " P* b P* L I N C O L l P* : P* CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER P* > P************************************************
0x3dfda0…3dff34 (2, 495) Dummy {f00=0x0138, f01=0x0190, f02=»T,A2 ASCII LINE NUMBER " P CF A5,WRITEP SEND LINE NUMBER P D P LDR A2,A3 L P ANK A2,X'3F' ^ ( P LC A2,LICO:T,A2 ASCII COLUMN NUMBER t $ P CF A5,WRITEP SEND COLUMN NUMBER P RTN A5 RETURN P* P* P* P P
0x3dff34…3e00c8 Dummy {f00=0x0138, f01=0x018e, f02=»32E,/3C28,/2B21 /08-/0F * P DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 * P DATA /5152,/245D,/2A29,/3B5E /18-/1F N * P DATA /2D2F,/5354,/5556,/5758 /20-/27 | * P DATA /595A,/402C,/255F,/3E3F /28-/2F ( P DATA /3031,/3233,/3435,/3637 /30-37 ( P DAT
0x3e00c8…3e025c Dummy {f00=0x0138, f01=0x40be, f02=» " 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 * * P DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 X PDC:END EQU * P* P* P END @ 55F,/3E3F /28-/2F ( P DATA /3031,/3233,/3435,/3637 /30-37 ( P DAT
0x3e025c…3e03f0 Dummy {f00=0x0138, f01=0x2008, f02=» H P X ` h p x
0x3e03f0…3e0584 Dummy {f00=0x0138, f01=0x0190, f02=»/08-/0F r * P DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 * P DATA /5152,/245D,/2A29,/3B5E /18-/1F > * P DATA /2D2F,/5354,/5556,/5758 /20-/27 l * P DATA /595A,/402C,/255F,/3E3F /28-/2F ( P DATA /3031,/3233,/3435,/3637 /30-37 ( P DATA /3839,/3A5B,/5
0x3e0584…3e0718 Dummy {f00=0x0138, f01=0x40b0, f02=»A 2 LENGTH OF DC:TAB * 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 J PDC:END EQU * x P* P* P END @ F,/3E3F /28-/2F ( P DATA /3031,/3233,/3435,/3637 /30-37 ( P DATA /3839,/3A5B,/5
0x3e0718…3e08ac Dummy {f00=0x0138, f01=0x2008, f02=» H P X ` h p x
0x3e08ac…3e0a40 Dummy {f00=0x0138, f01=0x0190, f02=» ! ! 4 0 P W W }H } +*4 + 4 4@ @ 4 Iv H{ I! u( H! u!0 0, I HP ) 4 4 u0- Q P I 0 @ 4 ! y"! ) H @ A A @ )W 4 0* 0. T w
0x3e0a40…3e0bd4 (2, 496) Opaque[0x194]
0x3e0bd4…3e0d68 # DirEnt {nam=»TEST «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2720, f03=0x0000}
0x3e0bd4…3e0d68 IdxSect {
0x3e0bd4…3e0d68 f00 = 0x0139 // 0x3e0bd4 @0x0
0x3e0bd4…3e0d68 f01 = 0x0002 // 0x3e0bd6 @0x2
0x3e0bd4…3e0d68 gno = [ // 0x3e0bd8 @0x4
0x3e0bd4…3e0d68 [0x00]: C0x0139.0x0.0
0x3e0bd4…3e0d68 ]
0x3e0bd4…3e0d68 }
0x3e0d68…3e0efc Dummy {f00=0x0139, f01=0x0190, f02=» PSCR PINC SYSTAB PLKE M " PKPF /L,M:92NA 0 PSKF F SCR R LED DRDC15,/S ^ * &!!CH $$TBLEN EQU 2300$$TBLEN EQU 252$$ t $ !!CH $$CODE EQU 0$$CODE EQU 1$$ !!EN ASM /S,NL KPF /O SCR LED EB
0x3e0efc…3e1090 Dummy {f00=0x0139, f01=0x008e, f02=» KPF /L,M:92NE SCR ASM DRDC15,NL * KPF /O @ SCR N ASM EBCDIC,NL Z KPF /O p ASG /E0,TY10 ~EN EQU 252$$ t $ !!CH $$CODE EQU 0$$CODE EQU 1$$ !!EN ASM /S,NL KPF /O SCR LED EB
0x3e1090…3e1224 Dummy {f00=0x0139, f01=0x2008, f02=» KPF /L,M:92NE SCR ASM DRDC15,NL * KPF /O @ SCR N ASM EBCDIC,NL Z KPF /O p ASG /E0,TY10 ~EN EQU 252$$ t $ !!CH $$CODE EQU 0$$CODE EQU 1$$ !!EN ASM /S,NL KPF /O SCR LED EB
0x3e1224…3e13b8 Dummy {f00=0x0139, f01=0x0190, f02=» X R p , ( =" X T X P , Y L , ( Y! C L C @ , ( * s > @ @ @ A X _" p , ( X P y Y X P T , ( @ T A A > A A A A , (
0x3e13b8…3e154c Dummy {f00=0x0139, f01=0x0190, f02=» h , ( 1 P P ! , ( Q T T A P A T ! T 8 , ( q ! T T ! T ! A I A h , ( P " ! _ ! , ( T " X ! _ ! A @ , ( P P @
0x3e154c…3e16e0 Dummy {f00=0x0139, f01=0x0190, f02=» ! A _B ! X>_b A @ , ( O @ T 1 Z 0 2P P P ( TEBCDI X , ( R o @ A @ 8 H @ P E j , ( P X R X P X T * & ! P C C X , ( D T
0x3e16e0…3e1874 (2, 497) Opaque[0x194]
0x3e1874…3e1a08 # DirEnt {nam=»M:92LP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x2728, f03=0x0000}
0x3e1874…3e1a08 IdxSect {
0x3e1874…3e1a08 f00 = 0x0139 // 0x3e1874 @0x0
0x3e1874…3e1a08 f01 = 0x0020 // 0x3e1876 @0x2
0x3e1874…3e1a08 gno = [ // 0x3e1878 @0x4
0x3e1874…3e1a08 [0x00]: C0x0139.0x1.0
0x3e1874…3e1a08 [0x01]: C0x0139.0x2.0
0x3e1874…3e1a08 [0x02]: C0x0139.0x3.0
0x3e1874…3e1a08 [0x03]: C0x013a.0x0.0
0x3e1874…3e1a08 [0x04]: C0x013a.0x1.0
0x3e1874…3e1a08 [0x05]: C0x013a.0x2.0
0x3e1874…3e1a08 [0x06]: C0x013a.0x3.0
0x3e1874…3e1a08 [0x07]: C0x013b.0x0.0
0x3e1874…3e1a08 [0x08]: C0x013b.0x1.0
0x3e1874…3e1a08 [0x09]: C0x013b.0x2.0
0x3e1874…3e1a08 [0x0a]: C0x013b.0x3.0
0x3e1874…3e1a08 [0x0b]: C0x013c.0x0.0
0x3e1874…3e1a08 [0x0c]: C0x013c.0x1.0
0x3e1874…3e1a08 [0x0d]: C0x013c.0x2.0
0x3e1874…3e1a08 [0x0e]: C0x013c.0x3.0
0x3e1874…3e1a08 [0x0f]: C0x013d.0x0.0
0x3e1874…3e1a08 ]
0x3e1874…3e1a08 }
0x3e1a08…3e1b9c Dummy {f00=0x0139, f01=0x0190, f02=» x J h h h h h h < h h'.'T $ L . 8 h h h h h h $ h h h h h L h h h ~ h h h h h h h h h h h h h h h h h h h h h h h h h h h h n c @ Tg t z ^ b bLPL H b2 Z ` z
0x3e1b9c…3e1d30 Dummy {f00=0x0139, f01=0x0190, f02=» 4c @S{ D d 2Z $"z y B % y D Dbf d * F :P }B W [~ ? d j% L "~ T &b ICn 1 d _ A d " ^ _ @^ > > U # T @ H ( ( P c P W: P, A^ @ V ( U P" @E~V LE~W @E
0x3e1d30…3e1ec4 Dummy {f00=0x0139, f01=0x0190, f02=» 6 8 ^ Q Z P 0 9 t t_ $ @ _, ? P H H #P h A d A FQ ? @^ : ) A^ _ @ @ A H ( A^ _ ? ? ? ? ? ^ A _ _ ^ ^ $P T I R $ 5 % > ? W ? W ? T T$ U U U U
0x3e1ec4…3e2058 Dummy {f00=0x0139, f01=0x0190, f02=» Q Q > > 0 @^^ 1 A^^ P P > ? * X " R" Y T ? X D F T> Z W8 > _& @ 8 R" Y T ? X D F T Z W > _& W2 > 8 X W( ? ` @ @ P $ H W W > > > > > > @^PV ? ^P > _ > ? _ > > ? ^ ! Y ^ _ n ?
0x3e2058…3e21ec Dummy {f00=0x0139, f01=0x0190, f02=» < $ ( , 0 4 8 < C 8W T 8P Y ^ 5 ) P U ^ XH D #DP @ R XV Y @ P, F T W X &P T X I Y T # C C W4 O " # X Y ) C
0x3e21ec…3e2380 Dummy {f00=0x0139, f01=0x0190, f02=» P j$ > > F C F C > B R Q F ! P C > C > F :c" H :b"? #" : C > B R Q~ P0 B P* 0$ T # R QL > X B U( H Q2 X
0x3e2380…3e2514 (2, 498) Dummy {f00=0x0139, f01=0x0190, f02=» P PL $ # Q > P _0 # T p > P p (_H _2 B U X > ? _ X T (@ H ^ > > ? _ X T X X T % T ?C L Rl _@(@ L U L Q0 M & X
0x3e2514…3e26a8 Dummy {f00=0x0139, f01=0x0190, f02=» 0P X T 4 Y X F X T X Z 1 1 X P - M T $ PD _ T " # p X L R P RP (@ ^ X P8 P0 # P T P 0P 1 _ t W Y > > ^dJ B B ^lJ B B pU
0x3e26a8…3e283c Dummy {f00=0x0139, f01=0x0190, f02=» 0 R t B " P Q :A H P P ^ H !@T I ^ T ! 1 U ^ A d ? W A d ? W A d ? W U R ; V ~# T R p 4 # PJ P 4 RL P 4 ] P $ P ] U PD P< P0 P,
0x3e283c…3e29d0 Dummy {f00=0x0139, f01=0x0190, f02=» ' T P X P " >Wh T # Y U T ] W 8V X $P y $W $ E@ P 8R R ^ Y $ X Z ;BR 8% =A Y T Z& h_, X ' X 4X< XB U T T U 5 U R " ] ~ ^ ;h # <c$
0x3e29d0…3e2b64 Dummy {f00=0x0139, f01=0x0190, f02=»X <d$ _D $?:D" Y X P Y # P 4T U # P 4 4 P _r T _$ U _ ? 4 U 5 R PF "P2 R T T R X # X h > P P P ` X XF _H Wj ? T T E@ W u > > E D E
0x3e2b64…3e2cf8 Dummy {f00=0x0139, f01=0x0190, f02=»XB Y X X X X ' 4 B U B (" W C (@ > ?" 8' ?A R 8;b# 4T RT T T ] ] 8 W< TrW T ] _ P T V WT 8V T P U 8 ~ U Q2P X H 5 U R " ] ~ Y > > V P
0x3e2cf8…3e2e8c Dummy {f00=0x0139, f01=0x0190, f02=» 4XR XX 5 h_b Y Y Y X 9BV$ X & Y " X D V & X . T 8TV 9WD B 7P P ^ A^ W A^ @^ A.W ? A dI.9 X R C C & ^ ?A @^ A. X V 9_: @
0x3e2e8c…3e3020 Dummy {f00=0x0139, f01=0x0190, f02=» W Q P P 1 ! X T V C B Q 1 & ^ Y Y Y B X _ ? X Z(W@ A d ? ? H $B T I H T B > > > ? ? ? ? ? I X ' X T B C X 4 ~ Y V P
0x3e3020…3e31b4 (2, 499) Dummy {f00=0x0139, f01=0x0190, f02=» 4XR XX 5 h_b Y Y Y X !Pp P X ! 6 Y * X . ! j Y T & ` P Pb P Pv Pz 6 + ^ A^ @^ A. H E@ T ^ Y HW A^ @^ A. Wx ! * X , X P ! ! 2W< ! * _ ! *
0x3e31b4…3e3348 Dummy {f00=0x0139, f01=0x0190, f02=» 0 TOT 0 SST X Y ,W 0 X Y , Y * ! 8 ! X *' P ! ! x D ) P _ X " X ! Tr X !& Ph B 0 0 :C P ! 8 9DV ! (@ B r ! ! R ! j ! ! b ! ( ! ! Z ! X Y . X * V " ! 8_ Y *
0x3e3348…3e34dc Dummy {f00=0x0139, f01=0x0190, f02=»# T X Y ._ Y *# 4 ! n ^ ( C V ! ! 8 B B ! j ! xW0 W ! n X@ b ! x C (Q ! ! * ! 2 ! n ! T )WL WP ! n Xz R ! x ( - j ! x ) W. Y PW Y P Y L Y N Y B S W W B C & ^ _ ? Y " X $ T X
0x3e34dc…3e3670 Dummy {f00=0x0139, f01=0x0190, f02=» X # P Y .:A , X J A^ Y J @^ B. X $ Y Y $ Y X h Y & X '? A d ? (@ X L X N K P6 X PT $ D C Y B ^ K & E % Y B K X ;AR@;a X &P Y & P 7P < $ <C ! 9 4 X d " _ W
0x3e3670…3e3804 Dummy {f00=0x0139, f01=0x0190, f02=»;A _ 4 X 0 # P _ 4(@ R DDl 1_ W (@ R 0 DDl ] _ ! 4 ! ;E :B 9A ! U P jW kQ 4 Y * ! 0" Z Y" P Z _ 4 A L;D A L 4 R _ ;H 4 r ! x (:C 4 Z ! x ( 4
0x3e3804…3e3998 Dummy {f00=0x0139, f01=0x0190, f02=» X # P Y :A , X A Y @ B. X Y Y P Y P 7P < $ <C ! 9 4 X d " _ W
0x3e3998…3e3b2c Dummy {f00=0x0139, f01=0x0190, f02=»;A _ 4 X # P _ 4(@ R D 1_ W (@ R 0 D ] _ ! 4 ! ;E :B 9A ! U P jW kQ 4 Y ! 0" Z Y" P Z _ 4 A L;D A L 4 R _ ;H 4 ! (:C 4 ! ( 4
0x3e3b2c…3e3cc0 Dummy {f00=0x0139, f01=0x0190, f02=» X # P Y :A P, P P~ 1P( P W P P 5P ^ ^ X P WL B 9 B Y B Y ( P. @D& Dl ^ @D( `D( @D(P 0P _ % AD& AD* &_^ B Q< B_r X P 0 Y P C x_ _ B Y _N ^ X P A E> Y Wb Y
0x3e3cc0…3e3e54 (2, 500) Dummy {f00=0x013a, f01=0x0190, f02=» ) 1_ (X( P _ 0 )_6 (P _ ) 1 4 ( X R2 X T* X P& , Y L C L C x > @ @ @ A X &_" X P y Y X P T X @!L T A!N A!L > A!. A!2 A!6 A!: A!> !BW > 4
0x3e3e54…3e3fe8 Dummy {f00=0x013a, f01=0x0190, f02=» T@ !' T8 !' A I A!X P " $l !' $ _ !' T ( $4" X !' _ !(n A!V @!NP @!LP !$ A!N A!P_ !(n @!PP @( X@ !%* T< A!T !% !n @!NP @( P @!L " 8 !$V !$ A!X_: !' X6_Z A!T @( @!dT 1 R 0 2P P P A!b . @!J 8 HDl @(
0x3e3fe8…3e417c Dummy {f00=0x013a, f01=0x0190, f02=» !n_ A!P @!J X A!V A!L A!X @!l A!l $ !(n @!NT @!PP !% !n !(n @!NT @!PX Wj A I ! E># ^ !, @!L @!d @!^ A!b $ !(n @!NXN !' T @!XP !% !(>_h 1T& @!XX @!RP !$ !% A!V_ A!X $ < A!N @!RT _, _0 @!NT8W !n @( T !
0x3e417c…3e4310 Dummy {f00=0x013a, f01=0x0190, f02=» B A!^ A!` A!b A!R A!T !& !(> A!N_^_V @!LP6 X R0 X P T$ T Y W ! P C & X A!N A!L 4 @( @!TT @!d A!b @!b A!d A!T !' T2 P4 PJ PL P P. 1 A!b @!b ]6W P _@ @( @!b E !(~P !'~ 4 _$ !(~ 2_l 1
0x3e4310…3e44a4 Dummy {f00=0x013a, f01=0x0190, f02=» @!bT( @( !' 8 !' @!VP - !' x !C W 0 " @!VPL R ~T }T T0 W, !' P " ! " :A *@ HDl T 0 !' W R !' A!b @!` @!bU< Zx Q P Q T 0 !' A!b 0 !' A!b !' !' & A!R _ B J B !' !' 4 A d ? !,
0x3e44a4…3e4638 Dummy {f00=0x013a, f01=0x0190, f02=» 9AP ^ 2 _ " ! 1 4 A' @D( `D( @D(P 0 M A' 4 ? @ A @ T (, !n @ A (, ^ A a 4 E>( X A > E>(N Z A!h 4 A!h !'~ @!NP !% !(> !n @!hP a!h A!h 4 A!Z !' T ' A!Z 4 (
0x3e4638…3e47cc Dummy {f00=0x013a, f01=0x0190, f02=» @!bT @ ! 8 ! @!VP - ! x ! W 0 " @!VP R ~T }T T W ! P " ! " :A *@ H T 0 ! W R ! A!b @!` @!bU Zx Q P Q T 0 ! A!b 0 ! A!b ! ! & A!R _ B J B ! ! 4 A d ? !,
0x3e47cc…3e4960 Dummy {f00=0x013a, f01=0x0190, f02=» 9AP ^ 2 _ " ! 1 4 A' @ ` @ P 0 M A' 4 ? @ A @ T !n @ A A a 4 ( X A > Z A!h 4 A!h !'~ @!NP !% !(> !n @!hP a!h A!h 4 A!Z !' T ' A!Z 4
0x3e4960…3e4af4 (2, 501) Dummy {f00=0x013a, f01=0x0190, f02=» @!bT @ ! 8 ! @!VP - ! x ! W 0 " @!VP R ~T }T T W ! P " ! " :A *@ H T 0 ! W R ! A!b @!` @!bU Zx Q P Q T 0 ! A!b 0 ! A!b ! ! & A!R _ B J B ! ! 4 A d ? !,
0x3e4af4…3e4c88 Dummy {f00=0x013a, f01=0x0190, f02=» 9AP ^ 2 _ " ! 1 4 A' @ ` @ P 0 M A' 4 ? @ A @ T !n @ A A a 4 ( X A > Z A!h 4 A!h !'~ @!NP !% !(> !n @!hP a!h A!h 4 A!Z !' T ' A!Z 4
0x3e4c88…3e4e1c Dummy {f00=0x013a, f01=0x0190, f02=» @!bT @ ! 8 ! @!VP - ! x ! W 0 " @!VP R ~T }T T W ! P " ! " :A *@ H T 0 ! W R ! A!b @!` @!bU Zx Q P Q T 0 ! A!b 0 ! A!b ! ! & A!R _ B J B ! ! 4 A d ? !,
0x3e4e1c…3e4fb0 Dummy {f00=0x013a, f01=0x0190, f02=» 9AP ^ 2 _ " ! 1 4 A' @ ` @ P 0 M A' 4 ? @ A @ T !n @ A A a 4 ( X A > Z A!h 4 A!h !'~ @!NP !% !(> !n @!hP a!h A!h 4 A!Z !' T ' A!Z 4
0x3e4fb0…3e5144 Dummy {f00=0x013a, f01=0x0190, f02=» @!bT @ ! 8 ! @!VP - ! x ! W 0 " @!VP R ~T }T T W ! P " ! " :A *@ H T 0 ! W R ! A!b @!` @!bU Zx Q P Q T 0 ! A!b 0 ! A!b ! ! & A!R _ B J B ! ! 4 A d ? !,
0x3e5144…3e52d8 Dummy {f00=0x013a, f01=0x0190, f02=» 9AP ^ 2 _ " ! 1 4 A' @ ` @ P 0 M A' 4 ? @ A @ T !n @ A A a 4 ( X A > Z A!h 4 A!h !'~ @!NP !% !(> !n @!hP a!h A!h 4 A!Z !' T ' A!Z 4
0x3e52d8…3e546c Dummy {f00=0x013a, f01=0x0190, f02=» @!bT @ ! 8 ! @!VP - ! x ! W 0 " @!VP R ~T }T T W ! P " ! " :A *@ H T 0 ! W R ! A!b @!` @!bU Zx Q P Q T 0 ! A!b 0 ! A!b ! ! & A!R _ B J B ! ! 4 A d ? !,
0x3e546c…3e5600 Dummy {f00=0x013a, f01=0x0190, f02=» 9AP ^ 2 _ " ! 1 4 A' @ ` @ P 0 M A' 4 ? @ A @ T !n @ A A a 4 ( X A > Z A!h 4 A!h !'~ @!NP !% !(> !n @!hP a!h A!h 4 A!Z !' T ' A!Z 4
0x3e5600…3e5794 (2, 502) Dummy {f00=0x013a, f01=0x0190, f02=» @!bT @ ! 8 ! @!VP - ! x ! W 0 " @!VP R ~T }T T W ! P " ! " :A *@ H T 0 ! W R ! A!b @!` @!bU Zx Q P Q T 0 ! A!b 0 ! A!b ! ! & A!R _ B J B ! ! 4 A d ? !,
0x3e5794…3e5928 Dummy {f00=0x013a, f01=0x0190, f02=» 9AP ^ 2 _ " ! 1 4 A' @ ` @ P 0 M A' 4 ? @ A @ T !n @ A A a 4 ( X A > Z A!h 4 A!h !'~ @!NP !% !(> !n @!hP a!h A!h 4 A!Z !' T ' A!Z 4
0x3e5928…3e5abc Dummy {f00=0x013a, f01=0x0190, f02=» @!bT @ ! 8 ! @!VP - ! x ! W 0 " @!VP R ~T }T T W ! P " ! " :A *@ H T 0 ! W R ! A!b @!` @!bU Zx Q P Q T 0 ! A!b 0 ! A!b ! ! & A!R _ B J B ! ! 4 A d ? !,
0x3e5abc…3e5c50 Dummy {f00=0x013a, f01=0x0190, f02=» 9AP ^ 2 _ " ! 1 4 A' @ ` @ P 0 M A' 4 ? @ A @ T !n @ A A a 4 ( X A > Z A!h 4 A!h !'~ @!NP !% !(> !n @!hP a!h A!h 4 A!Z !' T ' A!Z 4
0x3e5c50…3e5de4 Dummy {f00=0x013a, f01=0x0190, f02=» @!bT @ ! 8 ! @!VP - ! x ! W 0 " @!VP R ~T }T T W ! P " ! " :A *@ H T 0 ! W R ! A!b @!` @!bU Zx Q P Q T 0 ! A!b 0 ! A!b ! ! & A!R _ B J B ! ! 4 A d ? !,
0x3e5de4…3e5f78 Dummy {f00=0x013a, f01=0x0190, f02=» 9AP ^ 2 _ " ! 1 4 A' @ ` @ P 0 M A' 4 ? @ A @ T !n @ A A a 4 ( X A > Z A!h 4 A!h !'~ @!NP !% !(> !n @!hP a!h A!h 4 A!Z !' T ' A!Z 4
0x3e5f78…3e610c Dummy {f00=0x013a, f01=0x0190, f02=» @!bT @ ! 8 ! @!VP - ! x ! W 0 " @!VP R ~T }T T W ! P " ! " :A *@ H T 0 ! W R ! A!b @!` @!bU Zx Q P Q T 0 ! A!b 0 ! A!b ! ! & A!R _ B J B ! ! 4 A d ? !,
0x3e610c…3e62a0 Dummy {f00=0x013a, f01=0x0190, f02=» 9AP ^ 2 _ " ! 1 4 A' @ ` @ P 0 M A' 4 ? @ A @ T !n @ A A a 4 ( X A > Z A!h 4 A!h !'~ @!NP !% !(> !n @!hP a!h A!h 4 A!Z !' T ' A!Z 4
0x3e62a0…3e6434 (2, 503) Dummy {f00=0x013a, f01=0x0190, f02=» @!bT @ ! 8 ! @!VP - ! x ! W 0 " @!V :f"? HC !' "? HC !' 4 ABCDEFGHI#.<(+!&JKLMNOPQR$]*);^-/STUVWXYZ@,%_>?0123456789:[ '="D,D* 7- <=2&p ?' @O JZlP}M] N
0x3e6434…3e65c8 Dummy {f00=0x013a, f01=0x0190, f02=» P E$ E>E. _ t _< ? ^ 4 _ P P @ 6 1 A 6 _ P 9 > > & D_ _._6_2D _Rx x yD y y | | x x F F H H H H H G G G0F GtG F H H F G G G0F " # $ % "$&( F
0x3e65c8…3e675c Dummy {f00=0x013a, f01=0x0190, f02=» ( U H B r ]p W Y & Y $ 0 Y . G [Z H B Y I B Y J_ W [ C P C W < C C _H [ H H S W C C B B B U [ R Wp H TP L P B r L ( ]p $ X _ X ` T I T
0x3e675c…3e68f0 Dummy {f00=0x013a, f01=0x0190, f02=» P #D { I6 ^ ^ I I MfMfMfMfMfL L I MfL I MfMfMfMfL L I F X (P R X (W G G : R $ - _ " P $ - : R $ - _ : Z $ -_ D ( U ( 0 W T ` U @ , @ W : X & X P !##T Y T( X P
0x3e68f0…3e6a84 Dummy {f00=0x013a, f01=0x0190, f02=» V, P ( I ( ( W I( ^ Mf B W C X '? H$ X & X ( )T Mf HN H L X $TT T AHL J , Zv P W T Y $ P T _ Y & F P X(@ _ K X & X I U X J U ( ^ T$ X X RP
0x3e6a84…3e6c18 Dummy {f00=0x013a, f01=0x0190, f02=» @ X WF [Z N 4 5W P 0 @WP 1 AWP(@_ 1 (@ K / O $P % 4 F H (@ B P P 9 X M| 4' K,' K, 5 K, 4 Q W , P& ,' X X 1 Z" ) K,_ (@ C ( B ! Mf
0x3e6c18…3e6dac Dummy {f00=0x013a, f01=0x0190, f02=»W Mf X ( X & F X P @^ Q (@ ]p + X ^V" P "P8 $P4W X & X bT( ;AR ( L ( I( ^ T Y ^ F " F D '? P P( $ P" [ I I K K P P & P [ZW D $ T [ T [>W E I E J X
0x3e6dac…3e6f40 Dummy {f00=0x013a, f01=0x0190, f02=»{ P P z @zh X(@ Dzj C C C W C ( M M L " TOP P Az L Az L C z @z Az Q< @zh P Azh @z P B P Dzj EzlX #D( M ( B P B @zh Dzj W C C ( M M z zf
0x3e6f40…3e70d4 (2, 504) Dummy {f00=0x013b, f01=0x0190, f02=»zh Ezv P Ez P Ez DztT z P P Q 2% P( R 0 XzjT R , @z T R RT @z Q P 6 Q 2% P P z r P %_ S F S E 3 P S I P S J P S ( P S * P % S H P & S P @z S , d S B | N
0x3e70d4…3e7268 Dummy {f00=0x013b, f01=0x0190, f02=» Y U ! T ! X6 _R _V Dz " P z Az ( ^ W @z P6 I @z P @Z" V W HZ$ IZ&(@ @z P -W P B P X z (@( @z Q _ T `zf ` 9A S ^ H $X D S . S $ ] R * S W
0x3e7268…3e73fc Dummy {f00=0x013b, f01=0x0190, f02=» E P E P E D T P 2% P R 0 X T R , @ T R RT @ 6 2% P P %_ S F S E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | N
0x3e73fc…3e7590 Dummy {f00=0x013b, f01=0x0190, f02=» Y U ! T ! X6 _R _V D " P A ( ^ W @ P6 I @ P @ V W H I (@ @ P -W P B (@( @ Q _ T ` ` 9A S ^ H $X D S . S $ R * S W
0x3e7590…3e7724 Dummy {f00=0x013b, f01=0x0190, f02=» E P E P E D T P 2% P R 0 X T R , @ T R RT @ 6 2% P P %_ S F S E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | N
0x3e7724…3e78b8 Dummy {f00=0x013b, f01=0x0190, f02=» Y U ! T ! X6 _R _V D " P A ( ^ W @ P6 I @ P @ V W H I (@ @ P -W P B (@( @ Q _ T ` ` 9A S ^ H $X D S . S $ R * S W
0x3e78b8…3e7a4c Dummy {f00=0x013b, f01=0x0190, f02=» E P E P E D T P 2% P R 0 X T R , @ T R RT @ 6 2% P P %_ S F S E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | N
0x3e7a4c…3e7be0 Dummy {f00=0x013b, f01=0x0190, f02=» Y U ! T ! X6 _R _V D " P A ( ^ W @ P6 I @ P @ V W H I (@ @ P -W Z, P Q R ;A [ [ : P Q R ;A [ [ : Q R P ;A [ [ : ? ?
0x3e7be0…3e7d74 (2, 505) Dummy {f00=0x013b, f01=0x0190, f02=» & D LW 0P Q P P E +P W : X + P X L 1 Y L : L 4W 0P8 R Q P W R D + Q ( 0 5 @^^ 1 A^^ Z> : D NW (P D + I W6 @WPT n ( AWP U 1_ D + I D N ) E N : T * ZvSP P W X * 0
0x3e7d74…3e7f08 Dummy {f00=0x013b, f01=0x0190, f02=» Y ^ B I ~ B T B : X "? P P X T _ X . P X $ ! # C W C C X %? : X &_ 0 D . P , _ D . D $ D * ZP T ( T & ^ S W : U ; $ T $ T $ T&x : :
0x3e7f08…3e809c Dummy {f00=0x013b, f01=0x0190, f02=» U $ ) Y _& (# )_4 $ ($ ) YR_L U p 0_8 $_< ' h N l n m _ c f i i > > @^ 0 A^ W & ^ ! Z( ^ (X0 @^ P T M ]@ , ) A^ P* P Y U ( ) 5 & > > [ [ ^
0x3e809c…3e8230 Dummy {f00=0x013b, f01=0x0190, f02=»T0. T G Y6 G _b P ,P - _ ( ( _ b _ ? X V Y ^ ! 2W< Y U R -P b X , ) Y . a X P Y P C W~ 8!@P$ X $P y $W $ E@b ` Y $ X " PP:A: R Q W Y <D X ? ?: T
0x3e8230…3e83c4 Dummy {f00=0x013b, f01=0x0190, f02=» V cL ! B P X " _` B P$ $$ R % C cL* ! W Y +PH Y *P> Y (P Y )P cL R _Q P OR R W " ! B `L Wr W 0 Z cL ! B Z Z& X . 0T X W X ,P Y . 0 %_. % Y . W _p P cL _ X
0x3e83c4…3e8558 Dummy {f00=0x013b, f01=0x0190, f02=» $4 P c X .T * W Y , - ^ @ Y $ X Z _X ? X :a Z T T W P X :d Y > > ? 8 R @RT V @% =cWP R`P R&P8 R P W 9 WD $ P W _ $ P _$ _*_, _ %0=c X 0P > 0 > >_ B 1 > XT 0 _
0x3e8558…3e86ec Dummy {f00=0x013b, f01=0x0190, f02=» ! ! W B W$ B L # 9Q T W Q P X & V T Y &W cl X ! T6 B R0Q$ B D ! V ! ! ! W !f !e Y ! T ! V c ! B C ! ! T " T W Q " T ) ^ !f cv Y _ ! !fl Y &P Q W
0x3e86ec…3e8880 Dummy {f00=0x013b, f01=0x0190, f02=» ! Y 4 RNQ " PH _ " P R: M T2 ! L ,! :D" !fT Y Y U ! _$ W4 , ! T ,' c ! R !__U C X ' W Y ! _ X RT U TJ X d ? Y X P " ! Y ' ! X T ! ^ c ^ R _ 4
0x3e8880…3e8a14 (2, 506) Dummy {f00=0x013b, f01=0x0190, f02=» f hNh hj PB P8 ^ B P B L # +P ! ! T ! Y & ! W ! ! W ! Y Y h F U P" T Y &_. P4 R( Pj O]> V _F T Y Y & V Y _^ C _P F F" $ P X & X ]r ! Y Y Y _
0x3e8a14…3e8ba8 Dummy {f00=0x013b, f01=0x0190, f02=» C > X Z^<BR P j X _x R0 V0 ! P* P P P" R ?Q ! Y R Q h -_ ? _ X # ! ^ Y _( ? X Z ! P4 P g g X " f ! ! X & g g i& idi B 8# T $ # ;D 7P P ^ Y W Y
0x3e8ba8…3e8d3c Dummy {f00=0x013b, f01=0x0190, f02=» P P kd & kL ^ B P B H " +P P. T Y ' ! R| X ( Y &R Y & _ Y &_. B 1 l ! k B B U4 $ ! T _ U D ! T _ $$ X" X& X* C F kx X`" Ei P( 8'0P Ei TD ! T 9 _ ! T @
0x3e8d3c…3e8ed0 Dummy {f00=0x013b, f01=0x0190, f02=» ! k j B !m !mH ! k B Y & !mfW j 8!0T 8 !@P ! $ P ! ! k ! T Y & T X & C & ^ X Y & Y > X " X &" Y )Q Y > X Z2<BR J ? Y ! T X ! Y & Zl k T _ ! X
0x3e8ed0…3e9064 Dummy {f00=0x013b, f01=0x0190, f02=»" X &" Y )U W ! ! ! Y 4 B j8 U )X R@ X X &" Y * X ) V Y !mH X $ X & !mf X * j j8 `R Y ! ! ! 4 ! V ! V W :h ! 4 X )" X '# R 4 k > v
0x3e9064…3e91f8 Dummy {f00=0x013b, f01=0x0190, f02=» ! j B ! ! ! B Y & ! W j 8!0T 8 !@P ! $ P ! ! ! T Y & T X & C & ^ X Y & Y > X " X &" Y )Q Y > X Z2<BR J ? Y ! T X ! Y & Zl k T _ ! X
0x3e91f8…3e938c Dummy {f00=0x013b, f01=0x0190, f02=»" X &" Y )U W ! ! ! Y 4 B j8 U )X R@ X X &" Y * X ) V Y !mH X $ X & !mf X * j j8 `R Y ! ! ! 4 ! V ! V W :h ! 4 X )" X '# R 4 k >
0x3e938c…3e9520 Dummy {f00=0x013b, f01=0x0190, f02=» ! j B ! ! ! B Y & ! W j 8!0T 8 !@P ! $ P ! ! ! T Y & T X & C & ^ X Y & Y > X " X &" Y )Q Y > X Z2<BR J ? Y ! T X ! Y & Zl k T _ ! X
0x3e9520…3e96b4 (2, 507) Dummy {f00=0x013b, f01=0x0190, f02=»" X &" Y )U W ! ! ! Y 4 B j8 U )X R@ X X &" Y * X ) V Y !mH X $ X & !mf X * j j8 `R Y ! ! ! 4 ! V ! V W :h ! 4 X )" X '# R 4 k >
0x3e96b4…3e9848 Dummy {f00=0x013b, f01=0x0190, f02=» ! j B ! ! ! B Y & ! W j 8!0T 8 !@P ! $ P ! ! ! T Y & T X & C & ^ X Y & Y > X " X &" Y )Q Y > X Z2<BR J ? Y ! T X ! Y & Zl k T _ ! X
0x3e9848…3e99dc Dummy {f00=0x013b, f01=0x0190, f02=»" X &" Y )U W ! ! ! Y 4 B j8 U )X R@ X X &" Y * X ) V Y !mH X $ X & !mf X * j j8 `R Y ! ! ! 4 ! V ! V W :h ! 4 X )" X '# R 4 k >
0x3e99dc…3e9b70 Dummy {f00=0x013b, f01=0x0190, f02=»7 R ( P H RN H P ' P m P W< m T6 x ' P !xJ & B # P G W G & ^ X P P R: Aw~ E@w Y X T Q (P H U ^ 9 1_N ^ X T @m P ( Am x8 _ ( Y _ m _x X T @m P ( Am x8_ ( Y _ m _
0x3e9b70…3e9d04 Dummy {f00=0x013b, f01=0x0190, f02=» U ^ C G 4' "?:B ] P H U _ U @ U 9C @ $$ T %_< %_B R @ U P 9C @ _ T M D W. D D " @ @ - U _ 9B @ T W X > "RT PL X TF X R@? V X & X H P & X
0x3e9d04…3e9e98 Dummy {f00=0x013b, f01=0x0190, f02=»_2 < U = (@ " $ P B >H<h zN P ?_" = > = > = =_D R _ 00 > & <h$ P > m _x X T @m P ( Am _ ( Y @zbP 4 Azb
0x3e9e98…3ea02c Dummy {f00=0x013b, f01=0x0190, f02=»P T W ' T| Izj @ 8 =hP Y X Pl 0T< Y Hzj! R W 9a Izj T T 9a Hzk Ez ^ W P ,! T T ( | : n "' # z @z`P zb $ ) 5 ^ Az` Az Azd z " ]p zf Azr "" P U W {
0x3ea02c…3ea1c0 Dummy {f00=0x013b, f01=0x0190, f02=» @ 0 Rb ' F "R G z @zh Dzj #D T G W, Az M "R Az Az ^ z }X ~ m _x X T @m P ( Am _ ( Y @zbP 4 Azb
0x3ea1c0…3ea354 (2, 508) Dummy {f00=0x013c, f01=0x0190, f02=»P T W ' T Izj @ 8 =hP Y X P 0T Y Hzj! R W 9a Izj T T 9a Hzk Ez ^ W P ,! T T ( : n "' # @z`P zb $ ) 5 ^ Az` Az Azd z " ]p zf Azr "" P U W {
0x3ea354…3ea4e8 Dummy {f00=0x013c, f01=0x0190, f02=» @ 0 Rb ' F "R G z @zh Dzj #D T G W, Az M "R Az Az ^ z > m _x X T @m P ( Am _ ( Y @zbP 4 Azb
0x3ea4e8…3ea67c Dummy {f00=0x013c, f01=0x0190, f02=»P T W ' T Izj @ 8 =hP Y X P 0T Y Hzj! R W 9a Izj T T 9a Hzk Ez ^ W P ,! T T ( : n "' # @z`P zb $ ) 5 ^ Az` Az Azd z " ]p zf Azr "" P }X {
0x3ea67c…3ea810 Dummy {f00=0x013c, f01=0x0190, f02=» @ 0 Rb ' F "R G z @zh Dzj #D T G W, Az M "R Az Az ^ z m _x X T @m P ( Am _ ( Y @zbP 4 Azb
0x3ea810…3ea9a4 Dummy {f00=0x013c, f01=0x0190, f02=» [ [ M M M A}T -(@ : - : @}T , L T M @}T : =a 9a Q - _ - > @ HPJ r Q WP | WR AWP Z" | @}T , - M M M @}T Az` Azb > ($SWAP A A A A. UU @ @ ! P$>B @ A
0x3ea9a4…3eab38 Dummy {f00=0x013c, f01=0x0190, f02=» P. _ " :c* A W " :d2 * A F & W F ` W F W F CRT F A @ @ ! P2 @ P ;b=H F CR V F VW =J F CRTT F PN A @ $ P( @ R W 8 !RRT W V P A Y W @ " T> W
0x3eab38…3eaccc Dummy {f00=0x013c, f01=0x0190, f02=» _ T <B :L A W A A W T F W V = V W Y* P Z( = :L < P W <9B @ V W Q W @ @ A @
0x3eaccc…3eae60 Dummy {f00=0x013c, f01=0x0190, f02=» z V @ PZ W @ @ ! T _ P :l 9b ) V _ @ V W W P TJ V 0 !;;P P V P$ _ P !;;T X$ W _J T W <
0x3eae60…3eaff4 (2, 509) Dummy {f00=0x013c, f01=0x0190, f02=» S A 9 A @ R @ ! T A A V @ R V V I W V $ ) H A I. : C. X C.9h! # " :A K : A T.I T P 1 I P < R P A _>
0x3eaff4…3eb188 Dummy {f00=0x013c, f01=0x0190, f02=» A A A A A ! T A A I ! : 9E @ r s A I T ) A _ I N T : 9PJ S Y T@ $ 1T: C !CCTt : 1P P$_ P =H P @ T X W n : YX d C !CCTZ B.
0x3eb188…3eb31c Dummy {f00=0x013c, f01=0x0190, f02=»W$ V P P W P V V T V T W P V W @ $ P p W T : A _ 0V , - P X 9A_ : @ ! P (W ( : & f 0123456789 & 01
0x3eb31c…3eb4b0 Dummy {f00=0x013c, f01=0x0190, f02=»"#$%&/() @ABCDEFGHIJKLMNOPQRSTUVWXYZ []* < +.-, 0 23456789 `ABCDEFGHIJKLMNOPQRSTUVWXYZ []' W> 2 W 0 . " 9 2 ; Z [ : : [ [ : P
0x3eb4b0…3eb644 Dummy {f00=0x013c, f01=0x0190, f02=» A. c @ V W U R $ )_ : W W W W W tQ@ V V v x W V V v p R( W V W ^< _@ V _P V V : V J P ` r tV U ` _
0x3eb644…3eb7d8 Dummy {f00=0x013c, f01=0x0190, f02=» V W V ) : V <B W |P v v : $ V |P v w v : V $ V l $ V M : W V R RR > R W > <B V x V |P v 1 v W V z ` _f V : W R R
0x3eb7d8…3eb96c Dummy {f00=0x013c, f01=0x0190, f02=» P T E _J E _T " D T E E D E % : " R ;B " R P( |P v v : V W 0 : V P 9a _ " ( ) 8 ( ) : " $ V P 9A _ 0 : W W W ?AP ^ 0 : W ; V :
0x3eb96c…3ebb00 Dummy {f00=0x013c, f01=0x0190, f02=» 0 R P P B _ ^ : V ) v : 4P: " D , H H $ M v b - I Y0 : @ ` V b pP ` $ $ W $ H 2 ) P _ " = D 4 Q _d 2 z $ = G $
0x3ebb00…3ebc94 (2, 510) Dummy {f00=0x013c, f01=0x0190, f02=» @ P P P P|_ _ @ 9N @ :b @ :b V W U6 T 9BW P P( P V W U " @ Q @ P A. @ P _b A 9n A :B A @ .V 3 S
0x3ebc94…3ebe28 Dummy {f00=0x013c, f01=0x0190, f02=» ( : A ^ > l : R W n V pT : N V l W H V ]" . nT" W v W n V ~P W x _v V d , V P _ N L % V d V f v G G v U v
0x3ebe28…3ebfbc Dummy {f00=0x013c, f01=0x0190, f02=»! P % _ V V W W r W V v ) W b G v ) - V W f v ) G v ` " W p W ~ pP0 l R P x _ W ~ R X4 x _ ` @ ` W W ~ pPn z V W
0x3ebfbc…3ec150 Dummy {f00=0x013c, f01=0x0190, f02=» W x _ V P I z W z ` pPl H - V I f " R E R T E D E @ v H v E $ #_v W | ;b W W t V b v ( v W p V ` $ W ` $ ;h 0 :C # : .
0x3ec150…3ec2e4 Dummy {f00=0x013c, f01=0x0190, f02=» | CRP W ` ` H W d 2 ;A @ tR - @ - N !TTP N :H N TBT W W8 2 " T @ N =H N @ ) : !TTXX !CCT > !UUT d Wh x 2 .:H N P V
0x3ec2e4…3ec478 Dummy {f00=0x013c, f01=0x0190, f02=» W : W @ W D V W W ` " W p @ pP. " 4X 1 R Z0 _ W l a w ` :A W V d 4 W P _ W ` W d V V W W V V >k 8 W
0x3ec478…3ec60c Dummy {f00=0x013c, f01=0x0190, f02=» , P@ , - 4 ] 4 tY 5 X * _6 : @ ] @ P @ P " P " P " P W W . !TTP @ T Y : !TTX" A 9 A : @ @ P. @ " P #D " P #E " P #F
0x3ec60c…3ec7a0 Dummy {f00=0x013c, f01=0x0190, f02=» : @ :B W . !TTP W t N =H N W l N =H N W p N =H N W | ( @ % P W @ % P P0 r " U _2 P0 " U _2
0x3ec7a0…3ec934 (2, 511) Dummy {f00=0x013c, f01=0x0190, f02=»% P : !TTT @ @ @ T : @ ! P @ @ f CRT 3 @ f f S @ f PP f !RRP @ ! T 3 @ & P f 3 f 3 YL @ @ T :
0x3ec934…3ecac8 Dummy {f00=0x013c, f01=0x0190, f02=» S _ : . !TTP V W t * P r _ Ph W p W V 8 8 4 D P$ @ # P H I K T + Y@ V p _j V t Y : !TTX @ @ T
0x3ecac8…3ecc5c Dummy {f00=0x013c, f01=0x0190, f02=» W W t PT W f ( W d < G =h G V d V r < V f P W f _B V W V t Yr : !TTX @ @ T : : !TTX !CCTr P, V r 4 U $ $ _. P,
0x3ecc5c…3ecdf0 Dummy {f00=0x013c, f01=0x0190, f02=» W P0 W f W d V d V r < V f _2 U^ V 8 8 8 4 D P$ @ # P H I K T + Y@ _`R& @ @ @ % P V 4 4 4 _r @ @ T : W
0x3ecdf0…3ecf84 Dummy {f00=0x013c, f01=0x0190, f02=» D ) $ P@ D L T@ D &P V U 0 I , I . $# P V -W H P U & I @ % PD H I H T P( H U V U W < + + P V : V $ F !LLT # W ;I # ;b W ;a WR# T
0x3ecf84…3ed118 Dummy {f00=0x013c, f01=0x0190, f02=» z *T P _ / P *_ *T P$ _ .P _ / V z U Y$ P W | V z 3 % W P _ V |P V v ]^dW v P _ @ @ T : N =H N : N =H N : &=H F :
0x3ed118…3ed2ac Dummy {f00=0x013c, f01=0x0190, f02=»_ : @ ! P (W ( : j $ @ f CRT" @ ! P ` @ E "W ` @ E " ! 1 x 0 < 1 < 2 < P p @ 4 P f 0 * 4 : @ F L f a `(
0x3ed2ac…3ed440 Dummy {f00=0x013c, f01=0x0190, f02=» _ KB D *_ x 8i DY @ T P @ _ KB : & p
0x3ed440…3ed5d4 (2, 512) Dummy {f00=0x013d, f01=0x0190, f02=» 8i DY P _ KB f 2i DI Z ?O_o
0x3ed5d4…3ed768 Dummy {f00=0x013d, f01=0x0190, f02=» _ KB D *_ 8i DY @ T P @ _ KB : &
0x3ed768…3ed8fc Dummy {f00=0x013d, f01=0x0190, f02=»6805=0 SALCUZ * P CF A15,CKMESS CHECK IF STATUS CHANGE P RTN A5 D P XIF SALCUZ T P IFT P6805=1 SALCUZ j P ANK A1,/21 SALCUZ P RF(Z) SST200 LSALCUZ 6 P CF A15,SETIME LINE ERROR, WAIT 0.2 SECONDS SALCUZ P DATA BRM REST
0x3ed8fc…3eda90 Dummy {f00=0x013d, f01=0x0190, f02=»CUZ | P LDR A1,A1 SET CR SALCUZ P ABR* A5 RETURN SALCUZ , P XIF SALCUZ J P* ` P* j P* HALT INPUT t P* P* PHALTIN LDK A1,0 SALCUZ P CIO A1,0,LCUIN P IFT P6805=0 SALCUZ 4 P RB SST PERFORM SST INST
0x3eda90…3edc24 Dummy {f00=0x013d, f01=0x0190, f02=»ALCUZ P EJECT P* P* & , P* WRITE FROM OR READ ONE CHARACTER TO A2 0 P* ` P* j PWRITE EQU * t P IFT CODE=1 P ANK A2,/FF P CWK A2,/FF 0 P RF(E) WRIT05 NO TRANSLATION OF TRAILING PAD * P LC A2,TEBCDIC,A
0x3edc24…3eddb8 Dummy {f00=0x013d, f01=0x0190, f02=»GHPUT ERROR P IFF CODE=1 $ PWRIT10 XRR A7,A2 ACCUMULATE BCC ( P XIF P P IFT CODE=1 & PWRIT10 CF A5,CRCCAL CALCULATE CRC p P XIF P IFF LOGG=0 & P CF A5,LOGOUT LOG OUTPUT CHARACTER P XIF P* PREAD CF A15,ST
0x3eddb8…3edf4c Dummy {f00=0x013d, f01=0x018e, f02=» P IFT CODE+P6805=0 SALCUZ PWRITEP ANK A2,/FF * P ECR A1,A2 D P ORK A2,/80 V PWRI100 SLL A1,1 j P RB(P) WRI100 P RB(Z) WRITE WRITE P XRK A2,/80 P RB WRI100 P XIF P IFF CODE+P6805=0 SALCUZ PWR
0x3edf4c…3ee0e0 Dummy {f00=0x013d, f01=0x018e, f02=» d P* P* PREADP CF A5,READ P IFT CODE+P6805=0 SALCUZ 4 P ECR A1,A2 V PRE100 SLL A1,1 h P RF(Z) RE110 ~ P RB(NN) RE100 P XRK A2,/80 P RB RE100 PRE110 LDR A1,A2 P ANK A2,/7F P XIF P I
0x3ee0e0…3ee274 (2, 513) Opaque[0x194]
0x3ee274…3ee408 # DirEnt {nam=»GLDC15«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x27a8, f03=0x0000}
0x3ee274…3ee408 IdxSect {
0x3ee274…3ee408 f00 = 0x013d // 0x3ee274 @0x0
0x3ee274…3ee408 f01 = 0x002a // 0x3ee276 @0x2
0x3ee274…3ee408 gno = [ // 0x3ee278 @0x4
0x3ee274…3ee408 [0x00]: C0x013d.0x1.0
0x3ee274…3ee408 [0x01]: C0x013d.0x2.0
0x3ee274…3ee408 [0x02]: C0x013d.0x3.0
0x3ee274…3ee408 [0x03]: C0x013e.0x0.0
0x3ee274…3ee408 [0x04]: C0x013e.0x1.0
0x3ee274…3ee408 [0x05]: C0x013e.0x2.0
0x3ee274…3ee408 [0x06]: C0x013e.0x3.0
0x3ee274…3ee408 [0x07]: C0x013f.0x0.0
0x3ee274…3ee408 [0x08]: C0x013f.0x1.0
0x3ee274…3ee408 [0x09]: C0x013f.0x2.0
0x3ee274…3ee408 [0x0a]: C0x013f.0x3.0
0x3ee274…3ee408 [0x0b]: C0x0140.0x0.0
0x3ee274…3ee408 [0x0c]: C0x0140.0x1.0
0x3ee274…3ee408 [0x0d]: C0x0140.0x2.0
0x3ee274…3ee408 [0x0e]: C0x0140.0x3.0
0x3ee274…3ee408 [0x0f]: C0x0141.0x0.0
0x3ee274…3ee408 [0x10]: C0x0141.0x1.0
0x3ee274…3ee408 [0x11]: C0x0141.0x2.0
0x3ee274…3ee408 [0x12]: C0x0141.0x3.0
0x3ee274…3ee408 [0x13]: C0x0142.0x0.0
0x3ee274…3ee408 [0x14]: C0x0142.0x1.0
0x3ee274…3ee408 ]
0x3ee274…3ee408 }
0x3ee408…3ee59c Dummy {f00=0x013d, f01=0x0190, f02=» 2 P IDENT DRDC15 9.2DK 3 80-01-03 870105040920 P : P DK3, RBUFNR = 1 ALLOWED B P DK2, TBUFL d P 80-03-11 z 0 P DK, COND.ASM., TIMPRO, TIMNAK, READ BUF. P 80-03-11 P REL 9.1 79-08-16 P =8, ASCII-MODE FOR
0x3ee59c…3ee730 Dummy {f00=0x013d, f01=0x018e, f02=»RESS DESTROYED x P REL 9.1 79-05-23 $ P =5, INCOMPLETE POLL SEQUENCE 2 P REL 9.1 79-05-23 Z P =3, TRANSFER PARAMETER v P PRR 9.1 79-04-06 P =4, ANY MESSAGE ORDER P PRR 9.1 79-04-06 P =2, ABORT HANDLING
0x3ee730…3ee8c4 Dummy {f00=0x013d, f01=0x0190, f02=» P* 2 P********************************************* P* D $ P* PHILIPS TERMINAL SYSTEM PTS N P* v * P* DRDC15: DRIVER DATA COMMUNICATION . P* BSC MULTIPOINT LINE PROCEDURE P* OR SIEMENS MSV1 P*
0x3ee8c4…3eea58 Dummy {f00=0x013d, f01=0x0190, f02=»* ENTRY POINTS P* 2 P ENTRY DC15AD ADDRESS BLOCK TERMINAL REQUESTS " P ENTRY IH1501 INPUT INTERRUPT V " P ENTRY IH1502 OUTPUT INTERRUPT | " P ENTRY DC15ON POWER ON ROUTINE " P ENTRY DW1500 DWT FOR DC TASK P* P* P* EXTE
0x3eea58…3eebec Dummy {f00=0x013d, f01=0x018e, f02=»DIO COMPLETE I/O EVENT P EXTRN DISIOE REQUEST ERROR P EXTRN SETIME SET TIMER B P EXTRN DWTST DWT STATUS b P EXTRN DWTOR DWT ORDER P EXTRN DWTECB DWT ECB * P EXTRN INTSAV SAVE AREA LAST INTERRUPT ( P EXTRN TEBCDIC ASCII TO EBCD
0x3eebec…3eed80 Dummy {f00=0x013d, f01=0x0190, f02=» l & P EXTRN ECBEL ECB EFFECTIVE LENGTH P EXTRN ECBRC ECB RETURN CODE 2 " P EXTRN ECBCW ECB CONTROL WORD V * P EXTRN DC:MIN MOVE DATA TO USER BUFFER | , P EXTRN DC:MOT MOVE DATA FROM USER BUFFER 0 P EXTRN DISEND COMPLETE REQUEST AND DISPATCH
0x3eed80…3eef14 (2, 514) Dummy {f00=0x013d, f01=0x018e, f02=» P* P* DWT CONTENTS P* ( J P* DWTCHP TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15) 2 P* P < P******************************************************* P* * P* PARAMETERS FOR CONDITIONAL ASSEMBLY
0x3eef14…3ef0a8 Dummy {f00=0x013d, f01=0x0190, f02=» p & PX:A EQU 2000 RECEIVE BUFFER LENGTH PRBUFL EQU 650+X:X DK 2 PX:B EQU /60 DCTASK FILE CODE P PDC15FC EQU /60 t $ PX:C EQU 1 IF 1 INTERRUPT LOGGING PLOGG EQU 0 P* * PTIMPOL EQU 600 POLL TIMEOUT VALUE DK * PX:E EQU 1 ST
0x3ef0a8…3ef23c Dummy {f00=0x013d, f01=0x0190, f02=»LOCK LENGTH z PTBLEN EQU 2300 ( PX:H EQU 1 CODE , 0=ASCII , 1=EBCDIC * PCODE EQU 0 V * PX:I EQU 0 IF 1 SPECIFIC POLL HANDLING h PSPECP EQU 0 , PX:J EQU 1 IF = 1 LINE SPEED SET TO HIGH ( P IF = 0 LINE SPEED IS SET TO LOW PSP
0x3ef23c…3ef3d0 Dummy {f00=0x013d, f01=0x018e, f02=»NR EQU 2 . PX:M EQU 0 IF = 1 PTS 6805 ADAPTION SALCUZ PP6805 EQU 00 B PX:N EQU /02 V P IFT P6805=0 j , PLCUIN EQU 02 DEVICE ADDRESS OF RECEIVER ~ P XIF P IFT P6805=1 , PLCUIN EQU /0A DEVICE ADDRESS OF RECEIVER P XIF
0x3ef3d0…3ef564 Dummy {f00=0x013d, f01=0x0190, f02=» 4 PX:Q EQU 0 IBM-3270 EMULATION PACKAGE, IF NOT = 0 PEM3270 EQU 1 < PX:R EQU 1000 P P DK2 d * PBINTRM EQU 0 IF 1 BINARY TRANSMISSION t , PTSTREQ EQU 0 IF 1 TEST REQUEST HANDLING , PDMRK EQU 1 SPECIAL CONDITION FOR DENMARK 4 PNOWACK
0x3ef564…3ef6f8 Dummy {f00=0x013d, f01=0x0190, f02=»TO "ONE". n , P ONLY WORKING IF STAT IS SET TO "ONE". P IFT P6805=0 SALCUZ B < PLCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMITTER SALCUZ ^ P XIF SALCUZ P IFT P6805=1 < PLCUUT EQU LCUIN+/01 DEVICE ADDRESS OF TRANSMITTER SALCUZ P
0x3ef6f8…3ef88c Dummy {f00=0x013d, f01=0x0190, f02=»ASSEMBLY P* . P***************************************** P* L . P* A PROGRAM VERSION USING TOSS MMU PAGING V * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG EQU 1 P* P DB P IFT MMUPAG=0 DK2 PTB
0x3ef88c…3efa20 Dummy {f00=0x013d, f01=0x018e, f02=» P DE P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. V P* PCPU852 EQU 0 P* 2 PDEVIND EQU -2 DEVICE INDEX DATA COMMUNICATION * PBUFLEN EQU TBUFL+TBUFL MMU BUFFER
0x3efa20…3efbb4 (2, 515) Dummy {f00=0x013d, f01=0x0190, f02=» P IFT MMUPAG=0 PSTART EQU DWTDRD P XIF 6 P* B P IFT MMUPAG=1 L PSTART EQU DWTDRD+4 b P XIF | P* 4 PDWTTP EQU START+/00 TIMER POINTER ORDER PROCESS . PDWTWQ EQU START+/02 WRITE/GET BUFFER QUEUE $ PDWTSQ EQU ST
0x3efbb4…3efd48 Dummy {f00=0x013d, f01=0x0190, f02=»+/0A CURSOR ADDRESS , PDWTTIM EQU START+/0C REQUEST TIMER VALUE P* L P V P* ` P* REQUEST HANDLING j P* P* P* P* A7=ORDER P* P* /02: READ P* /06: WRITE P* /37: TRANSFER PARAMETERS P
0x3efd48…3efedc Dummy {f00=0x013d, f01=0x0190, f02=» & PDCONOF DATA 0 ON- / OFFLINESWITCH * PDCSTOL DATA 0 OLD DC EQUIPMENT STATUS . PDCSTCU DATA 0 CURRENT STATUS $ PDCWRQ DATA 0 WRITE REQUEST QUEUE , PDCTPGP DATA 0 TIMER POINTER GENERAL POLL P P* P* DC TASK ADDRESS BLOCK
0x3efedc…3f0070 Dummy {f00=0x013d, f01=0x0190, f02=»ATA ABORT ABORT ROUTINE ADDRESS $ P DATA DCRBUF REC. BUFFER ANCHOR ( P* P P* DRIVER ADDRESS BLOCK Z P* x P DATA BUFLEN MMU BUFFER SIZE P DATA DEVIND DEVICE INDEX ( PDC15AD DATA DCACT ACTIVATION ADDRESS 4 P DATA ABORT ABORT RO
0x3f0070…3f0204 Dummy {f00=0x013d, f01=0x0190, f02=»B RES 1 " P RES 1 AND FOR TRANSFER PARAM PSTB2 RES 1 6 P H P IFT SPEED=1 P PLSPEED EQU /0200 d P XIF | P IFT SPEED=0 PLSPEED EQU 0 P XIF P P* P* $ P* ACTIVATION FROM TERMINAL TASKS P*
0x3f0204…3f0398 Dummy {f00=0x013d, f01=0x0190, f02=»DER =4 t P XIF P SUK A7,/02 P RF(Z) DCRD READ SPECIFIC . P SUK A7,/06-/02 P P RF(Z) DCWR h P SUK A7,/37-/06 | $ P RF(Z) DCTP TRANSFER PARAMETERS P IFF STAT=0 P SUK A7,/38-/37 P RF(Z) DCSS SET STATUS P S
0x3f0398…3f052c Dummy {f00=0x013d, f01=0x0190, f02=»TIM SET REQUEST TIMER P XIF P RF DCA100 * P < P* F P* P P* ACTIVATION FROM DCTASK Z P* z P* PDCACTD EQU * $ P SUR A1,A1 PRESET RETURN CODE =4 P IFT EM3270=1 =4 P LDR A7,A7 =4 & P RF(Z) ANYMSG
0x3f052c…3f06c0 Dummy {f00=0x013d, f01=0x0190, f02=»ETERS v P PDCA100 EQU * REQUEST ERROR P ABL DISIOE INVALID ORDER 8 P* Z P* d P* READ FROM DCTASK n P* P* P* REQUEST FROM DC-TASK P* COMPLETE WHEN: & P* STATUS CHANGE ON DC EQUIPMENT $ P* SPONTANO
0x3f06c0…3f0854 (2, 516) Dummy {f00=0x013e, f01=0x0190, f02=» GO TO DISPATCHER P IFT EM3270=1 =4 P 4 . P***************************************** > P* p P* ANY MESSAGE ORDER z P* " P***************************** P 2 PANYMSG LD A4,DWTRQ,A6 ANY QUEUED MESSAGE ?? =4 P R
0x3f0854…3f09e8 Dummy {f00=0x013e, f01=0x0190, f02=» z P* P* > P* REQUEST FROM DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS : P* FROM TERMINALS: TRANSFER TERMINAL ADDRESSES ^ P* P* P IFF CODE=1 & PDCTP LD A2,ECBCW,A8 GET PARAMETER P XIF P IFT CODE=1
0x3f09e8…3f0b7c Dummy {f00=0x013e, f01=0x0190, f02=»LL A2,8 PDCTP10 EQU * $ P LC A3,ECBCW+1,A8 GET TCP OR DV $ P ANK A3,/FF L ( P LC A2,TASCII,A3 TRANSLATE TO ASCII ` P XIF ( P STR A2,A6 SAVE IN FIRST WORD OF DWT P P IFT RCOM=1 * P LD A3,ECBBA,A8 DEVICE BUFFER ADDRESS
0x3f0b7c…3f0d10 Dummy {f00=0x013e, f01=0x0190, f02=»??? v 2 P RF(E) DCTP30 YES!!! SHOULD NOT BE IN DC:TAB * P LD A1,DC:IN GET DC:TAB INPUT POINTER B * P CWK A1,DC:END TABLE ALREADY FULL ???? p & P ABL(E) DISIOE YES!! REQUEST ERROR P P P PDCTP20 EQU * " P LD A4,DCTAB DC:TA
0x3f0d10…3f0ea4 Dummy {f00=0x013e, f01=0x018e, f02=»ED?? =3 r * P RF(E) DCTP25 YES.DWT NOT IN TABLE =3 P CWR* A6,A4 IN TABLE ?? =3 > P RF(E) DCTP30 YES!! =3 ` " P RB DCTP22 CHECK NEXT ENTRY =3 ~ PDCTP25 EQU * =3 P $ P STR A6,A1 INSERT DWT IN DC:TAB P LDK A1,2 * P ADS A1,DC
0x3f0ea4…3f1038 Dummy {f00=0x013e, f01=0x0190, f02=» P ORS A1,DWTST,A6 ( P CF A15,INSSQ INSERT IN STATUS QUEUE P XIF H PDCTP30 EQU * T P SUR A1,A1 RETURN CODE ::= 0 h PENDIO EQU * $ P CF A15,TENDIO COMPLETE REQUEST P RB DCRTN P P* P* P* WRITE P
0x3f1038…3f11cc Dummy {f00=0x013e, f01=0x0190, f02=» IFT MMUPAG=1 $ P LD A1,ECBRL,A8 REQUESTED LENGTH " P CWK A1,BUFLEN ILLEGAL LENGTH? > P RF(G) IL:LEN YES!! d P XIF P CF A15,TIMEWR SET TIMER P CF A15,INSWQ QUEUE REQUEST P RB DCRTN P* P* P* P* READ
0x3f11cc…3f1360 Dummy {f00=0x013e, f01=0x0190, f02=» LD A8,DWTECB,A6 GET ECB . P LD A4,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE " P RF(Z) DCRD10 NOTHING IN QUEUE R P x P P ( P LDR* A2,A4 TAKE THE FIRST IN QUEUE P ST A2,DWTRQ,A6 P ADK A4,6 " P LD A3,-4,A4 EFFECTIVE LENGTH
0x3f1360…3f14f4 (2, 517) Dummy {f00=0x013e, f01=0x0190, f02=» $ PDCRD10 CF A15,TIMERE START TIMER P RB DCRTN 0 P B P* L P* V P* SET STATUS ` P* t P* ~ P IFF STAT=0 PDCSS EQU * * P LD A1,ECBCW,A8 GET STATUS INFORMATION P ANK A1,3 MASK DB,IR P RF(Z) DCSS20 DE
0x3f14f4…3f1688 Dummy {f00=0x013e, f01=0x0190, f02=» P ANK A1,9 ( P RB(Z) DCSS10 WACK HAS NOT BEEN SENT PDCSS30 EQU * B , P CF A15,INSSQ INSERT DWT IN STATUS QUEUE V P LDK A1,4 SET DE P RB DCSS10 P XIF P P P* " P* SET REQUEST TIMEOUT VALUE P* P
0x3f1688…3f181c Dummy {f00=0x013e, f01=0x0190, f02=»DISPATCH | P P* ( P* ILLEGAL APPLICATION BUFFER SIZE " P* N P X 8 PIL:LEN LDKL A1,/8008 REQUEST ERROR + ILLEGAL LENGTH ` P ABL DISEND COMPLETE REQUEST P P* P* P* P* TIMER HANDLING PART P*
0x3f181c…3f19b0 Dummy {f00=0x013e, f01=0x0190, f02=»EOUT VALUE p P RF(Z) TIME10 NO TIMING ! P ST A2,TIMERR ! 2 P CF A15,SETIME ! H P DATA TOUTRE ! ^ PTIMERR DATA 0 ! r ( P ST A4,DWTTP,A6 STORE TIMER POINTER ! PTIME10 EQU * ! P RF GBUF10 RETURN ! P* ! P* TIMEOUT READ TIMER ! P
0x3f19b0…3f1b44 Dummy {f00=0x013e, f01=0x0190, f02=»TOUTR2 RB ENDIO COMPLETE REQUEST ! P* " ( P* WRITE TIMER=TIMWR " 2 P* " N PTIMEWR LDR A1,A6 " X . P LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE " p P RB(Z) TIME10 NO TIMING " P ST A2,TIMWR " P CF A15,SETIME " P DATA TOUTWR " PTIMWR DA
0x3f1b44…3f1cd8 Dummy {f00=0x013e, f01=0x0190, f02=»DR A6,A1 FETCH DWT " P CM DWTTP,A6 # * P CF A15,REMOVW REMOVE FROM WRITE QUEUE # . P* # & P* THIS INSTRUCTION DOES NOT BELONG # f P* TO THE STANDARD INTERFACE # P LD A2,FDWTUT # P CWR A2,A6 # * P RB(NE) TOUTR1 THIS DWT IS NOT WRITING # (
0x3f1cd8…3f1e6c Dummy {f00=0x013e, f01=0x0190, f02=»OP REQUEST TIMING # P* $ & P* REMAINING TIME IS RETURNED IN A2 $ $ P* $ N P* $ X PCTIME EQU * $ b & P LD A2,DWTTP,A6 GET TIMER POINTER $ v P RF(Z) CTIM10 NOT RUNNING $ P LDR* A2,A2 $ " P NGR A2,A2 GET REMAINING TIME $ P CM* DWTTP,A
0x3f1e6c…3f2000 Dummy {f00=0x013e, f01=0x018e, f02=»* CALLING SEQUENCE: CF A15,GRBUF $ P* A4=0 IF NO BUFFER IS FREE % ( & P* ELSE A4 CONTAINS BUFFER ADDRESS % L P* A2 AND A3 ARE DESTROYED % v P* % P* % ( PGRBUF LDKL A2,DCRBUF RECEIVE BUFFERS % PGBUF INH % P LDR* A4,A2 % P RF(Z) GBUF1
0x3f2000…3f2194 (2, 518) Dummy {f00=0x013e, f01=0x0190, f02=» P ABR* A15 RETURN TO CALLER & P & & P* & 0 P* & : ( P* INSERT DWT IN WRITE REQUEST QUEUE & D P* & p P* A2,A3,A4 DESTROYED & z P* A6=DWT & P* & ( PINSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR & PINSWQ1 LDK A4,DWTWQ & PINSWQ2 LDR* A3,A
0x3f2194…3f2328 Dummy {f00=0x013e, f01=0x0190, f02=» & v " P CMR A4 INDICATE END OF QUEUE ' P RB GBUF10 RETURN ' . P* ' H P* ' R * P* REMOVE DWT FROM WRITE REQUEST QUEUE ' P* ' P* A2,A3,A4 DESTROYED ' P* A6=DWT ' P* ' * PREMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR ' 2 PREM05 LDK A4,DWT
0x3f2328…3f24bc Dummy {f00=0x013e, f01=0x018e, f02=» ' n P CWR A3,A4 ( P RF(E) REM15 ( P LDR A2,A3 GET NEXT ( . P RB REM10 ( J PREM15 LDR* A3,A4 REMOVE ( P STR A3,A2 ( | P RB GBUF10 RETURN ( P ( P* ( P* ( P* INSERT DWT IN STATUS QUEUE ( P* ( P IFF STAT=0 ( P
0x3f24bc…3f2650 Dummy {f00=0x013e, f01=0x018e, f02=» P* ) P* ) " P* REMOVE DWT FROM STATUS QUEUE ) P* ) > P* A2,A3,A4 DESTROYED ) H P* A6=DWT ) d P* ) t * PREMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR ) ~ P LDK A4,DWTSQ ) P RB REM06 ) P XIF ) P ) P* ) P* ) $ P* QUEUE AL
0x3f2650…3f27e4 Dummy {f00=0x013e, f01=0x0190, f02=» ) ( P LDKL A2,DW1500 QUEUE ON DC-TASK DWT * P XIF * 4 P IFT MESPAS=0 * @ $ P LDR A2,A6 QUEUE ON TERMINAL DWT * V P XIF * ~ , P ADK A2,DWTRQ BEGINNING OF RECEIVE QUEUE * PQR100 EQU * * P LDR* A3,A2 * $ P RF(Z) QR200 END OF QUEUE FOUND *
0x3f27e4…3f2978 Dummy {f00=0x013e, 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,DW1500 + P LD A1,DWTST,A6 + P RF(N) CKM110 NO REQUEST + P LDK A1,2 READ REQUE
0x3f2978…3f2b0c Dummy {f00=0x013e, f01=0x0190, f02=»EUE + n " P RF(Z) CKM200 NO READ IN QUEUE , P , 2 P , : , P LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER , B . P ST A2,DWTRQ,A6 STORE THIS ADDR INTO QUEUE , r " P ADK A3,6 MOVE POINTER TO TEXT , & P DONT DESTROY BUFFER ADDRESS =6 , P LD A4,-4,A3 , 0 P
0x3f2b0c…3f2ca0 Dummy {f00=0x013e, f01=0x0190, f02=»1,0 RESET RETURN CODE , & P LDR A4,A3 RECEIVE BUFFER ADDRESS - , P CF A15,DC:MIN MOVE DATA TO USER BUFFER - H * PCKM110 ADKL A15,4 ADJUST STACK POINTER - x P ABR* A15 RETURN - 8 PCKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHECK STATUS - , P OR A1,DCONOF
0x3f2ca0…3f2e34 (2, 519) Dummy {f00=0x013e, f01=0x0190, f02=»NDICATE STATUS CHANGE - 0 P CF A15,TENDIO COMPLETE READ GENERAL REQUEST . P RB CKM110 . R P . d P . n @ P************************************************************ . v P* . P* ABORT ROUTINE . P* . P************************ . P
0x3f2e34…3f2fc8 Dummy {f00=0x013e, f01=0x0190, f02=» P / $ PAB:10 LD A1,DWTOR,A6 ORDER CODE / P SUK A1,2 / 4 * P RF(Z) AB:RTN READ REQUEST. NO ACTION / F P SUK A1,4 / t . P RF(NZ) AB:RTN NO ACTION IF NOT READ/WRITE / P / . P CF A15,REMOVW REMOVE DWT FROM WRITE QUEUE / & P LD A2,FDWTUT WRITING
0x3f2fc8…3f315c Dummy {f00=0x013e, f01=0x0190, f02=»WT / v P 0 PAB:RTN EQU * 0 P IFT CPU852=1 0 & P ADKL A15,4 0 < $ P ABR* A15 RETURN IN INHIBIT MODE 0 P P XIF 0 x P IFF CPU852=1 0 P RTN A15 0 P XIF 0 P 0 P 0 P 0 P* 0 P* 0 P* STORE REGISTER A3-A8 0 $ P* CA
0x3f315c…3f32f0 Dummy {f00=0x013e, f01=0x018e, f02=»LCA3 0 P ST A4,LCA4 1 P ST A5,LCA5 1 P ST A6,LCA6 1 4 P ST A7,LCA7 1 H P ST A8,LCA8 1 P RF RTNA15 RETURN 1 p P 1 PLDREG LDKL A3,0 1 PLCA3 EQU *-2 1 P LDKL A4,0 1 PLCA4 EQU *-2 1 P LDKL A5,0 1 PLCA5 EQU *-2 1
0x3f32f0…3f3484 Dummy {f00=0x013e, f01=0x0190, f02=» P ADKL A15,4 2 P ABR* A15 2 P 2 * P* 2 4 P* 2 > P* TIMER VALUES 2 H P* 2 ^ P* 2 h * PTIMPRO EQU 90 PROCEDURE TIMER 9 SEC DK 2 r " PTIMNAK EQU 3 DELAY FOR NAK DK 2 P* 2 P* 2 P* CHARACTER EQUATES 2 P* 2 & PSF EQU X
0x3f3484…3f3618 Dummy {f00=0x013e, f01=0x0190, f02=»H EQU /01 2 PENQ EQU /05 3 PDLE EQU /10 3 & PEOT EQU /04 3 : PNAK EQU /15 3 N PESC EQU /1B 3 b PSBA EQU /11 3 v PGP EQU /22 3 PRDBCOM EQU /32 3 PRDMCOM EQU /36 3 P IFT CODE=0 3 PPAR EQU /80 3 PRVI EQU /3C 3 PACK0
0x3f3618…3f37ac Dummy {f00=0x013e, f01=0x0190, f02=»1=1 3 0 PWACK EQU /BF =WABT - SIEMENS MSV1 PROCEDURE 4 P XIF 4 @ P IFT CODE=1 4 L PPAR EQU /00 4 ` PWACK EQU /2C 4 t PRVI EQU XRVI DK 4 PACK0 EQU /18 4 PACK1 EQU /2F 4 PSYNEBC EQU /32 4 P XIF 4 P 4 P* 4 P* 4 P
0x3f37ac…3f3940 Dummy {f00=0x013e, f01=0x0190, f02=»N 4 h PXACK DATA 0 ACK EXPECTED 5 PXSEL DATA 0 SELECTED 5 * PXETX DATA 0 ETX SENT 5 F 2 PXSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT 5 b " PXRB DATA 0 READ BUFFER SWITCH 5 PCACK DATA 0 ACK COUNTER 5 * PSYNSW DATA 0 0=SKIP SYNS, 1=DON'T SKIP 5
0x3f3940…3f3ad4 (2, 520) Dummy {f00=0x013f, f01=0x0190, f02=»ATA 0 BUFFER INDEX 5 0 PFBLST DATA 0 START OF LAST TRANSMITTED BLOCK 6 $ PDCSTQ DATA 0 STATUS QUEUE ANCHOR 6 N . PDCTPP DATA 0 POINTER FOR PROCEDURE TIMING 6 v , PRESEND DATA 0 CONTROL SEQUENCE SAVE AREA 6 ( PCRDBUF DATA 0 READ BUFFER COUNTER DK 6 P* 6
0x3f3ad4…3f3c68 Dummy {f00=0x013f, f01=0x0190, f02=»E 6 h P* 7 P* 7 P DATA /4248 7 P DATA /4242 7 2 P* 7 F 2 PNOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED 7 P , PIR EQU /26 S/S 1 : INTERVENTION REQUIRED 7 P XIF 7 P 7 P* 7 P* 7 P* BASIC RECEIVE MODE 7 P* 7 " P*
0x3f3c68…3f3dfc Dummy {f00=0x013f, f01=0x0190, f02=»A5,HALTIN HALT RECEIVER SALCUZ 7 P XIF SALCUZ 8 & PBRM EQU * 8 < P LDKL A5,STB LOAD STACKBASE 8 N P IFT P6805=0 SALCUZ 8 r 2 P CF A5,HALTIN HALT RECEIVER AND UPDATE STATUS 8 P XIF SALCUZ 8 P IFT P6805=1 SALCUZ 8 0 P CF A15,CKMESS CHE
0x3f3dfc…3f3f90 Dummy {f00=0x013f, f01=0x0190, f02=»PECIFY SYN PATTERN 8 v P XIF SALCUZ 9 P IFT P6805=0 SALCUZ 9 0 P IFT CODE=1 9 L 4 P LDKL A2,/100+LSPEED+SYNEBC SPECIFY SYN PATTERN 9 ` P XIF SALCUZ 9 P IFT P6805=0 SALCUZ 9 " P CIO A2,1,LCUIN START RECEIVER 9 P XIF SALCUZ 9 P I
0x3f3f90…3f4124 Dummy {f00=0x013f, f01=0x0190, f02=»SYN SALCUZ 9 2 P OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ : P RB(NA) BRMHLT SALCUZ : J P XIF SALCUZ : h P IFT CODE+P6805=2 SALCUZ : ~ P LDK A2,0 SALCUZ : * P CIO A2,1,LCUIN START RECEIVER SALCUZ : P LDK A2,SYNEBC SALCUZ : 2 P O
0x3f4124…3f42b8 Dummy {f00=0x013f, f01=0x0190, f02=» READ ONE CHARACTER : P RF(NZ) BRM150 PARITY ERROR ; P LDR A1,A2 ; @ P SUK A1,STX ; R P RF(Z) BRM300 STX RECEIVED ; f P SUK A1,EOT-STX ; P RF(Z) BRM200 EOT RECEIVED ; P SUK A1,ENQ-EOT ; P ABL(Z) BRM400 ENQ RECEIVED ; P SUK A1,DL
0x3f42b8…3f444c Dummy {f00=0x013f, f01=0x0190, f02=»8,A2 ; $ P CF A5,READP READ ONE CHARACTER < P RF(NZ) BRM150 PARITY ERROR < 4 P CWR A2,A8 < X & P RF(NE) BRM150 INVALID ADDRESSING < j P XIF < P LDK A3,0 < P CC A2,DW1500+1 < P RF(E) BRM110 POLLING < P LDK A3,2 < P CC A2,DW1500
0x3f444c…3f45e0 Dummy {f00=0x013f, f01=0x0190, f02=»DR A8,A2 < P IFT MSV1=0 = P CF A5,READP READ 2:ND STA = $ P RF(NZ) BRM150 PARITY ERROR = F P CWR A2,A8 = j , P RF(NE) BRM150 INVALID ADDRESS SEQUENCE = | P XIF = " P CF A5,READ READ ONE CHARACTER = P IFT P6805=0 SALCUZ = P SUK A2,ENQ+PA
0x3f45e0…3f4774 (2, 521) Dummy {f00=0x013f, f01=0x0190, f02=» P IFT P6805=0 SALCUZ > $ P CF A5,READ READ LAST CHARACTER > P > H " P* TRAILING PAD CAN BE CHECKED > P P > v P CIO A1,0,LCUIN HALT INPUT > ~ P SST A1,LCUIN > P XIF SALCUZ > P IFT P6805=1 SALCUZ > $ P CF A5,HALTIN HALT INPUT SALCUZ
0x3f4774…3f4908 Dummy {f00=0x013f, f01=0x0190, f02=»DR A2,A8 > P SUK A3,2 ? P RF(Z) BRM120 SELECTING ? " P CWK A8,GP ? B P ABL(E) GPOLL GENERAL POLL ? T P IFT MSV1=1 ? v 6 P CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS) ? P XIF ? P IFT MSV1=0 ? & P CF A5,FINTER CHECK IF STA PRESENT ?
0x3f4908…3f4a9c Dummy {f00=0x013f, f01=0x0190, f02=» CF A5,FINTER CHECK IF STA PRESENT ? P LDR A6,A3 LOAD DWT TO A6 @ * P RF(NZ) BRM130 STA FOUND @ L P IFT MSV1=0 @ l $ P LDKL A6,DW1500 SELECT TO DCTASK @ PBRM130 EQU * @ P ABL SELECT @ P XIF @ P IFT MSV1=1 @ P ABL BRM INVALID
0x3f4a9c…3f4c30 Dummy {f00=0x013f, f01=0x0190, f02=» P SUK A2,/7F A P RB(Z) BRM RESYNCHRONIZE A & P CF A5,READ READ ANOTHER CHARACTER A 8 P RB BRM150 A b P A t P* A ~ P* A P* EOT HAS BEEN RECEIVED A P* A P* A PBRM200 EQU * A & P CF A5,HPTIM STOP PROCEDURE TIMER A P IFT
0x3f4c30…3f4dc4 Dummy {f00=0x013f, f01=0x018e, f02=»T GET WRITING DWT A P RF(Z) BRM210 NO ONE WRITING B P LDK A1,2 SET RC=2 B > ( P CF A5,CWRITE COMPLETE WRITE REQUEST B X PBRM210 EQU * B " P CM XACK RESET 'ACK EXPECTED' B PBRM220 EQU * B P CM XSEL RESET 'SELECTED' B P RB BRM B P B
0x3f4dc4…3f4f58 Dummy {f00=0x013f, f01=0x0190, f02=» P RF(Z) BRM315 NOT SELECTED C P LD A1,DCRBUF C & ( P*********************CHAINED COMMAND C < & P RB(Z) BRM150 NO BUFFER AVAILABLE C h P********************* C PBRM305 EQU * C P CF A5,RDMESS READ MESSAGE C P SUK A7,1 C P RF(NZ) BRM320 M
0x3f4f58…3f50ec Dummy {f00=0x013f, f01=0x018e, f02=» BRM C PBRM315 EQU * D P IFT RCOM=1 D P LD A1,XACK D 4 & P RF(Z) BRM316 ACK IS NOT EXPECTED D H P LD A1,DCRBUF D r & P RF(Z) BRM316 NO BUFFER AVAILABLE D " P LD A6,FDWTUT GET WRITING DWT D 0 P ABL(Z) BRM150 NO ONE WRITING. RESYNCHRONIZE D
0x3f50ec…3f5280 Dummy {f00=0x013f, f01=0x0190, f02=» ( P CF A5,CWRITE COMPLETE WRITE REQUEST E P CM CACK PRESET ACK-1 =7 E 0 P RB BRM305 READ THE MESSAGE E P P XIF E t ( PBRM316 CF A5,READ READ ONE CHARACTER E P IFF P6805=1 =8 E P SUK A2,ENQ+PAR E P XIF =8 E P IFT P6805=1 =8 E P S
0x3f5280…3f5414 (2, 522) Dummy {f00=0x013f, f01=0x0190, f02=»ATE MESSAGE OK E $ P LD A4,DCRBUF GET BUFFER ADDRESS F P ADK A4,6 F > P CW A4,FBLST F P " P RF(NE) BRM325 NOT FIRST BLOCK F d 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 P LCR A1,A4 GET
0x3f5414…3f55a8 Dummy {f00=0x013f, f01=0x0190, f02=» RF(Z) RDMOD READ BUFFER RECEIVED F P XIF G * PBRM325 EQU * G 6 P SUK A7,1 G J & P RF(Z) BRM340 MESSAGE ENDED BY ETB G 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 P* G " P* PR
0x3f55a8…3f573c Dummy {f00=0x013f, f01=0x0190, f02=»Z) BRM326 G P ST A2,+4,A1 H P XIF H & PBRM326 EQU * H 2 P CWK A6,DW1500 H F , P RF(E) BRM330 MESSAGE IS MENT FOR DCTASK H P LD A2,DWTST,A6 GET STATUS H P RF(N) BRM330 NO REQUEST H P IFT EM3270=1 =4 H P LD A2,DWTOR,A6 ORDER =4 H & P
0x3f573c…3f58d0 Dummy {f00=0x013f, f01=0x0190, f02=» PBRM327 EQU * I P LDK A1,0 SET RC=0 I $ P LD A8,DWTECB,A6 GET ECB ADDRESS I 2 P LD A3,-4,A4 GET LENGTH I Z * P ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH I z & P CF A15,CTIME STOP REQUEST TIMING I ( P ST A2,ECBCW,A8 STORE REMAINING TIME I P I P
0x3f58d0…3f5a64 Dummy {f00=0x013f, f01=0x018e, f02=» I x P ANK A2,/FF J P LC A2,TEBCDI,A2 TRANSLATE J P ANK A2,8 J > P RF(Z) BRM328 J P P LD A2,DWTST,A6 GET STATUS J f P ORK A2,/A J P ST A2,DWTST,A6 J PBRM328 EQU * J P XIF J P IFT EM3270=1 =4 J P LD A2,DWTOR,A6 ORDER =4 J
0x3f5a64…3f5bf8 Dummy {f00=0x013f, f01=0x0190, f02=» P RF BRM32A =4 K P XIF =4 K PBRM329 EQU * =4 K * P K B P LDK A1,0 RESET RETURN CODE K J & P CF A15,DC:MIN MOVE TO USER BUFFER K n P RF BRM345 K PBRM32A EQU * =4 K P K $ P CF A15,TENDIO COMPLETE REQUEST K P RF BRM345 K P K
0x3f5bf8…3f5d8c Dummy {f00=0x013f, f01=0x0190, f02=»6 ORDER =4 K , P RF(NZ) BRM335 NOT ANY MESSAGE ORDER =4 L & P CF A15,TENDIO COMPLETE REQUEST =4 L B PBRM335 EQU * =4 L l P XIF =4 L P SUK A4,6 GET BUFFER BASE L ( P CF A5,QRBUF QUEUE BUFFER FOR DCTASK L . P CF A15,CKMESS COMPLETE DCTASK READ
0x3f5d8c…3f5f20 Dummy {f00=0x013f, f01=0x0190, f02=»,A6 L P ANK A1,8 M $ P RB(Z) BRM340 ACK SHOULD BE SENT M P CF A5,TRWACK SEND WACK M F P RF BRM410 M f P XIF M x P IFF STAT=1 M P RB BRM340 M P XIF M P M P* M P* M , P* READ MODIFIED OR READ BUFFER RECEIVED M P* M
0x3f5f20…3f60b4 (2, 523) Dummy {f00=0x013f, f01=0x018e, f02=»D A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL M $ P LD A4,DWTBUF,A6 BUFFER ADDRESS N 6 $ P SUK A4,2 SDJUST BUFFER ADDRESS N ^ " P LDKL A3,1922 REQUESTED LENGTH N " P IM XRB SET READ BUFFER SWITCH N P CM FDWTUT N P LDK A1,1 N & P XRS A1,CACK INCRE
0x3f60b4…3f6248 Dummy {f00=0x013f, f01=0x018e, f02=» P DE O P ABL POL127 O P XIF O & P* O 2 P* O < P* ENQ HAS BEEN RECEIVED O F P* O f P* O p PBRM400 EQU * O z & P CF A5,HPTIM STOP PROCEDURE TIMER O P LD A1,XACK O , P RF(NZ) BRM510 RETRANSMISSION OF MESSAGE O P OR A1,XSEL
0x3f6248…3f63dc Dummy {f00=0x013f, f01=0x018e, f02=» O P* P P* P P* NAK HAS BEEN RECEIVED P P* P < P* P F PBRM500 EQU * P P & P CF A5,HPTIM STOP PROCEDURE TIMER P d P LD A1,XACK P P RF(NZ) BRM510 ACK EXPECTED P P OR A1,XSEL P " P RB(Z) BRM410 IN CONTROL STATE P P RF BRM6
0x3f63dc…3f6570 Dummy {f00=0x013f, f01=0x0190, f02=» P | P CF A15,SETIME DK Q P DATA BRM520,TIMNAK DK Q " P ABL TDISP DK Q B PBRM520 EQU * DK Q X P CF A15,LDREG DK Q p P DE Q " P LD A6,FDWTUT GET WRITING DWT Q P IFF STAT=0 Q P LD A1,XSTA Q 0 P ABL(NZ) POL050 STATUS HAS BEEN TR
0x3f6570…3f6704 Dummy {f00=0x013f, f01=0x0190, f02=» Q P ABL POL130 R P* R P* R & P* DLE HAS BEEN RECEIVED R 0 P* R P P* R Z PBRM600 EQU * R d & P CF A5,HPTIM STOP PROCEDURE TIMER R x P LD A1,XACK R " P RB(Z) BRM410 ACK NOT EXPECTED R & P CF A5,READ READ SECOND CHARACTER R P I
0x3f6704…3f6898 Dummy {f00=0x013f, f01=0x0190, f02=») BRM620 R P* S P* ACK , 0 RECEIVED S P* S 4 P LD A1,CACK GET ACKCOUNTER S > P RF(Z) BRM630 ACK,0 EXPECTED S ` PBRM610 EQU * S P CF A5,TRENQ SEND ENQ S & P CF A5,SPTIM START PROCEDURE TIMER S P RB BRM410 S PBRM620 EQU * S P C
0x3f6898…3f6a2c Dummy {f00=0x013f, f01=0x0190, f02=»ACK,1 NOT EXPECTED S PBRM630 EQU * T P LD A1,XETX T . P RF(Z) BRM640 ETX NOT SENT T B P T d P* T n , P* ACK HAS BEEN RECEIVED TO AN ETX BLOCK T x P* T P LDK A1,0 SET RC=0 T PBRM635 EQU * T P IFF STAT=0 T P LD A2,XSTA T . P
0x3f6a2c…3f6bc0 Dummy {f00=0x013f, f01=0x0190, f02=»OT SEND EOT T P IFT RCOM=1 U P U ( P CM XRB RESET READ BUFFER U 0 P XIF U R P RB BRM410 U ^ PBRM640 EQU * U p P LDK A1,1 U & P XRS A1,CACK INCREMENT ACK COUNTER U P ABL POL130 U PBRM650 EQU * U P IFF P6805=1 =8 U P CWK A2,
0x3f6bc0…3f6d54 (2, 524) Dummy {f00=0x0140, f01=0x0190, f02=» U l " P CM XACK RESET 'EXPECTING ACK' V P LD A1,XETX V . $ P RF(NZ) BRM660 ETX HAS BEEN SENT V B P LDK A1,2 SET RC=2 V j P RB BRM635 V PBRM660 EQU * V P LDK A1,0 SET RC=0 V P RB BRM635 V P IFF STAT=0 V P V P* V P* V " P
0x3f6d54…3f6ee8 Dummy {f00=0x0140, f01=0x0190, f02=»E FROM STATUS QUEUE V | P CM XSTA CLEAR 'STATUS SENT' W " P CM XACK CLEAR 'ACK EXPECTED' W @ P LD A1,DWTST,A6 GET STATUS W f P ANK A1,4 W P RB(Z) BRM636 NOT DE W P LDKL A1,/8000 W " P ANS A1,DWTST,A6 CLEAR STATUS W P RB BRM636 W P XIF
0x3f6ee8…3f707c Dummy {f00=0x0140, f01=0x0190, f02=» RF(NZ) POL010 ERROR. ACK EXPECTED =5 W P IFF STAT=0 X . P LD A1,DWTST,A6 GET STATUS X B P LDR A3,A1 X d P ANK A1,1 X v $ P RF(Z) SEL110 NO PENDING STATUS X P CF A5,TRRVI SEND RVI X P XIF X P IFF STAT=1 X P RF SEL110 X P XIF X
0x3f707c…3f7210 Dummy {f00=0x0140, f01=0x0190, f02=» X P IFT STAT+NOWACK=2 Y P ANK A3,8 Y " " P RF(Z) SEL111 DEVICE NOT BUSY Y 4 P CF A5,TRWACK TRANSMIT WACK Y Z P ABL BRM Y ~ PSEL111 EQU * Y P XIF Y P LD A1,DCRBUF Y $ P RF(NZ) SEL120 BUFFER AVAILABLE Y PSEL115 EQU * Y P IFF STA
0x3f7210…3f73a4 Dummy {f00=0x0140, f01=0x0190, f02=»ION Y l P CF A5,TRACK SEND ACK,0 Z P RB SEL100 Z , P Z > P* Z H P* Z R P* PREPARE FOR TEXT RECEPTION Z P* Z P* Z PPRREC EQU * Z P IM XSEL SET 'SELECTED' Z P CM FBAX RESET BUFFER INDEX Z P IFT CODE=1 Z . P LC A2,T
0x3f73a4…3f7538 Dummy {f00=0x0140, f01=0x0190, f02=»DWT Z v P RTN A5 [ P [ P* [ & P* [ 0 $ P* GENERAL POLL HAS BEEN RECEIVED [ : P* [ b P* [ l PGPOLL EQU * [ v P LD A1,XACK =5 [ & P RF(Z) POL020 ACK NOT EXPECTED =5 [ " PPOL010 CF A5,TRENQ SEND ENQ =5 [ * P CF A5,SPTIM START PRO
0x3f7538…3f76cc Dummy {f00=0x0140, f01=0x0190, f02=» [ P LD A6,DCSTQ & P RF(Z) POL110 NO STATUS TO BE SENT " P SUK A6,DWTSQ GET DWT ADDRESS H PPOL050 EQU * n P CF A5,TRSTA SEND STATUS & P CF A5,SPTIM START PROCEDURE TIMER P IM XACK SET 'ACK EXPECTED' P XIF P IFF STAT=1
0x3f76cc…3f7860 Dummy {f00=0x0140, f01=0x0190, f02=»N QUEUE z PPOL115 EQU * ] P CF A5,TREOT SEND EOT ] $ P RB POL100 ] B PPOL120 EQU * ] T " P SUK A6,DWTWQ GET DWT ADDRESS ] h PPOL125 EQU * ] $ P LD A8,DWTECB,A6 GET ECB ADDRESS ] P RF(NZ) POL126 ] P CF A15,REMOVW ] P RB POL115 ] P
0x3f7860…3f79f4 (2, 525) Dummy {f00=0x0140, f01=0x0190, f02=»WORK BUFFER ] | P ST A4,ECBBA,A8 ^ . P CF A15,DC:MOT MOVE DATA FROM USER BUFFER ^ , P XIF ^ ^ & P LD A4,ECBBA,A8 GET BUFFER ADDRESS ^ j P LD A3,ECBRL,A8 GET LENGTH ^ PPOL127 EQU * ^ & P ST A4,FECBBA SAVE BUFFER ADDRESS ^ ( P SUK A3,2 SKIP FIRST
0x3f79f4…3f7b88 Dummy {f00=0x0140, f01=0x0190, f02=»NT' ^ z P CM XSTA _ P CF A5,TRTEXT SEND ONE BLOCK _ & P CF A5,SPTIM START PROCEDURE TIMER _ @ P IM XACK SET 'ACK EXPECTED' _ j P RB POL100 _ P _ P* _ P* _ & P* SPECIFIC POLL HAS BEEN RECEIVED _ P* _ P* _ PSPOLL EQU *
0x3f7b88…3f7d1c Dummy {f00=0x0140, f01=0x0190, f02=»HECK POLLTIMER _ P LDR A6,A7 RESTORE A6 ` P IFT STAT=1 ` 4 P LD A1,DWTST,A6 GET STATUS ` H P ANK A1,7 ` j " P RB(NZ) POL050 PENDING STATUS ` | P XIF ` P IFF STAT+SPECP=0 ` P LD A1,DWTST,A6 ` P RB(N) POL115 NO REQUEST ` P LD A1,D
0x3f7d1c…3f7eb0 Dummy {f00=0x0140, f01=0x018e, f02=» XIF ` P RB POL115 SEND EOT a P a ( P* a 2 P* a < 8 P* CHECK IF THERE IS A WRITE REQUEST TO BE COMPLETED a F P* a P* A1 CONTAINS RETURN CODE a P* a P* a PCWRITE LD A6,FDWTUT a $ P RF(Z) CWR900 NO WRITE GOING ON a P L
0x3f7eb0…3f8044 Dummy {f00=0x0140, f01=0x0190, f02=» a r P SUK A2,2 b ( P RF(NZ) CWR900 NOT EXCHANGE REQUEST b P LDR A1,A1 b F 2 P RF(NZ) CWR100 TRANSMISSION ERROR, RC NOT ZERO b X P LDK A2,2 TRANMISSION OK b ( P ST A2,DWTOR,A6 INDICATE READ ORDER b P RF CWR150 b & PCWR100 LD A8,FECB GET ECB AD
0x3f8044…3f81d8 Dummy {f00=0x0140, f01=0x0190, f02=»REQUEST b x PCWR150 EQU * c * P CF A15,REMOVW REMOVE FROM WRITE QUEUE c $ PCWR200 EQU * c R PCWR900 EQU * c f " P CM XACK RESET 'ACK EXPECTED' c z P CM FDWTUT c P RTN A5 c P c P* c P* c P* READ ONE TEXT BLOCK c P* c P
0x3f81d8…3f836c Dummy {f00=0x0140, f01=0x0190, f02=»IF CORRECT ETB BLOCK RECEIVED c P* d & PRDMESS EQU * d 0 $ P LD A4,DCRBUF GET BUFFER ADDRESS d D P ADK A4,6 RESERVE HEADER d l P LDK A3,0 d P LD A1,XSTA d $ P RF(NZ) RDM050 LAST INPUT WAS OK d " P LD A1,FBLST COMPUTE NEW INDEX d P SUR A1,
0x3f836c…3f8500 Dummy {f00=0x0140, f01=0x0190, f02=» EQU * d P CM XSTA e P LDK A7,0 RESET LRC e P e : P IFT IBMCHR=1 e B P LD A1,FBAX e X " P RF(NZ) RDM100 NOT FIRST BLOCK e l P CF A5,READP e P RF(NZ) RDM120 PARITY ERROR e P CWK A2,ESC e P RF(NE) RDM110 e * P CF A5,READP SKIP NE
0x3f8500…3f8694 (2, 526) Dummy {f00=0x0140, f01=0x0190, f02=»ITY ERROR e ~ PRDM110 EQU * f P CWK A2,ETX f & P RF(E) RDM130 ETX RECEIVED f : P CWK A2,ETB f P RF(E) RDM160 ETB RECEIVED f p P CWK A2,ITB f P RF(E) RDM170 ITB RECEIVED f P CWK A2,ENQ f 2 P RF(E) RDM120 SKIP IF ENQ EMBEDDED IN MESSAG
0x3f8694…3f8828 Dummy {f00=0x0140, f01=0x0190, f02=»A2 f P SUK A1,DC1+3 g P RF(P) RDM115 NOT DC1-DC3 g P ADK A1,3 g B P RF(N) RDM115 NOT DC1-DC3 g T P SLL A1,6 g v P LDR A8,A1 g * P CF A5,READP 8-BIT CHAR GET NEXT PART g P RF(NZ) RDM120 PARITY ERROR g * P SUK A2,/20 ASSEMBLE TO ONE
0x3f8828…3f89bc Dummy {f00=0x0140, f01=0x0190, f02=»R g v $ P IM FBAX INCREMENT BUFFER INDEX h P LD A1,FBAX h 2 P CWK A1,RBUFL+RBUFL h F P RB(NG) RDM100 NOT OVERFLOW h b P* h P* BUFFER OVERFLOW h P* h P RF RDM140 ABORT INPUT h PRDM120 EQU * h & P LDK A3,1 INDICATE INVALID MESSAGE
0x3f89bc…3f8b50 Dummy {f00=0x0140, f01=0x0190, f02=»QU * h $ P LD A1,DCRBUF GET BUFFER ADDRESS i P LD A2,FBAX GET BUFFER INDEX i 4 2 P ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER i X P IFF CODE=1 i P CF A5,RDLRC i P RF(Z) RDM150 LRC WAS OK i P XIF i P IFT CODE=1 i & P CF A5,RDCRC READ
0x3f8b50…3f8ce4 Dummy {f00=0x0140, f01=0x0190, f02=» EQU * i $ P LDR A7,A3 SAVE RESULT REGISTER j P CF A5,HALTIN HALT INPUT j 6 P IFT P6805=1 j V " P ORR A7,A1 PARITY ERROR SALCUZ j j P XIF SALCUZ j P RTN A5 j P* j P* ETB RECEIVED j P* j PRDM160 EQU * j P LDR A3,A3 j " P R
0x3f8ce4…3f8e78 Dummy {f00=0x0140, f01=0x0190, f02=»M170 EQU * j P IFF CODE=1 k P CF A5,RDLRC k & " P RB(NZ) RDM120 LRC WAS NOT OK k : P XIF k ` P IFT CODE=1 k l & P CF A5,RDCRC READ CRC AND CHECK IT k " P RB(NE) RDM120 CRC WAS NOT OK k P XIF k P RB RDM100 k P k P* k P* TRAN
0x3f8e78…3f900c Dummy {f00=0x0140, f01=0x0190, f02=»NZ) TRDLE k P LDK A3,ACK0 LOAD ACK0 l P RF TRDLE l 0 P* l B P* TRANSMIT WACK l L P* l d PTRWACK LDK A3,WACK LOAD WACK l n P RF TRDLE l P* l P* TRANSMIT RVI l P* l P IFF STAT=0 l PTRRVI LDK A3,RVI LOAD RVI l P XIF
0x3f900c…3f91a0 Dummy {f00=0x0140, f01=0x0190, f02=»1 l P RF TRREP m P m P* m & P* TRANSMIT NAK m 0 P* m F PTRNAK LDK A3,NAK LOAD NAK m P P RF TREN10 m r P* m P* TRANSMIT EOT m P* m PTREOT LDK A3,EOT LOAD EOT m P RF TREN10 m P* m P* TRANSMIT ENQ m P* m
0x3f91a0…3f9334 (2, 527) Dummy {f00=0x0140, f01=0x0190, f02=»TRREP CF A5,TRSYNC START OUTPUT m & P LC A2,RESEND GET FIRST CHARACTER n ( P CF A5,WRITEP SEND IT n R & P LC A2,RESEND+1 GET NEXT CHARACTER n p P CF A5,WRITEP SEND IT n PTRRE10 LDK A2,/FF n P CF A5,WRIT05 SEND PAD n P LDK A2,/FF n P CF
0x3f9334…3f94c8 Dummy {f00=0x0140, f01=0x0190, f02=» SALCUZ n x P XIF SALCUZ o & P SST A2,LCUUT PERFORM SST AT ONCE o & P IFF LOGG=0 o P ( P CF A5,LOGSST LOG TRANSMITTER STATUS o d P XIF o P RTN A5 o P o P* o P* o P* TRANSMIT ONE TEXT BLOCK o P* o P* o PTRTEXT E
0x3f94c8…3f965c Dummy {f00=0x0140, f01=0x0190, f02=» P LD A4,FBAX p ( P RF(NZ) TRT050 NOT START OF MESSAGE p P p D 2 P LD A1,XRB READ BUFFER COMMAND IN PROCESS ??? p L P RF(NZ) TRT050 YES !! p P p P LD A4,FECBBA p " P LC A3,+2,A4 GET AID CHARACTER p P SUK A3,/30 p $ P RF(NZ) TRT050 N
0x3f965c…3f97f0 Dummy {f00=0x0140, f01=0x0190, f02=»END % p P LDK A2,'/' q P CF A5,WRITE SEND / q " P LDK A2,STX q > P CF A5,WRITE SEND STX q R ( P ST A4,FBLST REMEMBER START OF BLOCK q p ( P ADK A4,5 SKIP AID + CURSOR ADDRESS q P LDK A3,5 ADJUST LENGTH q P LDK A2,3 q P ST A2,FBAX q
0x3f97f0…3f9984 Dummy {f00=0x0140, f01=0x0190, f02=» LDK A7,0 RESET LRC q $ P LD A4,FECBBA GET BUFFER ADDRESS r P AD A4,FBAX ADD BUFFER INDEX r D ( P ST A4,FBLST REMEMBER START OF BLOCK r h ( P ADK A4,2 SKIP FIRST WORD OF BUFFER r & P LDK A3,0 RESET CHARACTER COUNTER r P LD A1,FBAX GET BUFFER INDEX r
0x3f9984…3f9b18 Dummy {f00=0x0140, f01=0x0190, f02=»F A5,WRITEP SEND STA r P IFT IBMCHR=1 s P IFF RCOM=1 s 2 " P LDK A2,/27 SEND ENTER AS AID s F P CF A5,WRITEP s l " P LDK A2,/20 AND CURSOR ADDRESS s P CF A5,WRITEP s P LDK A2,/20 s P CF A5,WRITEP s P XIF s P IFT RCOM=1 s P
0x3f9b18…3f9cac Dummy {f00=0x0140, f01=0x0190, f02=»R DISPLAY s | PTRT060 CF A5,WRITEP SEND AID t P t 6 $ P LD* A3,DWTCUR,A6 CURSOR ADDRESS t > . P CF A5,LINCOL SEND LINE AND COLUMN NUMBER t f P LDK A3,5 SET BLOCK COUNT t P RF TRT100 t PTRT070 EQU * t P XIF t P t P LDK A3,2 t PTR
0x3f9cac…3f9e40 Dummy {f00=0x0140, f01=0x0190, f02=»,XRB READ BUFFER COMMAND ??? t P RF(Z) TRT105 NO!! u $ P u > @ P************************************************************ u F P* u , P* CHECK IF ATTRIBUTE CHARACTER OR NULL u P* u 4 P*********************************************** u P u
0x3f9e40…3f9fd4 (2, 528) Dummy {f00=0x0141, f01=0x0190, f02=» " P RF(NE) TRT102 NO,GO TO TRT102 v P LDK A2,/0A v * PTRT102 EQU * v > P CWK A2,/7D END OF MESSAGE ? v R " P RF(NE) TRT103 NO,GO TO TRT103 v v P LDK A2,/19 v PTRT103 EQU * v P CWK A2,X'7F' NULL ?? v P RF(NE) TRT105 v P SUK A2,1 v
0x3f9fd4…3fa168 Dummy {f00=0x0141, f01=0x0190, f02=» v r P w ( P LC A2,-1,A4 GET ATTRIBUTE CHARACTER w P ANK A2,X'7F' w < ( P LDR A1,A2 CONVERT TO IBM ATTRIBUTE w R P ANK A1,1 w ~ P ANK A2,/1E MASK w P SLL A2,1 w & P ORR A2,A1 IBM ATTRIBUTE COMPOSED w " P ORK A2,/40 BIT ALWAYS SET ONE w
0x3fa168…3fa2fc Dummy {f00=0x0141, f01=0x0190, f02=»,WRITEP SEND ATTRIBUTE w P ADK A3,1 x P RF TRT110 x 0 PTRT105 EQU * x B P XIF x V P x b P CWK A2,/07 x l ( P RF(L) TRT110 ILLEGAL CODE : SKIP IT x P CF A5,WRITEP SEND CHARACTER x PTRT110 EQU * x $ P IM FBAX INCREMENT BUFFER INDEX x
0x3fa2fc…3fa490 Dummy {f00=0x0141, f01=0x0190, f02=»UNTER x p P CWK A3,TBLEN y P RB(L) TRT100 NOT FULL BLOCK y $ P IFT RCOM=1 y H , P LDK A1,SBA CHECK IF SBA AT END OF BLOCK y P CC A1,-2,A4 y P RF(E) TRT115 YES y P CC A1,-1,A4 y P RF(NE) TRT116 NO SEND ETB y ( P LCR A2,A4 GET FIRST BYT
0x3fa490…3fa624 Dummy {f00=0x0141, f01=0x0190, f02=» SECOND BYTE AFTER SBA y | P CF A5,WRITEP SEND IT z P IM FBAX INCREMENT INDEX z < P XIF z PTRT116 EQU * z h P LDK A2,ETB LOAD ETB z | PTRT120 EQU * z P CF A5,WRITEP SEND IT z P IFF CODE=1 z P LDR A2,A7 GET LRC z P CF A5,WRITEP SE
0x3fa624…3fa7b8 Dummy {f00=0x0141, f01=0x018e, f02=»ND CRC BYTE 1 z P ECR A2,A8 { P ANK A2,/FF { ( " P CF A5,WRIT05 SEND CRC BYTE 2 { < P XIF { b P ABL TRRE10 HALT OUTPUT { n PTRT130 EQU * { P IM XETX INDICATE 'ETX SENT' { PTRT140 EQU * { P LDK A2,ETX LOAD ETX { P RB TRT120 SEND ET
0x3fa7b8…3fa94c Dummy {f00=0x0141, f01=0x0190, f02=» { $ P IM XSTA INDICATE 'STATUS SENT' | P ST A6,FDWTUT SAVE A6 | 0 P CF A5,TRSYNC START OUTPUT | N P LDK A2,SOH | p P CF A5,WRITE SEND SOH | P LDK A7,0 REST LRC | P LDK A2,'%' | P CF A5,WRITEP SEND '%' | P LDK A2,'R' | P CF A5
0x3fa94c…3faae0 Dummy {f00=0x0141, f01=0x018e, f02=»,A6 | P CF A5,WRITEP SEND STA } P LD A1,DWTST,A6 GET STATUS } * P ANK A1,/06 MASK FOR S/S 0 } L P SRL A1,1 } n $ P LC A2,SSTAB,A1 GET STATUS BYTE } P CF A5,WRITEP SEND S/S 0 } P LDK A2,NOIR PRELOAD S/S 1 } P LD A1,DWTST,A6 GET STATUS }
0x3faae0…3fac74 (2, 529) Dummy {f00=0x0141, f01=0x0190, f02=» } P CF A5,WRITEP SEND S/S 1 ~ P RB TRT130 SEND ETX AND LRC ~ ( P XIF ~ L P ~ X P* ~ b P* ~ l P* TRANSMIT SYNC SEQUENCE ~ v P* ~ P* ~ PTRSYNC EQU * ~ P LDK A2,0 SALCUZ ~ * P CIO A2,0,LCUIN HALT INPUT IF NOT DONE ~ P S
0x3fac74…3fae08 Dummy {f00=0x0141, f01=0x0190, f02=» SALCUZ ~ P IFT CODE=1 SALCUZ P LDK A2,0 SALCUZ , , P CIO A2,1,LCUUT START TRANSMITTER SALCUZ F P RF(A) TRS010 SALCUZ v P SST A1,LCUUT SALCUZ P RF(A) TRS005 SALCUZ P ABL BRM SALCUZ " PTRS005 CIO A2,1,LCUUT SALCUZ
0x3fae08…3faf9c Dummy {f00=0x0141, f01=0x0190, f02=» P IFT P6805=1 SALCUZ P IFT CODE=0 SALCUZ P LDK A2,/0C SALCUZ < P CIO A2,1,LCUUT SALCUZ X P RF(A) TRS010 SALCUZ x P SST A1,LCUUT SALCUZ P RF(A) TRS005 SALCUZ P ABL BRM SALCUZ " PTRS005 CIO A2,1,LCUUT SALCUZ
0x3faf9c…3fb130 Dummy {f00=0x0141, f01=0x0190, f02=»A5,READ WAIT FOR OUTPUT INTERRUPT P LDK A3,4 4 SYNS * PTRS100 LDK A2,SYN B P CF A5,WRITE SEND SYN P SUK A3,1 z P RB(NZ) TRS100 P RTN A5 P P* P* P* RECEIVER INTERRUPT P* P* PIH1501
0x3fb130…3fb2c4 Dummy {f00=0x0141, f01=0x018e, f02=»,A15 SAVE A1-A8 =1 P XIF * P CF A15,LDREG RESTORE DC REGS A3 - A8 & P INR A2,0,LCUIN READ CHAR T , P RF(NA) IHIN20 NOT ACCEPTED,CHECK STATUS v P IFF LOGG=0 ( P CF A5,LOGIN LOG RECEIVED CHARACTER P XIF P IFF CODE=1 P C
0x3fb2c4…3fb458 Dummy {f00=0x0141, f01=0x0190, f02=» P IFT CODE=1 P C2 SYNSW 2 P RF(NZ) IHLCI1 DO NOT SKIP SYNCS IN BCC FRAME * P CWK A2,SYNEBC ` P RF(E) READ SKIP EBCDIC SYN v PIHLCI1 EQU * P CF A5,CRCCAL CALCULATE CRC ( P LC A2,TASCII,A2 TRANSLATE TO ASCII P XIF
0x3fb458…3fb5ec Dummy {f00=0x0141, f01=0x0190, f02=»=1 SALCUZ $ PIHIN20 RF SST PERFORM SST SALCUZ P XIF SALCUZ : P P P* Z P* d P* TRANSMITTER INTERRUPT n P* P* PIH1502 EQU * P ST P,INTSAV P IFT CPU852=1 P CF A15,SAVE8 SAVE A1 - A8 P XIF
0x3fb5ec…3fb780 Dummy {f00=0x0141, f01=0x0190, f02=»10 P P* P* & P* SST INSTRUCTION AND STATUS CHECK ( P* R ( P* LCU STATUS : BIT 10=CARRIER OFF . P* BIT 13=PARITY ERROR (6805 ONLY) SALCUZ , P* BIT 14=THROUGHPUT ERROR , P* BIT 15=MODEM
0x3fb780…3fb914 (2, 530) Dummy {f00=0x0141, f01=0x0190, f02=»IF SALCUZ P LDR A2,A1 P IFF LOGG=0 & & P CF A5,LOGSST LOG SST INFORMATION : P XIF d P IFT P6805=0 SALCUZ p P ANK A2,2 P RF(Z) SST100 P XIF SALCUZ P IFT P6805=1 SALCUZ P ANK A2,6 SALCUZ P RF(Z) S
0x3fb914…3fbaa8 Dummy {f00=0x0141, f01=0x0190, f02=»SSTRET SALCUZ P XIF SALCUZ PSST050 EQU * SALCUZ , P CM XSTA TROUHHPUT ERROR H P LDKL A5,STB h P ABL BRM010 | PSST100 EQU * P ST A1,DCSTCU P IFT P6805=0 SALCUZ * P CF A15,CKMESS CHECK IF STATUS CHANGE P RTN
0x3fbaa8…3fbc3c Dummy {f00=0x0141, f01=0x0190, f02=»INE ERROR, WAIT 0.2 SECONDS SALCUZ P DATA BRM RESTART SALCUZ * P DATA 2 WAIT TIME SALCUZ J P RF READ SALCUZ j P* PSST200 LDK A1,0 SALCUZ PSSTRET ADK A5,4 SALCUZ P LDR A1,A1 SET CR SALCUZ P ABR* A5 RETURN SALCUZ
0x3fbc3c…3fbdd0 Dummy {f00=0x0141, f01=0x0190, f02=» P IFT P6805=0 SALCUZ 4 P RB SST PERFORM SST INSTRUCTION AND STATUS CHECK P XIF SALCUZ X P IFT P6805=1 SALCUZ n * P RF READ WAIT FOR SST INTERRUPT SALCUZ P XIF SALCUZ P P* P* , P* WRITE FROM OR READ ONE CHA
0x3fbdd0…3fbf64 Dummy {f00=0x0141, f01=0x0190, f02=» TRANSLATION OF TRAILING PAD * P LC A2,TEBCDIC,A2 TRANSLATE TO EBCDIC $ P XIF R PWRIT05 EQU * ^ " P OTR A2,0,LCUUT SEND CHARACTER r P RF(A) WRIT10 P RF READ THROUGHPUT ERROR P IFF CODE=1 $ PWRIT10 XRR A7,A2 ACCUMULATE BCC
0x3fbf64…3fc0f8 Dummy {f00=0x0141, f01=0x0190, f02=»HARACTER v P XIF P* PREAD CF A15,STREG & P ABL TDISP @ P R P* P* f P*** WRITEP p P* P* WRITE A2 WITH PARITY P* P* P IFT CODE+P6805=0 SALCUZ PWRITEP ANK A2,/FF P ECR A1,A2
0x3fc0f8…3fc28c Dummy {f00=0x0141, f01=0x0190, f02=» XIF P IFF CODE+P6805=0 SALCUZ PWRITEP RB WRITE . P XIF F P* R P* P* f P*** READP p P* . P* READ CHARACTER TO A2 AND CHECK PARITY P* P* PREADP CF A5,READ P IFT CODE+P6805=0 SALCUZ
0x3fc28c…3fc420 Dummy {f00=0x0141, f01=0x0190, f02=»,A2 P ANK A2,/7F P XIF P IFF CODE+P6805=0 SALCUZ , P LDK A1,/80 N P XIF b P ADK A5,4 n P ANK A1,/80 P XRK A1,/80 P ABR* A5 P* P* P P* < P* FIND DWT CONTAINING SUBTERMINAL ADDRES
0x3fc420…3fc5b4 (2, 531) Dummy {f00=0x0141, f01=0x0190, f02=»DWT TO FOUND TERMINAL P* B P* NOTE: FOR SIEMENS MSV1 - SEPARATE SELECT AND POLL ADDRESSES ( * P* ENTRY: FINTER - CHECK SELECT ADDRESS n , P* FINTEP - CHECK SPECIFIC POLL ADDRESS P* . PRBYTE DATA 0 IF 1 COMPARE WITH RIGTH BYTE P
0x3fc5b4…3fc748 Dummy {f00=0x0141, f01=0x018e, f02=» EQU * P XIF & P LD A4,DCTAB GET ADDRESS TO DC:TAB * P AD* A4,DCTAB ADDRESS TO END OF DC:TAB D PFINT10 SUK A4,2 r P LDK A3,0 DEFAULT VALUE P CW A4,DCTAB END OF TABLE ( P RF(E) FINT20 SUBTERMINAL NOT FOUND P LDR* A3,A4 LOAD
0x3fc748…3fc8dc Dummy {f00=0x0141, f01=0x0190, f02=» P IFT MSV1=0 . P CC A2,1,A3 COMPARE TO SUBTERMINAL ADDRESS P XIF J & P RB(NE) FINT10 TAKE NEXT TERMINAL V PFINT20 CM RBYTE P ANKL A3,/FFFE P RTN A5 P P* P* P* POWER ON FUNCTIONS P* P*
0x3fc8dc…3fca70 Dummy {f00=0x0141, f01=0x0190, f02=»A1-A8 =1 P XIF P IFT STAT=1 P LDK A5,4 SET DEVICE END 0 P LD A1,DCTAB P . P AD* A1,DCTAB GET ADDRESS TO END OF TABLE d PDRDC05 SUK A1,2 P CW A1,DCTAB P RF(E) DRDC06 END OF TABLE P LDR* A6,A1 GET DWT ADDRESS 0 P
0x3fca70…3fcc04 Dummy {f00=0x0141, f01=0x0190, f02=»IF P LDK A2,/40 P ORS A2,DCONOF P CF A15,CKMESS 4 ( P LD A2,DCTPGP GET POLL TIMER POINTER J " P RF(NZ) DRDC20 ALREADY STARTED v * PDRDC10 CF A15,SPOTIM START POLL TIMER PDRDC20 ABL BRM P P* P* POLL TIME OUT
0x3fcc04…3fcd98 Dummy {f00=0x0141, f01=0x0190, f02=» CHECK IF STATUS CHANGE $ P CF A15,SPOTIM START POLL TIMER P ABL TDISP H P* Z 4 P* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED d P* $ PCPTIM CM DCONOF INDICATE POLLING P LDKL A2,-TIMPOL P ST* A2,DCTPGP RESTART TIMER *
0x3fcd98…3fcf2c Dummy {f00=0x0141, f01=0x0190, f02=» TIMER v P DATA PTOUT,TIMPOL & P ST A4,DCTPGP STORE TIMER POINTER ( P ADKL A15,4 R P ABR* A15 f P x P* P* START PROCEDURE TIMER P* PSPTIM EQU * $ P LDR A1,A6 LOAD DWT AS PARAMETER P CF A15,SETIME P
0x3fcf2c…3fd0c0 Dummy {f00=0x0141, 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
0x3fd0c0…3fd254 (2, 532) Dummy {f00=0x0142, f01=0x0190, f02=» NOT RUNNING P CM* DCTPP STOP TIMER P CM DCTPP 2 PHPT10 RTN A5 D P X P IFT CODE=1 b P* v P* P* CALCULATION OF CRC P* P* A2 = CHARACTER P* A7 = ACCUMULATED CRC P* P* PCRCCAL EQU *
0x3fd254…3fd3e8 Dummy {f00=0x0142, f01=0x0190, f02=» XRR A3,A2 P SRL A2,1 P ANK A3,1 $ P RF(Z) CRC110 6 P XRKL A7,/A001 L PCRC110 SUK A1,1 b P RB(NZ) CRC100 z P LD A1,CRCSAV P LD A2,CRCSAV+2 P LD A3,CRCSAV+4 P RTN A5 PCRCSAV RES 3 P P*
0x3fd3e8…3fd57c Dummy {f00=0x0142, f01=0x0190, f02=»RENT CRC x $ P IM SYNSW DO NOT SKIP SYNCS NOW P CF A5,READ READ BYTE 1 8 P LD A8,CRCSAV+2 SAVE IT X P CF A5,READ READ BYTE 2 x ( P CM SYNSW SYNCS CAN BE SKIPPED AGAIN P LD A2,CRCSAV+2 SAVE IT P SLL A2,8 P XRR A2,A8 P
0x3fd57c…3fd710 Dummy {f00=0x0142, f01=0x0190, f02=» READ LRC CHARACTER " P* CR=0 IF LRC OK P* F PRDLRC IM SYNSW P P CF A5,READP f P ADK A5,4 z P LDR A1,A1 P RF(NZ) LRCEND P ANK A7,/7F PLRCEND EQU * P CM SYNSW P ABR* A5 P P X
0x3fd710…3fd8a4 Dummy {f00=0x0142, f01=0x0190, f02=»0 CU LINE ADDRESS P DATA /8000 STATUS P DATA 0 ECB ADDRESS 4 P DATA 0 ORDER P * P DATA DC15DC POINTER TO ADDRESS BLOCK f P DATA 0 TTAB ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TASK QUEUE P* P IFT MMUPAG=
0x3fd8a4…3fda38 Dummy {f00=0x0142, f01=0x0190, f02=»0 WRITE QUEUE OR BUFFER QUEUE . P DATA 0 STATUS QUEUE (NOT USED BY DC-TASK) & " P DATA 0 RECEIVE MESSAGE QUEUE X , P DATA 0 SIMULATED DEVICE BUFFER ADDRESS ~ P DATA 0 CURSOR ADDRESS " P DATA 0 REQUEST TIMEOUT VALUE P* P IFT MMUPAG=
0x3fda38…3fdbcc Dummy {f00=0x0142, f01=0x0190, f02=»POOL | P* PRLINK EQU RBUFL+RBUFL+8 P* 6 PDCRBUF EQU * @ P DATA *+2 FREE BUFFER ANCHOR T P IFF RBUFNR=1 DK3 x P IFF RBUFNR=2 P DATA *+RLINK P RES RBUFL+3 P IFF RBUFNR=3 P DATA *+RLINK P RES RBUFL
0x3fdbcc…3fdd60 Dummy {f00=0x0142, f01=0x018e, f02=»ES RBUFL+3 P XIF DK3 P DATA 0 END OF CHAIN $ P RES RBUFL+3 @ P T P IFF MMUPAG=0 & PMMUBUF RES TBUFL+1 MMU WORK BUFFER r P XIF P P* P* P* INTERRUPT LOGGING ROUTINE P* P* P IFF LOGG=
0x3fdd60…3fdef4 (2, 533) Dummy {f00=0x0142, f01=0x0190, f02=» PLOGIN CWK A2,/FF P RF(E) LOGE10 P ST A2,SAVE2 6 PLOG10 ST A3,SAVE3 J P LD A3,LOGPNT d P STR A2,A3 z P ADK A3,2 P CWK A3,LOGEND P RF(L) LOGEXI P LDKL A3,LOGSTA PLOGEXI ST A3,LOGPNT P LD A2,SAV
0x3fdef4…3fe088 Dummy {f00=0x0142, f01=0x0190, f02=» PLOGEND EQU *-4 PSAVE2 DATA 0 PSAVE3 DATA 0 2 P XIF F P* R P* P* f P IFT RCOM=1 p P < P******************************************************* P* P* L I N C O L P* : P* CONVER
0x3fe088…3fe21c Dummy {f00=0x0142, f01=0x0190, f02=»NCOL EQU * " P LDR A2,A3 COPY CURSOR ADDRESS P SRL A2,6 8 P ANK A2,X'3F' J & P LC A2,LICO:T,A2 ASCII LINE NUMBER ` " P CF A5,WRITEP SEND LINE NUMBER P P LDR A2,A3 P ANK A2,X'3F' ( P LC A2,LICO:T,A2 ASCII COLUMN NUMBER
0x3fe21c…3fe3b0 Dummy {f00=0x0142, f01=0x0190, f02=»HABET z P DB PLICO:T EQU * * P DATA /2041,/4243,/4445,/4647 /00-/07 0 * P DATA /4849,/232E,/3C28,/2B21 /08-/0F ^ * P DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 * P DATA /5152,/245D,/2A29,/3B5E /18-/1F * P DATA /2D2F,/5354,/5556,/5758 /2
0x3fe3b0…3fe544 Dummy {f00=0x0142, f01=0x4128, f02=»8-3F p P DE P XIF P & P 0 PDC:IN DATA DC:TAB+2 8 PDCTAB DATA DC:TAB T " PDC:TAB DATA 2 LENGTH OF DC:TAB n * 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 * P*
0x3fe544…3fe6d8 Dummy {f00=0x0142, f01=0x2008, f02=» H P X ` h p x
0x3fe6d8…3fe86c Dummy {f00=0x0142, f01=0x0190, f02=», gW , 4 , ' ( wM T-! y) $ LbM ( >4a> T T 4 4 C C ( wM CT yP M h M Pb (hM P _ + C W# ! ( 3 (dM ( ( m> _i C0 1 TF TB_ T5 T1 >4m> & T
0x3fe86c…3fea00 Dummy {f00=0x0142, f01=0x0190, f02=» > P ) 4 4 ( > 0 4 h> T >4 4 4 0 $ # X h> PK h> T: $ - M3h> T bM > 1 )W W+4 % " "h> L T M3 bM > 1 M3% bM > 1 4 . p
0x3fea00…3feb94 (2, 534) Opaque[0x194]
0x3feb94…3fed28 # DirEnt {nam=»A «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2850, f03=0x0000}
0x3feb94…3fed28 IdxSect {
0x3feb94…3fed28 f00 = 0x0142 // 0x3feb94 @0x0
0x3feb94…3fed28 f01 = 0x0002 // 0x3feb96 @0x2
0x3feb94…3fed28 gno = [ // 0x3feb98 @0x4
0x3feb94…3fed28 [0x00]: C0x0142.0x2.0
0x3feb94…3fed28 ]
0x3feb94…3fed28 }
0x3fed28…3feebc Dummy {f00=0x0142, f01=0x0086, f02=» ASG 2,LP0F ASM DVKB00 ASM DVKB01 ( ASM DVKB02 : KPF /O L ASG 2,NO Z SCR j ASG /E0,TY10 v
0x3feebc…3ff050 Dummy {f00=0x0142, f01=0x2008, f02=» 2,LP0F ASM DVKB00 ASM DVKB01 ( ASM DVKB02 : KPF /O L ASG 2,NO Z SCR j ASG /E0,TY10 v
0x3ff050…3ff1e4 Dummy {f00=0x0142, f01=0x0190, f02=» a # " ` j "l "l b b b b , , 0Q>DC " KB P _ ^ ^
0x3ff1e4…3ff378 Dummy {f00=0x0142, f01=0x0190, f02=» @ KB J F H " " 4 tTP 8 DY @ E P
0x3ff378…3ff50c Dummy {f00=0x0142, f01=0x0190, f02=» 2 DI ?O_o 8 DY , P 4 GP " 4 tTP < ^ ^
0x3ff50c…3ff6a0 Dummy {f00=0x0142, f01=0x0190, f02=»P T P 0P 1 _ W Y > > T H v ` B L _ _< ? ^ 4 _ ` ` @ F 1 A F _ P 9 > > R @ U 9C @ T M D _ W^ M $R M Av 2